diff --git a/SYSPROG/APPROW/DICT.O4WCODES%003AF1.json b/SYSPROG/APPROW/DICT.O4WCODES%003AF1.json new file mode 100644 index 0000000..3557fff --- /dev/null +++ b/SYSPROG/APPROW/DICT.O4WCODES%003AF1.json @@ -0,0 +1,73 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "F1" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "1", + "<3>": "Field 1", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "L", + "<10>": "20", + "<11>": "", + "<12>": "VARCHAR(255)", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "F1", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:23 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "1", + "<45>": { + "<45,1>": "A", + "<45,2>": "1", + "<45,3>": "Field 1", + "<45,4>": "", + "<45,5>": "", + "<45,6>": "", + "<45,7>": "", + "<45,8>": "", + "<45,9>": "L", + "<45,10>": "20" + }, + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\u0001\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000P\u0000\u0000\u0000ÀCÀ*‹\u0001\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000J)\u0000C€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0001n@ÀC)¸JG\u0000C€\u0006n@ÀC)¸\u0004L#20\u0000\u0000\u0000\u0000\u00002\u00004\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0002€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\u0001\u0000ccÀC\u001b@t\u0000\u0000" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.O4WCODES%003AF2.json b/SYSPROG/APPROW/DICT.O4WCODES%003AF2.json new file mode 100644 index 0000000..28dccc6 --- /dev/null +++ b/SYSPROG/APPROW/DICT.O4WCODES%003AF2.json @@ -0,0 +1,73 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "F2" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "2", + "<3>": "Field 2", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "L", + "<10>": "20", + "<11>": "", + "<12>": "VARCHAR(255)", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "F2", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:20 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "1", + "<45>": { + "<45,1>": "A", + "<45,2>": "2", + "<45,3>": "Field 2", + "<45,4>": "", + "<45,5>": "", + "<45,6>": "", + "<45,7>": "", + "<45,8>": "", + "<45,9>": "L", + "<45,10>": "20" + }, + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\u0002\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000P\u0000\u0000\u0000ÀCÀ*‹\u0002\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000J)\u0000C€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0001n@ÀC)¸JG\u0000C€\u0006n@ÀC)¸\u0004L#20\u0000\u0000\u0000\u0000\u00002\u00004\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0002€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\u0002\u0000ccÀC\u001b@t\u0000\u0000" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.O4WCODES%003AF3.json b/SYSPROG/APPROW/DICT.O4WCODES%003AF3.json new file mode 100644 index 0000000..da54a5c --- /dev/null +++ b/SYSPROG/APPROW/DICT.O4WCODES%003AF3.json @@ -0,0 +1,73 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "F3" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "3", + "<3>": "Field 3", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "L", + "<10>": "20", + "<11>": "", + "<12>": "VARCHAR(255)", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "F3", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:31 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "1", + "<45>": { + "<45,1>": "A", + "<45,2>": "3", + "<45,3>": "Field 3", + "<45,4>": "", + "<45,5>": "", + "<45,6>": "", + "<45,7>": "", + "<45,8>": "", + "<45,9>": "L", + "<45,10>": "20" + }, + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\u0003\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000P\u0000\u0000\u0000ÀCÀ*‹\u0003\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000J)\u0000C€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0001n@ÀC)¸JG\u0000C€\u0006n@ÀC)¸\u0004L#20\u0000\u0000\u0000\u0000\u00002\u00004\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0002€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\u0003\u0000ccÀC\u001b@t\u0000\u0000" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSAUTHLOG%003ACREATED.json b/SYSPROG/APPROW/DICT.SYSAUTHLOG%003ACREATED.json new file mode 100644 index 0000000..5b6dd55 --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSAUTHLOG%003ACREATED.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CREATED" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "0", + "<3>": "Created", + "<4>": "0", + "<5>": "2", + "<6>": "", + "<7>": "DT", + "<8>": "", + "<9>": "R", + "<10>": "21", + "<11>": "(DT)", + "<12>": "DATETIME", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "1", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:26 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001b\u0000\u001b\u0000\u0000\u0000ÀCÀ)\u0014*‹\u0002\u0000d\u001f@ÀC)¸\u0000\u0000\u0000\u0000\u0000L\u0000T\u0000\u0000\u0000ÀCÀ)\u0014*‹\u0002\u0000d\u001f@ÀÃfQH\"\u0000J@\u0000ÀCÀC€\u0001n@ÀÃdQH4\u0000J<\u0000ÀCÀC€\u0004n@ÀC)¸JH\u0000C€\tn@ÀC)¸\u0002DT\u0004R#21\u0000\u0000\u0000\u0000\u00004\u0000<\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0004€\u0001,\u0007ã\u0003cQG%\u0000tÀ)À)\u0014*‹\u0002\u0000dÀC\"@t\u0002DT\u0004(DT)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSCODETEMPLATES%003ATEMPLATE_GROUP.json b/SYSPROG/APPROW/DICT.SYSCODETEMPLATES%003ATEMPLATE_GROUP.json new file mode 100644 index 0000000..a66fa36 --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSCODETEMPLATES%003ATEMPLATE_GROUP.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "TEMPLATE_GROUP" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "0", + "<3>": "Template Group", + "<4>": "S", + "<5>": "2", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "L", + "<10>": "25", + "<11>": "", + "<12>": "VARCHAR(255)", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:29 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001b\u0000\u001b\u0000\u0000\u0000ÀCÀ)\u0014*‹\u0002\u0000d\u001f@ÀC)¸\u0000\u0000\u0000\u0000\u0000L\u0000Q\u0000\u0000\u0000ÀCÀ)\u0014*‹\u0002\u0000d\u001f@ÀÃfQH\"\u0000J@\u0000J*\u0000C€\u0001n@ÀÃdQH4\u0000J<\u0000ÀCÀC€\u0001n@ÀC)¸JH\u0000C€\u0006n@ÀC)¸\u0004L#25\u0000\u0000\u0000\u0000\u00004\u00006\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0002€\u0001,\u0007ã\u0003cQG%\u0000tÀ)À)\u0014*‹\u0002\u0000dÀC\"@t\u0000\u0000" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSCODETEMPLATES%003ATEMPLATE_NAME.json b/SYSPROG/APPROW/DICT.SYSCODETEMPLATES%003ATEMPLATE_NAME.json new file mode 100644 index 0000000..80b304d --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSCODETEMPLATES%003ATEMPLATE_NAME.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "TEMPLATE_NAME" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "0", + "<3>": "Template Name", + "<4>": "S", + "<5>": "1", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "L", + "<10>": "25", + "<11>": "", + "<12>": "VARCHAR(255)", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:24 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001b\u0000\u001b\u0000\u0000\u0000ÀCÀ)\u0014*‹\u0001\u0000d\u001f@ÀC)¸\u0000\u0000\u0000\u0000\u0000L\u0000Q\u0000\u0000\u0000ÀCÀ)\u0014*‹\u0001\u0000d\u001f@ÀÃfQH\"\u0000J@\u0000J*\u0000C€\u0001n@ÀÃdQH4\u0000J<\u0000ÀCÀC€\u0001n@ÀC)¸JH\u0000C€\u0006n@ÀC)¸\u0004L#25\u0000\u0000\u0000\u0000\u00004\u00006\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0002€\u0001,\u0007ã\u0003cQG%\u0000tÀ)À)\u0014*‹\u0001\u0000dÀC\"@t\u0000\u0000" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSREPOS%003AAPPROW_OWNER.json b/SYSPROG/APPROW/DICT.SYSREPOS%003AAPPROW_OWNER.json new file mode 100644 index 0000000..5d8aa97 --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSREPOS%003AAPPROW_OWNER.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "APPROW_OWNER" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "37", + "<3>": "Approw Owner", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "B", + "<8>": "", + "<9>": "L", + "<10>": "3", + "<11>": "(B)", + "<12>": "BOOLEAN", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:45 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹%\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000Q\u0000\u0000\u0000ÀCÀ*‹%\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000ÀCÀC€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0003n@ÀC)¸JG\u0000C€\u0007n@ÀC)¸\u0001B\u0003L#3\u0000\u0000\u0000\u0000\u00002\u00008\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0003€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹%\u0000ccÀC\u001b@t\u0001B\u0003(B)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSREPOS%003ASYSBUILD.json b/SYSPROG/APPROW/DICT.SYSREPOS%003ASYSBUILD.json new file mode 100644 index 0000000..4925969 --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSREPOS%003ASYSBUILD.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSBUILD" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "35", + "<3>": "Sysbuild", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "MD0,", + "<8>": "", + "<9>": "R", + "<10>": "14", + "<11>": "(MD0)", + "<12>": "INTEGER", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:43 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹#\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000Z\u0000\u0000\u0000ÀCÀ*‹#\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000ÀCÀC€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0007n@ÀC)¸ÀCÀC€\fn@ÀC)¸\u0005MD0,P\u0004R#14\u0003MD0\u0000\u0000\u0000\u0000\u00002\u0000=\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0006€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹#\u0000ccÀC\u001b@t\u0004MD0,\u0005(MD0)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSREPOS%003ASYSPUBLISH.json b/SYSPROG/APPROW/DICT.SYSREPOS%003ASYSPUBLISH.json new file mode 100644 index 0000000..7f98893 --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSREPOS%003ASYSPUBLISH.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPUBLISH" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "36", + "<3>": "Syspublish", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "B", + "<8>": "", + "<9>": "R", + "<10>": "1", + "<11>": "(B)", + "<12>": "BOOLEAN", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:45 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹$\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000Q\u0000\u0000\u0000ÀCÀ*‹$\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000ÀCÀC€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0003n@ÀC)¸JG\u0000C€\u0007n@ÀC)¸\u0001B\u0003R#1\u0000\u0000\u0000\u0000\u00002\u00008\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0003€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹$\u0000ccÀC\u001b@t\u0001B\u0003(B)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSTASKS%003AENDED.json b/SYSPROG/APPROW/DICT.SYSTASKS%003AENDED.json new file mode 100644 index 0000000..6dc390a --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSTASKS%003AENDED.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "ENDED" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "6", + "<3>": "Ended", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "DT", + "<8>": "", + "<9>": "R", + "<10>": "21", + "<11>": "(DT)", + "<12>": "DATETIME", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:29 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\u0006\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000S\u0000\u0000\u0000ÀCÀ*‹\u0006\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000ÀCÀC€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0004n@ÀC)¸JG\u0000C€\tn@ÀC)¸\u0002DT\u0004R#21\u0000\u0000\u0000\u0000\u00002\u0000:\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0004€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\u0006\u0000ccÀC\u001b@t\u0002DT\u0004(DT)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSTASKS%003AFUNCTION_NAME.json b/SYSPROG/APPROW/DICT.SYSTASKS%003AFUNCTION_NAME.json new file mode 100644 index 0000000..d7719b0 --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSTASKS%003AFUNCTION_NAME.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "FUNCTION_NAME" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "1", + "<3>": "Function Name", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "L", + "<10>": "25", + "<11>": "", + "<12>": "VARCHAR(255)", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:33 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\u0001\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000P\u0000\u0000\u0000ÀCÀ*‹\u0001\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000J)\u0000C€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0001n@ÀC)¸JG\u0000C€\u0006n@ÀC)¸\u0004L#25\u0000\u0000\u0000\u0000\u00002\u00004\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0002€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\u0001\u0000ccÀC\u001b@t\u0000\u0000" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSTASKS%003AFUNCTION_PARAMETERS.json b/SYSPROG/APPROW/DICT.SYSTASKS%003AFUNCTION_PARAMETERS.json new file mode 100644 index 0000000..348d6f5 --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSTASKS%003AFUNCTION_PARAMETERS.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "FUNCTION_PARAMETERS" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "2", + "<3>": "Function Parameters", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "L", + "<10>": "25", + "<11>": "", + "<12>": "VARCHAR(255)", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:36 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\u0002\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000P\u0000\u0000\u0000ÀCÀ*‹\u0002\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000J)\u0000C€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0001n@ÀC)¸JG\u0000C€\u0006n@ÀC)¸\u0004L#25\u0000\u0000\u0000\u0000\u00002\u00004\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0002€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\u0002\u0000ccÀC\u001b@t\u0000\u0000" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSTASKS%003APARAMETER_COUNT.json b/SYSPROG/APPROW/DICT.SYSTASKS%003APARAMETER_COUNT.json new file mode 100644 index 0000000..0270a39 --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSTASKS%003APARAMETER_COUNT.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PARAMETER_COUNT" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "3", + "<3>": "Parameter Count", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "MD0,", + "<8>": "", + "<9>": "R", + "<10>": "5", + "<11>": "(MD0)", + "<12>": "INTEGER", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:25 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\u0003\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000Y\u0000\u0000\u0000ÀCÀ*‹\u0003\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000ÀCÀC€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0007n@ÀC)¸ÀCÀC€\u000bn@ÀC)¸\u0005MD0,P\u0003R#5\u0003MD0\u0000\u0000\u0000\u0000\u00002\u0000=\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0006€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\u0003\u0000ccÀC\u001b@t\u0004MD0,\u0005(MD0)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSTASKS%003AREMOTE_SELECT.json b/SYSPROG/APPROW/DICT.SYSTASKS%003AREMOTE_SELECT.json new file mode 100644 index 0000000..aa7abed --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSTASKS%003AREMOTE_SELECT.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "REMOTE_SELECT" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "9", + "<3>": "Remote Select", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "B", + "<8>": "", + "<9>": "L", + "<10>": "3", + "<11>": "(B)", + "<12>": "BOOLEAN", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:22 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\t\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000Q\u0000\u0000\u0000ÀCÀ*‹\t\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000ÀCÀC€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0003n@ÀC)¸JG\u0000C€\u0007n@ÀC)¸\u0001B\u0003L#3\u0000\u0000\u0000\u0000\u00002\u00008\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0003€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\t\u0000ccÀC\u001b@t\u0001B\u0003(B)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSTASKS%003ARESULTS.json b/SYSPROG/APPROW/DICT.SYSTASKS%003ARESULTS.json new file mode 100644 index 0000000..5c402e2 --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSTASKS%003ARESULTS.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RESULTS" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "7", + "<3>": "Results", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "L", + "<10>": "25", + "<11>": "", + "<12>": "VARCHAR(255)", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:43 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\u0007\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000P\u0000\u0000\u0000ÀCÀ*‹\u0007\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000J)\u0000C€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0001n@ÀC)¸JG\u0000C€\u0006n@ÀC)¸\u0004L#25\u0000\u0000\u0000\u0000\u00002\u00004\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0002€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\u0007\u0000ccÀC\u001b@t\u0000\u0000" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSTASKS%003ASTARTED.json b/SYSPROG/APPROW/DICT.SYSTASKS%003ASTARTED.json new file mode 100644 index 0000000..3cfead2 --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSTASKS%003ASTARTED.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "STARTED" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "5", + "<3>": "Started", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "DT", + "<8>": "", + "<9>": "R", + "<10>": "21", + "<11>": "(DT)", + "<12>": "DATETIME", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:32 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\u0005\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000S\u0000\u0000\u0000ÀCÀ*‹\u0005\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000ÀCÀC€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0004n@ÀC)¸JG\u0000C€\tn@ÀC)¸\u0002DT\u0004R#21\u0000\u0000\u0000\u0000\u00002\u0000:\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0004€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\u0005\u0000ccÀC\u001b@t\u0002DT\u0004(DT)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSTASKS%003ASTATUS.json b/SYSPROG/APPROW/DICT.SYSTASKS%003ASTATUS.json new file mode 100644 index 0000000..0ea097e --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSTASKS%003ASTATUS.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "STATUS" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "4", + "<3>": "Status", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "L", + "<10>": "25", + "<11>": "", + "<12>": "VARCHAR(255)", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:40 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\u0004\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000P\u0000\u0000\u0000ÀCÀ*‹\u0004\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000J)\u0000C€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0001n@ÀC)¸JG\u0000C€\u0006n@ÀC)¸\u0004L#25\u0000\u0000\u0000\u0000\u00002\u00004\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0002€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\u0004\u0000ccÀC\u001b@t\u0000\u0000" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/DICT.SYSTASKS%003ASUBMITTED.json b/SYSPROG/APPROW/DICT.SYSTASKS%003ASUBMITTED.json new file mode 100644 index 0000000..7acb874 --- /dev/null +++ b/SYSPROG/APPROW/DICT.SYSTASKS%003ASUBMITTED.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SUBMITTED" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "8", + "<3>": "Submitted", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "DT", + "<8>": "", + "<9>": "R", + "<10>": "21", + "<11>": "(DT)", + "<12>": "DATETIME", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "09:42:32 09 JAN 2024", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u001a\u0000\u001a\u0000\u0000\u0000ÀCÀ*‹\b\u0000cc\u001e@ÀC)¸\u0000\u0000\u0000\u0000\u0000K\u0000S\u0000\u0000\u0000ÀCÀ*‹\b\u0000cc\u001e@ÀÃfQH!\u0000J?\u0000ÀCÀC€\u0001n@ÀÃdQH3\u0000J;\u0000ÀCÀC€\u0004n@ÀC)¸JG\u0000C€\tn@ÀC)¸\u0002DT\u0004R#21\u0000\u0000\u0000\u0000\u00002\u0000:\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0004€\u0001,\u0007ã\u0003cQG%\u0000tÀ*§‹\b\u0000ccÀC\u001b@t\u0002DT\u0004(DT)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/MD%003AACCOUNT.RESTORE.BFS.json b/SYSPROG/APPROW/MD%003AACCOUNT.RESTORE.BFS.json new file mode 100644 index 0000000..37996b7 --- /dev/null +++ b/SYSPROG/APPROW/MD%003AACCOUNT.RESTORE.BFS.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "ACCOUNT.RESTORE.BFS" + }, + "body": { + "record1": { + "<1>": "V", + "<2>": "1", + "<3>": "RTI_BFS_ACCTRESTORE" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/MD%003AAREV64.json b/SYSPROG/APPROW/MD%003AAREV64.json new file mode 100644 index 0000000..fd47476 --- /dev/null +++ b/SYSPROG/APPROW/MD%003AAREV64.json @@ -0,0 +1,17 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "AREV64" + }, + "body": { + "record1": { + "<1>": "PQ", + "<2>": "HSET_ENV 23,2,1", + "<3>": "PH", + "<4>": "HRUN.AREV32 ", + "<5>": "A2,999", + "<6>": "PR" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/MD%003ACP.json b/SYSPROG/APPROW/MD%003ACP.json new file mode 100644 index 0000000..42ce0aa --- /dev/null +++ b/SYSPROG/APPROW/MD%003ACP.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CP" + }, + "body": { + "record1": { + "<1>": "V", + "<2>": "2", + "<3>": "RCHAR_COPY_RECORD" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/MD%003ACT.json b/SYSPROG/APPROW/MD%003ACT.json new file mode 100644 index 0000000..3afa68a --- /dev/null +++ b/SYSPROG/APPROW/MD%003ACT.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CT" + }, + "body": { + "record1": { + "<1>": "V", + "<2>": "2", + "<3>": "RCHAR_COPY_RECORD" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/MD%003AREPOS.OIWIN..TCOMPILE.json b/SYSPROG/APPROW/MD%003AREPOS.OIWIN..TCOMPILE.json new file mode 100644 index 0000000..4bdf74d --- /dev/null +++ b/SYSPROG/APPROW/MD%003AREPOS.OIWIN..TCOMPILE.json @@ -0,0 +1,17 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "REPOS.OIWIN..TCOMPILE" + }, + "body": { + "record1": { + "<1>": "P", + "<2>": "", + "<3>": "", + "<4>": "", + "<5>": "SYSOBJ", + "<6>": "SRP_EDITOR_TCOMPILE_LISTENER" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/MD%003ASRP_EDITOR_TCOMPILE_REDIRECT.json b/SYSPROG/APPROW/MD%003ASRP_EDITOR_TCOMPILE_REDIRECT.json new file mode 100644 index 0000000..bd23688 --- /dev/null +++ b/SYSPROG/APPROW/MD%003ASRP_EDITOR_TCOMPILE_REDIRECT.json @@ -0,0 +1,17 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_TCOMPILE_REDIRECT" + }, + "body": { + "record1": { + "<1>": "P", + "<2>": "", + "<3>": "", + "<4>": "", + "<5>": "SYSOBJ", + "<6>": "REPOS.OIWIN..TCOMPILE" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/MD%003ASRP_GIT_REDIRECT.json b/SYSPROG/APPROW/MD%003ASRP_GIT_REDIRECT.json new file mode 100644 index 0000000..3c93923 --- /dev/null +++ b/SYSPROG/APPROW/MD%003ASRP_GIT_REDIRECT.json @@ -0,0 +1,17 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_GIT_REDIRECT" + }, + "body": { + "record1": { + "<1>": "P", + "<2>": "", + "<3>": "", + "<4>": "", + "<5>": "SYSOBJ", + "<6>": "REPOSITORY" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ACDN.json b/SYSPROG/APPROW/O4WCODES%003ACDN.json new file mode 100644 index 0000000..14a1011 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ACDN.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CDN" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "", + "<3>": "", + "<4>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ACODES_COUNTRIES.json b/SYSPROG/APPROW/O4WCODES%003ACODES_COUNTRIES.json new file mode 100644 index 0000000..21643dd --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ACODES_COUNTRIES.json @@ -0,0 +1,493 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CODES_COUNTRIES" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "AFGHANISTAN", + "<1,2>": "ALBANIA", + "<1,3>": "ALGERIA", + "<1,4>": "AMERICAN SAMOA", + "<1,5>": "ANDORRA", + "<1,6>": "ANGOLA", + "<1,7>": "ANGUILLA", + "<1,8>": "ANTARCTICA", + "<1,9>": "ANTIGUA AND BARBUDA", + "<1,10>": "ARGENTINA", + "<1,11>": "ARMENIA", + "<1,12>": "ARUBA", + "<1,13>": "AUSTRALIA", + "<1,14>": "AUSTRIA", + "<1,15>": "AZERBAIJAN", + "<1,16>": "BAHAMAS", + "<1,17>": "BAHRAIN", + "<1,18>": "BANGLADESH", + "<1,19>": "BARBADOS", + "<1,20>": "BELARUS", + "<1,21>": "BELGIUM", + "<1,22>": "BELIZE", + "<1,23>": "BENIN", + "<1,24>": "BERMUDA", + "<1,25>": "BHUTAN", + "<1,26>": "BOLIVIA", + "<1,27>": "BOSNIA AND HERZEGOWINA", + "<1,28>": "BOTSWANA", + "<1,29>": "BOUVET ISLAND", + "<1,30>": "BRAZIL", + "<1,31>": "BRITISH INDIAN OCEAN TERRITORY", + "<1,32>": "BRUNEI DARUSSALAM", + "<1,33>": "BULGARIA", + "<1,34>": "BURKINA FASO", + "<1,35>": "BURUNDI", + "<1,36>": "CAMBODIA", + "<1,37>": "CAMEROON", + "<1,38>": "CANADA", + "<1,39>": "CAPE VERDE", + "<1,40>": "CAYMAN ISLANDS", + "<1,41>": "CENTRAL AFRICAN REPUBLIC", + "<1,42>": "CHAD", + "<1,43>": "CHILE", + "<1,44>": "CHINA", + "<1,45>": "CHRISTMAS ISLAND", + "<1,46>": "COCOS (KEELING) ISLANDS", + "<1,47>": "COLOMBIA", + "<1,48>": "COMOROS", + "<1,49>": "CONGO", + "<1,50>": "CONGO, THE DRC", + "<1,51>": "COOK ISLANDS", + "<1,52>": "COSTA RICA", + "<1,53>": "COTE D'IVOIRE", + "<1,54>": "CROATIA (local name: Hrvatska)", + "<1,55>": "CUBA", + "<1,56>": "CYPRUS", + "<1,57>": "CZECH REPUBLIC", + "<1,58>": "DENMARK", + "<1,59>": "DJIBOUTI", + "<1,60>": "DOMINICA", + "<1,61>": "DOMINICAN REPUBLIC", + "<1,62>": "EAST TIMOR", + "<1,63>": "ECUADOR", + "<1,64>": "EGYPT", + "<1,65>": "EL SALVADOR", + "<1,66>": "EQUATORIAL GUINEA", + "<1,67>": "ERITREA", + "<1,68>": "ESTONIA", + "<1,69>": "ETHIOPIA", + "<1,70>": "FALKLAND ISLANDS (MALVINAS)", + "<1,71>": "FAROE ISLANDS", + "<1,72>": "FIJI", + "<1,73>": "FINLAND", + "<1,74>": "FRANCE", + "<1,75>": "FRANCE, METROPOLITAN", + "<1,76>": "FRENCH GUIANA", + "<1,77>": "FRENCH POLYNESIA", + "<1,78>": "FRENCH SOUTHERN TERRITORIES", + "<1,79>": "GABON", + "<1,80>": "GAMBIA", + "<1,81>": "GEORGIA", + "<1,82>": "GERMANY", + "<1,83>": "GHANA", + "<1,84>": "GIBRALTAR", + "<1,85>": "GREECE", + "<1,86>": "GREENLAND", + "<1,87>": "GRENADA", + "<1,88>": "GUADELOUPE", + "<1,89>": "GUAM", + "<1,90>": "GUATEMALA", + "<1,91>": "GUINEA", + "<1,92>": "GUINEA-BISSAU", + "<1,93>": "GUYANA", + "<1,94>": "HAITI", + "<1,95>": "HEARD AND MC DONALD ISLANDS", + "<1,96>": "HOLY SEE (VATICAN CITY STATE)", + "<1,97>": "HONDURAS", + "<1,98>": "HONG KONG", + "<1,99>": "HUNGARY", + "<1,100>": "ICELAND", + "<1,101>": "INDIA", + "<1,102>": "INDONESIA", + "<1,103>": "IRAN (ISLAMIC REPUBLIC OF)", + "<1,104>": "IRAQ", + "<1,105>": "IRELAND", + "<1,106>": "ISRAEL", + "<1,107>": "ITALY", + "<1,108>": "JAMAICA", + "<1,109>": "JAPAN", + "<1,110>": "JORDAN", + "<1,111>": "KAZAKHSTAN", + "<1,112>": "KENYA", + "<1,113>": "KIRIBATI", + "<1,114>": "KOREA, D.P.R.O.", + "<1,115>": "KOREA, REPUBLIC OF", + "<1,116>": "KUWAIT", + "<1,117>": "KYRGYZSTAN", + "<1,118>": "LAOS", + "<1,119>": "LATVIA", + "<1,120>": "LEBANON", + "<1,121>": "LESOTHO", + "<1,122>": "LIBERIA", + "<1,123>": "LIBYAN ARAB JAMAHIRIYA", + "<1,124>": "LIECHTENSTEIN", + "<1,125>": "LITHUANIA", + "<1,126>": "LUXEMBOURG", + "<1,127>": "MACAU", + "<1,128>": "MACEDONIA", + "<1,129>": "MADAGASCAR", + "<1,130>": "MALAWI", + "<1,131>": "MALAYSIA", + "<1,132>": "MALDIVES", + "<1,133>": "MALI", + "<1,134>": "MALTA", + "<1,135>": "MARSHALL ISLANDS", + "<1,136>": "MARTINIQUE", + "<1,137>": "MAURITANIA", + "<1,138>": "MAURITIUS", + "<1,139>": "MAYOTTE", + "<1,140>": "MEXICO", + "<1,141>": "MICRONESIA, FEDERATED STATES OF", + "<1,142>": "MOLDOVA, REPUBLIC OF", + "<1,143>": "MONACO", + "<1,144>": "MONGOLIA", + "<1,145>": "MONTSERRAT", + "<1,146>": "MOROCCO", + "<1,147>": "MOZAMBIQUE", + "<1,148>": "MYANMAR (Burma)", + "<1,149>": "NAMIBIA", + "<1,150>": "NAURU", + "<1,151>": "NEPAL", + "<1,152>": "NETHERLANDS", + "<1,153>": "NETHERLANDS ANTILLES", + "<1,154>": "NEW CALEDONIA", + "<1,155>": "NEW ZEALAND", + "<1,156>": "NICARAGUA", + "<1,157>": "NIGER", + "<1,158>": "NIGERIA", + "<1,159>": "NIUE", + "<1,160>": "NORFOLK ISLAND", + "<1,161>": "NORTHERN MARIANA ISLANDS", + "<1,162>": "NORWAY", + "<1,163>": "OMAN", + "<1,164>": "PAKISTAN", + "<1,165>": "PALAU", + "<1,166>": "PANAMA", + "<1,167>": "PAPUA NEW GUINEA", + "<1,168>": "PARAGUAY", + "<1,169>": "PERU", + "<1,170>": "PHILIPPINES", + "<1,171>": "PITCAIRN", + "<1,172>": "POLAND", + "<1,173>": "PORTUGAL", + "<1,174>": "PUERTO RICO", + "<1,175>": "QATAR", + "<1,176>": "REUNION", + "<1,177>": "ROMANIA", + "<1,178>": "RUSSIAN FEDERATION", + "<1,179>": "RWANDA", + "<1,180>": "SAINT KITTS AND NEVIS", + "<1,181>": "SAINT LUCIA", + "<1,182>": "SAINT VINCENT AND THE GRENADINES", + "<1,183>": "SAMOA", + "<1,184>": "SAN MARINO", + "<1,185>": "SAO TOME AND PRINCIPE", + "<1,186>": "SAUDI ARABIA", + "<1,187>": "SENEGAL", + "<1,188>": "SEYCHELLES", + "<1,189>": "SIERRA LEONE", + "<1,190>": "SINGAPORE", + "<1,191>": "SLOVAKIA (Slovak Republic)", + "<1,192>": "SLOVENIA", + "<1,193>": "SOLOMON ISLANDS", + "<1,194>": "SOMALIA", + "<1,195>": "SOUTH AFRICA", + "<1,196>": "SOUTH GEORGIA AND SOUTH S.S.", + "<1,197>": "SPAIN", + "<1,198>": "SRI LANKA", + "<1,199>": "ST. HELENA", + "<1,200>": "ST. PIERRE AND MIQUELON", + "<1,201>": "SUDAN", + "<1,202>": "SURINAME", + "<1,203>": "SVALBARD AND JAN MAYEN ISLANDS", + "<1,204>": "SWAZILAND", + "<1,205>": "SWEDEN", + "<1,206>": "SWITZERLAND", + "<1,207>": "SYRIAN ARAB REPUBLIC", + "<1,208>": "TAIWAN, PROVINCE OF CHINA", + "<1,209>": "TAJIKISTAN", + "<1,210>": "TANZANIA, UNITED REPUBLIC OF", + "<1,211>": "THAILAND", + "<1,212>": "TOGO", + "<1,213>": "TOKELAU", + "<1,214>": "TONGA", + "<1,215>": "TRINIDAD AND TOBAGO", + "<1,216>": "TUNISIA", + "<1,217>": "TURKEY", + "<1,218>": "TURKMENISTAN", + "<1,219>": "TURKS AND CAICOS ISLANDS", + "<1,220>": "TUVALU", + "<1,221>": "UGANDA", + "<1,222>": "UKRAINE", + "<1,223>": "UNITED ARAB EMIRATES", + "<1,224>": "UNITED KINGDOM", + "<1,225>": "UNITED STATES", + "<1,226>": "U.S. MINOR ISLANDS", + "<1,227>": "URUGUAY", + "<1,228>": "UZBEKISTAN", + "<1,229>": "VANUATU", + "<1,230>": "VENEZUELA", + "<1,231>": "VIET NAM", + "<1,232>": "VIRGIN ISLANDS (BRITISH)", + "<1,233>": "VIRGIN ISLANDS (U.S.)", + "<1,234>": "WALLIS AND FUTUNA ISLANDS", + "<1,235>": "WESTERN SAHARA", + "<1,236>": "YEMEN", + "<1,237>": "Yugoslavia (Serbia and Montenegro)", + "<1,238>": "ZAMBIA", + "<1,239>": "ZIMBABWE" + }, + "<2>": { + "<2,1>": "AF", + "<2,2>": "AL", + "<2,3>": "DZ", + "<2,4>": "AS", + "<2,5>": "AD", + "<2,6>": "AO", + "<2,7>": "AI", + "<2,8>": "AQ", + "<2,9>": "AG", + "<2,10>": "AR", + "<2,11>": "AM", + "<2,12>": "AW", + "<2,13>": "AU", + "<2,14>": "AT", + "<2,15>": "AZ", + "<2,16>": "BS", + "<2,17>": "BH", + "<2,18>": "BD", + "<2,19>": "BB", + "<2,20>": "BY", + "<2,21>": "BE", + "<2,22>": "BZ", + "<2,23>": "BJ", + "<2,24>": "BM", + "<2,25>": "BT", + "<2,26>": "BO", + "<2,27>": "BA", + "<2,28>": "BW", + "<2,29>": "BV", + "<2,30>": "BR", + "<2,31>": "IO", + "<2,32>": "BN", + "<2,33>": "BG", + "<2,34>": "BF", + "<2,35>": "BI", + "<2,36>": "KH", + "<2,37>": "CM", + "<2,38>": "CA", + "<2,39>": "CV", + "<2,40>": "KY", + "<2,41>": "CF", + "<2,42>": "TD", + "<2,43>": "CL", + "<2,44>": "CN", + "<2,45>": "CX", + "<2,46>": "CC", + "<2,47>": "CO", + "<2,48>": "KM", + "<2,49>": "CG", + "<2,50>": "CD", + "<2,51>": "CK", + "<2,52>": "CR", + "<2,53>": "CI", + "<2,54>": "HR", + "<2,55>": "CU", + "<2,56>": "CY", + "<2,57>": "CZ", + "<2,58>": "DK", + "<2,59>": "DJ", + "<2,60>": "DM", + "<2,61>": "DO", + "<2,62>": "TP", + "<2,63>": "EC", + "<2,64>": "EG", + "<2,65>": "SV", + "<2,66>": "GQ", + "<2,67>": "ER", + "<2,68>": "EE", + "<2,69>": "ET", + "<2,70>": "FK", + "<2,71>": "FO", + "<2,72>": "FJ", + "<2,73>": "FI", + "<2,74>": "FR", + "<2,75>": "FX", + "<2,76>": "GF", + "<2,77>": "PF", + "<2,78>": "TF", + "<2,79>": "GA", + "<2,80>": "GM", + "<2,81>": "GE", + "<2,82>": "DE", + "<2,83>": "GH", + "<2,84>": "GI", + "<2,85>": "GR", + "<2,86>": "GL", + "<2,87>": "GD", + "<2,88>": "GP", + "<2,89>": "GU", + "<2,90>": "GT", + "<2,91>": "GN", + "<2,92>": "GW", + "<2,93>": "GY", + "<2,94>": "HT", + "<2,95>": "HM", + "<2,96>": "VA", + "<2,97>": "HN", + "<2,98>": "HK", + "<2,99>": "HU", + "<2,100>": "IS", + "<2,101>": "IN", + "<2,102>": "ID", + "<2,103>": "IR", + "<2,104>": "IQ", + "<2,105>": "IE", + "<2,106>": "IL", + "<2,107>": "IT", + "<2,108>": "JM", + "<2,109>": "JP", + "<2,110>": "JO", + "<2,111>": "KZ", + "<2,112>": "KE", + "<2,113>": "KI", + "<2,114>": "KP", + "<2,115>": "KR", + "<2,116>": "KW", + "<2,117>": "KG", + "<2,118>": "LA", + "<2,119>": "LV", + "<2,120>": "LB", + "<2,121>": "LS", + "<2,122>": "LR", + "<2,123>": "LY", + "<2,124>": "LI", + "<2,125>": "LT", + "<2,126>": "LU", + "<2,127>": "MO", + "<2,128>": "MK", + "<2,129>": "MG", + "<2,130>": "MW", + "<2,131>": "MY", + "<2,132>": "MV", + "<2,133>": "ML", + "<2,134>": "MT", + "<2,135>": "MH", + "<2,136>": "MQ", + "<2,137>": "MR", + "<2,138>": "MU", + "<2,139>": "YT", + "<2,140>": "MX", + "<2,141>": "FM", + "<2,142>": "MD", + "<2,143>": "MC", + "<2,144>": "MN", + "<2,145>": "MS", + "<2,146>": "MA", + "<2,147>": "MZ", + "<2,148>": "MM", + "<2,149>": "NA", + "<2,150>": "NR", + "<2,151>": "NP", + "<2,152>": "NL", + "<2,153>": "AN", + "<2,154>": "NC", + "<2,155>": "NZ", + "<2,156>": "NI", + "<2,157>": "NE", + "<2,158>": "NG", + "<2,159>": "NU", + "<2,160>": "NF", + "<2,161>": "MP", + "<2,162>": "NO", + "<2,163>": "OM", + "<2,164>": "PK", + "<2,165>": "PW", + "<2,166>": "PA", + "<2,167>": "PG", + "<2,168>": "PY", + "<2,169>": "PE", + "<2,170>": "PH", + "<2,171>": "PN", + "<2,172>": "PL", + "<2,173>": "PT", + "<2,174>": "PR", + "<2,175>": "QA", + "<2,176>": "RE", + "<2,177>": "RO", + "<2,178>": "RU", + "<2,179>": "RW", + "<2,180>": "KN", + "<2,181>": "LC", + "<2,182>": "VC", + "<2,183>": "WS", + "<2,184>": "SM", + "<2,185>": "ST", + "<2,186>": "SA", + "<2,187>": "SN", + "<2,188>": "SC", + "<2,189>": "SL", + "<2,190>": "SG", + "<2,191>": "SK", + "<2,192>": "SI", + "<2,193>": "SB", + "<2,194>": "SO", + "<2,195>": "ZA", + "<2,196>": "GS", + "<2,197>": "ES", + "<2,198>": "LK", + "<2,199>": "SH", + "<2,200>": "PM", + "<2,201>": "SD", + "<2,202>": "SR", + "<2,203>": "SJ", + "<2,204>": "SZ", + "<2,205>": "SE", + "<2,206>": "CH", + "<2,207>": "SY", + "<2,208>": "TW", + "<2,209>": "TJ", + "<2,210>": "TZ", + "<2,211>": "TH", + "<2,212>": "TG", + "<2,213>": "TK", + "<2,214>": "TO", + "<2,215>": "TT", + "<2,216>": "TN", + "<2,217>": "TR", + "<2,218>": "TM", + "<2,219>": "TC", + "<2,220>": "TV", + "<2,221>": "UG", + "<2,222>": "UA", + "<2,223>": "AE", + "<2,224>": "GB", + "<2,225>": "US", + "<2,226>": "UM", + "<2,227>": "UY", + "<2,228>": "UZ", + "<2,229>": "VU", + "<2,230>": "VE", + "<2,231>": "VN", + "<2,232>": "VG", + "<2,233>": "VI", + "<2,234>": "WF", + "<2,235>": "EH", + "<2,236>": "YE", + "<2,237>": "YU", + "<2,238>": "ZM", + "<2,239>": "ZW" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ACODES_MF.json b/SYSPROG/APPROW/O4WCODES%003ACODES_MF.json new file mode 100644 index 0000000..536f893 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ACODES_MF.json @@ -0,0 +1,19 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CODES_MF" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "Male", + "<1,2>": "Female" + }, + "<2>": { + "<2,1>": "M", + "<2,2>": "F" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ACODES_ONOFF.json b/SYSPROG/APPROW/O4WCODES%003ACODES_ONOFF.json new file mode 100644 index 0000000..136446f --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ACODES_ONOFF.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CODES_ONOFF" + }, + "body": { + "record1": { + "<1>": " ", + "<2>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ACODES_SHUTDOWN_FLAGS.json b/SYSPROG/APPROW/O4WCODES%003ACODES_SHUTDOWN_FLAGS.json new file mode 100644 index 0000000..2ad582d --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ACODES_SHUTDOWN_FLAGS.json @@ -0,0 +1,19 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CODES_SHUTDOWN_FLAGS" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "Normal (always shutdown engine)", + "<1,2>": "Leave engine running" + }, + "<2>": { + "<2,1>": "1", + "<2,2>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ACODES_STARTUP_FLAGS.json b/SYSPROG/APPROW/O4WCODES%003ACODES_STARTUP_FLAGS.json new file mode 100644 index 0000000..81f1b7b --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ACODES_STARTUP_FLAGS.json @@ -0,0 +1,27 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CODES_STARTUP_FLAGS" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "Normal (start new invisible engine)", + "<1,2>": "Debug (start new visible engine)", + "<1,3>": "Visibly connect to existing engine", + "<1,4>": "Visibly connect to existing or new engine", + "<1,5>": "Invisibly connect to existing engine", + "<1,6>": "Invisibly connect to existing or new engine" + }, + "<2>": { + "<2,1>": "65", + "<2,2>": "1", + "<2,3>": "0", + "<2,4>": "2", + "<2,5>": "64", + "<2,6>": "66" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ACODES_STATES.json b/SYSPROG/APPROW/O4WCODES%003ACODES_STATES.json new file mode 100644 index 0000000..98fda5e --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ACODES_STATES.json @@ -0,0 +1,163 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CODES_STATES" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "Alabama", + "<1,2>": "Alaska", + "<1,3>": "Alberta", + "<1,4>": "American Samoa", + "<1,5>": "Armed Forces Americas (Except Canada)", + "<1,6>": "Armed Forces Europe, Middle East, Africa, and Canada", + "<1,7>": "Armed Forces Pacific", + "<1,8>": "Arizona", + "<1,9>": "Arkansas", + "<1,10>": "British Columbia", + "<1,11>": "California", + "<1,12>": "Colorado", + "<1,13>": "Connecticut", + "<1,14>": "Delaware", + "<1,15>": "District of Columbia", + "<1,16>": "Federated States of Micronesia", + "<1,17>": "Florida", + "<1,18>": "Georgia", + "<1,19>": "Guam", + "<1,20>": "Hawaii", + "<1,21>": "Idaho", + "<1,22>": "Illinois", + "<1,23>": "Indiana", + "<1,24>": "Iowa", + "<1,25>": "Kansas", + "<1,26>": "Kentucky", + "<1,27>": "Louisiana", + "<1,28>": "Maine", + "<1,29>": "Manitoba", + "<1,30>": "Marshall Islands", + "<1,31>": "Maryland", + "<1,32>": "Massachusetts", + "<1,33>": "Michigan", + "<1,34>": "Minnesota", + "<1,35>": "Mississippi", + "<1,36>": "Missouri", + "<1,37>": "Montana", + "<1,38>": "Nebraska", + "<1,39>": "Nevada", + "<1,40>": "New Brunswick", + "<1,41>": "New Foundland", + "<1,42>": "New Hampshire", + "<1,43>": "New Jersey", + "<1,44>": "New Mexico", + "<1,45>": "New York", + "<1,46>": "North Carolina", + "<1,47>": "North Dakota", + "<1,48>": "Northern Mariana Islands", + "<1,49>": "Northern Territories", + "<1,50>": "No State", + "<1,51>": "Ohio", + "<1,52>": "Oklahoma", + "<1,53>": "Ontario", + "<1,54>": "Oregon", + "<1,55>": "Palau", + "<1,56>": "Pennsylvania", + "<1,57>": "Prince Edward Island", + "<1,58>": "Puerto Rico", + "<1,59>": "Quebec", + "<1,60>": "Rhode Island", + "<1,61>": "Saskatchewan", + "<1,62>": "South Carolina", + "<1,63>": "South Dakota", + "<1,64>": "Tennessee", + "<1,65>": "Texas", + "<1,66>": "Utah", + "<1,67>": "Vermont", + "<1,68>": "Virgin Islands", + "<1,69>": "Virginia", + "<1,70>": "Washington", + "<1,71>": "West Virginia", + "<1,72>": "Wisconsin", + "<1,73>": "Wyoming", + "<1,74>": "Yukon" + }, + "<2>": { + "<2,1>": "AL", + "<2,2>": "AK", + "<2,3>": "AB", + "<2,4>": "AS", + "<2,5>": "AA", + "<2,6>": "AE", + "<2,7>": "AP", + "<2,8>": "AZ", + "<2,9>": "AR", + "<2,10>": "BC", + "<2,11>": "CA", + "<2,12>": "CO", + "<2,13>": "CT", + "<2,14>": "DE", + "<2,15>": "DC", + "<2,16>": "FM", + "<2,17>": "FL", + "<2,18>": "GA", + "<2,19>": "GU", + "<2,20>": "HI", + "<2,21>": "ID", + "<2,22>": "IL", + "<2,23>": "IN", + "<2,24>": "IA", + "<2,25>": "KS", + "<2,26>": "KY", + "<2,27>": "LA", + "<2,28>": "ME", + "<2,29>": "MB", + "<2,30>": "MH", + "<2,31>": "MD", + "<2,32>": "MA", + "<2,33>": "MI", + "<2,34>": "MN", + "<2,35>": "MS", + "<2,36>": "MO", + "<2,37>": "MT", + "<2,38>": "NE", + "<2,39>": "NV", + "<2,40>": "NB", + "<2,41>": "NF", + "<2,42>": "NH", + "<2,43>": "NJ", + "<2,44>": "NM", + "<2,45>": "NY", + "<2,46>": "NC", + "<2,47>": "ND", + "<2,48>": "MP", + "<2,49>": "NT", + "<2,50>": "NS", + "<2,51>": "OH", + "<2,52>": "OK", + "<2,53>": "ON", + "<2,54>": "OR", + "<2,55>": "PW", + "<2,56>": "PA", + "<2,57>": "PE", + "<2,58>": "PR", + "<2,59>": "PQ", + "<2,60>": "RI", + "<2,61>": "SK", + "<2,62>": "SC", + "<2,63>": "SD", + "<2,64>": "TN", + "<2,65>": "TX", + "<2,66>": "UT", + "<2,67>": "VT", + "<2,68>": "VI", + "<2,69>": "VA", + "<2,70>": "WA", + "<2,71>": "WV", + "<2,72>": "WI", + "<2,73>": "WY", + "<2,74>": "YU" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ACODES_TF.json b/SYSPROG/APPROW/O4WCODES%003ACODES_TF.json new file mode 100644 index 0000000..2a76d3a --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ACODES_TF.json @@ -0,0 +1,19 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CODES_TF" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "True", + "<1,2>": "False" + }, + "<2>": { + "<2,1>": "T", + "<2,2>": "F" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ACODES_YN.json b/SYSPROG/APPROW/O4WCODES%003ACODES_YN.json new file mode 100644 index 0000000..6fe4de2 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ACODES_YN.json @@ -0,0 +1,19 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CODES_YN" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "Yes", + "<1,2>": "No" + }, + "<2>": { + "<2,1>": "Y", + "<2,2>": "N" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ACORE_LOCAL.json b/SYSPROG/APPROW/O4WCODES%003ACORE_LOCAL.json new file mode 100644 index 0000000..f4e78b2 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ACORE_LOCAL.json @@ -0,0 +1,35 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CORE_LOCAL" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "", + "<1,1,1,2>": "", + "<1,1,1,3>": "" + } + } + }, + "<2>": "2", + "<3>": "../jquery/", + "<4>": "1.7.2/1.8.21", + "<5>": "2", + "<6>": "../jquerym/", + "<7>": "1.1.1", + "<8>": { + "<8,1>": { + "<8,1,1>": { + "<8,1,1,1>": "", + "<8,1,1,2>": "" + } + } + }, + "<9>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ACORE_ONLINE.json b/SYSPROG/APPROW/O4WCODES%003ACORE_ONLINE.json new file mode 100644 index 0000000..fcf1075 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ACORE_ONLINE.json @@ -0,0 +1,40 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CORE_ONLINE" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "", + "<1,1,1,2>": "", + "<1,1,1,3>": "" + } + } + }, + "<2>": "1", + "<3>": "//ajax.googleapis.com/ajax/libs/jqueryui/", + "<4>": "1.7.2/1.8.21", + "<5>": "1", + "<6>": "//code.jquery.com/mobile/", + "<7>": "1.1.1", + "<8>": { + "<8,1>": { + "<8,1,1>": { + "<8,1,1,1>": "", + "<8,1,1,2>": "", + "<8,1,1,5>": "", + "<8,1,1,6>": "" + } + } + }, + "<9>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003AERROR_TRACKING.json b/SYSPROG/APPROW/O4WCODES%003AERROR_TRACKING.json new file mode 100644 index 0000000..dbffd57 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003AERROR_TRACKING.json @@ -0,0 +1,20 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "ERROR_TRACKING" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "E100", + "<1,2>": "E101", + "<1,3>": "E105", + "<1,4>": "E106", + "<1,5>": "E107", + "<1,6>": "L104" + }, + "<2>": "O4WI_LOGERRORS" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003AFORMDESIGNER_LAYOUT.json b/SYSPROG/APPROW/O4WCODES%003AFORMDESIGNER_LAYOUT.json new file mode 100644 index 0000000..9ed7b02 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003AFORMDESIGNER_LAYOUT.json @@ -0,0 +1,134 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "FORMDESIGNER_LAYOUT" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "widget_cnt", + "<1,2>": "widget_grp", + "<1,3>": "widget_frm", + "<1,4>": "widget_lst", + "<1,5>": "widget_desk", + "<1,6>": "widget_mob", + "<1,7>": "widget_google" + }, + "<2>": { + "<2,1>": "Content Layout", + "<2,2>": "Groups", + "<2,3>": "Form Elements", + "<2,4>": "Lists", + "<2,5>": "Desktop Widgets", + "<2,6>": "Mobile Widgets", + "<2,7>": "Graphical Widgets" + }, + "<3>": { + "<3,1>": { + "<3,1,1>": "sec", + "<3,1,2>": "csec", + "<3,1,3>": "tab", + "<3,1,4>": "tbl", + "<3,1,5>": "ctl" + }, + "<3,2>": { + "<3,2,1>": "srdio", + "<3,2,2>": "schk", + "<3,2,3>": "bset" + }, + "<3,3>": { + "<3,3,1>": "hdr", + "<3,3,2>": "rdio", + "<3,3,3>": "chk", + "<3,3,4>": "itxt", + "<3,3,5>": "iarea", + "<3,3,6>": "ifile", + "<3,3,7>": "txt", + "<3,3,8>": "img", + "<3,3,9>": "slider", + "<3,3,10>": "fslct", + "<3,3,11>": "btn" + }, + "<3,4>": { + "<3,4,1>": "ulist", + "<3,4,2>": "olist", + "<3,4,3>": "ilist" + }, + "<3,5>": { + "<3,5,1>": "date", + "<3,5,2>": "time", + "<3,5,3>": "color", + "<3,5,4>": "autocomp" + }, + "<3,6>": { + "<3,6,1>": "mhdr", + "<3,6,2>": "mnavbar", + "<3,6,3>": "mftr", + "<3,6,4>": "grid", + "<3,6,5>": "tgl", + "<3,6,6>": "dlist" + }, + "<3,7>": { + "<3,7,1>": "gmap", + "<3,7,2>": "gmelement", + "<3,7,3>": "gchart", + "<3,7,4>": "gcelement", + "<3,7,5>": "iframe" + } + }, + "<4>": { + "<4,1>": "OI_FORM_MODE", + "<4,2>": "KEY_AND_SEARCH", + "<4,3>": "ENTER_KEY", + "<4,4>": "SEARCH", + "<4,5>": "PICKLIST", + "<4,6>": "ADD_ONLY", + "<4,7>": "ITEM_LISTING" + }, + "<5>": { + "<5,1>": "Custom (Stored Procedure)", + "<5,2>": "OI Main Form Details", + "<5,3>": "Key Entry", + "<5,4>": "Search", + "<5,5>": "Key Entry or Search", + "<5,6>": "Search/Picklist Results", + "<5,7>": "Non-OI Main Form Details", + "<5,8>": "Combined Search and Display" + }, + "<6>": { + "<6,1>": "", + "<6,2>": "oidetails", + "<6,3>": "key", + "<6,4>": "search", + "<6,5>": "keysearch", + "<6,6>": "resultslist", + "<6,7>": "details", + "<6,8>": "search_results_combined" + }, + "<7>": "", + "<8>": { + "<8,1>": "12", + "<8,2>": "22" + }, + "<9>": { + "<9,1>": "2", + "<9,2>": "1" + }, + "<10>": { + "<10,1>": "3", + "<10,2>": "3" + }, + "<11>": "35", + "<12>": "", + "<13>": { + "<13,1>": "#effff9", + "<13,2>": "#effff9" + }, + "<14>": { + "<14,1>": "2", + "<14,2>": "5" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003AIMAGE_PLEASEWAIT2.json b/SYSPROG/APPROW/O4WCODES%003AIMAGE_PLEASEWAIT2.json new file mode 100644 index 0000000..c6c4fa4 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003AIMAGE_PLEASEWAIT2.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "IMAGE_PLEASEWAIT2" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003AJQUERY_MOBILE_URLS.json b/SYSPROG/APPROW/O4WCODES%003AJQUERY_MOBILE_URLS.json new file mode 100644 index 0000000..ca38a21 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003AJQUERY_MOBILE_URLS.json @@ -0,0 +1,21 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "JQUERY_MOBILE_URLS" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "jQuery Site", + "<1,2>": "Local O4W Directory", + "<1,3>": "Custom" + }, + "<2>": { + "<2,1>": "//code.jquery.com/mobile/", + "<2,2>": "../jquerym/", + "<2,3>": "custom" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003AJQUERY_MOBILE_VERSIONS.json b/SYSPROG/APPROW/O4WCODES%003AJQUERY_MOBILE_VERSIONS.json new file mode 100644 index 0000000..8935432 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003AJQUERY_MOBILE_VERSIONS.json @@ -0,0 +1,47 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "JQUERY_MOBILE_VERSIONS" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "1.0", + "<1,2>": "1.0.1", + "<1,3>": "1.1.0", + "<1,4>": "1.1.1", + "<1,5>": "1.2.0", + "<1,6>": "1.4.5", + "<1,7>": "custom" + }, + "<2>": { + "<2,1>": "1.0", + "<2,2>": "1.0.1", + "<2,3>": "1.1.0", + "<2,4>": "1.1.1", + "<2,5>": "1.2.0", + "<2,6>": "1.4.5", + "<2,7>": "custom" + }, + "<3>": { + "<3,1>": "jqmversion10", + "<3,2>": "jqmversion101", + "<3,3>": "jqmversion110", + "<3,4>": "jqmversion111", + "<3,5>": "jqmversion12", + "<3,6>": "jqmversion145", + "<3,7>": "jqmversioncustom" + }, + "<4>": { + "<4,1>": "", + "<4,2>": "", + "<4,3>": "", + "<4,4>": "", + "<4,5>": "", + "<4,6>": "", + "<4,7>": "" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003AJQUERY_MOBILE_VERSIONS_LOCAL.json b/SYSPROG/APPROW/O4WCODES%003AJQUERY_MOBILE_VERSIONS_LOCAL.json new file mode 100644 index 0000000..7339f88 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003AJQUERY_MOBILE_VERSIONS_LOCAL.json @@ -0,0 +1,47 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "JQUERY_MOBILE_VERSIONS_LOCAL" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "1.0", + "<1,2>": "1.0.1", + "<1,3>": "1.1.0", + "<1,4>": "1.1.1", + "<1,5>": "1.2.0", + "<1,6>": "1.4.5", + "<1,7>": "custom" + }, + "<2>": { + "<2,1>": "1.0", + "<2,2>": "1.0.1", + "<2,3>": "1.1.0", + "<2,4>": "1.1.1", + "<2,5>": "1.2.0", + "<2,6>": "1.4.5", + "<2,7>": "custom" + }, + "<3>": { + "<3,1>": "jqmversionl10", + "<3,2>": "jqmversionl101", + "<3,3>": "jqmversionl110", + "<3,4>": "jqmversionl111", + "<3,5>": "jqmversionl12", + "<3,6>": "jqmversionl145", + "<3,7>": "jqmversionlcustom" + }, + "<4>": { + "<4,1>": "", + "<4,2>": "", + "<4,3>": "", + "<4,4>": "", + "<4,5>": "", + "<4,6>": "", + "<4,7>": "" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003AJQUERY_THEMES.json b/SYSPROG/APPROW/O4WCODES%003AJQUERY_THEMES.json new file mode 100644 index 0000000..cf8a212 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003AJQUERY_THEMES.json @@ -0,0 +1,95 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "JQUERY_THEMES" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "Base", + "<1,2>": "UI lightness", + "<1,3>": "UI darkness", + "<1,4>": "Smoothness", + "<1,5>": "Start", + "<1,6>": "Redmond", + "<1,7>": "Sunny", + "<1,8>": "Overcast", + "<1,9>": "Le Frog", + "<1,10>": "Flick", + "<1,11>": "Pepper Grinder", + "<1,12>": "Eggplant", + "<1,13>": "Dark Hive", + "<1,14>": "Cupertino", + "<1,15>": "South Street", + "<1,16>": "Blitzer", + "<1,17>": "Humanity", + "<1,18>": "Hot sneaks", + "<1,19>": "Excite Bike", + "<1,20>": "Vader", + "<1,21>": "Dot Luv", + "<1,22>": "Mint Choc", + "<1,23>": "Black Tie", + "<1,24>": "Trontastic", + "<1,25>": "Swanky Purse", + "<1,26>": "Other (Custom)" + }, + "<2>": { + "<2,1>": "base", + "<2,2>": "ui-lightness", + "<2,3>": "ui-darkness", + "<2,4>": "smoothness", + "<2,5>": "start", + "<2,6>": "redmond", + "<2,7>": "sunny", + "<2,8>": "overcast", + "<2,9>": "le-frog", + "<2,10>": "flick", + "<2,11>": "pepper-grinder", + "<2,12>": "eggplant", + "<2,13>": "dark-hive", + "<2,14>": "cupertino", + "<2,15>": "south-street", + "<2,16>": "blitzer", + "<2,17>": "humanity", + "<2,18>": "hot-sneaks", + "<2,19>": "excite-bike", + "<2,20>": "vader", + "<2,21>": "dot-luv", + "<2,22>": "mint-choc", + "<2,23>": "black-tie", + "<2,24>": "trontastic", + "<2,25>": "swanky-purse", + "<2,26>": "custom" + }, + "<3>": { + "<3,1>": "jqthemebase", + "<3,2>": "jqthemeui-lightness", + "<3,3>": "jqthemeui-darkness", + "<3,4>": "jqthemesmoothness", + "<3,5>": "jqthemestart", + "<3,6>": "jqthemeredmond", + "<3,7>": "jqthemesunny", + "<3,8>": "jqthemeovercast", + "<3,9>": "jqthemele-frog", + "<3,10>": "jqthemeflick", + "<3,11>": "jqthemepepper-grinder", + "<3,12>": "jqthemeeggplant", + "<3,13>": "jqthemedark-hive", + "<3,14>": "jqthemecupertino", + "<3,15>": "jqthemesouth-street", + "<3,16>": "jqthemeblitzer", + "<3,17>": "jqthemehumanity", + "<3,18>": "jqthemehot-sneaks", + "<3,19>": "jqthemeexcite-bike", + "<3,20>": "jqthemevader", + "<3,21>": "jqthemedot-luv", + "<3,22>": "jqthememint-choc", + "<3,23>": "jqthemeblack-tie", + "<3,24>": "jqthemetrontastic", + "<3,25>": "jqthemeswanky-purse", + "<3,26>": "jqthemecustom" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003AJQUERY_THEMES_LOCAL.json b/SYSPROG/APPROW/O4WCODES%003AJQUERY_THEMES_LOCAL.json new file mode 100644 index 0000000..b2b2255 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003AJQUERY_THEMES_LOCAL.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "JQUERY_THEMES_LOCAL" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "Base", + "<1,2>": "UI lightness", + "<1,3>": "UI darkness", + "<1,4>": "Smoothness", + "<1,5>": "Start", + "<1,6>": "Flick", + "<1,7>": "Other (Custom)" + }, + "<2>": { + "<2,1>": "base", + "<2,2>": "ui-lightness", + "<2,3>": "ui-darkness", + "<2,4>": "smoothness", + "<2,5>": "start", + "<2,6>": "flick", + "<2,7>": "custom" + }, + "<3>": { + "<3,1>": "jqthemelcbase", + "<3,2>": "jqthemelcui-lightness", + "<3,3>": "jqthemelcui-darkness", + "<3,4>": "jqthemelcsmoothness", + "<3,5>": "jqthemelcstart", + "<3,6>": "jqthemelcflick", + "<3,7>": "jqthemelccustom" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003AJQUERY_URLS.json b/SYSPROG/APPROW/O4WCODES%003AJQUERY_URLS.json new file mode 100644 index 0000000..5873e9f --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003AJQUERY_URLS.json @@ -0,0 +1,21 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "JQUERY_URLS" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "Google CDN", + "<1,2>": "Local O4W Directory", + "<1,3>": "Custom URL" + }, + "<2>": { + "<2,1>": "//ajax.googleapis.com/ajax/libs/jqueryui/", + "<2,2>": "../jquery/", + "<2,3>": "custom" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003AJQUERY_VERSIONS.json b/SYSPROG/APPROW/O4WCODES%003AJQUERY_VERSIONS.json new file mode 100644 index 0000000..a264a6b --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003AJQUERY_VERSIONS.json @@ -0,0 +1,43 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "JQUERY_VERSIONS" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "1.8.3 with UI 1.9.2", + "<1,2>": "1.11.3 with UI 1.11.4", + "<1,3>": "2.1.4 with UI 1.11.4", + "<1,4>": "2.2.4 with UI 1.12.1", + "<1,5>": "3.2.1 with UI 1.12.1", + "<1,6>": "Other (Please specify as x.x.x/y.y.y)" + }, + "<2>": { + "<2,1>": "1.8.3/1.9.2", + "<2,2>": "1.11.3/1.11.4", + "<2,3>": "2.1.4/1.11.4", + "<2,4>": "2.2.4/1.12.1", + "<2,5>": "3.2.1/1.12.1", + "<2,6>": "custom" + }, + "<3>": { + "<3,1>": "jqversion183", + "<3,2>": "jqversion1103", + "<3,3>": "jqversion204", + "<3,4>": "jqversion224", + "<3,5>": "jqversion321", + "<3,6>": "jqversioncustom" + }, + "<4>": { + "<4,1>": "", + "<4,2>": "", + "<4,3>": "", + "<4,4>": "", + "<4,5>": "", + "<4,6>": "" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003AJQUERY_VERSIONS_LOCAL.json b/SYSPROG/APPROW/O4WCODES%003AJQUERY_VERSIONS_LOCAL.json new file mode 100644 index 0000000..3a1bbd5 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003AJQUERY_VERSIONS_LOCAL.json @@ -0,0 +1,43 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "JQUERY_VERSIONS_LOCAL" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "1.8.3 with UI 1.9.2", + "<1,2>": "1.11.3 with UI 1.11.4", + "<1,3>": "2.1.4 with UI 1.11.4", + "<1,4>": "2.2.4 with UI 1.12.1", + "<1,5>": "3.2.1 with UI 1.12.1", + "<1,6>": "Other (Please specify as x.x.x/y.y.y)" + }, + "<2>": { + "<2,1>": "1.8.3/1.9.2", + "<2,2>": "1.11.3/1.11.4", + "<2,3>": "2.1.4/1.11.4", + "<2,4>": "2.2.4/1.12.1", + "<2,5>": "3.2.1/1.12.1", + "<2,6>": "custom" + }, + "<3>": { + "<3,1>": "jqversionlc183", + "<3,2>": "jqversionlc1113", + "<3,3>": "jqversionlc214", + "<3,4>": "jqversionlc224", + "<3,5>": "jqversionlc321", + "<3,6>": "jqversionlccustom" + }, + "<4>": { + "<4,1>": "", + "<4,2>": "", + "<4,3>": "", + "<4,4>": "", + "<4,5>": "", + "<4,6>": "" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APAGERS.json b/SYSPROG/APPROW/O4WCODES%003APAGERS.json new file mode 100644 index 0000000..c55b6cb --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APAGERS.json @@ -0,0 +1,29 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PAGERS" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "jQuery TableSorter Plugin (Top)", + "<1,2>": "jQuery TableSorter Plugin (Bottom)", + "<1,3>": "Local Pagination (Top)", + "<1,4>": "Local Pagination (Bottom)", + "<1,5>": "Local Pagination w/ Page Numbers (Top)", + "<1,6>": "Local Pagination w/ Page Numbers (Bottom)", + "<1,7>": "None (scroll only)" + }, + "<2>": { + "<2,1>": "O4WI_TABLEPAGERPLUGIN", + "<2,2>": "O4WI_TABLEPAGERPLUGIN*-1", + "<2,3>": "O4WI_TABLEPAGERLOCAL", + "<2,4>": "O4WI_TABLEPAGERLOCAL*-1", + "<2,5>": "O4WI_TABLEPAGERLOCAL2", + "<2,6>": "O4WI_TABLEPAGERLOCAL2*-1", + "<2,7>": "none" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APERMDEFS.json b/SYSPROG/APPROW/O4WCODES%003APERMDEFS.json new file mode 100644 index 0000000..99994a5 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APERMDEFS.json @@ -0,0 +1,34 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PERMDEFS" + }, + "body": { + "record1": { + "<1>": "X", + "<2>": { + "<2,1>": "None", + "<2,2>": "Administrator", + "<2,3>": "Supervisor", + "<2,4>": "Designer", + "<2,5>": "Level 10", + "<2,6>": "Level 20", + "<2,7>": "Level 30", + "<2,8>": "Level 40", + "<2,9>": "Level 50" + }, + "<3>": { + "<3,1>": "", + "<3,2>": "0", + "<3,3>": "1", + "<3,4>": "5", + "<3,5>": "10", + "<3,6>": "20", + "<3,7>": "30", + "<3,8>": "40", + "<3,9>": "50" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_AUTOCOMPLETE.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_AUTOCOMPLETE.json new file mode 100644 index 0000000..79d356b --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_AUTOCOMPLETE.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_AUTOCOMPLETE" + }, + "body": { + "record1": { + "<1>": "../plugins/jquery-autocomplete/jquery.autocomplete.css", + "<2>": "../plugins/jquery-autocomplete/jquery.autocomplete.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_COLORPICKER.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_COLORPICKER.json new file mode 100644 index 0000000..420d9fd --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_COLORPICKER.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_COLORPICKER" + }, + "body": { + "record1": { + "<1>": "../plugins/bgrins-spectrum/spectrum.css", + "<2>": "../plugins/bgrins-spectrum/spectrum.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_COLORPICKER_OLD.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_COLORPICKER_OLD.json new file mode 100644 index 0000000..90476d2 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_COLORPICKER_OLD.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_COLORPICKER_OLD" + }, + "body": { + "record1": { + "<1>": "../plugins/color-picker/colorPicker.css", + "<2>": "../plugins/color-picker/jquery.colorPicker.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_COMBOBOX.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_COMBOBOX.json new file mode 100644 index 0000000..c84524d --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_COMBOBOX.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_COMBOBOX" + }, + "body": { + "record1": { + "<1>": "../plugins/select2-develop/dist/css/select2.min.css", + "<2>": "../plugins/select2-develop/dist/js/select2.min.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_CORNERS.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_CORNERS.json new file mode 100644 index 0000000..9d6886d --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_CORNERS.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_CORNERS" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "../plugins/corner/jquery.corner.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_DATEPICKER.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_DATEPICKER.json new file mode 100644 index 0000000..5b2efc2 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_DATEPICKER.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_DATEPICKER" + }, + "body": { + "record1": { + "<1>": "../plugins/date_input/date_input.css", + "<2>": "../plugins/date_input/jquery.date_input.min.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_GOOGLEVIS.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_GOOGLEVIS.json new file mode 100644 index 0000000..5fa4253 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_GOOGLEVIS.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_GOOGLEVIS" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "//www.gstatic.com/charts/loader.js", + "<3>": "google.charts.load(\"current\", {'packages': [\"corechart\",\"gauge\",\"table\",\"geochart\",\"intensitymap\"] %1%});" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_GPSCOORDINATES.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_GPSCOORDINATES.json new file mode 100644 index 0000000..f102331 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_GPSCOORDINATES.json @@ -0,0 +1,16 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_GPSCOORDINATES" + }, + "body": { + "record1": { + "<1>": "", + "<2>": { + "<2,1>": "http://maps.googleapis.com/maps/api/js?sensor=true", + "<2,2>": "../plugins/jquery-gpscoordinates-1.0/jquery.gpscoordinates.js" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_HISTORY.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_HISTORY.json new file mode 100644 index 0000000..af40ceb --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_HISTORY.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_HISTORY" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "../plugins/jquery.address-1.6/jquery.address-1.6.js", + "<3>": "$(function(){o4wbDoHistory = 1; $.address.change(function(event){o4wHandleHistory(\"change\", event);});});" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_HMENU.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_HMENU.json new file mode 100644 index 0000000..9250efc --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_HMENU.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_HMENU" + }, + "body": { + "record1": { + "<1>": "../plugins/clickmenu/clickmenu.css", + "<2>": "../plugins/clickmenu/jquery.clickmenu.pack.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_JQPLOT.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_JQPLOT.json new file mode 100644 index 0000000..85e6419 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_JQPLOT.json @@ -0,0 +1,30 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_JQPLOT" + }, + "body": { + "record1": { + "<1>": "../plugins/jqplot/jquery.jqplot.min.css", + "<2>": { + "<2,1>": "../plugins/jqplot/jquery.jqplot.min.js", + "<2,2>": "../plugins/jqplot/plugins/jqplot.categoryAxisRenderer.min.js", + "<2,3>": "../plugins/jqplot/plugins/jqplot.barRenderer.min.js", + "<2,4>": "../plugins/jqplot/plugins/jqplot.highlighter.min.js", + "<2,5>": "../plugins/jqplot/plugins/jqplot.pieRenderer.min.js", + "<2,6>": "../plugins/jqplot/plugins/jqplot.cursor.min.js" + }, + "<3>": "", + "<4>": { + "<4,1>": { + "<4,1,1>": { + "<4,1,1,1>": "" + } + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_SMENU.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_SMENU.json new file mode 100644 index 0000000..e7e1b93 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_SMENU.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_SMENU" + }, + "body": { + "record1": { + "<1>": "../plugins/slicknav/dist/slicknav.min.css", + "<2>": "../plugins/slicknav/dist/jquery.slicknav.min.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_TABLEDND.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_TABLEDND.json new file mode 100644 index 0000000..becd267 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_TABLEDND.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_TABLEDND" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "../plugins/tablednd/js/jquery.tablednd.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_TABLESORTER.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_TABLESORTER.json new file mode 100644 index 0000000..23b0488 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_TABLESORTER.json @@ -0,0 +1,32 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_TABLESORTER" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "../plugins/tablesorter/dist/css/theme.jui.min.css", + "<1,2>": "../plugins/tablesorter/dist/css/jquery.tablesorter.pager.min.css" + }, + "<2>": { + "<2,1>": "../plugins/tablesorter/dist/js/jquery.tablesorter.min.js", + "<2,2>": "../plugins/tablesorter/dist/js/widgets/widget-pager.min.js", + "<2,3>": "../plugins/tablesorter/dist/js/parsers/parser-date.min.js", + "<2,4>": "../plugins/tablesorter/dist/js/parsers/parser-date-range.min.js", + "<2,5>": "../plugins/tablesorter/dist/js/parsers/parser-date-two-digit-year.min.js", + "<2,6>": "../plugins/tablesorter/dist/js/parsers/parser-input-select.min.js", + "<2,7>": "../plugins/tablesorter/dist/js/widgets/widget-storage.min.js", + "<2,8>": "../plugins/tablesorter/dist/js/widgets/widget-uitheme.min.js", + "<2,9>": "../plugins/tablesorter/dist/js/widgets/widget-columns.min.js", + "<2,10>": "../plugins/tablesorter/dist/js/widgets/widget-filter.min.js", + "<2,11>": "../plugins/tablesorter/dist/js/widgets/widget-scroller.min.js", + "<2,12>": "../plugins/tablesorter/dist/js/widgets/widget-stickyHeaders.min.js", + "<2,13>": "../plugins/tablesorter/revcustom/widget-resizable.js", + "<2,14>": "" + }, + "<3>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_THEMESWITCHER.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_THEMESWITCHER.json new file mode 100644 index 0000000..33a0883 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_THEMESWITCHER.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_THEMESWITCHER" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "../plugins/Super-Theme-Switcher-master/jquery.themeswitcher.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_TIMEPICKER.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_TIMEPICKER.json new file mode 100644 index 0000000..85b4ef2 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_TIMEPICKER.json @@ -0,0 +1,16 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_TIMEPICKER" + }, + "body": { + "record1": { + "<1>": "../plugins/timeentry/jquery.timeentry.css", + "<2>": { + "<2,1>": "../plugins/timeentry/jquery.plugin.min.js", + "<2,2>": "../plugins/timeentry/jquery.timeentry.min.js" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_TMENU.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_TMENU.json new file mode 100644 index 0000000..5ec85c0 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_TMENU.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_TMENU" + }, + "body": { + "record1": { + "<1>": "../plugins/treeview/jquery.treeview.css", + "<2>": "../plugins/treeview/jquery.treeview.pack.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003APLUGIN_VMENU.json b/SYSPROG/APPROW/O4WCODES%003APLUGIN_VMENU.json new file mode 100644 index 0000000..3b8ab41 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003APLUGIN_VMENU.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PLUGIN_VMENU" + }, + "body": { + "record1": { + "<1>": "../plugins/ddmenu/css/ddmenu.css", + "<2>": "../plugins/ddmenu/js/jquery.bdc.ddmenu.min.js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCODES%003ASTORED_PROC_DEFAULT.json b/SYSPROG/APPROW/O4WCODES%003ASTORED_PROC_DEFAULT.json new file mode 100644 index 0000000..897c240 --- /dev/null +++ b/SYSPROG/APPROW/O4WCODES%003ASTORED_PROC_DEFAULT.json @@ -0,0 +1,20 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "STORED_PROC_DEFAULT" + }, + "body": { + "record1": { + "<1>": "SUBROUTINE %NAME%(CTRLENTID, EVENT, REQUEST)", + "<2>": "$INSERT O4WCOMMON", + "<3>": "$INSERT O4WEQUATES", + "<4>": "", + "<5>": "BEGIN CASE", + "<6>": "\tCASE EVENT _EQC \"CREATE\"", + "<7>": "END CASE", + "<8>": "", + "<9>": "RETURN 0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_94.json b/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_94.json new file mode 100644 index 0000000..0f01f7c --- /dev/null +++ b/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_94.json @@ -0,0 +1,188 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_O4W_94" + }, + "body": { + "record1": { + "<1>": "1.5", + "<2>": "16229", + "<3>": "", + "<4>": "", + "<5>": "O4WI_AUTHORIZE", + "<6>": "", + "<7>": "O4WI_FILTER", + "<8>": "", + "<9>": "O4WI_LOCKHANDLER", + "<10>": { + "<10,1>": { + "<10,1,1>": { + "<10,1,1,1>": "", + "<10,1,1,2>": "", + "<10,1,1,3>": "" + } + } + }, + "<11>": { + "<11,1>": { + "<11,1,1>": { + "<11,1,1,1>": "", + "<11,1,1,2>": "", + "<11,1,1,3>": "", + "<11,1,1,4>": "" + } + } + }, + "<12>": "1", + "<13>": "", + "<14>": "", + "<15>": "O4WTEMP", + "<16>": "O4WCACHE", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "O4W\\TEMPLATES\\defaulttmpl.htm", + "<21>": "O4W\\TEMPLATES\\mobiledefaulttmpl.htm", + "<22>": "O4W\\TEMPLATES", + "<23>": "1", + "<24>": "", + "<25>": "1", + "<26>": "1", + "<27>": "200", + "<28>": "400", + "<29>": "", + "<30>": { + "<30,1>": "CODES_STATES", + "<30,2>": "CODES_COUNTRIES", + "<30,3>": "CODES_TF", + "<30,4>": "CODES_ONOFF", + "<30,5>": "CODES_YN", + "<30,6>": "CODES_MF" + }, + "<31>": { + "<31,1>": "States", + "<31,2>": "Countries", + "<31,3>": "True/False", + "<31,4>": "Plain Checkbox", + "<31,5>": "Yes/No", + "<31,6>": "Male/Female" + }, + "<32>": "0", + "<33>": "", + "<34>": "", + "<35>": "1", + "<36>": "1", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": { + "<40,1>": "msie", + "<40,2>": "mozilla", + "<40,3>": "chrome", + "<40,4>": "safari", + "<40,5>": "opera" + }, + "<41>": { + "<41,1>": "Internet Explorer", + "<41,2>": "Firefox", + "<41,3>": "Google Chrome", + "<41,4>": "Safari", + "<41,5>": "Opera" + }, + "<42>": { + "<42,1>": "8", + "<42,2>": "", + "<42,3>": "", + "<42,4>": "", + "<42,5>": "" + }, + "<43>": "Your browser or browser version is unsupported. Please switch to Internet Explorer 8, Firefox 3, or Chrome.", + "<44>": "2", + "<45>": { + "<45,1>": { + "<45,1,1>": { + "<45,1,1,1>": "function badBrowser(){", + "<45,1,1,2>": "if($.browser.msie && parseInt($.browser.version) < 8){return true;}", + "<45,1,1,3>": "return false;}", + "<45,1,1,4>": "if(badBrowser()){", + "<45,1,1,5>": "$(function(){", + "<45,1,1,6>": "$(\"
Your browser or browser version is unsupported. Please switch to Internet Explorer 8, Firefox 3, or Chrome.
\")", + "<45,1,1,7>": ".css({", + "<45,1,1,8>": "backgroundColor: '#fcfdde',", + "<45,1,1,9>": "'width': '100%',", + "<45,1,1,10>": "'border-top': 'solid 1px #000',", + "<45,1,1,11>": "'border-bottom': 'solid 1px #000',", + "<45,1,1,12>": "'text-align': 'center',", + "<45,1,1,13>": "padding:'5px 0px 15px 0px'", + "<45,1,1,14>": "})", + "<45,1,1,15>": ".prependTo(\"body\");", + "<45,1,1,16>": "alert(\"Your browser or browser version is unsupported. Please switch to Internet Explorer 8, Firefox 3, or Chrome.\");", + "<45,1,1,17>": "})};" + } + } + }, + "<46>": { + "<46,1>": { + "<46,1,1>": { + "<46,1,1,1>": "" + } + } + }, + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "10", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "0", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "1", + "<61>": "//ajax.googleapis.com/ajax/libs/jqueryui/", + "<62>": "1.7.2/1.8.21", + "<63>": "Smoothness", + "<64>": "", + "<65>": "O4WI_TABLEPAGERPLUGIN", + "<66>": "", + "<67>": "", + "<68>": "", + "<69>": "", + "<70>": "1", + "<71>": "//code.jquery.com/mobile/", + "<72>": "1.2.0", + "<73>": { + "<73,1>": { + "<73,1,1>": { + "<73,1,1,1>": "", + "<73,1,1,2>": "", + "<73,1,1,3>": "", + "<73,1,1,4>": "" + } + } + }, + "<74>": { + "<74,1>": { + "<74,1,1>": { + "<74,1,1,1>": "", + "<74,1,1,2>": "", + "<74,1,1,3>": "", + "<74,1,1,4>": "" + } + } + }, + "<75>": "1.7.2", + "<76>": "1", + "<77>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_BACKUP.json b/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_BACKUP.json new file mode 100644 index 0000000..826223c --- /dev/null +++ b/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_BACKUP.json @@ -0,0 +1,167 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_O4W_BACKUP" + }, + "body": { + "record1": { + "<1>": "2.0", + "<2>": "19714", + "<3>": "", + "<4>": "", + "<5>": "O4WI_AUTHORIZE", + "<6>": "", + "<7>": "O4WI_FILTER", + "<8>": "", + "<9>": "O4WI_LOCKHANDLER", + "<10>": { + "<10,1>": { + "<10,1,1>": { + "<10,1,1,1>": "", + "<10,1,1,2>": "", + "<10,1,1,3>": "" + } + } + }, + "<11>": { + "<11,1>": { + "<11,1,1>": { + "<11,1,1,1>": "", + "<11,1,1,2>": "", + "<11,1,1,3>": "", + "<11,1,1,4>": "", + "<11,1,1,5>": "" + } + } + }, + "<12>": "0", + "<13>": "", + "<14>": "", + "<15>": "O4WTEMP", + "<16>": "O4WCACHE", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "O4W\\TEMPLATES\\DEFAULTTMPL.HTM", + "<21>": "O4W\\TEMPLATES\\m_defaulttmpl.HTM", + "<22>": "O4W\\TEMPLATES", + "<23>": "1", + "<24>": "", + "<25>": "1", + "<26>": "1", + "<27>": "600", + "<28>": "800", + "<29>": "", + "<30>": { + "<30,1>": "CODES_STATES", + "<30,2>": "CODES_COUNTRIES", + "<30,3>": "CODES_TF", + "<30,4>": "CODES_ONOFF", + "<30,5>": "CODES_YN", + "<30,6>": "CODES_MF" + }, + "<31>": { + "<31,1>": "States", + "<31,2>": "Countries", + "<31,3>": "True/False", + "<31,4>": "Plain Checkbox", + "<31,5>": "Yes/No", + "<31,6>": "Male/Female" + }, + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "1", + "<36>": "1", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": { + "<40,1>": "msie", + "<40,2>": "mozilla", + "<40,3>": "chrome", + "<40,4>": "safari", + "<40,5>": "opera" + }, + "<41>": { + "<41,1>": "Internet Explorer", + "<41,2>": "Firefox", + "<41,3>": "Google Chrome", + "<41,4>": "Safari", + "<41,5>": "Opera" + }, + "<42>": { + "<42,1>": "", + "<42,2>": "", + "<42,3>": "", + "<42,4>": "", + "<42,5>": "" + }, + "<43>": "", + "<44>": "0", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "10", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "0", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "2.5", + "<61>": "../jquery/", + "<62>": "3.2.1/1.12.1", + "<63>": "start", + "<64>": "", + "<65>": "O4WI_TABLEPAGERPLUGIN*-1", + "<66>": "", + "<67>": "", + "<68>": "", + "<69>": "", + "<70>": "2", + "<71>": "//code.jquery.com/mobile/", + "<72>": "1.4.5", + "<73>": { + "<73,1>": { + "<73,1,1>": { + "<73,1,1,1>": "", + "<73,1,1,2>": "", + "<73,1,1,3>": "", + "<73,1,1,4>": "" + } + } + }, + "<74>": { + "<74,1>": { + "<74,1,1>": { + "<74,1,1,1>": "", + "<74,1,1,2>": "", + "<74,1,1,3>": "", + "<74,1,1,4>": "", + "<74,1,1,5>": "" + } + } + }, + "<75>": "2.1.4", + "<76>": "", + "<77>": "", + "<78>": "", + "<79>": "", + "<80>": "", + "<81>": "/", + "<82>": "0", + "<83>": "1", + "<84>": "", + "<85>": "0", + "<86>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_BACKUP_ONLINE.json b/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_BACKUP_ONLINE.json new file mode 100644 index 0000000..c9af297 --- /dev/null +++ b/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_BACKUP_ONLINE.json @@ -0,0 +1,167 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_O4W_BACKUP_ONLINE" + }, + "body": { + "record1": { + "<1>": "2.0", + "<2>": "19714", + "<3>": "", + "<4>": "", + "<5>": "O4WI_AUTHORIZE", + "<6>": "", + "<7>": "O4WI_FILTER", + "<8>": "", + "<9>": "O4WI_LOCKHANDLER", + "<10>": { + "<10,1>": { + "<10,1,1>": { + "<10,1,1,1>": "", + "<10,1,1,2>": "", + "<10,1,1,3>": "" + } + } + }, + "<11>": { + "<11,1>": { + "<11,1,1>": { + "<11,1,1,1>": "", + "<11,1,1,2>": "", + "<11,1,1,3>": "", + "<11,1,1,4>": "", + "<11,1,1,5>": "" + } + } + }, + "<12>": "0", + "<13>": "", + "<14>": "", + "<15>": "O4WTEMP", + "<16>": "O4WCACHE", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "O4W\\TEMPLATES\\DEFAULTTMPL.HTM", + "<21>": "O4W\\TEMPLATES\\m_defaulttmpl.HTM", + "<22>": "O4W\\TEMPLATES", + "<23>": "1", + "<24>": "", + "<25>": "1", + "<26>": "1", + "<27>": "600", + "<28>": "800", + "<29>": "", + "<30>": { + "<30,1>": "CODES_STATES", + "<30,2>": "CODES_COUNTRIES", + "<30,3>": "CODES_TF", + "<30,4>": "CODES_ONOFF", + "<30,5>": "CODES_YN", + "<30,6>": "CODES_MF" + }, + "<31>": { + "<31,1>": "States", + "<31,2>": "Countries", + "<31,3>": "True/False", + "<31,4>": "Plain Checkbox", + "<31,5>": "Yes/No", + "<31,6>": "Male/Female" + }, + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "1", + "<36>": "1", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": { + "<40,1>": "msie", + "<40,2>": "mozilla", + "<40,3>": "chrome", + "<40,4>": "safari", + "<40,5>": "opera" + }, + "<41>": { + "<41,1>": "Internet Explorer", + "<41,2>": "Firefox", + "<41,3>": "Google Chrome", + "<41,4>": "Safari", + "<41,5>": "Opera" + }, + "<42>": { + "<42,1>": "", + "<42,2>": "", + "<42,3>": "", + "<42,4>": "", + "<42,5>": "" + }, + "<43>": "", + "<44>": "0", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "10", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "0", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "1", + "<61>": "//ajax.googleapis.com/ajax/libs/jqueryui/", + "<62>": "3.2.1/1.12.1", + "<63>": "start", + "<64>": "", + "<65>": "O4WI_TABLEPAGERPLUGIN*-1", + "<66>": "", + "<67>": "", + "<68>": "", + "<69>": "", + "<70>": "1", + "<71>": "//code.jquery.com/mobile/", + "<72>": "1.4.5", + "<73>": { + "<73,1>": { + "<73,1,1>": { + "<73,1,1,1>": "", + "<73,1,1,2>": "", + "<73,1,1,3>": "", + "<73,1,1,4>": "" + } + } + }, + "<74>": { + "<74,1>": { + "<74,1,1>": { + "<74,1,1,1>": "", + "<74,1,1,2>": "", + "<74,1,1,3>": "", + "<74,1,1,4>": "", + "<74,1,1,5>": "" + } + } + }, + "<75>": "2.1.4", + "<76>": "0", + "<77>": "", + "<78>": "", + "<79>": "", + "<80>": "", + "<81>": "/", + "<82>": "0", + "<83>": "1", + "<84>": "", + "<85>": "0", + "<86>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_PRIOR.json b/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_PRIOR.json new file mode 100644 index 0000000..8de5cef --- /dev/null +++ b/SYSPROG/APPROW/O4WCONFIG%003ACFG_O4W_PRIOR.json @@ -0,0 +1,188 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_O4W_PRIOR" + }, + "body": { + "record1": { + "<1>": "1.5", + "<2>": "16229", + "<3>": "", + "<4>": "", + "<5>": "O4WI_AUTHORIZE", + "<6>": "", + "<7>": "O4WI_FILTER", + "<8>": "", + "<9>": "O4WI_LOCKHANDLER", + "<10>": { + "<10,1>": { + "<10,1,1>": { + "<10,1,1,1>": "", + "<10,1,1,2>": "", + "<10,1,1,3>": "" + } + } + }, + "<11>": { + "<11,1>": { + "<11,1,1>": { + "<11,1,1,1>": "", + "<11,1,1,2>": "", + "<11,1,1,3>": "", + "<11,1,1,4>": "" + } + } + }, + "<12>": "1", + "<13>": "", + "<14>": "", + "<15>": "O4WTEMP", + "<16>": "O4WCACHE", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "O4W\\TEMPLATES\\defaulttmpl.htm", + "<21>": "O4W\\TEMPLATES\\mobiledefaulttmpl.htm", + "<22>": "O4W\\TEMPLATES", + "<23>": "1", + "<24>": "", + "<25>": "1", + "<26>": "1", + "<27>": "200", + "<28>": "400", + "<29>": "", + "<30>": { + "<30,1>": "CODES_STATES", + "<30,2>": "CODES_COUNTRIES", + "<30,3>": "CODES_TF", + "<30,4>": "CODES_ONOFF", + "<30,5>": "CODES_YN", + "<30,6>": "CODES_MF" + }, + "<31>": { + "<31,1>": "States", + "<31,2>": "Countries", + "<31,3>": "True/False", + "<31,4>": "Plain Checkbox", + "<31,5>": "Yes/No", + "<31,6>": "Male/Female" + }, + "<32>": "0", + "<33>": "", + "<34>": "", + "<35>": "1", + "<36>": "1", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": { + "<40,1>": "msie", + "<40,2>": "mozilla", + "<40,3>": "chrome", + "<40,4>": "safari", + "<40,5>": "opera" + }, + "<41>": { + "<41,1>": "Internet Explorer", + "<41,2>": "Firefox", + "<41,3>": "Google Chrome", + "<41,4>": "Safari", + "<41,5>": "Opera" + }, + "<42>": { + "<42,1>": "8", + "<42,2>": "", + "<42,3>": "", + "<42,4>": "", + "<42,5>": "" + }, + "<43>": "Your browser or browser version is unsupported. Please switch to Internet Explorer 8, Firefox 3, or Chrome.", + "<44>": "2", + "<45>": { + "<45,1>": { + "<45,1,1>": { + "<45,1,1,1>": "function badBrowser(){", + "<45,1,1,2>": "if($.browser.msie && parseInt($.browser.version) < 8){return true;}", + "<45,1,1,3>": "return false;}", + "<45,1,1,4>": "if(badBrowser()){", + "<45,1,1,5>": "$(function(){", + "<45,1,1,6>": "$(\"
Your browser or browser version is unsupported. Please switch to Internet Explorer 8, Firefox 3, or Chrome.
\")", + "<45,1,1,7>": ".css({", + "<45,1,1,8>": "backgroundColor: '#fcfdde',", + "<45,1,1,9>": "'width': '100%',", + "<45,1,1,10>": "'border-top': 'solid 1px #000',", + "<45,1,1,11>": "'border-bottom': 'solid 1px #000',", + "<45,1,1,12>": "'text-align': 'center',", + "<45,1,1,13>": "padding:'5px 0px 15px 0px'", + "<45,1,1,14>": "})", + "<45,1,1,15>": ".prependTo(\"body\");", + "<45,1,1,16>": "alert(\"Your browser or browser version is unsupported. Please switch to Internet Explorer 8, Firefox 3, or Chrome.\");", + "<45,1,1,17>": "})};" + } + } + }, + "<46>": { + "<46,1>": { + "<46,1,1>": { + "<46,1,1,1>": "" + } + } + }, + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "10", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "0", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "1", + "<61>": "//ajax.googleapis.com/ajax/libs/jqueryui/", + "<62>": "1.7.2/1.8.21", + "<63>": "Smoothness", + "<64>": "", + "<65>": "O4WI_TABLEPAGERPLUGIN", + "<66>": "", + "<67>": "", + "<68>": "", + "<69>": "", + "<70>": "1", + "<71>": "//code.jquery.com/mobile/", + "<72>": "1.2.0", + "<73>": { + "<73,1>": { + "<73,1,1>": { + "<73,1,1,1>": "", + "<73,1,1,2>": "", + "<73,1,1,3>": "", + "<73,1,1,4>": "" + } + } + }, + "<74>": { + "<74,1>": { + "<74,1,1>": { + "<74,1,1,1>": "", + "<74,1,1,2>": "", + "<74,1,1,3>": "", + "<74,1,1,4>": "" + } + } + }, + "<75>": "1.7.2", + "<76>": "1", + "<77>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSAPPS%003ASYSPROG.json b/SYSPROG/APPROW/SYSAPPS%003ASYSPROG.json new file mode 100644 index 0000000..335feb8 --- /dev/null +++ b/SYSPROG/APPROW/SYSAPPS%003ASYSPROG.json @@ -0,0 +1,41 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": "–¼¶± ¨å„µµ©¬¦¤±¬ª«;–œ–•—Š‚;;", + "<1,1,2>": "öò", + "<1,1,3>": "ëó÷", + "<1,1,4>": "÷" + }, + "<1,2>": "÷ñõòñô;— ³ ©¤±¬ª«å‘ ¦­«ª©ª¢¬ ¶é匫¦ë;–œ–•—Š‚;ᕐ‡‰Œ†;–¼¶± ¨å„µµ©¬¦¤±¬ª«;‘ˆ‰ï‡ŠŠŽ–8’Œ‹’Š—ï÷šƒ‹†‘ŒŠ‹–;;;;—‘ŒšŒ€;õ;;õ;", + "<1,3>": { + "<1,3,1>": ";;è÷;è÷;ô;è÷;è÷;õ;èô;õ;ö÷;;è÷;;;;;;ôõë", + "<1,3,2>": "ðëôñõëôö;" + }, + "<1,4>": "õ", + "<1,5>": "õ;ô", + "<1,6>": { + "<1,6,1>": "õ", + "<1,6,2>": "", + "<1,6,3>": ";ô" + }, + "<1,7>": "", + "<1,8>": "", + "<1,9>": "", + "<1,10>": ";ô", + "<1,11>": "", + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "", + "<1,13,2>": ";" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSDICT%003A%0025SRP_TCLALIAS_TEMPLATE%0025.json b/SYSPROG/APPROW/SYSDICT%003A%0025SRP_TCLALIAS_TEMPLATE%0025.json new file mode 100644 index 0000000..7746f7a --- /dev/null +++ b/SYSPROG/APPROW/SYSDICT%003A%0025SRP_TCLALIAS_TEMPLATE%0025.json @@ -0,0 +1,12 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "%SRP_TCLALIAS_TEMPLATE%" + }, + "body": { + "record1": { + "<1>": "Compile function SRP_TCLALIAS_%1%()\r\n\r\n/***********************************************************************************************\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Name : SRP_TCLALIAS_%1%\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Description: Called by the SRP_TCL_Processer to retrieve the name of the command for which\t\r\n*\t\t\t\t%1% is an alias\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Parameters:\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\tNone\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Returns:\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\tThe command for which %1% is an alias\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* History (Date, Initials, Notes)\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t02/24/05\tKRF\t\tOriginal Programmer\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n************************************************************************************************/\r\n\r\nAlias = \"%2%\"\r\n\r\nReturn Alias" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSDICT%003A%0025SRP_TCLCMD_TEMPLATE%0025.json b/SYSPROG/APPROW/SYSDICT%003A%0025SRP_TCLCMD_TEMPLATE%0025.json new file mode 100644 index 0000000..3cd0d20 --- /dev/null +++ b/SYSPROG/APPROW/SYSDICT%003A%0025SRP_TCLCMD_TEMPLATE%0025.json @@ -0,0 +1,12 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "%SRP_TCLCMD_TEMPLATE%" + }, + "body": { + "record1": { + "<1>": "Compile function SRP_TCLCMD_%1%(Message, Window, Parameters, Options, Status, RetData, HTMLRetData)\r\n\r\n/***********************************************************************************************\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Name : SRP_TCLCMD_%1%\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Description: Called by the SRP_TCL_Processer to execute the %1% command.\t\t\t\t\t\t\r\n*\t\t\t\tLike all SRP TCL commands, this command must support all TCL messages (see \t\t\r\n*\t\t\t\tSRP_TCL_EQUATES insert):\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\tEQU SRP_TCLMSG_SYNTAX$\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\tStatus: \t \t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\tRetData:\t A single-line string showing the command's syntax\t\t\t\t\r\n*\t\t\t\t\tHTMLRetData: A single-line, HTML formatted string showing the command's\t\t\r\n*\t\t\t\t\t\t\t\t syntax\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\tEQU SRP_TCLMSG_HELP$\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\tStatus:\t\t \t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\tRetData:\t An @FM delimited list of descriptive text instructing the user \r\n*\t\t\t\t\t\t\t\t on how to use the command. Each Field in the list represents\t\r\n*\t\t\t\t\t\t\t\t one line of text. There is no limit on number of lines.\t\t\r\n*\t\t\t\t\tHTMLRetData: An HTML formatted string instructing the user on how to use\t\r\n*\t\t\t\t\t\t\t\t the command.\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\tEQU SRP_TCLMSG_PROCESS$\tto 3\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\tStatus: \t The final status of the command's processing, regardless of\t\r\n*\t\t\t\t\t\t\t\t success or failure\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\tRetData:\t An @FM delimited list of data to display to the user in\t\t\r\n*\t\t\t\t\t\t\t\t addition to the status. Each Field in the list represents one \t\r\n*\t\t\t\t\t\t\t\t line of text. There is no limit on number of lines.\t\t\t\r\n*\t\t\t\t\tHTMLRetData: HTML formatted data to display to the user in addition to the\t\r\n*\t\t\t\t\t\t\t\t status.\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\tEQU SRP_TCLMSG_AUTHOR$\tto 4\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\tStatus: \t \t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\tRetData:\t A single-line string showing the commands author\t\t\t\t\r\n*\t\t\t\t\tHTMLRetData: A single-line, HTML formatted string showing the commands\t\t\r\n*\t\t\t\t\t\t\t\t author\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t!!!IMPORTANT!!!\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\tRetData and HTMLRetData are meant to provide 2 ways of displaying the SAME data.\r\n*\t\t\t\tThis way, a variety of user interfaces can display results. RetData is meant for\r\n*\t\t\t\tplain edit controls while HTMLRetData is meant for HTML controls. The only\t\t\r\n*\t\t\t\tdifference between the two is formatting.\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Parameters:\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\tMessage\t\t\t[in] -- Message from SRP_TCL_Processor requesting info or processing\t\t\r\n*\tWindow\t\t\t[in] -- Fully qualified name of the TCL interface window\t\t\t\t\t\r\n*\tParameters\t\t[in] -- @FM delimited list of parameters parsed by the TCL processor. All\t\r\n*\t\t\t\t\t\t\t parameters are forced to UPPERCASE except for those surrounded by\t\r\n*\t\t\t\t\t\t\t quotation marks.\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\tOptions\t\t\t[in] -- A string whose individual characters represent an option; use\t\t\r\n*\t\t\t\t\t\t\t IndexC to see if an option exists in the string\t\t\t\t\t\r\n*\tStatus\t\t\t[out] -- The status text for the command line processing results\t\t\t\r\n*\t\t\t\t\t\t\t Output format is a single line of text\t\t\t\t\t\t\t\t\r\n*\tRetData\t\t\t[out] -- Data returned by the command, e.g., lists or other information\t\t\r\n*\t\t\t\t\t\t\t Output format is an @FM delimited list of data\t\t\t\t\t\t\r\n*\tHTMLRetData\t\t[out] -- Data returned by the command in HTML format\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Returns:\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\tSuccess$ or Failure$\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* History (Date, Initials, Notes)\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t03/23/05\tKRF\t\tAdded support for Options\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t03/16/05\tKRF\t\tAdded support for Author signatures\t\t\t\t\t\t\t\t\t\t\r\n*\t03/12/05\tKRF\t\tAdd HTMLRetData for HTML output support; changed out SYNTAX and HELP are\r\n*\t\t\t\t\t\treturned (via RetData and HTMLRetData instead of Ans)\t\t\t\t\t\r\n*\t01/28/05\tKRF\t\tOriginal Programmer\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n************************************************************************************************/\r\n\r\n* Identifies TCL messages\r\n$insert SRP_TCL_EQUATES\r\n\r\n* Some useful equates\r\nEqu No$ \t\t\t\tto\t0\r\nEqu Yes$ \t\t\t\tto\t1\r\nEqu Failure$\t\t\tto\t0\r\nEqu Success$\t\t\tto\t1\r\nEqu Otherwise$\t\t\tto\t1\r\nEqu CRLF$\t\t\t\tto\t\\0D0A\\\r\n\r\n* Function and subroutine declarations\r\nDeclare subroutine SRP_TCL_Format_Syntax, SRP_TCL_Format_Help\r\nDeclare function Get_Property, IsWindow\r\n\r\n* Init the parameters\r\nIf Assigned(Message) else Message = 0\r\nIf Assigned(Window) AND IsWindow(Get_Property(Window, \"HANDLE\")) else Window = @Window\r\nIf Assigned(Parameters) else Parameters = \"\"\r\nIf Assigned(Options) else Options = \"\"\r\nStatus = \"\"\r\nRetData = \"\"\r\nHTMLRetData = \"\"\r\n\r\n* Process TCL message\r\nBegin Case\r\n\tCase Message EQ SRP_TCLMSG_SYNTAX$\r\n\t\tGoSub SYNTAX\r\n\t\tSRP_TCL_Format_Syntax(Command, Params, RetData, HTMLRetData, Options)\r\n\t\tAns = Success$\r\n\tCase Message EQ SRP_TCLMSG_HELP$\r\n\t\tGoSub HELP\r\n\t\tSRP_TCL_Format_Help(Command, Description, Params, ParamDesc, Remarks, RetData, HTMLRetData, Author, Options, OptionDesc)\r\n\t\tAns = Success$\r\n\tCase Message EQ SRP_TCLMSG_PROCESS$\r\n\t\tGoSub PROCESS\r\n\t\tIf RetData NE \"\" AND HTMLRetData EQ \"\" then\r\n\t\t\tHTMLRetData = RetData\r\n\t\t\tSwap @FM with \"
\" in HTMLRetData\r\n\t\t\tSwap \" \" with \" \" in HTMLRetData\r\n\t\tend\r\n\tCase Message EQ SRP_TCLMSG_AUTHOR$\r\n\t\tGoSub AUTHOR\r\n\t\tAns = Success$\r\n\t\tRetData = Author\r\n\t\tHTMLRetData = Author\r\nEnd Case\r\n\r\n* This ensures that Ans gets assigned, but it defaults to a failure. So set this as requested by the message\r\nIf Assigned(Ans) else Ans = Failure$\r\nReturn Ans\r\n\r\n\r\n/***********************************************************************************************\r\n* AUTHOR\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Set the author of the command here. SRP TCL uses this to differentiate between commands\t\t\r\n* created by SRP Computer Solutions, Inc. and command created by others. For instance, the SRP\t\r\n* Editor automatic update utility will use this to ensure that custom commands are not\t\t\t\r\n* overridden without the user's consent.\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n************************************************************************************************/\r\nAUTHOR:\r\n\r\n\tAuthor = \"%2%\"\r\n\r\nreturn\r\n\r\n\r\n/***********************************************************************************************\r\n* SYNTAX\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Returns a single-line string showing the command's syntax. SRP uses the following standard:\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* 1. First word is always the command and is always UPPERCASE\t\t\t\t\t\t\t\t\t\r\n* 2. Parameters are Title Cased\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* 3. Optional Parameters are incased in [Square Brackets]\t\t\t\t\t\t\t\t\t\t\r\n*\t\tRequired Parameter:\t\tMyParameter\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\tOptional Parameter:\t\t[MyParameter]\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* 4. Parameters showing a list of options are UPPERCASE, enclosed in {French Braces} and\t\t\r\n* separated by |pipes| (no spaces). However, if an option list is optional, it is surrounded \r\n*\t by [Sqaure Braces] instead.\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\tRequired Option List:\t{OPTION1|OPTION2|OPTION3}\t\t\t\t\t\t\t\t\t\t\r\n*\t\tOptional Option List:\t[OPTION1|OPTION2|OPTION3]\t\t\t\t\t\t\t\t\t\t\r\n* 5. Command Options is a single string of single character flags; the TCL parser extracts this\t\r\n*\t automatically and passes it to you via the Options parameter. Still, you should list all\t\r\n*\t possible options below.\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\tExample: \"CLPSX\" (five options)\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* NOTE: The command is already set for you. Just add each parameter to the Params array, and\t\r\n* \tremember to use the above formatting rules for consistency.\tDon't forget the Options\t\r\n*\t\teither.\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n************************************************************************************************/\r\nSYNTAX:\r\n\r\n\t* The command\r\n\tCommand = \"%1%\"\r\n\t\r\n\t* List of parameters\r\n\tParams = \"\"\r\n\tParams<-1> = \"\"\r\n\t\r\n\t* List of options (as a single string)\r\n\tOptions = \"\"\r\n\r\nreturn\r\n\r\n\r\n/***********************************************************************************************\r\n* HELP\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Returns descriptive text instructing the user on how to use the command.\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Note: AUTHOR and SYNTAX are retreived for you. You only have to supply parameter descriptions,\r\n*\t\toption descriptions, and remarks.\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n************************************************************************************************/\r\nHELP:\r\n\r\n\t* Get the syntax and author (this prevents need to retype command and parameters)\r\n\tGoSub AUTHOR\r\n\tGoSub SYNTAX\r\n\t\r\n\t* The description (keep this short, you can elaborate in the remarks section below)\r\n\tDescription = \"\"\r\n\t\r\n\t* List of parameter descriptions (make sure this is in the same order as the Params above)\r\n\t* If you need multiple paragraphs for one parameter, then separate them using @VM\r\n\tParamDesc = \"\"\r\n\tParamDesc<-1> = \"\"\r\n\t\r\n\t* List of option descriptions (make sure this is in the same order as the Options above)\r\n\t* If you need multiple paragraphs for one parameter, then separate them using @VM\r\n\tOptionDesc = \"\"\r\n\tOptionDesc<-1> = \"\"\r\n\t\r\n\t* This is the remarks section. Add as much info as you want. Each field should be treated as\r\n\t* one paragraph (that is, the HTML formatter will do this)\r\n\tRemarks = \"\"\r\n\tRemarks<-1> = \"\"\r\n\t\r\nreturn\r\n\r\n\r\n/***********************************************************************************************\r\n* PROCESS\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* Returns 1 for success, 0 for failure. This GoSub should set ALWAYS set the Status variable\t\r\n* to describe to the user the result of the process, even if there was no error. The RetData\t\r\n* is not required, but if the user needs additional information -- regardless of success or\t\t\r\n* failure -- then RetData is a good place to put it. RetData is always an @FM delimited array,\t\r\n* with each field representing one line of output. Additionally, HTMLRetData can be used to\t\t\r\n* return HTML formatted results. If you leave HTMLRetData blank, then the routine will\t\t\t\r\n* automatically generate it based on the contents of RetData.\t\t\t\t\t\t\t\t\t\r\n*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* !!!IMPORTANT!!!\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\r\n* When successful, be sure to set Ans = Success$\t\t\t\t\t\t\t\t\t\t\t\t\r\n************************************************************************************************/\r\nPROCESS:\r\n\tStatus = \"PROCESS for Command %1% is undefined\"\r\nreturn" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSDICT%003AAT_ID.json b/SYSPROG/APPROW/SYSDICT%003AAT_ID.json new file mode 100644 index 0000000..387385f --- /dev/null +++ b/SYSPROG/APPROW/SYSDICT%003AAT_ID.json @@ -0,0 +1,65 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "AT_ID" + }, + "body": { + "record1": { + "<1>": "F", + "<2>": "0", + "<3>": "Key", + "<4>": "S", + "<5>": "0", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "L", + "<10>": "15", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "1", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "\u0000\u0000\u0000\u0000\u0000\u0014\u0000\u0014\u0000\u0000\u0000ÀCÀ)@ÀC)¸\u0000\u0000\u0000\u0000\u0000E\u0000J\u0000\u0000\u0000ÀCÀ)@ÀÃfQH\u001b\u0000J9\u0000J#\u0000C€\u0001n@ÀÃdQH-\u0000J5\u0000ÀCÀC€\u0001n@ÀC)¸JA\u0000C€\u0006n@ÀC)¸\u0004L#15\u0000\u0000\u0000\u0000\u0000+\u0000-\u0000\u0000\u0000ÀÃgQG%\u0000ÀCÀC€\u0002€\u0001,\u0007ã\u0003cQG%\u0000tÀ)ÀC@t\u0000\u0000", + "<52>": "", + "<53>": "", + "<54>": "11:17:13 16 JUL 1992" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSDICT%003ACOLORTHEME.json b/SYSPROG/APPROW/SYSDICT%003ACOLORTHEME.json new file mode 100644 index 0000000..b7b428c --- /dev/null +++ b/SYSPROG/APPROW/SYSDICT%003ACOLORTHEME.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "COLORTHEME" + }, + "body": { + "record1": { + "<1>": "RLIST", + "<2>": "", + "<3>": "", + "<4>": "COLORTHEME" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSDICT%003ADYNAMIC_SELECTED.json b/SYSPROG/APPROW/SYSDICT%003ADYNAMIC_SELECTED.json new file mode 100644 index 0000000..c038d29 --- /dev/null +++ b/SYSPROG/APPROW/SYSDICT%003ADYNAMIC_SELECTED.json @@ -0,0 +1,75 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "DYNAMIC_SELECTED" + }, + "body": { + "record1": { + "<1>": "S", + "<2>": "", + "<3>": "Dynamic Selected", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": { + "<8,1>": "", + "<8,2>": "cursor = 0", + "<8,3>": "comId3= \"selinto3_\":cursor", + "<8,4>": "common //comId3//rowsPrinted@ ", + "<8,5>": "", + "<8,6>": "@ans = Oconv(rowsPrinted@, \"MD0,\") : ' rows processed'" + }, + "<9>": "L", + "<10>": "25", + "<11>": "", + "<12>": "VARCHAR(255)", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "13:52:00 14 JUN 2022", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": { + "<51,1>": { + "<51,1,1>": "\u0000\u0003\u0000\u0000\u0000T\u0000w\u0000\u0000\u0000ÀÃè:éc\u0007ê€\u0001é\u0006\u0007ÀêÀ€Ÿ\u0001\u0001ÀCŽ\u0001\u0001€\u000bn€\u0010\u0006\u0007èG5\u0000ÀC)¸èfQHB\u0000ÀC)¸JT\u0000èeQHP\u0000ÀCÀC€ n\u0007ÀC)¸\tselinto3_\u0004MD0,\u000f rows processed\u0004L#25DYNAMIC_SELECTED\r\nSYM__MODE,-1,1\r\nCURSOR,-1,2\r\nCOMID3,-1,3\r\nDC0,3,1\r\nROWSPRINTED@,2,1\r\n", + "<51,1,2>": "", + "<51,1,3>": "\u0002\u0001\u00005\u0000\u0002\u0002\u0000B\u0000\u0002\u0003\u0000T\u0000\u0002\u0004\u0000P\u0000\u0007SYM__WU-\u0000\u0002\u0005\u0000P\u0000" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSDICT%003AEXPLODE-ON.json b/SYSPROG/APPROW/SYSDICT%003AEXPLODE-ON.json new file mode 100644 index 0000000..6a327ac --- /dev/null +++ b/SYSPROG/APPROW/SYSDICT%003AEXPLODE-ON.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "EXPLODE-ON" + }, + "body": { + "record1": { + "<1>": "RLIST", + "<2>": "", + "<3>": "", + "<4>": "EXPLODE-ON" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSDICT%003ARLIST_ROWS_PROCESSED.json b/SYSPROG/APPROW/SYSDICT%003ARLIST_ROWS_PROCESSED.json new file mode 100644 index 0000000..cef8b27 --- /dev/null +++ b/SYSPROG/APPROW/SYSDICT%003ARLIST_ROWS_PROCESSED.json @@ -0,0 +1,81 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RLIST_ROWS_PROCESSED" + }, + "body": { + "record1": { + "<1>": "S", + "<2>": "", + "<3>": "RLIST ROWS PROCESSED", + "<4>": "S", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": { + "<8,1>": "text = xlate(\"SYSTEXT\", \"RLIST*PARMS\", 1, 'X')<1, 1>", + "<8,2>": "", + "<8,3>": "If @reccount gt 0 Then", + "<8,4>": " cnt = @reccount", + "<8,5>": "End Else", + "<8,6>": " cnt = \"Zero\"", + "<8,7>": "End", + "<8,8>": "", + "<8,9>": "", + "<8,10>": "swap \"%1%\" with cnt in text", + "<8,11>": "", + "<8,12>": "@ans = text" + }, + "<9>": "L", + "<10>": "20", + "<11>": "", + "<12>": "VARCHAR", + "<13>": "SYSPROG", + "<14>": "", + "<15>": "STRING", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "13:52:00 14 JUN 2022", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": { + "<51,1>": { + "<51,1,1>": "\u0000\u0003\u0000\u0000\u0000a\u0000„\u0000\u0000\u0000ÀÃè:é€\u0001€\td€\u0015c¯ddc\u001e\u0007ÀVcTH-\u0000êÀV\u0007J1\u0000ê€\u0017\u0007€\u001cêé0ÀCé\u0007èGB\u0000ÀC)¸èfQHO\u0000ÀC)¸Ja\u0000èeQH]\u0000ÀCÀC€ n\u0007ÀC)¸\u0007SYSTEXT\u000bRLIST*PARMS\u0001X\u0004Zero\u0003%1%\u0004L#20RLIST_ROWS_PROCESSED\r\nSYM__MODE,-1,1\r\nTEXT,-1,2\r\nCNT,-1,3\r\n", + "<51,1,2>": "", + "<51,1,3>": "\u0002\u0001\u0000-\u0000\u0002\u0002\u00001\u0000\u0002\u0003\u0000B\u0000\u0002\u0004\u0000O\u0000\u0002\u0005\u0000a\u0000\u0002\u0006\u0000]\u0000\u0007SYM__WU:\u0000\u0002\u0007\u0000]\u0000" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSDICT%003AWITHONLY.json b/SYSPROG/APPROW/SYSDICT%003AWITHONLY.json new file mode 100644 index 0000000..82c349b --- /dev/null +++ b/SYSPROG/APPROW/SYSDICT%003AWITHONLY.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "WITHONLY" + }, + "body": { + "record1": { + "<1>": "RLIST", + "<2>": "", + "<3>": "", + "<4>": "WITHONLY" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_ASSEMBLY.json b/SYSPROG/APPROW/SYSENV%003ACFG_ASSEMBLY.json new file mode 100644 index 0000000..2c1a5fb --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_ASSEMBLY.json @@ -0,0 +1,28 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_ASSEMBLY" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "REVELATION4", + "<1,2>": "REVELATION2", + "<1,3>": "DER", + "<1,4>": "IDX", + "<1,5>": "BFS", + "<1,6>": "OIPI" + }, + "<2>": { + "<2,1>": "Revelation4_10_2", + "<2,2>": "Revelation_10_2", + "<2,3>": "RTIderClient_10", + "<2,4>": "idxSets_10", + "<2,5>": "OIBFSHelper_10_2", + "<2,6>": "OIPIUSERCONTROL10_2" + }, + "<3>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_C2OE_MAP.json b/SYSPROG/APPROW/SYSENV%003ACFG_C2OE_MAP.json new file mode 100644 index 0000000..1e51acf --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_C2OE_MAP.json @@ -0,0 +1,272 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_C2OE_MAP" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "ATOM", + "<1,2>": "BOOL", + "<1,3>": "BOOLEAN", + "<1,4>": "CHAR", + "<1,5>": "COLORREF", + "<1,6>": "DWORD", + "<1,7>": "DWORDPTR", + "<1,8>": "HACCEL", + "<1,9>": "HBITMAP", + "<1,10>": "HBRUSH", + "<1,11>": "HCONV", + "<1,12>": "HCURSOR", + "<1,13>": "HDC", + "<1,14>": "HDESK", + "<1,15>": "HENHMETAFILE", + "<1,16>": "HFILE", + "<1,17>": "HFONT", + "<1,18>": "HGDIOBJ", + "<1,19>": "HGLOBAL", + "<1,20>": "HHOOK", + "<1,21>": "HICON", + "<1,22>": "HIMAGELIST", + "<1,23>": "HIMC", + "<1,24>": "HINSTANCE", + "<1,25>": "HINTERNET", + "<1,26>": "HKEY", + "<1,27>": "HKL", + "<1,28>": "HLOCAL", + "<1,29>": "HMENU", + "<1,30>": "HMETAFILE", + "<1,31>": "HMODULE", + "<1,32>": "HMONITOR", + "<1,33>": "HPALETTE", + "<1,34>": "HPEN", + "<1,35>": "HRESULT", + "<1,36>": "HRGN", + "<1,37>": "HRSRC", + "<1,38>": "HTHEME", + "<1,39>": "HWINSTA", + "<1,40>": "HWND", + "<1,41>": "INT32", + "<1,42>": "LANGID", + "<1,43>": "LCID", + "<1,44>": "LCTYPE", + "<1,45>": "LONG32", + "<1,46>": "LPARAM", + "<1,47>": "LPBOOL", + "<1,48>": "LPCOLORREF", + "<1,49>": "LPCSTR", + "<1,50>": "LPCVOID", + "<1,51>": "LPCWSTR", + "<1,52>": "LPDWORD", + "<1,53>": "LPSTR", + "<1,54>": "LPWORD", + "<1,55>": "LRESULT", + "<1,56>": "PBOOL", + "<1,57>": "PBOOLEAN", + "<1,58>": "PBYTE", + "<1,59>": "PCHAR", + "<1,60>": "PCSTR", + "<1,61>": "PCWCH", + "<1,62>": "PCWSTR", + "<1,63>": "PDWORD", + "<1,64>": "PFLOAT", + "<1,65>": "PHANDLE", + "<1,66>": "PHKEY", + "<1,67>": "PINT", + "<1,68>": "PLCID", + "<1,69>": "PLONG", + "<1,70>": "PSHORT", + "<1,71>": "PSTR", + "<1,72>": "PUCHAR", + "<1,73>": "PUINT", + "<1,74>": "PULONG", + "<1,75>": "PUSHORT", + "<1,76>": "PVOID", + "<1,77>": "PWCHAR", + "<1,78>": "PWORD", + "<1,79>": "PWSTR", + "<1,80>": "REGSAM", + "<1,81>": "UCHAR", + "<1,82>": "UINT32", + "<1,83>": "ULONG32", + "<1,84>": "WORD", + "<1,85>": "WPARAM" + }, + "<2>": { + "<2,1>": "USHORT", + "<2,2>": "LONG", + "<2,3>": "LONG", + "<2,4>": "ACHAR", + "<2,5>": "ULONG", + "<2,6>": "ULONG", + "<2,7>": "UINTPTR", + "<2,8>": "HANDLE", + "<2,9>": "HANDLE", + "<2,10>": "HANDLE", + "<2,11>": "HANDLE", + "<2,12>": "HANDLE", + "<2,13>": "HANDLE", + "<2,14>": "HANDLE", + "<2,15>": "HANDLE", + "<2,16>": "HANDLE", + "<2,17>": "HANDLE", + "<2,18>": "HANDLE", + "<2,19>": "HANDLE", + "<2,20>": "HANDLE", + "<2,21>": "HANDLE", + "<2,22>": "HANDLE", + "<2,23>": "HANDLE", + "<2,24>": "HANDLE", + "<2,25>": "LPVOID", + "<2,26>": "HANDLE", + "<2,27>": "HANDLE", + "<2,28>": "HANDLE", + "<2,29>": "HANDLE", + "<2,30>": "HANDLE", + "<2,31>": "HANDLE", + "<2,32>": "HANDLE", + "<2,33>": "HANDLE", + "<2,34>": "HANDLE", + "<2,35>": "LPVOID", + "<2,36>": "HANDLE", + "<2,37>": "HANDLE", + "<2,38>": "HANDLE", + "<2,39>": "HANDLE", + "<2,40>": "HANDLE", + "<2,41>": "INT", + "<2,42>": "USHORT", + "<2,43>": "ULONG", + "<2,44>": "ULONG", + "<2,45>": "LONG", + "<2,46>": "LPVOID", + "<2,47>": "LPLONG", + "<2,48>": "LPULONG", + "<2,49>": "LPASTR", + "<2,50>": "LPVOID", + "<2,51>": "LPWSTR", + "<2,52>": "LPULONG", + "<2,53>": "LPASTR", + "<2,54>": "LPUSHORT", + "<2,55>": "LPVOID", + "<2,56>": "LPLONG", + "<2,57>": "LPLONG", + "<2,58>": "LPBYTE", + "<2,59>": "LPACHAR", + "<2,60>": "LPASTR", + "<2,61>": "LPWCHAR", + "<2,62>": "LPWSTR", + "<2,63>": "LPULONG", + "<2,64>": "LPFLOAT", + "<2,65>": "LPHANDLE", + "<2,66>": "LPHANDLE", + "<2,67>": "LPINT", + "<2,68>": "LPULONG", + "<2,69>": "LPLONG", + "<2,70>": "LPSHORT", + "<2,71>": "LPASTR", + "<2,72>": "LPBYTE", + "<2,73>": "LPUINT", + "<2,74>": "LPULONG", + "<2,75>": "LPUSHORT", + "<2,76>": "LPVOID", + "<2,77>": "LPWCHAR", + "<2,78>": "LPUSHORT", + "<2,79>": "LPWSTR", + "<2,80>": "ULONG", + "<2,81>": "BYTE", + "<2,82>": "UINT", + "<2,83>": "ULONG", + "<2,84>": "USHORT", + "<2,85>": "LPVOID" + }, + "<3>": { + "<3,1>": "USHORT", + "<3,2>": "LONG", + "<3,3>": "LONG", + "<3,4>": "ASTR", + "<3,5>": "ULONG", + "<3,6>": "ULONG", + "<3,7>": "UINTPTR", + "<3,8>": "HANDLE", + "<3,9>": "HANDLE", + "<3,10>": "HANDLE", + "<3,11>": "HANDLE", + "<3,12>": "HANDLE", + "<3,13>": "HANDLE", + "<3,14>": "HANDLE", + "<3,15>": "HANDLE", + "<3,16>": "HANDLE", + "<3,17>": "HANDLE", + "<3,18>": "HANDLE", + "<3,19>": "HANDLE", + "<3,20>": "HANDLE", + "<3,21>": "HANDLE", + "<3,22>": "HANDLE", + "<3,23>": "HANDLE", + "<3,24>": "HANDLE", + "<3,25>": "POINTER", + "<3,26>": "HANDLE", + "<3,27>": "HANDLE", + "<3,28>": "HANDLE", + "<3,29>": "HANDLE", + "<3,30>": "HANDLE", + "<3,31>": "HANDLE", + "<3,32>": "HANDLE", + "<3,33>": "HANDLE", + "<3,34>": "HANDLE", + "<3,35>": "POINTER", + "<3,36>": "HANDLE", + "<3,37>": "HANDLE", + "<3,38>": "HANDLE", + "<3,39>": "HANDLE", + "<3,40>": "HANDLE", + "<3,41>": "INT", + "<3,42>": "USHORT", + "<3,43>": "ULONG", + "<3,44>": "ULONG", + "<3,45>": "LONG", + "<3,46>": "POINTER", + "<3,47>": "LPLONG", + "<3,48>": "LPULONG", + "<3,49>": "LPASTR", + "<3,50>": "POINTER", + "<3,51>": "LPWSTR", + "<3,52>": "LPULONG", + "<3,53>": "LPASTR", + "<3,54>": "LPUSHORT", + "<3,55>": "POINTER", + "<3,56>": "LPLONG", + "<3,57>": "LPLONG", + "<3,58>": "LPBYTE", + "<3,59>": "LPACHAR", + "<3,60>": "LPASTR", + "<3,61>": "LPWCHAR", + "<3,62>": "LPWSTR", + "<3,63>": "LPULONG", + "<3,64>": "LPFLOAT", + "<3,65>": "LPHANDLE", + "<3,66>": "LPHANDLE", + "<3,67>": "LPINT", + "<3,68>": "LPULONG", + "<3,69>": "LPLONG", + "<3,70>": "LPSHORT", + "<3,71>": "LPASTR", + "<3,72>": "LPBYTE", + "<3,73>": "LPUINT", + "<3,74>": "LPULONG", + "<3,75>": "LPUSHORT", + "<3,76>": "POINTER", + "<3,77>": "LPWCHAR", + "<3,78>": "LPUSHORT", + "<3,79>": "LPWSTR", + "<3,80>": "ULONG", + "<3,81>": "BYTE", + "<3,82>": "UINT", + "<3,83>": "ULONG", + "<3,84>": "USHORT", + "<3,85>": "POINTER" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_CTO.json b/SYSPROG/APPROW/SYSENV%003ACFG_CTO.json new file mode 100644 index 0000000..a8b439e --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_CTO.json @@ -0,0 +1,25 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_CTO" + }, + "body": { + "record1": { + "<1>": ".", + "<2>": { + "<2,1>": "18088", + "<2,2>": "", + "<2,3>": "", + "<2,4>": "" + }, + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_DIRECTPRINT.json b/SYSPROG/APPROW/SYSENV%003ACFG_DIRECTPRINT.json new file mode 100644 index 0000000..fc57c33 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_DIRECTPRINT.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_DIRECTPRINT" + }, + "body": { + "record1": { + "<1>": "0", + "<2>": "OIPI_PDF Printer", + "<3>": "TEXT" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_DSBFS.json b/SYSPROG/APPROW/SYSENV%003ACFG_DSBFS.json new file mode 100644 index 0000000..329deee --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_DSBFS.json @@ -0,0 +1,40 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_DSBFS" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "MSSQL", + "<1,2>": "MYSQL", + "<1,3>": "POSTGRES", + "<1,4>": "ORACLE", + "<1,5>": "DB2", + "<1,6>": "AS400SQLLITE" + }, + "<2>": { + "<2,1>": "DSBFS_SCHEMA_MSSQL", + "<2,2>": "DSBFS_SCHEMA_MYSQL", + "<2,3>": "DSBFS_SCHEMA_POSTGRES", + "<2,4>": "DSBFS_SCHEMA_ORACLE", + "<2,5>": "DSBFS_SCHEMA_DB2", + "<2,6>": "DSBFS_SCHEMA_AS400", + "<2,7>": "DSBFS_SCHEMA_SQLLITE" + }, + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": "# This record tells the SQL connector (DSBFS) which sql vendors are supported, and which vendor specific SCHEMA parser to use.", + "<12>": "# If no parser is specified, the connector will use DSBFS_SCHEMA_BASE, which is optimised for MSSQL", + "<13>": "# <1> = vm delimited list of Databases. This is the dropdown in the DSBFS_CONNECTION_WIZARD and CONNECTION_INFO", + "<14>": "# <2> = vm delimited list of associated schema programs. DSBFS will default to DSBFS_SCHEMA_BASE" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_ESERVER.json b/SYSPROG/APPROW/SYSENV%003ACFG_ESERVER.json new file mode 100644 index 0000000..b61b71e --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_ESERVER.json @@ -0,0 +1,16 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_ESERVER" + }, + "body": { + "record1": { + "<1>": "localhost", + "<2>": "18088", + "<3>": "", + "<4>": "18888", + "<5>": "18889" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_EVENTS.json b/SYSPROG/APPROW/SYSENV%003ACFG_EVENTS.json new file mode 100644 index 0000000..c2ad484 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_EVENTS.json @@ -0,0 +1,4228 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_EVENTS" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "ANIMATE", + "<1,2>": { + "<1,2,1>": "OMNIEVENT", + "<1,2,2>": "START", + "<1,2,3>": "STOP", + "<1,2,4>": "INITCONTEXTMENU", + "<1,2,5>": "WINMSG", + "<1,2,6>": "CONTEXTMENU", + "<1,2,7>": "HELP", + "<1,2,8>": "NOTES", + "<1,2,9>": "TIMER", + "<1,2,10>": "DROPFILES", + "<1,2,11>": "BUTTONDOWN", + "<1,2,12>": "BUTTONUP", + "<1,2,13>": "LOSTCAPTURE", + "<1,2,14>": "MOUSEMOVE" + }, + "<1,3>": { + "<1,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<1,3,2>": "", + "<1,3,3>": "", + "<1,3,4>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<1,3,5>": "hWnd,Message,wParam,lParam", + "<1,3,6>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<1,3,7>": "ItemID,MouseX,MouseY", + "<1,3,8>": "", + "<1,3,9>": "", + "<1,3,10>": "FileList,xDrop,yDrop", + "<1,3,11>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<1,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<1,3,13>": "CaptureID", + "<1,3,14>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<1,4>": { + "<1,4,1>": "0", + "<1,4,2>": "0", + "<1,4,3>": "0", + "<1,4,4>": "1", + "<1,4,5>": "0", + "<1,4,6>": "1", + "<1,4,7>": "0", + "<1,4,8>": "0", + "<1,4,9>": "0", + "<1,4,10>": "0", + "<1,4,11>": "0", + "<1,4,12>": "0", + "<1,4,13>": "0", + "<1,4,14>": "0" + }, + "<1,5>": { + "<1,5,1>": "OmniEvent", + "<1,5,2>": "Start", + "<1,5,3>": "Stop", + "<1,5,4>": "InitContextMenu", + "<1,5,5>": "WinMsg", + "<1,5,6>": "ContextMenu", + "<1,5,7>": "Help", + "<1,5,8>": "Notes", + "<1,5,9>": "Timer", + "<1,5,10>": "DropFiles", + "<1,5,11>": "ButtonDown", + "<1,5,12>": "ButtonUp", + "<1,5,13>": "LostCapture", + "<1,5,14>": "MouseMove" + }, + "<1,6>": { + "<1,6,1>": "17", + "<1,6,2>": "24", + "<1,6,3>": "16", + "<1,6,4>": "2", + "<1,6,5>": "16", + "<1,6,6>": "2", + "<1,6,7>": "17", + "<1,6,8>": "17", + "<1,6,9>": "16", + "<1,6,10>": "16", + "<1,6,11>": "16", + "<1,6,12>": "16", + "<1,6,13>": "16", + "<1,6,14>": "16" + } + }, + "<2>": { + "<2,1>": "BITMAP", + "<2,2>": { + "<2,2,1>": "OMNIEVENT", + "<2,2,2>": "INITCONTEXTMENU", + "<2,2,3>": "WINMSG", + "<2,2,4>": "CONTEXTMENU", + "<2,2,5>": "HELP", + "<2,2,6>": "NOTES", + "<2,2,7>": "TIMER", + "<2,2,8>": "CALCULATE", + "<2,2,9>": "DROPFILES", + "<2,2,10>": "BUTTONDOWN", + "<2,2,11>": "BUTTONUP", + "<2,2,12>": "CLICK", + "<2,2,13>": "DBLCLK", + "<2,2,14>": "LOSTCAPTURE", + "<2,2,15>": "MOUSEMOVE" + }, + "<2,3>": { + "<2,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<2,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<2,3,3>": "hWnd,Message,wParam,lParam", + "<2,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<2,3,5>": "ItemID,MouseX,MouseY", + "<2,3,6>": "", + "<2,3,7>": "", + "<2,3,8>": "CtrlColumn", + "<2,3,9>": "FileList,xDrop,yDrop", + "<2,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<2,3,11>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<2,3,12>": "", + "<2,3,13>": "CtrlKey,ShiftKey,MouseButton", + "<2,3,14>": "CaptureID", + "<2,3,15>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<2,4>": { + "<2,4,1>": "0", + "<2,4,2>": "1", + "<2,4,3>": "0", + "<2,4,4>": "1", + "<2,4,5>": "0", + "<2,4,6>": "0", + "<2,4,7>": "0", + "<2,4,8>": "0", + "<2,4,9>": "0", + "<2,4,10>": "0", + "<2,4,11>": "0", + "<2,4,12>": "1", + "<2,4,13>": "0", + "<2,4,14>": "0", + "<2,4,15>": "0" + }, + "<2,5>": { + "<2,5,1>": "OmniEvent", + "<2,5,2>": "InitContextMenu", + "<2,5,3>": "WinMsg", + "<2,5,4>": "ContextMenu", + "<2,5,5>": "Help", + "<2,5,6>": "Notes", + "<2,5,7>": "Timer", + "<2,5,8>": "Calculate", + "<2,5,9>": "DropFiles", + "<2,5,10>": "ButtonDown", + "<2,5,11>": "ButtonUp", + "<2,5,12>": "Click", + "<2,5,13>": "DblClk", + "<2,5,14>": "LostCapture", + "<2,5,15>": "MouseMove" + }, + "<2,6>": { + "<2,6,1>": "17", + "<2,6,2>": "2", + "<2,6,3>": "16", + "<2,6,4>": "2", + "<2,6,5>": "17", + "<2,6,6>": "17", + "<2,6,7>": "16", + "<2,6,8>": "21", + "<2,6,9>": "16", + "<2,6,10>": "16", + "<2,6,11>": "16", + "<2,6,12>": "10", + "<2,6,13>": "16", + "<2,6,14>": "16", + "<2,6,15>": "16" + } + }, + "<3>": { + "<3,1>": "CHECKBMP", + "<3,2>": { + "<3,2,1>": "OMNIEVENT", + "<3,2,2>": "INITCONTEXTMENU", + "<3,2,3>": "WINMSG", + "<3,2,4>": "CALCULATE", + "<3,2,5>": "CONTEXTMENU", + "<3,2,6>": "HELP", + "<3,2,7>": "NOTES", + "<3,2,8>": "TIMER", + "<3,2,9>": "DROPFILES", + "<3,2,10>": "GOTFOCUS", + "<3,2,11>": "LOSTFOCUS", + "<3,2,12>": "BUTTONDOWN", + "<3,2,13>": "BUTTONUP", + "<3,2,14>": "CLICK", + "<3,2,15>": "DBLCLK", + "<3,2,16>": "LOSTCAPTURE", + "<3,2,17>": "MOUSEMOVE" + }, + "<3,3>": { + "<3,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<3,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<3,3,3>": "hWnd,Message,wParam,lParam", + "<3,3,4>": "CtrlColumn", + "<3,3,5>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<3,3,6>": "ItemID,MouseX,MouseY", + "<3,3,7>": "", + "<3,3,8>": "", + "<3,3,9>": "FileList,xDrop,yDrop", + "<3,3,10>": "PrevFocusID", + "<3,3,11>": "Flag,FocusID", + "<3,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<3,3,13>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<3,3,14>": "", + "<3,3,15>": "CtrlKey,ShiftKey,MouseButton", + "<3,3,16>": "CaptureID", + "<3,3,17>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<3,4>": { + "<3,4,1>": "0", + "<3,4,2>": "1", + "<3,4,3>": "0", + "<3,4,4>": "0", + "<3,4,5>": "1", + "<3,4,6>": "0", + "<3,4,7>": "0", + "<3,4,8>": "0", + "<3,4,9>": "0", + "<3,4,10>": "1", + "<3,4,11>": "1", + "<3,4,12>": "0", + "<3,4,13>": "0", + "<3,4,14>": "1", + "<3,4,15>": "0", + "<3,4,16>": "0", + "<3,4,17>": "0" + }, + "<3,5>": { + "<3,5,1>": "OmniEvent", + "<3,5,2>": "InitContextMenu", + "<3,5,3>": "WinMsg", + "<3,5,4>": "Calculate", + "<3,5,5>": "ContextMenu", + "<3,5,6>": "Help", + "<3,5,7>": "Notes", + "<3,5,8>": "Timer", + "<3,5,9>": "DropFiles", + "<3,5,10>": "GotFocus", + "<3,5,11>": "LostFocus", + "<3,5,12>": "ButtonDown", + "<3,5,13>": "ButtonUp", + "<3,5,14>": "Click", + "<3,5,15>": "DblClk", + "<3,5,16>": "LostCapture", + "<3,5,17>": "MouseMove" + }, + "<3,6>": { + "<3,6,1>": "17", + "<3,6,2>": "2", + "<3,6,3>": "16", + "<3,6,4>": "17", + "<3,6,5>": "2", + "<3,6,6>": "17", + "<3,6,7>": "17", + "<3,6,8>": "16", + "<3,6,9>": "16", + "<3,6,10>": "2", + "<3,6,11>": "2", + "<3,6,12>": "16", + "<3,6,13>": "16", + "<3,6,14>": "10", + "<3,6,15>": "16", + "<3,6,16>": "16", + "<3,6,17>": "16" + } + }, + "<4>": { + "<4,1>": "CHECKBOX", + "<4,2>": { + "<4,2,1>": "OMNIEVENT", + "<4,2,2>": "INITCONTEXTMENU", + "<4,2,3>": "WINMSG", + "<4,2,4>": "CALCULATE", + "<4,2,5>": "CONTEXTMENU", + "<4,2,6>": "HELP", + "<4,2,7>": "NOTES", + "<4,2,8>": "TIMER", + "<4,2,9>": "DROPFILES", + "<4,2,10>": "GOTFOCUS", + "<4,2,11>": "LOSTFOCUS", + "<4,2,12>": "BUTTONDOWN", + "<4,2,13>": "BUTTONUP", + "<4,2,14>": "CLICK", + "<4,2,15>": "DBLCLK", + "<4,2,16>": "LOSTCAPTURE", + "<4,2,17>": "MOUSEMOVE" + }, + "<4,3>": { + "<4,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<4,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<4,3,3>": "hWnd,Message,wParam,lParam", + "<4,3,4>": "CtrlColumn", + "<4,3,5>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<4,3,6>": "ItemID,MouseX,MouseY", + "<4,3,7>": "", + "<4,3,8>": "", + "<4,3,9>": "FileList,xDrop,yDrop", + "<4,3,10>": "PrevFocusID", + "<4,3,11>": "Flag,FocusID", + "<4,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<4,3,13>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<4,3,14>": "", + "<4,3,15>": "CtrlKey,ShiftKey,MouseButton", + "<4,3,16>": "CaptureID", + "<4,3,17>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<4,4>": { + "<4,4,1>": "0", + "<4,4,2>": "1", + "<4,4,3>": "0", + "<4,4,4>": "0", + "<4,4,5>": "1", + "<4,4,6>": "0", + "<4,4,7>": "0", + "<4,4,8>": "0", + "<4,4,9>": "0", + "<4,4,10>": "1", + "<4,4,11>": "1", + "<4,4,12>": "0", + "<4,4,13>": "0", + "<4,4,14>": "1", + "<4,4,15>": "0", + "<4,4,16>": "0", + "<4,4,17>": "0" + }, + "<4,5>": { + "<4,5,1>": "OmniEvent", + "<4,5,2>": "InitContextMenu", + "<4,5,3>": "WinMsg", + "<4,5,4>": "Calculate", + "<4,5,5>": "ContextMenu", + "<4,5,6>": "Help", + "<4,5,7>": "Notes", + "<4,5,8>": "Timer", + "<4,5,9>": "DropFiles", + "<4,5,10>": "GotFocus", + "<4,5,11>": "LostFocus", + "<4,5,12>": "ButtonDown", + "<4,5,13>": "ButtonUp", + "<4,5,14>": "Click", + "<4,5,15>": "DblClk", + "<4,5,16>": "LostCapture", + "<4,5,17>": "MouseMove" + }, + "<4,6>": { + "<4,6,1>": "17", + "<4,6,2>": "2", + "<4,6,3>": "16", + "<4,6,4>": "17", + "<4,6,5>": "2", + "<4,6,6>": "17", + "<4,6,7>": "17", + "<4,6,8>": "16", + "<4,6,9>": "16", + "<4,6,10>": "2", + "<4,6,11>": "2", + "<4,6,12>": "16", + "<4,6,13>": "16", + "<4,6,14>": "10", + "<4,6,15>": "16", + "<4,6,16>": "16", + "<4,6,17>": "16" + } + }, + "<5>": { + "<5,1>": "COLORDROPDOWN", + "<5,2>": { + "<5,2,1>": "CHANGED", + "<5,2,2>": "EDITSTATECHANGED", + "<5,2,3>": "OMNIEVENT", + "<5,2,4>": "INITCONTEXTMENU", + "<5,2,5>": "WINMSG", + "<5,2,6>": "CALCULATE", + "<5,2,7>": "CONTEXTMENU", + "<5,2,8>": "DROPDOWN", + "<5,2,9>": "HELP", + "<5,2,10>": "NOTES", + "<5,2,11>": "TIMER", + "<5,2,12>": "DROPFILES", + "<5,2,13>": "GOTFOCUS", + "<5,2,14>": "LOSTFOCUS", + "<5,2,15>": "CHAR", + "<5,2,16>": "BUTTONDOWN", + "<5,2,17>": "BUTTONUP", + "<5,2,18>": "DBLCLK", + "<5,2,19>": "LOSTCAPTURE", + "<5,2,20>": "MOUSEMOVE" + }, + "<5,3>": { + "<5,3,1>": "NewData", + "<5,3,2>": "EditState", + "<5,3,3>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<5,3,4>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<5,3,5>": "hWnd,Message,wParam,lParam", + "<5,3,6>": "CtrlColumn", + "<5,3,7>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<5,3,8>": "EditLineText", + "<5,3,9>": "ItemID,MouseX,MouseY", + "<5,3,10>": "", + "<5,3,11>": "", + "<5,3,12>": "FileList,xDrop,yDrop", + "<5,3,13>": "PrevFocusID", + "<5,3,14>": "Flag,FocusID", + "<5,3,15>": "VirtCode,ScanCode,CtrlKey,ShiftKey,AltKey", + "<5,3,16>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<5,3,17>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<5,3,18>": "CtrlKey,ShiftKey,MouseButton", + "<5,3,19>": "CaptureID", + "<5,3,20>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<5,4>": { + "<5,4,1>": "0", + "<5,4,2>": "1", + "<5,4,3>": "0", + "<5,4,4>": "1", + "<5,4,5>": "0", + "<5,4,6>": "0", + "<5,4,7>": "1", + "<5,4,8>": "0", + "<5,4,9>": "0", + "<5,4,10>": "0", + "<5,4,11>": "0", + "<5,4,12>": "0", + "<5,4,13>": "1", + "<5,4,14>": "1", + "<5,4,15>": "0", + "<5,4,16>": "0", + "<5,4,17>": "0", + "<5,4,18>": "0", + "<5,4,19>": "0", + "<5,4,20>": "0" + }, + "<5,5>": { + "<5,5,1>": "Changed", + "<5,5,2>": "EditStateChanged", + "<5,5,3>": "OmniEvent", + "<5,5,4>": "InitContextMenu", + "<5,5,5>": "WinMsg", + "<5,5,6>": "Calculate", + "<5,5,7>": "ContextMenu", + "<5,5,8>": "DropDown", + "<5,5,9>": "Help", + "<5,5,10>": "Notes", + "<5,5,11>": "Timer", + "<5,5,12>": "DropFiles", + "<5,5,13>": "GotFocus", + "<5,5,14>": "LostFocus", + "<5,5,15>": "Char", + "<5,5,16>": "ButtonDown", + "<5,5,17>": "ButtonUp", + "<5,5,18>": "DblClk", + "<5,5,19>": "LostCapture", + "<5,5,20>": "MouseMove" + }, + "<5,6>": { + "<5,6,1>": "24", + "<5,6,2>": "2", + "<5,6,3>": "17", + "<5,6,4>": "2", + "<5,6,5>": "16", + "<5,6,6>": "17", + "<5,6,7>": "2", + "<5,6,8>": "16", + "<5,6,9>": "17", + "<5,6,10>": "17", + "<5,6,11>": "16", + "<5,6,12>": "16", + "<5,6,13>": "2", + "<5,6,14>": "2", + "<5,6,15>": "16", + "<5,6,16>": "16", + "<5,6,17>": "16", + "<5,6,18>": "16", + "<5,6,19>": "16", + "<5,6,20>": "16" + } + }, + "<6>": { + "<6,1>": "COMBOBOX", + "<6,2>": { + "<6,2,1>": "CHANGED", + "<6,2,2>": "EDITSTATECHANGED", + "<6,2,3>": "OMNIEVENT", + "<6,2,4>": "INITCONTEXTMENU", + "<6,2,5>": "WINMSG", + "<6,2,6>": "CALCULATE", + "<6,2,7>": "CONTEXTMENU", + "<6,2,8>": "DROPDOWN", + "<6,2,9>": "HELP", + "<6,2,10>": "NOTES", + "<6,2,11>": "REQUIRERR", + "<6,2,12>": "TIMER", + "<6,2,13>": "VALIDERR", + "<6,2,14>": "DROPFILES", + "<6,2,15>": "GOTFOCUS", + "<6,2,16>": "LOSTFOCUS", + "<6,2,17>": "CHAR", + "<6,2,18>": "BUTTONDOWN", + "<6,2,19>": "BUTTONUP", + "<6,2,20>": "DBLCLK", + "<6,2,21>": "LOSTCAPTURE", + "<6,2,22>": "MOUSEMOVE" + }, + "<6,3>": { + "<6,3,1>": "NewData", + "<6,3,2>": "EditState", + "<6,3,3>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<6,3,4>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<6,3,5>": "hWnd,Message,wParam,lParam", + "<6,3,6>": "CtrlColumn", + "<6,3,7>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<6,3,8>": "EditLineText", + "<6,3,9>": "ItemID,MouseX,MouseY", + "<6,3,10>": "", + "<6,3,11>": "RequireInfo", + "<6,3,12>": "", + "<6,3,13>": "ValidInfo", + "<6,3,14>": "FileList,xDrop,yDrop", + "<6,3,15>": "PrevFocusID", + "<6,3,16>": "Flag,FocusID", + "<6,3,17>": "VirtCode,ScanCode,CtrlKey,ShiftKey,AltKey", + "<6,3,18>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<6,3,19>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<6,3,20>": "CtrlKey,ShiftKey,MouseButton", + "<6,3,21>": "CaptureID", + "<6,3,22>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<6,4>": { + "<6,4,1>": "0", + "<6,4,2>": "1", + "<6,4,3>": "0", + "<6,4,4>": "1", + "<6,4,5>": "0", + "<6,4,6>": "0", + "<6,4,7>": "1", + "<6,4,8>": "0", + "<6,4,9>": "0", + "<6,4,10>": "0", + "<6,4,11>": "0", + "<6,4,12>": "0", + "<6,4,13>": "0", + "<6,4,14>": "0", + "<6,4,15>": "1", + "<6,4,16>": "1", + "<6,4,17>": "0", + "<6,4,18>": "0", + "<6,4,19>": "0", + "<6,4,20>": "0", + "<6,4,21>": "0", + "<6,4,22>": "0" + }, + "<6,5>": { + "<6,5,1>": "Changed", + "<6,5,2>": "EditStateChanged", + "<6,5,3>": "OmniEvent", + "<6,5,4>": "InitContextMenu", + "<6,5,5>": "WinMsg", + "<6,5,6>": "Calculate", + "<6,5,7>": "ContextMenu", + "<6,5,8>": "DropDown", + "<6,5,9>": "Help", + "<6,5,10>": "Notes", + "<6,5,11>": "RequirErr", + "<6,5,12>": "Timer", + "<6,5,13>": "ValidErr", + "<6,5,14>": "DropFiles", + "<6,5,15>": "GotFocus", + "<6,5,16>": "LostFocus", + "<6,5,17>": "Char", + "<6,5,18>": "ButtonDown", + "<6,5,19>": "ButtonUp", + "<6,5,20>": "DblClk", + "<6,5,21>": "LostCapture", + "<6,5,22>": "MouseMove" + }, + "<6,6>": { + "<6,6,1>": "24", + "<6,6,2>": "2", + "<6,6,3>": "17", + "<6,6,4>": "2", + "<6,6,5>": "16", + "<6,6,6>": "17", + "<6,6,7>": "2", + "<6,6,8>": "16", + "<6,6,9>": "17", + "<6,6,10>": "17", + "<6,6,11>": "17", + "<6,6,12>": "16", + "<6,6,13>": "17", + "<6,6,14>": "16", + "<6,6,15>": "2", + "<6,6,16>": "2", + "<6,6,17>": "16", + "<6,6,18>": "16", + "<6,6,19>": "16", + "<6,6,20>": "16", + "<6,6,21>": "16", + "<6,6,22>": "16" + } + }, + "<7>": { + "<7,1>": "DATETIME", + "<7,2>": { + "<7,2,1>": "CHANGED", + "<7,2,2>": "OMNIEVENT", + "<7,2,3>": "INITCONTEXTMENU", + "<7,2,4>": "WINMSG", + "<7,2,5>": "CALCULATE", + "<7,2,6>": "CLOSEUP", + "<7,2,7>": "CONTEXTMENU", + "<7,2,8>": "DROPDOWN", + "<7,2,9>": "HELP", + "<7,2,10>": "NOTES", + "<7,2,11>": "REQUIRERR", + "<7,2,12>": "TIMER", + "<7,2,13>": "DROPFILES", + "<7,2,14>": "GOTFOCUS", + "<7,2,15>": "LOSTFOCUS", + "<7,2,16>": "CHAR", + "<7,2,17>": "BUTTONDOWN", + "<7,2,18>": "BUTTONUP", + "<7,2,19>": "LOSTCAPTURE", + "<7,2,20>": "MOUSEMOVE" + }, + "<7,3>": { + "<7,3,1>": "NewData", + "<7,3,2>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<7,3,3>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<7,3,4>": "hWnd,Message,wParam,lParam", + "<7,3,5>": "CtrlColumn", + "<7,3,6>": "EditLineText", + "<7,3,7>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<7,3,8>": "EditLineText", + "<7,3,9>": "ItemID,MouseX,MouseY", + "<7,3,10>": "", + "<7,3,11>": "RequireInfo", + "<7,3,12>": "", + "<7,3,13>": "FileList,xDrop,yDrop", + "<7,3,14>": "PrevFocusID", + "<7,3,15>": "Flag,FocusID", + "<7,3,16>": "VirtCode,ScanCode,CtrlKey,ShiftKey,AltKey", + "<7,3,17>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<7,3,18>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<7,3,19>": "CaptureID", + "<7,3,20>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<7,4>": { + "<7,4,1>": "0", + "<7,4,2>": "0", + "<7,4,3>": "1", + "<7,4,4>": "0", + "<7,4,5>": "0", + "<7,4,6>": "0", + "<7,4,7>": "1", + "<7,4,8>": "0", + "<7,4,9>": "0", + "<7,4,10>": "0", + "<7,4,11>": "0", + "<7,4,12>": "0", + "<7,4,13>": "0", + "<7,4,14>": "1", + "<7,4,15>": "1", + "<7,4,16>": "0", + "<7,4,17>": "0", + "<7,4,18>": "0", + "<7,4,19>": "0", + "<7,4,20>": "0" + }, + "<7,5>": { + "<7,5,1>": "Changed", + "<7,5,2>": "OmniEvent", + "<7,5,3>": "InitContextMenu", + "<7,5,4>": "WinMsg", + "<7,5,5>": "Calculate", + "<7,5,6>": "CloseUp", + "<7,5,7>": "ContextMenu", + "<7,5,8>": "DropDown", + "<7,5,9>": "Help", + "<7,5,10>": "Notes", + "<7,5,11>": "RequirErr", + "<7,5,12>": "Timer", + "<7,5,13>": "DropFiles", + "<7,5,14>": "GotFocus", + "<7,5,15>": "LostFocus", + "<7,5,16>": "Char", + "<7,5,17>": "ButtonDown", + "<7,5,18>": "ButtonUp", + "<7,5,19>": "LostCapture", + "<7,5,20>": "MouseMove" + }, + "<7,6>": { + "<7,6,1>": "24", + "<7,6,2>": "17", + "<7,6,3>": "2", + "<7,6,4>": "16", + "<7,6,5>": "17", + "<7,6,6>": "16", + "<7,6,7>": "2", + "<7,6,8>": "16", + "<7,6,9>": "17", + "<7,6,10>": "17", + "<7,6,11>": "17", + "<7,6,12>": "16", + "<7,6,13>": "16", + "<7,6,14>": "2", + "<7,6,15>": "2", + "<7,6,16>": "16", + "<7,6,17>": "16", + "<7,6,18>": "16", + "<7,6,19>": "16", + "<7,6,20>": "16" + } + }, + "<8>": { + "<8,1>": "DBBITMAP", + "<8,2>": { + "<8,2,1>": "OMNIEVENT", + "<8,2,2>": "INITCONTEXTMENU", + "<8,2,3>": "WINMSG", + "<8,2,4>": "CALCULATE", + "<8,2,5>": "CONTEXTMENU", + "<8,2,6>": "HELP", + "<8,2,7>": "NOTES", + "<8,2,8>": "TIMER", + "<8,2,9>": "DROPFILES", + "<8,2,10>": "BUTTONDOWN", + "<8,2,11>": "BUTTONUP", + "<8,2,12>": "CLICK", + "<8,2,13>": "DBLCLK", + "<8,2,14>": "LOSTCAPTURE", + "<8,2,15>": "MOUSEMOVE" + }, + "<8,3>": { + "<8,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<8,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<8,3,3>": "hWnd,Message,wParam,lParam", + "<8,3,4>": "CtrlColumn", + "<8,3,5>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<8,3,6>": "ItemID,MouseX,MouseY", + "<8,3,7>": "", + "<8,3,8>": "", + "<8,3,9>": "FileList,xDrop,yDrop", + "<8,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<8,3,11>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<8,3,12>": "", + "<8,3,13>": "CtrlKey,ShiftKey,MouseButton", + "<8,3,14>": "CaptureID", + "<8,3,15>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<8,4>": { + "<8,4,1>": "0", + "<8,4,2>": "1", + "<8,4,3>": "0", + "<8,4,4>": "0", + "<8,4,5>": "1", + "<8,4,6>": "0", + "<8,4,7>": "0", + "<8,4,8>": "0", + "<8,4,9>": "0", + "<8,4,10>": "0", + "<8,4,11>": "0", + "<8,4,12>": "1", + "<8,4,13>": "0", + "<8,4,14>": "0", + "<8,4,15>": "0" + }, + "<8,5>": { + "<8,5,1>": "OmniEvent", + "<8,5,2>": "InitContextMenu", + "<8,5,3>": "WinMsg", + "<8,5,4>": "Calculate", + "<8,5,5>": "ContextMenu", + "<8,5,6>": "Help", + "<8,5,7>": "Notes", + "<8,5,8>": "Timer", + "<8,5,9>": "DropFiles", + "<8,5,10>": "ButtonDown", + "<8,5,11>": "ButtonUp", + "<8,5,12>": "Click", + "<8,5,13>": "DblClk", + "<8,5,14>": "LostCapture", + "<8,5,15>": "MouseMove" + }, + "<8,6>": { + "<8,6,1>": "17", + "<8,6,2>": "2", + "<8,6,3>": "16", + "<8,6,4>": "17", + "<8,6,5>": "2", + "<8,6,6>": "17", + "<8,6,7>": "17", + "<8,6,8>": "16", + "<8,6,9>": "16", + "<8,6,10>": "16", + "<8,6,11>": "16", + "<8,6,12>": "10", + "<8,6,13>": "16", + "<8,6,14>": "16", + "<8,6,15>": "16" + } + }, + "<9>": { + "<9,1>": "DIRWATCHER", + "<9,2>": { + "<9,2,1>": "CHANGED", + "<9,2,2>": "OMNIEVENT", + "<9,2,3>": "INITCONTEXTMENU", + "<9,2,4>": "WINMSG", + "<9,2,5>": "CONTEXTMENU", + "<9,2,6>": "HELP", + "<9,2,7>": "NOTES", + "<9,2,8>": "TIMER", + "<9,2,9>": "DROPFILES", + "<9,2,10>": "BUTTONDOWN", + "<9,2,11>": "BUTTONUP", + "<9,2,12>": "CLICK", + "<9,2,13>": "DBLCLK", + "<9,2,14>": "LOSTCAPTURE", + "<9,2,15>": "MOUSEMOVE" + }, + "<9,3>": { + "<9,3,1>": "NewData", + "<9,3,2>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<9,3,3>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<9,3,4>": "hWnd,Message,wParam,lParam", + "<9,3,5>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<9,3,6>": "ItemID,MouseX,MouseY", + "<9,3,7>": "", + "<9,3,8>": "", + "<9,3,9>": "FileList,xDrop,yDrop", + "<9,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<9,3,11>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<9,3,12>": "", + "<9,3,13>": "CtrlKey,ShiftKey,MouseButton", + "<9,3,14>": "CaptureID", + "<9,3,15>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<9,4>": { + "<9,4,1>": "0", + "<9,4,2>": "0", + "<9,4,3>": "1", + "<9,4,4>": "0", + "<9,4,5>": "1", + "<9,4,6>": "0", + "<9,4,7>": "0", + "<9,4,8>": "0", + "<9,4,9>": "0", + "<9,4,10>": "0", + "<9,4,11>": "0", + "<9,4,12>": "1", + "<9,4,13>": "0", + "<9,4,14>": "0", + "<9,4,15>": "0" + }, + "<9,5>": { + "<9,5,1>": "Changed", + "<9,5,2>": "OmniEvent", + "<9,5,3>": "InitContextMenu", + "<9,5,4>": "WinMsg", + "<9,5,5>": "ContextMenu", + "<9,5,6>": "Help", + "<9,5,7>": "Notes", + "<9,5,8>": "Timer", + "<9,5,9>": "DropFiles", + "<9,5,10>": "ButtonDown", + "<9,5,11>": "ButtonUp", + "<9,5,12>": "Click", + "<9,5,13>": "DblClk", + "<9,5,14>": "LostCapture", + "<9,5,15>": "MouseMove" + }, + "<9,6>": { + "<9,6,1>": "16", + "<9,6,2>": "17", + "<9,6,3>": "2", + "<9,6,4>": "16", + "<9,6,5>": "2", + "<9,6,6>": "17", + "<9,6,7>": "17", + "<9,6,8>": "16", + "<9,6,9>": "16", + "<9,6,10>": "16", + "<9,6,11>": "16", + "<9,6,12>": "10", + "<9,6,13>": "16", + "<9,6,14>": "16", + "<9,6,15>": "16" + } + }, + "<10>": { + "<10,1>": "EDITBOX", + "<10,2>": { + "<10,2,1>": "CHANGED", + "<10,2,2>": "EDITSTATECHANGED", + "<10,2,3>": "OMNIEVENT", + "<10,2,4>": "INITCONTEXTMENU", + "<10,2,5>": "WINMSG", + "<10,2,6>": "CALCULATE", + "<10,2,7>": "CONTEXTMENU", + "<10,2,8>": "HELP", + "<10,2,9>": "NOTES", + "<10,2,10>": "OPTIONS", + "<10,2,11>": "REQUIRERR", + "<10,2,12>": "TIMER", + "<10,2,13>": "VALIDERR", + "<10,2,14>": "DROPFILES", + "<10,2,15>": "GOTFOCUS", + "<10,2,16>": "LOSTFOCUS", + "<10,2,17>": "CHAR", + "<10,2,18>": "BUTTONDOWN", + "<10,2,19>": "BUTTONUP", + "<10,2,20>": "LOSTCAPTURE", + "<10,2,21>": "MOUSEMOVE" + }, + "<10,3>": { + "<10,3,1>": "NewData", + "<10,3,2>": "EditState", + "<10,3,3>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<10,3,4>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<10,3,5>": "hWnd,Message,wParam,lParam", + "<10,3,6>": "CtrlColumn", + "<10,3,7>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<10,3,8>": "ItemID,MouseX,MouseY", + "<10,3,9>": "", + "<10,3,10>": "", + "<10,3,11>": "RequireInfo", + "<10,3,12>": "", + "<10,3,13>": "ValidInfo", + "<10,3,14>": "FileList,xDrop,yDrop", + "<10,3,15>": "PrevFocusID", + "<10,3,16>": "Flag,FocusID", + "<10,3,17>": "VirtCode,ScanCode,CtrlKey,ShiftKey,AltKey", + "<10,3,18>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<10,3,19>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<10,3,20>": "CaptureID", + "<10,3,21>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<10,4>": { + "<10,4,1>": "0", + "<10,4,2>": "1", + "<10,4,3>": "0", + "<10,4,4>": "1", + "<10,4,5>": "0", + "<10,4,6>": "0", + "<10,4,7>": "1", + "<10,4,8>": "0", + "<10,4,9>": "0", + "<10,4,10>": "0", + "<10,4,11>": "0", + "<10,4,12>": "0", + "<10,4,13>": "0", + "<10,4,14>": "0", + "<10,4,15>": "1", + "<10,4,16>": "1", + "<10,4,17>": "0", + "<10,4,18>": "0", + "<10,4,19>": "0", + "<10,4,20>": "0", + "<10,4,21>": "0" + }, + "<10,5>": { + "<10,5,1>": "Changed", + "<10,5,2>": "EditStateChanged", + "<10,5,3>": "OmniEvent", + "<10,5,4>": "InitContextMenu", + "<10,5,5>": "WinMsg", + "<10,5,6>": "Calculate", + "<10,5,7>": "ContextMenu", + "<10,5,8>": "Help", + "<10,5,9>": "Notes", + "<10,5,10>": "Options", + "<10,5,11>": "RequirErr", + "<10,5,12>": "Timer", + "<10,5,13>": "ValidErr", + "<10,5,14>": "DropFiles", + "<10,5,15>": "GotFocus", + "<10,5,16>": "LostFocus", + "<10,5,17>": "Char", + "<10,5,18>": "ButtonDown", + "<10,5,19>": "ButtonUp", + "<10,5,20>": "LostCapture", + "<10,5,21>": "MouseMove" + }, + "<10,6>": { + "<10,6,1>": "24", + "<10,6,2>": "2", + "<10,6,3>": "17", + "<10,6,4>": "2", + "<10,6,5>": "16", + "<10,6,6>": "17", + "<10,6,7>": "2", + "<10,6,8>": "17", + "<10,6,9>": "17", + "<10,6,10>": "16", + "<10,6,11>": "17", + "<10,6,12>": "16", + "<10,6,13>": "17", + "<10,6,14>": "16", + "<10,6,15>": "2", + "<10,6,16>": "2", + "<10,6,17>": "16", + "<10,6,18>": "16", + "<10,6,19>": "16", + "<10,6,20>": "16", + "<10,6,21>": "16" + } + }, + "<11>": { + "<11,1>": "EDITFIELD", + "<11,2>": { + "<11,2,1>": "CHANGED", + "<11,2,2>": "EDITSTATECHANGED", + "<11,2,3>": "OMNIEVENT", + "<11,2,4>": "INITCONTEXTMENU", + "<11,2,5>": "WINMSG", + "<11,2,6>": "CALCULATE", + "<11,2,7>": "CONTEXTMENU", + "<11,2,8>": "HELP", + "<11,2,9>": "NOTES", + "<11,2,10>": "OPTIONS", + "<11,2,11>": "REQUIRERR", + "<11,2,12>": "TIMER", + "<11,2,13>": "VALIDERR", + "<11,2,14>": "DROPFILES", + "<11,2,15>": "GOTFOCUS", + "<11,2,16>": "LOSTFOCUS", + "<11,2,17>": "CHAR", + "<11,2,18>": "BUTTONDOWN", + "<11,2,19>": "BUTTONUP", + "<11,2,20>": "LOSTCAPTURE", + "<11,2,21>": "MOUSEMOVE" + }, + "<11,3>": { + "<11,3,1>": "NewData", + "<11,3,2>": "EditState", + "<11,3,3>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<11,3,4>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<11,3,5>": "hWnd,Message,wParam,lParam", + "<11,3,6>": "CtrlColumn", + "<11,3,7>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<11,3,8>": "ItemID,MouseX,MouseY", + "<11,3,9>": "", + "<11,3,10>": "", + "<11,3,11>": "RequireInfo", + "<11,3,12>": "", + "<11,3,13>": "ValidInfo", + "<11,3,14>": "FileList,xDrop,yDrop", + "<11,3,15>": "PrevFocusID", + "<11,3,16>": "Flag,FocusID", + "<11,3,17>": "VirtCode,ScanCode,CtrlKey,ShiftKey,AltKey", + "<11,3,18>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<11,3,19>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<11,3,20>": "CaptureID", + "<11,3,21>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<11,4>": { + "<11,4,1>": "0", + "<11,4,2>": "1", + "<11,4,3>": "0", + "<11,4,4>": "1", + "<11,4,5>": "0", + "<11,4,6>": "0", + "<11,4,7>": "1", + "<11,4,8>": "0", + "<11,4,9>": "0", + "<11,4,10>": "0", + "<11,4,11>": "0", + "<11,4,12>": "0", + "<11,4,13>": "0", + "<11,4,14>": "0", + "<11,4,15>": "1", + "<11,4,16>": "1", + "<11,4,17>": "0", + "<11,4,18>": "0", + "<11,4,19>": "0", + "<11,4,20>": "0", + "<11,4,21>": "0" + }, + "<11,5>": { + "<11,5,1>": "Changed", + "<11,5,2>": "EditStateChanged", + "<11,5,3>": "OmniEvent", + "<11,5,4>": "InitContextMenu", + "<11,5,5>": "WinMsg", + "<11,5,6>": "Calculate", + "<11,5,7>": "ContextMenu", + "<11,5,8>": "Help", + "<11,5,9>": "Notes", + "<11,5,10>": "Options", + "<11,5,11>": "RequirErr", + "<11,5,12>": "Timer", + "<11,5,13>": "ValidErr", + "<11,5,14>": "DropFiles", + "<11,5,15>": "GotFocus", + "<11,5,16>": "LostFocus", + "<11,5,17>": "Char", + "<11,5,18>": "ButtonDown", + "<11,5,19>": "ButtonUp", + "<11,5,20>": "LostCapture", + "<11,5,21>": "MouseMove" + }, + "<11,6>": { + "<11,6,1>": "24", + "<11,6,2>": "2", + "<11,6,3>": "17", + "<11,6,4>": "2", + "<11,6,5>": "16", + "<11,6,6>": "17", + "<11,6,7>": "2", + "<11,6,8>": "17", + "<11,6,9>": "17", + "<11,6,10>": "16", + "<11,6,11>": "17", + "<11,6,12>": "16", + "<11,6,13>": "17", + "<11,6,14>": "16", + "<11,6,15>": "2", + "<11,6,16>": "2", + "<11,6,17>": "16", + "<11,6,18>": "16", + "<11,6,19>": "16", + "<11,6,20>": "16", + "<11,6,21>": "16" + } + }, + "<12>": { + "<12,1>": "EDITTABLE", + "<12,2>": { + "<12,2,1>": "CELLCHANGED", + "<12,2,2>": "CHANGED", + "<12,2,3>": "DELETEDROW", + "<12,2,4>": "DELETEROW", + "<12,2,5>": "EDITSTATECHANGED", + "<12,2,6>": "HSCROLL", + "<12,2,7>": "INSERTEDROW", + "<12,2,8>": "INSERTROW", + "<12,2,9>": "OMNIEVENT", + "<12,2,10>": "VSCROLL", + "<12,2,11>": "INITCONTEXTMENU", + "<12,2,12>": "WINMSG", + "<12,2,13>": "CALCULATE", + "<12,2,14>": "CELLDROPDOWN", + "<12,2,15>": "CELLEDIT", + "<12,2,16>": "CELLOPTIONS", + "<12,2,17>": "COLSELCHANGED", + "<12,2,18>": "CONTEXTMENU", + "<12,2,19>": "HELP", + "<12,2,20>": "NOTES", + "<12,2,21>": "OPTIONS", + "<12,2,22>": "REQUIRERR", + "<12,2,23>": "ROWSELCHANGED", + "<12,2,24>": "SORTED", + "<12,2,25>": "TIMER", + "<12,2,26>": "VALIDERR", + "<12,2,27>": "MOVEROW", + "<12,2,28>": "DROPFILES", + "<12,2,29>": "CELLPOSCHANGED", + "<12,2,30>": "GOTFOCUS", + "<12,2,31>": "LOSTFOCUS", + "<12,2,32>": "POSCHANGED", + "<12,2,33>": "CELLCHAR", + "<12,2,34>": "CHAR", + "<12,2,35>": "COLSIZE", + "<12,2,36>": "MOVECOL", + "<12,2,37>": "ROWSIZE", + "<12,2,38>": "BUTTONDOWN", + "<12,2,39>": "BUTTONUP", + "<12,2,40>": "CELLCLICK", + "<12,2,41>": "CELLDBLCLK", + "<12,2,42>": "CLICK", + "<12,2,43>": "DBLCLK", + "<12,2,44>": "LOSTCAPTURE", + "<12,2,45>": "MOUSEMOVE" + }, + "<12,3>": { + "<12,3,1>": "ColNum,RowNum,NewData", + "<12,3,2>": "NewData", + "<12,3,3>": "RowNum,RowData,DelInfo", + "<12,3,4>": "RowNum,RowData,DelInfo", + "<12,3,5>": "EditState", + "<12,3,6>": "Value", + "<12,3,7>": "RowNum,RowData,InsInfo", + "<12,3,8>": "RowNum,RowData,InsInfo", + "<12,3,9>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<12,3,10>": "Value", + "<12,3,11>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<12,3,12>": "hWnd,Message,wParam,lParam", + "<12,3,13>": "CtrlColumn", + "<12,3,14>": "ColNum,RowNum,CellText", + "<12,3,15>": "ColNum,RowNum,InitText,SelectAll,SetFocus", + "<12,3,16>": "ColNum,RowNum", + "<12,3,17>": "SelCol,SelState", + "<12,3,18>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<12,3,19>": "ItemID,MouseX,MouseY", + "<12,3,20>": "", + "<12,3,21>": "", + "<12,3,22>": "RequireInfo", + "<12,3,23>": "SelRow,SelState", + "<12,3,24>": "SortCriteria,SortOptions", + "<12,3,25>": "", + "<12,3,26>": "ValidInfo", + "<12,3,27>": "PrevRowNum,NewRowNum", + "<12,3,28>": "FileList,xDrop,yDrop", + "<12,3,29>": "NextColumn,NextRow,ContextFlags", + "<12,3,30>": "PrevFocusID", + "<12,3,31>": "Flag,FocusID", + "<12,3,32>": "NextColumn,NextRow", + "<12,3,33>": "ColNum,RowNum,VirtCode,ScanCode,CtrlKey,ShiftKey,AltKey", + "<12,3,34>": "VirtCode,ScanCode,CtrlKey,ShiftKey,AltKey", + "<12,3,35>": "", + "<12,3,36>": "PrevColNum,NewColNum", + "<12,3,37>": "RowNum", + "<12,3,38>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<12,3,39>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<12,3,40>": "ColNum,RowNum", + "<12,3,41>": "ColNum,RowNum,CtrlKey,ShiftKey,MouseButton", + "<12,3,42>": "", + "<12,3,43>": "CtrlKey,ShiftKey,MouseButton", + "<12,3,44>": "CaptureID", + "<12,3,45>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<12,4>": { + "<12,4,1>": "0", + "<12,4,2>": "0", + "<12,4,3>": "0", + "<12,4,4>": "0", + "<12,4,5>": "1", + "<12,4,6>": "0", + "<12,4,7>": "0", + "<12,4,8>": "0", + "<12,4,9>": "0", + "<12,4,10>": "0", + "<12,4,11>": "1", + "<12,4,12>": "0", + "<12,4,13>": "0", + "<12,4,14>": "0", + "<12,4,15>": "0", + "<12,4,16>": "0", + "<12,4,17>": "0", + "<12,4,18>": "1", + "<12,4,19>": "0", + "<12,4,20>": "0", + "<12,4,21>": "0", + "<12,4,22>": "0", + "<12,4,23>": "0", + "<12,4,24>": "1", + "<12,4,25>": "0", + "<12,4,26>": "0", + "<12,4,27>": "0", + "<12,4,28>": "0", + "<12,4,29>": "1", + "<12,4,30>": "1", + "<12,4,31>": "1", + "<12,4,32>": "1", + "<12,4,33>": "0", + "<12,4,34>": "0", + "<12,4,35>": "0", + "<12,4,36>": "0", + "<12,4,37>": "0", + "<12,4,38>": "0", + "<12,4,39>": "0", + "<12,4,40>": "0", + "<12,4,41>": "0", + "<12,4,42>": "1", + "<12,4,43>": "0", + "<12,4,44>": "0", + "<12,4,45>": "0" + }, + "<12,5>": { + "<12,5,1>": "CellChanged", + "<12,5,2>": "Changed", + "<12,5,3>": "DeletedRow", + "<12,5,4>": "DeleteRow", + "<12,5,5>": "EditStateChanged", + "<12,5,6>": "HScroll", + "<12,5,7>": "InsertedRow", + "<12,5,8>": "InsertRow", + "<12,5,9>": "OmniEvent", + "<12,5,10>": "VScroll", + "<12,5,11>": "InitContextMenu", + "<12,5,12>": "WinMsg", + "<12,5,13>": "Calculate", + "<12,5,14>": "CellDropDown", + "<12,5,15>": "CellEdit", + "<12,5,16>": "CellOptions", + "<12,5,17>": "ColSelChanged", + "<12,5,18>": "ContextMenu", + "<12,5,19>": "Help", + "<12,5,20>": "Notes", + "<12,5,21>": "Options", + "<12,5,22>": "RequirErr", + "<12,5,23>": "RowSelChanged", + "<12,5,24>": "Sorted", + "<12,5,25>": "Timer", + "<12,5,26>": "ValidErr", + "<12,5,27>": "MoveRow", + "<12,5,28>": "DropFiles", + "<12,5,29>": "CellPosChanged", + "<12,5,30>": "GotFocus", + "<12,5,31>": "LostFocus", + "<12,5,32>": "PosChanged", + "<12,5,33>": "CellChar", + "<12,5,34>": "Char", + "<12,5,35>": "ColSize", + "<12,5,36>": "MoveCol", + "<12,5,37>": "RowSize", + "<12,5,38>": "ButtonDown", + "<12,5,39>": "ButtonUp", + "<12,5,40>": "CellClick", + "<12,5,41>": "CellDblClk", + "<12,5,42>": "Click", + "<12,5,43>": "DblClk", + "<12,5,44>": "LostCapture", + "<12,5,45>": "MouseMove" + }, + "<12,6>": { + "<12,6,1>": "24", + "<12,6,2>": "16", + "<12,6,3>": "16", + "<12,6,4>": "16", + "<12,6,5>": "2", + "<12,6,6>": "16", + "<12,6,7>": "16", + "<12,6,8>": "16", + "<12,6,9>": "17", + "<12,6,10>": "16", + "<12,6,11>": "2", + "<12,6,12>": "16", + "<12,6,13>": "17", + "<12,6,14>": "16", + "<12,6,15>": "16", + "<12,6,16>": "16", + "<12,6,17>": "16", + "<12,6,18>": "2", + "<12,6,19>": "17", + "<12,6,20>": "17", + "<12,6,21>": "16", + "<12,6,22>": "17", + "<12,6,23>": "16", + "<12,6,24>": "2", + "<12,6,25>": "16", + "<12,6,26>": "17", + "<12,6,27>": "21", + "<12,6,28>": "16", + "<12,6,29>": "16", + "<12,6,30>": "2", + "<12,6,31>": "2", + "<12,6,32>": "2", + "<12,6,33>": "16", + "<12,6,34>": "16", + "<12,6,35>": "16", + "<12,6,36>": "16", + "<12,6,37>": "16", + "<12,6,38>": "16", + "<12,6,39>": "16", + "<12,6,40>": "16", + "<12,6,41>": "16", + "<12,6,42>": "2", + "<12,6,43>": "16", + "<12,6,44>": "16", + "<12,6,45>": "16" + } + }, + "<13>": { + "<13,1>": "FILEEXPLORER", + "<13,2>": { + "<13,2,1>": "OMNIEVENT", + "<13,2,2>": "PATHCHANGED", + "<13,2,3>": "INITCONTEXTMENU", + "<13,2,4>": "WINMSG", + "<13,2,5>": "CONTEXTMENU", + "<13,2,6>": "HELP", + "<13,2,7>": "NOTES", + "<13,2,8>": "TIMER", + "<13,2,9>": "DROPFILES", + "<13,2,10>": "BUTTONDOWN", + "<13,2,11>": "BUTTONUP", + "<13,2,12>": "LOSTCAPTURE", + "<13,2,13>": "MOUSEMOVE" + }, + "<13,3>": { + "<13,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<13,3,2>": "NewPath", + "<13,3,3>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<13,3,4>": "hWnd,Message,wParam,lParam", + "<13,3,5>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<13,3,6>": "ItemID,MouseX,MouseY", + "<13,3,7>": "", + "<13,3,8>": "", + "<13,3,9>": "FileList,xDrop,yDrop", + "<13,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<13,3,11>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<13,3,12>": "CaptureID", + "<13,3,13>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<13,4>": { + "<13,4,1>": "0", + "<13,4,2>": "0", + "<13,4,3>": "1", + "<13,4,4>": "0", + "<13,4,5>": "1", + "<13,4,6>": "0", + "<13,4,7>": "0", + "<13,4,8>": "0", + "<13,4,9>": "0", + "<13,4,10>": "0", + "<13,4,11>": "0", + "<13,4,12>": "0", + "<13,4,13>": "0" + }, + "<13,5>": { + "<13,5,1>": "OmniEvent", + "<13,5,2>": "PathChanged", + "<13,5,3>": "InitContextMenu", + "<13,5,4>": "WinMsg", + "<13,5,5>": "ContextMenu", + "<13,5,6>": "Help", + "<13,5,7>": "Notes", + "<13,5,8>": "Timer", + "<13,5,9>": "DropFiles", + "<13,5,10>": "ButtonDown", + "<13,5,11>": "ButtonUp", + "<13,5,12>": "LostCapture", + "<13,5,13>": "MouseMove" + }, + "<13,6>": { + "<13,6,1>": "17", + "<13,6,2>": "24", + "<13,6,3>": "2", + "<13,6,4>": "16", + "<13,6,5>": "2", + "<13,6,6>": "17", + "<13,6,7>": "17", + "<13,6,8>": "16", + "<13,6,9>": "16", + "<13,6,10>": "16", + "<13,6,11>": "16", + "<13,6,12>": "16", + "<13,6,13>": "16" + } + }, + "<14>": { + "<14,1>": "FILEPREVIEW", + "<14,2>": { + "<14,2,1>": "OMNIEVENT", + "<14,2,2>": "INITCONTEXTMENU", + "<14,2,3>": "WINMSG", + "<14,2,4>": "CONTEXTMENU", + "<14,2,5>": "HELP", + "<14,2,6>": "NOTES", + "<14,2,7>": "TIMER", + "<14,2,8>": "DROPFILES", + "<14,2,9>": "BUTTONDOWN", + "<14,2,10>": "BUTTONUP", + "<14,2,11>": "CLICK", + "<14,2,12>": "DBLCLK", + "<14,2,13>": "LOSTCAPTURE", + "<14,2,14>": "MOUSEMOVE" + }, + "<14,3>": { + "<14,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<14,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<14,3,3>": "hWnd,Message,wParam,lParam", + "<14,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<14,3,5>": "ItemID,MouseX,MouseY", + "<14,3,6>": "", + "<14,3,7>": "", + "<14,3,8>": "FileList,xDrop,yDrop", + "<14,3,9>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<14,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<14,3,11>": "", + "<14,3,12>": "CtrlKey,ShiftKey,MouseButton", + "<14,3,13>": "CaptureID", + "<14,3,14>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<14,4>": { + "<14,4,1>": "0", + "<14,4,2>": "1", + "<14,4,3>": "0", + "<14,4,4>": "1", + "<14,4,5>": "0", + "<14,4,6>": "0", + "<14,4,7>": "0", + "<14,4,8>": "0", + "<14,4,9>": "0", + "<14,4,10>": "0", + "<14,4,11>": "1", + "<14,4,12>": "0", + "<14,4,13>": "0", + "<14,4,14>": "0" + }, + "<14,5>": { + "<14,5,1>": "OmniEvent", + "<14,5,2>": "InitContextMenu", + "<14,5,3>": "WinMsg", + "<14,5,4>": "ContextMenu", + "<14,5,5>": "Help", + "<14,5,6>": "Notes", + "<14,5,7>": "Timer", + "<14,5,8>": "DropFiles", + "<14,5,9>": "ButtonDown", + "<14,5,10>": "ButtonUp", + "<14,5,11>": "Click", + "<14,5,12>": "DblClk", + "<14,5,13>": "LostCapture", + "<14,5,14>": "MouseMove" + }, + "<14,6>": { + "<14,6,1>": "17", + "<14,6,2>": "2", + "<14,6,3>": "16", + "<14,6,4>": "2", + "<14,6,5>": "17", + "<14,6,6>": "17", + "<14,6,7>": "16", + "<14,6,8>": "16", + "<14,6,9>": "16", + "<14,6,10>": "16", + "<14,6,11>": "10", + "<14,6,12>": "16", + "<14,6,13>": "16", + "<14,6,14>": "16" + } + }, + "<15>": { + "<15,1>": "GROUPBOX", + "<15,2>": { + "<15,2,1>": "OMNIEVENT", + "<15,2,2>": "INITCONTEXTMENU", + "<15,2,3>": "WINMSG", + "<15,2,4>": "CONTEXTMENU", + "<15,2,5>": "HELP", + "<15,2,6>": "NOTES", + "<15,2,7>": "TIMER", + "<15,2,8>": "DROPFILES", + "<15,2,9>": "BUTTONDOWN", + "<15,2,10>": "BUTTONUP", + "<15,2,11>": "CLICK", + "<15,2,12>": "DBLCLK", + "<15,2,13>": "LOSTCAPTURE", + "<15,2,14>": "MOUSEMOVE" + }, + "<15,3>": { + "<15,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<15,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<15,3,3>": "hWnd,Message,wParam,lParam", + "<15,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<15,3,5>": "ItemID,MouseX,MouseY", + "<15,3,6>": "", + "<15,3,7>": "", + "<15,3,8>": "FileList,xDrop,yDrop", + "<15,3,9>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<15,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<15,3,11>": "", + "<15,3,12>": "CtrlKey,ShiftKey,MouseButton", + "<15,3,13>": "CaptureID", + "<15,3,14>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<15,4>": { + "<15,4,1>": "0", + "<15,4,2>": "1", + "<15,4,3>": "0", + "<15,4,4>": "1", + "<15,4,5>": "0", + "<15,4,6>": "0", + "<15,4,7>": "0", + "<15,4,8>": "0", + "<15,4,9>": "0", + "<15,4,10>": "0", + "<15,4,11>": "1", + "<15,4,12>": "0", + "<15,4,13>": "0", + "<15,4,14>": "0" + }, + "<15,5>": { + "<15,5,1>": "OmniEvent", + "<15,5,2>": "InitContextMenu", + "<15,5,3>": "WinMsg", + "<15,5,4>": "ContextMenu", + "<15,5,5>": "Help", + "<15,5,6>": "Notes", + "<15,5,7>": "Timer", + "<15,5,8>": "DropFiles", + "<15,5,9>": "ButtonDown", + "<15,5,10>": "ButtonUp", + "<15,5,11>": "Click", + "<15,5,12>": "DblClk", + "<15,5,13>": "LostCapture", + "<15,5,14>": "MouseMove" + }, + "<15,6>": { + "<15,6,1>": "17", + "<15,6,2>": "2", + "<15,6,3>": "16", + "<15,6,4>": "2", + "<15,6,5>": "17", + "<15,6,6>": "17", + "<15,6,7>": "16", + "<15,6,8>": "16", + "<15,6,9>": "16", + "<15,6,10>": "16", + "<15,6,11>": "10", + "<15,6,12>": "16", + "<15,6,13>": "16", + "<15,6,14>": "16" + } + }, + "<16>": { + "<16,1>": "GROUPBOXEX", + "<16,2>": { + "<16,2,1>": "OMNIEVENT", + "<16,2,2>": "INITCONTEXTMENU", + "<16,2,3>": "WINMSG", + "<16,2,4>": "CONTEXTMENU", + "<16,2,5>": "HELP", + "<16,2,6>": "NOTES", + "<16,2,7>": "TIMER", + "<16,2,8>": "DROPFILES", + "<16,2,9>": "BUTTONDOWN", + "<16,2,10>": "BUTTONUP", + "<16,2,11>": "CLICK", + "<16,2,12>": "DBLCLK", + "<16,2,13>": "LOSTCAPTURE", + "<16,2,14>": "MOUSEMOVE" + }, + "<16,3>": { + "<16,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<16,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<16,3,3>": "hWnd,Message,wParam,lParam", + "<16,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<16,3,5>": "ItemID,MouseX,MouseY", + "<16,3,6>": "", + "<16,3,7>": "", + "<16,3,8>": "FileList,xDrop,yDrop", + "<16,3,9>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<16,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<16,3,11>": "", + "<16,3,12>": "CtrlKey,ShiftKey,MouseButton", + "<16,3,13>": "CaptureID", + "<16,3,14>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<16,4>": { + "<16,4,1>": "0", + "<16,4,2>": "1", + "<16,4,3>": "0", + "<16,4,4>": "1", + "<16,4,5>": "0", + "<16,4,6>": "0", + "<16,4,7>": "0", + "<16,4,8>": "0", + "<16,4,9>": "0", + "<16,4,10>": "0", + "<16,4,11>": "1", + "<16,4,12>": "0", + "<16,4,13>": "0", + "<16,4,14>": "0" + }, + "<16,5>": { + "<16,5,1>": "OmniEvent", + "<16,5,2>": "InitContextMenu", + "<16,5,3>": "WinMsg", + "<16,5,4>": "ContextMenu", + "<16,5,5>": "Help", + "<16,5,6>": "Notes", + "<16,5,7>": "Timer", + "<16,5,8>": "DropFiles", + "<16,5,9>": "ButtonDown", + "<16,5,10>": "ButtonUp", + "<16,5,11>": "Click", + "<16,5,12>": "DblClk", + "<16,5,13>": "LostCapture", + "<16,5,14>": "MouseMove" + }, + "<16,6>": { + "<16,6,1>": "17", + "<16,6,2>": "2", + "<16,6,3>": "16", + "<16,6,4>": "2", + "<16,6,5>": "17", + "<16,6,6>": "17", + "<16,6,7>": "16", + "<16,6,8>": "16", + "<16,6,9>": "16", + "<16,6,10>": "16", + "<16,6,11>": "10", + "<16,6,12>": "16", + "<16,6,13>": "16", + "<16,6,14>": "16" + } + }, + "<17>": { + "<17,1>": "HSCROLLBAR", + "<17,2>": { + "<17,2,1>": "HSCROLL", + "<17,2,2>": "OMNIEVENT", + "<17,2,3>": "INITCONTEXTMENU", + "<17,2,4>": "WINMSG", + "<17,2,5>": "CALCULATE", + "<17,2,6>": "CONTEXTMENU", + "<17,2,7>": "HELP", + "<17,2,8>": "NOTES", + "<17,2,9>": "TIMER", + "<17,2,10>": "DROPFILES", + "<17,2,11>": "GOTFOCUS", + "<17,2,12>": "LOSTFOCUS", + "<17,2,13>": "BUTTONDOWN", + "<17,2,14>": "BUTTONUP", + "<17,2,15>": "LOSTCAPTURE", + "<17,2,16>": "MOUSEMOVE" + }, + "<17,3>": { + "<17,3,1>": "Value", + "<17,3,2>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<17,3,3>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<17,3,4>": "hWnd,Message,wParam,lParam", + "<17,3,5>": "CtrlColumn", + "<17,3,6>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<17,3,7>": "ItemID,MouseX,MouseY", + "<17,3,8>": "", + "<17,3,9>": "", + "<17,3,10>": "FileList,xDrop,yDrop", + "<17,3,11>": "PrevFocusID", + "<17,3,12>": "Flag,FocusID", + "<17,3,13>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<17,3,14>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<17,3,15>": "CaptureID", + "<17,3,16>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<17,4>": { + "<17,4,1>": "0", + "<17,4,2>": "0", + "<17,4,3>": "1", + "<17,4,4>": "0", + "<17,4,5>": "0", + "<17,4,6>": "1", + "<17,4,7>": "0", + "<17,4,8>": "0", + "<17,4,9>": "0", + "<17,4,10>": "0", + "<17,4,11>": "1", + "<17,4,12>": "1", + "<17,4,13>": "0", + "<17,4,14>": "0", + "<17,4,15>": "0", + "<17,4,16>": "0" + }, + "<17,5>": { + "<17,5,1>": "HScroll", + "<17,5,2>": "OmniEvent", + "<17,5,3>": "InitContextMenu", + "<17,5,4>": "WinMsg", + "<17,5,5>": "Calculate", + "<17,5,6>": "ContextMenu", + "<17,5,7>": "Help", + "<17,5,8>": "Notes", + "<17,5,9>": "Timer", + "<17,5,10>": "DropFiles", + "<17,5,11>": "GotFocus", + "<17,5,12>": "LostFocus", + "<17,5,13>": "ButtonDown", + "<17,5,14>": "ButtonUp", + "<17,5,15>": "LostCapture", + "<17,5,16>": "MouseMove" + }, + "<17,6>": { + "<17,6,1>": "24", + "<17,6,2>": "17", + "<17,6,3>": "2", + "<17,6,4>": "16", + "<17,6,5>": "17", + "<17,6,6>": "2", + "<17,6,7>": "17", + "<17,6,8>": "17", + "<17,6,9>": "16", + "<17,6,10>": "16", + "<17,6,11>": "2", + "<17,6,12>": "2", + "<17,6,13>": "16", + "<17,6,14>": "16", + "<17,6,15>": "16", + "<17,6,16>": "16" + } + }, + "<18>": { + "<18,1>": "HSPLITBAR", + "<18,2>": { + "<18,2,1>": "OMNIEVENT", + "<18,2,2>": "INITCONTEXTMENU", + "<18,2,3>": "WINMSG", + "<18,2,4>": "CONTEXTMENU", + "<18,2,5>": "HELP", + "<18,2,6>": "NOTES", + "<18,2,7>": "TIMER", + "<18,2,8>": "DROPFILES", + "<18,2,9>": "MOVE", + "<18,2,10>": "BUTTONDOWN", + "<18,2,11>": "BUTTONUP", + "<18,2,12>": "CLICK", + "<18,2,13>": "DBLCLK", + "<18,2,14>": "LOSTCAPTURE", + "<18,2,15>": "MOUSEMOVE" + }, + "<18,3>": { + "<18,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<18,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<18,3,3>": "hWnd,Message,wParam,lParam", + "<18,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<18,3,5>": "ItemID,MouseX,MouseY", + "<18,3,6>": "", + "<18,3,7>": "", + "<18,3,8>": "FileList,xDrop,yDrop", + "<18,3,9>": "YCoord", + "<18,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<18,3,11>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<18,3,12>": "", + "<18,3,13>": "CtrlKey,ShiftKey,MouseButton", + "<18,3,14>": "CaptureID", + "<18,3,15>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<18,4>": { + "<18,4,1>": "0", + "<18,4,2>": "1", + "<18,4,3>": "0", + "<18,4,4>": "1", + "<18,4,5>": "0", + "<18,4,6>": "0", + "<18,4,7>": "0", + "<18,4,8>": "0", + "<18,4,9>": "0", + "<18,4,10>": "0", + "<18,4,11>": "0", + "<18,4,12>": "1", + "<18,4,13>": "0", + "<18,4,14>": "0", + "<18,4,15>": "0" + }, + "<18,5>": { + "<18,5,1>": "OmniEvent", + "<18,5,2>": "InitContextMenu", + "<18,5,3>": "WinMsg", + "<18,5,4>": "ContextMenu", + "<18,5,5>": "Help", + "<18,5,6>": "Notes", + "<18,5,7>": "Timer", + "<18,5,8>": "DropFiles", + "<18,5,9>": "Move", + "<18,5,10>": "ButtonDown", + "<18,5,11>": "ButtonUp", + "<18,5,12>": "Click", + "<18,5,13>": "DblClk", + "<18,5,14>": "LostCapture", + "<18,5,15>": "MouseMove" + }, + "<18,6>": { + "<18,6,1>": "17", + "<18,6,2>": "2", + "<18,6,3>": "16", + "<18,6,4>": "2", + "<18,6,5>": "17", + "<18,6,6>": "17", + "<18,6,7>": "16", + "<18,6,8>": "16", + "<18,6,9>": "24", + "<18,6,10>": "16", + "<18,6,11>": "16", + "<18,6,12>": "2", + "<18,6,13>": "16", + "<18,6,14>": "16", + "<18,6,15>": "16" + } + }, + "<19>": { + "<19,1>": "HTTPCLIENT", + "<19,2>": { + "<19,2,1>": "OMNIEVENT", + "<19,2,2>": "INITCONTEXTMENU", + "<19,2,3>": "WINMSG", + "<19,2,4>": "CONTEXTMENU", + "<19,2,5>": "HELP", + "<19,2,6>": "NOTES", + "<19,2,7>": "TIMER", + "<19,2,8>": "DROPFILES", + "<19,2,9>": "PROGRESS", + "<19,2,10>": "READYSTATECHANGED", + "<19,2,11>": "TIMEOUT", + "<19,2,12>": "BUTTONDOWN", + "<19,2,13>": "BUTTONUP", + "<19,2,14>": "CLICK", + "<19,2,15>": "DBLCLK", + "<19,2,16>": "LOSTCAPTURE", + "<19,2,17>": "MOUSEMOVE" + }, + "<19,3>": { + "<19,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<19,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<19,3,3>": "hWnd,Message,wParam,lParam", + "<19,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<19,3,5>": "ItemID,MouseX,MouseY", + "<19,3,6>": "", + "<19,3,7>": "", + "<19,3,8>": "FileList,xDrop,yDrop", + "<19,3,9>": "BytesReceived,BytesDownloaded,BytesExpected", + "<19,3,10>": "NewState", + "<19,3,11>": "StatusID", + "<19,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<19,3,13>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<19,3,14>": "", + "<19,3,15>": "CtrlKey,ShiftKey,MouseButton", + "<19,3,16>": "CaptureID", + "<19,3,17>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<19,4>": { + "<19,4,1>": "0", + "<19,4,2>": "1", + "<19,4,3>": "0", + "<19,4,4>": "1", + "<19,4,5>": "0", + "<19,4,6>": "0", + "<19,4,7>": "0", + "<19,4,8>": "0", + "<19,4,9>": "0", + "<19,4,10>": "0", + "<19,4,11>": "0", + "<19,4,12>": "0", + "<19,4,13>": "0", + "<19,4,14>": "1", + "<19,4,15>": "0", + "<19,4,16>": "0", + "<19,4,17>": "0" + }, + "<19,5>": { + "<19,5,1>": "OmniEvent", + "<19,5,2>": "InitContextMenu", + "<19,5,3>": "WinMsg", + "<19,5,4>": "ContextMenu", + "<19,5,5>": "Help", + "<19,5,6>": "Notes", + "<19,5,7>": "Timer", + "<19,5,8>": "DropFiles", + "<19,5,9>": "Progress", + "<19,5,10>": "ReadyStateChanged", + "<19,5,11>": "Timeout", + "<19,5,12>": "ButtonDown", + "<19,5,13>": "ButtonUp", + "<19,5,14>": "Click", + "<19,5,15>": "DblClk", + "<19,5,16>": "LostCapture", + "<19,5,17>": "MouseMove" + }, + "<19,6>": { + "<19,6,1>": "17", + "<19,6,2>": "2", + "<19,6,3>": "16", + "<19,6,4>": "2", + "<19,6,5>": "17", + "<19,6,6>": "17", + "<19,6,7>": "16", + "<19,6,8>": "16", + "<19,6,9>": "16", + "<19,6,10>": "16", + "<19,6,11>": "16", + "<19,6,12>": "16", + "<19,6,13>": "16", + "<19,6,14>": "10", + "<19,6,15>": "16", + "<19,6,16>": "16", + "<19,6,17>": "16" + } + }, + "<20>": { + "<20,1>": "HTTPSERVER", + "<20,2>": { + "<20,2,1>": "OMNIEVENT", + "<20,2,2>": "INITCONTEXTMENU", + "<20,2,3>": "WINMSG", + "<20,2,4>": "CONTEXTMENU", + "<20,2,5>": "HELP", + "<20,2,6>": "NOTES", + "<20,2,7>": "TIMER", + "<20,2,8>": "DROPFILES", + "<20,2,9>": "HTTPERROR", + "<20,2,10>": "HTTPREQUEST", + "<20,2,11>": "BUTTONDOWN", + "<20,2,12>": "BUTTONUP", + "<20,2,13>": "CLICK", + "<20,2,14>": "DBLCLK", + "<20,2,15>": "LOSTCAPTURE", + "<20,2,16>": "MOUSEMOVE" + }, + "<20,3>": { + "<20,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<20,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<20,3,3>": "hWnd,Message,wParam,lParam", + "<20,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<20,3,5>": "ItemID,MouseX,MouseY", + "<20,3,6>": "", + "<20,3,7>": "", + "<20,3,8>": "FileList,xDrop,yDrop", + "<20,3,9>": "RequestID,HTTPErrorText", + "<20,3,10>": "RequestID,RequestHeaders", + "<20,3,11>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<20,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<20,3,13>": "", + "<20,3,14>": "CtrlKey,ShiftKey,MouseButton", + "<20,3,15>": "CaptureID", + "<20,3,16>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<20,4>": { + "<20,4,1>": "0", + "<20,4,2>": "1", + "<20,4,3>": "0", + "<20,4,4>": "1", + "<20,4,5>": "0", + "<20,4,6>": "0", + "<20,4,7>": "0", + "<20,4,8>": "0", + "<20,4,9>": "0", + "<20,4,10>": "1", + "<20,4,11>": "0", + "<20,4,12>": "0", + "<20,4,13>": "1", + "<20,4,14>": "0", + "<20,4,15>": "0", + "<20,4,16>": "0" + }, + "<20,5>": { + "<20,5,1>": "OmniEvent", + "<20,5,2>": "InitContextMenu", + "<20,5,3>": "WinMsg", + "<20,5,4>": "ContextMenu", + "<20,5,5>": "Help", + "<20,5,6>": "Notes", + "<20,5,7>": "Timer", + "<20,5,8>": "DropFiles", + "<20,5,9>": "HTTPError", + "<20,5,10>": "HTTPRequest", + "<20,5,11>": "ButtonDown", + "<20,5,12>": "ButtonUp", + "<20,5,13>": "Click", + "<20,5,14>": "DblClk", + "<20,5,15>": "LostCapture", + "<20,5,16>": "MouseMove" + }, + "<20,6>": { + "<20,6,1>": "17", + "<20,6,2>": "2", + "<20,6,3>": "16", + "<20,6,4>": "2", + "<20,6,5>": "17", + "<20,6,6>": "17", + "<20,6,7>": "16", + "<20,6,8>": "16", + "<20,6,9>": "16", + "<20,6,10>": "10", + "<20,6,11>": "16", + "<20,6,12>": "16", + "<20,6,13>": "2", + "<20,6,14>": "16", + "<20,6,15>": "16", + "<20,6,16>": "16" + } + }, + "<21>": { + "<21,1>": "HYPERLINK", + "<21,2>": { + "<21,2,1>": "OMNIEVENT", + "<21,2,2>": "INITCONTEXTMENU", + "<21,2,3>": "WINMSG", + "<21,2,4>": "CONTEXTMENU", + "<21,2,5>": "HELP", + "<21,2,6>": "NOTES", + "<21,2,7>": "TIMER", + "<21,2,8>": "DROPFILES", + "<21,2,9>": "BUTTONDOWN", + "<21,2,10>": "BUTTONUP", + "<21,2,11>": "CLICK", + "<21,2,12>": "DBLCLK", + "<21,2,13>": "LOSTCAPTURE", + "<21,2,14>": "MOUSEMOVE" + }, + "<21,3>": { + "<21,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<21,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<21,3,3>": "hWnd,Message,wParam,lParam", + "<21,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<21,3,5>": "ItemID,MouseX,MouseY", + "<21,3,6>": "", + "<21,3,7>": "", + "<21,3,8>": "FileList,xDrop,yDrop", + "<21,3,9>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<21,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<21,3,11>": "", + "<21,3,12>": "CtrlKey,ShiftKey,MouseButton", + "<21,3,13>": "CaptureID", + "<21,3,14>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<21,4>": { + "<21,4,1>": "0", + "<21,4,2>": "1", + "<21,4,3>": "0", + "<21,4,4>": "1", + "<21,4,5>": "0", + "<21,4,6>": "0", + "<21,4,7>": "0", + "<21,4,8>": "0", + "<21,4,9>": "0", + "<21,4,10>": "0", + "<21,4,11>": "1", + "<21,4,12>": "0", + "<21,4,13>": "0", + "<21,4,14>": "0" + }, + "<21,5>": { + "<21,5,1>": "OmniEvent", + "<21,5,2>": "InitContextMenu", + "<21,5,3>": "WinMsg", + "<21,5,4>": "ContextMenu", + "<21,5,5>": "Help", + "<21,5,6>": "Notes", + "<21,5,7>": "Timer", + "<21,5,8>": "DropFiles", + "<21,5,9>": "ButtonDown", + "<21,5,10>": "ButtonUp", + "<21,5,11>": "Click", + "<21,5,12>": "DblClk", + "<21,5,13>": "LostCapture", + "<21,5,14>": "MouseMove" + }, + "<21,6>": { + "<21,6,1>": "17", + "<21,6,2>": "2", + "<21,6,3>": "16", + "<21,6,4>": "2", + "<21,6,5>": "17", + "<21,6,6>": "17", + "<21,6,7>": "16", + "<21,6,8>": "16", + "<21,6,9>": "16", + "<21,6,10>": "16", + "<21,6,11>": "10", + "<21,6,12>": "16", + "<21,6,13>": "16", + "<21,6,14>": "16" + } + }, + "<22>": { + "<22,1>": "LISTBOX", + "<22,2>": { + "<22,2,1>": "CHANGED", + "<22,2,2>": "ITEMCHANGED", + "<22,2,3>": "ITEMCHECK", + "<22,2,4>": "ITEMCLICK", + "<22,2,5>": "ITEMEDITING", + "<22,2,6>": "ITEMUNCHANGED", + "<22,2,7>": "LASTITEM", + "<22,2,8>": "OMNIEVENT", + "<22,2,9>": "INITCONTEXTMENU", + "<22,2,10>": "WINMSG", + "<22,2,11>": "CALCULATE", + "<22,2,12>": "CONTEXTMENU", + "<22,2,13>": "HELP", + "<22,2,14>": "NOTES", + "<22,2,15>": "OPTIONS", + "<22,2,16>": "TIMER", + "<22,2,17>": "DROPFILES", + "<22,2,18>": "GOTFOCUS", + "<22,2,19>": "LOSTFOCUS", + "<22,2,20>": "CHAR", + "<22,2,21>": "BUTTONDOWN", + "<22,2,22>": "BUTTONUP", + "<22,2,23>": "DBLCLK", + "<22,2,24>": "DRAGREORDER", + "<22,2,25>": "LOSTCAPTURE", + "<22,2,26>": "MOUSEMOVE" + }, + "<22,3>": { + "<22,3,1>": "NewData", + "<22,3,2>": "ItemIndex,NewData,PrevData", + "<22,3,3>": "ItemIndex", + "<22,3,4>": "ItemIndex,OnTextFlag", + "<22,3,5>": "ItemIndex", + "<22,3,6>": "ItemIndex", + "<22,3,7>": "", + "<22,3,8>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<22,3,9>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<22,3,10>": "hWnd,Message,wParam,lParam", + "<22,3,11>": "CtrlColumn", + "<22,3,12>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<22,3,13>": "ItemID,MouseX,MouseY", + "<22,3,14>": "", + "<22,3,15>": "", + "<22,3,16>": "", + "<22,3,17>": "FileList,xDrop,yDrop", + "<22,3,18>": "PrevFocusID", + "<22,3,19>": "Flag,FocusID", + "<22,3,20>": "VirtCode,ScanCode,CtrlKey,ShiftKey,AltKey", + "<22,3,21>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<22,3,22>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<22,3,23>": "CtrlKey,ShiftKey,MouseButton", + "<22,3,24>": "ItemFrom,ItemTo", + "<22,3,25>": "CaptureID", + "<22,3,26>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<22,4>": { + "<22,4,1>": "0", + "<22,4,2>": "1", + "<22,4,3>": "0", + "<22,4,4>": "0", + "<22,4,5>": "0", + "<22,4,6>": "0", + "<22,4,7>": "0", + "<22,4,8>": "0", + "<22,4,9>": "1", + "<22,4,10>": "0", + "<22,4,11>": "0", + "<22,4,12>": "1", + "<22,4,13>": "0", + "<22,4,14>": "0", + "<22,4,15>": "0", + "<22,4,16>": "0", + "<22,4,17>": "0", + "<22,4,18>": "1", + "<22,4,19>": "1", + "<22,4,20>": "0", + "<22,4,21>": "0", + "<22,4,22>": "0", + "<22,4,23>": "0", + "<22,4,24>": "0", + "<22,4,25>": "0", + "<22,4,26>": "0" + }, + "<22,5>": { + "<22,5,1>": "Changed", + "<22,5,2>": "ItemChanged", + "<22,5,3>": "ItemCheck", + "<22,5,4>": "ItemClick", + "<22,5,5>": "ItemEditing", + "<22,5,6>": "ItemUnchanged", + "<22,5,7>": "LastItem", + "<22,5,8>": "OmniEvent", + "<22,5,9>": "InitContextMenu", + "<22,5,10>": "WinMsg", + "<22,5,11>": "Calculate", + "<22,5,12>": "ContextMenu", + "<22,5,13>": "Help", + "<22,5,14>": "Notes", + "<22,5,15>": "Options", + "<22,5,16>": "Timer", + "<22,5,17>": "DropFiles", + "<22,5,18>": "GotFocus", + "<22,5,19>": "LostFocus", + "<22,5,20>": "Char", + "<22,5,21>": "ButtonDown", + "<22,5,22>": "ButtonUp", + "<22,5,23>": "DblClk", + "<22,5,24>": "DragReorder", + "<22,5,25>": "LostCapture", + "<22,5,26>": "MouseMove" + }, + "<22,6>": { + "<22,6,1>": "16", + "<22,6,2>": "2", + "<22,6,3>": "16", + "<22,6,4>": "16", + "<22,6,5>": "16", + "<22,6,6>": "16", + "<22,6,7>": "16", + "<22,6,8>": "17", + "<22,6,9>": "2", + "<22,6,10>": "16", + "<22,6,11>": "17", + "<22,6,12>": "2", + "<22,6,13>": "17", + "<22,6,14>": "17", + "<22,6,15>": "16", + "<22,6,16>": "16", + "<22,6,17>": "16", + "<22,6,18>": "2", + "<22,6,19>": "2", + "<22,6,20>": "16", + "<22,6,21>": "16", + "<22,6,22>": "16", + "<22,6,23>": "24", + "<22,6,24>": "16", + "<22,6,25>": "16", + "<22,6,26>": "16" + } + }, + "<23>": { + "<23,1>": "OLECONTROL", + "<23,2>": { + "<23,2,1>": "OMNIEVENT", + "<23,2,2>": "INITCONTEXTMENU", + "<23,2,3>": "WINMSG", + "<23,2,4>": "CONTEXTMENU", + "<23,2,5>": "HELP", + "<23,2,6>": "NOTES", + "<23,2,7>": "TIMER", + "<23,2,8>": "DROPFILES", + "<23,2,9>": "GOTFOCUS", + "<23,2,10>": "LOSTFOCUS", + "<23,2,11>": "BUTTONDOWN", + "<23,2,12>": "BUTTONUP", + "<23,2,13>": "LOSTCAPTURE", + "<23,2,14>": "MOUSEMOVE", + "<23,2,15>": "OLE" + }, + "<23,3>": { + "<23,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<23,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<23,3,3>": "hWnd,Message,wParam,lParam", + "<23,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<23,3,5>": "ItemID,MouseX,MouseY", + "<23,3,6>": "", + "<23,3,7>": "", + "<23,3,8>": "FileList,xDrop,yDrop", + "<23,3,9>": "PrevFocusID", + "<23,3,10>": "Flag,FocusID", + "<23,3,11>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<23,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<23,3,13>": "CaptureID", + "<23,3,14>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton", + "<23,3,15>": "EventName,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8,Param9,Param10" + }, + "<23,4>": { + "<23,4,1>": "0", + "<23,4,2>": "1", + "<23,4,3>": "0", + "<23,4,4>": "1", + "<23,4,5>": "0", + "<23,4,6>": "0", + "<23,4,7>": "0", + "<23,4,8>": "0", + "<23,4,9>": "1", + "<23,4,10>": "1", + "<23,4,11>": "0", + "<23,4,12>": "0", + "<23,4,13>": "0", + "<23,4,14>": "0", + "<23,4,15>": "1" + }, + "<23,5>": { + "<23,5,1>": "OmniEvent", + "<23,5,2>": "InitContextMenu", + "<23,5,3>": "WinMsg", + "<23,5,4>": "ContextMenu", + "<23,5,5>": "Help", + "<23,5,6>": "Notes", + "<23,5,7>": "Timer", + "<23,5,8>": "DropFiles", + "<23,5,9>": "GotFocus", + "<23,5,10>": "LostFocus", + "<23,5,11>": "ButtonDown", + "<23,5,12>": "ButtonUp", + "<23,5,13>": "LostCapture", + "<23,5,14>": "MouseMove", + "<23,5,15>": "OLE" + }, + "<23,6>": { + "<23,6,1>": "17", + "<23,6,2>": "2", + "<23,6,3>": "16", + "<23,6,4>": "2", + "<23,6,5>": "17", + "<23,6,6>": "17", + "<23,6,7>": "16", + "<23,6,8>": "16", + "<23,6,9>": "2", + "<23,6,10>": "2", + "<23,6,11>": "16", + "<23,6,12>": "16", + "<23,6,13>": "16", + "<23,6,14>": "16", + "<23,6,15>": "10" + } + }, + "<24>": { + "<24,1>": "PANEL", + "<24,2>": { + "<24,2,1>": "OMNIEVENT", + "<24,2,2>": "PAGECHANGED", + "<24,2,3>": "INITCONTEXTMENU", + "<24,2,4>": "WINMSG", + "<24,2,5>": "CONTEXTMENU", + "<24,2,6>": "HELP", + "<24,2,7>": "NOTES", + "<24,2,8>": "TIMER", + "<24,2,9>": "DROPFILES", + "<24,2,10>": "SIZE", + "<24,2,11>": "BUTTONDOWN", + "<24,2,12>": "BUTTONUP", + "<24,2,13>": "LOSTCAPTURE", + "<24,2,14>": "MOUSEMOVE" + }, + "<24,3>": { + "<24,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<24,3,2>": "PageNum", + "<24,3,3>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<24,3,4>": "hWnd,Message,wParam,lParam", + "<24,3,5>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<24,3,6>": "ItemID,MouseX,MouseY", + "<24,3,7>": "", + "<24,3,8>": "", + "<24,3,9>": "FileList,xDrop,yDrop", + "<24,3,10>": "x,y,Width,Height", + "<24,3,11>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<24,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<24,3,13>": "CaptureID", + "<24,3,14>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<24,4>": { + "<24,4,1>": "0", + "<24,4,2>": "0", + "<24,4,3>": "1", + "<24,4,4>": "0", + "<24,4,5>": "1", + "<24,4,6>": "0", + "<24,4,7>": "0", + "<24,4,8>": "0", + "<24,4,9>": "0", + "<24,4,10>": "0", + "<24,4,11>": "0", + "<24,4,12>": "0", + "<24,4,13>": "0", + "<24,4,14>": "0" + }, + "<24,5>": { + "<24,5,1>": "OmniEvent", + "<24,5,2>": "PageChanged", + "<24,5,3>": "InitContextMenu", + "<24,5,4>": "WinMsg", + "<24,5,5>": "ContextMenu", + "<24,5,6>": "Help", + "<24,5,7>": "Notes", + "<24,5,8>": "Timer", + "<24,5,9>": "DropFiles", + "<24,5,10>": "Size", + "<24,5,11>": "ButtonDown", + "<24,5,12>": "ButtonUp", + "<24,5,13>": "LostCapture", + "<24,5,14>": "MouseMove" + }, + "<24,6>": { + "<24,6,1>": "17", + "<24,6,2>": "16", + "<24,6,3>": "2", + "<24,6,4>": "16", + "<24,6,5>": "2", + "<24,6,6>": "17", + "<24,6,7>": "17", + "<24,6,8>": "16", + "<24,6,9>": "16", + "<24,6,10>": "16", + "<24,6,11>": "16", + "<24,6,12>": "16", + "<24,6,13>": "16", + "<24,6,14>": "16" + } + }, + "<25>": { + "<25,1>": "PROGRESSBAR", + "<25,2>": { + "<25,2,1>": "OMNIEVENT", + "<25,2,2>": "INITCONTEXTMENU", + "<25,2,3>": "WINMSG", + "<25,2,4>": "CONTEXTMENU", + "<25,2,5>": "HELP", + "<25,2,6>": "NOTES", + "<25,2,7>": "TIMER", + "<25,2,8>": "DROPFILES", + "<25,2,9>": "BUTTONDOWN", + "<25,2,10>": "BUTTONUP", + "<25,2,11>": "LOSTCAPTURE", + "<25,2,12>": "MOUSEMOVE" + }, + "<25,3>": { + "<25,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<25,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<25,3,3>": "hWnd,Message,wParam,lParam", + "<25,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<25,3,5>": "ItemID,MouseX,MouseY", + "<25,3,6>": "", + "<25,3,7>": "", + "<25,3,8>": "FileList,xDrop,yDrop", + "<25,3,9>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<25,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<25,3,11>": "CaptureID", + "<25,3,12>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<25,4>": { + "<25,4,1>": "0", + "<25,4,2>": "1", + "<25,4,3>": "0", + "<25,4,4>": "1", + "<25,4,5>": "0", + "<25,4,6>": "0", + "<25,4,7>": "0", + "<25,4,8>": "0", + "<25,4,9>": "0", + "<25,4,10>": "0", + "<25,4,11>": "0", + "<25,4,12>": "0" + }, + "<25,5>": { + "<25,5,1>": "OmniEvent", + "<25,5,2>": "InitContextMenu", + "<25,5,3>": "WinMsg", + "<25,5,4>": "ContextMenu", + "<25,5,5>": "Help", + "<25,5,6>": "Notes", + "<25,5,7>": "Timer", + "<25,5,8>": "DropFiles", + "<25,5,9>": "ButtonDown", + "<25,5,10>": "ButtonUp", + "<25,5,11>": "LostCapture", + "<25,5,12>": "MouseMove" + }, + "<25,6>": { + "<25,6,1>": "17", + "<25,6,2>": "2", + "<25,6,3>": "16", + "<25,6,4>": "2", + "<25,6,5>": "17", + "<25,6,6>": "17", + "<25,6,7>": "16", + "<25,6,8>": "16", + "<25,6,9>": "16", + "<25,6,10>": "16", + "<25,6,11>": "16", + "<25,6,12>": "16" + } + }, + "<26>": { + "<26,1>": "PROPERTYGRID", + "<26,2>": { + "<26,2,1>": "EDITSTATECHANGED", + "<26,2,2>": "OMNIEVENT", + "<26,2,3>": "PROPCHANGED", + "<26,2,4>": "INITCONTEXTMENU", + "<26,2,5>": "WINMSG", + "<26,2,6>": "CONTEXTMENU", + "<26,2,7>": "HELP", + "<26,2,8>": "NOTES", + "<26,2,9>": "PROPOPTIONS", + "<26,2,10>": "TIMER", + "<26,2,11>": "DROPFILES", + "<26,2,12>": "GOTFOCUS", + "<26,2,13>": "LOSTFOCUS", + "<26,2,14>": "SELPROPCHANGED", + "<26,2,15>": "BUTTONDOWN", + "<26,2,16>": "BUTTONUP", + "<26,2,17>": "LOSTCAPTURE", + "<26,2,18>": "MOUSEMOVE" + }, + "<26,3>": { + "<26,3,1>": "EditState", + "<26,3,2>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<26,3,3>": "PropertyName,PropertyValue,ContextFlags", + "<26,3,4>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<26,3,5>": "hWnd,Message,wParam,lParam", + "<26,3,6>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<26,3,7>": "ItemID,MouseX,MouseY", + "<26,3,8>": "", + "<26,3,9>": "PropertyName,PropertyValue", + "<26,3,10>": "", + "<26,3,11>": "FileList,xDrop,yDrop", + "<26,3,12>": "PrevFocusID", + "<26,3,13>": "Flag,FocusID", + "<26,3,14>": "PrevPropertyName,NextPropertyName", + "<26,3,15>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<26,3,16>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<26,3,17>": "CaptureID", + "<26,3,18>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<26,4>": { + "<26,4,1>": "1", + "<26,4,2>": "0", + "<26,4,3>": "1", + "<26,4,4>": "1", + "<26,4,5>": "0", + "<26,4,6>": "1", + "<26,4,7>": "0", + "<26,4,8>": "0", + "<26,4,9>": "0", + "<26,4,10>": "0", + "<26,4,11>": "0", + "<26,4,12>": "1", + "<26,4,13>": "1", + "<26,4,14>": "1", + "<26,4,15>": "0", + "<26,4,16>": "0", + "<26,4,17>": "0", + "<26,4,18>": "0" + }, + "<26,5>": { + "<26,5,1>": "EditStateChanged", + "<26,5,2>": "OmniEvent", + "<26,5,3>": "PropChanged", + "<26,5,4>": "InitContextMenu", + "<26,5,5>": "WinMsg", + "<26,5,6>": "ContextMenu", + "<26,5,7>": "Help", + "<26,5,8>": "Notes", + "<26,5,9>": "PropOptions", + "<26,5,10>": "Timer", + "<26,5,11>": "DropFiles", + "<26,5,12>": "GotFocus", + "<26,5,13>": "LostFocus", + "<26,5,14>": "PropSelChanged", + "<26,5,15>": "ButtonDown", + "<26,5,16>": "ButtonUp", + "<26,5,17>": "LostCapture", + "<26,5,18>": "MouseMove" + }, + "<26,6>": { + "<26,6,1>": "2", + "<26,6,2>": "17", + "<26,6,3>": "10", + "<26,6,4>": "2", + "<26,6,5>": "16", + "<26,6,6>": "2", + "<26,6,7>": "17", + "<26,6,8>": "17", + "<26,6,9>": "16", + "<26,6,10>": "16", + "<26,6,11>": "16", + "<26,6,12>": "2", + "<26,6,13>": "2", + "<26,6,14>": "2", + "<26,6,15>": "16", + "<26,6,16>": "16", + "<26,6,17>": "16", + "<26,6,18>": "16" + } + }, + "<27>": { + "<27,1>": "PUSHBMP", + "<27,2>": { + "<27,2,1>": "OMNIEVENT", + "<27,2,2>": "INITCONTEXTMENU", + "<27,2,3>": "WINMSG", + "<27,2,4>": "CONTEXTMENU", + "<27,2,5>": "DROPDOWN", + "<27,2,6>": "HELP", + "<27,2,7>": "NOTES", + "<27,2,8>": "TIMER", + "<27,2,9>": "DROPFILES", + "<27,2,10>": "GOTFOCUS", + "<27,2,11>": "LOSTFOCUS", + "<27,2,12>": "BUTTONDOWN", + "<27,2,13>": "BUTTONUP", + "<27,2,14>": "CLICK", + "<27,2,15>": "DBLCLK", + "<27,2,16>": "LOSTCAPTURE", + "<27,2,17>": "MOUSEMOVE" + }, + "<27,3>": { + "<27,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<27,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<27,3,3>": "hWnd,Message,wParam,lParam", + "<27,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<27,3,5>": "EditLineText", + "<27,3,6>": "ItemID,MouseX,MouseY", + "<27,3,7>": "", + "<27,3,8>": "", + "<27,3,9>": "FileList,xDrop,yDrop", + "<27,3,10>": "PrevFocusID", + "<27,3,11>": "Flag,FocusID", + "<27,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<27,3,13>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<27,3,14>": "", + "<27,3,15>": "CtrlKey,ShiftKey,MouseButton", + "<27,3,16>": "CaptureID", + "<27,3,17>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<27,4>": { + "<27,4,1>": "0", + "<27,4,2>": "1", + "<27,4,3>": "0", + "<27,4,4>": "1", + "<27,4,5>": "0", + "<27,4,6>": "0", + "<27,4,7>": "0", + "<27,4,8>": "0", + "<27,4,9>": "0", + "<27,4,10>": "1", + "<27,4,11>": "1", + "<27,4,12>": "0", + "<27,4,13>": "0", + "<27,4,14>": "1", + "<27,4,15>": "0", + "<27,4,16>": "0", + "<27,4,17>": "0" + }, + "<27,5>": { + "<27,5,1>": "OmniEvent", + "<27,5,2>": "InitContextMenu", + "<27,5,3>": "WinMsg", + "<27,5,4>": "ContextMenu", + "<27,5,5>": "DropDown", + "<27,5,6>": "Help", + "<27,5,7>": "Notes", + "<27,5,8>": "Timer", + "<27,5,9>": "DropFiles", + "<27,5,10>": "GotFocus", + "<27,5,11>": "LostFocus", + "<27,5,12>": "ButtonDown", + "<27,5,13>": "ButtonUp", + "<27,5,14>": "Click", + "<27,5,15>": "DblClk", + "<27,5,16>": "LostCapture", + "<27,5,17>": "MouseMove" + }, + "<27,6>": { + "<27,6,1>": "17", + "<27,6,2>": "2", + "<27,6,3>": "16", + "<27,6,4>": "2", + "<27,6,5>": "16", + "<27,6,6>": "17", + "<27,6,7>": "17", + "<27,6,8>": "16", + "<27,6,9>": "16", + "<27,6,10>": "2", + "<27,6,11>": "2", + "<27,6,12>": "16", + "<27,6,13>": "16", + "<27,6,14>": "10", + "<27,6,15>": "16", + "<27,6,16>": "16", + "<27,6,17>": "16" + } + }, + "<28>": { + "<28,1>": "PUSHBUTTON", + "<28,2>": { + "<28,2,1>": "OMNIEVENT", + "<28,2,2>": "INITCONTEXTMENU", + "<28,2,3>": "WINMSG", + "<28,2,4>": "CONTEXTMENU", + "<28,2,5>": "DROPDOWN", + "<28,2,6>": "HELP", + "<28,2,7>": "NOTES", + "<28,2,8>": "TIMER", + "<28,2,9>": "DROPFILES", + "<28,2,10>": "GOTFOCUS", + "<28,2,11>": "LOSTFOCUS", + "<28,2,12>": "BUTTONDOWN", + "<28,2,13>": "BUTTONUP", + "<28,2,14>": "CLICK", + "<28,2,15>": "DBLCLK", + "<28,2,16>": "LOSTCAPTURE", + "<28,2,17>": "MOUSEMOVE" + }, + "<28,3>": { + "<28,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<28,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<28,3,3>": "hWnd,Message,wParam,lParam", + "<28,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<28,3,5>": "EditLineText", + "<28,3,6>": "ItemID,MouseX,MouseY", + "<28,3,7>": "", + "<28,3,8>": "", + "<28,3,9>": "FileList,xDrop,yDrop", + "<28,3,10>": "PrevFocusID", + "<28,3,11>": "Flag,FocusID", + "<28,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<28,3,13>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<28,3,14>": "", + "<28,3,15>": "CtrlKey,ShiftKey,MouseButton", + "<28,3,16>": "CaptureID", + "<28,3,17>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<28,4>": { + "<28,4,1>": "0", + "<28,4,2>": "1", + "<28,4,3>": "0", + "<28,4,4>": "1", + "<28,4,5>": "0", + "<28,4,6>": "0", + "<28,4,7>": "0", + "<28,4,8>": "0", + "<28,4,9>": "0", + "<28,4,10>": "1", + "<28,4,11>": "1", + "<28,4,12>": "0", + "<28,4,13>": "0", + "<28,4,14>": "1", + "<28,4,15>": "0", + "<28,4,16>": "0", + "<28,4,17>": "0" + }, + "<28,5>": { + "<28,5,1>": "OmniEvent", + "<28,5,2>": "InitContextMenu", + "<28,5,3>": "WinMsg", + "<28,5,4>": "ContextMenu", + "<28,5,5>": "DropDown", + "<28,5,6>": "Help", + "<28,5,7>": "Notes", + "<28,5,8>": "Timer", + "<28,5,9>": "DropFiles", + "<28,5,10>": "GotFocus", + "<28,5,11>": "LostFocus", + "<28,5,12>": "ButtonDown", + "<28,5,13>": "ButtonUp", + "<28,5,14>": "Click", + "<28,5,15>": "DblClk", + "<28,5,16>": "LostCapture", + "<28,5,17>": "MouseMove" + }, + "<28,6>": { + "<28,6,1>": "17", + "<28,6,2>": "2", + "<28,6,3>": "16", + "<28,6,4>": "2", + "<28,6,5>": "16", + "<28,6,6>": "17", + "<28,6,7>": "17", + "<28,6,8>": "16", + "<28,6,9>": "16", + "<28,6,10>": "2", + "<28,6,11>": "2", + "<28,6,12>": "16", + "<28,6,13>": "16", + "<28,6,14>": "10", + "<28,6,15>": "16", + "<28,6,16>": "16", + "<28,6,17>": "16" + } + }, + "<29>": { + "<29,1>": "RADIOGROUP", + "<29,2>": { + "<29,2,1>": "OMNIEVENT", + "<29,2,2>": "INITCONTEXTMENU", + "<29,2,3>": "WINMSG", + "<29,2,4>": "CALCULATE", + "<29,2,5>": "CONTEXTMENU", + "<29,2,6>": "HELP", + "<29,2,7>": "NOTES", + "<29,2,8>": "TIMER", + "<29,2,9>": "DROPFILES", + "<29,2,10>": "GOTFOCUS", + "<29,2,11>": "LOSTFOCUS", + "<29,2,12>": "BUTTONDOWN", + "<29,2,13>": "BUTTONUP", + "<29,2,14>": "CLICK", + "<29,2,15>": "DBLCLK", + "<29,2,16>": "LOSTCAPTURE", + "<29,2,17>": "MOUSEMOVE" + }, + "<29,3>": { + "<29,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<29,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<29,3,3>": "hWnd,Message,wParam,lParam", + "<29,3,4>": "CtrlColumn", + "<29,3,5>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<29,3,6>": "ItemID,MouseX,MouseY", + "<29,3,7>": "", + "<29,3,8>": "", + "<29,3,9>": "FileList,xDrop,yDrop", + "<29,3,10>": "PrevFocusID", + "<29,3,11>": "Flag,FocusID", + "<29,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<29,3,13>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<29,3,14>": "", + "<29,3,15>": "CtrlKey,ShiftKey,MouseButton", + "<29,3,16>": "CaptureID", + "<29,3,17>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<29,4>": { + "<29,4,1>": "0", + "<29,4,2>": "1", + "<29,4,3>": "0", + "<29,4,4>": "0", + "<29,4,5>": "1", + "<29,4,6>": "0", + "<29,4,7>": "0", + "<29,4,8>": "0", + "<29,4,9>": "0", + "<29,4,10>": "1", + "<29,4,11>": "1", + "<29,4,12>": "0", + "<29,4,13>": "0", + "<29,4,14>": "1", + "<29,4,15>": "0", + "<29,4,16>": "0", + "<29,4,17>": "0" + }, + "<29,5>": { + "<29,5,1>": "OmniEvent", + "<29,5,2>": "InitContextMenu", + "<29,5,3>": "WinMsg", + "<29,5,4>": "Calculate", + "<29,5,5>": "ContextMenu", + "<29,5,6>": "Help", + "<29,5,7>": "Notes", + "<29,5,8>": "Timer", + "<29,5,9>": "DropFiles", + "<29,5,10>": "GotFocus", + "<29,5,11>": "LostFocus", + "<29,5,12>": "ButtonDown", + "<29,5,13>": "ButtonUp", + "<29,5,14>": "Click", + "<29,5,15>": "DblClk", + "<29,5,16>": "LostCapture", + "<29,5,17>": "MouseMove" + }, + "<29,6>": { + "<29,6,1>": "17", + "<29,6,2>": "2", + "<29,6,3>": "16", + "<29,6,4>": "17", + "<29,6,5>": "2", + "<29,6,6>": "17", + "<29,6,7>": "17", + "<29,6,8>": "16", + "<29,6,9>": "16", + "<29,6,10>": "2", + "<29,6,11>": "2", + "<29,6,12>": "16", + "<29,6,13>": "16", + "<29,6,14>": "10", + "<29,6,15>": "16", + "<29,6,16>": "16", + "<29,6,17>": "16" + } + }, + "<30>": { + "<30,1>": "RICHEDITBOX", + "<30,2>": { + "<30,2,1>": "CHANGED", + "<30,2,2>": "EDITSTATECHANGED", + "<30,2,3>": "OMNIEVENT", + "<30,2,4>": "INITCONTEXTMENU", + "<30,2,5>": "WINMSG", + "<30,2,6>": "CALCULATE", + "<30,2,7>": "CONTEXTMENU", + "<30,2,8>": "HELP", + "<30,2,9>": "NOTES", + "<30,2,10>": "OPTIONS", + "<30,2,11>": "REQUIRERR", + "<30,2,12>": "TIMER", + "<30,2,13>": "VALIDERR", + "<30,2,14>": "DROPFILES", + "<30,2,15>": "GOTFOCUS", + "<30,2,16>": "LOSTFOCUS", + "<30,2,17>": "CHAR", + "<30,2,18>": "BUTTONDOWN", + "<30,2,19>": "BUTTONUP", + "<30,2,20>": "LOSTCAPTURE", + "<30,2,21>": "MOUSEMOVE" + }, + "<30,3>": { + "<30,3,1>": "NewData", + "<30,3,2>": "EditState", + "<30,3,3>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<30,3,4>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<30,3,5>": "hWnd,Message,wParam,lParam", + "<30,3,6>": "CtrlColumn", + "<30,3,7>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<30,3,8>": "ItemID,MouseX,MouseY", + "<30,3,9>": "", + "<30,3,10>": "", + "<30,3,11>": "RequireInfo", + "<30,3,12>": "", + "<30,3,13>": "ValidInfo", + "<30,3,14>": "FileList,xDrop,yDrop", + "<30,3,15>": "PrevFocusID", + "<30,3,16>": "Flag,FocusID", + "<30,3,17>": "VirtCode,ScanCode,CtrlKey,ShiftKey,AltKey", + "<30,3,18>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<30,3,19>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<30,3,20>": "CaptureID", + "<30,3,21>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<30,4>": { + "<30,4,1>": "0", + "<30,4,2>": "1", + "<30,4,3>": "0", + "<30,4,4>": "1", + "<30,4,5>": "0", + "<30,4,6>": "0", + "<30,4,7>": "1", + "<30,4,8>": "0", + "<30,4,9>": "0", + "<30,4,10>": "0", + "<30,4,11>": "0", + "<30,4,12>": "0", + "<30,4,13>": "0", + "<30,4,14>": "0", + "<30,4,15>": "1", + "<30,4,16>": "1", + "<30,4,17>": "0", + "<30,4,18>": "0", + "<30,4,19>": "0", + "<30,4,20>": "0", + "<30,4,21>": "0" + }, + "<30,5>": { + "<30,5,1>": "Changed", + "<30,5,2>": "EditStateChanged", + "<30,5,3>": "OmniEvent", + "<30,5,4>": "InitContextMenu", + "<30,5,5>": "WinMsg", + "<30,5,6>": "Calculate", + "<30,5,7>": "ContextMenu", + "<30,5,8>": "Help", + "<30,5,9>": "Notes", + "<30,5,10>": "Options", + "<30,5,11>": "RequirErr", + "<30,5,12>": "Timer", + "<30,5,13>": "ValidErr", + "<30,5,14>": "DropFiles", + "<30,5,15>": "GotFocus", + "<30,5,16>": "LostFocus", + "<30,5,17>": "Char", + "<30,5,18>": "ButtonDown", + "<30,5,19>": "ButtonUp", + "<30,5,20>": "LostCapture", + "<30,5,21>": "MouseMove" + }, + "<30,6>": { + "<30,6,1>": "24", + "<30,6,2>": "2", + "<30,6,3>": "17", + "<30,6,4>": "2", + "<30,6,5>": "16", + "<30,6,6>": "17", + "<30,6,7>": "2", + "<30,6,8>": "17", + "<30,6,9>": "17", + "<30,6,10>": "16", + "<30,6,11>": "17", + "<30,6,12>": "16", + "<30,6,13>": "17", + "<30,6,14>": "16", + "<30,6,15>": "2", + "<30,6,16>": "2", + "<30,6,17>": "16", + "<30,6,18>": "16", + "<30,6,19>": "16", + "<30,6,20>": "16", + "<30,6,21>": "16" + } + }, + "<31>": { + "<31,1>": "SIMPLEPANEL", + "<31,2>": { + "<31,2,1>": "OMNIEVENT", + "<31,2,2>": "INITCONTEXTMENU", + "<31,2,3>": "WINMSG", + "<31,2,4>": "CONTEXTMENU", + "<31,2,5>": "HELP", + "<31,2,6>": "NOTES", + "<31,2,7>": "TIMER", + "<31,2,8>": "DROPFILES", + "<31,2,9>": "BUTTONDOWN", + "<31,2,10>": "BUTTONUP", + "<31,2,11>": "CLICK", + "<31,2,12>": "DBLCLK", + "<31,2,13>": "LOSTCAPTURE", + "<31,2,14>": "MOUSEMOVE" + }, + "<31,3>": { + "<31,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<31,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<31,3,3>": "hWnd,Message,wParam,lParam", + "<31,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<31,3,5>": "ItemID,MouseX,MouseY", + "<31,3,6>": "", + "<31,3,7>": "", + "<31,3,8>": "FileList,xDrop,yDrop", + "<31,3,9>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<31,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<31,3,11>": "", + "<31,3,12>": "CtrlKey,ShiftKey,MouseButton", + "<31,3,13>": "CaptureID", + "<31,3,14>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<31,4>": { + "<31,4,1>": "0", + "<31,4,2>": "1", + "<31,4,3>": "0", + "<31,4,4>": "1", + "<31,4,5>": "0", + "<31,4,6>": "0", + "<31,4,7>": "0", + "<31,4,8>": "0", + "<31,4,9>": "0", + "<31,4,10>": "0", + "<31,4,11>": "1", + "<31,4,12>": "0", + "<31,4,13>": "0", + "<31,4,14>": "0" + }, + "<31,5>": { + "<31,5,1>": "OmniEvent", + "<31,5,2>": "InitContextMenu", + "<31,5,3>": "WinMsg", + "<31,5,4>": "ContextMenu", + "<31,5,5>": "Help", + "<31,5,6>": "Notes", + "<31,5,7>": "Timer", + "<31,5,8>": "DropFiles", + "<31,5,9>": "ButtonDown", + "<31,5,10>": "ButtonUp", + "<31,5,11>": "Click", + "<31,5,12>": "DblClk", + "<31,5,13>": "LostCapture", + "<31,5,14>": "MouseMove" + }, + "<31,6>": { + "<31,6,1>": "17", + "<31,6,2>": "2", + "<31,6,3>": "16", + "<31,6,4>": "2", + "<31,6,5>": "17", + "<31,6,6>": "17", + "<31,6,7>": "16", + "<31,6,8>": "16", + "<31,6,9>": "16", + "<31,6,10>": "16", + "<31,6,11>": "10", + "<31,6,12>": "16", + "<31,6,13>": "16", + "<31,6,14>": "16" + } + }, + "<32>": { + "<32,1>": "STATIC", + "<32,2>": { + "<32,2,1>": "OMNIEVENT", + "<32,2,2>": "INITCONTEXTMENU", + "<32,2,3>": "WINMSG", + "<32,2,4>": "CALCULATE", + "<32,2,5>": "CONTEXTMENU", + "<32,2,6>": "HELP", + "<32,2,7>": "NOTES", + "<32,2,8>": "TIMER", + "<32,2,9>": "VALIDERR", + "<32,2,10>": "DROPFILES", + "<32,2,11>": "BUTTONDOWN", + "<32,2,12>": "BUTTONUP", + "<32,2,13>": "CLICK", + "<32,2,14>": "DBLCLK", + "<32,2,15>": "LOSTCAPTURE", + "<32,2,16>": "MOUSEMOVE" + }, + "<32,3>": { + "<32,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<32,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<32,3,3>": "hWnd,Message,wParam,lParam", + "<32,3,4>": "CtrlColumn", + "<32,3,5>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<32,3,6>": "ItemID,MouseX,MouseY", + "<32,3,7>": "", + "<32,3,8>": "", + "<32,3,9>": "ValidInfo", + "<32,3,10>": "FileList,xDrop,yDrop", + "<32,3,11>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<32,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<32,3,13>": "", + "<32,3,14>": "CtrlKey,ShiftKey,MouseButton", + "<32,3,15>": "CaptureID", + "<32,3,16>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<32,4>": { + "<32,4,1>": "0", + "<32,4,2>": "1", + "<32,4,3>": "0", + "<32,4,4>": "0", + "<32,4,5>": "1", + "<32,4,6>": "0", + "<32,4,7>": "0", + "<32,4,8>": "0", + "<32,4,9>": "0", + "<32,4,10>": "0", + "<32,4,11>": "0", + "<32,4,12>": "0", + "<32,4,13>": "1", + "<32,4,14>": "0", + "<32,4,15>": "0", + "<32,4,16>": "0" + }, + "<32,5>": { + "<32,5,1>": "OmniEvent", + "<32,5,2>": "InitContextMenu", + "<32,5,3>": "WinMsg", + "<32,5,4>": "Calculate", + "<32,5,5>": "ContextMenu", + "<32,5,6>": "Help", + "<32,5,7>": "Notes", + "<32,5,8>": "Timer", + "<32,5,9>": "ValidErr", + "<32,5,10>": "DropFiles", + "<32,5,11>": "ButtonDown", + "<32,5,12>": "ButtonUp", + "<32,5,13>": "Click", + "<32,5,14>": "DblClk", + "<32,5,15>": "LostCapture", + "<32,5,16>": "MouseMove" + }, + "<32,6>": { + "<32,6,1>": "17", + "<32,6,2>": "2", + "<32,6,3>": "16", + "<32,6,4>": "17", + "<32,6,5>": "2", + "<32,6,6>": "17", + "<32,6,7>": "17", + "<32,6,8>": "16", + "<32,6,9>": "17", + "<32,6,10>": "16", + "<32,6,11>": "16", + "<32,6,12>": "16", + "<32,6,13>": "10", + "<32,6,14>": "16", + "<32,6,15>": "16", + "<32,6,16>": "16" + } + }, + "<33>": { + "<33,1>": "TABCONTROL", + "<33,2>": { + "<33,2,1>": "OMNIEVENT", + "<33,2,2>": "TABCLOSE", + "<33,2,3>": "INITCONTEXTMENU", + "<33,2,4>": "WINMSG", + "<33,2,5>": "CONTEXTMENU", + "<33,2,6>": "HELP", + "<33,2,7>": "NOTES", + "<33,2,8>": "TIMER", + "<33,2,9>": "DROPFILES", + "<33,2,10>": "GOTFOCUS", + "<33,2,11>": "LOSTFOCUS", + "<33,2,12>": "BUTTONDOWN", + "<33,2,13>": "BUTTONUP", + "<33,2,14>": "CLICK", + "<33,2,15>": "LOSTCAPTURE", + "<33,2,16>": "MOUSEMOVE" + }, + "<33,3>": { + "<33,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<33,3,2>": "TabNum", + "<33,3,3>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<33,3,4>": "hWnd,Message,wParam,lParam", + "<33,3,5>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<33,3,6>": "ItemID,MouseX,MouseY", + "<33,3,7>": "", + "<33,3,8>": "", + "<33,3,9>": "FileList,xDrop,yDrop", + "<33,3,10>": "PrevFocusID", + "<33,3,11>": "Flag,FocusID", + "<33,3,12>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<33,3,13>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<33,3,14>": "", + "<33,3,15>": "CaptureID", + "<33,3,16>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<33,4>": { + "<33,4,1>": "0", + "<33,4,2>": "0", + "<33,4,3>": "1", + "<33,4,4>": "0", + "<33,4,5>": "1", + "<33,4,6>": "0", + "<33,4,7>": "0", + "<33,4,8>": "0", + "<33,4,9>": "0", + "<33,4,10>": "1", + "<33,4,11>": "1", + "<33,4,12>": "0", + "<33,4,13>": "0", + "<33,4,14>": "1", + "<33,4,15>": "0", + "<33,4,16>": "0" + }, + "<33,5>": { + "<33,5,1>": "OmniEvent", + "<33,5,2>": "TabClose", + "<33,5,3>": "InitContextMenu", + "<33,5,4>": "WinMsg", + "<33,5,5>": "ContextMenu", + "<33,5,6>": "Help", + "<33,5,7>": "Notes", + "<33,5,8>": "Timer", + "<33,5,9>": "DropFiles", + "<33,5,10>": "GotFocus", + "<33,5,11>": "LostFocus", + "<33,5,12>": "ButtonDown", + "<33,5,13>": "ButtonUp", + "<33,5,14>": "Click", + "<33,5,15>": "LostCapture", + "<33,5,16>": "MouseMove" + }, + "<33,6>": { + "<33,6,1>": "17", + "<33,6,2>": "16", + "<33,6,3>": "2", + "<33,6,4>": "16", + "<33,6,5>": "2", + "<33,6,6>": "17", + "<33,6,7>": "17", + "<33,6,8>": "16", + "<33,6,9>": "16", + "<33,6,10>": "2", + "<33,6,11>": "2", + "<33,6,12>": "16", + "<33,6,13>": "16", + "<33,6,14>": "10", + "<33,6,15>": "16", + "<33,6,16>": "16" + } + }, + "<34>": { + "<34,1>": "TREELISTBOX", + "<34,2>": { + "<34,2,1>": "CHANGED", + "<34,2,2>": "ITEMCHANGED", + "<34,2,3>": "ITEMCHECK", + "<34,2,4>": "ITEMCLICK", + "<34,2,5>": "ITEMEDITING", + "<34,2,6>": "ITEMUNCHANGED", + "<34,2,7>": "LASTITEM", + "<34,2,8>": "OMNIEVENT", + "<34,2,9>": "INITCONTEXTMENU", + "<34,2,10>": "WINMSG", + "<34,2,11>": "CALCULATE", + "<34,2,12>": "CONTEXTMENU", + "<34,2,13>": "HELP", + "<34,2,14>": "NOTES", + "<34,2,15>": "OPTIONS", + "<34,2,16>": "TIMER", + "<34,2,17>": "DROPFILES", + "<34,2,18>": "GOTFOCUS", + "<34,2,19>": "LOSTFOCUS", + "<34,2,20>": "CHAR", + "<34,2,21>": "BUTTONDOWN", + "<34,2,22>": "BUTTONUP", + "<34,2,23>": "DBLCLK", + "<34,2,24>": "DRAGREORDER", + "<34,2,25>": "LOSTCAPTURE", + "<34,2,26>": "MOUSEMOVE" + }, + "<34,3>": { + "<34,3,1>": "NewData", + "<34,3,2>": "ItemIndex,NewData,PrevData", + "<34,3,3>": "ItemIndex", + "<34,3,4>": "ItemIndex,OnTextFlag", + "<34,3,5>": "ItemIndex", + "<34,3,6>": "ItemIndex", + "<34,3,7>": "", + "<34,3,8>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<34,3,9>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<34,3,10>": "hWnd,Message,wParam,lParam", + "<34,3,11>": "CtrlColumn", + "<34,3,12>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<34,3,13>": "ItemID,MouseX,MouseY", + "<34,3,14>": "", + "<34,3,15>": "", + "<34,3,16>": "", + "<34,3,17>": "FileList,xDrop,yDrop", + "<34,3,18>": "PrevFocusID", + "<34,3,19>": "Flag,FocusID", + "<34,3,20>": "VirtCode,ScanCode,CtrlKey,ShiftKey,AltKey", + "<34,3,21>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<34,3,22>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<34,3,23>": "CtrlKey,ShiftKey,MouseButton", + "<34,3,24>": "ItemFrom,ItemTo", + "<34,3,25>": "CaptureID", + "<34,3,26>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<34,4>": { + "<34,4,1>": "0", + "<34,4,2>": "1", + "<34,4,3>": "0", + "<34,4,4>": "0", + "<34,4,5>": "0", + "<34,4,6>": "0", + "<34,4,7>": "0", + "<34,4,8>": "0", + "<34,4,9>": "1", + "<34,4,10>": "0", + "<34,4,11>": "0", + "<34,4,12>": "1", + "<34,4,13>": "0", + "<34,4,14>": "0", + "<34,4,15>": "0", + "<34,4,16>": "0", + "<34,4,17>": "0", + "<34,4,18>": "1", + "<34,4,19>": "1", + "<34,4,20>": "0", + "<34,4,21>": "0", + "<34,4,22>": "0", + "<34,4,23>": "0", + "<34,4,24>": "0", + "<34,4,25>": "0", + "<34,4,26>": "0" + }, + "<34,5>": { + "<34,5,1>": "Changed", + "<34,5,2>": "ItemChanged", + "<34,5,3>": "ItemCheck", + "<34,5,4>": "ItemClick", + "<34,5,5>": "ItemEditing", + "<34,5,6>": "ItemUnchanged", + "<34,5,7>": "LastItem", + "<34,5,8>": "OmniEvent", + "<34,5,9>": "InitContextMenu", + "<34,5,10>": "WinMsg", + "<34,5,11>": "Calculate", + "<34,5,12>": "ContextMenu", + "<34,5,13>": "Help", + "<34,5,14>": "Notes", + "<34,5,15>": "Options", + "<34,5,16>": "Timer", + "<34,5,17>": "DropFiles", + "<34,5,18>": "GotFocus", + "<34,5,19>": "LostFocus", + "<34,5,20>": "Char", + "<34,5,21>": "ButtonDown", + "<34,5,22>": "ButtonUp", + "<34,5,23>": "DblClk", + "<34,5,24>": "DragReorder", + "<34,5,25>": "LostCapture", + "<34,5,26>": "MouseMove" + }, + "<34,6>": { + "<34,6,1>": "16", + "<34,6,2>": "2", + "<34,6,3>": "16", + "<34,6,4>": "16", + "<34,6,5>": "16", + "<34,6,6>": "16", + "<34,6,7>": "16", + "<34,6,8>": "17", + "<34,6,9>": "2", + "<34,6,10>": "16", + "<34,6,11>": "17", + "<34,6,12>": "2", + "<34,6,13>": "17", + "<34,6,14>": "17", + "<34,6,15>": "16", + "<34,6,16>": "16", + "<34,6,17>": "16", + "<34,6,18>": "2", + "<34,6,19>": "2", + "<34,6,20>": "16", + "<34,6,21>": "16", + "<34,6,22>": "16", + "<34,6,23>": "24", + "<34,6,24>": "16", + "<34,6,25>": "16", + "<34,6,26>": "16" + } + }, + "<35>": { + "<35,1>": "UPDOWN", + "<35,2>": { + "<35,2,1>": "DELTAPOS", + "<35,2,2>": "HSCROLL", + "<35,2,3>": "OMNIEVENT", + "<35,2,4>": "VSCROLL", + "<35,2,5>": "INITCONTEXTMENU", + "<35,2,6>": "WINMSG", + "<35,2,7>": "CALCULATE", + "<35,2,8>": "CONTEXTMENU", + "<35,2,9>": "HELP", + "<35,2,10>": "NOTES", + "<35,2,11>": "TIMER", + "<35,2,12>": "DROPFILES", + "<35,2,13>": "GOTFOCUS", + "<35,2,14>": "LOSTFOCUS", + "<35,2,15>": "BUTTONDOWN", + "<35,2,16>": "BUTTONUP", + "<35,2,17>": "LOSTCAPTURE", + "<35,2,18>": "MOUSEMOVE" + }, + "<35,3>": { + "<35,3,1>": "PrevPos,DeltaVal,NewPos", + "<35,3,2>": "Value", + "<35,3,3>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<35,3,4>": "Value", + "<35,3,5>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<35,3,6>": "hWnd,Message,wParam,lParam", + "<35,3,7>": "CtrlColumn", + "<35,3,8>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<35,3,9>": "ItemID,MouseX,MouseY", + "<35,3,10>": "", + "<35,3,11>": "", + "<35,3,12>": "FileList,xDrop,yDrop", + "<35,3,13>": "PrevFocusID", + "<35,3,14>": "Flag,FocusID", + "<35,3,15>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<35,3,16>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<35,3,17>": "CaptureID", + "<35,3,18>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<35,4>": { + "<35,4,1>": "0", + "<35,4,2>": "0", + "<35,4,3>": "0", + "<35,4,4>": "0", + "<35,4,5>": "1", + "<35,4,6>": "0", + "<35,4,7>": "0", + "<35,4,8>": "1", + "<35,4,9>": "0", + "<35,4,10>": "0", + "<35,4,11>": "0", + "<35,4,12>": "0", + "<35,4,13>": "1", + "<35,4,14>": "1", + "<35,4,15>": "0", + "<35,4,16>": "0", + "<35,4,17>": "0", + "<35,4,18>": "0" + }, + "<35,5>": { + "<35,5,1>": "DeltaPos", + "<35,5,2>": "HScroll", + "<35,5,3>": "OmniEvent", + "<35,5,4>": "VScroll", + "<35,5,5>": "InitContextMenu", + "<35,5,6>": "WinMsg", + "<35,5,7>": "Calculate", + "<35,5,8>": "ContextMenu", + "<35,5,9>": "Help", + "<35,5,10>": "Notes", + "<35,5,11>": "Timer", + "<35,5,12>": "DropFiles", + "<35,5,13>": "GotFocus", + "<35,5,14>": "LostFocus", + "<35,5,15>": "ButtonDown", + "<35,5,16>": "ButtonUp", + "<35,5,17>": "LostCapture", + "<35,5,18>": "MouseMove" + }, + "<35,6>": { + "<35,6,1>": "16", + "<35,6,2>": "16", + "<35,6,3>": "17", + "<35,6,4>": "24", + "<35,6,5>": "2", + "<35,6,6>": "16", + "<35,6,7>": "17", + "<35,6,8>": "2", + "<35,6,9>": "17", + "<35,6,10>": "17", + "<35,6,11>": "16", + "<35,6,12>": "16", + "<35,6,13>": "2", + "<35,6,14>": "2", + "<35,6,15>": "16", + "<35,6,16>": "16", + "<35,6,17>": "16", + "<35,6,18>": "16" + } + }, + "<36>": { + "<36,1>": "VSCROLLBAR", + "<36,2>": { + "<36,2,1>": "OMNIEVENT", + "<36,2,2>": "VSCROLL", + "<36,2,3>": "INITCONTEXTMENU", + "<36,2,4>": "WINMSG", + "<36,2,5>": "CALCULATE", + "<36,2,6>": "CONTEXTMENU", + "<36,2,7>": "HELP", + "<36,2,8>": "NOTES", + "<36,2,9>": "TIMER", + "<36,2,10>": "DROPFILES", + "<36,2,11>": "GOTFOCUS", + "<36,2,12>": "LOSTFOCUS", + "<36,2,13>": "BUTTONDOWN", + "<36,2,14>": "BUTTONUP", + "<36,2,15>": "LOSTCAPTURE", + "<36,2,16>": "MOUSEMOVE" + }, + "<36,3>": { + "<36,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<36,3,2>": "Value", + "<36,3,3>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<36,3,4>": "hWnd,Message,wParam,lParam", + "<36,3,5>": "CtrlColumn", + "<36,3,6>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<36,3,7>": "ItemID,MouseX,MouseY", + "<36,3,8>": "", + "<36,3,9>": "", + "<36,3,10>": "FileList,xDrop,yDrop", + "<36,3,11>": "PrevFocusID", + "<36,3,12>": "Flag,FocusID", + "<36,3,13>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<36,3,14>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<36,3,15>": "CaptureID", + "<36,3,16>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<36,4>": { + "<36,4,1>": "0", + "<36,4,2>": "0", + "<36,4,3>": "1", + "<36,4,4>": "0", + "<36,4,5>": "0", + "<36,4,6>": "1", + "<36,4,7>": "0", + "<36,4,8>": "0", + "<36,4,9>": "0", + "<36,4,10>": "0", + "<36,4,11>": "1", + "<36,4,12>": "1", + "<36,4,13>": "0", + "<36,4,14>": "0", + "<36,4,15>": "0", + "<36,4,16>": "0" + }, + "<36,5>": { + "<36,5,1>": "OmniEvent", + "<36,5,2>": "VScroll", + "<36,5,3>": "InitContextMenu", + "<36,5,4>": "WinMsg", + "<36,5,5>": "Calculate", + "<36,5,6>": "ContextMenu", + "<36,5,7>": "Help", + "<36,5,8>": "Notes", + "<36,5,9>": "Timer", + "<36,5,10>": "DropFiles", + "<36,5,11>": "GotFocus", + "<36,5,12>": "LostFocus", + "<36,5,13>": "ButtonDown", + "<36,5,14>": "ButtonUp", + "<36,5,15>": "LostCapture", + "<36,5,16>": "MouseMove" + }, + "<36,6>": { + "<36,6,1>": "17", + "<36,6,2>": "24", + "<36,6,3>": "2", + "<36,6,4>": "16", + "<36,6,5>": "17", + "<36,6,6>": "2", + "<36,6,7>": "17", + "<36,6,8>": "17", + "<36,6,9>": "16", + "<36,6,10>": "16", + "<36,6,11>": "2", + "<36,6,12>": "2", + "<36,6,13>": "16", + "<36,6,14>": "16", + "<36,6,15>": "16", + "<36,6,16>": "16" + } + }, + "<37>": { + "<37,1>": "VSPLITBAR", + "<37,2>": { + "<37,2,1>": "OMNIEVENT", + "<37,2,2>": "INITCONTEXTMENU", + "<37,2,3>": "WINMSG", + "<37,2,4>": "CONTEXTMENU", + "<37,2,5>": "HELP", + "<37,2,6>": "NOTES", + "<37,2,7>": "TIMER", + "<37,2,8>": "DROPFILES", + "<37,2,9>": "MOVE", + "<37,2,10>": "BUTTONDOWN", + "<37,2,11>": "BUTTONUP", + "<37,2,12>": "CLICK", + "<37,2,13>": "DBLCLK", + "<37,2,14>": "LOSTCAPTURE", + "<37,2,15>": "MOUSEMOVE" + }, + "<37,3>": { + "<37,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<37,3,2>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<37,3,3>": "hWnd,Message,wParam,lParam", + "<37,3,4>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<37,3,5>": "ItemID,MouseX,MouseY", + "<37,3,6>": "", + "<37,3,7>": "", + "<37,3,8>": "FileList,xDrop,yDrop", + "<37,3,9>": "XCoord", + "<37,3,10>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<37,3,11>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<37,3,12>": "", + "<37,3,13>": "CtrlKey,ShiftKey,MouseButton", + "<37,3,14>": "CaptureID", + "<37,3,15>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton" + }, + "<37,4>": { + "<37,4,1>": "0", + "<37,4,2>": "1", + "<37,4,3>": "0", + "<37,4,4>": "1", + "<37,4,5>": "0", + "<37,4,6>": "0", + "<37,4,7>": "0", + "<37,4,8>": "0", + "<37,4,9>": "0", + "<37,4,10>": "0", + "<37,4,11>": "0", + "<37,4,12>": "1", + "<37,4,13>": "0", + "<37,4,14>": "0", + "<37,4,15>": "0" + }, + "<37,5>": { + "<37,5,1>": "OmniEvent", + "<37,5,2>": "InitContextMenu", + "<37,5,3>": "WinMsg", + "<37,5,4>": "ContextMenu", + "<37,5,5>": "Help", + "<37,5,6>": "Notes", + "<37,5,7>": "Timer", + "<37,5,8>": "DropFiles", + "<37,5,9>": "Move", + "<37,5,10>": "ButtonDown", + "<37,5,11>": "ButtonUp", + "<37,5,12>": "Click", + "<37,5,13>": "DblClk", + "<37,5,14>": "LostCapture", + "<37,5,15>": "MouseMove" + }, + "<37,6>": { + "<37,6,1>": "17", + "<37,6,2>": "2", + "<37,6,3>": "16", + "<37,6,4>": "2", + "<37,6,5>": "17", + "<37,6,6>": "17", + "<37,6,7>": "16", + "<37,6,8>": "16", + "<37,6,9>": "24", + "<37,6,10>": "16", + "<37,6,11>": "16", + "<37,6,12>": "2", + "<37,6,13>": "16", + "<37,6,14>": "16", + "<37,6,15>": "16" + } + }, + "<38>": { + "<38,1>": "WEBVIEW", + "<38,2>": { + "<38,2,1>": "OMNIEVENT", + "<38,2,2>": "WINMSG", + "<38,2,3>": "HELP", + "<38,2,4>": "NOTES", + "<38,2,5>": "TIMER", + "<38,2,6>": "GOTFOCUS", + "<38,2,7>": "LOSTFOCUS", + "<38,2,8>": "WEBCDPEVENT", + "<38,2,9>": "WEBCDPMETHODRESULT", + "<38,2,10>": "WEBCCLOSEWINDOW", + "<38,2,11>": "WEBDATACLEARED", + "<38,2,12>": "WEBPDFPRINTED", + "<38,2,13>": "WEBSAVEDTOFILE", + "<38,2,14>": "WEBSUSPENDED", + "<38,2,15>": "WEBVIEWCREATED", + "<38,2,16>": "WEBCONTENTLOADED", + "<38,2,17>": "WEBCONTENTLOADING", + "<38,2,18>": "WEBHISTORYCHANGED", + "<38,2,19>": "WEBNAVIGATED", + "<38,2,20>": "WEBNAVIGATING", + "<38,2,21>": "WEBOINAVIGATION", + "<38,2,22>": "WEBSOURCECHANGED", + "<38,2,23>": "WEBTITLECHANGED", + "<38,2,24>": "WEBINITSCRIPTADDED", + "<38,2,25>": "WEBMESSAGE", + "<38,2,26>": "WEBSCRIPTRESULT", + "<38,2,27>": "WEBAUTHREQUEST", + "<38,2,28>": "WEBPERMISSIONREQUEST", + "<38,2,29>": "WEBSYNCSCRIPTRESULT", + "<38,2,30>": "WEBAUDIOCHANGED", + "<38,2,31>": "WEBCONTEXTMENU", + "<38,2,32>": "WEBINITCONTEXTMENU", + "<38,2,33>": "WEBMUTEDCHANGED", + "<38,2,34>": "WEBOPENWINDOW", + "<38,2,35>": "WEBSHOWDIALOG", + "<38,2,36>": "WEBSTATUSTEXTCHANGED", + "<38,2,37>": "WEBZOOMCHANGED" + }, + "<38,3>": { + "<38,3,1>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<38,3,2>": "hWnd,Message,wParam,lParam", + "<38,3,3>": "ItemID,MouseX,MouseY", + "<38,3,4>": "", + "<38,3,5>": "", + "<38,3,6>": "PrevFocusID", + "<38,3,7>": "Flag,FocusID", + "<38,3,8>": "EventName,JsonEventInfo,SessionID", + "<38,3,9>": "ErrorCode,JsonResult", + "<38,3,10>": "", + "<38,3,11>": "SuccessFlag,ErrorCode", + "<38,3,12>": "FileName,SuccessFlag,ErrorCode", + "<38,3,13>": "FileName,SuccessFlag,ErrorCode,ErrorText", + "<38,3,14>": "SuccessFlag,ErrorCode", + "<38,3,15>": "", + "<38,3,16>": "NavID,URI", + "<38,3,17>": "NavID,URI,ErrorPage", + "<38,3,18>": "", + "<38,3,19>": "NavID,URI,Redirected,UserInitiated,StatusInfo,FrameID", + "<38,3,20>": "NavID,URI,Redirected,UserInitiated,FrameID", + "<38,3,21>": "URI,Redirected,UserInitiated,FrameID", + "<38,3,22>": "NewDocument", + "<38,3,23>": "DocumentTitle", + "<38,3,24>": "ID,ErrorCode", + "<38,3,25>": "URI,JsonMessage,TextMessage", + "<38,3,26>": "ErrorCode,ScriptResult", + "<38,3,27>": "URI,Challenge", + "<38,3,28>": "URI,RequestType,UserInitiated", + "<38,3,29>": "ErrorCode,ScriptResult", + "<38,3,30>": "AudioPlaying", + "<38,3,31>": "MenuID,MenuStruct,xPos,yPos,TargetInfo,DefaultStruct,AttachOnly", + "<38,3,32>": "MenuID,xPos,yPos,TargetInfo,DefaultStruct", + "<38,3,33>": "Muted", + "<38,3,34>": "OpenID,URI,WindowInfo,UserInitiated", + "<38,3,35>": "DialogID,URI,DialogType,MessageText,DefaultResponse", + "<38,3,36>": "StatusText", + "<38,3,37>": "ZoomFactor" + }, + "<38,4>": { + "<38,4,1>": "0", + "<38,4,2>": "0", + "<38,4,3>": "0", + "<38,4,4>": "0", + "<38,4,5>": "0", + "<38,4,6>": "1", + "<38,4,7>": "1", + "<38,4,8>": "0", + "<38,4,9>": "0", + "<38,4,10>": "0", + "<38,4,11>": "0", + "<38,4,12>": "0", + "<38,4,13>": "0", + "<38,4,14>": "0", + "<38,4,15>": "0", + "<38,4,16>": "0", + "<38,4,17>": "0", + "<38,4,18>": "0", + "<38,4,19>": "0", + "<38,4,20>": "0", + "<38,4,21>": "0", + "<38,4,22>": "0", + "<38,4,23>": "0", + "<38,4,24>": "0", + "<38,4,25>": "0", + "<38,4,26>": "0", + "<38,4,27>": "1", + "<38,4,28>": "1", + "<38,4,29>": "1", + "<38,4,30>": "0", + "<38,4,31>": "1", + "<38,4,32>": "1", + "<38,4,33>": "0", + "<38,4,34>": "1", + "<38,4,35>": "1", + "<38,4,36>": "0", + "<38,4,37>": "0" + }, + "<38,5>": { + "<38,5,1>": "OmniEvent", + "<38,5,2>": "WinMsg", + "<38,5,3>": "Help", + "<38,5,4>": "Notes", + "<38,5,5>": "Timer", + "<38,5,6>": "GotFocus", + "<38,5,7>": "LostFocus", + "<38,5,8>": "WebCDPEvent", + "<38,5,9>": "WebCDPMethodResult", + "<38,5,10>": "WebCloseWindow", + "<38,5,11>": "WebDataCleared", + "<38,5,12>": "WebPdfPrinted", + "<38,5,13>": "WebSavedToFile", + "<38,5,14>": "WebSuspended", + "<38,5,15>": "WebViewCreated", + "<38,5,16>": "WebContentLoaded", + "<38,5,17>": "WebContentLoading", + "<38,5,18>": "WebHistoryChanged", + "<38,5,19>": "WebNavigated", + "<38,5,20>": "WebNavigating", + "<38,5,21>": "WebOINavigation", + "<38,5,22>": "WebSourceChanged", + "<38,5,23>": "WebTitleChanged", + "<38,5,24>": "WebInitScriptAdded", + "<38,5,25>": "WebMessage", + "<38,5,26>": "WebScriptResult", + "<38,5,27>": "WebAuthRequest", + "<38,5,28>": "WebPermissionRequest", + "<38,5,29>": "WebSyncScriptResult", + "<38,5,30>": "WebAudioChanged", + "<38,5,31>": "WebContextMenu", + "<38,5,32>": "WebInitContextMenu", + "<38,5,33>": "WebMutedChanged", + "<38,5,34>": "WebOpenWindow", + "<38,5,35>": "WebShowDialog", + "<38,5,36>": "WebStatusTextChanged", + "<38,5,37>": "WebZoomChanged" + }, + "<38,6>": { + "<38,6,1>": "17", + "<38,6,2>": "16", + "<38,6,3>": "17", + "<38,6,4>": "17", + "<38,6,5>": "16", + "<38,6,6>": "2", + "<38,6,7>": "2", + "<38,6,8>": "16", + "<38,6,9>": "16", + "<38,6,10>": "16", + "<38,6,11>": "16", + "<38,6,12>": "16", + "<38,6,13>": "16", + "<38,6,14>": "16", + "<38,6,15>": "16", + "<38,6,16>": "16", + "<38,6,17>": "16", + "<38,6,18>": "16", + "<38,6,19>": "16", + "<38,6,20>": "16", + "<38,6,21>": "16", + "<38,6,22>": "16", + "<38,6,23>": "16", + "<38,6,24>": "16", + "<38,6,25>": "16", + "<38,6,26>": "16", + "<38,6,27>": "2", + "<38,6,28>": "2", + "<38,6,29>": "2", + "<38,6,30>": "16", + "<38,6,31>": "2", + "<38,6,32>": "2", + "<38,6,33>": "16", + "<38,6,34>": "2", + "<38,6,35>": "2", + "<38,6,36>": "16", + "<38,6,37>": "16" + } + }, + "<39>": { + "<39,1>": "WINDOW", + "<39,2>": { + "<39,2,1>": "CREATE", + "<39,2,2>": "ENDDIALOG", + "<39,2,3>": "HSCROLL", + "<39,2,4>": "OMNIEVENT", + "<39,2,5>": "PAGECHANGED", + "<39,2,6>": "SYSMSG", + "<39,2,7>": "VSCROLL", + "<39,2,8>": "FORMDES", + "<39,2,9>": "INITCONTEXTMENU", + "<39,2,10>": "MDISELECT", + "<39,2,11>": "WINMSG", + "<39,2,12>": "VISUALSTYLECHANGED", + "<39,2,13>": "CLOSE", + "<39,2,14>": "CONTEXTMENU", + "<39,2,15>": "DROPDOWNMENU", + "<39,2,16>": "HELP", + "<39,2,17>": "NOTES", + "<39,2,18>": "OPTIONS", + "<39,2,19>": "PAGE", + "<39,2,20>": "TIMER", + "<39,2,21>": "CLEAR", + "<39,2,22>": "DELETE", + "<39,2,23>": "FORMSTATECHANGED", + "<39,2,24>": "IXLOOKUP", + "<39,2,25>": "MDICHILDSTATECHANGED", + "<39,2,26>": "READ", + "<39,2,27>": "WRITE", + "<39,2,28>": "DROPFILES", + "<39,2,29>": "ACTIVATED", + "<39,2,30>": "INACTIVATED", + "<39,2,31>": "ARRANGEICONS", + "<39,2,32>": "CASCADE", + "<39,2,33>": "SCALED", + "<39,2,34>": "SIZE", + "<39,2,35>": "TILE", + "<39,2,36>": "BUTTONDOWN", + "<39,2,37>": "BUTTONUP", + "<39,2,38>": "DBLCLK", + "<39,2,39>": "LOSTCAPTURE", + "<39,2,40>": "MOUSEMOVE", + "<39,2,41>": "QBFABS", + "<39,2,42>": "QBFCLOSE", + "<39,2,43>": "QBFFIRST", + "<39,2,44>": "QBFINIT", + "<39,2,45>": "QBFLAST", + "<39,2,46>": "QBFLOADID", + "<39,2,47>": "QBFLOADLIST", + "<39,2,48>": "QBFNEXT", + "<39,2,49>": "QBFPREV", + "<39,2,50>": "QBFQUERY", + "<39,2,51>": "QBFRUN", + "<39,2,52>": "QBFTABLE" + }, + "<39,3>": { + "<39,3,1>": "CreateParam", + "<39,3,2>": "DialogID,DialogValue,AsyncID", + "<39,3,3>": "Value", + "<39,3,4>": "Message,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8", + "<39,3,5>": "PageNum", + "<39,3,6>": "MsgCode,CancelFlag,StatCode", + "<39,3,7>": "Value", + "<39,3,8>": "EventSource,EventID,Param1,Param2,Param3,Param4", + "<39,3,9>": "MenuID,xPos,yPos,RightAlign,CustomStruct", + "<39,3,10>": "ActiveID", + "<39,3,11>": "hWnd,Message,wParam,lParam", + "<39,3,12>": "", + "<39,3,13>": "CancelFlag,CloseFlags", + "<39,3,14>": "MenuID,MenuStruct,xPos,yPos,RightAlign,AttachOnly", + "<39,3,15>": "MenuID,MenuStruct", + "<39,3,16>": "ItemID,MouseX,MouseY", + "<39,3,17>": "", + "<39,3,18>": "", + "<39,3,19>": "PageAction", + "<39,3,20>": "", + "<39,3,21>": "bSaveKey,bSuppressWarning,bMaintainFocus", + "<39,3,22>": "bSuppressWarning", + "<39,3,23>": "EventSource,FormState", + "<39,3,24>": "IndexedTable,SearchColumns,DisplayColumns,SelMode,PopupName", + "<39,3,25>": "ChildID,EventSource,FormState", + "<39,3,26>": "", + "<39,3,27>": "", + "<39,3,28>": "FileList,xDrop,yDrop", + "<39,3,29>": "", + "<39,3,30>": "", + "<39,3,31>": "", + "<39,3,32>": "", + "<39,3,33>": "OrigDpiX,OrigDpiY,OrigScaleFactor,NewDpiX,NewDpiY,NewScaleFactor", + "<39,3,34>": "x,y,Width,Height", + "<39,3,35>": "Orientation", + "<39,3,36>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<39,3,37>": "xDown,yDown,xUp,yUp,CtrlKey,ShiftKey,MouseButton", + "<39,3,38>": "CtrlKey,ShiftKey,MouseButton", + "<39,3,39>": "CaptureID", + "<39,3,40>": "MouseEvent,MouseX,MouseY,CtrlKey,ShiftKey,MouseButton", + "<39,3,41>": "AbsPos", + "<39,3,42>": "", + "<39,3,43>": "", + "<39,3,44>": "", + "<39,3,45>": "", + "<39,3,46>": "RowID", + "<39,3,47>": "", + "<39,3,48>": "", + "<39,3,49>": "", + "<39,3,50>": "", + "<39,3,51>": "", + "<39,3,52>": "" + }, + "<39,4>": { + "<39,4,1>": "0", + "<39,4,2>": "0", + "<39,4,3>": "0", + "<39,4,4>": "0", + "<39,4,5>": "0", + "<39,4,6>": "0", + "<39,4,7>": "0", + "<39,4,8>": "0", + "<39,4,9>": "1", + "<39,4,10>": "1", + "<39,4,11>": "0", + "<39,4,12>": "0", + "<39,4,13>": "1", + "<39,4,14>": "1", + "<39,4,15>": "1", + "<39,4,16>": "0", + "<39,4,17>": "0", + "<39,4,18>": "0", + "<39,4,19>": "0", + "<39,4,20>": "0", + "<39,4,21>": "0", + "<39,4,22>": "0", + "<39,4,23>": "0", + "<39,4,24>": "0", + "<39,4,25>": "0", + "<39,4,26>": "0", + "<39,4,27>": "0", + "<39,4,28>": "0", + "<39,4,29>": "1", + "<39,4,30>": "0", + "<39,4,31>": "0", + "<39,4,32>": "0", + "<39,4,33>": "0", + "<39,4,34>": "0", + "<39,4,35>": "0", + "<39,4,36>": "0", + "<39,4,37>": "0", + "<39,4,38>": "0", + "<39,4,39>": "0", + "<39,4,40>": "0", + "<39,4,41>": "0", + "<39,4,42>": "0", + "<39,4,43>": "0", + "<39,4,44>": "0", + "<39,4,45>": "0", + "<39,4,46>": "0", + "<39,4,47>": "0", + "<39,4,48>": "0", + "<39,4,49>": "0", + "<39,4,50>": "0", + "<39,4,51>": "0", + "<39,4,52>": "0" + }, + "<39,5>": { + "<39,5,1>": "Create", + "<39,5,2>": "EndDialog", + "<39,5,3>": "HScroll", + "<39,5,4>": "OmniEvent", + "<39,5,5>": "PageChanged", + "<39,5,6>": "SysMsg", + "<39,5,7>": "VScroll", + "<39,5,8>": "FormDes", + "<39,5,9>": "InitContextMenu", + "<39,5,10>": "MDISelect", + "<39,5,11>": "WinMsg", + "<39,5,12>": "VisualStyleChanged", + "<39,5,13>": "Close", + "<39,5,14>": "ContextMenu", + "<39,5,15>": "DropDownMenu", + "<39,5,16>": "Help", + "<39,5,17>": "Notes", + "<39,5,18>": "Options", + "<39,5,19>": "Page", + "<39,5,20>": "Timer", + "<39,5,21>": "Clear", + "<39,5,22>": "Delete", + "<39,5,23>": "FormStateChanged", + "<39,5,24>": "IXLookup", + "<39,5,25>": "MdiChildStateChanged", + "<39,5,26>": "Read", + "<39,5,27>": "Write", + "<39,5,28>": "DropFiles", + "<39,5,29>": "Activated", + "<39,5,30>": "Inactivated", + "<39,5,31>": "ArrangeIcons", + "<39,5,32>": "Cascade", + "<39,5,33>": "Scaled", + "<39,5,34>": "Size", + "<39,5,35>": "Tile", + "<39,5,36>": "ButtonDown", + "<39,5,37>": "ButtonUp", + "<39,5,38>": "DblClk", + "<39,5,39>": "LostCapture", + "<39,5,40>": "MouseMove", + "<39,5,41>": "QBFAbs", + "<39,5,42>": "QBFClose", + "<39,5,43>": "QBFFirst", + "<39,5,44>": "QBFInit", + "<39,5,45>": "QBFLast", + "<39,5,46>": "QBFLoadID", + "<39,5,47>": "QBFLoadList", + "<39,5,48>": "QBFNext", + "<39,5,49>": "QBFPrev", + "<39,5,50>": "QBFQuery", + "<39,5,51>": "QBFRun", + "<39,5,52>": "QBFTable" + }, + "<39,6>": { + "<39,6,1>": "25", + "<39,6,2>": "17", + "<39,6,3>": "16", + "<39,6,4>": "17", + "<39,6,5>": "16", + "<39,6,6>": "17", + "<39,6,7>": "16", + "<39,6,8>": "16", + "<39,6,9>": "2", + "<39,6,10>": "2", + "<39,6,11>": "16", + "<39,6,12>": "16", + "<39,6,13>": "2", + "<39,6,14>": "2", + "<39,6,15>": "2", + "<39,6,16>": "17", + "<39,6,17>": "17", + "<39,6,18>": "16", + "<39,6,19>": "17", + "<39,6,20>": "16", + "<39,6,21>": "17", + "<39,6,22>": "17", + "<39,6,23>": "17", + "<39,6,24>": "17", + "<39,6,25>": "17", + "<39,6,26>": "17", + "<39,6,27>": "17", + "<39,6,28>": "16", + "<39,6,29>": "2", + "<39,6,30>": "16", + "<39,6,31>": "17", + "<39,6,32>": "17", + "<39,6,33>": "16", + "<39,6,34>": "16", + "<39,6,35>": "17", + "<39,6,36>": "16", + "<39,6,37>": "16", + "<39,6,38>": "16", + "<39,6,39>": "16", + "<39,6,40>": "16", + "<39,6,41>": "17", + "<39,6,42>": "17", + "<39,6,43>": "17", + "<39,6,44>": "17", + "<39,6,45>": "17", + "<39,6,46>": "17", + "<39,6,47>": "17", + "<39,6,48>": "17", + "<39,6,49>": "17", + "<39,6,50>": "17", + "<39,6,51>": "17", + "<39,6,52>": "17" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_HASHTABLE.json b/SYSPROG/APPROW/SYSENV%003ACFG_HASHTABLE.json new file mode 100644 index 0000000..5f5c8cd --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_HASHTABLE.json @@ -0,0 +1,23 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_HASHTABLE" + }, + "body": { + "record1": { + "<1>": "RTI_HASHTABLE3", + "<2>": "", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "", + "<10>": "* Field 1: RTI_HASHTABLE3 (to use COM scripting), RTI_HASHTABLE2 (to use .NET) or RTI_HASHTABLE1 (to use RTP65)", + "<11>": "* Field 2: (optional) 1 to cache this selection", + "<12>": "* Note: If selection is cached, and you wish to change field 1, please exit and restart OI to clear the cached value" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_INET.json b/SYSPROG/APPROW/SYSENV%003ACFG_INET.json new file mode 100644 index 0000000..38d90d9 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_INET.json @@ -0,0 +1,27 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_INET" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "INET_SECURITY", + "<1,2>": "INET_FINALIZE", + "<1,3>": "INET_ABORTED" + }, + "<2>": { + "<2,1>": { + "<2,1,1>": { + "<2,1,1,1>": "Cannot process query:", + "<2,1,1,2>": "%query%" + } + } + }, + "<3>": "", + "<4>": "", + "<5>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_LOGIN.json b/SYSPROG/APPROW/SYSENV%003ACFG_LOGIN.json new file mode 100644 index 0000000..e4169c1 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_LOGIN.json @@ -0,0 +1,68 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_LOGIN" + }, + "body": { + "record1": { + "<1>": "0", + "<2>": "OIUsers", + "<3>": "OiAdmin", + "<4>": "Rev_SysAdmin", + "<5>": "0", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "*-------------------------------------------------------", + "<21>": "* SYSENV*CFG_LOGIN", + "<22>": "*-------------------------------------------------------", + "<23>": "* This record controls single sign on behavior", + "<24>": "* Set loginmode (field 1) , user groups ( fields 2,3, 4), local group flag (field 5) as needed", + "<25>": "* Save as CFG_LOGIN*MYAPP to make an application specific setting", + "<26>": "* Save as CFG_LOGIN to affect all applications in this copy of OpenInsight", + "<27>": "", + "<28>": "*---", + "<29>": "* Layout", + "<30>": "*---", + "<31>": "* <1> = LoginMode", + "<32>": "* <2> = LDAP (and/or local) Groups whose members are Normal users", + "<33>": "* <3> = LDAP (and/or local) Groups whose members are Admin users", + "<34>": "* <4> = LDAP (and/or local) Groups whose members are Sysadmin users", + "<35>": "* <5> = LocalGroupsFlag", + "<36>": "*---", + "<37>": "", + "<38>": "*--", + "<39>": "* LoginMode Description", + "<40>": "*--", + "<41>": "* LoginMode = \"0\" (or \"\" or invalid) ==> use legacy authentication, require a username/password combination define in the OpenInsight application users list.", + "<42>": "* LoginMode = \"1\" ==> get network user name, no password required, user name must exist in OpenInsight application users list.", + "<43>": "* LoginMode = \"2\" ==> get network user name, no password required, user must be a member of a network group listed in config record <2>, <3>, or <4>", + "<44>": "", + "<45>": "*--", + "<46>": "* LocalGroupsFlag Description", + "<47>": "*--", + "<48>": "* LocalGroupsFlag = \"0\" (or \"\" or invalid) ==> Only LDAP groups are checked for membership", + "<49>": "* LocalGroupsFlag = \"1\" ==> Check LDAP groups for membership first, and if not found, check local groups", + "<50>": "* LocalGroupsFlag = \"-1\" ==> Check local groups ONLY for membership (do not check LDAP groups)", + "<51>": "", + "<52>": "*---", + "<53>": "* Notes", + "<54>": "*--", + "<55>": "* The Login process will search for a record named CFG_LOGIN*appname, for example CFG_LOGIN*EXAMPLES", + "<56>": "* If that record does not exist OI will search for this record, CFG_LOGIN", + "<57>": "* If CFG_LOGIN does not exist OI will behave as if loginmode = 0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_NETOI.json b/SYSPROG/APPROW/SYSENV%003ACFG_NETOI.json new file mode 100644 index 0000000..8870e5e --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_NETOI.json @@ -0,0 +1,21 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_NETOI" + }, + "body": { + "record1": { + "<1>": "0", + "<2>": "", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "", + "<10>": "* Field 1: 0 (process all OCONVs on host) / 1 (process available OCONVs in .NET assembly if possible) / -1 (process available OCONVs in .NET)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_O4W.json b/SYSPROG/APPROW/SYSENV%003ACFG_O4W.json new file mode 100644 index 0000000..c233186 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_O4W.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_O4W" + }, + "body": { + "record1": { + "<1>": "http://www.revelation.com", + "<2>": "", + "<3>": "O4W", + "<4>": "http://localhost:18888/o4w/oecgi4.exe", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "/* Layout of CFG_O4W{*{}{*}}", + "<13>": "* 1. Default URL (used if no create params specified)", + "<14>": "* 2. {Default Width] Default Height}", + "<15>": "* 3. SiteName ]", + "<16>": "* 4. URL for site ]", + "<17>": "* {5. Title] }", + "<18>": "* {6. ProgType] }", + "<19>": "* {7. ProgDetail] }", + "<20>": "* {8. Width] }", + "<21>": "* {9. Height] }", + "<22>": "* (10.Secure] }", + "<23>": "*/", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_OIPI.json b/SYSPROG/APPROW/SYSENV%003ACFG_OIPI.json new file mode 100644 index 0000000..f20330c --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_OIPI.json @@ -0,0 +1,12 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_OIPI" + }, + "body": { + "record1": { + "<1>": "VSPRINTER" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_POLICY.json b/SYSPROG/APPROW/SYSENV%003ACFG_POLICY.json new file mode 100644 index 0000000..1f0b556 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_POLICY.json @@ -0,0 +1,12 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_POLICY" + }, + "body": { + "record1": { + "<1>": "75EF71C2595123644D9FD0C60AA81FA153363D1AB0669A2C50A08FBEE58D2D18FACA0DE42222A2A3B4A8D3AD154D1E6EAEA39B0B2B1E8F3FAF4DDEBE29FD902E266A4886B6ECC4C35A6CB9F4E160C329640D568A5154F6AB264CD15EFD4753D64DFA23AFAB169A2D8EDB" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_PS_TYPEINFO_SORT.json b/SYSPROG/APPROW/SYSENV%003ACFG_PS_TYPEINFO_SORT.json new file mode 100644 index 0000000..3742c1e --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_PS_TYPEINFO_SORT.json @@ -0,0 +1,203 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_PS_TYPEINFO_SORT" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "Design", + "<1,2>": "Data", + "<1,3>": "DataBinding", + "<1,4>": "DataBinding Options", + "<1,5>": "Layout", + "<1,6>": "Appearance", + "<1,7>": "Glyph", + "<1,8>": "Images", + "<1,9>": "Image List", + "<1,10>": "Behavior", + "<1,11>": "Check-Button", + "<1,12>": "Split-Button", + "<1,13>": "Validation", + "<1,14>": "Aero-Glass", + "<1,15>": "Advanced", + "<1,16>": "OLE Integration", + "<1,17>": "OLE Properties" + }, + "<2>": { + "<2,1>": "1", + "<2,2>": "10", + "<2,3>": "20", + "<2,4>": "25", + "<2,5>": "30", + "<2,6>": "40", + "<2,7>": "42", + "<2,8>": "43", + "<2,9>": "44", + "<2,10>": "50", + "<2,11>": "55", + "<2,12>": "56", + "<2,13>": "60", + "<2,14>": "900", + "<2,15>": "999", + "<2,16>": "52", + "<2,17>": "53" + }, + "<3>": { + "<3,1>": { + "<3,1,1>": "Name", + "<3,1,2>": "Type", + "<3,1,3>": "CommuterModule", + "<3,1,4>": "ContextMenu" + }, + "<3,2>": "Text", + "<3,3>": { + "<3,3,1>": "Table", + "<3,3,2>": "Column" + }, + "<3,4>": "", + "<3,5>": { + "<3,5,1>": "Left", + "<3,5,2>": "Top", + "<3,5,3>": "Width", + "<3,5,4>": "Height", + "<3,5,5>": "ClientWidth", + "<3,5,6>": "ClientHeight", + "<3,5,7>": "AutosizeWidth", + "<3,5,8>": "AutosizeHeight", + "<3,5,9>": "RightAnchor", + "<3,5,10>": "BottomAnchor", + "<3,5,11>": "AllPages", + "<3,5,12>": "Padding", + "<3,5,13>": "ColHeaderHeight", + "<3,5,14>": "RowHeight", + "<3,5,15>": "RowLabelWidth" + }, + "<3,6>": { + "<3,6,1>": "BackColor", + "<3,6,2>": "ForeColor", + "<3,6,3>": "Font", + "<3,6,4>": "HotBackColor", + "<3,6,5>": "HotForeColor", + "<3,6,6>": "HotFont", + "<3,6,7>": "TextAlign", + "<3,6,8>": "TextOrigin", + "<3,6,9>": "EdgeStyle", + "<3,6,10>": "CueBanner", + "<3,6,11>": "Translucency", + "<3,6,12>": "ShowEffect", + "<3,6,13>": "HideEffect", + "<3,6,14>": "RowStripe", + "<3,6,15>": "EvenRowColor", + "<3,6,16>": "OddRowColor" + }, + "<3,7>": { + "<3,7,1>": "Glyph", + "<3,7,2>": "GlyphTextLayout", + "<3,7,3>": "GlyphTextSpacing" + }, + "<3,8>": "", + "<3,9>": "", + "<3,10>": "", + "<3,11>": { + "<3,11,1>": "CheckStyle", + "<3,11,2>": "Check" + }, + "<3,12>": { + "<3,12,1>": "SplitButton", + "<3,12,2>": "SplitGlyph", + "<3,12,3>": "SplitSeparator", + "<3,12,4>": "SplitWidth" + }, + "<3,13>": { + "<3,13,1>": "Conv", + "<3,13,2>": "Valid", + "<3,13,3>": "ValidMsg", + "<3,13,4>": "Required", + "<3,13,5>": "EditMask", + "<3,13,6>": "EditMaskGroupSelect", + "<3,13,7>": "GetMaskedCharsOnly", + "<3,13,8>": "SetMaskedCharsOnly" + } + }, + "<4>": { + "<4,1>": { + "<4,1,1>": "1", + "<4,1,2>": "2", + "<4,1,3>": "10", + "<4,1,4>": "15" + }, + "<4,2>": "1", + "<4,3>": { + "<4,3,1>": "1", + "<4,3,2>": "2" + }, + "<4,4>": "", + "<4,5>": { + "<4,5,1>": "1", + "<4,5,2>": "2", + "<4,5,3>": "3", + "<4,5,4>": "4", + "<4,5,5>": "5", + "<4,5,6>": "6", + "<4,5,7>": "10", + "<4,5,8>": "11", + "<4,5,9>": "12", + "<4,5,10>": "13", + "<4,5,11>": "20", + "<4,5,12>": "25", + "<4,5,13>": "50", + "<4,5,14>": "52", + "<4,5,15>": "54" + }, + "<4,6>": { + "<4,6,1>": "1", + "<4,6,2>": "2", + "<4,6,3>": "3", + "<4,6,4>": "10", + "<4,6,5>": "11", + "<4,6,6>": "12", + "<4,6,7>": "20", + "<4,6,8>": "21", + "<4,6,9>": "28", + "<4,6,10>": "30", + "<4,6,11>": "40", + "<4,6,12>": "50", + "<4,6,13>": "51", + "<4,6,14>": "60", + "<4,6,15>": "61", + "<4,6,16>": "62" + }, + "<4,7>": { + "<4,7,1>": "1", + "<4,7,2>": "10", + "<4,7,3>": "12" + }, + "<4,8>": "", + "<4,9>": "", + "<4,10>": "", + "<4,11>": { + "<4,11,1>": "1", + "<4,11,2>": "2" + }, + "<4,12>": { + "<4,12,1>": "1", + "<4,12,2>": "2", + "<4,12,3>": "3", + "<4,12,4>": "4" + }, + "<4,13>": { + "<4,13,1>": "1", + "<4,13,2>": "2", + "<4,13,3>": "3", + "<4,13,4>": "4", + "<4,13,5>": "10", + "<4,13,6>": "11", + "<4,13,7>": "12", + "<4,13,8>": "13" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_RTI_DSN_OIWIN_TPL_TOOLBOX.json b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_DSN_OIWIN_TPL_TOOLBOX.json new file mode 100644 index 0000000..90b4d2b --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_DSN_OIWIN_TPL_TOOLBOX.json @@ -0,0 +1,144 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_RTI_DSN_OIWIN_TPL_TOOLBOX" + }, + "body": { + "record1": { + "<1>": "SYSPROG*IMAGELIST*PNG*RTI_DSN_OIWIN_TPL_TOOLBOX_CONTROLS", + "<2>": { + "<2,1>": "ANIMATE", + "<2,2>": "BITMAP", + "<2,3>": "CHECKBMP", + "<2,4>": "CHECKBOX", + "<2,5>": "COLORDROPDOWN", + "<2,6>": "COMBOBOX", + "<2,7>": "DATETIME", + "<2,8>": "DBBITMAP", + "<2,9>": "DIRWATCHER", + "<2,10>": "EDITBOX", + "<2,11>": "EDITFIELD", + "<2,12>": "EDITTABLE", + "<2,13>": "FILEEXPLORER", + "<2,14>": "FILEPREVIEW", + "<2,15>": "GROUPBOX", + "<2,16>": "GROUPBOXEX", + "<2,17>": "HSCROLLBAR", + "<2,18>": "HSPLITBAR", + "<2,19>": "HTTPCLIENT", + "<2,20>": "HTTPSERVER", + "<2,21>": "HYPERLINK", + "<2,22>": "LISTBOX", + "<2,23>": "NOTIFYICON", + "<2,24>": "OLECONTROL", + "<2,25>": "PANEL", + "<2,26>": "PROGRESSBAR", + "<2,27>": "PROPERTYGRID", + "<2,28>": "PUSHBMP", + "<2,29>": "PUSHBUTTON", + "<2,30>": "RADIOGROUP", + "<2,31>": "REBAR", + "<2,32>": "RICHEDITBOX", + "<2,33>": "SIMPLEPANEL", + "<2,34>": "STATIC", + "<2,35>": "TABCONTROL", + "<2,36>": "TOOLBAR", + "<2,37>": "TREELISTBOX", + "<2,38>": "UPDOWN", + "<2,39>": "VSCROLLBAR", + "<2,40>": "VSPLITBAR", + "<2,41>": "WEBVIEW", + "<2,42>": "WINCONTROL" + }, + "<3>": { + "<3,1>": "Common Controls", + "<3,2>": "Common Controls", + "<3,3>": "Legacy Controls", + "<3,4>": "Common Controls", + "<3,5>": "Common Controls", + "<3,6>": "Common Controls", + "<3,7>": "Common Controls", + "<3,8>": "Common Controls", + "<3,9>": "Non-Visual Controls", + "<3,10>": "Common Controls", + "<3,11>": "Common Controls", + "<3,12>": "Common Controls", + "<3,13>": "Common Controls", + "<3,14>": "Common Controls", + "<3,15>": "Legacy Controls", + "<3,16>": "Containers", + "<3,17>": "Common Controls", + "<3,18>": "Common Controls", + "<3,19>": "Internet Controls", + "<3,20>": "Internet Controls", + "<3,21>": "Common Controls", + "<3,22>": "Common Controls", + "<3,23>": "Non-Visual Controls", + "<3,24>": "OLE Controls", + "<3,25>": "Containers", + "<3,26>": "Common Controls", + "<3,27>": "Common Controls", + "<3,28>": "Legacy Controls", + "<3,29>": "Common Controls", + "<3,30>": "Common Controls", + "<3,31>": "Toolbars", + "<3,32>": "Common Controls", + "<3,33>": "Containers", + "<3,34>": "Common Controls", + "<3,35>": "Common Controls", + "<3,36>": "Toolbars", + "<3,37>": "Common Controls", + "<3,38>": "Common Controls", + "<3,39>": "Common Controls", + "<3,40>": "Common Controls", + "<3,41>": "Internet Controls", + "<3,42>": "Common Controls" + }, + "<4>": { + "<4,1>": "2", + "<4,2>": "3", + "<4,3>": "4", + "<4,4>": "4", + "<4,5>": "25", + "<4,6>": "5", + "<4,7>": "28", + "<4,8>": "3", + "<4,9>": "39", + "<4,10>": "24", + "<4,11>": "6", + "<4,12>": "33", + "<4,13>": "32", + "<4,14>": "35", + "<4,15>": "30", + "<4,16>": "30", + "<4,17>": "14", + "<4,18>": "16", + "<4,19>": "37", + "<4,20>": "38", + "<4,21>": "7", + "<4,22>": "8", + "<4,23>": "41", + "<4,24>": "26", + "<4,25>": "34", + "<4,26>": "9", + "<4,27>": "10", + "<4,28>": "11", + "<4,29>": "11", + "<4,30>": "12", + "<4,31>": "29", + "<4,32>": "13", + "<4,33>": "31", + "<4,34>": "18", + "<4,35>": "20", + "<4,36>": "21", + "<4,37>": "22", + "<4,38>": "23", + "<4,39>": "15", + "<4,40>": "17", + "<4,41>": "40", + "<4,42>": "27" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_DEFVALUE.json b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_DEFVALUE.json new file mode 100644 index 0000000..fa7781a --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_DEFVALUE.json @@ -0,0 +1,26 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_RTI_IDE_DEFVALUE" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "<>", + "<1,2>": "<>", + "<1,3>": "\"Literal\"", + "<1,4>": "{CALCULATED}", + "<1,5>": "COUNTER", + "<1,6>": "DATE", + "<1,7>": "DATETIME", + "<1,8>": "FUNCNAME('arg1',2,['arg3',3])", + "<1,9>": "PREVVAL", + "<1,10>": "SEQKEY", + "<1,11>": "TIME", + "<1,12>": "TIMEDATE", + "<1,13>": "USER" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_QUICKEVENTS_SYSPROG.json b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_QUICKEVENTS_SYSPROG.json new file mode 100644 index 0000000..0aae6de --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_QUICKEVENTS_SYSPROG.json @@ -0,0 +1,592 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_RTI_IDE_QUICKEVENTS*SYSPROG" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "GEN", + "<1,2>": "COMMMOD", + "<1,3>": "COMMWIN", + "<1,4>": "COMMEVT", + "<1,5>": "COMM", + "<1,6>": "STARTWIN", + "<1,7>": "STARTMDI", + "<1,8>": "STPROC", + "<1,9>": "MSG", + "<1,10>": "POPUP", + "<1,11>": "APPNOTE", + "<1,12>": "IXLOOKUP", + "<1,13>": "CLOSEWIN", + "<1,14>": "READROW", + "<1,15>": "WRITEROW", + "<1,16>": "CLEARWIN", + "<1,17>": "DELETEROW", + "<1,18>": "OPTIONS", + "<1,19>": "BRWREPORT", + "<1,20>": "RLISTREPORT" + }, + "<2>": { + "<2,1>": "General", + "<2,2>": "Call commuter module (Property)", + "<2,3>": "Call commuter module (@Window)", + "<2,4>": "Call commuter module (@Window_EVENTS)", + "<2,5>": "Call commuter module (Legacy)", + "<2,6>": "Start a form", + "<2,7>": "Start an MDI child form", + "<2,8>": "Execute a stored procedure", + "<2,9>": "Display a message", + "<2,10>": "Display a popup", + "<2,11>": "Display quickhelp", + "<2,12>": "Index lookup", + "<2,13>": "Close form", + "<2,14>": "Read the row", + "<2,15>": "Write the row", + "<2,16>": "Clear the form", + "<2,17>": "Delete the row", + "<2,18>": "Trigger options", + "<2,19>": "Excute a BRW Report", + "<2,20>": "Execute LIST statement" + }, + "<3>": "", + "<4>": { + "<4,1>": "", + "<4,2>": "X", + "<4,3>": "X", + "<4,4>": "X", + "<4,5>": "X", + "<4,6>": "R", + "<4,7>": "X", + "<4,8>": "X", + "<4,9>": "R", + "<4,10>": "R", + "<4,11>": "R", + "<4,12>": "E", + "<4,13>": "E", + "<4,14>": "E", + "<4,15>": "E", + "<4,16>": "E", + "<4,17>": "E", + "<4,18>": "P", + "<4,19>": "X", + "<4,20>": "X" + }, + "<5>": { + "<5,1>": "", + "<5,2>": "EXECUTE", + "<5,3>": "EXECUTE", + "<5,4>": "EXECUTE", + "<5,5>": "EXECUTE", + "<5,6>": "EXECUTE", + "<5,7>": "EXECUTE", + "<5,8>": "EXECUTE", + "<5,9>": "EXECUTE", + "<5,10>": "EXECUTE", + "<5,11>": "EXECUTE", + "<5,12>": "IXLOOKUP", + "<5,13>": "CLOSE", + "<5,14>": "READ", + "<5,15>": "WRITE", + "<5,16>": "CLEAR", + "<5,17>": "DELETE", + "<5,18>": "FOCUS", + "<5,19>": "EXECUTE", + "<5,20>": "EXECUTE" + }, + "<6>": { + "<6,1>": "", + "<6,2>": "@COMMUTER", + "<6,3>": "@WINDOW", + "<6,4>": "@WINDOW_EVENTS", + "<6,5>": "OBJ_CALL_EVENT", + "<6,6>": "^OIWINEXE", + "<6,7>": "START_MDICHILD", + "<6,8>": "^STPROCEXE", + "<6,9>": "^MSG", + "<6,10>": "^POPUP", + "<6,11>": "^APPNOTE", + "<6,12>": "@WINDOW", + "<6,13>": "@WINDOW", + "<6,14>": "@WINDOW", + "<6,15>": "@WINDOW", + "<6,16>": "@WINDOW", + "<6,17>": "@WINDOW", + "<6,18>": "SYSTEM", + "<6,19>": "RTI_BRW_GENERATEREPORT", + "<6,20>": "RTI_XBAND" + }, + "<7>": { + "<7,1>": "", + "<7,2>": "'@SELF','@EVENT','@PARAM1','@PARAM2','@PARAM3','@PARAM4','@PARAM5','@PARAM6'", + "<7,3>": "'@SELF','@EVENT','@PARAM1','@PARAM2','@PARAM3','@PARAM4','@PARAM5','@PARAM6'", + "<7,4>": "'@SELF','@EVENT','@PARAM1','@PARAM2','@PARAM3','@PARAM4','@PARAM5','@PARAM6'", + "<7,5>": "'@SELF','@EVENT','@PARAM1','@PARAM2','@PARAM3','@PARAM4','@PARAM5','@PARAM6'", + "<7,6>": "'CreateParam', '@WINDOW'", + "<7,7>": "'ChildName', '@MDIFRAME', 'CreateParam'", + "<7,8>": "'arg1',['arg2','arg3']", + "<7,9>": "'@WINDOW'", + "<7,10>": "'@WINDOW'", + "<7,11>": "'@WINDOW'", + "<7,12>": "", + "<7,13>": "", + "<7,14>": "", + "<7,15>": "", + "<7,16>": "", + "<7,17>": "", + "<7,18>": "'@PREV'", + "<7,19>": "'ReportGroup','ReportName','outputName','reportType','overrideListName','reportDetailsAll','bUseGui','overrideCfg'", + "<7,20>": "'List Statement'" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "0", + "<8,1,2>": "0", + "<8,1,3>": "0", + "<8,1,4>": "0" + }, + "<8,2>": { + "<8,2,1>": "1", + "<8,2,2>": "1", + "<8,2,3>": "1", + "<8,2,4>": "0" + }, + "<8,3>": { + "<8,3,1>": "1", + "<8,3,2>": "1", + "<8,3,3>": "1", + "<8,3,4>": "0" + }, + "<8,4>": { + "<8,4,1>": "1", + "<8,4,2>": "1", + "<8,4,3>": "1", + "<8,4,4>": "0" + }, + "<8,5>": { + "<8,5,1>": "1", + "<8,5,2>": "1", + "<8,5,3>": "1", + "<8,5,4>": "0" + }, + "<8,6>": { + "<8,6,1>": "1", + "<8,6,2>": "1", + "<8,6,3>": "0", + "<8,6,4>": "0" + }, + "<8,7>": { + "<8,7,1>": "1", + "<8,7,2>": "1", + "<8,7,3>": "1", + "<8,7,4>": "0" + }, + "<8,8>": { + "<8,8,1>": "1", + "<8,8,2>": "1", + "<8,8,3>": "0", + "<8,8,4>": "0" + }, + "<8,9>": { + "<8,9,1>": "1", + "<8,9,2>": "1", + "<8,9,3>": "0", + "<8,9,4>": "0" + }, + "<8,10>": { + "<8,10,1>": "1", + "<8,10,2>": "1", + "<8,10,3>": "0", + "<8,10,4>": "0" + }, + "<8,11>": { + "<8,11,1>": "1", + "<8,11,2>": "1", + "<8,11,3>": "0", + "<8,11,4>": "0" + }, + "<8,12>": { + "<8,12,1>": "1", + "<8,12,2>": "1", + "<8,12,3>": "1", + "<8,12,4>": "0" + }, + "<8,13>": { + "<8,13,1>": "1", + "<8,13,2>": "1", + "<8,13,3>": "1", + "<8,13,4>": "0" + }, + "<8,14>": { + "<8,14,1>": "1", + "<8,14,2>": "1", + "<8,14,3>": "1", + "<8,14,4>": "0" + }, + "<8,15>": { + "<8,15,1>": "1", + "<8,15,2>": "1", + "<8,15,3>": "1", + "<8,15,4>": "0" + }, + "<8,16>": { + "<8,16,1>": "1", + "<8,16,2>": "1", + "<8,16,3>": "1", + "<8,16,4>": "0" + }, + "<8,17>": { + "<8,17,1>": "1", + "<8,17,2>": "1", + "<8,17,3>": "1", + "<8,17,4>": "0" + }, + "<8,18>": { + "<8,18,1>": "1", + "<8,18,2>": "1", + "<8,18,3>": "1", + "<8,18,4>": "0" + }, + "<8,19>": { + "<8,19,1>": "1", + "<8,19,2>": "1", + "<8,19,3>": "1", + "<8,19,4>": "0" + }, + "<8,20>": { + "<8,20,1>": "1", + "<8,20,2>": "1", + "<8,20,3>": "1", + "<8,20,4>": "0" + } + }, + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": { + "<12,1>": "", + "<12,2>": "", + "<12,3>": "", + "<12,4>": "", + "<12,5>": "", + "<12,6>": "", + "<12,7>": "", + "<12,8>": "P", + "<12,9>": "", + "<12,10>": "P", + "<12,11>": "", + "<12,12>": "P", + "<12,13>": "", + "<12,14>": "", + "<12,15>": "", + "<12,16>": "", + "<12,17>": "", + "<12,18>": "", + "<12,19>": "", + "<12,20>": "" + }, + "<13>": { + "<13,1>": "", + "<13,2>": "", + "<13,3>": "", + "<13,4>": "", + "<13,5>": "", + "<13,6>": "", + "<13,7>": "", + "<13,8>": "DEFPROP", + "<13,9>": "", + "<13,10>": "DEFPROP", + "<13,11>": "", + "<13,12>": "DEFPROP", + "<13,13>": "", + "<13,14>": "", + "<13,15>": "", + "<13,16>": "", + "<13,17>": "", + "<13,18>": "", + "<13,19>": "", + "<13,20>": "" + }, + "<14>": { + "<14,1>": "", + "<14,2>": "", + "<14,3>": "", + "<14,4>": "", + "<14,5>": "", + "<14,6>": "", + "<14,7>": "", + "<14,8>": "@SELF", + "<14,9>": "", + "<14,10>": "@SELF", + "<14,11>": "", + "<14,12>": "@SELF", + "<14,13>": "", + "<14,14>": "", + "<14,15>": "", + "<14,16>": "", + "<14,17>": "", + "<14,18>": "", + "<14,19>": "", + "<14,20>": "" + }, + "<15>": { + "<15,1>": "", + "<15,2>": "", + "<15,3>": "", + "<15,4>": "", + "<15,5>": "", + "<15,6>": "", + "<15,7>": "", + "<15,8>": "'@RETVAL'", + "<15,9>": "", + "<15,10>": "'@RETVAL'", + "<15,11>": "", + "<15,12>": "'@RETVAL'", + "<15,13>": "", + "<15,14>": "", + "<15,15>": "", + "<15,16>": "", + "<15,17>": "", + "<15,18>": "", + "<15,19>": "" + }, + "<16>": { + "<16,1>": { + "<16,1,1>": "0", + "<16,1,2>": "0", + "<16,1,3>": "0", + "<16,1,4>": "0" + }, + "<16,2>": { + "<16,2,1>": "0", + "<16,2,2>": "0", + "<16,2,3>": "0", + "<16,2,4>": "0" + }, + "<16,3>": { + "<16,3,1>": "0", + "<16,3,2>": "0", + "<16,3,3>": "0", + "<16,3,4>": "0" + }, + "<16,4>": { + "<16,4,1>": "0", + "<16,4,2>": "0", + "<16,4,3>": "0", + "<16,4,4>": "0" + }, + "<16,5>": { + "<16,5,1>": "0", + "<16,5,2>": "0", + "<16,5,3>": "0", + "<16,5,4>": "0" + }, + "<16,6>": { + "<16,6,1>": "1", + "<16,6,2>": "1", + "<16,6,3>": "0", + "<16,6,4>": "1" + }, + "<16,7>": { + "<16,7,1>": "1", + "<16,7,2>": "1", + "<16,7,3>": "0", + "<16,7,4>": "1" + }, + "<16,8>": { + "<16,8,1>": "0", + "<16,8,2>": "0", + "<16,8,3>": "0", + "<16,8,4>": "0" + }, + "<16,9>": { + "<16,9,1>": "0", + "<16,9,2>": "0", + "<16,9,3>": "0", + "<16,9,4>": "0" + }, + "<16,10>": { + "<16,10,1>": "0", + "<16,10,2>": "0", + "<16,10,3>": "0", + "<16,10,4>": "0", + "<16,10,5>": "1" + }, + "<16,11>": { + "<16,11,1>": "1", + "<16,11,2>": "1", + "<16,11,3>": "0", + "<16,11,4>": "1" + }, + "<16,12>": { + "<16,12,1>": "0", + "<16,12,2>": "0", + "<16,12,3>": "0", + "<16,12,4>": "0" + }, + "<16,13>": { + "<16,13,1>": "1", + "<16,13,2>": "1", + "<16,13,3>": "0", + "<16,13,4>": "1" + }, + "<16,14>": { + "<16,14,1>": "1", + "<16,14,2>": "1", + "<16,14,3>": "0", + "<16,14,4>": "1" + }, + "<16,15>": { + "<16,15,1>": "1", + "<16,15,2>": "1", + "<16,15,3>": "0", + "<16,15,4>": "1" + }, + "<16,16>": { + "<16,16,1>": "1", + "<16,16,2>": "1", + "<16,16,3>": "0", + "<16,16,4>": "1" + }, + "<16,17>": { + "<16,17,1>": "1", + "<16,17,2>": "1", + "<16,17,3>": "0", + "<16,17,4>": "1" + }, + "<16,18>": "", + "<16,19>": { + "<16,19,1>": "0", + "<16,19,2>": "0", + "<16,19,3>": "0", + "<16,19,4>": "0" + }, + "<16,20>": { + "<16,20,1>": "0", + "<16,20,2>": "0", + "<16,20,3>": "0", + "<16,20,4>": "0" + } + }, + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": { + "<20,1>": "", + "<20,2>": "", + "<20,3>": "", + "<20,4>": "", + "<20,5>": "", + "<20,6>": "", + "<20,7>": "", + "<20,8>": "", + "<20,9>": "", + "<20,10>": "", + "<20,11>": "", + "<20,12>": "", + "<20,13>": "", + "<20,14>": "", + "<20,15>": "", + "<20,16>": "", + "<20,17>": "", + "<20,18>": "E", + "<20,19>": "", + "<20,20>": "" + }, + "<21>": { + "<21,1>": "", + "<21,2>": "", + "<21,3>": "", + "<21,4>": "", + "<21,5>": "", + "<21,6>": "", + "<21,7>": "", + "<21,8>": "", + "<21,9>": "", + "<21,10>": "", + "<21,11>": "", + "<21,12>": "", + "<21,13>": "", + "<21,14>": "", + "<21,15>": "", + "<21,16>": "", + "<21,17>": "", + "<21,18>": "OPTIONS", + "<21,19>": "", + "<21,20>": "" + }, + "<22>": { + "<22,1>": "", + "<22,2>": "", + "<22,3>": "", + "<22,4>": "", + "<22,5>": "", + "<22,6>": "", + "<22,7>": "", + "<22,8>": "", + "<22,9>": "", + "<22,10>": "", + "<22,11>": "", + "<22,12>": "", + "<22,13>": "", + "<22,14>": "", + "<22,15>": "", + "<22,16>": "", + "<22,17>": "", + "<22,18>": "@FOCUS", + "<22,19>": "", + "<22,20>": "" + }, + "<23>": { + "<23,1>": "", + "<23,2>": "", + "<23,3>": "", + "<23,4>": "", + "<23,5>": "", + "<23,6>": "", + "<23,7>": "", + "<23,8>": "", + "<23,9>": "", + "<23,10>": "", + "<23,11>": "", + "<23,12>": "", + "<23,13>": "", + "<23,14>": "", + "<23,15>": "", + "<23,16>": "", + "<23,17>": "", + "<23,18>": "", + "<23,19>": "", + "<23,20>": "" + }, + "<24>": { + "<24,1>": "", + "<24,2>": "", + "<24,3>": "", + "<24,4>": "", + "<24,5>": "", + "<24,6>": "", + "<24,7>": "", + "<24,8>": "", + "<24,9>": "", + "<24,10>": "", + "<24,11>": "", + "<24,12>": "", + "<24,13>": "", + "<24,14>": "", + "<24,15>": "", + "<24,16>": "", + "<24,17>": "", + "<24,18>": { + "<24,18,1>": "1", + "<24,18,2>": "1", + "<24,18,3>": "1", + "<24,18,4>": "0" + }, + "<24,19>": "", + "<24,20>": "" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_QUICKEVENT_TYPES.json b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_QUICKEVENT_TYPES.json new file mode 100644 index 0000000..8913c64 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_QUICKEVENT_TYPES.json @@ -0,0 +1,100 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_RTI_IDE_QUICKEVENT_TYPES" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "R", + "<1,2>": "E", + "<1,3>": "G", + "<1,4>": "P", + "<1,5>": "M", + "<1,6>": "X", + "<1,7>": "N" + }, + "<2>": { + "<2,1>": "Execute a repository method", + "<2,2>": "Send an event", + "<2,3>": "Get a property", + "<2,4>": "Set a property", + "<2,5>": "Execute a method", + "<2,6>": "Execute a stored procedure", + "<2,7>": "Not set" + }, + "<3>": { + "<3,1>": "EXECUTE", + "<3,2>": "", + "<3,3>": "", + "<3,4>": "", + "<3,5>": "", + "<3,6>": "EXECUTE", + "<3,7>": "" + }, + "<4>": { + "<4,1>": "", + "<4,2>": "", + "<4,3>": "", + "<4,4>": "", + "<4,5>": "", + "<4,6>": "^STPROCEXE", + "<4,7>": "" + }, + "<5>": { + "<5,1>": "", + "<5,2>": "", + "<5,3>": "", + "<5,4>": "", + "<5,5>": "", + "<5,6>": "'@PARAM1','@PARAM2','@PARAM3','@PARAM4','@PARAM5','@PARAM6'", + "<5,7>": "" + }, + "<6>": { + "<6,1>": { + "<6,1,1>": "0", + "<6,1,2>": "0", + "<6,1,3>": "1", + "<6,1,4>": "0" + }, + "<6,2>": { + "<6,2,1>": "0", + "<6,2,2>": "0", + "<6,2,3>": "0", + "<6,2,4>": "0" + }, + "<6,3>": { + "<6,3,1>": "0", + "<6,3,2>": "0", + "<6,3,3>": "0", + "<6,3,4>": "0" + }, + "<6,4>": { + "<6,4,1>": "0", + "<6,4,2>": "0", + "<6,4,3>": "0", + "<6,4,4>": "0" + }, + "<6,5>": { + "<6,5,1>": "0", + "<6,5,2>": "0", + "<6,5,3>": "0", + "<6,5,4>": "0" + }, + "<6,6>": { + "<6,6,1>": "0", + "<6,6,2>": "0", + "<6,6,3>": "1", + "<6,6,4>": "0" + }, + "<6,7>": { + "<6,7,1>": "0", + "<6,7,2>": "1", + "<6,7,3>": "1", + "<6,7,4>": "1" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_SYSTABLES.json b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_SYSTABLES.json new file mode 100644 index 0000000..45b03be --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_SYSTABLES.json @@ -0,0 +1,43 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_RTI_IDE_SYSTABLES" + }, + "body": { + "record1": { + "<1>": "SYSALIASES", + "<2>": "SYSHELP", + "<3>": "SYSINCLUDE", + "<4>": "SYSMENUS", + "<5>": "SYSMESSAGES", + "<6>": "SYSNETWORKS", + "<7>": "SYSPOPUPS", + "<8>": "SYSPRINTERS", + "<9>": "SYSTEMP", + "<10>": "SYSTEXT", + "<11>": "SYSWINDOWS", + "<12>": "DUMP_FIX_GARBAGE", + "<13>": "DUMP_FIX_TEMP", + "<14>": "LH_DIST_DETAIL", + "<15>": "LH_DIST_HISTOGRAM", + "<16>": "LH_SUMMARY", + "<17>": "LH_STATISTICS", + "<18>": "O4WCACHE", + "<19>": "O4WCODES", + "<20>": "O4WCONFIG", + "<21>": "O4WEBOI", + "<22>": "O4WFEED", + "<23>": "O4WGRAPHS", + "<24>": "O4WINQUIRY", + "<25>": "O4WMENUS", + "<26>": "O4WMESSAGES", + "<27>": "O4WPERMS", + "<28>": "O4WREPORTS", + "<29>": "O4WREST", + "<30>": "O4WTEMP", + "<31>": "MD", + "<32>": "VOC" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_X.json b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_X.json new file mode 100644 index 0000000..b590e6d --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_X.json @@ -0,0 +1,428 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_RTI_IDE_X" + }, + "body": { + "record1": { + "<1>": "1", + "<2>": "1", + "<3>": "1", + "<4>": "0", + "<5>": "1", + "<6>": "0", + "<7>": "0", + "<8>": "0", + "<9>": "0", + "<10>": "S", + "<11>": "E", + "<12>": "W", + "<13>": "W", + "<14>": "W", + "<15>": "E", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "1", + "<21>": "1", + "<22>": "4", + "<23>": "1", + "<24>": "1", + "<25>": "L", + "<26>": "1", + "<27>": "0", + "<28>": "0", + "<29>": { + "<29,1>": { + "<29,1,1>": { + "<29,1,1,1>": "Segoe UI", + "<29,1,1,2>": "-12", + "<29,1,1,3>": "400", + "<29,1,1,4>": "0", + "<29,1,1,5>": "0", + "<29,1,1,6>": "0", + "<29,1,1,7>": "0", + "<29,1,1,8>": "34", + "<29,1,1,9>": "0", + "<29,1,1,10>": "3", + "<29,1,1,11>": "2", + "<29,1,1,12>": "1" + } + } + }, + "<30>": "-2", + "<31>": { + "<31,1>": "BITMAP", + "<31,2>": "CHECKBMP", + "<31,3>": "CHECKBOX", + "<31,4>": "COMBOBOX", + "<31,5>": "EDITBOX", + "<31,6>": "EDITFIELD", + "<31,7>": "EDITTABLE", + "<31,8>": "GROUPBOX", + "<31,9>": "HSCROLLBAR", + "<31,10>": "HSPLITBAR", + "<31,11>": "ICON", + "<31,12>": "LISTBOX", + "<31,13>": "MDICLIENT", + "<31,14>": "MENU", + "<31,15>": "PUSHBMP", + "<31,16>": "PUSHBUTTON", + "<31,17>": "RADIOBMP", + "<31,18>": "RADIOBUTTON", + "<31,19>": "RADIOGROUP", + "<31,20>": "RICHEDITBOX", + "<31,21>": "STATIC", + "<31,22>": "TABCONTROL", + "<31,23>": "VSCROLLBAR", + "<31,24>": "VSPLITBAR", + "<31,25>": "OLECONTROL" + }, + "<32>": { + "<32,1>": "BMP_", + "<32,2>": "CHK_", + "<32,3>": "CHK_", + "<32,4>": "CBO_", + "<32,5>": "EB_", + "<32,6>": "EF_", + "<32,7>": "ET_", + "<32,8>": "GRP_", + "<32,9>": "HSC_", + "<32,10>": "HSP_", + "<32,11>": "ICO_", + "<32,12>": "LB_", + "<32,13>": "", + "<32,14>": "", + "<32,15>": "BTN_", + "<32,16>": "BTN_", + "<32,17>": "RBO_", + "<32,18>": "RBO_", + "<32,19>": "RBO_", + "<32,20>": "RE", + "<32,21>": "LBL_", + "<32,22>": "TAB_", + "<32,23>": "VSC_", + "<32,24>": "VSP_", + "<32,25>": "OLE_" + }, + "<33>": "1", + "<34>": "0", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "20", + "<41>": { + "<41,1>": "RTI_DSN_STPROCINS", + "<41,2>": "RTI_DSN_REPRELEASE", + "<41,3>": "RTI_DSN_STPROC", + "<41,4>": "RTI_DSN_STPROC", + "<41,5>": "RTI_DSN_REPVIEW", + "<41,6>": "RTI_DSN_STPROC", + "<41,7>": "RTI_DSN_RECORD", + "<41,8>": "RTI_DSN_RECORD", + "<41,9>": "RTI_DSN_RECORD", + "<41,10>": "RTI_DSN_STPROC", + "<41,11>": "RTI_DSN_RECORD", + "<41,12>": "RTI_DSN_STPROC", + "<41,13>": "RTI_DSN_RECORD", + "<41,14>": "RTI_DSN_RECORD", + "<41,15>": "RTI_DSN_RECORD", + "<41,16>": "RTI_DSN_RECORD", + "<41,17>": "RTI_DSN_RECORD", + "<41,18>": "RTI_DSN_STPROC", + "<41,19>": "RTI_DSN_STPROC", + "<41,20>": "RTI_DSN_RECORD" + }, + "<42>": { + "<42,1>": "SYSPROG*STPROCINS**RTI_IDE_CFG_EQUATES", + "<42,2>": "SYSPROG*REPRELEASE**TODAY", + "<42,3>": "SYSPROG*STPROC**RTI_DSN_EDITOR_HELPER", + "<42,4>": "SYSPROG*STPROC**RTI_IDE_PREFERENCES", + "<42,5>": "SYSPROG*REPVIEW**TODAY", + "<42,6>": "SYSPROG*STPROC**RTI_IDE_CFG", + "<42,7>": "SYSENV RBASIC_KEYWORDS*SYSPROG", + "<42,8>": "SYSPROG*APPROW**SYSENV:RBASIC_KEYWORDS", + "<42,9>": "SYSENV CFG_RTI_IDE_X_COLORS", + "<42,10>": "SYSPROG*STPROC**RTI_DSN_EDITOR_GET_CFG", + "<42,11>": "SYSENV CFG_RTI_IDE_X*SYSPROG*SYSPROG*HP", + "<42,12>": "SYSPROG*STPROC**RTI_DSN_EDITOR_RBASIC_KEYWORDS", + "<42,13>": "SYSREPOS SYSPROG*FORM*O4W*WYSIWYG_CUST_MAINT", + "<42,14>": "SYSREPOS SYSPROG*FORM*O4W*CUSTOMERS", + "<42,15>": "SYSREPOS EXAMPLES*FORM*O4W*WYSIWYG_CUST_MAINT", + "<42,16>": "O4WINQUIRY WYSIWYG_CUST_MAINT", + "<42,17>": "O4WINQUIRY EXAMPLES*WYSIWYG_CUST_MAINT", + "<42,18>": "SYSPROG*STPROC**CTO_COMMUTER_MODULE", + "<42,19>": "SYSPROG*STPROC**RTI_IDE", + "<42,20>": "SYSPROCS DLL_PRINTER" + }, + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "RTI_IDE_TCL", + "<47>": "", + "<48>": "", + "<49>": "0", + "<50>": "C:\\revrepos\\OI10", + "<51>": "oirepository", + "<52>": "", + "<53>": "", + "<54>": "..\\..\\Program Files (x86)\\Git\\bin\\git.exe", + "<55>": "C:\\Program Files (x86)\\GitExtensions\\gitEx.cmd openrepo", + "<56>": "C:\\Program Files (x86)\\GitExtensions\\gitEx.cmd commit", + "<57>": "C:\\Program Files (x86)\\GitExtensions\\gitEx.cmd pull --merge", + "<58>": "C:\\Program Files (x86)\\GitExtensions\\gitEx.cmd push", + "<59>": "C:\\Program Files (x86)\\GitExtensions\\gitEx.cmd filehistory", + "<60>": "C:\\Program Files (x86)\\GitExtensions\\gitEx.cmd viewdiff", + "<61>": "", + "<62>": "", + "<63>": "1", + "<64>": "", + "<65>": "", + "<66>": "", + "<67>": "0", + "<68>": "0", + "<69>": "0", + "<70>": "0", + "<71>": "1", + "<72>": "3", + "<73>": "0", + "<74>": "1", + "<75>": "5", + "<76>": "0", + "<77>": { + "<77,1>": { + "<77,1,1>": "Courier New", + "<77,1,2>": "-16", + "<77,1,3>": "400", + "<77,1,4>": "0", + "<77,1,5>": "0", + "<77,1,6>": "0", + "<77,1,7>": "0", + "<77,1,8>": "49", + "<77,1,9>": "0", + "<77,1,10>": "3", + "<77,1,11>": "2", + "<77,1,12>": "1" + } + }, + "<78>": "0", + "<79>": "1", + "<80>": "1", + "<81>": "1", + "<82>": "1", + "<83>": "1", + "<84>": "1", + "<85>": "1", + "<86>": "1", + "<87>": "16748574", + "<88>": "1", + "<89>": "-2", + "<90>": "", + "<91>": "", + "<92>": "", + "<93>": "", + "<94>": "0", + "<95>": "0", + "<96>": "0", + "<97>": "0", + "<98>": "0", + "<99>": "0", + "<100>": "0", + "<101>": "txt", + "<102>": "", + "<103>": "Portrait", + "<104>": "1", + "<105>": "1", + "<106>": "1", + "<107>": "0", + "<108>": "1", + "<109>": "", + "<110>": "", + "<111>": "", + "<112>": "", + "<113>": "0", + "<114>": "", + "<115>": "", + "<116>": "", + "<117>": "", + "<118>": "", + "<119>": "", + "<120>": "", + "<121>": "", + "<122>": "", + "<123>": { + "<123,1>": "386", + "<123,2>": "184", + "<123,3>": "749", + "<123,4>": "417" + }, + "<124>": { + "<124,1>": "0", + "<124,2>": "0", + "<124,3>": "1", + "<124,4>": "0", + "<124,5>": "0" + }, + "<125>": { + "<125,1>": "REPVIEW", + "<125,2>": "REPRELEASE", + "<125,3>": "APPNOTE", + "<125,4>": "APPROW", + "<125,5>": "CONFIG", + "<125,6>": "CONTEXTMENU", + "<125,7>": "DATASOURCE", + "<125,8>": "DBCOLUMN", + "<125,9>": "DBCOMPONENT", + "<125,10>": "DBTABLE", + "<125,11>": "DLL", + "<125,12>": "DLLPROTOTYPE", + "<125,13>": "DLLSTRUCT", + "<125,14>": "DOC", + "<125,15>": "FORM", + "<125,16>": "GRAPH", + "<125,17>": "IMAGE", + "<125,18>": "IMAGELIST", + "<125,19>": "MENU", + "<125,20>": "MESSAGE", + "<125,21>": "MMEDIA", + "<125,22>": "MSG", + "<125,23>": "OCX", + "<125,24>": "OIEVENT", + "<125,25>": "OIEVENTDBG", + "<125,26>": "OIEVENTEXE", + "<125,27>": "OIREPORT", + "<125,28>": "OIWIN", + "<125,29>": "OIWINEXE", + "<125,30>": "OLECONTROL", + "<125,31>": "OPROC", + "<125,32>": "OPROCEXE", + "<125,33>": "OSFILE", + "<125,34>": "OSFOLDER", + "<125,35>": "POPUP", + "<125,36>": "PROMOTEDEVENT", + "<125,37>": "PROMOTEDEVENTDBG", + "<125,38>": "PROMOTEDEVENTEXE", + "<125,39>": "REPCLASS", + "<125,40>": "REPFAMILY", + "<125,41>": "REPORT", + "<125,42>": "REPTYPE", + "<125,43>": "STPROC", + "<125,44>": "STPROCDBG", + "<125,45>": "STPROCEXE", + "<125,46>": "STPROCINS", + "<125,47>": "UINFO", + "<125,48>": "WINEXE", + "<125,49>": "WINHELP" + }, + "<126>": "0", + "<127>": { + "<127,1>": "520", + "<127,2>": "343", + "<127,3>": "753", + "<127,4>": "413" + }, + "<128>": "", + "<129>": "", + "<130>": "1", + "<131>": "1", + "<132>": "", + "<133>": "", + "<134>": "", + "<135>": "", + "<136>": "", + "<137>": "", + "<138>": "", + "<139>": "", + "<140>": { + "<140,1>": "16777215", + "<140,2>": "16777215", + "<140,3>": "16777215", + "<140,4>": "16777215", + "<140,5>": "16777215", + "<140,6>": "16777215", + "<140,7>": "16777215", + "<140,8>": "16777215", + "<140,9>": "16777215", + "<140,10>": "16777215", + "<140,11>": "16777215", + "<140,12>": "16777215", + "<140,13>": "16777215", + "<140,14>": "16777215", + "<140,15>": "16777215", + "<140,16>": "16777215" + }, + "<141>": "0", + "<142>": "", + "<143>": "", + "<144>": "", + "<145>": "", + "<146>": "", + "<147>": "", + "<148>": "", + "<149>": "", + "<150>": "30", + "<151>": { + "<151,1>": "18222", + "<151,2>": "18220", + "<151,3>": "18219", + "<151,4>": "18218" + }, + "<152>": { + "<152,1>": { + "<152,1,1>": "SYSPROG*STPROC**RTI_DSN_EDITOR_HELPER", + "<152,1,2>": "SYSPROG*REPVIEW**TODAY" + }, + "<152,2>": { + "<152,2,1>": "SYSPROG*STPROC**RTI_DSN_EDITOR_HELPER", + "<152,2,2>": "SYSPROG*STPROC**RTI_IDE_CFG" + }, + "<152,3>": { + "<152,3,1>": "SYSENV CFG_RTI_IDE_X_COLORS", + "<152,3,2>": "SYSPROG*STPROC**RTI_DSN_EDITOR_HELPER", + "<152,3,3>": "SYSPROG*STPROC**RTI_IDE_PREFERENCES", + "<152,3,4>": "SYSPROG*STPROCINS**RTI_IDE_CFG_EQUATES", + "<152,3,5>": "SYSPROG*STPROC**RTI_IDE_CFG", + "<152,3,6>": "SYSREPOS SYSPROG*FORM*O4W*WYSIWYG_CUST_MAINT", + "<152,3,7>": "O4WINQUIRY WYSIWYG_CUST_MAINT", + "<152,3,8>": "SYSPROG*STPROC**CTO_COMMUTER_MODULE" + }, + "<152,4>": { + "<152,4,1>": "SYSENV CFG_OIPI", + "<152,4,2>": "SYSPROG*STPROC**REV_ENGINE_STAMPER_TEST" + } + }, + "<153>": "", + "<154>": "", + "<155>": "", + "<156>": "", + "<157>": "", + "<158>": "", + "<159>": "", + "<160>": "", + "<161>": "", + "<162>": "", + "<163>": "", + "<164>": "", + "<165>": "", + "<166>": "", + "<167>": "", + "<168>": "", + "<169>": "", + "<170>": "localhost", + "<171>": "18088", + "<172>": "18089", + "<173>": "18888", + "<174>": "18889", + "<175>": "", + "<176>": "", + "<177>": "", + "<178>": "", + "<179>": "", + "<180>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_X_COLORS.json b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_X_COLORS.json new file mode 100644 index 0000000..68eeeb7 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_IDE_X_COLORS.json @@ -0,0 +1,200 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_RTI_IDE_X_COLORS" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "-2:Default", + "<1,2>": "-1:Transparent" + }, + "<2>": { + "<2,1>": "0x8A000000:ActiveBorder", + "<2,2>": "0x82000000:ActiveCaption", + "<2,3>": "0x8C000000:AppWorkspace", + "<2,4>": "0x81000000:Background", + "<2,5>": "0x96000000:BtnDarkShadow", + "<2,6>": "0x8F000000:BtnFace", + "<2,7>": "0x94000000:BtnHighlight", + "<2,8>": "0x97000000:BtnLightShadow", + "<2,9>": "0x90000000:BtnShadow", + "<2,10>": "0x92000000:BtnText", + "<2,11>": "0x89000000:CaptionText", + "<2,12>": "0x9B000000:GradientActiveCaption", + "<2,13>": "0x9C000000:GradientInactiveCaption", + "<2,14>": "0x91000000:GrayText", + "<2,15>": "0x8D000000:Highlight", + "<2,16>": "0x8E000000:HighlightText", + "<2,17>": "0x9A000000:HotLight", + "<2,18>": "0x8B000000:InactiveBorder", + "<2,19>": "0x83000000:InactiveCaption", + "<2,20>": "0x93000000:InactiveCaptionText", + "<2,21>": "0x98000000:InfoText", + "<2,22>": "0x99000000:InfoBk", + "<2,23>": "0x84000000:Menu", + "<2,24>": "0x9E000000:MenuBar", + "<2,25>": "0x9D000000:MenuHilight", + "<2,26>": "0x87000000:MenuText", + "<2,27>": "0x80000000:ScrollBar", + "<2,28>": "0x85000000:Window", + "<2,29>": "0x86000000:WindowFrame", + "<2,30>": "0x88000000:WindowText" + }, + "<3>": { + "<3,1>": "0x00000000:Black", + "<3,2>": "0x00000080:Maroon", + "<3,3>": "0x00008000:Green", + "<3,4>": "0x00008080:Olive", + "<3,5>": "0x00800000:Navy", + "<3,6>": "0x00800080:Purple", + "<3,7>": "0x00808000:Teal", + "<3,8>": "0x00808080:Gray", + "<3,9>": "0x00C0C0C0:Silver", + "<3,10>": "0x000000FF:Red", + "<3,11>": "0x0000FF00:Lime", + "<3,12>": "0x0000FFFF:Yellow", + "<3,13>": "0x00FF0000:Blue", + "<3,14>": "0x00FF00FF:Fuchsia", + "<3,15>": "0x00FFFF00:Aqua", + "<3,16>": "0x00FFFFFF:White" + }, + "<4>": { + "<4,1>": "0x00FFF8F0:AliceBlue", + "<4,2>": "0x00D7EBFA:AntiqueWhite", + "<4,3>": "0x00D4FF7F:Aquamarine", + "<4,4>": "0x00FFFFF0:Azure", + "<4,5>": "0x00DCF5F5:Beige", + "<4,6>": "0x00C4E4FF:Bisque", + "<4,7>": "0x00CDEBFF:BlanchedAlmond", + "<4,8>": "0x00E22B8A:BlueViolet", + "<4,9>": "0x002A2AA5:Brown", + "<4,10>": "0x0087B8DE:BurlyWood", + "<4,11>": "0x00A09E5F:CadetBlue", + "<4,12>": "0x0000FF7F:Chartreuse", + "<4,13>": "0x001E69D2:Chocolate", + "<4,14>": "0x00507FFF:Coral", + "<4,15>": "0x00ED9564:CornflowerBlue", + "<4,16>": "0x00DCF8FF:Cornsilk", + "<4,17>": "0x003C14DC:Crimson", + "<4,18>": "0x008B0000:DarkBlue", + "<4,19>": "0x008B8B00:DarkCyan", + "<4,20>": "0x000B86B8:DarkGoldenRod", + "<4,21>": "0x00A9A9A9:DarkGray", + "<4,22>": "0x00006400:DarkGreen", + "<4,23>": "0x006BB7BD:DarkKhaki", + "<4,24>": "0x008B008B:DarkMagenta", + "<4,25>": "0x002F6B55:DarkOliveGreen", + "<4,26>": "0x00008CFF:DarkOrange", + "<4,27>": "0x00CC3299:DarkOrchid", + "<4,28>": "0x0000008B:DarkRed", + "<4,29>": "0x007A96E9:DarkSalmon", + "<4,30>": "0x008BBC8F:DarkSeaGreen", + "<4,31>": "0x008B3D48:DarkSlateBlue", + "<4,32>": "0x004F4F2F:DarkSlateGray", + "<4,33>": "0x00D1CE00:DarkTurquoise", + "<4,34>": "0x00D30094:DarkViolet", + "<4,35>": "0x0000C000:DeepGreen", + "<4,36>": "0x009314FF:DeepPink", + "<4,37>": "0x00FFBF00:DeepSkyBlue", + "<4,38>": "0x00696969:DimGray", + "<4,39>": "0x00FF901E:DodgerBlue", + "<4,40>": "0x002222B2:FireBrick", + "<4,41>": "0x00F0FAFF:FloralWhite", + "<4,42>": "0x00228B22:ForestGreen", + "<4,43>": "0x00DCDCDC:Gainsboro", + "<4,44>": "0x00FFF8F8:GhostWhite", + "<4,45>": "0x0000D7FF:Gold", + "<4,46>": "0x0020A5DA:GoldenRod", + "<4,47>": "0x002FFFAD:GreenYellow", + "<4,48>": "0x00F0FFF0:HoneyDew", + "<4,49>": "0x00B469FF:HotPink", + "<4,50>": "0x005C5CCD:IndianRed", + "<4,51>": "0x0082004B:Indigo", + "<4,52>": "0x00F0FFFF:Ivory", + "<4,53>": "0x008CE6F0:Khaki", + "<4,54>": "0x00FAE6E6:Lavender", + "<4,55>": "0x00F5F0FF:LavenderBlush", + "<4,56>": "0x0000FC7C:LawnGreen", + "<4,57>": "0x00CDFAFF:LemonChiffon", + "<4,58>": "0x00E6D8AD:LightBlue", + "<4,59>": "0x008080F0:LightCoral", + "<4,60>": "0x00FFFFE0:LightCyan", + "<4,61>": "0x00D2FAFA:LightGoldenRodYellow", + "<4,62>": "0x00D3D3D3:LightGray", + "<4,63>": "0x0090EE90:LightGreen", + "<4,64>": "0x00C1B6FF:LightPink", + "<4,65>": "0x007AA0FF:LightSalmon", + "<4,66>": "0x00AAB220:LightSeaGreen", + "<4,67>": "0x00FACE87:LightSkyBlue", + "<4,68>": "0x00998877:LightSlateGray", + "<4,69>": "0x00DEC4B0:LightSteelBlue", + "<4,70>": "0x00E0FFFF:LightYellow", + "<4,71>": "0x0032CD32:LimeGreen", + "<4,72>": "0x00E6F0FA:Linen", + "<4,73>": "0x00FF00FF:Magenta", + "<4,74>": "0x00AACD66:MediumAquamarine", + "<4,75>": "0x00CD0000:MediumBlue", + "<4,76>": "0x00D355BA:MediumOrchid", + "<4,77>": "0x00DB7093:MediumPurple", + "<4,78>": "0x0071B33C:MediumSeaGreen", + "<4,79>": "0x00EE687B:MediumSlateBlue", + "<4,80>": "0x009AFA00:MediumSpringGreen", + "<4,81>": "0x00CCD148:MediumTurquoise", + "<4,82>": "0x008515C7:MediumVioletRed", + "<4,83>": "0x00701919:MidnightBlue", + "<4,84>": "0x00FAFFF5:MintCream", + "<4,85>": "0x00E1E4FF:MistyRose", + "<4,86>": "0x00B5E4FF:Moccasin", + "<4,87>": "0x00ADDEFF:NavajoWhite", + "<4,88>": "0x00E6F5FD:OldLace", + "<4,89>": "0x00238E6B:OliveDrab", + "<4,90>": "0x0000A5FF:Orange", + "<4,91>": "0x000045FF:OrangeRed", + "<4,92>": "0x00D670DA:Orchid", + "<4,93>": "0x00AAE8EE:PaleGoldenRod", + "<4,94>": "0x0098FB98:PaleGreen", + "<4,95>": "0x00EEEEAF:PaleTurquoise", + "<4,96>": "0x009370DB:PaleVioletRed", + "<4,97>": "0x00D5EFFF:PapayaWhip", + "<4,98>": "0x00B9DAFF:PeachPuff", + "<4,99>": "0x003F85CD:Peru", + "<4,100>": "0x00CBC0FF:Pink", + "<4,101>": "0x00DDA0DD:Plum", + "<4,102>": "0x00E6E0B0:PowderBlue", + "<4,103>": "0x008F8FBC:RosyBrown", + "<4,104>": "0x00E16941:RoyalBlue", + "<4,105>": "0x0013458B:SaddleBrown", + "<4,106>": "0x007280FA:Salmon", + "<4,107>": "0x0060A4F4:SandyBrown", + "<4,108>": "0x00578B2E:SeaGreen", + "<4,109>": "0x00EEF5FF:SeaShell", + "<4,110>": "0x002D52A0:Sienna", + "<4,111>": "0x00C0C0C0:Silver", + "<4,112>": "0x00EBCE87:SkyBlue", + "<4,113>": "0x00CD5A6A:SlateBlue", + "<4,114>": "0x00908070:SlateGray", + "<4,115>": "0x00FAFAFF:Snow", + "<4,116>": "0x007FFF00:SpringGreen", + "<4,117>": "0x00B48246:SteelBlue", + "<4,118>": "0x008CB4D2:Tan", + "<4,119>": "0x00D8BFD8:Thistle", + "<4,120>": "0x004763FF:Tomato", + "<4,121>": "0x00D0E040:Turquoise", + "<4,122>": "0x00EE82EE:Violet", + "<4,123>": "0x00B3DEF5:Wheat", + "<4,124>": "0x00F5F5F5:WhiteSmoke", + "<4,125>": "0x0032CD9A:YellowGreen" + }, + "<5>": { + "<5,1>": "-5:No Color-Key", + "<5,2>": "-1:Top-Left Pixel", + "<5,3>": "-2:Top-Right Pixel", + "<5,4>": "-3:Bottom-Left Pixel", + "<5,5>": "-4:Bottom-Right Pixel" + }, + "<6>": "0x00FFFFFF:Custom..." + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACFG_RTI_RLIST.json b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_RLIST.json new file mode 100644 index 0000000..0e9fe5e --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACFG_RTI_RLIST.json @@ -0,0 +1,12 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CFG_RTI_RLIST" + }, + "body": { + "record1": { + "<1>": "RLISTX" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ACREDITS.json b/SYSPROG/APPROW/SYSENV%003ACREDITS.json new file mode 100644 index 0000000..e5c25e8 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ACREDITS.json @@ -0,0 +1,269 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "CREDITS" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "framework", + "<1,2>": "jQuery", + "<1,3>": "The jQuery Project", + "<1,4>": "http://jquery.org" + }, + "<2>": { + "<2,1>": "framework", + "<2,2>": "jQuery Mobile", + "<2,3>": "The jQuery Project", + "<2,4>": "http://jquerymobile.com" + }, + "<3>": { + "<3,1>": "framework", + "<3,2>": "jQuery UI", + "<3,3>": "The jQuery UI Team", + "<3,4>": "http://jqueryui.com" + }, + "<4>": { + "<4,1>": "framework", + "<4,2>": "AdoptOpenJDK Java Runtime Environment (JRE)", + "<4,3>": "AdoptOpenJDK", + "<4,4>": "https://adoptopenjdk.net/index.html" + }, + "<5>": { + "<5,1>": "jQuery plugin", + "<5,2>": "bsmSelect", + "<5,3>": "Victor Berchet", + "<5,4>": "https://github.com/vicb/bsmSelect" + }, + "<6>": { + "<6,1>": "jQuery plugin", + "<6,2>": "clickmenu", + "<6,3>": "Roman Weich", + "<6,4>": "http://p.sohei.org" + }, + "<7>": { + "<7,1>": "jQuery plugin", + "<7,2>": "color-picker", + "<7,3>": "Lakshan Perera", + "<7,4>": "http://www.web2media.net/laktek/2008/10/27/really-simple-color-picker-in-jquery/" + }, + "<8>": { + "<8,1>": "jQuery plugin", + "<8,2>": "colResizable", + "<8,3>": "Alvaro Prieto Lauroba", + "<8,4>": "http://www.bacubacu.com/colresizable" + }, + "<9>": { + "<9,1>": "jQuery plugin", + "<9,2>": "corner", + "<9,3>": "Dave Methvin and Mike Alsup", + "<9,4>": "http://jquery.malsup.com/corner/" + }, + "<10>": { + "<10,1>": "jQuery plugin", + "<10,2>": "date_input", + "<10,3>": "Jonathan Leighton & Torchbox Ltd", + "<10,4>": "http://jonathanleighton.com/projects/date-input" + }, + "<11>": { + "<11,1>": "jQuery plugin", + "<11,2>": "ddmenu", + "<11,3>": "Thomas J. Otterson", + "<11,4>": "http://www.barandis.com/dev/jquery/ddmenu" + }, + "<12>": { + "<12,1>": "jQuery plugin", + "<12,2>": "font-Awesome", + "<12,3>": "Dave Gandy", + "<12,4>": "http://fontawesome.io" + }, + "<13>": { + "<13,1>": "jQuery plugin", + "<13,2>": "gridStack", + "<13,3>": "Pavel Reznikov", + "<13,4>": "http://troolee.github.io/gridstack.js/" + }, + "<14>": { + "<14,1>": "jQuery plugin", + "<14,2>": "iframe", + "<14,3>": "Vlada Misic", + "<14,4>": "http://33rockers.com/2006/12/05/unobtrusive-iframe-with-jquery" + }, + "<15>": { + "<15,1>": "jQuery plugin", + "<15,2>": "jqPlot", + "<15,3>": "Chris Leonello", + "<15,4>": "http://jqplot.com" + }, + "<16>": { + "<16,1>": "jQuery plugin", + "<16,2>": "jquery.address-1.2.2", + "<16,3>": "Rostislav Hristov", + "<16,4>": "http://www.asual.com/jquery/address/" + }, + "<17>": { + "<17,1>": "jQuery plugin", + "<17,2>": "jquery.chrome-frame", + "<17,3>": "", + "<17,4>": "" + }, + "<18>": { + "<18,1>": "jQuery plugin", + "<18,2>": "jquery.layout", + "<18,3>": "Kevin Dalman", + "<18,4>": "http://layout.jquery-dev.com" + }, + "<19>": { + "<19,1>": "jQuery plugin", + "<19,2>": "jquery-autocomplete", + "<19,3>": "", + "<19,4>": "" + }, + "<20>": { + "<20,1>": "jQuery plugin", + "<20,2>": "jquery-corners-0.3", + "<20,3>": "David Turnbull, Steven Wittens", + "<20,4>": "" + }, + "<21>": { + "<21,1>": "jQuery plugin", + "<21,2>": "jquery-validate", + "<21,3>": "Jörn Zaefferer", + "<21,4>": "http://bassistance.de/jquery-plugins/jquery-plugin-validation/" + }, + "<22>": { + "<22,1>": "jQuery plugin", + "<22,2>": "jstree", + "<22,3>": "Ivan Bozhanov", + "<22,4>": "http://www.jstree.com" + }, + "<23>": { + "<23,1>": "jQuery plugin", + "<23,2>": "listnav", + "<23,3>": "iHwy, Inc.", + "<23,4>": "http://www.ihwy.com" + }, + "<24>": { + "<24,1>": "jQuery plugin", + "<24,2>": "lodash", + "<24,3>": "The Dojo Foundation", + "<24,4>": "https://lodash.com" + }, + "<25>": { + "<25,1>": "jQuery plugin", + "<25,2>": "markitup", + "<25,3>": "Jay Salvat", + "<25,4>": "http://markitup.jaysalvat.com/" + }, + "<26>": { + "<26,1>": "jQuery plugin", + "<26,2>": "slickNav", + "<26,3>": "Josh Cope", + "<26,4>": "http://slicknav.com" + }, + "<27>": { + "<27,1>": "jQuery plugin", + "<27,2>": "select2", + "<27,3>": "Kevin Brown", + "<27,4>": "https://select2.org" + }, + "<28>": { + "<28,1>": "jQuery plugin", + "<28,2>": "spectrum", + "<28,3>": "bgrins", + "<28,4>": "https://bgrins.github.io/spectrum/" + }, + "<29>": { + "<29,1>": "jQuery plugin", + "<29,2>": "tablednd", + "<29,3>": "Denis Howlett", + "<29,4>": "https://code.google.com/p/tablednd/" + }, + "<30>": { + "<30,1>": "jQuery plugin", + "<30,2>": "tablesorter", + "<30,3>": "Christian Bach", + "<30,4>": "http://tablesorter.com" + }, + "<31>": { + "<31,1>": "jQuery plugin", + "<31,2>": "timeentry", + "<31,3>": "Keith Wood", + "<31,4>": "http://keith-wood.name/timeEntry.html" + }, + "<32>": { + "<32,1>": "jQuery plugin", + "<32,2>": "treeview", + "<32,3>": "Jörn Zaefferer", + "<32,4>": "http://bassistance.de/jquery-plugins/jquery-plugin-treeview/" + }, + "<33>": { + "<33,1>": "UI element", + "<33,2>": "ajax_ace", + "<33,3>": "Ajax.org", + "<33,4>": "http://ace.ajax.org" + }, + "<34>": { + "<34,1>": "UI element", + "<34,2>": "geckoFX", + "<34,3>": "Skybound Software", + "<34,4>": "http://www.geckofx.org" + }, + "<35>": { + "<35,1>": "UI element", + "<35,2>": "scintilla", + "<35,3>": "Neil Hodgson", + "<35,4>": "http://scintilla.org" + }, + "<36>": { + "<36,1>": "Utility", + "<36,2>": "AE.Net.Mail", + "<36,3>": "andyedinborough", + "<36,4>": "https://github.com/andyedinborough/aenetmail" + }, + "<37>": { + "<37,1>": "Utility", + "<37,2>": "DotNetZip", + "<37,3>": "", + "<37,4>": "http://DotNetZip.codeplex.com" + }, + "<38>": { + "<38,1>": "Utility", + "<38,2>": "Javascript MD5", + "<38,3>": "Paul Johnston", + "<38,4>": "http://pajhome.org.uk/crypt/md5" + }, + "<39>": { + "<39,1>": "Utility", + "<39,2>": "HTML5 Shiv", + "<39,3>": "Alexander Farkas", + "<39,4>": "https://github.com/aFarkas/html5shiv" + }, + "<40>": { + "<40,1>": "Utility", + "<40,2>": "jsdifflib", + "<40,3>": "Snowtide Informatics Systems Inc.", + "<40,4>": "http://snowtide.com/jsdifflib" + }, + "<41>": { + "<41,1>": "Utility", + "<41,2>": "JSON in Javasript", + "<41,3>": "JSON.org", + "<41,4>": "http://www.JSON.org/js.html" + }, + "<42>": { + "<42,1>": "Utility", + "<42,2>": "MAPM", + "<42,3>": "Michael C. Ring", + "<42,4>": "http://www.tc.umn.edu/~ringx004/mapm-main.html" + }, + "<43>": { + "<43,1>": "Utility", + "<43,2>": "qDecoder", + "<43,3>": "The qDecoder Project", + "<43,4>": "http://www.qDecoder.org" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003AENV_SYSPROG.json b/SYSPROG/APPROW/SYSENV%003AENV_SYSPROG.json new file mode 100644 index 0000000..735a120 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003AENV_SYSPROG.json @@ -0,0 +1,118 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "ENV_SYSPROG" + }, + "body": { + "record1": { + "<1>": "DATAVOL", + "<2>": "%TEMP%", + "<3>": "TRANSACT", + "<4>": { + "<4,1>": "A", + "<4,2>": "AND", + "<4,3>": "ASSOC", + "<4,4>": "ASSOCIATES", + "<4,5>": "CO", + "<4,6>": "COMPANY", + "<4,7>": "CORP", + "<4,8>": "CORPORATION", + "<4,9>": "INC", + "<4,10>": "INCORPORATED", + "<4,11>": "LTD", + "<4,12>": "OF", + "<4,13>": "THE" + }, + "<5>": "0", + "<6>": "1", + "<7>": "0", + "<8>": "0", + "<9>": "0", + "<10>": "0", + "<11>": "0", + "<12>": "0", + "<13>": "0", + "<14>": "", + "<15>": "LND_DEFAULT", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "", + "<20>": "51", + "<21>": "80", + "<22>": "", + "<23>": "1", + "<24>": "", + "<25>": "0", + "<26>": "", + "<27>": "0", + "<28>": "0", + "<29>": "0", + "<30>": "0", + "<31>": "100", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "ODBC", + "<38>": "1", + "<39>": "", + "<40>": "1", + "<41>": "RTF", + "<42>": "", + "<43>": "", + "<44>": "Standard", + "<45>": "0", + "<46>": "1", + "<47>": "1", + "<48>": "0", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": { + "<53,1>": "", + "<53,2>": "" + }, + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "", + "<61>": "", + "<62>": "", + "<63>": "", + "<64>": "", + "<65>": "", + "<66>": "0", + "<67>": "", + "<68>": "", + "<69>": "", + "<70>": "", + "<71>": "", + "<72>": "", + "<73>": "", + "<74>": "", + "<75>": "", + "<76>": "", + "<77>": "", + "<78>": "", + "<79>": "", + "<80>": "", + "<81>": "", + "<82>": "", + "<83>": "", + "<84>": "", + "<85>": "", + "<86>": "", + "<87>": "", + "<88>": "", + "<89>": "", + "<90>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_AREV64_OIPI.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_AREV64_OIPI.json new file mode 100644 index 0000000..1520f64 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_AREV64_OIPI.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_AREV64_OIPI" + }, + "body": { + "record1": { + "<1>": "Specify OIPI Options for AREV64", + "<2>": "Specify optional flags and values to modify OIPI behavior in AREV64", + "<3>": "Dynamically determine landscape vs portrait orientation{BREAK}Based on @LPTRWIDE value{OPTIONS Disabled/0|Enabled/1}{DEFAULT 0}", + "<4>": "Allow dynamically determined orientation to override{BREAK}Values set via SET_OIPI_PROPERTIES{OPTIONS Do not override SET_OIPI_PROPERTIES/0|Override SET_OIPI_PROPERTIES/1}{DEFAULT 0}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_ASSEMBLY.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_ASSEMBLY.json new file mode 100644 index 0000000..9845be1 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_ASSEMBLY.json @@ -0,0 +1,16 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_ASSEMBLY" + }, + "body": { + "record1": { + "<1>": "Select Desired Revelation Assemblies", + "<2>": "Choose which assemblies contain the required OpenInsight .NET routines.", + "<3>": "{MV 1}List of OpenInsight functionality", + "<4>": "{MV 1}List of assembly names", + "<5>": "Cache this selection?{OPTIONS No/0|Yes/1}{DEFAULT 0}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_AUTOEXEC.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_AUTOEXEC.json new file mode 100644 index 0000000..b0e412e --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_AUTOEXEC.json @@ -0,0 +1,16 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_AUTOEXEC" + }, + "body": { + "record1": { + "<1>": "Configure process to automatically run via RTI_AUTOEXEC", + "<2>": "When OpenInsight is started with the \"/AE\" flag on the command line, RTI_AUTOEXEC will automatically be loaded and will run the routine specified in this CFG_AUTOEXEC record. By default, the routine to run is RTI_TASKMANAGER (which dispatches requests for 'background tasks' to be handled by other OpenInsight instances), and the parameter to pass in is the maximum number of OpenInsight licenses to allocate to performing the background tasks.", + "<3>": "Name of routine to run at startup {DEFAULT RTI_TASKMANAGER}", + "<4>": "Record \"logging\" output{BREAK}(If supported)?{OPTIONS No/0|Yes/1}{DEFAULT 0} ", + "<5>": "{MV 1}Parameters to pass to the specified routine" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_BLINT_NOWARN.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_BLINT_NOWARN.json new file mode 100644 index 0000000..ffca84b --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_BLINT_NOWARN.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_BLINT_NOWARN" + }, + "body": { + "record1": { + "<1>": "Specify Stored Procedures to Exclude from Blint", + "<2>": "Enter the names of stored procedures and stored procedure inserts that should not be BLINT-checked during compilation.", + "<3>": "{MF 1}{WIDTH 60}Stored Procedure/Stored Procedure Insert Names" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_C2OE_MAP.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_C2OE_MAP.json new file mode 100644 index 0000000..1601d2c --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_C2OE_MAP.json @@ -0,0 +1,16 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_C2OE_MAP" + }, + "body": { + "record1": { + "<1>": "C (DLL) Data Type To OEngine Data Mapping", + "<2>": "Control how C data types (from a Windows DLL whose functions you are importing) will map to OpenInsight OEngine data types.", + "<3>": "{MV 1}C (DLL) Data Type", + "<4>": "{MV 1}OEngine Data Type", + "<5>": "{MV 1}OEngine Structure Name" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CCHAT.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CCHAT.json new file mode 100644 index 0000000..fe8a37d --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CCHAT.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_CCHAT" + }, + "body": { + "record1": { + "<1>": "Engine Server Command Chat Configuration", + "<2>": "Specify whether Command Chat functionality will be enabled, and (if not) any per-workstation overrides", + "<3>": "Command Chat enabled {OPTIONS Yes/1|No/0}{DEFAULT 0}", + "<4>": "{MV 1}Enable on specific workstation(s)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CREATE_TABLE.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CREATE_TABLE.json new file mode 100644 index 0000000..1858f07 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CREATE_TABLE.json @@ -0,0 +1,20 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_CREATE_TABLE" + }, + "body": { + "record1": { + "<1>": "Specify the default values to be used for table creation", + "<2>": "Enter the values you want the create table process to use as defaults. If these values are specified, then the built-in default values will be overridden.", + "<3>": "Estimated number of rows (records) that will be in the table {DEFAULT 1000}", + "<4>": "Estimated record size (including the key) {DEFAULT 400}", + "<5>": "Estimated number of columns (fields) that will be in each record {DEFAULT 100}", + "<6>": "Desired size of each frame (in bytes) {DEFAULT 4096}", + "<7>": "Percentage of the table's primary space that should trigger a table resize {DEFAULT 80}", + "<8>": "Should this table be allowed to \"grow\" and/or \"shrink\" as it becomes more or less full? {OPTIONS Grow and shrink/0|Grow only/1|Shrink only/2} {DEFAULT 0}", + "<9>": "Table type {OPTIONS Type 2/110|Type 3/120}{DEFAULT 110}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CTO.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CTO.json new file mode 100644 index 0000000..a6fca85 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CTO.json @@ -0,0 +1,32 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_CTO" + }, + "body": { + "record1": { + "<1>": "CTO and AREV64 connection details", + "<2>": "Specify how CTO and AREV64 clients should connect to the OpenInsight system", + "<3>": "URL of Engine Server, or path to REVCAPI.dll{BREAK}(for direct connection){HELP Enter the port number or URL of the Engine Server, or \"!\" to use the values from CFG_ESERVER}", + "<4>": { + "<4,1>": "Port Number of Engine Server", + "<4,2>": "Optional Engine Name", + "<4,3>": "Optional Startup Flags", + "<4,4>": "Optional Shutdown Flags" + }, + "<5>": "Optional foreground color", + "<6>": "Optional background color", + "<7>": "Optional window title {WIDTH 40}", + "<8>": "Optional name of program to run when connected {WIDTH 40}", + "<9>": "Optional font name", + "<10>": "Optional macro record name", + "<11>": "Optional number of history lines", + "<12>": "Optional name of character mapping function", + "<13>": "Optional DOS path and file name of debug record", + "<14>": "Optional application name to log in", + "<15>": "Optional user name to log in", + "<16>": "Optional password to log in" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CTODICT.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CTODICT.json new file mode 100644 index 0000000..44be6bf --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_CTODICT.json @@ -0,0 +1,35 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_CTODICT" + }, + "body": { + "record1": { + "<1>": "Control Dictionary Name Processing", + "<2>": { + "<2,1>": "This record controls dictionary name resolution and processing behavior", + "<2,2>": "Set preserve flag (field 1)", + "<2,3>": "", + "<2,4>": "--", + "<2,5>": "Preserve Flag Description", + "<2,6>": "--", + "<2,7>": "Preserve flag = \"0\" (or \"\" or invalid) ==> Allow dictionary MFS to modify dictionary name to reflect real ID", + "<2,8>": "Preserve flag = \"1\" ==> Do not modify the dictionary name, if incorrect, to reflect actual ID", + "<2,9>": "", + "<2,10>": "---", + "<2,11>": "Notes", + "<2,12>": "--", + "<2,13>": "- The config record information is only accessed when the application starts up; changes to this record will not take effect until the user exits and re-enters OI", + "<2,14>": "- If no CFG_CTODICT records are found OI will behave as if preserve flag = 0", + "<2,15>": "- When preserve flag is \"0\":", + "<2,16>": "-- If a passed in dictionary name does not match an existing dictionary ID, but can be converted (via replacement of \".\" to \"_\" for example) to an existing ID, the dictionary name will be modified to be the real ID for subsequent usage", + "<2,17>": "-- If stored as a variable, the dictionary name may change after accessing the dictionary", + "<2,18>": "- When preserve flag is \"1\":", + "<2,19>": "-- Although the MFS will still find the actual ID associated with the passed in dictionary name, it will NOT pass the changed value outside of the MFS", + "<2,20>": "-- Subsequent access to the dictionary (for example, via indexed fields) may fail as the dictionary name does not match the real dictinary ID " + }, + "<3>": "Preserve Flag{OPTIONS Preserve passed in Dictionary Name/1|Update passed in Dictionary Name if Needed/0}{DEFAULT 0}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_DIRECTPRINT.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_DIRECTPRINT.json new file mode 100644 index 0000000..6957064 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_DIRECTPRINT.json @@ -0,0 +1,16 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_DIRECTPRINT" + }, + "body": { + "record1": { + "<1>": "DirectPrint Advanced Configuration", + "<2>": "DirectPrint functionality may need to be modified to accomodate more modern printers and operating systems. With this configuration record, you can change the output filename (used for PDISK) so that all spaces are turned into underscores; you can also define, on a per-printer basis, what print processor is required for that printer. Any printers that are not defined will have their data type automatically determined.", + "<3>": "Convert spaces to underscores in PDISK output file names {OPTIONS No/0|Yes/1}{DEFAULT 0}", + "<4>": "{MV 1}Windows printer name {WIDTH 50} {OPTIONS @O4WI_CFG_DIRECTPRINT_HELPER}", + "<5>": "{MV 1}Required print processor{BREAK}Common options are RAW, TEXT, XPS_PASS, or AUTO {WIDTH 50}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_DROPBOX.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_DROPBOX.json new file mode 100644 index 0000000..b802adb --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_DROPBOX.json @@ -0,0 +1,21 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_DROPBOX" + }, + "body": { + "record1": { + "<1>": "Configure O4W \"upload to dropbox\" functionality", + "<2>": { + "<2,1>": "If desired, O4W can be configured to allow a file upload (via the O4WUPLOADBOX control) to a dropbox account.", + "<2,2>": "This functionality can work in addition to, or instead of, the normal O4W file upload process." + }, + "<3>": "DropBox URL to request an upload link ", + "<4>": "DropBox Authentication Key used to request the temporary upload link", + "<5>": "Optional Duration for link to remain valid (in seconds)", + "<6>": "Optional DropBox path and/or filename to upload to", + "<7>": "Optional list of valid extensions for file upload (comma-delimited)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_DSBFS.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_DSBFS.json new file mode 100644 index 0000000..117687f --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_DSBFS.json @@ -0,0 +1,17 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_DSBFS" + }, + "body": { + "record1": { + "<1>": "Connection Details for SQL Databases", + "<2>": "Choose which SQL Database vendor(s) you wish to connect to, as well as specific stored procedures to support the Basic Filing System (BFS) connection.", + "<3>": "{MV 1}SQL Database Vendor", + "<4>": "{MV 1}(Optional)Specific Stored Procedure name for SCHEMA information", + "<5>": "{MV 1}(Optional)Specific Stored Procedure name for SELECT processing", + "<6>": "{MV 1}(Optional)Specific Stored Procedure name for IO handling" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_ESERVER.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_ESERVER.json new file mode 100644 index 0000000..843be29 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_ESERVER.json @@ -0,0 +1,18 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_ESERVER" + }, + "body": { + "record1": { + "<1>": "Engine Server Details", + "<2>": "Specify the host name or IP address and port numbers of the engine server used by this application", + "<3>": "{WIDTH 40}Host name or IP address{DEFAULT localhost}{FIELDNAME ADDRESS}", + "<4>": "Port number{DEFAULT 18088}{FIELDNAME PORT}", + "<5>": "UTF8 Port number{DEFAULT 18089}{FIELDNAME UTFPORT}", + "<6>": "Web Server Port number{DEFAULT 18888}{FIELDNAME WEBPORT}", + "<7>": "Command Channel Port number{DEFAULT 18889}{FIELDNAME CMDPORT}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_HASHTABLE.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_HASHTABLE.json new file mode 100644 index 0000000..a550e7f --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_HASHTABLE.json @@ -0,0 +1,20 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_HASHTABLE" + }, + "body": { + "record1": { + "<1>": "Select hashtable implementation", + "<2>": { + "<2,1>": "Set field 1 to RTI_HASHTABLE1 to use the RTP65 based hashtable, RTI_HASHTABLE2 to use the .NET hashtable, or RTI_HASHTABLE3 to use the latest COM based scripting implementation.", + "<2,2>": "Optionally set field 2 to 1 to cache this selection", + "<2,3>": "", + "<2,4>": "Note: If selection is cached, and you wish to change field 1, you must exit OI and restart to clear the cached value" + }, + "<3>": "Selected Hashtable Implementation{OPTIONS Original/RTI_HASHTABLE1|.NET/RTI_HASHTABLE2|COM Scripting/RTI_HASHTABLE3}{DEFAULT RTI_HASHTABLE3}", + "<4>": "Cache this selection?{OPTIONS No/0|Yes/1}{DEFAULT 0}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_IDX_SETS.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_IDX_SETS.json new file mode 100644 index 0000000..0810c02 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_IDX_SETS.json @@ -0,0 +1,16 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_IDX_SETS" + }, + "body": { + "record1": { + "<1>": "Select routine to use for sorting large numbers of records", + "<2>": "Specify IDX_SETS1 in field 2 to use the original IDX_SETS functionality, or IDX_SETS2 to use enhanced .NET functionality", + "<3>": "{LITERAL X}", + "<4>": "Choose sorting routine{OPTIONS New IDX_SETS2/IDX_SETS2|Original IDX_SETS/IDX_SETS1}{DEFAULT IDX_SETS2}", + "<5>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_INET.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_INET.json new file mode 100644 index 0000000..a9c5e18 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_INET.json @@ -0,0 +1,29 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_INET" + }, + "body": { + "record1": { + "<1>": "Configure defaults, handlers, and allowed routines for RUN_OECGI_REQUEST", + "<2>": "When using RUN_OECGI_REQUEST as the \"listener\" routine for handling web requests, you can configure various routines to check security, handle errors, and do any post-processing. In addition, you can specify which INET routines should be processed.", + "<3>": { + "<3,1>": "Name of security routine to run {DEFAULT INET_SECURITY}", + "<3,2>": "Name of post-processing routine to run {DEFAULT INET_FINALIZE}", + "<3,3>": "Name of error handler routine to run {DEFAULT INET_ABORTED}", + "<3,4>": "Name of \"white list\" routine to run {DEFAULT INET_WHITELIST}", + "<3,5>": "Name of RESTful handler routine to run" + }, + "<4>": "Error message to return {TEXTAREA 5}{DEFAULT Cannot process query:%query%}{WIDTH 40}", + "<5>": "Default CGI extension {DEFAULT exe}", + "<6>": "Error page to return", + "<7>": "{MV 1}List of INET routines to allow", + "<8>": { + "<8,1>": "Primary compression algorithm to support {OPTIONS gzip/gzip|deflate/deflate|none/identity}{DEFAULT deflate}", + "<8,2>": "Secondary compression algorithm to support {OPTIONS gzip/gzip|deflate/deflate|none/identity}{DEFAULT gzip}" + }, + "<9>": "Minimum size of return string to compress {DEFAULT 1000}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_LH_STATISTICS.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_LH_STATISTICS.json new file mode 100644 index 0000000..60ca605 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_LH_STATISTICS.json @@ -0,0 +1,21 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_LH_STATISTICS" + }, + "body": { + "record1": { + "<1>": "Specify Default Tables For Statistics Analysis", + "<2>": { + "<2,1>": "Choose which tables to explicitly include for statistic analysis, or to exclude from analysis, when running RTI_LH_STATISTICS without an otherwise-specified list of tables.", + "<2,2>": "If an explicit list of tables to include is specified, then ONLY those tables will be analysed.", + "<2,3>": "If an explicit list of tables to exclude is specified, all other tables in the application will be included." + }, + "<3>": "{LITERAL X}", + "<4>": "{MV 1}List of Table Names to explicitly INCLUDE", + "<5>": "{MV 1}List of Table Names to explicitly EXCLUDE", + "<6>": "Optional name of DEBUG record to update in SYSLISTS table" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_LOGIN.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_LOGIN.json new file mode 100644 index 0000000..4e581dc --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_LOGIN.json @@ -0,0 +1,27 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_LOGIN" + }, + "body": { + "record1": { + "<1>": "Configure \"single sign on\" functionality", + "<2>": { + "<2,1>": "If desired, OpenInsight can be configured to perform \"single sign on\", using network login credentials to log into OpenInsight", + "<2,2>": "This functionality can work in addition to, or instead of, the normal OpenInsight login process." + }, + "<3>": "Login Mode{OPTIONS Use legacy (traditional) OpenInsight login processing/0|Use network user name to log in as defined OpenInsight user/1|Use network user name and permissions to log into OpenInsight/2|Call user-defined stored procedure to generate user name and permissions to log into OpenInsight/3}{DEFAULT 0}", + "<4>": "{MV 1}Group Names for Normal Users", + "<5>": "{MV 2}Group Names for Admin Users", + "<6>": "{MV 3}Group Names for Sysadmin Users", + "<7>": "Check Local Groups?{OPTIONS No, only network groups are checked/0|Network groups are checked first, and then local groups/1|ONLY local groups are checked (do not check network groups)/-1}{DEFAULT 0}", + "<8>": "Optional debug record name{BREAK}(use only for debugging; creates SYSENV record DEBUG_)", + "<9>": "{LITERAL}", + "<10>": "{LITERAL}", + "<11>": "Optional error message to display{BREAK}on SSO login failure", + "<12>": "User-defined stored procedure{BREAK}To generate user name and permissions", + "<13>": "Allow command-line options{BREAK}to override user/password?{OPTIONS No/0|Yes/1}{DEFAULT 0}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_NETOI.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_NETOI.json new file mode 100644 index 0000000..dcfd153 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_NETOI.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_NETOI" + }, + "body": { + "record1": { + "<1>": "Configure NetOI to process conversion codes on the host or in .NET", + "<2>": "Choose to have NetOI perform all available conversions on the host, in the .NET assembly if assembly passes validation test, or always process in the .NET assembly", + "<3>": "Where should conversion codes be processed?{OPTIONS Process all on host/0|Process in .NET assembly if possible/1|Always process in .NET/-1}{DEFAULT 0}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_O4W.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_O4W.json new file mode 100644 index 0000000..07f7c40 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_O4W.json @@ -0,0 +1,29 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_O4W" + }, + "body": { + "record1": { + "<1>": "Define connections for O4W_CHILD_FORM", + "<2>": { + "<2,1>": "Specify the default URL and parameters to use when the O4W_CHILD_FORM is invoked without any creation parameters.", + "<2,2>": "Also define the \"shortcut\" names to use, and the associated URLs and routines to invoke, when passed specific creation parameters." + }, + "<3>": "{WIDTH 40}Full default URL{BREAK}(when the O4W_CHILD_FORM is started without creation parameters) {DEFAULT http://localhost/o4w/start.htm}", + "<4>": { + "<4,1>": "Default width (in pixels) for default URL {DEFAULT 800}", + "<4,2>": "Default height (in pixels) for default URL {DEFAULT 400}" + }, + "<5>": "{MV 1}Site shortcut names", + "<6>": "{MV 1}URL \"stubs\" for this site (up to and including \"oecgi4.exe\")", + "<7>": "{MV 1}Title to display when using this site shortcut", + "<8>": "{MV 1}Type of program to launch when using this site shortcut {OPTIONS Please Select.../|O4W Custom Routine/PROGRAM|O4W Form/FORM|O4W Report/REPORT|O4W Dashboard/GRAPH|O4W Menu/MENU|Full URL/0}", + "<9>": "{MV 1}Name of routine, form, report, etc.", + "<10>": "{MV 1}Default width{BREAK}(in pixels)", + "<11>": "{MV 1}Default height{BREAK}(in pixels)", + "<12>": "{MV 1}Secure connection flag {DEFAULT 0}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_O4W2FA.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_O4W2FA.json new file mode 100644 index 0000000..77d5760 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_O4W2FA.json @@ -0,0 +1,28 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_O4W2FA" + }, + "body": { + "record1": { + "<1>": "O4W Two Factor Authentication (2FA) Configuration", + "<2>": { + "<2,1>": "Specify how O4W two factor authentication (2FA) should be enabled and configured.", + "<2,2>": "", + "<2,3>": "PLEASE NOTE: you MUST have your email server settings (in Settings/IDE Settings/Email) configured for 2FA to work successfully." + }, + "<3>": "Type of 2FA for this application {OPTIONS None/0|Software Authenticator/1|Emailed random digits/2|Both Authenticator and Email/9}{DEFAULT 0}", + "<4>": "Issuer Name (used during Authenticator signup)", + "<5>": "URL \"fragment\" (including cgi exe){BREAK}for user 2FA setup", + "<6>": "Authenticator registration email subject line {WIDTH 60}{DEFAULT Your OTP authenticator configuration email}", + "<7>": "Authenticator registration email text {WIDTH 80}{DEFAULT Please click on the following link to generate your OTP authenticator software QR code: %1. Scan the QR code with your authenticator software. To log in, please use your existing credentials and this single-use OTP code: %2}", + "<8>": "Authenticator algorithm {OPTIONS Current Default/0|Legacy/1}{DEFAULT 0}", + "<9>": "Authenticator hash mode {OPTIONS Default/0|SHA256/1|SHA512/2}{DEFAULT 0}", + "<10>": "Authenticator time window {DEFAULT 30}", + "<11>": "Authenticator generated number of digits {OPTIONS Default/0|6/6|7/7|8/8}{DEFAULT 0}", + "<12>": "Email Subject Line{BREAK}When Generating Random Digits {WIDTH 60}{DEFAULT Your one-time password challenge}", + "<13>": "Email Text {BREAK}When Generating Random Digits {WIDTH 80}{DEFAULT Here is your one-time generated password challenge. Please enter it when prompted: %1}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_O4WPROXY.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_O4WPROXY.json new file mode 100644 index 0000000..a55e425 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_O4WPROXY.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_O4WPROXY" + }, + "body": { + "record1": { + "<1>": "Customization of OpenInsight Console Login Process", + "<2>": "When the OpenInsight Console accesses system variables located in non-SYSPROG accounts, it must create an additional Engine to actually \"log in\" to those accounts. This record controls and configures how that other Engine is started.", + "<3>": "{LITERAL X}", + "<4>": "Optional Stored Procedure to run when starting up application-specific Engine:" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OIBRW.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OIBRW.json new file mode 100644 index 0000000..53db583 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OIBRW.json @@ -0,0 +1,22 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_OIBRW" + }, + "body": { + "record1": { + "<1>": "Banded Report Writer connection details", + "<2>": "Specify how the Banded Report Writer should connect to the OpenInsight system during report definition and generation", + "<3>": "URL of Engine Server, or path to REVCAP32{BREAK}(for direct connection){DEFAULT .}{HELP Enter the URL or IP address of the engine server, or \"!\" to use the information stored in CFG_ESERVER}", + "<4>": "Port number of Engine Server", + "<5>": "Optional engine name{BREAK}(In direct connection, use * to share current engine) {DEFAULT *}", + "<6>": "Optional Startup flags{BREAK}(In direct connection, use 0 to share current engine) {DEFAULT 0}", + "<7>": "Optional Shutdown flags{BREAK}(In direct connection, use 0 to share current engine) {DEFAULT 0}", + "<8>": "Name of user-customizable handler routine{BREAK}for retrieving table and field names {DEFAULT RTI_BRW_FILTER}", + "<9>": "{LITERAL}", + "<10>": "Optional UTF8 Override Flag {OPTIONS Do not override/|Always use UTF8/1|Always use ANSI/0}", + "<11>": "Optional debug record name{BREAK}(use only for debugging; creates SYSLISTS record DEBUG_)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OIPI.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OIPI.json new file mode 100644 index 0000000..5781c49 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OIPI.json @@ -0,0 +1,28 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_OIPI" + }, + "body": { + "record1": { + "<1>": "Select original (OIPI) or new (OIPI.NET) print processor", + "<2>": { + "<2,1>": "Set field 1 to VSPRINTER to use OIPI, or VSPRINTER2 to use OIPI.NET", + "<2,2>": "Optionally set field 2 to 0 to suppress caching this selection", + "<2,3>": "", + "<2,4>": "Note: If selection is cached, and you wish to change field 1, please run REFRESH_VSPRINTER to clear the cached value" + }, + "<3>": "Selected Print Processor{OPTIONS VSPRINTER (OIPI Classic)/VSPRINTER|VSPRINTER2 (OIPI.Net)/VSPRINTER2}{DEFAULT VSPRINTER}", + "<4>": "Cache this selection?{OPTIONS No/0|Yes/1}{DEFAULT 1}", + "<5>": "(Optional) Name of \"Print to PDF\" printer to use for PDF generation (OIPI Classic only){BREAK}Leave blank to automatically use either provided OIPI PDF printer or built-in PDF generator{BREAK}Set to RTIVSPDF to force use of built-in PDF generator", + "<6>": "(Optional) Full path and name of file generated by \"Print to PDF\" printer (OIPI Classic only){BREAK}Only set if specific, non-OIPI PDF printer defined", + "<7>": "(Optional) Default TERM \"close\" type (defaults to \"\")", + "<8>": "(Optional) Show OIPI Form on Windows taskbar? {Options No/0|Yes/1} {DEFAULT 0}", + "<9>": "(Optional) Keep OIPI Form on top of other OI windows? {Options No/0|Yes/1} {DEFAULT 0}", + "<10>": "(Optional) Use XBand for TCL List statements {Options No/0|Yes/1} {DEFAULT 0}", + "<11>": "(Optional) XBand Theme for TCL List statements", + "<12>": "{MV 1}(Optional) Ordered list of export extensions{BREAK}(For example, CSV, PDF, DOCX, HTML, etc.){Options Please Select/|CSV/CSV|PDF/PDF|RTF/RTF|DOCX/DOCX|XLS/XLS|XLSX/XLSX|EMF/EMF|TIFF/TIFF|PNG/PNG|JPG/JPG|GIF/GIF|BMP/BMP|HTM/HTM|XPS/XPS}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OLIST.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OLIST.json new file mode 100644 index 0000000..db52a7c --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OLIST.json @@ -0,0 +1,25 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_OLIST" + }, + "body": { + "record1": { + "<1>": "OLIST Defaults", + "<2>": "Set the default font for olist (TCL LIST) reports.", + "<3>": { + "<3,1>": "Default Font Name {DEFAULT Courier New}", + "<3,2>": "Default Font Point Size {DEFAULT 10}", + "<3,3>": "Default Font Justification {OPTIONS Left/L|Right/R|Center/C}{DEFAULT L}", + "<3,4>": "Should default font be bold? {OPTIONS Yes/1|No/0}{DEFAULT 0}", + "<3,5>": "Should default font be in italics? {OPTIONS Yes/1|No/0}{DEFAULT 0}", + "<3,6>": "Should default font be underlined? {OPTIONS Yes/1|No/0}{DEFAULT 0}", + "<3,7>": "Should default font be strikethrough? {OPTIONS Yes/1|No/0}{DEFAULT 0}", + "<3,8>": "Default Font forecolor", + "<3,9>": "Default Font Text Angle", + "<3,10>": "Default Font Text Alignment" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OPENID.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OPENID.json new file mode 100644 index 0000000..76dd517 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_OPENID.json @@ -0,0 +1,43 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_OPENID" + }, + "body": { + "record1": { + "<1>": "O4W OpenID Support", + "<2>": "Allows O4W Users to log in using an OpenID provider and ID, and optionally associate that OpenID identity with an O4W permissions record.", + "<3>": "Enable OpenID Support? {OPTIONS No/0|OpenID version 1/1|OpenID Connect/2}{DEFAULT 0}", + "<4>": "Name of \"Generic\" OpenID permissions entry {DEFAULT OPENID}", + "<5>": "Login User Interface Layout {OPTIONS O4W Only/0|O4W then OpenID/1|OpenID then O4W/2|OpenID Only/-1}{DEFAULT 1}", + "<6>": { + "<6,1>": "Attempt to match OpenID identity with O4W permissions entry? {OPTIONS No/0|Yes/1}{DEFAULT 0}", + "<6,2>": "Allow creation of new O4W users entries for valid OpenID users? {OPTIONS No/0|Yes/1}{DEFAULT 0}" + }, + "<7>": "Routine to match OpenID identity with O4W permissions entry {DEFAULT RTI_OPENID_SUPPORT}", + "<8>": "Optional debug record key", + "<9>": "{LITERAL}", + "<10>": "{LITERAL}", + "<11>": "{LITERAL}", + "<12>": "Optional OpenID Connect prompt text (if dynamic discovery allowed)", + "<13>": "Allow OpenID Connect dynamic registration {OPTIONS No/0|Yes/1}{DEFAULT 0}", + "<14>": "OpenID Connect dynamic registration application name", + "<15>": "Optional stylesheet to include on OpenID Connect Login form", + "<16>": "{LITERAL}", + "<17>": "{MV 1}OpenID Connect Provider name", + "<18>": "{MV 1}Optional OpenID Connect Provider image URL", + "<19>": "{MV 1}Optional style information for OpenID Connect Provider", + "<20>": "{MV 1}OpenID Connect Provider discovery URL", + "<21>": "{MV 1}Optional OpenID Connect Provider authentication URL", + "<22>": "{MV 1}Optional OpenID Connect Provider token URL", + "<23>": "{MV 1}Optional OpenID Connect Provider dynamic registration URL", + "<24>": "{MV 1}OpenID Connect registered client ID", + "<25>": "{MV 1}OpenID Connect registered client secret", + "<26>": "{MV 1}OpenID Connect registered redirect URL", + "<27>": "{MV 1}Optional OpenID 2.0 to Connect Migration request token {DEFAULT openid.realm}{HELP openid2_realm or openid.realm or platform-specific migration token}", + "<28>": "{MV 1}Optional OpenID 2.0 to Connect Migration response token {DEFAULT openid_id}{HELP openid2_id or openid_id or platform-specific migration token}", + "<29>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER.json new file mode 100644 index 0000000..5fde6e9 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_PRECOMPILER" + }, + "body": { + "record1": { + "<1>": "Specify Precompilers To Run During Compilation", + "<2>": "Enter the names of any precompilers you wish to always include during stored procedure processing.", + "<3>": "{MF 1}{WIDTH 60}Precompiler Stored Procedure Names" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_AREV32.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_AREV32.json new file mode 100644 index 0000000..b56d78e --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_AREV32.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_PRECOMPILER_OVERRIDE_AREV32" + }, + "body": { + "record1": { + "<1>": "Keywords To Ignore During Precompilation", + "<2>": "Enter any keywords that the precompiler should ignore (and NOT attempt to convert) during processing, when the original language \"flavor\" is set to AREV/AREV32/AREV64.", + "<3>": "{MF 1}Keywords To Ignore" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_D3.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_D3.json new file mode 100644 index 0000000..b0ba55e --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_D3.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_PRECOMPILER_OVERRIDE_D3" + }, + "body": { + "record1": { + "<1>": "Keywords To Ignore During Precompilation", + "<2>": "Enter any keywords that the precompiler should ignore (and NOT attempt to convert) during processing, when the original language \"flavor\" is set to D3 (a newer, traditional multivalue).", + "<3>": "{MF 1}Keywords To Ignore" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_R83.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_R83.json new file mode 100644 index 0000000..0951c09 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_R83.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_PRECOMPILER_OVERRIDE_R83" + }, + "body": { + "record1": { + "<1>": "Keywords To Ignore During Precompilation", + "<2>": "Enter any keywords that the precompiler should ignore (and NOT attempt to convert) during processing, when the original language \"flavor\" is set to R83 (traditional multivalue).", + "<3>": "{MF 1}Keywords To Ignore" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_UNIVERSE.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_UNIVERSE.json new file mode 100644 index 0000000..f767b0a --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_PRECOMPILER_OVERRIDE_UNIVERSE.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_PRECOMPILER_OVERRIDE_UNIVERSE" + }, + "body": { + "record1": { + "<1>": "Keywords To Ignore During Precompilation", + "<2>": "Enter any keywords that the precompiler should ignore (and NOT attempt to convert) during processing, when the original language \"flavor\" is set to UniVerse.", + "<3>": "{MF 1}Keywords To Ignore" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_QPTR.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_QPTR.json new file mode 100644 index 0000000..9b05c55 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_QPTR.json @@ -0,0 +1,37 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_QPTR" + }, + "body": { + "record1": { + "<1>": "Control Q-POINTER (dynamic table access) behavior", + "<2>": { + "<2,1>": "This record controls Q-POINTER (dynamic table access) behavior", + "<2,2>": "Set cache flag (field 1)", + "<2,3>": "", + "<2,4>": "--", + "<2,5>": "Cache flag Description", + "<2,6>": "--", + "<2,7>": "Cache flag = \"0\" (or \"\" or invalid) ==> Always resolve q-pointer record information, do not cache tables when found", + "<2,8>": "Cache flag = \"1\" ==> Once resolved, retain resolved information in cache for increased performance", + "<2,9>": "", + "<2,10>": "---", + "<2,11>": "Notes", + "<2,12>": "--", + "<2,13>": "- The config record information is only accessed when the application starts up; changes to this record will not take effect until the user exits and re-enters OI", + "<2,14>": "- If no CFG_QPTR records are found OI will behave as if cache flag = 0", + "<2,15>": "- When cache flag is \"0\":", + "<2,16>": "-- OI will resolve the q-pointer each time the q-pointer is accessed", + "<2,17>": "-- Any changes to any q-pointer will be immediately seen when the q-pointer is next accessed", + "<2,18>": "- When cache flag is \"1\":", + "<2,19>": "-- OI will resolve the q-pointer only when the q-pointer is first accessed", + "<2,20>": "-- Any changes to a previously-accessed q-pointer will NOT be reflected when the q-pointer is next accessed - the previously-resolved table will continue to be used", + "<2,21>": "-- To see any changes to a previously-accessed q-pointer, you must either exit and re-enter OI,", + "<2,22>": "-- or run DETACH_TABLE on the q-pointer table (for example, \"DETACH_TABLE QPTR\")" + }, + "<3>": "Cache Flag{OPTIONS Enable Caching/1|Disable Caching/0}{DEFAULT 0}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_RTI_LOGIT.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_RTI_LOGIT.json new file mode 100644 index 0000000..bcd2093 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_RTI_LOGIT.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_RTI_LOGIT" + }, + "body": { + "record1": { + "<1>": "Configure RTI_LOGIT Logging Utility", + "<2>": "You can define where you wish the debugging output to go when the RTI_LOGIT routine is called. Specify the path, and leave the file name blank, to generate output to the specified folder with unique file names. Alternatively, specify both the full path and the file name parameters to write to the specified file in the desired location. If neither path nor file name are specified, the output will be placed in the \"logs\" subfolder under the OI folder.", + "<3>": "Full path for logging output", + "<4>": "Filename to write logging output" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_RTI_RLIST.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_RTI_RLIST.json new file mode 100644 index 0000000..147a89b --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_RTI_RLIST.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_RTI_RLIST" + }, + "body": { + "record1": { + "<1>": "Select Traditional or Enhanced RLIST functionality", + "<2>": "Choose whether RLIST behaves in a backwards-compatible fashion (RLIST9) or with new enhanced functionality, including multiple cursor support, multiple commands executed in series, etc. (RLISTX)", + "<3>": "RLIST behavior?{OPTIONS Traditional/RLIST9|Enhanced/RLISTX}{DEFAULT RLIST9}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_RTI_UPDATE_INDEX.json b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_RTI_UPDATE_INDEX.json new file mode 100644 index 0000000..95f41b9 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALAYOUT_CFG_RTI_UPDATE_INDEX.json @@ -0,0 +1,14 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LAYOUT_CFG_RTI_UPDATE_INDEX" + }, + "body": { + "record1": { + "<1>": "Specify the Index Routines To Use", + "<2>": "Choose whether the OpenInsight version 9, or OpenInsight version 10, index update routines are used. Set field 1 to \"90\" to enable version 9 indexing, or \"10\" to enable version 10 indexing.", + "<3>": "Which index update routines should be enabled? {OPTIONS OpenInsight 10 Indexing/10|OpenInsight 9 Indexing/90}{DEFAULT 10}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALND_DEFAULT.json b/SYSPROG/APPROW/SYSENV%003ALND_DEFAULT.json new file mode 100644 index 0000000..bcfd515 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALND_DEFAULT.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LND_DEFAULT" + }, + "body": { + "record1": { + "<1>": "English language set for the United States", + "<2>": { + "<2,1>": "JAN", + "<2,2>": "FEB", + "<2,3>": "MAR", + "<2,4>": "APR", + "<2,5>": "MAY", + "<2,6>": "JUN", + "<2,7>": "JUL", + "<2,8>": "AUG", + "<2,9>": "SEP", + "<2,10>": "OCT", + "<2,11>": "NOV", + "<2,12>": "DEC" + }, + "<3>": { + "<3,1>": "January", + "<3,2>": "February", + "<3,3>": "March", + "<3,4>": "April", + "<3,5>": "May", + "<3,6>": "June", + "<3,7>": "July", + "<3,8>": "August", + "<3,9>": "September", + "<3,10>": "October", + "<3,11>": "November", + "<3,12>": "December" + }, + "<4>": "AM", + "<5>": "PM", + "<6>": { + "<6,1>": "", + "<6,2>": "DB", + "<6,3>": "CR" + }, + "<7>": "ABCDEFGHIJKLMNOPQRSTUVWXYZ", + "<8>": "abcdefghijklmnopqrstuvwxyz", + "<9>": { + "<9,1>": "BYes,No", + "<9,2>": "D", + "<9,3>": "MT", + "<9,4>": "DT", + "<9,5>": "MD2$", + "<9,6>": "MS", + "<9,7>": "", + "<9,8>": ".", + "<9,9>": ",", + "<9,10>": "$" + }, + "<10>": "CM_US", + "<11>": "0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "APPMAIN" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALND_ENGLISH_INT.json b/SYSPROG/APPROW/SYSENV%003ALND_ENGLISH_INT.json new file mode 100644 index 0000000..1be82fd --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALND_ENGLISH_INT.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LND_ENGLISH_INT" + }, + "body": { + "record1": { + "<1>": "Basic international English language set", + "<2>": { + "<2,1>": "JAN", + "<2,2>": "FEB", + "<2,3>": "MAR", + "<2,4>": "APR", + "<2,5>": "MAY", + "<2,6>": "JUN", + "<2,7>": "JUL", + "<2,8>": "AUG", + "<2,9>": "SEP", + "<2,10>": "OCT", + "<2,11>": "NOV", + "<2,12>": "DEC" + }, + "<3>": { + "<3,1>": "January", + "<3,2>": "February", + "<3,3>": "March", + "<3,4>": "April", + "<3,5>": "May", + "<3,6>": "June", + "<3,7>": "July", + "<3,8>": "August", + "<3,9>": "September", + "<3,10>": "October", + "<3,11>": "November", + "<3,12>": "December" + }, + "<4>": "AM", + "<5>": "PM", + "<6>": { + "<6,1>": "", + "<6,2>": "DB", + "<6,3>": "CR" + }, + "<7>": "??????AB?CD????EFGH????IJKLM?N????OPQR?ST????UVWX?YZ", + "<8>": "??????ab?cd????efgh????ijklm?n????opqr?st????uvwx?yz", + "<9>": { + "<9,1>": "BYes,No", + "<9,2>": "DE.", + "<9,3>": "MT.", + "<9,4>": "DT.EM^.", + "<9,5>": "MD2$", + "<9,6>": "MS", + "<9,7>": "", + "<9,8>": "", + "<9,9>": "", + "<9,10>": "" + }, + "<10>": "CM_ISO", + "<11>": "???????????????????????????00000??????00000000000000000000000000000000000000000000000000000000000?00000000000000000000000000000", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "APPMAIN" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALND_ENGLISH_UK.json b/SYSPROG/APPROW/SYSENV%003ALND_ENGLISH_UK.json new file mode 100644 index 0000000..d58f7ba --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALND_ENGLISH_UK.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LND_ENGLISH_UK" + }, + "body": { + "record1": { + "<1>": "English language set for the United Kingdom", + "<2>": { + "<2,1>": "JAN", + "<2,2>": "FEB", + "<2,3>": "MAR", + "<2,4>": "APR", + "<2,5>": "MAY", + "<2,6>": "JUN", + "<2,7>": "JUL", + "<2,8>": "AUG", + "<2,9>": "SEP", + "<2,10>": "OCT", + "<2,11>": "NOV", + "<2,12>": "DEC" + }, + "<3>": { + "<3,1>": "January", + "<3,2>": "February", + "<3,3>": "March", + "<3,4>": "April", + "<3,5>": "May", + "<3,6>": "June", + "<3,7>": "July", + "<3,8>": "August", + "<3,9>": "September", + "<3,10>": "October", + "<3,11>": "November", + "<3,12>": "December" + }, + "<4>": "AM", + "<5>": "PM", + "<6>": { + "<6,1>": "", + "<6,2>": "DB", + "<6,3>": "CR" + }, + "<7>": "ABCDEFGHIJKLMNOPQRSTUVWXYZ", + "<8>": "abcdefghijklmnopqrstuvwxyz", + "<9>": { + "<9,1>": "BYes,No", + "<9,2>": "DE.", + "<9,3>": "MT.", + "<9,4>": "DT.EM^.", + "<9,5>": "MD2[œ]", + "<9,6>": "MS", + "<9,7>": "", + "<9,8>": ".", + "<9,9>": ",", + "<9,10>": "£" + }, + "<10>": "CM_ISO", + "<11>": "€šƒŽ…€ˆ‰Š‹ŒŽ’’“™•–—˜™š00000 ¡¢£¥¥00000000000000000000000000000000000000000000000000000000000á00000000000000000000000000000", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "APPMAIN" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALND_ENGLISH_US.json b/SYSPROG/APPROW/SYSENV%003ALND_ENGLISH_US.json new file mode 100644 index 0000000..8eac2b5 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALND_ENGLISH_US.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LND_ENGLISH_US" + }, + "body": { + "record1": { + "<1>": "English language set for the United States", + "<2>": { + "<2,1>": "JAN", + "<2,2>": "FEB", + "<2,3>": "MAR", + "<2,4>": "APR", + "<2,5>": "MAY", + "<2,6>": "JUN", + "<2,7>": "JUL", + "<2,8>": "AUG", + "<2,9>": "SEP", + "<2,10>": "OCT", + "<2,11>": "NOV", + "<2,12>": "DEC" + }, + "<3>": { + "<3,1>": "January", + "<3,2>": "February", + "<3,3>": "March", + "<3,4>": "April", + "<3,5>": "May", + "<3,6>": "June", + "<3,7>": "July", + "<3,8>": "August", + "<3,9>": "September", + "<3,10>": "October", + "<3,11>": "November", + "<3,12>": "December" + }, + "<4>": "AM", + "<5>": "PM", + "<6>": { + "<6,1>": "", + "<6,2>": "DB", + "<6,3>": "CR" + }, + "<7>": "ABCDEFGHIJKLMNOPQRSTUVWXYZ", + "<8>": "abcdefghijklmnopqrstuvwxyz", + "<9>": { + "<9,1>": "BYes,No", + "<9,2>": "D", + "<9,3>": "MT", + "<9,4>": "DT", + "<9,5>": "MD2$", + "<9,6>": "MS", + "<9,7>": "", + "<9,8>": ".", + "<9,9>": ",", + "<9,10>": "$" + }, + "<10>": "CM_US", + "<11>": "0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "APPMAIN" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALND_FRENCH_CN.json b/SYSPROG/APPROW/SYSENV%003ALND_FRENCH_CN.json new file mode 100644 index 0000000..7f5d984 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALND_FRENCH_CN.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LND_FRENCH_CN" + }, + "body": { + "record1": { + "<1>": "French-Canadian language set", + "<2>": { + "<2,1>": "jan", + "<2,2>": "f?v", + "<2,3>": "mar", + "<2,4>": "avr", + "<2,5>": "mai", + "<2,6>": "jun", + "<2,7>": "jul", + "<2,8>": "ao?", + "<2,9>": "sep", + "<2,10>": "oct", + "<2,11>": "nov", + "<2,12>": "d?c" + }, + "<3>": { + "<3,1>": "janvier", + "<3,2>": "f?vrier", + "<3,3>": "mars", + "<3,4>": "avril", + "<3,5>": "mai", + "<3,6>": "juin", + "<3,7>": "juillet", + "<3,8>": "ao?t", + "<3,9>": "septembre", + "<3,10>": "octobre", + "<3,11>": "novembre", + "<3,12>": "d?cembre" + }, + "<4>": "", + "<5>": "", + "<6>": { + "<6,1>": "", + "<6,2>": "DB", + "<6,3>": "CR" + }, + "<7>": "AAAAAA?BCCDEEEEEFGHIIIIIJKLMN?OOOOOPQR?STUUUUUVWXYYZ", + "<8>": "a??????b?cde????fghi????jklmn?o????pqr?stu????vwxy?z", + "<9>": { + "<9,1>": "BOui,Non", + "<9,2>": "DE.", + "<9,3>": "MT.", + "<9,4>": "DT.EM^.", + "<9,5>": "MD2$", + "<9,6>": "MS", + "<9,7>": "", + "<9,8>": "", + "<9,9>": "", + "<9,10>": "" + }, + "<10>": "CM_ISO", + "<11>": "CUEAAAACEEEIIIAAE??OOOUUYOU00000AIOU??00000000000000000000000000000000000000000000000000000000000?00000000000000000000000000000", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "APPMAIN" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALND_FRENCH_F.json b/SYSPROG/APPROW/SYSENV%003ALND_FRENCH_F.json new file mode 100644 index 0000000..2e73665 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALND_FRENCH_F.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LND_FRENCH_F" + }, + "body": { + "record1": { + "<1>": "Continental French language set", + "<2>": { + "<2,1>": "jan", + "<2,2>": "f‚v", + "<2,3>": "mar", + "<2,4>": "avr", + "<2,5>": "mai", + "<2,6>": "jun", + "<2,7>": "jul", + "<2,8>": "ao–", + "<2,9>": "sep", + "<2,10>": "oct", + "<2,11>": "nov", + "<2,12>": "d‚c" + }, + "<3>": { + "<3,1>": "janvier", + "<3,2>": "f‚vrier", + "<3,3>": "mars", + "<3,4>": "avril", + "<3,5>": "mai", + "<3,6>": "juin", + "<3,7>": "juillet", + "<3,8>": "ao–t", + "<3,9>": "septembre", + "<3,10>": "octobre", + "<3,11>": "novembre", + "<3,12>": "d‚cembre" + }, + "<4>": "", + "<5>": "", + "<6>": { + "<6,1>": "", + "<6,2>": "DB", + "<6,3>": "CR" + }, + "<7>": "AÀAAAA’BCCDEEEEEFGHIIIIIJKLMN¥OOOOOPQRáSTUUUUUVWXYYZ", + "<8>": "a„ …ƒ†‘b‡cde‰Šˆ‚fghi‹¡Œjklmn¤o”¢•“pqrástu£—–vwxy˜z", + "<9>": { + "<9,1>": "BOui,Non", + "<9,2>": "DE.", + "<9,3>": "MT.", + "<9,4>": "DT.EM^.", + "<9,5>": "MC2[F ]", + "<9,6>": "MS,", + "<9,7>": "", + "<9,8>": "", + "<9,9>": "", + "<9,10>": "" + }, + "<10>": "CM_ISO", + "<11>": "CUEAAAACEEEIIIAAE’’OOOUUYOU00000AIOU¥¥00000000000000000000000000000000000000000000000000000000000á00000000000000000000000000000", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "APPMAIN" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALND_GERMAN_D.json b/SYSPROG/APPROW/SYSENV%003ALND_GERMAN_D.json new file mode 100644 index 0000000..be9aa77 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALND_GERMAN_D.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LND_GERMAN_D" + }, + "body": { + "record1": { + "<1>": "German language set", + "<2>": { + "<2,1>": "JAN", + "<2,2>": "FEB", + "<2,3>": "MRZ", + "<2,4>": "APR", + "<2,5>": "MAI", + "<2,6>": "JUN", + "<2,7>": "JUL", + "<2,8>": "AUG", + "<2,9>": "SEP", + "<2,10>": "OKT", + "<2,11>": "NOV", + "<2,12>": "DEZ" + }, + "<3>": { + "<3,1>": "Januar", + "<3,2>": "Februar", + "<3,3>": "M„rz", + "<3,4>": "April", + "<3,5>": "Mai", + "<3,6>": "Juni", + "<3,7>": "Juli", + "<3,8>": "August", + "<3,9>": "September", + "<3,10>": "Oktober", + "<3,11>": "November", + "<3,12>": "Dezember" + }, + "<4>": "vorm.", + "<5>": "nachm.", + "<6>": { + "<6,1>": "", + "<6,2>": "Soll", + "<6,3>": "Haben" + }, + "<7>": "Ž …ƒ’AB€CD‰ŠˆEFGH‹¡ŒIJKLM¥N™¢•“OPQRáSTš£—–UVWX˜YZ", + "<8>": "„ …ƒ†‘ab‡cd‰Šˆ‚efgh‹¡Œijklm¤n”¢•“opqrást£—–uvwx˜yz", + "<9>": { + "<9,1>": "BJa,Nein", + "<9,2>": "DE.", + "<9,3>": "MT.", + "<9,4>": "DT.EM^.", + "<9,5>": "MC2[DM ]", + "<9,6>": "MS,", + "<9,7>": "", + "<9,8>": "", + "<9,9>": "", + "<9,10>": "" + }, + "<10>": "CM_ISO", + "<11>": "€šƒŽ…€ˆ‰Š‹ŒŽ’’“™•–—˜™š00000 ¡¢£¥¥00000000000000000000000000000000000000000000000000000000000á00000000000000000000000000000", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "APPMAIN" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ALND_INTERNATIONAL.json b/SYSPROG/APPROW/SYSENV%003ALND_INTERNATIONAL.json new file mode 100644 index 0000000..b29ad95 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ALND_INTERNATIONAL.json @@ -0,0 +1,48 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "LND_INTERNATIONAL" + }, + "body": { + "record1": { + "<1>": "Basic international language set", + "<2>": "", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "", + "<7>": "Ž …ƒ’AB€CD‰ŠˆEFGH‹¡ŒIJKLM¥N™¢•“OPQRáSTš£—–UVWX˜YZ", + "<8>": "„ …ƒ†‘ab‡cd‰Šˆ‚efgh‹¡Œijklm¤n”¢•“opqrást£—–uvwx˜yz", + "<9>": "", + "<10>": "CM_ISO", + "<11>": "€šƒŽ…€ˆ‰Š‹ŒŽ’’“™•–—˜™š00000 ¡¢£¥¥00000000000000000000000000000000000000000000000000000000000á00000000000000000000000000000", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "APPMAIN" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ANEWAPPLICATIONLIST.json b/SYSPROG/APPROW/SYSENV%003ANEWAPPLICATIONLIST.json new file mode 100644 index 0000000..c38f06a --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ANEWAPPLICATIONLIST.json @@ -0,0 +1,111 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "NEWAPPLICATIONLIST" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "VOC", + "<1,2>": "*" + }, + "<2>": { + "<2,1>": "DICT.VOC", + "<2,2>": "" + }, + "<3>": { + "<3,1>": { + "<3,1,1>": "BATCHUPDATE", + "<3,1,2>": "QUICKDEX.MFS" + } + }, + "<4>": { + "<4,1>": { + "<4,1,1>": "CAPTURED", + "<4,1,2>": "QUICKDEX.MFS" + } + }, + "<5>": { + "<5,1>": { + "<5,1,1>": "HELP", + "<5,1,2>": "QUICKDEX.MFS" + } + }, + "<6>": { + "<6,1>": { + "<6,1,1>": "IMPORTEXPORT", + "<6,1,2>": "QUICKDEX.MFS" + } + }, + "<7>": "LISTS", + "<8>": { + "<8,1>": { + "<8,1,1>": "MACROS", + "<8,1,2>": "QUICKDEX.MFS" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "MENUS", + "<9,1,2>": "QUICKDEX.MFS" + } + }, + "<10>": { + "<10,1>": { + "<10,1,1>": "MESSAGES", + "<10,1,2>": "QUICKDEX.MFS" + } + }, + "<11>": "OBJECT", + "<12>": { + "<12,1>": { + "<12,1,1>": "POPUPS", + "<12,1,2>": "QUICKDEX.MFS" + } + }, + "<13>": { + "<13,1>": { + "<13,1,1>": "REPORTS", + "<13,1,2>": "QUICKDEX.MFS" + } + }, + "<14>": { + "<14,1>": { + "<14,1,1>": "SOURCE", + "<14,1,2>": "PROGRAM.MFS", + "<14,1,3>": "QUICKDEX.MFS" + } + }, + "<15>": "SYSALIASES", + "<16>": "SYSVIEWS", + "<17>": "SYSEMBEDDED", + "<18>": "SYSRELATIONS", + "<19>": { + "<19,1>": { + "<19,1,1>": "WINDOWS", + "<19,1,2>": "QUICKDEX.MFS" + } + }, + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "APPMAIN", + "<38>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003AOI_UPDATED.json b/SYSPROG/APPROW/SYSENV%003AOI_UPDATED.json new file mode 100644 index 0000000..40d9ed5 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003AOI_UPDATED.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "OI_UPDATED" + }, + "body": { + "record1": { + "<1>": "10.2.1", + "<2>": "20440" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003APAPERSIZES.json b/SYSPROG/APPROW/SYSENV%003APAPERSIZES.json new file mode 100644 index 0000000..bfcbf5f --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003APAPERSIZES.json @@ -0,0 +1,79 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PAPERSIZES" + }, + "body": { + "record1": { + "<1>": "LETTER", + "<2>": "LETTERSMALL", + "<3>": "TABLOID", + "<4>": "LEDGER", + "<5>": "LEGAL", + "<6>": "STATEMENT1", + "<7>": "EXECUTIVE", + "<8>": "A3", + "<9>": "A4", + "<10>": "A4SMALL", + "<11>": "A5", + "<12>": "B4", + "<13>": "B5", + "<14>": "FOLIO", + "<15>": "QUARTO", + "<16>": "S10X14", + "<17>": "S11X17", + "<18>": "NOTE", + "<19>": "ENV9", + "<20>": "ENV10", + "<21>": "ENV11", + "<22>": "ENV12", + "<23>": "ENV14", + "<24>": "CSHEET", + "<25>": "DSHEET", + "<26>": "ESHEET", + "<27>": "ENVDL", + "<28>": "ENVC3", + "<29>": "ENVC4", + "<30>": "ENVC5", + "<31>": "ENVC6", + "<32>": "ENVC65", + "<33>": "ENVB4", + "<34>": "ENVB5", + "<35>": "ENVB6", + "<36>": "ENVITALY", + "<37>": "ENVMONARCH", + "<38>": "ENVPERSONAL", + "<39>": "FANFOLDUS", + "<40>": "FANFOLDSTDGERMAN", + "<41>": "FANFOLDLGLGERMAN", + "<42>": "ISO_B4", + "<43>": "JAPANESE_POSTCARD", + "<44>": "PS9X11", + "<45>": "PS10X11", + "<46>": "PS15X11", + "<47>": "ENV_INVITE", + "<48>": "RESERVED_48", + "<49>": "RESERVED_49", + "<50>": "LETTER_EXTRA", + "<51>": "LEGAL_EXTRA", + "<52>": "TABLOID_EXTRA", + "<53>": "A4_EXTRA", + "<54>": "LETTER_TRANSVERSE", + "<55>": "A4_TRANSVERSE", + "<56>": "LETTER_EXTRA_TRANSVERSE", + "<57>": "A_PLUS", + "<58>": "B_PLUS", + "<59>": "LETTER_PLUS", + "<60>": "A4_PLUS", + "<61>": "A5_TRANSVERSE", + "<62>": "B5_TRANSVERSE", + "<63>": "A3_EXTRA", + "<64>": "A5_EXTRA", + "<65>": "B5_EXTRA", + "<66>": "A2", + "<67>": "A3_TRANSVERSE", + "<68>": "A3_EXTRA_TRANSVERSE" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003APS_RESOURCES.json b/SYSPROG/APPROW/SYSENV%003APS_RESOURCES.json new file mode 100644 index 0000000..71d7f5d --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003APS_RESOURCES.json @@ -0,0 +1,129 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "PS_RESOURCES" + }, + "body": { + "record1": { + "<1>": "* //", + "<2>": "* // File : SYSENV - PS_RESOURCES", + "<3>": "* // Author : Mr C", + "<4>": "* // Date : September 2012", + "<5>": "* // Purpose : PS-related procedure resource strings", + "<6>": "* //", + "<7>": "* // Comments", + "<8>": "* // ========", + "<9>": "* //", + "<10>": "* // 1) This resource record is designed to hold resource strings for PS", + "<11>": "* // procedures.", + "<12>": "* //", + "<13>": "* // Amended Date Reason", + "<14>": "* // ======= ==== ======", + "<15>": "* // Mr C 10 Aug 20 Updated PSTV.07/08 to include property ID", + "<16>": "* // Mr C 03 Jan 20 Added PSSI60 series strings", + "<17>": "* // Mr C 27 Sep 19 Added PSOA.07-09 strings", + "<18>": "* // Mr C 20 Sep 19 Added PSTV.09-PSTV.13 strings", + "<19>": "* // BZS 29 Mar 18 PSOA again", + "<20>": "* // bzs 08 Mar 18 Updated PSOA strings some more", + "<21>": "* // Mr C 09 Nov 17 Updated PSOA strings again!", + "<22>": "* // Mr C 03 Nov 17 Updated PSOA.01", + "<23>": "* // Mr C 02 Nov 17 Updated PSOA strings", + "<24>": "* // Mr C 18 Jul 17 Added PSOA.20, PSOA.21", + "<25>": "* // Mr C 26 Jul 16 Added PSTI.09", + "<26>": "* / Mr C 17 Mar 16 Added PSRE.00, Removed versioning because GIT", + "<27>": "* // bzs 09 Mar 16 Changed some wording in PS_OPENAPP messages", + "<28>": "* // BZS 06 Feb 16 Added additional PS_OPENAPP", + "<29>": "* // Mr C 15 Mar 15 Added PS_OPENAPP and PS_SYSINIT", + "<30>": "", + "<31>": "///////////////////////////////////////////////////////////////////////////////", + "<32>": "//[PS_SYSMON]//////////////////////////////////////////////////////////////////", + "<33>": "", + "<34>": "PSSM.01: Invalid method \"%1%\" passed to the %2% procedure", + "<35>": "PSSM.02: Error opening the SYSLISTS table in the %1% \"%2%\" method [%3%]", + "<36>": "PSSM.03: Error writing the \"%1%\" command stack to the SYSLISTS table in the %2% \"%3%\" method [%4%]", + "<37>": "", + "<38>": "///////////////////////////////////////////////////////////////////////////////", + "<39>": "//[PS_TYPEINFO]////////////////////////////////////////////////////////////////", + "<40>": "", + "<41>": "PSTI.01: Invalid method \"%1%\" passed to the %2% procedure", + "<42>": "PSTI.02: \"%1%\" is not a valid property handler for the \"%2%\" OLE control type [%3%]", + "<43>": "PSTI.03: No Type Name passed to the %1% method in the %2% procedure", + "<44>": "PSTI.04: Error accessing type information for the \"%1%\" type in the %2% %3% method [%4%]", + "<45>": "PSTI.05: Invalid DEFPROPPOS definition for the %1% OLE control in the %2% %3% method", + "<46>": "PSTI.06: No Object ID passed to the %1% method in the %2% procedure", + "<47>": "PSTI.07: No OLE POSCHANGED event defined for the %1% OLE control in the %2% %3% method", + "<48>": "PSTI.08: Error opening PS Type Info table in the %1% procedure [%2%]", + "<49>": "PSTI.09: Error updating type information for the \"%1%\" type in the %2% %3% method [%4%]", + "<50>": "PSTI.10: Invalid control ID \"%1%\" passed to the %2% %3% method", + "<51>": "PSTI.11: No Event Name passed to the %1% method in the %2% procedure", + "<52>": "PSTI.12: Invalid %1% event \"%2%\" passed to the %3% %4% method", + "<53>": "", + "<54>": "///////////////////////////////////////////////////////////////////////////////", + "<55>": "//[PS_TYPEINFO_TYPEVALUES]/////////////////////////////////////////////////////", + "<56>": "", + "<57>": "PSTV.00: Error initializing the TypeInfo Type Value system the %1% procedure [%2%]", + "<58>": "PSTV.01: Invalid method \"%1%\" passed to the %2% procedure", + "<59>": "PSTV.02: No Type ID passed to the %1% method in the %2% procedure", + "<60>": "PSTV.03: Error accessing type display data for the \"%1%\" type in the %2% %3% method [%4%]", + "<61>": "PSTV.04: Error accessing type internal data for the \"%1%\" type in the %2% %3% method [%4%]", + "<62>": "PSTV.05: No IValue passed to the %1% method in the %2% procedure", + "<63>": "PSTV.06: Invalid IValue \"%1%\" passed to the %2% method in the %3% procedure", + "<64>": "PSTV.07: No \"%1%\" OValue passed to the %2% method in the %3% procedure", + "<65>": "PSTV.08: Invalid \"%1%\" IValue \"%2%\" passed to the %3% method in the %4% procedure", + "<66>": "PSTV.09: No CLSID passed to the %1% method in the %2% procedure", + "<67>": "PSTV.10: No PropertyName passed to the %1% method in the %2% procedure", + "<68>": "PSTV.11: No IValues passed to the %1% method in the %2% procedure", + "<69>": "PSTV.12: No OValues passed to the %1% method in the %2% procedure", + "<70>": "PSTV.13: Mismatched IValue and OValue lists passed to the %1% method in the %2% procedure", + "<71>": "", + "<72>": "///////////////////////////////////////////////////////////////////////////////", + "<73>": "//[PS_OPENAPP]/////////////////////////////////////////////////////////////////", + "<74>": "", + "<75>": "PSOA.00: Invalid User Name or Password. Please try again.", + "<76>": "PSOA.01: Your login has expired. Please contact your system administrator.", + "<77>": "PSOA.02: Your login will expire in %1% days. Please reset your password.", + "<78>": "PSOA.03: Your login will expire tomorrow. Please reset your password.", + "<79>": "PSOA.04: Your login expires TODAY. You must reset your password.", + "<80>": "PSOA.05: This user has been disabled. Please contact your system administrator.", + "<81>": "PSOA.06: Logging in on this workstation has been disabled due to excessive login attempts. Please contact your system administrator.", + "<82>": "PSOA.07: \"%1% is not a valid login form template ID ", + "<83>": "PSOA.08: Recursive call to login form CREATE event detected", + "<84>": "PSOA.09: Duplicate control \"%1%\" detected in login form template ", + "<85>": "PSOA.20: Open Application", + "<86>": "PSOA.21: Run Application", + "<87>": "PSOA.22: Password Expired", + "<88>": "PSOA.23: Password Expires Soon", + "<89>": "PSOA.24: User Disabled", + "<90>": "PSOA.25: Login Disabled", + "<91>": "PSOA.26: Login Failed", + "<92>": "", + "<93>": "///////////////////////////////////////////////////////////////////////////////", + "<94>": "//[PS_SYSINTIALIZE]////////////////////////////////////////////////////////////", + "<95>": "", + "<96>": "PSSI.00: No entry window defined for the %1% application.", + "<97>": "PSSI.01: No visible entry window started for the %1% application", + "<98>": "PSSI.02: Unable to start entry window \"%1%\" for the %2% application", + "<99>": "PSSI.20: . Process aborted", + "<100>": "PSSI.21: %1% initialization", + "<101>": "PSSI.60: This Developer Class Server Deployment Pack for OpenInsight is due to expire on %1%.|Please contact Revelation Software at +1-800-262-4747 to renew your license.", + "<102>": "PSSI.61: This copy of OpenInsight is due to expire on %1%.|Please contact Revelation Software at +1-800-262-4747 to renew your license.", + "<103>": "PSSI.62: This copy of OpenInsight expired on %1%.|Use of this software is in violation of your OpenInsight Software License Agreement.|Please contact Revelation Software at +1-800-262-4747 to renew your license.", + "<104>": "PSSI.63: This copy of OpenInsight has expired.||To purchase this product, contact Revelation Software on the web at:||www.revelation.com||Or call toll-free: (800) 262-4747", + "<105>": "PSSI.64: This evaluation copy of OpenInsight expires on %1%.||To purchase this product, contact Revelation Software on the web at:||www.revelation.com||Or call toll-free: (800) 262-4747", + "<106>": "PSSI.65: This evaluation copy of OpenInsight has expired.||To purchase this product, contact Revelation Software on the web at:||www.revelation.com||Or call toll-free: (800) 262-4747", + "<107>": "PSSI.66: This Developer Class Server Deployment Pack for OpenInsight expired on %1%.|Use of this software is in violation of your OpenInsight Software License Agreement.|Please contact Revelation Software at +1-800-262-4747 to renew your license.", + "<108>": "PSSI.67: Unable to process License Information.", + "<109>": "PSSI.68: OpenInsight Licensing", + "<110>": "", + "<111>": "///////////////////////////////////////////////////////////////////////////////", + "<112>": "// [RUN_EVENT] ////////////////////////////////////////////////////////////////", + "<113>": "", + "<114>": "PSRE.00: Critical RUN_EVENT failure for the %1% %2% event [%3%]", + "<115>": "PSRE.10: Critical RUN_EVENT failure", + "<116>": "", + "<117>": "///////////////////////////////////////////////////////////////////////////////", + "<118>": "///////////////////////////////////////////////////////////////////////////////" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ARBASIC_KEYWORDS.json b/SYSPROG/APPROW/SYSENV%003ARBASIC_KEYWORDS.json new file mode 100644 index 0000000..6f8d694 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ARBASIC_KEYWORDS.json @@ -0,0 +1,792 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RBASIC_KEYWORDS" + }, + "body": { + "record1": { + "<1>": "X 1", + "<2>": { + "<2,1>": "@WINDOW", + "<2,2>": "ABORT", + "<2,3>": "ABS", + "<2,4>": "ALPHA", + "<2,5>": "AND", + "<2,6>": "AS", + "<2,7>": "ASSIGNED", + "<2,8>": "ASSIGNING", + "<2,9>": "AT", + "<2,10>": "ATAN", + "<2,11>": "BCOL1", + "<2,12>": "BCOL2", + "<2,13>": "BEGIN", + "<2,14>": "BITAND", + "<2,15>": "BITNOT", + "<2,16>": "BITOR", + "<2,17>": "BITSHL", + "<2,18>": "BITSHR", + "<2,19>": "BITXOR", + "<2,20>": "BLEN", + "<2,21>": "BREAK", + "<2,22>": "BREAKKEY", + "<2,23>": "BREMOVE", + "<2,24>": "BTREE.EXTRACT", + "<2,25>": "BY", + "<2,26>": "CALCULATE", + "<2,27>": "CALL", + "<2,28>": "CASE", + "<2,29>": "CAT", + "<2,30>": "CHAIN", + "<2,31>": "CHAR", + "<2,32>": "CLEARCOMMON", + "<2,33>": "CLEARDATA", + "<2,34>": "CLEARFILE", + "<2,35>": "CLEARSELECT", + "<2,36>": "COL1", + "<2,37>": "COL1B", + "<2,38>": "COL2", + "<2,39>": "COL2B", + "<2,40>": "COLHEADING", + "<2,41>": "COLLENGTH", + "<2,42>": "COM", + "<2,43>": "COMMON", + "<2,44>": "COMPILE", + "<2,45>": "CONVERT", + "<2,46>": "COPY_TABLE", + "<2,47>": "COS", + "<2,48>": "COUNT", + "<2,49>": "CREATEBINARYDATA", + "<2,50>": "CREATE_DIALOG", + "<2,51>": "DATA", + "<2,52>": "DATE", + "<2,53>": "DCOUNT", + "<2,54>": "DEBUG", + "<2,55>": "DECLARE", + "<2,56>": "DELAY", + "<2,57>": "DELETE", + "<2,58>": "DESCRIPTER", + "<2,59>": "DESCRIPTERTYPE", + "<2,60>": "DESCRIPTOR", + "<2,61>": "DIALOG_BOX", + "<2,62>": "DIM", + "<2,63>": "DIMENSION", + "<2,64>": "DIR", + "<2,65>": "DIRLIST", + "<2,66>": "DO", + "<2,67>": "DRIVE", + "<2,68>": "ELSE", + "<2,69>": "END", + "<2,70>": "ENSUREVARIABLE", + "<2,71>": "EQ", + "<2,72>": "EQU", + "<2,73>": "EQUATE", + "<2,74>": "EXP", + "<2,75>": "EXPIRYDATE", + "<2,76>": "EXTRACT", + "<2,77>": "FIELD", + "<2,78>": "FIELDCOUNT", + "<2,79>": "FIELDSTORE", + "<2,80>": "FIND", + "<2,81>": "FLUSH", + "<2,82>": "FMT", + "<2,83>": "FOR", + "<2,84>": "FORMAT", + "<2,85>": "FREECOMMON", + "<2,86>": "FROM", + "<2,87>": "FSMSG", + "<2,88>": "FUNCTION", + "<2,89>": "GARBAGECOLLECT", + "<2,90>": "GE", + "<2,91>": "GETBINARYVALUE", + "<2,92>": "GETBREAK", + "<2,93>": "GETBYTESIZE", + "<2,94>": "GETPOINTER", + "<2,95>": "GETPRINTER", + "<2,96>": "GETVALUE", + "<2,97>": "GET_PRINTER", + "<2,98>": "GET_PROPERTY", + "<2,99>": "GET_STATUS", + "<2,100>": "GO", + "<2,101>": "GOSUB", + "<2,102>": "GOTO", + "<2,103>": "GSCLEAR", + "<2,104>": "GSRETURN", + "<2,105>": "GT", + "<2,106>": "HEADING", + "<2,107>": "ICONV", + "<2,108>": "IF", + "<2,109>": "IN", + "<2,110>": "INCLUDE", + "<2,111>": "INDEX", + "<2,112>": "INDEXC", + "<2,113>": "INET_MSG", + "<2,114>": "INET_QUERYPARAM", + "<2,115>": "INITDIR", + "<2,116>": "INITRND", + "<2,117>": "INMAT", + "<2,118>": "INP", + "<2,119>": "INPUT", + "<2,120>": "INSERT", + "<2,121>": "INT", + "<2,122>": "LE", + "<2,123>": "LEN", + "<2,124>": "LENGTH", + "<2,125>": "LIKE", + "<2,126>": "LINEMARK", + "<2,127>": "LIST_VOLUME_SUB", + "<2,128>": "LN", + "<2,129>": "LOCATE", + "<2,130>": "LOCATEC", + "<2,131>": "LOCK", + "<2,132>": "LOCKVARIABLE", + "<2,133>": "LOOP", + "<2,134>": "LT", + "<2,135>": "MAT", + "<2,136>": "MATCH", + "<2,137>": "MATCHES", + "<2,138>": "MATPARSE", + "<2,139>": "MATREAD", + "<2,140>": "MATUNPARSE", + "<2,141>": "MATWRITE", + "<2,142>": "MOD", + "<2,143>": "MODE", + "<2,144>": "MSG", + "<2,145>": "NE", + "<2,146>": "NEG", + "<2,147>": "NEXT", + "<2,148>": "NOT", + "<2,149>": "NULL", + "<2,150>": "NUM", + "<2,151>": "OCONV", + "<2,152>": "OLEATTACHDISPATCH", + "<2,153>": "OLECALLMETHOD", + "<2,154>": "OLECREATEINSTANCE", + "<2,155>": "OLECREATEINSTANCELIC", + "<2,156>": "OLEENSUREBOOL", + "<2,157>": "OLEENSUREBYTEARRAY", + "<2,158>": "OLEGETDISPATCH", + "<2,159>": "OLEGETERRORARGINDEX", + "<2,160>": "OLEGETOBJECT", + "<2,161>": "OLEGETPROPERTY", + "<2,162>": "OLEPUTPROPERTY", + "<2,163>": "OLERELEASEDISPATCH", + "<2,164>": "OLEREQUESTLICKEY", + "<2,165>": "OLESETPROPERTY", + "<2,166>": "OLESTATUS", + "<2,167>": "ON", + "<2,168>": "OPEN", + "<2,169>": "OR", + "<2,170>": "OSBREAD", + "<2,171>": "OSBWRITE", + "<2,172>": "OSCLOSE", + "<2,173>": "OSDELETE", + "<2,174>": "OSEXECUTE", + "<2,175>": "OSOPEN", + "<2,176>": "OSREAD", + "<2,177>": "OSWRITE", + "<2,178>": "OUT", + "<2,179>": "PAGE", + "<2,180>": "PRINT", + "<2,181>": "PRINTER", + "<2,182>": "PROMPT", + "<2,183>": "PUTBINARYVALUE", + "<2,184>": "PWR", + "<2,185>": "QUOTE", + "<2,186>": "READ", + "<2,187>": "READNEXT", + "<2,188>": "READO", + "<2,189>": "READU", + "<2,190>": "READV", + "<2,191>": "REM", + "<2,192>": "REMOVE", + "<2,193>": "REPEAT", + "<2,194>": "REPLACE", + "<2,195>": "REPOSITORY", + "<2,196>": "RETURN", + "<2,197>": "RLIST", + "<2,198>": "RND", + "<2,199>": "RUNTIME", + "<2,200>": "SELECT", + "<2,201>": "SENDMESSAGE", + "<2,202>": "SEND_MESSAGE", + "<2,203>": "SEQ", + "<2,204>": "SERIAL", + "<2,205>": "SETINITDIR", + "<2,206>": "SETTING", + "<2,207>": "SET_PRINTER", + "<2,208>": "SET_PROPERTY", + "<2,209>": "SET_STATUS", + "<2,210>": "SIN", + "<2,211>": "SPACE", + "<2,212>": "SQRT", + "<2,213>": "STARTLINECOUNT", + "<2,214>": "START_MDICHILD", + "<2,215>": "STATUS", + "<2,216>": "STEP", + "<2,217>": "STOP", + "<2,218>": "STOPLINECOUNT", + "<2,219>": "STR", + "<2,220>": "SUBROUTINE", + "<2,221>": "SUM", + "<2,222>": "SWAP", + "<2,223>": "SYSERR", + "<2,224>": "TAB", + "<2,225>": "TAN", + "<2,226>": "THEN", + "<2,227>": "TIME", + "<2,228>": "TIMEDATE", + "<2,229>": "TO", + "<2,230>": "TRANSFER", + "<2,231>": "TRIM", + "<2,232>": "TRIMB", + "<2,233>": "TRIMF", + "<2,234>": "UNASSIGNED", + "<2,235>": "UNLIKE", + "<2,236>": "UNLOCK", + "<2,237>": "UNLOCKVARIABLE", + "<2,238>": "UNTIL", + "<2,239>": "USING", + "<2,240>": "UTILITY", + "<2,241>": "VALID", + "<2,242>": "WHILE", + "<2,243>": "WITH", + "<2,244>": "WRITE", + "<2,245>": "WRITEV", + "<2,246>": "XLATE", + "<2,247>": "_ADDX", + "<2,248>": "_CMPX", + "<2,249>": "_DIVX", + "<2,250>": "_EQC", + "<2,251>": "_EQS", + "<2,252>": "_EQSC", + "<2,253>": "_EQX", + "<2,254>": "_GEC", + "<2,255>": "_GES", + "<2,256>": "_GESC", + "<2,257>": "_GEX", + "<2,258>": "_GTC", + "<2,259>": "_GTS", + "<2,260>": "_GTSC", + "<2,261>": "_GTX", + "<2,262>": "_LEC", + "<2,263>": "_LES", + "<2,264>": "_LESC", + "<2,265>": "_LEX", + "<2,266>": "_LTC", + "<2,267>": "_LTS", + "<2,268>": "_LTSC", + "<2,269>": "_LTX", + "<2,270>": "_MULX", + "<2,271>": "_NEC", + "<2,272>": "_NES", + "<2,273>": "_NESC", + "<2,274>": "_NEX", + "<2,275>": "_SUBX" + }, + "<3>": { + "<3,1>": "@Window", + "<3,2>": "Abort", + "<3,3>": "Abs", + "<3,4>": "Alpha", + "<3,5>": "And", + "<3,6>": "As", + "<3,7>": "Assigned", + "<3,8>": "Assigning", + "<3,9>": "At", + "<3,10>": "Atan", + "<3,11>": "Bcol1", + "<3,12>": "Bcol2", + "<3,13>": "Begin", + "<3,14>": "Bitand", + "<3,15>": "Bitnot", + "<3,16>": "Bitor", + "<3,17>": "Bitshl", + "<3,18>": "Bitshr", + "<3,19>": "Bitxor", + "<3,20>": "Blen", + "<3,21>": "Break", + "<3,22>": "Breakkey", + "<3,23>": "Bremove", + "<3,24>": "Btree.Extract", + "<3,25>": "By", + "<3,26>": "Calculate", + "<3,27>": "Call", + "<3,28>": "Case", + "<3,29>": "Cat", + "<3,30>": "Chain", + "<3,31>": "Char", + "<3,32>": "Clearcommon", + "<3,33>": "Cleardata", + "<3,34>": "Clearfile", + "<3,35>": "Clearselect", + "<3,36>": "Col1", + "<3,37>": "Col1b", + "<3,38>": "Col2", + "<3,39>": "Col2b", + "<3,40>": "Colheading", + "<3,41>": "Collength", + "<3,42>": "Com", + "<3,43>": "Common", + "<3,44>": "Compile", + "<3,45>": "Convert", + "<3,46>": "Copy_Table", + "<3,47>": "Cos", + "<3,48>": "Count", + "<3,49>": "Createbinarydata", + "<3,50>": "Create_Dialog", + "<3,51>": "Data", + "<3,52>": "Date", + "<3,53>": "Dcount", + "<3,54>": "Debug", + "<3,55>": "Declare", + "<3,56>": "Delay", + "<3,57>": "Delete", + "<3,58>": "Descripter", + "<3,59>": "Descriptertype", + "<3,60>": "Descriptor", + "<3,61>": "Dialog_Box", + "<3,62>": "Dim", + "<3,63>": "Dimension", + "<3,64>": "Dir", + "<3,65>": "Dirlist", + "<3,66>": "Do", + "<3,67>": "Drive", + "<3,68>": "Else", + "<3,69>": "End", + "<3,70>": "Ensurevariable", + "<3,71>": "Eq", + "<3,72>": "Equ", + "<3,73>": "Equate", + "<3,74>": "Exp", + "<3,75>": "Expirydate", + "<3,76>": "Extract", + "<3,77>": "Field", + "<3,78>": "Fieldcount", + "<3,79>": "Fieldstore", + "<3,80>": "Find", + "<3,81>": "Flush", + "<3,82>": "Fmt", + "<3,83>": "For", + "<3,84>": "Format", + "<3,85>": "Freecommon", + "<3,86>": "From", + "<3,87>": "FSMsg", + "<3,88>": "Function", + "<3,89>": "Garbagecollect", + "<3,90>": "Ge", + "<3,91>": "Getbinaryvalue", + "<3,92>": "Getbreak", + "<3,93>": "Getbytesize", + "<3,94>": "Getpointer", + "<3,95>": "Getprinter", + "<3,96>": "Getvalue", + "<3,97>": "Get_Printer", + "<3,98>": "Get_Property", + "<3,99>": "Get_Status", + "<3,100>": "Go", + "<3,101>": "Gosub", + "<3,102>": "Goto", + "<3,103>": "Gsclear", + "<3,104>": "Gsreturn", + "<3,105>": "Gt", + "<3,106>": "Heading", + "<3,107>": "Iconv", + "<3,108>": "If", + "<3,109>": "In", + "<3,110>": "Include", + "<3,111>": "Index", + "<3,112>": "IndexC", + "<3,113>": "Inet_Msg", + "<3,114>": "Inet_QueryParam", + "<3,115>": "Initdir", + "<3,116>": "Initrnd", + "<3,117>": "Inmat", + "<3,118>": "Inp", + "<3,119>": "Input", + "<3,120>": "Insert", + "<3,121>": "Int", + "<3,122>": "Le", + "<3,123>": "Len", + "<3,124>": "Length", + "<3,125>": "Like", + "<3,126>": "Linemark", + "<3,127>": "List_Volume_Sub", + "<3,128>": "Ln", + "<3,129>": "Locate", + "<3,130>": "LocateC", + "<3,131>": "Lock", + "<3,132>": "Lockvariable", + "<3,133>": "Loop", + "<3,134>": "Lt", + "<3,135>": "Mat", + "<3,136>": "Match", + "<3,137>": "Matches", + "<3,138>": "Matparse", + "<3,139>": "Matread", + "<3,140>": "Matunparse", + "<3,141>": "Matwrite", + "<3,142>": "Mod", + "<3,143>": "Mode", + "<3,144>": "Msg", + "<3,145>": "Ne", + "<3,146>": "Neg", + "<3,147>": "Next", + "<3,148>": "Not", + "<3,149>": "Null", + "<3,150>": "Num", + "<3,151>": "Oconv", + "<3,152>": "Oleattachdispatch", + "<3,153>": "Olecallmethod", + "<3,154>": "Olecreateinstance", + "<3,155>": "Olecreateinstancelic", + "<3,156>": "Oleensurebool", + "<3,157>": "Oleensurebytearray", + "<3,158>": "Olegetdispatch", + "<3,159>": "Olegeterrorargindex", + "<3,160>": "Olegetobject", + "<3,161>": "Olegetproperty", + "<3,162>": "Oleputproperty", + "<3,163>": "Olereleasedispatch", + "<3,164>": "Olerequestlickey", + "<3,165>": "Olesetproperty", + "<3,166>": "Olestatus", + "<3,167>": "On", + "<3,168>": "Open", + "<3,169>": "Or", + "<3,170>": "Osbread", + "<3,171>": "Osbwrite", + "<3,172>": "Osclose", + "<3,173>": "Osdelete", + "<3,174>": "Osexecute", + "<3,175>": "Osopen", + "<3,176>": "Osread", + "<3,177>": "Oswrite", + "<3,178>": "Out", + "<3,179>": "Page", + "<3,180>": "Print", + "<3,181>": "Printer", + "<3,182>": "Prompt", + "<3,183>": "Putbinaryvalue", + "<3,184>": "Pwr", + "<3,185>": "Quote", + "<3,186>": "Read", + "<3,187>": "Readnext", + "<3,188>": "Reado", + "<3,189>": "ReadU", + "<3,190>": "Readv", + "<3,191>": "rem", + "<3,192>": "Remove", + "<3,193>": "Repeat", + "<3,194>": "Replace", + "<3,195>": "Repository", + "<3,196>": "Return", + "<3,197>": "Rlist", + "<3,198>": "Rnd", + "<3,199>": "Runtime", + "<3,200>": "Select", + "<3,201>": "SendMessage", + "<3,202>": "Send_Message", + "<3,203>": "Seq", + "<3,204>": "Serial", + "<3,205>": "Setinitdir", + "<3,206>": "Setting", + "<3,207>": "Set_Printer", + "<3,208>": "Set_Property", + "<3,209>": "Set_Status", + "<3,210>": "Sin", + "<3,211>": "Space", + "<3,212>": "Sqrt", + "<3,213>": "Startlinecount", + "<3,214>": "Start_MDIChild", + "<3,215>": "Status", + "<3,216>": "Step", + "<3,217>": "Stop", + "<3,218>": "Stoplinecount", + "<3,219>": "Str", + "<3,220>": "Subroutine", + "<3,221>": "Sum", + "<3,222>": "Swap", + "<3,223>": "Syserr", + "<3,224>": "Tab", + "<3,225>": "Tan", + "<3,226>": "Then", + "<3,227>": "Time", + "<3,228>": "Timedate", + "<3,229>": "To", + "<3,230>": "Transfer", + "<3,231>": "Trim", + "<3,232>": "Trimb", + "<3,233>": "Trimf", + "<3,234>": "Unassigned", + "<3,235>": "Unlike", + "<3,236>": "Unlock", + "<3,237>": "Unlockvariable", + "<3,238>": "Until", + "<3,239>": "Using", + "<3,240>": "Utility", + "<3,241>": "Valid", + "<3,242>": "While", + "<3,243>": "With", + "<3,244>": "Write", + "<3,245>": "Writev", + "<3,246>": "Xlate", + "<3,247>": "_Addx", + "<3,248>": "_Cmpx", + "<3,249>": "_Divx", + "<3,250>": "_Eqc", + "<3,251>": "_Eqs", + "<3,252>": "_Eqsc", + "<3,253>": "_Eqx", + "<3,254>": "_Gec", + "<3,255>": "_Ges", + "<3,256>": "_Gesc", + "<3,257>": "_Gex", + "<3,258>": "_Gtc", + "<3,259>": "_Gts", + "<3,260>": "_Gtsc", + "<3,261>": "_Gtx", + "<3,262>": "_Lec", + "<3,263>": "_Les", + "<3,264>": "_Lesc", + "<3,265>": "_Lex", + "<3,266>": "_Ltc", + "<3,267>": "_Lts", + "<3,268>": "_Ltsc", + "<3,269>": "_Ltx", + "<3,270>": "_Mulx", + "<3,271>": "_Nec", + "<3,272>": "_Nes", + "<3,273>": "_Nesc", + "<3,274>": "_Nex", + "<3,275>": "_Subx" + }, + "<4>": "", + "<5>": { + "<5,1>": "KEYWORD", + "<5,2>": "COMMENT", + "<5,3>": "DEBUG", + "<5,4>": "STRING", + "<5,5>": "LABEL", + "<5,6>": "CONST", + "<5,7>": "DFLTTEXT", + "<5,8>": "TAGS", + "<5,9>": "HQUOTES", + "<5,10>": "HATTRIBS", + "<5,11>": "HCOMMENTS", + "<5,12>": "HVALS", + "<5,13>": "HENTITY", + "<5,14>": "HCDATA", + "<5,15>": "HXML", + "<5,16>": "HSCRIPT", + "<5,17>": "JSTART", + "<5,18>": "JDEFAULT", + "<5,19>": "JCOMMENT", + "<5,20>": "JCOMMENTLINE", + "<5,21>": "JCOMMENTDOC", + "<5,22>": "JNUMBER", + "<5,23>": "JWORD", + "<5,24>": "JKEYWORD", + "<5,25>": "JDOUBLESTRING", + "<5,26>": "JSINGLESTRING" + }, + "<6>": { + "<6,1>": "1", + "<6,2>": "1", + "<6,3>": "0", + "<6,4>": "1", + "<6,5>": "1", + "<6,6>": "1", + "<6,7>": "2", + "<6,8>": "2", + "<6,9>": "2", + "<6,10>": "2", + "<6,11>": "2", + "<6,12>": "2", + "<6,13>": "2", + "<6,14>": "2", + "<6,15>": "2", + "<6,16>": "2", + "<6,17>": "2", + "<6,18>": "2", + "<6,19>": "2", + "<6,20>": "2", + "<6,21>": "2", + "<6,22>": "2", + "<6,23>": "2", + "<6,24>": "2", + "<6,25>": "2", + "<6,26>": "2" + }, + "<7>": { + "<7,1>": "7-12", + "<7,2>": "1-2", + "<7,3>": "0", + "<7,4>": "4-5", + "<7,5>": "15", + "<7,6>": "16", + "<7,7>": "0", + "<7,8>": "1-2", + "<7,9>": "6-7", + "<7,10>": "3-4", + "<7,11>": "9", + "<7,12>": "19", + "<7,13>": "10", + "<7,14>": "17", + "<7,15>": "12-13", + "<7,16>": "14", + "<7,17>": "40", + "<7,18>": "41", + "<7,19>": "42", + "<7,20>": "43", + "<7,21>": "44", + "<7,22>": "45", + "<7,23>": "46", + "<7,24>": "47", + "<7,25>": "48", + "<7,26>": "49" + }, + "<8>": { + "<8,1>": "16711680", + "<8,2>": "32768", + "<8,3>": "", + "<8,4>": "8388736", + "<8,5>": "0", + "<8,6>": "12615935", + "<8,7>": "0", + "<8,8>": "0", + "<8,9>": "0", + "<8,10>": "0", + "<8,11>": "0", + "<8,12>": "0", + "<8,13>": "0", + "<8,14>": "0", + "<8,15>": "0", + "<8,16>": "0", + "<8,17>": "0", + "<8,18>": "0", + "<8,19>": "0", + "<8,20>": "0", + "<8,21>": "0", + "<8,22>": "0", + "<8,23>": "0", + "<8,24>": "0", + "<8,25>": "0", + "<8,26>": "0" + }, + "<9>": { + "<9,1>": "16777215", + "<9,2>": "16777215", + "<9,3>": "", + "<9,4>": "16777215", + "<9,5>": "16777215", + "<9,6>": "16777215", + "<9,7>": "16777215", + "<9,8>": "16777215", + "<9,9>": "16777215", + "<9,10>": "16777215", + "<9,11>": "16777215", + "<9,12>": "16777215", + "<9,13>": "16777215", + "<9,14>": "16777215", + "<9,15>": "16777215", + "<9,16>": "16777215", + "<9,17>": "16777215", + "<9,18>": "16777215", + "<9,19>": "16777215", + "<9,20>": "16777215", + "<9,21>": "16777215", + "<9,22>": "16777215", + "<9,23>": "16777215", + "<9,24>": "16777215", + "<9,25>": "16777215", + "<9,26>": "16777215" + }, + "<10>": { + "<10,1>": "1", + "<10,2>": "0", + "<10,3>": "", + "<10,4>": "0", + "<10,5>": "1", + "<10,6>": "1", + "<10,7>": "0", + "<10,8>": "0", + "<10,9>": "0", + "<10,10>": "0", + "<10,11>": "0", + "<10,12>": "0", + "<10,13>": "0", + "<10,14>": "0", + "<10,15>": "0", + "<10,16>": "0", + "<10,17>": "0", + "<10,18>": "1", + "<10,19>": "0", + "<10,20>": "0", + "<10,21>": "0", + "<10,22>": "0", + "<10,23>": "0", + "<10,24>": "0", + "<10,25>": "0", + "<10,26>": "0" + }, + "<11>": { + "<11,1>": "0", + "<11,2>": "0", + "<11,3>": "", + "<11,4>": "1", + "<11,5>": "0", + "<11,6>": "0", + "<11,7>": "0", + "<11,8>": "0", + "<11,9>": "0", + "<11,10>": "0", + "<11,11>": "0", + "<11,12>": "0", + "<11,13>": "0", + "<11,14>": "0", + "<11,15>": "0", + "<11,16>": "0", + "<11,17>": "0", + "<11,18>": "0", + "<11,19>": "0", + "<11,20>": "0", + "<11,21>": "0", + "<11,22>": "0", + "<11,23>": "0", + "<11,24>": "0", + "<11,25>": "0", + "<11,26>": "0" + }, + "<12>": { + "<12,1>": "0", + "<12,2>": "0", + "<12,3>": "", + "<12,4>": "0", + "<12,5>": "0", + "<12,6>": "0", + "<12,7>": "0", + "<12,8>": "0", + "<12,9>": "0", + "<12,10>": "0", + "<12,11>": "0", + "<12,12>": "0", + "<12,13>": "0", + "<12,14>": "0", + "<12,15>": "0", + "<12,16>": "0", + "<12,17>": "0", + "<12,18>": "0", + "<12,19>": "0", + "<12,20>": "0", + "<12,21>": "0", + "<12,22>": "0", + "<12,23>": "0", + "<12,24>": "0", + "<12,25>": "0", + "<12,26>": "0" + }, + "<13>": "html,htm,js" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ARDK_DEPLOYTABLES.json b/SYSPROG/APPROW/SYSENV%003ARDK_DEPLOYTABLES.json new file mode 100644 index 0000000..8ad3483 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ARDK_DEPLOYTABLES.json @@ -0,0 +1,352 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RDK_DEPLOYTABLES" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "DICT.SYSAPPS", + "<1,2>": "DICT.SYSCOLUMNS", + "<1,3>": "DICT.SYSLHGROUP", + "<1,4>": "DICT.SYSLHVERIFY", + "<1,5>": "DICT.SYSLOGINS", + "<1,6>": "DICT.SYSREPOSAPPNOTES", + "<1,7>": "DICT.SYSREPOSCLASSES", + "<1,8>": "DICT.SYSREPOSEVENTEXES", + "<1,9>": "DICT.SYSREPOSEVENTS", + "<1,10>": "DICT.SYSREPOSLOCKS", + "<1,11>": "DICT.SYSREPOSLOG", + "<1,12>": "DICT.SYSREPOSMESSAGES", + "<1,13>": "DICT.SYSREPOSPOPUPS", + "<1,14>": "DICT.SYSREPOSRELEASES", + "<1,15>": "DICT.SYSREPOSREPORTS", + "<1,16>": "DICT.SYSREPOSSTORAGE", + "<1,17>": "DICT.SYSREPOSTYPEFAMILIES", + "<1,18>": "DICT.SYSREPOSTYPES", + "<1,19>": "DICT.SYSREPOSVIEWS", + "<1,20>": "DICT.SYSREPOSWINS", + "<1,21>": "DICT.SYSTABLES", + "<1,22>": "DICT.SYSVIEWS", + "<1,23>": "DICT.SYSVOLUMES", + "<1,24>": "DATA.SYSDICT", + "<1,25>": "DICT.SYSREPOSXML", + "<1,26>": "DICT.SYSREPOSLANGUAGE", + "<1,27>": "SYSREPOSCLASSES", + "<1,28>": "SYSREPOSSTORAGE", + "<1,29>": "SYSREPOSTYPEFAMILIES", + "<1,30>": "SYSREPOSTYPES", + "<1,31>": "SYSTYPES", + "<1,32>": "SYSLISTS", + "<1,33>": "SYSLOGINS", + "<1,34>": "SYSREPOSXML", + "<1,35>": "SYSREPOSLANGUAGE", + "<1,36>": "DICT.SYSREPOSMENUCONTEXT", + "<1,37>": "SYSREPOSMENUCONTEXT" + }, + "<2>": { + "<2,1>": "SYSOBJ", + "<2,2>": "SYSENV", + "<2,3>": "SYSPROCS", + "<2,4>": "SYSAPPS", + "<2,5>": "SYSLHGROUP", + "<2,6>": "SYSLHVERIFY", + "<2,7>": "SYSPTRS", + "<2,8>": "SYSREPOSAPPNOTES", + "<2,9>": "SYSREPOSEVENTEXES", + "<2,10>": "SYSREPOSEVENTS", + "<2,11>": "SYSREPOSLOCKS", + "<2,12>": "SYSREPOSLOG", + "<2,13>": "SYSREPOSMESSAGES", + "<2,14>": "SYSREPOSPOPUPS", + "<2,15>": "SYSREPOSRELEASES", + "<2,16>": "SYSREPOSREPORTS", + "<2,17>": "SYSREPOSVIEWS", + "<2,18>": "SYSREPOSWINEXES", + "<2,19>": "SYSREPOSWINS", + "<2,20>": "SYSVIEWS", + "<2,21>": "SYSREPOSDATASOURCES", + "<2,22>": "SYSREPOSDBCOMPONENTEXES", + "<2,23>": "SYSREPOSDBCOMPONENTS", + "<2,24>": "IMPORTEXPORT", + "<2,25>": "LOG" + }, + "<3>": { + "<3,1>": { + "<3,1,1>": "SQLCOMP1.RUN", + "<3,1,2>": "WITHI.RUN", + "<3,1,3>": "FWITHI.RUN", + "<3,1,4>": "GENRTP20_PARMS", + "<3,1,5>": "PROJEX.RUN", + "<3,1,6>": "ISQL.MOD.RUN", + "<3,1,7>": "OCONV.RUN", + "<3,1,8>": "SITRANS.RUN", + "<3,1,9>": "WITH0.RUN", + "<3,1,10>": "PROTEX.RUN", + "<3,1,11>": "QBF2RLIST.RUN", + "<3,1,12>": "SORT1.RUN", + "<3,1,13>": "SQLINDEX2.RUN", + "<3,1,14>": "SQL_ANALYZE.RUN", + "<3,1,15>": "COMPILER.RUN", + "<3,1,16>": "SQLINDEX1.RUN", + "<3,1,17>": "RLIST1.RUN", + "<3,1,18>": "WITH1.RUN", + "<3,1,19>": "RLIST2.RUN", + "<3,1,20>": "IN.VALUE.PARSE.RUN", + "<3,1,21>": "RLIST3.RUN", + "<3,1,22>": "SQLEMB1.RUN", + "<3,1,23>": "LIMIT.RUN" + }, + "<3,2>": { + "<3,2,1>": "CFG_CONNECTION", + "<3,2,2>": "CFG_EVENTS", + "<3,2,3>": "CFG_QUICKEVENT", + "<3,2,4>": "CFG_Report_Designer", + "<3,2,5>": "ENV_SYSPROG", + "<3,2,6>": "LND_DEFAULT", + "<3,2,7>": "LND_ENGLISH_INT", + "<3,2,8>": "LND_ENGLISH_UK", + "<3,2,9>": "LND_ENGLISH_US", + "<3,2,10>": "LND_FRENCH_CN", + "<3,2,11>": "LND_FRENCH_F", + "<3,2,12>": "LND_GERMAN_D", + "<3,2,13>": "LND_INTERNATIONAL", + "<3,2,14>": "SPX*SYSPROG", + "<3,2,15>": "SYSPROCNAMES", + "<3,2,16>": "SYS_TABLE_TYPES", + "<3,2,17>": "TXT_VALIDATION", + "<3,2,18>": "USR_SYSPROG" + }, + "<3,3>": "", + "<3,4>": "SYSPROG", + "<3,5>": "", + "<3,6>": "", + "<3,7>": "", + "<3,8>": "", + "<3,9>": { + "<3,9,1>": "SYSPROG*..OIWIN*", + "<3,9,2>": "SYSPROG*ARRANGEICONS.WINDOW.OIWIN*", + "<3,9,3>": "SYSPROG*CALCULATE..OIWIN*", + "<3,9,4>": "SYSPROG*CASCADE.WINDOW.OIWIN*", + "<3,9,5>": "SYSPROG*CLEAR.WINDOW.OIWIN*", + "<3,9,6>": "SYSPROG*CLICK..OIWIN*", + "<3,9,7>": "SYSPROG*CLOSE.WINDOW.OIWIN*", + "<3,9,8>": "SYSPROG*DELETE.WINDOW.OIWIN*", + "<3,9,9>": "SYSPROG*DELETEROW.EDITTABLE.OIWIN*", + "<3,9,10>": "SYSPROG*DSOABS..OIWIN*", + "<3,9,11>": "SYSPROG*DSOCLEAR..OIWIN*", + "<3,9,12>": "SYSPROG*DSOCOMMIT..OIWIN*", + "<3,9,13>": "SYSPROG*DSODELETE..OIWIN*", + "<3,9,14>": "SYSPROG*DSOEXECUTE..OIWIN*", + "<3,9,15>": "SYSPROG*DSOFIRST..OIWIN*", + "<3,9,16>": "SYSPROG*DSOINSERT..OIWIN*", + "<3,9,17>": "SYSPROG*DSOINSTANCE..OIWIN*", + "<3,9,18>": "SYSPROG*DSOLAST..OIWIN*", + "<3,9,19>": "SYSPROG*DSONEXT..OIWIN*", + "<3,9,20>": "SYSPROG*DSOPREV..OIWIN*", + "<3,9,21>": "SYSPROG*DSOROLLBACK..OIWIN*", + "<3,9,22>": "SYSPROG*DSOSETFILTER..OIWIN*", + "<3,9,23>": "SYSPROG*DSOSETPARAM..OIWIN*", + "<3,9,24>": "SYSPROG*EDIT.MENU.OIWIN*", + "<3,9,25>": "SYSPROG*GOTFOCUS..OIWIN*", + "<3,9,26>": "SYSPROG*HELP..OIWIN*", + "<3,9,27>": "SYSPROG*INSERTROW.EDITTABLE.OIWIN*", + "<3,9,28>": "SYSPROG*IXLOOKUP..OIWIN*", + "<3,9,29>": "SYSPROG*IXLOOKUP.WINDOW.OIWIN*", + "<3,9,30>": "SYSPROG*LOSTFOCUS..OIWIN*", + "<3,9,31>": "SYSPROG*NOTEABS.WINDOW.OIWIN*", + "<3,9,32>": "SYSPROG*NOTECLEAR.WINDOW.OIWIN*", + "<3,9,33>": "SYSPROG*NOTEDELETE.WINDOW.OIWIN*", + "<3,9,34>": "SYSPROG*NOTEFIRST.WINDOW.OIWIN*", + "<3,9,35>": "SYSPROG*NOTELAST.WINDOW.OIWIN*", + "<3,9,36>": "SYSPROG*NOTENEXT.WINDOW.OIWIN*", + "<3,9,37>": "SYSPROG*NOTEPREV.WINDOW.OIWIN*", + "<3,9,38>": "SYSPROG*NOTEREAD.WINDOW.OIWIN*", + "<3,9,39>": "SYSPROG*NOTES..OIWIN*", + "<3,9,40>": "SYSPROG*NOTESEARCH.WINDOW.OIWIN*", + "<3,9,41>": "SYSPROG*NOTEWRITE.WINDOW.OIWIN*", + "<3,9,42>": "SYSPROG*OPTIONS..OIWIN*", + "<3,9,43>": "SYSPROG*PAGE.WINDOW.OIWIN*", + "<3,9,44>": "SYSPROG*POPULATEVIEW..OIWIN*", + "<3,9,45>": "SYSPROG*POSCHANGED..OIWIN*", + "<3,9,46>": "SYSPROG*QBFABS..OIWIN*", + "<3,9,47>": "SYSPROG*QBFCLOSE..OIWIN*", + "<3,9,48>": "SYSPROG*QBFFIRST..OIWIN*", + "<3,9,49>": "SYSPROG*QBFINIT..OIWIN*", + "<3,9,50>": "SYSPROG*QBFLAST..OIWIN*", + "<3,9,51>": "SYSPROG*QBFNEXT..OIWIN*", + "<3,9,52>": "SYSPROG*QBFPREV..OIWIN*", + "<3,9,53>": "SYSPROG*QBFQUERY..OIWIN*", + "<3,9,54>": "SYSPROG*QBFRUN..OIWIN*", + "<3,9,55>": "SYSPROG*READ.WINDOW.OIWIN*", + "<3,9,56>": "SYSPROG*REQUIRERR..OIWIN*", + "<3,9,57>": "SYSPROG*SYSMSG..OIWIN*", + "<3,9,58>": "SYSPROG*TILE.WINDOW.OIWIN*", + "<3,9,59>": "SYSPROG*VALIDERR..OIWIN*", + "<3,9,60>": "SYSPROG*WRITE.WINDOW.OIWIN*" + } + }, + "<4>": "", + "<5>": { + "<5,1>": "APPNOTE", + "<5,2>": "APPROW", + "<5,3>": "DATASOURCE*CONNECTION", + "<5,4>": "DATASOURCE*MVBFS", + "<5,5>": "DATASOURCE*NOTESDB", + "<5,6>": "DBCOLUMN", + "<5,7>": "DBCOMPONENTEXE", + "<5,8>": "DBCOMPONENT", + "<5,9>": "DLL", + "<5,10>": "DOC", + "<5,11>": "IMAGE", + "<5,12>": "MSG", + "<5,13>": "MMEDIA", + "<5,14>": "OIEVENT", + "<5,15>": "OIEVENTEXE", + "<5,16>": "OIWIN", + "<5,17>": "OIWINEXE", + "<5,18>": "OSFILE", + "<5,19>": "STPROC", + "<5,20>": "STPROCEXE", + "<5,21>": "STPROCINS", + "<5,22>": "STPROCDBG", + "<5,23>": "WINEXE", + "<5,24>": "OIEVENTDBG", + "<5,25>": "WINHELP", + "<5,26>": "POPUP", + "<5,27>": "OIREPORT", + "<5,28>": "CONTEXTMENU", + "<5,29>": "OCX", + "<5,30>": "CONFIG", + "<5,31>": "FORM", + "<5,32>": "GRAPH", + "<5,33>": "MENU", + "<5,34>": "MESSAGE", + "<5,35>": "REPORT", + "<5,36>": "UINFO", + "<5,37>": "IMAGELIST", + "<5,38>": "DLLPROTOTYPE", + "<5,39>": "PROMOTEDEVENT", + "<5,40>": "PROMOTEDEVENTDBG", + "<5,41>": "PROMOTEDEVENTEXE", + "<5,42>": "OLECONTROL", + "<5,43>": "REPTYPE", + "<5,44>": "REPCLASS", + "<5,45>": "REPFAMILY", + "<5,46>": "OPROC", + "<5,47>": "OPROCDBG", + "<5,48>": "OPROCEXE", + "<5,49>": "REST", + "<5,50>": "O4W" + }, + "<6>": { + "<6,1>": "OI", + "<6,2>": "OI", + "<6,3>": "OI", + "<6,4>": "REPOS", + "<6,5>": "OS", + "<6,6>": "OI", + "<6,7>": "OI", + "<6,8>": "OI", + "<6,9>": "OS", + "<6,10>": "DOC", + "<6,11>": "OS", + "<6,12>": "OI", + "<6,13>": "OS", + "<6,14>": "PROC", + "<6,15>": "PROC", + "<6,16>": "OI", + "<6,17>": "OI", + "<6,18>": "OS", + "<6,19>": "PROC", + "<6,20>": "PROC", + "<6,21>": "PROC", + "<6,22>": "PROC", + "<6,23>": "OS", + "<6,24>": "PROC", + "<6,25>": "OS", + "<6,26>": "OI", + "<6,27>": "OI", + "<6,28>": "OI", + "<6,29>": "OS", + "<6,30>": "REPOS", + "<6,31>": "REPOS", + "<6,32>": "REPOS", + "<6,33>": "REPOS", + "<6,34>": "REPOS", + "<6,35>": "REPOS", + "<6,36>": "REPOS", + "<6,37>": "OS", + "<6,38>": "PROC", + "<6,39>": "PROC", + "<6,40>": "OI", + "<6,41>": "OI", + "<6,42>": "OI", + "<6,43>": "OI", + "<6,44>": "OI", + "<6,45>": "OI", + "<6,46>": "PROC", + "<6,47>": "PROC", + "<6,48>": "PROG", + "<6,49>": "REPOS", + "<6,50>": "REPOS" + }, + "<7>": { + "<7,1>": "SYSREPOSAPPNOTES", + "<7,2>": "SYSENV", + "<7,3>": "SYSREPOSDATASOURCES", + "<7,4>": "SYSPTRS", + "<7,5>": "", + "<7,6>": "SYSCOLUMNS", + "<7,7>": "SYSREPOSDBCOMPONENTEXES", + "<7,8>": "SYSREPOSDBCOMPONENTS", + "<7,9>": "", + "<7,10>": "", + "<7,11>": "", + "<7,12>": "SYSREPOSMESSAGES", + "<7,13>": "", + "<7,14>": "SYSREPOSEVENTS", + "<7,15>": "SYSREPOSEVENTEXES", + "<7,16>": "SYSREPOSWINS", + "<7,17>": "SYSREPOSWINEXES", + "<7,18>": "", + "<7,19>": "SYSPROCS", + "<7,20>": "SYSOBJ", + "<7,21>": "SYSPROCS", + "<7,22>": "SYSOBJ", + "<7,23>": "", + "<7,24>": "SYSREPOSEVENTEXES", + "<7,25>": "", + "<7,26>": "SYSREPOSPOPUPS", + "<7,27>": "SYSREPOSREPORTS", + "<7,28>": "SYSREPOSMENUCONTEXT", + "<7,29>": "", + "<7,30>": "", + "<7,31>": "", + "<7,32>": "", + "<7,33>": "", + "<7,34>": "", + "<7,35>": "", + "<7,36>": "", + "<7,37>": "", + "<7,38>": "SYSPROCS", + "<7,39>": "SYSREPOSEVENTS", + "<7,40>": "SYSREPOSEVENTEXES", + "<7,41>": "SYSREPOSEVENTEXES", + "<7,42>": "SYSREPOSOLECONTROLS", + "<7,43>": "SYSREPOSTYPES", + "<7,44>": "SYSREPOSCLASSES", + "<7,45>": "SYSREPOSTYPEFAMILIES", + "<7,46>": "", + "<7,47>": "", + "<7,48>": "", + "<7,49>": "O4WREST", + "<7,50>": "" + }, + "<8>": "", + "<9>": "", + "<10>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ARTI_DSN_OIWIN_RESOURCES.json b/SYSPROG/APPROW/SYSENV%003ARTI_DSN_OIWIN_RESOURCES.json new file mode 100644 index 0000000..16ed774 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ARTI_DSN_OIWIN_RESOURCES.json @@ -0,0 +1,102 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_DSN_OIWIN_RESOURCES" + }, + "body": { + "record1": { + "<1>": "* //", + "<2>": "* // File : SYSENV - RTI_DSN_OIWIN_RESOURCES", + "<3>": "* // Author : Mr C", + "<4>": "* // Date : July 2014", + "<5>": "* // Purpose : \"RTI_DSN_OWIN_\" procedure resource strings", + "<6>": "* //", + "<7>": "* // Comments", + "<8>": "* // ========", + "<9>": "* //", + "<10>": "* // 1) This resource record is designed to hold resource strings for the", + "<11>": "* // RTI_DSN_OIWIN_ type handler procedures.", + "<12>": "* //", + "<13>": "* // Amended Date Reason", + "<14>": "* // ======= ==== ======", + "<15>": "* // Mr C 06 Feb 19 Added WIN100", + "<16>": "* // MTR 05 Oct 17 Fixed spelling and case in UPD003", + "<17>": "* // Mr C 11 Aug 17 Added EDT001", + "<18>": "* // Mr C 30 Jul 16 Added OBJ102", + "<19>": "* // Mr C 13 Jul 16 Added VIEW001, VIEW002", + "<20>": "* // Mr C 03 Jul 16 Added RBN001, RBN002", + "<21>": "* // Mr C 30 Dec 15 Added BTN001", + "<22>": "* // Mr C 24 Dec 15 Added OBJ100", + "<23>": "* // Mr C 12 Jun 15 Added RTI_DSN_OIWIN_UPDOWN section", + "<24>": "* // Removed versioning (pointless with GIT right?)", + "<25>": "", + "<26>": "///////////////////////////////////////////////////////////////////////////////", + "<27>": "//[RTI_DSN_OIWIN_OBJECT]///////////////////////////////////////////////////////", + "<28>": "", + "<29>": "OBJ000: No object type ID passed to the %1% %2% method", + "<30>": "OBJ001: No parent ID passed to the %1% %2% method", + "<31>": "OBJ002: No \"Name\" property defined for the %1% object in the %2% %3% method", + "<32>": "OBJ003: Duplicate names \"%1%\" found.||The form cannot be saved until all names are unique.", + "<33>": "OBJ004: The %1% property must be a valid positive integer", + "<34>": "OBJ100: Default", + "<35>": "OBJ101: Not Set", + "<36>": "OBJ102: %c% (Original value)", + "<37>": "", + "<38>": "///////////////////////////////////////////////////////////////////////////////", + "<39>": "//[RTI_DSN_OIWIN_RADIOBUTTON]//////////////////////////////////////////////////", + "<40>": "", + "<41>": "RBN001: %1% Button", + "<42>": "RBN002: %1% Buttons", + "<43>": "", + "<44>": "///////////////////////////////////////////////////////////////////////////////", + "<45>": "//[RTI_DSN_OIWIN_PUSHBUTTON]///////////////////////////////////////////////////", + "<46>": "", + "<47>": "BTN001: %1% must be a value between %2% and %3% inclusive", + "<48>": "BTN002: The %1% property must be a pair of comma-separated numbers in the format||,||Each value must be between %2% and %3%", + "<49>": "", + "<50>": "///////////////////////////////////////////////////////////////////////////////", + "<51>": "//[RTI_DSN_OIWIN_EDITTABLE]////////////////////////////////////////////////////", + "<52>": "", + "<53>": "EDT001: AutoSizeCol cannot exceed %1% (the total number of columns)", + "<54>": "EDT002: MinRowLimit cannot exceed MaxRowLimit", + "<55>": "EDT003: MaxRowLimit cannot be less than MinRowLimit", + "<56>": "", + "<57>": "///////////////////////////////////////////////////////////////////////////////", + "<58>": "//[RTI_DSN_OIWIN_RADIOBUTTON]//////////////////////////////////////////////////", + "<59>": "", + "<60>": "VW001: The PageCount property must be an integer between 1 and 1024 inclusive", + "<61>": "", + "<62>": "///////////////////////////////////////////////////////////////////////////////", + "<63>": "//[RTI_DSN_OIWIN_UPDOWN]///////////////////////////////////////////////////////", + "<64>": "", + "<65>": "UPD001: The Range property must be a pair of comma-separated numbers in the format||,||(The value must be greater than the value)", + "<66>": "UPD002: The Value property must be a value within the bounds of the Range property (inclusive)", + "<67>": "UPD003: The %1% \"Buddy\" control must precede the %2% Up-Down Control in the form creation sequence", + "<68>": "UPD004: The Increment property must be less than the size of the Range property", + "<69>": "UPD005: The Buddy property must contain the ID of an EditLine or Static control", + "<70>": "UPD006: The Value property must be a value between %1% and %2% (inclusive)", + "<71>": "UPD007: You cannot set a Buddy control for multiple controls", + "<72>": "UPD008: No eligible Buddy controls found", + "<73>": "UPD009: Unable to find the Buddy control \"%1%\" for the \"%2%\" Up-Down Control in the POSTBUILDSTRUCT handler ", + "<74>": "UPD100: %1% options", + "<75>": "", + "<76>": "///////////////////////////////////////////////////////////////////////////////", + "<77>": "//[RTI_DSN_OIWIN_VIEW]/////////////////////////////////////////////////////////", + "<78>": "", + "<79>": "VIEW001: %1% must be a value between %2% and %3% inclusive", + "<80>": "VIEW002: The %1% property must be a pair of comma-separated numbers in the format||,||Each value must be between %2% and %3%", + "<81>": "", + "<82>": "///////////////////////////////////////////////////////////////////////////////", + "<83>": "//[RTI_DSN_OIWIN_WINDOW]///////////////////////////////////////////////////////", + "<84>": "", + "<85>": "WIN001: The %1% ScaleFactor value must be between %2% and %3% inclusive ", + "<86>": "WIN002: The ScaleFactor Increment value must be between 0 and 1 inclusive ", + "<87>": "WIN100: ", + "<88>": "", + "<89>": "", + "<90>": "///////////////////////////////////////////////////////////////////////////////", + "<91>": "///////////////////////////////////////////////////////////////////////////////" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ARTI_IDE_PGO_CONVERSION.json b/SYSPROG/APPROW/SYSENV%003ARTI_IDE_PGO_CONVERSION.json new file mode 100644 index 0000000..3e1f90f --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ARTI_IDE_PGO_CONVERSION.json @@ -0,0 +1,416 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_IDE_PGO_CONVERSION" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "Character", + "<1,2>": "Currency", + "<1,3>": "Date", + "<1,4>": "DateTime", + "<1,5>": "General", + "<1,6>": "Default", + "<1,7>": "Number", + "<1,8>": "Special", + "<1,9>": "Time", + "<1,10>": "Scientific", + "<1,11>": "Variable Binary", + "<1,12>": "Boolean", + "<1,13>": "n Character Wide Text", + "<1,14>": "US/Canada Zip Code Format", + "<1,15>": "US Phone Number Format", + "<1,16>": "US SSN Format" + }, + "<2>": { + "<2,1>": { + "<2,1,1>": "MCU", + "<2,1,2>": "\tOConv(string, \"MCU\")", + "<2,1,3>": "\tFRANK SINATRA CONDUCTS TONE POEMS OF COLOR 1956" + }, + "<2,2>": { + "<2,2,1>": "MCL", + "<2,2,2>": "\tOConv(string, \"MCL\")", + "<2,2,3>": "\tfrank sinatra conducts tone poems of color 1956" + }, + "<2,3>": { + "<2,3,1>": "MCT", + "<2,3,2>": "\tOConv(string, \"MCT\")", + "<2,3,3>": "\tFrank Sinatra Conducts Tone Poems Of Color 1956" + }, + "<2,4>": { + "<2,4,1>": "MCN", + "<2,4,2>": "\tOConv(string, \"MCN\")", + "<2,4,3>": "1956" + }, + "<2,5>": { + "<2,5,1>": "MCA", + "<2,5,2>": "\tOConv(string, \"MCA\")", + "<2,5,3>": "FrankSinatraconductstonepoemsofcolor" + }, + "<2,6>": { + "<2,6,1>": "MC/A", + "<2,6,2>": "\tOConv(string, \"MC/A\")", + "<2,6,3>": "\t\t1956" + }, + "<2,7>": { + "<2,7,1>": "MCAN", + "<2,7,2>": "\tOConv(string, \"MCAN\")", + "<2,7,3>": "\tFrankSinatraconductstonepoemsofcolor1956" + } + }, + "<3>": { + "<3,1>": { + "<3,1,1>": "MD0", + "<3,1,2>": "\tOConv(1234, \"MD0\")", + "<3,1,3>": "\t1234" + }, + "<3,2>": { + "<3,2,1>": "MD2", + "<3,2,2>": "\tOConv(1234, \"MD2\")", + "<3,2,3>": "\t12.34" + }, + "<3,3>": { + "<3,3,1>": "MD24", + "<3,3,2>": "\tOConv(150000, \"MD24\")", + "<3,3,3>": "\t15.00" + }, + "<3,4>": { + "<3,4,1>": "MD2L", + "<3,4,2>": "\tOConv(12, \"MD2L\")", + "<3,4,3>": "\t0.12" + }, + "<3,5>": { + "<3,5,1>": "MD2$", + "<3,5,2>": "\tOConv(1234, \"MD2$\")", + "<3,5,3>": "\t$12.34" + }, + "<3,6>": { + "<3,6,1>": "MD2$C", + "<3,6,2>": "\tOConv(-1234, \"MD2$C\")", + "<3,6,3>": "\t$12.34CR" + }, + "<3,7>": { + "<3,7,1>": "MD2$D", + "<3,7,2>": "\tOConv(-1234, \"MD2$D\")", + "<3,7,3>": "\t$12.34DB" + }, + "<3,8>": { + "<3,8,1>": "MD2-", + "<3,8,2>": "\tOConv(-1234, \"MD1-\"", + "<3,8,3>": ")123.4-" + }, + "<3,9>": { + "<3,9,1>": "MD2,10*", + "<3,9,2>": "\tOConv(1234, \"MD2,10*\")", + "<3,9,3>": "\t*****12.34" + }, + "<3,10>": { + "<3,10,1>": "MD0£", + "<3,10,2>": "\tOConv(500, \"MD0£\")", + "<3,10,3>": "\t£500" + }, + "<3,11>": { + "<3,11,1>": "MD0[DM]", + "<3,11,2>": "\tOConv(50, \"MD0[DM]\")", + "<3,11,3>": "\tDM50" + }, + "<3,12>": { + "<3,12,1>": "MD0[DM ]", + "<3,12,2>": "\tOConv(50, \"MD0[DM ]\")", + "<3,12,3>": "DM 50" + }, + "<3,13>": { + "<3,13,1>": "MC2.[<_>Bfr]S", + "<3,13,2>": "\tOConv(252525, \"MC2.[<_>Bfr]S\")", + "<3,13,3>": "2.525,25 Bfr" + }, + "<3,14>": { + "<3,14,1>": "MC1.", + "<3,14,2>": "\tOConv(-12345, \"MC1.\")", + "<3,14,3>": "\t-1234,5" + } + }, + "<4>": { + "<4,1>": { + "<4,1,1>": "D", + "<4,1,2>": "\tOConv(15036, \"D\")", + "<4,1,3>": "\t01 MAR 2009" + }, + "<4,2>": { + "<4,2,1>": "D2", + "<4,2,2>": "\tOConv(15036, \"D2\")", + "<4,2,3>": "\t01 MAR 09" + }, + "<4,3>": { + "<4,3,1>": "D4", + "<4,3,2>": "\tOConv(15036, \"D4\")", + "<4,3,3>": "\t01 MAR 2009" + }, + "<4,4>": { + "<4,4,1>": "D/", + "<4,4,2>": "\tOConv(15036, \"D/\")", + "<4,4,3>": "\t03/01/2009" + }, + "<4,5>": { + "<4,5,1>": "D2/", + "<4,5,2>": "\tOConv(15036, \"D2/\")", + "<4,5,3>": "\t03/01/09" + }, + "<4,6>": { + "<4,6,1>": "D4/", + "<4,6,2>": "OConv(15036, \"D4/\")", + "<4,6,3>": "03/01/2009" + }, + "<4,7>": { + "<4,7,1>": "D*", + "<4,7,2>": "\tOConv(15036, \"D*\")", + "<4,7,3>": "\t03*01*2009" + }, + "<4,8>": { + "<4,8,1>": "D/E", + "<4,8,2>": "OConv(15036, \"D/E\")", + "<4,8,3>": "\t01/03/2009" + }, + "<4,9>": { + "<4,9,1>": "D2E", + "<4,9,2>": "\tOConv(15036, \"D2E\")", + "<4,9,3>": "\t01 MAR 09" + }, + "<4,10>": { + "<4,10,1>": "D2/E", + "<4,10,2>": "\tOConv(15036, \"D2/E\")", + "<4,10,3>": "\t01/03/09" + }, + "<4,11>": { + "<4,11,1>": "DS", + "<4,11,2>": "\tOConv(15036, \"DS\")", + "<4,11,3>": "\t01 03 2009" + }, + "<4,12>": { + "<4,12,1>": "D/S", + "<4,12,2>": "\tOConv(15036, \"D/S\")", + "<4,12,3>": "\t03/01/2009" + }, + "<4,13>": { + "<4,13,1>": "DM", + "<4,13,2>": "\tOConv(15036, \"DM\")", + "<4,13,3>": "\t01 MAR 2009" + }, + "<4,14>": { + "<4,14,1>": "D,M", + "<4,14,2>": "\tOConv(15036, \"D,M\")", + "<4,14,3>": "\tMAR 01,2009" + }, + "<4,15>": { + "<4,15,1>": "DL", + "<4,15,2>": "\tOConv(15036, \"DL\")", + "<4,15,3>": "\t01 March 2009" + }, + "<4,16>": { + "<4,16,1>": "D,L", + "<4,16,2>": "\tOConv(15036, \"D,L\")", + "<4,16,3>": "\tMarch 01,2009" + }, + "<4,17>": { + "<4,17,1>": "DJL", + "<4,17,2>": "\tOConv(15036, \"DJL\")", + "<4,17,3>": "\t2009 March 01" + }, + "<4,18>": { + "<4,18,1>": "D4.EM", + "<4,18,2>": "\tOConv(15036, \"D4.EM\")", + "<4,18,3>": "\t01.MAR 2009" + }, + "<4,19>": { + "<4,19,1>": "D2.EL", + "<4,19,2>": "\tOConv(15036, \"D2.EL\")", + "<4,19,3>": "\t01.March 09" + }, + "<4,20>": { + "<4,20,1>": "DQ", + "<4,20,2>": "\tOConv(15036, \"DQ\")", + "<4,20,3>": "\t1" + }, + "<4,21>": { + "<4,21,1>": "DW", + "<4,21,2>": "\tOConv(15036, \"DW\")", + "<4,21,3>": "\t7" + }, + "<4,22>": { + "<4,22,1>": "DWA", + "<4,22,2>": "\tOConv(15036, \"DWA\")", + "<4,22,3>": "\tSunday" + } + }, + "<5>": { + "<5,1>": { + "<5,1,1>": "DT", + "<5,1,2>": "\tOConv(15036, 'DT')", + "<5,1,3>": "\t01 MAR 2009 12:00" + }, + "<5,2>": { + "<5,2,1>": "DT2^HS", + "<5,2,2>": "\tOConv(15036, 'DT2^HS ')", + "<5,2,3>": "\t01 MAR 09 12 00 00PM" + }, + "<5,3>": { + "<5,3,1>": "DT^3*/", + "<5,3,2>": "\tOConv(15036, 'DT^3*/')", + "<5,3,3>": "\t01 MAR 2009***12/00" + }, + "<5,4>": { + "<5,4,1>": "DT/^S", + "<5,4,2>": "\tOConv(15036, 'DT/^S')", + "<5,4,3>": "\t03/01/2009 12:00:00" + }, + "<5,5>": { + "<5,5,1>": "DT:^3H", + "<5,5,2>": "OConv(15036,'DT:^3H')", + "<5,5,3>": "\t03:01:2009 12:00AM" + }, + "<5,6>": { + "<5,6,1>": "DT/^3H", + "<5,6,2>": "\tOConv(15036.25,'DT/^3H')", + "<5,6,3>": "03/01/2009 06:00AM" + }, + "<5,7>": { + "<5,7,1>": "DT2/^H", + "<5,7,2>": "\tOConv(15036.75,'DT2/^H')", + "<5,7,3>": "\t03/01/2009 06:00PM" + } + }, + "<6>": { + "<6,1>": { + "<6,1,1>": "General", + "<6,1,2>": "", + "<6,1,3>": "" + } + }, + "<7>": { + "<7,1>": { + "<7,1,1>": "<>", + "<7,1,2>": "\tUse the column's default conversion", + "<7,1,3>": "\t<>" + } + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "MX", + "<8,1,2>": "\toutput = OConv(expression, \"MX\")", + "<8,1,3>": "" + }, + "<8,2>": { + "<8,2,1>": "HEX", + "<8,2,2>": "\toutput = OConv(expression, \"HEX\")", + "<8,2,3>": "" + }, + "<8,3>": { + "<8,3,1>": "MO", + "<8,3,2>": "\toutput = OConv(expression, \"MO\")", + "<8,3,3>": "" + }, + "<8,4>": { + "<8,4,1>": "MB", + "<8,4,2>": "\toutput = OConv(expression, \"MB\")", + "<8,4,3>": "" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "Special", + "<9,1,2>": "", + "<9,1,3>": "" + } + }, + "<10>": { + "<10,1>": { + "<10,1,1>": "MT", + "<10,1,2>": "\tOConv(43260,\"MT\")", + "<10,1,3>": "\t12:01" + }, + "<10,2>": { + "<10,2,1>": "MTH", + "<10,2,2>": "\tOConv(43260,\"MTH\")", + "<10,2,3>": "\t12:01PM" + }, + "<10,3>": { + "<10,3,1>": "MTS", + "<10,3,2>": "\tOConv(43260,\"MTS\")", + "<10,3,3>": "\t12:01:00" + }, + "<10,4>": { + "<10,4,1>": "MTHS", + "<10,4,2>": "\tOConv(43260,\"MTHS\")", + "<10,4,3>": "\t12:01:00PM" + } + }, + "<11>": { + "<11,1>": { + "<11,1,1>": "MS", + "<11,1,2>": "\tOConv(1.23,\"MS\")", + "<11,1,3>": "\t1.230000E+00" + }, + "<11,2>": { + "<11,2,1>": "MS22", + "<11,2,2>": "\tOConv(-1.23,\"MS22\")", + "<11,2,3>": "\t-1.23E+02" + }, + "<11,3>": { + "<11,3,1>": "MS15", + "<11,3,2>": "\tOConv(123,\"MS15\")", + "<11,3,3>": "\t1.23000E+2" + }, + "<11,4>": { + "<11,4,1>": "MS23", + "<11,4,2>": "\tOConv(123456,\"MS23\")", + "<11,4,3>": "\t1.235E+05" + } + }, + "<12>": { + "<12,1>": { + "<12,1,1>": "VB", + "<12,1,2>": "\tOriginalValue = OConv(\\0D0A00FEFFFCFD\\ \"VB\")", + "<12,1,3>": "" + } + }, + "<13>": { + "<13,1>": { + "<13,1,1>": "B", + "<13,1,2>": "\tOConv(1, \"B\")", + "<13,1,3>": "\tTrue" + } + }, + "<14>": { + "<14,1>": { + "<14,1,1>": "T#n", + "<14,1,2>": "\tOConv(\"This is a test\", \"T#9\")", + "<14,1,3>": "\tThis is a" + } + }, + "<15>": { + "<15,1>": { + "<15,1,1>": "[ZIP_FORMAT]", + "<15,1,2>": "\tOConv(123456789, \"[ZIP_FORMAT]\")", + "<15,1,3>": "\t12345-6789" + } + }, + "<16>": { + "<16,1>": { + "<16,1,1>": "[PHONE_FORMAT]", + "<16,1,2>": "\tOConv(1234567890, \"[PHONE_FORMAT]\")", + "<16,1,3>": "\t(123) 456-7890" + } + }, + "<17>": { + "<17,1>": { + "<17,1,1>": "[SSN_FORMAT]", + "<17,1,2>": "\tOConv(123456789, \"[SSN_FORMAT]\")", + "<17,1,3>": "\t123-45-6789" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ARTI_IDE_PGO_VALIDATION.json b/SYSPROG/APPROW/SYSENV%003ARTI_IDE_PGO_VALIDATION.json new file mode 100644 index 0000000..69c3647 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ARTI_IDE_PGO_VALIDATION.json @@ -0,0 +1,430 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_IDE_PGO_VALIDATION" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "Decimal", + "<1,2>": "Integer", + "<1,3>": "Date", + "<1,4>": "DateTime", + "<1,5>": "Time", + "<1,6>": "Boolean", + "<1,7>": "Range Check", + "<1,8>": "Match String", + "<1,9>": "Numeric", + "<1,10>": "Alpha", + "<1,11>": "Any Type", + "<1,12>": "Up to n Characters Any Type", + "<1,13>": "Combination with Literals", + "<1,14>": "Unique Multivalues", + "<1,15>": "Zip Format", + "<1,16>": "Phone Format", + "<1,17>": "Verifile (Table Lookup)", + "<1,18>": "None", + "<1,19>": "Default", + "<1,20>": "Masked Scientific", + "<1,21>": "Variable Binary\tStorage", + "<1,22>": "Email", + "<1,23>": "SSN Format" + }, + "<2>": { + "<2,1>": { + "<2,1,1>": "(MD2)", + "<2,1,2>": "IConv(64.24,\"MD2\")", + "<2,1,3>": "6424" + }, + "<2,2>": { + "<2,2,1>": "(MD1)", + "<2,2,2>": "IConv(-5,\"MD1\")", + "<2,2,3>": "-50" + }, + "<2,3>": { + "<2,3,1>": "(MD3)", + "<2,3,2>": "IConv(64.24,\"MD3\")", + "<2,3,3>": "64240" + }, + "<2,4>": { + "<2,4,1>": "(MD12)", + "<2,4,2>": "IConv(143.5,\"MD12\")", + "<2,4,3>": "14350" + }, + "<2,5>": { + "<2,5,1>": "(MD14)", + "<2,5,2>": "IConv(143.5,\"MD14\")", + "<2,5,3>": "1435000" + }, + "<2,6>": { + "<2,6,1>": "(MD0)", + "<2,6,2>": "IConv(143.5,\"MD0\")", + "<2,6,3>": "144" + }, + "<2,7>": { + "<2,7,1>": "(MC2.)", + "<2,7,2>": "IConv(\"1.234,5\",\"MC2.\")", + "<2,7,3>": "123450" + }, + "<2,8>": { + "<2,8,1>": "(MD2$)", + "<2,8,2>": "IConv(\"$45.50\",\"MD2\")", + "<2,8,3>": "4550" + }, + "<2,9>": { + "<2,9,1>": "(MC2[Fr])", + "<2,9,2>": "IConv(\"45,25Fr\",\"MC2[Fr]S\")", + "<2,9,3>": "4525" + } + }, + "<3>": { + "<3,1>": { + "<3,1,1>": "(MD0)", + "<3,1,2>": "", + "<3,1,3>": "5345" + } + }, + "<4>": { + "<4,1>": { + "<4,1,1>": "(D)", + "<4,1,2>": "IConv(\"01 MAR 2009\", \"D\")", + "<4,1,3>": "\t15036 \t" + }, + "<4,2>": { + "<4,2,1>": "(D2)", + "<4,2,2>": "IConv(\"01 MAR 09\", \"D2\")", + "<4,2,3>": "15036" + }, + "<4,3>": { + "<4,3,1>": "(D4)", + "<4,3,2>": "IConv(\"01 MAR 2009\", \"D4\")", + "<4,3,3>": "15036" + }, + "<4,4>": { + "<4,4,1>": "(D/)", + "<4,4,2>": "IConv(\"03/01/2009\", \"D/\")", + "<4,4,3>": "15036" + }, + "<4,5>": { + "<4,5,1>": "(D2/)", + "<4,5,2>": "IConv(\"03/01/09\", \"D2/\")", + "<4,5,3>": "15036 " + }, + "<4,6>": { + "<4,6,1>": "(D*)", + "<4,6,2>": "IConv(\"03*01*2009\", \"D*\")", + "<4,6,3>": "\t15036" + }, + "<4,7>": { + "<4,7,1>": "(D/E)", + "<4,7,2>": "IConv(\"01/03/2009\", \"D/E\")", + "<4,7,3>": "\t15036" + }, + "<4,8>": { + "<4,8,1>": "(D2E)", + "<4,8,2>": "IConv(\"01 MAR 09\", \"D2E\")", + "<4,8,3>": "\t15036" + }, + "<4,9>": { + "<4,9,1>": "(D2/E)", + "<4,9,2>": "IConv(\"01/03/09\", \"D2/E\")", + "<4,9,3>": "\t15036" + }, + "<4,10>": { + "<4,10,1>": "(DS)", + "<4,10,2>": "IConv(\"01 03 2009\", \"DS\")", + "<4,10,3>": "15036" + }, + "<4,11>": { + "<4,11,1>": "(D/S)", + "<4,11,2>": "IConv(\"03/01/2009\", \"D/S\")", + "<4,11,3>": "15036" + }, + "<4,12>": { + "<4,12,1>": "(DM)", + "<4,12,2>": "IConv(\"01 MAR 2009\", \"DM\")", + "<4,12,3>": "15036" + }, + "<4,13>": { + "<4,13,1>": "(D,M)", + "<4,13,2>": "IConv(\"MAR 01,2009\", \"D,M\")", + "<4,13,3>": "15036" + }, + "<4,14>": { + "<4,14,1>": "(DL)", + "<4,14,2>": "IConv(\"01 March 2009\", \"DL\")", + "<4,14,3>": "15036" + }, + "<4,15>": { + "<4,15,1>": "(D,L)", + "<4,15,2>": "IConv(\"March 01,2009\", \"D,L\")", + "<4,15,3>": "15036" + }, + "<4,16>": { + "<4,16,1>": "(DJL)", + "<4,16,2>": "IConv(\"2009 March 01\", \"DJL\")", + "<4,16,3>": "15036" + }, + "<4,17>": { + "<4,17,1>": "(D4.EM)", + "<4,17,2>": "IConv(\"01.MAR 2009\", \"D4.EM\")", + "<4,17,3>": "\t15036" + }, + "<4,18>": { + "<4,18,1>": "(D2.EL)", + "<4,18,2>": "IConv(\"01.March 09\", \"D2.EL\")", + "<4,18,3>": "\t15036" + }, + "<4,19>": { + "<4,19,1>": "(DQ)", + "<4,19,2>": "IConv(\"1\", \"DQ\")", + "<4,19,3>": "15036" + }, + "<4,20>": { + "<4,20,1>": "(DW)", + "<4,20,2>": "IConv(\"7\", \"DW\")", + "<4,20,3>": "15036" + }, + "<4,21>": { + "<4,21,1>": "(DWA)", + "<4,21,2>": "IConv(\"Sunday\", \"DWA\")", + "<4,21,3>": "15036" + } + }, + "<5>": { + "<5,1>": { + "<5,1,1>": "(DT)", + "<5,1,2>": "IConv(\"02/19/2009 06:00AM\",\"DT\")", + "<5,1,3>": "15026.25" + }, + "<5,2>": { + "<5,2,1>": "(DT)", + "<5,2,2>": "IConv(\"02/19/2009 02:00AM\", \"DT\")", + "<5,2,3>": "15026.0833" + }, + "<5,3>": { + "<5,3,1>": "(DT)", + "<5,3,2>": "IConv(\"02/19/2009 12P\", \"DT\")", + "<5,3,3>": "15026.5" + }, + "<5,4>": { + "<5,4,1>": "(DT)", + "<5,4,2>": "IConv(\"02/19/1967 06:00AM\", \"DT\")", + "<5,4,3>": "-314.75" + }, + "<5,5>": { + "<5,5,1>": "(DT)", + "<5,5,2>": "IConv(\"02/19/1967 06:00PM\", \"DT\")", + "<5,5,3>": "-314.25" + }, + "<5,6>": { + "<5,6,1>": "(DT^3-)", + "<5,6,2>": "IConv(\"02/19/1967-06:00PM\", \"DT^3-\")", + "<5,6,3>": "-314.25 " + } + }, + "<6>": { + "<6,1>": { + "<6,1,1>": "(MT)", + "<6,1,2>": "IConv(\"12:01\", \"MT\")", + "<6,1,3>": "\t43260" + }, + "<6,2>": { + "<6,2,1>": "(MT)", + "<6,2,2>": "IConv(\"12:01PM\", \"MTH\")", + "<6,2,3>": "\t43260" + }, + "<6,3>": { + "<6,3,1>": "(MT)", + "<6,3,2>": "IConv(\"12:01:59PM\", \"MT\")", + "<6,3,3>": "\t43319" + }, + "<6,4>": { + "<6,4,1>": "(MT)", + "<6,4,2>": "IConv(2, \"MT\")", + "<6,4,3>": "\t7200" + }, + "<6,5>": { + "<6,5,1>": "(MT)", + "<6,5,2>": "IConv(\"2:01AM\", \"MT\")", + "<6,5,3>": "\t7260" + }, + "<6,6>": { + "<6,6,1>": "(MT)", + "<6,6,2>": "IConv(\"2/01/2009\", \"MT,\")", + "<6,6,3>": "\t15036" + } + }, + "<7>": { + "<7,1>": { + "<7,1,1>": "(B)", + "<7,1,2>": "\tBoolean Y or N", + "<7,1,3>": "\tY\t" + } + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "(x,y)", + "<8,1,2>": "\tRange Check (low,high)", + "<8,1,3>": "\t(-32768,32768)" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "\"xyz\"", + "<9,1,2>": "\tMatch a specific string", + "<9,1,3>": "\t\"Approved\"" + } + }, + "<10>": { + "<10,1>": { + "<10,1,1>": "nN", + "<10,1,2>": "\tn Numeric Characters", + "<10,1,3>": "\t7N" + } + }, + "<11>": { + "<11,1>": { + "<11,1,1>": "nA", + "<11,1,2>": "\tn Alpha Characters", + "<11,1,3>": "\t3A" + } + }, + "<12>": { + "<12,1>": { + "<12,1,1>": "nX", + "<12,1,2>": "\tn Characters of any type", + "<12,1,3>": "\t2X" + } + }, + "<13>": { + "<13,1>": { + "<13,1,1>": "nZ", + "<13,1,2>": "\tUp to n Characters of any type", + "<13,1,3>": "\t5Z" + } + }, + "<14>": { + "<14,1>": { + "<14,1,1>": "nA'x'nZ", + "<14,1,2>": "\tCombinations with literals", + "<14,1,3>": "\t1A1N1A'-'1N1A1N" + } + }, + "<15>": { + "<15,1>": { + "<15,1,1>": "%U%", + "<15,1,2>": "\tUnique multivalues", + "<15,1,3>": "" + } + }, + "<16>": { + "<16,1>": { + "<16,1,1>": "[ZIP_FORMAT]", + "<16,1,2>": "\tUS/Canada Zip", + "<16,1,3>": "\t98006, V1A 3R1" + } + }, + "<17>": { + "<17,1>": { + "<17,1,1>": "[PHONE_FORMAT]", + "<17,1,2>": "\tUS Phone No", + "<17,1,3>": "\t(206)555-1212" + } + }, + "<18>": { + "<18,1>": { + "<18,1,1>": "<>", + "<18,1,2>": "\t\tVerifile (table lookup)", + "<18,1,3>": "\t" + } + }, + "<19>": { + "<19,1>": { + "<19,1,1>": "<>", + "<19,1,2>": "\tNo input validation/conversion", + "<19,1,3>": "\t" + } + }, + "<20>": { + "<20,1>": { + "<20,1,1>": "<>", + "<20,1,2>": "\tUse the column's default", + "<20,1,3>": "\t<>" + } + }, + "<21>": { + "<21,1>": { + "<21,1,1>": "Masked Scientific", + "<21,1,2>": "IConv(1.23,\"MS\")", + "<21,1,3>": "1.23" + }, + "<21,2>": { + "<21,2,1>": "", + "<21,2,2>": "IConv(1.2345E+4,\"MS\")", + "<21,2,3>": "12345" + }, + "<21,3>": { + "<21,3,1>": "", + "<21,3,2>": "IConv(1.23456789E+2,\"MS\")", + "<21,3,3>": "123.456789" + }, + "<21,4>": { + "<21,4,1>": "", + "<21,4,2>": "IConv(1.234E+5,\"MS\")", + "<21,4,3>": "123400" + }, + "<21,5>": { + "<21,5,1>": "", + "<21,5,2>": "IConv(1234.1234E-2,\"MS\")", + "<21,5,3>": "12.341234 " + }, + "<21,6>": { + "<21,6,1>": "", + "<21,6,2>": "IConv(\"1234,1234E-2\",\"MS,\")", + "<21,6,3>": "12.341234" + } + }, + "<22>": { + "<22,1>": { + "<22,1,1>": "Variable Binary\tStorage", + "<22,1,2>": "Value = IConv(\\0D0A00FEFFFCFD\\, \"VB\")" + } + }, + "<23>": { + "<23,1>": { + "<23,1,1>": "[EMAIL_FORMAT]", + "<23,1,2>": "Valid email address", + "<23,1,3>": "abc@generic.com" + } + }, + "<24>": { + "<24,1>": { + "<24,1,1>": "[SSN_FORMAT]", + "<24,1,2>": "Valid Social Security Number", + "<24,1,3>": "123-45-6789" + } + }, + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "TEST = IConv(VALUE, \"BTF\")", + "<29>": "this = Oconv(value, 'BX')", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": " ", + "<35>": "", + "<36>": " ", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": " " + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ARTI_INVWLIST.json b/SYSPROG/APPROW/SYSENV%003ARTI_INVWLIST.json new file mode 100644 index 0000000..1931366 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ARTI_INVWLIST.json @@ -0,0 +1,1011 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_INVWLIST" + }, + "body": { + "record1": { + "<1>": "123456", + "<2>": "password", + "<3>": "12345678", + "<4>": "qwerty", + "<5>": "123456789", + "<6>": "12345", + "<7>": "1234", + "<8>": "111111", + "<9>": "1234567", + "<10>": "dragon", + "<11>": "123123", + "<12>": "baseball", + "<13>": "abc123", + "<14>": "football", + "<15>": "monkey", + "<16>": "letmein", + "<17>": "696969", + "<18>": "shadow", + "<19>": "master", + "<20>": "666666", + "<21>": "qwertyuiop", + "<22>": "123321", + "<23>": "mustang", + "<24>": "1234567890", + "<25>": "michael", + "<26>": "654321", + "<27>": "pussy", + "<28>": "superman", + "<29>": "1qaz2wsx", + "<30>": "7777777", + "<31>": "fuckyou", + "<32>": "121212", + "<33>": "000000", + "<34>": "qazwsx", + "<35>": "123qwe", + "<36>": "killer", + "<37>": "trustno1", + "<38>": "jordan", + "<39>": "jennifer", + "<40>": "zxcvbnm", + "<41>": "asdfgh", + "<42>": "hunter", + "<43>": "buster", + "<44>": "soccer", + "<45>": "harley", + "<46>": "batman", + "<47>": "andrew", + "<48>": "tigger", + "<49>": "sunshine", + "<50>": "iloveyou", + "<51>": "fuckme", + "<52>": "2000", + "<53>": "charlie", + "<54>": "robert", + "<55>": "thomas", + "<56>": "hockey", + "<57>": "ranger", + "<58>": "daniel", + "<59>": "starwars", + "<60>": "klaster", + "<61>": "112233", + "<62>": "george", + "<63>": "asshole", + "<64>": "computer", + "<65>": "michelle", + "<66>": "jessica", + "<67>": "pepper", + "<68>": "1111", + "<69>": "zxcvbn", + "<70>": "555555", + "<71>": "11111111", + "<72>": "131313", + "<73>": "freedom", + "<74>": "777777", + "<75>": "pass", + "<76>": "fuck", + "<77>": "maggie", + "<78>": "159753", + "<79>": "aaaaaa", + "<80>": "ginger", + "<81>": "princess", + "<82>": "joshua", + "<83>": "cheese", + "<84>": "amanda", + "<85>": "summer", + "<86>": "love", + "<87>": "ashley", + "<88>": "6969", + "<89>": "nicole", + "<90>": "chelsea", + "<91>": "biteme", + "<92>": "matthew", + "<93>": "access", + "<94>": "yankees", + "<95>": "987654321", + "<96>": "dallas", + "<97>": "austin", + "<98>": "thunder", + "<99>": "taylor", + "<100>": "matrix", + "<101>": "william", + "<102>": "corvette", + "<103>": "hello", + "<104>": "martin", + "<105>": "heather", + "<106>": "secret", + "<107>": "fucker", + "<108>": "merlin", + "<109>": "diamond", + "<110>": "1234qwer", + "<111>": "gfhjkm", + "<112>": "hammer", + "<113>": "silver", + "<114>": "222222", + "<115>": "88888888", + "<116>": "anthony", + "<117>": "justin", + "<118>": "test", + "<119>": "bailey", + "<120>": "q1w2e3r4t5", + "<121>": "patrick", + "<122>": "internet", + "<123>": "scooter", + "<124>": "orange", + "<125>": "11111", + "<126>": "golfer", + "<127>": "cookie", + "<128>": "richard", + "<129>": "samantha", + "<130>": "bigdog", + "<131>": "guitar", + "<132>": "jackson", + "<133>": "whatever", + "<134>": "mickey", + "<135>": "chicken", + "<136>": "sparky", + "<137>": "snoopy", + "<138>": "maverick", + "<139>": "phoenix", + "<140>": "camaro", + "<141>": "sexy", + "<142>": "peanut", + "<143>": "morgan", + "<144>": "welcome", + "<145>": "falcon", + "<146>": "cowboy", + "<147>": "ferrari", + "<148>": "samsung", + "<149>": "andrea", + "<150>": "smokey", + "<151>": "steelers", + "<152>": "joseph", + "<153>": "mercedes", + "<154>": "dakota", + "<155>": "arsenal", + "<156>": "eagles", + "<157>": "melissa", + "<158>": "boomer", + "<159>": "booboo", + "<160>": "spider", + "<161>": "nascar", + "<162>": "monster", + "<163>": "tigers", + "<164>": "yellow", + "<165>": "xxxxxx", + "<166>": "123123123", + "<167>": "gateway", + "<168>": "marina", + "<169>": "diablo", + "<170>": "bulldog", + "<171>": "qwer1234", + "<172>": "compaq", + "<173>": "purple", + "<174>": "hardcore", + "<175>": "banana", + "<176>": "junior", + "<177>": "hannah", + "<178>": "123654", + "<179>": "porsche", + "<180>": "lakers", + "<181>": "iceman", + "<182>": "money", + "<183>": "cowboys", + "<184>": "987654", + "<185>": "london", + "<186>": "tennis", + "<187>": "999999", + "<188>": "ncc1701", + "<189>": "coffee", + "<190>": "scooby", + "<191>": "0000", + "<192>": "miller", + "<193>": "boston", + "<194>": "q1w2e3r4", + "<195>": "fuckoff", + "<196>": "brandon", + "<197>": "yamaha", + "<198>": "chester", + "<199>": "mother", + "<200>": "forever", + "<201>": "johnny", + "<202>": "edward", + "<203>": "333333", + "<204>": "oliver", + "<205>": "redsox", + "<206>": "player", + "<207>": "nikita", + "<208>": "knight", + "<209>": "fender", + "<210>": "barney", + "<211>": "midnight", + "<212>": "please", + "<213>": "brandy", + "<214>": "chicago", + "<215>": "badboy", + "<216>": "iwantu", + "<217>": "slayer", + "<218>": "rangers", + "<219>": "charles", + "<220>": "angel", + "<221>": "flower", + "<222>": "bigdaddy", + "<223>": "rabbit", + "<224>": "wizard", + "<225>": "bigdick", + "<226>": "jasper", + "<227>": "enter", + "<228>": "rachel", + "<229>": "chris", + "<230>": "steven", + "<231>": "winner", + "<232>": "adidas", + "<233>": "victoria", + "<234>": "natasha", + "<235>": "1q2w3e4r", + "<236>": "jasmine", + "<237>": "winter", + "<238>": "prince", + "<239>": "panties", + "<240>": "marine", + "<241>": "ghbdtn", + "<242>": "fishing", + "<243>": "cocacola", + "<244>": "casper", + "<245>": "james", + "<246>": "232323", + "<247>": "raiders", + "<248>": "888888", + "<249>": "marlboro", + "<250>": "gandalf", + "<251>": "asdfasdf", + "<252>": "crystal", + "<253>": "87654321", + "<254>": "12344321", + "<255>": "sexsex", + "<256>": "golden", + "<257>": "blowme", + "<258>": "bigtits", + "<259>": "8675309", + "<260>": "panther", + "<261>": "lauren", + "<262>": "angela", + "<263>": "bitch", + "<264>": "spanky", + "<265>": "thx1138", + "<266>": "angels", + "<267>": "madison", + "<268>": "winston", + "<269>": "shannon", + "<270>": "mike", + "<271>": "toyota", + "<272>": "blowjob", + "<273>": "jordan23", + "<274>": "canada", + "<275>": "sophie", + "<276>": "Password", + "<277>": "apples", + "<278>": "dick", + "<279>": "tiger", + "<280>": "razz", + "<281>": "123abc", + "<282>": "pokemon", + "<283>": "qazxsw", + "<284>": "55555", + "<285>": "qwaszx", + "<286>": "muffin", + "<287>": "johnson", + "<288>": "murphy", + "<289>": "cooper", + "<290>": "jonathan", + "<291>": "liverpoo", + "<292>": "david", + "<293>": "danielle", + "<294>": "159357", + "<295>": "jackie", + "<296>": "1990", + "<297>": "123456a", + "<298>": "789456", + "<299>": "turtle", + "<300>": "horny", + "<301>": "abcd1234", + "<302>": "scorpion", + "<303>": "qazwsxedc", + "<304>": "101010", + "<305>": "butter", + "<306>": "carlos", + "<307>": "password1", + "<308>": "dennis", + "<309>": "slipknot", + "<310>": "qwerty123", + "<311>": "booger", + "<312>": "asdf", + "<313>": "1991", + "<314>": "black", + "<315>": "startrek", + "<316>": "12341234", + "<317>": "cameron", + "<318>": "newyork", + "<319>": "rainbow", + "<320>": "nathan", + "<321>": "john", + "<322>": "1992", + "<323>": "rocket", + "<324>": "viking", + "<325>": "redskins", + "<326>": "butthead", + "<327>": "asdfghjkl", + "<328>": "1212", + "<329>": "sierra", + "<330>": "peaches", + "<331>": "gemini", + "<332>": "doctor", + "<333>": "wilson", + "<334>": "sandra", + "<335>": "helpme", + "<336>": "qwertyui", + "<337>": "victor", + "<338>": "florida", + "<339>": "dolphin", + "<340>": "pookie", + "<341>": "captain", + "<342>": "tucker", + "<343>": "blue", + "<344>": "liverpool", + "<345>": "theman", + "<346>": "bandit", + "<347>": "dolphins", + "<348>": "maddog", + "<349>": "packers", + "<350>": "jaguar", + "<351>": "lovers", + "<352>": "nicholas", + "<353>": "united", + "<354>": "tiffany", + "<355>": "maxwell", + "<356>": "zzzzzz", + "<357>": "nirvana", + "<358>": "jeremy", + "<359>": "suckit", + "<360>": "stupid", + "<361>": "porn", + "<362>": "monica", + "<363>": "elephant", + "<364>": "giants", + "<365>": "jackass", + "<366>": "hotdog", + "<367>": "rosebud", + "<368>": "success", + "<369>": "debbie", + "<370>": "mountain", + "<371>": "444444", + "<372>": "xxxxxxxx", + "<373>": "warrior", + "<374>": "1q2w3e4r5t", + "<375>": "q1w2e3", + "<376>": "123456q", + "<377>": "albert", + "<378>": "metallic", + "<379>": "lucky", + "<380>": "azerty", + "<381>": "7777", + "<382>": "shithead", + "<383>": "alex", + "<384>": "bond007", + "<385>": "alexis", + "<386>": "1111111", + "<387>": "samson", + "<388>": "5150", + "<389>": "willie", + "<390>": "scorpio", + "<391>": "bonnie", + "<392>": "gators", + "<393>": "benjamin", + "<394>": "voodoo", + "<395>": "driver", + "<396>": "dexter", + "<397>": "2112", + "<398>": "jason", + "<399>": "calvin", + "<400>": "freddy", + "<401>": "212121", + "<402>": "creative", + "<403>": "12345a", + "<404>": "sydney", + "<405>": "rush2112", + "<406>": "1989", + "<407>": "asdfghjk", + "<408>": "red123", + "<409>": "bubba", + "<410>": "4815162342", + "<411>": "passw0rd", + "<412>": "trouble", + "<413>": "gunner", + "<414>": "happy", + "<415>": "fucking", + "<416>": "gordon", + "<417>": "legend", + "<418>": "jessie", + "<419>": "stella", + "<420>": "qwert", + "<421>": "eminem", + "<422>": "arthur", + "<423>": "apple", + "<424>": "nissan", + "<425>": "bullshit", + "<426>": "bear", + "<427>": "america", + "<428>": "1qazxsw2", + "<429>": "nothing", + "<430>": "parker", + "<431>": "4444", + "<432>": "rebecca", + "<433>": "qweqwe", + "<434>": "garfield", + "<435>": "01012011", + "<436>": "beavis", + "<437>": "69696969", + "<438>": "jack", + "<439>": "asdasd", + "<440>": "december", + "<441>": "2222", + "<442>": "102030", + "<443>": "252525", + "<444>": "11223344", + "<445>": "magic", + "<446>": "apollo", + "<447>": "skippy", + "<448>": "315475", + "<449>": "girls", + "<450>": "kitten", + "<451>": "golf", + "<452>": "copper", + "<453>": "braves", + "<454>": "shelby", + "<455>": "godzilla", + "<456>": "beaver", + "<457>": "fred", + "<458>": "tomcat", + "<459>": "august", + "<460>": "buddy", + "<461>": "airborne", + "<462>": "1993", + "<463>": "1988", + "<464>": "lifehack", + "<465>": "qqqqqq", + "<466>": "brooklyn", + "<467>": "animal", + "<468>": "platinum", + "<469>": "phantom", + "<470>": "online", + "<471>": "xavier", + "<472>": "darkness", + "<473>": "blink182", + "<474>": "power", + "<475>": "fish", + "<476>": "green", + "<477>": "789456123", + "<478>": "voyager", + "<479>": "police", + "<480>": "travis", + "<481>": "12qwaszx", + "<482>": "heaven", + "<483>": "snowball", + "<484>": "lover", + "<485>": "abcdef", + "<486>": "00000", + "<487>": "pakistan", + "<488>": "007007", + "<489>": "walter", + "<490>": "playboy", + "<491>": "blazer", + "<492>": "cricket", + "<493>": "sniper", + "<494>": "hooters", + "<495>": "donkey", + "<496>": "willow", + "<497>": "loveme", + "<498>": "saturn", + "<499>": "therock", + "<500>": "redwings", + "<501>": "bigboy", + "<502>": "pumpkin", + "<503>": "trinity", + "<504>": "williams", + "<505>": "tits", + "<506>": "nintendo", + "<507>": "digital", + "<508>": "destiny", + "<509>": "topgun", + "<510>": "runner", + "<511>": "marvin", + "<512>": "guinness", + "<513>": "chance", + "<514>": "bubbles", + "<515>": "testing", + "<516>": "fire", + "<517>": "november", + "<518>": "minecraft", + "<519>": "asdf1234", + "<520>": "lasvegas", + "<521>": "sergey", + "<522>": "broncos", + "<523>": "cartman", + "<524>": "private", + "<525>": "celtic", + "<526>": "birdie", + "<527>": "little", + "<528>": "cassie", + "<529>": "babygirl", + "<530>": "donald", + "<531>": "beatles", + "<532>": "1313", + "<533>": "dickhead", + "<534>": "family", + "<535>": "12121212", + "<536>": "school", + "<537>": "louise", + "<538>": "gabriel", + "<539>": "eclipse", + "<540>": "fluffy", + "<541>": "147258369", + "<542>": "lol123", + "<543>": "explorer", + "<544>": "beer", + "<545>": "nelson", + "<546>": "flyers", + "<547>": "spencer", + "<548>": "scott", + "<549>": "lovely", + "<550>": "gibson", + "<551>": "doggie", + "<552>": "cherry", + "<553>": "andrey", + "<554>": "snickers", + "<555>": "buffalo", + "<556>": "pantera", + "<557>": "metallica", + "<558>": "member", + "<559>": "carter", + "<560>": "qwertyu", + "<561>": "peter", + "<562>": "alexande", + "<563>": "steve", + "<564>": "bronco", + "<565>": "paradise", + "<566>": "goober", + "<567>": "5555", + "<568>": "samuel", + "<569>": "montana", + "<570>": "mexico", + "<571>": "dreams", + "<572>": "michigan", + "<573>": "cock", + "<574>": "carolina", + "<575>": "yankee", + "<576>": "friends", + "<577>": "magnum", + "<578>": "surfer", + "<579>": "poopoo", + "<580>": "maximus", + "<581>": "genius", + "<582>": "cool", + "<583>": "vampire", + "<584>": "lacrosse", + "<585>": "asd123", + "<586>": "aaaa", + "<587>": "christin", + "<588>": "kimberly", + "<589>": "speedy", + "<590>": "sharon", + "<591>": "carmen", + "<592>": "111222", + "<593>": "kristina", + "<594>": "sammy", + "<595>": "racing", + "<596>": "ou812", + "<597>": "sabrina", + "<598>": "horses", + "<599>": "0987654321", + "<600>": "qwerty1", + "<601>": "pimpin", + "<602>": "baby", + "<603>": "stalker", + "<604>": "enigma", + "<605>": "147147", + "<606>": "star", + "<607>": "poohbear", + "<608>": "boobies", + "<609>": "147258", + "<610>": "simple", + "<611>": "bollocks", + "<612>": "12345q", + "<613>": "marcus", + "<614>": "brian", + "<615>": "1987", + "<616>": "qweasdzxc", + "<617>": "drowssap", + "<618>": "hahaha", + "<619>": "caroline", + "<620>": "barbara", + "<621>": "dave", + "<622>": "viper", + "<623>": "drummer", + "<624>": "action", + "<625>": "einstein", + "<626>": "bitches", + "<627>": "genesis", + "<628>": "hello1", + "<629>": "scotty", + "<630>": "friend", + "<631>": "forest", + "<632>": "010203", + "<633>": "hotrod", + "<634>": "google", + "<635>": "vanessa", + "<636>": "spitfire", + "<637>": "badger", + "<638>": "maryjane", + "<639>": "friday", + "<640>": "alaska", + "<641>": "1232323q", + "<642>": "tester", + "<643>": "jester", + "<644>": "jake", + "<645>": "champion", + "<646>": "billy", + "<647>": "147852", + "<648>": "rock", + "<649>": "hawaii", + "<650>": "badass", + "<651>": "chevy", + "<652>": "420420", + "<653>": "walker", + "<654>": "stephen", + "<655>": "eagle1", + "<656>": "bill", + "<657>": "1986", + "<658>": "october", + "<659>": "gregory", + "<660>": "svetlana", + "<661>": "pamela", + "<662>": "1984", + "<663>": "music", + "<664>": "shorty", + "<665>": "westside", + "<666>": "stanley", + "<667>": "diesel", + "<668>": "courtney", + "<669>": "242424", + "<670>": "kevin", + "<671>": "porno", + "<672>": "hitman", + "<673>": "boobs", + "<674>": "mark", + "<675>": "12345qwert", + "<676>": "reddog", + "<677>": "frank", + "<678>": "qwe123", + "<679>": "popcorn", + "<680>": "patricia", + "<681>": "aaaaaaaa", + "<682>": "1969", + "<683>": "teresa", + "<684>": "mozart", + "<685>": "buddha", + "<686>": "anderson", + "<687>": "paul", + "<688>": "melanie", + "<689>": "abcdefg", + "<690>": "security", + "<691>": "lucky1", + "<692>": "lizard", + "<693>": "denise", + "<694>": "3333", + "<695>": "a12345", + "<696>": "123789", + "<697>": "ruslan", + "<698>": "stargate", + "<699>": "simpsons", + "<700>": "scarface", + "<701>": "eagle", + "<702>": "123456789a", + "<703>": "thumper", + "<704>": "olivia", + "<705>": "naruto", + "<706>": "1234554321", + "<707>": "general", + "<708>": "cherokee", + "<709>": "a123456", + "<710>": "vincent", + "<711>": "Usuckballz1", + "<712>": "spooky", + "<713>": "qweasd", + "<714>": "cumshot", + "<715>": "free", + "<716>": "frankie", + "<717>": "douglas", + "<718>": "death", + "<719>": "1980", + "<720>": "loveyou", + "<721>": "kitty", + "<722>": "kelly", + "<723>": "veronica", + "<724>": "suzuki", + "<725>": "semperfi", + "<726>": "penguin", + "<727>": "mercury", + "<728>": "liberty", + "<729>": "spirit", + "<730>": "scotland", + "<731>": "natalie", + "<732>": "marley", + "<733>": "vikings", + "<734>": "system", + "<735>": "sucker", + "<736>": "king", + "<737>": "allison", + "<738>": "marshall", + "<739>": "1979", + "<740>": "098765", + "<741>": "qwerty12", + "<742>": "hummer", + "<743>": "adrian", + "<744>": "1985", + "<745>": "vfhbyf", + "<746>": "sandman", + "<747>": "rocky", + "<748>": "leslie", + "<749>": "antonio", + "<750>": "98765432", + "<751>": "4321", + "<752>": "softball", + "<753>": "passion", + "<754>": "mnbvcxz", + "<755>": "bastard", + "<756>": "passport", + "<757>": "horney", + "<758>": "rascal", + "<759>": "howard", + "<760>": "franklin", + "<761>": "bigred", + "<762>": "assman", + "<763>": "alexander", + "<764>": "homer", + "<765>": "redrum", + "<766>": "jupiter", + "<767>": "claudia", + "<768>": "55555555", + "<769>": "141414", + "<770>": "zaq12wsx", + "<771>": "shit", + "<772>": "patches", + "<773>": "nigger", + "<774>": "cunt", + "<775>": "raider", + "<776>": "infinity", + "<777>": "andre", + "<778>": "54321", + "<779>": "galore", + "<780>": "college", + "<781>": "russia", + "<782>": "kawasaki", + "<783>": "bishop", + "<784>": "77777777", + "<785>": "vladimir", + "<786>": "money1", + "<787>": "freeuser", + "<788>": "wildcats", + "<789>": "francis", + "<790>": "disney", + "<791>": "budlight", + "<792>": "brittany", + "<793>": "1994", + "<794>": "00000000", + "<795>": "sweet", + "<796>": "oksana", + "<797>": "honda", + "<798>": "domino", + "<799>": "bulldogs", + "<800>": "brutus", + "<801>": "swordfis", + "<802>": "norman", + "<803>": "monday", + "<804>": "jimmy", + "<805>": "ironman", + "<806>": "ford", + "<807>": "fantasy", + "<808>": "9999", + "<809>": "7654321", + "<810>": "PASSWORD", + "<811>": "hentai", + "<812>": "duncan", + "<813>": "cougar", + "<814>": "1977", + "<815>": "jeffrey", + "<816>": "house", + "<817>": "dancer", + "<818>": "brooke", + "<819>": "timothy", + "<820>": "super", + "<821>": "marines", + "<822>": "justice", + "<823>": "digger", + "<824>": "connor", + "<825>": "patriots", + "<826>": "karina", + "<827>": "202020", + "<828>": "molly", + "<829>": "everton", + "<830>": "tinker", + "<831>": "alicia", + "<832>": "rasdzv3", + "<833>": "poop", + "<834>": "pearljam", + "<835>": "stinky", + "<836>": "naughty", + "<837>": "colorado", + "<838>": "123123a", + "<839>": "water", + "<840>": "test123", + "<841>": "ncc1701d", + "<842>": "motorola", + "<843>": "ireland", + "<844>": "asdfg", + "<845>": "slut", + "<846>": "matt", + "<847>": "houston", + "<848>": "boogie", + "<849>": "zombie", + "<850>": "accord", + "<851>": "vision", + "<852>": "bradley", + "<853>": "reggie", + "<854>": "kermit", + "<855>": "froggy", + "<856>": "ducati", + "<857>": "avalon", + "<858>": "6666", + "<859>": "9379992", + "<860>": "sarah", + "<861>": "saints", + "<862>": "logitech", + "<863>": "chopper", + "<864>": "852456", + "<865>": "simpson", + "<866>": "madonna", + "<867>": "juventus", + "<868>": "claire", + "<869>": "159951", + "<870>": "zachary", + "<871>": "yfnfif", + "<872>": "wolverin", + "<873>": "warcraft", + "<874>": "hello123", + "<875>": "extreme", + "<876>": "penis", + "<877>": "peekaboo", + "<878>": "fireman", + "<879>": "eugene", + "<880>": "brenda", + "<881>": "123654789", + "<882>": "russell", + "<883>": "panthers", + "<884>": "georgia", + "<885>": "smith", + "<886>": "skyline", + "<887>": "jesus", + "<888>": "elizabet", + "<889>": "spiderma", + "<890>": "smooth", + "<891>": "pirate", + "<892>": "empire", + "<893>": "bullet", + "<894>": "8888", + "<895>": "virginia", + "<896>": "valentin", + "<897>": "psycho", + "<898>": "predator", + "<899>": "arizona", + "<900>": "134679", + "<901>": "mitchell", + "<902>": "alyssa", + "<903>": "vegeta", + "<904>": "titanic", + "<905>": "christ", + "<906>": "goblue", + "<907>": "fylhtq", + "<908>": "wolf", + "<909>": "mmmmmm", + "<910>": "kirill", + "<911>": "indian", + "<912>": "hiphop", + "<913>": "baxter", + "<914>": "awesome", + "<915>": "people", + "<916>": "danger", + "<917>": "roland", + "<918>": "mookie", + "<919>": "741852963", + "<920>": "1111111111", + "<921>": "dreamer", + "<922>": "bambam", + "<923>": "arnold", + "<924>": "1981", + "<925>": "skipper", + "<926>": "serega", + "<927>": "rolltide", + "<928>": "elvis", + "<929>": "changeme", + "<930>": "simon", + "<931>": "1q2w3e", + "<932>": "lovelove", + "<933>": "fktrcfylh", + "<934>": "denver", + "<935>": "tommy", + "<936>": "mine", + "<937>": "loverboy", + "<938>": "hobbes", + "<939>": "happy1", + "<940>": "alison", + "<941>": "nemesis", + "<942>": "chevelle", + "<943>": "cardinal", + "<944>": "burton", + "<945>": "wanker", + "<946>": "picard", + "<947>": "151515", + "<948>": "tweety", + "<949>": "michael1", + "<950>": "147852369", + "<951>": "12312", + "<952>": "xxxx", + "<953>": "windows", + "<954>": "turkey", + "<955>": "456789", + "<956>": "1974", + "<957>": "vfrcbv", + "<958>": "sublime", + "<959>": "1975", + "<960>": "galina", + "<961>": "bobby", + "<962>": "newport", + "<963>": "manutd", + "<964>": "daddy", + "<965>": "american", + "<966>": "alexandr", + "<967>": "1966", + "<968>": "victory", + "<969>": "rooster", + "<970>": "qqq111", + "<971>": "madmax", + "<972>": "electric", + "<973>": "bigcock", + "<974>": "a1b2c3", + "<975>": "wolfpack", + "<976>": "spring", + "<977>": "phpbb", + "<978>": "lalala", + "<979>": "suckme", + "<980>": "spiderman", + "<981>": "eric", + "<982>": "darkside", + "<983>": "classic", + "<984>": "raptor", + "<985>": "123456789q", + "<986>": "hendrix", + "<987>": "1982", + "<988>": "wombat", + "<989>": "avatar", + "<990>": "alpha", + "<991>": "zxc123", + "<992>": "crazy", + "<993>": "hard", + "<994>": "england", + "<995>": "brazil", + "<996>": "1978", + "<997>": "01011980", + "<998>": "wildcat", + "<999>": "polina", + "<1000>": "freepass" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ARTI_MSWIN_DLL_NAMES.json b/SYSPROG/APPROW/SYSENV%003ARTI_MSWIN_DLL_NAMES.json new file mode 100644 index 0000000..fc21a73 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ARTI_MSWIN_DLL_NAMES.json @@ -0,0 +1,50 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_MSWIN_DLL_NAMES" + }, + "body": { + "record1": { + "<1>": "ADVAPI32", + "<2>": "ATHUI", + "<3>": "COMCTL32", + "<4>": "COMPSTUI", + "<5>": "CRYPT32", + "<6>": "DDORES", + "<7>": "DWMAPI", + "<8>": "FXRESM", + "<9>": "GDI32", + "<10>": "IEFRAME", + "<11>": "IMAGERES", + "<12>": "KERNEL32", + "<13>": "MMCNDMGR", + "<14>": "MORICONS", + "<15>": "MPR", + "<16>": "MSFTEDIT", + "<17>": "MSHTML", + "<18>": "MSVCRT", + "<19>": "NETSHELL", + "<20>": "NTDLL", + "<21>": "OLE32", + "<22>": "OLEAUT32", + "<23>": "PNIDUI", + "<24>": "RICHED20", + "<25>": "RPCRT4", + "<26>": "SECUR32", + "<27>": "SETUPAPI", + "<28>": "SHELL32", + "<29>": "SHLWAPI", + "<30>": "USER32", + "<31>": "UIHUB", + "<32>": "UIRIBBON", + "<33>": "UXTHEME", + "<34>": "VERSION", + "<35>": "WFSR", + "<36>": "WININET", + "<37>": "WINSPOOL", + "<38>": "WMPLOC", + "<39>": "WS2_32" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ARTI_OIWIN_RESOURCES.json b/SYSPROG/APPROW/SYSENV%003ARTI_OIWIN_RESOURCES.json new file mode 100644 index 0000000..17f60df --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ARTI_OIWIN_RESOURCES.json @@ -0,0 +1,68 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_OIWIN_RESOURCES" + }, + "body": { + "record1": { + "<1>": "* //", + "<2>": "* // File : SYSENV - RTI_OIWIN_RESOURCES", + "<3>": "* // Author : Mr C", + "<4>": "* // Date : September 2012", + "<5>": "* // Purpose : \"OIWIN_\" procedure resource strings", + "<6>": "* //", + "<7>": "* // Comments", + "<8>": "* // ========", + "<9>": "* //", + "<10>": "* // 1) This resource record is designed to hold resource strings for OIWIN_", + "<11>": "* // procedures.", + "<12>": "* //", + "<13>": "* //", + "<14>": "* // Amended Date Reason", + "<15>": "* // ======= ==== ======", + "<16>": "* // Mr C 29 Jul 22 Added OIWIN_WEBPERMISSIONREQUEST", + "<17>": "* //", + "<18>": "///////////////////////////////////////////////////////////////////////////////", + "<19>": "//[OIWIN_RESULTROW resources]//////////////////////////////////////////////////", + "<20>": "", + "<21>": "ORR001: No form ID passed to the %1% procedure", + "<22>": "ORR002: Invalid form ID \"%1%\" passed to the %2% procedure", + "<23>": "", + "<24>": "///////////////////////////////////////////////////////////////////////////////", + "<25>": "//[OIWIN_RAISEFORMSTATECHANGED resources]//////////////////////////////////////", + "<26>": "", + "<27>": "RFS001: Invalid form ID \"%1%\" passed to the %2% procedure", + "<28>": "RFS002: Error locating \"%1%\" in the form common area in the %2% procedure", + "<29>": "", + "<30>": "///////////////////////////////////////////////////////////////////////////////", + "<31>": "//[OIWIN_DATABINDING resources]////////////////////////////////////////////////", + "<32>": "", + "<33>": "OBD001: No control ID passed to the %1% %2% method", + "<34>": "OBD002: Invalid control ID \"%1%\" passed to the %2% %3% method", + "<35>": "OBD100: The %1% control is not databound", + "<36>": "OBD101: Column %1% in the %2% control is not databound", + "<37>": "OBD102: Not databound", + "<38>": "OBD103: The %1% form is not databound", + "<39>": "ODB104: The %1% form is bound to the %2% table", + "<40>": "ODB105: The %1% form is bound to the following tables:|%2%|", + "<41>": "ODB106: Data Binding", + "<42>": "", + "<43>": "///////////////////////////////////////////////////////////////////////////////", + "<44>": "//[OIWIN_WEBPERMISSIONREQUEST resources]///////////////////////////////////////", + "<45>": "", + "<46>": "OWPR100: The following page is requesting permission to %1%||%2%||Do you wish to allow this?", + "<47>": "OWPR101: use your microphone", + "<48>": "OWPR102: use your camera", + "<49>": "OWPR103: use your current location", + "<50>": "OWPR104: send you notifications", + "<51>": "OWPR105: access a generic sensor device", + "<52>": "OWPR106: read the clipboard", + "<53>": "OWPR107: use an unknown resource", + "<54>": "OWPR108: Permission Request", + "<55>": "", + "<56>": "///////////////////////////////////////////////////////////////////////////////", + "<57>": "///////////////////////////////////////////////////////////////////////////////" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ARTI_RESOURCES.json b/SYSPROG/APPROW/SYSENV%003ARTI_RESOURCES.json new file mode 100644 index 0000000..17226aa --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ARTI_RESOURCES.json @@ -0,0 +1,1603 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_RESOURCES" + }, + "body": { + "record1": { + "<1>": "* //", + "<2>": "* // File : SYSENV - RTI_RESOURCES", + "<3>": "* // Author : Mr C", + "<4>": "* // Date : September 2012", + "<5>": "* // Purpose : \"RTI_\" procedure resource strings", + "<6>": "* //", + "<7>": "* // Comments", + "<8>": "* // ========", + "<9>": "* //", + "<10>": "* // This resource record is designed to hold resource strings for RTI_", + "<11>": "* // procedures.", + "<12>": "* //", + "<13>": "* // Amended Date Reason", + "<14>": "* // ======= ========= ======", + "<15>": "* // Mr C 12 Sep 23 Added FDS005, OIW026", + "<16>": "* // Mr C 10 Nov 22 Added RTI_IDE_ANALYZE_REVPROFILELOG strings", + "<17>": "* // bzs\t 28 Jul 22 Added AUTH1022", + "<18>": "* // rjc 26 May 22 Modified STP029 to display debug line nrs", + "<19>": "* // Mr C 19 Oct 21 Added TBL105/106", + "<20>": "* // Mr C 26 Jul 21 Added RTI_DSN_PROMOTED_EVENT_NEW section", + "<21>": "* // bzs\t 14 Jul 21 Added RTI_DSN_REST section", + "<22>": "* // Mr C 14 Apr 21 Added RTI_IDE_ALIAS_TABLE section", + "<23>": "* // Mr C 11 Mar 21 Added GOI003", + "<24>": "* // Mr C 05 Mar 21 Added IOP104", + "<25>": "* // BZS 30 Dec 20 Added APS111", + "<26>": "* // Mr C 03 Nov 20 Added RTI_DSN_CONTEXTMENU section", + "<27>": "* // Removed RTI_DSN_MENU section", + "<28>": "* // Added RTI_LOG_EVENT section", + "<29>": "* // BZS 19 Aug 20 Added RTI_DSN_REPTYPE, RTI_DSN_REPCLASS codes", + "<30>": "* // Mr C 31 Jul 20 Added RDK205", + "<31>": "* // Mr C 04 May 20 Added MDC and EDC codes", + "<32>": "* // Mr C 09 Dec 19 Added PGOCPxxx codes", + "<33>": "* // Mr C 04 Sep 19 Added IDE122", + "<34>": "* // Mr C 27 Jun 19 Added PGOHRH001", + "<35>": "* // Mr C 02 May 19 Added DSN031", + "<36>": "* // Mr C 19 Jan 19 Added EVT165, EVT166", + "<37>": "* // Mr C 06 Nov 18 Added CEV106, CEV107", + "<38>": "* // Mr C 06 Nov 18 Added CEV004, CEV005", + "<39>": "* // Mr C 01 Nov 18 Added CEV103", + "<40>": "* // Mr C 31 Oct 18 Added CEV100-105", + "<41>": "* // Mr C 20 Oct 18 Added CEV001, CEV002", + "<42>": "* // Mr C 19 Jul 18 Added TBL029, TBL030", + "<43>": "* // bzs\t 13 Jul 18 Added AUTH1021", + "<44>": "* // Mr C 21 Jun 18 Added TBL103, TBL104", + "<45>": "* // bzs 21 Jun 18 Added IDE121", + "<46>": "* // bzs 15 Jun 18 ", + "<47>": "* // Mr C 31 May 18 Added new EVT strings", + "<48>": "* // Mr C 10 May 18 Added new TBL strings.", + "<49>": "* // MTR 04 May 18 Happy Star Wars Day: added DSN120: (Changed)", + "<50>": "", + "<51>": "///////////////////////////////////////////////////////////////////////////////", + "<52>": "//[General Resource strings]///////////////////////////////////////////////////", + "<53>": "", + "<54>": "ERR001: No method passed to the %1% procedure", + "<55>": "ERR002: Invalid method \"%1%\" passed to the %2% procedure", + "<56>": "ERR003: The \"%1%\" method in the %2% procedure is deprecated", + "<57>": "ERR004: The \"%1%\" method in the %2% procedure is not implemented", + "<58>": "", + "<59>": "///////////////////////////////////////////////////////////////////////////////", + "<60>": "//[REPOS...DSNACCESS]//////////////////////////////////////////////////////////", + "<61>": "RDA001: \"%1%\" GIT <-> OI entity mismatch||Do you need to execute a pull operation from GIT to OI?||", + "<62>": "RDA100: Designer Access", + "<63>": "", + "<64>": "///////////////////////////////////////////////////////////////////////////////", + "<65>": "//[RTI_TOKENIZE resources]/////////////////////////////////////////////////////", + "<66>": "", + "<67>": "TOK01: The sentence contains an unbalanced set of quotes", + "<68>": "", + "<69>": "///////////////////////////////////////////////////////////////////////////////", + "<70>": "//[RTI_IDE_PARSE_TEXT_ARGS resources]//////////////////////////////////////////", + "<71>": "", + "<72>": "PAR01: The arguments contain an unbalanced set of brackets", + "<73>": "PAR02: The arguments contain an unbalanced set of quotes", + "<74>": "", + "<75>": "///////////////////////////////////////////////////////////////////////////////", + "<76>": "//[RTI_MKDIR]//////////////////////////////////////////////////////////////////", + "<77>": "", + "<78>": "MKD001: No directory name passed to the %1% procedure", + "<79>": "MKD002: Error creating directory \"%1%\" in the %2% procedure [%3%]", + "<80>": "", + "<81>": "///////////////////////////////////////////////////////////////////////////////", + "<82>": "//[RTI_CHDIR]//////////////////////////////////////////////////////////////////", + "<83>": "", + "<84>": "CHD001: Invalid directory name \"%1%\" passed to the %2% procedure", + "<85>": "CHD002: Error setting current directory [%1%] in the %2% procedure [%3%]", + "<86>": "", + "<87>": "///////////////////////////////////////////////////////////////////////////////", + "<88>": "//[RTI_REGISTRY resources]/////////////////////////////////////////////////////", + "<89>": " ", + "<90>": "REGX001: No method has been passed to the %1% procedure", + "<91>": "REGX002: Illegal method %1% passed to the %2% procedure", + "<92>": "REGX003: No path and key passed to the %1% method in the %2% procedure", + "<93>": "REGX004: Invalid root key %1% passed to the %2% method in the %3% procedure", + "<94>": "REGX005: No Value ID passed to the %1% method in the %2% procedure", + "<95>": "", + "<96>": "///////////////////////////////////////////////////////////////////////////////", + "<97>": "//[RTI_GET_PROC_INFO resources]/////////////////////////////////////////////////", + "<98>": "", + "<99>": "GPI001: No Proc ID passed to the %1% procedure", + "<100>": "GPI002: Invalid Proc ID \"%1%\" passed to the %2% procedure [%3%]", + "<101>": "GPI003: The \"%1%\" procedure does not support the minimum parameter count of \"%2%\"", + "<102>": "", + "<103>": "///////////////////////////////////////////////////////////////////////////////", + "<104>": "//[RTI_GET_OLE_INFO resources]/////////////////////////////////////////////////", + "<105>": "", + "<106>": "GOI001: No OLE ID passed to the %1% procedure", + "<107>": "GOI002: Invalid OLE ID [%1%] passed to the %2% procedure [%3%]", + "<108>": "GOI003: Invalid CLSID [%1%] passed to the %2% procedure [%3%]", + "<109>": "", + "<110>": "///////////////////////////////////////////////////////////////////////////////", + "<111>": "//[RTI_CFG_C2OE_MAP]///////////////////////////////////////////////////////////", + "<112>": "", + "<113>": "C2OE000: C-To-OE DataType mapping record", + "<114>": "C2OE001: The C To OE Data-type record is locked by another process.||Changes will not be allowed", + "<115>": "C2OE002: Error reading the C To OE Data-type record (%1%) in the %2% %3% method [%4%]", + "<116>": "C2OE003: ", + "<117>": "C2OE004: Error writing the C To OE Data-type record (%1%) in the %2% %3% method [%4%]", + "<118>": "C2OE005: Missing OE type for the \"%1%\" C type on line %2%", + "<119>": "C2OE006: Missing C type for the \"%1%\" OE type on line %2%", + "<120>": "C2OE100: This record is used by the MakeDLLPtr to map common Windows \"C\" datatypes to one of the core OE data types.", + "<121>": "", + "<122>": "///////////////////////////////////////////////////////////////////////////////", + "<123>": "//[RTI_SELECT_REPOS_ENTITIES]//////////////////////////////////////////////////", + "<124>": "", + "<125>": "SRE001: \"%1%\" is not a valid command", + "<126>": "", + "<127>": "///////////////////////////////////////////////////////////////////////////////", + "<128>": "//[RTI_LOG_EVENT]//////////////////////////////////////////////////////////////", + "<129>": "", + "<130>": "LEV001: Invalid event type \"%1%\" passed to the %2% procedure", + "<131>": "LEV002: Invalid event ID \"%1%\" passed to the %2% procedure", + "<132>": "", + "<133>": "///////////////////////////////////////////////////////////////////////////////", + "<134>": "//[RTI_IDE]////////////////////////////////////////////////////////////////////", + "<135>": "", + "<136>": "IDE001: Error adding DSN ID \"%1%\" to the IDE tab bar \"%2%\" in the %3% %4% method", + "<137>": "IDE002: No DSN Template ID passed to the %1% message in the %2% %3% method", + "<138>": "IDE003: Invalid DSN ID \"%1%\" passed to the %2% message in the %3% %4% method", + "<139>": "IDE004: Error removing DSN ID \"%1%\" from the IDE tab bar \"%2%\" in the %3% %4% method", + "<140>": "IDE005: Null DSN ID passed to the %1% message in the %2% %3% method", + "<141>": "IDE006: Null ToolPanel ID passed to the %1% message in the %2% %3% method", + "<142>": "IDE007: No ToolPanel Template ID passed to the %1% message in the %2% %3% method", + "<143>": "IDE008: Invalid ToolPanel ID \"%1%\" passed to the %2% message in the %3% %4% method", + "<144>": "IDE009: Error adding ToolPanel ID \"%1%\" to the View tab bar \"%2%\" in the %3% %4% method", + "<145>": "IDE010: Error removing ToolPanel ID \"%1%\" from the View tab bar \"%2%\" in the %3% %4% method", + "<146>": "IDE011: Null PPL Client ID passed to the %1% message in the %2% %3% method", + "<147>": "IDE012: Null PPL Category passed to the %1% message in the %2% %3% method", + "<148>": "IDE013: Null property name passed to the %1% message in the %2% %3% method", + "<149>": "IDE014: Invalid PPL Client ID \"%1%\" passed to the %2% message in the %3% %4% method", + "<150>": "IDE015: No Dialog ID returned from the %1% client in the %2% message in the %3% %4% method", + "<151>": "IDE016: Error removing Designer ID \"%1%\" from the View tab bar \"%2%\" in the %3% %4% method", + "<152>": "IDE017: Error adding Designer ID \"%1%\" to the View tab bar \"%2%\" in the %3% %4% method", + "<153>": "IDE018: Invalid Designer ID \"%1%\" passed to the %2% message in the %3% %4% method", + "<154>": "IDE019: Open DSN Error", + "<155>": "IDE020: TCL ID is not defined", + "<156>": "IDE021: Error adding TCL toolbar band", + "<157>": "IDE022: Error locating VPL for the \"%1%\" DSN in the %2% %3% method", + "<158>": "IDE023: Invalid range \"%1%\" passed to the STA_SETGAUGE handler in the %2% %3% method", + "<159>": "IDE024: No Popup details returned from the %1% client in the %2% message in the %3% %4% method", + "<160>": "IDE025: Invalid IDE ID \"%1%\" passed to the %2% procedure ", + "<161>": "IDE026: No entity ID passed to the %1% %2% method", + "<162>": "IDE027: Unable to launch Login dialog", + "<163>": "IDE028: TCP Port \"%1%\" is already in use. The IDE HTTP Server cannot be started", + "<164>": "IDE029: The IDE HTTP Server failed to find a free port number and cannot be started", + "<165>": "IDE030: The IDE HTTP Server failed to start in a timely manner on port \"%1%\"", + "<166>": "IDE031: The IDE HTTP Server failed to stop in a timely manner on port \"%1%\"", + "<167>": "IDE101: Executing %1% ...", + "<168>": "IDE102: Executed %1% ... OK", + "<169>": "IDE103: Executed %1% ... Failed [%2%]", + "<170>": "IDE104: Please select the folder containing the RDK module you wish to install", + "<171>": "IDE105: The installation is complete. Do you wish to view the log file?", + "<172>": "IDE106: Install RDK Module", + "<173>": "IDE107: Rebuild Repository Indexes", + "<174>": "IDE108: This operation may be lengthy.|Continue?", + "<175>": "IDE109: No application entry point has been defined", + "<176>": "IDE110: Launch Application", + "<177>": "IDE111: Are you sure you wish to reset the Entity History Log?", + "<178>": "IDE112: Reset Entity History Log", + "<179>": "IDE113: Resetting (%p% complete)", + "<180>": "IDE114: Entity History Log has been Reset", + "<181>": "IDE115: Deleting", + "<182>": "IDE116: Deleted %1% items", + "<183>": "IDE117: Entity history log has been reset", + "<184>": "IDE118: No items to save", + "<185>": "IDE119: 1 item saved", + "<186>": "IDE120: %1% items saved", + "<187>": "IDE121: Entity %1% is locked by another session. It will not be restored.", + "<188>": "IDE122: Entity %1% referenced an invalid handler [%2%] and cannot be restored.", + "<189>": "IDE123: Entity %1% does not exist and cannot be restored", + "<190>": "", + "<191>": "", + "<192>": "///////////////////////////////////////////////////////////////////////////////", + "<193>": "//[RTI_IDE_BOOTLOADER]/////////////////////////////////////////////////////////", + "<194>": "", + "<195>": "IBL001: Unable to start the IDE window [%1%]", + "<196>": "", + "<197>": "///////////////////////////////////////////////////////////////////////////////", + "<198>": "//[RTI_IDE_BDC]////////////////////////////////////////////////////////////////", + "<199>": "BDC001: No Message ID passed to the %1% %2% method", + "<200>": "BDC002: No Client ID passed to the %1% %2% method", + "<201>": "BDC003: The IDE broadcast manager has not been started in the %1% %2% method", + "<202>": "", + "<203>": "///////////////////////////////////////////////////////////////////////////////", + "<204>": "//[RTI_IDE_APP_SETTINGS]///////////////////////////////////////////////////////", + "<205>": "", + "<206>": "APS001: The SYSPROG application cannot be deleted", + "<207>": "APS002: Only System Administrators may delete this application", + "<208>": "APS100: Delete Application", + "<209>": "APS101: Are you sure you wish to delete the %1% application?", + "<210>": "APS102: The inherited application %1% will now inherit from %2%", + "<211>": "APS103: The following inherited applications will now inherit from %1%", + "<212>": "APS104: This action cannot be undone!", + "<213>": "APS105: Would you like to save changes to the Application Settings?", + "<214>": "APS106: Unsaved changes", + "<215>": "APS107: The repository will be synchronized with the database columns||This could be a lengthy operation, are you sure you wish to continue?|", + "<216>": "APS108: OpenInsight must be restarted for the UTF8 changes to be applied to the application", + "<217>": "APS109: - ", + "<218>": "APS110: Users", + "<219>": "APS111: The associated AREV64 application and user records will also be deleted", + "<220>": "", + "<221>": "///////////////////////////////////////////////////////////////////////////////", + "<222>": "//[RTI_IDE_CFG]////////////////////////////////////////////////////////////////", + "<223>": "", + "<224>": "ICFG01: Invalid IDE instance index \"%1%\" passed to the %2% %3% method", + "<225>": "ICFG02: Invalid ColorSet index \"%1%\" passed to the %2% %3% method", + "<226>": "ICFG03: No DSN ID passed to the %1% %2% method", + "<227>": "ICFG04: No DSN Entity ID passed to the %1% %2% method", + "<228>": "ICFG05: Error flushing MRU list to disk in the %1% %2% method [%3%]", + "<229>": "ICFG06: Invalid DSN ID passed to the %1% %2% method", + "<230>": "ICFG07: Invalid DSN Entity ID passed to the %1% %2% method", + "<231>": "ICFG08: Invalid \"%1%\" value passed to the %2% %3% method (contains system delimiters)", + "<232>": "ICFG09: \"%1% is not a valid IDE type %2% common dialog [%3%]", + "<233>": "ICFG10: Invalid \"%1%\" IDE common dialog type value passed to the %2% %3% method", + "<234>": "ICFG11: Invalid value ID \"%1%\" passed to the %2% %3% method", + "<235>": "", + "<236>": "///////////////////////////////////////////////////////////////////////////////", + "<237>": "//[RTI_IDE_NEW]///////////////////////////////////////////////////////////////", + "<238>": "", + "<239>": "INW001: The %1% family has no APPNOTE defined for used with the \"New Entity\" dialog", + "<240>": "INW002: The %1% type has no APPNOTE defined for used with the \"New Entity\" dialog", + "<241>": "INW100: There are no %1% that can be created", + "<242>": "", + "<243>": "///////////////////////////////////////////////////////////////////////////////", + "<244>": "//[RTI_IDE_OPEN]///////////////////////////////////////////////////////////////", + "<245>": "", + "<246>": "IOP001: Invalid Type ID \"%1%\" passed to the %2% %3% method", + "<247>": "IOP002: Invalid Class ID \"%1%\" passed to the %2% %3% method", + "<248>": "IOP003: No Class ID passed to the %1% %2% method", + "<249>": "IOP004: No Type ID passed to the %1% %2% method", + "<250>": "IOP101: Open Entity", + "<251>": "IOP102: Save Entity", + "<252>": "IOP103: No %1% entities found", + "<253>": "IOP104: This entity already exists in a parent application. Are you sure you wish to overwrite it?", + "<254>": "", + "<255>": "///////////////////////////////////////////////////////////////////////////////", + "<256>": "//[RTI_IDE_OPEN_RECORD] ///////////////////////////////////////////////////////", + "<257>": "", + "<258>": "IOR001: You must specify a valid record", + "<259>": "IOR002: You must specify a valid table name first", + "<260>": "IOR003: \"%1%\" is not a valid table name", + "<261>": "IOR004: The table name must match the selected table (%1%)", + "<262>": "IOR101: Open Record", + "<263>": "IOR102: Save Record", + "<264>": "IOR103: No records found", + "<265>": "IOR104: %1% (Loading Records %2%%)", + "<266>": "IOR105: Loading Records %p%", + "<267>": "IOR106: Loading Records...", + "<268>": "IOR107: There are no records to display", + "<269>": "IOR108: Please enter a SELECT statement:", + "<270>": "IOR109: There are no matching records to display", + "<271>": "IOR110: - ", + "<272>": "IOR111: Loading %1% record keys may cause extremely slow performance.|Are you sure you want to continue?", + "<273>": "", + "<274>": "///////////////////////////////////////////////////////////////////////////////", + "<275>": "//[RTI_IDE_SELECT_REPOS] ///////////////////////////////////////////////////////", + "<276>": "", + "<277>": "ISR001: ", + "<278>": "ISR002: ", + "<279>": "ISR003: ", + "<280>": "ISR004: ", + "<281>": "ISR100: Show Inherited Entities", + "<282>": "ISR101: Show Publishable Entities Only", + "<283>": "ISR102: Show Evaluate-Flagged Entites Only", + "<284>": "ISR103: Show Repos-Locked Entities Only", + "<285>": "ISR104: Show Recompile-Flagged Entities Only", + "<286>": "ISR105: Choose 'Updated By' Users", + "<287>": "ISR106: %1% Users", + "<288>": "ISR107: Filter %1% saved", + "<289>": "ISR108: No matching entities found", + "<290>": "", + "<291>": "///////////////////////////////////////////////////////////////////////////////", + "<292>": "//[RTI_DSN_]//////////////////////////////////////////////////////////", + "<293>": "", + "<294>": "DSN001: %1% entities do not support the %2% method", + "<295>": "DSN002: Error opening the %1% table in the %2% %3% method [%4%]", + "<296>": "DSN003: The \"%1%\" entity is locked by another process||Changes cannot be saved|", + "<297>": "DSN004: The \"%1%\" entity is locked by another process and cannot be saved [%2%]", + "<298>": "DSN005: Error unlocking the previous \"%1%\" entity in the %2% %3% method [%4%]", + "<299>": "DSN006: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<300>": "DSN007: Error reacquiring repository lock in the %1% %2% method [%3%]", + "<301>": "DSN008: The \"%1%\" entity has been inherited from another application.|Changes will be saved to a new copy in this application.", + "<302>": "DSN009: No entity ID passed to the %1% %2% method", + "<303>": "DSN016: Entity Locked", + "<304>": "DSN017: You have unsaved changes - are you sure you wish to exit?", + "<305>": "DSN018: Unsaved changes", + "<306>": "DSN019: %1% entities do not support a %2% method", + "<307>": "DSN020: %1% entities do not support a %2% notification", + "<308>": "DSN021: Unsaved changes", + "<309>": "DSN023: Delete %1%", + "<310>": "DSN024: Are you sure you wish to delete this entity?", + "<311>": "DSN025: Inherited Entity", + "<312>": "DSN026: Save %1% before closing?", + "<313>": "DSN027: Error reading the \"%1%\" SYSREPOS record in the %2% %3% method [%4%]", + "<314>": "DSN028: The \"%1%\" entity is locked by another process||Changes will not be allowed|", + "<315>": "DSN029: Do you want to save your changes?", + "<316>": "DSN030: Do you want to save your changes to %1%?", + "<317>": "DSN031: Error accessing the \"%1%\" entity in the %2% %3% method [%4%]", + "<318>": "DSN100: ", + "<319>": "DSN101: ", + "<320>": "DSN102: Saving %1% ...", + "<321>": "DSN103: Saving %1% ... OK", + "<322>": "DSN104: Saving %1% ... OK (%2% chars written)", + "<323>": "DSN105: Saving %1% ... Failed!", + "<324>": "DSN106: Entity Properties", + "<325>": "DSN107: Select File", + "<326>": "DSN108: There are no entities to display", + "<327>": "DSN109: App", + "<328>": "DSN110: Type", + "<329>": "DSN111: Class", + "<330>": "DSN112: Entity", + "<331>": "DSN113: Updated", + "<332>": "DSN114: Operation", + "<333>": "DSN115: Updated By", + "<334>": "DSN116: Description", + "<335>": "DSN117: There is no history to display", + "<336>": "DSN118: There are no documents to display", + "<337>": "DSN119: Select Record", + "<338>": "DSN120: (Changed)", + "<339>": "DSN121: Save %1% Entity", + "<340>": "DSN122: %1% Properties", + "<341>": "", + "<342>": "///////////////////////////////////////////////////////////////////////////////", + "<343>": "//[RTI_IDE_TPL_PROPERTY_PANEL]/////////////////////////////////////////////////", + "<344>": "", + "<345>": "PPL001: No Client ID passed to the %1% message in the %2% %3% method", + "<346>": "PPL002: No Category passed to the %1% message in the %2% %3% method", + "<347>": "PPL003: No property name passed to the %1% message in the %2% %3% method", + "<348>": "PPL004: Client ID mismatch for the %1% message in the %2% %3% method", + "<349>": "PPL005: Property grid template missing from ControlMap@ in the %1% %2% method", + "<350>": "PPL006: Error creating property grid \"%1%\" in the %2% %3% method", + "<351>": "PPL007: Duplicate Category \"%1%\" passed to the %2% message in the %3% %4% method", + "<352>": "PPL100: No Items", + "<353>": "PPL101: %1% options error", + "<354>": "PPL102: There are no property items to display", + "<355>": "", + "<356>": "///////////////////////////////////////////////////////////////////////////////", + "<357>": "//[RTI_IDE_TPL_DATABASE]///////////////////////////////////////////////////////", + "<358>": "", + "<359>": "DPL001: Error accessing DB Types IMAGELIST entity %1% in the %2% %3% method [%4%]", + "<360>": "DPL002: The %1% table has no dictionary table attached", + "<361>": "DPL100: Open Table", + "<362>": "DPL101: Clear Table", + "<363>": "DPL102: Are you sure you want to clear the %1% table?||This action cannot be undone", + "<364>": "DPL103: The %1% table has been cleared", + "<365>": "", + "<366>": "///////////////////////////////////////////////////////////////////////////////", + "<367>": "//[RTI_IDE_TPL_OUTPUT]/////////////////////////////////////////////////////////", + "<368>": "", + "<369>": "OPL001: Error accessing Message Types IMAGELIST entity %1% in the %2% %3% method [%4%]", + "<370>": "OPL100: Channel Locked", + "<371>": "OPL101: Channels Unlocked", + "<372>": "OPL102: |You have unread messages in the following channels: ||%1%| ", + "<373>": "OPL103: Unread messages", + "<374>": "OPL104: Clear Messages", + "<375>": "", + "<376>": "///////////////////////////////////////////////////////////////////////////////", + "<377>": "//[RTI_IDE_TPL_FAVOURITES]/////////////////////////////////////////////////////", + "<378>": "", + "<379>": "FPL001: No favorites defined", + "<380>": "FPL002: No recent items", + "<381>": "FPL003: No update history found", + "<382>": "FPL004: No evaluated entities found", + "<383>": "", + "<384>": "///////////////////////////////////////////////////////////////////////////////", + "<385>": "//[RTI_IDE_PGO_]//////////////////////////////////////////////////////", + "<386>": "", + "<387>": "PGO001: Invalid property grid ID \"%1%\" passed to the %2% %3% method", + "<388>": "PGO002: No property name passed to the %1% %2% method", + "<389>": "PGO003: Unable to access item coordinates for the \"%1%\" property grid in the %2% %3% method", + "<390>": "", + "<391>": "///////////////////////////////////////////////////////////////////////////////", + "<392>": "//[RTI_IDE_PGO_CUSTOMPROPERTIES]///////////////////////////////////////////////", + "<393>": "", + "<394>": "PGOCP001: A Property Value must have a Name", + "<395>": "PGOCP100: Invalid Property Value ", + "<396>": "PGOCP101: Missing Property Name", + "<397>": "", + "<398>": "///////////////////////////////////////////////////////////////////////////////", + "<399>": "//[RTI_IDE_PGO_IMAGE]//////////////////////////////////////////////////////////", + "<400>": "", + "<401>": "PGOI001: Error opening the %1% table in the %2% %3% method [%4%]", + "<402>": "PGOI002: Invalid repository TYPE \"%1%\" passed to the %2% %3% method", + "<403>": "PGOI003: Invalid property name \"%1%\" passed to the %2% %3% method", + "<404>": "PGOI004: Error locating type information for the \"%1%\" property in the %2% %3% method", + "<405>": "PGOI100: Image Properties", + "<406>": "PGOI101: The Translucency property must be a an integer between 0 and 100 inclusive", + "<407>": "PGOI102: The Count property must be an integer between 1 and 256 inclusive", + "<408>": "PGOI103: The Origin property must be a pair of integer coordinates between 32767 and -32768 inclusive", + "<409>": "PGOI104: The Offset property must be a pair of integer coordinates between 32767 and -32768 inclusive", + "<410>": "PGOI105: There are no properties for this image type", + "<411>": "", + "<412>": "///////////////////////////////////////////////////////////////////////////////", + "<413>": "//[RTI_IDE_PGO_RANGE]//////////////////////////////////////////////////////////", + "<414>": "", + "<415>": "PGORG001: The minimum \"From\" value must be less than the maximum \"To\" value", + "<416>": "PGORG002: The minimum \"From\" value must be less than or equal to the maximum \"To\" value", + "<417>": "PGORG003: The \"From\" value cannot be less than the minimum \"From\" value", + "<418>": "PGORG004: The \"To\" value cannot be greater than the maximum \"To\" value", + "<419>": "PGORG005: The Increment cannot be greater than the size of the range", + "<420>": "PGORG006: The \"%1%\" value must be between %2% and %3% inclusive", + "<421>": "", + "<422>": "///////////////////////////////////////////////////////////////////////////////", + "<423>": "//[RTI_IDE_PGO_DICTFORMULA]////////////////////////////////////////////////////", + "<424>": "", + "<425>": "PGOFM001: The following syntax errors have been detected:||%1%||", + "<426>": "PGOFM002: The syntax is correct", + "<427>": "PGOFM100: Formula Syntax Errors", + "<428>": "PGOFM101: Formula Syntax Check ", + "<429>": "", + "<430>": "///////////////////////////////////////////////////////////////////////////////", + "<431>": "//[RTI_IDE_PGO_XYPOS]//////////////////////////////////////////////////////////", + "<432>": "", + "<433>": "PGOXY001: The %1% value must be between %2% and %3% inclusive", + "<434>": "", + "<435>": "///////////////////////////////////////////////////////////////////////////////", + "<436>": "//[RTI_IDE_PGO_WH]/////////////////////////////////////////////////////////////", + "<437>": "", + "<438>": "PGOWH001: The %1% value must be between %2% and %3% inclusive", + "<439>": "", + "<440>": "///////////////////////////////////////////////////////////////////////////////", + "<441>": "//[RTI_IDE_PGO_SCALEFACTOR]////////////////////////////////////////////////////", + "<442>": "", + "<443>": "PGOSF001: The %1% value must be between %2% and %3% inclusive", + "<444>": "", + "<445>": "///////////////////////////////////////////////////////////////////////////////", + "<446>": "//[RTI_IDE_PGO_DEFINT]/////////////////////////////////////////////////////////", + "<447>": "", + "<448>": "PGODI001: No default value passed to the %1% %2% method", + "<449>": "PGODI002: The \"%1%\" value must be between %2% and %3% inclusive", + "<450>": "", + "<451>": "///////////////////////////////////////////////////////////////////////////////", + "<452>": "//[RTI_IDE_PGO_RADIOBUTTON]////////////////////////////////////////////////////", + "<453>": "", + "<454>": "PGORB001: Duplicate button labels are not allowed (\"%1%\") ", + "<455>": "PGORB002: Duplicate button values are not allowed (\"%1%\")", + "<456>": "PGORB003: You must define at least one button", + "<457>": "PGORB004: Buttons with null labels are not allowed", + "<458>": "", + "<459>": "///////////////////////////////////////////////////////////////////////////////", + "<460>": "//[RTI_IDE_ANALYZE_REVPROFILELOG]//////////////////////////////////////////////", + "<461>": "ARPL001: The \"%1%\" file is being analyzed.|Are you sure you wish to cancel this process?", + "<462>": "ARPL002: Please specify a log file name", + "<463>": "ARPL003: Please specify a valid log file name", + "<464>": "ARPL004: The log file is malformed on line %1%", + "<465>": "ARPL100: %1% items analyzed", + "<466>": "ARPL101: %1% item analyzed", + "<467>": "ARPL102: Parsing log file (%p%)", + "<468>": "ARPL103: Building call trace list (%p%)", + "<469>": "ARPL104: Loading call trace list ... please wait", + "<470>": "ARPL105: Loading stored procedure list (%p%)", + "<471>": "ARPL106: &Cancel", + "<472>": "ARPL107: No stored procedures loaded", + "<473>": "ARPL108: No stored procedure selected", + "<474>": "", + "<475>": "///////////////////////////////////////////////////////////////////////////////", + "<476>": "//[RTI_IDE_IDE_TCL]////////////////////////////////////////////////////////////", + "<477>": "", + "<478>": "TCL100: Enter command here", + "<479>": "", + "<480>": "///////////////////////////////////////////////////////////////////////////////", + "<481>": "// [RTI_IDE_ALIAS_TABLE]///////////////////////////////////////////////////////", + "<482>": "", + "<483>": "ALT001: \"%1%\" is not a valid data volume [%2%]", + "<484>": "ALT002: The \"%1%\" location does not contain any OpenInsight Tables||[%2%]|", + "<485>": "ALT100: Please select the location of the table to alias", + "<486>": "", + "<487>": "", + "<488>": "///////////////////////////////////////////////////////////////////////////////", + "<489>": "//[RTI_DSN_DLLPROTOTYPE]///////////////////////////////////////////////////////", + "<490>": "", + "<491>": "DP001: The DLL Prototype definition is locked by another process.||Changes will not be allowed", + "<492>": "DP002: Error reading the DLL Prototype definition (%1%) in the %2% %3% method [%4%]", + "<493>": "DP003: Missing function name from function definition (Line %1%)", + "<494>": "DP004: Missing return value type from then \"%1%\" function definition", + "<495>": "DP005: Missing parameter list from then \"%1%\" function definition", + "<496>": "DP006: Invalid parameter list in the \"%1%\" function definition", + "<497>": "DP007: Invalid return data type for the \"%1%\" function definition", + "<498>": "DP008: Invalid parameter type \"%1%\" for the \"%2%\" function definition", + "<499>": "DP009: The DLL Prototype definition is locked by another process.||Changes cannot be saved", + "<500>": "DP010: The DLL name is required", + "<501>": "DP011: \"%1%\" is not a valid DLL name", + "<502>": "DP012: \"%1%\" is not a valid data type", + "<503>": "DP013: Invalid Data Type", + "<504>": "DP014: Data Type", + "<505>": "DP015: Select Return Type", + "<506>": "DP016: Error reading the \"%1%\" DLL Prototype SYSREPOS record in the %2% %3% method [%4%]", + "<507>": "DP017: Saving %1% ...", + "<508>": "DP018: Saving %1% ... Failed!", + "<509>": "DP019: Saving %1% ... OK (%2% chars written)", + "<510>": "DP020: The \"%1%\" DLL Prototype entity is locked by another process and cannot be saved [%2%]", + "<511>": "DP021: Error unlocking the previous \"%1%\" Dll Prototype entity in the %2% %3% method [%4%]", + "<512>": "DP022: This DLL Prototype definition has been inherited from another application.|Changes will be saved to a new copy in this application", + "<513>": "DP100: There are no functions defined", + "<514>": "DP101: Save DLL Prototype Entity", + "<515>": "DP107: DLL Prototype Properties", + "<516>": "", + "<517>": "///////////////////////////////////////////////////////////////////////////////", + "<518>": "//[RTI_DSN_DLLSTRUCT]/////////////////////////////////////////////////////////", + "<519>": "", + "<520>": "DS001: The DLL Struct definition is locked by another process.||Changes will not be allowed", + "<521>": "DS002: Error reading the DLL Struct definition (%1%) in the %2% %3% method [%4%]", + "<522>": "DS009: The DLL Structure definition is locked by another process.||Changes cannot be saved", + "<523>": "DS012: \"%1%\" is not a valid data type", + "<524>": "DS013: Invalid Data Type", + "<525>": "DS016: Error reading the \"%1%\" DLL Struct SYSREPOS record in the %2% %3% method [%4%]", + "<526>": "DS018: Saving %1% ... Failed!", + "<527>": "DS019: Saving %1% ... OK (%2% chars written)", + "<528>": "DS020: The \"%1%\" DLL Struct entity is locked by another process and cannot be saved [%2%]", + "<529>": "DS022: This DLL Struct definition has been inherited from another application.|Changes will be saved to a new copy in this application", + "<530>": "DS030: The OI structure member type is required for the \"%1%\" member", + "<531>": "DS031: \"%1%\" is not a valid OI structure member type", + "<532>": "DS032: Length is required for a \"%1%\" OI structure member type", + "<533>": "DS101: Save DLL Struct Entity", + "<534>": "DS107: DLL Struct Properties", + "<535>": "", + "<536>": "///////////////////////////////////////////////////////////////////////////////", + "<537>": "//[RTI_DSN_IMGRESDLL]//////////////////////////////////////////////////////////", + "<538>": "", + "<539>": "IRD001: The Image Resource DLL definition is locked by another process.||Changes will not be allowed| ", + "<540>": "IRD002: Error reading the Image Resource DLL definition (%1%) in the %2% %3% method [%4%]", + "<541>": "IRD003: The Image Resource DLL entity ID contains invalid characters (%1%)", + "<542>": "IRD004: The Image Resource DLL entity description is required", + "<543>": "IRD005: The Source Image is required", + "<544>": "IRD006: The Resource ID for \"%1%\" is required", + "<545>": "IRD007: The Resource Type for \"%1%\" is required", + "<546>": "IRD008: \"%1%\" is not a valid version number ", + "<547>": "IRD009: The Image Resource DLL definition is locked by another process.||Changes cannot be saved", + "<548>": "IRD010: The DLL File is required", + "<549>": "IRD011: The DLL Entity ID is required", + "<550>": "IRD100: DLL files (*.dll)/*.dll/All files/*.*/", + "<551>": "", + "<552>": "///////////////////////////////////////////////////////////////////////////////", + "<553>": "//[RTI_DSN_CONTEXTMENU]////////////////////////////////////////////////////////", + "<554>": "", + "<555>": "CMN001: No Context Menu ID passed to the %1% %2% method", + "<556>": "CMN100: This menu has been automatically converted from an|older definition type and should be saved for the|changes to be applied", + "<557>": "CMN101: Context Menu converted", + "<558>": "", + "<559>": "///////////////////////////////////////////////////////////////////////////////", + "<560>": "//[RTI_IDE_OLEVIEW_CONTROLS]///////////////////////////////////////////////////", + "<561>": "", + "<562>": "IOVC001: Please wait - Loading OLE Controls ...", + "<563>": "", + "<564>": "///////////////////////////////////////////////////////////////////////////////", + "<565>": "//[RTI_DSN_OLECONTROL]/////////////////////////////////////////////////////////", + "<566>": "", + "<567>": "OC001: The OLE Control registration record is locked by another process.||Changes will not be allowed|", + "<568>": "OC002: Error reading the OLE Control registration record (%1%) in the %2% %3% method [%4%]", + "<569>": "OC003: The CLSID is required", + "<570>": "OC004: A DEFPROP Property or a DEFPROP Handler must be specified", + "<571>": "OC005: \"%1%\" is not a valid DEFPROP Handler procedure", + "<572>": "OC006: \"%1%\" is not a valid CLSID", + "<573>": "OC007: The OLE Control registration record is locked by another process.||Changes cannot be saved", + "<574>": "OC008: \"%1%\" is not a valid DEFPROP Property", + "<575>": "OC009: There are no valid handler procs defined", + "<576>": "OC010: Please specify a CLSID first", + "<577>": "OC011: This control has no OLE properties that can be used with the OI \"%1%\" property", + "<578>": "OC012: \"%1%\" is not a valid DEFPOSPROP Handler procedure", + "<579>": "OC013: You must specify a DEFPROPPOS property or handler", + "<580>": "OC014: You must specify a DEFPROP property or handler to set a Multi-Column control and semantics", + "<581>": "OC015: This control has no OLE events that can be used with the OI \"%1%\" event", + "<582>": "OC100: Please enter the entity name of this OLE Control registration record:", + "<583>": "OC101: Select %1% Handler", + "<584>": "OC102: Stored Procedure Name", + "<585>": "OC103: Select Property", + "<586>": "OC104: Property Name", + "<587>": "OC105: Select Event", + "<588>": "OC106: Event Name", + "<589>": "", + "<590>": "///////////////////////////////////////////////////////////////////////////////", + "<591>": "//[RTI_DSN_START]//////////////////////////////////////////////////////////////", + "<592>": "", + "<593>": "STA001: Error reading Start Page HTML content in the %1% %2% method [%3%]", + "<594>": "STA002: Error reading Start Page CSS content in the %1% %2% method [%3%]", + "<595>": "STA003: Error reading Start Page JS content in the %1% %2% method [%3%]", + "<596>": "STA004: Error accessing Start Page Image \"%1%\" in the %2% %3% method [%4%]", + "<597>": "", + "<598>": "///////////////////////////////////////////////////////////////////////////////", + "<599>": "//[APPNOTE]////////////////////////////////////////////////////////////////////", + "<600>": "", + "<601>": "APN1000: No APPNOTE structure passed to the %1% %2% method", + "<602>": "", + "<603>": "///////////////////////////////////////////////////////////////////////////////", + "<604>": "//[RTI_DSN_APPNOTE]////////////////////////////////////////////////////////////", + "<605>": "", + "<606>": "APN001: The \"%1%\" QuickHelp entity is locked by another process||Changes will not be allowed|", + "<607>": "APN002: Error reading the \"%1%\" QuickHelp entity in the %2% %3% method [%4%]", + "<608>": "APN003: Error reading the \"%1%\" QuickHelp HTML content in the %2% %3% method [%4%]", + "<609>": "APN004: Error reading the \"%1%\" QuickHelp Editor HTML content in the %2% %3% method [%4%]", + "<610>": "APN005: Error reading the \"%1%\" QuickHelp Editor JS content in the %2% %3% method [%4%]", + "<611>": "APN006: Error reading the \"%1%\" QuickHelp Editor button images in the %2% %3% method [%4%]", + "<612>": "APN007: Invalid QuickHelp Editor button image file \"%1%\" specified in the %2% %3% method", + "<613>": "APN008: The QuickHelp entity is locked by another process.||Changes cannot be saved", + "<614>": "APN009: Error reading the \"%1%\" QuickHelp SYSREPOS record in the %2% %3% method [%4%]", + "<615>": "APN010: Null ID passed to the %1% message in the %2% %3% method", + "<616>": "APN011: The \"%1%\" QuickHelp entity is locked by another process and cannot be saved [%2%]", + "<617>": "APN012: Error unlocking the previous \"%1%\" QuickHelp entity in the %2% %3% method [%4%]", + "<618>": "APN013: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<619>": "APN014: QuickHelp Messages do not support a COMPILE operation", + "<620>": "APN015: The \"%1%\" QuickHelp Message has been inherited from another application.|Changes will be saved to a new copy in this application", + "<621>": "APN020: Saving %1% ", + "<622>": "APN021: Saving %1% ... OK (%2% chars written)", + "<623>": "APN022: Saving %1% ... Failed!", + "<624>": "APN030: Please enter a full URL for the hyperlink", + "<625>": "APN031: Link URL is Required", + "<626>": "APN040: Please enter a full URL for the image", + "<627>": "APN041: Image URL is Required", + "<628>": "APN100: Please enter the entity name of this QuickHelp entity:", + "<629>": "APN101: The \"%1%\" QuickHelp entity already exists. Do you wish to overwrite it?", + "<630>": "APN102: Entity Locked", + "<631>": "APN103: QuickHelp Messages", + "<632>": "APN104: QuickHelp &Name", + "<633>": "APN105: Save QuickHelp Message", + "<634>": "APN106: Please specify a name for the QuickHelp Message", + "<635>": "APN107: QuickHelp Properties", + "<636>": "APN108: Warning", + "<637>": "APN109: Save QuickHelp Entity", + "<638>": "APN200: The \"%1%\" property must be an integer coordinate between -2 and 32767 inclusive", + "<639>": "APN201: The \"Width\" property must be an integer value between 200 and 32767 inclusive", + "<640>": "APN202: The \"Height\" property must be an integer value between 160 and 32767 inclusive", + "<641>": "", + "<642>": "///////////////////////////////////////////////////////////////////////////////", + "<643>": "//[RTI_DSN_REPVIEW]/////////////////////////////////////////////////////////////", + "<644>": "", + "<645>": "RDK001: The \"%1%\" Repository View entity is locked by another process||Changes will not be allowed|", + "<646>": "RDK002: Error reading the \"%1%\" RepView entity in the %2% %3% method [%4%]", + "<647>": "RDK020: Saving %1% ", + "<648>": "RDK021: Saving %1% ... OK (%2% chars written)", + "<649>": "RDK022: Saving %1% ... Failed!", + "<650>": "RDK100: Please enter the entity name of this Repository View entity:", + "<651>": "RDK101: The \"%1%\" Repository View entity already exists. Do you wish to overwrite it?", + "<652>": "RDK102: Entity Locked", + "<653>": "RDK103: Repository View ", + "<654>": "RDK104: Repository View &Name", + "<655>": "RDK105: Save Repository View ", + "<656>": "RDK106: Please specify a name for the Repository View ", + "<657>": "RDK107: Repository View Properties", + "<658>": "RDK108: Warning", + "<659>": "RDK203: Deployment Definition", + "<660>": "RDK204: Item Name", + "<661>": "RDK205: Save Deployment Definition", + "<662>": "RDK257: Extraction Path", + "<663>": "RDK258: Deploy,Do Not Deploy,Deploy Empty", + "<664>": "RDK261: Extraction Progress, Repository Creation, Database Extraction, Entity Extraction, Prepare Application", + "<665>": "RDK262: The specified directory does not exist. Create directory now?", + "<666>": "RDK263: Initializing Repository Tables...", + "<667>": "RDK264: Creating Repository Table: %1%", + "<668>": "RDK265: Copying Repository Table: %1%", + "<669>": "RDK266: Copying System Rows Into: %1%", + "<670>": "RDK267: Build Target Repository Index...", + "<671>": "RDK268: Continue current extraction from failure point?", + "<672>": "RDK269: Extraction succeeded!", + "<673>": "RDK270: Creating Database Table: %1%", + "<674>": "RDK271: Copying Database Table: %1%", + "<675>": "RDK272: Loading View: %1%", + "<676>": "RDK273: Extracting: %1%", + "<677>": "RDK274: Preparing Entity Storage...", + "<678>": "RDK275: The specified directory contains data and cannot be written to.", + "<679>": "RDK276: Delete files created by extraction process?", + "<680>": "RDK277: Options", + "<681>": "RDK278: ", + "<682>": "RDK279: ", + "<683>": "RDK280: ", + "<684>": "RDK281: Untitled", + "<685>": "RDK282: Create Repository,Extract Database,Extract Entities,Prepare Application", + "<686>": "RDK283: Full Deployment,Application Deployment,Application Upgrade", + "<687>": "RDK297: Create Alias,Do Not Create", + "<688>": "", + "<689>": "///////////////////////////////////////////////////////////////////////////////", + "<690>": "//[RTI_DSN_STPROC]/////////////////////////////////////////////////////////////", + "<691>": "", + "<692>": "STP001: The \"%1%\" Stored Procedure is locked by another process||Changes will not be allowed|", + "<693>": "STP002: Error reading the \"%1%\" Stored Procedure in the %2% %3% method [%4%]", + "<694>": "STP003: Null ID passed to the %1% message in the %2% %3% method", + "<695>": "STP004: The \"%1%\" Stored Procedure has been inherited from another application.|Changes will be saved to a new copy in this application", + "<696>": "STP008: The Stored Procedure is locked by another process.||Changes cannot be saved", + "<697>": "STP009: Error reading the \"%1%\" Stored Procedure SYSREPOS record in the %2% %3% method [%4%]", + "<698>": "STP010: The Stored Procedure is locked by another process.||Compilation is not allowed", + "<699>": "STP011: The \"%1%\" Stored Procedure is locked by another process and cannot be saved [%2%]", + "<700>": "STP012: Error unlocking the previous \"%1%\" Stored Procedure in the %2% %3% method [%4%]", + "<701>": "STP013: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<702>": "STP014: Stored Procedures do not support a TESTRUN operation", + "<703>": "STP015: Compilation Successful! (Time elapsed: %1% seconds at %2%)", + "<704>": "STP016: Compilation Failed!", + "<705>": "STP017: Compiling %1% ...", + "<706>": "STP018: Scanning %1% for VNAVs ...", + "<707>": "STP019: Scanning %1% for VNAVs ... OK (Time elapsed: %2% seconds)", + "<708>": "STP020: Saving %1% ...", + "<709>": "STP021: Saving %1% ... OK (%2% chars written)", + "<710>": "STP022: Saving %1% ... Failed!", + "<711>": "STP023: Possible unassigned variable \"%1%\" on line %2%", + "<712>": "STP024: Possible unassigned variable \"%1%\" on lines %2%", + "<713>": "STP025: Possible unassigned variable \"%1%\"", + "<714>": "STP026: Compiled object code size %1% / literal pool size %2%", + "<715>": "STP027: Variable \"%1% on line \"%2%\" ends with \"$\"", + "<716>": "STP028: Equate \"%1% on line \"%2%\" does not end with \"$\"", + "<717>": "STP029: Debug statement found on line %2%", + "<718>": "STP050: \"%1% elapsed time \"%2%\" secs", + "<719>": "STP051: Compiled at %1% with %2% Warnings. (Time elapsed: %3% seconds)", + "<720>": "STP101: The \"%1%\" Stored Procedure already exists. Do you wish to overwrite it?", + "<721>": "STP102: Entity Locked", + "<722>": "STP103: Stored Procedures", + "<723>": "STP104: Stored Procedure &Name", + "<724>": "STP105: Save Stored Procedure", + "<725>": "STP106: Please specify a name for the Stored Procedure", + "<726>": "STP107: Stored Procedure Properties", + "<727>": "STP108: Are you sure you wish to delete this Stored Procedure?", + "<728>": "STP109: Delete executable/debug entities", + "<729>": "", + "<730>": "///////////////////////////////////////////////////////////////////////////////", + "<731>": "//[RTI_DSN_STPROCINS]//////////////////////////////////////////////////////////", + "<732>": "", + "<733>": "STI001: The \"%1%\" Insert record is locked by another process||Changes will not be allowed|", + "<734>": "STI002: Error reading the \"%1%\" Insert record in the %2% %3% method [%4%]", + "<735>": "STI003: Null ID passed to the %1% message in the %2% %3% method", + "<736>": "STI004: The \"%1%\" Insert record has been inherited from another application.|Changes will be saved to a new copy in this application", + "<737>": "STI008: The Insert record is locked by another process.||Changes cannot be saved", + "<738>": "STI009: Error reading the \"%1%\" Insert record SYSREPOS record in the %2% %3% method [%4%]", + "<739>": "STI010: The Insert record is locked by another process.||Compilation is not allowed", + "<740>": "STI011: The \"%1%\" Insert record is locked by another process and cannot be saved [%2%]", + "<741>": "STI012: Error unlocking the previous \"%1%\" Insert record in the %2% %3% method [%4%]", + "<742>": "STI013: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<743>": "STI014: Insert records do not support a TESTRUN operation", + "<744>": "STI015: Compilation Successful! (Time elapsed: %1% seconds)", + "<745>": "STI016: Compilation Failed!", + "<746>": "STI017: Compiling %1% ...", + "<747>": "STI020: Saving %1% ...", + "<748>": "STI021: Saving %1% ... OK (%2% chars written)", + "<749>": "STI022: Saving %1% ... Failed!", + "<750>": "STI030: Locking %1% ...", + "<751>": "STI031: Locking %1% ... OK", + "<752>": "STI033: Locking %1% ... Failed [%2%]", + "<753>": "STI034: Unlocking %1% ...", + "<754>": "STI035: Unlocking %1% ... OK", + "<755>": "STI036: Unlocking %1% ... Failed [%2%]", + "<756>": "STI037: Skipping %1% ... Program is on the call stack", + "<757>": "STI101: The \"%1%\" Insert record already exists. Do you wish to overwrite it?", + "<758>": "STI102: Entity Locked", + "<759>": "STI103: Stored Procedure Inserts", + "<760>": "STI104: Stored Procedure Insert &Name", + "<761>": "STI105: Save Stored Procedure Insert", + "<762>": "STI106: Please specify a name for the Insert record", + "<763>": "STI107: Insert Record Properties", + "<764>": "STI108: Are you sure you wish to delete this Insert record?", + "<765>": "STI109: Tree-Compiling %p%", + "<766>": "STI110: 1 entity compiled", + "<767>": "STI111: %1% entities compiled", + "<768>": "", + "<769>": "///////////////////////////////////////////////////////////////////////////////", + "<770>": "//[RTI_DSN_RECORD]/////////////////////////////////////////////////////////////", + "<771>": "", + "<772>": "REC001: The \"%1%\" Record is locked by another process||Changes will not be allowed|", + "<773>": "REC002: Error reading the \"%1%\" Record in the %2% Table", + "<774>": "REC003: Null ID passed to the %1% message in the %2% %3% method", + "<775>": "REC004: The Record is locked by another process.||Changes cannot be saved", + "<776>": "REC005: Error reading the \"%1%\" Record in the %2% Table", + "<777>": "REC006: The \"%1%\" Record is locked by another process and cannot be saved [%2%]", + "<778>": "REC007: Error unlocking the previous \"%1%\" Record in the %2% Table", + "<779>": "REC008: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<780>": "REC009: Table \"%1%\" does not exist", + "<781>": "REC010: Records do not support a TESTRUN operation", + "<782>": "REC011: APPROW creation for this entity is disabled:||Repository entity \"%1%\" already exists for a different record.", + "<783>": "REC020: Saving %1% ...", + "<784>": "REC021: Saving %1% ... OK (%2% chars written)", + "<785>": "REC022: Saving %1% ... Failed!", + "<786>": "REC101: The \"%1%\" Record already exists. Do you wish to overwrite it?", + "<787>": "REC102: Record Locked", + "<788>": "REC103: Records", + "<789>": "REC104: Record &Name", + "<790>": "REC105: Save Record", + "<791>": "REC106: Please specify a name for the Record", + "<792>": "REC107: Invalid Table", + "<793>": "REC108: Record Already Exists", + "<794>": "REC109: Are you sure you wish to delete this record?", + "<795>": "", + "<796>": "///////////////////////////////////////////////////////////////////////////////", + "<797>": "//[RTI_DSN_OIWIN]//////////////////////////////////////////////////////////////", + "<798>": "", + "<799>": "OIW001: The \"%1%\" Form is locked by another process.||Changes will not be allowed|", + "<800>": "OIW002: Error reading the \"%1%\" Form in the %2% %3% method||[%4%]|", + "<801>": "OIW003: Invalid object type handler \"%1%\" specified in the %2% %3% method", + "<802>": "OIW004: Unable to create form designer window \"%1%\" in the %2% %3% method", + "<803>": "OIW005: Error reading the \"%1%\" Form SYSREPOS record in the %2% %3% method||[%4%]|", + "<804>": "OIW006: The Form is locked by another process.||Changes cannot be saved", + "<805>": "OIW007: The \"%1%\" Form has been inherited from another application.|Changes will not be allowed", + "<806>": "OIW009: Error reading the \"%1%\" Form in the %2% %3% method||[%4%]|", + "<807>": "OIW011: The \"%1%\" Form is locked by another process and cannot be saved||[%2%]|", + "<808>": "OIW012: Error unlocking the previous \"%1%\" Form in the %2% %3% method||[%4%]|", + "<809>": "OIW013: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<810>": "OIW014: The following tables are not attached:||%1%||The form cannot be saved until valid|table information is specified|", + "<811>": "OIW015: The following table is not attached:||%1%||The form cannot be saved until valid|table information is specified|", + "<812>": "OIW016: There are no controls to re-order", + "<813>": "OIW017: There are not enough controls to re-order", + "<814>": "OIW018: Null control type detected", + "<815>": "OIW019: \"%1%\" is not a valid control type [%2%]", + "<816>": "OIW020: No Table Join Criteria has been collected", + "<817>": "OIW021: Invalid object type handler \"%1%\" specified in the OIWIN_COMPILE procedure", + "<818>": "OIW022: Missing object type in the OIWIN_COMPILE procedure", + "<819>": "OIW023: No table join information has been specified for the following tables: [%1%]", + "<820>": "OIW024: Error accessing method type information for the \"%1%\" control in the %2% %3% method [%4%]", + "<821>": "OIW025: \"%1%\" is a reserved word and cannot be used as a Form name.|Please choose another name that is NOT in the following list:||%2%||", + "<822>": "OIW026: \"%1%\" is a reserved control sub-object name", + "<823>": "OIW100: Please enter a name for this Form:", + "<824>": "OIW101: The \"%1%\" Form already exists. Do you wish to overwrite it?", + "<825>": "OIW102: Form Locked", + "<826>": "OIW103: Overwrite Form", + "<827>": "OIW104: Missing Tables", + "<828>": "OIW105: %1% %2% event script", + "<829>": "OIW106: Saving %1% ...", + "<830>": "OIW107: Saving %1% ... Failed! (%2%)", + "<831>": "OIW108: Saving %1% ... OK (%2% chars written)", + "<832>": "OIW109: Deleting %1% ...", + "<833>": "OIW110: Deleting %1% ... Failed! (%2%)", + "<834>": "OIW111: Deleting %1% ... OK", + "<835>": "OIW112: Compiling %1% ...", + "<836>": "OIW113: Compilation Successful! (Time elapsed: %1% seconds at %2%)", + "<837>": "OIW114: Compilation Failed!", + "<838>": "OIW115: Compiling %1% ... Compilation not needed", + "<839>": "OIW116: Control", + "<840>": "OIW117: Select Control", + "<841>": "OIW118: Displays the previous page", + "<842>": "OIW119: Display the next page", + "<843>": "OIW120: Opening %1% Failed!", + "<844>": "OIW121: Parser Error on \"%1%\" [%2%]", + "<845>": "OIW122: Are you sure you wish to delete this Form?", + "<846>": "OIW123: Save Form", + "<847>": "OIW124: Control Type", + "<848>": "OIW125: Paste Failed!", + "<849>": "OIW126: Order Tabs", + "<850>": "OIW127: Multi-table Join Criteria", + "<851>": "", + "<852>": "///////////////////////////////////////////////////////////////////////////////", + "<853>": "//[RTI_DSNX_OIWIN_FORMDES]/////////////////////////////////////////////////////", + "<854>": "", + "<855>": "FDS001: Invalid EventID \"%1%\" passed to the %2% %3% method", + "<856>": "FDS002: No DSN ID passed to the %1% %2% method", + "<857>": "FDS003: A \"%1%\" type cannot be created on a child control", + "<858>": "FDS004: The \"%1%\" control already exists. Please choose another name", + "<859>": "FDS005: \"%1%\" is a reserved control sub-object name. Please choose another name", + "<860>": "FDS100: %1% Properties", + "<861>": "FDS101: The %1% control has an event handler defined.|Are you sure you want to delete it?", + "<862>": "FDS102: Delete Control", + "<863>": "FDS103: Common", + "<864>": "FDS104: The following controls have event handlers defined:||%1%||Are you sure you want to delete them?", + "<865>": "", + "<866>": "///////////////////////////////////////////////////////////////////////////////", + "<867>": "//[RTI_DSNX_OIWIN_DBJOIN]//////////////////////////////////////////////////////", + "<868>": "", + "<869>": "DBJ001: Are you sure you want to remove this relationship?", + "<870>": "DBJ002: Remove relationship", + "<871>": "DBJ003: Do you want to save your changes to the join criteria?", + "<872>": "DBJ004: Unsaved changes", + "<873>": "", + "<874>": "///////////////////////////////////////////////////////////////////////////////", + "<875>": "//[RTI_DSN_OIWIN_TPL_TOOLBOX]//////////////////////////////////////////////////", + "<876>": "", + "<877>": "TBX001: Error accessing Toolbox ImageList \"%1%\" in the %2% %3% method [%4%]", + "<878>": "TBX002: Error accessing Type ID list in the %1% %2% method [%3%]", + "<879>": "TBX003: Error accessing \"%1%\" type information in the %2% %3% method [%4%]", + "<880>": "TBX004: Error accessing Toolbox Image \"%1%\" for the \"%2%\" type in the %3% %4% method [%5%]", + "<881>": "TBX005: Null Client ID passed to the %1% message in the %2% %3% method", + "<882>": "TBX006: Invalid Client ID passed to the %1% message in the %2% %3% method", + "<883>": "", + "<884>": "///////////////////////////////////////////////////////////////////////////////", + "<885>": "//[RTI_DSN_OIEVENT]////////////////////////////////////////////////////////////", + "<886>": "", + "<887>": "EVT001: \"%1%\" template missing from ControlMap@ in the %2% %3% method", + "<888>": "EVT002: Error creating the \"%1%\" control in the %2% %3% method", + "<889>": "EVT003: Invalid control ID \"%1%\" passed to the %2% %3% method", + "<890>": "EVT004: Invalid Form DSN ID \"%1%\" passed to the %2% %3% method", + "<891>": "EVT005: There are no event handlers to delete for the %1% event", + "<892>": "EVT006: Invalid QuickEvent Option ID \"%1%\" passed to the %2% %3% method ", + "<893>": "EVT007: QuickEvent Target is required", + "<894>": "EVT008: QuickEvent Message is required", + "<895>": "EVT009: Error parsing QuickEvent Params [%1%]", + "<896>": "EVT010: Error parsing QuickEvent Params - Delimiter level is too deep", + "<897>": "EVT011: Invalid control name \"%1%\" passed to the %2% %3% method", + "<898>": "EVT012: Error accessing event type information for the \"%1%\" control in the %2% %3% method [%4%]", + "<899>": "EVT013: %1% is a read-only property", + "<900>": "EVT014: %1% is not a valid stored procedure", + "<901>": "EVT015: %1% is not a valid repository entity", + "<902>": "EVT016: %1% is not a valid control or window name", + "<903>": "EVT017: Error parsing QuickEvent Params - Unbalanced delimiter brackets", + "<904>": "EVT018: %1% cannot be accessed at run-time", + "<905>": "EVT019: Invalid Indexed Table \"%1%\" passed to the %2% %3% method", + "<906>": "EVT020: Error locking CFG_EVENTS [%1%]", + "<907>": "EVT021: Error unlocking CFG_EVENTS [%1%]", + "<908>": "EVT022: Error building CFG_EVENTS [%1%]", + "<909>": "EVT023: Error writing CFG_EVENTS [%1%]", + "<910>": "EVT024: Error updating PS TypeInfo [%1%]", + "<911>": "EVT025: Error accessing \"%1%\" event type information for the \"%2%\" type in the %3% method [%4%]", + "<912>": "EVT100: QuickEvent", + "<913>": "EVT101: Event Action", + "<914>": "EVT102: Return Value", + "<915>": "EVT103: Finalize", + "<916>": "EVT104: Type", + "<917>": "EVT105: Target", + "<918>": "EVT106: Message", + "<919>": "EVT107: Params", + "<920>": "EVT108: Options", + "<921>": "EVT109: Delete All Events", + "<922>": "EVT110: Are you sure you wish to clear all the \"%1%\" event details?", + "<923>": "EVT111: No QuickEvents defined", + "<924>": "EVT112: Checking Event Syntax ...", + "<925>": "EVT113: Compilation Failed!", + "<926>": "EVT114: Syntax Check Successful! (Time elapsed: %1% seconds at %2%)", + "<927>": "EVT115: Syntax Checked with %1% Warning(s). (Time elapsed: %2% seconds at %3%)", + "<928>": "EVT116: Function %1%( CtrlEntID, CtrlClassID%2% )", + "<929>": "EVT117: Event Script Not Defined", + "<930>": "EVT118: ||return 1", + "<931>": "EVT119: Event Script Properties", + "<932>": "EVT120: Skip if null", + "<933>": "EVT121: Context Variables", + "<934>": "EVT122: Event Parameters", + "<935>": "EVT123: Controls", + "<936>": "EVT124: Select Target", + "<937>": "EVT125: Please specify a target object first", + "<938>": "EVT126: Select Event|Events for %1%", + "<939>": "EVT127: There are no events available for the \"%1%\" target", + "<940>": "EVT128: Events", + "<941>": "EVT129: Properties", + "<942>": "EVT130: Select Property", + "<943>": "EVT131: There are no events available for the \"%1%\" target (Unable to resolve \"%1%\")", + "<944>": "EVT132: No parameters available", + "<945>": "EVT133: Method Parameters", + "<946>": "EVT134: Param%1%", + "<947>": "EVT135: Stored Procedure Parameters", + "<948>": "EVT136: Specify Method Parameters", + "<949>": "EVT137: Specify Procedure Parameters", + "<950>": "EVT138: Specify Property Parameters", + "<951>": "EVT139: Set Property Parameters", + "<952>": "EVT140: Value", + "<953>": "EVT141: Column", + "<954>": "EVT142: Select Property|Properties for %1%", + "<955>": "EVT143: There are no properties available for the \"%1%\" target", + "<956>": "EVT144: There are no properties available for the \"%1%\" target (Unable to resolve \"%1%\")", + "<957>": "EVT145: Specify Event Parameters", + "<958>": "EVT146: Row", + "<959>": "EVT147: This action will delete the Event Script| Do you wish to continue?", + "<960>": "EVT148: Delete Event Script", + "<961>": "EVT149: Updating the %1% %2% event ...", + "<962>": "EVT150: Updating the %1% %2% event ... OK", + "<963>": "EVT151: Updating the %1% %2% event ... Failed!", + "<964>": "EVT152: Loading the %1% %2% event ...", + "<965>": "EVT153: Loading the %1% %2% event ... OK", + "<966>": "EVT154: Loading the %1% %2% event ... Failed!", + "<967>": "EVT155: Compiling %1% ...", + "<968>": "EVT156: Compiling %1% ... Compilation not needed.", + "<969>": "EVT157: Compilation Successful! (Time elapsed: %1% seconds at %2%)", + "<970>": "EVT158: Compiled with %1% Warning(s). (Time elapsed: %2% seconds at %3%)", + "<971>": "EVT159: Updating the %1% %2% event ... No changes detected", + "<972>": "EVT160: Has Priority", + "<973>": "EVT161: This action will delete the Quick Event| Do you wish to continue?", + "<974>": "EVT162: Delete Quick Event", + "<975>": "EVT163: Do you want to save your changes to the %1% %2% event?", + "<976>": "EVT164: Get Property Parameters", + "<977>": "EVT165: Select Parameter", + "<978>": "EVT166: Select \"%1%\" Parameter", + "<979>": "EVT167: Processing CFG_EVENTS...", + "<980>": "EVT168: %1% %2% event already enforced", + "<981>": "EVT169: Enforcing the %1% %2% event", + "<982>": "EVT170: Not enforcing the %1% %2% event (auto-force suppressed)", + "<983>": "", + "<984>": "///////////////////////////////////////////////////////////////////////////////", + "<985>": "//[RTI_DSN_PROMOTED_EVENT_NEW]/////////////////////////////////////////////////", + "<986>": "", + "<987>": "PEVN100: Open Promoted Event", + "<988>": "PEVN101: Save Promoted Event", + "<989>": "PEVN102: New Promoted Event", + "<990>": "", + "<991>": "///////////////////////////////////////////////////////////////////////////////", + "<992>": "//[RTI_DSN_REPOS_EP_HISTORY]///////////////////////////////////////////////////", + "<993>": "", + "<994>": "RHS001: No Entity ID passed to the %1% %2% method", + "<995>": "RHS002: Invalid Entity ID \"%1%\" passed to the %2% %3% method [%4%]", + "<996>": "", + "<997>": "///////////////////////////////////////////////////////////////////////////////", + "<998>": "//[RTI_FORMDOCK]///////////////////////////////////////////////////////////////", + "<999>": "", + "<1000>": "FDK001: Error accessing the \"%1%\" Form Exe record in the %2% %3% method [%4%]", + "<1001>": "FDK002: The %1% %2% method does not support data-bound forms", + "<1002>": "FDK003: Error processing the %1% form CREATE event in the %2% %3% method [%4%]", + "<1003>": "FDK004: Unable to find parent WINDOW for the %1% control in the %2% %3% method", + "<1004>": "FDK005: Invalid Form ID \"%1%\" passed to the %2% %3% method", + "<1005>": "FDK006: Invalid Form ID \"%1%\" passed to the %2% %3% method (Form is not docked)", + "<1006>": "FDK007: Invalid Host ID \"%1%\" passed to the %2% %3% method", + "<1007>": "FDK008: Unable to build transfer ID list for the \"%1%\" form in the %2% %3% method", + "<1008>": "", + "<1009>": "///////////////////////////////////////////////////////////////////////////////", + "<1010>": "//[RTI_RUN_COMMAND]////////////////////////////////////////////////////////////", + "<1011>": "", + "<1012>": "RNC001: No Command Line passed to the %1% procedure", + "<1013>": "", + "<1014>": "///////////////////////////////////////////////////////////////////////////////", + "<1015>": "//[RTI_GET_SYN_TYPEINFO]//////////////////////////////////////////////////////", + "<1016>": "", + "<1017>": "GSI001: Invalid type \"%1%\" passed to the %2% %3% method", + "<1018>": "", + "<1019>": "///////////////////////////////////////////////////////////////////////////////", + "<1020>": "//[RTI_DSN_IMAGE]//////////////////////////////////////////////////////////////", + "<1021>": "", + "<1022>": "IMG001: %1% template missing from ControlMap@ in the %2% %3% method", + "<1023>": "IMG002: Error creating the %1% control in the %2% %3% method", + "<1024>": "IMG003: Error reading the \"%1%\" Image SYSREPOS record in the %2% %3% method [%4%]", + "<1025>": "IMG004: The \"%1%\" Image entity is locked by another process||Changes will not be allowed", + "<1026>": "IMG005: The Image entity is locked by another process.||Changes cannot be saved", + "<1027>": "IMG006: Error reading the \"%1%\" Image SYSREPOS record in the %2% %3% method [%4%]", + "<1028>": "IMG007: The \"%1%\" Image entity is locked by another process and cannot be saved [%2%]", + "<1029>": "IMG008: Error unlocking the previous \"%1%\" Image entity in the %2% %3% method [%4%]", + "<1030>": "IMG009: Error reading the \"%1%\" Image SYSREPOS record in the %2% %3% method [%4%]", + "<1031>": "IMG010: This Image has been inherited from another application.|Changes will be saved to a new copy in this application.", + "<1032>": "IMG030: Please select a Class for this image", + "<1033>": "IMG031: Please specify a 96 dpi image file", + "<1034>": "IMG032: Please specify a valid image count", + "<1035>": "IMG100: Image Properties", + "<1036>": "IMG101: Image Locked ", + "<1037>": "IMG103: Images", + "<1038>": "IMG104: Image Name", + "<1039>": "IMG105: Save Image", + "<1040>": "IMG106: Please specify a name for the image", + "<1041>": "IMG107: Specifies the image file to display when the parent form is scaled to %1%", + "<1042>": "IMG108: [REQUIRED] Specifies the image file to display when the parent form is scaled to %1%", + "<1043>": "IMG109: [REQUIRED] Specifies the image file to display", + "<1044>": "IMG110: Choose an Image", + "<1045>": "IMG111: Save Image Entity", + "<1046>": "", + "<1047>": "//////////////////////////////////////////////////////////////////////////////", + "<1048>": "// [RTI_DSN_POPUP]////////////////////////////////////////////////////////////", + "<1049>": "", + "<1050>": "PDN100: Save Popup Entity", + "<1051>": "", + "<1052>": "//////////////////////////////////////////////////////////////////////////////", + "<1053>": "// [POPUP]", + "<1054>": "POP001: The \"%1%\" Popup entity is locked by another process||Changes will not be allowed| ", + "<1055>": "POP002: Error reading the \"%1%\" Popup entity in the %2% %3% method [%4%]", + "<1056>": "POP008: The Popup entity is locked by another process.||Changes cannot be saved", + "<1057>": "POP009: Error reading the \"%1%\" Popup SYSREPOS record in the %2% %3% method [%4%]", + "<1058>": "POP011: The \"%1%\" Popup entity is locked by another process and cannot be saved [%2%]", + "<1059>": "POP012: Error unlocking the previous \"%1%\" Popup entity in the %2% %3% method [%4%]", + "<1060>": "POP013: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<1061>": "POP014: POPUPS do not support a COMPILE operation", + "<1062>": "POP015: This Popup has been inherited from another application.|Changes will be saved to a new copy in this application", + "<1063>": "POP020: Saving %1% ", + "<1064>": "POP021: Saving %1% ... OK (%2% chars written)", + "<1065>": "POP022: Saving %1% ... Failed!", + "<1066>": "POP100: Warning: The specified column could not be verified", + "<1067>": "POP102: Entity Locked", + "<1068>": "POP103: Popups", + "<1069>": "POP104: The Column ID value must be numeric", + "<1070>": "POP105: Invalid Return Type", + "<1071>": "POP106: Please specify a name for the Popup", + "<1072>": "POP107: Popup Properties", + "<1073>": "POP011: The \"%1%\" Popup entity is locked by another process and cannot be saved [%2%]", + "<1074>": "POP020: Saving %1% ", + "<1075>": "POP021: Saving %1% ... OK (%2% chars written)", + "<1076>": "POP022: Saving %1% ... Failed!", + "<1077>": "POP100: Save Popup Entity", + "<1078>": "POP182: The Popup displays specified columns from a table using a list of keys.", + "<1079>": "POP183: The Popup displays specified columns from a table using an active cursor", + "<1080>": "POP184: The Popup displays data stored in the Popup definition or passed to the Popup programmatically. Specify the data to display in the 'Literal Data' box. Each line in the box corresponds to a Popup row; multiple columns must be separated by the vertical bar character \"|\".", + "<1081>": "POP185: The Popup displays multi-valued column data from a specified table row.In the box below, specify the table name and the row ID to use. In the column layout, the 'Column ID' specifies the field position in the row.", + "<1082>": "POP186: The Popup displays sub-valued data from a specified column of a table row. In the box below, specify the table name, row ID, and column (field position) to use. In the column layout, the 'Column ID' specifies the value position in the specified column of the row.", + "<1083>": "POP187: Select a table to use as the data source then select the columns from the table to display in the Popup.", + "<1084>": "POP188: The Popup selects rows from a table and displays specified columns.", + "<1085>": "POP189: Reduction and sorting criteria are specified in the 'Selection Criteria' box using the R/List syntax.", + "<1086>": "POP190: The list of keys is specified by entering them (one per line) in the 'List of Keys' box.", + "<1087>": "POP191: The cursor number, 0-8, is specified in the 'Cursor Number' box.", + "<1088>": "POP200: The \"%1%\" property must be an integer coordinate between -2 and 32767 inclusive.", + "<1089>": "POP201: The \"VisibleColumns\" property must be an integer value between -1 and 128 inclusive.", + "<1090>": "POP202: The \"VisibleRows\" property must be an integer value between -1 and 1024 inclusive.", + "<1091>": "POP205: Selection Criteria", + "<1092>": "POP206: Specify Table Rows and Select Table Columns", + "<1093>": "POP207: List of Keys", + "<1094>": "POP208: Specify Cursor and Select Table Columns", + "<1095>": "POP209: Cursor Number", + "<1096>": "POP210: Enter Literal Data to Display", + "<1097>": "POP211: Literal Data", + "<1098>": "POP212: Select Table and Row", + "<1099>": "POP213: Row ID", + "<1100>": "POP214: {Row}", + "<1101>": "POP215: {Column}", + "<1102>": "POP216: Select Table, Row and Column", + "<1103>": "POP217: Row ID and Column", + "<1104>": "POP218: Invalid Mode Selected", + "<1105>": "POP221: Table", + "<1106>": "POP224: Row ID", + "<1107>": "POP226: Table Column", + "<1108>": "POP227: Component Field", + "<1109>": "POP228: Table \"%1%\" is not attached. Press for a list of available tables", + "<1110>": "POP230: Internal calculation error. Contact Technical Support", + "<1111>": "POP232: Popup Designer", + "<1112>": "POP233: %Default%", + "<1113>": "POP500: Loading Popup Data ...", + "<1114>": "", + "<1115>": "///////////////////////////////////////////////////////////////////////////////", + "<1116>": "//[RTI_DSN_DBTABLE]////////////////////////////////////////////////////////////", + "<1117>": "", + "<1118>": "TBL001: Unable to open the %1% Table [%2%]", + "<1119>": "TBL002: The \"%1%\" Table is locked by another process||Changes will not be allowed|", + "<1120>": "TBL003: The table is locked by another process.||Changes cannot be saved", + "<1121>": "TBL004: Deleted the %1% column OK", + "<1122>": "TBL005: Error deleting the %1% column [%2%]", + "<1123>": "TBL006: Updated the %1% column OK", + "<1124>": "TBL007: Error updating the %1% column [%2%]", + "<1125>": "TBL008: Saving %1% ... OK (%2% records updated, %3% records deleted)", + "<1126>": "TBL009: Repository WRITE error [%1%]", + "<1127>": "TBL010: Failed to save the %1% table", + "<1128>": "TBL011: The \"%1%\" property must be an integer between %2% and %3% inclusive", + "<1129>": "TBL012: Table Properties", + "<1130>": "TBL013: OK to delete the %1% column?", + "<1131>": "TBL014: Column name is required ", + "<1132>": "TBL015: \"%1%\" is not a valid column type ", + "<1133>": "TBL016: Column position is required for the %1% column", + "<1134>": "TBL017: Column key part is required for the %1% column", + "<1135>": "TBL018: Invalid data type \"%1%\" defined for the %2% column", + "<1136>": "TBL019: Duplicate column names are not allowed (\"%1%\")", + "<1137>": "TBL020: There are no columns to select", + "<1138>": "TBL021: \"%1%\" is not a valid column name for the %2% table", + "<1139>": "TBL022: \"%1%\" is a Group type column and cannot be used with another Group type column", + "<1140>": "TBL023: Column type is required", + "<1141>": "TBL024: \"%1%\" is not a valid column position ", + "<1142>": "TBL025: Error reading DICT repository flags for the %1% table [%2%]", + "<1143>": "TBL026: Error syncing DICT repository flags for the %1% table [%2%]", + "<1144>": "TBL027: No table name passed to the %1% %2% method", + "<1145>": "TBL028: Are you sure you wish to delete this table?", + "<1146>": "TBL029: Invalid column type \"%1%\" defined for the %2% column", + "<1147>": "TBL030: Invalid justification type \"%1%\" defined for the %2% column", + "<1148>": "TBL031: Error reading DATA repository flags for the %1% table [%2%]", + "<1149>": "TBL100: Select Group Columns", + "<1150>": "TBL101: Available Columns", + "<1151>": "TBL102: Data Validation Error", + "<1152>": "TBL103: Available Tables", + "<1153>": "TBL104: Select Foreign Key Table", + "<1154>": "TBL105: There are no columns to display", + "<1155>": "TBL106: There are no columns to display - use the Insert key to add a new one", + "<1156>": "", + "<1157>": "///////////////////////////////////////////////////////////////////////////////", + "<1158>": "//[RTI_DSN_OBJECTCODE]/////////////////////////////////////////////////////////", + "<1159>": "", + "<1160>": "OBC001: No entity ID passed to the %1% %2% method", + "<1161>": "OBC002: Error reading the \"%1%\" SYSREPOS record in the %2% %3% method [%4%]", + "<1162>": "OBC003: Error reading the \"%1%\" entity in the %2% %3% method [%4%]", + "<1163>": "OBC100: ObjectCode Viewer", + "<1164>": "OBC101: Save ObjectCode Entity", + "<1165>": "OBC102: ObjectCode Properties", + "<1166>": "OBC103: Export ObjectCode Entity", + "<1167>": "", + "<1168>": "///////////////////////////////////////////////////////////////////////////////", + "<1169>": "//[RTI_IDE_CODETEMPLATE]///////////////////////////////////////////////////////", + "<1170>": "", + "<1171>": "CTP001: Error building CODETEMPLATE categories in the %1% %2% method [%3%]", + "<1172>": "CTP002: Category is a required entry", + "<1173>": "", + "<1174>": "///////////////////////////////////////////////////////////////////////////////", + "<1175>": "//[RTI_DSN_MSG]////////////////////////////////////////////////////////////////", + "<1176>": "", + "<1177>": "MSG001: Unsaved changes", + "<1178>": "MSG002: You have unsaved changes - are you sure you wish to exit?", + "<1179>": "MSG003: Delete %1%", + "<1180>": "MSG004: Are you sure you wish to delete this entity?", + "<1181>": "MSG005: Inherited Entity", + "<1182>": "MSG006: Save %1% before closing?", + "<1183>": "MSG007: Invalid Message Editor button image file \"%1%\" specified in the %2% %3% method", + "<1184>": "MSG008: The Message entity is locked by another process.||Changes cannot be saved", + "<1185>": "MSG009: Error reading the \"%1%\" Message SYSREPOS record in the %2% %3% method [%4%]", + "<1186>": "MSG010: The \"%1%\" property must be an integer between %2% and %3% inclusive", + "<1187>": "MSG011: The \"%1%\" Message entity is locked by another process and cannot be saved [%2%]", + "<1188>": "MSG012: Error unlocking the previous \"%1%\" Message entity in the %2% %3% method [%4%]", + "<1189>": "MSG013: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<1190>": "MSG014: Message Messages do not support a COMPILE operation", + "<1191>": "MSG015: This Message has been inherited from another application.|Changes will be saved to a new copy in this application", + "<1192>": "MSG020: Saving %1% ", + "<1193>": "MSG021: Saving %1% ... OK (%2% chars written)", + "<1194>": "MSG022: Saving %1% ... Failed!", + "<1195>": "MSG101: The \"%1%\" Message entity is locked by another process||Changes will not be allowed|", + "<1196>": "MSG102: Entity Locked", + "<1197>": "MSG103: Messages", + "<1198>": "MSG104: Entity &Name", + "<1199>": "MSG107: Message Properties", + "<1200>": "", + "<1201>": "///////////////////////////////////////////////////////////////////////////////", + "<1202>": "//[RTI_DSN_RBAND]//////////////////////////////////////////////////////////////", + "<1203>": "", + "<1204>": "RBD001: The \"%1%\" R/Band entity is locked by another process||Changes will not be allowed|", + "<1205>": "RBD002: Error reading the \"%1%\" R/Band entity in the %2% %3% method [%4%]", + "<1206>": "RBD003: Error reading the \"%1%\" R/Band HTML content in the %2% %3% method [%4%]", + "<1207>": "RBD004: Error reading the \"%1%\" R/Band Editor HTML content in the %2% %3% method [%4%]", + "<1208>": "RBD005: Error reading the \"%1%\" R/Band Designer content in the %2% %3% method [%4%]", + "<1209>": "RBD006: Error reading the \"%1%\" QuickHelp Editor button images in the %2% %3% method [%4%]", + "<1210>": "RBD007: Invalid R/Band Editor button image file \"%1%\" specified in the %2% %3% method", + "<1211>": "RBD008: The R/Band entity is locked by another process.||Changes cannot be saved", + "<1212>": "RBD009: Error reading the \"%1%\" R/Band SYSREPOS record in the %2% %3% method [%4%]", + "<1213>": "RBD010: Null ID passed to the %1% message in the %2% %3% method", + "<1214>": "RBD011: The \"%1%\" R/Band entity is locked by another process and cannot be saved [%2%]", + "<1215>": "RBD012: Error unlocking the previous \"%1%\" R/Band entity in the %2% %3% method [%4%]", + "<1216>": "RBD013: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<1217>": "RBD014: R/Band reports do not support a COMPILE operation", + "<1218>": "RBD015: This R/Band report has been inherited from another application.|Changes will be saved to a new copy in this application", + "<1219>": "RBD020: Saving %1% ", + "<1220>": "RBD021: Saving %1% ... OK (%2% chars written)", + "<1221>": "RBD022: Saving %1% ... Failed!", + "<1222>": "RBD030: Please enter a full URL for the hyperlink", + "<1223>": "RBD031: Link URL is Required", + "<1224>": "RBD040: Please enter a full URL for the image", + "<1225>": "RBD041: Image URL is Required", + "<1226>": "RBD100: Please enter the entity name of this R/Band entity:", + "<1227>": "RBD101: The \"%1%\" R/Band entity already exists. Do you wish to overwrite it?", + "<1228>": "RBD102: Entity Locked", + "<1229>": "RBD103: R/Band Reports", + "<1230>": "RBD104: R/Band &Name", + "<1231>": "RBD105: Save R/Band Report", + "<1232>": "RBD106: Please specify a name for the R/Band Report", + "<1233>": "RBD107: R/Band Report Properties", + "<1234>": "RBD108: Warning", + "<1235>": "RBD200: The \"%1%\" property must be an integer coordinate between -2 and 32767 inclusive", + "<1236>": "RBD201: The \"Width\" property must be an integer value between 200 and 32767 inclusive", + "<1237>": "RBD202: The \"Height\" property must be an integer value between 160 and 32767 inclusive", + "<1238>": "RBD203: The \"Themes\" must be one of the available stylesheets listed in the dropdown", + "<1239>": "RBD204: The \"Options\" must be either Preview, Printer Setup, or No GUI ", + "<1240>": "RBD205: The \"Format\" must be either PRINT, PDF, TIFF, HTML, XLS, XLSX, TXT or TEXT", + "<1241>": "RBD206: The \"Report Group\" is the group name to be used for editing and running using the Banded Report Writer (BRW) tool", + "<1242>": "RBD207: The \"Report Namep\" is the report name to be used for editing and running using the Banded Report Writer (BRW) tool", + "<1243>": "RBD208: The \"Filename\" is the filename to be used to create the report", + "<1244>": "RBD209: The \"List ID\" is the name of a list to used in selecting records for this report", + "<1245>": "RBD210: \"This is the Folder to be used to create the report in\"", + "<1246>": "RBD232: R/Band Designer", + "<1247>": "RBD233: \"%DEFAULT%\"", + "<1248>": "", + "<1249>": "///////////////////////////////////////////////////////////////////////////////", + "<1250>": "//[RTI_DSN_TOOLBAR]////////////////////////////////////////////////////////////", + "<1251>": "", + "<1252>": "TLBR001: The \"%1%\" Toolbar entity is locked by another process||Changes will not be allowed|", + "<1253>": "TLBR002: Error reading the \"%1%\" Toolbar entity in the %2% %3% method [%4%]", + "<1254>": "TLBR003: Error reading the \"%1%\" Toolbar HTML content in the %2% %3% method [%4%]", + "<1255>": "TLBR004: Error reading the \"%1%\" Toolbar Editor HTML content in the %2% %3% method [%4%]", + "<1256>": "TLBR005: Error reading the \"%1%\" Toolbar Editor JS content in the %2% %3% method [%4%]", + "<1257>": "TLBR006: Error reading the \"%1%\" Toolbar Editor button images in the %2% %3% method [%4%]", + "<1258>": "TLBR007: Invalid QuickHelp Editor button image file \"%1%\" specified in the %2% %3% method", + "<1259>": "TLBR008: The Toolbar entity is locked by another process.||Changes cannot be saved", + "<1260>": "TLBR009: Error reading the \"%1%\" Toolbar SYSREPOS record in the %2% %3% method [%4%]", + "<1261>": "TLBR010: Null ID passed to the %1% message in the %2% %3% method", + "<1262>": "TLBR011: The \"%1%\" Toolbar entity is locked by another process and cannot be saved [%2%]", + "<1263>": "TLBR012: Error unlocking the previous \"%1%\" Toolbar entity in the %2% %3% method [%4%]", + "<1264>": "TLBR013: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<1265>": "TLBR014: Toolbars do not support a COMPILE operation", + "<1266>": "TLBR015: This Toolbar Message has been inherited from another application.|Changes will be saved to a new copy in this application", + "<1267>": "TLBR020: Saving %1% ", + "<1268>": "TLBR021: Saving %1% ... OK (%2% chars written)", + "<1269>": "TLBR022: Saving %1% ... Failed!", + "<1270>": "TLBR030: Please enter a full URL for the hyperlink", + "<1271>": "TLBR031: Link URL is Required", + "<1272>": "TLBR040: Please enter a full URL for the image", + "<1273>": "TLBR041: Image URL is Required", + "<1274>": "TLBR100: Please enter the entity name of this Toolbar entity:", + "<1275>": "TLBR101: The \"%1%\" Toolbar entity already exists. Do you wish to overwrite it?", + "<1276>": "TLBR102: Entity Locked", + "<1277>": "TLBR103: Toolbar", + "<1278>": "TLBR104: Toolbar &Name", + "<1279>": "TLBR105: Save Toolbar", + "<1280>": "TLBR106: Please specify a name for the Toolbar", + "<1281>": "TLBR107: ToolBar Properties", + "<1282>": "TLBR108: Warning", + "<1283>": "TLBR109: Save Toolbar Entity", + "<1284>": "TLBR200: The \"Button Padding\" property must be a pair of integer values between 1 and 256 inclusive", + "<1285>": "TLBR201: The \"Button Spacing\" property must be an integer value between 0 and 256 inclusive", + "<1286>": "TLBR202: The \"Button Size\" property must be a pair of integer values between 4 and 256 inclusive", + "<1287>": "", + "<1288>": "///////////////////////////////////////////////////////////////////////////////", + "<1289>": "/// [RBLayout] ////////////////////////////////////////////////////////////////", + "<1290>": "", + "<1291>": "RBL001: The \"%1%\" Report entity is locked by another process||Changes will not be allowed|", + "<1292>": "RBL002: Error reading the \"%1%\" Report entity in the %2% %3% method [%4%]", + "<1293>": "RBL008: The Report entity is locked by another process.||Changes cannot be saved", + "<1294>": "RBL009: Error reading the \"%1%\" Report SYSREPOS record in the %2% %3% method [%4%]", + "<1295>": "RBL015: This Report has been inherited from another application.|Changes will be saved to a new copy in this application", + "<1296>": "RBL100: Warning: The specified column could not be verified", + "<1297>": "RBL103: OIREPORT", + "<1298>": "RBL104: Report &Name", + "<1299>": "RBL105: Save Report Message", + "<1300>": "RBL106: Please specify a name for the Report", + "<1301>": "RBL182: The Report displays specified columns from a table using a list of keys.", + "<1302>": "RBL107: Report Properties", + "<1303>": "RBL011: The \"%1%\" Popup entity is locked by another process and cannot be saved [%2%]", + "<1304>": "RBL020: Saving %1% ", + "<1305>": "RBL021: Saving %1% ... OK (%2% chars written)", + "<1306>": "RBL022: Saving %1% ... Failed!", + "<1307>": "RBL014: ReportBuilder Report entities do not support a COMPILE operation", + "<1308>": "RBL182: The Popup displays specified columns from a table using a list of keys.", + "<1309>": "RBL183: The Popup displays specified columns from a table using an active cursor", + "<1310>": "RBL184: The Popup displays data stored in the Popup definition or passed to the Popup programmatically. Specify the data to display in the 'Literal Data' box. Each line in the box corresponds to a Popup row; multiple columns must be separated by the vertical bar character \"|\".", + "<1311>": "RBL185: The Popup displays multi-valued column data from a specified table row.In the box below, specify the table name and the row ID to use. In the column layout, the 'Column ID' specifies the field position in the row.", + "<1312>": "RBL186: The Popup displays sub-valued data from a specified column of a table row. In the box below, specify the table name, row ID, and column (field position) to use. In the column layout, the 'Column ID' specifies the value position in the specified column of the row.", + "<1313>": "RBL187: Select a table to use as the data source then select the columns from the table to display in the Popup.", + "<1314>": "RBL188: The Popup selects rows from a table and displays specified columns.", + "<1315>": "RBL189: Reduction and sorting criteria are specified in the 'Selection Criteria' box using the R/List syntax.", + "<1316>": "RBL190: The list of keys is specified by entering them (one per line) in the 'List of Keys' box.", + "<1317>": "RBL191: The cursor number, 0-8, is specified in the 'Cursor Number' box.", + "<1318>": "RBL200: The \"%1%\" property must be an integer coordinate between -2 and 32767 inclusive", + "<1319>": "RBL201: The \"Width\" property must be an integer value between 200 and 32767 inclusive", + "<1320>": "RBL202: The \"Height\" property must be an integer value between 160 and 32767 inclusive", + "<1321>": "RBL205: Selection Criteria", + "<1322>": "RBL206: Specify Table Rows and Select Table Columns", + "<1323>": "RBL207: List of Keys", + "<1324>": "RBL208: Specify Cursor and Select Table Columns", + "<1325>": "RBL209: Cursor Number", + "<1326>": "RBL210: Enter Literal Data to Display", + "<1327>": "RBL211: Literal Data", + "<1328>": "RBL212: Select Table and Row", + "<1329>": "RBL213: Row ID", + "<1330>": "RBL214: {Row}", + "<1331>": "RBL215: {Column}", + "<1332>": "RBL216: Select Table, Row and Column", + "<1333>": "RBL217: Row ID and Column", + "<1334>": "RBL218: Invalid Mode Selected", + "<1335>": "RBL221: Table", + "<1336>": "RBL224: Row ID", + "<1337>": "RBL226: Table Column", + "<1338>": "RBL227: Component Field", + "<1339>": "RBL228: Table \"%1%\" is not attached. Press for a list of available tables", + "<1340>": "RBL230: Internal calculation error. Contact Technical Support", + "<1341>": "RBL232: Popup Designer", + "<1342>": "RBL233: %Default%", + "<1343>": "RBL500: Loading Report Data ..", + "<1344>": "", + "<1345>": "///////////////////////////////////////////////////////////////////////////////", + "<1346>": "//[RTI_AUTH_XXX]///////////////////////////////////////////////////////////////", + "<1347>": "", + "<1348>": "AUTH1001: Required information missing", + "<1349>": "AUTH1002: Invalid request: \"%1%\"", + "<1350>": "AUTH1003: Invalid (or new) user/password policy", + "<1351>": "AUTH1004: Decryption failure while accessing user/password policy", + "<1352>": "AUTH1005: Failed during encryption of policy", + "<1353>": "AUTH1006: Invalid (or new) user name", + "<1354>": "AUTH1007: Decryption failure while accessing user \"%1%\"", + "<1355>": "AUTH1008: Failed during encryption for user \"%1%\"", + "<1356>": "AUTH1009: Invalid information for user access", + "<1357>": "AUTH1010: User access is disabled", + "<1358>": "AUTH1011: Too many attempts; account is now locked", + "<1359>": "AUTH1012: User name and/or password incorrect", + "<1360>": "AUTH1013: Insufficient permissions for this request", + "<1361>": "AUTH1014: Password has expired", + "<1362>": "AUTH1015: Warning: Password expires soon %1%. Please choose a new password.", + "<1363>": "AUTH1016: Invalid password; the same password was used recently.", + "<1364>": "AUTH1017: Invalid password; it does not meet the password policy requirements.", + "<1365>": "AUTH1018: Your password must be reset. Please do so IMMEDIATELY before proceeding.", + "<1366>": "AUTH1019: Invalid user defined stored procedure name specified \"%1\"", + "<1367>": "AUTH1020: Duplicate username - please choose another", + "<1368>": "AUTH1021: Note: If this O4W user's information is defined as part of the connection information in eserver.cfg or the registry, you may have to update this information there as well.", + "<1369>": "AUTH1022: Please wait - sending O4W 2FA email...", + "<1370>": "", + "<1371>": "///////////////////////////////////////////////////////////////////////////////", + "<1372>": "//[RTI_USER_UPDATE_PASSWORD]///////////////////////////////////////////////////", + "<1373>": "UUPW001: You must enter your current password", + "<1374>": "UUPW002: You must enter a new password", + "<1375>": "UUPW003: You must re-enter the new password for for confirmation", + "<1376>": "UUPW004: The new passwords do not match", + "<1377>": "UUPW005: You must be logged into the system to proceed", + "<1378>": "UUPW006: You have not reset your password. Are you sure you wish to exit the system?", + "<1379>": "UUPW100: Your password has been changed", + "<1380>": "", + "<1381>": "///////////////////////////////////////////////////////////////////////////////", + "<1382>": "//[RTI_GIT]////////////////////////////////////////////////////////////////////", + "<1383>": "", + "<1384>": "GIT009: Error obtaining Git Diff Tool ID in the %1% %2% method [%3%]", + "<1385>": "GIT010: Error obtaining Git Diff Tool Path in the %1% %2% method [%3%]", + "<1386>": "", + "<1387>": "///////////////////////////////////////////////////////////////////////////////", + "<1388>": "//[RTI_GIT_PUSH_ENTITY]////////////////////////////////////////////////////////", + "<1389>": "", + "<1390>": "GPSH001: Invalid exportPath \"%1%\" passed to the %2% procedure", + "<1391>": "GPSH002: Error retrieving the Windows Temporary Folder name in the %1% procedure [%2%]", + "<1392>": "GPSH003: Unable to create the temporary folder \"%1%\" in the %2% procedure", + "<1393>": "GPSH004: Error copying \"%1%\" to \"%2%\" in the %3% procedure", + "<1394>": "GPSH005: Error \"%1%\" zipping \"%2%\" to \"%3%\" in the %4% procedure", + "<1395>": "GPSH100: Pushed to \"%1%\" by %2% on %3%", + "<1396>": " ", + "<1397>": "///////////////////////////////////////////////////////////////////////////////", + "<1398>": "//[RTI_GIT_PULL_ENTITY]////////////////////////////////////////////////////////", + "<1399>": "", + "<1400>": "GPLL001: Invalid exportPath \"%1%\" passed to the %2% procedure", + "<1401>": "GPLL002: Error retrieving the Windows Temporary Folder name in the %1% procedure [%2%]", + "<1402>": "GPLL003: Unable to create the temporary folder \"%1%\" in the %2% procedure", + "<1403>": "GPLL004: Error copying \"%1%\" to \"%2%\" in the %3% procedure", + "<1404>": "GPLL005: Error \"%1%\" unzipping \"%2%\" to \"%3%\" in the %4% procedure", + "<1405>": "GPLL006: Error finding RDKEXTRACTSPEC for \"%1%\" entity in the %2% procedure", + "<1406>": "GPLL007: Error finding RDKSCMFORMAT for \"%1%\" entity in the %2% procedure", + "<1407>": "GPLL100: Committed by %1%, (ID:%2%)", + "<1408>": "", + "<1409>": "///////////////////////////////////////////////////////////////////////////////", + "<1410>": "//[RTI_GIT_DIFF]///////////////////////////////////////////////////////////////", + "<1411>": "", + "<1412>": "GDIF001: No Git working directory passed to the %1% procedure", + "<1413>": "GDIF002: Invalid Git working directory \"%1%\" passed to the %2% procedure", + "<1414>": "GDIF003: No Git parameters passed to the %1% procedure ", + "<1415>": "GDIF004: Unable to find Git executable in the %1% procedure", + "<1416>": "GDIF005: Git Diff warning [%1%] in the %2% procedure", + "<1417>": "GDIF006: Git Diff error [%1%] in the %2% procedure", + "<1418>": "GDIF007: Format mismatch for the %1% entity: Format defined is \"%2%\"; format found is \"%3%\"", + "<1419>": "GDIF100: Find changed entities", + "<1420>": "GDIF101: Executing git.exe query", + "<1421>": "", + "<1422>": "///////////////////////////////////////////////////////////////////////////////", + "<1423>": "//[RTI_GIT_DIFF_TOOL]//////////////////////////////////////////////////////////", + "<1424>": "GDT001: No entity ID passed to the %1% procedure", + "<1425>": "GDT002: Unable to resolve Git Repository Path in the %1% procedure", + "<1426>": "GDT003: Unable to resolve Git Exe Path in the %1% procedure", + "<1427>": "GDT004: Unable to resolve Git Diff Tool Path in the %1% procedure", + "<1428>": "GDT005: The %1% procedure can only be executed in Event Context", + "<1429>": "GDT006: Unknown SCMFORMAT \"%1%\" for the \"%2%\" entity in the %3% procedure", + "<1430>": "GDT007: Error copying Git file \"%1%\" to \"%2%\" in the %3% procedure [%4%:%5%]", + "<1431>": "GDT008: Error \"%1%\" unzipping \"%2%\" from \"%3%\" in the %4% procedure", + "<1432>": "", + "<1433>": "///////////////////////////////////////////////////////////////////////////////", + "<1434>": "//[REPOS_SCMICONV]/////////////////////////////////////////////////////////////", + "<1435>": "", + "<1436>": "SCMI001: Invalid JSON reposID object [%1%] passed to the %2% procedure", + "<1437>": "", + "<1438>": "///////////////////////////////////////////////////////////////////////////////", + "<1439>": "//[REPOS_SCMICONV_PARSEARRY]///////////////////////////////////////////////////", + "<1440>": "", + "<1441>": "SCMI200: Invalid JSON array handle passed to the %1% procedure [%2%]", + "<1442>": "SCMI201: Invalid JSON element type passed to the %1% procedure [Not an Array type]", + "<1443>": "", + "<1444>": "///////////////////////////////////////////////////////////////////////////////", + "<1445>": "//[UpdateCheck]////////////////////////////////////////////////////////////////", + "<1446>": "", + "<1447>": "UPD001: There is an update to OpenInsight %1% released on %2%. Did you wish to view and download this update?", + "<1448>": "UPD002: Your version of OpenInsight is up to date. No updates are currently available.", + "<1449>": "UPD003: There is a BETA update to OpenInsight %1% released on %2%. Did you wish to view and download this update?", + "<1450>": "UPD004: There is an INTERNAL update to OpenInsight %1% released on %2%. Did you wish to view and download this update?", + "<1451>": "UPD005: Please verify - your system will not remind you again, and will remain out of date until you manually update. Proceed with silencing this update?", + "<1452>": "UPD006: Automatic notifications about updates will be paused until %1%.", + "<1453>": "UPD007: Automatic notifications about updates to version %1% have been silenced.", + "<1454>": "", + "<1455>": "///////////////////////////////////////////////////////////////////////////////", + "<1456>": "///////////////////////////////////////////////////////////////////////////////", + "<1457>": "", + "<1458>": "CEV001: The \"CFG_EVENTS\" record is locked by another process||Changes cannot be saved|", + "<1459>": "CEV002: The Event Configuration tool can only perform updates in SYSPROG||Changes cannot be saved|", + "<1460>": "CEV003: Intrinsic system events cannot be deleted", + "<1461>": "CEV004: The Event ID must be unique", + "<1462>": "CEV005: The Event Name must be unique", + "<1463>": "CEV100: Scanning Classes %p%", + "<1464>": "CEV101: Updating repository event classes...", + "<1465>": "CEV102: Repository event class update complete.", + "<1466>": "CEV103: Checking for %1%", + "<1467>": "CEV104: Creating %1% ...", + "<1468>": "CEV105: Created %1% OK", + "<1469>": "CEV106: Checking for %1% - Already exists", + "<1470>": "CEV107: Found custom event %1% for the %2% type ", + "<1471>": "", + "<1472>": "///////////////////////////////////////////////////////////////////////////////", + "<1473>": "//[RTI_IDE_PGO_HCLREQUESTHEADERS]//////////////////////////////////////////////", + "<1474>": "", + "<1475>": "PGOHRH001: Each header Value must have a Name ", + "<1476>": "", + "<1477>": "///////////////////////////////////////////////////////////////////////////////", + "<1478>": "//[RTI_IDE_PGO_CHOOSEUSERS]////////////////////////////////////////////////////", + "<1479>": "", + "<1480>": "PGOCU001: Missing Database ID from the %1% application", + "<1481>": "PGOCU002: Unable to access item coordinates for the \"%1%\" property grid in the %2% %3% method", + "<1482>": "", + "<1483>": "///////////////////////////////////////////////////////////////////////////////", + "<1484>": "//[RTI_IDE_CTL_TOOLBARDES]/////////////////////////////////////////////////////", + "<1485>": "", + "<1486>": "TDC001: \"%1%\" is a required control for the ToolBar Designer composite control", + "<1487>": "", + "<1488>": "///////////////////////////////////////////////////////////////////////////////", + "<1489>": "//[RTI_IDE_CTL_MENUDES]////////////////////////////////////////////////////////", + "<1490>": "", + "<1491>": "MDC001: \"%1%\" is a required control for the Menu Designer composite control", + "<1492>": "MDC002: Invalid EVENTDES callback method \"%1%\" passed to the %2% procedure", + "<1493>": "MDC003: The Item ID the \"%1%\" Menu Item cannot be null", + "<1494>": "MDC004: The Item ID must be a unique but has the same value as the following item:||%1%|", + "<1495>": "MDC005: The Item ID must be a unique but has the same value as the following items:||%1%|", + "<1496>": "MDC006: The Item ID for the \"%1%\" Menu Item must be unique", + "<1497>": "MDC007: Item Text is required", + "<1498>": "MDC100: Menu Designer", + "<1499>": "MDC101: This action will delete all child items in the \"%1%\" popup item.||Do you want to continue?", + "<1500>": "MDC102: This action will remove any events for the \"%1%\" menu item.||Do you want to continue?", + "<1501>": "MDC103: One item updated", + "<1502>": "MDC104: %1% items updated", + "<1503>": "MDC105: Reset Item IDs", + "<1504>": "MDC106: Event Validation Error", + "<1505>": "MDC107: This action will change the \"%1%\" item to a popup item and remove it's event handlers.||Do you want to continue?", + "<1506>": "MDC108: This action will delete all menu items.||Do you want to continue?", + "<1507>": "MDC109: This action will delete the \"%1%\" menu item.||Do you want to continue?", + "<1508>": "", + "<1509>": "///////////////////////////////////////////////////////////////////////////////", + "<1510>": "//[RTI_IDE_CTL_EVENTDES]///////////////////////////////////////////////////////", + "<1511>": "", + "<1512>": "EDC001: \"%1%\" is a required control for the Event Designer composite control", + "<1513>": "EDC002: No Type Information passed to the %1% %2% method", + "<1514>": "EDC003: No Event Object ID passed to the %1% %2% method", + "<1515>": "EDC150: Methods", + "<1516>": "EDC151: Select Method|Showing methods for \"%1%\"", + "<1517>": "EDC152: There are no methods available for the \"%1%\" target", + "<1518>": "EDC153: There are no methods available for the \"%1%\" target (Unable to resolve \"%1%\")", + "<1519>": "EDC154: Param%1%", + "<1520>": "EDC160: Specify Method Parameters", + "<1521>": "EDC161: Method Parameters", + "<1522>": "", + "<1523>": "///////////////////////////////////////////////////////////////////////////////", + "<1524>": "//[RTI_DSN_REPTYPE]////////////////////////////////////////////////////////////", + "<1525>": "", + "<1526>": "RTYP001: The Repository Type definition is locked by another process.||Changes will not be allowed", + "<1527>": "RTYP002: Error reading the Repository Type definition (%1%) in the %2% %3% method [%4%]", + "<1528>": "RTYP003: The Repository Type definition is locked by another process.||Changes cannot be saved", + "<1529>": "RTYP004: Error reading the \"%1%\" Repository Type SYSREPOS record in the %2% %3% method [%4%]", + "<1530>": "RTYP005: Error reading the Repository Type record", + "<1531>": "RTYP006: Error unlocking the previous \"%1%\" Repository Type entity in the %2% %3% method [%4%]", + "<1532>": "RTYP007: Entity Locked", + "<1533>": "RTYP008: Repository Type Properties", + "<1534>": "RTYP009: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<1535>": "RTYP010: Saving %1% ...", + "<1536>": "RTYP011: Saving %1% ... OK (%2% chars written)", + "<1537>": "RTYP012: Saving %1% ... Failed!", + "<1538>": "RTYP013: \"%1%\" is not a valid data type", + "<1539>": "RTYP014: Invalid Data Type", + "<1540>": "RTYP015: Data Type", + "<1541>": "RTYP016: Select Return Value Type", + "<1542>": "", + "<1543>": "///////////////////////////////////////////////////////////////////////////////", + "<1544>": "//[RTI_DSN_REPCLASS]///////////////////////////////////////////////////////", + "<1545>": "", + "<1546>": "RCLS001: The Repository Class definition is locked by another process.||Changes will not be allowed", + "<1547>": "RCLS002: Error reading the Repository Class definition (%1%) in the %2% %3% method [%4%]", + "<1548>": "RCLS003: The Repository Class definition is locked by another process.||Changes cannot be saved", + "<1549>": "RCLS004: Error reading the \"%1%\" Repository Class SYSREPOS record in the %2% %3% method [%4%]", + "<1550>": "RCLS005: Error reading the Repository Class record", + "<1551>": "RCLS006: Error unlocking the previous \"%1%\" Repository Class entity in the %2% %3% method [%4%]", + "<1552>": "RCLS007: Entity Locked", + "<1553>": "RCLS008: Repository Class Properties", + "<1554>": "RCLS009: Invalid Category ID \"%1%\" passed to the %2% %3% method", + "<1555>": "RCLS010: Saving %1% ...", + "<1556>": "RCLS011: Saving %1% ... OK (%2% chars written)", + "<1557>": "RCLS012: Saving %1% ... Failed!", + "<1558>": "RCLS013: \"%1%\" is not a valid data type", + "<1559>": "RCLS014: Invalid Data Type", + "<1560>": "RCLS015: Data Type", + "<1561>": "RCLS016: Select Return Value Type", + "<1562>": "", + "<1563>": "///////////////////////////////////////////////////////////////////////////////", + "<1564>": "//[RTI_DSN_REST]/////////////////////////////////////////////////////////", + "<1565>": "", + "<1566>": "REST001: The REST Interface definition is locked by another process.||Changes will not be allowed", + "<1567>": "REST002: Error reading the REST Interface definition (%1%) in the %2% %3% method [%4%]", + "<1568>": "REST009: The REST Interface definition is locked by another process.||Changes cannot be saved", + "<1569>": "REST016: Error reading the \"%1%\" REST Interface record in the %2% %3% method [%4%]", + "<1570>": "REST018: Saving %1% ... Failed!", + "<1571>": "REST019: Saving %1% ... OK (%2% chars written)", + "<1572>": "REST020: The \"%1%\" REST Interface entity is locked by another process and cannot be saved [%2%]", + "<1573>": "REST022: This REST Interface definition has been inherited from another application.|Changes will be saved to a new copy in this application", + "<1574>": "REST023: Any changes you have already made to this REST definition will be lost.|Are you sure you wish to proceed?", + "<1575>": "REST024: Import OpenAPI REST Definition", + "<1576>": "REST101: Save REST Interface Entity", + "<1577>": "REST102: Create new REST Interface handler \"%1%\"?", + "<1578>": "REST103: Rebuild REST Interface handler, overwriting existing procedure \"%1%\"?", + "<1579>": "REST104: Error building REST Interface handler", + "<1580>": "REST105: REST Interface handler \"%1%\" built", + "<1581>": "REST107: REST Interface Properties", + "<1582>": "", + "<1583>": "///////////////////////////////////////////////////////////////////////////////", + "<1584>": "//[RTI_TCL_FETCH_QUERY]////////////////////////////////////////////////////////", + "<1585>": "", + "<1586>": "TFQ100: Executing Query \"%1%\" ...", + "<1587>": "TFQ101: 1 row selected", + "<1588>": "TFQ102: %1% rows selected", + "<1589>": "TFQ103: Activating Query \"%1%\" ...", + "<1590>": "", + "<1591>": "///////////////////////////////////////////////////////////////////////////////", + "<1592>": "///////////////////////////////////////////////////////////////////////////////" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ARTI_XBAND_THEME_DEFAULTS.json b/SYSPROG/APPROW/SYSENV%003ARTI_XBAND_THEME_DEFAULTS.json new file mode 100644 index 0000000..a82dfbe --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ARTI_XBAND_THEME_DEFAULTS.json @@ -0,0 +1,45 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_XBAND_THEME_DEFAULTS" + }, + "body": { + "record1": { + "<1>": "Access 2007 {Segoe UI;20;;#000000;;;}{Segoe UI;9;;#204D89;#C2DCFF;;}{Segoe UI;9;Bold;#000000;;;}{Segoe UI;9;;#000000;;;#F0F0F0}{Segoe UI;8;;#000000;;;}", + "<2>": "Access 2003 {Tahoma;24;;#000000;;;}{Tahoma;8;;#000000;;;}{Tahoma;8;Bold;#000000;;;}{Tahoma;8;;#000000;;;}{Tahoma;8;;#000000;;;}", + "<3>": "Apex {Lucida Sans;20;;#69676D;;;}{Book Antiqua;10;;#CEB966;#69676D;;}{Book Antiqua;10;Bold;#69676D;;a#69676D;}{Book Antiqua;10;;#000000;;;}{Book Antiqua;9;;#A0A0A0;;;}", + "<4>": "Aspect {Verdana;18;;#323232;#E3DED1;;}{Verdana;8;;#E3DED1;#323232;;}{Verdana;8;Bold;#604878;;;}{Verdana;8;;#000000;;;}{Verdana;7;;#323232;;;}", + "<5>": "Civic {Georgia;20;;#D6614A;;;}{Georgia;8;;#E4EEF3;#8CAEAD;;}{Georgia;8;Bold;#090000;;b#000000;}{Georgia;8;;#000000;;b#73A8D4;}{Georgia;7;;#000000;;;}", + "<6>": "Concourse {Eras Medium ITC;20;;#282828;#2DA2BF;;}{Eras Medium ITC;9;;#EEEEEE;#282828;;}{Eras Medium ITC;9;Bold;#576793;;;}{Eras Medium ITC;9;;#282828;;;#EEEEEE}{Eras Medium ITC;8;;#2DA2BF;;;}", + "<7>": "ComponentOne {Eras Medium ITC;20;;;#DD0000;;}{Eras Medium ITC;10;;#EEEEEE;#282828;;}{Eras Medium ITC;10;Bold;#576793;;;}{Eras Medium ITC;10;;#282828;;;#EEEEEE}{Eras Medium ITC;9;;#404040;;;}", + "<8>": "Equity {Franklin Gothic Book;20;;;#D34817;;}{Perpetua;11;;#E9E5DC;#855D5D;;}{Perpetua;11;Bold;#9B2D1F;;;}{Perpetua;11;;#696464;;b#E9E5DC;}{Perpetua;10;;#BFBFBF;;;}", + "<9>": "Flow {Calibri;20;;#04617B;#D1EAF0;;}{Constantia;9;;#04617B;;;}{Constantia;9;Bold;#04617B;;;}{Constantia;9;;#000000;;;}{Constantia;8;;#04617B;;;}", + "<10>": "Foundry {Rockwell;20;;;#676A55;;}{Rockwell;9;;#EAEBDE;#676A55;;}{Rockwell;9;Bold;#EAEBDE;#676A55;;}{Rockwell;9;;#000000;;b#72A376;}{Rockwell;8;;#72A376;;;}", + "<11>": "Median {Tw Cen Mt;20;;#FBEEC9;#775F55;;}{Tw Cen Mt;10;;#FBEEC9;#94B6D2;;}{Tw Cen Mt;10;Bold;#775F55;;;}{Tw Cen Mt;10;;#000000;;;}{Tw Cen Mt;8;;#775F55;;;}", + "<12>": "Metro {Constantia;20;;;#000000;;}{Constantia;9;;;#000000;;}{Constantia;9;Bold;#4E5B6F;;;}{Constantia;9;;#000000;;;}{Constantia;9;;#000000;;;}", + "<13>": "Module {Corbel;20;;;#383265;;}{Corbel;10;;;#383265;;}{Corbel;10;Bold;#000000;;;}{Corbel;10;;#000000;;;#EFEFEF}{Corbel;9;;#000000;;;}", + "<14>": "None {Calibri;20;;#000000;;;}{Calibri;11;;#000000;;;}{Calibri;11;Bold;#000000;;;}{Calibri;11;;#000000;;;}{Calibri;11;;#000000;;;}", + "<15>": "Northwind {Trebuchet;20;;#7F001B;;;}{Arial;9;;#F9F9F7;#C7C5BC;;}{Arial;9;Bold;#CF5216;;;}{Arial;9;;#000000;;;}{Arial;8;;#C7C5BC;;;}", + "<16>": "Office {Cambria;20;Bold;#00224D;;;}{Calibri;9;Bold;#00224D;#79A7E3;;}{Calibri;9;Bold;#5C83B4;;;}{Calibri;9;;#000000;;;}{Calibri;8;;#000000;;;}", + "<17>": "Opulent {Trebuchet;20;;#660066;#E9F7DD;;}{Trebuchet;9;;;#B13F9A;;}{Trebuchet;9;Bold;#B13F9A;;;}{Trebuchet;9;;#000000;;;#E9F7DD}{Trebuchet;8;;#000000;;;}", + "<18>": "Oriel {Century Schoolbook;20;;#575F6D;;;}{Century Schoolbook;9;;#000000;;a#FF7D26;}{Century Schoolbook;9;Bold;#FF7D26;;a#000000;}{Century Schoolbook;9;;#000000;;;#FFF3EB}{Century Schoolbook;8;;#FF7D26;;;}", + "<19>": "Origin {Bookman Old Style;20;;#DDE9EC;#46465D;;}{Gill Sans MT;10;;#DDE9EC;#46465D;;}{Gill Sans MT;10;Bold;#727CA3;;;}{Gill Sans MT;10;;#46465D;;;#DDE9EC}{Gill Sans MT;9;;#000000;;;}", + "<20>": "Paper {Constantia;20;;#000000;#EFF2F5;;}{Constantia;9;;#EFF2F5;#4A606E;;}{Constantia;9;Bold;#4A606E;;b#000000;}{Constantia;9;;#000000;;b#95AEB1;}{Constantia;8;;#95AEB1;;;}", + "<21>": "Solstice {Gill Sans MT;20;;#4F271C;#E7DEC9;;}{Gill Sans MT;10;;#4F271C;#E7DEC9;;}{Gill Sans MT;10;Bold;#3891A7;;;}{Gill Sans MT;10;;#4F271C;;;#E7DEC9}{Gill Sans MT;9;;#9F8D69;;;}", + "<22>": "Technic {Franklin Gothic Book;20;;;#3B3B3B;;}{Arial;9;;#D4D2D0;#000000;;}{Arial;9;Bold;#979EA8;;b#979EA8;}{Arial;9;;#3B3B3B;;b#979EA8;}{Arial;8;;#000000;;;}", + "<23>": "Trek {Franklin Gothic Book;20;;#4E3B30;;;}{Franklin Gothic Book;10;Bold;#4E3B30;;;}{Franklin Gothic Book;10;Bold;#A5644E;;;}{Franklin Gothic Book;10;;#4E3B30;;;#FBEEC9}{Franklin Gothic Book;9;;#000000;;;}", + "<24>": "Urban {Trebuchet;20;;#42415A;;;}{Georgia;9;;#DEDEDE;#42415A;;}{Georgia;9;Bold;#42415A;;b#000000;}{Georgia;9;;#000000;;;#DEDEDE}{Georgia;8;;#438086;;;}", + "<25>": "Verve {Century Gothic;20;;;#666666;;}{Century Gothic;8;;;#666666;;}{Century Gothic;8;Bold;#666666;;;}{Century Gothic;8;;#000000;;;#D2D2D2}{Century Gothic;7;;#000000;;;}", + "<26>": "Windows Vista {Segoe UI;20;;;#000000;;}{Segoe UI;9;;#FFFFFF;#000000;;}{Segoe UI;9;Bold;#616A76;;;}{Segoe UI;9;;#373C43;;;#EBEBEB}{Segoe UI;8;;#000000;;;}", + "<27>": "Bold {Times New Roman;20;Bold;#800000;;;}{Arial;10;Bold;#000000;;;}{Arial;10;Bold;#000000;;a#000000;}{Times New Roman;9;;#000000;;;}{Times New Roman;8;;#000000;;;}", + "<28>": "Casual {Tahoma;24;Bold;#008080;;;}{Arial;10;;#000000;;;}{Arial;10;Bold;#000000;;b#008080;}{Times New Roman;9;;#000000;;;}{Times New Roman;8;;#000000;;;}", + "<29>": "Compact {Haettenschweiler;26;Bold;#000000;;;}{Haettenschweiler;14;;#000000;;;}{Haettenschweiler;12;;#000000;;;}{Arial;9;;#000000;;;}{Arial;8;;#000000;;;}", + "<30>": "Corporate {Times New Roman;20;Bold-Italic;#000080;;;}{Times New Roman;9;Bold-Italic;#000080;;;}{Times New Roman;9;Bold-Italic;#000080;;b#808080;}{Arial;9;;#000000;;;}{Arial;8;;#000000;;;}", + "<31>": "Formal {Times New Roman;20;;#000000;;;}{Times New Roman;9;Bold;#000000;;;}{Times New Roman;9;Bold;#000000;;;}{Arial;9;;#000000;;;}{Arial;8;;#000000;;;}", + "<32>": "Soft Gray {Arial;24;Bold;;#C0C0C0;;}{Arial;9;;#000000;;a#C0C0C0;}{Arial;9;Bold;#000000;;;}{Times New Roman;9;;#000000;;;}{Times New Roman;8;;#000000;;;}", + "<33>": "Verdana {Verdana;18;Bold;;#4580B5;;}{Verdana;9;Bold;#4580B5;;a#000000;}{Verdana;9;;#4580B5;;;}{Verdana;9;;#000000;;;}{Verdana;8;;#000000;;;}", + "<34>": "Web Report {Verdana;18;Bold;#50308C;#F5F5DC;;}{Verdana;9;Bold;#50308C;;a#000000;}{Verdana;9;;#4580B5;;;}{Verdana;9;;#000000;;;}{Verdana;8;;#000000;;;}" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_BOARDS_PREFIX.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_BOARDS_PREFIX.json new file mode 100644 index 0000000..502a498 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_BOARDS_PREFIX.json @@ -0,0 +1,12 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_COPY_BOARDS_PREFIX" + }, + "body": { + "record1": { + "<1>": "[] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [
] [] [] [
] [] []" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_BOARDS_SUFFIX.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_BOARDS_SUFFIX.json new file mode 100644 index 0000000..f0638b3 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_BOARDS_SUFFIX.json @@ -0,0 +1,12 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_COPY_BOARDS_SUFFIX" + }, + "body": { + "record1": { + "<1>": "[] [] [
] [] [] [
]" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_HTML_PREFIX.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_HTML_PREFIX.json new file mode 100644 index 0000000..e00c1ee --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_HTML_PREFIX.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_COPY_HTML_PREFIX" + }, + "body": { + "record1": { + "<1>": "

", + "<2>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_HTML_SUFFIX.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_HTML_SUFFIX.json new file mode 100644 index 0000000..19ec4f5 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_COPY_HTML_SUFFIX.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_COPY_HTML_SUFFIX" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "

" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_HELPFILES.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_HELPFILES.json new file mode 100644 index 0000000..a3ba41a --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_HELPFILES.json @@ -0,0 +1,117 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_HELPFILES" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "SRP_Backup", + "<1,2>": "SRPSendMail", + "<1,3>": "SRP_Send_Mail", + "<1,4>": "SRP_Set_MinMaxInfo", + "<1,5>": "SRP_Show_Window", + "<1,6>": "SRP_SysColorChange", + "<1,7>": "SRP_Set_SysColorChange", + "<1,8>": "SRP_Clean_Array", + "<1,9>": "SRP_Copy_Memory", + "<1,10>": "SRP_Decode", + "<1,11>": "SRP_Encode", + "<1,12>": "SRP_Hash", + "<1,13>": "SRP_Registry", + "<1,14>": "SRP_Reorder_Array", + "<1,15>": "SRP_Rotate_Array", + "<1,16>": "SRP_Run_Command", + "<1,17>": "SRP_Sort_Array", + "<1,18>": "SRP_Zip_AddFile", + "<1,19>": "SRP_Zip_Close", + "<1,20>": "SRP_Zip_Create", + "<1,21>": "SRP_Zip_ExtractFile", + "<1,22>": "SRP_Zip_FindFile", + "<1,23>": "SRP_Zip_GetFileList", + "<1,24>": "SRP_Zip_GetLastError", + "<1,25>": "SRP_Zip_Open", + "<1,26>": "SRP_Zip_RemoveFile", + "<1,27>": "SRP_Math", + "<1,28>": "SRP_Com", + "<1,29>": "SRP_Extract_Xml", + "<1,30>": "SRP_Save_Screenshot", + "<1,31>": "SRP_Join_Arrays", + "<1,32>": "SRP_TcpClient", + "<1,33>": "SRP_Taskbar" + }, + "<2>": { + "<2,1>": "SRP_Backup.chm::/SRP_Backup_Utility.html", + "<2,2>": { + "<2,2,1>": "SRP_Mail.chm::/SRP_Send_Mail.htm", + "<2,2,2>": "SRPMail.chm::/SRP_Send_Mail.htm" + }, + "<2,3>": "SRP_Mail.chm::/SRP_Send_Mail.htm", + "<2,4>": { + "<2,4,1>": "SRP_Utilities.chm::/SRP_Utilities_MinMaxInfo.htm", + "<2,4,2>": "SRP_MinMax_Info.chm::/SRP_MinMax_Info.html" + }, + "<2,5>": { + "<2,5,1>": "SRP_Utilities.chm::/SRP_Utilities_ShowWindow.htm", + "<2,5,2>": "SRP_Show_Window.chm::/SRP_Show_Window.htm" + }, + "<2,6>": "SRP_Show_Window.chm::/SRP_SysColorChange.htm", + "<2,7>": "SRP_Utilities.chm::/SRP_Utilities_SysColorChange.htm", + "<2,8>": "SRP_Utilities.chm::/SRP_Utilities_Clean_Array.htm", + "<2,9>": "SRP_Utilities.chm::/SRP_Utilities_Copy_Memory.htm", + "<2,10>": "SRP_Utilities.chm::/SRP_Utilities_Decode.htm", + "<2,11>": "SRP_Utilities.chm::/SRP_Utilities_Encode.htm", + "<2,12>": "SRP_Utilities.chm::/SRP_Utilities_Hash.htm", + "<2,13>": "SRP_Utilities.chm::/SRP_Utilities_Registry.htm", + "<2,14>": "SRP_Utilities.chm::/SRP_Utilities_Reorder_Array.htm", + "<2,15>": "SRP_Utilities.chm::/SRP_Utilities_Rotate_Array.htm", + "<2,16>": "SRP_Utilities.chm::/SRP_Utilities_Run_Command.htm", + "<2,17>": "SRP_Utilities.chm::/SRP_Utilities_Sort_Array.htm", + "<2,18>": { + "<2,18,1>": "SRP_Zip.chm::/SRP_Zip_AddFile.htm", + "<2,18,2>": "SRPZip.chm::/SRP_Zip_AddFile.htm" + }, + "<2,19>": { + "<2,19,1>": "SRP_Zip.chm::/SRP_Zip_Close.htm", + "<2,19,2>": "SRPZip.chm::/SRP_Zip_Close.htm" + }, + "<2,20>": { + "<2,20,1>": "SRP_Zip.chm::/SRP_Zip_Create.htm", + "<2,20,2>": "SRPZip.chm::/SRP_Zip_Create.htm" + }, + "<2,21>": { + "<2,21,1>": "SRP_Zip.chm::/SRP_Zip_ExtractFile.htm", + "<2,21,2>": "SRPZip.chm::/SRP_Zip_ExtractFile.htm" + }, + "<2,22>": { + "<2,22,1>": "SRP_Zip.chm::/SRP_Zip_FindFile.htm", + "<2,22,2>": "SRPZip.chm::/SRP_Zip_FindFile.htm" + }, + "<2,23>": { + "<2,23,1>": "SRP_Zip.chm::/SRP_Zip_GetFileList.htm", + "<2,23,2>": "SRPZip.chm::/SRP_Zip_GetFileList.htm" + }, + "<2,24>": { + "<2,24,1>": "SRP_Zip.chm::/SRP_Zip_GetLastError.htm", + "<2,24,2>": "SRPZip.chm::/SRP_Zip_GetLastError.htm" + }, + "<2,25>": { + "<2,25,1>": "SRP_Zip.chm::/SRP_Zip_Open.htm", + "<2,25,2>": "SRPZip.chm::/SRP_Zip_Open.htm" + }, + "<2,26>": { + "<2,26,1>": "SRP_Zip.chm::/SRP_Zip_RemoveFile.htm", + "<2,26,2>": "SRPZip.chm::/SRP_Zip_RemoveFile.htm" + }, + "<2,27>": "SRP_Utilities.chm::/SRP_Utilities_Math.htm", + "<2,28>": "SRP_Utilities.chm::/SRP_Utilities_Com.htm", + "<2,29>": "SRP_Utilities.chm::/SRP_Utilities_Extract_Xml.htm", + "<2,30>": "SRP_Utilities.chm::/SRP_Utilities_Save_Screenshot.htm", + "<2,31>": "SRP_Utilities.chm::/SRP_Utilities_Join_Arrays.htm", + "<2,32>": "SRP_Utilities.chm::/SRP_Utilities_TcpClient.htm", + "<2,33>": "SRP_Utilities.chm::/SRP_Utilities_Taskbar.htm" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_HISTORY.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_HISTORY.json new file mode 100644 index 0000000..0e5ae70 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_HISTORY.json @@ -0,0 +1,636 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_HISTORY" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "3.4.5", + "<1,2>": "Fixed syntax coloring bug when using multibyte UTF-16 characters in strings and comments" + }, + "<2>": { + "<2,1>": "3.4.4", + "<2,2>": "Updated Open Record dialog to always default to previous table and record", + "<2,3>": "Fixed false “Stored Procedure not found” errors", + "<2,4>": "Fixed Open Record dialog's Refresh button setting text to \"1\" in OI 10", + "<2,5>": "Fixed CLIENTSIZE returning wrong value in some RDP environments", + "<2,6>": "Fixed anchoring of button on Add to Repository form in OI 10", + "<2,7>": "Fixed VNAV when using F9 to save records" + }, + "<3>": { + "<3,1>": "3.4.3", + "<3,2>": "Added Hook and Unhook TCL commands", + "<3,3>": "Improved VNAV filtering", + "<3,4>": "Fixed Open Record dialog's Refresh button in OI 10", + "<3,5>": "Fixed incorrect VNAVs in OI 10" + }, + "<4>": { + "<4,1>": "3.4.2", + "<4,2>": "Added New button to RDK Window", + "<4,3>": "Updated SRP Editor to save favorites and opened file lists every time it changes instead of when closing" + }, + "<5>": { + "<5,1>": "3.4.1", + "<5,2>": "Added Expand All and Collapse All to Edit menu", + "<5,3>": "Updated Open Record dialog to better handle Quickdex indexes", + "<5,4>": "Updated deletion of procedures and inserts to also update git repo", + "<5,5>": "Updated auto-commenter to no longer insert unnecessary spaces", + "<5,6>": "Updated tooltips to be DPI aware in OI 10", + "<5,7>": "Updated Favorites and Test panels to reset to defaults if sizes become inordinately large", + "<5,8>": "Fixed Find Previous not working in OI 9", + "<5,9>": "Fixed false VNAVs for variables inside function calls", + "<5,10>": "Fixed Replace All inserting replacements at beginning of next line", + "<5,11>": "Fixed New Item screen DPI issues in OI 10" + }, + "<6>": { + "<6,1>": "3.4", + "<6,2>": "Added Calendar control to SRP_ActiveX_Info", + "<6,3>": "Added DPI awareness for OI 10", + "<6,4>": "Updated OI 10 version to initialize OIPI before printing, not during startup", + "<6,5>": "Updated SRP_ActiveX_Info to be more tolerant of missing registrations", + "<6,6>": "Updated OI 10 version to support changes to OI 10.2", + "<6,7>": "Fixed bug in OI 10 where event dropdowns for OI controls would be empty" + }, + "<7>": { + "<7,1>": "3.3.8", + "<7,2>": "Added Shift+F2 shortcut to jump to previous marker", + "<7,3>": "Updated Add to RDK dialog to work correctly with OI 10 RDK format", + "<7,4>": "Fixed bug where opening a record from a CODE table that wasn’t code would hang" + }, + "<8>": { + "<8,1>": "3.3.7", + "<8,2>": "Fixed splitter bar settings in OI 10" + }, + "<9>": { + "<9,1>": "3.3.6", + "<9,2>": "Updated Help menu command to open OI Help in OI 10", + "<9,3>": "Fixed bug in OI 10 where Ctrl+F and Ctrl+H wouldn’t work in some circumstances" + }, + "<10>": { + "<10,1>": "3.3.5", + "<10,2>": "Fixed bug where List command would not format some columns", + "<10,3>": "Fixed bug where Find window would clear out Label List combo box during search" + }, + "<11>": { + "<11,1>": "3.3.4", + "<11,2>": "Fixed bug where Find would not highlight a word if it was the last word in the document", + "<11,3>": "Fixed bug where undoing a record expansion would not update the margin to match the change" + }, + "<12>": { + "<12,1>": "3.3.3", + "<12,2>": "Updated Format tool to ignore code between #pre and #endpre directives (requires SRP Utilities 2.2)", + "<12,3>": "Fixed bug where selecting large numbers would break to debugger" + }, + "<13>": { + "<13,1>": "3.3.2", + "<13,2>": "Added directives to autocomplete dropdown, e.g., #ifdef, #region, etc.", + "<13,3>": "Fixed bug where autojustify would break while Find/Replace was active" + }, + "<14>": { + "<14,1>": "3.3.1", + "<14,2>": "Removed autofill from combo boxes in Find/Replace windows" + }, + "<15>": { + "<15,1>": "3.3", + "<15,2>": "Added check for existing stored procedures during compile", + "<15,3>": "Added Copy Special... menu item", + "<15,4>": "Updated Copy logic to only copy text in color. For line numbers, use the new Copy Special... menu item", + "<15,5>": "Updated Find and Replace dialogs to appear in top right corner of editor", + "<15,6>": "Updated Find dialog to stay open", + "<15,7>": "Updated Find and Replace to highlight all instances of search text while dialog is open", + "<15,8>": "Updated Find and Replace to show X of Y when moving to Next and Previous search", + "<15,9>": "Updated Replace dialog to support F4", + "<15,10>": "Updated license handling", + "<15,11>": "Updated VNAV handling to exlude variables after DIM/DIMENSION statement", + "<15,12>": "Fixed bug where adding new lines after a THEN keyword would insert an END keyword below even if there is already an END or END ELSE", + "<15,13>": "Fixed bug where new Events or Services (Extended BASIC+) wouldn't get code folded", + "<15,14>": "Fixed bug where Unit Testing panel would not resize when hiding/showing Command Line", + "<15,15>": "Fixed bug where Update_Index tooltip didn't show new parameter: bSuppressMsg", + "<15,16>": "Fixed bug where Ctrl+U would not work if a partial word was selected", + "<15,17>": "Fixed bug where Ctrl+J would not handle empty elements safely" + }, + "<16>": { + "<16,1>": "3.2.3", + "<16,2>": "Fixed references to SRPControls.ocx that should have reference SRPEditor.ocx", + "<16,3>": "Fixed options dialog to update unit test panel when theme changes", + "<16,4>": "Fixed bug where changing theme would sometimes leave behind artifacts from other themes", + "<16,5>": "Fixed bug where auto indent would sometimes insert an extra tab" + }, + "<17>": { + "<17,1>": "3.2.2", + "<17,2>": "Updated folding algorithm to better handle blanks lines before and after a fold" + }, + "<18>": { + "<18,1>": "3.2.1", + "<18,2>": "Fixed critical bug where saving records with @RMs could corrupt record data by reposition @RMs in wrong location", + "<18,3>": "Fixed bug where region name wouldn't update correctly in Label List or sometimes disappear", + "<18,4>": "Fixed bug where deleting DEBUG would not delete the margin marker", + "<18,5>": "Fixed bug where VIEWER window would cause tabs to get out of sync or mislabelled" + }, + "<19>": { + "<19,1>": "3.2", + "<19,2>": "Added code folding", + "<19,3>": "Added splash screen" + }, + "<20>": { + "<20,1>": "3.1.4", + "<20,2>": "Fixed bug where new records wouldn't show <1> in the margin and would error out upon pressing ENTER" + }, + "<21>": { + "<21,1>": "3.1.3", + "<21,2>": "Updated IConv/OConv context menus to better recognize legitimate conversions", + "<21,3>": "Improved record loading/editing speeds, especially for large records", + "<21,4>": "Fixed bug where Favorited records would sometimes reopen in Forced Readonly mode", + "<21,5>": "Fixed bug where Open Record dialog would not highlight correct field when opened", + "<21,6>": "Fixed bug where License screens would appear when they shouldn't" + }, + "<22>": { + "<22,1>": "3.1.2", + "<22,2>": "Updated SRP Editor to auto-insert SRP_PreCompiler when unpacking syntax is used." + }, + "<23>": { + "<23,1>": "3.1.1", + "<23,2>": "Added opption to disable auto-insertion of the SRP_PreCompiler" + }, + "<24>": { + "<24,1>": "3.1", + "<24,2>": "Added OI 10 support", + "<24,3>": "Added Joker and Visual Studio Dark themes", + "<24,4>": "Added button to Options dialog for adding SRP Editor to the IDE's Tool Menu", + "<24,5>": "Added Auto Justify Assignments feature (see Options)", + "<24,6>": "Updated to better interact with APPROW entities when SRP Git is enabled", + "<24,7>": "Updated Open Procedure dialog to ignore AREV32's \"SOURCE:\" pointers", + "<24,8>": "Updated Main UI settings to be saved per app, instead of globally to all apps", + "<24,9>": "Updated Open Record dialog to default to active record's table and key instead of the last table and key", + "<24,10>": "Fixed bug where dialog boxes would show on wrong monitor", + "<24,11>": "Fixed bug where licensing boxes would crash OI", + "<24,12>": "Fixed bug where saving stored procedures would append \\00\\", + "<24,13>": "Fixed bug where creating new items would cause all MDI windows to un-maximize", + "<24,14>": "Fixed bug where Table Search progress bar was not accurate", + "<24,15>": "Fixed bug where Table Search would search when pressing ENTER even though the Results window had focus" + }, + "<25>": { + "<25,1>": "3.0.3", + "<25,2>": "Updated SRP Editor to recognize SRP Git when writing files to ensure they get pushed to the Git repo", + "<25,3>": "Updated Git menu", + "<25,4>": "Updated SRP Table Search", + "<25,5>": "Updated Code Format tool to recognize Enhanced BASIC+", + "<25,6>": "Updated \"Tabs as Spaces\" options to be enabled by default", + "<25,7>": "Fixed bug where Bookmarks from one document would load in another", + "<25,8>": "Fixed bug where items wouldn't save correctly during shutdown", + "<25,9>": "Fixed bug where new item couldn't be dragged in Favorites pane after being Saved", + "<25,10>": "Fixed bug where EDIT command would not open empty records", + "<25,11>": "Fixed bug where doing a Save and Compile (F9) of a new stored procedures wouldn't compile" + }, + "<26>": { + "<26,1>": "3.0.2", + "<26,2>": "Added Git menu, which displays different options if SRP GIT Utility is installed.", + "<26,3>": "Added special icon for records forced into readonly mode.", + "<26,4>": "Added single-key accelerators to the New item window.", + "<26,5>": "Updated Record Open window to be much, much faster.", + "<26,6>": "Updated favorites to remember when records were forced to open readonly.", + "<26,7>": "Updated Event modules to auto-append .MENU() when selecting a MENU event from the dropdown", + "<26,8>": "Updated several autocomplete dropdowns to appear immediately after pressing space instead of waiting for a leading character, e.g., after gosub, goto, and $insert", + "<26,9>": "Fixed occasional bug where selecting a control in an Event would append empty parameters instead of letting the user select an event" + }, + "<27>": { + "<27,1>": "3.0.1", + "<27,2>": "Added keyword highlighting for API and GoToAPI (requires SRPUtil.ocx 4.0.8 or later)", + "<27,3>": "Added support within SRP_PreCompiler for API and GoToAPI keywords", + "<27,4>": "Updated SRP Editor to automatically save and restore bookmarks between sessions within stored procedures (requires SRPUtil.ocx 4.0.8 or later)", + "<27,5>": "Updated SRP Editor to save and restore location and selection information between sessions within stored procedures and inserts (requires SRPUtil.ocx 4.0.8 or later)", + "<27,6>": "Extended syntax highlighting of brace matching to also include { }, < >, [ ] (requires SRPUtil.ocx 4.0.8 or later)", + "<27,7>": "Fixed \"Refresh\" typo in Unit Test panel context menu", + "<27,8>": "Fixed bug preventing user from showing/hiding the Unit Test panel unless the Favorites panel was visible" + }, + "<28>": { + "<28,1>": "3.0", + "<28,2>": "Added Unit Testing", + "<28,3>": "Added New Item window that is now bound to Ctrl+N (File, New)", + "<28,4>": "Added code templates", + "<28,5>": "Updated Run window to recognize metadata", + "<28,6>": "Updated SRP PreCompiler to place common variables at @pragma line instead of at the beginning of the first Etended BASIC+ line. #pragma should be as close to the top of the code as possible as a result.", + "<28,7>": "Updated TCL to no longer auto complete, though the dropdown will still appear with a filtered history of previously used commands", + "<28,8>": "Updated Table Search utility to sort tables", + "<28,9>": "Fixed bug where SRP Editor would crash on OI 9.1 and earlier when closing document from Favorites", + "<28,10>": "Fixed bug where \"end\" keyword would be auto-inserted if a one-line if statement ended with a debug", + "<28,11>": "Fixed bug where visual artifact would appear when resizing Open Record dialog", + "<28,12>": "Fixed bug where wrong parameter types would appear for DLL stubs" + }, + "<29>": { + "<29,1>": "2.9.1", + "<29,2>": "Added support for Setting keyword in For Each loop to allow developers to include a counter", + "<29,3>": "Added ability to close documents directly from the tab strip", + "<29,4>": "Added ability to close documents directly from the Favorites pane", + "<29,5>": "Added smart insert feature to automatically insert block closers (e.g., End after If or Repeat after Loop)", + "<29,6>": "Added ability to customize keyword case in autocomplete and smart indents (See Customize Tab)", + "<29,7>": "Added right-click context menus to Favorites pane for more intuitive interaction", + "<29,8>": "Updated SRP_PreCompiler to use older op-codes when compiled in OI 9.1.x or earlier", + "<29,9>": "Updated SRP_PreCompiler to support both \"or\" or \"else\" keyword in Enhanced BASIC+ Return statement, e.g., \"Return Ans else 1\"", + "<29,10>": "Updated SRP_PreCompiler to ignore writing meta data when called from BLINT", + "<29,11>": "Updated width of Label combo box", + "<29,12>": "Updated auto complete to complete on Tab as well as Enter", + "<29,13>": "Updated Favorites panel with context menu for more intuitive control over favorites", + "<29,14>": "Updated SRP Editor to close a faster and more reliably when there are unsaved documents", + "<29,15>": "Fixed bug in SRP_PreCompiler where Enhanced BASIC+ keywords within comment blocks were not being ignored", + "<29,16>": "Fixed bug in SRP_PreCompiler where GoToEvent would sometimes not find the correct event handler", + "<29,17>": "Fixed bug in SRP_PreCompiler where While/Until clauses sometimes wouldn't compile", + "<29,18>": "Fixed bug in SRP_PreCompiler where For Each would miss last element if it was a single letter", + "<29,19>": "Fixed bug in SRP_PreCompiler where Service with no parameters would offset the debugger by one line", + "<29,20>": "Fixed bug in SRP_PrcCompiler where wrong service metadata would be created if procedure had inherited version" + }, + "<30>": { + "<30,1>": "2.9", + "<30,2>": "Added SRP_PreCompiler to support Enhanced BASIC+", + "<30,3>": "Added syntax highlighting support for Enhanced BASIC+ (requires SRPUtil.ocx 4.0.3 or later)", + "<30,4>": "Added automatic insertion of SRP_PreCompiler during compile when Enhanced BASIC+ is detected (requires SRPUtil.ocx 4.0.3 or later)", + "<30,5>": "Added ability to right click to Insert SRP_PreCompiler (requires SRPUtil.ocx 4.0.3 or later)", + "<30,6>": "Added syntax highlighting for directives (e.g., #pragma). Updated built-in themes to support it also.", + "<30,7>": "Updated MENU.HELP to check for ProgRef.chm before trying to run it", + "<30,8>": "Updated Open Record dialog's autofill to improve speed and reduce dropped characters (requires SRPUtil.ocx 4.0.3 or later)", + "<30,9>": "Updated Label dropdown to match typed input anywhere, so typing CREATE will find CREATE, WINDOW.CREATE, MY_CREATE, etc.", + "<30,10>": "Updated Goto Source function (F12) to be more forgiving about finding the correct label", + "<30,11>": "Fixed Options dialog Theme button using SRPControls.ocx instead of SRPUtil.ocx", + "<30,12>": "Fixed bug where printing records started on field <2> instead of field <1>", + "<30,13>": "Fixed bug where highlighting whole label at end of line didn't jump to that label when performing Goto Source function (F12)", + "<30,14>": "Fixed bug where VNAV detection was sometimes inaacurate (requires SRPUtil.ocx 4.0.3 or later)", + "<30,15>": "Fixed bug where VNAV detection would be applied to cached code when compiling inherited stored procedures", + "<30,16>": "Fixed bug where some document types would not be marked as modified (needing to be saved) when doing a find & replace" + }, + "<31>": { + "<31,1>": "2.8", + "<31,2>": "Added syntax highlighting themes", + "<31,3>": "Added support for themes, so it will be easier to switch between themes on the fly", + "<31,4>": "Added ability to export/import all options to/from a file", + "<31,5>": "Added logic to reset Status window on startup if it's too large to fit", + "<31,6>": "Updated Styles to be cascading, so everything falls back to Default style when not set", + "<31,7>": "Updated all icons to more modern ones", + "<31,8>": "Updated Compile function (F9) to automatically calls DECLARE_FCNS for \"SYSPROC*DLL_\" records", + "<31,9>": "Updated Auto text settings to now save to %APPDATA%\\Roaming as text files instead of using the registry to allow for more characters", + "<31,10>": "Updated F12 to jump to label if cursor is on a label identifier", + "<31,11>": "Updated \"This Application Only\" check box in Open dialog to put focus back into the main edit field after being clicked", + "<31,12>": "Fixed bug where labels followed by \"*\" or \"//\" were not recognized", + "<31,13>": "Fixed bug where some compiler errors were not displaying correctly in the status pane" + }, + "<32>": { + "<32,1>": "2.7.1", + "<32,2>": "Fixed false-positive error message appearing when running SRP Editor from 9.x IDE", + "<32,3>": "Fixed bug where tree items showing tooltips needed to be clicked twice", + "<32,4>": "Fixed bug where clicking on Records or DOS files in the Favorites panel didn't work" + }, + "<33>": { + "<33,1>": "2.7", + "<33,2>": "Added ability to copy code ready to paste for new SRP Forums", + "<33,3>": "Updated service-oriented metadata to support routines that can access other service modules", + "<33,4>": "Updated F1 to search new SRP Wiki website", + "<33,5>": "Improved performance during startup", + "<33,6>": "Removed special case code for a deprecated application", + "<33,7>": "Fixed XML mode failing to perform syntax highlighting", + "<33,8>": "Fixed bug not allowing SRP Editor to run in OI 10", + "<33,9>": "Fixed bug where keywords other than Compile at beginning of first line would force SAVE_AS intead of SAVE", + "<33,10>": "Fixed bug where wrong statistics would appear in the status bar when start SRP Editor with opened documents" + }, + "<34>": { + "<34,1>": "2.6.2", + "<34,2>": "Added Justify Array tool for making arrays look nice and neat (Ctrl+J)", + "<34,3>": "Added \"Open as Read Only\" to Open Record dialog, allowing users to open records without locking them", + "<34,4>": "Added \"Find\" menu item in the context menu to make finding the current selection or word quick and convenient", + "<34,5>": "Added option to assign F1 to SRP Help and Shift+F1 to OI Help", + "<34,6>": "Updated Save logic to display Save As dialog if the stored procedure's name has changed", + "<34,7>": "Fixed bug where inaccurate compilation errors were being reported", + "<34,8>": "Fixed bug where saving a new entity for the first time failed to pre-populate the entity name", + "<34,9>": "Fixed bug where leading white space was bring trimmed from block comments during the Format command", + "<34,10>": "Fixed bug where Print dialog's Paper Size field was not always correct", + "<34,11>": "Fixed bug where using the up arrow to scroll up would cause the cursor to skip a line", + "<34,12>": "Fixed bug where Shift Left and Shift Right buttons weren't working correctly", + "<34,13>": "Fixed bug where Ctrl+D would duplicate lines on read only files instead of doing nothing like it should", + "<34,14>": "Fixed bug where the entitiy Save As dialog would always reset the \"This Application Only\" setting for the entity Open dialog" + }, + "<35>": { + "<35,1>": "2.6.1", + "<35,2>": "Added F12 as Accelerator for the Goto Source functionality (for Visual Studio habits)", + "<35,3>": "Updated SRP Editor to use new SRPUtil.ocx: a copy of SRPControls.ocx with different ProgIDs so that it doesn't conflict with commercial SRP ActiveX Controls", + "<35,4>": "Updated SRP Editor to synchronize tab order with order of documents in Favorites pane", + "<35,5>": "Updated SRP Editor to re-open previously opened documents in their original tab order when started", + "<35,6>": "Updated user interface to be more responsive, especially on shutdown", + "<35,7>": "Updated RDK and About dialogs to be closed with the ESC key", + "<35,8>": "Updated Record Open dialog to allow user to stop a refresh at any time", + "<35,9>": "Updated Record Open dialog to select default Table/Record in listboxes when it opens", + "<35,10>": "Fixed bug where error status would be shown when successfully running a stored procedure (Ctrl+F9) rather than an OK status", + "<35,11>": "Fixed bug where pressing Ctrl+T on the first line would cause a crash", + "<35,12>": "Fixed bug where clicking on Favorites that was already active would not return focus back to editor", + "<35,13>": "Fixed bug where Autocomplete would not display functions from some inherited applications", + "<35,14>": "Fixed bug where Call Tips would not display information for functions from some inherited applications", + "<35,15>": "Fixed bug where Goto Source functionality would not work in certain circumstances", + "<35,16>": "Fixed bug where a new record, when saved, would not appear correctly in the Most Recently Used list, making it impossible to open it from there", + "<35,17>": "Fixed bug where clicking a drop down item of the Command Line was moving focus out of the Command Line", + "<35,18>": "Fixed bug where Replace All would not replace all instances if replacement was larger than original string", + "<35,19>": "Fixed bug where document would not appear as needing to be saved after Replace All", + "<35,20>": "Fixed bug where users would get a license warning in the Options dialog if they didn't have a license for the SRP Editor control but had a license for the SRP Editor itself" + }, + "<36>": { + "<36,1>": "2.6", + "<36,2>": "Added support for displaying autocomplete dropdowns for service-oriented stored procedures using user-defined metadata", + "<36,3>": "Added Favorites panel (Toggle with F8)", + "<36,4>": "Added ability to hide tabs permanently", + "<36,5>": "Added ability to change status pane size using splitter", + "<36,6>": "Added ability to close windows using Ctrl+W", + "<36,7>": "Updated Shift+F1 feature to go to SRP's Wiki instead of CHM help files (which will no longer ship with SRP Products)", + "<36,8>": "Fixed bug where return value would not appear in status window when running a routine using Ctrl+F9", + "<36,9>": "Fixed crash that would sometimes occur when pasting text into a function (Requires SRPEditor.ocx 3.0.3 or SRPControls.ocx 3.0.7)", + "<36,10>": "Fixed bug where spaces woudl be converted into tabs when in record mode (Requires SRPEditor.ocx 3.0.3 or SRPControls.ocx 3.0.7)", + "<36,11>": "Fixed cursor positioning bug (Requires SRPEditor.ocx 3.0.3 or SRPControls.ocx 3.0.7)", + "<36,12>": "Fixed bug where selected text would sometimes appear unselected in records (Requires SRPEditor.ocx 3.0.3 or SRPControls.ocx 3.0.7)", + "<36,13>": "Fixed bug where remainder of current line would be selected when an editor was first activated (Requires SRPEditor.ocx 3.0.3 or SRPControls.ocx 3.0.7)", + "<36,14>": "Fixed bug where LengthChanged event was always firing rather than only firing when the lenfth of the document actually changes (Requires SRPEditor.ocx 3.0.3 or SRPControls.ocx 3.0.7)", + "<36,15>": "Fixed bug where calltip would appear after typing an open parenthesis inside a string (Requires SRPEditor.ocx 3.0.3 or SRPControls.ocx 3.0.7)" + }, + "<37>": { + "<37,1>": "2.5.6", + "<37,2>": "Fixed bug where not having SRP ReportTable or SRP Subclass controls licensed caused license warnings despite having SRP Editor licensed" + }, + "<38>": { + "<38,1>": "2.5.5", + "<38,2>": "Fixed bug where recently opened documents would not reopen upon startup" + }, + "<39>": { + "<39,1>": "2.5.4", + "<39,2>": "Updated Status window to only use black text but to incorporate icons", + "<39,3>": "Fixed bug where SRP Editor would beep evertime documents opened during startup" + }, + "<40>": { + "<40,1>": "2.5.3", + "<40,2>": "Added \"OPENDOCUMENTINFO\" service to SRP_Editor_Utility" + }, + "<41>": { + "<41,1>": "2.5.2", + "<41,2>": "Fixed error in which the \"Compile and Execute\" command was compiling but not executing" + }, + "<42>": { + "<42,1>": "2.5.1", + "<42,2>": "Added ability to disable sound effects (except for compiling code with errors)" + }, + "<43>": { + "<43,1>": "2.5", + "<43,2>": "Added SRP_ActiveX_Info.exe support", + "<43,3>": "Added SRP_Controls.ocx help support", + "<43,4>": "Fixed bug where new stored procedures could not be saved if inherited stored procedure already exists" + }, + "<44>": { + "<44,1>": "2.4.1", + "<44,2>": "Removed debug statement" + }, + "<45>": { + "<45,1>": "2.4", + "<45,2>": "Fixed error in which entities accessed via Repository had their line breaks restored back to @FMs, which the SRP Editor expects when parsing and displaying" + }, + "<46>": { + "<46,1>": "2.3.9", + "<46,2>": "Updated logic to use Repository to open entities whenever possible instead of reading records directly; allows for better interaction with other tools such as SRP Mobile Repository" + }, + "<47>": { + "<47,1>": "2.3.8", + "<47,2>": "Added SRP_Taskbar and SRP_TcpClient to the help file references" + }, + "<48>": { + "<48,1>": "2.3.7", + "<48,2>": "Fixed bug where SRP Editor would crash during VNAV preprocessing in OI 9.1.1" + }, + "<49>": { + "<49,1>": "2.3.6", + "<49,2>": "Added TCL tab to the options dialog to allow users to supply routines whose parameter counts are not stored in object code", + "<49,3>": "Updated command line to support built-in OI routines when too few parameters are passed" + }, + "<50>": { + "<50,1>": "2.3.5", + "<50,2>": "Fixed bug where commented out lines containing semicolons where not getting removed, so keywords such as THEN were erroneously altering the indentation" + }, + "<51>": { + "<51,1>": "2.3.4", + "<51,2>": "Fixed bug where some commented out lines were causing errors in formatting when using the Format command" + }, + "<52>": { + "<52,1>": "2.3.3", + "<52,2>": "Fixed bug where cancelling the Windows.Close_All command would result in a VNAV" + }, + "<53>": { + "<53,1>": "2.3.2", + "<53,2>": "Fixed bug where keywords such as End, when appearing after GoTo, would not be colorized correctly and could cause smart indenting to operate incorrectly" + }, + "<54>": { + "<54,1>": "2.3.1", + "<54,2>": "Fixed bug where delims.dat and version.dat files (remnants of testing) were written to the C:\\ drive on startup" + }, + "<55>": { + "<55,1>": "2.3", + "<55,2>": "Added new SRP Utilities help file references, so pressing Shift+F1 while the cursor is on an SRP Utility file will take the user straight to the SRP Utilities help file topic." + }, + "<56>": { + "<56,1>": "2.2.9", + "<56,2>": "Added ability to close Print dialog by pressing ESC" + }, + "<57>": { + "<57,1>": "2.2.8", + "<57,2>": "Fixed bug where the Window.Close_All menu was not closing the child windows" + }, + "<58>": { + "<58,1>": "2.2.7", + "<58,2>": "Fixed bug where Compile & Execute command would not enable" + }, + "<59>": { + "<59,1>": "2.2.6", + "<59,2>": "Fixed bug where print dialog would draw line numbers next to comment blocks in the comment block color", + "<59,3>": "Fixed bug where modified status of document doesn't reset when using Ctrl+F9", + "<59,4>": "Replaced command line combo box with subclassed edit line for better performance and reliability in Vista", + "<59,5>": "Updated Label combo box to show correct column labels for dictionaries", + "<59,6>": "Fixed bug where compilation wouldn't work on some delevoper class engines" + }, + "<60>": { + "<60,1>": "2.2.5", + "<60,2>": "Fixed bug where Options dialog would break to debugger for first time SRP Editor user" + }, + "<61>": { + "<61,1>": "2.2.4", + "<61,2>": "Added two new panes to status bar to display current application and username", + "<61,3>": "Added ability to display a custom formatted pane defined in SYSENV*SRP_EDITOR_CUSTOM_STATUS_PANE, allowing users to display something useful about the SRP Editor's environment" + }, + "<62>": { + "<62,1>": "2.2.3", + "<62,2>": "Fixed bug where attempting to save to a non-existant table would not notify user that save failed", + "<62,3>": "Added logic to work around OI bug where large files somehow corrupt the results of Get_Property", + "<62,4>": "Updated Convert and Save As... function to default stored procedures saved as DOS files to .TXT" + }, + "<63>": { + "<63,1>": "2.2.2", + "<63,2>": "Added logic to use QuickDexes when available when populating open/save record dialog" + }, + "<64>": { + "<64,1>": "2.2.1", + "<64,2>": "Improved Open Entity dialog performance by removing orphaned entities check and yield statements", + "<64,3>": "Improved Open Record dialog performance by caching key lists and optimizing dynamic arrays" + }, + "<65>": { + "<65,1>": "2.2", + "<65,2>": "Updated Open Entity dialog to include records from CODE tables and to display them in a more informative way", + "<65,3>": "Updated Dos type documents such that only the file name appears in the tab to keep it shorter", + "<65,4>": "Added logic to update entity caches whenever and entity is created or deleted to avoid having to refresh entities", + "<65,5>": "Added advanced support for U2 tables, included customizations to optimize table selects on U2 tables" + }, + "<66>": { + "<66,1>": "2.1.9", + "<66,2>": "Fixed bug where Copy to HTML Code function would allow comment color to bleed onto following line" + }, + "<67>": { + "<67,1>": "2.1.8", + "<67,2>": "Fixed bug where Format function would unindent LOOP blocks with While/Until on the same line as Loop" + }, + "<68>": { + "<68,1>": "2.1.7", + "<68,2>": "Added EXPLORE command for opening Windows Explorer to REVBOOT or other specified directory", + "<68,3>": "Updated Format function to unindent dividing comments (such as '*--------') just below GoSub labels", + "<68,4>": "Fixed bug where Format function would unindent For loops with While/Until on the same line", + "<68,5>": "Fixed bug where Copy as HTML Code function would fail to preserve correct font throughout entire content" + }, + "<69>": { + "<69,1>": "2.1.6", + "<69,2>": "Fixed bug in which old Styles registry overrode new Styles2 registry; it is now be the other way around." + }, + "<70>": { + "<70,1>": "2.1.5", + "<70,2>": "Updated option dialog to maintain both Styles and Styles2 registry entries, for backward compatability", + "<70,3>": "Added new TCL command, HISTORY, to display SRP Editor version history on demand" + }, + "<71>": { + "<71,1>": "2.1.4", + "<71,2>": "Updated styles, when stored to registry, to use character delimiters instead of system delimiters to avoid problems other localizations" + }, + "<72>": { + "<72,1>": "2.1.3", + "<72,2>": "Fixed bug where Format function failed to recognize comment blocks on a single line, therefore treating the rest of the document as a comment", + "<72,3>": "Updated UNIVERSE Compiler to recognize '~' delimiters in personal editions of UNIVERSE" + }, + "<73>": { + "<73,1>": "2.1.2", + "<73,2>": "Ignoring VNAVs in function calls is now optional", + "<73,3>": "Ignoring VNAVs referenced in Inserts is now optional", + "<73,4>": "Updated Option Dialog's other pages to better utilize new size" + }, + "<74>": { + "<74,1>": "2.1.1", + "<74,2>": "Updated VNAV checking to eliminate possible VNAVs found in function calls and inserts", + "<74,3>": "Updated VNAV checking to ensure markers do not point to VNAVs which may also exist as literals in strings or comments", + "<74,4>": "Added ability to disable VNAV checking in options" + }, + "<75>": { + "<75,1>": "2.1", + "<75,2>": "Added support for VNAV checking", + "<75,3>": "Updated editor to jump to already opened records or DOS files instead of opening copies", + "<75,4>": "Fixed bug in Viewer related to issues using Drive() with root drive letters" + }, + "<76>": { + "<76,1>": "2.0.10", + "<76,2>": "Increased U2 Bond buffer size to 1MB, to support larger records" + }, + "<77>": { + "<77,1>": "2.0.9", + "<77,2>": "Updated OCX version checking to be more accurate than standard string comparison", + "<77,3>": "Fixed bug where selecting large numbers would break to the debugger", + "<77,4>": "Fixed bug where taskbar icon would appear when using call tips", + "<77,5>": "Fixed bug where multiple lines of comments ending with '|' caused hang up when inserting new lines" + }, + "<78>": { + "<78,1>": "2.0.8", + "<78,2>": "Fixed bug where selecting large numbers broke to debugger" + }, + "<79>": { + "<79,1>": "2.0.7", + "<79,2>": "Added support to colorize identifiers ending with '@' and '%'" + }, + "<80>": { + "<80,1>": "2.0.6", + "<80,2>": "Added support to colorize identifiers ending with '$'" + }, + "<81>": { + "<81,1>": "2.0.5", + "<81,2>": "Added ability to copy code as HTML", + "<81,3>": "Added ability to delete tabs as spaces using Shift+Backspace", + "<81,4>": "Added ability to delete tabs as spaces using Shift+Delete", + "<81,5>": "Fixed autocomplete bug where wrong drop down would appear for $insert if first letter was anything other than 'a'", + "<81,6>": "Fixed autocomplete bug where wrong drop down would appear for GoSub and GoTo statements if first letter didn't match a valid label", + "<81,7>": "Fixed bug where Edge Indicator field in Option dialog fail to initialize" + }, + "<82>": { + "<82,1>": "2.0.4", + "<82,2>": "Updated Format function to use Tab as Spaces and Tab Width option settings", + "<82,3>": "Updated Print button and menu to disable when the Viewer tab is at the front, preventing users from printing the viewer until such functionality can be added", + "<82,4>": "Updated Option dialog to disable keywords in Autocomplete list (requires SRPEditor.ocx 2.1.4 or greater)", + "<82,5>": "Updated AutoCommenting to always place comments at beginning of lines for single line auto comments", + "<82,6>": "Updated TCL processor to display linebreaks correctly in Viewer and Status windows", + "<82,7>": "Fixed bug where some Quick Commands caused the Viewer to appear, which caused the replaceable parameters to fail", + "<82,8>": "Fixed bug where Format function would fail if '/*' appeared within a single-line comment", + "<82,9>": "Fixed bug where Format button would not enable when viewing U2 code from a record or viewing new, unsaved Stored Procedures", + "<82,10>": "Fixed bug where Format function would fail if 'loop' appeared after the 'next' statement", + "<82,11>": "Fixed bug where AutoComment logic would cause the code to creap one space to the left at a time each time a block was commented", + "<82,12>": "Fixed bug where SRP Editor preventing compilation in Development Runtime Engines" + }, + "<83>": { + "<83,1>": "2.0.3", + "<83,2>": "Fixed bug where Ctrl+L faile to Goto Label when editing a Record in Code mode", + "<83,3>": "Fixed bug where Goto Label dialog would list record fields instead of code labels when editing a Record in Code mode", + "<83,4>": "Added support for up to 5 customized toolbar buttons, called Quick Commands" + }, + "<84>": { + "<84,1>": "2.0.2", + "<84,2>": "Updated Help system to better navigate to appropriate help files", + "<84,3>": "Update F1 help to maximize OI help file" + }, + "<85>": { + "<85,1>": "2.0.1", + "<85,2>": "Added TCL option which causes the HTML viewer to always appear on top when executing commands", + "<85,3>": "Updated About Box with new SRP graphic", + "<85,4>": "Updated RDK command to produce 8.0 compatable RDKS when using the V option", + "<85,5>": "Fixed bug where autocomplete would flicker for non-matched prefixes", + "<85,6>": "Fixed bug where autocomplete for GoTo/GoSub labels would be out of order, causing incorrect completions", + "<85,7>": "Fixed bug where some unicode characters were still causing syntax colors to offset" + }, + "<86>": { + "<86,1>": "2.0", + "<86,2>": "Added autocompletion when writing code", + "<86,3>": "Added ability to specify table types", + "<86,4>": "Added ability to view HTML and XML documents with syntax highlighting", + "<86,5>": "Added ability to enable tabs to made up of spaces only", + "<86,6>": "Added Show Line Numbers option", + "<86,7>": "Added option to disable autocompletion", + "<86,8>": "Fixed bug where unicode characters would offset code highlighting", + "<86,9>": "Added full-color printing support", + "<86,10>": "Update OLE Control version check to show tooltip warning instead of locking users out", + "<86,11>": "Added Ctrl+Shift+F accelerator for running SRP Table Search Utility" + }, + "<87>": { + "<87,1>": "1.1", + "<87,2>": "Added support for SRP OLE Controls version 2.0" + }, + "<88>": { + "<88,1>": "1.0.3", + "<88,2>": "Added Version History record", + "<88,3>": "Updated runtime check logic", + "<88,4>": "Updated About Box", + "<88,5>": "Fixed bug where selecting numbers larger than 16 digits would break to the debugger" + }, + "<89>": { + "<89,1>": "1.0.2", + "<89,2>": "Added support for %DATE% and %TIME% fields in AutoText functionality" + }, + "<90>": { + "<90,1>": "1.0.1", + "<90,2>": "Updated support for new SRP Licensing model" + }, + "<91>": { + "<91,1>": "1.0", + "<91,2>": "Initial Release" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_ARRAY.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_ARRAY.json new file mode 100644 index 0000000..7909dde --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_ARRAY.json @@ -0,0 +1,155 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_ARRAY" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@SERVICE", + "<2,1,2>": "@PARAMS" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Clean", + "<7,2>": "Join", + "<7,3>": "Reorder", + "<7,4>": "Rotate", + "<7,5>": "SortRows", + "<7,6>": "SortSimpleList", + "<7,7>": "Reverse" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "Array", + "<8,1,2>": "Option", + "<8,1,3>": "Delimiter" + }, + "<8,2>": { + "<8,2,1>": "LeftArray", + "<8,2,2>": "RightArray", + "<8,2,3>": "Operation", + "<8,2,4>": "Delimiter" + }, + "<8,3>": { + "<8,3,1>": "Array", + "<8,3,2>": "Order", + "<8,3,3>": "Delimiter" + }, + "<8,4>": { + "<8,4,1>": "Array", + "<8,4,2>": "MajorDelimiter", + "<8,4,3>": "MinorDelimiter" + }, + "<8,5>": { + "<8,5,1>": "Array", + "<8,5,2>": "SortInfo", + "<8,5,3>": "Orientation", + "<8,5,4>": "MajorDelimiter", + "<8,5,5>": "MinorDelimiter", + "<8,5,6>": "CaseSensitive" + }, + "<8,6>": { + "<8,6,1>": "Array", + "<8,6,2>": "Option", + "<8,6,3>": "Delimiter" + }, + "<8,7>": { + "<8,7,1>": "Array", + "<8,7,2>": "Delimiter" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "", + "<9,1,2>": "CLEAN_OPTIONS", + "<9,1,3>": "" + }, + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "", + "<9,2,3>": "JOIN_OPERATIONS", + "<9,2,4>": "" + }, + "<9,3>": { + "<9,3,1>": "", + "<9,3,2>": "", + "<9,3,3>": "" + }, + "<9,4>": { + "<9,4,1>": "", + "<9,4,2>": "", + "<9,4,3>": "" + }, + "<9,5>": { + "<9,5,1>": "", + "<9,5,2>": "", + "<9,5,3>": "SORT_FORMAT", + "<9,5,4>": "", + "<9,5,5>": "", + "<9,5,6>": "" + }, + "<9,6>": { + "<9,6,1>": "", + "<9,6,2>": "SORT_OPTIONS", + "<9,6,3>": "" + }, + "<9,7>": { + "<9,7,1>": "", + "<9,7,2>": "" + } + }, + "<10>": { + "<10,1>": "CLEAN_OPTIONS", + "<10,2>": "JOIN_OPERATIONS", + "<10,3>": "SORT_FORMAT", + "<10,4>": "SORT_OPTIONS" + }, + "<11>": { + "<11,1>": { + "<11,1,1>": "Trim", + "<11,1,2>": "TrimTrailing", + "<11,1,3>": "TrimAndMakeUnique", + "<11,1,4>": "TrimAndMakeUniqueC" + }, + "<11,2>": { + "<11,2,1>": "AND", + "<11,2,2>": "ANDC", + "<11,2,3>": "OR", + "<11,2,4>": "ORC", + "<11,2,5>": "NOT", + "<11,2,6>": "NOTC", + "<11,2,7>": "XOR", + "<11,2,8>": "XORC" + }, + "<11,3>": { + "<11,3,1>": "LIST", + "<11,3,2>": "ARRAY" + }, + "<11,4>": { + "<11,4,1>": "AscendingText", + "<11,4,2>": "DescendingText", + "<11,4,3>": "AscendingNumbers", + "<11,4,4>": "DescendingNumbers", + "<11,4,5>": "AscendingTextC", + "<11,4,6>": "DescendingTextC", + "<11,4,7>": "AscendingNumbersC", + "<11,4,8>": "DescendingNumbersC" + } + }, + "<12>": { + "<12,1>": "1", + "<12,2>": "1", + "<12,3>": "1", + "<12,4>": "1" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_COM.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_COM.json new file mode 100644 index 0000000..99da78f --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_COM.json @@ -0,0 +1,124 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_COM" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "Object", + "<2,1,2>": "@SERVICE", + "<2,1,3>": "@PARAMS" + } + }, + "<3>": "2", + "<4>": "3", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "ADDPARAM", + "<7,2>": "BEGINCALL", + "<7,3>": "ENDCALL", + "<7,4>": "CREATE", + "<7,5>": "GETAXOBJECT", + "<7,6>": "GETDISPATCHOBJECT", + "<7,7>": "RELEASE", + "<7,8>": "GET", + "<7,9>": "SET", + "<7,10>": "SET_REF", + "<7,11>": "CALL", + "<7,12>": "HANDLES", + "<7,13>": "HASERROR", + "<7,14>": "ERROR" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "Type", + "<8,1,2>": "Value" + }, + "<8,2>": "", + "<8,3>": "Name", + "<8,4>": "Name", + "<8,5>": "Name", + "<8,6>": "Name", + "<8,7>": "", + "<8,8>": { + "<8,8,1>": "Name", + "<8,8,2>": "Param1", + "<8,8,3>": "Param2", + "<8,8,4>": "Param3", + "<8,8,5>": "Param4", + "<8,8,6>": "Param5", + "<8,8,7>": "Param6", + "<8,8,8>": "Param7", + "<8,8,9>": "Param8", + "<8,8,10>": "Param9", + "<8,8,11>": "Param10", + "<8,8,12>": "Param11", + "<8,8,13>": "Param12", + "<8,8,14>": "Param13", + "<8,8,15>": "Param14", + "<8,8,16>": "Param15", + "<8,8,17>": "Param16" + }, + "<8,9>": { + "<8,9,1>": "Name", + "<8,9,2>": "Param1", + "<8,9,3>": "Param2", + "<8,9,4>": "Param3", + "<8,9,5>": "Param4", + "<8,9,6>": "Param5", + "<8,9,7>": "Param6", + "<8,9,8>": "Param7", + "<8,9,9>": "Param8", + "<8,9,10>": "Param9", + "<8,9,11>": "Param10", + "<8,9,12>": "Param11", + "<8,9,13>": "Param12", + "<8,9,14>": "Param13", + "<8,9,15>": "Param14", + "<8,9,16>": "Param15", + "<8,9,17>": "Param16" + }, + "<8,10>": { + "<8,10,1>": "Name", + "<8,10,2>": "RefObject" + }, + "<8,11>": { + "<8,11,1>": "Name", + "<8,11,2>": "Param1", + "<8,11,3>": "Param2", + "<8,11,4>": "Param3", + "<8,11,5>": "Param4", + "<8,11,6>": "Param5", + "<8,11,7>": "Param6", + "<8,11,8>": "Param7", + "<8,11,9>": "Param8", + "<8,11,10>": "Param9", + "<8,11,11>": "Param10", + "<8,11,12>": "Param11", + "<8,11,13>": "Param12", + "<8,11,14>": "Param13", + "<8,11,15>": "Param14", + "<8,11,16>": "Param15", + "<8,11,17>": "Param16" + } + }, + "<9>": "PARAMTYPES", + "<10>": "PARAMTYPES", + "<11>": { + "<11,1>": { + "<11,1,1>": "Object", + "<11,1,2>": "Omitted", + "<11,1,3>": "Value" + } + }, + "<12>": "1", + "<13>": "0", + "<14>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_DATE.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_DATE.json new file mode 100644 index 0000000..f20d69b --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_DATE.json @@ -0,0 +1,235 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_DATE" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "AddDays", + "<7,2>": "AddMonths", + "<7,3>": "AddYears", + "<7,4>": "Day", + "<7,5>": "DayOfWeek", + "<7,6>": "DayOfWeekName", + "<7,7>": "DayOfWeekNames", + "<7,8>": "DayOfYear", + "<7,9>": "DaysInMonth", + "<7,10>": "DaySpan", + "<7,11>": "Decode", + "<7,12>": "Encode", + "<7,13>": "FirstDayOfWeek", + "<7,14>": "Format", + "<7,15>": "IConv", + "<7,16>": "IsLeapYear", + "<7,17>": "Month", + "<7,18>": "MonthName", + "<7,19>": "MonthNames", + "<7,20>": "MonthSpan", + "<7,21>": "OConv", + "<7,22>": "Parse", + "<7,23>": "Span", + "<7,24>": "Today", + "<7,25>": "Validate", + "<7,26>": "Year", + "<7,27>": "YearSpan" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "Date", + "<8,1,2>": "Days" + }, + "<8,2>": { + "<8,2,1>": "Date", + "<8,2,2>": "Months" + }, + "<8,3>": { + "<8,3,1>": "Date", + "<8,3,2>": "Years" + }, + "<8,4>": "Date", + "<8,5>": "Date", + "<8,6>": { + "<8,6,1>": "DayOfWeek", + "<8,6,2>": "NameLength = \"Full\"", + "<8,6,3>": "Locale = \"\"" + }, + "<8,7>": { + "<8,7,1>": "NameLength = \"Full\"", + "<8,7,2>": "Locale = \"\"" + }, + "<8,8>": "Date", + "<8,9>": { + "<8,9,1>": "Month", + "<8,9,2>": "Year = 0" + }, + "<8,10>": { + "<8,10,1>": "FromDate", + "<8,10,2>": "ToDate" + }, + "<8,11>": "Date", + "<8,12>": { + "<8,12,1>": "Year", + "<8,12,2>": "Month", + "<8,12,3>": "Day" + }, + "<8,13>": "Locale = \"\"", + "<8,14>": { + "<8,14,1>": "Date", + "<8,14,2>": "Format = \"Short\"", + "<8,14,3>": "Locale = \"\"" + }, + "<8,15>": { + "<8,15,1>": "Ans", + "<8,15,2>": "Branch", + "<8,15,3>": "Ref ReturnData" + }, + "<8,16>": "Year", + "<8,17>": "Date", + "<8,18>": { + "<8,18,1>": "Month", + "<8,18,2>": "NameLength = \"Full\"", + "<8,18,3>": "Locale = \"\"" + }, + "<8,19>": { + "<8,19,1>": "NameLength = \"Full\"", + "<8,19,2>": "Locale = \"\"" + }, + "<8,20>": { + "<8,20,1>": "FromDate", + "<8,20,2>": "ToDate", + "<8,20,3>": "Fractional = 1" + }, + "<8,21>": { + "<8,21,1>": "Ans", + "<8,21,2>": "Branch", + "<8,21,3>": "Ref ReturnData" + }, + "<8,22>": { + "<8,22,1>": "Text", + "<8,22,2>": "Format = \"Short\"", + "<8,22,3>": "Locale = \"\"" + }, + "<8,23>": { + "<8,23,1>": "FromDate", + "<8,23,2>": "ToDate" + }, + "<8,24>": "UTC = 0", + "<8,25>": { + "<8,25,1>": "Year", + "<8,25,2>": "Month", + "<8,25,3>": "Day" + }, + "<8,26>": "Date", + "<8,27>": { + "<8,27,1>": "FromDate", + "<8,27,2>": "ToDate", + "<8,27,3>": "Fractional = 1" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "", + "<9,1,2>": "" + }, + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "" + }, + "<9,3>": { + "<9,3,1>": "", + "<9,3,2>": "" + }, + "<9,4>": "", + "<9,5>": "", + "<9,6>": { + "<9,6,1>": "", + "<9,6,2>": "DAY_NAME_LENGTH" + }, + "<9,7>": "DAY_NAME_LENGTH", + "<9,8>": "", + "<9,9>": "", + "<9,10>": { + "<9,10,1>": "", + "<9,10,2>": "" + }, + "<9,11>": "", + "<9,12>": { + "<9,12,1>": "", + "<9,12,2>": "", + "<9,12,3>": "" + }, + "<9,13>": "", + "<9,14>": "", + "<9,15>": { + "<9,15,1>": "", + "<9,15,2>": "", + "<9,15,3>": "" + }, + "<9,16>": "", + "<9,17>": "", + "<9,18>": { + "<9,18,1>": "", + "<9,18,2>": "NAME_LENGTH" + }, + "<9,19>": "NAME_LENGTH", + "<9,20>": { + "<9,20,1>": "", + "<9,20,2>": "" + }, + "<9,21>": { + "<9,21,1>": "", + "<9,21,2>": "", + "<9,21,3>": "" + }, + "<9,22>": "", + "<9,23>": { + "<9,23,1>": "", + "<9,23,2>": "" + }, + "<9,24>": "", + "<9,25>": { + "<9,25,1>": "", + "<9,25,2>": "", + "<9,25,3>": "" + }, + "<9,26>": "", + "<9,27>": { + "<9,27,1>": "", + "<9,27,2>": "" + } + }, + "<10>": { + "<10,1>": "DAY_NAME_LENGTH", + "<10,2>": "NAME_LENGTH" + }, + "<11>": { + "<11,1>": { + "<11,1,1>": "Full", + "<11,1,2>": "Abbreviated", + "<11,1,3>": "Shortest" + }, + "<11,2>": { + "<11,2,1>": "Full", + "<11,2,2>": "Abbreviated" + } + }, + "<12>": { + "<12,1>": "1", + "<12,2>": "1" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_DATETIME.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_DATETIME.json new file mode 100644 index 0000000..a2bf947 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_DATETIME.json @@ -0,0 +1,280 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_DATETIME" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "AddDays", + "<7,2>": "AddHours", + "<7,3>": "AddMinutes", + "<7,4>": "AddMonths", + "<7,5>": "AddSeconds", + "<7,6>": "AddYears", + "<7,7>": "Combine", + "<7,8>": "Date", + "<7,9>": "Day", + "<7,10>": "DayOfWeek", + "<7,11>": "DayOfYear", + "<7,12>": "DaySpan", + "<7,13>": "Decode", + "<7,14>": "Encode", + "<7,15>": "Format", + "<7,16>": "FromUTC", + "<7,17>": "Hour", + "<7,18>": "HourSpan", + "<7,19>": "IsAm", + "<7,20>": "IConv", + "<7,21>": "Minute", + "<7,22>": "MinuteSpan", + "<7,23>": "Month", + "<7,24>": "MonthSpan", + "<7,25>": "Now", + "<7,26>": "OConv", + "<7,27>": "Parse", + "<7,28>": "Second", + "<7,29>": "SecondSpan", + "<7,30>": "Span", + "<7,31>": "Split", + "<7,32>": "Time", + "<7,33>": "ToUTC", + "<7,34>": "Validate", + "<7,35>": "Year", + "<7,36>": "YearSpan" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "Datetime", + "<8,1,2>": "Days" + }, + "<8,2>": { + "<8,2,1>": "Datetime", + "<8,2,2>": "Hours" + }, + "<8,3>": { + "<8,3,1>": "Datetime", + "<8,3,2>": "Minutes" + }, + "<8,4>": { + "<8,4,1>": "Datetime", + "<8,4,2>": "Months" + }, + "<8,5>": { + "<8,5,1>": "Datetime", + "<8,5,2>": "Seconds" + }, + "<8,6>": { + "<8,6,1>": "Datetime", + "<8,6,2>": "Years" + }, + "<8,7>": { + "<8,7,1>": "Date", + "<8,7,2>": "Time" + }, + "<8,8>": "DateTime", + "<8,9>": "DateTime", + "<8,10>": "DateTime", + "<8,11>": "DateTime", + "<8,12>": { + "<8,12,1>": "FromDateTime", + "<8,12,2>": "ToDateTime", + "<8,12,3>": "Fractional = 1" + }, + "<8,13>": "DateTime", + "<8,14>": { + "<8,14,1>": "Year", + "<8,14,2>": "Month", + "<8,14,3>": "Day", + "<8,14,4>": "Hour", + "<8,14,5>": "Minute", + "<8,14,6>": "Second" + }, + "<8,15>": { + "<8,15,1>": "DateTime", + "<8,15,2>": "Format = \"Short\"", + "<8,15,3>": "Locale = \"\"" + }, + "<8,16>": "DateTime", + "<8,17>": "DateTime", + "<8,18>": { + "<8,18,1>": "FromDateTime", + "<8,18,2>": "ToDateTime", + "<8,18,3>": "Fractional = 1" + }, + "<8,19>": "DateTime", + "<8,20>": { + "<8,20,1>": "Ans", + "<8,20,2>": "Branch", + "<8,20,3>": "Ref ReturnData" + }, + "<8,21>": "DateTime", + "<8,22>": { + "<8,22,1>": "FromDateTime", + "<8,22,2>": "ToDateTime", + "<8,22,3>": "Fractional = 1" + }, + "<8,23>": "DateTime", + "<8,24>": { + "<8,24,1>": "FromDateTime", + "<8,24,2>": "ToDateTime", + "<8,24,3>": "Fractional = 1" + }, + "<8,25>": "UTC = 0", + "<8,26>": { + "<8,26,1>": "Ans", + "<8,26,2>": "Branch", + "<8,26,3>": "Ref ReturnData" + }, + "<8,27>": { + "<8,27,1>": "Text", + "<8,27,2>": "Format = \"Short\"", + "<8,27,3>": "Locale = \"\"" + }, + "<8,28>": "DateTime", + "<8,29>": { + "<8,29,1>": "FromDateTime", + "<8,29,2>": "ToDateTime" + }, + "<8,30>": { + "<8,30,1>": "FromDateTime", + "<8,30,2>": "ToDateTime" + }, + "<8,31>": "DateTime", + "<8,32>": "DateTime", + "<8,33>": "DateTime", + "<8,34>": { + "<8,34,1>": "Year", + "<8,34,2>": "Month", + "<8,34,3>": "Day", + "<8,34,4>": "Hour", + "<8,34,5>": "Minute", + "<8,34,6>": "Second" + }, + "<8,35>": "DateTime", + "<8,36>": { + "<8,36,1>": "FromDateTime", + "<8,36,2>": "ToDateTime", + "<8,36,3>": "Fractional = 1" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "", + "<9,1,2>": "" + }, + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "" + }, + "<9,3>": { + "<9,3,1>": "", + "<9,3,2>": "" + }, + "<9,4>": { + "<9,4,1>": "", + "<9,4,2>": "" + }, + "<9,5>": { + "<9,5,1>": "", + "<9,5,2>": "" + }, + "<9,6>": { + "<9,6,1>": "", + "<9,6,2>": "" + }, + "<9,7>": { + "<9,7,1>": "", + "<9,7,2>": "" + }, + "<9,8>": "", + "<9,9>": "", + "<9,10>": "", + "<9,11>": "", + "<9,12>": { + "<9,12,1>": "", + "<9,12,2>": "" + }, + "<9,13>": "", + "<9,14>": { + "<9,14,1>": "", + "<9,14,2>": "", + "<9,14,3>": "", + "<9,14,4>": "", + "<9,14,5>": "", + "<9,14,6>": "" + }, + "<9,15>": "", + "<9,16>": "", + "<9,17>": "", + "<9,18>": { + "<9,18,1>": "", + "<9,18,2>": "" + }, + "<9,19>": "", + "<9,20>": { + "<9,20,1>": "", + "<9,20,2>": "", + "<9,20,3>": "" + }, + "<9,21>": "", + "<9,22>": { + "<9,22,1>": "", + "<9,22,2>": "" + }, + "<9,23>": "", + "<9,24>": { + "<9,24,1>": "", + "<9,24,2>": "" + }, + "<9,25>": "", + "<9,26>": { + "<9,26,1>": "", + "<9,26,2>": "", + "<9,26,3>": "" + }, + "<9,27>": "", + "<9,28>": "", + "<9,29>": { + "<9,29,1>": "", + "<9,29,2>": "" + }, + "<9,30>": { + "<9,30,1>": "", + "<9,30,2>": "" + }, + "<9,31>": "", + "<9,32>": "", + "<9,33>": "", + "<9,34>": { + "<9,34,1>": "", + "<9,34,2>": "", + "<9,34,3>": "", + "<9,34,4>": "", + "<9,34,5>": "", + "<9,34,6>": "" + }, + "<9,35>": "", + "<9,36>": { + "<9,36,1>": "", + "<9,36,2>": "" + } + }, + "<10>": "", + "<11>": "", + "<12>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_DECODE.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_DECODE.json new file mode 100644 index 0000000..8936232 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_DECODE.json @@ -0,0 +1,42 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_DECODE" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "String", + "<2,1,2>": "@SERVICE", + "<2,1,3>": "@PARAMS" + } + }, + "<3>": "2", + "<4>": "3", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "BASE32", + "<7,2>": "BASE64", + "<7,3>": "BASE64URL", + "<7,4>": "HEX", + "<7,5>": "URL" + }, + "<8>": { + "<8,1>": "[CharSet]", + "<8,2>": "[CharSet]", + "<8,3>": "", + "<8,4>": "[CharSet]" + }, + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "0", + "<14>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_ENCODE.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_ENCODE.json new file mode 100644 index 0000000..c5bbe6b --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_ENCODE.json @@ -0,0 +1,49 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_ENCODE" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "String", + "<2,1,2>": "@SERVICE", + "<2,1,3>": "@PARAMS" + } + }, + "<3>": "2", + "<4>": "3", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "BASE32", + "<7,2>": "BASE64", + "<7,3>": "BASE64URL", + "<7,4>": "URL", + "<7,5>": "HEX" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "[CharSet]", + "<8,1,2>": "[Options]" + }, + "<8,2>": "[CharSet]", + "<8,3>": "", + "<8,4>": { + "<8,4,1>": "[CharSet]", + "<8,4,2>": "[Options]" + }, + "<8,5>": "[CharSet]" + }, + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "0", + "<14>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_FASTARRAY.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_FASTARRAY.json new file mode 100644 index 0000000..c0e603b --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_FASTARRAY.json @@ -0,0 +1,159 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_FASTARRAY" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Clear", + "<7,2>": "Count", + "<7,3>": "Create", + "<7,4>": "Delete", + "<7,5>": "Extract", + "<7,6>": "GetVariable", + "<7,7>": "Insert", + "<7,8>": "InsertFromList", + "<7,9>": "Match", + "<7,10>": "Reduce", + "<7,11>": "Release", + "<7,12>": "Replace", + "<7,13>": "ReplaceWithList" + }, + "<8>": { + "<8,1>": "Handles", + "<8,2>": { + "<8,2,1>": "Handle", + "<8,2,2>": "FieldPos = 0", + "<8,2,3>": "ValuePos = 0" + }, + "<8,3>": "InitialArray = \"\"", + "<8,4>": { + "<8,4,1>": "Handle", + "<8,4,2>": "FieldPos = 0", + "<8,4,3>": "ValuePos = 0", + "<8,4,4>": "SubValuePos = 0" + }, + "<8,5>": { + "<8,5,1>": "Handle", + "<8,5,2>": "FieldPos = 0", + "<8,5,3>": "ValuePos = 0", + "<8,5,4>": "SubValuePos = 0" + }, + "<8,6>": "Handle", + "<8,7>": { + "<8,7,1>": "Handle", + "<8,7,2>": "FieldPos", + "<8,7,3>": "ValuePos", + "<8,7,4>": "SubValuePos", + "<8,7,5>": "NewValue" + }, + "<8,8>": { + "<8,8,1>": "Handle", + "<8,8,2>": "FieldPos", + "<8,8,3>": "ValuePos", + "<8,8,4>": "SubValuePos", + "<8,8,5>": "ListHandle" + }, + "<8,9>": { + "<8,9,1>": "Handle", + "<8,9,2>": "StringToMatch", + "<8,9,3>": "Ref FieldPos", + "<8,9,4>": "Ref ValuePos", + "<8,9,5>": "Ref SubValuePos", + "<8,9,6>": "Option = \"MatchAnywhere\"" + }, + "<8,10>": { + "<8,10,1>": "Handle", + "<8,10,2>": "StringToMatch", + "<8,10,3>": "Option = \"MatchAnywhere\"" + }, + "<8,11>": "Handles", + "<8,12>": { + "<8,12,1>": "Handle", + "<8,12,2>": "FieldPos", + "<8,12,3>": "ValuePos", + "<8,12,4>": "SubValuePos", + "<8,12,5>": "NewValue" + }, + "<8,13>": { + "<8,13,1>": "Handle", + "<8,13,2>": "FieldPos", + "<8,13,3>": "ValuePos", + "<8,13,4>": "SubValuePos", + "<8,13,5>": "ListHandle" + } + }, + "<9>": { + "<9,1>": "", + "<9,2>": "", + "<9,3>": "", + "<9,4>": "", + "<9,5>": "", + "<9,6>": "", + "<9,7>": { + "<9,7,1>": "", + "<9,7,2>": "", + "<9,7,3>": "", + "<9,7,4>": "", + "<9,7,5>": "" + }, + "<9,8>": { + "<9,8,1>": "", + "<9,8,2>": "", + "<9,8,3>": "", + "<9,8,4>": "", + "<9,8,5>": "" + }, + "<9,9>": { + "<9,9,1>": "", + "<9,9,2>": "", + "<9,9,3>": "", + "<9,9,4>": "", + "<9,9,5>": "", + "<9,9,6>": "MATCH_OPTIONS" + }, + "<9,10>": { + "<9,10,1>": "", + "<9,10,2>": "", + "<9,10,3>": "MATCH_OPTIONS" + }, + "<9,11>": "", + "<9,12>": { + "<9,12,1>": "", + "<9,12,2>": "", + "<9,12,3>": "", + "<9,12,4>": "", + "<9,12,5>": "" + }, + "<9,13>": { + "<9,13,1>": "", + "<9,13,2>": "", + "<9,13,3>": "", + "<9,13,4>": "", + "<9,13,5>": "" + } + }, + "<10>": "MATCH_OPTIONS", + "<11>": { + "<11,1>": { + "<11,1,1>": "MatchAnywhere", + "<11,1,2>": "MatchAll" + } + }, + "<12>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_GET_PRINTERS.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_GET_PRINTERS.json new file mode 100644 index 0000000..1e6c5ed --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_GET_PRINTERS.json @@ -0,0 +1,36 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_GET_PRINTERS" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@SERVICE", + "<2,1,2>": "@PARAMS" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Default", + "<7,2>": "Local", + "<7,3>": "Connect", + "<7,4>": "Network", + "<7,5>": "Remote" + }, + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "0", + "<14>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_HASH.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_HASH.json new file mode 100644 index 0000000..c87ba11 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_HASH.json @@ -0,0 +1,97 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_HASH" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "String", + "<2,1,2>": "@SERVICE", + "<2,1,3>": "@PARAMS" + } + }, + "<3>": "2", + "<4>": "3", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "ADLER32", + "<7,2>": "CRC32", + "<7,3>": "MD2", + "<7,4>": "MD4", + "<7,5>": "MD5", + "<7,6>": "RIPEMD-128", + "<7,7>": "RIPEMD-160", + "<7,8>": "RIPEMD-256", + "<7,9>": "RIPEMD-360", + "<7,10>": "SHA", + "<7,11>": "SHA-1", + "<7,12>": "SHA-2", + "<7,13>": "SHA-224", + "<7,14>": "SHA-256", + "<7,15>": "SHA-384", + "<7,16>": "SHA-512", + "<7,17>": "TIGER", + "<7,18>": "WHIRLPOOL", + "<7,19>": "BASE32" + }, + "<8>": { + "<8,1>": "[Encode]", + "<8,2>": "[Encode]", + "<8,3>": "[Encode]", + "<8,4>": "[Encode]", + "<8,5>": "[Encode]", + "<8,6>": "[Encode]", + "<8,7>": "[Encode]", + "<8,8>": "[Encode]", + "<8,9>": "[Encode]", + "<8,10>": "[Encode]", + "<8,11>": "[Encode]", + "<8,12>": "[Encode]", + "<8,13>": "[Encode]", + "<8,14>": "[Encode]", + "<8,15>": "[Encode]", + "<8,16>": "[Encode]", + "<8,17>": "[Encode]", + "<8,18>": "[Encode]", + "<8,19>": "[Encode]" + }, + "<9>": { + "<9,1>": "ENCODINGS", + "<9,2>": "ENCODINGS", + "<9,3>": "ENCODINGS", + "<9,4>": "ENCODINGS", + "<9,5>": "ENCODINGS", + "<9,6>": "ENCODINGS", + "<9,7>": "ENCODINGS", + "<9,8>": "ENCODINGS", + "<9,9>": "ENCODINGS", + "<9,10>": "ENCODINGS", + "<9,11>": "ENCODINGS", + "<9,12>": "ENCODINGS", + "<9,13>": "ENCODINGS", + "<9,14>": "ENCODINGS", + "<9,15>": "ENCODINGS", + "<9,16>": "ENCODINGS", + "<9,17>": "ENCODINGS", + "<9,18>": "ENCODINGS", + "<9,19>": "ENCODINGS" + }, + "<10>": "ENCODINGS", + "<11>": { + "<11,1>": { + "<11,1,1>": "BASE32", + "<11,1,2>": "BASE64", + "<11,1,3>": "HEX" + } + }, + "<12>": "1", + "<13>": "0", + "<14>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_HASHTABLE.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_HASHTABLE.json new file mode 100644 index 0000000..c61d12f --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_HASHTABLE.json @@ -0,0 +1,100 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_HASHTABLE" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Contains", + "<7,2>": "Count", + "<7,3>": "Create", + "<7,4>": "Get", + "<7,5>": "GetKeys", + "<7,6>": "GetValues", + "<7,7>": "GetKeyValuePairs", + "<7,8>": "Release", + "<7,9>": "Remove", + "<7,10>": "Set" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "Handle", + "<8,1,2>": "Key" + }, + "<8,2>": "Handle", + "<8,3>": { + "<8,3,1>": "IsCaseSensitive = 0", + "<8,3,2>": "ApproximateCount = 4000" + }, + "<8,4>": { + "<8,4,1>": "Handle", + "<8,4,2>": "Key" + }, + "<8,5>": { + "<8,5,1>": "Handle", + "<8,5,2>": "Delimiter = @FM" + }, + "<8,6>": { + "<8,6,1>": "Handle", + "<8,6,2>": "Delimiter = @FM" + }, + "<8,7>": { + "<8,7,1>": "Handle", + "<8,7,2>": "MajorDelimiter = @FM", + "<8,7,3>": "MinorDelimiter = @VM" + }, + "<8,8>": "Handles", + "<8,9>": { + "<8,9,1>": "Handle", + "<8,9,2>": "Key" + }, + "<8,10>": { + "<8,10,1>": "Handle", + "<8,10,2>": "Key", + "<8,10,3>": "Value" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "", + "<9,1,2>": "" + }, + "<9,2>": "", + "<9,3>": "", + "<9,4>": { + "<9,4,1>": "", + "<9,4,2>": "" + }, + "<9,5>": "", + "<9,6>": "", + "<9,7>": "", + "<9,8>": "", + "<9,9>": { + "<9,9,1>": "", + "<9,9,2>": "" + }, + "<9,10>": { + "<9,10,1>": "", + "<9,10,2>": "", + "<9,10,3>": "" + } + }, + "<10>": "", + "<11>": "", + "<12>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_JSON.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_JSON.json new file mode 100644 index 0000000..feffac1 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_JSON.json @@ -0,0 +1,177 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_JSON" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "Handle ", + "<2,1,2>": "@Service", + "<2,1,3>": "@Params" + } + }, + "<3>": "2", + "<4>": "3", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Add", + "<7,2>": "AddValue", + "<7,3>": "AddValueArray", + "<7,4>": "Contains", + "<7,5>": "Get", + "<7,6>": "GetCount", + "<7,7>": "GetElements", + "<7,8>": "GetMembers", + "<7,9>": "GetValue", + "<7,10>": "New", + "<7,11>": "Parse", + "<7,12>": "Release", + "<7,13>": "Remove", + "<7,14>": "RemoveAll", + "<7,15>": "Set", + "<7,16>": "SetValue", + "<7,17>": "SetValueArray", + "<7,18>": "Stringify", + "<7,19>": "Type", + "<7,20>": "Validate" + }, + "<8>": { + "<8,1>": "NewEntityHandle", + "<8,2>": { + "<8,2,1>": "NewValue", + "<8,2,2>": "Type" + }, + "<8,3>": { + "<8,3,1>": "Array", + "<8,3,2>": "Delim = @FM" + }, + "<8,4>": "Identifier", + "<8,5>": "Path", + "<8,6>": "", + "<8,7>": "Delimiter = @FM", + "<8,8>": { + "<8,8,1>": "Delimiter = @FM", + "<8,8,2>": "Sorted = 0" + }, + "<8,9>": { + "<8,9,1>": "Path", + "<8,9,2>": "Default = \"\"" + }, + "<8,10>": { + "<8,10,1>": "Type", + "<8,10,2>": "NewValue", + "<8,10,3>": "Delim = @FM" + }, + "<8,11>": { + "<8,11,1>": "JsonString", + "<8,11,2>": "ReportErrors = 0" + }, + "<8,12>": "", + "<8,13>": "Identifier", + "<8,14>": "", + "<8,15>": { + "<8,15,1>": "Identifier", + "<8,15,2>": "NewEntityHandle" + }, + "<8,16>": { + "<8,16,1>": "Identifier", + "<8,16,2>": "NewValue", + "<8,16,3>": "Type" + }, + "<8,17>": { + "<8,17,1>": "Identifier", + "<8,17,2>": "Array", + "<8,17,3>": "Delim = @FM" + }, + "<8,18>": { + "<8,18,1>": "Style", + "<8,18,2>": "TabSize = 4", + "<8,18,3>": "Sorted = 0", + "<8,18,4>": "EscapeSolidus = 0" + }, + "<8,19>": "", + "<8,20>": { + "<8,20,1>": "Schema", + "<8,20,2>": "Json" + } + }, + "<9>": { + "<9,1>": "", + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "SIMPLETYPES" + }, + "<9,3>": "", + "<9,4>": "", + "<9,5>": "", + "<9,6>": "", + "<9,7>": "", + "<9,8>": "", + "<9,9>": "", + "<9,10>": { + "<9,10,1>": "TYPES", + "<9,10,2>": "" + }, + "<9,11>": "", + "<9,12>": "", + "<9,13>": "", + "<9,14>": "", + "<9,15>": { + "<9,15,1>": "", + "<9,15,2>": "" + }, + "<9,16>": { + "<9,16,1>": "", + "<9,16,2>": "", + "<9,16,3>": "SIMPLETYPES" + }, + "<9,17>": { + "<9,17,1>": "", + "<9,17,2>": "" + }, + "<9,18>": "STYLES", + "<9,19>": "", + "<9,20>": { + "<9,20,1>": "", + "<9,20,2>": "" + } + }, + "<10>": { + "<10,1>": "TYPES", + "<10,2>": "SIMPLETYPES", + "<10,3>": "STYLES" + }, + "<11>": { + "<11,1>": { + "<11,1,1>": "Array", + "<11,1,2>": "Boolean", + "<11,1,3>": "Null", + "<11,1,4>": "Number", + "<11,1,5>": "Object", + "<11,1,6>": "String" + }, + "<11,2>": { + "<11,2,1>": "Boolean", + "<11,2,2>": "Null", + "<11,2,3>": "Number", + "<11,2,4>": "String" + }, + "<11,3>": { + "<11,3,1>": "DropNulls", + "<11,3,2>": "Fast", + "<11,3,3>": "Styled" + } + }, + "<12>": { + "<12,1>": "1", + "<12,2>": "1", + "<12,3>": "1" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_JSONX_END.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_JSONX_END.json new file mode 100644 index 0000000..ac65f0a --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_JSONX_END.json @@ -0,0 +1,33 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_JSONX_END" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@SERVICE", + "<2,1,2>": "@PARAMS" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Concise", + "<7,2>": "Pretty" + }, + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "0", + "<14>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_LIST.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_LIST.json new file mode 100644 index 0000000..7841973 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_LIST.json @@ -0,0 +1,146 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_LIST" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Add", + "<7,2>": "Clear", + "<7,3>": "Count", + "<7,4>": "Create", + "<7,5>": "CreateFromFastArray", + "<7,6>": "GetAt", + "<7,7>": "GetVariable", + "<7,8>": "InsertAt", + "<7,9>": "Locate", + "<7,10>": "Match", + "<7,11>": "Reduce", + "<7,12>": "Release", + "<7,13>": "RemoveAt", + "<7,14>": "SetAt" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "Handle", + "<8,1,2>": "Value" + }, + "<8,2>": "Handles", + "<8,3>": "Handle", + "<8,4>": { + "<8,4,1>": "InitialList", + "<8,4,2>": "Delimiter = @FM" + }, + "<8,5>": { + "<8,5,1>": "FastArrayHandle", + "<8,5,2>": "FieldPos = 0", + "<8,5,3>": "ValuePos = 0" + }, + "<8,6>": { + "<8,6,1>": "Handle", + "<8,6,2>": "Index" + }, + "<8,7>": { + "<8,7,1>": "Handle", + "<8,7,2>": "Delimiter = @FM" + }, + "<8,8>": { + "<8,8,1>": "Handle", + "<8,8,2>": "Index", + "<8,8,3>": "Value" + }, + "<8,9>": { + "<8,9,1>": "Handle", + "<8,9,2>": "StringToLocate" + }, + "<8,10>": { + "<8,10,1>": "Handle", + "<8,10,2>": "StringToMatch", + "<8,10,3>": "StartIndex = 1", + "<8,10,4>": "Option = \"MatchAnywhere\"" + }, + "<8,11>": { + "<8,11,1>": "Handle", + "<8,11,2>": "StringToMatch", + "<8,11,3>": "Option = \"MatchAnywhere\"" + }, + "<8,12>": "Handles", + "<8,13>": { + "<8,13,1>": "Handle", + "<8,13,2>": "Index" + }, + "<8,14>": { + "<8,14,1>": "Handle", + "<8,14,2>": "Index", + "<8,14,3>": "Value" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "", + "<9,1,2>": "" + }, + "<9,2>": "", + "<9,3>": "", + "<9,4>": "", + "<9,5>": "", + "<9,6>": { + "<9,6,1>": "", + "<9,6,2>": "" + }, + "<9,7>": "", + "<9,8>": { + "<9,8,1>": "", + "<9,8,2>": "", + "<9,8,3>": "" + }, + "<9,9>": { + "<9,9,1>": "", + "<9,9,2>": "" + }, + "<9,10>": { + "<9,10,1>": "", + "<9,10,2>": "", + "<9,10,3>": "", + "<9,10,4>": "MATCH_OPTIONS" + }, + "<9,11>": { + "<9,11,1>": "", + "<9,11,2>": "", + "<9,11,3>": "MATCH_OPTIONS" + }, + "<9,12>": "", + "<9,13>": { + "<9,13,1>": "", + "<9,13,2>": "" + }, + "<9,14>": { + "<9,14,1>": "", + "<9,14,2>": "", + "<9,14,3>": "" + } + }, + "<10>": "MATCH_OPTIONS", + "<11>": { + "<11,1>": { + "<11,1,1>": "MatchAnywhere", + "<11,1,2>": "MatchAll" + } + }, + "<12>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_MAIL.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_MAIL.json new file mode 100644 index 0000000..508eb5d --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_MAIL.json @@ -0,0 +1,98 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_MAIL" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Send", + "<7,2>": "SendUnsecure", + "<7,3>": "SendUsing" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "Server", + "<8,1,2>": "Subject", + "<8,1,3>": "Sender", + "<8,1,4>": "Recipients", + "<8,1,5>": "Body", + "<8,1,6>": "Attachments", + "<8,1,7>": "Importance = \"Normal\"" + }, + "<8,2>": { + "<8,2,1>": "Server", + "<8,2,2>": "Subject", + "<8,2,3>": "Sender", + "<8,2,4>": "Recipients", + "<8,2,5>": "Body", + "<8,2,6>": "Attachments", + "<8,2,7>": "Importance = \"Normal\"" + }, + "<8,3>": { + "<8,3,1>": "Server", + "<8,3,2>": "Port", + "<8,3,3>": "UseTLS", + "<8,3,4>": "Subject", + "<8,3,5>": "Sender", + "<8,3,6>": "Recipients", + "<8,3,7>": "Body", + "<8,3,8>": "Attachments", + "<8,3,9>": "Importance = \"Normal\"" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "", + "<9,1,2>": "", + "<9,1,3>": "", + "<9,1,4>": "", + "<9,1,5>": "", + "<9,1,6>": "", + "<9,1,7>": "IMPORTANCE" + }, + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "", + "<9,2,3>": "", + "<9,2,4>": "", + "<9,2,5>": "", + "<9,2,6>": "", + "<9,2,7>": "IMPORTANCE" + }, + "<9,3>": { + "<9,3,1>": "", + "<9,3,2>": "", + "<9,3,3>": "", + "<9,3,4>": "", + "<9,3,5>": "", + "<9,3,6>": "", + "<9,3,7>": "", + "<9,3,8>": "", + "<9,3,9>": "IMPORTANCE" + } + }, + "<10>": "IMPORTANCE", + "<11>": { + "<11,1>": { + "<11,1,1>": "Low", + "<11,1,2>": "Normal", + "<11,1,3>": "High" + } + }, + "<12>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_MATH.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_MATH.json new file mode 100644 index 0000000..05ff737 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_MATH.json @@ -0,0 +1,326 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_MATH" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@SERVICE", + "<2,1,2>": "@PARAMS" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "ABSOLUTEVALUE", + "<7,2>": "ADD", + "<7,3>": "ARCCOS", + "<7,4>": "ARCCOSH", + "<7,5>": "ARCSIN", + "<7,6>": "ARCSINH", + "<7,7>": "ARCTAN", + "<7,8>": "ARCTAN2", + "<7,9>": "ARCTANH", + "<7,10>": "CEILING", + "<7,11>": "COMPARE", + "<7,12>": "COS", + "<7,13>": "COSH", + "<7,14>": "CUBEROOT", + "<7,15>": "DECIMAL", + "<7,16>": "DIVIDE", + "<7,17>": "EVEN", + "<7,18>": "EXP", + "<7,19>": "EXPONENT", + "<7,20>": "FACTORIAL", + "<7,21>": "FLOOR", + "<7,22>": "GCD", + "<7,23>": "INT", + "<7,24>": "LCM", + "<7,25>": "LOG", + "<7,26>": "LOG10", + "<7,27>": "MULTIPLY", + "<7,28>": "NEGATE", + "<7,29>": "NONE", + "<7,30>": "ODD", + "<7,31>": "POW", + "<7,32>": "RANDOM", + "<7,33>": "ROUND", + "<7,34>": "ROUNDTONEAREST", + "<7,35>": "SIGDIGITS", + "<7,36>": "SIGN", + "<7,37>": "SIN", + "<7,38>": "SINH", + "<7,39>": "SQUAREROOT", + "<7,40>": "SUBTRACT", + "<7,41>": "TAN", + "<7,42>": "TANH" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "Value", + "<8,1,2>": "\"\"", + "<8,1,3>": "[DecimalPlaces", + "<8,1,4>": "ScientificNotation]" + }, + "<8,2>": { + "<8,2,1>": "Value1", + "<8,2,2>": "Value2", + "<8,2,3>": "[DecimalPlaces", + "<8,2,4>": "ScientificNotation]" + }, + "<8,3>": { + "<8,3,1>": "Value", + "<8,3,2>": "\"\"", + "<8,3,3>": "[DecimalPlaces", + "<8,3,4>": "ScientificNotation]" + }, + "<8,4>": { + "<8,4,1>": "Value", + "<8,4,2>": "\"\"", + "<8,4,3>": "[DecimalPlaces", + "<8,4,4>": "ScientificNotation]" + }, + "<8,5>": { + "<8,5,1>": "Value", + "<8,5,2>": "\"\"", + "<8,5,3>": "[DecimalPlaces", + "<8,5,4>": "ScientificNotation]" + }, + "<8,6>": { + "<8,6,1>": "Value", + "<8,6,2>": "\"\"", + "<8,6,3>": "[DecimalPlaces", + "<8,6,4>": "ScientificNotation]" + }, + "<8,7>": { + "<8,7,1>": "Value", + "<8,7,2>": "\"\"", + "<8,7,3>": "[DecimalPlaces", + "<8,7,4>": "ScientificNotation]" + }, + "<8,8>": { + "<8,8,1>": "Value1", + "<8,8,2>": "Value2", + "<8,8,3>": "[DecimalPlaces", + "<8,8,4>": "ScientificNotation]" + }, + "<8,9>": { + "<8,9,1>": "Value", + "<8,9,2>": "\"\"", + "<8,9,3>": "[DecimalPlaces", + "<8,9,4>": "ScientificNotation]" + }, + "<8,10>": { + "<8,10,1>": "Value", + "<8,10,2>": "\"\"", + "<8,10,3>": "[DecimalPlaces", + "<8,10,4>": "ScientificNotation]" + }, + "<8,11>": { + "<8,11,1>": "Value1", + "<8,11,2>": "Value2", + "<8,11,3>": "[DecimalPlaces", + "<8,11,4>": "ScientificNotation]" + }, + "<8,12>": { + "<8,12,1>": "Value", + "<8,12,2>": "\"\"", + "<8,12,3>": "[DecimalPlaces", + "<8,12,4>": "ScientificNotation]" + }, + "<8,13>": { + "<8,13,1>": "Value", + "<8,13,2>": "\"\"", + "<8,13,3>": "[DecimalPlaces", + "<8,13,4>": "ScientificNotation]" + }, + "<8,14>": { + "<8,14,1>": "Value", + "<8,14,2>": "\"\"", + "<8,14,3>": "[DecimalPlaces", + "<8,14,4>": "ScientificNotation]" + }, + "<8,15>": { + "<8,15,1>": "Value", + "<8,15,2>": "\"\"", + "<8,15,3>": "[DecimalPlaces", + "<8,15,4>": "ScientificNotation]" + }, + "<8,16>": { + "<8,16,1>": "Value1", + "<8,16,2>": "Value2", + "<8,16,3>": "[DecimalPlaces", + "<8,16,4>": "ScientificNotation]" + }, + "<8,17>": { + "<8,17,1>": "Value", + "<8,17,2>": "\"\"", + "<8,17,3>": "[DecimalPlaces", + "<8,17,4>": "ScientificNotation]" + }, + "<8,18>": { + "<8,18,1>": "Value", + "<8,18,2>": "\"\"", + "<8,18,3>": "[DecimalPlaces", + "<8,18,4>": "ScientificNotation]" + }, + "<8,19>": { + "<8,19,1>": "Value", + "<8,19,2>": "\"\"", + "<8,19,3>": "[DecimalPlaces", + "<8,19,4>": "ScientificNotation]" + }, + "<8,20>": { + "<8,20,1>": "Value", + "<8,20,2>": "\"\"", + "<8,20,3>": "[DecimalPlaces", + "<8,20,4>": "ScientificNotation]" + }, + "<8,21>": { + "<8,21,1>": "Value", + "<8,21,2>": "\"\"", + "<8,21,3>": "[DecimalPlaces", + "<8,21,4>": "ScientificNotation]" + }, + "<8,22>": { + "<8,22,1>": "Value1", + "<8,22,2>": "Value2", + "<8,22,3>": "[DecimalPlaces", + "<8,22,4>": "ScientificNotation]" + }, + "<8,23>": { + "<8,23,1>": "Value", + "<8,23,2>": "\"\"", + "<8,23,3>": "[DecimalPlaces", + "<8,23,4>": "ScientificNotation]" + }, + "<8,24>": { + "<8,24,1>": "Value1", + "<8,24,2>": "Value2", + "<8,24,3>": "[DecimalPlaces", + "<8,24,4>": "ScientificNotation]" + }, + "<8,25>": { + "<8,25,1>": "Value", + "<8,25,2>": "\"\"", + "<8,25,3>": "[DecimalPlaces", + "<8,25,4>": "ScientificNotation]" + }, + "<8,26>": { + "<8,26,1>": "Value", + "<8,26,2>": "\"\"", + "<8,26,3>": "[DecimalPlaces", + "<8,26,4>": "ScientificNotation]" + }, + "<8,27>": { + "<8,27,1>": "Value1", + "<8,27,2>": "Value2", + "<8,27,3>": "[DecimalPlaces", + "<8,27,4>": "ScientificNotation]" + }, + "<8,28>": { + "<8,28,1>": "Value", + "<8,28,2>": "\"\"", + "<8,28,3>": "[DecimalPlaces", + "<8,28,4>": "ScientificNotation]" + }, + "<8,29>": { + "<8,29,1>": "Value", + "<8,29,2>": "\"\"", + "<8,29,3>": "[DecimalPlaces", + "<8,29,4>": "ScientificNotation]" + }, + "<8,30>": { + "<8,30,1>": "Value", + "<8,30,2>": "\"\"", + "<8,30,3>": "[DecimalPlaces", + "<8,30,4>": "ScientificNotation]" + }, + "<8,31>": { + "<8,31,1>": "Value", + "<8,31,2>": "\"\"", + "<8,31,3>": "[DecimalPlaces", + "<8,31,4>": "ScientificNotation]" + }, + "<8,32>": { + "<8,32,1>": "Min", + "<8,32,2>": "Max", + "<8,32,3>": "[DecimalPlaces", + "<8,32,4>": "ScientificNotation]" + }, + "<8,33>": { + "<8,33,1>": "Value", + "<8,33,2>": "Places", + "<8,33,3>": "[DecimalPlaces", + "<8,33,4>": "ScientificNotation]" + }, + "<8,34>": { + "<8,34,1>": "Value", + "<8,34,2>": "Target", + "<8,34,3>": "[DecimalPlaces", + "<8,34,4>": "ScientificNotation]" + }, + "<8,35>": { + "<8,35,1>": "Value", + "<8,35,2>": "\"\"", + "<8,35,3>": "[DecimalPlaces", + "<8,35,4>": "ScientificNotation]" + }, + "<8,36>": { + "<8,36,1>": "Value", + "<8,36,2>": "\"\"", + "<8,36,3>": "[DecimalPlaces", + "<8,36,4>": "ScientificNotation]" + }, + "<8,37>": { + "<8,37,1>": "Value", + "<8,37,2>": "\"\"", + "<8,37,3>": "[DecimalPlaces", + "<8,37,4>": "ScientificNotation]" + }, + "<8,38>": { + "<8,38,1>": "Value", + "<8,38,2>": "\"\"", + "<8,38,3>": "[DecimalPlaces", + "<8,38,4>": "ScientificNotation]" + }, + "<8,39>": { + "<8,39,1>": "Value", + "<8,39,2>": "\"\"", + "<8,39,3>": "[DecimalPlaces", + "<8,39,4>": "ScientificNotation]" + }, + "<8,40>": { + "<8,40,1>": "Value1", + "<8,40,2>": "Value2", + "<8,40,3>": "[DecimalPlaces", + "<8,40,4>": "ScientificNotation]" + }, + "<8,41>": { + "<8,41,1>": "Value", + "<8,41,2>": "\"\"", + "<8,41,3>": "[DecimalPlaces", + "<8,41,4>": "ScientificNotation]" + }, + "<8,42>": { + "<8,42,1>": "Value", + "<8,42,2>": "\"\"", + "<8,42,3>": "[DecimalPlaces", + "<8,42,4>": "ScientificNotation]" + } + }, + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "0", + "<14>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_MONITOR.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_MONITOR.json new file mode 100644 index 0000000..b668cd5 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_MONITOR.json @@ -0,0 +1,32 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_MONITOR" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Add_Log", + "<7,2>": "Connect", + "<7,3>": "Close" + }, + "<8>": "LogEntry", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_OI_TO_WIN32.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_OI_TO_WIN32.json new file mode 100644 index 0000000..1a9dcbd --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_OI_TO_WIN32.json @@ -0,0 +1,51 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_OI_TO_WIN32" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "Value", + "<2,1,2>": "@SERVICE", + "<2,1,3>": "@PARAMS" + } + }, + "<3>": "2", + "<4>": "3", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "DOUBLE", + "<7,2>": "DWORD", + "<7,3>": "FLOAT", + "<7,4>": "INT", + "<7,5>": "INT16", + "<7,6>": "INT32", + "<7,7>": "INT64", + "<7,8>": "SHORT", + "<7,9>": "LONG", + "<7,10>": "LONGLONG", + "<7,11>": "UINT", + "<7,12>": "UINT16", + "<7,13>": "UINT32", + "<7,14>": "UINT64", + "<7,15>": "ULONG", + "<7,16>": "ULONGLONG", + "<7,17>": "USHORT", + "<7,18>": "UWORD", + "<7,19>": "WORD" + }, + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "0", + "<14>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_PATH.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_PATH.json new file mode 100644 index 0000000..183fc71 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_PATH.json @@ -0,0 +1,182 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_PATH" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "AddBackslash", + "<7,2>": "AddExtension", + "<7,3>": "Combine", + "<7,4>": "Exists", + "<7,5>": "Expand", + "<7,6>": "FitToEditline", + "<7,7>": "GetComponents", + "<7,8>": "GetDirectory", + "<7,9>": "GetExtension", + "<7,10>": "GetFilename", + "<7,11>": "GetParameters", + "<7,12>": "GetPath", + "<7,13>": "GetTempPath", + "<7,14>": "GetTempFilename", + "<7,15>": "IsDirectory", + "<7,16>": "IsDirectoryEmpty", + "<7,17>": "IsNetworkPath", + "<7,18>": "IsRelative", + "<7,19>": "IsRoot", + "<7,20>": "IsSameRoot", + "<7,21>": "IsSystemFolder", + "<7,22>": "IsUNC", + "<7,23>": "IsURL", + "<7,24>": "MakeRelative", + "<7,25>": "PathToUnc", + "<7,26>": "PathToUrl", + "<7,27>": "Quote", + "<7,28>": "RemoveBackslash", + "<7,29>": "RemoveDirectory", + "<7,30>": "RemoveExtension", + "<7,31>": "RemoveFilename", + "<7,32>": "RemoveParameters", + "<7,33>": "RenameExtension", + "<7,34>": "UrlToPath" + }, + "<8>": { + "<8,1>": "Path", + "<8,2>": { + "<8,2,1>": "Path", + "<8,2,2>": "Extension" + }, + "<8,3>": { + "<8,3,1>": "Path1", + "<8,3,2>": "Path2" + }, + "<8,4>": "Path", + "<8,5>": "Path", + "<8,6>": { + "<8,6,1>": "Path", + "<8,6,2>": "CtrlEntID" + }, + "<8,7>": { + "<8,7,1>": "Path", + "<8,7,2>": "Occurrence = 1", + "<8,7,3>": "Count = 1" + }, + "<8,8>": "Path", + "<8,9>": { + "<8,9,1>": "Path", + "<8,9,2>": "IncludePeriod" + }, + "<8,10>": "Path", + "<8,11>": "Path", + "<8,12>": "Path", + "<8,13>": "", + "<8,14>": { + "<8,14,1>": "Prefix = \"\"", + "<8,14,2>": "Path = \"\"" + }, + "<8,15>": "Path", + "<8,16>": "Path", + "<8,17>": "Path", + "<8,18>": "Path", + "<8,19>": "Path", + "<8,20>": { + "<8,20,1>": "Path1", + "<8,20,2>": "Path2" + }, + "<8,21>": "Path", + "<8,22>": "Path", + "<8,23>": "Path", + "<8,24>": { + "<8,24,1>": "PathFrom", + "<8,24,2>": "PathTo" + }, + "<8,25>": "Path", + "<8,26>": "Path", + "<8,27>": "Path", + "<8,28>": "Path", + "<8,29>": "Path", + "<8,30>": "Path", + "<8,31>": "Path", + "<8,32>": "Path", + "<8,33>": { + "<8,33,1>": "Path", + "<8,33,2>": "NewExtension" + }, + "<8,34>": "Path" + }, + "<9>": { + "<9,1>": "", + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "" + }, + "<9,3>": { + "<9,3,1>": "", + "<9,3,2>": "" + }, + "<9,4>": "", + "<9,5>": "", + "<9,6>": { + "<9,6,1>": "", + "<9,6,2>": "" + }, + "<9,7>": "", + "<9,8>": "", + "<9,9>": { + "<9,9,1>": "", + "<9,9,2>": "" + }, + "<9,10>": "", + "<9,11>": "", + "<9,12>": "", + "<9,13>": "", + "<9,14>": "", + "<9,15>": "", + "<9,16>": "", + "<9,17>": "", + "<9,18>": "", + "<9,19>": "", + "<9,20>": { + "<9,20,1>": "", + "<9,20,2>": "" + }, + "<9,21>": "", + "<9,22>": "", + "<9,23>": "", + "<9,24>": { + "<9,24,1>": "", + "<9,24,2>": "" + }, + "<9,25>": "", + "<9,26>": "", + "<9,27>": "", + "<9,28>": "", + "<9,29>": "", + "<9,30>": "", + "<9,31>": "", + "<9,32>": "", + "<9,33>": { + "<9,33,1>": "", + "<9,33,2>": "" + }, + "<9,34>": "" + }, + "<10>": "", + "<11>": "", + "<12>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_REGEX.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_REGEX.json new file mode 100644 index 0000000..a6144e1 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_REGEX.json @@ -0,0 +1,76 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_REGEX" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Extract", + "<7,2>": "ExtractAll", + "<7,3>": "Match", + "<7,4>": "Search", + "<7,5>": "SearchAll" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "String", + "<8,1,2>": "Pattern" + }, + "<8,2>": { + "<8,2,1>": "String", + "<8,2,2>": "Pattern" + }, + "<8,3>": { + "<8,3,1>": "String", + "<8,3,2>": "Pattern" + }, + "<8,4>": { + "<8,4,1>": "String", + "<8,4,2>": "Pattern" + }, + "<8,5>": { + "<8,5,1>": "String", + "<8,5,2>": "Pattern" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "", + "<9,1,2>": "" + }, + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "" + }, + "<9,3>": { + "<9,3,1>": "", + "<9,3,2>": "" + }, + "<9,4>": { + "<9,4,1>": "", + "<9,4,2>": "" + }, + "<9,5>": { + "<9,5,1>": "", + "<9,5,2>": "" + } + }, + "<10>": "", + "<11>": "", + "<12>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_REGISTRY.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_REGISTRY.json new file mode 100644 index 0000000..b4e5e06 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_REGISTRY.json @@ -0,0 +1,79 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_REGISTRY" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@SERVICE", + "<2,1,2>": "@PARAMS" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "DELETE", + "<7,2>": "EXISTS", + "<7,3>": "LISTKEYS", + "<7,4>": "LISTVALUES", + "<7,5>": "READ", + "<7,6>": "READDEF", + "<7,7>": "WRITE" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "Key", + "<8,1,2>": "ValueName", + "<8,1,3>": "DeleteEvenIfThereAreSubkeys", + "<8,1,4>": "Error" + }, + "<8,2>": { + "<8,2,1>": "Key", + "<8,2,2>": "ValueName" + }, + "<8,3>": { + "<8,3,1>": "Key", + "<8,3,2>": "ValueName", + "<8,3,3>": "IncludePaths", + "<8,3,4>": "Error" + }, + "<8,4>": { + "<8,4,1>": "Key", + "<8,4,2>": "ValueName", + "<8,4,3>": "\"\"", + "<8,4,4>": "Error" + }, + "<8,5>": { + "<8,5,1>": "Key", + "<8,5,2>": "ValueName", + "<8,5,3>": "ReturnValue", + "<8,5,4>": "Error" + }, + "<8,6>": { + "<8,6,1>": "Key", + "<8,6,2>": "ValueName", + "<8,6,3>": "DefaultValue", + "<8,6,4>": "Error" + }, + "<8,7>": { + "<8,7,1>": "Key", + "<8,7,2>": "ValueName", + "<8,7,3>": "Value", + "<8,7,4>": "Error" + } + }, + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "0", + "<14>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_STACK.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_STACK.json new file mode 100644 index 0000000..192a8b7 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_STACK.json @@ -0,0 +1,61 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_STACK" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Clear", + "<7,2>": "Count", + "<7,3>": "Create", + "<7,4>": "Peek", + "<7,5>": "Pop", + "<7,6>": "Push", + "<7,7>": "Release" + }, + "<8>": { + "<8,1>": "Handles", + "<8,2>": "Handle", + "<8,3>": { + "<8,3,1>": "InitialList", + "<8,3,2>": "Delimiter = @FM" + }, + "<8,4>": "Handle", + "<8,5>": "Handle", + "<8,6>": { + "<8,6,1>": "Handle", + "<8,6,2>": "Value" + }, + "<8,7>": "Handles" + }, + "<9>": { + "<9,1>": "", + "<9,2>": "", + "<9,3>": "", + "<9,4>": "", + "<9,5>": "", + "<9,6>": { + "<9,6,1>": "", + "<9,6,2>": "" + }, + "<9,7>": "" + }, + "<10>": "", + "<11>": "", + "<12>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_STOPWATCH.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_STOPWATCH.json new file mode 100644 index 0000000..7e3428c --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_STOPWATCH.json @@ -0,0 +1,57 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_STOPWATCH" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@SERVICE", + "<2,1,2>": "@PARAMS" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "GetAll", + "<7,2>": "GetAverage", + "<7,3>": "GetBenchmark", + "<7,4>": "GetAverage", + "<7,5>": "GetData", + "<7,6>": "GetTotalBenchmark", + "<7,7>": "Reset", + "<7,8>": "Show", + "<7,9>": "ShowAll", + "<7,10>": "Start", + "<7,11>": "Stop" + }, + "<8>": { + "<8,1>": "", + "<8,2>": "Name", + "<8,3>": "Name", + "<8,4>": "Name", + "<8,5>": { + "<8,5,1>": "Name", + "<8,5,2>": "Delim" + }, + "<8,6>": "", + "<8,7>": "", + "<8,8>": "Name", + "<8,9>": "", + "<8,10>": "Name", + "<8,11>": "Name" + }, + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "0", + "<14>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_STRING.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_STRING.json new file mode 100644 index 0000000..86e35f7 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_STRING.json @@ -0,0 +1,209 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_STRING" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "DetokenizeCode", + "<7,2>": "GetHeight", + "<7,3>": "GetWidth", + "<7,4>": "TokenizeCode", + "<7,5>": "Trim", + "<7,6>": "Compare", + "<7,7>": "EQ", + "<7,8>": "EQC", + "<7,9>": "NE", + "<7,10>": "NEC", + "<7,11>": "LT", + "<7,12>": "LTC", + "<7,13>": "LE", + "<7,14>": "LEC", + "<7,15>": "GT", + "<7,16>": "GTC", + "<7,17>": "GE", + "<7,18>": "GEC", + "<7,19>": "StripRTF" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "String", + "<8,1,2>": "Delim = @FM" + }, + "<8,2>": { + "<8,2,1>": "String", + "<8,2,2>": "Font", + "<8,2,3>": "Width", + "<8,2,4>": "LineBreakDelimiter = @TM" + }, + "<8,3>": { + "<8,3,1>": "String", + "<8,3,2>": "Font" + }, + "<8,4>": { + "<8,4,1>": "String", + "<8,4,2>": "WhitespaceOptions = \"None\"", + "<8,4,3>": "IncludeComments = 0", + "<8,4,4>": "Ref State" + }, + "<8,5>": { + "<8,5,1>": "String", + "<8,5,2>": "Flags", + "<8,5,3>": "TrimChars" + }, + "<8,6>": { + "<8,6,1>": "String1", + "<8,6,2>": "String2", + "<8,6,3>": "IgnoreCase = 0" + }, + "<8,7>": { + "<8,7,1>": "String1", + "<8,7,2>": "String2" + }, + "<8,8>": { + "<8,8,1>": "String1", + "<8,8,2>": "String2" + }, + "<8,9>": { + "<8,9,1>": "String1", + "<8,9,2>": "String2" + }, + "<8,10>": { + "<8,10,1>": "String1", + "<8,10,2>": "String2" + }, + "<8,11>": { + "<8,11,1>": "String1", + "<8,11,2>": "String2" + }, + "<8,12>": { + "<8,12,1>": "String1", + "<8,12,2>": "String2" + }, + "<8,13>": { + "<8,13,1>": "String1", + "<8,13,2>": "String2" + }, + "<8,14>": { + "<8,14,1>": "String1", + "<8,14,2>": "String2" + }, + "<8,15>": { + "<8,15,1>": "String1", + "<8,15,2>": "String2" + }, + "<8,16>": { + "<8,16,1>": "String1", + "<8,16,2>": "String2" + }, + "<8,17>": { + "<8,17,1>": "String1", + "<8,17,2>": "String2" + }, + "<8,18>": { + "<8,18,1>": "String1", + "<8,18,2>": "String2" + }, + "<8,19>": "RtfString" + }, + "<9>": { + "<9,1>": "", + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "", + "<9,2,3>": "" + }, + "<9,3>": { + "<9,3,1>": "", + "<9,3,2>": "" + }, + "<9,4>": { + "<9,4,1>": "", + "<9,4,2>": "WHITESPACEOPTIONS", + "<9,4,3>": "", + "<9,4,4>": "" + }, + "<9,5>": { + "<9,5,1>": "", + "<9,5,2>": "", + "<9,5,3>": "" + }, + "<9,6>": { + "<9,6,1>": "", + "<9,6,2>": "" + }, + "<9,7>": { + "<9,7,1>": "", + "<9,7,2>": "" + }, + "<9,8>": { + "<9,8,1>": "", + "<9,8,2>": "" + }, + "<9,9>": { + "<9,9,1>": "", + "<9,9,2>": "" + }, + "<9,10>": { + "<9,10,1>": "", + "<9,10,2>": "" + }, + "<9,11>": { + "<9,11,1>": "", + "<9,11,2>": "" + }, + "<9,12>": { + "<9,12,1>": "", + "<9,12,2>": "" + }, + "<9,13>": { + "<9,13,1>": "", + "<9,13,2>": "" + }, + "<9,14>": { + "<9,14,1>": "", + "<9,14,2>": "" + }, + "<9,15>": { + "<9,15,1>": "", + "<9,15,2>": "" + }, + "<9,16>": { + "<9,16,1>": "", + "<9,16,2>": "" + }, + "<9,17>": { + "<9,17,1>": "", + "<9,17,2>": "" + }, + "<9,18>": { + "<9,18,1>": "", + "<9,18,2>": "" + }, + "<9,19>": "" + }, + "<10>": "WHITESPACEOPTIONS", + "<11>": { + "<11,1>": { + "<11,1,1>": "None", + "<11,1,2>": "AllWhitespace", + "<11,1,3>": "LineBreaksOnly" + } + }, + "<12>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_TASKBAR.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_TASKBAR.json new file mode 100644 index 0000000..c3e2b1a --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_TASKBAR.json @@ -0,0 +1,28 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_TASKBAR" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": "SetGroupTitle", + "<8>": "Title", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_TCPCLIENT.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_TCPCLIENT.json new file mode 100644 index 0000000..79580a2 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_TCPCLIENT.json @@ -0,0 +1,74 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_TCPCLIENT" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "Object", + "<2,1,2>": "@Service", + "<2,1,3>": "@Params" + } + }, + "<3>": "2", + "<4>": "3", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "Close", + "<7,2>": "Close_SES", + "<7,3>": "Close_QbXml", + "<7,4>": "Connect", + "<7,5>": "Receive", + "<7,6>": "Send", + "<7,7>": "Send_SES", + "<7,8>": "Send_QbXml" + }, + "<8>": { + "<8,1>": "", + "<8,2>": "", + "<8,3>": "", + "<8,4>": { + "<8,4,1>": "Address", + "<8,4,2>": "Port" + }, + "<8,5>": { + "<8,5,1>": "BytesToRead", + "<8,5,2>": "Ref BytesActuallyRead" + }, + "<8,6>": "Data", + "<8,7>": "Command", + "<8,8>": { + "<8,8,1>": "XmlRequest", + "<8,8,2>": "Ref Error" + } + }, + "<9>": { + "<9,1>": "", + "<9,2>": "", + "<9,3>": "", + "<9,4>": { + "<9,4,1>": "", + "<9,4,2>": "" + }, + "<9,5>": { + "<9,5,1>": "", + "<9,5,2>": "" + }, + "<9,6>": "", + "<9,7>": "", + "<9,8>": { + "<9,8,1>": "", + "<9,8,2>": "" + } + }, + "<10>": "", + "<11>": "", + "<12>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_TIME.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_TIME.json new file mode 100644 index 0000000..9533b53 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_TIME.json @@ -0,0 +1,216 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_TIME" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "@Service", + "<2,1,2>": "@Params" + } + }, + "<3>": "1", + "<4>": "2", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "AddHours", + "<7,2>": "AddMinutes", + "<7,3>": "AddSeconds", + "<7,4>": "AmName", + "<7,5>": "AmNames", + "<7,6>": "Decode", + "<7,7>": "Encode", + "<7,8>": "Format", + "<7,9>": "FromFraction", + "<7,10>": "FromUTC", + "<7,11>": "Hour", + "<7,12>": "HourSpan", + "<7,13>": "IsAm", + "<7,14>": "IsDaylightSavings", + "<7,15>": "IConv", + "<7,16>": "Minute", + "<7,17>": "MinuteSpan", + "<7,18>": "Now", + "<7,19>": "OConv", + "<7,20>": "Parse", + "<7,21>": "PmName", + "<7,22>": "PmNames", + "<7,23>": "Second", + "<7,24>": "SecondSpan", + "<7,25>": "SecondsPerDay", + "<7,26>": "Span", + "<7,27>": "TimeZoneBias", + "<7,28>": "ToFraction", + "<7,29>": "ToUTC", + "<7,30>": "Validate" + }, + "<8>": { + "<8,1>": { + "<8,1,1>": "Time", + "<8,1,2>": "Hours" + }, + "<8,2>": { + "<8,2,1>": "Time", + "<8,2,2>": "Minutes" + }, + "<8,3>": { + "<8,3,1>": "Time", + "<8,3,2>": "Seconds" + }, + "<8,4>": { + "<8,4,1>": "NameLength = \"Full\"", + "<8,4,2>": "Locale = \"\"" + }, + "<8,5>": "Locale = \"\"", + "<8,6>": "Time", + "<8,7>": { + "<8,7,1>": "Hour", + "<8,7,2>": "Minute", + "<8,7,3>": "Second" + }, + "<8,8>": { + "<8,8,1>": "Time", + "<8,8,2>": "Format = \"Short\"", + "<8,8,3>": "Locale = \"\"" + }, + "<8,9>": "Fraction", + "<8,10>": "Time", + "<8,11>": "Time", + "<8,12>": { + "<8,12,1>": "FromTime", + "<8,12,2>": "ToTime", + "<8,12,3>": "Fractional = 1" + }, + "<8,13>": "Time", + "<8,14>": "", + "<8,15>": { + "<8,15,1>": "Ans", + "<8,15,2>": "Branch", + "<8,15,3>": "Ref ReturnData" + }, + "<8,16>": "Time", + "<8,17>": { + "<8,17,1>": "FromTime", + "<8,17,2>": "ToTime", + "<8,17,3>": "Fractional = 1" + }, + "<8,18>": "UTC = 0", + "<8,19>": { + "<8,19,1>": "Ans", + "<8,19,2>": "Branch", + "<8,19,3>": "Ref ReturnData" + }, + "<8,20>": { + "<8,20,1>": "Text", + "<8,20,2>": "Format = \"Short\"", + "<8,20,3>": "Locale = \"\"" + }, + "<8,21>": { + "<8,21,1>": "NameLength = \"Full\"", + "<8,21,2>": "Locale = \"\"" + }, + "<8,22>": "Locale = \"\"", + "<8,23>": "Time", + "<8,24>": { + "<8,24,1>": "FromTime", + "<8,24,2>": "ToTime" + }, + "<8,25>": "", + "<8,26>": { + "<8,26,1>": "FromTime", + "<8,26,2>": "ToTime" + }, + "<8,27>": "", + "<8,28>": "Time", + "<8,29>": "Time", + "<8,30>": { + "<8,30,1>": "Hour", + "<8,30,2>": "Minute", + "<8,30,3>": "Second" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "", + "<9,1,2>": "" + }, + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "" + }, + "<9,3>": { + "<9,3,1>": "", + "<9,3,2>": "" + }, + "<9,4>": "NAME_LENGTH", + "<9,5>": "", + "<9,6>": "", + "<9,7>": { + "<9,7,1>": "", + "<9,7,2>": "", + "<9,7,3>": "" + }, + "<9,8>": "", + "<9,9>": "", + "<9,10>": "", + "<9,11>": "", + "<9,12>": { + "<9,12,1>": "", + "<9,12,2>": "" + }, + "<9,13>": "", + "<9,14>": "", + "<9,15>": { + "<9,15,1>": "", + "<9,15,2>": "", + "<9,15,3>": "" + }, + "<9,16>": "", + "<9,17>": { + "<9,17,1>": "", + "<9,17,2>": "" + }, + "<9,18>": "", + "<9,19>": { + "<9,19,1>": "", + "<9,19,2>": "", + "<9,19,3>": "" + }, + "<9,20>": "", + "<9,21>": "NAME_LENGTH", + "<9,22>": "", + "<9,23>": "", + "<9,24>": { + "<9,24,1>": "", + "<9,24,2>": "" + }, + "<9,25>": "", + "<9,26>": { + "<9,26,1>": "", + "<9,26,2>": "" + }, + "<9,27>": "", + "<9,28>": "", + "<9,29>": "", + "<9,30>": { + "<9,30,1>": "", + "<9,30,2>": "", + "<9,30,3>": "" + } + }, + "<10>": "NAME_LENGTH", + "<11>": { + "<11,1>": { + "<11,1,1>": "Full", + "<11,1,2>": "Abbr" + } + }, + "<12>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_WIN32_TO_OI.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_WIN32_TO_OI.json new file mode 100644 index 0000000..bff6e16 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_METADATA_SRP_WIN32_TO_OI.json @@ -0,0 +1,51 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_METADATA*SRP_WIN32_TO_OI" + }, + "body": { + "record1": { + "<1>": "SERVICE", + "<2>": { + "<2,1>": { + "<2,1,1>": "Value", + "<2,1,2>": "@SERVICE", + "<2,1,3>": "@PARAMS" + } + }, + "<3>": "2", + "<4>": "3", + "<5>": "1", + "<6>": "", + "<7>": { + "<7,1>": "DOUBLE", + "<7,2>": "DWORD", + "<7,3>": "FLOAT", + "<7,4>": "INT", + "<7,5>": "INT16", + "<7,6>": "INT32", + "<7,7>": "INT64", + "<7,8>": "SHORT", + "<7,9>": "LONG", + "<7,10>": "LONGLONG", + "<7,11>": "UINT", + "<7,12>": "UINT16", + "<7,13>": "UINT32", + "<7,14>": "UINT64", + "<7,15>": "ULONG", + "<7,16>": "ULONGLONG", + "<7,17>": "USHORT", + "<7,18>": "UWORD", + "<7,19>": "WORD" + }, + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "0", + "<14>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_BESPIN.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_BESPIN.json new file mode 100644 index 0000000..a153913 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_BESPIN.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*BESPIN" + }, + "body": { + "record1": { + "<1>": "Bespin", + "<2>": "1" + }, + "record2": { + "<1>": "4278860", + "<2>": "65408", + "<3>": "14147043", + "<4>": "5924739", + "<5>": "3489359", + "<6>": { + "<6,1>": { + "<6,1,1>": "10333885", + "<6,1,2>": "1843498", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "8450294", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "8450294", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "8600319", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "3794005", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "14719518", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "14719518", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "43775", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "8450294", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "234", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "3794005", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "234", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "14719518", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "43775", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "3719653", + "<6,23,2>": "4278860", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "2697711", + "<6,24,2>": "3489359", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "3719653", + "<6,25,2>": "3489359", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "8600319", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "43775", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "14719518", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "3794005", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "234", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "8450294", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_BLACK BOARD.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_BLACK BOARD.json new file mode 100644 index 0000000..1de178e --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_BLACK BOARD.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*BLACK BOARD" + }, + "body": { + "record1": { + "<1>": "Black Board", + "<2>": "1" + }, + "record2": { + "<1>": "3552302", + "<2>": "16777215", + "<3>": "16316664", + "<4>": "7748389", + "<5>": "3151890", + "<6>": { + "<6,1>": { + "<6,1,1>": "16316664", + "<6,1,2>": "2166796", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "3006203", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "3006203", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "3996376", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "3984993", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "11447982", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "11447982", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "3006203", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "3006203", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "3984993", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "255", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "11447982", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "3006203", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "15527662", + "<6,23,2>": "3552302", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "2697711", + "<6,24,2>": "3151890", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "5237244", + "<6,25,2>": "3151890", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "12849092", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "16744319", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "16733011", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "1033231", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "987135", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "1033412", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_CHOCO.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_CHOCO.json new file mode 100644 index 0000000..6784e67 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_CHOCO.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*CHOCO" + }, + "body": { + "record1": { + "<1>": "Choco", + "<2>": "1" + }, + "record2": { + "<1>": "3552302", + "<2>": "10987431", + "<3>": "11652561", + "<4>": "1515575", + "<5>": "1120040", + "<6>": { + "<6,1>": { + "<6,1,1>": "10010307", + "<6,1,2>": "724762", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "9758449", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "9758449", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "5854938", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "6530428", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "4693351", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "4693351", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "6067123", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "9758449", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "210", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "6530428", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "210", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "4693351", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "11048585", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "15527662", + "<6,23,2>": "3552302", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "2697711", + "<6,24,2>": "1120040", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "5237244", + "<6,25,2>": "1120040", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "9193095", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "6067123", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "11495785", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "6530428", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "5854938", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "9758449", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_DARK BLUE.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_DARK BLUE.json new file mode 100644 index 0000000..ab7749a --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_DARK BLUE.json @@ -0,0 +1,373 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*DARK BLUE" + }, + "body": { + "record1": { + "<1>": "Dark Blue" + }, + "record2": { + "<1>": "16752768", + "<2>": "65535", + "<3>": "16777215", + "<4>": "13652000", + "<5>": "4194304", + "<6>": { + "<6,1>": { + "<6,1,1>": "16777215", + "<6,1,2>": "4194304", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "65535", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "1", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "65535", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "1", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "10526975", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "16752768", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "16752768", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "1", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "65535", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "1", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "10526975", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "255", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "16752768", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8355711", + "<6,18,2>": "16777215", + "<6,18,3>": "Consolas", + "<6,18,4>": "10", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "65535", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "", + "<6,23,2>": "", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "33023", + "<6,24,2>": "4194304", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "8454016", + "<6,25,2>": "4194304", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "10526975", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "16777088", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "16752768", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "1033231", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "987135", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "65535", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_DEEP BLACK.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_DEEP BLACK.json new file mode 100644 index 0000000..0f6c3ee --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_DEEP BLACK.json @@ -0,0 +1,159 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*DEEP BLACK" + }, + "body": { + "record1": { + "<1>": "Deep Black", + "<2>": "1" + }, + "record2": { + "<1>": "3355443", + "<2>": "16777215", + "<3>": "204", + "<4>": "13408614", + "<5>": "3355443", + "<6>": { + "<6,1>": { + "<6,1,1>": "16777215", + "<6,1,2>": "0", + "<6,1,3>": "Courier New", + "<6,1,4>": "9", + "<6,1,5>": "", + "<6,1,6>": "", + "<6,1,7>": "0" + }, + "<6,2>": { + "<6,2,1>": "26367", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "1" + }, + "<6,3>": { + "<6,3,1>": "26367", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "1" + }, + "<6,4>": "33023", + "<6,5>": "65535", + "<6,6>": "65280", + "<6,7>": "65280", + "<6,8>": "52479", + "<6,9>": { + "<6,9,1>": "26367", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "1" + }, + "<6,10>": "", + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1" + }, + "<6,14>": "", + "<6,15>": "65535", + "<6,16>": "255", + "<6,17>": "65280", + "<6,18>": { + "<6,18,1>": "26367", + "<6,18,2>": "", + "<6,18,3>": "", + "<6,18,4>": "", + "<6,18,5>": "", + "<6,18,6>": "", + "<6,18,7>": "1" + }, + "<6,19>": "", + "<6,20>": "", + "<6,21>": "", + "<6,22>": "12632256", + "<6,23>": { + "<6,23,1>": "12632256", + "<6,23,2>": "3355443" + }, + "<6,24>": { + "<6,24,1>": "255", + "<6,24,2>": "3355443", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "1" + }, + "<6,25>": { + "<6,25,1>": "65280", + "<6,25,2>": "3355443", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "12849092" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "16744319" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "16715535" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "1033231" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "987135" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "1033412" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_DEFAULT.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_DEFAULT.json new file mode 100644 index 0000000..00ea7a6 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_DEFAULT.json @@ -0,0 +1,373 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*DEFAULT" + }, + "body": { + "record1": { + "<1>": "Default" + }, + "record2": { + "<1>": "16768991", + "<2>": "1", + "<3>": "0", + "<4>": "16758122", + "<5>": "16768991", + "<6>": { + "<6,1>": { + "<6,1,1>": "0", + "<6,1,2>": "16777215", + "<6,1,3>": "Courier New", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "16711680", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "16711680", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "128", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "128", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "32768", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "32768", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "16711680", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "128", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "32768", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "32768", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "16711680", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "0", + "<6,23,2>": "15790320", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "255", + "<6,24,2>": "", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "1", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "16711680", + "<6,25,2>": "", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "12849092", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "16744319", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "16715535", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "1033231", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "987135", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "1033412", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_HOT FUDGE SUNDAE.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_HOT FUDGE SUNDAE.json new file mode 100644 index 0000000..06b616e --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_HOT FUDGE SUNDAE.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*HOT FUDGE SUNDAE" + }, + "body": { + "record1": { + "<1>": "Hot Fudge Sundae", + "<2>": "1" + }, + "record2": { + "<1>": "730435", + "<2>": "13038074", + "<3>": "9812944", + "<4>": "5789784", + "<5>": "1256515", + "<6>": { + "<6,1>": { + "<6,1,1>": "6133687", + "<6,1,2>": "69419", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "3265098", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "3265098", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "14067631", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "8436668", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "557088", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "557088", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "7980246", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "3265098", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "185", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "8436668", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "185", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "557088", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "1578177", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "2843787", + "<6,23,2>": "730435", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "16711935", + "<6,24,2>": "1256515", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "1", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "69419", + "<6,25,2>": "1256515", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "11151530", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "13658730", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "13256516", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "557088", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "185", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "3187615", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_JOKER.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_JOKER.json new file mode 100644 index 0000000..8c394f2 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_JOKER.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*JOKER" + }, + "body": { + "record1": { + "<1>": "Joker", + "<2>": "1" + }, + "record2": { + "<1>": "12632256", + "<2>": "10987403", + "<3>": "16316664", + "<4>": "8216621", + "<5>": "5848111", + "<6>": { + "<6,1>": { + "<6,1,1>": "16316664", + "<6,1,2>": "1906187", + "<6,1,3>": "Consolas", + "<6,1,4>": "12", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "12058623", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "16755455", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "1", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "11163135", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "10658385", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "16762186", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "16767368", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "16218592", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "8450294", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "11130463", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "11130463", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "16777107", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "9563808", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "255", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "16762186", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "", + "<6,18,3>": "", + "<6,18,4>": "", + "<6,18,5>": "", + "<6,18,6>": "", + "<6,18,7>": "", + "<6,18,8>": "", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "12874092", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "8533715", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "9868419", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "7131135", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "15527662", + "<6,23,2>": "3552302", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "2697711", + "<6,24,2>": "2957841", + "<6,24,3>": "", + "<6,24,4>": "10", + "<6,24,5>": "", + "<6,24,6>": "0", + "<6,24,7>": "1", + "<6,24,8>": "0", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "5237244", + "<6,25,2>": "2957841", + "<6,25,3>": "", + "<6,25,4>": "10", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "8450294", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "8533715", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "12874092", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "13798182", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "39301", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "3093212", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "35253", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_KHAKI.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_KHAKI.json new file mode 100644 index 0000000..30606b4 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_KHAKI.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*KHAKI" + }, + "body": { + "record1": { + "<1>": "Khaki", + "<2>": "1" + }, + "record2": { + "<1>": "8892335", + "<2>": "24415", + "<3>": "24415", + "<4>": "8912855", + "<5>": "8892335", + "<6>": { + "<6,1>": { + "<6,1,1>": "24415", + "<6,1,2>": "11524055", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "6226055", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "6226055", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "24320", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "6250240", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "6260615", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "6260615", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "6225920", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "6226055", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "198", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "6250240", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "198", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "6260615", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "95", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "", + "<6,23,2>": "8892335", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "6226175", + "<6,24,2>": "8892335", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "11524055", + "<6,25,2>": "8892335", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "6226055", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "12479851", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "10364965", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "6250240", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "198", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "756362", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_MONO INDUSTRIAL.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_MONO INDUSTRIAL.json new file mode 100644 index 0000000..2d58170 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_MONO INDUSTRIAL.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*MONO INDUSTRIAL" + }, + "body": { + "record1": { + "<1>": "Mono Industrial", + "<2>": "1" + }, + "record2": { + "<1>": "3552302", + "<2>": "16777215", + "<3>": "24415", + "<4>": "9738641", + "<5>": "3356716", + "<6>": { + "<6,1>": { + "<6,1,1>": "16777215", + "<6,1,2>": "2632738", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "15298", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "15298", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "35049", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "6843494", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "6843494", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "11252648", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "15298", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "255", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "6843494", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "6594211", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "15527662", + "<6,23,2>": "3552302", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "2697711", + "<6,24,2>": "3356716", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "5237244", + "<6,25,2>": "3356716", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "13767630", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "15953332", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "15427431", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "1033231", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "15298", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "35049", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_MONOKAI.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_MONOKAI.json new file mode 100644 index 0000000..7fe0663 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_MONOKAI.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*MONOKAI" + }, + "body": { + "record1": { + "<1>": "Monokai", + "<2>": "1" + }, + "record2": { + "<1>": "3552302", + "<2>": "15792376", + "<3>": "10676206", + "<4>": "5925227", + "<5>": "3292478", + "<6>": { + "<6,1>": { + "<6,1,1>": "15923448", + "<6,1,2>": "2238503", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "15718758", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "15718758", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "16744878", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "7658470", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "6189429", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "6189429", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "7481081", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "15718758", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "7658470", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "255", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "6189429", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "7481081", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "15527662", + "<6,23,2>": "3552302", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "2697711", + "<6,24,2>": "3292478", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "5237244", + "<6,25,2>": "3292478", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "7481081", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "16744878", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "15718758", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "53765", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "987135", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "7658470", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_NAVAJO.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_NAVAJO.json new file mode 100644 index 0000000..cd000d9 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_NAVAJO.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*NAVAJO" + }, + "body": { + "record1": { + "<1>": "Navajo", + "<2>": "1" + }, + "record2": { + "<1>": "8421504", + "<2>": "16777215", + "<3>": "1", + "<4>": "12369084", + "<5>": "7640755", + "<6>": { + "<6,1>": { + "<6,1,1>": "0", + "<6,1,2>": "8428730", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "4210816", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "4210816", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "5767360", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "5767360", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "8394776", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "8394776", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "65793", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "1", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "4210816", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "5767360", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "255", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "8394776", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "8847495", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "", + "<6,23,2>": "8421504", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "12369084", + "<6,24,2>": "7640755", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "", + "<6,25,2>": "7640755", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "10095770", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "7895041", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "16715535", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "753675", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "157", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "689027", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_OBSIDIAN.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_OBSIDIAN.json new file mode 100644 index 0000000..28a4514 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_OBSIDIAN.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*OBSIDIAN" + }, + "body": { + "record1": { + "<1>": "Obsidian", + "<2>": "1" + }, + "record2": { + "<1>": "5131071", + "<2>": "13814721", + "<3>": "15000288", + "<4>": "7894111", + "<5>": "3946799", + "<6>": { + "<6,1>": { + "<6,1,1>": "15000288", + "<6,1,2>": "3420457", + "<6,1,3>": "Courier New", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "6539155", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "1", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "6539155", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "1", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "2280959", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "30444", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "8090726", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "8090726", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "12051176", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "6539155", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "1", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "30444", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "255", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "8090726", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "12419744", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "10131073", + "<6,23,2>": "5131071", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "251", + "<6,24,2>": "3946799", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "3070963", + "<6,25,2>": "3946799", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "6539155", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "1", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "15536877", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "1", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "16757039", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "16751515", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "6539155", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "30444", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "2280959", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_PLASTIC CODE WRAP.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_PLASTIC CODE WRAP.json new file mode 100644 index 0000000..1b4d07e --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_PLASTIC CODE WRAP.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*PLASTIC CODE WRAP" + }, + "body": { + "record1": { + "<1>": "Plastic Code Wrap", + "<2>": "1" + }, + "record2": { + "<1>": "3552302", + "<2>": "10987403", + "<3>": "16316664", + "<4>": "8216621", + "<5>": "2957841", + "<6>": { + "<6,1>": { + "<6,1,1>": "16316664", + "<6,1,2>": "1906187", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "8450294", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "8450294", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "8600319", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "3794005", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "14719518", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "14719518", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "43775", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "8450294", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "3794005", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "255", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "14719518", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "43775", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "15527662", + "<6,23,2>": "3552302", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "2697711", + "<6,24,2>": "2957841", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "5237244", + "<6,25,2>": "2957841", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "8450294", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "8600319", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "16762496", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "14719518", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "3794005", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "987135", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "8450294", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_SOLARIZED DARK.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_SOLARIZED DARK.json new file mode 100644 index 0000000..89c4193 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_SOLARIZED DARK.json @@ -0,0 +1,373 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*SOLARIZED DARK" + }, + "body": { + "record1": { + "<1>": "Solarized Dark" + }, + "record2": { + "<1>": "4339207", + "<2>": "9868419", + "<3>": "7695960", + "<4>": "15595261", + "<5>": "4339207", + "<6>": { + "<6,1>": { + "<6,1,1>": "9868419", + "<6,1,2>": "3484416", + "<6,1,3>": "Consolas", + "<6,1,4>": "11", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "35253", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "39301", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "1", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "10002730", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "10002730", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "7695960", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "13798182", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "35253", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "3093212", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "10592659", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "10592659", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "10002730", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "3093212", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "13798182", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8355711", + "<6,18,2>": "16777215", + "<6,18,3>": "Consolas", + "<6,18,4>": "10", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "12874092", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "8533715", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "9868419", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "1461195", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "9868419", + "<6,23,2>": "4339207", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "3093212", + "<6,24,2>": "", + "<6,24,3>": "", + "<6,24,4>": "10", + "<6,24,5>": "", + "<6,24,6>": "0", + "<6,24,7>": "1", + "<6,24,8>": "0", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "13798182", + "<6,25,2>": "", + "<6,25,3>": "", + "<6,25,4>": "10", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "8533715", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "12874092", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "13798182", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "39301", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "3093212", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "35253", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_SOLARIZED LIGHT.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_SOLARIZED LIGHT.json new file mode 100644 index 0000000..91455de --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_SOLARIZED LIGHT.json @@ -0,0 +1,373 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*SOLARIZED LIGHT" + }, + "body": { + "record1": { + "<1>": "Solarized Light" + }, + "record2": { + "<1>": "14346478", + "<2>": "3484416", + "<3>": "14342611", + "<4>": "3484416", + "<5>": "14346478", + "<6>": { + "<6,1>": { + "<6,1,1>": "7695960", + "<6,1,2>": "15595261", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "35253", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "13798182", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "1", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "10002730", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "10002730", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "7695960", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "39301", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "35253", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "3093212", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "7695960", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "7695960", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "10002730", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "3093212", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "39301", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8355711", + "<6,18,2>": "16777215", + "<6,18,3>": "Consolas", + "<6,18,4>": "10", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "12874092", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "8533715", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "7695960", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "1461195", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "7695960", + "<6,23,2>": "14346478", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "3093212", + "<6,24,2>": "", + "<6,24,3>": "", + "<6,24,4>": "10", + "<6,24,5>": "", + "<6,24,6>": "0", + "<6,24,7>": "1", + "<6,24,8>": "0", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "13798182", + "<6,25,2>": "", + "<6,25,3>": "", + "<6,25,4>": "10", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "8533715", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "12874092", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "13798182", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "39301", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "3093212", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "35253", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_TWILIGHT.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_TWILIGHT.json new file mode 100644 index 0000000..1a14228 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_TWILIGHT.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*TWILIGHT" + }, + "body": { + "record1": { + "<1>": "Twilight", + "<2>": "1" + }, + "record2": { + "<1>": "3552302", + "<2>": "10987431", + "<3>": "16777215", + "<4>": "4079166", + "<5>": "2697513", + "<6>": { + "<6,1>": { + "<6,1,1>": "16316664", + "<6,1,2>": "1315860", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "10022649", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "10022649", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "5008079", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "6987151", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "6314591", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "6314591", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "6924493", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "10022649", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "6987151", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "255", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "6314591", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "11048585", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "15527662", + "<6,23,2>": "3552302", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "2697711", + "<6,24,2>": "2697513", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "5237244", + "<6,25,2>": "2697513", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "12849092", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "16744319", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "16715535", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "1033231", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "987135", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "1033412", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_VIBRANT INK.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_VIBRANT INK.json new file mode 100644 index 0000000..9be5b60 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_VIBRANT INK.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*VIBRANT INK" + }, + "body": { + "record1": { + "<1>": "Vibrant Ink", + "<2>": "1" + }, + "record2": { + "<1>": "3355443", + "<2>": "16777215", + "<3>": "16777215", + "<4>": "13408614", + "<5>": "3355443", + "<6>": { + "<6,1>": { + "<6,1,1>": "16777215", + "<6,1,2>": "0", + "<6,1,3>": "Courier New", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "26367", + "<6,2,2>": "0", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "1", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "26367", + "<6,3,2>": "0", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "1", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "33023", + "<6,4,2>": "0", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "65382", + "<6,5,2>": "0", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "13382553", + "<6,6,2>": "0", + "<6,6,3>": "", + "<6,6,4>": "8", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "13382553", + "<6,7,2>": "0", + "<6,7,3>": "", + "<6,7,4>": "8", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "52479", + "<6,8,2>": "0", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "1", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "26367", + "<6,9,2>": "0", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "1", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "255", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "65382", + "<6,15,2>": "0", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "255", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "13382553", + "<6,17,2>": "0", + "<6,17,3>": "", + "<6,17,4>": "8", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "16382189", + "<6,22,2>": "0", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "15000804", + "<6,23,2>": "3355443", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "3407820", + "<6,24,2>": "3355443", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "10079385", + "<6,25,2>": "3355443", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "12849092", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "16777088", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "16757683", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "1033231", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "26367", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "1033412", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_VISUAL STUDIO DARK.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_VISUAL STUDIO DARK.json new file mode 100644 index 0000000..e980680 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_VISUAL STUDIO DARK.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*VISUAL STUDIO DARK" + }, + "body": { + "record1": { + "<1>": "Visual Studio Dark", + "<2>": "1" + }, + "record2": { + "<1>": "9868950", + "<2>": "14474460", + "<3>": "16119285", + "<4>": "7161379", + "<5>": "2631720", + "<6>": { + "<6,1>": { + "<6,1,1>": "14474460", + "<6,1,2>": "1973790", + "<6,1,3>": "Consolas", + "<6,1,4>": "12", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "12306920", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "14064726", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "0", + "<6,3,8>": "0", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "11062965", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "8756694", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "4164426", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "4892247", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "11842740", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "9426687", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "3162582", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "14655704", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "0", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "14655704", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "0", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "11197660", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "0", + "<6,14,8>": "0", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "10151088", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "3162582", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "4892247", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "", + "<6,18,3>": "", + "<6,18,4>": "", + "<6,18,5>": "", + "<6,18,6>": "", + "<6,18,7>": "", + "<6,18,8>": "", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "16758718", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "16702620", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "11585870", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "14655704", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "0", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "11505963", + "<6,23,2>": "1973790", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "14474460", + "<6,24,2>": "3162582", + "<6,24,3>": "", + "<6,24,4>": "10", + "<6,24,5>": "", + "<6,24,6>": "0", + "<6,24,7>": "1", + "<6,24,8>": "0", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "14474460", + "<6,25,2>": "8602894", + "<6,25,3>": "", + "<6,25,4>": "10", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "8450294", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "13528261", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "16758718", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "14064726", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "4892247", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "3162582", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "11197660", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_ZENBURN.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_ZENBURN.json new file mode 100644 index 0000000..12ab4bd --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_THEME_ZENBURN.json @@ -0,0 +1,374 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_THEME*ZENBURN" + }, + "body": { + "record1": { + "<1>": "Zenburn", + "<2>": "1" + }, + "record2": { + "<1>": "789516", + "<2>": "10465167", + "<3>": "13425884", + "<4>": "5789784", + "<5>": "1052688", + "<6>": { + "<6,1>": { + "<6,1,1>": "13425884", + "<6,1,2>": "4144959", + "<6,1,3>": "Consolas", + "<6,1,4>": "10", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "0", + "<6,1,9>": "" + }, + "<6,2>": { + "<6,2,1>": "8242399", + "<6,2,2>": "", + "<6,2,3>": "", + "<6,2,4>": "", + "<6,2,5>": "", + "<6,2,6>": "", + "<6,2,7>": "1", + "<6,2,8>": "", + "<6,2,9>": "" + }, + "<6,3>": { + "<6,3,1>": "8242399", + "<6,3,2>": "", + "<6,3,3>": "", + "<6,3,4>": "", + "<6,3,5>": "", + "<6,3,6>": "", + "<6,3,7>": "1", + "<6,3,8>": "", + "<6,3,9>": "" + }, + "<6,4>": { + "<6,4,1>": "13881484", + "<6,4,2>": "", + "<6,4,3>": "", + "<6,4,4>": "", + "<6,4,5>": "", + "<6,4,6>": "", + "<6,4,7>": "", + "<6,4,8>": "", + "<6,4,9>": "" + }, + "<6,5>": { + "<6,5,1>": "9671628", + "<6,5,2>": "", + "<6,5,3>": "", + "<6,5,4>": "", + "<6,5,5>": "", + "<6,5,6>": "", + "<6,5,7>": "", + "<6,5,8>": "", + "<6,5,9>": "" + }, + "<6,6>": { + "<6,6,1>": "8363903", + "<6,6,2>": "", + "<6,6,3>": "", + "<6,6,4>": "", + "<6,6,5>": "", + "<6,6,6>": "", + "<6,6,7>": "", + "<6,6,8>": "", + "<6,6,9>": "" + }, + "<6,7>": { + "<6,7,1>": "8363903", + "<6,7,2>": "", + "<6,7,3>": "", + "<6,7,4>": "", + "<6,7,5>": "", + "<6,7,6>": "", + "<6,7,7>": "", + "<6,7,8>": "", + "<6,7,9>": "" + }, + "<6,8>": { + "<6,8,1>": "7183775", + "<6,8,2>": "", + "<6,8,3>": "", + "<6,8,4>": "", + "<6,8,5>": "", + "<6,8,6>": "", + "<6,8,7>": "1", + "<6,8,8>": "", + "<6,8,9>": "" + }, + "<6,9>": { + "<6,9,1>": "8242399", + "<6,9,2>": "", + "<6,9,3>": "", + "<6,9,4>": "", + "<6,9,5>": "", + "<6,9,6>": "", + "<6,9,7>": "1", + "<6,9,8>": "", + "<6,9,9>": "" + }, + "<6,10>": { + "<6,10,1>": "", + "<6,10,2>": "", + "<6,10,3>": "", + "<6,10,4>": "", + "<6,10,5>": "", + "<6,10,6>": "", + "<6,10,7>": "", + "<6,10,8>": "", + "<6,10,9>": "" + }, + "<6,11>": { + "<6,11,1>": "3158223", + "<6,11,2>": "", + "<6,11,3>": "", + "<6,11,4>": "", + "<6,11,5>": "", + "<6,11,6>": "", + "<6,11,7>": "1", + "<6,11,8>": "", + "<6,11,9>": "" + }, + "<6,12>": { + "<6,12,1>": "", + "<6,12,2>": "", + "<6,12,3>": "", + "<6,12,4>": "", + "<6,12,5>": "", + "<6,12,6>": "", + "<6,12,7>": "1", + "<6,12,8>": "", + "<6,12,9>": "" + }, + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "", + "<6,13,4>": "", + "<6,13,5>": "", + "<6,13,6>": "", + "<6,13,7>": "1", + "<6,13,8>": "", + "<6,13,9>": "" + }, + "<6,14>": { + "<6,14,1>": "", + "<6,14,2>": "", + "<6,14,3>": "", + "<6,14,4>": "", + "<6,14,5>": "", + "<6,14,6>": "", + "<6,14,7>": "", + "<6,14,8>": "", + "<6,14,9>": "" + }, + "<6,15>": { + "<6,15,1>": "9671628", + "<6,15,2>": "", + "<6,15,3>": "", + "<6,15,4>": "", + "<6,15,5>": "", + "<6,15,6>": "", + "<6,15,7>": "", + "<6,15,8>": "", + "<6,15,9>": "" + }, + "<6,16>": { + "<6,16,1>": "3158223", + "<6,16,2>": "", + "<6,16,3>": "", + "<6,16,4>": "", + "<6,16,5>": "", + "<6,16,6>": "", + "<6,16,7>": "", + "<6,16,8>": "", + "<6,16,9>": "" + }, + "<6,17>": { + "<6,17,1>": "8363903", + "<6,17,2>": "", + "<6,17,3>": "", + "<6,17,4>": "", + "<6,17,5>": "", + "<6,17,6>": "", + "<6,17,7>": "", + "<6,17,8>": "", + "<6,17,9>": "" + }, + "<6,18>": { + "<6,18,1>": "8421504", + "<6,18,2>": "0", + "<6,18,3>": "", + "<6,18,4>": "0", + "<6,18,5>": "0", + "<6,18,6>": "0", + "<6,18,7>": "0", + "<6,18,8>": "0", + "<6,18,9>": "" + }, + "<6,19>": { + "<6,19,1>": "", + "<6,19,2>": "", + "<6,19,3>": "", + "<6,19,4>": "", + "<6,19,5>": "", + "<6,19,6>": "", + "<6,19,7>": "", + "<6,19,8>": "", + "<6,19,9>": "" + }, + "<6,20>": { + "<6,20,1>": "", + "<6,20,2>": "", + "<6,20,3>": "", + "<6,20,4>": "", + "<6,20,5>": "", + "<6,20,6>": "", + "<6,20,7>": "", + "<6,20,8>": "", + "<6,20,9>": "" + }, + "<6,21>": { + "<6,21,1>": "", + "<6,21,2>": "", + "<6,21,3>": "", + "<6,21,4>": "", + "<6,21,5>": "", + "<6,21,6>": "", + "<6,21,7>": "", + "<6,21,8>": "", + "<6,21,9>": "" + }, + "<6,22>": { + "<6,22,1>": "11522047", + "<6,22,2>": "", + "<6,22,3>": "", + "<6,22,4>": "", + "<6,22,5>": "", + "<6,22,6>": "", + "<6,22,7>": "", + "<6,22,8>": "", + "<6,22,9>": "" + }, + "<6,23>": { + "<6,23,1>": "9079434", + "<6,23,2>": "789516", + "<6,23,3>": "", + "<6,23,4>": "", + "<6,23,5>": "", + "<6,23,6>": "", + "<6,23,7>": "", + "<6,23,8>": "", + "<6,23,9>": "" + }, + "<6,24>": { + "<6,24,1>": "10461168", + "<6,24,2>": "1052688", + "<6,24,3>": "", + "<6,24,4>": "", + "<6,24,5>": "", + "<6,24,6>": "", + "<6,24,7>": "", + "<6,24,8>": "", + "<6,24,9>": "" + }, + "<6,25>": { + "<6,25,1>": "16382448", + "<6,25,2>": "1052688", + "<6,25,3>": "", + "<6,25,4>": "", + "<6,25,5>": "", + "<6,25,6>": "", + "<6,25,7>": "1", + "<6,25,8>": "", + "<6,25,9>": "" + }, + "<6,26>": { + "<6,26,1>": "", + "<6,26,2>": "", + "<6,26,3>": "Tahoma", + "<6,26,4>": "", + "<6,26,5>": "", + "<6,26,6>": "", + "<6,26,7>": "", + "<6,26,8>": "", + "<6,26,9>": "" + }, + "<6,27>": { + "<6,27,1>": "", + "<6,27,2>": "9671628", + "<6,27,3>": "", + "<6,27,4>": "", + "<6,27,5>": "", + "<6,27,6>": "", + "<6,27,7>": "", + "<6,27,8>": "", + "<6,27,9>": "" + }, + "<6,28>": { + "<6,28,1>": "", + "<6,28,2>": "13881484", + "<6,28,3>": "", + "<6,28,4>": "", + "<6,28,5>": "", + "<6,28,6>": "", + "<6,28,7>": "", + "<6,28,8>": "", + "<6,28,9>": "" + }, + "<6,29>": { + "<6,29,1>": "", + "<6,29,2>": "16744319", + "<6,29,3>": "", + "<6,29,4>": "", + "<6,29,5>": "", + "<6,29,6>": "", + "<6,29,7>": "", + "<6,29,8>": "", + "<6,29,9>": "" + }, + "<6,30>": { + "<6,30,1>": "", + "<6,30,2>": "8363903", + "<6,30,3>": "", + "<6,30,4>": "", + "<6,30,5>": "", + "<6,30,6>": "", + "<6,30,7>": "", + "<6,30,8>": "", + "<6,30,9>": "" + }, + "<6,31>": { + "<6,31,1>": "", + "<6,31,2>": "3158223", + "<6,31,3>": "", + "<6,31,4>": "", + "<6,31,5>": "", + "<6,31,6>": "", + "<6,31,7>": "", + "<6,31,8>": "", + "<6,31,9>": "" + }, + "<6,32>": { + "<6,32,1>": "", + "<6,32,2>": "8242399", + "<6,32,3>": "", + "<6,32,4>": "", + "<6,32,5>": "", + "<6,32,6>": "", + "<6,32,7>": "", + "<6,32,8>": "", + "<6,32,9>": "" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_VERSION.json b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_VERSION.json new file mode 100644 index 0000000..c71fe8f --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASRP_EDITOR_VERSION.json @@ -0,0 +1,13 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_EDITOR_VERSION" + }, + "body": { + "record1": { + "<1>": "3.4.6.0", + "<2>": "3/14/2024 4:05PM" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASYSPROCNAMES.json b/SYSPROG/APPROW/SYSENV%003ASYSPROCNAMES.json new file mode 100644 index 0000000..5ea819a --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASYSPROCNAMES.json @@ -0,0 +1,4807 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROCNAMES" + }, + "body": { + "record1": { + "<1>": "/* List of OpenInsight SSPs. This comment line is required! */", + "<2>": "ABAND", + "<3>": "ABORTALL", + "<4>": "ACCEPT", + "<5>": "ACCESS.MERGE.SUB", + "<6>": "ACCUTERM_CHILD_FORM", + "<7>": "ACCUTERM_GET_DETAILS", + "<8>": "ACTIVATE_SAVE_SELECT", + "<9>": "ACTIVE.KEYS", + "<10>": "ADD.ERR", + "<11>": "ADDAREV32MENU", + "<12>": "ADDCTOMENU", + "<13>": "ADDRESS2INT", + "<14>": "ADD_REPOS_APP", + "<15>": "AFTER_WORD", + "<16>": "ALIAS_TABLE", + "<17>": "ALIAS_TABLE_NO_MFS", + "<18>": "ANSI_STR", + "<19>": "ANSI_UNICODE", + "<20>": "ANSI_UTF8", + "<21>": "APPBACKUP_EVENTS", + "<22>": "APPBACKUP_RDK", + "<23>": "APPBACKUP_SUB", + "<24>": "APPENDFIELD", + "<25>": "APPNOTE", + "<26>": "APPNOTE_HTML", + "<27>": "AREV32.INITIALIZE", + "<28>": "AREV32_CHECKDICT", + "<29>": "AREV32_CONVERSION_WIZARD", + "<30>": "AREV32_CURATR", + "<31>": "AREV32_DEBUGGER", + "<32>": "AREV32_ERRMSG", + "<33>": "AREV32_EVAL", + "<34>": "AREV32_FSMSG", + "<35>": "AREV32_GETPRINTER", + "<36>": "AREV32_GET_CURSOR", + "<37>": "AREV32_IMPORT.ASCII", + "<38>": "AREV32_INIT", + "<39>": "AREV32_INPUT", + "<40>": "AREV32_IN_VALUE", + "<41>": "AREV32_MSG", + "<42>": "AREV32_PUT_CURSOR", + "<43>": "AREV32_RLIST", + "<44>": "AREV32_RLIST_SUPPORT", + "<45>": "AREV32_RTP15", + "<46>": "AREV32_RTP22", + "<47>": "AREV32_RTP49", + "<48>": "AREV32_STANDALONE_FORM", + "<49>": "AREV32_WIZARD", + "<50>": "AREV64_CONVERSION_WIZARD", + "<51>": "AREV_BRWREPORT", + "<52>": "AREV_OLIST", + "<53>": "AREV_TO_AREV32", + "<54>": "AREV_TO_AREV32_FIXDICTS", + "<55>": "AREV_TO_AREV32_RELATIONALS", + "<56>": "AREV_TO_AREV64", + "<57>": "AREV_TO_AREV64_FIXDICTS", + "<58>": "AREV_TO_AREV64_RELATIONALS", + "<59>": "AREV_WINUS", + "<60>": "AREV_XLIST", + "<61>": "ARRAY_UTILITY.NET", + "<62>": "ASCII.SUBS", + "<63>": "ASCII_BFS", + "<64>": "ASCII_BFSC", + "<65>": "ASCII_CHART", + "<66>": "ASCII_XLIT_GENR", + "<67>": "ATTACHTABLE_SUB", + "<68>": "ATTACH_LOCAL_LISTS", + "<69>": "ATTACH_TABLE", + "<70>": "ATTACH_TABLE_PASS", + "<71>": "ATTR.TO.ESC", + "<72>": "AUTHORIZE_SESSION", + "<73>": "AUTOCLICK", + "<74>": "AUTOFILL", + "<75>": "AUTOOPT", + "<76>": "AW", + "<77>": "BACK_COMPAT_PRECOMPILE", + "<78>": "BALANCED", + "<79>": "BANG_SYSAUTHLOG", + "<80>": "BANNER", + "<81>": "BASE64DECODE", + "<82>": "BASE64ENCODE", + "<83>": "BASIC", + "<84>": "BATCH.INDEXING", + "<85>": "BCHECKLEGALUSER", + "<86>": "BCHECKLEGALUSER_ORIG", + "<87>": "BEFORE_WORD", + "<88>": "BENCHMARKTESTING", + "<89>": "BIND", + "<90>": "BITADD", + "<91>": "BLANKSCREEN_SUB", + "<92>": "BLANK_STRUCT", + "<93>": "BLD_TEMPLATE", + "<94>": "BLINK", + "<95>": "BLINT", + "<96>": "BMPIDX.EXTRACT", + "<97>": "BMPIDX_SEARCH_DLL", + "<98>": "BMPIDX_SEARCH_OI", + "<99>": "BOND.SUBS", + "<100>": "BOOTFS", + "<101>": "BORDER.STRING", + "<102>": "BORDER.UP", + "<103>": "BORDER.UP.SUB", + "<104>": "BOX", + "<105>": "BREAK", + "<106>": "BRIDGE_MFS", + "<107>": "BRIDGE_MFS_INFO", + "<108>": "BRIDGE_MFS_MAPDICT", + "<109>": "BRINGWINDOWTOTOP", + "<110>": "BROWSER_SLR_EVENTS", + "<111>": "BROWSETABLE", + "<112>": "BRW_CALC_DET_EVENTS", + "<113>": "BRW_COL_DET_EVENTS", + "<114>": "BRW_GRID_SETTINGS", + "<115>": "BRW_GRID_SETTINGS_EVENTS", + "<116>": "BRW_GROUPING_EVENTS", + "<117>": "BRW_IMAGE_DET_EVENTS", + "<118>": "BRW_LABEL_DET_EVENTS", + "<119>": "BRW_MDI_EVENTS", + "<120>": "BSERVERBOND", + "<121>": "BTR.UPGRADE", + "<122>": "BTREE.EXTRACT", + "<123>": "BTREE.INVERT", + "<124>": "BTREE.READ", + "<125>": "BTREE.SUB.BETWEEN", + "<126>": "BTREE.SUB.CONTAIN", + "<127>": "BTREE.SUB.END", + "<128>": "BTREE.SUB.EQ", + "<129>": "BTREE.SUB.FROM.TO", + "<130>": "BTREE.SUB.MATCH", + "<131>": "BTREE.SUB.RANGE", + "<132>": "BTREE.SUB.START", + "<133>": "BTREE.SUB.USER", + "<134>": "BTREE.UTIL", + "<135>": "BTREE.WRITE", + "<136>": "BTREE_EXTRACT_REDUCE", + "<137>": "BUILD.INDEX", + "<138>": "BUILDINDEX_SUB", + "<139>": "BUILDREPORTS", + "<140>": "BUILD_DIRLIST", + "<141>": "BUILD_MENU_STRUCT", + "<142>": "BUILD_OUT2OI", + "<143>": "BUILD_REPORT", + "<144>": "BUILD_REPORT_WORKING", + "<145>": "BUILD_STRUCT", + "<146>": "BUILD_VERIFY_KEY", + "<147>": "CALCALYST", + "<148>": "CALCTEXTWIDTH", + "<149>": "CALCULATEX", + "<150>": "CALCULATE_F_CORRELATIVE", + "<151>": "CALLFUNCTION", + "<152>": "CALLHANDLER", + "<153>": "CALLPROCERROR", + "<154>": "CALLSUBROUTINE", + "<155>": "CAPTURE", + "<156>": "CAPTURE.SUB", + "<157>": "CATALYST", + "<158>": "CBBFS", + "<159>": "CBBFS_BTREE_EXTRACT", + "<160>": "CBBFS_BTREE_EXTRACT_WIP", + "<161>": "CBBFS_CREDENTIALS", + "<162>": "CBBFS_ENCRYPT", + "<163>": "CBBFS_GET_HANDLER", + "<164>": "CBBFS_HANDLER_COUCHBASE", + "<165>": "CBBFS_HANDLER_DEFAULT", + "<166>": "CBBFS_HANDLER_REDIS", + "<167>": "CBBFS_HELPER", + "<168>": "CBBFS_JSON2ARRAY", + "<169>": "CBBFS_JSON2REC", + "<170>": "CBBFS_JSONDICT", + "<171>": "CBBFS_JSONMVCREATE", + "<172>": "CBBFS_JSONMVPARSE", + "<173>": "CBBFS_PK_HELPER", + "<174>": "CBBFS_REC2JSON", + "<175>": "CBBFS_REDUCER_DEFAULT", + "<176>": "CBBFS_SELECT_N1QL", + "<177>": "CENTER_DIALOG", + "<178>": "CENTER_MDICHILD", + "<179>": "CENTER_WINDOW", + "<180>": "CHAIN", + "<181>": "CHANGE", + "<182>": "CHANGES_MFS", + "<183>": "CHANGEUDH", + "<184>": "CHANGE_PASSWORD", + "<185>": "CHAR_RESPONDER", + "<186>": "CHATTR", + "<187>": "CHDIR", + "<188>": "CHECKDICT", + "<189>": "CHECKDICT_DOM", + "<190>": "CHECKDOTNET", + "<191>": "CHECKLEGALO4WUSER", + "<192>": "CHECKLEGALUSER", + "<193>": "CHECKPOINTERENTITIES", + "<194>": "CHECKRELEASE", + "<195>": "CHECKUNDER", + "<196>": "CHECK_CHARACTER", + "<197>": "CHECK_EVENT_SYNTAX", + "<198>": "CHECK_TRANS", + "<199>": "CHECK_VARLIST", + "<200>": "CHOOSEENTITY", + "<201>": "CHOOSELABEL", + "<202>": "CHOOSELABEL_EVENTS", + "<203>": "CHROME_CHILD_FORM_EVENTS", + "<204>": "CLEAR", + "<205>": "CLEAR_SELECT_QUEUE", + "<206>": "CLEAR_TABLE", + "<207>": "CLOSEENGINE", + "<208>": "CLOSEQUEUE", + "<209>": "CLOSEREQUEST", + "<210>": "CLOSESOCKET", + "<211>": "CLOSE_PPROC", + "<212>": "CLOSE_TABLE", + "<213>": "CMD", + "<214>": "CMD2", + "<215>": "COCREATEGUID", + "<216>": "CODE_FORMAT", + "<217>": "COLLECT.IXVALS", + "<218>": "COLNAME_FORMAT", + "<219>": "COLOR.TO.ESC", + "<220>": "COLORTESTER", + "<221>": "COLTYPE_FORMAT", + "<222>": "COMBO_SCROLL", + "<223>": "COMMUTER_GENERATOR", + "<224>": "COMOCAPTURE", + "<225>": "COMP", + "<226>": "COMPARE", + "<227>": "COMPDOC", + "<228>": "COMPILE.PROTECT", + "<229>": "COMPILE_AREV_PROG", + "<230>": "COMPILE_EVENT", + "<231>": "COMPUTE_DICT", + "<232>": "CONNECT", + "<233>": "CONTACTCONV", + "<234>": "CONTAINS_WORD", + "<235>": "CONTEXTMENU", + "<236>": "CONTRACT_PREPROC", + "<237>": "CONTROL_OFF", + "<238>": "CONTROL_ON", + "<239>": "CONTROL_SUB", + "<240>": "CONVCNTRLTYPE", + "<241>": "CONVDEL", + "<242>": "CONVERT", + "<243>": "CONVERT.KEYSTROKES", + "<244>": "CONVERT.SUB", + "<245>": "CONVERTCOLOR", + "<246>": "CONVERTFONT", + "<247>": "CONVERTPARAMDOTNET", + "<248>": "CONVERT_AREV_SCREEN", + "<249>": "CONVERT_SECONDS", + "<250>": "CONVERT_SINGLE_POPUP", + "<251>": "CONVFIELDTYPE", + "<252>": "CONVSTRING", + "<253>": "COPYFILE32", + "<254>": "COPYFORM", + "<255>": "COPYOSFILE", + "<256>": "COPYROW_SUB", + "<257>": "COPYTOOS", + "<258>": "COPY_APPLICATION", + "<259>": "COPY_OS_TO_ROW", + "<260>": "COPY_ROW", + "<261>": "COPY_ROW_EVENTS", + "<262>": "COPY_ROW_TO_OS", + "<263>": "COPY_SOURCE", + "<264>": "COPY_TABLE", + "<265>": "COPY_TABLE_EVENTS", + "<266>": "COPY_TABLE_FS", + "<267>": "COUNT", + "<268>": "COUNTFIELDS", + "<269>": "CREATECALLBACK", + "<270>": "CREATEENGINE", + "<271>": "CREATEINTERNALOBJECT.NET", + "<272>": "CREATEQUEUE", + "<273>": "CREATEREQUEST", + "<274>": "CREATESWAP_NEWDB", + "<275>": "CREATETAB", + "<276>": "CREATETEMPDICT", + "<277>": "CREATE_ANSI_SEQUENCE", + "<278>": "CREATE_CLASS.NET", + "<279>": "CREATE_DIALOG", + "<280>": "CREATE_FILE", + "<281>": "CREATE_HEADER", + "<282>": "CREATE_HEADERFOOTER", + "<283>": "CREATE_HELP", + "<284>": "CREATE_INDEX", + "<285>": "CREATE_MDICHILD", + "<286>": "CREATE_OIUSER", + "<287>": "CREATE_PARAMS.NET", + "<288>": "CREATE_REP_OUTLINE_2010", + "<289>": "CREATE_RLIST", + "<290>": "CREATE_SQL_TABLE", + "<291>": "CREATE_SYMBOLIC", + "<292>": "CREATE_TABLE", + "<293>": "CREATE_TOPICFOOTER", + "<294>": "CREATE_USER", + "<295>": "CREATE_USER_ORIG", + "<296>": "CREATE_VOL", + "<297>": "CREATE_VOLUME", + "<298>": "CREATE_VOLUME_PASS", + "<299>": "CREATE_XML_ELEMENT_SCHEMA", + "<300>": "CREATE_XML_XSD_SCHEMA", + "<301>": "CTODICT.MFS", + "<302>": "CTOFUNC_COMM_SUPPORT", + "<303>": "CTO_CHILD_FORM", + "<304>": "CTO_COMMUTER_MODULE", + "<305>": "CTO_DIALOG_BOX", + "<306>": "CTO_FIX", + "<307>": "CTO_GET_PRINTER", + "<308>": "CTO_GET_PROPERTY", + "<309>": "CTO_GUI_FUNCTION", + "<310>": "CTO_GUI_SELECT", + "<311>": "CTO_GUI_SENDFAX", + "<312>": "CTO_GUI_SUBROUTINE", + "<313>": "CTO_MANAGE_LISTS", + "<314>": "CTO_MSG", + "<315>": "CTO_POPUP", + "<316>": "CTO_PRINT", + "<317>": "CTO_PRINTER_CLOSE", + "<318>": "CTO_PRINTER_ON", + "<319>": "CTO_RUNWIN", + "<320>": "CTO_RUNWIN_WAIT", + "<321>": "CTO_SECURITY", + "<322>": "CTO_SET_PRINTER", + "<323>": "CTO_SET_PROPERTY", + "<324>": "CTO_SLEEP", + "<325>": "CTO_STANDALONE_FORM", + "<326>": "CURSOR_SELECTVAR_SWAP", + "<327>": "CW", + "<328>": "CW_EMAILMERGE_COMPLETE", + "<329>": "CW_MAILBOX", + "<330>": "CW_MAIN", + "<331>": "CW_OPEN", + "<332>": "CW_TESTRUN", + "<333>": "C_PACK", + "<334>": "DATA_VALIDATION", + "<335>": "DATE", + "<336>": "DATETIME", + "<337>": "DAVE", + "<338>": "DCOUNT", + "<339>": "DDTS", + "<340>": "DEADLOCK", + "<341>": "DEBUG", + "<342>": "DEBUG.PARA", + "<343>": "DEBUGGER", + "<344>": "DEBUGGER_DUMP", + "<345>": "DEBUGGER_FETCH", + "<346>": "DEBUGGER_REPLACEMENT", + "<347>": "DECLARE_FCNS", + "<348>": "DECTOHEX", + "<349>": "DEFAULT", + "<350>": "DEFINE.TABS", + "<351>": "DEFINEFILE", + "<352>": "DEFINEFILE2", + "<353>": "DEFINEFILE_SUB", + "<354>": "DEFINE_DATABASE", + "<355>": "DEFINE_STRUCT", + "<356>": "DEFPRTR", + "<357>": "DELAY", + "<358>": "DELETEACCOUNT_SUB", + "<359>": "DELETEAPPLICATION", + "<360>": "DELETEDIRECTORY", + "<361>": "DELETEFILE", + "<362>": "DELETEFILE.SUB", + "<363>": "DELETEFILE_SUB", + "<364>": "DELETELIST_SUB", + "<365>": "DELETEROW_SUB", + "<366>": "DELETETABLE_SUB", + "<367>": "DELETETEMPDICT", + "<368>": "DELETE_DICT_COLUMN", + "<369>": "DELETE_DICT_SYN_COLUMN", + "<370>": "DELETE_INDEX", + "<371>": "DELETE_RECORD", + "<372>": "DELETE_REPOS_APP", + "<373>": "DELETE_REPOS_TYPE", + "<374>": "DELETE_ROW", + "<375>": "DELETE_SAVE_SELECT", + "<376>": "DELETE_SYSREPOS_IX", + "<377>": "DELETE_TABLE", + "<378>": "DELETE_TO_RECYCLE", + "<379>": "DELETE_USER", + "<380>": "DELETE_VOLUME", + "<381>": "DEMO", + "<382>": "DEPEND.TABLE", + "<383>": "DETACHTABLE_SUB", + "<384>": "DETACH_TABLE", + "<385>": "DETACH_VOLUME", + "<386>": "DETS", + "<387>": "DIALOG_BOX", + "<388>": "DICT", + "<389>": "DICT.BP", + "<390>": "DICT.MFS", + "<391>": "DICTSTRIPRELATIONALS", + "<392>": "DICT_CLEANUP", + "<393>": "DICT_DEPEND", + "<394>": "DICT_MFS_BUILD", + "<395>": "DIRECTABORT", + "<396>": "DIRECTERRORCODE", + "<397>": "DIRECTPAGE", + "<398>": "DIRECTPDISK", + "<399>": "DIRECTPRINT", + "<400>": "DIRECTPRINT2", + "<401>": "DIRECTPRINTBIN", + "<402>": "DIRECTPRINTERNAME", + "<403>": "DIRECTSTART", + "<404>": "DIRECTSTARTADV", + "<405>": "DIRECTSTOP", + "<406>": "DIRECTVERSION", + "<407>": "DIRECT_PRINT", + "<408>": "DIRECT_PRINTER", + "<409>": "DIREXISTS", + "<410>": "DISKSIZE", + "<411>": "DISPLAY", + "<412>": "DISPLAY.BORDER", + "<413>": "DLG_MFS_EVENTS", + "<414>": "DLG_OPENRECORD_EVENTS", + "<415>": "DOCUMENT_MENU", + "<416>": "DOCUMENT_MENU_EVENTS", + "<417>": "DOCUMENT_WINDOW", + "<418>": "DOSTIME", + "<419>": "DOTNETEXPLORER_COMMUTER_MODULE", + "<420>": "DOTNET_LISTENER", + "<421>": "DOTRACE", + "<422>": "DOUBLE_TO_STRING", + "<423>": "DOWNCASE", + "<424>": "DO_AT", + "<425>": "DO_CRT", + "<426>": "DO_CTO", + "<427>": "DO_DATA", + "<428>": "DO_ECHO", + "<429>": "DO_EXECUTE", + "<430>": "DO_FIND", + "<431>": "DO_FOOTING", + "<432>": "DO_FORMAT", + "<433>": "DO_GETFILENAME", + "<434>": "DO_HEADING", + "<435>": "DO_HUSH", + "<436>": "DO_INPUT", + "<437>": "DO_INPUTERR", + "<438>": "DO_LOGINPROC", + "<439>": "DO_LOGON", + "<440>": "DO_OPEN", + "<441>": "DO_PAGE", + "<442>": "DO_PAGINATE", + "<443>": "DO_PARA", + "<444>": "DO_PARSE", + "<445>": "DO_PERFORM", + "<446>": "DO_PRINT", + "<447>": "DO_PRINTB", + "<448>": "DO_PRINTER_CLOSE", + "<449>": "DO_PRINTER_OFF", + "<450>": "DO_PRINTER_OFF_OLD", + "<451>": "DO_PRINTER_ON", + "<452>": "DO_PROC", + "<453>": "DO_PROCIO", + "<454>": "DO_PROMPT", + "<455>": "DO_QUIT", + "<456>": "DO_READNEXT", + "<457>": "DO_REFORMAT", + "<458>": "DO_SELECT", + "<459>": "DO_SHELL", + "<460>": "DO_SORTK", + "<461>": "DO_SPECIAL_INPUT", + "<462>": "DO_STACK", + "<463>": "DO_SYSTEM", + "<464>": "DO_TRACE", + "<465>": "DO_U2_PRINT", + "<466>": "DO_VERB1", + "<467>": "DO_VERB2", + "<468>": "DO_XSWAP", + "<469>": "DPRINT", + "<470>": "DRIVER_CONTROL", + "<471>": "DSBFS", + "<472>": "DSBFS_CONNECTION", + "<473>": "DSBFS_DATASET", + "<474>": "DSBFS_DATASET_AUTOCREATE", + "<475>": "DSBFS_DATATYPES", + "<476>": "DSBFS_EXEC_SQL", + "<477>": "DSBFS_GENERATE_DDL", + "<478>": "DSBFS_GET_IDENTITY", + "<479>": "DSBFS_HELPER", + "<480>": "DSBFS_IO", + "<481>": "DSBFS_MAP_COLNAME", + "<482>": "DSBFS_MEDIA", + "<483>": "DSBFS_PROFILE", + "<484>": "DSBFS_RECORDSETHELPER", + "<485>": "DSBFS_REFRESH_SHADOW", + "<486>": "DSBFS_REGISTEROM", + "<487>": "DSBFS_RESOLVE_TABLE_DETAILS", + "<488>": "DSBFS_SCHEMA_AS400", + "<489>": "DSBFS_SCHEMA_BASE", + "<490>": "DSBFS_SCHEMA_DB2", + "<491>": "DSBFS_SCHEMA_FIREBIRD", + "<492>": "DSBFS_SCHEMA_MSSQL", + "<493>": "DSBFS_SCHEMA_MYSQL", + "<494>": "DSBFS_SCHEMA_ORACLE", + "<495>": "DSBFS_SCHEMA_POSTGRES", + "<496>": "DSBFS_SCHEMA_SQLLITE", + "<497>": "DSBFS_SELECT", + "<498>": "DSBFS_TRACE", + "<499>": "DSPACE", + "<500>": "EC1", + "<501>": "ED", + "<502>": "EDIT", + "<503>": "EDIT.MACROS", + "<504>": "EDIT.MENU.OIWIN", + "<505>": "EDITFIND", + "<506>": "EDITFIND_TB", + "<507>": "EDITOR", + "<508>": "EMAIL_ENTITY_EVENTS", + "<509>": "EMAIL_FORMAT", + "<510>": "EMAIL_FORMAT_INTERNAL", + "<511>": "EN", + "<512>": "ENCRYPT", + "<513>": "ENCRYPT_FORMAT", + "<514>": "ENCRYPT_MFS", + "<515>": "ENDECRYPT", + "<516>": "END_DIALOG", + "<517>": "END_WINDOW", + "<518>": "ENGLISH", + "<519>": "ENTER", + "<520>": "ENTID", + "<521>": "ENTPROPDLG", + "<522>": "ENUMWINDOWS", + "<523>": "ENVIRON", + "<524>": "ERRLIST", + "<525>": "ERROR.MSG", + "<526>": "ESC.TO.ATTR", + "<527>": "ESC.TO.EXIT", + "<528>": "ETMETHOD", + "<529>": "EVAL", + "<530>": "EVENTS.NET", + "<531>": "EVENT_PRECOMP", + "<532>": "EW", + "<533>": "EW.BUILD", + "<534>": "EW.COMPARE", + "<535>": "EW.DHELP", + "<536>": "EW.ENGLISH", + "<537>": "EW.LIBRARY", + "<538>": "EW.LIMIT", + "<539>": "EW.MAIN", + "<540>": "EW.PARSER", + "<541>": "EW.POPUP", + "<542>": "EW.TUTOR", + "<543>": "EW.VIEWER", + "<544>": "EW.WINDOW", + "<545>": "EW.WITH", + "<546>": "EXAMINEAPP", + "<547>": "EXECNPHANDLER", + "<548>": "EXECUTE_LOWPRIORITY", + "<549>": "EXEC_METHOD", + "<550>": "EXEC_RLIST", + "<551>": "EXISTS", + "<552>": "EXIT_SYSTEM", + "<553>": "EXPORT", + "<554>": "EXPORT.123", + "<555>": "EXPORT.ASCII", + "<556>": "EXPORT.DB3", + "<557>": "EXPORTTYPE_EVENTS", + "<558>": "EXTERNAL.SORT", + "<559>": "EXTERNALIZESERVER", + "<560>": "EXTRACTROWS", + "<561>": "EXTRACT_SI_KEYS", + "<562>": "EXTRACT_XML_SCHEMA_NAME", + "<563>": "F.DISTRIBUTOR", + "<564>": "F.INDEXER", + "<565>": "FAT.FINGER", + "<566>": "FETCH.QUERY", + "<567>": "FETCH.VOLUME", + "<568>": "FIELDCOUNT", + "<569>": "FILE.SIZE", + "<570>": "FILTER.ACTIVE", + "<571>": "FILTER.SELECT", + "<572>": "FIND", + "<573>": "FINDINFILES", + "<574>": "FINDINSERTINPROGRAM", + "<575>": "FINDWINDOW", + "<576>": "FINDWINDOW_NULL_ARGS", + "<577>": "FIND_ALL", + "<578>": "FIND_LOCALE_FORMAT", + "<579>": "FIRMI", + "<580>": "FIRST_WORD", + "<581>": "FIXATR", + "<582>": "FIX_LH", + "<583>": "FIX_LH_LHSTATS", + "<584>": "FLIPFONT", + "<585>": "FLOAT_TO_STRING", + "<586>": "FMT", + "<587>": "FORM", + "<588>": "FORMAT", + "<589>": "FORMAT.PARA", + "<590>": "FORMATMESSAGE", + "<591>": "FORMAT_EVENTSCRIPT", + "<592>": "FORMAT_PROG", + "<593>": "FORMDES_SUB", + "<594>": "FORMULA", + "<595>": "FORMULA.SCAN", + "<596>": "FORM_LANGUAGE_CFG", + "<597>": "FORWARD_EVENT", + "<598>": "FREELIBRARY", + "<599>": "FREE_CLASS.NET", + "<600>": "FSMSG", + "<601>": "FUNCTION.KEY", + "<602>": "GAUGE", + "<603>": "GCOLLECTEVENTS", + "<604>": "GDI_TEST", + "<605>": "GEC_CONVERT", + "<606>": "GENERATEBRWREPORT", + "<607>": "GENRTP20_SUB", + "<608>": "GET.FILING.SYSTEM.NAME", + "<609>": "GET.RECCOUNT", + "<610>": "GET.SORT.FILE", + "<611>": "GETANSITOUNICODE", + "<612>": "GETAPPID", + "<613>": "GETASYNCKEYSTATE", + "<614>": "GETBREAKFRAME", + "<615>": "GETBREAKVARTYPE", + "<616>": "GETBREAKVARVALUE", + "<617>": "GETCLIENTRECT", + "<618>": "GETCOLORS", + "<619>": "GETCOMMANDLINE", + "<620>": "GETCOMPUTERNAMEA", + "<621>": "GETCONFIGURE", + "<622>": "GETCURRENTDIR", + "<623>": "GETCURRENTPROCESSID", + "<624>": "GETCURSORPOS", + "<625>": "GETDC", + "<626>": "GETDEFAULTCHARACTER", + "<627>": "GETDEFAULTEPMODE", + "<628>": "GETDEFAULTEPMODEPRECISION", + "<629>": "GETDEFAULTSTRCMPMODE", + "<630>": "GETDEVICECAPS", + "<631>": "GETDOSPATH", + "<632>": "GETDRIVETYPE", + "<633>": "GETECHO", + "<634>": "GETEFFECTEDAPPS", + "<635>": "GETENGINEFLAGS", + "<636>": "GETENGINEOS", + "<637>": "GETENGINEVERSION", + "<638>": "GETENGINEWINDOW", + "<639>": "GETENTITY", + "<640>": "GETENTITY.RESETLIST", + "<641>": "GETENVIRONMENTVARIABLE", + "<642>": "GETEPMODE", + "<643>": "GETEPMODEPRECISION", + "<644>": "GETERRORS", + "<645>": "GETFILEATTRIBUTES", + "<646>": "GETFILEATTRIBUTES_TEST", + "<647>": "GETFOCUS", + "<648>": "GETFREESYSTEMRESOURCES", + "<649>": "GETFULLTABLENAME", + "<650>": "GETHANDLECOUNT", + "<651>": "GETHOSTBYNAME", + "<652>": "GETHOSTNAME", + "<653>": "GETIOFLAG", + "<654>": "GETKEYLEN", + "<655>": "GETKEYSTATE", + "<656>": "GETLANGUAGENAME", + "<657>": "GETLIST_SUB", + "<658>": "GETLOCALEINFO", + "<659>": "GETLOCALIP", + "<660>": "GETLOGICALDRIVES", + "<661>": "GETMAIL", + "<662>": "GETMENU", + "<663>": "GETMINIMUMDELIMITER", + "<664>": "GETMODULEUSAGE", + "<665>": "GETMRU", + "<666>": "GETNETWORKTYPE", + "<667>": "GETNETWORKUSERNAME", + "<668>": "GETNEXTWINDOW", + "<669>": "GETNOOFDELIMITERS", + "<670>": "GETNPHANDLER", + "<671>": "GETOIPICOMMON", + "<672>": "GETOISTATE", + "<673>": "GETPARENT", + "<674>": "GETPERMITLEVEL", + "<675>": "GETPRINTERLIST", + "<676>": "GETPRIVATEPROFILESECTION", + "<677>": "GETPRIVATEPROFILESTRING", + "<678>": "GETPROFILEINT", + "<679>": "GETPROMPT", + "<680>": "GETRAWHANDLE_SUB", + "<681>": "GETRELATIONALINFO", + "<682>": "GETRELATIVEPATH", + "<683>": "GETREPLY", + "<684>": "GETREPORT", + "<685>": "GETREQUESTCONTEXT", + "<686>": "GETSERVERNAMELIST", + "<687>": "GETSESSIONCALLSTACK", + "<688>": "GETSHORTPATHNAME", + "<689>": "GETSOCKNAME", + "<690>": "GETSOCKOPT", + "<691>": "GETSTATUSTEXT", + "<692>": "GETSTRCMPMODE", + "<693>": "GETSTRCMPSTATUS", + "<694>": "GETSYSCOLOR", + "<695>": "GETSYSTABLES", + "<696>": "GETSYSTEMMENU", + "<697>": "GETSYSTEMMETRICS", + "<698>": "GETTEMPDRIVE", + "<699>": "GETTEMPFILENAME", + "<700>": "GETTEMPPATH", + "<701>": "GETTICKCOUNT", + "<702>": "GETTIMEZONE", + "<703>": "GETTIMEZONE2", + "<704>": "GETTIMEZONEINFORMATION", + "<705>": "GETUNICODETOANSI", + "<706>": "GETUSERLEVEL", + "<707>": "GETUSERNAME", + "<708>": "GETVERSIONEX", + "<709>": "GETVERSIONEX_TEST", + "<710>": "GETVOLUMELABEL", + "<711>": "GETWEBPAGE", + "<712>": "GETWEBTIME", + "<713>": "GETWINDOW", + "<714>": "GETWINDOWLONG", + "<715>": "GETWINDOWRECT", + "<716>": "GETWINDOWSDIRECTORY", + "<717>": "GETWINDOWTEXT", + "<718>": "GETWINDOWTEXTA", + "<719>": "GETWINDOWTEXTLENGTH", + "<720>": "GETWINDOWTEXTLENGTHA", + "<721>": "GETWINDOWWORD", + "<722>": "GET_ALL_CLASSES", + "<723>": "GET_ALL_TYPES", + "<724>": "GET_APPLICATION_NAMES", + "<725>": "GET_APP_INFO", + "<726>": "GET_ARG", + "<727>": "GET_BALANCED", + "<728>": "GET_BFS_INFO", + "<729>": "GET_BOND_USER", + "<730>": "GET_BROWSE_DATA", + "<731>": "GET_COLUMN_ASSOC", + "<732>": "GET_COL_DEFS", + "<733>": "GET_COMPONENTS", + "<734>": "GET_CONTRACT", + "<735>": "GET_CONTROL_METAINFO", + "<736>": "GET_CONTROL_TYPES", + "<737>": "GET_CURRENT_EVENT", + "<738>": "GET_CURRENT_SYMBOLIC", + "<739>": "GET_DBCOLUMN_TABLE", + "<740>": "GET_DBCOLUMN_TABLE_TRANS", + "<741>": "GET_DB_USERS", + "<742>": "GET_DEFAULT_FORMULA", + "<743>": "GET_DEFPROP", + "<744>": "GET_DEF_COLUMN_ATTRIBS", + "<745>": "GET_DIALOG_INFO", + "<746>": "GET_DIALOG_PARAMS", + "<747>": "GET_DICT_DELTA", + "<748>": "GET_DICT_INFO", + "<749>": "GET_DICT_STRUCT", + "<750>": "GET_ENV", + "<751>": "GET_EVENT", + "<752>": "GET_EVENTSTATUS", + "<753>": "GET_EXP_DAYS_S", + "<754>": "GET_EXP_DAYS_U", + "<755>": "GET_EXP_INFO", + "<756>": "GET_EXP_TEXT", + "<757>": "GET_EXP_TYPE", + "<758>": "GET_FIELD_DATA_TYPES", + "<759>": "GET_FILE_REC", + "<760>": "GET_FILE_TYPES", + "<761>": "GET_HANDLE_FROM_PROCESSID", + "<762>": "GET_IMPACT", + "<763>": "GET_INFO.NET", + "<764>": "GET_LANGUAGE", + "<765>": "GET_LH_BROWSE_DATA", + "<766>": "GET_LH_DISTRIBUTION", + "<767>": "GET_LH_INFO", + "<768>": "GET_LH_INFO_LHSTATS", + "<769>": "GET_LH_INFO_OSREAD", + "<770>": "GET_LIST_DICT", + "<771>": "GET_LIST_TABLES", + "<772>": "GET_LOCKS", + "<773>": "GET_MACHINE_NAME", + "<774>": "GET_MACHINE_NICKNAME", + "<775>": "GET_MAX_COL_POS", + "<776>": "GET_NUM_PARAMS", + "<777>": "GET_PRINTER", + "<778>": "GET_PRINTER1", + "<779>": "GET_PRINTER2", + "<780>": "GET_PROC_INFO", + "<781>": "GET_PROPERTY", + "<782>": "GET_PROPERTY.NET", + "<783>": "GET_REPOS_CLASSES", + "<784>": "GET_REPOS_CLASSES_TRANS", + "<785>": "GET_REPOS_ENTITIES", + "<786>": "GET_REPOS_ENTITIES_FLAGS", + "<787>": "GET_REPOS_ENTITIES_LAST_UPDATED", + "<788>": "GET_REPOS_ENTITIES_TRANS", + "<789>": "GET_REPOS_ENTITY_FLAGS", + "<790>": "GET_REPOS_STORAGE_NAMES", + "<791>": "GET_REPOS_TYPES", + "<792>": "GET_REPOS_TYPES_BY_FAMILY", + "<793>": "GET_REPOS_TYPES_BY_STORE", + "<794>": "GET_REPOS_TYPES_TRANS", + "<795>": "GET_REPOS_TYPE_DESC", + "<796>": "GET_REPOS_TYPE_FAMILIES", + "<797>": "GET_REPOS_TYPE_INFO", + "<798>": "GET_ROWCOUNT", + "<799>": "GET_SAVE_SELECT", + "<800>": "GET_SC_APPID", + "<801>": "GET_SERVER_DBS", + "<802>": "GET_SERVER_NAMES", + "<803>": "GET_SI_KEYS", + "<804>": "GET_SI_VALUES", + "<805>": "GET_SORT_FILE", + "<806>": "GET_SORT_PATH", + "<807>": "GET_SPECIAL_FOLDER", + "<808>": "GET_STATUS", + "<809>": "GET_SYSINFO", + "<810>": "GET_TABLE_APP_PTR", + "<811>": "GET_TABLE_ASSOC", + "<812>": "GET_TABLE_ATTRIBS", + "<813>": "GET_TABLE_TYPE", + "<814>": "GET_TABLE_TYPES", + "<815>": "GET_TEXT_PARMS", + "<816>": "GET_USER_INFO", + "<817>": "GET_VALID_DATA_TYPES", + "<818>": "GET_VALUES", + "<819>": "GET_VIDEO_CONFIG", + "<820>": "GET_VID_INFO", + "<821>": "GET_VOLUME_REC", + "<822>": "GET_WINMSGVAL", + "<823>": "GET_XML_VALUE", + "<824>": "GITGONE", + "<825>": "GLOBAL.ENV", + "<826>": "GROUPNUMBER", + "<827>": "GUAR_ASSIGN", + "<828>": "HANDLEAREV32MENU", + "<829>": "HANDLECTOMENU", + "<830>": "HEADING.CONTROL", + "<831>": "HELP.INFO", + "<832>": "HEXCONV", + "<833>": "HIGHLIGHT", + "<834>": "HTCACHE_MFS", + "<835>": "HTML_FORMAT", + "<836>": "HTONS", + "<837>": "HTTPSVR_GETREPOSIMAGE", + "<838>": "HTTPSVR_TRACE", + "<839>": "HWINI_COM", + "<840>": "ICMPCLOSEHANDLE", + "<841>": "ICMPCREATEFILE", + "<842>": "ICMPSENDECHO", + "<843>": "ICONVSTRING", + "<844>": "IC_ALPHA", + "<845>": "IC_CANCEL", + "<846>": "IC_CLEARDATA", + "<847>": "IC_CLEARFILE", + "<848>": "IC_CLEARSELECT", + "<849>": "IC_CLOSE", + "<850>": "IC_CLOSESEQ", + "<851>": "IC_COL1", + "<852>": "IC_COL2", + "<853>": "IC_CONVERT", + "<854>": "IC_COUNT", + "<855>": "IC_DATA", + "<856>": "IC_DATE", + "<857>": "IC_DCOUNT", + "<858>": "IC_DELETE", + "<859>": "IC_ERRORMSG", + "<860>": "IC_EXECUTE", + "<861>": "IC_EXECUTECONTINUE", + "<862>": "IC_EXTRACT", + "<863>": "IC_FIELD", + "<864>": "IC_FIELDSTORE", + "<865>": "IC_FILEINFO", + "<866>": "IC_FILELOCK", + "<867>": "IC_FILEUNLOCK", + "<868>": "IC_FMT", + "<869>": "IC_FORMLIST", + "<870>": "IC_FREE", + "<871>": "IC_GETLIST", + "<872>": "IC_GETVALUE", + "<873>": "IC_GET_CONVMODE", + "<874>": "IC_GET_LOCALE", + "<875>": "IC_GET_MAP", + "<876>": "IC_GET_MARK_VALUE", + "<877>": "IC_ICONV", + "<878>": "IC_INDICES", + "<879>": "IC_INFO", + "<880>": "IC_INPUTREPLY", + "<881>": "IC_INSERT", + "<882>": "IC_ITYPE", + "<883>": "IC_LOCATE", + "<884>": "IC_LOCK", + "<885>": "IC_LOWER", + "<886>": "IC_MALLOC", + "<887>": "IC_MATBUILD", + "<888>": "IC_MATPARSE", + "<889>": "IC_NEWSESSION", + "<890>": "IC_OCONV", + "<891>": "IC_OPEN", + "<892>": "IC_OPENSEQ", + "<893>": "IC_OPENSESSION", + "<894>": "IC_QUIT", + "<895>": "IC_QUITALL", + "<896>": "IC_RAISE", + "<897>": "IC_READ", + "<898>": "IC_READBLK", + "<899>": "IC_READCONTINUE", + "<900>": "IC_READLIST", + "<901>": "IC_READNEXT", + "<902>": "IC_READSEQ", + "<903>": "IC_READV", + "<904>": "IC_RECORDLOCK", + "<905>": "IC_RECORDLOCKED", + "<906>": "IC_RELEASE", + "<907>": "IC_REMOVE", + "<908>": "IC_REPLACE", + "<909>": "IC_SEEK", + "<910>": "IC_SELECT", + "<911>": "IC_SELECTINDEX", + "<912>": "IC_SESSION_INFO", + "<913>": "IC_SETSESSION", + "<914>": "IC_SETVALUE", + "<915>": "IC_SET_COMMS_TIMEOUT", + "<916>": "IC_SET_CONVMODE", + "<917>": "IC_SET_LOCALE", + "<918>": "IC_SET_MAP", + "<919>": "IC_SET_TIMEOUT", + "<920>": "IC_STATUS", + "<921>": "IC_STRDEL", + "<922>": "IC_SUBCALL1", + "<923>": "IC_SUBCALL10", + "<924>": "IC_SUBCALL2", + "<925>": "IC_SUBCALL3", + "<926>": "IC_SUBCALL4", + "<927>": "IC_SUBCALL5", + "<928>": "IC_SUBCALL6", + "<929>": "IC_SUBCALL7", + "<930>": "IC_SUBCALL8", + "<931>": "IC_SUBCALL9", + "<932>": "IC_SYSTEMRETURNCODE", + "<933>": "IC_TIME", + "<934>": "IC_TIMEDATE", + "<935>": "IC_TIMEOUT", + "<936>": "IC_TRANS", + "<937>": "IC_TRANSACTION", + "<938>": "IC_TRIM", + "<939>": "IC_UNIDATA_SESSION", + "<940>": "IC_UNIVERSE_SESSION", + "<941>": "IC_UNLOCK", + "<942>": "IC_WEOFSEQ", + "<943>": "IC_WRITE", + "<944>": "IC_WRITEBLK", + "<945>": "IC_WRITECONTINUE", + "<946>": "IC_WRITESEQ", + "<947>": "IC_WRITESTART", + "<948>": "IC_WRITEV", + "<949>": "IDX_SETS", + "<950>": "IDX_SETS1", + "<951>": "IDX_SETS2", + "<952>": "IFDEF_PREPROC", + "<953>": "IMPORT", + "<954>": "IMPORT.ASCII", + "<955>": "IMPORT.ASCII_SUB", + "<956>": "IMPORT_ASCII_EXCEL", + "<957>": "IMPORT_ASCII_SUB", + "<958>": "IN.VALUE", + "<959>": "IN2OI", + "<960>": "INCR.DECR", + "<961>": "INDEX.CONTROL", + "<962>": "INDEX.FLUSH", + "<963>": "INDEX.OPEN", + "<964>": "INDEX.REDUCER", + "<965>": "INDEXING", + "<966>": "INDEXING2", + "<967>": "INDEXLOOKUP", + "<968>": "INDEXLOOKUPEXT", + "<969>": "INDEX_SELECT_TEST", + "<970>": "INDEX_TOGGLE", + "<971>": "INDEX_WINEVENT", + "<972>": "INETAPI_FINDMIMETYPE", + "<973>": "INETAPI_FINDMIMETYPE_HELPER", + "<974>": "INETAPI_SETCONTENTTYPE", + "<975>": "INETAPI_SETCOOKIE", + "<976>": "INETAPI_SETNOCACHE", + "<977>": "INETAPI_SETREDIRECT", + "<978>": "INETAPI_SETSTATUS", + "<979>": "INET_ABORTED", + "<980>": "INET_FINALIZE", + "<981>": "INET_IMAGE", + "<982>": "INET_LOCKMANAGER_MONITOR", + "<983>": "INET_MSG", + "<984>": "INET_OI_XML", + "<985>": "INET_QUERYPARAM", + "<986>": "INET_REPORTSERVICE", + "<987>": "INET_REST_HANDLER", + "<988>": "INET_REST_HANDLER_BUILD_COMMUTER", + "<989>": "INET_REST_HANDLER_GET_VALUE", + "<990>": "INET_REST_HANDLER_IMPORT", + "<991>": "INET_REST_HANDLER_PARAMS", + "<992>": "INET_RLIST_PARSE", + "<993>": "INET_SECURITY", + "<994>": "INET_SHELL", + "<995>": "INET_TRACE", + "<996>": "INET_WHITELIST", + "<997>": "INET_XML", + "<998>": "INET_XMLFORM", + "<999>": "INET_XPATH", + "<1000>": "INHERITENTITIES", + "<1001>": "INIT", + "<1002>": "INIT.COMMON", + "<1003>": "INIT.STATUS", + "<1004>": "INIT.VIEW", + "<1005>": "INITIALIZE", + "<1006>": "INI_VIEWER", + "<1007>": "INI_VIEWER_2", + "<1008>": "INLIST", + "<1009>": "INLIST_NEW", + "<1010>": "INPUT.CHAR", + "<1011>": "INPUTCLEAR", + "<1012>": "INRECT", + "<1013>": "INSERT_DICT_COLUMN", + "<1014>": "INSERT_SYSREPOS_IX", + "<1015>": "INSTALL_MODULE", + "<1016>": "INSTALL_UPDATES", + "<1017>": "INTERNALIZESERVER", + "<1018>": "INTERPRET.JOIN", + "<1019>": "INTERSECTRECT", + "<1020>": "INVCONV", + "<1021>": "IO.ENV", + "<1022>": "IOCTLSOCKET", + "<1023>": "ISAREV32", + "<1024>": "ISENGINE64", + "<1025>": "ISENTITYCHECKEDOUT", + "<1026>": "ISEVENTCONTEXT", + "<1027>": "ISICONIC", + "<1028>": "ISLIB", + "<1029>": "ISO8601_CONV", + "<1030>": "ISPS9", + "<1031>": "ISTABLEATTACHED", + "<1032>": "ISTABLEEXIST", + "<1033>": "ISUNICODE", + "<1034>": "ISUTF8", + "<1035>": "ISVALIDUSER", + "<1036>": "ISWINDOW", + "<1037>": "ISWINDOWVISIBLE", + "<1038>": "ISZOOMED", + "<1039>": "IS_FIRST_WORD", + "<1040>": "IS_FORMAT_STR", + "<1041>": "IS_LAST_WORD", + "<1042>": "IT_CONVERT_SYSCODETEMPLATES", + "<1043>": "IT_UPDATE_INSERTROW_EVENT_SIG", + "<1044>": "JD3_LISTENER", + "<1045>": "JOINER", + "<1046>": "JOIN_RUN", + "<1047>": "JOS_USERS_CONTROLLER", + "<1048>": "JUNKER", + "<1049>": "JUST_FMT", + "<1050>": "KBSTATUS", + "<1051>": "KEYF3", + "<1052>": "LABEL", + "<1053>": "LABEL.SUB", + "<1054>": "LASTKEY", + "<1055>": "LAST_WORD", + "<1056>": "LAUNCHOIBRW", + "<1057>": "LCASE", + "<1058>": "LH2STAT", + "<1059>": "LHDUMP", + "<1060>": "LHLOCKINFO", + "<1061>": "LHVA", + "<1062>": "LH_FIELDINFO", + "<1063>": "LH_FILE_SCAN", + "<1064>": "LH_FROM_XML", + "<1065>": "LH_STATISTICS_CONTROLLER", + "<1066>": "LH_STRESS_TEST", + "<1067>": "LH_VERIFY_SUB", + "<1068>": "LIST.FILIX", + "<1069>": "LIST.FLDIX", + "<1070>": "LIST.SUB", + "<1071>": "LISTBASIC", + "<1072>": "LISTBASIC01", + "<1073>": "LISTDATASETARGUMENTS", + "<1074>": "LISTDATASETCOLUMNS", + "<1075>": "LISTDICT", + "<1076>": "LISTEN", + "<1077>": "LISTINDEX", + "<1078>": "LISTPTR", + "<1079>": "LIST_APP_USERS", + "<1080>": "LIST_COMPONENTS", + "<1081>": "LIST_COMPONENT_FIELDS", + "<1082>": "LIST_DATABASES", + "<1083>": "LIST_DICT", + "<1084>": "LIST_FIELD_DATA_TYPES", + "<1085>": "LIST_INDEX", + "<1086>": "LIST_INDEX_DETAILED", + "<1087>": "LIST_INDEX_SUB", + "<1088>": "LIST_KEYS", + "<1089>": "LIST_SAVE_SELECT", + "<1090>": "LIST_SELECT_QUEUE", + "<1091>": "LIST_SI_KEYS", + "<1092>": "LIST_TABLES", + "<1093>": "LIST_TABLES_DICT", + "<1094>": "LIST_USERS", + "<1095>": "LIST_USER_LOCKS", + "<1096>": "LIST_USER_SUB", + "<1097>": "LIST_USER_SUBS", + "<1098>": "LIST_VOLUME", + "<1099>": "LIST_VOLUMES", + "<1100>": "LIST_VOLUME_SUB", + "<1101>": "LOADLIBRARY", + "<1102>": "LOADMENU", + "<1103>": "LOADPOPUP", + "<1104>": "LOAD_LND_SET", + "<1105>": "LOAD_SYSPROGDBT", + "<1106>": "LOCALE_DATE_FORMAT", + "<1107>": "LOCATE", + "<1108>": "LOCK", + "<1109>": "LOCKENTITY", + "<1110>": "LOCKS", + "<1111>": "LOCK_INFO", + "<1112>": "LOG.OFF", + "<1113>": "LOGIT", + "<1114>": "LOGON", + "<1115>": "LOG_INET_TRANSACTIONS", + "<1116>": "LONGDOUBLETODOUBLE", + "<1117>": "LOWER", + "<1118>": "LRDEX.SUB", + "<1119>": "LZCOPYFILE", + "<1120>": "MACRO", + "<1121>": "MAKE.INDEX", + "<1122>": "MAKE.LIST", + "<1123>": "MAKEACCOUNT_SUB", + "<1124>": "MAKEDICT", + "<1125>": "MAKEDLLPTR", + "<1126>": "MAKETABLE", + "<1127>": "MAKETABLE_SUB", + "<1128>": "MAKEVOC_EVENTS", + "<1129>": "MANAGE_LH5_SERVER", + "<1130>": "MANAGE_LH_SERVER", + "<1131>": "MANAGE_REVLH_HEAVY_SERVER", + "<1132>": "MANAGE_REVLH_SERVER", + "<1133>": "MANAGE_UDH_SERVER", + "<1134>": "MAPDICT_CONVCORR", + "<1135>": "MAPDICT_CONVCORR_HELPER", + "<1136>": "MAP_COLUMNNAME", + "<1137>": "MAP_TABLENAME", + "<1138>": "MAX", + "<1139>": "MAX_OI_USERS", + "<1140>": "MEMSPACE", + "<1141>": "MENU.BUFFER", + "<1142>": "MENU.DOC.PRG", + "<1143>": "MENU.SUB", + "<1144>": "MENU.UPDATE", + "<1145>": "MERGE", + "<1146>": "MERGE.MACRO.SUB", + "<1147>": "MERGE.SUB", + "<1148>": "MESSAGE", + "<1149>": "MESSAGEBEEP", + "<1150>": "MESSAGEBOX", + "<1151>": "MESSAGE_BOX", + "<1152>": "MESSAGE_LANGUAGE_CFG", + "<1153>": "MESSAGE_MGMT_O4W_COMMUTER_MODULE", + "<1154>": "MESSAGE_SUB", + "<1155>": "METACOMP", + "<1156>": "MFS_CODENAME", + "<1157>": "MFS_SHELL1", + "<1158>": "MFS_SHELL2", + "<1159>": "MIN", + "<1160>": "MISC_POPUP", + "<1161>": "MIXEDCASE", + "<1162>": "MKDIR", + "<1163>": "MNM_MVBFS_SUBCALL", + "<1164>": "MONITOR", + "<1165>": "MOUSE_SUBS", + "<1166>": "MOVE.WINDOW", + "<1167>": "MOVEPAGE", + "<1168>": "MOVETO", + "<1169>": "MRP.LOAD", + "<1170>": "MRP_LOAD", + "<1171>": "MRU_ACTIONS", + "<1172>": "MSG", + "<1173>": "MSG2", + "<1174>": "MSGROUTINE", + "<1175>": "MSG_CREATEBMP", + "<1176>": "MSWIN_ALLOWSETFOREGROUNDWINDOW", + "<1177>": "MSWIN_ALPHABLEND", + "<1178>": "MSWIN_ANGLEARC", + "<1179>": "MSWIN_ARC", + "<1180>": "MSWIN_ARCTO", + "<1181>": "MSWIN_ATTACHTHREADINPUT", + "<1182>": "MSWIN_BEGINUPDATERESOURCE", + "<1183>": "MSWIN_BITBLT", + "<1184>": "MSWIN_BLOCKINPUT", + "<1185>": "MSWIN_BRINGWINDOWTOTOP", + "<1186>": "MSWIN_CALLMSGFILTER", + "<1187>": "MSWIN_CHARLOWER", + "<1188>": "MSWIN_CHARUPPER", + "<1189>": "MSWIN_CHORD", + "<1190>": "MSWIN_CLIENTTOSCREEN", + "<1191>": "MSWIN_CLIPCURSOR", + "<1192>": "MSWIN_CLOSEHANDLE", + "<1193>": "MSWIN_COPYFILE", + "<1194>": "MSWIN_COPYRECT", + "<1195>": "MSWIN_CREATEBITMAP", + "<1196>": "MSWIN_CREATEBITMAPINDIRECT", + "<1197>": "MSWIN_CREATEBRUSHINDIRECT", + "<1198>": "MSWIN_CREATECOMPATIBLEBITMAP", + "<1199>": "MSWIN_CREATECOMPATIBLEDC", + "<1200>": "MSWIN_CREATEDIBITMAP", + "<1201>": "MSWIN_CREATEDIBPATTERNBRUSHPT", + "<1202>": "MSWIN_CREATEDIBSECTION", + "<1203>": "MSWIN_CREATEDIRECTORY", + "<1204>": "MSWIN_CREATEFONT", + "<1205>": "MSWIN_CREATEFONTINDIRECT", + "<1206>": "MSWIN_CREATEHATCHBRUSH", + "<1207>": "MSWIN_CREATEPATTERNBRUSH", + "<1208>": "MSWIN_CREATEPEN", + "<1209>": "MSWIN_CREATEPENINDIRECT", + "<1210>": "MSWIN_CREATEPIPE", + "<1211>": "MSWIN_CREATEPROCESS", + "<1212>": "MSWIN_CREATEPROCESSBYPTR", + "<1213>": "MSWIN_CREATESOLIDBRUSH", + "<1214>": "MSWIN_CREATEWINDOWEX", + "<1215>": "MSWIN_DELETEDC", + "<1216>": "MSWIN_DELETEMENU", + "<1217>": "MSWIN_DELETEOBJECT", + "<1218>": "MSWIN_DEREGISTEREVENTSOURCE", + "<1219>": "MSWIN_DESTROYICON", + "<1220>": "MSWIN_DISPATCHMESSAGE", + "<1221>": "MSWIN_DRAWTEXT", + "<1222>": "MSWIN_DRAWTEXTEX", + "<1223>": "MSWIN_ELLIPSE", + "<1224>": "MSWIN_ENABLEWINDOW", + "<1225>": "MSWIN_ENDUPDATERESOURCE", + "<1226>": "MSWIN_EQUALRECT", + "<1227>": "MSWIN_EXCLUDECLIPRECT", + "<1228>": "MSWIN_EXTCREATEPEN", + "<1229>": "MSWIN_EXTFLOODFILL", + "<1230>": "MSWIN_EXTSELECTCLIPRGN", + "<1231>": "MSWIN_EXTTEXTOUT", + "<1232>": "MSWIN_FILLRECT", + "<1233>": "MSWIN_FINDCLOSE", + "<1234>": "MSWIN_FINDFIRSTFILE", + "<1235>": "MSWIN_FINDFIRSTVOLUME", + "<1236>": "MSWIN_FINDNEXTFILE", + "<1237>": "MSWIN_FINDNEXTVOLUME", + "<1238>": "MSWIN_FINDRESOURCE", + "<1239>": "MSWIN_FINDRESOURCEBYPTR", + "<1240>": "MSWIN_FINDVOLUMECLOSE", + "<1241>": "MSWIN_FINDWINDOWBYPTR", + "<1242>": "MSWIN_FLUSHFILEBUFFERS", + "<1243>": "MSWIN_FORMATMESSAGE", + "<1244>": "MSWIN_FRAMERECT", + "<1245>": "MSWIN_FREEENVIRONMENTSTRINGS", + "<1246>": "MSWIN_FREELIBRARY", + "<1247>": "MSWIN_FTPCOMMAND", + "<1248>": "MSWIN_FTPCREATEDIRECTORY", + "<1249>": "MSWIN_FTPDELETEFILE", + "<1250>": "MSWIN_FTPFINDFIRSTFILE", + "<1251>": "MSWIN_FTPGETCURRENTDIRECTORY", + "<1252>": "MSWIN_FTPGETFILE", + "<1253>": "MSWIN_FTPGETFILESIZE", + "<1254>": "MSWIN_FTPOPENFILE", + "<1255>": "MSWIN_FTPPUTFILE", + "<1256>": "MSWIN_FTPREMOVEDIRECTORY", + "<1257>": "MSWIN_FTPRENAMEFILE", + "<1258>": "MSWIN_FTPSETCURRENTDIRECTORY", + "<1259>": "MSWIN_GETANCESTOR", + "<1260>": "MSWIN_GETARCDIRECTION", + "<1261>": "MSWIN_GETASYNCKEYSTATE", + "<1262>": "MSWIN_GETBITMAPDIMENSIONEX", + "<1263>": "MSWIN_GETBKCOLOR", + "<1264>": "MSWIN_GETBKMODE", + "<1265>": "MSWIN_GETBOUNDSRECT", + "<1266>": "MSWIN_GETBRUSHORGEX", + "<1267>": "MSWIN_GETCHARABCWIDTHS", + "<1268>": "MSWIN_GETCHARABCWIDTHSFLOAT", + "<1269>": "MSWIN_GETCLASSNAME", + "<1270>": "MSWIN_GETCLIPBOX", + "<1271>": "MSWIN_GETCLIPRGN", + "<1272>": "MSWIN_GETCOMMANDLINE", + "<1273>": "MSWIN_GETCOMPUTERNAME", + "<1274>": "MSWIN_GETCURRENTPROCESSID", + "<1275>": "MSWIN_GETCURRENTTHREADID", + "<1276>": "MSWIN_GETCURSORPOS", + "<1277>": "MSWIN_GETDATEFORMAT", + "<1278>": "MSWIN_GETDC", + "<1279>": "MSWIN_GETDESKTOPWINDOW", + "<1280>": "MSWIN_GETDEVICECAPS", + "<1281>": "MSWIN_GETDIBCOLORTABLE", + "<1282>": "MSWIN_GETDIBITS", + "<1283>": "MSWIN_GETDRIVETYPE", + "<1284>": "MSWIN_GETENVIRONMENTSTRINGS", + "<1285>": "MSWIN_GETENVIRONMENTVARIABLE", + "<1286>": "MSWIN_GETERRORMODE", + "<1287>": "MSWIN_GETEXITCODEPROCESS", + "<1288>": "MSWIN_GETFILEATTRIBUTES", + "<1289>": "MSWIN_GETFOCUS", + "<1290>": "MSWIN_GETFOREGROUNDWINDOW", + "<1291>": "MSWIN_GETHOSTBYADDR", + "<1292>": "MSWIN_GETHOSTBYNAME", + "<1293>": "MSWIN_GETHOSTNAME", + "<1294>": "MSWIN_GETLASTERROR", + "<1295>": "MSWIN_GETLASTINPUTINFO", + "<1296>": "MSWIN_GETLOCALEINFO", + "<1297>": "MSWIN_GETLOCALEINFOEX", + "<1298>": "MSWIN_GETLOGICALDRIVES", + "<1299>": "MSWIN_GETLONGPATHNAME", + "<1300>": "MSWIN_GETMAPMODE", + "<1301>": "MSWIN_GETMETARGN", + "<1302>": "MSWIN_GETMODULEHANDLEBYPTR", + "<1303>": "MSWIN_GETMONITORINFO", + "<1304>": "MSWIN_GETOBJECT", + "<1305>": "MSWIN_GETPARENT", + "<1306>": "MSWIN_GETPIXEL", + "<1307>": "MSWIN_GETPRIVATEPROFILESECTION", + "<1308>": "MSWIN_GETPRIVATEPROFILESTRING", + "<1309>": "MSWIN_GETPROCADDRESS", + "<1310>": "MSWIN_GETPROCESSWINDOWSTATION", + "<1311>": "MSWIN_GETPROFILESTRING", + "<1312>": "MSWIN_GETRANDOMRGN", + "<1313>": "MSWIN_GETROP2", + "<1314>": "MSWIN_GETSTDHANDLE", + "<1315>": "MSWIN_GETSTOCKOBJECT", + "<1316>": "MSWIN_GETSTRETCHBLTMODE", + "<1317>": "MSWIN_GETSYSCOLOR", + "<1318>": "MSWIN_GETSYSCOLORBRUSH", + "<1319>": "MSWIN_GETSYSTEMMENU", + "<1320>": "MSWIN_GETSYSTEMMETRICS", + "<1321>": "MSWIN_GETTEMPFILENAME", + "<1322>": "MSWIN_GETTEMPPATH", + "<1323>": "MSWIN_GETTEXTEXTENTPOINT32", + "<1324>": "MSWIN_GETTHREADERRORMODE", + "<1325>": "MSWIN_GETTICKCOUNT", + "<1326>": "MSWIN_GETTICKCOUNT64", + "<1327>": "MSWIN_GETTIMEFORMAT", + "<1328>": "MSWIN_GETTIMEZONEINFORMATION", + "<1329>": "MSWIN_GETTOPWINDOW", + "<1330>": "MSWIN_GETUSERNAME", + "<1331>": "MSWIN_GETUSERNAMEEX", + "<1332>": "MSWIN_GETUSEROBJECTINFORMATION", + "<1333>": "MSWIN_GETVERSIONEX", + "<1334>": "MSWIN_GETVIEWPORTEXTEX", + "<1335>": "MSWIN_GETVIEWPORTORGEX", + "<1336>": "MSWIN_GETVOLUMEINFORMATION", + "<1337>": "MSWIN_GETWINDOW", + "<1338>": "MSWIN_GETWINDOWEXTEX", + "<1339>": "MSWIN_GETWINDOWLONG", + "<1340>": "MSWIN_GETWINDOWLONGPTR", + "<1341>": "MSWIN_GETWINDOWORGEX", + "<1342>": "MSWIN_GETWINDOWRECT", + "<1343>": "MSWIN_GETWINDOWSDIRECTORY", + "<1344>": "MSWIN_GETWINDOWTEXT", + "<1345>": "MSWIN_GETWINDOWTEXTLENGTH", + "<1346>": "MSWIN_GETWINDOWTHREADPROCESSID", + "<1347>": "MSWIN_GLOBALMEMORYSTATUSEX", + "<1348>": "MSWIN_GRADIENTFILL", + "<1349>": "MSWIN_HTTPADDREQUESTHEADERS", + "<1350>": "MSWIN_HTTPENDREQUEST", + "<1351>": "MSWIN_HTTPOPENREQUEST", + "<1352>": "MSWIN_HTTPQUERYINFO", + "<1353>": "MSWIN_HTTPSENDREQUEST", + "<1354>": "MSWIN_HTTPSENDREQUESTEX", + "<1355>": "MSWIN_ICMPCLOSEHANDLE", + "<1356>": "MSWIN_ICMPCREATEFILE", + "<1357>": "MSWIN_ICMPSENDECHO", + "<1358>": "MSWIN_INET_ADDR", + "<1359>": "MSWIN_INFLATERECT", + "<1360>": "MSWIN_INTERNETCLOSEHANDLE", + "<1361>": "MSWIN_INTERNETCONNECT", + "<1362>": "MSWIN_INTERNETCONNECTBYPTR", + "<1363>": "MSWIN_INTERNETFINDNEXTFILE", + "<1364>": "MSWIN_INTERNETGETCOOKIE", + "<1365>": "MSWIN_INTERNETGETLASTRESPONSEINFO", + "<1366>": "MSWIN_INTERNETOPEN", + "<1367>": "MSWIN_INTERNETOPENURL", + "<1368>": "MSWIN_INTERNETQUERYDATAAVAILABLE", + "<1369>": "MSWIN_INTERNETREADFILE", + "<1370>": "MSWIN_INTERNETSETCOOKIE", + "<1371>": "MSWIN_INTERNETSETFILEPOINTER", + "<1372>": "MSWIN_INTERNETWRITEFILE", + "<1373>": "MSWIN_INTERSECTCLIPRECT", + "<1374>": "MSWIN_INTERSECTRECT", + "<1375>": "MSWIN_INVERTRECT", + "<1376>": "MSWIN_ISRECTEMPTY", + "<1377>": "MSWIN_ISUSERANADMIN", + "<1378>": "MSWIN_ISWINDOW", + "<1379>": "MSWIN_ISWINDOWVISIBLE", + "<1380>": "MSWIN_LINETO", + "<1381>": "MSWIN_LOADBITMAP", + "<1382>": "MSWIN_LOADICON", + "<1383>": "MSWIN_LOADICONFROMINT", + "<1384>": "MSWIN_LOADIMAGE", + "<1385>": "MSWIN_LOADIMAGEBYRESID", + "<1386>": "MSWIN_LOADLIBRARY", + "<1387>": "MSWIN_LOADRESOURCE", + "<1388>": "MSWIN_LOCKRESOURCE", + "<1389>": "MSWIN_MAKEDRAGLIST", + "<1390>": "MSWIN_MAPWINDOWPOINTS", + "<1391>": "MSWIN_MASKBLT", + "<1392>": "MSWIN_MESSAGEBEEP", + "<1393>": "MSWIN_MESSAGEBOX", + "<1394>": "MSWIN_MONITORFROMRECT", + "<1395>": "MSWIN_MONITORFROMWINDOW", + "<1396>": "MSWIN_MOVETOEX", + "<1397>": "MSWIN_MSGWAITFORMULTIPLEOBJECTS", + "<1398>": "MSWIN_OFFSETCLIPRGN", + "<1399>": "MSWIN_OFFSETRECT", + "<1400>": "MSWIN_OFFSETVIEWPORTORGEX", + "<1401>": "MSWIN_OFFSETWINDOWORGEX", + "<1402>": "MSWIN_OPENPROCESS", + "<1403>": "MSWIN_PATBLT", + "<1404>": "MSWIN_PATHCOMBINE", + "<1405>": "MSWIN_PATHISDIRECTORY", + "<1406>": "MSWIN_PATHISNETWORKPATH", + "<1407>": "MSWIN_PATHISUNC", + "<1408>": "MSWIN_PATHISUNCSERVER", + "<1409>": "MSWIN_PATHISUNCSERVERSHARE", + "<1410>": "MSWIN_PATHRELATIVEPATHTO", + "<1411>": "MSWIN_PATHSKIPROOT", + "<1412>": "MSWIN_PATHSTRIPTOROOT", + "<1413>": "MSWIN_PEEKMESSAGE", + "<1414>": "MSWIN_PIE", + "<1415>": "MSWIN_PLAYSOUND", + "<1416>": "MSWIN_PLGBLT", + "<1417>": "MSWIN_POLYBEZIER", + "<1418>": "MSWIN_POLYBEZIERTO", + "<1419>": "MSWIN_POLYDRAW", + "<1420>": "MSWIN_POLYGON", + "<1421>": "MSWIN_POLYLINE", + "<1422>": "MSWIN_POLYLINETO", + "<1423>": "MSWIN_POLYPOLYGON", + "<1424>": "MSWIN_POLYPOLYLINE", + "<1425>": "MSWIN_POSTMESSAGE", + "<1426>": "MSWIN_POSTQUITMESSAGE", + "<1427>": "MSWIN_PTVISIBLE", + "<1428>": "MSWIN_QUERYPERFORMANCECOUNTER", + "<1429>": "MSWIN_READFILE", + "<1430>": "MSWIN_RECTANGLE", + "<1431>": "MSWIN_RECTVISIBLE", + "<1432>": "MSWIN_REGCLOSEKEY", + "<1433>": "MSWIN_REGCREATEKEYEX", + "<1434>": "MSWIN_REGENUMKEYEX", + "<1435>": "MSWIN_REGENUMVALUE", + "<1436>": "MSWIN_REGFLUSHKEY", + "<1437>": "MSWIN_REGISTEREVENTSOURCE", + "<1438>": "MSWIN_REGISTERWINDOWMESSAGE", + "<1439>": "MSWIN_REGOPENKEYEX", + "<1440>": "MSWIN_REGQUERYVALUEEX", + "<1441>": "MSWIN_REGSETVALUEEX", + "<1442>": "MSWIN_RELEASEDC", + "<1443>": "MSWIN_REMOVEMENU", + "<1444>": "MSWIN_REPORTEVENT", + "<1445>": "MSWIN_RESTOREDC", + "<1446>": "MSWIN_ROUNDRECT", + "<1447>": "MSWIN_SAVEDC", + "<1448>": "MSWIN_SCREENTOCLIENT", + "<1449>": "MSWIN_SELECTCLIPPATH", + "<1450>": "MSWIN_SELECTCLIPRGN", + "<1451>": "MSWIN_SELECTOBJECT", + "<1452>": "MSWIN_SENDMESSAGE", + "<1453>": "MSWIN_SETARCDIRECTION", + "<1454>": "MSWIN_SETBITMAPDIMENSIONEX", + "<1455>": "MSWIN_SETBKCOLOR", + "<1456>": "MSWIN_SETBKMODE", + "<1457>": "MSWIN_SETBOUNDSRECT", + "<1458>": "MSWIN_SETBRUSHORGEX", + "<1459>": "MSWIN_SETCURRENTDIRECTORY", + "<1460>": "MSWIN_SETDCBRUSHCOLOR", + "<1461>": "MSWIN_SETDCPENCOLOR", + "<1462>": "MSWIN_SETDIBCOLORTABLE", + "<1463>": "MSWIN_SETDIBITS", + "<1464>": "MSWIN_SETDIBITSTODEVICE", + "<1465>": "MSWIN_SETERRORMODE", + "<1466>": "MSWIN_SETFOCUS", + "<1467>": "MSWIN_SETFOREGROUNDWINDOW", + "<1468>": "MSWIN_SETHANDLEINFORMATION", + "<1469>": "MSWIN_SETMAPMODE", + "<1470>": "MSWIN_SETMETARGN", + "<1471>": "MSWIN_SETPIXEL", + "<1472>": "MSWIN_SETPIXELV", + "<1473>": "MSWIN_SETRECT", + "<1474>": "MSWIN_SETRECTEMPTY", + "<1475>": "MSWIN_SETROP2", + "<1476>": "MSWIN_SETSTRETCHBLTMODE", + "<1477>": "MSWIN_SETTHREADERRORMODE", + "<1478>": "MSWIN_SETVIEWPORTEXTEX", + "<1479>": "MSWIN_SETVIEWPORTORGEX", + "<1480>": "MSWIN_SETWINDOWEXTEX", + "<1481>": "MSWIN_SETWINDOWORGEX", + "<1482>": "MSWIN_SETWINDOWPOS", + "<1483>": "MSWIN_SHAUTOCOMPLETE", + "<1484>": "MSWIN_SHELLEXECUTE", + "<1485>": "MSWIN_SHELLEXECUTEEX", + "<1486>": "MSWIN_SHGETFOLDERPATH", + "<1487>": "MSWIN_SHOWWINDOW", + "<1488>": "MSWIN_SLEEP", + "<1489>": "MSWIN_SNDPLAYSOUND", + "<1490>": "MSWIN_STRETCHBLT", + "<1491>": "MSWIN_STRETCHDIBITS", + "<1492>": "MSWIN_SUBTRACTRECT", + "<1493>": "MSWIN_SYSTEMPARAMETERSINFO", + "<1494>": "MSWIN_SYSTEMPARAMETERSINFOBYPTR", + "<1495>": "MSWIN_TERMINATEPROCESS", + "<1496>": "MSWIN_TIMEGETTIME", + "<1497>": "MSWIN_TRACKMOUSEEVENT", + "<1498>": "MSWIN_TRANSLATEMESSAGE", + "<1499>": "MSWIN_TRANSPARENTBLT", + "<1500>": "MSWIN_UNIONRECT", + "<1501>": "MSWIN_UPDATERESOURCE", + "<1502>": "MSWIN_UPDATERESOURCEBYPTR", + "<1503>": "MSWIN_UPDATEWINDOW", + "<1504>": "MSWIN_WAITFORSINGLEOBJECT", + "<1505>": "MSWIN_WINEXEC", + "<1506>": "MSWIN_WNETGETUNIVERSALNAME", + "<1507>": "MSWIN_WRITEPRIVATEPROFILESTRING", + "<1508>": "MSWIN_WRITEPROFILESTRING", + "<1509>": "MSWIN_WSACLEANUP", + "<1510>": "MSWIN_WSAGETLASTERROR", + "<1511>": "MSWIN_WSASTARTUP", + "<1512>": "MTWIN_INIT", + "<1513>": "MVBFS", + "<1514>": "MVBFS_ATTACH_MULTILEVEL_WIZARD", + "<1515>": "MVBFS_ATTACH_TABLE_WIZARD", + "<1516>": "MVBFS_BTREE_EXTRACT", + "<1517>": "MVBFS_CALCULATE", + "<1518>": "MVBFS_COMPILEBASIC", + "<1519>": "MVBFS_CONNECTION_CONFIGURATION_EVENTS", + "<1520>": "MVBFS_CONNECTION_CREDENTIALS_EVENTS", + "<1521>": "MVBFS_CONNECTION_POOLING", + "<1522>": "MVBFS_CONNECTION_TIMEOUT", + "<1523>": "MVBFS_CONNECTION_WIZARD", + "<1524>": "MVBFS_CONV", + "<1525>": "MVBFS_CONV_HANDLER", + "<1526>": "MVBFS_CREDENTIALS", + "<1527>": "MVBFS_CREDENTIALS_PROMPT_EVENTS", + "<1528>": "MVBFS_ERROR", + "<1529>": "MVBFS_EXECPROC", + "<1530>": "MVBFS_GET_HANDLER", + "<1531>": "MVBFS_HANDLER_DEFAULT", + "<1532>": "MVBFS_HANDLER_QM", + "<1533>": "MVBFS_HANDLER_TGBFS", + "<1534>": "MVBFS_HANDLER_U2UBFS", + "<1535>": "MVBFS_HELPER", + "<1536>": "MVBFS_MAPDICT_QM", + "<1537>": "MVBFS_MAPDICT_U2", + "<1538>": "MVBFS_MAPSELECT_PICK", + "<1539>": "MVBFS_MAPSELECT_QM", + "<1540>": "MVBFS_NATIVE_TABLE", + "<1541>": "MVBFS_QUERY_WINDOW_EVENTS", + "<1542>": "MVBFS_REFRESH_SHADOW", + "<1543>": "MVBFS_RESOLVE_CONNECTION_STRING", + "<1544>": "MVBFS_RESOLVE_CREDENTIALS", + "<1545>": "MVBFS_SUBCALL", + "<1546>": "NAMECAP", + "<1547>": "NAMEFIX", + "<1548>": "NAMEVOLUME_SUB", + "<1549>": "NAME_VOLUME", + "<1550>": "NBB.DETAIL.LOAD.DREC.SUB", + "<1551>": "NDW_TEST_UV", + "<1552>": "NETWORK_SUB", + "<1553>": "NEWAPP_SUB", + "<1554>": "NEWENTITY", + "<1555>": "NEWLABEL_EVENTS", + "<1556>": "NEWREPORT_EVENTS", + "<1557>": "NEWXRATING", + "<1558>": "NEW_INDEX_TIMINGS", + "<1559>": "NEW_TEST", + "<1560>": "NEXTI", + "<1561>": "NTSSERIAL", + "<1562>": "NULL", + "<1563>": "NULL_MFS", + "<1564>": "NUMBER", + "<1565>": "NUMBER_LOGGED_IN_USERS", + "<1566>": "NWGETPRIMARYCONNECTIONID", + "<1567>": "O4WADDTHIS", + "<1568>": "O4WALIGNSTYLE", + "<1569>": "O4WATTRIBUTESTYLE", + "<1570>": "O4WBREADCRUMBS", + "<1571>": "O4WBREAK", + "<1572>": "O4WBUTTON", + "<1573>": "O4WCACHE", + "<1574>": "O4WCELLSTYLE", + "<1575>": "O4WCHECKBOX", + "<1576>": "O4WCHECKSECURITY", + "<1577>": "O4WCM2_MESSAGE_MGMT", + "<1578>": "O4WCM2_PIZZA", + "<1579>": "O4WCM2_UD_MANAGER", + "<1580>": "O4WCMR_SAMPLE", + "<1581>": "O4WCM_O4W_LH_STATISTICS_DETAIL", + "<1582>": "O4WCM_SAMPLE", + "<1583>": "O4WCOLORPICKER", + "<1584>": "O4WCOLORS", + "<1585>": "O4WCOLORSTYLE", + "<1586>": "O4WCOMMUTERUTILITY", + "<1587>": "O4WCOMMUTERUTILITY2", + "<1588>": "O4WCOOKIE", + "<1589>": "O4WDATASTYLE", + "<1590>": "O4WDATEPICKER", + "<1591>": "O4WDB_GETSTATS", + "<1592>": "O4WDB_STATISTICS_STATUS", + "<1593>": "O4WDIALOG", + "<1594>": "O4WDIVIDER", + "<1595>": "O4WDOWNLOAD", + "<1596>": "O4WERROR", + "<1597>": "O4WESCAPE", + "<1598>": "O4WFACEBOOK", + "<1599>": "O4WFIELDSETOPTIONS", + "<1600>": "O4WFIXEDTEXT", + "<1601>": "O4WFOCUS", + "<1602>": "O4WFOOTER", + "<1603>": "O4WFORM", + "<1604>": "O4WGENERATEID", + "<1605>": "O4WGETMOBILE", + "<1606>": "O4WGETPOSTVALUE", + "<1607>": "O4WGETVALUE", + "<1608>": "O4WGOTOPAGE", + "<1609>": "O4WGOTOTAB", + "<1610>": "O4WGPSCOORDINATESOPTIONS", + "<1611>": "O4WGRAPHDATA", + "<1612>": "O4WGRAPHEND", + "<1613>": "O4WGRAPHSTART", + "<1614>": "O4WHEADER", + "<1615>": "O4WHELPER_MANAGE_TABLES", + "<1616>": "O4WHELPER_OICONSOLE_CBBFS", + "<1617>": "O4WHELPER_OICONSOLE_DSBFS", + "<1618>": "O4WHELPER_OICONSOLE_FS_DASHBOARD", + "<1619>": "O4WHELPER_OICONSOLE_LHMGMT", + "<1620>": "O4WHELPER_OICONSOLE_MVBFS", + "<1621>": "O4WHELPER_OICONSOLE_USERMGMT", + "<1622>": "O4WHELPSTYLE", + "<1623>": "O4WHTMLOPTIONS", + "<1624>": "O4WICONBUTTON", + "<1625>": "O4WIDRAWFORM", + "<1626>": "O4WIMAGE", + "<1627>": "O4WIMAGEBUTTON", + "<1628>": "O4WINPUTBOXOPTIONS", + "<1629>": "O4WINPUTOPTIONS", + "<1630>": "O4WINPUTSTYLE", + "<1631>": "O4WISMOBILEBROWSER", + "<1632>": "O4WI_ADDVALIDATE", + "<1633>": "O4WI_ATTREXTRACT", + "<1634>": "O4WI_AUTHORIZE", + "<1635>": "O4WI_AUTHORIZE_BUILTIN", + "<1636>": "O4WI_AUTHORIZE_INSENS", + "<1637>": "O4WI_AUTHORIZE_OIUSER_ENCRYPT", + "<1638>": "O4WI_BUILDCOMMUTER", + "<1639>": "O4WI_BUILDCOMMUTER2", + "<1640>": "O4WI_CFG_DIRECTPRINT_HELPER", + "<1641>": "O4WI_CLEANNAME", + "<1642>": "O4WI_CLEARCOMMON", + "<1643>": "O4WI_CONVERTOIFORM", + "<1644>": "O4WI_CONVERTOIFORM_10", + "<1645>": "O4WI_CONVERTOIREPORT", + "<1646>": "O4WI_CREATEUSER", + "<1647>": "O4WI_CSVTOPDF", + "<1648>": "O4WI_CUSTOMATTREXTRACT", + "<1649>": "O4WI_DATASTORE", + "<1650>": "O4WI_DEBUGRECORD", + "<1651>": "O4WI_DISPATCH", + "<1652>": "O4WI_DOLOGIN", + "<1653>": "O4WI_ENCRYPT", + "<1654>": "O4WI_ESCAPE", + "<1655>": "O4WI_FILTER", + "<1656>": "O4WI_FORMATMSG", + "<1657>": "O4WI_FORMDESIGNER_CONVERT", + "<1658>": "O4WI_FORMDESIGNER_HELPER", + "<1659>": "O4WI_FORMDESIGNER_PAGE_DETAILS", + "<1660>": "O4WI_FORMDESIGNER_PAGE_HELPER", + "<1661>": "O4WI_FORMDESIGNER_PAGE_KEY", + "<1662>": "O4WI_FORMDESIGNER_PAGE_KEYSEARCH", + "<1663>": "O4WI_FORMDESIGNER_PAGE_NONE", + "<1664>": "O4WI_FORMDESIGNER_PAGE_OIDETAILS", + "<1665>": "O4WI_FORMDESIGNER_PAGE_RESULTSLIST", + "<1666>": "O4WI_FORMDESIGNER_PAGE_SEARCH", + "<1667>": "O4WI_FORMDESIGNER_PAGE_SEARCH_RESULTS_COMBINED", + "<1668>": "O4WI_FORMDESIGNER_PAGE_XXX", + "<1669>": "O4WI_FORMDESIGNER_PROPS_HELPER", + "<1670>": "O4WI_FORMDESIGNER_TEMPLATE_ADD_ONLY", + "<1671>": "O4WI_FORMDESIGNER_TEMPLATE_ENTER_KEY", + "<1672>": "O4WI_FORMDESIGNER_TEMPLATE_ITEM_LISTING", + "<1673>": "O4WI_FORMDESIGNER_TEMPLATE_KEY_AND_SEARCH", + "<1674>": "O4WI_FORMDESIGNER_TEMPLATE_OI_FORM_MODE", + "<1675>": "O4WI_FORMDESIGNER_TEMPLATE_PICKLIST", + "<1676>": "O4WI_FORMDESIGNER_TEMPLATE_SEARCH", + "<1677>": "O4WI_FORMDESIGNER_TEMPLATE_XXX", + "<1678>": "O4WI_FORMDESIGNER_UTILITY", + "<1679>": "O4WI_FORMDESIGNER_WIDGET_AUTOCOMP", + "<1680>": "O4WI_FORMDESIGNER_WIDGET_BSET", + "<1681>": "O4WI_FORMDESIGNER_WIDGET_BTN", + "<1682>": "O4WI_FORMDESIGNER_WIDGET_CHK", + "<1683>": "O4WI_FORMDESIGNER_WIDGET_COLOR", + "<1684>": "O4WI_FORMDESIGNER_WIDGET_CSEC", + "<1685>": "O4WI_FORMDESIGNER_WIDGET_CTL", + "<1686>": "O4WI_FORMDESIGNER_WIDGET_DATE", + "<1687>": "O4WI_FORMDESIGNER_WIDGET_DLIST", + "<1688>": "O4WI_FORMDESIGNER_WIDGET_FSLCT", + "<1689>": "O4WI_FORMDESIGNER_WIDGET_GCELEMENT", + "<1690>": "O4WI_FORMDESIGNER_WIDGET_GCHART", + "<1691>": "O4WI_FORMDESIGNER_WIDGET_GMAP", + "<1692>": "O4WI_FORMDESIGNER_WIDGET_GMELEMENT", + "<1693>": "O4WI_FORMDESIGNER_WIDGET_GRID", + "<1694>": "O4WI_FORMDESIGNER_WIDGET_HDR", + "<1695>": "O4WI_FORMDESIGNER_WIDGET_HELPER", + "<1696>": "O4WI_FORMDESIGNER_WIDGET_IAREA", + "<1697>": "O4WI_FORMDESIGNER_WIDGET_IFILE", + "<1698>": "O4WI_FORMDESIGNER_WIDGET_IFRAME", + "<1699>": "O4WI_FORMDESIGNER_WIDGET_ILIST", + "<1700>": "O4WI_FORMDESIGNER_WIDGET_IMG", + "<1701>": "O4WI_FORMDESIGNER_WIDGET_ITXT", + "<1702>": "O4WI_FORMDESIGNER_WIDGET_MBTN", + "<1703>": "O4WI_FORMDESIGNER_WIDGET_MFTR", + "<1704>": "O4WI_FORMDESIGNER_WIDGET_MHDR", + "<1705>": "O4WI_FORMDESIGNER_WIDGET_MNAVBAR", + "<1706>": "O4WI_FORMDESIGNER_WIDGET_NEW", + "<1707>": "O4WI_FORMDESIGNER_WIDGET_OLIST", + "<1708>": "O4WI_FORMDESIGNER_WIDGET_RDIO", + "<1709>": "O4WI_FORMDESIGNER_WIDGET_SCHK", + "<1710>": "O4WI_FORMDESIGNER_WIDGET_SEC", + "<1711>": "O4WI_FORMDESIGNER_WIDGET_SLIDER", + "<1712>": "O4WI_FORMDESIGNER_WIDGET_SRDIO", + "<1713>": "O4WI_FORMDESIGNER_WIDGET_STR", + "<1714>": "O4WI_FORMDESIGNER_WIDGET_TAB", + "<1715>": "O4WI_FORMDESIGNER_WIDGET_TBL", + "<1716>": "O4WI_FORMDESIGNER_WIDGET_TGL", + "<1717>": "O4WI_FORMDESIGNER_WIDGET_TIME", + "<1718>": "O4WI_FORMDESIGNER_WIDGET_TXT", + "<1719>": "O4WI_FORMDESIGNER_WIDGET_ULIST", + "<1720>": "O4WI_FORMDESIGNER_WIDGET_XXX", + "<1721>": "O4WI_GOOGLECRAWL_FORM", + "<1722>": "O4WI_GOOGLECRAWL_REPORT", + "<1723>": "O4WI_HANDLETABOX", + "<1724>": "O4WI_HANDLEUPLOAD", + "<1725>": "O4WI_ISMOBILE", + "<1726>": "O4WI_LINKSUB", + "<1727>": "O4WI_LOADPLUGINDATA", + "<1728>": "O4WI_LOADTEMPLATE", + "<1729>": "O4WI_LOCKHANDLER", + "<1730>": "O4WI_LOGERRORS", + "<1731>": "O4WI_LOGIN_SECURE_BUILTIN_HELPER", + "<1732>": "O4WI_OICONSOLE_CHECKINTERNALSERVER", + "<1733>": "O4WI_OICONSOLE_CONFIGMGMT_DECODE", + "<1734>": "O4WI_OPENIDHELPER", + "<1735>": "O4WI_PAINTNEWFORM", + "<1736>": "O4WI_PARSER", + "<1737>": "O4WI_PERMLIST", + "<1738>": "O4WI_PLUGINHELPER", + "<1739>": "O4WI_POPUP2RPT", + "<1740>": "O4WI_PROXY", + "<1741>": "O4WI_PROXY_DISPATCH", + "<1742>": "O4WI_REGISTER_PROC", + "<1743>": "O4WI_RELOADOBJECT", + "<1744>": "O4WI_RESET_PASSWORD", + "<1745>": "O4WI_SETPOSTVALUE", + "<1746>": "O4WI_SETSESSIONINFO", + "<1747>": "O4WI_SETVALUE", + "<1748>": "O4WI_STYLEADD", + "<1749>": "O4WI_STYLEPARSE", + "<1750>": "O4WI_TABLEPAGERLOCAL", + "<1751>": "O4WI_TABLEPAGERLOCAL2", + "<1752>": "O4WI_TABLEPAGERPLUGIN", + "<1753>": "O4WI_UDM_HELLPER", + "<1754>": "O4WI_UDM_HELPER", + "<1755>": "O4WI_UNCROSSSTREAMS", + "<1756>": "O4WI_UPDATEMODULES", + "<1757>": "O4WI_UPDATEO4WFORM", + "<1758>": "O4WI_UPLOAD_DROPBOX", + "<1759>": "O4WI_VALIDATE", + "<1760>": "O4WI_WRAPUP", + "<1761>": "O4WI_WRAPUPINPUT", + "<1762>": "O4WLINK", + "<1763>": "O4WLINKEDIN", + "<1764>": "O4WLINKSTYLE", + "<1765>": "O4WLISTBOX", + "<1766>": "O4WLISTBOXEND", + "<1767>": "O4WLISTBOXOPTIONS", + "<1768>": "O4WLISTBOXSTART", + "<1769>": "O4WLISTBOXSTYLE", + "<1770>": "O4WLISTEND", + "<1771>": "O4WLISTITEM", + "<1772>": "O4WLISTSTART", + "<1773>": "O4WMARKEDOPTIONS", + "<1774>": "O4WMARKEDSTYLE", + "<1775>": "O4WMENU", + "<1776>": "O4WMETA", + "<1777>": "O4WMETATAG", + "<1778>": "O4WMOBILE", + "<1779>": "O4WMOBILEBUTTONOPTIONS", + "<1780>": "O4WMOBILEOPTIONS", + "<1781>": "O4WMOBILEPAGEOPTIONS", + "<1782>": "O4WMOBILETABLEOPTIONS", + "<1783>": "O4WMSG", + "<1784>": "O4WNUMBERBOX", + "<1785>": "O4WPAYPAL", + "<1786>": "O4WPLUGIN", + "<1787>": "O4WPOPUP", + "<1788>": "O4WPOPUPRETURN", + "<1789>": "O4WPOSITIONSTYLE", + "<1790>": "O4WPWDBOX", + "<1791>": "O4WQUALIFYEVENT", + "<1792>": "O4WRADIOBUTTON", + "<1793>": "O4WRAW", + "<1794>": "O4WRAWSTYLE", + "<1795>": "O4WREDIRECT", + "<1796>": "O4WRESPONSE", + "<1797>": "O4WRESPONSEOPTIONS", + "<1798>": "O4WRESPONSESTYLE", + "<1799>": "O4WRSSDATA", + "<1800>": "O4WRSSPUBLISH", + "<1801>": "O4WSCRIPT", + "<1802>": "O4WSECTIONEND", + "<1803>": "O4WSECTIONSTART", + "<1804>": "O4WSEMANTICOPTIONS", + "<1805>": "O4WSETBREADCRUMB", + "<1806>": "O4WSETCELL", + "<1807>": "O4WSETHISTORY", + "<1808>": "O4WSETMOBILE", + "<1809>": "O4WSIZESTYLE", + "<1810>": "O4WSPACE", + "<1811>": "O4WSPECIALFORM", + "<1812>": "O4WSTORE", + "<1813>": "O4WSTYLESHEET", + "<1814>": "O4WSWITCHMODE", + "<1815>": "O4WTABLEADDCOL", + "<1816>": "O4WTABLEADDROW", + "<1817>": "O4WTABLEADVANCEDOPTIONS", + "<1818>": "O4WTABLEADVANCEDSTYLE", + "<1819>": "O4WTABLECELLOPTIONS", + "<1820>": "O4WTABLECELLSTYLE", + "<1821>": "O4WTABLEDELCOL", + "<1822>": "O4WTABLEDELROW", + "<1823>": "O4WTABLEEND", + "<1824>": "O4WTABLEHEADER", + "<1825>": "O4WTABLEMODIFY", + "<1826>": "O4WTABLEPAGEROPTIONS", + "<1827>": "O4WTABLEPAGERSTYLE", + "<1828>": "O4WTABLESTART", + "<1829>": "O4WTABLESTYLE", + "<1830>": "O4WTABOX", + "<1831>": "O4WTABS", + "<1832>": "O4WTEXT", + "<1833>": "O4WTEXTAREA", + "<1834>": "O4WTEXTBOX", + "<1835>": "O4WTEXTEDITOR", + "<1836>": "O4WTEXTOPTIONS", + "<1837>": "O4WTEXTSTYLE", + "<1838>": "O4WTIMEPICKER", + "<1839>": "O4WTIMER", + "<1840>": "O4WTITLE", + "<1841>": "O4WTRIGGEREVENT", + "<1842>": "O4WUPDATE", + "<1843>": "O4WUPGRADE", + "<1844>": "O4WUPLOADBOX", + "<1845>": "O4WUPLOADBOXOPTIONS", + "<1846>": "O4WUTIL_DROPBOX_UPLOAD_SHIM", + "<1847>": "O4WUTIL_OTP", + "<1848>": "O4WU_LOGIN_DEFAULT", + "<1849>": "O4WU_LOGIN_SECURE", + "<1850>": "O4WU_LOGIN_SECURE_BUILTIN", + "<1851>": "O4WU_OICONSOLE_FS_REPORT", + "<1852>": "O4WVALIDATEOPTIONS", + "<1853>": "O4WVALIDATESTYLE", + "<1854>": "O4W_2FA_CONFIGURE", + "<1855>": "O4W_ABOUT", + "<1856>": "O4W_BRWREPORT", + "<1857>": "O4W_CHANGE_PASSWORD", + "<1858>": "O4W_CHILD_FORM_EVENTS", + "<1859>": "O4W_COPY_ITEM", + "<1860>": "O4W_CREATE_APP", + "<1861>": "O4W_CSSDEMO", + "<1862>": "O4W_DEFINE_ADHOC", + "<1863>": "O4W_DEFINE_APP", + "<1864>": "O4W_DEFINE_BRW", + "<1865>": "O4W_DEFINE_DASHBOARD", + "<1866>": "O4W_DEFINE_FORM", + "<1867>": "O4W_DEFINE_FORM_10", + "<1868>": "O4W_DEFINE_FORM_CLICKHANDLER", + "<1869>": "O4W_DEFINE_MENU", + "<1870>": "O4W_DEFINE_REPORT", + "<1871>": "O4W_DEFINE_REPORT_CLICKHANDLER", + "<1872>": "O4W_DEFINE_RSS", + "<1873>": "O4W_DESIGN_FORM", + "<1874>": "O4W_DOCUMENT_FORM", + "<1875>": "O4W_DOCUMENT_REPORT", + "<1876>": "O4W_EDIT_PROC", + "<1877>": "O4W_EXAMPLE_NEW_FORMDESIGNER", + "<1878>": "O4W_INVOICE_REPORT", + "<1879>": "O4W_LAYOUT_FORM", + "<1880>": "O4W_LOGIN", + "<1881>": "O4W_LOGOUT", + "<1882>": "O4W_MAINTAIN_CFG", + "<1883>": "O4W_MANAGEENGINES", + "<1884>": "O4W_MANAGE_TABLES", + "<1885>": "O4W_MENU", + "<1886>": "O4W_MMM_PIZZA", + "<1887>": "O4W_MMM_PIZZA_2", + "<1888>": "O4W_MNM_SAMPLE_TEMPLATE", + "<1889>": "O4W_MODULE_MANAGEMENT", + "<1890>": "O4W_NEWTEST", + "<1891>": "O4W_OICONSOLE_AUTHMGMT", + "<1892>": "O4W_OICONSOLE_CBBFSMGMT", + "<1893>": "O4W_OICONSOLE_COMMANDER", + "<1894>": "O4W_OICONSOLE_CONFIGMGMT", + "<1895>": "O4W_OICONSOLE_DBTUTIL", + "<1896>": "O4W_OICONSOLE_ENGINFO", + "<1897>": "O4W_OICONSOLE_ENVMGMT", + "<1898>": "O4W_OICONSOLE_ESERVERCFG", + "<1899>": "O4W_OICONSOLE_ESERVERMGMT", + "<1900>": "O4W_OICONSOLE_FS_DASHBOARD", + "<1901>": "O4W_OICONSOLE_INDICES", + "<1902>": "O4W_OICONSOLE_LHMGMT", + "<1903>": "O4W_OICONSOLE_LOCKMGMT", + "<1904>": "O4W_OICONSOLE_MVBFS", + "<1905>": "O4W_OICONSOLE_NETWORKINFO", + "<1906>": "O4W_OICONSOLE_REGMGMT", + "<1907>": "O4W_OICONSOLE_SQLBFS", + "<1908>": "O4W_OICONSOLE_USERINFO", + "<1909>": "O4W_OICONSOLE_USERMGMT", + "<1910>": "O4W_PARSE_BBCODE", + "<1911>": "O4W_PASSWORD_RESET", + "<1912>": "O4W_RDKINSTALL", + "<1913>": "O4W_READ", + "<1914>": "O4W_RELOAD_PROC", + "<1915>": "O4W_RESET_FORMDESIGNER_DEFAULTS", + "<1916>": "O4W_RSS", + "<1917>": "O4W_RUN_ADHOC", + "<1918>": "O4W_RUN_DASHBOARD", + "<1919>": "O4W_RUN_FORM", + "<1920>": "O4W_RUN_FORM2", + "<1921>": "O4W_RUN_FORM_MOBILE", + "<1922>": "O4W_RUN_ITEM", + "<1923>": "O4W_RUN_REPORT", + "<1924>": "O4W_RUN_REPORT_MOBILE", + "<1925>": "O4W_RUN_REPORT_SAVE", + "<1926>": "O4W_STATISTICS_STATUS", + "<1927>": "O4W_TWEET", + "<1928>": "O4W_VERSION", + "<1929>": "O4W_WRAPPER", + "<1930>": "OBJ_CALL_EVENT", + "<1931>": "OBJ_RELEASE", + "<1932>": "OECGI_CONFIGURATION", + "<1933>": "OECREATECALLBACK", + "<1934>": "OEGETCLIENTSTAT", + "<1935>": "OEPUTDATA", + "<1936>": "OEPUTSTAT", + "<1937>": "OEREQINFO", + "<1938>": "OEREQINFOEX", + "<1939>": "OESS_SYSINFO", + "<1940>": "OE_CHECK_VARLIST", + "<1941>": "OE_DBASE_C", + "<1942>": "OE_PARSE_VARLIST", + "<1943>": "OFF", + "<1944>": "OFV", + "<1945>": "OIGETLOCALEINFO", + "<1946>": "OIGETOESTARTDIR", + "<1947>": "OIGETOISTARTDIR", + "<1948>": "OIPI2_CALLS", + "<1949>": "OIPI2_CSV", + "<1950>": "OIPI2_ONADDTABLE", + "<1951>": "OIPI2_ONTABLE", + "<1952>": "OIPI2_ONTEXTBOX", + "<1953>": "OIPI2_ONTEXTXY", + "<1954>": "OIPI2_PRINTHEADER", + "<1955>": "OIPI2_UPDATEPAGE", + "<1956>": "OIPICHDIR", + "<1957>": "OIPI_ADDTABLE_LIMITS", + "<1958>": "OIPI_ARCHIVE", + "<1959>": "OIPI_CALLS", + "<1960>": "OIPI_CHECKPAGE", + "<1961>": "OIPI_CSV", + "<1962>": "OIPI_EXAMPLE1", + "<1963>": "OIPI_EXAMPLE2", + "<1964>": "OIPI_FORMAT", + "<1965>": "OIPI_FRMPRINT_EVENTS", + "<1966>": "OIPI_ONADDTABLE", + "<1967>": "OIPI_ONTABLE", + "<1968>": "OIPI_ONTABLE_NEW", + "<1969>": "OIPI_ONTEXTBOX", + "<1970>": "OIPI_ONTEXTXY", + "<1971>": "OIPI_PAGE_LIMITS", + "<1972>": "OIPI_PIECHART", + "<1973>": "OIPI_PIECHART_EXAMPLE", + "<1974>": "OIPI_PIECHART_HELPER", + "<1975>": "OIPI_PRINTHEADER", + "<1976>": "OIPI_TEMP_FOLDER", + "<1977>": "OIPI_TESTPATTERN", + "<1978>": "OIPI_UPDATEPAGE", + "<1979>": "OISTACKTRACER", + "<1980>": "OIWIN_BUILDSUBLIST", + "<1981>": "OIWIN_CALCULATE", + "<1982>": "OIWIN_CHECKTOCLEAR", + "<1983>": "OIWIN_CLICK", + "<1984>": "OIWIN_CLOSE", + "<1985>": "OIWIN_COMPILE", + "<1986>": "OIWIN_COMPILE_EXTRACTJOINMAPS", + "<1987>": "OIWIN_COMPILE_IMPACTS", + "<1988>": "OIWIN_COMPILE_MENU", + "<1989>": "OIWIN_COMPILE_PREPJOINMAPS", + "<1990>": "OIWIN_COMPILE_SEMANTICS", + "<1991>": "OIWIN_CONTEXTMENU", + "<1992>": "OIWIN_DATABINDING", + "<1993>": "OIWIN_DELETEROW", + "<1994>": "OIWIN_DROPDOWNMENU", + "<1995>": "OIWIN_EDITSTATECHANGED", + "<1996>": "OIWIN_EXTRACTROWS", + "<1997>": "OIWIN_FORMCLEAR", + "<1998>": "OIWIN_FORMEXTRACT", + "<1999>": "OIWIN_FORMLOAD", + "<2000>": "OIWIN_FORMLOADPREV", + "<2001>": "OIWIN_FORMREAD", + "<2002>": "OIWIN_FORMREAD_PART", + "<2003>": "OIWIN_FORMSTATECHANGED", + "<2004>": "OIWIN_FORMUNLOCK", + "<2005>": "OIWIN_FORMUPDATE", + "<2006>": "OIWIN_GETEVENTINFO", + "<2007>": "OIWIN_GETKEY", + "<2008>": "OIWIN_GOTFOCUS", + "<2009>": "OIWIN_HTTPREQUEST", + "<2010>": "OIWIN_INITCONTEXTMENU", + "<2011>": "OIWIN_INSERTROW", + "<2012>": "OIWIN_ITEMCHANGED", + "<2013>": "OIWIN_IXLOOKUP", + "<2014>": "OIWIN_LOSTFOCUS", + "<2015>": "OIWIN_MDICHILDSTATECHANGED", + "<2016>": "OIWIN_MDISELECT", + "<2017>": "OIWIN_MERGEROWS", + "<2018>": "OIWIN_OLE", + "<2019>": "OIWIN_PAGE", + "<2020>": "OIWIN_PARSEQUERY", + "<2021>": "OIWIN_POSCHANGED", + "<2022>": "OIWIN_POSTMENUEVENT", + "<2023>": "OIWIN_PROPCHANGED", + "<2024>": "OIWIN_QBFABS", + "<2025>": "OIWIN_QBFCLOSE", + "<2026>": "OIWIN_QBFDOQUERY", + "<2027>": "OIWIN_QBFFIRST", + "<2028>": "OIWIN_QBFGETLIST", + "<2029>": "OIWIN_QBFINIT", + "<2030>": "OIWIN_QBFLAST", + "<2031>": "OIWIN_QBFLISTRESULTS", + "<2032>": "OIWIN_QBFLOAD", + "<2033>": "OIWIN_QBFLOADFROMPOS", + "<2034>": "OIWIN_QBFLOADID", + "<2035>": "OIWIN_QBFLOADLIST", + "<2036>": "OIWIN_QBFNEXT", + "<2037>": "OIWIN_QBFPREV", + "<2038>": "OIWIN_QBFQUERY", + "<2039>": "OIWIN_QBFQUERYCRITERIA", + "<2040>": "OIWIN_QBFRUN", + "<2041>": "OIWIN_QBFSETCONTROLSTATES", + "<2042>": "OIWIN_QBFTABLE", + "<2043>": "OIWIN_QUERYKEYS", + "<2044>": "OIWIN_RAISEFORMSTATECHANGED", + "<2045>": "OIWIN_REQUIRERR", + "<2046>": "OIWIN_RESOLVECONVPATTERN", + "<2047>": "OIWIN_RESULTROW", + "<2048>": "OIWIN_SELPROPCHANGED", + "<2049>": "OIWIN_SETCAPTIONSUFFIX", + "<2050>": "OIWIN_SETDEFAULTFORMSTATE", + "<2051>": "OIWIN_SETKEY", + "<2052>": "OIWIN_SORTED", + "<2053>": "OIWIN_SYSMSG", + "<2054>": "OIWIN_VALIDERR", + "<2055>": "OIWIN_WEBAUTHREQUEST", + "<2056>": "OIWIN_WEBCONTEXTMENU", + "<2057>": "OIWIN_WEBINITCONTEXTMENU", + "<2058>": "OIWIN_WEBOPENWINDOW", + "<2059>": "OIWIN_WEBPERMISSIONREQUEST", + "<2060>": "OIWIN_WEBSHOWDIALOG", + "<2061>": "OIWIN_WEBSYNCSCRIPT", + "<2062>": "OI_FINDTABLE_GENERIC", + "<2063>": "OI_FREEPASSWORDHOOK", + "<2064>": "OI_FULLTEXTSEARCH", + "<2065>": "OI_GETLEFTTODOITEM", + "<2066>": "OI_GETRAWDATAITEM", + "<2067>": "OI_GETTEMPFILENAME", + "<2068>": "OI_GETTEXTITEM", + "<2069>": "OI_GET_LOCALE_DATE", + "<2070>": "OI_INI_VIEWER", + "<2071>": "OI_ISSUESERVERCMD", + "<2072>": "OI_LINEARSEARCH", + "<2073>": "OI_SENDFAX_FORM_COMMUTER", + "<2074>": "OLE_GETWEBPAGE", + "<2075>": "OLIST", + "<2076>": "OLIST_PARSE", + "<2077>": "OLIST_PARSE_TEMP", + "<2078>": "OLIST_PRODUCE", + "<2079>": "OLIST_PRODUCE_ET", + "<2080>": "OLIST_PRODUCE_FAST", + "<2081>": "OLIST_PRODUCE_NEW", + "<2082>": "OLIST_SYNONYMS", + "<2083>": "ON_GETPRINTER", + "<2084>": "OPEN.WINDOW", + "<2085>": "OPEN.XML.PARSER", + "<2086>": "OPENAPP_SUB", + "<2087>": "OPEN_APP", + "<2088>": "OPERATOR", + "<2089>": "OPERATOR.SCAN", + "<2090>": "OPTIMIZE.JOIN", + "<2091>": "ORMAIN32MDI_EVENTS", + "<2092>": "ORMAIN32_EVENTS", + "<2093>": "ORMAIN32_LABELS", + "<2094>": "ORMAIN32_LABELS_FONTCOLORS", + "<2095>": "ORMAIN32_NOCOLUMNS", + "<2096>": "ORMAIN32_NOCOLUMNS_EVENTS", + "<2097>": "ORMAIN32_OPN_EVENTS", + "<2098>": "ORMAIN32_OUT_EVENTS", + "<2099>": "ORMAIN32_OVERRIDE_EVENTS", + "<2100>": "ORMAIN32_SAV_EVENTS", + "<2101>": "ORMAIN32_TESTRUN_EVENTS", + "<2102>": "ORMAIN_DET_EVENTS", + "<2103>": "ORMAIN_EVENTS", + "<2104>": "ORMAIN_LABELS_SRT_EVENTS", + "<2105>": "ORMAIN_OPN_EVENTS", + "<2106>": "ORMAIN_ORD_EVENTS", + "<2107>": "ORMAIN_SAVNEW_EVENTS", + "<2108>": "ORMAIN_SLC_EVENTS", + "<2109>": "ORMAIN_SLR_EVENTS", + "<2110>": "ORMAIN_SLT_EVENTS", + "<2111>": "ORMAIN_SRT_EVENTS", + "<2112>": "OR_PRTF", + "<2113>": "OR_PRTF_CALLBACK", + "<2114>": "OR_VIEW", + "<2115>": "OR_VIEW_CALLBACK", + "<2116>": "OSERROR", + "<2117>": "OSR", + "<2118>": "OUT.VALUE", + "<2119>": "OWNER_DRAW", + "<2120>": "PACK", + "<2121>": "PACKCONV", + "<2122>": "PAGED.MSG", + "<2123>": "PAINT", + "<2124>": "PAINT.WINDOWS", + "<2125>": "PAINTBIND", + "<2126>": "PAINTBIND_COLS", + "<2127>": "PAINTBIND_SUB", + "<2128>": "PAINTCOLORS", + "<2129>": "PAINTEDIT", + "<2130>": "PAINTFILE", + "<2131>": "PAINTMOVE", + "<2132>": "PAINTSUB", + "<2133>": "PALETTE", + "<2134>": "PAN", + "<2135>": "PARENTHESES", + "<2136>": "PARSEDOTNET", + "<2137>": "PARSEINI", + "<2138>": "PARSE_DRVSTR", + "<2139>": "PARSE_ERRORS", + "<2140>": "PARSE_LHSRVC_LOG", + "<2141>": "PARSE_STRUCT", + "<2142>": "PARSE_TAGS", + "<2143>": "PARSE_XML", + "<2144>": "PARSE_XML_SCHEMA", + "<2145>": "PARSE_XML_SCHEMA2", + "<2146>": "PARSE_XML_XPATH", + "<2147>": "PATHFINDONPATH", + "<2148>": "PATHISURL", + "<2149>": "PAT_CHECK", + "<2150>": "PAT_TEST", + "<2151>": "PBASIC_RESET.PRINTER", + "<2152>": "PBASIC_RESET_PRINTER", + "<2153>": "PDFLIST", + "<2154>": "PDFLIST_PRINTERHELPER", + "<2155>": "PDISK", + "<2156>": "PDISKFILE", + "<2157>": "PDISKOI", + "<2158>": "PEEK_EVENT", + "<2159>": "PENDING_TRANS", + "<2160>": "PERCENT", + "<2161>": "PERIOD_FORMAT", + "<2162>": "PERMS_MGMT_O4W_COMMUTER_MODULE", + "<2163>": "PE_OLECONTROL_GOTFOCUS", + "<2164>": "PHONEFIX", + "<2165>": "PHONE_FORMAT", + "<2166>": "PHONE_FORMAT_INTERNAL", + "<2167>": "PICK_CONV", + "<2168>": "PING", + "<2169>": "PLACEDIALOG", + "<2170>": "PLAYMOVIE", + "<2171>": "PLAYSOUND", + "<2172>": "POLLFORREPLY", + "<2173>": "POP.OPTIONS", + "<2174>": "POP.SELECT", + "<2175>": "POP.SESSION", + "<2176>": "POP.UP", + "<2177>": "POPDEF", + "<2178>": "POPUP", + "<2179>": "POPUP_EVENTS", + "<2180>": "POPUP_MONTH", + "<2181>": "POPUP_PRINTERS", + "<2182>": "POPUP_TEST", + "<2183>": "POPUP_WINEVENT", + "<2184>": "POPUP_WIZARD", + "<2185>": "POPUP_YEAR", + "<2186>": "POP_CONV", + "<2187>": "POP_UP_SOFT", + "<2188>": "POSTMESSAGE", + "<2189>": "POSTWEBPAGE", + "<2190>": "POST_EVENT", + "<2191>": "PPRTR", + "<2192>": "PREPJOINMAPS", + "<2193>": "PREPROC", + "<2194>": "PRINT", + "<2195>": "PRINTEND", + "<2196>": "PRINTENDTABLE", + "<2197>": "PRINTER_CANCELLED", + "<2198>": "PRINTER_TABLE_CONV", + "<2199>": "PRINTER_TABLE_SUB", + "<2200>": "PRINTFONT", + "<2201>": "PRINTINIT", + "<2202>": "PRINTLINEFEED", + "<2203>": "PRINTNEWPAGE", + "<2204>": "PRINTPAGESTATUS", + "<2205>": "PRINTSETFOOTER", + "<2206>": "PRINTSETHEADER", + "<2207>": "PRINTSETMARGINS", + "<2208>": "PRINTSETUP", + "<2209>": "PRINTSETUP_TEST", + "<2210>": "PRINTSTARTTABLE", + "<2211>": "PRINTTEXT", + "<2212>": "PRINTTEXTAT", + "<2213>": "PRINT_BLOCK", + "<2214>": "PRINT_BRUSH", + "<2215>": "PRINT_END", + "<2216>": "PRINT_INIT", + "<2217>": "PRINT_PEN", + "<2218>": "PRINT_RECT", + "<2219>": "PRINT_SETFONT", + "<2220>": "PRINT_SETFOOTER", + "<2221>": "PRINT_SETHEADER", + "<2222>": "PRINT_TEXT", + "<2223>": "PRINT_WINDOW", + "<2224>": "PROFILE_MFS", + "<2225>": "PROGRAM.MFS", + "<2226>": "PROGRESS", + "<2227>": "PROMOTE", + "<2228>": "PROMPTER", + "<2229>": "PROTECT.MFS", + "<2230>": "PROTECT_MFS", + "<2231>": "PRT_INV", + "<2232>": "PS_EXEC_METHOD", + "<2233>": "PS_EXTERNALCMD", + "<2234>": "PS_GET_PROPERTY", + "<2235>": "PS_INIT", + "<2236>": "PS_LOGIN", + "<2237>": "PS_NEWAPP", + "<2238>": "PS_OPENAPP", + "<2239>": "PS_SET_PROPERTY", + "<2240>": "PS_SPY", + "<2241>": "PS_SWAP_DATABASE", + "<2242>": "PS_SYSFINALIZE", + "<2243>": "PS_SYSINITIALIE", + "<2244>": "PS_SYSINITIALIZE", + "<2245>": "PS_SYSMON", + "<2246>": "PS_TYPEINFO", + "<2247>": "PS_TYPEINFO_CONV", + "<2248>": "PS_TYPEINFO_SYNTHETIC", + "<2249>": "PS_TYPEINFO_TYPEVALUES", + "<2250>": "PULLDOWN_WINUS", + "<2251>": "PURGE.CACHE", + "<2252>": "PUSH.SELECT", + "<2253>": "PUSH.SESSION", + "<2254>": "PUTCOLORS", + "<2255>": "PUTCONFIGURE", + "<2256>": "PWDEF", + "<2257>": "QBE", + "<2258>": "QBECOMMONS", + "<2259>": "QBEDICTINFO", + "<2260>": "QBEDISPLAY", + "<2261>": "QBEEDIT", + "<2262>": "QBEGETTABLE", + "<2263>": "QBEPARSE", + "<2264>": "QBEPOPFILES", + "<2265>": "QBEPOPJOIN", + "<2266>": "QBEPOPQUERIES", + "<2267>": "QBEPOPRLIST", + "<2268>": "QBEPOPSIZE", + "<2269>": "QBEPOPVIEWS", + "<2270>": "QBERESULTSACTIVE", + "<2271>": "QBERESULTSWIN", + "<2272>": "QBERUNIT", + "<2273>": "QBESORTORDER", + "<2274>": "QBESORTTABLE", + "<2275>": "QBETABLES", + "<2276>": "QBEVSPACEERROR", + "<2277>": "QBE_COMMONS", + "<2278>": "QBE_RESULTS_COLLECTOR", + "<2279>": "QBE_SAVE_QUERY", + "<2280>": "QBE_STARTUP", + "<2281>": "QBE_TABLES", + "<2282>": "QBF_VALIDATION", + "<2283>": "QMANAGER", + "<2284>": "QUALIFY.TABLE", + "<2285>": "QUALIFY_ORDER", + "<2286>": "QUERY", + "<2287>": "QUERY.SUB", + "<2288>": "QUICKDEX.MFS", + "<2289>": "QUICKDEXER", + "<2290>": "QUIT", + "<2291>": "RAISE", + "<2292>": "RB_LABEL_WIZARD", + "<2293>": "RB_PAGE_SETUP_EVENTS", + "<2294>": "RB_WIZARD", + "<2295>": "RCHAR_BASIC", + "<2296>": "RCHAR_CLEARFILE", + "<2297>": "RCHAR_CONVERT_PROG", + "<2298>": "RCHAR_COPY_PROGRAM", + "<2299>": "RCHAR_COPY_RECORD", + "<2300>": "RCHAR_CREATEFILE", + "<2301>": "RCHAR_DELETE_RECORD", + "<2302>": "RCHAR_ED", + "<2303>": "RCHAR_LISTU", + "<2304>": "RCHAR_LOGOFF", + "<2305>": "RCHAR_LOGTO", + "<2306>": "RCHAR_MAPNAME", + "<2307>": "RCHAR_QSELECT", + "<2308>": "RCHAR_SET_PRINTER", + "<2309>": "RCHAR_TAREST", + "<2310>": "RCHAR_TDUMP", + "<2311>": "RCHAR_TLOAD", + "<2312>": "RCHAR_TREAD", + "<2313>": "RCI_ENTRY", + "<2314>": "RDES", + "<2315>": "RDKCREATEAPPLICATION", + "<2316>": "RDKDDCONVDBPROCESS", + "<2317>": "RDKDDLOADDBPROCESS", + "<2318>": "RDKDEPLOYDEF", + "<2319>": "RDKEXTCREATEUSERREC", + "<2320>": "RDKEXTDATABASEINSTALLINFO", + "<2321>": "RDKEXTHIDEPROGRESS", + "<2322>": "RDKEXTINITSYSREPOS", + "<2323>": "RDKEXTPREPAPPLICATION", + "<2324>": "RDKEXTRACT", + "<2325>": "RDKEXTRACTALIAS", + "<2326>": "RDKEXTRACTDATABASE", + "<2327>": "RDKEXTRACTDOCBODY", + "<2328>": "RDKEXTRACTENTITIES", + "<2329>": "RDKEXTRACTOIBODY", + "<2330>": "RDKEXTRACTOIDICTFIELDS", + "<2331>": "RDKEXTRACTOSBODY", + "<2332>": "RDKEXTRACTPROCBODY", + "<2333>": "RDKEXTRACTREPOSBODY", + "<2334>": "RDKEXTSHOWIXPROGRESS", + "<2335>": "RDKEXTSHOWPROGRESS", + "<2336>": "RDKGETCLASSFROMHIERARCHY", + "<2337>": "RDKGETHIERARCHYCLASSES", + "<2338>": "RDKGETHIERARCHYENTITIES", + "<2339>": "RDKGETITEMSFROMLIST", + "<2340>": "RDKGETITEMSFROMREPOS", + "<2341>": "RDKGETTYPEFROMHIERARCHY", + "<2342>": "RDKINSTALL", + "<2343>": "RDKINSTALLER", + "<2344>": "RDKINSTALLINIT", + "<2345>": "RDKLOCATETYPE", + "<2346>": "RDKMAIN", + "<2347>": "RDKMODULEINSTALL", + "<2348>": "RDKREPVIEWEDIT", + "<2349>": "RDKTRANSLATETYPE", + "<2350>": "RDKTREEDELETE", + "<2351>": "RDKUPDATEDBT", + "<2352>": "RDKVADDALL", + "<2353>": "RDKVADDTOLIST", + "<2354>": "RDKVALIDATEEXTRACTPATH", + "<2355>": "RDKVGETVIEWNAMES", + "<2356>": "RDKVOPENVIEW", + "<2357>": "RDKVSAVERESULT", + "<2358>": "RDKV_SELBY_EVENTS", + "<2359>": "RDKV_SELUSING", + "<2360>": "RDK_CREATE_REPOSITORY", + "<2361>": "RDK_DEPLOY_OPTION", + "<2362>": "RDK_ERRORS", + "<2363>": "RDK_GASGAUGE", + "<2364>": "READ_COLUMN", + "<2365>": "READ_LOCK", + "<2366>": "READ_ROW", + "<2367>": "READ_SOURCE", + "<2368>": "REBUILDINDEX_SUB", + "<2369>": "REBUILD_SYSREPOS_INFO", + "<2370>": "REBUILD_SYSREPOS_IX", + "<2371>": "RECALC", + "<2372>": "RECEIVE_ANSWER", + "<2373>": "RECV", + "<2374>": "REDUCE", + "<2375>": "REFRESH_VSPRINTER", + "<2376>": "REGCLOSEKEY", + "<2377>": "REGCREATEKEYEX", + "<2378>": "REGISTERDOTNET", + "<2379>": "REGISTRY_METHOD", + "<2380>": "REGOPENKEYEX", + "<2381>": "REGQUERYVALUEEX", + "<2382>": "REGSETVALUEEX", + "<2383>": "RELATER", + "<2384>": "RELATION.SUB", + "<2385>": "RELEASEDC", + "<2386>": "RELEASEDLL", + "<2387>": "RELEASE_LOCK", + "<2388>": "REMAKETABLE", + "<2389>": "REMOVE.DELS", + "<2390>": "REMOVEDIRECTORY", + "<2391>": "REMOVEMENU", + "<2392>": "REMOVE_DELS", + "<2393>": "RENAME_TABLE", + "<2394>": "RENAME_VOLUME", + "<2395>": "REPLACE_TEST", + "<2396>": "REPORTER_TEST", + "<2397>": "REPOS...ACCESS", + "<2398>": "REPOS...ADDMODULE", + "<2399>": "REPOS...CHECKCOPYINIT", + "<2400>": "REPOS...CHECKIN", + "<2401>": "REPOS...CHECKIN_TRANS", + "<2402>": "REPOS...CHECKOUT", + "<2403>": "REPOS...CHECKOUT_TRANS", + "<2404>": "REPOS...CHECKWRAPUP", + "<2405>": "REPOS...CLEANSUB", + "<2406>": "REPOS...CLEANSUPER", + "<2407>": "REPOS...CLEARFLAG", + "<2408>": "REPOS...CLEARMODULE", + "<2409>": "REPOS...COMPILE", + "<2410>": "REPOS...COPY", + "<2411>": "REPOS...DESIGN", + "<2412>": "REPOS...DESIGNSUB", + "<2413>": "REPOS...DESTROY", + "<2414>": "REPOS...DSNACCESS", + "<2415>": "REPOS...DSNNEW", + "<2416>": "REPOS...DSNOPEN", + "<2417>": "REPOS...DSNOPENSUB", + "<2418>": "REPOS...EXECUTE", + "<2419>": "REPOS...FLAG", + "<2420>": "REPOS...GENSUBKEY", + "<2421>": "REPOS...GET", + "<2422>": "REPOS...GETACCESSPERMIT", + "<2423>": "REPOS...GETAPPID", + "<2424>": "REPOS...GETDESCRIPTION", + "<2425>": "REPOS...GETDOCUMENT", + "<2426>": "REPOS...GETDSN", + "<2427>": "REPOS...GETEVALUATE", + "<2428>": "REPOS...GETLASTUPDATE", + "<2429>": "REPOS...GETLOCATION", + "<2430>": "REPOS...GETLOGHISTORY", + "<2431>": "REPOS...GETLOGSTATE", + "<2432>": "REPOS...GETMODULE", + "<2433>": "REPOS...GETNEWTOKEN", + "<2434>": "REPOS...GETOSGENPREVIEWTYPE", + "<2435>": "REPOS...GETPOINTED", + "<2436>": "REPOS...GETPOINTER", + "<2437>": "REPOS...GETPUBLISHABLE", + "<2438>": "REPOS...GETRDKEXTRACTSPEC", + "<2439>": "REPOS...GETRDKEXTRACTTYPE", + "<2440>": "REPOS...GETRECOMPILE", + "<2441>": "REPOS...GETSCMFORMAT", + "<2442>": "REPOS...GETSCMFORMATTYPE", + "<2443>": "REPOS...GETSCMINCLUDE", + "<2444>": "REPOS...GETSCMINCLUDETYPE", + "<2445>": "REPOS...GETSHAREABLE", + "<2446>": "REPOS...GETSTATE", + "<2447>": "REPOS...GETSUB", + "<2448>": "REPOS...GETSUBKEY", + "<2449>": "REPOS...GETSUBKEY_TRANS", + "<2450>": "REPOS...GETSUPER", + "<2451>": "REPOS...GETSYSBUILD", + "<2452>": "REPOS...GETSYSPUBLISH", + "<2453>": "REPOS...GETTITLE", + "<2454>": "REPOS...GETUPDATEPERMIT", + "<2455>": "REPOS...GET_TRANS", + "<2456>": "REPOS...LOCK", + "<2457>": "REPOS...LOCK_TRANS", + "<2458>": "REPOS...NEW", + "<2459>": "REPOS...NEWREF", + "<2460>": "REPOS...POSTDESTROY", + "<2461>": "REPOS...POSTNEW", + "<2462>": "REPOS...POSTSET", + "<2463>": "REPOS...POSTSETPURGE", + "<2464>": "REPOS...POSTSETSYSBUILD", + "<2465>": "REPOS...POSTSETSYSPUBLISH", + "<2466>": "REPOS...POSTUPDATE", + "<2467>": "REPOS...POSTWRITE", + "<2468>": "REPOS...REMOVEMODULE", + "<2469>": "REPOS...SCMACCESS", + "<2470>": "REPOS...SCMCOMPILE", + "<2471>": "REPOS...SCMDESTROY", + "<2472>": "REPOS...SCMFORMAT", + "<2473>": "REPOS...SCMGETFORMAT", + "<2474>": "REPOS...SCMICONV", + "<2475>": "REPOS...SCMNEW", + "<2476>": "REPOS...SCMOCONV", + "<2477>": "REPOS...SCMWRITE", + "<2478>": "REPOS...SET", + "<2479>": "REPOS...SETACCESSPERMIT", + "<2480>": "REPOS...SETCOLUMNASSOC", + "<2481>": "REPOS...SETDESCRIPTION", + "<2482>": "REPOS...SETDOCUMENT", + "<2483>": "REPOS...SETMODULE", + "<2484>": "REPOS...SETPOINTED", + "<2485>": "REPOS...SETPUBLISHABLE", + "<2486>": "REPOS...SETPURGE", + "<2487>": "REPOS...SETRECOMPILE", + "<2488>": "REPOS...SETSHAREABLE", + "<2489>": "REPOS...SETSTATE", + "<2490>": "REPOS...SETSUB", + "<2491>": "REPOS...SETSUBKEY", + "<2492>": "REPOS...SETSUBKEY_TRANS", + "<2493>": "REPOS...SETSUPER", + "<2494>": "REPOS...SETSYSBUILD", + "<2495>": "REPOS...SETSYSPUBLISH", + "<2496>": "REPOS...SETTABLEASSOC", + "<2497>": "REPOS...SETTITLE", + "<2498>": "REPOS...SETUPDATEPERMIT", + "<2499>": "REPOS...TCOMPILE", + "<2500>": "REPOS...TCOPY", + "<2501>": "REPOS...TDESTROY", + "<2502>": "REPOS...UNLOCK", + "<2503>": "REPOS...UNLOCK_TRANS", + "<2504>": "REPOS...UPDATE", + "<2505>": "REPOS...WRITE", + "<2506>": "REPOS.APPNOTE..ACCESS", + "<2507>": "REPOS.APPNOTE..CHECKCOPYINIT", + "<2508>": "REPOS.APPNOTE..CHECKIN", + "<2509>": "REPOS.APPNOTE..CHECKIN_TRANS", + "<2510>": "REPOS.APPNOTE..CHECKOUT", + "<2511>": "REPOS.APPNOTE..CHECKOUT_TRANS", + "<2512>": "REPOS.APPNOTE..CHECKWRAPUP", + "<2513>": "REPOS.APPNOTE..COPY", + "<2514>": "REPOS.APPNOTE..DESTROY", + "<2515>": "REPOS.APPNOTE..EXECUTE", + "<2516>": "REPOS.APPNOTE..NEW", + "<2517>": "REPOS.APPNOTE..SCMACCESS", + "<2518>": "REPOS.APPNOTE..SCMICONV", + "<2519>": "REPOS.APPNOTE..SCMOCONV", + "<2520>": "REPOS.APPNOTE..UPDATE", + "<2521>": "REPOS.APPNOTE..WRITE", + "<2522>": "REPOS.APPROW..ACCESS", + "<2523>": "REPOS.APPROW..CHECKCOPYINIT", + "<2524>": "REPOS.APPROW..CHECKIN", + "<2525>": "REPOS.APPROW..CHECKIN_TRANS", + "<2526>": "REPOS.APPROW..CHECKOUT", + "<2527>": "REPOS.APPROW..CHECKOUT_TRANS", + "<2528>": "REPOS.APPROW..CHECKWRAPUP", + "<2529>": "REPOS.APPROW..COPY", + "<2530>": "REPOS.APPROW..DESTROY", + "<2531>": "REPOS.APPROW..GETLOCATION", + "<2532>": "REPOS.APPROW..GETRDKEXTRACTSPEC", + "<2533>": "REPOS.APPROW..LOCK", + "<2534>": "REPOS.APPROW..LOCK_TRANS", + "<2535>": "REPOS.APPROW..NEW", + "<2536>": "REPOS.APPROW..SCMCOMPILE", + "<2537>": "REPOS.APPROW..SCMWRITE", + "<2538>": "REPOS.APPROW..TDESTROY", + "<2539>": "REPOS.APPROW..UNLOCK", + "<2540>": "REPOS.APPROW..UNLOCK_TRANS", + "<2541>": "REPOS.APPROW..UPDATE", + "<2542>": "REPOS.APPROW..WRITE", + "<2543>": "REPOS.CODETEMPLATE..ACCESS", + "<2544>": "REPOS.CODETEMPLATE..CHECKCOPYINIT", + "<2545>": "REPOS.CODETEMPLATE..CHECKIN", + "<2546>": "REPOS.CODETEMPLATE..CHECKIN_TRANS", + "<2547>": "REPOS.CODETEMPLATE..CHECKOUT", + "<2548>": "REPOS.CODETEMPLATE..CHECKOUT_TRANS", + "<2549>": "REPOS.CODETEMPLATE..CHECKWRAPUP", + "<2550>": "REPOS.CODETEMPLATE..COPY", + "<2551>": "REPOS.CODETEMPLATE..DESIGN", + "<2552>": "REPOS.CODETEMPLATE..DESTROY", + "<2553>": "REPOS.CODETEMPLATE..NEW", + "<2554>": "REPOS.CODETEMPLATE..UPDATE", + "<2555>": "REPOS.CODETEMPLATE..WRITE", + "<2556>": "REPOS.CONFIG..ACCESS", + "<2557>": "REPOS.CONFIG..DESTROY", + "<2558>": "REPOS.CONFIG..WRITE", + "<2559>": "REPOS.CONTEXTMENU..ACCESS", + "<2560>": "REPOS.CONTEXTMENU..CHECKCOPYINIT", + "<2561>": "REPOS.CONTEXTMENU..CHECKIN", + "<2562>": "REPOS.CONTEXTMENU..CHECKIN_TRANS", + "<2563>": "REPOS.CONTEXTMENU..CHECKOUT", + "<2564>": "REPOS.CONTEXTMENU..CHECKOUT_TRANS", + "<2565>": "REPOS.CONTEXTMENU..CHECKWRAPUP", + "<2566>": "REPOS.CONTEXTMENU..COPY", + "<2567>": "REPOS.CONTEXTMENU..DESIGN", + "<2568>": "REPOS.CONTEXTMENU..DESTROY", + "<2569>": "REPOS.CONTEXTMENU..NEW", + "<2570>": "REPOS.CONTEXTMENU..SCMCOMPILE", + "<2571>": "REPOS.CONTEXTMENU..UPDATE", + "<2572>": "REPOS.CONTEXTMENU..WRITE", + "<2573>": "REPOS.DATASOURCE..ACCESS", + "<2574>": "REPOS.DATASOURCE..DESTROY", + "<2575>": "REPOS.DATASOURCE..WRITE", + "<2576>": "REPOS.DBCOLUMN..ACCESS", + "<2577>": "REPOS.DBCOLUMN..CHECKCOPYINIT", + "<2578>": "REPOS.DBCOLUMN..CHECKIN", + "<2579>": "REPOS.DBCOLUMN..CHECKIN_TRANS", + "<2580>": "REPOS.DBCOLUMN..CHECKOUT", + "<2581>": "REPOS.DBCOLUMN..CHECKOUT_TRANS", + "<2582>": "REPOS.DBCOLUMN..CHECKWRAPUP", + "<2583>": "REPOS.DBCOLUMN..COPY", + "<2584>": "REPOS.DBCOLUMN..DESTROY", + "<2585>": "REPOS.DBCOLUMN..LOCK", + "<2586>": "REPOS.DBCOLUMN..LOCK_TRANS", + "<2587>": "REPOS.DBCOLUMN..SETACCESSPERMIT", + "<2588>": "REPOS.DBCOLUMN..SETUPDATEPERMIT", + "<2589>": "REPOS.DBCOLUMN..UNLOCK", + "<2590>": "REPOS.DBCOLUMN..UNLOCK_TRANS", + "<2591>": "REPOS.DBCOLUMN..UPDATE", + "<2592>": "REPOS.DBCOLUMN..WRITE", + "<2593>": "REPOS.DBCOMPONENT..RESOLVESUBKEY", + "<2594>": "REPOS.DBCOMPONENT.DATASET.ACCESS", + "<2595>": "REPOS.DBCOMPONENT.DATASET.CHECKCOPYINIT", + "<2596>": "REPOS.DBCOMPONENT.DATASET.CHECKIN", + "<2597>": "REPOS.DBCOMPONENT.DATASET.CHECKOUT", + "<2598>": "REPOS.DBCOMPONENT.DATASET.CHECKOUT_TRANS", + "<2599>": "REPOS.DBCOMPONENT.DATASET.CHECKWRAPUP", + "<2600>": "REPOS.DBCOMPONENT.DATASET.COMPILE", + "<2601>": "REPOS.DBCOMPONENT.DATASET.DESIGN", + "<2602>": "REPOS.DBCOMPONENT.DATASET.DESTROY", + "<2603>": "REPOS.DBCOMPONENT.DATASET.WRITE", + "<2604>": "REPOS.DBCOMPONENTEXE.DATASET.CHECKCOPYINIT", + "<2605>": "REPOS.DBCOMPONENTEXE.DATASET.CHECKIN", + "<2606>": "REPOS.DBCOMPONENTEXE.DATASET.CHECKOUT", + "<2607>": "REPOS.DBCOMPONENTEXE.DATASET.CHECKOUT_TRANS", + "<2608>": "REPOS.DBCOMPONENTEXE.DATASET.CHECKWRAPUP", + "<2609>": "REPOS.DBCOMPONENTEXE.DATASET.DESIGN", + "<2610>": "REPOS.DBCOMPONENTEXE.DATASET.DESTROY", + "<2611>": "REPOS.DBITEM..RESOLVESUBKEY", + "<2612>": "REPOS.DBTABLE..ACCESS", + "<2613>": "REPOS.DBTABLE..CHECKCOPYINIT", + "<2614>": "REPOS.DBTABLE..CHECKIN", + "<2615>": "REPOS.DBTABLE..CHECKIN_TRANS", + "<2616>": "REPOS.DBTABLE..CHECKOUT", + "<2617>": "REPOS.DBTABLE..CHECKOUT_TRANS", + "<2618>": "REPOS.DBTABLE..CHECKWRAPUP", + "<2619>": "REPOS.DBTABLE..COPY", + "<2620>": "REPOS.DBTABLE..DESIGN", + "<2621>": "REPOS.DBTABLE..DESTROY", + "<2622>": "REPOS.DBTABLE..LOCK", + "<2623>": "REPOS.DBTABLE..LOCK_TRANS", + "<2624>": "REPOS.DBTABLE..NEW", + "<2625>": "REPOS.DBTABLE..SETACCESSPERMIT", + "<2626>": "REPOS.DBTABLE..SETUPDATEPERMIT", + "<2627>": "REPOS.DBTABLE..UNLOCK", + "<2628>": "REPOS.DBTABLE..UNLOCK_TRANS", + "<2629>": "REPOS.DBTABLE..WRITE", + "<2630>": "REPOS.DLL..CHECKCOPYINIT", + "<2631>": "REPOS.DLL..CHECKIN", + "<2632>": "REPOS.DLL..CHECKIN_TRANS", + "<2633>": "REPOS.DLL..CHECKOUT", + "<2634>": "REPOS.DLL..CHECKOUT_TRANS", + "<2635>": "REPOS.DLLPROTOTYPE..ACCESS", + "<2636>": "REPOS.DLLPROTOTYPE..CHECKCOPYINIT", + "<2637>": "REPOS.DLLPROTOTYPE..CHECKIN", + "<2638>": "REPOS.DLLPROTOTYPE..CHECKIN_TRANS", + "<2639>": "REPOS.DLLPROTOTYPE..CHECKOUT", + "<2640>": "REPOS.DLLPROTOTYPE..CHECKOUT_TRANS", + "<2641>": "REPOS.DLLPROTOTYPE..CHECKWRAPUP", + "<2642>": "REPOS.DLLPROTOTYPE..COMPILE", + "<2643>": "REPOS.DLLPROTOTYPE..COPY", + "<2644>": "REPOS.DLLPROTOTYPE..DESIGN", + "<2645>": "REPOS.DLLPROTOTYPE..DESTROY", + "<2646>": "REPOS.DLLPROTOTYPE..NEW", + "<2647>": "REPOS.DLLPROTOTYPE..TDESTROY", + "<2648>": "REPOS.DLLPROTOTYPE..UPDATE", + "<2649>": "REPOS.DLLPROTOTYPE..WRITE", + "<2650>": "REPOS.DLLSTRUCT..ACCESS", + "<2651>": "REPOS.DLLSTRUCT..CHECKCOPYINIT", + "<2652>": "REPOS.DLLSTRUCT..CHECKIN", + "<2653>": "REPOS.DLLSTRUCT..CHECKIN_TRANS", + "<2654>": "REPOS.DLLSTRUCT..CHECKOUT", + "<2655>": "REPOS.DLLSTRUCT..CHECKOUT_TRANS", + "<2656>": "REPOS.DLLSTRUCT..CHECKWRAPUP", + "<2657>": "REPOS.DLLSTRUCT..COPY", + "<2658>": "REPOS.DLLSTRUCT..DESIGN", + "<2659>": "REPOS.DLLSTRUCT..DESTROY", + "<2660>": "REPOS.DLLSTRUCT..NEW", + "<2661>": "REPOS.DLLSTRUCT..UPDATE", + "<2662>": "REPOS.DLLSTRUCT..WRITE", + "<2663>": "REPOS.DOC..ACCESS", + "<2664>": "REPOS.DOC..CHECKCOPYINIT", + "<2665>": "REPOS.DOC..CHECKIN", + "<2666>": "REPOS.DOC..CHECKIN_TRANS", + "<2667>": "REPOS.DOC..CHECKOUT", + "<2668>": "REPOS.DOC..CHECKOUT_TRANS", + "<2669>": "REPOS.DOC..DESIGN", + "<2670>": "REPOS.DOC..DESTROY", + "<2671>": "REPOS.DOC..EXECUTE", + "<2672>": "REPOS.DOC..GETHTML", + "<2673>": "REPOS.DOC..GETLASTUPDATE", + "<2674>": "REPOS.DOC..GETSCMFORMAT", + "<2675>": "REPOS.DOC..NEW", + "<2676>": "REPOS.DOC..SCMGETFORMAT", + "<2677>": "REPOS.DOC..WRITE", + "<2678>": "REPOS.FORM..ACCESS", + "<2679>": "REPOS.FORM..DESTROY", + "<2680>": "REPOS.FORM..WRITE", + "<2681>": "REPOS.GRAPH..ACCESS", + "<2682>": "REPOS.GRAPH..DESTROY", + "<2683>": "REPOS.GRAPH..WRITE", + "<2684>": "REPOS.GRAPHIC.FREELANCE.DESIGN", + "<2685>": "REPOS.IMAGE..ACCESS", + "<2686>": "REPOS.IMAGE..CHECKCOPYINIT", + "<2687>": "REPOS.IMAGE..CHECKIN", + "<2688>": "REPOS.IMAGE..CHECKIN_TRANS", + "<2689>": "REPOS.IMAGE..CHECKOUT", + "<2690>": "REPOS.IMAGE..CHECKOUT_TRANS", + "<2691>": "REPOS.IMAGE..DESIGN", + "<2692>": "REPOS.IMAGE..GETLASTUPDATE", + "<2693>": "REPOS.IMAGE..NEW", + "<2694>": "REPOS.IMAGE..NEWREF", + "<2695>": "REPOS.IMAGE..UPDATE", + "<2696>": "REPOS.IMAGE..WRITE", + "<2697>": "REPOS.IMAGELIST..ACCESS", + "<2698>": "REPOS.IMAGELIST..CHECKCOPYINIT", + "<2699>": "REPOS.IMAGELIST..CHECKIN", + "<2700>": "REPOS.IMAGELIST..CHECKIN_TRANS", + "<2701>": "REPOS.IMAGELIST..CHECKOUT", + "<2702>": "REPOS.IMAGELIST..CHECKOUT_TRANS", + "<2703>": "REPOS.IMAGELIST..DESIGN", + "<2704>": "REPOS.IMAGELIST..GETLASTUPDATE", + "<2705>": "REPOS.IMAGELIST..NEW", + "<2706>": "REPOS.IMAGELIST..NEWREF", + "<2707>": "REPOS.IMAGELIST..UPDATE", + "<2708>": "REPOS.IMAGELIST..WRITE", + "<2709>": "REPOS.MENU..ACCESS", + "<2710>": "REPOS.MENU..DESTROY", + "<2711>": "REPOS.MENU..WRITE", + "<2712>": "REPOS.MESSAGE..ACCESS", + "<2713>": "REPOS.MESSAGE..DESTROY", + "<2714>": "REPOS.MESSAGE..WRITE", + "<2715>": "REPOS.MMEDIA..DESIGN", + "<2716>": "REPOS.MMEDIA..EXECUTE", + "<2717>": "REPOS.MMEDIA.AUDIO.EXECUTE", + "<2718>": "REPOS.MMEDIA.WAVE.EXECUTE", + "<2719>": "REPOS.MSG..ACCESS", + "<2720>": "REPOS.MSG..CHECKCOPYINIT", + "<2721>": "REPOS.MSG..CHECKIN", + "<2722>": "REPOS.MSG..CHECKIN_TRANS", + "<2723>": "REPOS.MSG..CHECKOUT", + "<2724>": "REPOS.MSG..CHECKOUT_TRANS", + "<2725>": "REPOS.MSG..CHECKWRAPUP", + "<2726>": "REPOS.MSG..COPY", + "<2727>": "REPOS.MSG..DESIGN", + "<2728>": "REPOS.MSG..DESTROY", + "<2729>": "REPOS.MSG..EXECUTE", + "<2730>": "REPOS.MSG..NEW", + "<2731>": "REPOS.MSG..SCMACCESS", + "<2732>": "REPOS.MSG..SCMCOMPILE", + "<2733>": "REPOS.MSG..SCMICONV", + "<2734>": "REPOS.MSG..SCMOCONV", + "<2735>": "REPOS.MSG..UPDATE", + "<2736>": "REPOS.MSG..WRITE", + "<2737>": "REPOS.O4W..ACCESS", + "<2738>": "REPOS.O4W..DESTROY", + "<2739>": "REPOS.O4W..NEW", + "<2740>": "REPOS.O4W..WRITE", + "<2741>": "REPOS.OIEVENT..ACCESS", + "<2742>": "REPOS.OIEVENT..CHECKCOPYINIT", + "<2743>": "REPOS.OIEVENT..CHECKIN", + "<2744>": "REPOS.OIEVENT..CHECKIN_TRANS", + "<2745>": "REPOS.OIEVENT..CHECKOUT", + "<2746>": "REPOS.OIEVENT..CHECKOUT_TRANS", + "<2747>": "REPOS.OIEVENT..CHECKSYNTAX", + "<2748>": "REPOS.OIEVENT..CHECKWRAPUP", + "<2749>": "REPOS.OIEVENT..COMPILE", + "<2750>": "REPOS.OIEVENT..COPY", + "<2751>": "REPOS.OIEVENT..DESTROY", + "<2752>": "REPOS.OIEVENT..NEW", + "<2753>": "REPOS.OIEVENT..SCMACCESS", + "<2754>": "REPOS.OIEVENT..TCOMPILE", + "<2755>": "REPOS.OIEVENT..UPDATE", + "<2756>": "REPOS.OIEVENT..WRITE", + "<2757>": "REPOS.OIEVENTDBG..CHECKCOPYINIT", + "<2758>": "REPOS.OIEVENTDBG..CHECKIN", + "<2759>": "REPOS.OIEVENTDBG..CHECKIN_TRANS", + "<2760>": "REPOS.OIEVENTDBG..CHECKOUT", + "<2761>": "REPOS.OIEVENTDBG..CHECKOUT_TRANS", + "<2762>": "REPOS.OIEVENTDBG..CHECKWRAPUP", + "<2763>": "REPOS.OIEVENTDBG..COPY", + "<2764>": "REPOS.OIEVENTEXE..ACCESS", + "<2765>": "REPOS.OIEVENTEXE..CHECKCOPYINIT", + "<2766>": "REPOS.OIEVENTEXE..CHECKIN", + "<2767>": "REPOS.OIEVENTEXE..CHECKIN_TRANS", + "<2768>": "REPOS.OIEVENTEXE..CHECKOUT", + "<2769>": "REPOS.OIEVENTEXE..CHECKOUT_TRANS", + "<2770>": "REPOS.OIEVENTEXE..CHECKWRAPUP", + "<2771>": "REPOS.OIEVENTEXE..COPY", + "<2772>": "REPOS.OIEVENTEXE..DESTROY", + "<2773>": "REPOS.OIEVENTEXE..TCOPY", + "<2774>": "REPOS.OIREPORT..ACCESS", + "<2775>": "REPOS.OIREPORT..CHECKCOPYINIT", + "<2776>": "REPOS.OIREPORT..CHECKIN", + "<2777>": "REPOS.OIREPORT..CHECKIN_TRANS", + "<2778>": "REPOS.OIREPORT..CHECKOUT", + "<2779>": "REPOS.OIREPORT..CHECKOUT_TRANS", + "<2780>": "REPOS.OIREPORT..CHECKWRAPUP", + "<2781>": "REPOS.OIREPORT..DESTROY", + "<2782>": "REPOS.OIREPORT..NEW", + "<2783>": "REPOS.OIREPORT..UPDATE", + "<2784>": "REPOS.OIREPORT..WRITE", + "<2785>": "REPOS.OIREPORT.BRWLAYOUT.DESIGN", + "<2786>": "REPOS.OIREPORT.BRWLAYOUT.EXECUTE", + "<2787>": "REPOS.OIREPORT.OIBRW.DESIGN", + "<2788>": "REPOS.OIREPORT.OIBRW.EXECUTE", + "<2789>": "REPOS.OIREPORT.RBAND.EXECUTE", + "<2790>": "REPOS.OIREPORT.RBLABEL.DESIGN", + "<2791>": "REPOS.OIREPORT.RBLABEL.EXECUTE", + "<2792>": "REPOS.OIREPORT.RBLAYOUT.DESIGN", + "<2793>": "REPOS.OIREPORT.RBLAYOUT.EXECUTE", + "<2794>": "REPOS.OIREPORT.RDLAYOUT.DESIGN", + "<2795>": "REPOS.OIREPORT.RDLAYOUT.EXECUTE", + "<2796>": "REPOS.OIWIN..ACCESS", + "<2797>": "REPOS.OIWIN..CHECKCOPYINIT", + "<2798>": "REPOS.OIWIN..CHECKIN", + "<2799>": "REPOS.OIWIN..CHECKIN_TRANS", + "<2800>": "REPOS.OIWIN..CHECKOUT", + "<2801>": "REPOS.OIWIN..CHECKOUT_TRANS", + "<2802>": "REPOS.OIWIN..CHECKWRAPUP", + "<2803>": "REPOS.OIWIN..COMPILE", + "<2804>": "REPOS.OIWIN..COPY", + "<2805>": "REPOS.OIWIN..DESTROY", + "<2806>": "REPOS.OIWIN..EXECUTE", + "<2807>": "REPOS.OIWIN..NEW", + "<2808>": "REPOS.OIWIN..RENAME", + "<2809>": "REPOS.OIWIN..SCMCOMPILE", + "<2810>": "REPOS.OIWIN..SCMDESTROY", + "<2811>": "REPOS.OIWIN..SETPURGE", + "<2812>": "REPOS.OIWIN..TCOMPILE", + "<2813>": "REPOS.OIWIN..TCOPY", + "<2814>": "REPOS.OIWIN..TDESTROY", + "<2815>": "REPOS.OIWIN..UPDATE", + "<2816>": "REPOS.OIWIN..WRITE", + "<2817>": "REPOS.OIWINEXE..ACCESS", + "<2818>": "REPOS.OIWINEXE..CHECKCOPYINIT", + "<2819>": "REPOS.OIWINEXE..CHECKIN", + "<2820>": "REPOS.OIWINEXE..CHECKIN_TRANS", + "<2821>": "REPOS.OIWINEXE..CHECKOUT", + "<2822>": "REPOS.OIWINEXE..CHECKOUT_TRANS", + "<2823>": "REPOS.OIWINEXE..CHECKWRAPUP", + "<2824>": "REPOS.OIWINEXE..COPY", + "<2825>": "REPOS.OIWINEXE..DESTROY", + "<2826>": "REPOS.OIWINEXE..EXECUTE", + "<2827>": "REPOS.OIWINEXE..NEW", + "<2828>": "REPOS.OIWINEXE..TCOPY", + "<2829>": "REPOS.OIWINEXE..TDESTROY", + "<2830>": "REPOS.OIWINEXE..WRITE", + "<2831>": "REPOS.OLECONTROL..ACCESS", + "<2832>": "REPOS.OLECONTROL..CHECKCOPYINIT", + "<2833>": "REPOS.OLECONTROL..CHECKIN", + "<2834>": "REPOS.OLECONTROL..CHECKIN_TRANS", + "<2835>": "REPOS.OLECONTROL..CHECKOUT", + "<2836>": "REPOS.OLECONTROL..CHECKOUT_TRANS", + "<2837>": "REPOS.OLECONTROL..CHECKWRAPUP", + "<2838>": "REPOS.OLECONTROL..COPY", + "<2839>": "REPOS.OLECONTROL..DESIGN", + "<2840>": "REPOS.OLECONTROL..DESTROY", + "<2841>": "REPOS.OLECONTROL..NEW", + "<2842>": "REPOS.OLECONTROL..UPDATE", + "<2843>": "REPOS.OLECONTROL..WRITE", + "<2844>": "REPOS.OPROC..ACCESS", + "<2845>": "REPOS.OPROC..COMPILE", + "<2846>": "REPOS.OPROC..DESTROY", + "<2847>": "REPOS.OPROC..NEW", + "<2848>": "REPOS.OPROC..WRITE", + "<2849>": "REPOS.OPROCEXE..ACCESS", + "<2850>": "REPOS.OPROCEXE..DESTROY", + "<2851>": "REPOS.OPROCEXE..NEW", + "<2852>": "REPOS.OPROCEXE..WRITE", + "<2853>": "REPOS.OSFILE..CHECKCOPYINIT", + "<2854>": "REPOS.OSFILE..CHECKIN", + "<2855>": "REPOS.OSFILE..CHECKIN_TRANS", + "<2856>": "REPOS.OSFILE..CHECKOUT", + "<2857>": "REPOS.OSFILE..CHECKOUT_TRANS", + "<2858>": "REPOS.POPUP..ACCESS", + "<2859>": "REPOS.POPUP..CHECKCOPYINIT", + "<2860>": "REPOS.POPUP..CHECKIN", + "<2861>": "REPOS.POPUP..CHECKIN_TRANS", + "<2862>": "REPOS.POPUP..CHECKOUT", + "<2863>": "REPOS.POPUP..CHECKOUT_TRANS", + "<2864>": "REPOS.POPUP..CHECKWRAPUP", + "<2865>": "REPOS.POPUP..COPY", + "<2866>": "REPOS.POPUP..DESIGN", + "<2867>": "REPOS.POPUP..DESTROY", + "<2868>": "REPOS.POPUP..EXECUTE", + "<2869>": "REPOS.POPUP..NEW", + "<2870>": "REPOS.POPUP..SCMACCESS", + "<2871>": "REPOS.POPUP..SCMCOMPILE", + "<2872>": "REPOS.POPUP..SCMICONV", + "<2873>": "REPOS.POPUP..SCMOCONV", + "<2874>": "REPOS.POPUP..UPDATE", + "<2875>": "REPOS.POPUP..WRITE", + "<2876>": "REPOS.PROMOTEDEVENT..ACCESS", + "<2877>": "REPOS.PROMOTEDEVENT..CHECKCOPYINIT", + "<2878>": "REPOS.PROMOTEDEVENT..CHECKIN", + "<2879>": "REPOS.PROMOTEDEVENT..CHECKIN_TRANS", + "<2880>": "REPOS.PROMOTEDEVENT..CHECKOUT", + "<2881>": "REPOS.PROMOTEDEVENT..CHECKOUT_TRANS", + "<2882>": "REPOS.PROMOTEDEVENT..CHECKSYNTAX", + "<2883>": "REPOS.PROMOTEDEVENT..CHECKWRAPUP", + "<2884>": "REPOS.PROMOTEDEVENT..COMPILE", + "<2885>": "REPOS.PROMOTEDEVENT..COPY", + "<2886>": "REPOS.PROMOTEDEVENT..DESIGN", + "<2887>": "REPOS.PROMOTEDEVENT..DESTROY", + "<2888>": "REPOS.PROMOTEDEVENT..GENSUBKEY", + "<2889>": "REPOS.PROMOTEDEVENT..NEW", + "<2890>": "REPOS.PROMOTEDEVENT..SCMACCESS", + "<2891>": "REPOS.PROMOTEDEVENT..SCMDESTROY", + "<2892>": "REPOS.PROMOTEDEVENT..TCOMPILE", + "<2893>": "REPOS.PROMOTEDEVENT..UPDATE", + "<2894>": "REPOS.PROMOTEDEVENT..WRITE", + "<2895>": "REPOS.PROMOTEDEVENTDBG..ACCESS", + "<2896>": "REPOS.PROMOTEDEVENTDBG..CHECKCOPYINIT", + "<2897>": "REPOS.PROMOTEDEVENTDBG..CHECKIN", + "<2898>": "REPOS.PROMOTEDEVENTDBG..CHECKIN_TRANS", + "<2899>": "REPOS.PROMOTEDEVENTDBG..CHECKOUT", + "<2900>": "REPOS.PROMOTEDEVENTDBG..CHECKOUT_TRANS", + "<2901>": "REPOS.PROMOTEDEVENTDBG..CHECKWRAPUP", + "<2902>": "REPOS.PROMOTEDEVENTDBG..COPY", + "<2903>": "REPOS.PROMOTEDEVENTDBG..DESTROY", + "<2904>": "REPOS.PROMOTEDEVENTDBG..GENSUBKEY", + "<2905>": "REPOS.PROMOTEDEVENTDBG..NEW", + "<2906>": "REPOS.PROMOTEDEVENTDBG..UPDATE", + "<2907>": "REPOS.PROMOTEDEVENTDBG..WRITE", + "<2908>": "REPOS.PROMOTEDEVENTEXE..ACCESS", + "<2909>": "REPOS.PROMOTEDEVENTEXE..CHECKCOPYINIT", + "<2910>": "REPOS.PROMOTEDEVENTEXE..CHECKIN", + "<2911>": "REPOS.PROMOTEDEVENTEXE..CHECKIN_TRANS", + "<2912>": "REPOS.PROMOTEDEVENTEXE..CHECKOUT", + "<2913>": "REPOS.PROMOTEDEVENTEXE..CHECKOUT_TRANS", + "<2914>": "REPOS.PROMOTEDEVENTEXE..CHECKWRAPUP", + "<2915>": "REPOS.PROMOTEDEVENTEXE..COPY", + "<2916>": "REPOS.PROMOTEDEVENTEXE..DESTROY", + "<2917>": "REPOS.PROMOTEDEVENTEXE..GENSUBKEY", + "<2918>": "REPOS.PROMOTEDEVENTEXE..NEW", + "<2919>": "REPOS.PROMOTEDEVENTEXE..TCOPY", + "<2920>": "REPOS.PROMOTEDEVENTEXE..TDESTROY", + "<2921>": "REPOS.PROMOTEDEVENTEXE..UPDATE", + "<2922>": "REPOS.PROMOTEDEVENTEXE..WRITE", + "<2923>": "REPOS.REPCLASS..ACCESS", + "<2924>": "REPOS.REPCLASS..CHECKCOPYINIT", + "<2925>": "REPOS.REPCLASS..CHECKIN", + "<2926>": "REPOS.REPCLASS..CHECKIN_TRANS", + "<2927>": "REPOS.REPCLASS..CHECKOUT", + "<2928>": "REPOS.REPCLASS..CHECKOUT_TRANS", + "<2929>": "REPOS.REPCLASS..CHECKWRAPUP", + "<2930>": "REPOS.REPCLASS..COPY", + "<2931>": "REPOS.REPCLASS..DESIGN", + "<2932>": "REPOS.REPCLASS..DESTROY", + "<2933>": "REPOS.REPCLASS..NEW", + "<2934>": "REPOS.REPCLASS..UPDATE", + "<2935>": "REPOS.REPCLASS..WRITE", + "<2936>": "REPOS.REPFAMILY..ACCESS", + "<2937>": "REPOS.REPFAMILY..CHECKCOPYINIT", + "<2938>": "REPOS.REPFAMILY..CHECKIN", + "<2939>": "REPOS.REPFAMILY..CHECKIN_TRANS", + "<2940>": "REPOS.REPFAMILY..CHECKOUT", + "<2941>": "REPOS.REPFAMILY..CHECKOUT_TRANS", + "<2942>": "REPOS.REPFAMILY..CHECKWRAPUP", + "<2943>": "REPOS.REPFAMILY..COPY", + "<2944>": "REPOS.REPFAMILY..DESIGN", + "<2945>": "REPOS.REPFAMILY..DESTROY", + "<2946>": "REPOS.REPFAMILY..NEW", + "<2947>": "REPOS.REPFAMILY..UPDATE", + "<2948>": "REPOS.REPFAMILY..WRITE", + "<2949>": "REPOS.REPFILTER..ACCESS", + "<2950>": "REPOS.REPFILTER..CHECKCOPYINIT", + "<2951>": "REPOS.REPFILTER..CHECKIN", + "<2952>": "REPOS.REPFILTER..CHECKIN_TRANS", + "<2953>": "REPOS.REPFILTER..CHECKOUT", + "<2954>": "REPOS.REPFILTER..CHECKOUT_TRANS", + "<2955>": "REPOS.REPFILTER..CHECKWRAPUP", + "<2956>": "REPOS.REPFILTER..COPY", + "<2957>": "REPOS.REPFILTER..DESIGN", + "<2958>": "REPOS.REPFILTER..DESTROY", + "<2959>": "REPOS.REPFILTER..EXECUTE", + "<2960>": "REPOS.REPFILTER..NEW", + "<2961>": "REPOS.REPFILTER..UPDATE", + "<2962>": "REPOS.REPFILTER..WRITE", + "<2963>": "REPOS.REPORT..ACCESS", + "<2964>": "REPOS.REPORT..DESTROY", + "<2965>": "REPOS.REPORT..WRITE", + "<2966>": "REPOS.REPRELEASE..ACCESS", + "<2967>": "REPOS.REPRELEASE..CHECKCOPYINIT", + "<2968>": "REPOS.REPRELEASE..CHECKIN", + "<2969>": "REPOS.REPRELEASE..CHECKIN_TRANS", + "<2970>": "REPOS.REPRELEASE..CHECKOUT", + "<2971>": "REPOS.REPRELEASE..CHECKOUT_TRANS", + "<2972>": "REPOS.REPRELEASE..CHECKWRAPUP", + "<2973>": "REPOS.REPRELEASE..COPY", + "<2974>": "REPOS.REPRELEASE..DESIGN", + "<2975>": "REPOS.REPRELEASE..DESTROY", + "<2976>": "REPOS.REPRELEASE..NEW", + "<2977>": "REPOS.REPRELEASE..UPDATE", + "<2978>": "REPOS.REPRELEASE..WRITE", + "<2979>": "REPOS.REPTYPE..ACCESS", + "<2980>": "REPOS.REPTYPE..CHECKCOPYINIT", + "<2981>": "REPOS.REPTYPE..CHECKIN", + "<2982>": "REPOS.REPTYPE..CHECKIN_TRANS", + "<2983>": "REPOS.REPTYPE..CHECKOUT", + "<2984>": "REPOS.REPTYPE..CHECKOUT_TRANS", + "<2985>": "REPOS.REPTYPE..CHECKWRAPUP", + "<2986>": "REPOS.REPTYPE..COPY", + "<2987>": "REPOS.REPTYPE..DESIGN", + "<2988>": "REPOS.REPTYPE..DESTROY", + "<2989>": "REPOS.REPTYPE..NEW", + "<2990>": "REPOS.REPTYPE..UPDATE", + "<2991>": "REPOS.REPTYPE..WRITE", + "<2992>": "REPOS.REPVIEW..ACCESS", + "<2993>": "REPOS.REPVIEW..CHECKCOPYINIT", + "<2994>": "REPOS.REPVIEW..CHECKIN", + "<2995>": "REPOS.REPVIEW..CHECKIN_TRANS", + "<2996>": "REPOS.REPVIEW..CHECKOUT", + "<2997>": "REPOS.REPVIEW..CHECKOUT_TRANS", + "<2998>": "REPOS.REPVIEW..CHECKWRAPUP", + "<2999>": "REPOS.REPVIEW..COPY", + "<3000>": "REPOS.REPVIEW..DESIGN", + "<3001>": "REPOS.REPVIEW..DESTROY", + "<3002>": "REPOS.REPVIEW..NEW", + "<3003>": "REPOS.REPVIEW..UPDATE", + "<3004>": "REPOS.REPVIEW..WRITE", + "<3005>": "REPOS.REST..ACCESS", + "<3006>": "REPOS.REST..DESTROY", + "<3007>": "REPOS.REST..NEW", + "<3008>": "REPOS.REST..WRITE", + "<3009>": "REPOS.STPROC..ACCESS", + "<3010>": "REPOS.STPROC..CHECKCOPYINIT", + "<3011>": "REPOS.STPROC..CHECKIN", + "<3012>": "REPOS.STPROC..CHECKIN_TRANS", + "<3013>": "REPOS.STPROC..CHECKOUT", + "<3014>": "REPOS.STPROC..CHECKOUT_TRANS", + "<3015>": "REPOS.STPROC..CHECKWRAPUP", + "<3016>": "REPOS.STPROC..COMPILE", + "<3017>": "REPOS.STPROC..COPY", + "<3018>": "REPOS.STPROC..DESTROY", + "<3019>": "REPOS.STPROC..EXECUTE", + "<3020>": "REPOS.STPROC..LOCK", + "<3021>": "REPOS.STPROC..LOCK_TRANS", + "<3022>": "REPOS.STPROC..NEW", + "<3023>": "REPOS.STPROC..PREWRITE", + "<3024>": "REPOS.STPROC..SCMACCESS", + "<3025>": "REPOS.STPROC..SCMCOMPILE", + "<3026>": "REPOS.STPROC..SCMDESTROY", + "<3027>": "REPOS.STPROC..SCMFORMAT", + "<3028>": "REPOS.STPROC..UNLOCK", + "<3029>": "REPOS.STPROC..UNLOCK_TRANS", + "<3030>": "REPOS.STPROC..UPDATE", + "<3031>": "REPOS.STPROC..WRITE", + "<3032>": "REPOS.STPROC..WRITE_072910", + "<3033>": "REPOS.STPROCDBG..ACCESS", + "<3034>": "REPOS.STPROCDBG..CHECKCOPYINIT", + "<3035>": "REPOS.STPROCDBG..CHECKIN", + "<3036>": "REPOS.STPROCDBG..CHECKIN_TRANS", + "<3037>": "REPOS.STPROCDBG..CHECKOUT", + "<3038>": "REPOS.STPROCDBG..CHECKOUT_TRANS", + "<3039>": "REPOS.STPROCDBG..CHECKWRAPUP", + "<3040>": "REPOS.STPROCDBG..COPY", + "<3041>": "REPOS.STPROCDBG..DESTROY", + "<3042>": "REPOS.STPROCDBG..NEW", + "<3043>": "REPOS.STPROCDBG..UPDATE", + "<3044>": "REPOS.STPROCDBG..WRITE", + "<3045>": "REPOS.STPROCEXE..ACCESS", + "<3046>": "REPOS.STPROCEXE..CHECKCOPYINIT", + "<3047>": "REPOS.STPROCEXE..CHECKIN", + "<3048>": "REPOS.STPROCEXE..CHECKIN_TRANS", + "<3049>": "REPOS.STPROCEXE..CHECKOUT", + "<3050>": "REPOS.STPROCEXE..CHECKOUT_TRANS", + "<3051>": "REPOS.STPROCEXE..CHECKWRAPUP", + "<3052>": "REPOS.STPROCEXE..COPY", + "<3053>": "REPOS.STPROCEXE..DESTROY", + "<3054>": "REPOS.STPROCEXE..EXECUTE", + "<3055>": "REPOS.STPROCEXE..NEW", + "<3056>": "REPOS.STPROCEXE..TCOPY", + "<3057>": "REPOS.STPROCEXE..TDESTROY", + "<3058>": "REPOS.STPROCEXE..UPDATE", + "<3059>": "REPOS.STPROCEXE..WRITE", + "<3060>": "REPOS.STPROCEXE..WRITE_080510", + "<3061>": "REPOS.STPROCINS..ACCESS", + "<3062>": "REPOS.STPROCINS..CHECKCOPYINIT", + "<3063>": "REPOS.STPROCINS..CHECKIN", + "<3064>": "REPOS.STPROCINS..CHECKIN_TRANS", + "<3065>": "REPOS.STPROCINS..CHECKOUT", + "<3066>": "REPOS.STPROCINS..CHECKOUT_TRANS", + "<3067>": "REPOS.STPROCINS..CHECKWRAPUP", + "<3068>": "REPOS.STPROCINS..COMPILE", + "<3069>": "REPOS.STPROCINS..COPY", + "<3070>": "REPOS.STPROCINS..DESTROY", + "<3071>": "REPOS.STPROCINS..LOCK", + "<3072>": "REPOS.STPROCINS..LOCK_TRANS", + "<3073>": "REPOS.STPROCINS..NEW", + "<3074>": "REPOS.STPROCINS..SCMACCESS", + "<3075>": "REPOS.STPROCINS..SCMCOMPILE", + "<3076>": "REPOS.STPROCINS..SCMFORMAT", + "<3077>": "REPOS.STPROCINS..TCOMPILE", + "<3078>": "REPOS.STPROCINS..UNLOCK", + "<3079>": "REPOS.STPROCINS..UNLOCK_TRANS", + "<3080>": "REPOS.STPROCINS..UPDATE", + "<3081>": "REPOS.STPROCINS..WRITE", + "<3082>": "REPOS.TOOLBAR..ACCESS", + "<3083>": "REPOS.TOOLBAR..CHECKCOPYINIT", + "<3084>": "REPOS.TOOLBAR..CHECKIN", + "<3085>": "REPOS.TOOLBAR..CHECKIN_TRANS", + "<3086>": "REPOS.TOOLBAR..CHECKOUT", + "<3087>": "REPOS.TOOLBAR..CHECKOUT_TRANS", + "<3088>": "REPOS.TOOLBAR..CHECKWRAPUP", + "<3089>": "REPOS.TOOLBAR..COPY", + "<3090>": "REPOS.TOOLBAR..DESIGN", + "<3091>": "REPOS.TOOLBAR..DESTROY", + "<3092>": "REPOS.TOOLBAR..NEW", + "<3093>": "REPOS.TOOLBAR..UPDATE", + "<3094>": "REPOS.TOOLBAR..WRITE", + "<3095>": "REPOS.UINFO..ACCESS", + "<3096>": "REPOS.UINFO..DESTROY", + "<3097>": "REPOS.UINFO..WRITE", + "<3098>": "REPOS.WINEXE..CHECKCOPYINIT", + "<3099>": "REPOS.WINEXE..CHECKIN", + "<3100>": "REPOS.WINEXE..CHECKIN_TRANS", + "<3101>": "REPOS.WINEXE..CHECKOUT", + "<3102>": "REPOS.WINEXE..CHECKOUT_TRANS", + "<3103>": "REPOS.WINEXE..EXECUTE", + "<3104>": "REPOS.WINHELP..CHECKCOPYINIT", + "<3105>": "REPOS.WINHELP..CHECKIN", + "<3106>": "REPOS.WINHELP..CHECKIN_TRANS", + "<3107>": "REPOS.WINHELP..CHECKOUT", + "<3108>": "REPOS.WINHELP..CHECKOUT_TRANS", + "<3109>": "REPOS.WINHELP..EXECUTE", + "<3110>": "REPOS.XML..DESTROY", + "<3111>": "REPOS.XML..WRITE", + "<3112>": "REPOS.XML.EXPORT.DESIGN", + "<3113>": "REPOS.XML.EXPORT.EXECUTE", + "<3114>": "REPOS.XML.IMPORT.DESIGN", + "<3115>": "REPOS.XML.IMPORT.EXECUTE", + "<3116>": "REPOSITORY", + "<3117>": "REPOSIX_ACCUM", + "<3118>": "REPOSIX_BUILD", + "<3119>": "REPOSIX_CONTROL", + "<3120>": "REPOSIX_DELETE", + "<3121>": "REPOSIX_INSERT", + "<3122>": "REPOSIX_REMOVE", + "<3123>": "REPOSIX_VALIDINC", + "<3124>": "REPOSIX_WRITE", + "<3125>": "REPOS_ATTACH_TRANS", + "<3126>": "REPOS_BFS", + "<3127>": "REPOS_CHECKFORMAT", + "<3128>": "REPOS_CHECKIN", + "<3129>": "REPOS_CHECKOUT", + "<3130>": "REPOS_CODETEMPLATE", + "<3131>": "REPOS_CONTEXTMENU", + "<3132>": "REPOS_CONTEXTMENU_HOOK", + "<3133>": "REPOS_CREATE_REPOSITORY", + "<3134>": "REPOS_DETACH_TRANS", + "<3135>": "REPOS_DLLPROTOTYPE", + "<3136>": "REPOS_DLLPROTOTYPE_HOOK", + "<3137>": "REPOS_DLLSTRUCT", + "<3138>": "REPOS_DLLSTRUCT_HOOK", + "<3139>": "REPOS_DOC", + "<3140>": "REPOS_DOC_HOOK", + "<3141>": "REPOS_FILTER", + "<3142>": "REPOS_FORWARD", + "<3143>": "REPOS_GETCHECKINFO", + "<3144>": "REPOS_GETCHECKINFO_TRANS", + "<3145>": "REPOS_GET_ALL_TYPES", + "<3146>": "REPOS_GET_CHECKOUTS", + "<3147>": "REPOS_GET_CHECKOUTS_TRANS", + "<3148>": "REPOS_GET_HEAD_STATE", + "<3149>": "REPOS_GET_HEAD_STATE_TRANS", + "<3150>": "REPOS_HANDLE_OPROC", + "<3151>": "REPOS_HANDLE_TYPES", + "<3152>": "REPOS_IMAGE", + "<3153>": "REPOS_IMAGELIST", + "<3154>": "REPOS_IMAGELIST_HOOK", + "<3155>": "REPOS_IMAGE_HOOK", + "<3156>": "REPOS_IMGRESDLL", + "<3157>": "REPOS_IMGRESDLL_HOOK", + "<3158>": "REPOS_INVERT_DELETE", + "<3159>": "REPOS_INVERT_WRITE", + "<3160>": "REPOS_OLECONTROL", + "<3161>": "REPOS_OLECONTROL_HOOK", + "<3162>": "REPOS_PROMOTEDEVENT", + "<3163>": "REPOS_PROMOTEDEVENTDBG", + "<3164>": "REPOS_PROMOTEDEVENTDBG_HOOK", + "<3165>": "REPOS_PROMOTEDEVENTEXE", + "<3166>": "REPOS_PROMOTEDEVENTEXE_HOOK", + "<3167>": "REPOS_PROMOTEDEVENT_HOOK", + "<3168>": "REPOS_REPCLASS", + "<3169>": "REPOS_REPCLASS_HOOK", + "<3170>": "REPOS_REPFAMILY", + "<3171>": "REPOS_REPFAMILY_HOOK", + "<3172>": "REPOS_REPFILTER", + "<3173>": "REPOS_REPFILTER_HOOK", + "<3174>": "REPOS_REPRELEASE", + "<3175>": "REPOS_REPRELEASE_HOOK", + "<3176>": "REPOS_REPTYPE", + "<3177>": "REPOS_REPTYPE_HOOK", + "<3178>": "REPOS_REPVIEW", + "<3179>": "REPOS_REPVIEW_HOOK", + "<3180>": "REPOS_RESOLVE_ENTITY", + "<3181>": "REPOS_RESOLVE_ENTITY_TRANS", + "<3182>": "REPOS_RESOLVE_REFERENCES", + "<3183>": "REPOS_ROWID_TO_ENTID", + "<3184>": "REPOS_SCMICONV", + "<3185>": "REPOS_SCMICONV_DYNREPLACE", + "<3186>": "REPOS_SCMICONV_PARSEARRAY", + "<3187>": "REPOS_SCMOCONV", + "<3188>": "REPOS_SETCHECKINFO", + "<3189>": "REPOS_SETCHECKINFO_TRANS", + "<3190>": "REPOS_TOOLBAR", + "<3191>": "REPOS_TOOLBAR_HOOK", + "<3192>": "REPOS_TRANSFER_OS", + "<3193>": "REQUEST_INFO", + "<3194>": "REQ_INFO", + "<3195>": "RESET.LOCKS", + "<3196>": "RESETDEBUGGER", + "<3197>": "RESET_GROUPBOX_ZORDER", + "<3198>": "RESET_LOCKS", + "<3199>": "RESET_PRINTER", + "<3200>": "RESET_ROWDEF", + "<3201>": "RESIZE", + "<3202>": "RESOLVEEVENTHANDLER", + "<3203>": "RESOLVE_PATH", + "<3204>": "RESOLVE_SELECT", + "<3205>": "RESTART", + "<3206>": "RESTORE.DELS", + "<3207>": "RESTORE_DELS", + "<3208>": "RESTOSTRING", + "<3209>": "RETSTACK", + "<3210>": "REVCMD_INPUT", + "<3211>": "REVCMD_LISTENER", + "<3212>": "REVCMD_OUTPUT", + "<3213>": "REVCMD_PARSEHDR", + "<3214>": "REVCMD_PRINTER", + "<3215>": "REVCMD_WRAPUP", + "<3216>": "REVDEBUGGER", + "<3217>": "REVDEBUGPROC", + "<3218>": "REVGETRELATIONALS", + "<3219>": "REVPROFILELOG", + "<3220>": "REVSHUTDOWN", + "<3221>": "REV_BGND_UPDATE", + "<3222>": "REV_BUILD_INDEXLIST", + "<3223>": "REV_CLEAR_Q", + "<3224>": "REV_CLOSE_PROC", + "<3225>": "REV_CLOSE_Q", + "<3226>": "REV_COMPILER", + "<3227>": "REV_COMPILER_DLLPTR", + "<3228>": "REV_COMPILER_ENV", + "<3229>": "REV_COMPILER_EXPAND", + "<3230>": "REV_COMPILER_MAIN", + "<3231>": "REV_DECL_PROC", + "<3232>": "REV_EXECUTIVE", + "<3233>": "REV_EXEC_DBG", + "<3234>": "REV_FIND_CALLS", + "<3235>": "REV_GETARG", + "<3236>": "REV_GETCOMM", + "<3237>": "REV_GETNEXT", + "<3238>": "REV_GETREC", + "<3239>": "REV_GET_ENV", + "<3240>": "REV_INIT_Q", + "<3241>": "REV_LINE_LOC", + "<3242>": "REV_LOADREC", + "<3243>": "REV_LOCKREC", + "<3244>": "REV_OBJECT_CACHE", + "<3245>": "REV_OBJ_CACHE", + "<3246>": "REV_OPEN_Q", + "<3247>": "REV_PRECOMPILERS", + "<3248>": "REV_PUTARG", + "<3249>": "REV_PUTREC", + "<3250>": "REV_PUT_DATA", + "<3251>": "REV_PUT_STAT", + "<3252>": "REV_REPLACEOP", + "<3253>": "REV_REPLACE_PROPERTY", + "<3254>": "REV_RUN_SQL", + "<3255>": "REV_SET_ENV", + "<3256>": "REV_SQL", + "<3257>": "REV_SRC_LINE", + "<3258>": "REV_SRV_QIO", + "<3259>": "REV_UPDATE_Q", + "<3260>": "REV_UTILITY", + "<3261>": "RGB", + "<3262>": "RIGHTDEX.MFS", + "<3263>": "RLIST", + "<3264>": "RLISTDELIMIT", + "<3265>": "RLISTTOKENIZE", + "<3266>": "RLIST_ADO_CALLBACK", + "<3267>": "RLIST_CALLBACK", + "<3268>": "RLIST_CSV_CALLBACK", + "<3269>": "RLIST_DELIMITED", + "<3270>": "RLIST_EDT_CALLBACK", + "<3271>": "RLIST_EXECUTE_CALLBACK", + "<3272>": "RLIST_EXTRACT_CALLBACK", + "<3273>": "RLIST_HTML_CALLBACK", + "<3274>": "RLIST_JSON_CALLBACK", + "<3275>": "RLIST_TAB_CALLBACK", + "<3276>": "RLIST_TEST", + "<3277>": "RLIST_TEXT_CALLBACK", + "<3278>": "RLIST_XML_CALLBACK", + "<3279>": "RMENU", + "<3280>": "ROLLOUT", + "<3281>": "ROWEXISTS", + "<3282>": "RPTINFO", + "<3283>": "RTEXT", + "<3284>": "RTICOMMUTER", + "<3285>": "RTI_ADDSHUTDOWNHOOK", + "<3286>": "RTI_AFSNAMES", + "<3287>": "RTI_ALIAS_PROC", + "<3288>": "RTI_AM_SYSREPOS_EVENTS", + "<3289>": "RTI_APP_ABSTRACT_EVENTS", + "<3290>": "RTI_APP_CREATE_PERM_EVENTS", + "<3291>": "RTI_APP_ENTITY_DESC_EVENTS", + "<3292>": "RTI_APP_PRESET", + "<3293>": "RTI_APP_PROP_PRINT", + "<3294>": "RTI_APP_RELATE_DOCS_EVENTS", + "<3295>": "RTI_AREV64_GUI_SUBROUTINE", + "<3296>": "RTI_AREV64_START_WINDOW", + "<3297>": "RTI_ASSERT", + "<3298>": "RTI_ASSERT_UI", + "<3299>": "RTI_ATTACHTABLE_FINDATTACHEDVOLUME", + "<3300>": "RTI_ATTACH_TABLE_PASS_EVENTS", + "<3301>": "RTI_ATTACH_TABLE_PASS_SF_2_EVENTS", + "<3302>": "RTI_AUTH_CONVERT_USERS", + "<3303>": "RTI_AUTH_POLICY_CONFIG_EVENTS", + "<3304>": "RTI_AUTH_POLICY_CONFIG_SELECTED", + "<3305>": "RTI_AUTH_POLICY_SN_ENTRY", + "<3306>": "RTI_AUTH_REPORT", + "<3307>": "RTI_AUTH_USER_INFO", + "<3308>": "RTI_AUTH_USER_STATUS", + "<3309>": "RTI_AUTOEXEC", + "<3310>": "RTI_AXSH", + "<3311>": "RTI_BASE64", + "<3312>": "RTI_BFS_ACCTRESTORE", + "<3313>": "RTI_BITMAP_INDEX_EXTRACT", + "<3314>": "RTI_BITMAP_INDEX_OPEN", + "<3315>": "RTI_BITMAP_INDEX_SEARCH", + "<3316>": "RTI_BITMAP_KEYTRANS", + "<3317>": "RTI_BITMAP_KEYTRANS_931", + "<3318>": "RTI_BITMAP_NODELIST", + "<3319>": "RTI_BITMAP_REDUCTION", + "<3320>": "RTI_BITMAP_SEARCH", + "<3321>": "RTI_BRWSUPPORT", + "<3322>": "RTI_BRW_CLI_EVENTS", + "<3323>": "RTI_BRW_CLI_OPN_EVENTS", + "<3324>": "RTI_BRW_DIAGNOSTIC", + "<3325>": "RTI_BRW_FILTER", + "<3326>": "RTI_BRW_GENERATEREPORT", + "<3327>": "RTI_BRW_PARSEREPORTS", + "<3328>": "RTI_BRW_RESOLVECFG", + "<3329>": "RTI_BRW_SAMPLEDATASOURCE", + "<3330>": "RTI_BRW_WIZARD", + "<3331>": "RTI_BUILD_INDEXES", + "<3332>": "RTI_BUILD_INDEXES_CALLBACK", + "<3333>": "RTI_BUILD_INDEXES_CHILDENGINE", + "<3334>": "RTI_BUILD_INDEXES_MULTIENGINE", + "<3335>": "RTI_BUILD_RDKINSTALLER", + "<3336>": "RTI_CACHE_MFS", + "<3337>": "RTI_CATALYST_GUI_SUBROUTINE", + "<3338>": "RTI_CATALYST_START_WINDOW", + "<3339>": "RTI_CBBFS_CLEARSELECT", + "<3340>": "RTI_CBBFS_CONNECT", + "<3341>": "RTI_CBBFS_CONNECTEX", + "<3342>": "RTI_CBBFS_CONNEECT", + "<3343>": "RTI_CBBFS_CREATE_VOLUME", + "<3344>": "RTI_CBBFS_CREATE_VOLUME_EVENTS", + "<3345>": "RTI_CBBFS_DELETE", + "<3346>": "RTI_CBBFS_DELETESCOPED", + "<3347>": "RTI_CBBFS_DISCONNECT", + "<3348>": "RTI_CBBFS_DLL", + "<3349>": "RTI_CBBFS_ERROR", + "<3350>": "RTI_CBBFS_N1QLREADNEXT", + "<3351>": "RTI_CBBFS_N1QLSELECT", + "<3352>": "RTI_CBBFS_READ", + "<3353>": "RTI_CBBFS_READEX", + "<3354>": "RTI_CBBFS_READNEXT", + "<3355>": "RTI_CBBFS_READSCOPED", + "<3356>": "RTI_CBBFS_SELECT", + "<3357>": "RTI_CBBFS_WRITE", + "<3358>": "RTI_CBBFS_WRITESCOPED", + "<3359>": "RTI_CDOMAIL", + "<3360>": "RTI_CEF_OLE_EVENTS", + "<3361>": "RTI_CFG_C2OE_MAP", + "<3362>": "RTI_CFG_INET_EVENTS", + "<3363>": "RTI_CHAIN_SELECT", + "<3364>": "RTI_CHANGE_MSG_POS", + "<3365>": "RTI_CHANGE_O4W_ENTITIES", + "<3366>": "RTI_CHDIR", + "<3367>": "RTI_CHECK_UAC", + "<3368>": "RTI_CJSON", + "<3369>": "RTI_CJSONAPI_ADDITEMREFERENCETOARRAY", + "<3370>": "RTI_CJSONAPI_ADDITEMREFERENCETOOBJECT", + "<3371>": "RTI_CJSONAPI_ADDITEMTOARRAY", + "<3372>": "RTI_CJSONAPI_ADDITEMTOOBJECT", + "<3373>": "RTI_CJSONAPI_ADDITEMTOOBJECTCS", + "<3374>": "RTI_CJSONAPI_CREATEARRAY", + "<3375>": "RTI_CJSONAPI_CREATEBOOL", + "<3376>": "RTI_CJSONAPI_CREATEDOUBLEARRAY", + "<3377>": "RTI_CJSONAPI_CREATEFALSE", + "<3378>": "RTI_CJSONAPI_CREATEFLOATARRAY", + "<3379>": "RTI_CJSONAPI_CREATEINTARRAY", + "<3380>": "RTI_CJSONAPI_CREATENULL", + "<3381>": "RTI_CJSONAPI_CREATENUMBER", + "<3382>": "RTI_CJSONAPI_CREATEOBJECT", + "<3383>": "RTI_CJSONAPI_CREATESTRING", + "<3384>": "RTI_CJSONAPI_CREATESTRINGARRAY", + "<3385>": "RTI_CJSONAPI_CREATETRUE", + "<3386>": "RTI_CJSONAPI_DELETE", + "<3387>": "RTI_CJSONAPI_DELETEITEMFROMARRAY", + "<3388>": "RTI_CJSONAPI_DELETEITEMFROMOBJECT", + "<3389>": "RTI_CJSONAPI_DETACHITEMFROMARRAY", + "<3390>": "RTI_CJSONAPI_DETACHITEMFROMOBJECT", + "<3391>": "RTI_CJSONAPI_DUPLICATE", + "<3392>": "RTI_CJSONAPI_GETARRAYITEM", + "<3393>": "RTI_CJSONAPI_GETARRAYSIZE", + "<3394>": "RTI_CJSONAPI_GETERRORPTR", + "<3395>": "RTI_CJSONAPI_GETITEMCHILD", + "<3396>": "RTI_CJSONAPI_GETITEMNAME", + "<3397>": "RTI_CJSONAPI_GETITEMNEXT", + "<3398>": "RTI_CJSONAPI_GETITEMTYPE", + "<3399>": "RTI_CJSONAPI_GETOBJECTITEM", + "<3400>": "RTI_CJSONAPI_INSERTITEMINARRAY", + "<3401>": "RTI_CJSONAPI_MINIFY", + "<3402>": "RTI_CJSONAPI_PARSE", + "<3403>": "RTI_CJSONAPI_PARSEWITHOPTS", + "<3404>": "RTI_CJSONAPI_PRINT", + "<3405>": "RTI_CJSONAPI_PRINTBUFFERED", + "<3406>": "RTI_CJSONAPI_PRINTUNFORMATTED", + "<3407>": "RTI_CJSONAPI_REPLACEITEMINARRAY", + "<3408>": "RTI_CJSONAPI_REPLACEITEMINOBJECT", + "<3409>": "RTI_CLEANUP_DROPBOX", + "<3410>": "RTI_CLEAN_ARRAY", + "<3411>": "RTI_CLIPBOARD", + "<3412>": "RTI_COLORREF2RGB", + "<3413>": "RTI_COLUMN_LOOKUP", + "<3414>": "RTI_COLUMN_LOOKUP_EVENTS", + "<3415>": "RTI_COMMANDER_COMMUTER", + "<3416>": "RTI_COMMANDER_EXECUTE", + "<3417>": "RTI_COMMANDER_REQUEST", + "<3418>": "RTI_COMMANDER_STARTUP", + "<3419>": "RTI_COMMANDER_TERMINATE", + "<3420>": "RTI_COMMANDER_WINDOW_TERMINATE", + "<3421>": "RTI_COMMUTER", + "<3422>": "RTI_COMPILE_ENTITY_EVENTS", + "<3423>": "RTI_COMPILE_ENTITY_MSG_EVENTS", + "<3424>": "RTI_COMPRESS_FOLDER", + "<3425>": "RTI_COMPRESS_STRING", + "<3426>": "RTI_CONVERT", + "<3427>": "RTI_CONVERT_REPOSITORY_IMAGE_COUNTS", + "<3428>": "RTI_COPY_TABLE_WIZARD_DER", + "<3429>": "RTI_CRC32", + "<3430>": "RTI_CREATEGUID", + "<3431>": "RTI_CREATE_BITMAP_INDEX", + "<3432>": "RTI_CREATE_COMMUTER_MODULE", + "<3433>": "RTI_CREATE_NEW_DICTFIELD", + "<3434>": "RTI_CREATE_REPRELEASE_ENTITIES", + "<3435>": "RTI_CREATE_REPVIEW_ENTITIES", + "<3436>": "RTI_CREATE_USER_DETAILS", + "<3437>": "RTI_CREATE_VOLUME", + "<3438>": "RTI_CREATE_WEBBROWSER_CONTROL", + "<3439>": "RTI_CRYPTAES", + "<3440>": "RTI_CRYPTCALCULATEHASH", + "<3441>": "RTI_CRYPTCALCULATEHMAC", + "<3442>": "RTI_CRYPTCALCULATEPPKEY", + "<3443>": "RTI_CRYPTCONVERTBASE64", + "<3444>": "RTI_CRYPTCONVERTHEX", + "<3445>": "RTI_CRYPTDECRYPTAES", + "<3446>": "RTI_CRYPTENCRYPTAES", + "<3447>": "RTI_CRYPTGENERATEGUID", + "<3448>": "RTI_CRYPTGENERATERANDOMBLOCK", + "<3449>": "RTI_CRYPTGENERATERANDOMNUMBER", + "<3450>": "RTI_CRYPTHASH", + "<3451>": "RTI_CRYPTHMAC", + "<3452>": "RTI_CRYPTO", + "<3453>": "RTI_CRYPTPASSPHRASE", + "<3454>": "RTI_CRYPTRANDOM", + "<3455>": "RTI_CTO_MACROS_EVENTS", + "<3456>": "RTI_CURSOR_CACHE", + "<3457>": "RTI_DATETIME", + "<3458>": "RTI_DBT_CONTROLLER", + "<3459>": "RTI_DBT_VIEWER_EVENTS", + "<3460>": "RTI_DEBUGGER_PSAPI", + "<3461>": "RTI_DECOMPRESS_STRING", + "<3462>": "RTI_DEDUPE_ARRAY", + "<3463>": "RTI_DELETE_BITMAP_INDEX", + "<3464>": "RTI_DELETE_ENTITY", + "<3465>": "RTI_DERCLIENT", + "<3466>": "RTI_DERIMPERSONATEGROUPS", + "<3467>": "RTI_DERXML", + "<3468>": "RTI_DER_CONFIGURATION", + "<3469>": "RTI_DER_CONFIGURATION_WIZARD", + "<3470>": "RTI_DER_GETSERVERURL", + "<3471>": "RTI_DER_TABLEINFO", + "<3472>": "RTI_DER_VOLINFO", + "<3473>": "RTI_DESKTOP_SOCKETSERVER", + "<3474>": "RTI_DEV_EDITOR_PLUGINS_EVENTS", + "<3475>": "RTI_DEV_EDITOR_PLUGINS_GIT", + "<3476>": "RTI_DEV_PROFILE_EVENTS", + "<3477>": "RTI_DICT_COMPILE", + "<3478>": "RTI_DIFF", + "<3479>": "RTI_DISABLEPROCESSWINDOWSGHOSTING", + "<3480>": "RTI_DISTINCTLIST", + "<3481>": "RTI_DM_IMPACT_ANALYSIS", + "<3482>": "RTI_DM_TABLES_ADD", + "<3483>": "RTI_DOCX_MERGE", + "<3484>": "RTI_DOTNET_LISTENER_WRAPPER", + "<3485>": "RTI_DSN", + "<3486>": "RTI_DSNX_OIWIN_DBJOIN", + "<3487>": "RTI_DSNX_OIWIN_DFLT_LAYOUT", + "<3488>": "RTI_DSNX_OIWIN_FORMDES", + "<3489>": "RTI_DSNX_OIWIN_FORMDES_CONTEXTMENU", + "<3490>": "RTI_DSNX_OIWIN_ORDERTABS", + "<3491>": "RTI_DSNX_OIWIN_QUICKPAINT", + "<3492>": "RTI_DSNX_RBLAYOUT_DET", + "<3493>": "RTI_DSNX_RBLAYOUT_SLC", + "<3494>": "RTI_DSNX_RBLAYOUT_SLR", + "<3495>": "RTI_DSNX_RBLAYOUT_SLT", + "<3496>": "RTI_DSNX_RBLAYOUT_SORT", + "<3497>": "RTI_DSNX_RDK_QUICKDEPLOY", + "<3498>": "RTI_DSN_APPNOTE", + "<3499>": "RTI_DSN_APPNOTE_EDITHTML", + "<3500>": "RTI_DSN_APPNOTE_EDITIMAGE_EVENTS", + "<3501>": "RTI_DSN_APPNOTE_EDITLINK_EVENTS", + "<3502>": "RTI_DSN_BROWSER", + "<3503>": "RTI_DSN_BROWSER_TEST", + "<3504>": "RTI_DSN_BRW", + "<3505>": "RTI_DSN_CODETEMPLATE", + "<3506>": "RTI_DSN_CONSOLE", + "<3507>": "RTI_DSN_CONTEXTMENU", + "<3508>": "RTI_DSN_CONTEXTMENU_TESTRUN", + "<3509>": "RTI_DSN_DATASOURCE", + "<3510>": "RTI_DSN_DATASOURCE_CBBFS", + "<3511>": "RTI_DSN_DATASOURCE_DSBFS", + "<3512>": "RTI_DSN_DATASOURCE_MVBFS", + "<3513>": "RTI_DSN_DATASOURCE_MVBFS_PLUGIN", + "<3514>": "RTI_DSN_DATASOURCE_NEW_EVENTS", + "<3515>": "RTI_DSN_DATASOURCE_OSDIR", + "<3516>": "RTI_DSN_DATASOURCE_QUERY_DSBFS", + "<3517>": "RTI_DSN_DATASOURCE_QUERY_MVBFS", + "<3518>": "RTI_DSN_DATASOURCE_RTP57", + "<3519>": "RTI_DSN_DATASOURCE_TABLE_WIZARD_DSBFS", + "<3520>": "RTI_DSN_DATASOURCE_TABLE_WIZARD_MVBFS", + "<3521>": "RTI_DSN_DATASOURCE_WIZARD", + "<3522>": "RTI_DSN_DATASOURCE_WIZARD_CBBFS", + "<3523>": "RTI_DSN_DATASOURCE_WIZARD_DSBFS", + "<3524>": "RTI_DSN_DATASOURCE_WIZARD_MVBFS", + "<3525>": "RTI_DSN_DATASOURCE_WIZARD_OSDIR", + "<3526>": "RTI_DSN_DATASOURCE_WIZARD_RTP57", + "<3527>": "RTI_DSN_DBTABLE", + "<3528>": "RTI_DSN_DBTABLE_CREATE_EQ", + "<3529>": "RTI_DSN_DBTABLE_DATATYPES", + "<3530>": "RTI_DSN_DBTABLE_METHOD", + "<3531>": "RTI_DSN_DBTABLE_MTR", + "<3532>": "RTI_DSN_DLLPROTOTYPE", + "<3533>": "RTI_DSN_DLLPROTOTYPE_PARAMTYPES", + "<3534>": "RTI_DSN_DLLSTRUCT", + "<3535>": "RTI_DSN_DOC", + "<3536>": "RTI_DSN_EDITOR_CFG_UPDATE", + "<3537>": "RTI_DSN_EDITOR_COMM", + "<3538>": "RTI_DSN_EDITOR_EMAIL_CFG_EVENTS", + "<3539>": "RTI_DSN_EDITOR_EMAIL_ENTITY", + "<3540>": "RTI_DSN_EDITOR_EMAIL_EVENTS", + "<3541>": "RTI_DSN_EDITOR_EXECUTE_PROC", + "<3542>": "RTI_DSN_EDITOR_FIND_REPLACE_EVENTS", + "<3543>": "RTI_DSN_EDITOR_GET_CFG", + "<3544>": "RTI_DSN_EDITOR_GET_CFGREC", + "<3545>": "RTI_DSN_EDITOR_HELPER", + "<3546>": "RTI_DSN_EDITOR_HELPER_EQU", + "<3547>": "RTI_DSN_EDITOR_INSERTS", + "<3548>": "RTI_DSN_EDITOR_LABELS", + "<3549>": "RTI_DSN_EDITOR_PARAMETER_ENTRY_EVENTS", + "<3550>": "RTI_DSN_EDITOR_PRINT", + "<3551>": "RTI_DSN_EDITOR_RBASIC_KEYWORDS", + "<3552>": "RTI_DSN_EDITOR_SET_KEYWORDS", + "<3553>": "RTI_DSN_EDITOR_SET_STYLE", + "<3554>": "RTI_DSN_EDITOR_TAB_EVENTS", + "<3555>": "RTI_DSN_EDITOR_UPDATEICONS", + "<3556>": "RTI_DSN_EMAIL_ENTITY", + "<3557>": "RTI_DSN_GENERIC", + "<3558>": "RTI_DSN_HELP", + "<3559>": "RTI_DSN_HELPDOC", + "<3560>": "RTI_DSN_IMAGE", + "<3561>": "RTI_DSN_IMAGELIST", + "<3562>": "RTI_DSN_MSG", + "<3563>": "RTI_DSN_O4W", + "<3564>": "RTI_DSN_OBJECTCODE", + "<3565>": "RTI_DSN_OIBRW", + "<3566>": "RTI_DSN_OIEVENT", + "<3567>": "RTI_DSN_OIEVENT_CHOOSEOBJECT", + "<3568>": "RTI_DSN_OIEVENT_CHOOSEPARAMS", + "<3569>": "RTI_DSN_OIEVENT_CHOOSEPARAMS_IXLOOKUP", + "<3570>": "RTI_DSN_OIMENU", + "<3571>": "RTI_DSN_OIWIN", + "<3572>": "RTI_DSN_OIWIN_ANIMATE", + "<3573>": "RTI_DSN_OIWIN_BITMAP", + "<3574>": "RTI_DSN_OIWIN_BUTTON", + "<3575>": "RTI_DSN_OIWIN_CHECKBMP", + "<3576>": "RTI_DSN_OIWIN_CHECKBOX", + "<3577>": "RTI_DSN_OIWIN_COLORDROPDOWN", + "<3578>": "RTI_DSN_OIWIN_COMBOBOX", + "<3579>": "RTI_DSN_OIWIN_DATETIME", + "<3580>": "RTI_DSN_OIWIN_DBBITMAP", + "<3581>": "RTI_DSN_OIWIN_DFLTCTRL", + "<3582>": "RTI_DSN_OIWIN_DIRWATCHER", + "<3583>": "RTI_DSN_OIWIN_EDIT", + "<3584>": "RTI_DSN_OIWIN_EDITBOX", + "<3585>": "RTI_DSN_OIWIN_EDITFIELD", + "<3586>": "RTI_DSN_OIWIN_EDITTABLE", + "<3587>": "RTI_DSN_OIWIN_EDITTABLE_COLDETS", + "<3588>": "RTI_DSN_OIWIN_FILEEXPLORER", + "<3589>": "RTI_DSN_OIWIN_FILEPREVIEW", + "<3590>": "RTI_DSN_OIWIN_GROUPBOX", + "<3591>": "RTI_DSN_OIWIN_GROUPBOXEX", + "<3592>": "RTI_DSN_OIWIN_HSCROLLBAR", + "<3593>": "RTI_DSN_OIWIN_HSPLITBAR", + "<3594>": "RTI_DSN_OIWIN_HSPLITBMP", + "<3595>": "RTI_DSN_OIWIN_HTTPCLIENT", + "<3596>": "RTI_DSN_OIWIN_HTTPSERVER", + "<3597>": "RTI_DSN_OIWIN_HYPERLINK", + "<3598>": "RTI_DSN_OIWIN_LISTBOX", + "<3599>": "RTI_DSN_OIWIN_MDICLIENT", + "<3600>": "RTI_DSN_OIWIN_MENU", + "<3601>": "RTI_DSN_OIWIN_NOTIFYICON", + "<3602>": "RTI_DSN_OIWIN_OBJECT", + "<3603>": "RTI_DSN_OIWIN_OLECONTROL", + "<3604>": "RTI_DSN_OIWIN_OLECONTROL_NEW", + "<3605>": "RTI_DSN_OIWIN_PANEL", + "<3606>": "RTI_DSN_OIWIN_PROGRESSBAR", + "<3607>": "RTI_DSN_OIWIN_PROPERTYGRID", + "<3608>": "RTI_DSN_OIWIN_PUSHBMP", + "<3609>": "RTI_DSN_OIWIN_PUSHBUTTON", + "<3610>": "RTI_DSN_OIWIN_RADIOBUTTON", + "<3611>": "RTI_DSN_OIWIN_RADIOGROUP", + "<3612>": "RTI_DSN_OIWIN_REBAR", + "<3613>": "RTI_DSN_OIWIN_RICHEDITBOX", + "<3614>": "RTI_DSN_OIWIN_SCROLLBAR", + "<3615>": "RTI_DSN_OIWIN_SIMPLEPANEL", + "<3616>": "RTI_DSN_OIWIN_SPLITBAR", + "<3617>": "RTI_DSN_OIWIN_STATIC", + "<3618>": "RTI_DSN_OIWIN_TABCONTROL", + "<3619>": "RTI_DSN_OIWIN_TOOLBAR", + "<3620>": "RTI_DSN_OIWIN_TPL_TOOLBOX", + "<3621>": "RTI_DSN_OIWIN_TREELISTBOX", + "<3622>": "RTI_DSN_OIWIN_UPDOWN", + "<3623>": "RTI_DSN_OIWIN_VIEW", + "<3624>": "RTI_DSN_OIWIN_VSCROLLBAR", + "<3625>": "RTI_DSN_OIWIN_VSPLITBAR", + "<3626>": "RTI_DSN_OIWIN_VSPLITBMP", + "<3627>": "RTI_DSN_OIWIN_WEBVIEW", + "<3628>": "RTI_DSN_OIWIN_WINCONTROL", + "<3629>": "RTI_DSN_OIWIN_WINDOW", + "<3630>": "RTI_DSN_OLECONTROL", + "<3631>": "RTI_DSN_OPROC", + "<3632>": "RTI_DSN_POPUP", + "<3633>": "RTI_DSN_POPUP_GENCODE", + "<3634>": "RTI_DSN_PROMOTEDEVENT", + "<3635>": "RTI_DSN_PROMOTEDEVENT_NEW", + "<3636>": "RTI_DSN_RBAND", + "<3637>": "RTI_DSN_RBLAYOUT", + "<3638>": "RTI_DSN_RECORD", + "<3639>": "RTI_DSN_REPCLASS", + "<3640>": "RTI_DSN_REPOS_EP_HISTORY", + "<3641>": "RTI_DSN_REPRELEASE", + "<3642>": "RTI_DSN_REPTYPE", + "<3643>": "RTI_DSN_REPVIEW", + "<3644>": "RTI_DSN_REST", + "<3645>": "RTI_DSN_REST_VARIABLES", + "<3646>": "RTI_DSN_START", + "<3647>": "RTI_DSN_START_HELPER", + "<3648>": "RTI_DSN_STPROC", + "<3649>": "RTI_DSN_STPROCINS", + "<3650>": "RTI_DSN_TABCONTROL_TABS_ADD_EVENTS", + "<3651>": "RTI_DSN_TABLEBUILDER_NEWTABLE", + "<3652>": "RTI_DSN_TOOLBAR", + "<3653>": "RTI_DSN_USER", + "<3654>": "RTI_DSN_USER_ADD_EVENTS", + "<3655>": "RTI_DUMP_TYPEINFO", + "<3656>": "RTI_EDITOR_CHECKFORCATALOG", + "<3657>": "RTI_EDITOR_GLOBALFINDREPLACE", + "<3658>": "RTI_EDITOR_O4WPROC_EVENTS", + "<3659>": "RTI_EDITOR_OPEN", + "<3660>": "RTI_EDITTABLE_SORT", + "<3661>": "RTI_EMAIL_CLIENT", + "<3662>": "RTI_ENABLE_WIKI_HELP", + "<3663>": "RTI_ENCRYPT_FORMAT", + "<3664>": "RTI_ENCRYPT_TABLE", + "<3665>": "RTI_ENTITY_NOTES_EVENTS", + "<3666>": "RTI_ENT_PROPS_PRINT", + "<3667>": "RTI_ENT_RELATION_PRINT", + "<3668>": "RTI_ENUM_MONITORS_EX", + "<3669>": "RTI_ERRORTEXT", + "<3670>": "RTI_ESERVER_EXITENGINE", + "<3671>": "RTI_ET_FILTER", + "<3672>": "RTI_EXAMPLE_DEBUGGER_INTERCEPT_PROC", + "<3673>": "RTI_EXAMPLE_LOGIN_TEMPLATE", + "<3674>": "RTI_EXEC_POWERSCRIPT", + "<3675>": "RTI_EXPIRATION_DATE", + "<3676>": "RTI_FAKE_TASK", + "<3677>": "RTI_FIELDS", + "<3678>": "RTI_FINISH_UPGRADE", + "<3679>": "RTI_FIX_KEYS_EVENTS", + "<3680>": "RTI_FIX_RBLAYOUT_DUPLICATE_TOTAL_COLUMNS", + "<3681>": "RTI_FIX_REVMEDIA", + "<3682>": "RTI_FORMAT_PROG", + "<3683>": "RTI_FORMDOCK", + "<3684>": "RTI_FORMULA_WIZARD", + "<3685>": "RTI_FORM_LANGUAGE_TESTRUN", + "<3686>": "RTI_F_DISTRIBUTOR_10", + "<3687>": "RTI_F_DISTRIBUTOR_90", + "<3688>": "RTI_F_INDEXER_10", + "<3689>": "RTI_F_INDEXER_10_REBALANCE", + "<3690>": "RTI_F_INDEXER_10_REBALANCE_UPDATE", + "<3691>": "RTI_F_INDEXER_90", + "<3692>": "RTI_GENERATE_MODULE", + "<3693>": "RTI_GETCLIPBOARD", + "<3694>": "RTI_GETCOMPUTERINFORMATION", + "<3695>": "RTI_GETCOMPUTERNAME", + "<3696>": "RTI_GETDRIVETYPE", + "<3697>": "RTI_GETENVIRONMENTVARIABLE", + "<3698>": "RTI_GETEVENTSTACK", + "<3699>": "RTI_GETEXITCODEPROCESS", + "<3700>": "RTI_GETLDAPGROUPS", + "<3701>": "RTI_GETLDAPINFO", + "<3702>": "RTI_GETLOCALEINFO", + "<3703>": "RTI_GETLOCALIP", + "<3704>": "RTI_GETLOCATIONALIASES", + "<3705>": "RTI_GETMAIL", + "<3706>": "RTI_GETNETWORKALIASES", + "<3707>": "RTI_GETNETWORKUSERNAME", + "<3708>": "RTI_GETOEDATATYPES", + "<3709>": "RTI_GETOLEEVENTSFORCLSID", + "<3710>": "RTI_GETOLEMETHODSFORCLSID", + "<3711>": "RTI_GETOLEPROPERTIESFORCLSID", + "<3712>": "RTI_GETPROTECTEDFIELDS", + "<3713>": "RTI_GETTEMPFILENAME", + "<3714>": "RTI_GETTIMEZONEINFORMATION", + "<3715>": "RTI_GETVOLUMEINFORMATION", + "<3716>": "RTI_GETWINDOWLONGPTR", + "<3717>": "RTI_GET_CFG", + "<3718>": "RTI_GET_CURRENT_SYMBOLIC", + "<3719>": "RTI_GET_DATE_RANGE_EVENTS", + "<3720>": "RTI_GET_LEGALUSER", + "<3721>": "RTI_GET_LH_RATIO", + "<3722>": "RTI_GET_LOCATIONALIASES", + "<3723>": "RTI_GET_NEXT_ID", + "<3724>": "RTI_GET_O4WCFG", + "<3725>": "RTI_GET_OLE_INFO", + "<3726>": "RTI_GET_PROC_INFO", + "<3727>": "RTI_GET_SAVED_LISTS", + "<3728>": "RTI_GET_SC", + "<3729>": "RTI_GET_SYSINFO", + "<3730>": "RTI_GET_TABLE_KEY_FROMREPOS", + "<3731>": "RTI_GET_USERCOUNT", + "<3732>": "RTI_GIT", + "<3733>": "RTI_GIT_CALLS", + "<3734>": "RTI_GIT_CONVERSION", + "<3735>": "RTI_GIT_DELETE_ENTITY", + "<3736>": "RTI_GIT_DIFF_TABS_TOOL", + "<3737>": "RTI_GIT_DIFF_TOOL", + "<3738>": "RTI_GIT_EVENTS", + "<3739>": "RTI_GIT_MAINT_EVENTS", + "<3740>": "RTI_GIT_PULL_ENTITY", + "<3741>": "RTI_GIT_PUSH_ENTITY", + "<3742>": "RTI_GIT_SETTINGS_EVENTS", + "<3743>": "RTI_GIT_WIZARD_EVENTS", + "<3744>": "RTI_HASHTABLE", + "<3745>": "RTI_HASHTABLE2", + "<3746>": "RTI_HASHTABLE_COM", + "<3747>": "RTI_HASHTABLE_NET", + "<3748>": "RTI_HASHTABLE_RTP65", + "<3749>": "RTI_HASHTABLE_STL", + "<3750>": "RTI_HEX", + "<3751>": "RTI_HIWORD", + "<3752>": "RTI_HTTP_DOWNLOAD", + "<3753>": "RTI_HTTP_DOWNLOAD_TEST", + "<3754>": "RTI_HTTP_DOWNLOAD_UI", + "<3755>": "RTI_HTTP_SERVER_TEST", + "<3756>": "RTI_IDE", + "<3757>": "RTI_IDE_ABOUT", + "<3758>": "RTI_IDE_ABOUT_VERSION_INFO", + "<3759>": "RTI_IDE_ALIAS_TABLE", + "<3760>": "RTI_IDE_ANALYZE_REVPROFILELOG", + "<3761>": "RTI_IDE_APP_SETTINGS", + "<3762>": "RTI_IDE_AUTODOCK", + "<3763>": "RTI_IDE_BOOTLOADER", + "<3764>": "RTI_IDE_BOOTLOADER_LOG", + "<3765>": "RTI_IDE_BROADCAST", + "<3766>": "RTI_IDE_CFG", + "<3767>": "RTI_IDE_CFG_EVENTS", + "<3768>": "RTI_IDE_CLOSE_ALL", + "<3769>": "RTI_IDE_CLOSE_ALL_UI", + "<3770>": "RTI_IDE_CODETEMPLATE", + "<3771>": "RTI_IDE_CODETEMPLATE_SELECT", + "<3772>": "RTI_IDE_CONFIG_RECORDS", + "<3773>": "RTI_IDE_CONV", + "<3774>": "RTI_IDE_CTL_EVENTDES", + "<3775>": "RTI_IDE_CTL_MENUDES", + "<3776>": "RTI_IDE_CTL_WEBEDITOR", + "<3777>": "RTI_IDE_DOCKSITE", + "<3778>": "RTI_IDE_DROPDOWNMENU", + "<3779>": "RTI_IDE_EMAIL_ENTITY_EVENTS", + "<3780>": "RTI_IDE_ENV", + "<3781>": "RTI_IDE_GET_ENTITY_EVENTS", + "<3782>": "RTI_IDE_GLOBALFINDREPLACE", + "<3783>": "RTI_IDE_HOST_DSN", + "<3784>": "RTI_IDE_HOST_TPL", + "<3785>": "RTI_IDE_HTTPSERVER", + "<3786>": "RTI_IDE_IPL", + "<3787>": "RTI_IDE_LICENSE_AUTHORIZATION", + "<3788>": "RTI_IDE_MENU", + "<3789>": "RTI_IDE_METHOD", + "<3790>": "RTI_IDE_MSG_DELETEWARN", + "<3791>": "RTI_IDE_MSG_OVERWRITEWARN", + "<3792>": "RTI_IDE_NEW", + "<3793>": "RTI_IDE_OLEVIEW_CONTROLS", + "<3794>": "RTI_IDE_OPEN", + "<3795>": "RTI_IDE_OPEN_RECORD", + "<3796>": "RTI_IDE_OPEN_RUN_EVENTS", + "<3797>": "RTI_IDE_OPROC_SUPPORT", + "<3798>": "RTI_IDE_PARSE_TEXT_ARGS", + "<3799>": "RTI_IDE_PGO_AUTOTRIMOPTIONS", + "<3800>": "RTI_IDE_PGO_BACKCOLOR", + "<3801>": "RTI_IDE_PGO_BEVEL", + "<3802>": "RTI_IDE_PGO_BORDER", + "<3803>": "RTI_IDE_PGO_CELLSTYLES", + "<3804>": "RTI_IDE_PGO_CELLSTYLES_COLDETS", + "<3805>": "RTI_IDE_PGO_CHOOSEBUDDY", + "<3806>": "RTI_IDE_PGO_CHOOSEUSERS", + "<3807>": "RTI_IDE_PGO_COLOR_LIST", + "<3808>": "RTI_IDE_PGO_CONTROLSEMANTICS", + "<3809>": "RTI_IDE_PGO_CONVERSION", + "<3810>": "RTI_IDE_PGO_CTRLPREFIXES", + "<3811>": "RTI_IDE_PGO_CUSTOMPROPERTIES", + "<3812>": "RTI_IDE_PGO_DATABINDING", + "<3813>": "RTI_IDE_PGO_DATETIME_VALUE", + "<3814>": "RTI_IDE_PGO_DEFINT", + "<3815>": "RTI_IDE_PGO_DICTFORMULA", + "<3816>": "RTI_IDE_PGO_DROPACCEPTLIST", + "<3817>": "RTI_IDE_PGO_EDITMASK", + "<3818>": "RTI_IDE_PGO_EDITOPTIONS", + "<3819>": "RTI_IDE_PGO_EDITTABLE_COLUMNS", + "<3820>": "RTI_IDE_PGO_EVENROWITEMSTYLE", + "<3821>": "RTI_IDE_PGO_GLASSMARGINS", + "<3822>": "RTI_IDE_PGO_HCLREQUESTHEADERS", + "<3823>": "RTI_IDE_PGO_HCLREQUESTOPTIONS", + "<3824>": "RTI_IDE_PGO_HEADERSTYLES", + "<3825>": "RTI_IDE_PGO_HMARGINS", + "<3826>": "RTI_IDE_PGO_IMAGE", + "<3827>": "RTI_IDE_PGO_ITEMSTYLES", + "<3828>": "RTI_IDE_PGO_LIST", + "<3829>": "RTI_IDE_PGO_MAXIMIZESIZE", + "<3830>": "RTI_IDE_PGO_ODDROWITEMSTYLE", + "<3831>": "RTI_IDE_PGO_OLE_INFO", + "<3832>": "RTI_IDE_PGO_PADDING", + "<3833>": "RTI_IDE_PGO_PASSWORD", + "<3834>": "RTI_IDE_PGO_PROPERTYGRID_LIST", + "<3835>": "RTI_IDE_PGO_QUALIFYOLEEVENTS", + "<3836>": "RTI_IDE_PGO_RADIOBUTTON_BUTTONS", + "<3837>": "RTI_IDE_PGO_RANGE", + "<3838>": "RTI_IDE_PGO_SCALEFACTOR", + "<3839>": "RTI_IDE_PGO_SIMPLELIST", + "<3840>": "RTI_IDE_PGO_STATUSLINE", + "<3841>": "RTI_IDE_PGO_STOPLIST", + "<3842>": "RTI_IDE_PGO_TABCONTROL_ITEMSTYLES", + "<3843>": "RTI_IDE_PGO_TABCONTROL_PADDING", + "<3844>": "RTI_IDE_PGO_TABCONTROL_TABS", + "<3845>": "RTI_IDE_PGO_TABORDER_EVENTS", + "<3846>": "RTI_IDE_PGO_TABSTOPS", + "<3847>": "RTI_IDE_PGO_TEXTBOX", + "<3848>": "RTI_IDE_PGO_TEXTLINE", + "<3849>": "RTI_IDE_PGO_TOOLTIP", + "<3850>": "RTI_IDE_PGO_TRACKINGSIZE", + "<3851>": "RTI_IDE_PGO_VALIDATION", + "<3852>": "RTI_IDE_PGO_WBVPDFTBRSETTINGS", + "<3853>": "RTI_IDE_PGO_WBVSETTINGS", + "<3854>": "RTI_IDE_PGO_WH", + "<3855>": "RTI_IDE_PGO_XYPOS", + "<3856>": "RTI_IDE_PREFERENCES", + "<3857>": "RTI_IDE_PRINT_REPOS_OUTLINE", + "<3858>": "RTI_IDE_QUICKDEPLOY", + "<3859>": "RTI_IDE_QUICKDEPLOY_PREVIEW", + "<3860>": "RTI_IDE_REARRANGE_TABS", + "<3861>": "RTI_IDE_REPOS_CHECKIN", + "<3862>": "RTI_IDE_REPOS_CHECKOUT_EVENTS", + "<3863>": "RTI_IDE_REPOS_SELECT_EVENTS", + "<3864>": "RTI_IDE_SANITY_CHECK", + "<3865>": "RTI_IDE_SAVE_ALL", + "<3866>": "RTI_IDE_SCAN_REP", + "<3867>": "RTI_IDE_SELECT_REPOS", + "<3868>": "RTI_IDE_SELECT_REPOS_BY_STMT", + "<3869>": "RTI_IDE_SELECT_REPOS_TYPES", + "<3870>": "RTI_IDE_SETSPY", + "<3871>": "RTI_IDE_SYNC_STATE", + "<3872>": "RTI_IDE_SYSTEM_DEPLOYMENT", + "<3873>": "RTI_IDE_TCL", + "<3874>": "RTI_IDE_TPL_DATABASE", + "<3875>": "RTI_IDE_TPL_DATABASE_VIEW_OPTIONS", + "<3876>": "RTI_IDE_TPL_FAVORITES", + "<3877>": "RTI_IDE_TPL_OUTPUT", + "<3878>": "RTI_IDE_TPL_PROPERTY_PANEL", + "<3879>": "RTI_IDE_VALIDATE_POSITION", + "<3880>": "RTI_IDE_VPL_DSN", + "<3881>": "RTI_IDE_VPL_TPL", + "<3882>": "RTI_IDE_WORKSPACE_LOAD", + "<3883>": "RTI_IDE_WORKSPACE_SAVE", + "<3884>": "RTI_IMPORT_ASCII", + "<3885>": "RTI_IMPORT_ASCII_SUB", + "<3886>": "RTI_INDEXER", + "<3887>": "RTI_INDEXER_CONFIG_EVENTS", + "<3888>": "RTI_INDEXES_ADD", + "<3889>": "RTI_INDEXES_MAINT", + "<3890>": "RTI_INDEX_FLUSH_10", + "<3891>": "RTI_INDEX_FLUSH_90", + "<3892>": "RTI_INET_DEBUGGER", + "<3893>": "RTI_INIFILE", + "<3894>": "RTI_INVERT", + "<3895>": "RTI_INVERT_BUILD_BTREE", + "<3896>": "RTI_INVERT_BUILD_RELATIONAL", + "<3897>": "RTI_IO_TABLE", + "<3898>": "RTI_IPV", + "<3899>": "RTI_ISIDECONTEXT", + "<3900>": "RTI_ISINTERACTIVESTATION", + "<3901>": "RTI_ISLOCALGROUPMEMBER", + "<3902>": "RTI_ISMEMBER", + "<3903>": "RTI_ISPROMOTEDEVENTID", + "<3904>": "RTI_IS_AUTOFILL_LIST_COMMAND", + "<3905>": "RTI_JSON", + "<3906>": "RTI_JSON2REC", + "<3907>": "RTI_JSON9", + "<3908>": "RTI_JSONX", + "<3909>": "RTI_KILLCURRENTOENGINE", + "<3910>": "RTI_LC", + "<3911>": "RTI_LDAP_GROUPS_FOR_USER", + "<3912>": "RTI_LH_INFO", + "<3913>": "RTI_LH_INFO_EVENTS", + "<3914>": "RTI_LH_INFO_VIEWER_EVENTS", + "<3915>": "RTI_LH_PRINT", + "<3916>": "RTI_LH_STATISTICS", + "<3917>": "RTI_LH_STATISTICS_EVENTS", + "<3918>": "RTI_LH_STATISTICS_HISTORY", + "<3919>": "RTI_LH_STATISTICS_HISTORY_EVENTS", + "<3920>": "RTI_LH_STATS_CHILDENGINE", + "<3921>": "RTI_LH_VERIFY", + "<3922>": "RTI_LH_VERIFY_FIX", + "<3923>": "RTI_LH_VERIFY_GROUP_INFO", + "<3924>": "RTI_LH_VERIFY_STATS", + "<3925>": "RTI_LH_VOLUME_USERS_EVENTS", + "<3926>": "RTI_LINKED_LIST", + "<3927>": "RTI_LIST", + "<3928>": "RTI_LISTBOX_HIERARCHICAL", + "<3929>": "RTI_LISTBOX_PROCESSING", + "<3930>": "RTI_LISTDICT", + "<3931>": "RTI_LND_EDIT_EVENTS", + "<3932>": "RTI_LND_FORMAT", + "<3933>": "RTI_LOADER", + "<3934>": "RTI_LOAD_DATABASE", + "<3935>": "RTI_LOCK_OWNER", + "<3936>": "RTI_LOCK_RELEASE", + "<3937>": "RTI_LOGIN_GETLDAPUSER", + "<3938>": "RTI_LOGIT", + "<3939>": "RTI_LOG_EVENT", + "<3940>": "RTI_LOG_TO_FILE", + "<3941>": "RTI_LOWORD", + "<3942>": "RTI_LRDEX_SUB_9", + "<3943>": "RTI_LRDEX_SUB_X", + "<3944>": "RTI_MAKELONG", + "<3945>": "RTI_MATCHQUOTES", + "<3946>": "RTI_MD5", + "<3947>": "RTI_MDISELECT", + "<3948>": "RTI_MEMBFS", + "<3949>": "RTI_MEMCACHED", + "<3950>": "RTI_MEMCACHED_CONFIG", + "<3951>": "RTI_MEMCACHED_CONFIG_EVENTS", + "<3952>": "RTI_MEMCACHED_GETSERVER", + "<3953>": "RTI_MENU_ACCELERATOR", + "<3954>": "RTI_MIGRATE_REPOSITORY_ENTITY_OIWIN", + "<3955>": "RTI_MIGRATE_V9_TO_V10", + "<3956>": "RTI_MIGRATE_V9_TO_V10_ENTITY", + "<3957>": "RTI_MIGRATE_V9_USERS", + "<3958>": "RTI_MKDIR", + "<3959>": "RTI_MODIFY_CFG_EVENTS", + "<3960>": "RTI_MODIFY_EVENT_CFG", + "<3961>": "RTI_MODIFY_MENU", + "<3962>": "RTI_MODULE_MANAGER", + "<3963>": "RTI_MSG_GENCODE", + "<3964>": "RTI_MVBFS_MULTILEVEL", + "<3965>": "RTI_NAMECAP", + "<3966>": "RTI_NEW_PASSWORD_EVENTS", + "<3967>": "RTI_O4WSETPASSWORD", + "<3968>": "RTI_O4W_CFG_EVENTS", + "<3969>": "RTI_O4W_CFG_HELPER", + "<3970>": "RTI_O4W_CFG_PLUGIN_EVENTS", + "<3971>": "RTI_O4W_CONSOLE_EVENTS", + "<3972>": "RTI_O4W_CONSOLE_HTTPS_EVENTS", + "<3973>": "RTI_O4W_HTTPSERVER", + "<3974>": "RTI_O4W_VIRTUAL_DIR_EVENTS", + "<3975>": "RTI_OEMONITOR_CLEANUP", + "<3976>": "RTI_OEMONITOR_INDEX", + "<3977>": "RTI_OEMONITOR_SELECTOR", + "<3978>": "RTI_OEMONITOR_SELECTOR_HANDLER", + "<3979>": "RTI_OEMONITOR_TABLESTATS", + "<3980>": "RTI_OEMONITOR_WATCHER", + "<3981>": "RTI_OESOCKETSERVER_STATS", + "<3982>": "RTI_OI10_INITIAL_SETUP", + "<3983>": "RTI_OICONSOLE_DASHBOARD_DATA", + "<3984>": "RTI_OI_UPDATE_CHECK", + "<3985>": "RTI_OI_UPDATE_CHECK_DIALOG_EVENTS", + "<3986>": "RTI_OLE_GETOBJECT", + "<3987>": "RTI_OLISTX_PRODUCE_ET", + "<3988>": "RTI_OLIST_COMMON", + "<3989>": "RTI_OPENID_SUPPORT", + "<3990>": "RTI_OPEN_VOC", + "<3991>": "RTI_OPROC_COMPILE", + "<3992>": "RTI_OPTIMISTIC_LOCKHANDLER", + "<3993>": "RTI_OSDIRMETHOD", + "<3994>": "RTI_OSUSERMETHOD", + "<3995>": "RTI_OSVERSIONMETHOD", + "<3996>": "RTI_OS_DIR", + "<3997>": "RTI_OS_DIRECTORY", + "<3998>": "RTI_OS_OPENDOC", + "<3999>": "RTI_OS_USER", + "<4000>": "RTI_OS_VERSION_INFO", + "<4001>": "RTI_PARSECSV", + "<4002>": "RTI_PHANTOM_DEBUGGER", + "<4003>": "RTI_PING", + "<4004>": "RTI_POPULATE_COMBO", + "<4005>": "RTI_POPUP_DATETIME", + "<4006>": "RTI_POPUP_GENCODE", + "<4007>": "RTI_POWERSCRIPT", + "<4008>": "RTI_PRINT_DICT", + "<4009>": "RTI_PRINT_EDITTABLE", + "<4010>": "RTI_PROGRAMLOADER", + "<4011>": "RTI_PS_APPPROPS", + "<4012>": "RTI_PURGE_ALL", + "<4013>": "RTI_QBF_LOAD_FROM_EXTERNALLIST", + "<4014>": "RTI_QUERYGRID", + "<4015>": "RTI_QUERYGRID_CHOOSECOLUMNS_EVENTS", + "<4016>": "RTI_QUERYGRID_EVENTS", + "<4017>": "RTI_QUERYGRID_OIWIN", + "<4018>": "RTI_RAPIDJSONMETHOD", + "<4019>": "RTI_RBLABEL_CONVERTER", + "<4020>": "RTI_RBLAYOUT_CONVERTER", + "<4021>": "RTI_RBRW_OPN_EVENTS", + "<4022>": "RTI_RDKEXTRACT_CHANGE_APP", + "<4023>": "RTI_RDKVIEW_FROM_ENTIDS", + "<4024>": "RTI_RDK_CHANGE_APP", + "<4025>": "RTI_RDK_COMBINE", + "<4026>": "RTI_RDK_HASH", + "<4027>": "RTI_RDK_REPOSITORY", + "<4028>": "RTI_READU", + "<4029>": "RTI_REC2JSON", + "<4030>": "RTI_REDIS_CLOSE_CONNECTION", + "<4031>": "RTI_REDIS_GENERAL_COMMAND", + "<4032>": "RTI_REDIS_GET_RESULTS", + "<4033>": "RTI_REDIS_LOCK_RELEASE", + "<4034>": "RTI_REDIS_LOCK_SET", + "<4035>": "RTI_REDIS_OPEN_CONNECTION", + "<4036>": "RTI_REDIS_RECORD_DELETE", + "<4037>": "RTI_REDIS_RECORD_READ_FULL", + "<4038>": "RTI_REDIS_RECORD_READ_LENGTH", + "<4039>": "RTI_REDIS_RECORD_READ_RESULT", + "<4040>": "RTI_REDIS_RECORD_WRITE", + "<4041>": "RTI_REDIS_RESET_CONNECTION", + "<4042>": "RTI_REDIS_SEMAPHORE_RELEASE", + "<4043>": "RTI_REDIS_SEMAPHORE_SET", + "<4044>": "RTI_REDIS_TABLE_CLEARSELECT", + "<4045>": "RTI_REDIS_TABLE_CLEAR_DELETE", + "<4046>": "RTI_REDIS_TABLE_COUNT", + "<4047>": "RTI_REDIS_TABLE_CREATE", + "<4048>": "RTI_REDIS_TABLE_DELETE", + "<4049>": "RTI_REDIS_TABLE_EXISTS", + "<4050>": "RTI_REDIS_TABLE_READNEXT", + "<4051>": "RTI_REDIS_TABLE_SELECT", + "<4052>": "RTI_REGENERATE_BANG_RECORD", + "<4053>": "RTI_REGISTRY", + "<4054>": "RTI_RELATIVEPATH", + "<4055>": "RTI_RELEASE", + "<4056>": "RTI_RELOAD_O4WOBJECT", + "<4057>": "RTI_REMAKETABLE", + "<4058>": "RTI_REMAKETABLE_PARAMS_EVENTS", + "<4059>": "RTI_REMOVE_INDEX", + "<4060>": "RTI_REMOVE_STYLE_SHEET", + "<4061>": "RTI_REPORT_TABLE_STATUS", + "<4062>": "RTI_REPORT_TABLE_STATUS_CALLBACK", + "<4063>": "RTI_REPORT_TABLE_STATUS_CHILDENGINE", + "<4064>": "RTI_REPORT_TABLE_STATUS_MULTIENGINE", + "<4065>": "RTI_RES2STR", + "<4066>": "RTI_RESIZE_MOVE_WINDOW", + "<4067>": "RTI_RESOLVEEVENTHANDLER", + "<4068>": "RTI_RESOLVEPATH", + "<4069>": "RTI_RESOLVE_MAIN_STPROCNAME", + "<4070>": "RTI_RESOLVE_SELECT_CALLBACK", + "<4071>": "RTI_RESOLVE_SELECT_PROGRESS", + "<4072>": "RTI_RESOLVE_STPROCNAME", + "<4073>": "RTI_RESOLVE_VOL_LOCATION", + "<4074>": "RTI_REVAXSHMETHOD", + "<4075>": "RTI_REVCAPI_ENGINE_POOL", + "<4076>": "RTI_REVJSONMETHOD", + "<4077>": "RTI_REVSTLHASHTABLEMETHOD", + "<4078>": "RTI_REVSTLSETSMETHOD", + "<4079>": "RTI_RGB2COLORREF", + "<4080>": "RTI_RJSON", + "<4081>": "RTI_RLIST9", + "<4082>": "RTI_RLISTX", + "<4083>": "RTI_RLISTX_GRID_EVENTS", + "<4084>": "RTI_RLISTX_OESERVER_SELECT", + "<4085>": "RTI_RLISTX_PRODUCE", + "<4086>": "RTI_RPT_GRID_EVENTS", + "<4087>": "RTI_RSS", + "<4088>": "RTI_RUN_COMMAND", + "<4089>": "RTI_RUN_HTTPSERVER_REQUEST", + "<4090>": "RTI_SAMPLE_LH_SIZE", + "<4091>": "RTI_SAVE_KEYS", + "<4092>": "RTI_SCRIPTHANDLER", + "<4093>": "RTI_SELECT_ASSEMBLY", + "<4094>": "RTI_SELECT_REPOS_ENTITIES", + "<4095>": "RTI_SENDFAX", + "<4096>": "RTI_SENDMAIL", + "<4097>": "RTI_SEND_INFO_PROGRESS", + "<4098>": "RTI_SERVER_SELECT", + "<4099>": "RTI_SETCLIPBOARD", + "<4100>": "RTI_SETS", + "<4101>": "RTI_SETS2", + "<4102>": "RTI_SET_DEBUGGER", + "<4103>": "RTI_SET_SIZELOCK", + "<4104>": "RTI_SET_SIZELOCK_UD", + "<4105>": "RTI_SHA1", + "<4106>": "RTI_SHA256", + "<4107>": "RTI_SHA_1", + "<4108>": "RTI_SHELLEXECUTEEX", + "<4109>": "RTI_SIZELOCK_CONTROLLER", + "<4110>": "RTI_SOURCEDIFF_PROCESSOR", + "<4111>": "RTI_SOURCEDIFF_TEXT", + "<4112>": "RTI_STRINGBUILDER", + "<4113>": "RTI_SUPPRESS_INDEX_TRANSACTIONS", + "<4114>": "RTI_SYSCOPYAPPS", + "<4115>": "RTI_SYSREPOSMODULES_EVENTS", + "<4116>": "RTI_SYSTEM_REPORTS", + "<4117>": "RTI_SYS_SETTINGS", + "<4118>": "RTI_TABLES_DELETE", + "<4119>": "RTI_TABLES_REMOVE", + "<4120>": "RTI_TABLES_RENAME", + "<4121>": "RTI_TABLE_CHANGE_OWNER", + "<4122>": "RTI_TABLE_COLUMN_SEARCH", + "<4123>": "RTI_TASKMANAGER", + "<4124>": "RTI_TASK_CHILDENGINE", + "<4125>": "RTI_TASK_SCHEDULER", + "<4126>": "RTI_TASK_SCHEDULER_CONFIG", + "<4127>": "RTI_TASK_SCHEDULER_EDIT", + "<4128>": "RTI_TASK_SHUTDOWN", + "<4129>": "RTI_TASK_STARTUP", + "<4130>": "RTI_TASK_STATUS", + "<4131>": "RTI_TASK_SUBMIT", + "<4132>": "RTI_TB_OPEN", + "<4133>": "RTI_TB_REMAKE_TABLE", + "<4134>": "RTI_TB_REMAKE_TABLE_EVENTS", + "<4135>": "RTI_TCL_COPY_ROW_EVENTS", + "<4136>": "RTI_TCL_COPY_TABLE_EVENTS", + "<4137>": "RTI_TCL_FETCH_QUERY", + "<4138>": "RTI_TCL_STORE_QUERY", + "<4139>": "RTI_TESTFORMULA", + "<4140>": "RTI_TEST_LDAPINFO", + "<4141>": "RTI_TIMEPICKER_EVENTS", + "<4142>": "RTI_TOGGLE_RESIZING_THREAD", + "<4143>": "RTI_TOKENIZE", + "<4144>": "RTI_TRANSACTION", + "<4145>": "RTI_UC", + "<4146>": "RTI_UNCOMPRESS_FOLDER", + "<4147>": "RTI_UNLOCK", + "<4148>": "RTI_UPDATE_BITMAP_INDEX", + "<4149>": "RTI_UPDATE_CHECK", + "<4150>": "RTI_UPDATE_DBT", + "<4151>": "RTI_UPDATE_EVENT_CFG", + "<4152>": "RTI_UPDATE_INDEX_10", + "<4153>": "RTI_UPDATE_INDEX_90", + "<4154>": "RTI_UPGRADE_FLAG_AUTOFILL_LIST_FORMS", + "<4155>": "RTI_USERCOUNT", + "<4156>": "RTI_USER_REPORT_SORT", + "<4157>": "RTI_USER_UPDATE_PASSWORD_EVENTS", + "<4158>": "RTI_UTC_TIME", + "<4159>": "RTI_UTF8", + "<4160>": "RTI_UTIL_DROPBOX", + "<4161>": "RTI_UTL_COLORS", + "<4162>": "RTI_UTL_COMPARE", + "<4163>": "RTI_UTL_COMPARE_EVENTS", + "<4164>": "RTI_UTL_DATETIME", + "<4165>": "RTI_UTL_ERRORS", + "<4166>": "RTI_UTL_GASGAUGE", + "<4167>": "RTI_UTL_OESERVER", + "<4168>": "RTI_UTL_PROCEDURE", + "<4169>": "RTI_VERIFYSTOREDPROCEDURE", + "<4170>": "RTI_VERIFY_PROC", + "<4171>": "RTI_VSPRINTER", + "<4172>": "RTI_VSPRINTER_CLASSIC", + "<4173>": "RTI_VSPRINTER_CLASSIC_PDF", + "<4174>": "RTI_VSPRINTER_CLASSI_PDF", + "<4175>": "RTI_VSPRINTER_CUTEPDF", + "<4176>": "RTI_VSPRINTER_ZOOM_EVENTS", + "<4177>": "RTI_WEBVIEW2_EVENTS", + "<4178>": "RTI_WIN_COLLECTOR_IO", + "<4179>": "RTI_WIN_COMBOBOX", + "<4180>": "RTI_WIN_EDITTABLE", + "<4181>": "RTI_WIN_LISTBOX", + "<4182>": "RTI_WIN_SETPROPERTIES", + "<4183>": "RTI_WIZ_XLATE", + "<4184>": "RTI_WNETGETUNIVERSALNAME", + "<4185>": "RTI_WORKSPACE", + "<4186>": "RTI_WORKSPACE_LOAD", + "<4187>": "RTI_WORKSPACE_SAVE", + "<4188>": "RTI_WRITERELEASE", + "<4189>": "RTI_WRITEU", + "<4190>": "RTI_XBAND", + "<4191>": "RTI_XBAND_DATASOURCE_DATATABLE", + "<4192>": "RTI_XBAND_GENPROC", + "<4193>": "RTI_XBAND_GENPROC_DATATABLE", + "<4194>": "RTI_XBAND_SEND_PROGRESS", + "<4195>": "RTI_XBAND_SUPPORT", + "<4196>": "RTI_XBAND_THEME", + "<4197>": "RTI_XBAND_THEME_CHOOSER_EVENTS", + "<4198>": "RTI_XBAND_UTILITY", + "<4199>": "RTI_XBAND_UTILITY.092418", + "<4200>": "RTI_XLATE_CONTROLLER", + "<4201>": "RTI_XLATE_RESET", + "<4202>": "RTI_XML", + "<4203>": "RTI_XMLENCODE", + "<4204>": "RTI_ZOOM", + "<4205>": "RTI_ZTRIM", + "<4206>": "RTLMOVEMEMORY", + "<4207>": "RTNLIST", + "<4208>": "RTP1", + "<4209>": "RTP1001", + "<4210>": "RTP1002", + "<4211>": "RTP1003", + "<4212>": "RTP1003S", + "<4213>": "RTP1003V", + "<4214>": "RTP1004", + "<4215>": "RTP1005", + "<4216>": "RTP1006", + "<4217>": "RTP1007", + "<4218>": "RTP1008", + "<4219>": "RTP1009", + "<4220>": "RTP1010", + "<4221>": "RTP1011", + "<4222>": "RTP1012", + "<4223>": "RTP1013", + "<4224>": "RTP1014", + "<4225>": "RTP1015", + "<4226>": "RTP1016", + "<4227>": "RTP1017", + "<4228>": "RTP1018", + "<4229>": "RTP1019", + "<4230>": "RTP1020", + "<4231>": "RTP1021", + "<4232>": "RTP1022", + "<4233>": "RTP1023", + "<4234>": "RTP11", + "<4235>": "RTP11.INDEX", + "<4236>": "RTP12", + "<4237>": "RTP15", + "<4238>": "RTP16", + "<4239>": "RTP17", + "<4240>": "RTP18", + "<4241>": "RTP18.ENGLISH", + "<4242>": "RTP19", + "<4243>": "RTP2", + "<4244>": "RTP21", + "<4245>": "RTP22", + "<4246>": "RTP25", + "<4247>": "RTP26", + "<4248>": "RTP27", + "<4249>": "RTP27C", + "<4250>": "RTP27D", + "<4251>": "RTP27E", + "<4252>": "RTP27F", + "<4253>": "RTP27L", + "<4254>": "RTP27LS", + "<4255>": "RTP27R", + "<4256>": "RTP27S", + "<4257>": "RTP29", + "<4258>": "RTP3", + "<4259>": "RTP30T", + "<4260>": "RTP31", + "<4261>": "RTP32", + "<4262>": "RTP33", + "<4263>": "RTP34", + "<4264>": "RTP36", + "<4265>": "RTP37", + "<4266>": "RTP38", + "<4267>": "RTP39", + "<4268>": "RTP42", + "<4269>": "RTP43", + "<4270>": "RTP49", + "<4271>": "RTP5", + "<4272>": "RTP50", + "<4273>": "RTP53A", + "<4274>": "RTP57", + "<4275>": "RTP57.SUBS", + "<4276>": "RTP57.WIN", + "<4277>": "RTP57A", + "<4278>": "RTP57E", + "<4279>": "RTP59", + "<4280>": "RTP65", + "<4281>": "RTP7", + "<4282>": "RTP72", + "<4283>": "RTP8", + "<4284>": "RTP81", + "<4285>": "RTP9", + "<4286>": "RTP90", + "<4287>": "RTP94", + "<4288>": "RTP95", + "<4289>": "RTP96", + "<4290>": "RTP99", + "<4291>": "RUN.AREV32", + "<4292>": "RUNDOSCMD", + "<4293>": "RUNMENU", + "<4294>": "RUN_BRW_REPORT", + "<4295>": "RUN_CHARACTER", + "<4296>": "RUN_EVENT", + "<4297>": "RUN_INET_REQUEST", + "<4298>": "RUN_LABEL", + "<4299>": "RUN_OECGI_REQUEST", + "<4300>": "RUN_OECGI_REST_REQUEST", + "<4301>": "RUN_REPORT", + "<4302>": "RUN_REPORTLABEL", + "<4303>": "RWADD", + "<4304>": "RWBROWSE", + "<4305>": "RWCENTER", + "<4306>": "RWCODE", + "<4307>": "RWCOLORS", + "<4308>": "RWDELETE", + "<4309>": "RWDETAILS", + "<4310>": "RWDICT", + "<4311>": "RWDRAG", + "<4312>": "RWD_CREATEPREVIEW", + "<4313>": "RWD_READOIFORMEXE", + "<4314>": "RWEDIT", + "<4315>": "RWIMAGE", + "<4316>": "RWINIT", + "<4317>": "RWLINES", + "<4318>": "RWLINK", + "<4319>": "RWMAIN", + "<4320>": "RWMAKE", + "<4321>": "RWNEW", + "<4322>": "RWOBJECT", + "<4323>": "RWOPEN", + "<4324>": "RWOPTIONS", + "<4325>": "RWPARSE", + "<4326>": "RWPRINT", + "<4327>": "RWQSUBS", + "<4328>": "RWQUICK", + "<4329>": "RWRUNREPORT", + "<4330>": "RWSAVE", + "<4331>": "RWSAVECODE", + "<4332>": "RWSCRIBE", + "<4333>": "RWSCROLL", + "<4334>": "RWSELECT", + "<4335>": "RWSHIFT", + "<4336>": "RWSIZE", + "<4337>": "RWSUBS", + "<4338>": "RWTEMPLATE", + "<4339>": "RWTEST", + "<4340>": "RWTESTPOS", + "<4341>": "RWTESTSAVE", + "<4342>": "RWUPDATE", + "<4343>": "RW_CONNECT", + "<4344>": "RW_GETCOLUMN", + "<4345>": "RW_GETTABLES", + "<4346>": "RW_PROCESS", + "<4347>": "RW_SYMBOLIC", + "<4348>": "R_BASIC", + "<4349>": "R_GET_DBCOLUMN_TABLE", + "<4350>": "R_GET_REPOS_ENTITIES", + "<4351>": "R_GET_REPOS_ENTITY_FLAGS", + "<4352>": "SAMPLE_CHECK", + "<4353>": "SAVELIST_SUB", + "<4354>": "SAVEREPORT", + "<4355>": "SAVE_ENV", + "<4356>": "SAVE_SELECT", + "<4357>": "SA_COLS_POPUP", + "<4358>": "SA_FILES_POPUP", + "<4359>": "SA_LIB", + "<4360>": "SA_WHERE_HELP", + "<4361>": "SCAN_REP", + "<4362>": "SCHEMA_NAME_DEFAULT", + "<4363>": "SCR.GEN", + "<4364>": "SCREENTOCLIENT", + "<4365>": "SCRIBE", + "<4366>": "SCROLL.WINDOW", + "<4367>": "SEARCH_EDITTABLE", + "<4368>": "SEC", + "<4369>": "SECUREACCOUNT_SUB", + "<4370>": "SEEK", + "<4371>": "SELECT.LIST", + "<4372>": "SELECT.SEEK", + "<4373>": "SELECT.SUB", + "<4374>": "SELECT_HASHTABLE", + "<4375>": "SELECT_HELP", + "<4376>": "SELECT_INTO", + "<4377>": "SELECT_INTO_CALLBACK", + "<4378>": "SELECT_VSPRINTER", + "<4379>": "SEMANTICLOGICLAYER", + "<4380>": "SEMVALID", + "<4381>": "SEND", + "<4382>": "SENDMAIL", + "<4383>": "SENDMESSAGE", + "<4384>": "SENDMESSAGE_NULL_ARGS", + "<4385>": "SENDRESPONSE", + "<4386>": "SEND_ARG", + "<4387>": "SEND_DYN", + "<4388>": "SEND_EVENT", + "<4389>": "SEND_INFO", + "<4390>": "SEND_MESSAGE", + "<4391>": "SEND_MESSAGE.NET", + "<4392>": "SEND_MESSAGE_TIMEOUT", + "<4393>": "SEND_REQUEST", + "<4394>": "SET.BREAK.KEY", + "<4395>": "SET.FILE", + "<4396>": "SET.MACROS", + "<4397>": "SET.OPTIONS", + "<4398>": "SETALIAS_SUB", + "<4399>": "SETANSITOUNICODE", + "<4400>": "SETAPPID", + "<4401>": "SETDEBUGGER", + "<4402>": "SETDEBUGGERABORTTOPROC", + "<4403>": "SETDEFAULTCHARACTER", + "<4404>": "SETDEFAULTEPMODE", + "<4405>": "SETDEFAULTEPMODEPRECISION", + "<4406>": "SETDEFAULTSTRCMPMODE", + "<4407>": "SETEPMODE", + "<4408>": "SETEPMODEPRECISION", + "<4409>": "SETERRORMODE", + "<4410>": "SETFOCUS", + "<4411>": "SETINITDIROPTIONS", + "<4412>": "SETIOFLAG", + "<4413>": "SETMINIMUMDELIMITER", + "<4414>": "SETNOOFDELIMITERS", + "<4415>": "SETOEPROFILER", + "<4416>": "SETOISTATE", + "<4417>": "SETOPTIONS_SUB", + "<4418>": "SETPRINTER", + "<4419>": "SETPTR", + "<4420>": "SETSOCKOPT", + "<4421>": "SETSTRCMPMODE", + "<4422>": "SETUPP", + "<4423>": "SETUTF8", + "<4424>": "SETVID", + "<4425>": "SETVOLUME", + "<4426>": "SET_ACTIVE_PRINTER", + "<4427>": "SET_APP_INFO", + "<4428>": "SET_ATTACH_IMAGE", + "<4429>": "SET_BGND_IX_TIME", + "<4430>": "SET_BOND_USER", + "<4431>": "SET_DEFPROP", + "<4432>": "SET_DIALOG_INFO", + "<4433>": "SET_DIALOG_PARAMS", + "<4434>": "SET_ENV", + "<4435>": "SET_EVENTSTATUS", + "<4436>": "SET_FORM_LANGUAGE", + "<4437>": "SET_FSERROR", + "<4438>": "SET_IDXSVR", + "<4439>": "SET_IMPACT", + "<4440>": "SET_LANGUAGE", + "<4441>": "SET_MFS", + "<4442>": "SET_MIOS", + "<4443>": "SET_OIPI_PROPERTIES", + "<4444>": "SET_OISTATE", + "<4445>": "SET_OPTIONS", + "<4446>": "SET_PRINTER", + "<4447>": "SET_PRINTER1", + "<4448>": "SET_PRINTER2", + "<4449>": "SET_PROPERTY", + "<4450>": "SET_PROPERTY.NET", + "<4451>": "SET_PROPERTY_ONLY", + "<4452>": "SET_ROWDEF", + "<4453>": "SET_SORT_FILE", + "<4454>": "SET_STATION", + "<4455>": "SET_STATUS", + "<4456>": "SET_TABLE_APP_PTR", + "<4457>": "SET_TABLE_ATTRIBS", + "<4458>": "SET_TCLPROMPT", + "<4459>": "SET_VSPRINTER", + "<4460>": "SET_WINMSGVAL", + "<4461>": "SFIND", + "<4462>": "SHARESSPS", + "<4463>": "SHELLEXECUTE", + "<4464>": "SHGETFOLDERPATH", + "<4465>": "SHOWBORDER", + "<4466>": "SHOWERROR", + "<4467>": "SHOWSCROLL", + "<4468>": "SHOWWINDOW", + "<4469>": "SHOW_MENU", + "<4470>": "SHUTDOWNDOTNET", + "<4471>": "SI.MFS", + "<4472>": "SINGLETON_DETECT", + "<4473>": "SISTRIPRELATIONALS", + "<4474>": "SI_REDUCTION", + "<4475>": "SLEEPERY", + "<4476>": "SMART_SPLIT", + "<4477>": "SMART_TRIM", + "<4478>": "SMTPMAIL", + "<4479>": "SNDPLAYSOUND", + "<4480>": "SOCKET", + "<4481>": "SOCKETSEND", + "<4482>": "SOCKET_FUNCTIONS", + "<4483>": "SORTFIELDS", + "<4484>": "SORT_EDITTABLE", + "<4485>": "SOUNDEX", + "<4486>": "SP.CLOSE", + "<4487>": "SP.D11", + "<4488>": "SP.DEFINE", + "<4489>": "SP.EDIT", + "<4490>": "SP.INFO", + "<4491>": "SP.KILL", + "<4492>": "SP.OPEN", + "<4493>": "SPIN", + "<4494>": "SPINDEX_EVENTS", + "<4495>": "SPLIT_ON_COMMA", + "<4496>": "SP_OPEN_EVENTS", + "<4497>": "SQL.ALLCNT", + "<4498>": "SQL.AVE", + "<4499>": "SQL.COUNT", + "<4500>": "SQL.DELETE.PROC", + "<4501>": "SQL.DISPLAY", + "<4502>": "SQL.INSERT.PROC", + "<4503>": "SQL.INSERT.VALID", + "<4504>": "SQL.JOIN", + "<4505>": "SQL.MAX", + "<4506>": "SQL.MIN", + "<4507>": "SQL.ORDER.GROUP", + "<4508>": "SQL.QUERY.PROC", + "<4509>": "SQL.SCHEMA", + "<4510>": "SQL.SCHEMA.VIEW", + "<4511>": "SQL.SUB", + "<4512>": "SQL.SUB.EVAL", + "<4513>": "SQL.SUB.RUNTIME", + "<4514>": "SQL.SUM", + "<4515>": "SQL.UPDATE.PROC", + "<4516>": "SQLEXP_CREATE", + "<4517>": "SQLEXP_UPDATES", + "<4518>": "SQLEXP_WIZARD", + "<4519>": "SQLSERVER_SUB", + "<4520>": "SQL_CLEARFILE", + "<4521>": "SQL_CLOSE_CURS", + "<4522>": "SQL_COMPILE", + "<4523>": "SQL_DELETE_POS", + "<4524>": "SQL_DELETE_RUN", + "<4525>": "SQL_DELIMITED", + "<4526>": "SQL_DISPLAY_SETUP", + "<4527>": "SQL_DISTINCT", + "<4528>": "SQL_EMBEDDED", + "<4529>": "SQL_EVENTS", + "<4530>": "SQL_EXPLODE", + "<4531>": "SQL_FETCH", + "<4532>": "SQL_INDEX_REDUCE", + "<4533>": "SQL_INDICATE", + "<4534>": "SQL_IND_TARGET", + "<4535>": "SQL_INSERT_RUN", + "<4536>": "SQL_JOIN_RUN", + "<4537>": "SQL_LIKE", + "<4538>": "SQL_ORDER", + "<4539>": "SQL_ORDER_GROUP_RUN", + "<4540>": "SQL_POSTOP", + "<4541>": "SQL_POSTQUERY", + "<4542>": "SQL_PREOP", + "<4543>": "SQL_PREQUERY", + "<4544>": "SQL_PRMCONV", + "<4545>": "SQL_QUERY_EVAL", + "<4546>": "SQL_QUERY_RUN", + "<4547>": "SQL_RESOLVE_VIEW", + "<4548>": "SQL_SELECT_RUN", + "<4549>": "SQL_SERVER_JOIN_QUERY", + "<4550>": "SQL_SERVER_PROC", + "<4551>": "SQL_SUB", + "<4552>": "SQL_SUBSTR", + "<4553>": "SQL_SUB_EVAL_RUN", + "<4554>": "SQL_UNION", + "<4555>": "SQL_UPDATE_POS", + "<4556>": "SQL_UPDATE_PROC", + "<4557>": "SSN_FORMAT", + "<4558>": "SSN_FORMAT_INTERNAL", + "<4559>": "STANDARD_WINDOW_EVENTS", + "<4560>": "STARTDOTNET", + "<4561>": "STARTPTR", + "<4562>": "STARTSPOOLER", + "<4563>": "STARTTOOL", + "<4564>": "START_CHARACTER", + "<4565>": "START_MDICHILD", + "<4566>": "START_OIWIN", + "<4567>": "START_PROJECT", + "<4568>": "START_WINDOW", + "<4569>": "STATUP", + "<4570>": "STDCRSIO", + "<4571>": "STDIOERR", + "<4572>": "STOP_CHARACTER", + "<4573>": "STORE.QUERY", + "<4574>": "STRCOMPARE", + "<4575>": "STRING_TO_DOUBLE", + "<4576>": "STRING_TO_FLOAT", + "<4577>": "STRUCT_DEF", + "<4578>": "STRUCT_FLUSH", + "<4579>": "STRUCT_LEN", + "<4580>": "STRUCT_TO_VAR", + "<4581>": "STR_ANSI", + "<4582>": "STR_UNICODE", + "<4583>": "STR_UTF8", + "<4584>": "SUB.EDIT", + "<4585>": "SUBR", + "<4586>": "SUB_FORMAT", + "<4587>": "SUM", + "<4588>": "SUSPEND", + "<4589>": "SWAP.CURSOR", + "<4590>": "SWAP_DATABASE", + "<4591>": "SYNCH_REPOS_DATABASE", + "<4592>": "SYNCH_REPOS_DICT", + "<4593>": "SYNCH_REPOS_PROCS", + "<4594>": "SYNCH_REPOS_PROMOTED_EVENTS", + "<4595>": "SYNCH_REPOS_WINS", + "<4596>": "SYSCOLUMNS", + "<4597>": "SYSLOGINS_MFS", + "<4598>": "SYSPRINTERS_LIST", + "<4599>": "SYSPROG_IXLOOKUP.WINDOW.OIWIN_", + "<4600>": "SYSPROG_READ.WINDOW.OIWIN_", + "<4601>": "SYSREL_SUB", + "<4602>": "SYSREPOSWINS_CONTROL_COLUMNNAME", + "<4603>": "SYSREPOSWINS_CONTROL_NAME", + "<4604>": "SYSREPOSWINS_CONTROL_TABLENAME", + "<4605>": "SYSREPOS_CONTROLLER", + "<4606>": "SYSTABLES_OPEN_EVENTS", + "<4607>": "TABLEBROWSER", + "<4608>": "TABLEEXISTS", + "<4609>": "TABLE_BROWSER_EVENTS", + "<4610>": "TABLE_BUILDER_WIZARD", + "<4611>": "TABPAGE", + "<4612>": "TCL", + "<4613>": "TCL.OPTIONS", + "<4614>": "TCLUP", + "<4615>": "TCL_EVENTS", + "<4616>": "TEMPLATE.DOC", + "<4617>": "TEMPLATE.FLUSH", + "<4618>": "TEMPLATE.READ", + "<4619>": "TERM", + "<4620>": "TESTFORMULA", + "<4621>": "TGBFS_MAPDICT", + "<4622>": "TIME", + "<4623>": "TIMEGETTIME", + "<4624>": "TIME_DATE", + "<4625>": "TOGGLEINTENSITY", + "<4626>": "TOLOWER", + "<4627>": "TOUPPER", + "<4628>": "TOUPPEREXQ", + "<4629>": "TRACE", + "<4630>": "TRANS", + "<4631>": "TRANSACT", + "<4632>": "TRANSACT_TCL", + "<4633>": "TUTORIAL", + "<4634>": "TUTORMSG", + "<4635>": "TYPE.PARM.SUBS", + "<4636>": "U2_MAPDICT", + "<4637>": "UCASE", + "<4638>": "UI_MAIN", + "<4639>": "UNASSIGNED", + "<4640>": "UNICODE_ANSI", + "<4641>": "UNICODE_STR", + "<4642>": "UNICODE_UTF8", + "<4643>": "UNLOCK", + "<4644>": "UPCASE", + "<4645>": "UPD.REL.FROM.F", + "<4646>": "UPDATE.BANG", + "<4647>": "UPDATEDBTS", + "<4648>": "UPDATEGENERICCLICKEVENTS", + "<4649>": "UPDATE_COLUMNS", + "<4650>": "UPDATE_DBT_REC", + "<4651>": "UPDATE_INDEX", + "<4652>": "UPDATE_INDEX_10", + "<4653>": "UPDATE_PROC_INFO", + "<4654>": "UPDATE_PROC_LIST", + "<4655>": "UPDATE_REPOS_APP", + "<4656>": "UPDATE_REPOS_LOG", + "<4657>": "UPDATE_REPOS_LOG_TRANS", + "<4658>": "UPDATE_REPOS_TYPE", + "<4659>": "UPGRADE_OI", + "<4660>": "UPRLOWR", + "<4661>": "URLBFS", + "<4662>": "URL_FORMAT", + "<4663>": "USER_MGMT_O4W_COMMUTER_MODULE", + "<4664>": "USER_SUB", + "<4665>": "USE_ATTACH_IMAGE", + "<4666>": "UTC_FORMAT", + "<4667>": "UTF8_ANSI", + "<4668>": "UTF8_STR", + "<4669>": "UTF8_UNICODE", + "<4670>": "UTILITY", + "<4671>": "UTILITYCOPYFILE", + "<4672>": "UTILITYMAKEDIR", + "<4673>": "UTILITYREMOVEDIR", + "<4674>": "UTILITYRENAME", + "<4675>": "UTILITY_DOTNET", + "<4676>": "UTILITY_RUNWIN_DOTNET", + "<4677>": "V1", + "<4678>": "V11", + "<4679>": "V114", + "<4680>": "V116", + "<4681>": "V117", + "<4682>": "V119", + "<4683>": "V12", + "<4684>": "V123", + "<4685>": "V126", + "<4686>": "V15", + "<4687>": "V17", + "<4688>": "V17_TCL", + "<4689>": "V18", + "<4690>": "V18.2", + "<4691>": "V19", + "<4692>": "V2", + "<4693>": "V20", + "<4694>": "V21", + "<4695>": "V23", + "<4696>": "V24", + "<4697>": "V25", + "<4698>": "V26", + "<4699>": "V27", + "<4700>": "V28", + "<4701>": "V29", + "<4702>": "V29_SETUP", + "<4703>": "V30", + "<4704>": "V32", + "<4705>": "V33", + "<4706>": "V34", + "<4707>": "V35", + "<4708>": "V36", + "<4709>": "V37", + "<4710>": "V38", + "<4711>": "V39", + "<4712>": "V41", + "<4713>": "V44", + "<4714>": "V45", + "<4715>": "V53", + "<4716>": "V57", + "<4717>": "V6", + "<4718>": "V60", + "<4719>": "V61", + "<4720>": "V63", + "<4721>": "V64", + "<4722>": "V65", + "<4723>": "V76", + "<4724>": "V77", + "<4725>": "V8", + "<4726>": "V82", + "<4727>": "V83", + "<4728>": "V86", + "<4729>": "V88", + "<4730>": "V9", + "<4731>": "VALID.FILE.NAME", + "<4732>": "VALID.SQL.ID", + "<4733>": "VALIDATE", + "<4734>": "VALIDATENAME", + "<4735>": "VALIDATE_SUBROUTINE", + "<4736>": "VALIDATE_SYSREPOS_IX", + "<4737>": "VALID_DICT", + "<4738>": "VAR_TO_STRUCT", + "<4739>": "VCARD", + "<4740>": "VERB2", + "<4741>": "VERIFILE", + "<4742>": "VERIFY_LH", + "<4743>": "VERSION", + "<4744>": "VIDCTRL", + "<4745>": "VIDEO.RW", + "<4746>": "VIEWER", + "<4747>": "VOLUTIL", + "<4748>": "VSPACE", + "<4749>": "VSPRINTER2_EVENTS", + "<4750>": "VSPRINTER2_EVENTS.092418", + "<4751>": "VSPRINTER2_EVENTS_20220118", + "<4752>": "VSPRINTER_EVENTS", + "<4753>": "WAITFORREPLY", + "<4754>": "WIN.FREEFORM", + "<4755>": "WIN.INT", + "<4756>": "WIN.INT.VIEWER", + "<4757>": "WIN.MPR", + "<4758>": "WIN.PAN", + "<4759>": "WIN.RECORD", + "<4760>": "WINDOW", + "<4761>": "WINDOW.INIT", + "<4762>": "WINEXEC", + "<4763>": "WINTEGRATE_CHILD_FORM", + "<4764>": "WINUS", + "<4765>": "WINYIELD", + "<4766>": "WIZARD", + "<4767>": "WIZARD_DES", + "<4768>": "WIZARD_INVISIBLE", + "<4769>": "WORKSPACE", + "<4770>": "WRE_UPDATE_INDEXES_EVENTS", + "<4771>": "WRITEPRIVATEPROFILESTRING", + "<4772>": "WRITEPROFILESTRING", + "<4773>": "WRITE_COLUMN", + "<4774>": "WRITE_DICT_COLUMN", + "<4775>": "WRITE_LOCK", + "<4776>": "WRITE_ROW", + "<4777>": "WRITE_SOURCE", + "<4778>": "WSACLEANUP", + "<4779>": "WSAGETLASTERROR", + "<4780>": "WSASTARTUP", + "<4781>": "XCONV", + "<4782>": "XML_CONFIG_SUB", + "<4783>": "XML_EXPLORER_EVENTS", + "<4784>": "XML_IMPORTER", + "<4785>": "XML_IMPORTER_EVENTS", + "<4786>": "XML_IMPORTER_SUB", + "<4787>": "XML_MAIN", + "<4788>": "XML_PUBLISHER_SUB", + "<4789>": "XML_SELECT", + "<4790>": "XREF", + "<4791>": "XREF.BROWSE", + "<4792>": "YIELD", + "<4793>": "ZIP_FORMAT", + "<4794>": "ZIP_FORMAT_INTERNAL", + "<4795>": "", + "<4796>": "/* End of list. Leave blank line before this comment! */" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASYSPROMOTEDEVENTNAMES.json b/SYSPROG/APPROW/SYSENV%003ASYSPROMOTEDEVENTNAMES.json new file mode 100644 index 0000000..467e65c --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASYSPROMOTEDEVENTNAMES.json @@ -0,0 +1,62 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROMOTEDEVENTNAMES" + }, + "body": { + "record1": { + "<1>": "SYSPROG*PROMOTEDEVENT*CALCULATE*_.OIWIN", + "<2>": "SYSPROG*PROMOTEDEVENT*CHANGED*CLIPBOARD", + "<3>": "SYSPROG*PROMOTEDEVENT*CHANGED*FILESYSTEM", + "<4>": "SYSPROG*PROMOTEDEVENT*CLEAR*WINDOW.OIWIN", + "<5>": "SYSPROG*PROMOTEDEVENT*CLICK*^PAGESETUP", + "<6>": "SYSPROG*PROMOTEDEVENT*CLICK*_.OIWIN", + "<7>": "SYSPROG*PROMOTEDEVENT*CLOSE*WINDOW.OIWIN", + "<8>": "SYSPROG*PROMOTEDEVENT*CONTEXTMENU*_.OIWIN", + "<9>": "SYSPROG*PROMOTEDEVENT*DELETE*WINDOW.OIWIN", + "<10>": "SYSPROG*PROMOTEDEVENT*DELETEROW*EDITTABLE.OIWIN", + "<11>": "SYSPROG*PROMOTEDEVENT*DROPDOWNMENU*_.OIWIN", + "<12>": "SYSPROG*PROMOTEDEVENT*EDITSTATECHANGED*_.OIWIN", + "<13>": "SYSPROG*PROMOTEDEVENT*FINALIZE*SYSTEM", + "<14>": "SYSPROG*PROMOTEDEVENT*GOTFOCUS*_.OIWIN", + "<15>": "SYSPROG*PROMOTEDEVENT*HELP*_.OIWIN", + "<16>": "SYSPROG*PROMOTEDEVENT*IDLEPROC*SYSTEM", + "<17>": "SYSPROG*PROMOTEDEVENT*INITCONTEXTMENU*_.OIWIN", + "<18>": "SYSPROG*PROMOTEDEVENT*INITIALIZE*SYSTEM", + "<19>": "SYSPROG*PROMOTEDEVENT*INSERTROW*EDITTABLE.OIWIN", + "<20>": "SYSPROG*PROMOTEDEVENT*ITEMCHANGED*_.OIWIN", + "<21>": "SYSPROG*PROMOTEDEVENT*IXLOOKUP*WINDOW.OIWIN", + "<22>": "SYSPROG*PROMOTEDEVENT*IXLOOKUP*_.OIWIN", + "<23>": "SYSPROG*PROMOTEDEVENT*LOGIN*SYSTEM", + "<24>": "SYSPROG*PROMOTEDEVENT*LOSTFOCUS*_.OIWIN", + "<25>": "SYSPROG*PROMOTEDEVENT*MDISELECT*WINDOW.OIWIN", + "<26>": "SYSPROG*PROMOTEDEVENT*NOTES*_.OIWIN", + "<27>": "SYSPROG*PROMOTEDEVENT*OLE*_.OIWIN", + "<28>": "SYSPROG*PROMOTEDEVENT*OPTIONS*_.OIWIN", + "<29>": "SYSPROG*PROMOTEDEVENT*PAGE*WINDOW.OIWIN", + "<30>": "SYSPROG*PROMOTEDEVENT*POSCHANGED*_.OIWIN", + "<31>": "SYSPROG*PROMOTEDEVENT*PROPCHANGED*_.OIWIN", + "<32>": "SYSPROG*PROMOTEDEVENT*QBFABS*_.OIWIN", + "<33>": "SYSPROG*PROMOTEDEVENT*QBFCLOSE*_.OIWIN", + "<34>": "SYSPROG*PROMOTEDEVENT*QBFFIRST*_.OIWIN", + "<35>": "SYSPROG*PROMOTEDEVENT*QBFINIT*_.OIWIN", + "<36>": "SYSPROG*PROMOTEDEVENT*QBFLAST*_.OIWIN", + "<37>": "SYSPROG*PROMOTEDEVENT*QBFLOADLIST*_.OIWIN", + "<38>": "SYSPROG*PROMOTEDEVENT*QBFNEXT*_.OIWIN", + "<39>": "SYSPROG*PROMOTEDEVENT*QBFPREV*_.OIWIN", + "<40>": "SYSPROG*PROMOTEDEVENT*QBFQUERY*_.OIWIN", + "<41>": "SYSPROG*PROMOTEDEVENT*QBFRUN*_.OIWIN", + "<42>": "SYSPROG*PROMOTEDEVENT*QBFTABLE*_.OIWIN", + "<43>": "SYSPROG*PROMOTEDEVENT*READ*WINDOW.OIWIN", + "<44>": "SYSPROG*PROMOTEDEVENT*REQUIRERR*_.OIWIN", + "<45>": "SYSPROG*PROMOTEDEVENT*SELPROPCHANGED*_.OIWIN", + "<46>": "SYSPROG*PROMOTEDEVENT*SORTED*EDITTABLE.OIWIN", + "<47>": "SYSPROG*PROMOTEDEVENT*SYSMSG*_.OIWIN", + "<48>": "SYSPROG*PROMOTEDEVENT*TASKEXIT*SYSTEM", + "<49>": "SYSPROG*PROMOTEDEVENT*VALIDERR*_.OIWIN", + "<50>": "SYSPROG*PROMOTEDEVENT*WRITE*WINDOW.OIWIN", + "<51>": "SYSPROG*PROMOTEDEVENT*_*.OIWIN" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASYSTEM_RESOURCES.json b/SYSPROG/APPROW/SYSENV%003ASYSTEM_RESOURCES.json new file mode 100644 index 0000000..333f605 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASYSTEM_RESOURCES.json @@ -0,0 +1,478 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSTEM_RESOURCES" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "\t\t\t\t\tSYSTEM RESOURCE FILE", + "<3>": "\t", + "<4>": "This file is used by ResToString and with UIRES_EQUATES, REPRES_EQUATES, and WINRES_EQUATES", + "<5>": "", + "<6>": "WIN100 :PS is not running", + "<7>": "WIN101 :Window already exists", + "<8>": "WIN102 : compilation failed!", + "<9>": "", + "<10>": "WIN110 : - ", + "<11>": "WIN111 : - ", + "<12>": "WIN112 : - ", + "<13>": "WIN113 : - ": "WIN114 : - ", + "<15>": "WIN115 : - ": "", + "<17>": "WIN120 :QBF Query Criteria", + "<18>": "WIN130 :Application Note", + "<19>": "WIN131 :Lotus Notes reported an error not known by OpenInsight", + "<20>": "WIN132 :Application Manager", + "<21>": "WIN133 :Invalid item type '%1%'", + "<22>": "WIN134 :Cannot start form %1%", + "<23>": "WIN135 :Help is not available.", + "<24>": "WIN136 :Options are not available.", + "<25>": "", + "<26>": "REP100 :Select Repository", + "<27>": "REP101 :Select Mirror", + "<28>": "REP102 :Compare Rows", + "<29>": "REP103 :Repository / Mirror Comparison ", + "<30>": "REP104 :Selecting table...", + "<31>": "REP105 :Comparing tables...", + "<32>": "REP106 :A physical error has occurred in the %1% table.", + "<33>": "REP107 :A fatal error has occurred in the %1% table.", + "<34>": "REP108 :Row %1% shows differences.", + "<35>": "REP109 :Please notify a system administrator.", + "<36>": "REP110 :Error detail has been written to the OS file 'REVIMAGE.LOG'.", + "<37>": "REP111 :Error: Attaching the repository mirror file failed. Mirroring will not be active for this session.", + "<38>": "REP112 :Aux Value for %1% should be %2% but is '%3%'", + "<39>": "REP113 :Value: %1% is missing from index %2% Page %3%", + "<40>": "REP114 :Primary page of %1% index is missing.", + "<41>": "REP115 :Page %1% of index %2% is missing.", + "<42>": "REP116 :Analyzing", + "<43>": "REP117 :Removing", + "<44>": "REP118 :Adding", + "<45>": "REP119 :Indexing", + "<46>": "REP120 :Removing from Index", + "<47>": "REP121 :Database/Repository Synchronization", + "<48>": "REP122 :Getting Database Table List", + "<49>": "REP123 :Getting Repository Table List", + "<50>": "REP124 :Getting Remove List", + "<51>": "REP125 :Remove: %1%", + "<52>": "REP126 :Get Add List", + "<53>": "REP127 :Add: %1%", + "<54>": "REP128 :Source", + "<55>": "REP129 :Debug Tables", + "<56>": "REP130 :Executables", + "<57>": "REP131 :Inserts", + "<58>": "REP132 :Stored Procedure/Repository Synchronization", + "<59>": "REP133 :Getting Stored Procedure Lists", + "<60>": "REP134 :Removing Entities", + "<61>": "REP135 :Removing Executable Entities", + "<62>": "REP136 :Adding Entities", + "<63>": "REP137 :Adding Executable Entities", + "<64>": "REP138 :Adding Source Entities", + "<65>": "REP139 :Adding Insert Entities", + "<66>": "REP140 :Adding to Index", + "<67>": "REP141 :Initializing", + "<68>": "REP142 :Installing", + "<69>": "REP143 :Selecting records", + "<70>": "REP144 :Installing records", + "<71>": "REP145 :The \"%1%\" location contains indexed tables and cannot be altered.", + "<72>": "REP150 :Undeclared variable", + "<73>": "REP151 :Unused variable", + "<74>": "REP152 :Suspected mistyped syscom vars", + "<75>": "REP153 :Suspected mistyped equate", + "<76>": "REP154 :Suspected dict.equate orphon", + "<77>": "REP155 :Line count: %1%", + "<78>": "REP156 :Extracting", + "<79>": "REP157 :Building", + "<80>": "REP158 :Rebuild Repository Indexes", + "<81>": "REP159 :Extracting Index Information", + "<82>": "REP160 :Building Index %1% of %2%", + "<83>": "", + "<84>": "UI100 :Warning: The specified column could not be verified", + "<85>": "UI101 :Field %1% has not been selected", + "<86>": "UI102 :Column %1% has not been selected", + "<87>": "UI103 :Column %1% does not exist in the %2% DataSet", + "<88>": "UI104 :The Column ID value must be numeric", + "<89>": "UI105 :Invalid Return Type", + "<90>": "UI106 :New", + "<91>": "UI107 :Open", + "<92>": "UI108 :Save As", + "<93>": "UI109 :Open %1%", + "<94>": "UI110 :&%1% Name:", + "<95>": "UI111 :Invalid Column name.%1%Valid column name must be %2%letter[ digit | letter | _ ]...", + "<96>": "UI112 :Validation Error", + "<97>": "UI113 :Invalid Data Type.", + "<98>": "UI114 :Scale for %1% must be between %2% and %3%", + "<99>": "UI115 :Precision for %1% must be between %2% and %3%", + "<100>": "UI116 :Do you want to clear current DataSet definition?", + "<101>": "UI117 :Double click or use Alt-Down for options.", + "<102>": "UI118 :Native Type", + "<103>": "UI119 :OpenInsight Type", + "<104>": "UI120 :Error occurred getting table list", + "<105>": "UI121 :Modifications cannot be made within a transaction. You will not be able to save.", + "<106>": "UI122 :%1% Rows processed", + "<107>": "UI123 :No options available for %1%", + "<108>": "UI124 :Column Name,Data Type,Precision,Scale,Nullable,OI Type", + "<109>": "UI125 :%1% Objects Processed; to view an object's columns, select the object's row and choose \"Query-List Columns\"", + "<110>": "UI126 :Configuration Error", + "<111>": "UI127 :The %1% Data Source \"%2%\" has not been configured", + "<112>": "UI128 :Unable to connect to %1%", + "<113>": "UI129 :Unable to save the defaults", + "<114>": "UI130 :The application settings were successfully updated. %1%Do you want to apply these changes to the current session?", + "<115>": "UI131 :Update Session Settings", + "<116>": "UI132 :An error occurred reading the defaults", + "<117>": "UI133 :Error", + "<118>": "UI140 :&Yes", + "<119>": "UI141 :&No", + "<120>": "UI142 :&Cancel", + "<121>": "UI143 :&OK", + "<122>": "UI144 :OpenInsight", + "<123>": "UI145 :Out of memory, or could not create %1% Dialog Box", + "<124>": "UI146 :The input \"%1%\" does not pass the validation criteria \"%2%\"", + "<125>": "UI147 :Input Validation Error!", + "<126>": "UI148 :Bad Parameters! Text field cannot have field marks", + "<127>": "UI149 :Notes databases and forms", + "<128>": "UI150 :Notes databases and views", + "<129>": "UI151 :Registered databases and views", + "<130>": "UI152 :Registered databases and forms", + "<131>": "UI153 :Default", + "<132>": "UI154 :The sequential counter %1% is empty. Enter an initial value.", + "<133>": "UI155 :Only 1 item exists in the browse list.", + "<134>": "UI156 :Select item to view ( 1 - %1% )", + "<135>": "UI157 :Are you sure you wish to delete all notes in the browse list?", + "<136>": "UI158 :Are you sure you wish to delete the displayed note?", + "<137>": "UI159 :There are no notes in the browse list.", + "<138>": "UI160 :QBF Item Select", + "<139>": "UI161 :QBF Query Criteria", + "<140>": "UI162 :QBF Query Warning", + "<141>": "UI163 :Browse list has reached maximum length with %1% entries. Use truncated list?", + "<142>": "UI164 :Record you are trying to access is already locked, but because of an internal SQl error the current process cannot be canceled. Please, contact DBA to resolve a problem.", + "<143>": "UI165 :SQL read message", + "<144>": "UI166 :Data is required in the following fields:||%1%|", + "<145>": "UI167: No query data entered - do you wish to browse all records?", + "<146>": "UI168: Error parsing the query data - please check and try again", + "<147>": "UI169: There are no records meeting this criteria", + "<148>": "UI170 :&Popup Name", + "<149>": "UI171 :An error ocurred reading the Popup", + "<150>": "UI172 :An error ocurred writing the Popup", + "<151>": "UI173 :The Popup has been modified. Do you want to save the changes?", + "<152>": "UI174 :Changes will not be permitted", + "<153>": "UI175 :(Untitled)", + "<154>": "UI176 :Return Values: %1%", + "<155>": "UI177 :No Value Returned", + "<156>": "UI178 :Specify Arguments", + "<157>": "UI179 :Argument", + "<158>": { + "<158,1>": { + "<158,1,1>": { + "<158,1,1,1>": "UI180 :The Popup displays selected fields from Lotus Notes Documents.", + "<158,1,1,2>": "", + "<158,1,1,3>": "On the following page, select a Notes database, specify either Notes Forms or Views, then select the Fields or Columns to display in the Popup.", + "<158,1,1,4>": "", + "<158,1,1,5>": "Enter the 'Selection Formula' as a Notes Formula. To use a View, enter 'Use ' plus the name of the view.\"" + } + } + }, + "<159>": { + "<159,1>": { + "<159,1,1>": { + "<159,1,1,1>": "UI181 :The Popup displays selected columns from a DataSet.", + "<159,1,1,2>": "", + "<159,1,1,3>": "On the following page, select a DataSet to use as the datasource then select the columns from the DataSet to display in the Popup." + } + } + }, + "<160>": "UI182 :The Popup displays specified columns from a table using a list of keys.", + "<161>": "UI183 :The Popup displays specified columns from a table using an active cursor", + "<162>": { + "<162,1>": { + "<162,1,1>": { + "<162,1,1,1>": "UI184 :The Popup displays data stored in the Popup definition or passed to the Popup programmatically", + "<162,1,1,2>": "", + "<162,1,1,3>": "Specify the data to display in the 'Literal Data' box on the following page. Each line in the box corresponds to a Popup row; multiple columns must be separated by the vertical bar character \"|\"." + } + } + }, + "<163>": { + "<163,1>": { + "<163,1,1>": { + "<163,1,1,1>": "UI185 :The Popup displays multi-valued column data from a specified table row.", + "<163,1,1,2>": "", + "<163,1,1,3>": "On the following page, specify the table name and the row ID to use. In the column layout, the 'Column ID' specifies the field position in the row." + } + } + }, + "<164>": { + "<164,1>": { + "<164,1,1>": { + "<164,1,1,1>": "UI186 :The Popup displays sub-valued data from a specified column of a table row", + "<164,1,1,2>": "", + "<164,1,1,3>": "On the following page, specify the table name, row ID, and column (field position) to use. In the column layout, the 'Column ID' specifies the value position in the specified column of the row." + } + } + }, + "<165>": { + "<165,1>": { + "<165,1,1>": { + "<165,1,1,1>": "UI187 :", + "<165,1,1,2>": "", + "<165,1,1,3>": "On the following page, select a table to use as the data source then select the columns from the table to display in the Popup." + } + } + }, + "<166>": "UI188 :The Popup selects rows from a table and displays specified columns.", + "<167>": { + "<167,1>": { + "<167,1,1>": { + "<167,1,1,1>": "UI189 :", + "<167,1,1,2>": "", + "<167,1,1,3>": "Reduction and sorting criteria are specified in the 'Selection Criteria' box using the R/List syntax." + } + } + }, + "<168>": { + "<168,1>": { + "<168,1,1>": { + "<168,1,1,1>": "UI190 :", + "<168,1,1,2>": "", + "<168,1,1,3>": "The list of keys is specified by entering them (one per line) in the 'List of Keys' box." + } + } + }, + "<169>": { + "<169,1>": { + "<169,1,1>": { + "<169,1,1,1>": "UI191 :", + "<169,1,1,2>": "", + "<169,1,1,3>": "The cursor number, 0-8, is specified in the 'Cursor Number' box." + } + } + }, + "<170>": "UI192 :No popup definition passed to the %1% CREATE event.", + "<171>": "UI193 :There are no results to show", + "<172>": "UI194: \"%1%\" is not a valid ID in the QBF result list", + "<173>": "UI195: QBF Load ID", + "<174>": "UI196: Enter ID of the row to view", + "<175>": "UI197: No QBF owner form ID passed to the %1% dialog", + "<176>": "", + "<177>": "UI200 :Select Notes Documents", + "<178>": "UI201 :Selection Formula", + "<179>": "UI202 :Select DataSet Arguments and Columns", + "<180>": "UI203 :Arguments", + "<181>": "UI204 :Select Table Rows and Columns", + "<182>": "UI205 :Selection Criteria", + "<183>": "UI206 :Specify Table Rows and Select Table Columns", + "<184>": "UI207 :List of Keys", + "<185>": "UI208 :Specify Cursor and Select Table Columns", + "<186>": "UI209 :Cursor Number", + "<187>": "UI210 :Enter Literal Data to Display", + "<188>": "UI211 :Literal Data", + "<189>": "UI212 :Select Table and Row", + "<190>": "UI213 :Row ID", + "<191>": "UI214 :{Row}", + "<192>": "UI215 :{Column}", + "<193>": "UI216 :Select Table, Row and Column", + "<194>": "UI217 :Row ID and Column", + "<195>": "UI218 :Invalid Mode Selected", + "<196>": "UI219 :Database", + "<197>": "UI220 :DataSet", + "<198>": "UI221 :Table", + "<199>": "UI222 :Doc ID", + "<200>": "UI223 :Document Field", + "<201>": "UI224 :Row ID", + "<202>": "UI225 :DataSet Column", + "<203>": "UI226 :Table Column", + "<204>": "UI227 :Component Field", + "<205>": "UI228 :Table \"%1%\" is not attached. Press for a list of available tables", + "<206>": "UI229 :Database \"%1%\" has not been registered. Press for a list of registered Notes databases", + "<207>": "UI230 :Internal calculation error. Contact Technical Support", + "<208>": "UI231 :Are you sure you want to remove all selected items?", + "<209>": "UI232 :Popup Designer", + "<210>": "UI233 :%Default%", + "<211>": "UI234 : ", + "<212>": "UI235 : ", + "<213>": "UI236 : - <%1% Locked>", + "<214>": "UI237 :&Stop", + "<215>": "", + "<216>": "UI250 :The Deployment Definition record: %1% is in use elsewhere and cannot be modified.", + "<217>": "UI251 :Deployment Definition", + "<218>": "UI252 :Save changes to Deployment Definition - %1%", + "<219>": "UI253 :Repository View", + "<220>": "UI254 :\"%1%\" already exists.||Replace existing item?", + "<221>": "UI255 :The Repository View record: %1% is in use elsewhere and cannot be modified.", + "<222>": "UI256 :Save changes to Repository View - %1%", + "<223>": "UI257 :Extraction Path", + "<224>": "UI258 :Deploy,Do Not Deploy,Deploy Empty", + "<225>": "UI259 :\"%1%\" does not exist.", + "<226>": "UI260 :Do you really want to delete item %1%", + "<227>": "UI261 :Extraction progress,Repository Creation,Database Extraction,Entity Extraction,Prepare Application", + "<228>": "UI262 :The specified directory does not exist. Create directory now?", + "<229>": "UI263 :Initializing Repository Tables...", + "<230>": "UI264 :Creating Repository Table: %1%", + "<231>": "UI265 :Copying Repository Table: %1%", + "<232>": "UI266 :Copying System Rows Into: %1%", + "<233>": "UI267 :Build Target Repository Index...", + "<234>": "UI268 :Continue current extraction from failure point?", + "<235>": "UI269 :Extraction succeeded!", + "<236>": "UI270 :Creating Database Table: %1%", + "<237>": "UI271 :Copying Database Table: %1%", + "<238>": "UI272 :Loading View: %1%", + "<239>": "UI273 :Extracting: %1%", + "<240>": "UI274 :Preparing Entity Storage...", + "<241>": "UI275 :The specified directory contains data and cannot be written to.", + "<242>": "UI276 :Delete files created by extraction process?", + "<243>": "UI277 :Options", + "<244>": "UI278 :", + "<245>": "UI279 :", + "<246>": "UI280 :", + "<247>": "UI281 :Untitled", + "<248>": "UI282 :Create Repository,Extract Database,Extract Entities,Prepare Application", + "<249>": "UI283 :Full Deployment,Application Deployment,Application Upgrade", + "<250>": "UI284 :Too many items to display in listbox. List truncated!", + "<251>": "UI285 :No entity selected for alteration!", + "<252>": "UI286 :Rebuilding the Repository Index.", + "<253>": "UI287 :Building Database Definitions.", + "<254>": "UI288 :Saving Application Definitions.", + "<255>": "UI289 :Rebuilding Relational Indexes.", + "<256>": "UI290 :Saving Deployment Definition.", + "<257>": "UI291 :Table Processing", + "<258>": "UI292 :Extract", + "<259>": "UI293 :Item", + "<260>": "UI294 :Item Type", + "<261>": "UI295 :Connection,DataSet", + "<262>": "UI296 :&Entity Name:", + "<263>": "UI297 :Create Alias,Do Not Create", + "<264>": "UI298 :Creating Alias: %1%", + "<265>": "", + "<266>": "UI400 :&Abort", + "<267>": "UI401 :&Retry", + "<268>": "UI402 :&Ignore", + "<269>": "UI403 :The Message has been modified. Do you want to save the changes?", + "<270>": "UI404 :&Help", + "<271>": "UI405 :Table %1% has changed. Do you want to save changes?", + "<272>": "UI406 :An error occured reading the Message.", + "<273>": "UI407 :An error occured writing the Message.", + "<274>": "UI408 :Unable to lock the \"%1%\" Message.", + "<275>": "UI409 :Escape character was returned.", + "<276>": "UI410 :Null was returned.", + "<277>": "UI411 :Unable to save. Duplicate name found: \"%1%\".", + "<278>": "UI412 :The Connection definition has been modified. Do you want to save the changes?", + "<279>": "UI413 :An error occured reading the Connection definition.", + "<280>": "UI414 :An error occured writing the Connection definition.", + "<281>": "UI415 :Unable to lock the \"%1%\" Connection definition.", + "<282>": "UI416 :Select Objects Types", + "<283>": "UI417 :Tables,Views,System Tables,Temporary Tables", + "<284>": "UI418 :%1% Objects Processed; to view an object's columns,|select the object's row and choose \"Query-List Columns\"", + "<285>": "UI419 :%1% Rows Processed", + "<286>": "UI420 :The DataSet has been modified. Do you want to save the changes?", + "<287>": "UI421 :An error occured reading the DataSet definition.", + "<288>": "UI422 :An error occured writing the DataSet definition.", + "<289>": "UI423 :Unable to lock the \"%1%\" DataSet definition.", + "<290>": "UI424 :No %1% Connection is defined for the \"%2%\" Data Source.", + "<291>": "UI425 :Double click or use Alt-Down for options on Data Type, Nulls, or Key.", + "<292>": "UI426 :Connecting to %1%...", + "<293>": "UI427 :Closing Connection to %1%...", + "<294>": "UI428 :Find", + "<295>": "UI429 :Cannot find \"%1%\"", + "<296>": "UI430 :Return value: \"%1%\"", + "<297>": "UI431 :The QuickHelp has been modified. Do you want to save the changes?", + "<298>": "UI432 :An error occured reading the QuickHelp definition.", + "<299>": "UI433 :An error occured writing the QuickHelp definition.", + "<300>": "UI434 :Unable to lock the \"%1%\" QuickHelp definition.", + "<301>": { + "<301,1>": "UI435 :,BO,A,,1,-1,-1,T,,1", + "<301,2>": "0", + "<301,3>": { + "<301,3,1>": "0,,Message Caption,,,0,,1,Tahoma", + "<301,3,2>": "-11", + "<301,3,3>": "400", + "<301,3,4>": "0", + "<301,3,5>": "0", + "<301,3,6>": "5", + "<301,3,7>": "0", + "<301,3,8>": "39", + "<301,3,9>": "0", + "<301,3,10>": "0", + "<301,3,11>": "0", + "<301,3,12>": "0", + "<301,3,13>": "11", + "<301,3,14>": "2", + "<301,3,15>": "0", + "<301,3,16>": "21,0" + } + }, + "<302>": { + "<302,1>": { + "<302,1,1>": "UI436 :-1,-1,-1,-1,16777215,Segoe UI", + "<302,1,2>": "-11", + "<302,1,3>": "400", + "<302,1,4>": "0", + "<302,1,5>": "0", + "<302,1,6>": "6", + "<302,1,7>": "0", + "<302,1,8>": "39", + "<302,1,9>": "0", + "<302,1,10>": "0", + "<302,1,11>": "0", + "<302,1,12>": "0", + "<302,1,13>": "11", + "<302,1,14>": "2", + "<302,1,15>": "0", + "<302,1,16>": "21,,,,L,1,,1,F,1,1,1,1,1,1,1,0,0,0,0,,,,0,0,0,0,0,," + } + }, + "<303>": "", + "<304>": "UI440 :Entity &Name", + "<305>": "UI441 :List Entities of &Type", + "<306>": "UI442 :Item &Name", + "<307>": "UI443 :List Items of &Type", + "<308>": "UI444 :\"%1%\" belongs to another application.||If you save it, a new item will be created in your application and the original will no longer be accessible.", + "<309>": "UI445 :\"%1%\" belongs to another application.||Do you want to override it in the current application?", + "<310>": "", + "<311>": "CHK100: Could not create directory %1%.", + "<312>": "CHK101: Check-out status %1% cannot be processed.", + "<313>": "CHK102: Could not create hot repository on %1%.", + "<314>": "CHK103: Could not create cold repository on %1%.", + "<315>": "CHK104: Volume %1% already exists. Repository could not be created.", + "<316>": "CHK105: Invalid repository format %1%", + "<317>": "", + "<318>": "ASCII5 : (Untitled)", + "<319>": "ASCII6 : Import ASCII - ", + "<320>": "ASCII7 : Data Files (*.DAT)\\*.DAT\\Text Files (*.TXT)\\*.TXT\\All Files (*.*)\\*.*\\", + "<321>": "ASCII8 : Comma Delimited,Comma and Quote Delimited,Text,Fixed Length Fields,Other", + "<322>": "ASCII9 : Delimiters are required for variable length files.", + "<323>": "ASCII10: DOS file type is required.", + "<324>": "ASCII11: No options are available.", + "<325>": "ASCII12: Column values are required.", + "<326>": "ASCII13: Error writing %1% to table %2%. ", + "<327>": "ASCII14: Error opening table %1%.", + "<328>": "ASCII15: Are you sure that you want to quit?", + "<329>": "ASCII16: Error reading dos file.", + "<330>": "ASCII17: A process name is required.", + "<331>": "ASCII18: An ASCII filename is required.", + "<332>": "ASCII19: A table name is required.", + "<333>": "ASCII20: The 'Total Row Length' prompt is required.", + "<334>": "ASCII21: Process name %1% does not exist.", + "<335>": "ASCII22: If no record delimiter is specified a record length must be specified.", + "<336>": "ASCII23: The OpenInsight table %1% already exists. Do you want to clear it?", + "<337>": "ASCII24: The %1% table is not available.", + "<338>": "ASCII25: There are no files to import.", + "<339>": "ASCII25: Do you wish to presize the OpenInsight table? (Presizing the table will speed up the import process.)", + "<340>": "ASCII27: Unable to open DOS file %1%.", + "<341>": "ASCII28: A starting byte and a length are required.", + "<342>": "ASCII29: Processing files...", + "<343>": "ASCII30: This Import ASCII process was last performed on %1% when %2% rows were imported. Do you want to restart the import process from the next ASCII row?", + "<344>": "ASCII31: Do you wish to cancel import?", + "<345>": "ASCII32: Process cancelled. %1% rows processed.", + "<346>": "ASCII33: Import ASCII process completed. %1% rows imported.", + "<347>": "ASCII34: Invalid data in row %1% Continue import?", + "<348>": "", + "<349>": "ERR001: No method passed to the %1% procedure", + "<350>": "ERR002: Invalid method \"%1%\" passed to the %2% procedure", + "<351>": "ERR003: The \"%1%\" method in the %2% procedure is deprecated", + "<352>": "ERR004: The \"%1%\" method in the %2% procedure is not implemented", + "<353>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ASYS_TABLE_TYPES.json b/SYSPROG/APPROW/SYSENV%003ASYS_TABLE_TYPES.json new file mode 100644 index 0000000..a51db0f --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ASYS_TABLE_TYPES.json @@ -0,0 +1,119 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYS_TABLE_TYPES" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": "RTP57", + "<1,2>": "OpenInsight Tables", + "<1,3>": "0", + "<1,4>": "1" + }, + "<2>": { + "<2,1>": "RTP50", + "<2,2>": "Memory Resident (system)", + "<2,3>": "0", + "<2,4>": "0" + }, + "<3>": { + "<3,1>": "SYSCOLUMNS", + "<3,2>": "System Dictionary", + "<3,3>": "0", + "<3,4>": "0" + }, + "<4>": { + "<4,1>": "DSBFS", + "<4,2>": "SQL Dataset Tables", + "<4,3>": "1", + "<4,4>": "1" + }, + "<5>": { + "<5,1>": "CBBFS", + "<5,2>": "Cloud Based Tables", + "<5,3>": "0", + "<5,4>": "1" + }, + "<6>": { + "<6,1>": "U2_BFS", + "<6,2>": "U2 Server Tables", + "<6,3>": "1", + "<6,4>": "1" + }, + "<7>": { + "<7,1>": "UVBFS", + "<7,2>": "Univision Tables", + "<7,3>": "1", + "<7,4>": "1" + }, + "<8>": { + "<8,1>": "ASCII_BFS", + "<8,2>": "ASCII Connector", + "<8,3>": "1", + "<8,4>": "1" + }, + "<9>": { + "<9,1>": "RTP53A", + "<9,2>": "DOS", + "<9,3>": "0", + "<9,4>": "0" + }, + "<10>": { + "<10,1>": "URLBFS", + "<10,2>": "URL", + "<10,3>": "0", + "<10,4>": "0" + }, + "<11>": { + "<11,1>": "U2UBFS", + "<11,2>": "UniObjects.Net Connector", + "<11,3>": "1", + "<11,4>": "1" + }, + "<12>": { + "<12,1>": "TGBFS", + "<12,2>": "Tiger D3 Bond", + "<12,3>": "1", + "<12,4>": "1" + }, + "<13>": { + "<13,1>": "DSBFS", + "<13,2>": "Dataset Server Bond", + "<13,3>": "1", + "<13,4>": "1" + }, + "<14>": { + "<14,1>": "UVBFS", + "<14,2>": "Univision Bond", + "<14,3>": "1", + "<14,4>": "1" + }, + "<15>": { + "<15,1>": "RTP57E", + "<15,2>": "Encrypted Tables", + "<15,3>": "0", + "<15,4>": "1" + }, + "<16>": { + "<16,1>": "MVBFS", + "<16,2>": "MV Tables", + "<16,3>": "1", + "<16,4>": "1" + }, + "<17>": { + "<17,1>": "RTI_MEMBFS", + "<17,2>": "Memory Resident (application)", + "<17,3>": "0", + "<17,4>": "0" + }, + "<18>": { + "<18,1>": "RTP30T", + "<18,2>": "OSDIR", + "<18,3>": "0", + "<18,4>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003ATXT_VALIDATION.json b/SYSPROG/APPROW/SYSENV%003ATXT_VALIDATION.json new file mode 100644 index 0000000..8506660 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003ATXT_VALIDATION.json @@ -0,0 +1,82 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "TXT_VALIDATION" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "|-and-|", + "<3>": "||-or-|", + "<4>": "", + "<5>": "", + "<6>": { + "<6,1>": "", + "<6,2>": "The data must be a Boolean response of \"%1%\" or \"%2%\"", + "<6,3>": "The data must be a Boolean response starting with \"%1%\" or \"%2%\"", + "<6,4>": { + "<6,4,1>": "", + "<6,4,2>": "The data must be a valid date in the format:| [Month] [Day] [Year]", + "<6,4,3>": "The data must be a valid date in the format:| [Day] [Month] [Year]", + "<6,4,4>": "The data must be a valid date in the format:| [Month] [Year] [Day]", + "<6,4,5>": "The data must be a valid date in the format:| [Year] [Day] [Month]", + "<6,4,6>": "The data must be a valid date in the format:| [Month] [Day] [Year]", + "<6,4,7>": "The data must be a valid date in the format:| [Day] [Year] [Month]", + "<6,4,8>": "The data must be a valid date in the format:| [Year] [Month] [Day]" + }, + "<6,5>": "The data must be a valid time in the format:| [Hour] [Minute] [Second]", + "<6,6>": { + "<6,6,1>": "", + "<6,6,2>": "The data must be a valid date/time in the format:| [Month] [Day] [Year] [Hour] [Minute] [Second]", + "<6,6,3>": "The data must be a valid date/time in the format:| [Day] [Month] [Year] [Hour] [Minute] [Second]", + "<6,6,4>": "The data must be a valid date/time in the format:| [Month] [Year] [Day] [Hour] [Minute] [Second]", + "<6,6,5>": "The data must be a valid date/time in the format:| [Year] [Day] [Month] [Hour] [Minute] [Second]", + "<6,6,6>": "The data must be a valid date/time in the format:| [Month] [Day] [Year] [Hour] [Minute] [Second]", + "<6,6,7>": "The data must be a valid date/time in the format:| [Day] [Year] [Month] [Hour] [Minute] [Second]", + "<6,6,8>": "The data must be a valid date/time in the format:| [Year] [Month] [Day] [Hour] [Minute] [Second]" + }, + "<6,7>": "The data must be a decimal number with a precision of %1% places", + "<6,8>": "The data must be a comma delimited decimal with a precision of %1% places", + "<6,9>": "The data must be a valid binary number", + "<6,10>": "The data must be a valid octal number", + "<6,11>": "The data must be a number in scientific notation", + "<6,12>": "The data must be a hexadecimal number", + "<6,13>": "A hexadecimal number", + "<6,14>": "A varbinary number", + "<6,15>": "The validation pattern: \"%1%\"" + }, + "<7>": "The data entered must be a number from %1% to %2% inclusive", + "<8>": "The data entered must be a number less than or equal to %1%", + "<9>": "DOS test failed", + "<10>": "The validation requirement enforced by the Catalyst routine \"%1%\"", + "<11>": "The data entered must be a row id in the \"%1%\" table", + "<12>": "The data entered must Not be a row id in the \"%1%\" table", + "<13>": "The validation requirement enforced by the Dictionary symbolic \"%1%\"", + "<14>": "The validation requirement enforced by the User Conversion Subroutine \"%1%\"", + "<15>": "The data entered must be unique in the column", + "<16>": { + "<16,1>": "", + "<16,2>": "", + "<16,3>": "^^-and-^^|", + "<16,4>": "The data must be %1% number(s)", + "<16,5>": "The data must be 1 or more number(s)", + "<16,6>": "The data must be %1% alpha characters(s)", + "<16,7>": "The data must be 1 or more alpha character(s)", + "<16,8>": "The data must contain any %1% character(s)", + "<16,9>": "The data must contain 1 or more of any character(s)", + "<16,10>": "The data must contain up to %1% of any character(s)", + "<16,11>": "The data must match : \"%1%\"", + "<16,12>": "Bad MATCHES pattern: \"%1%\"" + }, + "<17>": "The data entered must be \"%1%\"", + "<18>": { + "<18,1>": "The data entered must be in this list of items:|", + "<18,2>": "^65", + "<18,3>": " \"%1%\"", + "<18,4>": ", \"%1%\"", + "<18,5>": " or \"%1%\"" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003AUSR_EXAMPLES.json b/SYSPROG/APPROW/SYSENV%003AUSR_EXAMPLES.json new file mode 100644 index 0000000..5a25c10 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003AUSR_EXAMPLES.json @@ -0,0 +1,12 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "USR_EXAMPLES" + }, + "body": { + "record1": { + "<1>": "KVOC^BK]óKVOC^BK]A:Yð<ò?òó<ò?òð\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000eˆ…Á›tW„™€Œ‘„’Žõ–+$ó|\u0010\u000f\fn†œ”•$§}T" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003AUSR_SYSPROG.json b/SYSPROG/APPROW/SYSENV%003AUSR_SYSPROG.json new file mode 100644 index 0000000..ae256eb --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003AUSR_SYSPROG.json @@ -0,0 +1,17 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "USR_SYSPROG" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": "–œ–•—Š‚8„„œ„8ŠŒ†Š‹–Š‰€;÷9ô988÷9ô9;BB\u0019ð\u0002\u0012:J@JIKV^¥ÒhËÇ.ƒ€Su\u0013|¹ñ{²°7{Þ\\§y^W™ã", + "<1,1,2>": "©ÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅIBŸ \u0017zé\u001epFˆÆÌÆÌÏÍÐØÄÇ¥MW_^ïl¶ŸË^\r\b@ˆ%1)Oá³" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003AWAREHOUSE_TEMPLATE.json b/SYSPROG/APPROW/SYSENV%003AWAREHOUSE_TEMPLATE.json new file mode 100644 index 0000000..cec56ca --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003AWAREHOUSE_TEMPLATE.json @@ -0,0 +1,220 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "WAREHOUSE_TEMPLATE" + }, + "body": { + "record1": { + "<1>": "function WP_{procname}(Instruction, Handle, Info)", + "<2>": "", + "<3>": "*****************************************************************************", + "<4>": "*", + "<5>": "* Name : WP_{procname}", + "<6>": "* Description: Warehouse Procedure", + "<7>": "*", + "<8>": "* LH Table : {table}", + "<9>": "{datasetcomment}", + "<10>": "{sqltablecomment}", + "<11>": "*", + "<12>": "* History (Date, Initials, Notes)", + "<13>": "* {date} cwp Generated by the Create Warehouse Procedure wizard.", + "<14>": "*", + "<15>": "*****************************************************************************", + "<16>": "", + "<17>": "declare function SQLExp_Select", + "<18>": "", + "<19>": "$insert Logical", + "<20>": "$insert DS_Equates", + "<21>": "$insert XO_Equates", + "<22>": "", + "<23>": "equ CRLF$ to \\0D0A\\", + "<24>": "", + "<25>": "******", + "<26>": "* Main", + "<27>": "******", + "<28>": " Ret = TRUE$", + "<29>": " on Instruction gosub CreateTables, ClearTables, DropTables, ProcessInit, ProcessRecord, ProcessTerm", + "<30>": " return Ret", + "<31>": "", + "<32>": "", + "<33>": "*******************", + "<34>": "* Create SQL Tables", + "<35>": "*******************", + "<36>": "* Instruction [in ] - 1", + "<37>": "* Handle [in ] - Query Handle (hQry)", + "<38>": "* Ret [out] - TRUE$ on success, FALSE$ otherwise", + "<39>": "CreateTables:", + "<40>": "{createscript}", + "<41>": "return", + "<42>": "", + "<43>": "", + "<44>": "******************", + "<45>": "* Clear SQL Tables", + "<46>": "******************", + "<47>": "* Instruction [in ] - 2", + "<48>": "* Handle [in ] - Query handle (hQry)", + "<49>": "* Ret [out] - TRUE$ on success, FALSE$ otherwise", + "<50>": "ClearTables:", + "<51>": "{clearscript}", + "<52>": "return", + "<53>": "", + "<54>": "", + "<55>": "*****************", + "<56>": "* Drop SQL Tables", + "<57>": "*****************", + "<58>": "* Instruction [in ] - 3", + "<59>": "* Handle [in ] - Query handle (hQry)", + "<60>": "* Ret [out] - TRUE$ on success, FALSE$ otherwise", + "<61>": "DropTables:", + "<62>": "{dropscript}", + "<63>": "return", + "<64>": "", + "<65>": "", + "<66>": "**********************************", + "<67>": "* Initialize Warehousing Procedure", + "<68>": "**********************************", + "<69>": "* Instruction [in ] - 4", + "<70>": "* Handle [in ] - Connection handle (hXO)", + "<71>": "* [out] - @fm-delimited DataSet handles (hDS)", + "<72>": "* Info [in ] - Requested warehouse type (e.g. FULL, UPDATES)", + "<73>": "* [out] - LH table name", + "<74>": "* cursor #0 [out] - A select list of keys to warehouse", + "<75>": "* @reccount [out] - Number of keys in the select list", + "<76>": "* Ret [out] - TRUE$ on success, FALSE$ otherwise", + "<77>": "ProcessInit:", + "<78>": " Table = \"{table}\"", + "<79>": "{datasetnames}", + "<80>": " DSHandles = \"\"", + "<81>": "", + "<82>": " * the SQLExp_Select function selects the LH records to warehouse;", + "<83>": " * by encapsulating this functionality in a separate procedure,", + "<84>": " * addition warehouse types can be added without requiring changes", + "<85>": " * to individual Warehouse Procedures", + "<86>": " clearselect 0", + "<87>": " Ret = SQLExp_Select(Table, Info)", + "<88>": "", + "<89>": " if Ret then", + "<90>": " * create DataSets", + "<91>": " Count = count(DSNames, @fm) + (DSNames # \"\")", + "<92>": " for i = 1 to Count", + "<93>": " hDS = DSInstance(DSNames, Handle)", + "<94>": " if hDS else", + "<95>": " Ret = FALSE$", + "<96>": " end", + "<97>": " while Ret", + "<98>": " DSHandles = hDS", + "<99>": " next i", + "<100>": "", + "<101>": " * if one DataSet failed creation, destroy all DataSets", + "<102>": " if Ret else", + "<103>": " for i = 1 to Count", + "<104>": " hDS = DSHandles", + "<105>": " if hDS then", + "<106>": " DSMethod(hDS, DS_DESTROY$)", + "<107>": " DSHandles = 0", + "<108>": " end", + "<109>": " next i", + "<110>": " end", + "<111>": " end", + "<112>": "", + "<113>": " * return DataSet handles in Handle parameter", + "<114>": " Handle = DSHandles", + "<115>": "", + "<116>": " * return LH table name in Info parameter", + "<117>": " Info = Table", + "<118>": "return", + "<119>": "", + "<120>": "", + "<121>": "************************", + "<122>": "* Warehouse an LH Record", + "<123>": "************************", + "<124>": "* Instruction [in ] - 5", + "<125>": "* Handle [in ] - @fm-delimited DataSet handles (hDS)", + "<126>": "* Info [in ] - if TRUE$, the Warehouse Procedure must first remove", + "<127>": "* any existing data from the warehouse which corresponds", + "<128>": "* to this record", + "<129>": "* @id [in ] - the ID of the LH record", + "<130>": "* @record [in ] - the LH record", + "<131>": "* @mv [in ] - zero (all)", + "<132>": "* @dict [in ] - the table's dictionary file handle", + "<133>": "* Ret [out] - TRUE$ on success, FALSE$ otherwise", + "<134>": "ProcessRecord:", + "<135>": " * calculate \"base\" key fields", + "<136>": "{calcbasefields}", + "<137>": "", + "<138>": " * delete existing data", + "<139>": " if Info then", + "<140>": " * set DataSet arguments (the base key fields)", + "<141>": " Args = \"\"", + "<142>": "{argnames}", + "<143>": "", + "<144>": " Vals = \"\"", + "<145>": "{argvalues}", + "<146>": "", + "<147>": " Count = count(Handle, @fm) + (Handle # \"\")", + "<148>": " for i = 1 to Count", + "<149>": " Ret = DSSetProperty(Handle, DS_ARG$, Vals, Args)", + "<150>": " next i", + "<151>": "", + "<152>": " * execute DataSets", + "<153>": " for i = 1 to Count", + "<154>": " Ret = DSMethod(Handle, DS_EXECUTE$)", + "<155>": " while Ret", + "<156>": " next i", + "<157>": "", + "<158>": " * delete all rows from DataSets", + "<159>": " if Ret then", + "<160>": " for i = 1 to Count", + "<161>": " DSGetProperty(Handle, DS_ROWCOUNT$, RowCount)", + "<162>": " DSSetProperty(Handle, DS_ROWID$, 1)", + "<163>": " for iRow = 1 to RowCount", + "<164>": " DSMethod(Handle, DS_DELETE$)", + "<165>": " next iRow", + "<166>": " next i", + "<167>": " end", + "<168>": " end", + "<169>": "", + "<170>": " * insert new data", + "<171>": " if Ret and len(@record) then", + "<172>": " * calculate all used fields", + "<173>": "{calcotherfields}", + "<174>": "", + "<175>": "{filldatasets}", + "<176>": " end", + "<177>": "return", + "<178>": "", + "<179>": "", + "<180>": "*********************************", + "<181>": "* Terminate Warehousing Procedure", + "<182>": "*********************************", + "<183>": "* Instruction [in ] - 6", + "<184>": "* Handle [in ] - @fm-delimited DataSet handles (hDS)", + "<185>": "* Ret [out] - TRUE$ on success, FALSE$ otherwise", + "<186>": "ProcessTerm:", + "<187>": " * destroy all DataSets", + "<188>": " Count = count(Handle, @fm) + (Handle # \"\")", + "<189>": " for i = 1 to Count", + "<190>": " hDS = Handle", + "<191>": " if hDS then", + "<192>": " DSMethod(hDS, DS_DESTROY$)", + "<193>": " Handle = 0", + "<194>": " end", + "<195>": " next i", + "<196>": "return", + "<197>": "", + "<198>": "", + "<199>": "**********************", + "<200>": "* Execute a SQL Script", + "<201>": "**********************", + "<202>": "* Handle [in ] - Query Handle (hQry)", + "<203>": "* Script [in ] - SQL Script", + "<204>": "* Ret [out] - Cumulative result: Assumed to start as TRUE$, failure sets to FALSE$, never reset to TRUE$", + "<205>": "ExecuteScript:", + "<206>": " Ret = (Ret and QryMethod(Handle, QRY_EXECUTE$, Script))", + "<207>": " QryMethod(Handle, QRY_CANCEL$)", + "<208>": "return", + "<209>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003AWIZARD_BITMAP.json b/SYSPROG/APPROW/SYSENV%003AWIZARD_BITMAP.json new file mode 100644 index 0000000..56ed5b5 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003AWIZARD_BITMAP.json @@ -0,0 +1,169 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "WIZARD_BITMAP" + }, + "body": { + "record1": { + "<1>": "BMöp\u0000\u0000\u0000\u0000\u0000\u00006\u0004\u0000\u0000(\u0000\u0000\u0000w\u0000\u0000\u0000è\u0000\u0000\u0000\u0001\u0000\b\u0000\u0000\u0000\u0000\u0000Àl\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000€€€\u0000\u0000\u0000€\u0000\u0000€€\u0000\u0000€\u0000\u0000€€\u0000\u0000€\u0000\u0000\u0000€\u0000€\u0000@€€\u0000@@\u0000\u0000" + }, + "record2": { + "<1>": "€\u0000\u0000€@\u0000\u0000" + }, + "record3": { + "<1>": "\u0000@\u0000\u0000@€\u0000" + }, + "record4": { + "<1>": "" + }, + "record5": { + "<1>": "" + }, + "record6": { + "<1>": "\u0000ÀÀÀ\u0000\u0000\u0000" + }, + "record7": { + "<1>": "\u0000\u0000" + }, + "record8": { + "<1>": "" + }, + "record9": { + "<1>": "\u0000\u0000" + }, + "record10": { + "<1>": "\u0000\u0000" + }, + "record11": { + "<1>": "" + }, + "record12": { + "<1>": "\u0000\u0000" + }, + "record13": { + "<1>": "\u0000\u0000\u0000" + }, + "record14": { + "<1>": "\u0000" + }, + "record15": { + "<1>": "\u0000€" + }, + "record16": { + "<1>": "" + }, + "record17": { + "<1>": "\u0000€" + }, + "record18": { + "<1>": "\u0000\u0000" + }, + "record19": { + "<1>": "" + }, + "record20": { + "<1>": "€\u0000" + }, + "record21": { + "<1>": "€€\u0000€\u0000" + }, + "record22": { + "<1>": "\u0000@€" + }, + "record23": { + "<1>": "\u0000\u0002\u0000ˆ\u0000\u0002\u0000X\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0015„¬\u0000‘\u0003ž\u0000\u0000\u0000Ð\u0000\u0002\u0000\u0018\u0000\u0000\u0000\u0011\u0000\u0000\u0000\u0003\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000 \u0000º\u0000\u0000\u0000\u0000°\u0000[\u0000l\u0000[\u0000¸\u0000¸" + }, + "record24": { + "<1>": "\u0000" + }, + "record25": { + "<1>": "" + }, + "record26": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "P\u0000[\u0000&\u0000·ø\u0000]\u0000\u0018\u0000\u0000\u0000\n\u0000\u0000\u0000\u0001\u0000\u0000\u0000\u0000\u0000\u0000\u00008\u0000[\u0000¦\u0000\u0000\u0000c\u0000÷¿\u0018\u0000\u0000\u0000\n\u0000\u0000\u0000\u0001\u0000\u0000\u0000\u0000\u0000\u0000\u0000¿\u0000€„?\u0000\u0000\u0000d\u0000[\u0000#\u0000÷¿\u0000\u0000\u0000\u0000ç\u0000\u0001\u0000å\u0000ù¿y\u0000÷¿ \u0000\u0000\u0000ˆ\u0000[\u0000.\u0000÷¿¿\u0000€„\u0000\u0000\u0000\u0000€\u0000çN\u0000\u0000\u0000\u0000F\u0000\u0000\u0000Þ\u0000\u0002\u0000.\u0000\u0000\u0000ç\u0000\u0000\u0000?\u0000'\u0001\u0000\u0000çN?\u0000'\u0001ä\u0000", + "<1,1,1,1,2>": ";\u0007\u0000\u0004\u0000\u0000\u0000\u0000\u0000\u0000\u0000ù\u001a·\u0000\u0000\u0000\u0000\u0000\u0001\u0000\u0000\u0000\n\u0000\u0000\u0000", + "<1,1,1,1,3>": ";\u0010\u0000\u0000\u0000\u0000\u0000\u0000\u0000Ð\u0000Óy" + } + } + } + } + }, + "record27": { + "<1>": "\u0000çNä\u0000A<\u0007\u0000" + }, + "record28": { + "<1>": "" + }, + "record29": { + "<1>": "ç\u0000\u0000\u0000\u0000\u0000çN?\u0000Э \u0000\u0000\u0000\u0003\u0000ù\u001a·\u0000ç‚Ï\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0001\u0000\n\u0000\u0018\u0000?\u0001\u0000\u0000\b\u0000\u0000\u0000ç\u0016Y\u0000·¨\u0000[\u0000(\u0000[\u0000\u0007\u0000¸" + }, + "record30": { + "<1>": "\u0000" + }, + "record31": { + "<1>": "" + }, + "record32": { + "<1>": "4\u0000[\u0000â\u0000·¨\u0000[\u0000@\u0000[\u0000Â\u0000¸" + }, + "record33": { + "<1>": "\u0000" + }, + "record34": { + "<1>": "" + }, + "record35": { + "<1>": "L\u0000[\u0000°\u0000·¨\u0000[\u0000X\u0000[\u00005\u0000¸" + }, + "record36": { + "<1>": "\u0000" + }, + "record37": { + "<1>": "" + }, + "record38": { + "<1>": "d\u0000[\u0000a\u0000A\u0000¨\u0000[\u0000p\u0000[\u0000n\u0000A\u0000" + }, + "record39": { + "<1>": "\u0000" + }, + "record40": { + "<1>": "" + }, + "record41": { + "<1>": "|\u0000[\u0000Á\u0000A\u0000¨\u0000[\u0000ˆ\u0000[\u0000Ü\u0000A\u0000" + }, + "record42": { + "<1>": "\u0000" + }, + "record43": { + "<1>": "" + }, + "record44": { + "<1>": "”\u0000[\u0000\u0018\u0000A\u0000¨\u0000[\u0000ˆ\u0000[\u0000%\u0000A\u0000" + }, + "record45": { + "<1>": "\u0000" + }, + "record46": { + "<1>": "" + }, + "record47": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "”\u0000[\u0000œ\u0000A\u0000\u0011\u0000\u0000\u0000\u0001\u0000\u0000\u0000\u0000\u0000\u0000\u0000˜\u0000º\u0001\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0001\u0000\u0000\u0002\u0001\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0014\u0000\u001a€\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0005\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000L\u0000\u0000\u0000\u0018\u0000\u0000\u0000\u0000\u0000\u0000\u0000È\u0000]\u0000\u0000\u0000\u0000\u0000\u0005\u0000\u0000\u0000\u0003\u0000\u0000\u00004\u0000]\u0000\u0004\u0000\u0000\u0000H\u0000[\u0000@\u0000\u0000\u0000\u0000\u0000\u0000\u0000 \u0000]\u0000&\u0000\b\u0000\u0015\u0000\u001e\u0000L\u0000]\u0000\u0000\u0000\u0000\u0000ò\u0000¸\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000È\u0000»\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000c\u0000kre\u0000os.\u0000mp\u0000\u0000\u0000\u0000\u0000\u0000\u0018\u0002 \u0000\u001c\u0002\u001c\u0000 \u0000\u0018\u0000\u0000\u0000\u0001\u0000{QÐ\u0000\u0002\u0000†\u00001\u0003Ï\u0000\u0000\u0000\u0000\u0000\u0000\u0002\u001c\u0000 \u0000Ð\u0000\u0002\u00006\u0000´†\u0000\u0000\u0007\u0017\u0000\u0000\u0000\u0000\u0000\u0000\u001c\u0002 \u0000\u0018\u000e\u0018\u0000 \u0000\u001c\u0000\u0000\u0000\u0000\u0000P:\u0000\u0000ÐL\u0000\u0000¸†P\u0000@:\u0000\u0000P:\u0000\u0000ĆP\u0000\u0017\u0001,\u0000\u0014\u0005\u0000\u0000\u0000\u0000\u0002\u0000’\u0004\u0000\u0000\u0000\u0000º\u0000\u0000\u0000\u0000\u0000P:\u0000\u0000\u0006‡\u0000\u0000î†\u0000\u0000\u0000\u0000\u0000\u0000\u0001\u0000\u0000\u0000\u0000\u0000À\u0000\u0000\u0000", + "<1,1,1,1,2>": "\u0000P\u0017\u0000S@\u0000×L/\u00004‡n\u0000\u0017\u0001d\u0000/\u0001\u0000\u0000\u0000\u0000À\u0000\u0000\u00004\u0000\u0000\u0000$\u0000\u0000\u0000Ð\u0000\u0000\u0000×\u0000\u0000\u0000\u0001\u0000\u0000\u0000@\u0000\u0000\u0000\u0000\u0000/\u0001@\u0000]\u0000Ð\u0000\u0000\u0000>\u0000P\u0017\u0000SÐ\u0000)yN\u0000º¨º\u0000‡\u0005€\u0000¬\u00117\u0000æ\u0019¦\u0000\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u0005\u000e\u0000\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u000e\u0000" + } + } + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003AWIZARD_SHEETS.json b/SYSPROG/APPROW/SYSENV%003AWIZARD_SHEETS.json new file mode 100644 index 0000000..b50e374 --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003AWIZARD_SHEETS.json @@ -0,0 +1,1955 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "WIZARD_SHEETS" + }, + "body": { + "record1": { + "<1>": "" + }, + "record2": { + "<1>": "", + "<2>": { + "<2,1>": "ST_P%PAGE%_DESC", + "<2,2>": "", + "<2,3>": "STATIC", + "<2,4>": "%FORM%", + "<2,5>": "148", + "<2,6>": "12%PAGEOFFSET%", + "<2,7>": "269", + "<2,8>": "106", + "<2,9>": "This is a textual description place-holder. Double-click on this control to access this control's properties and change the text.", + "<2,10>": "0x50000000", + "<2,11>": "0x0", + "<2,12>": "0", + "<2,13>": "12632256", + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "MS Sans Serif", + "<2,15,1,2>": "-11", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "1", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": "", + "<2,19>": "", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "0", + "<2,26>": "0", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "<>", + "<2,31>": "0", + "<2,32>": { + "<2,32,1>": "0x7fffe", + "<2,32,2>": "0xf0014c08" + }, + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "" + }, + "<3>": { + "<3,1>": "ST_P%PAGE%_DESC2", + "<3,2>": "", + "<3,3>": "STATIC", + "<3,4>": "%FORM%", + "<3,5>": "148", + "<3,6>": "132%PAGEOFFSET%", + "<3,7>": "272", + "<3,8>": "106", + "<3,9>": "In Windows 95, the 16-bit implementation of 3D controls limits the amount of text that can be displayed in a text box to about half of a sheet. If you have enough text to fill more than half a sheet, use two static text controls. Also remember to leave a little extra room to account for slight differences in fonts at various resolutions.", + "<3,10>": "0x50000000", + "<3,11>": "0x0", + "<3,12>": "0", + "<3,13>": "12632256", + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "MS Sans Serif", + "<3,15,1,2>": "-11", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "1", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": "", + "<3,19>": "", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "0", + "<3,26>": "0", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "<>", + "<3,31>": "0", + "<3,32>": { + "<3,32,1>": "0x7fffe", + "<3,32,2>": "0xf0014c08" + }, + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "" + }, + "<4>": "" + }, + "record3": { + "<1>": "", + "<2>": { + "<2,1>": "ST_P%PAGE%_DESC", + "<2,2>": "", + "<2,3>": "STATIC", + "<2,4>": "%FORM%", + "<2,5>": "148", + "<2,6>": "12%PAGEOFFSET%", + "<2,7>": "272", + "<2,8>": "32", + "<2,9>": "Replace this text with a description of the value which the user will type.", + "<2,10>": "0x50000000", + "<2,11>": "0x0", + "<2,12>": "0", + "<2,13>": "12632256", + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "MS Sans Serif", + "<2,15,1,2>": "-11", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "1", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": "", + "<2,19>": "", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "0", + "<2,26>": "0", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "<>", + "<2,31>": "0", + "<2,32>": { + "<2,32,1>": "0x7fffe", + "<2,32,2>": "0xf0014c08" + }, + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "" + }, + "<3>": { + "<3,1>": "ST_P%PAGE%_VALUE", + "<3,2>": "", + "<3,3>": "STATIC", + "<3,4>": "%FORM%", + "<3,5>": "148", + "<3,6>": "52%PAGEOFFSET%", + "<3,7>": "100", + "<3,8>": "17", + "<3,9>": "&Value:", + "<3,10>": "0x50000000", + "<3,11>": "0x0", + "<3,12>": "0", + "<3,13>": "12632256", + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "MS Sans Serif", + "<3,15,1,2>": "-11", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "1", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": "", + "<3,19>": "", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "0", + "<3,26>": "0", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "<>", + "<3,31>": "0", + "<3,32>": { + "<3,32,1>": "0x7fffe", + "<3,32,2>": "0xf0014d88" + }, + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "" + }, + "<4>": { + "<4,1>": "EB_P%PAGE%_VALUE", + "<4,2>": "", + "<4,3>": "EDITFIELD", + "<4,4>": "%FORM%", + "<4,5>": "148", + "<4,6>": "70%PAGEOFFSET%", + "<4,7>": "277", + "<4,8>": "21", + "<4,9>": "", + "<4,10>": "0x50800080", + "<4,11>": "0x0", + "<4,12>": "1", + "<4,13>": "", + "<4,14>": "0", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "MS Sans Serif", + "<4,15,1,2>": "-11", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "1", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": { + "<4,18,1>": { + "<4,18,1,1>": "R", + "<4,18,1,2>": "EXECUTE", + "<4,18,1,3>": "SYSPROG*STPROCEXE**WIZARD", + "<4,18,1,4>": { + "<4,18,1,4,1>": "Required", + "<4,18,1,4,2>": "@Self" + }, + "<4,18,1,5>": "", + "<4,18,1,6>": "" + }, + "<4,18,2>": { + "<4,18,2,1>": "R", + "<4,18,2,2>": "EXECUTE", + "<4,18,2,3>": "SYSPROG*STPROCEXE**WIZARD", + "<4,18,2,4>": { + "<4,18,2,4,1>": "SelectText", + "<4,18,2,4,2>": "@Self", + "<4,18,2,4,3>": "1" + }, + "<4,18,2,5>": "", + "<4,18,2,6>": "" + }, + "<4,18,3>": "" + }, + "<4,19>": { + "<4,19,1>": "CHANGED", + "<4,19,2>": "GOTFOCUS", + "<4,19,3>": "" + }, + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "0", + "<4,26>": "0", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "<>", + "<4,31>": "0", + "<4,32>": { + "<4,32,1>": "0x7fffe", + "<4,32,2>": "0xf0016508" + }, + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "" + }, + "<5>": { + "<5,1>": "ST_P%PAGE%_DESC2", + "<5,2>": "", + "<5,3>": "STATIC", + "<5,4>": "%FORM%", + "<5,5>": "148", + "<5,6>": "132%PAGEOFFSET%", + "<5,7>": "272", + "<5,8>": "32", + "<5,9>": "Optionally, provide additional information about how the typed value is used.", + "<5,10>": "0x50000000", + "<5,11>": "0x0", + "<5,12>": "0", + "<5,13>": "12632256", + "<5,14>": "0", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "MS Sans Serif", + "<5,15,1,2>": "-11", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "1", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "0", + "<5,15,1,14>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": "", + "<5,19>": "", + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "0", + "<5,26>": "0", + "<5,27>": "", + "<5,28>": "<>", + "<5,29>": "<>", + "<5,30>": "<>", + "<5,31>": "0", + "<5,32>": { + "<5,32,1>": "0x7fffe", + "<5,32,2>": "0xf0014c08" + }, + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "", + "<5,41>": "", + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "", + "<5,52>": "" + }, + "<6>": "" + }, + "record4": { + "<1>": "", + "<2>": { + "<2,1>": "ST_P%PAGE%_DESC", + "<2,2>": "", + "<2,3>": "STATIC", + "<2,4>": "%FORM%", + "<2,5>": "148", + "<2,6>": "12%PAGEOFFSET%", + "<2,7>": "272", + "<2,8>": "32", + "<2,9>": "Replace this text with a description of the file name which the user will type or browse for.", + "<2,10>": "0x50000000", + "<2,11>": "0x0", + "<2,12>": "0", + "<2,13>": "12632256", + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "MS Sans Serif", + "<2,15,1,2>": "-11", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "1", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": "", + "<2,19>": "", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "0", + "<2,26>": "0", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "<>", + "<2,31>": "0", + "<2,32>": { + "<2,32,1>": "0x7fffe", + "<2,32,2>": "0xf0014c08" + }, + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "" + }, + "<3>": { + "<3,1>": "ST_P%PAGE%_FILE", + "<3,2>": "", + "<3,3>": "STATIC", + "<3,4>": "%FORM%", + "<3,5>": "148", + "<3,6>": "52%PAGEOFFSET%", + "<3,7>": "100", + "<3,8>": "17", + "<3,9>": "&File:", + "<3,10>": "0x50000000", + "<3,11>": "0x0", + "<3,12>": "0", + "<3,13>": "12632256", + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "MS Sans Serif", + "<3,15,1,2>": "-11", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "1", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": "", + "<3,19>": "", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "0", + "<3,26>": "0", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "<>", + "<3,31>": "0", + "<3,32>": { + "<3,32,1>": "0x7fffe", + "<3,32,2>": "0xf0014d88" + }, + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "" + }, + "<4>": { + "<4,1>": "EB_P%PAGE%_FILE", + "<4,2>": "", + "<4,3>": "EDITFIELD", + "<4,4>": "%FORM%", + "<4,5>": "148", + "<4,6>": "70%PAGEOFFSET%", + "<4,7>": "277", + "<4,8>": "21", + "<4,9>": "", + "<4,10>": "0x50800080", + "<4,11>": "0x0", + "<4,12>": "2", + "<4,13>": "", + "<4,14>": "0", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "MS Sans Serif", + "<4,15,1,2>": "-11", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "1", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": { + "<4,18,1>": { + "<4,18,1,1>": "R", + "<4,18,1,2>": "EXECUTE", + "<4,18,1,3>": "SYSPROG*STPROCEXE**WIZARD", + "<4,18,1,4>": { + "<4,18,1,4,1>": "Required", + "<4,18,1,4,2>": "@Self" + }, + "<4,18,1,5>": "", + "<4,18,1,6>": "" + }, + "<4,18,2>": { + "<4,18,2,1>": "R", + "<4,18,2,2>": "EXECUTE", + "<4,18,2,3>": "SYSPROG*STPROCEXE**WIZARD", + "<4,18,2,4>": { + "<4,18,2,4,1>": "SelectText", + "<4,18,2,4,2>": "@Self", + "<4,18,2,4,3>": "1" + }, + "<4,18,2,5>": "", + "<4,18,2,6>": "" + }, + "<4,18,3>": "" + }, + "<4,19>": { + "<4,19,1>": "CHANGED", + "<4,19,2>": "GOTFOCUS", + "<4,19,3>": "" + }, + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "0", + "<4,26>": "0", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "<>", + "<4,31>": "0", + "<4,32>": { + "<4,32,1>": "0x7fffe", + "<4,32,2>": "0xf0016508" + }, + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "" + }, + "<5>": { + "<5,1>": "CB_P%PAGE%_BROWSE", + "<5,2>": "", + "<5,3>": "PUSHBUTTON", + "<5,4>": "%FORM%", + "<5,5>": "148", + "<5,6>": "97%PAGEOFFSET%", + "<5,7>": "80", + "<5,8>": "25", + "<5,9>": "B&rowse", + "<5,10>": "0x50000000", + "<5,11>": "0x0", + "<5,12>": "3", + "<5,13>": "", + "<5,14>": "0", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "MS Sans Serif", + "<5,15,1,2>": "-11", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "1", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "0", + "<5,15,1,14>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": { + "<5,18,1>": { + "<5,18,1,1>": "R", + "<5,18,1,2>": "EXECUTE", + "<5,18,1,3>": "SYSPROG*STPROCEXE**WIZARD", + "<5,18,1,4>": { + "<5,18,1,4,1>": "Browse", + "<5,18,1,4,2>": "EB_P%PAGE%_FILE", + "<5,18,1,4,3>": "File", + "<5,18,1,4,4>": "Open", + "<5,18,1,4,5>": ".\\", + "<5,18,1,4,6>": "Text Files (*.txt)/*.txt/All Files (*.*)/*.*/" + }, + "<5,18,1,5>": "", + "<5,18,1,6>": "" + }, + "<5,18,2>": "" + }, + "<5,19>": { + "<5,19,1>": "CLICK", + "<5,19,2>": "" + }, + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "0", + "<5,26>": "0", + "<5,27>": "", + "<5,28>": "<>", + "<5,29>": "<>", + "<5,30>": "<>", + "<5,31>": "0", + "<5,32>": { + "<5,32,1>": "0x7fffe", + "<5,32,2>": "0xf0016d88" + }, + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "1", + "<5,41>": "", + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "" + }, + "<6>": { + "<6,1>": "ST_P%PAGE%_DESC2", + "<6,2>": "", + "<6,3>": "STATIC", + "<6,4>": "%FORM%", + "<6,5>": "148", + "<6,6>": "142%PAGEOFFSET%", + "<6,7>": "272", + "<6,8>": "32", + "<6,9>": "Optionally, provide additional information that explains the use or attributes of the file.", + "<6,10>": "0x50000000", + "<6,11>": "0x0", + "<6,12>": "0", + "<6,13>": "12632256", + "<6,14>": "0", + "<6,15>": { + "<6,15,1>": { + "<6,15,1,1>": "MS Sans Serif", + "<6,15,1,2>": "-11", + "<6,15,1,3>": "400", + "<6,15,1,4>": "0", + "<6,15,1,5>": "0", + "<6,15,1,6>": "0", + "<6,15,1,7>": "0", + "<6,15,1,8>": "34", + "<6,15,1,9>": "0", + "<6,15,1,10>": "1", + "<6,15,1,11>": "2", + "<6,15,1,12>": "1", + "<6,15,1,13>": "0", + "<6,15,1,14>": "0" + } + }, + "<6,16>": "", + "<6,17>": "", + "<6,18>": "", + "<6,19>": "", + "<6,20>": "", + "<6,21>": "", + "<6,22>": "", + "<6,23>": "", + "<6,24>": "", + "<6,25>": "0", + "<6,26>": "0", + "<6,27>": "", + "<6,28>": "<>", + "<6,29>": "<>", + "<6,30>": "<>", + "<6,31>": "0", + "<6,32>": { + "<6,32,1>": "0x7fffe", + "<6,32,2>": "0xf0014c08" + }, + "<6,33>": "", + "<6,34>": "", + "<6,35>": "", + "<6,36>": "", + "<6,37>": "", + "<6,38>": "", + "<6,39>": "", + "<6,40>": "", + "<6,41>": "", + "<6,42>": "", + "<6,43>": "", + "<6,44>": "", + "<6,45>": "", + "<6,46>": "", + "<6,47>": "", + "<6,48>": "", + "<6,49>": "", + "<6,50>": "", + "<6,51>": "", + "<6,52>": "" + }, + "<7>": "" + }, + "record5": { + "<1>": "", + "<2>": { + "<2,1>": "ST_P%PAGE%_DESC", + "<2,2>": "", + "<2,3>": "STATIC", + "<2,4>": "%FORM%", + "<2,5>": "148", + "<2,6>": "12%PAGEOFFSET%", + "<2,7>": "272", + "<2,8>": "32", + "<2,9>": "Replace this text with a description of the value which the user will select from the list.", + "<2,10>": "0x50000000", + "<2,11>": "0x0", + "<2,12>": "0", + "<2,13>": "12632256", + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "MS Sans Serif", + "<2,15,1,2>": "-11", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "1", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": "", + "<2,19>": "", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "0", + "<2,26>": "0", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "<>", + "<2,31>": "0", + "<2,32>": { + "<2,32,1>": "0x7fffe", + "<2,32,2>": "0xf0014c08" + }, + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "" + }, + "<3>": { + "<3,1>": "ST_P%PAGE%_VALUE", + "<3,2>": "", + "<3,3>": "STATIC", + "<3,4>": "%FORM%", + "<3,5>": "148", + "<3,6>": "52%PAGEOFFSET%", + "<3,7>": "100", + "<3,8>": "17", + "<3,9>": "&Select value:", + "<3,10>": "0x50000000", + "<3,11>": "0x0", + "<3,12>": "0", + "<3,13>": "12632256", + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "MS Sans Serif", + "<3,15,1,2>": "-11", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "1", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": "", + "<3,19>": "", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "0", + "<3,26>": "0", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "<>", + "<3,31>": "0", + "<3,32>": { + "<3,32,1>": "0x7fffe", + "<3,32,2>": "0xf0014d88" + }, + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "" + }, + "<4>": { + "<4,1>": "LB_P%PAGE%_VALUE", + "<4,2>": "", + "<4,3>": "COMBOBOX", + "<4,4>": "%FORM%", + "<4,5>": "148", + "<4,6>": "70%PAGEOFFSET%", + "<4,7>": "277", + "<4,8>": "131", + "<4,9>": "", + "<4,10>": "0x50000003", + "<4,11>": "0x0", + "<4,12>": "4", + "<4,13>": "", + "<4,14>": "0", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "MS Sans Serif", + "<4,15,1,2>": "-11", + "<4,15,1,3>": "700", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "1", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": { + "<4,18,1>": { + "<4,18,1,1>": "R", + "<4,18,1,2>": "EXECUTE", + "<4,18,1,3>": "SYSPROG*STPROCEXE**WIZARD", + "<4,18,1,4>": { + "<4,18,1,4,1>": "Required", + "<4,18,1,4,2>": "@Self" + }, + "<4,18,1,5>": "", + "<4,18,1,6>": "" + }, + "<4,18,2>": { + "<4,18,2,1>": "E", + "<4,18,2,2>": "CHANGED", + "<4,18,2,3>": "@SELF", + "<4,18,2,4>": "", + "<4,18,2,5>": "", + "<4,18,2,6>": "" + }, + "<4,18,3>": "" + }, + "<4,19>": { + "<4,19,1>": "CHANGED", + "<4,19,2>": "GOTFOCUS", + "<4,19,3>": "" + }, + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "0", + "<4,26>": "0", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "<>", + "<4,31>": "0", + "<4,32>": { + "<4,32,1>": "0x7fff6", + "<4,32,2>": "0xf0016988" + }, + "<4,33>": "", + "<4,34>": "", + "<4,35>": { + "<4,35,1>": { + "<4,35,1,1>": "First Selection", + "<4,35,1,2>": "Second Selection" + } + }, + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "" + }, + "<5>": { + "<5,1>": "ST_P%PAGE%_DESC2", + "<5,2>": "", + "<5,3>": "STATIC", + "<5,4>": "%FORM%", + "<5,5>": "148", + "<5,6>": "132%PAGEOFFSET%", + "<5,7>": "272", + "<5,8>": "32", + "<5,9>": "Optionally, provide information that explains the effect of the selection.", + "<5,10>": "0x50000000", + "<5,11>": "0x0", + "<5,12>": "0", + "<5,13>": "12632256", + "<5,14>": "0", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "MS Sans Serif", + "<5,15,1,2>": "-11", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "1", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "0", + "<5,15,1,14>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": "", + "<5,19>": "", + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "0", + "<5,26>": "0", + "<5,27>": "", + "<5,28>": "<>", + "<5,29>": "<>", + "<5,30>": "<>", + "<5,31>": "0", + "<5,32>": { + "<5,32,1>": "0x7fffe", + "<5,32,2>": "0xf0014c08" + }, + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "", + "<5,41>": "", + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "", + "<5,52>": "" + }, + "<6>": "" + }, + "record6": { + "<1>": "", + "<2>": { + "<2,1>": "ST_P%PAGE%_DESC", + "<2,2>": "", + "<2,3>": "STATIC", + "<2,4>": "%FORM%", + "<2,5>": "148", + "<2,6>": "12%PAGEOFFSET%", + "<2,7>": "272", + "<2,8>": "32", + "<2,9>": "Replace this text with a description of the value which the user will select from the list.", + "<2,10>": "0x50000000", + "<2,11>": "0x0", + "<2,12>": "0", + "<2,13>": "12632256", + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "MS Sans Serif", + "<2,15,1,2>": "-11", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "1", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": "", + "<2,19>": "", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "0", + "<2,26>": "0", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "<>", + "<2,31>": "0", + "<2,32>": { + "<2,32,1>": "0x7fffe", + "<2,32,2>": "0xf0014c08" + }, + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "" + }, + "<3>": { + "<3,1>": "RB_P%PAGE%_ITEM", + "<3,2>": "", + "<3,3>": "RADIOBUTTON", + "<3,4>": "%FORM%", + "<3,5>": "148", + "<3,6>": "52%PAGEOFFSET%", + "<3,7>": "104", + "<3,8>": "60", + "<3,9>": "", + "<3,10>": "0x52000000", + "<3,11>": "0x20", + "<3,12>": "5", + "<3,13>": "", + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "MS Sans Serif", + "<3,15,1,2>": "-11", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "1", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": "", + "<3,19>": "", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "0", + "<3,26>": "0", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "<>", + "<3,31>": "0", + "<3,32>": { + "<3,32,1>": "0x3eff6", + "<3,32,2>": "0x0" + }, + "<3,33>": "", + "<3,34>": "", + "<3,35>": { + "<3,35,1>": { + "<3,35,1,1>": "1", + "<3,35,1,2>": "2", + "<3,35,1,3>": "3", + "<3,35,1,4>": "4" + } + }, + "<3,36>": "1", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": { + "<3,44,1>": { + "<3,44,1,1>": "First Selection", + "<3,44,1,2>": "Second Selection", + "<3,44,1,3>": "Third Selection", + "<3,44,1,4>": "Fourth Selection" + } + }, + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": { + "<3,50,1>": { + "<3,50,1,1>": "0", + "<3,50,1,2>": "0", + "<3,50,1,3>": "86", + "<3,50,1,4>": "15" + }, + "<3,50,2>": { + "<3,50,2,1>": "0", + "<3,50,2,2>": "15", + "<3,50,2,3>": "104", + "<3,50,2,4>": "15" + }, + "<3,50,3>": { + "<3,50,3,1>": "0", + "<3,50,3,2>": "30", + "<3,50,3,3>": "91", + "<3,50,3,4>": "15" + }, + "<3,50,4>": { + "<3,50,4,1>": "0", + "<3,50,4,2>": "45", + "<3,50,4,3>": "97", + "<3,50,4,4>": "15" + }, + "<3,50,5>": "" + }, + "<3,51>": "", + "<3,52>": "" + }, + "<4>": { + "<4,1>": "ST_P%PAGE%_DESC2", + "<4,2>": "", + "<4,3>": "STATIC", + "<4,4>": "%FORM%", + "<4,5>": "148", + "<4,6>": "132%PAGEOFFSET%", + "<4,7>": "272", + "<4,8>": "32", + "<4,9>": "Optionally, provide information that explains the effect of the selection.", + "<4,10>": "0x50000000", + "<4,11>": "0x0", + "<4,12>": "0", + "<4,13>": "12632256", + "<4,14>": "0", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "MS Sans Serif", + "<4,15,1,2>": "-11", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "1", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": "", + "<4,19>": "", + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "0", + "<4,26>": "0", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "<>", + "<4,31>": "0", + "<4,32>": { + "<4,32,1>": "0x7fffe", + "<4,32,2>": "0xf0014c08" + }, + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "" + }, + "<5>": "" + }, + "record7": { + "<1>": "", + "<2>": { + "<2,1>": "ST_P%PAGE%_DESC", + "<2,2>": "", + "<2,3>": "STATIC", + "<2,4>": "%FORM%", + "<2,5>": "148", + "<2,6>": "12%PAGEOFFSET%", + "<2,7>": "272", + "<2,8>": "32", + "<2,9>": "Replace this text with a description of the group of choices available to the user.", + "<2,10>": "0x50000000", + "<2,11>": "0x0", + "<2,12>": "0", + "<2,13>": "12632256", + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "MS Sans Serif", + "<2,15,1,2>": "-11", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "1", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": "", + "<2,19>": "", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "0", + "<2,26>": "0", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "<>", + "<2,31>": "0", + "<2,32>": { + "<2,32,1>": "0x7fffe", + "<2,32,2>": "0xf0014c08" + }, + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "" + }, + "<3>": { + "<3,1>": "CHK_P%PAGE%_CHOICE1", + "<3,2>": "", + "<3,3>": "CHECKBOX", + "<3,4>": "%FORM%", + "<3,5>": "148", + "<3,6>": "45%PAGEOFFSET%", + "<3,7>": "191", + "<3,8>": "25", + "<3,9>": "Yes, I would like the first choice", + "<3,10>": "0x50000003", + "<3,11>": "0x0", + "<3,12>": "6", + "<3,13>": "", + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "MS Sans Serif", + "<3,15,1,2>": "-11", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "1", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": "", + "<3,19>": "", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "0", + "<3,26>": "0", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "<>", + "<3,31>": "0", + "<3,32>": { + "<3,32,1>": "0x7fffe", + "<3,32,2>": "0xf0016d08" + }, + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "0", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "1", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "" + }, + "<4>": { + "<4,1>": "CHK_P%PAGE%_CHOICE2", + "<4,2>": "", + "<4,3>": "CHECKBOX", + "<4,4>": "%FORM%", + "<4,5>": "148", + "<4,6>": "76%PAGEOFFSET%", + "<4,7>": "191", + "<4,8>": "25", + "<4,9>": "Yes, I would like the second choice", + "<4,10>": "0x50000003", + "<4,11>": "0x0", + "<4,12>": "7", + "<4,13>": "", + "<4,14>": "0", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "MS Sans Serif", + "<4,15,1,2>": "-11", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "1", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": "", + "<4,19>": "", + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "0", + "<4,26>": "0", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "<>", + "<4,31>": "0", + "<4,32>": { + "<4,32,1>": "0x7fffe", + "<4,32,2>": "0xf0016d08" + }, + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "0", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "1", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "" + }, + "<5>": { + "<5,1>": "CHK_P%PAGE%_CHOICE3", + "<5,2>": "", + "<5,3>": "CHECKBOX", + "<5,4>": "%FORM%", + "<5,5>": "148", + "<5,6>": "108%PAGEOFFSET%", + "<5,7>": "191", + "<5,8>": "25", + "<5,9>": "Yes, I would like the third choice", + "<5,10>": "0x50000003", + "<5,11>": "0x0", + "<5,12>": "8", + "<5,13>": "", + "<5,14>": "0", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "MS Sans Serif", + "<5,15,1,2>": "-11", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "1", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "0", + "<5,15,1,14>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": "", + "<5,19>": "", + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "0", + "<5,26>": "0", + "<5,27>": "", + "<5,28>": "<>", + "<5,29>": "<>", + "<5,30>": "<>", + "<5,31>": "0", + "<5,32>": { + "<5,32,1>": "0x7fffe", + "<5,32,2>": "0xf0016d08" + }, + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "0", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "1", + "<5,41>": "", + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "" + }, + "<6>": { + "<6,1>": "CHK_P%PAGE%_CHOICE4", + "<6,2>": "", + "<6,3>": "CHECKBOX", + "<6,4>": "%FORM%", + "<6,5>": "148", + "<6,6>": "139%PAGEOFFSET%", + "<6,7>": "191", + "<6,8>": "25", + "<6,9>": "Yes, I would like the fourth choice", + "<6,10>": "0x50000003", + "<6,11>": "0x0", + "<6,12>": "9", + "<6,13>": "", + "<6,14>": "0", + "<6,15>": { + "<6,15,1>": { + "<6,15,1,1>": "MS Sans Serif", + "<6,15,1,2>": "-11", + "<6,15,1,3>": "400", + "<6,15,1,4>": "0", + "<6,15,1,5>": "0", + "<6,15,1,6>": "0", + "<6,15,1,7>": "0", + "<6,15,1,8>": "34", + "<6,15,1,9>": "0", + "<6,15,1,10>": "1", + "<6,15,1,11>": "2", + "<6,15,1,12>": "1", + "<6,15,1,13>": "0", + "<6,15,1,14>": "0" + } + }, + "<6,16>": "", + "<6,17>": "", + "<6,18>": "", + "<6,19>": "", + "<6,20>": "", + "<6,21>": "", + "<6,22>": "", + "<6,23>": "", + "<6,24>": "", + "<6,25>": "0", + "<6,26>": "0", + "<6,27>": "", + "<6,28>": "<>", + "<6,29>": "<>", + "<6,30>": "<>", + "<6,31>": "0", + "<6,32>": { + "<6,32,1>": "0x7fffe", + "<6,32,2>": "0xf0016d08" + }, + "<6,33>": "", + "<6,34>": "", + "<6,35>": "", + "<6,36>": "0", + "<6,37>": "", + "<6,38>": "", + "<6,39>": "", + "<6,40>": "1", + "<6,41>": "", + "<6,42>": "", + "<6,43>": "", + "<6,44>": "", + "<6,45>": "", + "<6,46>": "", + "<6,47>": "", + "<6,48>": "", + "<6,49>": "", + "<6,50>": "", + "<6,51>": "" + }, + "<7>": { + "<7,1>": "ST_P%PAGE%_DESC2", + "<7,2>": "", + "<7,3>": "STATIC", + "<7,4>": "%FORM%", + "<7,5>": "148", + "<7,6>": "182%PAGEOFFSET%", + "<7,7>": "272", + "<7,8>": "52", + "<7,9>": "Replace this text with additional information about the choices that the user can make.", + "<7,10>": "0x50000000", + "<7,11>": "0x0", + "<7,12>": "0", + "<7,13>": "12632256", + "<7,14>": "0", + "<7,15>": { + "<7,15,1>": { + "<7,15,1,1>": "MS Sans Serif", + "<7,15,1,2>": "-11", + "<7,15,1,3>": "400", + "<7,15,1,4>": "0", + "<7,15,1,5>": "0", + "<7,15,1,6>": "0", + "<7,15,1,7>": "0", + "<7,15,1,8>": "34", + "<7,15,1,9>": "0", + "<7,15,1,10>": "1", + "<7,15,1,11>": "2", + "<7,15,1,12>": "1", + "<7,15,1,13>": "0", + "<7,15,1,14>": "0" + } + }, + "<7,16>": "", + "<7,17>": "", + "<7,18>": "", + "<7,19>": "", + "<7,20>": "", + "<7,21>": "", + "<7,22>": "", + "<7,23>": "", + "<7,24>": "", + "<7,25>": "0", + "<7,26>": "0", + "<7,27>": "", + "<7,28>": "<>", + "<7,29>": "<>", + "<7,30>": "<>", + "<7,31>": "0", + "<7,32>": { + "<7,32,1>": "0x7fffe", + "<7,32,2>": "0xf0014c08" + }, + "<7,33>": "", + "<7,34>": "", + "<7,35>": "", + "<7,36>": "", + "<7,37>": "", + "<7,38>": "", + "<7,39>": "", + "<7,40>": "", + "<7,41>": "", + "<7,42>": "", + "<7,43>": "", + "<7,44>": "", + "<7,45>": "", + "<7,46>": "", + "<7,47>": "", + "<7,48>": "", + "<7,49>": "", + "<7,50>": "", + "<7,51>": "", + "<7,52>": "" + }, + "<8>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSENV%003AWIZARD_TEMPLATE.json b/SYSPROG/APPROW/SYSENV%003AWIZARD_TEMPLATE.json new file mode 100644 index 0000000..1872c0f --- /dev/null +++ b/SYSPROG/APPROW/SYSENV%003AWIZARD_TEMPLATE.json @@ -0,0 +1,578 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "WIZARD_TEMPLATE" + }, + "body": { + "record1": { + "<1>": "300", + "<2>": "%CONTROLCOUNT%", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "%FORM%", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "4", + "<1,6>": "72", + "<1,7>": "443", + "<1,8>": "325", + "<1,9>": "%TITLE%", + "<1,10>": "0x82e00001", + "<1,11>": "0x2100", + "<1,12>": "0", + "<1,13>": "12632256", + "<1,14>": "0", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "R", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "SYSPROG*STPROCEXE**WIZARD", + "<1,18,1,4>": "Initialize", + "<1,18,1,5>": "", + "<1,18,1,6>": "" + }, + "<1,18,2>": { + "<1,18,2,1>": "R", + "<1,18,2,2>": "EXECUTE", + "<1,18,2,3>": "SYSPROG*STPROCEXE**WIZARD", + "<1,18,2,4>": "Page", + "<1,18,2,5>": "", + "<1,18,2,6>": "" + }, + "<1,18,3>": "" + }, + "<1,19>": { + "<1,19,1>": "CREATE", + "<1,19,2>": "PAGE", + "<1,19,3>": "" + }, + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "0", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "0", + "<1,24,6>": "0" + }, + "<1,25>": "0", + "<1,26>": "0", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": { + "<1,32,1>": "0x7FFFE", + "<1,32,2>": "0xF001E988" + }, + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0x%PAGES%0001", + "<1,37,2>": "0x10001" + }, + "<1,38>": { + "<1,38,1>": "1", + "<1,38,2>": "1" + }, + "<1,39>": "", + "<1,40>": "0", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "LINE", + "<1,2>": "", + "<1,3>": "GROUPBOX", + "<1,4>": "%FORM%", + "<1,5>": "10", + "<1,6>": "247", + "<1,7>": "417", + "<1,8>": "7", + "<1,9>": "", + "<1,10>": "0x50000007", + "<1,11>": "0x0", + "<1,12>": "0", + "<1,13>": "12632256", + "<1,14>": "0", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "MS Sans Serif", + "<1,15,1,2>": "-11", + "<1,15,1,3>": "400", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "0", + "<1,15,1,8>": "34", + "<1,15,1,9>": "0", + "<1,15,1,10>": "1", + "<1,15,1,11>": "2", + "<1,15,1,12>": "1", + "<1,15,1,13>": "0", + "<1,15,1,14>": "0" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "0", + "<1,26>": "0", + "<1,27>": "", + "<1,28>": "<>", + "<1,29>": "<>", + "<1,30>": "<>", + "<1,31>": "0", + "<1,32>": { + "<1,32,1>": "0x7fffe", + "<1,32,2>": "0xf0014c08" + }, + "<1,33>": "" + }, + "<2>": { + "<2,1>": "BACK", + "<2,2>": "", + "<2,3>": "PUSHBUTTON", + "<2,4>": "%FORM%", + "<2,5>": "177", + "<2,6>": "264", + "<2,7>": "80", + "<2,8>": "25", + "<2,9>": "&Back", + "<2,10>": "0x58000000", + "<2,11>": "0x104", + "<2,12>": "1", + "<2,13>": "12632256", + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "MS Sans Serif", + "<2,15,1,2>": "-11", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "1", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": { + "<2,18,1>": { + "<2,18,1,1>": "R", + "<2,18,1,2>": "EXECUTE", + "<2,18,1,3>": "SYSPROG*STPROCEXE**WIZARD", + "<2,18,1,4>": "Back", + "<2,18,1,5>": "", + "<2,18,1,6>": "" + }, + "<2,18,2>": "" + }, + "<2,19>": { + "<2,19,1>": "CLICK", + "<2,19,2>": "" + }, + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "0", + "<2,26>": "0", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "<>", + "<2,31>": "0", + "<2,32>": { + "<2,32,1>": "0x7fffe", + "<2,32,2>": "0xf0014188" + }, + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "1", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "" + }, + "<3>": { + "<3,1>": "NEXT", + "<3,2>": "", + "<3,3>": "PUSHBUTTON", + "<3,4>": "%FORM%", + "<3,5>": "257", + "<3,6>": "264", + "<3,7>": "80", + "<3,8>": "25", + "<3,9>": "Next", + "<3,10>": "0x50000000", + "<3,11>": "0x101", + "<3,12>": "2", + "<3,13>": "12632256", + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "MS Sans Serif", + "<3,15,1,2>": "-11", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "1", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": { + "<3,18,1>": { + "<3,18,1,1>": "R", + "<3,18,1,2>": "EXECUTE", + "<3,18,1,3>": "SYSPROG*STPROCEXE**WIZARD", + "<3,18,1,4>": "Next", + "<3,18,1,5>": "", + "<3,18,1,6>": "" + }, + "<3,18,2>": "" + }, + "<3,19>": { + "<3,19,1>": "CLICK", + "<3,19,2>": "" + }, + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "0", + "<3,26>": "0", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "<>", + "<3,31>": "0", + "<3,32>": { + "<3,32,1>": "0x7fffe", + "<3,32,2>": "0xf0014588" + }, + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "1", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "" + }, + "<4>": { + "<4,1>": "FINISH", + "<4,2>": "", + "<4,3>": "PUSHBUTTON", + "<4,4>": "%FORM%", + "<4,5>": "257", + "<4,6>": "264", + "<4,7>": "80", + "<4,8>": "25", + "<4,9>": "Finish", + "<4,10>": "0x50000000", + "<4,11>": "0x100", + "<4,12>": "3", + "<4,13>": "12632256", + "<4,14>": "0", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "MS Sans Serif", + "<4,15,1,2>": "-11", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "1", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": { + "<4,18,1>": { + "<4,18,1,1>": "R", + "<4,18,1,2>": "EXECUTE", + "<4,18,1,3>": "SYSPROG*STPROCEXE**WIZARD", + "<4,18,1,4>": "Finish", + "<4,18,1,5>": "", + "<4,18,1,6>": "" + }, + "<4,18,2>": "" + }, + "<4,19>": { + "<4,19,1>": "CLICK", + "<4,19,2>": "" + }, + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "0", + "<4,26>": "0", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "<>", + "<4,31>": "0", + "<4,32>": { + "<4,32,1>": "0x7fffe", + "<4,32,2>": "0xf0014188" + }, + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "1", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "" + }, + "<5>": { + "<5,1>": "CANCEL", + "<5,2>": "", + "<5,3>": "PUSHBUTTON", + "<5,4>": "%FORM%", + "<5,5>": "347", + "<5,6>": "264", + "<5,7>": "80", + "<5,8>": "25", + "<5,9>": "Cancel", + "<5,10>": "0x50000000", + "<5,11>": "0x102", + "<5,12>": "4", + "<5,13>": "12632256", + "<5,14>": "0", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "MS Sans Serif", + "<5,15,1,2>": "-11", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "1", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "0", + "<5,15,1,14>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": { + "<5,18,1>": { + "<5,18,1,1>": "R", + "<5,18,1,2>": "EXECUTE", + "<5,18,1,3>": "SYSPROG*STPROCEXE**WIZARD", + "<5,18,1,4>": "Cancel", + "<5,18,1,5>": "", + "<5,18,1,6>": "" + }, + "<5,18,2>": "" + }, + "<5,19>": { + "<5,19,1>": "CLICK", + "<5,19,2>": "" + }, + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "0", + "<5,26>": "0", + "<5,27>": "", + "<5,28>": "<>", + "<5,29>": "<>", + "<5,30>": "<>", + "<5,31>": "0", + "<5,32>": { + "<5,32,1>": "0x7fffe", + "<5,32,2>": "0xf0014588" + }, + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "1", + "<5,41>": "", + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "" + }, + "<6>": { + "<6,1>": "PICTURE", + "<6,2>": "", + "<6,3>": "BITMAP", + "<6,4>": "%FORM%", + "<6,5>": "10", + "<6,6>": "9", + "<6,7>": "119", + "<6,8>": "232", + "<6,9>": "", + "<6,10>": "0x5000000a", + "<6,11>": "0x100", + "<6,12>": "0", + "<6,13>": "12632256", + "<6,14>": "0", + "<6,15>": { + "<6,15,1>": { + "<6,15,1,1>": "MS Sans Serif", + "<6,15,1,2>": "-11", + "<6,15,1,3>": "400", + "<6,15,1,4>": "0", + "<6,15,1,5>": "0", + "<6,15,1,6>": "0", + "<6,15,1,7>": "0", + "<6,15,1,8>": "34", + "<6,15,1,9>": "0", + "<6,15,1,10>": "1", + "<6,15,1,11>": "2", + "<6,15,1,12>": "1", + "<6,15,1,13>": "0", + "<6,15,1,14>": "0" + } + }, + "<6,16>": "", + "<6,17>": "", + "<6,18>": "", + "<6,19>": "", + "<6,20>": "", + "<6,21>": "", + "<6,22>": "", + "<6,23>": "", + "<6,24>": "", + "<6,25>": "0", + "<6,26>": "0", + "<6,27>": "", + "<6,28>": "<>", + "<6,29>": "<>", + "<6,30>": "<>", + "<6,31>": "0", + "<6,32>": { + "<6,32,1>": "0x7fffc", + "<6,32,2>": "0xf0014608" + }, + "<6,33>": "%BITMAP%", + "<6,34>": "" + }, + "<7>": "" + }, + "record4": { + "<1>": "", + "<2>": { + "<2,1>": "", + "<2,2>": "", + "<2,3>": "", + "<2,4>": "0" + } + }, + "record5": { + "<1>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSHELP%003AHELP.DEBUG.json b/SYSPROG/APPROW/SYSHELP%003AHELP.DEBUG.json new file mode 100644 index 0000000..34aa346 --- /dev/null +++ b/SYSPROG/APPROW/SYSHELP%003AHELP.DEBUG.json @@ -0,0 +1,44 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "HELP.DEBUG" + }, + "body": { + "record1": { + "<1>": " Command Description of the Command", + "<2>": "----------------- ----------------------------------------------------------", + "<3>": "# Displays stats about memory usage", + "<4>": "$ and ? Displays the current line and program name", + "<5>": "/{var} Display var in ASCII (/) format - \\ alone displays popup", + "<6>": "\\{var} Display var in HEX (\\) format - / alone displays popup", + "<7>": "B$=n Breaks if line number = n", + "<8>": "B@=program Breaks if program name = program", + "<9>": "Bx operator const Breaks when expression x operator constant is true", + "<10>": "D Displays break and trace tables", + "<11>": "E{n} Sets multi-step line counter to n", + "<12>": "END or press ESC Aborts program and returns to the command window", + "<13>": "EXECUTE command Executes command as though at the command window", + "<14>": "G Go, resumes program control", + "<15>": "Gn Goes to line n in source code", + "<16>": "HM Extended help screen", + "<17>": "K{n} Clears the break table, n = clear only specified nbr", + "<18>": "Ln Lists n lines from current source file", + "<19>": "O{FF} Returns to operating system", + "<20>": "PS Displays the program stack", + "<21>": "PSP Displays the program stack in a popup", + "<22>": "R Displays the return stack", + "<23>": "RP Displays the return stack in a popup", + "<24>": "S Displays screen image that preceded drop to debugger", + "<25>": "SO{URCE} Specifies filename and program of source code", + "<26>": "ST Toggles the source trace mode off or on", + "<27>": "T Toggle the trace mode off or on", + "<28>": "T$ Traces the source of a program line", + "<29>": "T@ Traces a program source", + "<30>": "Tvariable Traces the specified variable", + "<31>": "U{n} Clears the trace table, n = clear only specified nbr", + "<32>": "V{var} Displays var in window - V alone displays popup of vars", + "<33>": "X Displays the command window" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSOBJ%003AGENRTP20_PARMS.json b/SYSPROG/APPROW/SYSOBJ%003AGENRTP20_PARMS.json new file mode 100644 index 0000000..562b5b0 --- /dev/null +++ b/SYSPROG/APPROW/SYSOBJ%003AGENRTP20_PARMS.json @@ -0,0 +1,220 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "GENRTP20_PARMS" + }, + "body": { + "record1": { + "<1>": "C01C ;* Today", + "<2>": "C01C6403 ;* Yesterday", + "<3>": "C01C6402 ;* Tommorrow", + "<4>": "C01CC01D03 ;* Sunday", + "<5>": "C01CC01D036402 ;* Monday", + "<6>": "C01CC01D036502 ;* Tues", + "<7>": "C01CC01D036602 ;* Wed", + "<8>": "C01CC01D036702 ;* Thur", + "<9>": "C01CC01D036802 ;* Fri", + "<10>": "C01CC01D0368026402 ;* Saturday", + "<11>": " ;* Not Used (Last Today)", + "<12>": " ;* Not Used (Last Yesterday!)", + "<13>": " ;* Not Used (Last Tommorrow!)", + "<14>": "C01CC01E03 ;* Last Sunday", + "<15>": "C01CC01E036402", + "<16>": "C01CC01E036502", + "<17>": "C01CC01E036602", + "<18>": "C01CC01E036702", + "<19>": "C01CC01E036802", + "<20>": "C01CC01E0368026402 ;* Last Saturday", + "<21>": " ;* Not Used (Next Today)", + "<22>": " ;* Not Used (Next Yesterday!)", + "<23>": " ;* Not Used (Next Tommorrow!)", + "<24>": "C01C8A0702C01E03 ;* Next Sunday", + "<25>": "C01C8A0802C01E03", + "<26>": "C01C8A0902C01E03", + "<27>": "C01C8A0A02C01E03", + "<28>": "C01C8A0B02C01E03", + "<29>": "C01C8A0C02C01E03", + "<30>": "C01C8A0D02C01E03 ;* Next Saturday", + "<31>": " ;* Empty", + "<32>": " ;* Empty", + "<33>": "51 ;* SV - CaseS - Eq", + "<34>": "52 ;* NE", + "<35>": "53 ;* LT", + "<36>": "54 ;* GT", + "<37>": "55 ;* LE", + "<38>": "56 ;* GE", + "<39>": "B2 ;* Match", + "<40>": "8A1736638A1D36 ;* [] same as Any Mv CaseS", + "<41>": "8A0E36 ;* [ same as Every Mv CaseS", + "<42>": "8A0F36 ;* ] same as Every Mv CaseS", + "<43>": "5F08 ;* SV - CaseI - Eq", + "<44>": "5F09 ;* NE", + "<45>": "5F0A ;* LT", + "<46>": "5F0B ;* GT", + "<47>": "5F0C ;* LE", + "<48>": "5F0D ;* GE", + "<49>": "B2 ;* Match (Uses MATCH opcode)", + "<50>": "8A2F36638A1D36 ;* [] same as Any Mv CaseI", + "<51>": "8A2636 ;* [ same as Every Mv CaseI", + "<52>": "8A2736 ;* ] same as Every Mv CaseI", + "<53>": "8A1036638A1D36 ;* MV - CaseS - Any - Eq", + "<54>": "8A1136638A1D36 ;* NE", + "<55>": "8A1236638A1D36 ;* LT", + "<56>": "8A1336638A1D36 ;* GT", + "<57>": "8A1436638A1D36 ;* LE", + "<58>": "8A1536638A1D36 ;* GE", + "<59>": "8A1636638A1D36 ;* Match", + "<60>": "8A1736638A1D36 ;* []", + "<61>": "8A1836638A1D36 ;* [", + "<62>": "8A1936638A1D36 ;* ]", + "<63>": "8A2836638A1D36 ;* MV - CaseI - Any - Eq", + "<64>": "8A2936638A1D36 ;* NE", + "<65>": "8A2A36638A1D36 ;* LT", + "<66>": "8A2B36638A1D36 ;* GT", + "<67>": "8A2C36638A1D36 ;* LE", + "<68>": "8A2D36638A1D36 ;* GE", + "<69>": "8A2E36638A1D36 ;* Match", + "<70>": "8A2F36638A1D36 ;* []", + "<71>": "8A3036638A1D36 ;* [", + "<72>": "8A3136638A1D36 ;* ]", + "<73>": "8A0636 ;* MV - CaseS - Every - Eq", + "<74>": "8A0736 ;* NE", + "<75>": "8A0836 ;* LT", + "<76>": "8A0936 ;* GT", + "<77>": "8A0A36 ;* LE", + "<78>": "8A0B36 ;* GE", + "<79>": "8A0C36 ;* Match", + "<80>": "8A0D36 ;* []", + "<81>": "8A0E36 ;* [", + "<82>": "8A0F36 ;* ]", + "<83>": "8A1E36 ;* MV - CaseI - Every - Eq", + "<84>": "8A1F36", + "<85>": "8A2036", + "<86>": "8A2136", + "<87>": "8A2236", + "<88>": "8A2336", + "<89>": "8A2436", + "<90>": "8A2536", + "<91>": "8A2636", + "<92>": "8A2736", + "<93>": " ;* MV - Right - Any - CaseS - Eq", + "<94>": "", + "<95>": "8A3836638A1D36", + "<96>": "8A3936638A1D36", + "<97>": "8A4036638A1D36", + "<98>": "8A4136638A1D36", + "<99>": "", + "<100>": "", + "<101>": "", + "<102>": "", + "<103>": " ;* MV - Right - Any - CaseI - Eq", + "<104>": "", + "<105>": "8A4036638A1D36", + "<106>": "8A4136638A1D36", + "<107>": "8A4236638A1D36", + "<108>": "8A4336638A1D36", + "<109>": "", + "<110>": "", + "<111>": "", + "<112>": "", + "<113>": " ;* Mv - Right - Every - CaseS - Eq", + "<114>": "", + "<115>": "8A3454", + "<116>": "8A3554", + "<117>": "8A3654", + "<118>": "8A3754", + "<119>": "", + "<120>": "", + "<121>": "", + "<122>": "", + "<123>": " ;* Mv - Right - Every - CaseI - Eq", + "<124>": "", + "<125>": "8A3C54", + "<126>": "8A3D54", + "<127>": "8A3E54", + "<128>": "8A3F54", + "<129>": "", + "<130>": "", + "<131>": "", + "<132>": "", + "<133>": " ;* MV - CaseS - Any - Eq", + "<134>": " ;* NE", + "<135>": "8A1236 ;* LT", + "<136>": "8A1336 ;* GT", + "<137>": "8A1436 ;* LE", + "<138>": "8A1536 ;* GE", + "<139>": "", + "<140>": "", + "<141>": "", + "<142>": "", + "<143>": " ;* MV - CaseI - Any - Eq", + "<144>": " ;* NE", + "<145>": "8A2A36 ;* LT", + "<146>": "8A2B36 ;* GT", + "<147>": "8A2C36 ;* LE", + "<148>": "8A2D36 ;* GE", + "<149>": "", + "<150>": "", + "<151>": "", + "<152>": "", + "<153>": "8A0636 ;* MV - CaseS - Every - Eq", + "<154>": "8A0736 ;* NE", + "<155>": "8A0836 ;* LT", + "<156>": "8A0936 ;* GT", + "<157>": "8A0A36 ;* LE", + "<158>": "8A0B36 ;* GE", + "<159>": "8A0C36 ;* Match", + "<160>": "8A0D36 ;* []", + "<161>": "8A0E36 ;* [", + "<162>": "8A0F36 ;* ]", + "<163>": "8A1E36 ;* MV - CaseI - Every - Eq", + "<164>": "8A1F36", + "<165>": "8A2036", + "<166>": "8A2136", + "<167>": "8A2236", + "<168>": "8A2336", + "<169>": "8A2436", + "<170>": "8A2536", + "<171>": "8A2636", + "<172>": "8A2736", + "<173>": " ;* MV - Right - Any - CaseS - Eq", + "<174>": "", + "<175>": "8A3836", + "<176>": "8A3936", + "<177>": "8A4036", + "<178>": "8A4136", + "<179>": "", + "<180>": "", + "<181>": "", + "<182>": "", + "<183>": " ;* MV - Right - Any - CaseI - Eq", + "<184>": "", + "<185>": "8A4036", + "<186>": "8A4136", + "<187>": "8A4236", + "<188>": "8A4336", + "<189>": "", + "<190>": "", + "<191>": "", + "<192>": "", + "<193>": " ;* Mv - Right - Every - CaseS - Eq", + "<194>": "", + "<195>": "8A3454", + "<196>": "8A3554", + "<197>": "8A3654", + "<198>": "8A3754", + "<199>": "", + "<200>": "", + "<201>": "", + "<202>": "", + "<203>": " ;* Mv - Right - Every - CaseI - Eq", + "<204>": "", + "<205>": "8A3C54", + "<206>": "8A3D54", + "<207>": "8A3E54", + "<208>": "8A3F54", + "<209>": "* Source Date: 10:44:53 10 JAN 1994 Build ID: AREV*3.1.127 Level: 3.1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSOBJ%003AMETA95_RUN.json b/SYSPROG/APPROW/SYSOBJ%003AMETA95_RUN.json new file mode 100644 index 0000000..9493ecd --- /dev/null +++ b/SYSPROG/APPROW/SYSOBJ%003AMETA95_RUN.json @@ -0,0 +1,588 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "META95.RUN" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": "", + "<1,1,2>": "" + } + } + }, + "record2": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "\u0002€$\u0002\u0002\u00002\u0000n\u0000s\u0000", + "<1,1,1,1,2>": "\u0000\u0001\u000f\u0000Ï\u0007-" + } + }, + "<1,1,2>": "" + } + } + }, + "record3": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "\u0002€-\u0002\u0000\u0004€-Ð\u0007\u0018y-<\u00002\u0000-<\u0000P\u0000-\u0000n\u0000-\u000e\u0001s\u0000-\u000e\u0001", + "<1,1,1,1,2>": "\u0000-\u0000\u0001-\u0006\u0000†\u0001-<\u0000Â\u0001-<\u0000å\u0001-<\u0000\u0003\u0002-\u0006\u0000!\u0002-<\u0000$\u0002- \u0003Ü\u0005-È\u0000l\u0007- ËÏ\u0007- \u0003øu- \u0003ˆw-\u0002\u0000\u0002\u0000-È\u00000u-È\u0000”u- \u0003ˆw-\u0002\u0000\u0002\u0000-\u0002\u0000\u0002\u0000-\u0002\u0000\u0003\u0000-\u0002\u0000\u0004\u0000-\u0002\u0000\u0005\u0000-\u0002\u0000\u0006\u0000-\u0002\u0000\u0007\u0000-\u0002\u0000\b\u0000-\u0002\u0000\t\u0000-\u0002\u0000\u0000-\u0002\u0000" + } + } + } + }, + "<2>": "\u0000-\u0002\u0000\u000e\u0000-\u0002\u0000\u000f\u0000-\u0002\u0000\u0010\u0000-\u0002\u0000\u0011\u0000-\u0002\u0000ùu-\u0002\u0000\u0003€-\u0002\u0000\u0005€-\u0002\u00003\u0000-\u0002\u0000\u0019y-\u0002\u0000ˆ\u0001-\u0002\u0000Q\u0000-\u0002\u00001u-\u0002\u0000•u-\u0002\u0000Ã\u0001\u0014Ü\u0005\b\u0010\u0000", + "<3>": "\u00002\u0000†\u0001\u0014Ü\u0005\b \u0000", + "<4>": "\u00002\u0000†\u0001\u0014Ü\u0005\b\u0001\u0005", + "<5>": "\u00002\u0000†\u0001\u0014Ü\u0005\b\u0002\t", + "<6>": "\u00002\u0000†\u0001\u0014Ü\u0005\b\u0011\u0015", + "<7>": "\u00002\u0000†\u0001\u0014Ü\u0005\b\u0012\u0019", + "<8>": "\u00002\u0000†\u0001\u0014Ü\u0005\b!\u0015", + "<9>": "\u00002\u0000†\u0001\u0014Ü\u0005\b\"\u0019", + "<10>": "\u00002\u0000†\u0001\u0014Ü\u0005\b\u0002\u0019", + "<11>": "\u00002\u0000†\u0001\u0014Ü\u0005\b\")", + "<12>": "\u00002\u0000†\u0001\u0013†\u0001†\u0001\u0016†\u0001ˆ\u0001\u0017\u0002€\u0014\u0002€\u0003END\u0017\u0002€4\u0002€\u0013\u0004€\u0004€0\u000e\u0000è\u000301u\u0000\u00000•u\u0000\u00000\u0000\u0000\u0000\u0014!\u0002\u0002", + "<13>": ">", + "<14>": "\u0007\"\u0003\u0002\u0000", + "<15>": "\u00010\u0005€\u0016\u0000", + "<16>": "!\u0002", + "<17>": "\u0001\u0003\u0004\u0000\u000fæ\u0005", + "<18>": ".\u0002", + "<19>": "\u0001\u000fê\u0005", + "<20>": ".\u0002", + "<21>": "\u0001\t\u0004\u0000", + "<22>": "\u0001", + "<23>": "y\"", + "<24>": "\u0001", + "<25>": "\u0017\u0002", + "<26>": "\u0001B\u0004€@\u000e?>", + "<27>": "™\"\u0003\u0002\u0000\u0013\u0002\u0013\u0004€\u0004€B\u0004€@\u000e?>?\u000e>\u0003\u0002\u0000@\u000e?>?\u000e>", + "<28>": "o\u0002*\u0002@\u000e?>?\u000e>\u0012!\u0002\u0004\u0003\u0000A\u0003\u0000\t\u0003\u0000f\u0002\u0010", + "<29>": "\u0005Z\u0002\u0004\u0004\u0000\u00122\u0000\u0011\u000b UNDEFINED!\u0012!\u0002\u000b`\u0002\u0003\u0002\u0000f\u0002\f5\u0002\u0003\u0002\u0000@\u000e?>?\u000e>", + "<30>": "ã y\u0002\fp\u0002\u0003\u0002\u0000", + "<31>": "Ä\u0002À\u0002", + "<32>": "ù\u0002‹\u0002\f‚\u0002\u0003\u0002\u0000", + "<33>": ":\u0003À\u0002", + "<34>": "R\u0004À\u0002", + "<35>": "7\b¯\u0002", + "<36>": "ã ©\u0002\f \u0002\u0003\u0002\u0000\fš\u0002\u0003\u0002\u0000", + "<37>": "Æ!À\u0002", + "<38>": "Ê\"À\u0002@\u000e?>?\u000e>\u001a\u000bDEFINITION õ\u0002\u001a\u0001<õ\u0002", + "<39>": "¥!õ\u0002\u001a\u0001>õ\u0002", + "<40>": "", + "<41>": " õ\u0002", + "<42>": "Ê\"õ\u0002@\u000e?>?\u000e>", + "<43>": "Ê\",\u0003\u001a\u0007DEFINE ,\u0003", + "<44>": "¯\u0004\u000b\u0015\u0003", + "<45>": "a\u0005\u000b\u001b\u0003", + "<46>": "\u0011\u0006\u000b!\u0003", + "<47>": "Å\u0006\u000b'\u0003", + "<48>": "i\u0007,\u0003@\u000e?>", + "<49>": "ã 6\u0003@\u000e?>?\u000e>", + "<50>": "ã D\u0003\f;\u0003\u0003\u0002\u0000\u001a\u0006DEFINEN\u0004\u001a\u0004DATAN\u0004\u001a\u0004SIZEN\u0004#N\u0004\u0014\u0018y\u0002SZ\u0017\u0018y\u0013\u0018yn\u0000\u0017\u0018y(Þ", + "<51>": "", + "<52>": " N\u0004", + "<53>": "ã Š\u0003\f\u0003\u0003\u0002\u0000\u001a\u0006DEFINEN\u0004\u001a\bSTANDARDN\u0004\u001a\u0005NAMESN\u0004\u0014\u0018y\u0002SH\u0017\u0018y", + "<54>": "J\u001fN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y", + "<55>": "J\u001fN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y", + "<56>": "ð\u001fN\u0004\u0013\u0018y2\u0000\u0017\u0018y", + "<57>": "J\u001fN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y", + "<58>": "J\u001fN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y", + "<59>": "J\u001fN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y", + "<60>": "J\u001fN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y", + "<61>": "J\u001fN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y", + "<62>": "ð\u001fN\u0004\u0013\u0018y2\u0000\u0017\u0018y", + "<63>": "J\u001fN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y(Þ", + "<64>": "", + "<65>": " N\u0004@\u000e?>?\u000e>", + "<66>": "ã \\\u0004\fS\u0004\u0003\u0002\u0000\u001aINITIALIZE«\u0004", + "<67>": "", + "<68>": " «\u0004", + "<69>": "ä!}\u0004\ft\u0004\u0003\u0002\u0000\u001a\u0003END«\u0004\u001aINITIALIZE«\u0004", + "<70>": "", + "<71>": " «\u0004", + "<72>": "ã ¦\u0004\f\u0004\u0003\u0002\u0000@\u000e?>?\u000e>\u001a\u0007BUFFERSë\u0004", + "<73>": "", + "<74>": " ë\u0004", + "<75>": "ï\u0004Ë\u0004\fÂ\u0004\u0003\u0002\u0000\u001a\u0004END ë\u0004\u001a\u0007BUFFERSë\u0004", + "<76>": "", + "<77>": " ë\u0004@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\u0000\u0005@>\f\u0007\u0005\u0004\u0002\u0000?\u000e@\u000e?>", + "<78>": "ã \u0011\u0005@\u000e?>/ ]\u0005\u0014\u0018y\u0002DS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u001a\u0005SIZE ]\u0005#]\u0005\u0013\u0018yn\u0000\u0017\u0018y\u001a\u0003AT ]\u0005#]\u0005\u0013\u0018yn\u0000\u0017\u0018y(Þ", + "<79>": "", + "<80>": " ]\u0005@\u000e?>?\u000e>\u001a\u0006STACKS›\u0005", + "<81>": "", + "<82>": " ›\u0005", + "<83>": "Ÿ\u0005|\u0005\fs\u0005\u0003\u0002\u0000\u001a\u0004END ›\u0005\u001a\u0006STACKS›\u0005", + "<84>": "", + "<85>": " ›\u0005@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000°\u0005@>\f·\u0005\u0004\u0002\u0000?\u000e@\u000e?>", + "<86>": "ã Á\u0005@\u000e?>/ ", + "<87>": "\u0006\u0014\u0018y\u0002DS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u001a\u0005SIZE ", + "<88>": "\u0006#", + "<89>": "\u0006\u0013\u0018yn\u0000\u0017\u0018y\u001a\u0003AT ", + "<90>": "\u0006#", + "<91>": "\u0006\u0013\u0018yn\u0000\u0017\u0018y(Þ", + "<92>": "", + "<93>": " ", + "<94>": "\u0006@\u000e?>?\u000e>\u001a\bCOUNTERSO\u0006", + "<95>": "", + "<96>": " O\u0006", + "<97>": "S\u0006.\u0006\f%\u0006\u0003\u0002\u0000\u001a\u0004END O\u0006\u001a\bCOUNTERSO\u0006", + "<98>": "", + "<99>": " O\u0006@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000d\u0006@>\fk\u0006\u0004\u0002\u0000?\u000e@\u000e?>", + "<100>": "ã u\u0006@\u000e?>/ Á\u0006\u0014\u0018y\u0002DS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u001a\u0005SIZE Á\u0006#Á\u0006\u0013\u0018yn\u0000\u0017\u0018y\u001a\u0003AT Á\u0006#Á\u0006\u0013\u0018yn\u0000\u0017\u0018y(Þ", + "<101>": "", + "<102>": { + "<102,1>": " Á\u0006@\u000e?>?\u000e>\u001a\u0005LISTS", + "<102,2>": "\u0006" + }, + "<103>": "", + "<104>": { + "<104,1>": " ", + "<104,2>": "\u0006" + }, + "<105>": { + "<105,1>": "\u0001\u0007ß\u0006\fÖ\u0006\u0003\u0002\u0000\u001a\u0004END ", + "<105,2>": "\u0006\u001a\u0005LISTS", + "<105,3>": "\u0006" + }, + "<106>": "", + "<107>": { + "<107,1>": " ", + "<107,2>": "\u0006@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\u0012\u0007@>\f\u0019\u0007\u0004\u0002\u0000?\u000e@\u000e?>" + }, + "<108>": "ã #\u0007@\u000e?>/ e\u0007\u0014\u0018y\u0002DL\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y/ e\u0007\u0013\u0018y2\u0000\u0017\u0018y/ X\u0007\u0013\u0018y2\u0000\u0017\u0018y\fH\u0007\u0003\u0002\u0000(Þ", + "<109>": "", + "<110>": " e\u0007@\u000e?>?\u000e>\u001a\u0005MASKS§\u0007(Þ", + "<111>": "", + "<112>": " §\u0007\u0013Ü\u0005Ü\u0005", + "<113>": "«\u0007Š\u0007\f\u0007\u0003\u0002\u0000\u001a\u0003END§\u0007\u001a\u0005MASKS§\u0007", + "<114>": "", + "<115>": " §\u0007@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000¼\u0007@>\fÃ\u0007\u0004\u0002\u0000?\u000e@\u000e?>", + "<116>": "ã Í\u0007@\u000e?>/ 3\b3l\u0007\u000f\u00003\b\u0014\u0018y\u0002DM\u0017\u0018y%3\b\u0014\u0018y\u0007;MASKS;\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y", + "<117>": "ð\u001f3\b\u0013\u0018y2\u0000\u0017\u0018y", + "<118>": "J\u001f3\b\u0013\u0018y\u0003\u0002\u0017\u0018y", + "<119>": "J\u001f3\b\u0013\u0018y\u0003\u0002\u0017\u0018y(Þ", + "<120>": "", + "<121>": " 3\b@\u000e?>?\u000e>\u001a\u0001<Ø\b", + "<122>": "¥!Ø\b\u001a\u0001>Ø\b\u0014\u0018y\u0002RH\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y", + "<123>": "æ\bØ\b\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y", + "<124>": "Ê\"Ø\b\b\u0003\u0000\u000e\u0000", + "<125>": "Ü\bØ\b=\u000e\u0000-è\u0003\t\u000e\u0000É\b\u0007\u0003\u0000\u0007\u000e\u0000\b\u000f\u0000\u0003\u0000\u001f\u000f\u0000\u0013\u0018y\u0001\u0017\u0018y\u00132\u00002\u0000\u00132\u0000\u0001\u000f\u0002\u0006\u0004ˆ\u0001*É\b\u0006\u0000\f“\b\u0003\u0002\u0000\u0013\u0018y\u0018y0\u000e\u0000è\u0003@\u000e?>?\u000e>\u0003\u0002\u0000@\u000e?>?\u000e>", + "<126>": "Ê\"ö\b", + "<127>": "" + }, + "record4": { + "<1>": "\bö\b\fç\b\u0003\u0002\u0000@\u000e?>?\u000e>\u001a\u0001=\u0006\t\u0003\u0002\u0000&\t", + "<2>": "\t&\t", + "<3>": "P\u001b\t\f\u0012\t\u0003\u0002\u0000", + "<4>": "\u0004&\t@\u000e?>\u001a\u0001=‚\t\u00180u\u000e\u0000", + "<5>": "§<\t\f3\t\u0003\u0002\u0000", + "<6>": "", + "<7>": " ‚\t\u0014\u0018y\u0002SG\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y@\u000e?>", + "<8>": "ã Œ\t@\u000e?>?\u000e>\u001a\u0005BEGIN\u0000\u001a\u0004CASE\u0000\u0014\u0018y\u0002BC\u0017\u0018y\u001a\u0004BYTE¾\t\u0014\u0018y\u0001B\u0017\u0018y\u000bÒ\t\u001a\u0004WORDÒ\t\u0014\u0018y\u0001W\u0017\u0018y\u0000", + "<9>": "J\u001f\u0000\u0013\u0018y\u0003\u0002\u0017\u0018y", + "<10>": "", + "<11>": " \u0000\u0018”u\u000e\u0000\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u00180u\u000e\u0000@\u000e?>?\u000e>\u001a\u0003ENDL\u001a\u0004CASEL", + "<12>": "", + "<13>": " L\u0014\u0018y\u0002EN\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u@\u000e?>?\u000e>", + "<14>": "ã Y@\u000e?>\u001a\u0004CASE£", + "<15>": "»!£\u0014\u0018y\u0002CA\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y", + "<16>": "", + "<17>": " \u0003\u0002\u0000£", + "<18>": "æ\b£\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>", + "<19>": "Ô\u000b±", + "<20>": "*\u0013\u000b¼\u001a\u0001*¼(Þ\u000bË", + "<21>": "\u000bË", + "<22>": "Ê\"ËÐ@\u000e?>?\u000e>", + "<23>": "ç\u000bÞ", + "<24>": "ù\u0011ã@\u000e?>?\u000e>", + "<25>": "\u0018\u000b\u0014\u000b", + "<26>": "< \u0003\u0002\u0000\u0014\u000b", + "<27>": "°\u000b\u0000\u000b\f÷\u0003\u0002\u0000", + "<28>": "» \u000b\u000f\u000b", + "<29>": "È \u0003\u0002\u0000\u0014\u000b@\u000e?>?\u000e>", + "<30>": "" + }, + "record5": { + "<1>": "\u000b!\u000b@\u000e?>", + "<2>": ")\f+\u000b@\u000e?>", + "<3>": "E\f5\u000b@\u000e?>", + "<4>": "g\f?\u000b@\u000e?>", + "<5>": "–\u000eI\u000b@\u000e?>", + "<6>": "¿\u000fS\u000b@\u000e?>", + "<7>": "á\u000f]\u000b@\u000e?>", + "<8>": "\u0015\u0010g\u000b@\u000e?>", + "<9>": "‚\u0012q\u000b@\u000e?>", + "<10>": "Ñ\u000e{\u000b@\u000e?>", + "<11>": "\u000b‹\u000b", + "<12>": "\u0018\u000b‹\u000b@\u000e?>?\u000e>\u001a\u0001+¬\u000b\u001a\u0001*ž\u000b(Þ\u0003\u0002\u0000¬\u000b", + "<13>": "", + "<14>": { + "<14,1>": { + "<14,1,1>": { + "<14,1,1,1>": " ¬\u000b@\u000e?>?\u000e>\u001a\u0004ELSE", + "<14,1,1,2>": "\u000b\u0018”u\u000e\u0000\u0014\u0018y\u0002BT\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y" + } + } + }, + "<15>": { + "<15,1>": { + "<15,1,1>": { + "<15,1,1,1>": "\u0018\u000b", + "<15,1,1,2>": "\u000b" + } + } + }, + "<16>": { + "<16,1>": { + "<16,1,1>": { + "<16,1,1,1>": "< \u0003\u0002\u0000", + "<16,1,1,2>": "\u000b\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u@\u000e?>?\u000e>\u001a\u0001<%\f" + } + } + }, + "<17>": "¥!%\f\u001a\u0001>%\f\u0014\u0018y\u0002GS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>%A\f\u0014\u0018y\u0002TL\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001>c\f%c\f\u0014\u0018y\u0002SC\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>?\u000e>\u001b\u0001%s\f@>\fz\f\u0004\u0002\u0000?\u000e@\u000e?>\u001a\b%TESTID%”\f\u0014\u0018y\u0002TI\u0017\u0018y@\u000e?>\u001a\t%TESTINT%¯\f\u0014\u0018y\u0002TN\u0017\u0018y@\u000e?>\u001a\t%TESTSTR%Ê\f\u0014\u0018y\u0002TS\u0017\u0018y@\u000e?>\u001a\t%TESTNUM%å\f\u0014\u0018y\u0002NM\u0017\u0018y@\u000e?>\u001a\t%TESTEOL%\b", + "<18>": "\u0014\u0018y\u0002TL\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\u001a%TESTWORD%,", + "<19>": "\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001 \u0017\u0018y@\u000e?>\u001a\u000b%TESTCOMMA%Q", + "<20>": "\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001,\u0017\u0018y@\u000e?>\u001a%TESTSEMI%u", + "<21>": "\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001;\u0017\u0018y@\u000e?>\u001a%TESTDICT%™", + "<22>": "\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001}\u0017\u0018y@\u000e?>\u001a\u000b%TESTVALUE%¾", + "<23>": { + "<23,1>": "\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001", + "<23,2>": "\u0017\u0018y@\u000e?>\u001a%TSTPAREN%â" + }, + "<24>": "\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001)\u0017\u0018y@\u000e?>\u001a\t%IDTOEOL%\u0005\u000e\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\u001a", + "<25>": "%IDTOPERCENT%,\u000e\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001%\u0017\u0018y@\u000e?>\u001a\b%SEARCH%F\u000e\u0014\u0018y\u0002SR\u0017\u0018y@\u000e?>\u001a\b%ADDSYM%`\u000e\u0014\u0018y\u0002AD\u0017\u0018y@\u000e?>\u001a\t%PUTMASK%’\u000e\u0014\u0018y\u0002PS\u0017\u0018y\u0014\u0018y\u0005;MNS;\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001(Í\u000e\u00180u\u000e\u0000", + "<26>": "§«\u000e\f¢\u000e\u0003\u0002\u0000\u001a\u0001)Í\u000e\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u@\u000e?>?\u000e>\u001a\u0002{[@\u000f\u0018”u\u000e\u0000\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u00180u\u000e\u0000", + "<27>": "D\u000f@\u000f", + "<28>": { + "<28,1>": "§\u0006\u000f\f", + "<28,2>": "\u000e\u0003\u0002\u0000\u0014\u0018y\u0002GO\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u001a\u0002]}@\u000f\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u\u0019”u@\u000e?>?\u000e>" + }, + "<29>": "\u0018\u000b»\u000f", + "<30>": "< Q\u000f\u0003\u0002\u0000»\u000f\u001a\u0001S]\u000f\u0003\u0002\u0000»\u000f\u0018”u\u000e\u0000\u0014\u0018y\u0002BT\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u@\u000e?>?\u000e>\u001a\u0001=Ý\u000f%Ý\u000f\u0014\u0018y\u0002NX\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001#\u0011\u0010%\u0011\u0010\u0014\u0018y\u0002NX\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y\u0014\u0018y\u0002CI\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001?>\u0010", + "<31>": "\u001a >\u0010\u001a\u0001?>\u0010\u0014\u0018y\u0002QM\u0017\u0018y\u001f\u000f\u0000\u0013\u0018y\u0001\u0017\u0018y@\u000e?>\u001a\u0001?^\u0010", + "<32>": "ð\u001f^\u0010\u0013\u0003\u0002\u0003\u0002\u0013\u0003\u00022\u0000", + "<33>": "b\u0010^\u0010@\u000e?>?\u000e>\u001a\u0001?|\u0010\u0014\u0018y\u0002QC\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>\u001a\u0001=ª\u0010", + "<34>": "Æ\u0011ª\u0010\u001a\u0001?ª\u0010\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001=\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002!=Ù\u0010", + "<35>": "Æ\u0011Ù\u0010\u001a\u0001?Ù\u0010\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001!\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002<>\b\u0011", + "<36>": "Æ\u0011\b\u0011\u001a\u0001?\b\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001!\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001<6\u0011", + "<37>": "Æ\u00116\u0011\u001a\u0001?6\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001<\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002<=e\u0011", + "<38>": "Æ\u0011e\u0011\u001a\u0001?e\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001{\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001>“\u0011", + "<39>": "Æ\u0011“\u0011\u001a\u0001?“\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001>\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002>=Â\u0011", + "<40>": "Æ\u0011Â\u0011\u001a\u0001?Â\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001}\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>#Þ\u0011\u00132\u00002\u0000\u00132\u0000n\u0000\u0014\u0018y\u0002QN\u0017\u0018y\u000bð\u0011", + "<41>": "ð\u001fð\u0011\u0014\u0018y\u0002QO\u0017\u0018yõ\u0011@\u000e?>?\u000e>", + "<42>": "°!\u0000\u0012\u0003\u0002\u0000~\u0012\u001a\u0001{~\u0012\u0018”u\u000e\u0000\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u00180u\u000e\u0000", + "<43>": "§3\u0012\f*\u0012\u0003\u0002\u0000\u0014\u0018y\u0002GO\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u001a\u0001}~\u0012\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u00190u\u0019”u@\u000e?>?\u000e>\u001a\u0001[è\u0012\u00180u\u000e\u0000", + "<44>": "ì\u0012è\u0012", + "<45>": "§\u0012\f”\u0012\u0003\u0002\u0000\u001a\u0001]è\u0012\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0019”u\u00190u@\u000e?>?\u000e>", + "<46>": "\u0018\u000b&\u0013", + "<47>": "< ù\u0012\u0003\u0002\u0000&\u0013\u001a\u0001S\u0005\u0013\u0003\u0002\u0000&\u0013\u0018”u\u000e\u0000\u0014\u0018y\u0002BF\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>", + "<48>": "‡\u00133\u0013@\u000e?>", + "<49>": "$\u001b=\u0013@\u000e?>", + "<50>": "ö\u001bG\u0013@\u000e?>", + "<51>": "Õ\u001dQ\u0013@\u000e?>", + "<52>": ".\u001e[\u0013@\u000e?>", + "<53>": "s\u001ee\u0013@\u000e?>", + "<54>": "¸\u001eo\u0013@\u000e?>", + "<55>": "Ý\u001ey\u0013@\u000e?>", + "<56>": "\u0011\u001fƒ\u0013@\u000e?>?\u000e>\u001a\u0007ERRMSG(Ã\u0013", + "<57>": "í\u001aÃ\u0013\u001a\u0001,\u000b¦\u0013\u0003\u0002\u0000\f¯\u0013", + "<58>": "í\u001a¯\u0013\fš\u0013Ã\u0013\u001a\u0001)Ã\u0013\u0014\u0018y\u0002EM\u0017\u0018y@\u000e?>\u001a\u0001%Ð\u0013@>\f×\u0013\u0004\u0002\u0000?\u000e@\u000e?>8W\u0002€¡\u001a\u001a\u0006TRIMF%õ\u0013\u0014\u0018y\u0002TF\u0017\u0018y@\u000e?>\fë\u001a\u001aSKIPTOEOL%\u001c\u0014\u0014\u0018y\u0002ST\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\u001aSKIPTOEOS%@\u0014\u0014\u0018y\u0002ST\u0017\u0018y\u0014\u0018y\u0001;\u0017\u0018y@\u000e?>\u001a\tSKIPPEOL%c\u0014\u0014\u0018y\u0002SP\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\fë\u001a\u001a\bPUSHLAB%—\u0014\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0005$LABS\u0017\u0018y\u0014\u0018y\u0004#BIN\u0017\u0018y@\u000e?>\fë\u001a\u001a\tRETFALSE%Ð\u0014\u0014\u0018y\u0002CF\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y@\u000e?>\u001a\u000bRETURN.OBJ%õ\u0014\u0014\u0018y\u0002RO\u0017\u0018y\u0014\u0018y\u0001@\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007GENFAL%(\u0015\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0006$FALSE\u0017\u0018y\u0014\u0018y\u0003#NL\u0017\u0018y@\u000e?>\u001a\bGENLOOP%X\u0015\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0005$LOOP\u0017\u0018y\u0014\u0018y\u0003#NL\u0017\u0018y@\u000e?>\u001a\bGETBYTE%…\u0015\u0014\u0018y\u0002LB\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\u001a\fGETBYTEFROM%¼\u0015\u0014\u0018y\u0002LB\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y", + "<59>": "J\u001f¼\u0015\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>\u001a\bGETWORD%é\u0015\u0014\u0018y\u0002LW\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\u001a\u0007GENAUX%\u0017\u0016\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0004$AUX\u0017\u0018y\u0014\u0018y\u0003#NL\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007OUTFAL%]\u0016\u0014\u0018y\u0002AS\u0017\u0018y\u0014\u0018y\u0006$FALSE\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y\u0014\u0018y\u0005;NUM;\u0017\u0018y@\u000e?>\u001a\bOUTLOOP% \u0016\u0014\u0018y\u0002AS\u0017\u0018y\u0014\u0018y\u0005$LOOP\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y\u0014\u0018y\u0005;NUM;\u0017\u0018y@\u000e?>\u001a\u0007OUTSEQ%á\u0016\u0014\u0018y\u0002AC\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y\u0014\u0018y\u0005;NUM;\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007POPFAL%\u0017\u0014\u0018y\u0002PO\u0017\u0018y\u0014\u0018y\u0006$FALSE\u0017\u0018y@\u000e?>\u001a\bPOPLOOP%0\u0017\u0014\u0018y\u0002PO\u0017\u0018y\u0014\u0018y\u0005$LOOP\u0017\u0018y@\u000e?>\u001a\u0007POPAUX%T\u0017\u0014\u0018y\u0002PO\u0017\u0018y\u0014\u0018y\u0004$AUX\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007SAVEID%¨\u0017\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0005;SID;\u0017\u0018y\u0014\u0018y\u0005;SID;\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0005;SID;\u0017\u0018y\u0014\u0018y\u0004;ID;\u0017\u0018y@\u000e?>\fë\u001a\u001a\tCONTINUE%7\u0018\u0018”u\u000e\u0000\u0014\u0018y\u0002BF\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002SG\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u\u0014\u0018y\u0002CF\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y@\u000e?>\fë\u001a\u001aMOVEBYTES%t\u0018\u0014\u0018y\u0002MB\u0017\u0018y", + "<60>": "J\u001ft\u0018", + "<61>": "J\u001ft\u0018", + "<62>": "ð\u001ft\u0018", + "<63>": "ð\u001ft\u0018", + "<64>": "ð\u001ft\u0018@\u000e?>\fë\u001a\u001a\tTOBINARY%\u0018\u0014\u0018y\u0002IB\u0017\u0018y\u0014\u0018y\u0004#BIN\u0017\u0018y@\u000e?>\u001a\bTOASCII%Â\u0018\u0014\u0018y\u0002AC\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y@\u000e?>\fë\u001a\u001a\tSTORELAB%" + }, + "record6": { + "<1>": "\u0018\u0014\u0018y\u0002SL\u0017\u0018y\u0014\u0018y\u0001@\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0005$LABS\u0017\u0018y@\u000e?>\fë\u001a\u001a\tRJSOURCE%%\u0019\u0014\u0018y\u0002RJ\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007SOURCE%O\u0019", + "<2>": "J\u001fO\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>\u001a", + "<3>": { + "<3,1>": { + "<3,1,1>": { + "<3,1,1,1>": { + "<3,1,1,1,1>": "SOURCE.COLON%v\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y@\u000e?>\u001a\u000eSOURCE.NORMAL%ž\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\u001a\fSOURCE.OPTS%É\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0014\u0018y\u0006;OPTS;\u0017\u0018y@\u000e?>\fë\u001a\u001a\bWORDOBJ%\u001d\u001a\u0014\u0018y\u0002LW\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0001@\u0017\u0018y\u0014\u0018y\u0002CN\u0017\u0018y\u0014\u0018y\u0004#OBJ\u0017\u0018y\u0014\u0018y\u0001-\u0017\u0018y\u0014\u0018y\u00012\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0004DUP%M\u001a\u0014\u0018y\u0002DP\u0017\u0018y\u0014\u0018y\u0005;DUP;\u0017\u0018y\u0014\u0018y\u0004#DUP\u0017\u0018y@\u000e?>\fë\u001a\u001a\tEXCHANGE%t\u001a\u0014\u0018y\u0002SG\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y@\u000e?>\fë\u001a\u001a\tUNTHREAD%œ\u001a\u0014\u0018y\u0002UT\u0017\u0018y\u0014\u0018y\u0003#C1\u0017\u0018y@\u000e?>\fë\u001a$\u0000TRSKPUREGEOUPOSACOMBTOSTRJSOWODUEXUNß\u0013", + "<3,1,1,1,2>": "\u0013h\u0014œ\u0014", + "<3,1,1,1,3>": "\u0014\u001c\u0016æ\u0016Y\u0017­\u0017<\u0018y\u0018Ç\u0018\u0004\u0019*\u0019Î\u0019\"\u001aR\u001ay\u001a?\u000e>%\u0005\u001b\u0014\u0018y\u0002EL\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>" + } + } + } + }, + "<4>": "J\u001f \u001b\u0014\u0018y\u0002EB\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>", + "<5>": "J\u001fL\u001b", + "<6>": "»!L\u001b\u0014\u0018y\u0002CL\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>", + "<7>": "J\u001f\u001b\u0013å\u0001å\u0001\u0013å\u0001\u0003\u0002", + "<8>": "J\u001f\u001b\u0014\u0018y\u0002CB\u0017\u0018y\u0013\u0018yå\u0001\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>", + "<9>": "J\u001f¨\u001b", + "<10>": "Æ\u001f¨\u001b\u0014\u0018y\u0002CS\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>", + "<11>": "J\u001fÑ\u001b", + "<12>": "ð\u001fÑ\u001b\u0014\u0018y\u0002CC\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>", + "<13>": "J\u001fò\u001b\u001a\u0001^ò\u001b\u0014\u0018y\u0002CM\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001!\u001f\u001c", + "<14>": "\u001a \u001f\u001c\u001a\u0001!\u001f\u001c\u0014\u0018y\u0002SM\u0017\u0018y\u001f\u000f\u0000\u0013\u0018y\u0001\u0017\u0018y@\u000e?>", + "<15>": "ð\u001fA\u001c\u001a\u0002=TA\u001c\u0014\u0018y\u0002CT\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>", + "<16>": "ð\u001fc\u001c\u001a\u0002=Fc\u001c\u0014\u0018y\u0002CF\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>", + "<17>": "ð\u001f…\u001c\u001a\u0002=I…\u001c\u0014\u0018y\u0002CI\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>", + "<18>": "ð\u001f²\u001c\u001a\u0001=²\u001c#²\u001c\u0014\u0018y\u0002CE\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u0013\u0018yn\u0000\u0017\u0018y@\u000e?>", + "<19>": "ð\u001fá\u001c\u001a\u0001=á\u001c\u0014\u0018y\u0002EC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y", + "<20>": "ð\u001fá\u001c\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>", + "<21>": { + "<21,1>": { + "<21,1,1>": { + "<21,1,1,1>": "ð\u001f", + "<21,1,1,2>": "\u001c\u0013\u0003\u0002\u0003\u0002\u0013\u0003\u00022\u0000" + } + } + }, + "<22>": "" + }, + "record7": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "\u001c", + "<1,1,1,2>": "\u001c@\u000e?>?\u000e>\u001a\u0001+&\u001d" + } + } + }, + "<2>": "¢\u001d&\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001+\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001-N\u001d", + "<3>": "¢\u001dN\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001-\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001*v\u001d", + "<4>": "¢\u001dv\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001*\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001/ž\u001d", + "<5>": "¢\u001dž\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001/\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>#º\u001d\u00132\u00002\u0000\u00132\u0000n\u0000\u0014\u0018y\u0002CN\u0017\u0018y\u000bÌ\u001d", + "<6>": "ð\u001fÌ\u001d\u0014\u0018y\u0002CO\u0017\u0018yÑ\u001d@\u000e?>?\u000e>\u001a\u0001+\t\u001e", + "<7>": "Æ\u001f\t\u001e\u001a\u0001,\t\u001e\u0014\u0018y\u0002PC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y", + "<8>": "ð\u001f\t\u001e\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001-*\u001e", + "<9>": "Æ\u001f*\u001e\u0014\u0018y\u0002PO\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001+N\u001e", + "<10>": "ð\u001fN\u001e\u0014\u0018y\u0002IC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001-o\u001e", + "<11>": "ð\u001fo\u001e\u0014\u0018y\u0002DC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001P“\u001e", + "<12>": "»!“\u001e\u0014\u0018y\u0002PL\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>\u001a\u0001P´\u001e", + "<13>": "J\u001f´\u001e\u0014\u0018y\u0002PB\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>", + "<14>": "J\u001fÙ\u001e\u001a\u0002,KÙ\u001e\u0014\u0018y\u0002IN\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>", + "<15>": "J\u001f", + "<16>": "\u001f\u001a\u0003,D,", + "<17>": "\u001f\u0014\u0018y\u0002RD\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y", + "<18>": "J\u001f", + "<19>": "\u001f\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\u001a\u0002D,F\u001f", + "<20>": "J\u001fF\u001f\u001a\u0001,F\u001f\u0014\u0018y\u0002WR\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y", + "<21>": { + "<21,1>": { + "<21,1,1>": { + "<21,1,1,1>": { + "<21,1,1,1,1>": "J\u001fF\u001f\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001&]\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001&@\u000e?>\u001a\u0001@q\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001@@\u000e?>\u001a\u0001:…\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001:@\u000e?>\u001a\u0001|™\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001|@\u000e?>\u001a\u0001;Â\u001f/;Â\u001f\u001a\u0001;Â\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001;\u0013\u0003\u00022\u0000\u0014\u0003\u0002\u0001;@\u000e?>?\u000e>\u001a\u0001$ì\u001f\"ì\u001f\u0013å\u0001å\u0001\u0013å\u00012\u0000\u00132\u00002\u0000\u00142\u0000\u0001$\u00132\u0000å\u0001@\u000e?>?\u000e>\u001a\u0001#\u0016 \"\u0016 \u0013å\u0001å\u0001\u0013å\u00012\u0000\u00132\u00002\u0000\u00142\u0000\u0001#\u00132\u0000å\u0001@\u000e?>?\u000e>\"8 3l\u0007\u000f\u00008 \u0007\u000f\u0000=\u000f\u0000*\u0004\u0000=\u000f\u0000+Þ\u0005@\u000e?>?\u000e>\u001a\u0001TW \u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y@\u000e?>\u001a\u0001F‡ \u0014\u0018y\u0002CF\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>\u001a\u0001I· \u0014\u0018y\u0002CI\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002BF\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001SÄ @\u000e?>?\u000e>\u0014\u0018y\u0002BF\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001*\u000bí \u001a\u0001~", + "<21,1,1,1,2>": " (Þ" + } + } + } + }, + "<22>": "", + "<23>": { + "<23,1>": { + "<23,1,1>": { + "<23,1,1,1>": { + "<23,1,1,1,1>": " ", + "<23,1,1,1,2>": " @\u000e?>?\u000e>\u001a\u0001Þ" + } + } + } + }, + "<24>": "!", + "<25>": "\u0011!", + "<26>": "!@\u000e?>?\u000e>\t\b\u0000!!", + "<27>": "": "z!\u0003\u0002\u00008!@\u000e?>?\u000e>\b\t\u0000\u0003€\u001a\u0001Þ\u0005\u0002\u0000N!N!i!9\u000f\u0000\u0002€\u00132\u00002\u0000\u00162\u0000\u000f\u0000\u00073\u0000\u00122\u0000\fB!\u0003\u0002\u0000\b\u0003€\t\u0000\u0012!\u0002@\u000e?>?\u000e>\u001a\u0002~TŠ!\t\u0007\u0000Š!@\u000e?>\u001a\u0002~F¡!\t\u0007\u0000\u0005\u0002\u0000¡!¡!@\u000e?>?\u000e>\"¬!@\u000e?>?\u000e>#·!@\u000e?>?\u000e>%Â!@\u000e?>?\u000e>\u001a\u0003ENDà!\t\b\u0000\u000bÛ!\u0011\u0001*\u0003\u0002\u0000à!@\u000e?>?\u000e>", + "<29>": "ã í!@\u000e?>", + "<30>": "§ø!\fï!\u0003\u0002\u0000", + "<31>": "", + "<32>": " \u0003\"@\u000e?>?\u000e>;$\u0002\u0013$\u0002$\u0002/Þ\u0013Â\u0001Â\u0001\u0013Â\u00012\u0000\u0014Â\u0001\u0004.IOB\u001a\u0001Þ\u001a\u0001T0\"\u0003\u0006\u0000\u000b9\"\u0004\u0006\u0000\u0003\u0002\u0000k\"\u001a\u0001SE\"\u0003\u0007\u0000\u000bN\"\u0004\u0007\u0000\u0003\u0002\u0000k\"\u001a\u0001LZ\"\u0003\b\u0000\u000bc\"\u0004\b\u0000\u0003\u0002\u0000k\";\u0002€@\u000e?>;\u0002€\u0003\u0002\u0000@\u000e?>?\u000e>\u0011\u0017COMPILATION SUCCESSFUL!@\u000e?>?\u000e>\u0011(COMPILATION ABORTED - NO OBJECT PRODUCED@\u000e?>?\u000e>\u0017\u0018y\u0017\u0018y\u0017\u0018y", + "<33>": "\u000e##\u0013\u0018y\u0018y;\u0018y\u0004\u0003\u0000", + "<34>": { + "<34,1>": { + "<34,1,1>": { + "<34,1,1,1>": { + "<34,1,1,1,1>": "r#", + "<34,1,1,1,2>": "\"" + } + } + } + }, + "<35>": { + "<35,1>": { + "<35,1,1>": { + "<35,1,1,1>": { + "<35,1,1,1,1>": "P#ñ\"\u0003\u0002\u0000", + "<35,1,1,1,2>": "\"\fâ\"\u0003\u0002\u0000;\u0002€\u0013\u0018y\u0018y\u0003\u0002\u0000@\u000e?>?\u000e>\b\u0002\u0000\u0019y=\u0002\u0000/Ì\u0007\u0005\u0002\u0000@\u000e?>\u0012!\u0002\u0011\u001eCOLON BUFFER OVERFLOW WARNING.\u0012!\u0002\u0003\u0002\u0000@\u000e?>?\u000e>\t\u0003\u0000n#\u0014\u0004€\u0001\u0017\u00132\u00002\u0000\u00142\u0000\u0001:" + } + } + } + }, + "<36>": "D1n#@\u000e?>?\u000e>8W\u0018yë-\u001a\u0002CT“#\u001a\u0001Þ“#\u0014\u0004€\u0001\u0003", + "<37>": "d/“#@\u000e?>\f\u0011/\u001a\u0002CF²#\u001a\u0001Þ²#\u0014\u0004€\u0001\u0004", + "<38>": "d/²#@\u000e?>\f\u0011/\u001a\u0002CIÑ#\u001a\u0001ÞÑ#\u0014\u0004€\u0001\u0005", + "<39>": "d/Ñ#@\u000e?>\f\u0011/\u001a\u0002ICð#\u001a\u0001Þð#\u0014\u0004€\u0001\u0006", + "<40>": "d/ð#@\u000e?>\f\u0011/\u001a\u0002DC\u000f$\u001a\u0001Þ\u000f$\u0014\u0004€\u0001\u0007", + "<41>": "d/\u000f$@\u000e?>\f\u0011/\u001a\u0002EC4$\u001a\u0001Þ4$\u0014\u0004€\u0001\b", + "<42>": "d/4$", + "<43>": "d/4$@\u000e?>\f\u0011/\u001a\u0002QCS$\u001a\u0001ÞS$\u0014\u0004€\u0001\t", + "<44>": "d/S$@\u000e?>\f\u0011/\u001a\u0002BFr$\u001a\u0001Þr$\u0014\u0004€\u0001", + "<45>": "°/r$@\u000e?>\f\u0011/\u001a\u0002BT‘$\u001a\u0001Þ‘$\u0014\u0004€\u0001\u000b", + "<46>": "°/‘$@\u000e?>\f\u0011/\u001a\u0002GO°$\u001a\u0001Þ°$\u0014\u0004€\u0001\f", + "<47>": "°/°$@\u000e?>\f\u0011/\u001a\u0002GSÏ$\u001a\u0001ÞÏ$\u0014\u0004€\u0001", + "<48>": "", + "<49>": "Ô/Ï$@\u000e?>\f\u0011/\u001a\u0002RTN%\u001a\u0001ÞN%\t\u0006\u0000A%\u0014\u0004€\u0001\u0011\u0016\u0004€Q\u0000\u0007\u0005€\u0013\u0004€P\u0000\u0014\u0004€\u0006=\u0000\u0000*\u0000\u000e\u0014\u0004€\u0006=\u0000\u0000+ F\u0014\u0004€\u0005\u0013 \u0000 \u0000\u0014\u0004€\u0005\u0016 \u0000\u0000\u0000\u0014\u0004€\u0003\u0012 \u0000\u0014\u0004€\u0006=\u0000\u0000- F\u0014\u0004€\u0006=\u0000\u0000/\u0000\u000e\u0014\u0004€\u0003\u0011\u0001 \u0003\u0002\u0000N%\u0014\u0004€\u0001\u000e@\u000e?>\f\u0011/\u001a\u0002SMm%\u001a\u0001Þm%\u0014\u0004€\u0001\u000f", + "<50>": "¼0m%@\u000e?>\f\u0011/\u001a\u0002QMŒ%\u001a\u0001ÞŒ%\u0014\u0004€\u0001\u0010", + "<51>": "¼0Œ%@\u000e?>\f\u0011/\u001a\u0002PL«%\u001a\u0001Þ«%\u0014\u0004€\u0001\u0011", + "<52>": "ï/«%@\u000e?>\f\u0011/\u001a\u0002PBÊ%\u001a\u0001ÞÊ%\u0014\u0004€\u0001\u0012", + "<53>": { + "<53,1>": { + "<53,1,1>": "q/Ê%@\u000e?>\f\u0011/\u001a\u0002CB", + "<53,1,2>": "%\u001a\u0001Þ", + "<53,1,3>": "%\u001a\u0001:", + "<53,1,4>": "%\u001a\u0001Þ", + "<53,1,5>": "%\u001b\u0001:\u0005\u0002\u0000", + "<53,1,6>": "%\u0003\u0003\u0000\u001b\u0001:", + "<53,1,7>": "%@\u000e?>\u001a\u0002CB\u001e&\u001a\u0001Þ\u001e&\u0014\u0004€\u0001\u0013" + } + }, + "<54>": "q/\u001e&", + "<55>": "q/\u001e&@\u000e?>\f\u0011/\u001a\u0002CLD&\u001a\u0001ÞD&\u001b\u0001:D&\u0003\u0003\u0000\u001b\u0001:\u0005\u0002\u0000D&@\u000e?>\u001a\u0002CLf&\u001a\u0001Þf&\u0014\u0004€\u0001\u0014", + "<56>": "q/f&", + "<57>": "ï/f&@\u000e?>\f\u0011/\u001a\u0002CS‹&\u001a\u0001Þ‹&\u0014\u0004€\u0001\u0015", + "<58>": "q/‹&", + "<59>": "‹/‹&@\u000e?>\f\u0011/\u001a\u0002CC°&\u001a\u0001Þ°&\u0014\u0004€\u0001\u0016", + "<60>": "q/°&", + "<61>": "d/°&@\u000e?>\f\u0011/\u001a\u0002CMÏ&\u001a\u0001ÞÏ&\u0014\u0004€\u0001\u0017", + "<62>": "q/Ï&@\u000e?>\f\u0011/\u001a\u0002PCô&\u001a\u0001Þô&\u0014\u0004€\u0001\u0018", + "<63>": "‹/ô&", + "<64>": "d/ô&@\u000e?>\f\u0011/\u001a\u0002PO\u0013'\u001a\u0001Þ\u0013'\u0014\u0004€\u0001\u0019", + "<65>": "‹/\u0013'@\u000e?>\f\u0011/\u001a\u0002TL2'\u001a\u0001Þ2'\u0014\u0004€\u0001\u001a", + "<66>": "ï/2'@\u000e?>\f\u0011/\u001a\u0002NXQ'\u001a\u0001ÞQ'\u0014\u0004€\u0001\u001b", + "<67>": "ï/Q'@\u000e?>\f\u0011/\u001a\u0002ASp'\u001a\u0001Þp'\u0014\u0004€\u0001\u001e", + "<68>": "‹/p'@\u000e?>\f\u0011/\u001a\u0002AC'\u001a\u0001ޏ'\u0014\u0004€\u0001\u001f", + "<69>": "d/'@\u000e?>\f\u0011/\u001a\u0002IN®'\u001a\u0001Þ®'\u0014\u0004€\u0001!", + "<70>": "q/®'@\u000e?>\f\u0011/\u001a\u0002TIÇ'\u001a\u0001ÞÇ'\u0014\u0004€\u0001\"@\u000e?>\f\u0011/\u001a\u0002TNà'\u001a\u0001Þà'\u0014\u0004€\u0001#@\u000e?>\f\u0011/\u001a\u0002TSù'\u001a\u0001Þù'\u0014\u0004€\u0001%@\u000e?>\f\u0011/\u001a\u0002TF\u0012(\u001a\u0001Þ\u0012(\u0014\u0004€\u0001&@\u000e?>\f\u0011/\u001a\u0002SP1(\u001a\u0001Þ1(\u0014\u0004€\u0001'", + "<71>": "%01(@\u000e?>\f\u0011/\u001a\u0002STP(\u001a\u0001ÞP(\u0014\u0004€\u0001(", + "<72>": "%0P(@\u000e?>\f\u0011/\u001a\u0002SRi(\u001a\u0001Þi(\u0014\u0004€\u0001)@\u000e?>\f\u0011/\u001a\u0002AD‚(\u001a\u0001Þ‚(\u0014\u0004€\u0001*@\u000e?>\f\u0011/\u001a\u0002RD§(\u001a\u0001Þ§(\u0014\u0004€\u0001+", + "<73>": "q/§(", + "<74>": "q/§(@\u000e?>\f\u0011/\u001a\u0002WRÌ(\u001a\u0001ÞÌ(\u0014\u0004€\u0001,", + "<75>": "q/Ì(", + "<76>": "q/Ì(@\u000e?>\f\u0011/\u001a\u0002DSë(\u001a\u0001Þë(\u0014\u0004€\u0001-", + "<77>": "<0ë(@\u000e?>\f\u0011/\u001a\u0002TT)\u001a\u0001Þ)\u0014\u0004€\u0001/", + "<78>": "%0)@\u000e?>\f\u0011/\u001a\u0002CE/)\u001a\u0001Þ/)\u0014\u0004€\u00010", + "<79>": "d//)", + "<80>": "¼0/)@\u000e?>\f\u0011/\u001a\u0002NOH)\u001a\u0001ÞH)\u0014\u0004€\u00011@\u000e?>\f\u0011/\u001a\u0002PSm)\u001a\u0001Þm)\u0014\u0004€\u00013", + "<81>": "q/m)", + "<82>": "d/m)@\u000e?>\f\u0011/\u001a\u0002RJŒ)\u001a\u0001ÞŒ)\u0014\u0004€\u00014", + "<83>": "q/Œ)@\u000e?>\f\u0011/\u001a\u0002SL·)\u001a\u0001Þ·)\u0014\u0004€\u00015", + "<84>": "q/·)", + "<85>": "d/·)", + "<86>": "‹/·)@\u000e?>\f\u0011/\u001a\u0002IBÖ)\u001a\u0001ÞÖ)\u0014\u0004€\u00016", + "<87>": { + "<87,1>": { + "<87,1,1>": { + "<87,1,1,1>": "d/Ö)@\u000e?>\f\u0011/\u001a\u0002DP", + "<87,1,1,2>": ")\u001a\u0001Þ", + "<87,1,1,3>": ")\u0014\u0004€\u00017" + } + } + }, + "<88>": { + "<88,1>": { + "<88,1,1>": { + "<88,1,1,1>": "q/", + "<88,1,1,2>": ")" + } + } + }, + "<89>": { + "<89,1>": { + "<89,1,1>": { + "<89,1,1,1>": "d/", + "<89,1,1,2>": ")@\u000e?>\f\u0011/\u001a\u0002BC0*\u001a\u0001Þ0*\u0014\u0004€\u00018" + } + } + }, + "<90>": "%00*", + "<91>": "q/0*", + "<92>": "°/0*\u0013øuøu\u0013ˆwˆw@\u000e?>\f\u0011/\u001a\u0002LBU*\u001a\u0001ÞU*\u0014\u0004€\u00019", + "<93>": "d/U*", + "<94>": "q/U*@\u000e?>\f\u0011/\u001a\u0002LWz*\u001a\u0001Þz*\u0014\u0004€\u0001:", + "<95>": "d/z*", + "<96>": "q/z*@\u000e?>\f\u0011/\u001a\u0002SB™*\u001a\u0001Þ™*\u0014\u0004€\u0001;", + "<97>": "q/™*@\u000e?>\f\u0011/\u001a\u0002COÄ*\u001a\u0001ÞÄ*\u0014\u0004€\u0001<", + "<98>": "d/Ä*", + "<99>": "%0Ä*", + "<100>": "d/Ä*@\u000e?>\f\u0011/\u001a\u0002CNï*\u001a\u0001Þï*\u0014\u0004€\u0001=", + "<101>": "d/ï*", + "<102>": "%0ï*", + "<103>": "¼0ï*@\u000e?>\f\u0011/\u001a\u0002SS\b+\u001a\u0001Þ\b+\u0014\u0004€\u0001>@\u000e?>\f\u0011/\u001a\u0002RS!+\u001a\u0001Þ!+\u0014\u0004€\u0001?@\u000e?>\f\u0011/\u001a\u0002SG:+\u001a\u0001Þ:+\u0014\u0004€\u0001@@\u000e?>\f\u0011/\u001a\u0002UTY+\u001a\u0001ÞY+\u0014\u0004€\u0001A", + "<104>": "d/Y+@\u000e?>\f\u0011/\u001a\u0002ROx+\u001a\u0001Þx+\u0014\u0004€\u0001B", + "<105>": "q/x+@\u000e?>\f\u0011/\u001a\u0002NM‘+\u001a\u0001Þ‘+\u0014\u0004€\u0001C@\u000e?>\f\u0011/\u001a\u0002EL°+\u001a\u0001Þ°+\u0014\u0004€\u0001D", + "<106>": "ï/°+@\u000e?>\f\u0011/\u001a\u0002EBÏ+\u001a\u0001ÞÏ+\u0014\u0004€\u0001E", + "<107>": "q/Ï+@\u000e?>\f\u0011/\u001a\u0002EMè+\u001a\u0001Þè+\u0014\u0004€\u0001F@\u000e?>\f\u0011/\u001a\u0002SC\u0007,\u001a\u0001Þ\u0007,\u0014\u0004€\u0001G", + "<108>": "ï/\u0007,@\u000e?>\f\u0011/\u001a\u0002CA8,\u001a\u0001Þ8,/Þ8,\u0013øu2\u0000\b", + "<109>": "\u0000\u0005€\u0006", + "<110>": "\u0000\u0018ˆw", + "<111>": "\u0000\u001a\u0001Þ8,@\u000e?>\f\u0011/\u001a\u0002ENa,\u001a\u0001Þa,", + "<112>": "Õ0a,\u0016\u0004€ùu\u0013\u0004€øu\u0013\u0004€ˆw@\u000e?>\f\u0011/\u001a\u0002OL{,\u001a\u0001Þ{,", + "<113>": "Õ0{,@\u000e?>\f\u0011/\u001a\u0002RH•,\u001a\u0001Þ•,", + "<114>": "ù0•,@\u000e?>\f\u0011/\u001a\u0002SZ¾,\u001a\u0001Þ¾,\b\u0005\u0000\u0005€0\u0005€\u0000\u0000", + "<115>": "¼0¾,\b\u0005€\u0005\u0000@\u000e?>\f\u0011/\u001a\u0002SH\u001d-\u001a\u0001Þ\u001d-\b\u0005\u0000\u0005€0\u0005€\u0002\u0000", + "<116>": "q/\u001d-", + "<117>": "q/\u001d-", + "<118>": "d/\u001d-", + "<119>": "q/\u001d-", + "<120>": "q/\u001d-", + "<121>": "q/\u001d-", + "<122>": "q/\u001d-", + "<123>": "q/\u001d-", + "<124>": "d/\u001d-", + "<125>": "q/\u001d-\b\u0005€\u0005\u0000@\u000e?>\f\u0011/\u001a\u0002DMY-\u001a\u0001ÞY-\u0014\u0004€\u0001\u0014", + "<126>": "q/Y-\u0014\u0004€\u0001\b", + "<127>": "\u000e0Y-", + "<128>": "d/Y-", + "<129>": "q/Y-", + "<130>": "q/Y-@\u000e?>\f\u0011/\u001a\u0002MB-\u001a\u0001ސ-\u0014\u0004€\u0001H", + "<131>": "q/-", + "<132>": "q/-", + "<133>": "d/-", + "<134>": "d/-", + "<135>": "d/-@\u000e?>\f\u0011/\u001a\u0002QO»-\u001a\u0001Þ»-\u0014\u0004€\u0001J", + "<136>": "d/»-", + "<137>": "%0»-", + "<138>": "d/»-@\u000e?>\f\u0011/\u001a\u0002QNæ-\u001a\u0001Þæ-\u0014\u0004€\u0001K", + "<139>": "d/æ-", + "<140>": "%0æ-", + "<141>": "¼0æ-@\u000e?>\f\u0011/’\u0000CTCFCIICDCECQCBFBTGOGSRTSMQMPLPBCBCLCSCCCMPCPOTLNXASACINTITNTSTFSPSTSRADRDWRDSTTCENOPSRJSLIBDPBCLBLWSBCOCNSSRSSGUTRONMELEBEMSCCAENOLRHSZSHDMMBQOQNy#˜#·#Ö#õ#\u0014$9$X$w$–$µ$Ô$S%r%‘%°%Ï%#&k&&µ&Ô&ù&\u0018'7'V'u'”'³'Ì'å'", + "<142>": "'\u0017(6(U(n(‡(¬(Ñ(ð(\u000f)4)M)r)‘)¼)Û)\u0000*5*Z**ž*É*ô*", + "<143>": "+&+?+^+}+–+µ+Ô+í+\f,=,f,€,š,Ã,\"-^-•-À-\u001a\u0001Þ\u001f/\u0004\u0002\u0000\u0004\u0002\u0000?\u000e\u000b[/\u0012!\u0002\u0011\u000eINVALID OP AT \b\u000f\u0000\u0019y\u001f\u000f\u0000\u0012\u0001\u0011\u0002 \"/Þ[/\u00122\u0000\u0011\u0002\" !2\u0000\u0012!\u0002\u0003\u0002\u0000'Þ`/@\u000e?>?\u000e>", + "<144>": "˜/m/@\u000e?>?\u000e>", + "<145>": "˜/z/@\u000e?>?\u000e>", + "<146>": "˜/‡/@\u000e?>?\u000e>", + "<147>": "˜/”/@\u000e?>?\u000e>/Þ¬/", + "<148>": "D1¬/\u001a\u0001Þ¬/@\u000e?>?\u000e>#Ð/\u00132\u00002\u0000\u00132\u0000n\u0000\u000fâ\u0005", + "<149>": "‹1Ð/\u001a\u0001ÞÐ/@\u000e?>?\u000e>/Þë/\u000fÞ\u0005", + "<150>": "‹1ë/\u001a\u0001Þë/@\u000e?>?\u000e>/Þ0\u0016\u0004€3\u0000\u0007\u0005€\u0013\u0004€2\u0000\u001a\u0001Þ0@\u000e?>?\u000e>/Þ!0\u0013\u0004€2\u0000\u001a\u0001Þ!0@\u000e?>?\u000e>/Þ80\u0013\u0004€2\u0000\u001a\u0001Þ80@\u000e?>?\u000e>/Þ~0\u001a\u0001Þ~0#~06\u0010\u0000\bˆ\u0001\u0010\u0000\u001a\u0001Þ~0#~0\u0016\u0004€ˆ\u00016\u0010\u0000\u0016\u0004€\u0010\u0000\bˆ\u0001\u0010\u0000", + "<151>": { + "<151,1>": { + "<151,1,1>": { + "<151,1,1,1>": { + "<151,1,1,1,1>": "‚0~0\u001a\u0001Þ~0@\u000e?>?\u000e>\u000fö\u0005)\u0005\u0002\u0000\u000b§0\u0011\u0001\"\u00122\u0000\u0011\f\" REDEFINED.\u0012!\u0002\u0003\u0002\u0000¸0\u000fö\u0005\bˆ\u0001\u0010\u0000*¸0@\u000e?>?\u000e>#Ñ06\u0010\u0000\u0016\u0004€\u0010\u0000\u001a\u0001ÞÑ0@\u000e?>?\u000e>#õ0\u00132\u00002\u0000\u00132\u0000n\u0000\u000f", + "<151,1,1,1,2>": "\u0005" + } + } + } + }, + "<152>": "Å1õ0\u001a\u0001Þõ0@\u000e?>?\u000e>/Þ@1\u000fò\u0005", + "<153>": "Å1@1\u001a\u0001Þ@1\t\u0006\u000081\u0014\u0004€\u0001\u0011\u0016\u0004€3\u0000\u0007\u0005€\u0013\u0004€2\u0000\u0014\u0004€\u0004\u0011\u0002: \u0013P\u0000P\u0000\u0013P\u00002\u0000\u0003\u0002\u0000@1@\u000e?>?\u000e>\u000fâ\u0005)Y1\u0010ö\u0005Y1\u0016\u0004€ˆ\u0001@\u000e?>\u0011\u0001\"\u00122\u0000\u0011\u0017\" HAS NOT BEEN DEFINED.\u0012!\u0002\u0004\u0002\u0000\u0016\u0004€\u0002\u0000@\u000e?>?\u000e>\u000fê\u0005)\u000b™1\u0004ˆ\u0001\u0003\u0002\u0000©1\u0010æ\u0005©1\u0016\u0004€ˆ\u0001@\u000e?>\u0016\u0004€ˆ\u0001\bˆ\u0001\u0005€=ˆ\u0001-\u0002\u0000*Á1@\u000e?>?\u000e>)\u000bÐ1\u0004ˆ\u0001\u0003\u0002\u0000\u00032\u0010ê\u0005\u00032\b\u0003\u0000\u0005€\u0006\u0003\u0000", + "<154>": "\u00142\u0003\u0002\u0000\u00032\bˆ\u0001\u0003\u0000\u0007\u0003\u0000\b\u0005€\u0003\u0000\u000fæ\u0005*\u00032\u0004\u0003\u0000@\u000e?>", + "<155>": "A2\u0003\u0002\u0000\u00102@\u000e?>?\u000e>\tˆ\u000182\b\u0005€ˆ\u0001:\u000f\u0000\u0004€=\u0005€-\u0002\u0000\bˆ\u0001\u000f\u0000\u0016\u0004€\u0003\u0000\f\u00152\u0003\u0002\u0000@\u000e?>?\u000e>\u0011\u0001\"\u00122\u0000\u0011\u001c\" IS DEFINED MORE THAN ONCE.\u0012!\u0002@\u000e?>?\u000e\u001a" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSOBJ%003ASITRANS.RUN.json b/SYSPROG/APPROW/SYSOBJ%003ASITRANS.RUN.json new file mode 100644 index 0000000..e6d4fac --- /dev/null +++ b/SYSPROG/APPROW/SYSOBJ%003ASITRANS.RUN.json @@ -0,0 +1,205 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SITRANS.RUN" + }, + "body": { + "record1": { + "<1>": "\u0014" + }, + "record2": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "´Ãd\u0000\u0000\u0000 \u0000p\bz\bˆ\t–\n\u0002\u0000\u0010\u000e-\u0002\u0000\u0000\u0000-\u0002\u0000\u0002\u0000-\u0002\u0000\u0004\u0000-\u0002\u0000\u0006\u0000-\u0002\u0000\b\u0000-\u0002\u0000\n\u0000-\u0002\u0000\f\u0000-\u0002\u0000\u000e\u0000-\u0002\u0000\u0010\u0000-\u0002\u0000\u0012\u0000-\u0002\u0000\u0014\u0000-\u0002\u0000\u0018\u0000-\u0002\u0000\u001a\u0000-\u0002\u0000\u001c\u0000-\u0002\u0000\u001e\u0000-\u0002\u0000 \u0000-\u0002\u0000\"\u0000-\u0002\u0000$\u0000-\u0002\u0000&\u0000-\u0002\u0000¢\u0000-\u0002\u0000¬\n-\u0002\u0000¼\n-\u0002\u0000¶Ã-<\u0000d\u0000-Ð\u0007 \u0000-\n\u0000p\b-\u000e\u0001z\b-\u000e\u0001ˆ\t-\u0010\u0000–\n-\n\u0000ª\n-\u0006\u0000´\n-È\u0000º\n-\u0006\u0000‚\u000b-\u0010\u0000ˆ\u000b-\u0010\u0000˜\u000b-\n\u0000¨\u000b-d\u0000¸\u000b-d\u0000\u001c\f-d\u0000€\f-d\u0000ä\f-d\u0000H\r-d\u0000¬\r-Ä\t\u0010\u000e-Ð\u0007Ô\u0017-Ð\u0007¤\u001f-@œt'-\u0010'´Ã\u0014¸\u000b\b\u0010\u0011\u0002\u0000H\r¬\r\u0014¸\u000b\b\u0010!\u0002\u0000H\r¬\r\u0014¸\u000b\b\u00101\u0002\u0000H\r¬\r\u0014¸\u000b\b \u0012\u0002\u0000º\n‚\u000b\u0014¸\u000b\b \"\u0002\u0000º\n‚\u000b\u0017´Ã\u0017´Ã4´Ã\u0013t't'\u0003\u0006\u0000\u0004\u000e\u0000\u0014´\n\u0002\r\n\u0004\u001c\u0000\u0004$\u0000>\r\u0001\nŒ\u0001\t$\u0000\np\u0001\u0013t't'\u000b„\u0001\r³\u0004\u000b\u0001\u0003\u0000\u0000\u0013t't'\n„\u0001\nŒ\u0001Bt'@\u000e?>?\u000e>\r", + "<1,1,1,1,2>": "\u0001\nî\u0001\u001b\u0001Þ\u0005\u0000\u0000\nÜ\u0001\nÙ\u0001\r›\u0002\nÜ\u0001\u001b\u0001Þ\u0005\u0000\u0000\nÖ\u0001\nÓ\u0001\rÃ\u0002\nÖ\u0001\u001b\u0001Þ\u0005\u0000\u0000\nÐ\u0001\nÍ\u0001\rÜ\u0002\nÐ\u0001\u0003\u0000\u0000\nÖ\u0001\u0003\u0000\u0000\nÜ\u0001\u0003\u0000\u0000\nî\u0001\u0004\u0006\u0000\u001a\u0001Þ\nî\u0001\u0017t'\f‘\u0001\u0003\u0000\u0000\u0017t'@\u000e?>?\u000e>\rL\u0002\nH\u0002\u001a\u0001*\nH\u0002\rm\u0002\nH\u0002\u001a\u0001*\nH\u0002\r„\u0002\nH\u0002\u0013t'ä\f\u0014t'\u0001" + } + } + }, + "<1,2>": "0\b\u0000\u0000\u00000\n\u0000\u0000\u0000\u0013Ô\u0017Ô\u0017\u0013¤\u001f¤\u001f\t\u0006\u0000\u000bC\u0002\u0003\u001c\u0000\u0003\u0000\u0000\nH\u0002@\u000e?>?\u000e>G\u0001*\ni\u0002\u0013\u001c\f\u001c\f\u0013ä\fä\f\u0013\u001c\f \u0000\u0013ä\f \u0000@\u000e?>?\u000e>G\u0001*\n€\u0002\u0014ä\f\u0001*\u0013ä\f \u0000@\u000e?>?\u000e>G\u0001", + "<1,3>": "\n—\u0002\u0014ä\f\u0001*\u0013ä\f \u0000@\u000e?>?\u000e>\u001a\u0001", + "<1,4>": "\n¿\u0002\u001a\u0001*\n·\u0002\t\u0006\u0000\n±\u0002\u0003\u0004\u0000\u0003\u0000\u0000\nº\u0002\u0003\u0000\u0000\n¿\u0002@\u000e?>?\u000e>\u001a\u0001", + "<1,5>": "\nØ\u0002\u001a\u0001*\nÐ\u0002\u0003\u0000\u0000\nØ\u0002@\u000e?>?\u000e>\u001a\u0001", + "<1,6>": "\n&\u0003\r*\u0003\n" + }, + "<2>": "\u0002\rA\u0003\n", + "<3>": "\u0002\rd\u0003\n", + "<4>": { + "<4,1>": "\u0002\u001a\u0001", + "<4,2>": "\n" + }, + "<5>": { + "<5,1>": "\u0002\fã\u0002\u0003\u0000\u0000\u0016t'\b\u0000\u0014t'\u0001", + "<5,2>": "\u0016t'\n\u0000\u0014t'\u0001", + "<5,3>": "\u0013t'¤\u001f\u0014t'\u0001", + "<5,4>": { + "<5,4,1>": "\u0013t'Ô\u0017@\u000e?>?\u000e>\u0013H\rH\rG\u0001", + "<5,4,2>": "\n=\u0003\u0013H\r \u0000@\u000e?>?\u000e>\u0013ª\nª\n\u001a\u0001", + "<5,4,3>": "\n`\u0003G\u0001", + "<5,4,4>": "\nX\u0003\u0013ª\n \u0000\u0003\u0000\u0000\n`\u0003@\u000e?>?\u000e>\u001a\u0001", + "<5,4,5>": "\nz\u0003\ns\u0003@>\fz\u0003\u0004\u0000\u0000?\u000e@\u000e?>8B´ÃF\u0004\r\\\u0004\nŠ\u0003@\u000e?>\fZ\u0004\r\\\u0004\n—\u0003@\u000e?>\fZ\u0004\u001b\u00032", + "<5,4,6>": "5\n§\u0003\u0003\u001c\u0000\u0003\u0000\u0000\nµ\u0003\r\\\u0004\nµ\u0003@\u000e?>\fZ\u0004\b\u0014\u0000¶Ã\u001a\u00013\n'\u0004\u001a\u0001", + "<5,4,7>": "\n'\u0004G\u0001", + "<5,4,8>": "\u0003\u0000\u0000\n'\u0004\u001a\u0001", + "<5,4,9>": "\n'\u0004G\u0001", + "<5,4,10>": "\u0003\u0000\u0000\n'\u0004\u001a\u0001", + "<5,4,11>": "\n'\u0004G\u0002", + "<5,4,12>": "" + }, + "<5,5>": { + "<5,5,1>": "\u0003\u0000\u0000\n'\u0004\u001a\u0001", + "<5,5,2>": "\u000b" + } + } + }, + "record3": { + "<1>": { + "<1,1>": "\u0003\u0003$\u0000\u0003\u0000\u0000\n'\u0004G\u0001", + "<1,2>": { + "<1,2,1>": "\u0003\u0000\u0000\n'\u0004\t¢\u0000\u000b\u0017\u0004\u0003$\u0000\u0003\u0000\u0000\n'\u0004\b¶Ã\u0014\u0000\r\\\u0004\n'\u0004@\u000e?>\fZ\u0004\rŠ\u0004\n4\u0004@\u000e?>\fZ\u0004\r\\\u0004\nA\u0004@\u000e?>\fZ\u0004\u0006\u0000012356‚\u0003\u0003œ\u0003º\u0003,\u00049\u0004?\u000e>\u0006\n\u0000\u0013Ô\u0017H\r\u0014Ô\u0017\u0001", + "<1,2,2>": "\u0013Ô\u0017ª\n\u0014Ô\u0017\u0001", + "<1,2,3>": "G\u0001" + }, + "<1,3>": { + "<1,3,1>": "\n†\u0004\u0013Ô\u0017 \u0000\u0014Ô\u0017\u0001", + "<1,3,2>": "@\u000e?>?\u000e>\u0006\b\u0000\u0013¤\u001fH\r\u0014¤\u001f\u0001", + "<1,3,3>": "\u0014¤\u001f\u0001", + "<1,3,4>": "G\u0001" + }, + "<1,4>": { + "<1,4,1>": "\n¯\u0004\u0013¤\u001f \u0000\u0014¤\u001f\u0001", + "<1,4,2>": "@\u000e?>?\u000e>\u0013´Ã´Ã\u0013´Ãt'\u0013t't'4´Ã\u0013´Ã´Ã\rF\f\n$\u0006\u0013´Ã´Ã\r(\u0006\n$\u0006\r†\u0011\n$\u0006\rŠ\u0012\n$\u0006\r\u0005\u0019\n$\u0006\rŸ\u001c\n$\u0006\t\u0004\u0000\n\u0000\u0005\rÛ\u001e\n\u0003\u0005\u0003\u0000\u0000\n$\u0006\rF\f\n$\u0006\t\b\u0000\n3\u0005\rí\u001e\n6\u0005\rz\u001f\n*\u0005\u0007\b\u0000\t\b\u0000\n*\u0005\f\u0018\u0005\u0003\u0000\u0000\rP \n6\u0005\u0003\u0000\u0000\n$\u0006\u0013´Ã´Ã\u0003\u0006\u0000\rF\f\n$\u0006\rp\u0011\n$\u00060 \u0000\u0000\u0000\rl \u0003\u0000\u0000\n‚\u0005\t\u0006\u0000\u000bg\u0005\r­5\u0003\u0000\u0000\n‚\u0005\rF\f\n‚\u0005\rp\u0011\n‚\u0005\u0004\u0006\u0000\r”8\n‚\u0005\fR\u0005\u0003\u0000\u0000\rè5\n$\u0006\u0003\u000e\u0000\r÷7\n$\u0006\u0013´Ã´Ã\u0003\u0006\u0000\rF\f\n$\u0006\rp\u0011\n$\u00060 \u0000\u0000\u0000\r\u001a9\u0003\u0000\u0000\né\u0005\t\u0006\u0000\u0005\u0000\u0000\nÂ\u0005\nÂ\u0005\nË\u0005\r­5\nÎ\u0005\u0003\u0000\u0000\né\u0005\rF\f\né\u0005\rp\u0011\né\u0005\u0004\u0006\u0000\r”8\né\u0005\f­\u0005\u0003\u0000\u0000\rö=\n$\u0006\rïA\n$\u0006\rUJ\n$\u0006\rÉK\n$\u0006\r-L\n$\u0006\rAN\n$\u0006\reN\n$\u0006\r-R\n$\u0006\rT\n$\u0006@\u000e?>?\u000e>\u0014t'\u0002* \u0013t'\u001c\f\u0014t'> Secondary index transaction builder for version 2.1 and above\u0017t'\u0017t'\u0014t'%* Invoked like a dictionary calculate\u0017t'\u0014t'9* Input: @MV = 0 for write, 1 for delete, 2 for clearfile\u0017t'\u0014t''* @ID = Record key for write and delete\u0017t'\u0014t'\u001c* @RECORD = Record for write\u0017t'\u0014t' * @ANS = data file file variable\u0017t'\u0014t'\u0012* RETURNS: nothing\u0017t'\u0017t'\u0014t'ƒCOMMON /%%SI%%/MAX.UPDATE.SIZE,INDEXES,INDEXES.FILEVAR,NO.PROTECT,OLD.REC,OLD.FLAG,OLD.FV,OLD.ID,DICT.FVS%,BATCH.MODE%,UPDATE.ITEM%\u0017t'\u0017t'\u0014t'\u0017EQU MARKS TO \\FCFBFEFF\\\u0017t'\u0014t'\u0014EQU VMARKS TO \\FDFD\\\u0017t'\u0014t'\u001aEQU DELETED.VALUE$ TO \\FC\\\u0017t'\u0014t'\u000eEQU TRUE$ TO 1\u0017t'\u0014t'\u000fEQU FALSE$ TO 0\u0017t'\u0014t'\u0014EQU READ.RECORD TO 1\u0017t'\u0014t'\u0015EQU WRITE.RECORD TO 3\u0017t'\u0014t'\u0016EQU DELETE.RECORD TO 4\u0017t'\u0014t'\u0012EQU SI.WRITE$ TO 0\u0017t'\u0014t'\u0013EQU SI.DELETE$ TO 1\u0017t'\u0014t'\u0016EQU SI.CLEARFILE$ TO 2\u0017t'\u0017t'\u0014t'-DECLARE SUBROUTINE MSG, BATCH.INDEXING, DELAY\u0017t'\u0014t'HDECLARE FUNCTION CALCULATE, CALCULATEX, RELATER, INDEX.OPEN, ESC.TO.EXIT\u0017t'\u0017t'\u0014t'@* @ANS contains SI.MFS file handle, parse into local variables. \u0017t'\u0014t'\u0017POS = 6 + @ANS[ 1, 5 ] \u0017t'\u0014t'\u0016TEMP = @ANS[ POS, 5 ] \u0017t'\u0014t'\tPOS += 5 \u0017t'\u0014t'6@DICT = @ANS[ POS, TEMP ] ;* used to be an index.open \u0017t'\u0014t'\u0015DICT.FILEVAR = @DICT \u0017t'\u0014t'\fPOS += TEMP \u0017t'\u0014t'\u0016TEMP = @ANS[ POS, 5 ] \u0017t'\u0014t'\tPOS += 5 \u0017t'\u0014t'\u001bIDX.FV = @ANS[ POS, TEMP ] \u0017t'\u0014t'\fPOS += TEMP \u0017t'\u0014t'\u0016TEMP = @ANS[ POS, 5 ] \u0017t'\u0014t'\tPOS += 5 \u0017t'\u0014t'\u001cFILEVAR = @ANS[ POS, TEMP ] \u0017t'\u0017t'\u0014t'\u0011FS = FILEVAR<1,1>\u0017t'\u0014t'\u0012NEXTFS = FS<1,1,1>\u0017t'\u0014t'\u001fFVAR = DELETE(FILEVAR, 1, 1, 0)\u0017t'\u0014t'\nSTATUS = 0\u0017t'\u0014t'\u0007FNAME =\u0014t'\u0002\"!\u0013t'ä\f\u0014t'\t\"[1,\"F*\"]\u0017t'\u0014t'\u0013IF BATCH.MODE% THEN\u0017t'\u0014t'\u0019 IDX.FV = INDEXES.FILEVAR\u0017t'\u0014t'\u0003END\u0017t'@\u000e?>?\u000e>\u001a\u0001Þ\nM\f\u0003\u0000\u0000\n¦\fG\u0001*\n¦\f\u0013ä\fä\f\u0013\u001c\f\u001c\f\u0013ä\f \u0000\u0013\u001c\f \u0000\rë\f\n¦\fG\u0001" + }, + "<1,5>": "\n¦\f\u0013ä\f \u0000\u001a\u0001", + "<1,6>": "\n¦\f:\u0002\u0000´Ã\b\b\u0000\u0002\u0000\u001a\u0001", + "<1,7>": "\n¦\f:\u0002\u0000´Ã\b\n\u0000\u0002\u0000\u001a\u0001", + "<1,8>": { + "<1,8,1>": "\n¦\f@\u000e?>?\u000e>\u0013H\rH\r\u0013¬\r¬\rG\u0001", + "<1,8,2>": "\nç\f\u0013H\r \u0000\r\u0002\r\nç\f\u001a\u0001", + "<1,8,3>": "\nç\f\u0013ª\nª\nG\u0001", + "<1,8,4>": "\u0003\u0000\u0000\nç\f\u0013ª\n \u0000\u001a\u0001", + "<1,8,5>": "\nç\f@\u000e?>?\u000e>\u0013€\f€\f\r\u0019\r\n" + } + }, + "<2>": { + "<2,1>": "\f\u0013€\fº\n@\u000e?>?\u000e>\u0013¬\r¬\r\r\u0019\r\n\u0015\r\u0013¬\rº\n@\u000e?>?\u000e>; \u0000\u0014 \u0000\u0001 \u0013 \u0000 \u0000\u0013º\nº\n\u0003&\u0000\rG\r\n;\r\u0004&\u0000\f/\r\u0003\u0000\u0000;´Ã@\u000e?>?\u000e>\t&\u0000\nV\r\r‡\r\nV\r@\u000e?>\r–\u000e\n`\r@\u000e?>\u001b\u0001 \no\r\u0004\u0000\u0000?\u000e@\u000e?>9\u0002\u0000 \u0000\u0016º\n\u0002\u0000\u0007¼\n\u0003\u0000\u0000@\u000e?>?\u000e>\u0003\u0000\u0000\n“\r@>\fš\r\u0004\u0000\u0000?\u000e@\u000e?>8B \u0000t\u000e\u001a\u00010\n²\r\u0014º\n\u0004ZERO@\u000e?>\f”\u000e\u001a\u00011\nÆ\r\u0014º\n\u0003ONE@\u000e?>\f”\u000e\u001a\u00012\nÚ\r\u0014º\n\u0003TWO@\u000e?>\f”\u000e\u001a\u00013\nð\r\u0014º\n\u0005THREE@\u000e?>\f”\u000e\u001a\u00014\n\u0005\u000e\u0014º\n\u0004FOUR@\u000e?>\f”\u000e\u001a\u00015\n\u001a\u000e\u0014º\n\u0004FIVE@\u000e?>\f”\u000e\u001a\u00016\n.\u000e\u0014º\n\u0003SIX@\u000e?>\f”\u000e\u001a\u00017\nD\u000e\u0014º\n\u0005SEVEN@\u000e?>\f”\u000e\u001a\u00018\nZ\u000e\u0014º\n\u0005EIGHT@\u000e?>\f”\u000e\u001a\u00019\no\u000e\u0014º\n\u0004NINE@\u000e?>\f”\u000e\n\u00000123456789¢\r·\rË\rß\rõ\r\n\u000e\u001f\u000e3\u000eI\u000e_\u000e?\u000e>\u0003\u0000\u0000\n¢\u000e@>\f©\u000e\u0004\u0000\u0000?\u000e@\u000e?>8B \u0000ó\u000f\u001a\u0001!\n¿\u000e\u0014º\n\u0002EX@\u000e?>\f%\u0010\u001a\u0001@\nÒ\u000e\u0014º\n\u0002AT@\u000e?>\f%\u0010\u001a\u0001#\næ\u000e\u0014º\n\u0003NBR@\u000e?>\f%\u0010\u001a\u0001$\n", + "<2,2>": { + "<2,2,1>": "\u000e\u0014º\n\u0006DOLLAR@\u000e?>\f%\u0010\u001a\u0001%\n\u0012\u000f\u0014º\n\u0004PCNT@\u000e?>\f%\u0010\u001a\u0001^\n%\u000f\u0014º\n\u0002UP@\u000e?>\f%\u0010\u001a\u0001&\n9\u000f\u0014º\n\u0003AMP@\u000e?>\f%\u0010\u001a\u0001-\nN\u000f\u0014º\n\u0004DASH@\u000e?>\f%\u0010\u001a\u0001+\nc\u000f\u0014º\n\u0004PLUS@\u000e?>\f%\u0010\u001a\u0001=\nv\u000f\u0014º\n\u0002EQ@\u000e?>\f%\u0010\u001a\u0001/\nŠ\u000f\u0014º\n\u0003DIV@\u000e?>\f%\u0010\u001a\u0001<\n\u000f\u0014º\n\u0002LT@\u000e?>\f%\u0010\u001a\u0001>\n°\u000f\u0014º\n\u0002GT@\u000e?>\f%\u0010\u001a\u0001:\nÆ\u000f\u0014º\n\u0005COLON@\u000e?>\f%\u0010\u001a\u0001;\nÛ\u000f\u0014º\n\u0004SEMI@\u000e?>\f%\u0010\u001a\u0001_\nî\u000f\u0014º\n\u0002UL@\u000e?>\f%\u0010\u0010\u0000!@#$%^&-+=/<>:;_±\u000eÄ\u000e×\u000eë\u000e\u0002\u000f\u0017\u000f*\u000f>\u000fS\u000fh\u000f{\u000f\u000f¢\u000fµ\u000fË\u000fà\u000f?\u000e>8B´ÃZ\u0011\u001a\u00010\nH\u0010\u001a\u0001", + "<2,2,2>": "\nH\u0010G\u0001", + "<2,2,3>": "\nH\u0010\u001a\u0001", + "<2,2,4>": "\nH\u0010@\u000e?>\fn\u0011\u001a\u00011\nj\u0010\u001a\u0001", + "<2,2,5>": "\nj\u0010G\u0001", + "<2,2,6>": "\u0003\u0000\u0000\nj\u0010\u001a\u0001", + "<2,2,7>": "\nj\u0010@\u000e?>\fn\u0011\u001a\u00012\n¼\u0010\u001a\u0001", + "<2,2,8>": "\n¼\u0010\u001a\u00014\n‡\u0010\u001a\u0001", + "<2,2,9>": "\n‡\u0010\u000b–\u0010\u001a\u00015\n–\u0010\u001a\u0001", + "<2,2,10>": "\n–\u0010\u000b·\u0010G\u0001", + "<2,2,11>": "\u0003\u0000\u0000\n·\u0010\u001a\u0001", + "<2,2,12>": "\n·\u0010G\u0001", + "<2,2,13>": "\u0003\u0000\u0000\n·\u0010\u001a\u0001", + "<2,2,14>": "\n·\u0010\n¼\u0010@\u000e?>\fn\u0011\u001a\u00013\n\u000b\u0011\u001a\u0001", + "<2,2,15>": "\n\u000b\u0011G\u0001", + "<2,2,16>": "\u0003\u0000\u0000\n\u000b\u0011\u001a\u0001", + "<2,2,17>": "\n\u000b\u0011G\u0001", + "<2,2,18>": "\u0003\u0000\u0000\n\u000b\u0011\u001a\u0001", + "<2,2,19>": "\n\u000b\u0011G\u0001", + "<2,2,20>": "\u0003\u0000\u0000\n\u000b\u0011\u001a\u0001", + "<2,2,21>": "\n\u000b\u0011G\u0001", + "<2,2,22>": "\u0003\u0000\u0000\n\u000b\u0011\u001a\u0001", + "<2,2,23>": "\n\u000b\u0011@\u000e?>\fn\u0011\u001a\u00015\n*\u0011\u001a\u0001", + "<2,2,24>": "\n*\u0011G\u0001", + "<2,2,25>": "\n*\u0011\u001a\u0001", + "<2,2,26>": "\n*\u0011@\u000e?>\fn\u0011\u001a\u00016\nU\u0011\u001a\u0001", + "<2,2,27>": "\nU\u0011G\u0001", + "<2,2,28>": "\nU\u0011\u001a\u0001", + "<2,2,29>": "\nU\u0011G\u0001", + "<2,2,30>": "\nU\u0011\u001a\u0001", + "<2,2,31>": "\nU\u0011@\u000e?>\fn\u0011\u0006\u0000012356.\u0010M\u0010o\u0010Á\u0010\u0010\u0011/\u0011?\u000e>G\u0001" + }, + "<2,3>": "\u0003\u0000\u0000\n‚\u0011\u001a\u0001", + "<2,4>": { + "<2,4,1>": "\n‚\u0011@\u000e?>?\u000e>\u0017t'\u0014t' * CHECK FOR CLEAR-FILE OPERATION\u0017t'\u0017t'\u0014t'\u001cIF @MV EQ SI.CLEARFILE$ THEN\u0017t'\rF\f\n†\u0012\u0014t'\u0011 UPDATE.LIST = ''\u0017t'\u0014t'\u0014 @ID = '%%ALL.IDS%%'\u0017t'\t\n\u0000\nm\u0012\rp\u0011\nm\u0012\rª\f\na\u0012\r'\u0010\na\u0012\u0014t'\u0011 UPDATE.LIST := \"\u0013t'H\r\u0014t'\u0015\":@FM:@ID:@FM:@FM:@FM\u0017t'\f\u001c\u0012\u0003\u0000\u0000\rF\f\nm\u0012\f\u0010\u0012\u0003\u0000\u0000\u0014t'\bEND ELSE\u0017t'\u0013´Ã´Ã@\u000e?>?\u000e>\rF\f\n\u0001\u0019\rp\u0011\n\u0001\u0019\rª\f\n¦\u0012\r'\u0010\n¦\u0012\f—\u0012\u0003\u0000\u0000\t\u001c\u0000\n+\u0015\rF\f\n(\u0015\rp\u0011\n(\u0015\rª\f\nÊ\u0012\r'\u0010\nÊ\u0012\f»\u0012\u0003\u0000\u0000\u0017t'\u0014t'C* Get affected files data and dict filevars for reading the record,\u0017t'\u0014t'\"* doing the calculate, and locking\u0017t'\u0017t'\u0014t'\u000fIF INDEX.OPEN('\u0013t'ä\f\u0014t'\u0002',\u0013t'€\f\u0014t'\u0006) ELSE\u0017t'\u0014t'\u0003 * \u0013t'€\f\u0014t'\u0005 = ''\u0017t'\u0014t'\u0014 MSG(\"B441\",\"\",\"\", \"\u0013t'ä\f\u0014t'\n\"[1,\"F*\"])\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0003END\u0017t'\u0014t'\u0010IF INDEX.OPEN('!\u0013t'ä\f\u0014t'\u0007',BANG.\u0013t'€\f\u0014t'\u0006) ELSE\u0017t'\u0014t'\b * BANG.\u0013t'€\f\u0014t'\u0005 = ''\u0017t'\u0014t'\u0015 MSG(\"B441\",\"\",\"\", \"!\u0013t'ä\f\u0014t'\n\"[1,\"F*\"])\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0003END\u0017t'\u0014t'\u0014IF INDEX.OPEN('DICT.\u0013t'ä\f\u0014t'\u0007',DICT.\u0013t'€\f\u0014t'\u0006) ELSE\u0017t'\u0014t'\b * DICT.\u0013t'€\f\u0014t'\u0005 = ''\u0017t'\u0014t'\u0019 MSG(\"B441\",\"\",\"\", \"DICT.\u0013t'ä\f\u0014t'\n\"[1,\"F*\"])\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0003END\u0017t'\f¯\u0012\u0003\u0000\u0000\u0003\u0000\u0000\n\u0001\u0019\u0013´Ã´Ã\rF\f\n\u0001\u0019\u0017t'\u0014t'8* Make sure the record is locked and lock it now if not.\u0017t'\u0014t'=* At lease the indexes will stay correct this way even if the\u0017t'\u0014t'+* caller does not lock records on a network\u0017t'\u0014t'\"* Skip locking if not on a network\u0017t'\u0014t'\u0014ITEM.LOCKED = FALSE$\u0017t'\u0014t'\u0015IF LEN(@STATION) THEN\u0017t'\u0014t'\u0011* IF INDEX.OPEN('\u0013t'ä\f\u0014t'\u0014',LOCK.FILEVAR) THEN\u0017t'\u0014t'\u0018* LOCK_FV = LOCK.FILEVAR\u0017t'\u0014t'\u000f* LOCK_ID = @ID\u0017t'\u0014t'\u0013* LOCK_MSG = 'B440'\u0017t'\u0014t'\u0012* PARA = @ID:@FM:\"\u0013t'\u001c\f\u0014t'\u0001\"\u0017t'\u0014t'\u0011* GOSUB LOCK_ITEM\u0017t'\u0014t'\u000f* IF ABORT THEN\u0017t'\u0014t'\u000f* RETURN FALSE$\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'%* IF LOCKED AND NOT(SELF_LOCKED) THEN\u0017t'\u0014t'\u0015* ITEM.LOCKED = TRUE$\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'\u0005* END\u0017t'\t\u001c\u0000\nê\u0018\u0013´Ã´Ã\u0003\u0006\u0000\rF\f\nç\u0018\rp\u0011\nç\u0018\rª\f\nÞ\u0018\t\u0006\u0000\nß\u0017\u001b\u00032", + "<2,4,2>": "5\u0005\u0000\u0000\nß\u0017\nß\u0017\u000bÒ\u0018\u0014t'\u000b LOCK_FV = \t\u0006\u0000\n\u0002\u0018\u0014t'\u0007FILEVAR\u000b\r\u0018\u0013t'€\f\u0003\u0000\u0000\nÏ\u0018\u0017t'\u0014t'\f LOCK_ID = \"\u0013t'H\r\u0014t'\u0007*INDEX\"\u0017t'\u0014t'\u0012 LOCK_MSG = 'B521'\u0017t'\u0014t'\t PARA = \"\u0013t'H\r\u0014t'\u0007*INDEX\"\u0014t'\u0006:@FM:\"\u0013t'\u001c\f\u0014t'\u0001\"\u0017t'\u0014t'\u0010 GOSUB LOCK_ITEM\u0017t'\u0014t'\u000e IF ABORT THEN\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0003\u0000\u0000\nÞ\u0018\r'\u0010\nÞ\u0018\fÅ\u0017\u0003\u0000\u0000\u0004\u0006\u0000\f¹\u0017\u0003\u0000\u0000\u0003\u0000\u0000\n\u0001\u0019\u0014t'\u0003END\u0017t'\u0013´Ã´Ã@\u000e?>?\u000e>\u0017t'\u0014t'+* Check for old record cached by read logic\u0017t'\u0017t'\u0014t'3OPTIMIZED = FALSE$ ;* remember if old record cached\u0017t'\u0014t'\u0010IF OLD.FLAG THEN\u0017t'\u0017t'\u0014t'6 * If something cached, then ID and FILEVAR must match\u0017t'\u0017t'\u0014t'\u0016 IF OLD.ID EQ @ID THEN\u0017t'\u0014t'\u001a IF OLD.FV EQ FILEVAR THEN\u0017t'\u0017t'\u0014t'D * If something cached, then the record had better have been locked.\u0017t'\u0014t'5 * If not we will force another read later. This will\u0017t'\u0014t'D * keep the indexes in line with the data file but some user may not\u0017t'\u0014t'F * find the data he expects if he is sharing the file without locking.\u0017t'\u0017t'\u0014t'\u0015* IF ITEM.LOCKED ELSE\u0017t'\u0014t'- OPTIMIZED = TRUE$ ;* did not have to lock it\u0017t'\u0014t'\u0016 IF OLD.FLAG EQ 2 THEN\u0017t'\u0014t') NO.OREC = TRUE$ ;* Record does not exist\u0017t'\u0014t'\n OREC = ''\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0019 TRANSFER OLD.REC TO OREC\u0017t'\u0014t'\u0011 NO.OREC = FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'0 OLD.FLAG = FALSE$ ;* Empty the cache on a match\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0003END\u0017t'@\u000e?>?\u000e>\u0017t'\u0014t'-* If old record wasn't cached then get it now\u0017t'\u0017t'\u0014t'\u0011IF OPTIMIZED ELSE\u0017t'\u0014t'< CALL @NEXTFS(READ.RECORD, FS, FVAR:'', @ID, '', OREC, FLAG)\u0017t'\u0014t'\r IF FLAG THEN\u0017t'\u0014t'\u0011 NO.OREC = FALSE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u001d IF @FILE.ERROR<1> # 100 THEN\u0017t'\u0014t')* IF @STATION NE '' AND ITEM.LOCKED THEN \u0017t'\u0014t'\u0018* ERR.SAVE = @FILE.ERROR\u0017t'\u0014t'$* UNLOCK LOCK.FILEVAR, @ID ELSE NULL\u0017t'\u0014t'\u0018* @FILE.ERROR = ERR.SAVE\u0017t'\u0014t'\u000f* FLAG = FALSE$\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'6 RETURN FLAG ;* Error other than record does not exist\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\n OREC = ''\u0017t'\u0014t'\u0010 NO.OREC = TRUE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0003END\u0017t'@\u000e?>?\u000e>\rF\f\né\u001e\u0013´Ã´Ã@\u000e?>?\u000e>\u0017t'\u0014t'+* Protection of index on deletes and writes\u0017t'\u0017t'\u0014t'-IF @MV EQ SI.DELETE$ OR @MV EQ SI.WRITE$ THEN\u0017t'\u0014t'\u0013 IF NO.PROTECT ELSE\u0017t'@\u000e?>?\u000e>\rª\f\nL \u001a\u00015\nL \u001a\u0001", + "<2,4,3>": "\nL G\u0001", + "<2,4,4>": "\nL \u001a\u0001", + "<2,4,5>": "\nL \u0017t'\u0014t'\u0011 * Protect field \u0013t' \u0000\u0017t'\u0017t'\u0014t'\t @RECORD<\u0013t' \u0000\u0014t'\t> = OREC<\u0013t' \u0000\u0014t'\u0001>\u0017t'\u0014t'\u0019 IF @MV = SI.DELETE$ THEN\u0017t'\u0014t'\f IF @RECORD<\u0013t' \u0000\u0014t'\u001b> # '' THEN @MV = SI.WRITE$\u0017t'\u0014t'\u0004 END\u0017t'@\u000e?>?\u000e>\u0014t'\u0004 END\u0017t'\u0014t'\u0003END\u0017t'@\u000e?>?\u000e>\t\n\u0000\n¯!\b\"\u0000 \u0000\t\u0006\u0000\nÊ \rz\"\nÊ \b\u001e\u0000¶Ã\rª\f\n³ \u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\r¿\"\n³ \r'\u0010\n³ \f‰ \u0003\u0000\u0000\u0014t'\bEND ELSE\u0017t'\b¶Ã\u001e\u0000\u0003\u0000\u0000\n¯!\b \u0000\"\u0000\rª\f\n”!\t\u0006\u0000\nö \u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0003\u0000\u0000\n”!\r³!\n”!\t\u0006\u0000\n‹!\t\u0010\u0000\u000bA!\u0014t'\u001c CONVERT MARKS TO VMARKS IN \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\n‹!\t¬\n\u000bˆ!\u0014t'' CONVERT @LOWER.CASE TO @UPPER.CASE IN \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\n‹!\u0003\u0000\u0000\n”!\fÕ \u0003\u0000\u0000\t\u0006\u0000\n§!\u0014t'\u0003END\u0017t'\u0003\u0000\u0000\n¯!@\u000e?>?\u000e>8B´Ãd\"\u001a\u00010\nÎ!\u001a\u0001", + "<2,4,6>": "\nÎ!\rÈ#\nÎ!@\u000e?>\fx\"\u001a\u00011\nç!\u001a\u0001", + "<2,4,7>": "\nç!\rD$\nç!@\u000e?>\fx\"\b\u0018\u0000¶Ã\u001a\u00012\n\u0005\"\u001a\u0001", + "<2,4,8>": "\n\u0005\"\rE&\n\u0005\"@\u000e?>\fx\"\u001a\u00013\n!\"\u001a\u0001", + "<2,4,9>": "\n!\"\r" + } + } + }, + "record4": { + "<1>": { + "<1,1>": { + "<1,1,1>": "%\n!\"\u0003\u0010\u0000@\u000e?>\fx\"\u001a\u00015\nC\"\u001a\u0001", + "<1,1,2>": "\nC\"G\u0001", + "<1,1,3>": "\u0003\u0000\u0000\nC\"\u001a\u0001", + "<1,1,4>": "\nC\"@\u000e?>\fx\"\u001a\u00016\n_\"\u001a\u0001", + "<1,1,5>": "\n_\"\rÒ$\n_\"\u0003\u0012\u0000@\u000e?>\fx\"\u0006\u0000012356º!Ó!ì!\n\"&\"H\"?\u000e>\t\u000e\u0000\n°\"\t\u0006\u0000\n§\"\u0014t'\u0019IF @MV EQ SI.DELETE$ THEN\u0017t'\u000b­\"\r[#\n°\"\u000b¶\"\r[#\n»\"@\u000e?>?\u000e>8B´ÃE#\r{#\nÎ\"@\u000e?>\fY#\r{#\nÛ\"@\u000e?>\fY#\r{#\nè\"@\u000e?>\fY#\u0014t'\u0001 \t\u000e\u0000\n\u0005#\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000b\u0018#\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\n)#\u0014t'\u0005 = ''\u0017t'@\u000e?>\fY#\u0003\u0000\u0000@\u000e?>\fY#\r{#\n@#@\u000e?>\fY#\u0006\u0000012356Æ\"Ó\"à\"í\".#8#?\u000e>\u0014t'\u000fIF NO.OREC THEN\u0017t'\u0003\u0000\u0000@\u000e?>?\u000e>\u0014t'\u0001 \t\u000e\u0000\n”#\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000b§#\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\nÄ#\u0014t'\u0011 = DELETED.VALUE$\u0017t'@\u000e?>?\u000e>G\u0001", + "<1,1,6>": "\n@$\u001a\u0001", + "<1,1,7>": "\n@$\u0014t'\u0001 \t\u000e\u0000\ní#\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000b\u0000$\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\n@$\u0014t'\u0003 = \t\u000e\u0000\n\u001b$\u0014t'\u0007@RECORD\u000b)$\u0014t'\u0004OREC\u0003\u0000\u0000\n@$\u0014t'\u0001<\u0013t' \u0000\u0014t'\u0001>\u0017t'@\u000e?>?\u000e>\u0014t'\u0001 \t\u000e\u0000\n]$\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000bp$\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\nÎ$\u0014t'\u0003 = #\n³$6\f\u0000\t\f\u0000\n£$\u0014t'\u000eFIELD(@ID,'*',\u0013t'p\b\u0014t'\u0001)\u000b°$\u0014t'\u0003@ID\u0003\u0000\u0000\n³$\u000bÀ$\u0014t'\u0003@ID\u0003\u0000\u0000\nÎ$\u0017t'\u001a\u0001", + "<1,1,8>": "\nÎ$@\u000e?>?\u000e>G\u0001", + "<1,1,9>": "\nó$\u001a\u0001", + "<1,1,10>": "\nó$\r÷$\nó$G\u0001", + "<1,1,11>": "\nó$\u001a\u0001", + "<1,1,12>": { + "<1,1,12,1>": "\nó$@\u000e?>?\u000e>\u0014t'\u001b IF DICT.FILEVAR NE '' THEN\u0017t'\u0014t'\u0001 \t\u000e\u0000\n2%\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000bE%\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\n", + "<1,1,12,2>": "%\u0014t'\u000f = CALCULATEX('\u0013t' \u0000\u0014t'\u0013',DICT.FILEVAR,@ID,\t\u000e\u0000\nˆ%\u0014t'\u0007@RECORD\u000b–%\u0014t'\u0004OREC\u0003\u0000\u0000\n", + "<1,1,12,3>": "%\u0014t'\u0004,'')\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0001 \t\u000e\u0000\nÌ%\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000bß%\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\n", + "<1,1,12,4>": "%\u0014t'\u0005 = ''\u0017t'\u0014t'\u0004 END\u0017t'@\u000e?>?\u000e>G\u0001" + }, + "<1,1,13>": "\nA&\u001a\u0001", + "<1,1,14>": "\nA&\r÷$\nA&G\u0001", + "<1,1,15>": "\u0003\u0000\u0000\nA&\u001a\u0001", + "<1,1,16>": "\nA&G\u0001", + "<1,1,17>": "\u0003\u0000\u0000\nA&\u001a\u0001", + "<1,1,18>": "\nA&G\u0001", + "<1,1,19>": "\u0003\u0000\u0000\nA&\u001a\u0001", + "<1,1,20>": "\nA&@\u000e?>?\u000e>\t\u0006\u0000\nÝ&G\u0001", + "<1,1,21>": "\nÝ&\u001a\u0001", + "<1,1,22>": "\nÝ&\t\u000e\u0000\nŒ&\u0014t'\u0005 NEW.\u0013t'ˆ\u000b\u0014t'\u000e = CALCULATE('\u0013t'H\r\u0014t'\u0002')\u0017t'\u000bÚ&\u0014t'\u0005 OLD.\u0013t'ˆ\u000b\u0014t'\u000f = CALCULATEX('\u0013t'H\r\u0014t'\u001b',DICT.FILEVAR,@ID,OREC,'')\u0017t'\u0003\u0000\u0000\nÝ&\u000b„0\u000f¼\u000b)\nø&\u0010¼\u000b\nø&\b¶Ã\u0018\u0000\r'\u0010\nø&\u000b*0\u000fÌ\u000b*\n'0\b\u0018\u0000¶Ã\u0013º\nº\nG\u0001", + "<1,1,23>": "\n'0\u001a\u0001", + "<1,1,24>": "\n'0\u0013º\n \u0000\u0014º\n\u0001*G\u0001", + "<1,1,25>": "\u0003\u0000\u0000\n'0\u001a\u0001", + "<1,1,26>": "\n'0\u0013º\n \u0000\u000fÔ\u000b*\n'0\rª\f\n½'\u000f¼\u000b)\nV'\u0010¼\u000b\nV'\r'\u0010\nV'\u000b·'\u001a\u00012\n´'\u001a\u0001", + "<1,1,27>": "\n´'\u0013º\nº\nG\u0001", + "<1,1,28>": "\n´'\u001a\u0001", + "<1,1,29>": "\n´'\u0013º\n \u0000\u0014º\n\u0001*G\u0001", + "<1,1,30>": "\u0003\u0000\u0000\n´'\u001a\u0001", + "<1,1,31>": "\n´'\u0013º\n \u0000\u000fÔ\u000b)\n®'\u0010Ô\u000b\n¨'\u000fÌ\u000b*\n¨'\u0003\u0000\u0000\n®'\u0003\u0000\u0000\n´'\u0003\u0000\u0000\n½'\f='\u0003\u0000\u0000\b¶Ã\u0018\u0000\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013˜\u000b˜\u000b\u0013˜\u000b–\n\u0007 \u0000\t\u000e\u0000\n\u0001(G\u0001", + "<1,1,32>": "\u0003\u0000\u0000\n\u0001(\u001a\u0001", + "<1,1,33>": "\n\u0001(G\u0001", + "<1,1,34>": "\u0003\u0000\u0000\n\u0001(\u001a\u0001", + "<1,1,35>": { + "<1,1,35,1>": { + "<1,1,35,1,1>": "\n\u0001(\u000b\u0007(\r0\n'0\u0017t'\u0014t'0 * LOOP THROUGH ALL IDS, WE HAVE TO COMPUTE THE \t\u000e\u0000\nN(\u0014t'\u0003NEW\u000b[(\u0014t'\u0003OLD\u0003\u0000\u0000\n'0\u0014t'\u0016 VALUE FOR ALL OF THEM\u0017t'\u0017t'\u0014t'\u0016 ID.LEN = LEN(ID.LIST.\u0013t'˜\u000b\u0014t'\u0001)\u0017t'\u0014t'\u000b ID.COL = 1\u0017t'0\u0014\u0000\u0000\u0000\b\"\u0000 \u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\n8)\u0010Ì\u000b\n/)\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\t\u000e\u0000\n\u0007)\u0014t'\u0005 COL.\u0013t'ˆ\u000b\u0014t'\u0004 = 1\u0017t'\u000b,)\u0014t'\n OLD.LIST.\u0013t'ˆ\u000b\u0014t'\u0005 = ''\u0017t'\u0003\u0000\u0000\n/)\u0003\u0000\u0000\n8)\fÁ(\u0003\u0000\u0000\t\u000e\u0000\nU)\u0014t'\r NEXT.ID = ''\u0017t'\u0003\u0000\u0000\n'0\u0014t'\u001c LOOP WHILE ID.COL LE ID.LEN\u0017t'\u0014t'\u0013 NEXT.ID = ID.LIST.\u0013t'˜\u000b\u0014t'\f[ID.COL,@VM]\u0017t'\u0014t'\u0012 ID.COL = COL2()+1\u0017t'\u0017t'\u0014t'L * A special ID, '%%ALL.IDS%%' implies that all IDS are affected or at least\u0017t'\u0014t'@ * enough to warrant simply building the index over from scratch\u0017t'\u0017t'\u0014t'\u001f UNTIL NEXT.ID EQ '%%ALL.IDS%%'\u0017t'\u0017t'\u0014t': * Read the data record, check the other file cached first\u0017t'\u0017t'\u0014t'\u0017 IF NEXT.ID NE KEY THEN\u0017t'\u0014t'\u000e KEY = NEXT.ID\u0017t'\u0014t'\u0010 READ OREC FROM \u0013t'€\f\u0014t'\r,NEXT.ID THEN\u0017t'\u0014t'\u0011 NO.OREC = FALSE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\b OREC=''\u0017t'\u0014t'\u0010 NO.OREC = TRUE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0017t'\u0014t'\u0010 IF NO.OREC THEN\u0017t'0\u0014\u0000\u0000\u0000\b \u0000\"\u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\n>,\u0010Ì\u000b\n5,\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0014t'\u0001 \t\u000e\u0000\n", + "<1,1,35,1,2>": "+\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000b\u001a,\u0014t'\tOLD.LIST.\u0013t'ˆ\u000b\u0014t'\u0004<-1>\u0003\u0000\u0000\n5,\u0014t'\u0011 = DELETED.VALUE$\u0017t'\u0003\u0000\u0000\n>,\f»+\u0003\u0000\u0000\u0014t'\t END ELSE\u0017t'0\u0014\u0000\u0000\u0000\b \u0000\"\u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\nÓ-\u0010Ì\u000b\nÊ-\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0014t'\u0001 \t\u000e\u0000\n•,\u0014t'\u0004NEW.\u000b£,\u0014t'\u0004OLD.\u0003\u0000\u0000\nÊ-\u0013t'ˆ\u000b\u0014t'\u000f = CALCULATEX('\u0013t'H\r\u0014t'\u0007',DICT.\u0013t'€\f\u0014t'\u0011,NEXT.ID,OREC,'')\u0017t'\u0014t'\u001c CONVERT MARKS TO VMARKS IN \t\u000e\u0000\n\u0019-\u0014t'\u0004NEW.\u000b'-\u0014t'\u0004OLD.\u0003\u0000\u0000\nÊ-\u0013t'ˆ\u000b\u0017t'\t¬\n\u000b-\u0014t'' CONVERT @LOWER.CASE TO @UPPER.CASE IN \t\u000e\u0000\nq-\u0014t'\u0004NEW.\u000b-\u0014t'\u0004OLD.\u0003\u0000\u0000\nŠ-\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\nÊ-\t\u000e\u0000\u000bÇ-\u0014t'\n OLD.LIST.\u0013t'ˆ\u000b\u0014t'\u0007<-1> = \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\nÊ-\u0003\u0000\u0000\nÓ-\f[,\u0003\u0000\u0000\u0014t'\u0004 END\u0017t'0\u0014\u0000\u0000\u0000\b \u0000\"\u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\nG/\u0010Ì\u000b\n>/\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\t\u000e\u0000\n8/\u0014t'\u0001 \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\u0003 = \u0014t'\tOLD.LIST.\u0013t'ˆ\u000b\u0014t'\u0005[COL.\u0013t'ˆ\u000b\u0014t'\u0005,@FM]\u0017t'\u0014t'\u0005 COL.\u0013t'ˆ\u000b\u0014t'\u000b = COL2()+1\u0017t'\u0014t'\u0004 IF \u0014t'\u0004NEW.\u0013t'ˆ\u000b\u0014t'\u0004 NE \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\u0005 THEN\u0017t'\u0014t'\u0001 \u0013t'€\f\u0014t'\t.UPD := '\u0013t'H\r\u0014t'\u0012':@FM:NEXT.ID:@FM:\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\u0005:@FM:\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u0014t'\u0004:@FM\u0017t'\u0014t'\u0001 \u0013t'€\f\u0014t'\t.CNT += 1\u0017t'\u0014t'\u0004 END\u0017t'\u0003\u0000\u0000\n>/\u0003\u0000\u0000\nG/\fë-\u0003\u0000\u0000\u0014t'\u0007 REPEAT\u0017t'\t\u000e\u0000\n$0\u0014t'! IF NEXT.ID EQ '%%ALL.IDS%%' THEN\u0017t'0\u0014\u0000\u0000\u0000\b \u0000\"\u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\n\u00160\u0010Ì\u000b\n\r0\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0014t'\u0001 \u0013t'€\f\u0014t'\t.UPD := '\u0013t'H\r\u0014t'\u0019':@FM:NEXT.ID:@FM:@FM:@FM\u0017t'\u0014t'\u0001 \u0013t'€\f\u0014t'\t.CNT += 1\u0017t'\u0003\u0000\u0000\n\u00160\f/\u0003\u0000\u0000\u0014t'\u0004 END\u0017t'\n'0\u0003\u0000\u0000\n00\u0014\u0000\u0000\u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\nT0\u0010Ì\u000b\nK0\u000f¼\u000b*\nK0\u0003\u0000\u0000\nT0\f20\u0003\u0000\u00000\u0014\u0000\u0000\u0000\u000fÔ\u000bA\u0014\u0000\t\u0014\u0000\n~0\u0010Ô\u000b\nu0\u000fÜ\u000b*\nu0\u0003\u0000\u0000\n~0\f\\0\u0003\u0000\u0000\u0003\u0000\u0000\n‰0@\u000e?>?\u000e>\u0003\u0000\u0000\u0014t'. * Get list of ID's affected in the other file\u0017t'\u0017t'\nÑ0@>\fØ0\u0004\u0000\u0000?\u000e@\u000e?>8B´Ã71\u001a\u00010\n\u00001\u001a\u0001" + } + }, + "<1,1,36>": "\n\u00001G\u0001", + "<1,1,37>": "\n\u00001\u001a\u0001", + "<1,1,38>": "\n\u00001\rD1\n\u00001@\u000e?>\fB1\u001a\u00011\n\u00191\u001a\u0001", + "<1,1,39>": "\n\u00191\rÞ3\n\u00191@\u000e?>\fB1\u001a\u00012\n21\u001a\u0001", + "<1,1,40>": "\n21\rP4\n21@\u000e?>\fB1\u0003\u0000012à0\u00051\u001e1?\u000e>\u0014t'\t ID.LIST.\u0013t'˜\u000b\u0014t'\b = OREC<\u0013t' \u0000\u0014t'\u0001>\u0017t'\u0014t'\u001a IF @MV NE SI.DELETE$ THEN\u0017t'\u0014t'\u0017 NEW.ID.LIST = @RECORD<\u0013t' \u0000\u0014t'\u0001>\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0011 NEW.ID.LIST = ''\u0017t'\u0014t'\u0004 END\u0017t'\rø1\nô1@\u000e?>?\u000e>\u0017t'\u0014t'8 * Watch out for ID.LIST changing from OLD to NEW record\u0017t'\u0017t'\u0014t'\f IF ID.LIST.\u0013t'˜\u000b\u0014t'\u0014 NE NEW.ID.LIST THEN\u0017t'\u0017t'\u0014t'2 * The list has been changed, now avoid duplicates\u0017t'\u0017t'\u0014t'\u001a ID.LEN = LEN(NEW.ID.LIST)\u0017t'\u0014t'\u000b ID.COL = 1\u0017t'\u0014t'\u001c LOOP WHILE ID.COL LE ID.LEN\u0017t'\u0014t'\" NEXT.ID = NEW.ID.LIST[ID.COL,@VM]\u0017t'\u0014t'\u0012 ID.COL = COL2()+1\u0017t'\u0014t'\u001b LOCATE NEXT.ID IN ID.LIST.\u0013t'˜\u000b\u0014t'\u001b USING @VM SETTING NUM ELSE\u0017t'\u0014t'\t ID.LIST.\u0013t'˜\u000b\u0014t'\u0010<1,-1> = NEXT.ID\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0007 REPEAT\u0017t'\u0014t'\u0004 END\u0017t'@\u000e?>?\u000e>\u0014t'\t ID.LIST.\u0013t'˜\u000b\u0014t'\u0003 = #\n146\f\u0000\t\f\u0000\n!4\u0014t'\u000eFIELD(@ID,'*',\u0013t'p\b\u0014t'\u0001)\u000b.4\u0014t'\u0003@ID\u0003\u0000\u0000\n14\u000b>4\u0014t'\u0003@ID\u0003\u0000\u0000\nL4\u0017t'\u001a\u0001", + "<1,1,41>": "\nL4@\u000e?>?\u000e>G\u0001", + "<1,1,42>": "\n©5\u001a\u0001", + "<1,1,43>": "\n©5\u0014t'\u001b IF DICT.FILEVAR NE '' THEN\u0017t'\u0014t'\t ID.LIST.\u0013t'˜\u000b\u0014t'\u000f = CALCULATEX('\u0013t' \u0000\u0014t'\u001b',DICT.FILEVAR,@ID,OREC,'')\u0017t'\u0014t'\u001a IF @MV NE SI.DELETE$ THEN\u0017t'\u0014t'\u001b NEW.ID.LIST = CALCULATEX('\u0013t' \u0000\u0014t'\u001e',DICT.FILEVAR,@ID,@RECORD,'')\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0011 NEW.ID.LIST = ''\u0017t'\u0014t'\u0004 END\u0017t'\rø1\n©5\u0014t'\t END ELSE\u0017t'\u0014t'\t ID.LIST.\u0013t'˜\u000b\u0014t'\u0005 = ''\u0017t'\u0014t'\u0004 END\u0017t'@\u000e?>?\u000e>\u0014t'\u0003END\u0017t'0\u0014\u0000\u0000\u0000\u000f¼\u000bA\u0014\u0000\t\u0014\u0000\nß5\u0010¼\u000b\nÖ5\u000fÄ\u000b*\nÖ5\u0003\u0000\u0000\nß5\f½5\u0003\u0000\u0000@\u000e?>?\u000e>\u0017t'\u0014t'0* Time to actually do the record write or delete\u0017t'\u0017t'\u0014t'%INDEXES = TRUE$ ;* Set SC.XLATE.RESET\u0017t'\u0014t'\u0019IF @MV EQ SI.DELETE$ THEN\u0017t'\u0014t'4 CALL @NEXTFS(DELETE.RECORD,FS,FVAR,@ID,'','', FLAG)\u0017t'\u0014t'\bEND ELSE\u0017t'\u0014t'8 CALL @NEXTFS(WRITE.RECORD,FS,FVAR,@ID,'',@RECORD, FLAG)\u0017t'\u0014t'\u0003END\u0017t'\u0014t'\rIF FLAG ELSE \u0017t'\u0014t')* IF @STATION NE '' AND ITEM.LOCKED THEN \u0017t'\u0014t'\u0018* ERR.SAVE = @FILE.ERROR\u0017t'\u0014t'$* UNLOCK LOCK.FILEVAR, @ID ELSE NULL\u0017t'\u0014t'\u0018* @FILE.ERROR = ERR.SAVE\u0017t'\u0014t'\u000f* FLAG = FALSE$\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'\f RETURN FLAG\u0017t'\u0014t'\u0003END\u0017t'@\u000e?>?\u000e>\u0017t'\u0014t'2* Loop through all files, compute new field values\u0017t'\u0017t'\u0013´Ã´Ã\rF\f\n†8\rp\u0011\n†8\rª\f\nW8\r'\u0010\nW8\fH8\u0003\u0000\u0000\u0013t'€\f\u0014t'\t.UPD = ''\u0017t'\u0013t'€\f\u0014t'\b.CNT = 0\u0017t'\f<8\u0003\u0000\u0000\u0013´Ã´Ã@\u000e?>?\u000e>\u0014t'\u0004IF (\u0013t'€\f\u0014t'\u0012 NE '') AND (DICT.\u0013t'€\f\u0014t'\f NE '') THEN\u0017t'\u0017t'\u0014t'$ * clear the other file record cache\u0017t'\u0017t'\u0014t'\t KEY = ''\u0017t'\u0003\u0000\u0000@\u000e?>?\u000e>\t\n\u0000\nÔ<\b\"\u0000 \u0000\t\u0006\u0000\nx9\rz\"\nx9\b\u001e\u0000¶Ã\rª\f\na9\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\r¿\"\na9\r'\u0010\na9\f79\u0003\u0000\u0000\u0014t'\bEND ELSE\u0017t'\b¶Ã\u001e\u0000\u0003\u0000\u0000\nÔ<\b \u0000\"\u0000\rª\f\nD:\u0004\u0010\u0000\u0004\u0012\u0000\t\u0006\u0000\nª9\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0003\u0000\u0000\nD:\r³!\nD:\t\u0006\u0000\n;:\t\u0010\u0000\u000bõ9\u0014t'\u001c CONVERT MARKS TO VMARKS IN \u0014t'\u0004NEW.\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\n;:\t¬\n\u000b8:\u0014t'+ CONVERT @LOWER.CASE TO @UPPER.CASE IN NEW.\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\n;:\u0003\u0000\u0000\nD:\fƒ9\u0003\u0000\u0000\t\u0006\u0000\nÌ<\u0014t'\u0003END\u0017t'\b¶Ã\u001e\u0000\b \u0000\"\u0000\rª\f\nÉ<\u0004\u0010\u0000\u0004\u0012\u0000\u001b\u00013\nv:\u0003\u0010\u0000\u0003\u0000\u0000\nÉ<\u001b\u00016\n…:\u0003\u0012\u0000\u0003\u0000\u0000\nÉ<\r'\u0010\nÉ<\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0014t'\u0007IF NEW.\u0013t'ˆ\u000b\u0014t'\u0004 NE \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\u0005 THEN\u0017t'\t\u0012\u0000\nø;\u0014t'+ IF (DICT.FILEVAR EQ '') OR (@MV EQ 1) THEN\u0017t'\u0014t'\u0005 NEW.\u0013t'ˆ\u000b\u0014t'\u0005 = ''\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0005 NEW.\u0013t'ˆ\u000b\u0014t'\u000f = CALCULATEX('\u0013t' \u0000\u0014t'\u001e',DICT.FILEVAR,@ID,@RECORD,'')\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\b IF NEW.\u0013t'ˆ\u000b\u0014t'\u000b NE '' THEN\u0017t'\u0014t'\u0001 \u0013t'€\f\u0014t'\t.UPD := '\u0013t'H\r\u0014t'\u0016':@FM:@ID:@FM:@FM:NEW.\u0013t'ˆ\u000b\u0014t'\u0004:@FM\u0017t'\u0003\u0000\u0000\nÉ<\t\u0010\u0000\n\n<\rØ<\n\n<\u0003\u0000\u0000\nÉ<\t\u0012\u0000\u000bq<\u0014t'\u0001 \u0013t'€\f\u0014t'\t.UPD := '\u0013t'H\r\u0014t'\u000e':@FM:@ID:@FM:\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\t:@FM:NEW.\u0013t'ˆ\u000b\u0014t'\u0004:@FM\u0017t'\u0003\u0000\u0000\nÉ<\u0014t'\u0001 \u0013t'€\f\u0014t'\t.CNT += 1\u0017t'\t\u0010\u0000\nŸ<\u0014t'\u0004 END\u0017t'\u0003\u0000\u0000\nÉ<\t\u0012\u0000\n¶<\u0014t'\u0004 END\u0017t'\u0003\u0000\u0000\nÉ<\u0014t'\u0003END\u0017t'\fa:\u0003\u0000\u0000\u0003\u0000\u0000\nÔ<@\u000e?>?\u000e>\u0017t'\u0014t'( * Optimize relational index transaction\u0017t'\u0017t'\u0014t'\u000e TRANSFER NEW.\u0013t'ˆ\u000b\u0014t'\b TO NEWX\u0017t'\u0014t'\u000e TRANSFER OLD.\u0013t'ˆ\u000b\u0014t'\b TO OLDX\u0017t'\u0014t'\u001a GOSUB OPTIMIZE_RELATIONAL\u0017t'\u0014t'\u0016 TRANSFER NEWX TO NEW.\u0013t'ˆ\u000b\u0017t'\u0014t'\u0016 TRANSFER OLDX TO OLD.\u0013t'ˆ\u000b\u0017t'\u0014t'\b IF NEW.\u0013t'ˆ\u000b\u0014t'\b NE OLD.\u0013t'ˆ\u000b\u0014t'\u0005 THEN\u0017t'\u0003\u0000\u0000@\u000e?>?\u000e>\u0013´Ã´Ã\rF\f\nëA\rp\u0011\nëA\rª\f\n\u0017>\r'\u0010\n\u0017>\f\b>\u0003\u0000\u0000\u0014t'\u0010UPDATE.LIST = ''\u0017t'\u0014t'\u0003IF \u0013t'€\f\u0014t'\u000f.UPD NE '' THEN\u0017t'\u0014t'\u0010 UPDATE.LIST := \u0013t'€\f\u0014t'\u0004.UPD\u0017t'\u0014t'\u0003END\u0017t'\t\u001c\u0000\nÞA\rF\f\nÛA\rp\u0011\nÛA\rª\f\n¢>\r'\u0010\n¢>\f“>\u0003\u0000\u0000\u0014t'\u0003IF \u0013t'€\f\u0014t'\u000f.UPD NE '' THEN\u0017t'\u0014t'\u0016 IF LEN(@STATION) THEN\u0017t'\u0014t'\u0010 LOCK_FV = BANG.\u0013t'€\f\u0017t'\u0014t'\u000e LOCK_ID = \"0\"\u0017t'\u0014t'\u0012 LOCK_MSG = 'B521'\u0017t'\u0014t'\t PARA = 0\u0014t'\u0007:@FM:\"!\u0013t'\u001c\f\u0014t'\u0001\"\u0017t'\u0014t'\u0010 GOSUB LOCK_ITEM\u0017t'\u0014t'\u000f IF ABORT THEN \u0017t'\u0014t'K* IF @STATION NE '' AND ITEM.LOCKED THEN UNLOCK LOCK.FILEVAR, @ID ELSE NULL\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0018 READ F.TRANS FROM BANG.\u0013t'€\f\u0014t'\u0018, \"0\" ELSE F.TRANS = @FM\u0017t'\u0014t'\f F.TRANS := \u0013t'€\f\u0014t'\u0004.UPD\u0017t'\u0014t'( IF LEN(F.TRANS) GT MAX.UPDATE.SIZE THEN\u0017t'\u0014t'\u0016 NUM = F.TRANS[1, @FM]\u0017t'\u0014t'\u0017 F.TRANS[1,COL2()] = \"\"\u0017t'\u0014t'\t NUM += 1\u0017t'\u0014t'\u0001*\u0017t'\u0014t'# WRITE NUM + 1:@FM:F.TRANS TO BANG.\u0013t'€\f\u0014t'\u0018, NUM ELSE RETURN FALSE$\u0017t'\u0014t'\u0012 F.TRANS = NUM:@FM\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0017 WRITE F.TRANS TO BANG.\u0013t'€\f\u0014t'\u0018, \"0\" ELSE RETURN FALSE$\u0017t'\u0014t'# IF LEN(@STATION) THEN UNLOCK BANG.\u0013t'€\f\u0014t'\u000e,\"0\" ELSE NULL\u0017t'\u0014t'\u0003END\u0017t'\f‡>\u0003\u0000\u0000\u0003\u0000\u0000\nëA\u0013´Ã´Ã@\u000e?>?\u000e>\u0014t'\u0017* End of clearfile else\u0017t'\u0014t'\u0003END\u0017t'\u0014t'F* If updates to perform, check for trans rec and write out transaction\u0017t'\u0014t'O* If record is too big, write to the end of the linked list and clear record 0.\u0017t'\u0014t'>* Need to update record 0 no matter if split is needed or not.\u0017t'\u0014t'\u0013IF UPDATE.LIST THEN\u0017t'\u0014t'- IF BATCH.MODE% AND (UPDATE.ITEM% NE \"\") ELSE\u0017t'\u0014t'\u0016 IF LEN(@STATION) THEN\u0017t'\u0014t'\u0011 LOCK_FV = IDX.FV\u0017t'\u0014t'\u000e LOCK_ID = \"0\"\u0017t'\u0014t'\u0012 LOCK_MSG = 'B521'\u0017t'\u0014t'\t PARA = 0\u0014t'\n:@FM:FNAME\u0017t'\u0014t'\u0010 GOSUB LOCK_ITEM\u0017t'\u0014t'\u000e IF ABORT THEN\u0017t'\u0014t'K* IF @STATION NE '' AND ITEM.LOCKED THEN UNLOCK LOCK.FILEVAR, @ID ELSE NULL\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0001*\u0017t'\u0014t'* READ TRANS.REC FROM IDX.FV, \"XTRANS\" THEN\u0017t'\u0014t'\f GOSUB PATCH\u0017t'\u0014t'\u001b IF FLAG ELSE RETURN FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0001*\u0017t'\u0014t'( READ UPDATE.ITEM% FROM IDX.FV, \"0\" ELSE\u0017t'\u0014t'\u0013 UPDATE.ITEM% = @FM\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0001*\u0017t'\u0014t'\u0014 IF BATCH.MODE% THEN\u0017t'\u0014t'\u001a BATCH.MODE%<2> = TIME()+5\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u001c UPDATE.ITEM% := UPDATE.LIST\u0017t'\u0014t'A * Record over 1k bytes, will split and write to the end of list.\u0017t'\u0014t'- IF LEN(UPDATE.ITEM%) GT MAX.UPDATE.SIZE THEN\u0017t'\u0014t'\u000f RELINK = TRUE$\u0017t'\u0014t'\u001b NUM = UPDATE.ITEM%[1, @FM]\u0017t'\u0014t'\u001c UPDATE.ITEM%[1,COL2()] = \"\"\u0017t'\u0014t'\t NUM += 1\u0017t'\u0014t'\u0001*\u0017t'\u0014t'5 TRANS.REC = \"W\":@FM:NUM:@FM:NUM + 1:@FM:UPDATE.ITEM%\u0017t'\u0014t'2 CONVERT @FM:@VM:@SVM TO @VM:@SVM:@TM IN TRANS.REC\u0017t'\u0014t'' TRANS.REC := @FM:\"W\":@VM:0:@VM:NUM:@VM\u0017t'\u0014t'7 WRITE TRANS.REC TO IDX.FV, \"XTRANS\" ELSE RETURN FALSE$\u0017t'\u0014t'\u0001*\u0017t'\u0014t'A WRITE NUM + 1:@FM:UPDATE.ITEM% TO IDX.FV, NUM ELSE RETURN FALSE$\u0017t'\u0014t'\u0017 UPDATE.ITEM% = NUM:@FM\u0017t'\u0014t'\u0016 WRITE.UPDATES = TRUE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0010 RELINK = FALSE$\u0017t'\u0014t'\u0014 IF BATCH.MODE% THEN\u0017t'\u0014t'+ WRITE.UPDATES = (TIME() GT BATCH.MODE%<2>)\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0016 WRITE.UPDATES = TRUE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0016 IF WRITE.UPDATES THEN\u0017t'\u0014t'5 WRITE UPDATE.ITEM% TO IDX.FV, \"0\" ELSE RETURN FALSE$\u0017t'\u0014t'\u000f IF RELINK THEN\u0017t'\u0014t'+ DELETE IDX.FV, \"XTRANS\" ELSE RETURN FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0016 IF LEN(@STATION) THEN\u0017t'\u0014t'\u001c UNLOCK IDX.FV,\"0\" ELSE NULL\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0012 UPDATE.ITEM% = \"\"\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0003END\u0017t'\u0014t'$* Skip final processing if clearfile\u0017t'\u0014t'\u001cIF @MV EQ SI.CLEARFILE$ ELSE\u0017t'@\u000e?>?\u000e>\u0017t'\u0014t'I * Unlock all the indexes that were \"logically\" locked before getting the\u0017t'\u0014t'\r * OLD VALUES\u0017t'\u0017t'\u0014t'\u0017 IF @STATION NE '' THEN\u0017t'\rF\f\nÅK\rp\u0011\nÅK\rª\f\n9K\u001b\u00032", + "<1,1,44>": "5\n*K\u0014t'\u0011 UNLOCK FILEVAR,'\u0013t'H\r\u0014t'\u0011*INDEX' ELSE NULL\u0017t'\u0003\u0000\u0000\n9K\r'\u0010\n9K\fêJ\u0003\u0000\u0000\rF\f\n»K\rp\u0011\n»K\u0014t'\u0004 IF \u0013t'€\f\u0014t'\u000b NE '' THEN\u0017t'\rª\f\nªK\r'\u0010\nªK\u0014t'\b UNLOCK \u0013t'€\f\u0014t'\u0002,'\u0013t'H\r\u0014t'\u0011*INDEX' ELSE NULL\u0017t'\fgK\u0003\u0000\u0000\u0014t'\u0004 END\u0017t'\f?\u000e>\u0014t'\u0015* IF ITEM.LOCKED THEN\u0017t'\u0014t'#* UNLOCK LOCK.FILEVAR,@ID ELSE NULL\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'\u0004 END\u0017t'@\u000e?>?\u000e>\u0003\u0006\u0000\rF\f\n=N\rp\u0011\n=N0 \u0000\u0000\u0000\rª\f\n3N\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u001b\u00013\n'N\u001a\u00013\n'N\u001a\u0001", + "<1,1,45>": "\n'N\t\u0006\u0000\nÏL\u0004\u0006\u0000\u0017t'\u0014t'M * Handle relation types specially: Try doing the relation update immediately\u0017t'\u0003\u0000\u0000\n'N\u0014t'\u0004 IF \u0014t'\u0004NEW.\u0013t'ˆ\u000b\u0014t'\u0004 NE \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\u0005 THEN\u0017t'G\u0001", + "<1,1,46>": "\n'N\u001a\u0001", + "<1,1,47>": "\n'NG\u0001", + "<1,1,48>": "\n'N\u001a\u0001", + "<1,1,49>": "\n'N\u0014t'\u0010 IF INDEX.OPEN('\u0013t' \u0000\u0014t'\u0016',D.FV) ELSE D.FV = ''\u0017t'G\u0001", + "<1,1,50>": "\n'N\u001a\u0001", + "<1,1,51>": "\n'N\u0013º\nº\n\u0013º\n \u0000G\u0001", + "<1,1,52>": "\n'N\u001a\u0001", + "<1,1,53>": "\n'N\u0014t'\u0013 IF D.FV NE '' THEN\u0017t'\u0014t'\u0019 IF RELATER( @ID:@FM:OLD.\u0013t'ˆ\u000b\u0014t'\t:@FM:NEW.\u0013t'ˆ\u000b\u0014t'\b, D.FV, \u0013t'º\n\u0014t'\u0003, '\u0013t' \u0000\u0014t'\f', IDX.FV, '\u0013t'H\r\u0014t'\u000f', 1) THEN NULL\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u000b-N\r'\u0010\n3N\fBL\u0003\u0000\u0000\u0013´Ã´Ã@\u000e?>?\u000e>\u0014t'\u0003END\u0017t'\u0014t'\fRETURN TRUE$\u0017t'@\u000e?>?\u000e>\u0017t'\u0014t'\u0012*-----------------\u0017t'\u0014t'\nLOCK_ITEM:\u0017t'\u0014t'\u0010 LOCKED = FALSE$\u0017t'\u0014t'\u0015 SELF_LOCKED = FALSE$\u0017t'\u0014t'\u000f ABORT = FALSE$\u0017t'\u0014t'\f LOCKCNT = 1\u0017t'\u0014t'\u0010 LOCK_IMAGE = \"\"\u0017t'\u0014t'\u0005 LOOP\u0017t'\u0014t'\u0016 IF LOCKCNT = 200 THEN\u0017t'\u0014t'& MSG(LOCK_MSG, 'UB', LOCK_IMAGE, PARA)\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u001b LOCK LOCK_FV, LOCK_ID THEN\u0017t'\u0014t'\u000f LOCKED = TRUE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0016 IF STATUS() EQ 1 THEN\u0017t'\u0014t'8 LOCKED = TRUE$ ;* OKAY if already locked by our station\u0017t'\u0014t'\u0014 SELF_LOCKED = TRUE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'7 DELAY(0.5) ;* Delay 1/2 sec to reduce network traffic \u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\r UNTIL LOCKED\u0017t'\u0014t'\u0015 BATCH.INDEXING(0,'')\u0017t'\u0014t'\r LOCKCNT += 1\u0017t'\u0014t'\u0016 IF ESC.TO.EXIT() THEN\u0017t'\u0014t'\t RESP = 1\u0017t'\u0014t'\u0019 MSG('B296','', RESP, '')\u0017t'\u0014t'\r IF RESP THEN\u0017t'\u0014t'\u000e ABORT = TRUE$\u0017t'\u0014t'( @FILE.ERROR = 421 ;* FS_SYS_USER_ABORT$\u0017t'\u0014t'\u001c STATUS() = 1 ;* FSPHYSICAL$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\f UNTIL ABORT\u0017t'\u0014t'\u0007 REPEAT\u0017t'\u0014t'\u0018 IF LEN(LOCK_IMAGE) THEN\u0017t'\u0014t'\u001b MSG('','DB',LOCK_IMAGE,'')\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0007 RETURN\u0017t'@\u000e?>?\u000e>\u0017t'\u0014t'\u0012*-----------------\u0017t'\u0014t'\u0006PATCH:\u0017t'\u0014t'\b PIX = 1\u0017t'\u0014t'\r FLAG = TRUE$\u0017t'\u0014t'\u0005 LOOP\u0017t'\u0014t'\u001a WHILE LEN(TRANS.REC)\u0017t'\u0014t'\u0016 PREC = TRANS.REC\u0017t'\u0014t'- CONVERT @VM:@SVM:@TM TO @FM:@VM:@SVM IN PREC\u0017t'\u0014t'\u0015 PTYPE = PREC[1, @FM]\u0017t'\u0014t'\u0015 PREC[1, COL2()] = \"\"\u0017t'\u0014t'\u0014 PKEY = PREC[1, @FM]\u0017t'\u0014t'\u0015 PREC[1, COL2()] = \"\"\u0017t'\u0014t'\u0014 IF PTYPE = \"W\" THEN\u0017t'\u0014t'. WRITE PREC TO IDX.FV, PKEY ELSE FLAG = FALSE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'' DELETE IDX.FV, PKEY ELSE FLAG = FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\t PIX += 1\u0017t'\u0014t'\u000b WHILE FLAG\u0017t'\u0014t'\u0007 REPEAT\u0017t'\u0014t'\r IF FLAG THEN\u0017t'\u0014t'\" DELETE IDX.FV, \"XTRANS\" ELSE NULL\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0007 RETURN\u0017t'\u0017t'@\u000e?>?\u000e>\u0014t'\u0011*----------------\u0017t'\u0014t'\u0014OPTIMIZE_RELATIONAL:\u0017t'\u0014t'\u0013 ID.LEN = LEN(OLDX)\u0017t'\u0014t'\u000b ID.COL = 1\u0017t'\u0014t'\u0011 OLD.ID.LIST = \"\"\u0017t'\u0014t'\u001c LOOP WHILE ID.COL LE ID.LEN\u0017t'\u0014t'\u001c NEXT.ID = OLDX[ID.COL, @VM]\u0017t'\u0014t'\u0014 ID.COL = COL2() + 1\u0017t'\u0014t'2 LOCATE NEXT.ID IN NEWX USING @VM SETTING NUM ELSE\u0017t'\u0014t'\u001c OLD.ID.LIST<1,-1> = NEXT.ID\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0007 REPEAT\u0017t'\u0014t'\u0001*\u0017t'\u0014t'\u0013 ID.LEN = LEN(NEWX)\u0017t'\u0014t'\u000b ID.COL = 1\u0017t'\u0014t'\u0011 NEW.ID.LIST = \"\"\u0017t'\u0014t'\u001c LOOP WHILE ID.COL LE ID.LEN\u0017t'\u0014t'\u001c NEXT.ID = NEWX[ID.COL, @VM]\u0017t'\u0014t'\u0014 ID.COL = COL2() + 1\u0017t'\u0014t'2 LOCATE NEXT.ID IN OLDX USING @VM SETTING NUM ELSE\u0017t'\u0014t'\u001c NEW.ID.LIST<1,-1> = NEXT.ID\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0007 REPEAT\u0017t'\u0014t'\u0001*\u0017t'\u0014t'\u001d TRANSFER NEW.ID.LIST TO NEWX\u0017t'\u0014t'\u001d TRANSFER OLD.ID.LIST TO OLDX\u0017t'\u0014t'\u0007 RETURN\u0017t'@\u000e?>?\u000e>!¨\u000b\u0003\u0000\u0000@\u000e?>?\u000e" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSOBJ%003ASITRANS_RUN.json b/SYSPROG/APPROW/SYSOBJ%003ASITRANS_RUN.json new file mode 100644 index 0000000..e6d4fac --- /dev/null +++ b/SYSPROG/APPROW/SYSOBJ%003ASITRANS_RUN.json @@ -0,0 +1,205 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SITRANS.RUN" + }, + "body": { + "record1": { + "<1>": "\u0014" + }, + "record2": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "´Ãd\u0000\u0000\u0000 \u0000p\bz\bˆ\t–\n\u0002\u0000\u0010\u000e-\u0002\u0000\u0000\u0000-\u0002\u0000\u0002\u0000-\u0002\u0000\u0004\u0000-\u0002\u0000\u0006\u0000-\u0002\u0000\b\u0000-\u0002\u0000\n\u0000-\u0002\u0000\f\u0000-\u0002\u0000\u000e\u0000-\u0002\u0000\u0010\u0000-\u0002\u0000\u0012\u0000-\u0002\u0000\u0014\u0000-\u0002\u0000\u0018\u0000-\u0002\u0000\u001a\u0000-\u0002\u0000\u001c\u0000-\u0002\u0000\u001e\u0000-\u0002\u0000 \u0000-\u0002\u0000\"\u0000-\u0002\u0000$\u0000-\u0002\u0000&\u0000-\u0002\u0000¢\u0000-\u0002\u0000¬\n-\u0002\u0000¼\n-\u0002\u0000¶Ã-<\u0000d\u0000-Ð\u0007 \u0000-\n\u0000p\b-\u000e\u0001z\b-\u000e\u0001ˆ\t-\u0010\u0000–\n-\n\u0000ª\n-\u0006\u0000´\n-È\u0000º\n-\u0006\u0000‚\u000b-\u0010\u0000ˆ\u000b-\u0010\u0000˜\u000b-\n\u0000¨\u000b-d\u0000¸\u000b-d\u0000\u001c\f-d\u0000€\f-d\u0000ä\f-d\u0000H\r-d\u0000¬\r-Ä\t\u0010\u000e-Ð\u0007Ô\u0017-Ð\u0007¤\u001f-@œt'-\u0010'´Ã\u0014¸\u000b\b\u0010\u0011\u0002\u0000H\r¬\r\u0014¸\u000b\b\u0010!\u0002\u0000H\r¬\r\u0014¸\u000b\b\u00101\u0002\u0000H\r¬\r\u0014¸\u000b\b \u0012\u0002\u0000º\n‚\u000b\u0014¸\u000b\b \"\u0002\u0000º\n‚\u000b\u0017´Ã\u0017´Ã4´Ã\u0013t't'\u0003\u0006\u0000\u0004\u000e\u0000\u0014´\n\u0002\r\n\u0004\u001c\u0000\u0004$\u0000>\r\u0001\nŒ\u0001\t$\u0000\np\u0001\u0013t't'\u000b„\u0001\r³\u0004\u000b\u0001\u0003\u0000\u0000\u0013t't'\n„\u0001\nŒ\u0001Bt'@\u000e?>?\u000e>\r", + "<1,1,1,1,2>": "\u0001\nî\u0001\u001b\u0001Þ\u0005\u0000\u0000\nÜ\u0001\nÙ\u0001\r›\u0002\nÜ\u0001\u001b\u0001Þ\u0005\u0000\u0000\nÖ\u0001\nÓ\u0001\rÃ\u0002\nÖ\u0001\u001b\u0001Þ\u0005\u0000\u0000\nÐ\u0001\nÍ\u0001\rÜ\u0002\nÐ\u0001\u0003\u0000\u0000\nÖ\u0001\u0003\u0000\u0000\nÜ\u0001\u0003\u0000\u0000\nî\u0001\u0004\u0006\u0000\u001a\u0001Þ\nî\u0001\u0017t'\f‘\u0001\u0003\u0000\u0000\u0017t'@\u000e?>?\u000e>\rL\u0002\nH\u0002\u001a\u0001*\nH\u0002\rm\u0002\nH\u0002\u001a\u0001*\nH\u0002\r„\u0002\nH\u0002\u0013t'ä\f\u0014t'\u0001" + } + } + }, + "<1,2>": "0\b\u0000\u0000\u00000\n\u0000\u0000\u0000\u0013Ô\u0017Ô\u0017\u0013¤\u001f¤\u001f\t\u0006\u0000\u000bC\u0002\u0003\u001c\u0000\u0003\u0000\u0000\nH\u0002@\u000e?>?\u000e>G\u0001*\ni\u0002\u0013\u001c\f\u001c\f\u0013ä\fä\f\u0013\u001c\f \u0000\u0013ä\f \u0000@\u000e?>?\u000e>G\u0001*\n€\u0002\u0014ä\f\u0001*\u0013ä\f \u0000@\u000e?>?\u000e>G\u0001", + "<1,3>": "\n—\u0002\u0014ä\f\u0001*\u0013ä\f \u0000@\u000e?>?\u000e>\u001a\u0001", + "<1,4>": "\n¿\u0002\u001a\u0001*\n·\u0002\t\u0006\u0000\n±\u0002\u0003\u0004\u0000\u0003\u0000\u0000\nº\u0002\u0003\u0000\u0000\n¿\u0002@\u000e?>?\u000e>\u001a\u0001", + "<1,5>": "\nØ\u0002\u001a\u0001*\nÐ\u0002\u0003\u0000\u0000\nØ\u0002@\u000e?>?\u000e>\u001a\u0001", + "<1,6>": "\n&\u0003\r*\u0003\n" + }, + "<2>": "\u0002\rA\u0003\n", + "<3>": "\u0002\rd\u0003\n", + "<4>": { + "<4,1>": "\u0002\u001a\u0001", + "<4,2>": "\n" + }, + "<5>": { + "<5,1>": "\u0002\fã\u0002\u0003\u0000\u0000\u0016t'\b\u0000\u0014t'\u0001", + "<5,2>": "\u0016t'\n\u0000\u0014t'\u0001", + "<5,3>": "\u0013t'¤\u001f\u0014t'\u0001", + "<5,4>": { + "<5,4,1>": "\u0013t'Ô\u0017@\u000e?>?\u000e>\u0013H\rH\rG\u0001", + "<5,4,2>": "\n=\u0003\u0013H\r \u0000@\u000e?>?\u000e>\u0013ª\nª\n\u001a\u0001", + "<5,4,3>": "\n`\u0003G\u0001", + "<5,4,4>": "\nX\u0003\u0013ª\n \u0000\u0003\u0000\u0000\n`\u0003@\u000e?>?\u000e>\u001a\u0001", + "<5,4,5>": "\nz\u0003\ns\u0003@>\fz\u0003\u0004\u0000\u0000?\u000e@\u000e?>8B´ÃF\u0004\r\\\u0004\nŠ\u0003@\u000e?>\fZ\u0004\r\\\u0004\n—\u0003@\u000e?>\fZ\u0004\u001b\u00032", + "<5,4,6>": "5\n§\u0003\u0003\u001c\u0000\u0003\u0000\u0000\nµ\u0003\r\\\u0004\nµ\u0003@\u000e?>\fZ\u0004\b\u0014\u0000¶Ã\u001a\u00013\n'\u0004\u001a\u0001", + "<5,4,7>": "\n'\u0004G\u0001", + "<5,4,8>": "\u0003\u0000\u0000\n'\u0004\u001a\u0001", + "<5,4,9>": "\n'\u0004G\u0001", + "<5,4,10>": "\u0003\u0000\u0000\n'\u0004\u001a\u0001", + "<5,4,11>": "\n'\u0004G\u0002", + "<5,4,12>": "" + }, + "<5,5>": { + "<5,5,1>": "\u0003\u0000\u0000\n'\u0004\u001a\u0001", + "<5,5,2>": "\u000b" + } + } + }, + "record3": { + "<1>": { + "<1,1>": "\u0003\u0003$\u0000\u0003\u0000\u0000\n'\u0004G\u0001", + "<1,2>": { + "<1,2,1>": "\u0003\u0000\u0000\n'\u0004\t¢\u0000\u000b\u0017\u0004\u0003$\u0000\u0003\u0000\u0000\n'\u0004\b¶Ã\u0014\u0000\r\\\u0004\n'\u0004@\u000e?>\fZ\u0004\rŠ\u0004\n4\u0004@\u000e?>\fZ\u0004\r\\\u0004\nA\u0004@\u000e?>\fZ\u0004\u0006\u0000012356‚\u0003\u0003œ\u0003º\u0003,\u00049\u0004?\u000e>\u0006\n\u0000\u0013Ô\u0017H\r\u0014Ô\u0017\u0001", + "<1,2,2>": "\u0013Ô\u0017ª\n\u0014Ô\u0017\u0001", + "<1,2,3>": "G\u0001" + }, + "<1,3>": { + "<1,3,1>": "\n†\u0004\u0013Ô\u0017 \u0000\u0014Ô\u0017\u0001", + "<1,3,2>": "@\u000e?>?\u000e>\u0006\b\u0000\u0013¤\u001fH\r\u0014¤\u001f\u0001", + "<1,3,3>": "\u0014¤\u001f\u0001", + "<1,3,4>": "G\u0001" + }, + "<1,4>": { + "<1,4,1>": "\n¯\u0004\u0013¤\u001f \u0000\u0014¤\u001f\u0001", + "<1,4,2>": "@\u000e?>?\u000e>\u0013´Ã´Ã\u0013´Ãt'\u0013t't'4´Ã\u0013´Ã´Ã\rF\f\n$\u0006\u0013´Ã´Ã\r(\u0006\n$\u0006\r†\u0011\n$\u0006\rŠ\u0012\n$\u0006\r\u0005\u0019\n$\u0006\rŸ\u001c\n$\u0006\t\u0004\u0000\n\u0000\u0005\rÛ\u001e\n\u0003\u0005\u0003\u0000\u0000\n$\u0006\rF\f\n$\u0006\t\b\u0000\n3\u0005\rí\u001e\n6\u0005\rz\u001f\n*\u0005\u0007\b\u0000\t\b\u0000\n*\u0005\f\u0018\u0005\u0003\u0000\u0000\rP \n6\u0005\u0003\u0000\u0000\n$\u0006\u0013´Ã´Ã\u0003\u0006\u0000\rF\f\n$\u0006\rp\u0011\n$\u00060 \u0000\u0000\u0000\rl \u0003\u0000\u0000\n‚\u0005\t\u0006\u0000\u000bg\u0005\r­5\u0003\u0000\u0000\n‚\u0005\rF\f\n‚\u0005\rp\u0011\n‚\u0005\u0004\u0006\u0000\r”8\n‚\u0005\fR\u0005\u0003\u0000\u0000\rè5\n$\u0006\u0003\u000e\u0000\r÷7\n$\u0006\u0013´Ã´Ã\u0003\u0006\u0000\rF\f\n$\u0006\rp\u0011\n$\u00060 \u0000\u0000\u0000\r\u001a9\u0003\u0000\u0000\né\u0005\t\u0006\u0000\u0005\u0000\u0000\nÂ\u0005\nÂ\u0005\nË\u0005\r­5\nÎ\u0005\u0003\u0000\u0000\né\u0005\rF\f\né\u0005\rp\u0011\né\u0005\u0004\u0006\u0000\r”8\né\u0005\f­\u0005\u0003\u0000\u0000\rö=\n$\u0006\rïA\n$\u0006\rUJ\n$\u0006\rÉK\n$\u0006\r-L\n$\u0006\rAN\n$\u0006\reN\n$\u0006\r-R\n$\u0006\rT\n$\u0006@\u000e?>?\u000e>\u0014t'\u0002* \u0013t'\u001c\f\u0014t'> Secondary index transaction builder for version 2.1 and above\u0017t'\u0017t'\u0014t'%* Invoked like a dictionary calculate\u0017t'\u0014t'9* Input: @MV = 0 for write, 1 for delete, 2 for clearfile\u0017t'\u0014t''* @ID = Record key for write and delete\u0017t'\u0014t'\u001c* @RECORD = Record for write\u0017t'\u0014t' * @ANS = data file file variable\u0017t'\u0014t'\u0012* RETURNS: nothing\u0017t'\u0017t'\u0014t'ƒCOMMON /%%SI%%/MAX.UPDATE.SIZE,INDEXES,INDEXES.FILEVAR,NO.PROTECT,OLD.REC,OLD.FLAG,OLD.FV,OLD.ID,DICT.FVS%,BATCH.MODE%,UPDATE.ITEM%\u0017t'\u0017t'\u0014t'\u0017EQU MARKS TO \\FCFBFEFF\\\u0017t'\u0014t'\u0014EQU VMARKS TO \\FDFD\\\u0017t'\u0014t'\u001aEQU DELETED.VALUE$ TO \\FC\\\u0017t'\u0014t'\u000eEQU TRUE$ TO 1\u0017t'\u0014t'\u000fEQU FALSE$ TO 0\u0017t'\u0014t'\u0014EQU READ.RECORD TO 1\u0017t'\u0014t'\u0015EQU WRITE.RECORD TO 3\u0017t'\u0014t'\u0016EQU DELETE.RECORD TO 4\u0017t'\u0014t'\u0012EQU SI.WRITE$ TO 0\u0017t'\u0014t'\u0013EQU SI.DELETE$ TO 1\u0017t'\u0014t'\u0016EQU SI.CLEARFILE$ TO 2\u0017t'\u0017t'\u0014t'-DECLARE SUBROUTINE MSG, BATCH.INDEXING, DELAY\u0017t'\u0014t'HDECLARE FUNCTION CALCULATE, CALCULATEX, RELATER, INDEX.OPEN, ESC.TO.EXIT\u0017t'\u0017t'\u0014t'@* @ANS contains SI.MFS file handle, parse into local variables. \u0017t'\u0014t'\u0017POS = 6 + @ANS[ 1, 5 ] \u0017t'\u0014t'\u0016TEMP = @ANS[ POS, 5 ] \u0017t'\u0014t'\tPOS += 5 \u0017t'\u0014t'6@DICT = @ANS[ POS, TEMP ] ;* used to be an index.open \u0017t'\u0014t'\u0015DICT.FILEVAR = @DICT \u0017t'\u0014t'\fPOS += TEMP \u0017t'\u0014t'\u0016TEMP = @ANS[ POS, 5 ] \u0017t'\u0014t'\tPOS += 5 \u0017t'\u0014t'\u001bIDX.FV = @ANS[ POS, TEMP ] \u0017t'\u0014t'\fPOS += TEMP \u0017t'\u0014t'\u0016TEMP = @ANS[ POS, 5 ] \u0017t'\u0014t'\tPOS += 5 \u0017t'\u0014t'\u001cFILEVAR = @ANS[ POS, TEMP ] \u0017t'\u0017t'\u0014t'\u0011FS = FILEVAR<1,1>\u0017t'\u0014t'\u0012NEXTFS = FS<1,1,1>\u0017t'\u0014t'\u001fFVAR = DELETE(FILEVAR, 1, 1, 0)\u0017t'\u0014t'\nSTATUS = 0\u0017t'\u0014t'\u0007FNAME =\u0014t'\u0002\"!\u0013t'ä\f\u0014t'\t\"[1,\"F*\"]\u0017t'\u0014t'\u0013IF BATCH.MODE% THEN\u0017t'\u0014t'\u0019 IDX.FV = INDEXES.FILEVAR\u0017t'\u0014t'\u0003END\u0017t'@\u000e?>?\u000e>\u001a\u0001Þ\nM\f\u0003\u0000\u0000\n¦\fG\u0001*\n¦\f\u0013ä\fä\f\u0013\u001c\f\u001c\f\u0013ä\f \u0000\u0013\u001c\f \u0000\rë\f\n¦\fG\u0001" + }, + "<1,5>": "\n¦\f\u0013ä\f \u0000\u001a\u0001", + "<1,6>": "\n¦\f:\u0002\u0000´Ã\b\b\u0000\u0002\u0000\u001a\u0001", + "<1,7>": "\n¦\f:\u0002\u0000´Ã\b\n\u0000\u0002\u0000\u001a\u0001", + "<1,8>": { + "<1,8,1>": "\n¦\f@\u000e?>?\u000e>\u0013H\rH\r\u0013¬\r¬\rG\u0001", + "<1,8,2>": "\nç\f\u0013H\r \u0000\r\u0002\r\nç\f\u001a\u0001", + "<1,8,3>": "\nç\f\u0013ª\nª\nG\u0001", + "<1,8,4>": "\u0003\u0000\u0000\nç\f\u0013ª\n \u0000\u001a\u0001", + "<1,8,5>": "\nç\f@\u000e?>?\u000e>\u0013€\f€\f\r\u0019\r\n" + } + }, + "<2>": { + "<2,1>": "\f\u0013€\fº\n@\u000e?>?\u000e>\u0013¬\r¬\r\r\u0019\r\n\u0015\r\u0013¬\rº\n@\u000e?>?\u000e>; \u0000\u0014 \u0000\u0001 \u0013 \u0000 \u0000\u0013º\nº\n\u0003&\u0000\rG\r\n;\r\u0004&\u0000\f/\r\u0003\u0000\u0000;´Ã@\u000e?>?\u000e>\t&\u0000\nV\r\r‡\r\nV\r@\u000e?>\r–\u000e\n`\r@\u000e?>\u001b\u0001 \no\r\u0004\u0000\u0000?\u000e@\u000e?>9\u0002\u0000 \u0000\u0016º\n\u0002\u0000\u0007¼\n\u0003\u0000\u0000@\u000e?>?\u000e>\u0003\u0000\u0000\n“\r@>\fš\r\u0004\u0000\u0000?\u000e@\u000e?>8B \u0000t\u000e\u001a\u00010\n²\r\u0014º\n\u0004ZERO@\u000e?>\f”\u000e\u001a\u00011\nÆ\r\u0014º\n\u0003ONE@\u000e?>\f”\u000e\u001a\u00012\nÚ\r\u0014º\n\u0003TWO@\u000e?>\f”\u000e\u001a\u00013\nð\r\u0014º\n\u0005THREE@\u000e?>\f”\u000e\u001a\u00014\n\u0005\u000e\u0014º\n\u0004FOUR@\u000e?>\f”\u000e\u001a\u00015\n\u001a\u000e\u0014º\n\u0004FIVE@\u000e?>\f”\u000e\u001a\u00016\n.\u000e\u0014º\n\u0003SIX@\u000e?>\f”\u000e\u001a\u00017\nD\u000e\u0014º\n\u0005SEVEN@\u000e?>\f”\u000e\u001a\u00018\nZ\u000e\u0014º\n\u0005EIGHT@\u000e?>\f”\u000e\u001a\u00019\no\u000e\u0014º\n\u0004NINE@\u000e?>\f”\u000e\n\u00000123456789¢\r·\rË\rß\rõ\r\n\u000e\u001f\u000e3\u000eI\u000e_\u000e?\u000e>\u0003\u0000\u0000\n¢\u000e@>\f©\u000e\u0004\u0000\u0000?\u000e@\u000e?>8B \u0000ó\u000f\u001a\u0001!\n¿\u000e\u0014º\n\u0002EX@\u000e?>\f%\u0010\u001a\u0001@\nÒ\u000e\u0014º\n\u0002AT@\u000e?>\f%\u0010\u001a\u0001#\næ\u000e\u0014º\n\u0003NBR@\u000e?>\f%\u0010\u001a\u0001$\n", + "<2,2>": { + "<2,2,1>": "\u000e\u0014º\n\u0006DOLLAR@\u000e?>\f%\u0010\u001a\u0001%\n\u0012\u000f\u0014º\n\u0004PCNT@\u000e?>\f%\u0010\u001a\u0001^\n%\u000f\u0014º\n\u0002UP@\u000e?>\f%\u0010\u001a\u0001&\n9\u000f\u0014º\n\u0003AMP@\u000e?>\f%\u0010\u001a\u0001-\nN\u000f\u0014º\n\u0004DASH@\u000e?>\f%\u0010\u001a\u0001+\nc\u000f\u0014º\n\u0004PLUS@\u000e?>\f%\u0010\u001a\u0001=\nv\u000f\u0014º\n\u0002EQ@\u000e?>\f%\u0010\u001a\u0001/\nŠ\u000f\u0014º\n\u0003DIV@\u000e?>\f%\u0010\u001a\u0001<\n\u000f\u0014º\n\u0002LT@\u000e?>\f%\u0010\u001a\u0001>\n°\u000f\u0014º\n\u0002GT@\u000e?>\f%\u0010\u001a\u0001:\nÆ\u000f\u0014º\n\u0005COLON@\u000e?>\f%\u0010\u001a\u0001;\nÛ\u000f\u0014º\n\u0004SEMI@\u000e?>\f%\u0010\u001a\u0001_\nî\u000f\u0014º\n\u0002UL@\u000e?>\f%\u0010\u0010\u0000!@#$%^&-+=/<>:;_±\u000eÄ\u000e×\u000eë\u000e\u0002\u000f\u0017\u000f*\u000f>\u000fS\u000fh\u000f{\u000f\u000f¢\u000fµ\u000fË\u000fà\u000f?\u000e>8B´ÃZ\u0011\u001a\u00010\nH\u0010\u001a\u0001", + "<2,2,2>": "\nH\u0010G\u0001", + "<2,2,3>": "\nH\u0010\u001a\u0001", + "<2,2,4>": "\nH\u0010@\u000e?>\fn\u0011\u001a\u00011\nj\u0010\u001a\u0001", + "<2,2,5>": "\nj\u0010G\u0001", + "<2,2,6>": "\u0003\u0000\u0000\nj\u0010\u001a\u0001", + "<2,2,7>": "\nj\u0010@\u000e?>\fn\u0011\u001a\u00012\n¼\u0010\u001a\u0001", + "<2,2,8>": "\n¼\u0010\u001a\u00014\n‡\u0010\u001a\u0001", + "<2,2,9>": "\n‡\u0010\u000b–\u0010\u001a\u00015\n–\u0010\u001a\u0001", + "<2,2,10>": "\n–\u0010\u000b·\u0010G\u0001", + "<2,2,11>": "\u0003\u0000\u0000\n·\u0010\u001a\u0001", + "<2,2,12>": "\n·\u0010G\u0001", + "<2,2,13>": "\u0003\u0000\u0000\n·\u0010\u001a\u0001", + "<2,2,14>": "\n·\u0010\n¼\u0010@\u000e?>\fn\u0011\u001a\u00013\n\u000b\u0011\u001a\u0001", + "<2,2,15>": "\n\u000b\u0011G\u0001", + "<2,2,16>": "\u0003\u0000\u0000\n\u000b\u0011\u001a\u0001", + "<2,2,17>": "\n\u000b\u0011G\u0001", + "<2,2,18>": "\u0003\u0000\u0000\n\u000b\u0011\u001a\u0001", + "<2,2,19>": "\n\u000b\u0011G\u0001", + "<2,2,20>": "\u0003\u0000\u0000\n\u000b\u0011\u001a\u0001", + "<2,2,21>": "\n\u000b\u0011G\u0001", + "<2,2,22>": "\u0003\u0000\u0000\n\u000b\u0011\u001a\u0001", + "<2,2,23>": "\n\u000b\u0011@\u000e?>\fn\u0011\u001a\u00015\n*\u0011\u001a\u0001", + "<2,2,24>": "\n*\u0011G\u0001", + "<2,2,25>": "\n*\u0011\u001a\u0001", + "<2,2,26>": "\n*\u0011@\u000e?>\fn\u0011\u001a\u00016\nU\u0011\u001a\u0001", + "<2,2,27>": "\nU\u0011G\u0001", + "<2,2,28>": "\nU\u0011\u001a\u0001", + "<2,2,29>": "\nU\u0011G\u0001", + "<2,2,30>": "\nU\u0011\u001a\u0001", + "<2,2,31>": "\nU\u0011@\u000e?>\fn\u0011\u0006\u0000012356.\u0010M\u0010o\u0010Á\u0010\u0010\u0011/\u0011?\u000e>G\u0001" + }, + "<2,3>": "\u0003\u0000\u0000\n‚\u0011\u001a\u0001", + "<2,4>": { + "<2,4,1>": "\n‚\u0011@\u000e?>?\u000e>\u0017t'\u0014t' * CHECK FOR CLEAR-FILE OPERATION\u0017t'\u0017t'\u0014t'\u001cIF @MV EQ SI.CLEARFILE$ THEN\u0017t'\rF\f\n†\u0012\u0014t'\u0011 UPDATE.LIST = ''\u0017t'\u0014t'\u0014 @ID = '%%ALL.IDS%%'\u0017t'\t\n\u0000\nm\u0012\rp\u0011\nm\u0012\rª\f\na\u0012\r'\u0010\na\u0012\u0014t'\u0011 UPDATE.LIST := \"\u0013t'H\r\u0014t'\u0015\":@FM:@ID:@FM:@FM:@FM\u0017t'\f\u001c\u0012\u0003\u0000\u0000\rF\f\nm\u0012\f\u0010\u0012\u0003\u0000\u0000\u0014t'\bEND ELSE\u0017t'\u0013´Ã´Ã@\u000e?>?\u000e>\rF\f\n\u0001\u0019\rp\u0011\n\u0001\u0019\rª\f\n¦\u0012\r'\u0010\n¦\u0012\f—\u0012\u0003\u0000\u0000\t\u001c\u0000\n+\u0015\rF\f\n(\u0015\rp\u0011\n(\u0015\rª\f\nÊ\u0012\r'\u0010\nÊ\u0012\f»\u0012\u0003\u0000\u0000\u0017t'\u0014t'C* Get affected files data and dict filevars for reading the record,\u0017t'\u0014t'\"* doing the calculate, and locking\u0017t'\u0017t'\u0014t'\u000fIF INDEX.OPEN('\u0013t'ä\f\u0014t'\u0002',\u0013t'€\f\u0014t'\u0006) ELSE\u0017t'\u0014t'\u0003 * \u0013t'€\f\u0014t'\u0005 = ''\u0017t'\u0014t'\u0014 MSG(\"B441\",\"\",\"\", \"\u0013t'ä\f\u0014t'\n\"[1,\"F*\"])\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0003END\u0017t'\u0014t'\u0010IF INDEX.OPEN('!\u0013t'ä\f\u0014t'\u0007',BANG.\u0013t'€\f\u0014t'\u0006) ELSE\u0017t'\u0014t'\b * BANG.\u0013t'€\f\u0014t'\u0005 = ''\u0017t'\u0014t'\u0015 MSG(\"B441\",\"\",\"\", \"!\u0013t'ä\f\u0014t'\n\"[1,\"F*\"])\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0003END\u0017t'\u0014t'\u0014IF INDEX.OPEN('DICT.\u0013t'ä\f\u0014t'\u0007',DICT.\u0013t'€\f\u0014t'\u0006) ELSE\u0017t'\u0014t'\b * DICT.\u0013t'€\f\u0014t'\u0005 = ''\u0017t'\u0014t'\u0019 MSG(\"B441\",\"\",\"\", \"DICT.\u0013t'ä\f\u0014t'\n\"[1,\"F*\"])\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0003END\u0017t'\f¯\u0012\u0003\u0000\u0000\u0003\u0000\u0000\n\u0001\u0019\u0013´Ã´Ã\rF\f\n\u0001\u0019\u0017t'\u0014t'8* Make sure the record is locked and lock it now if not.\u0017t'\u0014t'=* At lease the indexes will stay correct this way even if the\u0017t'\u0014t'+* caller does not lock records on a network\u0017t'\u0014t'\"* Skip locking if not on a network\u0017t'\u0014t'\u0014ITEM.LOCKED = FALSE$\u0017t'\u0014t'\u0015IF LEN(@STATION) THEN\u0017t'\u0014t'\u0011* IF INDEX.OPEN('\u0013t'ä\f\u0014t'\u0014',LOCK.FILEVAR) THEN\u0017t'\u0014t'\u0018* LOCK_FV = LOCK.FILEVAR\u0017t'\u0014t'\u000f* LOCK_ID = @ID\u0017t'\u0014t'\u0013* LOCK_MSG = 'B440'\u0017t'\u0014t'\u0012* PARA = @ID:@FM:\"\u0013t'\u001c\f\u0014t'\u0001\"\u0017t'\u0014t'\u0011* GOSUB LOCK_ITEM\u0017t'\u0014t'\u000f* IF ABORT THEN\u0017t'\u0014t'\u000f* RETURN FALSE$\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'%* IF LOCKED AND NOT(SELF_LOCKED) THEN\u0017t'\u0014t'\u0015* ITEM.LOCKED = TRUE$\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'\u0005* END\u0017t'\t\u001c\u0000\nê\u0018\u0013´Ã´Ã\u0003\u0006\u0000\rF\f\nç\u0018\rp\u0011\nç\u0018\rª\f\nÞ\u0018\t\u0006\u0000\nß\u0017\u001b\u00032", + "<2,4,2>": "5\u0005\u0000\u0000\nß\u0017\nß\u0017\u000bÒ\u0018\u0014t'\u000b LOCK_FV = \t\u0006\u0000\n\u0002\u0018\u0014t'\u0007FILEVAR\u000b\r\u0018\u0013t'€\f\u0003\u0000\u0000\nÏ\u0018\u0017t'\u0014t'\f LOCK_ID = \"\u0013t'H\r\u0014t'\u0007*INDEX\"\u0017t'\u0014t'\u0012 LOCK_MSG = 'B521'\u0017t'\u0014t'\t PARA = \"\u0013t'H\r\u0014t'\u0007*INDEX\"\u0014t'\u0006:@FM:\"\u0013t'\u001c\f\u0014t'\u0001\"\u0017t'\u0014t'\u0010 GOSUB LOCK_ITEM\u0017t'\u0014t'\u000e IF ABORT THEN\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0003\u0000\u0000\nÞ\u0018\r'\u0010\nÞ\u0018\fÅ\u0017\u0003\u0000\u0000\u0004\u0006\u0000\f¹\u0017\u0003\u0000\u0000\u0003\u0000\u0000\n\u0001\u0019\u0014t'\u0003END\u0017t'\u0013´Ã´Ã@\u000e?>?\u000e>\u0017t'\u0014t'+* Check for old record cached by read logic\u0017t'\u0017t'\u0014t'3OPTIMIZED = FALSE$ ;* remember if old record cached\u0017t'\u0014t'\u0010IF OLD.FLAG THEN\u0017t'\u0017t'\u0014t'6 * If something cached, then ID and FILEVAR must match\u0017t'\u0017t'\u0014t'\u0016 IF OLD.ID EQ @ID THEN\u0017t'\u0014t'\u001a IF OLD.FV EQ FILEVAR THEN\u0017t'\u0017t'\u0014t'D * If something cached, then the record had better have been locked.\u0017t'\u0014t'5 * If not we will force another read later. This will\u0017t'\u0014t'D * keep the indexes in line with the data file but some user may not\u0017t'\u0014t'F * find the data he expects if he is sharing the file without locking.\u0017t'\u0017t'\u0014t'\u0015* IF ITEM.LOCKED ELSE\u0017t'\u0014t'- OPTIMIZED = TRUE$ ;* did not have to lock it\u0017t'\u0014t'\u0016 IF OLD.FLAG EQ 2 THEN\u0017t'\u0014t') NO.OREC = TRUE$ ;* Record does not exist\u0017t'\u0014t'\n OREC = ''\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0019 TRANSFER OLD.REC TO OREC\u0017t'\u0014t'\u0011 NO.OREC = FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'0 OLD.FLAG = FALSE$ ;* Empty the cache on a match\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0003END\u0017t'@\u000e?>?\u000e>\u0017t'\u0014t'-* If old record wasn't cached then get it now\u0017t'\u0017t'\u0014t'\u0011IF OPTIMIZED ELSE\u0017t'\u0014t'< CALL @NEXTFS(READ.RECORD, FS, FVAR:'', @ID, '', OREC, FLAG)\u0017t'\u0014t'\r IF FLAG THEN\u0017t'\u0014t'\u0011 NO.OREC = FALSE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u001d IF @FILE.ERROR<1> # 100 THEN\u0017t'\u0014t')* IF @STATION NE '' AND ITEM.LOCKED THEN \u0017t'\u0014t'\u0018* ERR.SAVE = @FILE.ERROR\u0017t'\u0014t'$* UNLOCK LOCK.FILEVAR, @ID ELSE NULL\u0017t'\u0014t'\u0018* @FILE.ERROR = ERR.SAVE\u0017t'\u0014t'\u000f* FLAG = FALSE$\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'6 RETURN FLAG ;* Error other than record does not exist\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\n OREC = ''\u0017t'\u0014t'\u0010 NO.OREC = TRUE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0003END\u0017t'@\u000e?>?\u000e>\rF\f\né\u001e\u0013´Ã´Ã@\u000e?>?\u000e>\u0017t'\u0014t'+* Protection of index on deletes and writes\u0017t'\u0017t'\u0014t'-IF @MV EQ SI.DELETE$ OR @MV EQ SI.WRITE$ THEN\u0017t'\u0014t'\u0013 IF NO.PROTECT ELSE\u0017t'@\u000e?>?\u000e>\rª\f\nL \u001a\u00015\nL \u001a\u0001", + "<2,4,3>": "\nL G\u0001", + "<2,4,4>": "\nL \u001a\u0001", + "<2,4,5>": "\nL \u0017t'\u0014t'\u0011 * Protect field \u0013t' \u0000\u0017t'\u0017t'\u0014t'\t @RECORD<\u0013t' \u0000\u0014t'\t> = OREC<\u0013t' \u0000\u0014t'\u0001>\u0017t'\u0014t'\u0019 IF @MV = SI.DELETE$ THEN\u0017t'\u0014t'\f IF @RECORD<\u0013t' \u0000\u0014t'\u001b> # '' THEN @MV = SI.WRITE$\u0017t'\u0014t'\u0004 END\u0017t'@\u000e?>?\u000e>\u0014t'\u0004 END\u0017t'\u0014t'\u0003END\u0017t'@\u000e?>?\u000e>\t\n\u0000\n¯!\b\"\u0000 \u0000\t\u0006\u0000\nÊ \rz\"\nÊ \b\u001e\u0000¶Ã\rª\f\n³ \u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\r¿\"\n³ \r'\u0010\n³ \f‰ \u0003\u0000\u0000\u0014t'\bEND ELSE\u0017t'\b¶Ã\u001e\u0000\u0003\u0000\u0000\n¯!\b \u0000\"\u0000\rª\f\n”!\t\u0006\u0000\nö \u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0003\u0000\u0000\n”!\r³!\n”!\t\u0006\u0000\n‹!\t\u0010\u0000\u000bA!\u0014t'\u001c CONVERT MARKS TO VMARKS IN \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\n‹!\t¬\n\u000bˆ!\u0014t'' CONVERT @LOWER.CASE TO @UPPER.CASE IN \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\n‹!\u0003\u0000\u0000\n”!\fÕ \u0003\u0000\u0000\t\u0006\u0000\n§!\u0014t'\u0003END\u0017t'\u0003\u0000\u0000\n¯!@\u000e?>?\u000e>8B´Ãd\"\u001a\u00010\nÎ!\u001a\u0001", + "<2,4,6>": "\nÎ!\rÈ#\nÎ!@\u000e?>\fx\"\u001a\u00011\nç!\u001a\u0001", + "<2,4,7>": "\nç!\rD$\nç!@\u000e?>\fx\"\b\u0018\u0000¶Ã\u001a\u00012\n\u0005\"\u001a\u0001", + "<2,4,8>": "\n\u0005\"\rE&\n\u0005\"@\u000e?>\fx\"\u001a\u00013\n!\"\u001a\u0001", + "<2,4,9>": "\n!\"\r" + } + } + }, + "record4": { + "<1>": { + "<1,1>": { + "<1,1,1>": "%\n!\"\u0003\u0010\u0000@\u000e?>\fx\"\u001a\u00015\nC\"\u001a\u0001", + "<1,1,2>": "\nC\"G\u0001", + "<1,1,3>": "\u0003\u0000\u0000\nC\"\u001a\u0001", + "<1,1,4>": "\nC\"@\u000e?>\fx\"\u001a\u00016\n_\"\u001a\u0001", + "<1,1,5>": "\n_\"\rÒ$\n_\"\u0003\u0012\u0000@\u000e?>\fx\"\u0006\u0000012356º!Ó!ì!\n\"&\"H\"?\u000e>\t\u000e\u0000\n°\"\t\u0006\u0000\n§\"\u0014t'\u0019IF @MV EQ SI.DELETE$ THEN\u0017t'\u000b­\"\r[#\n°\"\u000b¶\"\r[#\n»\"@\u000e?>?\u000e>8B´ÃE#\r{#\nÎ\"@\u000e?>\fY#\r{#\nÛ\"@\u000e?>\fY#\r{#\nè\"@\u000e?>\fY#\u0014t'\u0001 \t\u000e\u0000\n\u0005#\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000b\u0018#\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\n)#\u0014t'\u0005 = ''\u0017t'@\u000e?>\fY#\u0003\u0000\u0000@\u000e?>\fY#\r{#\n@#@\u000e?>\fY#\u0006\u0000012356Æ\"Ó\"à\"í\".#8#?\u000e>\u0014t'\u000fIF NO.OREC THEN\u0017t'\u0003\u0000\u0000@\u000e?>?\u000e>\u0014t'\u0001 \t\u000e\u0000\n”#\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000b§#\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\nÄ#\u0014t'\u0011 = DELETED.VALUE$\u0017t'@\u000e?>?\u000e>G\u0001", + "<1,1,6>": "\n@$\u001a\u0001", + "<1,1,7>": "\n@$\u0014t'\u0001 \t\u000e\u0000\ní#\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000b\u0000$\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\n@$\u0014t'\u0003 = \t\u000e\u0000\n\u001b$\u0014t'\u0007@RECORD\u000b)$\u0014t'\u0004OREC\u0003\u0000\u0000\n@$\u0014t'\u0001<\u0013t' \u0000\u0014t'\u0001>\u0017t'@\u000e?>?\u000e>\u0014t'\u0001 \t\u000e\u0000\n]$\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000bp$\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\nÎ$\u0014t'\u0003 = #\n³$6\f\u0000\t\f\u0000\n£$\u0014t'\u000eFIELD(@ID,'*',\u0013t'p\b\u0014t'\u0001)\u000b°$\u0014t'\u0003@ID\u0003\u0000\u0000\n³$\u000bÀ$\u0014t'\u0003@ID\u0003\u0000\u0000\nÎ$\u0017t'\u001a\u0001", + "<1,1,8>": "\nÎ$@\u000e?>?\u000e>G\u0001", + "<1,1,9>": "\nó$\u001a\u0001", + "<1,1,10>": "\nó$\r÷$\nó$G\u0001", + "<1,1,11>": "\nó$\u001a\u0001", + "<1,1,12>": { + "<1,1,12,1>": "\nó$@\u000e?>?\u000e>\u0014t'\u001b IF DICT.FILEVAR NE '' THEN\u0017t'\u0014t'\u0001 \t\u000e\u0000\n2%\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000bE%\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\n", + "<1,1,12,2>": "%\u0014t'\u000f = CALCULATEX('\u0013t' \u0000\u0014t'\u0013',DICT.FILEVAR,@ID,\t\u000e\u0000\nˆ%\u0014t'\u0007@RECORD\u000b–%\u0014t'\u0004OREC\u0003\u0000\u0000\n", + "<1,1,12,3>": "%\u0014t'\u0004,'')\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0001 \t\u000e\u0000\nÌ%\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000bß%\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0003\u0000\u0000\n", + "<1,1,12,4>": "%\u0014t'\u0005 = ''\u0017t'\u0014t'\u0004 END\u0017t'@\u000e?>?\u000e>G\u0001" + }, + "<1,1,13>": "\nA&\u001a\u0001", + "<1,1,14>": "\nA&\r÷$\nA&G\u0001", + "<1,1,15>": "\u0003\u0000\u0000\nA&\u001a\u0001", + "<1,1,16>": "\nA&G\u0001", + "<1,1,17>": "\u0003\u0000\u0000\nA&\u001a\u0001", + "<1,1,18>": "\nA&G\u0001", + "<1,1,19>": "\u0003\u0000\u0000\nA&\u001a\u0001", + "<1,1,20>": "\nA&@\u000e?>?\u000e>\t\u0006\u0000\nÝ&G\u0001", + "<1,1,21>": "\nÝ&\u001a\u0001", + "<1,1,22>": "\nÝ&\t\u000e\u0000\nŒ&\u0014t'\u0005 NEW.\u0013t'ˆ\u000b\u0014t'\u000e = CALCULATE('\u0013t'H\r\u0014t'\u0002')\u0017t'\u000bÚ&\u0014t'\u0005 OLD.\u0013t'ˆ\u000b\u0014t'\u000f = CALCULATEX('\u0013t'H\r\u0014t'\u001b',DICT.FILEVAR,@ID,OREC,'')\u0017t'\u0003\u0000\u0000\nÝ&\u000b„0\u000f¼\u000b)\nø&\u0010¼\u000b\nø&\b¶Ã\u0018\u0000\r'\u0010\nø&\u000b*0\u000fÌ\u000b*\n'0\b\u0018\u0000¶Ã\u0013º\nº\nG\u0001", + "<1,1,23>": "\n'0\u001a\u0001", + "<1,1,24>": "\n'0\u0013º\n \u0000\u0014º\n\u0001*G\u0001", + "<1,1,25>": "\u0003\u0000\u0000\n'0\u001a\u0001", + "<1,1,26>": "\n'0\u0013º\n \u0000\u000fÔ\u000b*\n'0\rª\f\n½'\u000f¼\u000b)\nV'\u0010¼\u000b\nV'\r'\u0010\nV'\u000b·'\u001a\u00012\n´'\u001a\u0001", + "<1,1,27>": "\n´'\u0013º\nº\nG\u0001", + "<1,1,28>": "\n´'\u001a\u0001", + "<1,1,29>": "\n´'\u0013º\n \u0000\u0014º\n\u0001*G\u0001", + "<1,1,30>": "\u0003\u0000\u0000\n´'\u001a\u0001", + "<1,1,31>": "\n´'\u0013º\n \u0000\u000fÔ\u000b)\n®'\u0010Ô\u000b\n¨'\u000fÌ\u000b*\n¨'\u0003\u0000\u0000\n®'\u0003\u0000\u0000\n´'\u0003\u0000\u0000\n½'\f='\u0003\u0000\u0000\b¶Ã\u0018\u0000\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013˜\u000b˜\u000b\u0013˜\u000b–\n\u0007 \u0000\t\u000e\u0000\n\u0001(G\u0001", + "<1,1,32>": "\u0003\u0000\u0000\n\u0001(\u001a\u0001", + "<1,1,33>": "\n\u0001(G\u0001", + "<1,1,34>": "\u0003\u0000\u0000\n\u0001(\u001a\u0001", + "<1,1,35>": { + "<1,1,35,1>": { + "<1,1,35,1,1>": "\n\u0001(\u000b\u0007(\r0\n'0\u0017t'\u0014t'0 * LOOP THROUGH ALL IDS, WE HAVE TO COMPUTE THE \t\u000e\u0000\nN(\u0014t'\u0003NEW\u000b[(\u0014t'\u0003OLD\u0003\u0000\u0000\n'0\u0014t'\u0016 VALUE FOR ALL OF THEM\u0017t'\u0017t'\u0014t'\u0016 ID.LEN = LEN(ID.LIST.\u0013t'˜\u000b\u0014t'\u0001)\u0017t'\u0014t'\u000b ID.COL = 1\u0017t'0\u0014\u0000\u0000\u0000\b\"\u0000 \u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\n8)\u0010Ì\u000b\n/)\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\t\u000e\u0000\n\u0007)\u0014t'\u0005 COL.\u0013t'ˆ\u000b\u0014t'\u0004 = 1\u0017t'\u000b,)\u0014t'\n OLD.LIST.\u0013t'ˆ\u000b\u0014t'\u0005 = ''\u0017t'\u0003\u0000\u0000\n/)\u0003\u0000\u0000\n8)\fÁ(\u0003\u0000\u0000\t\u000e\u0000\nU)\u0014t'\r NEXT.ID = ''\u0017t'\u0003\u0000\u0000\n'0\u0014t'\u001c LOOP WHILE ID.COL LE ID.LEN\u0017t'\u0014t'\u0013 NEXT.ID = ID.LIST.\u0013t'˜\u000b\u0014t'\f[ID.COL,@VM]\u0017t'\u0014t'\u0012 ID.COL = COL2()+1\u0017t'\u0017t'\u0014t'L * A special ID, '%%ALL.IDS%%' implies that all IDS are affected or at least\u0017t'\u0014t'@ * enough to warrant simply building the index over from scratch\u0017t'\u0017t'\u0014t'\u001f UNTIL NEXT.ID EQ '%%ALL.IDS%%'\u0017t'\u0017t'\u0014t': * Read the data record, check the other file cached first\u0017t'\u0017t'\u0014t'\u0017 IF NEXT.ID NE KEY THEN\u0017t'\u0014t'\u000e KEY = NEXT.ID\u0017t'\u0014t'\u0010 READ OREC FROM \u0013t'€\f\u0014t'\r,NEXT.ID THEN\u0017t'\u0014t'\u0011 NO.OREC = FALSE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\b OREC=''\u0017t'\u0014t'\u0010 NO.OREC = TRUE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0017t'\u0014t'\u0010 IF NO.OREC THEN\u0017t'0\u0014\u0000\u0000\u0000\b \u0000\"\u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\n>,\u0010Ì\u000b\n5,\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0014t'\u0001 \t\u000e\u0000\n", + "<1,1,35,1,2>": "+\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u000b\u001a,\u0014t'\tOLD.LIST.\u0013t'ˆ\u000b\u0014t'\u0004<-1>\u0003\u0000\u0000\n5,\u0014t'\u0011 = DELETED.VALUE$\u0017t'\u0003\u0000\u0000\n>,\f»+\u0003\u0000\u0000\u0014t'\t END ELSE\u0017t'0\u0014\u0000\u0000\u0000\b \u0000\"\u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\nÓ-\u0010Ì\u000b\nÊ-\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0014t'\u0001 \t\u000e\u0000\n•,\u0014t'\u0004NEW.\u000b£,\u0014t'\u0004OLD.\u0003\u0000\u0000\nÊ-\u0013t'ˆ\u000b\u0014t'\u000f = CALCULATEX('\u0013t'H\r\u0014t'\u0007',DICT.\u0013t'€\f\u0014t'\u0011,NEXT.ID,OREC,'')\u0017t'\u0014t'\u001c CONVERT MARKS TO VMARKS IN \t\u000e\u0000\n\u0019-\u0014t'\u0004NEW.\u000b'-\u0014t'\u0004OLD.\u0003\u0000\u0000\nÊ-\u0013t'ˆ\u000b\u0017t'\t¬\n\u000b-\u0014t'' CONVERT @LOWER.CASE TO @UPPER.CASE IN \t\u000e\u0000\nq-\u0014t'\u0004NEW.\u000b-\u0014t'\u0004OLD.\u0003\u0000\u0000\nŠ-\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\nÊ-\t\u000e\u0000\u000bÇ-\u0014t'\n OLD.LIST.\u0013t'ˆ\u000b\u0014t'\u0007<-1> = \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\nÊ-\u0003\u0000\u0000\nÓ-\f[,\u0003\u0000\u0000\u0014t'\u0004 END\u0017t'0\u0014\u0000\u0000\u0000\b \u0000\"\u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\nG/\u0010Ì\u000b\n>/\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\t\u000e\u0000\n8/\u0014t'\u0001 \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\u0003 = \u0014t'\tOLD.LIST.\u0013t'ˆ\u000b\u0014t'\u0005[COL.\u0013t'ˆ\u000b\u0014t'\u0005,@FM]\u0017t'\u0014t'\u0005 COL.\u0013t'ˆ\u000b\u0014t'\u000b = COL2()+1\u0017t'\u0014t'\u0004 IF \u0014t'\u0004NEW.\u0013t'ˆ\u000b\u0014t'\u0004 NE \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\u0005 THEN\u0017t'\u0014t'\u0001 \u0013t'€\f\u0014t'\t.UPD := '\u0013t'H\r\u0014t'\u0012':@FM:NEXT.ID:@FM:\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\u0005:@FM:\u0014t'\u0004NEW.\u0013t'ˆ\u000b\u0014t'\u0004:@FM\u0017t'\u0014t'\u0001 \u0013t'€\f\u0014t'\t.CNT += 1\u0017t'\u0014t'\u0004 END\u0017t'\u0003\u0000\u0000\n>/\u0003\u0000\u0000\nG/\fë-\u0003\u0000\u0000\u0014t'\u0007 REPEAT\u0017t'\t\u000e\u0000\n$0\u0014t'! IF NEXT.ID EQ '%%ALL.IDS%%' THEN\u0017t'0\u0014\u0000\u0000\u0000\b \u0000\"\u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\n\u00160\u0010Ì\u000b\n\r0\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0014t'\u0001 \u0013t'€\f\u0014t'\t.UPD := '\u0013t'H\r\u0014t'\u0019':@FM:NEXT.ID:@FM:@FM:@FM\u0017t'\u0014t'\u0001 \u0013t'€\f\u0014t'\t.CNT += 1\u0017t'\u0003\u0000\u0000\n\u00160\f/\u0003\u0000\u0000\u0014t'\u0004 END\u0017t'\n'0\u0003\u0000\u0000\n00\u0014\u0000\u0000\u0000\u000fÌ\u000bA\u0014\u0000\t\u0014\u0000\nT0\u0010Ì\u000b\nK0\u000f¼\u000b*\nK0\u0003\u0000\u0000\nT0\f20\u0003\u0000\u00000\u0014\u0000\u0000\u0000\u000fÔ\u000bA\u0014\u0000\t\u0014\u0000\n~0\u0010Ô\u000b\nu0\u000fÜ\u000b*\nu0\u0003\u0000\u0000\n~0\f\\0\u0003\u0000\u0000\u0003\u0000\u0000\n‰0@\u000e?>?\u000e>\u0003\u0000\u0000\u0014t'. * Get list of ID's affected in the other file\u0017t'\u0017t'\nÑ0@>\fØ0\u0004\u0000\u0000?\u000e@\u000e?>8B´Ã71\u001a\u00010\n\u00001\u001a\u0001" + } + }, + "<1,1,36>": "\n\u00001G\u0001", + "<1,1,37>": "\n\u00001\u001a\u0001", + "<1,1,38>": "\n\u00001\rD1\n\u00001@\u000e?>\fB1\u001a\u00011\n\u00191\u001a\u0001", + "<1,1,39>": "\n\u00191\rÞ3\n\u00191@\u000e?>\fB1\u001a\u00012\n21\u001a\u0001", + "<1,1,40>": "\n21\rP4\n21@\u000e?>\fB1\u0003\u0000012à0\u00051\u001e1?\u000e>\u0014t'\t ID.LIST.\u0013t'˜\u000b\u0014t'\b = OREC<\u0013t' \u0000\u0014t'\u0001>\u0017t'\u0014t'\u001a IF @MV NE SI.DELETE$ THEN\u0017t'\u0014t'\u0017 NEW.ID.LIST = @RECORD<\u0013t' \u0000\u0014t'\u0001>\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0011 NEW.ID.LIST = ''\u0017t'\u0014t'\u0004 END\u0017t'\rø1\nô1@\u000e?>?\u000e>\u0017t'\u0014t'8 * Watch out for ID.LIST changing from OLD to NEW record\u0017t'\u0017t'\u0014t'\f IF ID.LIST.\u0013t'˜\u000b\u0014t'\u0014 NE NEW.ID.LIST THEN\u0017t'\u0017t'\u0014t'2 * The list has been changed, now avoid duplicates\u0017t'\u0017t'\u0014t'\u001a ID.LEN = LEN(NEW.ID.LIST)\u0017t'\u0014t'\u000b ID.COL = 1\u0017t'\u0014t'\u001c LOOP WHILE ID.COL LE ID.LEN\u0017t'\u0014t'\" NEXT.ID = NEW.ID.LIST[ID.COL,@VM]\u0017t'\u0014t'\u0012 ID.COL = COL2()+1\u0017t'\u0014t'\u001b LOCATE NEXT.ID IN ID.LIST.\u0013t'˜\u000b\u0014t'\u001b USING @VM SETTING NUM ELSE\u0017t'\u0014t'\t ID.LIST.\u0013t'˜\u000b\u0014t'\u0010<1,-1> = NEXT.ID\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0007 REPEAT\u0017t'\u0014t'\u0004 END\u0017t'@\u000e?>?\u000e>\u0014t'\t ID.LIST.\u0013t'˜\u000b\u0014t'\u0003 = #\n146\f\u0000\t\f\u0000\n!4\u0014t'\u000eFIELD(@ID,'*',\u0013t'p\b\u0014t'\u0001)\u000b.4\u0014t'\u0003@ID\u0003\u0000\u0000\n14\u000b>4\u0014t'\u0003@ID\u0003\u0000\u0000\nL4\u0017t'\u001a\u0001", + "<1,1,41>": "\nL4@\u000e?>?\u000e>G\u0001", + "<1,1,42>": "\n©5\u001a\u0001", + "<1,1,43>": "\n©5\u0014t'\u001b IF DICT.FILEVAR NE '' THEN\u0017t'\u0014t'\t ID.LIST.\u0013t'˜\u000b\u0014t'\u000f = CALCULATEX('\u0013t' \u0000\u0014t'\u001b',DICT.FILEVAR,@ID,OREC,'')\u0017t'\u0014t'\u001a IF @MV NE SI.DELETE$ THEN\u0017t'\u0014t'\u001b NEW.ID.LIST = CALCULATEX('\u0013t' \u0000\u0014t'\u001e',DICT.FILEVAR,@ID,@RECORD,'')\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0011 NEW.ID.LIST = ''\u0017t'\u0014t'\u0004 END\u0017t'\rø1\n©5\u0014t'\t END ELSE\u0017t'\u0014t'\t ID.LIST.\u0013t'˜\u000b\u0014t'\u0005 = ''\u0017t'\u0014t'\u0004 END\u0017t'@\u000e?>?\u000e>\u0014t'\u0003END\u0017t'0\u0014\u0000\u0000\u0000\u000f¼\u000bA\u0014\u0000\t\u0014\u0000\nß5\u0010¼\u000b\nÖ5\u000fÄ\u000b*\nÖ5\u0003\u0000\u0000\nß5\f½5\u0003\u0000\u0000@\u000e?>?\u000e>\u0017t'\u0014t'0* Time to actually do the record write or delete\u0017t'\u0017t'\u0014t'%INDEXES = TRUE$ ;* Set SC.XLATE.RESET\u0017t'\u0014t'\u0019IF @MV EQ SI.DELETE$ THEN\u0017t'\u0014t'4 CALL @NEXTFS(DELETE.RECORD,FS,FVAR,@ID,'','', FLAG)\u0017t'\u0014t'\bEND ELSE\u0017t'\u0014t'8 CALL @NEXTFS(WRITE.RECORD,FS,FVAR,@ID,'',@RECORD, FLAG)\u0017t'\u0014t'\u0003END\u0017t'\u0014t'\rIF FLAG ELSE \u0017t'\u0014t')* IF @STATION NE '' AND ITEM.LOCKED THEN \u0017t'\u0014t'\u0018* ERR.SAVE = @FILE.ERROR\u0017t'\u0014t'$* UNLOCK LOCK.FILEVAR, @ID ELSE NULL\u0017t'\u0014t'\u0018* @FILE.ERROR = ERR.SAVE\u0017t'\u0014t'\u000f* FLAG = FALSE$\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'\f RETURN FLAG\u0017t'\u0014t'\u0003END\u0017t'@\u000e?>?\u000e>\u0017t'\u0014t'2* Loop through all files, compute new field values\u0017t'\u0017t'\u0013´Ã´Ã\rF\f\n†8\rp\u0011\n†8\rª\f\nW8\r'\u0010\nW8\fH8\u0003\u0000\u0000\u0013t'€\f\u0014t'\t.UPD = ''\u0017t'\u0013t'€\f\u0014t'\b.CNT = 0\u0017t'\f<8\u0003\u0000\u0000\u0013´Ã´Ã@\u000e?>?\u000e>\u0014t'\u0004IF (\u0013t'€\f\u0014t'\u0012 NE '') AND (DICT.\u0013t'€\f\u0014t'\f NE '') THEN\u0017t'\u0017t'\u0014t'$ * clear the other file record cache\u0017t'\u0017t'\u0014t'\t KEY = ''\u0017t'\u0003\u0000\u0000@\u000e?>?\u000e>\t\n\u0000\nÔ<\b\"\u0000 \u0000\t\u0006\u0000\nx9\rz\"\nx9\b\u001e\u0000¶Ã\rª\f\na9\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\r¿\"\na9\r'\u0010\na9\f79\u0003\u0000\u0000\u0014t'\bEND ELSE\u0017t'\b¶Ã\u001e\u0000\u0003\u0000\u0000\nÔ<\b \u0000\"\u0000\rª\f\nD:\u0004\u0010\u0000\u0004\u0012\u0000\t\u0006\u0000\nª9\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0003\u0000\u0000\nD:\r³!\nD:\t\u0006\u0000\n;:\t\u0010\u0000\u000bõ9\u0014t'\u001c CONVERT MARKS TO VMARKS IN \u0014t'\u0004NEW.\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\n;:\t¬\n\u000b8:\u0014t'+ CONVERT @LOWER.CASE TO @UPPER.CASE IN NEW.\u0013t'ˆ\u000b\u0017t'\u0003\u0000\u0000\n;:\u0003\u0000\u0000\nD:\fƒ9\u0003\u0000\u0000\t\u0006\u0000\nÌ<\u0014t'\u0003END\u0017t'\b¶Ã\u001e\u0000\b \u0000\"\u0000\rª\f\nÉ<\u0004\u0010\u0000\u0004\u0012\u0000\u001b\u00013\nv:\u0003\u0010\u0000\u0003\u0000\u0000\nÉ<\u001b\u00016\n…:\u0003\u0012\u0000\u0003\u0000\u0000\nÉ<\r'\u0010\nÉ<\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u0014t'\u0007IF NEW.\u0013t'ˆ\u000b\u0014t'\u0004 NE \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\u0005 THEN\u0017t'\t\u0012\u0000\nø;\u0014t'+ IF (DICT.FILEVAR EQ '') OR (@MV EQ 1) THEN\u0017t'\u0014t'\u0005 NEW.\u0013t'ˆ\u000b\u0014t'\u0005 = ''\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0005 NEW.\u0013t'ˆ\u000b\u0014t'\u000f = CALCULATEX('\u0013t' \u0000\u0014t'\u001e',DICT.FILEVAR,@ID,@RECORD,'')\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\b IF NEW.\u0013t'ˆ\u000b\u0014t'\u000b NE '' THEN\u0017t'\u0014t'\u0001 \u0013t'€\f\u0014t'\t.UPD := '\u0013t'H\r\u0014t'\u0016':@FM:@ID:@FM:@FM:NEW.\u0013t'ˆ\u000b\u0014t'\u0004:@FM\u0017t'\u0003\u0000\u0000\nÉ<\t\u0010\u0000\n\n<\rØ<\n\n<\u0003\u0000\u0000\nÉ<\t\u0012\u0000\u000bq<\u0014t'\u0001 \u0013t'€\f\u0014t'\t.UPD := '\u0013t'H\r\u0014t'\u000e':@FM:@ID:@FM:\u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\t:@FM:NEW.\u0013t'ˆ\u000b\u0014t'\u0004:@FM\u0017t'\u0003\u0000\u0000\nÉ<\u0014t'\u0001 \u0013t'€\f\u0014t'\t.CNT += 1\u0017t'\t\u0010\u0000\nŸ<\u0014t'\u0004 END\u0017t'\u0003\u0000\u0000\nÉ<\t\u0012\u0000\n¶<\u0014t'\u0004 END\u0017t'\u0003\u0000\u0000\nÉ<\u0014t'\u0003END\u0017t'\fa:\u0003\u0000\u0000\u0003\u0000\u0000\nÔ<@\u000e?>?\u000e>\u0017t'\u0014t'( * Optimize relational index transaction\u0017t'\u0017t'\u0014t'\u000e TRANSFER NEW.\u0013t'ˆ\u000b\u0014t'\b TO NEWX\u0017t'\u0014t'\u000e TRANSFER OLD.\u0013t'ˆ\u000b\u0014t'\b TO OLDX\u0017t'\u0014t'\u001a GOSUB OPTIMIZE_RELATIONAL\u0017t'\u0014t'\u0016 TRANSFER NEWX TO NEW.\u0013t'ˆ\u000b\u0017t'\u0014t'\u0016 TRANSFER OLDX TO OLD.\u0013t'ˆ\u000b\u0017t'\u0014t'\b IF NEW.\u0013t'ˆ\u000b\u0014t'\b NE OLD.\u0013t'ˆ\u000b\u0014t'\u0005 THEN\u0017t'\u0003\u0000\u0000@\u000e?>?\u000e>\u0013´Ã´Ã\rF\f\nëA\rp\u0011\nëA\rª\f\n\u0017>\r'\u0010\n\u0017>\f\b>\u0003\u0000\u0000\u0014t'\u0010UPDATE.LIST = ''\u0017t'\u0014t'\u0003IF \u0013t'€\f\u0014t'\u000f.UPD NE '' THEN\u0017t'\u0014t'\u0010 UPDATE.LIST := \u0013t'€\f\u0014t'\u0004.UPD\u0017t'\u0014t'\u0003END\u0017t'\t\u001c\u0000\nÞA\rF\f\nÛA\rp\u0011\nÛA\rª\f\n¢>\r'\u0010\n¢>\f“>\u0003\u0000\u0000\u0014t'\u0003IF \u0013t'€\f\u0014t'\u000f.UPD NE '' THEN\u0017t'\u0014t'\u0016 IF LEN(@STATION) THEN\u0017t'\u0014t'\u0010 LOCK_FV = BANG.\u0013t'€\f\u0017t'\u0014t'\u000e LOCK_ID = \"0\"\u0017t'\u0014t'\u0012 LOCK_MSG = 'B521'\u0017t'\u0014t'\t PARA = 0\u0014t'\u0007:@FM:\"!\u0013t'\u001c\f\u0014t'\u0001\"\u0017t'\u0014t'\u0010 GOSUB LOCK_ITEM\u0017t'\u0014t'\u000f IF ABORT THEN \u0017t'\u0014t'K* IF @STATION NE '' AND ITEM.LOCKED THEN UNLOCK LOCK.FILEVAR, @ID ELSE NULL\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0018 READ F.TRANS FROM BANG.\u0013t'€\f\u0014t'\u0018, \"0\" ELSE F.TRANS = @FM\u0017t'\u0014t'\f F.TRANS := \u0013t'€\f\u0014t'\u0004.UPD\u0017t'\u0014t'( IF LEN(F.TRANS) GT MAX.UPDATE.SIZE THEN\u0017t'\u0014t'\u0016 NUM = F.TRANS[1, @FM]\u0017t'\u0014t'\u0017 F.TRANS[1,COL2()] = \"\"\u0017t'\u0014t'\t NUM += 1\u0017t'\u0014t'\u0001*\u0017t'\u0014t'# WRITE NUM + 1:@FM:F.TRANS TO BANG.\u0013t'€\f\u0014t'\u0018, NUM ELSE RETURN FALSE$\u0017t'\u0014t'\u0012 F.TRANS = NUM:@FM\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0017 WRITE F.TRANS TO BANG.\u0013t'€\f\u0014t'\u0018, \"0\" ELSE RETURN FALSE$\u0017t'\u0014t'# IF LEN(@STATION) THEN UNLOCK BANG.\u0013t'€\f\u0014t'\u000e,\"0\" ELSE NULL\u0017t'\u0014t'\u0003END\u0017t'\f‡>\u0003\u0000\u0000\u0003\u0000\u0000\nëA\u0013´Ã´Ã@\u000e?>?\u000e>\u0014t'\u0017* End of clearfile else\u0017t'\u0014t'\u0003END\u0017t'\u0014t'F* If updates to perform, check for trans rec and write out transaction\u0017t'\u0014t'O* If record is too big, write to the end of the linked list and clear record 0.\u0017t'\u0014t'>* Need to update record 0 no matter if split is needed or not.\u0017t'\u0014t'\u0013IF UPDATE.LIST THEN\u0017t'\u0014t'- IF BATCH.MODE% AND (UPDATE.ITEM% NE \"\") ELSE\u0017t'\u0014t'\u0016 IF LEN(@STATION) THEN\u0017t'\u0014t'\u0011 LOCK_FV = IDX.FV\u0017t'\u0014t'\u000e LOCK_ID = \"0\"\u0017t'\u0014t'\u0012 LOCK_MSG = 'B521'\u0017t'\u0014t'\t PARA = 0\u0014t'\n:@FM:FNAME\u0017t'\u0014t'\u0010 GOSUB LOCK_ITEM\u0017t'\u0014t'\u000e IF ABORT THEN\u0017t'\u0014t'K* IF @STATION NE '' AND ITEM.LOCKED THEN UNLOCK LOCK.FILEVAR, @ID ELSE NULL\u0017t'\u0014t'\u000e RETURN FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0001*\u0017t'\u0014t'* READ TRANS.REC FROM IDX.FV, \"XTRANS\" THEN\u0017t'\u0014t'\f GOSUB PATCH\u0017t'\u0014t'\u001b IF FLAG ELSE RETURN FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0001*\u0017t'\u0014t'( READ UPDATE.ITEM% FROM IDX.FV, \"0\" ELSE\u0017t'\u0014t'\u0013 UPDATE.ITEM% = @FM\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0001*\u0017t'\u0014t'\u0014 IF BATCH.MODE% THEN\u0017t'\u0014t'\u001a BATCH.MODE%<2> = TIME()+5\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u001c UPDATE.ITEM% := UPDATE.LIST\u0017t'\u0014t'A * Record over 1k bytes, will split and write to the end of list.\u0017t'\u0014t'- IF LEN(UPDATE.ITEM%) GT MAX.UPDATE.SIZE THEN\u0017t'\u0014t'\u000f RELINK = TRUE$\u0017t'\u0014t'\u001b NUM = UPDATE.ITEM%[1, @FM]\u0017t'\u0014t'\u001c UPDATE.ITEM%[1,COL2()] = \"\"\u0017t'\u0014t'\t NUM += 1\u0017t'\u0014t'\u0001*\u0017t'\u0014t'5 TRANS.REC = \"W\":@FM:NUM:@FM:NUM + 1:@FM:UPDATE.ITEM%\u0017t'\u0014t'2 CONVERT @FM:@VM:@SVM TO @VM:@SVM:@TM IN TRANS.REC\u0017t'\u0014t'' TRANS.REC := @FM:\"W\":@VM:0:@VM:NUM:@VM\u0017t'\u0014t'7 WRITE TRANS.REC TO IDX.FV, \"XTRANS\" ELSE RETURN FALSE$\u0017t'\u0014t'\u0001*\u0017t'\u0014t'A WRITE NUM + 1:@FM:UPDATE.ITEM% TO IDX.FV, NUM ELSE RETURN FALSE$\u0017t'\u0014t'\u0017 UPDATE.ITEM% = NUM:@FM\u0017t'\u0014t'\u0016 WRITE.UPDATES = TRUE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0010 RELINK = FALSE$\u0017t'\u0014t'\u0014 IF BATCH.MODE% THEN\u0017t'\u0014t'+ WRITE.UPDATES = (TIME() GT BATCH.MODE%<2>)\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0016 WRITE.UPDATES = TRUE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0016 IF WRITE.UPDATES THEN\u0017t'\u0014t'5 WRITE UPDATE.ITEM% TO IDX.FV, \"0\" ELSE RETURN FALSE$\u0017t'\u0014t'\u000f IF RELINK THEN\u0017t'\u0014t'+ DELETE IDX.FV, \"XTRANS\" ELSE RETURN FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0016 IF LEN(@STATION) THEN\u0017t'\u0014t'\u001c UNLOCK IDX.FV,\"0\" ELSE NULL\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0012 UPDATE.ITEM% = \"\"\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0003END\u0017t'\u0014t'$* Skip final processing if clearfile\u0017t'\u0014t'\u001cIF @MV EQ SI.CLEARFILE$ ELSE\u0017t'@\u000e?>?\u000e>\u0017t'\u0014t'I * Unlock all the indexes that were \"logically\" locked before getting the\u0017t'\u0014t'\r * OLD VALUES\u0017t'\u0017t'\u0014t'\u0017 IF @STATION NE '' THEN\u0017t'\rF\f\nÅK\rp\u0011\nÅK\rª\f\n9K\u001b\u00032", + "<1,1,44>": "5\n*K\u0014t'\u0011 UNLOCK FILEVAR,'\u0013t'H\r\u0014t'\u0011*INDEX' ELSE NULL\u0017t'\u0003\u0000\u0000\n9K\r'\u0010\n9K\fêJ\u0003\u0000\u0000\rF\f\n»K\rp\u0011\n»K\u0014t'\u0004 IF \u0013t'€\f\u0014t'\u000b NE '' THEN\u0017t'\rª\f\nªK\r'\u0010\nªK\u0014t'\b UNLOCK \u0013t'€\f\u0014t'\u0002,'\u0013t'H\r\u0014t'\u0011*INDEX' ELSE NULL\u0017t'\fgK\u0003\u0000\u0000\u0014t'\u0004 END\u0017t'\f?\u000e>\u0014t'\u0015* IF ITEM.LOCKED THEN\u0017t'\u0014t'#* UNLOCK LOCK.FILEVAR,@ID ELSE NULL\u0017t'\u0014t'\u0005* END\u0017t'\u0014t'\u0004 END\u0017t'@\u000e?>?\u000e>\u0003\u0006\u0000\rF\f\n=N\rp\u0011\n=N0 \u0000\u0000\u0000\rª\f\n3N\u0006 \u0000\b\u0002\u0000 \u0000\u001f\u0002\u0000\u0013ˆ\u000bˆ\u000b\u0013ˆ\u000b–\n\u001b\u00013\n'N\u001a\u00013\n'N\u001a\u0001", + "<1,1,45>": "\n'N\t\u0006\u0000\nÏL\u0004\u0006\u0000\u0017t'\u0014t'M * Handle relation types specially: Try doing the relation update immediately\u0017t'\u0003\u0000\u0000\n'N\u0014t'\u0004 IF \u0014t'\u0004NEW.\u0013t'ˆ\u000b\u0014t'\u0004 NE \u0014t'\u0004OLD.\u0013t'ˆ\u000b\u0014t'\u0005 THEN\u0017t'G\u0001", + "<1,1,46>": "\n'N\u001a\u0001", + "<1,1,47>": "\n'NG\u0001", + "<1,1,48>": "\n'N\u001a\u0001", + "<1,1,49>": "\n'N\u0014t'\u0010 IF INDEX.OPEN('\u0013t' \u0000\u0014t'\u0016',D.FV) ELSE D.FV = ''\u0017t'G\u0001", + "<1,1,50>": "\n'N\u001a\u0001", + "<1,1,51>": "\n'N\u0013º\nº\n\u0013º\n \u0000G\u0001", + "<1,1,52>": "\n'N\u001a\u0001", + "<1,1,53>": "\n'N\u0014t'\u0013 IF D.FV NE '' THEN\u0017t'\u0014t'\u0019 IF RELATER( @ID:@FM:OLD.\u0013t'ˆ\u000b\u0014t'\t:@FM:NEW.\u0013t'ˆ\u000b\u0014t'\b, D.FV, \u0013t'º\n\u0014t'\u0003, '\u0013t' \u0000\u0014t'\f', IDX.FV, '\u0013t'H\r\u0014t'\u000f', 1) THEN NULL\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u000b-N\r'\u0010\n3N\fBL\u0003\u0000\u0000\u0013´Ã´Ã@\u000e?>?\u000e>\u0014t'\u0003END\u0017t'\u0014t'\fRETURN TRUE$\u0017t'@\u000e?>?\u000e>\u0017t'\u0014t'\u0012*-----------------\u0017t'\u0014t'\nLOCK_ITEM:\u0017t'\u0014t'\u0010 LOCKED = FALSE$\u0017t'\u0014t'\u0015 SELF_LOCKED = FALSE$\u0017t'\u0014t'\u000f ABORT = FALSE$\u0017t'\u0014t'\f LOCKCNT = 1\u0017t'\u0014t'\u0010 LOCK_IMAGE = \"\"\u0017t'\u0014t'\u0005 LOOP\u0017t'\u0014t'\u0016 IF LOCKCNT = 200 THEN\u0017t'\u0014t'& MSG(LOCK_MSG, 'UB', LOCK_IMAGE, PARA)\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u001b LOCK LOCK_FV, LOCK_ID THEN\u0017t'\u0014t'\u000f LOCKED = TRUE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'\u0016 IF STATUS() EQ 1 THEN\u0017t'\u0014t'8 LOCKED = TRUE$ ;* OKAY if already locked by our station\u0017t'\u0014t'\u0014 SELF_LOCKED = TRUE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'7 DELAY(0.5) ;* Delay 1/2 sec to reduce network traffic \u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\r UNTIL LOCKED\u0017t'\u0014t'\u0015 BATCH.INDEXING(0,'')\u0017t'\u0014t'\r LOCKCNT += 1\u0017t'\u0014t'\u0016 IF ESC.TO.EXIT() THEN\u0017t'\u0014t'\t RESP = 1\u0017t'\u0014t'\u0019 MSG('B296','', RESP, '')\u0017t'\u0014t'\r IF RESP THEN\u0017t'\u0014t'\u000e ABORT = TRUE$\u0017t'\u0014t'( @FILE.ERROR = 421 ;* FS_SYS_USER_ABORT$\u0017t'\u0014t'\u001c STATUS() = 1 ;* FSPHYSICAL$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\f UNTIL ABORT\u0017t'\u0014t'\u0007 REPEAT\u0017t'\u0014t'\u0018 IF LEN(LOCK_IMAGE) THEN\u0017t'\u0014t'\u001b MSG('','DB',LOCK_IMAGE,'')\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0007 RETURN\u0017t'@\u000e?>?\u000e>\u0017t'\u0014t'\u0012*-----------------\u0017t'\u0014t'\u0006PATCH:\u0017t'\u0014t'\b PIX = 1\u0017t'\u0014t'\r FLAG = TRUE$\u0017t'\u0014t'\u0005 LOOP\u0017t'\u0014t'\u001a WHILE LEN(TRANS.REC)\u0017t'\u0014t'\u0016 PREC = TRANS.REC\u0017t'\u0014t'- CONVERT @VM:@SVM:@TM TO @FM:@VM:@SVM IN PREC\u0017t'\u0014t'\u0015 PTYPE = PREC[1, @FM]\u0017t'\u0014t'\u0015 PREC[1, COL2()] = \"\"\u0017t'\u0014t'\u0014 PKEY = PREC[1, @FM]\u0017t'\u0014t'\u0015 PREC[1, COL2()] = \"\"\u0017t'\u0014t'\u0014 IF PTYPE = \"W\" THEN\u0017t'\u0014t'. WRITE PREC TO IDX.FV, PKEY ELSE FLAG = FALSE$\u0017t'\u0014t'\t END ELSE\u0017t'\u0014t'' DELETE IDX.FV, PKEY ELSE FLAG = FALSE$\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\t PIX += 1\u0017t'\u0014t'\u000b WHILE FLAG\u0017t'\u0014t'\u0007 REPEAT\u0017t'\u0014t'\r IF FLAG THEN\u0017t'\u0014t'\" DELETE IDX.FV, \"XTRANS\" ELSE NULL\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0007 RETURN\u0017t'\u0017t'@\u000e?>?\u000e>\u0014t'\u0011*----------------\u0017t'\u0014t'\u0014OPTIMIZE_RELATIONAL:\u0017t'\u0014t'\u0013 ID.LEN = LEN(OLDX)\u0017t'\u0014t'\u000b ID.COL = 1\u0017t'\u0014t'\u0011 OLD.ID.LIST = \"\"\u0017t'\u0014t'\u001c LOOP WHILE ID.COL LE ID.LEN\u0017t'\u0014t'\u001c NEXT.ID = OLDX[ID.COL, @VM]\u0017t'\u0014t'\u0014 ID.COL = COL2() + 1\u0017t'\u0014t'2 LOCATE NEXT.ID IN NEWX USING @VM SETTING NUM ELSE\u0017t'\u0014t'\u001c OLD.ID.LIST<1,-1> = NEXT.ID\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0007 REPEAT\u0017t'\u0014t'\u0001*\u0017t'\u0014t'\u0013 ID.LEN = LEN(NEWX)\u0017t'\u0014t'\u000b ID.COL = 1\u0017t'\u0014t'\u0011 NEW.ID.LIST = \"\"\u0017t'\u0014t'\u001c LOOP WHILE ID.COL LE ID.LEN\u0017t'\u0014t'\u001c NEXT.ID = NEWX[ID.COL, @VM]\u0017t'\u0014t'\u0014 ID.COL = COL2() + 1\u0017t'\u0014t'2 LOCATE NEXT.ID IN OLDX USING @VM SETTING NUM ELSE\u0017t'\u0014t'\u001c NEW.ID.LIST<1,-1> = NEXT.ID\u0017t'\u0014t'\u0004 END\u0017t'\u0014t'\u0007 REPEAT\u0017t'\u0014t'\u0001*\u0017t'\u0014t'\u001d TRANSFER NEW.ID.LIST TO NEWX\u0017t'\u0014t'\u001d TRANSFER OLD.ID.LIST TO OLDX\u0017t'\u0014t'\u0007 RETURN\u0017t'@\u000e?>?\u000e>!¨\u000b\u0003\u0000\u0000@\u000e?>?\u000e" + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MINMAXINFO.json b/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MINMAXINFO.json new file mode 100644 index 0000000..4a301fc --- /dev/null +++ b/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MINMAXINFO.json @@ -0,0 +1,37 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "STRUCT_MINMAXINFO" + }, + "body": { + "record1": { + "<1>": "40", + "<2>": "10", + "<3>": { + "<3,1>": "5", + "<3,2>": "5", + "<3,3>": "5", + "<3,4>": "5", + "<3,5>": "5", + "<3,6>": "5", + "<3,7>": "5", + "<3,8>": "5", + "<3,9>": "5", + "<3,10>": "5" + }, + "<4>": { + "<4,1>": "4", + "<4,2>": "4", + "<4,3>": "4", + "<4,4>": "4", + "<4,5>": "4", + "<4,6>": "4", + "<4,7>": "4", + "<4,8>": "4", + "<4,9>": "4", + "<4,10>": "4" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MSWIN_COLORSCHEME.json b/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MSWIN_COLORSCHEME.json new file mode 100644 index 0000000..12abeb5 --- /dev/null +++ b/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MSWIN_COLORSCHEME.json @@ -0,0 +1,25 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "STRUCT_MSWIN_COLORSCHEME" + }, + "body": { + "record1": { + "<1>": "12", + "<2>": "3", + "<3>": { + "<3,1>": "5", + "<3,2>": "5", + "<3,3>": "5" + }, + "<4>": { + "<4,1>": "4", + "<4,2>": "4", + "<4,3>": "4" + }, + "<5>": "", + "<6>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MSWIN_DATETIMEPICKERINFO.json b/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MSWIN_DATETIMEPICKERINFO.json new file mode 100644 index 0000000..b29e431 --- /dev/null +++ b/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MSWIN_DATETIMEPICKERINFO.json @@ -0,0 +1,45 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "STRUCT_MSWIN_DATETIMEPICKERINFO" + }, + "body": { + "record1": { + "<1>": "56", + "<2>": "14", + "<3>": { + "<3,1>": "5", + "<3,2>": "4", + "<3,3>": "4", + "<3,4>": "4", + "<3,5>": "4", + "<3,6>": "5", + "<3,7>": "4", + "<3,8>": "4", + "<3,9>": "4", + "<3,10>": "4", + "<3,11>": "5", + "<3,12>": "8", + "<3,13>": "8", + "<3,14>": "8" + }, + "<4>": { + "<4,1>": "4", + "<4,2>": "4", + "<4,3>": "4", + "<4,4>": "4", + "<4,5>": "4", + "<4,6>": "4", + "<4,7>": "4", + "<4,8>": "4", + "<4,9>": "4", + "<4,10>": "4", + "<4,11>": "4", + "<4,12>": "4", + "<4,13>": "4", + "<4,14>": "4" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MSWIN_NMMOUSE.json b/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MSWIN_NMMOUSE.json new file mode 100644 index 0000000..ee8f873 --- /dev/null +++ b/SYSPROG/APPROW/SYSOBJ%003ASTRUCT_MSWIN_NMMOUSE.json @@ -0,0 +1,33 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "STRUCT_MSWIN_NMMOUSE" + }, + "body": { + "record1": { + "<1>": "32", + "<2>": "8", + "<3>": { + "<3,1>": "5", + "<3,2>": "5", + "<3,3>": "4", + "<3,4>": "5", + "<3,5>": "5", + "<3,6>": "4", + "<3,7>": "4", + "<3,8>": "4" + }, + "<4>": { + "<4,1>": "4", + "<4,2>": "4", + "<4,3>": "4", + "<4,4>": "4", + "<4,5>": "4", + "<4,6>": "4", + "<4,7>": "4", + "<4,8>": "4" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSPROCS%003ADLL_GDI32.json b/SYSPROG/APPROW/SYSPROCS%003ADLL_GDI32.json new file mode 100644 index 0000000..c519d5a --- /dev/null +++ b/SYSPROG/APPROW/SYSPROCS%003ADLL_GDI32.json @@ -0,0 +1,44 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "DLL_GDI32" + }, + "body": { + "record1": { + "<1>": "GDI32", + "<2>": "USHORT STDCALL CreateFontIndirectA(LPCHAR) AS CreateFontIndirect", + "<3>": "HANDLE STDCALL CreatePen(USHORT,USHORT,LONG) AS CreatePen", + "<4>": "USHORT STDCALL DeleteObject(USHORT) AS DeleteObject", + "<5>": "LONG STDCALL GetBkColor(USHORT) AS GetBkColor", + "<6>": "", + "<7>": "** rjc 10-25-07 replace USHOT with HANDLE ", + "<8>": "*** USHORT STDCALL GetDeviceCaps(USHORT,USHORT) AS GetDeviceCaps", + "<9>": "USHORT STDCALL GetDeviceCaps(HANDLE,USHORT) AS GetDeviceCaps", + "<10>": "", + "<11>": "USHORT STDCALL GetMapMode(USHORT) AS GetMapMode", + "<12>": "USHORT STDCALL SetMapMode(USHORT,USHORT) AS SetMapMode", + "<13>": "USHORT STDCALL GetStockObject(USHORT) AS GetStockObject", + "<14>": "LONG STDCALL GetTextExtent(USHORT,LPCHAR,USHORT) AS GetTextExtent", + "<15>": "USHORT STDCALL GetTextExtentPoint(USHORT,LPCHAR,USHORT,LPCHAR) AS GetTextExtentPoint", + "<16>": "USHORT STDCALL GetTextMetricsA(USHORT,LPCHAR) AS GetTextMetrics", + "<17>": "USHORT STDCALL Ellipse(HANDLE,INT,INT,INT,INT) AS Ellipse", + "<18>": "USHORT STDCALL LineTo(HANDLE,INT,INT) AS LineTo", + "<19>": "USHORT STDCALL MoveToEx(HANDLE,INT,INT,HANDLE) AS MoveTo", + "<20>": "USHORT STDCALL Rectangle(USHORT,USHORT,USHORT,USHORT,USHORT) AS Rectangle", + "<21>": "HANDLE STDCALL SelectObject(HANDLE,HANDLE) AS SelectObject", + "<22>": "LONG STDCALL SetBkColor(HANDLE,LONG) AS SetBkColor", + "<23>": "LONG STDCALL SetTextColor(HANDLE,LONG) AS SetTextColor", + "<24>": "USHORT STDCALL TextOutA(HANDLE,SHORT,SHORT,LPCHAR,SHORT) AS TextOut", + "<25>": "USHORT STDCALL GdiGetBatchLimit(USHORT) AS GdiGetBatchLimit32", + "<26>": "USHORT STDCALL GdiFlush(USHORT) AS GdiFlush32", + "<27>": "", + "<28>": "* Added by PRINTSCREEN 09:36:30 25 OCT 2007", + "<29>": "LONG STDCALL CreateDCA(LPASTR, LPASTR, LPASTR, LPASTR) as CreateDC", + "<30>": "LONG STDCALL CreateCompatibleDC(HANDLE)", + "<31>": "LONG STDCALL CreateCompatibleBitmap(LONG, LONG, LONG)", + "<32>": "LONG STDCALL BitBlt(HANDLE, LONG,LONG, LONG, LONG, LONG, LONG, LONG, LONG)", + "<33>": "LONG STDCALL DeleteDC(LONG)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSPROCS%003ADLL_KERNEL32_SRP.json b/SYSPROG/APPROW/SYSPROCS%003ADLL_KERNEL32_SRP.json new file mode 100644 index 0000000..20ce300 --- /dev/null +++ b/SYSPROG/APPROW/SYSPROCS%003ADLL_KERNEL32_SRP.json @@ -0,0 +1,18 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "DLL_KERNEL32_SRP" + }, + "body": { + "record1": { + "<1>": "KERNEL32", + "<2>": "INT STDCALL CopyFileA(LONG, LONG, INT) as SRPWinAPI_CopyFile", + "<3>": "VOID STDCALL Sleep(ULONG) as SRPWinAPI_Sleep", + "<4>": "ULONG STDCALL GetProcAddress(HANDLE, LONG) as SRPWinAPI_GetProcAddress", + "<5>": "VOID STDCALL GetSystemTimePreciseAsFileTime(LONG) as SRPWinAPI_GetSystemTimePreciseAsFileTime", + "<6>": "BOOL STDCALL QueryPerformanceCounter(LONG) as SRPWinAPI_QueryPerformanceCounter", + "<7>": "BOOL STDCALL TerminateProcess(HANDLE, UINT) as SRPWinAPI_TerminateProcess" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSPROCS%003ADLL_MSWIN_KERNEL32.json b/SYSPROG/APPROW/SYSPROCS%003ADLL_MSWIN_KERNEL32.json new file mode 100644 index 0000000..470af31 --- /dev/null +++ b/SYSPROG/APPROW/SYSPROCS%003ADLL_MSWIN_KERNEL32.json @@ -0,0 +1,123 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "DLL_MSWIN_KERNEL32" + }, + "body": { + "record1": { + "<1>": "KERNEL32", + "<2>": "* [NS] msWin_,", + "<3>": "* Author : Wile C Coyote - Super Genius", + "<4>": "* Date : 10 Oct 2012", + "<5>": "* Purpose : Revelation DLL prototype record for KERNEL32.DLL", + "<6>": "*", + "<7>": "* Comments", + "<8>": "* ========", + "<9>": "* ", + "<10>": "* ********************************************************************************", + "<11>": "* This DLLPROTOTYPE entity is likely to be updated by future OpenInsight upgrades. ", + "<12>": "* Please create your own DLLPROTOTYPE entities if you wish to add and amend ", + "<13>": "* KERNEL32 DLL prototype functions for your own application.", + "<14>": "* ********************************************************************************", + "<15>": "* ", + "<16>": "* Amended Date Reason", + "<17>": "* ======= ==== ======", + "<18>": "* Mr C 07 May 23 Added GetTimeZoneInformation", + "<19>": "* Mr C 10 May 23 Added GetVersionExW", + "<20>": "* Mr C 24 Apr 23 Added GetCurrentThreadId, TerminateProcess", + "<21>": "* Mr C 22 Apr 22 Added GetLongPathName", + "<22>": "* Mr C 08 Apr 22 Added GlobalMemoryStatusEx function", + "<23>": "* Mr C 13 Jan 22 Added GetDateFormatW and GetTimeFormatW", + "<24>": "* Mr C 05 Oct 21 Added GetModuleHandleW", + "<25>": "* Mr C 29 Jun 19 Added GetTickCount64", + "<26>": "* Mr C 09 Nov 18 Added FindFirstFile and related functions", + "<27>": "* Mr C 29 May 18 Added GetTempFileName", + "<28>": "* Mr C 24 Apr 18 Added GetWindowsDirectory", + "<29>": "* Mr C 16 Feb 17 Added GetVolumeInformationW, ErrorMode functions", + "<30>": "* GetProcAddress", + "<31>": "* Mr C 15 Feb 17 Added GetDriveTypeW", + "<32>": "* Mr C 09 Feb 17 Added GetLocaleInfo, GetLocaleInfoEx", + "<33>": "* Mr C 15 Sep 16 Added SetCurrentDirectory", + "<34>": "* Mr C 03 Jul 16 Added GetCommandLine", + "<35>": "* Mr C 30 Mar 16 Added Sleep", + "<36>": "* Mr C 30 Mar 16 Added GetComputerName, GetTempPath", + "<37>": "* Mr C 07 Jan 15 Added GetCurrentProcessID", + "<38>": "* Mr C 10 Dec 15 Added GetLogicalDrives", + "<39>": "* Mr C 05 Apr 14 Added CreateProcess, OpenProcess, CreatePipe, ReadFile,", + "<40>": "* CloseHandle, GetStdHandle, SetHandleInformation, ", + "<41>": "* WaitForSingleObject", + "<42>": "HANDLE STDCALL BeginUpdateResourceW(LPWSTR,BOOL) as msWin_BeginUpdateResource", + "<43>": "BOOL STDCALL CloseHandle(HANDLE) as msWin_CloseHandle", + "<44>": "INT STDCALL CopyFileW(LPWSTR,LPWSTR,INT) as msWin_CopyFile", + "<45>": "INT STDCALL CreateDirectoryW(LPWSTR,LPVOID) as msWin_CreateDirectory", + "<46>": "BOOL STDCALL CreatePipe(PHANDLE,PHANDLE,LPVOID,DWORD) as msWin_CreatePipe", + "<47>": "BOOL STDCALL CreateProcessW(LPCWSTR,LPWSTR,LPVOID,LPVOID,BOOL,DWORD,LPVOID,LPVOID,LPBINARY,LPBINARY) as msWin_CreateProcess", + "<48>": "BOOL STDCALL CreateProcessW(LPVOID,LPVOID,LPVOID,LPVOID,BOOL,DWORD,LPVOID,LPVOID,LPBINARY,LPBINARY) as msWin_CreateProcessByPtr", + "<49>": "BOOL STDCALL EndUpdateResource(HANDLE,BOOL) as msWin_EndUpdateResource", + "<50>": "LONG STDCALL FindClose(HANDLE) as msWin_FindClose", + "<51>": "HANDLE STDCALL FindFirstFileW(LPWSTR,LPBINARY) as msWin_FindFirstFile", + "<52>": "HANDLE STDCALL FindFirstVolumeW(LPWSTR,UINT) as msWin_FindFirstVolume", + "<53>": "HANDLE STDCALL FindNextFileW(HANDLE,LPBINARY) as msWin_FindNextFile", + "<54>": "INT STDCALL FindNextVolumeW(HANDLE,LPWSTR,UINT) as msWin_FindNextVolume", + "<55>": "HRSRC STDCALL FindResourceW(HMODULE,LPWSTR,LPWSTR) as msWin_FindResource", + "<56>": "HRSRC STDCALL FindResourceW(HMODULE,LPVOID,LPVOID) as msWin_FindResourceByPtr", + "<57>": "INT STDCALL FindVolumeClose(HANDLE) as msWin_FindVolumeClose", + "<58>": "INT STDCALL FlushFileBuffers(HANDLE) as msWin_FlushFileBuffers", + "<59>": "ULONG STDCALL FormatMessageW(ULONG,LPVOID,ULONG,ULONG,LPWSTR,ULONG,LONG) as msWin_FormatMessage", + "<60>": "INT STDCALL FreeEnvironmentStringsA(VOID) as msWin_FreeEnvironmentStrings", + "<61>": "BOOL STDCALL FreeLibrary(HMODULE) as msWin_FreeLibrary", + "<62>": "LPWSTR STDCALL GetCommandLineW(VOID) as msWin_GetCommandLine", + "<63>": "BOOL STDCALL GetComputerNameW(LPWSTR,LPDWORD) as msWin_GetComputerName", + "<64>": "DWORD STDCALL GetCurrentProcessId(VOID) as msWin_GetCurrentProcessId", + "<65>": "DWORD STDCALL GetCurrentThreadId(VOID) as msWin_GetCurrentThreadId", + "<66>": "INT STDCALL GetDateFormatW(LCID,DWORD,LPCVOID,LPCVOID,LPVOID,INT) as msWin_GetDateFormat", + "<67>": "UINT STDCALL GetDriveTypeW(LPWSTR) as msWin_GetDriveType", + "<68>": "LPVOID STDCALL GetEnvironmentStringsA(VOID) as msWin_GetEnvironmentStrings", + "<69>": "ULONG STDCALL GetEnvironmentVariableW(LPWSTR,LPWSTR,ULONG) as msWin_GetEnvironmentVariable", + "<70>": "UINT STDCALL GetErrorMode(VOID) as msWin_GetErrorMode", + "<71>": "BOOL STDCALL GetExitCodeProcess(HANDLE,LPDWORD) as msWin_GetExitCodeProcess", + "<72>": "ULONG STDCALL GetFileAttributesW(LPWSTR) as msWin_GetFileAttributes", + "<73>": "ULONG STDCALL GetLastError(VOID) as msWin_GetLastError", + "<74>": "INT STDCALL GetLocaleInfoEx(LPVOID,DWORD,LPVOID,INT) as msWin_GetLocaleInfoEx", + "<75>": "INT STDCALL GetLocaleInfoW(DWORD,DWORD,LPVOID,INT) as msWin_GetLocaleInfo", + "<76>": "DWORD STDCALL GetLogicalDrives(VOID) as msWin_GetLogicalDrives", + "<77>": "DWORD STDCALL GetLongPathNameW(LPCWSTR,LPWSTR,DWORD) as msWin_GetLongPathName", + "<78>": "HMODULE STDCALL GetModuleHandleW(LPVOID) as msWin_GetModuleHandleByPtr", + "<79>": "DWORD STDCALL GetPrivateProfileStringW(LPWSTR,LPWSTR,LPWSTR,LPWSTR,DWORD,LPWSTR) as msWin_GetPrivateProfileString", + "<80>": "DWORD STDCALL GetPrivateProfileStringW(LPWSTR,LPVOID,LPWSTR,LPWSTR,DWORD,LPWSTR) as msWin_GetPrivateProfileSection", + "<81>": "LPVOID STDCALL GetProcAddress(HMODULE,LPASTR) as msWin_GetProcAddress", + "<82>": "DWORD STDCALL GetProfileStringW(LPWSTR,LPWSTR,LPWSTR,LPWSTR,DWORD) as msWin_GetProfileString", + "<83>": "HANDLE STDCALL GetStdHandle(DWORD) as msWin_GetStdHandle", + "<84>": "UINT STDCALL GetTempFileNameW(LPWSTR,LPWSTR,UINT,LPWSTR) as msWin_GetTempFileName", + "<85>": "DWORD STDCALL GetTempPathW(DWORD,LPWSTR) as msWin_GetTempPath", + "<86>": "DWORD STDCALL GetThreadErrorMode(VOID) as msWin_GetThreadErrorMode", + "<87>": "DWORD STDCALL GetTickCount(VOID) as msWin_GetTickCount", + "<88>": "INT64 STDCALL GetTickCount64(VOID) as msWin_GetTickCount64", + "<89>": "INT STDCALL GetTimeFormatW(LCID,DWORD,LPCVOID,LPCVOID,LPVOID,INT) as msWin_GetTimeFormat", + "<90>": "DWORD STDCALL GetTimeZoneInformation(LPBINARY) as msWin_GetTimeZoneInformation", + "<91>": "BOOL STDCALL GetVersionExW(LPBINARY) as msWin_GetVersionEx", + "<92>": "BOOL STDCALL GetVolumeInformationW(LPVOID,LPWSTR,DWORD,LPDWORD,LPDWORD,LPDWORD,LPWSTR,DWORD) as msWin_GetVolumeInformation", + "<93>": "UINT STDCALL GetWindowsDirectoryW(LPWSTR,UINT) as msWin_GetWindowsDirectory", + "<94>": "BOOL STDCALL GlobalMemoryStatusEx(LPBINARY) as msWin_GlobalMemoryStatusEx", + "<95>": "HMODULE STDCALL LoadLibraryW(LPWSTR) as msWin_LoadLibrary", + "<96>": "HGLOBAL STDCALL LoadResource(HMODULE,HRSRC) as msWin_LoadResource", + "<97>": "LPVOID STDCALL LockResource(HGLOBAL) as msWin_LockResource", + "<98>": "HANDLE STDCALL OpenProcess(DWORD,BOOL,DWORD) as msWin_OpenProcess", + "<99>": "BOOL STDCALL QueryPerformanceCounter(LPBINARY) as msWin_QueryPerformanceCounter", + "<100>": "BOOL STDCALL ReadFile(HANDLE,LPBINARY,DWORD,LPDWORD,LPVOID) as msWin_ReadFile", + "<101>": "BOOL STDCALL SetCurrentDirectoryW(LPWSTR) as msWin_SetCurrentDirectory", + "<102>": "UINT STDCALL SetErrorMode(UINT) as msWin_SetErrorMode", + "<103>": "BOOL STDCALL SetHandleInformation(HANDLE,DWORD,DWORD) as msWin_SetHandleInformation", + "<104>": "DWORD STDCALL SetThreadErrorMode(DWORD) as msWin_SetThreadErrorMode", + "<105>": "VOID STDCALL Sleep(DWORD) as msWin_Sleep", + "<106>": "BOOL STDCALL TerminateProcess(HANDLE,UINT) as msWin_TerminateProcess", + "<107>": "BOOL STDCALL UpdateResourceW(HANDLE,LPWSTR,LPWSTR,WORD,LPVOID,DWORD) as msWin_UpdateResource", + "<108>": "BOOL STDCALL UpdateResourceW(HANDLE,LPVOID,LPVOID,WORD,LPVOID,DWORD) as msWin_UpdateResourceByPtr", + "<109>": "DWORD STDCALL WaitForSingleObject(HANDLE,DWORD) as msWin_WaitForSingleObject", + "<110>": "UINT STDCALL WinExec(LPASTR,UINT) as msWin_WinExec", + "<111>": "BOOL STDCALL WritePrivateProfileStringW(LPWSTR,LPWSTR,LPWSTR,LPWSTR) as msWin_WritePrivateProfileString", + "<112>": "BOOL STDCALL WriteProfileStringW(LPWSTR,LPWSTR,LPWSTR) as msWin_WriteProfileString" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSPROCS%003ADLL_MSWIN_SHLWAPI.json b/SYSPROG/APPROW/SYSPROCS%003ADLL_MSWIN_SHLWAPI.json new file mode 100644 index 0000000..e50dcf3 --- /dev/null +++ b/SYSPROG/APPROW/SYSPROCS%003ADLL_MSWIN_SHLWAPI.json @@ -0,0 +1,34 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "DLL_MSWIN_SHLWAPI" + }, + "body": { + "record1": { + "<1>": "SHLWAPI", + "<2>": "* [NS] msWin_,", + "<3>": "* File : SYSPROCS - DLL_MSWIN_SHLWAPI", + "<4>": "* Author : Wile C Coyote - Super Genius", + "<5>": "* Date : 10 Oct 2012", + "<6>": "* Purpose : Revelation DLL prototype record for SHLWAPI.DLL", + "<7>": "*", + "<8>": "* Comments", + "<9>": "* ========", + "<10>": "* ", + "<11>": "* Amended Date Reason", + "<12>": "* ======= ==== ======", + "<13>": "*", + "<14>": "LPWSTR STDCALL PathCombineW(LPWSTR,LPWSTR,LPWSTR) as msWin_PathCombine", + "<15>": "INT STDCALL PathIsDirectoryW(LPWSTR) as msWin_PathIsDirectory", + "<16>": "INT STDCALL PathIsNetworkPathW(LPWSTR) as msWin_PathIsNetworkPath", + "<17>": "INT STDCALL PathIsUNCW(LPWSTR) as msWin_PathIsUNC", + "<18>": "INT STDCALL PathIsUNCServerW(LPWSTR) as msWin_PathIsUNCServer", + "<19>": "INT STDCALL PathIsUNCServerShareW(LPWSTR) as msWin_PathIsUNCServerShare", + "<20>": "INT STDCALL PathRelativePathToW(LPWSTR,LPWSTR,ULONG,LPWSTR,ULONG) as msWin_PathRelativePathTo", + "<21>": "LPWSTR STDCALL PathSkipRootW(LPWSTR) as msWin_PathSkipRoot", + "<22>": "INT STDCALL PathStripToRootW(LPWSTR) as msWin_PathStripToRoot", + "<23>": "HANDLE STDCALL SHAutoComplete(HANDLE,ULONG) as msWin_SHAutoComplete" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSPROCS%003ADLL_MSWIN_WS2_32.json b/SYSPROG/APPROW/SYSPROCS%003ADLL_MSWIN_WS2_32.json new file mode 100644 index 0000000..0b8ccc5 --- /dev/null +++ b/SYSPROG/APPROW/SYSPROCS%003ADLL_MSWIN_WS2_32.json @@ -0,0 +1,56 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "DLL_MSWIN_WS2_32" + }, + "body": { + "record1": { + "<1>": "WS2_32", + "<2>": "* [NS] msWin_,", + "<3>": "* Author : Wile C Coyote - Super Genius", + "<4>": "* Date : 10 Oct 2012", + "<5>": "* Purpose : Revelation DLL prototype record for WS2_32.DLL", + "<6>": "*", + "<7>": "* Comments", + "<8>": "* ========", + "<9>": "* ", + "<10>": "* ********************************************************************************", + "<11>": "* This DLLPROTOTYPE entity is likely to be updated by future OpenInsight upgrades. ", + "<12>": "* Please create your own DLLPROTOTYPE entities if you wish to add and amend ", + "<13>": "* WS2_32 DLL prototype functions for your own application.", + "<14>": "* ********************************************************************************", + "<15>": "* ", + "<16>": "* Amended Date Reason", + "<17>": "* ======= ==== ======", + "<18>": "* Mr C 10 May 23 Added msWin_GetHostName", + "<19>": "* Mr C 24 Apr 23 Added msWin_GetHostByAddr, msWin_Inet_Addr, msWin_GetHostName", + "<20>": "INT STDCALL WSACleanup(VOID) as msWin_WSACleanup", + "<21>": "INT STDCALL WSACleanup(VOID)", + "<22>": "INT STDCALL WSAGetLastError(VOID) as msWin_WSAGetLastError", + "<23>": "INT STDCALL WSAGetLastError(VOID)", + "<24>": "INT STDCALL WSAStartup(WORD,LPBINARY) as msWin_WSAStartup", + "<25>": "INT STDCALL WSAStartup(WORD,LPBINARY)", + "<26>": "LPVOID STDCALL accept(HANDLE,LPVOID,INT)", + "<27>": "INT STDCALL bind(HANDLE,LPVOID,INT)", + "<28>": "INT STDCALL closesocket(HANDLE)", + "<29>": "INT STDCALL connect(HANDLE,LPBINARY,INT)", + "<30>": "LPVOID STDCALL gethostbyaddr(LPVOID,INT,INT) as msWin_GetHostByAddr", + "<31>": "LPVOID STDCALL gethostbyname(LPCHAR)", + "<32>": "LPVOID STDCALL gethostbyname(LPASTR) as msWin_GetHostByName", + "<33>": "INT STDCALL gethostname(LPCHAR,INT)", + "<34>": "INT STDCALL gethostname(LPASTR,INT) as msWin_GetHostName", + "<35>": "INT STDCALL getsockname(HANDLE,LPVOID,INT)", + "<36>": "INT STDCALL getsockopt(HANDLE,INT,INT,LPCHAR,INT)", + "<37>": "USHORT STDCALL htons(USHORT)", + "<38>": "ULONG STDCALL inet_addr(LPASTR) as msWin_Inet_Addr", + "<39>": "INT STDCALL ioctlsocket(HANDLE,LONG,ULONG)", + "<40>": "INT STDCALL listen(HANDLE,INT)", + "<41>": "INT STDCALL recv(HANDLE,LPCHAR,INT,INT)", + "<42>": "INT STDCALL send(HANDLE,LPCHAR,INT,INT)", + "<43>": "INT STDCALL send(HANDLE,LPCHAR,INT,INT) as socketsend", + "<44>": "INT STDCALL setsockopt(HANDLE,INT,INT,LPCHAR,INT)", + "<45>": "HANDLE STDCALL socket(INT,INT,INT)" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSPROCS%003ADLL_SRP_UTILITIES.json b/SYSPROG/APPROW/SYSPROCS%003ADLL_SRP_UTILITIES.json new file mode 100644 index 0000000..f0ea2b4 --- /dev/null +++ b/SYSPROG/APPROW/SYSPROCS%003ADLL_SRP_UTILITIES.json @@ -0,0 +1,232 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "DLL_SRP_UTILITIES" + }, + "body": { + "record1": { + "<1>": "SRPUTILITIES", + "<2>": "", + "<3>": "LPSTR STDCALL SRPGetErrorSize() AS SRPUtilitiesAPI_GetErrorSize", + "<4>": "VOID STDCALL SRPGetError(LPBINARY, LPSTR) AS SRPUtilitiesAPI_GetError", + "<5>": "LPSTR STDCALL SRPGetOutputSize() AS SRPUtilitiesAPI_GetOutputSize", + "<6>": "VOID STDCALL SRPGetOutput(LPBINARY, LPSTR) AS SRPUtilitiesAPI_GetOutput", + "<7>": "LPSTR STDCALL SRPGetWideOutputSize() AS SRPUtilitiesAPI_GetWideOutputSize", + "<8>": "VOID STDCALL SRPGetWideOutput(LPBINARY, LPSTR) AS SRPUtilitiesAPI_GetWideOutput", + "<9>": "", + "<10>": "VOID STDCALL SRPConvertToInt16(LPSTR, LPBINARY, LONG) AS SRPUtilitiesAPI_ConvertToInt16", + "<11>": "VOID STDCALL SRPConvertToInt32(LPSTR, LPBINARY, LONG) AS SRPUtilitiesAPI_ConvertToInt32", + "<12>": "VOID STDCALL SRPConvertToInt64(LPSTR, LPBINARY, LONG) AS SRPUtilitiesAPI_ConvertToInt64", + "<13>": "VOID STDCALL SRPConvertToFloat(LPSTR, LPBINARY) AS SRPUtilitiesAPI_ConvertToFloat", + "<14>": "VOID STDCALL SRPConvertToDouble(LPSTR, LPBINARY) AS SRPUtilitiesAPI_ConvertToDouble", + "<15>": "VOID STDCALL SRPConvertFromInt16(LPBINARY, LPSTR) AS SRPUtilitiesAPI_ConvertFromInt16", + "<16>": "VOID STDCALL SRPConvertFromInt32(LPBINARY, LPSTR) AS SRPUtilitiesAPI_ConvertFromInt32", + "<17>": "VOID STDCALL SRPConvertFromInt64(LPBINARY, LPSTR, LONG) AS SRPUtilitiesAPI_ConvertFromInt64", + "<18>": "VOID STDCALL SRPConvertFromFloat(LPBINARY, LPSTR) AS SRPUtilitiesAPI_ConvertFromFloat", + "<19>": "VOID STDCALL SRPConvertFromDouble(LPBINARY, LPSTR) AS SRPUtilitiesAPI_ConvertFromDouble", + "<20>": "VOID STDCALL SRPCopyMemory(LPSTR, LPSTR, LPSTR) AS SRP_Copy_Memory", + "<21>": "ULONG STDCALL SRPGetIdleTime() AS SRPUtilitiesAPI_GetIdleTime", + "<22>": "LPSTR STDCALL SRPGetSystemTime() AS SRP_Get_SystemTime", + "<23>": "LPWSTR STDCALL SRPRunCommand(LPWSTR, LPSTR, LPWSTR, ULONG) AS SRPUtilitiesAPI_RunCommand", + "<24>": "LPSTR STDCALL SRPGetFonts() AS SRPUtilitiesAPI_GetFonts", + "<25>": "LPSTR STDCALL SRPGetWindowRect(HANDLE) AS SRPUtilitiesAPI_SRPGetWindowRect", + "<26>": "INT STDCALL SRPCompareString(LPWSTR, LPWSTR, INT) AS SRPUtilitiesAPI_CompareString", + "<27>": "LPSTR STDCALL SRPRtfToText(LPBINARY, LONG) AS SRPUtilitiesAPI_RtfToText", + "<28>": "INT STDCALL SRPIs64Bit() AS SRP_Is64Bit", + "<29>": "", + "<30>": "VOID STDCALL SRPSaveScreenshot(HANDLE, LPWSTR, LONG) AS SRPUtilitiesAPI_SaveScreenshot", + "<31>": "", + "<32>": "INT STDCALL SRPStringGetWidth(LPBINARY, INT, LPSTR) AS SRPUtilitiesAPI_StringGetWidth", + "<33>": "INT STDCALL SRPStringGetHeight(LPBINARY, INT, LPSTR, INT) AS SRPUtilitiesAPI_StringGetHeight", + "<34>": "VOID STDCALL SRPTaskbarSetGroupTitle(LPWSTR) AS SRPUtilitiesAPI_TaskbarSetGroupTitle", + "<35>": "LPSTR STDCALL SRPProcessMemoryInfo() AS SRP_Get_MemoryInfo", + "<36>": "", + "<37>": "LPSTR STDCALL SRPCleanArrayA(LPBINARY, LPSTR, CHAR, LONG, LONG, LONG) AS SRPUtilitiesAPI_CleanArrayA", + "<38>": "LPSTR STDCALL SRPCleanArrayW(LPBINARY, LPSTR, LPBINARY, LONG, LONG, LONG) AS SRPUtilitiesAPI_CleanArrayW", + "<39>": "LPSTR STDCALL SRPJoinArraysA(LPBINARY, LPSTR, LPBINARY, LPSTR, CHAR, LPSTR, LONG) AS SRPUtilitiesAPI_JoinArraysA", + "<40>": "LPSTR STDCALL SRPJoinArraysW(LPBINARY, LPSTR, LPBINARY, LPSTR, LPBINARY, LPSTR, LONG) AS SRPUtilitiesAPI_JoinArraysW", + "<41>": "LPSTR STDCALL SRPReorderArray(LPBINARY, LPSTR, CHAR, LPSTR) AS SRPUtilitiesAPI_ReorderArray", + "<42>": "LPSTR STDCALL SRPRotateArray(LPBINARY, LPSTR, CHAR, CHAR) AS SRPUtilitiesAPI_RotateArray", + "<43>": "LPSTR STDCALL SRPSortArrayA(LPBINARY, LPSTR, CHAR, LONG, LONG, LONG) AS SRPUtilitiesAPI_SortArrayA", + "<44>": "LPSTR STDCALL SRPSortArrayW(LPBINARY, LPSTR, LPBINARY, LONG, LONG, LONG) AS SRPUtilitiesAPI_SortArrayW", + "<45>": "LPSTR STDCALL SRPSortTableA(LPBINARY, LPSTR, LONG, CHAR, CHAR, LPSTR, LONG) AS SRPUtilitiesAPI_SortTableA", + "<46>": "LPSTR STDCALL SRPSortTableW(LPBINARY, LPSTR, LONG, LPBINARY, LPBINARY, LPSTR, LONG) AS SRPUtilitiesAPI_SortTableW", + "<47>": "", + "<48>": "LONG STDCALL SRPComOutputIsArray() AS SRPUtilitiesAPI_ComOutputIsArray", + "<49>": "LPSTR STDCALL SRPComOutputSize() AS SRPUtilitiesAPI_ComOutputSize", + "<50>": "VOID STDCALL SRPComOutputGet(LPBINARY, LPSTR) AS SRPUtilitiesAPI_ComOutputGet", + "<51>": "LONG STDCALL SRPComHasError() AS SRPUtilitiesAPI_ComHasError", + "<52>": "VOID STDCALL SRPComClearParams() AS SRPUtilitiesAPI_ComClearParams", + "<53>": "VOID STDCALL SRPComAddParam(LPBINARY, LPSTR) AS SRPUtilitiesAPI_ComAddParam", + "<54>": "VOID STDCALL SRPComAddParamRef(HANDLE) AS SRPUtilitiesAPI_ComAddParamRef", + "<55>": "VOID STDCALL SRPComAddParamOmitted() AS SRPUtilitiesAPI_ComAddParamOmitted", + "<56>": "LPSTR STDCALL SRPComParamSize(LPSTR) AS SRPUtilitiesAPI_ComParamSize", + "<57>": "VOID STDCALL SRPComParamGet(LPSTR, LPBINARY, LPSTR) AS SRPUtilitiesAPI_ComParamGet", + "<58>": "INT STDCALL SRPComCreate(LPHANDLE, LPWSTR) AS SRPUtilitiesAPI_ComCreate", + "<59>": "INT STDCALL SRPComGetAxObject(LPHANDLE, HANDLE) AS SRPUtilitiesAPI_ComGetAxObject", + "<60>": "INT STDCALL SRPComGetDispatchObject(LPHANDLE, LPSTR) AS SRPUtilitiesAPI_ComGetDispatchObject", + "<61>": "INT STDCALL SRPComRelease(HANDLE) AS SRPUtilitiesAPI_ComRelease", + "<62>": "INT STDCALL SRPComGet(HANDLE, LPWSTR) AS SRPUtilitiesAPI_ComGet", + "<63>": "INT STDCALL SRPComSet(HANDLE, LPWSTR) AS SRPUtilitiesAPI_ComSet", + "<64>": "INT STDCALL SRPComCall(HANDLE, LPWSTR) AS SRPUtilitiesAPI_ComCall", + "<65>": "LPSTR STDCALL SRPComGetHandles() AS SRPUtilitiesAPI_ComGetHandles", + "<66>": "", + "<67>": "LPSTR STDCALL SRPCryptoOutputSize() AS SRPUtilitiesAPI_CryptoOutputSize", + "<68>": "VOID STDCALL SRPCryptoOutputGet(LPBINARY, LPSTR) AS SRPUtilitiesAPI_CryptoOutputGet", + "<69>": "VOID STDCALL SRPCryptoDecodeHex(LPSTR, LPSTR) AS SRPUtilitiesAPI_CryptoDecodeHex", + "<70>": "VOID STDCALL SRPCryptoDecodeBase32(LPSTR, LPSTR, CHAR) AS SRPUtilitiesAPI_CryptoDecodeBase32", + "<71>": "VOID STDCALL SRPCryptoDecodeBase64(LPSTR, LPSTR) AS SRPUtilitiesAPI_CryptoDecodeBase64", + "<72>": "VOID STDCALL SRPCryptoDecodeBase64URL(LPSTR) AS SRPUtilitiesAPI_CryptoDecodeBase64URL", + "<73>": "VOID STDCALL SRPCryptoDecodeUrl(LPBINARY, LONG, LPSTR) AS SRPUtilitiesAPI_CryptoDecodeUrl", + "<74>": "VOID STDCALL SRPCryptoEncodeHex(LPBINARY, LPSTR, LPSTR) AS SRPUtilitiesAPI_CryptoEncodeHex", + "<75>": "VOID STDCALL SRPCryptoEncodeBase32(LPBINARY, LPSTR, LPSTR, CHAR, LPSTR) AS SRPUtilitiesAPI_CryptoEncodeBase32", + "<76>": "VOID STDCALL SRPCryptoEncodeBase64(LPBINARY, LPSTR, LPSTR, LONG) AS SRPUtilitiesAPI_CryptoEncodeBase64", + "<77>": "VOID STDCALL SRPCryptoEncodeBase64URL(LPBINARY, LPSTR, LONG) AS SRPUtilitiesAPI_CryptoEncodeBase64URL", + "<78>": "VOID STDCALL SRPCryptoEncodeUrl(LPBINARY, LONG, LPSTR, LPSTR) AS SRPUtilitiesAPI_CryptoEncodeUrl", + "<79>": "VOID STDCALL SRPCryptoHash(LPSTR, LPBINARY, LPSTR) AS SRPUtilitiesAPI_CryptoHash", + "<80>": "", + "<81>": "VOID STDCALL SRPDynamicArrayClear(HANDLE) AS SRPUtilitiesAPI_DynamicArrayClear", + "<82>": "HANDLE STDCALL SRPDynamicArrayCreate(LPBINARY, LPSTR) AS SRPUtilitiesAPI_DynamicArrayCreate", + "<83>": "VOID STDCALL SRPDynamicArrayRelease(HANDLE) AS SRPUtilitiesAPI_DynamicArrayRelease", + "<84>": "LPSTR STDCALL SRPDynamicArrayPrepareOutput(HANDLE) AS SRPUtilitiesAPI_DynamicArrayPrepareOutput", + "<85>": "LPSTR STDCALL SRPDynamicArrayExtract(HANDLE, LPSTR, LPSTR, LPSTR) AS SRPUtilitiesAPI_DynamicArrayExtract", + "<86>": "VOID STDCALL SRPDynamicArrayInsert(HANDLE, LPSTR, LPSTR, LPSTR, LPBINARY, LPSTR) AS SRPUtilitiesAPI_DynamicArrayInsert", + "<87>": "VOID STDCALL SRPDynamicArrayInsertFromList(HANDLE, LPSTR, LPSTR, LPSTR, HANDLE) AS SRPUtilitiesAPI_DynamicArrayInsertFromList", + "<88>": "VOID STDCALL SRPDynamicArrayReplace(HANDLE, LPSTR, LPSTR, LPSTR, LPBINARY, LPSTR) AS SRPUtilitiesAPI_DynamicArrayReplace", + "<89>": "VOID STDCALL SRPDynamicArrayReplaceWithList(HANDLE, LPSTR, LPSTR, LPSTR, HANDLE) AS SRPUtilitiesAPI_DynamicArrayReplaceWithList", + "<90>": "VOID STDCALL SRPDynamicArrayDelete(HANDLE, LPSTR, LPSTR, LPSTR) AS SRPUtilitiesAPI_DynamicArrayDelete", + "<91>": "LPSTR STDCALL SRPDynamicArrayCount(HANDLE, LPSTR, LPSTR) AS SRPUtilitiesAPI_DynamicArrayCount", + "<92>": "LPSTR STDCALL SRPDynamicArrayMatch(HANDLE, LPBINARY, LPSTR, LPSTR, LPSTR, LPSTR, LONG) AS SRPUtilitiesAPI_DynamicArrayMatch", + "<93>": "HANDLE STDCALL SRPDynamicArrayReduce(HANDLE, LPBINARY, LPSTR, LONG) AS SRPUtilitiesAPI_DynamicArrayReduce", + "<94>": "", + "<95>": "HANDLE STDCALL SRPHashTableCreate(LONG, LPSTR) AS SRPUtilitiesAPI_HashTableCreate", + "<96>": "VOID STDCALL SRPHashTableRelease(HANDLE) AS SRPUtilitiesAPI_HashTableRelease", + "<97>": "LPSTR STDCALL SRPHashTableGet(HANDLE, LPSTR) AS SRPUtilitiesAPI_HashTableGet", + "<98>": "LONG STDCALL SRPHashTableContains(HANDLE, LPSTR) AS SRPUtilitiesAPI_HashTableContains", + "<99>": "VOID STDCALL SRPHashTableSet(HANDLE, LPSTR, LPBINARY, LPSTR) AS SRPUtilitiesAPI_HashTableSet", + "<100>": "VOID STDCALL SRPHashTableRemove(HANDLE, LPSTR) AS SRPUtilitiesAPI_HashTableRemove", + "<101>": "LPSTR STDCALL SRPHashTableGetKeys(HANDLE, CHAR) AS SRPUtilitiesAPI_HashTableGetKeys", + "<102>": "LPSTR STDCALL SRPHashTableGetValues(HANDLE, CHAR) AS SRPUtilitiesAPI_HashTableGetValues", + "<103>": "LPSTR STDCALL SRPHashTableGetKeyValuePairs(HANDLE, CHAR, CHAR) AS SRPUtilitiesAPI_HashTableGetKeyValuePairs", + "<104>": "LPSTR STDCALL SRPHashTableCount(HANDLE) AS SRPUtilitiesAPI_HashTableCount", + "<105>": "", + "<106>": "HANDLE STDCALL SRPJsonNewObject() AS SRPUtilitiesAPI_JsonNewObject", + "<107>": "HANDLE STDCALL SRPJsonNewNumber(LPSTR) AS SRPUtilitiesAPI_JsonNewNumber", + "<108>": "HANDLE STDCALL SRPJsonNewString(LPSTR) AS SRPUtilitiesAPI_JsonNewString", + "<109>": "HANDLE STDCALL SRPJsonNewBool(LONG) AS SRPUtilitiesAPI_JsonNewBool", + "<110>": "HANDLE STDCALL SRPJsonNewArray() AS SRPUtilitiesAPI_JsonNewArray", + "<111>": "HANDLE STDCALL SRPJsonNewNull() AS SRPUtilitiesAPI_JsonNewNull", + "<112>": "HANDLE STDCALL SRPJsonNewAuto(LPSTR) AS SRPUtilitiesAPI_JsonNewAuto", + "<113>": "HANDLE STDCALL SRPJsonParse(LPSTR) AS SRPUtilitiesAPI_JsonParse", + "<114>": "HANDLE STDCALL SRPJsonParseWithErrors(LPSTR) AS SRPUtilitiesAPI_SRPJsonParseWithErrors", + "<115>": "LPSTR STDCALL SRPJsonStringify(HANDLE, LONG, LONG, LONG, LONG, LONG) AS SRPUtilitiesAPI_JsonStringify", + "<116>": "VOID STDCALL SRPJsonRelease(HANDLE) AS SRPUtilitiesAPI_JsonRelease", + "<117>": "HANDLE STDCALL SRPJsonGet(HANDLE, LPSTR) AS SRPUtilitiesAPI_JsonGet", + "<118>": "LPSTR STDCALL SRPJsonGetValue(HANDLE, LPSTR) AS SRPUtilitiesAPI_JsonGetValue", + "<119>": "HANDLE STDCALL SRPJsonFind(HANDLE, LPSTR) AS SRPUtilitiesAPI_JsonFind", + "<120>": "LONG STDCALL SRPJsonContains(HANDLE, LPSTR) AS SRPUtilitiesAPI_JsonContains", + "<121>": "VOID STDCALL SRPJsonSet(HANDLE, LPSTR, HANDLE) AS SRPUtilitiesAPI_JsonSet", + "<122>": "VOID STDCALL SRPJsonSetValue(HANDLE, LPSTR, LPSTR, LPSTR) AS SRPUtilitiesAPI_JsonSetValue", + "<123>": "VOID STDCALL SRPJsonArrayAppend(HANDLE, HANDLE) AS SRPUtilitiesAPI_JsonArrayAppend", + "<124>": "VOID STDCALL SRPJsonArrayAppendValue(HANDLE, LPSTR, LPSTR) AS SRPUtilitiesAPI_JsonArrayAppendValue", + "<125>": "LONG STDCALL SRPJsonRemove(HANDLE, LPSTR) AS SRPUtilitiesAPI_JsonRemove", + "<126>": "VOID STDCALL SRPJsonRemoveAll(HANDLE) AS SRPUtilitiesAPI_JsonRemoveAll", + "<127>": "LPSTR STDCALL SRPJsonGetMembers(HANDLE, CHAR, LONG) AS SRPUtilitiesAPI_JsonGetMembers", + "<128>": "LPSTR STDCALL SRPJsonGetElements(HANDLE, CHAR) AS SRPUtilitiesAPI_JsonGetElements", + "<129>": "LPSTR STDCALL SRPJsonCount(HANDLE) AS SRPUtilitiesAPI_JsonCount", + "<130>": "LONG STDCALL SRPJsonType(HANDLE) AS SRPUtilitiesAPI_JsonType", + "<131>": "LPSTR STDCALL SRPJsonSchemaValidate(LPSTR, LPSTR) AS SRPUtilitiesAPI_JsonSchemaValidate", + "<132>": "", + "<133>": "VOID STDCALL SRPListClear(HANDLE) AS SRPUtilitiesAPI_ListClear", + "<134>": "HANDLE STDCALL SRPListCreate(LPBINARY, LPSTR, CHAR) AS SRPUtilitiesAPI_ListCreate", + "<135>": "HANDLE STDCALL SRPListCreateFromArray(HANDLE, LPSTR, LPSTR) AS SRPUtilitiesAPI_ListCreateFromArray", + "<136>": "VOID STDCALL SRPListRelease(HANDLE) AS SRPUtilitiesAPI_ListRelease", + "<137>": "LPSTR STDCALL SRPListPrepareOutput(HANDLE, CHAR) AS SRPUtilitiesAPI_ListPrepareOutput", + "<138>": "LPSTR STDCALL SRPListGetAt(HANDLE, LPSTR) AS SRPUtilitiesAPI_ListGetAt", + "<139>": "LPSTR STDCALL SRPListAdd(HANDLE, LPBINARY, LPSTR) AS SRPUtilitiesAPI_ListAdd", + "<140>": "VOID STDCALL SRPListInsertAt(HANDLE, LPSTR, LPBINARY, LPSTR) AS SRPUtilitiesAPI_ListInsertAt", + "<141>": "VOID STDCALL SRPListSetAt(HANDLE, LPSTR, LPBINARY, LPSTR) AS SRPUtilitiesAPI_ListSetAt", + "<142>": "VOID STDCALL SRPListRemoveAt(HANDLE, LPSTR) AS SRPUtilitiesAPI_ListRemoveAt", + "<143>": "LPSTR STDCALL SRPListLocate(HANDLE, LPBINARY, LPSTR) AS SRPUtilitiesAPI_ListLocate", + "<144>": "LPSTR STDCALL SRPListMatch(HANDLE, LPBINARY, LPSTR, LPSTR, LONG) AS SRPUtilitiesAPI_ListMatch", + "<145>": "HANDLE STDCALL SRPListReduce(HANDLE, LPBINARY, LPSTR, LONG) AS SRPUtilitiesAPI_ListReduce", + "<146>": "LPSTR STDCALL SRPListCount(HANDLE) AS SRPUtilitiesAPI_ListCount", + "<147>": "", + "<148>": "LPSTR STDCALL SRPMath(LPSTR, LPSTR, LPSTR, LONG, LONG, LPLONG) AS SRPUtilitiesAPI_Math", + "<149>": "", + "<150>": "INT STDCALL SRPMonitorConnect() AS SRPUtilitiesAPI_MonitorConnect", + "<151>": "INT STDCALL SRPMonitorAddEntry(const char* logEntry) AS SRPUtilitiesAPI_MonitorAddEntry", + "<152>": "VOID STDCALL SRPMonitorClose() AS SRPUtilitiesAPI_MonitorClose", + "<153>": "", + "<154>": "LONG STDCALL SRPPathFitToEditField(LPBINARY, HANDLE) AS SRPUtilitiesAPI_PathFitToEditField", + "<155>": "LONG STDCALL SRPPathExpand(LPBINARY, LPSTR) AS SRPUtilitiesAPI_PathExpand", + "<156>": "LONG STDCALL SRPPathConvertToUnc(LPBINARY) AS SRPUtilitiesAPI_PathConvertToUnc", + "<157>": "LPSTR STDCALL SRPGetTempPath() AS SRPUtilitiesAPI_GetTempPath", + "<158>": "LPSTR STDCALL SRPGetTempFileName(LPSTR, LPSTR) AS SRPUtilitiesAPI_GetTempFileName", + "<159>": "", + "<160>": "LPWSTR STDCALL SRPPrinterEnumerate(LONG, LONG, LONG, LONG, LONG) AS SRPUtilitiesAPI_PrinterEnumerate", + "<161>": "LPWSTR STDCALL SRPPrinterGetDefault() AS SRPUtilitiesAPI_PrinterGetDefault", + "<162>": "LPWSTR STDCALL SRPPrinterGetInfo(LPWSTR) AS SRPUtilitiesAPI_PrinterGetInfo", + "<163>": "LPASTR STDCALL SRPPrinterPrintRaw(LPWSTR, LPWSTR, INT, INT, LPBINARY, INT) AS SRPUtilitiesAPI_PrinterPrintRaw", + "<164>": "", + "<165>": "HANDLE STDCALL SRPTcpClientConnect(LPSTR, INT) AS SRPUtilitiesAPI_TcpClientConnect", + "<166>": "LONG STDCALL SRPTcpClientSend(HANDLE, LPBINARY, INT) AS SRPUtilitiesAPI_TcpClientSend", + "<167>": "INT STDCALL SRPTcpClientReceive(HANDLE, LPBINARY, INT) AS SRPUtilitiesAPI_TcpClientReceive", + "<168>": "VOID STDCALL SRPTcpClientClose(HANDLE) AS SRPUtilitiesAPI_TcpClientClose", + "<169>": "LONG STDCALL SRPTcpClientSendSESCommand(HANDLE, LPSTR) AS SRPUtilitiesAPI_TcpClientSendSESCommand", + "<170>": "VOID STDCALL SRPTcpClientCloseSES(HANDLE) AS SRPUtilitiesAPI_TcpClientCloseSES", + "<171>": "LPSTR STDCALL SRPTcpClientSendQbXmlRequest(HANDLE, LPSTR, LPLONG) AS SRPUtilitiesAPI_TcpClientSendQbXmlRequest", + "<172>": "VOID STDCALL SRPTcpClientCloseQbXml(HANDLE) AS SRPUtilitiesAPI_TcpClientCloseQbXml", + "<173>": "", + "<174>": "INT STDCALL SRPXmlExtract(LPWSTR, LPWSTR, LPWSTR) AS SRPUtilitiesAPI_XmlExtract", + "<175>": "", + "<176>": "LPSTR STDCALL SRPGetAM(LPSTR, INT) AS SRPUtilitiesAPI_GetAM", + "<177>": "LPSTR STDCALL SRPGetDateFormat(LPSTR, INT) AS SRPUtilitiesAPI_GetDateFormat", + "<178>": "LPSTR STDCALL SRPGetDayOfWeekName(LPSTR, INT, INT) AS SRPUtilitiesAPI_GetDayOfWeekName", + "<179>": "LPSTR STDCALL SRPGetDayOfWeekNames(LPSTR, INT) AS SRPUtilitiesAPI_GetDayOfWeekNames", + "<180>": "ULONG STDCALL SRPGetFirstDayOfWeek(LPSTR) AS SRPUtilitiesAPI_FirstDayOfWeek", + "<181>": "ULONG STDCALL SRPGetFirstWeekOfYear(LPSTR) AS SRPUtilitiesAPI_FirstWeekOfYear", + "<182>": "LPSTR STDCALL SRPGetMonthName(LPSTR, INT, INT) AS SRPUtilitiesAPI_GetMonthName", + "<183>": "LPSTR STDCALL SRPGetMonthNames(LPSTR, INT) AS SRPUtilitiesAPI_GetMonthNames", + "<184>": "LPSTR STDCALL SRPGetPM(LPSTR, INT) AS SRPUtilitiesAPI_GetPM", + "<185>": "LPSTR STDCALL SRPGetTimeFormat(LPSTR, INT) AS SRPUtilitiesAPI_GetTimeFormat", + "<186>": "LONG STDCALL SRPGetTimeZoneBias() AS SRPUtilitiesAPI_GetTimeZoneBias", + "<187>": "INT STDCALL SRPIsDaylightSavings() AS SRPUtilitiesAPI_IsDaylightSavings", + "<188>": "", + "<189>": "INT STDCALL SRPJsonxAdd(LPSTR, UINT, INT) AS SRPUtilitiesAPI_JsonxAdd", + "<190>": "INT STDCALL SRPJsonxAddBool(INT) AS SRPUtilitiesAPI_JsonxAddBool", + "<191>": "INT STDCALL SRPJsonxAddNull() AS SRPUtilitiesAPI_JsonxAddNull", + "<192>": "VOID STDCALL SRPJsonxBegin(LPSTR, LPSTR) AS SRPUtilitiesAPI_JsonxBegin", + "<193>": "VOID STDCALL SRPJsonxBeginString(LPSTR, LPSTR, INT) AS SRPUtilitiesAPI_JsonxBeginString", + "<194>": "INT STDCALL SRPJsonxClose() AS SRPUtilitiesAPI_JsonxClose", + "<195>": "INT STDCALL SRPJsonxClear(LPSTR) AS SRPUtilitiesAPI_JsonxClear", + "<196>": "UINT STDCALL SRPJsonxCount(LPSTR) AS SRPUtilitiesAPI_JsonxCount", + "<197>": "INT STDCALL SRPJsonxDelete(LPSTR) AS SRPUtilitiesAPI_JsonxDelete", + "<198>": "LPSTR STDCALL SRPJsonxEnd(INT) AS SRPUtilitiesAPI_JsonxEnd", + "<199>": "LPSTR STDCALL SRPJsonxError() AS SRP_Jsonx_Error", + "<200>": "LPSTR STDCALL SRPJsonxGet(LPSTR, LPSTR) AS SRPUtilitiesAPI_JsonxGet", + "<201>": "INT STDCALL SRPJsonxGo(LPSTR) AS SRPUtilitiesAPI_JsonxGo", + "<202>": "INT STDCALL SRPJsonxGoBack() AS SRP_Jsonx_GoBack", + "<203>": "INT STDCALL SRPJsonxGoRoot() AS SRP_Jsonx_GoRoot", + "<204>": "INT STDCALL SRPJsonxHas(LPSTR) AS SRPUtilitiesAPI_JsonxHas", + "<205>": "INT STDCALL SRPJsonxIsObject() AS SRPUtilitiesAPI_JsonxIsObject", + "<206>": "LPSTR STDCALL SRPJsonxMembers(LPSTR, CHAR) AS SRPUtilitiesAPI_JsonxMembers", + "<207>": "INT STDCALL SRPJsonxParse(LPSTR, LPBINARY, UINT) AS SRPUtilitiesAPI_JsonxParse", + "<208>": "INT STDCALL SRPJsonxParseInsitu(LPSTR, LPSTR) AS SRP_Jsonx_ParseInsitu", + "<209>": "INT STDCALL SRPJsonxSet(LPSTR, LPSTR, UINT, INT) AS SRPUtilitiesAPI_JsonxSet", + "<210>": "INT STDCALL SRPJsonxSetBool(LPSTR, INT) AS SRPUtilitiesAPI_JsonxSetBool", + "<211>": "INT STDCALL SRPJsonxSetNull(LPSTR) AS SRPUtilitiesAPI_JsonxSetNull", + "<212>": "INT STDCALL SRPJsonxSetPath(LPSTR, LPSTR, UINT, INT) AS SRPUtilitiesAPI_JsonxSetPath", + "<213>": "INT STDCALL SRPJsonxSetPathBool(LPSTR, INT) AS SRPUtilitiesAPI_JsonxSetPathBool", + "<214>": "INT STDCALL SRPJsonxSetPathNull(LPSTR) AS SRPUtilitiesAPI_JsonxSetPathNull", + "<215>": "INT STDCALL SRPJsonxSort(LPSTR, INT) AS SRPUtilitiesAPI_JsonxSort", + "<216>": "LPSTR STDCALL SRPJsonxState() AS SRP_Jsonx_State", + "<217>": "LPSTR STDCALL SRPJsonxType(LPSTR) AS SRPUtilitiesAPI_JsonxType", + "<218>": "LPSTR STDCALL SRPJsonxValues(LPSTR, CHAR, LPSTR) AS SRPUtilitiesAPI_JsonxValues", + "<219>": "", + "<220>": "LONG STDCALL SRPRegexMatch(LPWSTR, LPWSTR) AS SRPUtilitiesAPI_RegexMatch", + "<221>": "LPWSTR STDCALL SRPRegexSearch(LPWSTR, LPWSTR) AS SRPUtilitiesAPI_RegexSearch" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSPROCS%003ADLL_WSOCK32.json b/SYSPROG/APPROW/SYSPROCS%003ADLL_WSOCK32.json new file mode 100644 index 0000000..9cb0e76 --- /dev/null +++ b/SYSPROG/APPROW/SYSPROCS%003ADLL_WSOCK32.json @@ -0,0 +1,35 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "DLL_WSOCK32" + }, + "body": { + "record1": { + "<1>": "WSOCK32", + "<2>": "LONG STDCALL WSAGetLastError(VOID)", + "<3>": "LONG STDCALL WSAStartup(ULONG,LPCHAR)", + "<4>": "LONG STDCALL WSACleanup(VOID)", + "<5>": "LONG STDCALL gethostname(LPCHAR,LONG)", + "<6>": "LONG STDCALL gethostbyname(LPCHAR)", + "<7>": "LONG STDCALL send(ULONG,LPCHAR,ULONG,ULONG)", + "<8>": "* MTR 4-7-04", + "<9>": "LONG STDCALL send(ULONG,LPCHAR,ULONG,ULONG) AS socketsend", + "<10>": "", + "<11>": "LONG STDCALL connect(ULONG,LPCHAR,ULONG)", + "<12>": "LONG STDCALL socket(ULONG,ULONG,ULONG)", + "<13>": "LONG STDCALL recv(ULONG,LPCHAR,ULONG,LONG)", + "<14>": "UINT STDCALL htons(UINT)", + "<15>": "LONG STDCALL ioctlsocket(ULONG,ULONG,ULONG)", + "<16>": "LONG STDCALL closesocket(ULONG)", + "<17>": "LONG STDCALL bind(ULONG,LPCHAR,ULONG)", + "<18>": "LONG STDCALL getsockname(ULONG,LPCHAR,ULONG)", + "<19>": "LONG STDCALL accept(ULONG,LPCHAR,ULONG)", + "<20>": "UINT STDCALL listen(ULONG,UINT)", + "<21>": "* bzs 11-27-16", + "<22>": "LONG STDCALL setsockopt(ULONG, ULONG, ULONG, LPVOID, ULONG)", + "<23>": "LONG STDCALL getsockopt(ULONG, ULONG, ULONG, LPVOID, LPVOID)", + "<24>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSPROCS%003AMETA95.RUN.json b/SYSPROG/APPROW/SYSPROCS%003AMETA95.RUN.json new file mode 100644 index 0000000..fd898d8 --- /dev/null +++ b/SYSPROG/APPROW/SYSPROCS%003AMETA95.RUN.json @@ -0,0 +1,173 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "META95.RUN" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": "", + "<1,1,2>": "" + } + } + }, + "record2": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "\u0002€$\u0002\u0002\u00002\u0000n\u0000s\u0000", + "<1,1,1,1,2>": "\u0000\u0001\u000f\u0000Ï\u0007-" + } + }, + "<1,1,2>": "" + } + } + }, + "record3": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "\u0002€-\u0002\u0000\u0004€-Ð\u0007\u0018y-<\u00002\u0000-<\u0000P\u0000-\n\u0000n\u0000-\u000e\u0001s\u0000-\u000e\u0001", + "<1,1,1,1,2>": "\u0000-\n\u0000\u0001-\u0006\u0000†\u0001-<\u0000Â\u0001-<\u0000å\u0001-<\u0000\u0003\u0002-\u0006\u0000!\u0002-<\u0000$\u0002- \u0003Ü\u0005-È\u0000l\u0007- ËÏ\u0007- \u0003øu- \u0003ˆw-\u0002\u0000\u0002\u0000-È\u00000u-È\u0000”u- \u0003ˆw-\u0002\u0000\u0002\u0000-\u0002\u0000\u0002\u0000-\u0002\u0000\u0003\u0000-\u0002\u0000\u0004\u0000-\u0002\u0000\u0005\u0000-\u0002\u0000\u0006\u0000-\u0002\u0000\u0007\u0000-\u0002\u0000\b\u0000-\u0002\u0000\t\u0000-\u0002\u0000\n\u0000-\u0002\u0000\r\u0000-\u0002\u0000\u000e\u0000-\u0002\u0000\u000f\u0000-\u0002\u0000\u0010\u0000-\u0002\u0000\u0011\u0000-\u0002\u0000ùu-\u0002\u0000\u0003€-\u0002\u0000\u0005€-\u0002\u00003\u0000-\u0002\u0000\u0019y-\u0002\u0000ˆ\u0001-\u0002\u0000Q\u0000-\u0002\u00001u-\u0002\u0000•u-\u0002\u0000Ã\u0001\u0014Ü\u0005\b\u0010\u0000\r\u00002\u0000†\u0001\u0014Ü\u0005\b \u0000\r\u00002\u0000†\u0001\u0014Ü\u0005\b\u0001\u0005\r\u00002\u0000†\u0001\u0014Ü\u0005\b\u0002\t\r\u00002\u0000†\u0001\u0014Ü\u0005\b\u0011\u0015\r\u00002\u0000†\u0001\u0014Ü\u0005\b\u0012\u0019\r\u00002\u0000†\u0001\u0014Ü\u0005\b!\u0015\r\u00002\u0000†\u0001\u0014Ü\u0005\b\"\u0019\r\u00002\u0000†\u0001\u0014Ü\u0005\b\u0002\u0019\r\u00002\u0000†\u0001\u0014Ü\u0005\b\")\r\u00002\u0000†\u0001\u0013†\u0001†\u0001\u0016†\u0001ˆ\u0001\u0017\u0002€\u0014\u0002€\u0003END\u0017\u0002€4\u0002€\u0013\u0004€\u0004€0\u000e\u0000è\u000301u\u0000\u00000•u\u0000\u00000\n\u0000\u0000\u0000\u0014!\u0002\u0002\r\n>\r\u0007\"\u0003\u0002\u0000\n" + } + } + } + }, + "<2>": "\u00010\u0005€\u0016\u0000\r!\u0002\n", + "<3>": "\u0001\u0003\u0004\u0000\u000fæ\u0005\r.\u0002\n", + "<4>": "\u0001\u000fê\u0005\r.\u0002\n", + "<5>": "\u0001\t\u0004\u0000\n", + "<6>": "\u0001\ry\"\n", + "<7>": "\u0001\r\u0017\u0002\n", + "<8>": "\u0001B\u0004€@\u000e?>\r™\"\u0003\u0002\u0000\n\u0013\u0002\u0013\u0004€\u0004€B\u0004€@\u000e?>?\u000e>\u0003\u0002\u0000@\u000e?>?\u000e>\ro\u0002\n*\u0002@\u000e?>?\u000e>\u0012!\u0002\u0004\u0003\u0000A\u0003\u0000\t\u0003\u0000\nf\u0002\u0010", + "<9>": "\u0005\nZ\u0002\u0004\u0004\u0000\u00122\u0000\u0011\u000b UNDEFINED!\u0012!\u0002\u000b`\u0002\u0003\u0002\u0000\nf\u0002\f5\u0002\u0003\u0002\u0000@\u000e?>?\u000e>\rã \ny\u0002\fp\u0002\u0003\u0002\u0000\rÄ\u0002\nÀ\u0002\rù\u0002\n‹\u0002\f‚\u0002\u0003\u0002\u0000\r:\u0003\nÀ\u0002\rR\u0004\nÀ\u0002\r7\b\n¯\u0002\rã \n©\u0002\f \u0002\u0003\u0002\u0000\fš\u0002\u0003\u0002\u0000\rÆ!\nÀ\u0002\rÊ\"\nÀ\u0002@\u000e?>?\u000e>\u001a\u000bDEFINITION \nõ\u0002\u001a\u0001<\nõ\u0002\r¥!\nõ\u0002\u001a\u0001>\nõ\u0002\r", + "<10>": " \nõ\u0002\rÊ\"\nõ\u0002@\u000e?>?\u000e>\rÊ\"\n,\u0003\u001a\u0007DEFINE \n,\u0003\r¯\u0004\u000b\u0015\u0003\ra\u0005\u000b\u001b\u0003\r\u0011\u0006\u000b!\u0003\rÅ\u0006\u000b'\u0003\ri\u0007\n,\u0003@\u000e?>\rã \n6\u0003@\u000e?>?\u000e>\rã \nD\u0003\f;\u0003\u0003\u0002\u0000\u001a\u0006DEFINE\nN\u0004\u001a\u0004DATA\nN\u0004\u001a\u0004SIZE\nN\u0004#\nN\u0004\u0014\u0018y\u0002SZ\u0017\u0018y\u0013\u0018yn\u0000\u0017\u0018y(Þ\r", + "<11>": " \nN\u0004\rã \nŠ\u0003\f\u0003\u0003\u0002\u0000\u001a\u0006DEFINE\nN\u0004\u001a\bSTANDARD\nN\u0004\u001a\u0005NAMES\nN\u0004\u0014\u0018y\u0002SH\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rð\u001f\nN\u0004\u0013\u0018y2\u0000\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rð\u001f\nN\u0004\u0013\u0018y2\u0000\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y(Þ\r", + "<12>": " \nN\u0004@\u000e?>?\u000e>\rã \n\\\u0004\fS\u0004\u0003\u0002\u0000\u001a\nINITIALIZE\n«\u0004\r", + "<13>": " \n«\u0004\rä!\n}\u0004\ft\u0004\u0003\u0002\u0000\u001a\u0003END\n«\u0004\u001a\nINITIALIZE\n«\u0004\r", + "<14>": " \n«\u0004\rã \n¦\u0004\f\u0004\u0003\u0002\u0000@\u000e?>?\u000e>\u001a\u0007BUFFERS\në\u0004\r", + "<15>": " \në\u0004\rï\u0004\nË\u0004\fÂ\u0004\u0003\u0002\u0000\u001a\u0004END \në\u0004\u001a\u0007BUFFERS\në\u0004\r", + "<16>": " \në\u0004@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\n\u0000\u0005@>\f\u0007\u0005\u0004\u0002\u0000?\u000e@\u000e?>\rã \n\u0011\u0005@\u000e?>/ \n]\u0005\u0014\u0018y\u0002DS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u001a\u0005SIZE \n]\u0005#\n]\u0005\u0013\u0018yn\u0000\u0017\u0018y\u001a\u0003AT \n]\u0005#\n]\u0005\u0013\u0018yn\u0000\u0017\u0018y(Þ\r", + "<17>": " \n]\u0005@\u000e?>?\u000e>\u001a\u0006STACKS\n›\u0005\r", + "<18>": " \n›\u0005\rŸ\u0005\n|\u0005\fs\u0005\u0003\u0002\u0000\u001a\u0004END \n›\u0005\u001a\u0006STACKS\n›\u0005\r", + "<19>": " \n›\u0005@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\n°\u0005@>\f·\u0005\u0004\u0002\u0000?\u000e@\u000e?>\rã \nÁ\u0005@\u000e?>/ \n\r\u0006\u0014\u0018y\u0002DS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u001a\u0005SIZE \n\r\u0006#\n\r\u0006\u0013\u0018yn\u0000\u0017\u0018y\u001a\u0003AT \n\r\u0006#\n\r\u0006\u0013\u0018yn\u0000\u0017\u0018y(Þ\r", + "<20>": " \n\r\u0006@\u000e?>?\u000e>\u001a\bCOUNTERS\nO\u0006\r", + "<21>": " \nO\u0006\rS\u0006\n.\u0006\f%\u0006\u0003\u0002\u0000\u001a\u0004END \nO\u0006\u001a\bCOUNTERS\nO\u0006\r", + "<22>": " \nO\u0006@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\nd\u0006@>\fk\u0006\u0004\u0002\u0000?\u000e@\u000e?>\rã \nu\u0006@\u000e?>/ \nÁ\u0006\u0014\u0018y\u0002DS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u001a\u0005SIZE \nÁ\u0006#\nÁ\u0006\u0013\u0018yn\u0000\u0017\u0018y\u001a\u0003AT \nÁ\u0006#\nÁ\u0006\u0013\u0018yn\u0000\u0017\u0018y(Þ\r", + "<23>": { + "<23,1>": " \nÁ\u0006@\u000e?>?\u000e>\u001a\u0005LISTS\n", + "<23,2>": "\u0006\r" + }, + "<24>": { + "<24,1>": " \n", + "<24,2>": "\u0006\r\u0001\u0007\nß\u0006\fÖ\u0006\u0003\u0002\u0000\u001a\u0004END \n", + "<24,3>": "\u0006\u001a\u0005LISTS\n", + "<24,4>": "\u0006\r" + }, + "<25>": { + "<25,1>": " \n", + "<25,2>": "\u0006@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\n\u0012\u0007@>\f\u0019\u0007\u0004\u0002\u0000?\u000e@\u000e?>\rã \n#\u0007@\u000e?>/ \ne\u0007\u0014\u0018y\u0002DL\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y/ \ne\u0007\u0013\u0018y2\u0000\u0017\u0018y/ \nX\u0007\u0013\u0018y2\u0000\u0017\u0018y\fH\u0007\u0003\u0002\u0000(Þ\r" + }, + "<26>": " \ne\u0007@\u000e?>?\u000e>\u001a\u0005MASKS\n§\u0007(Þ\r", + "<27>": " \n§\u0007\u0013Ü\u0005Ü\u0005\r«\u0007\nŠ\u0007\f\u0007\u0003\u0002\u0000\u001a\u0003END\n§\u0007\u001a\u0005MASKS\n§\u0007\r", + "<28>": " \n§\u0007@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\n¼\u0007@>\fÃ\u0007\u0004\u0002\u0000?\u000e@\u000e?>\rã \nÍ\u0007@\u000e?>/ \n3\b3l\u0007\u000f\u0000\n3\b\u0014\u0018y\u0002DM\u0017\u0018y%\n3\b\u0014\u0018y\u0007;MASKS;\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y\rð\u001f\n3\b\u0013\u0018y2\u0000\u0017\u0018y\rJ\u001f\n3\b\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\n3\b\u0013\u0018y\u0003\u0002\u0017\u0018y(Þ\r", + "<29>": " \n3\b@\u000e?>?\u000e>\u001a\u0001<\nØ\b\r¥!\nØ\b\u001a\u0001>\nØ\b\u0014\u0018y\u0002RH\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y\ræ\b\nØ\b\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y\rÊ\"\nØ\b\b\u0003\u0000\u000e\u0000\rÜ\b\nØ\b=\u000e\u0000-è\u0003\t\u000e\u0000\nÉ\b\u0007\u0003\u0000\u0007\u000e\u0000\b\u000f\u0000\u0003\u0000\u001f\u000f\u0000\u0013\u0018y\u0001\u0017\u0018y\u00132\u00002\u0000\u00132\u0000\u0001\u000f\u0002\u0006\u0004ˆ\u0001*\nÉ\b\u0006\n\u0000\f“\b\u0003\u0002\u0000\u0013\u0018y\u0018y0\u000e\u0000è\u0003@\u000e?>?\u000e>\u0003\u0002\u0000@\u000e?>?\u000e>\rÊ\"\nö\b\r" + }, + "record4": { + "<1>": "\b\nö\b\fç\b\u0003\u0002\u0000@\u000e?>?\u000e>\u001a\u0001=\n\u0006\t\u0003\u0002\u0000\n&\t\r\t\n&\t\rP\n\n\u001b\t\f\u0012\t\u0003\u0002\u0000\r\u0004\n\n&\t@\u000e?>\u001a\u0001=\n‚\t\u00180u\u000e\u0000\r§\n\n<\t\f3\t\u0003\u0002\u0000\r", + "<2>": " \n‚\t\u0014\u0018y\u0002SG\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y@\u000e?>\rã \nŒ\t@\u000e?>?\u000e>\u001a\u0005BEGIN\n\u0000\n\u001a\u0004CASE\n\u0000\n\u0014\u0018y\u0002BC\u0017\u0018y\u001a\u0004BYTE\n¾\t\u0014\u0018y\u0001B\u0017\u0018y\u000bÒ\t\u001a\u0004WORD\nÒ\t\u0014\u0018y\u0001W\u0017\u0018y\n\u0000\n\rJ\u001f\n\u0000\n\u0013\u0018y\u0003\u0002\u0017\u0018y\r", + "<3>": " \n\u0000\n\u0018”u\u000e\u0000\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u00180u\u000e\u0000@\u000e?>?\u000e>\u001a\u0003END\nL\n\u001a\u0004CASE\nL\n\r", + "<4>": " \nL\n\u0014\u0018y\u0002EN\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u@\u000e?>?\u000e>\rã \nY\n@\u000e?>\u001a\u0004CASE\n£\n\r»!\n£\n\u0014\u0018y\u0002CA\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y\r", + "<5>": " \n\n\u0003\u0002\u0000\n£\n\ræ\b\n£\n\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>\rÔ\n\u000b±\n\r*\u0013\u000b¼\n\u001a\u0001*\n¼\n(Þ\u000bË\n\r\u000b\nË\n\rÊ\"\nË\n\nÐ\n@\u000e?>?\u000e>\rç\n\u000bÞ\n\rù\u0011\nã\n@\u000e?>?\u000e>\r\u0018\u000b\n\u0014\u000b\r< \u0003\u0002\u0000\n\u0014\u000b\r°\u000b\n\u0000\u000b\f÷\n\u0003\u0002\u0000\r» \u000b\u000f\u000b\rÈ \u0003\u0002\u0000\n\u0014\u000b@\u000e?>?\u000e>\r" + }, + "record5": { + "<1>": "\u000b\n!\u000b@\u000e?>\r)\f\n+\u000b@\u000e?>\rE\f\n5\u000b@\u000e?>\rg\f\n?\u000b@\u000e?>\r–\u000e\nI\u000b@\u000e?>\r¿\u000f\nS\u000b@\u000e?>\rá\u000f\n]\u000b@\u000e?>\r\u0015\u0010\ng\u000b@\u000e?>\r‚\u0012\nq\u000b@\u000e?>\rÑ\u000e\n{\u000b@\u000e?>\r\u000b\n‹\u000b\r\u0018\u000b\n‹\u000b@\u000e?>?\u000e>\u001a\u0001+\n¬\u000b\u001a\u0001*\nž\u000b(Þ\u0003\u0002\u0000\n¬\u000b\r", + "<2>": { + "<2,1>": { + "<2,1,1>": { + "<2,1,1,1>": " \n¬\u000b@\u000e?>?\u000e>\u001a\u0004ELSE\n", + "<2,1,1,2>": "\u000b\u0018”u\u000e\u0000\u0014\u0018y\u0002BT\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\r\u0018\u000b\n", + "<2,1,1,3>": "\u000b\r< \u0003\u0002\u0000\n", + "<2,1,1,4>": "\u000b\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u@\u000e?>?\u000e>\u001a\u0001<\n%\f\r¥!\n%\f\u001a\u0001>\n%\f\u0014\u0018y\u0002GS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>%\nA\f\u0014\u0018y\u0002TL\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001>\nc\f%\nc\f\u0014\u0018y\u0002SC\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>?\u000e>\u001b\u0001%\ns\f@>\fz\f\u0004\u0002\u0000?\u000e@\u000e?>\u001a\b%TESTID%\n”\f\u0014\u0018y\u0002TI\u0017\u0018y@\u000e?>\u001a\t%TESTINT%\n¯\f\u0014\u0018y\u0002TN\u0017\u0018y@\u000e?>\u001a\t%TESTSTR%\nÊ\f\u0014\u0018y\u0002TS\u0017\u0018y@\u000e?>\u001a\t%TESTNUM%\nå\f\u0014\u0018y\u0002NM\u0017\u0018y@\u000e?>\u001a\t%TESTEOL%\n\b\r\u0014\u0018y\u0002TL\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\u001a\n%TESTWORD%\n,\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001 \u0017\u0018y@\u000e?>\u001a\u000b%TESTCOMMA%\nQ\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001,\u0017\u0018y@\u000e?>\u001a\n%TESTSEMI%\nu\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001;\u0017\u0018y@\u000e?>\u001a\n%TESTDICT%\n™\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001}\u0017\u0018y@\u000e?>\u001a\u000b%TESTVALUE%\n¾\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001" + } + }, + "<2,2>": "\u0017\u0018y@\u000e?>\u001a\n%TSTPAREN%\nâ\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001)\u0017\u0018y@\u000e?>\u001a\t%IDTOEOL%\n\u0005\u000e\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\u001a\r%IDTOPERCENT%\n,\u000e\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001%\u0017\u0018y@\u000e?>\u001a\b%SEARCH%\nF\u000e\u0014\u0018y\u0002SR\u0017\u0018y@\u000e?>\u001a\b%ADDSYM%\n`\u000e\u0014\u0018y\u0002AD\u0017\u0018y@\u000e?>\u001a\t%PUTMASK%\n’\u000e\u0014\u0018y\u0002PS\u0017\u0018y\u0014\u0018y\u0005;MNS;\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001(\nÍ\u000e\u00180u\u000e\u0000\r§\n\n«\u000e\f¢\u000e\u0003\u0002\u0000\u001a\u0001)\nÍ\u000e\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u@\u000e?>?\u000e>\u001a\u0002{[\n@\u000f\u0018”u\u000e\u0000\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u00180u\u000e\u0000\rD\u000f\n@\u000f\r§\n\n\u0006\u000f\f", + "<2,3>": "\u000e\u0003\u0002\u0000\u0014\u0018y\u0002GO\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u001a\u0002]}\n@\u000f\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u\u0019”u@\u000e?>?\u000e>\r\u0018\u000b\n»\u000f\r< \nQ\u000f\u0003\u0002\u0000\n»\u000f\u001a\u0001S\n]\u000f\u0003\u0002\u0000\n»\u000f\u0018”u\u000e\u0000\u0014\u0018y\u0002BT\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u@\u000e?>?\u000e>\u001a\u0001=\nÝ\u000f%\nÝ\u000f\u0014\u0018y\u0002NX\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001#\n\u0011\u0010%\n\u0011\u0010\u0014\u0018y\u0002NX\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y\u0014\u0018y\u0002CI\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001?\n>\u0010\r\u001a \n>\u0010\u001a\u0001?\n>\u0010\u0014\u0018y\u0002QM\u0017\u0018y\u001f\u000f\u0000\u0013\u0018y\u0001\u0017\u0018y@\u000e?>\u001a\u0001?\n^\u0010\rð\u001f\n^\u0010\u0013\u0003\u0002\u0003\u0002\u0013\u0003\u00022\u0000\rb\u0010\n^\u0010@\u000e?>?\u000e>\u001a\u0001?\n|\u0010\u0014\u0018y\u0002QC\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>\u001a\u0001=\nª\u0010\rÆ\u0011\nª\u0010\u001a\u0001?\nª\u0010\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001=\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002!=\nÙ\u0010\rÆ\u0011\nÙ\u0010\u001a\u0001?\nÙ\u0010\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001!\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002<>\n\b\u0011\rÆ\u0011\n\b\u0011\u001a\u0001?\n\b\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001!\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001<\n6\u0011\rÆ\u0011\n6\u0011\u001a\u0001?\n6\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001<\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002<=\ne\u0011\rÆ\u0011\ne\u0011\u001a\u0001?\ne\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001{\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001>\n“\u0011\rÆ\u0011\n“\u0011\u001a\u0001?\n“\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001>\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002>=\nÂ\u0011\rÆ\u0011\nÂ\u0011\u001a\u0001?\nÂ\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001}\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>#\nÞ\u0011\u00132\u00002\u0000\u00132\u0000n\u0000\u0014\u0018y\u0002QN\u0017\u0018y\u000bð\u0011\rð\u001f\nð\u0011\u0014\u0018y\u0002QO\u0017\u0018y\nõ\u0011@\u000e?>?\u000e>\r°!\n\u0000\u0012\u0003\u0002\u0000\n~\u0012\u001a\u0001{\n~\u0012\u0018”u\u000e\u0000\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u00180u\u000e\u0000\r§\n\n3\u0012\f*\u0012\u0003\u0002\u0000\u0014\u0018y\u0002GO\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u001a\u0001}\n~\u0012\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u00190u\u0019”u@\u000e?>?\u000e>\u001a\u0001[\nè\u0012\u00180u\u000e\u0000\rì\u0012\nè\u0012\r§\n\n\u0012\f”\u0012\u0003\u0002\u0000\u001a\u0001]\nè\u0012\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0019”u\u00190u@\u000e?>?\u000e>\r\u0018\u000b\n&\u0013\r< \nù\u0012\u0003\u0002\u0000\n&\u0013\u001a\u0001S\n\u0005\u0013\u0003\u0002\u0000\n&\u0013\u0018”u\u000e\u0000\u0014\u0018y\u0002BF\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>\r‡\u0013\n3\u0013@\u000e?>\r$\u001b\n=\u0013@\u000e?>\rö\u001b\nG\u0013@\u000e?>\rÕ\u001d\nQ\u0013@\u000e?>\r.\u001e\n[\u0013@\u000e?>\rs\u001e\ne\u0013@\u000e?>\r¸\u001e\no\u0013@\u000e?>\rÝ\u001e\ny\u0013@\u000e?>\r\u0011\u001f\nƒ\u0013@\u000e?>?\u000e>\u001a\u0007ERRMSG(\nÃ\u0013\rí\u001a\nÃ\u0013\u001a\u0001,\u000b¦\u0013\u0003\u0002\u0000\f¯\u0013\rí\u001a\n¯\u0013\fš\u0013\nÃ\u0013\u001a\u0001)\nÃ\u0013\u0014\u0018y\u0002EM\u0017\u0018y@\u000e?>\u001a\u0001%\nÐ\u0013@>\f×\u0013\u0004\u0002\u0000?\u000e@\u000e?>8W\u0002€¡\u001a\u001a\u0006TRIMF%\nõ\u0013\u0014\u0018y\u0002TF\u0017\u0018y@\u000e?>\fë\u001a\u001a\nSKIPTOEOL%\n\u001c\u0014\u0014\u0018y\u0002ST\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\u001a\nSKIPTOEOS%\n@\u0014\u0014\u0018y\u0002ST\u0017\u0018y\u0014\u0018y\u0001;\u0017\u0018y@\u000e?>\u001a\tSKIPPEOL%\nc\u0014\u0014\u0018y\u0002SP\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\fë\u001a\u001a\bPUSHLAB%\n—\u0014\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0005$LABS\u0017\u0018y\u0014\u0018y\u0004#BIN\u0017\u0018y@\u000e?>\fë\u001a\u001a\tRETFALSE%\nÐ\u0014\u0014\u0018y\u0002CF\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y@\u000e?>\u001a\u000bRETURN.OBJ%\nõ\u0014\u0014\u0018y\u0002RO\u0017\u0018y\u0014\u0018y\u0001@\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007GENFAL%\n(\u0015\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0006$FALSE\u0017\u0018y\u0014\u0018y\u0003#NL\u0017\u0018y@\u000e?>\u001a\bGENLOOP%\nX\u0015\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0005$LOOP\u0017\u0018y\u0014\u0018y\u0003#NL\u0017\u0018y@\u000e?>\u001a\bGETBYTE%\n…\u0015\u0014\u0018y\u0002LB\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\u001a\fGETBYTEFROM%\n¼\u0015\u0014\u0018y\u0002LB\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\rJ\u001f\n¼\u0015\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>\u001a\bGETWORD%\né\u0015\u0014\u0018y\u0002LW\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\u001a\u0007GENAUX%\n\u0017\u0016\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0004$AUX\u0017\u0018y\u0014\u0018y\u0003#NL\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007OUTFAL%\n]\u0016\u0014\u0018y\u0002AS\u0017\u0018y\u0014\u0018y\u0006$FALSE\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y\u0014\u0018y\u0005;NUM;\u0017\u0018y@\u000e?>\u001a\bOUTLOOP%\n \u0016\u0014\u0018y\u0002AS\u0017\u0018y\u0014\u0018y\u0005$LOOP\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y\u0014\u0018y\u0005;NUM;\u0017\u0018y@\u000e?>\u001a\u0007OUTSEQ%\ná\u0016\u0014\u0018y\u0002AC\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y\u0014\u0018y\u0005;NUM;\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007POPFAL%\n\n\u0017\u0014\u0018y\u0002PO\u0017\u0018y\u0014\u0018y\u0006$FALSE\u0017\u0018y@\u000e?>\u001a\bPOPLOOP%\n0\u0017\u0014\u0018y\u0002PO\u0017\u0018y\u0014\u0018y\u0005$LOOP\u0017\u0018y@\u000e?>\u001a\u0007POPAUX%\nT\u0017\u0014\u0018y\u0002PO\u0017\u0018y\u0014\u0018y\u0004$AUX\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007SAVEID%\n¨\u0017\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0005;SID;\u0017\u0018y\u0014\u0018y\u0005;SID;\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0005;SID;\u0017\u0018y\u0014\u0018y\u0004;ID;\u0017\u0018y@\u000e?>\fë\u001a\u001a\tCONTINUE%\n7\u0018\u0018”u\u000e\u0000\u0014\u0018y\u0002BF\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002SG\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u\u0014\u0018y\u0002CF\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y@\u000e?>\fë\u001a\u001a\nMOVEBYTES%\nt\u0018\u0014\u0018y\u0002MB\u0017\u0018y\rJ\u001f\nt\u0018\rJ\u001f\nt\u0018\rð\u001f\nt\u0018\rð\u001f\nt\u0018\rð\u001f\nt\u0018@\u000e?>\fë\u001a\u001a\tTOBINARY%\n\u0018\u0014\u0018y\u0002IB\u0017\u0018y\u0014\u0018y\u0004#BIN\u0017\u0018y@\u000e?>\u001a\bTOASCII%\nÂ\u0018\u0014\u0018y\u0002AC\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y@\u000e?>\fë\u001a\u001a\tSTORELAB%\n" + } + }, + "record6": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "\u0018\u0014\u0018y\u0002SL\u0017\u0018y\u0014\u0018y\u0001@\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0005$LABS\u0017\u0018y@\u000e?>\fë\u001a\u001a\tRJSOURCE%\n%\u0019\u0014\u0018y\u0002RJ\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007SOURCE%\nO\u0019\rJ\u001f\nO\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>\u001a\rSOURCE.COLON%\nv\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y@\u000e?>\u001a\u000eSOURCE.NORMAL%\nž\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\u001a\fSOURCE.OPTS%\nÉ\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0014\u0018y\u0006;OPTS;\u0017\u0018y@\u000e?>\fë\u001a\u001a\bWORDOBJ%\n\u001d\u001a\u0014\u0018y\u0002LW\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0001@\u0017\u0018y\u0014\u0018y\u0002CN\u0017\u0018y\u0014\u0018y\u0004#OBJ\u0017\u0018y\u0014\u0018y\u0001-\u0017\u0018y\u0014\u0018y\u00012\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0004DUP%\nM\u001a\u0014\u0018y\u0002DP\u0017\u0018y\u0014\u0018y\u0005;DUP;\u0017\u0018y\u0014\u0018y\u0004#DUP\u0017\u0018y@\u000e?>\fë\u001a\u001a\tEXCHANGE%\nt\u001a\u0014\u0018y\u0002SG\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y@\u000e?>\fë\u001a\u001a\tUNTHREAD%\nœ\u001a\u0014\u0018y\u0002UT\u0017\u0018y\u0014\u0018y\u0003#C1\u0017\u0018y@\u000e?>\fë\u001a$\u0000TRSKPUREGEOUPOSACOMBTOSTRJSOWODUEXUNß\u0013", + "<1,1,1,1,2>": "\u0013h\u0014œ\u0014", + "<1,1,1,1,3>": "\u0014\u001c\u0016æ\u0016Y\u0017­\u0017<\u0018y\u0018Ç\u0018\u0004\u0019*\u0019Î\u0019\"\u001aR\u001ay\u001a?\u000e>%\n\u0005\u001b\u0014\u0018y\u0002EL\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>\rJ\u001f\n \u001b\u0014\u0018y\u0002EB\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\rJ\u001f\nL\u001b\r»!\nL\u001b\u0014\u0018y\u0002CL\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>\rJ\u001f\n\u001b\u0013å\u0001å\u0001\u0013å\u0001\u0003\u0002\rJ\u001f\n\u001b\u0014\u0018y\u0002CB\u0017\u0018y\u0013\u0018yå\u0001\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>\rJ\u001f\n¨\u001b\rÆ\u001f\n¨\u001b\u0014\u0018y\u0002CS\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rJ\u001f\nÑ\u001b\rð\u001f\nÑ\u001b\u0014\u0018y\u0002CC\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rJ\u001f\nò\u001b\u001a\u0001^\nò\u001b\u0014\u0018y\u0002CM\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001!\n\u001f\u001c\r\u001a \n\u001f\u001c\u001a\u0001!\n\u001f\u001c\u0014\u0018y\u0002SM\u0017\u0018y\u001f\u000f\u0000\u0013\u0018y\u0001\u0017\u0018y@\u000e?>\rð\u001f\nA\u001c\u001a\u0002=T\nA\u001c\u0014\u0018y\u0002CT\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rð\u001f\nc\u001c\u001a\u0002=F\nc\u001c\u0014\u0018y\u0002CF\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rð\u001f\n…\u001c\u001a\u0002=I\n…\u001c\u0014\u0018y\u0002CI\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rð\u001f\n²\u001c\u001a\u0001=\n²\u001c#\n²\u001c\u0014\u0018y\u0002CE\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u0013\u0018yn\u0000\u0017\u0018y@\u000e?>\rð\u001f\ná\u001c\u001a\u0001=\ná\u001c\u0014\u0018y\u0002EC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\rð\u001f\ná\u001c\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rð\u001f\n" + }, + "<1,1,1,2>": "\u001c\u0013\u0003\u0002\u0003\u0002\u0013\u0003\u00022\u0000\r" + } + } + } + }, + "record7": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "\u001c\n", + "<1,1,1,2>": { + "<1,1,1,2,1>": "\u001c@\u000e?>?\u000e>\u001a\u0001+\n&\u001d\r¢\u001d\n&\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001+\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001-\nN\u001d\r¢\u001d\nN\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001-\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001*\nv\u001d\r¢\u001d\nv\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001*\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001/\nž\u001d\r¢\u001d\nž\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001/\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>#\nº\u001d\u00132\u00002\u0000\u00132\u0000n\u0000\u0014\u0018y\u0002CN\u0017\u0018y\u000bÌ\u001d\rð\u001f\nÌ\u001d\u0014\u0018y\u0002CO\u0017\u0018y\nÑ\u001d@\u000e?>?\u000e>\u001a\u0001+\n\t\u001e\rÆ\u001f\n\t\u001e\u001a\u0001,\n\t\u001e\u0014\u0018y\u0002PC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\rð\u001f\n\t\u001e\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001-\n*\u001e\rÆ\u001f\n*\u001e\u0014\u0018y\u0002PO\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001+\nN\u001e\rð\u001f\nN\u001e\u0014\u0018y\u0002IC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001-\no\u001e\rð\u001f\no\u001e\u0014\u0018y\u0002DC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001P\n“\u001e\r»!\n“\u001e\u0014\u0018y\u0002PL\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>\u001a\u0001P\n´\u001e\rJ\u001f\n´\u001e\u0014\u0018y\u0002PB\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\rJ\u001f\nÙ\u001e\u001a\u0002,K\nÙ\u001e\u0014\u0018y\u0002IN\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\rJ\u001f\n\r\u001f\u001a\u0003,D,\n\r\u001f\u0014\u0018y\u0002RD\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\n\r\u001f\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\u001a\u0002D,\nF\u001f\rJ\u001f\nF\u001f\u001a\u0001,\nF\u001f\u0014\u0018y\u0002WR\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nF\u001f\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001&\n]\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001&@\u000e?>\u001a\u0001@\nq\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001@@\u000e?>\u001a\u0001:\n…\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001:@\u000e?>\u001a\u0001|\n™\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001|@\u000e?>\u001a\u0001;\nÂ\u001f/;\nÂ\u001f\u001a\u0001;\nÂ\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001;\u0013\u0003\u00022\u0000\u0014\u0003\u0002\u0001;@\u000e?>?\u000e>\u001a\u0001$\nì\u001f\"\nì\u001f\u0013å\u0001å\u0001\u0013å\u00012\u0000\u00132\u00002\u0000\u00142\u0000\u0001$\u00132\u0000å\u0001@\u000e?>?\u000e>\u001a\u0001#\n\u0016 \"\n\u0016 \u0013å\u0001å\u0001\u0013å\u00012\u0000\u00132\u00002\u0000\u00142\u0000\u0001#\u00132\u0000å\u0001@\u000e?>?\u000e>\"\n8 3l\u0007\u000f\u0000\n8 \u0007\u000f\u0000=\u000f\u0000*\u0004\u0000=\u000f\u0000+Þ\u0005@\u000e?>?\u000e>\u001a\u0001T\nW \u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y@\u000e?>\u001a\u0001F\n‡ \u0014\u0018y\u0002CF\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>\u001a\u0001I\n· \u0014\u0018y\u0002CI\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002BF\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001S\nÄ @\u000e?>?\u000e>\u0014\u0018y\u0002BF\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001*\u000bí \u001a\u0001~\n", + "<1,1,1,2,2>": " (Þ\r" + } + } + } + }, + "<2>": { + "<2,1>": { + "<2,1,1>": { + "<2,1,1,1>": { + "<2,1,1,1,1>": " \n", + "<2,1,1,1,2>": " @\u000e?>?\u000e>\u001a\u0001Þ\n\r!\r\u0011!\n\r!@\u000e?>?\u000e>\t\b\u0000\n!!\r?\u000e>\b\t\u0000\u0003€\u001a\u0001Þ\u0005\u0002\u0000\nN!\nN!\ni!9\u000f\u0000\u0002€\u00132\u00002\u0000\u00162\u0000\u000f\u0000\u00073\u0000\u00122\u0000\fB!\u0003\u0002\u0000\b\u0003€\t\u0000\u0012!\u0002@\u000e?>?\u000e>\u001a\u0002~T\nŠ!\t\u0007\u0000\nŠ!@\u000e?>\u001a\u0002~F\n¡!\t\u0007\u0000\u0005\u0002\u0000\n¡!\n¡!@\u000e?>?\u000e>\"\n¬!@\u000e?>?\u000e>#\n·!@\u000e?>?\u000e>%\nÂ!@\u000e?>?\u000e>\u001a\u0003END\nà!\t\b\u0000\u000bÛ!\u0011\u0001*\u0003\u0002\u0000\nà!@\u000e?>?\u000e>\rã \ní!@\u000e?>\r§\n\nø!\fï!\u0003\u0002\u0000\r" + } + } + } + }, + "<3>": { + "<3,1>": { + "<3,1,1>": { + "<3,1,1,1>": { + "<3,1,1,1,1>": " \n\u0003\"@\u000e?>?\u000e>;$\u0002\u0013$\u0002$\u0002/Þ\u0013Â\u0001Â\u0001\u0013Â\u00012\u0000\u0014Â\u0001\u0004.IOB\u001a\u0001Þ\u001a\u0001T\n0\"\u0003\u0006\u0000\u000b9\"\u0004\u0006\u0000\u0003\u0002\u0000\nk\"\u001a\u0001S\nE\"\u0003\u0007\u0000\u000bN\"\u0004\u0007\u0000\u0003\u0002\u0000\nk\"\u001a\u0001L\nZ\"\u0003\b\u0000\u000bc\"\u0004\b\u0000\u0003\u0002\u0000\nk\";\u0002€@\u000e?>;\u0002€\u0003\u0002\u0000@\u000e?>?\u000e>\u0011\u0017COMPILATION SUCCESSFUL!@\u000e?>?\u000e>\u0011(COMPILATION ABORTED - NO OBJECT PRODUCED@\u000e?>?\u000e>\u0017\u0018y\u0017\u0018y\u0017\u0018y\r\u000e#\n\n#\u0013\u0018y\u0018y;\u0018y\u0004\u0003\u0000\rr#\n", + "<3,1,1,1,2>": "\"\rP#\nñ\"\u0003\u0002\u0000\n", + "<3,1,1,1,3>": "\"\fâ\"\u0003\u0002\u0000;\u0002€\u0013\u0018y\u0018y\u0003\u0002\u0000@\u000e?>?\u000e>\b\u0002\u0000\u0019y=\u0002\u0000/Ì\u0007\u0005\u0002\u0000@\u000e?>\u0012!\u0002\u0011\u001eCOLON BUFFER OVERFLOW WARNING.\u0012!\u0002\u0003\u0002\u0000@\u000e?>?\u000e>\t\u0003\u0000\nn#\u0014\u0004€\u0001\u0017\u00132\u00002\u0000\u00142\u0000\u0001:\rD1\nn#@\u000e?>?\u000e>8W\u0018yë-\u001a\u0002CT\n“#\u001a\u0001Þ\n“#\u0014\u0004€\u0001\u0003\rd/\n“#@\u000e?>\f\u0011/\u001a\u0002CF\n²#\u001a\u0001Þ\n²#\u0014\u0004€\u0001\u0004\rd/\n²#@\u000e?>\f\u0011/\u001a\u0002CI\nÑ#\u001a\u0001Þ\nÑ#\u0014\u0004€\u0001\u0005\rd/\nÑ#@\u000e?>\f\u0011/\u001a\u0002IC\nð#\u001a\u0001Þ\nð#\u0014\u0004€\u0001\u0006\rd/\nð#@\u000e?>\f\u0011/\u001a\u0002DC\n\u000f$\u001a\u0001Þ\n\u000f$\u0014\u0004€\u0001\u0007\rd/\n\u000f$@\u000e?>\f\u0011/\u001a\u0002EC\n4$\u001a\u0001Þ\n4$\u0014\u0004€\u0001\b\rd/\n4$\rd/\n4$@\u000e?>\f\u0011/\u001a\u0002QC\nS$\u001a\u0001Þ\nS$\u0014\u0004€\u0001\t\rd/\nS$@\u000e?>\f\u0011/\u001a\u0002BF\nr$\u001a\u0001Þ\nr$\u0014\u0004€\u0001\n\r°/\nr$@\u000e?>\f\u0011/\u001a\u0002BT\n‘$\u001a\u0001Þ\n‘$\u0014\u0004€\u0001\u000b\r°/\n‘$@\u000e?>\f\u0011/\u001a\u0002GO\n°$\u001a\u0001Þ\n°$\u0014\u0004€\u0001\f\r°/\n°$@\u000e?>\f\u0011/\u001a\u0002GS\nÏ$\u001a\u0001Þ\nÏ$\u0014\u0004€\u0001\r\rÔ/\nÏ$@\u000e?>\f\u0011/\u001a\u0002RT\nN%\u001a\u0001Þ\nN%\t\u0006\u0000\nA%\u0014\u0004€\u0001\u0011\u0016\u0004€Q\u0000\u0007\u0005€\u0013\u0004€P\u0000\u0014\u0004€\u0006=\u0000\u0000*\u0000\u000e\u0014\u0004€\u0006=\u0000\u0000+ F\u0014\u0004€\u0005\u0013 \u0000 \u0000\u0014\u0004€\u0005\u0016 \u0000\u0000\u0000\u0014\u0004€\u0003\u0012 \u0000\u0014\u0004€\u0006=\u0000\u0000- F\u0014\u0004€\u0006=\u0000\u0000/\u0000\u000e\u0014\u0004€\u0003\u0011\u0001 \u0003\u0002\u0000\nN%\u0014\u0004€\u0001\u000e@\u000e?>\f\u0011/\u001a\u0002SM\nm%\u001a\u0001Þ\nm%\u0014\u0004€\u0001\u000f\r¼0\nm%@\u000e?>\f\u0011/\u001a\u0002QM\nŒ%\u001a\u0001Þ\nŒ%\u0014\u0004€\u0001\u0010\r¼0\nŒ%@\u000e?>\f\u0011/\u001a\u0002PL\n«%\u001a\u0001Þ\n«%\u0014\u0004€\u0001\u0011\rï/\n«%@\u000e?>\f\u0011/\u001a\u0002PB\nÊ%\u001a\u0001Þ\nÊ%\u0014\u0004€\u0001\u0012\rq/\nÊ%@\u000e?>\f\u0011/\u001a\u0002CB\n" + } + }, + "<3,1,2>": "%\u001a\u0001Þ\n", + "<3,1,3>": "%\u001a\u0001:\n", + "<3,1,4>": "%\u001a\u0001Þ\n", + "<3,1,5>": "%\u001b\u0001:\u0005\u0002\u0000\n", + "<3,1,6>": "%\u0003\u0003\u0000\u001b\u0001:\n", + "<3,1,7>": { + "<3,1,7,1>": "%@\u000e?>\u001a\u0002CB\n\u001e&\u001a\u0001Þ\n\u001e&\u0014\u0004€\u0001\u0013\rq/\n\u001e&\rq/\n\u001e&@\u000e?>\f\u0011/\u001a\u0002CL\nD&\u001a\u0001Þ\nD&\u001b\u0001:\nD&\u0003\u0003\u0000\u001b\u0001:\u0005\u0002\u0000\nD&@\u000e?>\u001a\u0002CL\nf&\u001a\u0001Þ\nf&\u0014\u0004€\u0001\u0014\rq/\nf&\rï/\nf&@\u000e?>\f\u0011/\u001a\u0002CS\n‹&\u001a\u0001Þ\n‹&\u0014\u0004€\u0001\u0015\rq/\n‹&\r‹/\n‹&@\u000e?>\f\u0011/\u001a\u0002CC\n°&\u001a\u0001Þ\n°&\u0014\u0004€\u0001\u0016\rq/\n°&\rd/\n°&@\u000e?>\f\u0011/\u001a\u0002CM\nÏ&\u001a\u0001Þ\nÏ&\u0014\u0004€\u0001\u0017\rq/\nÏ&@\u000e?>\f\u0011/\u001a\u0002PC\nô&\u001a\u0001Þ\nô&\u0014\u0004€\u0001\u0018\r‹/\nô&\rd/\nô&@\u000e?>\f\u0011/\u001a\u0002PO\n\u0013'\u001a\u0001Þ\n\u0013'\u0014\u0004€\u0001\u0019\r‹/\n\u0013'@\u000e?>\f\u0011/\u001a\u0002TL\n2'\u001a\u0001Þ\n2'\u0014\u0004€\u0001\u001a\rï/\n2'@\u000e?>\f\u0011/\u001a\u0002NX\nQ'\u001a\u0001Þ\nQ'\u0014\u0004€\u0001\u001b\rï/\nQ'@\u000e?>\f\u0011/\u001a\u0002AS\np'\u001a\u0001Þ\np'\u0014\u0004€\u0001\u001e\r‹/\np'@\u000e?>\f\u0011/\u001a\u0002AC\n'\u001a\u0001Þ\n'\u0014\u0004€\u0001\u001f\rd/\n'@\u000e?>\f\u0011/\u001a\u0002IN\n®'\u001a\u0001Þ\n®'\u0014\u0004€\u0001!\rq/\n®'@\u000e?>\f\u0011/\u001a\u0002TI\nÇ'\u001a\u0001Þ\nÇ'\u0014\u0004€\u0001\"@\u000e?>\f\u0011/\u001a\u0002TN\nà'\u001a\u0001Þ\nà'\u0014\u0004€\u0001#@\u000e?>\f\u0011/\u001a\u0002TS\nù'\u001a\u0001Þ\nù'\u0014\u0004€\u0001%@\u000e?>\f\u0011/\u001a\u0002TF\n\u0012(\u001a\u0001Þ\n\u0012(\u0014\u0004€\u0001&@\u000e?>\f\u0011/\u001a\u0002SP\n1(\u001a\u0001Þ\n1(\u0014\u0004€\u0001'\r%0\n1(@\u000e?>\f\u0011/\u001a\u0002ST\nP(\u001a\u0001Þ\nP(\u0014\u0004€\u0001(\r%0\nP(@\u000e?>\f\u0011/\u001a\u0002SR\ni(\u001a\u0001Þ\ni(\u0014\u0004€\u0001)@\u000e?>\f\u0011/\u001a\u0002AD\n‚(\u001a\u0001Þ\n‚(\u0014\u0004€\u0001*@\u000e?>\f\u0011/\u001a\u0002RD\n§(\u001a\u0001Þ\n§(\u0014\u0004€\u0001+\rq/\n§(\rq/\n§(@\u000e?>\f\u0011/\u001a\u0002WR\nÌ(\u001a\u0001Þ\nÌ(\u0014\u0004€\u0001,\rq/\nÌ(\rq/\nÌ(@\u000e?>\f\u0011/\u001a\u0002DS\në(\u001a\u0001Þ\në(\u0014\u0004€\u0001-\r<0\në(@\u000e?>\f\u0011/\u001a\u0002TT\n\n)\u001a\u0001Þ\n\n)\u0014\u0004€\u0001/\r%0\n\n)@\u000e?>\f\u0011/\u001a\u0002CE\n/)\u001a\u0001Þ\n/)\u0014\u0004€\u00010\rd/\n/)\r¼0\n/)@\u000e?>\f\u0011/\u001a\u0002NO\nH)\u001a\u0001Þ\nH)\u0014\u0004€\u00011@\u000e?>\f\u0011/\u001a\u0002PS\nm)\u001a\u0001Þ\nm)\u0014\u0004€\u00013\rq/\nm)\rd/\nm)@\u000e?>\f\u0011/\u001a\u0002RJ\nŒ)\u001a\u0001Þ\nŒ)\u0014\u0004€\u00014\rq/\nŒ)@\u000e?>\f\u0011/\u001a\u0002SL\n·)\u001a\u0001Þ\n·)\u0014\u0004€\u00015\rq/\n·)\rd/\n·)\r‹/\n·)@\u000e?>\f\u0011/\u001a\u0002IB\nÖ)\u001a\u0001Þ\nÖ)\u0014\u0004€\u00016\rd/\nÖ)@\u000e?>\f\u0011/\u001a\u0002DP\n", + "<3,1,7,2>": ")\u001a\u0001Þ\n", + "<3,1,7,3>": ")\u0014\u0004€\u00017\rq/\n", + "<3,1,7,4>": ")\rd/\n", + "<3,1,7,5>": ")@\u000e?>\f\u0011/\u001a\u0002BC\n0*\u001a\u0001Þ\n0*\u0014\u0004€\u00018\r%0\n0*\rq/\n0*\r°/\n0*\u0013øuøu\u0013ˆwˆw@\u000e?>\f\u0011/\u001a\u0002LB\nU*\u001a\u0001Þ\nU*\u0014\u0004€\u00019\rd/\nU*\rq/\nU*@\u000e?>\f\u0011/\u001a\u0002LW\nz*\u001a\u0001Þ\nz*\u0014\u0004€\u0001:\rd/\nz*\rq/\nz*@\u000e?>\f\u0011/\u001a\u0002SB\n™*\u001a\u0001Þ\n™*\u0014\u0004€\u0001;\rq/\n™*@\u000e?>\f\u0011/\u001a\u0002CO\nÄ*\u001a\u0001Þ\nÄ*\u0014\u0004€\u0001<\rd/\nÄ*\r%0\nÄ*\rd/\nÄ*@\u000e?>\f\u0011/\u001a\u0002CN\nï*\u001a\u0001Þ\nï*\u0014\u0004€\u0001=\rd/\nï*\r%0\nï*\r¼0\nï*@\u000e?>\f\u0011/\u001a\u0002SS\n\b+\u001a\u0001Þ\n\b+\u0014\u0004€\u0001>@\u000e?>\f\u0011/\u001a\u0002RS\n!+\u001a\u0001Þ\n!+\u0014\u0004€\u0001?@\u000e?>\f\u0011/\u001a\u0002SG\n:+\u001a\u0001Þ\n:+\u0014\u0004€\u0001@@\u000e?>\f\u0011/\u001a\u0002UT\nY+\u001a\u0001Þ\nY+\u0014\u0004€\u0001A\rd/\nY+@\u000e?>\f\u0011/\u001a\u0002RO\nx+\u001a\u0001Þ\nx+\u0014\u0004€\u0001B\rq/\nx+@\u000e?>\f\u0011/\u001a\u0002NM\n‘+\u001a\u0001Þ\n‘+\u0014\u0004€\u0001C@\u000e?>\f\u0011/\u001a\u0002EL\n°+\u001a\u0001Þ\n°+\u0014\u0004€\u0001D\rï/\n°+@\u000e?>\f\u0011/\u001a\u0002EB\nÏ+\u001a\u0001Þ\nÏ+\u0014\u0004€\u0001E\rq/\nÏ+@\u000e?>\f\u0011/\u001a\u0002EM\nè+\u001a\u0001Þ\nè+\u0014\u0004€\u0001F@\u000e?>\f\u0011/\u001a\u0002SC\n\u0007,\u001a\u0001Þ\n\u0007,\u0014\u0004€\u0001G\rï/\n\u0007,@\u000e?>\f\u0011/\u001a\u0002CA\n8,\u001a\u0001Þ\n8,/Þ\n8,\u0013øu2\u0000\b\r\u0000\u0005€\u0006\r\u0000\u0018ˆw\r\u0000\u001a\u0001Þ\n8,@\u000e?>\f\u0011/\u001a\u0002EN\na,\u001a\u0001Þ\na,\rÕ0\na,\u0016\u0004€ùu\u0013\u0004€øu\u0013\u0004€ˆw@\u000e?>\f\u0011/\u001a\u0002OL\n{,\u001a\u0001Þ\n{,\rÕ0\n{,@\u000e?>\f\u0011/\u001a\u0002RH\n•,\u001a\u0001Þ\n•,\rù0\n•,@\u000e?>\f\u0011/\u001a\u0002SZ\n¾,\u001a\u0001Þ\n¾,\b\u0005\u0000\u0005€0\u0005€\u0000\u0000\r¼0\n¾,\b\u0005€\u0005\u0000@\u000e?>\f\u0011/\u001a\u0002SH\n\u001d-\u001a\u0001Þ\n\u001d-\b\u0005\u0000\u0005€0\u0005€\u0002\u0000\rq/\n\u001d-\rq/\n\u001d-\rd/\n\u001d-\rq/\n\u001d-\rq/\n\u001d-\rq/\n\u001d-\rq/\n\u001d-\rq/\n\u001d-\rd/\n\u001d-\rq/\n\u001d-\b\u0005€\u0005\u0000@\u000e?>\f\u0011/\u001a\u0002DM\nY-\u001a\u0001Þ\nY-\u0014\u0004€\u0001\u0014\rq/\nY-\u0014\u0004€\u0001\b\r\u000e0\nY-\rd/\nY-\rq/\nY-\rq/\nY-@\u000e?>\f\u0011/\u001a\u0002MB\n-\u001a\u0001Þ\n-\u0014\u0004€\u0001H\rq/\n-\rq/\n-\rd/\n-\rd/\n-\rd/\n-@\u000e?>\f\u0011/\u001a\u0002QO\n»-\u001a\u0001Þ\n»-\u0014\u0004€\u0001J\rd/\n»-\r%0\n»-\rd/\n»-@\u000e?>\f\u0011/\u001a\u0002QN\næ-\u001a\u0001Þ\næ-\u0014\u0004€\u0001K\rd/\næ-\r%0\næ-\r¼0\næ-@\u000e?>\f\u0011/’\u0000CTCFCIICDCECQCBFBTGOGSRTSMQMPLPBCBCLCSCCCMPCPOTLNXASACINTITNTSTFSPSTSRADRDWRDSTTCENOPSRJSLIBDPBCLBLWSBCOCNSSRSSGUTRONMELEBEMSCCAENOLRHSZSHDMMBQOQNy#˜#·#Ö#õ#\u0014$9$X$w$–$µ$Ô$S%r%‘%°%Ï%#&k&&µ&Ô&ù&\u0018'7'V'u'”'³'Ì'å'" + } + } + }, + "<4>": { + "<4,1>": { + "<4,1,1>": { + "<4,1,1,1>": { + "<4,1,1,1,1>": "'\u0017(6(U(n(‡(¬(Ñ(ð(\u000f)4)M)r)‘)¼)Û)\u0000*5*Z**ž*É*ô*\r+&+?+^+}+–+µ+Ô+í+\f,=,f,€,š,Ã,\"-^-•-À-\u001a\u0001Þ\n\u001f/\u0004\u0002\u0000\u0004\u0002\u0000?\u000e\u000b[/\u0012!\u0002\u0011\u000eINVALID OP AT \b\u000f\u0000\u0019y\u001f\u000f\u0000\u0012\u0001\u0011\u0002 \"/Þ\n[/\u00122\u0000\u0011\u0002\" !2\u0000\u0012!\u0002\u0003\u0002\u0000'Þ\n`/@\u000e?>?\u000e>\r˜/\nm/@\u000e?>?\u000e>\r˜/\nz/@\u000e?>?\u000e>\r˜/\n‡/@\u000e?>?\u000e>\r˜/\n”/@\u000e?>?\u000e>/Þ\n¬/\rD1\n¬/\u001a\u0001Þ\n¬/@\u000e?>?\u000e>#\nÐ/\u00132\u00002\u0000\u00132\u0000n\u0000\u000fâ\u0005\r‹1\nÐ/\u001a\u0001Þ\nÐ/@\u000e?>?\u000e>/Þ\në/\u000fÞ\u0005\r‹1\në/\u001a\u0001Þ\në/@\u000e?>?\u000e>/Þ\n\n0\u0016\u0004€3\u0000\u0007\u0005€\u0013\u0004€2\u0000\u001a\u0001Þ\n\n0@\u000e?>?\u000e>/Þ\n!0\u0013\u0004€2\u0000\u001a\u0001Þ\n!0@\u000e?>?\u000e>/Þ\n80\u0013\u0004€2\u0000\u001a\u0001Þ\n80@\u000e?>?\u000e>/Þ\n~0\u001a\u0001Þ\n~0#\n~06\u0010\u0000\bˆ\u0001\u0010\u0000\u001a\u0001Þ\n~0#\n~0\u0016\u0004€ˆ\u00016\u0010\u0000\u0016\u0004€\u0010\u0000\bˆ\u0001\u0010\u0000\r‚0\n~0\u001a\u0001Þ\n~0@\u000e?>?\u000e>\u000fö\u0005)\u0005\u0002\u0000\u000b§0\u0011\u0001\"\u00122\u0000\u0011\f\" REDEFINED.\u0012!\u0002\u0003\u0002\u0000\n¸0\u000fö\u0005\bˆ\u0001\u0010\u0000*\n¸0@\u000e?>?\u000e>#\nÑ06\u0010\u0000\u0016\u0004€\u0010\u0000\u001a\u0001Þ\nÑ0@\u000e?>?\u000e>#\nõ0\u00132\u00002\u0000\u00132\u0000n\u0000\u000f", + "<4,1,1,1,2>": "\u0005\rÅ1\nõ0\u001a\u0001Þ\nõ0@\u000e?>?\u000e>/Þ\n@1\u000fò\u0005\rÅ1\n@1\u001a\u0001Þ\n@1\t\u0006\u0000\n81\u0014\u0004€\u0001\u0011\u0016\u0004€3\u0000\u0007\u0005€\u0013\u0004€2\u0000\u0014\u0004€\u0004\u0011\u0002: \u0013P\u0000P\u0000\u0013P\u00002\u0000\u0003\u0002\u0000\n@1@\u000e?>?\u000e>\u000fâ\u0005)\nY1\u0010ö\u0005\nY1\u0016\u0004€ˆ\u0001@\u000e?>\u0011\u0001\"\u00122\u0000\u0011\u0017\" HAS NOT BEEN DEFINED.\u0012!\u0002\u0004\u0002\u0000\u0016\u0004€\u0002\u0000@\u000e?>?\u000e>\u000fê\u0005)\u000b™1\u0004ˆ\u0001\u0003\u0002\u0000\n©1\u0010æ\u0005\n©1\u0016\u0004€ˆ\u0001@\u000e?>\u0016\u0004€ˆ\u0001\bˆ\u0001\u0005€=ˆ\u0001-\u0002\u0000*\nÁ1@\u000e?>?\u000e>)\u000bÐ1\u0004ˆ\u0001\u0003\u0002\u0000\n\u00032\u0010ê\u0005\n\u00032\b\u0003\u0000\u0005€\u0006\u0003\u0000\r\u00142\u0003\u0002\u0000\n\u00032\bˆ\u0001\u0003\u0000\u0007\u0003\u0000\b\u0005€\u0003\u0000\u000fæ\u0005*\n\u00032\u0004\u0003\u0000@\u000e?>\rA2\u0003\u0002\u0000\n\u00102@\u000e?>?\u000e>\tˆ\u0001\n82\b\u0005€ˆ\u0001:\u000f\u0000\u0004€=\u0005€-\u0002\u0000\bˆ\u0001\u000f\u0000\u0016\u0004€\u0003\u0000\f\u00152\u0003\u0002\u0000@\u000e?>?\u000e>\u0011\u0001\"\u00122\u0000\u0011\u001c\" IS DEFINED MORE THAN ONCE.\u0012!\u0002@\u000e?>?\u000e" + } + } + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSPROCS%003AMETA95_RUN.json b/SYSPROG/APPROW/SYSPROCS%003AMETA95_RUN.json new file mode 100644 index 0000000..fd898d8 --- /dev/null +++ b/SYSPROG/APPROW/SYSPROCS%003AMETA95_RUN.json @@ -0,0 +1,173 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "META95.RUN" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": "", + "<1,1,2>": "" + } + } + }, + "record2": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "\u0002€$\u0002\u0002\u00002\u0000n\u0000s\u0000", + "<1,1,1,1,2>": "\u0000\u0001\u000f\u0000Ï\u0007-" + } + }, + "<1,1,2>": "" + } + } + }, + "record3": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "\u0002€-\u0002\u0000\u0004€-Ð\u0007\u0018y-<\u00002\u0000-<\u0000P\u0000-\n\u0000n\u0000-\u000e\u0001s\u0000-\u000e\u0001", + "<1,1,1,1,2>": "\u0000-\n\u0000\u0001-\u0006\u0000†\u0001-<\u0000Â\u0001-<\u0000å\u0001-<\u0000\u0003\u0002-\u0006\u0000!\u0002-<\u0000$\u0002- \u0003Ü\u0005-È\u0000l\u0007- ËÏ\u0007- \u0003øu- \u0003ˆw-\u0002\u0000\u0002\u0000-È\u00000u-È\u0000”u- \u0003ˆw-\u0002\u0000\u0002\u0000-\u0002\u0000\u0002\u0000-\u0002\u0000\u0003\u0000-\u0002\u0000\u0004\u0000-\u0002\u0000\u0005\u0000-\u0002\u0000\u0006\u0000-\u0002\u0000\u0007\u0000-\u0002\u0000\b\u0000-\u0002\u0000\t\u0000-\u0002\u0000\n\u0000-\u0002\u0000\r\u0000-\u0002\u0000\u000e\u0000-\u0002\u0000\u000f\u0000-\u0002\u0000\u0010\u0000-\u0002\u0000\u0011\u0000-\u0002\u0000ùu-\u0002\u0000\u0003€-\u0002\u0000\u0005€-\u0002\u00003\u0000-\u0002\u0000\u0019y-\u0002\u0000ˆ\u0001-\u0002\u0000Q\u0000-\u0002\u00001u-\u0002\u0000•u-\u0002\u0000Ã\u0001\u0014Ü\u0005\b\u0010\u0000\r\u00002\u0000†\u0001\u0014Ü\u0005\b \u0000\r\u00002\u0000†\u0001\u0014Ü\u0005\b\u0001\u0005\r\u00002\u0000†\u0001\u0014Ü\u0005\b\u0002\t\r\u00002\u0000†\u0001\u0014Ü\u0005\b\u0011\u0015\r\u00002\u0000†\u0001\u0014Ü\u0005\b\u0012\u0019\r\u00002\u0000†\u0001\u0014Ü\u0005\b!\u0015\r\u00002\u0000†\u0001\u0014Ü\u0005\b\"\u0019\r\u00002\u0000†\u0001\u0014Ü\u0005\b\u0002\u0019\r\u00002\u0000†\u0001\u0014Ü\u0005\b\")\r\u00002\u0000†\u0001\u0013†\u0001†\u0001\u0016†\u0001ˆ\u0001\u0017\u0002€\u0014\u0002€\u0003END\u0017\u0002€4\u0002€\u0013\u0004€\u0004€0\u000e\u0000è\u000301u\u0000\u00000•u\u0000\u00000\n\u0000\u0000\u0000\u0014!\u0002\u0002\r\n>\r\u0007\"\u0003\u0002\u0000\n" + } + } + } + }, + "<2>": "\u00010\u0005€\u0016\u0000\r!\u0002\n", + "<3>": "\u0001\u0003\u0004\u0000\u000fæ\u0005\r.\u0002\n", + "<4>": "\u0001\u000fê\u0005\r.\u0002\n", + "<5>": "\u0001\t\u0004\u0000\n", + "<6>": "\u0001\ry\"\n", + "<7>": "\u0001\r\u0017\u0002\n", + "<8>": "\u0001B\u0004€@\u000e?>\r™\"\u0003\u0002\u0000\n\u0013\u0002\u0013\u0004€\u0004€B\u0004€@\u000e?>?\u000e>\u0003\u0002\u0000@\u000e?>?\u000e>\ro\u0002\n*\u0002@\u000e?>?\u000e>\u0012!\u0002\u0004\u0003\u0000A\u0003\u0000\t\u0003\u0000\nf\u0002\u0010", + "<9>": "\u0005\nZ\u0002\u0004\u0004\u0000\u00122\u0000\u0011\u000b UNDEFINED!\u0012!\u0002\u000b`\u0002\u0003\u0002\u0000\nf\u0002\f5\u0002\u0003\u0002\u0000@\u000e?>?\u000e>\rã \ny\u0002\fp\u0002\u0003\u0002\u0000\rÄ\u0002\nÀ\u0002\rù\u0002\n‹\u0002\f‚\u0002\u0003\u0002\u0000\r:\u0003\nÀ\u0002\rR\u0004\nÀ\u0002\r7\b\n¯\u0002\rã \n©\u0002\f \u0002\u0003\u0002\u0000\fš\u0002\u0003\u0002\u0000\rÆ!\nÀ\u0002\rÊ\"\nÀ\u0002@\u000e?>?\u000e>\u001a\u000bDEFINITION \nõ\u0002\u001a\u0001<\nõ\u0002\r¥!\nõ\u0002\u001a\u0001>\nõ\u0002\r", + "<10>": " \nõ\u0002\rÊ\"\nõ\u0002@\u000e?>?\u000e>\rÊ\"\n,\u0003\u001a\u0007DEFINE \n,\u0003\r¯\u0004\u000b\u0015\u0003\ra\u0005\u000b\u001b\u0003\r\u0011\u0006\u000b!\u0003\rÅ\u0006\u000b'\u0003\ri\u0007\n,\u0003@\u000e?>\rã \n6\u0003@\u000e?>?\u000e>\rã \nD\u0003\f;\u0003\u0003\u0002\u0000\u001a\u0006DEFINE\nN\u0004\u001a\u0004DATA\nN\u0004\u001a\u0004SIZE\nN\u0004#\nN\u0004\u0014\u0018y\u0002SZ\u0017\u0018y\u0013\u0018yn\u0000\u0017\u0018y(Þ\r", + "<11>": " \nN\u0004\rã \nŠ\u0003\f\u0003\u0003\u0002\u0000\u001a\u0006DEFINE\nN\u0004\u001a\bSTANDARD\nN\u0004\u001a\u0005NAMES\nN\u0004\u0014\u0018y\u0002SH\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rð\u001f\nN\u0004\u0013\u0018y2\u0000\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y\rð\u001f\nN\u0004\u0013\u0018y2\u0000\u0017\u0018y\rJ\u001f\nN\u0004\u0013\u0018y\u0003\u0002\u0017\u0018y(Þ\r", + "<12>": " \nN\u0004@\u000e?>?\u000e>\rã \n\\\u0004\fS\u0004\u0003\u0002\u0000\u001a\nINITIALIZE\n«\u0004\r", + "<13>": " \n«\u0004\rä!\n}\u0004\ft\u0004\u0003\u0002\u0000\u001a\u0003END\n«\u0004\u001a\nINITIALIZE\n«\u0004\r", + "<14>": " \n«\u0004\rã \n¦\u0004\f\u0004\u0003\u0002\u0000@\u000e?>?\u000e>\u001a\u0007BUFFERS\në\u0004\r", + "<15>": " \në\u0004\rï\u0004\nË\u0004\fÂ\u0004\u0003\u0002\u0000\u001a\u0004END \në\u0004\u001a\u0007BUFFERS\në\u0004\r", + "<16>": " \në\u0004@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\n\u0000\u0005@>\f\u0007\u0005\u0004\u0002\u0000?\u000e@\u000e?>\rã \n\u0011\u0005@\u000e?>/ \n]\u0005\u0014\u0018y\u0002DS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u001a\u0005SIZE \n]\u0005#\n]\u0005\u0013\u0018yn\u0000\u0017\u0018y\u001a\u0003AT \n]\u0005#\n]\u0005\u0013\u0018yn\u0000\u0017\u0018y(Þ\r", + "<17>": " \n]\u0005@\u000e?>?\u000e>\u001a\u0006STACKS\n›\u0005\r", + "<18>": " \n›\u0005\rŸ\u0005\n|\u0005\fs\u0005\u0003\u0002\u0000\u001a\u0004END \n›\u0005\u001a\u0006STACKS\n›\u0005\r", + "<19>": " \n›\u0005@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\n°\u0005@>\f·\u0005\u0004\u0002\u0000?\u000e@\u000e?>\rã \nÁ\u0005@\u000e?>/ \n\r\u0006\u0014\u0018y\u0002DS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u001a\u0005SIZE \n\r\u0006#\n\r\u0006\u0013\u0018yn\u0000\u0017\u0018y\u001a\u0003AT \n\r\u0006#\n\r\u0006\u0013\u0018yn\u0000\u0017\u0018y(Þ\r", + "<20>": " \n\r\u0006@\u000e?>?\u000e>\u001a\bCOUNTERS\nO\u0006\r", + "<21>": " \nO\u0006\rS\u0006\n.\u0006\f%\u0006\u0003\u0002\u0000\u001a\u0004END \nO\u0006\u001a\bCOUNTERS\nO\u0006\r", + "<22>": " \nO\u0006@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\nd\u0006@>\fk\u0006\u0004\u0002\u0000?\u000e@\u000e?>\rã \nu\u0006@\u000e?>/ \nÁ\u0006\u0014\u0018y\u0002DS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u001a\u0005SIZE \nÁ\u0006#\nÁ\u0006\u0013\u0018yn\u0000\u0017\u0018y\u001a\u0003AT \nÁ\u0006#\nÁ\u0006\u0013\u0018yn\u0000\u0017\u0018y(Þ\r", + "<23>": { + "<23,1>": " \nÁ\u0006@\u000e?>?\u000e>\u001a\u0005LISTS\n", + "<23,2>": "\u0006\r" + }, + "<24>": { + "<24,1>": " \n", + "<24,2>": "\u0006\r\u0001\u0007\nß\u0006\fÖ\u0006\u0003\u0002\u0000\u001a\u0004END \n", + "<24,3>": "\u0006\u001a\u0005LISTS\n", + "<24,4>": "\u0006\r" + }, + "<25>": { + "<25,1>": " \n", + "<25,2>": "\u0006@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\n\u0012\u0007@>\f\u0019\u0007\u0004\u0002\u0000?\u000e@\u000e?>\rã \n#\u0007@\u000e?>/ \ne\u0007\u0014\u0018y\u0002DL\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y/ \ne\u0007\u0013\u0018y2\u0000\u0017\u0018y/ \nX\u0007\u0013\u0018y2\u0000\u0017\u0018y\fH\u0007\u0003\u0002\u0000(Þ\r" + }, + "<26>": " \ne\u0007@\u000e?>?\u000e>\u001a\u0005MASKS\n§\u0007(Þ\r", + "<27>": " \n§\u0007\u0013Ü\u0005Ü\u0005\r«\u0007\nŠ\u0007\f\u0007\u0003\u0002\u0000\u001a\u0003END\n§\u0007\u001a\u0005MASKS\n§\u0007\r", + "<28>": " \n§\u0007@\u000e?>?\u000e>\u001b\u0003END\u0005\u0002\u0000\n¼\u0007@>\fÃ\u0007\u0004\u0002\u0000?\u000e@\u000e?>\rã \nÍ\u0007@\u000e?>/ \n3\b3l\u0007\u000f\u0000\n3\b\u0014\u0018y\u0002DM\u0017\u0018y%\n3\b\u0014\u0018y\u0007;MASKS;\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y\rð\u001f\n3\b\u0013\u0018y2\u0000\u0017\u0018y\rJ\u001f\n3\b\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\n3\b\u0013\u0018y\u0003\u0002\u0017\u0018y(Þ\r", + "<29>": " \n3\b@\u000e?>?\u000e>\u001a\u0001<\nØ\b\r¥!\nØ\b\u001a\u0001>\nØ\b\u0014\u0018y\u0002RH\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y\ræ\b\nØ\b\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y\rÊ\"\nØ\b\b\u0003\u0000\u000e\u0000\rÜ\b\nØ\b=\u000e\u0000-è\u0003\t\u000e\u0000\nÉ\b\u0007\u0003\u0000\u0007\u000e\u0000\b\u000f\u0000\u0003\u0000\u001f\u000f\u0000\u0013\u0018y\u0001\u0017\u0018y\u00132\u00002\u0000\u00132\u0000\u0001\u000f\u0002\u0006\u0004ˆ\u0001*\nÉ\b\u0006\n\u0000\f“\b\u0003\u0002\u0000\u0013\u0018y\u0018y0\u000e\u0000è\u0003@\u000e?>?\u000e>\u0003\u0002\u0000@\u000e?>?\u000e>\rÊ\"\nö\b\r" + }, + "record4": { + "<1>": "\b\nö\b\fç\b\u0003\u0002\u0000@\u000e?>?\u000e>\u001a\u0001=\n\u0006\t\u0003\u0002\u0000\n&\t\r\t\n&\t\rP\n\n\u001b\t\f\u0012\t\u0003\u0002\u0000\r\u0004\n\n&\t@\u000e?>\u001a\u0001=\n‚\t\u00180u\u000e\u0000\r§\n\n<\t\f3\t\u0003\u0002\u0000\r", + "<2>": " \n‚\t\u0014\u0018y\u0002SG\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y@\u000e?>\rã \nŒ\t@\u000e?>?\u000e>\u001a\u0005BEGIN\n\u0000\n\u001a\u0004CASE\n\u0000\n\u0014\u0018y\u0002BC\u0017\u0018y\u001a\u0004BYTE\n¾\t\u0014\u0018y\u0001B\u0017\u0018y\u000bÒ\t\u001a\u0004WORD\nÒ\t\u0014\u0018y\u0001W\u0017\u0018y\n\u0000\n\rJ\u001f\n\u0000\n\u0013\u0018y\u0003\u0002\u0017\u0018y\r", + "<3>": " \n\u0000\n\u0018”u\u000e\u0000\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u00180u\u000e\u0000@\u000e?>?\u000e>\u001a\u0003END\nL\n\u001a\u0004CASE\nL\n\r", + "<4>": " \nL\n\u0014\u0018y\u0002EN\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u@\u000e?>?\u000e>\rã \nY\n@\u000e?>\u001a\u0004CASE\n£\n\r»!\n£\n\u0014\u0018y\u0002CA\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y\r", + "<5>": " \n\n\u0003\u0002\u0000\n£\n\ræ\b\n£\n\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>\rÔ\n\u000b±\n\r*\u0013\u000b¼\n\u001a\u0001*\n¼\n(Þ\u000bË\n\r\u000b\nË\n\rÊ\"\nË\n\nÐ\n@\u000e?>?\u000e>\rç\n\u000bÞ\n\rù\u0011\nã\n@\u000e?>?\u000e>\r\u0018\u000b\n\u0014\u000b\r< \u0003\u0002\u0000\n\u0014\u000b\r°\u000b\n\u0000\u000b\f÷\n\u0003\u0002\u0000\r» \u000b\u000f\u000b\rÈ \u0003\u0002\u0000\n\u0014\u000b@\u000e?>?\u000e>\r" + }, + "record5": { + "<1>": "\u000b\n!\u000b@\u000e?>\r)\f\n+\u000b@\u000e?>\rE\f\n5\u000b@\u000e?>\rg\f\n?\u000b@\u000e?>\r–\u000e\nI\u000b@\u000e?>\r¿\u000f\nS\u000b@\u000e?>\rá\u000f\n]\u000b@\u000e?>\r\u0015\u0010\ng\u000b@\u000e?>\r‚\u0012\nq\u000b@\u000e?>\rÑ\u000e\n{\u000b@\u000e?>\r\u000b\n‹\u000b\r\u0018\u000b\n‹\u000b@\u000e?>?\u000e>\u001a\u0001+\n¬\u000b\u001a\u0001*\nž\u000b(Þ\u0003\u0002\u0000\n¬\u000b\r", + "<2>": { + "<2,1>": { + "<2,1,1>": { + "<2,1,1,1>": " \n¬\u000b@\u000e?>?\u000e>\u001a\u0004ELSE\n", + "<2,1,1,2>": "\u000b\u0018”u\u000e\u0000\u0014\u0018y\u0002BT\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\r\u0018\u000b\n", + "<2,1,1,3>": "\u000b\r< \u0003\u0002\u0000\n", + "<2,1,1,4>": "\u000b\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u@\u000e?>?\u000e>\u001a\u0001<\n%\f\r¥!\n%\f\u001a\u0001>\n%\f\u0014\u0018y\u0002GS\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>%\nA\f\u0014\u0018y\u0002TL\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001>\nc\f%\nc\f\u0014\u0018y\u0002SC\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>?\u000e>\u001b\u0001%\ns\f@>\fz\f\u0004\u0002\u0000?\u000e@\u000e?>\u001a\b%TESTID%\n”\f\u0014\u0018y\u0002TI\u0017\u0018y@\u000e?>\u001a\t%TESTINT%\n¯\f\u0014\u0018y\u0002TN\u0017\u0018y@\u000e?>\u001a\t%TESTSTR%\nÊ\f\u0014\u0018y\u0002TS\u0017\u0018y@\u000e?>\u001a\t%TESTNUM%\nå\f\u0014\u0018y\u0002NM\u0017\u0018y@\u000e?>\u001a\t%TESTEOL%\n\b\r\u0014\u0018y\u0002TL\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\u001a\n%TESTWORD%\n,\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001 \u0017\u0018y@\u000e?>\u001a\u000b%TESTCOMMA%\nQ\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001,\u0017\u0018y@\u000e?>\u001a\n%TESTSEMI%\nu\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001;\u0017\u0018y@\u000e?>\u001a\n%TESTDICT%\n™\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001}\u0017\u0018y@\u000e?>\u001a\u000b%TESTVALUE%\n¾\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001" + } + }, + "<2,2>": "\u0017\u0018y@\u000e?>\u001a\n%TSTPAREN%\nâ\r\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001)\u0017\u0018y@\u000e?>\u001a\t%IDTOEOL%\n\u0005\u000e\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\u001a\r%IDTOPERCENT%\n,\u000e\u0014\u0018y\u0002TT\u0017\u0018y\u0014\u0018y\u0001%\u0017\u0018y@\u000e?>\u001a\b%SEARCH%\nF\u000e\u0014\u0018y\u0002SR\u0017\u0018y@\u000e?>\u001a\b%ADDSYM%\n`\u000e\u0014\u0018y\u0002AD\u0017\u0018y@\u000e?>\u001a\t%PUTMASK%\n’\u000e\u0014\u0018y\u0002PS\u0017\u0018y\u0014\u0018y\u0005;MNS;\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001(\nÍ\u000e\u00180u\u000e\u0000\r§\n\n«\u000e\f¢\u000e\u0003\u0002\u0000\u001a\u0001)\nÍ\u000e\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u@\u000e?>?\u000e>\u001a\u0002{[\n@\u000f\u0018”u\u000e\u0000\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u00180u\u000e\u0000\rD\u000f\n@\u000f\r§\n\n\u0006\u000f\f", + "<2,3>": "\u000e\u0003\u0002\u0000\u0014\u0018y\u0002GO\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u001a\u0002]}\n@\u000f\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u00190u\u0019”u@\u000e?>?\u000e>\r\u0018\u000b\n»\u000f\r< \nQ\u000f\u0003\u0002\u0000\n»\u000f\u001a\u0001S\n]\u000f\u0003\u0002\u0000\n»\u000f\u0018”u\u000e\u0000\u0014\u0018y\u0002BT\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u@\u000e?>?\u000e>\u001a\u0001=\nÝ\u000f%\nÝ\u000f\u0014\u0018y\u0002NX\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001#\n\u0011\u0010%\n\u0011\u0010\u0014\u0018y\u0002NX\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y\u0014\u0018y\u0002CI\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001?\n>\u0010\r\u001a \n>\u0010\u001a\u0001?\n>\u0010\u0014\u0018y\u0002QM\u0017\u0018y\u001f\u000f\u0000\u0013\u0018y\u0001\u0017\u0018y@\u000e?>\u001a\u0001?\n^\u0010\rð\u001f\n^\u0010\u0013\u0003\u0002\u0003\u0002\u0013\u0003\u00022\u0000\rb\u0010\n^\u0010@\u000e?>?\u000e>\u001a\u0001?\n|\u0010\u0014\u0018y\u0002QC\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>\u001a\u0001=\nª\u0010\rÆ\u0011\nª\u0010\u001a\u0001?\nª\u0010\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001=\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002!=\nÙ\u0010\rÆ\u0011\nÙ\u0010\u001a\u0001?\nÙ\u0010\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001!\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002<>\n\b\u0011\rÆ\u0011\n\b\u0011\u001a\u0001?\n\b\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001!\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001<\n6\u0011\rÆ\u0011\n6\u0011\u001a\u0001?\n6\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001<\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002<=\ne\u0011\rÆ\u0011\ne\u0011\u001a\u0001?\ne\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001{\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001>\n“\u0011\rÆ\u0011\n“\u0011\u001a\u0001?\n“\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001>\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0002>=\nÂ\u0011\rÆ\u0011\nÂ\u0011\u001a\u0001?\nÂ\u0011\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001}\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>#\nÞ\u0011\u00132\u00002\u0000\u00132\u0000n\u0000\u0014\u0018y\u0002QN\u0017\u0018y\u000bð\u0011\rð\u001f\nð\u0011\u0014\u0018y\u0002QO\u0017\u0018y\nõ\u0011@\u000e?>?\u000e>\r°!\n\u0000\u0012\u0003\u0002\u0000\n~\u0012\u001a\u0001{\n~\u0012\u0018”u\u000e\u0000\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u00180u\u000e\u0000\r§\n\n3\u0012\f*\u0012\u0003\u0002\u0000\u0014\u0018y\u0002GO\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u001a\u0001}\n~\u0012\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u00190u\u0019”u@\u000e?>?\u000e>\u001a\u0001[\nè\u0012\u00180u\u000e\u0000\rì\u0012\nè\u0012\r§\n\n\u0012\f”\u0012\u0003\u0002\u0000\u001a\u0001]\nè\u0012\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0019”u\u00190u@\u000e?>?\u000e>\r\u0018\u000b\n&\u0013\r< \nù\u0012\u0003\u0002\u0000\n&\u0013\u001a\u0001S\n\u0005\u0013\u0003\u0002\u0000\n&\u0013\u0018”u\u000e\u0000\u0014\u0018y\u0002BF\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>\r‡\u0013\n3\u0013@\u000e?>\r$\u001b\n=\u0013@\u000e?>\rö\u001b\nG\u0013@\u000e?>\rÕ\u001d\nQ\u0013@\u000e?>\r.\u001e\n[\u0013@\u000e?>\rs\u001e\ne\u0013@\u000e?>\r¸\u001e\no\u0013@\u000e?>\rÝ\u001e\ny\u0013@\u000e?>\r\u0011\u001f\nƒ\u0013@\u000e?>?\u000e>\u001a\u0007ERRMSG(\nÃ\u0013\rí\u001a\nÃ\u0013\u001a\u0001,\u000b¦\u0013\u0003\u0002\u0000\f¯\u0013\rí\u001a\n¯\u0013\fš\u0013\nÃ\u0013\u001a\u0001)\nÃ\u0013\u0014\u0018y\u0002EM\u0017\u0018y@\u000e?>\u001a\u0001%\nÐ\u0013@>\f×\u0013\u0004\u0002\u0000?\u000e@\u000e?>8W\u0002€¡\u001a\u001a\u0006TRIMF%\nõ\u0013\u0014\u0018y\u0002TF\u0017\u0018y@\u000e?>\fë\u001a\u001a\nSKIPTOEOL%\n\u001c\u0014\u0014\u0018y\u0002ST\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\u001a\nSKIPTOEOS%\n@\u0014\u0014\u0018y\u0002ST\u0017\u0018y\u0014\u0018y\u0001;\u0017\u0018y@\u000e?>\u001a\tSKIPPEOL%\nc\u0014\u0014\u0018y\u0002SP\u0017\u0018y\u0014\u0018y\u0001Þ\u0017\u0018y@\u000e?>\fë\u001a\u001a\bPUSHLAB%\n—\u0014\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0005$LABS\u0017\u0018y\u0014\u0018y\u0004#BIN\u0017\u0018y@\u000e?>\fë\u001a\u001a\tRETFALSE%\nÐ\u0014\u0014\u0018y\u0002CF\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y@\u000e?>\u001a\u000bRETURN.OBJ%\nõ\u0014\u0014\u0018y\u0002RO\u0017\u0018y\u0014\u0018y\u0001@\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007GENFAL%\n(\u0015\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0006$FALSE\u0017\u0018y\u0014\u0018y\u0003#NL\u0017\u0018y@\u000e?>\u001a\bGENLOOP%\nX\u0015\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0005$LOOP\u0017\u0018y\u0014\u0018y\u0003#NL\u0017\u0018y@\u000e?>\u001a\bGETBYTE%\n…\u0015\u0014\u0018y\u0002LB\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\u001a\fGETBYTEFROM%\n¼\u0015\u0014\u0018y\u0002LB\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\rJ\u001f\n¼\u0015\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>\u001a\bGETWORD%\né\u0015\u0014\u0018y\u0002LW\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\u001a\u0007GENAUX%\n\u0017\u0016\u0014\u0018y\u0002PC\u0017\u0018y\u0014\u0018y\u0004$AUX\u0017\u0018y\u0014\u0018y\u0003#NL\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007OUTFAL%\n]\u0016\u0014\u0018y\u0002AS\u0017\u0018y\u0014\u0018y\u0006$FALSE\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y\u0014\u0018y\u0005;NUM;\u0017\u0018y@\u000e?>\u001a\bOUTLOOP%\n \u0016\u0014\u0018y\u0002AS\u0017\u0018y\u0014\u0018y\u0005$LOOP\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y\u0014\u0018y\u0005;NUM;\u0017\u0018y@\u000e?>\u001a\u0007OUTSEQ%\ná\u0016\u0014\u0018y\u0002AC\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y\u0014\u0018y\u0005;NUM;\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007POPFAL%\n\n\u0017\u0014\u0018y\u0002PO\u0017\u0018y\u0014\u0018y\u0006$FALSE\u0017\u0018y@\u000e?>\u001a\bPOPLOOP%\n0\u0017\u0014\u0018y\u0002PO\u0017\u0018y\u0014\u0018y\u0005$LOOP\u0017\u0018y@\u000e?>\u001a\u0007POPAUX%\nT\u0017\u0014\u0018y\u0002PO\u0017\u0018y\u0014\u0018y\u0004$AUX\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007SAVEID%\n¨\u0017\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0005;SID;\u0017\u0018y\u0014\u0018y\u0005;SID;\u0017\u0018y\u0014\u0018y\u0002CB\u0017\u0018y\u0014\u0018y\u0005;SID;\u0017\u0018y\u0014\u0018y\u0004;ID;\u0017\u0018y@\u000e?>\fë\u001a\u001a\tCONTINUE%\n7\u0018\u0018”u\u000e\u0000\u0014\u0018y\u0002BF\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002SG\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y\u0014\u0018y\u0002OL\u0017\u0018y\u001e”u\u0013\u0018y\u0001\u0017\u0018y\u0019”u\u0014\u0018y\u0002CF\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002RS\u0017\u0018y\u0014\u0018y\u0002RT\u0017\u0018y@\u000e?>\fë\u001a\u001a\nMOVEBYTES%\nt\u0018\u0014\u0018y\u0002MB\u0017\u0018y\rJ\u001f\nt\u0018\rJ\u001f\nt\u0018\rð\u001f\nt\u0018\rð\u001f\nt\u0018\rð\u001f\nt\u0018@\u000e?>\fë\u001a\u001a\tTOBINARY%\n\u0018\u0014\u0018y\u0002IB\u0017\u0018y\u0014\u0018y\u0004#BIN\u0017\u0018y@\u000e?>\u001a\bTOASCII%\nÂ\u0018\u0014\u0018y\u0002AC\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y@\u000e?>\fë\u001a\u001a\tSTORELAB%\n" + } + }, + "record6": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": { + "<1,1,1,1,1>": "\u0018\u0014\u0018y\u0002SL\u0017\u0018y\u0014\u0018y\u0001@\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0005$LABS\u0017\u0018y@\u000e?>\fë\u001a\u001a\tRJSOURCE%\n%\u0019\u0014\u0018y\u0002RJ\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0007SOURCE%\nO\u0019\rJ\u001f\nO\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>\u001a\rSOURCE.COLON%\nv\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0014\u0018y\u0001:\u0017\u0018y@\u000e?>\u001a\u000eSOURCE.NORMAL%\nž\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0014\u0018y\u0001&\u0017\u0018y@\u000e?>\u001a\fSOURCE.OPTS%\nÉ\u0019\u0014\u0018y\u0002SB\u0017\u0018y\u0014\u0018y\u0006;OPTS;\u0017\u0018y@\u000e?>\fë\u001a\u001a\bWORDOBJ%\n\u001d\u001a\u0014\u0018y\u0002LW\u0017\u0018y\u0014\u0018y\u0004#SEQ\u0017\u0018y\u0014\u0018y\u0001@\u0017\u0018y\u0014\u0018y\u0002CN\u0017\u0018y\u0014\u0018y\u0004#OBJ\u0017\u0018y\u0014\u0018y\u0001-\u0017\u0018y\u0014\u0018y\u00012\u0017\u0018y@\u000e?>\fë\u001a\u001a\u0004DUP%\nM\u001a\u0014\u0018y\u0002DP\u0017\u0018y\u0014\u0018y\u0005;DUP;\u0017\u0018y\u0014\u0018y\u0004#DUP\u0017\u0018y@\u000e?>\fë\u001a\u001a\tEXCHANGE%\nt\u001a\u0014\u0018y\u0002SG\u0017\u0018y\u0014\u0018y\u0002SS\u0017\u0018y@\u000e?>\fë\u001a\u001a\tUNTHREAD%\nœ\u001a\u0014\u0018y\u0002UT\u0017\u0018y\u0014\u0018y\u0003#C1\u0017\u0018y@\u000e?>\fë\u001a$\u0000TRSKPUREGEOUPOSACOMBTOSTRJSOWODUEXUNß\u0013", + "<1,1,1,1,2>": "\u0013h\u0014œ\u0014", + "<1,1,1,1,3>": "\u0014\u001c\u0016æ\u0016Y\u0017­\u0017<\u0018y\u0018Ç\u0018\u0004\u0019*\u0019Î\u0019\"\u001aR\u001ay\u001a?\u000e>%\n\u0005\u001b\u0014\u0018y\u0002EL\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>\rJ\u001f\n \u001b\u0014\u0018y\u0002EB\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\rJ\u001f\nL\u001b\r»!\nL\u001b\u0014\u0018y\u0002CL\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>\rJ\u001f\n\u001b\u0013å\u0001å\u0001\u0013å\u0001\u0003\u0002\rJ\u001f\n\u001b\u0014\u0018y\u0002CB\u0017\u0018y\u0013\u0018yå\u0001\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>\rJ\u001f\n¨\u001b\rÆ\u001f\n¨\u001b\u0014\u0018y\u0002CS\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rJ\u001f\nÑ\u001b\rð\u001f\nÑ\u001b\u0014\u0018y\u0002CC\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rJ\u001f\nò\u001b\u001a\u0001^\nò\u001b\u0014\u0018y\u0002CM\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001!\n\u001f\u001c\r\u001a \n\u001f\u001c\u001a\u0001!\n\u001f\u001c\u0014\u0018y\u0002SM\u0017\u0018y\u001f\u000f\u0000\u0013\u0018y\u0001\u0017\u0018y@\u000e?>\rð\u001f\nA\u001c\u001a\u0002=T\nA\u001c\u0014\u0018y\u0002CT\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rð\u001f\nc\u001c\u001a\u0002=F\nc\u001c\u0014\u0018y\u0002CF\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rð\u001f\n…\u001c\u001a\u0002=I\n…\u001c\u0014\u0018y\u0002CI\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rð\u001f\n²\u001c\u001a\u0001=\n²\u001c#\n²\u001c\u0014\u0018y\u0002CE\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\u0013\u0018yn\u0000\u0017\u0018y@\u000e?>\rð\u001f\ná\u001c\u001a\u0001=\ná\u001c\u0014\u0018y\u0002EC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\rð\u001f\ná\u001c\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\rð\u001f\n" + }, + "<1,1,1,2>": "\u001c\u0013\u0003\u0002\u0003\u0002\u0013\u0003\u00022\u0000\r" + } + } + } + }, + "record7": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "\u001c\n", + "<1,1,1,2>": { + "<1,1,1,2,1>": "\u001c@\u000e?>?\u000e>\u001a\u0001+\n&\u001d\r¢\u001d\n&\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001+\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001-\nN\u001d\r¢\u001d\nN\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001-\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001*\nv\u001d\r¢\u001d\nv\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001*\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001/\nž\u001d\r¢\u001d\nž\u001d\u0013\u0018y\u0003\u0002\u0017\u0018y\u0014\u0018y\u0001/\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>#\nº\u001d\u00132\u00002\u0000\u00132\u0000n\u0000\u0014\u0018y\u0002CN\u0017\u0018y\u000bÌ\u001d\rð\u001f\nÌ\u001d\u0014\u0018y\u0002CO\u0017\u0018y\nÑ\u001d@\u000e?>?\u000e>\u001a\u0001+\n\t\u001e\rÆ\u001f\n\t\u001e\u001a\u0001,\n\t\u001e\u0014\u0018y\u0002PC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y\rð\u001f\n\t\u001e\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001-\n*\u001e\rÆ\u001f\n*\u001e\u0014\u0018y\u0002PO\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001+\nN\u001e\rð\u001f\nN\u001e\u0014\u0018y\u0002IC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>\u001a\u0001-\no\u001e\rð\u001f\no\u001e\u0014\u0018y\u0002DC\u0017\u0018y\u0013\u0018y2\u0000\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001P\n“\u001e\r»!\n“\u001e\u0014\u0018y\u0002PL\u0017\u0018y\u0013\u0018ys\u0000\u0017\u0018y@\u000e?>\u001a\u0001P\n´\u001e\rJ\u001f\n´\u001e\u0014\u0018y\u0002PB\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\rJ\u001f\nÙ\u001e\u001a\u0002,K\nÙ\u001e\u0014\u0018y\u0002IN\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\rJ\u001f\n\r\u001f\u001a\u0003,D,\n\r\u001f\u0014\u0018y\u0002RD\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\n\r\u001f\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\u001a\u0002D,\nF\u001f\rJ\u001f\nF\u001f\u001a\u0001,\nF\u001f\u0014\u0018y\u0002WR\u0017\u0018y\u0013\u0018y\u0003\u0002\u0017\u0018y\rJ\u001f\nF\u001f\u0013\u0018y\u0003\u0002\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001&\n]\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001&@\u000e?>\u001a\u0001@\nq\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001@@\u000e?>\u001a\u0001:\n…\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001:@\u000e?>\u001a\u0001|\n™\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001|@\u000e?>\u001a\u0001;\nÂ\u001f/;\nÂ\u001f\u001a\u0001;\nÂ\u001f\u0013\u0003\u0002\u0003\u0002\u0014\u0003\u0002\u0001;\u0013\u0003\u00022\u0000\u0014\u0003\u0002\u0001;@\u000e?>?\u000e>\u001a\u0001$\nì\u001f\"\nì\u001f\u0013å\u0001å\u0001\u0013å\u00012\u0000\u00132\u00002\u0000\u00142\u0000\u0001$\u00132\u0000å\u0001@\u000e?>?\u000e>\u001a\u0001#\n\u0016 \"\n\u0016 \u0013å\u0001å\u0001\u0013å\u00012\u0000\u00132\u00002\u0000\u00142\u0000\u0001#\u00132\u0000å\u0001@\u000e?>?\u000e>\"\n8 3l\u0007\u000f\u0000\n8 \u0007\u000f\u0000=\u000f\u0000*\u0004\u0000=\u000f\u0000+Þ\u0005@\u000e?>?\u000e>\u001a\u0001T\nW \u0014\u0018y\u0002CT\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y@\u000e?>\u001a\u0001F\n‡ \u0014\u0018y\u0002CF\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002GO\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>\u001a\u0001I\n· \u0014\u0018y\u0002CI\u0017\u0018y\u0014\u0018y\u0002#S\u0017\u0018y\u0014\u0018y\u0002BF\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001S\nÄ @\u000e?>?\u000e>\u0014\u0018y\u0002BF\u0017\u0018y\u001e0u\u0013\u0018y\u0001\u0017\u0018y@\u000e?>?\u000e>\u001a\u0001*\u000bí \u001a\u0001~\n", + "<1,1,1,2,2>": " (Þ\r" + } + } + } + }, + "<2>": { + "<2,1>": { + "<2,1,1>": { + "<2,1,1,1>": { + "<2,1,1,1,1>": " \n", + "<2,1,1,1,2>": " @\u000e?>?\u000e>\u001a\u0001Þ\n\r!\r\u0011!\n\r!@\u000e?>?\u000e>\t\b\u0000\n!!\r?\u000e>\b\t\u0000\u0003€\u001a\u0001Þ\u0005\u0002\u0000\nN!\nN!\ni!9\u000f\u0000\u0002€\u00132\u00002\u0000\u00162\u0000\u000f\u0000\u00073\u0000\u00122\u0000\fB!\u0003\u0002\u0000\b\u0003€\t\u0000\u0012!\u0002@\u000e?>?\u000e>\u001a\u0002~T\nŠ!\t\u0007\u0000\nŠ!@\u000e?>\u001a\u0002~F\n¡!\t\u0007\u0000\u0005\u0002\u0000\n¡!\n¡!@\u000e?>?\u000e>\"\n¬!@\u000e?>?\u000e>#\n·!@\u000e?>?\u000e>%\nÂ!@\u000e?>?\u000e>\u001a\u0003END\nà!\t\b\u0000\u000bÛ!\u0011\u0001*\u0003\u0002\u0000\nà!@\u000e?>?\u000e>\rã \ní!@\u000e?>\r§\n\nø!\fï!\u0003\u0002\u0000\r" + } + } + } + }, + "<3>": { + "<3,1>": { + "<3,1,1>": { + "<3,1,1,1>": { + "<3,1,1,1,1>": " \n\u0003\"@\u000e?>?\u000e>;$\u0002\u0013$\u0002$\u0002/Þ\u0013Â\u0001Â\u0001\u0013Â\u00012\u0000\u0014Â\u0001\u0004.IOB\u001a\u0001Þ\u001a\u0001T\n0\"\u0003\u0006\u0000\u000b9\"\u0004\u0006\u0000\u0003\u0002\u0000\nk\"\u001a\u0001S\nE\"\u0003\u0007\u0000\u000bN\"\u0004\u0007\u0000\u0003\u0002\u0000\nk\"\u001a\u0001L\nZ\"\u0003\b\u0000\u000bc\"\u0004\b\u0000\u0003\u0002\u0000\nk\";\u0002€@\u000e?>;\u0002€\u0003\u0002\u0000@\u000e?>?\u000e>\u0011\u0017COMPILATION SUCCESSFUL!@\u000e?>?\u000e>\u0011(COMPILATION ABORTED - NO OBJECT PRODUCED@\u000e?>?\u000e>\u0017\u0018y\u0017\u0018y\u0017\u0018y\r\u000e#\n\n#\u0013\u0018y\u0018y;\u0018y\u0004\u0003\u0000\rr#\n", + "<3,1,1,1,2>": "\"\rP#\nñ\"\u0003\u0002\u0000\n", + "<3,1,1,1,3>": "\"\fâ\"\u0003\u0002\u0000;\u0002€\u0013\u0018y\u0018y\u0003\u0002\u0000@\u000e?>?\u000e>\b\u0002\u0000\u0019y=\u0002\u0000/Ì\u0007\u0005\u0002\u0000@\u000e?>\u0012!\u0002\u0011\u001eCOLON BUFFER OVERFLOW WARNING.\u0012!\u0002\u0003\u0002\u0000@\u000e?>?\u000e>\t\u0003\u0000\nn#\u0014\u0004€\u0001\u0017\u00132\u00002\u0000\u00142\u0000\u0001:\rD1\nn#@\u000e?>?\u000e>8W\u0018yë-\u001a\u0002CT\n“#\u001a\u0001Þ\n“#\u0014\u0004€\u0001\u0003\rd/\n“#@\u000e?>\f\u0011/\u001a\u0002CF\n²#\u001a\u0001Þ\n²#\u0014\u0004€\u0001\u0004\rd/\n²#@\u000e?>\f\u0011/\u001a\u0002CI\nÑ#\u001a\u0001Þ\nÑ#\u0014\u0004€\u0001\u0005\rd/\nÑ#@\u000e?>\f\u0011/\u001a\u0002IC\nð#\u001a\u0001Þ\nð#\u0014\u0004€\u0001\u0006\rd/\nð#@\u000e?>\f\u0011/\u001a\u0002DC\n\u000f$\u001a\u0001Þ\n\u000f$\u0014\u0004€\u0001\u0007\rd/\n\u000f$@\u000e?>\f\u0011/\u001a\u0002EC\n4$\u001a\u0001Þ\n4$\u0014\u0004€\u0001\b\rd/\n4$\rd/\n4$@\u000e?>\f\u0011/\u001a\u0002QC\nS$\u001a\u0001Þ\nS$\u0014\u0004€\u0001\t\rd/\nS$@\u000e?>\f\u0011/\u001a\u0002BF\nr$\u001a\u0001Þ\nr$\u0014\u0004€\u0001\n\r°/\nr$@\u000e?>\f\u0011/\u001a\u0002BT\n‘$\u001a\u0001Þ\n‘$\u0014\u0004€\u0001\u000b\r°/\n‘$@\u000e?>\f\u0011/\u001a\u0002GO\n°$\u001a\u0001Þ\n°$\u0014\u0004€\u0001\f\r°/\n°$@\u000e?>\f\u0011/\u001a\u0002GS\nÏ$\u001a\u0001Þ\nÏ$\u0014\u0004€\u0001\r\rÔ/\nÏ$@\u000e?>\f\u0011/\u001a\u0002RT\nN%\u001a\u0001Þ\nN%\t\u0006\u0000\nA%\u0014\u0004€\u0001\u0011\u0016\u0004€Q\u0000\u0007\u0005€\u0013\u0004€P\u0000\u0014\u0004€\u0006=\u0000\u0000*\u0000\u000e\u0014\u0004€\u0006=\u0000\u0000+ F\u0014\u0004€\u0005\u0013 \u0000 \u0000\u0014\u0004€\u0005\u0016 \u0000\u0000\u0000\u0014\u0004€\u0003\u0012 \u0000\u0014\u0004€\u0006=\u0000\u0000- F\u0014\u0004€\u0006=\u0000\u0000/\u0000\u000e\u0014\u0004€\u0003\u0011\u0001 \u0003\u0002\u0000\nN%\u0014\u0004€\u0001\u000e@\u000e?>\f\u0011/\u001a\u0002SM\nm%\u001a\u0001Þ\nm%\u0014\u0004€\u0001\u000f\r¼0\nm%@\u000e?>\f\u0011/\u001a\u0002QM\nŒ%\u001a\u0001Þ\nŒ%\u0014\u0004€\u0001\u0010\r¼0\nŒ%@\u000e?>\f\u0011/\u001a\u0002PL\n«%\u001a\u0001Þ\n«%\u0014\u0004€\u0001\u0011\rï/\n«%@\u000e?>\f\u0011/\u001a\u0002PB\nÊ%\u001a\u0001Þ\nÊ%\u0014\u0004€\u0001\u0012\rq/\nÊ%@\u000e?>\f\u0011/\u001a\u0002CB\n" + } + }, + "<3,1,2>": "%\u001a\u0001Þ\n", + "<3,1,3>": "%\u001a\u0001:\n", + "<3,1,4>": "%\u001a\u0001Þ\n", + "<3,1,5>": "%\u001b\u0001:\u0005\u0002\u0000\n", + "<3,1,6>": "%\u0003\u0003\u0000\u001b\u0001:\n", + "<3,1,7>": { + "<3,1,7,1>": "%@\u000e?>\u001a\u0002CB\n\u001e&\u001a\u0001Þ\n\u001e&\u0014\u0004€\u0001\u0013\rq/\n\u001e&\rq/\n\u001e&@\u000e?>\f\u0011/\u001a\u0002CL\nD&\u001a\u0001Þ\nD&\u001b\u0001:\nD&\u0003\u0003\u0000\u001b\u0001:\u0005\u0002\u0000\nD&@\u000e?>\u001a\u0002CL\nf&\u001a\u0001Þ\nf&\u0014\u0004€\u0001\u0014\rq/\nf&\rï/\nf&@\u000e?>\f\u0011/\u001a\u0002CS\n‹&\u001a\u0001Þ\n‹&\u0014\u0004€\u0001\u0015\rq/\n‹&\r‹/\n‹&@\u000e?>\f\u0011/\u001a\u0002CC\n°&\u001a\u0001Þ\n°&\u0014\u0004€\u0001\u0016\rq/\n°&\rd/\n°&@\u000e?>\f\u0011/\u001a\u0002CM\nÏ&\u001a\u0001Þ\nÏ&\u0014\u0004€\u0001\u0017\rq/\nÏ&@\u000e?>\f\u0011/\u001a\u0002PC\nô&\u001a\u0001Þ\nô&\u0014\u0004€\u0001\u0018\r‹/\nô&\rd/\nô&@\u000e?>\f\u0011/\u001a\u0002PO\n\u0013'\u001a\u0001Þ\n\u0013'\u0014\u0004€\u0001\u0019\r‹/\n\u0013'@\u000e?>\f\u0011/\u001a\u0002TL\n2'\u001a\u0001Þ\n2'\u0014\u0004€\u0001\u001a\rï/\n2'@\u000e?>\f\u0011/\u001a\u0002NX\nQ'\u001a\u0001Þ\nQ'\u0014\u0004€\u0001\u001b\rï/\nQ'@\u000e?>\f\u0011/\u001a\u0002AS\np'\u001a\u0001Þ\np'\u0014\u0004€\u0001\u001e\r‹/\np'@\u000e?>\f\u0011/\u001a\u0002AC\n'\u001a\u0001Þ\n'\u0014\u0004€\u0001\u001f\rd/\n'@\u000e?>\f\u0011/\u001a\u0002IN\n®'\u001a\u0001Þ\n®'\u0014\u0004€\u0001!\rq/\n®'@\u000e?>\f\u0011/\u001a\u0002TI\nÇ'\u001a\u0001Þ\nÇ'\u0014\u0004€\u0001\"@\u000e?>\f\u0011/\u001a\u0002TN\nà'\u001a\u0001Þ\nà'\u0014\u0004€\u0001#@\u000e?>\f\u0011/\u001a\u0002TS\nù'\u001a\u0001Þ\nù'\u0014\u0004€\u0001%@\u000e?>\f\u0011/\u001a\u0002TF\n\u0012(\u001a\u0001Þ\n\u0012(\u0014\u0004€\u0001&@\u000e?>\f\u0011/\u001a\u0002SP\n1(\u001a\u0001Þ\n1(\u0014\u0004€\u0001'\r%0\n1(@\u000e?>\f\u0011/\u001a\u0002ST\nP(\u001a\u0001Þ\nP(\u0014\u0004€\u0001(\r%0\nP(@\u000e?>\f\u0011/\u001a\u0002SR\ni(\u001a\u0001Þ\ni(\u0014\u0004€\u0001)@\u000e?>\f\u0011/\u001a\u0002AD\n‚(\u001a\u0001Þ\n‚(\u0014\u0004€\u0001*@\u000e?>\f\u0011/\u001a\u0002RD\n§(\u001a\u0001Þ\n§(\u0014\u0004€\u0001+\rq/\n§(\rq/\n§(@\u000e?>\f\u0011/\u001a\u0002WR\nÌ(\u001a\u0001Þ\nÌ(\u0014\u0004€\u0001,\rq/\nÌ(\rq/\nÌ(@\u000e?>\f\u0011/\u001a\u0002DS\në(\u001a\u0001Þ\në(\u0014\u0004€\u0001-\r<0\në(@\u000e?>\f\u0011/\u001a\u0002TT\n\n)\u001a\u0001Þ\n\n)\u0014\u0004€\u0001/\r%0\n\n)@\u000e?>\f\u0011/\u001a\u0002CE\n/)\u001a\u0001Þ\n/)\u0014\u0004€\u00010\rd/\n/)\r¼0\n/)@\u000e?>\f\u0011/\u001a\u0002NO\nH)\u001a\u0001Þ\nH)\u0014\u0004€\u00011@\u000e?>\f\u0011/\u001a\u0002PS\nm)\u001a\u0001Þ\nm)\u0014\u0004€\u00013\rq/\nm)\rd/\nm)@\u000e?>\f\u0011/\u001a\u0002RJ\nŒ)\u001a\u0001Þ\nŒ)\u0014\u0004€\u00014\rq/\nŒ)@\u000e?>\f\u0011/\u001a\u0002SL\n·)\u001a\u0001Þ\n·)\u0014\u0004€\u00015\rq/\n·)\rd/\n·)\r‹/\n·)@\u000e?>\f\u0011/\u001a\u0002IB\nÖ)\u001a\u0001Þ\nÖ)\u0014\u0004€\u00016\rd/\nÖ)@\u000e?>\f\u0011/\u001a\u0002DP\n", + "<3,1,7,2>": ")\u001a\u0001Þ\n", + "<3,1,7,3>": ")\u0014\u0004€\u00017\rq/\n", + "<3,1,7,4>": ")\rd/\n", + "<3,1,7,5>": ")@\u000e?>\f\u0011/\u001a\u0002BC\n0*\u001a\u0001Þ\n0*\u0014\u0004€\u00018\r%0\n0*\rq/\n0*\r°/\n0*\u0013øuøu\u0013ˆwˆw@\u000e?>\f\u0011/\u001a\u0002LB\nU*\u001a\u0001Þ\nU*\u0014\u0004€\u00019\rd/\nU*\rq/\nU*@\u000e?>\f\u0011/\u001a\u0002LW\nz*\u001a\u0001Þ\nz*\u0014\u0004€\u0001:\rd/\nz*\rq/\nz*@\u000e?>\f\u0011/\u001a\u0002SB\n™*\u001a\u0001Þ\n™*\u0014\u0004€\u0001;\rq/\n™*@\u000e?>\f\u0011/\u001a\u0002CO\nÄ*\u001a\u0001Þ\nÄ*\u0014\u0004€\u0001<\rd/\nÄ*\r%0\nÄ*\rd/\nÄ*@\u000e?>\f\u0011/\u001a\u0002CN\nï*\u001a\u0001Þ\nï*\u0014\u0004€\u0001=\rd/\nï*\r%0\nï*\r¼0\nï*@\u000e?>\f\u0011/\u001a\u0002SS\n\b+\u001a\u0001Þ\n\b+\u0014\u0004€\u0001>@\u000e?>\f\u0011/\u001a\u0002RS\n!+\u001a\u0001Þ\n!+\u0014\u0004€\u0001?@\u000e?>\f\u0011/\u001a\u0002SG\n:+\u001a\u0001Þ\n:+\u0014\u0004€\u0001@@\u000e?>\f\u0011/\u001a\u0002UT\nY+\u001a\u0001Þ\nY+\u0014\u0004€\u0001A\rd/\nY+@\u000e?>\f\u0011/\u001a\u0002RO\nx+\u001a\u0001Þ\nx+\u0014\u0004€\u0001B\rq/\nx+@\u000e?>\f\u0011/\u001a\u0002NM\n‘+\u001a\u0001Þ\n‘+\u0014\u0004€\u0001C@\u000e?>\f\u0011/\u001a\u0002EL\n°+\u001a\u0001Þ\n°+\u0014\u0004€\u0001D\rï/\n°+@\u000e?>\f\u0011/\u001a\u0002EB\nÏ+\u001a\u0001Þ\nÏ+\u0014\u0004€\u0001E\rq/\nÏ+@\u000e?>\f\u0011/\u001a\u0002EM\nè+\u001a\u0001Þ\nè+\u0014\u0004€\u0001F@\u000e?>\f\u0011/\u001a\u0002SC\n\u0007,\u001a\u0001Þ\n\u0007,\u0014\u0004€\u0001G\rï/\n\u0007,@\u000e?>\f\u0011/\u001a\u0002CA\n8,\u001a\u0001Þ\n8,/Þ\n8,\u0013øu2\u0000\b\r\u0000\u0005€\u0006\r\u0000\u0018ˆw\r\u0000\u001a\u0001Þ\n8,@\u000e?>\f\u0011/\u001a\u0002EN\na,\u001a\u0001Þ\na,\rÕ0\na,\u0016\u0004€ùu\u0013\u0004€øu\u0013\u0004€ˆw@\u000e?>\f\u0011/\u001a\u0002OL\n{,\u001a\u0001Þ\n{,\rÕ0\n{,@\u000e?>\f\u0011/\u001a\u0002RH\n•,\u001a\u0001Þ\n•,\rù0\n•,@\u000e?>\f\u0011/\u001a\u0002SZ\n¾,\u001a\u0001Þ\n¾,\b\u0005\u0000\u0005€0\u0005€\u0000\u0000\r¼0\n¾,\b\u0005€\u0005\u0000@\u000e?>\f\u0011/\u001a\u0002SH\n\u001d-\u001a\u0001Þ\n\u001d-\b\u0005\u0000\u0005€0\u0005€\u0002\u0000\rq/\n\u001d-\rq/\n\u001d-\rd/\n\u001d-\rq/\n\u001d-\rq/\n\u001d-\rq/\n\u001d-\rq/\n\u001d-\rq/\n\u001d-\rd/\n\u001d-\rq/\n\u001d-\b\u0005€\u0005\u0000@\u000e?>\f\u0011/\u001a\u0002DM\nY-\u001a\u0001Þ\nY-\u0014\u0004€\u0001\u0014\rq/\nY-\u0014\u0004€\u0001\b\r\u000e0\nY-\rd/\nY-\rq/\nY-\rq/\nY-@\u000e?>\f\u0011/\u001a\u0002MB\n-\u001a\u0001Þ\n-\u0014\u0004€\u0001H\rq/\n-\rq/\n-\rd/\n-\rd/\n-\rd/\n-@\u000e?>\f\u0011/\u001a\u0002QO\n»-\u001a\u0001Þ\n»-\u0014\u0004€\u0001J\rd/\n»-\r%0\n»-\rd/\n»-@\u000e?>\f\u0011/\u001a\u0002QN\næ-\u001a\u0001Þ\næ-\u0014\u0004€\u0001K\rd/\næ-\r%0\næ-\r¼0\næ-@\u000e?>\f\u0011/’\u0000CTCFCIICDCECQCBFBTGOGSRTSMQMPLPBCBCLCSCCCMPCPOTLNXASACINTITNTSTFSPSTSRADRDWRDSTTCENOPSRJSLIBDPBCLBLWSBCOCNSSRSSGUTRONMELEBEMSCCAENOLRHSZSHDMMBQOQNy#˜#·#Ö#õ#\u0014$9$X$w$–$µ$Ô$S%r%‘%°%Ï%#&k&&µ&Ô&ù&\u0018'7'V'u'”'³'Ì'å'" + } + } + }, + "<4>": { + "<4,1>": { + "<4,1,1>": { + "<4,1,1,1>": { + "<4,1,1,1,1>": "'\u0017(6(U(n(‡(¬(Ñ(ð(\u000f)4)M)r)‘)¼)Û)\u0000*5*Z**ž*É*ô*\r+&+?+^+}+–+µ+Ô+í+\f,=,f,€,š,Ã,\"-^-•-À-\u001a\u0001Þ\n\u001f/\u0004\u0002\u0000\u0004\u0002\u0000?\u000e\u000b[/\u0012!\u0002\u0011\u000eINVALID OP AT \b\u000f\u0000\u0019y\u001f\u000f\u0000\u0012\u0001\u0011\u0002 \"/Þ\n[/\u00122\u0000\u0011\u0002\" !2\u0000\u0012!\u0002\u0003\u0002\u0000'Þ\n`/@\u000e?>?\u000e>\r˜/\nm/@\u000e?>?\u000e>\r˜/\nz/@\u000e?>?\u000e>\r˜/\n‡/@\u000e?>?\u000e>\r˜/\n”/@\u000e?>?\u000e>/Þ\n¬/\rD1\n¬/\u001a\u0001Þ\n¬/@\u000e?>?\u000e>#\nÐ/\u00132\u00002\u0000\u00132\u0000n\u0000\u000fâ\u0005\r‹1\nÐ/\u001a\u0001Þ\nÐ/@\u000e?>?\u000e>/Þ\në/\u000fÞ\u0005\r‹1\në/\u001a\u0001Þ\në/@\u000e?>?\u000e>/Þ\n\n0\u0016\u0004€3\u0000\u0007\u0005€\u0013\u0004€2\u0000\u001a\u0001Þ\n\n0@\u000e?>?\u000e>/Þ\n!0\u0013\u0004€2\u0000\u001a\u0001Þ\n!0@\u000e?>?\u000e>/Þ\n80\u0013\u0004€2\u0000\u001a\u0001Þ\n80@\u000e?>?\u000e>/Þ\n~0\u001a\u0001Þ\n~0#\n~06\u0010\u0000\bˆ\u0001\u0010\u0000\u001a\u0001Þ\n~0#\n~0\u0016\u0004€ˆ\u00016\u0010\u0000\u0016\u0004€\u0010\u0000\bˆ\u0001\u0010\u0000\r‚0\n~0\u001a\u0001Þ\n~0@\u000e?>?\u000e>\u000fö\u0005)\u0005\u0002\u0000\u000b§0\u0011\u0001\"\u00122\u0000\u0011\f\" REDEFINED.\u0012!\u0002\u0003\u0002\u0000\n¸0\u000fö\u0005\bˆ\u0001\u0010\u0000*\n¸0@\u000e?>?\u000e>#\nÑ06\u0010\u0000\u0016\u0004€\u0010\u0000\u001a\u0001Þ\nÑ0@\u000e?>?\u000e>#\nõ0\u00132\u00002\u0000\u00132\u0000n\u0000\u000f", + "<4,1,1,1,2>": "\u0005\rÅ1\nõ0\u001a\u0001Þ\nõ0@\u000e?>?\u000e>/Þ\n@1\u000fò\u0005\rÅ1\n@1\u001a\u0001Þ\n@1\t\u0006\u0000\n81\u0014\u0004€\u0001\u0011\u0016\u0004€3\u0000\u0007\u0005€\u0013\u0004€2\u0000\u0014\u0004€\u0004\u0011\u0002: \u0013P\u0000P\u0000\u0013P\u00002\u0000\u0003\u0002\u0000\n@1@\u000e?>?\u000e>\u000fâ\u0005)\nY1\u0010ö\u0005\nY1\u0016\u0004€ˆ\u0001@\u000e?>\u0011\u0001\"\u00122\u0000\u0011\u0017\" HAS NOT BEEN DEFINED.\u0012!\u0002\u0004\u0002\u0000\u0016\u0004€\u0002\u0000@\u000e?>?\u000e>\u000fê\u0005)\u000b™1\u0004ˆ\u0001\u0003\u0002\u0000\n©1\u0010æ\u0005\n©1\u0016\u0004€ˆ\u0001@\u000e?>\u0016\u0004€ˆ\u0001\bˆ\u0001\u0005€=ˆ\u0001-\u0002\u0000*\nÁ1@\u000e?>?\u000e>)\u000bÐ1\u0004ˆ\u0001\u0003\u0002\u0000\n\u00032\u0010ê\u0005\n\u00032\b\u0003\u0000\u0005€\u0006\u0003\u0000\r\u00142\u0003\u0002\u0000\n\u00032\bˆ\u0001\u0003\u0000\u0007\u0003\u0000\b\u0005€\u0003\u0000\u000fæ\u0005*\n\u00032\u0004\u0003\u0000@\u000e?>\rA2\u0003\u0002\u0000\n\u00102@\u000e?>?\u000e>\tˆ\u0001\n82\b\u0005€ˆ\u0001:\u000f\u0000\u0004€=\u0005€-\u0002\u0000\bˆ\u0001\u000f\u0000\u0016\u0004€\u0003\u0000\f\u00152\u0003\u0002\u0000@\u000e?>?\u000e>\u0011\u0001\"\u00122\u0000\u0011\u001c\" IS DEFINED MORE THAN ONCE.\u0012!\u0002@\u000e?>?\u000e" + } + } + } + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSPROCS%003AREVERROR.DAT.json b/SYSPROG/APPROW/SYSPROCS%003AREVERROR.DAT.json new file mode 100644 index 0000000..ccb99fc --- /dev/null +++ b/SYSPROG/APPROW/SYSPROCS%003AREVERROR.DAT.json @@ -0,0 +1,1210 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "REVERROR.DAT" + }, + "body": { + "record1": { + "<1>": "//", + "<2>": "// Amended Date Reason", + "<3>": "// ======= ==== ======", + "<4>": "// Mr C 21 Jan 23 Added SSP289", + "<5>": "// Mr C 01 Feb 21 Added EV136", + "<6>": "// Mr C 05 Jan 21 Added EV131, EV132", + "<7>": "// Mr C 19 Dec 20 Added EV130", + "<8>": "// Mr C 15 Oct 19 Corrected SSP314 grammar", + "<9>": "// rjc 07 Jun 19 Added Arev B errors", + "<10>": "// Mr C 13 Nov 18 Added SYS1250 series.", + "<11>": "// Mr C 20 Mar 18 Added SYS1005, SYS1011, SYS1012", + "<12>": "// Mr C 27 Jan 16 Added comment section and re-added to system (APPROW", + "<13>": "// was renamed)", + "<14>": "", + "<15>": "ENG0010: %1%, line %2%. Variable has not been assigned a value.", + "<16>": "ENG0012: %1%, line %2%. Table has not been opened.", + "<17>": "ENG0015: %2%, line %3%. Illegal opcode: %1%", + "<18>": "ENG0016: %1%, line %2%. Non-numeric data when numeric required. Zero used.", + "<19>": "ENG0017: %1%, line %2%. Subscript value out of range.", + "<20>": "ENG0019: %1%, line %2%. Illegal pattern.", + "<21>": "ENG0022: %2%, line %3%. Branch index of %1% is illegal.", + "<22>": "ENG0023: %2%, line %3%. Branch index of %1% exceeds number of statement-labels.", + "<23>": "ENG0024: %1%, line %2%. Divide by zero; Result Zero!", + "<24>": "ENG0027: %1%, line %2%. RETURN executed with no GOSUB.", + "<25>": "ENG0028: %1%, line %2%. Not enough string space - Out of Memory.", + "<26>": "ENG0031: %1%, line %2%. Stack overflow.", + "<27>": "ENG0040: %1%, line %2%. The labeled common variable has been freed and is no longer valid.", + "<28>": "ENG0050: %1%, line %2%. Function with argument value <= 0 undefined; Zero returned.", + "<29>": "ENG0051: %1%, line %2%. Negative number raised to non-integer value. Zero used!", + "<30>": "ENG0055: %1%, line %2%. MATREAD or MATWRITE operation must be to or from a vector.", + "<31>": "ENG0700: %1%, line %2%. Non-dimensioned variable used as an array.", + "<32>": "ENG0701: %1%, line %2%. Double-dimension array used with only one subscript.", + "<33>": "ENG0702: %1%, line %2%. Single-dimension array used with two subscripts.", + "<34>": "ENG0703: %1%, line %2%. Variable exceeds maximum length.", + "<35>": "ENG0704: %1%, line %2%. Attempt to access an array without a subscript. Zero used.", + "<36>": "ENG0705: %1%, line %2%. Array not dimensioned.", + "<37>": "ENG0706: %1%, line %2%. String space format error.", + "<38>": "ENG0707: %1%, line %2%. Format output exceeds 64K.", + "<39>": "ENG0708: %1%, line %2%. Subroutine contains invalid header. CALL aborted.", + "<40>": "ENG0709: %1%, line %2%. Remainder by Zero illegal. Zero used.", + "<41>": "ENG0710: %1%, line %2%. Extra parameters ignored.", + "<42>": "ENG0711: %2%, line %3%. Too many parameters passed to procedure %1%.", + "<43>": "ENG0712: %1%, line %2%. Attempt to pass more than 127 parameters.", + "<44>": "ENG0713: %1%, line %2%. Step value of Zero illegal in FOR-NEXT loop. Loop terminated.", + "<45>": "ENG0714: %1%, line %2%. String exceeds maximum length. Null used.", + "<46>": "ENG0715: %1%, line %2%. DOS file size exceeds 65532 bytes.", + "<47>": "ENG0716: %1%, line %2%. Zero and non-zero subscript not allowed. Element zero used.", + "<48>": "ENG0717: %1%, line %2%. Program-list format error.", + "<49>": "ENG0718: %1%, line %2%. Frame format error.", + "<50>": "ENG0719: %1%, line %2%. String space format error.", + "<51>": "ENG0720: %1%, line %2%. Attempt to use common variable when common has not been defined.", + "<52>": "ENG0721: %1%, line %2%. Attempt to use a common variable not defined in original common.", + "<53>": "ENG0722: %1%, line %2%. Labeled common has not been defined.", + "<54>": "ENG0723: %1%, line %2%. Invalid opcode CALL to an RTP.", + "<55>": "ENG0724: %1%, line %2%. Disk read error loading SYSTEM object.", + "<56>": "ENG0725: %1%, line %2%. SYSTEM object table missing.", + "<57>": "ENG0726: %1%, line %2%. Invalid name for DOS table.", + "<58>": "ENG0727: %2%, line %3%. %1% is access protected and cannot be written.", + "<59>": "ENG0728: %2%, line %3%. Media full writing %1%.", + "<60>": "ENG0755: %1%, line %2%. 8087 not empty at line mark.", + "<61>": "ENG0760: %1%, line %2%. Labeled common spt string format error.", + "<62>": "ENG0761: %1%, line %2%. Labeled common name string format error.", + "<63>": "ENG0762: %1%, line %2%. Labeled common created smaller than declaration.", + "<64>": "ENG0772: %1%, line %2%. Tangent of 90 degrees is undefined.", + "<65>": "ENG0800: %2%, line %3%. %1%", + "<66>": "ENG0801: %1%, line %2%. Unknown descriptor type; using null string.", + "<67>": "ENG0802: %1%, line %2%. External C program has executed an abort.", + "<68>": "ENG0803: %2%, line %3%. %1% has not been implemented.", + "<69>": "ENG0804: %2%, line %3%. Unable to load dynamic link library %1%.", + "<70>": "ENG0805: %3%, line %4%. Function %2% does not exist in dynamic link library %1%.", + "<71>": "ENG0806: %2%, line %3%. Invalid object code type: %1%.", + "<72>": "ENG0807: %1%, line %2%. Main program has been called with arguments.", + "<73>": "ENG0808: %3%, line %4%. Error [%1%] writing to table %2% during flush operation.", + "<74>": "ENG0809: %3%, line %4%. Error [%1%] opening table %2% during flush operation.", + "<75>": "ENG0810: %2%, line %3%. Null buffer: table %1% will not be flushed.", + "<76>": "ENG0811: %1%, line %2%. Invalid pointer passed to GetValue.", + "<77>": "ENG0812: %1%, line %2%. Invalid pointer passed to SetReturnValue.", + "<78>": "ENG0813: %1% line %2%. Invalid binary flag argument", + "<79>": "", + "<80>": "FS10: Domain validation error. The record \"%1%\" contains illegal characters - or - the data does not pass validation patterns specified in the dictionary.", + "<81>": "FS11: Error attempting to convert or validate data in the \"%1%\" column. Check dictionary conversion and validation patterns.", + "<82>": "FS12: The record does not pass reduction criteria.", + "<83>": "FS13: Unable to lock this table or record. This lock is being held by another station.", + "<84>": "FS14: The operating system has denied access to this table or record. A table or record lock is being held by another station.", + "<85>": "FS15: Domain Error: Attempt to write NULL value into column \"%1%\".", + "<86>": "FS16: Domain Error: Attempt to write too many characters into column \"%1%\" (maximum: %2%).", + "<87>": "FS17: Domain Error: Value for column \"%1%\" does not conform to domain rule: %2%.", + "<88>": "FS18: Domain Error: Error converting value for column \"%1%\", by format: %2%.", + "<89>": "FS30: Number of fields in record is greater than the number of table columns.", + "<90>": "FS50: Error while updating or deleting the dictionary record \"%1%\". The table structure cannot be modified while the data table contains data.", + "<91>": "FS51: Dictionary domain error. The dictionary record \"%1%\" does not conform to the foreign table attribute specifications defined for this table type.", + "<92>": "FS52: The name \"%2%\" is an invalid foreign table name for the \"%1%\" table.", + "<93>": "FS53: You have attempted to define too many master fields. The maximum allowable is %1%, but you have attempted to define %2%.", + "<94>": "FS54: The fields have not been defined in field position order. The following field position(s) are missing: %1%", + "<95>": "FS55: No master fields have been defined -- unable to create the table.", + "<96>": "FS56: The data table cannot be created unless the dictionary exists.", + "<97>": "FS57: The dictionary record \"%1%\" has a foreign field name \"%2%\" that has already been used in another dictionary record.", + "<98>": "FS100: Record \"%1%\" does not exist.", + "<99>": "FS101: Write error. The operating system table \"%1%\" does not exist.", + "<100>": "FS102: Error while writing data. \"%1%\" is a read-only table.", + "<101>": "FS103: Error in the operating system table \"%1%\". Disk volume full.", + "<102>": "FS104: General write error in the operating system table \"%1%\".", + "<103>": "FS105: Read error in the operating system table \"%1%\". The table does not exist or the tablename is not valid for the operating system.", + "<104>": "FS106: Access denied by the operating system to the \"%1%\" table.", + "<105>": "FS107: Read error. OS Table = \"%1%\".", + "<106>": "FS109: Open or Create Media error. The name \"%1%\" is an invalid volume directory label.", + "<107>": "FS110: Open table error. The handle \"%1%\" is invalid for a volume directory.", + "<108>": "FS111: No more records available.", + "<109>": "FS112: The %1% filing system cannot be installed.", + "<110>": "FS113: The filing system RTP59 cannot be installed. (RTP57 must be installed beforehand.)", + "<111>": "FS114: The filing system RTP50 cannot be installed. The entry \"MEMORY.RESIDENT\" cannot be made in the \"SYSVOLUMES\" table.", + "<112>": "FS115: The filing system RTP50 cannot be installed. No entry can be made in the \"SYSVOLUMES\" table.", + "<113>": "FS116: The filing system RTP50 cannot be installed. No entry can be made in the \"SYSTABLES\" table.", + "<114>": "FS124: Group Format Error: OS File : %1% Group # : %2% Reading the next frame in the current group has failed.", + "<115>": "FS125: Group Format Error! OS File : %1% Group # : %2% A record has been truncated across frame boundaries.", + "<116>": "FS126: Group Format Error: OS File : %1% Group # : %2% Wrong Overflow frame linked to group.", + "<117>": "FS127: Group Format Error: OS File : %1% Group # : %2% Record length incorrect or frame linkage error.", + "<118>": "FS128: Linear Hash Error: OS File : %1% Group # : %2% LNP incorrect - modulo corrupted in group 0 header.", + "<119>": "FS129: Linear Hash Error OS File: %1% Group #: %2% Group Calculation Error.", + "<120>": "FS130: The BFS code %1% has not been implemented in the BFS \"%2%\".", + "<121>": "FS133: Undefined error during a read/write/delete operation. OS File : %1% Status(): %2%", + "<122>": "FS135: Generic %1% Server Error||Error code: %2%||%3%|", + "<123>": "FS140: Unable to create the \"%1%\" table. There are too many fields defined.", + "<124>": "FS141: Unable to create the \"%1%\" table. Position number %2% in the dictionary is missing.", + "<125>": "FS142: The record \"%2%\" cannot be saved in the \"%1%\" table because it contains invalid data.", + "<126>": "FS143: Unable to create the \"%1%\" table. The dictionary is missing.", + "<127>": "FS144: Record \"%2%\" is missing from the \"%1%\" table.", + "<128>": "FS145: The \"%1%\" table does not exist.", + "<129>": "FS146: The \"%1%\" table already exists.", + "<130>": "FS147: Unable to create the table. The specified table attributes are not valid.", + "<131>": "FS148: The record key \"%2%\" is invalid for the \"%1%\" table.", + "<132>": "FS149: The \"%1%\" table is protected and cannot be deleted.", + "<133>": "FS150: The \"%1%\" table is too long. (Tables must be less than 65,530 characters.)", + "<134>": "FS151: ROS table error. The record \"%1%\" has made a frame longer than 65,650 characters. The frame cannot be saved.", + "<135>": "FS152: The control record \"%RECORDS%\" is too long to be saved. The current record length is %1% characters.", + "<136>": "FS160: Insufficient memory. %1% characters are required, but only %2% characters are available", + "<137>": "FS161: Too many locks have been attempted. The lock table for the Linear Hash table type has overflowed.", + "<138>": "FS162: Because of licensing restrictions, records cannot be written to the \"%1%\" table", + "<139>": "FS171: Warning! Incorrect version of DOS -- use DOS 3.1 or higher. You will not be able to lock tables or records. Use only local tables or reboot using a correct version of DOS.", + "<140>": "FS172: Warning! The locktable \"REVBOOT\" is not available. You will not be able to lock tables or records. Correct the condition or use only local tables.", + "<141>": "FS173: Warning! The station identifier cannot be found. You will not be able to lock tables or records. Use only local tables or log out and correct the condition.", + "<142>": "FS174: Warning! No network drive can be found. Either the drive is local or no network drive is configured. You will not be able to lock tables or records. Use only local tables or log out and correct the condition.", + "<143>": "FS175: Warning! The network shell is not loaded. Interrupt 60 (Hex) has not been initialized. You will not be able to lock tables or records. Use only local tables or log out and establish a network connection.", + "<144>": "FS176: Warning! NetWare is not responding. The server is inactive or your workstation shell has not been loaded. You will not be able to lock tables or records. Use only local tables or log out and check your network connection.", + "<145>": "FS185: Warning! The current network driver is for non-networking purposes only and will not function properly on a network. Data corruption may result! Log out and correct the condition.", + "<146>": "FS186: Warning! The locktable \"REVBOOT\" is not available. You will not be able to lock tables or records. Data corruption may result! Log out and correct the situation.", + "<147>": "FS187: Warning! The station/process ID cannot be found. You will not be able to lock tables or records. Data corruption may result! Log out and correct the situation.", + "<148>": "FS188: Warning! SHARE.EXE has not been loaded. You will not be able to lock tables or records. Data corruption may result! Log out and correct the situation", + "<149>": "FS189: Warning! The current network driver does not support local locking. Data corruption may result if you run more than one OpenInsight from this workstation at the same time.", + "<150>": "FS190: Warning! The Banyan VINES Service Interrupt was not found. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<151>": "FS191: Warning! The BANCOM TSR was not found. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<152>": "FS192: Warning! The user's VINES StreetTalk name was not found. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<153>": "FS193: Warning! An error was encountered while opening the VINES Communications Socket. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<154>": "FS194: Warning! An error was encountered while initializing the network driver. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<155>": "FS195: Warning! No lock services were connected. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<156>": "FS196: Warning! An error was encountered while connecting the lock service for drive %1%. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<157>": "FS200: The \"%1%\" table is not available.", + "<158>": "FS201: The record \"%1%\" in the \"%2%\" table is not available.", + "<159>": "FS202: No error code was returned in @FILE.ERROR. %1% %2%", + "<160>": "FS210: The index table for \"%1%\" is not available.", + "<161>": "FS211: The index for the \"%2%\" field in the \"%1%\" table is corrupted. Please rebuild the index before retrying.", + "<162>": "FS212: Error while compiling the index transaction module for the \"%1%\" table.", + "<163>": "FS213: The index node \"%2%\" cannot be found in the index table \"%1%\".", + "<164>": "FS214: Index control information for the \"%1%\" table has been corrupted. Relational indexes should be rebuilt.", + "<165>": "FS215: The Quickdex or Rightdex index has been corrupted. You can rebuild the index by executing a \"LIST\" or \"SELECT\" command.", + "<166>": "FS216: Tables of this table type cannot be attached while a transaction is pending.", + "<167>": "FS217: Tables of this table type cannot be detached while a transaction is pending.", + "<168>": "FS231: Warning! Network Service Configuration Error.", + "<169>": "FS250: There is not enough memory to call the BASIC+ preprocessor/compiler. %1% bytes of memory are required but only %2% are available.", + "<170>": "FS251: Error in generating the Protection module.", + "<171>": "FS252: Error compiling Protection module.", + "<172>": "FS253: An error was encountered during the CALCULATEX process.", + "<173>": "FS254: Error locating a table in the \"SYSTABLES\" table. Table handle: \"%1%\".", + "<174>": "FS255: An error has occurred while attempting to create the \"%1%\" table. The table has not been created.", + "<175>": "FS256: A table cannot be renamed if it has been changed during the current transaction.", + "<176>": "FS257: An error has occurred while attempting to create the transaction log table \"%1%\". The table has not been created.", + "<177>": "FS258: Can not rename/tablecopy only data or dictionary part of the indexed table \"%1%\". Please remove keyword \"DATA\" or \"DICT\" in the command for completely renaming indexed tables.", + "<178>": "FS259: The \"%1%\" table has relational indexes on it and the related table \"%2%\" is not available or attached for updating control information.", + "<179>": "FS260: Too many locks. The lock limit of %1% has been exceeded.", + "<180>": "FS261: The lock tables are out of synchronization. Table name: \"%1%\" Record key: \"%2%\"", + "<181>": "FS262: The lock waiting period has expired. (%1% seconds).", + "<182>": "FS263: The lock wait has been canceled. Table name: \"%1%\" Record key: \"%2%\"", + "<183>": "FS264: General deadlock error on \"%1%\".", + "<184>": "FS265: The current transaction has been cancelled due to a deadlock. The transaction has been rolled back.", + "<185>": "FS266: Cross account relational index is not allowed. The \"%1%\" table has relational indexes on it and renaming/tablecopying table to a different account \"%2%\" violates this rule. Please remove the relational index and try again.", + "<186>": "FS267: The \"%1%\" table has relational/dependency indexes on it. Please specify \"D\" option to delete the source table after copying or take off relational/dependency indexes on the source table \"%1%\" and try again.", + "<187>": "FS270: The \"%1%\" column does not exist.", + "<188>": "FS271: The \"%1%\" column is not indexed.", + "<189>": "FS272: \"%2%\" is not a valid tablename in the \"%1%\" environment.", + "<190>": "FS273: \"%2%\" is not a valid field name in the \"%1%\" environment.", + "<191>": "FS274: The OpenInsight dictionary for the \"%1%\" table does not match the structure of the bonded table \"%2%\".", + "<192>": "FS275: The record \"%2%\" cannot be saved because it is write/delete-protected in the \"%1%\" table.", + "<193>": "FS276: The MFS list has been corrupted. MFS code: %1% MFS list: \"%2%\" The MFS list is missing the underlying BFS name for executing the next call.", + "<194>": "FS277: The code %1% is not a valid direction code for Readnext. Direction codes should be less than or equal to 3.", + "<195>": "FS278: An invalid READNEXT pointer was encountered.", + "<196>": "FS279: The record \"%1%\" cannot be deleted because it is delete-protected in the \"%2%\" table.", + "<197>": "FS280: The \"C\" subroutine data segment cannot be found in the \"%1%\" table, record \"%2%\".", + "<198>": "FS281: An undefined \"C\" error has occurred. Possible causes include insufficient memory, disk space, or operating system table handles.", + "<199>": "FS290: You cannot write or delete records because Quick/Rightdex for this table does not use the \"%2%\" language set specified in the current environment. Either: Reload the \"%1%\" language set - or - Re-install the Quick/Rightdex.", + "<200>": "FS291: List over 64k bytes in BTREE.SUB operations or RELATER routines.", + "<201>": "FS292: Invalid BFS type %1%.", + "<202>": "FS293: Cannot compile %1% in current product.", + "<203>": "FS294: The error detail is approaching 64k bytes. The process has been aborted.", + "<204>": "FS300: The \"%1%\" table is not available.", + "<205>": "FS301: \"%1%\" is not a valid data type.", + "<206>": "FS302: A comma is missing in the type specification \"%1%\".", + "<207>": "FS303: Argument %2% for \"%1%\" is missing a quotation mark.", + "<208>": "FS304: The \"%1%\" bond cannot use the data type \"%2%\".", + "<209>": "FS305: The \"%1%\" bond does not require or use foreign field attributes.", + "<210>": "FS306: The \"%1%\" bond does not require or use table attributes.", + "<211>": "FS307: Invalid arguments were passed to BOND.SUBS.", + "<212>": "FS308: Argument %2% (\"%3%\") for the data type \"%1%\" is missing or invalid.", + "<213>": "FS309: The \"%1%\" table type requires data types for its dictionary fields.", + "<214>": "FS310: The %1% bond does not support or require foreign table attributes.", + "<215>": "FS311: The bond '%1%' was incorrectly called to dynamically derive a data type from data type '%2%'. Report this error to the vendor you purchased this bond from.", + "<216>": "FS312: The '%1%' bond was incorrectly called to dynamically select a type mapping for the data type '%2%'. Report this error to the bond developer.", + "<217>": "FS313: Data type '%1%' is defined to be a synonym for '%2%', but '%2%' is not a defined data type.", + "<218>": "FS314: Data type '%1%' is derived from data type '%2%', but '%2%' is not a defined data type.", + "<219>": "FS315: The user-specified mapping '%1%' is not a valid type mapping.", + "<220>": "FS316: The precision (the first argument) of data type DECIMAL must be greater than or equal to the scale (the second argument) of data type DECIMAL.", + "<221>": "FS330: The Sql Server returned the following errors: %1%", + "<222>": "FS350: Cannot read volume information from media record.", + "<223>": "FS351: Invalid/missing volume information.", + "<224>": "FS352: Volume %1% already exists.", + "<225>": "FS353: Missing/invalid media handle.", + "<226>": "FS354: Cache failure.", + "<227>": "FS355: Insufficient permissions for the requested action.", + "<228>": "FS360: The Encryption Server returned the following errors: %1%", + "<229>": "FS361: Encryption parameters not specified for table %1%.", + "<230>": "FS362: Invalid/missing passphrase information for volume.", + "<231>": "FS363: Encryption group parameter not specified for table.", + "<232>": "FS364: Encryption check value failure: %1%.", + "<233>": "FS365: Unable to encrypt table %1%: %2%.", + "<234>": "FS400: Invalid table handle.", + "<235>": "FS401: The \"%1%\" table has not been created or attached.", + "<236>": "FS402: The list cannot be found in the \"SYSLISTS\" table.", + "<237>": "FS403: There is a mismatch between the \"SYSVOLUMES\" and \"SYSTABLES\" tables during the \"%1%\" function.", + "<238>": "FS404: The \"%1%\" volume has the same label (\"%3%\") as the \"%2%\" volume and cannot be attached.", + "<239>": "FS405: The volume \"%1%\" cannot be attached.", + "<240>": "FS410: An invalid lock type was specified.", + "<241>": "FS411: The table is not locked.", + "<242>": "FS412: The record is not locked.", + "<243>": "FS413: Semaphore is not locked.", + "<244>": "FS414: Lock is held by this station.", + "<245>": "FS415: This lock is currently held by another station.", + "<246>": "FS420: %1% is an invalid Readnext direction.", + "<247>": "FS421: The operation has been cancelled.", + "<248>": "FS430: Error matching dictionary handles during a select operation.", + "<249>": "FS431: No more cursors are available.", + "<250>": "FS432: Invalid value for LIST.ACTIVE.", + "<251>": "FS434: The field type \"%1%\" is invalid in a sort list.", + "<252>": "FS435: The designated cursor cannot be cleared.", + "<253>": "FS436: Invalid cursor value.", + "<254>": "FS437: The sort expression contains the invalid field name \"%1%\".", + "<255>": "FS438: Error during SELECT. Multiple handles instead of IOPROC.", + "<256>": "FS439: Error in the Column Qualifier.", + "<257>": "FS440: Error merging a sort table.", + "<258>": "FS441: Error while extracting a sort table.", + "<259>": "FS442: Error while initializing the sort table '%1%'.", + "<260>": "FS443: Error writing to the sort table.", + "<261>": "FS444: Logical Error The key list has overflowed while sorting.", + "<262>": "FS450: Warning! Linear Hash Client/Server communication protocal not installed. Linear Hash Client/Server software will not be used. Use only local files or log out and check your workstation configuration.", + "<263>": "FS451: Warning! Unable to open a Linear Hash Client/Server communication protocal connection. Linear Hash Client/Server software will not be used. Use only local files or log out and check your workstation configuration.", + "<264>": "FS452: Warning! Unable to locate an initial Linear Hash Server. Linear Hash Client/Server software will not be used. Use only local files or log out and check your workstation configuration.", + "<265>": "FS453: Warning! The Linear Hash Client/Server TSR is not installed. Linear Hash Client/Server software will not be used. Use only local files or log out and check your workstation configuration.", + "<266>": "FS454: Warning! Error allocating local resources for Linear Hash Client/Server access. Linear Hash Client/Server software will not be used. Use only local files or log out and check your workstation configuration.", + "<267>": "FS455: Linear Hash Client/Server. Get Canocical Path Error. File name \"%1%\". Error number \"%2%\".", + "<268>": "FS456: Linear Hash Client/Server. Local File Error. File name \"%1%\".", + "<269>": "FS457: Linear Hash Client/Server. File Name Format Error. File name \"%1%\".", + "<270>": "FS458: Linear Hash Client/Server. Client Allocation Error. Unable to allocate needed client resources for Linear Hash Server access.", + "<271>": "FS459: Linear Hash Client/Server. Invalid Client File Handle.", + "<272>": "FS460: Linear Hash Client/Server. Invalid Client Server Handle.", + "<273>": "FS461: Linear Hash Client/Server. Get Local Target Error.", + "<274>": "FS462: Linear Hash Client/Server. No Linear Hash Server.", + "<275>": "FS463: Linear Hash Client/Server. TSR Server Table Full. Restart the Linear Hash Client/Server TSR with a larger server table size parameter setting.", + "<276>": "FS464: Linear Hash Client/Server. Send Packet Error.", + "<277>": "FS465: Linear Hash Client/Server. Receive Packet Error.", + "<278>": "FS466: Linear Hash Client/Server. No Server Response.", + "<279>": "FS467: Linear Hash Client/Server. Client Server Table Full.", + "<280>": "FS468: Linear Hash Client/Server. Client File Table Full.", + "<281>": "FS469: Linear Hash Client/Server. Duplicate Server Serial Number.", + "<282>": "FS470: Linear Hash Client/Server. Server Allocation Error. Unable to allocate needed server resources for Linear Hash Server access.", + "<283>": "FS471: Linear Hash Client/Server. Packet Size Error.", + "<284>": "FS472: Linear Hash Client/Server. Server Set Connection Error.", + "<285>": "FS473: Linear Hash Client/Server. Server Set Task Error.", + "<286>": "FS474: Linear Hash Client/Server. Next Packet Error.", + "<287>": "FS477: Linear Hash Client/Server. Unable to open the Linear Hash file because Server Only Access Mode has been specified in the REVPARAM file.", + "<288>": "FS478: Linear Hash Client/Server. Using invalid Revelation file variable.", + "<289>": "FS479: Linear Hash Client/Server. Client Open File Table Full.", + "<290>": "FS480: Linear Hash Client/Server. Client Not Initialized.", + "<291>": "FS481: Linear Hash Client/Server. Server File Open Error. File name \"%1%\".", + "<292>": "FS482: Linear Hash Client/Server. Temporary Server Allocation Error.", + "<293>": "FS483: Linear Hash Client/Server. Server File Close Error. File name \"%1%\".", + "<294>": "FS484: Linear Hash Client/Server. Version 1 Linear Hash File Format. File name \"%1%\".", + "<295>": "FS485: Linear Hash Client/Server. Invalid Server File Handle.", + "<296>": "FS486: Linear Hash Client/Server. Invalid Server File Variable.", + "<297>": "FS487: Linear Hash Client/Server. Server Connection Syncronization Error.", + "<298>": "FS488: Linear Hash Client/Server. Server Task Syncronization Error.", + "<299>": "FS489: Linear Hash Client/Server. Server Lock Allocation Error.", + "<300>": "FS490: Linear Hash Client/Server. Server File Handle Table Full. Restart the Linear Hash Server software with a larger File Handle Table size.", + "<301>": "FS491: Linear Hash Client/Server. Server File Variable Table Full. Restart the Linear Hash Server software with a larger File Variable Table size.", + "<302>": "FS492: Linear Hash Client/Server. Linear Hash Version Syncronization Error.", + "<303>": "FS493: Group Format Error! OS File : %1% Group # : %2% The group contains an invalid frame type value.", + "<304>": "FS494: Group Format Error! OS File : %1% Group # : %2% An invalid frame type value was about to be written.", + "<305>": "FS495: Group Format Error! OS File : %1% Group # : %2% The group contains a record which does not belong.", + "<306>": "FS496: Linear Hash Client/Server. Record size exceeds 65532.", + "<307>": "FS497: Linear Hash Client/Server. Id group size exceeds 65532.", + "<308>": "FS499: Extended error: %1%", + "<309>": "FS1000: File name length exceeds maximum path length.", + "<310>": "FS1001: The total length of all key ids in the group exceeds the maximum variable length.", + "<311>": "FS1002: The record length exceeds the maximum variable length.", + "<312>": "FS1003: Group Format Error: OS File : %1% Group # : %2% Invalid frame header during read.", + "<313>": "FS1004: Group Format Error: OS File : %1% Group # : %2% Invalid frame header during write.", + "<314>": "FS1005: File name length exceeds maximum path length.", + "<315>": "FS1006: Unable to determine the complete UNC path of the file name.", + "<316>": "FS1007: Internal initialization error.", + "<317>": "FS1008: File creation error.", + "<318>": "FS1009: File open error.", + "<319>": "FS1010: Lock error.", + "<320>": "FS1011: Shared lock error.", + "<321>": "FS1012: Group lock error.", + "<322>": "FS1013: Group lock timeout error.", + "<323>": "FS1014: Unable to allocate temporary buffer.", + "<324>": "FS1015: Unable to allocate internal buffer.", + "<325>": "FS1016: Record Key too long.", + "<326>": "FS1017: Unable to allocate lock buffer.", + "<327>": "FS1018: Version syncronization error.", + "<328>": "FS1019: Server only access specified in REVPARAM file.", + "<329>": "FS1020: Unable to open REVLOCKS file at workstation.", + "<330>": "FS1021: Maximum number of volume users exceeded.", + "<331>": "FS1022: Maximum number of OpenInsight users exceeded.", + "<332>": "FS1023: Test lock timeout error.", + "<333>": "FS1024: Volume user lock error.", + "<334>": "FS1025: OpenInsight user lock error.", + "<335>": "FS1026: Cache flush locked by other.", + "<336>": "FS1027: Cache flush lock error.", + "<337>": "FS1028: Claim mutual exclusion semaphore error.", + "<338>": "FS1029: Out of file handles error.", + "<339>": "FS1030: Unable to open REVLOCKS file at server.", + "<340>": "FS1100: Resource not initialized error.", + "<341>": "FS1101: Resource already initialized error.", + "<342>": "FS1102: Resource in use error.", + "<343>": "FS1103: Error number %2% returned during RCL initialize.", + "<344>": "FS1104: Error number %2% returned during RCL connect.", + "<345>": "FS1105: Error number %2% returned during RCL request reply.", + "<346>": "FS1106: Error number %2% returned during RCL disconnect.", + "<347>": "FS1107: Error number %2% returned during RCL get statistics.", + "<348>": "FS1108: Remote path error.", + "<349>": "FS1109: Duplicate server serial number.", + "<350>": "", + "<351>": "RDK100: SYSLISTS table not attached.", + "<352>": "RDK101: APPID argument required.", + "<353>": "RDK102: Specified application (APPID) does not exist.", + "<354>": "RDK103: Specified entity does not exist.", + "<355>": "RDK104: SYSREPOSVIEWS table not attached.", + "<356>": "RDK105: View exists, collision.", + "<357>": "RDK106: Logical error in add.", + "<358>": "RDK107: Logical error in remove.", + "<359>": "RDK108: View definition does not exist.", + "<360>": "RDK110: Target directory not specified.", + "<361>": "RDK111: RDK deploy spec record missing from SYSENV table.", + "<362>": "RDK112: Error copying table %1% to target directory %2%.", + "<363>": "RDK113: Error creating table %1% on target directory %2%.", + "<364>": "RDK114: Error copying record %2% into table %1%.", + "<365>": "RDK115: User canceled extraction process.", + "<366>": "RDK116: List exceeds maximum length.", + "<367>": "RDK117: Error deleting file \"%1%\".", + "<368>": "RDK118: Could not retain path \"%1%\" for table \"%2%\".", + "<369>": "RDK119: Default data volume is necessary for extraction.", + "<370>": "RDK120: Cannot create non-relative directory %1%.", + "<371>": "RDK121: Error creating relative directory %1%.", + "<372>": "RDK122: Extraction directory %1% is invalid", + "<373>": "RDK123: The Extraction directory \"%1%\" contains a Repository.", + "<374>": "RDK124: The Extraction directory \"%1%\" contains OpenInsight files.", + "<375>": "RDK126: Error writing installation definition record.", + "<376>": "RDK127:\t Error creating user record.", + "<377>": "RDK125:\t Operating system error. Cannot validate extraction directory", + "<378>": "", + "<379>": "RWD100: Cannot copy an image file to the specified location.", + "<380>": "", + "<381>": "SSP100: A null table name is not allowed.", + "<382>": "SSP101: Database record missing %1% database name", + "<383>": "SSP102: Parameter contains system delimiters ( i.e. @FM, @VM, ... )", + "<384>": "SSP103: User has terminated the request.", + "<385>": "SSP110: User must have administrative privileges for this operation.", + "<386>": "SSP111: Error %1% while sending data.", + "<387>": "SSP112: The system identifier %1% is invalid.", + "<388>": "SSP113: Invalid dictionary data type specified.", + "<389>": "SSP114: The system administrative privileges can not be modified for the author of the application.", + "<390>": "SSP115: User must have system administrative privileges for this operation.", + "<391>": "SSP116: Lower level user is not allowed to create/update attribute(s) of higher level user.", + "<392>": "", + "<393>": "SSP200: The \"%1%\" system table cannot be deleted.", + "<394>": "SSP205: The \"%1%\" system table cannot be cleared.", + "<395>": "SSP210: The drive specifier \"%1%\" is invalid for the table copy process.", + "<396>": "SSP211: Not enough disk space is available to copy the table.", + "<397>": "SSP212: Copying between two different filing systems (\"%1%\" and \"%2%\") is not allowed.", + "<398>": "SSP213: The table \"%1%\" cannot be copied to itself.", + "<399>": "SSP214: The table \"%1%\" already exists; the copy was not performed.", + "<400>": "SSP215: The table \"%1%\" does not exists; the copy was not performed.", + "<401>": "SSP216: The copy process failed.", + "<402>": "SSP217: Name mismatch error.", + "<403>": "SSP220: The \"%1%\" system table cannot be renamed.", + "<404>": "SSP221: \"%1%\" is an aliased table name and cannot be renamed.", + "<405>": "SSP225: The table and volume parameters are inconsistent with each other.", + "<406>": "SSP226: A group format error has been detected in volume \"%1%\".", + "<407>": "SSP230: Required server name not passed.", + "<408>": "SSP231: Required bond database name not passed.", + "<409>": "SSP232: Required bond user name not passed.", + "<410>": "SSP233: Server name passed is not valid.", + "<411>": "SSP234: Bond Database name passed is not valid.", + "<412>": "SSP235: Bond User name passed is not valid.", + "<413>": "SSP236: Bond Password passed is not valid.", + "<414>": "SSP237: \"%1%\" is an invalid table type.", + "<415>": "SSP238: Table type \"%1%\" is not a server based filng system.", + "<416>": "SSP245: Aliasing is not allowed for the \"%1%\" filing system.", + "<417>": "SSP246: The \"%1%\" system table cannot be aliased.", + "<418>": "SSP247: Name \"%1%\" and \"%2%\" mismatching error.", + "<419>": "SSP248: Table record \"%1%\" is missing in revmedia.", + "<420>": "SSP271: The header of the table %1% is corrupted. FIX_LH cannot continue.", + "<421>": "SSP272: Fix type \"%1%\" is invalid.", + "<422>": "SSP273: Another station is currently fixing table and have semaphore %1% locked. Please wait until the other station is finished.", + "<423>": "SSP280: Table \"%1%\" not found at \"%2%\", filing system \"%3%\".", + "<424>": "SSP281: Invalid table name \"%1%\".", + "<425>": "SSP282: Table \"%1%\" does not have control features on.", + "<426>": "SSP283: Table \"%1%\" already has control features on.", + "<427>": "SSP284: Unable to add control features to \"%1%\" table.", + "<428>": "SSP285: \"%1%\" is already a master definition for this column position", + "<429>": "SSP286: \"%1%\" must be a master column definition", + "<430>": "SSP287: Table is not used in application \"%1%\"", + "<431>": "SSP288: Inherited Application \"%1%\" does not exist", + "<432>": "SSP289: Table \"%1%\" is open in the IDE", + "<433>": "", + "<434>": "SSP301: \"%1%\" is an invalid environment attribute value.", + "<435>": "SSP310: The database identifier \"%1%\" is not valid; it must be 8 characters or less.", + "<436>": "SSP311: The %1% database template already exists.", + "<437>": "SSP312: Error writing the environment record %1%.", + "<438>": "SSP313: The database template exceeds 64K.", + "<439>": "SSP314: The database template was not found.", + "<440>": "SSP320: User id \"%1%\" contains invalid character(s).", + "<441>": "SSO321: Error writing the user record.", + "<442>": "SSP322: Password must be between 6 and 20 characters.", + "<443>": "SSP323: The user id is already registered - no overwrite specified.", + "<444>": "SSP324: The user id was not found in the user record.", + "<445>": "SSP325: The user id cannot be deleted or modified.", + "<446>": "SSP326: User level %1% is not valid; User level should be from 0 to 2.", + "<447>": "SSP327: The current user does not have access priveleges to this app.", + "<448>": "SSP330: \"%1%\" is an invalid dictionary parameter.", + "<449>": "SSP331: Error writing symbolic column.", + "<450>": "SSP332: Open media failed on the following volume(s): %1%. Please redefine database after you login.", + "<451>": "SSP333: Invalid sort path specified: %1%. Please redefine it.", + "<452>": "SSP340: Dos file name and Dos File Extenstion TRUNCATED", + "<453>": "SSP341: Dos file name TRUNCATED", + "<454>": "SSP342: Dos File Extenstion TRUNCATED", + "<455>": "SSP343: Dos File Name contained Invalid chars", + "<456>": "SSP344: Invalid search method \"%1%\"", + "<457>": "", + "<458>": "SSP601: Unable to lock column(s) %1% in row \"%2%\".", + "<459>": "SSP602: %1% column(s) successfully locked.", + "<460>": "SSP603: Unable to lock row \"%1%\".", + "<461>": "SSP604: Row \"%1%\" successfully locked.", + "<462>": "SSP605: Unable to lock table \"%1%\".", + "<463>": "SSP606: Table \"%1%\" successfully locked.", + "<464>": "SSP607: Invalid locktype \"%1%\".", + "<465>": "SSP608: Unable to unlock column(s) %1% in row \"%2%\".", + "<466>": "SSP609: %1% column(s) successfully unlocked.", + "<467>": "SSP610: Unable to unlock row \"%1%\".", + "<468>": "SSP611: Row \"%1%\" successfully unlocked.", + "<469>": "SSP612: Unable to delete row(s) %1%; %2% row(s) deleted.", + "<470>": "SSP613: %1% row(s) deleted.", + "<471>": "SSP614: Row \"%1%\" deleted.", + "<472>": "SSP615: Row \"%1%\" successfully written.", + "<473>": "SSP616: %1% column(s) successfully written.", + "<474>": "SSP617: %1% row(s) successfully copied.", + "<475>": "SSP618: Unable to copy row(s) %1%. %2% row(s) copied.", + "<476>": "SSP619: \"%1%\" is an invalid column.", + "<477>": "SSP620: Write denied.", + "<478>": "SSP621: All locks successfully unlocked.", + "<479>": "SSP622: \"%1%\" is an invalid %2% option.", + "<480>": "SSP623: Unable to read row(s) %1%; %2% row(s) read.", + "<481>": "SSP624: %1% row(s) successfully read.", + "<482>": "SSP625: Destination row/table %1% already exists.", + "<483>": "SSP626: Destination row/table %1% does not exist.", + "<484>": "SSP627: Converted row string size exceeds 65532 bytes.", + "<485>": "SSP628: Unable to unlock table \"%1%\".", + "<486>": "SSP629: Table \"%1%\" successfully unlocked.", + "<487>": "SSP633: Required parameter missing.", + "<488>": "SSP634: No Servers found", + "<489>": "", + "<490>": "SSP700: Index type \"%1%\" is invalid.", + "<491>": "SSP701: Index type \"%2%\" has not been created for column \"%1%\".", + "<492>": "SSP702: Sort mode \"%1%\" is invalid.", + "<493>": "SSP703: Index type \"%2%\" has already been created for column \"%1%\".", + "<494>": "SSP704: Case mode \"%1%\" is invalid.", + "<495>": "SSP705: Create mode \"%1%\" is invalid.", + "<496>": "SSP706: Stop mode \"%1%\" is invalid.", + "<497>": "SSP707: The related table \"%1%\" does not exist.", + "<498>": "SSP708: Different sort modes \"%1%\" and \"%2%\" are not allowed for many-to-one relational indexes.", + "<499>": "SSP709: Cannot create/delete index for table \"%2%\" belongs to a different database \"%1%\".", + "<500>": "SSP710: Cannot create index for table \"%1%\" under a different account \"%2%\".", + "<501>": "SSP711: Cannot create index for table \"%1%\" when it has a Quickdex/Rightdex on its dictionary.", + "<502>": "", + "<503>": "SYS1000: Error loading program \"%1%\".", + "<504>": "SYS1001: Null loading error.", + "<505>": "SYS1002: The object code is invalid.", + "<506>": "SYS1003: The maximum number of programs has been exceeded.", + "<507>": "SYS1004: Error loading dictionary item \"%1%\".", + "<508>": "SYS1005: Cannot DICT insert into symbolic (%1%)", + "<509>": "SYS1006: Module \"%1%\" terminated due to runtime restrictions.", + "<510>": "SYS1008: Invalid login null user name.", + "<511>": "SYS1009: Invalid login user name.", + "<512>": "SYS1010: Invalid login password.", + "<513>": "SYS1011: Invalid login (Account disabled due to excessive attempts).", + "<514>": "SYS1012: Invalid login (Workstation disabled due to excessive attempts).", + "<515>": "", + "<516>": "SYS1100: The \"%1%\" event for \"%2%\" contains syntax errors.", + "<517>": "SYS1101: Compiler error: Preprocessing error.", + "<518>": "SYS1102: Compiler error: Source code exceeds maximum size for compiler.", + "<519>": "SYS1103: Compiler error: Old tablename; record name format is not supported. Invalid $insert.", + "<520>": "SYS1104: Compiler error: Module \"%1%\" Line \"%2%\" : Invalid $USES entity name[%3%]", + "<521>": "SYS1105: Compiler error: Module \"%1%\" Line \"%2%\" : $INSERT access error [%3%]", + "<522>": "SYS1106: Compiler error: Module \"%1%\" Line \"%2%\" : $INSERT circular reference error [$INSERT %3%]", + "<523>": "SYS1107: Compiler error: Module \"%1%\" Line \"%2%\" : Unmatched compiler define condition", + "<524>": "", + "<525>": "SYS1111: Compiler error: Contract must be before executable code", + "<526>": "SYS1112: Compiler error: Contract BEGIN CONDITION is missing.", + "<527>": "SYS1113: Compiler error: Contract END CONDITION is missing.", + "<528>": "SYS1114: Compiler error: Contract contains multiple PRE: statements.", + "<529>": "SYS1115: Compiler error: Contract contains multiple POST: statements.", + "<530>": "SYS1116: Compiler error: Contract PRE: statement is missing.", + "<531>": "SYS1117: Compiler error: Contract POST: statement is missing.", + "<532>": "SYS1119: Compiler error: %1%", + "<533>": "", + "<534>": "SYS1120: Compiler warning: Unassigned Variable \"%1% on line: \"%2%\"", + "<535>": "SYS1121: Compiler information: \"%1% elapsed time \"%2%\" secs", + "<536>": "SYS1122: Compiler warning: Variable \"%1% on line \"%2%\" ends with \"$\"", + "<537>": "SYS1123: Compiler warning: Equate \"%1% on line \"%2%\" does not end with \"$\"", + "<538>": "SYS1124: Compiler warning: Debug statement found", + "<539>": "SYS1125: Compiler warning: %1%", + "<540>": "", + "<541>": "SYS1200: The process has been aborted.", + "<542>": "SYS1201: This feature is not supported.", + "<543>": "SYS1210: The procedure type is invalid.", + "<544>": "SYS1211: A left parenthesis is missing.", + "<545>": "SYS1212: A right parenthesis is missing.", + "<546>": "SYS1213: The argument type is invalid.", + "<547>": "SYS1214: An argument identifier is missing.", + "<548>": "SYS1215: The compilation has failed.", + "<549>": "SYS1216: Too many arguments have been passed.", + "<550>": "SYS1217: A ROWDEF is missing in the routine.", + "<551>": "SYS1220: The object code is missing.", + "<552>": "SYS1221: The argument is invalid.", + "<553>": "SYS1222: PutData has failed.", + "<554>": "SYS1223: The stored procedure name is invalid.", + "<555>": "SYS1224: The procedure cannot be overwritten.", + "<556>": "SYS1230: SQL read error.", + "<557>": "SYS1240: A comma or quote is missing in the script.", + "<558>": "SYS1241: A matching quote is missing in the script.", + "<559>": "SYS1242: The parameter number in the script is invalid.", + "<560>": "SYS1243: The list is too deeply nested in brackets.", + "<561>": "SYS1244: The script contains an invalid character.", + "<562>": "SYS1245: A matching bracket is missing in the script.", + "<563>": "", + "<564>": "SYS1250: The prototype definition is missing", + "<565>": "SYS1251: The prototype return type is missing", + "<566>": "SYS1252: The prototype calling convention is missing", + "<567>": "SYS1253: The prototype function name is missing", + "<568>": "SYS1254: \"%1%\" is not a valid variable type", + "<569>": "SYS1255: \"%1%\" is not a valid calling convention", + "<570>": "SYS1256: \"%1%\" is not a valid internal function pointer", + "<571>": "SYS1257: The prototype definition is missing", + "<572>": "", + "<573>": "SYS1300: Cannot detach or redefine table %1%.", + "<574>": "SYS1301: Table was not found in volume rec table list.", + "<575>": "SYS1302: Volume record for attached table is missing.", + "<576>": "SYS1303: Table list in the volume record does not synch with the systables record.", + "<577>": "", + "<578>": "SYS1500: Primary row locked: Table %1%, key %2%", + "<579>": "SYS1501: Subsidiary row locked: Table %1% key %2%", + "<580>": "SYS1502: Locks missing at update time", + "<581>": "SYS1503: Form fetch denormalization beyond 2nd levels is not supported", + "<582>": "", + "<583>": "SYS1901: Table list cannot be null.", + "<584>": "SYS1913: Database record is missing in control table.", + "<585>": "SYS1915: Alias with wrong table type.", + "<586>": "SYS1916: Aliasing system tables is not allowed.", + "<587>": "SYS1917: Alias table name cannot be null.", + "<588>": "SYS1918: Renaming system tables is not allowed.", + "<589>": "SYS1919: Renaming alias tables is not allowed.", + "<590>": "SYS1920: Database record is missing.", + "<591>": "", + "<592>": "SYS1980: Error opening structure definition table \"%1%\" [%2%]", + "<593>": "SYS1981: Error reading structure definition for \"%1%\" [%2%]", + "<594>": "", + "<595>": "B100: Line %1%. THEN/ELSE not terminated with END. Invalid keyword: %2%.", + "<596>": "B101: Line %1%. Illegal Statement Termination: %2%", + "<597>": "B102: Line %1%. Illegal Statement: %2%.", + "<598>": "B103: Line %1%. Label %2% is missing.", + "<599>": "B104: Line %1%. Label %2% is doubly defined.", + "<600>": "B105: Line %1%. %2% has not been dimensioned or declared for use as a function or subroutine.", + "<601>": "B106: Line %1%. Variable has been dimensioned and used without subscripts.", + "<602>": "B108: Line %1%. FOR statement not terminated with \"NEXT\" keyword.", + "<603>": "B113: Line %1%. Illegal expression encountered.", + "<604>": "B114: Line %1%. Maximum number of variables exceeded.", + "<605>": "B115: Line %1%. Label %2% is used before the EQUATE statement.", + "<606>": "B120: Line %1%. Statements exist after final \"END\" statement. Check for unmatched conditionals.", + "<607>": "B123: Line %1%. End of source reached with unmatched IF, ELSE, FOR, LOOP or CASE block.", + "<608>": "B200: Line %1%. Input Error", + "<609>": "B201: Line %1%. Unterminated conditional clause.", + "<610>": "B202: Line %1%. Unterminated conditional clause.", + "<611>": "B203: Line %1%. Illegal expression following logical %2% operator.", + "<612>": "B204: Line %1%. Illegal expression following MATCHES operator.", + "<613>": "B205: Line %1%. Illegal expression following comparison operator.", + "<614>": "B206: Line %1%. Illegal expression following concatenation operator.", + "<615>": "B207: Line %1%. Illegal expression following negation operator.", + "<616>": "B208: Line %1%. Illegal expression following addition operator.", + "<617>": "B209: Line %1%. Illegal expression following subtraction operator.", + "<618>": "B210: Line %1%. Illegal expression following multiplication operator.", + "<619>": "B211: Line %1%. Illegal expression following division operator.", + "<620>": "B212: Line %1%. Illegal expression following power operator.", + "<621>": "B213: Line %1%. Reserved keyword %2% encountered in expression.", + "<622>": "B214: Line %1%. Right paren \")\" missing.", + "<623>": "B215: Line %1%. Right curly brace \"}\" missing.", + "<624>": "B216: Line %1%. THEN keyword is required.", + "<625>": "B217: Line %1%. Illegal expression following THEN.", + "<626>": "B218: Line %1%. ELSE keyword is required.", + "<627>": "B219: Line %1%. Illegal expression following ELSE.", + "<628>": "B300: Line %1%. Generated object code exceeds 65535 bytes.", + "<629>": "", + "<630>": "//Arev B errors - see SYSPROG, BERRORS", + "<631>": "B101: \" toSort mode selected is not correct. Column %1% already has relational index with %2% mode. Please apply this mode for creating c", + "<632>": "B102: \" to %1% already has a relational index established from table %2%. The Relational index cannot be set again from table %3%. ", + "<633>": "B103: \" to Compressing %1%... ", + "<634>": "B104: %1% has been selected, but cannot be found in %2%. ", + "<635>": "B105: The dBASEIII file %1% already exists. Do you want to overwrite it? ", + "<636>": "B106: The dBASEIII memo file %1% already exists. Do you want to overwrite it? ", + "<637>": "B107: Cannot find the %1% command in the LIST.SUB subroutines. ", + "<638>": "B108: Enter number. ", + "<639>": "B109: Enter text without quotes. ", + "<640>": "B110: Port Call: ", + "<641>": "B111: An invalid option was used in the \"PORT\" command. ", + "<642>": "B112: The code %2% is not valid in \"%1%\". ", + "<643>": "B113: The %1% option is not currently implemented. ", + "<644>": "B114: Not available. ", + "<645>": "B115: The column must not be a symbolic, group, or key column, or have a relational index on it. ", + "<646>": "B116: You must first select a column. ", + "<647>": "B117: Enter a table name followed by a slash (/) and a column name. ", + "<648>": "B118: Warning! All index information will be deleted from %1%. Do you want to continue? ", + "<649>": "B119: Clearing indexing information in %1%... ", + "<650>": "B120: Deleting Cross Reference information from %1%... ", + "<651>": "B121: The character column %1% is longer than the 254 character limit. Use a memo field for this column. ", + "<652>": "B123: Finding indexed tables... ", + "<653>": "B124: Collecting indexing information... ", + "<654>": "B125: Enter a new table name for the save list statement. Press [Esc] to cancel the process. ", + "<655>": "B126: %1% is a new row. ", + "<656>": "B127: %1% is an invalid row. ", + "<657>": "B128: Hours cannot exceed 12. ", + "<658>": "B129: Text cut into buffer %1%. ", + "<659>": "B130: \"%1%\" was not found. ", + "<660>": "B131: The default macro set %1% cannot be found. ", + "<661>": "B132: The header for group 1 has been corrupted. No framesize or modulo information can be read. Do you want to fix group 1? ", + "<662>": "B133: Cannot determine the framesize of this table. Please enter your best estimate for the framesize in bytes. ", + "<663>": "B134: Framesize must divide evenly into the filesize (%1%). ", + "<664>": "B135: The FRAMESIZE must be between 256 and 10000. ", + "<665>": "B136: The FRAMESIZE parameter must be numeric. ", + "<666>": "B137: Enter a group or group range to fix. Formats are: x, x-y, ALL. Press [Esc] to cancel the process. ", + "<667>": "B138: Response = %1% ", + "<668>": "B139: Fixing groups %1% through %2%... ", + "<669>": "B140: Rebuilding the primary % figure... ", + "<670>": "B141: Copying all good rows found from a temporary table back into re-initialized groups... ", + "<671>": "B142: Another station is fixing. Please try again later. ", + "<672>": "B143: The overflow freelist has been cleared. You can issue a compress to recover and re-order the overflow frames. ", + "<673>": "B144: Compress file. There must be no other user of this file. After compression, this file should be re-attached at all other s", + "<674>": "B145: An error occurred during the compress operation. The operation has been canceled. ", + "<675>": "B146: The drive %1% does not contain Advanced Revelation files. ", + "<676>": "B147: The program OCONV.RUN is not available in the SYSOBJ table. ", + "<677>": "B148: Enter the names of the programs to display. ", + "<678>": "B149: The %1% table was not found. Do you want to list all indexed tables? ", + "<679>": "B150: The %1% table is not indexed. Do you want to list all indexed tables? ", + "<680>": "B151: You have defined an index. Do you want to turn it on? ", + "<681>": "B152: *CAUTION* You have asked to delete rows from SYSCOLUMNS. These rows will also be deleted from your dictionaries. Do you want to c", + "<682>": "B153: The %1% column in the %2% table is not available. Do you want to list all indexed columns? ", + "<683>": "B154: Will \"%1%\" be a key prompt? ", + "<684>": "B155: Finding the %1% column in the dictionary... ", + "<685>": "B156: %1% cannot be found. It must exist in %2%. ", + "<686>": "B157: %1% is currently a Data Column at position %3% Do you want to convert it to a Symbolic column? ", + "<687>": "B158: No formula has been saved. ", + "<688>": "B159: The formula was not changed. ", + "<689>": "B160: Collector windows do not use dictionary formulas. ", + "<690>": "B161: The object code for %2% cannot be found in the %1% table. %2% is also not cataloged. Please enter the name of the table containin", + "<691>": "B162: The window %1% cannot be found. ", + "<692>": "B163: Updating the dictionary... ", + "<693>": "B164: %1% did not bind correctly. ", + "<694>": "B165: No index values were found. ", + "<695>": "B166: Cannot find the row %1% in the %2% table. ", + "<696>": "B167: Collecting information about indexes... ", + "<697>": "B168: Key capture functions have been disabled. ", + "<698>": "B169: This is an invalid key. ", + "<699>": "B170: Macro execution has been disabled. ", + "<700>": "B171: Window %1% is about to be deleted from %2%. Do you want to continue? ", + "<701>": "B172: Deleting... ", + "<702>": "B173: No columns are indexed in %1%. ", + "<703>": "B174: Sorting is not allowed within a protected group. ", + "<704>": "B175: Sorting is not allowed before row %1%. ", + "<705>": "B176: Enter the number of rows to select or leave this blank to select all rows. ", + "<706>": "B177: Enter heading text for this column. ", + "<707>": "B178: Enter an output format code. (example: \"D2/\" for a date format of mm/dd/yy) ", + "<708>": "B179: Enter a heading. ", + "<709>": "B180: Enter a footing. ", + "<710>": "B181: QBEC1, HORMV.OUT sync error? ", + "<711>": "B182: QBEC1, HORMV.SCB out of sync? ", + "<712>": "B184: Building query... ", + "<713>": "B185: Updating %1% in the %2% table... ", + "<714>": "B186: No key prompt was specified. The default key prompt will be %1%. ", + "<715>": "B187: You must create at least one prompt before you can save this window. The save operation has been canceled. ", + "<716>": "B188: The window %1% was not locked. No changes will be saved. ", + "<717>": "B189: Join prompt %1% cannot be found. ", + "<718>": "B190: Do you want to execute the filter? ", + "<719>": "B191: %1%, needed for index transactions is not available. Indexes depending on this table will probably need rebuilding. ", + "<720>": "B192: The Lotus file %1% already exists. Do you want to overwrite it? ", + "<721>": "B193: Enter a variable name. ", + "<722>": "B194: Editing must be complete to continue. ", + "<723>": "B195: There is nothing to pan. ", + "<724>": "B196: This label is as large as you can make it in the current window. ", + "<725>": "B197: You have reached the edge of window space. You may want to try resizing your window using [Ctrl-F7]. ", + "<726>": "B198: The dictionary of %1% is in use. No changes will be saved. ", + "<727>": "B199: The dictionary is in use elsewhere. The binding cannot be changed. ", + "<728>": "B200: You have maximized this prompt entry in the current window. You may want to try resizing your window using [Ctrl-F7]. ", + "<729>": "B201: Reading window... ", + "<730>": "B202: %1% has %2% installed. Do you want to remove %2%? ", + "<731>": "B203: Removing the %1% modifying filing system from %2%... ", + "<732>": "B204: Waiting until the source record %1% can be locked... ", + "<733>": "B205: %1% is locked. ", + "<734>": "B206: No R/LIST program was generated. An invalid expression or column has been detected in line %1%. ", + "<735>": "B207: %1% is not a valid dBASEIII file. ", + "<736>": "B208: Do you want to perform the conversion? ", + "<737>": "B209: That is an invalid color name. ", + "<738>": "B210: If no record delimiter is specified, a record length must be specified. ", + "<739>": "B211: The operating system file %1% already exists. Do you want to overwrite it? ", + "<740>": "B212: The HELP file is not available. No help message will be saved. Do you want to continue? ", + "<741>": "B213: Done. ", + "<742>": "B214: There are no columns defined in the dictionary of %1%. ", + "<743>": "B215: You must add a table to the window before you can use Quick Paint. ", + "<744>": "B216: There are no tables in this window. ", + "<745>": "B217: Formatting... ", + "<746>": "B218: Printing... ", + "<747>": "B220: The mode %1% is invalid. ", + "<748>": "B221: The selected objects have been copied to the Paint clipboard. ", + "<749>": "B222: Function key? %1% ", + "<750>": "B223: You must be in Roam mode to Insert or Delete rows. ", + "<751>": "B224: The record already exists in the VOC. Do you want to overwrite it? ", + "<752>": "B225: Resizing is not supported in Table mode. ", + "<753>": "B226: You may not pan while in Table mode. ", + "<754>": "B227: The Window is fully displayed. ", + "<755>": "B228: There is no transaction file for this Batch Update. ", + "<756>": "B229: This label is at maximum length for the current window. You may want to try resizing your window using [Ctrl-F7]. ", + "<757>": "B230: A starting byte and a length are required. ", + "<758>": "B231: Lock information has been updated in the templates in the %1% file. ", + "<759>": "B232: No related windows are available. ", + "<760>": "B233: Macro building has been disabled. ", + "<761>": "B234: Searching Indexes... Press [Esc] to cancel the search. ", + "<762>": "B235: Waiting for index %1% to be available... ", + "<763>": "B236: Error in compiling \"%1%\" ", + "<764>": "B237: No [F2] Help for %1% type commands is available. ", + "<765>": "B238: Collector windows do not have dictionaries. ", + "<766>": "B239: Updating prompt %1%... ", + "<767>": "B240: Updating the %1% field... ", + "<768>": "B241: %1% is invalid. ", + "<769>": "B242: Enter the table name to move to. ", + "<770>": "B243: Selecting referenced programs... ", + "<771>": "B244: %1% is not a valid table type. Press [F2] for table type options. ", + "<772>": "B245: The %1% key is not active %2% Press [Ctrl-F9] for a list of the currently active keys. ", + "<773>": "B246: The clipboard has been cleared. ", + "<774>": "B247: Pasting is only allowed while Roaming. ", + "<775>": "B248: Reading dictionary... ", + "<776>": "B249: The dictionary is not bound to %1%. Use the Prompt Window to verify the prompt. ", + "<777>": "B250: Table Information for %1%: Volume = %2% OS Path = %3% File Type = %4% File Number = %5% ", + "<778>": "B251: The %1% table belongs to the %2% volume. You may only change indexing in tables under the same volume. ", + "<779>": "B252: Do you want to save? ", + "<780>": "B253: Shifting... ", + "<781>": "B254: No block of text has been defined. ", + "<782>": "B255: The menu options key is disabled. ", + "<783>": "B256: An invalid attribute was passed to ATTR.TO.ESC. Attribute = \"%1%\" (hex). ", + "<784>": "B257: Cannot access color definitions correctly. ", + "<785>": "B258: The escape sequence \"%1%\" (hex) is invalid in ESC.TO.ATTR. ", + "<786>": "B259: The %1% table belongs to the %2% application. You may only change indexing in tables in the same application. ", + "<787>": "B260: %1% is not a valid volume name or an existing subdirectory. ", + "<788>": "B261: Table name = %1% OS name = %8% Volume = %2% Application = %3% File Type = %4% %5% ", + "<789>": "B262: %1% is indexed and cannot be renamed. ", + "<790>": "B263: %1% in the %2% table is not a valid dictionary type for indexing. Only the dictionary types \"F\" and \"S\" may be indexed. ", + "<791>": "B264: %1% already exists in the %3% application on the %2% volume. ", + "<792>": "B265: The clipboard is empty. ", + "<793>": "B266: %1% is not a Linear Hash table. You must convert your table before attempting to use it with PAINT. ", + "<794>": "B267: The maximum length of the Quickdex index (65,530 characters) has been reached -- no more records will be added to the Quickdex in", + "<795>": "B268: The \"BY\" clause is invalid. You cannot sort by %1%. ", + "<796>": "B269: The disk the drive is NOT a valid LAN Pack disk. Please insert a valid LAN Pack disk. ", + "<797>": "B269: A Fatal Bump error. Improper Bump information. ", + "<798>": "B272: There is no disk in drive %1%. Insert a disk and then try agian. ", + "<799>": "B273: To install a LAN Pack, you must log in as the \"LANPACK\" user. ", + "<800>": "B274: This installation currently supports %1% user(s). Would you like to enable more users? ", + "<801>": "B275: Insert a NEW Lanpack into Drive. Choose drive (A or B) or Cancel ", + "<802>": "B276: If you change the location of your application without moving the DOS files, you will NOT be able to open the application. ", + "<803>": "B279: Cannot find the %1% driver in the SYSNETWORKS table. ", + "<804>": "B280: The REVBOOT file is too large. ", + "<805>": "B282: The original REVBOOT file has been renamed REVBOOT.OLD. The new network driver will be available the next time you log onto Adva", + "<806>": "B284: Logging off. ", + "<807>": "B285: No rows found. ", + "<808>": "B286: %1% is not a valid index name. ", + "<809>": "B287: Warning! The index update process must not be interrupted or indexes will be corrupted. Do you still want to update ALL i", + "<810>": "B288: There are invalid character(s) in the table name %1%. Use only alphanumeric characters and the special characters underscore \"_\"", + "<811>": "B289: The dictionary of %1% is not available. ", + "<812>": "B291: The key list has exceeded the maximum allowed length. The list will be truncated. ", + "<813>": "B292: The list accumulated in %1% has been truncated to the 64K bytes limit. Please use the R/LIST command to retrieve correct ", + "<814>": "B293: The Btree index for the indexed column %1% in the table %2% has not been created. Please initialize the index for this column an", + "<815>": "B294: The list returned from BTREE.EXTRACT has been truncated to the 64K limit. To retrieve more rows from the %1% table use the SELEC", + "<816>": "B295: The list %1% cannot be found in the LISTS table. ", + "<817>": "B296: Do you want to cancel this process? ", + "<818>": "B297: The correct form for the TRANSACTION command is: TRANSACTION operator (option) where: operator = COMMIT, ROLLBACK, S", + "<819>": "B300: These table(s) are not found in this volume: ", + "<820>": "B301: Table(s) not available: ", + "<821>": "B303: No candidate tables found. ", + "<822>": "B304: Domain and validation controls have been added to %1% tables. ", + "<823>": "B305: Control features have been removed from %1% tables. ", + "<824>": "B306: Locating tables... ", + "<825>": "B307: No tables were affected. The \"S\" option is not active if no volume is specified. ", + "<826>": "B308: The \"%1%\" volume is not available. ", + "<827>": "B311: The \"%1%\" table does not have control features active. Press [Esc] to cancel the process or press any other key to continue. ", + "<828>": "B312: The \"%1%\" table already has Control features active. Press [Esc] to cancel the process or press any other key to continue. ", + "<829>": "B313: The \"%2%\" volume does not exist. ", + "<830>": "B314: \"%1%\" is not a data table, and cannot have control features added. Press [Esc] to cancel the process or press any other key to c", + "<831>": "B315: The \"%1%\" table is not available. It must be attached before Control features can be added. Press [Esc] to cancel the process or", + "<832>": "B316: The \"%1%\" table does not exist on the \"%2%\" volume. Press [Esc] to cancel the process or press any other key to continue. ", + "<833>": "B317: An error has occurred while writing to the volume directory for the \"%2%\" volume. Press [Esc] to cancel the process or press any", + "<834>": "B318: The \"%1%\" table is not on the \"%2%\" volume. Press [Esc] to cancel the process or press any other key to continue. ", + "<835>": "B319: Unable to save \"%1%\" in the \"%2%\" table. ", + "<836>": "B320: Subroutine: %1%|Branch value must be numeric! ", + "<837>": "B321: Subroutine: %1%|Value of %2% exceeds highest ON...GOSUB branch. ", + "<838>": "B322: The table: %1% is excluded from all EasyWriter and QBE|queries. Therefore, you may not set up additional|dictionary level contro", + "<839>": "B323: Link list in the table \"%1%\" is broken. Transactions cannot be properly flushed. To correct this problem, please rebuild a", + "<840>": "B324: The table: %1% has no dictionary attached or created.|Therefore, you may not set up additional|dictionary level control on the ta", + "<841>": "B325: Dictionary tables cannot be further qualified for EasyWriter queries. ", + "<842>": "B326: Error writing to DOS file \"%1%\" ", + "<843>": "B327: Default configuration record \"%1%\" is missing from the %2% table. ", + "<844>": "B328: Error opening or reading from .INI file \"%1%\" ", + "<845>": "B329: %1% is an invalid Advanced Revelation .INI file. ", + "<846>": "B330: The file or path \"%1%\" does not contain .INI files. ", + "<847>": "B331: Other .INI files only accessable from the SYSPROG account. ", + "<848>": "B332: No INI-file has been found. \"%1%\" has been created as the default INI-file. ", + "<849>": "B333: Finishing processing selections. Please wait. ", + "<850>": "B400: Initializing the index control information... ", + "<851>": "B401: Null I/O Error ", + "<852>": "B402: Error compiling %1%. Use the dictionary window to correct the formula. ", + "<853>": "B403: Error while copying row \"%1%\" to the \"%2%\" table. ", + "<854>": "B404: Building the \"%1%\" index for the \"%2%\" table... ", + "<855>": "B440: Another workstation is currently accessing table \"%2%\" and has row \"%1%\" locked. The index update you have requested will pr", + "<856>": "B441: Records can not be updated because the table \"%1%\" is not available or attached for reference to store index transactions. P", + "<857>": "B500: The \"%1%\" table has been dropped. ", + "<858>": "B501: The wait-for-lock process has been interrupted. Lock information: Lock Type: \"%1%\" Table : \"%2%\" Row : \"%", + "<859>": "B502: Transaction Control is OFF. ", + "<860>": "B503: You must log in as the user \"SYSPROG\" to perform this function. ", + "<861>": "B504: Do you want to remove the user \"%1%\" from the commit queue \"%2%\" ? ", + "<862>": "B505: Do you want to remove the user \"%1%\" from ALL commit queues? ", + "<863>": "B506: Do you want to clear the entire Commit Log? ", + "<864>": "B507: Warning! Invoking Auto-Transaction Start causes all changes to be held until they are explicitly committed. Unless committed, ch", + "<865>": "B508: A pending transaction exists for this station. Do you want to Commit or Rollback before logoff? ", + "<866>": "B509: A pending transaction exists for this station. Do you want to Commit, Rollback, or Ignore the transaction? ", + "<867>": "B510: Invalid response. Entry must be \"C\", \"R\", or \"I\". ", + "<868>": "B511: Invalid response. The entry must be a \"C\" or \"R\". ", + "<869>": "B512: This function can only be used when Commit Protection is \"ON\". Commit protection causes commit queues to be maintained. A lock ", + "<870>": "B513: The \"COMMITLOG\" file has been locked. Transactions cannot be committed while this utility is being run. ", + "<871>": "B514: This volume does not contain any tables of the Revelation G type. ", + "<872>": "B515: Row \"%1%\" was found in the \"VOC\", but is not a valid volume name. ", + "<873>": "B516: \"%1%\" is mapped to drive \"%2%\". ", + "<874>": "B517: \"%1%\" is not a volume. This process assumes that it is a path name. Is this correct? ", + "<875>": "B518: The volume name that corresponds to the path \"%1%\" is \"%2%\" Is this correct? ", + "<876>": "B519: The target must a be valid volume. Building \"%TEMP.VOL.CONVERT%\" using the path \"%1%\". ", + "<877>": "B520: The volume directory on path \"%1%\" is not available. ", + "<878>": "B521: Another workstation is currently updating indexes on table \"%2%\" with control column \"%1%\" locked. The index update you have", + "<879>": "B522: \"%1%\" is not a valid column name. ", + "<880>": "B523: Help level can only be set from Level 1 of TCL. ", + "<881>": "B524: All other users should reattach this table in order for indexing to remain up-to-date. ", + "<882>": "B525: Error %1% in VSPACE. ", + "<883>": "B526: The View window cannot be displayed. The operating system file required for the window is not available or cannot be created. ", + "<884>": "B527: Your DOS path for temporary files is invalid. Please check your environment setting. ", + "<885>": "B528: I/O error during join process. ", + "<886>": "B529: An error was encountered while joining columns. No changes will be saved. ", + "<887>": "B530: A Merge name is required. ", + "<888>": "B531: The printer configuration for \"%1%\" cannot be found in \"%2%\". ", + "<889>": "B532: The flag definition record \"%1%\" cannot be found. ", + "<890>": "B533: Cannot find \"%1%\". ", + "<891>": "B534: The \"%C37%FIELDS%C37%\" row in the the dictionary of \"%1%\" is not available. ", + "<892>": "B535: Reprocessing row \"%1%\" from the \"%2%\" table %3% ... ", + "<893>": "B536: Cannot find \"%1%\" in \"%2%\". ", + "<894>": "B537: Merging row \"%1%\" from the \"%2%\" table to the output table %3% ... ", + "<895>": "B538: The key list contains imbalanced single or double quote marks. ", + "<896>": "B539: No output table was specified in the template. ", + "<897>": "B540: Widow/Orphan override. ", + "<898>": "B541: MERGE.SUB was passed a dispatch value out of range %1%. ", + "<899>": "B542: Collecting column information... ", + "<900>": "B543: %1% Enter a value. ", + "<901>": "B544: Do you want to delete \"%1%\"? ", + "<902>": "B545: The Merge sample is active only while editing the Merge script. ", + "<903>": "B546: Do you want to view the previous sample? ", + "<904>": "B547: The row \"%1%\" is not available in the \"%2%\" table to do a Merge sample. ", + "<905>": "B548: Do you want to abandon the sample? ", + "<906>": "B549: Selecting a random row. ", + "<907>": "B550: Initializing... ", + "<908>": "B551: \"%1%\" error(s) detected. ", + "<909>": "B552: No errors have been detected. ", + "<910>": "B553: This field is protected. Press [F2] to edit the Script. ", + "<911>": "B554: Enter the name of the operating system text file to import. ", + "<912>": "B555: The table can be accessed successfully. ", + "<913>": "B556: \"%1%\" is not a legal operating system filename. ", + "<914>": "B557: Access to this file has been denied by the operating system. ", + "<915>": "B558: \"%1%\" does not exist. ", + "<916>": "B559: \"%1%\" is not available or cannot be found. ", + "<917>": "B560: Convert high ASCII characters (higher than character 127)? ", + "<918>": "B561: The format flag template contains an invalid key flag (%1%-%2%). ", + "<919>": "B562: The text file is too long. The file will be truncated to fit into the Merge template. ", + "<920>": "B563: Wrap long lines? ", + "<921>": "B564: The key flag \"%1%\" in the options list is a valid flag. ", + "<922>": "B565: \"%1%\" is not a valid format code. Press [F2] for a list of valid formats. ", + "<923>": "B566: The format code %1% is invalid. ", + "<924>": "B567: The \"%1%\" table does not exist. Do you want to create it? ", + "<925>": "B568: The Merge script is empty. ", + "<926>": "B569: The Merge header has not been specified. ", + "<927>": "B570: The Merge footer has not been specified. ", + "<928>": "B571: Printer format specifications must be entered as up to 3 decimal numbers separated by spaces. (example: 27 72 105) ", + "<929>": "B572: Selecting rows... ", + "<930>": "B573: Enter the name of the filter row. ", + "<931>": "B574: The \"REPORTS\" table is not available. Press [Enter] to return to the Query window. ", + "<932>": "B575: The filter \"%1%\" has been saved. ", + "<933>": "B576: Do you want to save your custom changes in a Filter? ", + "<934>": "B577: The \"%1%\" prompt contains unbalanced quotation marks. ", + "<935>": "B578: Converting the R/DESIGN row \"%1%\". ", + "<936>": "B579: \"%1%\" This row already exists in \"%2%\". The row was not converted. ", + "<937>": "B580: \"%1%\" This record was converted and saved in \"%2%\". ", + "<938>": "B581: %1% Possible incompatibility. This prompt has a symbolic reference in %2%. The code has been placed in %3%. ", + "<939>": "B582: The symbolic uses RDESIGN.COMMON. This is incompatible with window templates. ", + "<940>": "B583: The symbolic defines COMMON variables. This may be incompatible with Window templates. ", + "<941>": "B584: \"%1%\" This prompt has a subroutine reference in Description. The code has been placed in the Options prompt. This may be incompat", + "<942>": "B585: The subroutine \"%1%\" uses RDESIGN.COMMON. This is incompatible with window templates. ", + "<943>": "B586: The subroutine \"%1%\" defines common. This may be incompatible with Window templates. ", + "<944>": "B587: The program \"%1%\" cannot not be found. The process is unable to check for incompatibility. ", + "<945>": "B588: The program table is not available. Unable to check for incompatibility. ", + "<946>": "B589: \"%1%\" This row is not an \"ENTRY\" type. It cannot be converted by this program. ", + "<947>": "B590: The \"VOC\" entry was not a catalog pointer. The process is unable to check for incompatibility. ", + "<948>": "B591: \"%1%\" The \"VOC\" entry is not available. Unable to check for incompatibility. ", + "<949>": "B592: \"%1%\" This row cannot be found in the \"%2%\" table. ", + "<950>": "B593: \"%1%\" The cross reference login was not converted. ", + "<951>": "B594: \"%1%\" The table accessed by this template is not available. The prompts for symbolic columns cannot be verified. ", + "<952>": "B595: The change prompt has a value in \"PARAMETER 1\". Linked screen conversion is not completed yet. PARAMETER 1 = \"%1%\" ", + "<953>": "B596: Prompt number %1% (R/DESIGN window number %2%) is more than one column wide. It has been truncated to one column. ", + "<954>": "B597: %1% This prompt has a non-numeric value in Parameter 1. No action has been taken. ", + "<955>": "B598: \"%1%\" This prompt has a value in the \"DESCRIPTION\" field that cannot be converted. ", + "<956>": "B599: Mode %1% is an invalid reduction mode. ", + "<957>": "B600: The first (meta) pass for \"WITH\" has failed. ", + "<958>": "B601: WITH meta compilation failed. ", + "<959>": "B602: This option/process is not supported. ", + "<960>": "B603: The cursor value %1% is out of range. ", + "<961>": "B604: The cursor \"%1%\" is invalid. ", + "<962>": "B605: The template has not been saved. There is no Table or Collector information. ", + "<963>": "B606: Position information must be numeric. ", + "<964>": "B607: The mode %1% is invalid for LIST.ACTIVE. ", + "<965>": "B608: Error during Readnext operation while seeking. ", + "<966>": "B609: Waiting for an index lock... If you cancel this process, the table will not be deleted. ", + "<967>": "B610: BFS name cannot be read for DICT %1% ", + "<968>": "B611: The [Alt-V] key is functional only when using R/LIST commands. ", + "<969>": "B615: The active select list is unresolved. Do you want to continue? ", + "<970>": "B616: The active select list is unresolved with reduction pending. Do you want to continue? ", + "<971>": "B617: The active select list is unresolved. The \"%1%\" table contains %2% rows. Do you want to continue? ", + "<972>": "B618: The active SELECT list is unresolved. The \"%1%\" table contains %2% rows. Do you want to continue? ", + "<973>": "B619: Seek to the top of table has failed. Do you want to continue the Savelist from the current position? ", + "<974>": "B620: %B%No Cross Reference or Btree index has been established for the \"%1%\" table. ", + "<975>": "B621: \"%1%\" is not a valid key in the \"%2%\" table. ", + "<976>": "B622: Preparing \"%1%\" listing... ", + "<977>": "B623: No rows have been selected. ", + "<978>": "B624: The record \"@CRT\" in the dictionary of \"%1%\" contains an invalid column. \"%2%\" does not exist. ", + "<979>": "B625: VSPACE status error %1%. ", + "<980>": "B626: \"%1%\" is not available for the View window. Cancelling the process. ", + "<981>": "B627: STATUS() error = \"%1%\" \"%2%\" ", + "<982>": "B628: Cannot move to the top of the table. Do you want to continue the report from the current position? ", + "<983>": "B629: Enter page number to display. ", + "<984>": "B630: Do you want to print this report? ", + "<985>": "B631: The \"REPORTS\" table is not available. ", + "<986>": "B632: The row \"%1%\" cannot be found in the \"REPORTS\" table. ", + "<987>": "B633: Moving \"%1%\" menus is not allowed. ", + "<988>": "B634: This menu is too large to display. The process has been cancelled. ", + "<989>": "B635: The [Alt-P] key is functional only when using R/LIST commands. ", + "<990>": "B636: SELECT.INDEX failed during REDUCE operation. ", + "<991>": "B700: The ASCII %1% character is reserved for system use and cannot be used in prompts or labels. ", + "<992>": "B701: The index search type specified for \"%1%\" is invalid. ", + "<993>": "B702: The index \"%1%\" must be rebuilt. ", + "<994>": "B703: Warning! The index \"%1%\" must be rebuilt. (The primary data and index control information has not been corrupted.) ", + "<995>": "B704: Restricted access. ", + "<996>": "B705: The correct form for the \"BUILD.TABLE\" command is: BUILD.TABLE template.file.name template.name ", + "<997>": "B706: Working on template \"%1%\" in the \"%2%\" table... ", + "<998>": "B707: The \"%1%\" template is encrypted. Unable to build a table row. ", + "<999>": "B708: No help is available for \"%1%\". ", + "<1000>": "B709: Row is locked. Retrying... ", + "<1001>": "B710: Do you want to change the message? ", + "<1002>": "B711: Waiting for \"%1%\" transaction lock in \"%2%\"... Warning! If you cancel this process, you will have to rebuild this index. ", + "<1003>": "B712: The \"%1%\" option is not available in FILE.CVT. ", + "<1004>": "B713: Working on \"%1%\"... ", + "<1005>": "B714: The popup has reached the maximum size allowed for your memory configuration. ", + "<1006>": "B772: ", + "<1007>": "B800: Waiting to lock the \"%1%\" table... Press [Esc] to cancel the process. ", + "<1008>": "B801: %1% row(s) have been selected. %2% logical error(s) were detected. ", + "<1009>": "B802: %1% row(s) have been selected. %2% error(s) were detected. ", + "<1010>": "B805: This statement contains unbalanced quotes. ", + "<1011>": "B810: \"%1%\" is an invalid active language set. The active language set must be in the list of loaded sets or must be \"DEFAULT\". ", + "<1012>": "B811: \"%1%\" is an invalid language set. Press [F2] for a list of valid choices. ", + "<1013>": "B812: \"%1%\" already exists in the load list. ", + "<1014>": "B813: \"%1%\" is an invalid output conversion pattern for the TIMEDATE() function. The pattern must be a valid \"DT\" (Date-Time) conversio", + "<1015>": "B815: Case sensitive character sort order in record \"%1%\" is invalid. It must be 256 bytes in length exactly. ", + "<1016>": "B816: Case insensitive character sort order in record \"%1%\" is invalid. It must be 256 bytes in length exactly. ", + "<1017>": "B817: The language set control row \"%1%\" is not in the load list and is not \"DEFAULT\". ", + "<1018>": "B818: The language set control row \"%1%\" was not found in the SYSENV table. ", + "<1019>": "B820: No fonts or styles defined for this printer. ", + "<1020>": "B821: No printers have been defined in the environment. ", + "<1021>": "B822: Cannot initialize printer %1% ", + "<1022>": "B823: %1% is not a valid color. ", + "<1023>": "B824: %1% rows converted. ", + "<1024>": "B825: The spooling file %1% already exists.|Do you wish to overwrite the file? ", + "<1025>": "B826: Operation cancelled. ", + "<1026>": "B827: WARNING! If you cancel the print job, the spool file will be erased, and you must rerun any reports that you want printed. Do yo", + "<1027>": "B828: A print process is open for this station and a close process has been defined for this printer. Do you wish to execute the Close", + "<1028>": "B829: You have selected the postcript printer driver and any printed output will be spooled to a temporary file. To send any pendin", + "<1029>": "B830: The value you have entered does not meet validation criteria. You can enter strings of characters to send to the printer in any ", + "<1030>": "B834: There is no ROSMEDIA.MAP file on \"%1%\". ", + "<1031>": "B835: \"%1%\" is in the \"VOC\" but it is not a volume pointer.", + "<1032>": "", + "<1033>": "DBASE1: dBASE error; Primary status = %1%; Secondary status = %2%.", + "<1034>": "DBASE2: dBASE error %2%; Primary Status = %1%; Secondary status = %3%.", + "<1035>": "CHK100: Could not create directory %1%.", + "<1036>": "CHK101: Check-out status %1% cannot be processed.", + "<1037>": "CHK102: Could not create hot repository on %1%.", + "<1038>": "CHK103: Could not create cold repository on %1%.", + "<1039>": "CHK104: Volume %1% already exists. Repository could not be created.", + "<1040>": "CHK105: Invalid repository format %1%.", + "<1041>": "REP100: No method \"%2%\" exists for entity \"%1\".", + "<1042>": "REP101: At least two args required for methods.", + "<1043>": "REP102: Cannot forward message - no more parent class levels.", + "<1044>": "REP110: Cannot add entity \"%1%\" - it already exists.", + "<1045>": "REP111: Reference \"%1%\" is missing for \"%2%\" - referential error.", + "<1046>": "REP112: Reference \"%1%\" crosses application lines.", + "<1047>": "REP113: Invalid entity id \"%1%\".", + "<1048>": "REP117: Cannot add type - it already exists.", + "<1049>": "REP118: Cannot add application - it already exists.", + "<1050>": "REP119: User %1% does not have rights to perform operation %2% against entity %3%.", + "<1051>": "REP120: Inherited entity %1% cannot be modified.", + "<1052>": "REP121: Invalid flag option code %1%.", + "<1053>": "REP122: Invalid flag operator code.", + "<1054>": "REP123: Cannot find associated component %2% of entity %1%.", + "<1055>": "REP124: Message %2% is not supported by the entity type/class %1%.", + "<1056>": "REP125: App body missing in SYSAPPS.", + "<1057>": "REP126: Repository is being synchronized with the Database from another station.", + "<1058>": "REP127: Error copy entity %1% component %2% in checkout or extraction.", + "<1059>": "REP128: Illegal location token used on hot format checkout.", + "<1060>": "REP129: Cannot update associated component %2% of entity %1% (%3%).", + "<1061>": "REP130: Missing SYSREPOSCLASSES definition for entity %1% (%2%).", + "<1062>": "REP131: Missing SYSREPOSTYPES definition for entity %1% (%2%).", + "<1063>": "REP132: Error opening SYSREPOSTYPES table (%1%).", + "<1064>": "REP133: Error opening SYSREPOSCLASSES table (%1%).", + "<1065>": "REP134: Error creating MSScriptControl.ScriptControl (%1%).", + "<1066>": "REP135: Error adding code to Script Control (%1%).", + "<1067>": "REP136: Error running \"%1%\" function in Script Control (%2%).", + "<1068>": "REP137: %1% method for the %2% entity can only be executed in Event Context", + "<1069>": "REP138: %1% method for the %2% entity can only be executed with a running IDE", + "<1070>": "REP139: \"%1%\" is not a valid \"%2%\" parameter for the %3% method", + "<1071>": "REP140: No LOCATION defined for the %1% entity", + "<1072>": "REP141: No AppRow passed to the %1% method for the %2% entity", + "<1073>": "REP142: Unable to resolve the \"%1%\" quick event target for the \"%2%\" %3% event", + "<1074>": "REP143: No parent ID specified for the \"%1%\" %2% method", + "<1075>": "REP144: The SYSPROG application cannot be deleted", + "<1076>": "REP145: \"%1%\" is not a valid application ID", + "<1077>": "REP190: Invalid REPFILTER definition passed to the %1% procedure", + "<1078>": "REP191: Invalid REPVIEW ID passed to the %1% procedure [%2%]", + "<1079>": "REP192: Empty REPVIEW passed to the the %1% procedure", + "<1080>": "REP200: No event found for controlid %1%, controlclass %2%, event %3%.", + "<1081>": "REP201: %1% is not a valid window name, or is not currently running.", + "<1082>": "REP300: Entity %1% does not exist.", + "<1083>": "REP303:", + "<1084>": "REP305: Window Executable %1% was not found in this application.", + "<1085>": "REP310: Compilation error: join information for table \"%1%\" has not been specified for the form.", + "<1086>": "REP311: Compilation error: The column %2% is not found in table %1%.", + "<1087>": "REP312: Compilation error: The join control %1% is not found in the form.", + "<1088>": "REP313: Menu compilation error: nesting error.", + "<1089>": "REP314: Incomplete Key: No control for key part %1%", + "<1090>": "REP315: Compilation error: Commuter Module has not been defined for the form", + "<1091>": "REP333:", + "<1092>": "REP500: Winexec Error #%1%.", + "<1093>": "REP510: The \"Date From\" cannot be after the \"Date To\".", + "<1094>": "REP700: OIEVENT must have a super-control ( entid %1%).", + "<1095>": "REP701: POEVENT need to have entitid same.", + "<1096>": "REP703: Invalid classid as token.", + "<1097>": "REP800: Entity %1% locked by another session and could not be locked.", + "<1098>": "REP801: Entity %1% is already locked by this session.", + "<1099>": "REP802: Entity %1% is checked out by %2% and could not be locked.", + "<1100>": "REP803: Entity %1% is checked out by the current user.", + "<1101>": "REP804: Remote entity %1% locked by another session and could not be locked.", + "<1102>": "REP805: Remote entity %1% is already locked by this session.", + "<1103>": "REP806: Remote entity %1% is checked out by %2% and could not be locked.", + "<1104>": "REP807: Remote entity %1% is checked out by current user.", + "<1105>": "REP900: Error creating mirror file %1%.", + "<1106>": "REP901: Error deleting mirror file %1%.", + "<1107>": "REP902: A repository mirror file exists at location %1%.", + "<1108>": "REP903: A repository mirror is already installed in this system.", + "<1109>": "REP904: A repository mirror is not installed in this system.", + "<1110>": "REP905: Row \"%1%\" shows differences.", + "<1111>": "REP906: The repository is in a state of error. Access is denied until a system administrator remedies the error condition.", + "<1112>": "REP932: There are no records meeting this criteria", + "<1113>": "REP933: The selection criteria is invalid", + "<1114>": "", + "<1115>": "RIX100: Error reading primary node for the \"%1%\" Repository Index ", + "<1116>": "RIX101: Value \"%2%\" missing from the \"%1%\" Repository Index node", + "<1117>": "", + "<1118>": "POP101: Table %1% does not exist.", + "<1119>": "POP102: Field %1% set to null when a value expected.", + "<1120>": "POP103: Invalid key %1% in table %2%.", + "<1121>": "POP104: Mode %1% is incompatible with type %2%.", + "<1122>": "POP105: Type %1% is invalid.", + "<1123>": "POP106: Mode %1% is invalid.", + "<1124>": "POP107: Dictionary does not exist for table %1%.", + "<1125>": "POP108: Non-numeric field name %1% in format argument not allowed with mode F.", + "<1126>": "POP109: Format argument not allowed to be null.", + "<1127>": "POP110: Error inserting the \"%1%\" column.", + "<1128>": "POP111: \"%1%\" is not a valid custom button procedure [%2%]", + "<1129>": "POP112: The \"%1%\" custom button procedure must accept at least one argument", + "<1130>": "POP113: \"%1%\" is not a valid initialization procedure [%2%]", + "<1131>": "POP114: The \"%1%\" initialization procedure must accept at least two arguments", + "<1132>": "", + "<1133>": "DS101: Duplicate column or argument name \"%1%\"", + "<1134>": "DS102: Invalid data type \"%1%\"", + "<1135>": "DS103: Invalid or incomplete column definition for column %1%", + "<1136>": "", + "<1137>": "MSG101: Out of memory, or could not create MSG Dialog Box.", + "<1138>": "MSG102: One or more parameters were invalid, or @fm's found in text.", + "<1139>": "", + "<1140>": "IDX101: Dictionary does not exist for table %1%.", + "<1141>": "IDX102: Table %1% does not exist.", + "<1142>": "", + "<1143>": "X100: MFS list set to null when a list expected.", + "<1144>": "X101: Invalid action code for SET_MFS.", + "<1145>": "X103: Position error for %1%.", + "<1146>": "X104: %1% does not exist in the table.", + "<1147>": "X105: %1% object code does not exist in the SYSOBJ table.", + "<1148>": "X106: %1% already exists on the table.", + "<1149>": "X107: Adding DICT.MFS to a non-dictoinary table is not allowed.", + "<1150>": "X108: Adding PROTECT.MFS to dictoinary table is not allowed.", + "<1151>": "", + "<1152>": "PING101: Error in IP Address %1%", + "<1153>": "PING104: Error - Invalid host [%1%]", + "<1154>": "PING105: Error - Destination host [%1%]", + "<1155>": "PING106: Error creating ICMP file [%1%] ", + "<1156>": "", + "<1157>": "SOCK101: Unable to create socket / detect socket layer [%1%]", + "<1158>": "SOCK102: Unable to resolve host DNS entry [%1%]", + "<1159>": "SOCK103: Couldn't get IP address type of host [%1%]", + "<1160>": "SOCK104: Couldn't create socket ", + "<1161>": "SOCK105: Unable to connect to ipaddress", + "<1162>": "SOCK106: Couldn't create server socket ", + "<1163>": "", + "<1164>": "EV100: Unknown Event Handler error", + "<1165>": "EV101: Required Error", + "<1166>": "EV102: Validation Error", + "<1167>": "EV103: Form Read Error", + "<1168>": "EV104: Form Read Sub Error", + "<1169>": "EV105: Null Key Error", + "<1170>": "EV106: Locking Error", + "<1171>": "EV107: User Cancel", + "<1172>": "EV108: Null procedure name", + "<1173>": "EV109: %1% is not a valid stored procedure name", + "<1174>": "EV110: The %1% stored procedure does not accept parameters", + "<1175>": "EV111: Null Window Name", + "<1176>": "EV112: DSN Create Error [%1%]", + "<1177>": "EV113: TPL (IDE ToolPanel) Create Error [%1%]", + "<1178>": "EV114: DSN (IDE Designer) PROPCHANGED validation error", + "<1179>": "EV115: FDS (IDE FormDes) Parser Error [%1%]", + "<1180>": "EV116: FDS (IDE FormDes) Builder Error [%1%]", + "<1181>": "EV117: DSN (IDE Designer) Write error [%1%]", + "<1182>": "EV118: DSN (IDE Designer) Test-Run error [%1%]", + "<1183>": "EV119: Invalid Property Value [%1%]", + "<1184>": "EV130: QBF Parser Error [%1%]", + "<1185>": "EV131: QBF may only be used with data-bound forms", + "<1186>": "EV132: Query By Form is not active", + "<1187>": "EV133: QBF saved list activation error [%1%]", + "<1188>": "EV134: \"%1%\" is not a valid position in the QBF result list", + "<1189>": "EV135: \"%1%\" is not a valid ID in the QBF result list", + "<1190>": "EV136: Error resetting sequential key counter [%1%]", + "<1191>": "", + "<1192>": "OS101: \"%1%\" is an invalid OS file name.", + "<1193>": "OS102: Access denied by the operating system to the \"%1%\" file.", + "<1194>": "OS103: Error in the OS file \"%1%\". Disk volume full.", + "<1195>": "OS104: The OS file \"%1%\" does not exist.", + "<1196>": "OS106: The OS file \"%1%\" is read-only.", + "<1197>": "OS107: Undefined error during a OS file operation. File: \"%1%\" - Status(): \"%2%\"", + "<1198>": "", + "<1199>": "IDXS001 IDX_SETS error: \"%1%\" [%2%]" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSPROCS%003AREVERROR_DAT.json b/SYSPROG/APPROW/SYSPROCS%003AREVERROR_DAT.json new file mode 100644 index 0000000..ccb99fc --- /dev/null +++ b/SYSPROG/APPROW/SYSPROCS%003AREVERROR_DAT.json @@ -0,0 +1,1210 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "REVERROR.DAT" + }, + "body": { + "record1": { + "<1>": "//", + "<2>": "// Amended Date Reason", + "<3>": "// ======= ==== ======", + "<4>": "// Mr C 21 Jan 23 Added SSP289", + "<5>": "// Mr C 01 Feb 21 Added EV136", + "<6>": "// Mr C 05 Jan 21 Added EV131, EV132", + "<7>": "// Mr C 19 Dec 20 Added EV130", + "<8>": "// Mr C 15 Oct 19 Corrected SSP314 grammar", + "<9>": "// rjc 07 Jun 19 Added Arev B errors", + "<10>": "// Mr C 13 Nov 18 Added SYS1250 series.", + "<11>": "// Mr C 20 Mar 18 Added SYS1005, SYS1011, SYS1012", + "<12>": "// Mr C 27 Jan 16 Added comment section and re-added to system (APPROW", + "<13>": "// was renamed)", + "<14>": "", + "<15>": "ENG0010: %1%, line %2%. Variable has not been assigned a value.", + "<16>": "ENG0012: %1%, line %2%. Table has not been opened.", + "<17>": "ENG0015: %2%, line %3%. Illegal opcode: %1%", + "<18>": "ENG0016: %1%, line %2%. Non-numeric data when numeric required. Zero used.", + "<19>": "ENG0017: %1%, line %2%. Subscript value out of range.", + "<20>": "ENG0019: %1%, line %2%. Illegal pattern.", + "<21>": "ENG0022: %2%, line %3%. Branch index of %1% is illegal.", + "<22>": "ENG0023: %2%, line %3%. Branch index of %1% exceeds number of statement-labels.", + "<23>": "ENG0024: %1%, line %2%. Divide by zero; Result Zero!", + "<24>": "ENG0027: %1%, line %2%. RETURN executed with no GOSUB.", + "<25>": "ENG0028: %1%, line %2%. Not enough string space - Out of Memory.", + "<26>": "ENG0031: %1%, line %2%. Stack overflow.", + "<27>": "ENG0040: %1%, line %2%. The labeled common variable has been freed and is no longer valid.", + "<28>": "ENG0050: %1%, line %2%. Function with argument value <= 0 undefined; Zero returned.", + "<29>": "ENG0051: %1%, line %2%. Negative number raised to non-integer value. Zero used!", + "<30>": "ENG0055: %1%, line %2%. MATREAD or MATWRITE operation must be to or from a vector.", + "<31>": "ENG0700: %1%, line %2%. Non-dimensioned variable used as an array.", + "<32>": "ENG0701: %1%, line %2%. Double-dimension array used with only one subscript.", + "<33>": "ENG0702: %1%, line %2%. Single-dimension array used with two subscripts.", + "<34>": "ENG0703: %1%, line %2%. Variable exceeds maximum length.", + "<35>": "ENG0704: %1%, line %2%. Attempt to access an array without a subscript. Zero used.", + "<36>": "ENG0705: %1%, line %2%. Array not dimensioned.", + "<37>": "ENG0706: %1%, line %2%. String space format error.", + "<38>": "ENG0707: %1%, line %2%. Format output exceeds 64K.", + "<39>": "ENG0708: %1%, line %2%. Subroutine contains invalid header. CALL aborted.", + "<40>": "ENG0709: %1%, line %2%. Remainder by Zero illegal. Zero used.", + "<41>": "ENG0710: %1%, line %2%. Extra parameters ignored.", + "<42>": "ENG0711: %2%, line %3%. Too many parameters passed to procedure %1%.", + "<43>": "ENG0712: %1%, line %2%. Attempt to pass more than 127 parameters.", + "<44>": "ENG0713: %1%, line %2%. Step value of Zero illegal in FOR-NEXT loop. Loop terminated.", + "<45>": "ENG0714: %1%, line %2%. String exceeds maximum length. Null used.", + "<46>": "ENG0715: %1%, line %2%. DOS file size exceeds 65532 bytes.", + "<47>": "ENG0716: %1%, line %2%. Zero and non-zero subscript not allowed. Element zero used.", + "<48>": "ENG0717: %1%, line %2%. Program-list format error.", + "<49>": "ENG0718: %1%, line %2%. Frame format error.", + "<50>": "ENG0719: %1%, line %2%. String space format error.", + "<51>": "ENG0720: %1%, line %2%. Attempt to use common variable when common has not been defined.", + "<52>": "ENG0721: %1%, line %2%. Attempt to use a common variable not defined in original common.", + "<53>": "ENG0722: %1%, line %2%. Labeled common has not been defined.", + "<54>": "ENG0723: %1%, line %2%. Invalid opcode CALL to an RTP.", + "<55>": "ENG0724: %1%, line %2%. Disk read error loading SYSTEM object.", + "<56>": "ENG0725: %1%, line %2%. SYSTEM object table missing.", + "<57>": "ENG0726: %1%, line %2%. Invalid name for DOS table.", + "<58>": "ENG0727: %2%, line %3%. %1% is access protected and cannot be written.", + "<59>": "ENG0728: %2%, line %3%. Media full writing %1%.", + "<60>": "ENG0755: %1%, line %2%. 8087 not empty at line mark.", + "<61>": "ENG0760: %1%, line %2%. Labeled common spt string format error.", + "<62>": "ENG0761: %1%, line %2%. Labeled common name string format error.", + "<63>": "ENG0762: %1%, line %2%. Labeled common created smaller than declaration.", + "<64>": "ENG0772: %1%, line %2%. Tangent of 90 degrees is undefined.", + "<65>": "ENG0800: %2%, line %3%. %1%", + "<66>": "ENG0801: %1%, line %2%. Unknown descriptor type; using null string.", + "<67>": "ENG0802: %1%, line %2%. External C program has executed an abort.", + "<68>": "ENG0803: %2%, line %3%. %1% has not been implemented.", + "<69>": "ENG0804: %2%, line %3%. Unable to load dynamic link library %1%.", + "<70>": "ENG0805: %3%, line %4%. Function %2% does not exist in dynamic link library %1%.", + "<71>": "ENG0806: %2%, line %3%. Invalid object code type: %1%.", + "<72>": "ENG0807: %1%, line %2%. Main program has been called with arguments.", + "<73>": "ENG0808: %3%, line %4%. Error [%1%] writing to table %2% during flush operation.", + "<74>": "ENG0809: %3%, line %4%. Error [%1%] opening table %2% during flush operation.", + "<75>": "ENG0810: %2%, line %3%. Null buffer: table %1% will not be flushed.", + "<76>": "ENG0811: %1%, line %2%. Invalid pointer passed to GetValue.", + "<77>": "ENG0812: %1%, line %2%. Invalid pointer passed to SetReturnValue.", + "<78>": "ENG0813: %1% line %2%. Invalid binary flag argument", + "<79>": "", + "<80>": "FS10: Domain validation error. The record \"%1%\" contains illegal characters - or - the data does not pass validation patterns specified in the dictionary.", + "<81>": "FS11: Error attempting to convert or validate data in the \"%1%\" column. Check dictionary conversion and validation patterns.", + "<82>": "FS12: The record does not pass reduction criteria.", + "<83>": "FS13: Unable to lock this table or record. This lock is being held by another station.", + "<84>": "FS14: The operating system has denied access to this table or record. A table or record lock is being held by another station.", + "<85>": "FS15: Domain Error: Attempt to write NULL value into column \"%1%\".", + "<86>": "FS16: Domain Error: Attempt to write too many characters into column \"%1%\" (maximum: %2%).", + "<87>": "FS17: Domain Error: Value for column \"%1%\" does not conform to domain rule: %2%.", + "<88>": "FS18: Domain Error: Error converting value for column \"%1%\", by format: %2%.", + "<89>": "FS30: Number of fields in record is greater than the number of table columns.", + "<90>": "FS50: Error while updating or deleting the dictionary record \"%1%\". The table structure cannot be modified while the data table contains data.", + "<91>": "FS51: Dictionary domain error. The dictionary record \"%1%\" does not conform to the foreign table attribute specifications defined for this table type.", + "<92>": "FS52: The name \"%2%\" is an invalid foreign table name for the \"%1%\" table.", + "<93>": "FS53: You have attempted to define too many master fields. The maximum allowable is %1%, but you have attempted to define %2%.", + "<94>": "FS54: The fields have not been defined in field position order. The following field position(s) are missing: %1%", + "<95>": "FS55: No master fields have been defined -- unable to create the table.", + "<96>": "FS56: The data table cannot be created unless the dictionary exists.", + "<97>": "FS57: The dictionary record \"%1%\" has a foreign field name \"%2%\" that has already been used in another dictionary record.", + "<98>": "FS100: Record \"%1%\" does not exist.", + "<99>": "FS101: Write error. The operating system table \"%1%\" does not exist.", + "<100>": "FS102: Error while writing data. \"%1%\" is a read-only table.", + "<101>": "FS103: Error in the operating system table \"%1%\". Disk volume full.", + "<102>": "FS104: General write error in the operating system table \"%1%\".", + "<103>": "FS105: Read error in the operating system table \"%1%\". The table does not exist or the tablename is not valid for the operating system.", + "<104>": "FS106: Access denied by the operating system to the \"%1%\" table.", + "<105>": "FS107: Read error. OS Table = \"%1%\".", + "<106>": "FS109: Open or Create Media error. The name \"%1%\" is an invalid volume directory label.", + "<107>": "FS110: Open table error. The handle \"%1%\" is invalid for a volume directory.", + "<108>": "FS111: No more records available.", + "<109>": "FS112: The %1% filing system cannot be installed.", + "<110>": "FS113: The filing system RTP59 cannot be installed. (RTP57 must be installed beforehand.)", + "<111>": "FS114: The filing system RTP50 cannot be installed. The entry \"MEMORY.RESIDENT\" cannot be made in the \"SYSVOLUMES\" table.", + "<112>": "FS115: The filing system RTP50 cannot be installed. No entry can be made in the \"SYSVOLUMES\" table.", + "<113>": "FS116: The filing system RTP50 cannot be installed. No entry can be made in the \"SYSTABLES\" table.", + "<114>": "FS124: Group Format Error: OS File : %1% Group # : %2% Reading the next frame in the current group has failed.", + "<115>": "FS125: Group Format Error! OS File : %1% Group # : %2% A record has been truncated across frame boundaries.", + "<116>": "FS126: Group Format Error: OS File : %1% Group # : %2% Wrong Overflow frame linked to group.", + "<117>": "FS127: Group Format Error: OS File : %1% Group # : %2% Record length incorrect or frame linkage error.", + "<118>": "FS128: Linear Hash Error: OS File : %1% Group # : %2% LNP incorrect - modulo corrupted in group 0 header.", + "<119>": "FS129: Linear Hash Error OS File: %1% Group #: %2% Group Calculation Error.", + "<120>": "FS130: The BFS code %1% has not been implemented in the BFS \"%2%\".", + "<121>": "FS133: Undefined error during a read/write/delete operation. OS File : %1% Status(): %2%", + "<122>": "FS135: Generic %1% Server Error||Error code: %2%||%3%|", + "<123>": "FS140: Unable to create the \"%1%\" table. There are too many fields defined.", + "<124>": "FS141: Unable to create the \"%1%\" table. Position number %2% in the dictionary is missing.", + "<125>": "FS142: The record \"%2%\" cannot be saved in the \"%1%\" table because it contains invalid data.", + "<126>": "FS143: Unable to create the \"%1%\" table. The dictionary is missing.", + "<127>": "FS144: Record \"%2%\" is missing from the \"%1%\" table.", + "<128>": "FS145: The \"%1%\" table does not exist.", + "<129>": "FS146: The \"%1%\" table already exists.", + "<130>": "FS147: Unable to create the table. The specified table attributes are not valid.", + "<131>": "FS148: The record key \"%2%\" is invalid for the \"%1%\" table.", + "<132>": "FS149: The \"%1%\" table is protected and cannot be deleted.", + "<133>": "FS150: The \"%1%\" table is too long. (Tables must be less than 65,530 characters.)", + "<134>": "FS151: ROS table error. The record \"%1%\" has made a frame longer than 65,650 characters. The frame cannot be saved.", + "<135>": "FS152: The control record \"%RECORDS%\" is too long to be saved. The current record length is %1% characters.", + "<136>": "FS160: Insufficient memory. %1% characters are required, but only %2% characters are available", + "<137>": "FS161: Too many locks have been attempted. The lock table for the Linear Hash table type has overflowed.", + "<138>": "FS162: Because of licensing restrictions, records cannot be written to the \"%1%\" table", + "<139>": "FS171: Warning! Incorrect version of DOS -- use DOS 3.1 or higher. You will not be able to lock tables or records. Use only local tables or reboot using a correct version of DOS.", + "<140>": "FS172: Warning! The locktable \"REVBOOT\" is not available. You will not be able to lock tables or records. Correct the condition or use only local tables.", + "<141>": "FS173: Warning! The station identifier cannot be found. You will not be able to lock tables or records. Use only local tables or log out and correct the condition.", + "<142>": "FS174: Warning! No network drive can be found. Either the drive is local or no network drive is configured. You will not be able to lock tables or records. Use only local tables or log out and correct the condition.", + "<143>": "FS175: Warning! The network shell is not loaded. Interrupt 60 (Hex) has not been initialized. You will not be able to lock tables or records. Use only local tables or log out and establish a network connection.", + "<144>": "FS176: Warning! NetWare is not responding. The server is inactive or your workstation shell has not been loaded. You will not be able to lock tables or records. Use only local tables or log out and check your network connection.", + "<145>": "FS185: Warning! The current network driver is for non-networking purposes only and will not function properly on a network. Data corruption may result! Log out and correct the condition.", + "<146>": "FS186: Warning! The locktable \"REVBOOT\" is not available. You will not be able to lock tables or records. Data corruption may result! Log out and correct the situation.", + "<147>": "FS187: Warning! The station/process ID cannot be found. You will not be able to lock tables or records. Data corruption may result! Log out and correct the situation.", + "<148>": "FS188: Warning! SHARE.EXE has not been loaded. You will not be able to lock tables or records. Data corruption may result! Log out and correct the situation", + "<149>": "FS189: Warning! The current network driver does not support local locking. Data corruption may result if you run more than one OpenInsight from this workstation at the same time.", + "<150>": "FS190: Warning! The Banyan VINES Service Interrupt was not found. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<151>": "FS191: Warning! The BANCOM TSR was not found. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<152>": "FS192: Warning! The user's VINES StreetTalk name was not found. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<153>": "FS193: Warning! An error was encountered while opening the VINES Communications Socket. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<154>": "FS194: Warning! An error was encountered while initializing the network driver. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<155>": "FS195: Warning! No lock services were connected. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<156>": "FS196: Warning! An error was encountered while connecting the lock service for drive %1%. You will not be able to lock tables or records. Do not attempt multiuser operation.", + "<157>": "FS200: The \"%1%\" table is not available.", + "<158>": "FS201: The record \"%1%\" in the \"%2%\" table is not available.", + "<159>": "FS202: No error code was returned in @FILE.ERROR. %1% %2%", + "<160>": "FS210: The index table for \"%1%\" is not available.", + "<161>": "FS211: The index for the \"%2%\" field in the \"%1%\" table is corrupted. Please rebuild the index before retrying.", + "<162>": "FS212: Error while compiling the index transaction module for the \"%1%\" table.", + "<163>": "FS213: The index node \"%2%\" cannot be found in the index table \"%1%\".", + "<164>": "FS214: Index control information for the \"%1%\" table has been corrupted. Relational indexes should be rebuilt.", + "<165>": "FS215: The Quickdex or Rightdex index has been corrupted. You can rebuild the index by executing a \"LIST\" or \"SELECT\" command.", + "<166>": "FS216: Tables of this table type cannot be attached while a transaction is pending.", + "<167>": "FS217: Tables of this table type cannot be detached while a transaction is pending.", + "<168>": "FS231: Warning! Network Service Configuration Error.", + "<169>": "FS250: There is not enough memory to call the BASIC+ preprocessor/compiler. %1% bytes of memory are required but only %2% are available.", + "<170>": "FS251: Error in generating the Protection module.", + "<171>": "FS252: Error compiling Protection module.", + "<172>": "FS253: An error was encountered during the CALCULATEX process.", + "<173>": "FS254: Error locating a table in the \"SYSTABLES\" table. Table handle: \"%1%\".", + "<174>": "FS255: An error has occurred while attempting to create the \"%1%\" table. The table has not been created.", + "<175>": "FS256: A table cannot be renamed if it has been changed during the current transaction.", + "<176>": "FS257: An error has occurred while attempting to create the transaction log table \"%1%\". The table has not been created.", + "<177>": "FS258: Can not rename/tablecopy only data or dictionary part of the indexed table \"%1%\". Please remove keyword \"DATA\" or \"DICT\" in the command for completely renaming indexed tables.", + "<178>": "FS259: The \"%1%\" table has relational indexes on it and the related table \"%2%\" is not available or attached for updating control information.", + "<179>": "FS260: Too many locks. The lock limit of %1% has been exceeded.", + "<180>": "FS261: The lock tables are out of synchronization. Table name: \"%1%\" Record key: \"%2%\"", + "<181>": "FS262: The lock waiting period has expired. (%1% seconds).", + "<182>": "FS263: The lock wait has been canceled. Table name: \"%1%\" Record key: \"%2%\"", + "<183>": "FS264: General deadlock error on \"%1%\".", + "<184>": "FS265: The current transaction has been cancelled due to a deadlock. The transaction has been rolled back.", + "<185>": "FS266: Cross account relational index is not allowed. The \"%1%\" table has relational indexes on it and renaming/tablecopying table to a different account \"%2%\" violates this rule. Please remove the relational index and try again.", + "<186>": "FS267: The \"%1%\" table has relational/dependency indexes on it. Please specify \"D\" option to delete the source table after copying or take off relational/dependency indexes on the source table \"%1%\" and try again.", + "<187>": "FS270: The \"%1%\" column does not exist.", + "<188>": "FS271: The \"%1%\" column is not indexed.", + "<189>": "FS272: \"%2%\" is not a valid tablename in the \"%1%\" environment.", + "<190>": "FS273: \"%2%\" is not a valid field name in the \"%1%\" environment.", + "<191>": "FS274: The OpenInsight dictionary for the \"%1%\" table does not match the structure of the bonded table \"%2%\".", + "<192>": "FS275: The record \"%2%\" cannot be saved because it is write/delete-protected in the \"%1%\" table.", + "<193>": "FS276: The MFS list has been corrupted. MFS code: %1% MFS list: \"%2%\" The MFS list is missing the underlying BFS name for executing the next call.", + "<194>": "FS277: The code %1% is not a valid direction code for Readnext. Direction codes should be less than or equal to 3.", + "<195>": "FS278: An invalid READNEXT pointer was encountered.", + "<196>": "FS279: The record \"%1%\" cannot be deleted because it is delete-protected in the \"%2%\" table.", + "<197>": "FS280: The \"C\" subroutine data segment cannot be found in the \"%1%\" table, record \"%2%\".", + "<198>": "FS281: An undefined \"C\" error has occurred. Possible causes include insufficient memory, disk space, or operating system table handles.", + "<199>": "FS290: You cannot write or delete records because Quick/Rightdex for this table does not use the \"%2%\" language set specified in the current environment. Either: Reload the \"%1%\" language set - or - Re-install the Quick/Rightdex.", + "<200>": "FS291: List over 64k bytes in BTREE.SUB operations or RELATER routines.", + "<201>": "FS292: Invalid BFS type %1%.", + "<202>": "FS293: Cannot compile %1% in current product.", + "<203>": "FS294: The error detail is approaching 64k bytes. The process has been aborted.", + "<204>": "FS300: The \"%1%\" table is not available.", + "<205>": "FS301: \"%1%\" is not a valid data type.", + "<206>": "FS302: A comma is missing in the type specification \"%1%\".", + "<207>": "FS303: Argument %2% for \"%1%\" is missing a quotation mark.", + "<208>": "FS304: The \"%1%\" bond cannot use the data type \"%2%\".", + "<209>": "FS305: The \"%1%\" bond does not require or use foreign field attributes.", + "<210>": "FS306: The \"%1%\" bond does not require or use table attributes.", + "<211>": "FS307: Invalid arguments were passed to BOND.SUBS.", + "<212>": "FS308: Argument %2% (\"%3%\") for the data type \"%1%\" is missing or invalid.", + "<213>": "FS309: The \"%1%\" table type requires data types for its dictionary fields.", + "<214>": "FS310: The %1% bond does not support or require foreign table attributes.", + "<215>": "FS311: The bond '%1%' was incorrectly called to dynamically derive a data type from data type '%2%'. Report this error to the vendor you purchased this bond from.", + "<216>": "FS312: The '%1%' bond was incorrectly called to dynamically select a type mapping for the data type '%2%'. Report this error to the bond developer.", + "<217>": "FS313: Data type '%1%' is defined to be a synonym for '%2%', but '%2%' is not a defined data type.", + "<218>": "FS314: Data type '%1%' is derived from data type '%2%', but '%2%' is not a defined data type.", + "<219>": "FS315: The user-specified mapping '%1%' is not a valid type mapping.", + "<220>": "FS316: The precision (the first argument) of data type DECIMAL must be greater than or equal to the scale (the second argument) of data type DECIMAL.", + "<221>": "FS330: The Sql Server returned the following errors: %1%", + "<222>": "FS350: Cannot read volume information from media record.", + "<223>": "FS351: Invalid/missing volume information.", + "<224>": "FS352: Volume %1% already exists.", + "<225>": "FS353: Missing/invalid media handle.", + "<226>": "FS354: Cache failure.", + "<227>": "FS355: Insufficient permissions for the requested action.", + "<228>": "FS360: The Encryption Server returned the following errors: %1%", + "<229>": "FS361: Encryption parameters not specified for table %1%.", + "<230>": "FS362: Invalid/missing passphrase information for volume.", + "<231>": "FS363: Encryption group parameter not specified for table.", + "<232>": "FS364: Encryption check value failure: %1%.", + "<233>": "FS365: Unable to encrypt table %1%: %2%.", + "<234>": "FS400: Invalid table handle.", + "<235>": "FS401: The \"%1%\" table has not been created or attached.", + "<236>": "FS402: The list cannot be found in the \"SYSLISTS\" table.", + "<237>": "FS403: There is a mismatch between the \"SYSVOLUMES\" and \"SYSTABLES\" tables during the \"%1%\" function.", + "<238>": "FS404: The \"%1%\" volume has the same label (\"%3%\") as the \"%2%\" volume and cannot be attached.", + "<239>": "FS405: The volume \"%1%\" cannot be attached.", + "<240>": "FS410: An invalid lock type was specified.", + "<241>": "FS411: The table is not locked.", + "<242>": "FS412: The record is not locked.", + "<243>": "FS413: Semaphore is not locked.", + "<244>": "FS414: Lock is held by this station.", + "<245>": "FS415: This lock is currently held by another station.", + "<246>": "FS420: %1% is an invalid Readnext direction.", + "<247>": "FS421: The operation has been cancelled.", + "<248>": "FS430: Error matching dictionary handles during a select operation.", + "<249>": "FS431: No more cursors are available.", + "<250>": "FS432: Invalid value for LIST.ACTIVE.", + "<251>": "FS434: The field type \"%1%\" is invalid in a sort list.", + "<252>": "FS435: The designated cursor cannot be cleared.", + "<253>": "FS436: Invalid cursor value.", + "<254>": "FS437: The sort expression contains the invalid field name \"%1%\".", + "<255>": "FS438: Error during SELECT. Multiple handles instead of IOPROC.", + "<256>": "FS439: Error in the Column Qualifier.", + "<257>": "FS440: Error merging a sort table.", + "<258>": "FS441: Error while extracting a sort table.", + "<259>": "FS442: Error while initializing the sort table '%1%'.", + "<260>": "FS443: Error writing to the sort table.", + "<261>": "FS444: Logical Error The key list has overflowed while sorting.", + "<262>": "FS450: Warning! Linear Hash Client/Server communication protocal not installed. Linear Hash Client/Server software will not be used. Use only local files or log out and check your workstation configuration.", + "<263>": "FS451: Warning! Unable to open a Linear Hash Client/Server communication protocal connection. Linear Hash Client/Server software will not be used. Use only local files or log out and check your workstation configuration.", + "<264>": "FS452: Warning! Unable to locate an initial Linear Hash Server. Linear Hash Client/Server software will not be used. Use only local files or log out and check your workstation configuration.", + "<265>": "FS453: Warning! The Linear Hash Client/Server TSR is not installed. Linear Hash Client/Server software will not be used. Use only local files or log out and check your workstation configuration.", + "<266>": "FS454: Warning! Error allocating local resources for Linear Hash Client/Server access. Linear Hash Client/Server software will not be used. Use only local files or log out and check your workstation configuration.", + "<267>": "FS455: Linear Hash Client/Server. Get Canocical Path Error. File name \"%1%\". Error number \"%2%\".", + "<268>": "FS456: Linear Hash Client/Server. Local File Error. File name \"%1%\".", + "<269>": "FS457: Linear Hash Client/Server. File Name Format Error. File name \"%1%\".", + "<270>": "FS458: Linear Hash Client/Server. Client Allocation Error. Unable to allocate needed client resources for Linear Hash Server access.", + "<271>": "FS459: Linear Hash Client/Server. Invalid Client File Handle.", + "<272>": "FS460: Linear Hash Client/Server. Invalid Client Server Handle.", + "<273>": "FS461: Linear Hash Client/Server. Get Local Target Error.", + "<274>": "FS462: Linear Hash Client/Server. No Linear Hash Server.", + "<275>": "FS463: Linear Hash Client/Server. TSR Server Table Full. Restart the Linear Hash Client/Server TSR with a larger server table size parameter setting.", + "<276>": "FS464: Linear Hash Client/Server. Send Packet Error.", + "<277>": "FS465: Linear Hash Client/Server. Receive Packet Error.", + "<278>": "FS466: Linear Hash Client/Server. No Server Response.", + "<279>": "FS467: Linear Hash Client/Server. Client Server Table Full.", + "<280>": "FS468: Linear Hash Client/Server. Client File Table Full.", + "<281>": "FS469: Linear Hash Client/Server. Duplicate Server Serial Number.", + "<282>": "FS470: Linear Hash Client/Server. Server Allocation Error. Unable to allocate needed server resources for Linear Hash Server access.", + "<283>": "FS471: Linear Hash Client/Server. Packet Size Error.", + "<284>": "FS472: Linear Hash Client/Server. Server Set Connection Error.", + "<285>": "FS473: Linear Hash Client/Server. Server Set Task Error.", + "<286>": "FS474: Linear Hash Client/Server. Next Packet Error.", + "<287>": "FS477: Linear Hash Client/Server. Unable to open the Linear Hash file because Server Only Access Mode has been specified in the REVPARAM file.", + "<288>": "FS478: Linear Hash Client/Server. Using invalid Revelation file variable.", + "<289>": "FS479: Linear Hash Client/Server. Client Open File Table Full.", + "<290>": "FS480: Linear Hash Client/Server. Client Not Initialized.", + "<291>": "FS481: Linear Hash Client/Server. Server File Open Error. File name \"%1%\".", + "<292>": "FS482: Linear Hash Client/Server. Temporary Server Allocation Error.", + "<293>": "FS483: Linear Hash Client/Server. Server File Close Error. File name \"%1%\".", + "<294>": "FS484: Linear Hash Client/Server. Version 1 Linear Hash File Format. File name \"%1%\".", + "<295>": "FS485: Linear Hash Client/Server. Invalid Server File Handle.", + "<296>": "FS486: Linear Hash Client/Server. Invalid Server File Variable.", + "<297>": "FS487: Linear Hash Client/Server. Server Connection Syncronization Error.", + "<298>": "FS488: Linear Hash Client/Server. Server Task Syncronization Error.", + "<299>": "FS489: Linear Hash Client/Server. Server Lock Allocation Error.", + "<300>": "FS490: Linear Hash Client/Server. Server File Handle Table Full. Restart the Linear Hash Server software with a larger File Handle Table size.", + "<301>": "FS491: Linear Hash Client/Server. Server File Variable Table Full. Restart the Linear Hash Server software with a larger File Variable Table size.", + "<302>": "FS492: Linear Hash Client/Server. Linear Hash Version Syncronization Error.", + "<303>": "FS493: Group Format Error! OS File : %1% Group # : %2% The group contains an invalid frame type value.", + "<304>": "FS494: Group Format Error! OS File : %1% Group # : %2% An invalid frame type value was about to be written.", + "<305>": "FS495: Group Format Error! OS File : %1% Group # : %2% The group contains a record which does not belong.", + "<306>": "FS496: Linear Hash Client/Server. Record size exceeds 65532.", + "<307>": "FS497: Linear Hash Client/Server. Id group size exceeds 65532.", + "<308>": "FS499: Extended error: %1%", + "<309>": "FS1000: File name length exceeds maximum path length.", + "<310>": "FS1001: The total length of all key ids in the group exceeds the maximum variable length.", + "<311>": "FS1002: The record length exceeds the maximum variable length.", + "<312>": "FS1003: Group Format Error: OS File : %1% Group # : %2% Invalid frame header during read.", + "<313>": "FS1004: Group Format Error: OS File : %1% Group # : %2% Invalid frame header during write.", + "<314>": "FS1005: File name length exceeds maximum path length.", + "<315>": "FS1006: Unable to determine the complete UNC path of the file name.", + "<316>": "FS1007: Internal initialization error.", + "<317>": "FS1008: File creation error.", + "<318>": "FS1009: File open error.", + "<319>": "FS1010: Lock error.", + "<320>": "FS1011: Shared lock error.", + "<321>": "FS1012: Group lock error.", + "<322>": "FS1013: Group lock timeout error.", + "<323>": "FS1014: Unable to allocate temporary buffer.", + "<324>": "FS1015: Unable to allocate internal buffer.", + "<325>": "FS1016: Record Key too long.", + "<326>": "FS1017: Unable to allocate lock buffer.", + "<327>": "FS1018: Version syncronization error.", + "<328>": "FS1019: Server only access specified in REVPARAM file.", + "<329>": "FS1020: Unable to open REVLOCKS file at workstation.", + "<330>": "FS1021: Maximum number of volume users exceeded.", + "<331>": "FS1022: Maximum number of OpenInsight users exceeded.", + "<332>": "FS1023: Test lock timeout error.", + "<333>": "FS1024: Volume user lock error.", + "<334>": "FS1025: OpenInsight user lock error.", + "<335>": "FS1026: Cache flush locked by other.", + "<336>": "FS1027: Cache flush lock error.", + "<337>": "FS1028: Claim mutual exclusion semaphore error.", + "<338>": "FS1029: Out of file handles error.", + "<339>": "FS1030: Unable to open REVLOCKS file at server.", + "<340>": "FS1100: Resource not initialized error.", + "<341>": "FS1101: Resource already initialized error.", + "<342>": "FS1102: Resource in use error.", + "<343>": "FS1103: Error number %2% returned during RCL initialize.", + "<344>": "FS1104: Error number %2% returned during RCL connect.", + "<345>": "FS1105: Error number %2% returned during RCL request reply.", + "<346>": "FS1106: Error number %2% returned during RCL disconnect.", + "<347>": "FS1107: Error number %2% returned during RCL get statistics.", + "<348>": "FS1108: Remote path error.", + "<349>": "FS1109: Duplicate server serial number.", + "<350>": "", + "<351>": "RDK100: SYSLISTS table not attached.", + "<352>": "RDK101: APPID argument required.", + "<353>": "RDK102: Specified application (APPID) does not exist.", + "<354>": "RDK103: Specified entity does not exist.", + "<355>": "RDK104: SYSREPOSVIEWS table not attached.", + "<356>": "RDK105: View exists, collision.", + "<357>": "RDK106: Logical error in add.", + "<358>": "RDK107: Logical error in remove.", + "<359>": "RDK108: View definition does not exist.", + "<360>": "RDK110: Target directory not specified.", + "<361>": "RDK111: RDK deploy spec record missing from SYSENV table.", + "<362>": "RDK112: Error copying table %1% to target directory %2%.", + "<363>": "RDK113: Error creating table %1% on target directory %2%.", + "<364>": "RDK114: Error copying record %2% into table %1%.", + "<365>": "RDK115: User canceled extraction process.", + "<366>": "RDK116: List exceeds maximum length.", + "<367>": "RDK117: Error deleting file \"%1%\".", + "<368>": "RDK118: Could not retain path \"%1%\" for table \"%2%\".", + "<369>": "RDK119: Default data volume is necessary for extraction.", + "<370>": "RDK120: Cannot create non-relative directory %1%.", + "<371>": "RDK121: Error creating relative directory %1%.", + "<372>": "RDK122: Extraction directory %1% is invalid", + "<373>": "RDK123: The Extraction directory \"%1%\" contains a Repository.", + "<374>": "RDK124: The Extraction directory \"%1%\" contains OpenInsight files.", + "<375>": "RDK126: Error writing installation definition record.", + "<376>": "RDK127:\t Error creating user record.", + "<377>": "RDK125:\t Operating system error. Cannot validate extraction directory", + "<378>": "", + "<379>": "RWD100: Cannot copy an image file to the specified location.", + "<380>": "", + "<381>": "SSP100: A null table name is not allowed.", + "<382>": "SSP101: Database record missing %1% database name", + "<383>": "SSP102: Parameter contains system delimiters ( i.e. @FM, @VM, ... )", + "<384>": "SSP103: User has terminated the request.", + "<385>": "SSP110: User must have administrative privileges for this operation.", + "<386>": "SSP111: Error %1% while sending data.", + "<387>": "SSP112: The system identifier %1% is invalid.", + "<388>": "SSP113: Invalid dictionary data type specified.", + "<389>": "SSP114: The system administrative privileges can not be modified for the author of the application.", + "<390>": "SSP115: User must have system administrative privileges for this operation.", + "<391>": "SSP116: Lower level user is not allowed to create/update attribute(s) of higher level user.", + "<392>": "", + "<393>": "SSP200: The \"%1%\" system table cannot be deleted.", + "<394>": "SSP205: The \"%1%\" system table cannot be cleared.", + "<395>": "SSP210: The drive specifier \"%1%\" is invalid for the table copy process.", + "<396>": "SSP211: Not enough disk space is available to copy the table.", + "<397>": "SSP212: Copying between two different filing systems (\"%1%\" and \"%2%\") is not allowed.", + "<398>": "SSP213: The table \"%1%\" cannot be copied to itself.", + "<399>": "SSP214: The table \"%1%\" already exists; the copy was not performed.", + "<400>": "SSP215: The table \"%1%\" does not exists; the copy was not performed.", + "<401>": "SSP216: The copy process failed.", + "<402>": "SSP217: Name mismatch error.", + "<403>": "SSP220: The \"%1%\" system table cannot be renamed.", + "<404>": "SSP221: \"%1%\" is an aliased table name and cannot be renamed.", + "<405>": "SSP225: The table and volume parameters are inconsistent with each other.", + "<406>": "SSP226: A group format error has been detected in volume \"%1%\".", + "<407>": "SSP230: Required server name not passed.", + "<408>": "SSP231: Required bond database name not passed.", + "<409>": "SSP232: Required bond user name not passed.", + "<410>": "SSP233: Server name passed is not valid.", + "<411>": "SSP234: Bond Database name passed is not valid.", + "<412>": "SSP235: Bond User name passed is not valid.", + "<413>": "SSP236: Bond Password passed is not valid.", + "<414>": "SSP237: \"%1%\" is an invalid table type.", + "<415>": "SSP238: Table type \"%1%\" is not a server based filng system.", + "<416>": "SSP245: Aliasing is not allowed for the \"%1%\" filing system.", + "<417>": "SSP246: The \"%1%\" system table cannot be aliased.", + "<418>": "SSP247: Name \"%1%\" and \"%2%\" mismatching error.", + "<419>": "SSP248: Table record \"%1%\" is missing in revmedia.", + "<420>": "SSP271: The header of the table %1% is corrupted. FIX_LH cannot continue.", + "<421>": "SSP272: Fix type \"%1%\" is invalid.", + "<422>": "SSP273: Another station is currently fixing table and have semaphore %1% locked. Please wait until the other station is finished.", + "<423>": "SSP280: Table \"%1%\" not found at \"%2%\", filing system \"%3%\".", + "<424>": "SSP281: Invalid table name \"%1%\".", + "<425>": "SSP282: Table \"%1%\" does not have control features on.", + "<426>": "SSP283: Table \"%1%\" already has control features on.", + "<427>": "SSP284: Unable to add control features to \"%1%\" table.", + "<428>": "SSP285: \"%1%\" is already a master definition for this column position", + "<429>": "SSP286: \"%1%\" must be a master column definition", + "<430>": "SSP287: Table is not used in application \"%1%\"", + "<431>": "SSP288: Inherited Application \"%1%\" does not exist", + "<432>": "SSP289: Table \"%1%\" is open in the IDE", + "<433>": "", + "<434>": "SSP301: \"%1%\" is an invalid environment attribute value.", + "<435>": "SSP310: The database identifier \"%1%\" is not valid; it must be 8 characters or less.", + "<436>": "SSP311: The %1% database template already exists.", + "<437>": "SSP312: Error writing the environment record %1%.", + "<438>": "SSP313: The database template exceeds 64K.", + "<439>": "SSP314: The database template was not found.", + "<440>": "SSP320: User id \"%1%\" contains invalid character(s).", + "<441>": "SSO321: Error writing the user record.", + "<442>": "SSP322: Password must be between 6 and 20 characters.", + "<443>": "SSP323: The user id is already registered - no overwrite specified.", + "<444>": "SSP324: The user id was not found in the user record.", + "<445>": "SSP325: The user id cannot be deleted or modified.", + "<446>": "SSP326: User level %1% is not valid; User level should be from 0 to 2.", + "<447>": "SSP327: The current user does not have access priveleges to this app.", + "<448>": "SSP330: \"%1%\" is an invalid dictionary parameter.", + "<449>": "SSP331: Error writing symbolic column.", + "<450>": "SSP332: Open media failed on the following volume(s): %1%. Please redefine database after you login.", + "<451>": "SSP333: Invalid sort path specified: %1%. Please redefine it.", + "<452>": "SSP340: Dos file name and Dos File Extenstion TRUNCATED", + "<453>": "SSP341: Dos file name TRUNCATED", + "<454>": "SSP342: Dos File Extenstion TRUNCATED", + "<455>": "SSP343: Dos File Name contained Invalid chars", + "<456>": "SSP344: Invalid search method \"%1%\"", + "<457>": "", + "<458>": "SSP601: Unable to lock column(s) %1% in row \"%2%\".", + "<459>": "SSP602: %1% column(s) successfully locked.", + "<460>": "SSP603: Unable to lock row \"%1%\".", + "<461>": "SSP604: Row \"%1%\" successfully locked.", + "<462>": "SSP605: Unable to lock table \"%1%\".", + "<463>": "SSP606: Table \"%1%\" successfully locked.", + "<464>": "SSP607: Invalid locktype \"%1%\".", + "<465>": "SSP608: Unable to unlock column(s) %1% in row \"%2%\".", + "<466>": "SSP609: %1% column(s) successfully unlocked.", + "<467>": "SSP610: Unable to unlock row \"%1%\".", + "<468>": "SSP611: Row \"%1%\" successfully unlocked.", + "<469>": "SSP612: Unable to delete row(s) %1%; %2% row(s) deleted.", + "<470>": "SSP613: %1% row(s) deleted.", + "<471>": "SSP614: Row \"%1%\" deleted.", + "<472>": "SSP615: Row \"%1%\" successfully written.", + "<473>": "SSP616: %1% column(s) successfully written.", + "<474>": "SSP617: %1% row(s) successfully copied.", + "<475>": "SSP618: Unable to copy row(s) %1%. %2% row(s) copied.", + "<476>": "SSP619: \"%1%\" is an invalid column.", + "<477>": "SSP620: Write denied.", + "<478>": "SSP621: All locks successfully unlocked.", + "<479>": "SSP622: \"%1%\" is an invalid %2% option.", + "<480>": "SSP623: Unable to read row(s) %1%; %2% row(s) read.", + "<481>": "SSP624: %1% row(s) successfully read.", + "<482>": "SSP625: Destination row/table %1% already exists.", + "<483>": "SSP626: Destination row/table %1% does not exist.", + "<484>": "SSP627: Converted row string size exceeds 65532 bytes.", + "<485>": "SSP628: Unable to unlock table \"%1%\".", + "<486>": "SSP629: Table \"%1%\" successfully unlocked.", + "<487>": "SSP633: Required parameter missing.", + "<488>": "SSP634: No Servers found", + "<489>": "", + "<490>": "SSP700: Index type \"%1%\" is invalid.", + "<491>": "SSP701: Index type \"%2%\" has not been created for column \"%1%\".", + "<492>": "SSP702: Sort mode \"%1%\" is invalid.", + "<493>": "SSP703: Index type \"%2%\" has already been created for column \"%1%\".", + "<494>": "SSP704: Case mode \"%1%\" is invalid.", + "<495>": "SSP705: Create mode \"%1%\" is invalid.", + "<496>": "SSP706: Stop mode \"%1%\" is invalid.", + "<497>": "SSP707: The related table \"%1%\" does not exist.", + "<498>": "SSP708: Different sort modes \"%1%\" and \"%2%\" are not allowed for many-to-one relational indexes.", + "<499>": "SSP709: Cannot create/delete index for table \"%2%\" belongs to a different database \"%1%\".", + "<500>": "SSP710: Cannot create index for table \"%1%\" under a different account \"%2%\".", + "<501>": "SSP711: Cannot create index for table \"%1%\" when it has a Quickdex/Rightdex on its dictionary.", + "<502>": "", + "<503>": "SYS1000: Error loading program \"%1%\".", + "<504>": "SYS1001: Null loading error.", + "<505>": "SYS1002: The object code is invalid.", + "<506>": "SYS1003: The maximum number of programs has been exceeded.", + "<507>": "SYS1004: Error loading dictionary item \"%1%\".", + "<508>": "SYS1005: Cannot DICT insert into symbolic (%1%)", + "<509>": "SYS1006: Module \"%1%\" terminated due to runtime restrictions.", + "<510>": "SYS1008: Invalid login null user name.", + "<511>": "SYS1009: Invalid login user name.", + "<512>": "SYS1010: Invalid login password.", + "<513>": "SYS1011: Invalid login (Account disabled due to excessive attempts).", + "<514>": "SYS1012: Invalid login (Workstation disabled due to excessive attempts).", + "<515>": "", + "<516>": "SYS1100: The \"%1%\" event for \"%2%\" contains syntax errors.", + "<517>": "SYS1101: Compiler error: Preprocessing error.", + "<518>": "SYS1102: Compiler error: Source code exceeds maximum size for compiler.", + "<519>": "SYS1103: Compiler error: Old tablename; record name format is not supported. Invalid $insert.", + "<520>": "SYS1104: Compiler error: Module \"%1%\" Line \"%2%\" : Invalid $USES entity name[%3%]", + "<521>": "SYS1105: Compiler error: Module \"%1%\" Line \"%2%\" : $INSERT access error [%3%]", + "<522>": "SYS1106: Compiler error: Module \"%1%\" Line \"%2%\" : $INSERT circular reference error [$INSERT %3%]", + "<523>": "SYS1107: Compiler error: Module \"%1%\" Line \"%2%\" : Unmatched compiler define condition", + "<524>": "", + "<525>": "SYS1111: Compiler error: Contract must be before executable code", + "<526>": "SYS1112: Compiler error: Contract BEGIN CONDITION is missing.", + "<527>": "SYS1113: Compiler error: Contract END CONDITION is missing.", + "<528>": "SYS1114: Compiler error: Contract contains multiple PRE: statements.", + "<529>": "SYS1115: Compiler error: Contract contains multiple POST: statements.", + "<530>": "SYS1116: Compiler error: Contract PRE: statement is missing.", + "<531>": "SYS1117: Compiler error: Contract POST: statement is missing.", + "<532>": "SYS1119: Compiler error: %1%", + "<533>": "", + "<534>": "SYS1120: Compiler warning: Unassigned Variable \"%1% on line: \"%2%\"", + "<535>": "SYS1121: Compiler information: \"%1% elapsed time \"%2%\" secs", + "<536>": "SYS1122: Compiler warning: Variable \"%1% on line \"%2%\" ends with \"$\"", + "<537>": "SYS1123: Compiler warning: Equate \"%1% on line \"%2%\" does not end with \"$\"", + "<538>": "SYS1124: Compiler warning: Debug statement found", + "<539>": "SYS1125: Compiler warning: %1%", + "<540>": "", + "<541>": "SYS1200: The process has been aborted.", + "<542>": "SYS1201: This feature is not supported.", + "<543>": "SYS1210: The procedure type is invalid.", + "<544>": "SYS1211: A left parenthesis is missing.", + "<545>": "SYS1212: A right parenthesis is missing.", + "<546>": "SYS1213: The argument type is invalid.", + "<547>": "SYS1214: An argument identifier is missing.", + "<548>": "SYS1215: The compilation has failed.", + "<549>": "SYS1216: Too many arguments have been passed.", + "<550>": "SYS1217: A ROWDEF is missing in the routine.", + "<551>": "SYS1220: The object code is missing.", + "<552>": "SYS1221: The argument is invalid.", + "<553>": "SYS1222: PutData has failed.", + "<554>": "SYS1223: The stored procedure name is invalid.", + "<555>": "SYS1224: The procedure cannot be overwritten.", + "<556>": "SYS1230: SQL read error.", + "<557>": "SYS1240: A comma or quote is missing in the script.", + "<558>": "SYS1241: A matching quote is missing in the script.", + "<559>": "SYS1242: The parameter number in the script is invalid.", + "<560>": "SYS1243: The list is too deeply nested in brackets.", + "<561>": "SYS1244: The script contains an invalid character.", + "<562>": "SYS1245: A matching bracket is missing in the script.", + "<563>": "", + "<564>": "SYS1250: The prototype definition is missing", + "<565>": "SYS1251: The prototype return type is missing", + "<566>": "SYS1252: The prototype calling convention is missing", + "<567>": "SYS1253: The prototype function name is missing", + "<568>": "SYS1254: \"%1%\" is not a valid variable type", + "<569>": "SYS1255: \"%1%\" is not a valid calling convention", + "<570>": "SYS1256: \"%1%\" is not a valid internal function pointer", + "<571>": "SYS1257: The prototype definition is missing", + "<572>": "", + "<573>": "SYS1300: Cannot detach or redefine table %1%.", + "<574>": "SYS1301: Table was not found in volume rec table list.", + "<575>": "SYS1302: Volume record for attached table is missing.", + "<576>": "SYS1303: Table list in the volume record does not synch with the systables record.", + "<577>": "", + "<578>": "SYS1500: Primary row locked: Table %1%, key %2%", + "<579>": "SYS1501: Subsidiary row locked: Table %1% key %2%", + "<580>": "SYS1502: Locks missing at update time", + "<581>": "SYS1503: Form fetch denormalization beyond 2nd levels is not supported", + "<582>": "", + "<583>": "SYS1901: Table list cannot be null.", + "<584>": "SYS1913: Database record is missing in control table.", + "<585>": "SYS1915: Alias with wrong table type.", + "<586>": "SYS1916: Aliasing system tables is not allowed.", + "<587>": "SYS1917: Alias table name cannot be null.", + "<588>": "SYS1918: Renaming system tables is not allowed.", + "<589>": "SYS1919: Renaming alias tables is not allowed.", + "<590>": "SYS1920: Database record is missing.", + "<591>": "", + "<592>": "SYS1980: Error opening structure definition table \"%1%\" [%2%]", + "<593>": "SYS1981: Error reading structure definition for \"%1%\" [%2%]", + "<594>": "", + "<595>": "B100: Line %1%. THEN/ELSE not terminated with END. Invalid keyword: %2%.", + "<596>": "B101: Line %1%. Illegal Statement Termination: %2%", + "<597>": "B102: Line %1%. Illegal Statement: %2%.", + "<598>": "B103: Line %1%. Label %2% is missing.", + "<599>": "B104: Line %1%. Label %2% is doubly defined.", + "<600>": "B105: Line %1%. %2% has not been dimensioned or declared for use as a function or subroutine.", + "<601>": "B106: Line %1%. Variable has been dimensioned and used without subscripts.", + "<602>": "B108: Line %1%. FOR statement not terminated with \"NEXT\" keyword.", + "<603>": "B113: Line %1%. Illegal expression encountered.", + "<604>": "B114: Line %1%. Maximum number of variables exceeded.", + "<605>": "B115: Line %1%. Label %2% is used before the EQUATE statement.", + "<606>": "B120: Line %1%. Statements exist after final \"END\" statement. Check for unmatched conditionals.", + "<607>": "B123: Line %1%. End of source reached with unmatched IF, ELSE, FOR, LOOP or CASE block.", + "<608>": "B200: Line %1%. Input Error", + "<609>": "B201: Line %1%. Unterminated conditional clause.", + "<610>": "B202: Line %1%. Unterminated conditional clause.", + "<611>": "B203: Line %1%. Illegal expression following logical %2% operator.", + "<612>": "B204: Line %1%. Illegal expression following MATCHES operator.", + "<613>": "B205: Line %1%. Illegal expression following comparison operator.", + "<614>": "B206: Line %1%. Illegal expression following concatenation operator.", + "<615>": "B207: Line %1%. Illegal expression following negation operator.", + "<616>": "B208: Line %1%. Illegal expression following addition operator.", + "<617>": "B209: Line %1%. Illegal expression following subtraction operator.", + "<618>": "B210: Line %1%. Illegal expression following multiplication operator.", + "<619>": "B211: Line %1%. Illegal expression following division operator.", + "<620>": "B212: Line %1%. Illegal expression following power operator.", + "<621>": "B213: Line %1%. Reserved keyword %2% encountered in expression.", + "<622>": "B214: Line %1%. Right paren \")\" missing.", + "<623>": "B215: Line %1%. Right curly brace \"}\" missing.", + "<624>": "B216: Line %1%. THEN keyword is required.", + "<625>": "B217: Line %1%. Illegal expression following THEN.", + "<626>": "B218: Line %1%. ELSE keyword is required.", + "<627>": "B219: Line %1%. Illegal expression following ELSE.", + "<628>": "B300: Line %1%. Generated object code exceeds 65535 bytes.", + "<629>": "", + "<630>": "//Arev B errors - see SYSPROG, BERRORS", + "<631>": "B101: \" toSort mode selected is not correct. Column %1% already has relational index with %2% mode. Please apply this mode for creating c", + "<632>": "B102: \" to %1% already has a relational index established from table %2%. The Relational index cannot be set again from table %3%. ", + "<633>": "B103: \" to Compressing %1%... ", + "<634>": "B104: %1% has been selected, but cannot be found in %2%. ", + "<635>": "B105: The dBASEIII file %1% already exists. Do you want to overwrite it? ", + "<636>": "B106: The dBASEIII memo file %1% already exists. Do you want to overwrite it? ", + "<637>": "B107: Cannot find the %1% command in the LIST.SUB subroutines. ", + "<638>": "B108: Enter number. ", + "<639>": "B109: Enter text without quotes. ", + "<640>": "B110: Port Call: ", + "<641>": "B111: An invalid option was used in the \"PORT\" command. ", + "<642>": "B112: The code %2% is not valid in \"%1%\". ", + "<643>": "B113: The %1% option is not currently implemented. ", + "<644>": "B114: Not available. ", + "<645>": "B115: The column must not be a symbolic, group, or key column, or have a relational index on it. ", + "<646>": "B116: You must first select a column. ", + "<647>": "B117: Enter a table name followed by a slash (/) and a column name. ", + "<648>": "B118: Warning! All index information will be deleted from %1%. Do you want to continue? ", + "<649>": "B119: Clearing indexing information in %1%... ", + "<650>": "B120: Deleting Cross Reference information from %1%... ", + "<651>": "B121: The character column %1% is longer than the 254 character limit. Use a memo field for this column. ", + "<652>": "B123: Finding indexed tables... ", + "<653>": "B124: Collecting indexing information... ", + "<654>": "B125: Enter a new table name for the save list statement. Press [Esc] to cancel the process. ", + "<655>": "B126: %1% is a new row. ", + "<656>": "B127: %1% is an invalid row. ", + "<657>": "B128: Hours cannot exceed 12. ", + "<658>": "B129: Text cut into buffer %1%. ", + "<659>": "B130: \"%1%\" was not found. ", + "<660>": "B131: The default macro set %1% cannot be found. ", + "<661>": "B132: The header for group 1 has been corrupted. No framesize or modulo information can be read. Do you want to fix group 1? ", + "<662>": "B133: Cannot determine the framesize of this table. Please enter your best estimate for the framesize in bytes. ", + "<663>": "B134: Framesize must divide evenly into the filesize (%1%). ", + "<664>": "B135: The FRAMESIZE must be between 256 and 10000. ", + "<665>": "B136: The FRAMESIZE parameter must be numeric. ", + "<666>": "B137: Enter a group or group range to fix. Formats are: x, x-y, ALL. Press [Esc] to cancel the process. ", + "<667>": "B138: Response = %1% ", + "<668>": "B139: Fixing groups %1% through %2%... ", + "<669>": "B140: Rebuilding the primary % figure... ", + "<670>": "B141: Copying all good rows found from a temporary table back into re-initialized groups... ", + "<671>": "B142: Another station is fixing. Please try again later. ", + "<672>": "B143: The overflow freelist has been cleared. You can issue a compress to recover and re-order the overflow frames. ", + "<673>": "B144: Compress file. There must be no other user of this file. After compression, this file should be re-attached at all other s", + "<674>": "B145: An error occurred during the compress operation. The operation has been canceled. ", + "<675>": "B146: The drive %1% does not contain Advanced Revelation files. ", + "<676>": "B147: The program OCONV.RUN is not available in the SYSOBJ table. ", + "<677>": "B148: Enter the names of the programs to display. ", + "<678>": "B149: The %1% table was not found. Do you want to list all indexed tables? ", + "<679>": "B150: The %1% table is not indexed. Do you want to list all indexed tables? ", + "<680>": "B151: You have defined an index. Do you want to turn it on? ", + "<681>": "B152: *CAUTION* You have asked to delete rows from SYSCOLUMNS. These rows will also be deleted from your dictionaries. Do you want to c", + "<682>": "B153: The %1% column in the %2% table is not available. Do you want to list all indexed columns? ", + "<683>": "B154: Will \"%1%\" be a key prompt? ", + "<684>": "B155: Finding the %1% column in the dictionary... ", + "<685>": "B156: %1% cannot be found. It must exist in %2%. ", + "<686>": "B157: %1% is currently a Data Column at position %3% Do you want to convert it to a Symbolic column? ", + "<687>": "B158: No formula has been saved. ", + "<688>": "B159: The formula was not changed. ", + "<689>": "B160: Collector windows do not use dictionary formulas. ", + "<690>": "B161: The object code for %2% cannot be found in the %1% table. %2% is also not cataloged. Please enter the name of the table containin", + "<691>": "B162: The window %1% cannot be found. ", + "<692>": "B163: Updating the dictionary... ", + "<693>": "B164: %1% did not bind correctly. ", + "<694>": "B165: No index values were found. ", + "<695>": "B166: Cannot find the row %1% in the %2% table. ", + "<696>": "B167: Collecting information about indexes... ", + "<697>": "B168: Key capture functions have been disabled. ", + "<698>": "B169: This is an invalid key. ", + "<699>": "B170: Macro execution has been disabled. ", + "<700>": "B171: Window %1% is about to be deleted from %2%. Do you want to continue? ", + "<701>": "B172: Deleting... ", + "<702>": "B173: No columns are indexed in %1%. ", + "<703>": "B174: Sorting is not allowed within a protected group. ", + "<704>": "B175: Sorting is not allowed before row %1%. ", + "<705>": "B176: Enter the number of rows to select or leave this blank to select all rows. ", + "<706>": "B177: Enter heading text for this column. ", + "<707>": "B178: Enter an output format code. (example: \"D2/\" for a date format of mm/dd/yy) ", + "<708>": "B179: Enter a heading. ", + "<709>": "B180: Enter a footing. ", + "<710>": "B181: QBEC1, HORMV.OUT sync error? ", + "<711>": "B182: QBEC1, HORMV.SCB out of sync? ", + "<712>": "B184: Building query... ", + "<713>": "B185: Updating %1% in the %2% table... ", + "<714>": "B186: No key prompt was specified. The default key prompt will be %1%. ", + "<715>": "B187: You must create at least one prompt before you can save this window. The save operation has been canceled. ", + "<716>": "B188: The window %1% was not locked. No changes will be saved. ", + "<717>": "B189: Join prompt %1% cannot be found. ", + "<718>": "B190: Do you want to execute the filter? ", + "<719>": "B191: %1%, needed for index transactions is not available. Indexes depending on this table will probably need rebuilding. ", + "<720>": "B192: The Lotus file %1% already exists. Do you want to overwrite it? ", + "<721>": "B193: Enter a variable name. ", + "<722>": "B194: Editing must be complete to continue. ", + "<723>": "B195: There is nothing to pan. ", + "<724>": "B196: This label is as large as you can make it in the current window. ", + "<725>": "B197: You have reached the edge of window space. You may want to try resizing your window using [Ctrl-F7]. ", + "<726>": "B198: The dictionary of %1% is in use. No changes will be saved. ", + "<727>": "B199: The dictionary is in use elsewhere. The binding cannot be changed. ", + "<728>": "B200: You have maximized this prompt entry in the current window. You may want to try resizing your window using [Ctrl-F7]. ", + "<729>": "B201: Reading window... ", + "<730>": "B202: %1% has %2% installed. Do you want to remove %2%? ", + "<731>": "B203: Removing the %1% modifying filing system from %2%... ", + "<732>": "B204: Waiting until the source record %1% can be locked... ", + "<733>": "B205: %1% is locked. ", + "<734>": "B206: No R/LIST program was generated. An invalid expression or column has been detected in line %1%. ", + "<735>": "B207: %1% is not a valid dBASEIII file. ", + "<736>": "B208: Do you want to perform the conversion? ", + "<737>": "B209: That is an invalid color name. ", + "<738>": "B210: If no record delimiter is specified, a record length must be specified. ", + "<739>": "B211: The operating system file %1% already exists. Do you want to overwrite it? ", + "<740>": "B212: The HELP file is not available. No help message will be saved. Do you want to continue? ", + "<741>": "B213: Done. ", + "<742>": "B214: There are no columns defined in the dictionary of %1%. ", + "<743>": "B215: You must add a table to the window before you can use Quick Paint. ", + "<744>": "B216: There are no tables in this window. ", + "<745>": "B217: Formatting... ", + "<746>": "B218: Printing... ", + "<747>": "B220: The mode %1% is invalid. ", + "<748>": "B221: The selected objects have been copied to the Paint clipboard. ", + "<749>": "B222: Function key? %1% ", + "<750>": "B223: You must be in Roam mode to Insert or Delete rows. ", + "<751>": "B224: The record already exists in the VOC. Do you want to overwrite it? ", + "<752>": "B225: Resizing is not supported in Table mode. ", + "<753>": "B226: You may not pan while in Table mode. ", + "<754>": "B227: The Window is fully displayed. ", + "<755>": "B228: There is no transaction file for this Batch Update. ", + "<756>": "B229: This label is at maximum length for the current window. You may want to try resizing your window using [Ctrl-F7]. ", + "<757>": "B230: A starting byte and a length are required. ", + "<758>": "B231: Lock information has been updated in the templates in the %1% file. ", + "<759>": "B232: No related windows are available. ", + "<760>": "B233: Macro building has been disabled. ", + "<761>": "B234: Searching Indexes... Press [Esc] to cancel the search. ", + "<762>": "B235: Waiting for index %1% to be available... ", + "<763>": "B236: Error in compiling \"%1%\" ", + "<764>": "B237: No [F2] Help for %1% type commands is available. ", + "<765>": "B238: Collector windows do not have dictionaries. ", + "<766>": "B239: Updating prompt %1%... ", + "<767>": "B240: Updating the %1% field... ", + "<768>": "B241: %1% is invalid. ", + "<769>": "B242: Enter the table name to move to. ", + "<770>": "B243: Selecting referenced programs... ", + "<771>": "B244: %1% is not a valid table type. Press [F2] for table type options. ", + "<772>": "B245: The %1% key is not active %2% Press [Ctrl-F9] for a list of the currently active keys. ", + "<773>": "B246: The clipboard has been cleared. ", + "<774>": "B247: Pasting is only allowed while Roaming. ", + "<775>": "B248: Reading dictionary... ", + "<776>": "B249: The dictionary is not bound to %1%. Use the Prompt Window to verify the prompt. ", + "<777>": "B250: Table Information for %1%: Volume = %2% OS Path = %3% File Type = %4% File Number = %5% ", + "<778>": "B251: The %1% table belongs to the %2% volume. You may only change indexing in tables under the same volume. ", + "<779>": "B252: Do you want to save? ", + "<780>": "B253: Shifting... ", + "<781>": "B254: No block of text has been defined. ", + "<782>": "B255: The menu options key is disabled. ", + "<783>": "B256: An invalid attribute was passed to ATTR.TO.ESC. Attribute = \"%1%\" (hex). ", + "<784>": "B257: Cannot access color definitions correctly. ", + "<785>": "B258: The escape sequence \"%1%\" (hex) is invalid in ESC.TO.ATTR. ", + "<786>": "B259: The %1% table belongs to the %2% application. You may only change indexing in tables in the same application. ", + "<787>": "B260: %1% is not a valid volume name or an existing subdirectory. ", + "<788>": "B261: Table name = %1% OS name = %8% Volume = %2% Application = %3% File Type = %4% %5% ", + "<789>": "B262: %1% is indexed and cannot be renamed. ", + "<790>": "B263: %1% in the %2% table is not a valid dictionary type for indexing. Only the dictionary types \"F\" and \"S\" may be indexed. ", + "<791>": "B264: %1% already exists in the %3% application on the %2% volume. ", + "<792>": "B265: The clipboard is empty. ", + "<793>": "B266: %1% is not a Linear Hash table. You must convert your table before attempting to use it with PAINT. ", + "<794>": "B267: The maximum length of the Quickdex index (65,530 characters) has been reached -- no more records will be added to the Quickdex in", + "<795>": "B268: The \"BY\" clause is invalid. You cannot sort by %1%. ", + "<796>": "B269: The disk the drive is NOT a valid LAN Pack disk. Please insert a valid LAN Pack disk. ", + "<797>": "B269: A Fatal Bump error. Improper Bump information. ", + "<798>": "B272: There is no disk in drive %1%. Insert a disk and then try agian. ", + "<799>": "B273: To install a LAN Pack, you must log in as the \"LANPACK\" user. ", + "<800>": "B274: This installation currently supports %1% user(s). Would you like to enable more users? ", + "<801>": "B275: Insert a NEW Lanpack into Drive. Choose drive (A or B) or Cancel ", + "<802>": "B276: If you change the location of your application without moving the DOS files, you will NOT be able to open the application. ", + "<803>": "B279: Cannot find the %1% driver in the SYSNETWORKS table. ", + "<804>": "B280: The REVBOOT file is too large. ", + "<805>": "B282: The original REVBOOT file has been renamed REVBOOT.OLD. The new network driver will be available the next time you log onto Adva", + "<806>": "B284: Logging off. ", + "<807>": "B285: No rows found. ", + "<808>": "B286: %1% is not a valid index name. ", + "<809>": "B287: Warning! The index update process must not be interrupted or indexes will be corrupted. Do you still want to update ALL i", + "<810>": "B288: There are invalid character(s) in the table name %1%. Use only alphanumeric characters and the special characters underscore \"_\"", + "<811>": "B289: The dictionary of %1% is not available. ", + "<812>": "B291: The key list has exceeded the maximum allowed length. The list will be truncated. ", + "<813>": "B292: The list accumulated in %1% has been truncated to the 64K bytes limit. Please use the R/LIST command to retrieve correct ", + "<814>": "B293: The Btree index for the indexed column %1% in the table %2% has not been created. Please initialize the index for this column an", + "<815>": "B294: The list returned from BTREE.EXTRACT has been truncated to the 64K limit. To retrieve more rows from the %1% table use the SELEC", + "<816>": "B295: The list %1% cannot be found in the LISTS table. ", + "<817>": "B296: Do you want to cancel this process? ", + "<818>": "B297: The correct form for the TRANSACTION command is: TRANSACTION operator (option) where: operator = COMMIT, ROLLBACK, S", + "<819>": "B300: These table(s) are not found in this volume: ", + "<820>": "B301: Table(s) not available: ", + "<821>": "B303: No candidate tables found. ", + "<822>": "B304: Domain and validation controls have been added to %1% tables. ", + "<823>": "B305: Control features have been removed from %1% tables. ", + "<824>": "B306: Locating tables... ", + "<825>": "B307: No tables were affected. The \"S\" option is not active if no volume is specified. ", + "<826>": "B308: The \"%1%\" volume is not available. ", + "<827>": "B311: The \"%1%\" table does not have control features active. Press [Esc] to cancel the process or press any other key to continue. ", + "<828>": "B312: The \"%1%\" table already has Control features active. Press [Esc] to cancel the process or press any other key to continue. ", + "<829>": "B313: The \"%2%\" volume does not exist. ", + "<830>": "B314: \"%1%\" is not a data table, and cannot have control features added. Press [Esc] to cancel the process or press any other key to c", + "<831>": "B315: The \"%1%\" table is not available. It must be attached before Control features can be added. Press [Esc] to cancel the process or", + "<832>": "B316: The \"%1%\" table does not exist on the \"%2%\" volume. Press [Esc] to cancel the process or press any other key to continue. ", + "<833>": "B317: An error has occurred while writing to the volume directory for the \"%2%\" volume. Press [Esc] to cancel the process or press any", + "<834>": "B318: The \"%1%\" table is not on the \"%2%\" volume. Press [Esc] to cancel the process or press any other key to continue. ", + "<835>": "B319: Unable to save \"%1%\" in the \"%2%\" table. ", + "<836>": "B320: Subroutine: %1%|Branch value must be numeric! ", + "<837>": "B321: Subroutine: %1%|Value of %2% exceeds highest ON...GOSUB branch. ", + "<838>": "B322: The table: %1% is excluded from all EasyWriter and QBE|queries. Therefore, you may not set up additional|dictionary level contro", + "<839>": "B323: Link list in the table \"%1%\" is broken. Transactions cannot be properly flushed. To correct this problem, please rebuild a", + "<840>": "B324: The table: %1% has no dictionary attached or created.|Therefore, you may not set up additional|dictionary level control on the ta", + "<841>": "B325: Dictionary tables cannot be further qualified for EasyWriter queries. ", + "<842>": "B326: Error writing to DOS file \"%1%\" ", + "<843>": "B327: Default configuration record \"%1%\" is missing from the %2% table. ", + "<844>": "B328: Error opening or reading from .INI file \"%1%\" ", + "<845>": "B329: %1% is an invalid Advanced Revelation .INI file. ", + "<846>": "B330: The file or path \"%1%\" does not contain .INI files. ", + "<847>": "B331: Other .INI files only accessable from the SYSPROG account. ", + "<848>": "B332: No INI-file has been found. \"%1%\" has been created as the default INI-file. ", + "<849>": "B333: Finishing processing selections. Please wait. ", + "<850>": "B400: Initializing the index control information... ", + "<851>": "B401: Null I/O Error ", + "<852>": "B402: Error compiling %1%. Use the dictionary window to correct the formula. ", + "<853>": "B403: Error while copying row \"%1%\" to the \"%2%\" table. ", + "<854>": "B404: Building the \"%1%\" index for the \"%2%\" table... ", + "<855>": "B440: Another workstation is currently accessing table \"%2%\" and has row \"%1%\" locked. The index update you have requested will pr", + "<856>": "B441: Records can not be updated because the table \"%1%\" is not available or attached for reference to store index transactions. P", + "<857>": "B500: The \"%1%\" table has been dropped. ", + "<858>": "B501: The wait-for-lock process has been interrupted. Lock information: Lock Type: \"%1%\" Table : \"%2%\" Row : \"%", + "<859>": "B502: Transaction Control is OFF. ", + "<860>": "B503: You must log in as the user \"SYSPROG\" to perform this function. ", + "<861>": "B504: Do you want to remove the user \"%1%\" from the commit queue \"%2%\" ? ", + "<862>": "B505: Do you want to remove the user \"%1%\" from ALL commit queues? ", + "<863>": "B506: Do you want to clear the entire Commit Log? ", + "<864>": "B507: Warning! Invoking Auto-Transaction Start causes all changes to be held until they are explicitly committed. Unless committed, ch", + "<865>": "B508: A pending transaction exists for this station. Do you want to Commit or Rollback before logoff? ", + "<866>": "B509: A pending transaction exists for this station. Do you want to Commit, Rollback, or Ignore the transaction? ", + "<867>": "B510: Invalid response. Entry must be \"C\", \"R\", or \"I\". ", + "<868>": "B511: Invalid response. The entry must be a \"C\" or \"R\". ", + "<869>": "B512: This function can only be used when Commit Protection is \"ON\". Commit protection causes commit queues to be maintained. A lock ", + "<870>": "B513: The \"COMMITLOG\" file has been locked. Transactions cannot be committed while this utility is being run. ", + "<871>": "B514: This volume does not contain any tables of the Revelation G type. ", + "<872>": "B515: Row \"%1%\" was found in the \"VOC\", but is not a valid volume name. ", + "<873>": "B516: \"%1%\" is mapped to drive \"%2%\". ", + "<874>": "B517: \"%1%\" is not a volume. This process assumes that it is a path name. Is this correct? ", + "<875>": "B518: The volume name that corresponds to the path \"%1%\" is \"%2%\" Is this correct? ", + "<876>": "B519: The target must a be valid volume. Building \"%TEMP.VOL.CONVERT%\" using the path \"%1%\". ", + "<877>": "B520: The volume directory on path \"%1%\" is not available. ", + "<878>": "B521: Another workstation is currently updating indexes on table \"%2%\" with control column \"%1%\" locked. The index update you have", + "<879>": "B522: \"%1%\" is not a valid column name. ", + "<880>": "B523: Help level can only be set from Level 1 of TCL. ", + "<881>": "B524: All other users should reattach this table in order for indexing to remain up-to-date. ", + "<882>": "B525: Error %1% in VSPACE. ", + "<883>": "B526: The View window cannot be displayed. The operating system file required for the window is not available or cannot be created. ", + "<884>": "B527: Your DOS path for temporary files is invalid. Please check your environment setting. ", + "<885>": "B528: I/O error during join process. ", + "<886>": "B529: An error was encountered while joining columns. No changes will be saved. ", + "<887>": "B530: A Merge name is required. ", + "<888>": "B531: The printer configuration for \"%1%\" cannot be found in \"%2%\". ", + "<889>": "B532: The flag definition record \"%1%\" cannot be found. ", + "<890>": "B533: Cannot find \"%1%\". ", + "<891>": "B534: The \"%C37%FIELDS%C37%\" row in the the dictionary of \"%1%\" is not available. ", + "<892>": "B535: Reprocessing row \"%1%\" from the \"%2%\" table %3% ... ", + "<893>": "B536: Cannot find \"%1%\" in \"%2%\". ", + "<894>": "B537: Merging row \"%1%\" from the \"%2%\" table to the output table %3% ... ", + "<895>": "B538: The key list contains imbalanced single or double quote marks. ", + "<896>": "B539: No output table was specified in the template. ", + "<897>": "B540: Widow/Orphan override. ", + "<898>": "B541: MERGE.SUB was passed a dispatch value out of range %1%. ", + "<899>": "B542: Collecting column information... ", + "<900>": "B543: %1% Enter a value. ", + "<901>": "B544: Do you want to delete \"%1%\"? ", + "<902>": "B545: The Merge sample is active only while editing the Merge script. ", + "<903>": "B546: Do you want to view the previous sample? ", + "<904>": "B547: The row \"%1%\" is not available in the \"%2%\" table to do a Merge sample. ", + "<905>": "B548: Do you want to abandon the sample? ", + "<906>": "B549: Selecting a random row. ", + "<907>": "B550: Initializing... ", + "<908>": "B551: \"%1%\" error(s) detected. ", + "<909>": "B552: No errors have been detected. ", + "<910>": "B553: This field is protected. Press [F2] to edit the Script. ", + "<911>": "B554: Enter the name of the operating system text file to import. ", + "<912>": "B555: The table can be accessed successfully. ", + "<913>": "B556: \"%1%\" is not a legal operating system filename. ", + "<914>": "B557: Access to this file has been denied by the operating system. ", + "<915>": "B558: \"%1%\" does not exist. ", + "<916>": "B559: \"%1%\" is not available or cannot be found. ", + "<917>": "B560: Convert high ASCII characters (higher than character 127)? ", + "<918>": "B561: The format flag template contains an invalid key flag (%1%-%2%). ", + "<919>": "B562: The text file is too long. The file will be truncated to fit into the Merge template. ", + "<920>": "B563: Wrap long lines? ", + "<921>": "B564: The key flag \"%1%\" in the options list is a valid flag. ", + "<922>": "B565: \"%1%\" is not a valid format code. Press [F2] for a list of valid formats. ", + "<923>": "B566: The format code %1% is invalid. ", + "<924>": "B567: The \"%1%\" table does not exist. Do you want to create it? ", + "<925>": "B568: The Merge script is empty. ", + "<926>": "B569: The Merge header has not been specified. ", + "<927>": "B570: The Merge footer has not been specified. ", + "<928>": "B571: Printer format specifications must be entered as up to 3 decimal numbers separated by spaces. (example: 27 72 105) ", + "<929>": "B572: Selecting rows... ", + "<930>": "B573: Enter the name of the filter row. ", + "<931>": "B574: The \"REPORTS\" table is not available. Press [Enter] to return to the Query window. ", + "<932>": "B575: The filter \"%1%\" has been saved. ", + "<933>": "B576: Do you want to save your custom changes in a Filter? ", + "<934>": "B577: The \"%1%\" prompt contains unbalanced quotation marks. ", + "<935>": "B578: Converting the R/DESIGN row \"%1%\". ", + "<936>": "B579: \"%1%\" This row already exists in \"%2%\". The row was not converted. ", + "<937>": "B580: \"%1%\" This record was converted and saved in \"%2%\". ", + "<938>": "B581: %1% Possible incompatibility. This prompt has a symbolic reference in %2%. The code has been placed in %3%. ", + "<939>": "B582: The symbolic uses RDESIGN.COMMON. This is incompatible with window templates. ", + "<940>": "B583: The symbolic defines COMMON variables. This may be incompatible with Window templates. ", + "<941>": "B584: \"%1%\" This prompt has a subroutine reference in Description. The code has been placed in the Options prompt. This may be incompat", + "<942>": "B585: The subroutine \"%1%\" uses RDESIGN.COMMON. This is incompatible with window templates. ", + "<943>": "B586: The subroutine \"%1%\" defines common. This may be incompatible with Window templates. ", + "<944>": "B587: The program \"%1%\" cannot not be found. The process is unable to check for incompatibility. ", + "<945>": "B588: The program table is not available. Unable to check for incompatibility. ", + "<946>": "B589: \"%1%\" This row is not an \"ENTRY\" type. It cannot be converted by this program. ", + "<947>": "B590: The \"VOC\" entry was not a catalog pointer. The process is unable to check for incompatibility. ", + "<948>": "B591: \"%1%\" The \"VOC\" entry is not available. Unable to check for incompatibility. ", + "<949>": "B592: \"%1%\" This row cannot be found in the \"%2%\" table. ", + "<950>": "B593: \"%1%\" The cross reference login was not converted. ", + "<951>": "B594: \"%1%\" The table accessed by this template is not available. The prompts for symbolic columns cannot be verified. ", + "<952>": "B595: The change prompt has a value in \"PARAMETER 1\". Linked screen conversion is not completed yet. PARAMETER 1 = \"%1%\" ", + "<953>": "B596: Prompt number %1% (R/DESIGN window number %2%) is more than one column wide. It has been truncated to one column. ", + "<954>": "B597: %1% This prompt has a non-numeric value in Parameter 1. No action has been taken. ", + "<955>": "B598: \"%1%\" This prompt has a value in the \"DESCRIPTION\" field that cannot be converted. ", + "<956>": "B599: Mode %1% is an invalid reduction mode. ", + "<957>": "B600: The first (meta) pass for \"WITH\" has failed. ", + "<958>": "B601: WITH meta compilation failed. ", + "<959>": "B602: This option/process is not supported. ", + "<960>": "B603: The cursor value %1% is out of range. ", + "<961>": "B604: The cursor \"%1%\" is invalid. ", + "<962>": "B605: The template has not been saved. There is no Table or Collector information. ", + "<963>": "B606: Position information must be numeric. ", + "<964>": "B607: The mode %1% is invalid for LIST.ACTIVE. ", + "<965>": "B608: Error during Readnext operation while seeking. ", + "<966>": "B609: Waiting for an index lock... If you cancel this process, the table will not be deleted. ", + "<967>": "B610: BFS name cannot be read for DICT %1% ", + "<968>": "B611: The [Alt-V] key is functional only when using R/LIST commands. ", + "<969>": "B615: The active select list is unresolved. Do you want to continue? ", + "<970>": "B616: The active select list is unresolved with reduction pending. Do you want to continue? ", + "<971>": "B617: The active select list is unresolved. The \"%1%\" table contains %2% rows. Do you want to continue? ", + "<972>": "B618: The active SELECT list is unresolved. The \"%1%\" table contains %2% rows. Do you want to continue? ", + "<973>": "B619: Seek to the top of table has failed. Do you want to continue the Savelist from the current position? ", + "<974>": "B620: %B%No Cross Reference or Btree index has been established for the \"%1%\" table. ", + "<975>": "B621: \"%1%\" is not a valid key in the \"%2%\" table. ", + "<976>": "B622: Preparing \"%1%\" listing... ", + "<977>": "B623: No rows have been selected. ", + "<978>": "B624: The record \"@CRT\" in the dictionary of \"%1%\" contains an invalid column. \"%2%\" does not exist. ", + "<979>": "B625: VSPACE status error %1%. ", + "<980>": "B626: \"%1%\" is not available for the View window. Cancelling the process. ", + "<981>": "B627: STATUS() error = \"%1%\" \"%2%\" ", + "<982>": "B628: Cannot move to the top of the table. Do you want to continue the report from the current position? ", + "<983>": "B629: Enter page number to display. ", + "<984>": "B630: Do you want to print this report? ", + "<985>": "B631: The \"REPORTS\" table is not available. ", + "<986>": "B632: The row \"%1%\" cannot be found in the \"REPORTS\" table. ", + "<987>": "B633: Moving \"%1%\" menus is not allowed. ", + "<988>": "B634: This menu is too large to display. The process has been cancelled. ", + "<989>": "B635: The [Alt-P] key is functional only when using R/LIST commands. ", + "<990>": "B636: SELECT.INDEX failed during REDUCE operation. ", + "<991>": "B700: The ASCII %1% character is reserved for system use and cannot be used in prompts or labels. ", + "<992>": "B701: The index search type specified for \"%1%\" is invalid. ", + "<993>": "B702: The index \"%1%\" must be rebuilt. ", + "<994>": "B703: Warning! The index \"%1%\" must be rebuilt. (The primary data and index control information has not been corrupted.) ", + "<995>": "B704: Restricted access. ", + "<996>": "B705: The correct form for the \"BUILD.TABLE\" command is: BUILD.TABLE template.file.name template.name ", + "<997>": "B706: Working on template \"%1%\" in the \"%2%\" table... ", + "<998>": "B707: The \"%1%\" template is encrypted. Unable to build a table row. ", + "<999>": "B708: No help is available for \"%1%\". ", + "<1000>": "B709: Row is locked. Retrying... ", + "<1001>": "B710: Do you want to change the message? ", + "<1002>": "B711: Waiting for \"%1%\" transaction lock in \"%2%\"... Warning! If you cancel this process, you will have to rebuild this index. ", + "<1003>": "B712: The \"%1%\" option is not available in FILE.CVT. ", + "<1004>": "B713: Working on \"%1%\"... ", + "<1005>": "B714: The popup has reached the maximum size allowed for your memory configuration. ", + "<1006>": "B772: ", + "<1007>": "B800: Waiting to lock the \"%1%\" table... Press [Esc] to cancel the process. ", + "<1008>": "B801: %1% row(s) have been selected. %2% logical error(s) were detected. ", + "<1009>": "B802: %1% row(s) have been selected. %2% error(s) were detected. ", + "<1010>": "B805: This statement contains unbalanced quotes. ", + "<1011>": "B810: \"%1%\" is an invalid active language set. The active language set must be in the list of loaded sets or must be \"DEFAULT\". ", + "<1012>": "B811: \"%1%\" is an invalid language set. Press [F2] for a list of valid choices. ", + "<1013>": "B812: \"%1%\" already exists in the load list. ", + "<1014>": "B813: \"%1%\" is an invalid output conversion pattern for the TIMEDATE() function. The pattern must be a valid \"DT\" (Date-Time) conversio", + "<1015>": "B815: Case sensitive character sort order in record \"%1%\" is invalid. It must be 256 bytes in length exactly. ", + "<1016>": "B816: Case insensitive character sort order in record \"%1%\" is invalid. It must be 256 bytes in length exactly. ", + "<1017>": "B817: The language set control row \"%1%\" is not in the load list and is not \"DEFAULT\". ", + "<1018>": "B818: The language set control row \"%1%\" was not found in the SYSENV table. ", + "<1019>": "B820: No fonts or styles defined for this printer. ", + "<1020>": "B821: No printers have been defined in the environment. ", + "<1021>": "B822: Cannot initialize printer %1% ", + "<1022>": "B823: %1% is not a valid color. ", + "<1023>": "B824: %1% rows converted. ", + "<1024>": "B825: The spooling file %1% already exists.|Do you wish to overwrite the file? ", + "<1025>": "B826: Operation cancelled. ", + "<1026>": "B827: WARNING! If you cancel the print job, the spool file will be erased, and you must rerun any reports that you want printed. Do yo", + "<1027>": "B828: A print process is open for this station and a close process has been defined for this printer. Do you wish to execute the Close", + "<1028>": "B829: You have selected the postcript printer driver and any printed output will be spooled to a temporary file. To send any pendin", + "<1029>": "B830: The value you have entered does not meet validation criteria. You can enter strings of characters to send to the printer in any ", + "<1030>": "B834: There is no ROSMEDIA.MAP file on \"%1%\". ", + "<1031>": "B835: \"%1%\" is in the \"VOC\" but it is not a volume pointer.", + "<1032>": "", + "<1033>": "DBASE1: dBASE error; Primary status = %1%; Secondary status = %2%.", + "<1034>": "DBASE2: dBASE error %2%; Primary Status = %1%; Secondary status = %3%.", + "<1035>": "CHK100: Could not create directory %1%.", + "<1036>": "CHK101: Check-out status %1% cannot be processed.", + "<1037>": "CHK102: Could not create hot repository on %1%.", + "<1038>": "CHK103: Could not create cold repository on %1%.", + "<1039>": "CHK104: Volume %1% already exists. Repository could not be created.", + "<1040>": "CHK105: Invalid repository format %1%.", + "<1041>": "REP100: No method \"%2%\" exists for entity \"%1\".", + "<1042>": "REP101: At least two args required for methods.", + "<1043>": "REP102: Cannot forward message - no more parent class levels.", + "<1044>": "REP110: Cannot add entity \"%1%\" - it already exists.", + "<1045>": "REP111: Reference \"%1%\" is missing for \"%2%\" - referential error.", + "<1046>": "REP112: Reference \"%1%\" crosses application lines.", + "<1047>": "REP113: Invalid entity id \"%1%\".", + "<1048>": "REP117: Cannot add type - it already exists.", + "<1049>": "REP118: Cannot add application - it already exists.", + "<1050>": "REP119: User %1% does not have rights to perform operation %2% against entity %3%.", + "<1051>": "REP120: Inherited entity %1% cannot be modified.", + "<1052>": "REP121: Invalid flag option code %1%.", + "<1053>": "REP122: Invalid flag operator code.", + "<1054>": "REP123: Cannot find associated component %2% of entity %1%.", + "<1055>": "REP124: Message %2% is not supported by the entity type/class %1%.", + "<1056>": "REP125: App body missing in SYSAPPS.", + "<1057>": "REP126: Repository is being synchronized with the Database from another station.", + "<1058>": "REP127: Error copy entity %1% component %2% in checkout or extraction.", + "<1059>": "REP128: Illegal location token used on hot format checkout.", + "<1060>": "REP129: Cannot update associated component %2% of entity %1% (%3%).", + "<1061>": "REP130: Missing SYSREPOSCLASSES definition for entity %1% (%2%).", + "<1062>": "REP131: Missing SYSREPOSTYPES definition for entity %1% (%2%).", + "<1063>": "REP132: Error opening SYSREPOSTYPES table (%1%).", + "<1064>": "REP133: Error opening SYSREPOSCLASSES table (%1%).", + "<1065>": "REP134: Error creating MSScriptControl.ScriptControl (%1%).", + "<1066>": "REP135: Error adding code to Script Control (%1%).", + "<1067>": "REP136: Error running \"%1%\" function in Script Control (%2%).", + "<1068>": "REP137: %1% method for the %2% entity can only be executed in Event Context", + "<1069>": "REP138: %1% method for the %2% entity can only be executed with a running IDE", + "<1070>": "REP139: \"%1%\" is not a valid \"%2%\" parameter for the %3% method", + "<1071>": "REP140: No LOCATION defined for the %1% entity", + "<1072>": "REP141: No AppRow passed to the %1% method for the %2% entity", + "<1073>": "REP142: Unable to resolve the \"%1%\" quick event target for the \"%2%\" %3% event", + "<1074>": "REP143: No parent ID specified for the \"%1%\" %2% method", + "<1075>": "REP144: The SYSPROG application cannot be deleted", + "<1076>": "REP145: \"%1%\" is not a valid application ID", + "<1077>": "REP190: Invalid REPFILTER definition passed to the %1% procedure", + "<1078>": "REP191: Invalid REPVIEW ID passed to the %1% procedure [%2%]", + "<1079>": "REP192: Empty REPVIEW passed to the the %1% procedure", + "<1080>": "REP200: No event found for controlid %1%, controlclass %2%, event %3%.", + "<1081>": "REP201: %1% is not a valid window name, or is not currently running.", + "<1082>": "REP300: Entity %1% does not exist.", + "<1083>": "REP303:", + "<1084>": "REP305: Window Executable %1% was not found in this application.", + "<1085>": "REP310: Compilation error: join information for table \"%1%\" has not been specified for the form.", + "<1086>": "REP311: Compilation error: The column %2% is not found in table %1%.", + "<1087>": "REP312: Compilation error: The join control %1% is not found in the form.", + "<1088>": "REP313: Menu compilation error: nesting error.", + "<1089>": "REP314: Incomplete Key: No control for key part %1%", + "<1090>": "REP315: Compilation error: Commuter Module has not been defined for the form", + "<1091>": "REP333:", + "<1092>": "REP500: Winexec Error #%1%.", + "<1093>": "REP510: The \"Date From\" cannot be after the \"Date To\".", + "<1094>": "REP700: OIEVENT must have a super-control ( entid %1%).", + "<1095>": "REP701: POEVENT need to have entitid same.", + "<1096>": "REP703: Invalid classid as token.", + "<1097>": "REP800: Entity %1% locked by another session and could not be locked.", + "<1098>": "REP801: Entity %1% is already locked by this session.", + "<1099>": "REP802: Entity %1% is checked out by %2% and could not be locked.", + "<1100>": "REP803: Entity %1% is checked out by the current user.", + "<1101>": "REP804: Remote entity %1% locked by another session and could not be locked.", + "<1102>": "REP805: Remote entity %1% is already locked by this session.", + "<1103>": "REP806: Remote entity %1% is checked out by %2% and could not be locked.", + "<1104>": "REP807: Remote entity %1% is checked out by current user.", + "<1105>": "REP900: Error creating mirror file %1%.", + "<1106>": "REP901: Error deleting mirror file %1%.", + "<1107>": "REP902: A repository mirror file exists at location %1%.", + "<1108>": "REP903: A repository mirror is already installed in this system.", + "<1109>": "REP904: A repository mirror is not installed in this system.", + "<1110>": "REP905: Row \"%1%\" shows differences.", + "<1111>": "REP906: The repository is in a state of error. Access is denied until a system administrator remedies the error condition.", + "<1112>": "REP932: There are no records meeting this criteria", + "<1113>": "REP933: The selection criteria is invalid", + "<1114>": "", + "<1115>": "RIX100: Error reading primary node for the \"%1%\" Repository Index ", + "<1116>": "RIX101: Value \"%2%\" missing from the \"%1%\" Repository Index node", + "<1117>": "", + "<1118>": "POP101: Table %1% does not exist.", + "<1119>": "POP102: Field %1% set to null when a value expected.", + "<1120>": "POP103: Invalid key %1% in table %2%.", + "<1121>": "POP104: Mode %1% is incompatible with type %2%.", + "<1122>": "POP105: Type %1% is invalid.", + "<1123>": "POP106: Mode %1% is invalid.", + "<1124>": "POP107: Dictionary does not exist for table %1%.", + "<1125>": "POP108: Non-numeric field name %1% in format argument not allowed with mode F.", + "<1126>": "POP109: Format argument not allowed to be null.", + "<1127>": "POP110: Error inserting the \"%1%\" column.", + "<1128>": "POP111: \"%1%\" is not a valid custom button procedure [%2%]", + "<1129>": "POP112: The \"%1%\" custom button procedure must accept at least one argument", + "<1130>": "POP113: \"%1%\" is not a valid initialization procedure [%2%]", + "<1131>": "POP114: The \"%1%\" initialization procedure must accept at least two arguments", + "<1132>": "", + "<1133>": "DS101: Duplicate column or argument name \"%1%\"", + "<1134>": "DS102: Invalid data type \"%1%\"", + "<1135>": "DS103: Invalid or incomplete column definition for column %1%", + "<1136>": "", + "<1137>": "MSG101: Out of memory, or could not create MSG Dialog Box.", + "<1138>": "MSG102: One or more parameters were invalid, or @fm's found in text.", + "<1139>": "", + "<1140>": "IDX101: Dictionary does not exist for table %1%.", + "<1141>": "IDX102: Table %1% does not exist.", + "<1142>": "", + "<1143>": "X100: MFS list set to null when a list expected.", + "<1144>": "X101: Invalid action code for SET_MFS.", + "<1145>": "X103: Position error for %1%.", + "<1146>": "X104: %1% does not exist in the table.", + "<1147>": "X105: %1% object code does not exist in the SYSOBJ table.", + "<1148>": "X106: %1% already exists on the table.", + "<1149>": "X107: Adding DICT.MFS to a non-dictoinary table is not allowed.", + "<1150>": "X108: Adding PROTECT.MFS to dictoinary table is not allowed.", + "<1151>": "", + "<1152>": "PING101: Error in IP Address %1%", + "<1153>": "PING104: Error - Invalid host [%1%]", + "<1154>": "PING105: Error - Destination host [%1%]", + "<1155>": "PING106: Error creating ICMP file [%1%] ", + "<1156>": "", + "<1157>": "SOCK101: Unable to create socket / detect socket layer [%1%]", + "<1158>": "SOCK102: Unable to resolve host DNS entry [%1%]", + "<1159>": "SOCK103: Couldn't get IP address type of host [%1%]", + "<1160>": "SOCK104: Couldn't create socket ", + "<1161>": "SOCK105: Unable to connect to ipaddress", + "<1162>": "SOCK106: Couldn't create server socket ", + "<1163>": "", + "<1164>": "EV100: Unknown Event Handler error", + "<1165>": "EV101: Required Error", + "<1166>": "EV102: Validation Error", + "<1167>": "EV103: Form Read Error", + "<1168>": "EV104: Form Read Sub Error", + "<1169>": "EV105: Null Key Error", + "<1170>": "EV106: Locking Error", + "<1171>": "EV107: User Cancel", + "<1172>": "EV108: Null procedure name", + "<1173>": "EV109: %1% is not a valid stored procedure name", + "<1174>": "EV110: The %1% stored procedure does not accept parameters", + "<1175>": "EV111: Null Window Name", + "<1176>": "EV112: DSN Create Error [%1%]", + "<1177>": "EV113: TPL (IDE ToolPanel) Create Error [%1%]", + "<1178>": "EV114: DSN (IDE Designer) PROPCHANGED validation error", + "<1179>": "EV115: FDS (IDE FormDes) Parser Error [%1%]", + "<1180>": "EV116: FDS (IDE FormDes) Builder Error [%1%]", + "<1181>": "EV117: DSN (IDE Designer) Write error [%1%]", + "<1182>": "EV118: DSN (IDE Designer) Test-Run error [%1%]", + "<1183>": "EV119: Invalid Property Value [%1%]", + "<1184>": "EV130: QBF Parser Error [%1%]", + "<1185>": "EV131: QBF may only be used with data-bound forms", + "<1186>": "EV132: Query By Form is not active", + "<1187>": "EV133: QBF saved list activation error [%1%]", + "<1188>": "EV134: \"%1%\" is not a valid position in the QBF result list", + "<1189>": "EV135: \"%1%\" is not a valid ID in the QBF result list", + "<1190>": "EV136: Error resetting sequential key counter [%1%]", + "<1191>": "", + "<1192>": "OS101: \"%1%\" is an invalid OS file name.", + "<1193>": "OS102: Access denied by the operating system to the \"%1%\" file.", + "<1194>": "OS103: Error in the OS file \"%1%\". Disk volume full.", + "<1195>": "OS104: The OS file \"%1%\" does not exist.", + "<1196>": "OS106: The OS file \"%1%\" is read-only.", + "<1197>": "OS107: Undefined error during a OS file operation. File: \"%1%\" - Status(): \"%2%\"", + "<1198>": "", + "<1199>": "IDXS001 IDX_SETS error: \"%1%\" [%2%]" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOS%003ASYSPROG_SRP_UTILITY__SRP_EDITOR.json b/SYSPROG/APPROW/SYSREPOS%003ASYSPROG_SRP_UTILITY__SRP_EDITOR.json new file mode 100644 index 0000000..67b8c7e --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOS%003ASYSPROG_SRP_UTILITY__SRP_EDITOR.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_UTILITY**SRP_EDITOR" + }, + "body": { + "record1": { + "<1>": "SYSPROG", + "<2>": "$PUBLIC", + "<3>": "$PUBLIC", + "<4>": "", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "0", + "<19>": "", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "SYSPROG*SRP_UTILITY**SRP_EDITOR*13200.3740625", + "<25>": "13200.3740625", + "<26>": "SYSPROG", + "<27>": "SRP Editor" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOS%003ASYSPROG_SRP_UTILITY__SRP_TABLE_SEARCH.json b/SYSPROG/APPROW/SYSREPOS%003ASYSPROG_SRP_UTILITY__SRP_TABLE_SEARCH.json new file mode 100644 index 0000000..415529d --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOS%003ASYSPROG_SRP_UTILITY__SRP_TABLE_SEARCH.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_UTILITY**SRP_TABLE_SEARCH" + }, + "body": { + "record1": { + "<1>": "SYSPROG", + "<2>": "$PUBLIC", + "<3>": "$PUBLIC", + "<4>": "", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "0", + "<19>": "", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "SYSPROG*SRP_UTILITY**SRP_TABLE_SEARCH*13200.3740625", + "<25>": "13200.3740625", + "<26>": "SYSPROG", + "<27>": "SRP Table Search" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSCLASSES%003ADATASOURCE_MVBFS.json b/SYSPROG/APPROW/SYSREPOSCLASSES%003ADATASOURCE_MVBFS.json new file mode 100644 index 0000000..d979c07 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSCLASSES%003ADATASOURCE_MVBFS.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "DATASOURCE*MVBFS" + }, + "body": { + "record1": { + "<1>": "Multivalue BFS Connections", + "<2>": "Multivalue BFS Connections", + "<3>": "", + "<4>": "", + "<5>": "0", + "<6>": "DB", + "<7>": "", + "<8>": "0", + "<9>": "", + "<10>": "SYSPROG*IMAGE*ICO*RTI_IDE_REPCLASS_DATASOURCE_MVBFS", + "<11>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_DATASOURCE_MVBFS_S", + "<12>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_DATASOURCE_MVBFS_M", + "<13>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_DATASOURCE_MVBFS", + "<14>": "0", + "<15>": "1", + "<16>": "0", + "<17>": "2", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "RTI_DSN_DATASOURCE_MVBFS", + "<22>": "SYSPROG*APPNOTE**RTI_IDE_NEW_DATASOURCE_MVBFS", + "<23>": "Multivalue DataSource", + "<24>": "", + "<25>": "", + "<26>": "E", + "<27>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSCLASSES%003AIMAGE_GIF.json b/SYSPROG/APPROW/SYSREPOSCLASSES%003AIMAGE_GIF.json new file mode 100644 index 0000000..ae527ef --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSCLASSES%003AIMAGE_GIF.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "IMAGE*GIF" + }, + "body": { + "record1": { + "<1>": "GIF Image File", + "<2>": "GIF Image Files", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "IMAGES", + "<7>": "", + "<8>": "0", + "<9>": "GIF Files (*.gif)/*.gif/All Files (*.*)/*.*/", + "<10>": "SYSPROG*IMAGE*ICO*RTI_IDE_REPCLASS_IMAGE_GIF", + "<11>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_IMAGE_GIF_S", + "<12>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_IMAGE_GIF_M", + "<13>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_IMAGE_GIF", + "<14>": "1", + "<15>": "0", + "<16>": "2", + "<17>": "2", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "SYSPROG*APPNOTE**RTI_IDE_NEW_IMAGE_GIF", + "<23>": "GIF Image File", + "<24>": "<@class>", + "<25>": "", + "<26>": "", + "<27>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSCLASSES%003AIMAGE_JPG.json b/SYSPROG/APPROW/SYSREPOSCLASSES%003AIMAGE_JPG.json new file mode 100644 index 0000000..05a3dc3 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSCLASSES%003AIMAGE_JPG.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "IMAGE*JPG" + }, + "body": { + "record1": { + "<1>": "JPeg Image File", + "<2>": "JPeg Image Files", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "IMAGES", + "<7>": "", + "<8>": "0", + "<9>": "JPeg Files (*.jpg,*jpeg,*.jpe)/*.jpg;*jpeg;*.jpe/All Files (*.*)/*.*/", + "<10>": "SYSPROG*IMAGE*ICO*RTI_IDE_REPCLASS_IMAGE_JPG", + "<11>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_IMAGE_JPG_S", + "<12>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_IMAGE_JPG_M", + "<13>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_IMAGE_JPG", + "<14>": "1", + "<15>": "0", + "<16>": "2", + "<17>": "2", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "SYSPROG*APPNOTE**RTI_IDE_NEW_IMAGE_JPG", + "<23>": "JPeg Image File", + "<24>": "<@class>", + "<25>": "", + "<26>": "", + "<27>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSCLASSES%003AIMAGE_PNG.json b/SYSPROG/APPROW/SYSREPOSCLASSES%003AIMAGE_PNG.json new file mode 100644 index 0000000..4637310 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSCLASSES%003AIMAGE_PNG.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "IMAGE*PNG" + }, + "body": { + "record1": { + "<1>": "PNG Image File", + "<2>": "PNG Image Files", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "IMAGES", + "<7>": "", + "<8>": "0", + "<9>": "PNG Files (*.png)/*.png/All Files (*.*)/*.*/", + "<10>": "SYSPROG*IMAGE*ICO*RTI_IDE_REPCLASS_IMAGE_PNG", + "<11>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_IMAGE_PNG_S", + "<12>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_IMAGE_PNG_M", + "<13>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_IMAGE_PNG", + "<14>": "1", + "<15>": "0", + "<16>": "2", + "<17>": "2", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "SYSPROG*APPNOTE**RTI_IDE_NEW_IMAGE_PNG", + "<23>": "PNG Image File", + "<24>": "<@class>", + "<25>": "", + "<26>": "", + "<27>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSCLASSES%003AOIREPORT_RBAND.json b/SYSPROG/APPROW/SYSREPOSCLASSES%003AOIREPORT_RBAND.json new file mode 100644 index 0000000..e1ed7a4 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSCLASSES%003AOIREPORT_RBAND.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "OIREPORT*RBAND" + }, + "body": { + "record1": { + "<1>": "R/Band Reports", + "<2>": "R/Band Reports", + "<3>": "", + "<4>": "SYSREPOSREPORTS", + "<5>": "", + "<6>": "", + "<7>": "", + "<8>": "", + "<9>": "", + "<10>": "SYSPROG*IMAGE*ICO*RTI_IDE_REPCLASS_OIREPORT_RBAND", + "<11>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_OIREPORT_RBAND_S", + "<12>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_OIREPORT_RBAND_M", + "<13>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPCLASS_OIREPORT_RBAND", + "<14>": "0", + "<15>": "1", + "<16>": "0", + "<17>": "2", + "<18>": "", + "<19>": "", + "<20>": "Reports", + "<21>": "RTI_DSN_RBAND", + "<22>": "SYSPROG*APPNOTE**RTI_IDE_NEW_OIREPORT_RBAND", + "<23>": "R/Band Report", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSEVENTEXES%003ASYSPROG_GETMINMAXINFO..OIWIN_.json b/SYSPROG/APPROW/SYSREPOSEVENTEXES%003ASYSPROG_GETMINMAXINFO..OIWIN_.json new file mode 100644 index 0000000..81743c9 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSEVENTEXES%003ASYSPROG_GETMINMAXINFO..OIWIN_.json @@ -0,0 +1,20 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*GETMINMAXINFO..OIWIN*" + }, + "body": { + "record1": { + "<1>": "\u0000\u0006\u0000\u0006\u0000'\u0000=\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0001èéêëìí€\u0001A\u0006¹)¸\u0000\u0001t\u0016SRP_PROCESS_MINMAXINFO\u0002\u0006\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0000\u0000\u0018\u0000SYSPROG", + "<2>": { + "<2,1>": "13430.43894675930\u0000CtrlEntId", + "<2,2>": "CtrlClassId", + "<2,3>": "hWnd", + "<2,4>": "Message", + "<2,5>": "wParam", + "<2,6>": "lParam" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSEVENTEXES%003ASYSPROG_SRP_ONSYSCOLORCHANGE..OIWIN_.json b/SYSPROG/APPROW/SYSREPOSEVENTEXES%003ASYSPROG_SRP_ONSYSCOLORCHANGE..OIWIN_.json new file mode 100644 index 0000000..9a8fc60 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSEVENTEXES%003ASYSPROG_SRP_ONSYSCOLORCHANGE..OIWIN_.json @@ -0,0 +1,20 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_ONSYSCOLORCHANGE..OIWIN*" + }, + "body": { + "record1": { + "<1>": "\u0000\u0006\u0000\u0006\u0000'\u0000C\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0001èéêëìí€\u0001A\u0006¹)¸\u0000\u0001t\u001cSRP_PROCESS_ONSYSCOLORCHANGE\u0002\u0006\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0001\u0000\u0000\u0018\u0000SYSPROG", + "<2>": { + "<2,1>": "13431.65938657410\u0000CtrlEntId", + "<2,2>": "CtrlClassId", + "<2,3>": "hWnd", + "<2,4>": "Message", + "<2,5>": "wParam", + "<2,6>": "lParam" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_EDITOR.json b/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_EDITOR.json new file mode 100644 index 0000000..900466d --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_EDITOR.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_EDITOR" + }, + "body": { + "record1": { + "<1>": "SRP Editor", + "<2>": "All Components needed to run the SRP Editor.", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "SRP_EDITOR", + "<7>": "2", + "<8>": "", + "<9>": "0", + "<10>": "C:\\Users\\Danimals\\Dropbox (SRP)\\SRP Team Folder\\SRP Editor\\3.0.1\\Final", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "18481", + "<20>": "1", + "<21>": "SYSPROG", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": { + "<31,1>": "", + "<31,2>": "", + "<31,3>": "", + "<31,4>": "", + "<31,5>": "", + "<31,6>": "", + "<31,7>": "", + "<31,8>": "", + "<31,9>": "", + "<31,10>": "", + "<31,11>": "", + "<31,12>": "", + "<31,13>": "", + "<31,14>": "", + "<31,15>": "" + }, + "<32>": { + "<32,1>": "", + "<32,2>": "", + "<32,3>": "", + "<32,4>": "", + "<32,5>": "", + "<32,6>": "", + "<32,7>": "", + "<32,8>": "", + "<32,9>": "", + "<32,10>": "", + "<32,11>": "", + "<32,12>": "", + "<32,13>": "", + "<32,14>": "", + "<32,15>": "" + }, + "<33>": "3.0.1", + "<34>": "01 Mar 2019", + "<35>": "", + "<36>": "0", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "0", + "<44>": "", + "<45>": "", + "<46>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_MAIL_RDK.json b/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_MAIL_RDK.json new file mode 100644 index 0000000..97b4180 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_MAIL_RDK.json @@ -0,0 +1,88 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_MAIL_RDK" + }, + "body": { + "record1": { + "<1>": "SRP Mail RDK", + "<2>": "", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "SRP_MAIL_RDK", + "<7>": "2", + "<8>": "", + "<9>": "0", + "<10>": "W:\\RDK\\SRP_Mail_RDK", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "17252", + "<20>": "1", + "<21>": "SYSPROG", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": { + "<31,1>": "", + "<31,2>": "", + "<31,3>": "", + "<31,4>": "", + "<31,5>": "", + "<31,6>": "", + "<31,7>": "", + "<31,8>": "", + "<31,9>": "", + "<31,10>": "", + "<31,11>": "", + "<31,12>": "", + "<31,13>": "", + "<31,14>": "", + "<31,15>": "" + }, + "<32>": { + "<32,1>": "", + "<32,2>": "", + "<32,3>": "", + "<32,4>": "", + "<32,5>": "", + "<32,6>": "", + "<32,7>": "", + "<32,8>": "", + "<32,9>": "", + "<32,10>": "", + "<32,11>": "", + "<32,12>": "", + "<32,13>": "", + "<32,14>": "", + "<32,15>": "" + }, + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "0", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "0", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_TABLE_SEARCH.json b/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_TABLE_SEARCH.json new file mode 100644 index 0000000..9d431a5 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_TABLE_SEARCH.json @@ -0,0 +1,79 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_TABLE_SEARCH" + }, + "body": { + "record1": { + "<1>": "SRP_TABLE_SEARCH", + "<2>": "Contains all entities to the SRP_TABLE_SEARCH utility including an entity reference to the RDK itself.", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "SRP_TABLE_SEARCH", + "<7>": "2", + "<8>": "", + "<9>": "0", + "<10>": "W:\\RDK\\SRP_Table_Search_RDK", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": { + "<31,1>": "", + "<31,2>": "", + "<31,3>": "", + "<31,4>": "", + "<31,5>": "", + "<31,6>": "", + "<31,7>": "", + "<31,8>": "", + "<31,9>": "", + "<31,10>": "", + "<31,11>": "", + "<31,12>": "", + "<31,13>": "", + "<31,14>": "", + "<31,15>": "" + }, + "<32>": { + "<32,1>": "", + "<32,2>": "", + "<32,3>": "", + "<32,4>": "", + "<32,5>": "", + "<32,6>": "", + "<32,7>": "", + "<32,8>": "", + "<32,9>": "", + "<32,10>": "", + "<32,11>": "", + "<32,12>": "", + "<32,13>": "", + "<32,14>": "", + "<32,15>": "" + }, + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_TCL.json b/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_TCL.json new file mode 100644 index 0000000..5735ebe --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_TCL.json @@ -0,0 +1,87 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_TCL" + }, + "body": { + "record1": { + "<1>": "SRP TCL Suite", + "<2>": { + "<2,1>": { + "<2,1,1>": { + "<2,1,1,1>": "Contains the SRP TCL plugin suite: SRP_TCL_Processor, SRP_TCL_Save_Command_List, and SRP_TCL_Load_Command_List", + "<2,1,1,2>": "Contains default commands: ATTACH, CLEAR, WINDOW", + "<2,1,1,3>": "Contains default aliases: ATTACHTABLE, ATTACHFILE, ATTACH_FILE, CLEARTABLE, CLEARFILE, CLEAR_FILE" + } + } + }, + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "SRP_TCL", + "<7>": "2", + "<8>": "", + "<9>": "0", + "<10>": "W:\\RDK\\SRP_TCL_RDK", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": "", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": { + "<31,1>": "", + "<31,2>": "", + "<31,3>": "", + "<31,4>": "", + "<31,5>": "", + "<31,6>": "", + "<31,7>": "", + "<31,8>": "", + "<31,9>": "", + "<31,10>": "", + "<31,11>": "", + "<31,12>": "", + "<31,13>": "", + "<31,14>": "", + "<31,15>": "" + }, + "<32>": { + "<32,1>": "", + "<32,2>": "", + "<32,3>": "", + "<32,4>": "", + "<32,5>": "", + "<32,6>": "", + "<32,7>": "", + "<32,8>": "", + "<32,9>": "", + "<32,10>": "", + "<32,11>": "", + "<32,12>": "", + "<32,13>": "", + "<32,14>": "", + "<32,15>": "" + }, + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_UTILITIES.json b/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_UTILITIES.json new file mode 100644 index 0000000..6c94b6d --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSRELEASES%003ASYSPROG_SRP_UTILITIES.json @@ -0,0 +1,113 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_UTILITIES" + }, + "body": { + "record1": { + "<1>": "SRP Utilities", + "<2>": "", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "SRP_UTILITIES", + "<7>": "2", + "<8>": "", + "<9>": "0", + "<10>": "W:\\RDK\\SRP_Utilities_RDK", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "", + "<16>": "", + "<17>": "", + "<18>": "", + "<19>": { + "<19,1>": "19009", + "<19,2>": "19009", + "<19,3>": "19009", + "<19,4>": "19009", + "<19,5>": "19009" + }, + "<20>": { + "<20,1>": "0", + "<20,2>": "0", + "<20,3>": "0", + "<20,4>": "0", + "<20,5>": "0" + }, + "<21>": { + "<21,1>": "SYSPROG", + "<21,2>": "SYSPROG", + "<21,3>": "SYSPROG", + "<21,4>": "SYSPROG", + "<21,5>": "SYSPROG" + }, + "<22>": { + "<22,1>": "", + "<22,2>": "", + "<22,3>": "", + "<22,4>": "", + "<22,5>": "" + }, + "<23>": "3", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": { + "<31,1>": "", + "<31,2>": "", + "<31,3>": "", + "<31,4>": "", + "<31,5>": "", + "<31,6>": "", + "<31,7>": "", + "<31,8>": "", + "<31,9>": "", + "<31,10>": "", + "<31,11>": "", + "<31,12>": "", + "<31,13>": "", + "<31,14>": "", + "<31,15>": "" + }, + "<32>": { + "<32,1>": "", + "<32,2>": "", + "<32,3>": "", + "<32,4>": "", + "<32,5>": "", + "<32,6>": "", + "<32,7>": "", + "<32,8>": "", + "<32,9>": "", + "<32,10>": "", + "<32,11>": "", + "<32,12>": "", + "<32,13>": "", + "<32,14>": "", + "<32,15>": "" + }, + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "0", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "0", + "<44>": "", + "<45>": "", + "<46>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSSTORAGE%003ASRP.json b/SYSPROG/APPROW/SYSREPOSSTORAGE%003ASRP.json new file mode 100644 index 0000000..1b93da0 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSSTORAGE%003ASRP.json @@ -0,0 +1,25 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP" + }, + "body": { + "record1": { + "<1>": "SRP", + "<2>": "-10", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": { + "<6,1>": { + "<6,1,1>": "SRP_FAMILY", + "<6,1,2>": "SRP_UTILITY" + } + }, + "<7>": "", + "<8>": "", + "<9>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSTYPEFAMILIES%003ASRP_FAMILY.json b/SYSPROG/APPROW/SYSREPOSTYPEFAMILIES%003ASRP_FAMILY.json new file mode 100644 index 0000000..716ee39 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSTYPEFAMILIES%003ASRP_FAMILY.json @@ -0,0 +1,12 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_FAMILY" + }, + "body": { + "record1": { + "<1>": "SRP Computer Solutions, Inc." + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSTYPES%003AAPPROW.json b/SYSPROG/APPROW/SYSREPOSTYPES%003AAPPROW.json new file mode 100644 index 0000000..cda4b5b --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSTYPES%003AAPPROW.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "APPROW" + }, + "body": { + "record1": { + "<1>": "APPROW", + "<2>": "", + "<3>": "", + "<4>": "", + "<5>": "", + "<6>": "", + "<7>": "DB", + "<8>": "", + "<9>": "", + "<10>": "SYSPROG*IMAGE*ICO*RTI_IDE_REPTYPE_APPROW", + "<11>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_APPROW_S", + "<12>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_APPROW_M", + "<13>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_APPROW", + "<14>": "0", + "<15>": "1", + "<16>": "0", + "<17>": "2", + "<18>": "OI", + "<19>": "0", + "<20>": "", + "<21>": "RTI_DSN_RECORD", + "<22>": "SYSPROG*APPNOTE**RTI_IDE_NEW_APPROW", + "<23>": "Application Row", + "<24>": "", + "<25>": "0", + "<26>": "ACE", + "<27>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSTYPES%003AIMAGE.json b/SYSPROG/APPROW/SYSREPOSTYPES%003AIMAGE.json new file mode 100644 index 0000000..96c28d4 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSTYPES%003AIMAGE.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "IMAGE" + }, + "body": { + "record1": { + "<1>": "Images", + "<2>": "Image file definitions", + "<3>": "", + "<4>": "", + "<5>": "1", + "<6>": "GENERAL", + "<7>": "IMAGES", + "<8>": "0", + "<9>": "", + "<10>": "SYSPROG*IMAGE*ICO*RTI_IDE_REPTYPE_IMAGE", + "<11>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_IMAGE_S", + "<12>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_IMAGE_M", + "<13>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_IMAGE", + "<14>": "1", + "<15>": "0", + "<16>": "2", + "<17>": "2", + "<18>": "OS", + "<19>": "0", + "<20>": "", + "<21>": "RTI_DSN_IMAGE", + "<22>": "SYSPROG*APPNOTE**RTI_IDE_NEW_IMAGE", + "<23>": "Image", + "<24>": "", + "<25>": "1", + "<26>": "OS", + "<27>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSTYPES%003AIMAGELIST.json b/SYSPROG/APPROW/SYSREPOSTYPES%003AIMAGELIST.json new file mode 100644 index 0000000..80a1c7b --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSTYPES%003AIMAGELIST.json @@ -0,0 +1,38 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "IMAGELIST" + }, + "body": { + "record1": { + "<1>": "ImageLists", + "<2>": "ImageList file definitions", + "<3>": "", + "<4>": "", + "<5>": "1", + "<6>": "GENERAL", + "<7>": "IMAGES", + "<8>": "0", + "<9>": "", + "<10>": "SYSPROG*IMAGE*ICO*RTI_IDE_REPTYPE_IMAGELIST", + "<11>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_IMAGELIST_S", + "<12>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_IMAGELIST_M", + "<13>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_IMAGELIST", + "<14>": "1", + "<15>": "0", + "<16>": "2", + "<17>": "2", + "<18>": "OS", + "<19>": "0", + "<20>": "", + "<21>": "RTI_DSN_IMAGELIST", + "<22>": "SYSPROG*APPNOTE**RTI_IDE_NEW_IMAGELIST", + "<23>": "ImageList", + "<24>": "", + "<25>": "1", + "<26>": "OS", + "<27>": "1" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSTYPES%003ASRP_UTILITY.json b/SYSPROG/APPROW/SYSREPOSTYPES%003ASRP_UTILITY.json new file mode 100644 index 0000000..1773f78 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSTYPES%003ASRP_UTILITY.json @@ -0,0 +1,24 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SRP_UTILITY" + }, + "body": { + "record1": { + "<1>": "SRP Utilities", + "<2>": "This is an SRP Custom Utility; double-click to execute", + "<3>": { + "<3,1>": "EXECUTE", + "<3,2>": "DESIGN", + "<3,3>": "DESTROY", + "<3,4>": "NEW", + "<3,5>": "WRITE" + }, + "<4>": "", + "<5>": "", + "<6>": "OI", + "<7>": "OIEXEC" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_EDITOR.json b/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_EDITOR.json new file mode 100644 index 0000000..8c72e74 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_EDITOR.json @@ -0,0 +1,295 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_EDITOR" + }, + "body": { + "record1": { + "<1>": "SRP Editor", + "<2>": "This RDK contains the object code needed to run the SRP Editory utility.", + "<3>": "", + "<4>": "SYSPROG", + "<5>": "", + "<6>": "", + "<7>": { + "<7,1>": "SYSPROG", + "<7,2>": "SYSPROG", + "<7,3>": "SYSPROG", + "<7,4>": "SYSPROG", + "<7,5>": "SYSPROG", + "<7,6>": "SYSPROG", + "<7,7>": "SYSPROG", + "<7,8>": "SYSPROG", + "<7,9>": "SYSPROG", + "<7,10>": "SYSPROG", + "<7,11>": "SYSPROG", + "<7,12>": "SYSPROG", + "<7,13>": "SYSPROG", + "<7,14>": "SYSPROG", + "<7,15>": "SYSPROG", + "<7,16>": "SYSPROG", + "<7,17>": "SYSPROG", + "<7,18>": "SYSPROG", + "<7,19>": "SYSPROG", + "<7,20>": "SYSPROG", + "<7,21>": "SYSPROG", + "<7,22>": "SYSPROG", + "<7,23>": "SYSPROG", + "<7,24>": "SYSPROG", + "<7,25>": "SYSPROG", + "<7,26>": "SYSPROG", + "<7,27>": "SYSPROG", + "<7,28>": "SYSPROG", + "<7,29>": "SYSPROG", + "<7,30>": "SYSPROG", + "<7,31>": "SYSPROG", + "<7,32>": "SYSPROG", + "<7,33>": "SYSPROG", + "<7,34>": "SYSPROG", + "<7,35>": "SYSPROG", + "<7,36>": "SYSPROG", + "<7,37>": "SYSPROG", + "<7,38>": "SYSPROG", + "<7,39>": "SYSPROG", + "<7,40>": "SYSPROG", + "<7,41>": "SYSPROG", + "<7,42>": "SYSPROG", + "<7,43>": "SYSPROG", + "<7,44>": "SYSPROG", + "<7,45>": "SYSPROG", + "<7,46>": "SYSPROG", + "<7,47>": "SYSPROG", + "<7,48>": "SYSPROG", + "<7,49>": "SYSPROG", + "<7,50>": "SYSPROG", + "<7,51>": "SYSPROG", + "<7,52>": "SYSPROG", + "<7,53>": "SYSPROG", + "<7,54>": "SYSPROG", + "<7,55>": "SYSPROG", + "<7,56>": "SYSPROG", + "<7,57>": "SYSPROG", + "<7,58>": "SYSPROG", + "<7,59>": "SYSPROG", + "<7,60>": "SYSPROG", + "<7,61>": "SYSPROG", + "<7,62>": "SYSPROG", + "<7,63>": "SYSPROG", + "<7,64>": "SYSPROG", + "<7,65>": "SYSPROG", + "<7,66>": "SYSPROG", + "<7,67>": "SYSPROG", + "<7,68>": "SYSPROG", + "<7,69>": "SYSPROG", + "<7,70>": "SYSPROG", + "<7,71>": "", + "<7,72>": "SYSPROG", + "<7,73>": "SYSPROG", + "<7,74>": "SYSPROG", + "<7,75>": "SYSPROG", + "<7,76>": "SYSPROG" + }, + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": { + "<11,1>": "Application Rows", + "<11,2>": "3-3:MD:REPOS.OIWIN..TCOMPILE", + "<11,3>": "3-3:MD:SRP_EDITOR_TCOMPILE_REDIRECT", + "<11,4>": "3-3:SYSDICT:%SRP_TCLALIAS_TEMPLATE%", + "<11,5>": "3-3:SYSDICT:%SRP_TCLCMD_TEMPLATE%", + "<11,6>": "3-3:SYSENV:SRP_EDITOR_COPY_BOARDS_PREFIX", + "<11,7>": "3-3:SYSENV:SRP_EDITOR_COPY_BOARDS_SUFFIX", + "<11,8>": "3-3:SYSENV:SRP_EDITOR_COPY_HTML_PREFIX", + "<11,9>": "3-3:SYSENV:SRP_EDITOR_COPY_HTML_SUFFIX", + "<11,10>": "3-3:SYSENV:SRP_EDITOR_HELPFILES", + "<11,11>": "3-3:SYSENV:SRP_EDITOR_HISTORY", + "<11,12>": "3-3:SYSENV:SRP_EDITOR_THEME_BESPIN", + "<11,13>": "3-3:SYSENV:SRP_EDITOR_THEME_BLACK BOARD", + "<11,14>": "3-3:SYSENV:SRP_EDITOR_THEME_CHOCO", + "<11,15>": "3-3:SYSENV:SRP_EDITOR_THEME_DARK BLUE", + "<11,16>": "3-3:SYSENV:SRP_EDITOR_THEME_DEEP BLACK", + "<11,17>": "3-3:SYSENV:SRP_EDITOR_THEME_DEFAULT", + "<11,18>": "3-3:SYSENV:SRP_EDITOR_THEME_HOT FUDGE SUNDAE", + "<11,19>": "3-3:SYSENV:SRP_EDITOR_THEME_JOKER", + "<11,20>": "3-3:SYSENV:SRP_EDITOR_THEME_KHAKI", + "<11,21>": "3-3:SYSENV:SRP_EDITOR_THEME_MONO INDUSTRIAL", + "<11,22>": "3-3:SYSENV:SRP_EDITOR_THEME_MONOKAI", + "<11,23>": "3-3:SYSENV:SRP_EDITOR_THEME_NAVAJO", + "<11,24>": "3-3:SYSENV:SRP_EDITOR_THEME_OBSIDIAN", + "<11,25>": "3-3:SYSENV:SRP_EDITOR_THEME_PLASTIC CODE WRAP", + "<11,26>": "3-3:SYSENV:SRP_EDITOR_THEME_SOLARIZED DARK", + "<11,27>": "3-3:SYSENV:SRP_EDITOR_THEME_SOLARIZED LIGHT", + "<11,28>": "3-3:SYSENV:SRP_EDITOR_THEME_TWILIGHT", + "<11,29>": "3-3:SYSENV:SRP_EDITOR_THEME_VIBRANT INK", + "<11,30>": "3-3:SYSENV:SRP_EDITOR_THEME_VISUAL STUDIO DARK", + "<11,31>": "3-3:SYSENV:SRP_EDITOR_THEME_ZENBURN", + "<11,32>": "3-3:SYSENV:SRP_EDITOR_VERSION", + "<11,33>": "3-3:SYSOBJ:$RDKMODULEINSTALL_7.0", + "<11,34>": "3-3:SYSOBJ:$RDKMODULEINSTALL_7.1", + "<11,35>": "3-3:SYSOBJ:$RDKMODULEINSTALL_7.2", + "<11,36>": "3-3:SYSOBJ:$RDKMODULEINSTALL_8.0", + "<11,37>": "3-3:SYSPROCS:DLL_KERNEL32_SRP", + "<11,38>": "3-3:SYSREPOS:SYSPROG_SRP_UTILITY__SRP_EDITOR", + "<11,39>": "3-3:SYSREPOSRELEASES:SYSPROG_SRP_EDITOR", + "<11,40>": "3-3:SYSREPOSRELEASES:SYSPROG_SRP_TCL", + "<11,41>": "3-3:SYSREPOSSTORAGE:SRP", + "<11,42>": "3-3:SYSREPOSTYPEFAMILIES:SRP_FAMILY", + "<11,43>": "3-3:SYSREPOSTYPES:SRP_UTILITY", + "<11,44>": "3-3:SYSREPOSVIEWS:SYSPROG_SRP_EDITOR", + "<11,45>": "3-3:SYSREPOSVIEWS:SYSPROG_SRP_TCL", + "<11,46>": "3-3:SYSREPOSWINEXES:SYSPROG__SRP_EDITOR_NEW_ITEM", + "<11,47>": "Documents", + "<11,48>": "2-2:HTML", + "<11,49>": "3-3:DM_EDITOR_NOINFO", + "<11,50>": "3-3:SRP_EDITOR_NOINFO", + "<11,51>": "Images", + "<11,52>": "2-2:BMP", + "<11,53>": "3-3:DM_EDITOR_WATERMARK", + "<11,54>": "3-3:SRPEDITORSTATUSICONS", + "<11,55>": "3-3:SRP_EDITOR_BLUE_FADE", + "<11,56>": "3-3:SRP_EDITOR_RED_FADE", + "<11,57>": "3-3:SRP_EDITOR_WATERMARK", + "<11,58>": "2-2:ICO", + "<11,59>": "3-3:SRPEDITOR", + "<11,60>": "3-3:SRPEDITORDOS", + "<11,61>": "3-3:SRPEDITORINFO", + "<11,62>": "3-3:SRPEDITORINSERT", + "<11,63>": "3-3:SRPEDITORPROC", + "<11,64>": "3-3:SRPEDITORRECORD", + "<11,65>": "3-3:SRPEDITORTITLE", + "<11,66>": "OpenInsight Event Executables", + "<11,67>": "2-2:CLOSE", + "<11,68>": "3-3:SRP_EDITOR.", + "<11,69>": "3-3:SRP_EDITOR_CHILD.", + "<11,70>": "3-3:SRP_EDITOR_VIEWER.", + "<11,71>": "OpenInsight Form Executables", + "<11,72>": "3-3:SRP_EDITOR", + "<11,73>": "3-3:SRP_EDITOR_ABOUT", + "<11,74>": "3-3:SRP_EDITOR_CHILD", + "<11,75>": "3-3:SRP_EDITOR_CONVERT_DLG", + "<11,76>": "3-3:SRP_EDITOR_FIND_DLG", + "<11,77>": "3-3:SRP_EDITOR_GOTOLINE_DLG", + "<11,78>": "3-3:SRP_EDITOR_NEW_ITEM", + "<11,79>": "3-3:SRP_EDITOR_OPEN_ENTITY", + "<11,80>": "3-3:SRP_EDITOR_OPEN_RECORD", + "<11,81>": "3-3:SRP_EDITOR_OPEN_TEMPLATE", + "<11,82>": "3-3:SRP_EDITOR_OPTION_DLG", + "<11,83>": "3-3:SRP_EDITOR_PRINT_DLG", + "<11,84>": "3-3:SRP_EDITOR_RDK_DLG", + "<11,85>": "3-3:SRP_EDITOR_REPLACE_DLG", + "<11,86>": "3-3:SRP_EDITOR_RUN_DLG", + "<11,87>": "3-3:SRP_EDITOR_SELECT_WINDOW", + "<11,88>": "3-3:SRP_EDITOR_U2_OPTION_DLG", + "<11,89>": "3-3:SRP_EDITOR_VIEWER", + "<11,90>": "Operating System Files", + "<11,91>": "3-3:SRPACTIVEXINFO", + "<11,92>": "3-3:SRPEDITORIMAGES", + "<11,93>": "Stored Procedure Executables", + "<11,94>": "3-3:REPOS.SRP_UTILITY..DESIGN", + "<11,95>": "3-3:REPOS.SRP_UTILITY..EXECUTE", + "<11,96>": "3-3:SETWINDOWPOS", + "<11,97>": "3-3:SRPREDRAWWINDOW", + "<11,98>": "3-3:SRPREGCLOSEKEY", + "<11,99>": "3-3:SRPREGCREATEKEY", + "<11,100>": "3-3:SRPREGENUMVALUE", + "<11,101>": "3-3:SRPREGOPENKEY", + "<11,102>": "3-3:SRPREGQUERYVALUE", + "<11,103>": "3-3:SRPREGQUERYVALUEDEFAULT", + "<11,104>": "3-3:SRPREGSETVALUE", + "<11,105>": "3-3:SRPWINAPI_COPYFILE", + "<11,106>": "3-3:SRP_EDITOR_ABOUT_EVENTS", + "<11,107>": "3-3:SRP_EDITOR_ACTIVE_SERVICES", + "<11,108>": "3-3:SRP_EDITOR_CHILD_EVENTS", + "<11,109>": "3-3:SRP_EDITOR_COMPILE", + "<11,110>": "3-3:SRP_EDITOR_COMPILE_DLL", + "<11,111>": "3-3:SRP_EDITOR_COMPILE_UNIVERSE", + "<11,112>": "3-3:SRP_EDITOR_CONVERT_DLG_EVENTS", + "<11,113>": "3-3:SRP_EDITOR_DOCUMENT_SERVICES", + "<11,114>": "3-3:SRP_EDITOR_EVENTS", + "<11,115>": "3-3:SRP_EDITOR_FAVORITES_SERVICES", + "<11,116>": "3-3:SRP_EDITOR_FIND_DLG_EVENTS", + "<11,117>": "3-3:SRP_EDITOR_FORMAT", + "<11,118>": "3-3:SRP_EDITOR_GET_BFS_TYPES", + "<11,119>": "3-3:SRP_EDITOR_GET_SPECIAL_FOLDER", + "<11,120>": "3-3:SRP_EDITOR_GOTOLINE_DLG_EVENTS", + "<11,121>": "3-3:SRP_EDITOR_HTMLHELP_POINTER", + "<11,122>": "3-3:SRP_EDITOR_HTMLHELP_STRING", + "<11,123>": "3-3:SRP_EDITOR_JUSTIFYARRAY_SERVICES", + "<11,124>": "3-3:SRP_EDITOR_KEYBOARDEVENT", + "<11,125>": "3-3:SRP_EDITOR_METADATA_SERVICES", + "<11,126>": "3-3:SRP_EDITOR_NEW_ITEM_EVENTS", + "<11,127>": "3-3:SRP_EDITOR_OPEN", + "<11,128>": "3-3:SRP_EDITOR_OPEN_ENTITY_EVENTS", + "<11,129>": "3-3:SRP_EDITOR_OPEN_RECORD_EVENTS", + "<11,130>": "3-3:SRP_EDITOR_OPEN_TEMPLATE_EVENTS", + "<11,131>": "3-3:SRP_EDITOR_OPTION_DLG_EVENTS", + "<11,132>": "3-3:SRP_EDITOR_PARSE", + "<11,133>": "3-3:SRP_EDITOR_POSTCOMPILE", + "<11,134>": "3-3:SRP_EDITOR_PRINT_DLG_EVENTS", + "<11,135>": "3-3:SRP_EDITOR_RDK_DLG_EVENTS", + "<11,136>": "3-3:SRP_EDITOR_REPLACE_DLG_EVENTS", + "<11,137>": "3-3:SRP_EDITOR_RUN_DLG_EVENTS", + "<11,138>": "3-3:SRP_EDITOR_SELECT_PROCEDURES", + "<11,139>": "3-3:SRP_EDITOR_SELECT_WINDOW_EVENTS", + "<11,140>": "3-3:SRP_EDITOR_SEND_INFO", + "<11,141>": "3-3:SRP_EDITOR_SHELLEXECUTE", + "<11,142>": "3-3:SRP_EDITOR_STATUS_SERVICES", + "<11,143>": "3-3:SRP_EDITOR_SUB", + "<11,144>": "3-3:SRP_EDITOR_TCOMPILE_LISTENER", + "<11,145>": "3-3:SRP_EDITOR_TRIM", + "<11,146>": "3-3:SRP_EDITOR_U2_GET_REAL_TABLE_NAME", + "<11,147>": "3-3:SRP_EDITOR_U2_GET_VOLUMEID", + "<11,148>": "3-3:SRP_EDITOR_U2_OPTION_DLG_EVENTS", + "<11,149>": "3-3:SRP_EDITOR_U2_SELECT_CODE_UTILITY", + "<11,150>": "3-3:SRP_EDITOR_UI_SERVICES", + "<11,151>": "3-3:SRP_EDITOR_UNITTEST_SERVICES", + "<11,152>": "3-3:SRP_EDITOR_UTILITY", + "<11,153>": "3-3:SRP_EDITOR_VIEWER_EVENTS", + "<11,154>": "3-3:SRP_EDITOR_VPRENDER", + "<11,155>": "3-3:SRP_FORM_FIX", + "<11,156>": "3-3:SRP_PRECOMPILER", + "<11,157>": "3-3:SRP_SET_PROPERTY", + "<11,158>": "3-3:SRP_SET_PROP_ARRAY", + "<11,159>": "3-3:SRP_TCLALIAS_ATTACHFILE", + "<11,160>": "3-3:SRP_TCLALIAS_ATTACHTABLE", + "<11,161>": "3-3:SRP_TCLALIAS_ATTACH_FILE", + "<11,162>": "3-3:SRP_TCLALIAS_CLEARFILE", + "<11,163>": "3-3:SRP_TCLALIAS_CLEARTABLE", + "<11,164>": "3-3:SRP_TCLALIAS_CLEAR_FILE", + "<11,165>": "3-3:SRP_TCLALIAS_COPY", + "<11,166>": "3-3:SRP_TCLALIAS_COPY_ROW", + "<11,167>": "3-3:SRP_TCLCMD_ATTACH", + "<11,168>": "3-3:SRP_TCLCMD_CLEAR", + "<11,169>": "3-3:SRP_TCLCMD_COPYROW", + "<11,170>": "3-3:SRP_TCLCMD_CREATETABLE", + "<11,171>": "3-3:SRP_TCLCMD_DELETEROW", + "<11,172>": "3-3:SRP_TCLCMD_DELETETABLE", + "<11,173>": "3-3:SRP_TCLCMD_DETACH", + "<11,174>": "3-3:SRP_TCLCMD_EDIT", + "<11,175>": "3-3:SRP_TCLCMD_EXPLORE", + "<11,176>": "3-3:SRP_TCLCMD_HISTORY", + "<11,177>": "3-3:SRP_TCLCMD_LIST", + "<11,178>": "3-3:SRP_TCLCMD_LISTTABLES", + "<11,179>": "3-3:SRP_TCLCMD_LISTVOLUMES", + "<11,180>": "3-3:SRP_TCLCMD_RDK", + "<11,181>": "3-3:SRP_TCLCMD_SELECT", + "<11,182>": "3-3:SRP_TCLCMD_UPDATEINDEX", + "<11,183>": "3-3:SRP_TCLCMD_WINDOW", + "<11,184>": "3-3:SRP_TCL_FORMAT_HELP", + "<11,185>": "3-3:SRP_TCL_FORMAT_SYNTAX", + "<11,186>": "3-3:SRP_TCL_LOAD_COMMAND_LIST", + "<11,187>": "3-3:SRP_TCL_PROCESSOR", + "<11,188>": "3-3:SRP_TCL_SAVE_COMMAND_LIST", + "<11,189>": "Stored Procedure Inserts", + "<11,190>": "3-3:SRP_TCL_EQUATES", + "<11,191>": "Stored Procedures", + "<11,192>": "3-3:SRP_SET_PROPERTY", + "<11,193>": "3-3:SRP_SET_PROP_ARRAY", + "<11,194>": "Windows Help Files", + "<11,195>": "3-3:OLE_HELP" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_MAIL_RDK.json b/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_MAIL_RDK.json new file mode 100644 index 0000000..16d222f --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_MAIL_RDK.json @@ -0,0 +1,75 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_MAIL_RDK" + }, + "body": { + "record1": { + "<1>": "SRP Mail RDK", + "<2>": "", + "<3>": "", + "<4>": "SYSPROG", + "<5>": "", + "<6>": "", + "<7>": { + "<7,1>": "SYSPROG", + "<7,2>": "SYSPROG", + "<7,3>": "SYSPROG", + "<7,4>": "SYSPROG", + "<7,5>": "SYSPROG", + "<7,6>": "SYSPROG", + "<7,7>": "SYSPROG", + "<7,8>": "SYSPROG", + "<7,9>": "SYSPROG", + "<7,10>": "SYSPROG", + "<7,11>": "SYSPROG", + "<7,12>": "SYSPROG", + "<7,13>": "SYSPROG", + "<7,14>": "SYSPROG", + "<7,15>": "SYSPROG", + "<7,16>": "SYSPROG", + "<7,17>": "" + }, + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": { + "<11,1>": "Application Rows", + "<11,2>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_MAIL", + "<11,3>": "3-3:SYSREPOSRELEASES:SYSPROG_SRP_MAIL_RDK", + "<11,4>": "3-3:SYSREPOSVIEWS:SYSPROG_SRP_MAIL_RDK", + "<11,5>": "DLLs ( Dynamic Link Libraries )", + "<11,6>": "3-3:SRPMAIL", + "<11,7>": "Documents", + "<11,8>": "2-2:HTML", + "<11,9>": "3-3:SAMPLE_HTML_EMAIL", + "<11,10>": "Images", + "<11,11>": "2-2:BMP", + "<11,12>": "3-3:SRPICON", + "<11,13>": "2-2:ICO", + "<11,14>": "3-3:SRP", + "<11,15>": "Message Boxes", + "<11,16>": "3-3:SRP_MAIL_DEMO", + "<11,17>": "OpenInsight Form Executables", + "<11,18>": "3-3:SRP_MAIL_DEMO", + "<11,19>": "OpenInsight Forms", + "<11,20>": "3-3:SRP_MAIL_DEMO", + "<11,21>": "Stored Procedure Debug Tables", + "<11,22>": "3-3:SEND_EMAIL_SAMPLE", + "<11,23>": "3-3:SRP_MAIL_DEMO_EVENTS", + "<11,24>": "Stored Procedure Executables", + "<11,25>": "3-3:SEND_EMAIL_SAMPLE", + "<11,26>": "3-3:SRPSENDMAIL", + "<11,27>": "3-3:SRP_MAIL", + "<11,28>": "3-3:SRP_MAIL_DEMO_EVENTS", + "<11,29>": "3-3:SRP_SEND_MAIL", + "<11,30>": "Stored Procedure Inserts", + "<11,31>": "3-3:SRPMAIL_INSERTS", + "<11,32>": "Stored Procedures", + "<11,33>": "3-3:SEND_EMAIL_SAMPLE", + "<11,34>": "3-3:SRP_MAIL_DEMO_EVENTS" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_TABLE_SEARCH.json b/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_TABLE_SEARCH.json new file mode 100644 index 0000000..0022c96 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_TABLE_SEARCH.json @@ -0,0 +1,71 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_TABLE_SEARCH" + }, + "body": { + "record1": { + "<1>": "SRP_TABLE_SEARCH", + "<2>": "Contains all entities to the SRP_TABLE_SEARCH utility including an entity reference to the RDK itself.", + "<3>": "", + "<4>": "SYSPROG", + "<5>": "", + "<6>": "", + "<7>": { + "<7,1>": "SYSPROG", + "<7,2>": "SYSPROG", + "<7,3>": "SYSPROG", + "<7,4>": "SYSPROG", + "<7,5>": "SYSPROG", + "<7,6>": "SYSPROG", + "<7,7>": "SYSPROG", + "<7,8>": "SYSPROG", + "<7,9>": "SYSPROG", + "<7,10>": "SYSPROG", + "<7,11>": "SYSPROG", + "<7,12>": "SYSPROG", + "<7,13>": "SYSPROG", + "<7,14>": "SYSPROG", + "<7,15>": "", + "<7,16>": "SYSPROG" + }, + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": { + "<11,1>": "Application Rows", + "<11,2>": "3-3:SYSREPOS:SYSPROG_SRP_UTILITY__SRP_TABLE_SEARCH", + "<11,3>": "3-3:SYSREPOSRELEASES:SYSPROG_SRP_TABLE_SEARCH", + "<11,4>": "3-3:SYSREPOSSTORAGE:SRP", + "<11,5>": "3-3:SYSREPOSTYPEFAMILIES:SRP_FAMILY", + "<11,6>": "3-3:SYSREPOSTYPES:SRP_UTILITY", + "<11,7>": "3-3:SYSREPOSVIEWS:SYSPROG_SRP_TABLE_SEARCH", + "<11,8>": "Images", + "<11,9>": "2-2:ICO", + "<11,10>": "3-3:SRP_TABLE_SEARCH", + "<11,11>": "OpenInsight Form Executables", + "<11,12>": "3-3:SRP_METRICS_VIEWER", + "<11,13>": "3-3:SRP_TABLE_SEARCH", + "<11,14>": "3-3:SRP_TABLE_SELECT", + "<11,15>": "Operating System Files", + "<11,16>": "3-3:SRPTABLESEARCHIMAGES", + "<11,17>": "Stored Procedure Executables", + "<11,18>": "3-3:REPOS.SRP_UTILITY..DESIGN", + "<11,19>": "3-3:REPOS.SRP_UTILITY..EXECUTE", + "<11,20>": "3-3:SETWINDOWPOS", + "<11,21>": "3-3:SRPREGCLOSEKEY", + "<11,22>": "3-3:SRPREGCREATEKEY", + "<11,23>": "3-3:SRPREGOPENKEY", + "<11,24>": "3-3:SRPREGQUERYVALUE", + "<11,25>": "3-3:SRPREGSETVALUE", + "<11,26>": "3-3:SRP_GET_WINDOW_RECT", + "<11,27>": "3-3:SRP_SHOW_WINDOW", + "<11,28>": "3-3:SRP_TABLE_SEARCH_EVENTS", + "<11,29>": "3-3:SRP_TABLE_SELECT_EVENTS", + "<11,30>": "Windows Help Files", + "<11,31>": "3-3:SRP_TABLE_SEARCH" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_TCL.json b/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_TCL.json new file mode 100644 index 0000000..1e9450f --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_TCL.json @@ -0,0 +1,90 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_TCL" + }, + "body": { + "record1": { + "<1>": "SRP TCL Suite", + "<2>": "", + "<3>": "", + "<4>": "SYSPROG", + "<5>": "", + "<6>": "", + "<7>": { + "<7,1>": "SYSPROG", + "<7,2>": "SYSPROG", + "<7,3>": "SYSPROG", + "<7,4>": "SYSPROG", + "<7,5>": "SYSPROG", + "<7,6>": "SYSPROG", + "<7,7>": "SYSPROG", + "<7,8>": "SYSPROG", + "<7,9>": "SYSPROG", + "<7,10>": "SYSPROG", + "<7,11>": "SYSPROG", + "<7,12>": "SYSPROG", + "<7,13>": "SYSPROG", + "<7,14>": "SYSPROG", + "<7,15>": "SYSPROG", + "<7,16>": "SYSPROG", + "<7,17>": "SYSPROG", + "<7,18>": "SYSPROG", + "<7,19>": "SYSPROG", + "<7,20>": "" + }, + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": { + "<11,1>": "Application Rows", + "<11,2>": "3-3:SYSENV:SRP_TCL_PARAMCOUNTS", + "<11,3>": "3-3:SYSREPOSEVENTEXES:SYSPROG_ACTIVATED_SRP_TCL_MDICHILD.", + "<11,4>": "3-3:SYSREPOSEVENTEXES:SYSPROG_CLOSE_SRP_TCL_MDICHILD.", + "<11,5>": "3-3:SYSREPOSRELEASES:SYSPROG_SRP_TCL", + "<11,6>": "3-3:SYSREPOSSTORAGE:SRP", + "<11,7>": "3-3:SYSREPOSTYPEFAMILIES:SRP_FAMILY", + "<11,8>": "3-3:SYSREPOSTYPES:SRP_UTILITY", + "<11,9>": "3-3:SYSREPOSVIEWS:SYSPROG_SRP_TCL", + "<11,10>": "Images", + "<11,11>": "2-2:ICO", + "<11,12>": "3-3:SRP_TCL", + "<11,13>": "Message Boxes", + "<11,14>": "3-3:SRP_TCL_PROMPT", + "<11,15>": "OpenInsight Form Executables", + "<11,16>": "3-3:SRP_TCL", + "<11,17>": "3-3:SRP_TCLVIEW_REPORTTABLE", + "<11,18>": "Operating System Files", + "<11,19>": "3-3:SRPTCLIMAGES", + "<11,20>": "Stored Procedure Executables", + "<11,21>": "3-3:SRP_OCONV_TO_FORMAT", + "<11,22>": "3-3:SRP_RLIST_COMPILE", + "<11,23>": "3-3:SRP_RLIST_EXECUTE", + "<11,24>": "3-3:SRP_RLIST_ICONVFILTER", + "<11,25>": "3-3:SRP_RLIST_PROCESSFILTER", + "<11,26>": "3-3:SRP_RLIST_PROCESSONLYKEYWORD", + "<11,27>": "3-3:SRP_ROUTINE_EXISTS", + "<11,28>": "3-3:SRP_TCLVIEW_EMPTY", + "<11,29>": "3-3:SRP_TCLVIEW_REPORTTABLE", + "<11,30>": "3-3:SRP_TCLVIEW_REPORTTABLE_EVENTS", + "<11,31>": "3-3:SRP_TCL_CALLPROCEDURE", + "<11,32>": "3-3:SRP_TCL_DISPATCHCOMMAND", + "<11,33>": "3-3:SRP_TCL_EVENTS", + "<11,34>": "3-3:SRP_TCL_EXTRACTOPTIONS", + "<11,35>": "3-3:SRP_TCL_GETACTIVELIST", + "<11,36>": "3-3:SRP_TCL_GETCOLUMNINFO", + "<11,37>": "3-3:SRP_TCL_GETCOMMANDLINE", + "<11,38>": "3-3:SRP_TCL_GETVIEW", + "<11,39>": "3-3:SRP_TCL_HASACTIVELIST", + "<11,40>": "3-3:SRP_TCL_ISCANCELLED", + "<11,41>": "3-3:SRP_TCL_OPENVIEW", + "<11,42>": "3-3:SRP_TCL_PROCESSPROMPTS", + "<11,43>": "3-3:SRP_TCL_SETACTIVELIST", + "<11,44>": "3-3:SRP_TCL_SETPROGRESS", + "<11,45>": "3-3:SRP_TCL_TOKENIZE", + "<11,46>": "3-3:SRP_TCL_TRANSLATETOKENS" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_UTILITIES.json b/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_UTILITIES.json new file mode 100644 index 0000000..bfe89c6 --- /dev/null +++ b/SYSPROG/APPROW/SYSREPOSVIEWS%003ASYSPROG_SRP_UTILITIES.json @@ -0,0 +1,511 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "SYSPROG*SRP_UTILITIES" + }, + "body": { + "record1": { + "<1>": "SRP Utilities", + "<2>": "", + "<3>": "", + "<4>": "SYSPROG", + "<5>": "", + "<6>": "", + "<7>": { + "<7,1>": "SYSPROG", + "<7,2>": "SYSPROG", + "<7,3>": "SYSPROG", + "<7,4>": "SYSPROG", + "<7,5>": "SYSPROG", + "<7,6>": "SYSPROG", + "<7,7>": "SYSPROG", + "<7,8>": "SYSPROG", + "<7,9>": "SYSPROG", + "<7,10>": "SYSPROG", + "<7,11>": "SYSPROG", + "<7,12>": "SYSPROG", + "<7,13>": "SYSPROG", + "<7,14>": "SYSPROG", + "<7,15>": "SYSPROG", + "<7,16>": "SYSPROG", + "<7,17>": "SYSPROG", + "<7,18>": "SYSPROG", + "<7,19>": "SYSPROG", + "<7,20>": "SYSPROG", + "<7,21>": "SYSPROG", + "<7,22>": "SYSPROG", + "<7,23>": "SYSPROG", + "<7,24>": "SYSPROG", + "<7,25>": "SYSPROG", + "<7,26>": "SYSPROG", + "<7,27>": "SYSPROG", + "<7,28>": "SYSPROG", + "<7,29>": "SYSPROG", + "<7,30>": "SYSPROG", + "<7,31>": "SYSPROG", + "<7,32>": "SYSPROG", + "<7,33>": "SYSPROG", + "<7,34>": "SYSPROG", + "<7,35>": "SYSPROG", + "<7,36>": "SYSPROG", + "<7,37>": "SYSPROG", + "<7,38>": "SYSPROG", + "<7,39>": "SYSPROG", + "<7,40>": "SYSPROG", + "<7,41>": "SYSPROG", + "<7,42>": "SYSPROG", + "<7,43>": "SYSPROG", + "<7,44>": "SYSPROG", + "<7,45>": "SYSPROG", + "<7,46>": "SYSPROG", + "<7,47>": "SYSPROG", + "<7,48>": "SYSPROG", + "<7,49>": "SYSPROG", + "<7,50>": "SYSPROG", + "<7,51>": "SYSPROG", + "<7,52>": "SYSPROG", + "<7,53>": "SYSPROG", + "<7,54>": "SYSPROG", + "<7,55>": "SYSPROG", + "<7,56>": "SYSPROG", + "<7,57>": "SYSPROG", + "<7,58>": "SYSPROG", + "<7,59>": "SYSPROG", + "<7,60>": "SYSPROG", + "<7,61>": "SYSPROG", + "<7,62>": "SYSPROG", + "<7,63>": "SYSPROG", + "<7,64>": "SYSPROG", + "<7,65>": "SYSPROG", + "<7,66>": "SYSPROG", + "<7,67>": "SYSPROG", + "<7,68>": "SYSPROG", + "<7,69>": "SYSPROG", + "<7,70>": "SYSPROG", + "<7,71>": "SYSPROG", + "<7,72>": "SYSPROG", + "<7,73>": "SYSPROG", + "<7,74>": "SYSPROG", + "<7,75>": "SYSPROG", + "<7,76>": "SYSPROG", + "<7,77>": "SYSPROG", + "<7,78>": "SYSPROG", + "<7,79>": "SYSPROG", + "<7,80>": "SYSPROG", + "<7,81>": "SYSPROG", + "<7,82>": "SYSPROG", + "<7,83>": "SYSPROG", + "<7,84>": "SYSPROG", + "<7,85>": "SYSPROG", + "<7,86>": "SYSPROG", + "<7,87>": "SYSPROG", + "<7,88>": "SYSPROG", + "<7,89>": "SYSPROG", + "<7,90>": "SYSPROG", + "<7,91>": "SYSPROG", + "<7,92>": "SYSPROG", + "<7,93>": "SYSPROG", + "<7,94>": "SYSPROG", + "<7,95>": "SYSPROG", + "<7,96>": "SYSPROG", + "<7,97>": "SYSPROG", + "<7,98>": "SYSPROG", + "<7,99>": "SYSPROG", + "<7,100>": "SYSPROG", + "<7,101>": "SYSPROG", + "<7,102>": "SYSPROG", + "<7,103>": "" + }, + "<8>": "", + "<9>": "", + "<10>": "", + "<11>": { + "<11,1>": "Application Rows", + "<11,2>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_ARRAY", + "<11,3>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_COM", + "<11,4>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_DATE", + "<11,5>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_DATETIME", + "<11,6>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_DECODE", + "<11,7>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_ENCODE", + "<11,8>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_FASTARRAY", + "<11,9>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_GET_PRINTERS", + "<11,10>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_HASH", + "<11,11>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_HASHTABLE", + "<11,12>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_JSON", + "<11,13>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_JSONX_END", + "<11,14>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_LIST", + "<11,15>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_MATH", + "<11,16>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_MONITOR", + "<11,17>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_OI_TO_WIN32", + "<11,18>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_PATH", + "<11,19>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_REGEX", + "<11,20>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_REGISTRY", + "<11,21>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_STACK", + "<11,22>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_STOPWATCH", + "<11,23>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_STRING", + "<11,24>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_TASKBAR", + "<11,25>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_TCPCLIENT", + "<11,26>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_TIME", + "<11,27>": "3-3:SYSENV:SRP_EDITOR_METADATA_SRP_WIN32_TO_OI", + "<11,28>": "3-3:SYSOBJ:STRUCT_MINMAXINFO", + "<11,29>": "3-3:SYSPROCS:DLL_SRP_UTILITIES", + "<11,30>": "3-3:SYSREPOSEVENTEXES:SYSPROG_GETMINMAXINFO..OIWIN_", + "<11,31>": "3-3:SYSREPOSEVENTEXES:SYSPROG_SRP_ONSYSCOLORCHANGE..OIWIN_", + "<11,32>": "3-3:SYSREPOSRELEASES:SYSPROG_SRP_UTILITIES", + "<11,33>": "3-3:SYSREPOSVIEWS:SYSPROG_SRP_UTILITIES", + "<11,34>": "DLLs ( Dynamic Link Libraries )", + "<11,35>": "3-3:SRPUTILITIES", + "<11,36>": "OpenInsight Form Executables", + "<11,37>": "3-3:SRP_METRICS_VIEWER", + "<11,38>": "3-3:SRP_PROGRESS", + "<11,39>": "Stored Procedure Debug Tables", + "<11,40>": "3-3:SRP_UTILITIES_SAMPLE", + "<11,41>": "Stored Procedure Executables", + "<11,42>": "3-3:SETWINDOWPOS", + "<11,43>": "3-3:SRPREGCLOSEKEY", + "<11,44>": "3-3:SRPREGCREATEKEY", + "<11,45>": "3-3:SRPREGDELETEKEY", + "<11,46>": "3-3:SRPREGDELETEVALUE", + "<11,47>": "3-3:SRPREGENUMKEY", + "<11,48>": "3-3:SRPREGENUMVALUE", + "<11,49>": "3-3:SRPREGOPENKEY", + "<11,50>": "3-3:SRPREGQUERYVALUE", + "<11,51>": "3-3:SRPREGSETVALUE", + "<11,52>": "3-3:SRPUTILITIESAPI_CLEANARRAYA", + "<11,53>": "3-3:SRPUTILITIESAPI_CLEANARRAYW", + "<11,54>": "3-3:SRPUTILITIESAPI_COMADDPARAM", + "<11,55>": "3-3:SRPUTILITIESAPI_COMADDPARAMOMITTED", + "<11,56>": "3-3:SRPUTILITIESAPI_COMADDPARAMREF", + "<11,57>": "3-3:SRPUTILITIESAPI_COMCALL", + "<11,58>": "3-3:SRPUTILITIESAPI_COMCLEARPARAMS", + "<11,59>": "3-3:SRPUTILITIESAPI_COMCREATE", + "<11,60>": "3-3:SRPUTILITIESAPI_COMGET", + "<11,61>": "3-3:SRPUTILITIESAPI_COMGETAXOBJECT", + "<11,62>": "3-3:SRPUTILITIESAPI_COMGETDISPATCHOBJECT", + "<11,63>": "3-3:SRPUTILITIESAPI_COMGETHANDLES", + "<11,64>": "3-3:SRPUTILITIESAPI_COMHASERROR", + "<11,65>": "3-3:SRPUTILITIESAPI_COMOUTPUTGET", + "<11,66>": "3-3:SRPUTILITIESAPI_COMOUTPUTISARRAY", + "<11,67>": "3-3:SRPUTILITIESAPI_COMOUTPUTSIZE", + "<11,68>": "3-3:SRPUTILITIESAPI_COMPARAMGET", + "<11,69>": "3-3:SRPUTILITIESAPI_COMPARAMSIZE", + "<11,70>": "3-3:SRPUTILITIESAPI_COMPARESTRING", + "<11,71>": "3-3:SRPUTILITIESAPI_COMRELEASE", + "<11,72>": "3-3:SRPUTILITIESAPI_COMSET", + "<11,73>": "3-3:SRPUTILITIESAPI_CONVERTFROMDOUBLE", + "<11,74>": "3-3:SRPUTILITIESAPI_CONVERTFROMFLOAT", + "<11,75>": "3-3:SRPUTILITIESAPI_CONVERTFROMINT16", + "<11,76>": "3-3:SRPUTILITIESAPI_CONVERTFROMINT32", + "<11,77>": "3-3:SRPUTILITIESAPI_CONVERTFROMINT64", + "<11,78>": "3-3:SRPUTILITIESAPI_CONVERTTODOUBLE", + "<11,79>": "3-3:SRPUTILITIESAPI_CONVERTTOFLOAT", + "<11,80>": "3-3:SRPUTILITIESAPI_CONVERTTOINT16", + "<11,81>": "3-3:SRPUTILITIESAPI_CONVERTTOINT32", + "<11,82>": "3-3:SRPUTILITIESAPI_CONVERTTOINT64", + "<11,83>": "3-3:SRPUTILITIESAPI_COPYMEMORY", + "<11,84>": "3-3:SRPUTILITIESAPI_CRYPTODECODEBASE32", + "<11,85>": "3-3:SRPUTILITIESAPI_CRYPTODECODEBASE64", + "<11,86>": "3-3:SRPUTILITIESAPI_CRYPTODECODEBASE64URL", + "<11,87>": "3-3:SRPUTILITIESAPI_CRYPTODECODEHEX", + "<11,88>": "3-3:SRPUTILITIESAPI_CRYPTODECODEURL", + "<11,89>": "3-3:SRPUTILITIESAPI_CRYPTOENCODEBASE32", + "<11,90>": "3-3:SRPUTILITIESAPI_CRYPTOENCODEBASE64", + "<11,91>": "3-3:SRPUTILITIESAPI_CRYPTOENCODEBASE64URL", + "<11,92>": "3-3:SRPUTILITIESAPI_CRYPTOENCODEHEX", + "<11,93>": "3-3:SRPUTILITIESAPI_CRYPTOENCODEURL", + "<11,94>": "3-3:SRPUTILITIESAPI_CRYPTOHASH", + "<11,95>": "3-3:SRPUTILITIESAPI_CRYPTOOUTPUTGET", + "<11,96>": "3-3:SRPUTILITIESAPI_CRYPTOOUTPUTSIZE", + "<11,97>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYCLEAR", + "<11,98>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYCOUNT", + "<11,99>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYCREATE", + "<11,100>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYDELETE", + "<11,101>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYEXTRACT", + "<11,102>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYINSERT", + "<11,103>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYINSERTFROMLIST", + "<11,104>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYMATCH", + "<11,105>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYPREPAREOUTPUT", + "<11,106>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYREDUCE", + "<11,107>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYRELEASE", + "<11,108>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYREPLACE", + "<11,109>": "3-3:SRPUTILITIESAPI_DYNAMICARRAYREPLACEWITHLIST", + "<11,110>": "3-3:SRPUTILITIESAPI_FIRSTDAYOFWEEK", + "<11,111>": "3-3:SRPUTILITIESAPI_FIRSTWEEKOFYEAR", + "<11,112>": "3-3:SRPUTILITIESAPI_GETAM", + "<11,113>": "3-3:SRPUTILITIESAPI_GETDATEFORMAT", + "<11,114>": "3-3:SRPUTILITIESAPI_GETDAYOFWEEKNAME", + "<11,115>": "3-3:SRPUTILITIESAPI_GETDAYOFWEEKNAMES", + "<11,116>": "3-3:SRPUTILITIESAPI_GETERROR", + "<11,117>": "3-3:SRPUTILITIESAPI_GETERRORSIZE", + "<11,118>": "3-3:SRPUTILITIESAPI_GETFONTS", + "<11,119>": "3-3:SRPUTILITIESAPI_GETIDLETIME", + "<11,120>": "3-3:SRPUTILITIESAPI_GETMONTHNAME", + "<11,121>": "3-3:SRPUTILITIESAPI_GETMONTHNAMES", + "<11,122>": "3-3:SRPUTILITIESAPI_GETOUTPUT", + "<11,123>": "3-3:SRPUTILITIESAPI_GETOUTPUTSIZE", + "<11,124>": "3-3:SRPUTILITIESAPI_GETPM", + "<11,125>": "3-3:SRPUTILITIESAPI_GETTEMPFILENAME", + "<11,126>": "3-3:SRPUTILITIESAPI_GETTEMPPATH", + "<11,127>": "3-3:SRPUTILITIESAPI_GETTIMEFORMAT", + "<11,128>": "3-3:SRPUTILITIESAPI_GETTIMEZONEBIAS", + "<11,129>": "3-3:SRPUTILITIESAPI_GETWIDEOUTPUT", + "<11,130>": "3-3:SRPUTILITIESAPI_GETWIDEOUTPUTSIZE", + "<11,131>": "3-3:SRPUTILITIESAPI_HASHTABLECONTAINS", + "<11,132>": "3-3:SRPUTILITIESAPI_HASHTABLECOUNT", + "<11,133>": "3-3:SRPUTILITIESAPI_HASHTABLECREATE", + "<11,134>": "3-3:SRPUTILITIESAPI_HASHTABLEGET", + "<11,135>": "3-3:SRPUTILITIESAPI_HASHTABLEGETKEYS", + "<11,136>": "3-3:SRPUTILITIESAPI_HASHTABLEGETKEYVALUEPAIRS", + "<11,137>": "3-3:SRPUTILITIESAPI_HASHTABLEGETVALUES", + "<11,138>": "3-3:SRPUTILITIESAPI_HASHTABLERELEASE", + "<11,139>": "3-3:SRPUTILITIESAPI_HASHTABLEREMOVE", + "<11,140>": "3-3:SRPUTILITIESAPI_HASHTABLESET", + "<11,141>": "3-3:SRPUTILITIESAPI_ISDAYLIGHTSAVINGS", + "<11,142>": "3-3:SRPUTILITIESAPI_JOINARRAYSA", + "<11,143>": "3-3:SRPUTILITIESAPI_JOINARRAYSW", + "<11,144>": "3-3:SRPUTILITIESAPI_JSONARRAYAPPEND", + "<11,145>": "3-3:SRPUTILITIESAPI_JSONARRAYAPPENDVALUE", + "<11,146>": "3-3:SRPUTILITIESAPI_JSONCONTAINS", + "<11,147>": "3-3:SRPUTILITIESAPI_JSONCOUNT", + "<11,148>": "3-3:SRPUTILITIESAPI_JSONFIND", + "<11,149>": "3-3:SRPUTILITIESAPI_JSONGET", + "<11,150>": "3-3:SRPUTILITIESAPI_JSONGETELEMENTS", + "<11,151>": "3-3:SRPUTILITIESAPI_JSONGETMEMBERS", + "<11,152>": "3-3:SRPUTILITIESAPI_JSONGETVALUE", + "<11,153>": "3-3:SRPUTILITIESAPI_JSONNEWARRAY", + "<11,154>": "3-3:SRPUTILITIESAPI_JSONNEWAUTO", + "<11,155>": "3-3:SRPUTILITIESAPI_JSONNEWBOOL", + "<11,156>": "3-3:SRPUTILITIESAPI_JSONNEWNULL", + "<11,157>": "3-3:SRPUTILITIESAPI_JSONNEWNUMBER", + "<11,158>": "3-3:SRPUTILITIESAPI_JSONNEWOBJECT", + "<11,159>": "3-3:SRPUTILITIESAPI_JSONNEWSTRING", + "<11,160>": "3-3:SRPUTILITIESAPI_JSONPARSE", + "<11,161>": "3-3:SRPUTILITIESAPI_JSONRELEASE", + "<11,162>": "3-3:SRPUTILITIESAPI_JSONREMOVE", + "<11,163>": "3-3:SRPUTILITIESAPI_JSONREMOVEALL", + "<11,164>": "3-3:SRPUTILITIESAPI_JSONSCHEMAVALIDATE", + "<11,165>": "3-3:SRPUTILITIESAPI_JSONSET", + "<11,166>": "3-3:SRPUTILITIESAPI_JSONSETVALUE", + "<11,167>": "3-3:SRPUTILITIESAPI_JSONSTRINGIFY", + "<11,168>": "3-3:SRPUTILITIESAPI_JSONTYPE", + "<11,169>": "3-3:SRPUTILITIESAPI_JSONXADD", + "<11,170>": "3-3:SRPUTILITIESAPI_JSONXADDBOOL", + "<11,171>": "3-3:SRPUTILITIESAPI_JSONXADDNULL", + "<11,172>": "3-3:SRPUTILITIESAPI_JSONXBEGIN", + "<11,173>": "3-3:SRPUTILITIESAPI_JSONXBEGINSTRING", + "<11,174>": "3-3:SRPUTILITIESAPI_JSONXCLEAR", + "<11,175>": "3-3:SRPUTILITIESAPI_JSONXCLOSE", + "<11,176>": "3-3:SRPUTILITIESAPI_JSONXCOUNT", + "<11,177>": "3-3:SRPUTILITIESAPI_JSONXDELETE", + "<11,178>": "3-3:SRPUTILITIESAPI_JSONXEND", + "<11,179>": "3-3:SRPUTILITIESAPI_JSONXGET", + "<11,180>": "3-3:SRPUTILITIESAPI_JSONXGO", + "<11,181>": "3-3:SRPUTILITIESAPI_JSONXHAS", + "<11,182>": "3-3:SRPUTILITIESAPI_JSONXISOBJECT", + "<11,183>": "3-3:SRPUTILITIESAPI_JSONXMEMBERS", + "<11,184>": "3-3:SRPUTILITIESAPI_JSONXPARSE", + "<11,185>": "3-3:SRPUTILITIESAPI_JSONXSET", + "<11,186>": "3-3:SRPUTILITIESAPI_JSONXSETBOOL", + "<11,187>": "3-3:SRPUTILITIESAPI_JSONXSETNULL", + "<11,188>": "3-3:SRPUTILITIESAPI_JSONXSETPATH", + "<11,189>": "3-3:SRPUTILITIESAPI_JSONXSETPATHBOOL", + "<11,190>": "3-3:SRPUTILITIESAPI_JSONXSETPATHNULL", + "<11,191>": "3-3:SRPUTILITIESAPI_JSONXSORT", + "<11,192>": "3-3:SRPUTILITIESAPI_JSONXSTATE", + "<11,193>": "3-3:SRPUTILITIESAPI_JSONXTYPE", + "<11,194>": "3-3:SRPUTILITIESAPI_JSONXVALUES", + "<11,195>": "3-3:SRPUTILITIESAPI_LISTADD", + "<11,196>": "3-3:SRPUTILITIESAPI_LISTCLEAR", + "<11,197>": "3-3:SRPUTILITIESAPI_LISTCOUNT", + "<11,198>": "3-3:SRPUTILITIESAPI_LISTCREATE", + "<11,199>": "3-3:SRPUTILITIESAPI_LISTCREATEFROMARRAY", + "<11,200>": "3-3:SRPUTILITIESAPI_LISTGETAT", + "<11,201>": "3-3:SRPUTILITIESAPI_LISTINSERTAT", + "<11,202>": "3-3:SRPUTILITIESAPI_LISTLOCATE", + "<11,203>": "3-3:SRPUTILITIESAPI_LISTMATCH", + "<11,204>": "3-3:SRPUTILITIESAPI_LISTPREPAREOUTPUT", + "<11,205>": "3-3:SRPUTILITIESAPI_LISTREDUCE", + "<11,206>": "3-3:SRPUTILITIESAPI_LISTRELEASE", + "<11,207>": "3-3:SRPUTILITIESAPI_LISTREMOVEAT", + "<11,208>": "3-3:SRPUTILITIESAPI_LISTSETAT", + "<11,209>": "3-3:SRPUTILITIESAPI_MATH", + "<11,210>": "3-3:SRPUTILITIESAPI_MONITORADDENTRY", + "<11,211>": "3-3:SRPUTILITIESAPI_MONITORCLOSE", + "<11,212>": "3-3:SRPUTILITIESAPI_MONITORCONNECT", + "<11,213>": "3-3:SRPUTILITIESAPI_PATHCONVERTTOUNC", + "<11,214>": "3-3:SRPUTILITIESAPI_PATHEXPAND", + "<11,215>": "3-3:SRPUTILITIESAPI_PATHFITTOEDITFIELD", + "<11,216>": "3-3:SRPUTILITIESAPI_PRINTERENUMERATE", + "<11,217>": "3-3:SRPUTILITIESAPI_PRINTERGETDEFAULT", + "<11,218>": "3-3:SRPUTILITIESAPI_PRINTERGETINFO", + "<11,219>": "3-3:SRPUTILITIESAPI_REGEXMATCH", + "<11,220>": "3-3:SRPUTILITIESAPI_REGEXSEARCH", + "<11,221>": "3-3:SRPUTILITIESAPI_REORDERARRAY", + "<11,222>": "3-3:SRPUTILITIESAPI_ROTATEARRAY", + "<11,223>": "3-3:SRPUTILITIESAPI_RTFTOTEXT", + "<11,224>": "3-3:SRPUTILITIESAPI_RUNCOMMAND", + "<11,225>": "3-3:SRPUTILITIESAPI_SAVESCREENSHOT", + "<11,226>": "3-3:SRPUTILITIESAPI_SORTARRAYA", + "<11,227>": "3-3:SRPUTILITIESAPI_SORTARRAYW", + "<11,228>": "3-3:SRPUTILITIESAPI_SORTTABLEA", + "<11,229>": "3-3:SRPUTILITIESAPI_SORTTABLEW", + "<11,230>": "3-3:SRPUTILITIESAPI_SRPGETWINDOWRECT", + "<11,231>": "3-3:SRPUTILITIESAPI_SRPJSONPARSEWITHERRORS", + "<11,232>": "3-3:SRPUTILITIESAPI_STRINGGETHEIGHT", + "<11,233>": "3-3:SRPUTILITIESAPI_STRINGGETWIDTH", + "<11,234>": "3-3:SRPUTILITIESAPI_TASKBARSETGROUPTITLE", + "<11,235>": "3-3:SRPUTILITIESAPI_TCPCLIENTCLOSE", + "<11,236>": "3-3:SRPUTILITIESAPI_TCPCLIENTCLOSEQBXML", + "<11,237>": "3-3:SRPUTILITIESAPI_TCPCLIENTCLOSESES", + "<11,238>": "3-3:SRPUTILITIESAPI_TCPCLIENTCONNECT", + "<11,239>": "3-3:SRPUTILITIESAPI_TCPCLIENTRECEIVE", + "<11,240>": "3-3:SRPUTILITIESAPI_TCPCLIENTRECEIVEQBXMLRESPONSE", + "<11,241>": "3-3:SRPUTILITIESAPI_TCPCLIENTSEND", + "<11,242>": "3-3:SRPUTILITIESAPI_TCPCLIENTSENDQBXMLREQUEST", + "<11,243>": "3-3:SRPUTILITIESAPI_TCPCLIENTSENDSESCOMMAND", + "<11,244>": "3-3:SRPUTILITIESAPI_XMLEXTRACT", + "<11,245>": "3-3:SRPWINAPI_FREELIBRARY", + "<11,246>": "3-3:SRPWINAPI_GETFILEVERSIONINFO", + "<11,247>": "3-3:SRPWINAPI_GETFILEVERSIONINFOSIZE", + "<11,248>": "3-3:SRPWINAPI_GETMODULEFILENAME", + "<11,249>": "3-3:SRPWINAPI_LOADLIBRARY", + "<11,250>": "3-3:SRPWINAPI_VERQUERYVALUE", + "<11,251>": "3-3:SRP_ARRAY", + "<11,252>": "3-3:SRP_CLEAN_ARRAY", + "<11,253>": "3-3:SRP_COM", + "<11,254>": "3-3:SRP_COPY_MEMORY", + "<11,255>": "3-3:SRP_DATE", + "<11,256>": "3-3:SRP_DATETIME", + "<11,257>": "3-3:SRP_DECODE", + "<11,258>": "3-3:SRP_ENCODE", + "<11,259>": "3-3:SRP_EXTRACT_XML", + "<11,260>": "3-3:SRP_FASTARRAY", + "<11,261>": "3-3:SRP_FASTARRAY_COUNT", + "<11,262>": "3-3:SRP_FASTARRAY_CREATE", + "<11,263>": "3-3:SRP_FASTARRAY_DELETE", + "<11,264>": "3-3:SRP_FASTARRAY_EXTRACT", + "<11,265>": "3-3:SRP_FASTARRAY_GETVARIABLE", + "<11,266>": "3-3:SRP_FASTARRAY_INSERT", + "<11,267>": "3-3:SRP_FASTARRAY_INSERTFROMLIST", + "<11,268>": "3-3:SRP_FASTARRAY_MATCH", + "<11,269>": "3-3:SRP_FASTARRAY_REDUCE", + "<11,270>": "3-3:SRP_FASTARRAY_RELEASE", + "<11,271>": "3-3:SRP_FASTARRAY_REPLACE", + "<11,272>": "3-3:SRP_FASTARRAY_REPLACEWITHLIST", + "<11,273>": "3-3:SRP_FILESIZE_FORMAT", + "<11,274>": "3-3:SRP_GET_FILEVERSION", + "<11,275>": "3-3:SRP_GET_FONTS", + "<11,276>": "3-3:SRP_GET_IDLETIME", + "<11,277>": "3-3:SRP_GET_PRINTERINFO", + "<11,278>": "3-3:SRP_GET_PRINTERS", + "<11,279>": "3-3:SRP_GET_SYSTEMTIME", + "<11,280>": "3-3:SRP_GET_UTILITIES_VERSION", + "<11,281>": "3-3:SRP_GET_WINDOW_RECT", + "<11,282>": "3-3:SRP_HASH", + "<11,283>": "3-3:SRP_HASHTABLE", + "<11,284>": "3-3:SRP_HASHTABLE_CONTAINS", + "<11,285>": "3-3:SRP_HASHTABLE_COUNT", + "<11,286>": "3-3:SRP_HASHTABLE_CREATE", + "<11,287>": "3-3:SRP_HASHTABLE_GET", + "<11,288>": "3-3:SRP_HASHTABLE_GETKEYS", + "<11,289>": "3-3:SRP_HASHTABLE_GETKEYVALUEPAIRS", + "<11,290>": "3-3:SRP_HASHTABLE_GETVALUES", + "<11,291>": "3-3:SRP_HASHTABLE_RELEASE", + "<11,292>": "3-3:SRP_HASHTABLE_REMOVE", + "<11,293>": "3-3:SRP_HASHTABLE_SET", + "<11,294>": "3-3:SRP_IS64BIT", + "<11,295>": "3-3:SRP_JOIN_ARRAYS", + "<11,296>": "3-3:SRP_JSON", + "<11,297>": "3-3:SRP_JSONX", + "<11,298>": "3-3:SRP_JSONX_BEGIN", + "<11,299>": "3-3:SRP_JSONX_BEGINSTRING", + "<11,300>": "3-3:SRP_JSONX_CLEAR", + "<11,301>": "3-3:SRP_JSONX_COUNT", + "<11,302>": "3-3:SRP_JSONX_DELETE", + "<11,303>": "3-3:SRP_JSONX_END", + "<11,304>": "3-3:SRP_JSONX_ERROR", + "<11,305>": "3-3:SRP_JSONX_GET", + "<11,306>": "3-3:SRP_JSONX_GO", + "<11,307>": "3-3:SRP_JSONX_GOBACK", + "<11,308>": "3-3:SRP_JSONX_GOROOT", + "<11,309>": "3-3:SRP_JSONX_HAS", + "<11,310>": "3-3:SRP_JSONX_MEMBERS", + "<11,311>": "3-3:SRP_JSONX_PARSE", + "<11,312>": "3-3:SRP_JSONX_SET", + "<11,313>": "3-3:SRP_JSONX_SORT", + "<11,314>": "3-3:SRP_JSONX_STATE", + "<11,315>": "3-3:SRP_JSONX_TRACE", + "<11,316>": "3-3:SRP_JSONX_TYPE", + "<11,317>": "3-3:SRP_JSONX_VALUES", + "<11,318>": "3-3:SRP_LIST", + "<11,319>": "3-3:SRP_LIST_ADD", + "<11,320>": "3-3:SRP_LIST_COUNT", + "<11,321>": "3-3:SRP_LIST_CREATE", + "<11,322>": "3-3:SRP_LIST_CREATEFROMFASTARRAY", + "<11,323>": "3-3:SRP_LIST_GETAT", + "<11,324>": "3-3:SRP_LIST_GETVARIABLE", + "<11,325>": "3-3:SRP_LIST_INSERTAT", + "<11,326>": "3-3:SRP_LIST_LOCATE", + "<11,327>": "3-3:SRP_LIST_MATCH", + "<11,328>": "3-3:SRP_LIST_REDUCE", + "<11,329>": "3-3:SRP_LIST_RELEASE", + "<11,330>": "3-3:SRP_LIST_REMOVEAT", + "<11,331>": "3-3:SRP_LIST_SETAT", + "<11,332>": "3-3:SRP_MATH", + "<11,333>": "3-3:SRP_METRICS_VIEWER_EVENTS", + "<11,334>": "3-3:SRP_MONITOR", + "<11,335>": "3-3:SRP_NUM", + "<11,336>": "3-3:SRP_OI_TO_WIN32", + "<11,337>": "3-3:SRP_PATH", + "<11,338>": "3-3:SRP_PRECOMPILER", + "<11,339>": "3-3:SRP_PRINT_RAW", + "<11,340>": "3-3:SRP_PROCESS_MINMAXINFO", + "<11,341>": "3-3:SRP_PROCESS_ONSYSCOLORCHANGE", + "<11,342>": "3-3:SRP_PROGRESS", + "<11,343>": "3-3:SRP_REGEX", + "<11,344>": "3-3:SRP_REGISTRY", + "<11,345>": "3-3:SRP_REORDER_ARRAY", + "<11,346>": "3-3:SRP_ROTATE_ARRAY", + "<11,347>": "3-3:SRP_RUN_COMMAND", + "<11,348>": "3-3:SRP_SAVE_SCREENSHOT", + "<11,349>": "3-3:SRP_SET_MINMAXINFO", + "<11,350>": "3-3:SRP_SET_SYSCOLORCHANGE", + "<11,351>": "3-3:SRP_SHOW_WINDOW", + "<11,352>": "3-3:SRP_SORT_ARRAY", + "<11,353>": "3-3:SRP_STACK", + "<11,354>": "3-3:SRP_STOPWATCH", + "<11,355>": "3-3:SRP_STRING", + "<11,356>": "3-3:SRP_TASKBAR", + "<11,357>": "3-3:SRP_TCPCLIENT", + "<11,358>": "3-3:SRP_TIME", + "<11,359>": "3-3:SRP_TRIM", + "<11,360>": "3-3:SRP_UTILITIES_SAMPLE", + "<11,361>": "3-3:SRP_WIN32_TO_OI", + "<11,362>": "3-3:SYSPROG_GETMINMAXINFO_OIWIN", + "<11,363>": "3-3:SYSPROG_SRP_ONSYSCOLORCHANGE_OIWIN", + "<11,364>": "3-3:WINAPI_PATHCOMBINE", + "<11,365>": "3-3:WINAPI_PATHFILEEXISTS", + "<11,366>": "3-3:WINAPI_PATHISDIRECTORY", + "<11,367>": "3-3:WINAPI_PATHISDIRECTORYEMPTY", + "<11,368>": "3-3:WINAPI_PATHISNETWORKPATH", + "<11,369>": "3-3:WINAPI_PATHISRELATIVE", + "<11,370>": "3-3:WINAPI_PATHISROOT", + "<11,371>": "3-3:WINAPI_PATHISSAMEROOT", + "<11,372>": "3-3:WINAPI_PATHISSYSTEMFOLDER", + "<11,373>": "3-3:WINAPI_PATHISUNC", + "<11,374>": "3-3:WINAPI_PATHISURL", + "<11,375>": "3-3:WINAPI_PATHRELATIVEPATHTO", + "<11,376>": "Stored Procedure Inserts", + "<11,377>": "3-3:SRPARRAY", + "<11,378>": "3-3:SRPFASTARRAY", + "<11,379>": "3-3:SRPHASHTABLE", + "<11,380>": "3-3:SRPJSONX", + "<11,381>": "3-3:SRPLIST", + "<11,382>": "3-3:SRPSTACK", + "<11,383>": "Stored Procedures", + "<11,384>": "3-3:SRP_UTILITIES_SAMPLE" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/VOC%003AAREV_BRWLIST.json b/SYSPROG/APPROW/VOC%003AAREV_BRWLIST.json new file mode 100644 index 0000000..0f6b288 --- /dev/null +++ b/SYSPROG/APPROW/VOC%003AAREV_BRWLIST.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "AREV_BRWLIST" + }, + "body": { + "record1": { + "<1>": "RBASIC", + "<2>": "", + "<3>": "SYSOBJ", + "<4>": "AREV_BRWLIST" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/VOC%003AAREV_BRWREPORT.json b/SYSPROG/APPROW/VOC%003AAREV_BRWREPORT.json new file mode 100644 index 0000000..16e54f6 --- /dev/null +++ b/SYSPROG/APPROW/VOC%003AAREV_BRWREPORT.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "AREV_BRWREPORT" + }, + "body": { + "record1": { + "<1>": "RBASIC", + "<2>": "", + "<3>": "SYSOBJ", + "<4>": "AREV_BRWREPORT" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/VOC%003AAREV_OLIST.json b/SYSPROG/APPROW/VOC%003AAREV_OLIST.json new file mode 100644 index 0000000..a9620dd --- /dev/null +++ b/SYSPROG/APPROW/VOC%003AAREV_OLIST.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "AREV_OLIST" + }, + "body": { + "record1": { + "<1>": "RBASIC", + "<2>": "", + "<3>": "SYSOBJ", + "<4>": "AREV_OLIST" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/VOC%003AAREV_XLIST.json b/SYSPROG/APPROW/VOC%003AAREV_XLIST.json new file mode 100644 index 0000000..c31be02 --- /dev/null +++ b/SYSPROG/APPROW/VOC%003AAREV_XLIST.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "AREV_XLIST" + }, + "body": { + "record1": { + "<1>": "RBASIC", + "<2>": "", + "<3>": "SYSOBJ", + "<4>": "AREV_XLIST" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/VOC%003AATTACH.json b/SYSPROG/APPROW/VOC%003AATTACH.json new file mode 100644 index 0000000..d2df2bf --- /dev/null +++ b/SYSPROG/APPROW/VOC%003AATTACH.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "ATTACH" + }, + "body": { + "record1": { + "<1>": "VERB1", + "<2>": "", + "<3>": "SYSOBJ", + "<4>": "V18" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/VOC%003ARTI_AREV64_GUI_SUBROUTINE.json b/SYSPROG/APPROW/VOC%003ARTI_AREV64_GUI_SUBROUTINE.json new file mode 100644 index 0000000..0ea90f5 --- /dev/null +++ b/SYSPROG/APPROW/VOC%003ARTI_AREV64_GUI_SUBROUTINE.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_AREV64_GUI_SUBROUTINE" + }, + "body": { + "record1": { + "<1>": "RBASIC", + "<2>": "", + "<3>": "SYSPROCS", + "<4>": "RTI_AREV64_GUI_SUBROUTINE" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/VOC%003ARTI_AREV64_START_WINDOW.json b/SYSPROG/APPROW/VOC%003ARTI_AREV64_START_WINDOW.json new file mode 100644 index 0000000..25bef02 --- /dev/null +++ b/SYSPROG/APPROW/VOC%003ARTI_AREV64_START_WINDOW.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_AREV64_START_WINDOW" + }, + "body": { + "record1": { + "<1>": "RBASIC", + "<2>": "", + "<3>": "SYSPROCS", + "<4>": "RTI_AREV64_START_WINDOW" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/VOC%003ARTI_CATALYST_GUI_SUBROUTINE.json b/SYSPROG/APPROW/VOC%003ARTI_CATALYST_GUI_SUBROUTINE.json new file mode 100644 index 0000000..d040c9f --- /dev/null +++ b/SYSPROG/APPROW/VOC%003ARTI_CATALYST_GUI_SUBROUTINE.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_CATALYST_GUI_SUBROUTINE" + }, + "body": { + "record1": { + "<1>": "RBASIC", + "<2>": "", + "<3>": "SYSPROCS", + "<4>": "RTI_CATALYST_GUI_SUBROUTINE" + } + } +} \ No newline at end of file diff --git a/SYSPROG/APPROW/VOC%003ARTI_CATALYST_START_WINDOW.json b/SYSPROG/APPROW/VOC%003ARTI_CATALYST_START_WINDOW.json new file mode 100644 index 0000000..163e8b2 --- /dev/null +++ b/SYSPROG/APPROW/VOC%003ARTI_CATALYST_START_WINDOW.json @@ -0,0 +1,15 @@ +{ + "header": { + "version": 1, + "type": "record", + "approw-key": "RTI_CATALYST_START_WINDOW" + }, + "body": { + "record1": { + "<1>": "RBASIC", + "<2>": "", + "<3>": "SYSPROCS", + "<4>": "RTI_CATALYST_START_WINDOW" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/BRW_ABOUT.json b/SYSPROG/MSG/BRW_ABOUT.json new file mode 100644 index 0000000..9e6550b --- /dev/null +++ b/SYSPROG/MSG/BRW_ABOUT.json @@ -0,0 +1,80 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight Banded Report Writer ", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "W", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "About Banded Report Writer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "BRW_1STATE", + "<17>": "0", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/CONTEXTMENU_ABOUT.json b/SYSPROG/MSG/CONTEXTMENU_ABOUT.json new file mode 100644 index 0000000..e6d6d75 --- /dev/null +++ b/SYSPROG/MSG/CONTEXTMENU_ABOUT.json @@ -0,0 +1,99 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight Context Menu Builder", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.2", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright© Revelation Software, 1992-2022" + } + } + }, + "<2>": "BO", + "<3>": "", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "0", + "<11>": "", + "<12>": "About Context Menu Builder", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "FORMDES_32", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "0", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/CSW_GETTABLENAME.json b/SYSPROG/MSG/CSW_GETTABLENAME.json new file mode 100644 index 0000000..c1cba1c --- /dev/null +++ b/SYSPROG/MSG/CSW_GETTABLENAME.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Enter ODBC table name:", + "<2>": "RE", + "<3>": "", + "<4>": "0", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "160", + "<12>": "Save", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/DM_ABOUT.json b/SYSPROG/MSG/DM_ABOUT.json new file mode 100644 index 0000000..5f6367c --- /dev/null +++ b/SYSPROG/MSG/DM_ABOUT.json @@ -0,0 +1,95 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight Database Manager", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.2", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2022" + } + } + }, + "<2>": "BO", + "<3>": "", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "About Database Manager", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "DBMANAGER", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/DM_ABOUT_ESP.json b/SYSPROG/MSG/DM_ABOUT_ESP.json new file mode 100644 index 0000000..1d85f15 --- /dev/null +++ b/SYSPROG/MSG/DM_ABOUT_ESP.json @@ -0,0 +1,80 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight Database Managero", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "El Database Managero", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "DBMANAGER", + "<17>": "0", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/DM_ADD_INDEX.json b/SYSPROG/MSG/DM_ADD_INDEX.json new file mode 100644 index 0000000..b2e3e47 --- /dev/null +++ b/SYSPROG/MSG/DM_ADD_INDEX.json @@ -0,0 +1,77 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Currently Adding Index...", + "<1,1,1,2>": "Please wait." + } + } + }, + "<2>": "U", + "<3>": "W", + "<4>": "!", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Database Manager - Add Index", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/DM_CLEAR_TABLES.json b/SYSPROG/MSG/DM_CLEAR_TABLES.json new file mode 100644 index 0000000..730c91c --- /dev/null +++ b/SYSPROG/MSG/DM_CLEAR_TABLES.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Clear the selected tables?", + "<2>": "BNY", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Clear Tables", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/DM_CREATE_INDEX.json b/SYSPROG/MSG/DM_CREATE_INDEX.json new file mode 100644 index 0000000..6875cd5 --- /dev/null +++ b/SYSPROG/MSG/DM_CREATE_INDEX.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Create %1% index for column %2% ?", + "<2>": "BNY", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Create Index", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/DM_DELETE_TABLES.json b/SYSPROG/MSG/DM_DELETE_TABLES.json new file mode 100644 index 0000000..3494049 --- /dev/null +++ b/SYSPROG/MSG/DM_DELETE_TABLES.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Delete the selected tables?", + "<2>": "BNY", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Delete Tables", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/DM_INDEX_ALREADY_EXISTS.json b/SYSPROG/MSG/DM_INDEX_ALREADY_EXISTS.json new file mode 100644 index 0000000..ea0a841 --- /dev/null +++ b/SYSPROG/MSG/DM_INDEX_ALREADY_EXISTS.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "This column already contains a %1% index.", + "<2>": "BO", + "<3>": "A", + "<4>": "*", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Index Exists", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/DM_SEARCH.json b/SYSPROG/MSG/DM_SEARCH.json new file mode 100644 index 0000000..1f647e3 --- /dev/null +++ b/SYSPROG/MSG/DM_SEARCH.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Enter Table Name", + "<2>": "RC", + "<3>": "W", + "<4>": "", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Find Table", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EDITOR_ABOUT.json b/SYSPROG/MSG/EDITOR_ABOUT.json new file mode 100644 index 0000000..ef23fe5 --- /dev/null +++ b/SYSPROG/MSG/EDITOR_ABOUT.json @@ -0,0 +1,99 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight System Editor++", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.2", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2022" + } + } + }, + "<2>": "BO", + "<3>": "", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "0", + "<11>": "", + "<12>": "About System Editor++", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "SYSED", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "0", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EDITOR_ALREADY_EXISTS.json b/SYSPROG/MSG/EDITOR_ALREADY_EXISTS.json new file mode 100644 index 0000000..31e6a80 --- /dev/null +++ b/SYSPROG/MSG/EDITOR_ALREADY_EXISTS.json @@ -0,0 +1,97 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Record %1% already exists in table %2%", + "<1,1,1,2>": "", + "<1,1,1,3>": "Do you wish to overwrite?" + } + } + }, + "<2>": "BNY", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Record Already Exists", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EDITOR_ASK_SAVE.json b/SYSPROG/MSG/EDITOR_ASK_SAVE.json new file mode 100644 index 0000000..52eb758 --- /dev/null +++ b/SYSPROG/MSG/EDITOR_ASK_SAVE.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Do you wish to save changes?", + "<2>": "BNYC", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Save Changes?", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EDITOR_LOCK_ERROR.json b/SYSPROG/MSG/EDITOR_LOCK_ERROR.json new file mode 100644 index 0000000..95f8c9e --- /dev/null +++ b/SYSPROG/MSG/EDITOR_LOCK_ERROR.json @@ -0,0 +1,96 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Error Message Returned:", + "<1,1,1,2>": "%1%" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Lock Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EDITOR_OPEN_ERROR.json b/SYSPROG/MSG/EDITOR_OPEN_ERROR.json new file mode 100644 index 0000000..6d71ddc --- /dev/null +++ b/SYSPROG/MSG/EDITOR_OPEN_ERROR.json @@ -0,0 +1,96 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Error Message Returned:", + "<1,1,1,2>": "%1%" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Open Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_ADDCLASS.json b/SYSPROG/MSG/EVENTDES_ADDCLASS.json new file mode 100644 index 0000000..6b8cace --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_ADDCLASS.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Enter the event name to add.", + "<2>": "RC", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Event Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "1", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_COMPILEPROMOTECODE.json b/SYSPROG/MSG/EVENTDES_COMPILEPROMOTECODE.json new file mode 100644 index 0000000..5e9add4 --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_COMPILEPROMOTECODE.json @@ -0,0 +1,77 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Recompiling Windows", + "<1,1,1,2>": "... Please Wait..." + } + } + }, + "<2>": "GCY", + "<3>": "A", + "<4>": "", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Recompiling Windows", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "100", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_CREATECLASS.json b/SYSPROG/MSG/EVENTDES_CREATECLASS.json new file mode 100644 index 0000000..62fcd28 --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_CREATECLASS.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "The event class \"%1%\" does not exists.", + "<1,1,1,2>": "", + "<1,1,1,3>": "Do you wish to create the event class?" + } + } + }, + "<2>": "BNY", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Event Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_CREATEPROMOTECODE.json b/SYSPROG/MSG/EVENTDES_CREATEPROMOTECODE.json new file mode 100644 index 0000000..4f2e538 --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_CREATEPROMOTECODE.json @@ -0,0 +1,82 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Now creating Promoted Event Code for", + "<1,1,1,2>": "", + "<1,1,1,3>": "", + "<1,1,1,4>": "%1%", + "<1,1,1,5>": "", + "<1,1,1,6>": "", + "<1,1,1,7>": "...Please Wait..." + } + } + }, + "<2>": "U", + "<3>": "A", + "<4>": "", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Creating Promoted Event Code", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_DUPCLASS.json b/SYSPROG/MSG/EVENTDES_DUPCLASS.json new file mode 100644 index 0000000..f3b29d6 --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_DUPCLASS.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "The \"%1%\" event already exists for this control type.", + "<2>": "BO", + "<3>": "A", + "<4>": "*", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Event Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_INVALIDCLASS.json b/SYSPROG/MSG/EVENTDES_INVALIDCLASS.json new file mode 100644 index 0000000..807513c --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_INVALIDCLASS.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "The event name \"%1%\" is invalid.", + "<1,1,1,2>": "", + "<1,1,1,3>": "Event names are composed of alphabetic characters only." + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Event Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_LOCKERR.json b/SYSPROG/MSG/EVENTDES_LOCKERR.json new file mode 100644 index 0000000..783b403 --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_LOCKERR.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "The Event Configuration record is in use elsewhere.", + "<1,1,1,2>": "", + "<1,1,1,3>": "Changes will not be saved." + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Event Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_OPENERR.json b/SYSPROG/MSG/EVENTDES_OPENERR.json new file mode 100644 index 0000000..948054e --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_OPENERR.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "An error occurred opening \"%1%\".", + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Event Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_PROMOTECODECOMPILEFAIL.json b/SYSPROG/MSG/EVENTDES_PROMOTECODECOMPILEFAIL.json new file mode 100644 index 0000000..75587e9 --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_PROMOTECODECOMPILEFAIL.json @@ -0,0 +1,81 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Event shell compilation Error", + "<1,1,1,2>": "", + "<1,1,1,3>": "%1%", + "<1,1,1,4>": "", + "<1,1,1,5>": "", + "<1,1,1,6>": "Event Code not created" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Promoted Event Shell Compile Failed", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_READERR.json b/SYSPROG/MSG/EVENTDES_READERR.json new file mode 100644 index 0000000..908e63d --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_READERR.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "An error occurred reading \"%1%\" in the \"%2%\" table.", + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Event Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_REMOVECLASS.json b/SYSPROG/MSG/EVENTDES_REMOVECLASS.json new file mode 100644 index 0000000..423e98f --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_REMOVECLASS.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Are you certain that you wish", + "<1,1,1,2>": "to remove the \"%1%\" event", + "<1,1,1,3>": "from the \"%2%\" control type?" + } + } + }, + "<2>": "BNY", + "<3>": "A", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Event Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_REMOVEPROMOTECODE.json b/SYSPROG/MSG/EVENTDES_REMOVEPROMOTECODE.json new file mode 100644 index 0000000..9d0e573 --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_REMOVEPROMOTECODE.json @@ -0,0 +1,82 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Now removing Promoted Event Code for", + "<1,1,1,2>": "", + "<1,1,1,3>": "", + "<1,1,1,4>": "%1%", + "<1,1,1,5>": "", + "<1,1,1,6>": "", + "<1,1,1,7>": "...Please Wait..." + } + } + }, + "<2>": "U", + "<3>": "A", + "<4>": "", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Removing Promoted Event Code", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_SAVEWARN.json b/SYSPROG/MSG/EVENTDES_SAVEWARN.json new file mode 100644 index 0000000..d994a11 --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_SAVEWARN.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "The Event Configuration information has changed.", + "<1,1,1,2>": "", + "<1,1,1,3>": "Do you want to save the changes?" + } + } + }, + "<2>": "BNYC", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Event Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/EVENTDES_WRITEERR.json b/SYSPROG/MSG/EVENTDES_WRITEERR.json new file mode 100644 index 0000000..29f9c52 --- /dev/null +++ b/SYSPROG/MSG/EVENTDES_WRITEERR.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "An error occurred writing \"%1%\" to the \"%2%\" table.", + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Event Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/FINDTEXT_NOT_FOUND.json b/SYSPROG/MSG/FINDTEXT_NOT_FOUND.json new file mode 100644 index 0000000..fb47ff7 --- /dev/null +++ b/SYSPROG/MSG/FINDTEXT_NOT_FOUND.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "\"%1%\" Not Found", + "<2>": "BO", + "<3>": "A", + "<4>": "*", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Search Text Not Found", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/FORMDES_ABOUT.json b/SYSPROG/MSG/FORMDES_ABOUT.json new file mode 100644 index 0000000..f38c93f --- /dev/null +++ b/SYSPROG/MSG/FORMDES_ABOUT.json @@ -0,0 +1,95 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": " OpenInsight Form Designer ", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.2", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2022" + } + } + }, + "<2>": "BO", + "<3>": "", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "About Form Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "FORMDES_32", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/INETFORM_IOERR.json b/SYSPROG/MSG/INETFORM_IOERR.json new file mode 100644 index 0000000..8fc6eab --- /dev/null +++ b/SYSPROG/MSG/INETFORM_IOERR.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "", + "<1,1,1,2>": "%s%", + "<1,1,1,3>": "" + } + } + }, + "<2>": "U", + "<3>": "A", + "<4>": "", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Form IO failure", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/INETFORM_NOTFOUND.json b/SYSPROG/MSG/INETFORM_NOTFOUND.json new file mode 100644 index 0000000..e1fabcc --- /dev/null +++ b/SYSPROG/MSG/INETFORM_NOTFOUND.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "", + "<1,1,1,2>": "Cannot find the specified form", + "<1,1,1,3>": "%1%" + } + } + }, + "<2>": "U", + "<3>": "A", + "<4>": "", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Form IO failure", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/INETFORM_NULLKEYERR.json b/SYSPROG/MSG/INETFORM_NULLKEYERR.json new file mode 100644 index 0000000..cbc553c --- /dev/null +++ b/SYSPROG/MSG/INETFORM_NULLKEYERR.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "", + "<1,1,1,2>": "Not all the key values are entered for a form", + "<1,1,1,3>": "" + } + } + }, + "<2>": "U", + "<3>": "A", + "<4>": "", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Data Validation Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/INETFORM_REQERR.json b/SYSPROG/MSG/INETFORM_REQERR.json new file mode 100644 index 0000000..da4570c --- /dev/null +++ b/SYSPROG/MSG/INETFORM_REQERR.json @@ -0,0 +1,77 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Data is required.", + "<1,1,1,2>": " The control %1% may not be skipped." + } + } + }, + "<2>": "BOK", + "<3>": "S", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "0,0,0", + "<11>": "200", + "<12>": "Data Validation Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/INETFORM_VALIDERR.json b/SYSPROG/MSG/INETFORM_VALIDERR.json new file mode 100644 index 0000000..07ae2d6 --- /dev/null +++ b/SYSPROG/MSG/INETFORM_VALIDERR.json @@ -0,0 +1,80 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Data does not meet validation conditions.", + "<1,1,1,2>": "", + "<1,1,1,3>": "Control: %1%", + "<1,1,1,4>": "Input: %2%", + "<1,1,1,5>": "Validation: %3%" + } + } + }, + "<2>": "BOK", + "<3>": "S", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "", + "<10>": "0,0,0", + "<11>": "300", + "<12>": "Data Validation Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/INET_CLOSE.json b/SYSPROG/MSG/INET_CLOSE.json new file mode 100644 index 0000000..4bfacbe --- /dev/null +++ b/SYSPROG/MSG/INET_CLOSE.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Closing this window will stop Gateway Services", + "<1,1,1,2>": "", + "<1,1,1,3>": "Do you really want to exit?" + } + } + }, + "<2>": "BNY", + "<3>": "W", + "<4>": "?", + "<5>": "2", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Gateway Services", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/INET_INVALIDPARAM.json b/SYSPROG/MSG/INET_INVALIDPARAM.json new file mode 100644 index 0000000..7fee439 --- /dev/null +++ b/SYSPROG/MSG/INET_INVALIDPARAM.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "", + "<1,1,1,2>": "Parameter %1% is not specified or invalid", + "<1,1,1,3>": "" + } + } + }, + "<2>": "U", + "<3>": "A", + "<4>": "", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Internet Request Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/MASS_REGISTER_REP_ERROR.json b/SYSPROG/MSG/MASS_REGISTER_REP_ERROR.json new file mode 100644 index 0000000..855375c --- /dev/null +++ b/SYSPROG/MSG/MASS_REGISTER_REP_ERROR.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "BOK", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Registration Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/MSG_ABOUT.json b/SYSPROG/MSG/MSG_ABOUT.json new file mode 100644 index 0000000..4b39d92 --- /dev/null +++ b/SYSPROG/MSG/MSG_ABOUT.json @@ -0,0 +1,95 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight Message Designer", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.2", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2022" + } + } + }, + "<2>": "BO", + "<3>": "", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "About Message Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "UIWORKSPACE", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/NOTESMAN_ABOUT.json b/SYSPROG/MSG/NOTESMAN_ABOUT.json new file mode 100644 index 0000000..2a3bb12 --- /dev/null +++ b/SYSPROG/MSG/NOTESMAN_ABOUT.json @@ -0,0 +1,99 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Notes Manager", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "About Notes Manager", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "NOTEMAN", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_CHANGEWARN.json b/SYSPROG/MSG/OIWIN_CHANGEWARN.json new file mode 100644 index 0000000..d3ef01c --- /dev/null +++ b/SYSPROG/MSG/OIWIN_CHANGEWARN.json @@ -0,0 +1,94 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "You have unsaved changes - Do you wish to continue? ", + "<1,1,1,2>": "", + "<1,1,1,3>": "(Changes will be lost if you click 'Yes')", + "<1,1,1,4>": "" + } + } + }, + "<2>": "B&Yes,&No", + "<3>": "", + "<4>": "?", + "<5>": "2", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "OpenInsight", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_DELETEWARN.json b/SYSPROG/MSG/OIWIN_DELETEWARN.json new file mode 100644 index 0000000..05f0199 --- /dev/null +++ b/SYSPROG/MSG/OIWIN_DELETEWARN.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Ok to delete the entry?", + "<2>": "BOC", + "<3>": "", + "<4>": "!", + "<5>": "2", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Warning", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_DSOERROR.json b/SYSPROG/MSG/OIWIN_DSOERROR.json new file mode 100644 index 0000000..59937bf --- /dev/null +++ b/SYSPROG/MSG/OIWIN_DSOERROR.json @@ -0,0 +1,92 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Unspecified error occured during", + "<1,1,1,2>": "dataset operation" + } + } + }, + "<2>": "BOK", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Dataset Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_GETROWNUM.json b/SYSPROG/MSG/OIWIN_GETROWNUM.json new file mode 100644 index 0000000..eb6a13e --- /dev/null +++ b/SYSPROG/MSG/OIWIN_GETROWNUM.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Enter row number (1 to %1%)", + "<2>": "R", + "<3>": "", + "<4>": "0", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "200", + "<12>": "Row Number", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_LOCKERR.json b/SYSPROG/MSG/OIWIN_LOCKERR.json new file mode 100644 index 0000000..ac75fdb --- /dev/null +++ b/SYSPROG/MSG/OIWIN_LOCKERR.json @@ -0,0 +1,93 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "The entry is locked and may not", + "<1,1,1,2>": "be modified. Do you wish to ", + "<1,1,1,3>": "continue to view the entry?" + } + } + }, + "<2>": "BOC", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Lock Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_NOHELPINFO.json b/SYSPROG/MSG/OIWIN_NOHELPINFO.json new file mode 100644 index 0000000..fd514ea --- /dev/null +++ b/SYSPROG/MSG/OIWIN_NOHELPINFO.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "No help is available.", + "<2>": "BOK", + "<3>": "", + "<4>": "*", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Information", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_NOLOCKERR.json b/SYSPROG/MSG/OIWIN_NOLOCKERR.json new file mode 100644 index 0000000..67f0ec2 --- /dev/null +++ b/SYSPROG/MSG/OIWIN_NOLOCKERR.json @@ -0,0 +1,92 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "The entry is locked and may ", + "<1,1,1,2>": "not be modified." + } + } + }, + "<2>": "BOK", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Update Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_NOOPTINFO.json b/SYSPROG/MSG/OIWIN_NOOPTINFO.json new file mode 100644 index 0000000..61ac849 --- /dev/null +++ b/SYSPROG/MSG/OIWIN_NOOPTINFO.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "No options are available.", + "<2>": "BOK", + "<3>": "", + "<4>": "*", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Information", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_NULLKEYERR.json b/SYSPROG/MSG/OIWIN_NULLKEYERR.json new file mode 100644 index 0000000..d36abe7 --- /dev/null +++ b/SYSPROG/MSG/OIWIN_NULLKEYERR.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "All key values are empty.", + "<2>": "BOK", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Read/Write Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_OVERWRITE.json b/SYSPROG/MSG/OIWIN_OVERWRITE.json new file mode 100644 index 0000000..1790f4f --- /dev/null +++ b/SYSPROG/MSG/OIWIN_OVERWRITE.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Row exists, Overwrite?", + "<2>": "B&Yes,&No", + "<3>": "", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Update", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_QBFINITOFFERR.json b/SYSPROG/MSG/OIWIN_QBFINITOFFERR.json new file mode 100644 index 0000000..54e62fc --- /dev/null +++ b/SYSPROG/MSG/OIWIN_QBFINITOFFERR.json @@ -0,0 +1,94 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Query By Form is not active.", + "<1,1,1,2>": "You must initialize QBF and ", + "<1,1,1,3>": "enter search criteria before", + "<1,1,1,4>": "executing." + } + } + }, + "<2>": "BOK", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "QBF Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_READERR.json b/SYSPROG/MSG/OIWIN_READERR.json new file mode 100644 index 0000000..6c6b63a --- /dev/null +++ b/SYSPROG/MSG/OIWIN_READERR.json @@ -0,0 +1,93 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "An error has occured while reading ", + "<1,1,1,2>": "rows for the form entry.", + "<1,1,1,3>": "" + } + } + }, + "<2>": "BOK", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Read Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_READQBFCLOSE.json b/SYSPROG/MSG/OIWIN_READQBFCLOSE.json new file mode 100644 index 0000000..dcfbd1f --- /dev/null +++ b/SYSPROG/MSG/OIWIN_READQBFCLOSE.json @@ -0,0 +1,93 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Viewing this entry will close the current QBF session because it is not in the active browse list.", + "<1,1,1,2>": "", + "<1,1,1,3>": "OK to continue?" + } + } + }, + "<2>": "BNY", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "QBF Browse List Active", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_READSUBERR.json b/SYSPROG/MSG/OIWIN_READSUBERR.json new file mode 100644 index 0000000..31f09fa --- /dev/null +++ b/SYSPROG/MSG/OIWIN_READSUBERR.json @@ -0,0 +1,92 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "An error had occured while reading ", + "<1,1,1,2>": "subsidiary rows for the form entry." + } + } + }, + "<2>": "BOK", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Read Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_REQERR.json b/SYSPROG/MSG/OIWIN_REQERR.json new file mode 100644 index 0000000..3f0051e --- /dev/null +++ b/SYSPROG/MSG/OIWIN_REQERR.json @@ -0,0 +1,93 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Data is required. The ", + "<1,1,1,2>": "%1%", + "<1,1,1,3>": "control(s) may not be skipped." + } + } + }, + "<2>": "BOK", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Data Validation Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_RESETSEQKEY.json b/SYSPROG/MSG/OIWIN_RESETSEQKEY.json new file mode 100644 index 0000000..11f6f46 --- /dev/null +++ b/SYSPROG/MSG/OIWIN_RESETSEQKEY.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Please enter the new starting value for the %1% table sequential key counter", + "<2>": "RE", + "<3>": "", + "<4>": "0", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Reset Sequential Key Counter", + "<13>": "", + "<14>": "1", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "-1234567890", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_RESETSKERR.json b/SYSPROG/MSG/OIWIN_RESETSKERR.json new file mode 100644 index 0000000..cc47146 --- /dev/null +++ b/SYSPROG/MSG/OIWIN_RESETSKERR.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Error resetting sequential key counter [%1%]", + "<2>": "BO", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Reset Sequential Key", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_SAVEWARN.json b/SYSPROG/MSG/OIWIN_SAVEWARN.json new file mode 100644 index 0000000..f4c8009 --- /dev/null +++ b/SYSPROG/MSG/OIWIN_SAVEWARN.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Would you like to save changes to the entry?", + "<2>": "B&Yes,&No,&Cancel", + "<3>": "", + "<4>": "?", + "<5>": "3", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "OpenInsight", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_VALIDERR.json b/SYSPROG/MSG/OIWIN_VALIDERR.json new file mode 100644 index 0000000..e0300b6 --- /dev/null +++ b/SYSPROG/MSG/OIWIN_VALIDERR.json @@ -0,0 +1,92 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Data does not meet", + "<1,1,1,2>": "validation conditions." + } + } + }, + "<2>": "BOK", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Data Validation Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_ALERT.json b/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_ALERT.json new file mode 100644 index 0000000..2160ff4 --- /dev/null +++ b/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_ALERT.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "BO", + "<3>": "", + "<4>": "*", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_BEFOREUNLOAD.json b/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_BEFOREUNLOAD.json new file mode 100644 index 0000000..b57e21c --- /dev/null +++ b/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_BEFOREUNLOAD.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Are you sure you wish to leave this page?", + "<2>": "B&Leave,&Stay", + "<3>": "", + "<4>": "*", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_CONFIRM.json b/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_CONFIRM.json new file mode 100644 index 0000000..61f0f8a --- /dev/null +++ b/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_CONFIRM.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "BOC", + "<3>": "", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_PROMPT.json b/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_PROMPT.json new file mode 100644 index 0000000..b662f00 --- /dev/null +++ b/SYSPROG/MSG/OIWIN_WEBSHOWDIALOG_PROMPT.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "RE", + "<3>": "", + "<4>": "?", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OIWIN_WRITELOCKERR.json b/SYSPROG/MSG/OIWIN_WRITELOCKERR.json new file mode 100644 index 0000000..eed5bc5 --- /dev/null +++ b/SYSPROG/MSG/OIWIN_WRITELOCKERR.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Update or update lock error.", + "<2>": "BOK", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Update Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_ABOUT.json b/SYSPROG/MSG/OI_ABOUT.json new file mode 100644 index 0000000..be2fb34 --- /dev/null +++ b/SYSPROG/MSG/OI_ABOUT.json @@ -0,0 +1,95 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight Development Suite", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.2.1", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2023" + } + } + }, + "<2>": "BO", + "<3>": "", + "<4>": "0", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "About OpenInsight", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "DBMANAGER", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_ALIAS_ERROR.json b/SYSPROG/MSG/OI_ALIAS_ERROR.json new file mode 100644 index 0000000..738b273 --- /dev/null +++ b/SYSPROG/MSG/OI_ALIAS_ERROR.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Unable to alias to %1%", + "<2>": "BO", + "<3>": "", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "-2", + "<10>": "0", + "<11>": "", + "<12>": "Alias Error!", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "0", + "<46>": "-2", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "-2", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_ATTACH_ERROR.json b/SYSPROG/MSG/OI_ATTACH_ERROR.json new file mode 100644 index 0000000..99048d0 --- /dev/null +++ b/SYSPROG/MSG/OI_ATTACH_ERROR.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "%1%", + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Attach Error!", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_ATTACH_ERRORS.json b/SYSPROG/MSG/OI_ATTACH_ERRORS.json new file mode 100644 index 0000000..5de44de --- /dev/null +++ b/SYSPROG/MSG/OI_ATTACH_ERRORS.json @@ -0,0 +1,97 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Attaching tables encountered the following Errors:", + "<1,1,1,2>": "", + "<1,1,1,3>": "%1%" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Attach Error!", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_COMPILATION_ERRORS.json b/SYSPROG/MSG/OI_COMPILATION_ERRORS.json new file mode 100644 index 0000000..a331775 --- /dev/null +++ b/SYSPROG/MSG/OI_COMPILATION_ERRORS.json @@ -0,0 +1,97 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Errors found during compilation.", + "<1,1,1,2>": "", + "<1,1,1,3>": "%1%" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Compilation Errors", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_COMPILATION_SUCCESSFUL.json b/SYSPROG/MSG/OI_COMPILATION_SUCCESSFUL.json new file mode 100644 index 0000000..51e5fd5 --- /dev/null +++ b/SYSPROG/MSG/OI_COMPILATION_SUCCESSFUL.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Compilation Successful!", + "<2>": "BO", + "<3>": "A", + "<4>": "*", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Compilation Successful", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_DIR_NOT_EXISTS.json b/SYSPROG/MSG/OI_DIR_NOT_EXISTS.json new file mode 100644 index 0000000..08e0236 --- /dev/null +++ b/SYSPROG/MSG/OI_DIR_NOT_EXISTS.json @@ -0,0 +1,77 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Directory %1% does not exist. ", + "<1,1,1,2>": "Create it?" + } + } + }, + "<2>": "BOC", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-2", + "<7>": "-2", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Create Directory?", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_GOTOLINE.json b/SYSPROG/MSG/OI_GOTOLINE.json new file mode 100644 index 0000000..bf22e16 --- /dev/null +++ b/SYSPROG/MSG/OI_GOTOLINE.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Enter Line Number to Go To", + "<2>": "RC", + "<3>": "A", + "<4>": "", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Goto Line Number", + "<13>": "(MD0)", + "<14>": "", + "<15>": "0", + "<16>": "SYSED", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_LOCK_ERROR.json b/SYSPROG/MSG/OI_LOCK_ERROR.json new file mode 100644 index 0000000..9dcafe8 --- /dev/null +++ b/SYSPROG/MSG/OI_LOCK_ERROR.json @@ -0,0 +1,96 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Unable to lock the %1% record", + "<1,1,1,2>": " in the %2% table!" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Lock Error!", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_NO_TABLE_END.json b/SYSPROG/MSG/OI_NO_TABLE_END.json new file mode 100644 index 0000000..9262214 --- /dev/null +++ b/SYSPROG/MSG/OI_NO_TABLE_END.json @@ -0,0 +1,97 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "No Table Selected.", + "<1,1,1,2>": "", + "<1,1,1,3>": "Process will end." + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "No Table ", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_OPEN_ERROR.json b/SYSPROG/MSG/OI_OPEN_ERROR.json new file mode 100644 index 0000000..e69db00 --- /dev/null +++ b/SYSPROG/MSG/OI_OPEN_ERROR.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Unable to open the %1% table!", + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Open Error!", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_PROGRAM_NOT_FOUND.json b/SYSPROG/MSG/OI_PROGRAM_NOT_FOUND.json new file mode 100644 index 0000000..475d4d4 --- /dev/null +++ b/SYSPROG/MSG/OI_PROGRAM_NOT_FOUND.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "The program name passed in the RUN command", + "<1,1,1,2>": "%1%", + "<1,1,1,3>": "was not found and will not be executed." + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Program Not Found", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_READ_ERROR.json b/SYSPROG/MSG/OI_READ_ERROR.json new file mode 100644 index 0000000..ab06ed2 --- /dev/null +++ b/SYSPROG/MSG/OI_READ_ERROR.json @@ -0,0 +1,96 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Unable to read the %1% record ", + "<1,1,1,2>": "in the %2% table!" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Read Error!", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_SAVE_CHANGES.json b/SYSPROG/MSG/OI_SAVE_CHANGES.json new file mode 100644 index 0000000..591dc87 --- /dev/null +++ b/SYSPROG/MSG/OI_SAVE_CHANGES.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Do you wish to save changes?", + "<2>": "BNYC", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Save Changes", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_STATEMENT_ERRORS.json b/SYSPROG/MSG/OI_STATEMENT_ERRORS.json new file mode 100644 index 0000000..2d9f717 --- /dev/null +++ b/SYSPROG/MSG/OI_STATEMENT_ERRORS.json @@ -0,0 +1,97 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Entered Statement contains Errors:", + "<1,1,1,2>": "", + "<1,1,1,3>": "%1%" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Syntax Error!", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_UNLOCK_ERROR.json b/SYSPROG/MSG/OI_UNLOCK_ERROR.json new file mode 100644 index 0000000..617301a --- /dev/null +++ b/SYSPROG/MSG/OI_UNLOCK_ERROR.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Unable to unlock the %1% record in the %2% table!", + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Unlock Error!", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_VIEW_ONLY.json b/SYSPROG/MSG/OI_VIEW_ONLY.json new file mode 100644 index 0000000..3d4501c --- /dev/null +++ b/SYSPROG/MSG/OI_VIEW_ONLY.json @@ -0,0 +1,97 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "The %1% record", + "<1,1,1,2>": " in the %2% table is locked and may not be be modified.", + "<1,1,1,3>": "Do you wish to view the record anyway?" + } + } + }, + "<2>": "BNY", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Lock Error!", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/OI_WRITE_ERROR.json b/SYSPROG/MSG/OI_WRITE_ERROR.json new file mode 100644 index 0000000..8571632 --- /dev/null +++ b/SYSPROG/MSG/OI_WRITE_ERROR.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Unable to Write the %1% record in the %2% table!", + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Write Error!", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/PARM_ERR.json b/SYSPROG/MSG/PARM_ERR.json new file mode 100644 index 0000000..a2bb05f --- /dev/null +++ b/SYSPROG/MSG/PARM_ERR.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "An invalid parameter was detected in a procedure call.", + "<2>": "BO", + "<3>": "W", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Parameter Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "MS Sans Serif", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "1", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/POPUP_ABOUT.json b/SYSPROG/MSG/POPUP_ABOUT.json new file mode 100644 index 0000000..75e478c --- /dev/null +++ b/SYSPROG/MSG/POPUP_ABOUT.json @@ -0,0 +1,95 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight Popup Designer", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.2", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2022" + } + } + }, + "<2>": "BO", + "<3>": "", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "About Popup Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "UIWORKSPACE", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/QRY_ERR.json b/SYSPROG/MSG/QRY_ERR.json new file mode 100644 index 0000000..3f69ef6 --- /dev/null +++ b/SYSPROG/MSG/QRY_ERR.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "An unspecified error occurred while creating or using a Query", + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Query Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "MS Sans Serif", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "1", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/QUICKHELP_ABOUT.json b/SYSPROG/MSG/QUICKHELP_ABOUT.json new file mode 100644 index 0000000..fe511bf --- /dev/null +++ b/SYSPROG/MSG/QUICKHELP_ABOUT.json @@ -0,0 +1,80 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight QuickHelp Designer", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "About QuickHelp Designer", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "UIWORKSPACE", + "<17>": "0", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RB_ABOUT.json b/SYSPROG/MSG/RB_ABOUT.json new file mode 100644 index 0000000..d342453 --- /dev/null +++ b/SYSPROG/MSG/RB_ABOUT.json @@ -0,0 +1,80 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight Report Builder ", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "About Report Builder+", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "REPORTBUILDER", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RDKV_SELBY.json b/SYSPROG/MSG/RDKV_SELBY.json new file mode 100644 index 0000000..d7c14e7 --- /dev/null +++ b/SYSPROG/MSG/RDKV_SELBY.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Enter the Username ", + "<2>": "RE", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Select Entities Modified By...", + "<13>": "", + "<14>": "SYSPROG", + "<15>": "0", + "<16>": "DBMANAGER", + "<17>": "0", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "1", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RDKV_SELSINCE.json b/SYSPROG/MSG/RDKV_SELSINCE.json new file mode 100644 index 0000000..50d82cb --- /dev/null +++ b/SYSPROG/MSG/RDKV_SELSINCE.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Enter date/time (mm/dd/yyyy hh:mm):", + "<2>": "RE", + "<3>": "", + "<4>": "B", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "-2", + "<10>": "0", + "<11>": "", + "<12>": "Select Entities Since...", + "<13>": "(DT)", + "<14>": "11/13/04 11:07AM", + "<15>": "0", + "<16>": "SYSPROG*IMAGE*PNG*RTI_IDE_TIMEDATE", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "1", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "0", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RDKV_SELSINCEGIT.json b/SYSPROG/MSG/RDKV_SELSINCEGIT.json new file mode 100644 index 0000000..3ab4e5c --- /dev/null +++ b/SYSPROG/MSG/RDKV_SELSINCEGIT.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Enter date (mm/dd/yyyy):", + "<2>": "RE", + "<3>": "", + "<4>": "B", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "-2", + "<10>": "0", + "<11>": "", + "<12>": "Select Entities In Git Commits Since...", + "<13>": "(D)", + "<14>": "11/06/20", + "<15>": "0", + "<16>": "SYSPROG*IMAGE*PNG*RTI_IDE_TIMEDATE", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "1", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "0", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RDK_ABOUT.json b/SYSPROG/MSG/RDK_ABOUT.json new file mode 100644 index 0000000..9331a10 --- /dev/null +++ b/SYSPROG/MSG/RDK_ABOUT.json @@ -0,0 +1,99 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Runtime Deployment Kit", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "255,255,255", + "<10>": "", + "<11>": "300", + "<12>": "About Runtime Deployment Kit", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "RDK_32", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_DELETEAPPLICATION.json b/SYSPROG/MSG/RTI_DELETEAPPLICATION.json new file mode 100644 index 0000000..97d0af9 --- /dev/null +++ b/SYSPROG/MSG/RTI_DELETEAPPLICATION.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Deleting the %1% Application...", + "<2>": "G", + "<3>": "", + "<4>": "0", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Deleting...", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": " ", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "100", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "FileDestroyXP.avi", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "-2", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_DSN_CONTEXTMENU_TESTRUN_ITEM_SELECTED.json b/SYSPROG/MSG/RTI_DSN_CONTEXTMENU_TESTRUN_ITEM_SELECTED.json new file mode 100644 index 0000000..63d9643 --- /dev/null +++ b/SYSPROG/MSG/RTI_DSN_CONTEXTMENU_TESTRUN_ITEM_SELECTED.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Selected Item ID: %1%", + "<2>": "BO", + "<3>": "", + "<4>": "B", + "<5>": "1", + "<6>": "-2", + "<7>": "-2", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "ContextMenu TestRun Item Selected", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_CONTEXTMENU_M", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "3", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "750", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_DSN_OIEVENT_ERR.json b/SYSPROG/MSG/RTI_DSN_OIEVENT_ERR.json new file mode 100644 index 0000000..0e2fa95 --- /dev/null +++ b/SYSPROG/MSG/RTI_DSN_OIEVENT_ERR.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Error in Event Designer %1%", + "<2>": "BO", + "<3>": "", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Event Designer Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "", + "<44>": "0", + "<45>": "-2", + "<46>": "-2", + "<47>": "An error was found in the Event Designer and your changes cannot be saved: ", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_EDITOR_SP_FILTER.json b/SYSPROG/MSG/RTI_EDITOR_SP_FILTER.json new file mode 100644 index 0000000..3f722d1 --- /dev/null +++ b/SYSPROG/MSG/RTI_EDITOR_SP_FILTER.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Enter a SELECT statement for filtering the Stored Procedures:", + "<2>": "RE", + "<3>": "A", + "<4>": "?", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "400", + "<12>": "Stored Procedure Filter", + "<13>": "", + "<14>": "SELECT SYSPROCS ", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "1", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_ENTITY_COMPILE.json b/SYSPROG/MSG/RTI_ENTITY_COMPILE.json new file mode 100644 index 0000000..c310073 --- /dev/null +++ b/SYSPROG/MSG/RTI_ENTITY_COMPILE.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "%1%", + "<2>": "BO", + "<3>": "A", + "<4>": "!", + "<5>": "1", + "<6>": "-2", + "<7>": "-2", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Compile Entities", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_ENTITY_COMPILEWARN.json b/SYSPROG/MSG/RTI_ENTITY_COMPILEWARN.json new file mode 100644 index 0000000..8fcfc41 --- /dev/null +++ b/SYSPROG/MSG/RTI_ENTITY_COMPILEWARN.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Are you certain you want to compile the following entities?", + "<1,1,1,2>": "", + "<1,1,1,3>": "%1%" + } + } + }, + "<2>": "BNY", + "<3>": "A", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Warning", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_ENTITY_DELETEWARN.json b/SYSPROG/MSG/RTI_ENTITY_DELETEWARN.json new file mode 100644 index 0000000..0c58153 --- /dev/null +++ b/SYSPROG/MSG/RTI_ENTITY_DELETEWARN.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Are you certain you want to delete the following entities?", + "<1,1,1,2>": "", + "<1,1,1,3>": "%1%" + } + } + }, + "<2>": "BNY", + "<3>": "A", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Warning", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_ENTITY_LOCK.json b/SYSPROG/MSG/RTI_ENTITY_LOCK.json new file mode 100644 index 0000000..2f5416d --- /dev/null +++ b/SYSPROG/MSG/RTI_ENTITY_LOCK.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "The entity %1% is currently locked.", + "<1,1,1,2>": "", + "<1,1,1,3>": "Deletion/updatings of this entity is not allowed." + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Application Manager", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_ERROR.json b/SYSPROG/MSG/RTI_ERROR.json new file mode 100644 index 0000000..42040a7 --- /dev/null +++ b/SYSPROG/MSG/RTI_ERROR.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "An error has occured.", + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Error ", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_GIT_ERROR.json b/SYSPROG/MSG/RTI_GIT_ERROR.json new file mode 100644 index 0000000..44d05c2 --- /dev/null +++ b/SYSPROG/MSG/RTI_GIT_ERROR.json @@ -0,0 +1,78 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "The %1% operation failed!", + "<1,1,1,2>": "", + "<1,1,1,3>": "%2%" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-2", + "<7>": "-2", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Git Interface", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_GIT_SELECT.json b/SYSPROG/MSG/RTI_GIT_SELECT.json new file mode 100644 index 0000000..8f77182 --- /dev/null +++ b/SYSPROG/MSG/RTI_GIT_SELECT.json @@ -0,0 +1,77 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Selecting ", + "<1,1,1,2>": "...Please Wait..." + } + } + }, + "<2>": "GY", + "<3>": "A", + "<4>": "*", + "<5>": "", + "<6>": "-2", + "<7>": "-2", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "500", + "<12>": "OI Git", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_GIT_SUCCESS.json b/SYSPROG/MSG/RTI_GIT_SUCCESS.json new file mode 100644 index 0000000..4e99cae --- /dev/null +++ b/SYSPROG/MSG/RTI_GIT_SUCCESS.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "The %1% operation completed successfully. Do you wish to view the log file?", + "<2>": "BNY", + "<3>": "A", + "<4>": "*", + "<5>": "1", + "<6>": "-2", + "<7>": "-2", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Git Interface", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_IDE_ABOUT.json b/SYSPROG/MSG/RTI_IDE_ABOUT.json new file mode 100644 index 0000000..5d94bc4 --- /dev/null +++ b/SYSPROG/MSG/RTI_IDE_ABOUT.json @@ -0,0 +1,95 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight Version 9.999999723", + "<1,1,1,2>": "", + "<1,1,1,3>": "Copyright 2017, Revelation Software", + "<1,1,1,4>": "", + "<1,1,1,5>": "All rights reserved. " + } + } + }, + "<2>": "BO", + "<3>": "", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "About this IDE....", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "SYSPROG*IMAGE*ICO*OI_IDE", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "IDE About...", + "<48>": "", + "<49>": "", + "<50>": "SYSPROG*OIWIN**Resize", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_IDE_DEFINE_DB.json b/SYSPROG/MSG/RTI_IDE_DEFINE_DB.json new file mode 100644 index 0000000..ec8590f --- /dev/null +++ b/SYSPROG/MSG/RTI_IDE_DEFINE_DB.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Do you wish to save the current database definition?", + "<2>": "BNY", + "<3>": "", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Save Database Definition", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "SYSPROG*IMAGE*PNG*RTI_IDE_DEFINEDB_MSGICON", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_IDE_SAVEWARN_DB.json b/SYSPROG/MSG/RTI_IDE_SAVEWARN_DB.json new file mode 100644 index 0000000..06f9e41 --- /dev/null +++ b/SYSPROG/MSG/RTI_IDE_SAVEWARN_DB.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "The database definition has changed. Do you wish to save your changes?", + "<2>": "BNYC", + "<3>": "", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Save Database Definition", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "SYSPROG*IMAGE*PNG*RTI_IDE_DEFINEDB_MSGICON", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_INDEXES_ADD.json b/SYSPROG/MSG/RTI_INDEXES_ADD.json new file mode 100644 index 0000000..7bb5c4c --- /dev/null +++ b/SYSPROG/MSG/RTI_INDEXES_ADD.json @@ -0,0 +1,92 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Currently Adding Index...", + "<1,1,1,2>": "Please wait..." + } + } + }, + "<2>": "U", + "<3>": "", + "<4>": "!", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Index Add", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": " ", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "-2", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_INDEX_ALREADY_EXISTS.json b/SYSPROG/MSG/RTI_INDEX_ALREADY_EXISTS.json new file mode 100644 index 0000000..1c962f9 --- /dev/null +++ b/SYSPROG/MSG/RTI_INDEX_ALREADY_EXISTS.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "This column already contains a %1% index.", + "<2>": "BO", + "<3>": "", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "Index Exists", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "-2", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_INFO.json b/SYSPROG/MSG/RTI_INFO.json new file mode 100644 index 0000000..b3e80fd --- /dev/null +++ b/SYSPROG/MSG/RTI_INFO.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "BO", + "<3>": "A", + "<4>": "*", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "OI Git", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_OK.json b/SYSPROG/MSG/RTI_OK.json new file mode 100644 index 0000000..b04a03d --- /dev/null +++ b/SYSPROG/MSG/RTI_OK.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Processing Complete", + "<2>": "BO", + "<3>": "A", + "<4>": "*", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "OI Git", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_QUICKPAINT_COLEXISTS.json b/SYSPROG/MSG/RTI_QUICKPAINT_COLEXISTS.json new file mode 100644 index 0000000..9d5c771 --- /dev/null +++ b/SYSPROG/MSG/RTI_QUICKPAINT_COLEXISTS.json @@ -0,0 +1,96 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Column %1% has already been added to the list of columns to display in the new window.", + "<1,1,1,2>": "Do you wish to add it again?" + } + } + }, + "<2>": "BNY", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-2", + "<7>": "-2", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Column Already Selected", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI Semibold", + "<18,1,2>": "-11", + "<18,1,3>": "600", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_TCL_FETCH_QUERY_OVERWRITE.json b/SYSPROG/MSG/RTI_TCL_FETCH_QUERY_OVERWRITE.json new file mode 100644 index 0000000..58daa27 --- /dev/null +++ b/SYSPROG/MSG/RTI_TCL_FETCH_QUERY_OVERWRITE.json @@ -0,0 +1,94 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "You have requested a process which will overwrite the pending SELECT data.", + "<1,1,1,2>": "", + "<1,1,1,3>": "Do you want to overwrite the previous SELECT data?", + "<1,1,1,4>": "" + } + } + }, + "<2>": "BNY", + "<3>": "", + "<4>": "!", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "-2", + "<10>": "-2", + "<11>": "", + "<12>": "TCL Fetch Query", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": { + "<18,1>": { + "<18,1,1>": "Segoe UI", + "<18,1,2>": "-12", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "1", + "<18,1,8>": "0", + "<18,1,9>": "0", + "<18,1,10>": "0", + "<18,1,11>": "0", + "<18,1,12>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "0", + "<25>": "0", + "<26>": "0", + "<27>": "0", + "<28>": "0", + "<29>": "", + "<30>": "", + "<31>": "-2", + "<32>": "-2", + "<33>": "-2", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "0", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "0", + "<43>": "1", + "<44>": "0", + "<45>": "-2", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "0", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "-2", + "<57>": "-2", + "<58>": "-2", + "<59>": "-2", + "<60>": "-2" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_UTL_GASGAUGE.json b/SYSPROG/MSG/RTI_UTL_GASGAUGE.json new file mode 100644 index 0000000..93acc34 --- /dev/null +++ b/SYSPROG/MSG/RTI_UTL_GASGAUGE.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "...Please Wait...", + "<2>": "GY", + "<3>": "A", + "<4>": "", + "<5>": "", + "<6>": "-1", + "<7>": "-1", + "<8>": "L", + "<9>": "", + "<10>": "", + "<11>": "500", + "<12>": "Processing", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "0", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/RTI_YESNO.json b/SYSPROG/MSG/RTI_YESNO.json new file mode 100644 index 0000000..61708a2 --- /dev/null +++ b/SYSPROG/MSG/RTI_YESNO.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "BNY", + "<3>": "A", + "<4>": "?", + "<5>": "2", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "OI Git", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/SDM_CREATE_INDEX.json b/SYSPROG/MSG/SDM_CREATE_INDEX.json new file mode 100644 index 0000000..6eac8b3 --- /dev/null +++ b/SYSPROG/MSG/SDM_CREATE_INDEX.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Create %1% index for column %2% ?", + "<2>": "BO", + "<3>": "A", + "<4>": "?", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Create Index", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/SQLEXP_ABOUT.json b/SYSPROG/MSG/SQLEXP_ABOUT.json new file mode 100644 index 0000000..50bca25 --- /dev/null +++ b/SYSPROG/MSG/SQLEXP_ABOUT.json @@ -0,0 +1,80 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight Data Warehousing Manager", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "About Data Warehousing Manager", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "SQLMGR_ICON", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/SRP_MAIL_DEMO.json b/SYSPROG/MSG/SRP_MAIL_DEMO.json new file mode 100644 index 0000000..945b6e7 --- /dev/null +++ b/SYSPROG/MSG/SRP_MAIL_DEMO.json @@ -0,0 +1,33 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Email was successfully sent!", + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-2", + "<7>": "-2", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "SRP Mail Demo", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "SRPICON", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/UI_ABOUT.json b/SYSPROG/MSG/UI_ABOUT.json new file mode 100644 index 0000000..348ee91 --- /dev/null +++ b/SYSPROG/MSG/UI_ABOUT.json @@ -0,0 +1,80 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight User Interface Workspace", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "About User Interface Workspace", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "UIWORKSPACE", + "<17>": "0", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/WORKSPACE_ABOUT.json b/SYSPROG/MSG/WORKSPACE_ABOUT.json new file mode 100644 index 0000000..e336568 --- /dev/null +++ b/SYSPROG/MSG/WORKSPACE_ABOUT.json @@ -0,0 +1,80 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight Workspace", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "About OpenInsight Workspace", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "POPUP", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/WP_ABOUT.json b/SYSPROG/MSG/WP_ABOUT.json new file mode 100644 index 0000000..d7f1dcc --- /dev/null +++ b/SYSPROG/MSG/WP_ABOUT.json @@ -0,0 +1,99 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "HTML Publisher", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 9.3", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2011" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "255,255,255", + "<10>": "", + "<11>": "300", + "<12>": "About HTML Publisher", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "WEB2", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/XML_ABOUT.json b/SYSPROG/MSG/XML_ABOUT.json new file mode 100644 index 0000000..25d82c2 --- /dev/null +++ b/SYSPROG/MSG/XML_ABOUT.json @@ -0,0 +1,80 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "OpenInsight XML Workspace", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "About XML Workspace", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "XMLWORKSPACE", + "<17>": "0", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/XML_EXPORT_ERROR.json b/SYSPROG/MSG/XML_EXPORT_ERROR.json new file mode 100644 index 0000000..4af403e --- /dev/null +++ b/SYSPROG/MSG/XML_EXPORT_ERROR.json @@ -0,0 +1,70 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "", + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "XML Export Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/XML_IMPORTER_ABOUT.json b/SYSPROG/MSG/XML_IMPORTER_ABOUT.json new file mode 100644 index 0000000..5e3aa6f --- /dev/null +++ b/SYSPROG/MSG/XML_IMPORTER_ABOUT.json @@ -0,0 +1,80 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "XML Importer Window", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "About Query Window", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "QUERY", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/XML_NODET_SCHEMA.json b/SYSPROG/MSG/XML_NODET_SCHEMA.json new file mode 100644 index 0000000..cd8bc0d --- /dev/null +++ b/SYSPROG/MSG/XML_NODET_SCHEMA.json @@ -0,0 +1,97 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "Cannot determine the Schema.", + "<1,1,1,2>": "", + "<1,1,1,3>": "Process will end." + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Schema Error", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "Tahoma", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "3", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/XML_PUBLISHER_ABOUT.json b/SYSPROG/MSG/XML_PUBLISHER_ABOUT.json new file mode 100644 index 0000000..3a3dafc --- /dev/null +++ b/SYSPROG/MSG/XML_PUBLISHER_ABOUT.json @@ -0,0 +1,80 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": { + "<1,1>": { + "<1,1,1>": { + "<1,1,1,1>": "XML Publisher Window", + "<1,1,1,2>": "", + "<1,1,1,3>": "Version 10.0", + "<1,1,1,4>": "", + "<1,1,1,5>": "Copyright © Revelation Software, 1992-2014" + } + } + }, + "<2>": "BO", + "<3>": "A", + "<4>": "B", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "C", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "About Query Window", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "QUERY", + "<17>": "1", + "<18>": "", + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/MSG/XML_READ_ERR.json b/SYSPROG/MSG/XML_READ_ERR.json new file mode 100644 index 0000000..885fb9c --- /dev/null +++ b/SYSPROG/MSG/XML_READ_ERR.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "Unable to read XML data record %1%", + "<2>": "BO", + "<3>": "A", + "<4>": "H", + "<5>": "1", + "<6>": "-1", + "<7>": "-1", + "<8>": "T", + "<9>": "", + "<10>": "", + "<11>": "", + "<12>": "Read Failed", + "<13>": "", + "<14>": "", + "<15>": "0", + "<16>": "", + "<17>": "1", + "<18>": { + "<18,1>": { + "<18,1,1>": "MS Sans Serif", + "<18,1,2>": "-11", + "<18,1,3>": "400", + "<18,1,4>": "0", + "<18,1,5>": "0", + "<18,1,6>": "0", + "<18,1,7>": "0", + "<18,1,8>": "34", + "<18,1,9>": "0", + "<18,1,10>": "1", + "<18,1,11>": "2", + "<18,1,12>": "1", + "<18,1,13>": "0", + "<18,1,14>": "0", + "<18,1,15>": "0", + "<18,1,16>": "0" + } + }, + "<19>": "0", + "<20>": "", + "<21>": "0", + "<22>": "", + "<23>": "", + "<24>": "", + "<25>": "", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "", + "<46>": "", + "<47>": "", + "<48>": "", + "<49>": "", + "<50>": "", + "<51>": "", + "<52>": "", + "<53>": "", + "<54>": "", + "<55>": "", + "<56>": "", + "<57>": "", + "<58>": "", + "<59>": "", + "<60>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/DEFDLGTEMPLATE.json b/SYSPROG/OIWIN/DEFDLGTEMPLATE.json new file mode 100644 index 0000000..58e5f24 --- /dev/null +++ b/SYSPROG/OIWIN/DEFDLGTEMPLATE.json @@ -0,0 +1,104 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "300", + "<2>": "0", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "DEFDLGTEMPLATE", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "137", + "<1,6>": "173", + "<1,7>": "-494", + "<1,8>": "-321", + "<1,9>": "Untitled", + "<1,10>": { + "<1,10,1>": "0x94c00000", + "<1,10,2>": "0x1" + }, + "<1,11>": "0x0", + "<1,12>": "0", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "0", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "0", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "0", + "<1,24,6>": "0" + }, + "<1,25>": "0", + "<1,26>": "0", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": { + "<1,32,1>": "0x7FFFE", + "<1,32,2>": "0xF001E988" + }, + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0x10001", + "<1,37,2>": "0x10001" + }, + "<1,38>": { + "<1,38,1>": "1", + "<1,38,2>": "1" + }, + "<1,39>": "", + "<1,40>": "0", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "" + } + }, + "record3": { + "<1>": "" + }, + "record4": { + "<1>": "", + "<2>": { + "<2,1>": "", + "<2,2>": "", + "<2,3>": "", + "<2,4>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/DEFDTEMPLATE.json b/SYSPROG/OIWIN/DEFDTEMPLATE.json new file mode 100644 index 0000000..8564274 --- /dev/null +++ b/SYSPROG/OIWIN/DEFDTEMPLATE.json @@ -0,0 +1,575 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "300", + "<2>": "0", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "DEFDTEMPLATE", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "4", + "<1,6>": "100", + "<1,7>": "570", + "<1,8>": "177", + "<1,9>": "Untitled", + "<1,10>": "0x92cf0000", + "<1,11>": "0x100", + "<1,12>": "0", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "0", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "0", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "0", + "<1,24,6>": "0" + }, + "<1,25>": "0", + "<1,26>": "0", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": { + "<1,32,1>": "0x7FFFE", + "<1,32,2>": "0xF001E808" + }, + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0x10001", + "<1,37,2>": "0x10001" + }, + "<1,38>": { + "<1,38,1>": "1", + "<1,38,2>": "1" + }, + "<1,39>": "", + "<1,40>": "0", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "" + } + }, + "record3": { + "<1>": "" + }, + "record4": { + "<1>": { + "<1,1>": { + "<1,1,1>": "MENU", + "<1,1,2>": "5", + "<1,1,3>": "", + "<1,1,4>": "", + "<1,1,5>": "0", + "<1,1,6>": "0", + "<1,1,7>": "0", + "<1,1,8>": "0", + "<1,1,9>": "25", + "<1,1,10>": "", + "<1,1,11>": "0" + }, + "<1,2>": { + "<1,2,1>": "POPUP", + "<1,2,2>": "7", + "<1,2,3>": "", + "<1,2,4>": "&File", + "<1,2,5>": "0", + "<1,2,6>": "0", + "<1,2,7>": "0", + "<1,2,8>": "0", + "<1,2,9>": "", + "<1,2,10>": "", + "<1,2,11>": "0" + }, + "<1,3>": { + "<1,3,1>": "ITEM", + "<1,3,2>": "", + "<1,3,3>": "", + "<1,3,4>": "&Read\tF5", + "<1,3,5>": "0", + "<1,3,6>": "0", + "<1,3,7>": "0", + "<1,3,8>": "116", + "<1,3,9>": "", + "<1,3,10>": "", + "<1,3,11>": "0" + }, + "<1,4>": { + "<1,4,1>": "ITEM", + "<1,4,2>": "", + "<1,4,3>": "", + "<1,4,4>": "&Save\tF9", + "<1,4,5>": "0", + "<1,4,6>": "0", + "<1,4,7>": "0", + "<1,4,8>": "120", + "<1,4,9>": "", + "<1,4,10>": "", + "<1,4,11>": "0" + }, + "<1,5>": { + "<1,5,1>": "SEPARATOR", + "<1,5,2>": "", + "<1,5,3>": "", + "<1,5,4>": "", + "<1,5,5>": "0", + "<1,5,6>": "0", + "<1,5,7>": "0", + "<1,5,8>": "0", + "<1,5,9>": "", + "<1,5,10>": "", + "<1,5,11>": "0" + }, + "<1,6>": { + "<1,6,1>": "ITEM", + "<1,6,2>": "", + "<1,6,3>": "", + "<1,6,4>": "C&lear\tF8", + "<1,6,5>": "0", + "<1,6,6>": "0", + "<1,6,7>": "0", + "<1,6,8>": "119", + "<1,6,9>": "", + "<1,6,10>": "", + "<1,6,11>": "0" + }, + "<1,7>": { + "<1,7,1>": "ITEM", + "<1,7,2>": "", + "<1,7,3>": "", + "<1,7,4>": "&Delete\tF7", + "<1,7,5>": "0", + "<1,7,6>": "0", + "<1,7,7>": "0", + "<1,7,8>": "118", + "<1,7,9>": "", + "<1,7,10>": "", + "<1,7,11>": "0" + }, + "<1,8>": { + "<1,8,1>": "SEPARATOR", + "<1,8,2>": "", + "<1,8,3>": "", + "<1,8,4>": "", + "<1,8,5>": "0", + "<1,8,6>": "0", + "<1,8,7>": "0", + "<1,8,8>": "0", + "<1,8,9>": "", + "<1,8,10>": "", + "<1,8,11>": "0" + }, + "<1,9>": { + "<1,9,1>": "ITEM", + "<1,9,2>": "", + "<1,9,3>": "", + "<1,9,4>": "&Close", + "<1,9,5>": "0", + "<1,9,6>": "0", + "<1,9,7>": "0", + "<1,9,8>": "0", + "<1,9,9>": "", + "<1,9,10>": "", + "<1,9,11>": "0" + }, + "<1,10>": { + "<1,10,1>": "POPUP", + "<1,10,2>": "1", + "<1,10,3>": "", + "<1,10,4>": "&Edit", + "<1,10,5>": "0", + "<1,10,6>": "0", + "<1,10,7>": "0", + "<1,10,8>": "0", + "<1,10,9>": "", + "<1,10,10>": "", + "<1,10,11>": "0" + }, + "<1,11>": { + "<1,11,1>": "ITEM", + "<1,11,2>": "", + "<1,11,3>": "", + "<1,11,4>": "&Options\tAlt+Down", + "<1,11,5>": "0", + "<1,11,6>": "0", + "<1,11,7>": "0", + "<1,11,8>": "1064", + "<1,11,9>": "", + "<1,11,10>": "", + "<1,11,11>": "0" + }, + "<1,12>": { + "<1,12,1>": "POPUP", + "<1,12,2>": "5", + "<1,12,3>": "", + "<1,12,4>": "&Search", + "<1,12,5>": "0", + "<1,12,6>": "0", + "<1,12,7>": "0", + "<1,12,8>": "0", + "<1,12,9>": "", + "<1,12,10>": "", + "<1,12,11>": "0" + }, + "<1,13>": { + "<1,13,1>": "ITEM", + "<1,13,2>": "", + "<1,13,3>": "", + "<1,13,4>": "&Next\tF3", + "<1,13,5>": "0", + "<1,13,6>": "0", + "<1,13,7>": "0", + "<1,13,8>": "114", + "<1,13,9>": "", + "<1,13,10>": "", + "<1,13,11>": "32" + }, + "<1,14>": { + "<1,14,1>": "ITEM", + "<1,14,2>": "", + "<1,14,3>": "", + "<1,14,4>": "&Previous\tF4", + "<1,14,5>": "0", + "<1,14,6>": "0", + "<1,14,7>": "0", + "<1,14,8>": "115", + "<1,14,9>": "", + "<1,14,10>": "", + "<1,14,11>": "32" + }, + "<1,15>": { + "<1,15,1>": "ITEM", + "<1,15,2>": "", + "<1,15,3>": "", + "<1,15,4>": "&First\tCtrl+F4", + "<1,15,5>": "0", + "<1,15,6>": "0", + "<1,15,7>": "0", + "<1,15,8>": "627", + "<1,15,9>": "", + "<1,15,10>": "", + "<1,15,11>": "32" + }, + "<1,16>": { + "<1,16,1>": "ITEM", + "<1,16,2>": "", + "<1,16,3>": "", + "<1,16,4>": "&Last\tCtrl+F3", + "<1,16,5>": "0", + "<1,16,6>": "0", + "<1,16,7>": "0", + "<1,16,8>": "626", + "<1,16,9>": "", + "<1,16,10>": "", + "<1,16,11>": "32" + }, + "<1,17>": { + "<1,17,1>": "ITEM", + "<1,17,2>": "", + "<1,17,3>": "", + "<1,17,4>": "&Absolute\tF12", + "<1,17,5>": "0", + "<1,17,6>": "0", + "<1,17,7>": "0", + "<1,17,8>": "123", + "<1,17,9>": "", + "<1,17,10>": "", + "<1,17,11>": "32" + }, + "<1,18>": { + "<1,18,1>": "POPUP", + "<1,18,2>": "4", + "<1,18,3>": "", + "<1,18,4>": "&Page", + "<1,18,5>": "0", + "<1,18,6>": "0", + "<1,18,7>": "0", + "<1,18,8>": "0", + "<1,18,9>": "", + "<1,18,10>": "", + "<1,18,11>": "0" + }, + "<1,19>": { + "<1,19,1>": "ITEM", + "<1,19,2>": "", + "<1,19,3>": "", + "<1,19,4>": "&First\tCtrl+Shift+Home", + "<1,19,5>": "0", + "<1,19,6>": "0", + "<1,19,7>": "0", + "<1,19,8>": "804", + "<1,19,9>": "", + "<1,19,10>": "", + "<1,19,11>": "0" + }, + "<1,20>": { + "<1,20,1>": "ITEM", + "<1,20,2>": "", + "<1,20,3>": "", + "<1,20,4>": "&Previous\tCtrl+Shift+PgUp", + "<1,20,5>": "0", + "<1,20,6>": "0", + "<1,20,7>": "0", + "<1,20,8>": "801", + "<1,20,9>": "", + "<1,20,10>": "", + "<1,20,11>": "0" + }, + "<1,21>": { + "<1,21,1>": "ITEM", + "<1,21,2>": "", + "<1,21,3>": "", + "<1,21,4>": "&Next\tCtrl+Shift+PgDn", + "<1,21,5>": "0", + "<1,21,6>": "0", + "<1,21,7>": "0", + "<1,21,8>": "802", + "<1,21,9>": "", + "<1,21,10>": "", + "<1,21,11>": "0" + }, + "<1,22>": { + "<1,22,1>": "ITEM", + "<1,22,2>": "", + "<1,22,3>": "", + "<1,22,4>": "&Last\tCtrl+Shift+End", + "<1,22,5>": "0", + "<1,22,6>": "0", + "<1,22,7>": "0", + "<1,22,8>": "803", + "<1,22,9>": "", + "<1,22,10>": "", + "<1,22,11>": "0" + }, + "<1,23>": { + "<1,23,1>": "POPUP", + "<1,23,2>": "2", + "<1,23,3>": "", + "<1,23,4>": "&Help", + "<1,23,5>": "0", + "<1,23,6>": "0", + "<1,23,7>": "0", + "<1,23,8>": "0", + "<1,23,9>": "", + "<1,23,10>": "", + "<1,23,11>": "0" + }, + "<1,24>": { + "<1,24,1>": "ITEM", + "<1,24,2>": "", + "<1,24,3>": "", + "<1,24,4>": "&Help\tF1", + "<1,24,5>": "0", + "<1,24,6>": "0", + "<1,24,7>": "0", + "<1,24,8>": "112", + "<1,24,9>": "", + "<1,24,10>": "", + "<1,24,11>": "0" + }, + "<1,25>": { + "<1,25,1>": "ITEM", + "<1,25,2>": "", + "<1,25,3>": "", + "<1,25,4>": "&QuickHelp\tCtrl+F1", + "<1,25,5>": "0", + "<1,25,6>": "0", + "<1,25,7>": "0", + "<1,25,8>": "624", + "<1,25,9>": "", + "<1,25,10>": "", + "<1,25,11>": "0" + } + }, + "<2>": { + "<2,1>": "", + "<2,2>": { + "<2,2,1>": { + "<2,2,1,1>": "E", + "<2,2,1,2>": "READ", + "<2,2,1,3>": "@WINDOW", + "<2,2,1,4>": "", + "<2,2,1,5>": "", + "<2,2,1,6>": "" + }, + "<2,2,2>": { + "<2,2,2,1>": "E", + "<2,2,2,2>": "WRITE", + "<2,2,2,3>": "@WINDOW", + "<2,2,2,4>": "", + "<2,2,2,5>": "", + "<2,2,2,6>": "" + }, + "<2,2,3>": { + "<2,2,3,1>": "E", + "<2,2,3,2>": "CLEAR", + "<2,2,3,3>": "@WINDOW", + "<2,2,3,4>": "", + "<2,2,3,5>": "", + "<2,2,3,6>": "" + }, + "<2,2,4>": { + "<2,2,4,1>": "E", + "<2,2,4,2>": "DELETE", + "<2,2,4,3>": "@WINDOW", + "<2,2,4,4>": "", + "<2,2,4,5>": "", + "<2,2,4,6>": "" + }, + "<2,2,5>": { + "<2,2,5,1>": "E", + "<2,2,5,2>": "CLOSE", + "<2,2,5,3>": "@WINDOW", + "<2,2,5,4>": "", + "<2,2,5,5>": "", + "<2,2,5,6>": "" + }, + "<2,2,6>": { + "<2,2,6,1>": "E", + "<2,2,6,2>": "OPTIONS", + "<2,2,6,3>": "@FOCUS", + "<2,2,6,4>": "", + "<2,2,6,5>": "", + "<2,2,6,6>": "" + }, + "<2,2,7>": { + "<2,2,7,1>": "E", + "<2,2,7,2>": "DSONEXT", + "<2,2,7,3>": "@WINDOW", + "<2,2,7,4>": "", + "<2,2,7,5>": "", + "<2,2,7,6>": "" + }, + "<2,2,8>": { + "<2,2,8,1>": "E", + "<2,2,8,2>": "DSOPREV", + "<2,2,8,3>": "@WINDOW", + "<2,2,8,4>": "", + "<2,2,8,5>": "", + "<2,2,8,6>": "" + }, + "<2,2,9>": { + "<2,2,9,1>": "E", + "<2,2,9,2>": "DSOFIRST", + "<2,2,9,3>": "@WINDOW", + "<2,2,9,4>": "", + "<2,2,9,5>": "", + "<2,2,9,6>": "" + }, + "<2,2,10>": { + "<2,2,10,1>": "E", + "<2,2,10,2>": "DSOLAST", + "<2,2,10,3>": "@WINDOW", + "<2,2,10,4>": "", + "<2,2,10,5>": "", + "<2,2,10,6>": "" + }, + "<2,2,11>": { + "<2,2,11,1>": "E", + "<2,2,11,2>": "DSOABS", + "<2,2,11,3>": "@WINDOW", + "<2,2,11,4>": "", + "<2,2,11,5>": "", + "<2,2,11,6>": "" + }, + "<2,2,12>": { + "<2,2,12,1>": "E", + "<2,2,12,2>": "PAGE", + "<2,2,12,3>": "@WINDOW", + "<2,2,12,4>": "1", + "<2,2,12,5>": "", + "<2,2,12,6>": "" + }, + "<2,2,13>": { + "<2,2,13,1>": "E", + "<2,2,13,2>": "PAGE", + "<2,2,13,3>": "@WINDOW", + "<2,2,13,4>": "-", + "<2,2,13,5>": "", + "<2,2,13,6>": "" + }, + "<2,2,14>": { + "<2,2,14,1>": "E", + "<2,2,14,2>": "PAGE", + "<2,2,14,3>": "@WINDOW", + "<2,2,14,4>": "+", + "<2,2,14,5>": "", + "<2,2,14,6>": "" + }, + "<2,2,15>": { + "<2,2,15,1>": "E", + "<2,2,15,2>": "PAGE", + "<2,2,15,3>": "@WINDOW", + "<2,2,15,4>": "L", + "<2,2,15,5>": "", + "<2,2,15,6>": "" + }, + "<2,2,16>": { + "<2,2,16,1>": "E", + "<2,2,16,2>": "HELP", + "<2,2,16,3>": "@FOCUS", + "<2,2,16,4>": "", + "<2,2,16,5>": "", + "<2,2,16,6>": "" + }, + "<2,2,17>": "" + }, + "<2,3>": { + "<2,3,1>": "FILE.READ", + "<2,3,2>": "FILE.SAVE", + "<2,3,3>": "FILE.CLEAR", + "<2,3,4>": "FILE.DELETE", + "<2,3,5>": "FILE.CLOSE", + "<2,3,6>": "EDIT.OPTIONS", + "<2,3,7>": "SEARCH.NEXT", + "<2,3,8>": "SEARCH.PREVIOUS", + "<2,3,9>": "SEARCH.FIRST", + "<2,3,10>": "SEARCH.LAST", + "<2,3,11>": "SEARCH.ABSOLUTE", + "<2,3,12>": "PAGE.FIRST", + "<2,3,13>": "PAGE.PREVIOUS", + "<2,3,14>": "PAGE.NEXT", + "<2,3,15>": "PAGE.LAST", + "<2,3,16>": "HELP.HELP", + "<2,3,17>": "" + }, + "<2,4>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/DEFMDITEMPLATE.json b/SYSPROG/OIWIN/DEFMDITEMPLATE.json new file mode 100644 index 0000000..92c39a2 --- /dev/null +++ b/SYSPROG/OIWIN/DEFMDITEMPLATE.json @@ -0,0 +1,1178 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1000", + "<2>": "0", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "DEFMDITEMPLATE", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "291", + "<1,6>": "176", + "<1,7>": "-338", + "<1,8>": "-42", + "<1,9>": "", + "<1,10>": { + "<1,10,1>": "0x92CF0000", + "<1,10,2>": "0x100" + }, + "<1,11>": { + "<1,11,1>": "0x100", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "0", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": { + "<1,61,1>": { + "<1,61,1,1>": "-1", + "<1,61,1,2>": "-1", + "<1,61,1,3>": "-1", + "<1,61,1,4>": "-1" + } + }, + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "0", + "<1,62,4>": "0", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "" + } + }, + "record3": { + "<1>": "" + }, + "record4": { + "<1>": { + "<1,1>": { + "<1,1,1>": "MENU", + "<1,1,2>": "6", + "<1,1,3>": "", + "<1,1,4>": "", + "<1,1,5>": "0", + "<1,1,6>": "0", + "<1,1,7>": "0", + "<1,1,8>": "0", + "<1,1,9>": "38", + "<1,1,10>": "", + "<1,1,11>": "0", + "<1,1,12>": "" + }, + "<1,2>": { + "<1,2,1>": "POPUP", + "<1,2,2>": "8", + "<1,2,3>": "", + "<1,2,4>": "&File", + "<1,2,5>": "0", + "<1,2,6>": "0", + "<1,2,7>": "0", + "<1,2,8>": "0", + "<1,2,9>": "", + "<1,2,10>": "", + "<1,2,11>": "0", + "<1,2,12>": "" + }, + "<1,3>": { + "<1,3,1>": "ITEM", + "<1,3,2>": "", + "<1,3,3>": "", + "<1,3,4>": "&Read Row\tCtrl+R", + "<1,3,5>": "0", + "<1,3,6>": "0", + "<1,3,7>": "0", + "<1,3,8>": "594", + "<1,3,9>": "", + "<1,3,10>": "", + "<1,3,11>": "32", + "<1,3,12>": "SYSPROG*IMAGE*PNG*MENU_FILEOPEN" + }, + "<1,4>": { + "<1,4,1>": "ITEM", + "<1,4,2>": "", + "<1,4,3>": "", + "<1,4,4>": "&Save Row\tCtrl+S", + "<1,4,5>": "0", + "<1,4,6>": "0", + "<1,4,7>": "0", + "<1,4,8>": "595", + "<1,4,9>": "", + "<1,4,10>": "", + "<1,4,11>": "32", + "<1,4,12>": "SYSPROG*IMAGE*PNG*MENU_FILESAVE" + }, + "<1,5>": { + "<1,5,1>": "SEPARATOR", + "<1,5,2>": "", + "<1,5,3>": "", + "<1,5,4>": "", + "<1,5,5>": "0", + "<1,5,6>": "0", + "<1,5,7>": "0", + "<1,5,8>": "0", + "<1,5,9>": "", + "<1,5,10>": "", + "<1,5,11>": "0", + "<1,5,12>": "" + }, + "<1,6>": { + "<1,6,1>": "ITEM", + "<1,6,2>": "", + "<1,6,3>": "", + "<1,6,4>": "C&lear Form\tF8", + "<1,6,5>": "0", + "<1,6,6>": "0", + "<1,6,7>": "0", + "<1,6,8>": "119", + "<1,6,9>": "", + "<1,6,10>": "", + "<1,6,11>": "0", + "<1,6,12>": "SYSPROG*IMAGE*PNG*MENU_CLEAR" + }, + "<1,7>": { + "<1,7,1>": "ITEM", + "<1,7,2>": "", + "<1,7,3>": "", + "<1,7,4>": "&Delete Row\tF7", + "<1,7,5>": "0", + "<1,7,6>": "0", + "<1,7,7>": "0", + "<1,7,8>": "118", + "<1,7,9>": "", + "<1,7,10>": "", + "<1,7,11>": "0", + "<1,7,12>": "SYSPROG*IMAGE*PNG*MENU_FILEDELETE" + }, + "<1,8>": { + "<1,8,1>": "SEPARATOR", + "<1,8,2>": "", + "<1,8,3>": "", + "<1,8,4>": "", + "<1,8,5>": "0", + "<1,8,6>": "0", + "<1,8,7>": "0", + "<1,8,8>": "0", + "<1,8,9>": "", + "<1,8,10>": "", + "<1,8,11>": "0", + "<1,8,12>": "" + }, + "<1,9>": { + "<1,9,1>": "ITEM", + "<1,9,2>": "", + "<1,9,3>": "", + "<1,9,4>": "&Close\tAlt+C", + "<1,9,5>": "0", + "<1,9,6>": "0", + "<1,9,7>": "0", + "<1,9,8>": "1091", + "<1,9,9>": "", + "<1,9,10>": "", + "<1,9,11>": "0", + "<1,9,12>": "" + }, + "<1,10>": { + "<1,10,1>": "ITEM", + "<1,10,2>": "", + "<1,10,3>": "", + "<1,10,4>": "E&xit\tAlt+F4", + "<1,10,5>": "0", + "<1,10,6>": "0", + "<1,10,7>": "0", + "<1,10,8>": "1139", + "<1,10,9>": "", + "<1,10,10>": "", + "<1,10,11>": "0", + "<1,10,12>": "" + }, + "<1,11>": { + "<1,11,1>": "POPUP", + "<1,11,2>": "1", + "<1,11,3>": "", + "<1,11,4>": "&Edit", + "<1,11,5>": "0", + "<1,11,6>": "0", + "<1,11,7>": "0", + "<1,11,8>": "0", + "<1,11,9>": "", + "<1,11,10>": "", + "<1,11,11>": "0", + "<1,11,12>": "" + }, + "<1,12>": { + "<1,12,1>": "ITEM", + "<1,12,2>": "", + "<1,12,3>": "", + "<1,12,4>": "&Options\tAlt+Down", + "<1,12,5>": "0", + "<1,12,6>": "0", + "<1,12,7>": "0", + "<1,12,8>": "1064", + "<1,12,9>": "", + "<1,12,10>": "", + "<1,12,11>": "0", + "<1,12,12>": "" + }, + "<1,13>": { + "<1,13,1>": "POPUP", + "<1,13,2>": "4", + "<1,13,3>": "", + "<1,13,4>": "&View", + "<1,13,5>": "0", + "<1,13,6>": "0", + "<1,13,7>": "0", + "<1,13,8>": "0", + "<1,13,9>": "", + "<1,13,10>": "", + "<1,13,11>": "0", + "<1,13,12>": "" + }, + "<1,14>": { + "<1,14,1>": "ITEM", + "<1,14,2>": "", + "<1,14,3>": "", + "<1,14,4>": "&First Page\tCtrl+Shift+Home", + "<1,14,5>": "0", + "<1,14,6>": "0", + "<1,14,7>": "0", + "<1,14,8>": "804", + "<1,14,9>": "", + "<1,14,10>": "", + "<1,14,11>": "0", + "<1,14,12>": "SYSPROG*IMAGE*PNG*MENU_FIRST" + }, + "<1,15>": { + "<1,15,1>": "ITEM", + "<1,15,2>": "", + "<1,15,3>": "", + "<1,15,4>": "&Previous Page\tCtrl+Shift+PgUp", + "<1,15,5>": "0", + "<1,15,6>": "0", + "<1,15,7>": "0", + "<1,15,8>": "801", + "<1,15,9>": "", + "<1,15,10>": "", + "<1,15,11>": "0", + "<1,15,12>": "SYSPROG*IMAGE*PNG*MENU_PREV" + }, + "<1,16>": { + "<1,16,1>": "ITEM", + "<1,16,2>": "", + "<1,16,3>": "", + "<1,16,4>": "&Next Page\tCtrl+Shift+PgDn", + "<1,16,5>": "0", + "<1,16,6>": "0", + "<1,16,7>": "0", + "<1,16,8>": "802", + "<1,16,9>": "", + "<1,16,10>": "", + "<1,16,11>": "0", + "<1,16,12>": "SYSPROG*IMAGE*PNG*MENU_NEXT" + }, + "<1,17>": { + "<1,17,1>": "ITEM", + "<1,17,2>": "", + "<1,17,3>": "", + "<1,17,4>": "&Last Page\tCtrl+Shift+End", + "<1,17,5>": "0", + "<1,17,6>": "0", + "<1,17,7>": "0", + "<1,17,8>": "803", + "<1,17,9>": "", + "<1,17,10>": "", + "<1,17,11>": "0", + "<1,17,12>": "SYSPROG*IMAGE*PNG*MENU_LAST" + }, + "<1,18>": { + "<1,18,1>": "POPUP", + "<1,18,2>": "13", + "<1,18,3>": "", + "<1,18,4>": "&QBF", + "<1,18,5>": "0", + "<1,18,6>": "0", + "<1,18,7>": "0", + "<1,18,8>": "0", + "<1,18,9>": "", + "<1,18,10>": "", + "<1,18,11>": "0", + "<1,18,12>": "" + }, + "<1,19>": { + "<1,19,1>": "ITEM", + "<1,19,2>": "", + "<1,19,3>": "", + "<1,19,4>": "&Initialize\tF11", + "<1,19,5>": "0", + "<1,19,6>": "0", + "<1,19,7>": "0", + "<1,19,8>": "122", + "<1,19,9>": "", + "<1,19,10>": "", + "<1,19,11>": "0", + "<1,19,12>": "" + }, + "<1,20>": { + "<1,20,1>": "ITEM", + "<1,20,2>": "", + "<1,20,3>": "", + "<1,20,4>": "&Execute\tF6", + "<1,20,5>": "0", + "<1,20,6>": "0", + "<1,20,7>": "0", + "<1,20,8>": "117", + "<1,20,9>": "", + "<1,20,10>": "", + "<1,20,11>": "0", + "<1,20,12>": "" + }, + "<1,21>": { + "<1,21,1>": "SEPARATOR", + "<1,21,2>": "", + "<1,21,3>": "", + "<1,21,4>": "", + "<1,21,5>": "0", + "<1,21,6>": "0", + "<1,21,7>": "0", + "<1,21,8>": "0", + "<1,21,9>": "", + "<1,21,10>": "", + "<1,21,11>": "0", + "<1,21,12>": "" + }, + "<1,22>": { + "<1,22,1>": "ITEM", + "<1,22,2>": "", + "<1,22,3>": "", + "<1,22,4>": "&Next\tF3", + "<1,22,5>": "0", + "<1,22,6>": "0", + "<1,22,7>": "0", + "<1,22,8>": "114", + "<1,22,9>": "", + "<1,22,10>": "", + "<1,22,11>": "0", + "<1,22,12>": "" + }, + "<1,23>": { + "<1,23,1>": "ITEM", + "<1,23,2>": "", + "<1,23,3>": "", + "<1,23,4>": "&Previous\tF4", + "<1,23,5>": "0", + "<1,23,6>": "0", + "<1,23,7>": "0", + "<1,23,8>": "115", + "<1,23,9>": "", + "<1,23,10>": "", + "<1,23,11>": "0", + "<1,23,12>": "" + }, + "<1,24>": { + "<1,24,1>": "ITEM", + "<1,24,2>": "", + "<1,24,3>": "", + "<1,24,4>": "&First\tCtrl+F4", + "<1,24,5>": "0", + "<1,24,6>": "0", + "<1,24,7>": "0", + "<1,24,8>": "627", + "<1,24,9>": "", + "<1,24,10>": "", + "<1,24,11>": "0", + "<1,24,12>": "" + }, + "<1,25>": { + "<1,25,1>": "ITEM", + "<1,25,2>": "", + "<1,25,3>": "", + "<1,25,4>": "&Last\tCtrl+F3", + "<1,25,5>": "0", + "<1,25,6>": "0", + "<1,25,7>": "0", + "<1,25,8>": "626", + "<1,25,9>": "", + "<1,25,10>": "", + "<1,25,11>": "0", + "<1,25,12>": "" + }, + "<1,26>": { + "<1,26,1>": "ITEM", + "<1,26,2>": "", + "<1,26,3>": "", + "<1,26,4>": "&Absolute\tF12", + "<1,26,5>": "0", + "<1,26,6>": "0", + "<1,26,7>": "0", + "<1,26,8>": "123", + "<1,26,9>": "", + "<1,26,10>": "", + "<1,26,11>": "0", + "<1,26,12>": "" + }, + "<1,27>": { + "<1,27,1>": "SEPARATOR", + "<1,27,2>": "", + "<1,27,3>": "", + "<1,27,4>": "", + "<1,27,5>": "0", + "<1,27,6>": "0", + "<1,27,7>": "0", + "<1,27,8>": "0", + "<1,27,9>": "", + "<1,27,10>": "", + "<1,27,11>": "0", + "<1,27,12>": "" + }, + "<1,28>": { + "<1,28,1>": "ITEM", + "<1,28,2>": "", + "<1,28,3>": "", + "<1,28,4>": "&Table", + "<1,28,5>": "0", + "<1,28,6>": "0", + "<1,28,7>": "0", + "<1,28,8>": "0", + "<1,28,9>": "", + "<1,28,10>": "", + "<1,28,11>": "0", + "<1,28,12>": "" + }, + "<1,29>": { + "<1,29,1>": "SEPARATOR", + "<1,29,2>": "", + "<1,29,3>": "", + "<1,29,4>": "", + "<1,29,5>": "0", + "<1,29,6>": "0", + "<1,29,7>": "0", + "<1,29,8>": "0", + "<1,29,9>": "", + "<1,29,10>": "", + "<1,29,11>": "0", + "<1,29,12>": "" + }, + "<1,30>": { + "<1,30,1>": "ITEM", + "<1,30,2>": "", + "<1,30,3>": "", + "<1,30,4>": "&Close", + "<1,30,5>": "0", + "<1,30,6>": "0", + "<1,30,7>": "0", + "<1,30,8>": "0", + "<1,30,9>": "", + "<1,30,10>": "", + "<1,30,11>": "0", + "<1,30,12>": "" + }, + "<1,31>": { + "<1,31,1>": "ITEM", + "<1,31,2>": "", + "<1,31,3>": "", + "<1,31,4>": "E&xit", + "<1,31,5>": "0", + "<1,31,6>": "0", + "<1,31,7>": "0", + "<1,31,8>": "0", + "<1,31,9>": "", + "<1,31,10>": "", + "<1,31,11>": "0", + "<1,31,12>": "" + }, + "<1,32>": { + "<1,32,1>": "POPUP", + "<1,32,2>": "3", + "<1,32,3>": "", + "<1,32,4>": "&Window", + "<1,32,5>": "0", + "<1,32,6>": "0", + "<1,32,7>": "0", + "<1,32,8>": "0", + "<1,32,9>": "MDI Child Window Functions", + "<1,32,10>": "", + "<1,32,11>": "0", + "<1,32,12>": "" + }, + "<1,33>": { + "<1,33,1>": "ITEM", + "<1,33,2>": "", + "<1,33,3>": "", + "<1,33,4>": "&Tile", + "<1,33,5>": "0", + "<1,33,6>": "0", + "<1,33,7>": "0", + "<1,33,8>": "0", + "<1,33,9>": "Tile the MDI Children", + "<1,33,10>": "", + "<1,33,11>": "0", + "<1,33,12>": "" + }, + "<1,34>": { + "<1,34,1>": "ITEM", + "<1,34,2>": "", + "<1,34,3>": "", + "<1,34,4>": "&Cascade", + "<1,34,5>": "0", + "<1,34,6>": "0", + "<1,34,7>": "0", + "<1,34,8>": "0", + "<1,34,9>": "Cascade the MDI CHildren", + "<1,34,10>": "", + "<1,34,11>": "0", + "<1,34,12>": "" + }, + "<1,35>": { + "<1,35,1>": "ITEM", + "<1,35,2>": "", + "<1,35,3>": "", + "<1,35,4>": "&Arrange Icons", + "<1,35,5>": "0", + "<1,35,6>": "0", + "<1,35,7>": "0", + "<1,35,8>": "0", + "<1,35,9>": "Arrange the MDI Children ", + "<1,35,10>": "", + "<1,35,11>": "0", + "<1,35,12>": "" + }, + "<1,36>": { + "<1,36,1>": "POPUP", + "<1,36,2>": "2", + "<1,36,3>": "", + "<1,36,4>": "&Help", + "<1,36,5>": "0", + "<1,36,6>": "0", + "<1,36,7>": "0", + "<1,36,8>": "0", + "<1,36,9>": "", + "<1,36,10>": "", + "<1,36,11>": "0", + "<1,36,12>": "" + }, + "<1,37>": { + "<1,37,1>": "ITEM", + "<1,37,2>": "", + "<1,37,3>": "", + "<1,37,4>": "&Help\tF1", + "<1,37,5>": "0", + "<1,37,6>": "0", + "<1,37,7>": "0", + "<1,37,8>": "112", + "<1,37,9>": "", + "<1,37,10>": "", + "<1,37,11>": "0", + "<1,37,12>": "" + }, + "<1,38>": { + "<1,38,1>": "ITEM", + "<1,38,2>": "", + "<1,38,3>": "", + "<1,38,4>": "&QuickHelp\tCtrl+F1", + "<1,38,5>": "0", + "<1,38,6>": "0", + "<1,38,7>": "0", + "<1,38,8>": "624", + "<1,38,9>": "", + "<1,38,10>": "", + "<1,38,11>": "0", + "<1,38,12>": "" + } + }, + "<2>": { + "<2,1>": "", + "<2,2>": { + "<2,2,1>": { + "<2,2,1,1>": "E", + "<2,2,1,2>": "READ", + "<2,2,1,3>": "@MDIACTIVE", + "<2,2,1,4>": "", + "<2,2,1,5>": "", + "<2,2,1,6>": "", + "<2,2,1,7>": "", + "<2,2,1,8>": "", + "<2,2,1,9>": "", + "<2,2,1,10>": "", + "<2,2,1,11>": "", + "<2,2,1,12>": "", + "<2,2,1,13>": "", + "<2,2,1,14>": "", + "<2,2,1,15>": "GEN" + }, + "<2,2,2>": { + "<2,2,2,1>": "E", + "<2,2,2,2>": "WRITE", + "<2,2,2,3>": "@MDIACTIVE", + "<2,2,2,4>": "", + "<2,2,2,5>": "", + "<2,2,2,6>": "", + "<2,2,2,7>": "", + "<2,2,2,8>": "", + "<2,2,2,9>": "", + "<2,2,2,10>": "", + "<2,2,2,11>": "", + "<2,2,2,12>": "", + "<2,2,2,13>": "", + "<2,2,2,14>": "", + "<2,2,2,15>": "GEN" + }, + "<2,2,3>": { + "<2,2,3,1>": "E", + "<2,2,3,2>": "CLEAR", + "<2,2,3,3>": "@MDIACTIVE", + "<2,2,3,4>": "", + "<2,2,3,5>": "", + "<2,2,3,6>": "", + "<2,2,3,7>": "", + "<2,2,3,8>": "", + "<2,2,3,9>": "", + "<2,2,3,10>": "", + "<2,2,3,11>": "", + "<2,2,3,12>": "", + "<2,2,3,13>": "", + "<2,2,3,14>": "", + "<2,2,3,15>": "GEN" + }, + "<2,2,4>": { + "<2,2,4,1>": "E", + "<2,2,4,2>": "DELETE", + "<2,2,4,3>": "@MDIACTIVE", + "<2,2,4,4>": "", + "<2,2,4,5>": "", + "<2,2,4,6>": "", + "<2,2,4,7>": "", + "<2,2,4,8>": "", + "<2,2,4,9>": "", + "<2,2,4,10>": "", + "<2,2,4,11>": "", + "<2,2,4,12>": "", + "<2,2,4,13>": "", + "<2,2,4,14>": "", + "<2,2,4,15>": "GEN" + }, + "<2,2,5>": { + "<2,2,5,1>": "E", + "<2,2,5,2>": "CLOSE", + "<2,2,5,3>": "@MDIACTIVE", + "<2,2,5,4>": "", + "<2,2,5,5>": "", + "<2,2,5,6>": "", + "<2,2,5,7>": "", + "<2,2,5,8>": "", + "<2,2,5,9>": "", + "<2,2,5,10>": "", + "<2,2,5,11>": "", + "<2,2,5,12>": "", + "<2,2,5,13>": "", + "<2,2,5,14>": "", + "<2,2,5,15>": "" + }, + "<2,2,6>": { + "<2,2,6,1>": "E", + "<2,2,6,2>": "CLOSE", + "<2,2,6,3>": "@WINDOW", + "<2,2,6,4>": "", + "<2,2,6,5>": "", + "<2,2,6,6>": "", + "<2,2,6,7>": "", + "<2,2,6,8>": "", + "<2,2,6,9>": "", + "<2,2,6,10>": "", + "<2,2,6,11>": "", + "<2,2,6,12>": "", + "<2,2,6,13>": "", + "<2,2,6,14>": "", + "<2,2,6,15>": "CLOSEWIN" + }, + "<2,2,7>": { + "<2,2,7,1>": "E", + "<2,2,7,2>": "OPTIONS", + "<2,2,7,3>": "@FOCUS", + "<2,2,7,4>": "", + "<2,2,7,5>": "", + "<2,2,7,6>": "", + "<2,2,7,7>": "", + "<2,2,7,8>": "", + "<2,2,7,9>": "", + "<2,2,7,10>": "", + "<2,2,7,11>": "", + "<2,2,7,12>": "", + "<2,2,7,13>": "", + "<2,2,7,14>": "", + "<2,2,7,15>": "" + }, + "<2,2,8>": { + "<2,2,8,1>": "E", + "<2,2,8,2>": "PAGE", + "<2,2,8,3>": "@MDIACTIVE", + "<2,2,8,4>": "1", + "<2,2,8,5>": "", + "<2,2,8,6>": "", + "<2,2,8,7>": "", + "<2,2,8,8>": "", + "<2,2,8,9>": "", + "<2,2,8,10>": "", + "<2,2,8,11>": "", + "<2,2,8,12>": "", + "<2,2,8,13>": "", + "<2,2,8,14>": "", + "<2,2,8,15>": "" + }, + "<2,2,9>": { + "<2,2,9,1>": "E", + "<2,2,9,2>": "PAGE", + "<2,2,9,3>": "@MDIACTIVE", + "<2,2,9,4>": "-", + "<2,2,9,5>": "", + "<2,2,9,6>": "", + "<2,2,9,7>": "", + "<2,2,9,8>": "", + "<2,2,9,9>": "", + "<2,2,9,10>": "", + "<2,2,9,11>": "", + "<2,2,9,12>": "", + "<2,2,9,13>": "", + "<2,2,9,14>": "", + "<2,2,9,15>": "" + }, + "<2,2,10>": { + "<2,2,10,1>": "E", + "<2,2,10,2>": "PAGE", + "<2,2,10,3>": "@MDIACTIVE", + "<2,2,10,4>": "+", + "<2,2,10,5>": "", + "<2,2,10,6>": "", + "<2,2,10,7>": "", + "<2,2,10,8>": "", + "<2,2,10,9>": "", + "<2,2,10,10>": "", + "<2,2,10,11>": "", + "<2,2,10,12>": "", + "<2,2,10,13>": "", + "<2,2,10,14>": "", + "<2,2,10,15>": "" + }, + "<2,2,11>": { + "<2,2,11,1>": "E", + "<2,2,11,2>": "PAGE", + "<2,2,11,3>": "@MDIACTIVE", + "<2,2,11,4>": "L", + "<2,2,11,5>": "", + "<2,2,11,6>": "", + "<2,2,11,7>": "", + "<2,2,11,8>": "", + "<2,2,11,9>": "", + "<2,2,11,10>": "", + "<2,2,11,11>": "", + "<2,2,11,12>": "", + "<2,2,11,13>": "", + "<2,2,11,14>": "", + "<2,2,11,15>": "" + }, + "<2,2,12>": { + "<2,2,12,1>": "E", + "<2,2,12,2>": "QBFINIT", + "<2,2,12,3>": "@MDIACTIVE", + "<2,2,12,4>": "", + "<2,2,12,5>": "", + "<2,2,12,6>": "", + "<2,2,12,7>": "", + "<2,2,12,8>": "", + "<2,2,12,9>": "", + "<2,2,12,10>": "", + "<2,2,12,11>": "", + "<2,2,12,12>": "", + "<2,2,12,13>": "", + "<2,2,12,14>": "", + "<2,2,12,15>": "" + }, + "<2,2,13>": { + "<2,2,13,1>": "E", + "<2,2,13,2>": "QBFRUN", + "<2,2,13,3>": "@MDIACTIVE", + "<2,2,13,4>": "", + "<2,2,13,5>": "", + "<2,2,13,6>": "", + "<2,2,13,7>": "", + "<2,2,13,8>": "", + "<2,2,13,9>": "", + "<2,2,13,10>": "", + "<2,2,13,11>": "", + "<2,2,13,12>": "", + "<2,2,13,13>": "", + "<2,2,13,14>": "", + "<2,2,13,15>": "" + }, + "<2,2,14>": { + "<2,2,14,1>": "E", + "<2,2,14,2>": "QBFNEXT", + "<2,2,14,3>": "@MDIACTIVE", + "<2,2,14,4>": "", + "<2,2,14,5>": "", + "<2,2,14,6>": "", + "<2,2,14,7>": "", + "<2,2,14,8>": "", + "<2,2,14,9>": "", + "<2,2,14,10>": "", + "<2,2,14,11>": "", + "<2,2,14,12>": "", + "<2,2,14,13>": "", + "<2,2,14,14>": "", + "<2,2,14,15>": "" + }, + "<2,2,15>": { + "<2,2,15,1>": "E", + "<2,2,15,2>": "QBFPREV", + "<2,2,15,3>": "@MDIACTIVE", + "<2,2,15,4>": "", + "<2,2,15,5>": "", + "<2,2,15,6>": "", + "<2,2,15,7>": "", + "<2,2,15,8>": "", + "<2,2,15,9>": "", + "<2,2,15,10>": "", + "<2,2,15,11>": "", + "<2,2,15,12>": "", + "<2,2,15,13>": "", + "<2,2,15,14>": "", + "<2,2,15,15>": "" + }, + "<2,2,16>": { + "<2,2,16,1>": "E", + "<2,2,16,2>": "QBFFIRST", + "<2,2,16,3>": "@MDIACTIVE", + "<2,2,16,4>": "", + "<2,2,16,5>": "", + "<2,2,16,6>": "", + "<2,2,16,7>": "", + "<2,2,16,8>": "", + "<2,2,16,9>": "", + "<2,2,16,10>": "", + "<2,2,16,11>": "", + "<2,2,16,12>": "", + "<2,2,16,13>": "", + "<2,2,16,14>": "", + "<2,2,16,15>": "" + }, + "<2,2,17>": { + "<2,2,17,1>": "E", + "<2,2,17,2>": "QBFLAST", + "<2,2,17,3>": "@MDIACTIVE", + "<2,2,17,4>": "", + "<2,2,17,5>": "", + "<2,2,17,6>": "", + "<2,2,17,7>": "", + "<2,2,17,8>": "", + "<2,2,17,9>": "", + "<2,2,17,10>": "", + "<2,2,17,11>": "", + "<2,2,17,12>": "", + "<2,2,17,13>": "", + "<2,2,17,14>": "", + "<2,2,17,15>": "" + }, + "<2,2,18>": { + "<2,2,18,1>": "E", + "<2,2,18,2>": "QBFABS", + "<2,2,18,3>": "@MDIACTIVE", + "<2,2,18,4>": "", + "<2,2,18,5>": "", + "<2,2,18,6>": "", + "<2,2,18,7>": "", + "<2,2,18,8>": "", + "<2,2,18,9>": "", + "<2,2,18,10>": "", + "<2,2,18,11>": "", + "<2,2,18,12>": "", + "<2,2,18,13>": "", + "<2,2,18,14>": "", + "<2,2,18,15>": "" + }, + "<2,2,19>": { + "<2,2,19,1>": "E", + "<2,2,19,2>": "QBFTABLE", + "<2,2,19,3>": "@MDIACTIVE", + "<2,2,19,4>": "", + "<2,2,19,5>": "", + "<2,2,19,6>": "", + "<2,2,19,7>": "", + "<2,2,19,8>": "", + "<2,2,19,9>": "", + "<2,2,19,10>": "", + "<2,2,19,11>": "", + "<2,2,19,12>": "", + "<2,2,19,13>": "", + "<2,2,19,14>": "", + "<2,2,19,15>": "" + }, + "<2,2,20>": { + "<2,2,20,1>": "E", + "<2,2,20,2>": "QBFCLOSE", + "<2,2,20,3>": "@MDIACTIVE", + "<2,2,20,4>": "", + "<2,2,20,5>": "", + "<2,2,20,6>": "", + "<2,2,20,7>": "", + "<2,2,20,8>": "", + "<2,2,20,9>": "", + "<2,2,20,10>": "", + "<2,2,20,11>": "", + "<2,2,20,12>": "", + "<2,2,20,13>": "", + "<2,2,20,14>": "", + "<2,2,20,15>": "" + }, + "<2,2,21>": { + "<2,2,21,1>": "E", + "<2,2,21,2>": "TILE", + "<2,2,21,3>": "@MDIFRAME", + "<2,2,21,4>": "", + "<2,2,21,5>": "", + "<2,2,21,6>": "", + "<2,2,21,7>": "", + "<2,2,21,8>": "", + "<2,2,21,9>": "", + "<2,2,21,10>": "", + "<2,2,21,11>": "", + "<2,2,21,12>": "", + "<2,2,21,13>": "", + "<2,2,21,14>": "", + "<2,2,21,15>": "" + }, + "<2,2,22>": { + "<2,2,22,1>": "E", + "<2,2,22,2>": "CASCADE", + "<2,2,22,3>": "@MDIFRAME", + "<2,2,22,4>": "", + "<2,2,22,5>": "", + "<2,2,22,6>": "", + "<2,2,22,7>": "", + "<2,2,22,8>": "", + "<2,2,22,9>": "", + "<2,2,22,10>": "", + "<2,2,22,11>": "", + "<2,2,22,12>": "", + "<2,2,22,13>": "", + "<2,2,22,14>": "", + "<2,2,22,15>": "" + }, + "<2,2,23>": { + "<2,2,23,1>": "E", + "<2,2,23,2>": "ARRANGEICONS", + "<2,2,23,3>": "@MDIFRAME", + "<2,2,23,4>": "", + "<2,2,23,5>": "", + "<2,2,23,6>": "", + "<2,2,23,7>": "", + "<2,2,23,8>": "", + "<2,2,23,9>": "", + "<2,2,23,10>": "", + "<2,2,23,11>": "", + "<2,2,23,12>": "", + "<2,2,23,13>": "", + "<2,2,23,14>": "", + "<2,2,23,15>": "" + }, + "<2,2,24>": { + "<2,2,24,1>": "E", + "<2,2,24,2>": "HELP", + "<2,2,24,3>": "@FOCUS", + "<2,2,24,4>": "", + "<2,2,24,5>": "", + "<2,2,24,6>": "", + "<2,2,24,7>": "", + "<2,2,24,8>": "", + "<2,2,24,9>": "", + "<2,2,24,10>": "", + "<2,2,24,11>": "", + "<2,2,24,12>": "", + "<2,2,24,13>": "", + "<2,2,24,14>": "", + "<2,2,24,15>": "" + }, + "<2,2,25>": { + "<2,2,25,1>": "E", + "<2,2,25,2>": "NOTES", + "<2,2,25,3>": "@FOCUS", + "<2,2,25,4>": "", + "<2,2,25,5>": "", + "<2,2,25,6>": "", + "<2,2,25,7>": "", + "<2,2,25,8>": "", + "<2,2,25,9>": "", + "<2,2,25,10>": "", + "<2,2,25,11>": "", + "<2,2,25,12>": "", + "<2,2,25,13>": "", + "<2,2,25,14>": "", + "<2,2,25,15>": "" + }, + "<2,2,26>": { + "<2,2,26,1>": "X", + "<2,2,26,2>": "", + "<2,2,26,3>": "", + "<2,2,26,4>": "", + "<2,2,26,5>": "", + "<2,2,26,6>": "", + "<2,2,26,7>": "", + "<2,2,26,8>": "", + "<2,2,26,9>": "", + "<2,2,26,10>": "", + "<2,2,26,11>": "", + "<2,2,26,12>": "", + "<2,2,26,13>": "", + "<2,2,26,14>": "", + "<2,2,26,15>": "" + } + }, + "<2,3>": { + "<2,3,1>": "FILE.READ_ROW", + "<2,3,2>": "FILE.SAVE_ROW", + "<2,3,3>": "FILE.CLEAR_FORM", + "<2,3,4>": "FILE.DELETE_ROW", + "<2,3,5>": "FILE.CLOSE", + "<2,3,6>": "FILE.EXIT", + "<2,3,7>": "EDIT.OPTIONS", + "<2,3,8>": "VIEW.FIRST_PAGE", + "<2,3,9>": "VIEW.PREVIOUS_PAGE", + "<2,3,10>": "VIEW.NEXT_PAGE", + "<2,3,11>": "VIEW.LAST_PAGE", + "<2,3,12>": "QBF.INITIALIZE", + "<2,3,13>": "QBF.EXECUTE", + "<2,3,14>": "QBF.NEXT", + "<2,3,15>": "QBF.PREVIOUS", + "<2,3,16>": "QBF.FIRST", + "<2,3,17>": "QBF.LAST", + "<2,3,18>": "QBF.ABSOLUTE", + "<2,3,19>": "QBF.TABLE", + "<2,3,20>": "QBF.CLOSE", + "<2,3,21>": "WINDOW.TILE", + "<2,3,22>": "WINDOW.CASCADE", + "<2,3,23>": "WINDOW.ARRANGE_ICONS", + "<2,3,24>": "HELP.HELP", + "<2,3,25>": "HELP.QUICKHELP", + "<2,3,26>": "" + }, + "<2,4>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/DEFNTEMPLATE.json b/SYSPROG/OIWIN/DEFNTEMPLATE.json new file mode 100644 index 0000000..a03ea3f --- /dev/null +++ b/SYSPROG/OIWIN/DEFNTEMPLATE.json @@ -0,0 +1,597 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "300", + "<2>": "0", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "DEFNTEMPLATE", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "128", + "<1,6>": "133", + "<1,7>": "327", + "<1,8>": "171", + "<1,9>": "Untitled", + "<1,10>": "0x92cf0000", + "<1,11>": "0x0", + "<1,12>": "0", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "0", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "0", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "0", + "<1,24,6>": "0" + }, + "<1,25>": "0", + "<1,26>": "0", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": { + "<1,32,1>": "0x7FFFE", + "<1,32,2>": "0xF001EA08" + }, + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0x10001", + "<1,37,2>": "0x10001" + }, + "<1,38>": { + "<1,38,1>": "1", + "<1,38,2>": "1" + }, + "<1,39>": "", + "<1,40>": "0", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "" + } + }, + "record3": { + "<1>": "" + }, + "record4": { + "<1>": { + "<1,1>": { + "<1,1,1>": "MENU", + "<1,1,2>": "5", + "<1,1,3>": "", + "<1,1,4>": "", + "<1,1,5>": "0", + "<1,1,6>": "0", + "<1,1,7>": "0", + "<1,1,8>": "0", + "<1,1,9>": "26", + "<1,1,10>": "", + "<1,1,11>": "0" + }, + "<1,2>": { + "<1,2,1>": "POPUP", + "<1,2,2>": "7", + "<1,2,3>": "", + "<1,2,4>": "&File", + "<1,2,5>": "0", + "<1,2,6>": "0", + "<1,2,7>": "0", + "<1,2,8>": "0", + "<1,2,9>": "", + "<1,2,10>": "", + "<1,2,11>": "0" + }, + "<1,3>": { + "<1,3,1>": "ITEM", + "<1,3,2>": "", + "<1,3,3>": "", + "<1,3,4>": "&Read\tF5", + "<1,3,5>": "0", + "<1,3,6>": "0", + "<1,3,7>": "0", + "<1,3,8>": "116", + "<1,3,9>": "", + "<1,3,10>": "", + "<1,3,11>": "0" + }, + "<1,4>": { + "<1,4,1>": "ITEM", + "<1,4,2>": "", + "<1,4,3>": "", + "<1,4,4>": "&Save\tF9", + "<1,4,5>": "0", + "<1,4,6>": "0", + "<1,4,7>": "0", + "<1,4,8>": "120", + "<1,4,9>": "", + "<1,4,10>": "", + "<1,4,11>": "0" + }, + "<1,5>": { + "<1,5,1>": "SEPARATOR", + "<1,5,2>": "", + "<1,5,3>": "", + "<1,5,4>": "", + "<1,5,5>": "0", + "<1,5,6>": "0", + "<1,5,7>": "0", + "<1,5,8>": "0", + "<1,5,9>": "", + "<1,5,10>": "", + "<1,5,11>": "0" + }, + "<1,6>": { + "<1,6,1>": "ITEM", + "<1,6,2>": "", + "<1,6,3>": "", + "<1,6,4>": "C&lear\tF8", + "<1,6,5>": "0", + "<1,6,6>": "0", + "<1,6,7>": "0", + "<1,6,8>": "119", + "<1,6,9>": "", + "<1,6,10>": "", + "<1,6,11>": "0" + }, + "<1,7>": { + "<1,7,1>": "ITEM", + "<1,7,2>": "", + "<1,7,3>": "", + "<1,7,4>": "&Delete\tF7", + "<1,7,5>": "0", + "<1,7,6>": "0", + "<1,7,7>": "0", + "<1,7,8>": "118", + "<1,7,9>": "", + "<1,7,10>": "", + "<1,7,11>": "0" + }, + "<1,8>": { + "<1,8,1>": "SEPARATOR", + "<1,8,2>": "", + "<1,8,3>": "", + "<1,8,4>": "", + "<1,8,5>": "0", + "<1,8,6>": "0", + "<1,8,7>": "0", + "<1,8,8>": "0", + "<1,8,9>": "", + "<1,8,10>": "", + "<1,8,11>": "0" + }, + "<1,9>": { + "<1,9,1>": "ITEM", + "<1,9,2>": "", + "<1,9,3>": "", + "<1,9,4>": "&Close", + "<1,9,5>": "0", + "<1,9,6>": "0", + "<1,9,7>": "0", + "<1,9,8>": "0", + "<1,9,9>": "", + "<1,9,10>": "", + "<1,9,11>": "0" + }, + "<1,10>": { + "<1,10,1>": "POPUP", + "<1,10,2>": "1", + "<1,10,3>": "", + "<1,10,4>": "&Edit", + "<1,10,5>": "0", + "<1,10,6>": "0", + "<1,10,7>": "0", + "<1,10,8>": "0", + "<1,10,9>": "", + "<1,10,10>": "", + "<1,10,11>": "0" + }, + "<1,11>": { + "<1,11,1>": "ITEM", + "<1,11,2>": "", + "<1,11,3>": "", + "<1,11,4>": "&Options\tAlt+Down", + "<1,11,5>": "0", + "<1,11,6>": "0", + "<1,11,7>": "0", + "<1,11,8>": "1064", + "<1,11,9>": "", + "<1,11,10>": "", + "<1,11,11>": "0" + }, + "<1,12>": { + "<1,12,1>": "POPUP", + "<1,12,2>": "6", + "<1,12,3>": "", + "<1,12,4>": "Se&arch", + "<1,12,5>": "0", + "<1,12,6>": "0", + "<1,12,7>": "0", + "<1,12,8>": "0", + "<1,12,9>": "", + "<1,12,10>": "", + "<1,12,11>": "0" + }, + "<1,13>": { + "<1,13,1>": "ITEM", + "<1,13,2>": "", + "<1,13,3>": "", + "<1,13,4>": "&Search\tF6", + "<1,13,5>": "0", + "<1,13,6>": "0", + "<1,13,7>": "0", + "<1,13,8>": "117", + "<1,13,9>": "", + "<1,13,10>": "", + "<1,13,11>": "0" + }, + "<1,14>": { + "<1,14,1>": "ITEM", + "<1,14,2>": "", + "<1,14,3>": "", + "<1,14,4>": "&Next\tF3", + "<1,14,5>": "0", + "<1,14,6>": "0", + "<1,14,7>": "0", + "<1,14,8>": "114", + "<1,14,9>": "", + "<1,14,10>": "", + "<1,14,11>": "0" + }, + "<1,15>": { + "<1,15,1>": "ITEM", + "<1,15,2>": "", + "<1,15,3>": "", + "<1,15,4>": "&Previous\tF4", + "<1,15,5>": "0", + "<1,15,6>": "0", + "<1,15,7>": "0", + "<1,15,8>": "115", + "<1,15,9>": "", + "<1,15,10>": "", + "<1,15,11>": "0" + }, + "<1,16>": { + "<1,16,1>": "ITEM", + "<1,16,2>": "", + "<1,16,3>": "", + "<1,16,4>": "&First\tCtrl+F4", + "<1,16,5>": "0", + "<1,16,6>": "0", + "<1,16,7>": "0", + "<1,16,8>": "627", + "<1,16,9>": "", + "<1,16,10>": "", + "<1,16,11>": "0" + }, + "<1,17>": { + "<1,17,1>": "ITEM", + "<1,17,2>": "", + "<1,17,3>": "", + "<1,17,4>": "&Last\tCtrl+F3", + "<1,17,5>": "0", + "<1,17,6>": "0", + "<1,17,7>": "0", + "<1,17,8>": "626", + "<1,17,9>": "", + "<1,17,10>": "", + "<1,17,11>": "0" + }, + "<1,18>": { + "<1,18,1>": "ITEM", + "<1,18,2>": "", + "<1,18,3>": "", + "<1,18,4>": "&Absolute\tF12", + "<1,18,5>": "0", + "<1,18,6>": "0", + "<1,18,7>": "0", + "<1,18,8>": "123", + "<1,18,9>": "", + "<1,18,10>": "", + "<1,18,11>": "0" + }, + "<1,19>": { + "<1,19,1>": "POPUP", + "<1,19,2>": "4", + "<1,19,3>": "", + "<1,19,4>": "&Page", + "<1,19,5>": "0", + "<1,19,6>": "0", + "<1,19,7>": "0", + "<1,19,8>": "0", + "<1,19,9>": "", + "<1,19,10>": "", + "<1,19,11>": "0" + }, + "<1,20>": { + "<1,20,1>": "ITEM", + "<1,20,2>": "", + "<1,20,3>": "", + "<1,20,4>": "&First\tCtrl+Shift+Home", + "<1,20,5>": "0", + "<1,20,6>": "0", + "<1,20,7>": "0", + "<1,20,8>": "804", + "<1,20,9>": "", + "<1,20,10>": "", + "<1,20,11>": "0" + }, + "<1,21>": { + "<1,21,1>": "ITEM", + "<1,21,2>": "", + "<1,21,3>": "", + "<1,21,4>": "&Previous\tCtrl+Shift+PgUp", + "<1,21,5>": "0", + "<1,21,6>": "0", + "<1,21,7>": "0", + "<1,21,8>": "801", + "<1,21,9>": "", + "<1,21,10>": "", + "<1,21,11>": "0" + }, + "<1,22>": { + "<1,22,1>": "ITEM", + "<1,22,2>": "", + "<1,22,3>": "", + "<1,22,4>": "&Next\tCtrl+Shift+PgDn", + "<1,22,5>": "0", + "<1,22,6>": "0", + "<1,22,7>": "0", + "<1,22,8>": "802", + "<1,22,9>": "", + "<1,22,10>": "", + "<1,22,11>": "0" + }, + "<1,23>": { + "<1,23,1>": "ITEM", + "<1,23,2>": "", + "<1,23,3>": "", + "<1,23,4>": "&Last\tCtrl+Shift+End", + "<1,23,5>": "0", + "<1,23,6>": "0", + "<1,23,7>": "0", + "<1,23,8>": "803", + "<1,23,9>": "", + "<1,23,10>": "", + "<1,23,11>": "0" + }, + "<1,24>": { + "<1,24,1>": "POPUP", + "<1,24,2>": "2", + "<1,24,3>": "", + "<1,24,4>": "&Help", + "<1,24,5>": "0", + "<1,24,6>": "0", + "<1,24,7>": "0", + "<1,24,8>": "0", + "<1,24,9>": "", + "<1,24,10>": "", + "<1,24,11>": "0" + }, + "<1,25>": { + "<1,25,1>": "ITEM", + "<1,25,2>": "", + "<1,25,3>": "", + "<1,25,4>": "&Help\tF1", + "<1,25,5>": "0", + "<1,25,6>": "0", + "<1,25,7>": "0", + "<1,25,8>": "112", + "<1,25,9>": "", + "<1,25,10>": "", + "<1,25,11>": "0" + }, + "<1,26>": { + "<1,26,1>": "ITEM", + "<1,26,2>": "", + "<1,26,3>": "", + "<1,26,4>": "&QuickHelp\tCtrl+F1", + "<1,26,5>": "0", + "<1,26,6>": "0", + "<1,26,7>": "0", + "<1,26,8>": "624", + "<1,26,9>": "", + "<1,26,10>": "", + "<1,26,11>": "0" + } + }, + "<2>": { + "<2,1>": "", + "<2,2>": { + "<2,2,1>": { + "<2,2,1,1>": "E", + "<2,2,1,2>": "NOTEREAD", + "<2,2,1,3>": "@WINDOW", + "<2,2,1,4>": "", + "<2,2,1,5>": "", + "<2,2,1,6>": "" + }, + "<2,2,2>": { + "<2,2,2,1>": "E", + "<2,2,2,2>": "NOTEWRITE", + "<2,2,2,3>": "@WINDOW", + "<2,2,2,4>": "", + "<2,2,2,5>": "", + "<2,2,2,6>": "" + }, + "<2,2,3>": { + "<2,2,3,1>": "E", + "<2,2,3,2>": "CLEAR", + "<2,2,3,3>": "@WINDOW", + "<2,2,3,4>": "", + "<2,2,3,5>": "", + "<2,2,3,6>": "" + }, + "<2,2,4>": { + "<2,2,4,1>": "E", + "<2,2,4,2>": "NOTEDELETE", + "<2,2,4,3>": "@WINDOW", + "<2,2,4,4>": "", + "<2,2,4,5>": "", + "<2,2,4,6>": "" + }, + "<2,2,5>": { + "<2,2,5,1>": "E", + "<2,2,5,2>": "CLOSE", + "<2,2,5,3>": "@WINDOW", + "<2,2,5,4>": "", + "<2,2,5,5>": "", + "<2,2,5,6>": "" + }, + "<2,2,6>": { + "<2,2,6,1>": "E", + "<2,2,6,2>": "OPTIONS", + "<2,2,6,3>": "@FOCUS", + "<2,2,6,4>": "", + "<2,2,6,5>": "", + "<2,2,6,6>": "" + }, + "<2,2,7>": { + "<2,2,7,1>": "E", + "<2,2,7,2>": "NOTESEARCH", + "<2,2,7,3>": "@WINDOW", + "<2,2,7,4>": "", + "<2,2,7,5>": "", + "<2,2,7,6>": "" + }, + "<2,2,8>": { + "<2,2,8,1>": "E", + "<2,2,8,2>": "NOTENEXT", + "<2,2,8,3>": "@WINDOW", + "<2,2,8,4>": "", + "<2,2,8,5>": "", + "<2,2,8,6>": "" + }, + "<2,2,9>": { + "<2,2,9,1>": "E", + "<2,2,9,2>": "NOTEPREV", + "<2,2,9,3>": "@WINDOW", + "<2,2,9,4>": "", + "<2,2,9,5>": "", + "<2,2,9,6>": "" + }, + "<2,2,10>": { + "<2,2,10,1>": "E", + "<2,2,10,2>": "NOTEFIRST", + "<2,2,10,3>": "@WINDOW", + "<2,2,10,4>": "", + "<2,2,10,5>": "", + "<2,2,10,6>": "" + }, + "<2,2,11>": { + "<2,2,11,1>": "E", + "<2,2,11,2>": "NOTELAST", + "<2,2,11,3>": "@WINDOW", + "<2,2,11,4>": "", + "<2,2,11,5>": "", + "<2,2,11,6>": "" + }, + "<2,2,12>": { + "<2,2,12,1>": "E", + "<2,2,12,2>": "NOTEABS", + "<2,2,12,3>": "@WINDOW", + "<2,2,12,4>": "", + "<2,2,12,5>": "", + "<2,2,12,6>": "" + }, + "<2,2,13>": { + "<2,2,13,1>": "E", + "<2,2,13,2>": "PAGE", + "<2,2,13,3>": "@WINDOW", + "<2,2,13,4>": "1", + "<2,2,13,5>": "", + "<2,2,13,6>": "" + }, + "<2,2,14>": { + "<2,2,14,1>": "E", + "<2,2,14,2>": "PAGE", + "<2,2,14,3>": "@WINDOW", + "<2,2,14,4>": "-", + "<2,2,14,5>": "", + "<2,2,14,6>": "" + }, + "<2,2,15>": { + "<2,2,15,1>": "E", + "<2,2,15,2>": "PAGE", + "<2,2,15,3>": "@WINDOW", + "<2,2,15,4>": "+", + "<2,2,15,5>": "", + "<2,2,15,6>": "" + }, + "<2,2,16>": { + "<2,2,16,1>": "E", + "<2,2,16,2>": "PAGE", + "<2,2,16,3>": "@WINDOW", + "<2,2,16,4>": "L", + "<2,2,16,5>": "", + "<2,2,16,6>": "" + }, + "<2,2,17>": { + "<2,2,17,1>": "E", + "<2,2,17,2>": "HELP", + "<2,2,17,3>": "@FOCUS", + "<2,2,17,4>": "", + "<2,2,17,5>": "", + "<2,2,17,6>": "" + }, + "<2,2,18>": "" + }, + "<2,3>": { + "<2,3,1>": "FILE.READ", + "<2,3,2>": "FILE.SAVE", + "<2,3,3>": "FILE.CLEAR", + "<2,3,4>": "FILE.DELETE", + "<2,3,5>": "FILE.CLOSE", + "<2,3,6>": "EDIT.OPTIONS", + "<2,3,7>": "SEARCH.SEARCH", + "<2,3,8>": "SEARCH.NEXT", + "<2,3,9>": "SEARCH.PREVIOUS", + "<2,3,10>": "SEARCH.FIRST", + "<2,3,11>": "SEARCH.LAST", + "<2,3,12>": "SEARCH.ABSOLUTE", + "<2,3,13>": "PAGE.FIRST", + "<2,3,14>": "PAGE.PREVIOUS", + "<2,3,15>": "PAGE.NEXT", + "<2,3,16>": "PAGE.LAST", + "<2,3,17>": "HELP.HELP", + "<2,3,18>": "" + }, + "<2,4>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/DEFOITEMPLATE.json b/SYSPROG/OIWIN/DEFOITEMPLATE.json new file mode 100644 index 0000000..5f2781c --- /dev/null +++ b/SYSPROG/OIWIN/DEFOITEMPLATE.json @@ -0,0 +1,1139 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1000", + "<2>": "2" + }, + "record2": { + "<1>": { + "<1,1>": "DEFOITEMPLATE", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "426", + "<1,6>": "113", + "<1,7>": "-340", + "<1,8>": "-81", + "<1,9>": "Untitled", + "<1,10>": { + "<1,10,1>": "0x92CF0000", + "<1,10,2>": "0x100" + }, + "<1,11>": { + "<1,11,1>": "0x0", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": { + "<1,61,1>": { + "<1,61,1,1>": "-1", + "<1,61,1,2>": "-1", + "<1,61,1,3>": "-1", + "<1,61,1,4>": "-1" + } + }, + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "0", + "<1,62,4>": "0", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "BTN_OK", + "<1,2>": "", + "<1,3>": "PUSHBUTTON", + "<1,4>": "DEFOITEMPLATE", + "<1,5>": "52", + "<1,6>": "12", + "<1,7>": "80", + "<1,8>": "24", + "<1,9>": "&OK", + "<1,10>": { + "<1,10,1>": "0x50000300", + "<1,10,2>": "0x0" + }, + "<1,11>": { + "<1,11,1>": "0x4", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "1", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "0", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "Tahoma", + "<1,15,1,2>": "-11", + "<1,15,1,3>": "400", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "0", + "<1,15,1,8>": "34", + "<1,15,1,9>": "0", + "<1,15,1,10>": "3", + "<1,15,1,11>": "2", + "<1,15,1,12>": "1", + "<1,15,1,13>": "0", + "<1,15,1,14>": "0" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "E", + "<1,18,1,2>": "WRITE", + "<1,18,1,3>": "@WINDOW", + "<1,18,1,4>": "", + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "GEN" + } + }, + "<1,19>": "CLICK", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": "", + "<1,38>": "", + "<1,39>": "", + "<1,40>": "-1", + "<1,41>": { + "<1,41,1>": "", + "<1,41,2>": "-1" + }, + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": "0", + "<1,63>": "", + "<1,64>": { + "<1,64,1>": "-2", + "<1,64,2>": "-2", + "<1,64,3>": "0" + }, + "<1,65>": "-2", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "0", + "<1,91>": "0", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "" + }, + "<2>": { + "<2,1>": "BTN_CANCEL", + "<2,2>": "", + "<2,3>": "PUSHBUTTON", + "<2,4>": "DEFOITEMPLATE", + "<2,5>": "140", + "<2,6>": "12", + "<2,7>": "80", + "<2,8>": "24", + "<2,9>": "&Cancel", + "<2,10>": { + "<2,10,1>": "0x50000300", + "<2,10,2>": "0x0" + }, + "<2,11>": { + "<2,11,1>": "0x0", + "<2,11,2>": "0x80000000" + }, + "<2,12>": "2", + "<2,13>": { + "<2,13,1>": "-2", + "<2,13,2>": "-2", + "<2,13,3>": "0" + }, + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "Tahoma", + "<2,15,1,2>": "-11", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "3", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": { + "<2,18,1>": { + "<2,18,1,1>": "E", + "<2,18,1,2>": "CLOSE", + "<2,18,1,3>": "@WINDOW", + "<2,18,1,4>": "", + "<2,18,1,5>": "", + "<2,18,1,6>": "", + "<2,18,1,7>": "", + "<2,18,1,8>": "", + "<2,18,1,9>": "", + "<2,18,1,10>": "", + "<2,18,1,11>": "", + "<2,18,1,12>": "", + "<2,18,1,13>": "", + "<2,18,1,14>": "", + "<2,18,1,15>": "GEN" + } + }, + "<2,19>": "CLICK", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "", + "<2,26>": "", + "<2,27>": "", + "<2,28>": "", + "<2,29>": "", + "<2,30>": "", + "<2,31>": "", + "<2,32>": "", + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "-1", + "<2,41>": { + "<2,41,1>": "", + "<2,41,2>": "-1" + }, + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "", + "<2,53>": "", + "<2,54>": "", + "<2,55>": "", + "<2,56>": "", + "<2,57>": "", + "<2,58>": "", + "<2,59>": "", + "<2,60>": "", + "<2,61>": "", + "<2,62>": "0", + "<2,63>": "", + "<2,64>": { + "<2,64,1>": "-2", + "<2,64,2>": "-2", + "<2,64,3>": "0" + }, + "<2,65>": "-2", + "<2,66>": "", + "<2,67>": "", + "<2,68>": "", + "<2,69>": "", + "<2,70>": "", + "<2,71>": "", + "<2,72>": "", + "<2,73>": "", + "<2,74>": "", + "<2,75>": "", + "<2,76>": "", + "<2,77>": "", + "<2,78>": "", + "<2,79>": "", + "<2,80>": "", + "<2,81>": "", + "<2,82>": "", + "<2,83>": "", + "<2,84>": "", + "<2,85>": "", + "<2,86>": "", + "<2,87>": "", + "<2,88>": "", + "<2,89>": "", + "<2,90>": "0", + "<2,91>": "0", + "<2,92>": "", + "<2,93>": "", + "<2,94>": "", + "<2,95>": "", + "<2,96>": "", + "<2,97>": "", + "<2,98>": "", + "<2,99>": "", + "<2,100>": "", + "<2,101>": "", + "<2,102>": "" + } + }, + "record4": { + "<1>": { + "<1,1>": { + "<1,1,1>": "MENU", + "<1,1,2>": "5", + "<1,1,3>": "", + "<1,1,4>": "", + "<1,1,5>": "0", + "<1,1,6>": "0", + "<1,1,7>": "0", + "<1,1,8>": "0", + "<1,1,9>": "34", + "<1,1,10>": "", + "<1,1,11>": "0", + "<1,1,12>": "" + }, + "<1,2>": { + "<1,2,1>": "POPUP", + "<1,2,2>": "7", + "<1,2,3>": "", + "<1,2,4>": "&File", + "<1,2,5>": "0", + "<1,2,6>": "0", + "<1,2,7>": "0", + "<1,2,8>": "0", + "<1,2,9>": "", + "<1,2,10>": "", + "<1,2,11>": "0", + "<1,2,12>": "" + }, + "<1,3>": { + "<1,3,1>": "ITEM", + "<1,3,2>": "", + "<1,3,3>": "", + "<1,3,4>": "&Read Row\tCtrl+R", + "<1,3,5>": "0", + "<1,3,6>": "0", + "<1,3,7>": "0", + "<1,3,8>": "594", + "<1,3,9>": "", + "<1,3,10>": "", + "<1,3,11>": "32", + "<1,3,12>": "" + }, + "<1,4>": { + "<1,4,1>": "ITEM", + "<1,4,2>": "", + "<1,4,3>": "", + "<1,4,4>": "&Save Row\tCtrl+S", + "<1,4,5>": "0", + "<1,4,6>": "0", + "<1,4,7>": "0", + "<1,4,8>": "595", + "<1,4,9>": "", + "<1,4,10>": "", + "<1,4,11>": "32", + "<1,4,12>": "" + }, + "<1,5>": { + "<1,5,1>": "SEPARATOR", + "<1,5,2>": "", + "<1,5,3>": "", + "<1,5,4>": "", + "<1,5,5>": "0", + "<1,5,6>": "0", + "<1,5,7>": "0", + "<1,5,8>": "0", + "<1,5,9>": "", + "<1,5,10>": "", + "<1,5,11>": "0", + "<1,5,12>": "" + }, + "<1,6>": { + "<1,6,1>": "ITEM", + "<1,6,2>": "", + "<1,6,3>": "", + "<1,6,4>": "C&lear Form\tF8", + "<1,6,5>": "0", + "<1,6,6>": "0", + "<1,6,7>": "0", + "<1,6,8>": "119", + "<1,6,9>": "", + "<1,6,10>": "", + "<1,6,11>": "0", + "<1,6,12>": "" + }, + "<1,7>": { + "<1,7,1>": "ITEM", + "<1,7,2>": "", + "<1,7,3>": "", + "<1,7,4>": "&Delete Row\tF7", + "<1,7,5>": "0", + "<1,7,6>": "0", + "<1,7,7>": "0", + "<1,7,8>": "118", + "<1,7,9>": "", + "<1,7,10>": "", + "<1,7,11>": "0", + "<1,7,12>": "" + }, + "<1,8>": { + "<1,8,1>": "SEPARATOR", + "<1,8,2>": "", + "<1,8,3>": "", + "<1,8,4>": "", + "<1,8,5>": "0", + "<1,8,6>": "0", + "<1,8,7>": "0", + "<1,8,8>": "0", + "<1,8,9>": "", + "<1,8,10>": "", + "<1,8,11>": "0", + "<1,8,12>": "" + }, + "<1,9>": { + "<1,9,1>": "ITEM", + "<1,9,2>": "", + "<1,9,3>": "", + "<1,9,4>": "&Close\tAlt+C", + "<1,9,5>": "0", + "<1,9,6>": "0", + "<1,9,7>": "0", + "<1,9,8>": "1091", + "<1,9,9>": "", + "<1,9,10>": "", + "<1,9,11>": "0", + "<1,9,12>": "" + }, + "<1,10>": { + "<1,10,1>": "POPUP", + "<1,10,2>": "1", + "<1,10,3>": "", + "<1,10,4>": "&Edit", + "<1,10,5>": "0", + "<1,10,6>": "0", + "<1,10,7>": "0", + "<1,10,8>": "0", + "<1,10,9>": "", + "<1,10,10>": "", + "<1,10,11>": "0", + "<1,10,12>": "" + }, + "<1,11>": { + "<1,11,1>": "ITEM", + "<1,11,2>": "", + "<1,11,3>": "", + "<1,11,4>": "&Options\tAlt+Down", + "<1,11,5>": "0", + "<1,11,6>": "0", + "<1,11,7>": "0", + "<1,11,8>": "1064", + "<1,11,9>": "", + "<1,11,10>": "", + "<1,11,11>": "0", + "<1,11,12>": "" + }, + "<1,12>": { + "<1,12,1>": "POPUP", + "<1,12,2>": "4", + "<1,12,3>": "", + "<1,12,4>": "&View", + "<1,12,5>": "0", + "<1,12,6>": "0", + "<1,12,7>": "0", + "<1,12,8>": "0", + "<1,12,9>": "", + "<1,12,10>": "", + "<1,12,11>": "0", + "<1,12,12>": "" + }, + "<1,13>": { + "<1,13,1>": "ITEM", + "<1,13,2>": "", + "<1,13,3>": "", + "<1,13,4>": "&First Page\tCtrl+Shift+Home", + "<1,13,5>": "0", + "<1,13,6>": "0", + "<1,13,7>": "0", + "<1,13,8>": "804", + "<1,13,9>": "", + "<1,13,10>": "", + "<1,13,11>": "0", + "<1,13,12>": "" + }, + "<1,14>": { + "<1,14,1>": "ITEM", + "<1,14,2>": "", + "<1,14,3>": "", + "<1,14,4>": "&Previous Page\tCtrl+Shift+PgUp", + "<1,14,5>": "0", + "<1,14,6>": "0", + "<1,14,7>": "0", + "<1,14,8>": "801", + "<1,14,9>": "", + "<1,14,10>": "", + "<1,14,11>": "0", + "<1,14,12>": "" + }, + "<1,15>": { + "<1,15,1>": "ITEM", + "<1,15,2>": "", + "<1,15,3>": "", + "<1,15,4>": "&Next Page\tCtrl+Shift+PgDn", + "<1,15,5>": "0", + "<1,15,6>": "0", + "<1,15,7>": "0", + "<1,15,8>": "802", + "<1,15,9>": "", + "<1,15,10>": "", + "<1,15,11>": "0", + "<1,15,12>": "" + }, + "<1,16>": { + "<1,16,1>": "ITEM", + "<1,16,2>": "", + "<1,16,3>": "", + "<1,16,4>": "&Last Page\tCtrl+Shift+End", + "<1,16,5>": "0", + "<1,16,6>": "0", + "<1,16,7>": "0", + "<1,16,8>": "803", + "<1,16,9>": "", + "<1,16,10>": "", + "<1,16,11>": "0", + "<1,16,12>": "" + }, + "<1,17>": { + "<1,17,1>": "POPUP", + "<1,17,2>": "14", + "<1,17,3>": "", + "<1,17,4>": "&QBF", + "<1,17,5>": "0", + "<1,17,6>": "0", + "<1,17,7>": "0", + "<1,17,8>": "0", + "<1,17,9>": "", + "<1,17,10>": "", + "<1,17,11>": "0", + "<1,17,12>": "" + }, + "<1,18>": { + "<1,18,1>": "ITEM", + "<1,18,2>": "", + "<1,18,3>": "", + "<1,18,4>": "&Initialize\tF11", + "<1,18,5>": "0", + "<1,18,6>": "0", + "<1,18,7>": "0", + "<1,18,8>": "122", + "<1,18,9>": "", + "<1,18,10>": "", + "<1,18,11>": "0", + "<1,18,12>": "" + }, + "<1,19>": { + "<1,19,1>": "ITEM", + "<1,19,2>": "", + "<1,19,3>": "", + "<1,19,4>": "&Execute\tF6", + "<1,19,5>": "0", + "<1,19,6>": "0", + "<1,19,7>": "0", + "<1,19,8>": "117", + "<1,19,9>": "", + "<1,19,10>": "", + "<1,19,11>": "0", + "<1,19,12>": "" + }, + "<1,20>": { + "<1,20,1>": "SEPARATOR", + "<1,20,2>": "", + "<1,20,3>": "", + "<1,20,4>": "", + "<1,20,5>": "0", + "<1,20,6>": "0", + "<1,20,7>": "0", + "<1,20,8>": "0", + "<1,20,9>": "", + "<1,20,10>": "", + "<1,20,11>": "0", + "<1,20,12>": "" + }, + "<1,21>": { + "<1,21,1>": "ITEM", + "<1,21,2>": "", + "<1,21,3>": "", + "<1,21,4>": "Load from External List", + "<1,21,5>": "0", + "<1,21,6>": "0", + "<1,21,7>": "0", + "<1,21,8>": "0", + "<1,21,9>": "", + "<1,21,10>": "", + "<1,21,11>": "0", + "<1,21,12>": "" + }, + "<1,22>": { + "<1,22,1>": "SEPARATOR", + "<1,22,2>": "", + "<1,22,3>": "", + "<1,22,4>": "", + "<1,22,5>": "0", + "<1,22,6>": "0", + "<1,22,7>": "0", + "<1,22,8>": "0", + "<1,22,9>": "", + "<1,22,10>": "", + "<1,22,11>": "0", + "<1,22,12>": "" + }, + "<1,23>": { + "<1,23,1>": "ITEM", + "<1,23,2>": "", + "<1,23,3>": "", + "<1,23,4>": "&Next\tF3", + "<1,23,5>": "0", + "<1,23,6>": "0", + "<1,23,7>": "0", + "<1,23,8>": "114", + "<1,23,9>": "", + "<1,23,10>": "", + "<1,23,11>": "0", + "<1,23,12>": "" + }, + "<1,24>": { + "<1,24,1>": "ITEM", + "<1,24,2>": "", + "<1,24,3>": "", + "<1,24,4>": "&Previous\tF4", + "<1,24,5>": "0", + "<1,24,6>": "0", + "<1,24,7>": "0", + "<1,24,8>": "115", + "<1,24,9>": "", + "<1,24,10>": "", + "<1,24,11>": "0", + "<1,24,12>": "" + }, + "<1,25>": { + "<1,25,1>": "ITEM", + "<1,25,2>": "", + "<1,25,3>": "", + "<1,25,4>": "&First\tCtrl+F4", + "<1,25,5>": "0", + "<1,25,6>": "0", + "<1,25,7>": "0", + "<1,25,8>": "627", + "<1,25,9>": "", + "<1,25,10>": "", + "<1,25,11>": "0", + "<1,25,12>": "" + }, + "<1,26>": { + "<1,26,1>": "ITEM", + "<1,26,2>": "", + "<1,26,3>": "", + "<1,26,4>": "&Last\tCtrl+F3", + "<1,26,5>": "0", + "<1,26,6>": "0", + "<1,26,7>": "0", + "<1,26,8>": "626", + "<1,26,9>": "", + "<1,26,10>": "", + "<1,26,11>": "0", + "<1,26,12>": "" + }, + "<1,27>": { + "<1,27,1>": "ITEM", + "<1,27,2>": "", + "<1,27,3>": "", + "<1,27,4>": "&Absolute\tF12", + "<1,27,5>": "0", + "<1,27,6>": "0", + "<1,27,7>": "0", + "<1,27,8>": "123", + "<1,27,9>": "", + "<1,27,10>": "", + "<1,27,11>": "0", + "<1,27,12>": "" + }, + "<1,28>": { + "<1,28,1>": "SEPARATOR", + "<1,28,2>": "", + "<1,28,3>": "", + "<1,28,4>": "", + "<1,28,5>": "0", + "<1,28,6>": "0", + "<1,28,7>": "0", + "<1,28,8>": "0", + "<1,28,9>": "", + "<1,28,10>": "", + "<1,28,11>": "0", + "<1,28,12>": "" + }, + "<1,29>": { + "<1,29,1>": "ITEM", + "<1,29,2>": "", + "<1,29,3>": "", + "<1,29,4>": "&Table", + "<1,29,5>": "0", + "<1,29,6>": "0", + "<1,29,7>": "0", + "<1,29,8>": "0", + "<1,29,9>": "", + "<1,29,10>": "", + "<1,29,11>": "0", + "<1,29,12>": "" + }, + "<1,30>": { + "<1,30,1>": "SEPARATOR", + "<1,30,2>": "", + "<1,30,3>": "", + "<1,30,4>": "", + "<1,30,5>": "0", + "<1,30,6>": "0", + "<1,30,7>": "0", + "<1,30,8>": "0", + "<1,30,9>": "", + "<1,30,10>": "", + "<1,30,11>": "0", + "<1,30,12>": "" + }, + "<1,31>": { + "<1,31,1>": "ITEM", + "<1,31,2>": "", + "<1,31,3>": "", + "<1,31,4>": "&Close", + "<1,31,5>": "0", + "<1,31,6>": "0", + "<1,31,7>": "0", + "<1,31,8>": "0", + "<1,31,9>": "", + "<1,31,10>": "", + "<1,31,11>": "0", + "<1,31,12>": "" + }, + "<1,32>": { + "<1,32,1>": "POPUP", + "<1,32,2>": "2", + "<1,32,3>": "", + "<1,32,4>": "&Help", + "<1,32,5>": "0", + "<1,32,6>": "0", + "<1,32,7>": "0", + "<1,32,8>": "0", + "<1,32,9>": "", + "<1,32,10>": "", + "<1,32,11>": "0", + "<1,32,12>": "" + }, + "<1,33>": { + "<1,33,1>": "ITEM", + "<1,33,2>": "", + "<1,33,3>": "", + "<1,33,4>": "&Help\tF1", + "<1,33,5>": "0", + "<1,33,6>": "0", + "<1,33,7>": "0", + "<1,33,8>": "112", + "<1,33,9>": "", + "<1,33,10>": "", + "<1,33,11>": "0", + "<1,33,12>": "" + }, + "<1,34>": { + "<1,34,1>": "ITEM", + "<1,34,2>": "", + "<1,34,3>": "", + "<1,34,4>": "&QuickHelp\tCtrl+F1", + "<1,34,5>": "0", + "<1,34,6>": "0", + "<1,34,7>": "0", + "<1,34,8>": "624", + "<1,34,9>": "", + "<1,34,10>": "", + "<1,34,11>": "0", + "<1,34,12>": "" + } + }, + "<2>": { + "<2,1>": "", + "<2,2>": { + "<2,2,1>": { + "<2,2,1,1>": "E", + "<2,2,1,2>": "READ", + "<2,2,1,3>": "@WINDOW", + "<2,2,1,4>": "", + "<2,2,1,5>": "", + "<2,2,1,6>": "" + }, + "<2,2,2>": { + "<2,2,2,1>": "E", + "<2,2,2,2>": "WRITE", + "<2,2,2,3>": "@WINDOW", + "<2,2,2,4>": "", + "<2,2,2,5>": "", + "<2,2,2,6>": "" + }, + "<2,2,3>": { + "<2,2,3,1>": "E", + "<2,2,3,2>": "CLEAR", + "<2,2,3,3>": "@WINDOW", + "<2,2,3,4>": "", + "<2,2,3,5>": "", + "<2,2,3,6>": "" + }, + "<2,2,4>": { + "<2,2,4,1>": "E", + "<2,2,4,2>": "DELETE", + "<2,2,4,3>": "@WINDOW", + "<2,2,4,4>": "", + "<2,2,4,5>": "", + "<2,2,4,6>": "" + }, + "<2,2,5>": { + "<2,2,5,1>": "E", + "<2,2,5,2>": "CLOSE", + "<2,2,5,3>": "@WINDOW", + "<2,2,5,4>": "", + "<2,2,5,5>": "", + "<2,2,5,6>": "" + }, + "<2,2,6>": { + "<2,2,6,1>": "E", + "<2,2,6,2>": "OPTIONS", + "<2,2,6,3>": "@FOCUS", + "<2,2,6,4>": "", + "<2,2,6,5>": "", + "<2,2,6,6>": "" + }, + "<2,2,7>": { + "<2,2,7,1>": "E", + "<2,2,7,2>": "PAGE", + "<2,2,7,3>": "@WINDOW", + "<2,2,7,4>": "1", + "<2,2,7,5>": "", + "<2,2,7,6>": "" + }, + "<2,2,8>": { + "<2,2,8,1>": "E", + "<2,2,8,2>": "PAGE", + "<2,2,8,3>": "@WINDOW", + "<2,2,8,4>": "-", + "<2,2,8,5>": "", + "<2,2,8,6>": "" + }, + "<2,2,9>": { + "<2,2,9,1>": "E", + "<2,2,9,2>": "PAGE", + "<2,2,9,3>": "@WINDOW", + "<2,2,9,4>": "+", + "<2,2,9,5>": "", + "<2,2,9,6>": "" + }, + "<2,2,10>": { + "<2,2,10,1>": "E", + "<2,2,10,2>": "PAGE", + "<2,2,10,3>": "@WINDOW", + "<2,2,10,4>": "L", + "<2,2,10,5>": "", + "<2,2,10,6>": "" + }, + "<2,2,11>": { + "<2,2,11,1>": "E", + "<2,2,11,2>": "QBFINIT", + "<2,2,11,3>": "@WINDOW", + "<2,2,11,4>": "", + "<2,2,11,5>": "", + "<2,2,11,6>": "" + }, + "<2,2,12>": { + "<2,2,12,1>": "E", + "<2,2,12,2>": "QBFRUN", + "<2,2,12,3>": "@WINDOW", + "<2,2,12,4>": "", + "<2,2,12,5>": "", + "<2,2,12,6>": "" + }, + "<2,2,13>": { + "<2,2,13,1>": "R", + "<2,2,13,2>": "EXECUTE", + "<2,2,13,3>": "SYSPROG*STPROCEXE**RTI_QBF_LOAD_FROM_EXTERNALLIST", + "<2,2,13,4>": "@WINDOW", + "<2,2,13,5>": "", + "<2,2,13,6>": "" + }, + "<2,2,14>": { + "<2,2,14,1>": "E", + "<2,2,14,2>": "QBFNEXT", + "<2,2,14,3>": "@WINDOW", + "<2,2,14,4>": "", + "<2,2,14,5>": "", + "<2,2,14,6>": "" + }, + "<2,2,15>": { + "<2,2,15,1>": "E", + "<2,2,15,2>": "QBFPREV", + "<2,2,15,3>": "@WINDOW", + "<2,2,15,4>": "", + "<2,2,15,5>": "", + "<2,2,15,6>": "" + }, + "<2,2,16>": { + "<2,2,16,1>": "E", + "<2,2,16,2>": "QBFFIRST", + "<2,2,16,3>": "@WINDOW", + "<2,2,16,4>": "", + "<2,2,16,5>": "", + "<2,2,16,6>": "" + }, + "<2,2,17>": { + "<2,2,17,1>": "E", + "<2,2,17,2>": "QBFLAST", + "<2,2,17,3>": "@WINDOW", + "<2,2,17,4>": "", + "<2,2,17,5>": "", + "<2,2,17,6>": "" + }, + "<2,2,18>": { + "<2,2,18,1>": "E", + "<2,2,18,2>": "QBFABS", + "<2,2,18,3>": "@WINDOW", + "<2,2,18,4>": "", + "<2,2,18,5>": "", + "<2,2,18,6>": "" + }, + "<2,2,19>": { + "<2,2,19,1>": "E", + "<2,2,19,2>": "QBFTABLE", + "<2,2,19,3>": "@WINDOW", + "<2,2,19,4>": "", + "<2,2,19,5>": "", + "<2,2,19,6>": "" + }, + "<2,2,20>": { + "<2,2,20,1>": "E", + "<2,2,20,2>": "QBFCLOSE", + "<2,2,20,3>": "@WINDOW", + "<2,2,20,4>": "", + "<2,2,20,5>": "", + "<2,2,20,6>": "" + }, + "<2,2,21>": { + "<2,2,21,1>": "E", + "<2,2,21,2>": "HELP", + "<2,2,21,3>": "@FOCUS", + "<2,2,21,4>": "", + "<2,2,21,5>": "", + "<2,2,21,6>": "" + }, + "<2,2,22>": "" + }, + "<2,3>": { + "<2,3,1>": "FILE.READ_ROW", + "<2,3,2>": "FILE.SAVE_ROW", + "<2,3,3>": "FILE.CLEAR_FORM", + "<2,3,4>": "FILE.DELETE_ROW", + "<2,3,5>": "FILE.CLOSE", + "<2,3,6>": "EDIT.OPTIONS", + "<2,3,7>": "VIEW.FIRST_PAGE", + "<2,3,8>": "VIEW.PREVIOUS_PAGE", + "<2,3,9>": "VIEW.NEXT_PAGE", + "<2,3,10>": "VIEW.LAST_PAGE", + "<2,3,11>": "QBF.INITIALIZE", + "<2,3,12>": "QBF.EXECUTE", + "<2,3,13>": "QBF.LOAD_FROM_EXTERNAL_LIST", + "<2,3,14>": "QBF.NEXT", + "<2,3,15>": "QBF.PREVIOUS", + "<2,3,16>": "QBF.FIRST", + "<2,3,17>": "QBF.LAST", + "<2,3,18>": "QBF.ABSOLUTE", + "<2,3,19>": "QBF.TABLE", + "<2,3,20>": "QBF.CLOSE", + "<2,3,21>": "HELP.HELP", + "<2,3,22>": "" + }, + "<2,4>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/DEFVTEMPLATE.json b/SYSPROG/OIWIN/DEFVTEMPLATE.json new file mode 100644 index 0000000..09d9178 --- /dev/null +++ b/SYSPROG/OIWIN/DEFVTEMPLATE.json @@ -0,0 +1,397 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "300", + "<2>": "0", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "DEFVTEMPLATE", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "135", + "<1,6>": "148", + "<1,7>": "302", + "<1,8>": "222", + "<1,9>": "Default View Template", + "<1,10>": "0x92cf0000", + "<1,11>": "0x100", + "<1,12>": "0", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "0", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "0", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "0", + "<1,24,6>": "0" + }, + "<1,25>": "0", + "<1,26>": "0", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": { + "<1,32,1>": "0x7FFFE", + "<1,32,2>": "0xF001E808" + }, + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0x10001", + "<1,37,2>": "0x10001" + }, + "<1,38>": { + "<1,38,1>": "1", + "<1,38,2>": "1" + }, + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "" + } + }, + "record3": { + "<1>": "" + }, + "record4": { + "<1>": { + "<1,1>": { + "<1,1,1>": "MENU", + "<1,1,2>": "5", + "<1,1,3>": "", + "<1,1,4>": "", + "<1,1,5>": "0", + "<1,1,6>": "0", + "<1,1,7>": "0", + "<1,1,8>": "0", + "<1,1,9>": "16", + "<1,1,10>": "", + "<1,1,11>": "0" + }, + "<1,2>": { + "<1,2,1>": "POPUP", + "<1,2,2>": "1", + "<1,2,3>": "", + "<1,2,4>": "&File", + "<1,2,5>": "0", + "<1,2,6>": "0", + "<1,2,7>": "0", + "<1,2,8>": "0", + "<1,2,9>": "", + "<1,2,10>": "", + "<1,2,11>": "0" + }, + "<1,3>": { + "<1,3,1>": "ITEM", + "<1,3,2>": "", + "<1,3,3>": "", + "<1,3,4>": "&Close", + "<1,3,5>": "0", + "<1,3,6>": "0", + "<1,3,7>": "0", + "<1,3,8>": "0", + "<1,3,9>": "", + "<1,3,10>": "", + "<1,3,11>": "0" + }, + "<1,4>": { + "<1,4,1>": "POPUP", + "<1,4,2>": "1", + "<1,4,3>": "", + "<1,4,4>": "&Edit", + "<1,4,5>": "0", + "<1,4,6>": "0", + "<1,4,7>": "0", + "<1,4,8>": "0", + "<1,4,9>": "", + "<1,4,10>": "", + "<1,4,11>": "0" + }, + "<1,5>": { + "<1,5,1>": "ITEM", + "<1,5,2>": "", + "<1,5,3>": "", + "<1,5,4>": "&Options\tAlt+Down", + "<1,5,5>": "0", + "<1,5,6>": "0", + "<1,5,7>": "0", + "<1,5,8>": "1064", + "<1,5,9>": "", + "<1,5,10>": "", + "<1,5,11>": "0" + }, + "<1,6>": { + "<1,6,1>": "POPUP", + "<1,6,2>": "2", + "<1,6,3>": "", + "<1,6,4>": "Se&arch", + "<1,6,5>": "0", + "<1,6,6>": "0", + "<1,6,7>": "0", + "<1,6,8>": "0", + "<1,6,9>": "", + "<1,6,10>": "", + "<1,6,11>": "0" + }, + "<1,7>": { + "<1,7,1>": "ITEM", + "<1,7,2>": "", + "<1,7,3>": "", + "<1,7,4>": "&Populate\tF6", + "<1,7,5>": "0", + "<1,7,6>": "0", + "<1,7,7>": "0", + "<1,7,8>": "117", + "<1,7,9>": "", + "<1,7,10>": "", + "<1,7,11>": "0" + }, + "<1,8>": { + "<1,8,1>": "ITEM", + "<1,8,2>": "", + "<1,8,3>": "", + "<1,8,4>": "&Launch Form\tF3", + "<1,8,5>": "0", + "<1,8,6>": "0", + "<1,8,7>": "0", + "<1,8,8>": "114", + "<1,8,9>": "", + "<1,8,10>": "", + "<1,8,11>": "0" + }, + "<1,9>": { + "<1,9,1>": "POPUP", + "<1,9,2>": "4", + "<1,9,3>": "", + "<1,9,4>": "&Page", + "<1,9,5>": "0", + "<1,9,6>": "0", + "<1,9,7>": "0", + "<1,9,8>": "0", + "<1,9,9>": "", + "<1,9,10>": "", + "<1,9,11>": "0" + }, + "<1,10>": { + "<1,10,1>": "ITEM", + "<1,10,2>": "", + "<1,10,3>": "", + "<1,10,4>": "&First\tCtrl+Shift+Home", + "<1,10,5>": "0", + "<1,10,6>": "0", + "<1,10,7>": "0", + "<1,10,8>": "804", + "<1,10,9>": "", + "<1,10,10>": "", + "<1,10,11>": "0" + }, + "<1,11>": { + "<1,11,1>": "ITEM", + "<1,11,2>": "", + "<1,11,3>": "", + "<1,11,4>": "&Previous\tCtrl+Shift+PgUp", + "<1,11,5>": "0", + "<1,11,6>": "0", + "<1,11,7>": "0", + "<1,11,8>": "801", + "<1,11,9>": "", + "<1,11,10>": "", + "<1,11,11>": "0" + }, + "<1,12>": { + "<1,12,1>": "ITEM", + "<1,12,2>": "", + "<1,12,3>": "", + "<1,12,4>": "&Next\tCtrl+Shift+PgDn", + "<1,12,5>": "0", + "<1,12,6>": "0", + "<1,12,7>": "0", + "<1,12,8>": "802", + "<1,12,9>": "", + "<1,12,10>": "", + "<1,12,11>": "0" + }, + "<1,13>": { + "<1,13,1>": "ITEM", + "<1,13,2>": "", + "<1,13,3>": "", + "<1,13,4>": "&Last\tCtrl+Shift+End", + "<1,13,5>": "0", + "<1,13,6>": "0", + "<1,13,7>": "0", + "<1,13,8>": "803", + "<1,13,9>": "", + "<1,13,10>": "", + "<1,13,11>": "0" + }, + "<1,14>": { + "<1,14,1>": "POPUP", + "<1,14,2>": "2", + "<1,14,3>": "", + "<1,14,4>": "&Help", + "<1,14,5>": "0", + "<1,14,6>": "0", + "<1,14,7>": "0", + "<1,14,8>": "0", + "<1,14,9>": "", + "<1,14,10>": "", + "<1,14,11>": "0" + }, + "<1,15>": { + "<1,15,1>": "ITEM", + "<1,15,2>": "", + "<1,15,3>": "", + "<1,15,4>": "&Help\tF1", + "<1,15,5>": "0", + "<1,15,6>": "0", + "<1,15,7>": "0", + "<1,15,8>": "112", + "<1,15,9>": "", + "<1,15,10>": "", + "<1,15,11>": "0" + }, + "<1,16>": { + "<1,16,1>": "ITEM", + "<1,16,2>": "", + "<1,16,3>": "", + "<1,16,4>": "&QuickHelp\tCtrl+F1", + "<1,16,5>": "0", + "<1,16,6>": "0", + "<1,16,7>": "0", + "<1,16,8>": "624", + "<1,16,9>": "", + "<1,16,10>": "", + "<1,16,11>": "0" + } + }, + "<2>": { + "<2,1>": "", + "<2,2>": { + "<2,2,1>": { + "<2,2,1,1>": "E", + "<2,2,1,2>": "CLOSE", + "<2,2,1,3>": "@WINDOW", + "<2,2,1,4>": "", + "<2,2,1,5>": "", + "<2,2,1,6>": "" + }, + "<2,2,2>": { + "<2,2,2,1>": "E", + "<2,2,2,2>": "OPTIONS", + "<2,2,2,3>": "@FOCUS", + "<2,2,2,4>": "", + "<2,2,2,5>": "", + "<2,2,2,6>": "" + }, + "<2,2,3>": { + "<2,2,3,1>": "E", + "<2,2,3,2>": "POPULATEVIEW", + "<2,2,3,3>": "@WINDOW.VIEW_LIST_BOX", + "<2,2,3,4>": "", + "<2,2,3,5>": "", + "<2,2,3,6>": "" + }, + "<2,2,4>": { + "<2,2,4,1>": "R", + "<2,2,4,2>": "EXECUTE", + "<2,2,4,3>": "SYSPROG*STPROCEXE**START_VWFORM", + "<2,2,4,4>": { + "<2,2,4,4,1>": "FormName", + "<2,2,4,4,2>": "@WINDOW.VIEW_LIST_BOX" + }, + "<2,2,4,5>": "", + "<2,2,4,6>": "" + }, + "<2,2,5>": { + "<2,2,5,1>": "E", + "<2,2,5,2>": "PAGE", + "<2,2,5,3>": "@WINDOW", + "<2,2,5,4>": "1", + "<2,2,5,5>": "", + "<2,2,5,6>": "" + }, + "<2,2,6>": { + "<2,2,6,1>": "E", + "<2,2,6,2>": "PAGE", + "<2,2,6,3>": "@WINDOW", + "<2,2,6,4>": "-", + "<2,2,6,5>": "", + "<2,2,6,6>": "" + }, + "<2,2,7>": { + "<2,2,7,1>": "E", + "<2,2,7,2>": "PAGE", + "<2,2,7,3>": "@WINDOW", + "<2,2,7,4>": "+", + "<2,2,7,5>": "", + "<2,2,7,6>": "" + }, + "<2,2,8>": { + "<2,2,8,1>": "E", + "<2,2,8,2>": "PAGE", + "<2,2,8,3>": "@WINDOW", + "<2,2,8,4>": "L", + "<2,2,8,5>": "", + "<2,2,8,6>": "" + }, + "<2,2,9>": { + "<2,2,9,1>": "E", + "<2,2,9,2>": "HELP", + "<2,2,9,3>": "@FOCUS", + "<2,2,9,4>": "", + "<2,2,9,5>": "", + "<2,2,9,6>": "" + } + }, + "<2,3>": { + "<2,3,1>": "FILE.CLOSE", + "<2,3,2>": "EDIT.OPTIONS", + "<2,3,3>": "SEARCH.POPULATE", + "<2,3,4>": "SEARCH.LAUNCH_FORM", + "<2,3,5>": "PAGE.FIRST", + "<2,3,6>": "PAGE.PREVIOUS", + "<2,3,7>": "PAGE.NEXT", + "<2,3,8>": "PAGE.LAST", + "<2,3,9>": "HELP.HELP", + "<2,3,10>": "" + }, + "<2,4>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/IDXSVR.json b/SYSPROG/OIWIN/IDXSVR.json new file mode 100644 index 0000000..c8bceb9 --- /dev/null +++ b/SYSPROG/OIWIN/IDXSVR.json @@ -0,0 +1,974 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1010", + "<2>": "5", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "IDXSVR", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "206", + "<1,6>": "214", + "<1,7>": "-361", + "<1,8>": "-127", + "<1,9>": "Index Server", + "<1,10>": { + "<1,10,1>": "0x92CF0000", + "<1,10,2>": "0x100" + }, + "<1,11>": { + "<1,11,1>": "0x8000", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "R", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "SYSPROG*STPROCEXE**COMM_DIALOG_IDXSVR", + "<1,18,1,4>": "Create", + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "STPROC" + }, + "<1,18,2>": { + "<1,18,2,1>": "R", + "<1,18,2,2>": "EXECUTE", + "<1,18,2,3>": "SYSPROG*STPROCEXE**COMM_DIALOG_IDXSVR", + "<1,18,2,4>": "Close", + "<1,18,2,5>": "", + "<1,18,2,6>": "", + "<1,18,2,7>": "", + "<1,18,2,8>": "", + "<1,18,2,9>": "", + "<1,18,2,10>": "", + "<1,18,2,11>": "", + "<1,18,2,12>": "", + "<1,18,2,13>": "", + "<1,18,2,14>": "", + "<1,18,2,15>": "STPROC" + } + }, + "<1,19>": { + "<1,19,1>": "CREATE", + "<1,19,2>": "CLOSE" + }, + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "0", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0", + "<1,24,15>": "0", + "<1,24,16>": "0", + "<1,24,17>": "0" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "", + "<1,62,4>": "0", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "", + "<1,62,8>": "0.50", + "<1,62,9>": "5.00", + "<1,62,10>": "0.00" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "0", + "<1,107>": "", + "<1,108>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "INTERVAL", + "<1,2>": "", + "<1,3>": "EDITFIELD", + "<1,4>": "IDXSVR", + "<1,5>": "173", + "<1,6>": "29", + "<1,7>": "33", + "<1,8>": "18", + "<1,9>": "15", + "<1,10>": { + "<1,10,1>": "0x56000080", + "<1,10,2>": "0x0" + }, + "<1,11>": { + "<1,11,1>": "0x4", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "1", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "" + }, + "<1,14>": "0", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "MS Sans Serif", + "<1,15,1,2>": "-11", + "<1,15,1,3>": "700", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "0", + "<1,15,1,8>": "34", + "<1,15,1,9>": "0", + "<1,15,1,10>": "1", + "<1,15,1,11>": "2", + "<1,15,1,12>": "1", + "<1,15,1,13>": "0", + "<1,15,1,14>": "0" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "<>", + "<1,29>": "<>", + "<1,30>": "<>", + "<1,31>": "0", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": { + "<1,36,1>": "0", + "<1,36,2>": "0" + }, + "<1,37>": "", + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": "0", + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "", + "<1,107>": "", + "<1,108>": "" + }, + "<2>": { + "<2,1>": "INTERVAL_LABEL", + "<2,2>": "", + "<2,3>": "STATIC", + "<2,4>": "IDXSVR", + "<2,5>": "36", + "<2,6>": "29", + "<2,7>": "132", + "<2,8>": "18", + "<2,9>": "Update Indexes Every ", + "<2,10>": { + "<2,10,1>": "0x56000800", + "<2,10,2>": "0x0" + }, + "<2,11>": { + "<2,11,1>": "0x0", + "<2,11,2>": "0x80000000" + }, + "<2,12>": "4", + "<2,13>": { + "<2,13,1>": "-1", + "<2,13,2>": "-1", + "<2,13,3>": "" + }, + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "MS Sans Serif", + "<2,15,1,2>": "-11", + "<2,15,1,3>": "700", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "1", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": "", + "<2,19>": "", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "", + "<2,26>": "", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "", + "<2,31>": "", + "<2,32>": "", + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "", + "<2,53>": "", + "<2,54>": "", + "<2,55>": "", + "<2,56>": "", + "<2,57>": "", + "<2,58>": "", + "<2,59>": "", + "<2,60>": "", + "<2,61>": "", + "<2,62>": "0", + "<2,63>": { + "<2,63,1>": "", + "<2,63,2>": "", + "<2,63,3>": "", + "<2,63,4>": "", + "<2,63,5>": "", + "<2,63,6>": "", + "<2,63,7>": "", + "<2,63,8>": "" + }, + "<2,64>": { + "<2,64,1>": "", + "<2,64,2>": "", + "<2,64,3>": "" + }, + "<2,65>": "-2", + "<2,66>": "", + "<2,67>": "", + "<2,68>": "", + "<2,69>": "", + "<2,70>": "", + "<2,71>": "", + "<2,72>": "", + "<2,73>": "", + "<2,74>": "", + "<2,75>": "", + "<2,76>": "", + "<2,77>": "", + "<2,78>": "", + "<2,79>": "", + "<2,80>": "", + "<2,81>": "", + "<2,82>": "", + "<2,83>": "", + "<2,84>": "", + "<2,85>": "", + "<2,86>": "", + "<2,87>": "", + "<2,88>": "", + "<2,89>": "", + "<2,90>": "0", + "<2,91>": "0", + "<2,92>": "", + "<2,93>": "", + "<2,94>": "", + "<2,95>": "", + "<2,96>": "", + "<2,97>": "", + "<2,98>": "", + "<2,99>": "", + "<2,100>": "", + "<2,101>": "", + "<2,102>": "", + "<2,103>": "", + "<2,104>": "", + "<2,105>": "", + "<2,106>": "", + "<2,107>": "", + "<2,108>": "" + }, + "<3>": { + "<3,1>": "SECONDS_LABEL", + "<3,2>": "", + "<3,3>": "STATIC", + "<3,4>": "IDXSVR", + "<3,5>": "215", + "<3,6>": "29", + "<3,7>": "63", + "<3,8>": "18", + "<3,9>": "Seconds.", + "<3,10>": { + "<3,10,1>": "0x56000000", + "<3,10,2>": "0x0" + }, + "<3,11>": { + "<3,11,1>": "0x0", + "<3,11,2>": "0x80000000" + }, + "<3,12>": "5", + "<3,13>": { + "<3,13,1>": "-1", + "<3,13,2>": "-1", + "<3,13,3>": "" + }, + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "MS Sans Serif", + "<3,15,1,2>": "-11", + "<3,15,1,3>": "700", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "1", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": "", + "<3,19>": "", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "", + "<3,26>": "", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "", + "<3,31>": "", + "<3,32>": "", + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "", + "<3,53>": "", + "<3,54>": "", + "<3,55>": "", + "<3,56>": "", + "<3,57>": "", + "<3,58>": "", + "<3,59>": "", + "<3,60>": "", + "<3,61>": "", + "<3,62>": "0", + "<3,63>": { + "<3,63,1>": "", + "<3,63,2>": "", + "<3,63,3>": "", + "<3,63,4>": "", + "<3,63,5>": "", + "<3,63,6>": "", + "<3,63,7>": "", + "<3,63,8>": "" + }, + "<3,64>": { + "<3,64,1>": "", + "<3,64,2>": "", + "<3,64,3>": "" + }, + "<3,65>": "-2", + "<3,66>": "", + "<3,67>": "", + "<3,68>": "", + "<3,69>": "", + "<3,70>": "", + "<3,71>": "", + "<3,72>": "", + "<3,73>": "", + "<3,74>": "", + "<3,75>": "", + "<3,76>": "", + "<3,77>": "", + "<3,78>": "", + "<3,79>": "", + "<3,80>": "", + "<3,81>": "", + "<3,82>": "", + "<3,83>": "", + "<3,84>": "", + "<3,85>": "", + "<3,86>": "", + "<3,87>": "", + "<3,88>": "", + "<3,89>": "", + "<3,90>": "0", + "<3,91>": "0", + "<3,92>": "", + "<3,93>": "", + "<3,94>": "", + "<3,95>": "", + "<3,96>": "", + "<3,97>": "", + "<3,98>": "", + "<3,99>": "", + "<3,100>": "", + "<3,101>": "", + "<3,102>": "", + "<3,103>": "", + "<3,104>": "", + "<3,105>": "", + "<3,106>": "", + "<3,107>": "", + "<3,108>": "" + }, + "<4>": { + "<4,1>": "START_STOP_BUTTON", + "<4,2>": "", + "<4,3>": "PUSHBUTTON", + "<4,4>": "IDXSVR", + "<4,5>": "18", + "<4,6>": "73", + "<4,7>": "144", + "<4,8>": "24", + "<4,9>": "&Start Index Server", + "<4,10>": { + "<4,10,1>": "0x56000300", + "<4,10,2>": "0x0" + }, + "<4,11>": { + "<4,11,1>": "0x0", + "<4,11,2>": "0x80000000" + }, + "<4,12>": "2", + "<4,13>": { + "<4,13,1>": "-2", + "<4,13,2>": "-2", + "<4,13,3>": "0" + }, + "<4,14>": "0", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "MS Sans Serif", + "<4,15,1,2>": "-11", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "1", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": { + "<4,18,1>": { + "<4,18,1,1>": "R", + "<4,18,1,2>": "EXECUTE", + "<4,18,1,3>": "SYSPROG*STPROCEXE**COMM_DIALOG_IDXSVR", + "<4,18,1,4>": "StartStop", + "<4,18,1,5>": "", + "<4,18,1,6>": "", + "<4,18,1,7>": "", + "<4,18,1,8>": "", + "<4,18,1,9>": "", + "<4,18,1,10>": "", + "<4,18,1,11>": "", + "<4,18,1,12>": "", + "<4,18,1,13>": "", + "<4,18,1,14>": "", + "<4,18,1,15>": "STPROC" + } + }, + "<4,19>": "CLICK", + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "", + "<4,26>": "", + "<4,27>": "", + "<4,28>": "", + "<4,29>": "", + "<4,30>": "", + "<4,31>": "", + "<4,32>": "", + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "0", + "<4,41>": { + "<4,41,1>": "", + "<4,41,2>": "-1" + }, + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "", + "<4,53>": "", + "<4,54>": "", + "<4,55>": "", + "<4,56>": "", + "<4,57>": "", + "<4,58>": "", + "<4,59>": "", + "<4,60>": "", + "<4,61>": "", + "<4,62>": "0", + "<4,63>": "", + "<4,64>": { + "<4,64,1>": "-2", + "<4,64,2>": "-2", + "<4,64,3>": "0" + }, + "<4,65>": "-2", + "<4,66>": "", + "<4,67>": "", + "<4,68>": "", + "<4,69>": "", + "<4,70>": "", + "<4,71>": "", + "<4,72>": "", + "<4,73>": "", + "<4,74>": "", + "<4,75>": "", + "<4,76>": "", + "<4,77>": "", + "<4,78>": "", + "<4,79>": "", + "<4,80>": "", + "<4,81>": "", + "<4,82>": "", + "<4,83>": "", + "<4,84>": "", + "<4,85>": "", + "<4,86>": "", + "<4,87>": "", + "<4,88>": "", + "<4,89>": "", + "<4,90>": "0", + "<4,91>": "0", + "<4,92>": "", + "<4,93>": "", + "<4,94>": "", + "<4,95>": "", + "<4,96>": "", + "<4,97>": "", + "<4,98>": "", + "<4,99>": "", + "<4,100>": "", + "<4,101>": "", + "<4,102>": "", + "<4,103>": "", + "<4,104>": "", + "<4,105>": "", + "<4,106>": "", + "<4,107>": "", + "<4,108>": "" + }, + "<5>": { + "<5,1>": "CLOSE_BUTTON", + "<5,2>": "", + "<5,3>": "PUSHBUTTON", + "<5,4>": "IDXSVR", + "<5,5>": "189", + "<5,6>": "73", + "<5,7>": "144", + "<5,8>": "24", + "<5,9>": "&Close", + "<5,10>": { + "<5,10,1>": "0x56000300", + "<5,10,2>": "0x0" + }, + "<5,11>": { + "<5,11,1>": "0x0", + "<5,11,2>": "0x80000000" + }, + "<5,12>": "3", + "<5,13>": { + "<5,13,1>": "-2", + "<5,13,2>": "-2", + "<5,13,3>": "0" + }, + "<5,14>": "0", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "MS Sans Serif", + "<5,15,1,2>": "-11", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "1", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "0", + "<5,15,1,14>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": { + "<5,18,1>": { + "<5,18,1,1>": "E", + "<5,18,1,2>": "CLOSE", + "<5,18,1,3>": "@WINDOW", + "<5,18,1,4>": "", + "<5,18,1,5>": "", + "<5,18,1,6>": "", + "<5,18,1,7>": "", + "<5,18,1,8>": "", + "<5,18,1,9>": "", + "<5,18,1,10>": "", + "<5,18,1,11>": "", + "<5,18,1,12>": "", + "<5,18,1,13>": "", + "<5,18,1,14>": "", + "<5,18,1,15>": "GEN" + } + }, + "<5,19>": "CLICK", + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "", + "<5,26>": "", + "<5,27>": "", + "<5,28>": "", + "<5,29>": "", + "<5,30>": "", + "<5,31>": "", + "<5,32>": "", + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "0", + "<5,41>": { + "<5,41,1>": "", + "<5,41,2>": "-1" + }, + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "", + "<5,52>": "", + "<5,53>": "", + "<5,54>": "", + "<5,55>": "", + "<5,56>": "", + "<5,57>": "", + "<5,58>": "", + "<5,59>": "", + "<5,60>": "", + "<5,61>": "", + "<5,62>": "0", + "<5,63>": "", + "<5,64>": { + "<5,64,1>": "-2", + "<5,64,2>": "-2", + "<5,64,3>": "0" + }, + "<5,65>": "-2", + "<5,66>": "", + "<5,67>": "", + "<5,68>": "", + "<5,69>": "", + "<5,70>": "", + "<5,71>": "", + "<5,72>": "", + "<5,73>": "", + "<5,74>": "", + "<5,75>": "", + "<5,76>": "", + "<5,77>": "", + "<5,78>": "", + "<5,79>": "", + "<5,80>": "", + "<5,81>": "", + "<5,82>": "", + "<5,83>": "", + "<5,84>": "", + "<5,85>": "", + "<5,86>": "", + "<5,87>": "", + "<5,88>": "", + "<5,89>": "", + "<5,90>": "0", + "<5,91>": "0", + "<5,92>": "", + "<5,93>": "", + "<5,94>": "", + "<5,95>": "", + "<5,96>": "", + "<5,97>": "", + "<5,98>": "", + "<5,99>": "", + "<5,100>": "", + "<5,101>": "", + "<5,102>": "", + "<5,103>": "", + "<5,104>": "", + "<5,105>": "", + "<5,106>": "", + "<5,107>": "", + "<5,108>": "" + } + }, + "record4": { + "<1>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/MSG.json b/SYSPROG/OIWIN/MSG.json new file mode 100644 index 0000000..582b8d8 --- /dev/null +++ b/SYSPROG/OIWIN/MSG.json @@ -0,0 +1,2106 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1000", + "<2>": "13", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "MSG", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "106", + "<1,6>": "195", + "<1,7>": "-361", + "<1,8>": "-128", + "<1,9>": "Message", + "<1,10>": { + "<1,10,1>": "0x82C00000", + "<1,10,2>": "0x101" + }, + "<1,11>": { + "<1,11,1>": "0xC000", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "R", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "SYSPROG*STPROCEXE**MSG", + "<1,18,1,4>": { + "<1,18,1,4,1>": "@WINDOW", + "<1,18,1,4,2>": "@PARAM1", + "<1,18,1,4,3>": "", + "<1,18,1,4,4>": "7" + }, + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "STPROC" + }, + "<1,18,2>": { + "<1,18,2,1>": "R", + "<1,18,2,2>": "EXECUTE", + "<1,18,2,3>": "SYSPROG*STPROCEXE**MSG", + "<1,18,2,4>": { + "<1,18,2,4,1>": "@WINDOW", + "<1,18,2,4,2>": "", + "<1,18,2,4,3>": "", + "<1,18,2,4,4>": "9" + }, + "<1,18,2,5>": "", + "<1,18,2,6>": "", + "<1,18,2,7>": "", + "<1,18,2,8>": "", + "<1,18,2,9>": "", + "<1,18,2,10>": "", + "<1,18,2,11>": "", + "<1,18,2,12>": "", + "<1,18,2,13>": "", + "<1,18,2,14>": "", + "<1,18,2,15>": "STPROC" + }, + "<1,18,3>": { + "<1,18,3,1>": "R", + "<1,18,3,2>": "EXECUTE", + "<1,18,3,3>": "SYSPROG*STPROCEXE**MSG", + "<1,18,3,4>": { + "<1,18,3,4,1>": "@WINDOW", + "<1,18,3,4,2>": "", + "<1,18,3,4,3>": "", + "<1,18,3,4,4>": "10" + }, + "<1,18,3,5>": "", + "<1,18,3,6>": "", + "<1,18,3,7>": "", + "<1,18,3,8>": "", + "<1,18,3,9>": "", + "<1,18,3,10>": "", + "<1,18,3,11>": "", + "<1,18,3,12>": "", + "<1,18,3,13>": "", + "<1,18,3,14>": "", + "<1,18,3,15>": "STPROC" + } + }, + "<1,19>": { + "<1,19,1>": "CREATE", + "<1,19,2>": "CLOSE", + "<1,19,3>": "TIMER" + }, + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "0", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": { + "<1,61,1>": { + "<1,61,1,1>": "-1", + "<1,61,1,2>": "-1", + "<1,61,1,3>": "-1", + "<1,61,1,4>": "-1" + } + }, + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "", + "<1,62,4>": "0", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "ST_ANIMATE", + "<1,2>": "", + "<1,3>": "ANIMATE", + "<1,4>": "MSG", + "<1,5>": "54", + "<1,6>": "8", + "<1,7>": "299", + "<1,8>": "40", + "<1,9>": "", + "<1,10>": { + "<1,10,1>": "0x46000003", + "<1,10,2>": "0x0" + }, + "<1,11>": { + "<1,11,1>": "0x0", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "13", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "", + "<1,37,2>": "" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "SYSPROG*MMEDIA*VIDEO*FILE_COPY" + }, + "<2>": { + "<2,1>": "EB_RESP", + "<2,2>": "", + "<2,3>": "EDITFIELD", + "<2,4>": "MSG", + "<2,5>": "12", + "<2,6>": "60", + "<2,7>": "340", + "<2,8>": "24", + "<2,9>": "", + "<2,10>": { + "<2,10,1>": "0x50000080", + "<2,10,2>": "0x200" + }, + "<2,11>": { + "<2,11,1>": "0x4", + "<2,11,2>": "0x80000000" + }, + "<2,12>": "1", + "<2,13>": { + "<2,13,1>": "16777215", + "<2,13,2>": "16777215", + "<2,13,3>": "" + }, + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "Tahoma", + "<2,15,1,2>": "-11", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "3", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": { + "<2,18,1>": { + "<2,18,1,1>": "R", + "<2,18,1,2>": "EXECUTE", + "<2,18,1,3>": "SYSPROG*STPROCEXE**MSG", + "<2,18,1,4>": { + "<2,18,1,4,1>": "@WINDOW", + "<2,18,1,4,2>": "", + "<2,18,1,4,3>": "", + "<2,18,1,4,4>": "8" + }, + "<2,18,1,5>": "", + "<2,18,1,6>": "", + "<2,18,1,7>": "", + "<2,18,1,8>": "", + "<2,18,1,9>": "", + "<2,18,1,10>": "", + "<2,18,1,11>": "", + "<2,18,1,12>": "", + "<2,18,1,13>": "", + "<2,18,1,14>": "", + "<2,18,1,15>": "STPROC" + } + }, + "<2,19>": "CHANGED", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "", + "<2,26>": "", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "<>", + "<2,31>": "0", + "<2,32>": "", + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": { + "<2,36,1>": "0", + "<2,36,2>": "0" + }, + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "", + "<2,53>": "", + "<2,54>": "", + "<2,55>": "", + "<2,56>": "", + "<2,57>": "", + "<2,58>": "", + "<2,59>": "", + "<2,60>": "", + "<2,61>": "", + "<2,62>": "0", + "<2,63>": "", + "<2,64>": "", + "<2,65>": "", + "<2,66>": "", + "<2,67>": "", + "<2,68>": "", + "<2,69>": "", + "<2,70>": "", + "<2,71>": "", + "<2,72>": "", + "<2,73>": "", + "<2,74>": "", + "<2,75>": "", + "<2,76>": "", + "<2,77>": "", + "<2,78>": "", + "<2,79>": "", + "<2,80>": "", + "<2,81>": "", + "<2,82>": "", + "<2,83>": "", + "<2,84>": "", + "<2,85>": "", + "<2,86>": "", + "<2,87>": "", + "<2,88>": "", + "<2,89>": "", + "<2,90>": "", + "<2,91>": "", + "<2,92>": "" + }, + "<3>": { + "<3,1>": "CB_3", + "<3,2>": "", + "<3,3>": "PUSHBUTTON", + "<3,4>": "MSG", + "<3,5>": "183", + "<3,6>": "91", + "<3,7>": "80", + "<3,8>": "24", + "<3,9>": "Button3", + "<3,10>": { + "<3,10,1>": "0x50000300", + "<3,10,2>": "0x0" + }, + "<3,11>": { + "<3,11,1>": "0x0", + "<3,11,2>": "0x80000000" + }, + "<3,12>": "2", + "<3,13>": { + "<3,13,1>": "-2", + "<3,13,2>": "-2", + "<3,13,3>": "0" + }, + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "Tahoma", + "<3,15,1,2>": "-11", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "3", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": { + "<3,18,1>": { + "<3,18,1,1>": "R", + "<3,18,1,2>": "EXECUTE", + "<3,18,1,3>": "SYSPROG*STPROCEXE**MSG", + "<3,18,1,4>": { + "<3,18,1,4,1>": "@SELF", + "<3,18,1,4,2>": "", + "<3,18,1,4,3>": "", + "<3,18,1,4,4>": "6" + }, + "<3,18,1,5>": "", + "<3,18,1,6>": "", + "<3,18,1,7>": "", + "<3,18,1,8>": "", + "<3,18,1,9>": "", + "<3,18,1,10>": "", + "<3,18,1,11>": "", + "<3,18,1,12>": "", + "<3,18,1,13>": "", + "<3,18,1,14>": "", + "<3,18,1,15>": "STPROC" + } + }, + "<3,19>": "CLICK", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "", + "<3,26>": "", + "<3,27>": "", + "<3,28>": "", + "<3,29>": "", + "<3,30>": "", + "<3,31>": "", + "<3,32>": "", + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "1", + "<3,41>": { + "<3,41,1>": "", + "<3,41,2>": "-1" + }, + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "", + "<3,53>": "", + "<3,54>": "", + "<3,55>": "", + "<3,56>": "", + "<3,57>": "", + "<3,58>": "", + "<3,59>": "", + "<3,60>": "", + "<3,61>": "", + "<3,62>": "0", + "<3,63>": "", + "<3,64>": { + "<3,64,1>": "-2", + "<3,64,2>": "-2", + "<3,64,3>": "0" + }, + "<3,65>": "-2", + "<3,66>": "", + "<3,67>": "", + "<3,68>": "", + "<3,69>": "", + "<3,70>": "", + "<3,71>": "", + "<3,72>": "", + "<3,73>": "", + "<3,74>": "", + "<3,75>": "", + "<3,76>": "", + "<3,77>": "", + "<3,78>": "", + "<3,79>": "", + "<3,80>": "", + "<3,81>": "", + "<3,82>": "", + "<3,83>": "", + "<3,84>": "", + "<3,85>": "", + "<3,86>": "", + "<3,87>": "", + "<3,88>": "", + "<3,89>": "", + "<3,90>": "0", + "<3,91>": "0" + }, + "<4>": { + "<4,1>": "CB_1", + "<4,2>": "", + "<4,3>": "PUSHBUTTON", + "<4,4>": "MSG", + "<4,5>": "7", + "<4,6>": "91", + "<4,7>": "80", + "<4,8>": "24", + "<4,9>": "Button1", + "<4,10>": { + "<4,10,1>": "0x50000300", + "<4,10,2>": "0x0" + }, + "<4,11>": { + "<4,11,1>": "0x0", + "<4,11,2>": "0x80000000" + }, + "<4,12>": "3", + "<4,13>": { + "<4,13,1>": "-2", + "<4,13,2>": "-2", + "<4,13,3>": "0" + }, + "<4,14>": "0", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "Tahoma", + "<4,15,1,2>": "-11", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "3", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": { + "<4,18,1>": { + "<4,18,1,1>": "R", + "<4,18,1,2>": "EXECUTE", + "<4,18,1,3>": "SYSPROG*STPROCEXE**MSG", + "<4,18,1,4>": { + "<4,18,1,4,1>": "@SELF", + "<4,18,1,4,2>": "", + "<4,18,1,4,3>": "", + "<4,18,1,4,4>": "6" + }, + "<4,18,1,5>": "", + "<4,18,1,6>": "", + "<4,18,1,7>": "", + "<4,18,1,8>": "", + "<4,18,1,9>": "", + "<4,18,1,10>": "", + "<4,18,1,11>": "", + "<4,18,1,12>": "", + "<4,18,1,13>": "", + "<4,18,1,14>": "", + "<4,18,1,15>": "STPROC" + } + }, + "<4,19>": "CLICK", + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "", + "<4,26>": "", + "<4,27>": "", + "<4,28>": "", + "<4,29>": "", + "<4,30>": "", + "<4,31>": "", + "<4,32>": "", + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "1", + "<4,41>": { + "<4,41,1>": "", + "<4,41,2>": "-1" + }, + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "", + "<4,53>": "", + "<4,54>": "", + "<4,55>": "", + "<4,56>": "", + "<4,57>": "", + "<4,58>": "", + "<4,59>": "", + "<4,60>": "", + "<4,61>": "", + "<4,62>": "0", + "<4,63>": "", + "<4,64>": { + "<4,64,1>": "-2", + "<4,64,2>": "-2", + "<4,64,3>": "0" + }, + "<4,65>": "-2", + "<4,66>": "", + "<4,67>": "", + "<4,68>": "", + "<4,69>": "", + "<4,70>": "", + "<4,71>": "", + "<4,72>": "", + "<4,73>": "", + "<4,74>": "", + "<4,75>": "", + "<4,76>": "", + "<4,77>": "", + "<4,78>": "", + "<4,79>": "", + "<4,80>": "", + "<4,81>": "", + "<4,82>": "", + "<4,83>": "", + "<4,84>": "", + "<4,85>": "", + "<4,86>": "", + "<4,87>": "", + "<4,88>": "", + "<4,89>": "", + "<4,90>": "0", + "<4,91>": "0" + }, + "<5>": { + "<5,1>": "CB_5", + "<5,2>": "", + "<5,3>": "PUSHBUTTON", + "<5,4>": "MSG", + "<5,5>": "-10", + "<5,6>": "-10", + "<5,7>": "7", + "<5,8>": "7", + "<5,9>": "ESC", + "<5,10>": { + "<5,10,1>": "0x50000300", + "<5,10,2>": "0x0" + }, + "<5,11>": { + "<5,11,1>": "0x2", + "<5,11,2>": "0x80000000" + }, + "<5,12>": "4", + "<5,13>": { + "<5,13,1>": "-2", + "<5,13,2>": "-2", + "<5,13,3>": "0" + }, + "<5,14>": "0", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "MS Sans Serif", + "<5,15,1,2>": "-11", + "<5,15,1,3>": "700", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "1", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "0", + "<5,15,1,14>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": { + "<5,18,1>": { + "<5,18,1,1>": "R", + "<5,18,1,2>": "EXECUTE", + "<5,18,1,3>": "SYSPROG*STPROCEXE**MSG", + "<5,18,1,4>": { + "<5,18,1,4,1>": "@SELF", + "<5,18,1,4,2>": "", + "<5,18,1,4,3>": "", + "<5,18,1,4,4>": "6" + }, + "<5,18,1,5>": "", + "<5,18,1,6>": "", + "<5,18,1,7>": "", + "<5,18,1,8>": "", + "<5,18,1,9>": "", + "<5,18,1,10>": "", + "<5,18,1,11>": "", + "<5,18,1,12>": "", + "<5,18,1,13>": "", + "<5,18,1,14>": "", + "<5,18,1,15>": "STPROC" + } + }, + "<5,19>": "CLICK", + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "", + "<5,26>": "", + "<5,27>": "", + "<5,28>": "", + "<5,29>": "", + "<5,30>": "", + "<5,31>": "", + "<5,32>": "", + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "1", + "<5,41>": { + "<5,41,1>": "", + "<5,41,2>": "-1" + }, + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "", + "<5,52>": "", + "<5,53>": "", + "<5,54>": "", + "<5,55>": "", + "<5,56>": "", + "<5,57>": "", + "<5,58>": "", + "<5,59>": "", + "<5,60>": "", + "<5,61>": "", + "<5,62>": "0", + "<5,63>": "", + "<5,64>": { + "<5,64,1>": "-2", + "<5,64,2>": "-2", + "<5,64,3>": "0" + }, + "<5,65>": "-2", + "<5,66>": "", + "<5,67>": "", + "<5,68>": "", + "<5,69>": "", + "<5,70>": "", + "<5,71>": "", + "<5,72>": "", + "<5,73>": "", + "<5,74>": "", + "<5,75>": "", + "<5,76>": "", + "<5,77>": "", + "<5,78>": "", + "<5,79>": "", + "<5,80>": "", + "<5,81>": "", + "<5,82>": "", + "<5,83>": "", + "<5,84>": "", + "<5,85>": "", + "<5,86>": "", + "<5,87>": "", + "<5,88>": "", + "<5,89>": "", + "<5,90>": "0", + "<5,91>": "0" + }, + "<6>": { + "<6,1>": "CB_2", + "<6,2>": "", + "<6,3>": "PUSHBUTTON", + "<6,4>": "MSG", + "<6,5>": "95", + "<6,6>": "91", + "<6,7>": "80", + "<6,8>": "24", + "<6,9>": "Button2", + "<6,10>": { + "<6,10,1>": "0x50000300", + "<6,10,2>": "0x0" + }, + "<6,11>": { + "<6,11,1>": "0x0", + "<6,11,2>": "0x80000000" + }, + "<6,12>": "5", + "<6,13>": { + "<6,13,1>": "-2", + "<6,13,2>": "-2", + "<6,13,3>": "0" + }, + "<6,14>": "0", + "<6,15>": { + "<6,15,1>": { + "<6,15,1,1>": "Tahoma", + "<6,15,1,2>": "-11", + "<6,15,1,3>": "400", + "<6,15,1,4>": "0", + "<6,15,1,5>": "0", + "<6,15,1,6>": "0", + "<6,15,1,7>": "0", + "<6,15,1,8>": "34", + "<6,15,1,9>": "0", + "<6,15,1,10>": "3", + "<6,15,1,11>": "2", + "<6,15,1,12>": "1", + "<6,15,1,13>": "0", + "<6,15,1,14>": "0" + } + }, + "<6,16>": "", + "<6,17>": "", + "<6,18>": { + "<6,18,1>": { + "<6,18,1,1>": "R", + "<6,18,1,2>": "EXECUTE", + "<6,18,1,3>": "SYSPROG*STPROCEXE**MSG", + "<6,18,1,4>": { + "<6,18,1,4,1>": "@SELF", + "<6,18,1,4,2>": "", + "<6,18,1,4,3>": "", + "<6,18,1,4,4>": "6" + }, + "<6,18,1,5>": "", + "<6,18,1,6>": "", + "<6,18,1,7>": "", + "<6,18,1,8>": "", + "<6,18,1,9>": "", + "<6,18,1,10>": "", + "<6,18,1,11>": "", + "<6,18,1,12>": "", + "<6,18,1,13>": "", + "<6,18,1,14>": "", + "<6,18,1,15>": "STPROC" + } + }, + "<6,19>": "CLICK", + "<6,20>": "", + "<6,21>": "", + "<6,22>": "", + "<6,23>": "", + "<6,24>": "", + "<6,25>": "", + "<6,26>": "", + "<6,27>": "", + "<6,28>": "", + "<6,29>": "", + "<6,30>": "", + "<6,31>": "", + "<6,32>": "", + "<6,33>": "", + "<6,34>": "", + "<6,35>": "", + "<6,36>": "", + "<6,37>": "", + "<6,38>": "", + "<6,39>": "", + "<6,40>": "1", + "<6,41>": { + "<6,41,1>": "", + "<6,41,2>": "-1" + }, + "<6,42>": "", + "<6,43>": "", + "<6,44>": "", + "<6,45>": "", + "<6,46>": "", + "<6,47>": "", + "<6,48>": "", + "<6,49>": "", + "<6,50>": "", + "<6,51>": "", + "<6,52>": "", + "<6,53>": "", + "<6,54>": "", + "<6,55>": "", + "<6,56>": "", + "<6,57>": "", + "<6,58>": "", + "<6,59>": "", + "<6,60>": "", + "<6,61>": "", + "<6,62>": "0", + "<6,63>": "", + "<6,64>": { + "<6,64,1>": "-2", + "<6,64,2>": "-2", + "<6,64,3>": "0" + }, + "<6,65>": "-2", + "<6,66>": "", + "<6,67>": "", + "<6,68>": "", + "<6,69>": "", + "<6,70>": "", + "<6,71>": "", + "<6,72>": "", + "<6,73>": "", + "<6,74>": "", + "<6,75>": "", + "<6,76>": "", + "<6,77>": "", + "<6,78>": "", + "<6,79>": "", + "<6,80>": "", + "<6,81>": "", + "<6,82>": "", + "<6,83>": "", + "<6,84>": "", + "<6,85>": "", + "<6,86>": "", + "<6,87>": "", + "<6,88>": "", + "<6,89>": "", + "<6,90>": "0", + "<6,91>": "0" + }, + "<7>": { + "<7,1>": "CB_4", + "<7,2>": "", + "<7,3>": "PUSHBUTTON", + "<7,4>": "MSG", + "<7,5>": "271", + "<7,6>": "91", + "<7,7>": "80", + "<7,8>": "24", + "<7,9>": "Button4", + "<7,10>": { + "<7,10,1>": "0x50000300", + "<7,10,2>": "0x0" + }, + "<7,11>": { + "<7,11,1>": "0x0", + "<7,11,2>": "0x80000000" + }, + "<7,12>": "6", + "<7,13>": { + "<7,13,1>": "-2", + "<7,13,2>": "-2", + "<7,13,3>": "0" + }, + "<7,14>": "0", + "<7,15>": { + "<7,15,1>": { + "<7,15,1,1>": "Tahoma", + "<7,15,1,2>": "-11", + "<7,15,1,3>": "400", + "<7,15,1,4>": "0", + "<7,15,1,5>": "0", + "<7,15,1,6>": "0", + "<7,15,1,7>": "0", + "<7,15,1,8>": "34", + "<7,15,1,9>": "0", + "<7,15,1,10>": "3", + "<7,15,1,11>": "2", + "<7,15,1,12>": "1", + "<7,15,1,13>": "0", + "<7,15,1,14>": "0" + } + }, + "<7,16>": "", + "<7,17>": "", + "<7,18>": { + "<7,18,1>": { + "<7,18,1,1>": "R", + "<7,18,1,2>": "EXECUTE", + "<7,18,1,3>": "SYSPROG*STPROCEXE**MSG", + "<7,18,1,4>": { + "<7,18,1,4,1>": "@SELF", + "<7,18,1,4,2>": "", + "<7,18,1,4,3>": "", + "<7,18,1,4,4>": "6" + }, + "<7,18,1,5>": "", + "<7,18,1,6>": "", + "<7,18,1,7>": "", + "<7,18,1,8>": "", + "<7,18,1,9>": "", + "<7,18,1,10>": "", + "<7,18,1,11>": "", + "<7,18,1,12>": "", + "<7,18,1,13>": "", + "<7,18,1,14>": "", + "<7,18,1,15>": "STPROC" + } + }, + "<7,19>": "CLICK", + "<7,20>": "", + "<7,21>": "", + "<7,22>": "", + "<7,23>": "", + "<7,24>": "", + "<7,25>": "", + "<7,26>": "", + "<7,27>": "", + "<7,28>": "", + "<7,29>": "", + "<7,30>": "", + "<7,31>": "", + "<7,32>": "", + "<7,33>": "", + "<7,34>": "", + "<7,35>": "", + "<7,36>": "", + "<7,37>": "", + "<7,38>": "", + "<7,39>": "", + "<7,40>": "1", + "<7,41>": { + "<7,41,1>": "", + "<7,41,2>": "-1" + }, + "<7,42>": "", + "<7,43>": "", + "<7,44>": "", + "<7,45>": "", + "<7,46>": "", + "<7,47>": "", + "<7,48>": "", + "<7,49>": "", + "<7,50>": "", + "<7,51>": "", + "<7,52>": "", + "<7,53>": "", + "<7,54>": "", + "<7,55>": "", + "<7,56>": "", + "<7,57>": "", + "<7,58>": "", + "<7,59>": "", + "<7,60>": "", + "<7,61>": "", + "<7,62>": "0", + "<7,63>": "", + "<7,64>": { + "<7,64,1>": "-2", + "<7,64,2>": "-2", + "<7,64,3>": "0" + }, + "<7,65>": "-2", + "<7,66>": "", + "<7,67>": "", + "<7,68>": "", + "<7,69>": "", + "<7,70>": "", + "<7,71>": "", + "<7,72>": "", + "<7,73>": "", + "<7,74>": "", + "<7,75>": "", + "<7,76>": "", + "<7,77>": "", + "<7,78>": "", + "<7,79>": "", + "<7,80>": "", + "<7,81>": "", + "<7,82>": "", + "<7,83>": "", + "<7,84>": "", + "<7,85>": "", + "<7,86>": "", + "<7,87>": "", + "<7,88>": "", + "<7,89>": "", + "<7,90>": "0", + "<7,91>": "0" + }, + "<8>": { + "<8,1>": "EB_PROGRESS", + "<8,2>": "", + "<8,3>": "EDITFIELD", + "<8,4>": "MSG", + "<8,5>": "12", + "<8,6>": "60", + "<8,7>": "8", + "<8,8>": "24", + "<8,9>": "", + "<8,10>": { + "<8,10,1>": "0x40000000", + "<8,10,2>": "0x200" + }, + "<8,11>": { + "<8,11,1>": "0x0", + "<8,11,2>": "0x80000000" + }, + "<8,12>": "7", + "<8,13>": { + "<8,13,1>": "16711680", + "<8,13,2>": "16711680", + "<8,13,3>": "" + }, + "<8,14>": "0", + "<8,15>": { + "<8,15,1>": { + "<8,15,1,1>": "MS Sans Serif", + "<8,15,1,2>": "-11", + "<8,15,1,3>": "700", + "<8,15,1,4>": "0", + "<8,15,1,5>": "0", + "<8,15,1,6>": "0", + "<8,15,1,7>": "0", + "<8,15,1,8>": "34", + "<8,15,1,9>": "0", + "<8,15,1,10>": "1", + "<8,15,1,11>": "2", + "<8,15,1,12>": "1", + "<8,15,1,13>": "0", + "<8,15,1,14>": "0" + } + }, + "<8,16>": "", + "<8,17>": "", + "<8,18>": { + "<8,18,1>": { + "<8,18,1,1>": "R", + "<8,18,1,2>": "EXECUTE", + "<8,18,1,3>": "SYSPROG*STPROCEXE**MSG", + "<8,18,1,4>": { + "<8,18,1,4,1>": "@WINDOW", + "<8,18,1,4,2>": "", + "<8,18,1,4,3>": "", + "<8,18,1,4,4>": "8" + }, + "<8,18,1,5>": "", + "<8,18,1,6>": "", + "<8,18,1,7>": "", + "<8,18,1,8>": "", + "<8,18,1,9>": "", + "<8,18,1,10>": "", + "<8,18,1,11>": "", + "<8,18,1,12>": "", + "<8,18,1,13>": "", + "<8,18,1,14>": "", + "<8,18,1,15>": "STPROC" + } + }, + "<8,19>": "CHANGED", + "<8,20>": "", + "<8,21>": "", + "<8,22>": "", + "<8,23>": "", + "<8,24>": "", + "<8,25>": "", + "<8,26>": "", + "<8,27>": "", + "<8,28>": "<>", + "<8,29>": "<>", + "<8,30>": "<>", + "<8,31>": "0", + "<8,32>": "", + "<8,33>": "", + "<8,34>": "", + "<8,35>": "", + "<8,36>": { + "<8,36,1>": "0", + "<8,36,2>": "0" + }, + "<8,37>": "", + "<8,38>": "", + "<8,39>": "", + "<8,40>": "", + "<8,41>": "", + "<8,42>": "", + "<8,43>": "", + "<8,44>": "", + "<8,45>": "", + "<8,46>": "", + "<8,47>": "", + "<8,48>": "", + "<8,49>": "", + "<8,50>": "", + "<8,51>": "", + "<8,52>": "", + "<8,53>": "", + "<8,54>": "", + "<8,55>": "", + "<8,56>": "", + "<8,57>": "", + "<8,58>": "", + "<8,59>": "", + "<8,60>": "", + "<8,61>": "", + "<8,62>": "0", + "<8,63>": "", + "<8,64>": "", + "<8,65>": "", + "<8,66>": "", + "<8,67>": "", + "<8,68>": "", + "<8,69>": "", + "<8,70>": "", + "<8,71>": "", + "<8,72>": "", + "<8,73>": "", + "<8,74>": "", + "<8,75>": "", + "<8,76>": "", + "<8,77>": "", + "<8,78>": "", + "<8,79>": "", + "<8,80>": "", + "<8,81>": "", + "<8,82>": "", + "<8,83>": "", + "<8,84>": "", + "<8,85>": "", + "<8,86>": "", + "<8,87>": "", + "<8,88>": "", + "<8,89>": "", + "<8,90>": "", + "<8,91>": "", + "<8,92>": "" + }, + "<9>": { + "<9,1>": "ST_TEXT", + "<9,2>": "", + "<9,3>": "EDITBOX", + "<9,4>": "MSG", + "<9,5>": "54", + "<9,6>": "8", + "<9,7>": "299", + "<9,8>": "40", + "<9,9>": "", + "<9,10>": { + "<9,10,1>": "0x50000800", + "<9,10,2>": "0x200" + }, + "<9,11>": { + "<9,11,1>": "0x0", + "<9,11,2>": "0x80000000" + }, + "<9,12>": "8", + "<9,13>": { + "<9,13,1>": "", + "<9,13,2>": "", + "<9,13,3>": "" + }, + "<9,14>": "0", + "<9,15>": { + "<9,15,1>": { + "<9,15,1,1>": "Segoe UI", + "<9,15,1,2>": "-12", + "<9,15,1,3>": "400", + "<9,15,1,4>": "0", + "<9,15,1,5>": "0", + "<9,15,1,6>": "0", + "<9,15,1,7>": "0", + "<9,15,1,8>": "34", + "<9,15,1,9>": "0", + "<9,15,1,10>": "3", + "<9,15,1,11>": "2", + "<9,15,1,12>": "1", + "<9,15,1,13>": "0", + "<9,15,1,14>": "0" + } + }, + "<9,16>": "", + "<9,17>": "", + "<9,18>": "", + "<9,19>": "", + "<9,20>": "", + "<9,21>": "", + "<9,22>": "", + "<9,23>": "", + "<9,24>": "", + "<9,25>": "", + "<9,26>": "", + "<9,27>": "", + "<9,28>": "<>", + "<9,29>": "<>", + "<9,30>": "", + "<9,31>": "0", + "<9,32>": "", + "<9,33>": "", + "<9,34>": "", + "<9,35>": "", + "<9,36>": "", + "<9,37>": "", + "<9,38>": "", + "<9,39>": "", + "<9,40>": "", + "<9,41>": "", + "<9,42>": "", + "<9,43>": "", + "<9,44>": "", + "<9,45>": "", + "<9,46>": "", + "<9,47>": "", + "<9,48>": "", + "<9,49>": "", + "<9,50>": "", + "<9,51>": "", + "<9,52>": "", + "<9,53>": "", + "<9,54>": "", + "<9,55>": "", + "<9,56>": "", + "<9,57>": "", + "<9,58>": "", + "<9,59>": "", + "<9,60>": "", + "<9,61>": "", + "<9,62>": "0", + "<9,63>": "", + "<9,64>": "", + "<9,65>": "", + "<9,66>": "", + "<9,67>": "", + "<9,68>": "", + "<9,69>": "", + "<9,70>": "", + "<9,71>": "", + "<9,72>": "", + "<9,73>": "", + "<9,74>": "", + "<9,75>": "", + "<9,76>": "", + "<9,77>": "", + "<9,78>": "", + "<9,79>": "", + "<9,80>": "", + "<9,81>": "", + "<9,82>": "", + "<9,83>": "", + "<9,84>": "", + "<9,85>": "", + "<9,86>": "", + "<9,87>": "", + "<9,88>": "", + "<9,89>": "", + "<9,90>": "", + "<9,91>": "", + "<9,92>": "" + }, + "<10>": { + "<10,1>": "ST_HTML", + "<10,2>": "", + "<10,3>": "STATIC", + "<10,4>": "MSG", + "<10,5>": "54", + "<10,6>": "8", + "<10,7>": "304", + "<10,8>": "40", + "<10,9>": "", + "<10,10>": { + "<10,10,1>": "0x40000000", + "<10,10,2>": "0x0" + }, + "<10,11>": { + "<10,11,1>": "0x0", + "<10,11,2>": "0x80000000" + }, + "<10,12>": "9", + "<10,13>": { + "<10,13,1>": "4294967295", + "<10,13,2>": "4294967295", + "<10,13,3>": "" + }, + "<10,14>": "0", + "<10,15>": { + "<10,15,1>": { + "<10,15,1,1>": "MS Sans Serif", + "<10,15,1,2>": "-11", + "<10,15,1,3>": "700", + "<10,15,1,4>": "0", + "<10,15,1,5>": "0", + "<10,15,1,6>": "0", + "<10,15,1,7>": "0", + "<10,15,1,8>": "34", + "<10,15,1,9>": "0", + "<10,15,1,10>": "1", + "<10,15,1,11>": "2", + "<10,15,1,12>": "1", + "<10,15,1,13>": "0", + "<10,15,1,14>": "0" + } + }, + "<10,16>": "", + "<10,17>": "", + "<10,18>": "", + "<10,19>": "", + "<10,20>": "", + "<10,21>": "", + "<10,22>": "", + "<10,23>": "", + "<10,24>": "", + "<10,25>": "", + "<10,26>": "", + "<10,27>": "", + "<10,28>": "<>", + "<10,29>": "<>", + "<10,30>": "", + "<10,31>": "", + "<10,32>": "", + "<10,33>": "", + "<10,34>": "", + "<10,35>": "", + "<10,36>": "", + "<10,37>": "", + "<10,38>": "", + "<10,39>": "", + "<10,40>": "", + "<10,41>": "", + "<10,42>": "", + "<10,43>": "", + "<10,44>": "", + "<10,45>": "", + "<10,46>": "", + "<10,47>": "", + "<10,48>": "", + "<10,49>": "", + "<10,50>": "", + "<10,51>": "", + "<10,52>": "", + "<10,53>": "", + "<10,54>": "", + "<10,55>": "", + "<10,56>": "", + "<10,57>": "", + "<10,58>": "", + "<10,59>": "", + "<10,60>": "", + "<10,61>": "", + "<10,62>": "0", + "<10,63>": { + "<10,63,1>": "", + "<10,63,2>": "", + "<10,63,3>": "", + "<10,63,4>": "", + "<10,63,5>": "", + "<10,63,6>": "", + "<10,63,7>": "", + "<10,63,8>": "" + }, + "<10,64>": { + "<10,64,1>": "", + "<10,64,2>": "", + "<10,64,3>": "" + }, + "<10,65>": "-2", + "<10,66>": "", + "<10,67>": "", + "<10,68>": "", + "<10,69>": "", + "<10,70>": "", + "<10,71>": "", + "<10,72>": "", + "<10,73>": "", + "<10,74>": "", + "<10,75>": "", + "<10,76>": "", + "<10,77>": "", + "<10,78>": "", + "<10,79>": "", + "<10,80>": "", + "<10,81>": "", + "<10,82>": "", + "<10,83>": "", + "<10,84>": "", + "<10,85>": "", + "<10,86>": "", + "<10,87>": "", + "<10,88>": "", + "<10,89>": "", + "<10,90>": "0", + "<10,91>": "0", + "<10,92>": "" + }, + "<11>": { + "<11,1>": "ST_TITLE", + "<11,2>": "", + "<11,3>": "STATIC", + "<11,4>": "MSG", + "<11,5>": "54", + "<11,6>": "8", + "<11,7>": "304", + "<11,8>": "40", + "<11,9>": "", + "<11,10>": { + "<11,10,1>": "0x40000000", + "<11,10,2>": "0x0" + }, + "<11,11>": { + "<11,11,1>": "0x0", + "<11,11,2>": "0x80000000" + }, + "<11,12>": "10", + "<11,13>": { + "<11,13,1>": "4294967295", + "<11,13,2>": "4294967295", + "<11,13,3>": "" + }, + "<11,14>": "0", + "<11,15>": { + "<11,15,1>": { + "<11,15,1,1>": "MS Sans Serif", + "<11,15,1,2>": "-11", + "<11,15,1,3>": "700", + "<11,15,1,4>": "0", + "<11,15,1,5>": "0", + "<11,15,1,6>": "0", + "<11,15,1,7>": "0", + "<11,15,1,8>": "34", + "<11,15,1,9>": "0", + "<11,15,1,10>": "1", + "<11,15,1,11>": "2", + "<11,15,1,12>": "1", + "<11,15,1,13>": "0", + "<11,15,1,14>": "0" + } + }, + "<11,16>": "", + "<11,17>": "", + "<11,18>": "", + "<11,19>": "", + "<11,20>": "", + "<11,21>": "", + "<11,22>": "", + "<11,23>": "", + "<11,24>": "", + "<11,25>": "", + "<11,26>": "", + "<11,27>": "", + "<11,28>": "<>", + "<11,29>": "<>", + "<11,30>": "", + "<11,31>": "", + "<11,32>": "", + "<11,33>": "", + "<11,34>": "", + "<11,35>": "", + "<11,36>": "", + "<11,37>": "", + "<11,38>": "", + "<11,39>": "", + "<11,40>": "", + "<11,41>": "", + "<11,42>": "", + "<11,43>": "", + "<11,44>": "", + "<11,45>": "", + "<11,46>": "", + "<11,47>": "", + "<11,48>": "", + "<11,49>": "", + "<11,50>": "", + "<11,51>": "", + "<11,52>": "", + "<11,53>": "", + "<11,54>": "", + "<11,55>": "", + "<11,56>": "", + "<11,57>": "", + "<11,58>": "", + "<11,59>": "", + "<11,60>": "", + "<11,61>": "", + "<11,62>": "0", + "<11,63>": { + "<11,63,1>": "", + "<11,63,2>": "", + "<11,63,3>": "", + "<11,63,4>": "", + "<11,63,5>": "", + "<11,63,6>": "", + "<11,63,7>": "", + "<11,63,8>": "" + }, + "<11,64>": { + "<11,64,1>": "", + "<11,64,2>": "", + "<11,64,3>": "" + }, + "<11,65>": "-2", + "<11,66>": "", + "<11,67>": "", + "<11,68>": "", + "<11,69>": "", + "<11,70>": "", + "<11,71>": "", + "<11,72>": "", + "<11,73>": "", + "<11,74>": "", + "<11,75>": "", + "<11,76>": "", + "<11,77>": "", + "<11,78>": "", + "<11,79>": "", + "<11,80>": "", + "<11,81>": "", + "<11,82>": "", + "<11,83>": "", + "<11,84>": "", + "<11,85>": "", + "<11,86>": "", + "<11,87>": "", + "<11,88>": "", + "<11,89>": "", + "<11,90>": "0", + "<11,91>": "0", + "<11,92>": "" + }, + "<12>": { + "<12,1>": "BMP_ICON", + "<12,2>": "", + "<12,3>": "BITMAP", + "<12,4>": "MSG", + "<12,5>": "12", + "<12,6>": "12", + "<12,7>": "32", + "<12,8>": "32", + "<12,9>": "", + "<12,10>": { + "<12,10,1>": "0x50000000", + "<12,10,2>": "0x0" + }, + "<12,11>": { + "<12,11,1>": "0x0", + "<12,11,2>": "0x80000000" + }, + "<12,12>": "11", + "<12,13>": { + "<12,13,1>": "", + "<12,13,2>": "", + "<12,13,3>": "" + }, + "<12,14>": "0", + "<12,15>": { + "<12,15,1>": { + "<12,15,1,1>": "MS Sans Serif", + "<12,15,1,2>": "-11", + "<12,15,1,3>": "700", + "<12,15,1,4>": "0", + "<12,15,1,5>": "0", + "<12,15,1,6>": "0", + "<12,15,1,7>": "0", + "<12,15,1,8>": "34", + "<12,15,1,9>": "0", + "<12,15,1,10>": "1", + "<12,15,1,11>": "2", + "<12,15,1,12>": "1", + "<12,15,1,13>": "0", + "<12,15,1,14>": "0" + } + }, + "<12,16>": "", + "<12,17>": "", + "<12,18>": "", + "<12,19>": "", + "<12,20>": "", + "<12,21>": "", + "<12,22>": "", + "<12,23>": "", + "<12,24>": "", + "<12,25>": "", + "<12,26>": "", + "<12,27>": "", + "<12,28>": "", + "<12,29>": "", + "<12,30>": "", + "<12,31>": "", + "<12,32>": "", + "<12,33>": "SYSPROG*IMAGE*BMP*DEFAULT", + "<12,34>": "", + "<12,35>": "", + "<12,36>": "", + "<12,37>": "", + "<12,38>": "", + "<12,39>": "", + "<12,40>": "", + "<12,41>": "", + "<12,42>": "", + "<12,43>": "", + "<12,44>": "", + "<12,45>": "", + "<12,46>": "", + "<12,47>": "", + "<12,48>": "", + "<12,49>": "", + "<12,50>": "", + "<12,51>": "", + "<12,52>": "", + "<12,53>": "", + "<12,54>": { + "<12,54,1>": "-5", + "<12,54,2>": "0", + "<12,54,3>": "", + "<12,54,4>": "", + "<12,54,5>": "", + "<12,54,6>": "1", + "<12,54,7>": "", + "<12,54,8>": "", + "<12,54,9>": "", + "<12,54,10>": "0" + }, + "<12,55>": "", + "<12,56>": "", + "<12,57>": "", + "<12,58>": "", + "<12,59>": "", + "<12,60>": "", + "<12,61>": "", + "<12,62>": "0", + "<12,63>": { + "<12,63,1>": "", + "<12,63,2>": "", + "<12,63,3>": "", + "<12,63,4>": "", + "<12,63,5>": "", + "<12,63,6>": "", + "<12,63,7>": "", + "<12,63,8>": "" + }, + "<12,64>": { + "<12,64,1>": "", + "<12,64,2>": "", + "<12,64,3>": "" + }, + "<12,65>": "-2", + "<12,66>": "", + "<12,67>": "", + "<12,68>": "", + "<12,69>": "", + "<12,70>": "", + "<12,71>": "", + "<12,72>": "", + "<12,73>": "", + "<12,74>": "", + "<12,75>": "", + "<12,76>": "", + "<12,77>": "", + "<12,78>": "", + "<12,79>": "", + "<12,80>": "", + "<12,81>": "", + "<12,82>": "", + "<12,83>": "", + "<12,84>": "", + "<12,85>": "", + "<12,86>": "", + "<12,87>": "", + "<12,88>": "", + "<12,89>": "", + "<12,90>": "0", + "<12,91>": "0" + }, + "<13>": { + "<13,1>": "ST_PANEL", + "<13,2>": "", + "<13,3>": "STATIC", + "<13,4>": "MSG", + "<13,5>": "8", + "<13,6>": "8", + "<13,7>": "350", + "<13,8>": "40", + "<13,9>": "", + "<13,10>": { + "<13,10,1>": "0x40000000", + "<13,10,2>": "0x0" + }, + "<13,11>": { + "<13,11,1>": "0x0", + "<13,11,2>": "0x80000000" + }, + "<13,12>": "12", + "<13,13>": { + "<13,13,1>": "", + "<13,13,2>": "", + "<13,13,3>": "" + }, + "<13,14>": "0", + "<13,15>": { + "<13,15,1>": { + "<13,15,1,1>": "MS Sans Serif", + "<13,15,1,2>": "-11", + "<13,15,1,3>": "700", + "<13,15,1,4>": "0", + "<13,15,1,5>": "0", + "<13,15,1,6>": "0", + "<13,15,1,7>": "0", + "<13,15,1,8>": "34", + "<13,15,1,9>": "0", + "<13,15,1,10>": "1", + "<13,15,1,11>": "2", + "<13,15,1,12>": "1", + "<13,15,1,13>": "0", + "<13,15,1,14>": "0" + } + }, + "<13,16>": "", + "<13,17>": "", + "<13,18>": "", + "<13,19>": "", + "<13,20>": "", + "<13,21>": "", + "<13,22>": "", + "<13,23>": "", + "<13,24>": "", + "<13,25>": "", + "<13,26>": "", + "<13,27>": "", + "<13,28>": "<>", + "<13,29>": "<>", + "<13,30>": "", + "<13,31>": "", + "<13,32>": "", + "<13,33>": "", + "<13,34>": "", + "<13,35>": "", + "<13,36>": "", + "<13,37>": "", + "<13,38>": "", + "<13,39>": "", + "<13,40>": "", + "<13,41>": "", + "<13,42>": "", + "<13,43>": "", + "<13,44>": "", + "<13,45>": "", + "<13,46>": "", + "<13,47>": "", + "<13,48>": "", + "<13,49>": "", + "<13,50>": "", + "<13,51>": "", + "<13,52>": "", + "<13,53>": "", + "<13,54>": "", + "<13,55>": "", + "<13,56>": "", + "<13,57>": "", + "<13,58>": "", + "<13,59>": "", + "<13,60>": "", + "<13,61>": "", + "<13,62>": "0", + "<13,63>": { + "<13,63,1>": "", + "<13,63,2>": "", + "<13,63,3>": "", + "<13,63,4>": "", + "<13,63,5>": "", + "<13,63,6>": "", + "<13,63,7>": "", + "<13,63,8>": "" + }, + "<13,64>": { + "<13,64,1>": "", + "<13,64,2>": "", + "<13,64,3>": "" + }, + "<13,65>": "-2", + "<13,66>": "", + "<13,67>": "", + "<13,68>": "", + "<13,69>": "", + "<13,70>": "", + "<13,71>": "", + "<13,72>": "", + "<13,73>": "", + "<13,74>": "", + "<13,75>": "", + "<13,76>": "", + "<13,77>": "", + "<13,78>": "", + "<13,79>": "", + "<13,80>": "", + "<13,81>": "", + "<13,82>": "", + "<13,83>": "", + "<13,84>": "", + "<13,85>": "", + "<13,86>": "", + "<13,87>": "", + "<13,88>": "", + "<13,89>": "", + "<13,90>": "0", + "<13,91>": "0", + "<13,92>": "" + } + }, + "record4": { + "<1>": { + "<1,1>": { + "<1,1,1>": "MENU", + "<1,1,2>": "2", + "<1,1,3>": "", + "<1,1,4>": "", + "<1,1,5>": "0", + "<1,1,6>": "0", + "<1,1,7>": "0", + "<1,1,8>": "0", + "<1,1,9>": "3", + "<1,1,10>": "", + "<1,1,11>": "0", + "<1,1,12>": "" + }, + "<1,2>": { + "<1,2,1>": "ITEM", + "<1,2,2>": "", + "<1,2,3>": "", + "<1,2,4>": "Help\tF1", + "<1,2,5>": "0", + "<1,2,6>": "0", + "<1,2,7>": "1", + "<1,2,8>": "112", + "<1,2,9>": "", + "<1,2,10>": "", + "<1,2,11>": "0", + "<1,2,12>": "" + }, + "<1,3>": { + "<1,3,1>": "ITEM", + "<1,3,2>": "", + "<1,3,3>": "", + "<1,3,4>": "Copy\tCtrl+C", + "<1,3,5>": "0", + "<1,3,6>": "0", + "<1,3,7>": "1", + "<1,3,8>": "579", + "<1,3,9>": "", + "<1,3,10>": "", + "<1,3,11>": "0", + "<1,3,12>": "" + } + }, + "<2>": { + "<2,1>": "", + "<2,2>": { + "<2,2,1>": { + "<2,2,1,1>": "R", + "<2,2,1,2>": "EXECUTE", + "<2,2,1,3>": "SYSPROG*STPROCEXE**MSG", + "<2,2,1,4>": { + "<2,2,1,4,1>": "@WINDOW", + "<2,2,1,4,2>": "", + "<2,2,1,4,3>": "", + "<2,2,1,4,4>": "11" + }, + "<2,2,1,5>": "", + "<2,2,1,6>": "" + }, + "<2,2,2>": { + "<2,2,2,1>": "R", + "<2,2,2,2>": "EXECUTE", + "<2,2,2,3>": "SYSPROG*STPROCEXE**MSG", + "<2,2,2,4>": { + "<2,2,2,4,1>": "@WINDOW", + "<2,2,2,4,2>": "", + "<2,2,2,4,3>": "", + "<2,2,2,4,4>": "14" + }, + "<2,2,2,5>": "", + "<2,2,2,6>": "" + }, + "<2,2,3>": "" + }, + "<2,3>": { + "<2,3,1>": "HELP", + "<2,3,2>": "COPY", + "<2,3,3>": "" + }, + "<2,4>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/POPUP.json b/SYSPROG/OIWIN/POPUP.json new file mode 100644 index 0000000..babc599 --- /dev/null +++ b/SYSPROG/OIWIN/POPUP.json @@ -0,0 +1,3722 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1010", + "<2>": "17", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "POPUP", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "10", + "<1,6>": "107", + "<1,7>": "-495", + "<1,8>": "-268", + "<1,9>": "", + "<1,10>": { + "<1,10,1>": "0x82CC0000", + "<1,10,2>": "0x100" + }, + "<1,11>": { + "<1,11,1>": "0xC000", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "R", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<1,18,1,4>": { + "<1,18,1,4,1>": "@SELF", + "<1,18,1,4,2>": "@EVENT", + "<1,18,1,4,3>": "@PARAM1", + "<1,18,1,4,4>": "@PARAM2", + "<1,18,1,4,5>": "@PARAM3", + "<1,18,1,4,6>": "@PARAM4", + "<1,18,1,4,7>": "@PARAM5", + "<1,18,1,4,8>": "@PARAM6" + }, + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "STPROC" + }, + "<1,18,2>": { + "<1,18,2,1>": "R", + "<1,18,2,2>": "EXECUTE", + "<1,18,2,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<1,18,2,4>": { + "<1,18,2,4,1>": "@SELF", + "<1,18,2,4,2>": "@EVENT", + "<1,18,2,4,3>": "@PARAM1", + "<1,18,2,4,4>": "@PARAM2", + "<1,18,2,4,5>": "@PARAM3", + "<1,18,2,4,6>": "@PARAM4", + "<1,18,2,4,7>": "@PARAM5", + "<1,18,2,4,8>": "@PARAM6" + }, + "<1,18,2,5>": "", + "<1,18,2,6>": "", + "<1,18,2,7>": "", + "<1,18,2,8>": "", + "<1,18,2,9>": "", + "<1,18,2,10>": "", + "<1,18,2,11>": "", + "<1,18,2,12>": "", + "<1,18,2,13>": "", + "<1,18,2,14>": "", + "<1,18,2,15>": "STPROC" + }, + "<1,18,3>": { + "<1,18,3,1>": "X", + "<1,18,3,2>": "EXECUTE", + "<1,18,3,3>": "@WINDOW_EVENTS", + "<1,18,3,4>": { + "<1,18,3,4,1>": "@SELF", + "<1,18,3,4,2>": "@EVENT", + "<1,18,3,4,3>": "@PARAM1", + "<1,18,3,4,4>": "@PARAM2", + "<1,18,3,4,5>": "@PARAM3", + "<1,18,3,4,6>": "@PARAM4", + "<1,18,3,4,7>": "@PARAM5", + "<1,18,3,4,8>": "@PARAM6" + }, + "<1,18,3,5>": "", + "<1,18,3,6>": "", + "<1,18,3,7>": "", + "<1,18,3,8>": "", + "<1,18,3,9>": "", + "<1,18,3,10>": "", + "<1,18,3,11>": "", + "<1,18,3,12>": "", + "<1,18,3,13>": "", + "<1,18,3,14>": "", + "<1,18,3,15>": "COMMEVT" + }, + "<1,18,4>": { + "<1,18,4,1>": "R", + "<1,18,4,2>": "EXECUTE", + "<1,18,4,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<1,18,4,4>": { + "<1,18,4,4,1>": "@SELF", + "<1,18,4,4,2>": "@EVENT", + "<1,18,4,4,3>": "@PARAM1", + "<1,18,4,4,4>": "@PARAM2", + "<1,18,4,4,5>": "@PARAM3", + "<1,18,4,4,6>": "@PARAM4", + "<1,18,4,4,7>": "@PARAM5", + "<1,18,4,4,8>": "@PARAM6" + }, + "<1,18,4,5>": "", + "<1,18,4,6>": "", + "<1,18,4,7>": "", + "<1,18,4,8>": "", + "<1,18,4,9>": "", + "<1,18,4,10>": "", + "<1,18,4,11>": "", + "<1,18,4,12>": "", + "<1,18,4,13>": "", + "<1,18,4,14>": "", + "<1,18,4,15>": "STPROC" + } + }, + "<1,19>": { + "<1,19,1>": "CREATE", + "<1,19,2>": "CLOSE", + "<1,19,3>": "INACTIVATED", + "<1,19,4>": "SIZE" + }, + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "0", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0", + "<1,24,15>": "0", + "<1,24,16>": "0", + "<1,24,17>": "0" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "SYSPROG*IMAGE*ICO*RTI_DSN_START", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "", + "<1,62,4>": "0", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "", + "<1,62,8>": "0.50", + "<1,62,9>": "5.00", + "<1,62,10>": "0.00" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "0", + "<1,107>": "", + "<1,108>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "PRB_GAUGE", + "<1,2>": "", + "<1,3>": "PROGRESSBAR", + "<1,4>": "POPUP", + "<1,5>": "404", + "<1,6>": "-52", + "<1,7>": "-15", + "<1,8>": "20", + "<1,9>": "Loading data (%p% complete)", + "<1,10>": { + "<1,10,1>": "0x46000001", + "<1,10,2>": "0x0" + }, + "<1,11>": { + "<1,11,1>": "0x6400", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "17", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "" + }, + "<1,14>": "-2", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "Segoe UI", + "<1,15,1,2>": "-12", + "<1,15,1,3>": "400", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "0", + "<1,15,1,8>": "34", + "<1,15,1,9>": "0", + "<1,15,1,10>": "3", + "<1,15,1,11>": "2", + "<1,15,1,12>": "1" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "50", + "<1,37>": { + "<1,37,1>": "0", + "<1,37,2>": "100" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "1", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": "0", + "<1,63>": "", + "<1,64>": { + "<1,64,1>": "", + "<1,64,2>": "", + "<1,64,3>": "" + }, + "<1,65>": { + "<1,65,1>": "", + "<1,65,2>": "", + "<1,65,3>": "" + }, + "<1,66>": { + "<1,66,1>": "", + "<1,66,2>": "", + "<1,66,3>": "" + }, + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "", + "<1,107>": "", + "<1,108>": "" + }, + "<2>": { + "<2,1>": "TXT_TITLE", + "<2,2>": "", + "<2,3>": "STATIC", + "<2,4>": "POPUP", + "<2,5>": "12", + "<2,6>": "12", + "<2,7>": "-103", + "<2,8>": "32", + "<2,9>": "", + "<2,10>": { + "<2,10,1>": "0x50004000", + "<2,10,2>": "0x0" + }, + "<2,11>": { + "<2,11,1>": "0x4000", + "<2,11,2>": "0x80000000" + }, + "<2,12>": "16", + "<2,13>": { + "<2,13,1>": "4294967295", + "<2,13,2>": "4294967295", + "<2,13,3>": "" + }, + "<2,14>": "4294967294", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "Segoe UI", + "<2,15,1,2>": "-11", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "3", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": "", + "<2,19>": "", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "", + "<2,26>": "", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "", + "<2,31>": "", + "<2,32>": "", + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "", + "<2,53>": "", + "<2,54>": "", + "<2,55>": "", + "<2,56>": "", + "<2,57>": "", + "<2,58>": "", + "<2,59>": "", + "<2,60>": "", + "<2,61>": "", + "<2,62>": "0", + "<2,63>": { + "<2,63,1>": "", + "<2,63,2>": "", + "<2,63,3>": "", + "<2,63,4>": "", + "<2,63,5>": "", + "<2,63,6>": "", + "<2,63,7>": "", + "<2,63,8>": "" + }, + "<2,64>": { + "<2,64,1>": "", + "<2,64,2>": "", + "<2,64,3>": "" + }, + "<2,65>": "-2", + "<2,66>": "", + "<2,67>": "", + "<2,68>": "", + "<2,69>": "", + "<2,70>": "", + "<2,71>": "", + "<2,72>": "", + "<2,73>": "", + "<2,74>": "", + "<2,75>": "", + "<2,76>": "", + "<2,77>": "", + "<2,78>": "", + "<2,79>": "", + "<2,80>": "", + "<2,81>": "", + "<2,82>": "", + "<2,83>": "", + "<2,84>": "", + "<2,85>": "", + "<2,86>": "", + "<2,87>": "", + "<2,88>": "", + "<2,89>": "", + "<2,90>": "0", + "<2,91>": "0", + "<2,92>": "", + "<2,93>": "", + "<2,94>": "", + "<2,95>": "", + "<2,96>": "", + "<2,97>": "", + "<2,98>": "", + "<2,99>": "", + "<2,100>": "", + "<2,101>": "", + "<2,102>": "", + "<2,103>": "", + "<2,104>": "", + "<2,105>": "", + "<2,106>": "", + "<2,107>": "", + "<2,108>": "" + }, + "<3>": { + "<3,1>": "EDT_POPUP", + "<3,2>": "", + "<3,3>": "EDITTABLE", + "<3,4>": "POPUP", + "<3,5>": "12", + "<3,6>": "52", + "<3,7>": "-103", + "<3,8>": "-48", + "<3,9>": "", + "<3,10>": { + "<3,10,1>": "0x500061D0", + "<3,10,2>": "0x200" + }, + "<3,11>": { + "<3,11,1>": "0xC004", + "<3,11,2>": "0x80000002" + }, + "<3,12>": "1", + "<3,13>": { + "<3,13,1>": "", + "<3,13,2>": "", + "<3,13,3>": "" + }, + "<3,14>": "-2", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "Segoe UI", + "<3,15,1,2>": "-11", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "3", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": { + "<3,18,1>": { + "<3,18,1,1>": "R", + "<3,18,1,2>": "EXECUTE", + "<3,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<3,18,1,4>": { + "<3,18,1,4,1>": "@SELF", + "<3,18,1,4,2>": "@EVENT", + "<3,18,1,4,3>": "@PARAM1", + "<3,18,1,4,4>": "@PARAM2", + "<3,18,1,4,5>": "@PARAM3", + "<3,18,1,4,6>": "@PARAM4", + "<3,18,1,4,7>": "@PARAM5", + "<3,18,1,4,8>": "@PARAM6" + }, + "<3,18,1,5>": "", + "<3,18,1,6>": "", + "<3,18,1,7>": "", + "<3,18,1,8>": "", + "<3,18,1,9>": "", + "<3,18,1,10>": "", + "<3,18,1,11>": "", + "<3,18,1,12>": "", + "<3,18,1,13>": "", + "<3,18,1,14>": "", + "<3,18,1,15>": "STPROC" + }, + "<3,18,2>": { + "<3,18,2,1>": "R", + "<3,18,2,2>": "EXECUTE", + "<3,18,2,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<3,18,2,4>": { + "<3,18,2,4,1>": "@SELF", + "<3,18,2,4,2>": "@EVENT", + "<3,18,2,4,3>": "@PARAM1", + "<3,18,2,4,4>": "@PARAM2", + "<3,18,2,4,5>": "@PARAM3", + "<3,18,2,4,6>": "@PARAM4", + "<3,18,2,4,7>": "@PARAM5", + "<3,18,2,4,8>": "@PARAM6" + }, + "<3,18,2,5>": "", + "<3,18,2,6>": "", + "<3,18,2,7>": "", + "<3,18,2,8>": "", + "<3,18,2,9>": "", + "<3,18,2,10>": "", + "<3,18,2,11>": "", + "<3,18,2,12>": "", + "<3,18,2,13>": "", + "<3,18,2,14>": "", + "<3,18,2,15>": "STPROC" + }, + "<3,18,3>": { + "<3,18,3,1>": "R", + "<3,18,3,2>": "EXECUTE", + "<3,18,3,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<3,18,3,4>": { + "<3,18,3,4,1>": "@SELF", + "<3,18,3,4,2>": "@EVENT", + "<3,18,3,4,3>": "@PARAM1", + "<3,18,3,4,4>": "@PARAM2", + "<3,18,3,4,5>": "@PARAM3", + "<3,18,3,4,6>": "@PARAM4", + "<3,18,3,4,7>": "@PARAM5", + "<3,18,3,4,8>": "@PARAM6" + }, + "<3,18,3,5>": "", + "<3,18,3,6>": "", + "<3,18,3,7>": "", + "<3,18,3,8>": "", + "<3,18,3,9>": "", + "<3,18,3,10>": "", + "<3,18,3,11>": "", + "<3,18,3,12>": "", + "<3,18,3,13>": "", + "<3,18,3,14>": "", + "<3,18,3,15>": "STPROC" + }, + "<3,18,4>": { + "<3,18,4,1>": "R", + "<3,18,4,2>": "EXECUTE", + "<3,18,4,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<3,18,4,4>": { + "<3,18,4,4,1>": "@SELF", + "<3,18,4,4,2>": "@EVENT", + "<3,18,4,4,3>": "@PARAM1", + "<3,18,4,4,4>": "@PARAM2", + "<3,18,4,4,5>": "@PARAM3", + "<3,18,4,4,6>": "@PARAM4", + "<3,18,4,4,7>": "@PARAM5", + "<3,18,4,4,8>": "@PARAM6" + }, + "<3,18,4,5>": "", + "<3,18,4,6>": "", + "<3,18,4,7>": "", + "<3,18,4,8>": "", + "<3,18,4,9>": "", + "<3,18,4,10>": "", + "<3,18,4,11>": "", + "<3,18,4,12>": "", + "<3,18,4,13>": "", + "<3,18,4,14>": "", + "<3,18,4,15>": "STPROC" + } + }, + "<3,19>": { + "<3,19,1>": "ROWSELCHANGED", + "<3,19,2>": "SORTED", + "<3,19,3>": "CLICK", + "<3,19,4>": "DBLCLK" + }, + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "", + "<3,26>": "", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "<>", + "<3,31>": "0", + "<3,32>": "", + "<3,33>": "", + "<3,34>": "", + "<3,35>": { + "<3,35,1>": "", + "<3,35,2>": "", + "<3,35,3>": "", + "<3,35,4>": "", + "<3,35,5>": "", + "<3,35,6>": "", + "<3,35,7>": "", + "<3,35,8>": "", + "<3,35,9>": "", + "<3,35,10>": "", + "<3,35,11>": "" + }, + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "80", + "<3,40>": "1", + "<3,41>": { + "<3,41,1>": "0", + "<3,41,2>": "0", + "<3,41,3>": "0", + "<3,41,4>": "-2", + "<3,41,5>": "-2", + "<3,41,6>": "22", + "<3,41,7>": "", + "<3,41,8>": "40", + "<3,41,9>": "113", + "<3,41,10>": "115", + "<3,41,11>": "0", + "<3,41,12>": "-2", + "<3,41,13>": "0", + "<3,41,14>": "1" + }, + "<3,42>": "2147500032", + "<3,43>": "180", + "<3,44>": "Column Header", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "", + "<3,53>": "", + "<3,54>": "", + "<3,55>": "", + "<3,56>": "", + "<3,57>": "", + "<3,58>": "", + "<3,59>": "", + "<3,60>": "82", + "<3,61>": "", + "<3,62>": "0", + "<3,63>": "", + "<3,64>": "-2", + "<3,65>": "", + "<3,66>": "", + "<3,67>": "", + "<3,68>": "", + "<3,69>": "", + "<3,70>": "", + "<3,71>": "", + "<3,72>": "", + "<3,73>": "", + "<3,74>": "", + "<3,75>": "", + "<3,76>": "", + "<3,77>": "", + "<3,78>": "", + "<3,79>": "", + "<3,80>": "", + "<3,81>": "", + "<3,82>": "", + "<3,83>": "", + "<3,84>": "", + "<3,85>": "", + "<3,86>": "", + "<3,87>": "", + "<3,88>": "", + "<3,89>": "", + "<3,90>": "", + "<3,91>": "", + "<3,92>": "", + "<3,93>": "", + "<3,94>": "", + "<3,95>": "", + "<3,96>": { + "<3,96,1>": { + "<3,96,1,1>": "", + "<3,96,1,2>": "" + } + }, + "<3,97>": { + "<3,97,1>": { + "<3,97,1,1>": "Segoe UI", + "<3,97,1,2>": "-11", + "<3,97,1,3>": "400", + "<3,97,1,4>": "0", + "<3,97,1,5>": "0", + "<3,97,1,6>": "0", + "<3,97,1,7>": "0", + "<3,97,1,8>": "34", + "<3,97,1,9>": "0", + "<3,97,1,10>": "3", + "<3,97,1,11>": "2", + "<3,97,1,12>": "1" + } + }, + "<3,98>": { + "<3,98,1>": { + "<3,98,1,1>": "Segoe UI", + "<3,98,1,2>": "-11", + "<3,98,1,3>": "400", + "<3,98,1,4>": "0", + "<3,98,1,5>": "0", + "<3,98,1,6>": "0", + "<3,98,1,7>": "0", + "<3,98,1,8>": "34", + "<3,98,1,9>": "0", + "<3,98,1,10>": "3", + "<3,98,1,11>": "2", + "<3,98,1,12>": "1" + } + }, + "<3,99>": { + "<3,99,1>": { + "<3,99,1,1>": "-2", + "<3,99,1,2>": "-2", + "<3,99,1,3>": "-2", + "<3,99,1,4>": "0", + "<3,99,1,5>": "0", + "<3,99,1,6>": "0", + "<3,99,1,7>": "0" + }, + "<3,99,2>": { + "<3,99,2,1>": "-2", + "<3,99,2,2>": "-2", + "<3,99,2,3>": "-2", + "<3,99,2,4>": "0", + "<3,99,2,5>": "0", + "<3,99,2,6>": "0", + "<3,99,2,7>": "0" + }, + "<3,99,3>": { + "<3,99,3,1>": "-2", + "<3,99,3,2>": "-2", + "<3,99,3,3>": "-2", + "<3,99,3,4>": "0", + "<3,99,3,5>": "0", + "<3,99,3,6>": "0", + "<3,99,3,7>": "0" + }, + "<3,99,4>": { + "<3,99,4,1>": "-2", + "<3,99,4,2>": "-2", + "<3,99,4,3>": "-2", + "<3,99,4,4>": "0", + "<3,99,4,5>": "0", + "<3,99,4,6>": "0", + "<3,99,4,7>": "0" + }, + "<3,99,5>": { + "<3,99,5,1>": "-2", + "<3,99,5,2>": "-2", + "<3,99,5,3>": "-2", + "<3,99,5,4>": "0", + "<3,99,5,5>": "0", + "<3,99,5,6>": "0", + "<3,99,5,7>": "0" + }, + "<3,99,6>": { + "<3,99,6,1>": "-2", + "<3,99,6,2>": "-2", + "<3,99,6,3>": "-2", + "<3,99,6,4>": "0", + "<3,99,6,5>": "0", + "<3,99,6,6>": "0", + "<3,99,6,7>": "0" + }, + "<3,99,7>": { + "<3,99,7,1>": "-2", + "<3,99,7,2>": "-2", + "<3,99,7,3>": "-2", + "<3,99,7,4>": "0", + "<3,99,7,5>": "0", + "<3,99,7,6>": "0", + "<3,99,7,7>": "0" + }, + "<3,99,8>": "", + "<3,99,9>": "", + "<3,99,10>": "", + "<3,99,11>": { + "<3,99,11,1>": "-2", + "<3,99,11,2>": "-2", + "<3,99,11,3>": "-2", + "<3,99,11,4>": "0", + "<3,99,11,5>": "0", + "<3,99,11,6>": "0", + "<3,99,11,7>": "0" + }, + "<3,99,12>": { + "<3,99,12,1>": "-2", + "<3,99,12,2>": "-2", + "<3,99,12,3>": "-2", + "<3,99,12,4>": "0", + "<3,99,12,5>": "0", + "<3,99,12,6>": "0", + "<3,99,12,7>": "0" + }, + "<3,99,13>": { + "<3,99,13,1>": "-2", + "<3,99,13,2>": "-2", + "<3,99,13,3>": "-2", + "<3,99,13,4>": "0", + "<3,99,13,5>": "0", + "<3,99,13,6>": "0", + "<3,99,13,7>": "0" + }, + "<3,99,14>": { + "<3,99,14,1>": "-2", + "<3,99,14,2>": "-2", + "<3,99,14,3>": "-2", + "<3,99,14,4>": "0", + "<3,99,14,5>": "0", + "<3,99,14,6>": "0", + "<3,99,14,7>": "0" + }, + "<3,99,15>": { + "<3,99,15,1>": "-2", + "<3,99,15,2>": "-2", + "<3,99,15,3>": "-2", + "<3,99,15,4>": "0", + "<3,99,15,5>": "0", + "<3,99,15,6>": "0", + "<3,99,15,7>": "0" + }, + "<3,99,16>": { + "<3,99,16,1>": "-2", + "<3,99,16,2>": "-2", + "<3,99,16,3>": "-2", + "<3,99,16,4>": "0", + "<3,99,16,5>": "0", + "<3,99,16,6>": "0", + "<3,99,16,7>": "0" + }, + "<3,99,17>": { + "<3,99,17,1>": "-2", + "<3,99,17,2>": "-2", + "<3,99,17,3>": "-2", + "<3,99,17,4>": "0", + "<3,99,17,5>": "0", + "<3,99,17,6>": "0", + "<3,99,17,7>": "0" + }, + "<3,99,18>": "", + "<3,99,19>": "", + "<3,99,20>": "", + "<3,99,21>": { + "<3,99,21,1>": "-2", + "<3,99,21,2>": "-2", + "<3,99,21,3>": "-2", + "<3,99,21,4>": "0", + "<3,99,21,5>": "0", + "<3,99,21,6>": "0", + "<3,99,21,7>": "0" + }, + "<3,99,22>": { + "<3,99,22,1>": "-2", + "<3,99,22,2>": "-2", + "<3,99,22,3>": "-2", + "<3,99,22,4>": "0", + "<3,99,22,5>": "0", + "<3,99,22,6>": "0", + "<3,99,22,7>": "0" + }, + "<3,99,23>": { + "<3,99,23,1>": "-2", + "<3,99,23,2>": "-2", + "<3,99,23,3>": "-2", + "<3,99,23,4>": "0", + "<3,99,23,5>": "0", + "<3,99,23,6>": "0", + "<3,99,23,7>": "0" + }, + "<3,99,24>": { + "<3,99,24,1>": "-2", + "<3,99,24,2>": "-2", + "<3,99,24,3>": "-2", + "<3,99,24,4>": "0", + "<3,99,24,5>": "0", + "<3,99,24,6>": "0", + "<3,99,24,7>": "0" + }, + "<3,99,25>": { + "<3,99,25,1>": "-2", + "<3,99,25,2>": "-2", + "<3,99,25,3>": "-2", + "<3,99,25,4>": "0", + "<3,99,25,5>": "0", + "<3,99,25,6>": "0", + "<3,99,25,7>": "0" + }, + "<3,99,26>": { + "<3,99,26,1>": "-2", + "<3,99,26,2>": "-2", + "<3,99,26,3>": "-2", + "<3,99,26,4>": "0", + "<3,99,26,5>": "0", + "<3,99,26,6>": "0", + "<3,99,26,7>": "0" + }, + "<3,99,27>": { + "<3,99,27,1>": "-2", + "<3,99,27,2>": "-2", + "<3,99,27,3>": "-2", + "<3,99,27,4>": "0", + "<3,99,27,5>": "0", + "<3,99,27,6>": "0", + "<3,99,27,7>": "0" + } + }, + "<3,100>": "", + "<3,101>": "", + "<3,102>": "", + "<3,103>": "", + "<3,104>": "", + "<3,105>": "", + "<3,106>": "", + "<3,107>": "", + "<3,108>": "" + }, + "<4>": { + "<4,1>": "BTN_OK", + "<4,2>": "", + "<4,3>": "PUSHBUTTON", + "<4,4>": "POPUP", + "<4,5>": "-91", + "<4,6>": "12", + "<4,7>": "80", + "<4,8>": "24", + "<4,9>": "&OK", + "<4,10>": { + "<4,10,1>": "0x50000300", + "<4,10,2>": "0x0" + }, + "<4,11>": { + "<4,11,1>": "0x1001", + "<4,11,2>": "0x80000000" + }, + "<4,12>": "2", + "<4,13>": { + "<4,13,1>": "-2", + "<4,13,2>": "-2", + "<4,13,3>": "0" + }, + "<4,14>": "-2", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "Segoe UI", + "<4,15,1,2>": "-11", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "3", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": { + "<4,18,1>": { + "<4,18,1,1>": "R", + "<4,18,1,2>": "EXECUTE", + "<4,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<4,18,1,4>": { + "<4,18,1,4,1>": "@SELF", + "<4,18,1,4,2>": "@EVENT", + "<4,18,1,4,3>": "@PARAM1", + "<4,18,1,4,4>": "@PARAM2", + "<4,18,1,4,5>": "@PARAM3", + "<4,18,1,4,6>": "@PARAM4", + "<4,18,1,4,7>": "@PARAM5", + "<4,18,1,4,8>": "@PARAM6" + }, + "<4,18,1,5>": "", + "<4,18,1,6>": "", + "<4,18,1,7>": "", + "<4,18,1,8>": "", + "<4,18,1,9>": "", + "<4,18,1,10>": "", + "<4,18,1,11>": "", + "<4,18,1,12>": "", + "<4,18,1,13>": "", + "<4,18,1,14>": "", + "<4,18,1,15>": "STPROC" + } + }, + "<4,19>": "CLICK", + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "", + "<4,26>": "", + "<4,27>": "", + "<4,28>": "", + "<4,29>": "", + "<4,30>": "", + "<4,31>": "", + "<4,32>": "", + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "1", + "<4,41>": { + "<4,41,1>": "", + "<4,41,2>": "-1" + }, + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "", + "<4,53>": "", + "<4,54>": "", + "<4,55>": "", + "<4,56>": "", + "<4,57>": "", + "<4,58>": "", + "<4,59>": "", + "<4,60>": "", + "<4,61>": "", + "<4,62>": "0", + "<4,63>": "", + "<4,64>": { + "<4,64,1>": "-2", + "<4,64,2>": "-2", + "<4,64,3>": "0" + }, + "<4,65>": "-2", + "<4,66>": "", + "<4,67>": "", + "<4,68>": "", + "<4,69>": "", + "<4,70>": "", + "<4,71>": "", + "<4,72>": "", + "<4,73>": "", + "<4,74>": "", + "<4,75>": "", + "<4,76>": "", + "<4,77>": "", + "<4,78>": "", + "<4,79>": "", + "<4,80>": "", + "<4,81>": "", + "<4,82>": "", + "<4,83>": "", + "<4,84>": "", + "<4,85>": "", + "<4,86>": "", + "<4,87>": "", + "<4,88>": "", + "<4,89>": "", + "<4,90>": "0", + "<4,91>": "0", + "<4,92>": "", + "<4,93>": "", + "<4,94>": "", + "<4,95>": "", + "<4,96>": "", + "<4,97>": "", + "<4,98>": "", + "<4,99>": "", + "<4,100>": "", + "<4,101>": "", + "<4,102>": "", + "<4,103>": "", + "<4,104>": "", + "<4,105>": "", + "<4,106>": "", + "<4,107>": "", + "<4,108>": "" + }, + "<5>": { + "<5,1>": "BTN_CANCEL", + "<5,2>": "", + "<5,3>": "PUSHBUTTON", + "<5,4>": "POPUP", + "<5,5>": "-91", + "<5,6>": "40", + "<5,7>": "80", + "<5,8>": "24", + "<5,9>": "&Cancel", + "<5,10>": { + "<5,10,1>": "0x50000300", + "<5,10,2>": "0x0" + }, + "<5,11>": { + "<5,11,1>": "0x1000", + "<5,11,2>": "0x80000000" + }, + "<5,12>": "3", + "<5,13>": { + "<5,13,1>": "-2", + "<5,13,2>": "-2", + "<5,13,3>": "0" + }, + "<5,14>": "-2", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "Segoe UI", + "<5,15,1,2>": "-11", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "3", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "0", + "<5,15,1,14>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": { + "<5,18,1>": { + "<5,18,1,1>": "E", + "<5,18,1,2>": "CLOSE", + "<5,18,1,3>": "@WINDOW", + "<5,18,1,4>": "", + "<5,18,1,5>": "", + "<5,18,1,6>": "", + "<5,18,1,7>": "", + "<5,18,1,8>": "", + "<5,18,1,9>": "", + "<5,18,1,10>": "", + "<5,18,1,11>": "", + "<5,18,1,12>": "", + "<5,18,1,13>": "", + "<5,18,1,14>": "", + "<5,18,1,15>": "GEN" + } + }, + "<5,19>": "CLICK", + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "", + "<5,26>": "", + "<5,27>": "", + "<5,28>": "", + "<5,29>": "", + "<5,30>": "", + "<5,31>": "", + "<5,32>": "", + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "1", + "<5,41>": { + "<5,41,1>": "", + "<5,41,2>": "-1" + }, + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "", + "<5,52>": "", + "<5,53>": "", + "<5,54>": "", + "<5,55>": "", + "<5,56>": "", + "<5,57>": "", + "<5,58>": "", + "<5,59>": "", + "<5,60>": "", + "<5,61>": "", + "<5,62>": "0", + "<5,63>": "", + "<5,64>": { + "<5,64,1>": "-2", + "<5,64,2>": "-2", + "<5,64,3>": "0" + }, + "<5,65>": "-2", + "<5,66>": "", + "<5,67>": "", + "<5,68>": "", + "<5,69>": "", + "<5,70>": "", + "<5,71>": "", + "<5,72>": "", + "<5,73>": "", + "<5,74>": "", + "<5,75>": "", + "<5,76>": "", + "<5,77>": "", + "<5,78>": "", + "<5,79>": "", + "<5,80>": "", + "<5,81>": "", + "<5,82>": "", + "<5,83>": "", + "<5,84>": "", + "<5,85>": "", + "<5,86>": "", + "<5,87>": "", + "<5,88>": "", + "<5,89>": "", + "<5,90>": "0", + "<5,91>": "0", + "<5,92>": "", + "<5,93>": "", + "<5,94>": "", + "<5,95>": "", + "<5,96>": "", + "<5,97>": "", + "<5,98>": "", + "<5,99>": "", + "<5,100>": "", + "<5,101>": "", + "<5,102>": "", + "<5,103>": "", + "<5,104>": "", + "<5,105>": "", + "<5,106>": "", + "<5,107>": "", + "<5,108>": "" + }, + "<6>": { + "<6,1>": "BTN_SELECTALL", + "<6,2>": "", + "<6,3>": "PUSHBUTTON", + "<6,4>": "POPUP", + "<6,5>": "-91", + "<6,6>": "76", + "<6,7>": "80", + "<6,8>": "24", + "<6,9>": "Select &All", + "<6,10>": { + "<6,10,1>": "0x50000300", + "<6,10,2>": "0x0" + }, + "<6,11>": { + "<6,11,1>": "0x1000", + "<6,11,2>": "0x80000000" + }, + "<6,12>": "4", + "<6,13>": { + "<6,13,1>": "-2", + "<6,13,2>": "-2", + "<6,13,3>": "0" + }, + "<6,14>": "-2", + "<6,15>": { + "<6,15,1>": { + "<6,15,1,1>": "Segoe UI", + "<6,15,1,2>": "-11", + "<6,15,1,3>": "400", + "<6,15,1,4>": "0", + "<6,15,1,5>": "0", + "<6,15,1,6>": "0", + "<6,15,1,7>": "0", + "<6,15,1,8>": "34", + "<6,15,1,9>": "0", + "<6,15,1,10>": "3", + "<6,15,1,11>": "2", + "<6,15,1,12>": "1", + "<6,15,1,13>": "0", + "<6,15,1,14>": "0" + } + }, + "<6,16>": "", + "<6,17>": "", + "<6,18>": { + "<6,18,1>": { + "<6,18,1,1>": "R", + "<6,18,1,2>": "EXECUTE", + "<6,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<6,18,1,4>": { + "<6,18,1,4,1>": "@SELF", + "<6,18,1,4,2>": "@EVENT", + "<6,18,1,4,3>": "@PARAM1", + "<6,18,1,4,4>": "@PARAM2", + "<6,18,1,4,5>": "@PARAM3", + "<6,18,1,4,6>": "@PARAM4", + "<6,18,1,4,7>": "@PARAM5", + "<6,18,1,4,8>": "@PARAM6" + }, + "<6,18,1,5>": "", + "<6,18,1,6>": "", + "<6,18,1,7>": "", + "<6,18,1,8>": "", + "<6,18,1,9>": "", + "<6,18,1,10>": "", + "<6,18,1,11>": "", + "<6,18,1,12>": "", + "<6,18,1,13>": "", + "<6,18,1,14>": "", + "<6,18,1,15>": "STPROC" + } + }, + "<6,19>": "CLICK", + "<6,20>": "", + "<6,21>": "", + "<6,22>": "", + "<6,23>": "", + "<6,24>": "", + "<6,25>": "", + "<6,26>": "", + "<6,27>": "", + "<6,28>": "", + "<6,29>": "", + "<6,30>": "", + "<6,31>": "", + "<6,32>": "", + "<6,33>": "", + "<6,34>": "", + "<6,35>": "", + "<6,36>": "", + "<6,37>": "", + "<6,38>": "", + "<6,39>": "", + "<6,40>": "1", + "<6,41>": { + "<6,41,1>": "", + "<6,41,2>": "-1" + }, + "<6,42>": "", + "<6,43>": "", + "<6,44>": "", + "<6,45>": "", + "<6,46>": "", + "<6,47>": "", + "<6,48>": "", + "<6,49>": "", + "<6,50>": "", + "<6,51>": "", + "<6,52>": "", + "<6,53>": "", + "<6,54>": "", + "<6,55>": "", + "<6,56>": "", + "<6,57>": "", + "<6,58>": "", + "<6,59>": "", + "<6,60>": "", + "<6,61>": "", + "<6,62>": "0", + "<6,63>": "", + "<6,64>": { + "<6,64,1>": "-2", + "<6,64,2>": "-2", + "<6,64,3>": "0" + }, + "<6,65>": "-2", + "<6,66>": "", + "<6,67>": "", + "<6,68>": "", + "<6,69>": "", + "<6,70>": "", + "<6,71>": "", + "<6,72>": "", + "<6,73>": "", + "<6,74>": "", + "<6,75>": "", + "<6,76>": "", + "<6,77>": "", + "<6,78>": "", + "<6,79>": "", + "<6,80>": "", + "<6,81>": "", + "<6,82>": "", + "<6,83>": "", + "<6,84>": "", + "<6,85>": "", + "<6,86>": "", + "<6,87>": "", + "<6,88>": "", + "<6,89>": "", + "<6,90>": "0", + "<6,91>": "0", + "<6,92>": "", + "<6,93>": "", + "<6,94>": "", + "<6,95>": "", + "<6,96>": "", + "<6,97>": "", + "<6,98>": "", + "<6,99>": "", + "<6,100>": "", + "<6,101>": "", + "<6,102>": "", + "<6,103>": "", + "<6,104>": "", + "<6,105>": "", + "<6,106>": "", + "<6,107>": "", + "<6,108>": "" + }, + "<7>": { + "<7,1>": "BTN_CLEAR", + "<7,2>": "", + "<7,3>": "PUSHBUTTON", + "<7,4>": "POPUP", + "<7,5>": "-91", + "<7,6>": "104", + "<7,7>": "80", + "<7,8>": "24", + "<7,9>": "C&lear", + "<7,10>": { + "<7,10,1>": "0x50000300", + "<7,10,2>": "0x0" + }, + "<7,11>": { + "<7,11,1>": "0x1000", + "<7,11,2>": "0x80000000" + }, + "<7,12>": "5", + "<7,13>": { + "<7,13,1>": "-2", + "<7,13,2>": "-2", + "<7,13,3>": "0" + }, + "<7,14>": "-2", + "<7,15>": { + "<7,15,1>": { + "<7,15,1,1>": "Segoe UI", + "<7,15,1,2>": "-11", + "<7,15,1,3>": "400", + "<7,15,1,4>": "0", + "<7,15,1,5>": "0", + "<7,15,1,6>": "0", + "<7,15,1,7>": "0", + "<7,15,1,8>": "34", + "<7,15,1,9>": "0", + "<7,15,1,10>": "3", + "<7,15,1,11>": "2", + "<7,15,1,12>": "1", + "<7,15,1,13>": "0", + "<7,15,1,14>": "0" + } + }, + "<7,16>": "", + "<7,17>": "", + "<7,18>": { + "<7,18,1>": { + "<7,18,1,1>": "R", + "<7,18,1,2>": "EXECUTE", + "<7,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<7,18,1,4>": { + "<7,18,1,4,1>": "@SELF", + "<7,18,1,4,2>": "@EVENT", + "<7,18,1,4,3>": "@PARAM1", + "<7,18,1,4,4>": "@PARAM2", + "<7,18,1,4,5>": "@PARAM3", + "<7,18,1,4,6>": "@PARAM4", + "<7,18,1,4,7>": "@PARAM5", + "<7,18,1,4,8>": "@PARAM6" + }, + "<7,18,1,5>": "", + "<7,18,1,6>": "", + "<7,18,1,7>": "", + "<7,18,1,8>": "", + "<7,18,1,9>": "", + "<7,18,1,10>": "", + "<7,18,1,11>": "", + "<7,18,1,12>": "", + "<7,18,1,13>": "", + "<7,18,1,14>": "", + "<7,18,1,15>": "STPROC" + } + }, + "<7,19>": "CLICK", + "<7,20>": "", + "<7,21>": "", + "<7,22>": "", + "<7,23>": "", + "<7,24>": "", + "<7,25>": "", + "<7,26>": "", + "<7,27>": "", + "<7,28>": "", + "<7,29>": "", + "<7,30>": "", + "<7,31>": "", + "<7,32>": "", + "<7,33>": "", + "<7,34>": "", + "<7,35>": "", + "<7,36>": "", + "<7,37>": "", + "<7,38>": "", + "<7,39>": "", + "<7,40>": "1", + "<7,41>": { + "<7,41,1>": "", + "<7,41,2>": "-1" + }, + "<7,42>": "", + "<7,43>": "", + "<7,44>": "", + "<7,45>": "", + "<7,46>": "", + "<7,47>": "", + "<7,48>": "", + "<7,49>": "", + "<7,50>": "", + "<7,51>": "", + "<7,52>": "", + "<7,53>": "", + "<7,54>": "", + "<7,55>": "", + "<7,56>": "", + "<7,57>": "", + "<7,58>": "", + "<7,59>": "", + "<7,60>": "", + "<7,61>": "", + "<7,62>": "0", + "<7,63>": "", + "<7,64>": { + "<7,64,1>": "-2", + "<7,64,2>": "-2", + "<7,64,3>": "0" + }, + "<7,65>": "-2", + "<7,66>": "", + "<7,67>": "", + "<7,68>": "", + "<7,69>": "", + "<7,70>": "", + "<7,71>": "", + "<7,72>": "", + "<7,73>": "", + "<7,74>": "", + "<7,75>": "", + "<7,76>": "", + "<7,77>": "", + "<7,78>": "", + "<7,79>": "", + "<7,80>": "", + "<7,81>": "", + "<7,82>": "", + "<7,83>": "", + "<7,84>": "", + "<7,85>": "", + "<7,86>": "", + "<7,87>": "", + "<7,88>": "", + "<7,89>": "", + "<7,90>": "0", + "<7,91>": "0", + "<7,92>": "", + "<7,93>": "", + "<7,94>": "", + "<7,95>": "", + "<7,96>": "", + "<7,97>": "", + "<7,98>": "", + "<7,99>": "", + "<7,100>": "", + "<7,101>": "", + "<7,102>": "", + "<7,103>": "", + "<7,104>": "", + "<7,105>": "", + "<7,106>": "", + "<7,107>": "", + "<7,108>": "" + }, + "<8>": { + "<8,1>": "BTN_SEARCH", + "<8,2>": "", + "<8,3>": "PUSHBUTTON", + "<8,4>": "POPUP", + "<8,5>": "-91", + "<8,6>": "132", + "<8,7>": "80", + "<8,8>": "24", + "<8,9>": "&Search...", + "<8,10>": { + "<8,10,1>": "0x50000300", + "<8,10,2>": "0x0" + }, + "<8,11>": { + "<8,11,1>": "0x1000", + "<8,11,2>": "0x80000000" + }, + "<8,12>": "6", + "<8,13>": { + "<8,13,1>": "-2", + "<8,13,2>": "-2", + "<8,13,3>": "0" + }, + "<8,14>": "-2", + "<8,15>": { + "<8,15,1>": { + "<8,15,1,1>": "Segoe UI", + "<8,15,1,2>": "-11", + "<8,15,1,3>": "400", + "<8,15,1,4>": "0", + "<8,15,1,5>": "0", + "<8,15,1,6>": "0", + "<8,15,1,7>": "0", + "<8,15,1,8>": "34", + "<8,15,1,9>": "0", + "<8,15,1,10>": "3", + "<8,15,1,11>": "2", + "<8,15,1,12>": "1", + "<8,15,1,13>": "0", + "<8,15,1,14>": "0" + } + }, + "<8,16>": "", + "<8,17>": "", + "<8,18>": { + "<8,18,1>": { + "<8,18,1,1>": "R", + "<8,18,1,2>": "EXECUTE", + "<8,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<8,18,1,4>": { + "<8,18,1,4,1>": "@SELF", + "<8,18,1,4,2>": "@EVENT", + "<8,18,1,4,3>": "@PARAM1", + "<8,18,1,4,4>": "@PARAM2", + "<8,18,1,4,5>": "@PARAM3", + "<8,18,1,4,6>": "@PARAM4", + "<8,18,1,4,7>": "@PARAM5", + "<8,18,1,4,8>": "@PARAM6" + }, + "<8,18,1,5>": "", + "<8,18,1,6>": "", + "<8,18,1,7>": "", + "<8,18,1,8>": "", + "<8,18,1,9>": "", + "<8,18,1,10>": "", + "<8,18,1,11>": "", + "<8,18,1,12>": "", + "<8,18,1,13>": "", + "<8,18,1,14>": "", + "<8,18,1,15>": "STPROC" + } + }, + "<8,19>": "CLICK", + "<8,20>": "", + "<8,21>": "", + "<8,22>": "", + "<8,23>": "", + "<8,24>": "", + "<8,25>": "", + "<8,26>": "", + "<8,27>": "", + "<8,28>": "", + "<8,29>": "", + "<8,30>": "", + "<8,31>": "", + "<8,32>": "", + "<8,33>": "", + "<8,34>": "", + "<8,35>": "", + "<8,36>": "", + "<8,37>": "", + "<8,38>": "", + "<8,39>": "", + "<8,40>": "1", + "<8,41>": { + "<8,41,1>": "", + "<8,41,2>": "-1" + }, + "<8,42>": "", + "<8,43>": "", + "<8,44>": "", + "<8,45>": "", + "<8,46>": "", + "<8,47>": "", + "<8,48>": "", + "<8,49>": "", + "<8,50>": "", + "<8,51>": "", + "<8,52>": "", + "<8,53>": "", + "<8,54>": "", + "<8,55>": "", + "<8,56>": "", + "<8,57>": "", + "<8,58>": "", + "<8,59>": "", + "<8,60>": "", + "<8,61>": "", + "<8,62>": "0", + "<8,63>": "", + "<8,64>": { + "<8,64,1>": "-2", + "<8,64,2>": "-2", + "<8,64,3>": "0" + }, + "<8,65>": "-2", + "<8,66>": "", + "<8,67>": "", + "<8,68>": "", + "<8,69>": "", + "<8,70>": "", + "<8,71>": "", + "<8,72>": "", + "<8,73>": "", + "<8,74>": "", + "<8,75>": "", + "<8,76>": "", + "<8,77>": "", + "<8,78>": "", + "<8,79>": "", + "<8,80>": "", + "<8,81>": "", + "<8,82>": "", + "<8,83>": "", + "<8,84>": "", + "<8,85>": "", + "<8,86>": "", + "<8,87>": "", + "<8,88>": "", + "<8,89>": "", + "<8,90>": "0", + "<8,91>": "0", + "<8,92>": "", + "<8,93>": "", + "<8,94>": "", + "<8,95>": "", + "<8,96>": "", + "<8,97>": "", + "<8,98>": "", + "<8,99>": "", + "<8,100>": "", + "<8,101>": "", + "<8,102>": "", + "<8,103>": "", + "<8,104>": "", + "<8,105>": "", + "<8,106>": "", + "<8,107>": "", + "<8,108>": "" + }, + "<9>": { + "<9,1>": "BTN_PRINT", + "<9,2>": "", + "<9,3>": "PUSHBUTTON", + "<9,4>": "POPUP", + "<9,5>": "-91", + "<9,6>": "160", + "<9,7>": "80", + "<9,8>": "24", + "<9,9>": "&Print...", + "<9,10>": { + "<9,10,1>": "0x50000300", + "<9,10,2>": "0x0" + }, + "<9,11>": { + "<9,11,1>": "0x1000", + "<9,11,2>": "0x80000000" + }, + "<9,12>": "7", + "<9,13>": { + "<9,13,1>": "-2", + "<9,13,2>": "-2", + "<9,13,3>": "0" + }, + "<9,14>": "-2", + "<9,15>": { + "<9,15,1>": { + "<9,15,1,1>": "Segoe UI", + "<9,15,1,2>": "-11", + "<9,15,1,3>": "400", + "<9,15,1,4>": "0", + "<9,15,1,5>": "0", + "<9,15,1,6>": "0", + "<9,15,1,7>": "0", + "<9,15,1,8>": "34", + "<9,15,1,9>": "0", + "<9,15,1,10>": "3", + "<9,15,1,11>": "2", + "<9,15,1,12>": "1", + "<9,15,1,13>": "0", + "<9,15,1,14>": "0" + } + }, + "<9,16>": "", + "<9,17>": "", + "<9,18>": { + "<9,18,1>": { + "<9,18,1,1>": "R", + "<9,18,1,2>": "EXECUTE", + "<9,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<9,18,1,4>": { + "<9,18,1,4,1>": "@SELF", + "<9,18,1,4,2>": "@EVENT", + "<9,18,1,4,3>": "@PARAM1", + "<9,18,1,4,4>": "@PARAM2", + "<9,18,1,4,5>": "@PARAM3", + "<9,18,1,4,6>": "@PARAM4", + "<9,18,1,4,7>": "@PARAM5", + "<9,18,1,4,8>": "@PARAM6" + }, + "<9,18,1,5>": "", + "<9,18,1,6>": "", + "<9,18,1,7>": "", + "<9,18,1,8>": "", + "<9,18,1,9>": "", + "<9,18,1,10>": "", + "<9,18,1,11>": "", + "<9,18,1,12>": "", + "<9,18,1,13>": "", + "<9,18,1,14>": "", + "<9,18,1,15>": "STPROC" + } + }, + "<9,19>": "CLICK", + "<9,20>": "", + "<9,21>": "", + "<9,22>": "", + "<9,23>": "", + "<9,24>": "", + "<9,25>": "", + "<9,26>": "", + "<9,27>": "", + "<9,28>": "", + "<9,29>": "", + "<9,30>": "", + "<9,31>": "", + "<9,32>": "", + "<9,33>": "", + "<9,34>": "", + "<9,35>": "", + "<9,36>": "", + "<9,37>": "", + "<9,38>": "", + "<9,39>": "", + "<9,40>": "1", + "<9,41>": { + "<9,41,1>": "", + "<9,41,2>": "-1" + }, + "<9,42>": "", + "<9,43>": "", + "<9,44>": "", + "<9,45>": "", + "<9,46>": "", + "<9,47>": "", + "<9,48>": "", + "<9,49>": "", + "<9,50>": "", + "<9,51>": "", + "<9,52>": "", + "<9,53>": "", + "<9,54>": "", + "<9,55>": "", + "<9,56>": "", + "<9,57>": "", + "<9,58>": "", + "<9,59>": "", + "<9,60>": "", + "<9,61>": "", + "<9,62>": "0", + "<9,63>": "", + "<9,64>": { + "<9,64,1>": "-2", + "<9,64,2>": "-2", + "<9,64,3>": "0" + }, + "<9,65>": "-2", + "<9,66>": "", + "<9,67>": "", + "<9,68>": "", + "<9,69>": "", + "<9,70>": "", + "<9,71>": "", + "<9,72>": "", + "<9,73>": "", + "<9,74>": "", + "<9,75>": "", + "<9,76>": "", + "<9,77>": "", + "<9,78>": "", + "<9,79>": "", + "<9,80>": "", + "<9,81>": "", + "<9,82>": "", + "<9,83>": "", + "<9,84>": "", + "<9,85>": "", + "<9,86>": "", + "<9,87>": "", + "<9,88>": "", + "<9,89>": "", + "<9,90>": "0", + "<9,91>": "0", + "<9,92>": "", + "<9,93>": "", + "<9,94>": "", + "<9,95>": "", + "<9,96>": "", + "<9,97>": "", + "<9,98>": "", + "<9,99>": "", + "<9,100>": "", + "<9,101>": "", + "<9,102>": "", + "<9,103>": "", + "<9,104>": "", + "<9,105>": "", + "<9,106>": "", + "<9,107>": "", + "<9,108>": "" + }, + "<10>": { + "<10,1>": "BTN_CUSTOM", + "<10,2>": "", + "<10,3>": "PUSHBUTTON", + "<10,4>": "POPUP", + "<10,5>": "-91", + "<10,6>": "188", + "<10,7>": "80", + "<10,8>": "24", + "<10,9>": "Custom", + "<10,10>": { + "<10,10,1>": "0x50000300", + "<10,10,2>": "0x0" + }, + "<10,11>": { + "<10,11,1>": "0x1000", + "<10,11,2>": "0x80000000" + }, + "<10,12>": "8", + "<10,13>": { + "<10,13,1>": "-2", + "<10,13,2>": "-2", + "<10,13,3>": "0" + }, + "<10,14>": "-2", + "<10,15>": { + "<10,15,1>": { + "<10,15,1,1>": "Segoe UI", + "<10,15,1,2>": "-11", + "<10,15,1,3>": "400", + "<10,15,1,4>": "0", + "<10,15,1,5>": "0", + "<10,15,1,6>": "0", + "<10,15,1,7>": "0", + "<10,15,1,8>": "34", + "<10,15,1,9>": "0", + "<10,15,1,10>": "3", + "<10,15,1,11>": "2", + "<10,15,1,12>": "1", + "<10,15,1,13>": "0", + "<10,15,1,14>": "0" + } + }, + "<10,16>": "", + "<10,17>": "", + "<10,18>": { + "<10,18,1>": { + "<10,18,1,1>": "R", + "<10,18,1,2>": "EXECUTE", + "<10,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<10,18,1,4>": { + "<10,18,1,4,1>": "@SELF", + "<10,18,1,4,2>": "@EVENT", + "<10,18,1,4,3>": "@PARAM1", + "<10,18,1,4,4>": "@PARAM2", + "<10,18,1,4,5>": "@PARAM3", + "<10,18,1,4,6>": "@PARAM4", + "<10,18,1,4,7>": "@PARAM5", + "<10,18,1,4,8>": "@PARAM6" + }, + "<10,18,1,5>": "", + "<10,18,1,6>": "", + "<10,18,1,7>": "", + "<10,18,1,8>": "", + "<10,18,1,9>": "", + "<10,18,1,10>": "", + "<10,18,1,11>": "", + "<10,18,1,12>": "", + "<10,18,1,13>": "", + "<10,18,1,14>": "", + "<10,18,1,15>": "STPROC" + } + }, + "<10,19>": "CLICK", + "<10,20>": "", + "<10,21>": "", + "<10,22>": "", + "<10,23>": "", + "<10,24>": "", + "<10,25>": "", + "<10,26>": "", + "<10,27>": "", + "<10,28>": "", + "<10,29>": "", + "<10,30>": "", + "<10,31>": "", + "<10,32>": "", + "<10,33>": "", + "<10,34>": "", + "<10,35>": "", + "<10,36>": "", + "<10,37>": "", + "<10,38>": "", + "<10,39>": "", + "<10,40>": "1", + "<10,41>": { + "<10,41,1>": "", + "<10,41,2>": "-1" + }, + "<10,42>": "", + "<10,43>": "", + "<10,44>": "", + "<10,45>": "", + "<10,46>": "", + "<10,47>": "", + "<10,48>": "", + "<10,49>": "", + "<10,50>": "", + "<10,51>": "", + "<10,52>": "", + "<10,53>": "", + "<10,54>": "", + "<10,55>": "", + "<10,56>": "", + "<10,57>": "", + "<10,58>": "", + "<10,59>": "", + "<10,60>": "", + "<10,61>": "", + "<10,62>": "0", + "<10,63>": "", + "<10,64>": { + "<10,64,1>": "-2", + "<10,64,2>": "-2", + "<10,64,3>": "0" + }, + "<10,65>": "-2", + "<10,66>": "", + "<10,67>": "", + "<10,68>": "", + "<10,69>": "", + "<10,70>": "", + "<10,71>": "", + "<10,72>": "", + "<10,73>": "", + "<10,74>": "", + "<10,75>": "", + "<10,76>": "", + "<10,77>": "", + "<10,78>": "", + "<10,79>": "", + "<10,80>": "", + "<10,81>": "", + "<10,82>": "", + "<10,83>": "", + "<10,84>": "", + "<10,85>": "", + "<10,86>": "", + "<10,87>": "", + "<10,88>": "", + "<10,89>": "", + "<10,90>": "0", + "<10,91>": "0", + "<10,92>": "", + "<10,93>": "", + "<10,94>": "", + "<10,95>": "", + "<10,96>": "", + "<10,97>": "", + "<10,98>": "", + "<10,99>": "", + "<10,100>": "", + "<10,101>": "", + "<10,102>": "", + "<10,103>": "", + "<10,104>": "", + "<10,105>": "", + "<10,106>": "", + "<10,107>": "", + "<10,108>": "" + }, + "<11>": { + "<11,1>": "BTN_CUSTOM_B", + "<11,2>": "", + "<11,3>": "PUSHBUTTON", + "<11,4>": "POPUP", + "<11,5>": "12", + "<11,6>": "-36", + "<11,7>": "64", + "<11,8>": "24", + "<11,9>": "Custom", + "<11,10>": { + "<11,10,1>": "0x50000300", + "<11,10,2>": "0x0" + }, + "<11,11>": { + "<11,11,1>": "0x2000", + "<11,11,2>": "0x80000000" + }, + "<11,12>": "9", + "<11,13>": { + "<11,13,1>": "-2", + "<11,13,2>": "-2", + "<11,13,3>": "0" + }, + "<11,14>": "-2", + "<11,15>": { + "<11,15,1>": { + "<11,15,1,1>": "Segoe UI", + "<11,15,1,2>": "-11", + "<11,15,1,3>": "400", + "<11,15,1,4>": "0", + "<11,15,1,5>": "0", + "<11,15,1,6>": "0", + "<11,15,1,7>": "0", + "<11,15,1,8>": "34", + "<11,15,1,9>": "0", + "<11,15,1,10>": "3", + "<11,15,1,11>": "2", + "<11,15,1,12>": "1", + "<11,15,1,13>": "0", + "<11,15,1,14>": "0" + } + }, + "<11,16>": "", + "<11,17>": "", + "<11,18>": { + "<11,18,1>": { + "<11,18,1,1>": "R", + "<11,18,1,2>": "EXECUTE", + "<11,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<11,18,1,4>": { + "<11,18,1,4,1>": "@SELF", + "<11,18,1,4,2>": "@EVENT", + "<11,18,1,4,3>": "@PARAM1", + "<11,18,1,4,4>": "@PARAM2", + "<11,18,1,4,5>": "@PARAM3", + "<11,18,1,4,6>": "@PARAM4", + "<11,18,1,4,7>": "@PARAM5", + "<11,18,1,4,8>": "@PARAM6" + }, + "<11,18,1,5>": "", + "<11,18,1,6>": "", + "<11,18,1,7>": "", + "<11,18,1,8>": "", + "<11,18,1,9>": "", + "<11,18,1,10>": "", + "<11,18,1,11>": "", + "<11,18,1,12>": "", + "<11,18,1,13>": "", + "<11,18,1,14>": "", + "<11,18,1,15>": "STPROC" + } + }, + "<11,19>": "CLICK", + "<11,20>": "", + "<11,21>": "", + "<11,22>": "", + "<11,23>": "", + "<11,24>": "", + "<11,25>": "", + "<11,26>": "", + "<11,27>": "", + "<11,28>": "", + "<11,29>": "", + "<11,30>": "", + "<11,31>": "", + "<11,32>": "", + "<11,33>": "", + "<11,34>": "", + "<11,35>": "", + "<11,36>": "", + "<11,37>": "", + "<11,38>": "", + "<11,39>": "", + "<11,40>": "1", + "<11,41>": { + "<11,41,1>": "", + "<11,41,2>": "-1" + }, + "<11,42>": "", + "<11,43>": "", + "<11,44>": "", + "<11,45>": "", + "<11,46>": "", + "<11,47>": "", + "<11,48>": "", + "<11,49>": "", + "<11,50>": "", + "<11,51>": "", + "<11,52>": "", + "<11,53>": "", + "<11,54>": "", + "<11,55>": "", + "<11,56>": "", + "<11,57>": "", + "<11,58>": "", + "<11,59>": "", + "<11,60>": "", + "<11,61>": "", + "<11,62>": "0", + "<11,63>": "", + "<11,64>": { + "<11,64,1>": "-2", + "<11,64,2>": "-2", + "<11,64,3>": "0" + }, + "<11,65>": "-2", + "<11,66>": "", + "<11,67>": "", + "<11,68>": "", + "<11,69>": "", + "<11,70>": "", + "<11,71>": "", + "<11,72>": "", + "<11,73>": "", + "<11,74>": "", + "<11,75>": "", + "<11,76>": "", + "<11,77>": "", + "<11,78>": "", + "<11,79>": "", + "<11,80>": "", + "<11,81>": "", + "<11,82>": "", + "<11,83>": "", + "<11,84>": "", + "<11,85>": "", + "<11,86>": "", + "<11,87>": "", + "<11,88>": "", + "<11,89>": "", + "<11,90>": "0", + "<11,91>": "0", + "<11,92>": "", + "<11,93>": "", + "<11,94>": "", + "<11,95>": "", + "<11,96>": "", + "<11,97>": "", + "<11,98>": "", + "<11,99>": "", + "<11,100>": "", + "<11,101>": "", + "<11,102>": "", + "<11,103>": "", + "<11,104>": "", + "<11,105>": "", + "<11,106>": "", + "<11,107>": "", + "<11,108>": "" + }, + "<12>": { + "<12,1>": "BTN_PRINT_B", + "<12,2>": "", + "<12,3>": "PUSHBUTTON", + "<12,4>": "POPUP", + "<12,5>": "80", + "<12,6>": "-36", + "<12,7>": "64", + "<12,8>": "24", + "<12,9>": "&Print...", + "<12,10>": { + "<12,10,1>": "0x50000300", + "<12,10,2>": "0x0" + }, + "<12,11>": { + "<12,11,1>": "0x2000", + "<12,11,2>": "0x80000000" + }, + "<12,12>": "10", + "<12,13>": { + "<12,13,1>": "-2", + "<12,13,2>": "-2", + "<12,13,3>": "0" + }, + "<12,14>": "-2", + "<12,15>": { + "<12,15,1>": { + "<12,15,1,1>": "Segoe UI", + "<12,15,1,2>": "-11", + "<12,15,1,3>": "400", + "<12,15,1,4>": "0", + "<12,15,1,5>": "0", + "<12,15,1,6>": "0", + "<12,15,1,7>": "0", + "<12,15,1,8>": "34", + "<12,15,1,9>": "0", + "<12,15,1,10>": "3", + "<12,15,1,11>": "2", + "<12,15,1,12>": "1", + "<12,15,1,13>": "0", + "<12,15,1,14>": "0" + } + }, + "<12,16>": "", + "<12,17>": "", + "<12,18>": { + "<12,18,1>": { + "<12,18,1,1>": "R", + "<12,18,1,2>": "EXECUTE", + "<12,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<12,18,1,4>": { + "<12,18,1,4,1>": "@SELF", + "<12,18,1,4,2>": "@EVENT", + "<12,18,1,4,3>": "@PARAM1", + "<12,18,1,4,4>": "@PARAM2", + "<12,18,1,4,5>": "@PARAM3", + "<12,18,1,4,6>": "@PARAM4", + "<12,18,1,4,7>": "@PARAM5", + "<12,18,1,4,8>": "@PARAM6" + }, + "<12,18,1,5>": "", + "<12,18,1,6>": "", + "<12,18,1,7>": "", + "<12,18,1,8>": "", + "<12,18,1,9>": "", + "<12,18,1,10>": "", + "<12,18,1,11>": "", + "<12,18,1,12>": "", + "<12,18,1,13>": "", + "<12,18,1,14>": "", + "<12,18,1,15>": "STPROC" + } + }, + "<12,19>": "CLICK", + "<12,20>": "", + "<12,21>": "", + "<12,22>": "", + "<12,23>": "", + "<12,24>": "", + "<12,25>": "", + "<12,26>": "", + "<12,27>": "", + "<12,28>": "", + "<12,29>": "", + "<12,30>": "", + "<12,31>": "", + "<12,32>": "", + "<12,33>": "", + "<12,34>": "", + "<12,35>": "", + "<12,36>": "", + "<12,37>": "", + "<12,38>": "", + "<12,39>": "", + "<12,40>": "1", + "<12,41>": { + "<12,41,1>": "", + "<12,41,2>": "-1" + }, + "<12,42>": "", + "<12,43>": "", + "<12,44>": "", + "<12,45>": "", + "<12,46>": "", + "<12,47>": "", + "<12,48>": "", + "<12,49>": "", + "<12,50>": "", + "<12,51>": "", + "<12,52>": "", + "<12,53>": "", + "<12,54>": "", + "<12,55>": "", + "<12,56>": "", + "<12,57>": "", + "<12,58>": "", + "<12,59>": "", + "<12,60>": "", + "<12,61>": "", + "<12,62>": "0", + "<12,63>": "", + "<12,64>": { + "<12,64,1>": "-2", + "<12,64,2>": "-2", + "<12,64,3>": "0" + }, + "<12,65>": "-2", + "<12,66>": "", + "<12,67>": "", + "<12,68>": "", + "<12,69>": "", + "<12,70>": "", + "<12,71>": "", + "<12,72>": "", + "<12,73>": "", + "<12,74>": "", + "<12,75>": "", + "<12,76>": "", + "<12,77>": "", + "<12,78>": "", + "<12,79>": "", + "<12,80>": "", + "<12,81>": "", + "<12,82>": "", + "<12,83>": "", + "<12,84>": "", + "<12,85>": "", + "<12,86>": "", + "<12,87>": "", + "<12,88>": "", + "<12,89>": "", + "<12,90>": "0", + "<12,91>": "0", + "<12,92>": "", + "<12,93>": "", + "<12,94>": "", + "<12,95>": "", + "<12,96>": "", + "<12,97>": "", + "<12,98>": "", + "<12,99>": "", + "<12,100>": "", + "<12,101>": "", + "<12,102>": "", + "<12,103>": "", + "<12,104>": "", + "<12,105>": "", + "<12,106>": "", + "<12,107>": "", + "<12,108>": "" + }, + "<13>": { + "<13,1>": "BTN_SEARCH_B", + "<13,2>": "", + "<13,3>": "PUSHBUTTON", + "<13,4>": "POPUP", + "<13,5>": "148", + "<13,6>": "-36", + "<13,7>": "64", + "<13,8>": "24", + "<13,9>": "&Search...", + "<13,10>": { + "<13,10,1>": "0x50000300", + "<13,10,2>": "0x0" + }, + "<13,11>": { + "<13,11,1>": "0x2000", + "<13,11,2>": "0x80000000" + }, + "<13,12>": "11", + "<13,13>": { + "<13,13,1>": "-2", + "<13,13,2>": "-2", + "<13,13,3>": "0" + }, + "<13,14>": "-2", + "<13,15>": { + "<13,15,1>": { + "<13,15,1,1>": "Segoe UI", + "<13,15,1,2>": "-11", + "<13,15,1,3>": "400", + "<13,15,1,4>": "0", + "<13,15,1,5>": "0", + "<13,15,1,6>": "0", + "<13,15,1,7>": "0", + "<13,15,1,8>": "34", + "<13,15,1,9>": "0", + "<13,15,1,10>": "3", + "<13,15,1,11>": "2", + "<13,15,1,12>": "1", + "<13,15,1,13>": "0", + "<13,15,1,14>": "0" + } + }, + "<13,16>": "", + "<13,17>": "", + "<13,18>": { + "<13,18,1>": { + "<13,18,1,1>": "R", + "<13,18,1,2>": "EXECUTE", + "<13,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<13,18,1,4>": { + "<13,18,1,4,1>": "@SELF", + "<13,18,1,4,2>": "@EVENT", + "<13,18,1,4,3>": "@PARAM1", + "<13,18,1,4,4>": "@PARAM2", + "<13,18,1,4,5>": "@PARAM3", + "<13,18,1,4,6>": "@PARAM4", + "<13,18,1,4,7>": "@PARAM5", + "<13,18,1,4,8>": "@PARAM6" + }, + "<13,18,1,5>": "", + "<13,18,1,6>": "", + "<13,18,1,7>": "", + "<13,18,1,8>": "", + "<13,18,1,9>": "", + "<13,18,1,10>": "", + "<13,18,1,11>": "", + "<13,18,1,12>": "", + "<13,18,1,13>": "", + "<13,18,1,14>": "", + "<13,18,1,15>": "STPROC" + } + }, + "<13,19>": "CLICK", + "<13,20>": "", + "<13,21>": "", + "<13,22>": "", + "<13,23>": "", + "<13,24>": "", + "<13,25>": "", + "<13,26>": "", + "<13,27>": "", + "<13,28>": "", + "<13,29>": "", + "<13,30>": "", + "<13,31>": "", + "<13,32>": "", + "<13,33>": "", + "<13,34>": "", + "<13,35>": "", + "<13,36>": "", + "<13,37>": "", + "<13,38>": "", + "<13,39>": "", + "<13,40>": "1", + "<13,41>": { + "<13,41,1>": "", + "<13,41,2>": "-1" + }, + "<13,42>": "", + "<13,43>": "", + "<13,44>": "", + "<13,45>": "", + "<13,46>": "", + "<13,47>": "", + "<13,48>": "", + "<13,49>": "", + "<13,50>": "", + "<13,51>": "", + "<13,52>": "", + "<13,53>": "", + "<13,54>": "", + "<13,55>": "", + "<13,56>": "", + "<13,57>": "", + "<13,58>": "", + "<13,59>": "", + "<13,60>": "", + "<13,61>": "", + "<13,62>": "0", + "<13,63>": "", + "<13,64>": { + "<13,64,1>": "-2", + "<13,64,2>": "-2", + "<13,64,3>": "0" + }, + "<13,65>": "-2", + "<13,66>": "", + "<13,67>": "", + "<13,68>": "", + "<13,69>": "", + "<13,70>": "", + "<13,71>": "", + "<13,72>": "", + "<13,73>": "", + "<13,74>": "", + "<13,75>": "", + "<13,76>": "", + "<13,77>": "", + "<13,78>": "", + "<13,79>": "", + "<13,80>": "", + "<13,81>": "", + "<13,82>": "", + "<13,83>": "", + "<13,84>": "", + "<13,85>": "", + "<13,86>": "", + "<13,87>": "", + "<13,88>": "", + "<13,89>": "", + "<13,90>": "0", + "<13,91>": "0", + "<13,92>": "", + "<13,93>": "", + "<13,94>": "", + "<13,95>": "", + "<13,96>": "", + "<13,97>": "", + "<13,98>": "", + "<13,99>": "", + "<13,100>": "", + "<13,101>": "", + "<13,102>": "", + "<13,103>": "", + "<13,104>": "", + "<13,105>": "", + "<13,106>": "", + "<13,107>": "", + "<13,108>": "" + }, + "<14>": { + "<14,1>": "BTN_SELECTALL_B", + "<14,2>": "", + "<14,3>": "PUSHBUTTON", + "<14,4>": "POPUP", + "<14,5>": "216", + "<14,6>": "-36", + "<14,7>": "64", + "<14,8>": "24", + "<14,9>": "Select &All", + "<14,10>": { + "<14,10,1>": "0x50000300", + "<14,10,2>": "0x0" + }, + "<14,11>": { + "<14,11,1>": "0x2000", + "<14,11,2>": "0x80000000" + }, + "<14,12>": "12", + "<14,13>": { + "<14,13,1>": "-2", + "<14,13,2>": "-2", + "<14,13,3>": "0" + }, + "<14,14>": "-2", + "<14,15>": { + "<14,15,1>": { + "<14,15,1,1>": "Segoe UI", + "<14,15,1,2>": "-11", + "<14,15,1,3>": "400", + "<14,15,1,4>": "0", + "<14,15,1,5>": "0", + "<14,15,1,6>": "0", + "<14,15,1,7>": "0", + "<14,15,1,8>": "34", + "<14,15,1,9>": "0", + "<14,15,1,10>": "3", + "<14,15,1,11>": "2", + "<14,15,1,12>": "1", + "<14,15,1,13>": "0", + "<14,15,1,14>": "0" + } + }, + "<14,16>": "", + "<14,17>": "", + "<14,18>": { + "<14,18,1>": { + "<14,18,1,1>": "R", + "<14,18,1,2>": "EXECUTE", + "<14,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<14,18,1,4>": { + "<14,18,1,4,1>": "@SELF", + "<14,18,1,4,2>": "@EVENT", + "<14,18,1,4,3>": "@PARAM1", + "<14,18,1,4,4>": "@PARAM2", + "<14,18,1,4,5>": "@PARAM3", + "<14,18,1,4,6>": "@PARAM4", + "<14,18,1,4,7>": "@PARAM5", + "<14,18,1,4,8>": "@PARAM6" + }, + "<14,18,1,5>": "", + "<14,18,1,6>": "", + "<14,18,1,7>": "", + "<14,18,1,8>": "", + "<14,18,1,9>": "", + "<14,18,1,10>": "", + "<14,18,1,11>": "", + "<14,18,1,12>": "", + "<14,18,1,13>": "", + "<14,18,1,14>": "", + "<14,18,1,15>": "STPROC" + } + }, + "<14,19>": "CLICK", + "<14,20>": "", + "<14,21>": "", + "<14,22>": "", + "<14,23>": "", + "<14,24>": "", + "<14,25>": "", + "<14,26>": "", + "<14,27>": "", + "<14,28>": "", + "<14,29>": "", + "<14,30>": "", + "<14,31>": "", + "<14,32>": "", + "<14,33>": "", + "<14,34>": "", + "<14,35>": "", + "<14,36>": "", + "<14,37>": "", + "<14,38>": "", + "<14,39>": "", + "<14,40>": "1", + "<14,41>": { + "<14,41,1>": "", + "<14,41,2>": "-1" + }, + "<14,42>": "", + "<14,43>": "", + "<14,44>": "", + "<14,45>": "", + "<14,46>": "", + "<14,47>": "", + "<14,48>": "", + "<14,49>": "", + "<14,50>": "", + "<14,51>": "", + "<14,52>": "", + "<14,53>": "", + "<14,54>": "", + "<14,55>": "", + "<14,56>": "", + "<14,57>": "", + "<14,58>": "", + "<14,59>": "", + "<14,60>": "", + "<14,61>": "", + "<14,62>": "0", + "<14,63>": "", + "<14,64>": { + "<14,64,1>": "-2", + "<14,64,2>": "-2", + "<14,64,3>": "0" + }, + "<14,65>": "-2", + "<14,66>": "", + "<14,67>": "", + "<14,68>": "", + "<14,69>": "", + "<14,70>": "", + "<14,71>": "", + "<14,72>": "", + "<14,73>": "", + "<14,74>": "", + "<14,75>": "", + "<14,76>": "", + "<14,77>": "", + "<14,78>": "", + "<14,79>": "", + "<14,80>": "", + "<14,81>": "", + "<14,82>": "", + "<14,83>": "", + "<14,84>": "", + "<14,85>": "", + "<14,86>": "", + "<14,87>": "", + "<14,88>": "", + "<14,89>": "", + "<14,90>": "0", + "<14,91>": "0", + "<14,92>": "", + "<14,93>": "", + "<14,94>": "", + "<14,95>": "", + "<14,96>": "", + "<14,97>": "", + "<14,98>": "", + "<14,99>": "", + "<14,100>": "", + "<14,101>": "", + "<14,102>": "", + "<14,103>": "", + "<14,104>": "", + "<14,105>": "", + "<14,106>": "", + "<14,107>": "", + "<14,108>": "" + }, + "<15>": { + "<15,1>": "BTN_CLEAR_B", + "<15,2>": "", + "<15,3>": "PUSHBUTTON", + "<15,4>": "POPUP", + "<15,5>": "284", + "<15,6>": "-36", + "<15,7>": "64", + "<15,8>": "24", + "<15,9>": "C&lear", + "<15,10>": { + "<15,10,1>": "0x50000300", + "<15,10,2>": "0x0" + }, + "<15,11>": { + "<15,11,1>": "0x2000", + "<15,11,2>": "0x80000000" + }, + "<15,12>": "13", + "<15,13>": { + "<15,13,1>": "-2", + "<15,13,2>": "-2", + "<15,13,3>": "0" + }, + "<15,14>": "-2", + "<15,15>": { + "<15,15,1>": { + "<15,15,1,1>": "Segoe UI", + "<15,15,1,2>": "-11", + "<15,15,1,3>": "400", + "<15,15,1,4>": "0", + "<15,15,1,5>": "0", + "<15,15,1,6>": "0", + "<15,15,1,7>": "0", + "<15,15,1,8>": "34", + "<15,15,1,9>": "0", + "<15,15,1,10>": "3", + "<15,15,1,11>": "2", + "<15,15,1,12>": "1", + "<15,15,1,13>": "0", + "<15,15,1,14>": "0" + } + }, + "<15,16>": "", + "<15,17>": "", + "<15,18>": { + "<15,18,1>": { + "<15,18,1,1>": "R", + "<15,18,1,2>": "EXECUTE", + "<15,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<15,18,1,4>": { + "<15,18,1,4,1>": "@SELF", + "<15,18,1,4,2>": "@EVENT", + "<15,18,1,4,3>": "@PARAM1", + "<15,18,1,4,4>": "@PARAM2", + "<15,18,1,4,5>": "@PARAM3", + "<15,18,1,4,6>": "@PARAM4", + "<15,18,1,4,7>": "@PARAM5", + "<15,18,1,4,8>": "@PARAM6" + }, + "<15,18,1,5>": "", + "<15,18,1,6>": "", + "<15,18,1,7>": "", + "<15,18,1,8>": "", + "<15,18,1,9>": "", + "<15,18,1,10>": "", + "<15,18,1,11>": "", + "<15,18,1,12>": "", + "<15,18,1,13>": "", + "<15,18,1,14>": "", + "<15,18,1,15>": "STPROC" + } + }, + "<15,19>": "CLICK", + "<15,20>": "", + "<15,21>": "", + "<15,22>": "", + "<15,23>": "", + "<15,24>": "", + "<15,25>": "", + "<15,26>": "", + "<15,27>": "", + "<15,28>": "", + "<15,29>": "", + "<15,30>": "", + "<15,31>": "", + "<15,32>": "", + "<15,33>": "", + "<15,34>": "", + "<15,35>": "", + "<15,36>": "", + "<15,37>": "", + "<15,38>": "", + "<15,39>": "", + "<15,40>": "1", + "<15,41>": { + "<15,41,1>": "", + "<15,41,2>": "-1" + }, + "<15,42>": "", + "<15,43>": "", + "<15,44>": "", + "<15,45>": "", + "<15,46>": "", + "<15,47>": "", + "<15,48>": "", + "<15,49>": "", + "<15,50>": "", + "<15,51>": "", + "<15,52>": "", + "<15,53>": "", + "<15,54>": "", + "<15,55>": "", + "<15,56>": "", + "<15,57>": "", + "<15,58>": "", + "<15,59>": "", + "<15,60>": "", + "<15,61>": "", + "<15,62>": "0", + "<15,63>": "", + "<15,64>": { + "<15,64,1>": "-2", + "<15,64,2>": "-2", + "<15,64,3>": "0" + }, + "<15,65>": "-2", + "<15,66>": "", + "<15,67>": "", + "<15,68>": "", + "<15,69>": "", + "<15,70>": "", + "<15,71>": "", + "<15,72>": "", + "<15,73>": "", + "<15,74>": "", + "<15,75>": "", + "<15,76>": "", + "<15,77>": "", + "<15,78>": "", + "<15,79>": "", + "<15,80>": "", + "<15,81>": "", + "<15,82>": "", + "<15,83>": "", + "<15,84>": "", + "<15,85>": "", + "<15,86>": "", + "<15,87>": "", + "<15,88>": "", + "<15,89>": "", + "<15,90>": "0", + "<15,91>": "0", + "<15,92>": "", + "<15,93>": "", + "<15,94>": "", + "<15,95>": "", + "<15,96>": "", + "<15,97>": "", + "<15,98>": "", + "<15,99>": "", + "<15,100>": "", + "<15,101>": "", + "<15,102>": "", + "<15,103>": "", + "<15,104>": "", + "<15,105>": "", + "<15,106>": "", + "<15,107>": "", + "<15,108>": "" + }, + "<16>": { + "<16,1>": "BTN_OK_B", + "<16,2>": "", + "<16,3>": "PUSHBUTTON", + "<16,4>": "POPUP", + "<16,5>": "-143", + "<16,6>": "-36", + "<16,7>": "64", + "<16,8>": "24", + "<16,9>": "&OK", + "<16,10>": { + "<16,10,1>": "0x50000300", + "<16,10,2>": "0x0" + }, + "<16,11>": { + "<16,11,1>": "0x3000", + "<16,11,2>": "0x80000000" + }, + "<16,12>": "14", + "<16,13>": { + "<16,13,1>": "-2", + "<16,13,2>": "-2", + "<16,13,3>": "0" + }, + "<16,14>": "-2", + "<16,15>": { + "<16,15,1>": { + "<16,15,1,1>": "Segoe UI", + "<16,15,1,2>": "-11", + "<16,15,1,3>": "400", + "<16,15,1,4>": "0", + "<16,15,1,5>": "0", + "<16,15,1,6>": "0", + "<16,15,1,7>": "0", + "<16,15,1,8>": "34", + "<16,15,1,9>": "0", + "<16,15,1,10>": "3", + "<16,15,1,11>": "2", + "<16,15,1,12>": "1", + "<16,15,1,13>": "0", + "<16,15,1,14>": "0" + } + }, + "<16,16>": "", + "<16,17>": "", + "<16,18>": { + "<16,18,1>": { + "<16,18,1,1>": "R", + "<16,18,1,2>": "EXECUTE", + "<16,18,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<16,18,1,4>": { + "<16,18,1,4,1>": "@SELF", + "<16,18,1,4,2>": "@EVENT", + "<16,18,1,4,3>": "@PARAM1", + "<16,18,1,4,4>": "@PARAM2", + "<16,18,1,4,5>": "@PARAM3", + "<16,18,1,4,6>": "@PARAM4", + "<16,18,1,4,7>": "@PARAM5", + "<16,18,1,4,8>": "@PARAM6" + }, + "<16,18,1,5>": "", + "<16,18,1,6>": "", + "<16,18,1,7>": "", + "<16,18,1,8>": "", + "<16,18,1,9>": "", + "<16,18,1,10>": "", + "<16,18,1,11>": "", + "<16,18,1,12>": "", + "<16,18,1,13>": "", + "<16,18,1,14>": "", + "<16,18,1,15>": "STPROC" + } + }, + "<16,19>": "CLICK", + "<16,20>": "", + "<16,21>": "", + "<16,22>": "", + "<16,23>": "", + "<16,24>": "", + "<16,25>": "", + "<16,26>": "", + "<16,27>": "", + "<16,28>": "", + "<16,29>": "", + "<16,30>": "", + "<16,31>": "", + "<16,32>": "", + "<16,33>": "", + "<16,34>": "", + "<16,35>": "", + "<16,36>": "", + "<16,37>": "", + "<16,38>": "", + "<16,39>": "", + "<16,40>": "1", + "<16,41>": { + "<16,41,1>": "", + "<16,41,2>": "-1" + }, + "<16,42>": "", + "<16,43>": "", + "<16,44>": "", + "<16,45>": "", + "<16,46>": "", + "<16,47>": "", + "<16,48>": "", + "<16,49>": "", + "<16,50>": "", + "<16,51>": "", + "<16,52>": "", + "<16,53>": "", + "<16,54>": "", + "<16,55>": "", + "<16,56>": "", + "<16,57>": "", + "<16,58>": "", + "<16,59>": "", + "<16,60>": "", + "<16,61>": "", + "<16,62>": "0", + "<16,63>": "", + "<16,64>": { + "<16,64,1>": "-2", + "<16,64,2>": "-2", + "<16,64,3>": "0" + }, + "<16,65>": "-2", + "<16,66>": "", + "<16,67>": "", + "<16,68>": "", + "<16,69>": "", + "<16,70>": "", + "<16,71>": "", + "<16,72>": "", + "<16,73>": "", + "<16,74>": "", + "<16,75>": "", + "<16,76>": "", + "<16,77>": "", + "<16,78>": "", + "<16,79>": "", + "<16,80>": "", + "<16,81>": "", + "<16,82>": "", + "<16,83>": "", + "<16,84>": "", + "<16,85>": "", + "<16,86>": "", + "<16,87>": "", + "<16,88>": "", + "<16,89>": "", + "<16,90>": "0", + "<16,91>": "0", + "<16,92>": "", + "<16,93>": "", + "<16,94>": "", + "<16,95>": "", + "<16,96>": "", + "<16,97>": "", + "<16,98>": "", + "<16,99>": "", + "<16,100>": "", + "<16,101>": "", + "<16,102>": "", + "<16,103>": "", + "<16,104>": "", + "<16,105>": "", + "<16,106>": "", + "<16,107>": "", + "<16,108>": "" + }, + "<17>": { + "<17,1>": "BTN_CANCEL_B", + "<17,2>": "", + "<17,3>": "PUSHBUTTON", + "<17,4>": "POPUP", + "<17,5>": "-75", + "<17,6>": "-36", + "<17,7>": "64", + "<17,8>": "24", + "<17,9>": "&Cancel", + "<17,10>": { + "<17,10,1>": "0x50000300", + "<17,10,2>": "0x0" + }, + "<17,11>": { + "<17,11,1>": "0x3000", + "<17,11,2>": "0x80000000" + }, + "<17,12>": "15", + "<17,13>": { + "<17,13,1>": "-2", + "<17,13,2>": "-2", + "<17,13,3>": "0" + }, + "<17,14>": "-2", + "<17,15>": { + "<17,15,1>": { + "<17,15,1,1>": "Segoe UI", + "<17,15,1,2>": "-11", + "<17,15,1,3>": "400", + "<17,15,1,4>": "0", + "<17,15,1,5>": "0", + "<17,15,1,6>": "0", + "<17,15,1,7>": "0", + "<17,15,1,8>": "34", + "<17,15,1,9>": "0", + "<17,15,1,10>": "3", + "<17,15,1,11>": "2", + "<17,15,1,12>": "1", + "<17,15,1,13>": "0", + "<17,15,1,14>": "0" + } + }, + "<17,16>": "", + "<17,17>": "", + "<17,18>": { + "<17,18,1>": { + "<17,18,1,1>": "E", + "<17,18,1,2>": "CLOSE", + "<17,18,1,3>": "@WINDOW", + "<17,18,1,4>": "", + "<17,18,1,5>": "", + "<17,18,1,6>": "", + "<17,18,1,7>": "", + "<17,18,1,8>": "", + "<17,18,1,9>": "", + "<17,18,1,10>": "", + "<17,18,1,11>": "", + "<17,18,1,12>": "", + "<17,18,1,13>": "", + "<17,18,1,14>": "", + "<17,18,1,15>": "GEN" + } + }, + "<17,19>": "CLICK", + "<17,20>": "", + "<17,21>": "", + "<17,22>": "", + "<17,23>": "", + "<17,24>": "", + "<17,25>": "", + "<17,26>": "", + "<17,27>": "", + "<17,28>": "", + "<17,29>": "", + "<17,30>": "", + "<17,31>": "", + "<17,32>": "", + "<17,33>": "", + "<17,34>": "", + "<17,35>": "", + "<17,36>": "", + "<17,37>": "", + "<17,38>": "", + "<17,39>": "", + "<17,40>": "1", + "<17,41>": { + "<17,41,1>": "", + "<17,41,2>": "-1" + }, + "<17,42>": "", + "<17,43>": "", + "<17,44>": "", + "<17,45>": "", + "<17,46>": "", + "<17,47>": "", + "<17,48>": "", + "<17,49>": "", + "<17,50>": "", + "<17,51>": "", + "<17,52>": "", + "<17,53>": "", + "<17,54>": "", + "<17,55>": "", + "<17,56>": "", + "<17,57>": "", + "<17,58>": "", + "<17,59>": "", + "<17,60>": "", + "<17,61>": "", + "<17,62>": "0", + "<17,63>": "", + "<17,64>": { + "<17,64,1>": "-2", + "<17,64,2>": "-2", + "<17,64,3>": "0" + }, + "<17,65>": "-2", + "<17,66>": "", + "<17,67>": "", + "<17,68>": "", + "<17,69>": "", + "<17,70>": "", + "<17,71>": "", + "<17,72>": "", + "<17,73>": "", + "<17,74>": "", + "<17,75>": "", + "<17,76>": "", + "<17,77>": "", + "<17,78>": "", + "<17,79>": "", + "<17,80>": "", + "<17,81>": "", + "<17,82>": "", + "<17,83>": "", + "<17,84>": "", + "<17,85>": "", + "<17,86>": "", + "<17,87>": "", + "<17,88>": "", + "<17,89>": "", + "<17,90>": "0", + "<17,91>": "0", + "<17,92>": "", + "<17,93>": "", + "<17,94>": "", + "<17,95>": "", + "<17,96>": "", + "<17,97>": "", + "<17,98>": "", + "<17,99>": "", + "<17,100>": "", + "<17,101>": "", + "<17,102>": "", + "<17,103>": "", + "<17,104>": "", + "<17,105>": "", + "<17,106>": "", + "<17,107>": "", + "<17,108>": "" + } + }, + "record4": { + "<1>": { + "<1,1>": { + "<1,1,1>": "MENU", + "<1,1,2>": "3", + "<1,1,3>": "", + "<1,1,4>": "", + "<1,1,5>": "0", + "<1,1,6>": "0", + "<1,1,7>": "0", + "<1,1,8>": "0", + "<1,1,9>": "10", + "<1,1,10>": "", + "<1,1,11>": "0", + "<1,1,12>": "" + }, + "<1,2>": { + "<1,2,1>": "POPUP", + "<1,2,2>": "2", + "<1,2,3>": "", + "<1,2,4>": "File", + "<1,2,5>": "0", + "<1,2,6>": "0", + "<1,2,7>": "1", + "<1,2,8>": "0", + "<1,2,9>": "", + "<1,2,10>": "", + "<1,2,11>": "0", + "<1,2,12>": "" + }, + "<1,3>": { + "<1,3,1>": "ITEM", + "<1,3,2>": "", + "<1,3,3>": "", + "<1,3,4>": "Save F9\tF9", + "<1,3,5>": "0", + "<1,3,6>": "0", + "<1,3,7>": "1", + "<1,3,8>": "120", + "<1,3,9>": "", + "<1,3,10>": "", + "<1,3,11>": "0", + "<1,3,12>": "" + }, + "<1,4>": { + "<1,4,1>": "ITEM", + "<1,4,2>": "", + "<1,4,3>": "", + "<1,4,4>": "Print", + "<1,4,5>": "0", + "<1,4,6>": "0", + "<1,4,7>": "1", + "<1,4,8>": "0", + "<1,4,9>": "", + "<1,4,10>": "", + "<1,4,11>": "0", + "<1,4,12>": "" + }, + "<1,5>": { + "<1,5,1>": "POPUP", + "<1,5,2>": "1", + "<1,5,3>": "", + "<1,5,4>": "Edit", + "<1,5,5>": "0", + "<1,5,6>": "0", + "<1,5,7>": "1", + "<1,5,8>": "0", + "<1,5,9>": "", + "<1,5,10>": "", + "<1,5,11>": "0", + "<1,5,12>": "" + }, + "<1,6>": { + "<1,6,1>": "ITEM", + "<1,6,2>": "", + "<1,6,3>": "", + "<1,6,4>": "Select All", + "<1,6,5>": "0", + "<1,6,6>": "0", + "<1,6,7>": "1", + "<1,6,8>": "0", + "<1,6,9>": "", + "<1,6,10>": "", + "<1,6,11>": "0", + "<1,6,12>": "" + }, + "<1,7>": { + "<1,7,1>": "POPUP", + "<1,7,2>": "3", + "<1,7,3>": "", + "<1,7,4>": "Search", + "<1,7,5>": "0", + "<1,7,6>": "0", + "<1,7,7>": "1", + "<1,7,8>": "0", + "<1,7,9>": "", + "<1,7,10>": "", + "<1,7,11>": "0", + "<1,7,12>": "" + }, + "<1,8>": { + "<1,8,1>": "ITEM", + "<1,8,2>": "", + "<1,8,3>": "", + "<1,8,4>": "Find\tCtrl+F", + "<1,8,5>": "0", + "<1,8,6>": "0", + "<1,8,7>": "1", + "<1,8,8>": "582", + "<1,8,9>": "", + "<1,8,10>": "", + "<1,8,11>": "0", + "<1,8,12>": "" + }, + "<1,9>": { + "<1,9,1>": "ITEM", + "<1,9,2>": "", + "<1,9,3>": "", + "<1,9,4>": "Find Next\tF3", + "<1,9,5>": "0", + "<1,9,6>": "0", + "<1,9,7>": "1", + "<1,9,8>": "114", + "<1,9,9>": "", + "<1,9,10>": "", + "<1,9,11>": "0", + "<1,9,12>": "" + }, + "<1,10>": { + "<1,10,1>": "ITEM", + "<1,10,2>": "", + "<1,10,3>": "", + "<1,10,4>": "Find Prev\tShift+F3", + "<1,10,5>": "0", + "<1,10,6>": "0", + "<1,10,7>": "1", + "<1,10,8>": "370", + "<1,10,9>": "", + "<1,10,10>": "", + "<1,10,11>": "0", + "<1,10,12>": "" + } + }, + "<2>": { + "<2,1>": "", + "<2,2>": { + "<2,2,1>": { + "<2,2,1,1>": "R", + "<2,2,1,2>": "EXECUTE", + "<2,2,1,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<2,2,1,4>": { + "<2,2,1,4,1>": "@SELF", + "<2,2,1,4,2>": "@EVENT", + "<2,2,1,4,3>": "@PARAM1", + "<2,2,1,4,4>": "@PARAM2", + "<2,2,1,4,5>": "@PARAM3", + "<2,2,1,4,6>": "@PARAM4", + "<2,2,1,4,7>": "@PARAM5", + "<2,2,1,4,8>": "@PARAM6" + }, + "<2,2,1,5>": "", + "<2,2,1,6>": "" + }, + "<2,2,2>": { + "<2,2,2,1>": "R", + "<2,2,2,2>": "EXECUTE", + "<2,2,2,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<2,2,2,4>": { + "<2,2,2,4,1>": "@SELF", + "<2,2,2,4,2>": "@EVENT", + "<2,2,2,4,3>": "@PARAM1", + "<2,2,2,4,4>": "@PARAM2", + "<2,2,2,4,5>": "@PARAM3", + "<2,2,2,4,6>": "@PARAM4", + "<2,2,2,4,7>": "@PARAM5", + "<2,2,2,4,8>": "@PARAM6" + }, + "<2,2,2,5>": "", + "<2,2,2,6>": "" + }, + "<2,2,3>": { + "<2,2,3,1>": "R", + "<2,2,3,2>": "EXECUTE", + "<2,2,3,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<2,2,3,4>": { + "<2,2,3,4,1>": "@SELF", + "<2,2,3,4,2>": "@EVENT", + "<2,2,3,4,3>": "@PARAM1", + "<2,2,3,4,4>": "@PARAM2", + "<2,2,3,4,5>": "@PARAM3", + "<2,2,3,4,6>": "@PARAM4", + "<2,2,3,4,7>": "@PARAM5", + "<2,2,3,4,8>": "@PARAM6" + }, + "<2,2,3,5>": "", + "<2,2,3,6>": "" + }, + "<2,2,4>": { + "<2,2,4,1>": "R", + "<2,2,4,2>": "EXECUTE", + "<2,2,4,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<2,2,4,4>": { + "<2,2,4,4,1>": "@SELF", + "<2,2,4,4,2>": "@EVENT", + "<2,2,4,4,3>": "@PARAM1", + "<2,2,4,4,4>": "@PARAM2", + "<2,2,4,4,5>": "@PARAM3", + "<2,2,4,4,6>": "@PARAM4", + "<2,2,4,4,7>": "@PARAM5", + "<2,2,4,4,8>": "@PARAM6" + }, + "<2,2,4,5>": "", + "<2,2,4,6>": "" + }, + "<2,2,5>": { + "<2,2,5,1>": "R", + "<2,2,5,2>": "EXECUTE", + "<2,2,5,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<2,2,5,4>": { + "<2,2,5,4,1>": "@SELF", + "<2,2,5,4,2>": "@EVENT", + "<2,2,5,4,3>": "@PARAM1", + "<2,2,5,4,4>": "@PARAM2", + "<2,2,5,4,5>": "@PARAM3", + "<2,2,5,4,6>": "@PARAM4", + "<2,2,5,4,7>": "@PARAM5", + "<2,2,5,4,8>": "@PARAM6" + }, + "<2,2,5,5>": "", + "<2,2,5,6>": "" + }, + "<2,2,6>": { + "<2,2,6,1>": "R", + "<2,2,6,2>": "EXECUTE", + "<2,2,6,3>": "SYSPROG*STPROCEXE**@WINDOW_EVENTS", + "<2,2,6,4>": { + "<2,2,6,4,1>": "@SELF", + "<2,2,6,4,2>": "@EVENT", + "<2,2,6,4,3>": "@PARAM1", + "<2,2,6,4,4>": "@PARAM2", + "<2,2,6,4,5>": "@PARAM3", + "<2,2,6,4,6>": "@PARAM4", + "<2,2,6,4,7>": "@PARAM5", + "<2,2,6,4,8>": "@PARAM6" + }, + "<2,2,6,5>": "", + "<2,2,6,6>": "" + }, + "<2,2,7>": "" + }, + "<2,3>": { + "<2,3,1>": "FILE.SAVE_F9", + "<2,3,2>": "FILE.PRINT", + "<2,3,3>": "EDIT.SELECT_ALL", + "<2,3,4>": "SEARCH.FIND", + "<2,3,5>": "SEARCH.FIND_NEXT", + "<2,3,6>": "SEARCH.FIND_PREV", + "<2,3,7>": "" + }, + "<2,4>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/RTI_DSNX_OIWIN_DEF_DIALOG_TEMPLATE.json b/SYSPROG/OIWIN/RTI_DSNX_OIWIN_DEF_DIALOG_TEMPLATE.json new file mode 100644 index 0000000..5a0869e --- /dev/null +++ b/SYSPROG/OIWIN/RTI_DSNX_OIWIN_DEF_DIALOG_TEMPLATE.json @@ -0,0 +1,436 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1000", + "<2>": "2", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "RTI_DSNX_OIWIN_DEF_DIALOG_TEMPLATE", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "137", + "<1,6>": "173", + "<1,7>": "-494", + "<1,8>": "-323", + "<1,9>": "Untitled", + "<1,10>": { + "<1,10,1>": "0x94C80000", + "<1,10,2>": "0x101" + }, + "<1,11>": { + "<1,11,1>": "0x8000", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "0", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": { + "<1,61,1>": { + "<1,61,1,1>": "-1", + "<1,61,1,2>": "-1", + "<1,61,1,3>": "-1", + "<1,61,1,4>": "-1" + } + }, + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "0", + "<1,62,4>": "2", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "BTN_OK", + "<1,2>": "", + "<1,3>": "PUSHBUTTON", + "<1,4>": "RTI_DSNX_OIWIN_DEF_DIALOG_TEMPLATE", + "<1,5>": "-176", + "<1,6>": "-37", + "<1,7>": "80", + "<1,8>": "24", + "<1,9>": "&OK", + "<1,10>": { + "<1,10,1>": "0x56000300", + "<1,10,2>": "0x0" + }, + "<1,11>": { + "<1,11,1>": "0x3005", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "1", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "-2", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "Segoe UI", + "<1,15,1,2>": "-12", + "<1,15,1,3>": "400", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "1", + "<1,15,1,8>": "0", + "<1,15,1,9>": "0", + "<1,15,1,10>": "0", + "<1,15,1,11>": "0", + "<1,15,1,12>": "0" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": "", + "<1,38>": "", + "<1,39>": "", + "<1,40>": "-1", + "<1,41>": { + "<1,41,1>": "", + "<1,41,2>": "-1" + }, + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": "0", + "<1,63>": "", + "<1,64>": { + "<1,64,1>": "-2", + "<1,64,2>": "-2", + "<1,64,3>": "0" + }, + "<1,65>": "-2", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "0", + "<1,91>": "0" + }, + "<2>": { + "<2,1>": "BTN_CANCEL", + "<2,2>": "", + "<2,3>": "PUSHBUTTON", + "<2,4>": "RTI_DSNX_OIWIN_DEF_DIALOG_TEMPLATE", + "<2,5>": "-90", + "<2,6>": "-37", + "<2,7>": "80", + "<2,8>": "24", + "<2,9>": "&Cancel", + "<2,10>": { + "<2,10,1>": "0x56000300", + "<2,10,2>": "0x0" + }, + "<2,11>": { + "<2,11,1>": "0x3002", + "<2,11,2>": "0x80000000" + }, + "<2,12>": "2", + "<2,13>": { + "<2,13,1>": "-2", + "<2,13,2>": "-2", + "<2,13,3>": "0" + }, + "<2,14>": "-2", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "Segoe UI", + "<2,15,1,2>": "-12", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "1", + "<2,15,1,8>": "0", + "<2,15,1,9>": "0", + "<2,15,1,10>": "0", + "<2,15,1,11>": "0", + "<2,15,1,12>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": { + "<2,18,1>": { + "<2,18,1,1>": "E", + "<2,18,1,2>": "CLOSE", + "<2,18,1,3>": "@WINDOW", + "<2,18,1,4>": "", + "<2,18,1,5>": "", + "<2,18,1,6>": "", + "<2,18,1,7>": "", + "<2,18,1,8>": "", + "<2,18,1,9>": "", + "<2,18,1,10>": "", + "<2,18,1,11>": "", + "<2,18,1,12>": "", + "<2,18,1,13>": "", + "<2,18,1,14>": "", + "<2,18,1,15>": "CLOSEWIN" + } + }, + "<2,19>": "CLICK", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "", + "<2,26>": "", + "<2,27>": "", + "<2,28>": "", + "<2,29>": "", + "<2,30>": "", + "<2,31>": "", + "<2,32>": "", + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "-1", + "<2,41>": { + "<2,41,1>": "", + "<2,41,2>": "-1" + }, + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "", + "<2,53>": "", + "<2,54>": "", + "<2,55>": "", + "<2,56>": "", + "<2,57>": "", + "<2,58>": "", + "<2,59>": "", + "<2,60>": "", + "<2,61>": "", + "<2,62>": "0", + "<2,63>": "", + "<2,64>": { + "<2,64,1>": "-2", + "<2,64,2>": "-2", + "<2,64,3>": "0" + }, + "<2,65>": "-2", + "<2,66>": "", + "<2,67>": "", + "<2,68>": "", + "<2,69>": "", + "<2,70>": "", + "<2,71>": "", + "<2,72>": "", + "<2,73>": "", + "<2,74>": "", + "<2,75>": "", + "<2,76>": "", + "<2,77>": "", + "<2,78>": "", + "<2,79>": "", + "<2,80>": "", + "<2,81>": "", + "<2,82>": "", + "<2,83>": "", + "<2,84>": "", + "<2,85>": "", + "<2,86>": "", + "<2,87>": "", + "<2,88>": "", + "<2,89>": "", + "<2,90>": "0", + "<2,91>": "0" + } + }, + "record4": { + "<1>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/RTI_DSNX_OIWIN_DEF_FORM_TEMPLATE.json b/SYSPROG/OIWIN/RTI_DSNX_OIWIN_DEF_FORM_TEMPLATE.json new file mode 100644 index 0000000..46f9840 --- /dev/null +++ b/SYSPROG/OIWIN/RTI_DSNX_OIWIN_DEF_FORM_TEMPLATE.json @@ -0,0 +1,2021 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1010", + "<2>": "2", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "RTI_DSNX_OIWIN_DEF_FORM_TEMPLATE", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "426", + "<1,6>": "113", + "<1,7>": "-340", + "<1,8>": "-102", + "<1,9>": "Untitled", + "<1,10>": { + "<1,10,1>": "0x92CF0000", + "<1,10,2>": "0x100" + }, + "<1,11>": { + "<1,11,1>": "0x8100", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "2", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0", + "<1,24,15>": "0", + "<1,24,16>": "1", + "<1,24,17>": "0" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "", + "<1,62,4>": "0", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "", + "<1,62,8>": "0.50", + "<1,62,9>": "5.00", + "<1,62,10>": "0.00" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "0", + "<1,107>": "", + "<1,108>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "BTN_OK", + "<1,2>": "", + "<1,3>": "PUSHBUTTON", + "<1,4>": "RTI_DSNX_OIWIN_DEF_FORM_TEMPLATE", + "<1,5>": "-172", + "<1,6>": "-33", + "<1,7>": "80", + "<1,8>": "24", + "<1,9>": "&OK", + "<1,10>": { + "<1,10,1>": "0x50000300", + "<1,10,2>": "0x0" + }, + "<1,11>": { + "<1,11,1>": "0x13004", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "1", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "0", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "Segoe UI", + "<1,15,1,2>": "-12", + "<1,15,1,3>": "400", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "0", + "<1,15,1,8>": "34", + "<1,15,1,9>": "0", + "<1,15,1,10>": "3", + "<1,15,1,11>": "2", + "<1,15,1,12>": "1" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "E", + "<1,18,1,2>": "WRITE", + "<1,18,1,3>": "@WINDOW", + "<1,18,1,4>": "", + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "GEN" + } + }, + "<1,19>": "CLICK", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": "", + "<1,38>": "", + "<1,39>": "", + "<1,40>": "-1", + "<1,41>": { + "<1,41,1>": "", + "<1,41,2>": "-1" + }, + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": "0", + "<1,63>": "", + "<1,64>": { + "<1,64,1>": "-2", + "<1,64,2>": "-2", + "<1,64,3>": "0" + }, + "<1,65>": "-2", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "0", + "<1,91>": "0", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "", + "<1,107>": "", + "<1,108>": "" + }, + "<2>": { + "<2,1>": "BTN_CANCEL", + "<2,2>": "", + "<2,3>": "PUSHBUTTON", + "<2,4>": "RTI_DSNX_OIWIN_DEF_FORM_TEMPLATE", + "<2,5>": "-88", + "<2,6>": "-33", + "<2,7>": "80", + "<2,8>": "24", + "<2,9>": "&Cancel", + "<2,10>": { + "<2,10,1>": "0x50000300", + "<2,10,2>": "0x0" + }, + "<2,11>": { + "<2,11,1>": "0x13000", + "<2,11,2>": "0x80000000" + }, + "<2,12>": "2", + "<2,13>": { + "<2,13,1>": "-2", + "<2,13,2>": "-2", + "<2,13,3>": "0" + }, + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "Segoe UI", + "<2,15,1,2>": "-12", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "3", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": { + "<2,18,1>": { + "<2,18,1,1>": "E", + "<2,18,1,2>": "CLOSE", + "<2,18,1,3>": "@WINDOW", + "<2,18,1,4>": "", + "<2,18,1,5>": "", + "<2,18,1,6>": "", + "<2,18,1,7>": "", + "<2,18,1,8>": "", + "<2,18,1,9>": "", + "<2,18,1,10>": "", + "<2,18,1,11>": "", + "<2,18,1,12>": "", + "<2,18,1,13>": "", + "<2,18,1,14>": "", + "<2,18,1,15>": "GEN" + } + }, + "<2,19>": "CLICK", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "", + "<2,26>": "", + "<2,27>": "", + "<2,28>": "", + "<2,29>": "", + "<2,30>": "", + "<2,31>": "", + "<2,32>": "", + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "-1", + "<2,41>": { + "<2,41,1>": "", + "<2,41,2>": "-1" + }, + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "", + "<2,53>": "", + "<2,54>": "", + "<2,55>": "", + "<2,56>": "", + "<2,57>": "", + "<2,58>": "", + "<2,59>": "", + "<2,60>": "", + "<2,61>": "", + "<2,62>": "0", + "<2,63>": "", + "<2,64>": { + "<2,64,1>": "-2", + "<2,64,2>": "-2", + "<2,64,3>": "0" + }, + "<2,65>": "-2", + "<2,66>": "", + "<2,67>": "", + "<2,68>": "", + "<2,69>": "", + "<2,70>": "", + "<2,71>": "", + "<2,72>": "", + "<2,73>": "", + "<2,74>": "", + "<2,75>": "", + "<2,76>": "", + "<2,77>": "", + "<2,78>": "", + "<2,79>": "", + "<2,80>": "", + "<2,81>": "", + "<2,82>": "", + "<2,83>": "", + "<2,84>": "", + "<2,85>": "", + "<2,86>": "", + "<2,87>": "", + "<2,88>": "", + "<2,89>": "", + "<2,90>": "0", + "<2,91>": "0", + "<2,92>": "", + "<2,93>": "", + "<2,94>": "", + "<2,95>": "", + "<2,96>": "", + "<2,97>": "", + "<2,98>": "", + "<2,99>": "", + "<2,100>": "", + "<2,101>": "", + "<2,102>": "", + "<2,103>": "", + "<2,104>": "", + "<2,105>": "", + "<2,106>": "", + "<2,107>": "", + "<2,108>": "" + } + }, + "record4": { + "<1>": { + "<1,1>": { + "<1,1,1>": "MENU", + "<1,1,2>": "4", + "<1,1,3>": "", + "<1,1,4>": "", + "<1,1,5>": "", + "<1,1,6>": "", + "<1,1,7>": "", + "<1,1,8>": "", + "<1,1,9>": "47", + "<1,1,10>": "", + "<1,1,11>": "", + "<1,1,12>": "SYSPROG*IMAGELIST*PNG*OIWIN_DEFAULT_MENU" + }, + "<1,2>": { + "<1,2,1>": "POPUP", + "<1,2,2>": "13", + "<1,2,3>": "FILE", + "<1,2,4>": "&File", + "<1,2,5>": "0", + "<1,2,6>": "0", + "<1,2,7>": "0", + "<1,2,8>": "0", + "<1,2,9>": "", + "<1,2,10>": "", + "<1,2,11>": "0", + "<1,2,12>": "", + "<1,2,13>": "", + "<1,2,14>": "", + "<1,2,15>": "", + "<1,2,16>": "", + "<1,2,17>": "", + "<1,2,18>": "", + "<1,2,19>": "", + "<1,2,20>": "" + }, + "<1,3>": { + "<1,3,1>": "ITEM", + "<1,3,2>": "", + "<1,3,3>": "FILE.READ_ROW", + "<1,3,4>": "&Read (Hidden)\tCtrl+R", + "<1,3,5>": "0", + "<1,3,6>": "0", + "<1,3,7>": "1", + "<1,3,8>": "594", + "<1,3,9>": "", + "<1,3,10>": "", + "<1,3,11>": "32", + "<1,3,12>": "", + "<1,3,13>": "", + "<1,3,14>": "", + "<1,3,15>": "", + "<1,3,16>": "", + "<1,3,17>": "", + "<1,3,18>": "", + "<1,3,19>": "", + "<1,3,20>": "" + }, + "<1,4>": { + "<1,4,1>": "ITEM", + "<1,4,2>": "", + "<1,4,3>": "FILE.SAVE_ROW", + "<1,4,4>": "&Save\tCtrl+S", + "<1,4,5>": "0", + "<1,4,6>": "0", + "<1,4,7>": "0", + "<1,4,8>": "595", + "<1,4,9>": "Save the contents of the form", + "<1,4,10>": "", + "<1,4,11>": "32", + "<1,4,12>": "", + "<1,4,13>": "", + "<1,4,14>": "3", + "<1,4,15>": "", + "<1,4,16>": "", + "<1,4,17>": "", + "<1,4,18>": "", + "<1,4,19>": "", + "<1,4,20>": "" + }, + "<1,5>": { + "<1,5,1>": "ITEM", + "<1,5,2>": "", + "<1,5,3>": "FILE.SAVE_F9", + "<1,5,4>": "Save (F9 - Hidden)\tF9", + "<1,5,5>": "0", + "<1,5,6>": "0", + "<1,5,7>": "1", + "<1,5,8>": "120", + "<1,5,9>": "", + "<1,5,10>": "", + "<1,5,11>": "0", + "<1,5,12>": "", + "<1,5,13>": "", + "<1,5,14>": "", + "<1,5,15>": "", + "<1,5,16>": "", + "<1,5,17>": "", + "<1,5,18>": "", + "<1,5,19>": "", + "<1,5,20>": "" + }, + "<1,6>": { + "<1,6,1>": "SEPARATOR", + "<1,6,2>": "", + "<1,6,3>": "FILE.SEP100", + "<1,6,4>": "SEP100", + "<1,6,5>": "0", + "<1,6,6>": "0", + "<1,6,7>": "0", + "<1,6,8>": "0", + "<1,6,9>": "", + "<1,6,10>": "", + "<1,6,11>": "0", + "<1,6,12>": "", + "<1,6,13>": "", + "<1,6,14>": "", + "<1,6,15>": "", + "<1,6,16>": "", + "<1,6,17>": "", + "<1,6,18>": "", + "<1,6,19>": "", + "<1,6,20>": "" + }, + "<1,7>": { + "<1,7,1>": "ITEM", + "<1,7,2>": "", + "<1,7,3>": "FILE.CLEAR_FORM", + "<1,7,4>": "C&lear\tF8", + "<1,7,5>": "0", + "<1,7,6>": "0", + "<1,7,7>": "0", + "<1,7,8>": "119", + "<1,7,9>": "Clear the contents of the form", + "<1,7,10>": "", + "<1,7,11>": "0", + "<1,7,12>": "", + "<1,7,13>": "", + "<1,7,14>": "6", + "<1,7,15>": "", + "<1,7,16>": "", + "<1,7,17>": "", + "<1,7,18>": "", + "<1,7,19>": "", + "<1,7,20>": "" + }, + "<1,8>": { + "<1,8,1>": "SEPARATOR", + "<1,8,2>": "", + "<1,8,3>": "FILE.SEP108", + "<1,8,4>": "SEP108", + "<1,8,5>": "0", + "<1,8,6>": "0", + "<1,8,7>": "0", + "<1,8,8>": "0", + "<1,8,9>": "", + "<1,8,10>": "", + "<1,8,11>": "0", + "<1,8,12>": "", + "<1,8,13>": "", + "<1,8,14>": "", + "<1,8,15>": "", + "<1,8,16>": "", + "<1,8,17>": "", + "<1,8,18>": "", + "<1,8,19>": "", + "<1,8,20>": "" + }, + "<1,9>": { + "<1,9,1>": "ITEM", + "<1,9,2>": "", + "<1,9,3>": "FILE.DELETE_ROW", + "<1,9,4>": "&Delete\tAlt+D", + "<1,9,5>": "0", + "<1,9,6>": "0", + "<1,9,7>": "0", + "<1,9,8>": "1092", + "<1,9,9>": "Delete the contents of the form", + "<1,9,10>": "", + "<1,9,11>": "0", + "<1,9,12>": "", + "<1,9,13>": "", + "<1,9,14>": "7", + "<1,9,15>": "", + "<1,9,16>": "", + "<1,9,17>": "", + "<1,9,18>": "", + "<1,9,19>": "", + "<1,9,20>": "" + }, + "<1,10>": { + "<1,10,1>": "SEPARATOR", + "<1,10,2>": "", + "<1,10,3>": "FILE.SEP101", + "<1,10,4>": "SEP101", + "<1,10,5>": "0", + "<1,10,6>": "0", + "<1,10,7>": "0", + "<1,10,8>": "0", + "<1,10,9>": "", + "<1,10,10>": "", + "<1,10,11>": "0", + "<1,10,12>": "", + "<1,10,13>": "", + "<1,10,14>": "", + "<1,10,15>": "", + "<1,10,16>": "", + "<1,10,17>": "", + "<1,10,18>": "", + "<1,10,19>": "", + "<1,10,20>": "" + }, + "<1,11>": { + "<1,11,1>": "ITEM", + "<1,11,2>": "", + "<1,11,3>": "FILE.PRINT", + "<1,11,4>": "Print\tCtrl+P", + "<1,11,5>": "0", + "<1,11,6>": "0", + "<1,11,7>": "0", + "<1,11,8>": "592", + "<1,11,9>": "Print the contents of the current form", + "<1,11,10>": "", + "<1,11,11>": "0", + "<1,11,12>": "", + "<1,11,13>": "", + "<1,11,14>": "8", + "<1,11,15>": "", + "<1,11,16>": "", + "<1,11,17>": "", + "<1,11,18>": "", + "<1,11,19>": "", + "<1,11,20>": "" + }, + "<1,12>": { + "<1,12,1>": "ITEM", + "<1,12,2>": "", + "<1,12,3>": "FILE.PRINT_PREVIEW", + "<1,12,4>": "Print Preview", + "<1,12,5>": "0", + "<1,12,6>": "0", + "<1,12,7>": "0", + "<1,12,8>": "0", + "<1,12,9>": "Print-Preview the contents of the current form", + "<1,12,10>": "", + "<1,12,11>": "0", + "<1,12,12>": "", + "<1,12,13>": "", + "<1,12,14>": "9", + "<1,12,15>": "", + "<1,12,16>": "", + "<1,12,17>": "", + "<1,12,18>": "", + "<1,12,19>": "", + "<1,12,20>": "" + }, + "<1,13>": { + "<1,13,1>": "ITEM", + "<1,13,2>": "", + "<1,13,3>": "FILE.PRINT_SETUP", + "<1,13,4>": "Print Setup", + "<1,13,5>": "0", + "<1,13,6>": "0", + "<1,13,7>": "0", + "<1,13,8>": "0", + "<1,13,9>": "Configure the printer settings", + "<1,13,10>": "", + "<1,13,11>": "0", + "<1,13,12>": "", + "<1,13,13>": "", + "<1,13,14>": "10", + "<1,13,15>": "", + "<1,13,16>": "", + "<1,13,17>": "", + "<1,13,18>": "", + "<1,13,19>": "", + "<1,13,20>": "" + }, + "<1,14>": { + "<1,14,1>": "SEPARATOR", + "<1,14,2>": "", + "<1,14,3>": "FILE.SEP112", + "<1,14,4>": "SEP112", + "<1,14,5>": "0", + "<1,14,6>": "0", + "<1,14,7>": "0", + "<1,14,8>": "0", + "<1,14,9>": "", + "<1,14,10>": "", + "<1,14,11>": "0", + "<1,14,12>": "", + "<1,14,13>": "", + "<1,14,14>": "", + "<1,14,15>": "", + "<1,14,16>": "", + "<1,14,17>": "", + "<1,14,18>": "", + "<1,14,19>": "", + "<1,14,20>": "" + }, + "<1,15>": { + "<1,15,1>": "ITEM", + "<1,15,2>": "", + "<1,15,3>": "FILE.CLOSE", + "<1,15,4>": "&Close\tAlt+F4", + "<1,15,5>": "0", + "<1,15,6>": "0", + "<1,15,7>": "0", + "<1,15,8>": "1139", + "<1,15,9>": "Close the form", + "<1,15,10>": "", + "<1,15,11>": "0", + "<1,15,12>": "", + "<1,15,13>": "", + "<1,15,14>": "11", + "<1,15,15>": "", + "<1,15,16>": "", + "<1,15,17>": "", + "<1,15,18>": "", + "<1,15,19>": "", + "<1,15,20>": "" + }, + "<1,16>": { + "<1,16,1>": "POPUP", + "<1,16,2>": "7", + "<1,16,3>": "EDIT", + "<1,16,4>": "&Edit", + "<1,16,5>": "0", + "<1,16,6>": "0", + "<1,16,7>": "0", + "<1,16,8>": "0", + "<1,16,9>": "", + "<1,16,10>": "", + "<1,16,11>": "0", + "<1,16,12>": "", + "<1,16,13>": "", + "<1,16,14>": "", + "<1,16,15>": "", + "<1,16,16>": "", + "<1,16,17>": "", + "<1,16,18>": "", + "<1,16,19>": "", + "<1,16,20>": "" + }, + "<1,17>": { + "<1,17,1>": "ITEM", + "<1,17,2>": "", + "<1,17,3>": "EDIT.UNDO", + "<1,17,4>": "&Undo\tCtrl+Z", + "<1,17,5>": "0", + "<1,17,6>": "0", + "<1,17,7>": "0", + "<1,17,8>": "602", + "<1,17,9>": "Undo the last editing action", + "<1,17,10>": "", + "<1,17,11>": "0", + "<1,17,12>": "", + "<1,17,13>": "", + "<1,17,14>": "13", + "<1,17,15>": "", + "<1,17,16>": "", + "<1,17,17>": "", + "<1,17,18>": "", + "<1,17,19>": "", + "<1,17,20>": "" + }, + "<1,18>": { + "<1,18,1>": "SEPARATOR", + "<1,18,2>": "", + "<1,18,3>": "EDIT.SEP111", + "<1,18,4>": "SEP111", + "<1,18,5>": "0", + "<1,18,6>": "0", + "<1,18,7>": "0", + "<1,18,8>": "0", + "<1,18,9>": "", + "<1,18,10>": "", + "<1,18,11>": "0", + "<1,18,12>": "", + "<1,18,13>": "", + "<1,18,14>": "", + "<1,18,15>": "", + "<1,18,16>": "", + "<1,18,17>": "", + "<1,18,18>": "", + "<1,18,19>": "", + "<1,18,20>": "" + }, + "<1,19>": { + "<1,19,1>": "ITEM", + "<1,19,2>": "", + "<1,19,3>": "EDIT.CUT", + "<1,19,4>": "&Cut\tCtrl+X", + "<1,19,5>": "0", + "<1,19,6>": "0", + "<1,19,7>": "0", + "<1,19,8>": "600", + "<1,19,9>": "Delete the selected contents of the current control and copy them to the Clipboard", + "<1,19,10>": "", + "<1,19,11>": "0", + "<1,19,12>": "", + "<1,19,13>": "", + "<1,19,14>": "15", + "<1,19,15>": "", + "<1,19,16>": "", + "<1,19,17>": "", + "<1,19,18>": "", + "<1,19,19>": "", + "<1,19,20>": "" + }, + "<1,20>": { + "<1,20,1>": "ITEM", + "<1,20,2>": "", + "<1,20,3>": "EDIT.COPY", + "<1,20,4>": "C&opy\tCtrl+C", + "<1,20,5>": "0", + "<1,20,6>": "0", + "<1,20,7>": "0", + "<1,20,8>": "579", + "<1,20,9>": "Copy the selected contents of the current control to the Clipboard", + "<1,20,10>": "", + "<1,20,11>": "0", + "<1,20,12>": "", + "<1,20,13>": "", + "<1,20,14>": "16", + "<1,20,15>": "", + "<1,20,16>": "", + "<1,20,17>": "", + "<1,20,18>": "", + "<1,20,19>": "", + "<1,20,20>": "" + }, + "<1,21>": { + "<1,21,1>": "ITEM", + "<1,21,2>": "", + "<1,21,3>": "EDIT.PASTE", + "<1,21,4>": "&Paste\tCtrl+V", + "<1,21,5>": "0", + "<1,21,6>": "0", + "<1,21,7>": "0", + "<1,21,8>": "598", + "<1,21,9>": "Paste the contents of the Clipboard into the current control", + "<1,21,10>": "", + "<1,21,11>": "0", + "<1,21,12>": "", + "<1,21,13>": "", + "<1,21,14>": "17", + "<1,21,15>": "", + "<1,21,16>": "", + "<1,21,17>": "", + "<1,21,18>": "", + "<1,21,19>": "", + "<1,21,20>": "" + }, + "<1,22>": { + "<1,22,1>": "SEPARATOR", + "<1,22,2>": "", + "<1,22,3>": "EDIT.SEP110", + "<1,22,4>": "SEP110", + "<1,22,5>": "0", + "<1,22,6>": "0", + "<1,22,7>": "0", + "<1,22,8>": "0", + "<1,22,9>": "", + "<1,22,10>": "", + "<1,22,11>": "0", + "<1,22,12>": "", + "<1,22,13>": "", + "<1,22,14>": "", + "<1,22,15>": "", + "<1,22,16>": "", + "<1,22,17>": "", + "<1,22,18>": "", + "<1,22,19>": "", + "<1,22,20>": "" + }, + "<1,23>": { + "<1,23,1>": "ITEM", + "<1,23,2>": "", + "<1,23,3>": "EDIT.SELECT_ALL", + "<1,23,4>": "&Select All\tCtrl+A", + "<1,23,5>": "0", + "<1,23,6>": "0", + "<1,23,7>": "0", + "<1,23,8>": "577", + "<1,23,9>": "Select all the contents in the current control", + "<1,23,10>": "", + "<1,23,11>": "0", + "<1,23,12>": "", + "<1,23,13>": "", + "<1,23,14>": "18", + "<1,23,15>": "", + "<1,23,16>": "", + "<1,23,17>": "", + "<1,23,18>": "", + "<1,23,19>": "", + "<1,23,20>": "" + }, + "<1,24>": { + "<1,24,1>": "POPUP", + "<1,24,2>": "17", + "<1,24,3>": "QBF", + "<1,24,4>": "&QBF", + "<1,24,5>": "0", + "<1,24,6>": "0", + "<1,24,7>": "0", + "<1,24,8>": "0", + "<1,24,9>": "", + "<1,24,10>": "", + "<1,24,11>": "0", + "<1,24,12>": "", + "<1,24,13>": "", + "<1,24,14>": "", + "<1,24,15>": "", + "<1,24,16>": "", + "<1,24,17>": "", + "<1,24,18>": "", + "<1,24,19>": "", + "<1,24,20>": "" + }, + "<1,25>": { + "<1,25,1>": "ITEM", + "<1,25,2>": "", + "<1,25,3>": "QBF.INITIALIZE", + "<1,25,4>": "&Initialize\tF7", + "<1,25,5>": "0", + "<1,25,6>": "0", + "<1,25,7>": "0", + "<1,25,8>": "118", + "<1,25,9>": "Begin a QBF session", + "<1,25,10>": "", + "<1,25,11>": "0", + "<1,25,12>": "", + "<1,25,13>": "", + "<1,25,14>": "19", + "<1,25,15>": "", + "<1,25,16>": "", + "<1,25,17>": "", + "<1,25,18>": "", + "<1,25,19>": "", + "<1,25,20>": "" + }, + "<1,26>": { + "<1,26,1>": "SEPARATOR", + "<1,26,2>": "", + "<1,26,3>": "QBF.SEP106", + "<1,26,4>": "SEP106", + "<1,26,5>": "0", + "<1,26,6>": "0", + "<1,26,7>": "0", + "<1,26,8>": "0", + "<1,26,9>": "", + "<1,26,10>": "", + "<1,26,11>": "0", + "<1,26,12>": "", + "<1,26,13>": "", + "<1,26,14>": "", + "<1,26,15>": "", + "<1,26,16>": "", + "<1,26,17>": "", + "<1,26,18>": "", + "<1,26,19>": "", + "<1,26,20>": "" + }, + "<1,27>": { + "<1,27,1>": "ITEM", + "<1,27,2>": "", + "<1,27,3>": "QBF.EXECUTE", + "<1,27,4>": "&Execute\tF6", + "<1,27,5>": "0", + "<1,27,6>": "0", + "<1,27,7>": "0", + "<1,27,8>": "117", + "<1,27,9>": "Execute the QBF query to produce the result list", + "<1,27,10>": "", + "<1,27,11>": "0", + "<1,27,12>": "", + "<1,27,13>": "", + "<1,27,14>": "20", + "<1,27,15>": "", + "<1,27,16>": "", + "<1,27,17>": "", + "<1,27,18>": "", + "<1,27,19>": "", + "<1,27,20>": "" + }, + "<1,28>": { + "<1,28,1>": "SEPARATOR", + "<1,28,2>": "", + "<1,28,3>": "QBF.SEP103", + "<1,28,4>": "SEP103", + "<1,28,5>": "0", + "<1,28,6>": "0", + "<1,28,7>": "0", + "<1,28,8>": "0", + "<1,28,9>": "", + "<1,28,10>": "", + "<1,28,11>": "0", + "<1,28,12>": "", + "<1,28,13>": "", + "<1,28,14>": "", + "<1,28,15>": "", + "<1,28,16>": "", + "<1,28,17>": "", + "<1,28,18>": "", + "<1,28,19>": "", + "<1,28,20>": "" + }, + "<1,29>": { + "<1,29,1>": "ITEM", + "<1,29,2>": "", + "<1,29,3>": "QBF.FIRST", + "<1,29,4>": "&First\tShift+F11", + "<1,29,5>": "0", + "<1,29,6>": "0", + "<1,29,7>": "0", + "<1,29,8>": "378", + "<1,29,9>": "Display the first item in the QBF result list", + "<1,29,10>": "", + "<1,29,11>": "0", + "<1,29,12>": "", + "<1,29,13>": "", + "<1,29,14>": "23", + "<1,29,15>": "", + "<1,29,16>": "", + "<1,29,17>": "", + "<1,29,18>": "", + "<1,29,19>": "", + "<1,29,20>": "" + }, + "<1,30>": { + "<1,30,1>": "ITEM", + "<1,30,2>": "", + "<1,30,3>": "QBF.PREVIOUS", + "<1,30,4>": "&Previous\tF11", + "<1,30,5>": "0", + "<1,30,6>": "0", + "<1,30,7>": "0", + "<1,30,8>": "122", + "<1,30,9>": "Display the previous item in the QBF result list", + "<1,30,10>": "", + "<1,30,11>": "0", + "<1,30,12>": "", + "<1,30,13>": "", + "<1,30,14>": "24", + "<1,30,15>": "", + "<1,30,16>": "", + "<1,30,17>": "", + "<1,30,18>": "", + "<1,30,19>": "", + "<1,30,20>": "" + }, + "<1,31>": { + "<1,31,1>": "ITEM", + "<1,31,2>": "", + "<1,31,3>": "QBF.NEXT", + "<1,31,4>": "&Next\tF12", + "<1,31,5>": "0", + "<1,31,6>": "0", + "<1,31,7>": "0", + "<1,31,8>": "123", + "<1,31,9>": "Display the next item in the QBF result list", + "<1,31,10>": "", + "<1,31,11>": "0", + "<1,31,12>": "", + "<1,31,13>": "", + "<1,31,14>": "25", + "<1,31,15>": "", + "<1,31,16>": "", + "<1,31,17>": "", + "<1,31,18>": "", + "<1,31,19>": "", + "<1,31,20>": "" + }, + "<1,32>": { + "<1,32,1>": "ITEM", + "<1,32,2>": "", + "<1,32,3>": "QBF.LAST", + "<1,32,4>": "&Last\tShift+F12", + "<1,32,5>": "0", + "<1,32,6>": "0", + "<1,32,7>": "0", + "<1,32,8>": "379", + "<1,32,9>": "Display the last item in the QBF result list", + "<1,32,10>": "", + "<1,32,11>": "0", + "<1,32,12>": "", + "<1,32,13>": "", + "<1,32,14>": "26", + "<1,32,15>": "", + "<1,32,16>": "", + "<1,32,17>": "", + "<1,32,18>": "", + "<1,32,19>": "", + "<1,32,20>": "" + }, + "<1,33>": { + "<1,33,1>": "SEPARATOR", + "<1,33,2>": "", + "<1,33,3>": "QBF.SEP104", + "<1,33,4>": "SEP104", + "<1,33,5>": "0", + "<1,33,6>": "0", + "<1,33,7>": "0", + "<1,33,8>": "0", + "<1,33,9>": "", + "<1,33,10>": "", + "<1,33,11>": "0", + "<1,33,12>": "", + "<1,33,13>": "", + "<1,33,14>": "", + "<1,33,15>": "", + "<1,33,16>": "", + "<1,33,17>": "", + "<1,33,18>": "", + "<1,33,19>": "", + "<1,33,20>": "" + }, + "<1,34>": { + "<1,34,1>": "ITEM", + "<1,34,2>": "", + "<1,34,3>": "QBF.ABSOLUTE", + "<1,34,4>": "&Goto Position...\tCtrl+F12", + "<1,34,5>": "0", + "<1,34,6>": "0", + "<1,34,7>": "0", + "<1,34,8>": "635", + "<1,34,9>": "Display an item in the QBF result list by specifying the position", + "<1,34,10>": "", + "<1,34,11>": "0", + "<1,34,12>": "", + "<1,34,13>": "", + "<1,34,14>": "27", + "<1,34,15>": "", + "<1,34,16>": "", + "<1,34,17>": "", + "<1,34,18>": "", + "<1,34,19>": "", + "<1,34,20>": "" + }, + "<1,35>": { + "<1,35,1>": "ITEM", + "<1,35,2>": "", + "<1,35,3>": "QBF.GOTO_ID", + "<1,35,4>": "Goto ID...\tAlt+F12", + "<1,35,5>": "0", + "<1,35,6>": "0", + "<1,35,7>": "0", + "<1,35,8>": "1147", + "<1,35,9>": "Display an item in the QBF result list by specifying its ID", + "<1,35,10>": "", + "<1,35,11>": "0", + "<1,35,12>": "", + "<1,35,13>": "", + "<1,35,14>": "35", + "<1,35,15>": "", + "<1,35,16>": "", + "<1,35,17>": "", + "<1,35,18>": "", + "<1,35,19>": "", + "<1,35,20>": "" + }, + "<1,36>": { + "<1,36,1>": "ITEM", + "<1,36,2>": "", + "<1,36,3>": "QBF.TABLE", + "<1,36,4>": "Show Resul&t List...\tAlt+F11", + "<1,36,5>": "0", + "<1,36,6>": "0", + "<1,36,7>": "0", + "<1,36,8>": "1146", + "<1,36,9>": "Display the QBF result list in tabular format", + "<1,36,10>": "", + "<1,36,11>": "0", + "<1,36,12>": "", + "<1,36,13>": "", + "<1,36,14>": "28", + "<1,36,15>": "", + "<1,36,16>": "", + "<1,36,17>": "", + "<1,36,18>": "", + "<1,36,19>": "", + "<1,36,20>": "" + }, + "<1,37>": { + "<1,37,1>": "SEPARATOR", + "<1,37,2>": "", + "<1,37,3>": "QBF.SEP107", + "<1,37,4>": "SEP107", + "<1,37,5>": "0", + "<1,37,6>": "0", + "<1,37,7>": "0", + "<1,37,8>": "0", + "<1,37,9>": "", + "<1,37,10>": "", + "<1,37,11>": "0", + "<1,37,12>": "", + "<1,37,13>": "", + "<1,37,14>": "", + "<1,37,15>": "", + "<1,37,16>": "", + "<1,37,17>": "", + "<1,37,18>": "", + "<1,37,19>": "", + "<1,37,20>": "" + }, + "<1,38>": { + "<1,38,1>": "ITEM", + "<1,38,2>": "", + "<1,38,3>": "QBF.LOADLIST", + "<1,38,4>": "Load from &Saved List...\tCtrl+F7", + "<1,38,5>": "0", + "<1,38,6>": "0", + "<1,38,7>": "0", + "<1,38,8>": "630", + "<1,38,9>": "Load a QBF result list from a previously saved list of keys", + "<1,38,10>": "", + "<1,38,11>": "0", + "<1,38,12>": "", + "<1,38,13>": "", + "<1,38,14>": "21", + "<1,38,15>": "", + "<1,38,16>": "", + "<1,38,17>": "", + "<1,38,18>": "", + "<1,38,19>": "", + "<1,38,20>": "" + }, + "<1,39>": { + "<1,39,1>": "ITEM", + "<1,39,2>": "", + "<1,39,3>": "QBF.GETQUERY", + "<1,39,4>": "Load from &Query Statement...\tAlt+F7", + "<1,39,5>": "0", + "<1,39,6>": "0", + "<1,39,7>": "0", + "<1,39,8>": "1142", + "<1,39,9>": "Load a QBF result list from an RLIST select statement", + "<1,39,10>": "", + "<1,39,11>": "0", + "<1,39,12>": "", + "<1,39,13>": "", + "<1,39,14>": "22", + "<1,39,15>": "", + "<1,39,16>": "", + "<1,39,17>": "", + "<1,39,18>": "", + "<1,39,19>": "", + "<1,39,20>": "" + }, + "<1,40>": { + "<1,40,1>": "SEPARATOR", + "<1,40,2>": "", + "<1,40,3>": "QBF.SEP105", + "<1,40,4>": "SEP105", + "<1,40,5>": "0", + "<1,40,6>": "0", + "<1,40,7>": "0", + "<1,40,8>": "0", + "<1,40,9>": "", + "<1,40,10>": "", + "<1,40,11>": "0", + "<1,40,12>": "", + "<1,40,13>": "", + "<1,40,14>": "", + "<1,40,15>": "", + "<1,40,16>": "", + "<1,40,17>": "", + "<1,40,18>": "", + "<1,40,19>": "", + "<1,40,20>": "" + }, + "<1,41>": { + "<1,41,1>": "ITEM", + "<1,41,2>": "", + "<1,41,3>": "QBF.CLOSE", + "<1,41,4>": "&Close", + "<1,41,5>": "0", + "<1,41,6>": "0", + "<1,41,7>": "0", + "<1,41,8>": "0", + "<1,41,9>": "Closes the QBF session", + "<1,41,10>": "", + "<1,41,11>": "0", + "<1,41,12>": "", + "<1,41,13>": "", + "<1,41,14>": "29", + "<1,41,15>": "", + "<1,41,16>": "", + "<1,41,17>": "", + "<1,41,18>": "", + "<1,41,19>": "", + "<1,41,20>": "" + }, + "<1,42>": { + "<1,42,1>": "POPUP", + "<1,42,2>": "5", + "<1,42,3>": "HELP", + "<1,42,4>": "&Help", + "<1,42,5>": "0", + "<1,42,6>": "0", + "<1,42,7>": "0", + "<1,42,8>": "0", + "<1,42,9>": "", + "<1,42,10>": "", + "<1,42,11>": "0", + "<1,42,12>": "", + "<1,42,13>": "", + "<1,42,14>": "", + "<1,42,15>": "", + "<1,42,16>": "", + "<1,42,17>": "", + "<1,42,18>": "", + "<1,42,19>": "", + "<1,42,20>": "" + }, + "<1,43>": { + "<1,43,1>": "ITEM", + "<1,43,2>": "", + "<1,43,3>": "HELP.OPTIONS", + "<1,43,4>": "&Options\tF4", + "<1,43,5>": "0", + "<1,43,6>": "0", + "<1,43,7>": "0", + "<1,43,8>": "115", + "<1,43,9>": "Display options for the current control", + "<1,43,10>": "", + "<1,43,11>": "0", + "<1,43,12>": "", + "<1,43,13>": "", + "<1,43,14>": "32", + "<1,43,15>": "", + "<1,43,16>": "", + "<1,43,17>": "", + "<1,43,18>": "", + "<1,43,19>": "", + "<1,43,20>": "" + }, + "<1,44>": { + "<1,44,1>": "SEPARATOR", + "<1,44,2>": "", + "<1,44,3>": "HELP.SEP109", + "<1,44,4>": "SEP109", + "<1,44,5>": "0", + "<1,44,6>": "0", + "<1,44,7>": "0", + "<1,44,8>": "0", + "<1,44,9>": "", + "<1,44,10>": "", + "<1,44,11>": "0", + "<1,44,12>": "", + "<1,44,13>": "", + "<1,44,14>": "", + "<1,44,15>": "", + "<1,44,16>": "", + "<1,44,17>": "", + "<1,44,18>": "", + "<1,44,19>": "", + "<1,44,20>": "" + }, + "<1,45>": { + "<1,45,1>": "ITEM", + "<1,45,2>": "", + "<1,45,3>": "HELP.HELP", + "<1,45,4>": "&Help\tF1", + "<1,45,5>": "0", + "<1,45,6>": "0", + "<1,45,7>": "0", + "<1,45,8>": "112", + "<1,45,9>": "Display help for the current control", + "<1,45,10>": "", + "<1,45,11>": "0", + "<1,45,12>": "", + "<1,45,13>": "", + "<1,45,14>": "33", + "<1,45,15>": "", + "<1,45,16>": "", + "<1,45,17>": "", + "<1,45,18>": "", + "<1,45,19>": "", + "<1,45,20>": "" + }, + "<1,46>": { + "<1,46,1>": "SEPARATOR", + "<1,46,2>": "", + "<1,46,3>": "HELP.SEP107", + "<1,46,4>": "SEP107", + "<1,46,5>": "0", + "<1,46,6>": "0", + "<1,46,7>": "0", + "<1,46,8>": "0", + "<1,46,9>": "", + "<1,46,10>": "", + "<1,46,11>": "0", + "<1,46,12>": "", + "<1,46,13>": "", + "<1,46,14>": "", + "<1,46,15>": "", + "<1,46,16>": "", + "<1,46,17>": "", + "<1,46,18>": "", + "<1,46,19>": "", + "<1,46,20>": "" + }, + "<1,47>": { + "<1,47,1>": "ITEM", + "<1,47,2>": "", + "<1,47,3>": "HELP.QUICKHELP", + "<1,47,4>": "&QuickHelp\tCtrl+F1", + "<1,47,5>": "0", + "<1,47,6>": "0", + "<1,47,7>": "0", + "<1,47,8>": "624", + "<1,47,9>": "Display QuickHelp for the current control", + "<1,47,10>": "", + "<1,47,11>": "0", + "<1,47,12>": "", + "<1,47,13>": "", + "<1,47,14>": "34", + "<1,47,15>": "", + "<1,47,16>": "", + "<1,47,17>": "", + "<1,47,18>": "", + "<1,47,19>": "", + "<1,47,20>": "" + } + }, + "<2>": { + "<2,1>": "", + "<2,2>": { + "<2,2,1>": { + "<2,2,1,1>": "E", + "<2,2,1,2>": "READ", + "<2,2,1,3>": "@WINDOW", + "<2,2,1,4>": "", + "<2,2,1,5>": "", + "<2,2,1,6>": "", + "<2,2,1,7>": "", + "<2,2,1,8>": "", + "<2,2,1,9>": "", + "<2,2,1,10>": "", + "<2,2,1,11>": "", + "<2,2,1,12>": "", + "<2,2,1,13>": "", + "<2,2,1,14>": "", + "<2,2,1,15>": "READROW", + "<2,2,1,16>": "0" + }, + "<2,2,2>": { + "<2,2,2,1>": "M", + "<2,2,2,2>": "WRITEROW", + "<2,2,2,3>": "@WINDOW", + "<2,2,2,4>": "", + "<2,2,2,5>": "", + "<2,2,2,6>": "", + "<2,2,2,7>": "", + "<2,2,2,8>": "", + "<2,2,2,9>": "", + "<2,2,2,10>": "", + "<2,2,2,11>": "", + "<2,2,2,12>": "", + "<2,2,2,13>": "", + "<2,2,2,14>": "", + "<2,2,2,15>": "GEN", + "<2,2,2,16>": "0" + }, + "<2,2,3>": { + "<2,2,3,1>": "M", + "<2,2,3,2>": "WRITEROW", + "<2,2,3,3>": "@WINDOW", + "<2,2,3,4>": "", + "<2,2,3,5>": "", + "<2,2,3,6>": "", + "<2,2,3,7>": "", + "<2,2,3,8>": "", + "<2,2,3,9>": "", + "<2,2,3,10>": "", + "<2,2,3,11>": "", + "<2,2,3,12>": "", + "<2,2,3,13>": "", + "<2,2,3,14>": "", + "<2,2,3,15>": "GEN", + "<2,2,3,16>": "0" + }, + "<2,2,4>": { + "<2,2,4,1>": "M", + "<2,2,4,2>": "CLEARROW", + "<2,2,4,3>": "@WINDOW", + "<2,2,4,4>": "", + "<2,2,4,5>": "", + "<2,2,4,6>": "", + "<2,2,4,7>": "", + "<2,2,4,8>": "", + "<2,2,4,9>": "", + "<2,2,4,10>": "", + "<2,2,4,11>": "", + "<2,2,4,12>": "", + "<2,2,4,13>": "", + "<2,2,4,14>": "", + "<2,2,4,15>": "GEN", + "<2,2,4,16>": "0" + }, + "<2,2,5>": { + "<2,2,5,1>": "M", + "<2,2,5,2>": "DELETEROW", + "<2,2,5,3>": "@WINDOW", + "<2,2,5,4>": "", + "<2,2,5,5>": "", + "<2,2,5,6>": "", + "<2,2,5,7>": "", + "<2,2,5,8>": "", + "<2,2,5,9>": "", + "<2,2,5,10>": "", + "<2,2,5,11>": "", + "<2,2,5,12>": "", + "<2,2,5,13>": "", + "<2,2,5,14>": "", + "<2,2,5,15>": "GEN", + "<2,2,5,16>": "0" + }, + "<2,2,6>": { + "<2,2,6,1>": "M", + "<2,2,6,2>": "CLOSE", + "<2,2,6,3>": "@WINDOW", + "<2,2,6,4>": "", + "<2,2,6,5>": "", + "<2,2,6,6>": "", + "<2,2,6,7>": "", + "<2,2,6,8>": "", + "<2,2,6,9>": "", + "<2,2,6,10>": "", + "<2,2,6,11>": "", + "<2,2,6,12>": "", + "<2,2,6,13>": "", + "<2,2,6,14>": "", + "<2,2,6,15>": "GEN", + "<2,2,6,16>": "0" + }, + "<2,2,7>": { + "<2,2,7,1>": "M", + "<2,2,7,2>": "UNDO", + "<2,2,7,3>": "@FOCUS", + "<2,2,7,4>": "", + "<2,2,7,5>": "", + "<2,2,7,6>": "", + "<2,2,7,7>": "", + "<2,2,7,8>": "", + "<2,2,7,9>": "", + "<2,2,7,10>": "", + "<2,2,7,11>": "", + "<2,2,7,12>": "", + "<2,2,7,13>": "", + "<2,2,7,14>": "", + "<2,2,7,15>": "GEN", + "<2,2,7,16>": "0" + }, + "<2,2,8>": { + "<2,2,8,1>": "M", + "<2,2,8,2>": "CUT", + "<2,2,8,3>": "@FOCUS", + "<2,2,8,4>": "", + "<2,2,8,5>": "", + "<2,2,8,6>": "", + "<2,2,8,7>": "", + "<2,2,8,8>": "", + "<2,2,8,9>": "", + "<2,2,8,10>": "", + "<2,2,8,11>": "", + "<2,2,8,12>": "", + "<2,2,8,13>": "", + "<2,2,8,14>": "", + "<2,2,8,15>": "GEN", + "<2,2,8,16>": "0" + }, + "<2,2,9>": { + "<2,2,9,1>": "M", + "<2,2,9,2>": "COPY", + "<2,2,9,3>": "@FOCUS", + "<2,2,9,4>": "", + "<2,2,9,5>": "", + "<2,2,9,6>": "", + "<2,2,9,7>": "", + "<2,2,9,8>": "", + "<2,2,9,9>": "", + "<2,2,9,10>": "", + "<2,2,9,11>": "", + "<2,2,9,12>": "", + "<2,2,9,13>": "", + "<2,2,9,14>": "", + "<2,2,9,15>": "GEN", + "<2,2,9,16>": "0" + }, + "<2,2,10>": { + "<2,2,10,1>": "M", + "<2,2,10,2>": "PASTE", + "<2,2,10,3>": "@FOCUS", + "<2,2,10,4>": "", + "<2,2,10,5>": "", + "<2,2,10,6>": "", + "<2,2,10,7>": "", + "<2,2,10,8>": "", + "<2,2,10,9>": "", + "<2,2,10,10>": "", + "<2,2,10,11>": "", + "<2,2,10,12>": "", + "<2,2,10,13>": "", + "<2,2,10,14>": "", + "<2,2,10,15>": "GEN", + "<2,2,10,16>": "0" + }, + "<2,2,11>": { + "<2,2,11,1>": "M", + "<2,2,11,2>": "SELECTALL", + "<2,2,11,3>": "@FOCUS", + "<2,2,11,4>": "", + "<2,2,11,5>": "", + "<2,2,11,6>": "", + "<2,2,11,7>": "", + "<2,2,11,8>": "", + "<2,2,11,9>": "", + "<2,2,11,10>": "", + "<2,2,11,11>": "", + "<2,2,11,12>": "", + "<2,2,11,13>": "", + "<2,2,11,14>": "", + "<2,2,11,15>": "GEN", + "<2,2,11,16>": "0" + }, + "<2,2,12>": { + "<2,2,12,1>": "M", + "<2,2,12,2>": "QBFINITSESSION", + "<2,2,12,3>": "@WINDOW", + "<2,2,12,4>": "", + "<2,2,12,5>": "", + "<2,2,12,6>": "", + "<2,2,12,7>": "", + "<2,2,12,8>": "", + "<2,2,12,9>": "", + "<2,2,12,10>": "", + "<2,2,12,11>": "", + "<2,2,12,12>": "", + "<2,2,12,13>": "", + "<2,2,12,14>": "", + "<2,2,12,15>": "GEN", + "<2,2,12,16>": "0" + }, + "<2,2,13>": { + "<2,2,13,1>": "M", + "<2,2,13,2>": "QBFRUNQUERY", + "<2,2,13,3>": "@WINDOW", + "<2,2,13,4>": "", + "<2,2,13,5>": "", + "<2,2,13,6>": "", + "<2,2,13,7>": "", + "<2,2,13,8>": "", + "<2,2,13,9>": "", + "<2,2,13,10>": "", + "<2,2,13,11>": "", + "<2,2,13,12>": "", + "<2,2,13,13>": "", + "<2,2,13,14>": "", + "<2,2,13,15>": "GEN", + "<2,2,13,16>": "0" + }, + "<2,2,14>": { + "<2,2,14,1>": "M", + "<2,2,14,2>": "QBFSHOWFIRST", + "<2,2,14,3>": "@WINDOW", + "<2,2,14,4>": "", + "<2,2,14,5>": "", + "<2,2,14,6>": "", + "<2,2,14,7>": "", + "<2,2,14,8>": "", + "<2,2,14,9>": "", + "<2,2,14,10>": "", + "<2,2,14,11>": "", + "<2,2,14,12>": "", + "<2,2,14,13>": "", + "<2,2,14,14>": "", + "<2,2,14,15>": "GEN", + "<2,2,14,16>": "0" + }, + "<2,2,15>": { + "<2,2,15,1>": "M", + "<2,2,15,2>": "QBFSHOWPREV", + "<2,2,15,3>": "@WINDOW", + "<2,2,15,4>": "", + "<2,2,15,5>": "", + "<2,2,15,6>": "", + "<2,2,15,7>": "", + "<2,2,15,8>": "", + "<2,2,15,9>": "", + "<2,2,15,10>": "", + "<2,2,15,11>": "", + "<2,2,15,12>": "", + "<2,2,15,13>": "", + "<2,2,15,14>": "", + "<2,2,15,15>": "GEN", + "<2,2,15,16>": "0" + }, + "<2,2,16>": { + "<2,2,16,1>": "M", + "<2,2,16,2>": "QBFSHOWNEXT", + "<2,2,16,3>": "@WINDOW", + "<2,2,16,4>": "", + "<2,2,16,5>": "", + "<2,2,16,6>": "", + "<2,2,16,7>": "", + "<2,2,16,8>": "", + "<2,2,16,9>": "", + "<2,2,16,10>": "", + "<2,2,16,11>": "", + "<2,2,16,12>": "", + "<2,2,16,13>": "", + "<2,2,16,14>": "", + "<2,2,16,15>": "GEN", + "<2,2,16,16>": "0" + }, + "<2,2,17>": { + "<2,2,17,1>": "M", + "<2,2,17,2>": "QBFSHOWLAST", + "<2,2,17,3>": "@WINDOW", + "<2,2,17,4>": "", + "<2,2,17,5>": "", + "<2,2,17,6>": "", + "<2,2,17,7>": "", + "<2,2,17,8>": "", + "<2,2,17,9>": "", + "<2,2,17,10>": "", + "<2,2,17,11>": "", + "<2,2,17,12>": "", + "<2,2,17,13>": "", + "<2,2,17,14>": "", + "<2,2,17,15>": "GEN", + "<2,2,17,16>": "0" + }, + "<2,2,18>": { + "<2,2,18,1>": "M", + "<2,2,18,2>": "QBFGOTO", + "<2,2,18,3>": "@WINDOW", + "<2,2,18,4>": "", + "<2,2,18,5>": "", + "<2,2,18,6>": "", + "<2,2,18,7>": "", + "<2,2,18,8>": "", + "<2,2,18,9>": "", + "<2,2,18,10>": "", + "<2,2,18,11>": "", + "<2,2,18,12>": "", + "<2,2,18,13>": "", + "<2,2,18,14>": "", + "<2,2,18,15>": "GEN", + "<2,2,18,16>": "0" + }, + "<2,2,19>": { + "<2,2,19,1>": "M", + "<2,2,19,2>": "QBFGOTOID", + "<2,2,19,3>": "@WINDOW", + "<2,2,19,4>": "", + "<2,2,19,5>": "", + "<2,2,19,6>": "", + "<2,2,19,7>": "", + "<2,2,19,8>": "", + "<2,2,19,9>": "", + "<2,2,19,10>": "", + "<2,2,19,11>": "", + "<2,2,19,12>": "", + "<2,2,19,13>": "", + "<2,2,19,14>": "", + "<2,2,19,15>": "GEN", + "<2,2,19,16>": "0" + }, + "<2,2,20>": { + "<2,2,20,1>": "M", + "<2,2,20,2>": "QBFSHOWTABLE", + "<2,2,20,3>": "@WINDOW", + "<2,2,20,4>": "", + "<2,2,20,5>": "", + "<2,2,20,6>": "", + "<2,2,20,7>": "", + "<2,2,20,8>": "", + "<2,2,20,9>": "", + "<2,2,20,10>": "", + "<2,2,20,11>": "", + "<2,2,20,12>": "", + "<2,2,20,13>": "", + "<2,2,20,14>": "", + "<2,2,20,15>": "GEN", + "<2,2,20,16>": "0" + }, + "<2,2,21>": { + "<2,2,21,1>": "M", + "<2,2,21,2>": "QBFLOADSAVEDLIST", + "<2,2,21,3>": "@WINDOW", + "<2,2,21,4>": "", + "<2,2,21,5>": "", + "<2,2,21,6>": "", + "<2,2,21,7>": "", + "<2,2,21,8>": "", + "<2,2,21,9>": "", + "<2,2,21,10>": "", + "<2,2,21,11>": "", + "<2,2,21,12>": "", + "<2,2,21,13>": "", + "<2,2,21,14>": "", + "<2,2,21,15>": "GEN", + "<2,2,21,16>": "0" + }, + "<2,2,22>": { + "<2,2,22,1>": "M", + "<2,2,22,2>": "QBFASKQUERY", + "<2,2,22,3>": "@WINDOW", + "<2,2,22,4>": "", + "<2,2,22,5>": "", + "<2,2,22,6>": "", + "<2,2,22,7>": "", + "<2,2,22,8>": "", + "<2,2,22,9>": "", + "<2,2,22,10>": "", + "<2,2,22,11>": "", + "<2,2,22,12>": "", + "<2,2,22,13>": "", + "<2,2,22,14>": "", + "<2,2,22,15>": "GEN", + "<2,2,22,16>": "0" + }, + "<2,2,23>": { + "<2,2,23,1>": "M", + "<2,2,23,2>": "QBFCLOSESESSION", + "<2,2,23,3>": "@WINDOW", + "<2,2,23,4>": "", + "<2,2,23,5>": "", + "<2,2,23,6>": "", + "<2,2,23,7>": "", + "<2,2,23,8>": "", + "<2,2,23,9>": "", + "<2,2,23,10>": "", + "<2,2,23,11>": "", + "<2,2,23,12>": "", + "<2,2,23,13>": "", + "<2,2,23,14>": "", + "<2,2,23,15>": "GEN", + "<2,2,23,16>": "0" + }, + "<2,2,24>": { + "<2,2,24,1>": "M", + "<2,2,24,2>": "SHOWOPTIONS", + "<2,2,24,3>": "@FOCUS", + "<2,2,24,4>": "", + "<2,2,24,5>": "", + "<2,2,24,6>": "", + "<2,2,24,7>": "", + "<2,2,24,8>": "", + "<2,2,24,9>": "", + "<2,2,24,10>": "", + "<2,2,24,11>": "", + "<2,2,24,12>": "", + "<2,2,24,13>": "", + "<2,2,24,14>": "", + "<2,2,24,15>": "GEN", + "<2,2,24,16>": "0" + }, + "<2,2,25>": { + "<2,2,25,1>": "M", + "<2,2,25,2>": "SHOWHELP", + "<2,2,25,3>": "@FOCUS", + "<2,2,25,4>": "", + "<2,2,25,5>": "", + "<2,2,25,6>": "", + "<2,2,25,7>": "", + "<2,2,25,8>": "", + "<2,2,25,9>": "", + "<2,2,25,10>": "", + "<2,2,25,11>": "", + "<2,2,25,12>": "", + "<2,2,25,13>": "", + "<2,2,25,14>": "", + "<2,2,25,15>": "GEN", + "<2,2,25,16>": "0" + }, + "<2,2,26>": { + "<2,2,26,1>": "M", + "<2,2,26,2>": "SHOWNOTES", + "<2,2,26,3>": "@FOCUS", + "<2,2,26,4>": "", + "<2,2,26,5>": "", + "<2,2,26,6>": "", + "<2,2,26,7>": "", + "<2,2,26,8>": "", + "<2,2,26,9>": "", + "<2,2,26,10>": "", + "<2,2,26,11>": "", + "<2,2,26,12>": "", + "<2,2,26,13>": "", + "<2,2,26,14>": "", + "<2,2,26,15>": "GEN", + "<2,2,26,16>": "0" + } + }, + "<2,3>": { + "<2,3,1>": "FILE.READ_ROW", + "<2,3,2>": "FILE.SAVE_ROW", + "<2,3,3>": "FILE.SAVE_F9", + "<2,3,4>": "FILE.CLEAR_FORM", + "<2,3,5>": "FILE.DELETE_ROW", + "<2,3,6>": "FILE.CLOSE", + "<2,3,7>": "EDIT.UNDO", + "<2,3,8>": "EDIT.CUT", + "<2,3,9>": "EDIT.COPY", + "<2,3,10>": "EDIT.PASTE", + "<2,3,11>": "EDIT.SELECT_ALL", + "<2,3,12>": "QBF.INITIALIZE", + "<2,3,13>": "QBF.EXECUTE", + "<2,3,14>": "QBF.FIRST", + "<2,3,15>": "QBF.PREVIOUS", + "<2,3,16>": "QBF.NEXT", + "<2,3,17>": "QBF.LAST", + "<2,3,18>": "QBF.ABSOLUTE", + "<2,3,19>": "QBF.GOTO_ID", + "<2,3,20>": "QBF.TABLE", + "<2,3,21>": "QBF.LOADLIST", + "<2,3,22>": "QBF.GETQUERY", + "<2,3,23>": "QBF.CLOSE", + "<2,3,24>": "HELP.OPTIONS", + "<2,3,25>": "HELP.HELP", + "<2,3,26>": "HELP.QUICKHELP" + }, + "<2,4>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/RTI_DSNX_OIWIN_DEF_MDIFRAME_TEMPLATE.json b/SYSPROG/OIWIN/RTI_DSNX_OIWIN_DEF_MDIFRAME_TEMPLATE.json new file mode 100644 index 0000000..b51a033 --- /dev/null +++ b/SYSPROG/OIWIN/RTI_DSNX_OIWIN_DEF_MDIFRAME_TEMPLATE.json @@ -0,0 +1,1968 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1010", + "<2>": "1", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "RTI_DSNX_OIWIN_DEF_MDIFRAME_TEMPLATE", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "400", + "<1,6>": "300", + "<1,7>": "-387", + "<1,8>": "-274", + "<1,9>": "Untitled", + "<1,10>": { + "<1,10,1>": "0x92CF0000", + "<1,10,2>": "0x100" + }, + "<1,11>": { + "<1,11,1>": "0x8100", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "0", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0", + "<1,24,15>": "0", + "<1,24,16>": "1" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "", + "<1,62,4>": "1", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "", + "<1,62,8>": "0.50", + "<1,62,9>": "5.00", + "<1,62,10>": "0.00" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "0", + "<1,107>": "", + "<1,108>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "MDICLIENT", + "<1,2>": "", + "<1,3>": "MDICLIENT", + "<1,4>": "RTI_DSNX_OIWIN_DEF_MDIFRAME_TEMPLATE", + "<1,5>": "8", + "<1,6>": "9", + "<1,7>": "-7", + "<1,8>": "-24", + "<1,9>": "", + "<1,10>": { + "<1,10,1>": "0x56300000", + "<1,10,2>": "0x0" + }, + "<1,11>": { + "<1,11,1>": "0xC004", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "1", + "<1,13>": { + "<1,13,1>": "", + "<1,13,2>": "", + "<1,13,3>": "" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": "", + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": "0", + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "", + "<1,107>": "", + "<1,108>": "" + } + }, + "record4": { + "<1>": { + "<1,1>": { + "<1,1,1>": "MENU", + "<1,1,2>": "5", + "<1,1,3>": "", + "<1,1,4>": "", + "<1,1,5>": "", + "<1,1,6>": "", + "<1,1,7>": "", + "<1,1,8>": "", + "<1,1,9>": "51", + "<1,1,10>": "", + "<1,1,11>": "", + "<1,1,12>": "SYSPROG*IMAGELIST*PNG*OIWIN_DEFAULT_MENU" + }, + "<1,2>": { + "<1,2,1>": "POPUP", + "<1,2,2>": "14", + "<1,2,3>": "FILE", + "<1,2,4>": "&File", + "<1,2,5>": "0", + "<1,2,6>": "0", + "<1,2,7>": "0", + "<1,2,8>": "0", + "<1,2,9>": "", + "<1,2,10>": "", + "<1,2,11>": "0", + "<1,2,12>": "", + "<1,2,13>": "", + "<1,2,14>": "", + "<1,2,15>": "", + "<1,2,16>": "", + "<1,2,17>": "", + "<1,2,18>": "", + "<1,2,19>": "", + "<1,2,20>": "" + }, + "<1,3>": { + "<1,3,1>": "ITEM", + "<1,3,2>": "", + "<1,3,3>": "FILE.READ_ROW", + "<1,3,4>": "&Read Row\tCtrl+R", + "<1,3,5>": "0", + "<1,3,6>": "0", + "<1,3,7>": "1", + "<1,3,8>": "594", + "<1,3,9>": "(Deprecated)", + "<1,3,10>": "", + "<1,3,11>": "32", + "<1,3,12>": "", + "<1,3,13>": "", + "<1,3,14>": "", + "<1,3,15>": "", + "<1,3,16>": "", + "<1,3,17>": "", + "<1,3,18>": "", + "<1,3,19>": "", + "<1,3,20>": "" + }, + "<1,4>": { + "<1,4,1>": "ITEM", + "<1,4,2>": "", + "<1,4,3>": "FILE.NEW", + "<1,4,4>": "New\tCtrl+N", + "<1,4,5>": "0", + "<1,4,6>": "0", + "<1,4,7>": "0", + "<1,4,8>": "590", + "<1,4,9>": "", + "<1,4,10>": "", + "<1,4,11>": "0", + "<1,4,12>": "", + "<1,4,13>": "", + "<1,4,14>": "1", + "<1,4,15>": "", + "<1,4,16>": "", + "<1,4,17>": "", + "<1,4,18>": "", + "<1,4,19>": "", + "<1,4,20>": "" + }, + "<1,5>": { + "<1,5,1>": "ITEM", + "<1,5,2>": "", + "<1,5,3>": "FILE.OPEN", + "<1,5,4>": "Open\tCtrl+O", + "<1,5,5>": "0", + "<1,5,6>": "0", + "<1,5,7>": "0", + "<1,5,8>": "591", + "<1,5,9>": "", + "<1,5,10>": "", + "<1,5,11>": "0", + "<1,5,12>": "", + "<1,5,13>": "", + "<1,5,14>": "2", + "<1,5,15>": "", + "<1,5,16>": "", + "<1,5,17>": "", + "<1,5,18>": "", + "<1,5,19>": "", + "<1,5,20>": "" + }, + "<1,6>": { + "<1,6,1>": "ITEM", + "<1,6,2>": "", + "<1,6,3>": "FILE.SAVE_ROW", + "<1,6,4>": "&Save\tCtrl+S", + "<1,6,5>": "0", + "<1,6,6>": "0", + "<1,6,7>": "0", + "<1,6,8>": "595", + "<1,6,9>": "Save the contents of the active child form", + "<1,6,10>": "", + "<1,6,11>": "32", + "<1,6,12>": "", + "<1,6,13>": "", + "<1,6,14>": "3", + "<1,6,15>": "", + "<1,6,16>": "", + "<1,6,17>": "", + "<1,6,18>": "", + "<1,6,19>": "", + "<1,6,20>": "" + }, + "<1,7>": { + "<1,7,1>": "ITEM", + "<1,7,2>": "", + "<1,7,3>": "FILE.SAVE_F9", + "<1,7,4>": "Save F9 (Hidden)\tF9", + "<1,7,5>": "0", + "<1,7,6>": "0", + "<1,7,7>": "1", + "<1,7,8>": "120", + "<1,7,9>": "", + "<1,7,10>": "", + "<1,7,11>": "0", + "<1,7,12>": "", + "<1,7,13>": "", + "<1,7,14>": "", + "<1,7,15>": "", + "<1,7,16>": "", + "<1,7,17>": "", + "<1,7,18>": "", + "<1,7,19>": "", + "<1,7,20>": "" + }, + "<1,8>": { + "<1,8,1>": "ITEM", + "<1,8,2>": "", + "<1,8,3>": "FILE.SAVE_ALL", + "<1,8,4>": "Save All", + "<1,8,5>": "0", + "<1,8,6>": "0", + "<1,8,7>": "0", + "<1,8,8>": "0", + "<1,8,9>": "Save the contents of all child forms", + "<1,8,10>": "", + "<1,8,11>": "0", + "<1,8,12>": "", + "<1,8,13>": "", + "<1,8,14>": "5", + "<1,8,15>": "", + "<1,8,16>": "", + "<1,8,17>": "", + "<1,8,18>": "", + "<1,8,19>": "", + "<1,8,20>": "" + }, + "<1,9>": { + "<1,9,1>": "SEPARATOR", + "<1,9,2>": "", + "<1,9,3>": "FILE.SEP102", + "<1,9,4>": "SEP102", + "<1,9,5>": "0", + "<1,9,6>": "0", + "<1,9,7>": "0", + "<1,9,8>": "0", + "<1,9,9>": "", + "<1,9,10>": "", + "<1,9,11>": "0", + "<1,9,12>": "", + "<1,9,13>": "", + "<1,9,14>": "", + "<1,9,15>": "", + "<1,9,16>": "", + "<1,9,17>": "", + "<1,9,18>": "", + "<1,9,19>": "", + "<1,9,20>": "" + }, + "<1,10>": { + "<1,10,1>": "ITEM", + "<1,10,2>": "", + "<1,10,3>": "FILE.CLEAR_FORM", + "<1,10,4>": "C&lear\tF8", + "<1,10,5>": "0", + "<1,10,6>": "0", + "<1,10,7>": "0", + "<1,10,8>": "119", + "<1,10,9>": "Clear the contents of the active child form", + "<1,10,10>": "", + "<1,10,11>": "0", + "<1,10,12>": "", + "<1,10,13>": "", + "<1,10,14>": "6", + "<1,10,15>": "", + "<1,10,16>": "", + "<1,10,17>": "", + "<1,10,18>": "", + "<1,10,19>": "", + "<1,10,20>": "" + }, + "<1,11>": { + "<1,11,1>": "SEPARATOR", + "<1,11,2>": "", + "<1,11,3>": "FILE.SEP106", + "<1,11,4>": "SEP106", + "<1,11,5>": "0", + "<1,11,6>": "0", + "<1,11,7>": "0", + "<1,11,8>": "0", + "<1,11,9>": "", + "<1,11,10>": "", + "<1,11,11>": "0", + "<1,11,12>": "", + "<1,11,13>": "", + "<1,11,14>": "", + "<1,11,15>": "", + "<1,11,16>": "", + "<1,11,17>": "", + "<1,11,18>": "", + "<1,11,19>": "", + "<1,11,20>": "" + }, + "<1,12>": { + "<1,12,1>": "ITEM", + "<1,12,2>": "", + "<1,12,3>": "FILE.DELETE_ROW", + "<1,12,4>": "&Delete\tAlt+D", + "<1,12,5>": "0", + "<1,12,6>": "0", + "<1,12,7>": "0", + "<1,12,8>": "1092", + "<1,12,9>": "Delete the contents of the active child form", + "<1,12,10>": "", + "<1,12,11>": "0", + "<1,12,12>": "", + "<1,12,13>": "", + "<1,12,14>": "7", + "<1,12,15>": "", + "<1,12,16>": "", + "<1,12,17>": "", + "<1,12,18>": "", + "<1,12,19>": "", + "<1,12,20>": "" + }, + "<1,13>": { + "<1,13,1>": "SEPARATOR", + "<1,13,2>": "", + "<1,13,3>": "FILE.SEP105", + "<1,13,4>": "SEP105", + "<1,13,5>": "0", + "<1,13,6>": "0", + "<1,13,7>": "0", + "<1,13,8>": "0", + "<1,13,9>": "", + "<1,13,10>": "", + "<1,13,11>": "0", + "<1,13,12>": "", + "<1,13,13>": "", + "<1,13,14>": "", + "<1,13,15>": "", + "<1,13,16>": "", + "<1,13,17>": "", + "<1,13,18>": "", + "<1,13,19>": "", + "<1,13,20>": "" + }, + "<1,14>": { + "<1,14,1>": "ITEM", + "<1,14,2>": "", + "<1,14,3>": "FILE.CLOSE", + "<1,14,4>": "&Close\tCtrl+F4", + "<1,14,5>": "0", + "<1,14,6>": "0", + "<1,14,7>": "0", + "<1,14,8>": "627", + "<1,14,9>": "Close the active child form", + "<1,14,10>": "", + "<1,14,11>": "0", + "<1,14,12>": "", + "<1,14,13>": "", + "<1,14,14>": "11", + "<1,14,15>": "", + "<1,14,16>": "", + "<1,14,17>": "", + "<1,14,18>": "", + "<1,14,19>": "", + "<1,14,20>": "" + }, + "<1,15>": { + "<1,15,1>": "SEPARATOR", + "<1,15,2>": "", + "<1,15,3>": "FILE.SEP107", + "<1,15,4>": "SEP107", + "<1,15,5>": "0", + "<1,15,6>": "0", + "<1,15,7>": "0", + "<1,15,8>": "0", + "<1,15,9>": "", + "<1,15,10>": "", + "<1,15,11>": "0", + "<1,15,12>": "", + "<1,15,13>": "", + "<1,15,14>": "", + "<1,15,15>": "", + "<1,15,16>": "", + "<1,15,17>": "", + "<1,15,18>": "", + "<1,15,19>": "", + "<1,15,20>": "" + }, + "<1,16>": { + "<1,16,1>": "ITEM", + "<1,16,2>": "", + "<1,16,3>": "FILE.EXIT", + "<1,16,4>": "E&xit\tAlt+F4", + "<1,16,5>": "0", + "<1,16,6>": "0", + "<1,16,7>": "0", + "<1,16,8>": "1139", + "<1,16,9>": "Close this MDI form and all child forms", + "<1,16,10>": "", + "<1,16,11>": "0", + "<1,16,12>": "", + "<1,16,13>": "", + "<1,16,14>": "12", + "<1,16,15>": "", + "<1,16,16>": "", + "<1,16,17>": "", + "<1,16,18>": "", + "<1,16,19>": "", + "<1,16,20>": "" + }, + "<1,17>": { + "<1,17,1>": "POPUP", + "<1,17,2>": "7", + "<1,17,3>": "EDIT", + "<1,17,4>": "&Edit", + "<1,17,5>": "0", + "<1,17,6>": "0", + "<1,17,7>": "0", + "<1,17,8>": "0", + "<1,17,9>": "", + "<1,17,10>": "", + "<1,17,11>": "0", + "<1,17,12>": "", + "<1,17,13>": "", + "<1,17,14>": "", + "<1,17,15>": "", + "<1,17,16>": "", + "<1,17,17>": "", + "<1,17,18>": "", + "<1,17,19>": "", + "<1,17,20>": "" + }, + "<1,18>": { + "<1,18,1>": "ITEM", + "<1,18,2>": "", + "<1,18,3>": "EDIT.UNDO", + "<1,18,4>": "&Undo\tCtrl+Z", + "<1,18,5>": "0", + "<1,18,6>": "0", + "<1,18,7>": "0", + "<1,18,8>": "602", + "<1,18,9>": "Undo the last editing action", + "<1,18,10>": "", + "<1,18,11>": "0", + "<1,18,12>": "", + "<1,18,13>": "", + "<1,18,14>": "13", + "<1,18,15>": "", + "<1,18,16>": "", + "<1,18,17>": "", + "<1,18,18>": "", + "<1,18,19>": "", + "<1,18,20>": "" + }, + "<1,19>": { + "<1,19,1>": "SEPARATOR", + "<1,19,2>": "", + "<1,19,3>": "EDIT.SEP112", + "<1,19,4>": "SEP112", + "<1,19,5>": "0", + "<1,19,6>": "0", + "<1,19,7>": "0", + "<1,19,8>": "0", + "<1,19,9>": "", + "<1,19,10>": "", + "<1,19,11>": "0", + "<1,19,12>": "", + "<1,19,13>": "", + "<1,19,14>": "", + "<1,19,15>": "", + "<1,19,16>": "", + "<1,19,17>": "", + "<1,19,18>": "", + "<1,19,19>": "", + "<1,19,20>": "" + }, + "<1,20>": { + "<1,20,1>": "ITEM", + "<1,20,2>": "", + "<1,20,3>": "EDIT.CUT", + "<1,20,4>": "&Cut\tCtrl+X", + "<1,20,5>": "0", + "<1,20,6>": "0", + "<1,20,7>": "0", + "<1,20,8>": "600", + "<1,20,9>": "Delete the selected contents of the current control and copy them to the Clipboard", + "<1,20,10>": "", + "<1,20,11>": "0", + "<1,20,12>": "", + "<1,20,13>": "", + "<1,20,14>": "15", + "<1,20,15>": "", + "<1,20,16>": "", + "<1,20,17>": "", + "<1,20,18>": "", + "<1,20,19>": "", + "<1,20,20>": "" + }, + "<1,21>": { + "<1,21,1>": "ITEM", + "<1,21,2>": "", + "<1,21,3>": "EDIT.COPY", + "<1,21,4>": "C&opy\tCtrl+C", + "<1,21,5>": "0", + "<1,21,6>": "0", + "<1,21,7>": "0", + "<1,21,8>": "579", + "<1,21,9>": "Copy the selected contents of the current control to the Clipboard", + "<1,21,10>": "", + "<1,21,11>": "0", + "<1,21,12>": "", + "<1,21,13>": "", + "<1,21,14>": "16", + "<1,21,15>": "", + "<1,21,16>": "", + "<1,21,17>": "", + "<1,21,18>": "", + "<1,21,19>": "", + "<1,21,20>": "" + }, + "<1,22>": { + "<1,22,1>": "ITEM", + "<1,22,2>": "", + "<1,22,3>": "EDIT.PASTE", + "<1,22,4>": "&Paste\tCtrl+V", + "<1,22,5>": "0", + "<1,22,6>": "0", + "<1,22,7>": "0", + "<1,22,8>": "598", + "<1,22,9>": "Paste the contents of the clipboad into the current control", + "<1,22,10>": "", + "<1,22,11>": "0", + "<1,22,12>": "", + "<1,22,13>": "", + "<1,22,14>": "17", + "<1,22,15>": "", + "<1,22,16>": "", + "<1,22,17>": "", + "<1,22,18>": "", + "<1,22,19>": "", + "<1,22,20>": "" + }, + "<1,23>": { + "<1,23,1>": "SEPARATOR", + "<1,23,2>": "", + "<1,23,3>": "EDIT.SEP111", + "<1,23,4>": "SEP111", + "<1,23,5>": "0", + "<1,23,6>": "0", + "<1,23,7>": "0", + "<1,23,8>": "0", + "<1,23,9>": "", + "<1,23,10>": "", + "<1,23,11>": "0", + "<1,23,12>": "", + "<1,23,13>": "", + "<1,23,14>": "", + "<1,23,15>": "", + "<1,23,16>": "", + "<1,23,17>": "", + "<1,23,18>": "", + "<1,23,19>": "", + "<1,23,20>": "" + }, + "<1,24>": { + "<1,24,1>": "ITEM", + "<1,24,2>": "", + "<1,24,3>": "EDIT.SELECT_ALL", + "<1,24,4>": "&Select All\tCtrl+A", + "<1,24,5>": "0", + "<1,24,6>": "0", + "<1,24,7>": "0", + "<1,24,8>": "577", + "<1,24,9>": "Select all the contents in the current control", + "<1,24,10>": "", + "<1,24,11>": "0", + "<1,24,12>": "", + "<1,24,13>": "", + "<1,24,14>": "18", + "<1,24,15>": "", + "<1,24,16>": "", + "<1,24,17>": "", + "<1,24,18>": "", + "<1,24,19>": "", + "<1,24,20>": "" + }, + "<1,25>": { + "<1,25,1>": "POPUP", + "<1,25,2>": "17", + "<1,25,3>": "QBF", + "<1,25,4>": "&QBF", + "<1,25,5>": "0", + "<1,25,6>": "0", + "<1,25,7>": "0", + "<1,25,8>": "0", + "<1,25,9>": "", + "<1,25,10>": "", + "<1,25,11>": "0", + "<1,25,12>": "", + "<1,25,13>": "", + "<1,25,14>": "", + "<1,25,15>": "", + "<1,25,16>": "", + "<1,25,17>": "", + "<1,25,18>": "", + "<1,25,19>": "", + "<1,25,20>": "" + }, + "<1,26>": { + "<1,26,1>": "ITEM", + "<1,26,2>": "", + "<1,26,3>": "QBF.INITIALIZE", + "<1,26,4>": "&Initialize\tF7", + "<1,26,5>": "0", + "<1,26,6>": "0", + "<1,26,7>": "0", + "<1,26,8>": "118", + "<1,26,9>": "Begin a QBF session for the actve child form", + "<1,26,10>": "", + "<1,26,11>": "0", + "<1,26,12>": "", + "<1,26,13>": "", + "<1,26,14>": "19", + "<1,26,15>": "", + "<1,26,16>": "", + "<1,26,17>": "", + "<1,26,18>": "", + "<1,26,19>": "", + "<1,26,20>": "" + }, + "<1,27>": { + "<1,27,1>": "SEPARATOR", + "<1,27,2>": "", + "<1,27,3>": "QBF.SEP109", + "<1,27,4>": "SEP109", + "<1,27,5>": "0", + "<1,27,6>": "0", + "<1,27,7>": "0", + "<1,27,8>": "0", + "<1,27,9>": "", + "<1,27,10>": "", + "<1,27,11>": "0", + "<1,27,12>": "", + "<1,27,13>": "", + "<1,27,14>": "", + "<1,27,15>": "", + "<1,27,16>": "", + "<1,27,17>": "", + "<1,27,18>": "", + "<1,27,19>": "", + "<1,27,20>": "" + }, + "<1,28>": { + "<1,28,1>": "ITEM", + "<1,28,2>": "", + "<1,28,3>": "QBF.EXECUTE", + "<1,28,4>": "&Execute\tF6", + "<1,28,5>": "0", + "<1,28,6>": "0", + "<1,28,7>": "0", + "<1,28,8>": "117", + "<1,28,9>": "Execute the QBF query to produce the result list for the active child form", + "<1,28,10>": "", + "<1,28,11>": "0", + "<1,28,12>": "", + "<1,28,13>": "", + "<1,28,14>": "20", + "<1,28,15>": "", + "<1,28,16>": "", + "<1,28,17>": "", + "<1,28,18>": "", + "<1,28,19>": "", + "<1,28,20>": "" + }, + "<1,29>": { + "<1,29,1>": "SEPARATOR", + "<1,29,2>": "", + "<1,29,3>": "QBF.SEP102", + "<1,29,4>": "SEP102", + "<1,29,5>": "0", + "<1,29,6>": "0", + "<1,29,7>": "0", + "<1,29,8>": "0", + "<1,29,9>": "", + "<1,29,10>": "", + "<1,29,11>": "0", + "<1,29,12>": "", + "<1,29,13>": "", + "<1,29,14>": "", + "<1,29,15>": "", + "<1,29,16>": "", + "<1,29,17>": "", + "<1,29,18>": "", + "<1,29,19>": "", + "<1,29,20>": "" + }, + "<1,30>": { + "<1,30,1>": "ITEM", + "<1,30,2>": "", + "<1,30,3>": "QBF.FIRST", + "<1,30,4>": "&First\tShift+F11", + "<1,30,5>": "0", + "<1,30,6>": "0", + "<1,30,7>": "0", + "<1,30,8>": "378", + "<1,30,9>": "Display the first item in the QBF result list for the acitve child form", + "<1,30,10>": "", + "<1,30,11>": "0", + "<1,30,12>": "", + "<1,30,13>": "", + "<1,30,14>": "23", + "<1,30,15>": "", + "<1,30,16>": "", + "<1,30,17>": "", + "<1,30,18>": "", + "<1,30,19>": "", + "<1,30,20>": "" + }, + "<1,31>": { + "<1,31,1>": "ITEM", + "<1,31,2>": "", + "<1,31,3>": "QBF.PREVIOUS", + "<1,31,4>": "&Previous\tF11", + "<1,31,5>": "0", + "<1,31,6>": "0", + "<1,31,7>": "0", + "<1,31,8>": "122", + "<1,31,9>": "Display the previous item in the QBF result list for the active child form", + "<1,31,10>": "", + "<1,31,11>": "0", + "<1,31,12>": "", + "<1,31,13>": "", + "<1,31,14>": "24", + "<1,31,15>": "", + "<1,31,16>": "", + "<1,31,17>": "", + "<1,31,18>": "", + "<1,31,19>": "", + "<1,31,20>": "" + }, + "<1,32>": { + "<1,32,1>": "ITEM", + "<1,32,2>": "", + "<1,32,3>": "QBF.NEXT", + "<1,32,4>": "&Next\tF12", + "<1,32,5>": "0", + "<1,32,6>": "0", + "<1,32,7>": "0", + "<1,32,8>": "123", + "<1,32,9>": "Display the next item in the QBF result list for the active child form", + "<1,32,10>": "", + "<1,32,11>": "0", + "<1,32,12>": "", + "<1,32,13>": "", + "<1,32,14>": "25", + "<1,32,15>": "", + "<1,32,16>": "", + "<1,32,17>": "", + "<1,32,18>": "", + "<1,32,19>": "", + "<1,32,20>": "" + }, + "<1,33>": { + "<1,33,1>": "ITEM", + "<1,33,2>": "", + "<1,33,3>": "QBF.LAST", + "<1,33,4>": "&Last\tShift+F12", + "<1,33,5>": "0", + "<1,33,6>": "0", + "<1,33,7>": "0", + "<1,33,8>": "379", + "<1,33,9>": "Display the last item in the QBF result list for the active child form", + "<1,33,10>": "", + "<1,33,11>": "0", + "<1,33,12>": "", + "<1,33,13>": "", + "<1,33,14>": "26", + "<1,33,15>": "", + "<1,33,16>": "", + "<1,33,17>": "", + "<1,33,18>": "", + "<1,33,19>": "", + "<1,33,20>": "" + }, + "<1,34>": { + "<1,34,1>": "SEPARATOR", + "<1,34,2>": "", + "<1,34,3>": "QBF.SEP108", + "<1,34,4>": "SEP108", + "<1,34,5>": "0", + "<1,34,6>": "0", + "<1,34,7>": "0", + "<1,34,8>": "0", + "<1,34,9>": "", + "<1,34,10>": "", + "<1,34,11>": "0", + "<1,34,12>": "", + "<1,34,13>": "", + "<1,34,14>": "", + "<1,34,15>": "", + "<1,34,16>": "", + "<1,34,17>": "", + "<1,34,18>": "", + "<1,34,19>": "", + "<1,34,20>": "" + }, + "<1,35>": { + "<1,35,1>": "ITEM", + "<1,35,2>": "", + "<1,35,3>": "QBF.ABSOLUTE", + "<1,35,4>": "&Goto Position...\tCtrl+F12", + "<1,35,5>": "0", + "<1,35,6>": "0", + "<1,35,7>": "0", + "<1,35,8>": "635", + "<1,35,9>": "Display an item in the active child form's QBF result list by specifying the position", + "<1,35,10>": "", + "<1,35,11>": "0", + "<1,35,12>": "", + "<1,35,13>": "", + "<1,35,14>": "27", + "<1,35,15>": "", + "<1,35,16>": "", + "<1,35,17>": "", + "<1,35,18>": "", + "<1,35,19>": "", + "<1,35,20>": "" + }, + "<1,36>": { + "<1,36,1>": "ITEM", + "<1,36,2>": "", + "<1,36,3>": "QBF.GOTO_ID", + "<1,36,4>": "Goto &ID...\tAlt+F12", + "<1,36,5>": "0", + "<1,36,6>": "0", + "<1,36,7>": "0", + "<1,36,8>": "1147", + "<1,36,9>": "Display an item in the active child form's QBF result list by specifying its ID", + "<1,36,10>": "", + "<1,36,11>": "0", + "<1,36,12>": "", + "<1,36,13>": "", + "<1,36,14>": "35", + "<1,36,15>": "", + "<1,36,16>": "", + "<1,36,17>": "", + "<1,36,18>": "", + "<1,36,19>": "", + "<1,36,20>": "" + }, + "<1,37>": { + "<1,37,1>": "ITEM", + "<1,37,2>": "", + "<1,37,3>": "QBF.TABLE", + "<1,37,4>": "Show Resul&t List...\tAlt+F11", + "<1,37,5>": "0", + "<1,37,6>": "0", + "<1,37,7>": "0", + "<1,37,8>": "1146", + "<1,37,9>": "Display the active child form's QBF result list in tabular format", + "<1,37,10>": "", + "<1,37,11>": "0", + "<1,37,12>": "", + "<1,37,13>": "", + "<1,37,14>": "28", + "<1,37,15>": "", + "<1,37,16>": "", + "<1,37,17>": "", + "<1,37,18>": "", + "<1,37,19>": "", + "<1,37,20>": "" + }, + "<1,38>": { + "<1,38,1>": "SEPARATOR", + "<1,38,2>": "", + "<1,38,3>": "QBF.SEP110", + "<1,38,4>": "SEP110", + "<1,38,5>": "0", + "<1,38,6>": "0", + "<1,38,7>": "0", + "<1,38,8>": "0", + "<1,38,9>": "", + "<1,38,10>": "", + "<1,38,11>": "0", + "<1,38,12>": "", + "<1,38,13>": "", + "<1,38,14>": "", + "<1,38,15>": "", + "<1,38,16>": "", + "<1,38,17>": "", + "<1,38,18>": "", + "<1,38,19>": "", + "<1,38,20>": "" + }, + "<1,39>": { + "<1,39,1>": "ITEM", + "<1,39,2>": "", + "<1,39,3>": "QBF.LOADLIST", + "<1,39,4>": "Load from &Saved List...\tCtrl+F7", + "<1,39,5>": "0", + "<1,39,6>": "0", + "<1,39,7>": "0", + "<1,39,8>": "630", + "<1,39,9>": "Load a QBF result list ino the active child form from a previously saved list of keys", + "<1,39,10>": "", + "<1,39,11>": "0", + "<1,39,12>": "", + "<1,39,13>": "", + "<1,39,14>": "21", + "<1,39,15>": "", + "<1,39,16>": "", + "<1,39,17>": "", + "<1,39,18>": "", + "<1,39,19>": "", + "<1,39,20>": "" + }, + "<1,40>": { + "<1,40,1>": "ITEM", + "<1,40,2>": "", + "<1,40,3>": "QBF.GETQUERY", + "<1,40,4>": "Load from &Query Statement...\tAlt+F7", + "<1,40,5>": "0", + "<1,40,6>": "0", + "<1,40,7>": "0", + "<1,40,8>": "1142", + "<1,40,9>": "Load a QBF result list into the actiev child form from an RLIST select statement", + "<1,40,10>": "", + "<1,40,11>": "0", + "<1,40,12>": "", + "<1,40,13>": "", + "<1,40,14>": "22", + "<1,40,15>": "", + "<1,40,16>": "", + "<1,40,17>": "", + "<1,40,18>": "", + "<1,40,19>": "", + "<1,40,20>": "" + }, + "<1,41>": { + "<1,41,1>": "SEPARATOR", + "<1,41,2>": "", + "<1,41,3>": "QBF.SEP109_2", + "<1,41,4>": "SEP109", + "<1,41,5>": "0", + "<1,41,6>": "0", + "<1,41,7>": "0", + "<1,41,8>": "0", + "<1,41,9>": "", + "<1,41,10>": "", + "<1,41,11>": "0", + "<1,41,12>": "", + "<1,41,13>": "", + "<1,41,14>": "", + "<1,41,15>": "", + "<1,41,16>": "", + "<1,41,17>": "", + "<1,41,18>": "", + "<1,41,19>": "", + "<1,41,20>": "" + }, + "<1,42>": { + "<1,42,1>": "ITEM", + "<1,42,2>": "", + "<1,42,3>": "QBF.CLOSE", + "<1,42,4>": "&Close", + "<1,42,5>": "0", + "<1,42,6>": "0", + "<1,42,7>": "0", + "<1,42,8>": "0", + "<1,42,9>": "Closes the QBF session for the active child form", + "<1,42,10>": "", + "<1,42,11>": "0", + "<1,42,12>": "", + "<1,42,13>": "", + "<1,42,14>": "29", + "<1,42,15>": "", + "<1,42,16>": "", + "<1,42,17>": "", + "<1,42,18>": "", + "<1,42,19>": "", + "<1,42,20>": "" + }, + "<1,43>": { + "<1,43,1>": "POPUP", + "<1,43,2>": "2", + "<1,43,3>": "WINDOW", + "<1,43,4>": "&Window", + "<1,43,5>": "0", + "<1,43,6>": "0", + "<1,43,7>": "0", + "<1,43,8>": "0", + "<1,43,9>": "MDI Child Window Functions", + "<1,43,10>": "", + "<1,43,11>": "0", + "<1,43,12>": "", + "<1,43,13>": "", + "<1,43,14>": "", + "<1,43,15>": "", + "<1,43,16>": "", + "<1,43,17>": "", + "<1,43,18>": "", + "<1,43,19>": "", + "<1,43,20>": "" + }, + "<1,44>": { + "<1,44,1>": "ITEM", + "<1,44,2>": "", + "<1,44,3>": "WINDOW.TILE", + "<1,44,4>": "&Tile", + "<1,44,5>": "0", + "<1,44,6>": "0", + "<1,44,7>": "0", + "<1,44,8>": "0", + "<1,44,9>": "Tile the child forms", + "<1,44,10>": "", + "<1,44,11>": "0", + "<1,44,12>": "", + "<1,44,13>": "", + "<1,44,14>": "31", + "<1,44,15>": "", + "<1,44,16>": "", + "<1,44,17>": "", + "<1,44,18>": "", + "<1,44,19>": "", + "<1,44,20>": "" + }, + "<1,45>": { + "<1,45,1>": "ITEM", + "<1,45,2>": "", + "<1,45,3>": "WINDOW.CASCADE", + "<1,45,4>": "&Cascade", + "<1,45,5>": "0", + "<1,45,6>": "0", + "<1,45,7>": "0", + "<1,45,8>": "0", + "<1,45,9>": "Cascade the child forms", + "<1,45,10>": "", + "<1,45,11>": "0", + "<1,45,12>": "", + "<1,45,13>": "", + "<1,45,14>": "30", + "<1,45,15>": "", + "<1,45,16>": "", + "<1,45,17>": "", + "<1,45,18>": "", + "<1,45,19>": "", + "<1,45,20>": "" + }, + "<1,46>": { + "<1,46,1>": "POPUP", + "<1,46,2>": "5", + "<1,46,3>": "HELP", + "<1,46,4>": "&Help", + "<1,46,5>": "0", + "<1,46,6>": "0", + "<1,46,7>": "0", + "<1,46,8>": "0", + "<1,46,9>": "", + "<1,46,10>": "", + "<1,46,11>": "0", + "<1,46,12>": "", + "<1,46,13>": "", + "<1,46,14>": "", + "<1,46,15>": "", + "<1,46,16>": "", + "<1,46,17>": "", + "<1,46,18>": "", + "<1,46,19>": "", + "<1,46,20>": "" + }, + "<1,47>": { + "<1,47,1>": "ITEM", + "<1,47,2>": "", + "<1,47,3>": "EDIT.OPTIONS", + "<1,47,4>": "&Options\tF4", + "<1,47,5>": "0", + "<1,47,6>": "0", + "<1,47,7>": "0", + "<1,47,8>": "115", + "<1,47,9>": "Display options for the current control", + "<1,47,10>": "", + "<1,47,11>": "0", + "<1,47,12>": "", + "<1,47,13>": "", + "<1,47,14>": "32", + "<1,47,15>": "", + "<1,47,16>": "", + "<1,47,17>": "", + "<1,47,18>": "", + "<1,47,19>": "", + "<1,47,20>": "" + }, + "<1,48>": { + "<1,48,1>": "SEPARATOR", + "<1,48,2>": "", + "<1,48,3>": "HELP.SEP110", + "<1,48,4>": "SEP110", + "<1,48,5>": "0", + "<1,48,6>": "0", + "<1,48,7>": "0", + "<1,48,8>": "0", + "<1,48,9>": "", + "<1,48,10>": "", + "<1,48,11>": "0", + "<1,48,12>": "", + "<1,48,13>": "", + "<1,48,14>": "", + "<1,48,15>": "", + "<1,48,16>": "", + "<1,48,17>": "", + "<1,48,18>": "", + "<1,48,19>": "", + "<1,48,20>": "" + }, + "<1,49>": { + "<1,49,1>": "ITEM", + "<1,49,2>": "", + "<1,49,3>": "HELP.HELP", + "<1,49,4>": "&Help\tF1", + "<1,49,5>": "0", + "<1,49,6>": "0", + "<1,49,7>": "0", + "<1,49,8>": "112", + "<1,49,9>": "Display help for the current control", + "<1,49,10>": "", + "<1,49,11>": "0", + "<1,49,12>": "", + "<1,49,13>": "", + "<1,49,14>": "33", + "<1,49,15>": "", + "<1,49,16>": "", + "<1,49,17>": "", + "<1,49,18>": "", + "<1,49,19>": "", + "<1,49,20>": "" + }, + "<1,50>": { + "<1,50,1>": "SEPARATOR", + "<1,50,2>": "", + "<1,50,3>": "HELP.SEP105", + "<1,50,4>": "SEP105", + "<1,50,5>": "0", + "<1,50,6>": "0", + "<1,50,7>": "0", + "<1,50,8>": "0", + "<1,50,9>": "", + "<1,50,10>": "", + "<1,50,11>": "0", + "<1,50,12>": "", + "<1,50,13>": "", + "<1,50,14>": "", + "<1,50,15>": "", + "<1,50,16>": "", + "<1,50,17>": "", + "<1,50,18>": "", + "<1,50,19>": "", + "<1,50,20>": "" + }, + "<1,51>": { + "<1,51,1>": "ITEM", + "<1,51,2>": "", + "<1,51,3>": "HELP.QUICKHELP", + "<1,51,4>": "&QuickHelp\tCtrl+F1", + "<1,51,5>": "0", + "<1,51,6>": "0", + "<1,51,7>": "0", + "<1,51,8>": "624", + "<1,51,9>": "Display QuickHelp for the current control", + "<1,51,10>": "", + "<1,51,11>": "0", + "<1,51,12>": "", + "<1,51,13>": "", + "<1,51,14>": "34", + "<1,51,15>": "", + "<1,51,16>": "", + "<1,51,17>": "", + "<1,51,18>": "", + "<1,51,19>": "", + "<1,51,20>": "" + } + }, + "<2>": { + "<2,1>": "", + "<2,2>": { + "<2,2,1>": { + "<2,2,1,1>": "E", + "<2,2,1,2>": "READ", + "<2,2,1,3>": "@MDIACTIVE", + "<2,2,1,4>": "", + "<2,2,1,5>": "", + "<2,2,1,6>": "", + "<2,2,1,7>": "", + "<2,2,1,8>": "", + "<2,2,1,9>": "", + "<2,2,1,10>": "", + "<2,2,1,11>": "", + "<2,2,1,12>": "", + "<2,2,1,13>": "", + "<2,2,1,14>": "", + "<2,2,1,15>": "GEN", + "<2,2,1,16>": "0" + }, + "<2,2,2>": { + "<2,2,2,1>": "M", + "<2,2,2,2>": "WRITEROW", + "<2,2,2,3>": "@MDIACTIVE", + "<2,2,2,4>": "", + "<2,2,2,5>": "", + "<2,2,2,6>": "", + "<2,2,2,7>": "", + "<2,2,2,8>": "", + "<2,2,2,9>": "", + "<2,2,2,10>": "", + "<2,2,2,11>": "", + "<2,2,2,12>": "", + "<2,2,2,13>": "", + "<2,2,2,14>": "", + "<2,2,2,15>": "GEN", + "<2,2,2,16>": "0" + }, + "<2,2,3>": { + "<2,2,3,1>": "M", + "<2,2,3,2>": "WRITEROW", + "<2,2,3,3>": "@MDIACTIVE", + "<2,2,3,4>": "", + "<2,2,3,5>": "", + "<2,2,3,6>": "", + "<2,2,3,7>": "", + "<2,2,3,8>": "", + "<2,2,3,9>": "", + "<2,2,3,10>": "", + "<2,2,3,11>": "", + "<2,2,3,12>": "", + "<2,2,3,13>": "", + "<2,2,3,14>": "", + "<2,2,3,15>": "GEN", + "<2,2,3,16>": "0" + }, + "<2,2,4>": { + "<2,2,4,1>": "M", + "<2,2,4,2>": "CLEARROW", + "<2,2,4,3>": "@MDIACTIVE", + "<2,2,4,4>": "", + "<2,2,4,5>": "", + "<2,2,4,6>": "", + "<2,2,4,7>": "", + "<2,2,4,8>": "", + "<2,2,4,9>": "", + "<2,2,4,10>": "", + "<2,2,4,11>": "", + "<2,2,4,12>": "", + "<2,2,4,13>": "", + "<2,2,4,14>": "", + "<2,2,4,15>": "GEN", + "<2,2,4,16>": "0" + }, + "<2,2,5>": { + "<2,2,5,1>": "M", + "<2,2,5,2>": "DELETEROW", + "<2,2,5,3>": "@MDIACTIVE", + "<2,2,5,4>": "", + "<2,2,5,5>": "", + "<2,2,5,6>": "", + "<2,2,5,7>": "", + "<2,2,5,8>": "", + "<2,2,5,9>": "", + "<2,2,5,10>": "", + "<2,2,5,11>": "", + "<2,2,5,12>": "", + "<2,2,5,13>": "", + "<2,2,5,14>": "", + "<2,2,5,15>": "GEN", + "<2,2,5,16>": "0" + }, + "<2,2,6>": { + "<2,2,6,1>": "M", + "<2,2,6,2>": "CLOSE", + "<2,2,6,3>": "@MDIACTIVE", + "<2,2,6,4>": "", + "<2,2,6,5>": "", + "<2,2,6,6>": "", + "<2,2,6,7>": "", + "<2,2,6,8>": "", + "<2,2,6,9>": "", + "<2,2,6,10>": "", + "<2,2,6,11>": "", + "<2,2,6,12>": "", + "<2,2,6,13>": "", + "<2,2,6,14>": "", + "<2,2,6,15>": "GEN", + "<2,2,6,16>": "0" + }, + "<2,2,7>": { + "<2,2,7,1>": "M", + "<2,2,7,2>": "CLOSE", + "<2,2,7,3>": "@WINDOW", + "<2,2,7,4>": "", + "<2,2,7,5>": "", + "<2,2,7,6>": "", + "<2,2,7,7>": "", + "<2,2,7,8>": "", + "<2,2,7,9>": "", + "<2,2,7,10>": "", + "<2,2,7,11>": "", + "<2,2,7,12>": "", + "<2,2,7,13>": "", + "<2,2,7,14>": "", + "<2,2,7,15>": "GEN", + "<2,2,7,16>": "0" + }, + "<2,2,8>": { + "<2,2,8,1>": "M", + "<2,2,8,2>": "UNDO", + "<2,2,8,3>": "@FOCUS", + "<2,2,8,4>": "", + "<2,2,8,5>": "", + "<2,2,8,6>": "", + "<2,2,8,7>": "", + "<2,2,8,8>": "", + "<2,2,8,9>": "", + "<2,2,8,10>": "", + "<2,2,8,11>": "", + "<2,2,8,12>": "", + "<2,2,8,13>": "", + "<2,2,8,14>": "", + "<2,2,8,15>": "GEN", + "<2,2,8,16>": "0" + }, + "<2,2,9>": { + "<2,2,9,1>": "M", + "<2,2,9,2>": "CUT", + "<2,2,9,3>": "@FOCUS", + "<2,2,9,4>": "", + "<2,2,9,5>": "", + "<2,2,9,6>": "", + "<2,2,9,7>": "", + "<2,2,9,8>": "", + "<2,2,9,9>": "", + "<2,2,9,10>": "", + "<2,2,9,11>": "", + "<2,2,9,12>": "", + "<2,2,9,13>": "", + "<2,2,9,14>": "", + "<2,2,9,15>": "GEN", + "<2,2,9,16>": "0" + }, + "<2,2,10>": { + "<2,2,10,1>": "M", + "<2,2,10,2>": "COPY", + "<2,2,10,3>": "@FOCUS", + "<2,2,10,4>": "", + "<2,2,10,5>": "", + "<2,2,10,6>": "", + "<2,2,10,7>": "", + "<2,2,10,8>": "", + "<2,2,10,9>": "", + "<2,2,10,10>": "", + "<2,2,10,11>": "", + "<2,2,10,12>": "", + "<2,2,10,13>": "", + "<2,2,10,14>": "", + "<2,2,10,15>": "GEN", + "<2,2,10,16>": "0" + }, + "<2,2,11>": { + "<2,2,11,1>": "M", + "<2,2,11,2>": "PASTE", + "<2,2,11,3>": "@FOCUS", + "<2,2,11,4>": "", + "<2,2,11,5>": "", + "<2,2,11,6>": "", + "<2,2,11,7>": "", + "<2,2,11,8>": "", + "<2,2,11,9>": "", + "<2,2,11,10>": "", + "<2,2,11,11>": "", + "<2,2,11,12>": "", + "<2,2,11,13>": "", + "<2,2,11,14>": "", + "<2,2,11,15>": "GEN", + "<2,2,11,16>": "0" + }, + "<2,2,12>": { + "<2,2,12,1>": "M", + "<2,2,12,2>": "SELECTALL", + "<2,2,12,3>": "@FOCUS", + "<2,2,12,4>": "", + "<2,2,12,5>": "", + "<2,2,12,6>": "", + "<2,2,12,7>": "", + "<2,2,12,8>": "", + "<2,2,12,9>": "", + "<2,2,12,10>": "", + "<2,2,12,11>": "", + "<2,2,12,12>": "", + "<2,2,12,13>": "", + "<2,2,12,14>": "", + "<2,2,12,15>": "GEN", + "<2,2,12,16>": "0" + }, + "<2,2,13>": { + "<2,2,13,1>": "M", + "<2,2,13,2>": "QBFINITSESSION", + "<2,2,13,3>": "@MDIACTIVE", + "<2,2,13,4>": "", + "<2,2,13,5>": "", + "<2,2,13,6>": "", + "<2,2,13,7>": "", + "<2,2,13,8>": "", + "<2,2,13,9>": "", + "<2,2,13,10>": "", + "<2,2,13,11>": "", + "<2,2,13,12>": "", + "<2,2,13,13>": "", + "<2,2,13,14>": "", + "<2,2,13,15>": "GEN", + "<2,2,13,16>": "0" + }, + "<2,2,14>": { + "<2,2,14,1>": "M", + "<2,2,14,2>": "QBFRUNQUERY", + "<2,2,14,3>": "@MDIACTIVE", + "<2,2,14,4>": "", + "<2,2,14,5>": "", + "<2,2,14,6>": "", + "<2,2,14,7>": "", + "<2,2,14,8>": "", + "<2,2,14,9>": "", + "<2,2,14,10>": "", + "<2,2,14,11>": "", + "<2,2,14,12>": "", + "<2,2,14,13>": "", + "<2,2,14,14>": "", + "<2,2,14,15>": "GEN", + "<2,2,14,16>": "0" + }, + "<2,2,15>": { + "<2,2,15,1>": "M", + "<2,2,15,2>": "QBFSHOWFIRST", + "<2,2,15,3>": "@MDIACTIVE", + "<2,2,15,4>": "", + "<2,2,15,5>": "", + "<2,2,15,6>": "", + "<2,2,15,7>": "", + "<2,2,15,8>": "", + "<2,2,15,9>": "", + "<2,2,15,10>": "", + "<2,2,15,11>": "", + "<2,2,15,12>": "", + "<2,2,15,13>": "", + "<2,2,15,14>": "", + "<2,2,15,15>": "GEN", + "<2,2,15,16>": "0" + }, + "<2,2,16>": { + "<2,2,16,1>": "M", + "<2,2,16,2>": "QBFSHOWPREV", + "<2,2,16,3>": "@MDIACTIVE", + "<2,2,16,4>": "", + "<2,2,16,5>": "", + "<2,2,16,6>": "", + "<2,2,16,7>": "", + "<2,2,16,8>": "", + "<2,2,16,9>": "", + "<2,2,16,10>": "", + "<2,2,16,11>": "", + "<2,2,16,12>": "", + "<2,2,16,13>": "", + "<2,2,16,14>": "", + "<2,2,16,15>": "GEN", + "<2,2,16,16>": "0" + }, + "<2,2,17>": { + "<2,2,17,1>": "M", + "<2,2,17,2>": "QBFSHOWNEXT", + "<2,2,17,3>": "@MDIACTIVE", + "<2,2,17,4>": "", + "<2,2,17,5>": "", + "<2,2,17,6>": "", + "<2,2,17,7>": "", + "<2,2,17,8>": "", + "<2,2,17,9>": "", + "<2,2,17,10>": "", + "<2,2,17,11>": "", + "<2,2,17,12>": "", + "<2,2,17,13>": "", + "<2,2,17,14>": "", + "<2,2,17,15>": "GEN", + "<2,2,17,16>": "0" + }, + "<2,2,18>": { + "<2,2,18,1>": "M", + "<2,2,18,2>": "QBFSHOWLAST", + "<2,2,18,3>": "@MDIACTIVE", + "<2,2,18,4>": "", + "<2,2,18,5>": "", + "<2,2,18,6>": "", + "<2,2,18,7>": "", + "<2,2,18,8>": "", + "<2,2,18,9>": "", + "<2,2,18,10>": "", + "<2,2,18,11>": "", + "<2,2,18,12>": "", + "<2,2,18,13>": "", + "<2,2,18,14>": "", + "<2,2,18,15>": "GEN", + "<2,2,18,16>": "0" + }, + "<2,2,19>": { + "<2,2,19,1>": "M", + "<2,2,19,2>": "QBFGOTO", + "<2,2,19,3>": "@MDIACTIVE", + "<2,2,19,4>": "", + "<2,2,19,5>": "", + "<2,2,19,6>": "", + "<2,2,19,7>": "", + "<2,2,19,8>": "", + "<2,2,19,9>": "", + "<2,2,19,10>": "", + "<2,2,19,11>": "", + "<2,2,19,12>": "", + "<2,2,19,13>": "", + "<2,2,19,14>": "", + "<2,2,19,15>": "GEN", + "<2,2,19,16>": "0" + }, + "<2,2,20>": { + "<2,2,20,1>": "M", + "<2,2,20,2>": "QBFGOTOID", + "<2,2,20,3>": "@MDIACTIVE", + "<2,2,20,4>": "", + "<2,2,20,5>": "", + "<2,2,20,6>": "", + "<2,2,20,7>": "", + "<2,2,20,8>": "", + "<2,2,20,9>": "", + "<2,2,20,10>": "", + "<2,2,20,11>": "", + "<2,2,20,12>": "", + "<2,2,20,13>": "", + "<2,2,20,14>": "", + "<2,2,20,15>": "GEN", + "<2,2,20,16>": "0" + }, + "<2,2,21>": { + "<2,2,21,1>": "M", + "<2,2,21,2>": "QBFSHOWTABLE", + "<2,2,21,3>": "@MDIACTIVE", + "<2,2,21,4>": "", + "<2,2,21,5>": "", + "<2,2,21,6>": "", + "<2,2,21,7>": "", + "<2,2,21,8>": "", + "<2,2,21,9>": "", + "<2,2,21,10>": "", + "<2,2,21,11>": "", + "<2,2,21,12>": "", + "<2,2,21,13>": "", + "<2,2,21,14>": "", + "<2,2,21,15>": "GEN", + "<2,2,21,16>": "0" + }, + "<2,2,22>": { + "<2,2,22,1>": "M", + "<2,2,22,2>": "QBFLOADSAVEDLIST", + "<2,2,22,3>": "@MDIACTIVE", + "<2,2,22,4>": "", + "<2,2,22,5>": "", + "<2,2,22,6>": "", + "<2,2,22,7>": "", + "<2,2,22,8>": "", + "<2,2,22,9>": "", + "<2,2,22,10>": "", + "<2,2,22,11>": "", + "<2,2,22,12>": "", + "<2,2,22,13>": "", + "<2,2,22,14>": "", + "<2,2,22,15>": "GEN", + "<2,2,22,16>": "0" + }, + "<2,2,23>": { + "<2,2,23,1>": "M", + "<2,2,23,2>": "QBFASKQUERY", + "<2,2,23,3>": "@MDIACTIVE", + "<2,2,23,4>": "", + "<2,2,23,5>": "", + "<2,2,23,6>": "", + "<2,2,23,7>": "", + "<2,2,23,8>": "", + "<2,2,23,9>": "", + "<2,2,23,10>": "", + "<2,2,23,11>": "", + "<2,2,23,12>": "", + "<2,2,23,13>": "", + "<2,2,23,14>": "", + "<2,2,23,15>": "GEN", + "<2,2,23,16>": "0" + }, + "<2,2,24>": { + "<2,2,24,1>": "M", + "<2,2,24,2>": "QBFCLOSESESSION", + "<2,2,24,3>": "@MDIACTIVE", + "<2,2,24,4>": "", + "<2,2,24,5>": "", + "<2,2,24,6>": "", + "<2,2,24,7>": "", + "<2,2,24,8>": "", + "<2,2,24,9>": "", + "<2,2,24,10>": "", + "<2,2,24,11>": "", + "<2,2,24,12>": "", + "<2,2,24,13>": "", + "<2,2,24,14>": "", + "<2,2,24,15>": "GEN", + "<2,2,24,16>": "0" + }, + "<2,2,25>": { + "<2,2,25,1>": "M", + "<2,2,25,2>": "MDITILE", + "<2,2,25,3>": "@MDIFRAME", + "<2,2,25,4>": "1", + "<2,2,25,5>": "", + "<2,2,25,6>": "", + "<2,2,25,7>": "", + "<2,2,25,8>": "", + "<2,2,25,9>": "", + "<2,2,25,10>": "", + "<2,2,25,11>": "", + "<2,2,25,12>": "", + "<2,2,25,13>": "", + "<2,2,25,14>": "", + "<2,2,25,15>": "GEN", + "<2,2,25,16>": "0" + }, + "<2,2,26>": { + "<2,2,26,1>": "M", + "<2,2,26,2>": "MDICASCADE", + "<2,2,26,3>": "@MDIFRAME", + "<2,2,26,4>": { + "<2,2,26,4,1>": "0", + "<2,2,26,4,2>": "0" + }, + "<2,2,26,5>": "", + "<2,2,26,6>": "", + "<2,2,26,7>": "", + "<2,2,26,8>": "", + "<2,2,26,9>": "", + "<2,2,26,10>": "", + "<2,2,26,11>": "", + "<2,2,26,12>": "", + "<2,2,26,13>": "", + "<2,2,26,14>": "", + "<2,2,26,15>": "GEN", + "<2,2,26,16>": "0" + }, + "<2,2,27>": { + "<2,2,27,1>": "M", + "<2,2,27,2>": "SHOWOPTIONS", + "<2,2,27,3>": "@FOCUS", + "<2,2,27,4>": "", + "<2,2,27,5>": "", + "<2,2,27,6>": "", + "<2,2,27,7>": "", + "<2,2,27,8>": "", + "<2,2,27,9>": "", + "<2,2,27,10>": "", + "<2,2,27,11>": "", + "<2,2,27,12>": "", + "<2,2,27,13>": "", + "<2,2,27,14>": "", + "<2,2,27,15>": "GEN", + "<2,2,27,16>": "0" + }, + "<2,2,28>": { + "<2,2,28,1>": "M", + "<2,2,28,2>": "SHOWHELP", + "<2,2,28,3>": "@FOCUS", + "<2,2,28,4>": "", + "<2,2,28,5>": "", + "<2,2,28,6>": "", + "<2,2,28,7>": "", + "<2,2,28,8>": "", + "<2,2,28,9>": "", + "<2,2,28,10>": "", + "<2,2,28,11>": "", + "<2,2,28,12>": "", + "<2,2,28,13>": "", + "<2,2,28,14>": "", + "<2,2,28,15>": "GEN", + "<2,2,28,16>": "0" + }, + "<2,2,29>": { + "<2,2,29,1>": "M", + "<2,2,29,2>": "SHOWNOTES", + "<2,2,29,3>": "@FOCUS", + "<2,2,29,4>": "", + "<2,2,29,5>": "", + "<2,2,29,6>": "", + "<2,2,29,7>": "", + "<2,2,29,8>": "", + "<2,2,29,9>": "", + "<2,2,29,10>": "", + "<2,2,29,11>": "", + "<2,2,29,12>": "", + "<2,2,29,13>": "", + "<2,2,29,14>": "", + "<2,2,29,15>": "GEN", + "<2,2,29,16>": "0" + } + }, + "<2,3>": { + "<2,3,1>": "FILE.READ_ROW", + "<2,3,2>": "FILE.SAVE_ROW", + "<2,3,3>": "FILE.SAVE_F9", + "<2,3,4>": "FILE.CLEAR_FORM", + "<2,3,5>": "FILE.DELETE_ROW", + "<2,3,6>": "FILE.CLOSE", + "<2,3,7>": "FILE.EXIT", + "<2,3,8>": "EDIT.UNDO", + "<2,3,9>": "EDIT.CUT", + "<2,3,10>": "EDIT.COPY", + "<2,3,11>": "EDIT.PASTE", + "<2,3,12>": "EDIT.SELECT_ALL", + "<2,3,13>": "QBF.INITIALIZE", + "<2,3,14>": "QBF.EXECUTE", + "<2,3,15>": "QBF.FIRST", + "<2,3,16>": "QBF.PREVIOUS", + "<2,3,17>": "QBF.NEXT", + "<2,3,18>": "QBF.LAST", + "<2,3,19>": "QBF.ABSOLUTE", + "<2,3,20>": "QBF.GOTO_ID", + "<2,3,21>": "QBF.TABLE", + "<2,3,22>": "QBF.LOADLIST", + "<2,3,23>": "QBF.GETQUERY", + "<2,3,24>": "QBF.CLOSE", + "<2,3,25>": "WINDOW.TILE", + "<2,3,26>": "WINDOW.CASCADE", + "<2,3,27>": "EDIT.OPTIONS", + "<2,3,28>": "HELP.HELP", + "<2,3,29>": "HELP.QUICKHELP" + }, + "<2,4>": "0" + } + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/RTI_HTTP_DOWNLOAD_TEST.json b/SYSPROG/OIWIN/RTI_HTTP_DOWNLOAD_TEST.json new file mode 100644 index 0000000..bf6ff02 --- /dev/null +++ b/SYSPROG/OIWIN/RTI_HTTP_DOWNLOAD_TEST.json @@ -0,0 +1,6052 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1000", + "<2>": "39", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "RTI_HTTP_DOWNLOAD_TEST", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "0", + "<1,6>": "0", + "<1,7>": "-934", + "<1,8>": "-600", + "<1,9>": "Test RTI_HTTP_DOWNLOAD", + "<1,10>": { + "<1,10,1>": "0x94CB0000", + "<1,10,2>": "0x101" + }, + "<1,11>": { + "<1,11,1>": "0x8000", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "X", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "@COMMUTER", + "<1,18,1,4>": { + "<1,18,1,4,1>": "@SELF", + "<1,18,1,4,2>": "@EVENT", + "<1,18,1,4,3>": "@PARAM1", + "<1,18,1,4,4>": "@PARAM2", + "<1,18,1,4,5>": "@PARAM3", + "<1,18,1,4,6>": "@PARAM4", + "<1,18,1,4,7>": "@PARAM5", + "<1,18,1,4,8>": "@PARAM6" + }, + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "COMMMOD", + "<1,18,1,16>": "0" + } + }, + "<1,19>": "ENDDIALOG", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "0", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "SYSPROG*IMAGE*ICO*RTI_TEST_DUMMY", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "", + "<1,62,4>": "2", + "<1,62,5>": "0", + "<1,62,6>": "0" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "SYSPROG*STPROC**RTI_HTTP_DOWNLOAD_TEST", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "0" + } + }, + "record3": { + "<1>": { + "<1,1>": "EBD_RESPONSE_CONTENT", + "<1,2>": "", + "<1,3>": "EDITBOX", + "<1,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<1,5>": "556", + "<1,6>": "248", + "<1,7>": "368", + "<1,8>": "268", + "<1,9>": "", + "<1,10>": { + "<1,10,1>": "0x56200840", + "<1,10,2>": "0x200" + }, + "<1,11>": { + "<1,11,1>": "0x0", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "36", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "" + }, + "<1,14>": "-2", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "Segoe UI", + "<1,15,1,2>": "-12", + "<1,15,1,3>": "400", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "0", + "<1,15,1,8>": "34", + "<1,15,1,9>": "0", + "<1,15,1,10>": "3", + "<1,15,1,11>": "2", + "<1,15,1,12>": "1" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "<>", + "<1,29>": "<>", + "<1,30>": "", + "<1,31>": "0", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": "", + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": "0", + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "" + }, + "<2>": { + "<2,1>": "BTN_RESPONSEFILE", + "<2,2>": "", + "<2,3>": "PUSHBUTTON", + "<2,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<2,5>": "420", + "<2,6>": "524", + "<2,7>": "20", + "<2,8>": "20", + "<2,9>": "...", + "<2,10>": { + "<2,10,1>": "0x56002300", + "<2,10,2>": "0x0" + }, + "<2,11>": { + "<2,11,1>": "0x0", + "<2,11,2>": "0x80000000" + }, + "<2,12>": "22", + "<2,13>": { + "<2,13,1>": "-2", + "<2,13,2>": "-2", + "<2,13,3>": "0" + }, + "<2,14>": "-2", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "Segoe UI", + "<2,15,1,2>": "-12", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "3", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": { + "<2,18,1>": { + "<2,18,1,1>": "P", + "<2,18,1,2>": "FOCUS", + "<2,18,1,3>": "SYSTEM", + "<2,18,1,4>": "@PREV", + "<2,18,1,5>": "", + "<2,18,1,6>": "", + "<2,18,1,7>": "", + "<2,18,1,8>": "", + "<2,18,1,9>": "", + "<2,18,1,10>": "E", + "<2,18,1,11>": "OPTIONS", + "<2,18,1,12>": "@FOCUS", + "<2,18,1,13>": "", + "<2,18,1,14>": "0", + "<2,18,1,15>": "OPTIONS", + "<2,18,1,16>": "0" + } + }, + "<2,19>": "CLICK", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "", + "<2,26>": "", + "<2,27>": "", + "<2,28>": "", + "<2,29>": "", + "<2,30>": "", + "<2,31>": "", + "<2,32>": "", + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "-1", + "<2,41>": { + "<2,41,1>": "", + "<2,41,2>": "-1" + }, + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "", + "<2,53>": "", + "<2,54>": "", + "<2,55>": "", + "<2,56>": "", + "<2,57>": "", + "<2,58>": "", + "<2,59>": "", + "<2,60>": "", + "<2,61>": "", + "<2,62>": "0", + "<2,63>": "", + "<2,64>": { + "<2,64,1>": "-2", + "<2,64,2>": "-2", + "<2,64,3>": "0" + }, + "<2,65>": "-2", + "<2,66>": "", + "<2,67>": "", + "<2,68>": "", + "<2,69>": "", + "<2,70>": "", + "<2,71>": "", + "<2,72>": "", + "<2,73>": "", + "<2,74>": "", + "<2,75>": "", + "<2,76>": "", + "<2,77>": "", + "<2,78>": "", + "<2,79>": "", + "<2,80>": "", + "<2,81>": "", + "<2,82>": "", + "<2,83>": "", + "<2,84>": "", + "<2,85>": "", + "<2,86>": "", + "<2,87>": "", + "<2,88>": "", + "<2,89>": "", + "<2,90>": "0", + "<2,91>": "0" + }, + "<3>": { + "<3,1>": "BTN_TEST", + "<3,2>": "", + "<3,3>": "PUSHBUTTON", + "<3,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<3,5>": "360", + "<3,6>": "564", + "<3,7>": "80", + "<3,8>": "24", + "<3,9>": "Test...", + "<3,10>": { + "<3,10,1>": "0x5E002300", + "<3,10,2>": "0x0" + }, + "<3,11>": { + "<3,11,1>": "0x0", + "<3,11,2>": "0x80000000" + }, + "<3,12>": "23", + "<3,13>": { + "<3,13,1>": "-2", + "<3,13,2>": "-2", + "<3,13,3>": "0" + }, + "<3,14>": "-2", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "Segoe UI", + "<3,15,1,2>": "-12", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "3", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": { + "<3,18,1>": { + "<3,18,1,1>": "X", + "<3,18,1,2>": "EXECUTE", + "<3,18,1,3>": "@COMMUTER", + "<3,18,1,4>": { + "<3,18,1,4,1>": "@SELF", + "<3,18,1,4,2>": "@EVENT", + "<3,18,1,4,3>": "@PARAM1", + "<3,18,1,4,4>": "@PARAM2", + "<3,18,1,4,5>": "@PARAM3", + "<3,18,1,4,6>": "@PARAM4", + "<3,18,1,4,7>": "@PARAM5", + "<3,18,1,4,8>": "@PARAM6" + }, + "<3,18,1,5>": "", + "<3,18,1,6>": "", + "<3,18,1,7>": "", + "<3,18,1,8>": "", + "<3,18,1,9>": "", + "<3,18,1,10>": "", + "<3,18,1,11>": "", + "<3,18,1,12>": "", + "<3,18,1,13>": "", + "<3,18,1,14>": "", + "<3,18,1,15>": "COMMMOD", + "<3,18,1,16>": "0" + } + }, + "<3,19>": "CLICK", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "", + "<3,26>": "", + "<3,27>": "", + "<3,28>": "", + "<3,29>": "", + "<3,30>": "", + "<3,31>": "", + "<3,32>": "", + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "-1", + "<3,41>": { + "<3,41,1>": "", + "<3,41,2>": "-1" + }, + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "", + "<3,53>": "", + "<3,54>": "", + "<3,55>": "", + "<3,56>": "", + "<3,57>": "", + "<3,58>": "", + "<3,59>": "", + "<3,60>": "", + "<3,61>": "", + "<3,62>": "0", + "<3,63>": "", + "<3,64>": { + "<3,64,1>": "-2", + "<3,64,2>": "-2", + "<3,64,3>": "0" + }, + "<3,65>": "-2", + "<3,66>": "", + "<3,67>": "", + "<3,68>": "", + "<3,69>": "", + "<3,70>": "", + "<3,71>": "", + "<3,72>": "", + "<3,73>": "", + "<3,74>": "", + "<3,75>": "", + "<3,76>": "", + "<3,77>": "", + "<3,78>": "", + "<3,79>": "", + "<3,80>": "", + "<3,81>": "", + "<3,82>": "", + "<3,83>": "", + "<3,84>": "", + "<3,85>": "", + "<3,86>": "", + "<3,87>": "", + "<3,88>": "", + "<3,89>": "", + "<3,90>": "0", + "<3,91>": "0" + }, + "<4>": { + "<4,1>": "TXT_REQUEST", + "<4,2>": "", + "<4,3>": "STATIC", + "<4,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<4,5>": "12", + "<4,6>": "12", + "<4,7>": "428", + "<4,8>": "24", + "<4,9>": " Request Parameters", + "<4,10>": { + "<4,10,1>": "0x56000200", + "<4,10,2>": "0x0" + }, + "<4,11>": { + "<4,11,1>": "0x4", + "<4,11,2>": "0x80000000" + }, + "<4,12>": "1", + "<4,13>": { + "<4,13,1>": "-1879048192", + "<4,13,2>": "-1879048192", + "<4,13,3>": "0" + }, + "<4,14>": "16777215", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "Segoe UI", + "<4,15,1,2>": "-14", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "3", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": "", + "<4,19>": "", + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "", + "<4,26>": "", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "", + "<4,31>": "", + "<4,32>": "", + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "", + "<4,53>": "", + "<4,54>": "", + "<4,55>": "", + "<4,56>": "", + "<4,57>": "", + "<4,58>": "", + "<4,59>": "", + "<4,60>": "", + "<4,61>": "", + "<4,62>": "0", + "<4,63>": { + "<4,63,1>": "", + "<4,63,2>": "", + "<4,63,3>": "", + "<4,63,4>": "", + "<4,63,5>": "", + "<4,63,6>": "", + "<4,63,7>": "", + "<4,63,8>": "" + }, + "<4,64>": { + "<4,64,1>": "", + "<4,64,2>": "", + "<4,64,3>": "" + }, + "<4,65>": "-2", + "<4,66>": "", + "<4,67>": "", + "<4,68>": "", + "<4,69>": "", + "<4,70>": "", + "<4,71>": "", + "<4,72>": "", + "<4,73>": "", + "<4,74>": "", + "<4,75>": "", + "<4,76>": "", + "<4,77>": "", + "<4,78>": "", + "<4,79>": "", + "<4,80>": "", + "<4,81>": "", + "<4,82>": "", + "<4,83>": "", + "<4,84>": "", + "<4,85>": "", + "<4,86>": "", + "<4,87>": "", + "<4,88>": "", + "<4,89>": "", + "<4,90>": "0", + "<4,91>": "0", + "<4,92>": "" + }, + "<5>": { + "<5,1>": "LBL_CREDENTIALS", + "<5,2>": "", + "<5,3>": "STATIC", + "<5,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<5,5>": "12", + "<5,6>": "372", + "<5,7>": "76", + "<5,8>": "20", + "<5,9>": "Credentials:", + "<5,10>": { + "<5,10,1>": "0x56000200", + "<5,10,2>": "0x0" + }, + "<5,11>": { + "<5,11,1>": "0x0", + "<5,11,2>": "0x80000000" + }, + "<5,12>": "12", + "<5,13>": { + "<5,13,1>": "-2", + "<5,13,2>": "-2", + "<5,13,3>": "" + }, + "<5,14>": "-2", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "Segoe UI", + "<5,15,1,2>": "-12", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "3", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": "", + "<5,19>": "", + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "", + "<5,26>": "", + "<5,27>": "", + "<5,28>": "<>", + "<5,29>": "<>", + "<5,30>": "", + "<5,31>": "", + "<5,32>": "", + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "", + "<5,41>": "", + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "", + "<5,52>": "", + "<5,53>": "", + "<5,54>": "", + "<5,55>": "", + "<5,56>": "", + "<5,57>": "", + "<5,58>": "", + "<5,59>": "", + "<5,60>": "", + "<5,61>": "", + "<5,62>": "0", + "<5,63>": { + "<5,63,1>": "", + "<5,63,2>": "", + "<5,63,3>": "", + "<5,63,4>": "", + "<5,63,5>": "", + "<5,63,6>": "", + "<5,63,7>": "", + "<5,63,8>": "" + }, + "<5,64>": { + "<5,64,1>": "", + "<5,64,2>": "", + "<5,64,3>": "" + }, + "<5,65>": "-2", + "<5,66>": "", + "<5,67>": "", + "<5,68>": "", + "<5,69>": "", + "<5,70>": "", + "<5,71>": "", + "<5,72>": "", + "<5,73>": "", + "<5,74>": "", + "<5,75>": "", + "<5,76>": "", + "<5,77>": "", + "<5,78>": "", + "<5,79>": "", + "<5,80>": "", + "<5,81>": "", + "<5,82>": "", + "<5,83>": "", + "<5,84>": "", + "<5,85>": "", + "<5,86>": "", + "<5,87>": "", + "<5,88>": "", + "<5,89>": "", + "<5,90>": "0", + "<5,91>": "0", + "<5,92>": "" + }, + "<6>": { + "<6,1>": "EDT_REQUESTHEADERS", + "<6,2>": "", + "<6,3>": "EDITTABLE", + "<6,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<6,5>": "92", + "<6,6>": "424", + "<6,7>": "348", + "<6,8>": "92", + "<6,9>": "", + "<6,10>": { + "<6,10,1>": "0x560001F3", + "<6,10,2>": "0x200" + }, + "<6,11>": { + "<6,11,1>": "0x60180", + "<6,11,2>": "0x80000002" + }, + "<6,12>": "19", + "<6,13>": { + "<6,13,1>": "-2", + "<6,13,2>": "-2", + "<6,13,3>": "" + }, + "<6,14>": "-2", + "<6,15>": { + "<6,15,1>": { + "<6,15,1,1>": "Segoe UI", + "<6,15,1,2>": "-12", + "<6,15,1,3>": "400", + "<6,15,1,4>": "0", + "<6,15,1,5>": "0", + "<6,15,1,6>": "0", + "<6,15,1,7>": "0", + "<6,15,1,8>": "34", + "<6,15,1,9>": "0", + "<6,15,1,10>": "3", + "<6,15,1,11>": "2", + "<6,15,1,12>": "1" + } + }, + "<6,16>": "", + "<6,17>": "", + "<6,18>": "", + "<6,19>": "", + "<6,20>": "", + "<6,21>": "", + "<6,22>": "", + "<6,23>": { + "<6,23,1>": "", + "<6,23,2>": "" + }, + "<6,24>": { + "<6,24,1>": "", + "<6,24,2>": "" + }, + "<6,25>": "", + "<6,26>": "", + "<6,27>": "", + "<6,28>": { + "<6,28,1>": "<>", + "<6,28,2>": "<>" + }, + "<6,29>": { + "<6,29,1>": "<>", + "<6,29,2>": "<>" + }, + "<6,30>": { + "<6,30,1>": "<>", + "<6,30,2>": "<>" + }, + "<6,31>": { + "<6,31,1>": "0", + "<6,31,2>": "0" + }, + "<6,32>": "", + "<6,33>": "", + "<6,34>": "", + "<6,35>": { + "<6,35,1>": { + "<6,35,1,1>": "", + "<6,35,1,2>": "" + }, + "<6,35,2>": { + "<6,35,2,1>": "", + "<6,35,2,2>": "" + }, + "<6,35,3>": { + "<6,35,3,1>": "", + "<6,35,3,2>": "" + }, + "<6,35,4>": { + "<6,35,4,1>": "", + "<6,35,4,2>": "" + }, + "<6,35,5>": { + "<6,35,5,1>": "", + "<6,35,5,2>": "" + } + }, + "<6,36>": "", + "<6,37>": "", + "<6,38>": "", + "<6,39>": { + "<6,39,1>": "80", + "<6,39,2>": "128" + }, + "<6,40>": "2", + "<6,41>": { + "<6,41,1>": "0", + "<6,41,2>": "2", + "<6,41,3>": "1", + "<6,41,4>": "-2", + "<6,41,5>": "-2", + "<6,41,6>": "22", + "<6,41,7>": "", + "<6,41,8>": "40", + "<6,41,9>": "113", + "<6,41,10>": "115", + "<6,41,11>": "0", + "<6,41,12>": "-2", + "<6,41,13>": "0", + "<6,41,14>": "1" + }, + "<6,42>": { + "<6,42,1>": "2147483648", + "<6,42,2>": "2147483648" + }, + "<6,43>": { + "<6,43,1>": "140", + "<6,43,2>": "120" + }, + "<6,44>": { + "<6,44,1>": "Name", + "<6,44,2>": "Value" + }, + "<6,45>": "", + "<6,46>": "", + "<6,47>": "", + "<6,48>": "", + "<6,49>": "", + "<6,50>": "", + "<6,51>": "", + "<6,52>": "", + "<6,53>": "", + "<6,54>": "", + "<6,55>": { + "<6,55,1>": "", + "<6,55,2>": "" + }, + "<6,56>": { + "<6,56,1>": "", + "<6,56,2>": "" + }, + "<6,57>": { + "<6,57,1>": "", + "<6,57,2>": "" + }, + "<6,58>": { + "<6,58,1>": "", + "<6,58,2>": "" + }, + "<6,59>": "", + "<6,60>": { + "<6,60,1>": "4178", + "<6,60,2>": "4178" + }, + "<6,61>": "", + "<6,62>": "0", + "<6,63>": "", + "<6,64>": "-2", + "<6,65>": "", + "<6,66>": "", + "<6,67>": "", + "<6,68>": "", + "<6,69>": "", + "<6,70>": "", + "<6,71>": "", + "<6,72>": "", + "<6,73>": "", + "<6,74>": "", + "<6,75>": "", + "<6,76>": "", + "<6,77>": "", + "<6,78>": "", + "<6,79>": "", + "<6,80>": "", + "<6,81>": "", + "<6,82>": "", + "<6,83>": "", + "<6,84>": "", + "<6,85>": "", + "<6,86>": "", + "<6,87>": "", + "<6,88>": "", + "<6,89>": "", + "<6,90>": "", + "<6,91>": "", + "<6,92>": "", + "<6,93>": "", + "<6,94>": { + "<6,94,1>": "", + "<6,94,2>": "" + }, + "<6,95>": { + "<6,95,1>": "", + "<6,95,2>": "" + }, + "<6,96>": { + "<6,96,1>": { + "<6,96,1,1>": "", + "<6,96,1,2>": "" + }, + "<6,96,2>": { + "<6,96,2,1>": "", + "<6,96,2,2>": "" + } + }, + "<6,97>": { + "<6,97,1>": { + "<6,97,1,1>": "Segoe UI", + "<6,97,1,2>": "-12", + "<6,97,1,3>": "400", + "<6,97,1,4>": "0", + "<6,97,1,5>": "0", + "<6,97,1,6>": "0", + "<6,97,1,7>": "0", + "<6,97,1,8>": "34", + "<6,97,1,9>": "0", + "<6,97,1,10>": "3", + "<6,97,1,11>": "2", + "<6,97,1,12>": "1" + }, + "<6,97,2>": { + "<6,97,2,1>": "Segoe UI", + "<6,97,2,2>": "-12", + "<6,97,2,3>": "400", + "<6,97,2,4>": "0", + "<6,97,2,5>": "0", + "<6,97,2,6>": "0", + "<6,97,2,7>": "0", + "<6,97,2,8>": "34", + "<6,97,2,9>": "0", + "<6,97,2,10>": "3", + "<6,97,2,11>": "2", + "<6,97,2,12>": "1" + } + }, + "<6,98>": { + "<6,98,1>": { + "<6,98,1,1>": "Segoe UI", + "<6,98,1,2>": "-12", + "<6,98,1,3>": "400", + "<6,98,1,4>": "0", + "<6,98,1,5>": "0", + "<6,98,1,6>": "0", + "<6,98,1,7>": "0", + "<6,98,1,8>": "34", + "<6,98,1,9>": "0", + "<6,98,1,10>": "3", + "<6,98,1,11>": "2", + "<6,98,1,12>": "1" + }, + "<6,98,2>": { + "<6,98,2,1>": "Segoe UI", + "<6,98,2,2>": "-12", + "<6,98,2,3>": "400", + "<6,98,2,4>": "0", + "<6,98,2,5>": "0", + "<6,98,2,6>": "0", + "<6,98,2,7>": "0", + "<6,98,2,8>": "34", + "<6,98,2,9>": "0", + "<6,98,2,10>": "3", + "<6,98,2,11>": "2", + "<6,98,2,12>": "1" + } + }, + "<6,99>": { + "<6,99,1>": { + "<6,99,1,1>": "-2", + "<6,99,1,2>": "-2", + "<6,99,1,3>": "-2", + "<6,99,1,4>": "0", + "<6,99,1,5>": "0", + "<6,99,1,6>": "0", + "<6,99,1,7>": "0" + }, + "<6,99,2>": { + "<6,99,2,1>": "-2", + "<6,99,2,2>": "-2", + "<6,99,2,3>": "-2", + "<6,99,2,4>": "0", + "<6,99,2,5>": "0", + "<6,99,2,6>": "0", + "<6,99,2,7>": "0" + }, + "<6,99,3>": { + "<6,99,3,1>": "-2", + "<6,99,3,2>": "-2", + "<6,99,3,3>": "-2", + "<6,99,3,4>": "0", + "<6,99,3,5>": "0", + "<6,99,3,6>": "0", + "<6,99,3,7>": "0" + }, + "<6,99,4>": { + "<6,99,4,1>": "-2", + "<6,99,4,2>": "-2", + "<6,99,4,3>": "-2", + "<6,99,4,4>": "0", + "<6,99,4,5>": "0", + "<6,99,4,6>": "0", + "<6,99,4,7>": "0" + }, + "<6,99,5>": { + "<6,99,5,1>": "-2", + "<6,99,5,2>": "-2", + "<6,99,5,3>": "-2", + "<6,99,5,4>": "0", + "<6,99,5,5>": "0", + "<6,99,5,6>": "0", + "<6,99,5,7>": "0" + }, + "<6,99,6>": { + "<6,99,6,1>": "-2", + "<6,99,6,2>": "-2", + "<6,99,6,3>": "-2", + "<6,99,6,4>": "0", + "<6,99,6,5>": "0", + "<6,99,6,6>": "0", + "<6,99,6,7>": "0" + }, + "<6,99,7>": { + "<6,99,7,1>": "-2", + "<6,99,7,2>": "-2", + "<6,99,7,3>": "-2", + "<6,99,7,4>": "0", + "<6,99,7,5>": "0", + "<6,99,7,6>": "0", + "<6,99,7,7>": "0" + }, + "<6,99,8>": "", + "<6,99,9>": "", + "<6,99,10>": "", + "<6,99,11>": { + "<6,99,11,1>": "-2", + "<6,99,11,2>": "-2", + "<6,99,11,3>": "-2", + "<6,99,11,4>": "0", + "<6,99,11,5>": "0", + "<6,99,11,6>": "0", + "<6,99,11,7>": "0" + }, + "<6,99,12>": { + "<6,99,12,1>": "-2", + "<6,99,12,2>": "-2", + "<6,99,12,3>": "-2", + "<6,99,12,4>": "0", + "<6,99,12,5>": "0", + "<6,99,12,6>": "0", + "<6,99,12,7>": "0" + }, + "<6,99,13>": { + "<6,99,13,1>": "-2", + "<6,99,13,2>": "-2", + "<6,99,13,3>": "-2", + "<6,99,13,4>": "0", + "<6,99,13,5>": "0", + "<6,99,13,6>": "0", + "<6,99,13,7>": "0" + }, + "<6,99,14>": { + "<6,99,14,1>": "-2", + "<6,99,14,2>": "-2", + "<6,99,14,3>": "-2", + "<6,99,14,4>": "0", + "<6,99,14,5>": "0", + "<6,99,14,6>": "0", + "<6,99,14,7>": "0" + }, + "<6,99,15>": { + "<6,99,15,1>": "-2", + "<6,99,15,2>": "-2", + "<6,99,15,3>": "-2", + "<6,99,15,4>": "0", + "<6,99,15,5>": "0", + "<6,99,15,6>": "0", + "<6,99,15,7>": "0" + }, + "<6,99,16>": { + "<6,99,16,1>": "-2", + "<6,99,16,2>": "-2", + "<6,99,16,3>": "-2", + "<6,99,16,4>": "0", + "<6,99,16,5>": "0", + "<6,99,16,6>": "0", + "<6,99,16,7>": "0" + }, + "<6,99,17>": { + "<6,99,17,1>": "-2", + "<6,99,17,2>": "-2", + "<6,99,17,3>": "-2", + "<6,99,17,4>": "0", + "<6,99,17,5>": "0", + "<6,99,17,6>": "0", + "<6,99,17,7>": "0" + }, + "<6,99,18>": "", + "<6,99,19>": "", + "<6,99,20>": "", + "<6,99,21>": { + "<6,99,21,1>": "-2", + "<6,99,21,2>": "-2", + "<6,99,21,3>": "-2", + "<6,99,21,4>": "0", + "<6,99,21,5>": "0", + "<6,99,21,6>": "0", + "<6,99,21,7>": "0" + }, + "<6,99,22>": { + "<6,99,22,1>": "-2", + "<6,99,22,2>": "-2", + "<6,99,22,3>": "-2", + "<6,99,22,4>": "0", + "<6,99,22,5>": "0", + "<6,99,22,6>": "0", + "<6,99,22,7>": "0" + }, + "<6,99,23>": { + "<6,99,23,1>": "-2", + "<6,99,23,2>": "-2", + "<6,99,23,3>": "-2", + "<6,99,23,4>": "0", + "<6,99,23,5>": "0", + "<6,99,23,6>": "0", + "<6,99,23,7>": "0" + }, + "<6,99,24>": { + "<6,99,24,1>": "-2", + "<6,99,24,2>": "-2", + "<6,99,24,3>": "-2", + "<6,99,24,4>": "0", + "<6,99,24,5>": "0", + "<6,99,24,6>": "0", + "<6,99,24,7>": "0" + }, + "<6,99,25>": { + "<6,99,25,1>": "-2", + "<6,99,25,2>": "-2", + "<6,99,25,3>": "-2", + "<6,99,25,4>": "0", + "<6,99,25,5>": "0", + "<6,99,25,6>": "0", + "<6,99,25,7>": "0" + }, + "<6,99,26>": { + "<6,99,26,1>": "-2", + "<6,99,26,2>": "-2", + "<6,99,26,3>": "-2", + "<6,99,26,4>": "0", + "<6,99,26,5>": "0", + "<6,99,26,6>": "0", + "<6,99,26,7>": "0" + }, + "<6,99,27>": { + "<6,99,27,1>": "-2", + "<6,99,27,2>": "-2", + "<6,99,27,3>": "-2", + "<6,99,27,4>": "0", + "<6,99,27,5>": "0", + "<6,99,27,6>": "0", + "<6,99,27,7>": "0" + } + }, + "<6,100>": { + "<6,100,1>": "", + "<6,100,2>": "" + }, + "<6,101>": "", + "<6,102>": "", + "<6,103>": "", + "<6,104>": "", + "<6,105>": "No headers specified" + }, + "<7>": { + "<7,1>": "EDL_URL", + "<7,2>": "", + "<7,3>": "EDITFIELD", + "<7,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<7,5>": "92", + "<7,6>": "296", + "<7,7>": "348", + "<7,8>": "20", + "<7,9>": "", + "<7,10>": { + "<7,10,1>": "0x56000080", + "<7,10,2>": "0x200" + }, + "<7,11>": { + "<7,11,1>": "0x0", + "<7,11,2>": "0x80000000" + }, + "<7,12>": "5", + "<7,13>": { + "<7,13,1>": "-2", + "<7,13,2>": "-2", + "<7,13,3>": "" + }, + "<7,14>": "-2", + "<7,15>": { + "<7,15,1>": { + "<7,15,1,1>": "Segoe UI", + "<7,15,1,2>": "-12", + "<7,15,1,3>": "400", + "<7,15,1,4>": "0", + "<7,15,1,5>": "0", + "<7,15,1,6>": "0", + "<7,15,1,7>": "0", + "<7,15,1,8>": "34", + "<7,15,1,9>": "0", + "<7,15,1,10>": "3", + "<7,15,1,11>": "2", + "<7,15,1,12>": "1" + } + }, + "<7,16>": "", + "<7,17>": "", + "<7,18>": { + "<7,18,1>": { + "<7,18,1,1>": "X", + "<7,18,1,2>": "EXECUTE", + "<7,18,1,3>": "@COMMUTER", + "<7,18,1,4>": { + "<7,18,1,4,1>": "@SELF", + "<7,18,1,4,2>": "@EVENT", + "<7,18,1,4,3>": "@PARAM1", + "<7,18,1,4,4>": "@PARAM2", + "<7,18,1,4,5>": "@PARAM3", + "<7,18,1,4,6>": "@PARAM4", + "<7,18,1,4,7>": "@PARAM5", + "<7,18,1,4,8>": "@PARAM6" + }, + "<7,18,1,5>": "", + "<7,18,1,6>": "", + "<7,18,1,7>": "", + "<7,18,1,8>": "", + "<7,18,1,9>": "", + "<7,18,1,10>": "", + "<7,18,1,11>": "", + "<7,18,1,12>": "", + "<7,18,1,13>": "", + "<7,18,1,14>": "", + "<7,18,1,15>": "COMMMOD", + "<7,18,1,16>": "0" + } + }, + "<7,19>": "CHANGED", + "<7,20>": "", + "<7,21>": "", + "<7,22>": "", + "<7,23>": "", + "<7,24>": "", + "<7,25>": "", + "<7,26>": "", + "<7,27>": "", + "<7,28>": "<>", + "<7,29>": "<>", + "<7,30>": "<>", + "<7,31>": "0", + "<7,32>": "", + "<7,33>": "", + "<7,34>": "", + "<7,35>": "", + "<7,36>": { + "<7,36,1>": "0", + "<7,36,2>": "0" + }, + "<7,37>": "", + "<7,38>": "", + "<7,39>": "", + "<7,40>": "", + "<7,41>": "", + "<7,42>": "", + "<7,43>": "", + "<7,44>": "", + "<7,45>": "", + "<7,46>": "", + "<7,47>": "", + "<7,48>": "", + "<7,49>": "", + "<7,50>": "", + "<7,51>": "", + "<7,52>": "", + "<7,53>": "", + "<7,54>": "", + "<7,55>": "", + "<7,56>": "", + "<7,57>": "", + "<7,58>": "", + "<7,59>": "", + "<7,60>": "", + "<7,61>": "", + "<7,62>": "0", + "<7,63>": "", + "<7,64>": "", + "<7,65>": "", + "<7,66>": "", + "<7,67>": "", + "<7,68>": "", + "<7,69>": "", + "<7,70>": "", + "<7,71>": "", + "<7,72>": "", + "<7,73>": "", + "<7,74>": "", + "<7,75>": "", + "<7,76>": "", + "<7,77>": "", + "<7,78>": "", + "<7,79>": "", + "<7,80>": "", + "<7,81>": "", + "<7,82>": "", + "<7,83>": "", + "<7,84>": "", + "<7,85>": "", + "<7,86>": "", + "<7,87>": "", + "<7,88>": "", + "<7,89>": "", + "<7,90>": "", + "<7,91>": "", + "<7,92>": "" + }, + "<8>": { + "<8,1>": "CBO_METHOD", + "<8,2>": "", + "<8,3>": "COMBOBOX", + "<8,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<8,5>": "92", + "<8,6>": "320", + "<8,7>": "156", + "<8,8>": "20", + "<8,9>": "", + "<8,10>": { + "<8,10,1>": "0x56002002", + "<8,10,2>": "0x0" + }, + "<8,11>": { + "<8,11,1>": "0x0", + "<8,11,2>": "0x80000C00" + }, + "<8,12>": "7", + "<8,13>": { + "<8,13,1>": "-2", + "<8,13,2>": "-2", + "<8,13,3>": "" + }, + "<8,14>": "-2", + "<8,15>": { + "<8,15,1>": { + "<8,15,1,1>": "Segoe UI", + "<8,15,1,2>": "-12", + "<8,15,1,3>": "400", + "<8,15,1,4>": "0", + "<8,15,1,5>": "0", + "<8,15,1,6>": "0", + "<8,15,1,7>": "0", + "<8,15,1,8>": "34", + "<8,15,1,9>": "0", + "<8,15,1,10>": "3", + "<8,15,1,11>": "2", + "<8,15,1,12>": "1" + } + }, + "<8,16>": "", + "<8,17>": "", + "<8,18>": { + "<8,18,1>": { + "<8,18,1,1>": "X", + "<8,18,1,2>": "EXECUTE", + "<8,18,1,3>": "@COMMUTER", + "<8,18,1,4>": { + "<8,18,1,4,1>": "@SELF", + "<8,18,1,4,2>": "@EVENT", + "<8,18,1,4,3>": "@PARAM1", + "<8,18,1,4,4>": "@PARAM2", + "<8,18,1,4,5>": "@PARAM3", + "<8,18,1,4,6>": "@PARAM4", + "<8,18,1,4,7>": "@PARAM5", + "<8,18,1,4,8>": "@PARAM6" + }, + "<8,18,1,5>": "", + "<8,18,1,6>": "", + "<8,18,1,7>": "", + "<8,18,1,8>": "", + "<8,18,1,9>": "", + "<8,18,1,10>": "", + "<8,18,1,11>": "", + "<8,18,1,12>": "", + "<8,18,1,13>": "", + "<8,18,1,14>": "", + "<8,18,1,15>": "COMMMOD", + "<8,18,1,16>": "0" + }, + "<8,18,2>": { + "<8,18,2,1>": "X", + "<8,18,2,2>": "EXECUTE", + "<8,18,2,3>": "@COMMUTER", + "<8,18,2,4>": { + "<8,18,2,4,1>": "@SELF", + "<8,18,2,4,2>": "@EVENT", + "<8,18,2,4,3>": "@PARAM1", + "<8,18,2,4,4>": "@PARAM2", + "<8,18,2,4,5>": "@PARAM3", + "<8,18,2,4,6>": "@PARAM4", + "<8,18,2,4,7>": "@PARAM5", + "<8,18,2,4,8>": "@PARAM6" + }, + "<8,18,2,5>": "", + "<8,18,2,6>": "", + "<8,18,2,7>": "", + "<8,18,2,8>": "", + "<8,18,2,9>": "", + "<8,18,2,10>": "", + "<8,18,2,11>": "", + "<8,18,2,12>": "", + "<8,18,2,13>": "", + "<8,18,2,14>": "", + "<8,18,2,15>": "COMMMOD", + "<8,18,2,16>": "0" + }, + "<8,18,3>": { + "<8,18,3,1>": "X", + "<8,18,3,2>": "EXECUTE", + "<8,18,3,3>": "@COMMUTER", + "<8,18,3,4>": { + "<8,18,3,4,1>": "@SELF", + "<8,18,3,4,2>": "@EVENT", + "<8,18,3,4,3>": "@PARAM1", + "<8,18,3,4,4>": "@PARAM2", + "<8,18,3,4,5>": "@PARAM3", + "<8,18,3,4,6>": "@PARAM4", + "<8,18,3,4,7>": "@PARAM5", + "<8,18,3,4,8>": "@PARAM6" + }, + "<8,18,3,5>": "", + "<8,18,3,6>": "", + "<8,18,3,7>": "", + "<8,18,3,8>": "", + "<8,18,3,9>": "", + "<8,18,3,10>": "", + "<8,18,3,11>": "", + "<8,18,3,12>": "", + "<8,18,3,13>": "", + "<8,18,3,14>": "", + "<8,18,3,15>": "COMMMOD", + "<8,18,3,16>": "0" + } + }, + "<8,19>": { + "<8,19,1>": "CHANGED", + "<8,19,2>": "GOTFOCUS", + "<8,19,3>": "CHAR" + }, + "<8,20>": "", + "<8,21>": "", + "<8,22>": "", + "<8,23>": "", + "<8,24>": "", + "<8,25>": "", + "<8,26>": "", + "<8,27>": "", + "<8,28>": "<>", + "<8,29>": "<>", + "<8,30>": "\"GET\"", + "<8,31>": "0", + "<8,32>": "", + "<8,33>": "", + "<8,34>": "", + "<8,35>": { + "<8,35,1>": "GET", + "<8,35,2>": "POST", + "<8,35,3>": "HEAD", + "<8,35,4>": "DELETE" + }, + "<8,36>": "", + "<8,37>": "", + "<8,38>": "", + "<8,39>": "", + "<8,40>": "", + "<8,41>": "", + "<8,42>": "", + "<8,43>": "", + "<8,44>": "", + "<8,45>": "", + "<8,46>": "", + "<8,47>": "", + "<8,48>": "", + "<8,49>": "", + "<8,50>": "", + "<8,51>": "", + "<8,52>": "", + "<8,53>": "", + "<8,54>": "", + "<8,55>": "", + "<8,56>": "", + "<8,57>": "", + "<8,58>": "", + "<8,59>": "", + "<8,60>": "", + "<8,61>": "", + "<8,62>": "0", + "<8,63>": "", + "<8,64>": { + "<8,64,1>": "", + "<8,64,2>": "", + "<8,64,3>": "" + }, + "<8,65>": "-2", + "<8,66>": { + "<8,66,1>": "", + "<8,66,2>": "", + "<8,66,3>": "" + }, + "<8,67>": "-2", + "<8,68>": "", + "<8,69>": "", + "<8,70>": "", + "<8,71>": "", + "<8,72>": "", + "<8,73>": "", + "<8,74>": "", + "<8,75>": "", + "<8,76>": "", + "<8,77>": "", + "<8,78>": "", + "<8,79>": "", + "<8,80>": "", + "<8,81>": "", + "<8,82>": "", + "<8,83>": "", + "<8,84>": "", + "<8,85>": "", + "<8,86>": "", + "<8,87>": "", + "<8,88>": "", + "<8,89>": "", + "<8,90>": "", + "<8,91>": "", + "<8,92>": "", + "<8,93>": "", + "<8,94>": "", + "<8,95>": "", + "<8,96>": "", + "<8,97>": "", + "<8,98>": "", + "<8,99>": "", + "<8,100>": "", + "<8,101>": "", + "<8,102>": "", + "<8,103>": "", + "<8,104>": "", + "<8,105>": "" + }, + "<9>": { + "<9,1>": "LBL_METHOD", + "<9,2>": "", + "<9,3>": "STATIC", + "<9,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<9,5>": "12", + "<9,6>": "320", + "<9,7>": "76", + "<9,8>": "20", + "<9,9>": "Method:", + "<9,10>": { + "<9,10,1>": "0x56000200", + "<9,10,2>": "0x0" + }, + "<9,11>": { + "<9,11,1>": "0x0", + "<9,11,2>": "0x80000000" + }, + "<9,12>": "6", + "<9,13>": { + "<9,13,1>": "-2", + "<9,13,2>": "-2", + "<9,13,3>": "" + }, + "<9,14>": "-2", + "<9,15>": { + "<9,15,1>": { + "<9,15,1,1>": "Segoe UI", + "<9,15,1,2>": "-12", + "<9,15,1,3>": "400", + "<9,15,1,4>": "0", + "<9,15,1,5>": "0", + "<9,15,1,6>": "0", + "<9,15,1,7>": "0", + "<9,15,1,8>": "34", + "<9,15,1,9>": "0", + "<9,15,1,10>": "3", + "<9,15,1,11>": "2", + "<9,15,1,12>": "1" + } + }, + "<9,16>": "", + "<9,17>": "", + "<9,18>": "", + "<9,19>": "", + "<9,20>": "", + "<9,21>": "", + "<9,22>": "", + "<9,23>": "", + "<9,24>": "", + "<9,25>": "", + "<9,26>": "", + "<9,27>": "", + "<9,28>": "<>", + "<9,29>": "<>", + "<9,30>": "", + "<9,31>": "", + "<9,32>": "", + "<9,33>": "", + "<9,34>": "", + "<9,35>": "", + "<9,36>": "", + "<9,37>": "", + "<9,38>": "", + "<9,39>": "", + "<9,40>": "", + "<9,41>": "", + "<9,42>": "", + "<9,43>": "", + "<9,44>": "", + "<9,45>": "", + "<9,46>": "", + "<9,47>": "", + "<9,48>": "", + "<9,49>": "", + "<9,50>": "", + "<9,51>": "", + "<9,52>": "", + "<9,53>": "", + "<9,54>": "", + "<9,55>": "", + "<9,56>": "", + "<9,57>": "", + "<9,58>": "", + "<9,59>": "", + "<9,60>": "", + "<9,61>": "", + "<9,62>": "0", + "<9,63>": { + "<9,63,1>": "", + "<9,63,2>": "", + "<9,63,3>": "", + "<9,63,4>": "", + "<9,63,5>": "", + "<9,63,6>": "", + "<9,63,7>": "", + "<9,63,8>": "" + }, + "<9,64>": { + "<9,64,1>": "", + "<9,64,2>": "", + "<9,64,3>": "" + }, + "<9,65>": "-2", + "<9,66>": "", + "<9,67>": "", + "<9,68>": "", + "<9,69>": "", + "<9,70>": "", + "<9,71>": "", + "<9,72>": "", + "<9,73>": "", + "<9,74>": "", + "<9,75>": "", + "<9,76>": "", + "<9,77>": "", + "<9,78>": "", + "<9,79>": "", + "<9,80>": "", + "<9,81>": "", + "<9,82>": "", + "<9,83>": "", + "<9,84>": "", + "<9,85>": "", + "<9,86>": "", + "<9,87>": "", + "<9,88>": "", + "<9,89>": "", + "<9,90>": "0", + "<9,91>": "0", + "<9,92>": "" + }, + "<10>": { + "<10,1>": "LBL_URL", + "<10,2>": "", + "<10,3>": "STATIC", + "<10,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<10,5>": "12", + "<10,6>": "296", + "<10,7>": "76", + "<10,8>": "20", + "<10,9>": "URL:", + "<10,10>": { + "<10,10,1>": "0x56000200", + "<10,10,2>": "0x0" + }, + "<10,11>": { + "<10,11,1>": "0x0", + "<10,11,2>": "0x80000000" + }, + "<10,12>": "4", + "<10,13>": { + "<10,13,1>": "-2", + "<10,13,2>": "-2", + "<10,13,3>": "" + }, + "<10,14>": "-2", + "<10,15>": { + "<10,15,1>": { + "<10,15,1,1>": "Segoe UI", + "<10,15,1,2>": "-12", + "<10,15,1,3>": "400", + "<10,15,1,4>": "0", + "<10,15,1,5>": "0", + "<10,15,1,6>": "0", + "<10,15,1,7>": "0", + "<10,15,1,8>": "34", + "<10,15,1,9>": "0", + "<10,15,1,10>": "3", + "<10,15,1,11>": "2", + "<10,15,1,12>": "1" + } + }, + "<10,16>": "", + "<10,17>": "", + "<10,18>": "", + "<10,19>": "", + "<10,20>": "", + "<10,21>": "", + "<10,22>": "", + "<10,23>": "", + "<10,24>": "", + "<10,25>": "", + "<10,26>": "", + "<10,27>": "", + "<10,28>": "<>", + "<10,29>": "<>", + "<10,30>": "", + "<10,31>": "", + "<10,32>": "", + "<10,33>": "", + "<10,34>": "", + "<10,35>": "", + "<10,36>": "", + "<10,37>": "", + "<10,38>": "", + "<10,39>": "", + "<10,40>": "", + "<10,41>": "", + "<10,42>": "", + "<10,43>": "", + "<10,44>": "", + "<10,45>": "", + "<10,46>": "", + "<10,47>": "", + "<10,48>": "", + "<10,49>": "", + "<10,50>": "", + "<10,51>": "", + "<10,52>": "", + "<10,53>": "", + "<10,54>": "", + "<10,55>": "", + "<10,56>": "", + "<10,57>": "", + "<10,58>": "", + "<10,59>": "", + "<10,60>": "", + "<10,61>": "", + "<10,62>": "0", + "<10,63>": { + "<10,63,1>": "", + "<10,63,2>": "", + "<10,63,3>": "", + "<10,63,4>": "", + "<10,63,5>": "", + "<10,63,6>": "", + "<10,63,7>": "", + "<10,63,8>": "" + }, + "<10,64>": { + "<10,64,1>": "", + "<10,64,2>": "", + "<10,64,3>": "" + }, + "<10,65>": "-2", + "<10,66>": "", + "<10,67>": "", + "<10,68>": "", + "<10,69>": "", + "<10,70>": "", + "<10,71>": "", + "<10,72>": "", + "<10,73>": "", + "<10,74>": "", + "<10,75>": "", + "<10,76>": "", + "<10,77>": "", + "<10,78>": "", + "<10,79>": "", + "<10,80>": "", + "<10,81>": "", + "<10,82>": "", + "<10,83>": "", + "<10,84>": "", + "<10,85>": "", + "<10,86>": "", + "<10,87>": "", + "<10,88>": "", + "<10,89>": "", + "<10,90>": "0", + "<10,91>": "0", + "<10,92>": "" + }, + "<11>": { + "<11,1>": "PGD_UIPARAMS", + "<11,2>": "", + "<11,3>": "PROPERTYGRID", + "<11,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<11,5>": "92", + "<11,6>": "44", + "<11,7>": "348", + "<11,8>": "244", + "<11,9>": "", + "<11,10>": { + "<11,10,1>": "0x56000000", + "<11,10,2>": "0x200" + }, + "<11,11>": { + "<11,11,1>": "0x80", + "<11,11,2>": "0x80000000" + }, + "<11,12>": "3", + "<11,13>": { + "<11,13,1>": "-2", + "<11,13,2>": "-2", + "<11,13,3>": "" + }, + "<11,14>": "-2", + "<11,15>": { + "<11,15,1>": { + "<11,15,1,1>": "Segoe UI", + "<11,15,1,2>": "-12", + "<11,15,1,3>": "400", + "<11,15,1,4>": "0", + "<11,15,1,5>": "0", + "<11,15,1,6>": "0", + "<11,15,1,7>": "0", + "<11,15,1,8>": "34", + "<11,15,1,9>": "0", + "<11,15,1,10>": "3", + "<11,15,1,11>": "2", + "<11,15,1,12>": "1" + } + }, + "<11,16>": "", + "<11,17>": "", + "<11,18>": { + "<11,18,1>": { + "<11,18,1,1>": "X", + "<11,18,1,2>": "EXECUTE", + "<11,18,1,3>": "@COMMUTER", + "<11,18,1,4>": { + "<11,18,1,4,1>": "@SELF", + "<11,18,1,4,2>": "@EVENT", + "<11,18,1,4,3>": "@PARAM1", + "<11,18,1,4,4>": "@PARAM2", + "<11,18,1,4,5>": "@PARAM3", + "<11,18,1,4,6>": "@PARAM4", + "<11,18,1,4,7>": "@PARAM5", + "<11,18,1,4,8>": "@PARAM6" + }, + "<11,18,1,5>": "", + "<11,18,1,6>": "", + "<11,18,1,7>": "", + "<11,18,1,8>": "", + "<11,18,1,9>": "", + "<11,18,1,10>": "", + "<11,18,1,11>": "", + "<11,18,1,12>": "", + "<11,18,1,13>": "", + "<11,18,1,14>": "", + "<11,18,1,15>": "COMMMOD", + "<11,18,1,16>": "0" + }, + "<11,18,2>": { + "<11,18,2,1>": "X", + "<11,18,2,2>": "EXECUTE", + "<11,18,2,3>": "@COMMUTER", + "<11,18,2,4>": { + "<11,18,2,4,1>": "@SELF", + "<11,18,2,4,2>": "@EVENT", + "<11,18,2,4,3>": "@PARAM1", + "<11,18,2,4,4>": "@PARAM2", + "<11,18,2,4,5>": "@PARAM3", + "<11,18,2,4,6>": "@PARAM4", + "<11,18,2,4,7>": "@PARAM5", + "<11,18,2,4,8>": "@PARAM6" + }, + "<11,18,2,5>": "", + "<11,18,2,6>": "", + "<11,18,2,7>": "", + "<11,18,2,8>": "", + "<11,18,2,9>": "", + "<11,18,2,10>": "", + "<11,18,2,11>": "", + "<11,18,2,12>": "", + "<11,18,2,13>": "", + "<11,18,2,14>": "", + "<11,18,2,15>": "COMMMOD", + "<11,18,2,16>": "0" + }, + "<11,18,3>": { + "<11,18,3,1>": "X", + "<11,18,3,2>": "EXECUTE", + "<11,18,3,3>": "@COMMUTER", + "<11,18,3,4>": { + "<11,18,3,4,1>": "@SELF", + "<11,18,3,4,2>": "@EVENT", + "<11,18,3,4,3>": "@PARAM1", + "<11,18,3,4,4>": "@PARAM2", + "<11,18,3,4,5>": "@PARAM3", + "<11,18,3,4,6>": "@PARAM4", + "<11,18,3,4,7>": "@PARAM5", + "<11,18,3,4,8>": "@PARAM6" + }, + "<11,18,3,5>": "", + "<11,18,3,6>": "", + "<11,18,3,7>": "", + "<11,18,3,8>": "", + "<11,18,3,9>": "", + "<11,18,3,10>": "", + "<11,18,3,11>": "", + "<11,18,3,12>": "", + "<11,18,3,13>": "", + "<11,18,3,14>": "", + "<11,18,3,15>": "COMMMOD", + "<11,18,3,16>": "0" + } + }, + "<11,19>": { + "<11,19,1>": "OMNIEVENT", + "<11,19,2>": "PROPCHANGED", + "<11,19,3>": "PROPOPTIONS" + }, + "<11,20>": "", + "<11,21>": "", + "<11,22>": "", + "<11,23>": "", + "<11,24>": "", + "<11,25>": "", + "<11,26>": "", + "<11,27>": "", + "<11,28>": "", + "<11,29>": "", + "<11,30>": "", + "<11,31>": "", + "<11,32>": "", + "<11,33>": "", + "<11,34>": "", + "<11,35>": { + "<11,35,1>": { + "<11,35,1,1>": "Parent Window", + "<11,35,1,2>": "Use Parent Window", + "<11,35,1,3>": "6", + "<11,35,1,4>": "1", + "<11,35,1,5>": "", + "<11,35,1,6>": "", + "<11,35,1,7>": "0", + "<11,35,1,8>": "0", + "<11,35,1,9>": "", + "<11,35,1,10>": "", + "<11,35,1,11>": "", + "<11,35,1,12>": "", + "<11,35,1,13>": "", + "<11,35,1,14>": "" + }, + "<11,35,2>": { + "<11,35,2,1>": "Parent Window", + "<11,35,2,2>": "Modal", + "<11,35,2,3>": "6", + "<11,35,2,4>": "1", + "<11,35,2,5>": "", + "<11,35,2,6>": "", + "<11,35,2,7>": "0", + "<11,35,2,8>": "0", + "<11,35,2,9>": "", + "<11,35,2,10>": "", + "<11,35,2,11>": "", + "<11,35,2,12>": "", + "<11,35,2,13>": "", + "<11,35,2,14>": "" + }, + "<11,35,3>": { + "<11,35,3,1>": "Parent Window", + "<11,35,3,2>": "Use EndDialog event", + "<11,35,3,3>": "6", + "<11,35,3,4>": "1", + "<11,35,3,5>": "", + "<11,35,3,6>": "", + "<11,35,3,7>": "0", + "<11,35,3,8>": "0", + "<11,35,3,9>": "", + "<11,35,3,10>": "", + "<11,35,3,11>": "", + "<11,35,3,12>": "", + "<11,35,3,13>": "", + "<11,35,3,14>": "" + }, + "<11,35,4>": { + "<11,35,4,1>": "Parent Window", + "<11,35,4,2>": "EndDialog AsyncID", + "<11,35,4,3>": "257", + "<11,35,4,4>": "$HTTPCLIENT:", + "<11,35,4,5>": "", + "<11,35,4,6>": "", + "<11,35,4,7>": "0", + "<11,35,4,8>": "0", + "<11,35,4,9>": "", + "<11,35,4,10>": "", + "<11,35,4,11>": "$HTTPCLIENT:", + "<11,35,4,12>": "", + "<11,35,4,13>": "", + "<11,35,4,14>": "" + }, + "<11,35,5>": { + "<11,35,5,1>": "Callback Procedure", + "<11,35,5,2>": "Procedure Name", + "<11,35,5,3>": "257", + "<11,35,5,4>": "", + "<11,35,5,5>": "", + "<11,35,5,6>": "", + "<11,35,5,7>": "1", + "<11,35,5,8>": "8", + "<11,35,5,9>": "[RTI_HTTP_DOWNLOAD_TEST,CALLBACKPROC]", + "<11,35,5,10>": "", + "<11,35,5,11>": "", + "<11,35,5,12>": "", + "<11,35,5,13>": "", + "<11,35,5,14>": "" + }, + "<11,35,6>": { + "<11,35,6,1>": "CallBack Procedure", + "<11,35,6,2>": "Callback ID", + "<11,35,6,3>": "257", + "<11,35,6,4>": "", + "<11,35,6,5>": "", + "<11,35,6,6>": "", + "<11,35,6,7>": "1", + "<11,35,6,8>": "0", + "<11,35,6,9>": "", + "<11,35,6,10>": "", + "<11,35,6,11>": "", + "<11,35,6,12>": "", + "<11,35,6,13>": "", + "<11,35,6,14>": "" + }, + "<11,35,7>": { + "<11,35,7,1>": "UI Options", + "<11,35,7,2>": "Loading Text", + "<11,35,7,3>": "257", + "<11,35,7,4>": "", + "<11,35,7,5>": "", + "<11,35,7,6>": "", + "<11,35,7,7>": "0", + "<11,35,7,8>": "0", + "<11,35,7,9>": "", + "<11,35,7,10>": "", + "<11,35,7,11>": "", + "<11,35,7,12>": "", + "<11,35,7,13>": "", + "<11,35,7,14>": "" + }, + "<11,35,8>": { + "<11,35,8,1>": "UI Options", + "<11,35,8,2>": "Sync Taskbar", + "<11,35,8,3>": "6", + "<11,35,8,4>": "1", + "<11,35,8,5>": "", + "<11,35,8,6>": "", + "<11,35,8,7>": "0", + "<11,35,8,8>": "0", + "<11,35,8,9>": "", + "<11,35,8,10>": "", + "<11,35,8,11>": "", + "<11,35,8,12>": "", + "<11,35,8,13>": "", + "<11,35,8,14>": "" + } + }, + "<11,36>": "", + "<11,37>": "", + "<11,38>": "", + "<11,39>": "", + "<11,40>": "", + "<11,41>": "", + "<11,42>": "", + "<11,43>": "", + "<11,44>": "", + "<11,45>": "", + "<11,46>": "", + "<11,47>": "", + "<11,48>": "", + "<11,49>": "", + "<11,50>": "", + "<11,51>": "", + "<11,52>": "", + "<11,53>": "", + "<11,54>": "", + "<11,55>": "0", + "<11,56>": "", + "<11,57>": "", + "<11,58>": "", + "<11,59>": "", + "<11,60>": "", + "<11,61>": "", + "<11,62>": "", + "<11,63>": "", + "<11,64>": "", + "<11,65>": "", + "<11,66>": "", + "<11,67>": "", + "<11,68>": "", + "<11,69>": "", + "<11,70>": "", + "<11,71>": "", + "<11,72>": "", + "<11,73>": "", + "<11,74>": "", + "<11,75>": "", + "<11,76>": "", + "<11,77>": "", + "<11,78>": "", + "<11,79>": "", + "<11,80>": "", + "<11,81>": "", + "<11,82>": "", + "<11,83>": "", + "<11,84>": "", + "<11,85>": "", + "<11,86>": "", + "<11,87>": "", + "<11,88>": "", + "<11,89>": "", + "<11,90>": "", + "<11,91>": "", + "<11,92>": "", + "<11,93>": "", + "<11,94>": "", + "<11,95>": "", + "<11,96>": "", + "<11,97>": "", + "<11,98>": "", + "<11,99>": "", + "<11,100>": "", + "<11,101>": "", + "<11,102>": "", + "<11,103>": "", + "<11,104>": "", + "<11,105>": "" + }, + "<12>": { + "<12,1>": "LBL_UIPARAMS", + "<12,2>": "", + "<12,3>": "STATIC", + "<12,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<12,5>": "12", + "<12,6>": "44", + "<12,7>": "76", + "<12,8>": "16", + "<12,9>": "uiParams:", + "<12,10>": { + "<12,10,1>": "0x56000200", + "<12,10,2>": "0x0" + }, + "<12,11>": { + "<12,11,1>": "0x0", + "<12,11,2>": "0x80000000" + }, + "<12,12>": "2", + "<12,13>": { + "<12,13,1>": "-2", + "<12,13,2>": "-2", + "<12,13,3>": "" + }, + "<12,14>": "-2", + "<12,15>": { + "<12,15,1>": { + "<12,15,1,1>": "Segoe UI", + "<12,15,1,2>": "-12", + "<12,15,1,3>": "400", + "<12,15,1,4>": "0", + "<12,15,1,5>": "0", + "<12,15,1,6>": "0", + "<12,15,1,7>": "0", + "<12,15,1,8>": "34", + "<12,15,1,9>": "0", + "<12,15,1,10>": "3", + "<12,15,1,11>": "2", + "<12,15,1,12>": "1" + } + }, + "<12,16>": "", + "<12,17>": "", + "<12,18>": "", + "<12,19>": "", + "<12,20>": "", + "<12,21>": "", + "<12,22>": "", + "<12,23>": "", + "<12,24>": "", + "<12,25>": "", + "<12,26>": "", + "<12,27>": "", + "<12,28>": "<>", + "<12,29>": "<>", + "<12,30>": "", + "<12,31>": "", + "<12,32>": "", + "<12,33>": "", + "<12,34>": "", + "<12,35>": "", + "<12,36>": "", + "<12,37>": "", + "<12,38>": "", + "<12,39>": "", + "<12,40>": "", + "<12,41>": "", + "<12,42>": "", + "<12,43>": "", + "<12,44>": "", + "<12,45>": "", + "<12,46>": "", + "<12,47>": "", + "<12,48>": "", + "<12,49>": "", + "<12,50>": "", + "<12,51>": "", + "<12,52>": "", + "<12,53>": "", + "<12,54>": "", + "<12,55>": "", + "<12,56>": "", + "<12,57>": "", + "<12,58>": "", + "<12,59>": "", + "<12,60>": "", + "<12,61>": "", + "<12,62>": "0", + "<12,63>": { + "<12,63,1>": "", + "<12,63,2>": "", + "<12,63,3>": "", + "<12,63,4>": "", + "<12,63,5>": "", + "<12,63,6>": "", + "<12,63,7>": "", + "<12,63,8>": "" + }, + "<12,64>": { + "<12,64,1>": "", + "<12,64,2>": "", + "<12,64,3>": "" + }, + "<12,65>": "-2", + "<12,66>": "", + "<12,67>": "", + "<12,68>": "", + "<12,69>": "", + "<12,70>": "", + "<12,71>": "", + "<12,72>": "", + "<12,73>": "", + "<12,74>": "", + "<12,75>": "", + "<12,76>": "", + "<12,77>": "", + "<12,78>": "", + "<12,79>": "", + "<12,80>": "", + "<12,81>": "", + "<12,82>": "", + "<12,83>": "", + "<12,84>": "", + "<12,85>": "", + "<12,86>": "", + "<12,87>": "", + "<12,88>": "", + "<12,89>": "", + "<12,90>": "0", + "<12,91>": "0", + "<12,92>": "" + }, + "<13>": { + "<13,1>": "LBL_USERNAME", + "<13,2>": "", + "<13,3>": "STATIC", + "<13,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<13,5>": "96", + "<13,6>": "372", + "<13,7>": "60", + "<13,8>": "20", + "<13,9>": "UserName:", + "<13,10>": { + "<13,10,1>": "0x56000A00", + "<13,10,2>": "0x0" + }, + "<13,11>": { + "<13,11,1>": "0x0", + "<13,11,2>": "0x80000000" + }, + "<13,12>": "13", + "<13,13>": { + "<13,13,1>": "-2", + "<13,13,2>": "-2", + "<13,13,3>": "" + }, + "<13,14>": "-2", + "<13,15>": { + "<13,15,1>": { + "<13,15,1,1>": "Segoe UI", + "<13,15,1,2>": "-12", + "<13,15,1,3>": "400", + "<13,15,1,4>": "0", + "<13,15,1,5>": "0", + "<13,15,1,6>": "0", + "<13,15,1,7>": "0", + "<13,15,1,8>": "34", + "<13,15,1,9>": "0", + "<13,15,1,10>": "3", + "<13,15,1,11>": "2", + "<13,15,1,12>": "1" + } + }, + "<13,16>": "", + "<13,17>": "", + "<13,18>": "", + "<13,19>": "", + "<13,20>": "", + "<13,21>": "", + "<13,22>": "", + "<13,23>": "", + "<13,24>": "", + "<13,25>": "", + "<13,26>": "", + "<13,27>": "", + "<13,28>": "<>", + "<13,29>": "<>", + "<13,30>": "", + "<13,31>": "", + "<13,32>": "", + "<13,33>": "", + "<13,34>": "", + "<13,35>": "", + "<13,36>": "", + "<13,37>": "", + "<13,38>": "", + "<13,39>": "", + "<13,40>": "", + "<13,41>": "", + "<13,42>": "", + "<13,43>": "", + "<13,44>": "", + "<13,45>": "", + "<13,46>": "", + "<13,47>": "", + "<13,48>": "", + "<13,49>": "", + "<13,50>": "", + "<13,51>": "", + "<13,52>": "", + "<13,53>": "", + "<13,54>": "", + "<13,55>": "", + "<13,56>": "", + "<13,57>": "", + "<13,58>": "", + "<13,59>": "", + "<13,60>": "", + "<13,61>": "", + "<13,62>": "0", + "<13,63>": { + "<13,63,1>": "", + "<13,63,2>": "", + "<13,63,3>": "", + "<13,63,4>": "", + "<13,63,5>": "", + "<13,63,6>": "", + "<13,63,7>": "", + "<13,63,8>": "" + }, + "<13,64>": { + "<13,64,1>": "", + "<13,64,2>": "", + "<13,64,3>": "" + }, + "<13,65>": "-2", + "<13,66>": "", + "<13,67>": "", + "<13,68>": "", + "<13,69>": "", + "<13,70>": "", + "<13,71>": "", + "<13,72>": "", + "<13,73>": "", + "<13,74>": "", + "<13,75>": "", + "<13,76>": "", + "<13,77>": "", + "<13,78>": "", + "<13,79>": "", + "<13,80>": "", + "<13,81>": "", + "<13,82>": "", + "<13,83>": "", + "<13,84>": "", + "<13,85>": "", + "<13,86>": "", + "<13,87>": "", + "<13,88>": "", + "<13,89>": "", + "<13,90>": "0", + "<13,91>": "0", + "<13,92>": "" + }, + "<14>": { + "<14,1>": "EDL_USERNAME", + "<14,2>": "", + "<14,3>": "EDITFIELD", + "<14,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<14,5>": "160", + "<14,6>": "372", + "<14,7>": "176", + "<14,8>": "20", + "<14,9>": "", + "<14,10>": { + "<14,10,1>": "0x56000080", + "<14,10,2>": "0x200" + }, + "<14,11>": { + "<14,11,1>": "0x0", + "<14,11,2>": "0x80000000" + }, + "<14,12>": "14", + "<14,13>": { + "<14,13,1>": "-2", + "<14,13,2>": "-2", + "<14,13,3>": "" + }, + "<14,14>": "-2", + "<14,15>": { + "<14,15,1>": { + "<14,15,1,1>": "Segoe UI", + "<14,15,1,2>": "-12", + "<14,15,1,3>": "400", + "<14,15,1,4>": "0", + "<14,15,1,5>": "0", + "<14,15,1,6>": "0", + "<14,15,1,7>": "0", + "<14,15,1,8>": "34", + "<14,15,1,9>": "0", + "<14,15,1,10>": "3", + "<14,15,1,11>": "2", + "<14,15,1,12>": "1" + } + }, + "<14,16>": "", + "<14,17>": "", + "<14,18>": "", + "<14,19>": "", + "<14,20>": "", + "<14,21>": "", + "<14,22>": "", + "<14,23>": "", + "<14,24>": "", + "<14,25>": "", + "<14,26>": "", + "<14,27>": "", + "<14,28>": "<>", + "<14,29>": "<>", + "<14,30>": "<>", + "<14,31>": "0", + "<14,32>": "", + "<14,33>": "", + "<14,34>": "", + "<14,35>": "", + "<14,36>": { + "<14,36,1>": "0", + "<14,36,2>": "0" + }, + "<14,37>": "", + "<14,38>": "", + "<14,39>": "", + "<14,40>": "", + "<14,41>": "", + "<14,42>": "", + "<14,43>": "", + "<14,44>": "", + "<14,45>": "", + "<14,46>": "", + "<14,47>": "", + "<14,48>": "", + "<14,49>": "", + "<14,50>": "", + "<14,51>": "", + "<14,52>": "", + "<14,53>": "", + "<14,54>": "", + "<14,55>": "", + "<14,56>": "", + "<14,57>": "", + "<14,58>": "", + "<14,59>": "", + "<14,60>": "", + "<14,61>": "", + "<14,62>": "0", + "<14,63>": "", + "<14,64>": "", + "<14,65>": "", + "<14,66>": "", + "<14,67>": "", + "<14,68>": "", + "<14,69>": "", + "<14,70>": "", + "<14,71>": "", + "<14,72>": "", + "<14,73>": "", + "<14,74>": "", + "<14,75>": "", + "<14,76>": "", + "<14,77>": "", + "<14,78>": "", + "<14,79>": "", + "<14,80>": "", + "<14,81>": "", + "<14,82>": "", + "<14,83>": "", + "<14,84>": "", + "<14,85>": "", + "<14,86>": "", + "<14,87>": "", + "<14,88>": "", + "<14,89>": "", + "<14,90>": "", + "<14,91>": "", + "<14,92>": "" + }, + "<15>": { + "<15,1>": "LBL_PASSWORD", + "<15,2>": "", + "<15,3>": "STATIC", + "<15,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<15,5>": "96", + "<15,6>": "396", + "<15,7>": "60", + "<15,8>": "20", + "<15,9>": "Password:", + "<15,10>": { + "<15,10,1>": "0x56000A00", + "<15,10,2>": "0x0" + }, + "<15,11>": { + "<15,11,1>": "0x0", + "<15,11,2>": "0x80000000" + }, + "<15,12>": "15", + "<15,13>": { + "<15,13,1>": "-2", + "<15,13,2>": "-2", + "<15,13,3>": "" + }, + "<15,14>": "-2", + "<15,15>": { + "<15,15,1>": { + "<15,15,1,1>": "Segoe UI", + "<15,15,1,2>": "-12", + "<15,15,1,3>": "400", + "<15,15,1,4>": "0", + "<15,15,1,5>": "0", + "<15,15,1,6>": "0", + "<15,15,1,7>": "0", + "<15,15,1,8>": "34", + "<15,15,1,9>": "0", + "<15,15,1,10>": "3", + "<15,15,1,11>": "2", + "<15,15,1,12>": "1" + } + }, + "<15,16>": "", + "<15,17>": "", + "<15,18>": "", + "<15,19>": "", + "<15,20>": "", + "<15,21>": "", + "<15,22>": "", + "<15,23>": "", + "<15,24>": "", + "<15,25>": "", + "<15,26>": "", + "<15,27>": "", + "<15,28>": "<>", + "<15,29>": "<>", + "<15,30>": "", + "<15,31>": "", + "<15,32>": "", + "<15,33>": "", + "<15,34>": "", + "<15,35>": "", + "<15,36>": "", + "<15,37>": "", + "<15,38>": "", + "<15,39>": "", + "<15,40>": "", + "<15,41>": "", + "<15,42>": "", + "<15,43>": "", + "<15,44>": "", + "<15,45>": "", + "<15,46>": "", + "<15,47>": "", + "<15,48>": "", + "<15,49>": "", + "<15,50>": "", + "<15,51>": "", + "<15,52>": "", + "<15,53>": "", + "<15,54>": "", + "<15,55>": "", + "<15,56>": "", + "<15,57>": "", + "<15,58>": "", + "<15,59>": "", + "<15,60>": "", + "<15,61>": "", + "<15,62>": "0", + "<15,63>": { + "<15,63,1>": "", + "<15,63,2>": "", + "<15,63,3>": "", + "<15,63,4>": "", + "<15,63,5>": "", + "<15,63,6>": "", + "<15,63,7>": "", + "<15,63,8>": "" + }, + "<15,64>": { + "<15,64,1>": "", + "<15,64,2>": "", + "<15,64,3>": "" + }, + "<15,65>": "-2", + "<15,66>": "", + "<15,67>": "", + "<15,68>": "", + "<15,69>": "", + "<15,70>": "", + "<15,71>": "", + "<15,72>": "", + "<15,73>": "", + "<15,74>": "", + "<15,75>": "", + "<15,76>": "", + "<15,77>": "", + "<15,78>": "", + "<15,79>": "", + "<15,80>": "", + "<15,81>": "", + "<15,82>": "", + "<15,83>": "", + "<15,84>": "", + "<15,85>": "", + "<15,86>": "", + "<15,87>": "", + "<15,88>": "", + "<15,89>": "", + "<15,90>": "0", + "<15,91>": "0", + "<15,92>": "" + }, + "<16>": { + "<16,1>": "EDL_PASSWORD", + "<16,2>": "", + "<16,3>": "EDITFIELD", + "<16,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<16,5>": "160", + "<16,6>": "396", + "<16,7>": "152", + "<16,8>": "20", + "<16,9>": "", + "<16,10>": { + "<16,10,1>": "0x56000080", + "<16,10,2>": "0x200" + }, + "<16,11>": { + "<16,11,1>": "0x0", + "<16,11,2>": "0x80000100" + }, + "<16,12>": "16", + "<16,13>": { + "<16,13,1>": "-2", + "<16,13,2>": "-2", + "<16,13,3>": "" + }, + "<16,14>": "-2", + "<16,15>": { + "<16,15,1>": { + "<16,15,1,1>": "Segoe UI", + "<16,15,1,2>": "-12", + "<16,15,1,3>": "400", + "<16,15,1,4>": "0", + "<16,15,1,5>": "0", + "<16,15,1,6>": "0", + "<16,15,1,7>": "0", + "<16,15,1,8>": "34", + "<16,15,1,9>": "0", + "<16,15,1,10>": "3", + "<16,15,1,11>": "2", + "<16,15,1,12>": "1" + } + }, + "<16,16>": "", + "<16,17>": "", + "<16,18>": "", + "<16,19>": "", + "<16,20>": "", + "<16,21>": "", + "<16,22>": "", + "<16,23>": "", + "<16,24>": "", + "<16,25>": "", + "<16,26>": "", + "<16,27>": "", + "<16,28>": "<>", + "<16,29>": "<>", + "<16,30>": "<>", + "<16,31>": "0", + "<16,32>": "", + "<16,33>": "", + "<16,34>": "", + "<16,35>": "", + "<16,36>": { + "<16,36,1>": "-1", + "<16,36,2>": "0" + }, + "<16,37>": "", + "<16,38>": "", + "<16,39>": "", + "<16,40>": "120", + "<16,41>": "", + "<16,42>": "", + "<16,43>": "", + "<16,44>": "", + "<16,45>": "", + "<16,46>": "", + "<16,47>": "", + "<16,48>": "", + "<16,49>": "", + "<16,50>": "", + "<16,51>": "", + "<16,52>": "", + "<16,53>": "", + "<16,54>": "", + "<16,55>": "", + "<16,56>": { + "<16,56,1>": "", + "<16,56,2>": "", + "<16,56,3>": "" + }, + "<16,57>": "", + "<16,58>": "", + "<16,59>": "", + "<16,60>": "", + "<16,61>": "", + "<16,62>": "0", + "<16,63>": "", + "<16,64>": "", + "<16,65>": "", + "<16,66>": "", + "<16,67>": "", + "<16,68>": "", + "<16,69>": "", + "<16,70>": "", + "<16,71>": "", + "<16,72>": "", + "<16,73>": "", + "<16,74>": "", + "<16,75>": "", + "<16,76>": "", + "<16,77>": "", + "<16,78>": "", + "<16,79>": "", + "<16,80>": "", + "<16,81>": "", + "<16,82>": "", + "<16,83>": "", + "<16,84>": "", + "<16,85>": "", + "<16,86>": "", + "<16,87>": "", + "<16,88>": "", + "<16,89>": "", + "<16,90>": "", + "<16,91>": "", + "<16,92>": "" + }, + "<17>": { + "<17,1>": "LBL_TIMEOUT", + "<17,2>": "", + "<17,3>": "STATIC", + "<17,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<17,5>": "264", + "<17,6>": "320", + "<17,7>": "68", + "<17,8>": "20", + "<17,9>": "Timeout:", + "<17,10>": { + "<17,10,1>": "0x56000A00", + "<17,10,2>": "0x0" + }, + "<17,11>": { + "<17,11,1>": "0x0", + "<17,11,2>": "0x80000000" + }, + "<17,12>": "8", + "<17,13>": { + "<17,13,1>": "-2", + "<17,13,2>": "-2", + "<17,13,3>": "" + }, + "<17,14>": "-2", + "<17,15>": { + "<17,15,1>": { + "<17,15,1,1>": "Segoe UI", + "<17,15,1,2>": "-12", + "<17,15,1,3>": "400", + "<17,15,1,4>": "0", + "<17,15,1,5>": "0", + "<17,15,1,6>": "0", + "<17,15,1,7>": "0", + "<17,15,1,8>": "34", + "<17,15,1,9>": "0", + "<17,15,1,10>": "3", + "<17,15,1,11>": "2", + "<17,15,1,12>": "1" + } + }, + "<17,16>": "", + "<17,17>": "", + "<17,18>": "", + "<17,19>": "", + "<17,20>": "", + "<17,21>": "", + "<17,22>": "", + "<17,23>": "", + "<17,24>": "", + "<17,25>": "", + "<17,26>": "", + "<17,27>": "", + "<17,28>": "<>", + "<17,29>": "<>", + "<17,30>": "", + "<17,31>": "", + "<17,32>": "", + "<17,33>": "", + "<17,34>": "", + "<17,35>": "", + "<17,36>": "", + "<17,37>": "", + "<17,38>": "", + "<17,39>": "", + "<17,40>": "", + "<17,41>": "", + "<17,42>": "", + "<17,43>": "", + "<17,44>": "", + "<17,45>": "", + "<17,46>": "", + "<17,47>": "", + "<17,48>": "", + "<17,49>": "", + "<17,50>": "", + "<17,51>": "", + "<17,52>": "", + "<17,53>": "", + "<17,54>": "", + "<17,55>": "", + "<17,56>": "", + "<17,57>": "", + "<17,58>": "", + "<17,59>": "", + "<17,60>": "", + "<17,61>": "", + "<17,62>": "0", + "<17,63>": { + "<17,63,1>": "", + "<17,63,2>": "", + "<17,63,3>": "", + "<17,63,4>": "", + "<17,63,5>": "", + "<17,63,6>": "", + "<17,63,7>": "", + "<17,63,8>": "" + }, + "<17,64>": { + "<17,64,1>": "", + "<17,64,2>": "", + "<17,64,3>": "" + }, + "<17,65>": "-2", + "<17,66>": "", + "<17,67>": "", + "<17,68>": "", + "<17,69>": "", + "<17,70>": "", + "<17,71>": "", + "<17,72>": "", + "<17,73>": "", + "<17,74>": "", + "<17,75>": "", + "<17,76>": "", + "<17,77>": "", + "<17,78>": "", + "<17,79>": "", + "<17,80>": "", + "<17,81>": "", + "<17,82>": "", + "<17,83>": "", + "<17,84>": "", + "<17,85>": "", + "<17,86>": "", + "<17,87>": "", + "<17,88>": "", + "<17,89>": "", + "<17,90>": "0", + "<17,91>": "0", + "<17,92>": "" + }, + "<18>": { + "<18,1>": "EDL_TIMEOUT", + "<18,2>": "", + "<18,3>": "EDITFIELD", + "<18,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<18,5>": "339", + "<18,6>": "320", + "<18,7>": "100", + "<18,8>": "20", + "<18,9>": "", + "<18,10>": { + "<18,10,1>": "0x56000080", + "<18,10,2>": "0x200" + }, + "<18,11>": { + "<18,11,1>": "0x0", + "<18,11,2>": "0x80000000" + }, + "<18,12>": "9", + "<18,13>": { + "<18,13,1>": "-2", + "<18,13,2>": "-2", + "<18,13,3>": "" + }, + "<18,14>": "-2", + "<18,15>": { + "<18,15,1>": { + "<18,15,1,1>": "Segoe UI", + "<18,15,1,2>": "-12", + "<18,15,1,3>": "400", + "<18,15,1,4>": "0", + "<18,15,1,5>": "0", + "<18,15,1,6>": "0", + "<18,15,1,7>": "0", + "<18,15,1,8>": "34", + "<18,15,1,9>": "0", + "<18,15,1,10>": "3", + "<18,15,1,11>": "2", + "<18,15,1,12>": "1" + } + }, + "<18,16>": "", + "<18,17>": "", + "<18,18>": "", + "<18,19>": "", + "<18,20>": "", + "<18,21>": "", + "<18,22>": "", + "<18,23>": "", + "<18,24>": "", + "<18,25>": "", + "<18,26>": "", + "<18,27>": "", + "<18,28>": "<>", + "<18,29>": "<>", + "<18,30>": "<>", + "<18,31>": "0", + "<18,32>": "", + "<18,33>": "", + "<18,34>": "", + "<18,35>": "", + "<18,36>": { + "<18,36,1>": "0", + "<18,36,2>": "0" + }, + "<18,37>": "", + "<18,38>": "", + "<18,39>": "", + "<18,40>": "", + "<18,41>": "", + "<18,42>": "", + "<18,43>": "", + "<18,44>": "", + "<18,45>": "", + "<18,46>": "", + "<18,47>": "", + "<18,48>": "", + "<18,49>": "", + "<18,50>": "", + "<18,51>": "", + "<18,52>": "", + "<18,53>": "", + "<18,54>": "", + "<18,55>": "", + "<18,56>": "", + "<18,57>": "0123456789", + "<18,58>": "", + "<18,59>": "", + "<18,60>": "", + "<18,61>": "", + "<18,62>": "0", + "<18,63>": "", + "<18,64>": "", + "<18,65>": "", + "<18,66>": "", + "<18,67>": "", + "<18,68>": "", + "<18,69>": "", + "<18,70>": "", + "<18,71>": "", + "<18,72>": "", + "<18,73>": "", + "<18,74>": "", + "<18,75>": "", + "<18,76>": "", + "<18,77>": "", + "<18,78>": "", + "<18,79>": "", + "<18,80>": "", + "<18,81>": "", + "<18,82>": "", + "<18,83>": "", + "<18,84>": "", + "<18,85>": "", + "<18,86>": "", + "<18,87>": "", + "<18,88>": "", + "<18,89>": "", + "<18,90>": "", + "<18,91>": "", + "<18,92>": "" + }, + "<19>": { + "<19,1>": "LBL_REQUESTHEADERS", + "<19,2>": "", + "<19,3>": "STATIC", + "<19,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<19,5>": "12", + "<19,6>": "424", + "<19,7>": "76", + "<19,8>": "20", + "<19,9>": "Headers:", + "<19,10>": { + "<19,10,1>": "0x56000200", + "<19,10,2>": "0x0" + }, + "<19,11>": { + "<19,11,1>": "0x0", + "<19,11,2>": "0x80000000" + }, + "<19,12>": "18", + "<19,13>": { + "<19,13,1>": "-2", + "<19,13,2>": "-2", + "<19,13,3>": "" + }, + "<19,14>": "-2", + "<19,15>": { + "<19,15,1>": { + "<19,15,1,1>": "Segoe UI", + "<19,15,1,2>": "-12", + "<19,15,1,3>": "400", + "<19,15,1,4>": "0", + "<19,15,1,5>": "0", + "<19,15,1,6>": "0", + "<19,15,1,7>": "0", + "<19,15,1,8>": "34", + "<19,15,1,9>": "0", + "<19,15,1,10>": "3", + "<19,15,1,11>": "2", + "<19,15,1,12>": "1" + } + }, + "<19,16>": "", + "<19,17>": "", + "<19,18>": "", + "<19,19>": "", + "<19,20>": "", + "<19,21>": "", + "<19,22>": "", + "<19,23>": "", + "<19,24>": "", + "<19,25>": "", + "<19,26>": "", + "<19,27>": "", + "<19,28>": "<>", + "<19,29>": "<>", + "<19,30>": "", + "<19,31>": "", + "<19,32>": "", + "<19,33>": "", + "<19,34>": "", + "<19,35>": "", + "<19,36>": "", + "<19,37>": "", + "<19,38>": "", + "<19,39>": "", + "<19,40>": "", + "<19,41>": "", + "<19,42>": "", + "<19,43>": "", + "<19,44>": "", + "<19,45>": "", + "<19,46>": "", + "<19,47>": "", + "<19,48>": "", + "<19,49>": "", + "<19,50>": "", + "<19,51>": "", + "<19,52>": "", + "<19,53>": "", + "<19,54>": "", + "<19,55>": "", + "<19,56>": "", + "<19,57>": "", + "<19,58>": "", + "<19,59>": "", + "<19,60>": "", + "<19,61>": "", + "<19,62>": "0", + "<19,63>": { + "<19,63,1>": "", + "<19,63,2>": "", + "<19,63,3>": "", + "<19,63,4>": "", + "<19,63,5>": "", + "<19,63,6>": "", + "<19,63,7>": "", + "<19,63,8>": "" + }, + "<19,64>": { + "<19,64,1>": "", + "<19,64,2>": "", + "<19,64,3>": "" + }, + "<19,65>": "-2", + "<19,66>": "", + "<19,67>": "", + "<19,68>": "", + "<19,69>": "", + "<19,70>": "", + "<19,71>": "", + "<19,72>": "", + "<19,73>": "", + "<19,74>": "", + "<19,75>": "", + "<19,76>": "", + "<19,77>": "", + "<19,78>": "", + "<19,79>": "", + "<19,80>": "", + "<19,81>": "", + "<19,82>": "", + "<19,83>": "", + "<19,84>": "", + "<19,85>": "", + "<19,86>": "", + "<19,87>": "", + "<19,88>": "", + "<19,89>": "", + "<19,90>": "0", + "<19,91>": "0", + "<19,92>": "" + }, + "<20>": { + "<20,1>": "TXT_RESPONSE", + "<20,2>": "", + "<20,3>": "STATIC", + "<20,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<20,5>": "452", + "<20,6>": "12", + "<20,7>": "472", + "<20,8>": "24", + "<20,9>": " Response Information", + "<20,10>": { + "<20,10,1>": "0x56000200", + "<20,10,2>": "0x0" + }, + "<20,11>": { + "<20,11,1>": "0x0", + "<20,11,2>": "0x80000000" + }, + "<20,12>": "24", + "<20,13>": { + "<20,13,1>": "-1879048192", + "<20,13,2>": "-1879048192", + "<20,13,3>": "0" + }, + "<20,14>": "16777215", + "<20,15>": { + "<20,15,1>": { + "<20,15,1,1>": "Segoe UI", + "<20,15,1,2>": "-14", + "<20,15,1,3>": "400", + "<20,15,1,4>": "0", + "<20,15,1,5>": "0", + "<20,15,1,6>": "0", + "<20,15,1,7>": "0", + "<20,15,1,8>": "34", + "<20,15,1,9>": "0", + "<20,15,1,10>": "3", + "<20,15,1,11>": "2", + "<20,15,1,12>": "1" + } + }, + "<20,16>": "", + "<20,17>": "", + "<20,18>": "", + "<20,19>": "", + "<20,20>": "", + "<20,21>": "", + "<20,22>": "", + "<20,23>": "", + "<20,24>": "", + "<20,25>": "", + "<20,26>": "", + "<20,27>": "", + "<20,28>": "<>", + "<20,29>": "<>", + "<20,30>": "", + "<20,31>": "", + "<20,32>": "", + "<20,33>": "", + "<20,34>": "", + "<20,35>": "", + "<20,36>": "", + "<20,37>": "", + "<20,38>": "", + "<20,39>": "", + "<20,40>": "", + "<20,41>": "", + "<20,42>": "", + "<20,43>": "", + "<20,44>": "", + "<20,45>": "", + "<20,46>": "", + "<20,47>": "", + "<20,48>": "", + "<20,49>": "", + "<20,50>": "", + "<20,51>": "", + "<20,52>": "", + "<20,53>": "", + "<20,54>": "", + "<20,55>": "", + "<20,56>": "", + "<20,57>": "", + "<20,58>": "", + "<20,59>": "", + "<20,60>": "", + "<20,61>": "", + "<20,62>": "0", + "<20,63>": { + "<20,63,1>": "", + "<20,63,2>": "", + "<20,63,3>": "", + "<20,63,4>": "", + "<20,63,5>": "", + "<20,63,6>": "", + "<20,63,7>": "", + "<20,63,8>": "" + }, + "<20,64>": { + "<20,64,1>": "", + "<20,64,2>": "", + "<20,64,3>": "" + }, + "<20,65>": "-2", + "<20,66>": "", + "<20,67>": "", + "<20,68>": "", + "<20,69>": "", + "<20,70>": "", + "<20,71>": "", + "<20,72>": "", + "<20,73>": "", + "<20,74>": "", + "<20,75>": "", + "<20,76>": "", + "<20,77>": "", + "<20,78>": "", + "<20,79>": "", + "<20,80>": "", + "<20,81>": "", + "<20,82>": "", + "<20,83>": "", + "<20,84>": "", + "<20,85>": "", + "<20,86>": "", + "<20,87>": "", + "<20,88>": "", + "<20,89>": "", + "<20,90>": "0", + "<20,91>": "0", + "<20,92>": "" + }, + "<21>": { + "<21,1>": "LBL_PAYLOAD", + "<21,2>": "", + "<21,3>": "STATIC", + "<21,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<21,5>": "12", + "<21,6>": "344", + "<21,7>": "76", + "<21,8>": "20", + "<21,9>": "Payload:", + "<21,10>": { + "<21,10,1>": "0x56000200", + "<21,10,2>": "0x0" + }, + "<21,11>": { + "<21,11,1>": "0x0", + "<21,11,2>": "0x80000000" + }, + "<21,12>": "10", + "<21,13>": { + "<21,13,1>": "-2", + "<21,13,2>": "-2", + "<21,13,3>": "" + }, + "<21,14>": "-2", + "<21,15>": { + "<21,15,1>": { + "<21,15,1,1>": "Segoe UI", + "<21,15,1,2>": "-12", + "<21,15,1,3>": "400", + "<21,15,1,4>": "0", + "<21,15,1,5>": "0", + "<21,15,1,6>": "0", + "<21,15,1,7>": "0", + "<21,15,1,8>": "34", + "<21,15,1,9>": "0", + "<21,15,1,10>": "3", + "<21,15,1,11>": "2", + "<21,15,1,12>": "1" + } + }, + "<21,16>": "", + "<21,17>": "", + "<21,18>": "", + "<21,19>": "", + "<21,20>": "", + "<21,21>": "", + "<21,22>": "", + "<21,23>": "", + "<21,24>": "", + "<21,25>": "", + "<21,26>": "", + "<21,27>": "", + "<21,28>": "<>", + "<21,29>": "<>", + "<21,30>": "", + "<21,31>": "", + "<21,32>": "", + "<21,33>": "", + "<21,34>": "", + "<21,35>": "", + "<21,36>": "", + "<21,37>": "", + "<21,38>": "", + "<21,39>": "", + "<21,40>": "", + "<21,41>": "", + "<21,42>": "", + "<21,43>": "", + "<21,44>": "", + "<21,45>": "", + "<21,46>": "", + "<21,47>": "", + "<21,48>": "", + "<21,49>": "", + "<21,50>": "", + "<21,51>": "", + "<21,52>": "", + "<21,53>": "", + "<21,54>": "", + "<21,55>": "", + "<21,56>": "", + "<21,57>": "", + "<21,58>": "", + "<21,59>": "", + "<21,60>": "", + "<21,61>": "", + "<21,62>": "0", + "<21,63>": { + "<21,63,1>": "", + "<21,63,2>": "", + "<21,63,3>": "", + "<21,63,4>": "", + "<21,63,5>": "", + "<21,63,6>": "", + "<21,63,7>": "", + "<21,63,8>": "" + }, + "<21,64>": { + "<21,64,1>": "", + "<21,64,2>": "", + "<21,64,3>": "" + }, + "<21,65>": "-2", + "<21,66>": "", + "<21,67>": "", + "<21,68>": "", + "<21,69>": "", + "<21,70>": "", + "<21,71>": "", + "<21,72>": "", + "<21,73>": "", + "<21,74>": "", + "<21,75>": "", + "<21,76>": "", + "<21,77>": "", + "<21,78>": "", + "<21,79>": "", + "<21,80>": "", + "<21,81>": "", + "<21,82>": "", + "<21,83>": "", + "<21,84>": "", + "<21,85>": "", + "<21,86>": "", + "<21,87>": "", + "<21,88>": "", + "<21,89>": "", + "<21,90>": "0", + "<21,91>": "0", + "<21,92>": "" + }, + "<22>": { + "<22,1>": "EDL_PAYLOAD", + "<22,2>": "", + "<22,3>": "EDITFIELD", + "<22,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<22,5>": "92", + "<22,6>": "344", + "<22,7>": "348", + "<22,8>": "20", + "<22,9>": "", + "<22,10>": { + "<22,10,1>": "0x56000080", + "<22,10,2>": "0x200" + }, + "<22,11>": { + "<22,11,1>": "0x0", + "<22,11,2>": "0x80000000" + }, + "<22,12>": "11", + "<22,13>": { + "<22,13,1>": "-2", + "<22,13,2>": "-2", + "<22,13,3>": "" + }, + "<22,14>": "-2", + "<22,15>": { + "<22,15,1>": { + "<22,15,1,1>": "Segoe UI", + "<22,15,1,2>": "-12", + "<22,15,1,3>": "400", + "<22,15,1,4>": "0", + "<22,15,1,5>": "0", + "<22,15,1,6>": "0", + "<22,15,1,7>": "0", + "<22,15,1,8>": "34", + "<22,15,1,9>": "0", + "<22,15,1,10>": "3", + "<22,15,1,11>": "2", + "<22,15,1,12>": "1" + } + }, + "<22,16>": "", + "<22,17>": "", + "<22,18>": "", + "<22,19>": "", + "<22,20>": "", + "<22,21>": "", + "<22,22>": "", + "<22,23>": "", + "<22,24>": "", + "<22,25>": "", + "<22,26>": "", + "<22,27>": "", + "<22,28>": "<>", + "<22,29>": "<>", + "<22,30>": "<>", + "<22,31>": "0", + "<22,32>": "", + "<22,33>": "", + "<22,34>": "", + "<22,35>": "", + "<22,36>": { + "<22,36,1>": "0", + "<22,36,2>": "0" + }, + "<22,37>": "", + "<22,38>": "", + "<22,39>": "", + "<22,40>": "", + "<22,41>": "", + "<22,42>": "", + "<22,43>": "", + "<22,44>": "", + "<22,45>": "", + "<22,46>": "", + "<22,47>": "", + "<22,48>": "", + "<22,49>": "", + "<22,50>": "", + "<22,51>": "", + "<22,52>": "", + "<22,53>": "", + "<22,54>": "", + "<22,55>": "", + "<22,56>": "", + "<22,57>": "", + "<22,58>": "", + "<22,59>": "", + "<22,60>": "", + "<22,61>": "", + "<22,62>": "0", + "<22,63>": "", + "<22,64>": "", + "<22,65>": "", + "<22,66>": "", + "<22,67>": "", + "<22,68>": "", + "<22,69>": "", + "<22,70>": "", + "<22,71>": "", + "<22,72>": "", + "<22,73>": "", + "<22,74>": "", + "<22,75>": "", + "<22,76>": "", + "<22,77>": "", + "<22,78>": "", + "<22,79>": "", + "<22,80>": "", + "<22,81>": "", + "<22,82>": "", + "<22,83>": "", + "<22,84>": "", + "<22,85>": "", + "<22,86>": "", + "<22,87>": "", + "<22,88>": "", + "<22,89>": "", + "<22,90>": "", + "<22,91>": "", + "<22,92>": "" + }, + "<23>": { + "<23,1>": "LBL_RESPONSEFILE", + "<23,2>": "", + "<23,3>": "STATIC", + "<23,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<23,5>": "12", + "<23,6>": "524", + "<23,7>": "76", + "<23,8>": "20", + "<23,9>": "ResponseFile:", + "<23,10>": { + "<23,10,1>": "0x56000200", + "<23,10,2>": "0x0" + }, + "<23,11>": { + "<23,11,1>": "0x0", + "<23,11,2>": "0x80000000" + }, + "<23,12>": "20", + "<23,13>": { + "<23,13,1>": "-2", + "<23,13,2>": "-2", + "<23,13,3>": "" + }, + "<23,14>": "-2", + "<23,15>": { + "<23,15,1>": { + "<23,15,1,1>": "Segoe UI", + "<23,15,1,2>": "-12", + "<23,15,1,3>": "400", + "<23,15,1,4>": "0", + "<23,15,1,5>": "0", + "<23,15,1,6>": "0", + "<23,15,1,7>": "0", + "<23,15,1,8>": "34", + "<23,15,1,9>": "0", + "<23,15,1,10>": "3", + "<23,15,1,11>": "2", + "<23,15,1,12>": "1" + } + }, + "<23,16>": "", + "<23,17>": "", + "<23,18>": "", + "<23,19>": "", + "<23,20>": "", + "<23,21>": "", + "<23,22>": "", + "<23,23>": "", + "<23,24>": "", + "<23,25>": "", + "<23,26>": "", + "<23,27>": "", + "<23,28>": "<>", + "<23,29>": "<>", + "<23,30>": "", + "<23,31>": "", + "<23,32>": "", + "<23,33>": "", + "<23,34>": "", + "<23,35>": "", + "<23,36>": "", + "<23,37>": "", + "<23,38>": "", + "<23,39>": "", + "<23,40>": "", + "<23,41>": "", + "<23,42>": "", + "<23,43>": "", + "<23,44>": "", + "<23,45>": "", + "<23,46>": "", + "<23,47>": "", + "<23,48>": "", + "<23,49>": "", + "<23,50>": "", + "<23,51>": "", + "<23,52>": "", + "<23,53>": "", + "<23,54>": "", + "<23,55>": "", + "<23,56>": "", + "<23,57>": "", + "<23,58>": "", + "<23,59>": "", + "<23,60>": "", + "<23,61>": "", + "<23,62>": "0", + "<23,63>": { + "<23,63,1>": "", + "<23,63,2>": "", + "<23,63,3>": "", + "<23,63,4>": "", + "<23,63,5>": "", + "<23,63,6>": "", + "<23,63,7>": "", + "<23,63,8>": "" + }, + "<23,64>": { + "<23,64,1>": "", + "<23,64,2>": "", + "<23,64,3>": "" + }, + "<23,65>": "-2", + "<23,66>": "", + "<23,67>": "", + "<23,68>": "", + "<23,69>": "", + "<23,70>": "", + "<23,71>": "", + "<23,72>": "", + "<23,73>": "", + "<23,74>": "", + "<23,75>": "", + "<23,76>": "", + "<23,77>": "", + "<23,78>": "", + "<23,79>": "", + "<23,80>": "", + "<23,81>": "", + "<23,82>": "", + "<23,83>": "", + "<23,84>": "", + "<23,85>": "", + "<23,86>": "", + "<23,87>": "", + "<23,88>": "", + "<23,89>": "", + "<23,90>": "0", + "<23,91>": "0", + "<23,92>": "" + }, + "<24>": { + "<24,1>": "EDL_RESPONSEFILE", + "<24,2>": "", + "<24,3>": "EDITFIELD", + "<24,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<24,5>": "92", + "<24,6>": "524", + "<24,7>": "324", + "<24,8>": "20", + "<24,9>": "", + "<24,10>": { + "<24,10,1>": "0x56000080", + "<24,10,2>": "0x200" + }, + "<24,11>": { + "<24,11,1>": "0x0", + "<24,11,2>": "0x80000000" + }, + "<24,12>": "21", + "<24,13>": { + "<24,13,1>": "-2", + "<24,13,2>": "-2", + "<24,13,3>": "" + }, + "<24,14>": "-2", + "<24,15>": { + "<24,15,1>": { + "<24,15,1,1>": "Segoe UI", + "<24,15,1,2>": "-12", + "<24,15,1,3>": "400", + "<24,15,1,4>": "0", + "<24,15,1,5>": "0", + "<24,15,1,6>": "0", + "<24,15,1,7>": "0", + "<24,15,1,8>": "34", + "<24,15,1,9>": "0", + "<24,15,1,10>": "3", + "<24,15,1,11>": "2", + "<24,15,1,12>": "1" + } + }, + "<24,16>": "", + "<24,17>": "", + "<24,18>": { + "<24,18,1>": { + "<24,18,1,1>": "X", + "<24,18,1,2>": "EXECUTE", + "<24,18,1,3>": "@COMMUTER", + "<24,18,1,4>": { + "<24,18,1,4,1>": "@SELF", + "<24,18,1,4,2>": "@EVENT", + "<24,18,1,4,3>": "@PARAM1", + "<24,18,1,4,4>": "@PARAM2", + "<24,18,1,4,5>": "@PARAM3", + "<24,18,1,4,6>": "@PARAM4", + "<24,18,1,4,7>": "@PARAM5", + "<24,18,1,4,8>": "@PARAM6" + }, + "<24,18,1,5>": "", + "<24,18,1,6>": "", + "<24,18,1,7>": "", + "<24,18,1,8>": "", + "<24,18,1,9>": "", + "<24,18,1,10>": "", + "<24,18,1,11>": "", + "<24,18,1,12>": "", + "<24,18,1,13>": "", + "<24,18,1,14>": "", + "<24,18,1,15>": "COMMMOD", + "<24,18,1,16>": "0" + } + }, + "<24,19>": "OPTIONS", + "<24,20>": "", + "<24,21>": "", + "<24,22>": "", + "<24,23>": "", + "<24,24>": "", + "<24,25>": "", + "<24,26>": "", + "<24,27>": "", + "<24,28>": "<>", + "<24,29>": "<>", + "<24,30>": "<>", + "<24,31>": "0", + "<24,32>": "", + "<24,33>": "", + "<24,34>": "", + "<24,35>": "", + "<24,36>": { + "<24,36,1>": "0", + "<24,36,2>": "0" + }, + "<24,37>": "", + "<24,38>": "", + "<24,39>": "", + "<24,40>": "", + "<24,41>": "", + "<24,42>": "", + "<24,43>": "", + "<24,44>": "", + "<24,45>": "", + "<24,46>": "", + "<24,47>": "", + "<24,48>": "", + "<24,49>": "", + "<24,50>": "", + "<24,51>": "", + "<24,52>": "", + "<24,53>": "", + "<24,54>": "", + "<24,55>": "", + "<24,56>": "", + "<24,57>": "", + "<24,58>": "", + "<24,59>": "", + "<24,60>": "", + "<24,61>": "", + "<24,62>": "0", + "<24,63>": "", + "<24,64>": "", + "<24,65>": "", + "<24,66>": "", + "<24,67>": "", + "<24,68>": "", + "<24,69>": "", + "<24,70>": "", + "<24,71>": "", + "<24,72>": "", + "<24,73>": "", + "<24,74>": "", + "<24,75>": "", + "<24,76>": "", + "<24,77>": "", + "<24,78>": "", + "<24,79>": "", + "<24,80>": "", + "<24,81>": "", + "<24,82>": "", + "<24,83>": "", + "<24,84>": "", + "<24,85>": "", + "<24,86>": "", + "<24,87>": "", + "<24,88>": "", + "<24,89>": "", + "<24,90>": "", + "<24,91>": "", + "<24,92>": "" + }, + "<25>": { + "<25,1>": "BTN_PASSWORD", + "<25,2>": "", + "<25,3>": "PUSHBUTTON", + "<25,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<25,5>": "316", + "<25,6>": "396", + "<25,7>": "20", + "<25,8>": "20", + "<25,9>": "", + "<25,10>": { + "<25,10,1>": "0x56008300", + "<25,10,2>": "0x0" + }, + "<25,11>": { + "<25,11,1>": "0x0", + "<25,11,2>": "0x80000100" + }, + "<25,12>": "17", + "<25,13>": { + "<25,13,1>": "4294967295", + "<25,13,2>": "4294967295", + "<25,13,3>": "0" + }, + "<25,14>": "-2", + "<25,15>": { + "<25,15,1>": { + "<25,15,1,1>": "Segoe UI", + "<25,15,1,2>": "-12", + "<25,15,1,3>": "400", + "<25,15,1,4>": "0", + "<25,15,1,5>": "0", + "<25,15,1,6>": "0", + "<25,15,1,7>": "0", + "<25,15,1,8>": "34", + "<25,15,1,9>": "0", + "<25,15,1,10>": "3", + "<25,15,1,11>": "2", + "<25,15,1,12>": "1" + } + }, + "<25,16>": "", + "<25,17>": "", + "<25,18>": { + "<25,18,1>": { + "<25,18,1,1>": "P", + "<25,18,1,2>": "PASSWORDSTYLE", + "<25,18,1,3>": "@WINDOW.EDL_PASSWORD", + "<25,18,1,4>": "0", + "<25,18,1,5>": "", + "<25,18,1,6>": "", + "<25,18,1,7>": "", + "<25,18,1,8>": "", + "<25,18,1,9>": "", + "<25,18,1,10>": "", + "<25,18,1,11>": "", + "<25,18,1,12>": "", + "<25,18,1,13>": "", + "<25,18,1,14>": "", + "<25,18,1,15>": "GEN", + "<25,18,1,16>": "0" + }, + "<25,18,2>": { + "<25,18,2,1>": "P", + "<25,18,2,2>": "PASSWORDSTYLE", + "<25,18,2,3>": "@WINDOW.EDL_PASSWORD", + "<25,18,2,4>": "1", + "<25,18,2,5>": "", + "<25,18,2,6>": "", + "<25,18,2,7>": "", + "<25,18,2,8>": "", + "<25,18,2,9>": "", + "<25,18,2,10>": "", + "<25,18,2,11>": "", + "<25,18,2,12>": "", + "<25,18,2,13>": "", + "<25,18,2,14>": "", + "<25,18,2,15>": "GEN", + "<25,18,2,16>": "0" + }, + "<25,18,3>": { + "<25,18,3,1>": "P", + "<25,18,3,2>": "PASSWORDSTYLE", + "<25,18,3,3>": "@WINDOW.EDL_PASSWORD", + "<25,18,3,4>": "1", + "<25,18,3,5>": "", + "<25,18,3,6>": "", + "<25,18,3,7>": "", + "<25,18,3,8>": "", + "<25,18,3,9>": "", + "<25,18,3,10>": "", + "<25,18,3,11>": "", + "<25,18,3,12>": "", + "<25,18,3,13>": "", + "<25,18,3,14>": "", + "<25,18,3,15>": "GEN", + "<25,18,3,16>": "0" + } + }, + "<25,19>": { + "<25,19,1>": "BUTTONDOWN", + "<25,19,2>": "BUTTONUP", + "<25,19,3>": "LOSTCAPTURE" + }, + "<25,20>": "", + "<25,21>": "", + "<25,22>": "", + "<25,23>": "", + "<25,24>": "", + "<25,25>": "", + "<25,26>": "", + "<25,27>": "", + "<25,28>": "", + "<25,29>": "", + "<25,30>": "", + "<25,31>": "", + "<25,32>": "", + "<25,33>": "", + "<25,34>": "", + "<25,35>": "", + "<25,36>": "", + "<25,37>": "", + "<25,38>": "", + "<25,39>": "", + "<25,40>": "-1", + "<25,41>": { + "<25,41,1>": "", + "<25,41,2>": "-1" + }, + "<25,42>": "", + "<25,43>": "", + "<25,44>": "", + "<25,45>": "", + "<25,46>": "", + "<25,47>": "", + "<25,48>": "", + "<25,49>": "", + "<25,50>": "", + "<25,51>": "", + "<25,52>": "SYSPROG*IMAGE*PNG*RTI_IDE_SHOW_PW", + "<25,53>": { + "<25,53,1>": "-5", + "<25,53,2>": "", + "<25,53,3>": { + "<25,53,3,1>": "0", + "<25,53,3,2>": "0" + }, + "<25,53,4>": { + "<25,53,4,1>": "0", + "<25,53,4,2>": "0" + }, + "<25,53,5>": "0", + "<25,53,6>": "1", + "<25,53,7>": "", + "<25,53,8>": "4", + "<25,53,9>": "", + "<25,53,10>": "0" + }, + "<25,54>": "", + "<25,55>": "", + "<25,56>": "", + "<25,57>": "", + "<25,58>": "", + "<25,59>": { + "<25,59,1>": "Show the password", + "<25,59,2>": "", + "<25,59,3>": "", + "<25,59,4>": "", + "<25,59,5>": "0", + "<25,59,6>": "0", + "<25,59,7>": "0" + }, + "<25,60>": "", + "<25,61>": "", + "<25,62>": "0", + "<25,63>": "", + "<25,64>": { + "<25,64,1>": "-2", + "<25,64,2>": "-2", + "<25,64,3>": "0" + }, + "<25,65>": "-2", + "<25,66>": "", + "<25,67>": "", + "<25,68>": "", + "<25,69>": "", + "<25,70>": "", + "<25,71>": "", + "<25,72>": "", + "<25,73>": "", + "<25,74>": "", + "<25,75>": "", + "<25,76>": "", + "<25,77>": "", + "<25,78>": "", + "<25,79>": "", + "<25,80>": "", + "<25,81>": "", + "<25,82>": "", + "<25,83>": "", + "<25,84>": "", + "<25,85>": "", + "<25,86>": "", + "<25,87>": "", + "<25,88>": "", + "<25,89>": "", + "<25,90>": "0", + "<25,91>": "0" + }, + "<26>": { + "<26,1>": "EDL_RESPONSE_ID", + "<26,2>": "", + "<26,3>": "EDITFIELD", + "<26,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<26,5>": "556", + "<26,6>": "44", + "<26,7>": "368", + "<26,8>": "20", + "<26,9>": "", + "<26,10>": { + "<26,10,1>": "0x56000880", + "<26,10,2>": "0x200" + }, + "<26,11>": { + "<26,11,1>": "0x0", + "<26,11,2>": "0x80000000" + }, + "<26,12>": "25", + "<26,13>": { + "<26,13,1>": "-2", + "<26,13,2>": "-2", + "<26,13,3>": "" + }, + "<26,14>": "-2", + "<26,15>": { + "<26,15,1>": { + "<26,15,1,1>": "Segoe UI", + "<26,15,1,2>": "-12", + "<26,15,1,3>": "400", + "<26,15,1,4>": "0", + "<26,15,1,5>": "0", + "<26,15,1,6>": "0", + "<26,15,1,7>": "0", + "<26,15,1,8>": "34", + "<26,15,1,9>": "0", + "<26,15,1,10>": "3", + "<26,15,1,11>": "2", + "<26,15,1,12>": "1" + } + }, + "<26,16>": "", + "<26,17>": "", + "<26,18>": "", + "<26,19>": "", + "<26,20>": "", + "<26,21>": "", + "<26,22>": "", + "<26,23>": "", + "<26,24>": "", + "<26,25>": "", + "<26,26>": "", + "<26,27>": "", + "<26,28>": "<>", + "<26,29>": "<>", + "<26,30>": "<>", + "<26,31>": "0", + "<26,32>": "", + "<26,33>": "", + "<26,34>": "", + "<26,35>": "", + "<26,36>": { + "<26,36,1>": "0", + "<26,36,2>": "0" + }, + "<26,37>": "", + "<26,38>": "", + "<26,39>": "", + "<26,40>": "", + "<26,41>": "", + "<26,42>": "", + "<26,43>": "", + "<26,44>": "", + "<26,45>": "", + "<26,46>": "", + "<26,47>": "", + "<26,48>": "", + "<26,49>": "", + "<26,50>": "", + "<26,51>": "", + "<26,52>": "", + "<26,53>": "", + "<26,54>": "", + "<26,55>": "", + "<26,56>": "", + "<26,57>": "", + "<26,58>": "", + "<26,59>": "", + "<26,60>": "", + "<26,61>": "", + "<26,62>": "0", + "<26,63>": "", + "<26,64>": "", + "<26,65>": "", + "<26,66>": "", + "<26,67>": "", + "<26,68>": "", + "<26,69>": "", + "<26,70>": "", + "<26,71>": "", + "<26,72>": "", + "<26,73>": "", + "<26,74>": "", + "<26,75>": "", + "<26,76>": "", + "<26,77>": "", + "<26,78>": "", + "<26,79>": "", + "<26,80>": "", + "<26,81>": "", + "<26,82>": "", + "<26,83>": "", + "<26,84>": "", + "<26,85>": "", + "<26,86>": "", + "<26,87>": "", + "<26,88>": "", + "<26,89>": "", + "<26,90>": "", + "<26,91>": "", + "<26,92>": "" + }, + "<27>": { + "<27,1>": "LBL_RESPONSE_ID", + "<27,2>": "", + "<27,3>": "STATIC", + "<27,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<27,5>": "452", + "<27,6>": "44", + "<27,7>": "100", + "<27,8>": "20", + "<27,9>": "Async/Callback ID:", + "<27,10>": { + "<27,10,1>": "0x56000200", + "<27,10,2>": "0x0" + }, + "<27,11>": { + "<27,11,1>": "0x0", + "<27,11,2>": "0x80000000" + }, + "<27,12>": "26", + "<27,13>": { + "<27,13,1>": "-2", + "<27,13,2>": "-2", + "<27,13,3>": "" + }, + "<27,14>": "-2", + "<27,15>": { + "<27,15,1>": { + "<27,15,1,1>": "Segoe UI", + "<27,15,1,2>": "-12", + "<27,15,1,3>": "400", + "<27,15,1,4>": "0", + "<27,15,1,5>": "0", + "<27,15,1,6>": "0", + "<27,15,1,7>": "0", + "<27,15,1,8>": "34", + "<27,15,1,9>": "0", + "<27,15,1,10>": "3", + "<27,15,1,11>": "2", + "<27,15,1,12>": "1" + } + }, + "<27,16>": "", + "<27,17>": "", + "<27,18>": "", + "<27,19>": "", + "<27,20>": "", + "<27,21>": "", + "<27,22>": "", + "<27,23>": "", + "<27,24>": "", + "<27,25>": "", + "<27,26>": "", + "<27,27>": "", + "<27,28>": "<>", + "<27,29>": "<>", + "<27,30>": "", + "<27,31>": "", + "<27,32>": "", + "<27,33>": "", + "<27,34>": "", + "<27,35>": "", + "<27,36>": "", + "<27,37>": "", + "<27,38>": "", + "<27,39>": "", + "<27,40>": "", + "<27,41>": "", + "<27,42>": "", + "<27,43>": "", + "<27,44>": "", + "<27,45>": "", + "<27,46>": "", + "<27,47>": "", + "<27,48>": "", + "<27,49>": "", + "<27,50>": "", + "<27,51>": "", + "<27,52>": "", + "<27,53>": "", + "<27,54>": "", + "<27,55>": "", + "<27,56>": "", + "<27,57>": "", + "<27,58>": "", + "<27,59>": "", + "<27,60>": "", + "<27,61>": "", + "<27,62>": "0", + "<27,63>": { + "<27,63,1>": "", + "<27,63,2>": "", + "<27,63,3>": "", + "<27,63,4>": "", + "<27,63,5>": "", + "<27,63,6>": "", + "<27,63,7>": "", + "<27,63,8>": "" + }, + "<27,64>": { + "<27,64,1>": "", + "<27,64,2>": "", + "<27,64,3>": "" + }, + "<27,65>": "-2", + "<27,66>": "", + "<27,67>": "", + "<27,68>": "", + "<27,69>": "", + "<27,70>": "", + "<27,71>": "", + "<27,72>": "", + "<27,73>": "", + "<27,74>": "", + "<27,75>": "", + "<27,76>": "", + "<27,77>": "", + "<27,78>": "", + "<27,79>": "", + "<27,80>": "", + "<27,81>": "", + "<27,82>": "", + "<27,83>": "", + "<27,84>": "", + "<27,85>": "", + "<27,86>": "", + "<27,87>": "", + "<27,88>": "", + "<27,89>": "", + "<27,90>": "0", + "<27,91>": "0", + "<27,92>": "" + }, + "<28>": { + "<28,1>": "EDL_RESPONSE_STATUS_CODE", + "<28,2>": "", + "<28,3>": "EDITFIELD", + "<28,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<28,5>": "556", + "<28,6>": "68", + "<28,7>": "88", + "<28,8>": "20", + "<28,9>": "", + "<28,10>": { + "<28,10,1>": "0x56000880", + "<28,10,2>": "0x200" + }, + "<28,11>": { + "<28,11,1>": "0x0", + "<28,11,2>": "0x80000000" + }, + "<28,12>": "28", + "<28,13>": { + "<28,13,1>": "-2", + "<28,13,2>": "-2", + "<28,13,3>": "" + }, + "<28,14>": "-2", + "<28,15>": { + "<28,15,1>": { + "<28,15,1,1>": "Segoe UI", + "<28,15,1,2>": "-12", + "<28,15,1,3>": "400", + "<28,15,1,4>": "0", + "<28,15,1,5>": "0", + "<28,15,1,6>": "0", + "<28,15,1,7>": "0", + "<28,15,1,8>": "34", + "<28,15,1,9>": "0", + "<28,15,1,10>": "3", + "<28,15,1,11>": "2", + "<28,15,1,12>": "1" + } + }, + "<28,16>": "", + "<28,17>": "", + "<28,18>": "", + "<28,19>": "", + "<28,20>": "", + "<28,21>": "", + "<28,22>": "", + "<28,23>": "", + "<28,24>": "", + "<28,25>": "", + "<28,26>": "", + "<28,27>": "", + "<28,28>": "<>", + "<28,29>": "<>", + "<28,30>": "<>", + "<28,31>": "0", + "<28,32>": "", + "<28,33>": "", + "<28,34>": "", + "<28,35>": "", + "<28,36>": { + "<28,36,1>": "0", + "<28,36,2>": "0" + }, + "<28,37>": "", + "<28,38>": "", + "<28,39>": "", + "<28,40>": "", + "<28,41>": "", + "<28,42>": "", + "<28,43>": "", + "<28,44>": "", + "<28,45>": "", + "<28,46>": "", + "<28,47>": "", + "<28,48>": "", + "<28,49>": "", + "<28,50>": "", + "<28,51>": "", + "<28,52>": "", + "<28,53>": "", + "<28,54>": "", + "<28,55>": "", + "<28,56>": "", + "<28,57>": "", + "<28,58>": "", + "<28,59>": "", + "<28,60>": "", + "<28,61>": "", + "<28,62>": "0", + "<28,63>": "", + "<28,64>": "", + "<28,65>": "", + "<28,66>": "", + "<28,67>": "", + "<28,68>": "", + "<28,69>": "", + "<28,70>": "", + "<28,71>": "", + "<28,72>": "", + "<28,73>": "", + "<28,74>": "", + "<28,75>": "", + "<28,76>": "", + "<28,77>": "", + "<28,78>": "", + "<28,79>": "", + "<28,80>": "", + "<28,81>": "", + "<28,82>": "", + "<28,83>": "", + "<28,84>": "", + "<28,85>": "", + "<28,86>": "", + "<28,87>": "", + "<28,88>": "", + "<28,89>": "", + "<28,90>": "", + "<28,91>": "", + "<28,92>": "" + }, + "<29>": { + "<29,1>": "LBL_RESPONSE_STATUS", + "<29,2>": "", + "<29,3>": "STATIC", + "<29,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<29,5>": "452", + "<29,6>": "68", + "<29,7>": "100", + "<29,8>": "20", + "<29,9>": "Status:", + "<29,10>": { + "<29,10,1>": "0x56000200", + "<29,10,2>": "0x0" + }, + "<29,11>": { + "<29,11,1>": "0x0", + "<29,11,2>": "0x80000000" + }, + "<29,12>": "27", + "<29,13>": { + "<29,13,1>": "-2", + "<29,13,2>": "-2", + "<29,13,3>": "" + }, + "<29,14>": "-2", + "<29,15>": { + "<29,15,1>": { + "<29,15,1,1>": "Segoe UI", + "<29,15,1,2>": "-12", + "<29,15,1,3>": "400", + "<29,15,1,4>": "0", + "<29,15,1,5>": "0", + "<29,15,1,6>": "0", + "<29,15,1,7>": "0", + "<29,15,1,8>": "34", + "<29,15,1,9>": "0", + "<29,15,1,10>": "3", + "<29,15,1,11>": "2", + "<29,15,1,12>": "1" + } + }, + "<29,16>": "", + "<29,17>": "", + "<29,18>": "", + "<29,19>": "", + "<29,20>": "", + "<29,21>": "", + "<29,22>": "", + "<29,23>": "", + "<29,24>": "", + "<29,25>": "", + "<29,26>": "", + "<29,27>": "", + "<29,28>": "<>", + "<29,29>": "<>", + "<29,30>": "", + "<29,31>": "", + "<29,32>": "", + "<29,33>": "", + "<29,34>": "", + "<29,35>": "", + "<29,36>": "", + "<29,37>": "", + "<29,38>": "", + "<29,39>": "", + "<29,40>": "", + "<29,41>": "", + "<29,42>": "", + "<29,43>": "", + "<29,44>": "", + "<29,45>": "", + "<29,46>": "", + "<29,47>": "", + "<29,48>": "", + "<29,49>": "", + "<29,50>": "", + "<29,51>": "", + "<29,52>": "", + "<29,53>": "", + "<29,54>": "", + "<29,55>": "", + "<29,56>": "", + "<29,57>": "", + "<29,58>": "", + "<29,59>": "", + "<29,60>": "", + "<29,61>": "", + "<29,62>": "0", + "<29,63>": { + "<29,63,1>": "", + "<29,63,2>": "", + "<29,63,3>": "", + "<29,63,4>": "", + "<29,63,5>": "", + "<29,63,6>": "", + "<29,63,7>": "", + "<29,63,8>": "" + }, + "<29,64>": { + "<29,64,1>": "", + "<29,64,2>": "", + "<29,64,3>": "" + }, + "<29,65>": "-2", + "<29,66>": "", + "<29,67>": "", + "<29,68>": "", + "<29,69>": "", + "<29,70>": "", + "<29,71>": "", + "<29,72>": "", + "<29,73>": "", + "<29,74>": "", + "<29,75>": "", + "<29,76>": "", + "<29,77>": "", + "<29,78>": "", + "<29,79>": "", + "<29,80>": "", + "<29,81>": "", + "<29,82>": "", + "<29,83>": "", + "<29,84>": "", + "<29,85>": "", + "<29,86>": "", + "<29,87>": "", + "<29,88>": "", + "<29,89>": "", + "<29,90>": "0", + "<29,91>": "0", + "<29,92>": "" + }, + "<30>": { + "<30,1>": "EDL_RESPONSE_STATUS_TEXT", + "<30,2>": "", + "<30,3>": "EDITFIELD", + "<30,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<30,5>": "648", + "<30,6>": "68", + "<30,7>": "276", + "<30,8>": "20", + "<30,9>": "", + "<30,10>": { + "<30,10,1>": "0x56000880", + "<30,10,2>": "0x200" + }, + "<30,11>": { + "<30,11,1>": "0x0", + "<30,11,2>": "0x80000000" + }, + "<30,12>": "29", + "<30,13>": { + "<30,13,1>": "-2", + "<30,13,2>": "-2", + "<30,13,3>": "" + }, + "<30,14>": "-2", + "<30,15>": { + "<30,15,1>": { + "<30,15,1,1>": "Segoe UI", + "<30,15,1,2>": "-12", + "<30,15,1,3>": "400", + "<30,15,1,4>": "0", + "<30,15,1,5>": "0", + "<30,15,1,6>": "0", + "<30,15,1,7>": "0", + "<30,15,1,8>": "34", + "<30,15,1,9>": "0", + "<30,15,1,10>": "3", + "<30,15,1,11>": "2", + "<30,15,1,12>": "1" + } + }, + "<30,16>": "", + "<30,17>": "", + "<30,18>": "", + "<30,19>": "", + "<30,20>": "", + "<30,21>": "", + "<30,22>": "", + "<30,23>": "", + "<30,24>": "", + "<30,25>": "", + "<30,26>": "", + "<30,27>": "", + "<30,28>": "<>", + "<30,29>": "<>", + "<30,30>": "<>", + "<30,31>": "0", + "<30,32>": "", + "<30,33>": "", + "<30,34>": "", + "<30,35>": "", + "<30,36>": { + "<30,36,1>": "0", + "<30,36,2>": "0" + }, + "<30,37>": "", + "<30,38>": "", + "<30,39>": "", + "<30,40>": "", + "<30,41>": "", + "<30,42>": "", + "<30,43>": "", + "<30,44>": "", + "<30,45>": "", + "<30,46>": "", + "<30,47>": "", + "<30,48>": "", + "<30,49>": "", + "<30,50>": "", + "<30,51>": "", + "<30,52>": "", + "<30,53>": "", + "<30,54>": "", + "<30,55>": "", + "<30,56>": "", + "<30,57>": "", + "<30,58>": "", + "<30,59>": "", + "<30,60>": "", + "<30,61>": "", + "<30,62>": "0", + "<30,63>": "", + "<30,64>": "", + "<30,65>": "", + "<30,66>": "", + "<30,67>": "", + "<30,68>": "", + "<30,69>": "", + "<30,70>": "", + "<30,71>": "", + "<30,72>": "", + "<30,73>": "", + "<30,74>": "", + "<30,75>": "", + "<30,76>": "", + "<30,77>": "", + "<30,78>": "", + "<30,79>": "", + "<30,80>": "", + "<30,81>": "", + "<30,82>": "", + "<30,83>": "", + "<30,84>": "", + "<30,85>": "", + "<30,86>": "", + "<30,87>": "", + "<30,88>": "", + "<30,89>": "", + "<30,90>": "", + "<30,91>": "", + "<30,92>": "" + }, + "<31>": { + "<31,1>": "LBL_RESPONSE_CONTENTLEN", + "<31,2>": "", + "<31,3>": "STATIC", + "<31,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<31,5>": "452", + "<31,6>": "92", + "<31,7>": "100", + "<31,8>": "20", + "<31,9>": "Content-Length:", + "<31,10>": { + "<31,10,1>": "0x56000200", + "<31,10,2>": "0x0" + }, + "<31,11>": { + "<31,11,1>": "0x0", + "<31,11,2>": "0x80000000" + }, + "<31,12>": "30", + "<31,13>": { + "<31,13,1>": "-2", + "<31,13,2>": "-2", + "<31,13,3>": "" + }, + "<31,14>": "-2", + "<31,15>": { + "<31,15,1>": { + "<31,15,1,1>": "Segoe UI", + "<31,15,1,2>": "-12", + "<31,15,1,3>": "400", + "<31,15,1,4>": "0", + "<31,15,1,5>": "0", + "<31,15,1,6>": "0", + "<31,15,1,7>": "0", + "<31,15,1,8>": "34", + "<31,15,1,9>": "0", + "<31,15,1,10>": "3", + "<31,15,1,11>": "2", + "<31,15,1,12>": "1" + } + }, + "<31,16>": "", + "<31,17>": "", + "<31,18>": "", + "<31,19>": "", + "<31,20>": "", + "<31,21>": "", + "<31,22>": "", + "<31,23>": "", + "<31,24>": "", + "<31,25>": "", + "<31,26>": "", + "<31,27>": "", + "<31,28>": "<>", + "<31,29>": "<>", + "<31,30>": "", + "<31,31>": "", + "<31,32>": "", + "<31,33>": "", + "<31,34>": "", + "<31,35>": "", + "<31,36>": "", + "<31,37>": "", + "<31,38>": "", + "<31,39>": "", + "<31,40>": "", + "<31,41>": "", + "<31,42>": "", + "<31,43>": "", + "<31,44>": "", + "<31,45>": "", + "<31,46>": "", + "<31,47>": "", + "<31,48>": "", + "<31,49>": "", + "<31,50>": "", + "<31,51>": "", + "<31,52>": "", + "<31,53>": "", + "<31,54>": "", + "<31,55>": "", + "<31,56>": "", + "<31,57>": "", + "<31,58>": "", + "<31,59>": "", + "<31,60>": "", + "<31,61>": "", + "<31,62>": "0", + "<31,63>": { + "<31,63,1>": "", + "<31,63,2>": "", + "<31,63,3>": "", + "<31,63,4>": "", + "<31,63,5>": "", + "<31,63,6>": "", + "<31,63,7>": "", + "<31,63,8>": "" + }, + "<31,64>": { + "<31,64,1>": "", + "<31,64,2>": "", + "<31,64,3>": "" + }, + "<31,65>": "-2", + "<31,66>": "", + "<31,67>": "", + "<31,68>": "", + "<31,69>": "", + "<31,70>": "", + "<31,71>": "", + "<31,72>": "", + "<31,73>": "", + "<31,74>": "", + "<31,75>": "", + "<31,76>": "", + "<31,77>": "", + "<31,78>": "", + "<31,79>": "", + "<31,80>": "", + "<31,81>": "", + "<31,82>": "", + "<31,83>": "", + "<31,84>": "", + "<31,85>": "", + "<31,86>": "", + "<31,87>": "", + "<31,88>": "", + "<31,89>": "", + "<31,90>": "0", + "<31,91>": "0", + "<31,92>": "" + }, + "<32>": { + "<32,1>": "EDL_RESPONSE_CONTENTLEN", + "<32,2>": "", + "<32,3>": "EDITFIELD", + "<32,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<32,5>": "556", + "<32,6>": "92", + "<32,7>": "88", + "<32,8>": "20", + "<32,9>": "", + "<32,10>": { + "<32,10,1>": "0x56000880", + "<32,10,2>": "0x200" + }, + "<32,11>": { + "<32,11,1>": "0x0", + "<32,11,2>": "0x80000000" + }, + "<32,12>": "31", + "<32,13>": { + "<32,13,1>": "-2", + "<32,13,2>": "-2", + "<32,13,3>": "" + }, + "<32,14>": "-2", + "<32,15>": { + "<32,15,1>": { + "<32,15,1,1>": "Segoe UI", + "<32,15,1,2>": "-12", + "<32,15,1,3>": "400", + "<32,15,1,4>": "0", + "<32,15,1,5>": "0", + "<32,15,1,6>": "0", + "<32,15,1,7>": "0", + "<32,15,1,8>": "34", + "<32,15,1,9>": "0", + "<32,15,1,10>": "3", + "<32,15,1,11>": "2", + "<32,15,1,12>": "1" + } + }, + "<32,16>": "", + "<32,17>": "", + "<32,18>": "", + "<32,19>": "", + "<32,20>": "", + "<32,21>": "", + "<32,22>": "", + "<32,23>": "", + "<32,24>": "", + "<32,25>": "", + "<32,26>": "", + "<32,27>": "", + "<32,28>": "<>", + "<32,29>": "<>", + "<32,30>": "<>", + "<32,31>": "0", + "<32,32>": "", + "<32,33>": "", + "<32,34>": "", + "<32,35>": "", + "<32,36>": { + "<32,36,1>": "0", + "<32,36,2>": "0" + }, + "<32,37>": "", + "<32,38>": "", + "<32,39>": "", + "<32,40>": "", + "<32,41>": "", + "<32,42>": "", + "<32,43>": "", + "<32,44>": "", + "<32,45>": "", + "<32,46>": "", + "<32,47>": "", + "<32,48>": "", + "<32,49>": "", + "<32,50>": "", + "<32,51>": "", + "<32,52>": "", + "<32,53>": "", + "<32,54>": "", + "<32,55>": "", + "<32,56>": "", + "<32,57>": "", + "<32,58>": "", + "<32,59>": "", + "<32,60>": "", + "<32,61>": "", + "<32,62>": "0", + "<32,63>": "", + "<32,64>": "", + "<32,65>": "", + "<32,66>": "", + "<32,67>": "", + "<32,68>": "", + "<32,69>": "", + "<32,70>": "", + "<32,71>": "", + "<32,72>": "", + "<32,73>": "", + "<32,74>": "", + "<32,75>": "", + "<32,76>": "", + "<32,77>": "", + "<32,78>": "", + "<32,79>": "", + "<32,80>": "", + "<32,81>": "", + "<32,82>": "", + "<32,83>": "", + "<32,84>": "", + "<32,85>": "", + "<32,86>": "", + "<32,87>": "", + "<32,88>": "", + "<32,89>": "", + "<32,90>": "", + "<32,91>": "", + "<32,92>": "" + }, + "<33>": { + "<33,1>": "LBL_RESPONSE_CONTENT", + "<33,2>": "", + "<33,3>": "STATIC", + "<33,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<33,5>": "452", + "<33,6>": "248", + "<33,7>": "100", + "<33,8>": "20", + "<33,9>": "Content Text:", + "<33,10>": { + "<33,10,1>": "0x56000200", + "<33,10,2>": "0x0" + }, + "<33,11>": { + "<33,11,1>": "0x0", + "<33,11,2>": "0x80000000" + }, + "<33,12>": "35", + "<33,13>": { + "<33,13,1>": "-2", + "<33,13,2>": "-2", + "<33,13,3>": "" + }, + "<33,14>": "-2", + "<33,15>": { + "<33,15,1>": { + "<33,15,1,1>": "Segoe UI", + "<33,15,1,2>": "-12", + "<33,15,1,3>": "400", + "<33,15,1,4>": "0", + "<33,15,1,5>": "0", + "<33,15,1,6>": "0", + "<33,15,1,7>": "0", + "<33,15,1,8>": "34", + "<33,15,1,9>": "0", + "<33,15,1,10>": "3", + "<33,15,1,11>": "2", + "<33,15,1,12>": "1" + } + }, + "<33,16>": "", + "<33,17>": "", + "<33,18>": "", + "<33,19>": "", + "<33,20>": "", + "<33,21>": "", + "<33,22>": "", + "<33,23>": "", + "<33,24>": "", + "<33,25>": "", + "<33,26>": "", + "<33,27>": "", + "<33,28>": "<>", + "<33,29>": "<>", + "<33,30>": "", + "<33,31>": "", + "<33,32>": "", + "<33,33>": "", + "<33,34>": "", + "<33,35>": "", + "<33,36>": "", + "<33,37>": "", + "<33,38>": "", + "<33,39>": "", + "<33,40>": "", + "<33,41>": "", + "<33,42>": "", + "<33,43>": "", + "<33,44>": "", + "<33,45>": "", + "<33,46>": "", + "<33,47>": "", + "<33,48>": "", + "<33,49>": "", + "<33,50>": "", + "<33,51>": "", + "<33,52>": "", + "<33,53>": "", + "<33,54>": "", + "<33,55>": "", + "<33,56>": "", + "<33,57>": "", + "<33,58>": "", + "<33,59>": "", + "<33,60>": "", + "<33,61>": "", + "<33,62>": "0", + "<33,63>": { + "<33,63,1>": "", + "<33,63,2>": "", + "<33,63,3>": "", + "<33,63,4>": "", + "<33,63,5>": "", + "<33,63,6>": "", + "<33,63,7>": "", + "<33,63,8>": "" + }, + "<33,64>": { + "<33,64,1>": "", + "<33,64,2>": "", + "<33,64,3>": "" + }, + "<33,65>": "-2", + "<33,66>": "", + "<33,67>": "", + "<33,68>": "", + "<33,69>": "", + "<33,70>": "", + "<33,71>": "", + "<33,72>": "", + "<33,73>": "", + "<33,74>": "", + "<33,75>": "", + "<33,76>": "", + "<33,77>": "", + "<33,78>": "", + "<33,79>": "", + "<33,80>": "", + "<33,81>": "", + "<33,82>": "", + "<33,83>": "", + "<33,84>": "", + "<33,85>": "", + "<33,86>": "", + "<33,87>": "", + "<33,88>": "", + "<33,89>": "", + "<33,90>": "0", + "<33,91>": "0", + "<33,92>": "" + }, + "<34>": { + "<34,1>": "TXT_RESPONSE_CONTENTLEN", + "<34,2>": "", + "<34,3>": "STATIC", + "<34,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<34,5>": "648", + "<34,6>": "92", + "<34,7>": "276", + "<34,8>": "20", + "<34,9>": "(as reported in header)", + "<34,10>": { + "<34,10,1>": "0x56000200", + "<34,10,2>": "0x0" + }, + "<34,11>": { + "<34,11,1>": "0x0", + "<34,11,2>": "0x80000000" + }, + "<34,12>": "32", + "<34,13>": { + "<34,13,1>": "-2", + "<34,13,2>": "-2", + "<34,13,3>": "" + }, + "<34,14>": "-2", + "<34,15>": { + "<34,15,1>": { + "<34,15,1,1>": "Segoe UI", + "<34,15,1,2>": "-12", + "<34,15,1,3>": "400", + "<34,15,1,4>": "0", + "<34,15,1,5>": "0", + "<34,15,1,6>": "0", + "<34,15,1,7>": "0", + "<34,15,1,8>": "34", + "<34,15,1,9>": "0", + "<34,15,1,10>": "3", + "<34,15,1,11>": "2", + "<34,15,1,12>": "1" + } + }, + "<34,16>": "", + "<34,17>": "", + "<34,18>": "", + "<34,19>": "", + "<34,20>": "", + "<34,21>": "", + "<34,22>": "", + "<34,23>": "", + "<34,24>": "", + "<34,25>": "", + "<34,26>": "", + "<34,27>": "", + "<34,28>": "<>", + "<34,29>": "<>", + "<34,30>": "", + "<34,31>": "", + "<34,32>": "", + "<34,33>": "", + "<34,34>": "", + "<34,35>": "", + "<34,36>": "", + "<34,37>": "", + "<34,38>": "", + "<34,39>": "", + "<34,40>": "", + "<34,41>": "", + "<34,42>": "", + "<34,43>": "", + "<34,44>": "", + "<34,45>": "", + "<34,46>": "", + "<34,47>": "", + "<34,48>": "", + "<34,49>": "", + "<34,50>": "", + "<34,51>": "", + "<34,52>": "", + "<34,53>": "", + "<34,54>": "", + "<34,55>": "", + "<34,56>": "", + "<34,57>": "", + "<34,58>": "", + "<34,59>": "", + "<34,60>": "", + "<34,61>": "", + "<34,62>": "0", + "<34,63>": { + "<34,63,1>": "", + "<34,63,2>": "", + "<34,63,3>": "", + "<34,63,4>": "", + "<34,63,5>": "", + "<34,63,6>": "", + "<34,63,7>": "", + "<34,63,8>": "" + }, + "<34,64>": { + "<34,64,1>": "", + "<34,64,2>": "", + "<34,64,3>": "" + }, + "<34,65>": "-2", + "<34,66>": "", + "<34,67>": "", + "<34,68>": "", + "<34,69>": "", + "<34,70>": "", + "<34,71>": "", + "<34,72>": "", + "<34,73>": "", + "<34,74>": "", + "<34,75>": "", + "<34,76>": "", + "<34,77>": "", + "<34,78>": "", + "<34,79>": "", + "<34,80>": "", + "<34,81>": "", + "<34,82>": "", + "<34,83>": "", + "<34,84>": "", + "<34,85>": "", + "<34,86>": "", + "<34,87>": "", + "<34,88>": "", + "<34,89>": "", + "<34,90>": "0", + "<34,91>": "0", + "<34,92>": "" + }, + "<35>": { + "<35,1>": "LBL_BYTES_RECEIVED", + "<35,2>": "", + "<35,3>": "STATIC", + "<35,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<35,5>": "452", + "<35,6>": "524", + "<35,7>": "100", + "<35,8>": "20", + "<35,9>": "Bytes received:", + "<35,10>": { + "<35,10,1>": "0x56000200", + "<35,10,2>": "0x0" + }, + "<35,11>": { + "<35,11,1>": "0x0", + "<35,11,2>": "0x80000000" + }, + "<35,12>": "37", + "<35,13>": { + "<35,13,1>": "-2", + "<35,13,2>": "-2", + "<35,13,3>": "" + }, + "<35,14>": "-2", + "<35,15>": { + "<35,15,1>": { + "<35,15,1,1>": "Segoe UI", + "<35,15,1,2>": "-12", + "<35,15,1,3>": "400", + "<35,15,1,4>": "0", + "<35,15,1,5>": "0", + "<35,15,1,6>": "0", + "<35,15,1,7>": "0", + "<35,15,1,8>": "34", + "<35,15,1,9>": "0", + "<35,15,1,10>": "3", + "<35,15,1,11>": "2", + "<35,15,1,12>": "1" + } + }, + "<35,16>": "", + "<35,17>": "", + "<35,18>": "", + "<35,19>": "", + "<35,20>": "", + "<35,21>": "", + "<35,22>": "", + "<35,23>": "", + "<35,24>": "", + "<35,25>": "", + "<35,26>": "", + "<35,27>": "", + "<35,28>": "<>", + "<35,29>": "<>", + "<35,30>": "", + "<35,31>": "", + "<35,32>": "", + "<35,33>": "", + "<35,34>": "", + "<35,35>": "", + "<35,36>": "", + "<35,37>": "", + "<35,38>": "", + "<35,39>": "", + "<35,40>": "", + "<35,41>": "", + "<35,42>": "", + "<35,43>": "", + "<35,44>": "", + "<35,45>": "", + "<35,46>": "", + "<35,47>": "", + "<35,48>": "", + "<35,49>": "", + "<35,50>": "", + "<35,51>": "", + "<35,52>": "", + "<35,53>": "", + "<35,54>": "", + "<35,55>": "", + "<35,56>": "", + "<35,57>": "", + "<35,58>": "", + "<35,59>": "", + "<35,60>": "", + "<35,61>": "", + "<35,62>": "0", + "<35,63>": { + "<35,63,1>": "", + "<35,63,2>": "", + "<35,63,3>": "", + "<35,63,4>": "", + "<35,63,5>": "", + "<35,63,6>": "", + "<35,63,7>": "", + "<35,63,8>": "" + }, + "<35,64>": { + "<35,64,1>": "", + "<35,64,2>": "", + "<35,64,3>": "" + }, + "<35,65>": "-2", + "<35,66>": "", + "<35,67>": "", + "<35,68>": "", + "<35,69>": "", + "<35,70>": "", + "<35,71>": "", + "<35,72>": "", + "<35,73>": "", + "<35,74>": "", + "<35,75>": "", + "<35,76>": "", + "<35,77>": "", + "<35,78>": "", + "<35,79>": "", + "<35,80>": "", + "<35,81>": "", + "<35,82>": "", + "<35,83>": "", + "<35,84>": "", + "<35,85>": "", + "<35,86>": "", + "<35,87>": "", + "<35,88>": "", + "<35,89>": "", + "<35,90>": "0", + "<35,91>": "0", + "<35,92>": "" + }, + "<36>": { + "<36,1>": "EDL_BYTES_RECEIVED", + "<36,2>": "", + "<36,3>": "EDITFIELD", + "<36,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<36,5>": "556", + "<36,6>": "524", + "<36,7>": "368", + "<36,8>": "20", + "<36,9>": "", + "<36,10>": { + "<36,10,1>": "0x56000880", + "<36,10,2>": "0x200" + }, + "<36,11>": { + "<36,11,1>": "0x0", + "<36,11,2>": "0x80000000" + }, + "<36,12>": "38", + "<36,13>": { + "<36,13,1>": "-2", + "<36,13,2>": "-2", + "<36,13,3>": "" + }, + "<36,14>": "-2", + "<36,15>": { + "<36,15,1>": { + "<36,15,1,1>": "Segoe UI", + "<36,15,1,2>": "-12", + "<36,15,1,3>": "400", + "<36,15,1,4>": "0", + "<36,15,1,5>": "0", + "<36,15,1,6>": "0", + "<36,15,1,7>": "0", + "<36,15,1,8>": "34", + "<36,15,1,9>": "0", + "<36,15,1,10>": "3", + "<36,15,1,11>": "2", + "<36,15,1,12>": "1" + } + }, + "<36,16>": "", + "<36,17>": "", + "<36,18>": "", + "<36,19>": "", + "<36,20>": "", + "<36,21>": "", + "<36,22>": "", + "<36,23>": "", + "<36,24>": "", + "<36,25>": "", + "<36,26>": "", + "<36,27>": "", + "<36,28>": "<>", + "<36,29>": "<>", + "<36,30>": "<>", + "<36,31>": "0", + "<36,32>": "", + "<36,33>": "", + "<36,34>": "", + "<36,35>": "", + "<36,36>": { + "<36,36,1>": "0", + "<36,36,2>": "0" + }, + "<36,37>": "", + "<36,38>": "", + "<36,39>": "", + "<36,40>": "", + "<36,41>": "", + "<36,42>": "", + "<36,43>": "", + "<36,44>": "", + "<36,45>": "", + "<36,46>": "", + "<36,47>": "", + "<36,48>": "", + "<36,49>": "", + "<36,50>": "", + "<36,51>": "", + "<36,52>": "", + "<36,53>": "", + "<36,54>": "", + "<36,55>": "", + "<36,56>": "", + "<36,57>": "", + "<36,58>": "", + "<36,59>": "", + "<36,60>": "", + "<36,61>": "", + "<36,62>": "0", + "<36,63>": "", + "<36,64>": "", + "<36,65>": "", + "<36,66>": "", + "<36,67>": "", + "<36,68>": "", + "<36,69>": "", + "<36,70>": "", + "<36,71>": "", + "<36,72>": "", + "<36,73>": "", + "<36,74>": "", + "<36,75>": "", + "<36,76>": "", + "<36,77>": "", + "<36,78>": "", + "<36,79>": "", + "<36,80>": "", + "<36,81>": "", + "<36,82>": "", + "<36,83>": "", + "<36,84>": "", + "<36,85>": "", + "<36,86>": "", + "<36,87>": "", + "<36,88>": "", + "<36,89>": "", + "<36,90>": "", + "<36,91>": "", + "<36,92>": "" + }, + "<37>": { + "<37,1>": "LBL_RESPONSE_HEADERS", + "<37,2>": "", + "<37,3>": "STATIC", + "<37,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<37,5>": "452", + "<37,6>": "116", + "<37,7>": "100", + "<37,8>": "20", + "<37,9>": "Headers:", + "<37,10>": { + "<37,10,1>": "0x56000200", + "<37,10,2>": "0x0" + }, + "<37,11>": { + "<37,11,1>": "0x0", + "<37,11,2>": "0x80000000" + }, + "<37,12>": "33", + "<37,13>": { + "<37,13,1>": "-2", + "<37,13,2>": "-2", + "<37,13,3>": "" + }, + "<37,14>": "-2", + "<37,15>": { + "<37,15,1>": { + "<37,15,1,1>": "Segoe UI", + "<37,15,1,2>": "-12", + "<37,15,1,3>": "400", + "<37,15,1,4>": "0", + "<37,15,1,5>": "0", + "<37,15,1,6>": "0", + "<37,15,1,7>": "0", + "<37,15,1,8>": "34", + "<37,15,1,9>": "0", + "<37,15,1,10>": "3", + "<37,15,1,11>": "2", + "<37,15,1,12>": "1" + } + }, + "<37,16>": "", + "<37,17>": "", + "<37,18>": "", + "<37,19>": "", + "<37,20>": "", + "<37,21>": "", + "<37,22>": "", + "<37,23>": "", + "<37,24>": "", + "<37,25>": "", + "<37,26>": "", + "<37,27>": "", + "<37,28>": "<>", + "<37,29>": "<>", + "<37,30>": "", + "<37,31>": "", + "<37,32>": "", + "<37,33>": "", + "<37,34>": "", + "<37,35>": "", + "<37,36>": "", + "<37,37>": "", + "<37,38>": "", + "<37,39>": "", + "<37,40>": "", + "<37,41>": "", + "<37,42>": "", + "<37,43>": "", + "<37,44>": "", + "<37,45>": "", + "<37,46>": "", + "<37,47>": "", + "<37,48>": "", + "<37,49>": "", + "<37,50>": "", + "<37,51>": "", + "<37,52>": "", + "<37,53>": "", + "<37,54>": "", + "<37,55>": "", + "<37,56>": "", + "<37,57>": "", + "<37,58>": "", + "<37,59>": "", + "<37,60>": "", + "<37,61>": "", + "<37,62>": "0", + "<37,63>": { + "<37,63,1>": "", + "<37,63,2>": "", + "<37,63,3>": "", + "<37,63,4>": "", + "<37,63,5>": "", + "<37,63,6>": "", + "<37,63,7>": "", + "<37,63,8>": "" + }, + "<37,64>": { + "<37,64,1>": "", + "<37,64,2>": "", + "<37,64,3>": "" + }, + "<37,65>": "-2", + "<37,66>": "", + "<37,67>": "", + "<37,68>": "", + "<37,69>": "", + "<37,70>": "", + "<37,71>": "", + "<37,72>": "", + "<37,73>": "", + "<37,74>": "", + "<37,75>": "", + "<37,76>": "", + "<37,77>": "", + "<37,78>": "", + "<37,79>": "", + "<37,80>": "", + "<37,81>": "", + "<37,82>": "", + "<37,83>": "", + "<37,84>": "", + "<37,85>": "", + "<37,86>": "", + "<37,87>": "", + "<37,88>": "", + "<37,89>": "", + "<37,90>": "0", + "<37,91>": "0", + "<37,92>": "" + }, + "<38>": { + "<38,1>": "EDB_RESPONSE_HEADERS", + "<38,2>": "", + "<38,3>": "EDITBOX", + "<38,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<38,5>": "556", + "<38,6>": "116", + "<38,7>": "368", + "<38,8>": "128", + "<38,9>": "", + "<38,10>": { + "<38,10,1>": "0x56200840", + "<38,10,2>": "0x200" + }, + "<38,11>": { + "<38,11,1>": "0x0", + "<38,11,2>": "0x80000000" + }, + "<38,12>": "34", + "<38,13>": { + "<38,13,1>": "-2", + "<38,13,2>": "-2", + "<38,13,3>": "" + }, + "<38,14>": "-2", + "<38,15>": { + "<38,15,1>": { + "<38,15,1,1>": "Segoe UI", + "<38,15,1,2>": "-12", + "<38,15,1,3>": "400", + "<38,15,1,4>": "0", + "<38,15,1,5>": "0", + "<38,15,1,6>": "0", + "<38,15,1,7>": "0", + "<38,15,1,8>": "34", + "<38,15,1,9>": "0", + "<38,15,1,10>": "3", + "<38,15,1,11>": "2", + "<38,15,1,12>": "1" + } + }, + "<38,16>": "", + "<38,17>": "", + "<38,18>": "", + "<38,19>": "", + "<38,20>": "", + "<38,21>": "", + "<38,22>": "", + "<38,23>": "", + "<38,24>": "", + "<38,25>": "", + "<38,26>": "", + "<38,27>": "", + "<38,28>": "<>", + "<38,29>": "<>", + "<38,30>": "", + "<38,31>": "0", + "<38,32>": "", + "<38,33>": "", + "<38,34>": "", + "<38,35>": "", + "<38,36>": "", + "<38,37>": "", + "<38,38>": "", + "<38,39>": "", + "<38,40>": "", + "<38,41>": "", + "<38,42>": "", + "<38,43>": "", + "<38,44>": "", + "<38,45>": "", + "<38,46>": "", + "<38,47>": "", + "<38,48>": "", + "<38,49>": "", + "<38,50>": "", + "<38,51>": "", + "<38,52>": "", + "<38,53>": "", + "<38,54>": "", + "<38,55>": "", + "<38,56>": "", + "<38,57>": "", + "<38,58>": "", + "<38,59>": "", + "<38,60>": "", + "<38,61>": "", + "<38,62>": "0", + "<38,63>": "", + "<38,64>": "", + "<38,65>": "", + "<38,66>": "", + "<38,67>": "", + "<38,68>": "", + "<38,69>": "", + "<38,70>": "", + "<38,71>": "", + "<38,72>": "", + "<38,73>": "", + "<38,74>": "", + "<38,75>": "", + "<38,76>": "", + "<38,77>": "", + "<38,78>": "", + "<38,79>": "", + "<38,80>": "", + "<38,81>": "", + "<38,82>": "", + "<38,83>": "", + "<38,84>": "", + "<38,85>": "", + "<38,86>": "", + "<38,87>": "", + "<38,88>": "", + "<38,89>": "", + "<38,90>": "", + "<38,91>": "", + "<38,92>": "" + }, + "<39>": { + "<39,1>": "BTN_CLOSE", + "<39,2>": "", + "<39,3>": "PUSHBUTTON", + "<39,4>": "RTI_HTTP_DOWNLOAD_TEST", + "<39,5>": "844", + "<39,6>": "564", + "<39,7>": "80", + "<39,8>": "24", + "<39,9>": "Close", + "<39,10>": { + "<39,10,1>": "0x56002300", + "<39,10,2>": "0x0" + }, + "<39,11>": { + "<39,11,1>": "0x2", + "<39,11,2>": "0x80000000" + }, + "<39,12>": "39", + "<39,13>": { + "<39,13,1>": "-2", + "<39,13,2>": "-2", + "<39,13,3>": "0" + }, + "<39,14>": "-2", + "<39,15>": { + "<39,15,1>": { + "<39,15,1,1>": "Segoe UI", + "<39,15,1,2>": "-12", + "<39,15,1,3>": "400", + "<39,15,1,4>": "0", + "<39,15,1,5>": "0", + "<39,15,1,6>": "0", + "<39,15,1,7>": "0", + "<39,15,1,8>": "34", + "<39,15,1,9>": "0", + "<39,15,1,10>": "3", + "<39,15,1,11>": "2", + "<39,15,1,12>": "1" + } + }, + "<39,16>": "", + "<39,17>": "", + "<39,18>": { + "<39,18,1>": { + "<39,18,1,1>": "E", + "<39,18,1,2>": "CLOSE", + "<39,18,1,3>": "@WINDOW", + "<39,18,1,4>": "", + "<39,18,1,5>": "", + "<39,18,1,6>": "", + "<39,18,1,7>": "", + "<39,18,1,8>": "", + "<39,18,1,9>": "", + "<39,18,1,10>": "", + "<39,18,1,11>": "", + "<39,18,1,12>": "", + "<39,18,1,13>": "", + "<39,18,1,14>": "", + "<39,18,1,15>": "CLOSEWIN", + "<39,18,1,16>": "0" + } + }, + "<39,19>": "CLICK", + "<39,20>": "", + "<39,21>": "", + "<39,22>": "", + "<39,23>": "", + "<39,24>": "", + "<39,25>": "", + "<39,26>": "", + "<39,27>": "", + "<39,28>": "", + "<39,29>": "", + "<39,30>": "", + "<39,31>": "", + "<39,32>": "", + "<39,33>": "", + "<39,34>": "", + "<39,35>": "", + "<39,36>": "", + "<39,37>": "", + "<39,38>": "", + "<39,39>": "", + "<39,40>": "-1", + "<39,41>": { + "<39,41,1>": "", + "<39,41,2>": "-1" + }, + "<39,42>": "", + "<39,43>": "", + "<39,44>": "", + "<39,45>": "", + "<39,46>": "", + "<39,47>": "", + "<39,48>": "", + "<39,49>": "", + "<39,50>": "", + "<39,51>": "", + "<39,52>": "", + "<39,53>": "", + "<39,54>": "", + "<39,55>": "", + "<39,56>": "", + "<39,57>": "", + "<39,58>": "", + "<39,59>": "", + "<39,60>": "", + "<39,61>": "", + "<39,62>": "0", + "<39,63>": "", + "<39,64>": { + "<39,64,1>": "-2", + "<39,64,2>": "-2", + "<39,64,3>": "0" + }, + "<39,65>": "-2", + "<39,66>": "", + "<39,67>": "", + "<39,68>": "", + "<39,69>": "", + "<39,70>": "", + "<39,71>": "", + "<39,72>": "", + "<39,73>": "", + "<39,74>": "", + "<39,75>": "", + "<39,76>": "", + "<39,77>": "", + "<39,78>": "", + "<39,79>": "", + "<39,80>": "", + "<39,81>": "", + "<39,82>": "", + "<39,83>": "", + "<39,84>": "", + "<39,85>": "", + "<39,86>": "", + "<39,87>": "", + "<39,88>": "", + "<39,89>": "", + "<39,90>": "0", + "<39,91>": "0" + } + }, + "record4": { + "<1>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/RTI_HTTP_DOWNLOAD_UI.json b/SYSPROG/OIWIN/RTI_HTTP_DOWNLOAD_UI.json new file mode 100644 index 0000000..c858f49 --- /dev/null +++ b/SYSPROG/OIWIN/RTI_HTTP_DOWNLOAD_UI.json @@ -0,0 +1,1686 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1010", + "<2>": "9", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "RTI_HTTP_DOWNLOAD_UI", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "0", + "<1,6>": "0", + "<1,7>": "-487", + "<1,8>": "-157", + "<1,9>": "Download Progress", + "<1,10>": { + "<1,10,1>": "0x84C80000", + "<1,10,2>": "0x101" + }, + "<1,11>": { + "<1,11,1>": "0xC000", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "-2063597568", + "<1,13,2>": "-2063597568", + "<1,13,3>": "0" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "X", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "@COMMUTER", + "<1,18,1,4>": { + "<1,18,1,4,1>": "@SELF", + "<1,18,1,4,2>": "@EVENT", + "<1,18,1,4,3>": "@PARAM1", + "<1,18,1,4,4>": "@PARAM2", + "<1,18,1,4,5>": "@PARAM3", + "<1,18,1,4,6>": "@PARAM4", + "<1,18,1,4,7>": "@PARAM5", + "<1,18,1,4,8>": "@PARAM6" + }, + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "COMMMOD", + "<1,18,1,16>": "0" + }, + "<1,18,2>": { + "<1,18,2,1>": "X", + "<1,18,2,2>": "EXECUTE", + "<1,18,2,3>": "@COMMUTER", + "<1,18,2,4>": { + "<1,18,2,4,1>": "@SELF", + "<1,18,2,4,2>": "@EVENT", + "<1,18,2,4,3>": "@PARAM1", + "<1,18,2,4,4>": "@PARAM2", + "<1,18,2,4,5>": "@PARAM3", + "<1,18,2,4,6>": "@PARAM4", + "<1,18,2,4,7>": "@PARAM5", + "<1,18,2,4,8>": "@PARAM6" + }, + "<1,18,2,5>": "", + "<1,18,2,6>": "", + "<1,18,2,7>": "", + "<1,18,2,8>": "", + "<1,18,2,9>": "", + "<1,18,2,10>": "", + "<1,18,2,11>": "", + "<1,18,2,12>": "", + "<1,18,2,13>": "", + "<1,18,2,14>": "", + "<1,18,2,15>": "COMMMOD", + "<1,18,2,16>": "0" + } + }, + "<1,19>": { + "<1,19,1>": "CREATE", + "<1,19,2>": "CLOSE" + }, + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "0", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0", + "<1,24,15>": "0", + "<1,24,16>": "0", + "<1,24,17>": "0" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "SYSPROG*IMAGE*ICO*RTI_IDE_REPCLASS_DOC_HTML", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "", + "<1,62,4>": "2", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "", + "<1,62,8>": "0.50", + "<1,62,9>": "5.00", + "<1,62,10>": "0.00" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "SYSPROG*STPROC**RTI_HTTP_DOWNLOAD_UI", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "0", + "<1,107>": "", + "<1,108>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "PANEL_1", + "<1,2>": "", + "<1,3>": "PANEL", + "<1,4>": "RTI_HTTP_DOWNLOAD_UI", + "<1,5>": "0", + "<1,6>": "108", + "<1,7>": "487", + "<1,8>": "48", + "<1,9>": "", + "<1,10>": { + "<1,10,1>": "0x56000220", + "<1,10,2>": "0x0" + }, + "<1,11>": { + "<1,11,1>": "0x0", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "7", + "<1,13>": { + "<1,13,1>": "-1895825408", + "<1,13,2>": "-1895825408", + "<1,13,3>": "0" + }, + "<1,14>": "-2", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "Segoe UI", + "<1,15,1,2>": "-12", + "<1,15,1,3>": "400", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "0", + "<1,15,1,8>": "34", + "<1,15,1,9>": "0", + "<1,15,1,10>": "3", + "<1,15,1,11>": "2", + "<1,15,1,12>": "1" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": "0", + "<1,63>": { + "<1,63,1>": "", + "<1,63,2>": "", + "<1,63,3>": "", + "<1,63,4>": "", + "<1,63,5>": "", + "<1,63,6>": "", + "<1,63,7>": "", + "<1,63,8>": "" + }, + "<1,64>": { + "<1,64,1>": "", + "<1,64,2>": "", + "<1,64,3>": "" + }, + "<1,65>": "-2", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "0", + "<1,91>": "0", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "0", + "<1,107>": "", + "<1,108>": "" + }, + "<2>": { + "<2,1>": "BTN_CANCEL", + "<2,2>": "", + "<2,3>": "PUSHBUTTON", + "<2,4>": "RTI_HTTP_DOWNLOAD_UI.PANEL_1", + "<2,5>": "204", + "<2,6>": "14", + "<2,7>": "80", + "<2,8>": "24", + "<2,9>": "&Cancel", + "<2,10>": { + "<2,10,1>": "0x56002300", + "<2,10,2>": "0x0" + }, + "<2,11>": { + "<2,11,1>": "0x2", + "<2,11,2>": "0x80000000" + }, + "<2,12>": "8", + "<2,13>": { + "<2,13,1>": "-2", + "<2,13,2>": "-2", + "<2,13,3>": "0" + }, + "<2,14>": "-2", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "Segoe UI", + "<2,15,1,2>": "-12", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "3", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": { + "<2,18,1>": { + "<2,18,1,1>": "E", + "<2,18,1,2>": "CLOSE", + "<2,18,1,3>": "@WINDOW", + "<2,18,1,4>": "", + "<2,18,1,5>": "", + "<2,18,1,6>": "", + "<2,18,1,7>": "", + "<2,18,1,8>": "", + "<2,18,1,9>": "", + "<2,18,1,10>": "", + "<2,18,1,11>": "", + "<2,18,1,12>": "", + "<2,18,1,13>": "", + "<2,18,1,14>": "", + "<2,18,1,15>": "CLOSEWIN", + "<2,18,1,16>": "0" + } + }, + "<2,19>": "CLICK", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "", + "<2,26>": "", + "<2,27>": "", + "<2,28>": "", + "<2,29>": "", + "<2,30>": "", + "<2,31>": "", + "<2,32>": "", + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "-1", + "<2,41>": { + "<2,41,1>": "", + "<2,41,2>": "-1" + }, + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "", + "<2,53>": "", + "<2,54>": "", + "<2,55>": "", + "<2,56>": "", + "<2,57>": "", + "<2,58>": "", + "<2,59>": "", + "<2,60>": "", + "<2,61>": "", + "<2,62>": "0", + "<2,63>": "", + "<2,64>": { + "<2,64,1>": "-2", + "<2,64,2>": "-2", + "<2,64,3>": "0" + }, + "<2,65>": "-2", + "<2,66>": "", + "<2,67>": "", + "<2,68>": "", + "<2,69>": "", + "<2,70>": "", + "<2,71>": "", + "<2,72>": "", + "<2,73>": "", + "<2,74>": "", + "<2,75>": "", + "<2,76>": "", + "<2,77>": "", + "<2,78>": "", + "<2,79>": "", + "<2,80>": "", + "<2,81>": "", + "<2,82>": "", + "<2,83>": "", + "<2,84>": "", + "<2,85>": "", + "<2,86>": "", + "<2,87>": "", + "<2,88>": "", + "<2,89>": "", + "<2,90>": "0", + "<2,91>": "0", + "<2,92>": "", + "<2,93>": "", + "<2,94>": "", + "<2,95>": "", + "<2,96>": "", + "<2,97>": "", + "<2,98>": "", + "<2,99>": "", + "<2,100>": "", + "<2,101>": "", + "<2,102>": "", + "<2,103>": "", + "<2,104>": "", + "<2,105>": "", + "<2,106>": "", + "<2,107>": "", + "<2,108>": "" + }, + "<3>": { + "<3,1>": "HCL_DOWNLOAD", + "<3,2>": "", + "<3,3>": "HTTPCLIENT", + "<3,4>": "RTI_HTTP_DOWNLOAD_UI.PANEL_1", + "<3,5>": "4", + "<3,6>": "4", + "<3,7>": "44", + "<3,8>": "44", + "<3,9>": "", + "<3,10>": { + "<3,10,1>": "0x46000000", + "<3,10,2>": "0x0" + }, + "<3,11>": { + "<3,11,1>": "0x0", + "<3,11,2>": "0x80000001" + }, + "<3,12>": "9", + "<3,13>": { + "<3,13,1>": "-1", + "<3,13,2>": "-1", + "<3,13,3>": "0" + }, + "<3,14>": "-2", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "Segoe UI", + "<3,15,1,2>": "-12", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "3", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": { + "<3,18,1>": { + "<3,18,1,1>": "X", + "<3,18,1,2>": "EXECUTE", + "<3,18,1,3>": "@COMMUTER", + "<3,18,1,4>": { + "<3,18,1,4,1>": "@SELF", + "<3,18,1,4,2>": "@EVENT", + "<3,18,1,4,3>": "@PARAM1", + "<3,18,1,4,4>": "@PARAM2", + "<3,18,1,4,5>": "@PARAM3", + "<3,18,1,4,6>": "@PARAM4", + "<3,18,1,4,7>": "@PARAM5", + "<3,18,1,4,8>": "@PARAM6" + }, + "<3,18,1,5>": "", + "<3,18,1,6>": "", + "<3,18,1,7>": "", + "<3,18,1,8>": "", + "<3,18,1,9>": "", + "<3,18,1,10>": "", + "<3,18,1,11>": "", + "<3,18,1,12>": "", + "<3,18,1,13>": "", + "<3,18,1,14>": "", + "<3,18,1,15>": "COMMMOD", + "<3,18,1,16>": "0" + }, + "<3,18,2>": { + "<3,18,2,1>": "X", + "<3,18,2,2>": "EXECUTE", + "<3,18,2,3>": "@COMMUTER", + "<3,18,2,4>": { + "<3,18,2,4,1>": "@SELF", + "<3,18,2,4,2>": "@EVENT", + "<3,18,2,4,3>": "@PARAM1", + "<3,18,2,4,4>": "@PARAM2", + "<3,18,2,4,5>": "@PARAM3", + "<3,18,2,4,6>": "@PARAM4", + "<3,18,2,4,7>": "@PARAM5", + "<3,18,2,4,8>": "@PARAM6" + }, + "<3,18,2,5>": "", + "<3,18,2,6>": "", + "<3,18,2,7>": "", + "<3,18,2,8>": "", + "<3,18,2,9>": "", + "<3,18,2,10>": "", + "<3,18,2,11>": "", + "<3,18,2,12>": "", + "<3,18,2,13>": "", + "<3,18,2,14>": "", + "<3,18,2,15>": "COMMMOD", + "<3,18,2,16>": "0" + }, + "<3,18,3>": { + "<3,18,3,1>": "X", + "<3,18,3,2>": "EXECUTE", + "<3,18,3,3>": "@COMMUTER", + "<3,18,3,4>": { + "<3,18,3,4,1>": "@SELF", + "<3,18,3,4,2>": "@EVENT", + "<3,18,3,4,3>": "@PARAM1", + "<3,18,3,4,4>": "@PARAM2", + "<3,18,3,4,5>": "@PARAM3", + "<3,18,3,4,6>": "@PARAM4", + "<3,18,3,4,7>": "@PARAM5", + "<3,18,3,4,8>": "@PARAM6" + }, + "<3,18,3,5>": "", + "<3,18,3,6>": "", + "<3,18,3,7>": "", + "<3,18,3,8>": "", + "<3,18,3,9>": "", + "<3,18,3,10>": "", + "<3,18,3,11>": "", + "<3,18,3,12>": "", + "<3,18,3,13>": "", + "<3,18,3,14>": "", + "<3,18,3,15>": "COMMMOD", + "<3,18,3,16>": "0" + } + }, + "<3,19>": { + "<3,19,1>": "PROGRESS", + "<3,19,2>": "READYSTATECHANGED", + "<3,19,3>": "TIMEOUT" + }, + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "", + "<3,26>": "", + "<3,27>": "", + "<3,28>": "", + "<3,29>": "", + "<3,30>": "", + "<3,31>": "", + "<3,32>": "", + "<3,33>": "SYSPROG*IMAGE*PNG*RTI_IDE_HTTP_CLIENT", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "", + "<3,53>": "", + "<3,54>": { + "<3,54,1>": "-5", + "<3,54,2>": "0", + "<3,54,3>": "", + "<3,54,4>": "", + "<3,54,5>": "", + "<3,54,6>": "1", + "<3,54,7>": "", + "<3,54,8>": "4", + "<3,54,9>": "", + "<3,54,10>": "0" + }, + "<3,55>": "GET", + "<3,56>": "", + "<3,57>": "80", + "<3,58>": "", + "<3,59>": "", + "<3,60>": "", + "<3,61>": "", + "<3,62>": "0", + "<3,63>": { + "<3,63,1>": "", + "<3,63,2>": "", + "<3,63,3>": "", + "<3,63,4>": "", + "<3,63,5>": "", + "<3,63,6>": "", + "<3,63,7>": "", + "<3,63,8>": "" + }, + "<3,64>": { + "<3,64,1>": "", + "<3,64,2>": "", + "<3,64,3>": "" + }, + "<3,65>": "-2", + "<3,66>": "", + "<3,67>": "", + "<3,68>": "", + "<3,69>": "", + "<3,70>": "", + "<3,71>": "", + "<3,72>": "", + "<3,73>": "", + "<3,74>": "", + "<3,75>": "", + "<3,76>": "", + "<3,77>": "", + "<3,78>": "", + "<3,79>": "", + "<3,80>": "", + "<3,81>": "", + "<3,82>": "", + "<3,83>": "", + "<3,84>": "", + "<3,85>": "", + "<3,86>": "", + "<3,87>": "", + "<3,88>": "", + "<3,89>": "", + "<3,90>": "0", + "<3,91>": "0", + "<3,92>": "", + "<3,93>": "", + "<3,94>": { + "<3,94,1>": "", + "<3,94,2>": "", + "<3,94,3>": "", + "<3,94,4>": "" + }, + "<3,95>": "", + "<3,96>": { + "<3,96,1>": "0", + "<3,96,2>": "2151681280", + "<3,96,3>": "180000" + }, + "<3,97>": "*/*", + "<3,98>": "", + "<3,99>": "", + "<3,100>": "", + "<3,101>": "", + "<3,102>": "", + "<3,103>": "", + "<3,104>": "", + "<3,105>": "", + "<3,106>": "", + "<3,107>": "", + "<3,108>": "" + }, + "<4>": { + "<4,1>": "TXT_ETL", + "<4,2>": "", + "<4,3>": "STATIC", + "<4,4>": "RTI_HTTP_DOWNLOAD_UI", + "<4,5>": "120", + "<4,6>": "56", + "<4,7>": "360", + "<4,8>": "20", + "<4,9>": "", + "<4,10>": { + "<4,10,1>": "0x56000200", + "<4,10,2>": "0x0" + }, + "<4,11>": { + "<4,11,1>": "0x0", + "<4,11,2>": "0x80000000" + }, + "<4,12>": "4", + "<4,13>": { + "<4,13,1>": "-1", + "<4,13,2>": "-1", + "<4,13,3>": "0" + }, + "<4,14>": "-2", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "Segoe UI", + "<4,15,1,2>": "-12", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "3", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": "", + "<4,19>": "", + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "", + "<4,26>": "", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "", + "<4,31>": "", + "<4,32>": "", + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "", + "<4,53>": "", + "<4,54>": "", + "<4,55>": "", + "<4,56>": "", + "<4,57>": "", + "<4,58>": "", + "<4,59>": "", + "<4,60>": "", + "<4,61>": "", + "<4,62>": "0", + "<4,63>": { + "<4,63,1>": "", + "<4,63,2>": "", + "<4,63,3>": "", + "<4,63,4>": "", + "<4,63,5>": "", + "<4,63,6>": "", + "<4,63,7>": "", + "<4,63,8>": "" + }, + "<4,64>": { + "<4,64,1>": "", + "<4,64,2>": "", + "<4,64,3>": "" + }, + "<4,65>": "-2", + "<4,66>": "", + "<4,67>": "", + "<4,68>": "", + "<4,69>": "", + "<4,70>": "", + "<4,71>": "", + "<4,72>": "", + "<4,73>": "", + "<4,74>": "", + "<4,75>": "", + "<4,76>": "", + "<4,77>": "", + "<4,78>": "", + "<4,79>": "", + "<4,80>": "", + "<4,81>": "", + "<4,82>": "", + "<4,83>": "", + "<4,84>": "", + "<4,85>": "", + "<4,86>": "", + "<4,87>": "", + "<4,88>": "", + "<4,89>": "", + "<4,90>": "0", + "<4,91>": "0", + "<4,92>": "", + "<4,93>": "", + "<4,94>": "", + "<4,95>": "", + "<4,96>": "", + "<4,97>": "", + "<4,98>": "", + "<4,99>": "", + "<4,100>": "", + "<4,101>": "", + "<4,102>": "", + "<4,103>": "", + "<4,104>": "", + "<4,105>": "", + "<4,106>": "", + "<4,107>": "", + "<4,108>": "" + }, + "<5>": { + "<5,1>": "LBL_ETL", + "<5,2>": "", + "<5,3>": "STATIC", + "<5,4>": "RTI_HTTP_DOWNLOAD_UI", + "<5,5>": "8", + "<5,6>": "56", + "<5,7>": "108", + "<5,8>": "20", + "<5,9>": "Estimated time left:", + "<5,10>": { + "<5,10,1>": "0x56000200", + "<5,10,2>": "0x0" + }, + "<5,11>": { + "<5,11,1>": "0x0", + "<5,11,2>": "0x80000000" + }, + "<5,12>": "3", + "<5,13>": { + "<5,13,1>": "-1", + "<5,13,2>": "-1", + "<5,13,3>": "0" + }, + "<5,14>": "-2", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "Segoe UI", + "<5,15,1,2>": "-12", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "3", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": "", + "<5,19>": "", + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "", + "<5,26>": "", + "<5,27>": "", + "<5,28>": "<>", + "<5,29>": "<>", + "<5,30>": "", + "<5,31>": "", + "<5,32>": "", + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "", + "<5,41>": "", + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "", + "<5,52>": "", + "<5,53>": "", + "<5,54>": "", + "<5,55>": "", + "<5,56>": "", + "<5,57>": "", + "<5,58>": "", + "<5,59>": "", + "<5,60>": "", + "<5,61>": "", + "<5,62>": "0", + "<5,63>": { + "<5,63,1>": "", + "<5,63,2>": "", + "<5,63,3>": "", + "<5,63,4>": "", + "<5,63,5>": "", + "<5,63,6>": "", + "<5,63,7>": "", + "<5,63,8>": "" + }, + "<5,64>": { + "<5,64,1>": "", + "<5,64,2>": "", + "<5,64,3>": "" + }, + "<5,65>": "-2", + "<5,66>": "", + "<5,67>": "", + "<5,68>": "", + "<5,69>": "", + "<5,70>": "", + "<5,71>": "", + "<5,72>": "", + "<5,73>": "", + "<5,74>": "", + "<5,75>": "", + "<5,76>": "", + "<5,77>": "", + "<5,78>": "", + "<5,79>": "", + "<5,80>": "", + "<5,81>": "", + "<5,82>": "", + "<5,83>": "", + "<5,84>": "", + "<5,85>": "", + "<5,86>": "", + "<5,87>": "", + "<5,88>": "", + "<5,89>": "", + "<5,90>": "0", + "<5,91>": "0", + "<5,92>": "", + "<5,93>": "", + "<5,94>": "", + "<5,95>": "", + "<5,96>": "", + "<5,97>": "", + "<5,98>": "", + "<5,99>": "", + "<5,100>": "", + "<5,101>": "", + "<5,102>": "", + "<5,103>": "", + "<5,104>": "", + "<5,105>": "", + "<5,106>": "", + "<5,107>": "", + "<5,108>": "" + }, + "<6>": { + "<6,1>": "TXT_DOWNLOAD", + "<6,2>": "", + "<6,3>": "STATIC", + "<6,4>": "RTI_HTTP_DOWNLOAD_UI", + "<6,5>": "8", + "<6,6>": "8", + "<6,7>": "472", + "<6,8>": "20", + "<6,9>": "Downloading %1%", + "<6,10>": { + "<6,10,1>": "0x56004200", + "<6,10,2>": "0x0" + }, + "<6,11>": { + "<6,11,1>": "0x4", + "<6,11,2>": "0x80000000" + }, + "<6,12>": "1", + "<6,13>": { + "<6,13,1>": "-1", + "<6,13,2>": "-1", + "<6,13,3>": "0" + }, + "<6,14>": "-2", + "<6,15>": { + "<6,15,1>": { + "<6,15,1,1>": "Segoe UI", + "<6,15,1,2>": "-12", + "<6,15,1,3>": "400", + "<6,15,1,4>": "0", + "<6,15,1,5>": "0", + "<6,15,1,6>": "0", + "<6,15,1,7>": "0", + "<6,15,1,8>": "34", + "<6,15,1,9>": "0", + "<6,15,1,10>": "3", + "<6,15,1,11>": "2", + "<6,15,1,12>": "1" + } + }, + "<6,16>": "", + "<6,17>": "", + "<6,18>": "", + "<6,19>": "", + "<6,20>": "", + "<6,21>": "", + "<6,22>": "", + "<6,23>": "", + "<6,24>": "", + "<6,25>": "", + "<6,26>": "", + "<6,27>": "", + "<6,28>": "<>", + "<6,29>": "<>", + "<6,30>": "", + "<6,31>": "", + "<6,32>": "", + "<6,33>": "", + "<6,34>": "", + "<6,35>": "", + "<6,36>": "", + "<6,37>": "", + "<6,38>": "", + "<6,39>": "", + "<6,40>": "", + "<6,41>": "", + "<6,42>": "", + "<6,43>": "", + "<6,44>": "", + "<6,45>": "", + "<6,46>": "", + "<6,47>": "", + "<6,48>": "", + "<6,49>": "", + "<6,50>": "", + "<6,51>": "", + "<6,52>": "", + "<6,53>": "", + "<6,54>": "", + "<6,55>": "", + "<6,56>": "", + "<6,57>": "", + "<6,58>": "", + "<6,59>": "", + "<6,60>": "", + "<6,61>": "", + "<6,62>": "0", + "<6,63>": { + "<6,63,1>": "", + "<6,63,2>": "", + "<6,63,3>": "", + "<6,63,4>": "", + "<6,63,5>": "", + "<6,63,6>": "", + "<6,63,7>": "", + "<6,63,8>": "" + }, + "<6,64>": { + "<6,64,1>": "", + "<6,64,2>": "", + "<6,64,3>": "" + }, + "<6,65>": "-2", + "<6,66>": "", + "<6,67>": "", + "<6,68>": "", + "<6,69>": "", + "<6,70>": "", + "<6,71>": "", + "<6,72>": "", + "<6,73>": "", + "<6,74>": "", + "<6,75>": "", + "<6,76>": "", + "<6,77>": "", + "<6,78>": "", + "<6,79>": "", + "<6,80>": "", + "<6,81>": "", + "<6,82>": "", + "<6,83>": "", + "<6,84>": "", + "<6,85>": "", + "<6,86>": "", + "<6,87>": "", + "<6,88>": "", + "<6,89>": "", + "<6,90>": "0", + "<6,91>": "0", + "<6,92>": "", + "<6,93>": "", + "<6,94>": "", + "<6,95>": "", + "<6,96>": "", + "<6,97>": "", + "<6,98>": "", + "<6,99>": "", + "<6,100>": "", + "<6,101>": "", + "<6,102>": "", + "<6,103>": "", + "<6,104>": "", + "<6,105>": "", + "<6,106>": "", + "<6,107>": "", + "<6,108>": "" + }, + "<7>": { + "<7,1>": "PRB_DOWNLOAD", + "<7,2>": "", + "<7,3>": "PROGRESSBAR", + "<7,4>": "RTI_HTTP_DOWNLOAD_UI", + "<7,5>": "8", + "<7,6>": "32", + "<7,7>": "472", + "<7,8>": "20", + "<7,9>": "%p% Complete", + "<7,10>": { + "<7,10,1>": "0x56000001", + "<7,10,2>": "0x0" + }, + "<7,11>": { + "<7,11,1>": "0x400", + "<7,11,2>": "0x80000000" + }, + "<7,12>": "2", + "<7,13>": { + "<7,13,1>": "-2", + "<7,13,2>": "-2", + "<7,13,3>": "" + }, + "<7,14>": "-2", + "<7,15>": { + "<7,15,1>": { + "<7,15,1,1>": "Segoe UI", + "<7,15,1,2>": "-12", + "<7,15,1,3>": "400", + "<7,15,1,4>": "0", + "<7,15,1,5>": "0", + "<7,15,1,6>": "0", + "<7,15,1,7>": "0", + "<7,15,1,8>": "34", + "<7,15,1,9>": "0", + "<7,15,1,10>": "3", + "<7,15,1,11>": "2", + "<7,15,1,12>": "1" + } + }, + "<7,16>": "", + "<7,17>": "", + "<7,18>": "", + "<7,19>": "", + "<7,20>": "", + "<7,21>": "", + "<7,22>": "", + "<7,23>": "", + "<7,24>": "", + "<7,25>": "", + "<7,26>": "", + "<7,27>": "", + "<7,28>": "", + "<7,29>": "", + "<7,30>": "", + "<7,31>": "", + "<7,32>": "", + "<7,33>": "", + "<7,34>": "", + "<7,35>": "", + "<7,36>": "0", + "<7,37>": { + "<7,37,1>": "0", + "<7,37,2>": "100" + }, + "<7,38>": "", + "<7,39>": "", + "<7,40>": "1", + "<7,41>": "", + "<7,42>": "", + "<7,43>": "", + "<7,44>": "", + "<7,45>": "", + "<7,46>": "", + "<7,47>": "", + "<7,48>": "", + "<7,49>": "", + "<7,50>": "", + "<7,51>": "", + "<7,52>": "", + "<7,53>": "", + "<7,54>": "", + "<7,55>": "", + "<7,56>": "", + "<7,57>": "", + "<7,58>": "", + "<7,59>": "", + "<7,60>": "", + "<7,61>": "", + "<7,62>": "0", + "<7,63>": "", + "<7,64>": { + "<7,64,1>": "", + "<7,64,2>": "", + "<7,64,3>": "" + }, + "<7,65>": { + "<7,65,1>": "", + "<7,65,2>": "", + "<7,65,3>": "" + }, + "<7,66>": { + "<7,66,1>": "", + "<7,66,2>": "", + "<7,66,3>": "" + }, + "<7,67>": "", + "<7,68>": "", + "<7,69>": "", + "<7,70>": "", + "<7,71>": "", + "<7,72>": "", + "<7,73>": "", + "<7,74>": "", + "<7,75>": "", + "<7,76>": "", + "<7,77>": "", + "<7,78>": "", + "<7,79>": "", + "<7,80>": "", + "<7,81>": "", + "<7,82>": "", + "<7,83>": "", + "<7,84>": "", + "<7,85>": "", + "<7,86>": "", + "<7,87>": "", + "<7,88>": "", + "<7,89>": "", + "<7,90>": "", + "<7,91>": "", + "<7,92>": "", + "<7,93>": "", + "<7,94>": "", + "<7,95>": "", + "<7,96>": "", + "<7,97>": "", + "<7,98>": "", + "<7,99>": "", + "<7,100>": "", + "<7,101>": "", + "<7,102>": "", + "<7,103>": "", + "<7,104>": "", + "<7,105>": "", + "<7,106>": "", + "<7,107>": "", + "<7,108>": "" + }, + "<8>": { + "<8,1>": "LBL_TR", + "<8,2>": "", + "<8,3>": "STATIC", + "<8,4>": "RTI_HTTP_DOWNLOAD_UI", + "<8,5>": "8", + "<8,6>": "80", + "<8,7>": "108", + "<8,8>": "20", + "<8,9>": "Transfer Rate:", + "<8,10>": { + "<8,10,1>": "0x56000200", + "<8,10,2>": "0x0" + }, + "<8,11>": { + "<8,11,1>": "0x0", + "<8,11,2>": "0x80000000" + }, + "<8,12>": "5", + "<8,13>": { + "<8,13,1>": "-1", + "<8,13,2>": "-1", + "<8,13,3>": "0" + }, + "<8,14>": "-2", + "<8,15>": { + "<8,15,1>": { + "<8,15,1,1>": "Segoe UI", + "<8,15,1,2>": "-12", + "<8,15,1,3>": "400", + "<8,15,1,4>": "0", + "<8,15,1,5>": "0", + "<8,15,1,6>": "0", + "<8,15,1,7>": "0", + "<8,15,1,8>": "34", + "<8,15,1,9>": "0", + "<8,15,1,10>": "3", + "<8,15,1,11>": "2", + "<8,15,1,12>": "1" + } + }, + "<8,16>": "", + "<8,17>": "", + "<8,18>": "", + "<8,19>": "", + "<8,20>": "", + "<8,21>": "", + "<8,22>": "", + "<8,23>": "", + "<8,24>": "", + "<8,25>": "", + "<8,26>": "", + "<8,27>": "", + "<8,28>": "<>", + "<8,29>": "<>", + "<8,30>": "", + "<8,31>": "", + "<8,32>": "", + "<8,33>": "", + "<8,34>": "", + "<8,35>": "", + "<8,36>": "", + "<8,37>": "", + "<8,38>": "", + "<8,39>": "", + "<8,40>": "", + "<8,41>": "", + "<8,42>": "", + "<8,43>": "", + "<8,44>": "", + "<8,45>": "", + "<8,46>": "", + "<8,47>": "", + "<8,48>": "", + "<8,49>": "", + "<8,50>": "", + "<8,51>": "", + "<8,52>": "", + "<8,53>": "", + "<8,54>": "", + "<8,55>": "", + "<8,56>": "", + "<8,57>": "", + "<8,58>": "", + "<8,59>": "", + "<8,60>": "", + "<8,61>": "", + "<8,62>": "0", + "<8,63>": { + "<8,63,1>": "", + "<8,63,2>": "", + "<8,63,3>": "", + "<8,63,4>": "", + "<8,63,5>": "", + "<8,63,6>": "", + "<8,63,7>": "", + "<8,63,8>": "" + }, + "<8,64>": { + "<8,64,1>": "", + "<8,64,2>": "", + "<8,64,3>": "" + }, + "<8,65>": "-2", + "<8,66>": "", + "<8,67>": "", + "<8,68>": "", + "<8,69>": "", + "<8,70>": "", + "<8,71>": "", + "<8,72>": "", + "<8,73>": "", + "<8,74>": "", + "<8,75>": "", + "<8,76>": "", + "<8,77>": "", + "<8,78>": "", + "<8,79>": "", + "<8,80>": "", + "<8,81>": "", + "<8,82>": "", + "<8,83>": "", + "<8,84>": "", + "<8,85>": "", + "<8,86>": "", + "<8,87>": "", + "<8,88>": "", + "<8,89>": "", + "<8,90>": "0", + "<8,91>": "0", + "<8,92>": "", + "<8,93>": "", + "<8,94>": "", + "<8,95>": "", + "<8,96>": "", + "<8,97>": "", + "<8,98>": "", + "<8,99>": "", + "<8,100>": "", + "<8,101>": "", + "<8,102>": "", + "<8,103>": "", + "<8,104>": "", + "<8,105>": "", + "<8,106>": "", + "<8,107>": "", + "<8,108>": "" + }, + "<9>": { + "<9,1>": "TXT_TR", + "<9,2>": "", + "<9,3>": "STATIC", + "<9,4>": "RTI_HTTP_DOWNLOAD_UI", + "<9,5>": "120", + "<9,6>": "80", + "<9,7>": "360", + "<9,8>": "20", + "<9,9>": "", + "<9,10>": { + "<9,10,1>": "0x56000200", + "<9,10,2>": "0x0" + }, + "<9,11>": { + "<9,11,1>": "0x0", + "<9,11,2>": "0x80000000" + }, + "<9,12>": "6", + "<9,13>": { + "<9,13,1>": "-1", + "<9,13,2>": "-1", + "<9,13,3>": "0" + }, + "<9,14>": "-2", + "<9,15>": { + "<9,15,1>": { + "<9,15,1,1>": "Segoe UI", + "<9,15,1,2>": "-12", + "<9,15,1,3>": "400", + "<9,15,1,4>": "0", + "<9,15,1,5>": "0", + "<9,15,1,6>": "0", + "<9,15,1,7>": "0", + "<9,15,1,8>": "34", + "<9,15,1,9>": "0", + "<9,15,1,10>": "3", + "<9,15,1,11>": "2", + "<9,15,1,12>": "1" + } + }, + "<9,16>": "", + "<9,17>": "", + "<9,18>": "", + "<9,19>": "", + "<9,20>": "", + "<9,21>": "", + "<9,22>": "", + "<9,23>": "", + "<9,24>": "", + "<9,25>": "", + "<9,26>": "", + "<9,27>": "", + "<9,28>": "<>", + "<9,29>": "<>", + "<9,30>": "", + "<9,31>": "", + "<9,32>": "", + "<9,33>": "", + "<9,34>": "", + "<9,35>": "", + "<9,36>": "", + "<9,37>": "", + "<9,38>": "", + "<9,39>": "", + "<9,40>": "", + "<9,41>": "", + "<9,42>": "", + "<9,43>": "", + "<9,44>": "", + "<9,45>": "", + "<9,46>": "", + "<9,47>": "", + "<9,48>": "", + "<9,49>": "", + "<9,50>": "", + "<9,51>": "", + "<9,52>": "", + "<9,53>": "", + "<9,54>": "", + "<9,55>": "", + "<9,56>": "", + "<9,57>": "", + "<9,58>": "", + "<9,59>": "", + "<9,60>": "", + "<9,61>": "", + "<9,62>": "0", + "<9,63>": { + "<9,63,1>": "", + "<9,63,2>": "", + "<9,63,3>": "", + "<9,63,4>": "", + "<9,63,5>": "", + "<9,63,6>": "", + "<9,63,7>": "", + "<9,63,8>": "" + }, + "<9,64>": { + "<9,64,1>": "", + "<9,64,2>": "", + "<9,64,3>": "" + }, + "<9,65>": "-2", + "<9,66>": "", + "<9,67>": "", + "<9,68>": "", + "<9,69>": "", + "<9,70>": "", + "<9,71>": "", + "<9,72>": "", + "<9,73>": "", + "<9,74>": "", + "<9,75>": "", + "<9,76>": "", + "<9,77>": "", + "<9,78>": "", + "<9,79>": "", + "<9,80>": "", + "<9,81>": "", + "<9,82>": "", + "<9,83>": "", + "<9,84>": "", + "<9,85>": "", + "<9,86>": "", + "<9,87>": "", + "<9,88>": "", + "<9,89>": "", + "<9,90>": "0", + "<9,91>": "0", + "<9,92>": "", + "<9,93>": "", + "<9,94>": "", + "<9,95>": "", + "<9,96>": "", + "<9,97>": "", + "<9,98>": "", + "<9,99>": "", + "<9,100>": "", + "<9,101>": "", + "<9,102>": "", + "<9,103>": "", + "<9,104>": "", + "<9,105>": "", + "<9,106>": "", + "<9,107>": "", + "<9,108>": "" + } + }, + "record4": { + "<1>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/RTI_QUERYGRID.json b/SYSPROG/OIWIN/RTI_QUERYGRID.json new file mode 100644 index 0000000..92808a9 --- /dev/null +++ b/SYSPROG/OIWIN/RTI_QUERYGRID.json @@ -0,0 +1,3009 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1010", + "<2>": "12", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "RTI_QUERYGRID", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "503", + "<1,6>": "218", + "<1,7>": "-711", + "<1,8>": "-483", + "<1,9>": "RTI Query Grid", + "<1,10>": { + "<1,10,1>": "0x90CD0000", + "<1,10,2>": "0x108" + }, + "<1,11>": { + "<1,11,1>": "0xC000", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "0" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "X", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "@WINDOW_EVENTS", + "<1,18,1,4>": { + "<1,18,1,4,1>": "@SELF", + "<1,18,1,4,2>": "@EVENT", + "<1,18,1,4,3>": "@PARAM1", + "<1,18,1,4,4>": "@PARAM2", + "<1,18,1,4,5>": "@PARAM3", + "<1,18,1,4,6>": "@PARAM4", + "<1,18,1,4,7>": "@PARAM5", + "<1,18,1,4,8>": "@PARAM6" + }, + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "COMMEVT", + "<1,18,1,16>": "0" + } + }, + "<1,19>": "CREATE", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "0", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0", + "<1,24,15>": "0", + "<1,24,16>": "0", + "<1,24,17>": "0" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "SYSPROG*IMAGE*ICO*OI10_LOGO", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "", + "<1,62,4>": "2", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "", + "<1,62,8>": "0.50", + "<1,62,9>": "5.00", + "<1,62,10>": "0.00" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "SYSPROG*STPROC**RTI_QUERYGRID_EVENTS", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "0", + "<1,107>": "", + "<1,108>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "CHK_IXONLY", + "<1,2>": "", + "<1,3>": "CHECKBOX", + "<1,4>": "RTI_QUERYGRID", + "<1,5>": "289", + "<1,6>": "349", + "<1,7>": "148", + "<1,8>": "20", + "<1,9>": "Indexed Columns Only", + "<1,10>": { + "<1,10,1>": "0x56000103", + "<1,10,2>": "0x0" + }, + "<1,11>": { + "<1,11,1>": "0x0", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "12", + "<1,13>": { + "<1,13,1>": "-2", + "<1,13,2>": "-2", + "<1,13,3>": "" + }, + "<1,14>": "-2", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "Segoe UI", + "<1,15,1,2>": "-12", + "<1,15,1,3>": "400", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "0", + "<1,15,1,8>": "34", + "<1,15,1,9>": "0", + "<1,15,1,10>": "3", + "<1,15,1,11>": "2", + "<1,15,1,12>": "1", + "<1,15,1,13>": "11", + "<1,15,1,14>": "2", + "<1,15,1,15>": "0", + "<1,15,1,16>": "0" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "X", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "@COMMUTER", + "<1,18,1,4>": { + "<1,18,1,4,1>": "@SELF", + "<1,18,1,4,2>": "@EVENT", + "<1,18,1,4,3>": "@PARAM1", + "<1,18,1,4,4>": "@PARAM2", + "<1,18,1,4,5>": "@PARAM3", + "<1,18,1,4,6>": "@PARAM4", + "<1,18,1,4,7>": "@PARAM5", + "<1,18,1,4,8>": "@PARAM6" + }, + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "COMMMOD", + "<1,18,1,16>": "0" + } + }, + "<1,19>": "CLICK", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "0", + "<1,37>": "", + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": "0", + "<1,63>": { + "<1,63,1>": "", + "<1,63,2>": "", + "<1,63,3>": "", + "<1,63,4>": "", + "<1,63,5>": "", + "<1,63,6>": "", + "<1,63,7>": "", + "<1,63,8>": "" + }, + "<1,64>": { + "<1,64,1>": "", + "<1,64,2>": "", + "<1,64,3>": "" + }, + "<1,65>": "-2", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "0", + "<1,91>": "0", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "", + "<1,107>": "", + "<1,108>": "" + }, + "<2>": { + "<2,1>": "BTN_FILTER", + "<2,2>": "", + "<2,3>": "PUSHBUTTON", + "<2,4>": "RTI_QUERYGRID", + "<2,5>": "148", + "<2,6>": "-134", + "<2,7>": "120", + "<2,8>": "20", + "<2,9>": "Choose", + "<2,10>": { + "<2,10,1>": "0x56002300", + "<2,10,2>": "0x0" + }, + "<2,11>": { + "<2,11,1>": "0x2020", + "<2,11,2>": "0x80000000" + }, + "<2,12>": "9", + "<2,13>": { + "<2,13,1>": "-2", + "<2,13,2>": "-2", + "<2,13,3>": "0" + }, + "<2,14>": "-2", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "Segoe UI", + "<2,15,1,2>": "-12", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "3", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "11", + "<2,15,1,14>": "2", + "<2,15,1,15>": "0", + "<2,15,1,16>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": { + "<2,18,1>": { + "<2,18,1,1>": "X", + "<2,18,1,2>": "EXECUTE", + "<2,18,1,3>": "@WINDOW_EVENTS", + "<2,18,1,4>": { + "<2,18,1,4,1>": "@SELF", + "<2,18,1,4,2>": "@EVENT", + "<2,18,1,4,3>": "@PARAM1", + "<2,18,1,4,4>": "@PARAM2", + "<2,18,1,4,5>": "@PARAM3", + "<2,18,1,4,6>": "@PARAM4", + "<2,18,1,4,7>": "@PARAM5", + "<2,18,1,4,8>": "@PARAM6" + }, + "<2,18,1,5>": "", + "<2,18,1,6>": "", + "<2,18,1,7>": "", + "<2,18,1,8>": "", + "<2,18,1,9>": "", + "<2,18,1,10>": "", + "<2,18,1,11>": "", + "<2,18,1,12>": "", + "<2,18,1,13>": "", + "<2,18,1,14>": "", + "<2,18,1,15>": "COMMEVT", + "<2,18,1,16>": "0" + }, + "<2,18,2>": { + "<2,18,2,1>": "X", + "<2,18,2,2>": "EXECUTE", + "<2,18,2,3>": "@WINDOW_EVENTS", + "<2,18,2,4>": { + "<2,18,2,4,1>": "@SELF", + "<2,18,2,4,2>": "@EVENT", + "<2,18,2,4,3>": "@PARAM1", + "<2,18,2,4,4>": "@PARAM2", + "<2,18,2,4,5>": "@PARAM3", + "<2,18,2,4,6>": "@PARAM4", + "<2,18,2,4,7>": "@PARAM5", + "<2,18,2,4,8>": "@PARAM6" + }, + "<2,18,2,5>": "", + "<2,18,2,6>": "", + "<2,18,2,7>": "", + "<2,18,2,8>": "", + "<2,18,2,9>": "", + "<2,18,2,10>": "", + "<2,18,2,11>": "", + "<2,18,2,12>": "", + "<2,18,2,13>": "", + "<2,18,2,14>": "", + "<2,18,2,15>": "COMMEVT", + "<2,18,2,16>": "0" + } + }, + "<2,19>": { + "<2,19,1>": "DROPDOWN", + "<2,19,2>": "CLICK" + }, + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "", + "<2,26>": "", + "<2,27>": "", + "<2,28>": "", + "<2,29>": "", + "<2,30>": "", + "<2,31>": "", + "<2,32>": "", + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "-1", + "<2,41>": { + "<2,41,1>": "", + "<2,41,2>": "-1" + }, + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "", + "<2,53>": "", + "<2,54>": "", + "<2,55>": "", + "<2,56>": "", + "<2,57>": "", + "<2,58>": "", + "<2,59>": "", + "<2,60>": "", + "<2,61>": "", + "<2,62>": "0", + "<2,63>": "", + "<2,64>": { + "<2,64,1>": "-2", + "<2,64,2>": "-2", + "<2,64,3>": "0" + }, + "<2,65>": "-2", + "<2,66>": "", + "<2,67>": "", + "<2,68>": "", + "<2,69>": "", + "<2,70>": "", + "<2,71>": "", + "<2,72>": "", + "<2,73>": "", + "<2,74>": "", + "<2,75>": "", + "<2,76>": "", + "<2,77>": "", + "<2,78>": "", + "<2,79>": "", + "<2,80>": "", + "<2,81>": "", + "<2,82>": "SYSPROG*IMAGE*PNG*RTI_IDE_SELECT_CTRL", + "<2,83>": { + "<2,83,1>": "-5", + "<2,83,2>": "", + "<2,83,3>": { + "<2,83,3,1>": "0", + "<2,83,3,2>": "0" + }, + "<2,83,4>": { + "<2,83,4,1>": "0", + "<2,83,4,2>": "0" + }, + "<2,83,5>": "0", + "<2,83,6>": "1", + "<2,83,7>": "", + "<2,83,8>": "", + "<2,83,9>": "", + "<2,83,10>": "0" + }, + "<2,84>": "", + "<2,85>": "", + "<2,86>": "", + "<2,87>": "", + "<2,88>": "", + "<2,89>": "", + "<2,90>": "0", + "<2,91>": "0", + "<2,92>": "", + "<2,93>": "", + "<2,94>": "", + "<2,95>": "", + "<2,96>": "", + "<2,97>": "", + "<2,98>": "", + "<2,99>": "", + "<2,100>": "", + "<2,101>": "", + "<2,102>": "", + "<2,103>": "", + "<2,104>": "", + "<2,105>": "", + "<2,106>": "", + "<2,107>": "", + "<2,108>": "" + }, + "<3>": { + "<3,1>": "LBL_1", + "<3,2>": "", + "<3,3>": "STATIC", + "<3,4>": "RTI_QUERYGRID", + "<3,5>": "12", + "<3,6>": "-94", + "<3,7>": "80", + "<3,8>": "20", + "<3,9>": "With Clause", + "<3,10>": { + "<3,10,1>": "0x56000000", + "<3,10,2>": "0x0" + }, + "<3,11>": { + "<3,11,1>": "0x2000", + "<3,11,2>": "0x80000000" + }, + "<3,12>": "7", + "<3,13>": { + "<3,13,1>": "-2", + "<3,13,2>": "-2", + "<3,13,3>": "" + }, + "<3,14>": "-2", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "Segoe UI", + "<3,15,1,2>": "-12", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "3", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "11", + "<3,15,1,14>": "2", + "<3,15,1,15>": "0", + "<3,15,1,16>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": "", + "<3,19>": "", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "", + "<3,26>": "", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "", + "<3,31>": "", + "<3,32>": "", + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "", + "<3,53>": "", + "<3,54>": "", + "<3,55>": "", + "<3,56>": "", + "<3,57>": "", + "<3,58>": "", + "<3,59>": "", + "<3,60>": "", + "<3,61>": "", + "<3,62>": "0", + "<3,63>": { + "<3,63,1>": "", + "<3,63,2>": "", + "<3,63,3>": "", + "<3,63,4>": "", + "<3,63,5>": "", + "<3,63,6>": "", + "<3,63,7>": "", + "<3,63,8>": "" + }, + "<3,64>": { + "<3,64,1>": "", + "<3,64,2>": "", + "<3,64,3>": "" + }, + "<3,65>": "-2", + "<3,66>": "", + "<3,67>": "", + "<3,68>": "", + "<3,69>": "", + "<3,70>": "", + "<3,71>": "", + "<3,72>": "", + "<3,73>": "", + "<3,74>": "", + "<3,75>": "", + "<3,76>": "", + "<3,77>": "", + "<3,78>": "", + "<3,79>": "", + "<3,80>": "", + "<3,81>": "", + "<3,82>": "", + "<3,83>": "", + "<3,84>": "", + "<3,85>": "", + "<3,86>": "", + "<3,87>": "", + "<3,88>": "", + "<3,89>": "", + "<3,90>": "0", + "<3,91>": "0", + "<3,92>": "", + "<3,93>": "", + "<3,94>": "", + "<3,95>": "", + "<3,96>": "", + "<3,97>": "", + "<3,98>": "", + "<3,99>": "", + "<3,100>": "", + "<3,101>": "", + "<3,102>": "", + "<3,103>": "", + "<3,104>": "", + "<3,105>": "", + "<3,106>": "", + "<3,107>": "", + "<3,108>": "" + }, + "<4>": { + "<4,1>": "BY_CLAUSE", + "<4,2>": "", + "<4,3>": "EDITFIELD", + "<4,4>": "RTI_QUERYGRID", + "<4,5>": "108", + "<4,6>": "-66", + "<4,7>": "-11", + "<4,8>": "20", + "<4,9>": "", + "<4,10>": { + "<4,10,1>": "0x56000080", + "<4,10,2>": "0x200" + }, + "<4,11>": { + "<4,11,1>": "0x6000", + "<4,11,2>": "0x80000000" + }, + "<4,12>": "5", + "<4,13>": { + "<4,13,1>": "-2", + "<4,13,2>": "-2", + "<4,13,3>": "" + }, + "<4,14>": "-2", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "Segoe UI", + "<4,15,1,2>": "-12", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "3", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "11", + "<4,15,1,14>": "2", + "<4,15,1,15>": "0", + "<4,15,1,16>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": { + "<4,18,1>": { + "<4,18,1,1>": "X", + "<4,18,1,2>": "EXECUTE", + "<4,18,1,3>": "@WINDOW_EVENTS", + "<4,18,1,4>": { + "<4,18,1,4,1>": "@SELF", + "<4,18,1,4,2>": "@EVENT", + "<4,18,1,4,3>": "@PARAM1", + "<4,18,1,4,4>": "@PARAM2", + "<4,18,1,4,5>": "@PARAM3", + "<4,18,1,4,6>": "@PARAM4", + "<4,18,1,4,7>": "@PARAM5", + "<4,18,1,4,8>": "@PARAM6" + }, + "<4,18,1,5>": "", + "<4,18,1,6>": "", + "<4,18,1,7>": "", + "<4,18,1,8>": "", + "<4,18,1,9>": "", + "<4,18,1,10>": "", + "<4,18,1,11>": "", + "<4,18,1,12>": "", + "<4,18,1,13>": "", + "<4,18,1,14>": "", + "<4,18,1,15>": "COMMEVT", + "<4,18,1,16>": "0" + } + }, + "<4,19>": "CHAR", + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "", + "<4,26>": "", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "<>", + "<4,31>": "0", + "<4,32>": "", + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": { + "<4,36,1>": "0", + "<4,36,2>": "0" + }, + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "", + "<4,53>": "", + "<4,54>": "", + "<4,55>": "", + "<4,56>": "", + "<4,57>": "", + "<4,58>": "", + "<4,59>": "", + "<4,60>": "", + "<4,61>": "", + "<4,62>": "0", + "<4,63>": "", + "<4,64>": "", + "<4,65>": "", + "<4,66>": "", + "<4,67>": "", + "<4,68>": "", + "<4,69>": "", + "<4,70>": "", + "<4,71>": "", + "<4,72>": "", + "<4,73>": "", + "<4,74>": "", + "<4,75>": "", + "<4,76>": "", + "<4,77>": "", + "<4,78>": "", + "<4,79>": "", + "<4,80>": "", + "<4,81>": "", + "<4,82>": "", + "<4,83>": "", + "<4,84>": "", + "<4,85>": "", + "<4,86>": "", + "<4,87>": "", + "<4,88>": "", + "<4,89>": "", + "<4,90>": "", + "<4,91>": "", + "<4,92>": "", + "<4,93>": "", + "<4,94>": "", + "<4,95>": "", + "<4,96>": "", + "<4,97>": "", + "<4,98>": "", + "<4,99>": "", + "<4,100>": "", + "<4,101>": "", + "<4,102>": "", + "<4,103>": "", + "<4,104>": "", + "<4,105>": "", + "<4,106>": "", + "<4,107>": "", + "<4,108>": "" + }, + "<5>": { + "<5,1>": "GRID", + "<5,2>": "", + "<5,3>": "EDITTABLE", + "<5,4>": "RTI_QUERYGRID", + "<5,5>": "12", + "<5,6>": "12", + "<5,7>": "-11", + "<5,8>": "-159", + "<5,9>": "", + "<5,10>": { + "<5,10,1>": "0x560001D1", + "<5,10,2>": "0x200" + }, + "<5,11>": { + "<5,11,1>": "0x6C040", + "<5,11,2>": "0x80000002" + }, + "<5,12>": "4", + "<5,13>": { + "<5,13,1>": "-2", + "<5,13,2>": "-2", + "<5,13,3>": "" + }, + "<5,14>": "-2", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "Segoe UI", + "<5,15,1,2>": "-12", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "3", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "11", + "<5,15,1,14>": "2", + "<5,15,1,15>": "0", + "<5,15,1,16>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": { + "<5,18,1>": { + "<5,18,1,1>": "X", + "<5,18,1,2>": "EXECUTE", + "<5,18,1,3>": "@WINDOW_EVENTS", + "<5,18,1,4>": { + "<5,18,1,4,1>": "@SELF", + "<5,18,1,4,2>": "@EVENT", + "<5,18,1,4,3>": "@PARAM1", + "<5,18,1,4,4>": "@PARAM2", + "<5,18,1,4,5>": "@PARAM3", + "<5,18,1,4,6>": "@PARAM4", + "<5,18,1,4,7>": "@PARAM5", + "<5,18,1,4,8>": "@PARAM6" + }, + "<5,18,1,5>": "", + "<5,18,1,6>": "", + "<5,18,1,7>": "", + "<5,18,1,8>": "", + "<5,18,1,9>": "", + "<5,18,1,10>": "", + "<5,18,1,11>": "", + "<5,18,1,12>": "", + "<5,18,1,13>": "", + "<5,18,1,14>": "", + "<5,18,1,15>": "COMMEVT", + "<5,18,1,16>": "0" + }, + "<5,18,2>": { + "<5,18,2,1>": "X", + "<5,18,2,2>": "EXECUTE", + "<5,18,2,3>": "@WINDOW_EVENTS", + "<5,18,2,4>": { + "<5,18,2,4,1>": "@SELF", + "<5,18,2,4,2>": "@EVENT", + "<5,18,2,4,3>": "@PARAM1", + "<5,18,2,4,4>": "@PARAM2", + "<5,18,2,4,5>": "@PARAM3", + "<5,18,2,4,6>": "@PARAM4", + "<5,18,2,4,7>": "@PARAM5", + "<5,18,2,4,8>": "@PARAM6" + }, + "<5,18,2,5>": "", + "<5,18,2,6>": "", + "<5,18,2,7>": "", + "<5,18,2,8>": "", + "<5,18,2,9>": "", + "<5,18,2,10>": "", + "<5,18,2,11>": "", + "<5,18,2,12>": "", + "<5,18,2,13>": "", + "<5,18,2,14>": "", + "<5,18,2,15>": "COMMEVT", + "<5,18,2,16>": "1" + }, + "<5,18,3>": { + "<5,18,3,1>": "X", + "<5,18,3,2>": "EXECUTE", + "<5,18,3,3>": "@WINDOW_EVENTS", + "<5,18,3,4>": { + "<5,18,3,4,1>": "@SELF", + "<5,18,3,4,2>": "@EVENT", + "<5,18,3,4,3>": "@PARAM1", + "<5,18,3,4,4>": "@PARAM2", + "<5,18,3,4,5>": "@PARAM3", + "<5,18,3,4,6>": "@PARAM4", + "<5,18,3,4,7>": "@PARAM5", + "<5,18,3,4,8>": "@PARAM6" + }, + "<5,18,3,5>": "", + "<5,18,3,6>": "", + "<5,18,3,7>": "", + "<5,18,3,8>": "", + "<5,18,3,9>": "", + "<5,18,3,10>": "", + "<5,18,3,11>": "", + "<5,18,3,12>": "", + "<5,18,3,13>": "", + "<5,18,3,14>": "", + "<5,18,3,15>": "COMMEVT", + "<5,18,3,16>": "0" + } + }, + "<5,19>": { + "<5,19,1>": "CELLCHANGED", + "<5,19,2>": "CELLDROPDOWN", + "<5,19,3>": "POSCHANGED" + }, + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": { + "<5,23,1>": "", + "<5,23,2>": "", + "<5,23,3>": "", + "<5,23,4>": "" + }, + "<5,24>": { + "<5,24,1>": "", + "<5,24,2>": "", + "<5,24,3>": "", + "<5,24,4>": "" + }, + "<5,25>": "", + "<5,26>": "", + "<5,27>": "", + "<5,28>": { + "<5,28,1>": "<>", + "<5,28,2>": "<>", + "<5,28,3>": "<>", + "<5,28,4>": "<>" + }, + "<5,29>": { + "<5,29,1>": "<>", + "<5,29,2>": "<>", + "<5,29,3>": "<>", + "<5,29,4>": "<>" + }, + "<5,30>": { + "<5,30,1>": "<>", + "<5,30,2>": "<>", + "<5,30,3>": "<>", + "<5,30,4>": "<>" + }, + "<5,31>": { + "<5,31,1>": "0", + "<5,31,2>": "0", + "<5,31,3>": "0", + "<5,31,4>": "0" + }, + "<5,32>": "", + "<5,33>": "", + "<5,34>": "", + "<5,35>": { + "<5,35,1>": { + "<5,35,1,1>": "", + "<5,35,1,2>": "", + "<5,35,1,3>": "", + "<5,35,1,4>": "" + }, + "<5,35,2>": { + "<5,35,2,1>": "", + "<5,35,2,2>": "", + "<5,35,2,3>": "", + "<5,35,2,4>": "" + }, + "<5,35,3>": { + "<5,35,3,1>": "", + "<5,35,3,2>": "", + "<5,35,3,3>": "", + "<5,35,3,4>": "" + }, + "<5,35,4>": { + "<5,35,4,1>": "", + "<5,35,4,2>": "", + "<5,35,4,3>": "", + "<5,35,4,4>": "" + }, + "<5,35,5>": { + "<5,35,5,1>": "", + "<5,35,5,2>": "", + "<5,35,5,3>": "", + "<5,35,5,4>": "" + }, + "<5,35,6>": { + "<5,35,6,1>": "", + "<5,35,6,2>": "", + "<5,35,6,3>": "", + "<5,35,6,4>": "" + }, + "<5,35,7>": { + "<5,35,7,1>": "", + "<5,35,7,2>": "", + "<5,35,7,3>": "", + "<5,35,7,4>": "" + }, + "<5,35,8>": { + "<5,35,8,1>": "", + "<5,35,8,2>": "", + "<5,35,8,3>": "", + "<5,35,8,4>": "" + }, + "<5,35,9>": { + "<5,35,9,1>": "", + "<5,35,9,2>": "", + "<5,35,9,3>": "", + "<5,35,9,4>": "" + }, + "<5,35,10>": { + "<5,35,10,1>": "", + "<5,35,10,2>": "", + "<5,35,10,3>": "", + "<5,35,10,4>": "" + }, + "<5,35,11>": { + "<5,35,11,1>": "", + "<5,35,11,2>": "", + "<5,35,11,3>": "", + "<5,35,11,4>": "" + }, + "<5,35,12>": { + "<5,35,12,1>": "", + "<5,35,12,2>": "", + "<5,35,12,3>": "", + "<5,35,12,4>": "" + } + }, + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": { + "<5,39,1>": "80", + "<5,39,2>": "80", + "<5,39,3>": "80", + "<5,39,4>": "80" + }, + "<5,40>": "4", + "<5,41>": { + "<5,41,1>": "0", + "<5,41,2>": "3", + "<5,41,3>": "1", + "<5,41,4>": "-2", + "<5,41,5>": "-2", + "<5,41,6>": "28", + "<5,41,7>": "24", + "<5,41,8>": "40", + "<5,41,9>": "113", + "<5,41,10>": "115", + "<5,41,11>": "0", + "<5,41,12>": "-2", + "<5,41,13>": "0", + "<5,41,14>": "1" + }, + "<5,42>": { + "<5,42,1>": "2147483714", + "<5,42,2>": "2148008000", + "<5,42,3>": "2149056576", + "<5,42,4>": "2148008000" + }, + "<5,43>": { + "<5,43,1>": "120", + "<5,43,2>": "120", + "<5,43,3>": "120", + "<5,43,4>": "120" + }, + "<5,44>": { + "<5,44,1>": "Name", + "<5,44,2>": "Operator", + "<5,44,3>": "Search Value", + "<5,44,4>": "Sort" + }, + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "", + "<5,52>": "", + "<5,53>": "", + "<5,54>": "", + "<5,55>": { + "<5,55,1>": "", + "<5,55,2>": "", + "<5,55,3>": "", + "<5,55,4>": "" + }, + "<5,56>": { + "<5,56,1>": "", + "<5,56,2>": "", + "<5,56,3>": "", + "<5,56,4>": "" + }, + "<5,57>": { + "<5,57,1>": "", + "<5,57,2>": "", + "<5,57,3>": "", + "<5,57,4>": { + "<5,57,4,1>": "", + "<5,57,4,2>": "BY", + "<5,57,4,3>": "BY-DESC" + } + }, + "<5,58>": { + "<5,58,1>": "", + "<5,58,2>": "", + "<5,58,3>": "", + "<5,58,4>": "" + }, + "<5,59>": "", + "<5,60>": { + "<5,60,1>": "4114", + "<5,60,2>": "4114", + "<5,60,3>": "4114", + "<5,60,4>": "4114" + }, + "<5,61>": "", + "<5,62>": "0", + "<5,63>": "", + "<5,64>": "-2", + "<5,65>": "", + "<5,66>": "", + "<5,67>": "", + "<5,68>": "", + "<5,69>": "", + "<5,70>": "", + "<5,71>": "", + "<5,72>": "", + "<5,73>": "", + "<5,74>": "", + "<5,75>": "", + "<5,76>": "", + "<5,77>": "", + "<5,78>": "", + "<5,79>": "", + "<5,80>": "", + "<5,81>": "", + "<5,82>": "", + "<5,83>": "", + "<5,84>": "", + "<5,85>": "", + "<5,86>": "", + "<5,87>": "", + "<5,88>": "", + "<5,89>": "", + "<5,90>": "", + "<5,91>": "", + "<5,92>": "", + "<5,93>": "", + "<5,94>": { + "<5,94,1>": "", + "<5,94,2>": "", + "<5,94,3>": "", + "<5,94,4>": "" + }, + "<5,95>": { + "<5,95,1>": "", + "<5,95,2>": "", + "<5,95,3>": "", + "<5,95,4>": "" + }, + "<5,96>": { + "<5,96,1>": { + "<5,96,1,1>": "", + "<5,96,1,2>": "" + }, + "<5,96,2>": { + "<5,96,2,1>": "", + "<5,96,2,2>": "" + }, + "<5,96,3>": { + "<5,96,3,1>": "", + "<5,96,3,2>": "" + }, + "<5,96,4>": { + "<5,96,4,1>": "", + "<5,96,4,2>": "" + } + }, + "<5,97>": { + "<5,97,1>": { + "<5,97,1,1>": "Segoe UI", + "<5,97,1,2>": "-12", + "<5,97,1,3>": "400", + "<5,97,1,4>": "0", + "<5,97,1,5>": "0", + "<5,97,1,6>": "0", + "<5,97,1,7>": "0", + "<5,97,1,8>": "34", + "<5,97,1,9>": "0", + "<5,97,1,10>": "3", + "<5,97,1,11>": "2", + "<5,97,1,12>": "1" + }, + "<5,97,2>": { + "<5,97,2,1>": "Segoe UI", + "<5,97,2,2>": "-12", + "<5,97,2,3>": "400", + "<5,97,2,4>": "0", + "<5,97,2,5>": "0", + "<5,97,2,6>": "0", + "<5,97,2,7>": "0", + "<5,97,2,8>": "34", + "<5,97,2,9>": "0", + "<5,97,2,10>": "3", + "<5,97,2,11>": "2", + "<5,97,2,12>": "1" + }, + "<5,97,3>": { + "<5,97,3,1>": "Segoe UI", + "<5,97,3,2>": "-12", + "<5,97,3,3>": "400", + "<5,97,3,4>": "0", + "<5,97,3,5>": "0", + "<5,97,3,6>": "0", + "<5,97,3,7>": "0", + "<5,97,3,8>": "34", + "<5,97,3,9>": "0", + "<5,97,3,10>": "3", + "<5,97,3,11>": "2", + "<5,97,3,12>": "1" + }, + "<5,97,4>": { + "<5,97,4,1>": "Segoe UI", + "<5,97,4,2>": "-12", + "<5,97,4,3>": "400", + "<5,97,4,4>": "0", + "<5,97,4,5>": "0", + "<5,97,4,6>": "0", + "<5,97,4,7>": "0", + "<5,97,4,8>": "34", + "<5,97,4,9>": "0", + "<5,97,4,10>": "3", + "<5,97,4,11>": "2", + "<5,97,4,12>": "1" + } + }, + "<5,98>": { + "<5,98,1>": { + "<5,98,1,1>": "Segoe UI", + "<5,98,1,2>": "-12", + "<5,98,1,3>": "400", + "<5,98,1,4>": "0", + "<5,98,1,5>": "0", + "<5,98,1,6>": "0", + "<5,98,1,7>": "0", + "<5,98,1,8>": "34", + "<5,98,1,9>": "0", + "<5,98,1,10>": "3", + "<5,98,1,11>": "2", + "<5,98,1,12>": "1" + }, + "<5,98,2>": { + "<5,98,2,1>": "Segoe UI", + "<5,98,2,2>": "-12", + "<5,98,2,3>": "400", + "<5,98,2,4>": "0", + "<5,98,2,5>": "0", + "<5,98,2,6>": "0", + "<5,98,2,7>": "0", + "<5,98,2,8>": "34", + "<5,98,2,9>": "0", + "<5,98,2,10>": "3", + "<5,98,2,11>": "2", + "<5,98,2,12>": "1" + }, + "<5,98,3>": { + "<5,98,3,1>": "Segoe UI", + "<5,98,3,2>": "-12", + "<5,98,3,3>": "400", + "<5,98,3,4>": "0", + "<5,98,3,5>": "0", + "<5,98,3,6>": "0", + "<5,98,3,7>": "0", + "<5,98,3,8>": "34", + "<5,98,3,9>": "0", + "<5,98,3,10>": "3", + "<5,98,3,11>": "2", + "<5,98,3,12>": "1" + }, + "<5,98,4>": { + "<5,98,4,1>": "Segoe UI", + "<5,98,4,2>": "-12", + "<5,98,4,3>": "400", + "<5,98,4,4>": "0", + "<5,98,4,5>": "0", + "<5,98,4,6>": "0", + "<5,98,4,7>": "0", + "<5,98,4,8>": "34", + "<5,98,4,9>": "0", + "<5,98,4,10>": "3", + "<5,98,4,11>": "2", + "<5,98,4,12>": "1" + } + }, + "<5,99>": { + "<5,99,1>": { + "<5,99,1,1>": "-2", + "<5,99,1,2>": "-2", + "<5,99,1,3>": "-2", + "<5,99,1,4>": "0", + "<5,99,1,5>": "0", + "<5,99,1,6>": "0", + "<5,99,1,7>": "0" + }, + "<5,99,2>": { + "<5,99,2,1>": "-2", + "<5,99,2,2>": "-2", + "<5,99,2,3>": "-2", + "<5,99,2,4>": "0", + "<5,99,2,5>": "0", + "<5,99,2,6>": "0", + "<5,99,2,7>": "0" + }, + "<5,99,3>": { + "<5,99,3,1>": "-2", + "<5,99,3,2>": "-2", + "<5,99,3,3>": "-2", + "<5,99,3,4>": "0", + "<5,99,3,5>": "0", + "<5,99,3,6>": "0", + "<5,99,3,7>": "0" + }, + "<5,99,4>": { + "<5,99,4,1>": "-2", + "<5,99,4,2>": "-2", + "<5,99,4,3>": "-2", + "<5,99,4,4>": "0", + "<5,99,4,5>": "0", + "<5,99,4,6>": "0", + "<5,99,4,7>": "0" + }, + "<5,99,5>": { + "<5,99,5,1>": "-2", + "<5,99,5,2>": "-2", + "<5,99,5,3>": "-2", + "<5,99,5,4>": "0", + "<5,99,5,5>": "0", + "<5,99,5,6>": "0", + "<5,99,5,7>": "0" + }, + "<5,99,6>": { + "<5,99,6,1>": "-2", + "<5,99,6,2>": "-2", + "<5,99,6,3>": "-2", + "<5,99,6,4>": "0", + "<5,99,6,5>": "0", + "<5,99,6,6>": "0", + "<5,99,6,7>": "0" + }, + "<5,99,7>": { + "<5,99,7,1>": "-2", + "<5,99,7,2>": "-2", + "<5,99,7,3>": "-2", + "<5,99,7,4>": "0", + "<5,99,7,5>": "0", + "<5,99,7,6>": "0", + "<5,99,7,7>": "0" + }, + "<5,99,8>": "", + "<5,99,9>": "", + "<5,99,10>": "", + "<5,99,11>": { + "<5,99,11,1>": "-2", + "<5,99,11,2>": "-2", + "<5,99,11,3>": "-2", + "<5,99,11,4>": "0", + "<5,99,11,5>": "0", + "<5,99,11,6>": "0", + "<5,99,11,7>": "0" + }, + "<5,99,12>": { + "<5,99,12,1>": "-2", + "<5,99,12,2>": "-2", + "<5,99,12,3>": "-2", + "<5,99,12,4>": "0", + "<5,99,12,5>": "0", + "<5,99,12,6>": "0", + "<5,99,12,7>": "0" + }, + "<5,99,13>": { + "<5,99,13,1>": "-2", + "<5,99,13,2>": "-2", + "<5,99,13,3>": "-2", + "<5,99,13,4>": "0", + "<5,99,13,5>": "0", + "<5,99,13,6>": "0", + "<5,99,13,7>": "0" + }, + "<5,99,14>": { + "<5,99,14,1>": "-2", + "<5,99,14,2>": "-2", + "<5,99,14,3>": "-2", + "<5,99,14,4>": "0", + "<5,99,14,5>": "0", + "<5,99,14,6>": "0", + "<5,99,14,7>": "0" + }, + "<5,99,15>": { + "<5,99,15,1>": "-2", + "<5,99,15,2>": "-2", + "<5,99,15,3>": "-2", + "<5,99,15,4>": "0", + "<5,99,15,5>": "0", + "<5,99,15,6>": "0", + "<5,99,15,7>": "0" + }, + "<5,99,16>": { + "<5,99,16,1>": "-2", + "<5,99,16,2>": "-2", + "<5,99,16,3>": "-2", + "<5,99,16,4>": "0", + "<5,99,16,5>": "0", + "<5,99,16,6>": "0", + "<5,99,16,7>": "0" + }, + "<5,99,17>": { + "<5,99,17,1>": "-2", + "<5,99,17,2>": "-2", + "<5,99,17,3>": "-2", + "<5,99,17,4>": "0", + "<5,99,17,5>": "0", + "<5,99,17,6>": "0", + "<5,99,17,7>": "0" + }, + "<5,99,18>": "", + "<5,99,19>": "", + "<5,99,20>": "", + "<5,99,21>": { + "<5,99,21,1>": "-2", + "<5,99,21,2>": "-2", + "<5,99,21,3>": "-2", + "<5,99,21,4>": "0", + "<5,99,21,5>": "0", + "<5,99,21,6>": "0", + "<5,99,21,7>": "0" + }, + "<5,99,22>": { + "<5,99,22,1>": "-2", + "<5,99,22,2>": "-2", + "<5,99,22,3>": "-2", + "<5,99,22,4>": "0", + "<5,99,22,5>": "0", + "<5,99,22,6>": "0", + "<5,99,22,7>": "0" + }, + "<5,99,23>": { + "<5,99,23,1>": "-2", + "<5,99,23,2>": "-2", + "<5,99,23,3>": "-2", + "<5,99,23,4>": "0", + "<5,99,23,5>": "0", + "<5,99,23,6>": "0", + "<5,99,23,7>": "0" + }, + "<5,99,24>": { + "<5,99,24,1>": "-2", + "<5,99,24,2>": "-2", + "<5,99,24,3>": "-2", + "<5,99,24,4>": "0", + "<5,99,24,5>": "0", + "<5,99,24,6>": "0", + "<5,99,24,7>": "0" + }, + "<5,99,25>": { + "<5,99,25,1>": "-2", + "<5,99,25,2>": "-2", + "<5,99,25,3>": "-2", + "<5,99,25,4>": "0", + "<5,99,25,5>": "0", + "<5,99,25,6>": "0", + "<5,99,25,7>": "0" + }, + "<5,99,26>": { + "<5,99,26,1>": "-2", + "<5,99,26,2>": "-2", + "<5,99,26,3>": "-2", + "<5,99,26,4>": "0", + "<5,99,26,5>": "0", + "<5,99,26,6>": "0", + "<5,99,26,7>": "0" + }, + "<5,99,27>": { + "<5,99,27,1>": "-2", + "<5,99,27,2>": "-2", + "<5,99,27,3>": "-2", + "<5,99,27,4>": "0", + "<5,99,27,5>": "0", + "<5,99,27,6>": "0", + "<5,99,27,7>": "0" + } + }, + "<5,100>": { + "<5,100,1>": "", + "<5,100,2>": "", + "<5,100,3>": "", + "<5,100,4>": "" + }, + "<5,101>": "", + "<5,102>": "", + "<5,103>": "", + "<5,104>": "", + "<5,105>": "", + "<5,106>": "", + "<5,107>": "", + "<5,108>": "" + }, + "<6>": { + "<6,1>": "BTN_APPLY", + "<6,2>": "", + "<6,3>": "PUSHBUTTON", + "<6,4>": "RTI_QUERYGRID", + "<6,5>": "-527", + "<6,6>": "-37", + "<6,7>": "80", + "<6,8>": "30", + "<6,9>": "Apply", + "<6,10>": { + "<6,10,1>": "0x50000300", + "<6,10,2>": "0x0" + }, + "<6,11>": { + "<6,11,1>": "0x3064", + "<6,11,2>": "0x80000000" + }, + "<6,12>": "1", + "<6,13>": { + "<6,13,1>": "-2", + "<6,13,2>": "-2", + "<6,13,3>": "0" + }, + "<6,14>": "0", + "<6,15>": { + "<6,15,1>": { + "<6,15,1,1>": "Segoe UI", + "<6,15,1,2>": "-12", + "<6,15,1,3>": "400", + "<6,15,1,4>": "0", + "<6,15,1,5>": "0", + "<6,15,1,6>": "0", + "<6,15,1,7>": "0", + "<6,15,1,8>": "34", + "<6,15,1,9>": "0", + "<6,15,1,10>": "3", + "<6,15,1,11>": "2", + "<6,15,1,12>": "1", + "<6,15,1,13>": "0", + "<6,15,1,14>": "0" + } + }, + "<6,16>": "", + "<6,17>": "", + "<6,18>": { + "<6,18,1>": { + "<6,18,1,1>": "X", + "<6,18,1,2>": "EXECUTE", + "<6,18,1,3>": "@WINDOW_EVENTS", + "<6,18,1,4>": { + "<6,18,1,4,1>": "@SELF", + "<6,18,1,4,2>": "@EVENT", + "<6,18,1,4,3>": "@PARAM1", + "<6,18,1,4,4>": "@PARAM2", + "<6,18,1,4,5>": "@PARAM3", + "<6,18,1,4,6>": "@PARAM4", + "<6,18,1,4,7>": "@PARAM5", + "<6,18,1,4,8>": "@PARAM6" + }, + "<6,18,1,5>": "", + "<6,18,1,6>": "", + "<6,18,1,7>": "", + "<6,18,1,8>": "", + "<6,18,1,9>": "", + "<6,18,1,10>": "", + "<6,18,1,11>": "", + "<6,18,1,12>": "", + "<6,18,1,13>": "", + "<6,18,1,14>": "", + "<6,18,1,15>": "COMMEVT", + "<6,18,1,16>": "0" + }, + "<6,18,2>": { + "<6,18,2,1>": "X", + "<6,18,2,2>": "EXECUTE", + "<6,18,2,3>": "@WINDOW_EVENTS", + "<6,18,2,4>": { + "<6,18,2,4,1>": "@SELF", + "<6,18,2,4,2>": "@EVENT", + "<6,18,2,4,3>": "@PARAM1", + "<6,18,2,4,4>": "@PARAM2", + "<6,18,2,4,5>": "@PARAM3", + "<6,18,2,4,6>": "@PARAM4", + "<6,18,2,4,7>": "@PARAM5", + "<6,18,2,4,8>": "@PARAM6" + }, + "<6,18,2,5>": "", + "<6,18,2,6>": "", + "<6,18,2,7>": "", + "<6,18,2,8>": "", + "<6,18,2,9>": "", + "<6,18,2,10>": "", + "<6,18,2,11>": "", + "<6,18,2,12>": "", + "<6,18,2,13>": "", + "<6,18,2,14>": "", + "<6,18,2,15>": "COMMEVT", + "<6,18,2,16>": "0" + } + }, + "<6,19>": { + "<6,19,1>": "DROPDOWN", + "<6,19,2>": "CLICK" + }, + "<6,20>": "", + "<6,21>": "", + "<6,22>": "", + "<6,23>": "", + "<6,24>": "", + "<6,25>": "", + "<6,26>": "", + "<6,27>": "", + "<6,28>": "", + "<6,29>": "", + "<6,30>": "", + "<6,31>": "", + "<6,32>": "", + "<6,33>": "", + "<6,34>": "", + "<6,35>": "", + "<6,36>": "", + "<6,37>": "", + "<6,38>": "", + "<6,39>": "", + "<6,40>": "-1", + "<6,41>": { + "<6,41,1>": "", + "<6,41,2>": "-1" + }, + "<6,42>": "", + "<6,43>": "", + "<6,44>": "", + "<6,45>": "", + "<6,46>": "", + "<6,47>": "", + "<6,48>": "", + "<6,49>": "", + "<6,50>": "", + "<6,51>": "", + "<6,52>": "", + "<6,53>": "", + "<6,54>": "", + "<6,55>": "", + "<6,56>": "", + "<6,57>": "", + "<6,58>": "", + "<6,59>": "", + "<6,60>": "", + "<6,61>": "", + "<6,62>": "0", + "<6,63>": "", + "<6,64>": { + "<6,64,1>": "-2", + "<6,64,2>": "-2", + "<6,64,3>": "0" + }, + "<6,65>": "-2", + "<6,66>": "", + "<6,67>": "", + "<6,68>": "", + "<6,69>": "", + "<6,70>": "", + "<6,71>": "", + "<6,72>": "", + "<6,73>": "", + "<6,74>": "", + "<6,75>": "", + "<6,76>": "", + "<6,77>": "", + "<6,78>": "", + "<6,79>": "", + "<6,80>": "", + "<6,81>": "", + "<6,82>": "SYSPROG*IMAGE*PNG*RTI_IDE_TEST_RUN", + "<6,83>": { + "<6,83,1>": "-5", + "<6,83,2>": "", + "<6,83,3>": { + "<6,83,3,1>": "0", + "<6,83,3,2>": "0" + }, + "<6,83,4>": { + "<6,83,4,1>": "0", + "<6,83,4,2>": "0" + }, + "<6,83,5>": "0", + "<6,83,6>": "1", + "<6,83,7>": "", + "<6,83,8>": "", + "<6,83,9>": "", + "<6,83,10>": "0" + }, + "<6,84>": "", + "<6,85>": "", + "<6,86>": "", + "<6,87>": "", + "<6,88>": "", + "<6,89>": "", + "<6,90>": "0", + "<6,91>": "0", + "<6,92>": "", + "<6,93>": "", + "<6,94>": "", + "<6,95>": "", + "<6,96>": "", + "<6,97>": "", + "<6,98>": "", + "<6,99>": "", + "<6,100>": "", + "<6,101>": "", + "<6,102>": "", + "<6,103>": "", + "<6,104>": "", + "<6,105>": "", + "<6,106>": "", + "<6,107>": "", + "<6,108>": "" + }, + "<7>": { + "<7,1>": "BTN_CANCEL", + "<7,2>": "", + "<7,3>": "PUSHBUTTON", + "<7,4>": "RTI_QUERYGRID", + "<7,5>": "-317", + "<7,6>": "-37", + "<7,7>": "80", + "<7,8>": "30", + "<7,9>": "Cancel", + "<7,10>": { + "<7,10,1>": "0x50000300", + "<7,10,2>": "0x0" + }, + "<7,11>": { + "<7,11,1>": "0x3060", + "<7,11,2>": "0x80000000" + }, + "<7,12>": "3", + "<7,13>": { + "<7,13,1>": "-2", + "<7,13,2>": "-2", + "<7,13,3>": "0" + }, + "<7,14>": "0", + "<7,15>": { + "<7,15,1>": { + "<7,15,1,1>": "Segoe UI", + "<7,15,1,2>": "-12", + "<7,15,1,3>": "400", + "<7,15,1,4>": "0", + "<7,15,1,5>": "0", + "<7,15,1,6>": "0", + "<7,15,1,7>": "0", + "<7,15,1,8>": "34", + "<7,15,1,9>": "0", + "<7,15,1,10>": "3", + "<7,15,1,11>": "2", + "<7,15,1,12>": "1", + "<7,15,1,13>": "0", + "<7,15,1,14>": "0" + } + }, + "<7,16>": "", + "<7,17>": "", + "<7,18>": { + "<7,18,1>": { + "<7,18,1,1>": "X", + "<7,18,1,2>": "EXECUTE", + "<7,18,1,3>": "@WINDOW_EVENTS", + "<7,18,1,4>": { + "<7,18,1,4,1>": "@SELF", + "<7,18,1,4,2>": "@EVENT", + "<7,18,1,4,3>": "@PARAM1", + "<7,18,1,4,4>": "@PARAM2", + "<7,18,1,4,5>": "@PARAM3", + "<7,18,1,4,6>": "@PARAM4", + "<7,18,1,4,7>": "@PARAM5", + "<7,18,1,4,8>": "@PARAM6" + }, + "<7,18,1,5>": "", + "<7,18,1,6>": "", + "<7,18,1,7>": "", + "<7,18,1,8>": "", + "<7,18,1,9>": "", + "<7,18,1,10>": "", + "<7,18,1,11>": "", + "<7,18,1,12>": "", + "<7,18,1,13>": "", + "<7,18,1,14>": "", + "<7,18,1,15>": "COMMEVT", + "<7,18,1,16>": "0" + }, + "<7,18,2>": { + "<7,18,2,1>": "X", + "<7,18,2,2>": "EXECUTE", + "<7,18,2,3>": "@WINDOW_EVENTS", + "<7,18,2,4>": { + "<7,18,2,4,1>": "@SELF", + "<7,18,2,4,2>": "@EVENT", + "<7,18,2,4,3>": "@PARAM1", + "<7,18,2,4,4>": "@PARAM2", + "<7,18,2,4,5>": "@PARAM3", + "<7,18,2,4,6>": "@PARAM4", + "<7,18,2,4,7>": "@PARAM5", + "<7,18,2,4,8>": "@PARAM6" + }, + "<7,18,2,5>": "", + "<7,18,2,6>": "", + "<7,18,2,7>": "", + "<7,18,2,8>": "", + "<7,18,2,9>": "", + "<7,18,2,10>": "", + "<7,18,2,11>": "", + "<7,18,2,12>": "", + "<7,18,2,13>": "", + "<7,18,2,14>": "", + "<7,18,2,15>": "COMMEVT", + "<7,18,2,16>": "0" + } + }, + "<7,19>": { + "<7,19,1>": "DROPDOWN", + "<7,19,2>": "CLICK" + }, + "<7,20>": "", + "<7,21>": "", + "<7,22>": "", + "<7,23>": "", + "<7,24>": "", + "<7,25>": "", + "<7,26>": "", + "<7,27>": "", + "<7,28>": "", + "<7,29>": "", + "<7,30>": "", + "<7,31>": "", + "<7,32>": "", + "<7,33>": "", + "<7,34>": "", + "<7,35>": "", + "<7,36>": "", + "<7,37>": "", + "<7,38>": "", + "<7,39>": "", + "<7,40>": "-1", + "<7,41>": { + "<7,41,1>": "", + "<7,41,2>": "-1" + }, + "<7,42>": "", + "<7,43>": "", + "<7,44>": "", + "<7,45>": "", + "<7,46>": "", + "<7,47>": "", + "<7,48>": "", + "<7,49>": "", + "<7,50>": "", + "<7,51>": "", + "<7,52>": "", + "<7,53>": "", + "<7,54>": "", + "<7,55>": "", + "<7,56>": "", + "<7,57>": "", + "<7,58>": "", + "<7,59>": "", + "<7,60>": "", + "<7,61>": "", + "<7,62>": "0", + "<7,63>": "", + "<7,64>": { + "<7,64,1>": "-2", + "<7,64,2>": "-2", + "<7,64,3>": "0" + }, + "<7,65>": "-2", + "<7,66>": "", + "<7,67>": "", + "<7,68>": "", + "<7,69>": "", + "<7,70>": "", + "<7,71>": "", + "<7,72>": "", + "<7,73>": "", + "<7,74>": "", + "<7,75>": "", + "<7,76>": "", + "<7,77>": "", + "<7,78>": "", + "<7,79>": "", + "<7,80>": "", + "<7,81>": "", + "<7,82>": "SYSPROG*IMAGE*PNG*RTI_IDE_TEST_STOP", + "<7,83>": { + "<7,83,1>": "-5", + "<7,83,2>": "", + "<7,83,3>": { + "<7,83,3,1>": "0", + "<7,83,3,2>": "0" + }, + "<7,83,4>": { + "<7,83,4,1>": "0", + "<7,83,4,2>": "0" + }, + "<7,83,5>": "0", + "<7,83,6>": "1", + "<7,83,7>": "", + "<7,83,8>": "", + "<7,83,9>": "", + "<7,83,10>": "0" + }, + "<7,84>": "", + "<7,85>": "", + "<7,86>": "", + "<7,87>": "", + "<7,88>": "", + "<7,89>": "", + "<7,90>": "0", + "<7,91>": "0", + "<7,92>": "", + "<7,93>": "", + "<7,94>": "", + "<7,95>": "", + "<7,96>": "", + "<7,97>": "", + "<7,98>": "", + "<7,99>": "", + "<7,100>": "", + "<7,101>": "", + "<7,102>": "", + "<7,103>": "", + "<7,104>": "", + "<7,105>": "", + "<7,106>": "", + "<7,107>": "", + "<7,108>": "" + }, + "<8>": { + "<8,1>": "BTN_CLEAR", + "<8,2>": "", + "<8,3>": "PUSHBUTTON", + "<8,4>": "RTI_QUERYGRID", + "<8,5>": "-422", + "<8,6>": "-37", + "<8,7>": "80", + "<8,8>": "30", + "<8,9>": "Clear", + "<8,10>": { + "<8,10,1>": "0x50000300", + "<8,10,2>": "0x0" + }, + "<8,11>": { + "<8,11,1>": "0x3060", + "<8,11,2>": "0x80000000" + }, + "<8,12>": "2", + "<8,13>": { + "<8,13,1>": "-2", + "<8,13,2>": "-2", + "<8,13,3>": "0" + }, + "<8,14>": "0", + "<8,15>": { + "<8,15,1>": { + "<8,15,1,1>": "Segoe UI", + "<8,15,1,2>": "-12", + "<8,15,1,3>": "400", + "<8,15,1,4>": "0", + "<8,15,1,5>": "0", + "<8,15,1,6>": "0", + "<8,15,1,7>": "0", + "<8,15,1,8>": "34", + "<8,15,1,9>": "0", + "<8,15,1,10>": "3", + "<8,15,1,11>": "2", + "<8,15,1,12>": "1", + "<8,15,1,13>": "0", + "<8,15,1,14>": "0" + } + }, + "<8,16>": "", + "<8,17>": "", + "<8,18>": { + "<8,18,1>": { + "<8,18,1,1>": "X", + "<8,18,1,2>": "EXECUTE", + "<8,18,1,3>": "@WINDOW_EVENTS", + "<8,18,1,4>": { + "<8,18,1,4,1>": "@SELF", + "<8,18,1,4,2>": "@EVENT", + "<8,18,1,4,3>": "@PARAM1", + "<8,18,1,4,4>": "@PARAM2", + "<8,18,1,4,5>": "@PARAM3", + "<8,18,1,4,6>": "@PARAM4", + "<8,18,1,4,7>": "@PARAM5", + "<8,18,1,4,8>": "@PARAM6" + }, + "<8,18,1,5>": "", + "<8,18,1,6>": "", + "<8,18,1,7>": "", + "<8,18,1,8>": "", + "<8,18,1,9>": "", + "<8,18,1,10>": "", + "<8,18,1,11>": "", + "<8,18,1,12>": "", + "<8,18,1,13>": "", + "<8,18,1,14>": "", + "<8,18,1,15>": "COMMEVT", + "<8,18,1,16>": "0" + }, + "<8,18,2>": { + "<8,18,2,1>": "X", + "<8,18,2,2>": "EXECUTE", + "<8,18,2,3>": "@WINDOW_EVENTS", + "<8,18,2,4>": { + "<8,18,2,4,1>": "@SELF", + "<8,18,2,4,2>": "@EVENT", + "<8,18,2,4,3>": "@PARAM1", + "<8,18,2,4,4>": "@PARAM2", + "<8,18,2,4,5>": "@PARAM3", + "<8,18,2,4,6>": "@PARAM4", + "<8,18,2,4,7>": "@PARAM5", + "<8,18,2,4,8>": "@PARAM6" + }, + "<8,18,2,5>": "", + "<8,18,2,6>": "", + "<8,18,2,7>": "", + "<8,18,2,8>": "", + "<8,18,2,9>": "", + "<8,18,2,10>": "", + "<8,18,2,11>": "", + "<8,18,2,12>": "", + "<8,18,2,13>": "", + "<8,18,2,14>": "", + "<8,18,2,15>": "COMMEVT", + "<8,18,2,16>": "0" + } + }, + "<8,19>": { + "<8,19,1>": "DROPDOWN", + "<8,19,2>": "CLICK" + }, + "<8,20>": "", + "<8,21>": "", + "<8,22>": "", + "<8,23>": "", + "<8,24>": "", + "<8,25>": "", + "<8,26>": "", + "<8,27>": "", + "<8,28>": "", + "<8,29>": "", + "<8,30>": "", + "<8,31>": "", + "<8,32>": "", + "<8,33>": "", + "<8,34>": "", + "<8,35>": "", + "<8,36>": "", + "<8,37>": "", + "<8,38>": "", + "<8,39>": "", + "<8,40>": "-1", + "<8,41>": { + "<8,41,1>": "", + "<8,41,2>": "-1" + }, + "<8,42>": "", + "<8,43>": "", + "<8,44>": "", + "<8,45>": "", + "<8,46>": "", + "<8,47>": "", + "<8,48>": "", + "<8,49>": "", + "<8,50>": "", + "<8,51>": "", + "<8,52>": "", + "<8,53>": "", + "<8,54>": "", + "<8,55>": "", + "<8,56>": "", + "<8,57>": "", + "<8,58>": "", + "<8,59>": "", + "<8,60>": "", + "<8,61>": "", + "<8,62>": "0", + "<8,63>": "", + "<8,64>": { + "<8,64,1>": "-2", + "<8,64,2>": "-2", + "<8,64,3>": "0" + }, + "<8,65>": "-2", + "<8,66>": "", + "<8,67>": "", + "<8,68>": "", + "<8,69>": "", + "<8,70>": "", + "<8,71>": "", + "<8,72>": "", + "<8,73>": "", + "<8,74>": "", + "<8,75>": "", + "<8,76>": "", + "<8,77>": "", + "<8,78>": "", + "<8,79>": "", + "<8,80>": "", + "<8,81>": "", + "<8,82>": "SYSPROG*IMAGE*PNG*RTI_DSN_START_BULLET_YELLOW", + "<8,83>": { + "<8,83,1>": "-5", + "<8,83,2>": "", + "<8,83,3>": { + "<8,83,3,1>": "0", + "<8,83,3,2>": "0" + }, + "<8,83,4>": { + "<8,83,4,1>": "0", + "<8,83,4,2>": "0" + }, + "<8,83,5>": "0", + "<8,83,6>": "1", + "<8,83,7>": "", + "<8,83,8>": "", + "<8,83,9>": "", + "<8,83,10>": "0" + }, + "<8,84>": "", + "<8,85>": "", + "<8,86>": "", + "<8,87>": "", + "<8,88>": "", + "<8,89>": "", + "<8,90>": "0", + "<8,91>": "0", + "<8,92>": "", + "<8,93>": "", + "<8,94>": "", + "<8,95>": "", + "<8,96>": "", + "<8,97>": "", + "<8,98>": "", + "<8,99>": "", + "<8,100>": "", + "<8,101>": "", + "<8,102>": "", + "<8,103>": "", + "<8,104>": "", + "<8,105>": "", + "<8,106>": "", + "<8,107>": "", + "<8,108>": "" + }, + "<9>": { + "<9,1>": "WITH_CLAUSE", + "<9,2>": "", + "<9,3>": "EDITFIELD", + "<9,4>": "RTI_QUERYGRID", + "<9,5>": "108", + "<9,6>": "-95", + "<9,7>": "-11", + "<9,8>": "20", + "<9,9>": "", + "<9,10>": { + "<9,10,1>": "0x56000080", + "<9,10,2>": "0x200" + }, + "<9,11>": { + "<9,11,1>": "0x6000", + "<9,11,2>": "0x80000000" + }, + "<9,12>": "6", + "<9,13>": { + "<9,13,1>": "-2", + "<9,13,2>": "-2", + "<9,13,3>": "" + }, + "<9,14>": "-2", + "<9,15>": { + "<9,15,1>": { + "<9,15,1,1>": "Segoe UI", + "<9,15,1,2>": "-12", + "<9,15,1,3>": "400", + "<9,15,1,4>": "0", + "<9,15,1,5>": "0", + "<9,15,1,6>": "0", + "<9,15,1,7>": "0", + "<9,15,1,8>": "34", + "<9,15,1,9>": "0", + "<9,15,1,10>": "3", + "<9,15,1,11>": "2", + "<9,15,1,12>": "1", + "<9,15,1,13>": "11", + "<9,15,1,14>": "2", + "<9,15,1,15>": "0", + "<9,15,1,16>": "0" + } + }, + "<9,16>": "", + "<9,17>": "", + "<9,18>": { + "<9,18,1>": { + "<9,18,1,1>": "X", + "<9,18,1,2>": "EXECUTE", + "<9,18,1,3>": "@WINDOW_EVENTS", + "<9,18,1,4>": { + "<9,18,1,4,1>": "@SELF", + "<9,18,1,4,2>": "@EVENT", + "<9,18,1,4,3>": "@PARAM1", + "<9,18,1,4,4>": "@PARAM2", + "<9,18,1,4,5>": "@PARAM3", + "<9,18,1,4,6>": "@PARAM4", + "<9,18,1,4,7>": "@PARAM5", + "<9,18,1,4,8>": "@PARAM6" + }, + "<9,18,1,5>": "", + "<9,18,1,6>": "", + "<9,18,1,7>": "", + "<9,18,1,8>": "", + "<9,18,1,9>": "", + "<9,18,1,10>": "", + "<9,18,1,11>": "", + "<9,18,1,12>": "", + "<9,18,1,13>": "", + "<9,18,1,14>": "", + "<9,18,1,15>": "COMMEVT", + "<9,18,1,16>": "0" + } + }, + "<9,19>": "CHAR", + "<9,20>": "", + "<9,21>": "", + "<9,22>": "", + "<9,23>": "", + "<9,24>": "", + "<9,25>": "", + "<9,26>": "", + "<9,27>": "", + "<9,28>": "<>", + "<9,29>": "<>", + "<9,30>": "<>", + "<9,31>": "0", + "<9,32>": "", + "<9,33>": "", + "<9,34>": "", + "<9,35>": "", + "<9,36>": { + "<9,36,1>": "0", + "<9,36,2>": "0" + }, + "<9,37>": "", + "<9,38>": "", + "<9,39>": "", + "<9,40>": "", + "<9,41>": "", + "<9,42>": "", + "<9,43>": "", + "<9,44>": "", + "<9,45>": "", + "<9,46>": "", + "<9,47>": "", + "<9,48>": "", + "<9,49>": "", + "<9,50>": "", + "<9,51>": "", + "<9,52>": "", + "<9,53>": "", + "<9,54>": "", + "<9,55>": "", + "<9,56>": "", + "<9,57>": "", + "<9,58>": "", + "<9,59>": "", + "<9,60>": "", + "<9,61>": "", + "<9,62>": "0", + "<9,63>": "", + "<9,64>": "", + "<9,65>": "", + "<9,66>": "", + "<9,67>": "", + "<9,68>": "", + "<9,69>": "", + "<9,70>": "", + "<9,71>": "", + "<9,72>": "", + "<9,73>": "", + "<9,74>": "", + "<9,75>": "", + "<9,76>": "", + "<9,77>": "", + "<9,78>": "", + "<9,79>": "", + "<9,80>": "", + "<9,81>": "", + "<9,82>": "", + "<9,83>": "", + "<9,84>": "", + "<9,85>": "", + "<9,86>": "", + "<9,87>": "", + "<9,88>": "", + "<9,89>": "", + "<9,90>": "", + "<9,91>": "", + "<9,92>": "", + "<9,93>": "", + "<9,94>": "", + "<9,95>": "", + "<9,96>": "", + "<9,97>": "", + "<9,98>": "", + "<9,99>": "", + "<9,100>": "", + "<9,101>": "", + "<9,102>": "", + "<9,103>": "", + "<9,104>": "", + "<9,105>": "", + "<9,106>": "", + "<9,107>": "", + "<9,108>": "" + }, + "<10>": { + "<10,1>": "LBL_2", + "<10,2>": "", + "<10,3>": "STATIC", + "<10,4>": "RTI_QUERYGRID", + "<10,5>": "12", + "<10,6>": "-66", + "<10,7>": "80", + "<10,8>": "20", + "<10,9>": "By Clause", + "<10,10>": { + "<10,10,1>": "0x56000000", + "<10,10,2>": "0x0" + }, + "<10,11>": { + "<10,11,1>": "0x2000", + "<10,11,2>": "0x80000000" + }, + "<10,12>": "8", + "<10,13>": { + "<10,13,1>": "-2", + "<10,13,2>": "-2", + "<10,13,3>": "" + }, + "<10,14>": "-2", + "<10,15>": { + "<10,15,1>": { + "<10,15,1,1>": "Segoe UI", + "<10,15,1,2>": "-12", + "<10,15,1,3>": "400", + "<10,15,1,4>": "0", + "<10,15,1,5>": "0", + "<10,15,1,6>": "0", + "<10,15,1,7>": "0", + "<10,15,1,8>": "34", + "<10,15,1,9>": "0", + "<10,15,1,10>": "3", + "<10,15,1,11>": "2", + "<10,15,1,12>": "1", + "<10,15,1,13>": "11", + "<10,15,1,14>": "2", + "<10,15,1,15>": "0", + "<10,15,1,16>": "0" + } + }, + "<10,16>": "", + "<10,17>": "", + "<10,18>": "", + "<10,19>": "", + "<10,20>": "", + "<10,21>": "", + "<10,22>": "", + "<10,23>": "", + "<10,24>": "", + "<10,25>": "", + "<10,26>": "", + "<10,27>": "", + "<10,28>": "<>", + "<10,29>": "<>", + "<10,30>": "", + "<10,31>": "", + "<10,32>": "", + "<10,33>": "", + "<10,34>": "", + "<10,35>": "", + "<10,36>": "", + "<10,37>": "", + "<10,38>": "", + "<10,39>": "", + "<10,40>": "", + "<10,41>": "", + "<10,42>": "", + "<10,43>": "", + "<10,44>": "", + "<10,45>": "", + "<10,46>": "", + "<10,47>": "", + "<10,48>": "", + "<10,49>": "", + "<10,50>": "", + "<10,51>": "", + "<10,52>": "", + "<10,53>": "", + "<10,54>": "", + "<10,55>": "", + "<10,56>": "", + "<10,57>": "", + "<10,58>": "", + "<10,59>": "", + "<10,60>": "", + "<10,61>": "", + "<10,62>": "0", + "<10,63>": { + "<10,63,1>": "", + "<10,63,2>": "", + "<10,63,3>": "", + "<10,63,4>": "", + "<10,63,5>": "", + "<10,63,6>": "", + "<10,63,7>": "", + "<10,63,8>": "" + }, + "<10,64>": { + "<10,64,1>": "", + "<10,64,2>": "", + "<10,64,3>": "" + }, + "<10,65>": "-2", + "<10,66>": "", + "<10,67>": "", + "<10,68>": "", + "<10,69>": "", + "<10,70>": "", + "<10,71>": "", + "<10,72>": "", + "<10,73>": "", + "<10,74>": "", + "<10,75>": "", + "<10,76>": "", + "<10,77>": "", + "<10,78>": "", + "<10,79>": "", + "<10,80>": "", + "<10,81>": "", + "<10,82>": "", + "<10,83>": "", + "<10,84>": "", + "<10,85>": "", + "<10,86>": "", + "<10,87>": "", + "<10,88>": "", + "<10,89>": "", + "<10,90>": "0", + "<10,91>": "0", + "<10,92>": "", + "<10,93>": "", + "<10,94>": "", + "<10,95>": "", + "<10,96>": "", + "<10,97>": "", + "<10,98>": "", + "<10,99>": "", + "<10,100>": "", + "<10,101>": "", + "<10,102>": "", + "<10,103>": "", + "<10,104>": "", + "<10,105>": "", + "<10,106>": "", + "<10,107>": "", + "<10,108>": "" + }, + "<11>": { + "<11,1>": "BTN_FIND", + "<11,2>": "", + "<11,3>": "PUSHBUTTON", + "<11,4>": "RTI_QUERYGRID", + "<11,5>": "20", + "<11,6>": "-134", + "<11,7>": "120", + "<11,8>": "20", + "<11,9>": "Find", + "<11,10>": { + "<11,10,1>": "0x56002300", + "<11,10,2>": "0x0" + }, + "<11,11>": { + "<11,11,1>": "0x2020", + "<11,11,2>": "0x80000000" + }, + "<11,12>": "10", + "<11,13>": { + "<11,13,1>": "-2", + "<11,13,2>": "-2", + "<11,13,3>": "0" + }, + "<11,14>": "-2", + "<11,15>": { + "<11,15,1>": { + "<11,15,1,1>": "Segoe UI", + "<11,15,1,2>": "-12", + "<11,15,1,3>": "400", + "<11,15,1,4>": "0", + "<11,15,1,5>": "0", + "<11,15,1,6>": "0", + "<11,15,1,7>": "0", + "<11,15,1,8>": "34", + "<11,15,1,9>": "0", + "<11,15,1,10>": "3", + "<11,15,1,11>": "2", + "<11,15,1,12>": "1", + "<11,15,1,13>": "11", + "<11,15,1,14>": "2", + "<11,15,1,15>": "0", + "<11,15,1,16>": "0" + } + }, + "<11,16>": "", + "<11,17>": "", + "<11,18>": { + "<11,18,1>": { + "<11,18,1,1>": "X", + "<11,18,1,2>": "EXECUTE", + "<11,18,1,3>": "@WINDOW_EVENTS", + "<11,18,1,4>": { + "<11,18,1,4,1>": "@SELF", + "<11,18,1,4,2>": "@EVENT", + "<11,18,1,4,3>": "@PARAM1", + "<11,18,1,4,4>": "@PARAM2", + "<11,18,1,4,5>": "@PARAM3", + "<11,18,1,4,6>": "@PARAM4", + "<11,18,1,4,7>": "@PARAM5", + "<11,18,1,4,8>": "@PARAM6" + }, + "<11,18,1,5>": "", + "<11,18,1,6>": "", + "<11,18,1,7>": "", + "<11,18,1,8>": "", + "<11,18,1,9>": "", + "<11,18,1,10>": "", + "<11,18,1,11>": "", + "<11,18,1,12>": "", + "<11,18,1,13>": "", + "<11,18,1,14>": "", + "<11,18,1,15>": "COMMEVT", + "<11,18,1,16>": "0" + }, + "<11,18,2>": { + "<11,18,2,1>": "X", + "<11,18,2,2>": "EXECUTE", + "<11,18,2,3>": "@WINDOW_EVENTS", + "<11,18,2,4>": { + "<11,18,2,4,1>": "@SELF", + "<11,18,2,4,2>": "@EVENT", + "<11,18,2,4,3>": "@PARAM1", + "<11,18,2,4,4>": "@PARAM2", + "<11,18,2,4,5>": "@PARAM3", + "<11,18,2,4,6>": "@PARAM4", + "<11,18,2,4,7>": "@PARAM5", + "<11,18,2,4,8>": "@PARAM6" + }, + "<11,18,2,5>": "", + "<11,18,2,6>": "", + "<11,18,2,7>": "", + "<11,18,2,8>": "", + "<11,18,2,9>": "", + "<11,18,2,10>": "", + "<11,18,2,11>": "", + "<11,18,2,12>": "", + "<11,18,2,13>": "", + "<11,18,2,14>": "", + "<11,18,2,15>": "COMMEVT", + "<11,18,2,16>": "0" + } + }, + "<11,19>": { + "<11,19,1>": "DROPDOWN", + "<11,19,2>": "CLICK" + }, + "<11,20>": "", + "<11,21>": "", + "<11,22>": "", + "<11,23>": "", + "<11,24>": "", + "<11,25>": "", + "<11,26>": "", + "<11,27>": "", + "<11,28>": "", + "<11,29>": "", + "<11,30>": "", + "<11,31>": "", + "<11,32>": "", + "<11,33>": "", + "<11,34>": "", + "<11,35>": "", + "<11,36>": "", + "<11,37>": "", + "<11,38>": "", + "<11,39>": "", + "<11,40>": "-1", + "<11,41>": { + "<11,41,1>": "", + "<11,41,2>": "-1" + }, + "<11,42>": "", + "<11,43>": "", + "<11,44>": "", + "<11,45>": "", + "<11,46>": "", + "<11,47>": "", + "<11,48>": "", + "<11,49>": "", + "<11,50>": "", + "<11,51>": "", + "<11,52>": "", + "<11,53>": "", + "<11,54>": "", + "<11,55>": "", + "<11,56>": "", + "<11,57>": "", + "<11,58>": "", + "<11,59>": "", + "<11,60>": "", + "<11,61>": "", + "<11,62>": "0", + "<11,63>": "", + "<11,64>": { + "<11,64,1>": "-2", + "<11,64,2>": "-2", + "<11,64,3>": "0" + }, + "<11,65>": "-2", + "<11,66>": "", + "<11,67>": "", + "<11,68>": "", + "<11,69>": "", + "<11,70>": "", + "<11,71>": "", + "<11,72>": "", + "<11,73>": "", + "<11,74>": "", + "<11,75>": "", + "<11,76>": "", + "<11,77>": "", + "<11,78>": "", + "<11,79>": "", + "<11,80>": "", + "<11,81>": "", + "<11,82>": "SYSPROG*IMAGE*PNG*RTI_IDE_SEARCH", + "<11,83>": { + "<11,83,1>": "-5", + "<11,83,2>": "", + "<11,83,3>": { + "<11,83,3,1>": "0", + "<11,83,3,2>": "0" + }, + "<11,83,4>": { + "<11,83,4,1>": "0", + "<11,83,4,2>": "0" + }, + "<11,83,5>": "0", + "<11,83,6>": "1", + "<11,83,7>": "", + "<11,83,8>": "", + "<11,83,9>": "", + "<11,83,10>": "0" + }, + "<11,84>": "", + "<11,85>": "", + "<11,86>": "", + "<11,87>": "", + "<11,88>": "", + "<11,89>": "", + "<11,90>": "0", + "<11,91>": "0", + "<11,92>": "", + "<11,93>": "", + "<11,94>": "", + "<11,95>": "", + "<11,96>": "", + "<11,97>": "", + "<11,98>": "", + "<11,99>": "", + "<11,100>": "", + "<11,101>": "", + "<11,102>": "", + "<11,103>": "", + "<11,104>": "", + "<11,105>": "", + "<11,106>": "", + "<11,107>": "", + "<11,108>": "" + }, + "<12>": { + "<12,1>": "GROUPBOX_CHOOSECOLUMNS", + "<12,2>": "", + "<12,3>": "GROUPBOXEX", + "<12,4>": "RTI_QUERYGRID", + "<12,5>": "12", + "<12,6>": "-151", + "<12,7>": "688", + "<12,8>": "48", + "<12,9>": "Limit Names", + "<12,10>": { + "<12,10,1>": "0x56000000", + "<12,10,2>": "0x0" + }, + "<12,11>": { + "<12,11,1>": "0x2000", + "<12,11,2>": "0x80000000" + }, + "<12,12>": "11", + "<12,13>": { + "<12,13,1>": "-2", + "<12,13,2>": "-2", + "<12,13,3>": "" + }, + "<12,14>": "-2", + "<12,15>": { + "<12,15,1>": { + "<12,15,1,1>": "Segoe UI", + "<12,15,1,2>": "-12", + "<12,15,1,3>": "400", + "<12,15,1,4>": "0", + "<12,15,1,5>": "0", + "<12,15,1,6>": "0", + "<12,15,1,7>": "0", + "<12,15,1,8>": "34", + "<12,15,1,9>": "0", + "<12,15,1,10>": "3", + "<12,15,1,11>": "2", + "<12,15,1,12>": "1", + "<12,15,1,13>": "11", + "<12,15,1,14>": "2", + "<12,15,1,15>": "0", + "<12,15,1,16>": "0" + } + }, + "<12,16>": "", + "<12,17>": "", + "<12,18>": "", + "<12,19>": "", + "<12,20>": "", + "<12,21>": "", + "<12,22>": "", + "<12,23>": "", + "<12,24>": "", + "<12,25>": "", + "<12,26>": "", + "<12,27>": "", + "<12,28>": "", + "<12,29>": "", + "<12,30>": "", + "<12,31>": "", + "<12,32>": "", + "<12,33>": "", + "<12,34>": "", + "<12,35>": "", + "<12,36>": "", + "<12,37>": "", + "<12,38>": "", + "<12,39>": "", + "<12,40>": "", + "<12,41>": "", + "<12,42>": "", + "<12,43>": "", + "<12,44>": "", + "<12,45>": "", + "<12,46>": "", + "<12,47>": "", + "<12,48>": "", + "<12,49>": "", + "<12,50>": "", + "<12,51>": "", + "<12,52>": "", + "<12,53>": "", + "<12,54>": "", + "<12,55>": "", + "<12,56>": "", + "<12,57>": "", + "<12,58>": "", + "<12,59>": "", + "<12,60>": "", + "<12,61>": "", + "<12,62>": "0", + "<12,63>": { + "<12,63,1>": "", + "<12,63,2>": "-2", + "<12,63,3>": "", + "<12,63,4>": "", + "<12,63,5>": "", + "<12,63,6>": "", + "<12,63,7>": "", + "<12,63,8>": "0" + }, + "<12,64>": { + "<12,64,1>": "", + "<12,64,2>": "", + "<12,64,3>": "" + }, + "<12,65>": "-2", + "<12,66>": "", + "<12,67>": "", + "<12,68>": "", + "<12,69>": "", + "<12,70>": "", + "<12,71>": "", + "<12,72>": "", + "<12,73>": "", + "<12,74>": "", + "<12,75>": "", + "<12,76>": "", + "<12,77>": "", + "<12,78>": "", + "<12,79>": "", + "<12,80>": "", + "<12,81>": "", + "<12,82>": "", + "<12,83>": "", + "<12,84>": "", + "<12,85>": "", + "<12,86>": "", + "<12,87>": "", + "<12,88>": "", + "<12,89>": "", + "<12,90>": "", + "<12,91>": "", + "<12,92>": "", + "<12,93>": "", + "<12,94>": "", + "<12,95>": "", + "<12,96>": "", + "<12,97>": "", + "<12,98>": "", + "<12,99>": "", + "<12,100>": "", + "<12,101>": "", + "<12,102>": "", + "<12,103>": "", + "<12,104>": "", + "<12,105>": "", + "<12,106>": "", + "<12,107>": "", + "<12,108>": "" + } + }, + "record4": { + "<1>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/SRP_GIT_SETTINGS.json b/SYSPROG/OIWIN/SRP_GIT_SETTINGS.json new file mode 100644 index 0000000..94a3dc9 --- /dev/null +++ b/SYSPROG/OIWIN/SRP_GIT_SETTINGS.json @@ -0,0 +1,2306 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1010", + "<2>": "13", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "SRP_GIT_SETTINGS", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "249", + "<1,6>": "401", + "<1,7>": "-636", + "<1,8>": "-204", + "<1,9>": "SRP Git Settings", + "<1,10>": { + "<1,10,1>": "0x94CC0000", + "<1,10,2>": "0x100" + }, + "<1,11>": { + "<1,11,1>": "0x8000", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "16777215", + "<1,13,2>": "16777215", + "<1,13,3>": "" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "R", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_SETTINGS_EVENTS", + "<1,18,1,4>": { + "<1,18,1,4,1>": "CREATE", + "<1,18,1,4,2>": "@SELF" + }, + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "STPROC" + }, + "<1,18,2>": { + "<1,18,2,1>": "R", + "<1,18,2,2>": "EXECUTE", + "<1,18,2,3>": "SYSPROG*STPROCEXE**SRP_GIT_SETTINGS_EVENTS", + "<1,18,2,4>": { + "<1,18,2,4,1>": "CLOSE", + "<1,18,2,4,2>": "@SELF" + }, + "<1,18,2,5>": "", + "<1,18,2,6>": "", + "<1,18,2,7>": "", + "<1,18,2,8>": "", + "<1,18,2,9>": "", + "<1,18,2,10>": "", + "<1,18,2,11>": "", + "<1,18,2,12>": "", + "<1,18,2,13>": "", + "<1,18,2,14>": "", + "<1,18,2,15>": "STPROC" + } + }, + "<1,19>": { + "<1,19,1>": "CREATE", + "<1,19,2>": "CLOSE" + }, + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "0", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0", + "<1,24,15>": "0", + "<1,24,16>": "0", + "<1,24,17>": "0" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "SYSPROG*IMAGE*ICO*SRP_GIT_ICON", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X10001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "", + "<1,62,4>": "2", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "", + "<1,62,8>": "0.50", + "<1,62,9>": "5.00", + "<1,62,10>": "0.00" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "0", + "<1,107>": "", + "<1,108>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "CHB_ENABLED", + "<1,2>": "", + "<1,3>": "CHECKBOX", + "<1,4>": "SRP_GIT_SETTINGS", + "<1,5>": "10", + "<1,6>": "6", + "<1,7>": "90", + "<1,8>": "25", + "<1,9>": "Git Enabled", + "<1,10>": { + "<1,10,1>": "0x50000103", + "<1,10,2>": "0x0" + }, + "<1,11>": { + "<1,11,1>": "0x4", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "1", + "<1,13>": { + "<1,13,1>": "16777215", + "<1,13,2>": "16777215", + "<1,13,3>": "0" + }, + "<1,14>": "0", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "Segoe UI Semilight", + "<1,15,1,2>": "-13", + "<1,15,1,3>": "400", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "0", + "<1,15,1,8>": "34", + "<1,15,1,9>": "0", + "<1,15,1,10>": "3", + "<1,15,1,11>": "2", + "<1,15,1,12>": "1", + "<1,15,1,13>": "0", + "<1,15,1,14>": "0" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "R", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_SETTINGS_EVENTS", + "<1,18,1,4>": { + "<1,18,1,4,1>": "CLICK", + "<1,18,1,4,2>": "@SELF" + }, + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "STPROC" + } + }, + "<1,19>": "CLICK", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "0", + "<1,37>": "", + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": "0", + "<1,63>": { + "<1,63,1>": "", + "<1,63,2>": "", + "<1,63,3>": "", + "<1,63,4>": "", + "<1,63,5>": "", + "<1,63,6>": "", + "<1,63,7>": "", + "<1,63,8>": "" + }, + "<1,64>": { + "<1,64,1>": "", + "<1,64,2>": "", + "<1,64,3>": "" + }, + "<1,65>": "-2", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "0", + "<1,91>": "0", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "", + "<1,107>": "", + "<1,108>": "" + }, + "<2>": { + "<2,1>": "STA_REPO_LOC", + "<2,2>": "", + "<2,3>": "STATIC", + "<2,4>": "SRP_GIT_SETTINGS", + "<2,5>": "10", + "<2,6>": "41", + "<2,7>": "170", + "<2,8>": "21", + "<2,9>": "Git Repository Location:", + "<2,10>": { + "<2,10,1>": "0x50000000", + "<2,10,2>": "0x0" + }, + "<2,11>": { + "<2,11,1>": "0x0", + "<2,11,2>": "0x80000000" + }, + "<2,12>": "10", + "<2,13>": { + "<2,13,1>": "16777215", + "<2,13,2>": "16777215", + "<2,13,3>": "0" + }, + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "Segoe UI Semilight", + "<2,15,1,2>": "-13", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "3", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": "", + "<2,19>": "", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "", + "<2,26>": "", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "", + "<2,31>": "", + "<2,32>": "", + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "", + "<2,53>": "", + "<2,54>": "", + "<2,55>": "", + "<2,56>": "", + "<2,57>": "", + "<2,58>": "", + "<2,59>": "", + "<2,60>": "", + "<2,61>": "", + "<2,62>": "0", + "<2,63>": { + "<2,63,1>": "", + "<2,63,2>": "", + "<2,63,3>": "", + "<2,63,4>": "", + "<2,63,5>": "", + "<2,63,6>": "", + "<2,63,7>": "", + "<2,63,8>": "" + }, + "<2,64>": { + "<2,64,1>": "", + "<2,64,2>": "", + "<2,64,3>": "" + }, + "<2,65>": "-2", + "<2,66>": "", + "<2,67>": "", + "<2,68>": "", + "<2,69>": "", + "<2,70>": "", + "<2,71>": "", + "<2,72>": "", + "<2,73>": "", + "<2,74>": "", + "<2,75>": "", + "<2,76>": "", + "<2,77>": "", + "<2,78>": "", + "<2,79>": "", + "<2,80>": "", + "<2,81>": "", + "<2,82>": "", + "<2,83>": "", + "<2,84>": "", + "<2,85>": "", + "<2,86>": "", + "<2,87>": "", + "<2,88>": "", + "<2,89>": "", + "<2,90>": "0", + "<2,91>": "0", + "<2,92>": "", + "<2,93>": "", + "<2,94>": "", + "<2,95>": "", + "<2,96>": "", + "<2,97>": "", + "<2,98>": "", + "<2,99>": "", + "<2,100>": "", + "<2,101>": "", + "<2,102>": "", + "<2,103>": "", + "<2,104>": "", + "<2,105>": "", + "<2,106>": "", + "<2,107>": "", + "<2,108>": "" + }, + "<3>": { + "<3,1>": "EDL_REPO_LOC", + "<3,2>": "", + "<3,3>": "EDITFIELD", + "<3,4>": "SRP_GIT_SETTINGS", + "<3,5>": "185", + "<3,6>": "38", + "<3,7>": "-7", + "<3,8>": "24", + "<3,9>": "", + "<3,10>": { + "<3,10,1>": "0x50000080", + "<3,10,2>": "0x200" + }, + "<3,11>": { + "<3,11,1>": "0x4000", + "<3,11,2>": "0x80000000" + }, + "<3,12>": "2", + "<3,13>": { + "<3,13,1>": "", + "<3,13,2>": "", + "<3,13,3>": "" + }, + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "Segoe UI Semilight", + "<3,15,1,2>": "-13", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "3", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": { + "<3,18,1>": { + "<3,18,1,1>": "R", + "<3,18,1,2>": "EXECUTE", + "<3,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_SETTINGS_EVENTS", + "<3,18,1,4>": { + "<3,18,1,4,1>": "LOSTFOCUS", + "<3,18,1,4,2>": "@SELF", + "<3,18,1,4,3>": "@PARAM1", + "<3,18,1,4,4>": "@PARAM2" + }, + "<3,18,1,5>": "", + "<3,18,1,6>": "", + "<3,18,1,7>": "", + "<3,18,1,8>": "", + "<3,18,1,9>": "", + "<3,18,1,10>": "", + "<3,18,1,11>": "", + "<3,18,1,12>": "", + "<3,18,1,13>": "", + "<3,18,1,14>": "", + "<3,18,1,15>": "STPROC" + } + }, + "<3,19>": "LOSTFOCUS", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "", + "<3,26>": "", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "<>", + "<3,31>": "0", + "<3,32>": "", + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": { + "<3,36,1>": "0", + "<3,36,2>": "0" + }, + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "", + "<3,53>": "", + "<3,54>": "", + "<3,55>": "", + "<3,56>": "", + "<3,57>": "", + "<3,58>": "", + "<3,59>": "", + "<3,60>": "", + "<3,61>": "", + "<3,62>": "0", + "<3,63>": "", + "<3,64>": "", + "<3,65>": "", + "<3,66>": "", + "<3,67>": "", + "<3,68>": "", + "<3,69>": "", + "<3,70>": "", + "<3,71>": "", + "<3,72>": "", + "<3,73>": "", + "<3,74>": "", + "<3,75>": "", + "<3,76>": "", + "<3,77>": "", + "<3,78>": "", + "<3,79>": "", + "<3,80>": "", + "<3,81>": "", + "<3,82>": "", + "<3,83>": "", + "<3,84>": "", + "<3,85>": "", + "<3,86>": "", + "<3,87>": "", + "<3,88>": "", + "<3,89>": "", + "<3,90>": "", + "<3,91>": "", + "<3,92>": "", + "<3,93>": "", + "<3,94>": "", + "<3,95>": "", + "<3,96>": "", + "<3,97>": "", + "<3,98>": "", + "<3,99>": "", + "<3,100>": "", + "<3,101>": "", + "<3,102>": "", + "<3,103>": "", + "<3,104>": "", + "<3,105>": "", + "<3,106>": "", + "<3,107>": "", + "<3,108>": "" + }, + "<4>": { + "<4,1>": "STA_GIT_LOC", + "<4,2>": "", + "<4,3>": "STATIC", + "<4,4>": "SRP_GIT_SETTINGS", + "<4,5>": "10", + "<4,6>": "74", + "<4,7>": "170", + "<4,8>": "19", + "<4,9>": "Git Exe Location:", + "<4,10>": { + "<4,10,1>": "0x50000000", + "<4,10,2>": "0x0" + }, + "<4,11>": { + "<4,11,1>": "0x0", + "<4,11,2>": "0x80000000" + }, + "<4,12>": "11", + "<4,13>": { + "<4,13,1>": "16777215", + "<4,13,2>": "16777215", + "<4,13,3>": "0" + }, + "<4,14>": "0", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "Segoe UI Semilight", + "<4,15,1,2>": "-13", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "3", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": "", + "<4,19>": "", + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "", + "<4,26>": "", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "", + "<4,31>": "", + "<4,32>": "", + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "", + "<4,53>": "", + "<4,54>": "", + "<4,55>": "", + "<4,56>": "", + "<4,57>": "", + "<4,58>": "", + "<4,59>": "", + "<4,60>": "", + "<4,61>": "", + "<4,62>": "0", + "<4,63>": { + "<4,63,1>": "", + "<4,63,2>": "", + "<4,63,3>": "", + "<4,63,4>": "", + "<4,63,5>": "", + "<4,63,6>": "", + "<4,63,7>": "", + "<4,63,8>": "" + }, + "<4,64>": { + "<4,64,1>": "", + "<4,64,2>": "", + "<4,64,3>": "" + }, + "<4,65>": "-2", + "<4,66>": "", + "<4,67>": "", + "<4,68>": "", + "<4,69>": "", + "<4,70>": "", + "<4,71>": "", + "<4,72>": "", + "<4,73>": "", + "<4,74>": "", + "<4,75>": "", + "<4,76>": "", + "<4,77>": "", + "<4,78>": "", + "<4,79>": "", + "<4,80>": "", + "<4,81>": "", + "<4,82>": "", + "<4,83>": "", + "<4,84>": "", + "<4,85>": "", + "<4,86>": "", + "<4,87>": "", + "<4,88>": "", + "<4,89>": "", + "<4,90>": "0", + "<4,91>": "0", + "<4,92>": "", + "<4,93>": "", + "<4,94>": "", + "<4,95>": "", + "<4,96>": "", + "<4,97>": "", + "<4,98>": "", + "<4,99>": "", + "<4,100>": "", + "<4,101>": "", + "<4,102>": "", + "<4,103>": "", + "<4,104>": "", + "<4,105>": "", + "<4,106>": "", + "<4,107>": "", + "<4,108>": "" + }, + "<5>": { + "<5,1>": "EDL_GIT_LOC", + "<5,2>": "", + "<5,3>": "EDITFIELD", + "<5,4>": "SRP_GIT_SETTINGS", + "<5,5>": "185", + "<5,6>": "71", + "<5,7>": "-7", + "<5,8>": "24", + "<5,9>": "", + "<5,10>": { + "<5,10,1>": "0x50000080", + "<5,10,2>": "0x200" + }, + "<5,11>": { + "<5,11,1>": "0x4000", + "<5,11,2>": "0x80000000" + }, + "<5,12>": "3", + "<5,13>": { + "<5,13,1>": "", + "<5,13,2>": "", + "<5,13,3>": "" + }, + "<5,14>": "0", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "Segoe UI Semilight", + "<5,15,1,2>": "-13", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "3", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "0", + "<5,15,1,14>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": { + "<5,18,1>": { + "<5,18,1,1>": "R", + "<5,18,1,2>": "EXECUTE", + "<5,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_SETTINGS_EVENTS", + "<5,18,1,4>": { + "<5,18,1,4,1>": "LOSTFOCUS", + "<5,18,1,4,2>": "@SELF", + "<5,18,1,4,3>": "@PARAM1", + "<5,18,1,4,4>": "@PARAM2" + }, + "<5,18,1,5>": "", + "<5,18,1,6>": "", + "<5,18,1,7>": "", + "<5,18,1,8>": "", + "<5,18,1,9>": "", + "<5,18,1,10>": "", + "<5,18,1,11>": "", + "<5,18,1,12>": "", + "<5,18,1,13>": "", + "<5,18,1,14>": "", + "<5,18,1,15>": "STPROC" + } + }, + "<5,19>": "LOSTFOCUS", + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "", + "<5,26>": "", + "<5,27>": "", + "<5,28>": "<>", + "<5,29>": "<>", + "<5,30>": "<>", + "<5,31>": "0", + "<5,32>": "", + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": { + "<5,36,1>": "0", + "<5,36,2>": "0" + }, + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "", + "<5,41>": "", + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "", + "<5,52>": "", + "<5,53>": "", + "<5,54>": "", + "<5,55>": "", + "<5,56>": "", + "<5,57>": "", + "<5,58>": "", + "<5,59>": "", + "<5,60>": "", + "<5,61>": "", + "<5,62>": "0", + "<5,63>": "", + "<5,64>": "", + "<5,65>": "", + "<5,66>": "", + "<5,67>": "", + "<5,68>": "", + "<5,69>": "", + "<5,70>": "", + "<5,71>": "", + "<5,72>": "", + "<5,73>": "", + "<5,74>": "", + "<5,75>": "", + "<5,76>": "", + "<5,77>": "", + "<5,78>": "", + "<5,79>": "", + "<5,80>": "", + "<5,81>": "", + "<5,82>": "", + "<5,83>": "", + "<5,84>": "", + "<5,85>": "", + "<5,86>": "", + "<5,87>": "", + "<5,88>": "", + "<5,89>": "", + "<5,90>": "", + "<5,91>": "", + "<5,92>": "", + "<5,93>": "", + "<5,94>": "", + "<5,95>": "", + "<5,96>": "", + "<5,97>": "", + "<5,98>": "", + "<5,99>": "", + "<5,100>": "", + "<5,101>": "", + "<5,102>": "", + "<5,103>": "", + "<5,104>": "", + "<5,105>": "", + "<5,106>": "", + "<5,107>": "", + "<5,108>": "" + }, + "<6>": { + "<6,1>": "STA_GUI_LOC", + "<6,2>": "", + "<6,3>": "STATIC", + "<6,4>": "SRP_GIT_SETTINGS", + "<6,5>": "10", + "<6,6>": "107", + "<6,7>": "170", + "<6,8>": "19", + "<6,9>": "Git GUI Command (Optional):", + "<6,10>": { + "<6,10,1>": "0x50000000", + "<6,10,2>": "0x0" + }, + "<6,11>": { + "<6,11,1>": "0x0", + "<6,11,2>": "0x80000000" + }, + "<6,12>": "12", + "<6,13>": { + "<6,13,1>": "16777215", + "<6,13,2>": "16777215", + "<6,13,3>": "0" + }, + "<6,14>": "0", + "<6,15>": { + "<6,15,1>": { + "<6,15,1,1>": "Segoe UI Semilight", + "<6,15,1,2>": "-13", + "<6,15,1,3>": "400", + "<6,15,1,4>": "0", + "<6,15,1,5>": "0", + "<6,15,1,6>": "0", + "<6,15,1,7>": "0", + "<6,15,1,8>": "34", + "<6,15,1,9>": "0", + "<6,15,1,10>": "3", + "<6,15,1,11>": "2", + "<6,15,1,12>": "1", + "<6,15,1,13>": "0", + "<6,15,1,14>": "0" + } + }, + "<6,16>": "", + "<6,17>": "", + "<6,18>": "", + "<6,19>": "", + "<6,20>": "", + "<6,21>": "", + "<6,22>": "", + "<6,23>": "", + "<6,24>": "", + "<6,25>": "", + "<6,26>": "", + "<6,27>": "", + "<6,28>": "<>", + "<6,29>": "<>", + "<6,30>": "", + "<6,31>": "", + "<6,32>": "", + "<6,33>": "", + "<6,34>": "", + "<6,35>": "", + "<6,36>": "", + "<6,37>": "", + "<6,38>": "", + "<6,39>": "", + "<6,40>": "", + "<6,41>": "", + "<6,42>": "", + "<6,43>": "", + "<6,44>": "", + "<6,45>": "", + "<6,46>": "", + "<6,47>": "", + "<6,48>": "", + "<6,49>": "", + "<6,50>": "", + "<6,51>": "", + "<6,52>": "", + "<6,53>": "", + "<6,54>": "", + "<6,55>": "", + "<6,56>": "", + "<6,57>": "", + "<6,58>": "", + "<6,59>": "", + "<6,60>": "", + "<6,61>": "", + "<6,62>": "0", + "<6,63>": { + "<6,63,1>": "", + "<6,63,2>": "", + "<6,63,3>": "", + "<6,63,4>": "", + "<6,63,5>": "", + "<6,63,6>": "", + "<6,63,7>": "", + "<6,63,8>": "" + }, + "<6,64>": { + "<6,64,1>": "", + "<6,64,2>": "", + "<6,64,3>": "" + }, + "<6,65>": "-2", + "<6,66>": "", + "<6,67>": "", + "<6,68>": "", + "<6,69>": "", + "<6,70>": "", + "<6,71>": "", + "<6,72>": "", + "<6,73>": "", + "<6,74>": "", + "<6,75>": "", + "<6,76>": "", + "<6,77>": "", + "<6,78>": "", + "<6,79>": "", + "<6,80>": "", + "<6,81>": "", + "<6,82>": "", + "<6,83>": "", + "<6,84>": "", + "<6,85>": "", + "<6,86>": "", + "<6,87>": "", + "<6,88>": "", + "<6,89>": "", + "<6,90>": "0", + "<6,91>": "0", + "<6,92>": "", + "<6,93>": "", + "<6,94>": "", + "<6,95>": "", + "<6,96>": "", + "<6,97>": "", + "<6,98>": "", + "<6,99>": "", + "<6,100>": "", + "<6,101>": "", + "<6,102>": "", + "<6,103>": "", + "<6,104>": "", + "<6,105>": "", + "<6,106>": "", + "<6,107>": "", + "<6,108>": "" + }, + "<7>": { + "<7,1>": "EDL_GUI_LOC", + "<7,2>": "", + "<7,3>": "EDITFIELD", + "<7,4>": "SRP_GIT_SETTINGS", + "<7,5>": "185", + "<7,6>": "104", + "<7,7>": "-7", + "<7,8>": "24", + "<7,9>": "", + "<7,10>": { + "<7,10,1>": "0x50000080", + "<7,10,2>": "0x200" + }, + "<7,11>": { + "<7,11,1>": "0x4000", + "<7,11,2>": "0x80000000" + }, + "<7,12>": "4", + "<7,13>": { + "<7,13,1>": "", + "<7,13,2>": "", + "<7,13,3>": "" + }, + "<7,14>": "0", + "<7,15>": { + "<7,15,1>": { + "<7,15,1,1>": "Segoe UI Semilight", + "<7,15,1,2>": "-13", + "<7,15,1,3>": "400", + "<7,15,1,4>": "0", + "<7,15,1,5>": "0", + "<7,15,1,6>": "0", + "<7,15,1,7>": "0", + "<7,15,1,8>": "34", + "<7,15,1,9>": "0", + "<7,15,1,10>": "3", + "<7,15,1,11>": "2", + "<7,15,1,12>": "1", + "<7,15,1,13>": "0", + "<7,15,1,14>": "0" + } + }, + "<7,16>": "", + "<7,17>": "", + "<7,18>": { + "<7,18,1>": { + "<7,18,1,1>": "R", + "<7,18,1,2>": "EXECUTE", + "<7,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_SETTINGS_EVENTS", + "<7,18,1,4>": { + "<7,18,1,4,1>": "LOSTFOCUS", + "<7,18,1,4,2>": "@SELF", + "<7,18,1,4,3>": "@PARAM1", + "<7,18,1,4,4>": "@PARAM2" + }, + "<7,18,1,5>": "", + "<7,18,1,6>": "", + "<7,18,1,7>": "", + "<7,18,1,8>": "", + "<7,18,1,9>": "", + "<7,18,1,10>": "", + "<7,18,1,11>": "", + "<7,18,1,12>": "", + "<7,18,1,13>": "", + "<7,18,1,14>": "", + "<7,18,1,15>": "STPROC" + } + }, + "<7,19>": "LOSTFOCUS", + "<7,20>": "", + "<7,21>": "", + "<7,22>": "", + "<7,23>": "", + "<7,24>": "", + "<7,25>": "", + "<7,26>": "", + "<7,27>": "", + "<7,28>": "<>", + "<7,29>": "<>", + "<7,30>": "<>", + "<7,31>": "0", + "<7,32>": "", + "<7,33>": "", + "<7,34>": "", + "<7,35>": "", + "<7,36>": { + "<7,36,1>": "0", + "<7,36,2>": "0" + }, + "<7,37>": "", + "<7,38>": "", + "<7,39>": "", + "<7,40>": "", + "<7,41>": "", + "<7,42>": "", + "<7,43>": "", + "<7,44>": "", + "<7,45>": "", + "<7,46>": "", + "<7,47>": "", + "<7,48>": "", + "<7,49>": "", + "<7,50>": "", + "<7,51>": "", + "<7,52>": "", + "<7,53>": "", + "<7,54>": "", + "<7,55>": "", + "<7,56>": "", + "<7,57>": "", + "<7,58>": "", + "<7,59>": "", + "<7,60>": "", + "<7,61>": "", + "<7,62>": "0", + "<7,63>": "", + "<7,64>": "", + "<7,65>": "", + "<7,66>": "", + "<7,67>": "", + "<7,68>": "", + "<7,69>": "", + "<7,70>": "", + "<7,71>": "", + "<7,72>": "", + "<7,73>": "", + "<7,74>": "", + "<7,75>": "", + "<7,76>": "", + "<7,77>": "", + "<7,78>": "", + "<7,79>": "", + "<7,80>": "", + "<7,81>": "", + "<7,82>": "", + "<7,83>": "", + "<7,84>": "", + "<7,85>": "", + "<7,86>": "", + "<7,87>": "", + "<7,88>": "", + "<7,89>": "", + "<7,90>": "", + "<7,91>": "", + "<7,92>": "", + "<7,93>": "", + "<7,94>": "", + "<7,95>": "", + "<7,96>": "", + "<7,97>": "", + "<7,98>": "", + "<7,99>": "", + "<7,100>": "", + "<7,101>": "", + "<7,102>": "", + "<7,103>": "", + "<7,104>": "", + "<7,105>": "", + "<7,106>": "", + "<7,107>": "", + "<7,108>": "" + }, + "<8>": { + "<8,1>": "STA_WARNING", + "<8,2>": "", + "<8,3>": "STATIC", + "<8,4>": "SRP_GIT_SETTINGS", + "<8,5>": "10", + "<8,6>": "140", + "<8,7>": "170", + "<8,8>": "19", + "<8,9>": "Pull Warning Message:", + "<8,10>": { + "<8,10,1>": "0x50000000", + "<8,10,2>": "0x0" + }, + "<8,11>": { + "<8,11,1>": "0x0", + "<8,11,2>": "0x80000000" + }, + "<8,12>": "13", + "<8,13>": { + "<8,13,1>": "16777215", + "<8,13,2>": "16777215", + "<8,13,3>": "0" + }, + "<8,14>": "0", + "<8,15>": { + "<8,15,1>": { + "<8,15,1,1>": "Segoe UI Semilight", + "<8,15,1,2>": "-13", + "<8,15,1,3>": "400", + "<8,15,1,4>": "0", + "<8,15,1,5>": "0", + "<8,15,1,6>": "0", + "<8,15,1,7>": "0", + "<8,15,1,8>": "34", + "<8,15,1,9>": "0", + "<8,15,1,10>": "3", + "<8,15,1,11>": "2", + "<8,15,1,12>": "1", + "<8,15,1,13>": "0", + "<8,15,1,14>": "0" + } + }, + "<8,16>": "", + "<8,17>": "", + "<8,18>": "", + "<8,19>": "", + "<8,20>": "", + "<8,21>": "", + "<8,22>": "", + "<8,23>": "", + "<8,24>": "", + "<8,25>": "", + "<8,26>": "", + "<8,27>": "", + "<8,28>": "<>", + "<8,29>": "<>", + "<8,30>": "", + "<8,31>": "", + "<8,32>": "", + "<8,33>": "", + "<8,34>": "", + "<8,35>": "", + "<8,36>": "", + "<8,37>": "", + "<8,38>": "", + "<8,39>": "", + "<8,40>": "", + "<8,41>": "", + "<8,42>": "", + "<8,43>": "", + "<8,44>": "", + "<8,45>": "", + "<8,46>": "", + "<8,47>": "", + "<8,48>": "", + "<8,49>": "", + "<8,50>": "", + "<8,51>": "", + "<8,52>": "", + "<8,53>": "", + "<8,54>": "", + "<8,55>": "", + "<8,56>": "", + "<8,57>": "", + "<8,58>": "", + "<8,59>": "", + "<8,60>": "", + "<8,61>": "", + "<8,62>": "0", + "<8,63>": { + "<8,63,1>": "", + "<8,63,2>": "", + "<8,63,3>": "", + "<8,63,4>": "", + "<8,63,5>": "", + "<8,63,6>": "", + "<8,63,7>": "", + "<8,63,8>": "" + }, + "<8,64>": { + "<8,64,1>": "", + "<8,64,2>": "", + "<8,64,3>": "" + }, + "<8,65>": "-2", + "<8,66>": "", + "<8,67>": "", + "<8,68>": "", + "<8,69>": "", + "<8,70>": "", + "<8,71>": "", + "<8,72>": "", + "<8,73>": "", + "<8,74>": "", + "<8,75>": "", + "<8,76>": "", + "<8,77>": "", + "<8,78>": "", + "<8,79>": "", + "<8,80>": "", + "<8,81>": "", + "<8,82>": "", + "<8,83>": "", + "<8,84>": "", + "<8,85>": "", + "<8,86>": "", + "<8,87>": "", + "<8,88>": "", + "<8,89>": "", + "<8,90>": "0", + "<8,91>": "0", + "<8,92>": "", + "<8,93>": "", + "<8,94>": "", + "<8,95>": "", + "<8,96>": "", + "<8,97>": "", + "<8,98>": "", + "<8,99>": "", + "<8,100>": "", + "<8,101>": "", + "<8,102>": "", + "<8,103>": "", + "<8,104>": "", + "<8,105>": "", + "<8,106>": "", + "<8,107>": "", + "<8,108>": "" + }, + "<9>": { + "<9,1>": "EDL_WARNING", + "<9,2>": "", + "<9,3>": "EDITFIELD", + "<9,4>": "SRP_GIT_SETTINGS", + "<9,5>": "185", + "<9,6>": "137", + "<9,7>": "-7", + "<9,8>": "24", + "<9,9>": "", + "<9,10>": { + "<9,10,1>": "0x50000080", + "<9,10,2>": "0x200" + }, + "<9,11>": { + "<9,11,1>": "0x4000", + "<9,11,2>": "0x80000000" + }, + "<9,12>": "5", + "<9,13>": { + "<9,13,1>": "", + "<9,13,2>": "", + "<9,13,3>": "" + }, + "<9,14>": "0", + "<9,15>": { + "<9,15,1>": { + "<9,15,1,1>": "Segoe UI Semilight", + "<9,15,1,2>": "-13", + "<9,15,1,3>": "400", + "<9,15,1,4>": "0", + "<9,15,1,5>": "0", + "<9,15,1,6>": "0", + "<9,15,1,7>": "0", + "<9,15,1,8>": "34", + "<9,15,1,9>": "0", + "<9,15,1,10>": "3", + "<9,15,1,11>": "2", + "<9,15,1,12>": "1", + "<9,15,1,13>": "0", + "<9,15,1,14>": "0" + } + }, + "<9,16>": "", + "<9,17>": "", + "<9,18>": { + "<9,18,1>": { + "<9,18,1,1>": "R", + "<9,18,1,2>": "EXECUTE", + "<9,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_SETTINGS_EVENTS", + "<9,18,1,4>": { + "<9,18,1,4,1>": "LOSTFOCUS", + "<9,18,1,4,2>": "@SELF", + "<9,18,1,4,3>": "@PARAM1", + "<9,18,1,4,4>": "@PARAM2" + }, + "<9,18,1,5>": "", + "<9,18,1,6>": "", + "<9,18,1,7>": "", + "<9,18,1,8>": "", + "<9,18,1,9>": "", + "<9,18,1,10>": "", + "<9,18,1,11>": "", + "<9,18,1,12>": "", + "<9,18,1,13>": "", + "<9,18,1,14>": "", + "<9,18,1,15>": "STPROC" + } + }, + "<9,19>": "LOSTFOCUS", + "<9,20>": "", + "<9,21>": "", + "<9,22>": "", + "<9,23>": "", + "<9,24>": "", + "<9,25>": "", + "<9,26>": "", + "<9,27>": "", + "<9,28>": "<>", + "<9,29>": "<>", + "<9,30>": "<>", + "<9,31>": "0", + "<9,32>": "", + "<9,33>": "", + "<9,34>": "", + "<9,35>": "", + "<9,36>": { + "<9,36,1>": "0", + "<9,36,2>": "0" + }, + "<9,37>": "", + "<9,38>": "", + "<9,39>": "", + "<9,40>": "", + "<9,41>": "", + "<9,42>": "", + "<9,43>": "", + "<9,44>": "", + "<9,45>": "", + "<9,46>": "", + "<9,47>": "", + "<9,48>": "", + "<9,49>": "", + "<9,50>": "", + "<9,51>": "", + "<9,52>": "", + "<9,53>": "", + "<9,54>": "", + "<9,55>": "", + "<9,56>": "", + "<9,57>": "", + "<9,58>": "", + "<9,59>": "", + "<9,60>": "", + "<9,61>": "", + "<9,62>": "0", + "<9,63>": "", + "<9,64>": "", + "<9,65>": "", + "<9,66>": "", + "<9,67>": "", + "<9,68>": "", + "<9,69>": "", + "<9,70>": "", + "<9,71>": "", + "<9,72>": "", + "<9,73>": "", + "<9,74>": "", + "<9,75>": "", + "<9,76>": "", + "<9,77>": "", + "<9,78>": "", + "<9,79>": "", + "<9,80>": "", + "<9,81>": "", + "<9,82>": "", + "<9,83>": "", + "<9,84>": "", + "<9,85>": "", + "<9,86>": "", + "<9,87>": "", + "<9,88>": "", + "<9,89>": "", + "<9,90>": "", + "<9,91>": "", + "<9,92>": "", + "<9,93>": "", + "<9,94>": "", + "<9,95>": "", + "<9,96>": "", + "<9,97>": "", + "<9,98>": "", + "<9,99>": "", + "<9,100>": "", + "<9,101>": "", + "<9,102>": "", + "<9,103>": "", + "<9,104>": "", + "<9,105>": "", + "<9,106>": "", + "<9,107>": "", + "<9,108>": "" + }, + "<10>": { + "<10,1>": "OLE_SUBCLASS", + "<10,2>": "", + "<10,3>": "OLECONTROL.SRPEDITOR.Subclass.1", + "<10,4>": "SRP_GIT_SETTINGS", + "<10,5>": "10", + "<10,6>": "230", + "<10,7>": "146", + "<10,8>": "18", + "<10,9>": "SRPEDITOR.Subclass.1", + "<10,10>": { + "<10,10,1>": "0x40000000", + "<10,10,2>": "0x0" + }, + "<10,11>": { + "<10,11,1>": "0x0", + "<10,11,2>": "0x80000000" + }, + "<10,12>": "6", + "<10,13>": { + "<10,13,1>": "", + "<10,13,2>": "", + "<10,13,3>": "" + }, + "<10,14>": "0", + "<10,15>": { + "<10,15,1>": { + "<10,15,1,1>": "Tahoma", + "<10,15,1,2>": "-11", + "<10,15,1,3>": "400", + "<10,15,1,4>": "0", + "<10,15,1,5>": "0", + "<10,15,1,6>": "0", + "<10,15,1,7>": "0", + "<10,15,1,8>": "34", + "<10,15,1,9>": "0", + "<10,15,1,10>": "3", + "<10,15,1,11>": "2", + "<10,15,1,12>": "1", + "<10,15,1,13>": "0", + "<10,15,1,14>": "0" + } + }, + "<10,16>": "", + "<10,17>": "", + "<10,18>": { + "<10,18,1>": { + "<10,18,1,1>": "R", + "<10,18,1,2>": "EXECUTE", + "<10,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_SETTINGS_EVENTS", + "<10,18,1,4>": { + "<10,18,1,4,1>": "@PARAM1", + "<10,18,1,4,2>": "@SELF", + "<10,18,1,4,3>": "@PARAM2", + "<10,18,1,4,4>": "@PARAM3", + "<10,18,1,4,5>": "@PARAM4", + "<10,18,1,4,6>": "@PARAM5", + "<10,18,1,4,7>": "@PARAM6" + }, + "<10,18,1,5>": "", + "<10,18,1,6>": "", + "<10,18,1,7>": "", + "<10,18,1,8>": "", + "<10,18,1,9>": "", + "<10,18,1,10>": "", + "<10,18,1,11>": "", + "<10,18,1,12>": "", + "<10,18,1,13>": "", + "<10,18,1,14>": "", + "<10,18,1,15>": "STPROC" + } + }, + "<10,19>": "OLE", + "<10,20>": "", + "<10,21>": "", + "<10,22>": "", + "<10,23>": "", + "<10,24>": "", + "<10,25>": "", + "<10,26>": "", + "<10,27>": "", + "<10,28>": "", + "<10,29>": "", + "<10,30>": "", + "<10,31>": "", + "<10,32>": "", + "<10,33>": "", + "<10,34>": "", + "<10,35>": "", + "<10,36>": "", + "<10,37>": "", + "<10,38>": "", + "<10,39>": "", + "<10,40>": "", + "<10,41>": "", + "<10,42>": "", + "<10,43>": "", + "<10,44>": "", + "<10,45>": "", + "<10,46>": "", + "<10,47>": "", + "<10,48>": "", + "<10,49>": "", + "<10,50>": "", + "<10,51>": "", + "<10,52>": "", + "<10,53>": "", + "<10,54>": "", + "<10,55>": "OLE.Border", + "<10,56>": "None", + "<10,57>": "", + "<10,58>": "", + "<10,59>": "", + "<10,60>": "", + "<10,61>": "", + "<10,62>": "", + "<10,63>": "", + "<10,64>": "", + "<10,65>": "", + "<10,66>": "", + "<10,67>": "", + "<10,68>": "", + "<10,69>": "", + "<10,70>": "", + "<10,71>": "", + "<10,72>": "", + "<10,73>": "", + "<10,74>": "", + "<10,75>": "", + "<10,76>": "", + "<10,77>": "", + "<10,78>": "", + "<10,79>": "", + "<10,80>": "", + "<10,81>": "", + "<10,82>": "", + "<10,83>": "", + "<10,84>": "", + "<10,85>": "", + "<10,86>": "", + "<10,87>": "", + "<10,88>": "", + "<10,89>": "", + "<10,90>": "", + "<10,91>": "", + "<10,92>": "", + "<10,93>": "", + "<10,94>": "", + "<10,95>": "", + "<10,96>": "", + "<10,97>": "", + "<10,98>": "", + "<10,99>": "", + "<10,100>": "", + "<10,101>": "", + "<10,102>": "", + "<10,103>": "", + "<10,104>": "", + "<10,105>": "", + "<10,106>": "", + "<10,107>": "", + "<10,108>": "" + }, + "<11>": { + "<11,1>": "PUB_OK", + "<11,2>": "", + "<11,3>": "PUSHBUTTON", + "<11,4>": "SRP_GIT_SETTINGS", + "<11,5>": "-269", + "<11,6>": "-35", + "<11,7>": "80", + "<11,8>": "25", + "<11,9>": "&OK", + "<11,10>": { + "<11,10,1>": "0x50002300", + "<11,10,2>": "0x0" + }, + "<11,11>": { + "<11,11,1>": "0x3001", + "<11,11,2>": "0x80000000" + }, + "<11,12>": "7", + "<11,13>": { + "<11,13,1>": "-2", + "<11,13,2>": "-2", + "<11,13,3>": "0" + }, + "<11,14>": "0", + "<11,15>": { + "<11,15,1>": { + "<11,15,1,1>": "Tahoma", + "<11,15,1,2>": "-11", + "<11,15,1,3>": "400", + "<11,15,1,4>": "0", + "<11,15,1,5>": "0", + "<11,15,1,6>": "0", + "<11,15,1,7>": "0", + "<11,15,1,8>": "34", + "<11,15,1,9>": "0", + "<11,15,1,10>": "3", + "<11,15,1,11>": "2", + "<11,15,1,12>": "1", + "<11,15,1,13>": "0", + "<11,15,1,14>": "0" + } + }, + "<11,16>": "", + "<11,17>": "", + "<11,18>": { + "<11,18,1>": { + "<11,18,1,1>": "R", + "<11,18,1,2>": "EXECUTE", + "<11,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_SETTINGS_EVENTS", + "<11,18,1,4>": { + "<11,18,1,4,1>": "@EVENT", + "<11,18,1,4,2>": "@SELF", + "<11,18,1,4,3>": "@PARAM1", + "<11,18,1,4,4>": "@PARAM2", + "<11,18,1,4,5>": "@PARAM3", + "<11,18,1,4,6>": "@PARAM4", + "<11,18,1,4,7>": "@PARAM5", + "<11,18,1,4,8>": "@PARAM6" + }, + "<11,18,1,5>": "", + "<11,18,1,6>": "", + "<11,18,1,7>": "", + "<11,18,1,8>": "", + "<11,18,1,9>": "", + "<11,18,1,10>": "", + "<11,18,1,11>": "", + "<11,18,1,12>": "", + "<11,18,1,13>": "", + "<11,18,1,14>": "", + "<11,18,1,15>": "STPROC" + } + }, + "<11,19>": "CLICK", + "<11,20>": "", + "<11,21>": "", + "<11,22>": "", + "<11,23>": "", + "<11,24>": "", + "<11,25>": "", + "<11,26>": "", + "<11,27>": "", + "<11,28>": "", + "<11,29>": "", + "<11,30>": "", + "<11,31>": "", + "<11,32>": "", + "<11,33>": "", + "<11,34>": "", + "<11,35>": "", + "<11,36>": "", + "<11,37>": "", + "<11,38>": "", + "<11,39>": "", + "<11,40>": "1", + "<11,41>": { + "<11,41,1>": "", + "<11,41,2>": "-1" + }, + "<11,42>": "", + "<11,43>": "", + "<11,44>": "", + "<11,45>": "", + "<11,46>": "", + "<11,47>": "", + "<11,48>": "", + "<11,49>": "", + "<11,50>": "", + "<11,51>": "", + "<11,52>": "", + "<11,53>": "", + "<11,54>": "", + "<11,55>": "", + "<11,56>": "", + "<11,57>": "", + "<11,58>": "", + "<11,59>": "", + "<11,60>": "", + "<11,61>": "", + "<11,62>": "0", + "<11,63>": "", + "<11,64>": { + "<11,64,1>": "-2", + "<11,64,2>": "-2", + "<11,64,3>": "0" + }, + "<11,65>": "-2", + "<11,66>": "", + "<11,67>": "", + "<11,68>": "", + "<11,69>": "", + "<11,70>": "", + "<11,71>": "", + "<11,72>": "", + "<11,73>": "", + "<11,74>": "", + "<11,75>": "", + "<11,76>": "", + "<11,77>": "", + "<11,78>": "", + "<11,79>": "", + "<11,80>": "", + "<11,81>": "", + "<11,82>": "", + "<11,83>": "", + "<11,84>": "", + "<11,85>": "", + "<11,86>": "", + "<11,87>": "", + "<11,88>": "", + "<11,89>": "", + "<11,90>": "0", + "<11,91>": "0", + "<11,92>": "", + "<11,93>": "", + "<11,94>": "", + "<11,95>": "", + "<11,96>": "", + "<11,97>": "", + "<11,98>": "", + "<11,99>": "", + "<11,100>": "", + "<11,101>": "", + "<11,102>": "", + "<11,103>": "", + "<11,104>": "", + "<11,105>": "", + "<11,106>": "", + "<11,107>": "", + "<11,108>": "" + }, + "<12>": { + "<12,1>": "PUB_CANCEL", + "<12,2>": "", + "<12,3>": "PUSHBUTTON", + "<12,4>": "SRP_GIT_SETTINGS", + "<12,5>": "-180", + "<12,6>": "-35", + "<12,7>": "80", + "<12,8>": "25", + "<12,9>": "&Cancel", + "<12,10>": { + "<12,10,1>": "0x50002300", + "<12,10,2>": "0x0" + }, + "<12,11>": { + "<12,11,1>": "0x3002", + "<12,11,2>": "0x80000000" + }, + "<12,12>": "8", + "<12,13>": { + "<12,13,1>": "-2", + "<12,13,2>": "-2", + "<12,13,3>": "0" + }, + "<12,14>": "0", + "<12,15>": { + "<12,15,1>": { + "<12,15,1,1>": "Tahoma", + "<12,15,1,2>": "-11", + "<12,15,1,3>": "400", + "<12,15,1,4>": "0", + "<12,15,1,5>": "0", + "<12,15,1,6>": "0", + "<12,15,1,7>": "0", + "<12,15,1,8>": "34", + "<12,15,1,9>": "0", + "<12,15,1,10>": "3", + "<12,15,1,11>": "2", + "<12,15,1,12>": "1", + "<12,15,1,13>": "0", + "<12,15,1,14>": "0" + } + }, + "<12,16>": "", + "<12,17>": "", + "<12,18>": { + "<12,18,1>": { + "<12,18,1,1>": "E", + "<12,18,1,2>": "CLOSE", + "<12,18,1,3>": "@WINDOW", + "<12,18,1,4>": "", + "<12,18,1,5>": "", + "<12,18,1,6>": "", + "<12,18,1,7>": "", + "<12,18,1,8>": "", + "<12,18,1,9>": "", + "<12,18,1,10>": "", + "<12,18,1,11>": "", + "<12,18,1,12>": "", + "<12,18,1,13>": "", + "<12,18,1,14>": "", + "<12,18,1,15>": "GEN" + } + }, + "<12,19>": "CLICK", + "<12,20>": "", + "<12,21>": "", + "<12,22>": "", + "<12,23>": "", + "<12,24>": "", + "<12,25>": "", + "<12,26>": "", + "<12,27>": "", + "<12,28>": "", + "<12,29>": "", + "<12,30>": "", + "<12,31>": "", + "<12,32>": "", + "<12,33>": "", + "<12,34>": "", + "<12,35>": "", + "<12,36>": "", + "<12,37>": "", + "<12,38>": "", + "<12,39>": "", + "<12,40>": "1", + "<12,41>": { + "<12,41,1>": "", + "<12,41,2>": "-1" + }, + "<12,42>": "", + "<12,43>": "", + "<12,44>": "", + "<12,45>": "", + "<12,46>": "", + "<12,47>": "", + "<12,48>": "", + "<12,49>": "", + "<12,50>": "", + "<12,51>": "", + "<12,52>": "", + "<12,53>": "", + "<12,54>": "", + "<12,55>": "", + "<12,56>": "", + "<12,57>": "", + "<12,58>": "", + "<12,59>": "", + "<12,60>": "", + "<12,61>": "", + "<12,62>": "0", + "<12,63>": "", + "<12,64>": { + "<12,64,1>": "-2", + "<12,64,2>": "-2", + "<12,64,3>": "0" + }, + "<12,65>": "-2", + "<12,66>": "", + "<12,67>": "", + "<12,68>": "", + "<12,69>": "", + "<12,70>": "", + "<12,71>": "", + "<12,72>": "", + "<12,73>": "", + "<12,74>": "", + "<12,75>": "", + "<12,76>": "", + "<12,77>": "", + "<12,78>": "", + "<12,79>": "", + "<12,80>": "", + "<12,81>": "", + "<12,82>": "", + "<12,83>": "", + "<12,84>": "", + "<12,85>": "", + "<12,86>": "", + "<12,87>": "", + "<12,88>": "", + "<12,89>": "", + "<12,90>": "0", + "<12,91>": "0", + "<12,92>": "", + "<12,93>": "", + "<12,94>": "", + "<12,95>": "", + "<12,96>": "", + "<12,97>": "", + "<12,98>": "", + "<12,99>": "", + "<12,100>": "", + "<12,101>": "", + "<12,102>": "", + "<12,103>": "", + "<12,104>": "", + "<12,105>": "", + "<12,106>": "", + "<12,107>": "", + "<12,108>": "" + }, + "<13>": { + "<13,1>": "PUB_APPLY", + "<13,2>": "", + "<13,3>": "PUSHBUTTON", + "<13,4>": "SRP_GIT_SETTINGS", + "<13,5>": "-90", + "<13,6>": "-35", + "<13,7>": "80", + "<13,8>": "25", + "<13,9>": "&Apply", + "<13,10>": { + "<13,10,1>": "0x58002300", + "<13,10,2>": "0x0" + }, + "<13,11>": { + "<13,11,1>": "0x3000", + "<13,11,2>": "0x80000000" + }, + "<13,12>": "9", + "<13,13>": { + "<13,13,1>": "-2", + "<13,13,2>": "-2", + "<13,13,3>": "0" + }, + "<13,14>": "0", + "<13,15>": { + "<13,15,1>": { + "<13,15,1,1>": "Tahoma", + "<13,15,1,2>": "-11", + "<13,15,1,3>": "400", + "<13,15,1,4>": "0", + "<13,15,1,5>": "0", + "<13,15,1,6>": "0", + "<13,15,1,7>": "0", + "<13,15,1,8>": "34", + "<13,15,1,9>": "0", + "<13,15,1,10>": "3", + "<13,15,1,11>": "2", + "<13,15,1,12>": "1", + "<13,15,1,13>": "0", + "<13,15,1,14>": "0" + } + }, + "<13,16>": "", + "<13,17>": "", + "<13,18>": { + "<13,18,1>": { + "<13,18,1,1>": "R", + "<13,18,1,2>": "EXECUTE", + "<13,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_SETTINGS_EVENTS", + "<13,18,1,4>": { + "<13,18,1,4,1>": "@EVENT", + "<13,18,1,4,2>": "@SELF", + "<13,18,1,4,3>": "@PARAM1", + "<13,18,1,4,4>": "@PARAM2", + "<13,18,1,4,5>": "@PARAM3", + "<13,18,1,4,6>": "@PARAM4", + "<13,18,1,4,7>": "@PARAM5", + "<13,18,1,4,8>": "@PARAM6" + }, + "<13,18,1,5>": "", + "<13,18,1,6>": "", + "<13,18,1,7>": "", + "<13,18,1,8>": "", + "<13,18,1,9>": "", + "<13,18,1,10>": "", + "<13,18,1,11>": "", + "<13,18,1,12>": "", + "<13,18,1,13>": "", + "<13,18,1,14>": "", + "<13,18,1,15>": "STPROC" + } + }, + "<13,19>": "CLICK", + "<13,20>": "", + "<13,21>": "", + "<13,22>": "", + "<13,23>": "", + "<13,24>": "", + "<13,25>": "", + "<13,26>": "", + "<13,27>": "", + "<13,28>": "", + "<13,29>": "", + "<13,30>": "", + "<13,31>": "", + "<13,32>": "", + "<13,33>": "", + "<13,34>": "", + "<13,35>": "", + "<13,36>": "", + "<13,37>": "", + "<13,38>": "", + "<13,39>": "", + "<13,40>": "1", + "<13,41>": { + "<13,41,1>": "", + "<13,41,2>": "-1" + }, + "<13,42>": "", + "<13,43>": "", + "<13,44>": "", + "<13,45>": "", + "<13,46>": "", + "<13,47>": "", + "<13,48>": "", + "<13,49>": "", + "<13,50>": "", + "<13,51>": "", + "<13,52>": "", + "<13,53>": "", + "<13,54>": "", + "<13,55>": "", + "<13,56>": "", + "<13,57>": "", + "<13,58>": "", + "<13,59>": "", + "<13,60>": "", + "<13,61>": "", + "<13,62>": "0", + "<13,63>": "", + "<13,64>": { + "<13,64,1>": "-2", + "<13,64,2>": "-2", + "<13,64,3>": "0" + }, + "<13,65>": "-2", + "<13,66>": "", + "<13,67>": "", + "<13,68>": "", + "<13,69>": "", + "<13,70>": "", + "<13,71>": "", + "<13,72>": "", + "<13,73>": "", + "<13,74>": "", + "<13,75>": "", + "<13,76>": "", + "<13,77>": "", + "<13,78>": "", + "<13,79>": "", + "<13,80>": "", + "<13,81>": "", + "<13,82>": "", + "<13,83>": "", + "<13,84>": "", + "<13,85>": "", + "<13,86>": "", + "<13,87>": "", + "<13,88>": "", + "<13,89>": "", + "<13,90>": "0", + "<13,91>": "0", + "<13,92>": "", + "<13,93>": "", + "<13,94>": "", + "<13,95>": "", + "<13,96>": "", + "<13,97>": "", + "<13,98>": "", + "<13,99>": "", + "<13,100>": "", + "<13,101>": "", + "<13,102>": "", + "<13,103>": "", + "<13,104>": "", + "<13,105>": "", + "<13,106>": "", + "<13,107>": "", + "<13,108>": "" + } + }, + "record4": { + "<1>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/SRP_GIT_UTILITY.json b/SYSPROG/OIWIN/SRP_GIT_UTILITY.json new file mode 100644 index 0000000..f579be3 --- /dev/null +++ b/SYSPROG/OIWIN/SRP_GIT_UTILITY.json @@ -0,0 +1,5634 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1010", + "<2>": "32", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "SRP_GIT_UTILITY", + "<1,2>": "", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "325", + "<1,6>": "193", + "<1,7>": "-1032", + "<1,8>": "-572", + "<1,9>": "SRP Git", + "<1,10>": { + "<1,10,1>": "0x94CF0000", + "<1,10,2>": "0x100" + }, + "<1,11>": { + "<1,11,1>": "0x8000", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "", + "<1,13>": { + "<1,13,1>": "16777215", + "<1,13,2>": "16777215", + "<1,13,3>": "" + }, + "<1,14>": "", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "R", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<1,18,1,4>": { + "<1,18,1,4,1>": "CREATE", + "<1,18,1,4,2>": "@SELF" + }, + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "STPROC" + }, + "<1,18,2>": { + "<1,18,2,1>": "R", + "<1,18,2,2>": "EXECUTE", + "<1,18,2,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<1,18,2,4>": { + "<1,18,2,4,1>": "CLOSE", + "<1,18,2,4,2>": "@SELF" + }, + "<1,18,2,5>": "", + "<1,18,2,6>": "", + "<1,18,2,7>": "", + "<1,18,2,8>": "", + "<1,18,2,9>": "", + "<1,18,2,10>": "", + "<1,18,2,11>": "", + "<1,18,2,12>": "", + "<1,18,2,13>": "", + "<1,18,2,14>": "", + "<1,18,2,15>": "STPROC" + }, + "<1,18,3>": { + "<1,18,3,1>": "R", + "<1,18,3,2>": "EXECUTE", + "<1,18,3,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<1,18,3,4>": { + "<1,18,3,4,1>": "TIMER", + "<1,18,3,4,2>": "@SELF" + }, + "<1,18,3,5>": "", + "<1,18,3,6>": "", + "<1,18,3,7>": "", + "<1,18,3,8>": "", + "<1,18,3,9>": "", + "<1,18,3,10>": "", + "<1,18,3,11>": "", + "<1,18,3,12>": "", + "<1,18,3,13>": "", + "<1,18,3,14>": "", + "<1,18,3,15>": "STPROC" + } + }, + "<1,19>": { + "<1,19,1>": "CREATE", + "<1,19,2>": "CLOSE", + "<1,19,3>": "TIMER" + }, + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "", + "<1,24,6>": "0", + "<1,24,7>": "", + "<1,24,8>": "", + "<1,24,9>": "", + "<1,24,10>": "0", + "<1,24,11>": "0", + "<1,24,12>": "0", + "<1,24,13>": "0", + "<1,24,14>": "0", + "<1,24,15>": "0", + "<1,24,16>": "0", + "<1,24,17>": "0" + }, + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "SYSPROG*IMAGE*ICO*SRP_GIT_ICON", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0X30001", + "<1,37,2>": "0X10001" + }, + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": "", + "<1,56>": "", + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": { + "<1,62,1>": "0", + "<1,62,2>": "", + "<1,62,3>": "", + "<1,62,4>": "2", + "<1,62,5>": "0", + "<1,62,6>": "0", + "<1,62,7>": "", + "<1,62,8>": "0.50", + "<1,62,9>": "5.00", + "<1,62,10>": "0.00" + }, + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "0", + "<1,107>": "", + "<1,108>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "PUB_PULL", + "<1,2>": "", + "<1,3>": "OLECONTROL.SRPEDITOR.Button.1", + "<1,4>": "SRP_GIT_UTILITY", + "<1,5>": "16", + "<1,6>": "0", + "<1,7>": "90", + "<1,8>": "40", + "<1,9>": "SRPEDITOR.Button.1", + "<1,10>": { + "<1,10,1>": "0x52000000", + "<1,10,2>": "0x0" + }, + "<1,11>": { + "<1,11,1>": "0x4", + "<1,11,2>": "0x80000000" + }, + "<1,12>": "1", + "<1,13>": { + "<1,13,1>": "", + "<1,13,2>": "", + "<1,13,3>": "" + }, + "<1,14>": "0", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "Segoe UI", + "<1,15,1,2>": "-12", + "<1,15,1,3>": "400", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "0", + "<1,15,1,8>": "34", + "<1,15,1,9>": "0", + "<1,15,1,10>": "3", + "<1,15,1,11>": "2", + "<1,15,1,12>": "1", + "<1,15,1,13>": "0", + "<1,15,1,14>": "0" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "R", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<1,18,1,4>": { + "<1,18,1,4,1>": "@PARAM1", + "<1,18,1,4,2>": "@SELF", + "<1,18,1,4,3>": "@PARAM2", + "<1,18,1,4,4>": "@PARAM3", + "<1,18,1,4,5>": "@PARAM4", + "<1,18,1,4,6>": "@PARAM5", + "<1,18,1,4,7>": "@PARAM6" + }, + "<1,18,1,5>": "", + "<1,18,1,6>": "", + "<1,18,1,7>": "", + "<1,18,1,8>": "", + "<1,18,1,9>": "", + "<1,18,1,10>": "", + "<1,18,1,11>": "", + "<1,18,1,12>": "", + "<1,18,1,13>": "", + "<1,18,1,14>": "", + "<1,18,1,15>": "STPROC" + } + }, + "<1,19>": "OLE", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "", + "<1,26>": "", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": "", + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "0300000000000000FFFEFF0654006F00670067006C00650000000000FFFEFF04500075006C006C0000000000FFFEFF2C5300650067006F0065002000550049002000530065006D0069006C006900670068007400FCF02D0031003600FCF0340030003000FCF03000FCF03000FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF02FEF0310000000000FFFEFF00FFFEFF105300740061006E006400610072006400200054006F006F006C00620061007200FFFEFF00FFFEFF044100750074006F00000000000000000000000000", + "<1,37>": "", + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "", + "<1,53>": "", + "<1,54>": "", + "<1,55>": { + "<1,55,1>": "OLE.ButtonType", + "<1,55,2>": "OLE.Cancel", + "<1,55,3>": "OLE.Caption", + "<1,55,4>": "OLE.Default", + "<1,55,5>": "OLE.FontBold", + "<1,55,6>": "OLE.FontItalic", + "<1,55,7>": "OLE.FontName", + "<1,55,8>": "OLE.FontSize", + "<1,55,9>": "OLE.FontUnderlined", + "<1,55,10>": "OLE.IconFrameCount", + "<1,55,11>": "OLE.IconHeight", + "<1,55,12>": "OLE.IconPath", + "<1,55,13>": "OLE.IconSizeToFit", + "<1,55,14>": "OLE.IconWidth", + "<1,55,15>": "OLE.State", + "<1,55,16>": "OLE.StatusBarText", + "<1,55,17>": "OLE.Style", + "<1,55,18>": "OLE.ToolTip", + "<1,55,19>": "OLE.TransparentColor" + }, + "<1,56>": { + "<1,56,1>": "Toggle", + "<1,56,2>": "0", + "<1,56,3>": "Pull", + "<1,56,4>": "0", + "<1,56,5>": "0", + "<1,56,6>": "0", + "<1,56,7>": "Segoe UI Semilight", + "<1,56,8>": "12", + "<1,56,9>": "0", + "<1,56,10>": "1", + "<1,56,11>": "0", + "<1,56,12>": "", + "<1,56,13>": "0", + "<1,56,14>": "0", + "<1,56,15>": "0", + "<1,56,16>": "", + "<1,56,17>": "Standard Toolbar", + "<1,56,18>": "", + "<1,56,19>": "Auto" + }, + "<1,57>": "", + "<1,58>": "", + "<1,59>": "", + "<1,60>": "", + "<1,61>": "", + "<1,62>": "", + "<1,63>": "", + "<1,64>": "", + "<1,65>": "", + "<1,66>": "", + "<1,67>": "", + "<1,68>": "", + "<1,69>": "", + "<1,70>": "", + "<1,71>": "", + "<1,72>": "", + "<1,73>": "", + "<1,74>": "", + "<1,75>": "", + "<1,76>": "", + "<1,77>": "", + "<1,78>": "", + "<1,79>": "", + "<1,80>": "", + "<1,81>": "", + "<1,82>": "", + "<1,83>": "", + "<1,84>": "", + "<1,85>": "", + "<1,86>": "", + "<1,87>": "", + "<1,88>": "", + "<1,89>": "", + "<1,90>": "", + "<1,91>": "", + "<1,92>": "", + "<1,93>": "", + "<1,94>": "", + "<1,95>": "", + "<1,96>": "", + "<1,97>": "", + "<1,98>": "", + "<1,99>": "", + "<1,100>": "", + "<1,101>": "", + "<1,102>": "", + "<1,103>": "", + "<1,104>": "", + "<1,105>": "", + "<1,106>": "", + "<1,107>": "", + "<1,108>": "" + }, + "<2>": { + "<2,1>": "PUB_PUSH", + "<2,2>": "", + "<2,3>": "OLECONTROL.SRPEDITOR.Button.1", + "<2,4>": "SRP_GIT_UTILITY", + "<2,5>": "115", + "<2,6>": "0", + "<2,7>": "90", + "<2,8>": "40", + "<2,9>": "SRPEDITOR.Button.1", + "<2,10>": { + "<2,10,1>": "0x52000000", + "<2,10,2>": "0x0" + }, + "<2,11>": { + "<2,11,1>": "0x0", + "<2,11,2>": "0x80000000" + }, + "<2,12>": "2", + "<2,13>": { + "<2,13,1>": "", + "<2,13,2>": "", + "<2,13,3>": "" + }, + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "Segoe UI", + "<2,15,1,2>": "-12", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "3", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": { + "<2,18,1>": { + "<2,18,1,1>": "R", + "<2,18,1,2>": "EXECUTE", + "<2,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<2,18,1,4>": { + "<2,18,1,4,1>": "@PARAM1", + "<2,18,1,4,2>": "@SELF", + "<2,18,1,4,3>": "@PARAM2", + "<2,18,1,4,4>": "@PARAM3", + "<2,18,1,4,5>": "@PARAM4", + "<2,18,1,4,6>": "@PARAM5", + "<2,18,1,4,7>": "@PARAM6" + }, + "<2,18,1,5>": "", + "<2,18,1,6>": "", + "<2,18,1,7>": "", + "<2,18,1,8>": "", + "<2,18,1,9>": "", + "<2,18,1,10>": "", + "<2,18,1,11>": "", + "<2,18,1,12>": "", + "<2,18,1,13>": "", + "<2,18,1,14>": "", + "<2,18,1,15>": "STPROC" + } + }, + "<2,19>": "OLE", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "", + "<2,26>": "", + "<2,27>": "", + "<2,28>": "", + "<2,29>": "", + "<2,30>": "", + "<2,31>": "", + "<2,32>": "", + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "0300000000000000FFFEFF0654006F00670067006C00650000000000FFFEFF04500075007300680000000000FFFEFF2C5300650067006F0065002000550049002000530065006D0069006C006900670068007400FCF02D0031003600FCF0340030003000FCF03000FCF03000FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF02FEF0310000000000FFFEFF00FFFEFF105300740061006E006400610072006400200054006F006F006C00620061007200FFFEFF00FFFEFF044100750074006F00000000000000000000000000", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "", + "<2,53>": "", + "<2,54>": "", + "<2,55>": { + "<2,55,1>": "OLE.ButtonType", + "<2,55,2>": "OLE.Cancel", + "<2,55,3>": "OLE.Caption", + "<2,55,4>": "OLE.Default", + "<2,55,5>": "OLE.FontBold", + "<2,55,6>": "OLE.FontItalic", + "<2,55,7>": "OLE.FontName", + "<2,55,8>": "OLE.FontSize", + "<2,55,9>": "OLE.FontUnderlined", + "<2,55,10>": "OLE.IconFrameCount", + "<2,55,11>": "OLE.IconHeight", + "<2,55,12>": "OLE.IconPath", + "<2,55,13>": "OLE.IconSizeToFit", + "<2,55,14>": "OLE.IconWidth", + "<2,55,15>": "OLE.State", + "<2,55,16>": "OLE.StatusBarText", + "<2,55,17>": "OLE.Style", + "<2,55,18>": "OLE.ToolTip", + "<2,55,19>": "OLE.TransparentColor" + }, + "<2,56>": { + "<2,56,1>": "Toggle", + "<2,56,2>": "0", + "<2,56,3>": "Push", + "<2,56,4>": "0", + "<2,56,5>": "0", + "<2,56,6>": "0", + "<2,56,7>": "Segoe UI Semilight", + "<2,56,8>": "12", + "<2,56,9>": "0", + "<2,56,10>": "1", + "<2,56,11>": "0", + "<2,56,12>": "", + "<2,56,13>": "0", + "<2,56,14>": "0", + "<2,56,15>": "0", + "<2,56,16>": "", + "<2,56,17>": "Standard Toolbar", + "<2,56,18>": "", + "<2,56,19>": "Auto" + }, + "<2,57>": "", + "<2,58>": "", + "<2,59>": "", + "<2,60>": "", + "<2,61>": "", + "<2,62>": "", + "<2,63>": "", + "<2,64>": "", + "<2,65>": "", + "<2,66>": "", + "<2,67>": "", + "<2,68>": "", + "<2,69>": "", + "<2,70>": "", + "<2,71>": "", + "<2,72>": "", + "<2,73>": "", + "<2,74>": "", + "<2,75>": "", + "<2,76>": "", + "<2,77>": "", + "<2,78>": "", + "<2,79>": "", + "<2,80>": "", + "<2,81>": "", + "<2,82>": "", + "<2,83>": "", + "<2,84>": "", + "<2,85>": "", + "<2,86>": "", + "<2,87>": "", + "<2,88>": "", + "<2,89>": "", + "<2,90>": "", + "<2,91>": "", + "<2,92>": "", + "<2,93>": "", + "<2,94>": "", + "<2,95>": "", + "<2,96>": "", + "<2,97>": "", + "<2,98>": "", + "<2,99>": "", + "<2,100>": "", + "<2,101>": "", + "<2,102>": "", + "<2,103>": "", + "<2,104>": "", + "<2,105>": "", + "<2,106>": "", + "<2,107>": "", + "<2,108>": "" + }, + "<3>": { + "<3,1>": "STA_FILTER_APP", + "<3,2>": "", + "<3,3>": "STATIC", + "<3,4>": "SRP_GIT_UTILITY", + "<3,5>": "16", + "<3,6>": "56", + "<3,7>": "42", + "<3,8>": "20", + "<3,9>": "By &App:", + "<3,10>": { + "<3,10,1>": "0x50000000", + "<3,10,2>": "0x0" + }, + "<3,11>": { + "<3,11,1>": "0x0", + "<3,11,2>": "0x80000000" + }, + "<3,12>": "23", + "<3,13>": { + "<3,13,1>": "16777215", + "<3,13,2>": "16777215", + "<3,13,3>": "0" + }, + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "Segoe UI Semilight", + "<3,15,1,2>": "-13", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "3", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": "", + "<3,19>": "", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "", + "<3,26>": "", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "", + "<3,31>": "", + "<3,32>": "", + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "", + "<3,53>": "", + "<3,54>": "", + "<3,55>": "", + "<3,56>": "", + "<3,57>": "", + "<3,58>": "", + "<3,59>": "", + "<3,60>": "", + "<3,61>": "", + "<3,62>": "0", + "<3,63>": { + "<3,63,1>": "", + "<3,63,2>": "", + "<3,63,3>": "", + "<3,63,4>": "", + "<3,63,5>": "", + "<3,63,6>": "", + "<3,63,7>": "", + "<3,63,8>": "" + }, + "<3,64>": { + "<3,64,1>": "", + "<3,64,2>": "", + "<3,64,3>": "" + }, + "<3,65>": "-2", + "<3,66>": "", + "<3,67>": "", + "<3,68>": "", + "<3,69>": "", + "<3,70>": "", + "<3,71>": "", + "<3,72>": "", + "<3,73>": "", + "<3,74>": "", + "<3,75>": "", + "<3,76>": "", + "<3,77>": "", + "<3,78>": "", + "<3,79>": "", + "<3,80>": "", + "<3,81>": "", + "<3,82>": "", + "<3,83>": "", + "<3,84>": "", + "<3,85>": "", + "<3,86>": "", + "<3,87>": "", + "<3,88>": "", + "<3,89>": "", + "<3,90>": "0", + "<3,91>": "0", + "<3,92>": "", + "<3,93>": "", + "<3,94>": "", + "<3,95>": "", + "<3,96>": "", + "<3,97>": "", + "<3,98>": "", + "<3,99>": "", + "<3,100>": "", + "<3,101>": "", + "<3,102>": "", + "<3,103>": "", + "<3,104>": "", + "<3,105>": "", + "<3,106>": "", + "<3,107>": "", + "<3,108>": "" + }, + "<4>": { + "<4,1>": "CMB_FILTER_APP", + "<4,2>": "", + "<4,3>": "COMBOBOX", + "<4,4>": "SRP_GIT_UTILITY", + "<4,5>": "65", + "<4,6>": "53", + "<4,7>": "170", + "<4,8>": "32", + "<4,9>": "", + "<4,10>": { + "<4,10,1>": "0x50000003", + "<4,10,2>": "0x0" + }, + "<4,11>": { + "<4,11,1>": "0x0", + "<4,11,2>": "0x80000C00" + }, + "<4,12>": "3", + "<4,13>": { + "<4,13,1>": "", + "<4,13,2>": "", + "<4,13,3>": "" + }, + "<4,14>": "0", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "Segoe UI Semilight", + "<4,15,1,2>": "-13", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "3", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": { + "<4,18,1>": { + "<4,18,1,1>": "R", + "<4,18,1,2>": "EXECUTE", + "<4,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<4,18,1,4>": { + "<4,18,1,4,1>": "CHANGED", + "<4,18,1,4,2>": "@SELF", + "<4,18,1,4,3>": "@PARAM1" + }, + "<4,18,1,5>": "", + "<4,18,1,6>": "", + "<4,18,1,7>": "", + "<4,18,1,8>": "", + "<4,18,1,9>": "", + "<4,18,1,10>": "", + "<4,18,1,11>": "", + "<4,18,1,12>": "", + "<4,18,1,13>": "", + "<4,18,1,14>": "", + "<4,18,1,15>": "STPROC" + } + }, + "<4,19>": "CHANGED", + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "", + "<4,26>": "", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "<>", + "<4,31>": "0", + "<4,32>": "", + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "", + "<4,53>": "", + "<4,54>": "", + "<4,55>": "", + "<4,56>": "", + "<4,57>": "", + "<4,58>": "", + "<4,59>": "", + "<4,60>": "", + "<4,61>": "", + "<4,62>": "0", + "<4,63>": "", + "<4,64>": { + "<4,64,1>": "", + "<4,64,2>": "", + "<4,64,3>": "" + }, + "<4,65>": "-2", + "<4,66>": { + "<4,66,1>": "", + "<4,66,2>": "", + "<4,66,3>": "" + }, + "<4,67>": "-2", + "<4,68>": "", + "<4,69>": "", + "<4,70>": "", + "<4,71>": "", + "<4,72>": "", + "<4,73>": "", + "<4,74>": "", + "<4,75>": "", + "<4,76>": "", + "<4,77>": "", + "<4,78>": "", + "<4,79>": "", + "<4,80>": "", + "<4,81>": "", + "<4,82>": "", + "<4,83>": "", + "<4,84>": "", + "<4,85>": "", + "<4,86>": "", + "<4,87>": "", + "<4,88>": "", + "<4,89>": "", + "<4,90>": "", + "<4,91>": "", + "<4,92>": "", + "<4,93>": "", + "<4,94>": "", + "<4,95>": "", + "<4,96>": "", + "<4,97>": "", + "<4,98>": "", + "<4,99>": "", + "<4,100>": "", + "<4,101>": "", + "<4,102>": "", + "<4,103>": "", + "<4,104>": "", + "<4,105>": "", + "<4,106>": "", + "<4,107>": "", + "<4,108>": "" + }, + "<5>": { + "<5,1>": "LBL_FILTER_WORK", + "<5,2>": "", + "<5,3>": "STATIC", + "<5,4>": "SRP_GIT_UTILITY", + "<5,5>": "243", + "<5,6>": "56", + "<5,7>": "46", + "<5,8>": "20", + "<5,9>": "By &Type:", + "<5,10>": { + "<5,10,1>": "0x50000000", + "<5,10,2>": "0x0" + }, + "<5,11>": { + "<5,11,1>": "0x0", + "<5,11,2>": "0x80000000" + }, + "<5,12>": "24", + "<5,13>": { + "<5,13,1>": "16777215", + "<5,13,2>": "-2", + "<5,13,3>": "99" + }, + "<5,14>": "0", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "Segoe UI Semilight", + "<5,15,1,2>": "-13", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "3", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "0", + "<5,15,1,14>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": "", + "<5,19>": "", + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "", + "<5,26>": "", + "<5,27>": "", + "<5,28>": "<>", + "<5,29>": "<>", + "<5,30>": "", + "<5,31>": "", + "<5,32>": "", + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "", + "<5,41>": "", + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "", + "<5,52>": "", + "<5,53>": "", + "<5,54>": "", + "<5,55>": "", + "<5,56>": "", + "<5,57>": "", + "<5,58>": "", + "<5,59>": "", + "<5,60>": "", + "<5,61>": "", + "<5,62>": "0", + "<5,63>": { + "<5,63,1>": "", + "<5,63,2>": "", + "<5,63,3>": "", + "<5,63,4>": "", + "<5,63,5>": "", + "<5,63,6>": "", + "<5,63,7>": "", + "<5,63,8>": "" + }, + "<5,64>": { + "<5,64,1>": "", + "<5,64,2>": "", + "<5,64,3>": "" + }, + "<5,65>": "-2", + "<5,66>": "", + "<5,67>": "", + "<5,68>": "", + "<5,69>": "", + "<5,70>": "", + "<5,71>": "", + "<5,72>": "", + "<5,73>": "", + "<5,74>": "", + "<5,75>": "", + "<5,76>": "", + "<5,77>": "", + "<5,78>": "", + "<5,79>": "", + "<5,80>": "", + "<5,81>": "", + "<5,82>": "", + "<5,83>": "", + "<5,84>": "", + "<5,85>": "", + "<5,86>": "", + "<5,87>": "", + "<5,88>": "", + "<5,89>": "", + "<5,90>": "0", + "<5,91>": "0", + "<5,92>": "", + "<5,93>": "", + "<5,94>": "", + "<5,95>": "", + "<5,96>": "", + "<5,97>": "", + "<5,98>": "", + "<5,99>": "", + "<5,100>": "", + "<5,101>": "", + "<5,102>": "", + "<5,103>": "", + "<5,104>": "", + "<5,105>": "", + "<5,106>": "", + "<5,107>": "", + "<5,108>": "" + }, + "<6>": { + "<6,1>": "CMB_FILTER_WORK", + "<6,2>": "", + "<6,3>": "COMBOBOX", + "<6,4>": "SRP_GIT_UTILITY", + "<6,5>": "297", + "<6,6>": "52", + "<6,7>": "180", + "<6,8>": "29", + "<6,9>": "", + "<6,10>": { + "<6,10,1>": "0x50000003", + "<6,10,2>": "0x0" + }, + "<6,11>": { + "<6,11,1>": "0x0", + "<6,11,2>": "0x80000C00" + }, + "<6,12>": "4", + "<6,13>": { + "<6,13,1>": "", + "<6,13,2>": "", + "<6,13,3>": "" + }, + "<6,14>": "0", + "<6,15>": { + "<6,15,1>": { + "<6,15,1,1>": "Segoe UI Semilight", + "<6,15,1,2>": "-13", + "<6,15,1,3>": "400", + "<6,15,1,4>": "0", + "<6,15,1,5>": "0", + "<6,15,1,6>": "0", + "<6,15,1,7>": "0", + "<6,15,1,8>": "34", + "<6,15,1,9>": "0", + "<6,15,1,10>": "3", + "<6,15,1,11>": "2", + "<6,15,1,12>": "1", + "<6,15,1,13>": "0", + "<6,15,1,14>": "0" + } + }, + "<6,16>": "", + "<6,17>": "", + "<6,18>": { + "<6,18,1>": { + "<6,18,1,1>": "R", + "<6,18,1,2>": "EXECUTE", + "<6,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<6,18,1,4>": { + "<6,18,1,4,1>": "CHANGED", + "<6,18,1,4,2>": "@SELF", + "<6,18,1,4,3>": "@PARAM1" + }, + "<6,18,1,5>": "", + "<6,18,1,6>": "", + "<6,18,1,7>": "", + "<6,18,1,8>": "", + "<6,18,1,9>": "", + "<6,18,1,10>": "", + "<6,18,1,11>": "", + "<6,18,1,12>": "", + "<6,18,1,13>": "", + "<6,18,1,14>": "", + "<6,18,1,15>": "STPROC" + } + }, + "<6,19>": "CHANGED", + "<6,20>": "", + "<6,21>": "", + "<6,22>": "", + "<6,23>": "", + "<6,24>": "", + "<6,25>": "", + "<6,26>": "", + "<6,27>": "", + "<6,28>": "<>", + "<6,29>": "<>", + "<6,30>": "<>", + "<6,31>": "0", + "<6,32>": "", + "<6,33>": "", + "<6,34>": "", + "<6,35>": "", + "<6,36>": "", + "<6,37>": "", + "<6,38>": "", + "<6,39>": "", + "<6,40>": "", + "<6,41>": "", + "<6,42>": "", + "<6,43>": "", + "<6,44>": "", + "<6,45>": "", + "<6,46>": "", + "<6,47>": "", + "<6,48>": "", + "<6,49>": "", + "<6,50>": "", + "<6,51>": "", + "<6,52>": "", + "<6,53>": "", + "<6,54>": "", + "<6,55>": "", + "<6,56>": "", + "<6,57>": "", + "<6,58>": "", + "<6,59>": "", + "<6,60>": "", + "<6,61>": "", + "<6,62>": "0", + "<6,63>": "", + "<6,64>": { + "<6,64,1>": "", + "<6,64,2>": "", + "<6,64,3>": "" + }, + "<6,65>": "-2", + "<6,66>": { + "<6,66,1>": "", + "<6,66,2>": "", + "<6,66,3>": "" + }, + "<6,67>": "-2", + "<6,68>": "", + "<6,69>": "", + "<6,70>": "", + "<6,71>": "", + "<6,72>": "", + "<6,73>": "", + "<6,74>": "", + "<6,75>": "", + "<6,76>": "", + "<6,77>": "", + "<6,78>": "", + "<6,79>": "", + "<6,80>": "", + "<6,81>": "", + "<6,82>": "", + "<6,83>": "", + "<6,84>": "", + "<6,85>": "", + "<6,86>": "", + "<6,87>": "", + "<6,88>": "", + "<6,89>": "", + "<6,90>": "", + "<6,91>": "", + "<6,92>": "", + "<6,93>": "", + "<6,94>": "", + "<6,95>": "", + "<6,96>": "", + "<6,97>": "", + "<6,98>": "", + "<6,99>": "", + "<6,100>": "", + "<6,101>": "", + "<6,102>": "", + "<6,103>": "", + "<6,104>": "", + "<6,105>": "", + "<6,106>": "", + "<6,107>": "", + "<6,108>": "" + }, + "<7>": { + "<7,1>": "STA_SEARCH", + "<7,2>": "", + "<7,3>": "STATIC", + "<7,4>": "SRP_GIT_UTILITY", + "<7,5>": "16", + "<7,6>": "97", + "<7,7>": "42", + "<7,8>": "20", + "<7,9>": "&Filter:", + "<7,10>": { + "<7,10,1>": "0x50000000", + "<7,10,2>": "0x0" + }, + "<7,11>": { + "<7,11,1>": "0x0", + "<7,11,2>": "0x80000000" + }, + "<7,12>": "25", + "<7,13>": { + "<7,13,1>": "16777215", + "<7,13,2>": "16777215", + "<7,13,3>": "0" + }, + "<7,14>": "0", + "<7,15>": { + "<7,15,1>": { + "<7,15,1,1>": "Segoe UI Semilight", + "<7,15,1,2>": "-13", + "<7,15,1,3>": "400", + "<7,15,1,4>": "0", + "<7,15,1,5>": "0", + "<7,15,1,6>": "0", + "<7,15,1,7>": "0", + "<7,15,1,8>": "34", + "<7,15,1,9>": "0", + "<7,15,1,10>": "3", + "<7,15,1,11>": "2", + "<7,15,1,12>": "1", + "<7,15,1,13>": "0", + "<7,15,1,14>": "0" + } + }, + "<7,16>": "", + "<7,17>": "", + "<7,18>": "", + "<7,19>": "", + "<7,20>": "", + "<7,21>": "", + "<7,22>": "", + "<7,23>": "", + "<7,24>": "", + "<7,25>": "", + "<7,26>": "", + "<7,27>": "", + "<7,28>": "<>", + "<7,29>": "<>", + "<7,30>": "", + "<7,31>": "", + "<7,32>": "", + "<7,33>": "", + "<7,34>": "", + "<7,35>": "", + "<7,36>": "", + "<7,37>": "", + "<7,38>": "", + "<7,39>": "", + "<7,40>": "", + "<7,41>": "", + "<7,42>": "", + "<7,43>": "", + "<7,44>": "", + "<7,45>": "", + "<7,46>": "", + "<7,47>": "", + "<7,48>": "", + "<7,49>": "", + "<7,50>": "", + "<7,51>": "", + "<7,52>": "", + "<7,53>": "", + "<7,54>": "", + "<7,55>": "", + "<7,56>": "", + "<7,57>": "", + "<7,58>": "", + "<7,59>": "", + "<7,60>": "", + "<7,61>": "", + "<7,62>": "0", + "<7,63>": { + "<7,63,1>": "", + "<7,63,2>": "", + "<7,63,3>": "", + "<7,63,4>": "", + "<7,63,5>": "", + "<7,63,6>": "", + "<7,63,7>": "", + "<7,63,8>": "" + }, + "<7,64>": { + "<7,64,1>": "", + "<7,64,2>": "", + "<7,64,3>": "" + }, + "<7,65>": "-2", + "<7,66>": "", + "<7,67>": "", + "<7,68>": "", + "<7,69>": "", + "<7,70>": "", + "<7,71>": "", + "<7,72>": "", + "<7,73>": "", + "<7,74>": "", + "<7,75>": "", + "<7,76>": "", + "<7,77>": "", + "<7,78>": "", + "<7,79>": "", + "<7,80>": "", + "<7,81>": "", + "<7,82>": "", + "<7,83>": "", + "<7,84>": "", + "<7,85>": "", + "<7,86>": "", + "<7,87>": "", + "<7,88>": "", + "<7,89>": "", + "<7,90>": "0", + "<7,91>": "0", + "<7,92>": "", + "<7,93>": "", + "<7,94>": "", + "<7,95>": "", + "<7,96>": "", + "<7,97>": "", + "<7,98>": "", + "<7,99>": "", + "<7,100>": "", + "<7,101>": "", + "<7,102>": "", + "<7,103>": "", + "<7,104>": "", + "<7,105>": "", + "<7,106>": "", + "<7,107>": "", + "<7,108>": "" + }, + "<8>": { + "<8,1>": "EDL_SEARCH", + "<8,2>": "", + "<8,3>": "EDITFIELD", + "<8,4>": "SRP_GIT_UTILITY", + "<8,5>": "65", + "<8,6>": "94", + "<8,7>": "412", + "<8,8>": "24", + "<8,9>": "", + "<8,10>": { + "<8,10,1>": "0x50000080", + "<8,10,2>": "0x200" + }, + "<8,11>": { + "<8,11,1>": "0x0", + "<8,11,2>": "0x80000000" + }, + "<8,12>": "5", + "<8,13>": { + "<8,13,1>": "", + "<8,13,2>": "", + "<8,13,3>": "" + }, + "<8,14>": "0", + "<8,15>": { + "<8,15,1>": { + "<8,15,1,1>": "Segoe UI Semilight", + "<8,15,1,2>": "-13", + "<8,15,1,3>": "400", + "<8,15,1,4>": "0", + "<8,15,1,5>": "0", + "<8,15,1,6>": "0", + "<8,15,1,7>": "0", + "<8,15,1,8>": "34", + "<8,15,1,9>": "0", + "<8,15,1,10>": "3", + "<8,15,1,11>": "2", + "<8,15,1,12>": "1", + "<8,15,1,13>": "0", + "<8,15,1,14>": "0" + } + }, + "<8,16>": "", + "<8,17>": "", + "<8,18>": { + "<8,18,1>": { + "<8,18,1,1>": "R", + "<8,18,1,2>": "EXECUTE", + "<8,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<8,18,1,4>": { + "<8,18,1,4,1>": "CHANGED", + "<8,18,1,4,2>": "@SELF", + "<8,18,1,4,3>": "@PARAM1" + }, + "<8,18,1,5>": "", + "<8,18,1,6>": "", + "<8,18,1,7>": "", + "<8,18,1,8>": "", + "<8,18,1,9>": "", + "<8,18,1,10>": "", + "<8,18,1,11>": "", + "<8,18,1,12>": "", + "<8,18,1,13>": "", + "<8,18,1,14>": "", + "<8,18,1,15>": "STPROC" + } + }, + "<8,19>": "CHANGED", + "<8,20>": "", + "<8,21>": "", + "<8,22>": "", + "<8,23>": "", + "<8,24>": "", + "<8,25>": "", + "<8,26>": "", + "<8,27>": "", + "<8,28>": "<>", + "<8,29>": "<>", + "<8,30>": "<>", + "<8,31>": "0", + "<8,32>": "", + "<8,33>": "", + "<8,34>": "", + "<8,35>": "", + "<8,36>": { + "<8,36,1>": "0", + "<8,36,2>": "0" + }, + "<8,37>": "", + "<8,38>": "", + "<8,39>": "", + "<8,40>": "", + "<8,41>": "", + "<8,42>": "", + "<8,43>": "", + "<8,44>": "", + "<8,45>": "", + "<8,46>": "", + "<8,47>": "", + "<8,48>": "", + "<8,49>": "", + "<8,50>": "", + "<8,51>": "", + "<8,52>": "", + "<8,53>": "", + "<8,54>": "", + "<8,55>": "", + "<8,56>": "", + "<8,57>": "", + "<8,58>": "", + "<8,59>": "", + "<8,60>": "", + "<8,61>": "", + "<8,62>": "0", + "<8,63>": "", + "<8,64>": "", + "<8,65>": "", + "<8,66>": "", + "<8,67>": "", + "<8,68>": "", + "<8,69>": "", + "<8,70>": "", + "<8,71>": "", + "<8,72>": "", + "<8,73>": "", + "<8,74>": "", + "<8,75>": "", + "<8,76>": "", + "<8,77>": "", + "<8,78>": "", + "<8,79>": "", + "<8,80>": "", + "<8,81>": "", + "<8,82>": "", + "<8,83>": "", + "<8,84>": "", + "<8,85>": "", + "<8,86>": "", + "<8,87>": "", + "<8,88>": "", + "<8,89>": "", + "<8,90>": "", + "<8,91>": "", + "<8,92>": "", + "<8,93>": "", + "<8,94>": "", + "<8,95>": "", + "<8,96>": "", + "<8,97>": "", + "<8,98>": "", + "<8,99>": "", + "<8,100>": "", + "<8,101>": "", + "<8,102>": "", + "<8,103>": "", + "<8,104>": "", + "<8,105>": "", + "<8,106>": "", + "<8,107>": "", + "<8,108>": "" + }, + "<9>": { + "<9,1>": "STA_WORKING", + "<9,2>": "", + "<9,3>": "STATIC", + "<9,4>": "SRP_GIT_UTILITY", + "<9,5>": "16", + "<9,6>": "127", + "<9,7>": "-555", + "<9,8>": "27", + "<9,9>": "Entities", + "<9,10>": { + "<9,10,1>": "0x50000000", + "<9,10,2>": "0x0" + }, + "<9,11>": { + "<9,11,1>": "0x4000", + "<9,11,2>": "0x80000000" + }, + "<9,12>": "26", + "<9,13>": { + "<9,13,1>": "16777215", + "<9,13,2>": "-2", + "<9,13,3>": "99" + }, + "<9,14>": "0", + "<9,15>": { + "<9,15,1>": { + "<9,15,1,1>": "Segoe UI Semilight", + "<9,15,1,2>": "-19", + "<9,15,1,3>": "400", + "<9,15,1,4>": "0", + "<9,15,1,5>": "0", + "<9,15,1,6>": "0", + "<9,15,1,7>": "0", + "<9,15,1,8>": "34", + "<9,15,1,9>": "0", + "<9,15,1,10>": "3", + "<9,15,1,11>": "2", + "<9,15,1,12>": "1", + "<9,15,1,13>": "0", + "<9,15,1,14>": "0" + } + }, + "<9,16>": "", + "<9,17>": "", + "<9,18>": "", + "<9,19>": "", + "<9,20>": "", + "<9,21>": "", + "<9,22>": "", + "<9,23>": "", + "<9,24>": "", + "<9,25>": "", + "<9,26>": "", + "<9,27>": "", + "<9,28>": "<>", + "<9,29>": "<>", + "<9,30>": "", + "<9,31>": "", + "<9,32>": "", + "<9,33>": "", + "<9,34>": "", + "<9,35>": "", + "<9,36>": "", + "<9,37>": "", + "<9,38>": "", + "<9,39>": "", + "<9,40>": "", + "<9,41>": "", + "<9,42>": "", + "<9,43>": "", + "<9,44>": "", + "<9,45>": "", + "<9,46>": "", + "<9,47>": "", + "<9,48>": "", + "<9,49>": "", + "<9,50>": "", + "<9,51>": "", + "<9,52>": "", + "<9,53>": "", + "<9,54>": "", + "<9,55>": "", + "<9,56>": "", + "<9,57>": "", + "<9,58>": "", + "<9,59>": "", + "<9,60>": "", + "<9,61>": "", + "<9,62>": "0", + "<9,63>": { + "<9,63,1>": "", + "<9,63,2>": "", + "<9,63,3>": "", + "<9,63,4>": "", + "<9,63,5>": "", + "<9,63,6>": "", + "<9,63,7>": "", + "<9,63,8>": "" + }, + "<9,64>": { + "<9,64,1>": "", + "<9,64,2>": "", + "<9,64,3>": "" + }, + "<9,65>": "-2", + "<9,66>": "", + "<9,67>": "", + "<9,68>": "", + "<9,69>": "", + "<9,70>": "", + "<9,71>": "", + "<9,72>": "", + "<9,73>": "", + "<9,74>": "", + "<9,75>": "", + "<9,76>": "", + "<9,77>": "", + "<9,78>": "", + "<9,79>": "", + "<9,80>": "", + "<9,81>": "", + "<9,82>": "", + "<9,83>": "", + "<9,84>": "", + "<9,85>": "", + "<9,86>": "", + "<9,87>": "", + "<9,88>": "", + "<9,89>": "", + "<9,90>": "0", + "<9,91>": "0", + "<9,92>": "", + "<9,93>": "", + "<9,94>": "", + "<9,95>": "", + "<9,96>": "", + "<9,97>": "", + "<9,98>": "", + "<9,99>": "", + "<9,100>": "", + "<9,101>": "", + "<9,102>": "", + "<9,103>": "", + "<9,104>": "", + "<9,105>": "", + "<9,106>": "", + "<9,107>": "", + "<9,108>": "" + }, + "<10>": { + "<10,1>": "OLE_RPT_WORK", + "<10,2>": "", + "<10,3>": "OLECONTROL.SRPEDITOR.ReportTable.1", + "<10,4>": "SRP_GIT_UTILITY", + "<10,5>": "16", + "<10,6>": "156", + "<10,7>": "461", + "<10,8>": "-51", + "<10,9>": "SRPEDITOR.ReportTable.1", + "<10,10>": { + "<10,10,1>": "0x50000000", + "<10,10,2>": "0x0" + }, + "<10,11>": { + "<10,11,1>": "0x8000", + "<10,11,2>": "0x80000000" + }, + "<10,12>": "6", + "<10,13>": { + "<10,13,1>": "", + "<10,13,2>": "", + "<10,13,3>": "" + }, + "<10,14>": "0", + "<10,15>": { + "<10,15,1>": { + "<10,15,1,1>": "Tahoma", + "<10,15,1,2>": "-11", + "<10,15,1,3>": "400", + "<10,15,1,4>": "0", + "<10,15,1,5>": "0", + "<10,15,1,6>": "0", + "<10,15,1,7>": "0", + "<10,15,1,8>": "34", + "<10,15,1,9>": "0", + "<10,15,1,10>": "3", + "<10,15,1,11>": "2", + "<10,15,1,12>": "1", + "<10,15,1,13>": "0", + "<10,15,1,14>": "0" + } + }, + "<10,16>": "", + "<10,17>": "", + "<10,18>": { + "<10,18,1>": { + "<10,18,1,1>": "R", + "<10,18,1,2>": "EXECUTE", + "<10,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<10,18,1,4>": { + "<10,18,1,4,1>": "@PARAM1", + "<10,18,1,4,2>": "@SELF", + "<10,18,1,4,3>": "@PARAM2", + "<10,18,1,4,4>": "@PARAM3", + "<10,18,1,4,5>": "@PARAM4", + "<10,18,1,4,6>": "@PARAM5", + "<10,18,1,4,7>": "@PARAM6" + }, + "<10,18,1,5>": "", + "<10,18,1,6>": "", + "<10,18,1,7>": "", + "<10,18,1,8>": "", + "<10,18,1,9>": "", + "<10,18,1,10>": "", + "<10,18,1,11>": "", + "<10,18,1,12>": "", + "<10,18,1,13>": "", + "<10,18,1,14>": "", + "<10,18,1,15>": "STPROC" + } + }, + "<10,19>": "OLE", + "<10,20>": "", + "<10,21>": "", + "<10,22>": "", + "<10,23>": "", + "<10,24>": "", + "<10,25>": "", + "<10,26>": "", + "<10,27>": "", + "<10,28>": "", + "<10,29>": "", + "<10,30>": "", + "<10,31>": "", + "<10,32>": "", + "<10,33>": "", + "<10,34>": "", + "<10,35>": "", + "<10,36>": "00000100B02700006B1F000000000000", + "<10,37>": "", + "<10,38>": "", + "<10,39>": "", + "<10,40>": "", + "<10,41>": "", + "<10,42>": "", + "<10,43>": "", + "<10,44>": "", + "<10,45>": "", + "<10,46>": "", + "<10,47>": "", + "<10,48>": "", + "<10,49>": "", + "<10,50>": "", + "<10,51>": "", + "<10,52>": "", + "<10,53>": "", + "<10,54>": "", + "<10,55>": "OLE.Border", + "<10,56>": "XP", + "<10,57>": "", + "<10,58>": "", + "<10,59>": "", + "<10,60>": "", + "<10,61>": "", + "<10,62>": "", + "<10,63>": "", + "<10,64>": "", + "<10,65>": "", + "<10,66>": "", + "<10,67>": "", + "<10,68>": "", + "<10,69>": "", + "<10,70>": "", + "<10,71>": "", + "<10,72>": "", + "<10,73>": "", + "<10,74>": "", + "<10,75>": "", + "<10,76>": "", + "<10,77>": "", + "<10,78>": "", + "<10,79>": "", + "<10,80>": "", + "<10,81>": "", + "<10,82>": "", + "<10,83>": "", + "<10,84>": "", + "<10,85>": "", + "<10,86>": "", + "<10,87>": "", + "<10,88>": "", + "<10,89>": "", + "<10,90>": "", + "<10,91>": "", + "<10,92>": "", + "<10,93>": "", + "<10,94>": "", + "<10,95>": "", + "<10,96>": "", + "<10,97>": "", + "<10,98>": "", + "<10,99>": "", + "<10,100>": "", + "<10,101>": "", + "<10,102>": "", + "<10,103>": "", + "<10,104>": "", + "<10,105>": "", + "<10,106>": "", + "<10,107>": "", + "<10,108>": "" + }, + "<11>": { + "<11,1>": "OLE_ADD_ALL", + "<11,2>": "", + "<11,3>": "OLECONTROL.SRPEDITOR.Button.1", + "<11,4>": "SRP_GIT_UTILITY", + "<11,5>": "496", + "<11,6>": "234", + "<11,7>": "40", + "<11,8>": "40", + "<11,9>": "SRPEDITOR.Button.1", + "<11,10>": { + "<11,10,1>": "0x50000000", + "<11,10,2>": "0x0" + }, + "<11,11>": { + "<11,11,1>": "0x0", + "<11,11,2>": "0x80000000" + }, + "<11,12>": "7", + "<11,13>": { + "<11,13,1>": "", + "<11,13,2>": "", + "<11,13,3>": "" + }, + "<11,14>": "0", + "<11,15>": { + "<11,15,1>": { + "<11,15,1,1>": "Tahoma", + "<11,15,1,2>": "-11", + "<11,15,1,3>": "400", + "<11,15,1,4>": "0", + "<11,15,1,5>": "0", + "<11,15,1,6>": "0", + "<11,15,1,7>": "0", + "<11,15,1,8>": "34", + "<11,15,1,9>": "0", + "<11,15,1,10>": "3", + "<11,15,1,11>": "2", + "<11,15,1,12>": "1", + "<11,15,1,13>": "0", + "<11,15,1,14>": "0" + } + }, + "<11,16>": "", + "<11,17>": "", + "<11,18>": { + "<11,18,1>": { + "<11,18,1,1>": "R", + "<11,18,1,2>": "EXECUTE", + "<11,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<11,18,1,4>": { + "<11,18,1,4,1>": "@PARAM1", + "<11,18,1,4,2>": "@SELF", + "<11,18,1,4,3>": "@PARAM2", + "<11,18,1,4,4>": "@PARAM3", + "<11,18,1,4,5>": "@PARAM4", + "<11,18,1,4,6>": "@PARAM5", + "<11,18,1,4,7>": "@PARAM6" + }, + "<11,18,1,5>": "", + "<11,18,1,6>": "", + "<11,18,1,7>": "", + "<11,18,1,8>": "", + "<11,18,1,9>": "", + "<11,18,1,10>": "", + "<11,18,1,11>": "", + "<11,18,1,12>": "", + "<11,18,1,13>": "", + "<11,18,1,14>": "", + "<11,18,1,15>": "STPROC" + } + }, + "<11,19>": "OLE", + "<11,20>": "", + "<11,21>": "", + "<11,22>": "", + "<11,23>": "", + "<11,24>": "", + "<11,25>": "", + "<11,26>": "", + "<11,27>": "", + "<11,28>": "", + "<11,29>": "", + "<11,30>": "", + "<11,31>": "", + "<11,32>": "", + "<11,33>": "", + "<11,34>": "", + "<11,35>": "", + "<11,36>": "0300000000000000FFFEFF064E006F0072006D0061006C0000000000FFFEFF0000000000FFFEFF225300650067006F006500200055004900FCF02D0031003100FCF0340030003000FCF03000FCF03000FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF02FEF0310000000000FFFEFF00FFFEFF105300740061006E006400610072006400200054006F006F006C00620061007200FFFEFF00FFFEFF044100750074006F00000000000000000000000000", + "<11,37>": "", + "<11,38>": "", + "<11,39>": "", + "<11,40>": "", + "<11,41>": "", + "<11,42>": "", + "<11,43>": "", + "<11,44>": "", + "<11,45>": "", + "<11,46>": "", + "<11,47>": "", + "<11,48>": "", + "<11,49>": "", + "<11,50>": "", + "<11,51>": "", + "<11,52>": "", + "<11,53>": "", + "<11,54>": "", + "<11,55>": { + "<11,55,1>": "OLE.ButtonType", + "<11,55,2>": "OLE.Cancel", + "<11,55,3>": "OLE.Caption", + "<11,55,4>": "OLE.Default", + "<11,55,5>": "OLE.FontBold", + "<11,55,6>": "OLE.FontItalic", + "<11,55,7>": "OLE.FontName", + "<11,55,8>": "OLE.FontSize", + "<11,55,9>": "OLE.FontUnderlined", + "<11,55,10>": "OLE.IconFrameCount", + "<11,55,11>": "OLE.IconHeight", + "<11,55,12>": "OLE.IconPath", + "<11,55,13>": "OLE.IconSizeToFit", + "<11,55,14>": "OLE.IconWidth", + "<11,55,15>": "OLE.State", + "<11,55,16>": "OLE.StatusBarText", + "<11,55,17>": "OLE.Style", + "<11,55,18>": "OLE.ToolTip", + "<11,55,19>": "OLE.TransparentColor" + }, + "<11,56>": { + "<11,56,1>": "Normal", + "<11,56,2>": "0", + "<11,56,3>": "", + "<11,56,4>": "0", + "<11,56,5>": "0", + "<11,56,6>": "0", + "<11,56,7>": "Segoe UI", + "<11,56,8>": "8", + "<11,56,9>": "0", + "<11,56,10>": "1", + "<11,56,11>": "0", + "<11,56,12>": "", + "<11,56,13>": "0", + "<11,56,14>": "0", + "<11,56,15>": "0", + "<11,56,16>": "", + "<11,56,17>": "Standard Toolbar", + "<11,56,18>": "", + "<11,56,19>": "Auto" + }, + "<11,57>": "", + "<11,58>": "", + "<11,59>": "", + "<11,60>": "", + "<11,61>": "", + "<11,62>": "", + "<11,63>": "", + "<11,64>": "", + "<11,65>": "", + "<11,66>": "", + "<11,67>": "", + "<11,68>": "", + "<11,69>": "", + "<11,70>": "", + "<11,71>": "", + "<11,72>": "", + "<11,73>": "", + "<11,74>": "", + "<11,75>": "", + "<11,76>": "", + "<11,77>": "", + "<11,78>": "", + "<11,79>": "", + "<11,80>": "", + "<11,81>": "", + "<11,82>": "", + "<11,83>": "", + "<11,84>": "", + "<11,85>": "", + "<11,86>": "", + "<11,87>": "", + "<11,88>": "", + "<11,89>": "", + "<11,90>": "", + "<11,91>": "", + "<11,92>": "", + "<11,93>": "", + "<11,94>": "", + "<11,95>": "", + "<11,96>": "", + "<11,97>": "", + "<11,98>": "", + "<11,99>": "", + "<11,100>": "", + "<11,101>": "", + "<11,102>": "", + "<11,103>": "", + "<11,104>": "", + "<11,105>": "", + "<11,106>": "", + "<11,107>": "", + "<11,108>": "" + }, + "<12>": { + "<12,1>": "OLE_ADD_SELECTED", + "<12,2>": "", + "<12,3>": "OLECONTROL.SRPEDITOR.Button.1", + "<12,4>": "SRP_GIT_UTILITY", + "<12,5>": "496", + "<12,6>": "279", + "<12,7>": "40", + "<12,8>": "40", + "<12,9>": "SRPEDITOR.Button.1", + "<12,10>": { + "<12,10,1>": "0x50000000", + "<12,10,2>": "0x0" + }, + "<12,11>": { + "<12,11,1>": "0x0", + "<12,11,2>": "0x80000000" + }, + "<12,12>": "8", + "<12,13>": { + "<12,13,1>": "", + "<12,13,2>": "", + "<12,13,3>": "" + }, + "<12,14>": "0", + "<12,15>": { + "<12,15,1>": { + "<12,15,1,1>": "Tahoma", + "<12,15,1,2>": "-11", + "<12,15,1,3>": "400", + "<12,15,1,4>": "0", + "<12,15,1,5>": "0", + "<12,15,1,6>": "0", + "<12,15,1,7>": "0", + "<12,15,1,8>": "34", + "<12,15,1,9>": "0", + "<12,15,1,10>": "3", + "<12,15,1,11>": "2", + "<12,15,1,12>": "1", + "<12,15,1,13>": "0", + "<12,15,1,14>": "0" + } + }, + "<12,16>": "", + "<12,17>": "", + "<12,18>": { + "<12,18,1>": { + "<12,18,1,1>": "R", + "<12,18,1,2>": "EXECUTE", + "<12,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<12,18,1,4>": { + "<12,18,1,4,1>": "@PARAM1", + "<12,18,1,4,2>": "@SELF", + "<12,18,1,4,3>": "@PARAM2", + "<12,18,1,4,4>": "@PARAM3", + "<12,18,1,4,5>": "@PARAM4", + "<12,18,1,4,6>": "@PARAM5", + "<12,18,1,4,7>": "@PARAM6" + }, + "<12,18,1,5>": "", + "<12,18,1,6>": "", + "<12,18,1,7>": "", + "<12,18,1,8>": "", + "<12,18,1,9>": "", + "<12,18,1,10>": "", + "<12,18,1,11>": "", + "<12,18,1,12>": "", + "<12,18,1,13>": "", + "<12,18,1,14>": "", + "<12,18,1,15>": "STPROC" + } + }, + "<12,19>": "OLE", + "<12,20>": "", + "<12,21>": "", + "<12,22>": "", + "<12,23>": "", + "<12,24>": "", + "<12,25>": "", + "<12,26>": "", + "<12,27>": "", + "<12,28>": "", + "<12,29>": "", + "<12,30>": "", + "<12,31>": "", + "<12,32>": "", + "<12,33>": "", + "<12,34>": "", + "<12,35>": "", + "<12,36>": "0300000000000000FFFEFF064E006F0072006D0061006C0000000000FFFEFF0000000000FFFEFF225300650067006F006500200055004900FCF02D0031003100FCF0340030003000FCF03000FCF03000FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF02FEF0310000000000FFFEFF00FFFEFF105300740061006E006400610072006400200054006F006F006C00620061007200FFFEFF00FFFEFF044100750074006F00000000000000000000000000", + "<12,37>": "", + "<12,38>": "", + "<12,39>": "", + "<12,40>": "", + "<12,41>": "", + "<12,42>": "", + "<12,43>": "", + "<12,44>": "", + "<12,45>": "", + "<12,46>": "", + "<12,47>": "", + "<12,48>": "", + "<12,49>": "", + "<12,50>": "", + "<12,51>": "", + "<12,52>": "", + "<12,53>": "", + "<12,54>": "", + "<12,55>": { + "<12,55,1>": "OLE.ButtonType", + "<12,55,2>": "OLE.Cancel", + "<12,55,3>": "OLE.Caption", + "<12,55,4>": "OLE.Default", + "<12,55,5>": "OLE.FontBold", + "<12,55,6>": "OLE.FontItalic", + "<12,55,7>": "OLE.FontName", + "<12,55,8>": "OLE.FontSize", + "<12,55,9>": "OLE.FontUnderlined", + "<12,55,10>": "OLE.IconFrameCount", + "<12,55,11>": "OLE.IconHeight", + "<12,55,12>": "OLE.IconPath", + "<12,55,13>": "OLE.IconSizeToFit", + "<12,55,14>": "OLE.IconWidth", + "<12,55,15>": "OLE.State", + "<12,55,16>": "OLE.StatusBarText", + "<12,55,17>": "OLE.Style", + "<12,55,18>": "OLE.ToolTip", + "<12,55,19>": "OLE.TransparentColor" + }, + "<12,56>": { + "<12,56,1>": "Normal", + "<12,56,2>": "0", + "<12,56,3>": "", + "<12,56,4>": "0", + "<12,56,5>": "0", + "<12,56,6>": "0", + "<12,56,7>": "Segoe UI", + "<12,56,8>": "8", + "<12,56,9>": "0", + "<12,56,10>": "1", + "<12,56,11>": "0", + "<12,56,12>": "", + "<12,56,13>": "0", + "<12,56,14>": "0", + "<12,56,15>": "0", + "<12,56,16>": "", + "<12,56,17>": "Standard Toolbar", + "<12,56,18>": "", + "<12,56,19>": "Auto" + }, + "<12,57>": "", + "<12,58>": "", + "<12,59>": "", + "<12,60>": "", + "<12,61>": "", + "<12,62>": "", + "<12,63>": "", + "<12,64>": "", + "<12,65>": "", + "<12,66>": "", + "<12,67>": "", + "<12,68>": "", + "<12,69>": "", + "<12,70>": "", + "<12,71>": "", + "<12,72>": "", + "<12,73>": "", + "<12,74>": "", + "<12,75>": "", + "<12,76>": "", + "<12,77>": "", + "<12,78>": "", + "<12,79>": "", + "<12,80>": "", + "<12,81>": "", + "<12,82>": "", + "<12,83>": "", + "<12,84>": "", + "<12,85>": "", + "<12,86>": "", + "<12,87>": "", + "<12,88>": "", + "<12,89>": "", + "<12,90>": "", + "<12,91>": "", + "<12,92>": "", + "<12,93>": "", + "<12,94>": "", + "<12,95>": "", + "<12,96>": "", + "<12,97>": "", + "<12,98>": "", + "<12,99>": "", + "<12,100>": "", + "<12,101>": "", + "<12,102>": "", + "<12,103>": "", + "<12,104>": "", + "<12,105>": "", + "<12,106>": "", + "<12,107>": "", + "<12,108>": "" + }, + "<13>": { + "<13,1>": "OLE_REMOVE_SELECTED", + "<13,2>": "", + "<13,3>": "OLECONTROL.SRPEDITOR.Button.1", + "<13,4>": "SRP_GIT_UTILITY", + "<13,5>": "496", + "<13,6>": "323", + "<13,7>": "40", + "<13,8>": "40", + "<13,9>": "SRPEDITOR.Button.1", + "<13,10>": { + "<13,10,1>": "0x50000000", + "<13,10,2>": "0x0" + }, + "<13,11>": { + "<13,11,1>": "0x0", + "<13,11,2>": "0x80000000" + }, + "<13,12>": "9", + "<13,13>": { + "<13,13,1>": "", + "<13,13,2>": "", + "<13,13,3>": "" + }, + "<13,14>": "0", + "<13,15>": { + "<13,15,1>": { + "<13,15,1,1>": "Tahoma", + "<13,15,1,2>": "-11", + "<13,15,1,3>": "400", + "<13,15,1,4>": "0", + "<13,15,1,5>": "0", + "<13,15,1,6>": "0", + "<13,15,1,7>": "0", + "<13,15,1,8>": "34", + "<13,15,1,9>": "0", + "<13,15,1,10>": "3", + "<13,15,1,11>": "2", + "<13,15,1,12>": "1", + "<13,15,1,13>": "0", + "<13,15,1,14>": "0" + } + }, + "<13,16>": "", + "<13,17>": "", + "<13,18>": { + "<13,18,1>": { + "<13,18,1,1>": "R", + "<13,18,1,2>": "EXECUTE", + "<13,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<13,18,1,4>": { + "<13,18,1,4,1>": "@PARAM1", + "<13,18,1,4,2>": "@SELF", + "<13,18,1,4,3>": "@PARAM2", + "<13,18,1,4,4>": "@PARAM3", + "<13,18,1,4,5>": "@PARAM4", + "<13,18,1,4,6>": "@PARAM5", + "<13,18,1,4,7>": "@PARAM6" + }, + "<13,18,1,5>": "", + "<13,18,1,6>": "", + "<13,18,1,7>": "", + "<13,18,1,8>": "", + "<13,18,1,9>": "", + "<13,18,1,10>": "", + "<13,18,1,11>": "", + "<13,18,1,12>": "", + "<13,18,1,13>": "", + "<13,18,1,14>": "", + "<13,18,1,15>": "STPROC" + } + }, + "<13,19>": "OLE", + "<13,20>": "", + "<13,21>": "", + "<13,22>": "", + "<13,23>": "", + "<13,24>": "", + "<13,25>": "", + "<13,26>": "", + "<13,27>": "", + "<13,28>": "", + "<13,29>": "", + "<13,30>": "", + "<13,31>": "", + "<13,32>": "", + "<13,33>": "", + "<13,34>": "", + "<13,35>": "", + "<13,36>": "0300000000000000FFFEFF064E006F0072006D0061006C0000000000FFFEFF0000000000FFFEFF225300650067006F006500200055004900FCF02D0031003100FCF0340030003000FCF03000FCF03000FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF02FEF0310000000000FFFEFF00FFFEFF105300740061006E006400610072006400200054006F006F006C00620061007200FFFEFF00FFFEFF044100750074006F00000000000000000000000000", + "<13,37>": "", + "<13,38>": "", + "<13,39>": "", + "<13,40>": "", + "<13,41>": "", + "<13,42>": "", + "<13,43>": "", + "<13,44>": "", + "<13,45>": "", + "<13,46>": "", + "<13,47>": "", + "<13,48>": "", + "<13,49>": "", + "<13,50>": "", + "<13,51>": "", + "<13,52>": "", + "<13,53>": "", + "<13,54>": "", + "<13,55>": { + "<13,55,1>": "OLE.ButtonType", + "<13,55,2>": "OLE.Cancel", + "<13,55,3>": "OLE.Caption", + "<13,55,4>": "OLE.Default", + "<13,55,5>": "OLE.FontBold", + "<13,55,6>": "OLE.FontItalic", + "<13,55,7>": "OLE.FontName", + "<13,55,8>": "OLE.FontSize", + "<13,55,9>": "OLE.FontUnderlined", + "<13,55,10>": "OLE.IconFrameCount", + "<13,55,11>": "OLE.IconHeight", + "<13,55,12>": "OLE.IconPath", + "<13,55,13>": "OLE.IconSizeToFit", + "<13,55,14>": "OLE.IconWidth", + "<13,55,15>": "OLE.State", + "<13,55,16>": "OLE.StatusBarText", + "<13,55,17>": "OLE.Style", + "<13,55,18>": "OLE.ToolTip", + "<13,55,19>": "OLE.TransparentColor" + }, + "<13,56>": { + "<13,56,1>": "Normal", + "<13,56,2>": "0", + "<13,56,3>": "", + "<13,56,4>": "0", + "<13,56,5>": "0", + "<13,56,6>": "0", + "<13,56,7>": "Segoe UI", + "<13,56,8>": "8", + "<13,56,9>": "0", + "<13,56,10>": "1", + "<13,56,11>": "0", + "<13,56,12>": "", + "<13,56,13>": "0", + "<13,56,14>": "0", + "<13,56,15>": "0", + "<13,56,16>": "", + "<13,56,17>": "Standard Toolbar", + "<13,56,18>": "", + "<13,56,19>": "Auto" + }, + "<13,57>": "", + "<13,58>": "", + "<13,59>": "", + "<13,60>": "", + "<13,61>": "", + "<13,62>": "", + "<13,63>": "", + "<13,64>": "", + "<13,65>": "", + "<13,66>": "", + "<13,67>": "", + "<13,68>": "", + "<13,69>": "", + "<13,70>": "", + "<13,71>": "", + "<13,72>": "", + "<13,73>": "", + "<13,74>": "", + "<13,75>": "", + "<13,76>": "", + "<13,77>": "", + "<13,78>": "", + "<13,79>": "", + "<13,80>": "", + "<13,81>": "", + "<13,82>": "", + "<13,83>": "", + "<13,84>": "", + "<13,85>": "", + "<13,86>": "", + "<13,87>": "", + "<13,88>": "", + "<13,89>": "", + "<13,90>": "", + "<13,91>": "", + "<13,92>": "", + "<13,93>": "", + "<13,94>": "", + "<13,95>": "", + "<13,96>": "", + "<13,97>": "", + "<13,98>": "", + "<13,99>": "", + "<13,100>": "", + "<13,101>": "", + "<13,102>": "", + "<13,103>": "", + "<13,104>": "", + "<13,105>": "", + "<13,106>": "", + "<13,107>": "", + "<13,108>": "" + }, + "<14>": { + "<14,1>": "OLE_REMOVE_ALL", + "<14,2>": "", + "<14,3>": "OLECONTROL.SRPEDITOR.Button.1", + "<14,4>": "SRP_GIT_UTILITY", + "<14,5>": "496", + "<14,6>": "369", + "<14,7>": "40", + "<14,8>": "40", + "<14,9>": "SRPEDITOR.Button.1", + "<14,10>": { + "<14,10,1>": "0x50000000", + "<14,10,2>": "0x0" + }, + "<14,11>": { + "<14,11,1>": "0x0", + "<14,11,2>": "0x80000000" + }, + "<14,12>": "10", + "<14,13>": { + "<14,13,1>": "", + "<14,13,2>": "", + "<14,13,3>": "" + }, + "<14,14>": "0", + "<14,15>": { + "<14,15,1>": { + "<14,15,1,1>": "Tahoma", + "<14,15,1,2>": "-11", + "<14,15,1,3>": "400", + "<14,15,1,4>": "0", + "<14,15,1,5>": "0", + "<14,15,1,6>": "0", + "<14,15,1,7>": "0", + "<14,15,1,8>": "34", + "<14,15,1,9>": "0", + "<14,15,1,10>": "3", + "<14,15,1,11>": "2", + "<14,15,1,12>": "1", + "<14,15,1,13>": "0", + "<14,15,1,14>": "0" + } + }, + "<14,16>": "", + "<14,17>": "", + "<14,18>": { + "<14,18,1>": { + "<14,18,1,1>": "R", + "<14,18,1,2>": "EXECUTE", + "<14,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<14,18,1,4>": { + "<14,18,1,4,1>": "@PARAM1", + "<14,18,1,4,2>": "@SELF", + "<14,18,1,4,3>": "@PARAM2", + "<14,18,1,4,4>": "@PARAM3", + "<14,18,1,4,5>": "@PARAM4", + "<14,18,1,4,6>": "@PARAM5", + "<14,18,1,4,7>": "@PARAM6" + }, + "<14,18,1,5>": "", + "<14,18,1,6>": "", + "<14,18,1,7>": "", + "<14,18,1,8>": "", + "<14,18,1,9>": "", + "<14,18,1,10>": "", + "<14,18,1,11>": "", + "<14,18,1,12>": "", + "<14,18,1,13>": "", + "<14,18,1,14>": "", + "<14,18,1,15>": "STPROC" + } + }, + "<14,19>": "OLE", + "<14,20>": "", + "<14,21>": "", + "<14,22>": "", + "<14,23>": "", + "<14,24>": "", + "<14,25>": "", + "<14,26>": "", + "<14,27>": "", + "<14,28>": "", + "<14,29>": "", + "<14,30>": "", + "<14,31>": "", + "<14,32>": "", + "<14,33>": "", + "<14,34>": "", + "<14,35>": "", + "<14,36>": "0300000000000000FFFEFF064E006F0072006D0061006C0000000000FFFEFF0000000000FFFEFF225300650067006F006500200055004900FCF02D0031003100FCF0340030003000FCF03000FCF03000FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF02FEF0310000000000FFFEFF00FFFEFF105300740061006E006400610072006400200054006F006F006C00620061007200FFFEFF00FFFEFF044100750074006F00000000000000000000000000", + "<14,37>": "", + "<14,38>": "", + "<14,39>": "", + "<14,40>": "", + "<14,41>": "", + "<14,42>": "", + "<14,43>": "", + "<14,44>": "", + "<14,45>": "", + "<14,46>": "", + "<14,47>": "", + "<14,48>": "", + "<14,49>": "", + "<14,50>": "", + "<14,51>": "", + "<14,52>": "", + "<14,53>": "", + "<14,54>": "", + "<14,55>": { + "<14,55,1>": "OLE.ButtonType", + "<14,55,2>": "OLE.Cancel", + "<14,55,3>": "OLE.Caption", + "<14,55,4>": "OLE.Default", + "<14,55,5>": "OLE.FontBold", + "<14,55,6>": "OLE.FontItalic", + "<14,55,7>": "OLE.FontName", + "<14,55,8>": "OLE.FontSize", + "<14,55,9>": "OLE.FontUnderlined", + "<14,55,10>": "OLE.IconFrameCount", + "<14,55,11>": "OLE.IconHeight", + "<14,55,12>": "OLE.IconPath", + "<14,55,13>": "OLE.IconSizeToFit", + "<14,55,14>": "OLE.IconWidth", + "<14,55,15>": "OLE.State", + "<14,55,16>": "OLE.StatusBarText", + "<14,55,17>": "OLE.Style", + "<14,55,18>": "OLE.ToolTip", + "<14,55,19>": "OLE.TransparentColor" + }, + "<14,56>": { + "<14,56,1>": "Normal", + "<14,56,2>": "0", + "<14,56,3>": "", + "<14,56,4>": "0", + "<14,56,5>": "0", + "<14,56,6>": "0", + "<14,56,7>": "Segoe UI", + "<14,56,8>": "8", + "<14,56,9>": "0", + "<14,56,10>": "1", + "<14,56,11>": "0", + "<14,56,12>": "", + "<14,56,13>": "0", + "<14,56,14>": "0", + "<14,56,15>": "0", + "<14,56,16>": "", + "<14,56,17>": "Standard Toolbar", + "<14,56,18>": "", + "<14,56,19>": "Auto" + }, + "<14,57>": "", + "<14,58>": "", + "<14,59>": "", + "<14,60>": "", + "<14,61>": "", + "<14,62>": "", + "<14,63>": "", + "<14,64>": "", + "<14,65>": "", + "<14,66>": "", + "<14,67>": "", + "<14,68>": "", + "<14,69>": "", + "<14,70>": "", + "<14,71>": "", + "<14,72>": "", + "<14,73>": "", + "<14,74>": "", + "<14,75>": "", + "<14,76>": "", + "<14,77>": "", + "<14,78>": "", + "<14,79>": "", + "<14,80>": "", + "<14,81>": "", + "<14,82>": "", + "<14,83>": "", + "<14,84>": "", + "<14,85>": "", + "<14,86>": "", + "<14,87>": "", + "<14,88>": "", + "<14,89>": "", + "<14,90>": "", + "<14,91>": "", + "<14,92>": "", + "<14,93>": "", + "<14,94>": "", + "<14,95>": "", + "<14,96>": "", + "<14,97>": "", + "<14,98>": "", + "<14,99>": "", + "<14,100>": "", + "<14,101>": "", + "<14,102>": "", + "<14,103>": "", + "<14,104>": "", + "<14,105>": "", + "<14,106>": "", + "<14,107>": "", + "<14,108>": "" + }, + "<15>": { + "<15,1>": "OLE_REFRESH", + "<15,2>": "", + "<15,3>": "OLECONTROL.SRPEDITOR.Hyperlink.1", + "<15,4>": "SRP_GIT_UTILITY", + "<15,5>": "-154", + "<15,6>": "33", + "<15,7>": "40", + "<15,8>": "19", + "<15,9>": "SRPEDITOR.Hyperlink.1", + "<15,10>": { + "<15,10,1>": "0x52000000", + "<15,10,2>": "0x0" + }, + "<15,11>": { + "<15,11,1>": "0x1000", + "<15,11,2>": "0x80000000" + }, + "<15,12>": "11", + "<15,13>": { + "<15,13,1>": "", + "<15,13,2>": "", + "<15,13,3>": "" + }, + "<15,14>": "0", + "<15,15>": { + "<15,15,1>": { + "<15,15,1,1>": "Segoe UI", + "<15,15,1,2>": "-12", + "<15,15,1,3>": "400", + "<15,15,1,4>": "0", + "<15,15,1,5>": "0", + "<15,15,1,6>": "0", + "<15,15,1,7>": "0", + "<15,15,1,8>": "34", + "<15,15,1,9>": "0", + "<15,15,1,10>": "3", + "<15,15,1,11>": "2", + "<15,15,1,12>": "1", + "<15,15,1,13>": "0", + "<15,15,1,14>": "0" + } + }, + "<15,16>": "", + "<15,17>": "", + "<15,18>": { + "<15,18,1>": { + "<15,18,1,1>": "R", + "<15,18,1,2>": "EXECUTE", + "<15,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<15,18,1,4>": { + "<15,18,1,4,1>": "@PARAM1", + "<15,18,1,4,2>": "@SELF", + "<15,18,1,4,3>": "@PARAM2", + "<15,18,1,4,4>": "@PARAM3", + "<15,18,1,4,5>": "@PARAM4", + "<15,18,1,4,6>": "@PARAM5", + "<15,18,1,4,7>": "@PARAM6" + }, + "<15,18,1,5>": "", + "<15,18,1,6>": "", + "<15,18,1,7>": "", + "<15,18,1,8>": "", + "<15,18,1,9>": "", + "<15,18,1,10>": "", + "<15,18,1,11>": "", + "<15,18,1,12>": "", + "<15,18,1,13>": "", + "<15,18,1,14>": "", + "<15,18,1,15>": "STPROC" + } + }, + "<15,19>": "OLE", + "<15,20>": "", + "<15,21>": "", + "<15,22>": "", + "<15,23>": "", + "<15,24>": "", + "<15,25>": "", + "<15,26>": "", + "<15,27>": "", + "<15,28>": "", + "<15,29>": "", + "<15,30>": "", + "<15,31>": "", + "<15,32>": "", + "<15,33>": "", + "<15,34>": "", + "<15,35>": "", + "<15,36>": "0100000001000000FFFEFF225300650067006F006500200055004900FCF02D0031003500FCF0340030003000FCF03000FCF03000FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF225300650067006F006500200055004900FCF02D0031003500FCF0340030003000FCF03000FCF03100FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF044100750074006F00FFFEFF044100750074006F00FFFEFF075200650066007200650073006800FFFEFF0954006F007000FEF052006900670068007400FFFEFF00FFFEFF0557006800690074006500", + "<15,37>": "", + "<15,38>": "", + "<15,39>": "", + "<15,40>": "", + "<15,41>": "", + "<15,42>": "", + "<15,43>": "", + "<15,44>": "", + "<15,45>": "", + "<15,46>": "", + "<15,47>": "", + "<15,48>": "", + "<15,49>": "", + "<15,50>": "", + "<15,51>": "", + "<15,52>": "", + "<15,53>": "", + "<15,54>": "", + "<15,55>": { + "<15,55,1>": "OLE.Background", + "<15,55,2>": "OLE.Caption", + "<15,55,3>": "OLE.ExecuteCmd", + "<15,55,4>": "OLE.FontBold", + "<15,55,5>": "OLE.FontColor", + "<15,55,6>": "OLE.FontItalic", + "<15,55,7>": "OLE.FontName", + "<15,55,8>": "OLE.FontSize", + "<15,55,9>": "OLE.FontUnderlined", + "<15,55,10>": "OLE.HorzAlign", + "<15,55,11>": "OLE.HyperFontBold", + "<15,55,12>": "OLE.HyperFontColor", + "<15,55,13>": "OLE.HyperFontItalic", + "<15,55,14>": "OLE.HyperFontName", + "<15,55,15>": "OLE.HyperFontSize", + "<15,55,16>": "OLE.HyperFontUnderlined", + "<15,55,17>": "OLE.VertAlign" + }, + "<15,56>": { + "<15,56,1>": "White", + "<15,56,2>": "Refresh", + "<15,56,3>": "", + "<15,56,4>": "0", + "<15,56,5>": "Auto", + "<15,56,6>": "0", + "<15,56,7>": "Segoe UI", + "<15,56,8>": "9", + "<15,56,9>": "0", + "<15,56,10>": "Right", + "<15,56,11>": "0", + "<15,56,12>": "Auto", + "<15,56,13>": "0", + "<15,56,14>": "Segoe UI", + "<15,56,15>": "9", + "<15,56,16>": "1", + "<15,56,17>": "Top" + }, + "<15,57>": "", + "<15,58>": "", + "<15,59>": "", + "<15,60>": "", + "<15,61>": "", + "<15,62>": "", + "<15,63>": "", + "<15,64>": "", + "<15,65>": "", + "<15,66>": "", + "<15,67>": "", + "<15,68>": "", + "<15,69>": "", + "<15,70>": "", + "<15,71>": "", + "<15,72>": "", + "<15,73>": "", + "<15,74>": "", + "<15,75>": "", + "<15,76>": "", + "<15,77>": "", + "<15,78>": "", + "<15,79>": "", + "<15,80>": "", + "<15,81>": "", + "<15,82>": "", + "<15,83>": "", + "<15,84>": "", + "<15,85>": "", + "<15,86>": "", + "<15,87>": "", + "<15,88>": "", + "<15,89>": "", + "<15,90>": "", + "<15,91>": "", + "<15,92>": "", + "<15,93>": "", + "<15,94>": "", + "<15,95>": "", + "<15,96>": "", + "<15,97>": "", + "<15,98>": "", + "<15,99>": "", + "<15,100>": "", + "<15,101>": "", + "<15,102>": "", + "<15,103>": "", + "<15,104>": "", + "<15,105>": "", + "<15,106>": "", + "<15,107>": "", + "<15,108>": "" + }, + "<16>": { + "<16,1>": "OLE_HEADS", + "<16,2>": "", + "<16,3>": "OLECONTROL.SRPEDITOR.Hyperlink.1", + "<16,4>": "SRP_GIT_UTILITY", + "<16,5>": "-97", + "<16,6>": "33", + "<16,7>": "40", + "<16,8>": "19", + "<16,9>": "SRPEDITOR.Hyperlink.1", + "<16,10>": { + "<16,10,1>": "0x42000000", + "<16,10,2>": "0x0" + }, + "<16,11>": { + "<16,11,1>": "0x1000", + "<16,11,2>": "0x80000000" + }, + "<16,12>": "12", + "<16,13>": { + "<16,13,1>": "", + "<16,13,2>": "", + "<16,13,3>": "" + }, + "<16,14>": "0", + "<16,15>": { + "<16,15,1>": { + "<16,15,1,1>": "Segoe UI", + "<16,15,1,2>": "-12", + "<16,15,1,3>": "400", + "<16,15,1,4>": "0", + "<16,15,1,5>": "0", + "<16,15,1,6>": "0", + "<16,15,1,7>": "0", + "<16,15,1,8>": "34", + "<16,15,1,9>": "0", + "<16,15,1,10>": "3", + "<16,15,1,11>": "2", + "<16,15,1,12>": "1", + "<16,15,1,13>": "0", + "<16,15,1,14>": "0" + } + }, + "<16,16>": "", + "<16,17>": "", + "<16,18>": { + "<16,18,1>": { + "<16,18,1,1>": "R", + "<16,18,1,2>": "EXECUTE", + "<16,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<16,18,1,4>": { + "<16,18,1,4,1>": "@PARAM1", + "<16,18,1,4,2>": "@SELF", + "<16,18,1,4,3>": "@PARAM2", + "<16,18,1,4,4>": "@PARAM3", + "<16,18,1,4,5>": "@PARAM4", + "<16,18,1,4,6>": "@PARAM5", + "<16,18,1,4,7>": "@PARAM6" + }, + "<16,18,1,5>": "", + "<16,18,1,6>": "", + "<16,18,1,7>": "", + "<16,18,1,8>": "", + "<16,18,1,9>": "", + "<16,18,1,10>": "", + "<16,18,1,11>": "", + "<16,18,1,12>": "", + "<16,18,1,13>": "", + "<16,18,1,14>": "", + "<16,18,1,15>": "STPROC" + } + }, + "<16,19>": "OLE", + "<16,20>": "", + "<16,21>": "", + "<16,22>": "", + "<16,23>": "", + "<16,24>": "", + "<16,25>": "", + "<16,26>": "", + "<16,27>": "", + "<16,28>": "", + "<16,29>": "", + "<16,30>": "", + "<16,31>": "", + "<16,32>": "", + "<16,33>": "", + "<16,34>": "", + "<16,35>": "", + "<16,36>": "0100000001000000FFFEFF225300650067006F006500200055004900FCF02D0031003500FCF0340030003000FCF03000FCF03000FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF225300650067006F006500200055004900FCF02D0031003500FCF0340030003000FCF03000FCF03100FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF044100750074006F00FFFEFF044100750074006F00FFFEFF0841006C006C0020005200650066007300FFFEFF0A54006F007000FEF0430065006E00740065007200FFFEFF00FFFEFF0557006800690074006500", + "<16,37>": "", + "<16,38>": "", + "<16,39>": "", + "<16,40>": "", + "<16,41>": "", + "<16,42>": "", + "<16,43>": "", + "<16,44>": "", + "<16,45>": "", + "<16,46>": "", + "<16,47>": "", + "<16,48>": "", + "<16,49>": "", + "<16,50>": "", + "<16,51>": "", + "<16,52>": "", + "<16,53>": "", + "<16,54>": "", + "<16,55>": { + "<16,55,1>": "OLE.Background", + "<16,55,2>": "OLE.Caption", + "<16,55,3>": "OLE.ExecuteCmd", + "<16,55,4>": "OLE.FontBold", + "<16,55,5>": "OLE.FontColor", + "<16,55,6>": "OLE.FontItalic", + "<16,55,7>": "OLE.FontName", + "<16,55,8>": "OLE.FontSize", + "<16,55,9>": "OLE.FontUnderlined", + "<16,55,10>": "OLE.HorzAlign", + "<16,55,11>": "OLE.HyperFontBold", + "<16,55,12>": "OLE.HyperFontColor", + "<16,55,13>": "OLE.HyperFontItalic", + "<16,55,14>": "OLE.HyperFontName", + "<16,55,15>": "OLE.HyperFontSize", + "<16,55,16>": "OLE.HyperFontUnderlined", + "<16,55,17>": "OLE.VertAlign" + }, + "<16,56>": { + "<16,56,1>": "White", + "<16,56,2>": "All Refs", + "<16,56,3>": "", + "<16,56,4>": "0", + "<16,56,5>": "Auto", + "<16,56,6>": "0", + "<16,56,7>": "Segoe UI", + "<16,56,8>": "9", + "<16,56,9>": "0", + "<16,56,10>": "Center", + "<16,56,11>": "0", + "<16,56,12>": "Auto", + "<16,56,13>": "0", + "<16,56,14>": "Segoe UI", + "<16,56,15>": "9", + "<16,56,16>": "1", + "<16,56,17>": "Top" + }, + "<16,57>": "", + "<16,58>": "", + "<16,59>": "", + "<16,60>": "", + "<16,61>": "", + "<16,62>": "", + "<16,63>": "", + "<16,64>": "", + "<16,65>": "", + "<16,66>": "", + "<16,67>": "", + "<16,68>": "", + "<16,69>": "", + "<16,70>": "", + "<16,71>": "", + "<16,72>": "", + "<16,73>": "", + "<16,74>": "", + "<16,75>": "", + "<16,76>": "", + "<16,77>": "", + "<16,78>": "", + "<16,79>": "", + "<16,80>": "", + "<16,81>": "", + "<16,82>": "", + "<16,83>": "", + "<16,84>": "", + "<16,85>": "", + "<16,86>": "", + "<16,87>": "", + "<16,88>": "", + "<16,89>": "", + "<16,90>": "", + "<16,91>": "", + "<16,92>": "", + "<16,93>": "", + "<16,94>": "", + "<16,95>": "", + "<16,96>": "", + "<16,97>": "", + "<16,98>": "", + "<16,99>": "", + "<16,100>": "", + "<16,101>": "", + "<16,102>": "", + "<16,103>": "", + "<16,104>": "", + "<16,105>": "", + "<16,106>": "", + "<16,107>": "", + "<16,108>": "" + }, + "<17>": { + "<17,1>": "OLE_MANUAL", + "<17,2>": "", + "<17,3>": "OLECONTROL.SRPEDITOR.Hyperlink.1", + "<17,4>": "SRP_GIT_UTILITY", + "<17,5>": "-55", + "<17,6>": "33", + "<17,7>": "40", + "<17,8>": "19", + "<17,9>": "SRPEDITOR.Hyperlink.1", + "<17,10>": { + "<17,10,1>": "0x52000000", + "<17,10,2>": "0x0" + }, + "<17,11>": { + "<17,11,1>": "0x1000", + "<17,11,2>": "0x80000000" + }, + "<17,12>": "13", + "<17,13>": { + "<17,13,1>": "", + "<17,13,2>": "", + "<17,13,3>": "" + }, + "<17,14>": "0", + "<17,15>": { + "<17,15,1>": { + "<17,15,1,1>": "Segoe UI", + "<17,15,1,2>": "-12", + "<17,15,1,3>": "400", + "<17,15,1,4>": "0", + "<17,15,1,5>": "0", + "<17,15,1,6>": "0", + "<17,15,1,7>": "0", + "<17,15,1,8>": "34", + "<17,15,1,9>": "0", + "<17,15,1,10>": "3", + "<17,15,1,11>": "2", + "<17,15,1,12>": "1", + "<17,15,1,13>": "0", + "<17,15,1,14>": "0" + } + }, + "<17,16>": "", + "<17,17>": "", + "<17,18>": { + "<17,18,1>": { + "<17,18,1,1>": "R", + "<17,18,1,2>": "EXECUTE", + "<17,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<17,18,1,4>": { + "<17,18,1,4,1>": "@PARAM1", + "<17,18,1,4,2>": "@SELF", + "<17,18,1,4,3>": "@PARAM2", + "<17,18,1,4,4>": "@PARAM3", + "<17,18,1,4,5>": "@PARAM4", + "<17,18,1,4,6>": "@PARAM5", + "<17,18,1,4,7>": "@PARAM6" + }, + "<17,18,1,5>": "", + "<17,18,1,6>": "", + "<17,18,1,7>": "", + "<17,18,1,8>": "", + "<17,18,1,9>": "", + "<17,18,1,10>": "", + "<17,18,1,11>": "", + "<17,18,1,12>": "", + "<17,18,1,13>": "", + "<17,18,1,14>": "", + "<17,18,1,15>": "STPROC" + } + }, + "<17,19>": "OLE", + "<17,20>": "", + "<17,21>": "", + "<17,22>": "", + "<17,23>": "", + "<17,24>": "", + "<17,25>": "", + "<17,26>": "", + "<17,27>": "", + "<17,28>": "", + "<17,29>": "", + "<17,30>": "", + "<17,31>": "", + "<17,32>": "", + "<17,33>": "", + "<17,34>": "", + "<17,35>": "", + "<17,36>": "0100000001000000FFFEFF225300650067006F006500200055004900FCF02D0031003500FCF0340030003000FCF03000FCF03000FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF225300650067006F006500200055004900FCF02D0031003500FCF0340030003000FCF03000FCF03100FCF03000FCF03100FCF03000FCF03000FCF03000FCF03000FCF03000FFFEFF044100750074006F00FFFEFF044100750074006F00FFFEFF064D0061006E00750061006C00FFFEFF0954006F007000FEF052006900670068007400FFFEFF00FFFEFF0557006800690074006500", + "<17,37>": "", + "<17,38>": "", + "<17,39>": "", + "<17,40>": "", + "<17,41>": "", + "<17,42>": "", + "<17,43>": "", + "<17,44>": "", + "<17,45>": "", + "<17,46>": "", + "<17,47>": "", + "<17,48>": "", + "<17,49>": "", + "<17,50>": "", + "<17,51>": "", + "<17,52>": "", + "<17,53>": "", + "<17,54>": "", + "<17,55>": { + "<17,55,1>": "OLE.Background", + "<17,55,2>": "OLE.Caption", + "<17,55,3>": "OLE.ExecuteCmd", + "<17,55,4>": "OLE.FontBold", + "<17,55,5>": "OLE.FontColor", + "<17,55,6>": "OLE.FontItalic", + "<17,55,7>": "OLE.FontName", + "<17,55,8>": "OLE.FontSize", + "<17,55,9>": "OLE.FontUnderlined", + "<17,55,10>": "OLE.HorzAlign", + "<17,55,11>": "OLE.HyperFontBold", + "<17,55,12>": "OLE.HyperFontColor", + "<17,55,13>": "OLE.HyperFontItalic", + "<17,55,14>": "OLE.HyperFontName", + "<17,55,15>": "OLE.HyperFontSize", + "<17,55,16>": "OLE.HyperFontUnderlined", + "<17,55,17>": "OLE.VertAlign" + }, + "<17,56>": { + "<17,56,1>": "White", + "<17,56,2>": "Manual", + "<17,56,3>": "", + "<17,56,4>": "0", + "<17,56,5>": "Auto", + "<17,56,6>": "0", + "<17,56,7>": "Segoe UI", + "<17,56,8>": "9", + "<17,56,9>": "0", + "<17,56,10>": "Right", + "<17,56,11>": "0", + "<17,56,12>": "Auto", + "<17,56,13>": "0", + "<17,56,14>": "Segoe UI", + "<17,56,15>": "9", + "<17,56,16>": "1", + "<17,56,17>": "Top" + }, + "<17,57>": "", + "<17,58>": "", + "<17,59>": "", + "<17,60>": "", + "<17,61>": "", + "<17,62>": "", + "<17,63>": "", + "<17,64>": "", + "<17,65>": "", + "<17,66>": "", + "<17,67>": "", + "<17,68>": "", + "<17,69>": "", + "<17,70>": "", + "<17,71>": "", + "<17,72>": "", + "<17,73>": "", + "<17,74>": "", + "<17,75>": "", + "<17,76>": "", + "<17,77>": "", + "<17,78>": "", + "<17,79>": "", + "<17,80>": "", + "<17,81>": "", + "<17,82>": "", + "<17,83>": "", + "<17,84>": "", + "<17,85>": "", + "<17,86>": "", + "<17,87>": "", + "<17,88>": "", + "<17,89>": "", + "<17,90>": "", + "<17,91>": "", + "<17,92>": "", + "<17,93>": "", + "<17,94>": "", + "<17,95>": "", + "<17,96>": "", + "<17,97>": "", + "<17,98>": "", + "<17,99>": "", + "<17,100>": "", + "<17,101>": "", + "<17,102>": "", + "<17,103>": "", + "<17,104>": "", + "<17,105>": "", + "<17,106>": "", + "<17,107>": "", + "<17,108>": "" + }, + "<18>": { + "<18,1>": "STA_FROM_COMMIT", + "<18,2>": "", + "<18,3>": "STATIC", + "<18,4>": "SRP_GIT_UTILITY", + "<18,5>": "556", + "<18,6>": "56", + "<18,7>": "50", + "<18,8>": "20", + "<18,9>": "Last Pull:", + "<18,10>": { + "<18,10,1>": "0x50000000", + "<18,10,2>": "0x0" + }, + "<18,11>": { + "<18,11,1>": "0x0", + "<18,11,2>": "0x80000000" + }, + "<18,12>": "27", + "<18,13>": { + "<18,13,1>": "16777215", + "<18,13,2>": "-2", + "<18,13,3>": "99" + }, + "<18,14>": "0", + "<18,15>": { + "<18,15,1>": { + "<18,15,1,1>": "Segoe UI Semilight", + "<18,15,1,2>": "-13", + "<18,15,1,3>": "400", + "<18,15,1,4>": "0", + "<18,15,1,5>": "0", + "<18,15,1,6>": "0", + "<18,15,1,7>": "0", + "<18,15,1,8>": "34", + "<18,15,1,9>": "0", + "<18,15,1,10>": "3", + "<18,15,1,11>": "2", + "<18,15,1,12>": "1", + "<18,15,1,13>": "0", + "<18,15,1,14>": "0" + } + }, + "<18,16>": "", + "<18,17>": "", + "<18,18>": "", + "<18,19>": "", + "<18,20>": "", + "<18,21>": "", + "<18,22>": "", + "<18,23>": "", + "<18,24>": "", + "<18,25>": "", + "<18,26>": "", + "<18,27>": "", + "<18,28>": "<>", + "<18,29>": "<>", + "<18,30>": "", + "<18,31>": "", + "<18,32>": "", + "<18,33>": "", + "<18,34>": "", + "<18,35>": "", + "<18,36>": "", + "<18,37>": "", + "<18,38>": "", + "<18,39>": "", + "<18,40>": "", + "<18,41>": "", + "<18,42>": "", + "<18,43>": "", + "<18,44>": "", + "<18,45>": "", + "<18,46>": "", + "<18,47>": "", + "<18,48>": "", + "<18,49>": "", + "<18,50>": "", + "<18,51>": "", + "<18,52>": "", + "<18,53>": "", + "<18,54>": "", + "<18,55>": "", + "<18,56>": "", + "<18,57>": "", + "<18,58>": "", + "<18,59>": "", + "<18,60>": "", + "<18,61>": "", + "<18,62>": "0", + "<18,63>": { + "<18,63,1>": "", + "<18,63,2>": "", + "<18,63,3>": "", + "<18,63,4>": "", + "<18,63,5>": "", + "<18,63,6>": "", + "<18,63,7>": "", + "<18,63,8>": "" + }, + "<18,64>": { + "<18,64,1>": "", + "<18,64,2>": "", + "<18,64,3>": "" + }, + "<18,65>": "-2", + "<18,66>": "", + "<18,67>": "", + "<18,68>": "", + "<18,69>": "", + "<18,70>": "", + "<18,71>": "", + "<18,72>": "", + "<18,73>": "", + "<18,74>": "", + "<18,75>": "", + "<18,76>": "", + "<18,77>": "", + "<18,78>": "", + "<18,79>": "", + "<18,80>": "", + "<18,81>": "", + "<18,82>": "", + "<18,83>": "", + "<18,84>": "", + "<18,85>": "", + "<18,86>": "", + "<18,87>": "", + "<18,88>": "", + "<18,89>": "", + "<18,90>": "0", + "<18,91>": "0", + "<18,92>": "", + "<18,93>": "", + "<18,94>": "", + "<18,95>": "", + "<18,96>": "", + "<18,97>": "", + "<18,98>": "", + "<18,99>": "", + "<18,100>": "", + "<18,101>": "", + "<18,102>": "", + "<18,103>": "", + "<18,104>": "", + "<18,105>": "", + "<18,106>": "", + "<18,107>": "", + "<18,108>": "" + }, + "<19>": { + "<19,1>": "EDL_FROM_COMMIT", + "<19,2>": "", + "<19,3>": "EDITFIELD", + "<19,4>": "SRP_GIT_UTILITY", + "<19,5>": "614", + "<19,6>": "52", + "<19,7>": "-15", + "<19,8>": "25", + "<19,9>": "", + "<19,10>": { + "<19,10,1>": "0x50000880", + "<19,10,2>": "0x200" + }, + "<19,11>": { + "<19,11,1>": "0x4000", + "<19,11,2>": "0x80000000" + }, + "<19,12>": "14", + "<19,13>": { + "<19,13,1>": "", + "<19,13,2>": "", + "<19,13,3>": "" + }, + "<19,14>": "0", + "<19,15>": { + "<19,15,1>": { + "<19,15,1,1>": "Segoe UI Semilight", + "<19,15,1,2>": "-13", + "<19,15,1,3>": "400", + "<19,15,1,4>": "0", + "<19,15,1,5>": "0", + "<19,15,1,6>": "0", + "<19,15,1,7>": "0", + "<19,15,1,8>": "34", + "<19,15,1,9>": "0", + "<19,15,1,10>": "3", + "<19,15,1,11>": "2", + "<19,15,1,12>": "1", + "<19,15,1,13>": "0", + "<19,15,1,14>": "0" + } + }, + "<19,16>": "", + "<19,17>": "", + "<19,18>": "", + "<19,19>": "", + "<19,20>": "", + "<19,21>": "", + "<19,22>": "", + "<19,23>": "", + "<19,24>": "", + "<19,25>": "", + "<19,26>": "", + "<19,27>": "", + "<19,28>": "<>", + "<19,29>": "<>", + "<19,30>": "<>", + "<19,31>": "0", + "<19,32>": "", + "<19,33>": "", + "<19,34>": "", + "<19,35>": "", + "<19,36>": { + "<19,36,1>": "0", + "<19,36,2>": "0" + }, + "<19,37>": "", + "<19,38>": "", + "<19,39>": "", + "<19,40>": "", + "<19,41>": "", + "<19,42>": "", + "<19,43>": "", + "<19,44>": "", + "<19,45>": "", + "<19,46>": "", + "<19,47>": "", + "<19,48>": "", + "<19,49>": "", + "<19,50>": "", + "<19,51>": "", + "<19,52>": "", + "<19,53>": "", + "<19,54>": "", + "<19,55>": "", + "<19,56>": "", + "<19,57>": "", + "<19,58>": "", + "<19,59>": "", + "<19,60>": "", + "<19,61>": "", + "<19,62>": "0", + "<19,63>": "", + "<19,64>": "", + "<19,65>": "", + "<19,66>": "", + "<19,67>": "", + "<19,68>": "", + "<19,69>": "", + "<19,70>": "", + "<19,71>": "", + "<19,72>": "", + "<19,73>": "", + "<19,74>": "", + "<19,75>": "", + "<19,76>": "", + "<19,77>": "", + "<19,78>": "", + "<19,79>": "", + "<19,80>": "", + "<19,81>": "", + "<19,82>": "", + "<19,83>": "", + "<19,84>": "", + "<19,85>": "", + "<19,86>": "", + "<19,87>": "", + "<19,88>": "", + "<19,89>": "", + "<19,90>": "", + "<19,91>": "", + "<19,92>": "", + "<19,93>": "", + "<19,94>": "", + "<19,95>": "", + "<19,96>": "", + "<19,97>": "", + "<19,98>": "", + "<19,99>": "", + "<19,100>": "", + "<19,101>": "", + "<19,102>": "", + "<19,103>": "", + "<19,104>": "", + "<19,105>": "", + "<19,106>": "", + "<19,107>": "", + "<19,108>": "" + }, + "<20>": { + "<20,1>": "STA_TO_COMMIT", + "<20,2>": "", + "<20,3>": "STATIC", + "<20,4>": "SRP_GIT_UTILITY", + "<20,5>": "556", + "<20,6>": "96", + "<20,7>": "50", + "<20,8>": "20", + "<20,9>": "Current:", + "<20,10>": { + "<20,10,1>": "0x50000000", + "<20,10,2>": "0x0" + }, + "<20,11>": { + "<20,11,1>": "0x0", + "<20,11,2>": "0x80000000" + }, + "<20,12>": "28", + "<20,13>": { + "<20,13,1>": "16777215", + "<20,13,2>": "-2", + "<20,13,3>": "99" + }, + "<20,14>": "0", + "<20,15>": { + "<20,15,1>": { + "<20,15,1,1>": "Segoe UI Semilight", + "<20,15,1,2>": "-13", + "<20,15,1,3>": "400", + "<20,15,1,4>": "0", + "<20,15,1,5>": "0", + "<20,15,1,6>": "0", + "<20,15,1,7>": "0", + "<20,15,1,8>": "34", + "<20,15,1,9>": "0", + "<20,15,1,10>": "3", + "<20,15,1,11>": "2", + "<20,15,1,12>": "1", + "<20,15,1,13>": "0", + "<20,15,1,14>": "0" + } + }, + "<20,16>": "", + "<20,17>": "", + "<20,18>": "", + "<20,19>": "", + "<20,20>": "", + "<20,21>": "", + "<20,22>": "", + "<20,23>": "", + "<20,24>": "", + "<20,25>": "", + "<20,26>": "", + "<20,27>": "", + "<20,28>": "<>", + "<20,29>": "<>", + "<20,30>": "", + "<20,31>": "", + "<20,32>": "", + "<20,33>": "", + "<20,34>": "", + "<20,35>": "", + "<20,36>": "", + "<20,37>": "", + "<20,38>": "", + "<20,39>": "", + "<20,40>": "", + "<20,41>": "", + "<20,42>": "", + "<20,43>": "", + "<20,44>": "", + "<20,45>": "", + "<20,46>": "", + "<20,47>": "", + "<20,48>": "", + "<20,49>": "", + "<20,50>": "", + "<20,51>": "", + "<20,52>": "", + "<20,53>": "", + "<20,54>": "", + "<20,55>": "", + "<20,56>": "", + "<20,57>": "", + "<20,58>": "", + "<20,59>": "", + "<20,60>": "", + "<20,61>": "", + "<20,62>": "0", + "<20,63>": { + "<20,63,1>": "", + "<20,63,2>": "", + "<20,63,3>": "", + "<20,63,4>": "", + "<20,63,5>": "", + "<20,63,6>": "", + "<20,63,7>": "", + "<20,63,8>": "" + }, + "<20,64>": { + "<20,64,1>": "", + "<20,64,2>": "", + "<20,64,3>": "" + }, + "<20,65>": "-2", + "<20,66>": "", + "<20,67>": "", + "<20,68>": "", + "<20,69>": "", + "<20,70>": "", + "<20,71>": "", + "<20,72>": "", + "<20,73>": "", + "<20,74>": "", + "<20,75>": "", + "<20,76>": "", + "<20,77>": "", + "<20,78>": "", + "<20,79>": "", + "<20,80>": "", + "<20,81>": "", + "<20,82>": "", + "<20,83>": "", + "<20,84>": "", + "<20,85>": "", + "<20,86>": "", + "<20,87>": "", + "<20,88>": "", + "<20,89>": "", + "<20,90>": "0", + "<20,91>": "0", + "<20,92>": "", + "<20,93>": "", + "<20,94>": "", + "<20,95>": "", + "<20,96>": "", + "<20,97>": "", + "<20,98>": "", + "<20,99>": "", + "<20,100>": "", + "<20,101>": "", + "<20,102>": "", + "<20,103>": "", + "<20,104>": "", + "<20,105>": "", + "<20,106>": "", + "<20,107>": "", + "<20,108>": "" + }, + "<21>": { + "<21,1>": "EDL_TO_COMMIT", + "<21,2>": "", + "<21,3>": "EDITFIELD", + "<21,4>": "SRP_GIT_UTILITY", + "<21,5>": "614", + "<21,6>": "93", + "<21,7>": "-15", + "<21,8>": "25", + "<21,9>": "", + "<21,10>": { + "<21,10,1>": "0x50000880", + "<21,10,2>": "0x200" + }, + "<21,11>": { + "<21,11,1>": "0x4000", + "<21,11,2>": "0x80000000" + }, + "<21,12>": "15", + "<21,13>": { + "<21,13,1>": "", + "<21,13,2>": "", + "<21,13,3>": "" + }, + "<21,14>": "0", + "<21,15>": { + "<21,15,1>": { + "<21,15,1,1>": "Segoe UI Semilight", + "<21,15,1,2>": "-13", + "<21,15,1,3>": "400", + "<21,15,1,4>": "0", + "<21,15,1,5>": "0", + "<21,15,1,6>": "0", + "<21,15,1,7>": "0", + "<21,15,1,8>": "34", + "<21,15,1,9>": "0", + "<21,15,1,10>": "3", + "<21,15,1,11>": "2", + "<21,15,1,12>": "1", + "<21,15,1,13>": "0", + "<21,15,1,14>": "0" + } + }, + "<21,16>": "", + "<21,17>": "", + "<21,18>": "", + "<21,19>": "", + "<21,20>": "", + "<21,21>": "", + "<21,22>": "", + "<21,23>": "", + "<21,24>": "", + "<21,25>": "", + "<21,26>": "", + "<21,27>": "", + "<21,28>": "<>", + "<21,29>": "<>", + "<21,30>": "<>", + "<21,31>": "0", + "<21,32>": "", + "<21,33>": "", + "<21,34>": "", + "<21,35>": "", + "<21,36>": { + "<21,36,1>": "0", + "<21,36,2>": "0" + }, + "<21,37>": "", + "<21,38>": "", + "<21,39>": "", + "<21,40>": "", + "<21,41>": "", + "<21,42>": "", + "<21,43>": "", + "<21,44>": "", + "<21,45>": "", + "<21,46>": "", + "<21,47>": "", + "<21,48>": "", + "<21,49>": "", + "<21,50>": "", + "<21,51>": "", + "<21,52>": "", + "<21,53>": "", + "<21,54>": "", + "<21,55>": "", + "<21,56>": "", + "<21,57>": "", + "<21,58>": "", + "<21,59>": "", + "<21,60>": "", + "<21,61>": "", + "<21,62>": "0", + "<21,63>": "", + "<21,64>": "", + "<21,65>": "", + "<21,66>": "", + "<21,67>": "", + "<21,68>": "", + "<21,69>": "", + "<21,70>": "", + "<21,71>": "", + "<21,72>": "", + "<21,73>": "", + "<21,74>": "", + "<21,75>": "", + "<21,76>": "", + "<21,77>": "", + "<21,78>": "", + "<21,79>": "", + "<21,80>": "", + "<21,81>": "", + "<21,82>": "", + "<21,83>": "", + "<21,84>": "", + "<21,85>": "", + "<21,86>": "", + "<21,87>": "", + "<21,88>": "", + "<21,89>": "", + "<21,90>": "", + "<21,91>": "", + "<21,92>": "", + "<21,93>": "", + "<21,94>": "", + "<21,95>": "", + "<21,96>": "", + "<21,97>": "", + "<21,98>": "", + "<21,99>": "", + "<21,100>": "", + "<21,101>": "", + "<21,102>": "", + "<21,103>": "", + "<21,104>": "", + "<21,105>": "", + "<21,106>": "", + "<21,107>": "", + "<21,108>": "" + }, + "<22>": { + "<22,1>": "STA_STAGE", + "<22,2>": "", + "<22,3>": "STATIC", + "<22,4>": "SRP_GIT_UTILITY", + "<22,5>": "556", + "<22,6>": "127", + "<22,7>": "-195", + "<22,8>": "27", + "<22,9>": "Entities", + "<22,10>": { + "<22,10,1>": "0x50000000", + "<22,10,2>": "0x0" + }, + "<22,11>": { + "<22,11,1>": "0x4000", + "<22,11,2>": "0x80000000" + }, + "<22,12>": "29", + "<22,13>": { + "<22,13,1>": "16777215", + "<22,13,2>": "-2", + "<22,13,3>": "99" + }, + "<22,14>": "0", + "<22,15>": { + "<22,15,1>": { + "<22,15,1,1>": "Segoe UI Semilight", + "<22,15,1,2>": "-19", + "<22,15,1,3>": "400", + "<22,15,1,4>": "0", + "<22,15,1,5>": "0", + "<22,15,1,6>": "0", + "<22,15,1,7>": "0", + "<22,15,1,8>": "34", + "<22,15,1,9>": "0", + "<22,15,1,10>": "3", + "<22,15,1,11>": "2", + "<22,15,1,12>": "1", + "<22,15,1,13>": "0", + "<22,15,1,14>": "0" + } + }, + "<22,16>": "", + "<22,17>": "", + "<22,18>": "", + "<22,19>": "", + "<22,20>": "", + "<22,21>": "", + "<22,22>": "", + "<22,23>": "", + "<22,24>": "", + "<22,25>": "", + "<22,26>": "", + "<22,27>": "", + "<22,28>": "<>", + "<22,29>": "<>", + "<22,30>": "", + "<22,31>": "", + "<22,32>": "", + "<22,33>": "", + "<22,34>": "", + "<22,35>": "", + "<22,36>": "", + "<22,37>": "", + "<22,38>": "", + "<22,39>": "", + "<22,40>": "", + "<22,41>": "", + "<22,42>": "", + "<22,43>": "", + "<22,44>": "", + "<22,45>": "", + "<22,46>": "", + "<22,47>": "", + "<22,48>": "", + "<22,49>": "", + "<22,50>": "", + "<22,51>": "", + "<22,52>": "", + "<22,53>": "", + "<22,54>": "", + "<22,55>": "", + "<22,56>": "", + "<22,57>": "", + "<22,58>": "", + "<22,59>": "", + "<22,60>": "", + "<22,61>": "", + "<22,62>": "0", + "<22,63>": { + "<22,63,1>": "", + "<22,63,2>": "", + "<22,63,3>": "", + "<22,63,4>": "", + "<22,63,5>": "", + "<22,63,6>": "", + "<22,63,7>": "", + "<22,63,8>": "" + }, + "<22,64>": { + "<22,64,1>": "", + "<22,64,2>": "", + "<22,64,3>": "" + }, + "<22,65>": "-2", + "<22,66>": "", + "<22,67>": "", + "<22,68>": "", + "<22,69>": "", + "<22,70>": "", + "<22,71>": "", + "<22,72>": "", + "<22,73>": "", + "<22,74>": "", + "<22,75>": "", + "<22,76>": "", + "<22,77>": "", + "<22,78>": "", + "<22,79>": "", + "<22,80>": "", + "<22,81>": "", + "<22,82>": "", + "<22,83>": "", + "<22,84>": "", + "<22,85>": "", + "<22,86>": "", + "<22,87>": "", + "<22,88>": "", + "<22,89>": "", + "<22,90>": "0", + "<22,91>": "0", + "<22,92>": "", + "<22,93>": "", + "<22,94>": "", + "<22,95>": "", + "<22,96>": "", + "<22,97>": "", + "<22,98>": "", + "<22,99>": "", + "<22,100>": "", + "<22,101>": "", + "<22,102>": "", + "<22,103>": "", + "<22,104>": "", + "<22,105>": "", + "<22,106>": "", + "<22,107>": "", + "<22,108>": "" + }, + "<23>": { + "<23,1>": "OLE_RPT_STAGE", + "<23,2>": "", + "<23,3>": "OLECONTROL.SRPEDITOR.ReportTable.1", + "<23,4>": "SRP_GIT_UTILITY", + "<23,5>": "555", + "<23,6>": "156", + "<23,7>": "-16", + "<23,8>": "-51", + "<23,9>": "SRPEDITOR.ReportTable.1", + "<23,10>": { + "<23,10,1>": "0x50000000", + "<23,10,2>": "0x0" + }, + "<23,11>": { + "<23,11,1>": "0xC000", + "<23,11,2>": "0x80000000" + }, + "<23,12>": "16", + "<23,13>": { + "<23,13,1>": "", + "<23,13,2>": "", + "<23,13,3>": "" + }, + "<23,14>": "0", + "<23,15>": { + "<23,15,1>": { + "<23,15,1,1>": "Tahoma", + "<23,15,1,2>": "-11", + "<23,15,1,3>": "400", + "<23,15,1,4>": "0", + "<23,15,1,5>": "0", + "<23,15,1,6>": "0", + "<23,15,1,7>": "0", + "<23,15,1,8>": "34", + "<23,15,1,9>": "0", + "<23,15,1,10>": "3", + "<23,15,1,11>": "2", + "<23,15,1,12>": "1", + "<23,15,1,13>": "0", + "<23,15,1,14>": "0" + } + }, + "<23,16>": "", + "<23,17>": "", + "<23,18>": { + "<23,18,1>": { + "<23,18,1,1>": "R", + "<23,18,1,2>": "EXECUTE", + "<23,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<23,18,1,4>": { + "<23,18,1,4,1>": "@PARAM1", + "<23,18,1,4,2>": "@SELF", + "<23,18,1,4,3>": "@PARAM2", + "<23,18,1,4,4>": "@PARAM3", + "<23,18,1,4,5>": "@PARAM4", + "<23,18,1,4,6>": "@PARAM5", + "<23,18,1,4,7>": "@PARAM6" + }, + "<23,18,1,5>": "", + "<23,18,1,6>": "", + "<23,18,1,7>": "", + "<23,18,1,8>": "", + "<23,18,1,9>": "", + "<23,18,1,10>": "", + "<23,18,1,11>": "", + "<23,18,1,12>": "", + "<23,18,1,13>": "", + "<23,18,1,14>": "", + "<23,18,1,15>": "STPROC" + } + }, + "<23,19>": "OLE", + "<23,20>": "", + "<23,21>": "", + "<23,22>": "", + "<23,23>": "", + "<23,24>": "", + "<23,25>": "", + "<23,26>": "", + "<23,27>": "", + "<23,28>": "", + "<23,29>": "", + "<23,30>": "", + "<23,31>": "", + "<23,32>": "", + "<23,33>": "", + "<23,34>": "", + "<23,35>": "", + "<23,36>": "00000100B02700006B1F000000000000", + "<23,37>": "", + "<23,38>": "", + "<23,39>": "", + "<23,40>": "", + "<23,41>": "", + "<23,42>": "", + "<23,43>": "", + "<23,44>": "", + "<23,45>": "", + "<23,46>": "", + "<23,47>": "", + "<23,48>": "", + "<23,49>": "", + "<23,50>": "", + "<23,51>": "", + "<23,52>": "", + "<23,53>": "", + "<23,54>": "", + "<23,55>": "OLE.Border", + "<23,56>": "XP", + "<23,57>": "", + "<23,58>": "", + "<23,59>": "", + "<23,60>": "", + "<23,61>": "", + "<23,62>": "", + "<23,63>": "", + "<23,64>": "", + "<23,65>": "", + "<23,66>": "", + "<23,67>": "", + "<23,68>": "", + "<23,69>": "", + "<23,70>": "", + "<23,71>": "", + "<23,72>": "", + "<23,73>": "", + "<23,74>": "", + "<23,75>": "", + "<23,76>": "", + "<23,77>": "", + "<23,78>": "", + "<23,79>": "", + "<23,80>": "", + "<23,81>": "", + "<23,82>": "", + "<23,83>": "", + "<23,84>": "", + "<23,85>": "", + "<23,86>": "", + "<23,87>": "", + "<23,88>": "", + "<23,89>": "", + "<23,90>": "", + "<23,91>": "", + "<23,92>": "", + "<23,93>": "", + "<23,94>": "", + "<23,95>": "", + "<23,96>": "", + "<23,97>": "", + "<23,98>": "", + "<23,99>": "", + "<23,100>": "", + "<23,101>": "", + "<23,102>": "", + "<23,103>": "", + "<23,104>": "", + "<23,105>": "", + "<23,106>": "", + "<23,107>": "", + "<23,108>": "" + }, + "<24>": { + "<24,1>": "PUB_APPLY", + "<24,2>": "", + "<24,3>": "PUSHBUTTON", + "<24,4>": "SRP_GIT_UTILITY", + "<24,5>": "-186", + "<24,6>": "-41", + "<24,7>": "80", + "<24,8>": "25", + "<24,9>": "&Apply", + "<24,10>": { + "<24,10,1>": "0x58002300", + "<24,10,2>": "0x0" + }, + "<24,11>": { + "<24,11,1>": "0x3000", + "<24,11,2>": "0x80000000" + }, + "<24,12>": "17", + "<24,13>": { + "<24,13,1>": "-2", + "<24,13,2>": "-2", + "<24,13,3>": "0" + }, + "<24,14>": "0", + "<24,15>": { + "<24,15,1>": { + "<24,15,1,1>": "Tahoma", + "<24,15,1,2>": "-11", + "<24,15,1,3>": "400", + "<24,15,1,4>": "0", + "<24,15,1,5>": "0", + "<24,15,1,6>": "0", + "<24,15,1,7>": "0", + "<24,15,1,8>": "34", + "<24,15,1,9>": "0", + "<24,15,1,10>": "3", + "<24,15,1,11>": "2", + "<24,15,1,12>": "1", + "<24,15,1,13>": "0", + "<24,15,1,14>": "0" + } + }, + "<24,16>": "", + "<24,17>": "", + "<24,18>": { + "<24,18,1>": { + "<24,18,1,1>": "R", + "<24,18,1,2>": "EXECUTE", + "<24,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<24,18,1,4>": { + "<24,18,1,4,1>": "@EVENT", + "<24,18,1,4,2>": "@SELF", + "<24,18,1,4,3>": "@PARAM1", + "<24,18,1,4,4>": "@PARAM2", + "<24,18,1,4,5>": "@PARAM3", + "<24,18,1,4,6>": "@PARAM4", + "<24,18,1,4,7>": "@PARAM5", + "<24,18,1,4,8>": "@PARAM6" + }, + "<24,18,1,5>": "", + "<24,18,1,6>": "", + "<24,18,1,7>": "", + "<24,18,1,8>": "", + "<24,18,1,9>": "", + "<24,18,1,10>": "", + "<24,18,1,11>": "", + "<24,18,1,12>": "", + "<24,18,1,13>": "", + "<24,18,1,14>": "", + "<24,18,1,15>": "STPROC" + } + }, + "<24,19>": "CLICK", + "<24,20>": "", + "<24,21>": "", + "<24,22>": "", + "<24,23>": "", + "<24,24>": "", + "<24,25>": "", + "<24,26>": "", + "<24,27>": "", + "<24,28>": "", + "<24,29>": "", + "<24,30>": "", + "<24,31>": "", + "<24,32>": "", + "<24,33>": "", + "<24,34>": "", + "<24,35>": "", + "<24,36>": "", + "<24,37>": "", + "<24,38>": "", + "<24,39>": "", + "<24,40>": "1", + "<24,41>": { + "<24,41,1>": "", + "<24,41,2>": "-1" + }, + "<24,42>": "", + "<24,43>": "", + "<24,44>": "", + "<24,45>": "", + "<24,46>": "", + "<24,47>": "", + "<24,48>": "", + "<24,49>": "", + "<24,50>": "", + "<24,51>": "", + "<24,52>": "", + "<24,53>": "", + "<24,54>": "", + "<24,55>": "", + "<24,56>": "", + "<24,57>": "", + "<24,58>": "", + "<24,59>": "", + "<24,60>": "", + "<24,61>": "", + "<24,62>": "0", + "<24,63>": "", + "<24,64>": { + "<24,64,1>": "-2", + "<24,64,2>": "-2", + "<24,64,3>": "0" + }, + "<24,65>": "-2", + "<24,66>": "", + "<24,67>": "", + "<24,68>": "", + "<24,69>": "", + "<24,70>": "", + "<24,71>": "", + "<24,72>": "", + "<24,73>": "", + "<24,74>": "", + "<24,75>": "", + "<24,76>": "", + "<24,77>": "", + "<24,78>": "", + "<24,79>": "", + "<24,80>": "", + "<24,81>": "", + "<24,82>": "", + "<24,83>": "", + "<24,84>": "", + "<24,85>": "", + "<24,86>": "", + "<24,87>": "", + "<24,88>": "", + "<24,89>": "", + "<24,90>": "0", + "<24,91>": "0", + "<24,92>": "", + "<24,93>": "", + "<24,94>": "", + "<24,95>": "", + "<24,96>": "", + "<24,97>": "", + "<24,98>": "", + "<24,99>": "", + "<24,100>": "", + "<24,101>": "", + "<24,102>": "", + "<24,103>": "", + "<24,104>": "", + "<24,105>": "", + "<24,106>": "", + "<24,107>": "", + "<24,108>": "" + }, + "<25>": { + "<25,1>": "PUB_CLOSE", + "<25,2>": "", + "<25,3>": "PUSHBUTTON", + "<25,4>": "SRP_GIT_UTILITY", + "<25,5>": "-96", + "<25,6>": "-41", + "<25,7>": "80", + "<25,8>": "25", + "<25,9>": "&Close", + "<25,10>": { + "<25,10,1>": "0x50002300", + "<25,10,2>": "0x0" + }, + "<25,11>": { + "<25,11,1>": "0x3001", + "<25,11,2>": "0x80000000" + }, + "<25,12>": "18", + "<25,13>": { + "<25,13,1>": "-2", + "<25,13,2>": "-2", + "<25,13,3>": "0" + }, + "<25,14>": "0", + "<25,15>": { + "<25,15,1>": { + "<25,15,1,1>": "Tahoma", + "<25,15,1,2>": "-11", + "<25,15,1,3>": "400", + "<25,15,1,4>": "0", + "<25,15,1,5>": "0", + "<25,15,1,6>": "0", + "<25,15,1,7>": "0", + "<25,15,1,8>": "34", + "<25,15,1,9>": "0", + "<25,15,1,10>": "3", + "<25,15,1,11>": "2", + "<25,15,1,12>": "1", + "<25,15,1,13>": "0", + "<25,15,1,14>": "0" + } + }, + "<25,16>": "", + "<25,17>": "", + "<25,18>": { + "<25,18,1>": { + "<25,18,1,1>": "R", + "<25,18,1,2>": "EXECUTE", + "<25,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<25,18,1,4>": { + "<25,18,1,4,1>": "@EVENT", + "<25,18,1,4,2>": "@SELF", + "<25,18,1,4,3>": "@PARAM1", + "<25,18,1,4,4>": "@PARAM2", + "<25,18,1,4,5>": "@PARAM3", + "<25,18,1,4,6>": "@PARAM4", + "<25,18,1,4,7>": "@PARAM5", + "<25,18,1,4,8>": "@PARAM6" + }, + "<25,18,1,5>": "", + "<25,18,1,6>": "", + "<25,18,1,7>": "", + "<25,18,1,8>": "", + "<25,18,1,9>": "", + "<25,18,1,10>": "", + "<25,18,1,11>": "", + "<25,18,1,12>": "", + "<25,18,1,13>": "", + "<25,18,1,14>": "", + "<25,18,1,15>": "STPROC" + } + }, + "<25,19>": "CLICK", + "<25,20>": "", + "<25,21>": "", + "<25,22>": "", + "<25,23>": "", + "<25,24>": "", + "<25,25>": "", + "<25,26>": "", + "<25,27>": "", + "<25,28>": "", + "<25,29>": "", + "<25,30>": "", + "<25,31>": "", + "<25,32>": "", + "<25,33>": "", + "<25,34>": "", + "<25,35>": "", + "<25,36>": "", + "<25,37>": "", + "<25,38>": "", + "<25,39>": "", + "<25,40>": "1", + "<25,41>": { + "<25,41,1>": "", + "<25,41,2>": "-1" + }, + "<25,42>": "", + "<25,43>": "", + "<25,44>": "", + "<25,45>": "", + "<25,46>": "", + "<25,47>": "", + "<25,48>": "", + "<25,49>": "", + "<25,50>": "", + "<25,51>": "", + "<25,52>": "", + "<25,53>": "", + "<25,54>": "", + "<25,55>": "", + "<25,56>": "", + "<25,57>": "", + "<25,58>": "", + "<25,59>": "", + "<25,60>": "", + "<25,61>": "", + "<25,62>": "0", + "<25,63>": "", + "<25,64>": { + "<25,64,1>": "-2", + "<25,64,2>": "-2", + "<25,64,3>": "0" + }, + "<25,65>": "-2", + "<25,66>": "", + "<25,67>": "", + "<25,68>": "", + "<25,69>": "", + "<25,70>": "", + "<25,71>": "", + "<25,72>": "", + "<25,73>": "", + "<25,74>": "", + "<25,75>": "", + "<25,76>": "", + "<25,77>": "", + "<25,78>": "", + "<25,79>": "", + "<25,80>": "", + "<25,81>": "", + "<25,82>": "", + "<25,83>": "", + "<25,84>": "", + "<25,85>": "", + "<25,86>": "", + "<25,87>": "", + "<25,88>": "", + "<25,89>": "", + "<25,90>": "0", + "<25,91>": "0", + "<25,92>": "", + "<25,93>": "", + "<25,94>": "", + "<25,95>": "", + "<25,96>": "", + "<25,97>": "", + "<25,98>": "", + "<25,99>": "", + "<25,100>": "", + "<25,101>": "", + "<25,102>": "", + "<25,103>": "", + "<25,104>": "", + "<25,105>": "", + "<25,106>": "", + "<25,107>": "", + "<25,108>": "" + }, + "<26>": { + "<26,1>": "STA_VERSION", + "<26,2>": "", + "<26,3>": "STATIC", + "<26,4>": "SRP_GIT_UTILITY", + "<26,5>": "16", + "<26,6>": "542", + "<26,7>": "100", + "<26,8>": "14", + "<26,9>": "1.0.4.0", + "<26,10>": { + "<26,10,1>": "0x50000000", + "<26,10,2>": "0x0" + }, + "<26,11>": { + "<26,11,1>": "0x0", + "<26,11,2>": "0x80000000" + }, + "<26,12>": "30", + "<26,13>": { + "<26,13,1>": "16777215", + "<26,13,2>": "-2", + "<26,13,3>": "99" + }, + "<26,14>": "0", + "<26,15>": { + "<26,15,1>": { + "<26,15,1,1>": "Segoe UI Semilight", + "<26,15,1,2>": "-11", + "<26,15,1,3>": "400", + "<26,15,1,4>": "0", + "<26,15,1,5>": "0", + "<26,15,1,6>": "0", + "<26,15,1,7>": "0", + "<26,15,1,8>": "34", + "<26,15,1,9>": "0", + "<26,15,1,10>": "3", + "<26,15,1,11>": "2", + "<26,15,1,12>": "1", + "<26,15,1,13>": "0", + "<26,15,1,14>": "0" + } + }, + "<26,16>": "", + "<26,17>": "", + "<26,18>": "", + "<26,19>": "", + "<26,20>": "", + "<26,21>": "", + "<26,22>": "", + "<26,23>": "", + "<26,24>": "", + "<26,25>": "", + "<26,26>": "", + "<26,27>": "", + "<26,28>": "<>", + "<26,29>": "<>", + "<26,30>": "", + "<26,31>": "", + "<26,32>": "", + "<26,33>": "", + "<26,34>": "", + "<26,35>": "", + "<26,36>": "", + "<26,37>": "", + "<26,38>": "", + "<26,39>": "", + "<26,40>": "", + "<26,41>": "", + "<26,42>": "", + "<26,43>": "", + "<26,44>": "", + "<26,45>": "", + "<26,46>": "", + "<26,47>": "", + "<26,48>": "", + "<26,49>": "", + "<26,50>": "", + "<26,51>": "", + "<26,52>": "", + "<26,53>": "", + "<26,54>": "", + "<26,55>": "", + "<26,56>": "", + "<26,57>": "", + "<26,58>": "", + "<26,59>": "", + "<26,60>": "", + "<26,61>": "", + "<26,62>": "0", + "<26,63>": { + "<26,63,1>": "", + "<26,63,2>": "", + "<26,63,3>": "", + "<26,63,4>": "", + "<26,63,5>": "", + "<26,63,6>": "", + "<26,63,7>": "", + "<26,63,8>": "" + }, + "<26,64>": { + "<26,64,1>": "", + "<26,64,2>": "", + "<26,64,3>": "" + }, + "<26,65>": "-2", + "<26,66>": "", + "<26,67>": "", + "<26,68>": "", + "<26,69>": "", + "<26,70>": "", + "<26,71>": "", + "<26,72>": "", + "<26,73>": "", + "<26,74>": "", + "<26,75>": "", + "<26,76>": "", + "<26,77>": "", + "<26,78>": "", + "<26,79>": "", + "<26,80>": "", + "<26,81>": "", + "<26,82>": "", + "<26,83>": "", + "<26,84>": "", + "<26,85>": "", + "<26,86>": "", + "<26,87>": "", + "<26,88>": "", + "<26,89>": "", + "<26,90>": "0", + "<26,91>": "0", + "<26,92>": "", + "<26,93>": "", + "<26,94>": "", + "<26,95>": "", + "<26,96>": "", + "<26,97>": "", + "<26,98>": "", + "<26,99>": "", + "<26,100>": "", + "<26,101>": "", + "<26,102>": "", + "<26,103>": "", + "<26,104>": "", + "<26,105>": "", + "<26,106>": "", + "<26,107>": "", + "<26,108>": "" + }, + "<27>": { + "<27,1>": "PUB_BACK", + "<27,2>": "", + "<27,3>": "PUSHBUTTON", + "<27,4>": "SRP_GIT_UTILITY", + "<27,5>": "-96", + "<27,6>": "-41:1", + "<27,7>": "80", + "<27,8>": "25", + "<27,9>": "&Back", + "<27,10>": { + "<27,10,1>": "0x58002300", + "<27,10,2>": "0x0" + }, + "<27,11>": { + "<27,11,1>": "0x3000", + "<27,11,2>": "0x80000000" + }, + "<27,12>": "19", + "<27,13>": { + "<27,13,1>": "-2", + "<27,13,2>": "-2", + "<27,13,3>": "0" + }, + "<27,14>": "0", + "<27,15>": { + "<27,15,1>": { + "<27,15,1,1>": "Tahoma", + "<27,15,1,2>": "-11", + "<27,15,1,3>": "400", + "<27,15,1,4>": "0", + "<27,15,1,5>": "0", + "<27,15,1,6>": "0", + "<27,15,1,7>": "0", + "<27,15,1,8>": "34", + "<27,15,1,9>": "0", + "<27,15,1,10>": "3", + "<27,15,1,11>": "2", + "<27,15,1,12>": "1", + "<27,15,1,13>": "0", + "<27,15,1,14>": "0" + } + }, + "<27,16>": "", + "<27,17>": "", + "<27,18>": { + "<27,18,1>": { + "<27,18,1,1>": "R", + "<27,18,1,2>": "EXECUTE", + "<27,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<27,18,1,4>": { + "<27,18,1,4,1>": "@EVENT", + "<27,18,1,4,2>": "@SELF", + "<27,18,1,4,3>": "@PARAM1", + "<27,18,1,4,4>": "@PARAM2", + "<27,18,1,4,5>": "@PARAM3", + "<27,18,1,4,6>": "@PARAM4", + "<27,18,1,4,7>": "@PARAM5", + "<27,18,1,4,8>": "@PARAM6" + }, + "<27,18,1,5>": "", + "<27,18,1,6>": "", + "<27,18,1,7>": "", + "<27,18,1,8>": "", + "<27,18,1,9>": "", + "<27,18,1,10>": "", + "<27,18,1,11>": "", + "<27,18,1,12>": "", + "<27,18,1,13>": "", + "<27,18,1,14>": "", + "<27,18,1,15>": "STPROC" + } + }, + "<27,19>": "CLICK", + "<27,20>": "", + "<27,21>": "", + "<27,22>": "", + "<27,23>": "", + "<27,24>": "", + "<27,25>": "", + "<27,26>": "", + "<27,27>": "", + "<27,28>": "", + "<27,29>": "", + "<27,30>": "", + "<27,31>": "", + "<27,32>": "", + "<27,33>": "", + "<27,34>": "", + "<27,35>": "", + "<27,36>": "", + "<27,37>": "", + "<27,38>": "", + "<27,39>": "", + "<27,40>": "1", + "<27,41>": { + "<27,41,1>": "", + "<27,41,2>": "-1" + }, + "<27,42>": "", + "<27,43>": "", + "<27,44>": "", + "<27,45>": "", + "<27,46>": "", + "<27,47>": "", + "<27,48>": "", + "<27,49>": "", + "<27,50>": "", + "<27,51>": "", + "<27,52>": "", + "<27,53>": "", + "<27,54>": "", + "<27,55>": "", + "<27,56>": "", + "<27,57>": "", + "<27,58>": "", + "<27,59>": "", + "<27,60>": "", + "<27,61>": "", + "<27,62>": "0", + "<27,63>": "", + "<27,64>": { + "<27,64,1>": "-2", + "<27,64,2>": "-2", + "<27,64,3>": "0" + }, + "<27,65>": "-2", + "<27,66>": "", + "<27,67>": "", + "<27,68>": "", + "<27,69>": "", + "<27,70>": "", + "<27,71>": "", + "<27,72>": "", + "<27,73>": "", + "<27,74>": "", + "<27,75>": "", + "<27,76>": "", + "<27,77>": "", + "<27,78>": "", + "<27,79>": "", + "<27,80>": "", + "<27,81>": "", + "<27,82>": "", + "<27,83>": "", + "<27,84>": "", + "<27,85>": "", + "<27,86>": "", + "<27,87>": "", + "<27,88>": "", + "<27,89>": "", + "<27,90>": "0", + "<27,91>": "0", + "<27,92>": "", + "<27,93>": "", + "<27,94>": "", + "<27,95>": "", + "<27,96>": "", + "<27,97>": "", + "<27,98>": "", + "<27,99>": "", + "<27,100>": "", + "<27,101>": "", + "<27,102>": "", + "<27,103>": "", + "<27,104>": "", + "<27,105>": "", + "<27,106>": "", + "<27,107>": "", + "<27,108>": "" + }, + "<28>": { + "<28,1>": "EDB_STATUS", + "<28,2>": "", + "<28,3>": "EDITBOX", + "<28,4>": "SRP_GIT_UTILITY", + "<28,5>": "16", + "<28,6>": "13:1", + "<28,7>": "-16", + "<28,8>": "-50", + "<28,9>": "", + "<28,10>": { + "<28,10,1>": "0x50300840", + "<28,10,2>": "0x200" + }, + "<28,11>": { + "<28,11,1>": "0xC000", + "<28,11,2>": "0x80000000" + }, + "<28,12>": "20", + "<28,13>": { + "<28,13,1>": "", + "<28,13,2>": "", + "<28,13,3>": "" + }, + "<28,14>": "0", + "<28,15>": { + "<28,15,1>": { + "<28,15,1,1>": "Consolas", + "<28,15,1,2>": "-15", + "<28,15,1,3>": "400", + "<28,15,1,4>": "0", + "<28,15,1,5>": "0", + "<28,15,1,6>": "0", + "<28,15,1,7>": "0", + "<28,15,1,8>": "49", + "<28,15,1,9>": "0", + "<28,15,1,10>": "3", + "<28,15,1,11>": "2", + "<28,15,1,12>": "1", + "<28,15,1,13>": "0", + "<28,15,1,14>": "0" + } + }, + "<28,16>": "", + "<28,17>": "", + "<28,18>": "", + "<28,19>": "", + "<28,20>": "", + "<28,21>": "", + "<28,22>": "", + "<28,23>": "", + "<28,24>": "", + "<28,25>": "", + "<28,26>": "", + "<28,27>": "", + "<28,28>": "<>", + "<28,29>": "<>", + "<28,30>": "", + "<28,31>": "0", + "<28,32>": "", + "<28,33>": "", + "<28,34>": "", + "<28,35>": "", + "<28,36>": "", + "<28,37>": "", + "<28,38>": "", + "<28,39>": "", + "<28,40>": "", + "<28,41>": "", + "<28,42>": "", + "<28,43>": "", + "<28,44>": "", + "<28,45>": "", + "<28,46>": "", + "<28,47>": "", + "<28,48>": "", + "<28,49>": "", + "<28,50>": "", + "<28,51>": "", + "<28,52>": "", + "<28,53>": "", + "<28,54>": "", + "<28,55>": "", + "<28,56>": "", + "<28,57>": "", + "<28,58>": "", + "<28,59>": "", + "<28,60>": "", + "<28,61>": "", + "<28,62>": "0", + "<28,63>": "", + "<28,64>": "", + "<28,65>": "", + "<28,66>": "", + "<28,67>": "", + "<28,68>": "", + "<28,69>": "", + "<28,70>": "", + "<28,71>": "", + "<28,72>": "", + "<28,73>": "", + "<28,74>": "", + "<28,75>": "", + "<28,76>": "", + "<28,77>": "", + "<28,78>": "", + "<28,79>": "", + "<28,80>": "", + "<28,81>": "", + "<28,82>": "", + "<28,83>": "", + "<28,84>": "", + "<28,85>": "", + "<28,86>": "", + "<28,87>": "", + "<28,88>": "", + "<28,89>": "", + "<28,90>": "", + "<28,91>": "", + "<28,92>": "", + "<28,93>": "", + "<28,94>": "", + "<28,95>": "", + "<28,96>": "", + "<28,97>": "", + "<28,98>": "", + "<28,99>": "", + "<28,100>": "", + "<28,101>": "", + "<28,102>": "", + "<28,103>": "", + "<28,104>": "", + "<28,105>": "", + "<28,106>": "", + "<28,107>": "", + "<28,108>": "" + }, + "<29>": { + "<29,1>": "OLE_SUBCLASS", + "<29,2>": "", + "<29,3>": "OLECONTROL.SRPEDITOR.Subclass.1", + "<29,4>": "SRP_GIT_UTILITY", + "<29,5>": "366", + "<29,6>": "531", + "<29,7>": "111", + "<29,8>": "30", + "<29,9>": "SRPEDITOR.Subclass.1", + "<29,10>": { + "<29,10,1>": "0x52000000", + "<29,10,2>": "0x0" + }, + "<29,11>": { + "<29,11,1>": "0x0", + "<29,11,2>": "0x80000000" + }, + "<29,12>": "21", + "<29,13>": { + "<29,13,1>": "", + "<29,13,2>": "", + "<29,13,3>": "" + }, + "<29,14>": "0", + "<29,15>": { + "<29,15,1>": { + "<29,15,1,1>": "Segoe UI", + "<29,15,1,2>": "-12", + "<29,15,1,3>": "400", + "<29,15,1,4>": "0", + "<29,15,1,5>": "0", + "<29,15,1,6>": "0", + "<29,15,1,7>": "0", + "<29,15,1,8>": "34", + "<29,15,1,9>": "0", + "<29,15,1,10>": "3", + "<29,15,1,11>": "2", + "<29,15,1,12>": "1", + "<29,15,1,13>": "0", + "<29,15,1,14>": "0" + } + }, + "<29,16>": "", + "<29,17>": "", + "<29,18>": { + "<29,18,1>": { + "<29,18,1,1>": "R", + "<29,18,1,2>": "EXECUTE", + "<29,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<29,18,1,4>": { + "<29,18,1,4,1>": "@PARAM1", + "<29,18,1,4,2>": "@SELF", + "<29,18,1,4,3>": "@PARAM2", + "<29,18,1,4,4>": "@PARAM3", + "<29,18,1,4,5>": "@PARAM4", + "<29,18,1,4,6>": "@PARAM5", + "<29,18,1,4,7>": "@PARAM6" + }, + "<29,18,1,5>": "", + "<29,18,1,6>": "", + "<29,18,1,7>": "", + "<29,18,1,8>": "", + "<29,18,1,9>": "", + "<29,18,1,10>": "", + "<29,18,1,11>": "", + "<29,18,1,12>": "", + "<29,18,1,13>": "", + "<29,18,1,14>": "", + "<29,18,1,15>": "STPROC" + } + }, + "<29,19>": "OLE", + "<29,20>": "", + "<29,21>": "", + "<29,22>": "", + "<29,23>": "", + "<29,24>": "", + "<29,25>": "", + "<29,26>": "", + "<29,27>": "", + "<29,28>": "", + "<29,29>": "", + "<29,30>": "", + "<29,31>": "", + "<29,32>": "", + "<29,33>": "", + "<29,34>": "", + "<29,35>": "", + "<29,36>": "", + "<29,37>": "", + "<29,38>": "", + "<29,39>": "", + "<29,40>": "", + "<29,41>": "", + "<29,42>": "", + "<29,43>": "", + "<29,44>": "", + "<29,45>": "", + "<29,46>": "", + "<29,47>": "", + "<29,48>": "", + "<29,49>": "", + "<29,50>": "", + "<29,51>": "", + "<29,52>": "", + "<29,53>": "", + "<29,54>": "", + "<29,55>": "OLE.Border", + "<29,56>": "None", + "<29,57>": "", + "<29,58>": "", + "<29,59>": "", + "<29,60>": "", + "<29,61>": "", + "<29,62>": "", + "<29,63>": "", + "<29,64>": "", + "<29,65>": "", + "<29,66>": "", + "<29,67>": "", + "<29,68>": "", + "<29,69>": "", + "<29,70>": "", + "<29,71>": "", + "<29,72>": "", + "<29,73>": "", + "<29,74>": "", + "<29,75>": "", + "<29,76>": "", + "<29,77>": "", + "<29,78>": "", + "<29,79>": "", + "<29,80>": "", + "<29,81>": "", + "<29,82>": "", + "<29,83>": "", + "<29,84>": "", + "<29,85>": "", + "<29,86>": "", + "<29,87>": "", + "<29,88>": "", + "<29,89>": "", + "<29,90>": "", + "<29,91>": "", + "<29,92>": "", + "<29,93>": "", + "<29,94>": "", + "<29,95>": "", + "<29,96>": "", + "<29,97>": "", + "<29,98>": "", + "<29,99>": "", + "<29,100>": "", + "<29,101>": "", + "<29,102>": "", + "<29,103>": "", + "<29,104>": "", + "<29,105>": "", + "<29,106>": "", + "<29,107>": "", + "<29,108>": "" + }, + "<30>": { + "<30,1>": "STA_INSTRUCTIONS", + "<30,2>": "", + "<30,3>": "STATIC", + "<30,4>": "SRP_GIT_UTILITY", + "<30,5>": "8", + "<30,6>": "219:2", + "<30,7>": "1016", + "<30,8>": "23", + "<30,9>": "To confirm, type PULL into the box below.", + "<30,10>": { + "<30,10,1>": "0x50000000", + "<30,10,2>": "0x0" + }, + "<30,11>": { + "<30,11,1>": "0x0", + "<30,11,2>": "0x80000000" + }, + "<30,12>": "31", + "<30,13>": { + "<30,13,1>": "16777215", + "<30,13,2>": "-2", + "<30,13,3>": "99" + }, + "<30,14>": "0", + "<30,15>": { + "<30,15,1>": { + "<30,15,1,1>": "Segoe UI Semilight", + "<30,15,1,2>": "-16", + "<30,15,1,3>": "400", + "<30,15,1,4>": "0", + "<30,15,1,5>": "0", + "<30,15,1,6>": "0", + "<30,15,1,7>": "0", + "<30,15,1,8>": "34", + "<30,15,1,9>": "0", + "<30,15,1,10>": "3", + "<30,15,1,11>": "2", + "<30,15,1,12>": "1", + "<30,15,1,13>": "0", + "<30,15,1,14>": "0" + } + }, + "<30,16>": "", + "<30,17>": "", + "<30,18>": "", + "<30,19>": "", + "<30,20>": "", + "<30,21>": "", + "<30,22>": "", + "<30,23>": "", + "<30,24>": "", + "<30,25>": "", + "<30,26>": "", + "<30,27>": "", + "<30,28>": "<>", + "<30,29>": "<>", + "<30,30>": "", + "<30,31>": "", + "<30,32>": "", + "<30,33>": "", + "<30,34>": "", + "<30,35>": "", + "<30,36>": "", + "<30,37>": "", + "<30,38>": "", + "<30,39>": "", + "<30,40>": "", + "<30,41>": "", + "<30,42>": "", + "<30,43>": "", + "<30,44>": "", + "<30,45>": "", + "<30,46>": "", + "<30,47>": "", + "<30,48>": "", + "<30,49>": "", + "<30,50>": "", + "<30,51>": "", + "<30,52>": "", + "<30,53>": "", + "<30,54>": "", + "<30,55>": "", + "<30,56>": "", + "<30,57>": "", + "<30,58>": "", + "<30,59>": "", + "<30,60>": "", + "<30,61>": "", + "<30,62>": "0", + "<30,63>": { + "<30,63,1>": "", + "<30,63,2>": "", + "<30,63,3>": "", + "<30,63,4>": "", + "<30,63,5>": "", + "<30,63,6>": "", + "<30,63,7>": "", + "<30,63,8>": "" + }, + "<30,64>": { + "<30,64,1>": "", + "<30,64,2>": "", + "<30,64,3>": "" + }, + "<30,65>": "-2", + "<30,66>": "", + "<30,67>": "", + "<30,68>": "", + "<30,69>": "", + "<30,70>": "", + "<30,71>": "", + "<30,72>": "", + "<30,73>": "", + "<30,74>": "", + "<30,75>": "", + "<30,76>": "", + "<30,77>": "", + "<30,78>": "", + "<30,79>": "", + "<30,80>": "", + "<30,81>": "", + "<30,82>": "", + "<30,83>": "", + "<30,84>": "", + "<30,85>": "", + "<30,86>": "", + "<30,87>": "", + "<30,88>": "", + "<30,89>": "", + "<30,90>": "0", + "<30,91>": "0", + "<30,92>": "", + "<30,93>": "", + "<30,94>": "", + "<30,95>": "", + "<30,96>": "", + "<30,97>": "", + "<30,98>": "", + "<30,99>": "", + "<30,100>": "", + "<30,101>": "", + "<30,102>": "", + "<30,103>": "", + "<30,104>": "", + "<30,105>": "", + "<30,106>": "", + "<30,107>": "", + "<30,108>": "" + }, + "<31>": { + "<31,1>": "STA_WARNING", + "<31,2>": "", + "<31,3>": "STATIC", + "<31,4>": "SRP_GIT_UTILITY", + "<31,5>": "8", + "<31,6>": "169:2", + "<31,7>": "1016", + "<31,8>": "43", + "<31,9>": "You are about to modify Production.", + "<31,10>": { + "<31,10,1>": "0x50000000", + "<31,10,2>": "0x0" + }, + "<31,11>": { + "<31,11,1>": "0x0", + "<31,11,2>": "0x80000000" + }, + "<31,12>": "32", + "<31,13>": { + "<31,13,1>": "16777215", + "<31,13,2>": "-2", + "<31,13,3>": "99" + }, + "<31,14>": "0", + "<31,15>": { + "<31,15,1>": { + "<31,15,1,1>": "Segoe UI Semibold", + "<31,15,1,2>": "-21", + "<31,15,1,3>": "400", + "<31,15,1,4>": "0", + "<31,15,1,5>": "0", + "<31,15,1,6>": "0", + "<31,15,1,7>": "0", + "<31,15,1,8>": "34", + "<31,15,1,9>": "0", + "<31,15,1,10>": "3", + "<31,15,1,11>": "2", + "<31,15,1,12>": "1", + "<31,15,1,13>": "0", + "<31,15,1,14>": "0" + } + }, + "<31,16>": "", + "<31,17>": "", + "<31,18>": "", + "<31,19>": "", + "<31,20>": "", + "<31,21>": "", + "<31,22>": "", + "<31,23>": "", + "<31,24>": "", + "<31,25>": "", + "<31,26>": "", + "<31,27>": "", + "<31,28>": "<>", + "<31,29>": "<>", + "<31,30>": "", + "<31,31>": "", + "<31,32>": "", + "<31,33>": "", + "<31,34>": "", + "<31,35>": "", + "<31,36>": "", + "<31,37>": "", + "<31,38>": "", + "<31,39>": "", + "<31,40>": "", + "<31,41>": "", + "<31,42>": "", + "<31,43>": "", + "<31,44>": "", + "<31,45>": "", + "<31,46>": "", + "<31,47>": "", + "<31,48>": "", + "<31,49>": "", + "<31,50>": "", + "<31,51>": "", + "<31,52>": "", + "<31,53>": "", + "<31,54>": "", + "<31,55>": "", + "<31,56>": "", + "<31,57>": "", + "<31,58>": "", + "<31,59>": "", + "<31,60>": "", + "<31,61>": "", + "<31,62>": "0", + "<31,63>": { + "<31,63,1>": "", + "<31,63,2>": "", + "<31,63,3>": "", + "<31,63,4>": "", + "<31,63,5>": "", + "<31,63,6>": "", + "<31,63,7>": "", + "<31,63,8>": "" + }, + "<31,64>": { + "<31,64,1>": "", + "<31,64,2>": "", + "<31,64,3>": "" + }, + "<31,65>": "-2", + "<31,66>": "", + "<31,67>": "", + "<31,68>": "", + "<31,69>": "", + "<31,70>": "", + "<31,71>": "", + "<31,72>": "", + "<31,73>": "", + "<31,74>": "", + "<31,75>": "", + "<31,76>": "", + "<31,77>": "", + "<31,78>": "", + "<31,79>": "", + "<31,80>": "", + "<31,81>": "", + "<31,82>": "", + "<31,83>": "", + "<31,84>": "", + "<31,85>": "", + "<31,86>": "", + "<31,87>": "", + "<31,88>": "", + "<31,89>": "", + "<31,90>": "0", + "<31,91>": "0", + "<31,92>": "", + "<31,93>": "", + "<31,94>": "", + "<31,95>": "", + "<31,96>": "", + "<31,97>": "", + "<31,98>": "", + "<31,99>": "", + "<31,100>": "", + "<31,101>": "", + "<31,102>": "", + "<31,103>": "", + "<31,104>": "", + "<31,105>": "", + "<31,106>": "", + "<31,107>": "", + "<31,108>": "" + }, + "<32>": { + "<32,1>": "EDL_CONFIRM", + "<32,2>": "", + "<32,3>": "EDITFIELD", + "<32,4>": "SRP_GIT_UTILITY", + "<32,5>": "442", + "<32,6>": "267:2", + "<32,7>": "140", + "<32,8>": "23", + "<32,9>": "PULL", + "<32,10>": { + "<32,10,1>": "0x50000088", + "<32,10,2>": "0x200" + }, + "<32,11>": { + "<32,11,1>": "0x0", + "<32,11,2>": "0x80000000" + }, + "<32,12>": "22", + "<32,13>": { + "<32,13,1>": "", + "<32,13,2>": "", + "<32,13,3>": "" + }, + "<32,14>": "0", + "<32,15>": { + "<32,15,1>": { + "<32,15,1,1>": "Segoe UI Semilight", + "<32,15,1,2>": "-13", + "<32,15,1,3>": "400", + "<32,15,1,4>": "0", + "<32,15,1,5>": "0", + "<32,15,1,6>": "0", + "<32,15,1,7>": "0", + "<32,15,1,8>": "34", + "<32,15,1,9>": "0", + "<32,15,1,10>": "3", + "<32,15,1,11>": "2", + "<32,15,1,12>": "1", + "<32,15,1,13>": "0", + "<32,15,1,14>": "0" + } + }, + "<32,16>": "", + "<32,17>": "", + "<32,18>": { + "<32,18,1>": { + "<32,18,1,1>": "R", + "<32,18,1,2>": "EXECUTE", + "<32,18,1,3>": "SYSPROG*STPROCEXE**SRP_GIT_UTILITY_EVENTS", + "<32,18,1,4>": { + "<32,18,1,4,1>": "@EVENT", + "<32,18,1,4,2>": "@SELF", + "<32,18,1,4,3>": "@PARAM1", + "<32,18,1,4,4>": "@PARAM2", + "<32,18,1,4,5>": "@PARAM3", + "<32,18,1,4,6>": "@PARAM4", + "<32,18,1,4,7>": "@PARAM5", + "<32,18,1,4,8>": "@PARAM6" + }, + "<32,18,1,5>": "", + "<32,18,1,6>": "", + "<32,18,1,7>": "", + "<32,18,1,8>": "", + "<32,18,1,9>": "", + "<32,18,1,10>": "", + "<32,18,1,11>": "", + "<32,18,1,12>": "", + "<32,18,1,13>": "", + "<32,18,1,14>": "", + "<32,18,1,15>": "STPROC" + } + }, + "<32,19>": "CHAR", + "<32,20>": "", + "<32,21>": "", + "<32,22>": "", + "<32,23>": "", + "<32,24>": "", + "<32,25>": "", + "<32,26>": "", + "<32,27>": "", + "<32,28>": "<>", + "<32,29>": "<>", + "<32,30>": "<>", + "<32,31>": "0", + "<32,32>": "", + "<32,33>": "", + "<32,34>": "", + "<32,35>": "", + "<32,36>": { + "<32,36,1>": "0", + "<32,36,2>": "0" + }, + "<32,37>": "", + "<32,38>": "", + "<32,39>": "", + "<32,40>": "", + "<32,41>": "", + "<32,42>": "", + "<32,43>": "", + "<32,44>": "", + "<32,45>": "", + "<32,46>": "", + "<32,47>": "", + "<32,48>": "", + "<32,49>": "", + "<32,50>": "", + "<32,51>": "", + "<32,52>": "", + "<32,53>": "", + "<32,54>": "", + "<32,55>": "", + "<32,56>": "", + "<32,57>": "", + "<32,58>": "", + "<32,59>": "", + "<32,60>": "", + "<32,61>": "", + "<32,62>": "0", + "<32,63>": "", + "<32,64>": "", + "<32,65>": "", + "<32,66>": "", + "<32,67>": "", + "<32,68>": "", + "<32,69>": "", + "<32,70>": "", + "<32,71>": "", + "<32,72>": "", + "<32,73>": "", + "<32,74>": "", + "<32,75>": "", + "<32,76>": "", + "<32,77>": "", + "<32,78>": "", + "<32,79>": "", + "<32,80>": "", + "<32,81>": "", + "<32,82>": "", + "<32,83>": "", + "<32,84>": "", + "<32,85>": "", + "<32,86>": "", + "<32,87>": "", + "<32,88>": "", + "<32,89>": "", + "<32,90>": "", + "<32,91>": "", + "<32,92>": "", + "<32,93>": "", + "<32,94>": "", + "<32,95>": "", + "<32,96>": "", + "<32,97>": "", + "<32,98>": "", + "<32,99>": "", + "<32,100>": "", + "<32,101>": "", + "<32,102>": "", + "<32,103>": "", + "<32,104>": "", + "<32,105>": "", + "<32,106>": "", + "<32,107>": "", + "<32,108>": "" + } + }, + "record4": { + "<1>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/OIWIN/SRP_MAIL_DEMO.json b/SYSPROG/OIWIN/SRP_MAIL_DEMO.json new file mode 100644 index 0000000..708e0fd --- /dev/null +++ b/SYSPROG/OIWIN/SRP_MAIL_DEMO.json @@ -0,0 +1,3117 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "300", + "<2>": "37", + "<3>": "" + }, + "record2": { + "<1>": { + "<1,1>": "SRP_MAIL_DEMO", + "<1,2>": "SRP", + "<1,3>": "WINDOW", + "<1,4>": "", + "<1,5>": "430", + "<1,6>": "80", + "<1,7>": "-711", + "<1,8>": "-732", + "<1,9>": "SRP Mail Demo", + "<1,10>": { + "<1,10,1>": "0x84cf0000", + "<1,10,2>": "0x0" + }, + "<1,11>": "0x0", + "<1,12>": "0", + "<1,13>": "16777215", + "<1,14>": "0", + "<1,15>": "", + "<1,16>": "", + "<1,17>": "", + "<1,18>": { + "<1,18,1>": { + "<1,18,1,1>": "R", + "<1,18,1,2>": "EXECUTE", + "<1,18,1,3>": "SYSPROG*STPROCEXE**OBJ_CALL_EVENT", + "<1,18,1,4>": { + "<1,18,1,4,1>": "@SELF", + "<1,18,1,4,2>": "@EVENT", + "<1,18,1,4,3>": "@PARAM1", + "<1,18,1,4,4>": "@PARAM2", + "<1,18,1,4,5>": "@PARAM3", + "<1,18,1,4,6>": "@PARAM4", + "<1,18,1,4,7>": "@PARAM5", + "<1,18,1,4,8>": "@PARAM6" + }, + "<1,18,1,5>": "", + "<1,18,1,6>": "" + }, + "<1,18,2>": "" + }, + "<1,19>": { + "<1,19,1>": "CREATE", + "<1,19,2>": "" + }, + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": { + "<1,24,1>": "0", + "<1,24,2>": "0", + "<1,24,3>": "0", + "<1,24,4>": "0", + "<1,24,5>": "0", + "<1,24,6>": "0" + }, + "<1,25>": "0", + "<1,26>": "0", + "<1,27>": "", + "<1,28>": "", + "<1,29>": "", + "<1,30>": "", + "<1,31>": "", + "<1,32>": { + "<1,32,1>": "0x7FFFE", + "<1,32,2>": "0xF001E808" + }, + "<1,33>": "", + "<1,34>": "SYSPROG*IMAGE*ICO*SRP", + "<1,35>": "", + "<1,36>": "", + "<1,37>": { + "<1,37,1>": "0x10001", + "<1,37,2>": "0x10001" + }, + "<1,38>": { + "<1,38,1>": "1", + "<1,38,2>": "1" + }, + "<1,39>": "", + "<1,40>": "0", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "" + } + }, + "record3": { + "<1>": { + "<1,1>": "STA_SUBJECT", + "<1,2>": "", + "<1,3>": "STATIC", + "<1,4>": "SRP_MAIL_DEMO", + "<1,5>": "44", + "<1,6>": "124", + "<1,7>": "48", + "<1,8>": "19", + "<1,9>": "Subject", + "<1,10>": { + "<1,10,1>": "0x50000000", + "<1,10,2>": "0x0" + }, + "<1,11>": "0x0", + "<1,12>": "0", + "<1,13>": "", + "<1,14>": "0", + "<1,15>": { + "<1,15,1>": { + "<1,15,1,1>": "Segoe UI", + "<1,15,1,2>": "-12", + "<1,15,1,3>": "400", + "<1,15,1,4>": "0", + "<1,15,1,5>": "0", + "<1,15,1,6>": "0", + "<1,15,1,7>": "0", + "<1,15,1,8>": "34", + "<1,15,1,9>": "0", + "<1,15,1,10>": "3", + "<1,15,1,11>": "2", + "<1,15,1,12>": "1", + "<1,15,1,13>": "0", + "<1,15,1,14>": "0" + } + }, + "<1,16>": "", + "<1,17>": "", + "<1,18>": "", + "<1,19>": "", + "<1,20>": "", + "<1,21>": "", + "<1,22>": "", + "<1,23>": "", + "<1,24>": "", + "<1,25>": "0", + "<1,26>": "0", + "<1,27>": "", + "<1,28>": "<>", + "<1,29>": "<>", + "<1,30>": "<>", + "<1,31>": "0", + "<1,32>": { + "<1,32,1>": "0x7fffe", + "<1,32,2>": "0xf0016d08" + }, + "<1,33>": "", + "<1,34>": "", + "<1,35>": "", + "<1,36>": "", + "<1,37>": "", + "<1,38>": "", + "<1,39>": "", + "<1,40>": "", + "<1,41>": "", + "<1,42>": "", + "<1,43>": "", + "<1,44>": "", + "<1,45>": "", + "<1,46>": "", + "<1,47>": "", + "<1,48>": "", + "<1,49>": "", + "<1,50>": "", + "<1,51>": "", + "<1,52>": "" + }, + "<2>": { + "<2,1>": "EDL_SUBJECT", + "<2,2>": "", + "<2,3>": "EDITFIELD", + "<2,4>": "SRP_MAIL_DEMO", + "<2,5>": "107", + "<2,6>": "121", + "<2,7>": "200", + "<2,8>": "23", + "<2,9>": "", + "<2,10>": { + "<2,10,1>": "0x50000080", + "<2,10,2>": "0x200" + }, + "<2,11>": "0x4", + "<2,12>": "1", + "<2,13>": "", + "<2,14>": "0", + "<2,15>": { + "<2,15,1>": { + "<2,15,1,1>": "Segoe UI", + "<2,15,1,2>": "-12", + "<2,15,1,3>": "400", + "<2,15,1,4>": "0", + "<2,15,1,5>": "0", + "<2,15,1,6>": "0", + "<2,15,1,7>": "0", + "<2,15,1,8>": "34", + "<2,15,1,9>": "0", + "<2,15,1,10>": "3", + "<2,15,1,11>": "2", + "<2,15,1,12>": "1", + "<2,15,1,13>": "0", + "<2,15,1,14>": "0" + } + }, + "<2,16>": "", + "<2,17>": "", + "<2,18>": "", + "<2,19>": "", + "<2,20>": "", + "<2,21>": "", + "<2,22>": "", + "<2,23>": "", + "<2,24>": "", + "<2,25>": "0", + "<2,26>": "0", + "<2,27>": "", + "<2,28>": "<>", + "<2,29>": "<>", + "<2,30>": "<>", + "<2,31>": "0", + "<2,32>": { + "<2,32,1>": "0x7fffe", + "<2,32,2>": "0xf0016408" + }, + "<2,33>": "", + "<2,34>": "", + "<2,35>": "", + "<2,36>": "", + "<2,37>": "", + "<2,38>": "", + "<2,39>": "", + "<2,40>": "", + "<2,41>": "", + "<2,42>": "", + "<2,43>": "", + "<2,44>": "", + "<2,45>": "", + "<2,46>": "", + "<2,47>": "", + "<2,48>": "", + "<2,49>": "", + "<2,50>": "", + "<2,51>": "", + "<2,52>": "" + }, + "<3>": { + "<3,1>": "STA_FROM", + "<3,2>": "", + "<3,3>": "STATIC", + "<3,4>": "SRP_MAIL_DEMO", + "<3,5>": "44", + "<3,6>": "150", + "<3,7>": "48", + "<3,8>": "19", + "<3,9>": "From", + "<3,10>": { + "<3,10,1>": "0x50000000", + "<3,10,2>": "0x0" + }, + "<3,11>": "0x0", + "<3,12>": "0", + "<3,13>": "", + "<3,14>": "0", + "<3,15>": { + "<3,15,1>": { + "<3,15,1,1>": "Segoe UI", + "<3,15,1,2>": "-12", + "<3,15,1,3>": "400", + "<3,15,1,4>": "0", + "<3,15,1,5>": "0", + "<3,15,1,6>": "0", + "<3,15,1,7>": "0", + "<3,15,1,8>": "34", + "<3,15,1,9>": "0", + "<3,15,1,10>": "3", + "<3,15,1,11>": "2", + "<3,15,1,12>": "1", + "<3,15,1,13>": "0", + "<3,15,1,14>": "0" + } + }, + "<3,16>": "", + "<3,17>": "", + "<3,18>": "", + "<3,19>": "", + "<3,20>": "", + "<3,21>": "", + "<3,22>": "", + "<3,23>": "", + "<3,24>": "", + "<3,25>": "0", + "<3,26>": "0", + "<3,27>": "", + "<3,28>": "<>", + "<3,29>": "<>", + "<3,30>": "<>", + "<3,31>": "0", + "<3,32>": { + "<3,32,1>": "0x7fffe", + "<3,32,2>": "0xf0016d08" + }, + "<3,33>": "", + "<3,34>": "", + "<3,35>": "", + "<3,36>": "", + "<3,37>": "", + "<3,38>": "", + "<3,39>": "", + "<3,40>": "", + "<3,41>": "", + "<3,42>": "", + "<3,43>": "", + "<3,44>": "", + "<3,45>": "", + "<3,46>": "", + "<3,47>": "", + "<3,48>": "", + "<3,49>": "", + "<3,50>": "", + "<3,51>": "", + "<3,52>": "" + }, + "<4>": { + "<4,1>": "EDL_FROM", + "<4,2>": "", + "<4,3>": "EDITFIELD", + "<4,4>": "SRP_MAIL_DEMO", + "<4,5>": "107", + "<4,6>": "147", + "<4,7>": "200", + "<4,8>": "23", + "<4,9>": "", + "<4,10>": { + "<4,10,1>": "0x50000080", + "<4,10,2>": "0x200" + }, + "<4,11>": "0x0", + "<4,12>": "2", + "<4,13>": "", + "<4,14>": "0", + "<4,15>": { + "<4,15,1>": { + "<4,15,1,1>": "Segoe UI", + "<4,15,1,2>": "-12", + "<4,15,1,3>": "400", + "<4,15,1,4>": "0", + "<4,15,1,5>": "0", + "<4,15,1,6>": "0", + "<4,15,1,7>": "0", + "<4,15,1,8>": "34", + "<4,15,1,9>": "0", + "<4,15,1,10>": "3", + "<4,15,1,11>": "2", + "<4,15,1,12>": "1", + "<4,15,1,13>": "0", + "<4,15,1,14>": "0" + } + }, + "<4,16>": "", + "<4,17>": "", + "<4,18>": "", + "<4,19>": "", + "<4,20>": "", + "<4,21>": "", + "<4,22>": "", + "<4,23>": "", + "<4,24>": "", + "<4,25>": "0", + "<4,26>": "0", + "<4,27>": "", + "<4,28>": "<>", + "<4,29>": "<>", + "<4,30>": "<>", + "<4,31>": "0", + "<4,32>": { + "<4,32,1>": "0x7fffe", + "<4,32,2>": "0x70016408" + }, + "<4,33>": "", + "<4,34>": "", + "<4,35>": "", + "<4,36>": "", + "<4,37>": "", + "<4,38>": "", + "<4,39>": "", + "<4,40>": "", + "<4,41>": "", + "<4,42>": "", + "<4,43>": "", + "<4,44>": "", + "<4,45>": "", + "<4,46>": "", + "<4,47>": "", + "<4,48>": "", + "<4,49>": "", + "<4,50>": "", + "<4,51>": "", + "<4,52>": "" + }, + "<5>": { + "<5,1>": "STA_TO", + "<5,2>": "", + "<5,3>": "STATIC", + "<5,4>": "SRP_MAIL_DEMO", + "<5,5>": "44", + "<5,6>": "176", + "<5,7>": "48", + "<5,8>": "19", + "<5,9>": "To", + "<5,10>": { + "<5,10,1>": "0x50000000", + "<5,10,2>": "0x0" + }, + "<5,11>": "0x0", + "<5,12>": "0", + "<5,13>": "", + "<5,14>": "0", + "<5,15>": { + "<5,15,1>": { + "<5,15,1,1>": "Segoe UI", + "<5,15,1,2>": "-12", + "<5,15,1,3>": "400", + "<5,15,1,4>": "0", + "<5,15,1,5>": "0", + "<5,15,1,6>": "0", + "<5,15,1,7>": "0", + "<5,15,1,8>": "34", + "<5,15,1,9>": "0", + "<5,15,1,10>": "3", + "<5,15,1,11>": "2", + "<5,15,1,12>": "1", + "<5,15,1,13>": "0", + "<5,15,1,14>": "0" + } + }, + "<5,16>": "", + "<5,17>": "", + "<5,18>": "", + "<5,19>": "", + "<5,20>": "", + "<5,21>": "", + "<5,22>": "", + "<5,23>": "", + "<5,24>": "", + "<5,25>": "0", + "<5,26>": "0", + "<5,27>": "", + "<5,28>": "<>", + "<5,29>": "<>", + "<5,30>": "<>", + "<5,31>": "0", + "<5,32>": { + "<5,32,1>": "0x7fffe", + "<5,32,2>": "0xf0016d08" + }, + "<5,33>": "", + "<5,34>": "", + "<5,35>": "", + "<5,36>": "", + "<5,37>": "", + "<5,38>": "", + "<5,39>": "", + "<5,40>": "", + "<5,41>": "", + "<5,42>": "", + "<5,43>": "", + "<5,44>": "", + "<5,45>": "", + "<5,46>": "", + "<5,47>": "", + "<5,48>": "", + "<5,49>": "", + "<5,50>": "", + "<5,51>": "", + "<5,52>": "" + }, + "<6>": { + "<6,1>": "EDL_TO", + "<6,2>": "", + "<6,3>": "EDITFIELD", + "<6,4>": "SRP_MAIL_DEMO", + "<6,5>": "107", + "<6,6>": "173", + "<6,7>": "200", + "<6,8>": "23", + "<6,9>": "", + "<6,10>": { + "<6,10,1>": "0x50000080", + "<6,10,2>": "0x200" + }, + "<6,11>": "0x0", + "<6,12>": "3", + "<6,13>": "", + "<6,14>": "0", + "<6,15>": { + "<6,15,1>": { + "<6,15,1,1>": "Segoe UI", + "<6,15,1,2>": "-12", + "<6,15,1,3>": "400", + "<6,15,1,4>": "0", + "<6,15,1,5>": "0", + "<6,15,1,6>": "0", + "<6,15,1,7>": "0", + "<6,15,1,8>": "34", + "<6,15,1,9>": "0", + "<6,15,1,10>": "3", + "<6,15,1,11>": "2", + "<6,15,1,12>": "1", + "<6,15,1,13>": "0", + "<6,15,1,14>": "0" + } + }, + "<6,16>": "", + "<6,17>": "", + "<6,18>": "", + "<6,19>": "", + "<6,20>": "", + "<6,21>": "", + "<6,22>": "", + "<6,23>": "", + "<6,24>": "", + "<6,25>": "0", + "<6,26>": "0", + "<6,27>": "", + "<6,28>": "<>", + "<6,29>": "<>", + "<6,30>": "<>", + "<6,31>": "0", + "<6,32>": { + "<6,32,1>": "0x7fffe", + "<6,32,2>": "0x70016408" + }, + "<6,33>": "", + "<6,34>": "", + "<6,35>": "", + "<6,36>": "", + "<6,37>": "", + "<6,38>": "", + "<6,39>": "", + "<6,40>": "", + "<6,41>": "", + "<6,42>": "", + "<6,43>": "", + "<6,44>": "", + "<6,45>": "", + "<6,46>": "", + "<6,47>": "", + "<6,48>": "", + "<6,49>": "", + "<6,50>": "", + "<6,51>": "", + "<6,52>": "" + }, + "<7>": { + "<7,1>": "STA_CC", + "<7,2>": "", + "<7,3>": "STATIC", + "<7,4>": "SRP_MAIL_DEMO", + "<7,5>": "415", + "<7,6>": "124", + "<7,7>": "48", + "<7,8>": "19", + "<7,9>": "CC", + "<7,10>": { + "<7,10,1>": "0x50000000", + "<7,10,2>": "0x0" + }, + "<7,11>": "0x0", + "<7,12>": "0", + "<7,13>": "", + "<7,14>": "0", + "<7,15>": { + "<7,15,1>": { + "<7,15,1,1>": "Segoe UI", + "<7,15,1,2>": "-12", + "<7,15,1,3>": "400", + "<7,15,1,4>": "0", + "<7,15,1,5>": "0", + "<7,15,1,6>": "0", + "<7,15,1,7>": "0", + "<7,15,1,8>": "34", + "<7,15,1,9>": "0", + "<7,15,1,10>": "3", + "<7,15,1,11>": "2", + "<7,15,1,12>": "1", + "<7,15,1,13>": "0", + "<7,15,1,14>": "0" + } + }, + "<7,16>": "", + "<7,17>": "", + "<7,18>": "", + "<7,19>": "", + "<7,20>": "", + "<7,21>": "", + "<7,22>": "", + "<7,23>": "", + "<7,24>": "", + "<7,25>": "0", + "<7,26>": "0", + "<7,27>": "", + "<7,28>": "<>", + "<7,29>": "<>", + "<7,30>": "<>", + "<7,31>": "0", + "<7,32>": { + "<7,32,1>": "0x7fffe", + "<7,32,2>": "0xf0016d08" + }, + "<7,33>": "", + "<7,34>": "", + "<7,35>": "", + "<7,36>": "", + "<7,37>": "", + "<7,38>": "", + "<7,39>": "", + "<7,40>": "", + "<7,41>": "", + "<7,42>": "", + "<7,43>": "", + "<7,44>": "", + "<7,45>": "", + "<7,46>": "", + "<7,47>": "", + "<7,48>": "", + "<7,49>": "", + "<7,50>": "", + "<7,51>": "", + "<7,52>": "" + }, + "<8>": { + "<8,1>": "EDL_CC", + "<8,2>": "", + "<8,3>": "EDITFIELD", + "<8,4>": "SRP_MAIL_DEMO", + "<8,5>": "471", + "<8,6>": "121", + "<8,7>": "200", + "<8,8>": "23", + "<8,9>": "", + "<8,10>": { + "<8,10,1>": "0x50000080", + "<8,10,2>": "0x200" + }, + "<8,11>": "0x0", + "<8,12>": "4", + "<8,13>": "", + "<8,14>": "0", + "<8,15>": { + "<8,15,1>": { + "<8,15,1,1>": "Segoe UI", + "<8,15,1,2>": "-12", + "<8,15,1,3>": "400", + "<8,15,1,4>": "0", + "<8,15,1,5>": "0", + "<8,15,1,6>": "0", + "<8,15,1,7>": "0", + "<8,15,1,8>": "34", + "<8,15,1,9>": "0", + "<8,15,1,10>": "3", + "<8,15,1,11>": "2", + "<8,15,1,12>": "1", + "<8,15,1,13>": "0", + "<8,15,1,14>": "0" + } + }, + "<8,16>": "", + "<8,17>": "", + "<8,18>": "", + "<8,19>": "", + "<8,20>": "", + "<8,21>": "", + "<8,22>": "", + "<8,23>": "", + "<8,24>": "", + "<8,25>": "0", + "<8,26>": "0", + "<8,27>": "", + "<8,28>": "<>", + "<8,29>": "<>", + "<8,30>": "<>", + "<8,31>": "0", + "<8,32>": { + "<8,32,1>": "0x7fffe", + "<8,32,2>": "0xf0016408" + }, + "<8,33>": "", + "<8,34>": "", + "<8,35>": "", + "<8,36>": "", + "<8,37>": "", + "<8,38>": "", + "<8,39>": "", + "<8,40>": "", + "<8,41>": "", + "<8,42>": "", + "<8,43>": "", + "<8,44>": "", + "<8,45>": "", + "<8,46>": "", + "<8,47>": "", + "<8,48>": "", + "<8,49>": "", + "<8,50>": "", + "<8,51>": "", + "<8,52>": "" + }, + "<9>": { + "<9,1>": "STA_BCC", + "<9,2>": "", + "<9,3>": "STATIC", + "<9,4>": "SRP_MAIL_DEMO", + "<9,5>": "415", + "<9,6>": "150", + "<9,7>": "48", + "<9,8>": "19", + "<9,9>": "BCC", + "<9,10>": { + "<9,10,1>": "0x50000000", + "<9,10,2>": "0x0" + }, + "<9,11>": "0x0", + "<9,12>": "0", + "<9,13>": "", + "<9,14>": "0", + "<9,15>": { + "<9,15,1>": { + "<9,15,1,1>": "Segoe UI", + "<9,15,1,2>": "-12", + "<9,15,1,3>": "400", + "<9,15,1,4>": "0", + "<9,15,1,5>": "0", + "<9,15,1,6>": "0", + "<9,15,1,7>": "0", + "<9,15,1,8>": "34", + "<9,15,1,9>": "0", + "<9,15,1,10>": "3", + "<9,15,1,11>": "2", + "<9,15,1,12>": "1", + "<9,15,1,13>": "0", + "<9,15,1,14>": "0" + } + }, + "<9,16>": "", + "<9,17>": "", + "<9,18>": "", + "<9,19>": "", + "<9,20>": "", + "<9,21>": "", + "<9,22>": "", + "<9,23>": "", + "<9,24>": "", + "<9,25>": "0", + "<9,26>": "0", + "<9,27>": "", + "<9,28>": "<>", + "<9,29>": "<>", + "<9,30>": "<>", + "<9,31>": "0", + "<9,32>": { + "<9,32,1>": "0x7fffe", + "<9,32,2>": "0xf0016d08" + }, + "<9,33>": "", + "<9,34>": "", + "<9,35>": "", + "<9,36>": "", + "<9,37>": "", + "<9,38>": "", + "<9,39>": "", + "<9,40>": "", + "<9,41>": "", + "<9,42>": "", + "<9,43>": "", + "<9,44>": "", + "<9,45>": "", + "<9,46>": "", + "<9,47>": "", + "<9,48>": "", + "<9,49>": "", + "<9,50>": "", + "<9,51>": "", + "<9,52>": "" + }, + "<10>": { + "<10,1>": "EDL_BCC", + "<10,2>": "", + "<10,3>": "EDITFIELD", + "<10,4>": "SRP_MAIL_DEMO", + "<10,5>": "471", + "<10,6>": "147", + "<10,7>": "200", + "<10,8>": "23", + "<10,9>": "", + "<10,10>": { + "<10,10,1>": "0x50000080", + "<10,10,2>": "0x200" + }, + "<10,11>": "0x0", + "<10,12>": "5", + "<10,13>": "", + "<10,14>": "0", + "<10,15>": { + "<10,15,1>": { + "<10,15,1,1>": "Segoe UI", + "<10,15,1,2>": "-12", + "<10,15,1,3>": "400", + "<10,15,1,4>": "0", + "<10,15,1,5>": "0", + "<10,15,1,6>": "0", + "<10,15,1,7>": "0", + "<10,15,1,8>": "34", + "<10,15,1,9>": "0", + "<10,15,1,10>": "3", + "<10,15,1,11>": "2", + "<10,15,1,12>": "1", + "<10,15,1,13>": "0", + "<10,15,1,14>": "0" + } + }, + "<10,16>": "", + "<10,17>": "", + "<10,18>": "", + "<10,19>": "", + "<10,20>": "", + "<10,21>": "", + "<10,22>": "", + "<10,23>": "", + "<10,24>": "", + "<10,25>": "0", + "<10,26>": "0", + "<10,27>": "", + "<10,28>": "<>", + "<10,29>": "<>", + "<10,30>": "<>", + "<10,31>": "0", + "<10,32>": { + "<10,32,1>": "0x7fffe", + "<10,32,2>": "0xf0016408" + }, + "<10,33>": "", + "<10,34>": "", + "<10,35>": "", + "<10,36>": "", + "<10,37>": "", + "<10,38>": "", + "<10,39>": "", + "<10,40>": "", + "<10,41>": "", + "<10,42>": "", + "<10,43>": "", + "<10,44>": "", + "<10,45>": "", + "<10,46>": "", + "<10,47>": "", + "<10,48>": "", + "<10,49>": "", + "<10,50>": "", + "<10,51>": "", + "<10,52>": "" + }, + "<11>": { + "<11,1>": "STA_REPLY_TO", + "<11,2>": "", + "<11,3>": "STATIC", + "<11,4>": "SRP_MAIL_DEMO", + "<11,5>": "415", + "<11,6>": "176", + "<11,7>": "48", + "<11,8>": "19", + "<11,9>": "Reply To", + "<11,10>": { + "<11,10,1>": "0x50000000", + "<11,10,2>": "0x0" + }, + "<11,11>": "0x0", + "<11,12>": "0", + "<11,13>": "", + "<11,14>": "0", + "<11,15>": { + "<11,15,1>": { + "<11,15,1,1>": "Segoe UI", + "<11,15,1,2>": "-12", + "<11,15,1,3>": "400", + "<11,15,1,4>": "0", + "<11,15,1,5>": "0", + "<11,15,1,6>": "0", + "<11,15,1,7>": "0", + "<11,15,1,8>": "34", + "<11,15,1,9>": "0", + "<11,15,1,10>": "3", + "<11,15,1,11>": "2", + "<11,15,1,12>": "1", + "<11,15,1,13>": "0", + "<11,15,1,14>": "0" + } + }, + "<11,16>": "", + "<11,17>": "", + "<11,18>": "", + "<11,19>": "", + "<11,20>": "", + "<11,21>": "", + "<11,22>": "", + "<11,23>": "", + "<11,24>": "", + "<11,25>": "0", + "<11,26>": "0", + "<11,27>": "", + "<11,28>": "<>", + "<11,29>": "<>", + "<11,30>": "<>", + "<11,31>": "0", + "<11,32>": { + "<11,32,1>": "0x7fffe", + "<11,32,2>": "0xf0016d08" + }, + "<11,33>": "", + "<11,34>": "", + "<11,35>": "", + "<11,36>": "", + "<11,37>": "", + "<11,38>": "", + "<11,39>": "", + "<11,40>": "", + "<11,41>": "", + "<11,42>": "", + "<11,43>": "", + "<11,44>": "", + "<11,45>": "", + "<11,46>": "", + "<11,47>": "", + "<11,48>": "", + "<11,49>": "", + "<11,50>": "", + "<11,51>": "", + "<11,52>": "" + }, + "<12>": { + "<12,1>": "EDL_REPLY_TO", + "<12,2>": "", + "<12,3>": "EDITFIELD", + "<12,4>": "SRP_MAIL_DEMO", + "<12,5>": "471", + "<12,6>": "173", + "<12,7>": "200", + "<12,8>": "23", + "<12,9>": "", + "<12,10>": { + "<12,10,1>": "0x50000080", + "<12,10,2>": "0x200" + }, + "<12,11>": "0x0", + "<12,12>": "6", + "<12,13>": "", + "<12,14>": "0", + "<12,15>": { + "<12,15,1>": { + "<12,15,1,1>": "Segoe UI", + "<12,15,1,2>": "-12", + "<12,15,1,3>": "400", + "<12,15,1,4>": "0", + "<12,15,1,5>": "0", + "<12,15,1,6>": "0", + "<12,15,1,7>": "0", + "<12,15,1,8>": "34", + "<12,15,1,9>": "0", + "<12,15,1,10>": "3", + "<12,15,1,11>": "2", + "<12,15,1,12>": "1", + "<12,15,1,13>": "0", + "<12,15,1,14>": "0" + } + }, + "<12,16>": "", + "<12,17>": "", + "<12,18>": "", + "<12,19>": "", + "<12,20>": "", + "<12,21>": "", + "<12,22>": "", + "<12,23>": "", + "<12,24>": "", + "<12,25>": "0", + "<12,26>": "0", + "<12,27>": "", + "<12,28>": "<>", + "<12,29>": "<>", + "<12,30>": "<>", + "<12,31>": "0", + "<12,32>": { + "<12,32,1>": "0x7fffe", + "<12,32,2>": "0xf0016408" + }, + "<12,33>": "", + "<12,34>": "", + "<12,35>": "", + "<12,36>": "", + "<12,37>": "", + "<12,38>": "", + "<12,39>": "", + "<12,40>": "", + "<12,41>": "", + "<12,42>": "", + "<12,43>": "", + "<12,44>": "", + "<12,45>": "", + "<12,46>": "", + "<12,47>": "", + "<12,48>": "", + "<12,49>": "", + "<12,50>": "", + "<12,51>": "", + "<12,52>": "" + }, + "<13>": { + "<13,1>": "STA_BODY_TYPE", + "<13,2>": "", + "<13,3>": "STATIC", + "<13,4>": "SRP_MAIL_DEMO", + "<13,5>": "44", + "<13,6>": "215", + "<13,7>": "59", + "<13,8>": "19", + "<13,9>": "Body Type", + "<13,10>": { + "<13,10,1>": "0x50000000", + "<13,10,2>": "0x0" + }, + "<13,11>": "0x0", + "<13,12>": "0", + "<13,13>": "", + "<13,14>": "0", + "<13,15>": { + "<13,15,1>": { + "<13,15,1,1>": "Segoe UI", + "<13,15,1,2>": "-12", + "<13,15,1,3>": "400", + "<13,15,1,4>": "0", + "<13,15,1,5>": "0", + "<13,15,1,6>": "0", + "<13,15,1,7>": "0", + "<13,15,1,8>": "34", + "<13,15,1,9>": "0", + "<13,15,1,10>": "3", + "<13,15,1,11>": "2", + "<13,15,1,12>": "1", + "<13,15,1,13>": "0", + "<13,15,1,14>": "0" + } + }, + "<13,16>": "", + "<13,17>": "", + "<13,18>": "", + "<13,19>": "", + "<13,20>": "", + "<13,21>": "", + "<13,22>": "", + "<13,23>": "", + "<13,24>": "", + "<13,25>": "0", + "<13,26>": "0", + "<13,27>": "", + "<13,28>": "<>", + "<13,29>": "<>", + "<13,30>": "<>", + "<13,31>": "0", + "<13,32>": { + "<13,32,1>": "0x7fffe", + "<13,32,2>": "0xf0016d08" + }, + "<13,33>": "", + "<13,34>": "", + "<13,35>": "", + "<13,36>": "", + "<13,37>": "", + "<13,38>": "", + "<13,39>": "", + "<13,40>": "", + "<13,41>": "", + "<13,42>": "", + "<13,43>": "", + "<13,44>": "", + "<13,45>": "", + "<13,46>": "", + "<13,47>": "", + "<13,48>": "", + "<13,49>": "", + "<13,50>": "", + "<13,51>": "", + "<13,52>": "" + }, + "<14>": { + "<14,1>": "COB_BODY_TYPE", + "<14,2>": "", + "<14,3>": "COMBOBOX", + "<14,4>": "SRP_MAIL_DEMO", + "<14,5>": "107", + "<14,6>": "212", + "<14,7>": "100", + "<14,8>": "60", + "<14,9>": "HTML", + "<14,10>": { + "<14,10,1>": "0x50000003", + "<14,10,2>": "0x0" + }, + "<14,11>": "0x0", + "<14,12>": "7", + "<14,13>": "", + "<14,14>": "0", + "<14,15>": { + "<14,15,1>": { + "<14,15,1,1>": "Segoe UI", + "<14,15,1,2>": "-12", + "<14,15,1,3>": "400", + "<14,15,1,4>": "0", + "<14,15,1,5>": "0", + "<14,15,1,6>": "0", + "<14,15,1,7>": "0", + "<14,15,1,8>": "34", + "<14,15,1,9>": "0", + "<14,15,1,10>": "3", + "<14,15,1,11>": "2", + "<14,15,1,12>": "1", + "<14,15,1,13>": "0", + "<14,15,1,14>": "0" + } + }, + "<14,16>": "", + "<14,17>": "", + "<14,18>": { + "<14,18,1>": { + "<14,18,1,1>": "R", + "<14,18,1,2>": "EXECUTE", + "<14,18,1,3>": "SYSPROG*STPROCEXE**OBJ_CALL_EVENT", + "<14,18,1,4>": { + "<14,18,1,4,1>": "@SELF", + "<14,18,1,4,2>": "@EVENT", + "<14,18,1,4,3>": "@PARAM1", + "<14,18,1,4,4>": "@PARAM2", + "<14,18,1,4,5>": "@PARAM3", + "<14,18,1,4,6>": "@PARAM4", + "<14,18,1,4,7>": "@PARAM5", + "<14,18,1,4,8>": "@PARAM6" + }, + "<14,18,1,5>": "", + "<14,18,1,6>": "" + }, + "<14,18,2>": "" + }, + "<14,19>": { + "<14,19,1>": "CHANGED", + "<14,19,2>": "" + }, + "<14,20>": "", + "<14,21>": "", + "<14,22>": "", + "<14,23>": "", + "<14,24>": "", + "<14,25>": "0", + "<14,26>": "0", + "<14,27>": "", + "<14,28>": "<>", + "<14,29>": "<>", + "<14,30>": "<>", + "<14,31>": "0", + "<14,32>": { + "<14,32,1>": "0x7fff6", + "<14,32,2>": "0xf0016988" + }, + "<14,33>": "", + "<14,34>": "", + "<14,35>": { + "<14,35,1>": { + "<14,35,1,1>": "HTML", + "<14,35,1,2>": "TEXT" + } + }, + "<14,36>": "", + "<14,37>": "", + "<14,38>": "", + "<14,39>": "", + "<14,40>": "", + "<14,41>": "", + "<14,42>": "", + "<14,43>": "", + "<14,44>": "", + "<14,45>": "", + "<14,46>": "", + "<14,47>": "", + "<14,48>": "", + "<14,49>": "", + "<14,50>": "", + "<14,51>": "", + "<14,52>": "" + }, + "<15>": { + "<15,1>": "STA_ATTACHMENTS", + "<15,2>": "", + "<15,3>": "STATIC", + "<15,4>": "SRP_MAIL_DEMO", + "<15,5>": "44", + "<15,6>": "383", + "<15,7>": "247", + "<15,8>": "15", + "<15,9>": "Attachments (Enter full paths and file names):", + "<15,10>": { + "<15,10,1>": "0x50000000", + "<15,10,2>": "0x0" + }, + "<15,11>": "0x0", + "<15,12>": "0", + "<15,13>": "", + "<15,14>": "0", + "<15,15>": { + "<15,15,1>": { + "<15,15,1,1>": "Segoe UI", + "<15,15,1,2>": "-12", + "<15,15,1,3>": "400", + "<15,15,1,4>": "0", + "<15,15,1,5>": "0", + "<15,15,1,6>": "0", + "<15,15,1,7>": "0", + "<15,15,1,8>": "34", + "<15,15,1,9>": "0", + "<15,15,1,10>": "3", + "<15,15,1,11>": "2", + "<15,15,1,12>": "1", + "<15,15,1,13>": "0", + "<15,15,1,14>": "0" + } + }, + "<15,16>": "", + "<15,17>": "", + "<15,18>": "", + "<15,19>": "", + "<15,20>": "", + "<15,21>": "", + "<15,22>": "", + "<15,23>": "", + "<15,24>": "", + "<15,25>": "0", + "<15,26>": "0", + "<15,27>": "", + "<15,28>": "<>", + "<15,29>": "<>", + "<15,30>": "<>", + "<15,31>": "0", + "<15,32>": { + "<15,32,1>": "0x7fffe", + "<15,32,2>": "0xf0016c08" + }, + "<15,33>": "", + "<15,34>": "", + "<15,35>": "", + "<15,36>": "", + "<15,37>": "", + "<15,38>": "", + "<15,39>": "", + "<15,40>": "", + "<15,41>": "", + "<15,42>": "", + "<15,43>": "", + "<15,44>": "", + "<15,45>": "", + "<15,46>": "", + "<15,47>": "", + "<15,48>": "", + "<15,49>": "", + "<15,50>": "", + "<15,51>": "", + "<15,52>": "" + }, + "<16>": { + "<16,1>": "EDT_ATTACHMENTS", + "<16,2>": "", + "<16,3>": "EDITTABLE", + "<16,4>": "SRP_MAIL_DEMO", + "<16,5>": "44", + "<16,6>": "400", + "<16,7>": "625", + "<16,8>": "52", + "<16,9>": "", + "<16,10>": { + "<16,10,1>": "0x50a000c4", + "<16,10,2>": "0x0" + }, + "<16,11>": "0x0", + "<16,12>": "8", + "<16,13>": "", + "<16,14>": "0", + "<16,15>": { + "<16,15,1>": { + "<16,15,1,1>": "Segoe UI", + "<16,15,1,2>": "-12", + "<16,15,1,3>": "400", + "<16,15,1,4>": "0", + "<16,15,1,5>": "0", + "<16,15,1,6>": "0", + "<16,15,1,7>": "0", + "<16,15,1,8>": "34", + "<16,15,1,9>": "0", + "<16,15,1,10>": "3", + "<16,15,1,11>": "2", + "<16,15,1,12>": "1", + "<16,15,1,13>": "0", + "<16,15,1,14>": "0" + } + }, + "<16,16>": "", + "<16,17>": "", + "<16,18>": { + "<16,18,1>": { + "<16,18,1,1>": "R", + "<16,18,1,2>": "EXECUTE", + "<16,18,1,3>": "SYSPROG*STPROCEXE**OBJ_CALL_EVENT", + "<16,18,1,4>": { + "<16,18,1,4,1>": "@SELF", + "<16,18,1,4,2>": "@EVENT", + "<16,18,1,4,3>": "@PARAM1", + "<16,18,1,4,4>": "@PARAM2", + "<16,18,1,4,5>": "@PARAM3", + "<16,18,1,4,6>": "@PARAM4", + "<16,18,1,4,7>": "@PARAM5", + "<16,18,1,4,8>": "@PARAM6" + }, + "<16,18,1,5>": "", + "<16,18,1,6>": "" + }, + "<16,18,2>": "" + }, + "<16,19>": { + "<16,19,1>": "OPTIONS", + "<16,19,2>": "" + }, + "<16,20>": "", + "<16,21>": "", + "<16,22>": "", + "<16,23>": "", + "<16,24>": "", + "<16,25>": "0", + "<16,26>": "0", + "<16,27>": "", + "<16,28>": { + "<16,28,1>": { + "<16,28,1,1>": "<>", + "<16,28,1,2>": "<>" + } + }, + "<16,29>": { + "<16,29,1>": { + "<16,29,1,1>": "<>", + "<16,29,1,2>": "<>" + } + }, + "<16,30>": { + "<16,30,1>": { + "<16,30,1,1>": "<>", + "<16,30,1,2>": "<>" + } + }, + "<16,31>": { + "<16,31,1>": { + "<16,31,1,1>": "0", + "<16,31,1,2>": "0" + } + }, + "<16,32>": { + "<16,32,1>": "0x7e27e", + "<16,32,2>": "0xc001e208" + }, + "<16,33>": "", + "<16,34>": "", + "<16,35>": { + "<16,35,1>": { + "<16,35,1,1>": "", + "<16,35,1,2>": "", + "<16,35,1,3>": "", + "<16,35,1,4>": "" + } + }, + "<16,36>": "", + "<16,37>": "", + "<16,38>": "", + "<16,39>": { + "<16,39,1>": { + "<16,39,1,1>": "80", + "<16,39,1,2>": "256" + } + }, + "<16,40>": "2", + "<16,41>": { + "<16,41,1>": "0", + "<16,41,2>": "2" + }, + "<16,42>": { + "<16,42,1>": { + "<16,42,1,1>": "264", + "<16,42,1,2>": "4" + } + }, + "<16,43>": { + "<16,43,1>": { + "<16,43,1,1>": "40", + "<16,43,1,2>": "23", + "<16,43,1,3>": "200" + } + }, + "<16,44>": { + "<16,44,1>": { + "<16,44,1,1>": "...", + "<16,44,1,2>": "Full Path" + } + }, + "<16,45>": "", + "<16,46>": "", + "<16,47>": "", + "<16,48>": "", + "<16,49>": "", + "<16,50>": "", + "<16,51>": { + "<16,51,1>": "", + "<16,51,2>": "" + }, + "<16,52>": "" + }, + "<17>": { + "<17,1>": "STA_SERVER_PORT", + "<17,2>": "", + "<17,3>": "STATIC", + "<17,4>": "SRP_MAIL_DEMO", + "<17,5>": "44", + "<17,6>": "544", + "<17,7>": "63", + "<17,8>": "19", + "<17,9>": "Server Port", + "<17,10>": { + "<17,10,1>": "0x50000000", + "<17,10,2>": "0x0" + }, + "<17,11>": "0x0", + "<17,12>": "0", + "<17,13>": "", + "<17,14>": "0", + "<17,15>": { + "<17,15,1>": { + "<17,15,1,1>": "Segoe UI", + "<17,15,1,2>": "-12", + "<17,15,1,3>": "400", + "<17,15,1,4>": "0", + "<17,15,1,5>": "0", + "<17,15,1,6>": "0", + "<17,15,1,7>": "0", + "<17,15,1,8>": "34", + "<17,15,1,9>": "0", + "<17,15,1,10>": "3", + "<17,15,1,11>": "2", + "<17,15,1,12>": "1", + "<17,15,1,13>": "0", + "<17,15,1,14>": "0" + } + }, + "<17,16>": "", + "<17,17>": "", + "<17,18>": "", + "<17,19>": "", + "<17,20>": "", + "<17,21>": "", + "<17,22>": "", + "<17,23>": "", + "<17,24>": "", + "<17,25>": "0", + "<17,26>": "0", + "<17,27>": "", + "<17,28>": "<>", + "<17,29>": "<>", + "<17,30>": "<>", + "<17,31>": "0", + "<17,32>": { + "<17,32,1>": "0x7fffe", + "<17,32,2>": "0xf0016d08" + }, + "<17,33>": "", + "<17,34>": "", + "<17,35>": "", + "<17,36>": "", + "<17,37>": "", + "<17,38>": "", + "<17,39>": "", + "<17,40>": "", + "<17,41>": "", + "<17,42>": "", + "<17,43>": "", + "<17,44>": "", + "<17,45>": "", + "<17,46>": "", + "<17,47>": "", + "<17,48>": "", + "<17,49>": "", + "<17,50>": "", + "<17,51>": "", + "<17,52>": "" + }, + "<18>": { + "<18,1>": "COB_SERVER_PORT", + "<18,2>": "", + "<18,3>": "COMBOBOX", + "<18,4>": "SRP_MAIL_DEMO", + "<18,5>": "134", + "<18,6>": "541", + "<18,7>": "200", + "<18,8>": "60", + "<18,9>": "", + "<18,10>": { + "<18,10,1>": "0x50000002", + "<18,10,2>": "0x0" + }, + "<18,11>": "0x0", + "<18,12>": "9", + "<18,13>": "", + "<18,14>": "0", + "<18,15>": { + "<18,15,1>": { + "<18,15,1,1>": "Segoe UI", + "<18,15,1,2>": "-12", + "<18,15,1,3>": "400", + "<18,15,1,4>": "0", + "<18,15,1,5>": "0", + "<18,15,1,6>": "0", + "<18,15,1,7>": "0", + "<18,15,1,8>": "34", + "<18,15,1,9>": "0", + "<18,15,1,10>": "3", + "<18,15,1,11>": "2", + "<18,15,1,12>": "1", + "<18,15,1,13>": "0", + "<18,15,1,14>": "0" + } + }, + "<18,16>": "", + "<18,17>": "", + "<18,18>": { + "<18,18,1>": { + "<18,18,1,1>": "R", + "<18,18,1,2>": "EXECUTE", + "<18,18,1,3>": "SYSPROG*STPROCEXE**OBJ_CALL_EVENT", + "<18,18,1,4>": { + "<18,18,1,4,1>": "@SELF", + "<18,18,1,4,2>": "@EVENT", + "<18,18,1,4,3>": "@PARAM1", + "<18,18,1,4,4>": "@PARAM2", + "<18,18,1,4,5>": "@PARAM3", + "<18,18,1,4,6>": "@PARAM4", + "<18,18,1,4,7>": "@PARAM5", + "<18,18,1,4,8>": "@PARAM6" + }, + "<18,18,1,5>": "", + "<18,18,1,6>": "" + }, + "<18,18,2>": "" + }, + "<18,19>": { + "<18,19,1>": "CHANGED", + "<18,19,2>": "" + }, + "<18,20>": "", + "<18,21>": "", + "<18,22>": "", + "<18,23>": "", + "<18,24>": "", + "<18,25>": "0", + "<18,26>": "0", + "<18,27>": "", + "<18,28>": "<>", + "<18,29>": "<>", + "<18,30>": "<>", + "<18,31>": "0", + "<18,32>": { + "<18,32,1>": "0x7fff6", + "<18,32,2>": "0xf0016908" + }, + "<18,33>": "", + "<18,34>": "", + "<18,35>": { + "<18,35,1>": { + "<18,35,1,1>": "25 (Non-Secure SMTP)", + "<18,35,1,2>": "587 (TLS)" + } + }, + "<18,36>": "", + "<18,37>": "", + "<18,38>": "", + "<18,39>": "", + "<18,40>": "", + "<18,41>": "", + "<18,42>": "", + "<18,43>": "", + "<18,44>": "", + "<18,45>": "", + "<18,46>": "", + "<18,47>": "", + "<18,48>": "", + "<18,49>": "", + "<18,50>": "", + "<18,51>": "", + "<18,52>": "" + }, + "<19>": { + "<19,1>": "STA_ENCRYPTION", + "<19,2>": "", + "<19,3>": "STATIC", + "<19,4>": "SRP_MAIL_DEMO", + "<19,5>": "44", + "<19,6>": "570", + "<19,7>": "63", + "<19,8>": "19", + "<19,9>": "Encryption", + "<19,10>": { + "<19,10,1>": "0x50000000", + "<19,10,2>": "0x0" + }, + "<19,11>": "0x0", + "<19,12>": "0", + "<19,13>": "", + "<19,14>": "0", + "<19,15>": { + "<19,15,1>": { + "<19,15,1,1>": "Segoe UI", + "<19,15,1,2>": "-12", + "<19,15,1,3>": "400", + "<19,15,1,4>": "0", + "<19,15,1,5>": "0", + "<19,15,1,6>": "0", + "<19,15,1,7>": "0", + "<19,15,1,8>": "34", + "<19,15,1,9>": "0", + "<19,15,1,10>": "3", + "<19,15,1,11>": "2", + "<19,15,1,12>": "1", + "<19,15,1,13>": "0", + "<19,15,1,14>": "0" + } + }, + "<19,16>": "", + "<19,17>": "", + "<19,18>": "", + "<19,19>": "", + "<19,20>": "", + "<19,21>": "", + "<19,22>": "", + "<19,23>": "", + "<19,24>": "", + "<19,25>": "0", + "<19,26>": "0", + "<19,27>": "", + "<19,28>": "<>", + "<19,29>": "<>", + "<19,30>": "<>", + "<19,31>": "0", + "<19,32>": { + "<19,32,1>": "0x7fffe", + "<19,32,2>": "0xf0016d08" + }, + "<19,33>": "", + "<19,34>": "", + "<19,35>": "", + "<19,36>": "", + "<19,37>": "", + "<19,38>": "", + "<19,39>": "", + "<19,40>": "", + "<19,41>": "", + "<19,42>": "", + "<19,43>": "", + "<19,44>": "", + "<19,45>": "", + "<19,46>": "", + "<19,47>": "", + "<19,48>": "", + "<19,49>": "", + "<19,50>": "", + "<19,51>": "", + "<19,52>": "" + }, + "<20>": { + "<20,1>": "COB_ENCRYPTION", + "<20,2>": "", + "<20,3>": "COMBOBOX", + "<20,4>": "SRP_MAIL_DEMO", + "<20,5>": "134", + "<20,6>": "567", + "<20,7>": "200", + "<20,8>": "60", + "<20,9>": "", + "<20,10>": { + "<20,10,1>": "0x50000003", + "<20,10,2>": "0x0" + }, + "<20,11>": "0x0", + "<20,12>": "10", + "<20,13>": "", + "<20,14>": "0", + "<20,15>": { + "<20,15,1>": { + "<20,15,1,1>": "Segoe UI", + "<20,15,1,2>": "-12", + "<20,15,1,3>": "400", + "<20,15,1,4>": "0", + "<20,15,1,5>": "0", + "<20,15,1,6>": "0", + "<20,15,1,7>": "0", + "<20,15,1,8>": "34", + "<20,15,1,9>": "0", + "<20,15,1,10>": "3", + "<20,15,1,11>": "2", + "<20,15,1,12>": "1", + "<20,15,1,13>": "0", + "<20,15,1,14>": "0" + } + }, + "<20,16>": "", + "<20,17>": "", + "<20,18>": { + "<20,18,1>": { + "<20,18,1,1>": "R", + "<20,18,1,2>": "EXECUTE", + "<20,18,1,3>": "SYSPROG*STPROCEXE**OBJ_CALL_EVENT", + "<20,18,1,4>": { + "<20,18,1,4,1>": "@SELF", + "<20,18,1,4,2>": "@EVENT", + "<20,18,1,4,3>": "@PARAM1", + "<20,18,1,4,4>": "@PARAM2", + "<20,18,1,4,5>": "@PARAM3", + "<20,18,1,4,6>": "@PARAM4", + "<20,18,1,4,7>": "@PARAM5", + "<20,18,1,4,8>": "@PARAM6" + }, + "<20,18,1,5>": "", + "<20,18,1,6>": "" + }, + "<20,18,2>": "" + }, + "<20,19>": { + "<20,19,1>": "CHANGED", + "<20,19,2>": "" + }, + "<20,20>": "", + "<20,21>": "", + "<20,22>": "", + "<20,23>": "", + "<20,24>": "", + "<20,25>": "0", + "<20,26>": "0", + "<20,27>": "", + "<20,28>": "<>", + "<20,29>": "<>", + "<20,30>": "<>", + "<20,31>": "0", + "<20,32>": { + "<20,32,1>": "0x7fff6", + "<20,32,2>": "0xf0016908" + }, + "<20,33>": "", + "<20,34>": "", + "<20,35>": { + "<20,35,1>": { + "<20,35,1,1>": "", + "<20,35,1,2>": "TLS" + } + }, + "<20,36>": "", + "<20,37>": "", + "<20,38>": "", + "<20,39>": "", + "<20,40>": "", + "<20,41>": "", + "<20,42>": "", + "<20,43>": "", + "<20,44>": "", + "<20,45>": "", + "<20,46>": "", + "<20,47>": "", + "<20,48>": "", + "<20,49>": "", + "<20,50>": "", + "<20,51>": "", + "<20,52>": "" + }, + "<21>": { + "<21,1>": "CHB_AUTHENTICATE", + "<21,2>": "", + "<21,3>": "CHECKBOX", + "<21,4>": "SRP_MAIL_DEMO", + "<21,5>": "44", + "<21,6>": "488", + "<21,7>": "329", + "<21,8>": "25", + "<21,9>": "Authenticate? (Should be set, unless otherwise indicated.)", + "<21,10>": { + "<21,10,1>": "0x50000003", + "<21,10,2>": "0x0" + }, + "<21,11>": "0x100", + "<21,12>": "11", + "<21,13>": "", + "<21,14>": "0", + "<21,15>": { + "<21,15,1>": { + "<21,15,1,1>": "Segoe UI", + "<21,15,1,2>": "-12", + "<21,15,1,3>": "400", + "<21,15,1,4>": "0", + "<21,15,1,5>": "0", + "<21,15,1,6>": "0", + "<21,15,1,7>": "0", + "<21,15,1,8>": "34", + "<21,15,1,9>": "0", + "<21,15,1,10>": "3", + "<21,15,1,11>": "2", + "<21,15,1,12>": "1", + "<21,15,1,13>": "0", + "<21,15,1,14>": "0" + } + }, + "<21,16>": "", + "<21,17>": "", + "<21,18>": "", + "<21,19>": "", + "<21,20>": "", + "<21,21>": "", + "<21,22>": "", + "<21,23>": "", + "<21,24>": "", + "<21,25>": "0", + "<21,26>": "0", + "<21,27>": "", + "<21,28>": "<>", + "<21,29>": "<>", + "<21,30>": "<>", + "<21,31>": "0", + "<21,32>": { + "<21,32,1>": "0x7ffee", + "<21,32,2>": "0xf0016508" + }, + "<21,33>": "", + "<21,34>": "", + "<21,35>": "", + "<21,36>": "1", + "<21,37>": "", + "<21,38>": "", + "<21,39>": "", + "<21,40>": "1", + "<21,41>": "", + "<21,42>": "", + "<21,43>": "", + "<21,44>": "", + "<21,45>": "", + "<21,46>": "", + "<21,47>": "", + "<21,48>": "", + "<21,49>": "", + "<21,50>": "", + "<21,51>": "" + }, + "<22>": { + "<22,1>": "STA_SMTP_SERVER", + "<22,2>": "", + "<22,3>": "STATIC", + "<22,4>": "SRP_MAIL_DEMO", + "<22,5>": "44", + "<22,6>": "518", + "<22,7>": "85", + "<22,8>": "19", + "<22,9>": "SMTP Server", + "<22,10>": { + "<22,10,1>": "0x50000000", + "<22,10,2>": "0x0" + }, + "<22,11>": "0x0", + "<22,12>": "0", + "<22,13>": "", + "<22,14>": "0", + "<22,15>": { + "<22,15,1>": { + "<22,15,1,1>": "Segoe UI", + "<22,15,1,2>": "-12", + "<22,15,1,3>": "400", + "<22,15,1,4>": "0", + "<22,15,1,5>": "0", + "<22,15,1,6>": "0", + "<22,15,1,7>": "0", + "<22,15,1,8>": "34", + "<22,15,1,9>": "0", + "<22,15,1,10>": "3", + "<22,15,1,11>": "2", + "<22,15,1,12>": "1", + "<22,15,1,13>": "0", + "<22,15,1,14>": "0" + } + }, + "<22,16>": "", + "<22,17>": "", + "<22,18>": "", + "<22,19>": "", + "<22,20>": "", + "<22,21>": "", + "<22,22>": "", + "<22,23>": "", + "<22,24>": "", + "<22,25>": "0", + "<22,26>": "0", + "<22,27>": "", + "<22,28>": "<>", + "<22,29>": "<>", + "<22,30>": "<>", + "<22,31>": "0", + "<22,32>": { + "<22,32,1>": "0x7fffe", + "<22,32,2>": "0xf0016d08" + }, + "<22,33>": "", + "<22,34>": "", + "<22,35>": "", + "<22,36>": "", + "<22,37>": "", + "<22,38>": "", + "<22,39>": "", + "<22,40>": "", + "<22,41>": "", + "<22,42>": "", + "<22,43>": "", + "<22,44>": "", + "<22,45>": "", + "<22,46>": "", + "<22,47>": "", + "<22,48>": "", + "<22,49>": "", + "<22,50>": "", + "<22,51>": "", + "<22,52>": "" + }, + "<23>": { + "<23,1>": "EDL_SMTP_SERVER", + "<23,2>": "", + "<23,3>": "EDITFIELD", + "<23,4>": "SRP_MAIL_DEMO", + "<23,5>": "134", + "<23,6>": "515", + "<23,7>": "200", + "<23,8>": "23", + "<23,9>": "", + "<23,10>": { + "<23,10,1>": "0x50000080", + "<23,10,2>": "0x200" + }, + "<23,11>": "0x0", + "<23,12>": "12", + "<23,13>": "", + "<23,14>": "0", + "<23,15>": { + "<23,15,1>": { + "<23,15,1,1>": "Segoe UI", + "<23,15,1,2>": "-12", + "<23,15,1,3>": "400", + "<23,15,1,4>": "0", + "<23,15,1,5>": "0", + "<23,15,1,6>": "0", + "<23,15,1,7>": "0", + "<23,15,1,8>": "34", + "<23,15,1,9>": "0", + "<23,15,1,10>": "3", + "<23,15,1,11>": "2", + "<23,15,1,12>": "1", + "<23,15,1,13>": "0", + "<23,15,1,14>": "0" + } + }, + "<23,16>": "", + "<23,17>": "", + "<23,18>": "", + "<23,19>": "", + "<23,20>": "", + "<23,21>": "", + "<23,22>": "", + "<23,23>": "", + "<23,24>": "", + "<23,25>": "0", + "<23,26>": "0", + "<23,27>": "", + "<23,28>": "<>", + "<23,29>": "<>", + "<23,30>": "<>", + "<23,31>": "0", + "<23,32>": { + "<23,32,1>": "0x7fffe", + "<23,32,2>": "0x70016408" + }, + "<23,33>": "", + "<23,34>": "", + "<23,35>": "", + "<23,36>": "", + "<23,37>": "", + "<23,38>": "", + "<23,39>": "", + "<23,40>": "", + "<23,41>": "", + "<23,42>": "", + "<23,43>": "", + "<23,44>": "", + "<23,45>": "", + "<23,46>": "", + "<23,47>": "", + "<23,48>": "", + "<23,49>": "", + "<23,50>": "", + "<23,51>": "", + "<23,52>": "" + }, + "<24>": { + "<24,1>": "STA_ACCOUNT_USERNAME", + "<24,2>": "", + "<24,3>": "STATIC", + "<24,4>": "SRP_MAIL_DEMO", + "<24,5>": "358", + "<24,6>": "544", + "<24,7>": "111", + "<24,8>": "19", + "<24,9>": "Account Username", + "<24,10>": { + "<24,10,1>": "0x50000000", + "<24,10,2>": "0x0" + }, + "<24,11>": "0x0", + "<24,12>": "0", + "<24,13>": "", + "<24,14>": "0", + "<24,15>": { + "<24,15,1>": { + "<24,15,1,1>": "Segoe UI", + "<24,15,1,2>": "-12", + "<24,15,1,3>": "400", + "<24,15,1,4>": "0", + "<24,15,1,5>": "0", + "<24,15,1,6>": "0", + "<24,15,1,7>": "0", + "<24,15,1,8>": "34", + "<24,15,1,9>": "0", + "<24,15,1,10>": "3", + "<24,15,1,11>": "2", + "<24,15,1,12>": "1", + "<24,15,1,13>": "0", + "<24,15,1,14>": "0" + } + }, + "<24,16>": "", + "<24,17>": "", + "<24,18>": "", + "<24,19>": "", + "<24,20>": "", + "<24,21>": "", + "<24,22>": "", + "<24,23>": "", + "<24,24>": "", + "<24,25>": "0", + "<24,26>": "0", + "<24,27>": "", + "<24,28>": "<>", + "<24,29>": "<>", + "<24,30>": "<>", + "<24,31>": "0", + "<24,32>": { + "<24,32,1>": "0x7fffe", + "<24,32,2>": "0xf0016d08" + }, + "<24,33>": "", + "<24,34>": "", + "<24,35>": "", + "<24,36>": "", + "<24,37>": "", + "<24,38>": "", + "<24,39>": "", + "<24,40>": "", + "<24,41>": "", + "<24,42>": "", + "<24,43>": "", + "<24,44>": "", + "<24,45>": "", + "<24,46>": "", + "<24,47>": "", + "<24,48>": "", + "<24,49>": "", + "<24,50>": "", + "<24,51>": "", + "<24,52>": "" + }, + "<25>": { + "<25,1>": "EDL_ACCOUNT_USERNAME", + "<25,2>": "", + "<25,3>": "EDITFIELD", + "<25,4>": "SRP_MAIL_DEMO", + "<25,5>": "471", + "<25,6>": "541", + "<25,7>": "200", + "<25,8>": "23", + "<25,9>": "", + "<25,10>": { + "<25,10,1>": "0x50000080", + "<25,10,2>": "0x200" + }, + "<25,11>": "0x0", + "<25,12>": "13", + "<25,13>": "", + "<25,14>": "0", + "<25,15>": { + "<25,15,1>": { + "<25,15,1,1>": "Segoe UI", + "<25,15,1,2>": "-12", + "<25,15,1,3>": "400", + "<25,15,1,4>": "0", + "<25,15,1,5>": "0", + "<25,15,1,6>": "0", + "<25,15,1,7>": "0", + "<25,15,1,8>": "34", + "<25,15,1,9>": "0", + "<25,15,1,10>": "3", + "<25,15,1,11>": "2", + "<25,15,1,12>": "1", + "<25,15,1,13>": "0", + "<25,15,1,14>": "0" + } + }, + "<25,16>": "", + "<25,17>": "", + "<25,18>": "", + "<25,19>": "", + "<25,20>": "", + "<25,21>": "", + "<25,22>": "", + "<25,23>": "", + "<25,24>": "", + "<25,25>": "0", + "<25,26>": "0", + "<25,27>": "", + "<25,28>": "<>", + "<25,29>": "<>", + "<25,30>": "<>", + "<25,31>": "0", + "<25,32>": { + "<25,32,1>": "0x7fffe", + "<25,32,2>": "0xf0016408" + }, + "<25,33>": "", + "<25,34>": "", + "<25,35>": "", + "<25,36>": "", + "<25,37>": "", + "<25,38>": "", + "<25,39>": "", + "<25,40>": "", + "<25,41>": "", + "<25,42>": "", + "<25,43>": "", + "<25,44>": "", + "<25,45>": "", + "<25,46>": "", + "<25,47>": "", + "<25,48>": "", + "<25,49>": "", + "<25,50>": "", + "<25,51>": "", + "<25,52>": "" + }, + "<26>": { + "<26,1>": "STA_ACCOUNT_PASSWORD", + "<26,2>": "", + "<26,3>": "STATIC", + "<26,4>": "SRP_MAIL_DEMO", + "<26,5>": "358", + "<26,6>": "570", + "<26,7>": "111", + "<26,8>": "19", + "<26,9>": "Acccount Password", + "<26,10>": { + "<26,10,1>": "0x50000000", + "<26,10,2>": "0x0" + }, + "<26,11>": "0x0", + "<26,12>": "0", + "<26,13>": "", + "<26,14>": "0", + "<26,15>": { + "<26,15,1>": { + "<26,15,1,1>": "Segoe UI", + "<26,15,1,2>": "-12", + "<26,15,1,3>": "400", + "<26,15,1,4>": "0", + "<26,15,1,5>": "0", + "<26,15,1,6>": "0", + "<26,15,1,7>": "0", + "<26,15,1,8>": "34", + "<26,15,1,9>": "0", + "<26,15,1,10>": "3", + "<26,15,1,11>": "2", + "<26,15,1,12>": "1", + "<26,15,1,13>": "0", + "<26,15,1,14>": "0" + } + }, + "<26,16>": "", + "<26,17>": "", + "<26,18>": "", + "<26,19>": "", + "<26,20>": "", + "<26,21>": "", + "<26,22>": "", + "<26,23>": "", + "<26,24>": "", + "<26,25>": "0", + "<26,26>": "0", + "<26,27>": "", + "<26,28>": "<>", + "<26,29>": "<>", + "<26,30>": "<>", + "<26,31>": "0", + "<26,32>": { + "<26,32,1>": "0x7fffe", + "<26,32,2>": "0xf0016d08" + }, + "<26,33>": "", + "<26,34>": "", + "<26,35>": "", + "<26,36>": "", + "<26,37>": "", + "<26,38>": "", + "<26,39>": "", + "<26,40>": "", + "<26,41>": "", + "<26,42>": "", + "<26,43>": "", + "<26,44>": "", + "<26,45>": "", + "<26,46>": "", + "<26,47>": "", + "<26,48>": "", + "<26,49>": "", + "<26,50>": "", + "<26,51>": "", + "<26,52>": "" + }, + "<27>": { + "<27,1>": "EDL_ACCOUNT_PASSWORD", + "<27,2>": "", + "<27,3>": "EDITFIELD", + "<27,4>": "SRP_MAIL_DEMO", + "<27,5>": "471", + "<27,6>": "567", + "<27,7>": "200", + "<27,8>": "23", + "<27,9>": "", + "<27,10>": { + "<27,10,1>": "0x50000080", + "<27,10,2>": "0x200" + }, + "<27,11>": "0x0", + "<27,12>": "14", + "<27,13>": "", + "<27,14>": "0", + "<27,15>": { + "<27,15,1>": { + "<27,15,1,1>": "Segoe UI", + "<27,15,1,2>": "-12", + "<27,15,1,3>": "400", + "<27,15,1,4>": "0", + "<27,15,1,5>": "0", + "<27,15,1,6>": "0", + "<27,15,1,7>": "0", + "<27,15,1,8>": "34", + "<27,15,1,9>": "0", + "<27,15,1,10>": "3", + "<27,15,1,11>": "2", + "<27,15,1,12>": "1", + "<27,15,1,13>": "0", + "<27,15,1,14>": "0" + } + }, + "<27,16>": "", + "<27,17>": "", + "<27,18>": "", + "<27,19>": "", + "<27,20>": "", + "<27,21>": "", + "<27,22>": "", + "<27,23>": "", + "<27,24>": "", + "<27,25>": "0", + "<27,26>": "0", + "<27,27>": "", + "<27,28>": "<>", + "<27,29>": "<>", + "<27,30>": "<>", + "<27,31>": "0", + "<27,32>": { + "<27,32,1>": "0x7fffe", + "<27,32,2>": "0xf0016408" + }, + "<27,33>": "", + "<27,34>": "", + "<27,35>": "", + "<27,36>": "", + "<27,37>": "", + "<27,38>": "", + "<27,39>": "", + "<27,40>": "", + "<27,41>": "", + "<27,42>": "", + "<27,43>": "", + "<27,44>": "", + "<27,45>": "", + "<27,46>": "", + "<27,47>": "", + "<27,48>": "", + "<27,49>": "", + "<27,50>": "", + "<27,51>": "", + "<27,52>": "" + }, + "<28>": { + "<28,1>": "PUB_SEND_EMAIL", + "<28,2>": "", + "<28,3>": "PUSHBUTTON", + "<28,4>": "SRP_MAIL_DEMO", + "<28,5>": "44", + "<28,6>": "632", + "<28,7>": "92", + "<28,8>": "65", + "<28,9>": "&Send\r\nEmail", + "<28,10>": { + "<28,10,1>": "0x50002000", + "<28,10,2>": "0x0" + }, + "<28,11>": "0x100", + "<28,12>": "15", + "<28,13>": "", + "<28,14>": "0", + "<28,15>": { + "<28,15,1>": { + "<28,15,1,1>": "Segoe UI", + "<28,15,1,2>": "-12", + "<28,15,1,3>": "400", + "<28,15,1,4>": "0", + "<28,15,1,5>": "0", + "<28,15,1,6>": "0", + "<28,15,1,7>": "0", + "<28,15,1,8>": "34", + "<28,15,1,9>": "0", + "<28,15,1,10>": "3", + "<28,15,1,11>": "2", + "<28,15,1,12>": "1", + "<28,15,1,13>": "0", + "<28,15,1,14>": "0" + } + }, + "<28,16>": "", + "<28,17>": "", + "<28,18>": { + "<28,18,1>": { + "<28,18,1,1>": "R", + "<28,18,1,2>": "EXECUTE", + "<28,18,1,3>": "SYSPROG*STPROCEXE**OBJ_CALL_EVENT", + "<28,18,1,4>": { + "<28,18,1,4,1>": "@SELF", + "<28,18,1,4,2>": "@EVENT", + "<28,18,1,4,3>": "@PARAM1", + "<28,18,1,4,4>": "@PARAM2", + "<28,18,1,4,5>": "@PARAM3", + "<28,18,1,4,6>": "@PARAM4", + "<28,18,1,4,7>": "@PARAM5", + "<28,18,1,4,8>": "@PARAM6" + }, + "<28,18,1,5>": "", + "<28,18,1,6>": "" + }, + "<28,18,2>": "" + }, + "<28,19>": { + "<28,19,1>": "CLICK", + "<28,19,2>": "" + }, + "<28,20>": "", + "<28,21>": "", + "<28,22>": "", + "<28,23>": "", + "<28,24>": "", + "<28,25>": "0", + "<28,26>": "0", + "<28,27>": "", + "<28,28>": "<>", + "<28,29>": "<>", + "<28,30>": "<>", + "<28,31>": "0", + "<28,32>": { + "<28,32,1>": "0x7fffe", + "<28,32,2>": "0xf0016008" + }, + "<28,33>": "", + "<28,34>": "", + "<28,35>": "", + "<28,36>": "", + "<28,37>": "", + "<28,38>": "", + "<28,39>": "", + "<28,40>": "1", + "<28,41>": "", + "<28,42>": "", + "<28,43>": "", + "<28,44>": "", + "<28,45>": "", + "<28,46>": "", + "<28,47>": "", + "<28,48>": "", + "<28,49>": "", + "<28,50>": "", + "<28,51>": "" + }, + "<29>": { + "<29,1>": "EDB_TEST_RESULTS", + "<29,2>": "", + "<29,3>": "EDITBOX", + "<29,4>": "SRP_MAIL_DEMO", + "<29,5>": "134", + "<29,6>": "633", + "<29,7>": "534", + "<29,8>": "63", + "<29,9>": "", + "<29,10>": { + "<29,10,1>": "0x502008c4", + "<29,10,2>": "0x200" + }, + "<29,11>": "0x0", + "<29,12>": "16", + "<29,13>": "", + "<29,14>": "0", + "<29,15>": { + "<29,15,1>": { + "<29,15,1,1>": "Segoe UI", + "<29,15,1,2>": "-12", + "<29,15,1,3>": "400", + "<29,15,1,4>": "0", + "<29,15,1,5>": "0", + "<29,15,1,6>": "0", + "<29,15,1,7>": "0", + "<29,15,1,8>": "34", + "<29,15,1,9>": "0", + "<29,15,1,10>": "3", + "<29,15,1,11>": "2", + "<29,15,1,12>": "1", + "<29,15,1,13>": "0", + "<29,15,1,14>": "0" + } + }, + "<29,16>": "", + "<29,17>": "", + "<29,18>": "", + "<29,19>": "", + "<29,20>": "", + "<29,21>": "", + "<29,22>": "", + "<29,23>": "", + "<29,24>": "", + "<29,25>": "0", + "<29,26>": "0", + "<29,27>": "", + "<29,28>": "<>", + "<29,29>": "<>", + "<29,30>": "<>", + "<29,31>": "0", + "<29,32>": { + "<29,32,1>": "0x7fffe", + "<29,32,2>": "0xf0016908" + }, + "<29,33>": "", + "<29,34>": "", + "<29,35>": "", + "<29,36>": "", + "<29,37>": "", + "<29,38>": "", + "<29,39>": "", + "<29,40>": "", + "<29,41>": "", + "<29,42>": "", + "<29,43>": "", + "<29,44>": "", + "<29,45>": "", + "<29,46>": "", + "<29,47>": "", + "<29,48>": "", + "<29,49>": "", + "<29,50>": "", + "<29,51>": "", + "<29,52>": "" + }, + "<30>": { + "<30,1>": "OLE_BODY", + "<30,2>": "", + "<30,3>": "OLECONTROL.Shell.Explorer", + "<30,4>": "SRP_MAIL_DEMO", + "<30,5>": "44", + "<30,6>": "238", + "<30,7>": "625", + "<30,8>": "137", + "<30,9>": "Shell.Explorer", + "<30,10>": { + "<30,10,1>": "0x50800000", + "<30,10,2>": "0x0" + }, + "<30,11>": "0x0", + "<30,12>": "17", + "<30,13>": "", + "<30,14>": "0", + "<30,15>": { + "<30,15,1>": { + "<30,15,1,1>": "Tahoma", + "<30,15,1,2>": "-11", + "<30,15,1,3>": "400", + "<30,15,1,4>": "0", + "<30,15,1,5>": "0", + "<30,15,1,6>": "0", + "<30,15,1,7>": "0", + "<30,15,1,8>": "34", + "<30,15,1,9>": "0", + "<30,15,1,10>": "3", + "<30,15,1,11>": "2", + "<30,15,1,12>": "1", + "<30,15,1,13>": "0", + "<30,15,1,14>": "0" + } + }, + "<30,16>": "", + "<30,17>": "", + "<30,18>": "", + "<30,19>": "", + "<30,20>": "", + "<30,21>": "", + "<30,22>": "", + "<30,23>": "", + "<30,24>": "", + "<30,25>": "0", + "<30,26>": "0", + "<30,27>": "", + "<30,28>": "<>", + "<30,29>": "<>", + "<30,30>": "<>", + "<30,31>": "0", + "<30,32>": { + "<30,32,1>": "0x7fffe", + "<30,32,2>": "0xf0016000" + }, + "<30,33>": "", + "<30,34>": "", + "<30,35>": "", + "<30,36>": "4C00000064400000F40D00000100000001020000000000000000000000000000000000004C000000000000000000000001000000E0D057007335CF11AE6908002B2E126208000000000000004C0000000114020000000000C000000000000046800000000000000000000000000000000000000000000000000000000000000000000000000000000100000000000000000000000000000000000000", + "<30,37>": "" + }, + "<31>": { + "<31,1>": "EDB_BODY", + "<31,2>": "", + "<31,3>": "EDITBOX", + "<31,4>": "SRP_MAIL_DEMO", + "<31,5>": "44", + "<31,6>": "237", + "<31,7>": "627", + "<31,8>": "137", + "<31,9>": "To Whom It May Concern:\r\n\r\nHere is your sample email in plain text format. We hope you this gives you some ideas on how to incorporate plain text emails into your existing application.\r\n\r\n \r\nInvoice No.\tDebtor's Name\tAmount Due\tPaid To Date\tBalance Due\r\n12345 \t\tTest Company, Inc. $1,234.56 \t$1,000.00 \t$234.56 \r\n\r\nStatus\t11/28/2016 - We still show the outstanding balance listed next to each invoice. Please pay promptly. \r\n\r\n \r\n\r\n\r\nPlease let us know if you have any questions!\r\nSRP Computer Solutions, Inc. ", + "<31,10>": { + "<31,10,1>": "0x40200844", + "<31,10,2>": "0x200" + }, + "<31,11>": "0x0", + "<31,12>": "18", + "<31,13>": "", + "<31,14>": "0", + "<31,15>": { + "<31,15,1>": { + "<31,15,1,1>": "Tahoma", + "<31,15,1,2>": "-11", + "<31,15,1,3>": "400", + "<31,15,1,4>": "0", + "<31,15,1,5>": "0", + "<31,15,1,6>": "0", + "<31,15,1,7>": "0", + "<31,15,1,8>": "34", + "<31,15,1,9>": "0", + "<31,15,1,10>": "3", + "<31,15,1,11>": "2", + "<31,15,1,12>": "1", + "<31,15,1,13>": "0", + "<31,15,1,14>": "0" + } + }, + "<31,16>": "", + "<31,17>": "", + "<31,18>": "", + "<31,19>": "", + "<31,20>": "", + "<31,21>": "", + "<31,22>": "", + "<31,23>": "", + "<31,24>": "", + "<31,25>": "0", + "<31,26>": "0", + "<31,27>": "", + "<31,28>": "<>", + "<31,29>": "<>", + "<31,30>": "<>", + "<31,31>": "0", + "<31,32>": { + "<31,32,1>": "0x7fffe", + "<31,32,2>": "0xf0016008" + }, + "<31,33>": "", + "<31,34>": "", + "<31,35>": "", + "<31,36>": "", + "<31,37>": "", + "<31,38>": "", + "<31,39>": "", + "<31,40>": "", + "<31,41>": "", + "<31,42>": "", + "<31,43>": "", + "<31,44>": "", + "<31,45>": "", + "<31,46>": "", + "<31,47>": "", + "<31,48>": "", + "<31,49>": "", + "<31,50>": "", + "<31,51>": "", + "<31,52>": "" + }, + "<32>": { + "<32,1>": "STA_HEADER1", + "<32,2>": "", + "<32,3>": "STATIC", + "<32,4>": "SRP_MAIL_DEMO", + "<32,5>": "22", + "<32,6>": "9", + "<32,7>": "139", + "<32,8>": "22", + "<32,9>": "SRP Mail Demo", + "<32,10>": { + "<32,10,1>": "0x50000000", + "<32,10,2>": "0x0" + }, + "<32,11>": "0x0", + "<32,12>": "0", + "<32,13>": "16777215", + "<32,14>": "0", + "<32,15>": { + "<32,15,1>": { + "<32,15,1,1>": "Segoe UI", + "<32,15,1,2>": "-15", + "<32,15,1,3>": "700", + "<32,15,1,4>": "0", + "<32,15,1,5>": "0", + "<32,15,1,6>": "0", + "<32,15,1,7>": "0", + "<32,15,1,8>": "34", + "<32,15,1,9>": "0", + "<32,15,1,10>": "3", + "<32,15,1,11>": "2", + "<32,15,1,12>": "1", + "<32,15,1,13>": "0", + "<32,15,1,14>": "0" + } + }, + "<32,16>": "", + "<32,17>": "", + "<32,18>": "", + "<32,19>": "", + "<32,20>": "", + "<32,21>": "", + "<32,22>": "", + "<32,23>": "", + "<32,24>": "", + "<32,25>": "0", + "<32,26>": "0", + "<32,27>": "", + "<32,28>": "<>", + "<32,29>": "<>", + "<32,30>": "<>", + "<32,31>": "0", + "<32,32>": { + "<32,32,1>": "0x7fffe", + "<32,32,2>": "0xf0014c08" + }, + "<32,33>": "", + "<32,34>": "", + "<32,35>": "", + "<32,36>": "", + "<32,37>": "", + "<32,38>": "", + "<32,39>": "", + "<32,40>": "", + "<32,41>": "", + "<32,42>": "", + "<32,43>": "", + "<32,44>": "", + "<32,45>": "", + "<32,46>": "", + "<32,47>": "", + "<32,48>": "", + "<32,49>": "", + "<32,50>": "", + "<32,51>": "", + "<32,52>": "" + }, + "<33>": { + "<33,1>": "STA_HEADER2", + "<33,2>": "", + "<33,3>": "STATIC", + "<33,4>": "SRP_MAIL_DEMO", + "<33,5>": "44", + "<33,6>": "36", + "<33,7>": "645", + "<33,8>": "30", + "<33,9>": "Use this demo window to test all of the features of the SRP Mail Utility. Source code that collects your input and calls the SRP_Send_Mail function is found in the CLICK.PUB_SEND_MAIL gosub of the SRP_MAIL_DEMO_EVENTS stored procedure.", + "<33,10>": { + "<33,10,1>": "0x50000000", + "<33,10,2>": "0x0" + }, + "<33,11>": "0x0", + "<33,12>": "0", + "<33,13>": "16777215", + "<33,14>": "0", + "<33,15>": { + "<33,15,1>": { + "<33,15,1,1>": "Segoe UI", + "<33,15,1,2>": "-12", + "<33,15,1,3>": "400", + "<33,15,1,4>": "0", + "<33,15,1,5>": "0", + "<33,15,1,6>": "0", + "<33,15,1,7>": "0", + "<33,15,1,8>": "34", + "<33,15,1,9>": "0", + "<33,15,1,10>": "3", + "<33,15,1,11>": "2", + "<33,15,1,12>": "1", + "<33,15,1,13>": "0", + "<33,15,1,14>": "0" + } + }, + "<33,16>": "", + "<33,17>": "", + "<33,18>": "", + "<33,19>": "", + "<33,20>": "", + "<33,21>": "", + "<33,22>": "", + "<33,23>": "", + "<33,24>": "", + "<33,25>": "0", + "<33,26>": "0", + "<33,27>": "", + "<33,28>": "<>", + "<33,29>": "<>", + "<33,30>": "<>", + "<33,31>": "0", + "<33,32>": { + "<33,32,1>": "0x7fffe", + "<33,32,2>": "0xf0014408" + }, + "<33,33>": "", + "<33,34>": "", + "<33,35>": "", + "<33,36>": "", + "<33,37>": "", + "<33,38>": "", + "<33,39>": "", + "<33,40>": "", + "<33,41>": "", + "<33,42>": "", + "<33,43>": "", + "<33,44>": "", + "<33,45>": "", + "<33,46>": "", + "<33,47>": "", + "<33,48>": "", + "<33,49>": "", + "<33,50>": "", + "<33,51>": "", + "<33,52>": "" + }, + "<34>": { + "<34,1>": "STA_MESSAGE_PARAMETERS", + "<34,2>": "", + "<34,3>": "STATIC", + "<34,4>": "SRP_MAIL_DEMO", + "<34,5>": "22", + "<34,6>": "96", + "<34,7>": "438", + "<34,8>": "22", + "<34,9>": "Message Parameters", + "<34,10>": { + "<34,10,1>": "0x50000000", + "<34,10,2>": "0x0" + }, + "<34,11>": "0x0", + "<34,12>": "0", + "<34,13>": "", + "<34,14>": "0", + "<34,15>": { + "<34,15,1>": { + "<34,15,1,1>": "Segoe UI", + "<34,15,1,2>": "-15", + "<34,15,1,3>": "700", + "<34,15,1,4>": "0", + "<34,15,1,5>": "0", + "<34,15,1,6>": "0", + "<34,15,1,7>": "0", + "<34,15,1,8>": "34", + "<34,15,1,9>": "0", + "<34,15,1,10>": "3", + "<34,15,1,11>": "2", + "<34,15,1,12>": "1", + "<34,15,1,13>": "0", + "<34,15,1,14>": "0" + } + }, + "<34,16>": "", + "<34,17>": "", + "<34,18>": "", + "<34,19>": "", + "<34,20>": "", + "<34,21>": "", + "<34,22>": "", + "<34,23>": "", + "<34,24>": "", + "<34,25>": "0", + "<34,26>": "0", + "<34,27>": "", + "<34,28>": "<>", + "<34,29>": "<>", + "<34,30>": "<>", + "<34,31>": "0", + "<34,32>": { + "<34,32,1>": "0x7fffe", + "<34,32,2>": "0xf0016c08" + }, + "<34,33>": "", + "<34,34>": "", + "<34,35>": "", + "<34,36>": "", + "<34,37>": "", + "<34,38>": "", + "<34,39>": "", + "<34,40>": "", + "<34,41>": "", + "<34,42>": "", + "<34,43>": "", + "<34,44>": "", + "<34,45>": "", + "<34,46>": "", + "<34,47>": "", + "<34,48>": "", + "<34,49>": "", + "<34,50>": "", + "<34,51>": "", + "<34,52>": "" + }, + "<35>": { + "<35,1>": "STA_TEST_RESULTS", + "<35,2>": "", + "<35,3>": "STATIC", + "<35,4>": "SRP_MAIL_DEMO", + "<35,5>": "22", + "<35,6>": "605", + "<35,7>": "438", + "<35,8>": "22", + "<35,9>": "Test Results", + "<35,10>": { + "<35,10,1>": "0x50000000", + "<35,10,2>": "0x0" + }, + "<35,11>": "0x0", + "<35,12>": "0", + "<35,13>": "", + "<35,14>": "0", + "<35,15>": { + "<35,15,1>": { + "<35,15,1,1>": "Segoe UI", + "<35,15,1,2>": "-15", + "<35,15,1,3>": "700", + "<35,15,1,4>": "0", + "<35,15,1,5>": "0", + "<35,15,1,6>": "0", + "<35,15,1,7>": "0", + "<35,15,1,8>": "34", + "<35,15,1,9>": "0", + "<35,15,1,10>": "3", + "<35,15,1,11>": "2", + "<35,15,1,12>": "1", + "<35,15,1,13>": "0", + "<35,15,1,14>": "0" + } + }, + "<35,16>": "", + "<35,17>": "", + "<35,18>": "", + "<35,19>": "", + "<35,20>": "", + "<35,21>": "", + "<35,22>": "", + "<35,23>": "", + "<35,24>": "", + "<35,25>": "0", + "<35,26>": "0", + "<35,27>": "", + "<35,28>": "<>", + "<35,29>": "<>", + "<35,30>": "<>", + "<35,31>": "0", + "<35,32>": { + "<35,32,1>": "0x7fffe", + "<35,32,2>": "0xf0016c08" + }, + "<35,33>": "", + "<35,34>": "", + "<35,35>": "", + "<35,36>": "", + "<35,37>": "", + "<35,38>": "", + "<35,39>": "", + "<35,40>": "", + "<35,41>": "", + "<35,42>": "", + "<35,43>": "", + "<35,44>": "", + "<35,45>": "", + "<35,46>": "", + "<35,47>": "", + "<35,48>": "", + "<35,49>": "", + "<35,50>": "", + "<35,51>": "", + "<35,52>": "" + }, + "<36>": { + "<36,1>": "STA_CONFIGURATION_PARAMETERS", + "<36,2>": "", + "<36,3>": "STATIC", + "<36,4>": "SRP_MAIL_DEMO", + "<36,5>": "22", + "<36,6>": "464", + "<36,7>": "438", + "<36,8>": "22", + "<36,9>": "Configuration Parameters", + "<36,10>": { + "<36,10,1>": "0x50000000", + "<36,10,2>": "0x0" + }, + "<36,11>": "0x0", + "<36,12>": "0", + "<36,13>": "", + "<36,14>": "0", + "<36,15>": { + "<36,15,1>": { + "<36,15,1,1>": "Segoe UI", + "<36,15,1,2>": "-15", + "<36,15,1,3>": "700", + "<36,15,1,4>": "0", + "<36,15,1,5>": "0", + "<36,15,1,6>": "0", + "<36,15,1,7>": "0", + "<36,15,1,8>": "34", + "<36,15,1,9>": "0", + "<36,15,1,10>": "3", + "<36,15,1,11>": "2", + "<36,15,1,12>": "1", + "<36,15,1,13>": "0", + "<36,15,1,14>": "0" + } + }, + "<36,16>": "", + "<36,17>": "", + "<36,18>": "", + "<36,19>": "", + "<36,20>": "", + "<36,21>": "", + "<36,22>": "", + "<36,23>": "", + "<36,24>": "", + "<36,25>": "0", + "<36,26>": "0", + "<36,27>": "", + "<36,28>": "<>", + "<36,29>": "<>", + "<36,30>": "<>", + "<36,31>": "0", + "<36,32>": { + "<36,32,1>": "0x7fffe", + "<36,32,2>": "0xf0016c08" + }, + "<36,33>": "", + "<36,34>": "", + "<36,35>": "", + "<36,36>": "", + "<36,37>": "", + "<36,38>": "", + "<36,39>": "", + "<36,40>": "", + "<36,41>": "", + "<36,42>": "", + "<36,43>": "", + "<36,44>": "", + "<36,45>": "", + "<36,46>": "", + "<36,47>": "", + "<36,48>": "", + "<36,49>": "", + "<36,50>": "", + "<36,51>": "", + "<36,52>": "" + }, + "<37>": { + "<37,1>": "GRB_HEADER", + "<37,2>": "", + "<37,3>": "GROUPBOX", + "<37,4>": "SRP_MAIL_DEMO", + "<37,5>": "-2", + "<37,6>": "-8", + "<37,7>": "716", + "<37,8>": "91", + "<37,9>": "", + "<37,10>": { + "<37,10,1>": "0x50000007", + "<37,10,2>": "0x0" + }, + "<37,11>": "0x0", + "<37,12>": "0", + "<37,13>": "16777215", + "<37,14>": "0", + "<37,15>": { + "<37,15,1>": { + "<37,15,1,1>": "Tahoma", + "<37,15,1,2>": "-11", + "<37,15,1,3>": "400", + "<37,15,1,4>": "0", + "<37,15,1,5>": "0", + "<37,15,1,6>": "0", + "<37,15,1,7>": "0", + "<37,15,1,8>": "34", + "<37,15,1,9>": "0", + "<37,15,1,10>": "3", + "<37,15,1,11>": "2", + "<37,15,1,12>": "1", + "<37,15,1,13>": "0", + "<37,15,1,14>": "0" + } + }, + "<37,16>": "", + "<37,17>": "", + "<37,18>": "", + "<37,19>": "", + "<37,20>": "", + "<37,21>": "", + "<37,22>": "", + "<37,23>": "", + "<37,24>": "", + "<37,25>": "0", + "<37,26>": "0", + "<37,27>": "", + "<37,28>": "<>", + "<37,29>": "<>", + "<37,30>": "<>", + "<37,31>": "0", + "<37,32>": { + "<37,32,1>": "0x7fffe", + "<37,32,2>": "0xf0014408" + }, + "<37,33>": "" + }, + "<38>": "" + }, + "record4": { + "<1>": "", + "<2>": { + "<2,1>": "", + "<2,2>": "", + "<2,3>": "", + "<2,4>": "0" + } + }, + "record5": { + "<1>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/ASCII_CHART.json b/SYSPROG/POPUP/ASCII_CHART.json new file mode 100644 index 0000000..31191ec --- /dev/null +++ b/SYSPROG/POPUP/ASCII_CHART.json @@ -0,0 +1,1380 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "50", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0", + "<6,1,15>": "0", + "<6,1,16>": "0" + } + }, + "<7>": "", + "<8>": { + "<8,1>": { + "<8,1,1>": "0", + "<8,1,2>": "NUL", + "<8,1,3>": "00" + }, + "<8,2>": { + "<8,2,1>": "1", + "<8,2,2>": "SOH", + "<8,2,3>": "01" + }, + "<8,3>": { + "<8,3,1>": "2", + "<8,3,2>": "STX", + "<8,3,3>": "02" + }, + "<8,4>": { + "<8,4,1>": "3", + "<8,4,2>": "ETX", + "<8,4,3>": "03" + }, + "<8,5>": { + "<8,5,1>": "4", + "<8,5,2>": "EOT", + "<8,5,3>": "04" + }, + "<8,6>": { + "<8,6,1>": "5", + "<8,6,2>": "ENQ", + "<8,6,3>": "05" + }, + "<8,7>": { + "<8,7,1>": "6", + "<8,7,2>": "ACK", + "<8,7,3>": "06" + }, + "<8,8>": { + "<8,8,1>": "7", + "<8,8,2>": "BEL", + "<8,8,3>": "07" + }, + "<8,9>": { + "<8,9,1>": "8", + "<8,9,2>": "BS", + "<8,9,3>": "08" + }, + "<8,10>": { + "<8,10,1>": "9", + "<8,10,2>": "HT", + "<8,10,3>": "09" + }, + "<8,11>": { + "<8,11,1>": "10", + "<8,11,2>": "LF", + "<8,11,3>": "0A" + }, + "<8,12>": { + "<8,12,1>": "11", + "<8,12,2>": "VT", + "<8,12,3>": "0B" + }, + "<8,13>": { + "<8,13,1>": "12", + "<8,13,2>": "FF", + "<8,13,3>": "0C" + }, + "<8,14>": { + "<8,14,1>": "13", + "<8,14,2>": "CR", + "<8,14,3>": "0D" + }, + "<8,15>": { + "<8,15,1>": "14", + "<8,15,2>": "SO", + "<8,15,3>": "0E" + }, + "<8,16>": { + "<8,16,1>": "15", + "<8,16,2>": "SI", + "<8,16,3>": "0F" + }, + "<8,17>": { + "<8,17,1>": "16", + "<8,17,2>": "DLF", + "<8,17,3>": "10" + }, + "<8,18>": { + "<8,18,1>": "17", + "<8,18,2>": "DC1 (Xon)", + "<8,18,3>": "11" + }, + "<8,19>": { + "<8,19,1>": "18", + "<8,19,2>": "DC2", + "<8,19,3>": "12" + }, + "<8,20>": { + "<8,20,1>": "19", + "<8,20,2>": "DC3 (Xoff)", + "<8,20,3>": "13" + }, + "<8,21>": { + "<8,21,1>": "20", + "<8,21,2>": "DC4", + "<8,21,3>": "14" + }, + "<8,22>": { + "<8,22,1>": "21", + "<8,22,2>": "NAK", + "<8,22,3>": "15" + }, + "<8,23>": { + "<8,23,1>": "22", + "<8,23,2>": "SYN", + "<8,23,3>": "16" + }, + "<8,24>": { + "<8,24,1>": "23", + "<8,24,2>": "ETB", + "<8,24,3>": "17" + }, + "<8,25>": { + "<8,25,1>": "24", + "<8,25,2>": "CAN", + "<8,25,3>": "18" + }, + "<8,26>": { + "<8,26,1>": "25", + "<8,26,2>": "EM", + "<8,26,3>": "19" + }, + "<8,27>": { + "<8,27,1>": "26", + "<8,27,2>": "SUB", + "<8,27,3>": "1A" + }, + "<8,28>": { + "<8,28,1>": "27", + "<8,28,2>": "ESC", + "<8,28,3>": "1B" + }, + "<8,29>": { + "<8,29,1>": "28", + "<8,29,2>": "FS", + "<8,29,3>": "1C" + }, + "<8,30>": { + "<8,30,1>": "29", + "<8,30,2>": "GS", + "<8,30,3>": "1D" + }, + "<8,31>": { + "<8,31,1>": "30", + "<8,31,2>": "RS", + "<8,31,3>": "1E" + }, + "<8,32>": { + "<8,32,1>": "31", + "<8,32,2>": "US", + "<8,32,3>": "1F" + }, + "<8,33>": { + "<8,33,1>": "32", + "<8,33,2>": "Space", + "<8,33,3>": "20" + }, + "<8,34>": { + "<8,34,1>": "33", + "<8,34,2>": "!", + "<8,34,3>": "21" + }, + "<8,35>": { + "<8,35,1>": "34", + "<8,35,2>": "\"", + "<8,35,3>": "22" + }, + "<8,36>": { + "<8,36,1>": "35", + "<8,36,2>": "#", + "<8,36,3>": "23" + }, + "<8,37>": { + "<8,37,1>": "36", + "<8,37,2>": "$", + "<8,37,3>": "24" + }, + "<8,38>": { + "<8,38,1>": "37", + "<8,38,2>": "%", + "<8,38,3>": "25" + }, + "<8,39>": { + "<8,39,1>": "38", + "<8,39,2>": "&", + "<8,39,3>": "26" + }, + "<8,40>": { + "<8,40,1>": "39", + "<8,40,2>": "'", + "<8,40,3>": "27" + }, + "<8,41>": { + "<8,41,1>": "40", + "<8,41,2>": "(", + "<8,41,3>": "28" + }, + "<8,42>": { + "<8,42,1>": "41", + "<8,42,2>": ")", + "<8,42,3>": "29" + }, + "<8,43>": { + "<8,43,1>": "42", + "<8,43,2>": "*", + "<8,43,3>": "2A" + }, + "<8,44>": { + "<8,44,1>": "43", + "<8,44,2>": "+", + "<8,44,3>": "2B" + }, + "<8,45>": { + "<8,45,1>": "44", + "<8,45,2>": ",", + "<8,45,3>": "2C" + }, + "<8,46>": { + "<8,46,1>": "45", + "<8,46,2>": "-", + "<8,46,3>": "2D" + }, + "<8,47>": { + "<8,47,1>": "46", + "<8,47,2>": ".", + "<8,47,3>": "2E" + }, + "<8,48>": { + "<8,48,1>": "47", + "<8,48,2>": "/", + "<8,48,3>": "2F" + }, + "<8,49>": { + "<8,49,1>": "48", + "<8,49,2>": "0", + "<8,49,3>": "30" + }, + "<8,50>": { + "<8,50,1>": "49", + "<8,50,2>": "1", + "<8,50,3>": "31" + }, + "<8,51>": { + "<8,51,1>": "50", + "<8,51,2>": "2", + "<8,51,3>": "32" + }, + "<8,52>": { + "<8,52,1>": "51", + "<8,52,2>": "3", + "<8,52,3>": "33" + }, + "<8,53>": { + "<8,53,1>": "52", + "<8,53,2>": "4", + "<8,53,3>": "34" + }, + "<8,54>": { + "<8,54,1>": "53", + "<8,54,2>": "5", + "<8,54,3>": "35" + }, + "<8,55>": { + "<8,55,1>": "54", + "<8,55,2>": "6", + "<8,55,3>": "36" + }, + "<8,56>": { + "<8,56,1>": "55", + "<8,56,2>": "7", + "<8,56,3>": "37" + }, + "<8,57>": { + "<8,57,1>": "56", + "<8,57,2>": "8", + "<8,57,3>": "38" + }, + "<8,58>": { + "<8,58,1>": "57", + "<8,58,2>": "9", + "<8,58,3>": "39" + }, + "<8,59>": { + "<8,59,1>": "58", + "<8,59,2>": ":", + "<8,59,3>": "3A" + }, + "<8,60>": { + "<8,60,1>": "59", + "<8,60,2>": ";", + "<8,60,3>": "3B" + }, + "<8,61>": { + "<8,61,1>": "60", + "<8,61,2>": "<", + "<8,61,3>": "3C" + }, + "<8,62>": { + "<8,62,1>": "61", + "<8,62,2>": "=", + "<8,62,3>": "3D" + }, + "<8,63>": { + "<8,63,1>": "62", + "<8,63,2>": ">", + "<8,63,3>": "3E" + }, + "<8,64>": { + "<8,64,1>": "63", + "<8,64,2>": "?", + "<8,64,3>": "3F" + }, + "<8,65>": { + "<8,65,1>": "64", + "<8,65,2>": "@", + "<8,65,3>": "40" + }, + "<8,66>": { + "<8,66,1>": "65", + "<8,66,2>": "A", + "<8,66,3>": "41" + }, + "<8,67>": { + "<8,67,1>": "66", + "<8,67,2>": "B", + "<8,67,3>": "42" + }, + "<8,68>": { + "<8,68,1>": "67", + "<8,68,2>": "C", + "<8,68,3>": "43" + }, + "<8,69>": { + "<8,69,1>": "68", + "<8,69,2>": "D", + "<8,69,3>": "44" + }, + "<8,70>": { + "<8,70,1>": "69", + "<8,70,2>": "E", + "<8,70,3>": "45" + }, + "<8,71>": { + "<8,71,1>": "70", + "<8,71,2>": "F", + "<8,71,3>": "46" + }, + "<8,72>": { + "<8,72,1>": "71", + "<8,72,2>": "G", + "<8,72,3>": "47" + }, + "<8,73>": { + "<8,73,1>": "72", + "<8,73,2>": "H", + "<8,73,3>": "48" + }, + "<8,74>": { + "<8,74,1>": "73", + "<8,74,2>": "I", + "<8,74,3>": "49" + }, + "<8,75>": { + "<8,75,1>": "74", + "<8,75,2>": "J", + "<8,75,3>": "4A" + }, + "<8,76>": { + "<8,76,1>": "75", + "<8,76,2>": "K", + "<8,76,3>": "4B" + }, + "<8,77>": { + "<8,77,1>": "76", + "<8,77,2>": "L", + "<8,77,3>": "4C" + }, + "<8,78>": { + "<8,78,1>": "77", + "<8,78,2>": "M", + "<8,78,3>": "4D" + }, + "<8,79>": { + "<8,79,1>": "78", + "<8,79,2>": "N", + "<8,79,3>": "4E" + }, + "<8,80>": { + "<8,80,1>": "79", + "<8,80,2>": "O", + "<8,80,3>": "4F" + }, + "<8,81>": { + "<8,81,1>": "80", + "<8,81,2>": "P", + "<8,81,3>": "50" + }, + "<8,82>": { + "<8,82,1>": "81", + "<8,82,2>": "Q", + "<8,82,3>": "51" + }, + "<8,83>": { + "<8,83,1>": "82", + "<8,83,2>": "R", + "<8,83,3>": "52" + }, + "<8,84>": { + "<8,84,1>": "83", + "<8,84,2>": "S", + "<8,84,3>": "53" + }, + "<8,85>": { + "<8,85,1>": "84", + "<8,85,2>": "T", + "<8,85,3>": "54" + }, + "<8,86>": { + "<8,86,1>": "85", + "<8,86,2>": "U", + "<8,86,3>": "55" + }, + "<8,87>": { + "<8,87,1>": "86", + "<8,87,2>": "V", + "<8,87,3>": "56" + }, + "<8,88>": { + "<8,88,1>": "87", + "<8,88,2>": "W", + "<8,88,3>": "57" + }, + "<8,89>": { + "<8,89,1>": "88", + "<8,89,2>": "X", + "<8,89,3>": "58" + }, + "<8,90>": { + "<8,90,1>": "89", + "<8,90,2>": "Y", + "<8,90,3>": "59" + }, + "<8,91>": { + "<8,91,1>": "90", + "<8,91,2>": "Z", + "<8,91,3>": "5A" + }, + "<8,92>": { + "<8,92,1>": "91", + "<8,92,2>": "[", + "<8,92,3>": "5B" + }, + "<8,93>": { + "<8,93,1>": "92", + "<8,93,2>": "\\", + "<8,93,3>": "5C" + }, + "<8,94>": { + "<8,94,1>": "93", + "<8,94,2>": "]", + "<8,94,3>": "5D" + }, + "<8,95>": { + "<8,95,1>": "94", + "<8,95,2>": "^", + "<8,95,3>": "5E" + }, + "<8,96>": { + "<8,96,1>": "95", + "<8,96,2>": "_", + "<8,96,3>": "5F" + }, + "<8,97>": { + "<8,97,1>": "96", + "<8,97,2>": "`", + "<8,97,3>": "60" + }, + "<8,98>": { + "<8,98,1>": "97", + "<8,98,2>": "a", + "<8,98,3>": "61" + }, + "<8,99>": { + "<8,99,1>": "98", + "<8,99,2>": "b", + "<8,99,3>": "62" + }, + "<8,100>": { + "<8,100,1>": "99", + "<8,100,2>": "c", + "<8,100,3>": "63" + }, + "<8,101>": { + "<8,101,1>": "100", + "<8,101,2>": "d", + "<8,101,3>": "64" + }, + "<8,102>": { + "<8,102,1>": "101", + "<8,102,2>": "e", + "<8,102,3>": "65" + }, + "<8,103>": { + "<8,103,1>": "102", + "<8,103,2>": "f", + "<8,103,3>": "66" + }, + "<8,104>": { + "<8,104,1>": "103", + "<8,104,2>": "g", + "<8,104,3>": "67" + }, + "<8,105>": { + "<8,105,1>": "104", + "<8,105,2>": "h", + "<8,105,3>": "68" + }, + "<8,106>": { + "<8,106,1>": "105", + "<8,106,2>": "i", + "<8,106,3>": "69" + }, + "<8,107>": { + "<8,107,1>": "106", + "<8,107,2>": "j", + "<8,107,3>": "6A" + }, + "<8,108>": { + "<8,108,1>": "107", + "<8,108,2>": "k", + "<8,108,3>": "6B" + }, + "<8,109>": { + "<8,109,1>": "108", + "<8,109,2>": "l", + "<8,109,3>": "6C" + }, + "<8,110>": { + "<8,110,1>": "109", + "<8,110,2>": "m", + "<8,110,3>": "6D" + }, + "<8,111>": { + "<8,111,1>": "110", + "<8,111,2>": "n", + "<8,111,3>": "6E" + }, + "<8,112>": { + "<8,112,1>": "111", + "<8,112,2>": "o", + "<8,112,3>": "6F" + }, + "<8,113>": { + "<8,113,1>": "112", + "<8,113,2>": "p", + "<8,113,3>": "70" + }, + "<8,114>": { + "<8,114,1>": "113", + "<8,114,2>": "q", + "<8,114,3>": "71" + }, + "<8,115>": { + "<8,115,1>": "114", + "<8,115,2>": "r", + "<8,115,3>": "72" + }, + "<8,116>": { + "<8,116,1>": "115", + "<8,116,2>": "s", + "<8,116,3>": "73" + }, + "<8,117>": { + "<8,117,1>": "116", + "<8,117,2>": "t", + "<8,117,3>": "74" + }, + "<8,118>": { + "<8,118,1>": "117", + "<8,118,2>": "u", + "<8,118,3>": "75" + }, + "<8,119>": { + "<8,119,1>": "118", + "<8,119,2>": "v", + "<8,119,3>": "76" + }, + "<8,120>": { + "<8,120,1>": "119", + "<8,120,2>": "w", + "<8,120,3>": "77" + }, + "<8,121>": { + "<8,121,1>": "120", + "<8,121,2>": "x", + "<8,121,3>": "78" + }, + "<8,122>": { + "<8,122,1>": "121", + "<8,122,2>": "y", + "<8,122,3>": "79" + }, + "<8,123>": { + "<8,123,1>": "122", + "<8,123,2>": "z", + "<8,123,3>": "7A" + }, + "<8,124>": { + "<8,124,1>": "123", + "<8,124,2>": "{", + "<8,124,3>": "7B" + }, + "<8,125>": { + "<8,125,1>": "124", + "<8,125,2>": "Vertical bar", + "<8,125,3>": "7C" + }, + "<8,126>": { + "<8,126,1>": "125", + "<8,126,2>": "}", + "<8,126,3>": "7D" + }, + "<8,127>": { + "<8,127,1>": "126", + "<8,127,2>": "~", + "<8,127,3>": "7E" + }, + "<8,128>": { + "<8,128,1>": "127", + "<8,128,2>": "DEL", + "<8,128,3>": "7F" + }, + "<8,129>": { + "<8,129,1>": "128", + "<8,129,2>": "€", + "<8,129,3>": "80" + }, + "<8,130>": { + "<8,130,1>": "129", + "<8,130,2>": "", + "<8,130,3>": "81" + }, + "<8,131>": { + "<8,131,1>": "130", + "<8,131,2>": "‚", + "<8,131,3>": "82" + }, + "<8,132>": { + "<8,132,1>": "131", + "<8,132,2>": "ƒ", + "<8,132,3>": "83" + }, + "<8,133>": { + "<8,133,1>": "132", + "<8,133,2>": "„", + "<8,133,3>": "84" + }, + "<8,134>": { + "<8,134,1>": "133", + "<8,134,2>": "…", + "<8,134,3>": "85" + }, + "<8,135>": { + "<8,135,1>": "134", + "<8,135,2>": "†", + "<8,135,3>": "86" + }, + "<8,136>": { + "<8,136,1>": "135", + "<8,136,2>": "‡", + "<8,136,3>": "87" + }, + "<8,137>": { + "<8,137,1>": "136", + "<8,137,2>": "ˆ", + "<8,137,3>": "88" + }, + "<8,138>": { + "<8,138,1>": "137", + "<8,138,2>": "‰", + "<8,138,3>": "89" + }, + "<8,139>": { + "<8,139,1>": "138", + "<8,139,2>": "Š", + "<8,139,3>": "8A" + }, + "<8,140>": { + "<8,140,1>": "139", + "<8,140,2>": "‹", + "<8,140,3>": "8B" + }, + "<8,141>": { + "<8,141,1>": "140", + "<8,141,2>": "Œ", + "<8,141,3>": "8C" + }, + "<8,142>": { + "<8,142,1>": "141", + "<8,142,2>": "", + "<8,142,3>": "8D" + }, + "<8,143>": { + "<8,143,1>": "142", + "<8,143,2>": "Ž", + "<8,143,3>": "8E" + }, + "<8,144>": { + "<8,144,1>": "143", + "<8,144,2>": "", + "<8,144,3>": "8F" + }, + "<8,145>": { + "<8,145,1>": "144", + "<8,145,2>": "", + "<8,145,3>": "90" + }, + "<8,146>": { + "<8,146,1>": "145", + "<8,146,2>": "‘", + "<8,146,3>": "91" + }, + "<8,147>": { + "<8,147,1>": "146", + "<8,147,2>": "’", + "<8,147,3>": "92" + }, + "<8,148>": { + "<8,148,1>": "147", + "<8,148,2>": "“", + "<8,148,3>": "93" + }, + "<8,149>": { + "<8,149,1>": "148", + "<8,149,2>": "”", + "<8,149,3>": "94" + }, + "<8,150>": { + "<8,150,1>": "149", + "<8,150,2>": "•", + "<8,150,3>": "95" + }, + "<8,151>": { + "<8,151,1>": "150", + "<8,151,2>": "–", + "<8,151,3>": "96" + }, + "<8,152>": { + "<8,152,1>": "151", + "<8,152,2>": "—", + "<8,152,3>": "97" + }, + "<8,153>": { + "<8,153,1>": "152", + "<8,153,2>": "˜", + "<8,153,3>": "98" + }, + "<8,154>": { + "<8,154,1>": "153", + "<8,154,2>": "™", + "<8,154,3>": "99" + }, + "<8,155>": { + "<8,155,1>": "154", + "<8,155,2>": "š", + "<8,155,3>": "9A" + }, + "<8,156>": { + "<8,156,1>": "155", + "<8,156,2>": "›", + "<8,156,3>": "9B" + }, + "<8,157>": { + "<8,157,1>": "156", + "<8,157,2>": "œ", + "<8,157,3>": "9C" + }, + "<8,158>": { + "<8,158,1>": "157", + "<8,158,2>": "", + "<8,158,3>": "9D" + }, + "<8,159>": { + "<8,159,1>": "158", + "<8,159,2>": "ž", + "<8,159,3>": "9E" + }, + "<8,160>": { + "<8,160,1>": "159", + "<8,160,2>": "Ÿ", + "<8,160,3>": "9F" + }, + "<8,161>": { + "<8,161,1>": "160", + "<8,161,2>": " ", + "<8,161,3>": "A0" + }, + "<8,162>": { + "<8,162,1>": "161", + "<8,162,2>": "¡", + "<8,162,3>": "A1" + }, + "<8,163>": { + "<8,163,1>": "162", + "<8,163,2>": "¢", + "<8,163,3>": "A2" + }, + "<8,164>": { + "<8,164,1>": "163", + "<8,164,2>": "£", + "<8,164,3>": "A3" + }, + "<8,165>": { + "<8,165,1>": "164", + "<8,165,2>": "¤", + "<8,165,3>": "A4" + }, + "<8,166>": { + "<8,166,1>": "165", + "<8,166,2>": "¥", + "<8,166,3>": "A5" + }, + "<8,167>": { + "<8,167,1>": "166", + "<8,167,2>": "¦", + "<8,167,3>": "A6" + }, + "<8,168>": { + "<8,168,1>": "167", + "<8,168,2>": "§", + "<8,168,3>": "A7" + }, + "<8,169>": { + "<8,169,1>": "168", + "<8,169,2>": "¨", + "<8,169,3>": "A8" + }, + "<8,170>": { + "<8,170,1>": "169", + "<8,170,2>": "©", + "<8,170,3>": "A9" + }, + "<8,171>": { + "<8,171,1>": "170", + "<8,171,2>": "ª", + "<8,171,3>": "AA" + }, + "<8,172>": { + "<8,172,1>": "171", + "<8,172,2>": "«", + "<8,172,3>": "AB" + }, + "<8,173>": { + "<8,173,1>": "172", + "<8,173,2>": "¬", + "<8,173,3>": "AC" + }, + "<8,174>": { + "<8,174,1>": "173", + "<8,174,2>": "­", + "<8,174,3>": "AD" + }, + "<8,175>": { + "<8,175,1>": "174", + "<8,175,2>": "®", + "<8,175,3>": "AE" + }, + "<8,176>": { + "<8,176,1>": "175", + "<8,176,2>": "¯", + "<8,176,3>": "AF" + }, + "<8,177>": { + "<8,177,1>": "176", + "<8,177,2>": "°", + "<8,177,3>": "B0" + }, + "<8,178>": { + "<8,178,1>": "177", + "<8,178,2>": "±", + "<8,178,3>": "B1" + }, + "<8,179>": { + "<8,179,1>": "178", + "<8,179,2>": "²", + "<8,179,3>": "B2" + }, + "<8,180>": { + "<8,180,1>": "179", + "<8,180,2>": "³", + "<8,180,3>": "B3" + }, + "<8,181>": { + "<8,181,1>": "180", + "<8,181,2>": "´", + "<8,181,3>": "B4" + }, + "<8,182>": { + "<8,182,1>": "181", + "<8,182,2>": "µ", + "<8,182,3>": "B5" + }, + "<8,183>": { + "<8,183,1>": "182", + "<8,183,2>": "¶", + "<8,183,3>": "B6" + }, + "<8,184>": { + "<8,184,1>": "183", + "<8,184,2>": "·", + "<8,184,3>": "B7" + }, + "<8,185>": { + "<8,185,1>": "184", + "<8,185,2>": "¸", + "<8,185,3>": "B8" + }, + "<8,186>": { + "<8,186,1>": "185", + "<8,186,2>": "¹", + "<8,186,3>": "B9" + }, + "<8,187>": { + "<8,187,1>": "186", + "<8,187,2>": "º", + "<8,187,3>": "BA" + }, + "<8,188>": { + "<8,188,1>": "187", + "<8,188,2>": "»", + "<8,188,3>": "BB" + }, + "<8,189>": { + "<8,189,1>": "188", + "<8,189,2>": "¼", + "<8,189,3>": "BC" + }, + "<8,190>": { + "<8,190,1>": "189", + "<8,190,2>": "½", + "<8,190,3>": "BD" + }, + "<8,191>": { + "<8,191,1>": "190", + "<8,191,2>": "¾", + "<8,191,3>": "BE" + }, + "<8,192>": { + "<8,192,1>": "191", + "<8,192,2>": "¿", + "<8,192,3>": "BF" + }, + "<8,193>": { + "<8,193,1>": "192", + "<8,193,2>": "À", + "<8,193,3>": "C0" + }, + "<8,194>": { + "<8,194,1>": "193", + "<8,194,2>": "Á", + "<8,194,3>": "C1" + }, + "<8,195>": { + "<8,195,1>": "194", + "<8,195,2>": "Â", + "<8,195,3>": "C2" + }, + "<8,196>": { + "<8,196,1>": "195", + "<8,196,2>": "Ã", + "<8,196,3>": "C3" + }, + "<8,197>": { + "<8,197,1>": "196", + "<8,197,2>": "Ä", + "<8,197,3>": "C4" + }, + "<8,198>": { + "<8,198,1>": "197", + "<8,198,2>": "Å", + "<8,198,3>": "C5" + }, + "<8,199>": { + "<8,199,1>": "198", + "<8,199,2>": "Æ", + "<8,199,3>": "C6" + }, + "<8,200>": { + "<8,200,1>": "199", + "<8,200,2>": "Ç", + "<8,200,3>": "C7" + }, + "<8,201>": { + "<8,201,1>": "200", + "<8,201,2>": "È", + "<8,201,3>": "C8" + }, + "<8,202>": { + "<8,202,1>": "201", + "<8,202,2>": "É", + "<8,202,3>": "C9" + }, + "<8,203>": { + "<8,203,1>": "202", + "<8,203,2>": "Ê", + "<8,203,3>": "CA" + }, + "<8,204>": { + "<8,204,1>": "203", + "<8,204,2>": "Ë", + "<8,204,3>": "CB" + }, + "<8,205>": { + "<8,205,1>": "204", + "<8,205,2>": "Ì", + "<8,205,3>": "CC" + }, + "<8,206>": { + "<8,206,1>": "205", + "<8,206,2>": "Í", + "<8,206,3>": "CD" + }, + "<8,207>": { + "<8,207,1>": "206", + "<8,207,2>": "Î", + "<8,207,3>": "CE" + }, + "<8,208>": { + "<8,208,1>": "207", + "<8,208,2>": "Ï", + "<8,208,3>": "CF" + }, + "<8,209>": { + "<8,209,1>": "208", + "<8,209,2>": "Ð", + "<8,209,3>": "D0" + }, + "<8,210>": { + "<8,210,1>": "209", + "<8,210,2>": "Ñ", + "<8,210,3>": "D1" + }, + "<8,211>": { + "<8,211,1>": "210", + "<8,211,2>": "Ò", + "<8,211,3>": "D2" + }, + "<8,212>": { + "<8,212,1>": "211", + "<8,212,2>": "Ó", + "<8,212,3>": "D3" + }, + "<8,213>": { + "<8,213,1>": "212", + "<8,213,2>": "Ô", + "<8,213,3>": "D4" + }, + "<8,214>": { + "<8,214,1>": "213", + "<8,214,2>": "Õ", + "<8,214,3>": "D5" + }, + "<8,215>": { + "<8,215,1>": "214", + "<8,215,2>": "Ö", + "<8,215,3>": "D6" + }, + "<8,216>": { + "<8,216,1>": "215", + "<8,216,2>": "×", + "<8,216,3>": "D7" + }, + "<8,217>": { + "<8,217,1>": "216", + "<8,217,2>": "Ø", + "<8,217,3>": "D8" + }, + "<8,218>": { + "<8,218,1>": "217", + "<8,218,2>": "Ù", + "<8,218,3>": "D9" + }, + "<8,219>": { + "<8,219,1>": "218", + "<8,219,2>": "Ú", + "<8,219,3>": "DA" + }, + "<8,220>": { + "<8,220,1>": "219", + "<8,220,2>": "Û", + "<8,220,3>": "DB" + }, + "<8,221>": { + "<8,221,1>": "220", + "<8,221,2>": "Ü", + "<8,221,3>": "DC" + }, + "<8,222>": { + "<8,222,1>": "221", + "<8,222,2>": "Ý", + "<8,222,3>": "DD" + }, + "<8,223>": { + "<8,223,1>": "222", + "<8,223,2>": "Þ", + "<8,223,3>": "DE" + }, + "<8,224>": { + "<8,224,1>": "223", + "<8,224,2>": "ß", + "<8,224,3>": "DF" + }, + "<8,225>": { + "<8,225,1>": "224", + "<8,225,2>": "à", + "<8,225,3>": "E0" + }, + "<8,226>": { + "<8,226,1>": "225", + "<8,226,2>": "á", + "<8,226,3>": "E1" + }, + "<8,227>": { + "<8,227,1>": "226", + "<8,227,2>": "â", + "<8,227,3>": "E2" + }, + "<8,228>": { + "<8,228,1>": "227", + "<8,228,2>": "ã", + "<8,228,3>": "E3" + }, + "<8,229>": { + "<8,229,1>": "228", + "<8,229,2>": "ä", + "<8,229,3>": "E4" + }, + "<8,230>": { + "<8,230,1>": "229", + "<8,230,2>": "å", + "<8,230,3>": "E5" + }, + "<8,231>": { + "<8,231,1>": "230", + "<8,231,2>": "æ", + "<8,231,3>": "E6" + }, + "<8,232>": { + "<8,232,1>": "231", + "<8,232,2>": "ç", + "<8,232,3>": "E7" + }, + "<8,233>": { + "<8,233,1>": "232", + "<8,233,2>": "è", + "<8,233,3>": "E8" + }, + "<8,234>": { + "<8,234,1>": "233", + "<8,234,2>": "é", + "<8,234,3>": "E9" + }, + "<8,235>": { + "<8,235,1>": "234", + "<8,235,2>": "ê", + "<8,235,3>": "EA" + }, + "<8,236>": { + "<8,236,1>": "235", + "<8,236,2>": "ë", + "<8,236,3>": "EB" + }, + "<8,237>": { + "<8,237,1>": "236", + "<8,237,2>": "ì", + "<8,237,3>": "EC" + }, + "<8,238>": { + "<8,238,1>": "237", + "<8,238,2>": "í", + "<8,238,3>": "ED" + }, + "<8,239>": { + "<8,239,1>": "238", + "<8,239,2>": "î", + "<8,239,3>": "EE" + }, + "<8,240>": { + "<8,240,1>": "239", + "<8,240,2>": "ï", + "<8,240,3>": "EF" + }, + "<8,241>": { + "<8,241,1>": "240", + "<8,241,2>": "ð", + "<8,241,3>": "F0" + }, + "<8,242>": { + "<8,242,1>": "241", + "<8,242,2>": "ñ", + "<8,242,3>": "F1" + }, + "<8,243>": { + "<8,243,1>": "242", + "<8,243,2>": "ò", + "<8,243,3>": "F2" + }, + "<8,244>": { + "<8,244,1>": "243", + "<8,244,2>": "ó", + "<8,244,3>": "F3" + }, + "<8,245>": { + "<8,245,1>": "244", + "<8,245,2>": "ô", + "<8,245,3>": "F4" + }, + "<8,246>": { + "<8,246,1>": "245", + "<8,246,2>": "õ", + "<8,246,3>": "F5" + }, + "<8,247>": { + "<8,247,1>": "246", + "<8,247,2>": "ö", + "<8,247,3>": "F6" + }, + "<8,248>": { + "<8,248,1>": "247", + "<8,248,2>": "÷", + "<8,248,3>": "F7" + }, + "<8,249>": { + "<8,249,1>": "248", + "<8,249,2>": "ø", + "<8,249,3>": "F8" + }, + "<8,250>": { + "<8,250,1>": "249", + "<8,250,2>": "ù", + "<8,250,3>": "F9" + }, + "<8,251>": { + "<8,251,1>": "250", + "<8,251,2>": "STM", + "<8,251,3>": "FA" + }, + "<8,252>": { + "<8,252,1>": "251", + "<8,252,2>": "TM", + "<8,252,3>": "FB" + }, + "<8,253>": { + "<8,253,1>": "252", + "<8,253,2>": "SVM", + "<8,253,3>": "FC" + }, + "<8,254>": { + "<8,254,1>": "253", + "<8,254,2>": "VM", + "<8,254,3>": "FD" + }, + "<8,255>": { + "<8,255,1>": "254", + "<8,255,2>": "FM", + "<8,255,3>": "FE" + }, + "<8,256>": { + "<8,256,1>": "255", + "<8,256,2>": "RM", + "<8,256,3>": "FF" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "5", + "<9,1,3>": "L", + "<9,1,4>": "L", + "<9,1,5>": "", + "<9,1,6>": "Num" + }, + "<9,2>": { + "<9,2,1>": "2", + "<9,2,2>": "8", + "<9,2,3>": "L", + "<9,2,4>": "L", + "<9,2,5>": "", + "<9,2,6>": "ASCII" + }, + "<9,3>": { + "<9,3,1>": "3", + "<9,3,2>": "5", + "<9,3,3>": "L", + "<9,3,4>": "L", + "<9,3,5>": "", + "<9,3,6>": "Hex" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "ASCII Chart", + "<13>": "1", + "<14>": "E", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16245453", + "<35>": "16245453", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "0", + "<41>": "1000", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/AVERY.json b/SYSPROG/POPUP/AVERY.json new file mode 100644 index 0000000..5a993a0 --- /dev/null +++ b/SYSPROG/POPUP/AVERY.json @@ -0,0 +1,91 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "AVERY_LABELS", + "<8>": "BY @ID", + "<9>": { + "<9,1>": { + "<9,1,1>": "UNIQUEPRODUCTID", + "<9,1,2>": "20", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Uniqueproductid" + }, + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "", + "<9,2,3>": "", + "<9,2,4>": "", + "<9,2,5>": "", + "<9,2,6>": "" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "title1", + "<13>": "", + "<14>": "K", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "1", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/CONTEXTMENUCONTROLS.json b/SYSPROG/POPUP/CONTEXTMENUCONTROLS.json new file mode 100644 index 0000000..953ecb7 --- /dev/null +++ b/SYSPROG/POPUP/CONTEXTMENUCONTROLS.json @@ -0,0 +1,85 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "MS Sans Serif", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "1", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0" + } + }, + "<7>": "", + "<8>": { + "<8,1>": "A", + "<8,2>": "B", + "<8,3>": "C" + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "40", + "<9,1,3>": "", + "<9,1,4>": "", + "<9,1,5>": "", + "<9,1,6>": "Control Name" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Context Menu Controls", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/DEBUGGER_INTERCEPT_POPUP.json b/SYSPROG/POPUP/DEBUGGER_INTERCEPT_POPUP.json new file mode 100644 index 0000000..3cf19e1 --- /dev/null +++ b/SYSPROG/POPUP/DEBUGGER_INTERCEPT_POPUP.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "50", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Stored Procedure Executables" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Debugger Intercept Select", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "1", + "<31>": "1", + "<32>": "1", + "<33>": "1", + "<34>": "16245453", + "<35>": "16245453", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/DSBFS_SYSPTRS.json b/SYSPROG/POPUP/DSBFS_SYSPTRS.json new file mode 100644 index 0000000..1f3f5b3 --- /dev/null +++ b/SYSPROG/POPUP/DSBFS_SYSPTRS.json @@ -0,0 +1,91 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "SYSPTRS", + "<8>": "BY ID WITH FS \"[DSBFS]\"", + "<9>": { + "<9,1>": { + "<9,1,1>": "ID", + "<9,1,2>": "30", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Id" + }, + "<9,2>": { + "<9,2,1>": "LOCATION", + "<9,2,2>": "30", + "<9,2,3>": "L", + "<9,2,4>": "C", + "<9,2,5>": "", + "<9,2,6>": "Location" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "SQL BFS Connections", + "<13>": "", + "<14>": "K", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "1", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/EVENTNAMES.json b/SYSPROG/POPUP/EVENTNAMES.json new file mode 100644 index 0000000..2c5245a --- /dev/null +++ b/SYSPROG/POPUP/EVENTNAMES.json @@ -0,0 +1,91 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-2", + "<2>": "-2", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "0", + "<9,1,2>": "30", + "<9,1,3>": "L", + "<9,1,4>": "L", + "<9,1,5>": "", + "<9,1,6>": "Event" + }, + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "", + "<9,2,3>": "", + "<9,2,4>": "", + "<9,2,5>": "", + "<9,2,6>": "" + } + }, + "<10>": "L", + "<11>": "2", + "<12>": "Events", + "<13>": "", + "<14>": "E", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/INSERTNAMES.json b/SYSPROG/POPUP/INSERTNAMES.json new file mode 100644 index 0000000..f737618 --- /dev/null +++ b/SYSPROG/POPUP/INSERTNAMES.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "0", + "<9,1,2>": "30", + "<9,1,3>": "L", + "<9,1,4>": "L", + "<9,1,5>": "", + "<9,1,6>": "Insert Name" + } + }, + "<10>": "L", + "<11>": "3", + "<12>": "Inserts", + "<13>": "", + "<14>": "E", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/INVOICE_POPUP.json b/SYSPROG/POPUP/INVOICE_POPUP.json new file mode 100644 index 0000000..9acc1a7 --- /dev/null +++ b/SYSPROG/POPUP/INVOICE_POPUP.json @@ -0,0 +1,91 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "2231369728", + "<6>": "", + "<7>": "INVOICES", + "<8>": "BY @ID", + "<9>": { + "<9,1>": { + "<9,1,1>": "ID", + "<9,1,2>": "20", + "<9,1,3>": "Left", + "<9,1,4>": "Center", + "<9,1,5>": "", + "<9,1,6>": "ID" + }, + "<9,2>": { + "<9,2,1>": "INVOICE_DATE", + "<9,2,2>": "11", + "<9,2,3>": "Right", + "<9,2,4>": "Center", + "<9,2,5>": "D4/", + "<9,2,6>": "INVOICE_DATE" + }, + "<9,3>": { + "<9,3,1>": "CUST_NO", + "<9,3,2>": "5", + "<9,3,3>": "Right", + "<9,3,4>": "Center", + "<9,3,5>": "", + "<9,3,6>": "CUST_NO" + }, + "<9,4>": { + "<9,4,1>": "CUST_NAME", + "<9,4,2>": "20", + "<9,4,3>": "Left", + "<9,4,4>": "Center", + "<9,4,5>": "", + "<9,4,6>": "CUST_NAME" + }, + "<9,5>": { + "<9,5,1>": "AMOUNT", + "<9,5,2>": "22", + "<9,5,3>": "Right", + "<9,5,4>": "Center", + "<9,5,5>": "MD2,$", + "<9,5,6>": "AMOUNT" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "Invoice Popup", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "1", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "1", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "0" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/LND_POPUP.json b/SYSPROG/POPUP/LND_POPUP.json new file mode 100644 index 0000000..0401d6b --- /dev/null +++ b/SYSPROG/POPUP/LND_POPUP.json @@ -0,0 +1,91 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0", + "<6,1,15>": "0", + "<6,1,16>": "0" + } + }, + "<7>": "SYSENV", + "<8>": "BY @ID WITH @ID STARTING \"LND_\"", + "<9>": { + "<9,1>": { + "<9,1,1>": "0", + "<9,1,2>": "16", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Name" + }, + "<9,2>": { + "<9,2,1>": "1", + "<9,2,2>": "32", + "<9,2,3>": "L", + "<9,2,4>": "C", + "<9,2,5>": "", + "<9,2,6>": "Description" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "Language Set", + "<13>": "", + "<14>": "K", + "<15>": "1", + "<16>": "0", + "<17>": "0", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "1", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "1", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16245453", + "<35>": "16245453", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/MENUS.json b/SYSPROG/POPUP/MENUS.json new file mode 100644 index 0000000..dc81ade --- /dev/null +++ b/SYSPROG/POPUP/MENUS.json @@ -0,0 +1,89 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "MS Sans Serif", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "1", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0" + } + }, + "<7>": "MENU_FILE", + "<8>": "BY @ID", + "<9>": { + "<9,1>": { + "<9,1,1>": "AT_ID", + "<9,1,2>": "25", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "" + }, + "<9,2>": { + "<9,2,1>": "DESC", + "<9,2,2>": "50", + "<9,2,3>": "", + "<9,2,4>": "C", + "<9,2,5>": "", + "<9,2,6>": "DESCRIPTION" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "menus", + "<13>": "", + "<14>": "K", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_CFG_INET.json b/SYSPROG/POPUP/RTI_CFG_INET.json new file mode 100644 index 0000000..3668193 --- /dev/null +++ b/SYSPROG/POPUP/RTI_CFG_INET.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "", + "<8>": "a", + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "50", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "CFG Inet Records" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "CFG_Inet Records", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_DEBUG_INTERCEPT.json b/SYSPROG/POPUP/RTI_DEBUG_INTERCEPT.json new file mode 100644 index 0000000..3cf19e1 --- /dev/null +++ b/SYSPROG/POPUP/RTI_DEBUG_INTERCEPT.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "50", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Stored Procedure Executables" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Debugger Intercept Select", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "1", + "<31>": "1", + "<32>": "1", + "<33>": "1", + "<34>": "16245453", + "<35>": "16245453", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_DEV_EDITOR_PLUGINS_LIST.json b/SYSPROG/POPUP/RTI_DEV_EDITOR_PLUGINS_LIST.json new file mode 100644 index 0000000..84b89c8 --- /dev/null +++ b/SYSPROG/POPUP/RTI_DEV_EDITOR_PLUGINS_LIST.json @@ -0,0 +1,91 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "50", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Entity" + }, + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "", + "<9,2,3>": "", + "<9,2,4>": "", + "<9,2,5>": "", + "<9,2,6>": "" + } + }, + "<10>": "L", + "<11>": "2", + "<12>": "Dev Editor Plugin - List", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "1", + "<31>": "0", + "<32>": "0", + "<33>": "1", + "<34>": "16777215", + "<35>": "16771022", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_DSN_TABLEBUILDER_NEWTABLE_BROWSE_OPTIONS.json b/SYSPROG/POPUP/RTI_DSN_TABLEBUILDER_NEWTABLE_BROWSE_OPTIONS.json new file mode 100644 index 0000000..2b82e98 --- /dev/null +++ b/SYSPROG/POPUP/RTI_DSN_TABLEBUILDER_NEWTABLE_BROWSE_OPTIONS.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Segoe UI", + "<6,1,2>": "-12", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1" + } + }, + "<7>": "", + "<8>": { + "<8,1>": "Directories", + "<8,2>": "Attached Locations", + "<8,3>": "Defined Locations (Volumes, BFS Connections, etc)" + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "32", + "<9,1,3>": "L", + "<9,1,4>": "L", + "<9,1,5>": "", + "<9,1,6>": "Choice" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Browse What", + "<13>": "", + "<14>": "P", + "<15>": "1", + "<16>": "0", + "<17>": "0", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "1", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "-2", + "<35>": "-2", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "-2", + "<41>": "1000", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_GIT_LOG.json b/SYSPROG/POPUP/RTI_GIT_LOG.json new file mode 100644 index 0000000..fc46bec --- /dev/null +++ b/SYSPROG/POPUP/RTI_GIT_LOG.json @@ -0,0 +1,103 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "-2", + "<6>": { + "<6,1>": { + "<6,1,1>": "Segoe UI", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1" + } + }, + "<7>": "", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "36", + "<9,1,3>": "L", + "<9,1,4>": "L", + "<9,1,5>": "", + "<9,1,6>": "SHA1" + }, + "<9,2>": { + "<9,2,1>": "2", + "<9,2,2>": "25", + "<9,2,3>": "L", + "<9,2,4>": "L", + "<9,2,5>": "", + "<9,2,6>": "Author" + }, + "<9,3>": { + "<9,3,1>": "3", + "<9,3,2>": "25", + "<9,3,3>": "L", + "<9,3,4>": "L", + "<9,3,5>": "", + "<9,3,6>": "Date Time" + }, + "<9,4>": { + "<9,4,1>": "4", + "<9,4,2>": "25", + "<9,4,3>": "L", + "<9,4,4>": "L", + "<9,4,5>": "", + "<9,4,6>": "Comments" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Git Merge Log", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "1", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "1", + "<31>": "0", + "<32>": "0", + "<33>": "1", + "<34>": "-2", + "<35>": "-2", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "-2", + "<41>": "1000", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_GIT_REPOSTYPES.json b/SYSPROG/POPUP/RTI_GIT_REPOSTYPES.json new file mode 100644 index 0000000..9c9e32f --- /dev/null +++ b/SYSPROG/POPUP/RTI_GIT_REPOSTYPES.json @@ -0,0 +1,91 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "SYSREPOSTYPES", + "<8>": "BY @ID", + "<9>": { + "<9,1>": { + "<9,1,1>": "TYPEID", + "<9,1,2>": "20", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Typeid" + }, + "<9,2>": { + "<9,2,1>": "TITLE", + "<9,2,2>": "25", + "<9,2,3>": "L", + "<9,2,4>": "C", + "<9,2,5>": "", + "<9,2,6>": "Title" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "Repository Types", + "<13>": "", + "<14>": "K", + "<15>": "0", + "<16>": "0", + "<17>": "0", + "<18>": "0", + "<19>": "0", + "<20>": "0", + "<21>": "1", + "<22>": "1", + "<23>": "0", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "1", + "<34>": "16777215", + "<35>": "13565902", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_INET_SYSOBJ.json b/SYSPROG/POPUP/RTI_INET_SYSOBJ.json new file mode 100644 index 0000000..eecc28a --- /dev/null +++ b/SYSPROG/POPUP/RTI_INET_SYSOBJ.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "20", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "", + "<8>": "a", + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "40", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "SYSOBJ Record" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "INET Routines", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "1", + "<31>": "0", + "<32>": "0", + "<33>": "1", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_LIST_TABLES.json b/SYSPROG/POPUP/RTI_LIST_TABLES.json new file mode 100644 index 0000000..acdfed8 --- /dev/null +++ b/SYSPROG/POPUP/RTI_LIST_TABLES.json @@ -0,0 +1,116 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "-2", + "<6>": { + "<6,1>": { + "<6,1,1>": "Segoe UI", + "<6,1,2>": "-12", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "1", + "<6,1,8>": "0", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0" + } + }, + "<7>": "", + "<8>": { + "<8,1>": { + "<8,1,1>": "File", + "<8,1,2>": "SYSPROG", + "<8,1,3>": "datavol", + "<8,1,4>": "LinearHash" + }, + "<8,2>": { + "<8,2,1>": "File2", + "<8,2,2>": "global", + "<8,2,3>": "revboot", + "<8,2,4>": "rtp57" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "30", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Table Name" + }, + "<9,2>": { + "<9,2,1>": "2", + "<9,2,2>": "20", + "<9,2,3>": "L", + "<9,2,4>": "C", + "<9,2,5>": "", + "<9,2,6>": "Application" + }, + "<9,3>": { + "<9,3,1>": "3", + "<9,3,2>": "30", + "<9,3,3>": "L", + "<9,3,4>": "C", + "<9,3,5>": "", + "<9,3,6>": "Location" + }, + "<9,4>": { + "<9,4,1>": "4", + "<9,4,2>": "10", + "<9,4,3>": "L", + "<9,4,4>": "C", + "<9,4,5>": "", + "<9,4,6>": "Type" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Currently Attached Tables", + "<13>": "", + "<14>": "R", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "1", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "1", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "-2", + "<35>": "-2", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "-2", + "<41>": "1000", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_O4WWEBHISTORY.json b/SYSPROG/POPUP/RTI_O4WWEBHISTORY.json new file mode 100644 index 0000000..9bd596f --- /dev/null +++ b/SYSPROG/POPUP/RTI_O4WWEBHISTORY.json @@ -0,0 +1,91 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "25", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Page Title" + }, + "<9,2>": { + "<9,2,1>": "2", + "<9,2,2>": "50", + "<9,2,3>": "L", + "<9,2,4>": "C", + "<9,2,5>": "", + "<9,2,6>": "URL" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "O4W Web Form History", + "<13>": "2", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "1", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_TCL_FETCH_QUERY.json b/SYSPROG/POPUP/RTI_TCL_FETCH_QUERY.json new file mode 100644 index 0000000..21b9280 --- /dev/null +++ b/SYSPROG/POPUP/RTI_TCL_FETCH_QUERY.json @@ -0,0 +1,95 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "-2", + "<6>": { + "<6,1>": { + "<6,1,1>": "Segoe UI", + "<6,1,2>": "-12", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1" + } + }, + "<7>": "", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "21", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Time & Date" + }, + "<9,2>": { + "<9,2,1>": "2", + "<9,2,2>": "60", + "<9,2,3>": "L", + "<9,2,4>": "C", + "<9,2,5>": "", + "<9,2,6>": "Query" + }, + "<9,3>": { + "<9,3,1>": "3", + "<9,3,2>": "10", + "<9,3,3>": "L", + "<9,3,4>": "C", + "<9,3,5>": "", + "<9,3,6>": "Hits" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Stored Query Table", + "<13>": "", + "<14>": "P", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "1", + "<34>": "4294967294", + "<35>": "-2", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "0", + "<41>": "1000", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_TCL_FETCH_QUERY_1.json b/SYSPROG/POPUP/RTI_TCL_FETCH_QUERY_1.json new file mode 100644 index 0000000..ffbee0a --- /dev/null +++ b/SYSPROG/POPUP/RTI_TCL_FETCH_QUERY_1.json @@ -0,0 +1,102 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "", + "<8>": { + "<8,1>": "", + "<8,2>": " " + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "21", + "<9,1,3>": "Left", + "<9,1,4>": "L", + "<9,1,5>": "", + "<9,1,6>": "Time & Date" + }, + "<9,2>": { + "<9,2,1>": "2", + "<9,2,2>": "60", + "<9,2,3>": "Left", + "<9,2,4>": "L", + "<9,2,5>": "", + "<9,2,6>": "Query" + }, + "<9,3>": { + "<9,3,1>": "3", + "<9,3,2>": "10", + "<9,3,3>": "Left", + "<9,3,4>": "L", + "<9,3,5>": "", + "<9,3,6>": "Hits" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Stored Query Table", + "<13>": "", + "<14>": "P", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "1", + "<34>": "4294967294", + "<35>": "2181038080", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "0", + "<41>": "1000", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/RTI_UTL_TABLEIDS.json b/SYSPROG/POPUP/RTI_UTL_TABLEIDS.json new file mode 100644 index 0000000..756d01f --- /dev/null +++ b/SYSPROG/POPUP/RTI_UTL_TABLEIDS.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "SYSENV", + "<8>": "BY @ID", + "<9>": { + "<9,1>": { + "<9,1,1>": "0", + "<9,1,2>": "35", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Id" + } + }, + "<10>": "T", + "<11>": "2", + "<12>": "Table Row Ids", + "<13>": "", + "<14>": "K", + "<15>": "0", + "<16>": "0", + "<17>": "0", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSCODETEMPLATES.json b/SYSPROG/POPUP/SYSCODETEMPLATES.json new file mode 100644 index 0000000..93c09ea --- /dev/null +++ b/SYSPROG/POPUP/SYSCODETEMPLATES.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "SYSCODETEMPLATES", + "<8>": "BY ID", + "<9>": { + "<9,1>": { + "<9,1,1>": "ID", + "<9,1,2>": "35", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Id" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "Code Templates", + "<13>": "", + "<14>": "K", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "1", + "<31>": "0", + "<32>": "0", + "<33>": "1", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSCOLUMNS.json b/SYSPROG/POPUP/SYSCOLUMNS.json new file mode 100644 index 0000000..0983d25 --- /dev/null +++ b/SYSPROG/POPUP/SYSCOLUMNS.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0", + "<6,1,15>": "0", + "<6,1,16>": "0" + } + }, + "<7>": "", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "25", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Columns", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSCOLUMNS_MULTI.json b/SYSPROG/POPUP/SYSCOLUMNS_MULTI.json new file mode 100644 index 0000000..1e27b70 --- /dev/null +++ b/SYSPROG/POPUP/SYSCOLUMNS_MULTI.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "1", + "<2>": "", + "<3>": "", + "<4>": "", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0", + "<6,1,15>": "0", + "<6,1,16>": "0" + } + }, + "<7>": "", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "25", + "<9,1,3>": "Left", + "<9,1,4>": "Center", + "<9,1,5>": "", + "<9,1,6>": "1" + } + }, + "<10>": "L", + "<11>": "2", + "<12>": "Columns", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "1", + "<35>": "1", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "0", + "<41>": "", + "<42>": "0", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSCONVERSIONS.json b/SYSPROG/POPUP/SYSCONVERSIONS.json new file mode 100644 index 0000000..75dc3df --- /dev/null +++ b/SYSPROG/POPUP/SYSCONVERSIONS.json @@ -0,0 +1,170 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0", + "<6,1,15>": "0", + "<6,1,16>": "0" + } + }, + "<7>": "", + "<8>": { + "<8,1>": { + "<8,1,1>": "MD4", + "<8,1,2>": "4-Place decimal number", + "<8,1,3>": "30000.0000" + }, + "<8,2>": { + "<8,2,1>": "MD0,", + "<8,2,2>": "Integer with commas", + "<8,2,3>": "23,334,498" + }, + "<8,3>": { + "<8,3,1>": "MD2,$", + "<8,3,2>": "2-Place decimal dollar amount", + "<8,3,3>": "$2,678.34" + }, + "<8,4>": { + "<8,4,1>": "D", + "<8,4,2>": "Date, default medium format", + "<8,4,3>": "24 JUN 1993" + }, + "<8,5>": { + "<8,5,1>": "D2/", + "<8,5,2>": "2-Digit date, MM/DD/YY", + "<8,5,3>": "06/24/93" + }, + "<8,6>": { + "<8,6,1>": "D.E", + "<8,6,2>": "European date, DD.MM.YYYY", + "<8,6,3>": "24.06.1993" + }, + "<8,7>": { + "<8,7,1>": "MTS", + "<8,7,2>": "24-Hour time with seconds", + "<8,7,3>": "17:33:45" + }, + "<8,8>": { + "<8,8,1>": "MTH", + "<8,8,2>": "12-Hour time with AM/PM", + "<8,8,3>": "5:33PM" + }, + "<8,9>": { + "<8,9,1>": "DT", + "<8,9,2>": "Date + Time", + "<8,9,3>": "01/01/93 10:00" + }, + "<8,10>": { + "<8,10,1>": "B", + "<8,10,2>": "Boolean (True/False)", + "<8,10,3>": "'Yes' or 'No'" + }, + "<8,11>": { + "<8,11,1>": "[ZIP_FORMAT]", + "<8,11,2>": "US/Canada Zip code format", + "<8,11,3>": "98006, V1X 2A4" + }, + "<8,12>": { + "<8,12,1>": "[PHONE_FORMAT]", + "<8,12,2>": "US phone number format", + "<8,12,3>": "(206) 643-9898" + }, + "<8,13>": { + "<8,13,1>": "<>", + "<8,13,2>": "No Output conversion", + "<8,13,3>": "<>" + }, + "<8,14>": { + "<8,14,1>": "<>", + "<8,14,2>": "Use columns default", + "<8,14,3>": "<>" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "15", + "<9,1,3>": "L", + "<9,1,4>": "L", + "<9,1,5>": "", + "<9,1,6>": "Conversion" + }, + "<9,2>": { + "<9,2,1>": "2", + "<9,2,2>": "21", + "<9,2,3>": "L", + "<9,2,4>": "L", + "<9,2,5>": "", + "<9,2,6>": "Description" + }, + "<9,3>": { + "<9,3,1>": "3", + "<9,3,2>": "15", + "<9,3,3>": "L", + "<9,3,4>": "L", + "<9,3,5>": "", + "<9,3,6>": "Example" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "OpenInsight Conversions", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSDATATYPES.json b/SYSPROG/POPUP/SYSDATATYPES.json new file mode 100644 index 0000000..8725e4e --- /dev/null +++ b/SYSPROG/POPUP/SYSDATATYPES.json @@ -0,0 +1,96 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0", + "<6,1,15>": "0", + "<6,1,16>": "0" + } + }, + "<7>": "", + "<8>": { + "<8,1>": "BOOLEAN", + "<8,2>": "CHAR", + "<8,3>": "DATE", + "<8,4>": "DATETIME", + "<8,5>": "DECIMAL", + "<8,6>": "DOLLARS", + "<8,7>": "FLOAT", + "<8,8>": "INTEGER", + "<8,9>": "TEXT", + "<8,10>": "TIME", + "<8,11>": "VARBINARY", + "<8,12>": "VARCHAR" + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "15", + "<9,1,3>": "C", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "DataType" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Valid DataTypes", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "0", + "<17>": "0", + "<18>": "0", + "<19>": "0", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSDEFAULTS.json b/SYSPROG/POPUP/SYSDEFAULTS.json new file mode 100644 index 0000000..b35f42c --- /dev/null +++ b/SYSPROG/POPUP/SYSDEFAULTS.json @@ -0,0 +1,102 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0", + "<6,1,15>": "0", + "<6,1,16>": "0" + } + }, + "<7>": "", + "<8>": { + "<8,1>": "COUNTER", + "<8,2>": "CURRENT", + "<8,3>": "DATE", + "<8,4>": "DATETIME", + "<8,5>": "FUNCNAME('arg1',arg2')", + "<8,6>": "'Literal'", + "<8,7>": "NULL", + "<8,8>": "SEQKEY", + "<8,9>": "TIME", + "<8,10>": "USER" + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "20", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Default Value" + }, + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "", + "<9,2,3>": "", + "<9,2,4>": "", + "<9,2,5>": "", + "<9,2,6>": "" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Standard Column Defaults", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "0", + "<17>": "0", + "<18>": "0", + "<19>": "0", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSJUSTIFICATIONS.json b/SYSPROG/POPUP/SYSJUSTIFICATIONS.json new file mode 100644 index 0000000..6e13e19 --- /dev/null +++ b/SYSPROG/POPUP/SYSJUSTIFICATIONS.json @@ -0,0 +1,87 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0", + "<6,1,15>": "0", + "<6,1,16>": "0" + } + }, + "<7>": "", + "<8>": { + "<8,1>": "Left", + "<8,2>": "Center", + "<8,3>": "Right" + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "12", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Justifications", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSPTRS.json b/SYSPROG/POPUP/SYSPTRS.json new file mode 100644 index 0000000..5489f6c --- /dev/null +++ b/SYSPROG/POPUP/SYSPTRS.json @@ -0,0 +1,99 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "SYSPTRS", + "<8>": "BY ID ", + "<9>": { + "<9,1>": { + "<9,1,1>": "ID", + "<9,1,2>": "20", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Id" + }, + "<9,2>": { + "<9,2,1>": "LOCATION", + "<9,2,2>": "30", + "<9,2,3>": "L", + "<9,2,4>": "C", + "<9,2,5>": "", + "<9,2,6>": "Location" + }, + "<9,3>": { + "<9,3,1>": "FS", + "<9,3,2>": "20", + "<9,3,3>": "L", + "<9,3,4>": "C", + "<9,3,5>": "", + "<9,3,6>": "Filing System" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "Defined Locations", + "<13>": "", + "<14>": "K", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "1", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSREPOSMODULES_POPUP.json b/SYSPROG/POPUP/SYSREPOSMODULES_POPUP.json new file mode 100644 index 0000000..e12772a --- /dev/null +++ b/SYSPROG/POPUP/SYSREPOSMODULES_POPUP.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "SYSREPOSMODULES", + "<8>": "BY @ID", + "<9>": { + "<9,1>": { + "<9,1,1>": "MODULE_ID", + "<9,1,2>": "20", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Module Id" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "Modules", + "<13>": "", + "<14>": "K", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSREPOS_ENTITY.json b/SYSPROG/POPUP/SYSREPOS_ENTITY.json new file mode 100644 index 0000000..245fb66 --- /dev/null +++ b/SYSPROG/POPUP/SYSREPOS_ENTITY.json @@ -0,0 +1,81 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "MS Sans Serif", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "1", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0" + } + }, + "<7>": "SYSREPOS", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "ENTITYID", + "<9,1,2>": "40", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Entityid" + } + }, + "<10>": "K", + "<11>": "1", + "<12>": "Sysrepos Entities", + "<13>": "", + "<14>": "K", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSTABLES.json b/SYSPROG/POPUP/SYSTABLES.json new file mode 100644 index 0000000..8bc9817 --- /dev/null +++ b/SYSPROG/POPUP/SYSTABLES.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "30", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0", + "<6,1,15>": "0", + "<6,1,16>": "0" + } + }, + "<7>": "SYSTABLES", + "<8>": "BY @ID", + "<9>": { + "<9,1>": { + "<9,1,1>": "TABLE", + "<9,1,2>": "20", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Table" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "Tables", + "<13>": "", + "<14>": "K", + "<15>": "1", + "<16>": "0", + "<17>": "0", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "-2", + "<35>": "-2", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "-2", + "<41>": "1000", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSTABLES_MV.json b/SYSPROG/POPUP/SYSTABLES_MV.json new file mode 100644 index 0000000..f2758cd --- /dev/null +++ b/SYSPROG/POPUP/SYSTABLES_MV.json @@ -0,0 +1,91 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "30", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0", + "<6,1,15>": "0", + "<6,1,16>": "0" + } + }, + "<7>": "SYSTABLES", + "<8>": "BY @ID", + "<9>": { + "<9,1>": { + "<9,1,1>": "TABLE_NAME", + "<9,1,2>": "30", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Table Name" + }, + "<9,2>": { + "<9,2,1>": "VOLUME_NAME", + "<9,2,2>": "30", + "<9,2,3>": "L", + "<9,2,4>": "C", + "<9,2,5>": "", + "<9,2,6>": "Volume Name" + } + }, + "<10>": "T", + "<11>": "2", + "<12>": "Tables", + "<13>": "", + "<14>": "K", + "<15>": "1", + "<16>": "0", + "<17>": "0", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSVALIDATIONS.json b/SYSPROG/POPUP/SYSVALIDATIONS.json new file mode 100644 index 0000000..356e882 --- /dev/null +++ b/SYSPROG/POPUP/SYSVALIDATIONS.json @@ -0,0 +1,205 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "3", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0", + "<6,1,15>": "0", + "<6,1,16>": "0" + } + }, + "<7>": "", + "<8>": { + "<8,1>": { + "<8,1,1>": "(MD2)", + "<8,1,2>": "2-Place decimal number", + "<8,1,3>": "$34.44 or 34.44" + }, + "<8,2>": { + "<8,2,1>": "(MD0)", + "<8,2,2>": "Integer (truncates decimal)", + "<8,2,3>": "5345" + }, + "<8,3>": { + "<8,3,1>": "(D)", + "<8,3,2>": "Date, MM/DD/YY", + "<8,3,3>": "01/15/96" + }, + "<8,4>": { + "<8,4,1>": "(DE.)", + "<8,4,2>": "European date, DD.MM.YY", + "<8,4,3>": "15.01.96" + }, + "<8,5>": { + "<8,5,1>": "(MT)", + "<8,5,2>": "Time", + "<8,5,3>": "15:01" + }, + "<8,6>": { + "<8,6,1>": "(DT)", + "<8,6,2>": "Date & Time", + "<8,6,3>": "01/15/96 10:00" + }, + "<8,7>": { + "<8,7,1>": "(B)", + "<8,7,2>": "Boolean (True/False)", + "<8,7,3>": " Y or N" + }, + "<8,8>": { + "<8,8,1>": "(n,m)", + "<8,8,2>": "Range check (low,high)", + "<8,8,3>": "(-32768,32768)" + }, + "<8,9>": { + "<8,9,1>": "'xyz'", + "<8,9,2>": "Match a specific string", + "<8,9,3>": "'Approved" + }, + "<8,10>": { + "<8,10,1>": "nN", + "<8,10,2>": "n Numeric characters", + "<8,10,3>": "7N" + }, + "<8,11>": { + "<8,11,1>": "nA", + "<8,11,2>": "Alpha characters", + "<8,11,3>": "3A" + }, + "<8,12>": { + "<8,12,1>": "nX", + "<8,12,2>": "n Characters of any type", + "<8,12,3>": "2X" + }, + "<8,13>": { + "<8,13,1>": "nZ", + "<8,13,2>": "Up to n characters of any type", + "<8,13,3>": "5Z" + }, + "<8,14>": { + "<8,14,1>": "nA'x'nZ", + "<8,14,2>": "Combinations with literals", + "<8,14,3>": "1A1N1A'-'1N1A1N" + }, + "<8,15>": { + "<8,15,1>": "[ZIP_FORMAT]", + "<8,15,2>": "Zip code format(US,Canadian)", + "<8,15,3>": "06902, V1A 3A1" + }, + "<8,16>": { + "<8,16,1>": "[PHONE_FORMAT]", + "<8,16,2>": "US phone number", + "<8,16,3>": "(203)-555-1212" + }, + "<8,17>": { + "<8,17,1>": "[SSN_FORMAT]", + "<8,17,2>": "US Social Security format", + "<8,17,3>": "123-45-6789" + }, + "<8,18>": { + "<8,18,1>": "[EMAIL_FORMAT]", + "<8,18,2>": "Enter Valid Email Address", + "<8,18,3>": "xxx@yyy.zzz" + }, + "<8,19>": { + "<8,19,1>": "<>", + "<8,19,2>": "Verifile (Table lookup)", + "<8,19,3>": "" + }, + "<8,20>": { + "<8,20,1>": "<>", + "<8,20,2>": "No Input Validation/Conversion", + "<8,20,3>": "<>" + }, + "<8,21>": { + "<8,21,1>": "<>", + "<8,21,2>": "Use the columns default", + "<8,21,3>": "<>" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "15", + "<9,1,3>": "L", + "<9,1,4>": "L", + "<9,1,5>": "", + "<9,1,6>": "Conversion" + }, + "<9,2>": { + "<9,2,1>": "2", + "<9,2,2>": "21", + "<9,2,3>": "L", + "<9,2,4>": "L", + "<9,2,5>": "", + "<9,2,6>": "Description" + }, + "<9,3>": { + "<9,3,1>": "3", + "<9,3,2>": "15", + "<9,3,3>": "L", + "<9,3,4>": "L", + "<9,3,5>": "", + "<9,3,6>": "Example" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Input Validations", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "1", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16245453", + "<35>": "16245453", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSVOC.json b/SYSPROG/POPUP/SYSVOC.json new file mode 100644 index 0000000..2f8a328 --- /dev/null +++ b/SYSPROG/POPUP/SYSVOC.json @@ -0,0 +1,91 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "SYSVOC", + "<8>": "BY @ID", + "<9>": { + "<9,1>": { + "<9,1,1>": "0", + "<9,1,2>": "10", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "ID" + }, + "<9,2>": { + "<9,2,1>": "", + "<9,2,2>": "", + "<9,2,3>": "", + "<9,2,4>": "", + "<9,2,5>": "", + "<9,2,6>": "" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "SYSVOC Entries", + "<13>": "", + "<14>": "K", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYSVOLUMES.json b/SYSPROG/POPUP/SYSVOLUMES.json new file mode 100644 index 0000000..216f4c6 --- /dev/null +++ b/SYSPROG/POPUP/SYSVOLUMES.json @@ -0,0 +1,97 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "MS Sans Serif", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "0", + "<6,1,7>": "0", + "<6,1,8>": "34", + "<6,1,9>": "0", + "<6,1,10>": "1", + "<6,1,11>": "2", + "<6,1,12>": "1", + "<6,1,13>": "0", + "<6,1,14>": "0" + } + }, + "<7>": "SYSVOLUMES", + "<8>": "BY @ID", + "<9>": { + "<9,1>": { + "<9,1,1>": "VOLUME_NAME", + "<9,1,2>": "20", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "Volume Name" + }, + "<9,2>": { + "<9,2,1>": "VOLUME_LABEL", + "<9,2,2>": "20", + "<9,2,3>": "L", + "<9,2,4>": "C", + "<9,2,5>": "", + "<9,2,6>": "Volume Label" + }, + "<9,3>": { + "<9,3,1>": "DATA_LOCATION", + "<9,3,2>": "20", + "<9,3,3>": "L", + "<9,3,4>": "C", + "<9,3,5>": "", + "<9,3,6>": "Data Location" + } + }, + "<10>": "T", + "<11>": "1", + "<12>": "Volumes", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "1", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "1", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/SYS_ADODATATYPES.json b/SYSPROG/POPUP/SYS_ADODATATYPES.json new file mode 100644 index 0000000..814f108 --- /dev/null +++ b/SYSPROG/POPUP/SYS_ADODATATYPES.json @@ -0,0 +1,100 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "", + "<8>": { + "<8,1>": { + "<8,1,1>": "adVarChar", + "<8,1,2>": "213" + }, + "<8,2>": { + "<8,2,1>": "adInteger", + "<8,2,2>": "214" + } + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "30", + "<9,1,3>": "L", + "<9,1,4>": "C", + "<9,1,5>": "", + "<9,1,6>": "TypeName" + }, + "<9,2>": { + "<9,2,1>": "2", + "<9,2,2>": "5", + "<9,2,3>": "R", + "<9,2,4>": "C", + "<9,2,5>": "MD0", + "<9,2,6>": "Type Nr" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "ADO Datatypes", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "1", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16245453", + "<35>": "16245453", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/WINDOWNAMES.json b/SYSPROG/POPUP/WINDOWNAMES.json new file mode 100644 index 0000000..eca9220 --- /dev/null +++ b/SYSPROG/POPUP/WINDOWNAMES.json @@ -0,0 +1,83 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-2", + "<2>": "-2", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "Tahoma", + "<6,1,2>": "-11", + "<6,1,3>": "400", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "5", + "<6,1,7>": "0", + "<6,1,8>": "39", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "21" + } + }, + "<7>": "", + "<8>": "", + "<9>": { + "<9,1>": { + "<9,1,1>": "0", + "<9,1,2>": "30", + "<9,1,3>": "L", + "<9,1,4>": "L", + "<9,1,5>": "", + "<9,1,6>": "Window Name" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Window Names", + "<13>": "", + "<14>": "E", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "1", + "<24>": "1", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "0", + "<30>": "0", + "<31>": "0", + "<32>": "0", + "<33>": "0", + "<34>": "16777215", + "<35>": "16777215", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/POPUP/YESNO.json b/SYSPROG/POPUP/YESNO.json new file mode 100644 index 0000000..28d1d8c --- /dev/null +++ b/SYSPROG/POPUP/YESNO.json @@ -0,0 +1,86 @@ +{ + "header": { + "version": 1, + "type": "record" + }, + "body": { + "record1": { + "<1>": "-1", + "<2>": "-1", + "<3>": "-1", + "<4>": "-1", + "<5>": "16777215", + "<6>": { + "<6,1>": { + "<6,1,1>": "MS Sans Serif", + "<6,1,2>": "-11", + "<6,1,3>": "700", + "<6,1,4>": "0", + "<6,1,5>": "0", + "<6,1,6>": "6", + "<6,1,7>": "0", + "<6,1,8>": "33", + "<6,1,9>": "0", + "<6,1,10>": "0", + "<6,1,11>": "0", + "<6,1,12>": "0", + "<6,1,13>": "11", + "<6,1,14>": "2", + "<6,1,15>": "0", + "<6,1,16>": "12" + } + }, + "<7>": "", + "<8>": { + "<8,1>": "1", + "<8,2>": "0" + }, + "<9>": { + "<9,1>": { + "<9,1,1>": "1", + "<9,1,2>": "10", + "<9,1,3>": "C", + "<9,1,4>": "C", + "<9,1,5>": "B", + "<9,1,6>": "Value" + } + }, + "<10>": "L", + "<11>": "1", + "<12>": "Choose Value", + "<13>": "1", + "<14>": "F", + "<15>": "1", + "<16>": "1", + "<17>": "1", + "<18>": "1", + "<19>": "1", + "<20>": "1", + "<21>": "1", + "<22>": "0", + "<23>": "0", + "<24>": "0", + "<25>": "0", + "<26>": "", + "<27>": "", + "<28>": "", + "<29>": "", + "<30>": "", + "<31>": "", + "<32>": "", + "<33>": "", + "<34>": "", + "<35>": "", + "<36>": "", + "<37>": "", + "<38>": "", + "<39>": "", + "<40>": "", + "<41>": "", + "<42>": "", + "<43>": "", + "<44>": "", + "<45>": "" + } + } +} \ No newline at end of file diff --git a/SYSPROG/STPROC/ACTIVE_DIRECTORY_SERVICES.txt b/SYSPROG/STPROC/ACTIVE_DIRECTORY_SERVICES.txt new file mode 100644 index 0000000..0e20122 --- /dev/null +++ b/SYSPROG/STPROC/ACTIVE_DIRECTORY_SERVICES.txt @@ -0,0 +1,145 @@ +Compile function Active_Directory_Services(@Service, @Params) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Active_Directory_Services + + Description : Handler program for all module related services. + + Notes : The generic parameters should contain all the necessary information to process the services. Often + this will be information like the data Record and Key ID. + + Parameters : + Service [in] -- Name of the service being requested + Param1-10 [in/out] -- Additional request parameter holders + Response [out] -- Response to be sent back to the Controller (MCP) or requesting procedure + + History : (Date, Initials, Notes) + 02/17/23 djs Original programmer. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$Insert SERVICE_SETUP +$Insert APP_INSERTS +$Insert REVDOTNETEQUATES + +Declare subroutine Set_Property.Net + +GoToService + +Return Response or "" + +//----------------------------------------------------------------------------- +// SERVICES +//----------------------------------------------------------------------------- + + +Service AuthenticateUser(Username, Password, Domain) + + Authenticated = False$ + DotNetHandle = StartDotNet("","4.0") + DotNetDir = CheckDotNet('4.0'):'\' + AccountMgmtDllPath = DotNetDir:'System.DirectoryServices.AccountManagement.dll' + Set_Property.Net(DotNetHandle, "AssemblyName", AccountMgmtDllPath) + If Not(Get_Status(errCode)) then + Params = 'Domain':@FM:Domain + ParamTypes = 'System.DirectoryServices.AccountManagement.ContextType':@FM:'System.String' + objPC = Create_Class.Net(DotNetHandle, "System.DirectoryServices.AccountManagement.PrincipalContext", 0, Params, ParamTypes) + If Not(Get_Status(errCode)) then + Params = Username:@FM:Password + ParamTypes = 'System.String':@FM:'System.String' + Authenticated = Send_Message.Net(objPC, 'ValidateCredentials', Params, ParamTypes, 0) + Swap 'True' with True$ in Authenticated + Swap 'False' with False$ in Authenticated + Free_Class.Net(objPC) + end + end + Response = Authenticated + +end service + + +Service GetADGroups(Username, Domain) + + ADGroups = '' + DotNetHandle = StartDotNet("","4.0") + DotNetDir = CheckDotNet('4.0'):'\' + AccountMgmtDllPath = DotNetDir:'System.DirectoryServices.AccountManagement.dll' + Set_Property.Net(DotNetHandle, "AssemblyName", AccountMgmtDllPath) + If Not(Get_Status(errCode)) then + + + Params = 'Domain':@FM:'Infineon' + ParamTypes = 'System.DirectoryServices.AccountManagement.ContextType':@FM:'System.String' + objPC = Create_Class.Net(DotNetHandle, "System.DirectoryServices.AccountManagement.PrincipalContext", 0, Params, ParamTypes) + If Not(Get_Status(errCode)) then + objUserPrincipal = Create_Class.Net(DotNetHandle, "System.DirectoryServices.AccountManagement.UserPrincipal", 0, objPC, 'RevDotNet') + If Not(Get_Status(errCode)) then + Set_Property.Net(objUserPrincipal, 'Name', Username) + objPrinSearcher = Create_Class.Net(DotNetHandle, "System.DirectoryServices.AccountManagement.PrincipalSearcher", 0, objUserPrincipal, 'RevDotNet') + If Not(Get_Status(errCode)) then + objPrin = Send_Message.Net(objPrinSearcher, 'FindOne', '', '', 1) + If Not(Get_Status(errCode)) then + Name = Get_Property.Net(objPrin, 'Name', 0) + objPrinSearchResult = Send_Message.Net(objPrin, 'GetGroups', '', '', 1) + If Not(Get_Status(errCode)) then + objEnum = Send_Message.Net(objPrinSearchResult, 'GetEnumerator', '', '', 1) + If Not(Get_Status(errCode)) then + Loop + Done = Send_Message.Net(objEnum, 'MoveNext', '', '', 0) + Until Done EQ 'False' + If Not(Get_Status(errCode)) then + objCurrPrin = Get_Property.Net(objEnum, 'Current', 1) + If Not(Get_Status(errCode)) then + CurrPrinName = Get_Property.Net(objCurrPrin, 'Name', 0) + If CurrPrinName NE 'Domain Users' then ADGroups<-1> = CurrPrinName + Free_Class.Net(objCurrPrin) + end + end + Repeat + Free_Class.Net(objEnum) + end + Free_Class.Net(objPrinSearchResult) + end + Free_Class.Net(objPrin) + end + Free_class.Net(objPrinSearcher) + end + Free_Class.Net(objUserPrincipal) + end + Free_Class.Net(objPC) + end + end + Response = ADGroups + +End Service + + +Service GetComputerDomain() + + Domain = '' + DotNetHandle = StartDotNet("","4.0") + DotNetDir = CheckDotNet('4.0'):'\' + DirDllPath = DotNetDir:'System.DirectoryServices.dll' + Set_Property.Net(DotNetHandle, "AssemblyName", DirDllPath) + If Not(Get_Status(errCode)) then + objDomain = Create_Class.Net(DotNetHandle, "System.DirectoryServices.ActiveDirectory.Domain", 0, '', '') + If Not(Get_status(errCode)) then + ObjCompDomain = Send_Message.Net(objDomain, 'GetComputerDomain', '', '', True$) + If Not(Get_Status(errCode)) then + Domain = Get_Property.Net(objCompDomAin, 'Name', False$) + Free_class.Net(objCompDomain) + end + Free_Class.Net(objDomain) + end + end + Response = Domain + +end service + + + diff --git a/SYSPROG/STPROC/ADIOS.txt b/SYSPROG/STPROC/ADIOS.txt new file mode 100644 index 0000000..052aff3 --- /dev/null +++ b/SYSPROG/STPROC/ADIOS.txt @@ -0,0 +1,7 @@ +Compile Subroutine Adios(void) + +Declare function Utility + + rv = Utility('DESTROY','SYSTEM') + +return diff --git a/SYSPROG/STPROC/AUDIT_MFS.txt b/SYSPROG/STPROC/AUDIT_MFS.txt new file mode 100644 index 0000000..fbc2806 --- /dev/null +++ b/SYSPROG/STPROC/AUDIT_MFS.txt @@ -0,0 +1,269 @@ +COMPILE SUBROUTINE Audit_MFS(Code, BFS, Handle, Name, FMC, Record, Status) + +DECLARE Subroutine Msg, FSMsg + +COMMON /FILENAME/ Files_Array, Handles_Array + +$INSERT FILE.SYSTEM.ONGOSUB +$INSERT FILE.SYSTEM.EQUATES +$INSERT MSG_EQUATES +$INSERT AUDIT_EQUATES +$INSERT DICT_EQUATES + +EQU ReadRec$ TO 1 + +EQU Master$ TO 1 +EQU Dependent$ TO 2 + + +RETURN + +/* Directly called functions - don't pass to next file system */ + +INSTALL: +FLUSH: +UNLOCK.ALL: +FLUSH.CACHE: + +Status = 1 +RETURN + +/* Not available to MFS */ + +LOCK.SEMAPHORE: +UNLOCK.SEMAPHORE: +SET.USER.SEMAPHORE: + +RETURN + +/* Directory level calls */ + +CREATE.MEDIA: +OPEN.MEDIA: +CLOSE.MEDIA: +READ.MEDIA: +WRITE.MEDIA: +GROUP.NUMBER: +RECORD.COUNT: +CREATE.FILE: +RENAME.FILE: +MOVE.FILE: +DELETE.FILE: + +Goto NEXT.FS + +OPEN.FILE: + + * Call BFS in order to get file handle + + FS = DELETE(BFS,1,1,1) + NEXTFS = FS<1,1,1> + CALL @NEXTFS(Code, FS, Handle, Name, FMC, Record, Status) + + * Load handle and file name into labelled common + + IF Status THEN + LOCATE Name IN Files_Array USING @FM SETTING POS THEN + Handles_Array = Record + END ELSE + Files_Array<-1> = Name + Handles_Array<-1> = Record + END + END + RETURN + +CLEARFILE: +REMAKE.FILE: +SELECT: +READNEXT: +CLEARSELECT: + +READ.RECORD: +READO.RECORD: + + GOTO NEXT.FS + +WRITE.RECORD: + + * Get original record and compare with RECORD being written + + LOCATE Handle IN Handles_Array USING @FM SETTING POS ELSE + mesg = "Missing file handle in AUDIT_MFS!|" + mesg := handle + MSG('',mesg) + Status = 0 + RETURN + END + + OPEN 'AUDIT' TO Audit_File ELSE + MSG('',"Put FSMSG in AUDIT_MFS") + *FSMsg() + Status = 0 + RETURN + END + + Write_Flag = 0 + Org_Rec = '' + NextFS = BFS<1,1,2> + + CALL @NextFS(ReadRec$, FS, Handle, Name, FMC, Org_Rec, Status) ;* Read old record + + File_Name = Files_Array[1,'*'] ;* Extract corresponding file name + + Time_Date = TimeDate() + Date_Time = FIELD(Time_Date,' ',2,4):" ":Time_Date[1,' '] + DTM = ICONV(Date_Time,'DT2/^S') + + Audit_Key = File_Name:"*":@USERNAME:"*":DTM:"*":Name + + IF Status THEN + + * Original record found - check for changes + + IF RECORD NE Org_Rec THEN + + Write_Flag = 1 + + AMV_Master = 0 ;* Flag for Master value found + AMV_Dependent = 0 ;* Flag for Dependent value found + AMV_List = '' ;* Master & Dependent field numbers + + * Record has been modified - write changes to history + + Pct_Field = XLATE('DICT.':File_Name,'%FIELDS%','',"X") + + Audit_Rec = 'Change' ;* Initialize audit record & load field 1 + Change_Cnt = 1 + + FOR I = 1 TO Pct_Field + IF RECORD NE Org_Rec THEN + + IF I = AMV_List THEN AMV_Master = 1 + LOCATE I IN AMV_List USING @VM SETTING DUMMY THEN AMV_Dependent = 1 + + LOCATE I IN Pct_Field USING @VM SETTING POS THEN + + Field_Name = Pct_Field + New_Val = RECORD + Old_Val = Org_Rec + + CONVERT @VM TO '}' IN New_Val + CONVERT @VM TO '}' IN Old_Val + + Audit_Rec = Field_Name + Audit_Rec = New_Val + Audit_Rec = Old_Val + Change_Cnt += 1 + + END ; * End of check for field number in Pct_Fields + + END ; * End of check for matching field + + NEXT I + + IF AMV_Dependent AND NOT(AMV_Master) THEN + + * Dependent fields updated - write the master field also + + Master_Field = AMV_List + + LOCATE Master_Field IN Pct_Field USING @VM SETTING POS THEN + + Field_Name = Pct_Field + New_Val = RECORD + Old_Val = Org_Rec + + CONVERT @VM TO '}' IN New_Val + CONVERT @VM TO '}' IN Old_Val + + Audit_Rec = Field_Name + Audit_Rec = New_Val + Audit_Rec = Old_Val + Change_Cnt += 1 + + END ; * End of locate + + END ;* End of check for master multivalue flag + + END ; * End of global record check + + END ELSE + * Old record not found => This is a new record being written + + Audit_Rec = 'Created' + Write_Flag = 1 + + END ; * End of Status check + + IF Write_Flag THEN + WRITE Audit_Rec ON Audit_File,Audit_Key ELSE + MSG('',"Put FSMSG in AUDIT_MFS") + *FSMsg() + Status = 0 + RETURN + END + END + + GOTO NEXT.FS + + +DELETE.RECORD: + +LOCATE Handle IN Handles_Array USING @FM SETTING POS ELSE + mesg = "Missing file handle in AUDIT_MFS!|" + mesg := handle + MSG('',mesg) + Status = 0 + RETURN +END + +OPEN 'AUDIT' TO Audit_File ELSE + MSG('',"Put FSMSG in AUDIT_MFS") + *FSMsg() + Status = 0 + RETURN +END + +Org_Rec = '' +NextFS = BFS<1,1,2> + +CALL @NextFS(ReadRec$, FS, Handle, Name, FMC, Org_Rec, Status) ;* Read old record + +File_Name = Files_Array[1,'*'] ;* Extract corresponding file name + +Time_Date = TimeDate() +Date_Time = FIELD(Time_Date,' ',2,4):" ":Time_Date[1,' '] +DTM = ICONV(Date_Time,'DT2/^S') + +Audit_Key = File_Name:"*":@USERNAME:"*":DTM:"*":Name + +Audit_Rec = 'Deleted' +Audit_Rec = Org_Rec ; * Put the old record in Audit_Rec<5> + +WRITE Audit_Rec ON Audit_File,Audit_Key ELSE + MSG('',"Put FSMSG in AUDIT_MFS") + *FSMsg() + Status = 0 + RETURN +END + +GOTO NEXT.FS + +/* Unused calls */ +LOCK.RECORD: +UNLOCK.RECORD: +RESERVED: +OMNI.SCRIPT: + +CREATE.INDEX: +DELETE.INDEX: +SELECT.INDEX: +UPDATE.INDEX: +READNEXT.INDEX: + +NEXT.FS: + + FS = DELETE(BFS,1,1,1) + NEXTFS = FS<1,1,1> + CALL @NEXTFS(Code, FS, Handle, Name, FMC, Record, Status) + RETURN diff --git a/SYSPROG/STPROC/AUTHENTICATE_LDAP.txt b/SYSPROG/STPROC/AUTHENTICATE_LDAP.txt new file mode 100644 index 0000000..7a0e742 --- /dev/null +++ b/SYSPROG/STPROC/AUTHENTICATE_LDAP.txt @@ -0,0 +1,74 @@ +function Authenticate_LDAP(void) + +$Insert LOGICAL + +/* equates for the base registry keys */ +equ HKEY_CLASSES_ROOT$ to 0x80000000 +equ HKEY_CURRENT_USER$ to 0x80000001 +equ HKEY_LOCAL_MACHINE$ to 0x80000002 +equ HKEY_USERS$ to 0x80000003 +equ HKEY_PERFORMANCE_DATA$ to 0x80000004 +equ HKEY_CURRENT_CONFIG$ to 0x80000005 +equ HKEY_DYN_DATA$ to 0x80000006 +equ KEY_QUERY_VALUE$ to 0x0001 +equ ERROR_SUCCESS to 0x0000 + +Declare subroutine Set_Property.Net, Utility, RegQueryValueEx, Msg, Create_User, RTI_Create_User_Details +Declare Subroutine Set_Property +Declare function Active_Directory_Services, RegOpenKeyEx, RTI_GetNetworkUserName, RegCloseKey +Declare Function Database_Services + +Log = @AppId<1> +Oswrite Log to 'D:\Temp\auth.txt' + + Authenticated = False$ + Options = 0 + SamDesired = KEY_QUERY_VALUE$ + KeyHandle = 0 + Hkey = HKEY_LOCAL_MACHINE$ + SubKey = "SYSTEM\CurrentControlSet\Services\Tcpip\Parameters":\00\ + Stat = 0 + Null = '' + LockVariable KeyHandle as Long + Stat = RegOpenKeyEx(Hkey, SubKey, Options, SamDesired, KeyHandle) + If Stat = ERROR_SUCCESS Then + Domain = str(\00\, 512) + Reg_SZ = 1 + CbBuf = 512 + Key = "Domain":\00\ + RegQueryValueEx(KeyHandle, Key, 0, Reg_SZ, Domain, CbBuf) + Domain = Domain[1, CbBuf - 1] + end + rv = RegCloseKey(KeyHandle) + + UserADName = RTI_GetNetworkUserName() + UserADGroups = Active_Directory_Services('GetADGroups', UserADName, Domain) + **SSOInfo = Database_Services('ReadDataRow', 'SYSENV', 'CFG_LOGIN*':@AppId<1>) + *SSOErrorMsg = SSOInfo<9> + *SSOADGroups = Field(SSOInfo, @FM, 2, 3) + SSOADGroups = Database_Services('ReadDataRow', 'SYSENV', 'SSO*LSL2') + + For GroupIndex = 3 to 1 Step -1 + SSOADGroup = SSOADGroups + If InList(UserADGroups, SSOADGroup, @FM) then + @UserName = UserADName + SecurityLevel = GroupIndex - 1 + @Admin = SecurityLevel + Authenticated = True$ + Set_Property( "SYSTEM", "LOGININFO" , 'LSL2':@FM:UserADName:@FM:'') + end + Until Authenticated + Next GroupIndex + + Swap 1 With 'True' In Authenticated + Swap 0 With 'False' In Authenticated + Log := ', Authenticated ':Authenticated + Oswrite Log to 'D:\Temp\auth.txt' + + If Not(Authenticated) then + Msg(@Window, 'SSO Error') + Utility('DESTROY', 'SYSTEM') + End + +Return + diff --git a/SYSPROG/STPROC/BASE_MFS.txt b/SYSPROG/STPROC/BASE_MFS.txt new file mode 100644 index 0000000..e9e76af --- /dev/null +++ b/SYSPROG/STPROC/BASE_MFS.txt @@ -0,0 +1,449 @@ +Subroutine Base_MFS(Code, FSList, Handle, Name, FMC, Record, Status) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Base_MFS + + Description : Base MFS (Modified File System) shell for general use. + + Notes : Used to track activity in a given database table, regardless of how the table is accessed. + Generally the MFS remains as generic as possible and makes a call to another table-specific stored + procedure to handle all of the main functionality. + + MFS procedures should normally be stored in the SYSPROG application for optimum accessibility. + The table-specific stored procedures should be stored in the local application. + + Some methods might need the regular name of the database table. Since the MFS routine does not + normally provide this information we need to track it ourselves. The OPEN.FILE method gives us + an opportunity to retrieve the regular name as well as the table handle. This information is then + stored in the /Tables/ global common for convenient reference. + + Record based actions (e.g. READ.RECORD, WRITE.RECORD, DELETE.RECORD) will be routed to table + specific and promoted (i.e. generic) action handlers befoe the BFS is called (Call_Next_FS internal + method.) The MFS argument Status can be set accordingly to determine how the rest of the action + chain should be executed (see the ACTION_SETUP insert for more information.) + + Parameters : + Code [in] -- An integer value indicating the operation to be performed (1 = read a record, 4 = delete a + record, 11 = open a file, etc.) + FSList [in] -- The list of MFSs and the BFS name for the current file or volume. This is an @SVM delimited + array, with the current MFS name as the first value in the array, and the BFS name as the + last value. + Handle [in] -- The file handle of the file or media map being accessed. Note, this does contain the entire + handle structure that the Basic+ Open statement would provide. + Name [in] -- The name (key) of the record or file being accessed. + FMC [in] -- Various functions. + Record [in] -- The entire record (for record-oriented functions) or a newly-created handle (for "get + handle" functions). + Status [out/in] -- A return code indicating the success or failure of an operation. + + History : (Date, Initials, Notes) + 07/27/10 dmb Original programmer + 03/26/11 dmb Save and restore @FILE.ERROR to prevent incorrect error messages being passed down the line. + 05/03/16 dmb [SRPFW-124] Revise the Get_Original_Record logic to call the remaing MFS chain rather + than just try to call the BFS directly. + 06/09/16 dmb [SRPFW-282] Update the CLEARFILE action to gosub to Action_Chain rather than Call_Next_FS + so the promoted action can be invoked. + 09/18/19 dmb [SRPFW-282] Update OPEN.FILE to set the volume based on the path in the handle + (Record argument). + 06/25/20 dmb [SRPFW-282] Update OPEN.FILE to also remove the Table*Database prefix in the Record + argument if it exists. + 09/10/20 dmb [SRPFW-282] Update OPEN.FILE to default Volume to REVBOOT. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert FSERRORS_HDR +$insert FILE.SYSTEM.EQUATES +$insert ACTION_SETUP + +Declare subroutine SRP_Stopwatch + +Actions = 'READ_RECORD,READONLY_RECORD,WRITE_RECORD,DELETE_RECORD,LOCK_RECORD,UNLOCK_RECORD,SELECT,READNEXT,' +Actions := 'CLEARSELECT,CLEARFILE,OPEN_FILE,CREATE_FILE,RENAME_FILE,MOVE_FILE,DELETE_FILE,OPEN_MEDIA,CREATE_MEDIA,' +Actions := 'READ_MEDIA,WRITE_MEDIA,UNLOCK_ALL,FLUSH,INSTALL,RESERVED,RESERVED,RESERVED,OMNI_SCRIPT,CLOSE_MEDIA,' +Actions := 'RECORD_COUNT,REMAKE_FILE,CREATE_INDEX,DELETE_INDEX,UPDATE_INDEX,SELECT_INDEX,READNEXT_INDEX' +BaseAction = Field(Actions, ',', Code) + +// Initialize the ActionFlow variable. Assume the action will chain forward. +ActionFlow = ACTION_CONTINUE$ + +// Initialize the OrigRecord variable. The WRITE.RECORD and DELETE.RECORD actions will populate this. +OrigRecord = '' + +// FILE.SYSTEM.ONGOSUB has the On Code GoSub... command +$insert FILE.SYSTEM.ONGOSUB + +Return + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// MFS Actions +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +READ.RECORD: + GoSub Action_Chain +return + + +READO.RECORD: + GoSub Action_Chain +return + + +WRITE.RECORD: + // Get the original (static) record from the database table. + GoSub Get_Original_Record + + GoSub Action_Chain +return + + +DELETE.RECORD: + // Get the original (static) record from the database table. + GoSub Get_Original_Record + + GoSub Action_Chain +return + + +LOCK.RECORD: + GoSub Call_Next_FS +return + + +UNLOCK.RECORD: + GoSub Call_Next_FS +return + + +SELECT: + GoSub Call_Next_FS +return + + +READNEXT: + GoSub Call_Next_FS +return + + +CLEARSELECT: + GoSub Call_Next_FS +return + + +CLEARFILE: + GoSub Action_Chain +return + + +OPEN.FILE: + // Call BFS in order to get the table handle. The regular name of the table will be returned in the Name argument + // and the handle will be returned in the Record argument. + GoSub Call_Next_FS + + // Load the handle and table name into the labelled common. + If Status then + TableName = Name[1, '*'] + Accountname = Name[Col2() + 1, '999'] + Volume = Record[-1, 'B' : @TM] + Volume = Volume[14, 9999] + Volume[-12, 12] = '' + If Volume EQ '' then Volume = 'REVBOOT' + Locate TableName in TableNames@ using @FM Setting fPos then + If TableHandles@ EQ Record else + // There is a new handle for the indicated table. This could be the same table name from a different + // volume or an updated handle for the same table. Either way, just append a new handle/table pair + // to the lookup arrays. + TableNames@ := TableName : @FM + TableAccounts@ := AccountName : @FM + TableHandles@ := Record : @FM + TableVolumes@ := Volume : @FM + end + end else + TableNames@ := TableName : @FM + TableAccounts@ := AccountName : @FM + TableHandles@ := Record : @FM + TableVolumes@ := Volume : @FM + end + end +return + + +CREATE.FILE: + GoSub Call_Next_FS +return + + +RENAME.FILE: + GoSub Call_Next_FS +return + + +MOVE.FILE: + GoSub Call_Next_FS +return + + +DELETE.FILE: + GoSub Call_Next_FS +return + + +OPEN.MEDIA: + GoSub Call_Next_FS +return + +CREATE.MEDIA: + GoSub Call_Next_FS +return + + +READ.MEDIA: + GoSub Call_Next_FS +return + + +WRITE.MEDIA: + GoSub Call_Next_FS +return + + +UNLOCK.ALL: + Record = '' + Status = ACTION_CONTINUE$ +return + + +FLUSH: + Record = '' + Status = ACTION_CONTINUE$ +return + + +INSTALL: + Status = ACTION_CONTINUE$ +return + + +RESERVED: + // There is a critical error if this has been reached. + Status = ACTION_STOP$ +return + + +OMNI.SCRIPT: + GoSub Call_Next_FS +return + + +CLOSE.MEDIA: + GoSub Call_Next_FS +return + + +RECORD.COUNT: + GoSub Call_Next_FS +return + + +REMAKE.FILE: + GoSub Call_Next_FS +return + + +CREATE.INDEX: + GoSub Call_Next_FS +return + + +DELETE.INDEX: + GoSub Call_Next_FS +return + + +UPDATE.INDEX: + GoSub Call_Next_FS +return + + +SELECT.INDEX: + GoSub Call_Next_FS +return + + +READNEXT.INDEX: + GoSub Call_Next_FS +return + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Internal GoSubs +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +Get_Original_Record: + // To get the original record from the database table a direct call to this table's remaing chain must be made. + @FILE.ERROR = '' + NewFSList = Delete(FSList, 1, 1, 1) + NextFS = NewFSList<1, 1, 1> + Call @NextFS(READO.RECORD, NewFSList, Handle, Name, FMC, OrigRecord, ActionStatus) + // If ActionStatus is Null then it is a new record or an error reading. +return + + +Call_Next_FS: + // Since this MFS is being executed it is responsible for moving the chain forward. The next MFS/BFS item is in the + // BFS array. Pull it from the top and pass the remaining items. + NewFSList = Delete(FSList, 1, 1, 1) + NextFS = NewFSList<1, 1, 1> + If Len(NextFS) then + Call @NextFS(Code, NewFSList, Handle, Name, FMC, Record, Status) + end +return + + +Action_Chain: + // This internal method provides the developer with a complete chain of actions. Prior to the BFS call the developer + // can execute logic in a table specific action handler and then a promoted (i.e. generic) action handler. The + // action will be suffixed with '_PRE' to identify the action logic before the BFS. After the BFS the table specific + // action handler and promoted action handler will be called again. This is very analogous to the way event handling + // in OpenInsight is managed (i.e. pre-system event handler, system event handler, post-system event handler.) + Action = BaseAction : '_PRE' + + GoSub Call_Table_Actions + + If ActionFlow EQ ACTION_CONTINUE$ OR ActionFlow EQ ACTION_CONTINUE_NO_SYSTEM$ then + GoSub Call_Promoted_Actions + end + + If ActionFlow EQ ACTION_CONTINUE$ OR ActionFlow EQ ACTION_CONTINUE_NO_PROMOTED$ OR ActionFlow EQ ACTION_SYSTEM_ONLY$ then + GoSub Call_Next_FS + end + + Action = BaseAction + If ActionFlow EQ ACTION_CONTINUE$ OR ActionFlow EQ ACTION_CONTINUE_NO_PROMOTED$ OR ActionFlow EQ ACTION_CONTINUE_NO_SYSTEM$ then + GoSub Call_Table_Actions + end + + If ActionFlow EQ ACTION_CONTINUE$ OR ActionFlow EQ ACTION_CONTINUE_NO_SYSTEM$ then + GoSub Call_Promoted_Actions + end +return + + +Call_Table_Actions: + // Pass activity to the datatable table's action handler if it exists. + // Note: It is critical that handler routine be named in this format: TableName_ACTIONS + + // Check to see if this table has already been determine to have an action handler. Once it has already been + // checked, whether or not a handler exists, it will not be checked again during this session. This will optimize + // performance. + InActionList = False$ ; // Assume False for now. + InNoActionList = False$ ; // Assume False for now. + + InActionList = SRP_List_Locate(ActionListHandle@, TableName) NE 0 + If Not(InActionList) then + InNoActionList = SRP_List_Locate(NoActionListHandle@, TableName) + end + + If Not(InActionList) AND Not(InNoActionList) then + // This table has not yet been added to either list, so a table action handler might exist. + NumApps = Count(@APPID, @FM) + (@APPID NE '') + + // Starting with the current application, search for an action routine and go through the list of inherited + // applications until SYSPROG has been checked. + For AppCnt = 1 to NumApps + AppID = @APPID + If AppID _EQC 'SYSPROG' then + SysObjKey = '$' : TableName : '_ACTIONS' + end else + SysObjKey = '$' : TableName : '_ACTIONS' : '*' : @APPID + end + If Len(SysObjHandle@) then + OrigFileError = @FILE.ERROR + @FILE.ERROR = '' + BFS = 'RTP57' + Call @BFS(READO.RECORD, BFS, SysObjHandle@, SysObjKey, FMC, SysObjRecord, ActionStatus) + @FILE.ERROR = OrigFileError + If ActionStatus then InActionList = True$ + end + Until InActionList + Next AppCnt + + If (InActionList) then + SRP_List_Add(ActionListHandle@, TableName) + end else + SRP_List_Add(NoActionListHandle@, TableName) + end + end + + If InActionList then + ActionRoutine = TableName : '_ACTIONS' + Transfer ActionFlow to OrigActionFlow ; // Save the current action flow. + ActionFlow = Function(@ActionRoutine(Action, '', FSList, Handle, Name, FMC, Record, Status, OrigRecord)) + + // If the table action returned ACTION_CONTINUE, then this means no special action flow was returned. + // Therefore, restore the action flow that existed before the table action call. + If ActionFlow EQ ACTION_CONTINUE$ then Transfer OrigActionFlow to ActionFlow + end +return + + +Call_Promoted_Actions: + // Pass activity to the application's promoted action handler if it exists. + // Note: It is critical that handler routine be named in this format: PROMOTED_BaseAction_ACTION + + // Check to see if this action has already been determine to have a promoted handler. Once it has already been + // checked, whether or not a handler exists, it will not be checked again during this session. This will optimize + // performance. + InNoPromotedList = False$ ; // Assume False for now. + InPromotedList = SRP_List_Locate(PromotedListHandle@, BaseAction) NE 0 + If Not(InPromotedList) then + InNoPromotedList = SRP_List_Locate(NoPromotedListHandle@, BaseAction) + end + + If Not(InPromotedList) AND Not(InNoPromotedList) then + // This action has not yet been added to either list, so a promoted action handler might exist. + NumApps = Count(@APPID, @FM) + (@APPID NE '') + + // Starting with the current application, search for an action routine and go through the list of inherited + // applications until SYSPROG has been checked. + For AppCnt = 1 to NumApps + AppID = @APPID + If AppID _EQC 'SYSPROG' then + SysObjKey = '$PROMOTED_' : BaseAction : '_ACTION' + end else + SysObjKey = '$PROMOTED_' : BaseAction : '_ACTION' : '*' : @APPID + end + If Len(SysObjHandle@) then + OrigFileError = @FILE.ERROR + @FILE.ERROR = '' + BFS = 'RTP57' + Call @BFS(READO.RECORD, BFS, SysObjHandle@, SysObjKey, FMC, SysObjRecord, ActionStatus) + @FILE.ERROR = OrigFileError + If ActionStatus then InPromotedList = True$ + end + Until InPromotedList + Next AppCnt + + If (InPromotedList) then + SRP_List_Add(PromotedListHandle@, BaseAction) + end else + SRP_List_Add(NoPromotedListHandle@, BaseAction) + end + end + + If InPromotedList then + ActionRoutine = 'PROMOTED_' : BaseAction : '_ACTION' + Transfer ActionFlow to OrigActionFlow ; // Save the current action flow. + ActionFlow = Function(@ActionRoutine(Action, '', FSList, Handle, Name, FMC, Record, Status, OrigRecord)) + + // If the promoted action returned ACTION_CONTINUE, then this means no special action flow was returned. + // Therefore, restore the action flow that existed before the promoted action call. + If ActionFlow EQ ACTION_CONTINUE$ then Transfer OrigActionFlow to ActionFlow + end +return diff --git a/SYSPROG/STPROC/COMM_DIALOG_IDXSVR.txt b/SYSPROG/STPROC/COMM_DIALOG_IDXSVR.txt new file mode 100644 index 0000000..907e90a --- /dev/null +++ b/SYSPROG/STPROC/COMM_DIALOG_IDXSVR.txt @@ -0,0 +1,146 @@ +COMPILE FUNCTION Comm_Dialog_IDXSVR( Instruction, Parm1 ) + +/* + Commuter Module for Index Server (IDXSVR) Dialog Window + + J.C. Henry, Inc. - John C. Henry + + */ + +DECLARE SUBROUTINE Center_Window,StatusLine,Set_Property,End_Dialog, Send_Event, Set_Status, Adios +DECLARE SUBROUTINE ErrMsg, Send_Message, obj_Tables, Post_Event, Set_Bgnd_IX_Time, Set_IDXSvr, ShowWindow +DECLARE FUNCTION Get_Property, Get_Status,Dialog_Box, FindWindow + +EQU CRLF$ TO \0D0A\ + +EQU TRUE$ TO 1 +EQU FALSE$ TO 2 + +$INSERT ENVIRON_CONSTANTS + +ErrTitle = 'Error in Comm_Dialog_IDXSVR routine' +ErrorMsg = '' + + +Instructions = 'Create' +Instructions := @FM:'Timer' +Instructions := @FM:'StartStop' +Instructions := @FM:'Close' + +RetVal = '' + +LOCATE Instruction IN Instructions USING @FM SETTING Pos THEN + ON Pos GOSUB Create,Timer,StartStop,Close +END + +RETURN RetVal + + +* * * * * * * +Create: +* * * * * * * + +*Center_Window(@WINDOW) + +StatusLine(@WINDOW) + +Set_Status(0) + +otParms = 'SYSOBJ':@RM:'INDEX_SERVER' +obj_Tables('LockRec',otParms) ;* Places lock on fictional record + +IF Get_Status(errCode) THEN + ErrorMsg = ErrTitle:@SVM:'Another index server is already running.' + ErrMsg(ErrorMsg) + Post_Event(@WINDOW,'CLOSE') + RETURN +END + +Set_Property(@WINDOW,'@LOCKED',1) ;* Set ad-hoc property '@LOCKED' to true +*Set_Property(@WINDOW,'TIMER','5000':@FM:'0') ;* Set timer event to 5000 msecs (5 seconds) to check for shutdown time. + +* Code added 6/9/2004 to show engine window when running on a runtime JCH + +OpenEngineHandle = FindWindow("AREV":\00\,0) +ShowWindow(OpenEngineHandle,1) + + + +* No return on create -> automatically starts index server + +* * * * * * * +StartStop: +* * * * * * * + +StartStop = Get_Property(@WINDOW:'.START_STOP_BUTTON','TEXT') + +IF StartStop = 'Stop Index Server' THEN + + * Index server is running + + Set_IDXSvr(0) ;* Turn off index server + Set_Bgnd_IX_Time(0) ;* Turn off background indexing by setting interval to zero + Set_Property(@WINDOW:'.START_STOP_BUTTON','TEXT', 'Start Index Server') + Set_Property(@WINDOW:'.CLOSE_BUTTON','ENABLED',1) + +END ELSE + + IndexInterval = Get_Property(@WINDOW:'.INTERVAL','TEXT') + + IF IndexInterval = '' THEN + * bad value entered or null + IndexInterval = 10 + Set_Property(@WINDOW:'.INTERVAL','INVAL',IndexInterval) + END + + Set_Bgnd_IX_Time(IndexInterval) ;* Set background index inteval to IndexInterval (Seconds) + Set_Property(@WINDOW:'.START_STOP_BUTTON','TEXT', 'Stop Index Server') + Set_IDXSvr(1) ;* Start the index server process + Set_Property(@WINDOW:'.CLOSE_BUTTON','ENABLED',0) + +END + + +RETURN + + +* * * * * * * +Close: +* * * * * * * + +otParms = 'SYSOBJ':@RM:'INDEX_SERVER' + +obj_Tables('LockRec',otParms) ;* Places lock on fictional record + +IF Get_Status(errCode) THEN + Set_Status(0) + obj_Tables('UnlockRec',otParms) ;* Removes lock on fictional record + +END + +Set_Property('SYSTEM','IDLEPROC','ADIOS') +*Adios() ;* Utility('SYSTEM','DESTROY') in a wrapper + +RETURN + + +* * * * * * * +Timer: +* * * * * * * + +ShutDownTime = Get_Property(@WINDOW:'.SHUTDOWN_TIME','INVALUE') + +Set_Property(@WINDOW:'.COUNTDOWN','INVALUE',ShutDownTime - TIME()) + +IF TIME() > ShutDownTime THEN + + Set_IDXSvr(0) ;* Turn off index server + Set_Bgnd_IX_Time(0) ;* Turn off background indexing by setting interval to zero + Set_Property('SYSTEM','IDLEPROC','ADIOS') + +END + + +RETURN + + diff --git a/SYSPROG/STPROC/CONVERT_LSL2_FORMS.txt b/SYSPROG/STPROC/CONVERT_LSL2_FORMS.txt new file mode 100644 index 0000000..e83be04 --- /dev/null +++ b/SYSPROG/STPROC/CONVERT_LSL2_FORMS.txt @@ -0,0 +1,56 @@ +Function Convert_LSL2_Forms(Void) + +#pragma precomp SRP_PreCompiler + +$Insert Logical + +Declare Function RTI_Migrate_Repository_Entity_OIWin, Repository + +debug + +Open 'SYSUPGRADE' To hSysUpgrade Then + Select hSysUpgrade + EOF = False$ + Loop + Readnext ID Else EOF = True$ + Until EOF EQ True$ +* If Index(ID, 'NDW_MAIN', 1) Then +* DEBUG + Read V9OIWinRec From hSysUpgrade, ID Then + If Index(ID, 'SYSREPOSWINS', 1) then Gosub WriteAndCompile + End Else + debug + Status = Get_Status(StatusCode) + rv = Set_Status(0) + end +* end + Repeat +end + +Return '' + + +WriteAndCompile: + + V10OIWinRec = RTI_Migrate_Repository_Entity_OIWin(V9OIWinRec, WarningText, UpdateText, @AppID) + + If V10OIWinRec NE '' Then + WinID = ID[-1, 'B*'] + ReposID = @AppID<1> : '*OIWIN**' : WinID + FormPart1 = V10OIWinRec[1, @RM] + FormPart2 = V10OIWinRec[Col2() + 1, @RM] + WindowTitle = FormPart2<0, 9> + rv = Repository('WRITE', ReposID, '', '', '', '', '', '', '', '', WindowTitle, V10OIWinRec) + If Get_Status(StatusCode) Then + debug + rv = Set_Status(0) + End Else + rv = Repository('COMPILE', ReposID) + If Get_Status(StatusCode) Then + debug + rv = Set_Status(0) + end + end + end + +Return '' diff --git a/SYSPROG/STPROC/CONVERT_OI9_FORMS.txt b/SYSPROG/STPROC/CONVERT_OI9_FORMS.txt new file mode 100644 index 0000000..5062050 --- /dev/null +++ b/SYSPROG/STPROC/CONVERT_OI9_FORMS.txt @@ -0,0 +1,56 @@ +Function Convert_OI9_Forms(Void) + +#pragma precomp SRP_PreCompiler + +$Insert Logical + +Declare Function RTI_Migrate_Repository_Entity_OIWin, Repository + +debug + +Open 'SYSUPGRADE' To hSysUpgrade Then + Select hSysUpgrade + EOF = False$ + Loop + Readnext ID Else EOF = True$ + Until EOF EQ True$ +* If Index(ID, 'NDW_MAIN', 1) Then +* DEBUG + Read V9OIWinRec From hSysUpgrade, ID Then + Gosub WriteAndCompile + End Else + debug + Status = Get_Status(StatusCode) + rv = Set_Status(0) + end +* end + Repeat +end + +Return '' + + +WriteAndCompile: + + V10OIWinRec = RTI_Migrate_Repository_Entity_OIWin(V9OIWinRec, WarningText, UpdateText, @AppID) + + If V10OIWinRec NE '' Then + WinID = ID[-1, 'B*'] + ReposID = @AppID<1> : '*OIWIN**' : WinID + FormPart1 = V10OIWinRec[1, @RM] + FormPart2 = V10OIWinRec[Col2() + 1, @RM] + WindowTitle = FormPart2<0, 9> + rv = Repository('WRITE', ReposID, '', '', '', '', '', '', '', '', WindowTitle, V10OIWinRec) + If Get_Status(StatusCode) Then + debug + rv = Set_Status(0) + End Else + rv = Repository('COMPILE', ReposID) + If Get_Status(StatusCode) Then + debug + rv = Set_Status(0) + end + end + end + +Return '' diff --git a/SYSPROG/STPROC/DATABASE_SERVICES.txt b/SYSPROG/STPROC/DATABASE_SERVICES.txt new file mode 100644 index 0000000..c5533fb --- /dev/null +++ b/SYSPROG/STPROC/DATABASE_SERVICES.txt @@ -0,0 +1,1046 @@ +Function Database_Services(@Service, @Params) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Database_Services + + Description : Handler program for all Database services. + + Notes : Application errors should be logged using the Error Services module. There are a few methodological + assumptions built into way errors are managed which are important to understand in order to properly + work with Error Services: + + Parameters : + Service [in] -- Name of the service being requested + Param1-10 [in/out] -- Additional request parameter holders + Response [out] -- Response to be sent back to the Controller (MCP) or requesting procedure + + History : (Date, Initials, Notes) + 03/27/17 dmb Original programmer. + 05/02/17 dmb Add error if WriteDatabaseRow is unable to lock row. + 10/31/17 dmb Add CalculateColumn and GetTableCommuter services. + 11/06/17 fjt [SRPFW-195] Added to FW v16.0.12 + 05/25/18 dmb Add GetUserLocks service. + 05/29/18 dmb Add IsKeyIDLocked, IsKeyIDSelfLocked, and UnlockKeyID services. + 10/09/18 djs Added ActivateRecord service, which sets @ID, @Record, and @DICT to enable {} shorthand. + 01/22/19 fjt [SRPFW-195] Updated to include codes in error reporting + 02/28/19 dmb [SRPFW-195] Add safety check in GetTableHandle to make sure the table's full + handle is still in @TABLES before using the cached handle. + 03/12/19 dmb [SRPFW-270] Add ClearTableHandle service so it is easy to remove the cached + table handle when situations such as aliasing a table from a different + volume occurs. + 03/12/19 dmb [SRPFW-270] Add SetTableAlias service to alias a table and call the + ClearTableHandle service if thealias was successful. + 05/03/19 dmb [SRPFW-273] Initialize TableName in the CalculateColumn service to prevent + potential VNAV errors. + 05/11/20 dmb [SRPFW-313] Add GetTableNames service. + 06/29/20 dmb [SRPFW-282] Update the GetTableNames service to support ExcludeDictionaries and + ExcludeIndexes arguments. + 08/04/20 djs Commented out UnlockKeyID service. This service causes OpenInsight to crash. Use + ReleaseKeyIDLock instead. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert SERVICE_SETUP +$insert VOL_TABLE_EQUATES +$insert RTI_LH_INFO_EQUATES + +Declare function Memory_Services, Database_Services, SRP_Encode, RetStack, RTI_LH_Info, SRP_Path, SRP_Array +Declare subroutine Memory_Services, Database_Services, Verify_LH, SRP_Stopwatch, Btree.Extract, Update_Index, Set_Status +Declare subroutine RTI_LH_Info, Alias_Table, Push.Select, Pop.Select + +GoToService else + Error_Services('Add', Service : ' is not a valid service request within the ' : ServiceModule : ' module.') +end + +Return Response OR '' + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Service Parameter Options +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +Options BOOLEAN = True$, False$ + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Services +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// ActivateRecord +// +// TableName. The linear hash database table name. - [REQUIRED] +// KeyID. The KeyID to the database table. - [REQUIRED] +// +// Reads a data row for the indicated Key ID and database table. Sets @ID, @Record, and @DICT to enable {} shorthand. +//---------------------------------------------------------------------------------------------------------------------- +Service ActivateRecord(TableName, KeyID, NotExpired, ExpirationDuration, IgnoreMFSRoutines) + + If TableName NE '' AND KeyID NE '' then + @ID = KeyID + DictTable = '' + If TableName[1,5] _EQC 'DICT.' then + DictTable = TableName + TableName = TableName[-1, 'B.'] + end else + DictTable = 'DICT.':TableName + end + @DICT = Database_Services('GetTableHandle', DictTable) + If Error_Services('NoError') then + @Record = Database_Services('ReadDataRow',TableName,KeyID,NotExpired,ExpirationDuration,IgnoreMFSRoutines) + If Not(Error_Services('NoError')) then + Error_Services('Add','Error reading ':KeyID:' from the ':TableName:' table in the ':Service:' service.') + end + end else + Error_Services('Add', 'Error retrieving handle for the ':TableName:' table in the ':Service:' service.') + end + end + + Response = @Record + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// CalculateColumn +// +// Called directly from within a calculation column. The name of the table and column is derived from the call stack +// and the associated table commuter, if it exists, is called with the appropriate arguments. +//---------------------------------------------------------------------------------------------------------------------- +Service CalculateColumn() + + Response = '' + ColumnName = '' + TableName = '' + RetStack = RetStack() + For Each Item in RetStack using @FM + If Index(Item, 'DICT.MFS', 1) then + ColumnName = Item[2, \00\, 1] + CharPos = BCol2() + 1 + TableHandle = Item[CharPos, GetByteSize(Item), 1] + Locate TableHandle<1, 2> in @TABLES(TAB_HANDLE$) using @FM setting fPos then + TableName = @TABLES(0) ; // This technically returns the dictionary, but DICT. will be removed. + TableName[1, 5] = '' + end + end + Until (ColumnName NE '') OR (Item EQ '') + Next Item + + If TableName NE '' then + TableCommuter = Database_Services('GetTableCommuter', TableName) + If TableCommuter NE '' then + Response = Function(@TableCommuter('CalculateColumn', ColumnName)) + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ClearTableHandle +// +// TableName. The linear hash database table name. - [REQUIRED] +// +// Clears the table handle array array from cache. This will force the GetTableHandle service to call the Open statement +// again. +//---------------------------------------------------------------------------------------------------------------------- +Service ClearTableHandle(TableName) + + If TableName NE '' then + ServiceKeyID = ServiceModule : '*GetTableHandle' + ServiceKeyID := '*' : TableName + Memory_Services('SetValue', ServiceKeyID, '') + end else + Error_Services('Add', 'TableName was missing in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// DeleteDataRow +// +// TableName. The linear hash database table name. - [REQUIRED] +// KeyID. The KeyID to the database table. - [REQUIRED] +// +// Deletes a data row for the indicated Key ID and database table. +//---------------------------------------------------------------------------------------------------------------------- +Service DeleteDataRow(TableName, KeyID, IgnoreSelfLock, IgnoreMFSRoutines) + + If TableName NE '' AND KeyID NE '' then + If IgnoreSelfLock NE True$ then IgnoreSelfLock = False$ + If IgnoreMFSRoutines NE True$ then IgnoreMFSRoutines = False$ + HaveLock = Database_Services('GetKeyIDLock', TableName, KeyID, IgnoreSelfLock) + If HaveLock EQ True$ then + TableHandle = Database_Services('GetTableHandle', TableName) + If IgnoreMFSRoutines then + MFSList = TableHandle<1, 1> ; // MFS routines are @SVM delimited. + NumMFS = DCount(MFSList, @SVM) + For MFSCnt = NumMFS to 1 Step -1 + MFSRoutine = MFSList<0, 0, MFSCnt> + If (MFSRoutine NE 'SI.MFS') AND (MFSRoutine NE 'RTP57') then + MFSList = Delete(MFSList, 0, 0, MFSCnt) + end + Next MFSCnt + TableHandle<1, 1> = MFSList + end + + // [SRPFW-195] Updated / Added by GAC 18 May 2018 + If Error_Services('NoError') then + Delete TableHandle, KeyID then + Memory_Services('SetValue', ServiceModule : '*' : 'ReadDatarow' : '*' : TableName : '*' : KeyID, '') + end else + Error_Services('Add', 'Error deleting ' : KeyID : ' from the ' : TableName : ' table in the ' : Service : ' service. Error = ' : @File_Error<1>) + end + end +* If Error_Services('NoError') then + Database_Services('ReleaseKeyIDLock', TableName, KeyID) +* end + + end else + Error_Services('Add', 'Unable to lock ' : KeyID : ' for the ' : TableName : ' table in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'TableName or KeyID argument was missing in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetKeyIDLock +// +// Attempts to perform a semaphore lock on the indicated tablename and Key ID. +//---------------------------------------------------------------------------------------------------------------------- +Service GetKeyIDLock(TableName, KeyID, IgnoreSelfLock) + + HaveLock = False$ ; // Assume false for now. + + If TableName NE '' AND KeyID NE '' then + If IgnoreSelfLock NE True$ then IgnoreSelfLock = False$ + TableHandle = Database_Services('GetTableHandle', TableName) + If Error_Services('NoError') then + Lock Tablehandle, KeyID then + HaveLock = True$ + end else + If IgnoreSelfLock EQ True$ then + Status = Status() + If Status EQ 1 then + HaveLock = True$ + end + end + end + end + end else + Error_Services('Add', 'TableName or KeyID argument was missing in the ' : Service : ' service.') + end + + Response = HaveLock + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetTableCommuter +// +// Returns the name of the indicated table's commuter module if it exists. If it does not exist then an empty string +// will be returned. +//---------------------------------------------------------------------------------------------------------------------- +Service GetTableCommuter(TableName) + + ServiceKeyID := '*' : TableName + TableCommuter = Memory_Services('GetValue', ServiceKeyID) + + If TableCommuter EQ '' then + ObjExists = False$ ; // Assume the object code for the action handler does not exist for now. + For Each AppID in @AppId + If AppID _EQC 'SYSPROG' then + SysObjKey = '$' : TableName : '_ACTIONS' + end else + SysObjKey = '$' : TableName : '_ACTIONS' : '*' : AppID + end + ObjExists = Memory_Services('KeyExists', SysObjKey) + Until ObjExists + Next AppID + + If Not(ObjExists) then + For Each AppID in @AppId + If AppID _EQC 'SYSPROG' then + SysObjKey = '$' : TableName : '_ACTIONS' + end else + SysObjKey = '$' : TableName : '_ACTIONS' : '*' : AppID + end + OrigFileError = @FILE.ERROR + @FILE.ERROR = '' + BFS = 'RTP57' + // The handle to SYSOBJ is used to find object code before it gets called + ActionStatus = '' + Call @BFS(2, BFS, @FILE_SYSOBJ<1, 2>, SysObjKey, FMC, SysObjRecord, ActionStatus) + @FILE.ERROR = OrigFileError + If ActionStatus then ObjExists = True$ + Until ObjExists + Next AppID + end + + If (ObjExists) then + TableCommuter = TableName : '_ACTIONS' + Memory_Services('SetValue', ServiceKeyID, TableCommuter) + end + end + + Response = TableCommuter + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetTableHandle +// +// TableName. The linear hash database table name. - [REQUIRED] +// +// Returns an array of information related to the database table being passed in. +//---------------------------------------------------------------------------------------------------------------------- +Service GetTableHandle(TableName) + + TableHandle = '' + + If TableName NE '' then + ServiceKeyID := '*' : TableName + + Locate TableName in @Tables(tab_name$) using @FM setting fPos then + If @Tables(tab_handle$) NE '' then + // Only check for a cached handle if the table and its handle is still in @TABLES. Otherwise the handle is + // probably stale and will hang OI when utilized. + TableHandle = Memory_Services('GetValue', ServiceKeyID) + end + end + + If TableHandle EQ '' then + rv = Set_Status(0) + Open TableName to TableHandle then + Memory_Services('SetValue', ServiceKeyID, TableHandle) + end else + Error_Services('Add', 'Unable to open the ' : TableName : ' table in the ' : Service : ' service. Error = ' : @File_Error<1>) + end + end + end else + Error_Services('Add', 'TableName was missing in the ' : Service : ' service.') + end + + Response = TableHandle + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetTableNames +// +// ApplicationTablesOnly - Boolean flag to determine if only application database tables should be returned (i.e., +// exclude SYSTEM and non-RTP57 tables). Default is True. +// ExcludeDictionaries - Boolean flag to determine if dictionary tables should be excluded. Default is False. +// ExcludeIndexes - Boolean flag to determine if index tables should be excluded. Default is False. +// +// Returns an @FM list of currently attached OpenInsight database tables. +//---------------------------------------------------------------------------------------------------------------------- +Service GetTableNames(ApplicationTablesOnly=BOOLEAN, ExcludeDictionaries=BOOLEAN, ExcludeIndexes=BOOLEAN) + + TableNames = '' ; // Initialize the return variable. + + If ApplicationTablesOnly NE False$ then ApplicationTablesOnly = True$ + If ExcludeDictionaries NE True$ then ExcludeDictionaries = False$ + If ExcludeIndexes NE True$ then ExcludeIndexes = False$ + + TableNames = @Tables(tab_name$) + TableTypes = @Tables(tab_vol_name$) + If ApplicationTablesOnly EQ True$ then + Tables = '' + For Each TableType in TableTypes using @FM setting fPos + TableName = TableNames + If (TableType[1, 'F*'] EQ 'RTP57') AND Not(TableType EQ 'RTP57*REVBOOT') AND Not(TableType EQ 'RTP57*O4WFILES') AND Not(TableType EQ 'RTP57*AREV_DIR') then + Tables := TableName : @FM + end + Next TableType + Tables[-1, 1] = '' + Transfer Tables to TableNames + end + If ExcludeDictionaries EQ True$ then + Tables = '' + For Each TableName in TableNames using @FM + If TableName[1, 5] NE 'DICT.' then + Tables := TableName : @FM + end + Next TableType + Tables[-1, 1] = '' + Transfer Tables to TableNames + end + If ExcludeIndexes EQ True$ then + Tables = '' + For Each TableName in TableNames using @FM + If TableName[1, 1] NE '!' then + Tables := TableName : @FM + end + Next TableType + Tables[-1, 1] = '' + Transfer Tables to TableNames + end + TableNames = SRP_Array('SortRows', TableNames, 'AL1', 'LIST', @FM, @VM) + + Response = TableNames + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetTableProperties +// +// TableName. The linear hash database table name. - [REQUIRED] +// +// Returns an array of information related to the database table being passed in. +//---------------------------------------------------------------------------------------------------------------------- +Service GetTableProperties(TableName) + + TableProperties = '' + + If TableName NE '' then + rv = Set_Status(0) + Locate TableName in @TABLES(tab_name$) using @FM setting fPos then + TableProperties<1> = @TABLES(tab_account$) ; // DatabaseID + TableProperties<2> = @TABLES(tab_file_sys$) ; // MFS/BFS List + VolumeID = @TABLES(tab_vol_name$) ; // Volume ID + Locate VolumeID in @VOLUMES(vol_name$) using @FM setting fPos then + TableProperties<3> = @VOLUMES(vol_label$) ; // Volume Label + TableProperties<4> = @VOLUMES(vol_location$) ; // Volume Path + TableProperties<5> = @VOLUMES(vol_file_sys$) ; // BFS + end + end else + Error_Services('Add', 'The ' : TableName : ' table is not attached and available to the ' : Service : ' service.') + end + end else + Error_Services('Add', 'TableName argument was missing in the ' : Service : ' service.') + end + + Response = TableProperties + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetUserLocks +// +// Returns a dynamic array of user lock information. Note, this can only be done with the UD 5. This can also cause +// instability with the current session and may require the Task Manager to close the session. +//---------------------------------------------------------------------------------------------------------------------- +Service GetUserLocks() + + UserLocks = RTI_LH_Info(CMD_LOCKS_INFO$, '') + + Response = UserLocks + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// IsKeyIDLocked +// +// Returns a Boolean flag of the lock status for the indicated table and Key ID. +//---------------------------------------------------------------------------------------------------------------------- +Service IsKeyIDLocked(TableName, KeyID, IgnoreSelfLock=BOOLEAN) + + If IgnoreSelfLock NE True$ then IgnoreSelfLock = False$ + + KeyIDLocked = False$ ; // Assume false for now. + + If (TableName NE '') AND (KeyID NE '') then + Open TableName to hTable then + Lock hTable, KeyID then + // Able to lock Key ID. Unlock it right away. + Unlock hTable, KeyID else Null + end else + // Unable to lock Key ID. Evaluate the type of lock. + LockType = Status() + If LockType EQ 0 then + // Lock exists on another station. + KeyIDLocked = True$ + end else + // Lock exists on this station. Check to see if the Ignore Self Lock flag is set. + If Not(IgnoreSelfLock) then KeyIDLocked = True$ + end + end + end else + Error_Services('Add', 'Error opening the ' : TableName : ' table in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'TableName or KeyID argument was missing in the ' : Service : ' service.') + end + + Response = KeyIDLocked + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// IsKeyIDSelfLocked +// +// Returns a Boolean flag of the self-lock status for the indicated table and Key ID. +//---------------------------------------------------------------------------------------------------------------------- +Service IsKeyIDSelfLocked(TableName, KeyID) + + KeyIDSelfLocked = False$ ; // Assume false for now. + + If (TableName NE '') AND (KeyID NE '') then + Open TableName to hTable then + Lock hTable, KeyID then + // Able to lock Key ID. Unlock it right away. + Unlock hTable, KeyID else Null + end else + // Unable to lock Key ID. Evaluate the type of lock. + LockType = Status() + If LockType EQ 1 then + // This Key ID is self-locked. + KeyIDSelfLocked = True$ + end + end + end else + Error_Services('Add', 'Error opening the ' : TableName : ' table in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'TableName or KeyID argument was missing in the ' : Service : ' service.') + end + + Response = KeyIDSelfLocked + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ReadDataColumn +// +// TableName. The linear hash database table name. - [REQUIRED] +// KeyID. The KeyID to the database table. - [REQUIRED] +// ColumnNo. The index of the column that is to be read. - [REQUIRED] +// +// Reads a data column for the indicated Key ID and database table. +//---------------------------------------------------------------------------------------------------------------------- +Service ReadDataColumn(TableName, KeyID, ColumnNo, NotExpired, ExpirationDuration, IgnoreMFSRoutines) + + If NotExpired NE False$ then NotExpired = True$ + If (ExpirationDuration EQ '') OR (Not(Num(ExpirationDuration))) then ExpirationDuration = 0 + If IgnoreMFSRoutines NE True$ then IgnoreMFSRoutines = False$ + + ServiceKeyID := '*' : TableName : '*' : KeyID : '*' : ColumnNo + DataColumn = Memory_Services('GetValue', ServiceKeyID, NotExpired, ExpirationDuration) + + If Num(ColumnNo) AND (ColumnNo GT 0) then + If TableName NE '' AND KeyID NE '' then + If DataColumn EQ '' then + TableHandle = Database_Services('GetTableHandle', TableName) + If Error_Services('NoError') then + If IgnoreMFSRoutines then + MFSList = TableHandle<1, 1> ; // MFS routines are @SVM delimited. + NumMFS = DCount(MFSList, @SVM) + For MFSCnt = NumMFS to 1 Step -1 + MFSRoutine = MFSList<0, 0, MFSCnt> + If MFSRoutine NE 'RTP57' then + MFSList = Delete(MFSList, 0, 0, MFSCnt) + end + Next MFSCnt + TableHandle<1, 1> = MFSList + end + ReadV DataColumn from TableHandle, KeyID, ColumnNo then + Memory_Services('SetValue', ServiceKeyID, DataColumn) + end else + ErrorMsg = 'Error reading ' : KeyID : ' column number ' : ColumnNo : ' from the ' | + : TableName : ' table in the ' : Service : ' service.' + Error_Services('Add', ErrorMsg) + end + end + end + end else + Error_Services('Add', 'TableName or KeyID argument was missing in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'ColumnNo was not a number or was not greater than zero in the ' : Service : ' service.') + end + + Response = DataColumn + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ReadDataRow +// +// TableName - The linear hash database table name. - [REQUIRED] +// KeyID - The KeyID to the database table. - [REQUIRED] +// +// Reads a data row for the indicated Key ID and database table. +//---------------------------------------------------------------------------------------------------------------------- +Service ReadDataRow(TableName, KeyID, NotExpired, ExpirationDuration, IgnoreMFSRoutines) + + If NotExpired NE False$ then NotExpired = True$ + If (ExpirationDuration EQ '') OR (Not(Num(ExpirationDuration))) then ExpirationDuration = 0 + If IgnoreMFSRoutines NE True$ then IgnoreMFSRoutines = False$ + + ServiceKeyID := '*' : TableName : '*' : KeyID + DataRow = Memory_Services('GetValue', ServiceKeyID, NotExpired, ExpirationDuration) + + If TableName NE '' AND KeyID NE '' then + If DataRow EQ '' then + TableHandle = Database_Services('GetTableHandle', TableName) + If Error_Services('NoError') then + If IgnoreMFSRoutines then + MFSList = TableHandle<1, 1> ; // MFS routines are @SVM delimited. + NumMFS = DCount(MFSList, @SVM) + For MFSCnt = NumMFS to 1 Step -1 + MFSRoutine = MFSList<0, 0, MFSCnt> + If MFSRoutine NE 'RTP57' then + MFSList = Delete(MFSList, 0, 0, MFSCnt) + end + Next MFSCnt + TableHandle<1, 1> = MFSList + end + // [SRPFW-195] + Read DataRow from TableHandle, KeyID then + Memory_Services('SetValue', ServiceKeyID, DataRow) + end else + Error_Services('Add', 'Error reading ' : KeyID : ' from the ' : TableName : ' table in the ' : Service : ' service. Error = ' : @File_Error<1>) + + end + end + end + end else + Error_Services('Add', 'TableName or KeyID argument was missing in the ' : Service : ' service.') + end + + Response = DataRow + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ReleaseKeyIDLock +// +// Attempts to release a semaphore lock on the indicated tablename and Key ID. +//---------------------------------------------------------------------------------------------------------------------- +Service ReleaseKeyIDLock(TableName, KeyID) + + LockReleased = False$ ; // Assume false for now. + + If TableName NE '' AND KeyID NE '' then + TableHandle = Database_Services('GetTableHandle', TableName) + If Error_Services('NoError') then + UnLock Tablehandle, KeyID then + LockReleased = True$ + end else + Error_Services('Add', 'Unable to unlock the ' : KeyID : ' Key ID from the ' : TableName : ' table in the ' : Service : ' service. Error = ' : @File_Error<1>) + end + end + end else + Error_Services('Add', 'TableName or KeyID argument was missing in the ' : Service : ' service.') + end + + Response = LockReleased + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SearchIndex +// +// TableName. The linear hash database table name. - [REQUIRED] +// ColumnName. The indexed column to search against. - [REQUIRED] +// SearchValue. The value being searched for. - [REQUIRED] +// UpdateIndex. Boolean flag to determine if the index for the indicated column should be updated before searching. +// - [OPTIONAL] +// +// Returns an @FM delimited list of Key IDs that match the search value. +//---------------------------------------------------------------------------------------------------------------------- +Service SearchIndex(TableName, ColumnName, SearchValue, UpdateIndex) + + If UpdateIndex NE True$ then UpdateIndex = False$ + + ServiceKeyID := '*' : TableName : '*' : ColumnName : '*' : SearchValue + ServiceKeyID = SRP_Encode(ServiceKeyID, 'BASE64') +* KeyIDList = Memory_Services('GetValue', ServiceKeyID, True$, 5) + KeyIDList = '' + + If TableName NE '' AND ColumnName NE '' AND SearchValue NE '' then + If KeyIDList EQ '' then + DictTableHandle = Database_Services('GetTableHandle', 'DICT.' : TableName) + If Error_Services('NoError') then + Set_Status(0) + If UpdateIndex then Update_Index(TableName, ColumnName 0) + Set_Status(0) + Flag = '' + Btree.Extract(ColumnName : @VM : SearchValue : @FM, Tablename, DictTableHandle, KeyIDList, 'S', Flag) + If Flag EQ 0 then + Convert @VM to @FM in KeyIDList + Memory_Services('SetValue', ServiceKeyID, KeyIDList) + end else + Error_Services('Add', 'Error in Btree.Extract search from the ' : TableName : ' table in the ' : Service : ' service.') + end + end + end + end else + Error_Services('Add', 'TableName, ColumnName, or SearchValue argument was missing in the ' : Service : ' service.') + end + + Response = KeyIDList + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetTableAlias +// +// TableName - The linear hash database table name. - [Required] +// AliasName - The alias name being set. - [Required] +// Volume - The location path or volume name where the table exists. - [Required] +// DatabaseID - Database ID of the table being aliased. Defaults to the current Database ID (@DBID) - [Optional] +// +// Attempts to create an alias for the indicated table, volume, and database. It returns a True$ if successful or a +// False$ if unsuccessful. +//---------------------------------------------------------------------------------------------------------------------- +Service SetTableAlias(TableName, AliasName, Volume, DatabaseID) + + Success = False$ ; // Assume not successful for now. + + If (TableName NE '') AND (AliasName NE '') AND (Volume NE '') then + Set_Status(0) + If DatabaseID EQ '' then DatabaseID = @DBID + Push.Select(F1, F2, F3, F4) ; // Protect cursors in case Alias_Table fails. + Alias_Table(Volume : '', DatabaseID : '', TableName : '', AliasName : '') + Pop.Select(F1, F2, F3, F4) ; // Restore cursors. + StatusCode = '' + If Get_Status(StatusCode) then + Error_Services('Add', 'Error calling the Alias_Table routine in the ' : Service : ' service. Status Code : ' : StatusCode) + end else + // Setting an alias could changes the handle so clear the cached handle to avoid it being stale. + Success = True$ + Database_Services('ClearTableHandle', AliasName) + end + Set_Status(0) + end else + Error_Services('Add', 'TableName, AliasName, or Volume argument was missing in the ' : Service : ' service.') + end + + Response = Success + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// UnlockKeyID +// +// Attempts to unlock the indicated Key ID from the indicated Table Name. Note, this can only be done with the UD 5. +//---------------------------------------------------------------------------------------------------------------------- +* Service UnlockKeyID(TableName, KeyID) +* +* KeyIDUnlocked = False$ ; // Assume false for now. +* +* Convert @Lower_Case to @Upper_Case in TableName +* +* If (TableName NE '') AND (KeyID NE '') then +* // First, do a sanity check to confirm that there is a lock on this Key ID. +* IsKeyIDLocked = Database_Services('IsKeyIDLocked', TableName, KeyID, False$) +* If Error_Services('NoError') AND (IsKeyIDLocked EQ False$) then +* // Key ID was not locked. +* KeyIDUnlocked = True$ +* end +* If KeyIDUnlocked NE True$ then +* // Key ID is still presumed to be locked. +* VolumePath = '' +* FileName = '' +* +* // Resolve the volume path for this table. +* hTableFull = Database_Services('ReadDataRow', 'SYSTABLES', TableName) +* VolumeName = hTableFull<1> +* VolumeRow = Database_Services('ReadDataRow', 'SYSVOLUMES', VolumeName) +* VolumePath = VolumeRow[-1, 'B' : @FM] +* VolumePath = VolumePath[-1, 'B' : \0D\] +* VolumePath[1, 12] = '' ; // Strip off the preceding bytes. +* If SRP_Path('IsRelative', VolumePath) then +* VolumePath = SRP_Path('Combine', Drive(), VolumePath) +* end +* VolumePath = SRP_Path('RemoveFilename', VolumePath) +* // Make sure there is a backslash since the RTI_LH_INFO API seems to use this. +* VolumePath = SRP_Path('AddBackslash', VolumePath) +* +* // Resolve the filename for this table. +* hTableFull = Database_Services('ReadDataRow', 'SYSTABLES', TableName) +* FileName = hTableFull[-1, 'B' : @FM] +* FileName = FileName[-1, 'B' : \0D\] +* FileName = FileName[1, @VM] +* If FileName _NEC 'SYSREPOS' then FileName[1, 12] = '' ; // Strip off the preceding bytes. +* FileName = FileName[-1, 'B' : '\'] +* // Make sure the filename is well formed. +* Begin Case +* Case (FileName[-3, 3] _EQC '.LK') OR (FileName[-3, 3] _EQC '.OV') +* FileName[-3, 3] = '' +* Case FileName _EQC 'SYSREPOS' +* FileName = 'REVREPOS' +* End Case +* +* If (VolumePath NE '') AND (FileName) NE '' then +* // Attempt to unlocked the Key ID. +* RTI_LH_Info(CMD_UNLOCK$, VolumePath, FileName, KeyID, FileName) +* // Confirm that the Key ID was unlocked. +* IsKeyIDLocked = Database_Services('IsKeyIDLocked', TableName, KeyID, False$) +* If Error_Services('NoError') AND (IsKeyIDLocked EQ False$) then +* // Key ID was not locked. +* KeyIDUnlocked = True$ +* end else +* // Unable to unlock the Key ID which could be because it is locked by this station. Try using the +* // Unlock statement. +* hTable = Database_Services('GetTableHandle', TableName) +* Unlock hTable, KeyID then +* KeyIDUnlocked = True$ +* end else +* Error_Services('Add', 'Unable to unlock ' : KeyID : ' from the ' : TableName : ' table in the ' : Service : ' service.') +* end +* end +* end else +* Error_Services('Add', 'No valid VolumePath or FileName was available in the ' : Service : ' service.') +* end +* end +* end else +* Error_Services('Add', 'TableName or KeyID argument was missing in the ' : Service : ' service.') +* end +* +* Response = KeyIDUnlocked +* +* end service + + +//---------------------------------------------------------------------------------------------------------------------- +// VerifyLH +// +// TableNames. One or more linear hash database tables to verify. List should be @FM delimited. - [OPTIONAL] +// SaveList. Name of a saved selection of linear hash database tables to verify. This argument will be ignored +// if TableNames is populated. - [OPTIONAL] +// +// Performs a health check against the indicated tables and returns back any issues. Note: This uses the Verify_LH +// subroutine to check for GFEs. All results are stored in the SYSLHVERIFY table with a KeyID of +// VolumeLabel*DatabaseID*TableName. Returns the list of groups that have GFEs or returns an empty string if there are +// none. The list of GFEs or empty strings will themselves be @FM delimited to correspond with the tables passed into +// this service. +//---------------------------------------------------------------------------------------------------------------------- +Service VerifyLH(Tablenames, SaveList) + + VerifyResults = '' + + If TableNames EQ '' then + TableNames = Xlate('SYSLISTS', SaveList, '', 'X') + If Index(TableNames<1>, @TM, 1) then + // This saved select has metadata in attribute 1. Remove it. + TableNames = Delete(TableNames, 1, 0, 0) + end + end + + If TableNames NE '' then + NumTables = DCount(TableNames, @FM) + For TableCnt = 1 to NumTables + TableName = TableNames + TableProperties = Database_Services('GetTableProperties', TableName) + If Error_Services('NoError') then + rv = Set_Status(0) + Verify_LH('', TableName, True$, False$, False$) + Open 'SYSLHVERIFY' to hSysLHVerify then + DatabaseID = TableProperties<1> + VolumeLabel = TableProperties<3> + LHVerifyKeyID = VolumeLabel : '*' : DatabaseID : '*' : TableName + Read LHVerifyRec from hSysLHVerify, LHVerifyKeyID then + VerifyResults = LHVerifyRec<2> + end + end else + Error_Services('Add', 'Error opening the SYSLHVERIFY table in the ' : Service : ' service.') + end + Begin Case + Case @File_Error NE '' + Error_Services('Add', 'Error verifying table ' : TableName : ': FS Error = ' : @File_Error<1>) + Case Get_Status() + Error_Services('Add', 'Get_Status error: ' : Get_Status()) + End Case + end + Next TableCnt + end else + Error_Services('Add', 'The TableName argument was missing in the ' : Service : ' service.') + end + + Response = VerifyResults + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// VerifyLHAll +// +// Performs a health check against all attached tables and returns back any issues. Returns two lists which are +// delimited by an @RM. The first list is an @FM list of attached tables. The second list is an @FM list of results +// (groups that have GFEs or an empty string if there are none). Items in each list correspond which each other based on +// their list position. +//---------------------------------------------------------------------------------------------------------------------- +Service VerifyLHAll() + + VerifyResults = '' + TableNames = @TABLES(0) + NumTables = DCount(TableNames, @FM) + + For TableCnt = 1 to NumTables + TableName = TableNames + VerifyResults := Database_Services('VerifyLH', TableName) : @FM + Next TableCnt + VerifyResults[-1, 1] = '' ; // Strip off the last @FM + + Response = TableNames : @RM : VerifyResults + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// WriteDataRow +// +// TableName. The linear hash database table name. - [REQUIRED] +// KeyID. The KeyID to the database table. - [REQUIRED] +// +// Writes a data row for the indicated Key ID and database table. +//---------------------------------------------------------------------------------------------------------------------- +Service WriteDataRow(TableName, KeyID, DataRow, IgnoreSelfLock, IgnoreMFSRoutines, IgnoreAllLocks) + + If TableName NE '' AND KeyID NE '' then + If IgnoreSelfLock NE True$ then IgnoreSelfLock = False$ + If IgnoreMFSRoutines NE True$ then IgnoreMFSRoutines = False$ + If IgnoreAllLocks NE True$ then IgnoreAllLocks = False$ + If IgnoreAllLocks then + HaveLock = True$ + end else + HaveLock = Database_Services('GetKeyIDLock', TableName, KeyID, IgnoreSelfLock) + end + If HaveLock EQ True$ then + TableHandle = Database_Services('GetTableHandle', TableName) + If IgnoreMFSRoutines then + MFSList = TableHandle<1, 1> ; // MFS routines are @SVM delimited. + NumMFS = DCount(MFSList, @SVM) + For MFSCnt = NumMFS to 1 Step -1 + MFSRoutine = MFSList<0, 0, MFSCnt> + If (MFSRoutine NE 'SI.MFS') AND (MFSRoutine NE 'RTP57') then + MFSList = Delete(MFSList, 0, 0, MFSCnt) + end + Next MFSCnt + TableHandle<1, 1> = MFSList + end + + // [SRPFW-195] Updated / added by GAC 18 May 2018 + If Error_Services('NoError') then + Write DataRow to TableHandle, KeyID then + Memory_Services('SetValue', ServiceModule : '*' : 'ReadDatarow' : '*' : TableName : '*' : KeyID, DataRow) + end else + ErrorMsg = Error_Services('GetMessage') + Error_Services('Add', 'Error writing ' : KeyID : ' to the ' : TableName : ' table in the ' : Service : ' service. Error message: ':ErrorMsg) + end + end +* If Error_Services('NoError') then + If IgnoreAllLocks EQ False$ then + Database_Services('ReleaseKeyIDLock', TableName, KeyID) + end +* end + end else + Error_Services('Add', 'Unable to lock ' : KeyID : ' for the ' : TableName : ' table in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'TableName or KeyID argument was missing in the ' : Service : ' service.') + end + +end service + +//---------------------------------------------------------------------------------------------------------------------- +// UnlockKeyID +// +// Attempts to unlock the indicated Key ID from the indicated Table Name. Note, this can only be done with the UD 5. +//---------------------------------------------------------------------------------------------------------------------- +Service UnlockKeyID(TableName, KeyID) + + KeyIDUnlocked = False$ ; // Assume false for now. + Convert @Lower_Case to @Upper_Case in TableName + + If (TableName NE '') AND (KeyID NE '') then + // First, do a sanity check to confirm that there is a lock on this Key ID. + IsKeyIDLocked = Database_Services('IsKeyIDLocked', TableName, KeyID, False$) + If Error_Services('NoError') AND (IsKeyIDLocked EQ False$) then + // Key ID was not locked. + KeyIDUnlocked = True$ + end + If KeyIDUnlocked NE True$ then + // Key ID is still presumed to be locked. + VolumePath = '' + FileName = '' + + // Resolve the volume path for this table. + hTableFull = Database_Services('ReadDataRow', 'SYSTABLES', TableName) + VolumeName = hTableFull<1> + VolumeRow = Database_Services('ReadDataRow', 'SYSVOLUMES', VolumeName) + VolumePath = VolumeRow[-1, 'B' : @FM] + VolumePath = VolumePath[-1, 'B' : \0D\] + VolumePath[1, 12] = '' ; // Strip off the preceding bytes. + If SRP_Path('IsRelative', VolumePath) then + VolumePath = SRP_Path('Combine', Drive(), VolumePath) + end + VolumePath = SRP_Path('RemoveFilename', VolumePath) + // Make sure there is a backslash since the RTI_LH_INFO API seems to use this. + VolumePath = SRP_Path('AddBackslash', VolumePath) + + // Resolve the filename for this table. + hTableFull = Database_Services('ReadDataRow', 'SYSTABLES', TableName) + FileName = hTableFull[-1, 'B' : @FM] + FileName = FileName[-1, 'B' : \0D\] + FileName = FileName[1, @VM] + If FileName _NEC 'SYSREPOS' then FileName[1, 12] = '' ; // Strip off the preceding bytes. + FileName = FileName[-1, 'B' : '\'] + // Make sure the filename is well formed. + Begin Case + Case (FileName[-3, 3] _EQC '.LK') OR (FileName[-3, 3] _EQC '.OV') + FileName[-3, 3] = '' + Case FileName _EQC 'SYSREPOS' + FileName = 'REVREPOS' + End Case + + If (VolumePath NE '') AND (FileName) NE '' then + // Attempt to unlocked the Key ID. + RTI_LH_Info(CMD_UNLOCK$, VolumePath, FileName, KeyID, FileName) + // Confirm that the Key ID was unlocked. + IsKeyIDLocked = Database_Services('IsKeyIDLocked', TableName, KeyID, False$) + If Error_Services('NoError') AND (IsKeyIDLocked EQ False$) then + // Key ID was not locked. + KeyIDUnlocked = True$ + end else + // Unable to unlock the Key ID which could be because it is locked by this station. Try using the + // Unlock statement. + hTable = Database_Services('GetTableHandle', TableName) + Unlock hTable, KeyID then + KeyIDUnlocked = True$ + end else + Error_Services('Add', 'Unable to unlock ' : KeyID : ' from the ' : TableName : ' table in the ' : Service : ' service.') + end + end + end else + Error_Services('Add', 'No valid VolumePath or FileName was available in the ' : Service : ' service.') + end + end + end else + Error_Services('Add', 'TableName or KeyID argument was missing in the ' : Service : ' service.') + end + Response = KeyIDUnlocked + +end service + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Internal GoSubs +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROC/DEBUGGER_DUMP.txt b/SYSPROG/STPROC/DEBUGGER_DUMP.txt new file mode 100644 index 0000000..8ac0531 --- /dev/null +++ b/SYSPROG/STPROC/DEBUGGER_DUMP.txt @@ -0,0 +1,271 @@ +compile subroutine debugger_Dump( void ) +/* + Author : Meester C + Date : 21 October 2008 + Purpose : Simple function to grab all the variable contents in a broken + proc and write them out to a "DEBUGGER_DUMP" record in SYSLISTS + + Comments + ======== + + This is a very basic procedure. It would really be a good idea to monitor + the size of the dump output and break it up into sections and write it out + as an OS file for example. The output has the potential to be extremely + large due to the possibility of large variable contents and iterating + through dimensioned arrays with large values. + + ... but that is another story ... + + + Amended Version Date Reason + ======= ======= ==== ====== + +*/ + declare function debugger_Fetch + $insert debugger_Fetch_Equates + $insert logical + + equ VERSION$ to "1.0.0" + equ LOCAL_DUMP_ID$ to "oe_local_dmp.txt" + equ LCOMM_DUMP_ID$ to "oe_lcomm_dmp.txt" + equ CRLF$ to \0D0A\ + equ CR$ to \0D\ + equ LF$ to \0A\ + equ TAB$ to \09\ + + goSub dumpLocalVars + goSub dumpLabelledCommonVars + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +dumpLocalVars: + + localList = debugger_Fetch( "LISTLOCAL" ) + localVars = "" + + xCount = count( localList, @fm ) + ( localList # "" ) + for x = 1 to xCount + var = localList + varName = var[1,@vm] + varType = var[col2()+1,@vm] + varDim = var[col2()+1,@vm] + + begin case + case ( varType = VAR_TYPE_DESC_UNASSIGNED$ ) + localVars := varName : @vm : varType : @vm : "" : @fm + + case ( varType = VAR_TYPE_DESC_IDISPATCH$ ) + localVars := varName : @vm : varType : @vm : "" : @fm + + case ( varType = VAR_TYPE_DESC_DIM_ARRAY$ ) + localVars := varName : @vm : varType : @vm : "" : @fm + + * // We need to iterate across the matrix ... + dim1 = varDim[1,@svm] + dim2 = varDim[col2()+1,@svm] + + d1 = 0 + d2 = 0 + if len( dim2 ) then + dVar = debugger_Fetch( "GETLOCALDIMTYPE", varName, d1, d2 ) + goSub processLocalDimVar + end else + dVar = debugger_Fetch( "GETLOCALDIMTYPE", varName, d1 ) + goSub processLocalDimVar + end + + for d1 = 1 to dim1 + if len( dim2 ) then + for d2 = 1 to dim2 + dVar = debugger_Fetch( "GETLOCALDIMTYPE", varName, d1, d2 ) + goSub processLocalDimVar + next + end else + dVar = debugger_Fetch( "GETLOCALDIMTYPE", varName, d1 ) + goSub processLocalDimVar + end + next + + case OTHERWISE$ + varData = debugger_Fetch( "GETLOCAL", varName ) + goSub escapeVarData + + localVars := varName : @vm : varType : @vm : varData : @fm + + end case + + next + + localVars[-1,1] = "" + + swap @fm with CRLF$ in localVars + convert @vm to "|" in localVars + + osWrite localVars to LOCAL_DUMP_ID$ + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +dumpLabelledCommonVars: + + lCommList = debugger_Fetch( "LISTLABELLED" ) + lCommVars = "" + + xCount = count( lCommList, @fm ) + ( lCommList # "" ) + for x = 1 to xCount + + var = lCommList + + commName = var[1,@vm] + varName = var[col2()+1,@vm] + varType = var[col2()+1,@vm] + varDim = var[col2()+1,@vm] + + begin case + case ( varType = VAR_TYPE_DESC_UNASSIGNED$ ) + lCommVars := commName : @vm : varName : @vm : varType : @vm : "" : @fm + + case ( varType = VAR_TYPE_DESC_IDISPATCH$ ) + lCommVars := commName : @vm : varName : @vm : varType : @vm : "" : @fm + + case ( varType = VAR_TYPE_DESC_DIM_ARRAY$ ) + lCommVars := commName : @vm : varName : @vm : varType : @vm : "" : @fm + + * // We need to iterate across the matrix ... + dim1 = varDim[1,@svm] + dim2 = varDim[col2()+1,@svm] + + d1 = 0 + d2 = 0 + if len( dim2 ) then + dVar = debugger_Fetch( "GETLABELLEDDIMTYPE", commName, varName, d1, d2 ) + goSub processLabelledCommonDimVar + end else + dVar = debugger_Fetch( "GETLABELLEDDIMTYPE", commName, varName, d1 ) + goSub processLabelledCommonDimVar + end + + for d1 = 1 to dim1 + if len( dim2 ) then + for d2 = 1 to dim2 + dVar = debugger_Fetch( "GETLABELLEDDIMTYPE", commName, varName, d1, d2 ) + goSub processLabelledCommonDimVar + next + end else + dVar = debugger_Fetch( "GETLABELLEDDIMTYPE", commName, varName, d1 ) + goSub processLabelledCommonDimVar + end + next + + case OTHERWISE$ + varData = debugger_Fetch( "GETLABELLED", commName, varName ) + goSub escapeVarData + + lCommVars := commName : @vm : varName : @vm : varType : @vm : varData : @fm + + end case + + next + + lCommVars[-1,1] = "" + + swap @fm with CRLF$ in lCommVars + convert @vm to "|" in lCommVars + + osWrite lCommVars to LCOMM_DUMP_ID$ + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +processLocalDimVar: + + dVarType = dVar<1> + varData = "" + + begin case + case ( dVarType = VAR_TYPE_DESC_UNASSIGNED$ ) + null + + case ( dVarType = VAR_TYPE_DESC_IDISPATCH$ ) + null + + case ( dVarType = VAR_TYPE_DESC_DIM_ARRAY$ ) + * // This HAS to be an error! + null + + case OTHERWISE$ + varData = debugger_Fetch( "GETLOCAL", varName, d1, d2 ) + goSub escapeVarData + + end case + + dVarName = varName : "(" : d1 + if len( dim2 ) then + dVarName := "," : d2 + end + dVarName := ")" + + localVars : = " " : dVarName : @vm : dVarType : @vm : varData : @fm + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +processLabelledCommonDimVar: + + dVarType = dVar<1> + varData = "" + + begin case + case ( dVarType = VAR_TYPE_DESC_UNASSIGNED$ ) + null + + case ( dVarType = VAR_TYPE_DESC_IDISPATCH$ ) + null + + case ( dVarType = VAR_TYPE_DESC_DIM_ARRAY$ ) + * // This HAS to be an error! + null + + case OTHERWISE$ + varData = debugger_Fetch( "GETLABELLED", commName, varName, d1, d2 ) + goSub escapeVarData + + end case + + dVarName = varName : "(" : d1 + if len( dim2 ) then + dVarName := "," : d2 + end + dVarName := ")" + + lCommVars := " " : commName : @vm : dVarName : @vm : dVarType : @vm : varData : @fm + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +escapeVarData: + swap "\" with "\\" in varData + swap @rm with "\xFF" in varData + swap @fm with "\xFE" in varData + swap @vm with "\xFD" in varData + swap @svm with "\xFC" in varData + swap @tm with "\xFB" in varData + swap \09\ with "\t" in varData + swap \0A\ with "\n" in varData + swap \0D\ with "\r" in varData + swap \00\ with "\0" in varData +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROC/EMAIL_FORMAT.txt b/SYSPROG/STPROC/EMAIL_FORMAT.txt new file mode 100644 index 0000000..1e40854 --- /dev/null +++ b/SYSPROG/STPROC/EMAIL_FORMAT.txt @@ -0,0 +1,235 @@ +compile Subroutine EMAIL_FORMAT( charstr CONV, charstr ANS, charstr BRANCH, charstr RETURN_DATA) +* +* EMAIL_FORMAT is an example of a developer's custom prompt formatting +* routine using the square brackets call. +* +* It should be placed in square brackets, like this: +* +* [EMAIL_FORMAT] +* +* This subroutine should be used as the first and only "Input Validation" in +* a window prompt. Placed in "Output Format", it properly checks that +* the string passed in is a valid Email address +* +! +* MrC 3-23-21 Remove 3d Gray color from message and added icon +* mtr 5-31-11 Changes subdomain to allow first chars to be numbers + +* Subroutine declarations + +$insert msg_equates +declare function msg + +* Local Equates +* The STATUS() variable is used to indicated the error condition of the +* pattern. They are: +EQU VALID$ TO 0 ;* Successful +EQU INVALID_MSG$ TO 1 ;* Bad Data - Print error message window +EQU INVALID_CONV$ TO 2 ;* Bad Conversion - " " +EQU INVALID_NOMSG$ TO 3 ;* Bad but do not print the error message window + +EQU THREEDGRAY$ TO 192 + +* Begin Conversion +* +RETURN_DATA = "" + +IF ANS NE "" THEN +EMAIL = ANS +ANS = "" + +* mtr 1-19-07 +email = trim(Email) + +STATUS() = VALID$ + +IF LEN( EMAIL ) THEN + * Case statement to validate all possible types of Social Security numbers. If + * a new format is required simply add another case. + * The fall-through (CASE 1) traps invalid conversions. + BEGIN CASE + Case email + error_flag = '' + return_data = '' + * per RFC #822 + // Valid characters in an "atom" + exclude_atom = '()<>@,:;\?".[]':char(27) + exclude_quoted = '"\':char(13) + atom_chars = ''; *[#33..#255] - ['(', ')', '<', '>', '@', ',', ';', ':', '\', '/', '"', '.', '[', ']', #127] + quoted_string_chars = '';* [#0..#255] - ['"', #13, '\'] + For i = 0 To 255 + this_char = char(i) + If Index(exclude_atom, this_char, 1) ELSE + If i >=33 then + atom_chars:=this_char + end + end + If Index(exclude_quoted, this_char, 1) ELSE + quoted_string_chars:=this_char + end + Next i + + // Valid characters in a subdomain + letters = @upper.Case:@lower.case + letters_digits = letters:'0123456789' + subdomain_chars = '-':letters_digits + STATE_BEGIN = 1 + STATE_ATOM = 2 + STATE_QTEXT = 3 + STATE_QCHAR = 4 + STATE_QUOTE = 5 + STATE_LOCAL_PERIOD = 6 + STATE_EXPECTING_SUBDOMAIN= 7 + STATE_SUBDOMAIN = 8 + STATE_HYPHEN = 9 + + + State = STATE_BEGIN + n = Len(email) + i = 1 + subdomains = 1 + for i = 1 To n + this_char = email[i, 1] + Begin case + Case State = STATE_BEGIN + if index(atom_chars, this_char, 1) then + State = STATE_ATOM + End else + if this_char = '"' then + State = STATE_QTEXT + End else + error_flag = 1 + end + end + + Case State = STATE_ATOM + if this_char = '@' then + State = STATE_EXPECTING_SUBDOMAIN + End else + if this_char = '.' then + State = STATE_LOCAL_PERIOD + End else + if index(atom_chars, this_char, 1) else + error_flag = 1 + end + end + end + + Case State = STATE_QTEXT + if this_char = '\' then + State = STATE_QCHAR + End else + if this_char = '"' then + State := STATE_QUOTE + End else + if Index(quoted_string_chars, this_char, 1) else + error_flag = 1 + end + end + end + + Case State = STATE_QCHAR + State = STATE_QTEXT + + Case State = STATE_QUOTE + if this_char = '@' then + State = STATE_EXPECTING_SUBDOMAIN + End else + if this_char = '.' then + State = STATE_LOCAL_PERIOD + End else + error_flag = 1 + end + end + + Case State = STATE_LOCAL_PERIOD + if index(atom_chars, this_char, 1) then + State = STATE_ATOM + End else + if this_char = '"' then + State = STATE_QTEXT + End else + error_flag = 1 + end + end + + Case State = STATE_EXPECTING_SUBDOMAIN + * mtr 5-31-11 + *If Index(letters, this_char, 1) Then + If Index(letters_digits, this_char, 1) then + State = STATE_SUBDOMAIN + end else + error_flag = 1 + end + + Case State = STATE_SUBDOMAIN + if this_char = '.' then + subdomains += 1 + State = STATE_EXPECTING_SUBDOMAIN + end else + if this_char = '-' then + State = STATE_HYPHEN + end else + if index(letters_digits, this_char, 1) else + error_flag = 1 + end + end + end + + Case State = STATE_HYPHEN + if Index(letters_digits, this_char, 1) then + State = STATE_SUBDOMAIN + End else + if this_char # '-' then + error_flag = 1 + end + end + + + End case + + next i + + If error_flag then + Gosub DisplayError + STATUS() = INVALID_NOMSG$ + end else + GoodEmail = (State = STATE_SUBDOMAIN) and (subdomains >= 2) + If GoodEmail then + return_data = email + End else + Gosub DisplayError + STATUS() = INVALID_NOMSG$ + end + end + + + + CASE 1 + IF CONV = "ICONV" THEN + gosub DisplayError + END + STATUS() = INVALID_NOMSG$ + END CASE +END ELSE + IF CONV = "ICONV" THEN + gosub DisplayError + END + STATUS() = INVALID_NOMSG$ +END +end + +RETURN + +DisplayError: +msgrec = "" +msgrec = "Data Validation Error" +msgrec = EMAIL : " is not a valid email address.||Please enter a email address with a name,|an '@' symbol, and a server/domain." +// msgrec = THREEDGRAY$:@VM:THREEDGRAY$:@VM:THREEDGRAY$ +msgrec = 'C' +msgRec = "!" +result = msg( "", msgrec) +Return + +* Source Date: 13:55:58 17 SEP 2004 Build ID: OI*7.1 Level: 7.1 + diff --git a/SYSPROG/STPROC/ERRMSG.txt b/SYSPROG/STPROC/ERRMSG.txt new file mode 100644 index 0000000..76494b8 --- /dev/null +++ b/SYSPROG/STPROC/ERRMSG.txt @@ -0,0 +1,191 @@ +Compile Subroutine ErrMsg(ErrCodes) + +Declare Subroutine Msg, Set_Status +DECLARE FUNCTION Create_Dialog + +$INSERT MSG_EQUATES + +EQU MSGID$ TO 1 ;* First value in ErrCodes +EQU MSGPARMS$ TO 2 ;* Second value in ErrCodes + +EQU MSGTITLE$ TO 1 ;* Subvalue in MSGPARM +EQU MSGTEXT$ TO 2 ;* Subvalue in MSGPARM + +Equate CRLF$ to \0D0A\ ;* CHAR(13):CHAR(10) for multiline messages + +IF NOT(ASSIGNED(ErrCodes)) THEN + ErrCodes = 'Null Parameter Passed to ErrMsg Routine!' +END + +IF INDEX(ErrCodes,@VM,1) = 0 THEN ErrCodes = ErrCodes:@VM ;* Changed to an append from a prepend. 2/5/2005 JCH + +IF ErrCodes[-1,1] = @FM THEN ErrCodes[-1,1] = '' + +CONVERT ']' TO @SVM IN ErrCodes + +ErrDispLines = '' +ErrCodeCnt = COUNT(ErrCodes,@FM) + (ErrCodes NE '') + + +FOR M = 1 TO ErrCodeCnt + + MsgID = ErrCodes + MsgParms = FIELD(ErrCodes,@VM,MSGPARMS$,99) ;* Added to pickup up additional parameters 10/03/2005 JCH + + BEGIN CASE + + CASE ErrCodes = 'STPROC' + MText = ErrCodes + MTitle = ErrCodes + MIcon = '!' + + CASE ErrCodes = '' + IF INDEX(MsgParms,@SVM,1) THEN + MText = ErrCodes + MTitle = ErrCodes + END ELSE + MText = MsgParms + MTitle = 'Application Error Message' + END + + MIcon = '!' + + + CASE MsgID = 'FS414' + + TextLine = ErrCodes<2,1,2> + + TextLine := CRLF$:CRLF$ + TextLine := 'This record is locked by THIS workstation.':CRLF$:CRLF$ + TextLine := 'Check for minimized windows that have this record open and close the record.' + + TypeOver = '' + TypeOver = TextLine + TypeOVer = 450 + + Msg(@WINDOW,TypeOver,'LOCKS') + + RETURN + + + CASE MsgID = 'FS415' + + + TextLine = ErrCodes<2,1,2> + + TextLine := CRLF$:CRLF$ + TextLine := 'This record is locked by ANOTHER workstation.':CRLF$:CRLF$ + TextLine := 'Check other workstations for the open record.' + + TypeOver = '' + TypeOver = TextLine + TypeOVer = 450 + + Msg(@WINDOW,TypeOver,'LOCKS') + + RETURN + + + CASE 1 + + * Passed in MsgID must be a system generated error message + + OSREAD Reverrors FROM 'REVERROR.DAT' THEN + Pos = INDEX(Reverrors,MsgID,1) + IF Pos THEN + MText = Reverrors[Pos,CHAR(13)] + MText = Field(MText,":",2) + MText = Trim(MText) + + FOR I = 1 TO COUNT(MsgParms,@VM) + (MsgParms NE '') + SWAP '%':I:'%' WITH MsgParms<1,I> IN MText + NEXT I + + MText = Trim(MText) + MTitle = 'System Error Message - ':MsgID + MIcon = '!' + + END ELSE + IF INDEX(MsgID,@SVM,1) THEN ;* Updated 2/5/2005 to work with system messages + MText = FIELD(MsgID,@SVM,2) + MTitle = FIELD(MsgID,@SVM,1) + END ELSE + MText = MsgID + MTitle = 'Application Message' + END + MIcon = '!' + END + END ELSE + + MText = "OSREAD Error on file: REVERROR.DAT." + MTitle = 'ERRMSG routine Error.' + MIcon = 'H' + + END + + CASE 1 + + + END CASE + + ErrDispLines := MTitle:@VM:MText:@FM ;* Added 1/20/2010 JCH + + /* + + * Display the message + + BEGIN CASE + CASE Len(MText) < 20 ; Msg_Len = 200 + CASE Len(MText) < 30 ; Msg_Len = 260 + CASE Len(MText) < 40 ; Msg_Len = 320 + CASE Len(MText) < 50 ; Msg_Len = 380 + CASE Len(MText) < 60 ; Msg_Len = 440 + CASE 1 ; Msg_Len = 450 + END CASE + + TypeOver = '' + TypeOver = MText + TypeOver = 'BO' + TypeOver = MIcon + TypeOVer = Msg_Len + TypeOver = 192:@VM:192:@VM:192 + TypeOver = MTitle + TypeOver = 'L' + + Msg('',TypeOver) + */ + +NEXT M + + +IF ErrCodeCnt = 1 AND MTitle = 'Application Message' OR MTitle = 'Process Error' THEN + + * Display the message + + BEGIN CASE + CASE Len(MText) < 20 ; Msg_Len = 200 + CASE Len(MText) < 30 ; Msg_Len = 260 + CASE Len(MText) < 40 ; Msg_Len = 320 + CASE Len(MText) < 50 ; Msg_Len = 380 + CASE Len(MText) < 60 ; Msg_Len = 440 + CASE 1 ; Msg_Len = 450 + END CASE + + TypeOver = '' + TypeOver = MText + TypeOver = 'BO' + TypeOver = MIcon + TypeOVer = Msg_Len + TypeOver = 192:@VM:192:@VM:192 + TypeOver = MTitle + TypeOver = 'L' + + Msg('',TypeOver) +END ELSE + CALL Set_Status(0) + dummy = Create_Dialog('DIALOG_ERRMSG',@WINDOW,0,ErrDispLines) +END + +RETURN + + diff --git a/SYSPROG/STPROC/ERROR_SERVICES.txt b/SYSPROG/STPROC/ERROR_SERVICES.txt new file mode 100644 index 0000000..3dea632 --- /dev/null +++ b/SYSPROG/STPROC/ERROR_SERVICES.txt @@ -0,0 +1,380 @@ +Function Error_Services(@Service, @Params) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Error_Services + + Description : Handler program for all error services. + + Notes : Application errors should be logged using the Error Services module. There are a few methodological + assumptions built into way errors are managed which are important to understand in order to properly + work with Error Services: + + - The term 'top' refers to the originating procedure of a call stack and the term 'bottom' refers to + the last routine (or the current routine) within a call stack. Within the OpenInsight Debugger + this will appear backwards since the originating procedure always appears at the bottom of the + list and the current routine appears at the top of the list. We are using this orientation because + it is common to refer to the process of calling other procedures as 'drilling down'. + + - The reason for defining the orientation of the call stack is because Error_Services allows for + multiple error conditions to be appended to an original error. In most cases this will happen when + a procedure at the bottom of the stack generates an error condition and then returns to its + calling procedure. This higher level procedure can optionally add more information relevant to + itself. This continues as the call stack 'bubbles' its way back to the top to where the + originating procedure is waiting. + + - Native OpenInsight commands that handle errors (e.g., Set_Status, Set_FSError, Set_EventStatus) + preserve their error state until explicitly cleared. This can hinder the normal execution of code + since subsequent procedures (usually SSPs) will fail if a pre-existing error condition exists. + Our philosophy is that error conditions should automatically be cleared before a new procedure + is executed to avoid this problem. However, the nature of Basic+ does not make this easy to + automate for any given stored procedure. Therefore, if a stored procedure wants to conform to our + philosophy then it should include a call into the 'Clear' service request at the top of the + program. Alternatively this can be done through a common insert (see SERVICE_SETUP for example.) + + - Service modules will use the SERVICE_SETUP insert and therefore automatically clear out any + error conditions that were set before. + + - The 'Set' service request is the equivelent to the various forms of setting an error within Basic+ + (e.g., Set_Status, Set_FSError, Set_EventStatus). This will clear out any pre-existing error(s) + first (see 'Clear' service request description below). In most cases the 'Add' service request + (see below) should be used since error conditions are intended to be automatically cleared by + service modules or properly managed stored procedures. + + - The 'Add' service request is similar to the 'Set' service request but it will not clear out any + pre-existing errors. Using 'Add', the error conditions can be stacked allowing the higher level + calling procedures the ability to contribute to the existing error or add additional errors. + + - The 'Clear' service request will reset all of the error condition flags. + + Parameters : + Service [in] -- Name of the service being requested + Param1-10 [in/out] -- Additional request parameter holders + Response [out] -- Response to be sent back to the Controller (MCP) or requesting procedure + + History : (Date, Initials, Notes) + 12/28/12 dmb Original programmer. + 12/31/12 dmb Add hooks for various service requests. Add comments in the Notes section to explain the + theory of operation of Error Services. + 01/01/13 dmb Add functionality to the Set, Add, GetMessage, and GetMessages service requests. + 01/02/13 dmb Remove reference to SERVICES_SETUP and put the Assigned command lines directly into this + code to avoid infinite loop problem. + 01/05/13 dmb Added HasError service request. + 03/13/13 dmb [SRPFW-9] Added NoError service request. + 10/01/13 dmb [SRPFW-18] Replace APP_INSERTS with LOGICAL and declare Error_Services. + 10/06/13 dmb [SRPFW-17] Retrofit to use the default FrameWorks system font. + 03/20/17 fjt [SRPFW-160] Conversion to EB+; addition of justification parameter to display. + 10/09/17 dmb Add SendRuntimeAlert service to act as a debugger intercept process. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$Insert MSG_EQUATES +$insert RTI_DEBUG_COMMON +$insert SRPMail_Inserts + +Equ Segoe_UI$ to 'Segoe UI' : @SVM : -12 : @SVM : 400 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 34 : @SVM : 0 : @SVM : 3 : @SVM : 2 : @SVM : 1 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 + +// Make sure any request parameters which have not been assigned are nulled. +// Normally these would be referenced in the SERVICES_SETUP insert but there is a call to ERROR_SERVICES in that +// insert which causes an infinite loop to occur. +If Assigned(Service) else Service = '' +If Assigned(Error) else Error = '' +If Assigned(Param1) else Param1 = '' +If Assigned(Param2) else Param2 = '' +If Assigned(Param3) else Param3 = '' +If Assigned(Param4) else Param4 = '' +If Assigned(Param5) else Param5 = '' +If Assigned(Param6) else Param6 = '' +If Assigned(Param7) else Param7 = '' +If Assigned(Param8) else Param8 = '' +If Assigned(Param9) else Param9 = '' +If Assigned(Param10) else Param10 = '' +If Assigned(Response) else Response = '' + +AutoDisplayErrors = False$ ; // Set this to True$ when debugging so all errors will automatically display. + +Common /ErrorServices/ ErrorMessages@, ErrorSources@, ErrorCodes@, RetStacks@, Unused5@, Unused6@, Unused7@, Unused8@ + +Declare function RetStack, Error_Services, SRPSendMail +Declare subroutine Error_Services + +GoToService else + Error_Services('Set', Service : ' is not a valid service request within the Error services module.') +end + +Return Response else '' + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Service Parameter Options +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +Options BOOLEAN = True$, False$ + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Services +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// Set +// +// Param1 - Error message. Messages should be fairly descriptive. +// +// Sets an error to the stack. This will automatically clear any existing error conditions first so this error will +// be the only one on the stack. +//---------------------------------------------------------------------------------------------------------------------- +Service Set(ErrorMessage) + + Error_Services('Clear') + Error_Services('Add', ErrorMessage) + + If AutoDisplayErrors then Error_Services('DisplayError') + +End Service + + +//---------------------------------------------------------------------------------------------------------------------- +// Add +// +// Param1 - Error message. Messages should be fairly descriptive. +// +// Adds an error to the stack. This will not clear existing error conditions first. It is intended to allow higher level +// routines to add more information to an existing error condition or simply to maintain an ongoing error log for some +// troubleshooting or debugging purposes. +//---------------------------------------------------------------------------------------------------------------------- +Service Add(ErrorMessage) + + CurStack = RetStack() + AtSelf = CurStack[1, @FM] ; // AtSelf should be the name of this routine (e.g., ERROR_SERVICES) + Loop + CurRoutine = CurStack[1, @FM] ; // Get the next routine from the program call stack. + Until CurRoutine _NEC AtSelf + CurStack = Delete(CurStack, 1, 0, 0) ; // Remove any self-references from the program call stack. + Repeat + Convert @FM to @VM in CurStack ; // Convert the delimiter so it can be added to the global common. + + If Len(ErrorMessages@) then + ErrorMessages@ := @FM : ErrorMessage + RetStacks@ := @FM : CurStack + end else + ErrorMessages@ = ErrorMessage + RetStacks@ = CurStack + end + + If AutoDisplayErrors then Error_Services('DisplayError') + +End Service + + +//---------------------------------------------------------------------------------------------------------------------- +// Clear +// +// Clears all error conditions and related information. +//---------------------------------------------------------------------------------------------------------------------- +Service Clear() + + ErrorMessages@ = '' + ErrorSources@ = '' + ErrorCodes@ = '' + RetStacks@ = '' + +End Service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMessage +// +// Returns the most current error message. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMessage() + + Response = ErrorMessages@[-1, 'B' : @FM] + +End Service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMessages +// +// Returns the stack of error messages. This will be @FM delimited. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMessages() + + // Business logic goes here. Data that needs to be returned should be assigned to the Response parameter. + Response = ErrorMessages@ + +End Service + + +//---------------------------------------------------------------------------------------------------------------------- +// HasError +// +// Returns True if there is an error condition, False if there is no error condition. Caller will still need to use +// the GetMessage or GetMessages service to determine what the error is. The HasError service allows the caller to +// embed the Error_Services service call inside of a conditional statement like this: +// +// If Error_Services('HasError') then +// * An error has occured. Proceed accordingly. +// ErrorMessage = Error_Services('GetMessage') +// end else +// * No error has occured. +// end +//---------------------------------------------------------------------------------------------------------------------- +Service HasError() + + If Len(ErrorMessages@) then + Response = True$ + end else + Response = False$ + end + +End Service + + +//---------------------------------------------------------------------------------------------------------------------- +// NoError +// +// Returns True if there are no error conditions, False if there is an error condition. This is the opposite of the +// HasError service and exists for improved readability. +//---------------------------------------------------------------------------------------------------------------------- +Service NoError() + + If Len(ErrorMessages@) then + Response = False$ + end else + Response = True$ + end + +End Service + + +//---------------------------------------------------------------------------------------------------------------------- +// DisplayError +// +// Displays the current error message to the end user. +//---------------------------------------------------------------------------------------------------------------------- +Service DisplayError(Justification) + + ErrorMessage = Error_Services('GetMessage') + If Len(ErrorMessage) then + MsgStruct = '' + MsgStruct = ErrorMessage + MsgStruct = 'BO' + MsgStruct = 'W' + MsgStruct = '!' + MsgStruct = -1 + MsgStruct = -1 + MsgStruct = Justification + MsgStruct = 'Error Services' + MsgStruct = Segoe_UI$ + Msg(@Window, MsgStruct) + end + +End Service + + +Service GetSource() + + // Business logic goes here. Data that needs to be returned should be assigned to the Response parameter. + Response = '' + +End Service + + +Service GetSources() + + // Business logic goes here. Data that needs to be returned should be assigned to the Response parameter. + Response = '' + +End Service + + +Service GetCode() + + // Business logic goes here. Data that needs to be returned should be assigned to the Response parameter. + Response = '' + +End Service + + +Service GetCodes() + + // Business logic goes here. Data that needs to be returned should be assigned to the Response parameter. + Response = '' + +End Service + + +Service GetStackTrace() + // Business logic goes here. Data that needs to be returned should be assigned to the Response parameter. + Response = '' +End Service + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Internal GoSubs +////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////? + +//---------------------------------------------------------------------------------------------------------------------- +// SendRuntimeAlert +// +// Sends out an email alert when this service is called as a debugger intercept. +//---------------------------------------------------------------------------------------------------------------------- +SendRuntimeAlert: + + Done = False$ + Error = False$ + Program = Curr_Program@ + MsgSent = '' + + If Program EQ '' then Program = 'Error Services' + + ConfigFile = '' + ConfigFile<1> = SendUsing_Port$ + ConfigFile<2> = '' + ConfigFile<3> = '' ; // Server port + ConfigFile<4> = '' ; // Mail server + ConfigFile<5> = True$ ; // Authenticate + ConfigFile<6> = '' ; // Username + ConfigFile<7> = '' ; // Password + ConfigFile<8> = False$ ; // Use SSL + + Text = '' + Text<-1> = 'App: ' : @APPID<1> + Text<-1> = 'Window: ' : @WINDOW + Text<-1> = 'User: ' : @USERNAME + Text<-1> = 'Station: ' : @STATION + Text<-1> = ' ' + Text<-1> = 'SP Status: ' : SPStatus@ + Text<-1> = 'SP Stat Code: ' : SPStatCode@ + Text<-1> = 'Program: ' : Program + Text<-1> = 'Call Depth: ' : CallDepth@ + Text<-1> = 'Line No: ' : LineNo@ + Text<-1> = ' ' + Text<-1> = 'Stack: ' + Text<-1> = CallStack@ + Convert \00\ TO ',' in Text + Swap @VM with ':@VM:' IN Text + Swap @FM with Char(13) : Char(10) IN Text + Swap @TM with Char(13) : Char(10) IN Text + + SentFrom = '' + SentTo = '' + Message = '' + Message<1> = '' : Program ; // Subject + Message<2> = SentFrom ; // From (email address) + Message<3> = SentTo ; // Send to (email address) + Message<5> = '' ; // Blind Carbon Copy (email address) + Message<6> = '' ; // Reply To (email address) + Message<7> = 'TEXT' ; // Content Type (TEXT or HTML) + Message<8> = Text ; // Content / Body + Message<9> = '' ; // Attachment(s) (path to file name(s)) + + MsgSent = SRPSendMail(Message, ConfigFile) + +return diff --git a/SYSPROG/STPROC/HTTPSVR_GETREPOSIMAGE.txt b/SYSPROG/STPROC/HTTPSVR_GETREPOSIMAGE.txt new file mode 100644 index 0000000..a46731c --- /dev/null +++ b/SYSPROG/STPROC/HTTPSVR_GETREPOSIMAGE.txt @@ -0,0 +1,224 @@ +compile function httpSvr_GetReposImage( httpServer, requestID, requestHeaders ) +/* + **************************************************************************** + ** IF YOU WANT TO MODIFY THIS FOR YOUR OWN APPLICATIONS PLEASE USE A COPY ** + ** DO NOT CHANGE THIS PROGRAM AS IT MAY BE OVERWRITTEN BY FUTURE UPDATES! ** + **************************************************************************** + + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : August 2022 + Purpose : Simple function for the HTTPSERVER control to return + : repository images. + + Query Parameters + ================ + + classid : Repository CLASSID of the image (defaults to "PNG") + [req] entid : Repository ENTITYID of the image + useFile : If TRUE$ ("1") then return the image via the server's + : SetResponseContentFile method, otherwise return via the + : normal SetResponseContent method. + dpi : Specifies the requested DPI for the image - this can be + : an actual DPI (like 96,192 etc) or a percentage (100%, + : 200%) etc (Defaults to 96) + + Comments + ======== + + Amended Date Reason + ======= ==== ====== +*/ + #pragma precomp event_precomp + + declare function repository, rti_ResolvePath, rti_ErrorText, rti_UC + $insert ps_HTTPServer_Equates + $insert repository_Equates + $insert reposErrors + $insert rti_SSP_Equates + $insert logical + + equ BASE_DPI$ to 96 + + errStat = FALSE$ + errInfo = "" + + classID = "" + entID = "" + dpi = "" + bUseFile = FALSE$ + mimeType = "" + + // NOTE: We're expecting this to be a GET request - if it's POST then we + // need to extract these arguments from the request content as they won't + // be in the query names and values fields. + + queryNames = requestHeaders + + locateC "classid" in queryNames using @vm setting pos then + classID = rti_UC( trim( requestHeaders ) ) + end + + locateC "entid" in queryNames using @vm setting pos then + entID = rti_UC( trim( requestHeaders ) ) + end + + locateC "useFile" in queryNames using @vm setting pos then + bUseFile = trim( requestHeaders ) + end + + locateC "dpi" in queryNames using @vm setting pos then + dpi = trim( requestHeaders ) + end + + if bLen( classID ) else + classID = "PNG" + end + + if bLen( dpi ) then + if ( dpi[-1,1] = "%" ) then + convert "%" to "" in dpi + if num( dpi ) then + dpi = int( ( dpi / 100 ) * BASE_DPI$ ) + end else + dpi = "" + end + end + end + + if ( dpi ) then + if ( dpi < BASE_DPI$ ) then + dpi = BASE_DPI$ + end + end else + dpi = BASE_DPI$ + end + + begin case + case ( classID == "JPG" ) + mimeType = "image/jpeg" + case ( classID == "GIF" ) + mimeType = "image/gif" + case ( classID == "BMP" ) + mimeType = "image/bmp" + case ( classID == "PNG" ) + mimeType = "image/png" + case OTHERWISE$ + null + end case + + if bLen( entID ) then + reposID = @appID<1> : "*IMAGE*" : classID : "*" : entID + + call set_Status( SETSTAT_OK$ ) + + fileNames = repository( "GETSUBKEY", reposID ) + if get_Status( errInfo ) then + if ( errInfo<1,1> == REP_ENT_NOEXISTS_ERR$ ) then + @httpServer->setResponseStatus( requestID, 404 ) + end else + goSub setHTTPError + end + end else + + goSub resolveFileNameForDPI + + if bLen( filename ) then + fileName = rti_ResolvePath( fileName, "" ) + + if bUseFile then + + @httpServer->setResponseFile( requestID, fileName ) + @httpServer->setResponseHeader( requestID, "Content-Type", mimeType ) + + end else + osRead fileContents from fileName then + @httpServer->setResponseContent( requestID, fileContents ) + @httpServer->setResponseHeader( requestID, "Content-Type", mimeType ) + end else + @httpServer->setResponseStatus( requestID, 404 ) + end + end + end else + @httpServer->setResponseStatus( requestID, 404 ) + end + + end + end else + @httpServer->setResponseStatus( requestID, 404 ) + end + +return TRUE$ + +/////////////////////////////////////////////////////////////////////////////// +// resolveFileNameForDPI subroutine +// +// Finds the best fitting image file for the DPI requested fro the list of +// files defined in the repository: +// +// <0,1> 96 (100%) +// <0,2> 120 (125%) +// <0,3> 144 (150%) +// <0,4> 168 (175%) +// <0,5> 192 (200%) <-- After this point we step up in 50% increments +// <0,6> 240 (250%) +// <0,7> 288 (300%) +// <0,8> 336 (350%) +// <0,9> 384 (400%) +// <0,10> 432 (450%) +// <0,11> 480 (500%) +// +// If we can't find an exact match then we go for the next highest we can find +// +// ---------------------------------------------------------------------------- +// [i] dpi : DPI requested +// [i] fileNames : @vm'd list of file names to search +// [o] fileName : Resolved file name +// ---------------------------------------------------------------------------- +resolveFileNameForDPI: + + fileName = "" + dpiTest = BASE_DPI$ + + eofNames = bLen( fileNames ) + pos = 1 + loop + fileName_ = fileNames[pos,@vm,TRUE$]; pos = bCol2()+1 + if bLen( fileName_ ) then + transfer fileName_ to fileName + begin case + case ( dpiTest == dpi ) + return + case ( dpiTest > dpi ) + return + case OTHERWISE$ + null + end case + end + until ( pos > eofNames ) + // After 200% DPI we go up in 50% steps, otherwise we go up in 25% steps + if ( dpiTest >= 192 ) then + dpiTest += 48 + end else + dpiTest += 24 + end + repeat + +return + +/////////////////////////////////////////////////////////////////////////////// + +setHTTPError: + + errInfo = rti_ErrorText( "SP", errInfo ) + @httpServer->setResponseContent( requestID, errInfo ) + @httpServer->setResponseHeader( requestID, "Content-Type", "text/plain" ) + @httpServer->setResponseStatus( requestID, 500 ) + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROC/HTTPSVR_TRACE.txt b/SYSPROG/STPROC/HTTPSVR_TRACE.txt new file mode 100644 index 0000000..dc2245d --- /dev/null +++ b/SYSPROG/STPROC/HTTPSVR_TRACE.txt @@ -0,0 +1,145 @@ +compile function httpSvr_Trace( httpServer, requestID, requestHeaders ) +/* + **************************************************************************** + ** IF YOU WANT TO MODIFY THIS FOR YOUR OWN APPLICATIONS PLEASE USE A COPY ** + ** DO NOT CHANGE THIS PROGRAM AS IT MAY BE OVERWRITTEN BY FUTURE UPDATES! ** + **************************************************************************** + + ** Copyright (C) 2012-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : March 2021 + Purpose : "Trace" function for HTTPSERVER control requests. + + + Comments + ======== + + This is a simple function designed to reflect the headers and content received + by the HTTPSERVER control back to the client as an HTML page. + + Modelled on the venerable "INET_TRACE" function. + + Amended Date Reason + ======= ==== ====== + +*/ + + #pragma precomp event_precomp + + declare function rti_XMLEncode, exec_Method + $insert ps_HTTPServer_Equates + $insert rti_Text_Equates + $insert logical + + varNames = "CONTENT_LENGTH" ; varIndexes = PS_HSVR_REQHDR_CONTENTLEN$ + varNames := @fm : "CONTENT_TYPE" ; varIndexes := @fm : PS_HSVR_REQHDR_CONTENTTYPE$ + varNames := @fm : "GATEWAY_INTERFACE" ; varIndexes := @fm : PS_HSVR_REQHDR_GATEWAYINTERFACE$ + varNames := @fm : "HTTPS" ; varIndexes := @fm : PS_HSVR_REQHDR_HTTPS$ + varNames := @fm : "HTTP_ACCEPT" ; varIndexes := @fm : PS_HSVR_REQHDR_HTTPACCEPT$ + varNames := @fm : "HTTP_COOKIE" ; varIndexes := @fm : PS_HSVR_REQHDR_HTTPCOOKIE$ + varNames := @fm : "HTTP_FROM" ; varIndexes := @fm : PS_HSVR_REQHDR_HTTPFROM$ + varNames := @fm : "HTTP_REFERER" ; varIndexes := @fm : PS_HSVR_REQHDR_HTTPREFERRER$ + varNames := @fm : "HTTP_USER_AGENT" ; varIndexes := @fm : PS_HSVR_REQHDR_HTTPUSERAGENT$ + varNames := @fm : "PATH_INFO" ; varIndexes := @fm : PS_HSVR_REQHDR_PATHINFO$ + varNames := @fm : "PATH_TRANSLATED" ; varIndexes := @fm : PS_HSVR_REQHDR_PATHTRANSLATED$ + varNames := @fm : "REMOTE_ADDR" ; varIndexes := @fm : PS_HSVR_REQHDR_REMOTEADDR$ + varNames := @fm : "REMOTE_HOST" ; varIndexes := @fm : PS_HSVR_REQHDR_REMOTEHOST$ + varNames := @fm : "REMOTE_IDENT" ; varIndexes := @fm : PS_HSVR_REQHDR_REMOTEIDENT$ + varNames := @fm : "REMOTE_USER" ; varIndexes := @fm : PS_HSVR_REQHDR_REMOTEUSER$ + varNames := @fm : "REQUEST_METHOD" ; varIndexes := @fm : PS_HSVR_REQHDR_REQUESTMETHOD$ + varNames := @fm : "SCRIPT_NAME" ; varIndexes := @fm : PS_HSVR_REQHDR_SCRIPTNAME$ + varNames := @fm : "SERVER_NAME" ; varIndexes := @fm : PS_HSVR_REQHDR_SERVERNAME$ + varNames := @fm : "SERVER_PORT" ; varIndexes := @fm : PS_HSVR_REQHDR_SERVERPORT$ + varNames := @fm : "SERVER_PROTOCOL" ; varIndexes := @fm : PS_HSVR_REQHDR_SERVERPROTOCOL$ + varNames := @fm : "SERVER_SOFTWARE" ; varIndexes := @fm : PS_HSVR_REQHDR_SERVERSOFTWARE$ + varNames := @fm : "SERVER_URL" ; varIndexes := @fm : PS_HSVR_REQHDR_SERVERURL$ + + content = "" + content<-1> = "" + content<-1> = "" + content<-1> = "" + + content<-1> = "Environment Variables" + content<-1> = "" + content<-1> = "" + + xCount = fieldCount( varNames, @fm ) + for x = 1 to xCount + row = "" + row := "" + + content<-1> = row + next + + content<-1> = "
NameValue
" : varNames : "" : requestHeaders> : "
" + + content<-1> = "
" + content<-1> = "
" + + content<-1> = "Request Headers" + content<-1> = "" + content<-1> = "" + + xCount = fieldCount( requestHeaders, @vm ) + for x = 1 to xCount + row = "" + row := "" + + content<-1> = row + + next + content<-1> = "
Header NameHeader Value
" : requestHeaders : "" : requestHeaders : "
" + + content<-1> = "
" + content<-1> = "
" + + content<-1> = "Query Details" + content<-1> = "" + content<-1> = "" + + xCount = fieldCount( requestHeaders, @vm ) + for x = 1 to xCount + row = "" + row := "" + + content<-1> = row + + next + content<-1> = "
Query NameQuery Value
" : requestHeaders : "" : requestHeaders : "
" + + content<-1> = "
" + content<-1> = "
" + + content<-1> = "Cookie Details" + content<-1> = "" + content<-1> = "" + + xCount = fieldCount( requestHeaders, @vm ) + for x = 1 to xCount + row = "" + row := "" + + content<-1> = row + + next + content<-1> = "
Cookie NameCookie Value
" : requestHeaders : "" : requestHeaders : "
" + + // Add the request content - encode it to make sure it's safe to embed in + // the returned HTML + content<-1> = "
" + content<-1> = "
" + content<-1> = "Request Content" + content<-1> = "
" + + content<-1> = rti_XMLEncode( @httpServer->GetRequestContent( requestID ) ) + + content<-1> = "" + content<-1> = "" + + convert @fm to LF$ in content + + @httpServer->SetResponseContent( requestID, content ) + @httpServer->SetResponseHeader( requestID, "Content-Type", "text/html" ) + +return TRUE$ diff --git a/SYSPROG/STPROC/IFX_LDAP_GROUPS_FOR_USER.txt b/SYSPROG/STPROC/IFX_LDAP_GROUPS_FOR_USER.txt new file mode 100644 index 0000000..1a65bbd --- /dev/null +++ b/SYSPROG/STPROC/IFX_LDAP_GROUPS_FOR_USER.txt @@ -0,0 +1,73 @@ +Compile Function IFX_LDAP_GROUPS_FOR_USER(inUser, inDomain) + +$Insert REVDOTNETEQUATES + +Declare subroutine Set_Property.Net +Declare Function Active_Directory_Services, Unassigned, RetStack, GetNetworkUsername + + Ans = '' + If Not(Unassigned(inUser)) Then + If Unassigned(inUser) Then inUser = '' + If inUser = '' Then inUser = GetNetworkUsername() + If Unassigned(inDomain) Then inDomain = '' + If inDomain Eq '' Then inDomain = Active_Directory_Services('GetComputerDomain') + Domain = inDomain + Username = inUser + ADGroups = '' + DotNetHandle = StartDotNet("","4.0") + DotNetDir = CheckDotNet('4.0'):'\' + AccountMgmtDllPath = DotNetDir:'System.DirectoryServices.AccountManagement.dll' + Set_Property.Net(DotNetHandle, "AssemblyName", AccountMgmtDllPath) + If Not(Get_Status(errCode)) then + Params = 'Domain':@FM:Domain + ParamTypes = 'System.DirectoryServices.AccountManagement.ContextType':@FM:'System.String' + objPC = Create_Class.Net(DotNetHandle, "System.DirectoryServices.AccountManagement.PrincipalContext", 0, Params, ParamTypes) + If Not(Get_Status(errCode)) then + objUserPrincipal = Create_Class.Net(DotNetHandle, "System.DirectoryServices.AccountManagement.UserPrincipal", 0, objPC, 'RevDotNet') + If Not(Get_Status(errCode)) then + Set_Property.Net(objUserPrincipal, 'Name', Username) + objPrinSearcher = Create_Class.Net(DotNetHandle, "System.DirectoryServices.AccountManagement.PrincipalSearcher", 0, objUserPrincipal, 'RevDotNet') + If Not(Get_Status(errCode)) then + objPrin = Send_Message.Net(objPrinSearcher, 'FindOne', '', '', 1) + If Not(Get_Status(errCode)) then + Name = Get_Property.Net(objPrin, 'Name', 0) + objPrinSearchResult = Send_Message.Net(objPrin, 'GetGroups', '', '', 1) + If Not(Get_Status(errCode)) then + objEnum = Send_Message.Net(objPrinSearchResult, 'GetEnumerator', '', '', 1) + If Not(Get_Status(errCode)) then + Loop + Done = Send_Message.Net(objEnum, 'MoveNext', '', '', 0) + Until Done EQ 'False' + If Not(Get_Status(errCode)) then + objCurrPrin = Get_Property.Net(objEnum, 'Current', 1) + If Not(Get_Status(errCode)) then + CurrPrinName = Get_Property.Net(objCurrPrin, 'Name', 0) + If CurrPrinName NE 'Domain Users' then + Locate CurrPrinName in ADGroups using @FM setting fPos else + ADGroups<-1> = CurrPrinName + end + end + Free_Class.Net(objCurrPrin) + end + end + Repeat + Free_Class.Net(objEnum) + end + Free_Class.Net(objPrinSearchResult) + end + Free_Class.Net(objPrin) + end + Free_class.Net(objPrinSearcher) + end + Free_Class.Net(objUserPrincipal) + end + Free_Class.Net(objPC) + end + End + Free_Class.Net() + Ans = ADGroups + End + + Swap @FM With @VM In Ans + +Return Ans diff --git a/SYSPROG/STPROC/INETAPI_FINDMIMETYPE_HELPER.txt b/SYSPROG/STPROC/INETAPI_FINDMIMETYPE_HELPER.txt new file mode 100644 index 0000000..1e2f4cc --- /dev/null +++ b/SYSPROG/STPROC/INETAPI_FINDMIMETYPE_HELPER.txt @@ -0,0 +1,9 @@ +Function INETAPI_FINDMIMETYPE_HELPER(fileType) +* Helper Function To Return user-specified mime types +* +RSLT = "" +* example: +* IF fileType _eqc "jpg" then rslt = "image/jpeg" +* +Return rslt + diff --git a/SYSPROG/STPROC/INET_ABORTED.txt b/SYSPROG/STPROC/INET_ABORTED.txt new file mode 100644 index 0000000..63bc5d7 --- /dev/null +++ b/SYSPROG/STPROC/INET_ABORTED.txt @@ -0,0 +1,38 @@ +function INET_Aborted(Request, ProcErr) + +*************************************************************************** +* Project : OpenInsight for Internet +* +* Name : INET_Aborted +* Description: Called when an INET procedure has crashed and the Internet +* Gateway recovers. +* +* Warning! : This procedure MUST NOT fail (i.e. go to the debugger) or +* the Internet Services Gateway will be halted or go into an +* infinite loop. The Gateway has no way to auto-recover from +* a failure in this procedure! +* +* Returns : An HTML error message. +* +*************************************************************************** + +$insert Logical +$insert Inet_Equates +$insert Msg_Equates +$Insert inet_headers + +declare function INET_Msg + + if assigned(ProcErr) then + convert \00\:@fm:@vm:@svm to @tm:@tm:@tm:@tm in ProcErr + end else + ProcErr = '' + end + response = '' + response = 'Fatal error while processing request':@tm:@tm:ProcErr + response = 'OpenInsight -- Server Error' + + outmsg = Inet_Msg('', response) + Call inetapi_setstatus("500") + Return outmsg + diff --git a/SYSPROG/STPROC/INET_FINALIZE.txt b/SYSPROG/STPROC/INET_FINALIZE.txt new file mode 100644 index 0000000..f490738 --- /dev/null +++ b/SYSPROG/STPROC/INET_FINALIZE.txt @@ -0,0 +1,23 @@ +subroutine INET_Finalize(Request, Response) + +*************************************************************************** +* Project : OpenInsight for Internet +* +* Name : INET_Finalize +* Description: Finalization of response to a request. +* +* Parameters: +* Request [in/out] -- HTTP request (see INET_EQUATES) +* Response [in/out] -- Response to request +* +*************************************************************************** + +$insert Logical +$insert Inet_Equates + +* put your response finalization code here +* ... + +Call Log_Inet_Transactions(Request) + +return diff --git a/SYSPROG/STPROC/INET_SECURITY.txt b/SYSPROG/STPROC/INET_SECURITY.txt new file mode 100644 index 0000000..cc07a6f --- /dev/null +++ b/SYSPROG/STPROC/INET_SECURITY.txt @@ -0,0 +1,40 @@ +function INET_Security(Request, FnName) + +*************************************************************************** +* Project : OpenInsight for Internet +* +* Name : INET_Security +* Description: Security check point for a request +* +* Parameters: +* Request [in/out] -- HTTP request (see INET_EQUATES) +* FnName [in/out] -- name of a function that is +* about to be executed (starts with INET_) +* returns [out] -- emty string to allow request or +* message in html format to stop the request +* and pass it back to a client +* +* Note: +* Parameters "Request" and "Function" are passed by reference +* which makes it possible to change the function name and/or +* request parameters on a fly by intelligent security procedure +* +*************************************************************************** + +$insert Logical +$insert Inet_Equates + +declare subroutine Send_Event + + HtmlMessage = '' ;* assume success + + * put your authorization check code here + * ... + * + + * if authorization failed -- log the failure + if len(HtmlMessage) then + Send_Event(GS_MONITOR$, 'OMNIEVENT', 'OUTCOMING', 'Authorization failed') + end + + return HtmlMessage diff --git a/SYSPROG/STPROC/LOGGING_SERVICES.txt b/SYSPROG/STPROC/LOGGING_SERVICES.txt new file mode 100644 index 0000000..13e6276 --- /dev/null +++ b/SYSPROG/STPROC/LOGGING_SERVICES.txt @@ -0,0 +1,506 @@ +Function Logging_Services(@Service, @Params) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Logging_Services + + Description : Handler program for all module related services. + + Notes : The generic parameters should contain all the necessary information to process the services. Often + this will be information like the data Record and Key ID. + + Parameters : + Service [in] -- Name of the service being requested + Param1-10 [in/out] -- Additional request parameter holders + Response [out] -- Response to be sent back to the Controller (MCP) or requesting procedure + + Metadata : + + History : (Date, Initials, Notes) + 08/30/17 dmb Original programmer. + 02/17/18 dmb Use the new named cache feature of Memory_Services so logging data is protected when other + processes release a cache table. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert SERVICE_SETUP +$insert SRPMail_Inserts + +Equ CRLF$ to \0D0A\ +Equ CR$ to \0D\ +Equ LF$ to \0A\ +Equ TAB$ to \09\ +Equ COMMA$ to ',' + +Common /LogginServices/ Unused1@, Unused2@, Unused3@, Unused4@, Unused5@, Unused6@, Unused7@, Unused8@ + +Declare function Logging_Services, Memory_Services, SRP_Hash, SRP_Path, SRP_Send_Mail, Environment_Services +Declare subroutine Logging_Services, Memory_Services, SetInitDirOptions + +GoToService else + Error_Services('Add', Service : ' is not a valid service request within the Logging services module.') +end + +Return Response OR '' + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Service Parameter Options +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +Options BOOLEAN = True$, False$ + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Services +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// NewLog +// +// LogPath - Path to where the log file is located. - [Required] +// LogFileName - Name of the log file. - [Required] +// RowDelimiter - Delimiter used to separate each log row. Default is CR/LF. - [Optional] +// ColumnDelimiter - Delimiter used to separate each column value. If ColumnWidths is empty then this will default to a +// comma. - [Optional] +// ColumnHeaders - @FM list of Column headers to use in the log file. Default is no column headers will be used. +// - [Optional] +// ColumnWidths - @FM list of Column widths for each column data value. If empty then the entire column value will +// be stored. - [Optional] +// QuoteValues - Boolean flag to indicate if column values should be quoted. Default is false. - [Optional] +// ClearLog - Boolean flag to indicate if any existing log file should be cleared. Default is false. +// - [Optional] +// +// Returns an object handle to a log file. +//---------------------------------------------------------------------------------------------------------------------- +Service NewLog(LogPath, LogFileName, RowDelimiter, ColumnDelimiter, ColumnHeaders, ColumnWidths, QuoteValues=BOOLEAN, ClearLog=BOOLEAN) + + objLog = '' + + If (LogPath NE '') AND (LogFileName NE '') then + If SRP_Path('Exists', LogPath) then + LogFullPath = SRP_Path('Combine', LogPath, LogFileName) + If LogFullPath[1, 1] EQ '\' AND LogFullPath[2, 1] NE '\' then LogFullPath = '\' : LogFullPath + objLog = SRP_Hash(LogFullPath, 'SHA-1', 'BASE32') + Memory_Services('SetValue', objLog : '*LogPath', LogPath, ServiceModule) + Memory_Services('SetValue', objLog : '*LogFileName', LogFileName, ServiceModule) + Memory_Services('SetValue', objLog : '*LogFullPath', LogFullPath, ServiceModule) + If Dir(LogFullPath) NE '' then + If ClearLog then + Logging_Services('CreateLogFile', objLog) + end + end else + Logging_Services('CreateLogFile', objLog) + end + If Error_Services('NoError') then + If RowDelimiter EQ '' then RowDelimiter = CRLF$ + Memory_Services('SetValue', objLog : '*RowDelimiter', RowDelimiter, ServiceModule) + If (ColumnDelimiter EQ '') AND (ColumnWidths EQ '') then ColumnDelimiter = COMMA$ + Memory_Services('SetValue', objLog : '*ColumnDelimiter', ColumnDelimiter, ServiceModule) + Memory_Services('SetValue', objLog : '*ColumnHeaders', ColumnHeaders, ServiceModule) + Memory_Services('SetValue', objLog : '*ColumnWidths', ColumnWidths, ServiceModule) + If QuoteValues NE True$ then QuoteValues = False$ + Memory_Services('SetValue', objLog : '*QuoteValues', QuoteValues, ServiceModule) + If Dir(LogFullPath)<1> EQ 0 AND ColumnHeaders NE '' then + // Add the column headers since this is a new log file. + Logging_Services('AppendLog', objLog, ColumnHeaders, '', @FM, True$) + end + end + end else + Error_Services('Add', LogPath : ' does not exist.') + end + end else + Error_Services('Add', 'LogPath or LogFileName argument was missing from the ' : Service : ' service.') + end + + Response = objLog + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// AppendLog +// +// objLog - Object handle to the log file. - [Required] +// LogData - Data to be appended to the log file. - [Required] +// IncomingRowDelimiter - Delimiter used to separate each log row coming in. This allows incoming log data to have +// a different delimiter than what will be used in the log file. Default is the RowDelimiter +// used for appending the log data. - [Optional] +// IncomingColumnDelimiter - Delimiter used to separate each column value in the log data. This allows incoming log +// data to have a different delimiter than what will be used in the log file. Default is the +// column delimiter used to separate the log data or a comma if fixed widths only are +// indicated. - [Optional] +// IgnoreColumnHeaders - Boolean flag to indicate if the service should attempt to add column headers to an empty +// log file. Default is false. - [Optional] +// EmailAddresses - Comma delimited list of email addresses that should be notified when this log is appended. +// - [Optional] +// EmailMessage - Message to be sent to the email addresses. +// +// Appends data to the log file associated with the indicated log object handle. +//---------------------------------------------------------------------------------------------------------------------- +Service AppendLog(objLog, LogData, IncomingRowDelimiter, IncomingColumnDelimiter, IgnoreColumnHeaders, EmailAddresses, EmailMessage) + + If (objLog NE '') AND (LogData NE '') then + If IgnoreColumnHeaders NE True$ then IgnoreColumnHeaders = False$ + LogFullPath = Logging_Services('GetLogFullPath', objLog) + ColumnDelimiter = Logging_Services('GetColumnDelimiter', objLog) + LenColDel = Len(ColumnDelimiter) + ColumnHeaders = Logging_Services('GetColumnHeaders', objLog) + ColumnWidths = Logging_Services('GetColumnWidths', objLog) + QuoteValues = Logging_Services('GetQuoteValues', objLog) + RowDelimiter = Logging_Services('GetRowDelimiter', objLog) + If IncomingRowDelimiter EQ '' then IncomingRowDelimiter = RowDelimiter + If (IncomingColumnDelimiter EQ '') AND (ColumnWidths EQ '') then IncomingColumnDelimiter = ColumnDelimiter + LenRowDel = Len(RowDelimiter) + FileInfo = Dir(LogFullPath) + FileSize = FileInfo<1> + Status() = 0 + OutData = '' + OSOpen LogFullPath to hFile then + If (FileSize EQ 0) AND (ColumnHeaders NE '') AND (Not(IgnoreColumnHeaders)) then + Logging_Services('AppendLog', objLog, ColumnHeaders, @RM, @FM, True$) + end + For Each RowData in LogData using IncomingRowDelimiter + If RowData NE '' then + For Each ColumnData in RowData using IncomingColumnDelimiter setting cPos + If ColumnWidths NE '' then + ColumnWidth = ColumnWidths + ColumnData = ColumnData[1, ColumnWidth] : Str(' ', ColumnWidth - Len(ColumnData)) + end + If QuoteValues then + Swap '"' with '""' in ColumnData ; // Encode the quotes properly. + ColumnData = Quote(ColumnData) + end + OutData := ColumnData : ColumnDelimiter + Next ColumnData + OutData[Neg(LenColDel), LenColDel] = '' ; // Strip off the last column delimiter. + OutData := RowDelimiter ; // Append a row delimiter. + end + Next LogRow + OutData[Neg(LenRowDel), LenRowDel] = '' ; // Strip off the last row delimiter. + If (FileSize NE 0) then OutData = RowDelimiter : OutData ; // Prepend a row delimiter since there is existing data. + OSBWrite OutData to hFile at FileSize + OSError = Status() + If OSError then + Error_Services('Add', 'OSBWrite error code ' : OSError : ' in the ' : Service : ' service.') + end + OSClose hFile + end else + OSError = Status() + Error_Services('Add', 'OSOpen error code ' : OSError : ' in the ' : Service : ' service.') + end + + end else + Error_Services('Add', 'objLog argument was missing from the ' : Service : ' service.') + end + + If EmailAddresses NE '' then + GoSub EmailMessage + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetLogPath +// +// objLog - Object handle to the log file. - [Required] +// +// Returns the path for the log file associated with the indicated log object handle. This will not include the name of +// the log file itself. +//---------------------------------------------------------------------------------------------------------------------- +Service GetLogPath(objLog) + + LogPath = '' + + If objLog NE '' then + LogPath = Memory_Services('GetValue', objLog : '*LogPath', '', '', ServiceModule) + If LogPath EQ '' then + Error_Services('Add', 'Log path not found in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'objLog argument was missing from the ' : Service : ' service.') + end + + Response = LogPath + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetLogFileName +// +// objLog - Object handle to the log file. - [Required] +// +// Returns the file name for the log file associated with the indicated log object handle. This will not include the +// path to where the log file is located. +//---------------------------------------------------------------------------------------------------------------------- +Service GetLogFileName(objLog) + + LogFileName = '' + + If objLog NE '' then + LogFileName = Memory_Services('GetValue', objLog : '*LogFileName', '', '', ServiceModule) + If LogFileName EQ '' then + Error_Services('Add', 'Log file name not found in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'objLog argument was missing from the ' : Service : ' service.') + end + + Response = LogFileName + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetLogFullPath +// +// objLog - Object handle to the log file. - [Required] +// +// Returns the full path for the log file associated with the indicated log object handle. +//---------------------------------------------------------------------------------------------------------------------- +Service GetLogFullPath(objLog) + + LogFullPath = '' + + If objLog NE '' then + LogFullPath = Memory_Services('GetValue', objLog : '*LogFullPath', '', '', ServiceModule) + If LogFullPath EQ '' then + Error_Services('Add', 'Log full path not found in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'objLog argument was missing from the ' : Service : ' service.') + end + + Response = LogFullPath + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetRowDelimiter +// +// objLog - Object handle to the log file. - [Required] +// +// Returns the delimiter to use to separate each row in the log. +//---------------------------------------------------------------------------------------------------------------------- +Service GetRowDelimiter(objLog) + + RowDelimiter = '' + + If objLog NE '' then + RowDelimiter = Memory_Services('GetValue', objLog : '*RowDelimiter', '', '', ServiceModule) + If RowDelimiter EQ '' then + Error_Services('Add', 'Row delimiter not found in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'objLog argument was missing from the ' : Service : ' service.') + end + + Response = RowDelimiter + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetColumnDelimiter +// +// objLog - Object handle to the log file. - [Required] +// +// Returns the delimiter to use to separate each column in the log. +//---------------------------------------------------------------------------------------------------------------------- +Service GetColumnDelimiter(objLog) + + ColumnDelimiter = '' + + If objLog NE '' then + ColumnDelimiter = Memory_Services('GetValue', objLog : '*ColumnDelimiter', '', '', ServiceModule) + If ColumnDelimiter EQ '' then + Error_Services('Add', 'Column delimiter not found in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'objLog argument was missing from the ' : Service : ' service.') + end + + Response = ColumnDelimiter + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetColumnHeaders +// +// objLog - Object handle to the log file. - [Required] +// +// Returns the column headers that should be in the log. +//---------------------------------------------------------------------------------------------------------------------- +Service GetColumnHeaders(objLog) + + ColumnHeaders = '' + + If objLog NE '' then + ColumnHeaders = Memory_Services('GetValue', objLog : '*ColumnHeaders', '', '', ServiceModule) + end else + Error_Services('Add', 'objLog argument was missing from the ' : Service : ' service.') + end + + Response = ColumnHeaders + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetColumnWidths +// +// objLog - Object handle to the log file. - [Required] +// +// Returns the column widths that should be used to truncate or pad each column in the log. +//---------------------------------------------------------------------------------------------------------------------- +Service GetColumnWidths(objLog) + + ColumnWidths = '' + + If objLog NE '' then + ColumnWidths = Memory_Services('GetValue', objLog : '*ColumnWidths', '', '', ServiceModule) + end else + Error_Services('Add', 'objLog argument was missing from the ' : Service : ' service.') + end + + Response = ColumnWidths + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetQuoteValues +// +// objLog - Object handle to the log file. - [Required] +// +// Returns the flag to indicate whether column values should be quoted or not. +//---------------------------------------------------------------------------------------------------------------------- +Service GetQuoteValues(objLog) + + QuoteValues = '' + + If objLog NE '' then + QuoteValues = Memory_Services('GetValue', objLog : '*QuoteValues', '', '', ServiceModule) + If QuoteValues NE True$ then QuoteValues = False$ + end else + Error_Services('Add', 'objLog argument was missing from the ' : Service : ' service.') + end + + Response = QuoteValues + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// CreateLogFile +// +// objLog - Object handle to the log file. - [Required] +// +// Creates (or clears out) a log file associated with the indicated log object handle. +//---------------------------------------------------------------------------------------------------------------------- +Service CreateLogFile(objLog) + + If objLog NE '' then + LogFullPath = Logging_Services('GetLogFullPath', objLog) + If Error_Services('NoError') then + Status() = 0 + OSWrite '' to LogFullPath + Status = Status() + If Status GT 0 then + Error_Services('Add', 'Unable to clear ' : LogFullPath : ' in the ' : Service : ' service.') + end + end + end else + Error_Services('Add', 'objLog argument was missing from the ' : Service : ' service.') + end + +end service + + +Service CleanLogFolders(NumDays) + + FileExclusionList = 'Canary.txt':@VM:'Canary.vbs' + AppRootPath = Environment_Services('GetApplicationRootPath') + LogPath = AppRootPath : '\LogFiles\' + SetInitDirOptions("D") + InitDir LogPath:'*' + FolderList = DirList() + // Remove . directory listing + FolderList = Delete(FolderList, 1, 0, 0) + // Remove .. directory listing + FolderList = Delete(FolderList, 1, 0, 0) + Today = Date() + SetInitDirOptions("") + For each Folder in FolderList + FolderPath = LogPath:Folder:'\' + InitDir FolderPath:'*' + FileList = DirList() + If FileList NE '' then + For each Filename in FileList + Locate FileName in FileExclusionList using @VM setting vPos else + FilePath = FolderPath:Filename + FileInfo = Dir(FilePath) + LastWriteDate = FileInfo<2> + FileAge = Today - LastWriteDate + If FileAge GT NumDays then + OSDelete FilePath + end + end + Next Filename + end + Next Folder + +end service + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Internal GoSubs +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +EmailMessage: + + Done = False$ + Error = False$ + MsgSent = '' + + ConfigFile = '' + ConfigFile<1> = SendUsing_Port$ + ConfigFile<2> = '' + ConfigFile<3> = 25 ; // Server port + *ConfigFile<4> = 'appmail.eu.infineon.com' ; // Mail server + ConfigFile<4> = 'mailrelay-external.infineon.com' ; // Mail server + ConfigFile<5> = True$ ; // Authenticate + ConfigFile<6> = 'oinotify@infineon.com' ; // Username + ConfigFile<7> = 'oinotify1' ; // Password + ConfigFile<8> = False$ ; // Use SSL + + If EmailMessage EQ '' then + EmailMessage = LogData : \0D0A0D0A\ : RetStack()<2> + end else + EmailMessage := \0D0A0D0A\ : LogData : \0D0A0D0A\ : RetStack()<2> + end + + SentFrom = '' + SentTo = '' + Message = '' + Message<1> = 'AppendLog Message' ; // Subject + Message<2> = 'oinotify@infineon.com' ; // From (email address) + Message<3> = EmailAddresses ; // Send to (email address) + Message<5> = '' ; // Blind Carbon Copy (email address) + Message<6> = '' ; // Reply To (email address) + Message<7> = 'TEXT' ; // Content Type (TEXT or HTML) + Message<8> = EmailMessage ; // Content / Body + Message<9> = '' ; // Attachment(s) (path to file name(s)) + + Result = SRP_Send_Mail(Message, ConfigFile) + +return + diff --git a/SYSPROG/STPROC/LOG_INET_TRANSACTIONS.txt b/SYSPROG/STPROC/LOG_INET_TRANSACTIONS.txt new file mode 100644 index 0000000..d70d84c --- /dev/null +++ b/SYSPROG/STPROC/LOG_INET_TRANSACTIONS.txt @@ -0,0 +1,17 @@ +Subroutine Log_Inet_Transactions(Request) + +$Insert Inet_Equates + +Open 'INET_LOG' To f_inet_log Then + log_record = '' + DATE = date() + time = time() + id = date:'.':time + log_record<1> = request + log_record<2> = request + log_record<3> = request<12> + write log_record On f_inet_log, id Else null +End + + +return diff --git a/SYSPROG/STPROC/MEMORY_SERVICES.txt b/SYSPROG/STPROC/MEMORY_SERVICES.txt new file mode 100644 index 0000000..f008d92 --- /dev/null +++ b/SYSPROG/STPROC/MEMORY_SERVICES.txt @@ -0,0 +1,408 @@ +Function Memory_Services(@Service, @Params) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Memory_Services + + Description : Handler program for all module related services. + + Notes : The generic parameters should contain all the necessary information to process the services. Often + this will be information like the data Record and Key ID. + + Parameters : + Service [in] -- Name of the service being requested + Error [out] -- Any errors that were created + Param1-10 [in/out] -- Additional request parameter holders + Response [out] -- Response to be sent back to the Controller (MCP) or requesting procedure + + History : (Date, Initials, Notes) + 03/29/13 dmb [SRPFW-9] Original programmer. + 08/01/13 dmb [SRPFW-16] Add PM_CURRENT_IMAGE_PATH as an option to the GETVALUES list. + 10/01/13 dmb [SRPFW-18] Replace APP_INSERTS with LOGICAL and declare Error_Services. - + 10/05/13 dmb [SRPFW-18] Add the RemoveKey service. + 11/06/14 dmb [SRPFW-79] Add support to tag cached data with a time marker in the SetValue service so + subsequent GetValue calls can avoid using data that might be too old. + 10/29/17 dmb Retrofit to use Enhanced BASIC+. + 02/17/18 dmb Add support to name specific memory service caches. This was to allow some memory service + data to be protect from the ReleaseHashTable service. All services will default to the + general cache if no cache name is specified. Added ReleaseAllHashTables to clear all caches. + 09/25/19 dmb [SRPFW-278] Update all services that support named caches so that whenever the named cache + doesn't exist it will create one automatically rather than default to the primary cache. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert SERVICE_SETUP + +Common /MemoryServices/ MemoryServicesManagers@, MemoryCacheNames@, Unused3@, Unused4@, Unused5@, Unused6@ + +Equ Day$ to 86400 ; // Seconds in one day. + +// Self referencing declarations. +Declare function Memory_Services +Declare subroutine Memory_Services, Error_Services +// SRP FastArray declarations. +Declare function SRP_FastArray_Count, SRP_FastArray_Create, SRP_FastArray_Extract, SRP_FastArray_GetVariable, +Declare subroutine SRP_FastArray_Delete, SRP_FastArray_Insert, SRP_FastArray_InsertFromList, SRP_FastArray_Release, SRP_FastArray_Replace, SRP_FastArray_ReplaceWithList +// SRP HashTable declarations. +Declare function SRP_HashTable_Create, SRP_HashTable_Contains, SRP_HashTable_Count, SRP_HashTable_Get, SRP_HashTable_GetKeys, SRP_HashTable_GetValues, SRP_HashTable_GetKeyValuePairs +Declare subroutine SRP_HashTable_Set, SRP_HashTable_Release, SRP_HashTable_Remove +// SRP List declarations. +Declare function SRP_List_Create, SRP_List_CreateFromFastArray, SRP_List_Count, SRP_List_GetAt, SRP_List_GetVariable, SRP_List_Locate +Declare subroutine SRP_List_Add, SRP_List_InsertAt, SRP_List_Release, SRP_List_RemoveAt, SRP_List_SetAt +// SRP Array declarations. +Declare function SRP_Clean_Array, SRP_Join_Arrays, SRP_Reorder_Array, SRP_Rotate_Array, SRP_Sort_Array + +GoToService else + Error_Services('Add', Service : ' is not a valid service request within the ' : ServiceModule : ' module.') +end + +Return Response OR '' + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Service Parameter Options +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +Options BOOLEAN = True$, False$ + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Services +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// KeyExists +// +// Returns a True or False depending on whether the Key ID exists. +//---------------------------------------------------------------------------------------------------------------------- +Service KeyExists(KeyID, CacheName) + + KeyExists = False$ ; // Assume it does not exist for now. + + If Len(KeyID) then + If CacheName EQ '' then + HandlePos = 1 + end else + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + // The named cache does not exist so create it now. + Memory_Services('CreateHashTable', CacheName) + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + HandlePos = 1 + end + end + end + If Len(MemoryServicesManagers@) then + KeyExists = SRP_HashTable_Contains(MemoryServicesManagers@, KeyID) + end + end else + Error_Services('Set', 'Key ID did not contain a value in the KeyExists service request.') + end + + Response = KeyExists + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetValue +// +// Returns the value pair stored in the SRP Hash Table for the current Key ID. If the NotExpired flag is set, the +// ExpirationDuration will be used to compare against the last time marker set for the current data. +//---------------------------------------------------------------------------------------------------------------------- +Service GetValue(KeyID, NotExpired, ExpirationDuration, CacheName) + + Value = '' ; // Assume the value is null for now. + + If Len(KeyID) then + If CacheName EQ '' then + HandlePos = 1 + end else + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + // The named cache does not exist so create it now. + Memory_Services('CreateHashTable', CacheName) + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + HandlePos = 1 + end + end + end + If Len(MemoryServicesManagers@) then + If NotExpired then + CurrMarker = (Date() * Day$) + Time() + PrevMarker = SRP_HashTable_Get(MemoryServicesManagers@, 'TIMEMARKER*' : KeyID) + If (CurrMarker - PrevMarker) LT ExpirationDuration then + Value = SRP_HashTable_Get(MemoryServicesManagers@, KeyID) + end + end else + Value = SRP_HashTable_Get(MemoryServicesManagers@, KeyID) + end + end + end else + Error_Services('Set', 'Key ID did not contain a value in the GetValue service request.') + end + + Response = Value + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetValue +// +// Updates the value pair stored in the SRP Hash Table for the current Key ID. +//---------------------------------------------------------------------------------------------------------------------- +Service SetValue(KeyID, Value, CacheName) + + If Len(KeyID) then + // If the Memory Services's hash table does not yet exist then create it now. + If CacheName EQ '' then + HandlePos = 1 + end else + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + // The named cache does not exist so create it now. + Memory_Services('CreateHashTable', CacheName) + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + HandlePos = 1 + end + end + end + If Len(MemoryServicesManagers@) else + Memory_Services('CreateHashTable', CacheName) + end + SRP_HashTable_Set(MemoryServicesManagers@, KeyID, Value) + // Set a time marker for this data in case future GetValue services need to know how old the data is. + TimeMarker = (Date() * Day$) + Time() + SRP_HashTable_Set(MemoryServicesManagers@, 'TIMEMARKER*' : KeyID, TimeMarker) + end else + Error_Services('Set', 'Key ID did not contain a value in the SetValue service request.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// IsValueExpired +// +// Returns a Boolean flag indicated whether the current value for the indicated KeyID has expired. This relies upon the +// time marker set using the SetValue service. If this value has net yet been set then the value will be considered as +// expired. +//---------------------------------------------------------------------------------------------------------------------- +Service IsValueExpired(KeyID, ExpirationDuration, ResetAge, CacheName) + + If Not(Num(ExpirationDuration)) then ExpirationDuration = 0 + ValueExpired = True$ ; // Assume the value has expired for now. + If ResetAge NE True$ then ResetAge = False$ ; // Default is false unless otherwise specified. + + If Len(KeyID) AND (ExpirationDuration GT 0) then + If CacheName EQ '' then + HandlePos = 1 + end else + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + // The named cache does not exist so create it now. + Memory_Services('CreateHashTable', CacheName) + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + HandlePos = 1 + end + end + end + If Len(MemoryServicesManagers@) then + PrevMarker = SRP_HashTable_Get(MemoryServicesManagers@, 'TIMEMARKER*' : KeyID) + If PrevMarker NE '' then + TimeMarker = (Date() * Day$) + Time() + If (TimeMarker - PrevMarker) LE ExpirationDuration then + ValueExpired = False$ + If ResetAge EQ True$ then + SRP_HashTable_Set(MemoryServicesManagers@, 'TIMEMARKER*' : KeyID, TimeMarker) + end + end + end + end + end else + Error_Services('Set', 'KeyID or ExpirationDuraton was missing in the IsValueExpired service.') + end + + Response = ValueExpired + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// IsValueCurrent +// +// Returns a Boolean flag indicated whether the current value for the indicated KeyID is still current. This relies upon the +// time marker set using the SetValue service. If this value has net yet been set then the value will be considered as +// expired. +//---------------------------------------------------------------------------------------------------------------------- +Service IsValueCurrent(KeyID, ExpirationDuration, ResetAge, CacheName) + + If Not(Num(ExpirationDuration)) then ExpirationDuration = 0 + ValueCurrent = False$ ; // Assume the value is not current for now. + If ResetAge NE True$ then ResetAge = False$ ; // Default is false unless otherwise specified. + + If Len(KeyID) AND (ExpirationDuration GT 0) then + If CacheName EQ '' then + HandlePos = 1 + end else + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + // The named cache does not exist so create it now. + Memory_Services('CreateHashTable', CacheName) + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + HandlePos = 1 + end + end + end + If Len(MemoryServicesManagers@) then + PrevMarker = SRP_HashTable_Get(MemoryServicesManagers@, 'TIMEMARKER*' : KeyID) + If PrevMarker NE '' then + TimeMarker = (Date() * Day$) + Time() + If (TimeMarker - PrevMarker) LE ExpirationDuration then + ValueCurrent = True$ + If ResetAge EQ True$ then + SRP_HashTable_Set(MemoryServicesManagers@, 'TIMEMARKER*' : KeyID, TimeMarker) + end + end + end + end + end else + Error_Services('Set', 'KeyID or ExpirationDuraton was missing in the IsValueCurrent service.') + end + + Response = ValueCurrent + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// RemoveKey +// +// Removes the Key ID, and its value pair, from the SRP Hash Table. +//---------------------------------------------------------------------------------------------------------------------- +Service RemoveKey(KeyID, CacheName) + + If Len(KeyID) then + // If the Memory Services's hash table does not yet exist then create it now. + If CacheName EQ '' then + HandlePos = 1 + end else + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + // The named cache does not exist so create it now. + Memory_Services('CreateHashTable', CacheName) + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else + HandlePos = 1 + end + end + end + If Len(MemoryServicesManagers@) then + SRP_HashTable_Remove(MemoryServicesManagers@, KeyID) + end + end else + Error_Services('Set', 'Key ID did not contain a value in the RemoveKey service request.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// CreateHashTable +// +// Creates the SRP Hash Table that the Memory_Services module will use to manage various Key ID and Value pairs. A +// check will first be made to see if the handle to the Hash Table already exists. If so then it will be released and +// a new Hash Table will be created. +//---------------------------------------------------------------------------------------------------------------------- +Service CreateHashTable(CacheName) + + If CacheName EQ '' then + HandlePos = 1 + If Len(MemoryServicesManagers@) then + Memory_Services('ReleaseHashTable') + end + end else + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos then + Memory_Services('ReleaseHashTable', CacheName) + end else + HandlePos = DCount(MemoryCacheNames@, @FM) + 1 + If HandlePos EQ 1 then HandlePos = 2 ; // Handle position 1 is reserved for the default cache. + end + end + + MemoryServicesManagers@ = SRP_HashTable_Create() + If HandlePos GT 1 then + MemoryCacheNames@ = CacheName + end + + Response = MemoryServicesManagers@ + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ReleaseHashTable +// +// Releases the SRP Hash Table handle. If CacheName is empty then the default handle is released. +//---------------------------------------------------------------------------------------------------------------------- +Service ReleaseHashTable(CacheName) + + HandlePos = '' + If CacheName EQ '' then + HandlePos = 1 + end else + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else Null + end + + If HandlePos GE 1 then + SRP_HashTable_Release(MemoryServicesManagers@) + MemoryServicesManagers@ = '' + MemoryCacheNames@ = '' + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ReleaseAllHashTables +// +// Releases all SRP Hash Table handles. +//---------------------------------------------------------------------------------------------------------------------- +Service ReleaseAllHashTables(CacheName) + + If MemoryServicesManagers@ NE '' then + For Each Handle in MemoryServicesManagers@ using @FM + If Handle NE '' then SRP_HashTable_Release(Handle) + Next Handle + end + MemoryServicesManagers@ = '' + MemoryCacheNames@ = '' + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetHandle +// +// Returns the handle to the SRP Hash Table used by Memory_Services. +//---------------------------------------------------------------------------------------------------------------------- +Service GetHandle(CacheName) + + HandlePos = '' + If CacheName EQ '' then + HandlePos = 1 + end else + Locate CacheName in MemoryCacheNames@ using @FM setting HandlePos else Null + end + + If HandlePos GE 1 then + Handle = MemoryServicesManagers@ + end + + Response = Handle + +end service + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Internal GoSubs +////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////? + diff --git a/SYSPROG/STPROC/MFS_CODENAME.txt b/SYSPROG/STPROC/MFS_CODENAME.txt new file mode 100644 index 0000000..b8af28d --- /dev/null +++ b/SYSPROG/STPROC/MFS_CODENAME.txt @@ -0,0 +1,9 @@ +Function MFS_CODENAME(code) + +names = "READ.RECORD,READO.RECORD,WRITE.RECORD,DELETE.RECORD,LOCK.RECORD,UNLOCK.RECORD,SELECT,READNEXT,CLEARSELECT" +names:= ",CLEARFILE,OPEN.FILE,CREATE.FILE,RENAME.FILE,MOVE.FILE,DELETE.FILE,OPEN.MEDIA,CREATE.MEDIA,READ.MEDIA,WRITE.MEDIA" +names:= ",UNLOCK.ALL,FLUSH,INSTALL,RESERVED,RESERVED,RESERVED,OMNI.SCRIPT,CLOSE.MEDIA,RECORD.COUNT,REMAKE.FILE,CREATE.INDEX,DELETE.INDEX,UPDATE.INDEX,SELECT.INDEX,READNEXT.INDEX" + +ans = Field(names, ',',code) + +Return ans diff --git a/SYSPROG/STPROC/MFS_SHELL1.txt b/SYSPROG/STPROC/MFS_SHELL1.txt new file mode 100644 index 0000000..c69486e --- /dev/null +++ b/SYSPROG/STPROC/MFS_SHELL1.txt @@ -0,0 +1,136 @@ +Subroutine MFS_SHELL1(CODE, BFS, HANDLE, NAME, FMC, RECORD, STATUS) + +/******************************* + + +÷ VERSION : 1.0 + +÷ PURPOSE : + +÷ AUTHOR : + +÷ CREATED : + +÷ PROCEDURES : + +*÷ WARNINGS : + +*÷ THEORY OF OPERATION : + +÷ REVISION HISTORY (Most CURRENT first) : + + DATE IMPLEMENTOR FUNCTION + -------- ----------- -------- + MM-DD-YY initials Modification + +*******************************/ + +*÷ COMMON Variables (Terminate with '%') : + +*÷ LABELED COMMON Variables (Terminate with '@') : + +*÷ EQUATE Variables (Terminate with '$') : + +EQU RTI$ TO 'Copyright (C) 1990-2023, Revelation Technologies, Inc.' +EQU TRUE$ TO 1 +EQU FALSE$ TO 0 +EQU YES$ TO 1 +EQU NO$ TO 0 +EQU OTHERWISE$ TO 1 +EQU NULL$ TO "" +EQU SPACE$ TO \20\ + +$INSERT FILE.SYSTEM.EQUATES +$INSERT FSERRORS_HDR + +*÷ MESSAGES called (Terminate with '$') : + +*÷ DECLARED - FUNCTIONS called : + +*÷ DECLARED - SUBROUTINES called : + +/******************************* +÷ INDIRECT - FUNCTIONS/SUBROUTINES called if known (Make COMMENTS) : +*******************************/ + +*÷÷ PROGRAM TOP + +FS = DELETE(BFS,1,1,1) +NEXTFS = FS<1,1,1> +@FILE.ERROR = "" + +$INSERT FILE.SYSTEM.ONGOSUB + +RETURN + +*---------------------------------------------------------------------------- +/* Put all the operations to capture in this section.*/ +*---------------------------------------------------------------------------- + +RETURN +*---------------------------------------------------------------------------- +/* Media operations */ +CREATE.MEDIA: +OPEN.MEDIA: +READ.MEDIA: +WRITE.MEDIA: +CLOSE.MEDIA: + +*---------------------------------------------------------------------------- +/* File oriented operations */ +CLEARFILE: +CREATE.FILE: +DELETE.FILE: +MOVE.FILE: +OPEN.FILE: +REMAKE.FILE: +RENAME.FILE: + +*---------------------------------------------------------------------------- +/* Select operations */ +SELECT: +READNEXT: +CLEARSELECT: + +*---------------------------------------------------------------------------- +/* Record oriented operations */ +READ.RECORD: +READO.RECORD: +WRITE.RECORD: +DELETE.RECORD: + +*---------------------------------------------------------------------------- +/* Lock operations */ +LOCK.RECORD: +UNLOCK.RECORD: + +*---------------------------------------------------------------------------- +/* Index operations */ +CREATE.INDEX: +UPDATE.INDEX: +DELETE.INDEX: +SELECT.INDEX: +READNEXT.INDEX: +RESERVED: + +*---------------------------------------------------------------------------- +/* Misc calls */ +OMNI.SCRIPT: +RECORD.COUNT: + +NEXT_FS: + +CALL @NEXTFS(CODE, FS, HANDLE, NAME, FMC, RECORD, STATUS) + +RETURN + +*---------------------------------------------------------------------------- +/* +Install, unlock all and flush are called directly, no need to call next FS. +*/ +INSTALL: +FLUSH: +UNLOCK.ALL: + +STATUS = TRUE$ +RETURN diff --git a/SYSPROG/STPROC/MFS_SHELL2.txt b/SYSPROG/STPROC/MFS_SHELL2.txt new file mode 100644 index 0000000..7cb50d1 --- /dev/null +++ b/SYSPROG/STPROC/MFS_SHELL2.txt @@ -0,0 +1,132 @@ +Subroutine MFS_SHELL2(CODE, BFS, HANDLE, NAME, FMC, RECORD, STATUS) + +**************************************************************** +* MFS shell for making Modified Filing Systems +* +* this program is similar to MFS.SHELL1, except it uses CASE logic to +* dispatch according to the value of the CODE argument. +* +* use this logic as the basis for your MFS. Insert the appropriate code +* under the correct case below. For example, if your MFS traps READs to +* a file, insert your trap code underneath the statement +* +* CASE CODE = READ.RECORD +* +* and with correct relationship (before or after) the statement: +* +* GOSUB NEXT.MFS +* +**************************************************************** + +EQU TRUE$ TO 1 +EQU FALSE$ TO 0 + +$Insert FILE.SYSTEM.EQUATES + + +*------------------- +BEGIN CASE + CASE CODE = READ.RECORD + GOSUB NEXT.MFS +* + CASE CODE = READO.RECORD + GOSUB NEXT.MFS +* + CASE CODE = WRITE.RECORD + GOSUB NEXT.MFS +* + CASE CODE = DELETE.RECORD + GOSUB NEXT.MFS +* + CASE CODE = LOCK.RECORD + GOSUB NEXT.MFS +* + CASE CODE = UNLOCK.RECORD + GOSUB NEXT.MFS +* + CASE CODE = SELECT + GOSUB NEXT.MFS +* + CASE CODE = READNEXT + GOSUB NEXT.MFS +* + CASE CODE = CLEARSELECT + GOSUB NEXT.MFS +* + CASE CODE = CLEARFILE + GOSUB NEXT.MFS +* + CASE CODE = OPEN.FILE + GOSUB NEXT.MFS +* + CASE CODE = CREATE.FILE + GOSUB NEXT.MFS +* + CASE CODE = RENAME.FILE + GOSUB NEXT.MFS +* + CASE CODE = MOVE.FILE + GOSUB NEXT.MFS +* + CASE CODE = DELETE.FILE + GOSUB NEXT.MFS +* + CASE CODE = OPEN.MEDIA + GOSUB NEXT.MFS +* + CASE CODE = CREATE.MEDIA + GOSUB NEXT.MFS +* + CASE CODE = READ.MEDIA + GOSUB NEXT.MFS +* + CASE CODE = WRITE.MEDIA + GOSUB NEXT.MFS +* + CASE CODE = UNLOCK.ALL + STATUS = TRUE$ +* + CASE CODE = FLUSH + STATUS = TRUE$ +* + CASE CODE = INSTALL + STATUS = TRUE$ +* + CASE CODE = RECORD.COUNT + GOSUB NEXT.MFS +* + CASE CODE = REMAKE.FILE + GOSUB NEXT.MFS +* + CASE CODE = CLOSE.MEDIA + GOSUB NEXT.MFS +* + CASE CODE = OMNI.SCRIPT + GOSUB NEXT.MFS +* + CASE CODE = CREATE.INDEX + GOSUB NEXT.MFS +* + CASE CODE = DELETE.INDEX + GOSUB NEXT.MFS +* + CASE CODE = UPDATE.INDEX + GOSUB NEXT.MFS +* + CASE CODE = SELECT.INDEX + GOSUB NEXT.MFS +* + CASE CODE = READNEXT.INDEX + GOSUB NEXT.MFS +* +END CASE + +RETURN '' + +* ------------------ +NEXT.MFS: + FS = DELETE(BFS,1,1,1) + NEXTFS = FS<1,1,1> + CALL @NEXTFS(CODE, FS, HANDLE, NAME, FMC, RECORD, STATUS) + +RETURN diff --git a/SYSPROG/STPROC/NULL_MFS.txt b/SYSPROG/STPROC/NULL_MFS.txt new file mode 100644 index 0000000..853a474 --- /dev/null +++ b/SYSPROG/STPROC/NULL_MFS.txt @@ -0,0 +1,130 @@ +Subroutine NULL_MFS(CODE, BFS, HANDLE, NAME, FMC, RECORD, STATUS) + +/* Name : SYSLISTS_MFS +* Description: +* Cache Temporary lists in memory to speed selects, reduce load on network, reduce GFE chances + +* Open -- put the cache number in the handle +* Read/Reado -- add the record to the cache +* write/delete/clear -- Update remote, local copy +* omnievent -- fullcache +* +* +* Side Effects: +* Search of lists file will not show temp lists +* + +*/ + +Declare Function RTI_HASHTABLE2, RTI_MD5,RTI_crc32, rti_memcached +Declare Subroutine RTI_HASHTABLE2, RTI_MD5, rti_memcached + +$insert Logical +$insert FSErrors_100 +$Insert FILE.SYSTEM.EQUATES +$Insert memcached_mfs_Equates +$Insert rti_memcached_equates + +$Insert File.System.OnGoSub +Return + + + + +* -------------- Main Subs ----------------- +READ.RECORD: +READO.RECORD: +WRITE.RECORD: +DELETE.RECORD: +CLEARFILE: +DELETE.FILE: +GOSUB NEXT.MFS +Return +* --------------------------------------- +* non-chained filing system calls +* --------------------------------------- +Flush: +Unlock.All: +Record = "" + +Status = TRUE$ +Return + +Install: +Status = TRUE$ +Return +* --------------------------------------- +* --------------------------------------- +* Chained Filing System Calls +* --------------------------------------- +LOCK.RECORD: +UNLOCK.RECORD: +GOSUB NEXT.MFS +RETURN + +*-------------------------------------------------- +SELECT: +READNEXT: +CLEARSELECT: +RECORD.COUNT: +* --------------------------------------- +CREATE.INDEX: +DELETE.INDEX: +UPDATE.INDEX: +SELECT.INDEX: +READNEXT.INDEX: +* --------------------------------------- +GOSUB NEXT.MFS +Return + + +Omni.Script: +GOSUB NEXT.MFS +Return + + +Reserved: +* there is a critical error if this line is reached +Status = FALSE$ +Return + +* --------------------------------------- +* On open, connect to a cache +* Use a "namespace" prefix to separate this table's data from another +* namespace rule is crc32 of handle+tablename, so if they attach the same table with a different volume they see different data + +* Note - to "clear" a table from memcached you change the namespace +* If we ever want to support clear_Table, we must make clear_table change the namespace, perhaps we use handle + name + a clear_counter in the dict. +* +OPEN.FILE: +CREATE.FILE: +RENAME.FILE: +MOVE.FILE: +REMAKE.FILE: +* ---------------------------------------- +Open.Media: +CREATE.MEDIA: +READ.MEDIA: +WRITE.MEDIA: +Close.Media: +gosub Next.MFS +Return + + + + +* ---------- End of Subroutine +* ================================== +* execute filing system chain +* ================================== +Next.MFS: + + +* Strips this MFS leaving the next fs as first element in array +FSList = delete(BFS, 1, 1, 1) +NextFS = FSList<1,1,1> +if len(NextFS) then + call @NextFS(Code, FSList, Handle, Name, Fmc, Record, Status) +End +Return + diff --git a/SYSPROG/STPROC/O4WI_FILTER.txt b/SYSPROG/STPROC/O4WI_FILTER.txt new file mode 100644 index 0000000..4733394 --- /dev/null +++ b/SYSPROG/STPROC/O4WI_FILTER.txt @@ -0,0 +1,71 @@ +Function O4WI_FILTER(ProcName, UDetails, Tablename) +*#!Precompile +/* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without +* written permission from Revelation Technologies, Inc. +! +* +* VERSION : 1.0 +* +* +* AUTHOR : Bryan Shumsky +* +* CREATED : September 23, 2009 +* +* +! +* +* REVISION HISTORY (Most CURRENT first) : +* +* DATE IMPLEMENTOR FUNCTION +* -------- ----------- -------- +* 03 May 2010 bzs Added logic to respect environment security settings +* +* +*/ +* +$Insert ENVIRON_CONSTANTS +* +If Assigned(procname) Else procname = "" +If Assigned(udetails) Else udetails = "" +If Assigned(tablename) Else tablename = "" +* +* By default, no filters are applied EXCEPT for system-wide filters +SecFlds = @ENVIRON_SET +Sectbl = @ENVIRON_SET + +rslt = "" +Begin Case + Case tableName = "" + * return list of all tables + * 121410 If these are used for the form or report or dashboard process, remove "!" and "DICT." tables + bExclude = 0 + If procName = "O4W_DEFINE_FORM" Or procName = "O4W_DEFINE_REPORT" Or procName = "O4W_DEFINE_DASHBOARD" Then + bExclude = 1 + End + Call Rlist("SELECT SYSTABLES BY @ID", '5') + DONE = 0 + Loop + Readnext id Else DONE = 1 + Until DONE Do + If bExclude=0 Or (id[1,1] <> "!" And id[1,5] <> "DICT.") then + Locate id In SecTbl<1> Using @VM Setting dummy else + rslt<1,-1> = id + End + end + Repeat + Case 1 + * return list of fields for specified table + trslt = Xlate("DICT.":TableName, "%FIELDS%", "3", "X") + num.flds = dcount(trslt, @VM) + rslt = "" + For each.fld = 1 To num.flds + this.fld = trslt<1,each.fld> + chkfld = tableName:@svm:this.fld + Locate chkfld In secflds<1> Using @vm Setting chkpos Else + rslt<1,-1> = this.fld + End + Next each.fld +End Case +* +Return rslt diff --git a/SYSPROG/STPROC/O4WI_FORMDESIGNER_PAGE_XXX.txt b/SYSPROG/STPROC/O4WI_FORMDESIGNER_PAGE_XXX.txt new file mode 100644 index 0000000..46e9d9a --- /dev/null +++ b/SYSPROG/STPROC/O4WI_FORMDESIGNER_PAGE_XXX.txt @@ -0,0 +1,312 @@ +Function O4WI_FORMDESIGNER_PAGE_XXX(ACTION, headerInfo, formInfo_Orig, uniqueid, ctlentid, event, param1, param2, param3, status) +*#!Precompile + +/* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without +* written permission from Revelation Technologies, Inc. +! +* +* VERSION : 1.0 +* +* +* AUTHOR : Revelation Software Inc., All Rights Reserved +* +* CREATED : July 20, 2015 +* +* +! +* +* REVISION HISTORY (Most CURRENT first) : +* +* DATE IMPLEMENTOR FUNCTION +* -------- ----------- -------- +* +* +*/ +* +$Insert o4wcommon +$Insert o4wequates +$Insert O4W_DESIGN_FORM_EQUATES +$Insert O4W_COMMUTER_COMMON + +Declare Function Repository, Function, RTI_VERIFY_PROC + +If Assigned(ACTION) Else ACTION = "" +If Assigned(HEADERINFO) Else HEADERINFO = "" +If Assigned(FORMINFO_ORIG) Else FORMINFO_ORIG = "" +If Assigned(UNIQUEID) Else UNIQUEID = "" +If Assigned(param1) Else param1 = "" +If Assigned(param2) Else param2 = "" +If Assigned(param3) Else param3 = "" +If Assigned(status) Else status = "" + +If pageNo@ = "" Then pageNo@ = 1 +If pageNo@ <> headerinfo Then + * must load in the current page + Read formInfo From o4wtempfile%, uniqueID:"_PAGE_":pageNo@ Else formInfo = "" +End Else + formInfo = formInfo_Orig +end + +Equ page_desc$ To "Generic" +If formInfo = "" Then + Gosub setDefaults +End Else + Gosub updateHeader +end + + +RSLT = "" + +If Not(Num(ACTION)) Or ACTION < PAGEWIDGET_ACTION_MIN_VALUE$ Or ACTION > PAGEWIDGET_ACTION_MAX_VALUE$ Then + rslt = WIDGET_ACTION_INVALID$ +End Else + On action Gosub doPreDraw, doDraw, handleResults, doPropsShow, doPropsSave, doSaveDefaults +End + +Return RSLT + + +doPropsShow: + O4WSectionStart("specialSection", o4wmarkedoptions(1):o4wresponseoptions()) + num.fields = dcount(formInfo, @VM) + o4wtablestart("fieldTable") + For each.Field = 1 To num.fields + id = forminfo + type = formInfo + supportName = UCASE(DESIGN_SUPPORT_PREFIX$:Type) + IF RTI_VERIFY_PROC(supportName, 0, 5) = 0 THEN + CALL SET_STATUS(0) + END Else + pInfo = Function(@supportName(WIDGET_ACTION_INFO$, headerInfo, formInfo, id, WIDGET_INFO_DB$)) + If pInfo <> "" Then + end + end + Next each.field + o4wbutton("OK", "BTN_PPROPS_OK", O4WMARKEDOPTIONS(1)) + o4wspace(3) + o4wbutton("Cancel", "BTN_DISCARD_NO") + O4WQUALIFYEVENT("BTN_PPROPS_OK", "CLICK") + O4WQUALIFYEVENT("BTN_DISCARD_NO", "CLICK") + o4wsectionend("specialSection") + o4wdialog("specialSection", page_desc$:" Properties") +Return + +doPropsSave: + NAMES = "CLEAR" + values = "" + Gosub doUpdate2 + values = o4wgetvalue("KEYFIELD") + names = "KEYFIELD" + Gosub doUpdate2 +Return + +doUpdate: + names = param1 + values = param2 +doUpdate2: + num.names = dcount(names, @FM) + For each.name = 1 To num.names + this.name = names + this.value = values + Begin Case + Case this.name = "CLEAR" + formInfo = HEADER_TAG_VERSION$ + formInfo = HEADER_TAG_VERSION_VALUE$ + Case this.name = "KEYFIELD" + End Case + Next each.name +Return + +doPreDraw: + DRROOverrideFlag@ = "" + DRShowNoneOverrideFlag@ = "" + +Return + +doDraw: +Return + +handleResults: +runMode = param1 +bMobile = param2 +bHandled = 0 + + +If bHandled = 0 Then + * call into the helper to handle this + rslt = O4WI_FORMDESIGNER_PAGE_HELPER("EVENT", headerInfo, formInfo, errs, runMode, bMobile, ctlentid, event, uniqueID) +end + +Return + +setDefaults: +formInfo = HEADER_TAG_VERSION$ +formInfo = HEADER_TAG_VERSION_VALUE$ +num.fields = dcount(formInfo, @VM) +buttons = "" +firstField = "" +For each.Field = 1 To num.fields + id = forminfo + type = formInfo + supportName = UCASE(DESIGN_SUPPORT_PREFIX$:Type) + IF RTI_VERIFY_PROC(supportName, 0, 5) = 0 THEN + CALL SET_STATUS(0) + END Else + If type = CONTROL_TYPE_BUTTON$ Or type = CONTROL_TYPE_M_BUTTON$ Then + pInfo = Function(@supportName(WIDGET_ACTION_INFO$, headerInfo, formInfo, id, WIDGET_INFO_NAME$)) + bName = ID + If pInfo <> "" Then + bName = pInfo<1> + End + buttons<1,-1> = id + buttons<2,-1> = bName + End else + pInfo = Function(@supportName(WIDGET_ACTION_INFO$, headerInfo, formInfo, id, WIDGET_INFO_DB$:@FM:WIDGET_INFO_INPUT$)) + If pInfo<1,1> <> "" And pInfo[1,1] <> "<" And pInfo<2> = "1" Then + Locate id In formInfo using @VM setting posn Else null + formInfo = id + tableName = pInfo<1,1> + fieldName = pInfo<1,2> + conv_o = pInfo<1,5> + pType = "0" ;* default to prompt + skipIfNull = 1 ;* default to true + sType = 0 ;* default to unchanged + jType = "0" ;* default to and + addl = "" + details = "IMP":@SVM:ptype:@SVM:addl:@SVM:type:@SVM:tableName:@SVM:fieldName:@SVM:conv_o:@SVM:skipIfNull:@SVM:sType:@SVM:jType + formInfo = details + If pInfo<2> = "1" And firstField = "" Then firstField = id + End + end + End +Next each.Field +num.buttons = dcount(buttons<1>, @VM) +For each.button = 1 To num.buttons + this.button = buttons<1, each.button> + this.button.name = buttons<2, each.button> + If this.button = "" Then this.button = " " + bType = "" + unassignedCnt = 1 + Begin Case + Case indexc(this.button.name, "read", 1) Or indexc(this.button.name, "go", 1) + bType = TRIGGER_EVENT_READ$ + Case indexc(this.button.name, "search", 1) + bType = TRIGGER_EVENT_SEARCH$ + Case indexc(this.button.name, "forward", 1) Or indexc(this.button.name, "next", 1) + bType = TRIGGER_EVENT_FORWARD$ + Case indexc(this.button.name, "prev", 1) Or indexc(this.button.name, "back", 1) + bType = TRIGGER_EVENT_BACK$ + Case indexc(this.button.name, "save", 1) + btype = TRIGGER_EVENT_SAVE$ + Case indexc(this.button.name, "cancel", 1) + btype = TRIGGER_EVENT_CANCEL$ + Case indexc(this.button.name, "del", 1) + btype = TRIGGER_EVENT_DEL$ + Case indexc(this.button.name, "new", 1) + btype = TRIGGER_EVENT_NEW$ + Case indexc(this.button.name, "qbf", 1) + * not an assignable type + CASE unassignedCnt = 1 + bType = TRIGGER_EVENT_SEARCH$ + unassignedCnt += 1 + CASE unassignedCnt = 2 + bType = TRIGGER_EVENT_CANCEL$ + unassignedCnt += 1 + CASE unassignedCnt = 3 + bType = TRIGGER_EVENT_FORWARD$ + unassignedCnt += 1 + CASE unassignedCnt = 4 + bType = TRIGGER_EVENT_BACK$ + unassignedCnt += 1 + CASE unassignedCnt = 5 + bType = TRIGGER_EVENT_NEW$ + unassignedCnt += 1 + CASE unassignedCnt = 6 + bType = TRIGGER_EVENT_DEL$ + unassignedCnt += 1 + CASE unassignedCnt = 7 + bType = TRIGGER_EVENT_READ$ + unassignedCnt += 1 + CASE unassignedCnt = 8 + btype = TRIGGER_EVENT_SAVE$ + unassignedCnt += 1 + End CASE + If bType <> "" Then + * bzs 011721 swapped for version 2.0 + formInfo = Insert(formInfo, FORMINFO_PAGE_CONTROL_HDR$, 1, 0, this.button) + formInfo = Insert(formInfo, FORMINFO_PAGE_CONTROL$, 1, 0, bType) + If bType = TRIGGER_EVENT_NEW$ Then + * default to 'user entered' key + formInfo = Insert(formInfo, FORMINFO_PAGE_CONTROL_HDR$, 1, 0, HEADER_TAG_NEW_DETAIL$) + formInfo = Insert(formInfo, FORMINFO_PAGE_CONTROL$, 1, 0, "U") + end + end +Next each.button +If firstField <> "" Then + formInfo = HEADER_TAG_FOCUS$ + formInfo = firstField +end +Return + +updateHeader: +* bzs 011721 make sure header info is in new format +If formInfo <> HEADER_TAG_VERSION$ Or formInfo <> HEADER_TAG_VERSION_VALUE$ Then + NUM.HDR = DCOUNT(forminfo, @VM) + NEW.HDR = HEADER_TAG_VERSION$ + NEW.DETAILS = HEADER_TAG_VERSION_VALUE$ + For EACH.HDR = 1 To NUM.HDR + this.element = formInfo + this.detail = formInfo + Begin Case + Case THIS.ELEMENT = HEADER_TAG_VERSION$ + * ignored - already updated + Case this.element = TRIGGER_EVENT_DEL$ Or this.element = TRIGGER_EVENT_CANCEL$ Or this.element = TRIGGER_EVENT_NEW$ Or this.element = TRIGGER_EVENT_SAVE$ Or this.element = TRIGGER_EVENT_READ$ + * swap these + NEW.HDR<1,-1> = this.detail ;* button ID + NEW.DETAILS<1,-1> = this.element ;* action name + Case this.element = HEADER_TAG_FOCUS$ Or THIS.ELEMENT = HEADER_TAG_NEW_DETAIL$ Or THIS.ELEMENT = HEADER_TAG_PREDRAW_EVENT$ Or THIS.ELEMENT = HEADER_TAG_POSTDRAW_EVENT$ Or THIS.ELEMENT = HEADER_TAG_CUSTOM_EVENT$ + * these belong in the options + formInfo = THIS.ELEMENT + formInfo = THIS.DETAIL + Case 1 + * these are OK + NEW.HDR<1,-1> = this.element + NEW.DETAILS<1,-1> = this.detail + End case + Next EACH.HDR + formInfo = NEW.HDR + formInfo = NEW.DETAILS + NUM.OPTIONS = DCOUNT(formInfo, @VM) + NEW.HDR = "" + NEW.DETAILS = "" + For EACH.HDR = 1 To NUM.HDR + THIS.ELEMENT = formInfo + THIS.DETAIL = formInfo + Begin Case + Case this.element = "MAXSEARCH" Or THIS.element = "WARNSEARCH" Or this.element = "TRIGGER_TYPE" + NEW.HDR<1,-1> = "<":THIS.ELEMENT:">" + NEW.DETAILS<1,-1> = THIS.DETAIL + Case this.element = "QBFDISABLE" or this.element = "NOSAVEOK" Or THIS.element = "REDIRECTTO" + NEW.HDR<1,-1> = "<":THIS.ELEMENT:">" + NEW.DETAILS<1,-1> = THIS.DETAIL + Case 1 + * these are OK + NEW.HDR<1,-1> = this.element + NEW.DETAILS<1,-1> = this.detail + End case + Next EACH.HDR + formInfo = NEW.HDR + formInfo = NEW.DETAILS + Gosub doSaveDefaults +End +return + + +doSaveDefaults: +* property defaults must already be set; just make sure To save them +Write formInfo On o4wtempfile%, uniqueID:"_PAGE_":pageNo@ +If pageNo@ = headerInfo Then + formInfo_ORIG = formInfo +end +return diff --git a/SYSPROG/STPROC/O4WI_FORMDESIGNER_TEMPLATE_XXX.txt b/SYSPROG/STPROC/O4WI_FORMDESIGNER_TEMPLATE_XXX.txt new file mode 100644 index 0000000..f5b3e65 --- /dev/null +++ b/SYSPROG/STPROC/O4WI_FORMDESIGNER_TEMPLATE_XXX.txt @@ -0,0 +1,1203 @@ +Function O4WI_FORMDESIGNER_TEMPLATE_XXX(ACTION, param1, param2, param3, param4, param5, param6, param7, param8, param9, param10, param11, status) +*#!Precompile + + +/* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without +* written permission from Revelation Technologies, Inc. +! +* +* VERSION : 1.0 +* +* +* AUTHOR : Revelation Software, Inc. All Rights Reserved. +* +* CREATED : July 18, 2019 +* +* +! +* +* REVISION HISTORY (Most CURRENT first) : +* +* DATE IMPLEMENTOR FUNCTION +* -------- ----------- -------- +* +*/ +* +$Insert o4wcommon +$Insert o4wequates +$Insert O4W_COMMUTER_COMMON +$Insert O4W_DESIGN_FORM_EQUATES + +Declare Function Repository, Function, RTI_VERIFY_PROC + +If Assigned(ACTION) Else ACTION = "" +If Assigned(param1) Else param1 = "" +If Assigned(param2) Else param2 = "" +If Assigned(param3) Else param3 = "" +If Assigned(param4) Else param4 = "" +If Assigned(param5) Else param5 = "" +If Assigned(param6) Else param6 = "" +If Assigned(param7) Else param7 = "" +If Assigned(param8) Else param8 = "" +If Assigned(param9) Else param9 = "" +If Assigned(param10) Else param10 = "" +If Assigned(param11) Else param11 = "" +If Assigned(status) Else status = "" + +RSLT = "" +If Not(Num(ACTION)) Or ACTION < TEMPLATEWIDGET_ACTION_MIN_VALUE$ Or ACTION > TEMPLATEWIDGET_ACTION_MAX_VALUE$ Then + rslt = WIDGET_ACTION_INVALID$ +End Else + On action Gosub doTemplateInfo,doQuickDraw,doCreate,doFormProperties +End + +Return RSLT + +doTemplateInfo: +* no parameters passed in +param1 = "Example Code" +rslt = "O4WI_FORMDESIGNER_TEMPLATE_XXX" ;* our ID +Return + +doFormProperties: +* passed headerInfo (if asked to draw the form for real) or nothing (if just getting the tab IDs and Name(s)) +headerInfo = param1 +* if we have any overall "form" properties we need for this type of form, we could add them here... +If headerInfo = "" Then + * looking for the name(s) and tab id(s) of the tab(s) we wish to add + rslt<1> = ""; * tab id(s) (@VM delimited) + rslt<2> = "" ;* tab name(s) (@VM delimited) +End Else + * actually draw the tab(s) +End +Return + +doQuickDraw: +* passed table, fields, tableStyle, textfields, textSearch, textResults, formfields, tabInfo, searchFields, resultFields, metafields) +table = param1 +fields = param2 +tableStyle = param3 +textfields = param4 +textSearch = param5 +textResults = param6 +formfields = param7 +tabInfo = param8 +searchFields = param9 +resultFields = param10 +metafields = param11 +unselectedFields = Xlate("DICT.":table, "%FIELDS%", 3, "X") +unselectedFields = Insert(unselectedFields, 1, 1, 0, "@ID") +num.fields = dcount(fields, @VM) +For each.Field = 1 To num.fields +this.Field = fields<1, each.Field> +Locate this.Field In unselectedFields<1> using @VM setting dummy Then + unselectedFields = Delete(unselectedFields, 1, dummy, 0) +End +Next each.Field +num.unselected = dcount(unselectedFields, @VM) +tabOpts = " " +tabOpts<2> = "0" +tabOpts<1,-1> = "General":@VM:"Next Tab" +tabOpts<2,-1> = "-1":@VM:"1" +fieldTypes = "Textbox":@VM:"Listbox":@VM:"Checkbox":@VM:"Radio Buttons":@VM:"Text":@VM:"Date Picker":@VM:"Time Picker":@VM:"Toggle":@VM:"None/Not Used" +fieldCodes = "1":@VM:"2":@VM:"3":@VM:"4":@VM:"5":@VM:"6":@VM:"7":@VM:"9":@VM:"0" +helpID = 1 +* draw our quickdraw tables in the qfMain section (if we have more than one page, use o4wtabs with qfMain being the "host" for the tabs) +o4wsectionstart("qfMain") +O4WHeader("Please select and re-order the form field(s)...", 5) +helpText = "Please select the field(s) that you wish to display and/or allow the user to update. Also choose the type of element you wish to use for this field. " +helpText := " For fields that offer multiple choices (like list boxes), you can choose the options once the form has been displayed." +helpText:= " Arrange the fields in the order you wish them to be displayed; pay particular attention to keep associated multivalue fields together if you wish them to be placed into the same table." +helpText:= "You can specify which tab the element should be placed on - the general tab is located above the individual tabs, or you can choose next tab to create a new tab. " +helpText := " You can optionally suppress the use of tabs entirely if you wish." +helpID += 1; Gosub addQFHelp +O4WBreak() +o4wtablestart("qfMainTable", tableStyle) +o4wtableheader("Field") +o4wtableheader("Field Type") +o4wtableheader("Put in tab...") +passedInfo = textFields; Gosub reArrangeFieldsForWizard +For each.Field = 1 To num.sfields + this.field = sortedfields<1, each.field> + fieldType = formFields<1, each.Field> + o4wsetcell(each.Field, 1) + o4wtext(this.field) + o4wstore(this.Field, "tForm") + o4wsetcell() + If fieldType = "" then + fieldType = "1" + dInfo = Xlate("DICT.":table, this.Field, "", "X") + If dInfo = "" Then + dInfo = Xlate("SYSDICT", this.Field, "", "X") + end + convCd = dInfo<7> + Begin Case + Case convCd[1,1] = "D" + fieldType = "6" + Case convCd[1,2] = "MT" + fieldType = "7" + Case convCd[1,1] = "B" + fieldType = "9" + *Case convCd[1,2] = "MR" + * fieldType = "8" + Case dInfo<1> <> "F" + fieldType = "5" + End Case + end + O4WLISTBOXSTART("ftype", "qfMainTable_":each.Field, o4wmarkedoptions("", fieldType)) + o4wlistbox(fieldTypes, fieldCodes, "ftype") + o4wlistboxend() + o4wsetcell() + this.tab = tabInfo<1, each.field> + o4wlistbox(tabOpts<1>, tabOpts<2>, "ttype", "", "", o4wmarkedoptions("", this.tab)) + O4WSetCell("+1") +Next each.Field +CNTR = num.sfields +For each.Field = 1 To num.sunselected + cntr+=1 + o4wsetcell(cntr) + o4wtablemodify(cntr, "", "unselected") + this.field = sortedUnusedFields<1, each.field> + o4wtext(this.field) + o4wstore(this.Field, "tForm") + o4wsetcell() + O4WLISTBOXSTART("ftype", "qfMainTable_us":each.Field, o4wmarkedoptions("", "0")) + o4wlistbox(fieldTypes, fieldCodes, "ftype") + o4wlistboxend() + o4wsetcell() + o4wlistbox(tabOpts<1>, tabOpts<2>, "ttype") +Next each.Field +o4wsetcell("+1") +o4wtableend("qfMainTable") +o4wqualifyevent("$", "hide", ".unselected") +o4wlink("Show/Hide additional fields", O4W_LINKTYPE_LOCAL$, "#", "", "BTN_TOGGLE") +o4wqualifyevent("BTN_TOGGLE", "toggle", ".unselected") +o4wbreak() +o4wbreak() +o4wbreak() +o4wbreak() +bNoTab = "" +If tabInfo = "" And textFields <> "" Then + bNoTab = "1" +end +o4wcheckbox("Don't use tabs", "1", "notabs", "notabs", o4wmarkedoptions(bNoTab)) +o4wbreak() +promptValue = metaFields<1,1> +o4wlistboxstart("metaFields_prompt", "metaFields_prompt_main", o4wmarkedoptions("", promptValue)) +o4wlistbox("Put labels next to fields", "prompt_sidexside", "metaFields_prompt") +o4wlistbox("Put labels above fields", "prompt_overunder", "metaFields_prompt") +o4wlistbox("Use inline prompts (suppress labels)", "prompt_inline", "metaFields_prompt") +o4wlistboxend() +o4wbreak() +bClassic = metaFields<1,2> + 0 +o4wcheckbox("Use 'classic' user interface on desktop", "use_classic", "metaFields_ui", "", o4wmarkedOptions(bClassic)) +o4wsectionend("qfMain") +Return + +doCreate: +* generate the page(s) from the quickdraw results +custom_names = "" +custom_values = "" +custom_names_label = "" +custom_values_label = "" +Gosub getLayoutValues +cntr = 1 +maxPage = 1 +dim pages(5) +mat pages = "" +sectionIsMV = 0 +linkURL = "" +newTabList = "" +tabList = "" +bInDisplayPage = 0 +copyright_text = "(c) ":Field(Oconv(DATE(), "D4/"), "/", 3) +overrideLabels = "" +makeSubsection = "" +* passed newForm, table, varfields, formFields, searchFields, resultFields +newForm = param1 +table = param2 +varfields=param3 +formFields=param4 +searchFields=param5 +resultFields=param6 +headerText = TABLE:" Entry Form" +num.fields = dcount(varfields<1>, @VM) + +newForm = "Form Details" +newForm = "details" +currPage = 1 +fields = varFields<1> +* organize based on tab information +Gosub orgTabs +target = formFields<1> +tabList = formFields<2> +bInDisplayPage = 1 +Gosub addFields +* add in buttons to save/delete/cancel/etc. +btnURL = "" +row += 1 +btnList = "" +ourCol = 0 +btnList<1,-1> = "Save" +btnList<2,-1> = "BTN_SAVE" +btnList<3,-1> = ourCol +btnList<4,-1> = 0 +ourCol += defGridWidth +btnList<1,-1> = "Cancel" +btnList<2,-1> = "BTN_CANCEL" +btnList<3,-1> = ourCol +btnList<4,-1> = 0 +ourCol += defGridWidth +this.field.name = copyright_text; Gosub addFooterWithButtons +* wrap up the form definition +newForm = cntr +For each.page = 1 To maxPage + newForm := @RM:pages(each.page) +Next each.page +rslt = newForm +return + +addQFHelp: +* passed helpText, helpID + o4wbreak() + o4wlink("Help...", O4W_LINKTYPE_LOCAL$, "#", "", "BTN_HELP":helpID) + o4wtext("<<<":@VM, "help":helpID:"_b", "toggleMe":helpID) + o4wtext(helpText:@VM:@VM, "help":helpID, "toggleMe":helpID) + o4wqualifyevent("$", "hide", "help":helpID:"_b") + o4wqualifyevent("$", "hide", "help":helpID) + o4wqualifyevent("BTN_HELP":helpID, "toggle", ".toggleMe":helpID) + o4wbreak() +Return + +rearrangeFieldsForWizard: +* passed: passedInfo (selected values - if any) +* returns: updated sortedFields, sortedUnusedFields +sortedFields = fields +sortedUnusedFields = unselectedFields +If passedInfo <> "" Then + num.text = dcount(passedInfo, @VM) + For each.text = 1 To num.text + this.text = passedInfo<1, each.text> + Locate this.text In sortedFields<1> using @VM setting dummy Then + sortedFields = Delete(sortedFields, 1, dummy, 0) + End Else Locate this.text In sortedUnusedFields<1> using @VM setting dummy Then + sortedUnusedFields = Delete(sortedUnusedFields, 1, dummy, 0) + End + Next each.text + If sortedFields <> "" Then + sortedFields = passedInfo:@VM:sortedFields + End Else + sortedFields = passedInfo + End +end +num.sFields = dcount(sortedFields, @VM) +num.sUnselected = dcount(sortedUnusedFields, @VM) +Return + +addFields: +pages(currPage) = OVERALL_FORM_ID$:"_":currpage +pages(currPage) = CONTROL_TYPE_DIV$ +pages(currPage) = "0":@svm:"0":@svm:"12":@svm:"20" +pages(currPage) = "0":@svm:"0" +parent = "" +tabParent = "" +parentID = "" +overallParent = OVERALL_FORM_ID$:"_":currpage +currParent = overallParent +lastTab = "" +sizeStack = "" +* Put up a header +Gosub addHeader +addFields2: +* Now add in all the other fields +assoc = "" +row = 1 +bDone = 0 +If MakeSubSection <> "" Then + * make a section, and put these fields inside of it + Gosub addSubSection +End +num.fields = dcount(fields, @VM) +For each.Field = 1 To num.fields + this.Field.name = fields<1, each.Field> + this.field.type = target<1, each.Field> + this.field.label = overrideLabels<1, each.Field> + this.tab = tabList<1, each.Field> + dict.info = "" + grid.width = defGridWidth + If this.field.type <> "0" then + If this.tab <> lastTab Then + If parent <> "" Then + * tables can't cross tabs - close out any pending table + Gosub endTable + parent = "" + assoc = "" + end + If lastTab <> "" Then + Gosub endSpecificTab + End Else + * first time through? create our parent element + Gosub startTabs + end + lastTab = this.tab + Gosub startSpecificTab + currParent = specificTab + end + dict.info = Xlate("DICT.":table, this.field.name, "", "X") + If this.field.label = "" Then + this.field.label = dict.info<3> + If this.field.label = "" Then + this.field.label = this.field.name + End + end + width = dict.info<10> + 0 + If width = 0 Then width = 1 + screen.part = int(80/width) + grid.width = int(12 / screen.part) + If grid.width < defGridWidth Then + grid.width = defGridWidth + end + this.assoc = dict.info<36> + isMV = 0 + Begin Case + Case sectionIsMV + isMV = 1 + Case dict.info<4> _eqc "M" And this.assoc <> "" + isMV = 1 + Case dict.info<4> _eqc "M" + * no association name - is this a control type that supports MV fields? + If this.field.type = "2" Or this.field.type = "3" Then + * yes, this type can be MV "by itself", not in a table + End Else + isMV = 1 ;* this must be put in a table + * don't let it be associated with anyone else, though + this.assoc = this.field.name + end + End case + if isMV Then + If parent <> "" And this.assoc <> assoc And Not(sectionIsMV) Then + * end the current table and begin a new one + Gosub endTable + parent = "" + end + If parent = "" Then + * create new parent element + Gosub startTable + parent = tableID + assoc = this.assoc + End + lPosn = "" ;* label handled specially here + Gosub addTableColumn + parentID = newColumnID + * recalc our width now that we're in a table + grid.width = int(12 / screen.part) + If grid.width < defGridWidth Then + grid.width = defGridWidth + end + end else + parentID = currParent + lPosn = newForm + If parent <> "" Then + * wrap up the parent element from the last MV + Gosub endTable + * recalc our width now that we're out of the table + grid.width = int(12 / screen.part) + If grid.width < defGridWidth Then + grid.width = defGridWidth + end + end + parent = "" + End + ourLink = "" + ourLinkType = "" + If bDone = 0 Then + ourLink = linkURL + ourLinkType = O4W_LINKTYPE_LOCAL$ + End + Gosub addField + bDone = 1 + end +Next each.Field +If parent <> "" Then + * wrap up the parent element from the last MV + Gosub endTable +End +If lastTab <> "" Then + Gosub endSpecificTab +End +If tabParent <> "" Then + * wrap up the tab element + Gosub endTab +End +If makeSubSection <> "" Then + Gosub endSection + makeSubSection = "" +end +* set 'next posn' for the parent container +pages(currPage) = ROW+1 +Return + +addSubSection: + * build a sub section of type "makeSubSection"; set our currParent to it + parentID = currParent + thisID = ELEMENT_PREFIX$:CNTR + cntr += 1 + bProtected = 0 + prop_locn = "" + prop_locn<1,1,FORMINFO_POSN_COL$> = "0" + prop_locn<1,1,FORMINFO_POSN_ROW$> = row + row += 1 + prop_locn<1,1,FORMINFO_POSN_HEIGHT$> = DEFAULT_TABLE_HEIGHT$ ;* MAX_GRID_HEIGHT$ + prop_locn<1,1,FORMINFO_POSN_WIDTH$> = MAX_GRID_WIDTH$ - 2 + bDataBind = 0 + type = makeSubSection + lPlacement = WIDGET_LABEL_POSN_SXS$ + promptText = "" + addClass = "" + addBefore = "" + Gosub addElement + saveSectionParent = parentID + currParent = thisID + parentID = currParent + saveSectionRow = row + row = 0 + ourcol = 0 +Return + +endSection: + * make sure all section elements are updated + row = saveSectionRow + DEFAULT_TABLE_HEIGHT$ ;* MAX_GRID_HEIGHT$ + parentID = saveSectionParent + currParent = saveSectionParent +Return + + +addField: + * given this.field.name, this.field.type, dict.info, parentID, currPage, table, mode, maxID + * populate pages(currPage) + associated = "" + bNeedLabel = 0 + thisID = ELEMENT_PREFIX$:CNTR + cntr += 1 + bProtected = 0 + prop_locn = "" + lPlacement = newForm + this.label = this.field.label + convert @VM:@SVM:@TM to " " in this.label + prop_locn<1,1,FORMINFO_POSN_COL$> = "0" + prop_locn<1,1,FORMINFO_POSN_ROW$> = row + prop_locn<1,1,FORMINFO_POSN_WIDTH$> = grid.width + bDataBind = 1 + ourHeight = defGridHeight + Begin Case + Case this.field.type = "0" + * ignore this one + return + Case this.field.type = "1" + * textbox and label + bNeedLabel = 1 + type = CONTROL_TYPE_INPUT_TEXT$ + Case this.Field.type = "2" + * listbox and label + bNeedLabel = 1 + type = CONTROL_TYPE_SELECT_MENU$ + Case this.field.type = "3" + * checkbox and label + bNeedLabel = 0 ;* don't need label - we get the field set + type = CONTROL_TYPE_CHECK_SET$ + ourHeight = 3 + Case this.field.type = "4" + * radio button and label + bNeedLabel = 0 ;* don't need label - we get the field set + type = CONTROL_TYPE_RADIO_SET$ + ourHeight = 3 + Case this.field.type = "5" + * plain text + bNeedLabel = 1 + this.label = "^" ;* just show the current value + type = CONTROL_TYPE_TEXT$ + Case this.field.type = "6" + * date picker + bNeedLabel = 1 + type = CONTROL_TYPE_DATEPICKER$ + conv = dict.info<7> + delimChar = "" + euroFlag = "" + If conv[1,1] = "D" Then + * do we have a delimiter? + delim = "" + ccntr = 2 + next.char = conv[2,1] + If next.char <> "E" And Num(next.char) Then + ccntr = 3 + next.char = conv[3,1] + End + If Not(Index("EFGHIJQWASML",NEXT.CHAR,1)) And next.char <> "" Then + * yes, this is a delimiter + delimChar = next.char + ccntr += 1 + End + If conv[ccntr,1] = "E" Then + * European format + euroFlag = "1" + End + End + If delimChar <> "" Then + custom_names<-1> = WIDGET_MSG_DATE_DELIM$ + custom_values<-1> = delimChar + End + If euroFlag <> "" Then + custom_names<-1> = WIDGET_MSG_DATE_EURO$ + custom_values<-1> = euroFlag + end + Case this.field.type = "7" + * time picker + bNeedLabel = 1 + type = CONTROL_TYPE_TIMEPICKER$ + show24 = "" + showSeconds = "" + conv = dict.info<7> + If conv[1,2] = "MT" then + If indexc(conv, "H", 1) = 0 then + * not in 12 hour format - allow for 24 hour def'n + show24 = "1" + End + If indexc(conv, "S", 1) Then + * show seconds too + showSeconds = "1" + End + end + If show24 <> "" Then + custom_names<-1> = WIDGET_MSG_TIME_24HR$ + custom_values<-1> = show24 + End + If showSeconds <> "" Then + custom_names<-1> = WIDGET_MSG_TIME_SECONDS$ + custom_values<-1> = showSeconds + end + + Case this.field.type = "8" + * NOT USED + *bNeedLabel = 1 + *type = CONTROL_TYPE_INPUT_NUMBER$ + Case this.field.type = "9" + * toggle + bNeedLabel = 0 + type = CONTROL_TYPE_M_TOGGLE$ + ourHeight = 3 + Case this.field.type = "10" + * button + bNeedLabel = 0 + type = CONTROL_TYPE_BUTTON$ + Case this.field.type = "11" + * file upload + bNeedLabel = 1 + type = CONTROL_TYPE_INPUT_FILE$ + Case this.field.type = "12" + * text area + bNeedLabel = 1 + type = CONTROL_TYPE_INPUT_AREA$ + Case this.field.type = "13" + * color picker + bNeedLabel = 1 + type = CONTROL_TYPE_COLORPICKER$ + Case this.field.type = "14" + * password and label + bNeedLabel = 1 + type = CONTROL_TYPE_INPUT_TEXT$ + custom_names<-1> = WIDGET_MSG_SPECIAL_STYLE$ + custom_values<-1> = "password" + Case this.field.type = "15" + * hidden field + bNeedLabel = 0 + type = CONTROL_TYPE_INPUT_TEXT$ + custom_names<-1> = WIDGET_MSG_SPECIAL_STYLE$ + custom_values<-1> = "hidden" + Case this.field.type = "16" + * image + bNeedLabel = 1 + type = CONTROL_TYPE_IMAGE$ + End Case + If IsMV Then + * never show label for MV fields - already done in table + bNeedLabel = 0 + lPlacement = WIDGET_LABEL_POSN_NONE$ + End + promptText = "" + addClass = "" + If lPlacement = WIDGET_LABEL_POSN_INLINE$ Then + bNeedLabel = 0 + promptText = this.label + End + row += ourHeight + prop_locn<1,1,FORMINFO_POSN_HEIGHT$> = ourHeight + addBefore = "" + Gosub addElement2 ;* we already have our label + If bNeedLabel Then + posn = newposn ;* remember the location of our data element + custom_names = custom_names_label + custom_values = custom_values_label + elementID = thisID + associated = thisID ;* mark the label's associated field + bDataBind = 0 + Gosub createLabel + end +Return + +AddElement: + this.label = this.field.label + convert @VM:@SVM:@TM to " " in this.label +AddElement2: * entry point if this.label is already set + names = "" + values = "" + names<1> = WIDGET_MSG_LABEL$ + values<1> = this.label + names<2> = WIDGET_MSG_LINK$ + If ourLink <> "" Then + values<2> = "1" + names<3> = WIDGET_MSG_LINK_URL$ + values<3> = ourLink + names<4> = WIDGET_MSG_LINK_TYPE$ + values<4> = ourLinkType +End Else + values<2> = "0" +End + names<-1> = WIDGET_MSG_LABEL_PLACEMENT$ + VALUES<-1> = lPlacement + this.size = dict.info<10> + If this.size <> "" then + names<-1> = WIDGET_MSG_SIZE$ + values<-1> = this.size + end + If bDataBind Then + If table <> "" then + names<-1> = WIDGET_MSG_DB_TABLE$ + values<-1> = table + End + If this.field.name <> "" then + names<-1> = WIDGET_MSG_DB_FIELD$ + values<-1> = this.field.name + names<-1> = WIDGET_MSG_NAME$ + values<-1> = this.field.name + end + names<-1> = WIDGET_MSG_DB_RO$ + isRO = 0 + If (dict.info<1> _eqc "S") And bInDisplayPage Then + isRO = 2 ;* make it unchangeable + end + values<-1> = isRO + If dict.info<4> _eqc "M" then + names<-1> = WIDGET_MSG_DB_MV$ + values<-1> = "1" + end + names<-1> = WIDGET_MSG_SET_SHOWNONE$ + values<-1> = Not(bInDisplayPage) + names<-1> = WIDGET_MSG_CONTROL_ALIGN$ + values<-1> = "0" ;* assume all controls will left align + names<-1> = WIDGET_MSG_FONT_ALIGN$ + align = "0" + If dict.info<9> = "R" Then + align = "2" + End Else If dict.info<9> = "C" Or dict.info<9> = "T" Then + align = "1" + end + values<-1> = align + If promptText <> "" Then + names<-1> = WIDGET_MSG_PROMPT$ + values<-1> = promptText + End + If addClass <> "" Then + names<-1> = WIDGET_MSG_CLASS_ADD$ + values<-1>= addClass + end + End + names<-1> = custom_names + values<-1> = custom_values + custom_names = "" + custom_values = "" + newForm = cntr ;* make sure this is up to date + newPosn = o4wi_formdesigner_widget_new(newForm, pages(currPage), thisID, parentID, type, prop_locn, associated, bProtected, addBefore, names, values) + * maxID may have changed - be sure to refresh it + cntr = newForm +Return + +createLabel: + * create the label element + If lPosn = "" Then Return ;* don't put the label element on at all + thisID = ELEMENT_PREFIX$:CNTR + cntr += 1 + TYPE = CONTROL_TYPE_TEXT$ + prop_locn = pages(currPage) ;* let the label assume the 'landing position' from the user + aelement_locn = prop_locn + If lPosn = WIDGET_LABEL_POSN_SXS$ Then + * side-by-side + * Change the size of the label so it's "standard size" + prop_locn<1,1,FORMINFO_POSN_WIDTH$> = defGridWidth ;* so everything lines up in the columns + * now move the associated element so it's in the right place + aelement_locn<1,1, FORMINFO_POSN_COL$> = prop_locn<1,1, FORMINFO_POSN_COL$> + defGridWidth + End Else + * over/under + aelement_locn<1,1, FORMINFO_POSN_ROW$> = prop_locn<1,1, FORMINFO_POSN_ROW$> + prop_locn<1,1,FORMINFO_POSN_HEIGHT$> + * adjust our "next position to use" + row += prop_locn<1,1,FORMINFO_POSN_HEIGHT$> + * and finally set our height to 1 (by default the label should only be 1 high) + aelement_locn<1,1,FORMINFO_POSN_HEIGHT$> = 1 + End + pages(currPage) = aelement_locn + bProtected = 0 + lPlacement = lPosn + promptText = "" + addClass = "" + addBefore = "1" + Gosub addElement + pages(currPage) = thisID ;* tell our associated control who we are + pages(currPage) = "2" ;* and that they are the "master" +Return + +startTable: + * create new table element as parent For these + parentID = currParent + thisID = ELEMENT_PREFIX$:CNTR + cntr += 1 + bProtected = 0 + prop_locn = "" + prop_locn<1,1,FORMINFO_POSN_COL$> = "0" + prop_locn<1,1,FORMINFO_POSN_ROW$> = row + row += 1 + prop_locn<1,1,FORMINFO_POSN_HEIGHT$> = DEFAULT_TABLE_HEIGHT$ ;* MAX_GRID_HEIGHT$ + prop_locn<1,1,FORMINFO_POSN_WIDTH$> = MAX_GRID_WIDTH$ - 2 + bDataBind = 0 + tableID = thisID + type = CONTROL_TYPE_TABLE$ + lPlacement = WIDGET_LABEL_POSN_SXS$ + promptText = "" + addClass = "" + addBefore = "" + Gosub addElement + If sectionIsMV = 2 Then + * mark this as a multiRecord table + names = WIDGET_MSG_TBL_TYPE$ + values = "2" + Gosub updateTable + End + saveTableRow = row + sizeStack = Insert(sizeStack, 1, 0, 0, defGridWidth) + defGridWidth = MAX_GRID_WIDTH$ - 2 +Return + + +addTableColumn: + * add a new child div To the parent table + newColName = this.field.label + convert @VM:@SVM:@TM to " " in newColName + newColumnID = "" + names = "" + values = "" + names<1> = WIDGET_MSG_TBL_COLUMN_ADD$ + values<1> = newColName + newForm = cntr ;* make sure this is up to date + Gosub updateTable + * maxID may have changed - be sure to refresh it + cntr = newForm + * return our new column ID + newColumnID = pInfo + * make sure our children are full sized + defGridWidth = MAX_GRID_WIDTH$ - 2 + * And reset our row to the top of the column + row = 0 +Return + +updateTable: + * let the element update itself + supportName = UCASE(DESIGN_SUPPORT_PREFIX$:CONTROL_TYPE_TABLE$) + IF RTI_VERIFY_PROC(supportName, 0, 5) = 0 THEN + * failed + CALL SET_STATUS(0) + END Else + pInfo = Function(@supportName(WIDGET_ACTION_UPDATE$, newForm, pages(currPage), tableID, "", names, values)) + End + return + +endTable: + * make sure all table elements are updated + row = saveTableRow + DEFAULT_TABLE_HEIGHT$ ;* MAX_GRID_HEIGHT$ + defGridWidth = sizeStack<1> + sizeStack = Delete(sizeStack, 1, 0, 0) +Return + +addButton: + * passed btn (text), btnID, btnURL (optional), ourCol, Row, btnType + parentID = OVERALL_FORM_ID$:"_":currpage +addButton2: + * entry point for different parents + type = btnType + thisID = ELEMENT_PREFIX$:CNTR + cntr += 1 + bProtected = 0 + prop_locn = "" + prop_locn<1,1,FORMINFO_POSN_COL$> = ourCol + prop_locn<1,1,FORMINFO_POSN_ROW$> = row + prop_locn<1,1,FORMINFO_POSN_HEIGHT$> = defGridHeight + prop_locn<1,1,FORMINFO_POSN_WIDTH$> = defGridWidth + bDataBind = 0 + associated = "" + lPlacement = WIDGET_LABEL_POSN_SXS$ + promptText = "" + addClass = "" + addBefore = "" + Gosub addElement + * let the element update itself + supportName = UCASE(DESIGN_SUPPORT_PREFIX$:type) + IF RTI_VERIFY_PROC(supportName, 0, 5) = 0 THEN + CALL SET_STATUS(0) + END Else + names = "" + values = "" + names<1> = WIDGET_MSG_LABEL$ + values<1> = btn + names<2> = WIDGET_MSG_LINK$ + If btnURL = "" Then + values<2> = 0 + End else + values<2> = 1 + names<3> = WIDGET_MSG_LINK_URL$ + values<3> = btnURL + names<4> = WIDGET_MSG_LINK_TYPE$ + values<4> = O4W_LINKTYPE_LOCAL$ + End + names<-1> = WIDGET_MSG_BTN_DEFAULT$ + values<-1> = bDefault + newForm = cntr ;* make sure this is up to date + pInfo = Function(@supportName(WIDGET_ACTION_UPDATE$, newForm, pages(currPage), thisID, "", names, values)) + * maxID may have changed - be sure to refresh it + cntr = newForm + end + +Return + +orgTabs: * reorganize fields so that each tab is sequential In the list +* passed: fields, formFields<1> (field types) and formFields<2> (tabs) +* sets newTabList, updates formFields, updates fields +num.names = dcount(fields, @VM) +formTypes = formFields<1> +tabList = formFields<2> +If tablist = "" Or tablist = str("0":@VM, num.names-1):"0" then + * nothing to do here - no tabs + formFields<2> = "" + Return +End +newTabList = "" +currTabNum = 0 +For each.name = 1 To num.names + this.name = fields<1, each.name> + this.tab = tabList<1, each.name> + this.type = formTypes<1, each.name> + Begin Case + Case this.tab = "0" And newTabList <> "" + * unchanged + tabNum = currTabNum + Case this.tab = "-1" + * general + TabNum = -1 + currTabNum = tabNum + Case this.tab = "1" Or newTabList = "" + * new tab + currTabNum += 1 + tabNum = currTabNum + End Case + Locate tabNum In newTabList<1> by "AR" using @VM setting posn then + newTabList<2, posn, -1> = this.name + newTabList<3,posn,-1> = this.type + End Else + newTabList = Insert(newTabList, 1, posn, 0, tabNum) + newTabList = Insert(newTabList, 2, posn, 0, this.name) + newTabList = Insert(newTabList, 3, posn, 0, this.type) + End + Next each.name + * rebuild the list + num.tabs = dcount(newTabList<1>, @VM) + nlist = "" + list1 = "" + list2 = "" + tabcntr = 1 + For each.tab = 1 To num.tabs + this.tab = newTabList<1, each.tab> + If this.tab = "-1" Then + this.tab = "" + End Else + this.tab = "Tab ":tabcntr + tabcntr += 1 + End + these.names = newTabList<2, each.tab> + these.types = newTabList<3, each.tab> + num.names = dcount(these.names, @SVM) + Convert @SVM To @VM In these.names + Convert @SVM To @VM In these.types + nList := these.names:@VM + list1 := these.types:@VM + list2 := str(this.tab:@VM, num.names) +Next each.tab +formFields<1> = list1[1, Len(list1)-1] +formFields<2> = list2[1, Len(list2)-1] +fields = nList[1, Len(nList)-1] +Return + +startTabs: * determine number of tabs, And create parent And children tab elements +* passed tabList, newTabList +* sets tabParent + parentID = currParent + thisID = ELEMENT_PREFIX$:CNTR + cntr += 1 + bProtected = 0 + prop_locn = "" + prop_locn<1,1,FORMINFO_POSN_COL$> = "0" + prop_locn<1,1,FORMINFO_POSN_ROW$> = row + row += 1 + prop_locn<1,1,FORMINFO_POSN_HEIGHT$> = MAX_GRID_HEIGHT$ + prop_locn<1,1,FORMINFO_POSN_WIDTH$> = MAX_GRID_WIDTH$-2 + bDataBind = 0 + tableID = thisID + type = CONTROL_TYPE_TAB$ + lPlacement = WIDGET_LABEL_POSN_SXS$ + promptText = "" + addClass = "" + addBefore = "" + Gosub addElement + tabParent = thisID + currParent = thisID + savedRow = row +Return + +Return + +startSpecificTab: * create child tab element +* passed lastTab, sets specificTab +* let the element update itself +supportName = UCASE(DESIGN_SUPPORT_PREFIX$:CONTROL_TYPE_TAB$) +IF RTI_VERIFY_PROC(supportName, 0, 5) = 0 THEN +* failed +CALL SET_STATUS(0) +END Else + newForm = cntr ;* make sure this is up to date + names = WIDGET_MSG_TBL_COLUMN_ADD$ + values = lastTab + pInfo = Function(@supportName(WIDGET_ACTION_UPDATE$, newForm, pages(currPage), tabParent,"", names, values)) + * maxID may have changed - be sure to refresh it + cntr = newForm + * return our new column ID + specificTab = pInfo + * and reset our position to top row + row = 0 +End +Return + +endSpecificTab: * close child tab element +* passed lastTab +row = savedRow + MAX_GRID_HEIGHT$ +Return + +endTab: * close overall tab element +* passed tabParent +row = savedRow + MAX_GRID_HEIGHT$ +Return + +getLayoutValues: + call Set_Status(0) + layoutInformation = Repository("ACCESS", @APPID<1>:"*APPROW**O4WCODES:FORMDESIGNER_LAYOUT") + call Set_Status(0) + If layoutInformation = "" Then + layoutInformation = Xlate("O4WCODES", "FORMDESIGNER_LAYOUT", "", "X") + End + maxGridWidth = layoutInformation + If maxGridWidth = "" Then + maxGridWidth = MAX_GRID_WIDTH$ + End + maxGridHeight = layoutInformation + If maxGridHeight = "" Then + maxGridHeight = MAX_GRID_HEIGHT$ + End + + defGridWidth = layoutInformation + If defGridWidth = "" Then + defGridWidth = DEFAULT_GRID_WIDTH$ + End + defGridHeight = layoutInformation + If defGridHeight = "" Then + defGridHeight = DEFAULT_GRID_HEIGHT$ + End + defGridContainerWidth = layoutInformation + If defGridContainerWidth = "" Then + defGridContainerWidth = DEFAULT_GRID_CONTAINER_WIDTH$ + End + defGridContainerHeight = layoutInformation + If defGridContainerHeight = "" Then + defGridContainerHeight = DEFAULT_GRID_CONTAINER_HEIGHT$ + End + + cellHeight = layoutInformation + If cellHeight = "" Then + cellHeight = DEFAULT_GRID_CELL_HEIGHT$ + End +Return + +addFooterWithButtons: +* btnList<1,x> = list of button text +* btnList<2,x> = associated list of button IDs +* btnList<3,x> = associated list of button positions +* btnList<4,x> = associated list of "is default button?" flags +* this.field.name = footer text +* first, create the mobile footer itself +save.defGridHeight = defGridHeight +defGridHeight = 2 * defGridHeight +footer.text = this.field.name +this.field.name = "" ;* create without any header text +Gosub addFooter2 +footerID = thisID +defGridHeight = save.defGridHeight +* save all the 'real' values +save.parentID = parentID +save.parent = parent +save.tabParent = tabParent +save.overallParent = overallParent +save.currParent = currParent +save.lastTab = lastTab +save.row = row +* next, make a 'button set' to hold the buttons +parentID = footerID +type = CONTROL_TYPE_BUTTON_SET$ +associated = "" +thisID = ELEMENT_PREFIX$:CNTR +cntr += 1 +bProtected = 0 +prop_locn = "" +prop_locn<1,1,FORMINFO_POSN_COL$> = "0" +prop_locn<1,1,FORMINFO_POSN_ROW$> = 0 +prop_locn<1,1,FORMINFO_POSN_HEIGHT$> = defGridHeight +prop_locn<1,1,FORMINFO_POSN_WIDTH$> = maxGridWidth +this.field.value = "" +dict.info = "" +dict.info<10> = 5 +isMV = 0 +bDataBind = 0 +ourLink = "" +ourLinkType = "" +lPlacement = WIDGET_LABEL_POSN_SXS$ +promptText = "" +addClass = "" +addBefore = "" +this.field.label = "" +Gosub addElement +bsetID = thisID +* next, put our buttons inside +parentID = bsetID +row = 0 +btnType = CONTROL_TYPE_BUTTON$ +num.buttons = dcount(btnList<1>, @VM) +save.defGridWidth = defGridWidth +defGridWidth = int(maxGridWidth / num.buttons) +ourCol = 0 +For each.btn = 1 To num.buttons + btn = btnList<1, each.btn> + btnID = btnList<2, each.btn> + * ourCol = btnList<3, each.btn> + bDefault = btnList<4, each.btn> + Gosub addButton2 + ourCol += defGridWidth +Next each.btn +defGridWidth = save.defGridWidth +* finally, put an explicit header inside +parentID = footerID +type = CONTROL_TYPE_HEADER$ +associated = "" +thisID = ELEMENT_PREFIX$:CNTR +cntr += 1 +bProtected = 0 +prop_locn = "" +prop_locn<1,1,FORMINFO_POSN_COL$> = "0" +prop_locn<1,1,FORMINFO_POSN_ROW$> = 1 +prop_locn<1,1,FORMINFO_POSN_HEIGHT$> = defGridHeight +prop_locn<1,1,FORMINFO_POSN_WIDTH$> = maxGridWidth +this.field.value = "" +dict.info = "" +dict.info<10> = 5 +isMV = 0 +bDataBind = 0 +ourLink = "" +ourLinkType = "" +lPlacement = WIDGET_LABEL_POSN_SXS$ +promptText = "" +addClass = "" +addBefore = "" +this.field.label = footer.text +Gosub addElement +* restore everything +parentID = save.parentID +parent = save.parent +tabParent = save.tabParent +overallParent = save.overallParent +currParent = save.currParent +lastTab = save.lastTab +row = save.row +return + +addFooter: +* add in a footer section +this.field.name = copyright_text +addFooter2: +hfRow = row + 5 +If hfRow < MAX_GRID_HEIGHT$ Then + hfRow = MAX_GRID_HEIGHT$ +end +hfSize = 5 +type = CONTROL_TYPE_M_FOOTER$ +custom_names<1,-1> = WIDGET_MSG_MOB_FIXED$ +custom_values<1,-1> = "1" +Goto addHeaderFooter + +addHeader: +this.field.name = headerText +hfRow = "0" +hfSize = "3" +type = CONTROL_TYPE_M_HEADER$ +* fall through + +addHeaderFooter: +* passed type, hfRow, hfSize, this.field.name +save.parentID = parentID +save.parent = parent +save.tabParent = tabParent +save.overallParent = overallParent +save.currParent = currParent +save.lastTab = lastTab +associated = "" +parentID = OVERALL_FORM_ID$:"_":currpage +thisID = ELEMENT_PREFIX$:CNTR +cntr += 1 +bProtected = 0 +prop_locn = "" +prop_locn<1,1,FORMINFO_POSN_COL$> = "0" +prop_locn<1,1,FORMINFO_POSN_ROW$> = hfRow +prop_locn<1,1,FORMINFO_POSN_HEIGHT$> = defGridHeight +prop_locn<1,1,FORMINFO_POSN_WIDTH$> = maxGridWidth +this.field.value = "" +dict.info = "" +dict.info<10> = hfSize +isMV = 0 +bDataBind = 0 +ourLink = "" +ourLinkType = "" +lPlacement = WIDGET_LABEL_POSN_SXS$ +promptText = "" +addClass = "" +addBefore = "" +this.field.label = this.field.name +Gosub addElement +parentID = save.parentID +parent = save.parent +tabParent = save.tabParent +overallParent = save.overallParent +currParent = save.currParent +lastTab = save.lastTab +Return + diff --git a/SYSPROG/STPROC/O4WI_FORMDESIGNER_WIDGET_XXX.txt b/SYSPROG/STPROC/O4WI_FORMDESIGNER_WIDGET_XXX.txt new file mode 100644 index 0000000..611ff6e --- /dev/null +++ b/SYSPROG/STPROC/O4WI_FORMDESIGNER_WIDGET_XXX.txt @@ -0,0 +1,736 @@ +Function O4WI_FORMDESIGNER_WIDGET_XXX(ACTION, headerInfo, formInfo, elementID, param1, param2, param3, param4, param5, param6, param7, param8) +*#!Precompile + +/* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without +* written permission from Revelation Technologies, Inc. +! +* +* VERSION : 1.0 +* +* +* AUTHOR : Revelation Software, Inc., All Rights Reserved +* +* CREATED : July 20, 2015 +* +* +! +* +* REVISION HISTORY (Most CURRENT first) : +* +* DATE IMPLEMENTOR FUNCTION +* -------- ----------- -------- +* +* +*/ +* + +$Insert o4wcommon +$Insert o4wequates +$Insert O4W_DESIGN_FORM_EQUATES + +If Assigned(ACTION) Else ACTION = "" +If Assigned(formInfo) Else formInfo = "" +If Assigned(elementID) Else elementID = "" +If Assigned(param1) Else param1 = "" +If Assigned(param2) Else param2 = "" +If Assigned(param3) Else param3 = "" +If Assigned(param4) Else param4 = "" +If Assigned(param5) Else param5 = "" +If Assigned(param6) Else param6 = "" +If Assigned(param7) Else param7 = "" +If Assigned(param8) Else param8 = "" + + +RSLT = "" +elementName = "Control name here" + +If Not(Num(action)) Or action < WIDGET_ACTION_MIN_VALUE$ Or action > WIDGET_ACTION_MAX_VALUE$ Then + rslt = WIDGET_ACTION_INVALID$ +End Else + On action Gosub doInit, getInfo, doDraw, getProps, doUpdate, doValidate, handleEvent, getPropsForTab, getValue, getRecordInfo +End + +Return RSLT + + +doInit: + title = elementName; text = elementName; image = "../images/widgets/jqm_radio_button.svg" + param1 = title + param2 = text + param3 = image +return + + +GetInfo: + Gosub getFormInfo + infoTypes = param1 + num.info = dcount(infoTypes, @FM) + For each.info = 1 To num.info + infoType = infoTypes + Begin Case + Case infoType = WIDGET_INFO_CONTAINER$ + * return "1" if a container and the childTYpe is allowed or Null + * return "0" if a container and the childType is NOT allowed + * return "" if not a container + childType = param2 + * DO CONTROL-SPECIFIC WORK + + Case infoType = WIDGET_INFO_ASSOCIATED_LABEL$ + * return "1" if this is an element that can be associated with a label + * return "" else + * DO CONTROL-SPECIFIC WORK + + Case infoType = WIDGET_INFO_CAN_DELETE$ + * return "1" if this element can be deleted + * return "0" if it cannot + * DO CONTROL-SPECIFIC WORK + + Case infoType = WIDGET_INFO_DB$ + * return the table/fieldname for this element + *If table <> "" then + * rslt = table:@VM:fieldName + *end + + Case infoType = WIDGET_INFO_ID$ + Rslt = elementID:DRSuffix@ + + Case infoType = WIDGET_INFO_DETAILS$ + * return generic info + RSLT = COMMENT + If RSLT = "" THEN + * DO CONTROL-SPECIFIC WORK + RSLT = ELEMENTNAME + End + + Case infoType = WIDGET_INFO_INPUT$ + * return 1 if input element and enabled + * return 0 if input element and disabled + * return null otherwise + If roFlag <> "1" Then + rslt = "1" + End Else + rslt = "0" + end + + Case infoType = WIDGET_INFO_ALIGN$ + rslt = controlalign + + Case infoType = WIDGET_INFO_BGCOLOR$ + rslt = bgcolor + + Case infoType = WIDGET_INFO_EVENTS$ + If cmBefore Then + rslt = WIDGET_EVENT_BEFORE$ + rslt = "N/A" + End + If cmAfter Then + rslt = WIDGET_EVENT_AFTER$ + rslt = "N/A" + End + If cmChange Then + rslt = WIDGET_EVENT_CHANGED$ + rslt = "N/A" + End + If updateAssociated <> "" Then + rslt = WIDGET_EVENT_ASSOCIATED$ + rslt = updateAssociated + End + + Case infoType = WIDGET_INFO_NAME$ + rslt = name + + End Case + Next each.info +Return + + +doValidate: + Gosub getFormInfo + updateList = "" + + If COMMENT = "" And table <> "" Then + comment = Xlate("DICT.":table, fieldname, 3, "X") + Convert @VM:@SVM:@TM To " " In comment + FORMINFO = COMMENT + End + + * DO CONTROL-SPECIFIC WORK + rslt = O4WI_FORMDESIGNER_WIDGET_HELPER("VALIDATE_ADV", headerInfo, formInfo, "","","", adv_props) + + If rslt = "" then + Gosub handleAssociated + end + + param1 = updateList +Return + + +handleEvent: + setupInfo = param1 + event = setupInfo<1> + runMode = setupInfo<2> + bMobile = setupInfo<3> + suffix = setupInfo<4> + save.drrecords = DRRecords@ + save.keys = DRKeys@ + Gosub getValue + DRRecords@ = param4 + DRKeys@ = param5 + + Begin Case + Case event _eqc "CHANGE" + If updateAssociated <> "" Then + * tell all the associated fields that they must be redrawn + numAssociated = dcount(updateAssociated, @TM) + For each.associated = 1 To numAssociated + this.other = Field(updateAssociated, @TM, each.associated) + needRefresh = o4wi_formdesigner_helper(this.other, headerInfo, formInfo, "1", runMode, bMobile, err) + Next each.associated + rslt = 1 ;* report that this has been handled here + End + If cmChange Then + * call the commuter module + end + Case event _eqc "PRE_FIELD" + If cmBefore Then + * call the commuter module + end + Case event _eqc "POST_FIELD" + If cmAfter Then + * call the commuter module + end + End Case + DRRecords@ = save.DRRecords + DRKeys@ = save.Keys + Return + +doDraw: + setupInfo = param1 + isReplace = param4 + 0 + + runMode = setupInfo<1> + bMobile = setupInfo<2> + parentStyles = setupInfo<3> + * if isReplace, and we can't just update our value/style, we have to redraw our parent and ourselves + parentSectionID = setupInfo<4> + parentSectionStyle = setupInfo<5> + needRefresh = 0 + + Gosub getFormInfo + Gosub getRecordInfo + + oldUIFlag = headerInfo+0 + inlinePromptFlag = (headerInfo = HEADER_DEFAULT_LABELTYPE_INLINE$) + + * DO CONTROL-SPECIFIC WORK + If DRROOverrideFlag@ <> "" Then + roFlag = DRROOverrideFlag@ + end + If roFlag Then + style := @SVM:"readOnly" + End Else + style := @SVM:"readWrite" + end + If oldUIFlag Then + style := @SVM:"classicUI" + End + + Style := @SVM:classes + num.data = dcount(datastyles_names, @TM) + For each.data = 1 To num.data + Style := @SVM:o4wdatastyle("", Field(datastyles_names, @TM, each.data), Field(datastyles_values, @TM, each.data)) + Next each.data + + If isReplace Then + * use o4wupdate + End Else + * draw for real + If html_before <> "" Then + o4wraw(html_before) + End + * element specific instructions + If html_after <> "" Then + o4wraw(html_after) + end + End + + param2 = "0" ;* must call "buildParent"? + param3 = "" ;*blankLine:@FM:sizeStyle:@FM:specialStyle:@FM:divHeader:@FM:divHeaderSize + + rslt = needRefresh +return + +getValue: +Gosub getFormInfo +currentValue = "" +iValue = "" +dict.Info = "" +atRecord = "" +recordList = "" +keyList = DRKeys@ +posn = "" +convError = "" +special.conv = "" +If table <> "" And fieldName <> "" then + Locate table In DRTables@ using @FM setting posn Else + DRTables@ = table + end + Open "DICT",table To @DICT Else null + Read dict.info From @DICT, fieldName Else dict.Info = "" + atrecord = Field(DRRecords@, @RM, posn) + key = DRKeys@ +end +bUseDict = 0 +Begin Case + Case conv_i = "NONE" + conv_i = "" + Case conv_i = "USER" + *conv_i = conv_i_userdef + Case conv_i = "-" + conv_i =dict.info<11> + bUseDict = 1 + End Case +currentValue = o4wGetValue(name) +iValue = currentValue +If conv_i <> "" Then + * Convert 'standard' user-defined formats to our own (non-ui) versions + Swap "EMAIL_FORMAT" With "EMAIL_FORMAT_INTERNAL" In conv_i + Swap "PHONE_FORMAT" With "PHONE_FORMAT_INTERNAL" In conv_i + Swap "ZIP_FORMAT" With "ZIP_FORMAT_INTERNAL" In conv_i + Swap "SSN_FORMAT" With "SSN_FORMAT_INTERNAL" In conv_i + status() = 0 + If bUseDict Then + * use in.value to handle the validation/input conversion + Declare Function in.value + bIsValid = 1 + num.vals = dcount(iValue, @VM) + iNewValue = "" + For each.val = 1 To num.vals While bIsValid + this.newValue = iValue<1,each.val> + this.iNewValue = in.value(this.newValue, conv_i, bIsValid) + If bIsValid = 0 And conv_i[1,1] <> "(" Then + bIsValid = 1 + this.iNewValue = in.value(this.newValue, "(":conv_i:")", bIsValid) + End + If (bIsValid = 0 Or status()) Then + bIsValid = 0 + convError<1,-1> = "Error converting '":this.newValue:"' using conversion code '":conv_i:"'" + End + iValue<1, each.val> = this.iNewValue + Next each.val + End else + iValue = Iconv(iValue, conv_i) + If status() Then + convError<1,-1> = "Error converting '":currentValue:"' using conversion code '":conv_i:"'" + End + End + * don't really care (here) if it's an invalid value... + status() = 0 + * special case for MC (masked character) conversions - ONLY operate as OCONV + If (conv_i = "MCU" Or conv_i = "MCL") And special.conv = "" Then + special.conv = conv_i[3,1] + end + end +If special.conv <> "" Then + * special.conv is either U or L to uppercase or lowercase the input value + currentValue = Oconv(iValue, "MC":special.conv) +end +param1 = currentValue +param2 = iValue +If roFlag <> "1" And DRROOverrideFlag@ <> "1" And dict.Info <> "" Then + If dict.info<1>[1,1] = "F" Or dict.info<1>[1,1] = "S" Then + fieldNo = dict.info<2> + If Num(fieldNo) And fieldNo <> "" Then + If fieldNo = 0 Then + keyPart = dict.info<5> + If Num(keyPart) And keyPart <> "" And keyPart <> "0" Then + key = fieldstore(key, "*", keyPart, 1, iValue) + End Else + key = iValue + end + keyList = key + End else + atRecord = iValue + recordList = fieldstore(DRRecords@, @RM, posn, 1, atRecord) + end + end + End +End +param3 = atRecord +param4 = recordList +param5 = keyList +param6 = convError +Return + +getPropsForTab: + passedInfo = param1 + currTab = param2 + + If currTab _nec PROPS_TAB_NAME_FMT$ Then Return ;* only care when we leave the db tab + + * get the current info + reqd_props = passedInfo + opt_props = passedInfo + db_props = passedInfo + fmt_props = passedInfo + mob_props = passedInfo + evt_props = passedInfo + adv_props = passedInfo + parent = passedInfo + + Gosub extractDetails + + * something here has changed - reset the fields + reqd_info = "" + opts_info = "" + db_info = "" + fmt_info = "" + mob_info = "" + evt_info = "" + adv_info = "" + propName = elementName + Gosub getPropsFmt + + param3 = PROPS_TAB_NUM_FMT$ + param4 = FMT_info + + Return + +getProps: + passedInfo = param1 + reqd_props = passedInfo + opt_props = passedInfo + db_props = passedInfo + fmt_props = passedInfo + mob_props = passedInfo + evt_props = passedInfo + adv_props = passedInfo + parent = passedInfo + + Gosub extractDetails + + reqd_info = "" + opts_info = "" + db_info = "" + fmt_info = "" + mob_info = "" + evt_info = "" + adv_info = "" + propName = "" + + * DO CONTROL-SPECIFIC WORK + adv_info = O4WI_FORMDESIGNER_WIDGET_HELPER("DISPLAY_ADV", headerInfo, formInfo, "","","", adv_props) + + + * SET UP PROPNAME, XXX_INFO +getPropsFmt: + + param2 = reqd_info + param3 = opts_info + param4 = db_info + param5 = fmt_info + param6 = mob_info + param7 = evt_info + param8 = adv_info + rslt = propName +Return + +getFormInfo: +bFound = 0 +comment = "" +ctype = "" +parent = "" +children = "" +reqd_props = "" +opt_props = "" +db_props = "" +fmt_props = "" +mob_props = "" +evt_props = "" +adv_props = "" +locn = "" +associated = "" +Locate elementID In formInfo using @VM setting posn Then + bFound = 1 + COMMENT = FORMINFO + CTYPE = FORMINFO + PARENT = FORMINFO + CHILDREN = FORMINFO + REQD_PROPS = FORMINFO + OPT_PROPS = FORMINFO + db_props = forminfo + fmt_props = forminfo + mob_props = forminfo + evt_props = formInfo + adv_props = formInfo + LOCN = FORMINFO + ASSOCIATED = FORMINFO + ASSOCIATED_LABEL_TYPE = FORMINFO +end +* fall through to extractDetails + +extractDetails: + * PULL OUT CONTROL-SPECIFIC DETAILS + dummy = O4WI_FORMDESIGNER_WIDGET_HELPER("EXTRACT_ADV", headerInfo, formInfo, "","","", adv_props, html_before, html_after, classes, datastyles_names, datastyles_values) + +Return + +/* +AddElement: +newPosn = o4wi_formdesigner_widget_new(headerInfo, formInfo, thisID, parent, childtype, prop_locn, elementID, bProtected, addBefore) +Return +*/ + +handleAssociated: + If associated = "" Then return + Locate associated<1,1,1> In formInfo using @VM setting aPos then + CTYPE = formInfo + supportName = UCASE(DESIGN_SUPPORT_PREFIX$:CTYPE) + whichTypes = "" + whichValues = "" + * headerText = opt_props<1,1,2> + * headerSize = opt_props<1,1,3> + *whichTypes = "TEXT":@fm:"SIZE" + *whichValues = headerText:@FM:headerSize + call @supportName(WIDGET_ACTION_UPDATE$, headerInfo, formInfo, associated, elementID, whichTypes, whichValues) + End +Return + +doUpdate: + * our associated element has changed - update ourselves + Gosub getFormInfo + + associatedID = param1 + whichParameter = param2 + newValues = param3 + num.params = dcount(whichParameter, @FM) + For each.param = 1 To num.params + this.param = whichParameter + this.value = newValues + Begin Case + case this.param = WIDGET_MSG_LABEL$ Or this.param = WIDGET_MSG_LEGEND$ + reqd_props<1,1,1> = this.value + Case this.param = WIDGET_MSG_BTN_DEFAULT$ + If this.value = "0" Or this.value = "1" then + reqd_props<1,1,2> = this.value + end + Case this.param = WIDGET_MSG_OMIT_LABEL$ + If this.value = "0" Or this.value = "1" then + reqd_props<1,1,2> = this.value + 0 + End + Case this.param = WIDGET_MSG_LABEL_PLACEMENT$ + reqd_props<1,1,3> = this.value + Case this.param = WIDGET_MSG_NAME$ + reqd_props<1,1,4> = this.value + + + Case this.param = WIDGET_MSG_FONT_NAME$ + fmt_props<1,1,1> = this.value + Case this.param = WIDGET_MSG_FONT_COLOR_BG$ + fmt_props<1,1,2> = this.value + Case this.param = WIDGET_MSG_FONT_COLOR_FG$ + fmt_props<1,1,3> = this.value + Case this.param = WIDGET_MSG_FONT_BOLD$ + if this.value = "0" or this.value = "1" then + fmt_props<1,1,4> = this.value + end + Case this.param = WIDGET_MSG_FONT_ITALIC$ + if this.value = "0" or this.value = "1" then + fmt_props<1,1,5> = this.value + end + Case this.param = WIDGET_MSG_FONT_ALIGN$ + if num(this.value) then + fmt_props<1,1,6> = this.value + end + Case this.param = WIDGET_MSG_FONT_SIZE$ + fmt_props<1,1,7> = this.value + Case this.param = WIDGET_MSG_CONTROL_ALIGN$ + If Num(this.value) Then + fmt_props<1,1,8> = this.value + end + + Case this.param = WIDGET_MSG_MOB_ICON$ + mob_props<1,1,1> = this.value + Case this.param = WIDGET_MSG_MOB_THEME$ + mob_props<1,1,2> = this.value + Case this.param = WIDGET_MSG_MOB_LAYOUT$ + mob_props<1,1,3> = this.value + Case this.param = WIDGET_MSG_MOB_MINI$ + If this.value = "0" Or this.value = "1" then + mob_props<1,1,4> = this.value + end + + Case this.param = WIDGET_MSG_OPT_HEIGHT$ + opt_props<1,1,1> = this.value + Case this.param = WIDGET_MSG_OPT_WIDTH$ + opt_props<1,1,2> = this.value + Case this.param = WIDGET_MSG_SELECT_MULTI$ + If this.value = "0" Or this.value = "1" then + opt_props<1,1,3> = this.value + end + Case this.param = WIDGET_MSG_SUPPRESS_DESIGN$ + If this.value = "0" Or this.value = "1" then + opt_props<1,1,4> = this.value + End + + Case this.param = WIDGET_MSG_DB_TABLE$ + db_props<1,1,1> = this.value + Case this.param = WIDGET_MSG_DB_FIELD$ + db_props<1,1,2> = this.value + Case this.param = WIDGET_MSG_DB_MV$ + If this.value = "0" Or this.value = "1" then + db_props<1,1,3> = this.value + 0 + end + Case this.param = WIDGET_MSG_CONV_O$ + db_props<1,1,4> = this.value + Case this.param = WIDGET_MSG_CONV_O_USER$ + db_props<1,1,5> = this.value + Case this.param = WIDGET_MSG_CONV_I$ + db_props<1,1,6> = this.value + Case this.param = WIDGET_MSG_CONV_I_USER$ + db_props<1,1,5> = this.value + + Case this.param = WIDGET_MSG_SET_SHOWNONE$ + If this.value = "0" Or this.value = "1" then + db_props<1,1,5> = this.value + End + + + Case this.param = WIDGET_MSG_LINK$ + If this.value = "" Or this.value = "0" Then + * no link here + opt_props<1,1,1> = 0 + opt_props<1,1,2> = "" + opt_props<1,1,3> = "" + End Else If this.value = "1" then + * link here + opt_props<1,1,1> = 1 + end + Case this.param = WIDGET_MSG_LINK_TYPE$ + If opt_props<1,1,1> = "1" Or opt_props<1,1,1> = "" Then + opt_props<1,1,1> = "1" + opt_props<1,1,2> = this.value + End + Case this.param = WIDGET_MSG_LINK_URL$ + If opt_props<1,1,1> = "1" Or opt_props<1,1,1> = "" Then + opt_props<1,1,1> = "1" + opt_props<1,1,3> = this.value + End + + + Case this.param = WIDGET_MSG_EVENT_POPUP$ + If this.value = "1" Or this.value = "0" Then + evt_props<1,1,1> = this.value + end + Case this.param = WIDGET_MSG_EVENT_CLICK$ + If this.value = "1" Or this.value = "0" Then + evt_props<1,1,2> = this.value + end + Case this.param = WIDGET_MSG_EVENT_UPDATE_ASSOCIATED$ + evt_props<1,1,1> = this.value + Case this.param = WIDGET_MSG_EVENT_BEFORE$ + If this.value = "1" Or this.value = "0" Then + evt_props<1,1,2> = this.value + end + Case this.param = WIDGET_MSG_EVENT_CHANGED$ + If this.value = "1" Or this.value = "0" Then + evt_props<1,1,3> = this.value + end + Case this.param = WIDGET_MSG_EVENT_AFTER$ + If this.value = "1" Or this.value = "0" Then + evt_props<1,1,4> = this.value + end + + + Case this.param = WIDGET_MSG_LIST_SOURCE$ + reqd_props<1,1,3> = this.value + Case this.param = WIDGET_MSG_LIST_TABLE$ Or this.param = WIDGET_MSG_LIST_STPROC$ + reqd_props<1,1,4> = this.value + Case this.param = WIDGET_MSG_LIST_CODE_RECORD$ + reqd_props<1,1,5> = this.value + Case this.param = WIDGET_MSG_LIST_CODE_FIELD_VALUE$ Or this.param = WIDGET_MSG_LIST_SELECT$ + reqd_props<1,1,6> = this.value + Case this.param = WIDGET_MSG_LIST_CODE_FIELD_DESC$ + If reqd_props<1,1,3> = "2" Then + reqd_props<1,1,7> = this.value + End Else + reqd_props<1,1,5> = this.value + End + Case this.param = WIDGET_MSG_LABEL_TYPE$ + ASSOCIATED_LABEL_TYPE = this.value + Case 1 + * see if these are advanced properties + dummy = O4WI_FORMDESIGNER_WIDGET_HELPER("UPDATE_ADV", headerInfo, formInfo, "","","", adv_props, this.param, this.value) + + End CASE + Next each.param + + * make sure forminfo is updated + FORMINFO = COMMENT + FORMINFO = CTYPE + FORMINFO = PARENT + FORMINFO = CHILDREN + FORMINFO = REQD_PROPS + FORMINFO = OPT_PROPS + forminfo = db_props + forminfo = fmt_props + formInfo = mob_props + formInfo = evt_props + formInfo = adv_props + FORMINFO = LOCN + FORMINFO = ASSOCIATED + FORMINFO = ASSOCIATED_LABEL_TYPE + +Return + + +getRecordInfo: +currentValue = "" +iValue = "" +If runMode = 1 then + If Len(TABLE) then + Locate table In DRTables@ using @FM setting posn Else posn = 1 + Open "DICT",table To @DICT then + Read dict.info From @DICT, fieldName Else dict.Info = "" + Begin Case + Case conv_o = "NONE" + conv_o = "" + Case conv_o = "USER" + *conv_o = conv_o_userdef + Case conv_o = "-" + conv_o = dict.info<7> + End Case + Begin Case + Case conv_i = "NONE" + conv_i = "" + Case conv_i = "USER" + *conv_i = conv_i_userdef + Case conv_i = "-" + conv_i = dict.info<11> + End Case + @record = Field(DRRecords@, @RM, posn) + @id = DRKeys@ + valno = DRKeys@ + iValue = calculate(fieldName) + end + End + If bIsMV then + DRNumMV@ = dcount(iValue, @VM) + If DRMV@ + 0 Then + iValue = iValue<1, DRMV@> + End Else If DRNumMV@ > 1 Then + If valno Then + iValue = iValue<1, valno> + DRNumMV@ = 1 ;* if we've got a valno in the key list, then we just want _this_ value + End Else + * TO DO + end + End + end + currentValue = iValue + If conv_o <> "" then + currentValue = Oconv(iValue, conv_o) + end +End +return diff --git a/SYSPROG/STPROC/O4WI_UPLOAD_DROPBOX.txt b/SYSPROG/STPROC/O4WI_UPLOAD_DROPBOX.txt new file mode 100644 index 0000000..8fc3b58 --- /dev/null +++ b/SYSPROG/STPROC/O4WI_UPLOAD_DROPBOX.txt @@ -0,0 +1,85 @@ +Subroutine O4WI_UPLOAD_DROPBOX(origvalue, destn, size, name, ID, StyleInfo) +*#!Precompile +/* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without +* written permission from Revelation Technologies, Inc. +! +* +* VERSION : 1.0 +* +* +* AUTHOR : Bryan Shumsky +* +* CREATED : November 6, 2019 +* +* +! +* +* REVISION HISTORY (Most CURRENT first) : +* +* DATE IMPLEMENTOR FUNCTION +* -------- ----------- -------- +* 17 July 2020 bzs Fixed storage of data in preservedInfo dynamic array +* +*/ +* +Equ DROPBOX_SAVED_KEY$ To "DROPBOX_UPLOAD" +* +$Insert O4WCommon +$Insert O4WEquates +* +If Assigned(destn) Else destn = "" +If Assigned(ID) Else ID = "" +If Assigned(name) Else name = "" +If Assigned(StyleInfo) Else StyleInfo = "" +If Assigned(size) Else size = "" +If Assigned(origvalue) Else origvalue = "" +* +Declare Function rti_util_dropbox, rti_get_cfg +* +dropboxInfo = rti_get_cfg("CFG_DROPBOX") +* <1> URL for API request +* <2> access token +* <3> duration for link (optional) +* <4> folder for output (optional) +* <5> list of valid extensions (comma-delimited) (optional) +* +If dropboxinfo<1> = "" Or dropboxInfo<2> = "" Then Return + +link = rti_util_dropbox("UPLOAD_LINK", origValue) + +* parse new link and put into destn +destn = "" +If link <> "" Then + * success + * replace (or add) our special style + Locate "o4wfile" In styleInfo<1,1> using @SVM setting dummy Else null + styleInfo<1,1,dummy> = "o4wDropboxFile" + + validExts = dropboxInfo<5> + If validExts <> "" Then + Convert @VM To "," In validExts ;* make sure we have the proper delimiter + acceptTypes = validExts + * so we have a list for example of jpg,jpeg,zip,bin + Swap "," With ",." In acceptTypes + * now the list is jpg,.jpeg,.zip,.bin + acceptTypes = ".":acceptTypes + styleInfo<1,1,-1> = o4wUploadBoxOptions("", acceptTypes) + Convert "," To "|" In validExts + o4wstore(validExts, id:"_dropbox_ext", id:"_dropbox_ext") + end + o4wstore(link, id:"_dropbox_url", id:"_dropbox_url") + + Read preservedInfo From O4WTempFile%, O4WSessionId%:"*":DROPBOX_SAVED_KEY$ Else preservedInfo = "" + Locate id In preservedInfo<1> using @VM setting dummy Then + preservedInfo<2,dummy> = origValue + End Else + preservedInfo<1,-1> = id + preservedInfo<2,-1> = origValue + end + Write preservedInfo On O4WTempFile%, O4WSessionId%:"*":DROPBOX_SAVED_KEY$ + + o4wstore(DROPBOX_SAVED_KEY$, "o4wOtherUploads") +End + +Return 0 diff --git a/SYSPROG/STPROC/OBJ_APPWINDOW.txt b/SYSPROG/STPROC/OBJ_APPWINDOW.txt new file mode 100644 index 0000000..e8184f7 --- /dev/null +++ b/SYSPROG/STPROC/OBJ_APPWINDOW.txt @@ -0,0 +1,865 @@ +COMPILE FUNCTION obj_AppWindow(Method,Parms) + +/* + Methods for Application Windows + + 09/30/2001 by JCH - J.C. Henry, Inc + + Properties: + + + + Methods: + + Create(Window) ;* ID of window to center + Page(Window) ;* ID of window + Read(Window) ;* Sets @PREV_ID & @PREV_REC if null after a read + PreWrite(Window) ;* Sets @PREV_ID & @PREV_REC on write + PrevRec(Window) ;* - Copy previous record + PrevVal(Window) ;* - Copy old (previous) field value + ReadOnly(Window,Clear) ;* Read Only + LUValReturn(ValueReturned,FocusControl,FocusPos) ;* Return value and moves to next field with all events + CardReturn() + DetailReturn() + SetDropDowns() + + LoadFormKeys( FormName, FormKey) + ;* Parses and loads all or part of a multi part key into a form using that key then moves to next field. + ;* Triggers Read event if complete key is loaded. + ;* If a partial key is passed, the routine will sets focus to empty key field + + ViewNewCard( CardWindow, CardKey, NewCardCtrl, RecalcCtrl, RecalcPos, [RetCtrl,RetPos] ) + + ;* Views existing or creates new record in 'Card' type window. i.e. name,vendor, customer ... + ;* Cards have their ID used in a record and display information from the card. + ;* Card Records have single part keys and do not have a relational index to the table where used. + + ViewNewDetail(DetWindow,DetKeys,DefaultRec,[RetKey,RetPage,RetCtrl,RetPos]) [optional parms] + + ;* Routine to Create or View 'Item Detail' type records from a master window. + ;* Used for things like Purchase Orders, Sales Orders, Parts and Part Revisions + ;* Detail records have a 2 part key and maintain a relational index back to the master table. + ;* This routine is used with an edit table in the Master Table window that displays the + ;* detail keys associated with it. + +*/ + +DECLARE SUBROUTINE Set_Status,Set_Property, Send_Event, Start_Window, Post_Event +DECLARE FUNCTION Get_Status,Get_Property, Utility + +$INSERT Logical +$INSERT CopyRight +$INSERT DICT_EQUATES + +EQU FIX_SUFFIX$ TO "_FIX" +EQU TAB_PREFIX$ TO "PAGE_" +EQU TAB_SUFFIX$ TO "_TAB" + +EQU CRLF$ TO CHAR(13):CHAR(10) + +EQU COL$ TO 1 +EQU ROW$ TO 2 + +EQU ReadOnlyStyle$ TO 2048 + +ErrTitle = 'Error in obj_AppWindows' + +ErrorMsg = '' + +IF NOT(ASSIGNED(Method)) THEN + ErrorMsg = 'Unassigned parameter "Method" passed to subroutine.' ; Method = '' +END ELSE + IF Method = '' THEN + ErrorMsg = 'Null parameter "Method" passed to subroutine' + END +END + +IF ErrorMsg NE '' THEN + stat = Set_Status(-1,ErrTitle:@SVM:ErrorMsg) ;* Initialization Errors + RETURN '' +END + +IF NOT(ASSIGNED(Parms)) THEN Parms = '' + +Result = '' + +BEGIN CASE + CASE Method = 'Create' ; GOSUB Create + CASE Method = 'Page' ; GOSUB Page + CASE Method = 'Read' ; GOSUB Read + CASE Method = 'PreWrite' ; GOSUB PreWrite + CASE Method = 'PrevRec' ; GOSUB PrevRec + CASE Method = 'PrevVal' ; GOSUB PrevVal + CASE Method = 'ReadOnly' ; GOSUB ReadOnly + CASE Method = 'LUValReturn' ; GOSUB LUValReturn + CASE Method = 'LoadFormKeys' ; GOSUB LoadFormKeys + CASE Method = 'ViewNewCard' ; GOSUB ViewNewCard + CASE Method = 'ViewNewDetail' ; GOSUB ViewNewDetail + CASE Method = 'ViewRelated' ; GOSUB ViewRelated + CASE Method = 'CardReturn' ; GOSUB CardReturn + CASE Method = 'DetailReturn' ; GOSUB DetailReturn + CASE Method = 'SetDropDowns' ; GOSUB SetDropDowns + + CASE 1 + ErrMsg = 'Unknown Method ':QUOTE(Method):' passed to routine.' +END CASE + +IF ErrorMsg NE '' THEN + stat = Set_Status(-1,ErrTitle:@SVM:ErrorMsg) ;* Initialization Errors +END + +RETURN Result + + +* * * * * * * +Create: +* * * * * * * + +* Center the window and make it visible +* Cloned from RTI's supplied routine. Assumes window is NOT visible when called + +Window = Parms[1,@RM] +IF Window = '' THEN Window = @WINDOW + +* Window id the name of the window to be centered +* MDI_Name - the name of the MDI frame +* SystemSize - the size of the system window +* WindowSize - the size of the window to be cenered + +MDI_Name = Get_Property(Window,'MDIFRAME') + +* If the window is an MDI child, the name of the frame will be retrieved + +WindowSize = Get_Property(Window,"SIZE") + +IF MDI_Name EQ '' THEN + SystemSize = Get_Property("SYSTEM","SIZE") + xPos = SystemSize<1>/2 - WindowSize<3>/2 + yPos = SystemSize<2>/2 - WindowSize<4>/2 +END ELSE + MDI_Size = Get_Property(MDI_Name,"CLIENTSIZE") + xPos = MDI_Size<1>/2 - WindowSize<3>/2 + yPos = MDI_Size<2>/2 - WindowSize<4>/2 +END + +Ctrls = Window:@RM +Props = 'SIZE':@RM +Vals = xPos:@FM:yPos:@FM:WindowSize<3>:@FM:WindowSize<4>:@RM ;* Center window in System Window + +Ctrls := Window:@RM +Props := 'VISIBLE':@RM +Vals := '1':@RM ;* Make the window visible + +CtrlList = '' +cCtrlList = '' + +CtrlList = Get_Property(Window,'CTRLMAP') + +IF INDEX(CtrlList,'PAGE_1_TAB',1) THEN + Send_Event(@WINDOW:'.PAGE_1_TAB','GOTFOCUS') +END + +FOR iCtrl = 1 TO COUNT(CtrlList,@FM) + (CtrlList NE '') + + Ctrl = CtrlList + + IF Ctrl[-4, 4] = '_FIX' THEN + Ctrls := Ctrl:@RM + Props := "PAGELIST":@RM + Vals := '-1':@RM ;* Show this control on all pages + END + + IF INDEX(Ctrl,'STATUSLINE',1) OR INDEX(Ctrl,'STATUSLINE_FIX',1) THEN + Ctrls := Window:@RM + Props := 'STATUSLINE':@RM + Vals := Ctrl:@RM ;* Set window STATUSLINE to this control + END + IF INDEX(Ctrl,'STATUS_OUTLINE',1) OR INDEX(Ctrl,'STATUS_OUTLINE_FIX',1) THEN + Ctrls := Ctrl:@RM + Props := 'STYLE':@RM + Vals := '0X50000008':@RM ;* Make background transparent + END + +NEXT iCtrl + +Ctrls[-1,1] = '' ; Props[-1,1] = '' ; Vals[-1,1] = '' ;* Drop trailing Record Marks + +Set_Property(Ctrls,Props,Vals) + +* Build @ET_SYMBOLICS data structure for window + +ETSymbolics = '' + +EditTables = Utility ('OBJECTLIST', Window, 'EDITTABLE') + +FOR I = 1 TO COUNT(EditTables,@FM) + (EditTables NE '') + EditTable = EditTables + CtrlCols = Get_Property(EditTable,'COLUMN') + CtrlTables = Get_Property(EditTable, 'TABLE') + LastTable = '' + FOR N = 1 TO COUNT(CtrlCols,@SVM) + (CtrlCols NE '') + CtrlCol = CtrlCols<1,1,N> + TableName = CtrlTables<1,1,N> + IF TableName NE '' THEN + IF TableName NE LastTable THEN + DictStruct = XLATE('DICT.':TableName,'%FIELDS%','','X') + LastTable = TableName + END + + LOCATE CtrlCol IN DictStruct USING @VM SETTING Pos THEN + IF DictStruct = 'S' THEN + LOCATE EditTable IN ETSymbolics<1> USING @VM SETTING ETPos ELSE + ETSymbolics = INSERT(ETSymbolics,1,ETPos,0,EditTable) + END + ETSymbolics<2,ETPos,-1> = N ;* Add Column Number to the list + END + END + END + NEXT N +NEXT I + +Set_Property(Window,'@ET_SYMBOLICS',ETSymbolics) + +RETURN + + +* * * * * * * +Page: +* * * * * * * + +Page = Get_Property(@WINDOW, 'VPOSITION')<1> +Set_Property(@WINDOW:".":TAB_PREFIX$:Page:TAB_SUFFIX$, 'CHECK',TRUE$) + +RETURN + + +* * * * * * * +Read: +* * * * * * * + +Window = Parms[1,@RM] +IF Window = '' THEN Window = @WINDOW + +Ctrls = Window:@RM:Window:@RM:Window:@RM:Window +Props = '@PREV_ID':@RM:'@PREV_REC':@RM:'ID':@RM:'RECORD' + +Vals = Get_Property(Ctrls,Props) + +PrevID = Vals[1,@RM] +PrevRec = Vals[COL2()+1,@RM] +ID = Vals[COL2()+1,@RM] +Record = Vals[COL2()+1,@RM] + +IF PrevID = '' THEN Set_Property(Window,'@PREV_ID',ID) +IF PrevRec = '' THEN Set_Property(Window,'@PREV_REC',Record) + +RETURN + + +* * * * * * * +PreWrite: +* * * * * * * + +Window = Parms[1,@RM] +IF Window = '' THEN Window = @WINDOW + +Ctrls = Window:@RM:Window +Props = 'ID':@RM:'RECORD' + +Vals = Get_Property(Ctrls,Props) + +ID = Vals[1,@RM] +Record = Vals[COL2()+1,@RM] + +Props = '@PREV_ID':@RM:'@PREV_REC' +Vals = ID:@RM:Record + +Set_Property(Ctrls,Props,Vals) ;* Store off ID and record for defaults + +RETURN + + + +* * * * * * * +PrevRec: +* * * * * * * + +* - Copy previous record + +Ctrls = @WINDOW:@RM:@WINDOW:@RM:@WINDOW +Props = 'FOCUS':@RM:'@PREV_REC':@RM:'CTRLMAP' + +Vals = Get_Property(Ctrls,Props) + +CtrlName = Vals[1,@RM] +PrevRec = Vals[COL2()+1,@RM] +CtrlMap = Vals[COL2()+1,@RM] + +CONVERT @FM TO @RM IN CtrlMap + +PosList = Get_Property(CtrlMap,STR('POS':@RM,COUNT(CtrlMap,@RM)):'POS') +ConvList = Get_Property(CtrlMap,STR('CONV':@RM,COUNT(CtrlMap,@RM)):'CONV') + +Ctrls = '' +Props = '' +Vals = '' + +FOR I = 1 TO COUNT(PosList,@RM) + (PosList NE '') + + Pos = FIELD(PosList,@RM,I) + + IF Pos NE '' AND Pos > 0 THEN + Conv = FIELD(ConvList,@RM,I) + Ctrl = FIELD(CtrlMap,@RM,I) + + IF INDEX(Pos,@SVM,1) THEN + + * We're in a Multivalued control i.e. edittable + + CtrlArray = '' + + FOR N = 1 TO COUNT(Pos,@SVM) + (Pos NE '') + ColPos = FIELD(Pos,@SVM,N) + ColConv = FIELD(Conv,@SVM,N) + ColValues = PrevRec + IF ColConv NE '' THEN + ColValues = OCONV(ColValues,ColConv) + END + + CtrlArray = ColValues + NEXT N + + Ctrls := Ctrl:@RM + Props := 'DEFPROP':@RM + Vals := CtrlArray:@RM + + END ELSE + + Value = PrevRec + + IF Conv NE '' THEN Value = OCONV(Value,Conv) + + Ctrls := FIELD(CtrlMap,@RM,I):@RM + Props := 'DEFPROP':@RM + Vals := Value:@RM + END + + END +NEXT I + +Ctrls[-1,1] = '' +Props[-1,1] = '' +Vals[-1,1] = '' + +Set_Property(Ctrls,Props,Vals) + +RETURN + + +* * * * * * * +PrevVal: +* * * * * * * + +* - Copy previous field value, also works in the keys fields + +Ctrls = @WINDOW:@RM:@WINDOW:@RM:@WINDOW +Props = 'FOCUS':@RM:'@PREV_ID':@RM:'@PREV_REC' + +Vals = Get_Property(Ctrls,Props) + +CtrlName = Vals[1,@RM] +PrevID = Vals[COL2()+1,@RM] +PrevRec = Vals[COL2()+1,@RM] + +Ctrls = CtrlName:@RM:CtrlName:@RM:CtrlName +Props = 'POS':@RM:'PART':@RM:'CONV' + +Vals = Get_Property(Ctrls,Props) + +Pos = Vals[1,@RM] +Part = Vals[COL2()+1,@RM] +Conv = Vals[COL2()+1,@RM] + +IF Index(Pos,@SVM,1) THEN + + * Multi-Valued control i.e. We're in an edit table + + SelPos = Get_Property(CtrlName,'SELPOS') + + SelCol = SelPos + SelRow = SelPos + + ColPos = FIELD(Pos,@SVM,SelCol) + ColConv = FIELD(Conv,@SVM,SelCol) + + Value = PrevRec + + IF Conv NE '' THEN Value = OCONV(Value,ColConv) + + Set_Property(CtrlName,'DEFPROP',Value,SelPos) + Set_Property(CtrlName,'SELECTION',1,@FM:LEN(Value)) + + +END ELSE + + * Single valued control + + IF Pos = 0 THEN + Value = FIELD(PrevID,'*',Part) + END ELSE + Value = PrevRec + END + + IF Conv NE '' THEN Value = OCONV(Value,Conv) + + Set_Property(CtrlName,'DEFPROP',Value) + Set_Property(CtrlName,'SELECTION',1,@FM:LEN(Value)) + +END + +RETURN + + +* * * * * * * +ReadOnly: +* * * * * * * + +thisFormName = Parms[1,@RM] +ClearFlag = Parms[COL2()+1,@RM] + +IF thisFormName = '' THEN thisFormName = @WINDOW + +IF ClearFlag = '' THEN ClearFlag = 0 + +* Get control map and find key controls +* Changed from Controlling ENABLE to setting STYLE ReadOnly bit - 09/30/2005 - JCH, J.C. Henry & Co., Inc. + +CtrlMap = Get_Property(thisFormName,'CTRLMAP') + +CONVERT @FM TO @RM IN CtrlMap + +PosList = Get_Property(CtrlMap,STR('POS':@RM,COUNT(CtrlMap,@RM)):'POS') + +WindowTitle = Get_Property(thisFormName,'TEXT') + +IF ClearFlag THEN + SWAP ' < V i e w O n l y >' WITH '' IN WindowTitle +END ELSE + IF NOT(INDEX(WindowTitle,'< V i e w',1)) THEN + WindowTitle := ' < V i e w O n l y >' + END +END + +Set_Property(thisFormName,'TEXT',WindowTitle) + +FOR I = 1 TO COUNT(PosList,@RM) + (PosList NE '') + + Pos = FIELD(PosList,@RM,I) + + IF Pos NE 0 THEN + Ctrl = FIELD(CtrlMap,@RM,I) + CtrlType = Get_Property(Ctrl,'TYPE') + + IF ClearFlag THEN + + IF CtrlType = 'RADIOGROUP' OR CtrlType = 'CHECKBOX' THEN + Set_Property(Ctrl,'ENABLED',1) + END ELSE + Style = Get_Property(Ctrl,'STYLE') + IF Style[1,2] _eqc "0x" THEN + CONVERT @LOWER.CASE TO @UPPER.CASE IN Style + Style = ICONV(Style[3,99],'MX') ;* Convert from Hex to Decimal format for BITOR operation + END + + Style = BITAND(Style,BITNOT(ReadOnlyStyle$)) ;* Clear ReadOnly Style Bit + Set_Property(Ctrl,'STYLE',Style) + + END + END ELSE + IF CtrlType = 'RADIOGROUP' OR CtrlType = 'CHECKBOX' THEN + Set_Property(Ctrl,'ENABLED',0) + END ELSE + Style = Get_Property(Ctrl,'STYLE') + IF Style[1,2] _eqc "0x" THEN + CONVERT @LOWER.CASE TO @UPPER.CASE IN Style + Style = ICONV(Style[3,99],'MX') + END + + Style = BITOR(Style,ReadOnlyStyle$) ;* Set ReadOnly Style Bit + Set_Property(Ctrl,'STYLE',Style) + + END + + END + + END +NEXT I + +RETURN + + +* * * * * * * +LUValReturn: +* * * * * * * + +ValueReturned = Parms[1,@RM] +FocusControl = Parms[COL2()+1,@RM] +FocusPos = Parms[COL2()+1,@RM] +SkipRecalc = Parms[COL2()+1,@RM] + +IF NOT(ASSIGNED(SkipRecalc)) THEN SkipRecalc = 0 + +* Null values for ValueReturned are permitted + +IF FocusControl = '' THEN + FocusControl = Get_Property(@WINDOW,'FOCUS') +END ELSE + IF INDEX(FocusControl,'.',1) ELSE + FocusControl = @WINDOW:'.':FocusControl + END +END + +IF FocusPos = '' THEN + Set_Property(FocusControl,'FOCUS',1) + Set_Property(FocusControl,'DEFPROP',ValueReturned) + NextControl = Get_Property(FocusControl,'NEXT') + Send_Event(FocusControl,'LOSTFOCUS') + Set_Property('SYSTEM','FOCUS',NextControl) +END ELSE + FocusCol = FocusPos[1,@FM] + FocusRow = FocusPos[COL2()+1,@FM] + + Set_Property(FocusControl,'SELPOS',FocusPos) + Set_Property(FocusControl,'DEFPROP',ValueReturned,FocusPos) + Set_Property(FocusControl,'SELPOS',FocusCol+1:@FM:FocusRow) + IF NOT(SkipRecalc) THEN + Send_Event(FocusControl,'CALCULATE',FocusCol+1) + END +END + +RETURN + + +* * * * * * * +LoadFormKeys: +* * * * * * * + +IF NOT(ASSIGNED(thisFormName)) THEN thisFormName = Parms[1,@RM] +IF NOT(ASSIGNED(thisFormKey)) THEN thisFormKey = Parms[COL2()+1,@RM] + +IF thisFormName = '' THEN RETURN + +* Get control map and find key controls + +CtrlMap = Get_Property(thisFormName,'CTRLMAP') + +CONVERT @FM TO @RM IN CtrlMap + +PosList = Get_Property(CtrlMap,STR('POS':@RM,COUNT(CtrlMap,@RM)):'POS') +PartList = Get_Property(CtrlMap,STR('PART':@RM,COUNT(CtrlMap,@RM)):'PART') +ConvList = Get_Property(CtrlMap,STR('CONV':@RM,COUNT(CtrlMap,@RM)):'CONV') + +Ctrls = '' +Props = '' +Vals = '' +NullValueControl = '' + +PosCount = DCount(PosList, @RM) + +FOR I = 1 TO PosCount ; //COUNT(PosList,@RM) + (PosList NE '') + + Pos = FIELD(PosList,@RM,I) + + IF Pos = 0 THEN + Part = FIELD(PartList,@RM,I) + Conv = FIELD(ConvList,@RM,I) + Ctrl = FIELD(CtrlMap,@RM,I) + + IF INDEX(Pos,@SVM,1) THEN + * We're in a Multivalued control i.e. edittable - skip it + END ELSE + + Value = FIELD(thisFormKey,'*',Part) + + IF Conv NE '' THEN Value = OCONV(Value,Conv) + + IF Value = '' THEN + NullValueControl = FIELD(CtrlMap,@RM,I) + END ELSE + Ctrls := FIELD(CtrlMap,@RM,I):@RM + Props := 'DEFPROP':@RM + Vals := Value:@RM + END + END + END +UNTIL NullValueControl NE '' +NEXT I + +Ctrls[-1,1] = '' +Props[-1,1] = '' +Vals[-1,1] = '' + +Set_Property(Ctrls,Props,Vals) + +LastKeyCtrl = Ctrls[-1,'B':@RM] ;* + +IF NullValueControl = '' THEN + * Complete key was loaded + NextCtrl = Get_Property(LastKeyCtrl,'NEXT') + Send_Event( LastKeyCtrl, 'LOSTFOCUS') ;* Triggers form read + Set_Property('SYSTEM','FOCUS',NextCtrl) ;* Move to next field preserving event chain +END ELSE + * Partial key was loaded + Set_Property('SYSTEM','FOCUS',NullValueControl) +END + +RETURN + + +* * * * * * * +ViewNewCard: +* * * * * * * + +CardWindow = Parms[1,@RM] +CardKey = Parms[COL2()+1,@RM] ;* Null values for CardKey creates new card +NewCardCtrl = Parms[COL2()+1,@RM] ;* Name of button control to create new Card on Card window +RecalcCtrl = Parms[COL2()+1,@RM] ;* Symbolic Control to recalculate upon return +RecalcPos = Parms[COL2()+1,@RM] ;* Position in edit list or edit table for recalc +RetCtrl = Parms[COL2()+1,@RM] ;* This can be called from both a window and a process +RetPos = Parms[COL2()+1,@RM] ;* Position in edit list or edit table to return to + + +IF CardWindow = '' THEN RETURN +IF RetCtrl = '' THEN RetCtrl = Get_Property(@WINDOW,'FOCUS') +IF RetPos = '' THEN RetPos = Get_Property(RetCtrl,'SELPOS') + +thisFormName = CardWindow +thisFormKey = CardKey + +GOSUB AppChildWindow ;* Starts or Restores application window and gives user chance to save any changes + +IF thisFormKey NE '' THEN + GOSUB LoadFormKeys ;* Loads form keys and triggers READ event +END ELSE + IF NewCardCtrl NE '' THEN + IF INDEX(NewCardCtrl,'.',1) THEN NewCardCtrl = FIELD(NewCardCtrl,'.',2) + Send_Event(CardWindow:'.':NewCardCtrl,'CLICK') ;* 'Pushes' New button in card to trigger new record process + END +END + +Set_Property(CardWindow,'@RETURN_CONTROL',RetCtrl) + +IF RetPos NE '' THEN Set_Property(CardWindow,'@RETURN_POS',RetPos) + +IF RecalcCtrl NE '' THEN Set_Property(CardWindow,'@RECALC_CONTROL',RecalcCtrl) +IF RecalcPos NE '' THEN Set_Property(CardWindow,'@RECALC_POS',RecalcPos) + +RETURN + + +* * * * * * * +ViewNewDetail: +* * * * * * * + +DetWindow = Parms[1,@RM] +DetKeys = Parms[COL2()+1,@RM] ;* Multipart key to detail record +DefaultRec = Parms[COL2()+1,@RM] ;* Used to set fields in @PREV_REC for defaults + +RetKey = Parms[COL2()+1,@RM] ;* Key to the master record +RetPage = Parms[COL2()+1,@RM] ;* Page in master form to return to +RetCtrl = Parms[COL2()+1,@RM] ;* Leaves focus on window upon return +RetPos = Parms[COL2()+1,@RM] ;* Used only for edit tables or lists + +IF DetWindow = '' THEN RETURN + +IF RetKey = '' THEN RetKey = Get_Property(RetWin,'ID') +IF RetPage = '' THEN RetPage = Get_Property(RetWin,'VPOSITION') +IF RetCtrl = '' THEN RetCtrl = Get_Property(RetWin,'FOCUS') +IF RetPos = '' THEN RetPos = Get_Property(RetCtrl,'SELPOS') + +thisFormName = DetWindow +thisFormKey = DetKeys + +GOSUB AppChildWindow ;* Starts or Restores application window and gives user chance to save any changes + +* Load Key Controls with Key Parts + +Ctrls = DetWindow:@RM ; Props = '@PREV_ID':@RM ; Vals = DetKeys:@RM +Ctrls := DetWindow:@RM ; Props := '@PREV_REC':@RM ; Vals := DefaultRec:@RM +Ctrls := DetWindow:@RM ; Props := '@RETURN_KEY':@RM ; Vals := RetKey:@RM +Ctrls := DetWindow:@RM ; Props := '@RETURN_PAGE':@RM ; Vals := RetPage:@RM +Ctrls := DetWindow:@RM ; Props := '@RETURN_CONTROL':@RM ; Vals := RetCtrl:@RM +Ctrls := DetWindow ; Props := '@RETURN_POS' ; Vals := RetPos + +Set_Property(Ctrls,Props,Vals) + +GOSUB LoadFormKeys ;* Load key into form and triggers READ event or places focus on 1st empty key field. + +RETURN + + +* * * * * * * +ViewRelated: +* * * * * * * + +RelatedWindow = Parms[1,@RM] +RelatedKey = Parms[COL2()+1,@RM] +RelatedParms = Parms[COL2()+1,@RM] + +IF RelatedWindow = '' THEN RETURN ;* Master window +IF RelatedKey = '' THEN RETURN ;* Must have at least a partial key + +thisFormName = RelatedWindow +thisFormKey = RelatedKey +thisFormParms = RelatedParms + +GOSUB AppChildWindow ;* Starts or Restores application window and gives user chance to save any changes + +IF INDEX(RelatedKey,@VM,1) THEN + Send_Event(RelatedWindow,'QBFINIT') + Set_Property(RelatedWindow,'QBFLIST',RelatedKey) + Send_Event(RelatedWindow,'QBFFIRST') +END ELSE + GOSUB LoadFormKeys ;* Load key into form and triggers READ event or places focus on 1st empty key field. +END + +RETURN + + + +* * * * * * * +CardReturn: +* * * * * * * + +CardKey = Parms[1,@RM] + +IF NOT(ASSIGNED(CardKey)) THEN RETURN ;* Null values for CardKey are used when called from the delete event + +ParentWindow = Get_Property(@WINDOW,'PARENT') + +Ctrls = @WINDOW:@RM ; Props = '@RETURN_CONTROL':@RM +Ctrls := @WINDOW:@RM ; Props := '@RETURN_POS':@RM +Ctrls := @WINDOW:@RM ; Props := '@RECALC_CONTROL':@RM +Ctrls := @WINDOW:@RM ; Props := '@RECALC_POS':@RM +Ctrls := @WINDOW ; Props := '@SKIP_RETURN' + +Vals = Get_Property(Ctrls,Props) + +ReturnControl = Vals[1,@RM] +ReturnPos = Vals[COL2()+1,@RM] +RecalcControl = Vals[COL2()+1,@RM] +RecalcPos = Vals[COL2()+1,@RM] +SkipReturn = Vals[COL2()+1,@RM] + +ResetVals = '':@RM:'':@RM:'':@RM:'':@RM:'' + +Set_Property(Ctrls,Props,Vals) + + +IF SkipReturn THEN + Set_Property(@WINDOW,'@SKIP_RETURN',0) ;* Set by routines issuing the WRITE command programmatically + RETURN +END + +IF ReturnControl NE '' THEN + Set_Property(ReturnControl,"DEFPROP",CardKey,ReturnPos) + Set_Property(ReturnControl,'FOCUS',1) +END +IF RecalcControl NE '' THEN + Post_Event(RecalcControl,'CALCULATE',RecalcPos) ;* Trigger any symbolic updates + Post_Event(ParentWindow,'GOTFOCUS') ;* This causes Refresh +END + +IF ReturnControl NE '' OR RecalcControl NE '' THEN Post_Event(@WINDOW,'CLOSE') + +RETURN + + +* * * * * * * +DetailReturn: +* * * * * * * + + +Ctrls = @WINDOW:@RM ; Props = '@RETURN_KEY':@RM +Ctrls := @WINDOW:@RM ; Props := 'PARENT':@RM +Ctrls := @WINDOW:@RM ; Props := '@RETURN_PAGE':@RM +Ctrls := @WINDOW:@RM ; Props := '@RETURN_CONTROL':@RM +Ctrls := @WINDOW:@RM ; Props := '@RETURN_POS':@RM +Ctrls := @WINDOW ; Props := '@SKIP_RETURN' + +Vals = Get_Property(Ctrls,Props) + +ReturnKey = Vals[1,@RM] +ReturnWindow = Vals[COL2()+1,@RM] +ReturnPage = Vals[COL2()+1,@RM] +ReturnControl = Vals[COL2()+1,@RM] +ReturnPos = Vals[COL2()+1,@RM] +SkipReturn = Vals[COL2()+1,@RM] + +IF SkipReturn THEN + Set_Property(@WINDOW,'@SKIP_RETURN',0) ;* Set by routines issuing the WRITE command programmatically + RETURN +END + +IF ReturnKey NE '' THEN + thisFormName = ReturnWindow + thisFormKey = ReturnKey + GOSUB LoadFormKeys +END + +IF ReturnPage NE '' THEN + Send_Event(ReturnWindow,'PAGE',ReturnPage) +END + +IF ReturnControl THEN + Set_Property(ReturnControl,'FOCUS',1) + IF ReturnPos THEN + Set_Property(ReturnControl,'SELPOS',ReturnPos) + END +END + +RETURN + + + +* * * * * * * +AppChildWindow: +* * * * * * * + +thisFormWindowUp = Get_Property(thisFormName,'VISIBLE') ;* Returns 0 = hidden, 1 = visible, 2 = minimized, 3 = maximized + +IF thisFormWindowUp = '' THEN Start_Window(thisFormName,@WINDOW,thisFormParms) ;* Put up the card window - added thisFormParms 3/22/2010 JCH +IF thisFormWindowUp = 2 THEN Set_Property(thisFormName,'VISIBLE',9) ;* Restore the window if minimized + +IF Get_Property(thisFormName,'SAVEWARN') THEN + Set_Property(thisFormName,'@SKIP_CARD_RETURN',1) ;* This stops the Return behavior + Send_Event(thisFormName,'CLEAR') ;* Clear anything existing (prompts for save first) +END + +RETURN + + +* * * * * * * +SetDropDowns: +* * * * * * * + +ComboBoxes = Utility('OBJECTLIST',@WINDOW,'COMBOBOX') +ListBoxes = Utility('OBJECTLIST',@WINDOW,'LISTBOX') + +ControlList = ComboBoxes:@FM:ListBoxes + +CtrlCnt = Count(ControlList,@FM) + (ControlList NE '') + +FOR I = 1 TO CtrlCnt + thisControl = ControlList + UnqualCtrlName = Field(thisControl,'.',2) + + ListData = XLATE('LISTBOX_CONFIG',UnqualCtrlName,1,'X') + + CONVERT @VM TO @FM IN ListData + Set_Property(thisControl,'LIST',ListData) +NEXT I + +RETURN + + diff --git a/SYSPROG/STPROC/OBJ_TABLES.txt b/SYSPROG/STPROC/OBJ_TABLES.txt new file mode 100644 index 0000000..d20f297 --- /dev/null +++ b/SYSPROG/STPROC/OBJ_TABLES.txt @@ -0,0 +1,395 @@ +COMPILE FUNCTION obj_Tables(Method,Parms) + +/* + Data Table Read, Write, Delete Lock, Unlock Methods + + 11/22/00 by JCH - J.C. Henry, Inc + + Properties: + + TableKey Record Key + TableRec Record + TableName Table Name + TableVar Table Variable from OPEN statement (Optional) + + Methods: + + OpenTable(TableName) Open TableName and Return TableVar + ReadOnlyRec(TableName,TableKey,TableVar) Read Record Returns TableRecord without Lock + ReadRec(TableName,TableKey,TableVar) Read Record for update (with lock set) + WriteRec(TableName,TableKey,TableVar,TableRec,Locked) Write Record + DeleteRec(TableName,TableKey,TableVar) Delete Record + LockRec(TableName,TableKey,TableVar) Lock Record + UnlockRec(TableName,TableKey,TableVar) Unlock Record + LockSet(TableName,TableKey(s)) Locks all Keys in list + UnlockSet(TableName,TableKey(s),TableVar) Unlocks all Keys in list + + + Records are checked for any contents prior to write. If there is no data in the + record then the record is DELETED from the table. + + History: + + 08/27/20 DJS Updated UnlockRec subroutine to utilize Database_Services and to only unlock a record + if the record is locked in order to avoid setting an FS411 error uneccessarily. + + +*/ + +DECLARE SUBROUTINE Set_Status, Set_FSError, Database_Services, Logging_Services +DECLARE FUNCTION Set_Status, Database_Services, Logging_Services, Environment_Services + +EQU Tab$ TO \09\ +EQU CRLF$ TO \0D0A\ +EQU LF$ TO \0A\ +EQU Comma$ TO ',' + +EQU TRUE$ TO 1 +EQU FALSE$ TO 0 + +EQU TABLE_NAME$ TO 1 +EQU TABLE_KEY$ TO 2 +EQU TABLE_VAR$ TO 3 +EQU TABLE_REC$ TO 4 + +$INSERT CopyRight +$INSERT Msg_Equates + +LogPath = Environment_Services('GetApplicationRootPath') : '\LogFiles\obj_Tables' +LogDate = Oconv(Date(), 'D4/') +LogTime = Oconv(Time(), 'MTS') +LogFileName = LogDate[7, 4] : '-' : LogDate[1, 2] : '-' : LogDate[4, 2] : ' obj_Tables Log.csv' +Headers = 'Logging DTM' : @FM : 'User' : @FM : 'Method' : @FM : 'TableName' : @FM : 'TableKey' : @FM : 'Notes' +objLog = Logging_Services('NewLog', LogPath, LogFileName, CRLF$, Comma$, Headers, '', False$, False$) +LoggingDTM = LogDate : ' ' : LogTime ; // Logging DTM + +ErrTitle = 'Error in obj_Tables' + +ErrorMsg = '' + +IF NOT(ASSIGNED(Method)) THEN ErrorMsg = 'Unassigned parameter "Method" passed to subroutine.' +IF NOT(ASSIGNED(Parms)) THEN ErrorMsg = 'Unassigned parameter "Parms" passed to subroutine.' + +IF Method = '' THEN ErrorMsg = 'Null parameter "Method" passed to subroutine' +IF Parms = '' THEN ErrorMsg = 'Null parameter "Parms" passed to subroutine.' + + +IF ErrorMsg NE '' THEN + stat = Set_Status(-1,ErrTitle:@SVM:ErrorMsg) ;* Initialization Errors + RETURN '' +END + +Result = '' + +TableName = Parms[1,@RM] +TableKey = Parms[COL2()+1,@RM] +TableVar = Parms[COL2()+1,@RM] +TableRec = Parms[COL2()+1,@RM] + + +BEGIN CASE + CASE Method = 'OpenTable' ; GOSUB OpenTable + CASE Method = 'ReadOnlyRec' ; GOSUB ReadOnlyRec + CASE Method = 'ReadRec' ; GOSUB ReadRec + CASE Method = 'WriteRec' ; GOSUB WriteRec + CASE Method = 'WriteOnlyRec' ; GOSUB WriteOnlyRec + CASE Method = 'DeleteRec' ; GOSUB DeleteRec + CASE Method = 'LockRec' ; GOSUB LockRec + CASE Method = 'UnlockRec' ; GOSUB UnlockRec + CASE Method = 'LockSet' ; GOSUB LockSet + CASE Method = 'UnlockSet' ; GOSUB UnlockSet + CASE 1 + ErrorMsg = 'Method ':QUOTE(Method):' not defined in object.' + +END CASE + + +IF ErrorMsg = '' THEN + Parms = FieldStore(Parms,@RM,TABLE_VAR$,0,TableVar) +END ELSE + stat = Set_Status(-1,ErrTitle:@SVM:ErrorMsg) + RETURN '' +END + +RETURN Result + + +* * * * * * * +OpenTable: +* * * * * * * + +IF TableName = '' THEN ErrorMsg = 'Null parameter "TableName" passed to subroutine' + +IF ErrorMsg = '' THEN + OPEN TableName TO TableVar THEN + Result = TableVar + Parms = FieldStore(Parms,@RM,3,1,TableVar) ;* Added 1/22/2007 JCH + END ELSE + ErrorMsg = 'Unable to open Table ':QUOTE(TableName) + END +END + + +RETURN + +* * * * * * * +ReadRec: +* * * * * * * + +GOSUB LockRec + +IF ErrorMsg NE '' THEN RETURN + +* * * * * * * +ReadOnlyRec: +* * * * * * * + +IF TableName = '' THEN ErrorMsg = 'Null parameter "TableName" passed to subroutine' +IF TableKey = '' THEN ErrorMsg = 'Null parameter "TableKey" passed to subroutine' +IF TableVar = '' THEN + GOSUB OpenTable + IF ErrorMsg THEN RETURN +END + +READ TableRec FROM TableVar,TableKey THEN + Result = TableRec +END ELSE + // Log failure to read + LogData = '' + LogData<1> = LoggingDTM + LogData<2> = @User4 + LogData<3> = Method + LogData<4> = TableName + LogData<5> = TableKey + LogData<6> = 'Error code: ':@FILE_ERROR<1>:' Error message: ':@FILE_ERROR<2>:' Error detail: ':@FILE_ERROR<3> + Logging_Services('AppendLog', objLog, LogData, @RM, @FM) + + IF @FILE_ERROR<1> = 100 THEN +* Record doesn't exist +* 04/20/2021 - DJS - Moved unlock call outside of this specific error condition so that the record is always +* unlocked if the record fails to be read. +* GOSUB UnlockRec + Null + END ELSE + Set_FSError() + ErrorMsg = 'Record ':QUOTE(TableKey):' not found in Table ':QUOTE(TableName) + END + Result = '' + + If ( (TableName NE '') and (TableKey NE '') ) then + RecordLocked = Database_Services('IsKeyIDLocked', TableName, TableKey, False$) + If RecordLocked EQ True$ then Database_Services('ReleaseKeyIDLock', TableName, TableKey) + end + +END + +RETURN + + +* * * * * * * +WriteRec: +* * * * * * * + +IF TableName = '' THEN ErrorMsg = 'Null parameter "TableName" passed to subroutine' +IF TableKey = '' THEN ErrorMsg = 'Null parameter "TableKey" passed to subroutine' +IF TableVar = '' THEN GOSUB OpenTable + +IF ErrorMsg THEN RETURN + +IF ErrorMsg = '' THEN + + TestRec = TableRec + + CONVERT @SVM:@VM:@FM TO '' IN TestRec + + IF TestRec = '' THEN + DELETE TableVar,TableKey ELSE Null +* ErrorMsg = 'Blank table rec with ':QUOTE(TableKey):' on ':QUOTE(TableName):' table.'; *added 4/9/21 for debugging +* Set_FSError() + END ELSE + Set_Status(0) + rv = Get_Status(errCode) + WRITE TableRec ON TableVar,TableKey THEN + rv = Get_Status(errCode) + END ELSE + ErrorMsg = 'Unable to write ':QUOTE(TableKey):' on ':QUOTE(TableName):' table.' + END + + END + + If ( (TableName NE '') and (TableKey NE '') ) then + RecordLocked = Database_Services('IsKeyIDLocked', TableName, TableKey, False$) + If RecordLocked EQ True$ then Database_Services('ReleaseKeyIDLock', TableName, TableKey) + end + +END + +RETURN + + +* * * * * * * +WriteOnlyRec: +* * * * * * * + +IF TableName = '' THEN ErrorMsg = 'Null parameter "TableName" passed to subroutine' +IF TableKey = '' THEN ErrorMsg = 'Null parameter "TableKey" passed to subroutine' +IF TableVar = '' THEN GOSUB OpenTable + +IF ErrorMsg THEN RETURN + +IF ErrorMsg = '' THEN + + TestRec = TableRec + + CONVERT @SVM:@VM:@FM TO '' IN TestRec + + IF TestRec = '' THEN + DELETE TableVar,TableKey ELSE Null + END ELSE + WRITE TableRec ON TableVar,TableKey ELSE + ErrorMsg = 'Unable to write ':QUOTE(TableKey):' on ':QUOTE(TableName):' table.' + END + END +END + +RETURN + + +* * * * * * * +DeleteRec: +* * * * * * * + +IF TableName = '' THEN ErrorMsg = 'Null parameter "TableName" passed to subroutine' +IF TableKey = '' THEN ErrorMsg = 'Null parameter "TableKey" passed to subroutine' +IF TableVar = '' THEN GOSUB OpenTable + +IF ErrorMsg THEN RETURN + +IF ErrorMsg = '' THEN + DELETE TableVar,TableKey THEN + GOSUB UnlockRec + END +END + +RETURN + + + +* * * * * * * +LockRec: +* * * * * * * + +IF TableName = '' THEN ErrorMsg = 'Null parameter "TableName" passed to subroutine' +IF TableKey = '' THEN ErrorMsg = 'Null parameter "TableKey" passed to subroutine' +IF TableVar = '' THEN GOSUB OpenTable + +IF ErrorMsg THEN RETURN + +LockData = '' +Locked = FALSE$ +RetryCnt = 0 + +LOOP + + LOCK TableVar,TableKey THEN + Locked = TRUE$ + END ELSE + + BEGIN CASE + CASE @FILE_ERROR NE '' + Set_FSError() + ErrorMsg = 'Unable to Lock ':QUOTE(TableKey):' in Table ':QUOTE(TableName) + + CASE Get_Status(errCode) + ErrorMsg = QUOTE(TableKey):' in Table ':QUOTE(TableName):' Locked by another workstation.' + + CASE 1 + ErrorMsg = QUOTE(TableKey):' in Table ':QUOTE(TableName):' Locked by This workstation.' + + END CASE + + RetryCnt += 1 + END + +UNTIL Locked OR RetryCnt = 10 REPEAT + + +RETURN + + +* * * * * * * +UnlockRec: +* * * * * * * + +RecordLocked = Database_Services('IsKeyIDLocked', TableName, TableKey, False$) +If RecordLocked EQ True$ then Database_Services('ReleaseKeyIDLock', TableName, TableKey) + +RETURN + + +* * * * * * * +LockSet: +* * * * * * * + +IF TableName = '' THEN ErrorMsg = 'Null parameter "TableName" passed to subroutine' +IF TableKey = '' THEN ErrorMsg = 'Null parameter "TableKey" passed to subroutine' +IF TableVar = '' THEN GOSUB OpenTable + +TableKeys = TableKey ;* Pass in @VM'd list of keys In TableKey + +IF ErrorMsg THEN RETURN + +IF TableKeys = '' THEN RETURN + +Set_Status(0) + +LockedTableKeys = '' + +FOR I = 1 TO COUNT(TableKeys,@VM) + (TableKeys NE '') + TableKey = TableKeys<1,I> + GOSUB LockRec + + If Locked THEN + LockedTableKeys<1,-1> = TableKey + End ELSE + For N = 1 To Count(LockedTableKeys,@VM) + (LockedTableKeys NE '') + TableKey = LockedTableKeys<1,N> + Gosub UnlockRec + Next N + End + +NEXT I + +Result = TableVar + +RETURN + + +* * * * * * * +UnlockSet: +* * * * * * * + +IF TableName = '' THEN ErrorMsg = 'Null parameter "TableName" passed to subroutine' +IF TableKey = '' THEN ErrorMsg = 'Null parameter "TableKey" passed to subroutine' +IF TableVar = '' THEN ErrorMsg = 'Null parameter "TableVar" passed to subroutine' + +LockedTableKeys = TableKey ;* Pass in @VM'd list of keys In TableKey + +IF ErrorMsg THEN RETURN + +IF LockedTableKeys = '' THEN RETURN + +Set_Status(0) + + +FOR I = 1 TO COUNT(LockedTableKeys,@VM) + (LockedTableKeys NE '') + TableKey = LockedTableKeys<1,I> + GOSUB UnlockRec +NEXT I + +RETURN + + + + + diff --git a/SYSPROG/STPROC/OIPI_EXAMPLE1.txt b/SYSPROG/STPROC/OIPI_EXAMPLE1.txt new file mode 100644 index 0000000..41a96e3 --- /dev/null +++ b/SYSPROG/STPROC/OIPI_EXAMPLE1.txt @@ -0,0 +1,459 @@ +subroutine OIPI_Example1(dummy) + +/* + + OIPI_Example1 + + + + This is an example program on how to use the OpenInsight Printer Interface. + + This example uses most of the features of the OpenInsight Printer Interface, and + + is a good place to start learning how to create reports with the OIPI. + +*/ + +declare function Set_Printer, Get_Printer, RGB,Set_Property + +declare function msg + +$insert OIPRINT_EQUATES +$Insert RTI_Postscript_Common + + +Equ Portrait$ To 0 +Equ Landscape$ To 1 + +* print Setup Equate +Equ Print_Style$ To 1 +Equ Print_Zoom$ To 2 + +Equ Print_ToPrinter$ To 0 +Equ Display_PrintSetup$ To 1 +Equ Preview_Normal$ To 2 +Equ Print_Mazimized$ To 3 + +Equ Display_AllButtons$ To 0 +Equ Hide_PrintButton$ To 1 +Equ Hide_PrintSetupButton$ To 2 +Equ Hide_AllButtons$ To 3 + +* Create the fonts for the OIPI report + +* 18 point Arial font with left justified, bold and dark blue color +Font1 = "Arial":@FM:18:@FM:"L":@FM:1:@FM:0:@FM:0:@FM:0:@FM:RGB(0, 0, 172) + +* 16 point Times New Roman with left justified bold, italics, underline, and dark magenta +Font2 = "Times New Roman":@FM:16:@FM:"L":@FM:1:@FM:1:@FM:1:@FM:0:@FM:RGB(192, 0, 172) + +* 14 point Times New Roman with left justified +Font3 = "Times New Roman":@FM:14 + +* Start the OIPI report with the INIT message +FileName = "OIPI_Example1" + +PrintTitle = "OIPI Printing..." +PreviewTitle = "OIPI Print Preview" + +Margins = .5:@FM:1:@FM:.5:@FM:1 ;* half inch margins On the sides, one inch margins On the top +Orientation = Portrait$ +PrintSetup = "" +PrintSetup = Preview_normal$ +PrintSetup = Display_AllButtons$ +PrintSetup<2> = -1 ;* Set initial zoom to PageWidth +PrintSetup<3> = 5 ;* Set the Print Preview position at 5% from top and left +PrintSetup<4> = 5 +PrintSetup<5> = 95 +PrintSetup<6> = 95 + +VAL = Set_Printer("INIT", FileName, PrintTitle:@FM:PreviewTitle, Margins, Orientation, PrintSetup) +if VAL < 0 then + * Always check the return value of the INIT message for error + ErrorMsg = "Fatal error with the INIT message:":VAL + goto fatalExit +end + +* Set the font for all of the headers and footers +if Set_Printer("FONTHEADFOOT", "Arial":@FM:14:@FM:"L":@fm:1) < 0 then + ErrorMsg = "Error with the FONTHEADFOOT message" + goto fatalExit +end + +* Print the header with the file name centered on the first line and +* the Long format of the date left justified and the page number right justified +* on the second line. + +x = Set_Printer("HEADER", @VM:"'F'":@FM:"'DL'":@VM:@VM:"Page 'P'":@FM) +*x = Set_Printer("HEADER", "The Header Text") +If x < 0 then + ErrorMsg = "Error with the HEADER message" + goto fatalExit +end + +if Set_Printer("FONT", Font1) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +End + + + +if Set_Printer("TEXT", "Welcome to the OpenInsight Printer Interface!!!") < 0 then + * I'm not going to check the remaining TEXT messages, because if the first one + * works then the remaining TEXT messages should also work. + ErrorMsg = "Error with the TEXT message" + goto fatalExit +end + +Stat = Set_Printer('CALCTEXT',@Upper.Case) +AA = Get_Printer('CALCTEXT') + + +if Set_Printer("FONT", Font2) < 0 then + + ErrorMsg = "Error with the FONT message" + goto fatalExit +end +x = Set_Printer("TEXT", @FM:"Introduction") + +if Set_Printer("FONT", Font3) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +end +text = "This program will demonstrate the basic features of the OpenInsight Printer Interface. There are several new features in the OIPI 3.x, so please check the online help file for the latest message formats." + +x = Set_Printer("TEXT", text) + + +if Set_Printer("FONT", Font2) < 0 then + + ErrorMsg = "Error with the FONT message" + goto fatalExit +end +x = Set_Printer("TEXT", @FM:"Get_Printer for VERSION and SERIAL") + +if Set_Printer("FONT", Font3) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +end +ver = Get_Printer("VERSION") +text = "You are currently using version '":ver<1>:"' of the OIPI, and the OIPI build number is '":ver<2>:"' and the VSVIEW control version is '":ver<3>:"'":@FM:"Your serial number is ":Get_Printer("SERIAL") + +x = Set_Printer("TEXT", text) + +if Set_Printer("FONT", Font2) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +end +x = Set_Printer("TEXT", @FM:"BMP and TEXTXY") + +if Set_Printer("FONT", Font3) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +end +text = "This will demostrate the use of graphic files and the TEXTXY message. The graphic file (BANNER.WMF) is printed first, " +text := "then the text is printed over it with the TEXTXY message. The text shadow is created by offsetting two separate TEXTXY messages." + +text := "The current Y position is used to determine where to print the graphics and text using the Get_Printer POS message." +text := "You can strectch the graphics with the BMP message.":@FM +x = Set_Printer("TEXT", text) + +* Print the banner.wmf and text inside +pos = Get_Printer("POS") + +if Set_Printer("BMP", "BANNER.WMF", 0:@FM:pos<2>:@FM:3.5:@FM:1, 1, 0) < 0 then + ErrorMsg = "Error with the BMP message" + goto fatalExit +end + +if Set_Printer("TEXTXY", "Banner Text", .77:@FM:pos<2>+0.48, "Arial":@FM:24:@FM:"L":@FM:1:@FM:0:@FM:0:@FM:0:@FM:RGB(192, 192, 192):@FM:100, 0) < 0 then + + ErrorMsg = "Error with the TEXTXY message" + goto fatalExit +End + +if Set_Printer("TEXTXY", "Banner Text", .80:@FM:pos<2>+0.45, "Arial":@FM:24:@FM:"L":@FM:1:@FM:0:@FM:0:@FM:0:@FM:RGB(128, 0, 128):@FM:100, 0) < 0 then + ErrorMsg = "Error with the TEXTXY message" + goto fatalExit +end + +if Set_Printer("BMP", "PRINTER.BMP", 4.0:@FM:pos<2>:@FM:1.6:@FM:1, 0, 0) < 0 then + ErrorMsg = "Error with the BMP message" + goto fatalExit +end + +* Reset the text position below the graphics by adding one inch to the last position + +x = Set_Printer("POS", 0:@FM:pos<2> + 1) + +if Set_Printer("FONT", Font2) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +end + +x = Set_Printer("TEXT", @FM:"RECT, CALC_TEXT, POLYGON, and Colors") + +if Set_Printer("FONT", Font3) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +end +text = "The next section demonstrates how to use colors with the RECT message, and how to use the CALC_TEXT message to calculate the height and width of text and place a box around the text. " + +text := "The POLYGON message is used to print the gray shading in the 3D button." +x = Set_Printer("TEXT", text) + +* Print pyramid +if Set_Printer("LINESTYLE", PS_NULL) < 0 then + ErrorMsg = "Error with the LINESTYLE message" + goto fatalExit +end +pos = Get_Printer("POS") +y = pos<2> +offset = 0 + +for c = 0 to 128 step 12.8 + if Set_Printer("FILLSTYLE", BS_SOLID:@FM:RGB(0, 0, 128 + c)) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit + end +R = 1+offset:@FM:y+offset:@FM:3-offset:@FM:y-offset+2 + if Set_Printer("RECT", 1+offset:@FM:y+offset:@FM:3-offset:@FM:y-offset+2, 0) < 0 then + ErrorMsg = "Error with the RECT message" + goto fatalExit + end + offset = offset + 0.05 +next c +for c = 0 to 128 step 12.8 + if Set_Printer("FILLSTYLE", BS_SOLID:@FM:RGB(c, c, 255)) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit + end + if Set_Printer("RECT", 1+offset:@FM:pos<2>+offset:@FM:3-offset:@FM:pos<2>+2-offset, 0) < 0 then + ErrorMsg = "Error with the RECT message" + + goto fatalExit + end + offset = offset + 0.05 +next c +if Set_Printer("LINESTYLE", PS_SOLID:@FM:1:@FM:RGB(0, 0, 0)) < 0 then + ErrorMsg = "Error with the LINESTYLE message" + goto fatalExit +end +if Set_Printer("FILLSTYLE", BS_HOLLOW) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit +end +if Set_Printer("RECT", 1:@FM:pos<2>:@FM:3:@FM:pos<2>+2, 0) < 0 then + ErrorMsg = "Error with the RECT message" + goto fatalExit +end + +if Set_Printer("LINE", 1:@FM:pos<2>:@FM:3:@FM:pos<2>+2, 0) < 0 then + + ErrorMsg = "Error with the LINE message" + goto fatalExit +end +if Set_Printer("LINE", 3:@FM:pos<2>:@FM:1:@FM:pos<2>+2, 0) < 0 then + ErrorMsg = "Error with the LINE message" + goto fatalExit +end + +* print 3D button +text = "3D Button" +if Set_Printer("FILLSTYLE", BS_SOLID:@FM:RGB(128, 128, 128)) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit +end +if Set_Printer("FONT", "Arial":@FM:14) < 0 then + ErrorMsg = "Error with the FONT message" + + goto fatalExit +end + +if Set_Printer("CALCTEXT", text) < 0 then + ErrorMsg = "Error with the CALCTEXT message" + goto fatalExit +end + +size = Get_Printer("CALCTEXT") + +width = size<1> +height = size<2> +poly = "" +poly<1> = 3.5+width+.4:@VM:y +poly<2> = 3.5+width+.4:@VM:y+height+.4 +poly<3> = 3.5:@VM:y+height+.4 +poly<4> = 3.5+.1:@VM:y+height+.3 +poly<5> = 3.5+width+.3:@VM:y+height+.3 +poly<6> = 3.5+width+.3:@VM:y+.1 +if Set_Printer("POLYGON", poly, 0) < 0 then + goto fatalExit + +end + + xxx = get_printer("font") +if Set_Printer("FILLSTYLE", BS_HOLLOW) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit +end + + xxx = get_printer("font") +if Set_Printer("RECT", 3.5:@FM:y:@FM:3.5+width+.4:@FM:y+height+.4, 0) < 0 then + ErrorMsg = "Error with the RECT message" + goto fatalExit +end + + xxx = get_printer("font") +if Set_Printer("FILLSTYLE", BS_SOLID:@FM:RGB(192, 192, 192)) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit +end +if Set_Printer("RECT", 3.5+.1:@FM:y+.1:@FM:3.5+width+.3:@FM:y+height+.3, 0) < 0 then + + ErrorMsg = "Error with the RECT message" + goto fatalExit +end + + xxx = get_printer("font") +if Set_Printer("TEXTXY", text, 3.7:@FM:y+.2, "", 0) < 0 then + ErrorMsg = "Error with the TEXTXY message" + goto fatalExit +end +if Set_Printer("FONT", "Times New Roman":@FM:12) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +end + +* Force a page break +if Set_Printer("PAGEBREAK") < 0 then + ErrorMsg = "Error with the PAGEBREAK message" + goto fatalExit +end + + +if Set_Printer("FONT", Font2) < 0 then + + ErrorMsg = "Error with the FONT message" + goto fatalExit +end + +x = Set_Printer("TEXT", "POLYLINE, ADDTABLE, and TEXTXY") + +if Set_Printer("FONT", Font3) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +end +text = "The POLYLINE message is used to create this Graph, and the ADDTABLE message is used to create the Table. The TEXTXY message is used to print the labels." + +x = Set_Printer("TEXT", text) + +pos = Get_Printer("POS") +y = pos<2>+.25 +if Set_Printer("FILLSTYLE", BS_SOLID:@FM:RGB(255, 255, 128)) < 0 then + + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit +end +ErrorMsg = "There was some problem with the Graph part of the example" + + +if Set_Printer("RECT", 3:@FM:y:@FM:6:@FM:y+2, 0) < 0 then goto fatalExit + +if Set_Printer("RECT", 1:@FM:y:@FM:2.5:@FM:y+0.5, 0) < 0 then goto fatalExit +if Set_Printer("LINESTYLE", PS_DOT:@FM:0:@FM:RGB(0, 0, 0)) < 0 then goto fatalExit +if Set_Printer("LINE", 3:@FM:y+.5:@FM:6:@FM:y+.5, 0) < 0 then goto fatalExit +if Set_Printer("LINE", 3:@FM:y+1:@FM:6:@FM:y+1, 0) < 0 then goto fatalExit + +if Set_Printer("LINE", 3:@FM:y+1.5:@FM:6:@FM:y+1.5, 0) < 0 then goto fatalExit +initrnd timedate() +poly1 = "" +for i = 0 to 12 + sx = i/4 + sy = y+1-rnd(100)/100 + poly1 = sx + 3 + poly1 = sy +next i +if Set_Printer("LINESTYLE", PS_SOLID:@FM:1:@FM:RGB(0, 128, 0)) < 0 then goto fatalExit +if Set_Printer("POLYLINE", poly1, 0) < 0 then goto fatalExit + +if Set_Printer("LINE", 1.2:@FM:y+0.15:@FM:1.5:@FM:y+0.15, 0) < 0 then goto fatalExit +poly2 = "" +for i = 0 to 12 + + sx = i/4 + sy = y+1-rnd(100)/100 + poly2 = sx + 3 + poly2 = sy +next i +if Set_Printer("LINESTYLE", PS_SOLID:@FM:1:@FM:RGB(128, 0, 0)) < 0 then goto fatalExit +if Set_Printer("POLYLINE", poly2, 0) < 0 then goto fatalExit +if Set_Printer("LINE", 1.2:@FM:y+0.35:@FM:1.5:@FM:y+0.35, 0) < 0 then goto fatalExit +if Set_Printer("LINESTYLE", PS_SOLID:@FM:1:@FM:RGB(0, 0, 0)) < 0 then goto fatalExit +if Set_Printer("FONT", "Arial":@FM:8) < 0 then goto fatalExit +if Set_Printer("TEXTXY", "4.0", 2.8:@FM:y-.05, "", 0) < 0 then goto fatalExit + +if Set_Printer("TEXTXY", "3.0", 2.8:@FM:y+.45, "", 0) < 0 then goto fatalExit +if Set_Printer("TEXTXY", "2.0", 2.8:@FM:y+.95, "", 0) < 0 then goto fatalExit +if Set_Printer("TEXTXY", "1.0", 2.8:@FM:y+1.45, "", 0) < 0 then goto fatalExit +if Set_Printer("TEXTXY", "0.0", 2.8:@FM:y+1.95, "", 0) < 0 then goto fatalExit +if Set_Printer("TEXTXY", "Years", 4.4:@FM:y+2.05, "", 0) < 0 then goto fatalExit +if Set_Printer("TEXTXY", "$Millions", 2.8:@FM:y-.2, "", 0) < 0 then goto fatalExit + +if Set_Printer("FONT", "Arial":@FM:10) < 0 then goto fatalExit +if Set_Printer("TEXTXY", "XYZ Co.", 1.6:@FM:y+0.07, "", 0) < 0 then goto fatalExit +if Set_Printer("TEXTXY", "ABC Co.", 1.6:@FM:y+0.27, "", 0) < 0 then goto fatalExit +if Set_Printer("FILLSTYLE", BS_HOLLOW) < 0 then goto fatalExit +if Set_Printer("RECT", 3:@FM:y:@FM:6:@FM:y+2, 0) < 0 then goto fatalExit + +ErrorMsg = "There was some problem with the ADDTABLE part of the example" +if Set_Printer("POS", 0:@FM:y+1) < 0 then goto fatalExit + +header = "Year":@VM:"XYZ Co. Sales ($Mill)":@VM:"ABC Co. Sales ($Mill)":@FM +table = "" +for i = 0 to 12 + table = 1990+i + table = 3.5+y-poly1 + table = 3.5+y-poly2 +next i +if Set_Printer("FONT", "Arial":@FM:10:@FM:"L":@FM:1) < 0 then goto fatalExit +ColumnFormat = "_^770":@VM:"_>1080":@VM:"_>1080":@FM +if Set_Printer("ADDTABLE", ColumnFormat, header, table, RGB(0, 222, 0), "", "", TB_BOX_COLUMNS) < 0 then goto fatalExit + +if Set_Printer("CALCTABLE", ColumnFormat:header:table) < 0 then goto fatalExit + +size = Get_Printer("CALCTABLE") + +if Set_Printer("POS", 0:@FM:y+1+size<2>) < 0 then goto fatalExit + +if Set_Printer("FONT", Font2) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +end +x = Set_Printer("TEXT", @FM:"Other New Features in the OIPI") + +if Set_Printer("FONT", Font3) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +end +text = " * The OIPI 3.5 uses the newest VSVIEW.OCX control for the print engine.":@FM +text := " * The OIPI 3.2 was rewritten in Microsoft Visual Basic 4.0.":@FM + +text := " * The ADDTABLE message was added to improve the quality of tables. This message should be used to replace all TABLE and TEXTCOL messages.":@FM +text := " * The Print Preview window can be scrolled with the mouse and all pages are viewable as soon as they are printed.":@FM +text := " * The IMIT message can be used to change the size of the paper without using the Printer Setup dialog box.":@FM +text := " * The CALCBMP and CALCTABLE messages were added.":@FM + +text := " * The title of the Print Preview window can be customized.":@FM + +x = Set_Printer("TEXT", text) + +* End the report and tell the OIPI to completely shut down after the print preview is closed. +x = Set_Printer("TERM", 1) + +return + +* jump here if any Set_Printer returns a value < 0 +fatalExit: + x = msg("", ErrorMsg) + x = Set_Printer("TERM", 1) +return diff --git a/SYSPROG/STPROC/OIPI_EXAMPLE2.txt b/SYSPROG/STPROC/OIPI_EXAMPLE2.txt new file mode 100644 index 0000000..a1f47be --- /dev/null +++ b/SYSPROG/STPROC/OIPI_EXAMPLE2.txt @@ -0,0 +1,117 @@ +subroutine OIPI_Example2(dummy) + +/* +  Printer_Example2 +  +  This is an example program on how to use the OpenInsight Printer Interface. +  This example creates a simple invoice using the Table Module. +*/ + +declare function Set_Printer, Get_Printer, RGB, msg +$insert OIPRINT_EQUATES +$Insert msg_equates +* Initialize the printing session with a name, dialog title, and margins +name = "Sample Invoice" +title = "" +title<1> = "Printing Sample Invoice..." +title<2> = "Example Print Preview" +margin = 1:@FM:1.75:@FM:1:@FM:1 +*  Gentlemen, start your engine. +x = Set_Printer("START32") +* Display report with Print Preview Window at the last size and position +x = Set_Printer("INIT", name, title, margin, "", 4) +if x < 0 Then + unused = msg( "", "INIT ERROR = " : x ) +end +* +* Set the text font and the Header/footer font +x = Set_Printer("FONTHEADFOOT", "Times New Roman":@FM:12) +font = "Arial":@FM:12:@FM:"L" +fontBold = "Arial":@FM:12:@FM:"L":@FM:1 +x = Set_Printer("FONT", font) +if x < 0 Then + x = msg("", "FONTHEADFOOT Error") +end +* Set the header with the text "Sample Invoice" centered , and "Page #" aligned To the right +* margin on the first line.  The text "for the OIPI 2.0" is centered on the second line. + +x = Set_Printer("HEADER", @vm:"Sample Invoice":@vm:"Page 'P'":@FM:@vm:"for the OIPI 2.0":@FM) +if x < 0 Then + x = msg("", "HEADER Error") +end + +* Print a bitmap at 1 inch from the top and 1 inch from the left side of the page. +* The left and top values are calculated from the margins.  The width and height of the +* bitmap will be 0.5 by 0.5 inches, and the bitmap will print on every page. +x = Set_Printer("BMP", "PRINTER.BMP", 0:@FM:-0.75:@FM:0.5:@FM:0.5, 0, 1) +if x < 0 Then + x = msg("", "BMP Error") +end +* Set the text font to bold Arial to print the title of the Date/Invoice table. Then +* print the date and invoice number with no bold.  The first column of the table is blank +* to place the date and invoice number in the correct location on the page.  The date and +* invoice number are centered and there is no border around this table.  These tables have +* no column headers. +x = Set_Printer("FONT", fontBold) +table1 = ",Date,Invoice No." +convert "," to @vm in table1 +x = Set_Printer("ADDTABLE", ">5040":@VM:"^2160":@VM:"^2160":@FM, "", table1, "", "", "", TB_NONE) +x = Set_Printer("FONT", font) +table1 = ",01 Jan 1996,340082" +convert "," to @vm in table1 +x = Set_Printer("ADDTABLE", ">5040":@VM:"^2160":@VM:"^2160":@FM, "", table1, "", "", "", TB_NONE) +* Print a blank line then print the Bill To/From table.  These tables have no column +* headers.  These tables have no borders and have left justified columns. +x = Set_Printer("TEXT") +x = Set_Printer("FONT", fontBold) +table2 = "Bill To:,,Ship To:" +convert "," to @vm in table2 +x = Set_Printer("ADDTABLE", "3600":@VM:"1440":@VM:"3600":@FM, "", table2, "", "", "", TB_NONE) +x = Set_Printer("FONT", font) +table2 = "" +table2<1> = "Test Company 123//Test Company (Billing Dept)" +table2<2> = "123 West Main Street//555 West Main Street, MS:123" +table2<3> = "Portland, OR  97005//Portland, OR  97005" +convert "/" to @vm in table2 +x = Set_Printer("ADDTABLE", "3600":@VM:"1440":@VM:"3600":@FM, "", table2, "", "", "", TB_NONE) +* These tables have to column headers and have borders all sides of the tables. Every column +* is center justified. +x = Set_Printer("TEXT") +x = Set_Printer("FONT", fontBold) +table3 = "Terms,P.O. Number,Ship Date,Ship Via" +convert "," to @vm in table3 +x = Set_Printer("ADDTABLE", "^2160":@VM:"^2160":@VM:"^2160":@VM:"^2160":@FM, "", table3, "", "", "", TB_ALL) +x = Set_Printer("FONT", font) +table3 = "Net 30,9500123,03 Jan 1996,UPS Next Day Delivery" +convert "," to @vm in table3 +x = Set_Printer("ADDTABLE", "^2160":@VM:"^2160":@VM:"^2160":@VM:"^2160":@FM, "", table3, "", "", "", TB_ALL) +* The position is set to 0 inches from the left margin, and 3 inches from the top margin.  This +* will guarentee the table will always start to print from the same location. +x = Set_Printer("POS", 0:@FM:3) +* Create the dummy data for the main table.  This table has column headers, because the column +* headers need to be printed at the to of each page if the main invoice table requies more +* than one page.  The rows will have borders. +tableHead = "Quantity,Description,Unit Price,Ext Price" +table = "" +table<1> = "1,OpenInsight Printer Interface 2.0 -- Special limited time introductory price,$345.00,$345.00" +table<2> = "2,Second line item here,$1.00,$2.00" +table<3> = "1,Third line item here (no charge for this bonus item),$0.00,$0.00" +for i = 4 to 30 + table = "1,Test line item here":(i-3):",$0.00,$0.00" +next i +table<31> = "" +table<32> = ",Merchandise Total,,$347.00" +table<33> = "" +table<34> = ",Tax,,$12.00" +table<35> = ",Shipping,,$5.00" +table<36> = ",Handling,,$5.00" +table<37> = "" +table<38> = ",,Sub Total,$369.00" +table<39> = "" +table<40> = ",,Total,$369.00" +convert "," to @vm in table +convert "," to @vm in tableHead +x = Set_Printer("ADDTABLE", ">1080":@VM:"<4680":@VM:">1440":@VM:">1440":@FM, tableHead, table, RGB(192, 192, 192), "", "", TB_BOX_ROWS) +* Finish this prining session. +x = Set_Printer("TERM", 1) +return diff --git a/SYSPROG/STPROC/OIPI_PIECHART_EXAMPLE.txt b/SYSPROG/STPROC/OIPI_PIECHART_EXAMPLE.txt new file mode 100644 index 0000000..ead4978 --- /dev/null +++ b/SYSPROG/STPROC/OIPI_PIECHART_EXAMPLE.txt @@ -0,0 +1,44 @@ +Subroutine OIPI_Piechart_Example(void) + +Declare Function Set_Printer + +$Insert COLORS +$insert OIPI_EQUATES +$Insert OIPI_PIECHART_EQUATES + +* Start the OIPI report with the INIT message + +FileName = "OIPI_PIE_Example1" + +PrintTitle = "OIPI Printing..." +PreviewTitle = "OIPI Pie Chart Preview" + +Margins = .5:@FM:.5:@FM:.5:@FM:.5 ;* half inch margins On the sides, one inch margins On the top +Orientation = Portrait$ +PrintSetup = "" +PrintSetup = Preview_normal$ +PrintSetup = Display_AllButtons$ +PrintSetup<2> = -1 ;* Set initial zoom to PageWidth +PrintSetup<3> = 5 ;* Set the Print Preview position at 5% from top and left +PrintSetup<4> = 5 +PrintSetup<5> = 95 +PrintSetup<6> = 95 + +VAL = Set_Printer("INIT", FileName, PrintTitle:@FM:PreviewTitle, Margins, Orientation, PrintSetup) +if VAL < 0 then + * Always check the return value of the INIT message for error + ErrorMsg = "Fatal error with the INIT message:":VAL + Return '' +end + +colors = "" +colors = Red$ :@fm: Blue$ : @fm : ORANGE$ : @fm: MAGENTA$ + +wedges = "" +wedges = 27:@fm:13:@fm:18:@fm:30 +rslt = oipi_piechart_helper(2,2,1,wedges, colors, LEGEND_DEFAULTS$) + +X = Set_Printer('TERM') + +Return '' + diff --git a/SYSPROG/STPROC/OIPI_TESTPATTERN.txt b/SYSPROG/STPROC/OIPI_TESTPATTERN.txt new file mode 100644 index 0000000..68a16e2 --- /dev/null +++ b/SYSPROG/STPROC/OIPI_TESTPATTERN.txt @@ -0,0 +1,478 @@ +subroutine OIPI_TESTPATTERN(bShowHeader, whichPrinter, whichPages, outputTo) + +/* + + OIPI TestPattern + + + + This is an example program on how to use the OpenInsight Printer Interface. + + +*/ + + +If Assigned(bShowHeader) Else bShowHeader = "" +If Assigned(whichPrinter) Else whichPrinter = "" +If Assigned(whichPages) Else whichPages = "" +If Assigned(outputTo) Else outputTo = "" + +declare function Set_Printer, Get_Printer, RGB,Set_Property + +declare function Msg, GET_PROPERTY + +$insert OIPRINT_EQUATES +$Insert Ps_oipi_common +$Insert RTI_Postscript_Common + + +Equ Portrait$ To 0 +Equ Landscape$ To 1 + +* print Setup Equate +Equ Print_Style$ To 1 +Equ Print_Zoom$ To 2 + +Equ Print_ToPrinter$ To 0 +Equ Display_PrintSetup$ To 1 +Equ Preview_Normal$ To 2 +Equ Print_Mazimized$ To 3 + +Equ Display_AllButtons$ To 0 +Equ Hide_PrintButton$ To 1 +Equ Hide_PrintSetupButton$ To 2 +Equ Hide_AllButtons$ To 3 + +* Create the fonts for the OIPI report + +* 14 point Arial font +Font1 = "Arial":@FM:14 + +* 14 point Times New Roman +Font2 = "Times New Roman":@FM:14 + +HeaderType = "" +FooterType = "" +HeaderText = "" +FooterText = "" +boxText = "" + +If whichPages = "" Then whichpages = "1-3" + +If bShowHeader = "CLICK" Then + * this came from the form - get all the required details from there + whichPrinterText = Get_Property(@Window:".CBO_PRINTER", "DEFPROP") + headerType = Get_Property(@Window:".CBO_HEADER", "DEFPROP") + footerType = Get_Property(@Window:".CBO_FOOTER", "DEFPROP") + boxText = Get_Property(@Window:".CBO_BOX_TEXT", "DEFPROP") + doPageLines = Get_Property(@Window:".CHK_PAGE_LINES", "DEFPROP") + numLines = Get_Property(@Window:".TXT_NO_LINES", "TEXT") + doPageMisc = Get_Property(@Window:".CHK_PAGE_MISC", "DEFPROP") + doPageXY = Get_Property(@Window:".CHK_PAGE_TEXTXY", "DEFPROP") + doPageSkipping = Get_Property(@Window:".CHK_PAGE_SKIPPING", "DEFPROP") + Begin Case + Case Index(whichPrinterText, "VSPRINTER1", 1) + whichPrinter = "1" + Case Index(whichPrinterText, "VSPRINTER2", 1) + whichPrinter = "2" + Case 1 + whichPrinter = "" + End Case + Begin Case + Case indexc(headerType, "single", 1) + HeaderText = "The Header Text" + Case indexc(headerType, "multi", 1) + HeaderText = @VM:"'F'":@FM:"'DL'":@VM:@VM:"Page 'P'":@FM + Case indexc(headerType, "extra", 1) + HeaderText = @VM:"'F'":@FM:"'DL'":@VM:@VM:"Page 'P'":@FM:"Another line":@FM:"And Another":@FM:"Final Header":@FM + End Case + Begin Case + Case indexc(footerType, "single", 1) + FooterText = "The Footer Text" + Case indexc(footerType, "multi", 1) + FooterText = @VM:"'F'":@FM:"'DL'":@VM:@VM:"Page 'P'":@FM + End Case + whichPages = "" + delim = "" + If doPageMisc = "1" Then + whichPages = "1" + delim = "," + End + If doPageSkipping = "1" Then + whichPages := delim:"2" + delim = "," + End + If doPageXY = "1" Then + whichPages := delim:"3" + delim = "," + end +End + +call set_vsprinter(whichPrinter) ;* either set the override, or clear it if whichPrinter not specified + +* Start the OIPI report with the INIT message +FileName = "OIPI_TestPattern" + +PrintTitle = "OIPI Test..." +PreviewTitle = "OIPI Print Preview" + +deviceSetup = "" + +Margins = .5:@FM:1:@FM:.5:@FM:1 ;* half inch margins On the sides, one inch margins On the top +Orientation = Portrait$ +PrintSetup = "" +PrintSetup = Display_AllButtons$ +PrintSetup<2> = -1 ;* Set initial zoom to PageWidth +PrintSetup<3> = 5 ;* Set the Print Preview position at 5% from top and left +PrintSetup<4> = 5 +PrintSetup<5> = 95 +PrintSetup<6> = 95 + +If outputTo <> "" Then + If outputTo[1,1] = "!" Then + deviceSetup<1,2> = 1 + End + deviceSetup<1,1> = outputTo + PrintSetup = Print_ToPrinter$ +End Else + PrintSetup = Preview_normal$ +end + +VAL = Set_Printer("INIT", FileName, PrintTitle:@FM:PreviewTitle, Margins, Orientation, PrintSetup, deviceSetup) +if VAL < 0 then + * Always check the return value of the INIT message for error + ErrorMsg = "Fatal error with the INIT message:":VAL + goto fatalExit +end + +* Set the font for all of the headers and footers +if Set_Printer("FONTHEADFOOT", "Arial":@FM:14:@FM:"L":@fm:1) < 0 then + ErrorMsg = "Error with the FONTHEADFOOT message" + goto fatalExit +end +* + +X=0 +Y=0 +If headerText = "" And footerText = "" then + Begin Case + Case bShowHeader = "1" + * Print a simple one line header + HeaderText = "The Header Text" + Case bShowHeader = "2" + * Print the header with the file name centered on the first line and + * the Long format of the date left justified and the page number right justified + * on the second line. + HeaderText = @VM:"'F'":@FM:"'DL'":@VM:@VM:"Page 'P'":@FM:"Another line":@FM:"And Another":@FM:"Final Header":@FM + Case bShowHeader = "3" + FooterText = @VM:"This is a footer" + Case bShowHeader = "4" + HeaderText = "The Header Text" + FooterText = @VM:"This is a footer" + Case bShowHeader = "5" + HeaderText = @VM:"'F'":@FM:"'DL'":@VM:@VM:"Page 'P'":@FM + FooterText = @VM:"This is a footer" + End Case +End +If headerText <> "" Then + x = Set_Printer("HEADER", HeaderText) + If x < 0 then + ErrorMsg = "Error with the HEADER message" + goto fatalExit + End +End +If footerText <> "" Then + Y = Set_Printer("FOOTER", FooterText) + If y < 0 then + ErrorMsg = "Error with the FOOTER message" + goto fatalExit + End +End + +If whichPages = "-1" Then + doPageLines = 1 + NumLines = 300 + boxText = "No" +End + + +If boxText _nec "no" Then + If Indexc(boxText, "all", 1) Then + * show on all pages + showOnAllPages = "" + End Else + * on first page only + showOnAllPages = 0 + end + textstring = 'Text in a box':@fm:'More text in a box' + stat = Set_Printer("TEXTBOX", textstring, 1:@fm:1:@fm:1:@fm:1,"", showOnAllPages) +end + + + +If doPageLines Then + If Not(Num(numLines)) Or numLines = "" Or NumLines < 0 Then + numLines = 300 + end + For each.row = 1 To numlines + call Set_Printer("TEXT", "here at row ":each.row) + Next each.row +End + + +call Set_Printer("POS", 0:@FM:0) + +num.sections = dcount(whichPages, ",") +For each.section = 1 To num.sections + this.section = Field(whichPages, ",", each.section) + beginPage = Field(this.section, "-", 1) + endPage = Field(this.section, "-", 2) + If endPage = "" Then endPage = beginPage + If Num(beginPage) And beginPage <> "" And Num(endPage) And endPage <> "" Then + If beginPage < 0 Then beginPage = 0 + If endPage > 3 Then endPage = 3 + For each.pg = beginPage To endPage + If each.pg <> 0 then + On each.pg Gosub doPage1, doPage2, doPage3 + end + Next each.pg + End +Next each.section +Goto doTerm + +doPage1: + +if Set_Printer("FONT", Font1) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +End +For each.row = 1 To 5 + call Set_Printer("TEXT", "Arial 14 row ":each.row) + call Set_Printer("TEXT", @upper.Case:@lower.Case) +Next each.row + +For each.row = 1 To 5 + call Set_Printer("TEXT",".") +Next each.row + +if Set_Printer("FONT", Font2) < 0 then + ErrorMsg = "Error with the FONT message" + goto fatalExit +End +For each.row = 1 To 5 + call Set_Printer("TEXT", "Times Roman 14 row ":each.row) + call Set_Printer("TEXT", @upper.Case:@lower.Case) +Next each.row +Stat = Set_Printer('CALCTEXT',@Upper.Case) +AA = Get_Printer('CALCTEXT') +call Set_Printer("TEXT","CALCTEXT returns *":AA<1>:"x":AA<2>:"*") + +CALL Set_Printer("POS", 2:@FM:6) +* Print pyramid +if Set_Printer("LINESTYLE", PS_NULL) < 0 then + ErrorMsg = "Error with the LINESTYLE message" + goto fatalExit +end +pos = Get_Printer("POS") +y = pos<2> +offset = 0 + +for c = 0 to 128 step 12.8 + if Set_Printer("FILLSTYLE", BS_SOLID:@FM:RGB(0, 0, 128 + c)) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit + end +R = 1+offset:@FM:y+offset:@FM:3-offset:@FM:y-offset+2 + if Set_Printer("RECT", 1+offset:@FM:y+offset:@FM:3-offset:@FM:y-offset+2, 0) < 0 then + ErrorMsg = "Error with the RECT message" + goto fatalExit + end + offset = offset + 0.05 +next c +for c = 0 to 128 step 12.8 + if Set_Printer("FILLSTYLE", BS_SOLID:@FM:RGB(c, c, 255)) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit + end + if Set_Printer("RECT", 1+offset:@FM:pos<2>+offset:@FM:3-offset:@FM:pos<2>+2-offset, 0) < 0 then + ErrorMsg = "Error with the RECT message" + + goto fatalExit + end + offset = offset + 0.05 +next c +if Set_Printer("LINESTYLE", PS_SOLID:@FM:1:@FM:RGB(0, 0, 0)) < 0 then + ErrorMsg = "Error with the LINESTYLE message" + goto fatalExit +end +if Set_Printer("FILLSTYLE", BS_HOLLOW) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit +end +if Set_Printer("RECT", 1:@FM:pos<2>:@FM:3:@FM:pos<2>+2, 0) < 0 then + ErrorMsg = "Error with the RECT message" + goto fatalExit +end + +if Set_Printer("LINE", 1:@FM:pos<2>:@FM:3:@FM:pos<2>+2, 0) < 0 then + + ErrorMsg = "Error with the LINE message" + goto fatalExit +end +if Set_Printer("LINE", 3:@FM:pos<2>:@FM:1:@FM:pos<2>+2, 0) < 0 then + ErrorMsg = "Error with the LINE message" + goto fatalExit +end + +* print 3D button +text = "3D Button" +if Set_Printer("FILLSTYLE", BS_SOLID:@FM:RGB(128, 128, 128)) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit +end +if Set_Printer("FONT", "Arial":@FM:14) < 0 then + ErrorMsg = "Error with the FONT message" + + goto fatalExit +end + +if Set_Printer("CALCTEXT", text) < 0 then + ErrorMsg = "Error with the CALCTEXT message" + goto fatalExit +end + +size = Get_Printer("CALCTEXT") + +width = size<1> +height = size<2> +poly = "" +poly<1> = 3.5+width+.4:@VM:y +poly<2> = 3.5+width+.4:@VM:y+height+.4 +poly<3> = 3.5:@VM:y+height+.4 +poly<4> = 3.5+.1:@VM:y+height+.3 +poly<5> = 3.5+width+.3:@VM:y+height+.3 +poly<6> = 3.5+width+.3:@VM:y+.1 +if Set_Printer("POLYGON", poly, 0) < 0 then + goto fatalExit + +end + + xxx = get_printer("font") +if Set_Printer("FILLSTYLE", BS_HOLLOW) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit +end + + xxx = get_printer("font") +if Set_Printer("RECT", 3.5:@FM:y:@FM:3.5+width+.4:@FM:y+height+.4, 0) < 0 then + ErrorMsg = "Error with the RECT message" + goto fatalExit +end + + xxx = get_printer("font") +if Set_Printer("FILLSTYLE", BS_SOLID:@FM:RGB(192, 192, 192)) < 0 then + ErrorMsg = "Error with the FILLSTYLE message" + goto fatalExit +end +if Set_Printer("RECT", 3.5+.1:@FM:y+.1:@FM:3.5+width+.3:@FM:y+height+.3, 0) < 0 then + + ErrorMsg = "Error with the RECT message" + goto fatalExit +end + + xxx = get_printer("font") +if Set_Printer("TEXTXY", text, 3.7:@FM:y+.2, "", 0) < 0 then + ErrorMsg = "Error with the TEXTXY message" + goto fatalExit +end + +call Set_Printer("PAGEBREAK") +Return + +doPage2: + +text = " * OIPI uses the newest VSPRINT or .NET control for the print engine.":@FM +text := " * OIPI was rewritten in Basic+ from Microsoft Visual Basic.":@FM + +text := " * The ADDTABLE message was added to improve the quality of tables. This message should be used to replace all TABLE and TEXTCOL messages.":@FM +text := " * The Print Preview window can be scrolled with the mouse and all pages are viewable as soon as they are printed.":@FM +text := " * The IMIT message can be used to change the size of the paper without using the Printer Setup dialog box.":@FM +text := " * The CALCBMP and CALCTABLE messages were added.":@FM + +text := " * The title of the Print Preview window can be customized.":@FM + +x = Set_Printer("TEXT", "Text via 'Text' call: ":@FM:text) +p1 = Get_Printer("POS") +call Set_Printer("TEXT", "Position after 'Text': ":P1<1>:",":P1<2>) +For x = 1 To 3 + call Set_Printer("TEXT", ".") +Next x +p1 = Get_Printer("POS") +call Set_Printer("TEXT", "Position after dots: ":P1<1>:",":P1<2>) + +/* +x = Set_Printer("ADDTABLE", "9000":@FM, "", "Text via 'Addtable' call: ":@FM:text, "", "", "", TB_NONE) + +p1 = Get_Printer("POS") +call Set_Printer("TEXT", "Position after 'AddTable' call: ":P1<1>:",":P1<2>) + +header = "Year":@VM:"XYZ Co. Sales ($Mill)":@VM:"ABC Co. Sales ($Mill)":@FM +table = "" +for i = 0 to 6 + table = 2010+i + table = 3.5+(i-1)*10 + table = 3.5+(i-1)*50+7 +next i +if Set_Printer("FONT", "Arial":@FM:10:@FM:"L":@FM:1) < 0 then goto fatalExit +ColumnFormat = "_^770":@VM:"_>1080":@VM:"_>1080":@FM +if Set_Printer("ADDTABLE", ColumnFormat, header, table, RGB(0, 222, 0), "", "", TB_BOX_COLUMNS) < 0 then goto fatalExit + +if Set_Printer("CALCTABLE", ColumnFormat:header:table) < 0 then goto fatalExit + +size = Get_Printer("CALCTABLE") + +call Set_Printer("TEXT", "Calctable returns *":size<1>:"x":size<2>:"*") +*/ + +For j=1 To 50 +call Set_Printer("TEXT", "skipping...") +Next j +*CALL Set_Printer("PAGEBREAK") +Return + +doPage3: + +startX = 0 +startY = 0 +endX = 7 +endY = 10 + +For Y = startY To endY step .5 + For X = startX To endX step .5 + If x<>int(x) Or y<>int(y) Then + if Set_Printer("TEXTXY", "*", X:@FM:Y, "Arial":@FM:10, 0) < 0 then + + ErrorMsg = "Error with the TEXTXY message" + goto fatalExit + End + End else + if Set_Printer("TEXTXY", "(":X:",":y:")", X:@FM:Y, "Arial":@FM:10, 0) < 0 then + + ErrorMsg = "Error with the TEXTXY message" + goto fatalExit + End + end + Next X +Next Y +Return + +doTerm: +* End the report and tell the OIPI to completely shut down after the print preview is closed. +x = Set_Printer("TERM", 1) +return + +* jump here if any Set_Printer returns a value < 0 +fatalExit: + x = msg("", ErrorMsg) + x = Set_Printer("TERM", 1) +return diff --git a/SYSPROG/STPROC/PERIOD_FORMAT.txt b/SYSPROG/STPROC/PERIOD_FORMAT.txt new file mode 100644 index 0000000..3f11db7 --- /dev/null +++ b/SYSPROG/STPROC/PERIOD_FORMAT.txt @@ -0,0 +1,552 @@ +Subroutine PERIOD_FORMAT( CONV, argANS, argBRANCH, RETURN_DATA) + /* + * PERIOD_FORMAT is an example of a developer's custom prompt formatting + * routine using the square brackets call. + * + * It should be placed in square brackets, like this: + * + * [PERIOD_FORMAT,branch] + * + * See Iso 8601 -- This is not compliant, but could be made so + * branch values + branch result + J yyyy mm + J2- yy-mm + J- yyyy-mm + JM mm (current year assumed on input) + JY yyyy (month 1 assumed on input) + J2Y yy (month 1 assumed on input) + JW ww week number, current year assumed on input, week1 is week containing jan4 + JW- yyyy-ww year, week number + J2W + J2W- + JD yyyy-ddd year, day number + JFD- + J2D + J2 + JQ yyyy Qqq + JQ- yyyy-Qqq + J2Q yy Qqq + + *---------------------------------------------- + Example: + *---------------------------------------------- + + given table person containing a date field named "CREATED", + + make calculated columns like below + + created_year ; @ans = oconv({CREATED},"[PERIOD_FORMAT,JY]") + created_quarter; @ans = oconv({CREATED},"[PERIOD_FORMAT,JQ-]") + created_month ; @ans = oconv({CREATED},"[PERIOD_FORMAT,JM-]") + created_week ; @ans = oconv({CREATED},"[PERIOD_FORMAT,JW-]") + + you can index these columns, then run reports like + * ------------------------------------------------ + LIST PERSON WITH CREATED_MONTH EQ "2017-01" BY CREATED CREATED_YEAR CREATED_QUARTER BREAK-ON CREATED_MONTH BREAK-ON CREATED_WEEK CREATED TOTAL CNT + * ------------------------------------------------ + + Key Year Quarter Month.. Week.. Created... Cnt + 456300 2017 2017-Q1 2017-01 2017-2 01/03/2017 1 + 343420 2017 2017-Q1 2017-01 2017-2 01/04/2017 1 + 235412 2017 2017-Q1 2017-01 2017-2 01/05/2017 1 + 359226 2017 2017-Q1 2017-01 2017-2 01/05/2017 1 + 386344 2017 2017-Q1 2017-01 2017-2 01/06/2017 1 + *** 5 + 419290 2017 2017-Q1 2017-01 2017-3 01/09/2017 1 + 371020 2017 2017-Q1 2017-01 2017-3 01/10/2017 1 + 466330 2017 2017-Q1 2017-01 2017-3 01/10/2017 1 + 460838 2017 2017-Q1 2017-01 2017-3 01/14/2017 1 + *** 4 + 242294 2017 2017-Q1 2017-01 2017-4 01/15/2017 1 + 451632 2017 2017-Q1 2017-01 2017-4 01/15/2017 1 + 394126 2017 2017-Q1 2017-01 2017-4 01/16/2017 1 + 408958 2017 2017-Q1 2017-01 2017-4 01/16/2017 1 + 452012 2017 2017-Q1 2017-01 2017-4 01/17/2017 1 + 373470 2017 2017-Q1 2017-01 2017-4 01/18/2017 1 + *** 6 + 324396 2017 2017-Q1 2017-01 2017-5 01/25/2017 1 + 255764 2017 2017-Q1 2017-01 2017-5 01/26/2017 1 + 287786 2017 2017-Q1 2017-01 2017-5 01/26/2017 1 + 343596 2017 2017-Q1 2017-01 2017-5 01/27/2017 1 + 365166 2017 2017-Q1 2017-01 2017-5 01/28/2017 1 + *** 5 + 249224 2017 2017-Q1 2017-01 2017-6 01/29/2017 1 + 455278 2017 2017-Q1 2017-01 2017-6 01/29/2017 1 + 235614 2017 2017-Q1 2017-01 2017-6 01/31/2017 1 + 304394 2017 2017-Q1 2017-01 2017-6 01/31/2017 1 + *** 4 + *** 24 + + + + * ------------------------------------------------ + LIST PERSON WITH CREATED_QUARTER EQ "2017-Q1" BY CREATED BREAK-ON CREATED_YEAR "'V'" BREAK-ON CREATED_QUARTER "'V'" BREAK-ON CREATED_MONTH "'V'" BREAK-ON CREATED_WEEK "'V'" TOTAL CNT ID-SUPP DET-SUPP + * ------------------------------------------------ + + Created Year Created Quarter Created Month CREATED_WEEK Cnt + 2017-2 3465 + 2017-3 3526 + 2017-4 3393 + 2017-5 3585 + 2017-6 1475 + + 2017-01 15444 + + 2017-6 2064 + 2017-7 3432 + 2017-8 3473 + 2017-9 3423 + 2017-10 1541 + + 2017-02 13933 + + 2017-10 1928 + 2017-11 3527 + 2017-12 3395 + 2017-13 3543 + 2017-14 3027 + + 2017-03 15420 + + 2017-Q1 44797 + + 2017 44797 + + *** 44797 + + *---------------------------------------------- + + + + * 2006-08-27 rjc Created + * 2017-12-27 rjc Cleaned up + + */ + + #pragma format_Indent_comments + $insert msg_equates + $insert logical + $insert rti_HashTable_Equates + $insert rti_SSP_Equates + $insert logical + + Declare Subroutine Set_Status + Declare Function rti_HashTable_STL, get_status + + /* + */ + + declare function Msg, rtp_65 + common /period_Format_Com/init%,hCache% + If init% Else + hCache% = rti_HashTable_STL(REVSTL_HTBLMTD_CREATETABLE$, REVSTL_HTBLTYPE_SPP$ ) + init% = ( hCache% gt 0 ) + end + + * Local Equates + * The STATUS() variable is used to indicated the error condition of the + * pattern. They are: + EQU VALID$ TO 0 ;* Successful + EQU INVALID_MSG$ TO 1 ;* Bad Data - Print error message window + EQU INVALID_CONV$ TO 2 ;* Bad Conversion - " " + EQU INVALID_NOMSG$ TO 3 ;* Bad but do not print the error message window + + + * Begin Conversion + * + if assigned(argAns) then ans = argAns else ans = '' + if assigned(argBranch) then branch = argBranch else branch = '' + RETURN_DATA = "" + + + ans = trim(Ans) + status() = valid$ + + + * parse for period, delim + if branch[1,1] _nec 'J' then + Status() = INVALID_CONV$ + return + end + + period_types = 'MYWDQ' + period_type = '' + delim = '' + for i = 1 to len(period_types) + this_type = period_types[i,1] + period_pos = indexc(branch, this_Type, 1) + if period_pos then + period_type = this_type + delim = branch[period_pos+1,1] + end + until period_type + next + + * J J2 J2- default to month + if period_type = '' then + period_type = 'M' + if alpha(branch[2,1]) then + delim = branch[2,1] + end else + delim = branch[3,1] + end + end + + * default delim is space + if delim = '' then + delim = ' ' + end + + * 4 digit year? + begin case + case Indexc('JM JW JD',branch,1) + * Special cases, no display of year + year_digits = 0 + case index(branch, 2, 1) + year_digits = 2 + case otherwise$ + year_digits = 4 + end case + + + begin case + case conv = 'OCONV' + GoSub OConv + case conv = 'ICONV' + GoSub Iconv + case otherwise$ + Status() = INVALID_CONV$ + end case + +return + ****** + + + +Iconv: + /* + ** Iconv returns a standard serial date number ( day 0 = 12/31/1967 ) + ** Where the date is the frst day of the period, i.e the first day of the year, month or week + */ + + cacheKey = ans:"*I":branch + cacheVal = null$ + stl_ret = rti_HashTable_STL(REVSTL_HTBLMTD_READROW$, hCache%, cacheKey, cacheVal) + If stl_Ret gt 0 then + transfer cacheVal To return_data + return + End + + * If they passed in a number, assume it is an iconv'd date already, oconv it, then iconv again. + If Num(ans) And Len(ans) gt 4 Then + ans = Oconv(ans,'D4-') + end + + begin case + case branch _eqc 'JM' + * Special case, no year supplied, just month + month = ans[1,2] + if num(month) else + status()=Invalid_Msg$ + return + end + + odate = Oconv(date(),'D4-') + odate[1,6] = month:'-01-' + idate = Iconv(odate, 'D') + if idate then + return_data = idate + end else + status()=Invalid_Msg$ + end + + case period_type = 'M' + + if num(ans[3,1]) then + delim = ans[5,1] + end else + delim = ans[3,1] + end + + year = field(ans, delim,1) + month = field(ans, delim, 2 ) + + odate = month:'-01-':year + idate = Iconv(odate, 'D') + if idate then + return_data = idate + end else + status()=Invalid_Msg$ + end + + case period_type = 'Y' + year = ans + if num(year) else + status()=Invalid_Msg$ + end + + odate = '01-01-':year + idate = Iconv(odate, 'D') + if idate then + return_data = idate + end else + status()=Invalid_Msg$ + end + + + case period_type = 'W' + + * Iconv is date of the sunday that starts the week. + * Week 1 is assumed to start the sunday of the week in the year that contains Jan 4 + delim = ans + Convert '0123456789' To '' In delim + delim = delim[1,1] + + + * Valid Year? + If delim == '' then + year = '' + week_no = ans + End else + year = field(ans, delim,1) + week_no = field(ans, delim,2) + end + + if year and num(year) else + odate = Oconv(date(), 'D4-') + year = odate[-4,4] + end + + * Valid week? + begin case + case week_no = '' + idate = '' + case alpha(week_no) + idate = '' + case week_no < 1 + idate = '' + case week_no > 53 + idate = '' + case otherwise$ + + * First week of year always has 1/4 in it + first_day = Iconv('01/04/':year, 'D') + day_nr = mod(first_Day,7) + first_sunday = first_Day - day_nr + + * Internal date is that number of weeks after first week + * Adjust by one, so W1 is first week of year, not W0 + week_no -=1 + idate = first_sunday + 7 *week_no + end case + + if idate then + return_data = idate + end else + status()=Invalid_Msg$ + end + + case period_type = 'Q' + + if num(ans[3,1]) then + delim = ans[5,1] + end else + delim = ans[3,1] + end + + year = field(ans, delim,1) + quarter = field(ans, delim, 2 ) + Convert 'Qq' To '' In quarter + + quarter = ( int(month/4) ) + 1 + Begin Case + Case quarter lt 2 ; qmonth = 3 + Case quarter lt 3 ; qmonth = 6 + Case quarter lt 4 ; qmonth = 9 + Case 1 ; qmonth = 12 + End case + + odate = qmonth:'-01-':year + idate = Iconv(odate, 'D') + if idate then + return_data = idate + end else + status()=Invalid_Msg$ + end + + case period_type = 'D' + + * Iconv is standard date + + if year_digits = 0 or ( ans matches '(1,366)' ) then + day_no = ans + year = '' + end else + delim = ans[3,1] + + * Valid Year? + begin case + case delim = '' + year = '' + day_no = '' + case num(delim) + year = ans[1,4] + day_no = ans[5,len(ans)] + if num(day_no[1,1]) else + day_no[1,1] = '' + end + case otherwise$ + year = field(ans, delim,1) + day_no = field(ans, delim,2) + end case + end + + if year and num(year) else + odate = Oconv(date(), 'D4-') + year = odate[-4,4] + end + + * Valid day? + is_leap = ( mod(year, 4) = 0 ) and not(mod(year, 100) = 0) + begin case + case day_no = '' + idate = '' + case alpha(day_no) + idate = '' + case day_no < 1 + idate = '' + case is_leap and day_no > 366 + idate = '' + case day_no > 365 + idate = '' + case otherwise$ + first_day = Iconv('01/01/':year, 'D') + zeroth_day = first_Day-1 + idate = zeroth_Day + day_no + end case + + if idate then + return_data = idate + unused = rti_HashTable_STL(REVSTL_HTBLMTD_WRITEROW$, hCache%, cacheKey, return_Data) + + end else + status()=Invalid_Msg$ + end + end case + +return + + +Oconv: + /* + ** Input is expected to be a serial date number + ** Output will be the requested format + */ + + return_Data = '' + if num(ans) and ( ans # '' ) else + return + end + + + cacheKey = ans:"*O":branch + cacheVal = null$ + stl_ret = rti_HashTable_STL(REVSTL_HTBLMTD_READROW$, hCache%, cacheKey, cacheVal) + If stl_Ret gt 0 then + transfer cacheVal To return_data + return + End + + begin case + + case period_type = 'M' + odate = Oconv(ans, 'D4-') + month = odate[1,2] + year = odate[7,4] + begin case + case year_digits = 4 + return_data = year : delim : month + case year_Digits = 2 + return_data = year[-2,2] : delim : month + case year_digits = 0 + return_data = month + end case + + case period_type = 'Y' + + oDate = Oconv(ans, 'D4-') + year = odate[-1,'B-'] + if year_Digits = 2 then + return_Data = year[-2,2] + end else + return_Data = year + end + + case period_type = 'W' + + * Get date of sunday for the week containing date + day_nr = mod(ans, 7) + sunday = ans - day_nr + + * get date of sunday for date containing Jan 4 of same year + odate = Oconv(ans, 'D4-') + year = odate[-4,4] + jan_4 = iconv('01/-04-':year, 'D') + day_nr = mod(jan_4, 7) + first_sunday = jan_4 - day_nr + + * Calc week nr + * Week 1 is assumed to start the sunday of the week in the year that contains Jan 4 + * Add one to result as first week is week one, not week zero + + day_nr = int(sunday - first_sunday) + week_no = Int(day_nr / 7) + 1 + week_no +=1 + begin case + case year_digits = 4 + return_data = year : delim : week_no + case year_Digits = 2 + return_data = year[-2,2] : delim : week_no + case year_digits = 0 + return_data = week_no + end Case + case period_type = 'Q' + odate = Oconv(ans, 'D4-') + month = odate[1,2] + quarter = int(month/4)+1 + year = odate[7,4] + begin case + case year_digits = 4 + return_data = year : delim : "Q":quarter + case year_Digits = 2 + return_data = year[-2,2] : delim : "Q":quarter + case year_digits = 0 + return_data = "Q":quarter + end Case + + case period_type = 'D' + + odate = Oconv(ans, 'D4/') + year = odate[-4,4] + first_day = Iconv('01/01/':year, 'D') + zeroth_day = first_Day-1 + day_no = ans - zeroth_Day + day_no = fmt(day_no, 'R(0)#3') + begin case + case year_digits = 4 + return_data = year : delim : day_no + case year_Digits = 2 + return_data = year[-2,2] : delim : day_no + case year_digits = 0 + return_data = day_no + end case + + + end Case + + + unused = rti_HashTable_STL(REVSTL_HTBLMTD_WRITEROW$, hCache%, cacheKey, return_Data) + + +return diff --git a/SYSPROG/STPROC/PHONE_FORMAT.txt b/SYSPROG/STPROC/PHONE_FORMAT.txt new file mode 100644 index 0000000..a2ff74b --- /dev/null +++ b/SYSPROG/STPROC/PHONE_FORMAT.txt @@ -0,0 +1,101 @@ +compile SUBROUTINE PHONE_FORMAT( charstr CONV, charstr ANS, charstr BRANCH, charstr RETURN_DATA) +* +* PHONE_FORMAT is an example of a developer's custom prompt formatting +* routine using the square brackets call. +* +* It should be placed in square brackets, like this: +* +* [PHONE_FORMAT] +* +* This subroutine should be used as the first and only "Input Validation" in +* a window prompt. Placed in "Output Format", it properly formats any +* reasonable string of numbers into a consistent US telephone number format. +* +* mtr 5-29-01 Changed @upper.case to @lower.case conversion +* mtr 3-18-02 Added '.' as a valid delimiter. +! +begin condition +pre: +post: +end condition + +* Subroutine declarations + +$insert msg_equates + +declare function msg + +* Local Equates +* The STATUS() variable is used to indicated the error condition of the +* pattern. They are: +EQU VALID$ TO 0 ;* Successful +EQU INVALID_MSG$ TO 1 ;* Bad Data - Print error message window +EQU INVALID_CONV$ TO 2 ;* Bad Conversion - " " +EQU INVALID_NOMSG$ TO 3 ;* Bad but do not print the error message window + +EQU THREEDGRAY$ TO 192 + +* Begin Conversion +* + RETURN_DATA = "" + IF ANS NE "" THEN + TEL = ANS + ANS = "" + STATUS() = VALID$ + + *DFLT_AREA_CODE = "" + * PHONE_FORMAT can support a default area code. To assign a default + * simply set the variable DFLT_AREA_CODE. In this example it is set to + * null. + *CONVERT " -()" TO "" IN DFLT_AREA_CODE + *IF NUM( DFLT_AREA_CODE ) ELSE DFLT_AREA_CODE = "" + + CONVERT " -()." TO "" IN TEL + * mtr + CONVERT @LOWER.CASE TO @UPPER.CASE IN TEL + CONVERT "ABCDEFGHIJKLMNOPQRSTUVWXYZ" TO "2223334445556667Q77888999Z" IN TEL + + IF NUM( TEL ) THEN + LENGTH = LEN( TEL ) + * Case statement to validate all possible types of phone numbers. If + * a new format is required simply add another case. + * The fall-through (CASE 1) traps invalid conversions. + BEGIN CASE + CASE LENGTH = 10 + IF CONV EQ "OCONV" THEN + RETURN_DATA = FMT( TEL, "L(###) ###-####") + END ELSE + RETURN_DATA = TEL + END + CASE LENGTH EQ 7 + IF CONV EQ "OCONV" THEN + RETURN_DATA = FMT( TEL, "L###-####") + END ELSE + RETURN_DATA = TEL + END + CASE 1 + IF CONV = "ICONV" THEN + gosub DisplayError + END + STATUS() = INVALID_NOMSG$ + END CASE + END ELSE + IF CONV = "ICONV" THEN + gosub DisplayError + END + STATUS() = INVALID_NOMSG$ + END + END + RETURN +*} + +DisplayError: + msgrec = "" + msgrec = "Data Validation Error" + msgrec = TEL : " is not a valid phone number. Please enter a seven or ten digit number in any format." + msgrec = THREEDGRAY$:@VM:THREEDGRAY$:@VM:THREEDGRAY$ + msgrec = 'L' + result = msg( "", msgrec) +return + +* Source Date: 11:16:17 21 OCT 1991 Build ID: AREV*2.12.5 Level: 2.12 diff --git a/SYSPROG/STPROC/PROMOTED_CLEARFILE_ACTION.txt b/SYSPROG/STPROC/PROMOTED_CLEARFILE_ACTION.txt new file mode 100644 index 0000000..ea5f367 --- /dev/null +++ b/SYSPROG/STPROC/PROMOTED_CLEARFILE_ACTION.txt @@ -0,0 +1,94 @@ +Function Promoted_ClearFile_Action(Action, Reserved1, FSList, Handle, Name, FMC, Record, Status, OrigRecord, Param1, Param2, Param3, Param4, Param5, Param6, Param7, Param8, Param9, Param10) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Promoted_ClearFile_Action + + Description : Promoted (e.g. generic) handler for CLEARFILE action. + + Notes : Typically called by BASE_MFS + + Parameters : + Action [in] -- Name of the action to be taken. + Reserved1 [in] -- Currently being reserved. + FSList [in] -- The list of MFSs and the BFS name for the current file or volume. This is an @SVM + delimited array, with the current MFS name as the first value in the array, and the BFS + name as the last value. Normally set by a calling MFS. + Handle [in] -- The file handle of the file or media map being accessed. Note, this does contain the + entire handle structure that the Basic+ Open statement would provide. Normally set by a + calling MFS. + Name [in] -- The name (key) of the record or file being accessed. Normally set by a calling MFS. + FMC [in] -- Various functions. Normally set by a calling MFS. + Record [in] -- The entire record (for record-oriented functions) or a newly-created handle (for + "get handle" functions). Normally set by a calling MFS. + Status [in/out] -- Indicator of the success or failure of an action. Normally set by the calling MFS but + for some actions can be set by the action handler to indicate failure. + OrigRecord [in] -- Original content of the record being processed by the current action. This is + automatically being assigned by the WRITE_RECORD and DELETE_RECORD actions within + BASE_MFS. + Param1-10 [in/out] -- Additional request parameter holders + ActionFlow [out] -- Used to control the action chain (see the ACTION_SETUP insert for more information.) + Can also be used to return a special value, such as the results of the CalcField + method. + + History : (Date, Initials, Notes) + 03/07/20 dmb Original programmer. + 09/09/20 dmb Update the Post gosub logic to call the IsReplicationTable and IsTableAllowedToQueue + services before calling the AddToReplicationQueueTable service. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert FILE.SYSTEM.EQUATES +$insert ACTION_SETUP + +Declare function Replication_Services +Declare subroutine Replication_Services + +If Action[-3, 3] EQ "PRE" then + // This is a pre-BFS handler promoted action. + GoSub Pre +end else + // This is a post-BFS handler promoted action. + GoSub Post +end + +// If ActionFlow hasn't already been assigned then assume it should continue +If Assigned(ActionFlow) else ActionFlow = ACTION_CONTINUE$ + +Return ActionFlow + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Actions +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// Pre +// +// All pre-BFS action handler logic. +//---------------------------------------------------------------------------------------------------------------------- +Pre: + +return + + +//---------------------------------------------------------------------------------------------------------------------- +// Post +// +// All post-BFS action handler logic. +//---------------------------------------------------------------------------------------------------------------------- +Post: + + If Replication_Services('IsReplicationTable', Tablename, AccountName) then + If Replication_Services('IsTableAllowedToQueue', Tablename, AccountName) then + TransactionID = 'CLEARFILE' : @FM : AccountName : @FM : Volume : @FM : Tablename : @FM : '' + Replication_Services('AddToReplicationQueueTable', TransactionID) + end + end + +return diff --git a/SYSPROG/STPROC/PROMOTED_DELETE_RECORD_ACTION.txt b/SYSPROG/STPROC/PROMOTED_DELETE_RECORD_ACTION.txt new file mode 100644 index 0000000..bdece20 --- /dev/null +++ b/SYSPROG/STPROC/PROMOTED_DELETE_RECORD_ACTION.txt @@ -0,0 +1,91 @@ +Function Promoted_Delete_Record_Action(Action, Reserved1, FSList, Handle, Name, FMC, Record, Status, OrigRecord, Param1, Param2, Param3, Param4, Param5, Param6, Param7, Param8, Param9, Param10) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Promoted_Delete_Record_Action + + Description : Promoted (e.g. generic) handler for DELETE_RECORD action. + + Notes : Typically called by BASE_MFS + + Parameters : + Action [in] -- Name of the action to be taken + Reserved1 [in] -- Currently being reserved. + FSList [in] -- The list of MFSs and the BFS name for the current file or volume. This is an @SVM + delimited array, with the current MFS name as the first value in the array, and the BFS + name as the last value. Normally set by a calling MFS. + Handle [in] -- The file handle of the file or media map being accessed. Note, this does contain the + entire handle structure that the Basic+ Open statement would provide. Normally set by a + calling MFS. + Name [in] -- The name (key) of the record or file being accessed. Normally set by a calling MFS. + FMC [in] -- Various functions. Normally set by a calling MFS. + Record [in] -- The entire record (for record-oriented functions) or a newly-created handle (for + "get handle" functions). Normally set by a calling MFS. + Status [in/out] -- Indicator of the success or failure of an action. Normally set by the calling MFS but + for some actions can be set by the action handler to indicate failure. + Param1-10 [in/out] -- Additional request parameter holders + ActionFlow [out] -- Used to control the action chain (see the ACTION_SETUP insert for more information.) + Can also be used to return a special value, such as the results of the CalcField + method. + + History : (Date, Initials, Notes) + 03/07/20 dmb Original programmer. + 09/09/20 dmb Update the Post gosub logic to call the IsReplicationTable and IsTableAllowedToQueue + services before calling the AddToReplicationQueueTable service. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert FILE.SYSTEM.EQUATES +$insert ACTION_SETUP + +Declare function Replication_Services +Declare subroutine Replication_Services + +If Action[-3, 3] EQ "PRE" then + // This is a pre-BFS handler promoted action. + GoSub Pre +end else + // This is a post-BFS handler promoted action. + GoSub Post +end + +// If ActionFlow hasn't already been assigned then assume it should continue +If Assigned(ActionFlow) else ActionFlow = ACTION_CONTINUE$ + +Return ActionFlow + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Actions +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// Pre +// +// All pre-BFS action handler logic. +//---------------------------------------------------------------------------------------------------------------------- +Pre: + +return + + +//---------------------------------------------------------------------------------------------------------------------- +// Post +// +// All post-BFS action handler logic. +//---------------------------------------------------------------------------------------------------------------------- +Post: + + If Replication_Services('IsReplicationTable', Tablename, AccountName) then + If Replication_Services('IsTableAllowedToQueue', Tablename, AccountName) then + TransactionID = 'DELETE' : @FM : AccountName : @FM : Volume : @FM : Tablename : @FM : Name + Replication_Services('AddToReplicationQueueTable', TransactionID) + end + end + +return diff --git a/SYSPROG/STPROC/PROMOTED_READONLY_RECORD_ACTION.txt b/SYSPROG/STPROC/PROMOTED_READONLY_RECORD_ACTION.txt new file mode 100644 index 0000000..592d453 --- /dev/null +++ b/SYSPROG/STPROC/PROMOTED_READONLY_RECORD_ACTION.txt @@ -0,0 +1,79 @@ +Function Promoted_ReadOnly_Record_Action(Action, Reserved1, FSList, Handle, Name, FMC, Record, Status, OrigRecord, Param1, Param2, Param3, Param4, Param5, Param6, Param7, Param8, Param9, Param10) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Promoted_ReadOnly_Record_Action + + Description : Promoted (e.g. generic) handler for READONLY_RECORD action. + + Notes : Typically called by BASE_MFS + + Parameters : + Action [in] -- Name of the action to be taken + Reserved1 [in] -- Currently being reserved. + FSList [in] -- The list of MFSs and the BFS name for the current file or volume. This is an @SVM + delimited array, with the current MFS name as the first value in the array, and the BFS + name as the last value. Normally set by a calling MFS. + Handle [in] -- The file handle of the file or media map being accessed. Note, this does contain the + entire handle structure that the Basic+ Open statement would provide. Normally set by a + calling MFS. + Name [in] -- The name (key) of the record or file being accessed. Normally set by a calling MFS. + FMC [in] -- Various functions. Normally set by a calling MFS. + Record [in] -- The entire record (for record-oriented functions) or a newly-created handle (for + "get handle" functions). Normally set by a calling MFS. + Status [in/out] -- Indicator of the success or failure of an action. Normally set by the calling MFS but + for some actions can be set by the action handler to indicate failure. + Param1-10 [in/out] -- Additional request parameter holders + ActionFlow [out] -- Used to control the action chain (see the ACTION_SETUP insert for more information.) + Can also be used to return a special value, such as the results of the CalcField + method. + + History : (Date, Initials, Notes) + 03/07/20 dmb Original programmer. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert FILE.SYSTEM.EQUATES +$insert ACTION_SETUP + +If Action[-3, 3] EQ "PRE" then + // This is a pre-BFS handler promoted action. + GoSub Pre +end else + // This is a post-BFS handler promoted action. + GoSub Post +end + +// If ActionFlow hasn't already been assigned then assume it should continue +If Assigned(ActionFlow) else ActionFlow = ACTION_CONTINUE$ + +Return ActionFlow + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Actions +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// Pre +// +// All pre-BFS action handler logic. +//---------------------------------------------------------------------------------------------------------------------- +Pre: + +return + + +//---------------------------------------------------------------------------------------------------------------------- +// Post +// +// All post-BFS action handler logic. +//---------------------------------------------------------------------------------------------------------------------- +Post: + +return diff --git a/SYSPROG/STPROC/PROMOTED_READ_RECORD_ACTION.txt b/SYSPROG/STPROC/PROMOTED_READ_RECORD_ACTION.txt new file mode 100644 index 0000000..86f13bf --- /dev/null +++ b/SYSPROG/STPROC/PROMOTED_READ_RECORD_ACTION.txt @@ -0,0 +1,79 @@ +Function Promoted_Read_Record_Action(Action, Reserved1, FSList, Handle, Name, FMC, Record, Status, OrigRecord, Param1, Param2, Param3, Param4, Param5, Param6, Param7, Param8, Param9, Param10) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Promoted_Read_Record_Action + + Description : Promoted (e.g. generic) handler for READ_RECORD action. + + Notes : Typically called by BASE_MFS + + Parameters : + Action [in] -- Name of the action to be taken + Reserved1 [in] -- Currently being reserved. + FSList [in] -- The list of MFSs and the BFS name for the current file or volume. This is an @SVM + delimited array, with the current MFS name as the first value in the array, and the BFS + name as the last value. Normally set by a calling MFS. + Handle [in] -- The file handle of the file or media map being accessed. Note, this does contain the + entire handle structure that the Basic+ Open statement would provide. Normally set by a + calling MFS. + Name [in] -- The name (key) of the record or file being accessed. Normally set by a calling MFS. + FMC [in] -- Various functions. Normally set by a calling MFS. + Record [in] -- The entire record (for record-oriented functions) or a newly-created handle (for + "get handle" functions). Normally set by a calling MFS. + Status [in/out] -- Indicator of the success or failure of an action. Normally set by the calling MFS but + for some actions can be set by the action handler to indicate failure. + Param1-10 [in/out] -- Additional request parameter holders + ActionFlow [out] -- Used to control the action chain (see the ACTION_SETUP insert for more information.) + Can also be used to return a special value, such as the results of the CalcField + method. + + History : (Date, Initials, Notes) + 03/07/20 dmb Original programmer. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert FILE.SYSTEM.EQUATES +$insert ACTION_SETUP + +If Action[-3, 3] EQ "PRE" then + // This is a pre-BFS handler promoted action. + GoSub Pre +end else + // This is a post-BFS handler promoted action. + GoSub Post +end + +// If ActionFlow hasn't already been assigned then assume it should continue +If Assigned(ActionFlow) else ActionFlow = ACTION_CONTINUE$ + +Return ActionFlow + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Actions +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// Pre +// +// All pre-BFS action handler logic. +//---------------------------------------------------------------------------------------------------------------------- +Pre: + +return + + +//---------------------------------------------------------------------------------------------------------------------- +// Post +// +// All post-BFS action handler logic. +//---------------------------------------------------------------------------------------------------------------------- +Post: + +return diff --git a/SYSPROG/STPROC/PROMOTED_WRITE_RECORD_ACTION.txt b/SYSPROG/STPROC/PROMOTED_WRITE_RECORD_ACTION.txt new file mode 100644 index 0000000..987da41 --- /dev/null +++ b/SYSPROG/STPROC/PROMOTED_WRITE_RECORD_ACTION.txt @@ -0,0 +1,94 @@ +Function Promoted_Write_Record_Action(Action, Reserved1, FSList, Handle, Name, FMC, Record, Status, OrigRecord, Param1, Param2, Param3, Param4, Param5, Param6, Param7, Param8, Param9, Param10) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Promoted_Write_Record_Action + + Description : Promoted (e.g. generic) handler for WRITE_RECORD action. + + Notes : Typically called by BASE_MFS + + Parameters : + Action [in] -- Name of the action to be taken. + Reserved1 [in] -- Currently being reserved. + FSList [in] -- The list of MFSs and the BFS name for the current file or volume. This is an @SVM + delimited array, with the current MFS name as the first value in the array, and the BFS + name as the last value. Normally set by a calling MFS. + Handle [in] -- The file handle of the file or media map being accessed. Note, this does contain the + entire handle structure that the Basic+ Open statement would provide. Normally set by a + calling MFS. + Name [in] -- The name (key) of the record or file being accessed. Normally set by a calling MFS. + FMC [in] -- Various functions. Normally set by a calling MFS. + Record [in] -- The entire record (for record-oriented functions) or a newly-created handle (for + "get handle" functions). Normally set by a calling MFS. + Status [in/out] -- Indicator of the success or failure of an action. Normally set by the calling MFS but + for some actions can be set by the action handler to indicate failure. + OrigRecord [in] -- Original content of the record being processed by the current action. This is + automatically being assigned by the WRITE_RECORD and DELETE_RECORD actions within + BASE_MFS. + Param1-10 [in/out] -- Additional request parameter holders + ActionFlow [out] -- Used to control the action chain (see the ACTION_SETUP insert for more information.) + Can also be used to return a special value, such as the results of the CalcField + method. + + History : (Date, Initials, Notes) + 03/07/20 dmb Original programmer. + 09/09/20 dmb Update the Post gosub logic to call the IsReplicationTable and IsTableAllowedToQueue + services before calling the AddToReplicationQueueTable service. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert FILE.SYSTEM.EQUATES +$insert ACTION_SETUP + +Declare function Replication_Services, Environment_Services, Logging_Services +Declare subroutine Replication_Services, Environment_Services, Logging_Services + +If Action[-3, 3] EQ "PRE" then + // This is a pre-BFS handler promoted action. + GoSub Pre +end else + // This is a post-BFS handler promoted action. + GoSub Post +end + +// If ActionFlow hasn't already been assigned then assume it should continue +If Assigned(ActionFlow) else ActionFlow = ACTION_CONTINUE$ + +Return ActionFlow + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Actions +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// Pre +// +// All pre-BFS action handler logic. +//---------------------------------------------------------------------------------------------------------------------- +Pre: + +return + + +//---------------------------------------------------------------------------------------------------------------------- +// Post +// +// All post-BFS action handler logic. +//---------------------------------------------------------------------------------------------------------------------- +Post: + + If Replication_Services('IsReplicationTable', Tablename, AccountName) then + If Replication_Services('IsTableAllowedToQueue', Tablename, AccountName) then + TransactionID = 'WRITE' : @FM : AccountName : @FM : Volume : @FM : Tablename : @FM : Name + Replication_Services('AddToReplicationQueueTable', TransactionID) + end + end + +return diff --git a/SYSPROG/STPROC/REPLICATION_SERVICES.txt b/SYSPROG/STPROC/REPLICATION_SERVICES.txt new file mode 100644 index 0000000..97f1251 --- /dev/null +++ b/SYSPROG/STPROC/REPLICATION_SERVICES.txt @@ -0,0 +1,3759 @@ +Function Replication_Services(@Service, @Params) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Replication_Services + + Description : Handler program for all module related services. + + Notes : The generic parameters should contain all the necessary information to process the services. Often + this will be information like the data Record and Key ID. + + Parameters : + Service [in] -- Name of the service being requested + Param1-10 [in/out] -- Additional request parameter holders + Response [out] -- Response to be sent back to the Controller (MCP) or requesting procedure + + History : (Date, Initials, Notes) + 01/11/20 dmb Original programmer. + 01/11/20 dmb Update AddToReplicationQueueTable to bypass suspended tables. + 01/11/20 dmb Update ReplicateTransactions to detect when new tables are being processed within the same + queue and end the process. This maintains the principle of one queue being processed at any + time by an engine. + 01/11/20 dmb Add GetSRPEngineServerINI and SetSRPEngineServerINI services. + 01/11/20 dmb Add CreateMasterReplicationQueue service. + 01/12/16 dmb Add SetSourceREVBOOTPath, GetSourceREVBOOTPath, SetTargetREVBOOTPath, and + GetTargetREVBOOTPath services. + 01/12/20 dmb Add SetDailyNotificationEmails, GetDailyNotificationEmails, SetEmergencyNotificationEmails, + GetEmergencyNotificationEmails, SetSMTPSettings, and GetSMTPSettings services. + 01/12/20 dmb Obsolete SendAlert service. Add SendEmergencyAlert service. + 01/12/20 dmb Update ReplicateTransactions service to replicate object code along with source code if + it exists. + 01/12/20 dmb Update ReplicateTransactions service to properly alias the target SYSREPOS table and update + the Repository pointers as needed. + 02/24/20 dmb Add Push.Select and Pop.Select calls to the GetReplicationQueueTableHandle service to + avoid unintentional clearing of @LIST_ACTIVE. + 02/24/20 dmb If Attach_Table fails in CreatePrivateReplicationQueue, check to see if it is not an SSP280 + error before assuming this means the table doesn't exist. + 02/24/20 dmb If Attach_Table fails in CreateMasterReplicationQueue, check to see if it is not an SSP280 + error before assuming this means the table doesn't exist. + 02/24/20 dmb Swap @VM with CRLF$ in the FileError variable for the SendEmergencyAlert service. + 02/24/20 dmb Add additional flag in GetReplicationQueueTableHandle to track whether a specific queue is + already known to exist or not exist. This prevents the service from attempting to attach + queues unnecessarily and slow down performance. + 02/24/20 dmb Refactor entire service module using Enhanced BASIC+ syntax. + 02/26/20 dmb Update AddToReplicationQueueTable to ignore %RECORDS% Key IDs. + 02/26/20 dmb Add GetReplicationQueueTableStatus and GetAllReplicationQueueTableStatus services. + 02/26/20 dmb Add ResetReplicationQueueCounters service. + 02/27/20 dmb Update ReplicateTransactions service to allow for the possibility that a pending transaction + in a queue might not be available. Insstead of issuing a warning and aborting the process, + just flag this as an IGNORE transaction. + 02/27/20 dmb Update ReplicateTransactions service to support the calling of another stored procedure + to handle the replication process. Used for alternative replication processes, such as when + the target is a SQL server. + 02/27/20 dmb Update ReplicateTransactions service to detach the source volume as strored in the transaction + ID before attempting to attach the resolved source volume. This will help to avoid FS404 + errors in cases where the volume was already attached by the application. + 02/28/20 dmb Update ReplicateTransactions service to track source volume changes and set the NewTable + flag accordingly. This addresses the issue where a table of the same name and same + Database ID exists (albeit one is aliased). They will both write to the same private queue + so the source volume must be used to detect a change in the actual source table. + 03/01/20 dmb Update the CreateMasterReplicationQueue service so the HaveQueueTable variable defaults + to false. + 03/08/20 dmb Update the GetReplicationQueueTables service so Set_Status(0) is called to avoid hearing + engine dings if there are no tables in the QueuePath passed into the List_Volume_Sub + subroutine. + 03/12/20 dmb Do not set an error if paths are missing from these services: SetSourceServerPath, + SetSourceREVBOOTPath, SetSourceQueuePath, SetTargetServerPath, SetTargetREVBOOTPath, and + SetTargetQueuePath. + 03/12/20 dmb Do not set an error in the SetMaxTransactionsCount if the MaxTransactionsCount argument + is empty. Only set an error if the value is non-numeric. + 03/12/20 dmb Allow the SetDailyNotificationEmails and SetEmergencyNotificationEmails services to pass in + an empty argument. This will clear out emails. + 03/28/20 dmb Update the SetSRPEngineServerINI service to support JSON content rather than @FM/@VM content + for the INI data. + 03/28/20 dmb Update the GetSRPEngineServerINI service to return JSON content rather than @FM/@VM content. + 03/28/20 dmb Add the GetSRPEngineServerTitle service. + 03/29/20 dmb Add the GetSRPEngineServerExeName service. Update the SetSRPEngineServerINI, + GetSRPEngineServerINI, and GetSRPEngineServerTitle services to use this service. + 08/02/20 dmb Update the ReplicateTransactions service so that if the called Replication Procedure has an + error the SendEmergencyAlert service will get called. + 08/02/20 dmb Update the SendEmergencyAlert service to use the new SMTP Sent From parameter. + 08/31/20 dmb Update the GetReplicationQueueTableHandle service to check Get_Status after the Fix_LH + subroutine is called. + 09/09/20 dmb Deprecate and remove the ProcessTransactions service. + 09/09/20 dmb Update the AddToReplicationQueueTable service to not call the GetDisabledTableFlag service. + It is now the responsibility of the caller (e.g., PROMOTED_WRITE_RECORD_ACTION) to verify + that the table is allowed to replicate. + 09/09/20 dmb Deprecate and remove the GetDisabledTableFlag service. This has been superceded by the + IsTableAllowedToQueue and IsTableAllowedToReplicate services. + 09/09/20 dmb Deprecate and remove the AppendToPendingQueue service. This was an artifact of the logic + to manage OS file based queues. + 09/09/20 dmb Deprecate and remove the SetReplicationVolumes and GetReplicationVolumes services. + 09/09/20 dmb Deprecate and remove the GetInProcessQueueFiles and GetInProcessQueueFile services. + 09/09/20 dmb Update the GetReplicationQueueTableStatus to include the %NumProcess% counter. + 09/12/20 dmb Deprecate the IsTableIncludedForReplication service and replace it with the + IsReplicationTable service. + 09/12/20 dmb Added the GetVolumeTables and HasBaseMFSInstalled services. + 09/12/20 dmb Deprecate the CreateMasterReplicationQueue service and replcate it with the + CreateReplicationQueue service. + 09/12/20 dmb Deprecate and remove the GetPendingQueueFiles and GetPendingQueueFile services. + 09/12/20 dmb Update the GetReplicationQueueTable service to use the GetTableQueueType service. + 09/12/20 dmb Deprecate the CreatePrivateReplicationQueue service and replace it with the + CreateReplicationQueue service. + 09/12/20 dmb Deprecate the DeletePrivateReplicationQueue service and replace it with the + DeleteReplicationQueue service. + 09/13/20 dmb Add QueueTable argument to the GetReplicationQueueTableHandle service. + 09/13/20 dmb Update the ReplicateTransactions service to handle tables that are suspended from being + replicated. Introduce a new transaction ID action of SKIP. This is similar to IGNORE, but + SKIP IDs won't be deleted since they are still valid. + 09/14/20 dmb Update the AddBaseMFSToTable, RemoveBaseMFSFromTable, and HasBaseMFSInstalled services + to always use SYSPROG as the database when calling Alias_Table for REVMEDIA. + 09/14/20 dmb Add the SetErrorLogPath, GetErrorLogPath, and IsLoggingEnabled services. + 09/14/20 dmb Add the LogError service. Update the ReplicateTransactions service to call the LogError + service (if logging is enabled) whenever the SendEmergencyAlert service is called. + 09/23/20 dmb Update the ResetReplicationQueueCounters service to use the same updates that were already + added to the GetReplicationQueueTableStatus service. + 09/23/20 dmb Update the ReplicateTransactions service to verify if the private queue is for a table + that is allowed to replicate before processing the transactions in the queue. This will + avoid unnecessary checks against all transactions. + 10/17/20 dmb Remove all hardcoded references to the SYSENV table and use the RepConfigTable$ equate + instead. This will allow users to define the table that should be used. + 10/18/20 dmb Update the LogError and SendEmergencyAlert services to retreive the current Queue Table and + Engine Name and include this in the information being submitted. + 02/23/21 dmb Update the ReplicateTransactions service to attach all tables rather than just the table + being replicated so symbolics will function properly. Set a memory flag to avoid constant + attach processes. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert SERVICE_SETUP +$insert SRPMAIL_INSERTS + +Equ CRLF$ to \0D0A\ +Equ Tab$ to \09\ + + +// The default table to store configuration information is SYSENV, but this equate can be changed to point to another +// table. +*Equ RepConfigTable$ to 'SYSENV' +Equ RepConfigTable$ to 'REP_MAN_CONFIG' + +// Equates that define the \REPLICATION_TABLES structure. +Equ RepTabTableName$ to 1 +Equ RepTabDatabaseID$ to 2 +Equ RepTabVolume$ to 3 +Equ RepTabHasBaseMFS$ to 4 +Equ RepTabCanQueue$ to 5 +Equ RepTabCanRep$ to 6 +Equ RepTabQueueType$ to 7 + +Common /ReplicationServices/ QueueTableList@, QueueHandleList@, QueueTableExists@, Unused4@, Unused5@, Unused6@, Unused7@, Unused8@ + +Declare function Replication_Services, Memory_Services, GetTickCount, RTI_OS_Directory, SRP_Path, Get_LH_Info +Declare function SRP_Encode, SRP_Decode, List_Volume_Sub, SRP_Sort_Array, GetCommandLine, UCase, SRP_Stopwatch +Declare function Environment_Services +Declare function SRP_Rotate_Array, SRP_Send_Mail, Get.RecCount, SRP_JSON, Database_Services, SRP_Array, Logging_Services +Declare subroutine Replication_Services, Memory_Services, Fix_LH, Set_Status, Alias_Table, Attach_Table, Detach_Volume +Declare subroutine SRP_Stopwatch, Clear_Table, Detach_Table, Create_Table, Delete_Table, Send_Info, Repos_Attach_Trans +Declare subroutine Repos_Detach_Trans, Push.Select, Pop.Select, SRP_JSON, Database_Services, Logging_Services + +Declare subroutine WritePrivateProfileString, obj_Notes +Declare subroutine GetPrivateProfileSection, GetPrivateProfileString + +// SRP HashTable declarations. +Declare function SRP_HashTable_Create, SRP_HashTable_Contains, SRP_HashTable_Count, SRP_HashTable_Get +Declare function SRP_HashTable_GetKeys, SRP_HashTable_GetValues, SRP_HashTable_GetKeyValuePairs +Declare subroutine SRP_HashTable_Set, SRP_HashTable_Release, SRP_HashTable_Remove + +// SRP List declarations. +Declare function SRP_List +Declare subroutine SRP_List + +LogPath = Environment_Services('GetApplicationRootPath') : '\LogFiles\Replication' +LogDate = Oconv(Date(), 'D4/') +LogTime = Oconv(Time(), 'MTS') +LogFileName = LogDate[7, 4] : '-' : LogDate[1, 2] : '-' : LogDate[4, 2] : ' Delete Error Log.csv' +Headers = 'Logging DTM' : @FM : 'Lookup Key ID' : @FM : 'Queue Table Handle' +objLog = Logging_Services('NewLog', LogPath, LogFileName, CRLF$, Comma$, Headers, '', False$, False$) +LoggingDTM = LogDate : ' ' : LogTime ; // Logging DTM + +GoToService else + Error_Services('Set', Service : ' is not a valid service request within the ' : ServiceModule : ' services module.') +end + +Return Response else '' + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Service Parameter Options +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +Options BOOLEAN = True$, False$ + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Services +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// AddToReplicationQueueTable +// +// TransactionID - The transaction ID that needs to be added to the queue. Note, this is not a Key ID to a database row. +// Rather, it is a meaningful identifier. See the notes below. - [Required] +// +// Adds the specified transaction ID to the replication queue table for eventual processing. The transaction ID must +// contain all necessary components for a replication action to succeed and follow this format: +// +// <1> - Action (i.e., WRITE, DELETE, CLEARFILE) +// <2> - Application (OpenInsight application that owns the database table.) +// <3> - Volume (Volume path, mapped drive or UNC, where the database table live.) +// <4> - Table (Database table that received the action.) +// <5> - KeyID (If application, the database row Key ID related to the action.) +//---------------------------------------------------------------------------------------------------------------------- +Service AddToReplicationQueueTable(TransactionID) + + // Verify that this is a source (i.e., production) server. + ServerType = Replication_Services('GetServerType') + If ServerType _EQC 'Source' then + Action = TransactionID[1, @FM] + Application = TransactionID[Col2() + 1, @FM] + Volume = TransactionID[Col2() + 1, @FM] + Table = TransactionID[Col2() + 1, @FM] + KeyID = TransactionID[Col2() + 1, 999] + LookupKeyID = Action:'*':Table:'*':KeyID + + QueueTableName = Replication_Services('GetReplicationQueueTable', Application, Table) + + AddTransaction = True$ ; // Assume this is a valid transaction to add to the queue for now. + + Begin Case + Case (Table _EQC 'SYSPROCS' AND (KeyID[1, 15] _EQC 'SRP_EDITOR_TEMP' OR KeyID _EQC 'VARDECL_')) + // Data row is either a temp record created by the SRP Editor needed to support inherited stored + // procedures or it is the special VARDECL_ record created by the compiler. + AddTransaction = False$ + + Case IndexC(Volume, Replication_Services('GetTargetServerPath'), 1) + // Volume for this table is located on the target server. This occurs with the ReplicateTransactions + // service is writing a row to the target table. + AddTransaction = False$ + + Case IndexC(Volume, Replication_Services('GetTargetREVBOOTPath'), 1) + // Volume for this table is located on the target server. This occurs with the ReplicateTransactions + // service is writing a row to the target table. + AddTransaction = False$ + + Case KeyID _EQC '%RECORDS%' + // Do not replicate QuickDex records. + AddTransaction = False$ + + Case TransactionID EQ '' + // This is an invalid TransactionID. + AddTransaction = False$ + + Case RowExists(QueueTableName, LookupKeyID) + // This is a duplicate transaction. + AddTransaction = False$ + + End Case + + If AddTransaction then + hQueueTable = Replication_Services('GetReplicationQueueTableHandle', Application, Table) + + If hQueueTable NE '' then + CounterKeyID = '%NextPendingSK%' + If Replication_Services('LockReplicationQueueCounter', hQueueTable, CounterKeyID) then + // The counter value represents the next available sequence. Do not increase it until it is successfully + // used. + Read Counter from hQueueTable, CounterKeyID then + If Num(Counter) else + Counter = 1 + end + end else + Counter = 1 + end + + DummyLookupRec = '' + Write DummyLookupRec to hQueueTable, LookupKeyID then + Write TransactionID to hQueueTable, Counter then + Counter += 1 + Write Counter to hQueueTable, CounterKeyID else + StatusFlag = Get_Status(StatusCode) + Replication_Services('SendEmergencyAlert', Service, 'WRITE', Application, Volume, 'ReplicationQueue for ' : Table, CounterKeyID, StatusCode, @File_Error) + end + end else + StatusFlag = Get_Status(StatusCode) + Replication_Services('SendEmergencyAlert', Service, 'WRITE', Application, Volume, 'ReplicationQueue for ' : Table, Counter, StatusCode, @File_Error) + end + end else + StatusFlag = Get_Status(StatusCode) + Replication_Services('SendEmergencyAlert', Service, 'WRITE', Application, Volume, 'ReplicationQueue for ' : Table, CounterKeyID, StatusCode, @File_Error) + end + + Replication_Services('UnlockReplicationQueueCounter', hQueueTable, CounterKeyID) + end else + // Unable to lock pending queue. Send an alert. + StatusFlag = Get_Status(StatusCode) + Replication_Services('SendEmergencyAlert', Service, 'LOCK', Application, Volume, 'ReplicationQueue for ' : Table, CounterKeyID, StatusCode, @File_Error) + end + end + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// LockReplicationQueueCounter +// +// QueueTableHandle - Handle to the database table holding the replication queue transactions. - [Required] +// CounterKeyID - Key ID to the counter for the indicated queue table. - [Required] +// +// Returns a True if the pending queue counter is properly locked. Since locks on the queue file should be very short, +// this routine will only attempt to lock a queue file for a couple of seconds before sending out an alert that +// something unexpected has occured. +//---------------------------------------------------------------------------------------------------------------------- +Service LockReplicationQueueCounter(QueueTableHandle, CounterKeyID) + + ReplicationQueueCounterLocked = False$ ; // Assume no lock for now. + + If QueueTableHandle NE '' AND CounterKeyID NE '' then + // Use GetTickCount to track the duration of the lock attempt in milliseconds. After 2 seconds then the + // lock attempt should be aborted. + StartAttempt = GetTickCount() + Loop + Lock QueueTableHandle, CounterKeyID then ReplicationQueueCounterLocked = True$ + CurrentAttempt = GetTickCount() + AttemptDuration = CurrentAttempt - StartAttempt + Until ReplicationQueueCounterLocked OR (AttemptDuration GT 2000) + Repeat + If Not(ReplicationQueueCounterLocked) then Error_Services('Add', 'Unable to lock ' : CounterKeyID : ' in the ' : Service : ' service.') + end else + Error_Services('Add', 'QueueTableHandle or CounterKeyID arguments were missing from the ' : Service : ' service.') + end + + Response = ReplicationQueueCounterLocked + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// LockPendingQueue +// +// Application - Name of the database application for the table. - [Required] +// Table - Name of the database table whose queue file needs to be locked. - [Required] +// +// Returns a True if the pending queue file is properly locked. Since locks on the queue file should be very short, +// this routine will only attempt to lock a queue file for a couple of seconds before sending out an alert that +// something unexpected has occured. +//---------------------------------------------------------------------------------------------------------------------- +Service LockPendingQueue(Application, Table) + + Convert @Lower_Case to @Upper_Case in Application + Convert @Lower_Case to @Upper_Case in Table + + PendingQueueLocked = False$ ; // Assume no lock for now. + + If Len(Application) AND Len(Table) then + hRepConfigTable = Memory_Services('GetValue', 'hRepConfigTable') + If Len(hRepConfigTable) else + Open RepConfigTable$ to hRepConfigTable then + Memory_Services('SetValue', 'hRepConfigTable', hRepConfigTable) + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + + If Error_Services('NoError') then + // Use GetTickCount to track the duration of the lock attempt in milliseconds. After 2 seconds then the + // lock attempt should be aborted. + StartAttempt = GetTickCount() + LockKeyID = Application : '*' : Table : '*' : 'Pending' + Loop + Lock hRepConfigTable, LockKeyID then PendingQueueLocked = True$ + CurrentAttempt = GetTickCount() + AttemptDuration = CurrentAttempt - StartAttempt + Until PendingQueueLocked OR (AttemptDuration GT 2000) + Repeat + If Not(PendingQueueLocked) then Error_Services('Add', 'Unable to lock the pending queue for ' : Application : '*' : Table : ' in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Application or Table arguments were missing from the ' : Service : ' service.') + end + + Response = PendingQueueLocked + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// UnlockReplicationQueueCounter +// +// QueueTableHandle - Handle to the database table holding the replication queue transactions. - [Required] +// CounterKeyID - Key ID to the counter for the indicated queue table. - [Required] +// +// Returns a True if the pending queue counter is properly unlocked. +//---------------------------------------------------------------------------------------------------------------------- +Service UnlockReplicationQueueCounter(QueueTableHandle, CounterKeyID) + + ReplicationQueueCounterUnlocked = False$ ; // Assume not unlocked for now. + + If QueueTableHandle NE '' AND CounterKeyID NE '' then + Unlock QueueTableHandle, CounterKeyID then + ReplicationQueueCounterUnlocked = True$ + end else + Error_Services('Add', 'Unable to unlock ' : CounterKeyID : ' in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'QueueTableHandle or CounterKeyID arguments were missing from the ' : Service : ' service.') + end + + Response = ReplicationQueueCounterUnlocked + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// UnlockPendingQueue +// +// Application - Name of the database application for the table. - [Required] +// Table - Name of the database table whose queue file needs to be unlocked. - [Required] +// +// Returns a True if the pending queue file is properly unlocked. +//---------------------------------------------------------------------------------------------------------------------- +Service UnlockPendingQueue(Application, Table) + + Convert @Lower_Case to @Upper_Case in Application + Convert @Lower_Case to @Upper_Case in Table + + PendingQueueUnlocked = False$ ; // Assume not unlocked for now. + + If Len(Application) AND Len(Table) then + hRepConfigTable = Memory_Services('GetValue', 'hRepConfigTable') + If Len(hRepConfigTable) else + Open RepConfigTable$ to hRepConfigTable then + Memory_Services('SetValue', 'hRepConfigTable', hRepConfigTable) + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + + If Error_Services('NoError') then + LockKeyID = Application : '*' : Table : '*' : 'Pending' + Unlock hRepConfigTable, LockKeyID then + PendingQueueUnlocked = True$ + end else + Error_Services('Add', 'Unable to unlock the pending queue for ' : Application : '*' : Table : ' in the ' : Service : ' service.') + end + end + end else + Error_Services('Add', 'Application or Table arguments were missing from the ' : Service : ' service.') + end + + Response = PendingQueueUnlocked + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// LockInProcessQueue +// +// Application - Name of the database application for the table. - [Required] +// Table - Name of the database table whose queue file needs to be locked. - [Required] +// +// Returns a True if the in-process queue file is properly locked. Since locks on the queue file should be very short, +// this routine will only attempt to lock a queue file for a couple of seconds before sending out an alert that +// something unexpected has occured. +//---------------------------------------------------------------------------------------------------------------------- +Service LockInProcessQueue(Application, Table) + + Convert @Lower_Case to @Upper_Case in Application + Convert @Lower_Case to @Upper_Case in Table + + InProcessQueueLocked = False$ ; // Assume no lock for now. + + If Len(Application) AND Len(Table) then + hRepConfigTable = Memory_Services('GetValue', 'hRepConfigTable') + If Len(hRepConfigTable) else + Open RepConfigTable$ to hRepConfigTable then + Memory_Services('SetValue', 'hRepConfigTable', hRepConfigTable) + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + + If Error_Services('NoError') then + // Use GetTickCount to track the duration of the lock attempt in milliseconds. After 2 seconds then the + // lock attempt should be aborted. + StartAttempt = GetTickCount() + LockKeyID = Application : '*' : Table : '*' : 'InProcess' + Loop + Lock hRepConfigTable, LockKeyID then InProcessQueueLocked = True$ + CurrentAttempt = GetTickCount() + AttemptDuration = CurrentAttempt - StartAttempt + Until InProcessQueueLocked OR (AttemptDuration GT 2000) + Repeat + If Not(InProcessQueueLocked) then Error_Services('Add', 'Unable to lock the in-process queue for ' : Application : '*' : Table : ' in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Application or Table arguments were missing from the ' : Service : ' service.') + end + + Response = InProcessQueueLocked + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// UnlockInProcessQueue +// +// Application - Name of the database application for the table. - [Required] +// Table - Name of the database table whose queue file needs to be unlocked. - [Required] +// +// Returns a True if the in-process queue file is properly unlocked. +//---------------------------------------------------------------------------------------------------------------------- +Service UnlockInProcessQueue(Application, Table) + + Convert @Lower_Case to @Upper_Case in Application + Convert @Lower_Case to @Upper_Case in Table + + InProcessQueueUnlocked = False$ ; // Assume not unlocked for now. + + If Len(Application) AND Len(Table) then + hRepConfigTable = Memory_Services('GetValue', 'hRepConfigTable') + If Len(hRepConfigTable) else + Open RepConfigTable$ to hRepConfigTable then + Memory_Services('SetValue', 'hRepConfigTable', hRepConfigTable) + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + + If Error_Services('NoError') then + LockKeyID = Application : '*' : Table : '*' : 'InProcess' + Unlock hRepConfigTable, LockKeyID then + InProcessQueueUnlocked = True$ + end else + Error_Services('Add', 'Unable to unlock the in-process queue for ' : Application : '*' : Table : ' in the ' : Service : ' service.') + end + end + end else + Error_Services('Add', 'Application or Table arguments were missing from the ' : Service : ' service.') + end + + Response = InProcessQueueUnlocked + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetMaxTransactionsCount +// +// MaxTransactionsCount - The maximum number of transactions that will be processed in one sesion. - [Required] +// +// Sets the maximum number of transactions that should be processed at one time. +//---------------------------------------------------------------------------------------------------------------------- +Service SetMaxTransactionsCount(MaxTransactionsCount) + + If MaxTransactionsCount GT 0 AND Num(MaxTransactionsCount) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_MAX_TRANSACTION_COUNT' + Lock hRepConfigTable, RepConfigKeyID then + Write MaxTransactionsCount to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing max transaction count in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking max transaction count in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end else + If Num(MaxTransactionsCount) else Error_Services('Add', 'MaxTransactionsCount argument is not a valid number in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetReplicationProcedure +// +// ReplicationProcedure - the name of the custom stored procedure that will handle replications. - [Optional] +// +// Sets the the name of the custom stored procedure that will handle replications. +//---------------------------------------------------------------------------------------------------------------------- +Service SetReplicationProcedure(ReplicationProcedure) + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_REPLICATION_PROCEDURE' + Lock hRepConfigTable, RepConfigKeyID then + Write ReplicationProcedure to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing replication procedure in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking replication procedure in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ResetReplicationQueueCounters +// +// QueueTable - Name of the replication queue table. - [Required] +// +// Resets the replication queue counters based on the transaction rows in the queue table. Returns the same information +// in the same format as the GetReplicationQueueTableStatus service (%EngineName% value, %NextInProcessSK% value, +// %NextPendingSK% value, and total estimated number of rows in the indicated queue table). +//---------------------------------------------------------------------------------------------------------------------- +Service ResetReplicationQueueCounters(QueueTable) + + Convert @Lower_Case to @Upper_Case in QueueTable + + QueueTableStatus = '' + + If QueueTable NE '' then + QueuePath = Replication_Services('GetSourceQueuePath') + If Error_Services('NoError') then + Set_Status(0) + ShouldDetach = False$ + // First attempt to open the private replication queue table. + Open QueueTable to hQueueTable else + // Since the Open statement didn't work, attempt to attach the private replication queue table. + Set_Status(0) + Attach_Table(QueuePath : '', QueueTable, 'GLOBAL', '') + If Get_Status(StatusCode) then + Error_Services('Add', 'Unable to attach ' : QueueTable : ' in the ' : Service : ' service.') + end else + // Make sure table is detached since it was not attached already. + ShouldDetach = True$ + Set_Status(0) + Open QueueTable to hQueueTable else + Set_Status(0) + Error_Services('Add', 'Unable to open ' : QueueTable : ' in the ' : Service : ' service.') + end + end + end + If Error_Services('NoError') then + Select hQueueTable + EndOfCursor = False$ + NextInProcessSK = 9999999 + NextPendingSK = 1 + Loop + Readnext TransactionID then + If Num(TransactionID) then + If TransactionID GT NextPendingSK then NextPendingSK = TransactionID + If TransactionID LT NextInProcessSK then NextInProcessSK = TransactionID + end + end else + EndOfCursor = True$ + end + Until EndOfCursor EQ True$ + Repeat + + If NextInProcessSK EQ 9999999 then NextInProcessSK = 1 + + If NextPendingSK GT 1 then NextPendingSK += 1 + + TotalRows = Get.RecCount(hQueueTable, Status, False$) + // If any of the queue counters have values, adjust the TotalRows count accordingly. + Read OldNextInProcessSK from hQueueTable, '%NextInProcessSK%' then + TotalRows -= 1 + end + Write NextInProcessSK to hQueueTable, '%NextInProcessSK%' else + Error_Services('Add', 'Error updating the %NextInProcessSK% counter in ' : QueueTable : ' in the ' : Service : ' service.') + end + Read OldNextPendingSK from hQueueTable, '%NextPendingSK%' then + TotalRows -= 1 + end + Write NextPendingSK to hQueueTable, '%NextPendingSK%' else + Error_Services('Add', 'Error updating the %NextPendingSK% counter in ' : QueueTable : ' in the ' : Service : ' service.') + end + Read EngineName from hQueueTable, '%EngineName%' then + TotalRows -= 1 + end else + EngineName = '' + end + Read NumProcesses from hQueueTable, '%NumProcesses%' then + TotalRows -= 1 + end else + NumProcesses = 0 + end + QueueTableStatus = EngineName : @VM : NextInProcessSK : @VM : NextPendingSK : @VM : TotalRows : @VM : NumProcesses + Set_Status(0) + If ShouldDetach = True$ then Detach_Table(QueueTable) + end + end + end else + Error_Services('Add', 'QueueTable argument was missing from the ' : Service : ' service.') + end + + Response = QueueTableStatus + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMaxTransactionsCount +// +// Returns the maximum number of transactions that should be processed at one time. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMaxTransactionsCount() + + MaxTransactionsCount = 0 + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_MAX_TRANSACTION_COUNT' + Read MaxTransactionsCount from hRepConfigTable, RepConfigKeyID else MaxTransactionsCount = 0 + If MaxTransactionsCount EQ 0 then + Error_Services('Add', 'The max transaction count has not been setup in the ' : RepConfigTable$ : ' table.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = MaxTransactionsCount + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetReplicationProcedure +// +// Returns the name of the custom stored procedure that will handle replications. +//---------------------------------------------------------------------------------------------------------------------- +Service GetReplicationProcedure() + + ReplicationProcedure = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_REPLICATION_PROCEDURE' + Read ReplicationProcedure from hRepConfigTable, RepConfigKeyID else ReplicationProcedure = '' + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = ReplicationProcedure + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ReplicateTransactions +// +// Primary service to take transactions from the replication queue tables and process them. This service will be called +// multiple times by the SRP Engine Server. Therefore, it does not need to run in a loop. See the comments inline below +// to get the basic work flow. +//---------------------------------------------------------------------------------------------------------------------- +Service ReplicateTransactions() + + // Verify if error logging is enabled. + LoggingEnabled = Replication_Services('IsLoggingEnabled') + + // Verify that this is a source (i.e., production) server. + ServerType = Replication_Services('GetServerType') + + // Verify that the system is enabled and not stopped before replication any transactions. + SystemEnabledFlag = Replication_Services('GetSystemEnabledFlag') + SystemStopFlag = Replication_Services('GetSystemStopFlag') + + If SystemEnabledFlag AND Not(SystemStopFlag) then + + Begin Case + Case ServerType _EQC 'Source' + //-------------------------------------------------------------------------------------------------------------- + // + // 1. Check for replication queue tables that need to be processed. This will be determined based on the + // NextInProcess counter value and the NextPending counter value. If the NextInProcess counter is less + // than the NextPending counter then there are transactions in this replication queue table that are ready + // to be process. + // + //-------------------------------------------------------------------------------------------------------------- + CommandLine = GetCommandLine() + Swap '/S=' with @FM in CommandLine + EngineName = CommandLine<2> ; // This is the NamedPipe identifier for the engine processing this service. + HaveQueueTable = False$ ; // Assume there is no queue table that is ready to be processed for now. + QueueTableStatuses = Replication_Services('GetAllReplicationQueueTableStatus') + If Len(QueueTableStatuses) then + // There are replication queue tables. Sort by number of processes to prioritize and then attempt + // to processs. + QueueTableStatuses = SRP_Array('SortRows', QueueTableStatuses, 'AN6', 'LIST', @FM, @VM) + ReplicationQueueTables = SRP_Array('Rotate', QueueTableStatuses, @FM, @VM)<1> + Convert @VM to @FM in ReplicationQueueTables + QueueTableCnt = 0 + NumQueueTables = DCount(ReplicationQueueTables, @FM) + Loop + QueueTableCnt += 1 + QueueTable = ReplicationQueueTables + hQueueTable = Replication_Services('GetReplicationQueueTableHandle', '', '', QueueTable) + PendingSKID = '%NextPendingSK%' + InProcessSKID = '%NextInProcessSK%' + HaveQueueTable = Replication_Services('LockReplicationQueueCounter', hQueueTable, InProcessSKID) + // Increment the process count for this queue table. This will help prioritize queue tables that + // haven't been processed. + Read NumProcesses from hQueueTable, '%NumProcesses%' then + If NumProcesses GT 10000 then NumProcesses = 0 + end else + NumProcesses = 0 + end + NumProcesses += 1 + Write NumProcesses to hQueueTable, '%NumProcesses%' else Null + If HaveQueueTable then + // Verify that this table has a Next In Process counter with a lower value than the Next Pending + // counter. + Read NextPendingSK from hQueueTable, PendingSKID else NextPendingSK = 1 + Read FirstInProcessSK from hQueueTable, InProcessSKID else FirstInProcessSK = 1 + If FirstInProcessSK EQ NextPendingSK then + HaveQueueTable = False$ + Replication_Services('UnlockReplicationQueueCounter', hQueueTable, InProcessSKID) + end else + If (QueueTable NE 'REPLICATION_QUEUE_GLOBAL_PUBLIC') AND (QueueTable NE 'REPLICATION_QUEUE_GLOBAL_MASTER') then + // This is a private queue. Verify the table name using this private queue and then + // check to see if it is permitted to replicate. + Read TransactionID from hQueueTable, FirstInProcessSK then + Action = TransactionID[1, @FM] + Application = TransactionID[Col2() + 1, @FM] + SourceVolume = TransactionID[Col2() + 1, @FM] + Table = TransactionID[Col2() + 1, @FM] + KeyID = TransactionID[Col2() + 1, 999] + AllowedToReplicate = Replication_Services('IsTableAllowedToReplicate', Table, Application) + If Not(AllowedToReplicate) then + HaveQueueTable = False$ + Replication_Services('UnlockReplicationQueueCounter', hQueueTable, InProcessSKID) + end + end + end + end + end + Until (QueueTableCnt GE NumQueueTables) OR (HaveQueueTable) + Repeat + end + + //-------------------------------------------------------------------------------------------------------------- + // + // 2. Loop through the next group of un-processed transactions and replicate them. + // + //-------------------------------------------------------------------------------------------------------------- + If HaveQueueTable then + // Get the number of pending transactions. + NumPendingTransactions = NextPendingSK - FirstInProcessSK + If NumPendingTransactions GT 0 then + // Note the engine that is managing this queue. + Write EngineName to hQueueTable, '%EngineName%' else Null + // Get the maximum number of transactions to process. + TransactionCount = Replication_Services('GetMaxTransactionsCount') + If NumPendingTransactions GT TransactionCount then NumPendingTransactions = TransactionCount + LastInProcessSK = FirstInProcessSK + (NumPendingTransactions - 1) + ReplicationProcedure = Replication_Services('GetReplicationProcedure') + + hHashTable = SRP_HashTable_Create(False$, NumPendingTransactions) + If hHashTable NE '' then + SourceServerPath = '' ; // Initialize the variable. Only call the GetSourceServerPath if this is empty. + NewTable = False$ ; // Flag indicating if a new table in the queue is encountered. + // This will cause the current replication process to abort since + // only one table can be processed at a time. + FirstTable = '' ; // Records the name of the first table in the queue. + FirstVolume = '' ; // Records the name of the first volume in the queue. + FirstSkippedSK = '' ; // The first transaction ID that was skipped. This will be used to reset the next in-process SK. + + // Run through the list of tranactions twice. The first pass is to read any tranasctions that need + // to be written to the target table and store them in a hash table. This is so only one + // attach/detach needs to be done against the source and target servers for optimum performance. + For InProcessSK = FirstInProcessSK to LastInProcessSK + // Update the counter with the current value. If the process aborts, the counter will be set to + // the last value that has not yet been processed. This allows any future processing to + // correctly pick up where this left off. + Write InProcessSK to hQueueTable, InProcessSKID then + Read TransactionID from hQueueTable, InProcessSK then + Action = TransactionID[1, @FM] + Application = TransactionID[Col2() + 1, @FM] + SourceVolume = TransactionID[Col2() + 1, @FM] + Table = TransactionID[Col2() + 1, @FM] + KeyID = TransactionID[Col2() + 1, 999] + + AllowedToReplicate = Replication_Services('IsTableAllowedToReplicate', Table, Application) + If AllowedToReplicate EQ True$ then + SRP_HashTable_Set(hHashTable, 'TransactionID*' : InProcessSK, TransactionID) + + // Copy the SourceVolume variable since it can be updated by the following + // processes. + OriginalSourceVolume = SourceVolume + + // Check to see if the queue is presenting a new table. If so, then end the loop so + // only transactions connected to the same table are processed. A new table is + // evident if the table name changes or the volume changes (i.e., the table name + // might be the same but it is from a different volume). + If (FirstTable NE '') AND (Table NE FirstTable) then NewTable = True$ + If (FirstVolume NE '') AND (SourceVolume NE FirstVolume) then NewTable = True$ + + If NewTable then + // Set the end of the counter to the previous value so the current loop will + // end. The next loop sequence will pick up the new table. + LastInProcessSK = InProcessSK - 1 + end else + If SourceServerPath EQ '' then + // This must be the first iteration in the loop. Attempt to open the table that the + // source row resides in. However, make sure that any paths are resolved to the + // official absolute path (which should normally be in UNC format). The SourceVolume + // variable will likely contain a mapped drive and this might not be available to + // the replication service. + SourceServerPath = UCase(Replication_Services('GetSourceServerPath')) + FirstTable = Table ; // Record the first table in the queue for future reference. + FirstVolume = SourceVolume ; // Record the first volume in the queue for future reference. + SourceVolumeType = '' + Begin Case + Case SRP_Path('IsUNC', SourceVolume) + // This path is already in UNC format so nothing needs to be + // done. + Transfer SourceVolume to ResolvedSourceVolume + SourceVolumeType = 'UNC' + + Case SourceVolume _EQC 'REVBOOT' + // This is the REVBOOT volume which probably means this is a + // system table. Use REVBOOT rather than a resolved to the source + // REVBOOT path. Otherwise, an SSP280 error will result. + ResolvedSourceVolume = SourceVolume + SourceVolumeType = 'REVBOOT' + + Case SRP_Path('IsRelative', SourceVolume) + // This is a relative path so it needs to be converted to a full + // UNC path. These paths are relative to REVBOOT, so the source + // REVBOOT path needs to be retrieved. + SourceREVBOOTPath = Replication_Services('GetSourceREVBOOTPath') + ResolvedSourceVolume = SRP_Path('Combine', SourceREVBOOTPath, SourceVolume) + SourceVolumeType = 'Relative' + + Case Otherwise$ + // This must be a local or remote drive. If this is remote then convert + // to UNC using the source server path. + If SRP_Path('IsNetworkPath', SourceVolume) then + SourceVolume[1, 3] = '' ; // Remove the mapped drive + ResolvedSourceVolume = SRP_Path('Combine', SourceServerPath, SourceVolume) + SourceVolumeType = 'UNC' + end else + Transfer SourceVolume to ResolvedSourceVolume + SourceVolumeType = 'Local' + end + End Case + // Attempt to detach the original source volume as a precaution against potential FS404 errors. + // Even if it is unsuccessful don't do anything as it might be that the volume was never attach. + IsAttached = Memory_Services('GetValue', Service : '*TABLES_ATTACHED') + If Not(IsAttached) then + Set_Status(0) + Detach_Volume(OriginalSourceVolume : '', Success) + Set_Status(0) + Attach_Table(ResolvedSourceVolume : '', '', Application, '') + If Get_Status(StatusCode) then + // Error handling goes here. + end else + Memory_Services('SetValue', Service : '*TABLES_ATTACHED', True$) + end + end + If Get_Status(StatusCode) then + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'ATTACH', Application, ResolvedSourceVolume, Table, KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'ATTACH', Application, ResolvedSourceVolume, Table, KeyID, StatusCode, @File_Error) + end else + Open Table to hSourceTable then + If Table _EQC 'SYSPROCS' then + // The data row is coming from SYSPROCS, so it is likely to be + // source code. The object code should also be pulled and replicated + // with the source. + Open 'SYSOBJ' to hSourceSysObj else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'OPEN', Application, ResolvedSourceVolume, 'SYSOBJ', KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'OPEN', Application, ResolvedSourceVolume, 'SYSOBJ', KeyID, StatusCode, @File_Error) + end + Open 'SYSREPOS' to hSourceSysRepos else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'OPEN', Application, ResolvedSourceVolume, 'SYSREPOS', KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'OPEN', Application, ResolvedSourceVolume, 'SYSREPOS', KeyID, StatusCode, @File_Error) + end + end + end else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'OPEN', Application, ResolvedSourceVolume, Table, KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'OPEN', Application, ResolvedSourceVolume, Table, KeyID, StatusCode, @File_Error) + end + end + end + + If Action _EQC 'WRITE' then + Read SourceRow from hSourceTable, KeyID then + SRP_HashTable_Set(hHashTable, KeyID, SourceRow) + If Table _EQC 'SYSPROCS' then + Read SourceRowObj from hSourceSysObj, '$' : KeyID then + SourceRowObj64 = SRP_Encode(SourceRowObj, 'BASE64') + SRP_HashTable_Set(hHashTable, '$' : KeyID, SourceRowObj64) + end + SourceApplication = Field(KeyID, '*', 2, 1) + If SourceApplication EQ '' then SourceApplication = 'SYSPROG' + SysReposSourceKeyID = SourceApplication : '*STPROC**' : KeyID[1, '*'] + Read SourceReposStprocRow from hSourceSysRepos, SysReposSourceKeyID then + SRP_HashTable_Set(hHashTable, SysReposSourceKeyID, SourceReposStprocRow) + end + SysReposObjKeyID = SourceApplication : '*STPROCEXE**' : KeyID[1, '*'] + Read SourceReposStprocExeRow from hSourceSysRepos, SysReposObjKeyID then + SRP_HashTable_Set(hHashTable, SysReposObjKeyID, SourceReposStprocExeRow) + end + end + end else + If @File_Error<1> EQ 100 then + // This means the row did not exist in the table. However, this is + // quite possible if there has been more activity with this row + // that deleted it prior to this transaction being processed. + SRP_HashTable_Set(hHashTable, 'TransactionID*' : InProcessSK, 'IGNORE') + end else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'READ', Application, ResolvedSourceVolume, Table, KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'READ', Application, ResolvedSourceVolume, Table, KeyID, StatusCode, @File_Error) + end + end + end + end + end else + // SKIP is different than IGNORE in that it should be kept in the queue for future + // processing. This is likely when the table has been temporarily set so that + // it shouldn't be replicated even though queue transactions exist. + SRP_HashTable_Set(hHashTable, 'TransactionID*' : InProcessSK, 'SKIP') + If FirstSkippedSK EQ '' then FirstSkippedSK = InProcessSK + end + end else + // On some occassions it is possible for gaps to occur in the transaction ID sequence within a queue table. + // Since the transaction ID cannot be read, flag it as a SKIP item but do not set the FirstSkippedSK variable + // since this is not a real transaction ID. + Set_Status(0) + SRP_HashTable_Set(hHashTable, 'TransactionID*' : InProcessSK, 'SKIP') + end + end else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'WRITE', Application, ResolvedSourceVolume, 'ReplicationQueue for ' : Table, InProcessSKID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'WRITE', Application, ResolvedSourceVolume, 'ReplicationQueue for ' : Table, InProcessSKID, StatusCode, @File_Error) + end + Until NewTable + Next InProcessSK + TargetServerPath = '' ; // Initialize the variable. Only call the GetTargetServerPath if this is empty. + ResolvedTargetVolume = '' ; // Initialize the variable. + + // Make a second pass through the list of transactions. This time to apply the actions against the + // target table. + For InProcessSK = FirstInProcessSK to LastInProcessSK + // Update the counter with the current value. If the process aborts, the counter will be set to the last + // value that has not yet been processed. This allows any future processing to correctly pick up where + // this left off. + ActionCompleted = False$ + TransactionID = SRP_HashTable_Get(hHashTable, 'TransactionID*' : InProcessSK) + Action = TransactionID[1, @FM] + Application = TransactionID[Col2() + 1, @FM] + SourceVolume = TransactionID[Col2() + 1, @FM] + Table = TransactionID[Col2() + 1, @FM] + KeyID = TransactionID[Col2() + 1, 999] + + If Action _NEC 'SKIP' then + If ReplicationProcedure then + // There is a replication procedure. Call it with the TransactionID. Check Error_Services + // to see if there were any issue. If not, assume the action was completed. + If Action _EQC 'IGNORE' then + // If a normal action (e.g., WRITE) cannot be processed due to normal reasons, the + // action is dynamically changed to IGNORE so that the service can continue without + // erroring out. The transaction ID will also be deleted. + ActionCompleted = True$ + end else + Call @ReplicationProcedure(TransactionID) + If Error_Services('NoError') then + ActionCompleted = True$ + end else + Message = Error_Services('GetMessage') + If IndexC(Message, 'The OITableName, OIKeyID, or OIRow argument was missing', 1) then + Error_Services('Clear') + // Remove the transaction from the queue + Delete hQueueTable, InProcessSK else + // The transaction ID might not exist due to SKIPing. Just clear the error and move on. + Set_Status(0) + end + // Remove the lookup key from the queue + LookupKeyID = Action:'*':Table:'*':KeyID + Delete hQueueTable, LookupKeyID else + // The lookup key might not exist due to SKIPing. Just clear the error and move on. + Set_Status(0) + // Log failure + LogData = '' + LogData<1> = LoggingDTM + LogData<2> = LookupKeyID + LogData<3> = hQueueTable + Logging_Services('AppendLog', objLog, LogData, @RM, @FM) + end + // Send email alert + Message := ' Table: ':Table:' Key: ':KeyID + Replication_Services('SendAlert', Service, ReplicationProcedure, Application, ResolvedSourceVolume, Table, KeyID, StatusCode, @File_Error, '', Message) + // Send an internal OI message to OI admins + Recipients = Xlate('SEC_GROUPS', 'OI_ADMIN', 'USER', 'X') + SentFrom = 'SYSTEM' + Subject = 'Replication Manager Error' + Message = 'The OITableName, OIKeyID, or OIRow argument was missing in the ' : Service : ' service. Table: ':Table:' Key: ':KeyID + AttachWindow = '' + AttachKey = '' + SendToGroup = '' + Parms = Recipients:@RM:SentFrom:@RM:Subject:@RM:Message:@RM:AttachWindow:@RM:AttachKey:@RM:SendToGroup + obj_Notes('Create',Parms) + end else + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, ReplicationProcedure, Application, ResolvedSourceVolume, Table, KeyID, StatusCode, @File_Error, '', Message) + Replication_Services('SendEmergencyAlert', Service, ReplicationProcedure, Application, ResolvedSourceVolume, Table, KeyID, StatusCode, @File_Error, '', Message) + end + end + end + end else + // There is no replication procedure specified. Perform the replication procedure using + // normal OpenInsight to OpenInsight logic. + If TargetServerPath EQ '' then + // This must be the first iteration in the loop. Attempt to open the target table. However, + // make sure that any paths are resolved to the official source server path (which should be + // in UNC format). + Set_Status(0) + If SourceVolumeType _EQC 'REVBOOT' then + Success = True$ + end else + Detach_Volume(ResolvedSourceVolume : '', Success) + end + If Success EQ True$ then + Set_Status(0) + TargetServerPath = UCase(Replication_Services('GetTargetServerPath')) + Begin Case + Case SourceVolumeType _EQC 'UNC' + ResolvedTargetVolume = ResolvedSourceVolume + Swap SourceServerPath with TargetServerPath in ResolvedTargetVolume + + Case SourceVolumeType _EQC 'REVBOOT' + ResolvedTargetVolume = SRP_Path('RemoveBackslash', Replication_Services('GetTargetREVBOOTPath')) + + Case SourceVolumeType _EQC 'Relative' + TargetREVBOOTPath = Replication_Services('GetTargetREVBOOTPath') + ResolvedTargetVolume = ResolvedSourceVolume + Swap SourceREVBOOTPath with TargetREVBOOTPath in ResolvedTargetVolume + + Case SourceVolumeType _EQC 'Local' + // Local tables have no distintion between source and target. Just + // use the ResolvedSourceVolume. + ResolvedTargetVolume = ResolvedSourceVolume + + Case Otherwise$ + StatusFlag = Get_Status(StatusCode) + AdditionalMessage = 'An unknown SourceVolumeType, ' : SourceVolumeType : ', was encountered.' + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, '', Application, '', '', '', StatusCode, @File_Error, '', AdditionalMessageMessage) + Replication_Services('SendEmergencyAlert', Service, '', Application, '', '', '', StatusCode, @File_Error, '', AdditionalMessage) + + End Case + + // If the table is SYSPROCS, alias the target table rather than attach. Otherwise, the target's + // copy of the source code will appear in the debugger. + If Table _EQC 'SYSPROCS' then + Alias_Table(ResolvedTargetVolume : '', Application, 'SYSPROCS', 'TARGET_SYSPROCS') + end else + Attach_Table(ResolvedTargetVolume : '', Table, Application, '') + end + + If Get_Status(StatusCode) then + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'ATTACH', Application, ResolvedTargetVolume, Table, KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'ATTACH', Application, ResolvedTargetVolume, Table, KeyID, StatusCode, @File_Error) + end else + OpenSuccessful = True$ ; // Assume the Open statement will be successful for now. + If Table _EQC 'SYSPROCS' then + Open 'TARGET_SYSPROCS' to hTargetTable else OpenSuccessful = False$ + end else + Open Table to hTargetTable else OpenSuccessful = False$ + end + If OpenSuccessful EQ True$ then + If Table _EQC 'SYSPROCS' then + // Since source code is being replicated, alias the target SYSOBJ table to + // replicate object code as well. + Set_Status(0) + Alias_Table(ResolvedTargetVolume : '', Application, 'SYSOBJ', 'TARGET_SYSOBJ') + If Get_Status(StatusCode) then + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'ALIAS', Application, ResolvedTargetVolume, 'SYSOBJ', '', StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'ALIAS', Application, ResolvedTargetVolume, 'SYSOBJ', '', StatusCode, @File_Error) + end else + Open 'TARGET_SYSOBJ' to hTargetSysObj else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'OPEN', Application, ResolvedTargetVolume, 'SYSOBJ', KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'OPEN', Application, ResolvedTargetVolume, 'SYSOBJ', KeyID, StatusCode, @File_Error) + end + end + + // Use Repos_Attach_Trans to alias the target SYSREPOS table to replicate + // entity pointers. + Set_Status(0) + Repos_Attach_Trans(ResolvedTargetVolume : '', 1) + If Get_Status(StatusCode) then + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'ALIAS', Application, ResolvedTargetVolume, 'SYSREPOS', '', StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'ALIAS', Application, ResolvedTargetVolume, 'SYSREPOS', '', StatusCode, @File_Error) + end else + Open 'SYSREPOS_TEMP' to hTargetSysRepos else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'OPEN', Application, ResolvedTargetVolume, 'SYSREPOS_TEMP', KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'OPEN', Application, ResolvedTargetVolume, 'SYSREPOS_TEMP', KeyID, StatusCode, @File_Error) + end + end + end + end else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'OPEN', Application, ResolvedTargetVolume, Table, KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'OPEN', Application, ResolvedTargetVolume, Table, KeyID, StatusCode, @File_Error) + end + end + end else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'DETACH', Application, ResolvedSourceVolume, Table, KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'DETACH', Application, ResolvedSourceVolume, Table, KeyID, StatusCode, @File_Error) + end + end + + // Perform the action as needed. + Begin Case + Case Action _EQC 'WRITE' + SourceRow = SRP_HashTable_Get(hHashTable, KeyID) + Write SourceRow to hTargetTable, KeyID then + If Table _EQC 'SYSPROCS' then + // Check to see if object was found that needs to be replicated. + If SRP_HashTable_Contains(hHashTable, '$' : KeyID) then + SourceRowObj64 = SRP_HashTable_Get(hHashTable, '$' : KeyID) + SourceRowObj = SRP_Decode(SourceRowObj64, 'BASE64') + Write SourceRowObj to hTargetSysObj, '$' : KeyID else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'WRITE', Application, ResolvedTargetVolume, 'SYSOBJ', '$' : KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'WRITE', Application, ResolvedTargetVolume, 'SYSOBJ', '$' : KeyID, StatusCode, @File_Error) + end + end + // Check to see if repository entity pointers were found that needs to be replicated. + SourceApplication = Field(KeyID, '*', 2, 1) + If SourceApplication EQ '' then SourceApplication = 'SYSPROG' + SysReposSourceKeyID = SourceApplication : '*STPROC**' : KeyID[1, '*'] + If SRP_HashTable_Contains(hHashTable, SysReposSourceKeyID) then + SourceReposStprocRow = SRP_HashTable_Get(hHashTable, SysReposSourceKeyID) + Write SourceReposStprocRow to hTargetSysRepos, SysReposSourceKeyID else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'WRITE', Application, ResolvedTargetVolume, 'SYSREPOS', SysReposSourceKeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'WRITE', Application, ResolvedTargetVolume, 'SYSREPOS', SysReposSourceKeyID, StatusCode, @File_Error) + end + end + SysReposObjKeyID = SourceApplication : '*STPROCEXE**' : KeyID[1, '*'] + If SRP_HashTable_Contains(hHashTable, SysReposObjKeyID) then + SourceReposStprocExeRow = SRP_HashTable_Get(hHashTable, SysReposObjKeyID) + Write SourceReposStprocExeRow to hTargetSysRepos, SysReposObjKeyID else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'WRITE', Application, ResolvedTargetVolume, 'SYSREPOS', SysReposObjKeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'WRITE', Application, ResolvedTargetVolume, 'SYSREPOS', SysReposObjKeyID, StatusCode, @File_Error) + end + end + end + ActionCompleted = True$ + end else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'WRITE', Application, ResolvedTargetVolume, Table, KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'WRITE', Application, ResolvedTargetVolume, Table, KeyID, StatusCode, @File_Error) + end + + Case Action _EQC 'DELETE' + Delete hTargetTable, KeyID then + ActionCompleted = True$ + end else + Read TargetRow from hTargetTable, KeyID then + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'DELETE', Application, ResolvedTargetVolume, Table, KeyID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'DELETE', Application, ResolvedTargetVolume, Table, KeyID, StatusCode, @File_Error) + end else + // This means the row did not exist in the table. However, this is + // quite possible if there has been more activity with this row + // that deleted it prior to this transaction being processed. + ActionCompleted = True$ + end + end + + Case Action _EQC 'CLEARFILE' + // Performing a ClearFile statement can have disastorous consequences if performed + // against a non-intended table, such as a system table. Make sure only valid tables + // are being cleared. + PerformClearFile = True$ ; // Assume the table will be cleared for now. + Begin Case + Case SourceVolume _EQC 'REVBOOT' + PerformClearFile = False$ + AdditionalMessage = 'An attempt was made to try and clear a table in the ' : SourceVolume : ' volume.' + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'CLEARFILE', Application, ResolvedTargetVolume, Table, '', '', '', '', AdditionalMessage) + Replication_Services('SendEmergencyAlert', Service, 'CLEARFILE', Application, ResolvedTargetVolume, Table, '', '', '', '', AdditionalMessage) + + Case Table _EQC 'SYSPROCS' + PerformClearFile = False$ + AdditionalMessage = 'An attempt was made to try and clear the ' : Table : ' table.' + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'CLEARFILE', Application, ResolvedTargetVolume, Table, '', '', '', '', AdditionalMessage) + Replication_Services('SendEmergencyAlert', Service, 'CLEARFILE', Application, ResolvedTargetVolume, Table, '', '', '', '', AdditionalMessage) + + Case Table[1, 8] _EQC 'SYSREPOS' + PerformClearFile = False$ + AdditionalMessage = 'An attempt was made to try and clear the ' : Table : ' table.' + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'CLEARFILE', Application, ResolvedTargetVolume, Table, '', '', '', '', AdditionalMessage) + Replication_Services('SendEmergencyAlert', Service, 'CLEARFILE', Application, ResolvedTargetVolume, Table, '', '', '', '', AdditionalMessage) + End Case + + If PerformClearFile EQ True$ then + ClearFile hTargetTable then + ActionCompleted = True$ + end else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'CLEARFILE', Application, ResolvedTargetVolume, Table, '', StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'CLEARFILE', Application, ResolvedTargetVolume, Table, '', StatusCode, @File_Error) + end + end + + Case Action _EQC 'IGNORE' + // If a normal action (e.g., WRITE) cannot be processed due to normal reasons, the + // action is dynamically changed to IGNORE so that the service can continue without + // erroring out. The transaction ID will also be deleted. + ActionCompleted = True$ + + End Case + end + + // If the action completed successfully (and the action is not SKIP) then delete the transaction + // from the queue table so it will not be processed again. + If ActionCompleted EQ True$ then +* Replication_Services('PostToDailyLog') + Delete hQueueTable, InProcessSK else + // The transaction ID might not exist due to SKIPing. Just clear the error and move on. + Set_Status(0) + end + LookupKeyID = Action:'*':Table:'*':KeyID + Delete hQueueTable, LookupKeyID else + // The lookup key might not exist due to SKIPing. Just clear the error and move on. + Set_Status(0) + // Log failure + LogData = '' + LogData<1> = LoggingDTM + LogData<2> = LookupKeyID + LogData<3> = hQueueTable + Logging_Services('AppendLog', objLog, LogData, @RM, @FM) + end + end + end else + // SKIP actions are always completed. + ActionCompleted = True$ + end + // Only continue to process transactions if there are no unexpected problems that would cause + // an action to not complete. + While ActionCompleted EQ True$ + Next InProcessSK + + If ResolvedTargetVolume NE '' then + // Check to see if the target SYSREPOS table was opened. If so, run Repos_Detach_Trans to + // properly detach the REPOS_BFS volume. + Open 'SYSREPOS_TEMP' to hTargetSysRepos then + Repos_Detach_Trans(ResolvedTargetVolume : '', 1) + end + + Set_Status(0) + Detach_Volume(ResolvedTargetVolume : '', Success) + end else + // There was no resolved target volume (probably due to a custom replication procedure + // being called instead. So just set the Success flag to true. + Success = True$ + end + + If Success EQ True$ then + // InProcessSK is now 1 greater. Save this as the NextInProcessSK value. + If FirstSkippedSK NE '' then Transfer FirstSkippedSK to InProcessSK + Write InProcessSK to hQueueTable, InProcessSKID then + If Replication_Services('LockReplicationQueueCounter', hQueueTable, PendingSKID) then + // Read the Next Pending counter again since it might have changed. But now it is locked so this + // value won't change until it is unlocked. + Read NextPendingSK from hQueueTable, PendingSKID else NextPendingSK = 1 + If InProcessSK EQ NextPendingSK then + Write 1 to hQueueTable, PendingSKID else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'WRITE', Application, ResolvedSourceVolume, 'ReplicationQueue for ' : Table, PendingSKID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'WRITE', Application, ResolvedSourceVolume, 'ReplicationQueue for ' : Table, PendingSKID, StatusCode, @File_Error) + end + + Write 1 to hQueueTable, InProcessSKID else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'WRITE', Application, ResolvedSourceVolume, 'ReplicationQueue for ' : Table, InProcessSKID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'WRITE', Application, ResolvedSourceVolume, 'ReplicationQueue for ' : Table, InProcessSKID, StatusCode, @File_Error) + end + end + Replication_Services('UnlockReplicationQueueCounter', hQueueTable, PendingSKID) + end + end else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'WRITE', Application, ResolvedSourceVolume, 'ReplicationQueue for ' : Table, InProcessSKID, StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'WRITE', Application, ResolvedSourceVolume, 'ReplicationQueue for ' : Table, InProcessSKID, StatusCode, @File_Error) + end + end else + StatusFlag = Get_Status(StatusCode) + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, 'DETACH', Application, ResolvedTargetVolume, Table, '', StatusCode, @File_Error) + Replication_Services('SendEmergencyAlert', Service, 'DETACH', Application, ResolvedTargetVolume, Table, '', StatusCode, @File_Error) + end + end + SRP_HashTable_Release(hHashTable) + end + Replication_Services('UnlockReplicationQueueCounter', hQueueTable, InProcessSKID) + Write '' to hQueueTable, '%EngineName%' else Null + end + + Case ServerType _EQC 'Target' + // Reserved for future use. + + Case Otherwise$ + // This is an invalid Server Type. Send an alert and stop the service. + AdditionalMessage = Quote(ServerType) : ' is an invalid server type.' + If LoggingEnabled EQ True$ then Replication_Services('LogError', Service, '', '', '', '', '', '', '', '', AdditionalMessage) + Replication_Services('SendEmergencyAlert', Service, '', '', '', '', '', '', '', '', AdditionalMessage) + + End Case + + end else + // Either the replication system has been disabled or stopped, or this is a replication server. Abort this + // service and tell the SRP Engine Server to quit. If the system has been stopped, reset the SystemStopFlag + // to False since this should only be a temporary. + If SystemStopFlag EQ True$ then + Replication_Services('SetSystemStopFlag', False$) + end + + Send_Info('SRPENGINESERVERQUIT') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// WriteDatabaseRow +// +// TransactionID - The transaction ID that contains the relevant information for the replication action. +// +// Writes the database row into the target server's database table. +//---------------------------------------------------------------------------------------------------------------------- +Service WriteDatabaseRow(TransactionID) + + ActionCompleted = False$ ; // Assume the action did not complete for now. + + If TransactionID NE '' then + Action = TransactionID[1, @FM] + Application = TransactionID[Col2() + 1, @FM] + SourceVolume = TransactionID[Col2() + 1, @FM] + Table = TransactionID[Col2() + 1, @FM] + KeyID = TransactionID[Col2() + 1, 999] + + // Attempt to open the table that the source row resides in. However, make sure that any paths are resolved to + // the official source server path (which should be in UNC format). The SourceVolume variable will likely + // contain a mapped drive and this might not be available to the replication service. + SourceServerPath = UCase(Replication_Services('GetSourceServerPath')) + If Index(SourceVolume, ':\', 1) then + // Source volume has a mapped drive. Replace with the source server path. + MappedDrive = SourceVolume[1, 3] + Swap MappedDrive with SourceServerPath in SourceVolume + end + Set_Status(0) + Attach_Table(SourceVolume, Table, Application, '') + If Get_Status(StatusCode) then + Set_Status(0) + end else + Open Table to hSourceTable then + // The table did not open. It could be because it is not attached. + Read SourceRow from hSourceTable, KeyID then + Set_Status(0) + Detach_Volume(SourceVolume, Success) + If Success EQ True$ then + Set_Status(0) + TargetServerPath = UCase(Replication_Services('GetTargetServerPath')) + TargetVolume = UCase(SourceVolume) + Swap SourceServerPath with TargetServerPath in TargetVolume + Attach_Table(TargetVolume, Table, Application, '') + If Get_Status(StatusCode) then + Set_Status(0) + end else + Open Table to hTargetTable then + Write SourceRow to hTargetTable, KeyID then + ActionCompleted = True$ + end + end + end + Set_Status(0) + Detach_Volume(TargetVolume, Success) + Set_Status(0) + Attach_Table(SourceVolume, Table, Application, '') + If Get_Status(StatusCode) then + Set_Status(0) + end + end + end + end else + Error_Services('Add', 'Unable to open the ' : Table : ' table in the ' : Service : ' service.') + end + end + end else + Error_Services('Add', 'TransactionID argument was missing from the ' : Service : ' service.') + end + + Response = ActionCompleted + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// DeleteDatabaseRow +// +// TransactionID - The transaction ID that contains the relevant information for the replication action. +// +// Deletes the database row from the target server's database table. +//---------------------------------------------------------------------------------------------------------------------- +Service DeleteDatabaseRow(TransactionID) + + ActionCompleted = False$ ; // Assume the action did not complete for now. + + If TransactionID NE '' then + Action = TransactionID[1, @FM] + Application = TransactionID[Col2() + 1, @FM] + SourceVolume = TransactionID[Col2() + 1, @FM] + Table = TransactionID[Col2() + 1, @FM] + KeyID = TransactionID[Col2() + 1, 999] + + // Attempt to open the table that the source row resides in. However, make sure that any paths are resolved to + // the official source server path (which should be in UNC format). The SourceVolume variable will likely + // contain a mapped drive and this might not be available to the replication service. + SourceServerPath = UCase(Replication_Services('GetSourceServerPath')) + If Index(SourceVolume, ':\', 1) then + // Source volume has a mapped drive. Replace with the source server path. + MappedDrive = SourceVolume[1, 3] + Swap MappedDrive with SourceServerPath in SourceVolume + end + Set_Status(0) + Attach_Table(SourceVolume, Table, Application, '') + If Get_Status(StatusCode) then + Set_Status(0) + end else + Open Table to hSourceTable then + // The table did not open. It could be because it is not attached. + Read SourceRow from hSourceTable, KeyID then + Set_Status(0) + Detach_Volume(SourceVolume, Success) + If Success EQ True$ then + Set_Status(0) + TargetServerPath = UCase(Replication_Services('GetTargetServerPath')) + TargetVolume = UCase(SourceVolume) + Swap SourceServerPath with TargetServerPath in TargetVolume + Attach_Table(TargetVolume, Table, Application, '') + If Get_Status(StatusCode) then + Set_Status(0) + end else + Open Table to hTargetTable then + Write SourceRow to hTargetTable, KeyID then + ActionCompleted = True$ + end + end + end + Set_Status(0) + Detach_Volume(TargetVolume, Success) + Set_Status(0) + Attach_Table(SourceVolume, Table, Application, '') + If Get_Status(StatusCode) then + Set_Status(0) + end + end + end + end else + Error_Services('Add', 'Unable to open the ' : Table : ' table in the ' : Service : ' service.') + end + end + end else + Error_Services('Add', 'TransactionID argument was missing from the ' : Service : ' service.') + end + + Response = ActionCompleted + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetReplicationTables +// +// ReplicationTables - An @FM/@VM formatted array of database tables and related attributes. - [Optional] +// +// If the ReplicaationTables argument is empty, it will clear the current settings. The format of the ReplicationTables +// array is as follows: +// +// = Table name +// = Database ID +// = Volume +// = Boolean flag to indicate if the table has BASE_MFS installed +// = Boolean flag to indicate if the table is not-suspended from being queued +// = Boolean flag to indicate Is the table is not-suspended from being replicated +// = Type of queue for this table +//---------------------------------------------------------------------------------------------------------------------- +Service SetReplicationTables(ReplicationTables) + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_TABLES' + Lock hRepConfigTable, RepConfigKeyID then + ReplicationTables = SRP_Array('SortRows', ReplicationTables, 'AL2' : @FM : 'AL1', 'LIST', @FM, @VM) + Write ReplicationTables to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing the replication tables list in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking the replication tables list in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetReplicationTables +// +// Returns an @FM/@VM array of database tables that the Replication Manager is aware of. +//---------------------------------------------------------------------------------------------------------------------- +Service GetReplicationTables() + + ReplicationTables = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_TABLES' + Read ReplicationTables from hRepConfigTable, RepConfigKeyID else ReplicationTables = '' + end + + Response = ReplicationTables + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetVolumeTables +// +// Volume - The volume to search for tables. - [Required] +// +// Returns an @FM/@VM array of table information for the indicated volume. Indexes and Dictionaries are excluded. +//---------------------------------------------------------------------------------------------------------------------- +Service GetVolumeTables(Volume) + + VolumeTables = '' + + If Volume NE '' then + rv = Set_Status(0) + VolumeTables = List_Volume_Sub(Volume, '', 'TABLE_NAME' : @FM : 'TABLE_DATABASE_ID', '') + If Get_Status(StatusCode) then + Error_Services('Add', 'Error calling the List_Volume_Sub function in the ' : Service : ' service. Status Code : ' : StatusCode) + end else + // Tables were found. Remove dictionaries and indexes. + NumTables = DCount(VolumeTables, @FM) + For TableCnt = NumTables to 1 Step -1 + If (VolumeTables[1, 1] EQ '!') OR (VolumeTables[1, 5] EQ 'DICT.') then + VolumeTables = Delete(VolumeTables, TableCnt, 0, 0) + end + Next TableCnt + // Sort the list by database ID and then by table name. + VolumeTables = SRP_Array('SortRows', VolumeTables, 'AL2' : @FM : 'AL1', 'LIST', @FM, @VM) + end + end else + Error_Services('Add', 'Volume argument was missing in the ' : Service : ' service.') + end + + Response = VolumeTables + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// AddBaseMFSToTable +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// Volume - Volume where the table resides. - [Required] +// +// Adds (or installs) the BASE_MFS modified filing system routine to the indicated table. +//---------------------------------------------------------------------------------------------------------------------- +Service AddBaseMFSToTable(TableName, DatabaseID, Volume) + + If (TableName NE '') AND (DatabaseID NE '') AND (Volume NE '') then + Set_Status(0) + Alias_Table(Volume : '', 'SYSPROG', 'REVMEDIA', 'REVMEDIA_TEMP') + If Get_Status(StatusCode) then + StatusFlag = Get_Status(StatusCode) + Error_Services('Add', 'Error aliasing REVMEDIA from ' : Volume : ' in the ' : Service : ' service: ' : StatusCode) + end else + TableRow = Database_Services('ReadDataRow', 'REVMEDIA_TEMP', TableName : '*' : DatabaseID) + If Error_Services('NoError') then + MFSList = TableRow<2> + Locate 'BASE_MFS' in MFSList using @VM setting Pos else + MFSList<0, -1> = 'BASE_MFS' + TableRow<2> = MFSList + Database_Services('WriteDataRow', 'REVMEDIA_TEMP', TableName : '*' : DatabaseID, TableRow) + end + ReplicationTables = Replication_Services('GetReplicationTables') + If Error_Services('NoError') then + TableArray = SRP_Array('Rotate', ReplicationTables, @FM, @VM) + (TableNames, DatabaseIDs) using @FM = TableArray + TableItemKeys = SRP_Array('Rotate', TableNames : @FM : DatabaseIDs, @FM, @VM) + ThisTableItemKey = TableName : @VM : DatabaseID + Locate ThisTableItemKey in TableItemKeys using @FM setting Pos then + ReplicationTables = True$ + Replication_Services('SetReplicationTables', ReplicationTables) + end + end + end + Error = Error_Services('GetMessage') + Set_Status(0) + Detach_Table('REVMEDIA_TEMP') + Database_Services('ClearTableHandle', 'REVMEDIA_TEMP') + Set_Status(0) + // Using the absolute path to the REVBOOT folder will confuse Attach_Table, so check for a match and then + // replace with REVBOOT if needed. + If Volume _EQC Drive() then Volume = 'REVBOOT' + Attach_Table(Volume : '', TableName : '', DatabaseID : '', '') + Error_Services('Add', Error) + end + end else + Error_Services('Add', 'TableName, DatabaseID, or Volume argument was missing from the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// RemoveBaseMFSFromTable +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// Volume - Volume where the table resides. - [Required] +// +// Removes the BASE_MFS modified filing system routine from the indicated table. +//---------------------------------------------------------------------------------------------------------------------- +Service RemoveBaseMFSFromTable(TableName, DatabaseID, Volume) + + If (TableName NE '') AND (DatabaseID NE '') AND (Volume NE '') then + Set_Status(0) + Alias_Table(Volume : '', 'SYSPROG', 'REVMEDIA', 'REVMEDIA_TEMP') + If Get_Status(StatusCode) then + StatusFlag = Get_Status(StatusCode) + Error_Services('Add', 'Error aliasing REVMEDIA from ' : Volume : ' in the ' : Service : ' service: ' : StatusCode) + end else + TableRow = Database_Services('ReadDataRow', 'REVMEDIA_TEMP', TableName : '*' : DatabaseID) + If Error_Services('NoError') then + MFSList = TableRow<2> + Locate 'BASE_MFS' in MFSList using @VM setting Pos then + MFSList = Delete(MFSList, 0, Pos, 0) + TableRow<2> = MFSList + Database_Services('WriteDataRow', 'REVMEDIA_TEMP', TableName : '*' : DatabaseID, TableRow) + end + ReplicationTables = Replication_Services('GetReplicationTables') + If Error_Services('NoError') then + TableArray = SRP_Array('Rotate', ReplicationTables, @FM, @VM) + (TableNames, DatabaseIDs) using @FM = TableArray + TableItemKeys = SRP_Array('Rotate', TableNames : @FM : DatabaseIDs, @FM, @VM) + ThisTableItemKey = TableName : @VM : DatabaseID + Locate ThisTableItemKey in TableItemKeys using @FM setting Pos then + ReplicationTables = False$ + Replication_Services('SetReplicationTables', ReplicationTables) + end + end + end + Error = Error_Services('GetMessage') + Set_Status(0) + Detach_Table('REVMEDIA_TEMP') + Database_Services('ClearTableHandle', 'REVMEDIA_TEMP') + Set_Status(0) + // Using the absolute path to the REVBOOT folder will confuse Attach_Table, so check for a match and then + // replace with REVBOOT if needed. + If Volume _EQC Drive() then Volume = 'REVBOOT' + Attach_Table(Volume : '', TableName : '', DatabaseID : '', '') + Error_Services('Add', Error) + end + end else + Error_Services('Add', 'TableName, DatabaseID, or Volume argument was missing from the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// HasBaseMFSInstalled +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// +// Returns a Boolean flag if the indicated table has BASE_MFS already installed. +//---------------------------------------------------------------------------------------------------------------------- +Service HasBaseMFSInstalled(TableName, DatabaseID, Volume) + + BaseMFSInstalled = False$ ; // Assume false for now. + + If (TableName NE '') AND (DatabaseID NE '') AND (Volume NE '') then + Set_Status(0) + Alias_Table(Volume : '', 'SYSPROG', 'REVMEDIA', 'REVMEDIA_TEMP') + If Get_Status(StatusCode) then + StatusFlag = Get_Status(StatusCode) + Error_Services('Add', 'Error aliasing REVMEDIA from ' : Volume : ' in the ' : Service : ' service: ' : StatusCode) + end else + TableRow = Database_Services('ReadDataRow', 'REVMEDIA_TEMP', TableName : '*' : DatabaseID) + If Error_Services('NoError') then + MFSList = TableRow<2> + Locate 'BASE_MFS' in MFSList using @VM setting Pos then + BaseMFSInstalled = True$ + end + end + Set_Status(0) + Detach_Table('REVMEDIA_TEMP') + Database_Services('ClearTableHandle', 'REVMEDIA_TEMP') + end + end else + Error_Services('Add', 'TableName, DatabaseID, or Volume argument was missing from the ' : Service : ' service.') + end + + Response = BaseMFSInstalled + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// IsReplicationTable +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// +// Returns a Boolean flag if the indicated table should be considered for replication processing. +//---------------------------------------------------------------------------------------------------------------------- +Service IsReplicationTable(TableName, DatabaseID) + + ReplicationTable = False$ ; // Assume false for now. + + If (TableName NE '') AND (DatabaseID NE '') then + ReplicationTables = Replication_Services('GetReplicationTables') + If Error_Services('NoError') then + TableArray = SRP_Array('Rotate', ReplicationTables, @FM, @VM) + (TableNames, DatabaseIDs) using @FM = TableArray + TableItemKeys = SRP_Array('Rotate', TableNames : @FM : DatabaseIDs, @FM, @VM) + ThisTableItemKey = TableName : @VM : DatabaseID + Locate ThisTableItemKey in TableItemKeys using @FM setting Pos then + ReplicationTable = True$ + end + end + end else + Error_Services('Add', 'TableName or DatabaseID argument was missing from the ' : Service : ' service.') + end + + Response = ReplicationTable + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SuspendTableQueue +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// +// Turns off the flag for the indicated table so that queue processes will be suspended (disabled). The table will still +// be considered for replication and any queued transactions will still be processed, but no new transactions will be +// queued. +//---------------------------------------------------------------------------------------------------------------------- +Service SuspendTableQueue(TableName, DatabaseID) + + If (TableName NE '') AND (DatabaseID NE '') then + ReplicationTables = Replication_Services('GetReplicationTables') + If Error_Services('NoError') then + TableArray = SRP_Array('Rotate', ReplicationTables, @FM, @VM) + (TableNames, DatabaseIDs) using @FM = TableArray + TableItemKeys = SRP_Array('Rotate', TableNames : @FM : DatabaseIDs, @FM, @VM) + ThisTableItemKey = TableName : @VM : DatabaseID + Locate ThisTableItemKey in TableItemKeys using @FM setting Pos then + ReplicationTables = False$ + Replication_Services('SetReplicationTables', ReplicationTables) + end + end + end else + Error_Services('Add', 'TableName or DatabaseID argument was missing from the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// AllowTableQueue +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// +// Turns on the flag for the indicated table so that queue processes will be allowed (enabled). +//---------------------------------------------------------------------------------------------------------------------- +Service AllowTableQueue(TableName, DatabaseID) + + If (TableName NE '') AND (DatabaseID NE '') then + ReplicationTables = Replication_Services('GetReplicationTables') + If Error_Services('NoError') then + TableArray = SRP_Array('Rotate', ReplicationTables, @FM, @VM) + (TableNames, DatabaseIDs) using @FM = TableArray + TableItemKeys = SRP_Array('Rotate', TableNames : @FM : DatabaseIDs, @FM, @VM) + ThisTableItemKey = TableName : @VM : DatabaseID + Locate ThisTableItemKey in TableItemKeys using @FM setting Pos then + ReplicationTables = True$ + Replication_Services('SetReplicationTables', ReplicationTables) + end + end + end else + Error_Services('Add', 'TableName or DatabaseID argument was missing from the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// IsTableAllowedToQueue +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// +// Returns a Boolean flag if the indicated table should be allowed to queue. +//---------------------------------------------------------------------------------------------------------------------- +Service IsTableAllowedToQueue(TableName, DatabaseID) + + CanQueue = False$ ; // Assume false for now. + + If (TableName NE '') AND (DatabaseID NE '') then + ReplicationTables = Replication_Services('GetReplicationTables') + If Error_Services('NoError') then + TableArray = SRP_Array('Rotate', ReplicationTables, @FM, @VM) + (TableNames, DatabaseIDs) using @FM = TableArray + TableItemKeys = SRP_Array('Rotate', TableNames : @FM : DatabaseIDs, @FM, @VM) + ThisTableItemKey = TableName : @VM : DatabaseID + Locate ThisTableItemKey in TableItemKeys using @FM setting Pos then + CanQueue = ReplicationTables + end + end + end else + Error_Services('Add', 'TableName or DatabaseID argument was missing from the ' : Service : ' service.') + end + + Response = CanQueue + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SuspendTableReplication +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// +// Turns off the flag for the indicated table so that replication processes will be suspended (disabled). The table will +// still be considered for replication and transactions will still be queued, but no queued transactions will be +// processed. +//---------------------------------------------------------------------------------------------------------------------- +Service SuspendTableReplication(TableName, DatabaseID) + + If (TableName NE '') AND (DatabaseID NE '') then + ReplicationTables = Replication_Services('GetReplicationTables') + If Error_Services('NoError') then + TableArray = SRP_Array('Rotate', ReplicationTables, @FM, @VM) + (TableNames, DatabaseIDs) using @FM = TableArray + TableItemKeys = SRP_Array('Rotate', TableNames : @FM : DatabaseIDs, @FM, @VM) + ThisTableItemKey = TableName : @VM : DatabaseID + Locate ThisTableItemKey in TableItemKeys using @FM setting Pos then + ReplicationTables = False$ + Replication_Services('SetReplicationTables', ReplicationTables) + end + end + end else + Error_Services('Add', 'TableName or DatabaseID argument was missing from the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// AllowTableReplication +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// +// Turns on the flag for the indicated table so that replication processes will be allowed (enabled). +//---------------------------------------------------------------------------------------------------------------------- +Service AllowTableReplication(TableName, DatabaseID) + + If (TableName NE '') AND (DatabaseID NE '') then + ReplicationTables = Replication_Services('GetReplicationTables') + If Error_Services('NoError') then + TableArray = SRP_Array('Rotate', ReplicationTables, @FM, @VM) + (TableNames, DatabaseIDs) using @FM = TableArray + TableItemKeys = SRP_Array('Rotate', TableNames : @FM : DatabaseIDs, @FM, @VM) + ThisTableItemKey = TableName : @VM : DatabaseID + Locate ThisTableItemKey in TableItemKeys using @FM setting Pos then + ReplicationTables = True$ + Replication_Services('SetReplicationTables', ReplicationTables) + end + end + end else + Error_Services('Add', 'TableName or DatabaseID argument was missing from the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// IsTableAllowedToReplicate +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// +// Returns a Boolean flag if the indicated table should be allowed to replicate. +//---------------------------------------------------------------------------------------------------------------------- +Service IsTableAllowedToReplicate(TableName, DatabaseID) + + CanReplicate = False$ ; // Assume false for now. + + If (TableName NE '') AND (DatabaseID NE '') then + ReplicationTables = Replication_Services('GetReplicationTables') + If Error_Services('NoError') then + TableArray = SRP_Array('Rotate', ReplicationTables, @FM, @VM) + (TableNames, DatabaseIDs) using @FM = TableArray + TableItemKeys = SRP_Array('Rotate', TableNames : @FM : DatabaseIDs, @FM, @VM) + ThisTableItemKey = TableName : @VM : DatabaseID + Locate ThisTableItemKey in TableItemKeys using @FM setting Pos then + CanReplicate = ReplicationTables + end + end + end else + Error_Services('Add', 'TableName or DatabaseID argument was missing from the ' : Service : ' service.') + end + + Response = CanReplicate + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetTableQueueType +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// QueueType - Queue type to set. - [Required] +// +// Sets a queue type to be associated to the indicated table. +//---------------------------------------------------------------------------------------------------------------------- +Service SetTableQueueType(TableName, DatabaseID, QueueType) + + If (TableName NE '') AND (DatabaseID NE '') AND (QueueType NE '') then + Locate QueueType in 'Public,Private' using ',' setting Pos then + ReplicationTables = Replication_Services('GetReplicationTables') + If Error_Services('NoError') then + TableArray = SRP_Array('Rotate', ReplicationTables, @FM, @VM) + (TableNames, DatabaseIDs) using @FM = TableArray + TableItemKeys = SRP_Array('Rotate', TableNames : @FM : DatabaseIDs, @FM, @VM) + ThisTableItemKey = TableName : @VM : DatabaseID + Locate ThisTableItemKey in TableItemKeys using @FM setting Pos then + ReplicationTables = QueueType + Replication_Services('SetReplicationTables', ReplicationTables) + end + end + end else + Error_Services('Add', 'In invalid queue type (' : QueueType : ') was pass into the ' : Service : ' service.') + end + end else + Error_Services('Add', 'TableName, DatabaseID, or QueueType argument was missing from the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetTableQueueType +// +// TableName - Name of the table. - [Required] +// DatabaseID - Database the table belongs to. - [Required] +// +// Returns the queue type associated with the indicated table. If no queue type has been assigned, it will default to +// the Public queue type. +//---------------------------------------------------------------------------------------------------------------------- +Service GetTableQueueType(TableName, DatabaseID) + + QueueType = 'Public' ; // Assume Public for now + + If (TableName NE '') AND (DatabaseID NE '') then + ReplicationTables = Replication_Services('GetReplicationTables') + If Error_Services('NoError') then + TableArray = SRP_Array('Rotate', ReplicationTables, @FM, @VM) + (TableNames, DatabaseIDs) using @FM = TableArray + TableItemKeys = SRP_Array('Rotate', TableNames : @FM : DatabaseIDs, @FM, @VM) + ThisTableItemKey = TableName : @VM : DatabaseID + Locate ThisTableItemKey in TableItemKeys using @FM setting Pos then + QueueType = ReplicationTables + end + end + end else + Error_Services('Add', 'TableName or DatabaseID argument was missing from the ' : Service : ' service.') + end + + Response = QueueType + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetSystemStopFlag +// +// System Enabled Flag - Boolean flag to determine if the system should be stopped. +// +// Sets a Boolean flag indicating that the system should be stopped. +//---------------------------------------------------------------------------------------------------------------------- +Service SetSystemStopFlag(SystemStopFlag) + + If Len(SystemStopFlag) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SYSTEM_STOPPED' + Lock hRepConfigTable, RepConfigKeyID then + Write SystemStopFlag to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing system stopped flag in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking system stopped flag in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'SystemStopFlag arguement was missing in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSystemStopFlag +// +// Returns a Boolean flag indicating if the system should be stopped. The default is False. If the system is stopped, +// then transactions should continue to be added to the pending queue files but not processed. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSystemStopFlag() + + SystemStopFlag = True$ ; // Assume True for now. Only an explicit True will stop the system. + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SYSTEM_STOPPED' + Read SystemStopFlag from hRepConfigTable, RepConfigKeyID then + If SystemStopFlag NE True$ then SystemEnabledFlag = False$ + end + end + + Response = SystemStopFlag + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetSystemEnabledFlag +// +// System Enabled Flag. Boolean flag to determine if the system is enabled. +// +// Sets a Boolean flag indicating if the system is currently enabled. +//---------------------------------------------------------------------------------------------------------------------- +Service SetSystemEnabledFlag(SystemEnabledFlag) + + If Len(SystemEnabledFlag) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SYSTEM_ENABLED' + Lock hRepConfigTable, RepConfigKeyID then + Write SystemEnabledFlag to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing system enabled flag in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking system enabled flag in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'SystemEnabledFlag arguement was missing in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSystemEnabledFlag +// +// Returns a Boolean flag indicating if the system is currently enabled. The default is True. If the system is not +// enabled, then transactions should continue to be added to the pending queue files but not processed. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSystemEnabledFlag() + + SystemEnabledFlag = True$ ; // Assume True for now. Only an explicit False will disable the system. + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SYSTEM_ENABLED' + Read SystemEnabledFlag from hRepConfigTable, RepConfigKeyID then + If SystemEnabledFlag NE False$ then SystemEnabledFlag = True$ + end + end + + Response = SystemEnabledFlag + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetServerType +// +// Server Type - The server type. Valid options are 'Source' and 'Target'. +// +// Sets the server type. +//---------------------------------------------------------------------------------------------------------------------- +Service SetServerType(ServerType) + + If Len(ServerType) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SERVER_TYPE' + Lock hRepConfigTable, RepConfigKeyID then + Write ServerType to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing server type in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking server type in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'ServerType arguement was missing in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetServerType +// +// Returns the type of server. Valid optons are 'Source' and 'Target'. Default is 'Source'. +//---------------------------------------------------------------------------------------------------------------------- +Service GetServerType() + + ServerType = 'Source' ; // Assume Source unless otherwise noted. + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SERVER_TYPE' + Read ServerType from hRepConfigTable, RepConfigKeyID then + If ServerType NE 'Source' AND ServerType NE 'Target' then ServerType = 'Source' + end + end + + Response = ServerType + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetSourceQueuePath +// +// QueuePath - Path to where the transaction queue files are maintained. +// +// Sets the OS path to where the transaction queue files are maintained. +//---------------------------------------------------------------------------------------------------------------------- +Service SetSourceQueuePath(QueuePath) + + If Len(QueuePath) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SOURCE_QUEUE_PATH' + Lock hRepConfigTable, RepConfigKeyID then + Write QueuePath to hRepConfigTable, RepConfigKeyID then + ServerType = Replication_Services('GetServerType') + If ServerType _EQC 'Source' then + Replication_Services('CreateReplicationQueue', 'GLOBAL', 'PUBLIC') + end + end else + Error_Services('Add', 'Error writing queue path in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking queue path in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSourceQueuePath +// +// Returns the OS path to where the transaction queues are maintained. This will always append a backslash to make it +// easier for calling services to work with. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSourceQueuePath() + + QueuePath = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SOURCE_QUEUE_PATH' + Read QueuePath from hRepConfigTable, RepConfigKeyID else QueuePath = '' + If SRP_Path('IsRelative', QueuePath) then + QueuePath = SRP_Path('Expand', QueuePath) + end + QueuePath = SRP_Path('AddBackslash', QueuePath) + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = QueuePath + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetSourceServerPath +// +// SourceServerPath - Path to the root where the source tables live. +// +// Sets the OS path to where the source tables live. +//---------------------------------------------------------------------------------------------------------------------- +Service SetSourceServerPath(SourceServerPath) + + If Len(SourceServerPath) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SOURCE_SERVER_PATH' + Lock hRepConfigTable, RepConfigKeyID then + Write SourceServerPath to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing source server path in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking source server path in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSourceServerPath +// +// Returns the OS path to where the source tables live. This will always append a backslash to make it easier for +// calling services to work with. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSourceServerPath() + + SourceServerPath = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SOURCE_SERVER_PATH' + Read SourceServerPath from hRepConfigTable, RepConfigKeyID then + SourceServerPath = SRP_Path('AddBackslash', SourceServerPath) + end else + SourceServerPath = '' + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = SourceServerPath + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetSourceREVBOOTPath +// +// SetSourceREVBOOTPath - Path to the source REVBOOT volume. +// +// Sets the OS path to where the source REVBOOT volume exists. +//---------------------------------------------------------------------------------------------------------------------- +Service SetSourceREVBOOTPath(SourceREVBOOTPath) + + If Len(SourceREVBOOTPath) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SOURCE_REVBOOT_PATH' + Lock hRepConfigTable, RepConfigKeyID then + Write SourceREVBOOTPath to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing source REVBOOT path in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking source REVBOOT path in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSourceREVBOOTPath +// +// Returns the OS path to where the source REVBOOT volume exists. This will always append a backslash to make it easier +// for calling services to work with. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSourceREVBOOTPath() + + SourceREVBOOTPath = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SOURCE_REVBOOT_PATH' + Read SourceREVBOOTPath from hRepConfigTable, RepConfigKeyID then + SourceREVBOOTPath = SRP_Path('AddBackslash', SourceREVBOOTPath) + end else + SourceREVBOOTPath = '' + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = SourceREVBOOTPath + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetTargetQueuePath +// +// QueuePath - Path to where the transaction queue files are maintained. +// +// Sets the OS path to where the transaction queue files are maintained. +//---------------------------------------------------------------------------------------------------------------------- +Service SetTargetQueuePath(QueuePath) + + If Len(QueuePath) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_TARGET_QUEUE_PATH' + Lock hRepConfigTable, RepConfigKeyID then + Write QueuePath to hRepConfigTable, RepConfigKeyID then + ServerType = Replication_Services('GetServerType') + If ServerType _EQC 'Target' then + Replication_Services('CreateReplicationQueue', 'GLOBAL', 'PUBLIC') + end + end else + Error_Services('Add', 'Error writing queue path in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking queue path in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetTargetQueuePath +// +// Returns the OS path to where the transaction queues are maintained. This will always append a backslash to make it +// easier for calling services to work with. +//---------------------------------------------------------------------------------------------------------------------- +Service GetTargetQueuePath() + + QueuePath = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_TARGET_QUEUE_PATH' + Read QueuePath from hRepConfigTable, RepConfigKeyID else QueuePath = '' + If SRP_Path('IsRelative', QueuePath) then + QueuePath = SRP_Path('Expand', QueuePath) + end + QueuePath = SRP_Path('AddBackslash', QueuePath) + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = QueuePath + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetTargetServerPath +// +// TargetServerPath - Path to the root where the target tables live. +// +// Sets the OS path to where the target tables live. +//---------------------------------------------------------------------------------------------------------------------- +Service SetTargetServerPath(TargetServerPath) + + If Len(TargetServerPath) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_TARGET_SERVER_PATH' + Lock hRepConfigTable, RepConfigKeyID then + Write TargetServerPath to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing target server path in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking target server path in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetTargetServerPath +// +// Returns the OS path to where the target tables live. This will always append a backslash to make it easier for +// calling services to work with. +//---------------------------------------------------------------------------------------------------------------------- +Service GetTargetServerPath() + + TargetServerPath = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_TARGET_SERVER_PATH' + Read TargetServerPath from hRepConfigTable, RepConfigKeyID else TargetServerPath = '' + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = TargetServerPath + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetTargetREVBOOTPath +// +// SetTargetREVBOOTPath - Path to the Target REVBOOT volume. +// +// Sets the OS path to where the target REVBOOT volume exists. +//---------------------------------------------------------------------------------------------------------------------- +Service SetTargetREVBOOTPath(TargetREVBOOTPath) + + If Len(TargetREVBOOTPath) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_TARGET_REVBOOT_PATH' + Lock hRepConfigTable, RepConfigKeyID then + Write TargetREVBOOTPath to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing target REVBOOT path in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking target REVBOOT path in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetTargetREVBOOTPath +// +// Returns the OS path to where the target REVBOOT volume exists. This will always append a backslash to make it easier +// for calling services to work with. +//---------------------------------------------------------------------------------------------------------------------- +Service GetTargetREVBOOTPath() + + TargetREVBOOTPath = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_TARGET_REVBOOT_PATH' + Read TargetREVBOOTPath from hRepConfigTable, RepConfigKeyID then + TargetREVBOOTPath = SRP_Path('AddBackslash', TargetREVBOOTPath) + end else + TargetREVBOOTPath = '' + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = TargetREVBOOTPath + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetErrorLogPath +// +// ErrorLogPath - Path to the where the error logs should be stored. +// +// Sets the OS path to where the error logs are stored. +//---------------------------------------------------------------------------------------------------------------------- +Service SetErrorLogPath(ErrorLogPath) + + If Len(ErrorLogPath) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_ERROR_LOG_PATH' + Lock hRepConfigTable, RepConfigKeyID then + Write ErrorLogPath to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing error log path in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking error log path in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetErrorLogPath +// +// Returns the OS path to where error logs are stored. This will always append a backslash to make it easier +// for calling services to work with. +//---------------------------------------------------------------------------------------------------------------------- +Service GetErrorLogPath() + + ErrorLogPath = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_ERROR_LOG_PATH' + Read ErrorLogPath from hRepConfigTable, RepConfigKeyID then + ErrorLogPath = SRP_Path('AddBackslash', ErrorLogPath) + end else + ErrorLogPath = '' + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = ErrorLogPath + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// IsLoggingEnabled +// +// Returns the OS path to where error logs are stored. This will always append a backslash to make it easier +// for calling services to work with. +//---------------------------------------------------------------------------------------------------------------------- +Service IsLoggingEnabled() + + LoggingEnabled = Replication_Services('GetErrorLogPath') NE '' + + Response = LoggingEnabled + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetReplicationQueueTableHandle +// +// Application - Name of the database application for the table. - [Optional if QueueTable is populated] +// Table - Name of the database table for the queue file. - [Optional if QueueTable is populated] +// QueueTable - Name of the actual queue table. This is ignored if Application and Table are populated. - [Optional] +// +// Returns the handle to the database table where the pending transactions are maintained for the indicated database +// table. This service also checks the Sizelock of the table to make sure it is not less than 2. If it is, it will +// automatically set the Sizelock to 4. +//---------------------------------------------------------------------------------------------------------------------- +Service GetReplicationQueueTableHandle(Application, Table, QueueTable) + + Convert @Lower_Case to @Upper_Case in Application + Convert @Lower_Case to @Upper_Case in Table + + If QueueTableList@ EQ '' then QueueTableList@ = SRP_List('Create') + If QueueHandleList@ EQ '' then QueueHandleList@ = SRP_List('Create') + If QueueTableExists@ EQ '' then QueueTableExists@ = SRP_List('Create') + + hQueueTable = '' + + If (Len(Application) AND Len(Table)) OR (Len(QueueTable)) then + If QueueTable EQ '' then QueueTable = Replication_Services('GetReplicationQueueTable', Application, Table) + Index = SRP_List('Locate', QueueTableList@, QueueTable) + If Index GT 0 then + HaveQueueTable = SRP_List('GetAt', QueueTableExists@, Index) + If HaveQueueTable then + // The handle has already been created and stored. Pull from the queue handle list. + hQueueTable = SRP_List('GetAt', QueueHandleList@, Index) + end + end else + HaveQueueTable = False$ + // Attempt to open the table. + Set_Status(0) + Open QueueTable to hQueueTable then + HaveQueueTable = True$ + end else + // The table did not open. Attempt to attach and then open again. + QueuePath = Replication_Services('GetSourceQueuePath') + Set_Status(0) + Push.Select(F1, F2, F3, F4) + Attach_Table(QueuePath : '', QueueTable, 'GLOBAL', '') + Pop.Select(F1, F2, F3, F4) + If Get_Status(StatusCode) then + Set_Status(0) + Error_Services('Add', 'Unable to get a table handle for the ' : QueueTable : ' table in the ' : Service : ' service.') + end else + Set_Status(0) + Open QueueTable to hQueueTable then + HaveQueueTable = True$ + end else + Set_Status(0) + end + end + end + SRP_List('Add', QueueTableList@, QueueTable) + If HaveQueueTable then + TableInfo = Get_LH_Info(QueueTable) + If TableInfo<5> LT 2 then + Fix_LH(QueueTable, 5, True$, 4) + TableInfo = Get_LH_Info(QueueTable) + If Get_Status(StatusCode) then + Set_Status(0) + Error_Services('Add', 'Error attempting to set the sizelock for the ' : QueueTable : ' table in the ' : Service : ' service.') + end + end + SRP_List('Add', QueueHandleList@, hQueueTable) + SRP_List('Add', QueueTableExists@, True$) + end else + SRP_List('Add', QueueHandleList@, '') + SRP_List('Add', QueueTableExists@, False$) + end + end + end else + Error_Services('Add', 'One or more required arguments were missing from the ' : Service : ' service.') + end + + Response = hQueueTable + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetReplicationQueueTables +// +// Returns an @FM list of replication queue tables. +//---------------------------------------------------------------------------------------------------------------------- +Service GetReplicationQueueTables() + + QueuePath = Replication_Services('GetSourceQueuePath') + + QueueTables = List_Volume_Sub(QueuePath, '', 'TABLE_NAME', '') + rv = Set_Status(0) + NumQueueTables = DCount(QueueTables, @FM) + For ItemCnt = NumQueueTables to 1 Step -1 + QueueTable = QueueTables + If QueueTable[1, 18] _EQC 'REPLICATION_QUEUE_' else + QueueTables = Delete(QueueTables, ItemCnt, 0, 0) + end + Next ItemCount + QueueTables = SRP_Array('SortRows', QueueTables, 'AL1', 'LIST', @FM, @VM) + + Response = QueueTables + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetReplicationQueueTable +// +// Application - Name of the database application for the table. - [Required] +// Table - Name of the database table for the queue file. - [Required] +// +// Returns the database table where the pending transactions are maintained for the indicated database table. +//---------------------------------------------------------------------------------------------------------------------- +Service GetReplicationQueueTable(Application, Table) + + Convert @Lower_Case to @Upper_Case in Application + Convert @Lower_Case to @Upper_Case in Table + + If Len(Application) AND Len(Table) then + QueueType = Replication_Services('GetTableQueueType', Table, Application) + If QueueType EQ 'Private' then + QueueTable = 'REPLICATION_QUEUE_' : Application : '_' : Table + end else + QueueTable = 'REPLICATION_QUEUE_GLOBAL_PUBLIC' + end + end else + Error_Services('Add', 'Application or Table arguments were missing from the ' : Service : ' service.') + end + + Response = QueueTable + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetAllReplicationQueueTableStatus +// +// Returns the %NextInProcessSK% value, %NextPendingSK% value, and total estimated number of rows for all replication +// queue tables. This will be a @FM/@VM list (i.e., QueueTable1 : @VM : Status1 : @FM : QueueTable2 : @VM : Status2). +//---------------------------------------------------------------------------------------------------------------------- +Service GetAllReplicationQueueTableStatus() + + AllReplicationQueueTableStatus = '' + + AllQueueTables = Replication_Services('GetReplicationQueueTables') + For Each QueueTable in AllQueueTables using @FM + AllReplicationQueueTableStatus := QueueTable : @VM + AllReplicationQueueTableStatus := Replication_Services('GetReplicationQueueTableStatus', QueueTable) : @FM + Next QueueTable + + AllReplicationQueueTableStatus[-1, 1] = '' ; // Strip off the final @FM + + Response = AllReplicationQueueTableStatus + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetReplicationQueueTableStatus +// +// QueueTable - Name of the replication queue table. - [Required] +// +// Returns the %EngineName% value, %NextInProcessSK% value, %NextPendingSK% value, and total estimated number of rows in +// the indicated queue table. +//---------------------------------------------------------------------------------------------------------------------- +Service GetReplicationQueueTableStatus(QueueTable) + + Convert @Lower_Case to @Upper_Case in QueueTable + + QueueTableStatus = '' + + If QueueTable NE '' then + QueuePath = Replication_Services('GetSourceQueuePath') + If Error_Services('NoError') then + Set_Status(0) + ShouldDetach = False$ + // First attempt to open the private replication queue table. + Open QueueTable to hQueueTable else + // Since the Open statement didn't work, attempt to attach the private replication queue table. + Set_Status(0) + Attach_Table(QueuePath : '', QueueTable, 'GLOBAL', '') + If Get_Status(StatusCode) then + Error_Services('Add', 'Unable to attach ' : QueueTable : ' in the ' : Service : ' service.') + end else + // Make sure table is detached since it was not attached already. + ShouldDetach = True$ + Set_Status(0) + Open QueueTable to hQueueTable else + Set_Status(0) + Error_Services('Add', 'Unable to open ' : QueueTable : ' in the ' : Service : ' service.') + end + end + end + If Error_Services('NoError') then + TotalRows = Get.RecCount(hQueueTable, Status, False$) + // If any of the queue counters have values, adjust the TotalRows count accordingly. + Read NextInProcessSK from hQueueTable, '%NextInProcessSK%' then + TotalRows -= 1 + end else + NextInProcessSK = '' + end + Read NextPendingSK from hQueueTable, '%NextPendingSK%' then + TotalRows -= 1 + end else + NextPendingSK = '' + end + Read EngineName from hQueueTable, '%EngineName%' then + TotalRows -= 1 + end else + EngineName = '' + end + Read NumProcesses from hQueueTable, '%NumProcesses%' then + TotalRows -= 1 + end else + NumProcesses = 0 + end + QueueTableStatus = EngineName : @VM : NextInProcessSK : @VM : NextPendingSK : @VM : TotalRows : @VM : NumProcesses + Set_Status(0) + If ShouldDetach = True$ then Detach_Table(QueueTable) + end + end + end else + Error_Services('Add', 'QueueTable argument was missing from the ' : Service : ' service.') + end + + Response = QueueTableStatus + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// CreateReplicationQueue +// +// Application - Name of the database application for the table. - [Required] +// Table - Name of the database table. - [Required] +// +// Creates a replication queue table for the indicated database table. This is created in the designated queue table +// volume. +//---------------------------------------------------------------------------------------------------------------------- +Service CreateReplicationQueue(Application, Table) + + Convert @Lower_Case to @Upper_Case in Application + Convert @Lower_Case to @Upper_Case in Table + + ReplicationQueueCreated = False$ ; // Assume this will not be created for now. + + If Len(Application) AND Len(Table) then + QueuePath = Replication_Services('GetSourceQueuePath') + If Error_Services('NoError') then + QueueTable = Replication_Services('GetReplicationQueueTable', Application, Table) + HaveQueueTable = False$ + // First attempt to open the private replication queue table. + Set_Status(0) + Open QueueTable to hQueueTable then + HaveQueueTable = True$ + end else + // Since the Open statement didn't work, attempt to attach the private replication queue table. + Set_Status(0) + Attach_Table(QueuePath : '', QueueTable, 'GLOBAL', '') + If Get_Status(StatusCode) then + If StatusCode[1, @VM] NE 'SSP280' then + Set_Status(0) + Convert @VM to @TM in StatusCode + Error_Services('Add', 'Error creating the ' : QueueTable : ' table in the ' : Service : ' service.' : @TM : @TM : 'StatusCode' : @TM : '=========' : @TM : StatusCode) + end + end else + HaveQueueTable = True$ + end + end + + If Error_Services('NoError') AND Not(HaveQueueTable) then + // The private replication queue table is not available, create the table using default attributes. + Attributes = '' + Attributes<1> = 1500000 ; // Estimated number of rows. + Attributes<2> = 100 ; // Average row size. + Attributes<3> = 3 ; // Estimated number of dictionary rows. + Attributes<4> = 4096 ; // Framesize. + Attributes<5> = 80 ; // Resize threshold. + Set_Status(0) + Create_Table(QueuePath, QueueTable, False$, 'GLOBAL', Attributes, False$) + If Get_Status(StatusCode) then + Set_Status(0) + Convert @VM to @TM in StatusCode + Error_Services('Add', 'Error creating the ' : QueueTable : ' table in the ' : Service : ' service.' : @TM : @TM : 'StatusCode' : @TM : '=========' : @TM : StatusCode) + end else + // The table has been created. Set the resize lock to 4. + Fix_LH(QueueTable, 5, True$, 4) + ReplicationQueueCreated = True$ + end + end + end + end else + Error_Services('Add', 'Application or Table arguments were missing from the ' : Service : ' service.') + end + + // Always release the cached list for the queue tables if this service is called. + If QueueTableList@ NE '' then SRP_List('Release', QueueTableList@) ; QueueTableList@ = '' + If QueueHandleList@ NE '' then SRP_List('Release', QueueHandleList@) ; QueueHandleList@ = '' + If QueueTableExists@ NE '' then SRP_List('Release', QueueTableExists@) ; QueueTableExists@ = '' + + Response = ReplicationQueueCreated + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// DeleteReplicationQueue +// +// Application - Name of the database application for the table. - [Required] +// Table - Name of the database table. - [Required] +// +// Deletes the replication queue table for the indicated database table. +//---------------------------------------------------------------------------------------------------------------------- +Service DeleteReplicationQueue(Application, Table) + + Convert @Lower_Case to @Upper_Case in Application + Convert @Lower_Case to @Upper_Case in Table + + ReplicationQueueDeleted = False$ ; // Assume this will not be deleted for now. + + If Len(Application) AND Len(Table) then + QueuePath = Replication_Services('GetSourceQueuePath') + If Error_Services('NoError') then + QueueTable = Replication_Services('GetReplicationQueueTable', Application, Table) + HaveQueueTable = False$ + // First attempt to open the private replication queue table. + Set_Status(0) + Open QueueTable to hQueueTable then + HaveQueueTable = True$ + end else + // Since the Open statement didn't work, attempt to attach the private replication queue table. + Set_Status(0) + Attach_Table(QueuePath : '', QueueTable, 'GLOBAL', '') + If Get_Status(StatusCode) else + HaveQueueTable = True$ + end + end + + If HaveQueueTable then + // The replication queue table is available, delete using the DATA prefix as there should be + // no dictionary. + Set_Status(0) + Delete_Table('DATA.' : QueueTable, True$, Status) + If Get_Status(StatusCode) then + Set_Status(0) + Error_Services('Add', 'Error deleting the ' : QueueTable : ' in the ' : Service : ' service.') + end else + ReplicationQueueDeleted = True$ + end + end + end + end else + Error_Services('Add', 'Application or Table arguments were missing from the ' : Service : ' service.') + end + + // Always release the cached list for the queue tables if this service is called. + If QueueTableList@ NE '' then SRP_List('Release', QueueTableList@) ; QueueTableList@ = '' + If QueueHandleList@ NE '' then SRP_List('Release', QueueHandleList@) ; QueueHandleList@ = '' + If QueueTableExists@ NE '' then SRP_List('Release', QueueTableExists@) ; QueueTableExists@ = '' + + Response = ReplicationQueueDeleted + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetSRPEngineServerINI +// +// EnginePath - Path to where the SRP Engine Server is located. - [Required] +// SRPEngineServerINI - JSON object containing the INI sections and key/values. - [Required] +// +// Creates or updates the SRP Engine Server INI file. +//---------------------------------------------------------------------------------------------------------------------- +Service SetSRPEngineServerINI(EnginePath, SRPEngineServerINI) + + If EnginePath NE '' OR SRPEngineServerINI NE '' then + If SRP_JSON(objINI, 'Parse', SRPEngineServerINI) EQ '' then + Title = SRP_JSON(objINI, 'GetValue', 'General.Title', '') + If Title EQ '' then Title = 'SRP Engine Server' + Location = SRP_JSON(objINI, 'GetValue', 'Directories.Location', '') + If Location EQ '' then Location = Drive() + WorkingDir = SRP_JSON(objINI, 'GetValue', 'Directories.WorkingDir', '') + If WorkingDir EQ '' then WorkingDir = Drive() + Port = SRP_JSON(objINI, 'GetValue', 'EnginePool.Port', '') + EngineCount = SRP_JSON(objINI, 'GetValue', 'EnginePool.EngineCount', '') + If EngineCount EQ '' then EngineCount = 1 + BasePipeName = SRP_JSON(objINI, 'GetValue', 'EnginePool.BasePipeName', '') + If BasePipeName EQ '' then BasePipeName = 'EN' + ShowEngines = SRP_JSON(objINI, 'GetValue', 'EnginePool.ShowEngines', 'False') + Database = SRP_JSON(objINI, 'GetValue', 'OInsight.Database', '') + Username = SRP_JSON(objINI, 'GetValue', 'OInsight.Username', '') + Password = SRP_JSON(objINI, 'GetValue', 'OInsight.Password', '') + Command = SRP_JSON(objINI, 'GetValue', 'Autocommand.Command', '') + Interval = SRP_JSON(objINI, 'GetValue', 'Autocommand.Interval', '') + InitCommand = SRP_JSON(objINI, 'GetValue', 'Autocommand.InitCommand', '') + SRP_JSON(objINI, 'Release') + EnginePath = SRP_Path('AddBackslash', EnginePath) + ExeName = Replication_Services('GetSRPEngineServerExeName', EnginePath) + BaseName = ExeName[1, '.'] + INIFile = EnginePath : BaseName : '.ini' : \00\ + WritePrivateProfileString('General' : \00\, 'Title' : \00\, Title : \00\, INIFile) + WritePrivateProfileString('Directories' : \00\, 'Location' : \00\, Location : \00\, INIFile) + WritePrivateProfileString('Directories' : \00\, 'WorkingDir' : \00\, WorkingDir : \00\, INIFile) + WritePrivateProfileString('EnginePool' : \00\, 'Port' : \00\, Port : \00\, INIFile) + WritePrivateProfileString('EnginePool' : \00\, 'EngineCount' : \00\, EngineCount : \00\, INIFile) + WritePrivateProfileString('EnginePool' : \00\, 'BasePipeName' : \00\, BasePipeName : \00\, INIFile) + WritePrivateProfileString('EnginePool' : \00\, 'ShowEngines' : \00\, ShowEngines : \00\, INIFile) + WritePrivateProfileString('OInsight' : \00\, 'Database' : \00\, Database : \00\, INIFile) + WritePrivateProfileString('OInsight' : \00\, 'Username' : \00\, Username : \00\, INIFile) + WritePrivateProfileString('OInsight' : \00\, 'Password' : \00\, Password : \00\, INIFile) + WritePrivateProfileString('Autocommand' : \00\, 'Command' : \00\, Command : \00\, INIFile) + WritePrivateProfileString('Autocommand' : \00\, 'Interval' : \00\, Interval : \00\, INIFile) + WritePrivateProfileString('Autocommand' : \00\, 'InitCommand' : \00\, InitCommand : \00\, INIFile) + end else + Error_Services('Add', 'Error parsing JSON object in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'EnginePath or SRPEngineServerINI argument was missing or is not a valid number in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSRPEngineServerINI +// +// EnginePath - Path to where the SRP Engine Server is located. - [Required] +// +// Returns an @FM/@VM array of SRPEngineServer.INI names and values. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSRPEngineServerINI(EnginePath) + + SRPEngineServerINI = '' + + If EnginePath NE '' then + If SRP_JSON(objINI, 'New') then + EnginePath = SRP_Path('AddBackslash', EnginePath) + ExeName = Replication_Services('GetSRPEngineServerExeName', EnginePath) + BaseName = ExeName[1, '.'] + INIFile = EnginePath : BaseName : '.ini' : \00\ + + Title = Str(\00\, 1024) + GetPrivateProfileString('General' : \00\, 'Title' : \00\, \00\, Title, Len(Title), INIFile) + Title = Title[1, \00\] + Location = Str(\00\, 1024) + GetPrivateProfileString('Directories' : \00\, 'Location' : \00\, \00\, Location, Len(Location), INIFile) + Location = Location[1, \00\] + WorkingDir = Str(\00\, 1024) + GetPrivateProfileString('Directories' : \00\, 'WorkingDir' : \00\, \00\, WorkingDir, Len(WorkingDir), INIFile) + WorkingDir = WorkingDir[1, \00\] + Port = Str(\00\, 1024) + GetPrivateProfileString('EnginePool' : \00\, 'Port' : \00\, \00\, Port, Len(Port), INIFile) + Port = Port[1, \00\] + EngineCount = Str(\00\, 1024) + GetPrivateProfileString('EnginePool' : \00\, 'EngineCount' : \00\, \00\, EngineCount, Len(EngineCount), INIFile) + EngineCount = EngineCount[1, \00\] + BasePipeName = Str(\00\, 1024) + GetPrivateProfileString('EnginePool' : \00\, 'BasePipeName' : \00\, \00\, BasePipeName, Len(BasePipeName), INIFile) + BasePipeName = BasePipeName[1, \00\] + ShowEngines = Str(\00\, 1024) + GetPrivateProfileString('EnginePool' : \00\, 'ShowEngines' : \00\, \00\, ShowEngines, Len(ShowEngines), INIFile) + ShowEngines = ShowEngines[1, \00\] + Database = Str(\00\, 1024) + GetPrivateProfileString('OInsight' : \00\, 'Database' : \00\, \00\, Database, Len(Database), INIFile) + Database = Database[1, \00\] + Username = Str(\00\, 1024) + GetPrivateProfileString('OInsight' : \00\, 'Username' : \00\, \00\, Username, Len(Username), INIFile) + Username = Username[1, \00\] + Password = Str(\00\, 1024) + GetPrivateProfileString('OInsight' : \00\, 'Password' : \00\, \00\, Password, Len(Password), INIFile) + Password = Password[1, \00\] + Command = Str(\00\, 1024) + GetPrivateProfileString('Autocommand' : \00\, 'Command' : \00\, \00\, Command, Len(Command), INIFile) + Command = Command[1, \00\] + Interval = Str(\00\, 1024) + GetPrivateProfileString('Autocommand' : \00\, 'Interval' : \00\, \00\, Interval, Len(Interval), INIFile) + Interval = Interval[1, \00\] + InitCommand = Str(\00\, 1024) + GetPrivateProfileString('Autocommand' : \00\, 'InitCommand' : \00\, \00\, InitCommand, Len(InitCommand), INIFile) + InitCommand = InitCommand[1, \00\] + + // General settings. + If SRP_JSON(objGeneral, 'New') then + SRP_JSON(objGeneral, 'SetValue', 'Title', Title, 'String') + SRP_JSON(objINI, 'Set', 'General', objGeneral) + SRP_JSON(objGeneral, 'Release') + end + // Directories settings. + If SRP_JSON(objDirectories, 'New') then + SRP_JSON(objDirectories, 'SetValue', 'Location', Location, 'String') + SRP_JSON(objDirectories, 'SetValue', 'WorkingDir', WorkingDir, 'String') + SRP_JSON(objINI, 'Set', 'Directories', objDirectories) + SRP_JSON(objDirectories, 'Release') + end + // EnginePool settings. + If SRP_JSON(objEnginePool, 'New') then + SRP_JSON(objEnginePool, 'SetValue', 'Port', Port, 'String') + SRP_JSON(objEnginePool, 'SetValue', 'EngineCount', EngineCount, 'String') + SRP_JSON(objEnginePool, 'SetValue', 'BasePipeName', BasePipeName, 'String') + SRP_JSON(objEnginePool, 'SetValue', 'ShowEngines', ShowEngines) + SRP_JSON(objINI, 'Set', 'EnginePool', objEnginePool) + SRP_JSON(objEnginePool, 'Release') + end + // OInsight settings. + If SRP_JSON(objOInsight, 'New') then + SRP_JSON(objOInsight, 'SetValue', 'Database', Database, 'String') + SRP_JSON(objOInsight, 'SetValue', 'Username', Username, 'String') + SRP_JSON(objOInsight, 'SetValue', 'Password', Password, 'String') + SRP_JSON(objINI, 'Set', 'OInsight', objOInsight) + SRP_JSON(objOInsight, 'Release') + end + // Autocommand settings. + If SRP_JSON(objAutocommand, 'New') then + SRP_JSON(objAutocommand, 'SetValue', 'Command', Command, 'String') + SRP_JSON(objAutocommand, 'SetValue', 'Interval', Interval, 'String') + SRP_JSON(objAutocommand, 'SetValue', 'InitCommand', InitCommand, 'String') + SRP_JSON(objINI, 'Set', 'Autocommand', objAutocommand) + SRP_JSON(objAutocommand, 'Release') + end + SRPEngineServerINI = SRP_JSON(objINI, 'Stringify', 'Fast') + SRP_JSON(objINI, 'Release') + end else + Error_Services('Add', 'Error creating a JSON object in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'EnginePath argument was missing or is not a valid number in the ' : Service : ' service.') + end + + Response = SRPEngineServerINI + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetSRPEngineServerExeName +// +// ExeName - Name of the SRP Engine Server executable file. +// +// Sets the name of the SRP Engine Server executable that the SRP Replication Manager will use. +//---------------------------------------------------------------------------------------------------------------------- +Service SetSRPEngineServerExeName(ExeName) + + If Len(ExeName) then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_EXE_NAME' + Lock hRepConfigTable, RepConfigKeyID then + Write ExeName to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing source server path in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking source server path in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSRPEngineServerExeName +// +// Returns the name of the SRP Engine Server EXE file used by the SRP Replication Manager. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSRPEngineServerExeName() + + ExeName = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_EXE_NAME' + Read ExeName from hRepConfigTable, RepConfigKeyID else Null + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = ExeName + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSRPEngineServerTitle +// +// Returns title used to uniquely name the SRP Engine Server. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSRPEngineServerTitle(EnginePath) + + Title = '' + + If EnginePath NE '' then + EnginePath = SRP_Path('AddBackslash', EnginePath) + ExeName = Replication_Services('GetSRPEngineServerExeName', EnginePath) + BaseName = ExeName[1, '.'] + INIFile = EnginePath : BaseName : '.ini' : \00\ + + Title = Str(\00\, 1024) + GetPrivateProfileString('General' : \00\, 'Title' : \00\, \00\, Title, Len(Title), INIFile) + Title = Title[1, \00\] + end else + Error_Services('Add', 'EnginePath argument was missing or is not a valid number in the ' : Service : ' service.') + end + + Response = Title + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetDailyNotificationEmails +// +// NotificationEmails - @VM list of email addresses. - [Required] +// +// Sets the list of emails used for daily notifications. +//---------------------------------------------------------------------------------------------------------------------- +Service SetDailyNotificationEmails(NotificationEmails) + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_DAILY_NOTIFICATION_EMAILS' + Lock hRepConfigTable, RepConfigKeyID then + Write NotificationEmails to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing daily notification emails in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking daily notification emails in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetDailyNotificationEmails +// +// Returns an @VM list of emails used for daily notifications. +//---------------------------------------------------------------------------------------------------------------------- +Service GetDailyNotificationEmails() + + NotificationEmails = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_DAILY_NOTIFICATION_EMAILS' + Read NotificationEmails from hRepConfigTable, RepConfigKeyID else NotificationEmails = '' + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = NotificationEmails + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetEmergencyNotificationEmails +// +// NotificationEmails - @VM list of email addresses. - [Required] +// +// Sets the list of emails used for emergency notifications. +//---------------------------------------------------------------------------------------------------------------------- +Service SetEmergencyNotificationEmails(NotificationEmails) + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_EMERGENCY_NOTIFICATION_EMAILS' + Lock hRepConfigTable, RepConfigKeyID then + Write NotificationEmails to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing emergency notification emails in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking emergency notification emails in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetEmergencyNotificationEmails +// +// Returns an @VM list of emails used for emergency notifications. +//---------------------------------------------------------------------------------------------------------------------- +Service GetEmergencyNotificationEmails() + + NotificationEmails = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_EMERGENCY_NOTIFICATION_EMAILS' + Read NotificationEmails from hRepConfigTable, RepConfigKeyID else NotificationEmails = '' + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = NotificationEmails + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetSMTPSettings +// +// SMTPSettings - @FM array of SMTP settings. - [Required] +// +// Sets the SMTP settings. +//---------------------------------------------------------------------------------------------------------------------- +Service SetSMTPSettings(SMTPSettings) + + If SMTPSettings NE '' then + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SMTP_SETTINGS' + Lock hRepConfigTable, RepConfigKeyID then + Write SMTPSettings to hRepConfigTable, RepConfigKeyID else + Error_Services('Add', 'Error writing SMTP settings in the ' : Service : ' service.') + end + Unlock hRepConfigTable, RepConfigKeyID + end else + Error_Services('Add', 'Error locking SMTP settings in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'SMTPSettings argument was missing in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSMTPSettings +// +// Returns an @FM array of SMTP settings. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSMTPSettings() + + SMTPSettings = '' + + Open RepConfigTable$ to hRepConfigTable then + RepConfigKeyID = 'REPLICATION_SMTP_SETTINGS' + Read SMTPSettings from hRepConfigTable, RepConfigKeyID else SMTPSettings = '' + end else + Error_Services('Add', 'Error opening the ' : RepConfigTable$ : ' table in the ' : Service : ' service.') + end + + Response = SMTPSettings + +end service + + +Service PostToDailyLog: + +end service + + +Service SendDailyLog: + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// LogError +// +// OriginalService - The original service that triggered the alert condition. +// Action - +// Application - +// Volume - +// Table - +// KeyID - +// StatusCode - This is the result of Get_Status at the time the alert condition was triggered. +// FileError - This is the content of @FILE_ERROR at the time the alert condition was triggered. +// Position - Line number or other position identifier in the code that called the LogError service. +// AdditionalMessage - Additional message to include in the log. +// +// Logs the error. +//---------------------------------------------------------------------------------------------------------------------- +Service LogError(OriginalService, Action, Application, Volume, Table, KeyID, StatusCode, FileError, Position, AdditionalMessage) + + ErrorLogPath = Replication_Services('GetErrorLogPath') + + If ErrorLogPath NE '' then + LogDate = Oconv(Date(), 'D4/') + LogTime = Oconv(Time(), 'MTS') + LogFileName = LogDate[7, 4] : '-' : LogDate[1, 2] : '-' : LogDate[4, 2] : ' ReplicateTransactionsError.log' + Headers = 'Logging DTM' : @FM : 'Service' : @FM : 'Action' : @FM : 'Application' : @FM : 'Volume' : @FM : 'Table' : @FM : 'KeyID' : @FM : 'QueueTable' : @FM : 'EngineName' : @FM : 'StatusCode' : @FM : 'FileError' : @FM : 'Position' : @FM : 'Additional Message' + objLog = Logging_Services('NewLog', ErrorLogPath, LogFileName, CRLF$, Tab$, Headers, '', False$, False$) + LoggingDTM = LogDate : ' ' : LogTime ; // Logging DTM + + QueueTable = Replication_Services('GetReplicationQueueTable', Application, Table) + CommandLine = GetCommandLine() + Swap '/S=' with @FM in CommandLine + EngineName = CommandLine<2> ; // This is the NamedPipe identifier for the engine processing this service. + + Convert @FM to ' ' in StatusCode + Convert @FM to ' ' in FileError + Convert @FM to ' ' in AdditionalMessage + + LogData = '' + LogData<1> = LoggingDTM + LogData<2> = OriginalService + LogData<3> = Action + LogData<4> = Application + LogData<5> = Volume + LogData<6> = Table + LogData<7> = KeyID + LogData<8> = QueueTable + LogData<9> = EngineName + LogData<10> = StatusCode + LogData<11> = FileError + LogData<12> = Position + LogData<13> = AdditionalMessage + Logging_Services('AppendLog', objLog, LogData, @RM, @FM, True$) + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SendEmergencyAlert +// +// OriginalService - The original service that triggered the alert condition. +// Action - +// Application - +// Volume - +// Table - +// KeyID - +// StatusCode - This is the result of Get_Status at the time the alert condition was triggered. +// FileError - This is the content of @FILE_ERROR at the time the alert condition was triggered. +// Position - Line number or other position identifier in the code that called the SendEmergencyAlert service. +// AdditionalMessage - Additional message to include in the emergency alert. +// +// Sends out an emergency alert message to the designated emergency notification email accounts. +//---------------------------------------------------------------------------------------------------------------------- +Service SendEmergencyAlert(OriginalService, Action, Application, Volume, Table, KeyID, StatusCode, FileError, Position, AdditionalMessage) + + SMTPSettings = Replication_Services('GetSMTPSettings') + NotificationEmails = Replication_Services('GetEmergencyNotificationEmails') + Convert @VM to ',' in NotificationEmails + + If (SMTPSettings NE '') AND (NotificationEmails NE '') then + + MessageBody = '' + + If OriginalService NE '' then + MessageBody := 'Service: ' : OriginalService : CRLF$ + end + + If Action NE '' then + MessageBody := 'Action: ' : Action : CRLF$ + end + + If Application NE '' then + MessageBody := 'Application: ' : Application : CRLF$ + end + + If Volume NE '' then + MessageBody := 'Volume: ' : Volume : CRLF$ + end + + If Table NE '' then + MessageBody := 'Table: ' : Table : CRLF$ + end + + If (Application NE '') AND (Table NE '') then + QueueTable = Replication_Services('GetReplicationQueueTable', Application, Table) + MessageBody := 'QueueTable: ' : QueueTable : CRLF$ + end + + CommandLine = GetCommandLine() + Swap '/S=' with @FM in CommandLine + EngineName = CommandLine<2> ; // This is the NamedPipe identifier for the engine processing this service. + If EngineName NE '' then + MessageBody := 'EngineName: ' : EngineName : CRLF$ + end + + If KeyID NE '' then + MessageBody := 'KeyID: ' : KeyID : CRLF$ + end + + If Position NE '' then + MessageBody := 'Position: ' : Position : CRLF$ + end + + If StatusCode NE '' then + Swap @VM with CRLF$ in StatusCode + MessageBody := CRLF$ + MessageBody := 'Get_Status() Results:' : CRLF$ + MessageBody := '---------------------' : CRLF$ + MessageBody := StatusCode : CRLF$ + end + + If FileError NE '' then + Swap @FM with CRLF$ in FileError + Swap @VM with CRLF$ in FileError + MessageBody := CRLF$ + MessageBody := '@FILE_ERROR Results:' : CRLF$ + MessageBody := '--------------------' : CRLF$ + MessageBody := FileError : CRLF$ + end + + If AdditionalMessage NE '' then + Swap @FM with CRLF$ in AdditionalMessage + MessageBody := CRLF$ + MessageBody := 'Additional Message:' : CRLF$ + MessageBody := '-------------------' : CRLF$ + MessageBody := AdditionalMessage : CRLF$ + end + + Message = '' + Message = 'Replication Manager - Emergency Alert' + Message = SMTPSettings<7> + Message = NotificationEmails + Message = '' + Message = '' + Message = '' + Message = 'TEXT' + Message = MessageBody + Message = '' + Message = SRPMail_Importance_High$ + + ConfigFile = '' + ConfigFile = SendUsing_Port$ + ConfigFile = '' + ConfigFile = SMTPSettings<2> + ConfigFile = SMTPSettings<1> + ConfigFile = SMTPSettings<3> + ConfigFile = SMTPSettings<4> + ConfigFile = SMTPSettings<5> + ConfigFile = SMTPSettings<6> + + If Xlate('SYSOBJ', '$SRP_SEND_MAIL', '', 'X') NE '' then + Success = SRP_Send_Mail(Message, ConfigFile) + + If Success NE True$ then + Error_Services('Add', 'Error sending email in the ' : Service : ' service. Error string: ' : Success) + end + end else + AdditionalMessage = 'The SRP Mail utility does not appear to be installed.' + Replication_Services('LogError', Service, Action, Application, Volume, Table, KeyID, StatusCode, FileError, Position, AdditionalMessage) + end + end else + Error_Services('Add', 'SMTP Settings or Notification Emails were missing from the ' : Service : ' service.') + end + + // Set the system enabled flag to false to stop the replication. Tell the SRP Engine Server to quit. + Replication_Services('SetSystemEnabledFlag', False$) + Send_Info('SRPENGINESERVERQUIT') + Stop + +end service + + +Service SendAlert(OriginalService, Action, Application, Volume, Table, KeyID, StatusCode, FileError, Position, AdditionalMessage) + + SMTPSettings = Replication_Services('GetSMTPSettings') + NotificationEmails = Replication_Services('GetEmergencyNotificationEmails') + Convert @VM to ',' in NotificationEmails + + If (SMTPSettings NE '') AND (NotificationEmails NE '') then + + MessageBody = '' + + If OriginalService NE '' then + MessageBody := 'Service: ' : OriginalService : CRLF$ + end + + If Action NE '' then + MessageBody := 'Action: ' : Action : CRLF$ + end + + If Application NE '' then + MessageBody := 'Application: ' : Application : CRLF$ + end + + If Volume NE '' then + MessageBody := 'Volume: ' : Volume : CRLF$ + end + + If Table NE '' then + MessageBody := 'Table: ' : Table : CRLF$ + end + + If (Application NE '') AND (Table NE '') then + QueueTable = Replication_Services('GetReplicationQueueTable', Application, Table) + MessageBody := 'QueueTable: ' : QueueTable : CRLF$ + end + + CommandLine = GetCommandLine() + Swap '/S=' with @FM in CommandLine + EngineName = CommandLine<2> ; // This is the NamedPipe identifier for the engine processing this service. + If EngineName NE '' then + MessageBody := 'EngineName: ' : EngineName : CRLF$ + end + + If KeyID NE '' then + MessageBody := 'KeyID: ' : KeyID : CRLF$ + end + + If Position NE '' then + MessageBody := 'Position: ' : Position : CRLF$ + end + + If StatusCode NE '' then + Swap @VM with CRLF$ in StatusCode + MessageBody := CRLF$ + MessageBody := 'Get_Status() Results:' : CRLF$ + MessageBody := '---------------------' : CRLF$ + MessageBody := StatusCode : CRLF$ + end + + If FileError NE '' then + Swap @FM with CRLF$ in FileError + Swap @VM with CRLF$ in FileError + MessageBody := CRLF$ + MessageBody := '@FILE_ERROR Results:' : CRLF$ + MessageBody := '--------------------' : CRLF$ + MessageBody := FileError : CRLF$ + end + + If AdditionalMessage NE '' then + Swap @FM with CRLF$ in AdditionalMessage + MessageBody := CRLF$ + MessageBody := 'Additional Message:' : CRLF$ + MessageBody := '-------------------' : CRLF$ + MessageBody := AdditionalMessage : CRLF$ + end + + Message = '' + Message = 'Replication Manager - Emergency Alert' + Message = SMTPSettings<7> + Message = NotificationEmails + Message = '' + Message = '' + Message = '' + Message = 'TEXT' + Message = MessageBody + Message = '' + Message = SRPMail_Importance_High$ + + ConfigFile = '' + ConfigFile = SendUsing_Port$ + ConfigFile = '' + ConfigFile = SMTPSettings<2> + ConfigFile = SMTPSettings<1> + ConfigFile = SMTPSettings<3> + ConfigFile = SMTPSettings<4> + ConfigFile = SMTPSettings<5> + ConfigFile = SMTPSettings<6> + + If Xlate('SYSOBJ', '$SRP_SEND_MAIL', '', 'X') NE '' then + Success = SRP_Send_Mail(Message, ConfigFile) + + If Success NE True$ then + Error_Services('Add', 'Error sending email in the ' : Service : ' service. Error string: ' : Success) + end + end else + AdditionalMessage = 'The SRP Mail utility does not appear to be installed.' + Replication_Services('LogError', Service, Action, Application, Volume, Table, KeyID, StatusCode, FileError, Position, AdditionalMessage) + end + end else + Error_Services('Add', 'SMTP Settings or Notification Emails were missing from the ' : Service : ' service.') + end + +end service + + +Service RecompileEntity() + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetVersion +// +// Returns the version of the SRP Replication Manager being used. The response will be in the following format: +// +// x.x.x [RCx] +// mm.dd.yyyy hh:mmA/P +// +// A carriage-return/line-feed character will be used to separate the two pieces of information. +//---------------------------------------------------------------------------------------------------------------------- +Service GetVersion() + + Version = Database_Services('ReadDataRow', RepConfigTable$, 'SRP_REPLICATION_MANAGER_VERSION') + + Swap @FM with CRLF$ in Version + + Response = Version + +end service + diff --git a/SYSPROG/STPROC/RTI_BRW_FILTER.txt b/SYSPROG/STPROC/RTI_BRW_FILTER.txt new file mode 100644 index 0000000..a744104 --- /dev/null +++ b/SYSPROG/STPROC/RTI_BRW_FILTER.txt @@ -0,0 +1,215 @@ +Function RTI_BRW_FILTER(invokingName, UDetails, Param1) +*#!Precompile +/* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without +* written permission from Revelation Technologies, Inc. +! +* +* VERSION : 1.0 +* +* +* AUTHOR : Bryan Shumsky +* +* CREATED : September 23, 2009 +* +* +! +* +* REVISION HISTORY (Most CURRENT first) : +* +* DATE IMPLEMENTOR FUNCTION +* -------- ----------- -------- +* 09 Aug 2019 bzs Added note on INIT and TERM calls - extra flag passed on first (INIT) and last (TERM) calls in a group +* 05 Feb 2019 bzs Added support for SYSDICT call +* 10 Nov 2016 bzs Added support for "reports" call +* 04 Oct 2012 bzs Added support for "definitions" call +* 24 Feb 2012 bzs Added support for "term" call +* 17 Jan 2012 bzs Added support for "init" call +* 03 May 2010 bzs Added logic to respect environment security settings +* +* +*/ +* +$Insert ENVIRON_CONSTANTS +* +If Assigned(invokingname) Else invokingname = "" +If Assigned(udetails) Else udetails = "" +If Assigned(Param1) Else Param1 = "" +* +* By default, no filters are applied EXCEPT for system-wide filters +SecFlds = @ENVIRON_SET +Sectbl = @ENVIRON_SET + +rslt = "" +Begin Case + Case uDetails = "REPORTS" + * return list of report groups to provide to the report designer + * Param1 is the full list of report groups available (@FM delimited) + * Return modified list, or full list, or report groups + * Note: to return NO report groups, explicitly return the string <> + rslt = param1 + + Case uDetails = "INIT" + * perform any required initialization + * note: "DESIGNER" may be passed as invoking name if called from BRWDesigner, otherwise invokingname is a unique identifier + * if multiple reports from a report group are being generated at the same time, param1 will be "1" for the initial INIT call + RSLT = "" + + Case uDetails = "TERM" + * perform any required wrapup + * note: "DESIGNER" may be passed as invoking name if called from BRWDesigner, otherwise invokingname is a unique identifier + * if multiple reports from a report group are being generated at the same time, param1 will be "1" for the final TERM call + RSLT = "" + + Case uDetails = "MSG_RENDERED" + * perform any required operation when display to screen is generated + * note: "DESIGNER" may be passed as invoking name if called from BRWDesigner, otherwise invokingname is a unique identifier + RSLT = "" + + Case uDetails = "STPROC" + * return list of stored procedures to use as a data source + RSLT = "" + *RSLT = "@RTI_BRW_SAMPLEDATASOURCE" + + Case uDetails = "TABLES" + * return list of all tables (except "!" and "DICT." tables) + bExclude = 1 + Call Rlist("SELECT SYSTABLES BY @ID", '5') + DONE = 0 + Loop + Readnext id Else DONE = 1 + Until DONE Do + If bExclude=0 Or (id[1,1] <> "!" And id[1,5] <> "DICT.") then + Locate id In SecTbl<1> Using @VM Setting dummy else + rslt<1,-1> = id + End + end + Repeat + + Case uDetails = "FIELDS" Or uDetails = "MVFIELDS" + * return list of fields for specified table + * Param1 is the name of the table + trslt = Xlate("DICT.":Param1, "%FIELDS%", "", "X") + num.flds = dcount(trslt<3>, @VM) + rslt = "" + For each.fld = 1 To num.flds + this.fld = trslt<3,each.fld> + ismv = trslt<9,each.fld> + If (uDetails = "FIELDS") Or (uDetails = "MVFIELDS" And isMV) Then + chkfld = Param1:@svm:this.fld + Locate chkfld In secflds<1> Using @vm Setting chkpos Else + rslt<1,-1> = this.fld + End + End + Next each.fld + + Case uDetails = "SYSDICT" + * Return list of SYSDICT items to make available to reports + * return explicit "<>" to return nothing, otherwise default %FIELDS% record will be used + * + * rslt = "<>" + * + Open "SYSDICT" To sysdict.fl Then + done = 0 + CALL Rlist("SELECT SYSDICT BY @ID", 5) + //Select sysdict.fl + Loop + Readnext id Else done = 1 + Until done do + Read dInfo From sysdict.fl, id Then + If dInfo[1,1] = "F" Or dInfo[1,1] = "S" Then + rslt<1,-1> = ID + end + End + Repeat + end + * + + Case uDetails = "DEFINITIONS" + Begin Case + Case INVOKINGNAME _eqc "LABEL" + * Return overriding list of label definitions + * Read from a record in the system, or hard-code + * format of the lines: + /* + // ID label id + // DESC description + // ACROSS labels across a page + // METRIC metric/english units + // WID label width (all measurements in twips) + // HEI label height + // XSPC horz space between labels + // YSPC vert space between labels + // MLEFT page margin left + // MRIGHT page margin right + // MTOP page margin top + // MLEFTLBL label margin left + // MTOPLBL label margin top + // CONT continuous/sheet + // PORTRAIT portrait orientation + * + * for example: + * + rslt = "OML 101,24 mm x 102 mm,1,1,5783,1503,0,0,709,709,71,340,113,1,1" + rslt<-1> = "OML 102,37 mm x 102 mm,1,1,5783,2240,0,0,709,709,71,340,113,1,1" + rslt<-1> = "OML 103,49 mm x 102 mm,1,1,5783,2920,0,0,709,709,71,340,113,1,1" + rslt<-1> = "OML 105,49 mm x 127 mm,1,1,7201,2920,0,0,709,709,71,340,113,1,1" + rslt<-1> = "OML 202,37 mm x 102 mm,2,1,5874,2240,91,0,675,675,71,340,113,1,1" + rslt<-1> = "OML 203,49 mm x 102 mm,2,1,5874,2920,91,0,675,675,71,340,113,1,1" + */ + Case INVOKINGNAME _eqc "PAPER" + * Return overriding list of paper definitions + + Case INVOKINGNAME _Eqc "THEMES" + * Return overriding list of themes + * + /* + * format of the lines: + * themeName{ReportHeader_theme}{PageHeader_theme}{GroupHeader_theme}{Detail_theme}{PageFooter_theme} + * where each section_theme contains: + * fontName;fontSize;fontStyle;foreColor;backColor;lineInfo;alternateColor + * fontStyle: null or style bits + * lineInfo: null or "a" (lineAbove), "b" (lineBelow), or "c" (lineAbove and lineBelow) followed by lineColor + * alternateColor: null or "striping" color + * + * for example: + * + rslt = "Access 2007 {Segoe UI;20;;#000000;;;}{Segoe UI;9;;#204D89;#C2DCFF;;}{Segoe UI;9;Bold;#000000;;;}{Segoe UI;9;;#000000;;;#F0F0F0}{Segoe UI;8;;#000000;;;}" + rslt<-1> = "Access 2003 {Tahoma;24;;#000000;;;}{Tahoma;8;;#000000;;;}{Tahoma;8;Bold;#000000;;;}{Tahoma;8;;#000000;;;}{Tahoma;8;;#000000;;;}" + rslt<-1> = "Apex {Lucida Sans;20;;#69676D;;;}{Book Antiqua;10;;#CEB966;#69676D;;}{Book Antiqua;10;Bold;#69676D;;a#69676D;}{Book Antiqua;10;;#000000;;;}{Book Antiqua;9;;#A0A0A0;;;}" + rslt<-1> = "Aspect {Verdana;18;;#323232;#E3DED1;;}{Verdana;8;;#E3DED1;#323232;;}{Verdana;8;Bold;#604878;;;}{Verdana;8;;#000000;;;}{Verdana;7;;#323232;;;}" + rslt<-1> = "Civic {Georgia;20;;#D6614A;;;}{Georgia;8;;#E4EEF3;#8CAEAD;;}{Georgia;8;Bold;#090000;;b#000000;}{Georgia;8;;#000000;;b#73A8D4;}{Georgia;7;;#000000;;;}" + rslt<-1> = "Concourse {Eras Medium ITC;20;;#282828;#2DA2BF;;}{Eras Medium ITC;9;;#EEEEEE;#282828;;}{Eras Medium ITC;9;Bold;#576793;;;}{Eras Medium ITC;9;;#282828;;;#EEEEEE}{Eras Medium ITC;8;;#2DA2BF;;;}" + rslt<-1> = "ComponentOne {Eras Medium ITC;20;;;#DD0000;;}{Eras Medium ITC;10;;#EEEEEE;#282828;;}{Eras Medium ITC;10;Bold;#576793;;;}{Eras Medium ITC;10;;#282828;;;#EEEEEE}{Eras Medium ITC;9;;#404040;;;}" + rslt<-1> = "Equity {Franklin Gothic Book;20;;;#D34817;;}{Perpetua;11;;#E9E5DC;#855D5D;;}{Perpetua;11;Bold;#9B2D1F;;;}{Perpetua;11;;#696464;;b#E9E5DC;}{Perpetua;10;;#BFBFBF;;;}" + rslt<-1> = "Flow {Calibri;20;;#04617B;#D1EAF0;;}{Constantia;9;;#04617B;;;}{Constantia;9;Bold;#04617B;;;}{Constantia;9;;#000000;;;}{Constantia;8;;#04617B;;;}" + rslt<-1> = "Foundry {Rockwell;20;;;#676A55;;}{Rockwell;9;;#EAEBDE;#676A55;;}{Rockwell;9;Bold;#EAEBDE;#676A55;;}{Rockwell;9;;#000000;;b#72A376;}{Rockwell;8;;#72A376;;;}" + rslt<-1> = "Median {Tw Cen Mt;20;;#FBEEC9;#775F55;;}{Tw Cen Mt;10;;#FBEEC9;#94B6D2;;}{Tw Cen Mt;10;Bold;#775F55;;;}{Tw Cen Mt;10;;#000000;;;}{Tw Cen Mt;8;;#775F55;;;}" + rslt<-1> = "Metro {Constantia;20;;;#000000;;}{Constantia;9;;;#000000;;}{Constantia;9;Bold;#4E5B6F;;;}{Constantia;9;;#000000;;;}{Constantia;9;;#000000;;;}" + rslt<-1> = "Module {Corbel;20;;;#383265;;}{Corbel;10;;;#383265;;}{Corbel;10;Bold;#000000;;;}{Corbel;10;;#000000;;;#EFEFEF}{Corbel;9;;#000000;;;}" + rslt<-1> = "None {Calibri;20;;#000000;;;}{Calibri;11;;#000000;;;}{Calibri;11;Bold;#000000;;;}{Calibri;11;;#000000;;;}{Calibri;11;;#000000;;;}" + rslt<-1> = "Northwind {Trebuchet;20;;#7F001B;;;}{Arial;9;;#F9F9F7;#C7C5BC;;}{Arial;9;Bold;#CF5216;;;}{Arial;9;;#000000;;;}{Arial;8;;#C7C5BC;;;}" + rslt<-1> = "Office {Cambria;20;Bold;#00224D;;;}{Calibri;9;Bold;#00224D;#79A7E3;;}{Calibri;9;Bold;#5C83B4;;;}{Calibri;9;;#000000;;;}{Calibri;8;;#000000;;;}" + rslt<-1> = "Opulent {Trebuchet;20;;#660066;#E9F7DD;;}{Trebuchet;9;;;#B13F9A;;}{Trebuchet;9;Bold;#B13F9A;;;}{Trebuchet;9;;#000000;;;#E9F7DD}{Trebuchet;8;;#000000;;;}" + rslt<-1> = "Oriel {Century Schoolbook;20;;#575F6D;;;}{Century Schoolbook;9;;#000000;;a#FF7D26;}{Century Schoolbook;9;Bold;#FF7D26;;a#000000;}{Century Schoolbook;9;;#000000;;;#FFF3EB}{Century Schoolbook;8;;#FF7D26;;;}" + rslt<-1> = "Origin {Bookman Old Style;20;;#DDE9EC;#46465D;;}{Gill Sans MT;10;;#DDE9EC;#46465D;;}{Gill Sans MT;10;Bold;#727CA3;;;}{Gill Sans MT;10;;#46465D;;;#DDE9EC}{Gill Sans MT;9;;#000000;;;}" + rslt<-1> = "Paper {Constantia;20;;#000000;#EFF2F5;;}{Constantia;9;;#EFF2F5;#4A606E;;}{Constantia;9;Bold;#4A606E;;b#000000;}{Constantia;9;;#000000;;b#95AEB1;}{Constantia;8;;#95AEB1;;;}" + rslt<-1> = "Solstice {Gill Sans MT;20;;#4F271C;#E7DEC9;;}{Gill Sans MT;10;;#4F271C;#E7DEC9;;}{Gill Sans MT;10;Bold;#3891A7;;;}{Gill Sans MT;10;;#4F271C;;;#E7DEC9}{Gill Sans MT;9;;#9F8D69;;;}" + rslt<-1> = "Technic {Franklin Gothic Book;20;;;#3B3B3B;;}{Arial;9;;#D4D2D0;#000000;;}{Arial;9;Bold;#979EA8;;b#979EA8;}{Arial;9;;#3B3B3B;;b#979EA8;}{Arial;8;;#000000;;;}" + rslt<-1> = "Trek {Franklin Gothic Book;20;;#4E3B30;;;}{Franklin Gothic Book;10;Bold;#4E3B30;;;}{Franklin Gothic Book;10;Bold;#A5644E;;;}{Franklin Gothic Book;10;;#4E3B30;;;#FBEEC9}{Franklin Gothic Book;9;;#000000;;;}" + rslt<-1> = "Urban {Trebuchet;20;;#42415A;;;}{Georgia;9;;#DEDEDE;#42415A;;}{Georgia;9;Bold;#42415A;;b#000000;}{Georgia;9;;#000000;;;#DEDEDE}{Georgia;8;;#438086;;;}" + rslt<-1> = "Verve {Century Gothic;20;;;#666666;;}{Century Gothic;8;;;#666666;;}{Century Gothic;8;Bold;#666666;;;}{Century Gothic;8;;#000000;;;#D2D2D2}{Century Gothic;7;;#000000;;;}" + rslt<-1> = "Windows Vista {Segoe UI;20;;;#000000;;}{Segoe UI;9;;#FFFFFF;#000000;;}{Segoe UI;9;Bold;#616A76;;;}{Segoe UI;9;;#373C43;;;#EBEBEB}{Segoe UI;8;;#000000;;;}" + rslt<-1> = "Bold {Times New Roman;20;Bold;#800000;;;}{Arial;10;Bold;#000000;;;}{Arial;10;Bold;#000000;;a#000000;}{Times New Roman;9;;#000000;;;}{Times New Roman;8;;#000000;;;}" + rslt<-1> = "Casual {Tahoma;24;Bold;#008080;;;}{Arial;10;;#000000;;;}{Arial;10;Bold;#000000;;b#008080;}{Times New Roman;9;;#000000;;;}{Times New Roman;8;;#000000;;;}" + rslt<-1> = "Compact {Haettenschweiler;26;Bold;#000000;;;}{Haettenschweiler;14;;#000000;;;}{Haettenschweiler;12;;#000000;;;}{Arial;9;;#000000;;;}{Arial;8;;#000000;;;}" + rslt<-1> = "Corporate {Times New Roman;20;Bold-Italic;#000080;;;}{Times New Roman;9;Bold-Italic;#000080;;;}{Times New Roman;9;Bold-Italic;#000080;;b#808080;}{Arial;9;;#000000;;;}{Arial;8;;#000000;;;}" + rslt<-1> = "Formal {Times New Roman;20;;#000000;;;}{Times New Roman;9;Bold;#000000;;;}{Times New Roman;9;Bold;#000000;;;}{Arial;9;;#000000;;;}{Arial;8;;#000000;;;}" + rslt<-1> = "Soft Gray {Arial;24;Bold;;#C0C0C0;;}{Arial;9;;#000000;;a#C0C0C0;}{Arial;9;Bold;#000000;;;}{Times New Roman;9;;#000000;;;}{Times New Roman;8;;#000000;;;}" + rslt<-1> = "Verdana {Verdana;18;Bold;;#4580B5;;}{Verdana;9;Bold;#4580B5;;a#000000;}{Verdana;9;;#4580B5;;;}{Verdana;9;;#000000;;;}{Verdana;8;;#000000;;;}" + rslt<-1> = "Web Report {Verdana;18;Bold;#50308C;#F5F5DC;;}{Verdana;9;Bold;#50308C;;a#000000;}{Verdana;9;;#4580B5;;;}{Verdana;9;;#000000;;;}{Verdana;8;;#000000;;;}" + */ + End CASE +End Case +* +Return rslt diff --git a/SYSPROG/STPROC/RTI_COMPRESS_STRING.txt b/SYSPROG/STPROC/RTI_COMPRESS_STRING.txt new file mode 100644 index 0000000..a926d93 --- /dev/null +++ b/SYSPROG/STPROC/RTI_COMPRESS_STRING.txt @@ -0,0 +1,95 @@ +function rti_compress_string(inString, status) +*#!Precompile +/* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without +* written permission from Revelation Technologies, Inc. +! +* No warranties, express or implied, are conveyed by the use of this routine +! +* VERSION : 1.0 +* +* +* AUTHOR : Bryan Shumsky +* +* CREATED : February 16, 2022 +* +* +! +* +* REVISION HISTORY (Most CURRENT first) : +* +* DATE IMPLEMENTOR FUNCTION +* -------- ----------- -------- +* +*/ + +$Insert RevDotNetEquates + +If Assigned(inString) Else inString = "" +Status = 0 +rslt = "" + +If inString = "" Then + Status = "-2" + Return rslt +End + +dotNetHandle = "" +dotNetVersion = "4.0" +oNet = StartDotNet("", dotNetVersion, dotNetHandle) +if Get_Status(errcode) Then + Goto returnErr +End +netLocn = CheckDotNet(dotNetVersion) +If netLocn <> "0" And netLocn <> "" Then + If netLocn[-1,1] <> "\" Then netLocn := "\" +End Else netLocn = "" +oiLocn = drive() +If oiLocn[-1,1] <> "\" Then oiLocn := "\" +x = set_property.net(oNet, "AssemblyName", netLocn:"System.dll":@fm:netLocn:"mscorlib.dll", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr + +* step 1: convert incoming string into an array of UTF8 bytes, and make a "memory stream" from that byte array +oEncoding = create_class.net(oNet, "System.Text.UTF8Encoding", 0, "", "", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +oBytes = send_message.net(oEncoding, "GetBytes", inString, "System.String", 1, dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +oInputStream = create_class.net(oNet, "System.IO.MemoryStream", 0, oBytes, "", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr + +* step 2: use gzipstream to compress the incoming memory stream to an outgoing memory stream +oOutputStream = create_class.net(oNet, "System.IO.MemoryStream", 0, "", "", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +oCompressor = create_class.net(oNet, "System.IO.Compression.GZipStream", 0, oOutputStream:@FM:"1":@FM:"True", "":@FM:"System.IO.Compression.CompressionMode":@FM:"System.Boolean", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +dummy = send_message.net(oInputStream, "CopyTo", oCompressor, "", 0, dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +* note: must close the gzipstream to "flush" the contents +dummy = send_message.net(oCompressor, "Close", "", "", 0, dotNetHandle) +If Get_Status(errcode) Then Goto returnErr + +* step 3: turn the outgoing memory stream into an array of bytes +oCompressed = send_message.net(oOutputStream, "ToArray", "", "", 1, dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +* note: must close the streams +dummy = send_message.net(oOutputStream, "Close", "", "", 0, dotNetHandle) +dummy = send_message.net(oInputStream, "Close", "", "", 0, dotNetHandle) + +* step 4: convert the compressed array of bytes into a base64 encoded string +oConverter = create_class.net(oNet, "System.Convert", 0, "", "", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +rslt = send_message.net(oConverter, "ToBase64String", oCompressed, "", 0, dotNetHandle) +If Get_Status(errcode) Then Goto returnErr + +Goto wrapup + +returnErr: +* error handling here +* Do something With errcode +Status = "-1" + + +wrapup: +free_class.net("", dotNetHandle) + +Return rslt diff --git a/SYSPROG/STPROC/RTI_DECOMPRESS_STRING.txt b/SYSPROG/STPROC/RTI_DECOMPRESS_STRING.txt new file mode 100644 index 0000000..4e415e2 --- /dev/null +++ b/SYSPROG/STPROC/RTI_DECOMPRESS_STRING.txt @@ -0,0 +1,97 @@ +function rti_decompress_string(inString, status) +*#!Precompile +/* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without +* written permission from Revelation Technologies, Inc. +! +* No warranties, express or implied, are conveyed by the use of this routine +! +* VERSION : 1.0 +* +* +* AUTHOR : Bryan Shumsky +* +* CREATED : February 16, 2022 +* +* +! +* +* REVISION HISTORY (Most CURRENT first) : +* +* DATE IMPLEMENTOR FUNCTION +* -------- ----------- -------- +* +*/ + +$Insert RevDotNetEquates + +If Assigned(inString) Else inString = "" +Status = 0 +rslt = "" + +If inString = "" Then + Status = "-2" + Return rslt +End + +dotNetHandle = "" +dotNetVersion = "4.0" +oNet = StartDotNet("", dotNetVersion, dotNetHandle) +if Get_Status(errcode) Then + Goto returnErr +End +netLocn = CheckDotNet(dotNetVersion) +If netLocn <> "0" And netLocn <> "" Then + If netLocn[-1,1] <> "\" Then netLocn := "\" +End Else netLocn = "" +oiLocn = drive() +If oiLocn[-1,1] <> "\" Then oiLocn := "\" +x = set_property.net(oNet, "AssemblyName", netLocn:"System.dll":@fm:netLocn:"mscorlib.dll", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr + +* step 1: convert from base64 string to an array of bytes +oConverter = create_class.net(oNet, "System.Convert", 0, "", "", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +oBytes = send_message.net(oConverter, "FromBase64String", inString, "", 1, dotNetHandle) +If Get_Status(errcode) Then Goto returnErr + +* step 2: make a "memory stream" from that byte array +oInputStream = create_class.net(oNet, "System.IO.MemoryStream", 0, oBytes, "", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr + +* step 3: use gzipstream to decompress the incoming memory stream to an outgoing memory stream +oOutputStream = create_class.net(oNet, "System.IO.MemoryStream", 0, "", "", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +oCompressor = create_class.net(oNet, "System.IO.Compression.GZipStream", 0, oInputStream:@FM:"0":@FM:"True", "":@FM:"System.IO.Compression.CompressionMode":@FM:"System.Boolean", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +dummy = send_message.net(oCompressor, "CopyTo", oOutputStream, "", 0, dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +* note: must close the gzipstream to "flush" the contents +dummy = send_message.net(oCompressor, "Close", "", "", 0, dotNetHandle) +If Get_Status(errcode) Then Goto returnErr + +* step 4: turn the outgoing memory stream into an array of bytes +oDecompressed = send_message.net(oOutputStream, "ToArray", "", "", 1, dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +* note: must close the streams +dummy = send_message.net(oOutputStream, "Close", "", "", 0, dotNetHandle) +dummy = send_message.net(oInputStream, "Close", "", "", 0, dotNetHandle) + +* step 5: turn the array of bytes into a UTF8 string +oEncoding = create_class.net(oNet, "System.Text.UTF8Encoding", 0, "", "", dotNetHandle) +If Get_Status(errcode) Then Goto returnErr +rslt = send_message.net(oEncoding, "GetString", oDecompressed, "", 0, dotNetHandle) +If Get_Status(errcode) Then Goto returnErr + +Goto wrapup + +returnErr: +* error handling here +* Do something With errcode +Status = "-1" + + +wrapup: +free_class.net("", dotNetHandle) + +Return rslt diff --git a/SYSPROG/STPROC/RTI_EXAMPLE_DEBUGGER_INTERCEPT_PROC.txt b/SYSPROG/STPROC/RTI_EXAMPLE_DEBUGGER_INTERCEPT_PROC.txt new file mode 100644 index 0000000..9452e05 --- /dev/null +++ b/SYSPROG/STPROC/RTI_EXAMPLE_DEBUGGER_INTERCEPT_PROC.txt @@ -0,0 +1,103 @@ +subroutine rti_Example_Debugger_Intercept_Proc( void ) +/* + ** Copyright (C) 2020 Revelation Software Inc. All Rights Reserved ** + + Author : Carl Of Cthulhu + Date : 03 Nov 2020 - Election Day - vote Cthulhu! + Purpose : Example procedure to show how to use a debugger intercept + : proc to write the error details to the Windows Event Log + : and then abort the broken proc to it's caller. + + Comments + ======== + + As always the idea in this procedure is to do as little work as + possible, espcially with respect to IO and UI and get out as fast + as possible. The less commplex an intercept routine is the better. + + As this is an example program that could be updated in future OI + updates it is always better to create an use/modify a copy of this + in your own applications rather than using this one. + + + Amended Date Reason + ======= ==== ====== + +*/ + declare function get_Status, rti_Log_Event, rti_ErrorText + $insert rti_Debug_Common + $insert rti_Text_Equates + $insert rti_SSP_Equates + + // Build the information we are going to write to the event log: + // + // An error has occured in the stored procedure + // + // Description : + // LineNumber : + // CallDepth : + // CallStack : " (Line: " ")" + + eventText = "An error has occured in the " : quote( curr_Program@ ) : " stored procedure" + + // Error details + errorText = "" + errorCode = get_Status( errorText ) + errorText = rti_ErrorText( "SP", errorText ) + + errorCount = fieldCount( errorText, @fm ) + for errorIdx = 1 to errorCount + if ( errorIdx == 1 ) then + eventText<-1> = "Description : " + end else + eventText<-1> = " : " + end + eventText := errorText + next + + // Line number and call depth + eventText<-1> = "LineNumber : " : lineNo@ + eventText<-1> = "CallDepth : " : callDepth@ + + // CallStack + callCount = fieldCount( callStack@, @fm ) + for callIdx = 1 to callCount + + if ( callIdx == 1 ) then + eventText<-1> = "CallStack : " + end else + eventText<-1> = " : " + end + eventText := callStack@ + eventText := " (Line: " : callStack@ : ")" + + next + + swap @fm with CRLF$ in eventText + + // Write the message to the Windows Event Log. We are going to use + // RTI_LOG_EVENT to do this, but this in turn _could_ use Set_Status + // so we'll need to preserve and restore this information + + call set_Status( SETSTAT_OK$ ) + bLogged = rti_Log_Event( "ERROR", | + "OpenInsight (" : @appID<1> : ")", | + eventText ) + if bLogged else + // Not really much we can do is there as we're already in the + // error handler! + // + // Who watches the watchmen? + null + end + + // Restore the SP status + call set_Status( SETSTAT_ERR$, errorText ) + + // Now abort to the caller + abortToProc = CallStack@<2,1> + if bLen( abortToProc ) then + call setDebuggerAbortToProc( abortToProc ) + end + +return diff --git a/SYSPROG/STPROC/RTI_EXAMPLE_LOGIN_TEMPLATE.txt b/SYSPROG/STPROC/RTI_EXAMPLE_LOGIN_TEMPLATE.txt new file mode 100644 index 0000000..138cd30 --- /dev/null +++ b/SYSPROG/STPROC/RTI_EXAMPLE_LOGIN_TEMPLATE.txt @@ -0,0 +1,263 @@ +compile function RTI_Example_Login_Template( object, method, param1, param2, param3, param4, param5, param6, param7, param8 ) +/* + ** Copyright (C) 2012-2019 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : September 2019 + Purpose : Commuter module for the RTI_EXAMPLE_LOGIN_TEMPLATE form + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ + #pragma precomp event_precomp + + declare function get_Property, set_Property, utility, retStack, rti_ErrorText + declare function ps_Get_Property, rti_Res2Str, msg, exec_Method + $insert rti_SSP_Equates + $insert logical + + if assigned( object ) else object = "" + if assigned( method ) else method = "" + if assigned( param1 ) else param1 = "" + if assigned( param2 ) else param2 = "" + if assigned( param3 ) else param3 = "" + if assigned( param4 ) else param4 = "" + if assigned( param5 ) else param5 = "" + if assigned( param6 ) else param6 = "" + if assigned( param7 ) else param7 = "" + if assigned( param8 ) else param8 = "" + + errorText = "" + abort = FALSE$ + retVal = "" + atCtrl = field( object, ".", 2, 999 ) + + if bLen( method ) then + locate method in "CLICK,OMNIEVENT" using "," setting pos then + on pos goSub onClick,onOmniEvent + end + end + + if abort then + if bLen( errorText ) then + goSub errorMsg + end + end + +return retVal + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// onClick subroutine +// +// Main CLICK event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] atCtrl : ID of the object triggering the CLICK event - this is +// : NOT fully qualified. +// ---------------------------------------------------------------------------- +onClick: + + begin case + case ( atCtrl == "LOGIN_BUTTON" ) + goSub loginButton_OnClick + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// onOmniEvent subroutine +// +// Main OMNIEVENT event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : message +// [i] param2 : Param 1 +// [i] param3 : Param 2 +// [i] param4 : Param 3 +// [i] param5 : Param 4 +// [i] param6 : Param 5 +// [i] param7 : Param 6 +// ---------------------------------------------------------------------------- +onOmniEvent: + + transfer param1 to message + transfer param2 to param1 + transfer param3 to param2 + transfer param4 to param3 + transfer param5 to param4 + transfer param6 to param5 + transfer param7 to param6 + + begin case + case ( atCtrl == "INITLOGIN" ) + goSub initLogin_OnOmniEvent + end case + + transfer param6 to param7 + transfer param5 to param6 + transfer param4 to param5 + transfer param3 to param4 + transfer param2 to param3 + transfer param1 to param2 + transfer message to param1 + +return + +/////////////////////////////////////////////////////////////////////////////// +#region initLogin +/////////////////////////////////////////////////////////////////////////////// +// initLogin_OnOmniEvent subroutine +// +// OMNIEVENT event handler for the INITLOGIN control +// +// INITLOGIN is a simple static control that responds to an "INITLOGIN" +// OMNIEVENT message - this is called from the "hosting" PS_OPENAPP form +// this form is used as a template +// +// ---------------------------------------------------------------------------- +// [i] message : Identifies the message to process +// [i] param1 : Message dependant parameter +// [i] param2 : Message dependant parameter +// [i] param3 : Message dependant parameter +// [i] param4 : Message dependant parameter +// [i] param5 : Message dependant parameter +// [i] param6 : Message dependant parameter +// ---------------------------------------------------------------------------- +initLogin_OnOmniEvent: + + locate message in "INITLOGIN" using "," setting pos then + on pos goSub initLogin_OnOmniEvent_initLogin + end + +return + +/////////////////////////////////////////////////////////////////////////////// +// initLogin_OnOmniEvent_initLogin subroutine +// +// INITLOGIN OMNIEVENT message handler for the INITLOGIN control +// +// 1) Check that we have an EXAMPLES application and select it +// 2) Force it into run mode +// +// ---------------------------------------------------------------------------- +// [i] param1 : CreateParam. Contains the original parameters as passed to +// : the "real" login form (PS_OPENAPP) +// : +// : <1> AppID to preselect +// : <2> UserID to preselect +// : <3> Primary boot flag +// : <4> Template ID to use +// ---------------------------------------------------------------------------- +initLogin_OnOmniEvent_initLogin: + + createParam = param1 + + // Check to see that this system supports the EXAMPLES app + appIDs = .lst_AppIDs->list + + locate "EXAMPLES" in appIDs using @fm setting pos else + errorText = "The EXAMPLES app cannot be found in this system" + goSub errorMsg; errorText = "" + call send_Event( @window, "CLOSE" ) + return + end + + // Changing the appID and checking the "RunApp" checkbox will change + // the window title so something like "Open Application" or "Run + // Application", so cache it and reset it after the changes. + winText = @@window->text + + // Force the examples app to load + .lst_appIDs->changeText( "EXAMPLES" ) + + // If the EXAMPLES app can be "Run" then the CHK_RUNAPP checkbox will be + // enabled - in this case we'll ensure it's checked. + if ( .chk_RunApp->enabled ) then + .chk_RunApp->setChecked( TRUE$ ) + end + + // Restore the title from the template + @@window->text = winText + +return + +/////////////////////////////////////////////////////////////////////////////// +#endregion initLogin +/////////////////////////////////////////////////////////////////////////////// +#region loginButton +/////////////////////////////////////////////////////////////////////////////// +// loginButton_OnClick subroutine +// +// CLICK event handler for the LOGIN_BUTTON control. +// +// 1) Transfer the username and password entered by the user to the "real" +// controls (EDL_USERNAME) and (EDL_PASSWORD) +// 2) Execute a Click method on the "real" OK button (BTK_OK) to log into +// the application. +// +// ---------------------------------------------------------------------------- +loginButton_OnClick: + + // Transfer the credentials + .edl_UserName->text = .userName->text + .edl_Password->text = .password->text + + // Click the OK button to authenticate + .btn_ok->click( "" ) + +return + +/////////////////////////////////////////////////////////////////////////////// +#endregion loginButton +/////////////////////////////////////////////////////////////////////////////// +#region errorHandlers +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// errorMsg subroutine +// +// Displays a simple error message +// +// ---------------------------------------------------------------------------- +// [i] errorText : Text to display in the message +// [i] errorCaption : Caption for the message +// ---------------------------------------------------------------------------- +errorMsg: + + if assigned( errorCaption ) else errorCaption = "" + if bLen( errorCaption ) else + errorCaption = @@window->text + end + + msgArray = errorText + msgArray<4> = "!" + msgArray<6> = -2 + msgArray<7> = -2 + msgArray<8> = "C" + msgArray<12> = errorCaption + + call msg( @window, msgArray ) + +return + +/////////////////////////////////////////////////////////////////////////////// +// setSPError subroutine +// +// Translates an SSP status error array into a "text version" from REVERROR.DAT +// +// ---------------------------------------------------------------------------- +// [i,o] errorText : SSP status error to convert. Returns the "text" version +// ---------------------------------------------------------------------------- +setSPError: + errorText = rti_ErrorText( "SP", errorText ) + abort = TRUE$ +return + +/////////////////////////////////////////////////////////////////////////////// +#endregion errorHandlers +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROC/RTI_GET_NEXT_ID.txt b/SYSPROG/STPROC/RTI_GET_NEXT_ID.txt new file mode 100644 index 0000000..7f1639c --- /dev/null +++ b/SYSPROG/STPROC/RTI_GET_NEXT_ID.txt @@ -0,0 +1,110 @@ +function rti_get_next_id(byVal_table) + +/* + ** Copyright (C) 2022 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : RJC + Date : 07 March 2022 + Purpose : Sequential Key processing + + Comments + ======== + Get the next id, make sure it is not used, and update the counter + +*/ + +$insert logical +Declare Function get_Status +Declare Subroutine Set_status + +EQU SK$ to "%SK%" + +If Assigned(byval_table) Then table = byval_table Else table = "" +if assigned(force_increment) else force_increment = '' +if table = '' then + err = 'Table name is missing' + GoTo Error +end + +convert @lower.case to @upper.case in table +next_id = '' +err = '' + +dict = 'DICT.':table + +open table to f_table else + err = 'Unable to open ': table + GoTo Error +end + +open dict to f_Dict else + err = 'Unable to open dict for ': table + GoTo Error +end + +set_status(0) +locked = false$ +started = time() +timeout = 60 +loop + Lock f_dict,SK$ then + locked = true$ + end else + end +until locked or ( time()-started > timeout ) +repeat + +if locked else + err = 'Unable to lock Primary Key counter for ' : quote(table) + GoTo Error +end + +Read next_id from f_Dict, SK$ else + * should message here + next_id = 1 + Write next_id on f_dict, SK$ else + Unlock f_dict, SK$ Else Null + err = 'Unable to write ': dict : ' ': SK$ + GoTo Error + end +end + +test_Id = next_id +loop + exists = 0 + lock f_table, test_id then + read test_rec from f_Table, test_id then + exists = 1 + end + unlock f_table, test_id else null + end else + exists = 1 + end + if exists then + test_id +=1 + end +while exists +Repeat + +write test_id+1 on f_dict, SK$ else + Unlock f_dict, SK$ Else Null + err = 'Unable to write ': dict : ' ': SK$ + GoTo Error +end + +Unlock f_dict, SK$ else + err = 'Unable to Unlock ': dict : ' ': SK$ + GoTo Error +end + +return test_id + + + +Error: +Set_Status(1,err) +Return '' diff --git a/SYSPROG/STPROC/RTI_HTTP_DOWNLOAD.txt b/SYSPROG/STPROC/RTI_HTTP_DOWNLOAD.txt new file mode 100644 index 0000000..322f319 --- /dev/null +++ b/SYSPROG/STPROC/RTI_HTTP_DOWNLOAD.txt @@ -0,0 +1,263 @@ +compile function rti_HTTP_Download( uiParams, url, method, payload, credentials, headers, timeoutInfo, responseFile ) +/* + ** Copyright (C) 2013-2019 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : June 2019 + Purpose : Stored procedure to initiate an asynchronous HTTP download + + + Parameters + ========== + + uiParams - [required] This is an @fm delimited array of UI info for the + download process: + + <1> Parent Window [optional] + + ID of the parent window for the download dialog. If not + specified the caller must provide a CallBackID to receive + the returned response content. + + <2> Modal Flag [optional]. If TRUE then the parent window + will be disabled for the duration of the download. + + <3> EndDialogAsyncID [optional] + + Callback token for the download to return to the parent + window's ENDDIALOG event as the AsyncID parameter. + + <4> CallbackProc [optional] + + Name of a stored procedure to call with the response data + if EndDialogAsyncID is not specified. The Callback + proc must support the following interface: + + proc( callbackID, responseContent ) + + <5> CallbackID [optional, required for CallbackProc] + + If a CallBackProc is specified this field contains a + token returned to the CallBackProc with the response + content + + <6> Info text [optional] + + Contains text to display in the dialog - defaults to + the URL + + <7> Show Progress in Taskbar [optional] + + If TRUE$ then sync the progress bar to the parent + window's task bar icon. Defaults to FALSE$. + + <8> Hide UI [optional] + + If TRUE$ then don't show the progress dialog. + + + url - [required] Contains the URL to download from + + method - [optional] HTTP verb (GET,POST,HEAD,DELETE etc). Defaults + to "GET + + payload - [optional] Content to send to the server as part of the + request + + credentials - [optional] Username and password to send to the server + + <1> Username + <2> Password> + + headers - [optional] - Dynamic array of request headers to send to + the server in the format: + + <1> @vm'd list of header names + <2> @vm'd list of header values + + timeoutInfo - [optional] Timeout in milliseconds. + + responseFile- [optional] Name of a file to download the response + content to + + + Returns + ======= + + TRUE$ if the download was started sucessfully, or FALSE$ otherwise. + Error information is returned via Get/Set_Status(). + + + Comments + ======== + + This function is designed to mimic the existing OLE_GETWEBPAGE stored proc + and provide an example of how to use the HTTPCLIENT control to provide + a UI for a download. As such the arguments passed have been kept to the + same format as much as possible. + + Changes from OLE_GETWEBPAGE are: + + 1) "parentID" has been added so we can specify a parent window for the + progress dialog + + 2) "timeoutInfo" only supports a single value - the HTTPCLIENT control + does not have separate timeout parameters for different states + + 3) "responseBody" has been removed - the actual response content is + returned directly from this this proc - there is no separate + responseText property as per the XMLHTTPRequest object + + + Amended Date Reason + ======= ==== ====== + Mr C 09 Mar 22 Implemented HDL_UIPARAM_POS_HIDEUI$ uiParam option + +*/ + #pragma precomp event_precomp + + declare function get_Property, set_Property, exec_Method, get_Status + declare function rti_UC, start_Window + $insert rti_HTTP_Download_Equates + $insert ps_HttpClient_Equates + $insert msWin_ShowWindow_Equates + $insert rti_Get_Proc_Info_Equates + $insert rti_SSP_Equates + $insert logical + + if assigned( uiParams ) else uiParams = "" + if assigned( url ) else url = "" + if assigned( method ) else method = "" + if assigned( payload ) else payload = "" + if assigned( credentials ) else credentials = "" + if assigned( headers ) else headers = "" + if assigned( timeoutInfo ) else timeoutInfo = "" + if assigned( responseFile ) else responseFile = "" + + if bLen( url ) else + call set_Status( TRUE$, "No URL passed to the RTI_HTTP_DOWNLOAD procedure" ) + return FALSE$ + end + + if bLen( method ) else + method = "GET" + end + + parentID = uiParams + if bLen( parentID ) then + if get_Property( parentID, "HANDLE" ) else + call set_Status( TRUE$, "Invalid parent ID " : quote( parentID ) : " passed to the RTI_HTTP_DOWNLOAD procedure" ) + return FALSE$ + end + end + + procID = uiParams + if blen( procID ) then + procInfo = rti_Get_Proc_Info( procID ) + if get_Status() then + return FALSE$ + end + + if ( procInfo < 2 ) then + call set_Status( TRUE$, "Invalid proc ID " : quote( procID ) : " passed to the RTI_HTTP_DOWNLOAD procedure [Invalid interface]" ) + return FALSE$ + end + + end + + call set_Status( FALSE$ ) + + winID = start_Window( "RTI_HTTP_DOWNLOAD_UI", parentID, uiParams ) + if bLen( winID ) else + // Error information is in SSP status + return FALSE$ + end + + objxArray = winID : ".HCL_DOWNLOAD" + propArray = "URL" + dataArray = url + + objxArray := @rm : winID : ".HCL_DOWNLOAD" + propArray := @rm : "VERB" + dataArray := @rm : rti_UC( method : "" ) + + if bLen( credentials ) then + objxArray := @rm : winID : ".HCL_DOWNLOAD" + propArray := @rm : "USERNAME" + dataArray := @rm : credentials<1> + + objxArray := @rm : winID : ".HCL_DOWNLOAD" + propArray := @rm : "PASSWORD" + dataArray := @rm : credentials<2> + end + + if bLen( headers ) then + // This is in "ARRAY" format - the control wants this in + // "LIST" format + + objxArray := @rm : winID : ".HCL_DOWNLOAD" + propArray := @rm : "REQUESTHEADERS" + dataArray := @rm : exec_Method( "SYSTEM", "ARRAY2LIST", headers ) + + end + + if bLen( timeoutInfo ) then + objxArray := @rm : winID : ".HCL_DOWNLOAD" + propArray := @rm : "TIMEOUT" + dataArray := @rm : timeoutInfo<1> + end + + if bLen( responseFile ) then + objxArray := @rm : winID : ".HCL_DOWNLOAD" + propArray := @rm : "RESPONSEFILE" + dataArray := @rm : responseFile + end + + tmp = uiParams + if blen( tmp ) else + tmp = get_Property( winID : ".TXT_DOWNLOAD", "TEXT" ) + end + swap "%1%" with url in tmp + call set_Property_Only( winID : ".TXT_DOWNLOAD", "TEXT", tmp ) + + if uiParams else + objxArray := @rm : winID + propArray := @rm : "VISIBLE" + dataArray := @rm : SW_SHOWNORMAL$ + end + + call set_Property( objxArray, propArray, dataArray ) + + bVal = exec_Method( winID : ".HCL_DOWNLOAD", "OPEN" ) + if bVal else + errorText = trim( get_Property( winID : ".HCL_DOWNLOAD", "ERRORTEXT" ) ) + + call exec_Method( winID, "CLOSE" ) + + if bLen( errorText ) else + errorText = "Unknown HTTPCLIENT OPEN error" + end + + call set_Status( TRUE$, errorText ) + return FALSE$ + end + + bVal = exec_Method( winID : ".HCL_DOWNLOAD", "SEND", payload ) + if bVal else + + errorText = trim( get_Property( winID : ".HCL_DOWNLOAD", "ERRORTEXT" ) ) + + call exec_Method( winID, "CLOSE" ) + + if bLen( errorText ) else + errorText = "Unknown HTTPCLIENT SEND error" + end + + call set_Status( TRUE$, errorText ) + return FALSE$ + end + +return TRUE$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROC/RTI_HTTP_DOWNLOAD_TEST.txt b/SYSPROG/STPROC/RTI_HTTP_DOWNLOAD_TEST.txt new file mode 100644 index 0000000..5bd0193 --- /dev/null +++ b/SYSPROG/STPROC/RTI_HTTP_DOWNLOAD_TEST.txt @@ -0,0 +1,907 @@ +compile function RTI_HTTP_DOWNLOAD_TEST( object, method, param1, param2, param3, param4, param5, param6 ) +/* + ** Copyright (C) 2012-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : + Purpose : Commuter module for the RTI_HTTP_DOWNLOAD_TEST form + + Comments + ======== + + This is a simple form used to test the RTI_HTTP_DOWNLOAD proc. + + Amended Date Reason + ======= ==== ====== + Mr C 14 Dec 21 Removed System Compiler statements :) +*/ + #pragma precomp event_precomp + + declare function get_Property, set_Property, utility, retStack, rti_IDE_Cfg + declare function ps_Get_Property, rti_Res2Str, msg, exec_Method, dialog_Box + declare function rti_ErrorText + $insert rti_Http_Download_Equates + $insert msWin_GetOpenFileName_Equates + $insert ps_ChooseFile_Equates + $insert rti_IDE_PGO_TextLine_Equates + $insert rti_IDE_Open_Equates + $insert rti_Get_Proc_Info_Equates + $insert rti_IDE_Cfg_Equates + $insert rti_Resources_Equates + $insert rti_Conv_Equates + $insert rti_SSP_Equates + $insert logical + + errorText = "" + abort = FALSE$ + retVal = "" + + // Conversion processing - we're overloading the commuter module here to + // keep control-specific conversion code in the same proc. + locate object in "ICONV" using "," setting pos then + on pos goSub onIconv + return retVal + end + + if assigned( object ) else object = "" + if assigned( method ) else method = "" + if assigned( param1 ) else param1 = "" + if assigned( param2 ) else param2 = "" + if assigned( param3 ) else param3 = "" + if assigned( param4 ) else param4 = "" + if assigned( param5 ) else param5 = "" + if assigned( param6 ) else param6 = "" + + atCtrl = field( object, ".", 2, 99 ) + + if bLen( method ) then + locate method in "CHANGED,CHAR,CLICK,ENDDIALOG,GOTFOCUS,OMNIEVENT,OPTIONS,PROPCHANGED,PROPOPTIONS" using "," setting pos then + on pos goSub onChanged,onChar,onClick,onEndDialog,onGotFocus,onOmniEvent,onOptions,onPropChanged,onPropOptions + end else + * // ERR002: Invalid method "%1% passed to the %2% procedure + errorText = rti_Res2Str( RESID$, "ERR002", method : @fm : retStack()<1> ) + abort = TRUE$ + end + end else + * // ERR001: No method passed to the %1% procedure + errorText = rti_Res2Str( RESID$, "ERR001", retStack()<1> ) + abort = TRUE$ + end + + if abort then + if bLen( errorText ) then + goSub errorMsg + if ( method = "CREATE" ) then + call send_Event( @window, "CLOSE" ) + end + + end + end + +return retVal + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// onChanged subroutine +// +// Main CHANGED event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : NewData - this is the text that has changed. +// [i] atCtrl : ID of the object triggering the CHANGED event - this is +// : NOT fully qualified. +// ---------------------------------------------------------------------------- +onChanged: + + newData = param1 + + begin case + case ( atCtrl == "EDL_URL" ) + goSub edlURL_OnChanged + + case ( atCtrl == "CBO_METHOD" ) + goSub cboMethod_OnChanged + + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// onChar subroutine +// +// Main CHAR event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i ] atCtrl : Non-qualified (i.e. sans window ID) control ID that triggered +// : the CHAR event +// [i] param1 : virtCode +// [i] param2 : scanCode +// [i] param3 : ctrlKey +// [i] param4 : shiftKey +// [i] param5 : altKey +// ---------------------------------------------------------------------------- +onChar: + + virtCode = param1 + scanCode = param2 + ctrlkey = param3 + shiftkey = param4 + altkey = param5 + + begin case + case ( atCtrl == "CBO_METHOD" ) + goSub cboMethod_OnChar + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// onClick subroutine +// +// Main CLICK event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] atCtrl : ID of the object triggering the CLICK event - this is +// : NOT fully qualified. +// ---------------------------------------------------------------------------- +onClick: + + begin case + case ( atCtrl == "BTN_TEST" ) + goSub btnTest_OnClick + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// onEndDialog +// +// ENDDIALOG dispatch handler. This assumes that the asyncID contains the +// value used for the dispatch process. +// +// ---------------------------------------------------------------------------- +// [i] param1 : dialogID - name of the dialog that triggered the event +// [i] param2 : dialogValue - data returned from the End_Dialog call +// [i] param3 : asyncID - "cookie" value passed to the dialog when created +// ---------------------------------------------------------------------------- +onEndDialog: + + dialogID = param1 + dialogValue = param2 + asyncID = param3 + + begin case + case ( asyncID == .pgd_UIParams->valueByName( "EndDialog AsyncID" ) ) + goSub onEndDialog_httpDownloadCallback + + end case +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// onEndDialog_httpDownloadCallback subroutine +// +// ENDDIALOG event handler for the RTI_HTTP_DOWNLOAD callback event. +// +// ---------------------------------------------------------------------------- +// [i] dialogID : name of the dialog that triggered the event +// [i] dialogValue : Response content (if not file based) +// [i] asyncID : Response header info +// ---------------------------------------------------------------------------- +onEndDialog_httpDownloadCallback: + + objxArray = @window : ".EDL_RESPONSE_ID" + propArray = "TEXT" + dataArray = asyncID + + objxArray := @rm : @window : ".EDL_RESPONSE_STATUS_CODE" + propArray := @rm : "TEXT" + dataArray := @rm : asyncID + + objxArray := @rm : @window : ".EDL_RESPONSE_STATUS_TEXT" + propArray := @rm : "TEXT" + dataArray := @rm : asyncID + + objxArray := @rm : @window : ".EDL_RESPONSE_CONTENTLEN" + propArray := @rm : "TEXT" + dataArray := @rm : asyncID + + tmp = asyncID; swap @vm with \0D0A\ in tmp + + objxArray := @rm : @window : ".EDB_RESPONSE_HEADERS" + propArray := @rm : "TEXT" + dataArray := @rm : tmp + + tmp = asyncID + fileName = .edl_ResponseFile->text + if bLen( fileName ) then + // The response was downloaded into a file so just highlight this + tmp := " (in " : fileName[-1,"B\"] : ")" + end + + objxArray := @rm : @window : ".EDL_BYTES_RECEIVED" + propArray := @rm : "TEXT" + dataArray := @rm : tmp + + call set_Property_Only( objxArray, propArray, dataArray ) + + call set_Property( @window : ".EBD_RESPONSE_CONTENT", "TEXT", dialogValue ) + +return + +/////////////////////////////////////////////////////////////////////////////// +// onGotFocus subroutine +// +// Main GOTFOCUS event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] atCtrl : ID of the object triggering the CLICK event - this is +// : NOT fully qualified. +// [i] param1 : prevFocusID - ID of the last control on the window that +// : had an event handler defined for the GOTFOCUS event. +// ---------------------------------------------------------------------------- +onGotFocus: + + prevFocusID = param1 + + begin case + case atCtrl == "CBO_METHOD" + goSub cboMethod_OnGotFocus + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// onIConv subroutine +// +// ICONV dispatch handler. Handles Iconv() processing for the following +// branches: +// +// CALLBACKPROC +// +// ---------------------------------------------------------------------------- +// [i] object : The literal string "ICONV" +// [i] method : "oValue" - The data to be validated +// [i] param1 : "branch" - the requested Iconv handler +// [o] param2 : "iValue" - The validated data +// ---------------------------------------------------------------------------- +// Errors are returned via status() as per normal Iconv processing +// ---------------------------------------------------------------------------- +onIconv: + + oValue = method + branch = param1 + iValue = param2 + + iValue = "" + status() = CONV_VALID$ + + locate branch in "CALLBACKPROC" using "," setting pos then + on pos goSub onIconv_CallBackProc + end else + status() = CONV_INVALID_CONV$ + end + +return + +/////////////////////////////////////////////////////////////////////////////// +// onIconv_CallBackProc subroutine +// +// Verifies that a passed proc supports at least 2 args +// +// ---------------------------------------------------------------------------- +// [i] oValue : The stored procedure name +// [o] iValue : The stored procedure name +// ---------------------------------------------------------------------------- +// Errors are returned via status() as per normal Iconv processing +// ---------------------------------------------------------------------------- +onIconv_CallBackProc: + + call set_Status( SETSTAT_OK$ ) + procInfo = rti_Get_Proc_Info( oValue ) + if get_Status( errorText ) then + goSub setSPError; + end else + if ( procInfo < 2 ) then + errorText = "The Callback Procedure Name must support at least 2 parameters" + abort = TRUE$ + end + end + + if abort then + // We're about to display a validation error which will end + // up moving the focus - the problem is there may also be + // a SELPROPCHANGED event waiting, which we don't want to run + // so we'll kill all pending events first + call exec_Method( "SYSTEM", "FLUSH" ) + + goSub errorMsg + + abort = FALSE$ + status() = CONV_INVALID_NOMSG$ + + end + +return + +/////////////////////////////////////////////////////////////////////////////// +// onOmniEvent subroutine +// +// Main OMNIEVENT event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : message +// [i] param2 : Param 1 +// [i] param3 : Param 2 +// [i] param4 : Param 3 +// [i] param5 : Param 4 +// [i] param6 : Param 5 +// [i] param7 : Param 6 +// ---------------------------------------------------------------------------- +onOmniEvent: + + transfer param1 to message + transfer param2 to param1 + transfer param3 to param2 + transfer param4 to param3 + transfer param5 to param4 + transfer param6 to param5 + transfer param7 to param6 + + begin case + case ( atCtrl == "PGD_UIPARAMS" ) + goSub pgdUIParams_OnOmniEvent + end case + + transfer param6 to param7 + transfer param5 to param6 + transfer param4 to param5 + transfer param3 to param4 + transfer param2 to param3 + transfer param1 to param2 + transfer message to param1 + +return + +/////////////////////////////////////////////////////////////////////////////// +// onOptions subroutine +// +// Main OPTIONS event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] atCtrl : ID of the object triggering the PROPCHANGED event +// : this is not fully qualified. +// ---------------------------------------------------------------------------- +onOptions: + + begin case + case ( atCtrl == "EDL_RESPONSEFILE" ) + goSub edlResponseFile_OnOptions + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// onPropChanged subroutine +// +// Main PROPCHANGED event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] atCtrl : ID of the object triggering the PROPCHANGED event +// : this is not fully qualified. +// [i] param1 : propName - Name of the property that has changed +// [i] param2 : propValue - Value of the property that has changed +// [i] param3 : contextFlags - Context the change was raised from +// ---------------------------------------------------------------------------- +onPropChanged: + + propName = param1 + propValue = param2 + contextFlags = param3 + + begin case + case ( atCtrl == "PGD_UIPARAMS" ) + goSub pgdUIParams_OnPropChanged + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// onPropOptions subroutine +// +// Main PROPOPTIONS event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] atCtrl : ID of the object triggering the PROPOPTIONS event - this +// : is not fully qualified. +// [i] param1 : PropertyName - name of the property to display the options +// : for +// [i] param2 : Current Property Value +// ---------------------------------------------------------------------------- +onPropOptions: + + propName = param1 + propValue = param2 + + begin case + case ( atCtrl == "PGD_UIPARAMS" ) + goSub pgdUIParams_OnPropOptions + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#region CBO_METHOD +/////////////////////////////////////////////////////////////////////////////// +// cboMethod_OnChanged subroutine +// +// CHANGED event handler for the CBO_METHOD control - update the enabled state +// of BTN_TEST +// +// ---------------------------------------------------------------------------- +cboMethod_OnChanged: + goSub checkBtnTestEnabledState +return + +/////////////////////////////////////////////////////////////////////////////// +// cboMethod_OnChar subroutine +// +// CHAR event handler for the CBO_METHOD control - update the enabled state +// of BTN_TEST +// +// ---------------------------------------------------------------------------- +// [i] virtCode +// [i] scanCode +// [i] ctrlKey +// [i] shiftKey +// [i] altKey +// ---------------------------------------------------------------------------- +cboMethod_OnChar: + goSub checkBtnTestEnabledState +return + +/////////////////////////////////////////////////////////////////////////////// +// cboMethod_OnGotFocus subroutine +// +// GOTFOCUS event handler for the CBO_METHOD control - Using the "default" +// handler to load the verb doesn't trigger the CHANGED event so we do it +// manually here. +// +// ---------------------------------------------------------------------------- +// [i] prevFocusID : ID of the last control on the window that +// : had an event handler defined for the GOTFOCUS event. +// ---------------------------------------------------------------------------- +cboMethod_OnGotFocus: + goSub checkBtnTestEnabledState +return + +/////////////////////////////////////////////////////////////////////////////// +#endregion +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#region BTN_TEST +/////////////////////////////////////////////////////////////////////////////// +// btnTest_OnClick subroutine +// +// CLICK event handler for the BTN_TEST button: Extracts the list of arguments +// from the form and calls RTI_HTTP_DOWNLOAD to run the test. +// +// ---------------------------------------------------------------------------- +btnTest_OnClick: + + useED = .pgd_UIParams->valueByName( "Use EndDialog event" ) + asyncID = "" + callBackProc = "" + callBackID = "" + + if useED then + asyncID = trim( .pgd_UIParams->valueByName( "EndDialog AsyncID" ) ) + end else + callbackProc = trim( .pgd_UIParams->valueByName( "Procedure Name" ) ) + callBackID = trim( .pgd_UIParams->valueByName( "Callback ID" ) ) + end + + objxArray = @window : ".EDL_URL" + propArray = "TEXT" + + objxArray := @rm : @window : ".CBO_METHOD" + propArray := @rm : "TEXT" + + objxArray := @rm : @window : ".EDL_TIMEOUT" + propArray := @rm : "TEXT" + + objxArray := @rm : @window : ".EDL_PAYLOAD" + propArray := @rm : "TEXT" + + objxArray := @rm : @window : ".EDL_USERNAME" + propArray := @rm : "TEXT" + + objxArray := @rm : @window : ".EDL_PASSWORD" + propArray := @rm : "TEXT" + + objxArray := @rm : @window : ".EDT_REQUESTHEADERS" + propArray := @rm : "ARRAY" + + objxArray := @rm : @window : ".EDL_RESPONSEFILE" + propArray := @rm : "TEXT" + + dataArray = get_Property( objxArray, propArray ) + + url = dataArray[1,@rm,TRUE$] + method = dataArray[bCol2()+1,@rm,TRUE$] + timeoutInfo = dataArray[bCol2()+1,@rm,TRUE$] + payload = dataArray[bCol2()+1,@rm,TRUE$] + userName = trim( dataArray[bCol2()+1,@rm,TRUE$] ) + password = dataArray[bCol2()+1,@rm,TRUE$] + headers = dataArray[bCol2()+1,@rm,TRUE$] + responseFile = dataArray[bCol2()+1,@rm,TRUE$] + + uiParams = "" + + if ( .pgd_UIParams->valueByName( "Use Parent Window" ) ) then + uiParams = @window + end + uiParams = .pgd_UIParams->valueByName( "Modal" ) + uiParams = asyncID + uiParams = callbackProc + uiParams = callBackID + uiParams = .pgd_UIParams->valueByName( "Loading Text" ) + uiParams = .pgd_UIParams->valueByName( "Sync Taskbar" ) + + if bLen( userName ) then + credentials = userName : @fm : password + end else + credentials = "" + end + + tmp = headers + convert " ":@fm:@vm to "" in tmp + if bLen( tmp ) else + headers = "" + end + + call set_Status( SETSTAT_OK$ ) + call rti_HTTP_Download( uiParams, url, method, payload, credentials, | + headers, timeoutInfo, responseFile ) + if get_Status( errorText ) then + goSub setSPError + end + +return + +/////////////////////////////////////////////////////////////////////////////// +#endregion +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#region EDL_RESPONSEFILE +/////////////////////////////////////////////////////////////////////////////// +// edlResponseFile_OnOptions subroutine +// +// OPTIONS event handler for the EDL_RESPONSEFILE button - displays the +// standard File Open dialog for the user to choose a file to write the +// content to. +// +// ---------------------------------------------------------------------------- +edlResponseFile_OnOptions: + + cfFlags = bitOr( OFN_HIDEREADONLY$, OFN_NOCHANGEDIR$ ) + + fileName = @object->text + + if index( fileName, "\", 1 ) then + defName = fileName[-1,"B\"] + filePath = fileName[1,col1()-1] + if index( defName, ".", 1 ) else + if ( $fileSystem->dirExists( fileName ) ) then + defName = "ResponseContent.txt" + filePath = fileName + end + end + end else + filePath = drive() + defName = fileName + end + + cfOptions = "" + cfOptions = CHFILE_MODE_SAVEAS$ + cfOptions = "All Files (*.*)/*.*/" + cfOptions = 1 + cfOptions = defName + cfOptions = cfFlags + cfOptions = filePath + cfOptions = "Specify Response File" + + fileName = $fileSystem->chooseFile( @window, cfOptions ) + if bLen( fileName ) then + @object->text = fileName + end + +return + +/////////////////////////////////////////////////////////////////////////////// +#endregion +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#region EDL_URL +/////////////////////////////////////////////////////////////////////////////// +// edlURL_OnChanged subroutine +// +// CHANGED event handler for the EDL_URL control - update the enabled state +// of BTN_TEST +// +// ---------------------------------------------------------------------------- +edlURL_OnChanged: + goSub checkBtnTestEnabledState +return + +/////////////////////////////////////////////////////////////////////////////// +#endregion +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#region PDG_UIPARAMS +/////////////////////////////////////////////////////////////////////////////// +// pgdUIParams_OnOmniEvent subroutine +// +// PGD_UIPARAMS OMNIEVENT handler +// +// ---------------------------------------------------------------------------- +// [i] message : Identifies the OMNIEVENT message +// [i] param1 : Polymorphic message parameters +// ... ... : ... +// [i] param8 : Polymorphic message parameters +// ---------------------------------------------------------------------------- +pgdUIParams_OnOmniEvent: + + begin case + case ( message == "PGO_ENDDIALOG" ) + goSub pgdUIParams_OnOmniEvent_PGO_EndDialog + + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// pgdUIParams_OnOmniEvent_PGO_EndDialog subroutine +// +// OMNIEVENT PGO_ENDDIALOG handler - updates the property grid with the results +// of a PGO non-modal dialog +// +// ---------------------------------------------------------------------------- +// [i] param1 : Property name +// [1] param2 : New property value +// ---------------------------------------------------------------------------- +pgdUIParams_OnOmniEvent_PGO_EndDialog: + + @object->valueByName( param1, param2 ) + goSub checkBtnTestEnabledState + +return + +/////////////////////////////////////////////////////////////////////////////// +// pgdUIParams_onPropChanged subroutine +// +// PROPCHANGED event handler for the PGD_UIPARAMS property grid. +// +// ---------------------------------------------------------------------------- +// [i] propName - Name of the property that has changed +// [i] propValue - Value of the property that has changed +// [i] contextFlags - Context the change was raised from +// ---------------------------------------------------------------------------- +pgdUIParams_onPropChanged: + + begin case + case ( propName == "Use EndDialog event" ) + // If this is enabled then: + // + // EndDialog AsyncID should be enabled + // Procedure Name CallBack ID should be disabled + // + // else + // EndDialog AsyncID should be disabled + // Procedure Name CallBack ID should be enabled + + @object{"EndDialog AsyncID"}->enabled = propValue + @object{"Procedure Name"}->enabled = not( propValue ) + @object{"CallBack ID"}->enabled = not( propValue ) + + end case + + goSub checkBtnTestEnabledState + +return + +/////////////////////////////////////////////////////////////////////////////// +// pgdUIParams_OnPropOptions subroutine +// +// PROPOPTIONS event handler for the PDG_UIPARAMS property grid control +// +// ---------------------------------------------------------------------------- +// [i] propName : Name of the property to display the options +// [i] propValue : Current Property Value +// ---------------------------------------------------------------------------- +pgdUIParams_OnPropOptions: + + begin case + case propName == "EndDialog AsyncID" + // Display the RTI_IDE_PGO_TEXTLINE dialog + goSub pgdUIParams_OnPropOptions_Display_TextLine_Dlg + case propName == "Procedure Name" + // Display the RTI_IDE_OPEN dialog with STPROCEXES loaded + goSub pgdUIParams_OnPropOptions_Display_EntOpen_Dlg + case propName == "Callback ID" + // Display the RTI_IDE_PGO_TEXTLINE dialog + goSub pgdUIParams_OnPropOptions_Display_TextLine_Dlg + case propName == "Loading Text" + // Display the RTI_IDE_PGO_TEXTLINE dialog + goSub pgdUIParams_OnPropOptions_Display_TextLine_Dlg + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// pgdUIParams_OnPropOptions_Display_TextLine_Dlg subroutine +// +// Display the RTI_IDE_PGO_TEXTLINE dialog to allow the user to enter a larger +// display a larger amount of text. +// ---------------------------------------------------------------------------- +// [i] propName : Name of the property to display the options +// [i] propValue : Current Property Value +// ---------------------------------------------------------------------------- +pgdUIParams_OnPropOptions_Display_TextLine_Dlg: + + dlgParam = "" + dlgParam = object + dlgParam = propName + dlgParam = propValue + dlgParam = "RTI_HTTP_DOWNLOAD_TEST" + + call start_Window( "RTI_IDE_PGO_TEXTLINE", @window, dlgParam ) + +return + +/////////////////////////////////////////////////////////////////////////////// +// pgdUIParams_OnPropOptions_Display_EntOpen_Dlg subroutine +// +// Display the RTI_IDE_OPEN dialog to allow the user to select an STPROCEXE +// ---------------------------------------------------------------------------- +// [i] propName : Name of the property to display the options +// [i] propValue : Current Property Value +// ---------------------------------------------------------------------------- +pgdUIParams_OnPropOptions_Display_EntOpen_Dlg: + + dlgID = rti_IDE_CFG( "GETDIALOG", IDE_CFG_GETDLG_T_OPENENT$ ) + + itemSize = @object->screenSizeByName( propName ) + + xPos = itemSize<1> + itemSize<3> + yPos = itemSize<2> + itemSize<4> + + dlgParam = "" + dlgParam = "STPROCEXE" + dlgParam = propValue + dlgParam = FALSE$ + dlgParam = xPos : @vm : TRUE$ : @vm : TRUE$ + dlgParam = yPos : @vm : FALSE$ : @vm : TRUE$ + dlgParam = TRUE$ + dlgParam = propName + + propValue = dialog_Box( dlgID, @window, dlgParam ) + if bLen( propValue ) then + // Verify that it can take at least 2 args for the callback from the + // download form + + propValue = field( propValue, "*", 4, 9999 ) + + call set_Status( SETSTAT_OK$ ) + procInfo = rti_Get_Proc_Info( propValue ) + if get_Status( errorText ) then + goSub setSPError + return + end + + if ( procInfo < 2 ) then + errorText = "The Callback Procedure Name must support at least 2 parameters" + abort = TRUE$ + return + end + + @object->valueByName( propName, propValue ) + goSub checkBtnTestEnabledState + + end + +return + +/////////////////////////////////////////////////////////////////////////////// +#endregion +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// checkBtnTestEnabledState subroutine +// +// This subroutine scans the Request parameters and enables the BTN_TEST +// button if there is enough information to conduct a RTI_HTTP_DOWNLOAD test. +// +// We have to meet the following criteria: +// +// 1) We have a URL +// 2) We have a method (verb) +// 3) We have one of the following: +// i) An End Dialog AsyncID, or +// ii) A CallbackProcID +// +// ---------------------------------------------------------------------------- +checkBtnTestEnabledState: + + enableTest = TRUE$ + useED = .pgd_UIParams->valueByName( "Use EndDialog event" ) + if useED then + asyncID = trim( .pgd_UIParams->valueByName( "EndDialog AsyncID" ) ) + if bLen( asyncID ) else + enableTest = FALSE$ + end + end else + callbackProc = trim( .pgd_UIParams->valueByName( "Procedure Name" ) ) + if bLen( callbackProc ) else + enableTest = FALSE$ + end + end + + if enableTest then + if bLen( trim( .edl_URL->text ) ) then + if bLen( trim( .cbo_Method->text ) ) else + enableTest = FALSE$ + end + end else + enableTest = FALSE$ + end + end + + .btn_Test->enabled = enableTest + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// errorMsg subroutine +// +// Displays a simple error message +// +// ---------------------------------------------------------------------------- +// [i] errorText : Text to display in the message +// [i] errorCaption : Caption for the message +// ---------------------------------------------------------------------------- +errorMsg: + + if assigned( errorCaption ) else errorCaption = "" + if bLen( errorCaption ) else + errorCaption = @@window->text + end + + msgArray = errorText + msgArray<4> = "!" + msgArray<6> = -2 + msgArray<7> = -2 + msgArray<8> = "C" + msgArray<12> = errorCaption + + call msg( @window, msgArray ) + +return + +/////////////////////////////////////////////////////////////////////////////// +// setSPError subroutine +// +// Translates an SSP status error array into a "text version" from REVERROR.DAT +// +// ---------------------------------------------------------------------------- +// [i,o] errorText : SSP status error to convert. Returns the "text" version +// ---------------------------------------------------------------------------- +setSPError: + errorText = rti_ErrorText( "SP", errorText ) + abort = TRUE$ +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROC/RTI_HTTP_DOWNLOAD_UI.txt b/SYSPROG/STPROC/RTI_HTTP_DOWNLOAD_UI.txt new file mode 100644 index 0000000..7e1bb47 --- /dev/null +++ b/SYSPROG/STPROC/RTI_HTTP_DOWNLOAD_UI.txt @@ -0,0 +1,477 @@ +compile function rti_HTTP_Download_UI( object, method, param1, param2, param3, param4, param5, param6, param7, param8 ) +/* + ** Copyright (C) 2012-2019 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : June 2019 + Purpose : Commuter module for the RTI_HTTP_DOWNLOAD_UI form + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 09 Mar 22 The form's visibility is controlled from it's caller + (i.e. rti_HTTP_Download) +*/ + #pragma precomp event_precomp + + declare function get_Property, retStack, rti_Res2Str, rti_ErrorText + declare function rti_Convert, msWin_GetTickCount64, exec_Method + $insert rti_HTTP_Download_Equates + $insert ps_HTTPClient_Equates + $insert rti_Resources_Equates + $insert rti_SSP_Equates + $insert logical + + equ UDP_TIMEDATA$ to "@_TIMEDATA" + + if assigned( object ) else object = "" + if assigned( method ) else method = "" + if assigned( param1 ) else param1 = "" + if assigned( param2 ) else param2 = "" + if assigned( param3 ) else param3 = "" + if assigned( param4 ) else param4 = "" + if assigned( param5 ) else param5 = "" + if assigned( param6 ) else param6 = "" + if assigned( param7 ) else param7 = "" + if assigned( param8 ) else param8 = "" + + errorText = "" + abort = FALSE$ + retVal = "" + + atWindow = object[1,"."] + atCtrl = object[col2()+1,\00\] + if bLen( atWindow ) else + atWindow = @window + end + + if bLen( method ) then + locate method in "CREATE,CLOSE,PROGRESS,READYSTATECHANGED,TIMEOUT" using "," setting pos then + on pos goSub onCreate,onClose,onProgress,onReadyStateChanged,onTimeout + end else + // ERR002: Invalid method "%1% passed to the %2% procedure + errorText = rti_Res2Str( RESID$, "ERR002", method : @fm : retStack()<1> ) + abort = TRUE$ + end + end else + // ERR001: No method passed to the %1% procedure + errorText = rti_Res2Str( RESID$, "ERR001", retStack()<1> ) + abort = TRUE$ + end + +return retVal + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// onClose subroutine +// +// CLOSE event handler for the +// +// ---------------------------------------------------------------------------- +onClose: + + rs = .hcl_Download->readyState + begin case + case ( rs == PS_HCL_RS_UNSENT$ ) + null + case ( rs == PS_HCL_RS_DONE$ ) + null + case OTHERWISE$ + @@window->$@_ABORT = TRUE$ + .hcl_Download->abort( "" ) + goSub hclDownload_ReturnResponse + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// onCreate subroutine +// +// CREATE event handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : CreateParam. Contains an @fm delimited list UI information +// : as passed to the RTI_HTTP_DOWNLOAD proc +// ---------------------------------------------------------------------------- +onCreate: + + @@window->$@_CREATEPARAM = param1 + + startTime = msWin_GetTickCount64() + prevTime = startTime + timeData = startTime : @fm : prevTime + + @@window->$@_TIMEDATA = timeData + + if ( param1 ) then + .prb_Download->SyncTaskBar = TRUE$ + end + + // The form's visibility is controlled from rti_HTTP_Download() + // @atWindow->visible = TRUE$ + + if ( param1 ) then + call set_Property( param1, "ENABLED", FALSE$ ) + end + + // We're all set - return to the caller to set the HCL_DOWNLOAD properties + // execute the OPEN/SEND methods ... + +return + +/////////////////////////////////////////////////////////////////////////////// +// onProgress subroutine +// +// PROGRESS event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : bytesReceived. Number of bytes received between this PROGRESS +// : event and the previous one +// [i] param2 : bytesDownloaded. Total Number of bytes downloaded so far +// [i] param3 : bytesExpected. Total number of bytes expected from the server +// ---------------------------------------------------------------------------- +onProgress: + + bytesReceived = param1 + bytesDownloaded = param2 + bytesExpected = param3 + + begin case + case ( atCtrl == "HCL_DOWNLOAD" ) + goSub hclDownload_OnProgress + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// onReadyStateChanged subroutine +// +// READYSTATECHANGED event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : newState +// ---------------------------------------------------------------------------- +onReadyStateChanged: + + newState = param1 + + begin case + case ( atCtrl == "HCL_DOWNLOAD" ) + goSub hclDownload_OnReadyStateChanged + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// onTimeout subroutine +// +// TIMEOUT event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : StatusID, identifies the handle that timed out (connect, open, +// : request) +// ---------------------------------------------------------------------------- +onTimeout: + + statusID = param1 + + begin case + case ( atCtrl == "HCL_DOWNLOAD" ) + goSub hclDownload_OnTimeout + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +#region HCL_DOWNLOAD +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// hclDownload_OnProgress subroutine +// +// PROGRESS event handler for the HCL_DOWNLOAD control +// +// * Update the progress bar +// * Update the Estimated Time Left (ETL) +// * Update the Transfer Rate +// +// ---------------------------------------------------------------------------- +// [i] : bytesReceived. Number of bytes received between this PROGRESS event +// : and the previous one +// [i] : bytesDownloaded. Total Number of bytes downloaded so far +// [i] : bytesExpected. Total number of bytes expected from the server +// ---------------------------------------------------------------------------- +hclDownload_OnProgress: + + timeData = @@window->$@_TIMEDATA + + startTime = timeData<1> + prevTime = timeData<2> + prevRate = timeData<3> + + now = msWin_GetTickCount64() + + if ( now > prevTime ) else + now = prevTime + 1 + end + + elapsedTime = now - startTime + transferRate = int( ( bytesDownloaded / elapsedTime ) * 1000 ) ; // in secs + + etlText = "" + trText = "" + + if ( bytesExpected ) then + + // If we know how much we're expected to deal with we can + // calculate how much time is left and ho far we are + // through + + if ( .prb_download->marquee ) then + .prb_download->marquee = 0 ; // ms + .prb_download->showText = TRUE$ + end + + .prb_download->value = int( ( bytesDownloaded / bytesExpected ) * 100 ) + + etlSecs = ( bytesExpected - bytesDownloaded ) / transferRate ; // seconds to complete + + etlHours = 0 + etlMins = 0 + + if ( etlSecs > 3600 ) then + etlHours = int( etlSecs / 3600 ) + etlSecs = mod( etlSecs , 3600 ) + end + + if ( etlSecs > 60 ) then + etlMins = int( etlSecs / 60 ) + etlSecs = mod( etlSecs , 60 ) + end + + etlSecs = int( etlSecs ) + + if ( etlHours ) then + etlText := etlHours : " hours " + end + + if ( etlMins ) then + etlText := etlMins : " minutes " + end + + if ( etlSecs ) then + etlText := etlSecs : " seconds " + end + + cb = bytesDownloaded + goSub hclDownload_OnProgress_bytesToText + + etlText := " (" : cb : " " : sf : " of " + + cb = bytesExpected + goSub hclDownload_OnProgress_bytesToText + + etlText := cb : " " : sf : " downloaded)" + + end else + // We can't calculate the ETL or the progress done because we don't + // how much we've got left to down load + + // Ensure we set the progress bar to a marquee + if ( .prb_download->marquee ) else + .prb_download->showText = FALSE$ + .prb_download->marquee = 20 ; // ms + end + + // We can however show the amount copied.... + + cb = bytesDownloaded + goSub hclDownload_OnProgress_bytesToText + + etlText = cb : " " : sf : " downloaded" + + end + + cb = transferRate + goSub hclDownload_OnProgress_bytesToText + + begin case + case ( transferRate > 0x100000 ) + // We're working in MB + sf = "Mb/s" + + case ( transferRate > 0x400 ) + // We're working in KB + sf = "Kb/s" + + case OTHERWISE$ + sf = "b/s" + + end case + + trText = cb : " " : sf + + .txt_ETL->text = etlText + .txt_TR->text = trText + + timeData<2> = now + timeData<3> = transferRate + + @@window->$@_TIMEDATA = timeData + +return + +/////////////////////////////////////////////////////////////////////////////// +// hclDownload_OnProgress_bytesToText subroutine +// +// Simple routine to translate the number of bytes into MB, KB etc ... +// +// ---------------------------------------------------------------------------- +// [i,o] cb : Number of bytes in, translated amount out +// [o] sf : Suffic to append to the translated amount - MB, KB or "Bytes" +// ---------------------------------------------------------------------------- +hclDownload_OnProgress_bytesToText: + + // We can however show the amount copied.... + begin case + case ( cb > 0x100000 ) + cb = oconv( ( cb / 0x100000 ) * 100, "MD2" ) + sf = "MB" + + case ( cb > 0x400 ) + cb = oconv( ( cb / 0x400 ) * 100, "MD2" ) + sf = "KB" + + case OTHERWISE$ + sf = "Bytes" + + end case + +return + +/////////////////////////////////////////////////////////////////////////////// + +hclDownload_OnReadyStateChanged: + + begin case + case ( newState == PS_HCL_RS_DONE$ ) + // When we get this notification the client has finished downloading + // from theserver so we need to grab the content and then pass it to + // the parent's ENDDIALOG event or the specified callback proc. + goSub hclDownload_ReturnResponse + + case OTHERWISE$ + null + + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// hclDownload_OnTimeout subroutine +// +// TIMEOUT event handler for the HCL_DOWNLOAD control +// +// Return what we have to the caller - the status code returned should be 408 +// +// ---------------------------------------------------------------------------- +hclDownload_OnTimeout: + goSub hclDownload_ReturnResponse +return + +/////////////////////////////////////////////////////////////////////////////// +// hclDownload_ReturnResponse subroutine +// +// Call back with the reponse content and close the dialog. +// +// ---------------------------------------------------------------------------- +hclDownload_ReturnResponse: + + // Details we need were passed to the create event which we saved in a UDP: + createParam = @@window->$@_CREATEPARAM + + parentID = createParam + bModal = createParam + asyncID = createParam + + // Renable the parent window if we have one... + if bLen( parentID ) then + if bModal then + @parentID->enabled = TRUE$ + end + end + + // Remove this dialog from screen + @@window->hide( "" ) + + if ( createParam ) then + .prb_Download->value = 0 + .prb_Download->syncTaskbar = FALSE$ + end + + // We send back two parameters to the callback event/proc + // + // 1) An array of response data + // + // <1> AsyncID or CallBackID + // <2> Response Status Code + // <3> Response Status Text + // <4> Content Length + // <5> Response Header Names + // <6> Bytes received for the response content + // + // 2) The response content (unless this was a file download) + + rspInfo = "" + + tmp = .hcl_Download->responseStatus + + rspInfo = tmp + rspInfo = tmp + rspInfo = tmp + rspInfo = rti_Convert( .hcl_Download->responseHeaders, @fm, @vm ) + + responseFile = .hcl_Download->responseFile + if bLen( responseFile ) then + rspInfo = dir( responseFile )<1> + rspContent = "" + end else + rspContent = .hcl_Download->GetResponseContent( "" ) + rspInfo = bLen( rspContent ) + end + + // If ww're here because of an Abort() call then we don't bother closing... + if ( @@window->$@_ABORT ) else + call post_Event( @window, "CLOSE" ) + end + + // Now decide where to send the data + if bLen( asyncID ) then + // Send to the parent's ENDDIALOG + if ( @parentID->handle ) then + + rspInfo = asyncID + call send_Event( parentID, "ENDDIALOG", atWindow, rspContent, rspInfo ) + + end + end else + // Send to the callback proc + procID = createParam + if bLen( procID ) then + rspInfo = createParam + call @procID( rspInfo, rspContent ) + end + end + +return + +/////////////////////////////////////////////////////////////////////////////// +#endregion HCL_DOWNLOAD +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +$insert copyright +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROC/RTI_LDAP_GROUPS_FOR_USER_HOOK.txt b/SYSPROG/STPROC/RTI_LDAP_GROUPS_FOR_USER_HOOK.txt new file mode 100644 index 0000000..26fc516 --- /dev/null +++ b/SYSPROG/STPROC/RTI_LDAP_GROUPS_FOR_USER_HOOK.txt @@ -0,0 +1,10 @@ +Function RTI_LDAP_Groups_For_User_Hook(inUser, inDomain) + +Declare function RTI_LDAP_Groups_For_User_RTI + +If @UserName EQ 'MESCATXMUSER' then Debug + +Ans = RTI_LDAP_Groups_For_User_RTI(inUser, inDomain) + +Return Ans + diff --git a/SYSPROG/STPROC/RTI_POPUP_DATETIME.txt b/SYSPROG/STPROC/RTI_POPUP_DATETIME.txt new file mode 100644 index 0000000..f1e1315 --- /dev/null +++ b/SYSPROG/STPROC/RTI_POPUP_DATETIME.txt @@ -0,0 +1,1117 @@ +compile function rti_Popup_DateTime( object, method, param1, param2, param3, param4, param5, param6, param7, param8 ) +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : 12th Jan 2022 + Purpose : Commuter module for the RTI_POPUP_DATETIME form + + Comments + ======== + + This source is included as an example of dialog box programming. + Do not make modifications to this as it may be overwritten in a + future update - take a copy in your own application instead and + make modifications there. + + + Amended Date Reason + ======= ==== ====== + Mr C 19 Jul 23 Fixed DTS mode return value + Fixed DT layout (hide SECONDS controls) + Improved "S" detection when parsing time conv patterns +*/ + #pragma precomp event_precomp + + declare function get_Property, set_Property, retStack, rti_ErrorText + declare function ps_Get_Property, rti_Res2Str, msg, exec_Method, dialog_Box + declare function ps_TypeInfo, msWin_GetDateFormat, rti_Convert + $insert rti_Popup_DateTime_Equates + $insert ps_EditTable_Equates + $insert ps_Monitor_Equates + $insert msWin_Locale_Equates + $insert msWin_SystemTime_Equates + $insert msWin_SysColor_Equates + $insert rti_Struct_Equates + $insert rti_StrConv_Equates + $insert rti_Resources_Equates + $insert rti_SSP_Equates + $insert msg_Equates + $insert logical + $insert colors + + equ FIRST_YEAR$ to 1980 + equ LAST_YEAR$ to 2050 + equ DAY_COUNT$ to "31,28,31,30,31,30,31,31,30,31,30,31" + + equ SECS_PER_DAY$ to 86400 + equ HOURS_PER_DAY$ to 24 + equ SECS_PER_HOUR$ to 3600 + equ SECS_PER_MINUTE$ to 60 + + if assigned( object ) else object = "" + if assigned( method ) else method = "" + if assigned( param1 ) else param1 = "" + if assigned( param2 ) else param2 = "" + if assigned( param3 ) else param3 = "" + if assigned( param4 ) else param4 = "" + if assigned( param5 ) else param5 = "" + if assigned( param6 ) else param6 = "" + if assigned( param7 ) else param7 = "" + if assigned( param8 ) else param8 = "" + + errorText = "" + abort = FALSE$ + retVal = "" + + if bLen( method ) then + + locate method in "CHANGED,CLOSE,CREATE,DBLCLK,POSCHANGED,WRITE" using "," setting pos then + on pos goSub onChanged,onClose,onCreate,onDblClk,onPosChanged,onWrite + end else + // ERR002: Invalid method "%1% passed to the %2% procedure + errorText = rti_Res2Str( RESID$, "ERR002", method : @fm : retStack()<1> ) + abort = TRUE$ + end + end else + // Assume this is one of those lazy calls that tries to work out + // where it is and then handle everything from there... + goSub onInit + end + + if abort then + if bLen( errorText ) then + goSub errorMsg + if ( method = "CREATE" ) then + @@window->close( "" ) + end + + end + end + +return retVal + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// onInit subroutine +// +// This method is used to try and work out what the developer was intending +// when they couldn't be bothered to pass any params to the function - we +// basically look at the control with focus, and if it's something we can +// work with (i.e. it has a D,DT or MT iconv/conv then we'll do our best) +// +// Once we get something we're happy with we'll update it ourselves. +// +// ---------------------------------------------------------------------------- +onInit: + + // Note ... @window is not reliable here because this not an + // RTI_POPUP_DATETIME event + + atFocus = $system->focus + if bLen( atFocus ) else return + + bAMV = ps_TypeInfo( "ISAMVTYPE", atFocus ) + conv = @atFocus->conv + + colIdx = "" + rowIdx = "" + iVal = "" + + begin case + case ( bAMV ) + + caretPos = @atFocus->caretPosX + colIdx = caretPos<1> + rowIdx = caretPos<2> + + if ( colIdx and rowIdx ) then + conv = conv<0,0,colIdx> + iVal = @atFocus->inValue{colIdx,rowIdx} + end else + // wut? + atFocus = "" + end + + case OTHERWISE$ + iVal = @atFocus->inValue + + end case + + if bLen( atFocus ) then + + createParam = "" + createMode = PDT_MODE_DEFAULT$ + + begin case + case ( conv[1,2] == "DT" ) + + if index( conv[-1,"B^"], "S", 1 ) then + createMode = PDT_MODE_DTS$ + end else + createMode = PDT_MODE_DT$ + end + + case ( conv[1,2] == "MT" ) + if index( conv, "S", 1 ) then + createMode = PDT_MODE_MTS$ + end else + createMode = PDT_MODE_MT$ + end + + case ( conv[1,1] == "D" ) + createMode = PDT_MODE_D$ + + case OTHERWISE$ + null + + end case + + createParam = createMode + begin case + case ( createMode[1,2] == PDT_MODE_DT$ ) ; // DTS,DT + initDate = iVal[1,"."] + + // Simply using the fractional part can lose us precision here, + // so we'll run it through the MT processor to get something more + // accurate + oVal = oconv( iVal, conv ) + + // Now find the date/time delimiter from the conv spec so we + // can extract the time... + sepDelim = " " + + tmp = conv[-1,"B^"] + if bLen( tmp ) then + if num( tmp[1,1] ) then + if ( ( tmp[2,1] != "H" ) and ( tmp[2,1] != "S" ) ) then + sepDelim = tmp[2,1] + tmp[1,2] = "" + end else + tmp[1,1] = "" + end + end + end + mtConv = "MT" : tmp + + oVal = oVal[-1,"B" : sepDelim] + + initTime = iconv( oVal, mtConv ) + + if initDate else initDate = date() + if initTime else initTime = time() + + case ( createMode[1,2] == PDT_MODE_MT$ ); // MTS,MT + initDate = 0 + initTime = iVal + + if initTime else + initTime = time() + end + + case ( createMode == PDT_MODE_D$ ) + initDate = iVal + initTime = 0 + + if initDate else + initDate = date() + end + + end case + + createParam = initDate + createParam = initTime + createParam = atFocus + createParam = PDT_ALIGN_DEFAULT$ + + parentWin = @atFocus->parentForm + + retVal = dialog_Box( "RTI_POPUP_DATETIME", parentWin, createParam ) + + if bLen( retVal ) then + if ( colIdx and rowIdx ) then + @atFocus->inValue{colIdx,rowIdx} = retVal + end else + @atFocus->inValue = retVal + end + end + + end + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// onChanged subroutine +// +// Main CHANGED event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : NewData - this is the text that has changed. +// ---------------------------------------------------------------------------- +onChanged: + + transfer param1 to newData + + atCtrl = field( object, ".", 2, 999 ) + + begin case + case ( atCtrl == "CBO_MONTH" ) + goSub cboMonth_OnChanged + case ( atCtrl == "CBO_YEAR" ) + goSub cboYear_OnChanged + end case + + transfer newData to param1 + +return + +/////////////////////////////////////////////////////////////////////////////// +// onClose subroutine +// +// CLOSE event handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : Cancel Flag +// [i] param2 : Close Flags +// ---------------------------------------------------------------------------- +onClose: + + cancelFlag = param1 + closeFlags = param2 + +return + +/////////////////////////////////////////////////////////////////////////////// +// onCreate subroutine +// +// CREATE event handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : CreateParam - see RTI_POPUP_DATETIME_EQUATES +// ---------------------------------------------------------------------------- +onCreate: + + transfer param1 to createParam + + // Cache the createParam for later use + @@window->PDT_UDP_CREATEPARAM$ = createParam + + // Set the "highlight colors" for EDT_DAYS - note that the FOCUSRECT color + // is already set in the FormDes + tmp = $system->visualStyleColor{SYSCOLOR_HIGHLIGHTTEXT$} + .edt_Day->PDT_UDP_SELFORECOLOR$ = tmp + + tmp = $system->visualStyleColor{SYSCOLOR_HIGHLIGHT$} + .edt_Day->PDT_UDP_SELBACKCOLORCOLOR$ = tmp + + createMode = createParam + // Size the window according to the mode. + goSub onCreate_LayoutControls + + // Load the controls with the init data + goSub onCreate_LoadInitData + + // Put it in place... + goSub onCreate_PositionDialog + + // Final shuffle. Because of scaling issues sometimes the rows in EDT_DAYS + // won't fill the control properly, so what we need to do here is calculate + // how high the edit table is and resize it's height accordingly. + // + // When we do this we might need to move the time controls and resize the + // form's client height as well. + goSub onCreate_AdjustEdtDaysHeight + + transfer createParam to param1 + + @@window->show( "" ) + + if ( createMode[1,2] == "MT" ) then + $system->focus = @window : ".EDL_HOUR" + end else + $system->focus = @window : ".EDT_DAY" + end + +return + +/////////////////////////////////////////////////////////////////////////////// +// onCreate_LayoutControls subroutine +// +// Set the size of the dialog based in the mode: +// +// "D" - Hide the time controls +// "MT","MTS" - Hide the date controls +// "DT","DTS" - Leave as designed. +// +// If we are not showing the seconds ("DT" or "MT" ) then we hide the seconds +// controls. If it's an MT format then we also narrow the dialog to +// compensate. +// +// ---------------------------------------------------------------------------- +// [i] createMode : Specifies the mode the dialog operates in +// ---------------------------------------------------------------------------- +onCreate_LayoutControls: + + begin case + case ( createMode == "D" ) + + // Hide the TIME controls and resize the dialog to cover them + objxArray = "@.EDL_HOUR" + objxArray := @rm : "@.UPD_HOUR" + objxArray := @rm : "@.EDL_MINUTES" + objxArray := @rm : "@.UPD_MINUTES" + objxArray := @rm : "@.EDL_SECONDS" + objxArray := @rm : "@.UPD_SECONDS" + + swap "@" with @window in objxArray + call set_Property( objxArray, "VISIBLE", FALSE$ ) + + // Reduce the height of the dialog to the bottom of the EDT_DAY + // edit table plus a small margin + @@window->clientHeight = ( .edt_day->bottom + PDT_BORDERMARGIN$ ) + + case ( createMode[1,2] == "MT" ) + + // Hide the date controls + objxArray = "@.CBO_MONTH" + objxArray := @rm : "@.CBO_YEAR" + objxArray := @rm : "@.EDT_DAY" + + swap "@" with @window in objxArray + call set_Property( objxArray, "VISIBLE", FALSE$ ) + + // Now move the time controls - we could have put them on a panel + // and just moved that but where's the fun then eh? + + // Work out the offset height + yOffset = .cbo_month->top - .lbl_hour->top + + ctrlNames = "HOUR,MINUTES,SECONDS" ; convert "," to @fm in ctrlNames + ctrlTypes = ".LBL_,.EDL_,.UPD_" ; convert "," to @fm in ctrlTypes + for x = 1 to 3 + ctrlName = ctrlNames + for y = 1 to 3 + ctrlType = ctrlTypes + + ctrlID = @window : ctrlType : ctrlName + @ctrlID->offset( 0, yOffset ) + + next + next + + // Reduce the height of the dialog to the bottom of the BTN_CANCEL + // button plus a small margin + @@window->clientHeight = ( ( .btn_Cancel->bottom ) + PDT_BORDERMARGIN$ ) + + if ( createMode[-1,1] != "S" ) then + + // Hide the seconds controls + for y = 1 to 3 + ctrlType = ctrlTypes + ctrlID = @window : ctrlType : "SECONDS" + @ctrlID->visible = FALSE$ + next + + // And make the dialog narrower - we shouldn't need to move the + // buttons ourselves because they are right-aligned. + btnW = .btn_OK->width + minR = .upd_minutes->right + + @@window->clientWidth = ( minR + btnW + ( 2 * PDT_BORDERMARGIN$ ) + PDT_BORDERMARGIN$ ) + + end + + case OTHERWISE$ + + if ( createMode[-1,1] != "S" ) then + // Hide the seconds controls + + ctrlTypes = ".LBL_,.EDL_,.UPD_" ; convert "," to @fm in ctrlTypes + + for y = 1 to 3 + ctrlType = ctrlTypes + ctrlID = @window : ctrlType : "SECONDS" + @ctrlID->visible = FALSE$ + next + + end + + end case + + locate createMode in "D,DT,DTS" using "," setting pos then + // We need to load in the user locale's abbreviated day names - we start + // from a known sunday and loop through each day ... + + st = "" + st = 2022 + st = 1 + st = 0 ; // Sunday + st = 9 + st = 0 + st = 0 + st = 0 + st = 0 + + lpFormat = str_Unicode( "ddd" : \00\ ) ; // Short day name format + lpDateStr = str_Unicode( str( \00\, 10 ) ) + + for x = 0 to 6 + + st_ = var_To_Struct( st, SYSTEMTIME$ ) + if msWin_GetDateFormat( LOCALE_USER_DEFAULT$, | + 0, | + getPointer( st_ ), | + getPointer( lpFormat ), | + getPointer( lpDateStr ), | + 10 ) then + + tmp = unicode_Str( lpDateStr )[1,\00\] + + colIdx = ( x + 1 ) + .edt_Days.columns{colIdx}->headerText = tmp + + end else + // wut? + null + end + + st = st + 1 + st = st + 1 + + next + + end + +return + +/////////////////////////////////////////////////////////////////////////////// +// onCreate_LoadInitData subroutine +// +// Set the size of the dialog based in the mode: +// +// "D" - Hide the time controls +// "MT" - Hide the date controls +// "DT" - Leave as designed. +// +// ---------------------------------------------------------------------------- +// [i] createMode : Specifies the mode the dialog operates in +// [i] createParam : See RTI_POPUP_DATETIME_EQUATES +// ---------------------------------------------------------------------------- +onCreate_LoadInitData: + + initDate = createParam + initTime = createParam + + if bLen( initDate ) else initDate = date() + if bLen( initTime ) else initTime = time() + + locate createMode in "D,DT,DTS" using "," setting pos then + // Load the date controls - first preload the combos and then set + // the date... + + firstYear = createParam + lastYear = createParam + + if bLen( firstYear ) else firstYear = FIRST_YEAR$ + if bLen( lastYear ) else lastYear = LAST_YEAR$ + + if ( lastYear < firstYear ) then + lastYear = firstYear + end else + if ( firstYear > lastYear ) then + firstYear = lastYear + end + end + + tmp = fmt( initDate, "DJS" ) + + initYear = tmp[1,4] + initMonth = tmp[6,2] + initDay = tmp[9,2] + + if ( initYear < firstYear ) then + firstYear = initYear + end else + if ( initYear > lastYear ) then + lastYear = initYear + end + end + + tmp = "" + for x = 1 to 12 + tmp = x : "/1" + next + + tmp = oconv( iconv( tmp, "DH" ), "DHL" ) + + for x = 1 to 12 + tmp = tmp[1," "] + next + + .cbo_month->list = tmp + .cbo_month->selPos = initMonth + + tmp = "" + for x = firstYear to lastYear + tmp := x : @fm + next + tmp[-1,1] = "" + + .cbo_Year->list = tmp + .cbo_Year->text = initYear + + @@window->PDT_UDP_CURRDAY$ = initDay + goSub loadDaysForMonthYear + + end + + locate createMode in "MTS,MT,DTS,DT" using "," setting pos then + + // Load the time controls + .edl_hour->text = int( initTime / SECS_PER_HOUR$ ) + tmp = mod( initTime, SECS_PER_HOUR$ ) + + .edl_minutes->text = int( tmp / SECS_PER_MINUTE$ ) + + if ( createMode[-1,1] == "S" ) then + .edl_seconds->text = mod( tmp, SECS_PER_MINUTE$ ) + end + + end + +return + +/////////////////////////////////////////////////////////////////////////////// +// onCreate_PositionDialog subroutine +// +// Position the dialog below it's owner using the specified horizontal +// alignment. +// +// 1) If there is not enough room to display below it owner then place it +// above +// +// 2) Ensure it stays within the bounds of it's owner's monitor +// +// ---------------------------------------------------------------------------- +// [i] createParam : See RTI_POPUP_DATETIME_EQUATES +// ---------------------------------------------------------------------------- +onCreate_PositionDialog: + + ownerID = createParam + if bLen( ownerID ) else + // wut? + @@window->center( TRUE$ ) + return + end + + ownerSize = rti_Convert( createParam, @vm, @fm ) + colIdx = "" + rowIdx = "" + + begin case + case ( @ownerID->type == "EDITTABLE" ) + caretPos = @ownerID->caretPosX + colIdx = caretPos<1> + rowIdx = caretPos<2> + + if bLen( ownerSize ) else + if ( colIdx and rowIdx ) then + ownerSize = @ownerID.cells{colIdx,rowIdx}->screenSize + end + end + + case ps_TypeInfo( "ISAMVTYPE", ownerID ) + caretPos = @ownerID->defPosProp + colIdx = caretPos<1> + rowIdx = caretPos<2> + + case OTHERWISE$ + if bLen( ownerSize ) else + ownerSize = @ownerID->screenSize + end + + end case + + if ( colIdx and rowIdx ) then + @@window->PDT_UDP_CARETPOS$ = colIdx : @fm : rowIdx + end + + if bLen( ownerSize ) else + // wut? + @@window->center( TRUE$ ) + return + end + + ownerMon = @ownerID->monitor + winSize = @@window->size + monRect = rti_Convert( ownerMon, @vm, @fm ) + + ownerB = ( ownerSize<2> + ownerSize<4> ) + if ( ( monRect<4> - ownerB ) < winSize<4> ) then + // Display above - I assume that if we can't display below then we'll + // be fine above and on the monitor, because no-one has a monitor that + // small, right? + winSize<2> = ( ownerSize<2> - winSize<4> ) + end else + // Display below, and if we're outside the work rectangle then push us up + // until we're all on. + winSize<2> = ( ownerSize<2> + ownerSize<4> + 1 ) + + winB = ( winSize<2> + winSize<4> ) + if ( winB > monRect<4> ) then + winSize<2> = ( monRect<4> - winSize<4> ) + end + + end + + // Now h-Align... + if ( createParam == PDT_ALIGN_R$ ) then + + // Right align then check... + winSize<1> = ( ownerSize<1> + ownerSize<3> ) - winSize<3> + winR = ( winSize<1> + winSize<3> ) + + if ( winR > monRect<3> ) then + // Dialog is off the right side of the monitor so push it left + winSize<1> = monRect<3> - winSize<1> + end else + if ( winSize<1> < monRect<1> ) then + // We're off the left side (!) so push it right... + winSize<1> = monRect<1> + end + end + + end else + winSize<1> = ownerSize<1> + if ( winSize<1> < monRect<1> ) then + // Dialog is off the left size of the monitor so push it back + winSize<1> = monRect<1> + end else + winR = ( winSize<1> + winSize<3> ) + if ( winR > monRect<3> ) then + // Dialog is off the right side of the monitor, so push it + // back + winSize<1> = ( monRect<3> - winSize<3> ) + end + end + end + + winSize<5> = -1 ; // Keep invisible + + @@window->size = winSize + +return + +/////////////////////////////////////////////////////////////////////////////// +// onCreate_AdjustEdtDaysHeight subroutine +// +// ---------------------------------------------------------------------------- +onCreate_AdjustEdtDaysHeight: + + edtOrigH = .edt_Days->height + colHdrH = .edt_Days->colHeaderHeight + rowH = .edt_Days->rowHeight + + .edt_Days->clientHeight = ( colHdrH + ( rowH * 6 ) ) + + edtH = .edt_Days->height + diffH = ( edtH - edtOrigH ) + if ( diffH ) then + ctrlNames = "HOUR,MINUTES,SECONDS" ; convert "," to @fm in ctrlNames + ctrlTypes = ".LBL_,.EDL_,.UPD_" ; convert "," to @fm in ctrlTypes + for x = 1 to 3 + ctrlName = ctrlNames + for y = 1 to 3 + ctrlType = ctrlTypes + + ctrlID = @window : ctrlType : ctrlName + @ctrlID->offset( 0, diffH ) + + next + next + + @@window->clientHeight = ( @@window->clientHeight + diffH ) + + end + +return + +/////////////////////////////////////////////////////////////////////////////// +// onDblClk subroutine +// +// Main DBLCLK event dispatch handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : ctrlKey - TRUE$ if the Ctrl key is down +// [i] param2 : shiftKey - TRUE$ if the Shift key is down +// [i] param3 : mouseButton - TRUE$ if the right mouseButton is down +// --------------------------------------------------------------------------- +onDblClk: + + transfer param1 to ctrlKey + transfer param2 to shiftKey + transfer param3 to mouseButton + + atCtrl = field( object, ".", 2, 999 ) + + begin case + case ( atCtrl == "EDT_DAY" ) + goSub edtDay_OnDblClk + end case + + transfer ctrlKey to param1 + transfer shiftKey to param2 + transfer mouseButton to param3 + +return + +/////////////////////////////////////////////////////////////////////////////// +// onPosChanged subroutine +// +// Main POSCHANGED event handler dispatch handler. +// +// ---------------------------------------------------------------------------- +// [i] nextColumn : Column index of the current cell +// [i] nextRow : Row Index in the current cell +// ---------------------------------------------------------------------------- +onPosChanged: + + transfer param1 to nextColumn + transfer param1 to nextRow + + atCtrl = field( object, ".", 2, 999 ) + + begin case + case ( atCtrl == "EDT_DAY" ) + goSub edtDay_OnPosChanged + end case + + transfer nextRow to param2 + transfer nextColumn to param1 + + +return + +/////////////////////////////////////////////////////////////////////////////// +// onWrite subroutine +// +// WRITE event handler. Return the date/time in internal format to the dialog +// owner +// +// ---------------------------------------------------------------------------- +onWrite: + + if ( @@window->PDT_UDP_EXECWRITE$ ) then + return + end + + @@window->PDT_UDP_EXECWRITE$ = TRUE$ + + goSub getDateTimeValue ; // returns dtVal + + @@window->closeDialog( dtVal ) + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// cboMonth_OnChanged subroutine +// +// CHANGED event handler for the CBO_MONTH control. When the month changes +// then update the day numbers in EDT_DAY +// +// ---------------------------------------------------------------------------- +// [i] NewData : New month +// ---------------------------------------------------------------------------- +cboMonth_OnChanged: + + goSub loadDaysForMonthYear + +return + +/////////////////////////////////////////////////////////////////////////////// +// cboYear_OnChanged subroutine +// +// CHANGED event handler for the CBO_YEAR control. When the year changes +// then update the day numbers in EDT_DAY +// +// ---------------------------------------------------------------------------- +// [i] NewData : New year +// ---------------------------------------------------------------------------- +cboYear_OnChanged: + + goSub loadDaysForMonthYear + +return + +/////////////////////////////////////////////////////////////////////////////// +// edtDay_OnDblClk subroutine +// +// DBLCLK event handler for the EDT_DAY control. +// +// If the user double-clicks on a day number then return the data to the user +// +// ---------------------------------------------------------------------------- +// [i] ctrlKey - TRUE$ if the Ctrl key is down +// [i] shiftKey - TRUE$ if the Shift key is down +// [i] mouseButton - TRUE$ if the right mouseButton is down +// --------------------------------------------------------------------------- +edtDay_OnDblClk: + + caretPos = @object->caretPosX + colIdx = caretPos<1> + rowIdx = caretPos<2> + + dayNo = @object.cells{colIdx,rowIdx}->text + + if dayNo then + @@window->writeRow( "" ) + end + +return + +/////////////////////////////////////////////////////////////////////////////// +// edtDay_OnPosChanged subroutine +// +// POSCHANGED event handler +// +// ---------------------------------------------------------------------------- +// [i] param1 : nextColumn +// [i] param2 : nextRow +// ---------------------------------------------------------------------------- +edtDay_OnPosChanged: + + caretPos = @object->caretPosX + colIdx = caretPos<1> + rowIdx = caretPos<2> + + dayNo = @object.cells{colIdx,rowIdx}->text + + if bLen( dayNo ) else + // Moved onto a non-date cell so no coloring update... + return + end + + @object->redraw = FALSE$ + + @@window->PDT_UDP_CURRDAY$ = dayNo + + colorPos = @object->PDT_UDP_COLORPOS$ + if bLen( colorPos ) then + if ( colorPos != caretPos ) then + cs = "" + cs = CLR_USEDEFAULT$ + cs = CLR_TRANSPARENT$ + cs = CLR_TRANSPARENT$ + cs = FALSE$ + + @object.cells->cellStyle( colorPos<1>, colorPos<2>, PS_EDT_CS_NORMAL$, FALSE$, cs ) + + end + end + + cs = "" + cs = .edt_Day->PDT_UDP_SELFORECOLOR$ + cs = .edt_Day->PDT_UDP_SELBACKCOLORCOLOR$ + cs = cs + cs = TRUE$ + + @object.cells->cellStyle( colIdx, rowIdx, PS_EDT_CS_NORMAL$, FALSE$, cs ) + + @object->PDT_UDP_COLORPOS$ = caretPos + + @object->redraw = TRUE$ + +return + +/////////////////////////////////////////////////////////////////////////////// +// getDateTimeValue subroutine +// +// Extracts the data from the controls and constructs the date, time or +// datetime value that should be returned to the caller based on the create +// mode +// +// ---------------------------------------------------------------------------- +// [o] dtVal : Returned date/time value +// ---------------------------------------------------------------------------- +getDateTimeValue: + + createParam = @@window->PDT_UDP_CREATEPARAM$ + + createMode = createParam + + iDate = 0 + iTime = 0 + dtVal = "" + + locate createMode in "D,DT,DTS" using "," setting pos then + + dayNo = @@window->PDT_UDP_CURRDAY$ + monthNo = .cbo_Month->selPos + year = .cbo_Year->text + + iDate = iconv( dayNo : "/" : monthNo : "/" : year, "D4/E" ) + + end + + locate createMode in "MTS,MT,DT,DTS" using "," setting pos then + + hour = .edl_Hour->text + mins = .edl_Minutes->text + secs = .edl_Seconds->text + + iTime = ( hour * SECS_PER_HOUR$ ) + ( mins * SECS_PER_MINUTE$ ) + secs + + end + + begin case + case ( createMode == "D" ) + dtVal = iDate + + case ( createMode[1,2] == "MT" ) + dtVal = iTime + + case OTHERWISE$ + dtVal = iDate + ( iTime / SECS_PER_DAY$ ) + + end case + +return + +/////////////////////////////////////////////////////////////////////////////// +// loadDaysForMonthYear +// +// This subroutine loads in the day numbers into EDT_DAY based on the Month +// and Year in their respective combos. +// +// ---------------------------------------------------------------------------- +loadDaysForMonthYear: + + currYear = .cbo_Year->text + currMonth = .cbo_Month->selPos + + prevYear = @@window->PDT_UDP_PREVYEAR$ + prevMonth = @@window->PDT_UDP_PREVMONTH$ + + if ( currYear == prevYear ) then + if ( currMonth == prevMonth ) then + return + end + end + + .edt_Day->redraw = FALSE$ + + .edt_Day->PDT_UDP_COLORPOS$ = "" + + currDay = @@window->PDT_UDP_CURRDAY$ + if ( currDay ) else currDay = 1 + + firstDay = iconv( currYear : "-" : currMonth : "-01", "DJS" ) + colIdx = mod( firstDay, 7 ) + 1 + rowIdx = 1 + + currCol = "" + currRow = "" + + dayCount = field( DAY_COUNT$, ",", currMonth ) + if ( currMonth == 2 ) then + if ( mod( currYear, 4 ) == 0 ) and ( mod( currYear, 100 ) or mod( currYear, 400 ) == 0 ) then + // Leap Year + dayCount += 1 + end + end + + dayCells = ""; dayCells<6,7> = "" ; // fill the array.. + + for dayNo = 1 to dayCount + if ( colIdx > 7 ) then + colIdx = 1 + rowIdx += 1 + end + + dayCells = dayNo + if ( dayNo == currDay ) then + currCol = colIdx + currRow = rowIdx + end + + colIdx += 1 + + next + + .edt_Day->list = dayCells + + if ( currCol ) then + .edt_Day->caretPosX = currCol : @fm : currRow + end + + // Now set any non-day cells to skipped, and the HOT color to the same as + // the back color so that hot tracking looks like it's not on. + cs = "" + cs = CLR_USEDEFAULT$ + cs = ( $system->visualStyleColor{SYSCOLOR_WINDOW$} + 1 ) + cs = cs + + for rowIdx = 1 to 6 + for colIdx = 1 to 7 + dayNo = .edt_Day.cells{colIdx,rowIdx}->text + if bLen( dayNo ) else + .edt_Day.cells{colIdx,rowIdx}->skipOver = TRUE$ + .edt_Day.cells->cellStyle( colIdx, rowIdx, PS_EDT_CS_NORMAL$, FALSE$, cs ) + end + next + next + + .edt_Day->redraw = TRUE$ + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// errorMsg subroutine +// +// Displays a simple error message +// +// ---------------------------------------------------------------------------- +// [i] errorText : Text to display in the message +// [i] errorCaption : Caption for the message +// ---------------------------------------------------------------------------- +errorMsg: + + if assigned( errorCaption ) else errorCaption = "" + if bLen( errorCaption ) else + errorCaption = @@window->text + end + + msgArray = "" + msgArray = errorText + msgArray = "!" + msgArray = -2 + msgArray = -2 + msgArray = "C" + msgArray = errorCaption + + call msg( @window, msgArray ) + +return + +/////////////////////////////////////////////////////////////////////////////// +// setSPError subroutine +// +// Translates an SSP status error array into a "text version" from REVERROR.DAT +// +// ---------------------------------------------------------------------------- +// [i,o] errorText : SSP status error to convert. Returns the "text" version +// [o] abort : Always set to TRUE$ +// ---------------------------------------------------------------------------- +setSPError: + errorText = rti_ErrorText( "SP", errorText ) + abort = TRUE$ +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +$insert copyright +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROC/RTI_RUN_HTTPSERVER_REQUEST.txt b/SYSPROG/STPROC/RTI_RUN_HTTPSERVER_REQUEST.txt new file mode 100644 index 0000000..f66a3b2 --- /dev/null +++ b/SYSPROG/STPROC/RTI_RUN_HTTPSERVER_REQUEST.txt @@ -0,0 +1,113 @@ +compile function rti_Run_HTTPServer_Request( httpServer, requestID, requestHeaders ) +/* + **************************************************************************** + ** IF YOU WANT TO MODIFY THIS FOR YOUR OWN APPLICATIONS PLEASE USE A COPY ** + ** DO NOT CHANGE THIS PROGRAM AS IT MAY BE OVERWRITTEN BY FUTURE UPDATES! ** + **************************************************************************** + + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : March 2021 - Lockdown 3 (still) + Purpose : Core handler for running HTTPSERVER requests + + Comments + ======== + + This is basically an analog of RUN_OECGI_REQUEST and is intended to be + called from the HTTPREQUEST event of an HTTPSERVER control. + + Assumptions: + + 1) This proc is always in EventContext from an HTTPREQUEST event, and + 2) This proc is called as a quick event + + This has error-handling implications due to the fact that: + + 1) The promoted handler forwards the event to a QE handler and then + checks EventStatus() to see if it should continue. + + 2) If so then it executes a SENDRESPONSE method to return content to the + client. + + We don't want to stop that last step otherwise the client will time out, so + _this_ proc will _not_ set the EventStatus() if it encounters an error - + instead it will raise an HTTPERROR event on the server and ensure that + the SP Status is also cleared. + + If the handler proc wants to issue it's own send and set the EventStatus then + it is free to do so. + + + Amended Date Reason + ======= ==== ====== +*/ + + #pragma precomp event_precomp + + declare function rti_Convert, rti_Verify_Proc, rti_UC, rti_ErrorText + $insert ps_HTTPServer_Equates + $insert rti_SSP_Equates + $insert rti_Text_Equates + $insert logical + + equ HTTPSVR_PREFIX$ to "HTTPSVR_" + + errStat = FALSE$ + errInfo = "" + + retVal = TRUE$ + + procID = rti_UC( requestHeaders )[-1, "B/"] + if ( procID[1,8] != HTTPSVR_PREFIX$ ) then + procID = HTTPSVR_PREFIX$ : procID + end + + call set_Status( SETSTAT_OK$ ) + if rti_Verify_Proc( procID, FALSE$, 3, "" ) else + // Not a valid HTTPSVR_ proc ... + call get_status( errInfo ) ; goSub setHTTPError + + @httpServer->SetResponseStatus( requestID, 404 ) ; // HTTP 404 - not found + + return FALSE$ + + end + + call @procID( httpServer, requestID, requestHeaders ) + if get_Status( errInfo ) then + // Something got away from the handler? Make a note and then let it + // through. + call set_Status( SETSTAT_OK$ ) + goSub setHTTPError + return FALSE$ + end + +return TRUE$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// setHTTPError subroutine +// +// This subroutine raises an HTTPERROR event for each error string contained +// in the errInfo var. +// +// ---------------------------------------------------------------------------- +// [i] errInfo : @fm'd list of errors to report +// ---------------------------------------------------------------------------- +setHTTPError: + + errInfo = rti_ErrorText( "SP", errInfo ) + pos = 1 + loop + tmp = errInfo[pos,@fm,TRUE$]; pos += bCol2()+1 + if bLen( tmp ) then + @httpServer->postEvent( "HTTPERROR", requestID, errInfo ) + end + while ( pos < bLen( errInfo ) ) + repeat + +return + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROC/RTI_VSPRINTER_CUTEPDF.txt b/SYSPROG/STPROC/RTI_VSPRINTER_CUTEPDF.txt new file mode 100644 index 0000000..9136f85 --- /dev/null +++ b/SYSPROG/STPROC/RTI_VSPRINTER_CUTEPDF.txt @@ -0,0 +1,48 @@ +subroutine RTI_VSPRINTER_CUTEPDF(pdfPrinterName, pdfOutputName, destFilePath, bDoCopy, bPostGeneration) +/* -------------------------------------------------------------------------- + + + PURPOSE : Sample "helper" routine to generate PDF Output from OIPI "Classic" in 10.0.x using CutePDF Writer + + AUTHOR : Bryan Shumsky + + CREATED : September 23, 2020 + + REVISION HISTORY (Most CURRENT first) : + + DATE IMPLEMENTOR FUNCTION + -------- ----------- ------------------------------------------------------------------------------------------------ + MM-DD-YY initials Modification + 11-19-20 bzs Allow for "post generation" flag + + +-------------------------------------------------------------------------- */ +* CutePDF (v4.0+) allows you to specify a location for PDF output +* HKEY_CURRENT_USER\Software\CutePDF Writer\ +* BypassSaveAs (string value): 0=no/1=yes +* OutputFile (string value): full path and file name +* bPostGeneration (string value): 0=no (pre)/1=yes (post) + +If Assigned(bPostGeneration) Else bPostGeneration = "" + +Declare Function REGISTRY_METHOD + +Begin Case + Case bPostGeneration = "1" + * PDF generation should be complete - do we need to do anything? + * Delay for a few seconds so it can "wrap up" processing + call delay(2) + + Case 1 + * called before PDF generation has happened + * set us up for processing + rslt = registry_method("WRITE", "HKEY_CURRENT_USER\Software\CutePDF Writer\BypassSaveAs", "1") + rslt = registry_method("WRITE", "HKEY_CURRENT_USER\Software\CutePDF Writer\OutputFile", destFilePath) + + * set bDoCopy to 1 if we want OIPI to copy from pdfOutputName to destFilePath + * set bDoCopy to 0 if our helper program means no copy is necessary + + bDoCopy = 0 +End Case + +Return 0 diff --git a/SYSPROG/STPROC/SEND_EMAIL_SAMPLE.txt b/SYSPROG/STPROC/SEND_EMAIL_SAMPLE.txt new file mode 100644 index 0000000..9357e55 --- /dev/null +++ b/SYSPROG/STPROC/SEND_EMAIL_SAMPLE.txt @@ -0,0 +1,101 @@ +Compile function Send_Email_Sample(SendTo, CC, Subject, Body, From, ReplyTo, SRPMailAttach, ConfigFile, Bcc) + +************************************************************************************************ +* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to +* be copied without written permission from SRP Computer Solutions. +* +* Name : Send_Email_Sample +* +* Description: Sends an email via the SRPMail.dll +* +* Notes : Please refer to the SRPMail.chm +* +* Parameters : +* MsgSent [out] -- Returns a boolean value as to whether or not the message was sent +* successfully +* SendTo [in] -- An @VM delimited list of email addresses; required parameter +* CC [in] -- An @VM delimited list of email addresses +* Subject [in] -- Text that will appear in the subject line of the email +* Body [in] -- The actual text of the email; use CRLF$ to break or insert lines; +* required parameter +* From [in] -- The account to send the email from +* ReplyTo [in] -- The account that all replies should go to. +* SRPMailAttach [in] -- The file to be used as an attachment for the SRPMail program. +* ConfigFile [in] -- The record which contains the SRPMail Config variables. +* Bcc [in] -- An @VM delimited list of email address +* +* History (Date, Initials, Notes) +* 01/05/04 ps Sample version created. +************************************************************************************************ + +$insert SRPMAIL_INSERTS +$insert LOGICAL + +Process = 0 +Error = No$ +Loop + Process += 1 +Until Error OR Process GT 2 + On Process GoSub SET, SEND +Repeat + +Return MsgSent + +SET: + MsgSent = No$ + If Assigned(SendTo) else SendTo = "" + If Assigned(CC) else CC = "" + If Assigned(From) else From = "" + If Assigned(Subject) else Subject = "" + If Assigned(Body) else Body = "" + If Assigned(aTitle) else aTitle = "" + If Assigned(aPath) else aPath = "" + If Assigned(eDialog) else eDialog = Yes$ + If Assigned(From) else From = "" + If Assigned(ReplyTo) else ReplyTo = "" + If Assigned(SRPMailAttach) else SRPMailAttach = "" + If Assigned(ConfigFile) else ConfigFile = "" + If Assigned(Bcc) else Bcc = "" + If Assigned(HistoryTable) else HistoryTable = "" + If SendTo EQ "" then Error = Yes$ + MsgSent = "" +return + + +SEND: + Swap @VM with @FM in ConfigFile + If ConfigFile then + GoSub Send_SRP_Mail + end else + Error = Yes$ + end +return + +Send_SRP_Mail: + Swap @VM with ", " in SendTo + Swap @VM with ", " in CC + Swap @VM with ", " in Bcc + Swap @VM with ", " in SRPMailAttach + Swap @FM with ", " in SendTo + Swap @FM with ", " in CC + Swap @FM with ", " in Bcc + Swap @FM with @VM in SRPMailAttach + Message = "" + Message<1> = Subject + Message<2> = From + Message<3> = SendTo + Message<4> = CC + Message<5> = Bcc + Message<6> = ReplyTo + HTMLCheck = Body[1, 6] + Convert @LOWER_CASE to @UPPER_CASE in HTMLCheck + If HTMLCheck EQ "" then + Message<7> = "HTML" + end else + Message<7> = "TEXT" + end + Message<8> = Body + Message<9> = SRPMailAttach + MsgSent = SRP_Send_Mail(Message, ConfigFile) +return diff --git a/SYSPROG/STPROC/SQL_SERVICES.txt b/SYSPROG/STPROC/SQL_SERVICES.txt new file mode 100644 index 0000000..f995f59 --- /dev/null +++ b/SYSPROG/STPROC/SQL_SERVICES.txt @@ -0,0 +1,3658 @@ +Function SQL_Services(@Service, @Params) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc.. + + Name : SQL_Services + + Description : Handler program for all module related services. + + Notes : The generic parameters should contain all the necessary information to process the services. Often + this will be information like the data Record and Key ID. + + Parameters : + Service [in] -- Name of the service being requested + Param1-10 [in/out] -- Additional request parameter holders + Response [out] -- Response to be sent back to the Controller (MCP) or requesting procedure + + History : (Date, Initials, Notes) + 10/19/17 dmb v1.0.0 - Original programmer. + 05/06/20 dmb v2.0.0 - Added GetDatabases, GetSchemas, and GetTables services. + 05/09/20 dmb v2.0.0 - Changed GetSQLServer service to GetMappedSQLServer to use the same naming + convention as other similar services. + 05/09/20 dmb v2.0.0 - Decprecate the GetTableNames service. Use GetTables instead. + 05/09/20 dmb v2.0.0 - Update GetTableColumns service to support Database and Schema arguments. Add logic + to check the Table argument for other SQL objects. + 05/09/20 dmb v2.0.0 - Remove all case conversions for SQL table names in all services. + 05/11/20 dmb v2.0.0 - Update the GetMappedSQLColumnValues and GetMappedOIColumnValues services to support + additional SQL data types and to use SRP_Date/SRP_DateTime/SRP_Time functions + instead of Iconv/Oconv. + 05/11/20 dmb v2.0.0 - Update GetSQLUpdateStatements service so secondary tables use the correct SQL + syntax. + 05/12/20 djs v2.0.0 - Update GetServers service to use new SERVERS table. Add CreateNewConnection, + EditConnection, DeleteConnection, and SetConnectionDesc services. + 05/12/20 dmb v2.0.0 - More updates to the GetSQLInsertStatements and GetSQLUpdateStatements services to + improve handling of AMV mapping. + 05/12/20 dmb v2.0.0 - Move transaction control out of the WriteDataRowToSQL and DeleteDataRowFromSQL + services into the ExecuteQueries service so error trapping can determine if a + COMMIT or ROLLBACK should be made. + 05/13/20 dmb v2.0.0 - Update GetConnectionString service to use the SERVERS table. + 05/13/20 dmb v2.0.0 - Remove deprecated LogConnectionActivity service. + 05/14/20 dmb v2.0.0 - Update the ExecuteQueries service to ignore query statements that are empty. This + will allow other query statements to be executed in the event of an accidental + empty entry. + 05/14/20 dmb v2.0.0 - Update the GetMappedSQLColumnValues service return the OI Key value correctly when + working with AMV values greater than 1. + 05/14/20 dmb v2.0.0 - Update the GetSQLUpdateStatements service to DELETE all secondary SQL table rows + first and then INSERT rows as needed. This is necessary to keep the data in sync + since AMV columns likely will not have a column that can be used as a secondary Key + ID within the secondary SQL table. + 06/03/20 dmb v2.0.0 - Update the GetSQLInsertStatements and GetSQLUpdateStatements services so that AMV + master columns with actual data (rather than empty values) will generate a SQL + statement. This fixes a problem where NULLs were attempted to be stored in a + primary key column. + 06/04/20 dmb v2.0.0 - Update the GetStaticSQLColumnNames and GetStaticSQLColumnValues services to support + the new JSON structure. + 06/05/20 dmb v2.0.0 - Update the GetDatabases service so system schemas are excluded. + 06/06/20 dmb v2.0.0 - Improve error handling in the GetAllQueryDataRows service. + 06/06/20 dmb v2.0.0 - Update the GetAllQueryDataRows service to check the EOF property of the RecordSet + object before calling the GetString method. + 06/06/20 dmb v2.0.0 - Update the GetSchemas service to see if the error returned from the ExecuteQuery + service reports a permissions error. If so, ignore and clear the error. + 06/08/20 dmb v2.0.0 - Change all references to information_schema to all caps to avoid case sensitivity + issues. + 06/08/20 dmb v2.0.0 - Update the GetDatabases service to see if the response from the ExecuteQuery + service is "0". If so, then clear the response and set an error. + 06/10/20 dmb v2.0.1 - Update the GetJoinedOIColumns service to assign to the ValuesReturned passed by + reference argument whether an associated column should return its column data + (default) or its index position. + 06/10/20 dmb v2.0.1 - Update the GetMappedOIColumnNames to use the ValuesReturned argument that is + assigned by the GetJoinedOIColumns service. This service will also assigned its own + ValuesReturned passed by preference argument. + 06/10/20 dmb v2.0.1 - Update the GetMappedSQLColumnValues to use the ValuesReturned argument that is + assigned by the GetMappedOIColumnNames service. + 06/10/20 dmb v2.0.1 - Change the Errors argument to ErrorList in the AddConnectionErrors service to avoid + suspected VNAV warnings. + 06/10/20 dmb v2.0.1 - Change the Desc argument to Description in the SetConnectionDesc service to avoid + suspected VNAV warnings. + 06/10/20 dmb v2.0.1 - Update the GetMappedSQLColumnNames service to better exclude SQL columns that are + not mapped. + 06/10/20 dmb v2.0.1 - Update the GetMappedOIColumnNames service to better exclude OI columns that are not + mapped. + 06/12/20 dmb v2.0.1 - Update the GetAMVMaster service to locate the AMV Master using the attributes of + the join clause rather than the dedicated key/value pair. + 06/12/20 dmb v2.0.1 - Update the GetSQLInsertStatements and GetSQLUpdateStatements services to use the + updated GetAMVMaster service. + 06/14/20 dmb v2.0.1 - Update the GetSQLInsertStatements and GetSQLUpdateStatements services to verify if + any columns used in the join clause are not defined in the map. If so, then include + these columns and their corresponding values in the Insert or Update statements. + 06/14/20 dmb v2.0.1 - Fix bug in the GetMappedSQLColumnValues service to properly return the AMV index + position if the value returned requested it. + 06/14/20 dmb v2.0.1 - Added the GetJoinedSQLColumns service. + 06/15/20 dmb v2.0.1 - Update the GetMappedSQLColumnValues service to support the bit SQL data type. + 06/15/20 dmb v2.0.1 - Update the GetTableColumns service to use a SQL statement that also returns PK and + Null constraints. + 06/22/20 dmb v2.0.1 - Update the GetTableColumns service so the results are sorted by PK and then + alphabetically. + 06/22/20 dmb v2.0.1 - Update the GetTableColumns service to make a USE query if the database + is known. + 06/23/20 dmb v2.0.1 - Rename the GetJoinedSQLColumns service to GetMappedJoinedSQLColumns and update all + calls to this service. + 06/23/20 dmb v2.0.1 - Rename the GetJoinedSQLColumns service to GetMappedJoinedSQLColumnNames and update + all calls to this service. + 06/23/20 dmb v2.0.1 - Rename the GetJoinedOIColumns service to GetMappedJoinedOIColumnNames and update + all calls to this service. + 06/23/20 dmb v2.0.1 - Added the GetMappedJoinedSQLColumnValues service. + 06/23/20 dmb v2.0.1 - Added the GetMappedJoinedOperators service. + 06/23/20 dmb v2.0.1 - Major refactoring of all services that create SQL statements to better handle edge + cases and joined columns. + 06/24/20 dmb v2.0.1 - Fix memory leak in the GetMappedOIColumnNames service by releasing the MapObj + object. + 06/29/20 dmb v2.0.1 - Update the GetMappedSQLColumnValues service so that all errors are cleared once + the column value is being calculated because any errors that are created must have + come from a calculated column. This will avoid returning a number of values that + differs from the number of column names. + 07/10/20 dmb v2.0.1 - Update the GetMappedSQLColumnValues service to support the uniqueidentifier SQL + data type. + 07/10/20 dmb v2.0.1 - Udpate the GetMappedOIColumnNames and GetMappedSQLColumnNames services to support + a ExcludeJoinedColumns flag rather than assume joined columns should always be + excluded. + 07/10/20 dmb v2.0.1 - Update the GetMappedOIColumnValues and GetMappedSQLColumnValues services to pass + the ExcludeJoinedColumns flag to the GetMappedOIColumnNames and + GetMappedSQLColumnNames services. + 07/20/20 dmb v2.0.1 - Fix bug in the GetMappedJoinedSQLColumnValues service that attempted to convert + an index value based on the data type. + 07/20/20 dmb v2.0.1 - Fix bug in the WriteDataRowToSQL service to avoid VNAV error with the + TransactionQueries variable. + 07/31/20 dmb v2.0.2 - Fix bug in the GetSQLInsertStatements and GetSQLUpdateStatements services where + maps to tables with no data columns would attempt to insert/update empty values + in empty columns. + 07/31/20 dmb v2.0.2 - Update the GetSQLUpdateStatements service to avoid creating an update state for + primary tables that only have a join but no column maps. + 08/13/20 djs v2.0.3 - Replaced CreateNewConnection service with CreateNewConnectionString and + SaveConnectionString services. These new services allow multiple connections to + the same SQL server (i.e. same SQL source, different user credentials and/or base + catalog) to be stored under user defined Server ID key IDs. + 08/14/20 djs - Created a new copy of SQL_Services (LSL2) from SQL_Services (SYSPROG). + Added PostSQLRequest and ProcessSQLRequests services back into SQL_Services (LSL2), + which are services that only exist in Infineon's copy of SQL_Services. These + services add the ability to query SQL servers outside of the originating server's + domain. Created SERVERS entries for all SQL Server connections currently in the + APP_INFO table. + 08/17/20 djs - Replaced all calls to SQL_Services_DJS (a temporary stored procedure that + was utilized during the SQL_Services (SYSPROG) upgrade) throughout the LSL2 + application with calls to SQL_Services. + 08/17/20 dmb v2.0.7 - Update the GetMappedJoinedSQLColumnValues and GetMappedSQLColumnValues services + to safety check integer and floating point numbers for empty and non-numeric + values and convert to something other than an empty or unquoted string. + 09/18/20 dmb v2.0.8 - Update the GetTables service to sort the results rather than rely upon SQL to + return sorted results. + 06/28/21 dmb v2.0.9 - Update the GetMappedSQLColumnNames and GetMappedSQLColumnValues services to compare + the passed in SQL Table against the mapped SQL table in the JSON definition before + accepting the current SQL Column. This resolves issues where one OI table with only + MultiValue columns is mapped to two SQL tables. + 02/12/2024 djm v2.0.10- Move Free_Class.Net(DotNetObj) in ExecuteQuery to avoid memory leak. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert SERVICE_SETUP +$insert SERVERS_EQUATES +$insert MICROSOFT_ADO_EQUATES +$insert DICT_EQUATES +$insert SQL_REQUESTS_EQUATES +$insert RLIST_EQUATES +$insert REVDOTNETEQUATES + +Equ CRLF$ to \0D0A\ +Equ COMMA$ to ',' + +Common /SQLServices/ ConnectionObjects@, Unused2@, Unused3@, Unused4@, Unused5@, Unused6@, Unused7@, Unused8@ + +Declare function Memory_Services, SQL_Services, Database_Services, SRP_JSON, SRP_Array, SRP_Hash, SRP_COM, SRP_Encode +Declare function SRP_Date, SRP_DateTime, SRP_Time, Utility, Unicode_UTF8, Str_Unicode, GetTickCount, SRP_Decode +Declare function SRP_List, Environment_Services, Logging_Services, Active_Directory_Services +Declare subroutine Memory_Services, SQL_Services, Database_Services, SRP_JSON, SRP_Stopwatch, SRP_COM, SRP_List +Declare subroutine GetTempPath, GetTempFileName, Sleepery, WinYield, Yield, RList, Set_Status, Logging_Services +Declare subroutine Update_Index, obj_Notes + +UseRevDotNet = Database_Services('ReadDataRow', 'APP_INFO', 'USE_REVDOTNET') +If UseRevDotNet EQ '' then UseRevDotNet = False$ + +LogPath = Environment_Services('GetApplicationRootPath') : '\LogFiles\SQL_Services' +LogDate = Oconv(Date(), 'D4/') +LogTime = Oconv(Time(), 'MTS') +LogFileName = LogDate[7, 4] : '-' : LogDate[1, 2] : '-' : LogDate[4, 2] : ' SQL Services Log.csv' +Headers = 'Logging DTM' : @FM : 'Error' +objLog = Logging_Services('NewLog', LogPath, LogFileName, CRLF$, ',', Headers, '', False$, False$) + +LogPath = Environment_Services('GetApplicationRootPath') : '\LogFiles\Replication' +LogFileName = LogDate[7, 4] : '-' : LogDate[1, 2] : '-' : LogDate[4, 2] : ' Null Record Log.csv' +Headers = 'Logging DTM' : @FM : 'Error' +objNullLog = Logging_Services('NewLog', LogPath, LogFileName, CRLF$, ',', Headers, '', False$, False$) + +LoggingDTM = LogDate : ' ' : LogTime ; // Logging DTM + +If ConnectionObjects@ EQ '' then ConnectionObjects@ = SRP_List('Create') + +GoToService else + Error_Services('Add', Service : ' is not a valid service request within the ' : ServiceModule : ' module.') +end + +Return Response OR '' + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Service Parameter Options +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +Options BOOLEAN = True$, False$ + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Services +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// WriteDataRowToSQL +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table being written to. - [Required] +// OIKeyID - The Key ID to the OpenInsight row being written to SQL. - [Required] +// OIRow - The OpenInsight row being written to SQL. - [Required] +// OIColumns - An @FM delimited list of OpenInsight table columns that should only be used to write to SQL. If empty, +// all columns that have a map defintion will be used. - [Optional] +// +// High level services that writes OpenInsight data into a designated SQL table. This services calls other lower +// level services as needed and assumes an OpenInsight to SQL map has already been created. +//---------------------------------------------------------------------------------------------------------------------- +Service WriteDataRowToSQL(OITableName, OIKeyID, OIRow, OIColumns) + + If (OITableName NE '') AND (OIKeyID NE '') AND (OIRow NE '') then + // Create a new or get an existing Connection Object. + SQLServer = SQL_Services('GetMappedSQLServer', OITableName) + objConnection = SQL_Services('GetConnectionObject', SQLServer, 2) + TransactionQueries = '' + + If Error_Services('NoError') then + // Confirm if row already exists. This will determine if an INSERT or UPDATE should be made. + PrimarySQLTableName = SQL_Services('GetPrimarySQLTable', OITableName) + +* If @User4 EQ 'DANIEL_ST' then + + TransactionQueries = SQL_Services('GetSQLMergeStatements', OITableName, OIKeyID, OIRow, OIColumns) + +* end else +* JoinClause = SQL_Services('GetJoinClause', OITableName, PrimarySQLTableName, OIKeyID, OIRow) +* SQLStatement = 'SELECT TOP 1 * FROM ' : PrimarySQLTablename : ' WHERE ' : JoinClause +* RowData = SQL_Services('ExecuteQuery', objConnection, SQLStatement, True$) +* +* If RowData EQ '' then +* // Create the INSERT statements to store the data in SQL. +* TransactionQueries = SQL_Services('GetSQLInsertStatements', OITableName, OIKeyID, OIRow, OIColumns) +* IF @UserName EQ 'DAN_CR' OR @User4 EQ 'DAN_CR' then +* Message = TransactionQueries +* Gosub WriteLog +* end +* end else +* // Create the UPDATE statements to store the data in SQL. +* TransactionQueries = SQL_Services('GetSQLUpdateStatements', OITableName, OIKeyID, OIRow, OIColumns) +* end +* end + + end + + If Error_Services('NoError') AND (TransactionQueries NE '') then + // Process the tranaction queries. + SQL_Services('ExecuteQueries', objConnection, TransactionQueries, True$, OITableName, OIKeyID) + If Error_Services('HasError') then + ErrorMessage = Error_Services('GetMessage') + Error_Services('Clear') + InsertError = IndexC(ErrorMessage, 'FOREIGN', 1) + If InsertError then + // Record may have been inserted in between the time this routine began and by the time the SQL + // statement executed. Try an UPDATE statement instead. + TransactionQueries = SQL_Services('GetSQLUpdateStatements', OITableName, OIKeyID, OIRow, OIColumns) + If Error_Services('NoError') AND (TransactionQueries NE '') then + SQL_Services('ExecuteQueries', objConnection, TransactionQueries, True$, OITableName, OIKeyID) + end + end else + Error_Services('Add', ErrorMessage) + end + end + end + end else + Error_Services('Add', 'The OITableName, OIKeyID, or OIRow argument was missing in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// DeleteDataRowFromSQL +// +// High level services that deletes data from a designated SQL table. This services calls other lower level services as +// needed and assumes an OpenInsight to SQL map has already been created. +//---------------------------------------------------------------------------------------------------------------------- +Service DeleteDataRowFromSQL(OITableName, OIKeyID) + + If (OITableName NE '') AND (OIKeyID NE '') then + // Create a new or get an existing Connection Object. + SQLServer = SQL_Services('GetMappedSQLServer', OITableName) + objConnection = SQL_Services('GetConnectionObject', SQLServer, 2) + TransactionQueries = '' + + If Error_Services('NoError') then + // Confirm if row already exists. This will determine if an INSERT or UPDATE should be made. + PrimarySQLTableName = SQL_Services('GetPrimarySQLTable', OITableName) + JoinClause = SQL_Services('GetJoinClause', OITableName, PrimarySQLTableName, OIKeyID, OIRow) + SQLStatement = 'SELECT TOP 1 * FROM ' : PrimarySQLTablename : ' WHERE ' : JoinClause + RowData = SQL_Services('ExecuteQuery', objConnection, SQLStatement, True$) + + If RowData NE '' then + // Create the DELETE statements so the data in SQL is cleared out first. + TransactionQueries = SQL_Services('GetSQLDeleteStatements', OITableName, OIKeyID) + end + end + + If Error_Services('NoError') AND (TransactionQueries NE '') then + // Process the tranaction queries. + SQL_Services('ExecuteQueries', objConnection, TransactionQueries, True$) + end + end else + Error_Services('Add', 'The OITableName or OIKeyID argument was missing in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ReadDataRowFromSQL +// +// High level services that reads data from a designated SQL table. This services calls other lower level services as +// needed and assumes an OpenInsight to SQL map has already been created. +//---------------------------------------------------------------------------------------------------------------------- +Service ReadDataRowFromSQL(OITableName, OIKeyID) + + OIRow = '' + + If (OITableName NE '') AND (OIKeyID NE '') then + // Create a new or get an existing Connection Object. + SQLServer = SQL_Services('GetMappedSQLServer', OITableName) + objConnection = SQL_Services('GetConnectionObject', SQLServer, 2) + + If Error_Services('NoError') then + // Select the SQL data for the primary SQL table associated to the OpenInsight table. + SQLTableName = SQL_Services('GetPrimarySQLTable', OITableName) + SQLSelectStatement = SQL_Services('GetSQLSelectStatement', OITableName, SQLTableName, OIKeyID) + SQLData = SQL_Services('ExecuteQuery', objConnection, SQLSelectStatement, True$) + If (SQLData NE '') AND (Error_Services('NoError')) then + OIRow = SQL_Services('GetMappedOIColumnValues', OITableName, SQLTableName, SQLData) + end + end + + If Error_Services('NoError') then + // Select the SQL data for all secondary SQL tables associated to the OpenInsight table. + SQLTableNames = SQL_Services('GetSecondarySQLTables', OITableName) + If SQLTableNames NE '' then + For Each SQLTableName in SQLTableNames using @FM + SQLSelectStatement = SQL_Services('GetSQLSelectStatement', OITableName, SQLTableName, OIKeyID) + // Create a new or get an existing Connection Object. + SQLServer = SQL_Services('GetMappedSQLServer', OITableName) + objConnection = SQL_Services('GetConnectionObject', SQLServer, 2) + + If Error_Services('NoError') AND (SQLSelectStatement NE '') then + SQLData = SQL_Services('ExecuteQuery', objConnection, SQLSelectStatement, True$) + If (SQLData NE '') AND (Error_Services('NoError')) then + OIRow = SQL_Services('GetMappedOIColumnValues', OITableName, SQLTableName, SQLData, OIRow) + end + end + While (Error_Services('NoError')) + Next SQLTable + end + end + end else + Error_Services('Add', 'The OITableName or OIKeyID argument was missing in the ' : Service : ' service.') + end + + Response = OIRow + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetRowCount +// +// Server - Name of the server the connection object is bound to. This should be the same name that will be used in +// the Data Source connection string. +// Table - SQL table whose row count is being requested. +// +// High level services that counts the number of rows in the designated table. This services calls other lower level +// services. +//---------------------------------------------------------------------------------------------------------------------- +Service GetRowCount(Server, TableName) + + RowCount = '' + + If (Server NE '') AND (TableName NE '') then + // Create a new or get an existing Connection Object. + objConnection = SQL_Services('GetConnectionObject', Server, 2) + + If Error_Services('NoError') then + // Select the SQL data for the primary SQL table associated to the OpenInsight table. + ErrorMessage = '' + SQLCountStatement = 'SELECT COUNT(*) FROM ' : TableName + RowCount = SQL_Services('ExecuteQuery', objConnection, SQLCountStatement, True$) + If Error_Services('HasError') then + ErrorMessage = Error_Services('GetMessage') + end + SQL_Services('DestroyConnectionObject', objConnection) + If ErrorMessage NE '' then Error_Services('Add', ErrorMessage) + end + end else + Error_Services('Add', 'The Server or TableName argument was missing in the ' : Service : ' service.') + end + + Response = RowCount + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetDataRows +// +// Server - Name of the server the connection object is bound to. This should be the same name that +// will be used in the Data Source connection string. +// QueryStatement - Query command. This should be a properly syntaxed SQL statement. +// +// High level service that gets database rows from the indicated database using the indicated query statement. This +// service will automatically get the connection and query object needed to perform the query statement. +//---------------------------------------------------------------------------------------------------------------------- +Service GetDataRows(Server, QueryStatement, AttemptsBeforeFailure) + + If AttemptsBeforeFailure EQ '' then AttemptsBeforeFailure = 1 + DataRows = '' + + If ( (Server NE '') AND (QueryStatement NE '') ) then + ErrorMessage = '' + objConnection = SQL_Services('GetConnectionObject', Server, 2) + If Error_Services('NoError') then + If Error_Services('NoError') then + DataRows = SQL_Services('ExecuteQuery', objConnection, QueryStatement, True$, AttemptsBeforeFailure) + end + // Get any errors from the GetConnectionObject service or the ExecuteQuery service. + ErrorMessage = Error_Services('GetMessage') + end + SQL_Services('DestroyConnectionObject', objConnection) + If ErrorMessage then Error_Services('Set', ErrorMessage) + end else + Error_Services('Add', 'Server or QueryStatement argument was missing in the ' : Service : 'service.') + end + + Response = DataRows + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetConnectionObject +// +// Server - Name of the server the connection object is bound to. This should be the same name that +// will be used in the Data Source connection string. +// AttemptsBeforeFailure - Number of attempts to make the connect before erroring out. Default is 1. +// +// Returns a Connection Object based on the server. A returned Connection Object means that the server has been +// successfully connected to with the provided credentials. This service uses caching, so until an existing Connection +// Object has been destroyed (see the DestroyConnectionObject service), it will continue to use the one already in +// existence. +//---------------------------------------------------------------------------------------------------------------------- +Service GetConnectionObject(Server, AttemptsBeforeFailure) + + If UseRevDotNet EQ False$ then + If AttemptsBeforeFailure EQ '' then AttemptsBeforeFailure = 1 + + objConnection = '' + + // Check to see if the Connection Object already exists. + ServiceKeyID := '*' : Server + objConnection = Memory_Services('GetValue', ServiceKeyID) + + If objConnection EQ '' then + If Server NE '' then + Attempts = 0 + Error = '' + Loop + If SRP_COM(objConnection, 'CREATE', 'ADODB.Connection') then + Memory_Services('SetValue', objConnection : '*Server', Server) + If SRP_COM('', 'ERROR') then + Error = SRP_COM('', 'ERROR') + SQL_Services('DestroyConnectionObject', objConnection) + objConnection = '' + end else + ConnectionString = SQL_Services('GetConnectionString', Server) + If Error_Services('NoError') then + SRP_COM(objConnection, 'CALL', 'Open', ConnectionString) + If SRP_COM('', 'ERROR') then + Error = SRP_COM('', 'ERROR') + SQL_Services('DestroyConnectionObject', objConnection) + objConnection = '' + end + end else + objConnection = '' + end + end + end + Attempts += 1 + Until (objConnection NE '') OR (Attempts GE AttemptsBeforeFailure) + Repeat + If objConnection then + Memory_Services('SetValue', ServiceKeyID, objConnection) + end else + If Error_Services('NoError') then + // If no error message has been set then create a generic one. + Error_Services('Add', 'Unable to create the connection object to ' : Server : ' in the ' : Service : ' service: ' : Error) + end + end + end else + Error_Services('Add', 'Server argument was missing from the ' : Service : ' service.') + end + end + + Response = objConnection + + end else + + If AttemptsBeforeFailure EQ '' then AttemptsBeforeFailure = 1 + + objConnection = '' + + // Check to see if the Connection Object already exists. + ServiceKeyID := '*' : Server : '*objConnection' + objConnection = Memory_Services('GetValue', ServiceKeyID) + + If objConnection EQ '' then + If Server NE '' then + Attempts = 0 + Error = '' + Loop + // Define the .NET version + DotNetHandle = StartDotNet("","4.0") + DotNetDir = CheckDotNet('4.0'):'\' + SqlClientDLLPath = DotNetDir:'System.Data.dll' + ConnectionString = Sql_Services('GetConnectionString', Server) + // Specify the DLL + rv = Set_Property.NET(DotNetHandle, "AssemblyName", SqlClientDLLPath) + // Define the classes + objConnection = Create_Class.NET(DotNetHandle, "System.Data.SqlClient.SqlConnection", 0, ConnectionString, 'System.String') + If Not(Get_Status(errCode)) then + rv = Set_Property.NET(objConnection, 'Pooling', 'False') + If Not(Get_Status(errCode)) then + rv = Send_Message.Net(objConnection, "Open") + If Not(Get_Status(errCode)) then + ConnectionState = Get_Property.Net(objConnection, "State") + If ConnectionState EQ 'Open' then + ClientConnectionID = Get_Property.NET(objConnection, 'ClientConnectionId', False$) + Memory_Services('SetValue', ClientConnectionID : '*Server', Server) + end else + Sql_Services('DestroyConnectionObject', objConnection) + objConnection = '' + end + end else + Sql_Services('DestroyConnectionObject', objConnection) + objConnection = '' + end + end else + Sql_Services('DestroyConnectionObject', objConnection) + objConnection = '' + end + end + Attempts += 1 + Until (objConnection NE '') OR (Attempts GE AttemptsBeforeFailure) + Repeat + If objConnection and Error_Services('NoError') then + Memory_Services('SetValue', ServiceKeyID, objConnection) + ConnObjIndex = SRP_List('Add', ConnectionObjects@, objConnection) + end else + If Assigned(objConnection) then Free_Class.Net(objConnection) + If Error_Services('NoError') then + // If no error message has been set then create a generic one. + Error_Services('Add', 'Unable to create the connection object to ' : Server : ' in the ' : Service : ' service: ' : Error) + end + end + end else + Error_Services('Add', 'Server argument was missing from the ' : Service : ' service.') + end + end + + Response = objConnection + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// DestroyConnectionObject +// +// objConnection - Connection Object (see GetConnectionObject service.) +// +// Destroys the Connection Object. This returns True$ if successful, False$ if not. +//---------------------------------------------------------------------------------------------------------------------- +Service DestroyConnectionObject(objConnection) + + Destroyed = False$ ; // Assume object is not destroyed for now. + + If UseRevDotNet EQ False$ then + + If objConnection NE '' then + Error = '' + // Close the connection object, but don't worry about errors. It might have already been closed. + SRP_COM(objConnection, 'CALL', 'Close') + SRP_COM(objConnection, 'RELEASE') + If SRP_COM('', 'ERROR') then + Error = SRP_COM('', 'ERROR') + end else + Destroyed = True$ + end + If Destroyed then + SQL_Services('ClearConnectionErrors', objConnection) + Server = Memory_Services('GetValue', objConnection : '*Server') + Memory_Services('SetValue', ServiceModule : '*GetConnectionObject*' : Server, '') + end else + SQL_Services('AddConnectionErrors', objConnection, Error) + Error_Services('Add', 'Service : ' : Service : ', Error : ' : Error) + end + end else + Error_Services('Add', 'The objConnection argument was missing in the ' : Service : ' service.') + end + + end else + + If objConnection NE '' then + ConnObjIndex = SRP_List('Locate', ConnectionObjects@, objConnection) + If ConnObjIndex GT 0 then + Error = '' + ClientConnectionID = Get_Property.NET(objConnection, 'ClientConnectionId', False$) + // Close the connection object, but don't worry about errors. It might have already been closed. + Set_Status(0) + Sql_Services('ClearConnectionErrors', objConnection) + rv = Send_Message.Net(objConnection, 'Close') + errCode = '' + If Not(Get_Status(errCode)) then + Server = Memory_Services('GetValue', ClientConnectionID : '*Server') + MemKey = ServiceModule : '*GetConnectionObject*' : Server : '*objConnection' + Memory_Services('SetValue', MemKey, '') + SRP_List('RemoveAt', ConnectionObjects@, ConnObjIndex) + Free_Class.Net(objConnection) + end else + Error = 'Error in service ':Service:'. Failed to close SQL connection. Error code: ':errCode + Sql_Services('AddConnectionErrors', objConnection, Error) + Error_Services('Add', 'Service : ' : Service : ', Error : ' : Error) + end + end + + end else + Error_Services('Add', 'The objConnection argument was missing in the ' : Service : ' service.') + end + + end + Response = Destroyed + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// AddConnectionErrors +// +// objConnection - Connection Object (see GetConnectionObject service.) +// ErrorList - @FM delimited list of errors. +// +// Adds a list of errors to the indicated Connection Object so the GetConnectionErrors service can retrieve them at +// will. This list will accumulate until the ClearConnectionErrors service is called. +//---------------------------------------------------------------------------------------------------------------------- +Service AddConnectionErrors(objConnection, ErrorList) + + If UseRevDotNet EQ False$ then + objConnection = objConnection[1, '*'] + ServiceKeyID = ServiceModule : '*' : 'GetConnectionErrors' : '*' : objConnection + ConnectionErrors = Memory_Services('GetValue', ServiceKeyID) + + If (objConnection NE '') AND (ErrorList NE '') then + If ConnectionErrors NE '' then + ConnectionErrors := @FM : ErrorList + end else + ConnectionErrors = ErrorList + end + Memory_Services('SetValue', ServiceKeyID, ConnectionErrors) + end else + Error_Services('Add', 'The objConnection or ErrorList argument was missing in the ' : Service : ' service.') + end + end else + objConnection = objConnection[1, '*'] + ClientConnectionID = Get_Property.NET(objConnection, 'ClientConnectionId', False$) + ServiceKeyID = ServiceModule : '*' : 'GetConnectionErrors' : '*' : ClientConnectionID + ConnectionErrors = Memory_Services('GetValue', ServiceKeyID) + + If (objConnection NE '') AND (ErrorList NE '') then + If ConnectionErrors NE '' then + ConnectionErrors := @FM : ErrorList + end else + ConnectionErrors = ErrorList + end + Memory_Services('SetValue', ServiceKeyID, ConnectionErrors) + end else + Error_Services('Add', 'The objConnection or ErrorList argument was missing in the ' : Service : ' service.') + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetConnectionErrors +// +// objConnection - Connection Object (see GetConnectionObject service.) +// +// Returns an @FM list of all connection errors associated with the indicated Connection Object. +//---------------------------------------------------------------------------------------------------------------------- +Service GetConnectionErrors(objConnection) + + If UseRevDotNet EQ False$ then + objConnection = objConnection[1, '*'] + ConnectionErrors = '' + + If objConnection NE '' then + ServiceKeyID = ServiceModule : '*' : 'GetConnectionErrors' : '*' : objConnection + ConnectionErrors = Memory_Services('GetValue', ServiceKeyID) + end else + Error_Services('Add', 'The objConnection argument was missing in the ' : Service : ' service.') + end + + Response = ConnectionErrors + end else + objConnection = objConnection[1, '*'] + ConnectionErrors = '' + + If objConnection NE '' then + ClientConnectionID = Get_Property.NET(objConnection, 'ClientConnectionId', False$) + ServiceKeyID = ServiceModule : '*' : 'GetConnectionErrors' : '*' : ClientConnectionID + ConnectionErrors = Memory_Services('GetValue', ServiceKeyID) + end else + Error_Services('Add', 'The objConnection argument was missing in the ' : Service : ' service.') + end + + Response = ConnectionErrors + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ClearConnectionErrors +// +// objConnection - Connection Object (see GetConnectionObject service.) +// +// Clears all connection errors associated with the indicated Connection Object. +//---------------------------------------------------------------------------------------------------------------------- +Service ClearConnectionErrors(objConnection) + + If UseRevDotNet EQ False$ then + objConnection = objConnection[1, '*'] + + If objConnection NE '' then + ServiceKeyID = ServiceModule : '*' : 'GetConnectionErrors' : '*' : objConnection + Memory_Services('SetValue', ServiceKeyID, '') + end else + Error_Services('Add', 'The objConnection argument was missing in the ' : Service : ' service.') + end + end else + objConnection = objConnection[1, '*'] + + If objConnection NE '' then + ClientConnectionID = Get_Property.NET(objConnection, 'ClientConnectionId', False$) + ServiceKeyID = ServiceModule : '*' : 'GetConnectionErrors' : '*' : ClientConnectionID + Memory_Services('SetValue', ServiceKeyID, '') + end else + Error_Services('Add', 'The objConnection argument was missing in the ' : Service : ' service.') + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// HasConnectionErrors +// +// objConnection - Connection Object (see GetConnectionObject service.) +// +// Returns a Boolean flag indicating of the Connection Object has any connection errors. +//---------------------------------------------------------------------------------------------------------------------- +Service HasConnectionErrors(objConnection) + + objConnection = objConnection[1, '*'] + HasErrors = False$ ; // Assume no errors for now. + + If objConnection NE '' then + ConnectionErrors = SQL_Services('GetConnectionErrors', objConnection) + If ConnectionErrors NE '' then + HasErrors = True$ + end else + HasErrors = False$ + end + end else + Error_Services('Add', 'The objConnection argument was missing in the ' : Service : ' service.') + end + + Response = HasErrors + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetConnectionString +// +// Returns a well formed Connection String for the current server. This is used for ADO connections. +//---------------------------------------------------------------------------------------------------------------------- +Service GetConnectionString(Server) + + If UseRevDotNet EQ False$ then + ServiceKeyID := '*' : Server + ConnectionString = Memory_Services('GetValue', ServiceKeyID) + + If ConnectionString EQ '' then + If (Server NE '') then + ConnectionInfo = Database_Services('ReadDataRow', 'SERVERS', Server) + If ConnectionInfo NE '' then + Swap \0D0A\ with @FM in ConnectionInfo + ConnectionString = ConnectionInfo<3> + ConnectionString := ';' + Memory_Services('SetValue', ServiceKeyID, ConnectionString) + end else + Error_Services('Add', Server : ' is not a valid server. [' : Service : ']') + end + end else + Error_Services('Add', 'The Server argument was missing in the ' : Service : ' service.') + end + end + + Response = ConnectionString + end else + + If (Server NE '') then +* Domain = Active_Directory_Services('GetComputerDomain') +* Begin Case +* Case Domain _EQC 'infineon.com' + // Prod Stealth + ConnectionString = Database_Services('ReadDataRow', 'SERVERS', Server:'_STEALTH') +* Case Domain _EQC 'ec.local' +* // Prod EC +* ConnectionString = Database_Services('ReadDataRow', 'SERVERS', Server) +* Case Otherwise$ +* // Default Prod EC +* ConnectionString = Database_Services('ReadDataRow', 'SERVERS', Server) +* End Case + + If ConnectionString NE '' then + ConnectionString = Delete(ConnectionString, 2, 0, 0) + ProviderIdx = IndexC(ConnectionString, 'Provider', 1) + If ProviderIdx then + ConnectionString = ConnectionString[(ProviderIdx + 1), 999] + ProviderEndIdx = Index(ConnectionString, ';', 1) + ConnectionString = ConnectionString[(ProviderEndIdx + 1), 999] + end + ServerIdx = IndexC(ConnectionString, 'Server', 1) + If ServerIdx then + ServerLen = Len(ConnectionString[ServerIdx, 'F;']) + ConnectionString[ServerIdx, ServerLen + 1] = '' + end + InitialIdx = IndexC(ConnectionString, 'Initial File Name', 1) + If InitialIdx then + InitialLen = Len(ConnectionString[InitialIdx, 'F;']) + ConnectionString[InitialIdx, InitialLen + 1] = '' + end + DataSourceIdx = IndexC(ConnectionString, 'Data Source', 1) + If DataSourceIdx then + ConnectionString[DataSourceIdx + 12, 0] = 'tcp:' + end + If ConnectionString[-1, 1] EQ ';' then ConnectionString[-1, 1] = '' + end else + Error_Services('Add', Server : ' is not a valid server. [' : Service : ']') + end + end else + Error_Services('Add', 'The Server argument was missing in the ' : Service : ' service.') + end + + Response = ConnectionString + + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ExecuteQuery +// +// objConnection - Connection Object (see GetConnectionObject service.) +// QueryStatement - Query command. This should be a properly syntaxed SQL statement. +// ReturnDataRows - Boolean flag to determine if all data rows resulting from the query should automatically be +// returned. This is the same as if the caller used the GetAllQueryDataRows service, but this allows +// everything to be done in one service rather than two. Default is False$ +// +// Executes the query against the Connection Object. If the ReturnDataRows argument is False$, then this returns True$ +// if there are results, False$ if there are no results or if there is a problem running the services. Otherwise, the +// datarows from the query will be returned unless there is an error. +//---------------------------------------------------------------------------------------------------------------------- +Service ExecuteQuery(objConnection, QueryStatement, ReturnDataRows=BOOLEAN, AttemptsBeforeFailure) + + If AttemptsBeforeFailure EQ '' then AttemptsBeforeFailure = 1 + Results = False$ ; // Assume no results from this query for now. + If ReturnDataRows NE True$ then ReturnDataRows = False$ + ErrorMessage = '' + If UseRevDotNet EQ False$ then + + If (objConnection NE '') AND (QueryStatement NE '') then + Attempts = 0 + ErrorMessage = '' + Loop + objRecordSet = SRP_COM(objConnection, 'CALL', 'Execute', QueryStatement) + If SRP_COM('', 'ERROR') OR (objRecordSet EQ 0) then + ErrorMessage = 'ADO error in the ' : Service : ' service: ' : SRP_COM('', 'ERROR') + Results = '' ; // Since there is an error, no result should be returned. + end else + If ReturnDataRows then + Results = SQL_Services('GetAllQueryDataRows', objRecordSet) + end else + Results = True$ + end + SRP_COM(objRecordSet, 'CALL', 'Cancel') + SRP_COM(objRecordSet, 'RELEASE') + end + Attempts += 1 + Until ( (ErrorMessage EQ '') OR (Attempts GE AttemptsBeforeFailure) ) + Repeat + end else + Error_Services('Add', 'The objConnection or QueryStatement argument was missing in the ' : Service : ' service.') + end + end else + If (objConnection NE '') AND (QueryStatement NE '') then + Attempts = 0 + ConnObjIndex = SRP_List('Locate', ConnectionObjects@, objConnection) + If ConnObjIndex GT 0 then + Loop + objCommand = Send_Message.Net(objConnection, 'CreateCommand', '', '', 1) + If Not(Get_Status(errCode)) then + rv = Set_Property.NET(objCommand, 'CommandText', QueryStatement) + If Not(Get_Status(errCode)) then + If ReturnDataRows then + objReader = Send_Message.Net(objCommand, 'ExecuteReader', '', '', 1) + If Not(Get_Status(errCode)) then + Reading = '' + RowIndex = 0 + Loop + RowData = '' + RowIndex += 1 + Reading = Send_Message.Net(objReader, 'Read') + Until ( (Reading EQ 'False') or (ErrorMessage NE '') ) + If Not(Get_Status(errCode)) then + NumCols = Get_Property.Net(objReader, 'FieldCount') + If Not(Get_Status(errCode)) then + For Col = 1 to NumCols + DotNetObj = Send_Message.Net(objReader, 'GetValue', (Col - 1), 'System.Int32', 1) + If Not(Get_Status(errCode)) then + Result = Send_Message.Net(DotNetObj, 'ToString') + If (Result EQ 'True' or Result EQ 'False') then + DotNetObjType = Send_Message.Net(DotNetObj, 'GetType') + If DotNetObjType EQ 'System.Boolean' then + Swap 'True' with 1 in Result + Swap 'False' with 0 in Result + end + end + RowData<0, Col> = Result + If Get_Status(errCode) then + ErrorMessage = 'Error calling ToString method in the Object object in the ' : Service : ' service.' : errCode + end + end else + ErrorMessage = 'Error calling GetValue method in the SqlDataReader object in the ' : Service : ' service.' : errCode + end + If Assigned(DotNetObj) then Free_Class.NET(DotNetObj) + Until Error EQ True$ + Next Col + + end else + ErrorMessage = 'Error getting FieldCount property of the SqlDataReader in the ' : Service : ' service.' : errCode + end + end else + ErrorMessage = 'Error calling Read method in the SqlDataReader object in the ' : Service : ' service.' : errCode + end + Results = RowData + Repeat + If Reading EQ 'False' and RowIndex EQ 1 then Results = '' ; // No results + end else + AccessError = (IndexC(errCode, 'not able to access the database', 1) GT 0) + If Not(AccessError) then ErrorMessage = 'Error creating SqlDataReader object in the ' : Service : ' service.' : errCode + end + Swap @FM with @RM in Results + Swap @VM with @FM in Results + If Assigned(objReader) and (objReader NE '') then + rv = Send_Message.Net(objReader, 'Close') + Free_Class.NET(objReader) + end + end else + objTransaction = Send_Message.Net(objConnection, 'BeginTransaction', '', '', 1) + If Not(Get_Status(errCode)) then + rv = Set_Property.NET(objCommand, 'Transaction', objTransaction) + If Not(Get_Status(errCode)) then + Results = Send_Message.Net(objCommand, "ExecuteScalar") + If Not(Get_Status(errCode)) then + rv = Send_Message.Net(objTransaction, 'Commit') + If Get_Status(errCode) then + AllAccepted = False$ + ErrorMessage = 'Error committing transaction in the ' : Service : ' service.' : errCode + end else + Results = True$ + end + end else + ErrorMessage = 'Failed to execute SQL command in the ' :Service : 'service.' : errCode + end + end else + ErrorMessage = 'Unable to set Transaction property of the SqlCommand object in the ' : Service : ' service: ' : errCode + end + end else + ErrorMessage = 'Unable to create the SQLTransaction object in the ' : Service : ' service: ' : errCode + end + end + end else + ErrorMessage = 'Unable to set CommandText property of the SQLCommand object in the ' : Service : ' service: ' : errCode + end + If Assigned(objTransaction) then Free_Class.NET(objTransaction) + If Assigned(objCommand) then Free_Class.NET(objCommand) + end else + ErrorMessage = 'Unable to create the SQLCommand object in the ' : Service : ' service: ' : errCode + end + Attempts += 1 + Until ( (ErrorMessage EQ '') or (Attempts GE AttemptsBeforeFailure) ) + Repeat + end else + ErrorMessage = 'objCommand could not be found in the ' : Service : ' service.' + end + end else + ErrorMessage = 'The objConnection or QueryStatement argument was missing in the ' : Service : ' service.' + end + If ErrorMessage NE '' then + Results = '' + LogData = '' + LogData<1> = LoggingDTM + LogData<2> = QueryStatement + LogData<3> = ErrorMessage + Logging_Services('AppendLog', objLog, LogData, @RM, @FM) + Swap @FM with @VM in ErrorMessage + Error_Services('Add', ErrorMessage) + end + end + Response = Results + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// ExecuteQueries +// +// objConnection - Connection Object (see GetConnectionObject service.) +// QueryStatements - @FM delimited list of Query commands. These should be a properly syntaxed SQL statement. +// +// Executes one or more queries against the Connection Object. This returns True$ if all queries processed without any +// errors, False$ if there is a problem running any of the queries. +//---------------------------------------------------------------------------------------------------------------------- +Service ExecuteQueries(objConnection, QueryStatements, UseTransactionControl=BOOLEAN, OITableName, OIKeyID) + + If UseTransactionControl NE True$ then UseTransactionControl = False$ + + AllAccepted = True$ ; // Assume all queries were accepted for now unless otherwise proven. + ErrorMessage = '' + + If UseRevDotNet EQ False$ then + + If (objConnection NE '') AND (QueryStatements NE '') then + *Message = '1. Begin transaction processing.' ; GoSub WriteLog + If UseTransactionControl EQ True$ then + // Begin transaction processing. + objRecordSet = SRP_COM(objConnection, 'CALL', 'Execute', 'BEGIN TRANSACTION') + *Message = '2. Begin transaction processing.' ; GoSub WriteLog + If SRP_COM('', 'ERROR') OR (objRecordSet EQ 0) then + *Message = '3a. Begin transaction processing.' ; GoSub WriteLog + Error_Services('Add', 'ADO error in the ' : Service : ' service: ' : SRP_COM('', 'ERROR')) + end else + *Message = '3b. Begin transaction processing.' ; GoSub WriteLog + SRP_COM(objRecordSet, 'RELEASE') + end + end + *Message = '4. Begin transaction processing.' ; GoSub WriteLog + If Error_Services('NoError') then + *Message = '5. Begin execute call.' ; GoSub WriteLog + For Each QueryStatement in QueryStatements using @FM + If QueryStatement NE '' then + *Message = '6. Begin execute call.' ; GoSub WriteLog + objRecordSet = SRP_COM(objConnection, 'CALL', 'Execute', QueryStatement) + If SRP_COM('', 'ERROR') OR (objRecordSet EQ 0) then + *Message = '7a. Begin execute call.' ; GoSub WriteLog + Error_Services('Add', 'ADO error in the ' : Service : ' service: ' : SRP_COM('', 'ERROR')) + AllAccepted = False$ + end else + *Message = '7b. Begin execute call.' ; GoSub WriteLog + SRP_COM(objRecordSet, 'RELEASE') + end + end + Until Error_Services('HasError') + Next QueryStatement + end + *Message = '8. Begin execute call.' ; GoSub WriteLog + If UseTransactionControl EQ True$ then + // COMMIT or ROLLBACK the transaction. + *Message = '9. Begin execute call.' ; GoSub WriteLog + If Error_Services('NoError') then + *Message = '10a. Begin execute call.' ; GoSub WriteLog + objRecordSet = SRP_COM(objConnection, 'CALL', 'Execute', 'COMMIT TRANSACTION') + end else + *Message = '10b. Begin execute call.' ; GoSub WriteLog + AllAccepted = False$ + objRecordSet = SRP_COM(objConnection, 'CALL', 'Execute', 'ROLLBACK TRANSACTION') + SRP_COM(objRecordSet, 'RELEASE') + end + *Message = '11. Begin execute call.' ; GoSub WriteLog + SRP_COM(objRecordSet, 'RELEASE') + end + end else + *Message = '12. All accepted not true.' ; GoSub WriteLog + AllAccepted = False$ + Error_Services('Add', 'The objConnection or QueryStatement argument was missing in the ' : Service : ' service.') + end + end else + If (objConnection NE '') AND (QueryStatements NE '') then + ConnObjIndex = SRP_List('Locate', ConnectionObjects@, objConnection) + If ConnObjIndex GT 0 then + objCommand = Send_Message.Net(objConnection, 'CreateCommand', '', '', 1) + If Not(Get_Status(errCode)) then + objTransaction = Send_Message.Net(objConnection, 'BeginTransaction', 'Test', 'System.String', 1) + If Not(Get_Status(errCode)) then + rv = Set_Property.NET(objCommand, 'Transaction', objTransaction) + If Not(Get_Status(errCode)) then + For Each QueryStatement in QueryStatements using @FM + If QueryStatement NE '' then + rv = Set_Property.Net(objCommand, 'CommandText', QueryStatement) + If Not(Get_Status(errCode)) then + rv = Send_Message.Net(objCommand, 'ExecuteNonQuery') + If Get_Status(errCode) then + ErrorMessage = 'Error executing command ':Quote(QueryStatement):' in the ' : Service : ' service.' : errCode + end + end else + ErrorMessage = 'Error setting CommandText property of the SqlCommand object in the ' : Service : ' service.' : errCode + end + end + Until ErrorMessage NE '' + Next QueryStatement + end else + ErrorMessage = 'Unable to set Transaction property of the SqlCommand object in the ' : Service : ' service. ' : errCode + end + end else + ErrorMessage = 'Unable to create the SQLTransaction object in the ' : Service : ' service. ' : errCode + end + end else + ErrorMessage = 'Unable to create the SQLCommand object in the ' : Service : ' service. ' : errCode + end + If UseTransactionControl EQ True$ then + // COMMIT or ROLLBACK the transaction. + If ErrorMessage EQ '' then + rv = Send_Message.Net(objTransaction, 'Commit') + If Get_Status(errCode) then + AllAccepted = False$ + ErrorMessage = 'Error committing transaction in the ' : Service : ' service.' : errCode + end + end else + AllAccepted = False$ + rv = Send_Message.Net(objTransaction, 'Rollback') + end + end + If Assigned(objTransaction) then Free_Class.NET(objTransaction) + If Assigned(objCommand) then Free_Class.NET(objCommand) + end + end else + AllAccepted = False$ + ErrorMessage = 'The objConnection or QueryStatement argument was missing in the ' : Service : ' service.' + end + If ErrorMessage NE '' then + LogData = '' + LogData<1> = LoggingDTM + LogData<2> = OITableName + LogData<3> = OIKeyID + LogData<4> = ErrorMessage + Logging_Services('AppendLog', objLog, LogData, @RM, @FM) + Swap @FM with ',' in ErrorMessage + Error_Services('Add', ErrorMessage) + end + end + + Response = AllAccepted + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetAllQueryDataRows +// +// objRecordSet - RecordSet Object (see ExecuteQuery service.) +// +// Gets all of the data rows from the RecordSet Object. This returns an @RM array of data rows. +//---------------------------------------------------------------------------------------------------------------------- +Service GetAllQueryDataRows(objRecordSet) + + DataRows = '' + + If Len(objRecordSet) then + BOF = SRP_COM(objRecordSet, 'GET', 'BOF') + EOF = SRP_COM(objRecordSet, 'GET', 'EOF') + If (EOF EQ False$) then + DataRows = SRP_COM(objRecordSet, 'CALL', 'GetString', 2, -1, @FM, @RM) + If SRP_COM('', 'ERROR') then + Error = SRP_COM('', 'ERROR') + Error_Services('Add', 'ADO error in the ' : Service : ' service: ' : SRP_COM('', 'ERROR')) + end + If Error_Services('NoError') then + If DataRows[-1, 1] EQ @RM then DataRows[-1, 1] = '' + If DataRows EQ objRecordSet then + DataRows = '' + Error_Services('Add', 'Unknown ADO error in the ' : Service : ' service.') + end else + If SRP_COM('', 'ERROR') then + Error = SRP_COM('', 'ERROR') + If IndexC(Error, 'current record has been deleted', 1) then + DataRows = '' + end else + Error_Services('Add', 'ADO error in the ' : Service : ' service: ' : SRP_COM('', 'ERROR')) + end + end + end + end + end + end else + Error_Services('Add', 'The objRecordSet argument was missing in the ' : Service : ' service.') + end + + Response = DataRows + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetServers +// +// Returns an @FM list of database servers. +//---------------------------------------------------------------------------------------------------------------------- +Service GetServers() + + Servers = '' + hServers = Database_Services('GetTableHandle', 'SERVERS') + If Error_Services('NoError') then + Select hServers + EOF = False$ + Loop + Readnext ServerID else EOF = True$ + Until EOF + Servers := ServerID : @FM + Repeat + Servers[-1, 1] = '' + Servers = SRP_Array('SortRows', Servers, 'AL1', 'LIST', @FM, @VM) + end + + Response = Servers + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SaveConnectionString +// +// ServerID - Key ID to a row in the SERVERS database table. +// ConnectionString - SQL server connection string +// +// If a row in the SERVERS table with the key ServerID exists, updates the connection string, otherwise a new row +// within the SERVERS database table containing ConnectionString. +//---------------------------------------------------------------------------------------------------------------------- +Service SaveConnectionString(ServerName, ConnectionString) + + If ServerName NE '' then + ServerRec = Database_Services('ReadDataRow', 'SERVERS', ServerName) + ServerRec = ConnectionString + Database_Services('WriteDataRow', 'SERVERS', ServerName, ServerRec, True$, False$, True$) + end else + ErrorMsg = 'Error saving connection. Null server name passed in to the ' : Service : ' service.' + Error_Services('Add', ErrorMsg) + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// CreateNewConnectionString +// +// Utilizes the Windows Data Link Properties utility to create a new connection string. +// Returns a field mark delimited array containing a suggested server name (the data source) and the connection string +// generated by the Windows Data Link Properties utility. +//---------------------------------------------------------------------------------------------------------------------- +Service CreateNewConnectionString() + + Response = '' + ServerName = '' + ConnectionString = '' + OleDBString = '' + Filename = 'temp.udl' + TempPath = Str(\00\, 1024) + GetTempPath(Len(TempPath), TempPath) + Convert \00\ to '' in TempPath + TempFilename = Str(\00\, 1024) + GetTempFileName(TempPath, \00\, 0, TempFilename) + OSWrite OleDBString to TempFilename + UDLFile = 'C:\Windows\syswow64\rundll32.exe "C:\Program Files (x86)\Common Files\System\Ole DB\oledb32.dll",OpenDSLFile ' : TempFilename + Mode = '-1' ;* modal + rv = Utility('RUNWIN', UDLFile, Mode) + OSRead ConnectionString from TempFilename then + If ConnectionString NE '' then + Convert \FFFE\ to '' in ConnectionString + ConnectionString = Unicode_UTF8(ConnectionString) + DataSourcePos = Index(ConnectionString, 'Data Source', 1) + ServerPos = Index(ConnectionString, 'Server', 1) + Begin Case + Case DataSourcePos + ServerName = ConnectionString[(DataSourcePos + Len('Data Source') + 1), 'F;'] + Case ServerPos + ServerName = ConnectionString[(ServerPos + Len('Server') + 1), 'F;'] + End Case + end + end + Response = ServerName : @FM : ConnectionString + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// EditConnection +// +// ServerID - Key ID for the SERVERS database table. +// +// Utilizes the Windows Data Link Properties utility to edit the connection string found in the SERVERS record +// associated with the ServerID key. +//---------------------------------------------------------------------------------------------------------------------- +Service EditConnection(ServerID) + + If ServerID NE '' then + ServerRec = Database_Services('ReadDataRow', 'SERVERS', ServerID) + If Error_Services('NoError') then + ConnectionString = ServerRec + TempPath = Str(\00\, 1024) + GetTempPath(Len(TempPath), TempPath) + TempFilename = Str(\00\, 1024) + GetTempFileName(TempPath, \00\, 0, TempFilename) + If ConnectionString NE '' then + UnicodeString = \FFFE\ : Str_Unicode(ConnectionString) + OSWrite UnicodeString To TempFilename + end else + OSWrite '' to TempFileName + end + Program = 'C:\Windows\syswow64\rundll32.exe "C:\Program Files (x86)\Common Files\System\Ole DB\oledb32.dll",OpenDSLFile ':TempFilename + Mode = '-1' ;* modal + rv = Utility("RUNWIN", Program, Mode) + NewFile = '' + OSRead NewConnectionString from TempFilename then + Convert \FFFE\ to '' in NewConnectionString + NewConnectionString = Unicode_UTF8(NewConnectionString) + ServerRec = NewConnectionString + Database_Services('WriteDataRow', 'SERVERS', ServerID, ServerRec, True$, False$, True$) + end + end + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// DeleteConnection +// +// ServerID - Key ID for the SERVERS database table. +// +// Deletes the SERVERS record associated with the ServerID key. +//---------------------------------------------------------------------------------------------------------------------- +Service DeleteConnection(ServerID) + + If ServerID NE '' then + Database_Services('DeleteDataRow', 'SERVERS', ServerID, True$) + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetConnectionDesc +// +// ServerID - Key ID for the SERVERS database table. +// Description - Description of the server connection +// +// Sets the DESCRIPTION column of the SERVERS record associated with the ServerID key. +//---------------------------------------------------------------------------------------------------------------------- +Service SetConnectionDesc(ServerID, Description) + + If ServerID NE '' then + ServerRec = Database_Services('ReadDataRow', 'SERVERS', ServerID) + ServerRec = Description + Database_Services('WriteDataRow', 'SERVERS', ServerID, ServerRec) + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetOITableToSQLMap +// +// TableName - OpenInsight table being mapped. - [Required] +// SQLMap - JSON object containing the OI Table to SQL Map information. - [Required] +// +// Updates the stored JSON object that defines the mapping between the indicated OpenInsight table and the SQL table. +//---------------------------------------------------------------------------------------------------------------------- +Service SetOITableToSQLMap(TableName, SQLMap) + + Convert @Lower_Case to @Upper_Case in TableName + ServiceKeyID = ServiceModule : '*' : 'GetOITableToSQLMap' : '*' : TableName + + If (TableName NE '') AND (SQLMap NE '') then + Convert \0D0A\ to @FM in SQLMap ; // Makes it easier to inspect. The GetOITableToSQLMap service removes the @FMs. + Database_Services('WriteDataRow', 'DICT.' : TableName, '%SQLMap%', SQLMap, True$) + If Error_Services('NoError') then + Convert @FM to '' in SQLMap + Memory_Services('SetValue', ServiceKeyID, SQLMap) + end + end else + Error_Services('Add', 'The TableName or SQLMap argument was missing in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetOITableToSQLMap +// +// TableName - OpenInsight table being mapped. - [Required] +// +// Returns JSON object that defines the mapping between the indicated OpenInsight table and the SQL table. +//---------------------------------------------------------------------------------------------------------------------- +Service GetOITableToSQLMap(TableName) + + Convert @Lower_Case to @Upper_Case in TableName + + ServiceKeyID := '*' : TableName + OITableToSQLMap = Memory_Services('GetValue', ServiceKeyID) + + If OITableToSQLMap EQ '' then + If TableName NE '' then + OITableToSQLMap = Database_Services('ReadDataRow', 'DICT.' : TableName, '%SQLMap%') + Convert @FM to '' in OITableToSQLMap + If OITableToSQLMap NE '' then + Memory_Services('SetValue', ServiceKeyID, OITableToSQLMap) + end + end else + Error_Services('Add', 'The TableName argument was missing in the ' : Service : ' service.') + end + end + + Response = OITableToSQLMap + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// SetOIColumnToSQLMap +// +// TableName - OpenInsight table being mapped. - [Required] +// ColumnName - Database column from the OpenInsight table. - [Required] +// SQLMap - JSON object containing the OI Column to SQL Map information. - [Required] +// +// Updates the stored JSON object that defines the mapping between the indicated OpenInsight column and the SQL table. +//---------------------------------------------------------------------------------------------------------------------- +Service SetOIColumnToSQLMap(TableName, ColumnName, SQLMap) + + Convert @Lower_Case to @Upper_Case in TableName + Convert @Lower_Case to @Upper_Case in ColumnName + ServiceKeyID = ServiceModule : '*' : 'GetOIColumnToSQLMap' : '*' : TableName : '*' : ColumnName + + If (TableName NE '') AND (ColumnName NE '') AND (SQLMap NE '') then + Convert @FM to '' in SQLMap + Convert \0D0A\ to '' in SQLMap + ColumnData = Database_Services('ReadDataRow', 'DICT.' : TableName, ColumnName) + ColumnData = SQLMap + Database_Services('WriteDataRow', 'DICT.' : TableName, ColumnName, ColumnData, True$) + If Error_Services('NoError') then + Memory_Services('SetValue', ServiceKeyID, SQLMap) + end + end else + Error_Services('Add', 'The TableName, ColumnName, or SQLMap argument was missing in the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetAllOIColumnToSQLMaps +// +// TableName - OpenInsight table being mapped. - [Required] +// +// Returns an @FM/@VM delimited array of all JSON objects that define the mapping being the table columns and their +// respective SQL table columns. Columns with no maps will return an empty string for the JSON object. +//---------------------------------------------------------------------------------------------------------------------- +Service GetAllOIColumnToSQLMaps(TableName) + + Convert @Lower_Case to @Upper_Case in TableName + ColumnSQLMaps = '' + + If TableName NE '' then + FieldArray = Database_Services('ReadDataRow', 'DICT.' : TableName, '%FIELDS%') + ColumnNames = FieldArray + For Each ColumnName in ColumnNames using @VM + SQLMap = SQL_Services('GetOIColumnToSQLMap', TableName, ColumnName) + ColumnSQLMaps := ColumnName : @VM + If SQLMap NE '' then + ColumnSQLMaps := SQLMap + end + ColumnSQLMaps := @FM + Next ColumnName + ColumnSQLMaps[-1, 1] = '' + end else + Error_Services('Add', 'The TableName argument was missing in the ' : Service : ' service.') + end + + Response = ColumnSQLMaps + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetOIColumnToSQLMap +// +// TableName - OpenInsight table being mapped. - [Required] +// ColumnName - Database column from the OpenInsight table. - [Required] +// +// Returns JSON object that defines the mapping between the indicated OpenInsight table column and the SQL table column. +//---------------------------------------------------------------------------------------------------------------------- +Service GetOIColumnToSQLMap(TableName, ColumnName) + + Convert @Lower_Case to @Upper_Case in TableName + Convert @Lower_Case to @Upper_Case in ColumnName + ServiceKeyID := '*' : TableName : '*' : ColumnName + OIColumnToSQLMap = Memory_Services('GetValue', ServiceKeyID) + + If OIColumnToSQLMap EQ '' then + If (TableName NE '') AND (ColumnName NE '') then + ColumnData = Database_Services('ReadDataRow', 'DICT.' : TableName, ColumnName) + OIColumnToSQLMap = ColumnData + If OIColumnToSQLMap NE '' then + Memory_Services('SetValue', ServiceKeyID, OIColumnToSQLMap) + end + end else + Error_Services('Add', 'The TableName or ColumnName argument was missing in the ' : Service : ' service.') + end + end + + Response = OIColumnToSQLMap + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMappedSQLServer +// +// Returns the name of the SQL Server that the indicated OpenInsight table is mapped to. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMappedSQLServer(OITableName) + + Convert @Lower_Case to @Upper_Case in OITableName + ServiceKeyID := '*' : OITableName + SQLServer = Memory_Services('GetValue', ServiceKeyID) + + If SQLServer EQ '' then + If OITableName NE '' then + OITableToSQLMap = SQL_Services('GetOITableToSQLMap', OITableName) + If SRP_JSON(MapObj, 'PARSE', OITableToSQLMap) EQ '' then + SQLServer = SRP_JSON(MapObj, 'GETVALUE', 'SQLServer.Name') + SRP_JSON(MapObj, 'RELEASE') + end + If SQLServer NE '' then Memory_Services('SetValue', ServiceKeyID, SQLServer) + end else + Error_Services('Add', 'OITableName argument was missing in the ' : Service : ' service.') + end + end + + Response = SQLServer + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetDatabases +// +// objConnection - Connection Object (see GetConnectionObject service.) - [Optional, but Server is then Required] +// Server - Name of a defined server. - [Optional, but objConnection is then Required] +// +// Returns an @FM list of databases available through the indicated connection object. If the connection object is +// empty, then a new one will be created (and then subsequently destroyed) for the indicated server. +//---------------------------------------------------------------------------------------------------------------------- +Service GetDatabases(objConnection, Server) + + Databases = '' + + If (objConnection NE '') OR (Server NE '') then + If objConnection EQ '' then + objConnection = SQL_Services('GetConnectionObject', Server, 3) + NewObject = True$ + end else + NewObject = False$ + end + + If Error_Services('NoError') then + SQLQuery = "SELECT name FROM sys.databases WHERE name NOT IN ('master', 'tempdb', 'model', 'msdb')" + Databases = SQL_Services('ExecuteQuery', objConnection, SQLQuery, True$) + If Databases EQ 0 then + Databases = '' + Error_Services('Add', 'Unknown error in the ' : Service : ' service for server ' : Server : '.') + end else + Convert @RM to @FM in Databases + end + end + + If NewObject EQ True$ then + SQL_Services('DestroyConnectionObject', objConnection) + end + end else + Error_Services('Add', 'objConnection and Server arguments were both missing in the ' : Service : ' service.') + end + + Response = Databases + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSchemas +// +// objConnection - Connection Object (see GetConnectionObject service.) - [Optional, but Server is then Required] +// Server - Name of a defined server. - [Optional, but objConnection is then Required] +// Database - Name of a specific database to use. If empty, then all databases will be used. - [Required] +// +// Returns an @FM list of schemas available for the indicated database. If the connection object is empty, then a new +// one will be created (and then subsequently destroyed) for the indicated server. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSchemas(objConnection, Server, Database) + + Schemas = '' + + If Database NE '' then + If (objConnection NE '') OR (Server NE '') then + If objConnection EQ '' then + objConnection = SQL_Services('GetConnectionObject', Server, 3) + NewObject = True$ + end else + NewObject = False$ + end + + If Error_Services('NoError') then + SQLQuery = "SELECT DISTINCT TABLE_SCHEMA FROM [" : Database : "].INFORMATION_SCHEMA.TABLES WHERE TABLE_TYPE='BASE TABLE'" + Schemas = SQL_Services('ExecuteQuery', objConnection, SQLQuery, True$) + If Error_Services('NoError') then + Convert @RM to @FM in Schemas + end else + Message = Error_Services('GetMessage') + If IndexC(Message, 'not able to access the database', 1) AND IndexC(Message, 'under the current security context', 1) then + // Users does not have permission. Clear the error rather than report it. + Error_Services('Clear') + end + end + end + + If NewObject EQ True$ then + ErrorMessage = Error_Services('GetMessage') + SQL_Services('DestroyConnectionObject', objConnection) + If ErrorMessage NE '' then Error_Services('Add', ErrorMessage) + end + end else + Error_Services('Add', 'objConnection and Server arguments were both missing in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Database argument was missing in the ' : Service : ' service.') + end + + Response = Schemas + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetTables +// +// objConnection - Connection Object (see GetConnectionObject service.) - [Optional, but Server is then Required] +// Server - Name of a defined server. - [Optional, but objConnection is then Required] +// Databases - @FM delimited list of databases to use. If empty, then all databases will be used. +// - [Optional] +// Schemas - @FM delimited list of schemas to use. If empty, then all schemas will be used. If Databases is +// empty, then Schemas will be ignored. - [Optional] +// ReturnFullObjects - Boolean flag to indicate if full object notation (e.g., Server.Database.Schema.Table) should +// be returned or just the tables. Default is False$ - [Optional] +// BracketObjects - Boolean flag to indicate if the objects being returned should be bracketed in case some of the +// object names are reserved words. Default is False$ - [Optional] +// +// Returns an @FM list of tables using full object name formatting (i.e., Database.Schema.Table) available for the +// indicated connection object (or server). If the connection object is empty, then a new one will be created (and then +// subsequently destroyed) for the indicated server. +//---------------------------------------------------------------------------------------------------------------------- +Service GetTables(objConnection, Server, Databases, Schemas, IncludeServerObject=BOOLEAN, IncludeDatabaseObject=BOOLEAN, IncludeSchemaObject=BOOLEAN, BracketObjects=BOOLEAN) + + Tables = '' + + If IncludeServerObject NE True$ then IncludeServerObject = False$ + If IncludeDatabaseObject NE True$ then IncludeDatabaseObject = False$ + If IncludeSchemaObject NE True$ then IncludeSchemaObject = False$ + If BracketObjects NE True$ then BracketObjects = False$ + If Databases EQ '' then Schemas = '' + + If (objConnection NE '') OR (Server NE '') then + If objConnection EQ '' then + objConnection = SQL_Services('GetConnectionObject', Server, 3) + NewObject = True$ + end else + NewObject = False$ + end + + If Error_Services('NoError') then + If Databases EQ '' then Databases = SQL_Services('GetDatabases', objConnection, Server) +* If @USER4 EQ 'DANIEL_ST' then +* debug +* ConnectionState = Get_Property.Net(objConnection, "State") +* end + If Error_Services('NoError') AND (Databases NE '') then + For Each Database in Databases using @FM + If Schemas EQ '' then Schemas = SQL_Services('GetSchemas', objConnection, Server, Database) +* If @USER4 EQ 'DANIEL_ST' then +* debug +* ConnectionState = Get_Property.Net(objConnection, "State") +* end + If UseRevDotNet EQ True$ and Schemas EQ 0 then Schemas = '' + If Error_Services('NoError') AND (Schemas NE '') then + For Each Schema in Schemas using @FM + SQLQuery = "SELECT TABLE_NAME FROM [" : Database : "].INFORMATION_SCHEMA.TABLES WHERE TABLE_SCHEMA='" : Schema : "'" + TableNames = SQL_Services('ExecuteQuery', objConnection, SQLQuery, True$) + Convert @RM to @FM in TableNames + If Error_Services('NoError') AND (TableNames NE '') then + If (IncludeServerObject EQ True$) OR (IncludeDatabaseObject EQ True$) OR (IncludeSchemaObject EQ True$) then + For Each Table in TableNames using @FM + TableObject = Table + If IncludeSchemaObject EQ True$ then + TableObject = Schema : '.' : TableObject + If IncludeDatabaseObject EQ True$ then + TableObject = Database : '.' : TableObject + If IncludeServerObject EQ True$ then + TableObject = Server : '.' : TableObject + end + end + end + Tables := TableObject : @FM + Next Table + end else + Tables := TableNames : @FM + end + end + Next Schema + Schemas = '' + end + Next Database + end + Tables[-1, 1] = '' + If (Tables NE '') AND (BracketObjects EQ True$) then + Swap '.' with '].[' in Tables + Swap @FM with ']' : @FM : '[' in Tables + Tables = '[' : Tables : ']' + Tables = SRP_Array('SortRows', Tables, 'AL1', 'LIST', @FM, @VM) + end + end + + If NewObject EQ True$ then + ErrorMessage = Error_Services('GetMessage') + SQL_Services('DestroyConnectionObject', objConnection) + If ErrorMessage NE '' then Error_Services('Add', ErrorMessage) + end + end else + Error_Services('Add', 'objConnection and Server arguments were both missing in the ' : Service : ' service.') + end + + Response = Tables + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetTableColumns +// +// objConnection - Connection Object (see GetConnectionObject service.) - [Optional, but Server is then Required] +// Server - Name of a defined server. - [Optional, but objConnection is then Required] +// Database - Database object for the table. - [Optional] +// Schema - Schema object for the table. - [Optional] +// Table - Database Table whose column data is being requested. The Table argument might have the Server, +// Database, and/or Schema objects embedded. If so, then these will override any values specified +// in the Server, Database, or Schema arguments. - [Required] +// +// Returns an @FM/@VM array of database column information. +//---------------------------------------------------------------------------------------------------------------------- +Service GetTableColumns(objConnection, Server, Database, Schema, Table) + + TableColumns = '' + + If Table NE '' then + Convert '[]' to '' in Table ; // Remove any brackets so the query won't fail. + If Index(Table, '.', 1) then + // Table came formatted with other objects. Parse these out. + NumObjects = DCount(Table, '.') + Begin Case + Case NumObjects EQ 4 + Server = Table[1, '.'] + Database = Table[Col2() + 1, '.'] + Schema = Table[Col2() + 1, '.'] + Table = Table[Col2() + 1, '.'] + Case NumObjects EQ 3 + Database = Table[1, '.'] + Schema = Table[Col2() + 1, '.'] + Table = Table[Col2() + 1, '.'] + Case NumObjects EQ 2 + Schema = Table[1, '.'] + Table = Table[Col2() + 1, '.'] + End Case + end + + If (objConnection NE '') OR (Server NE '') then + If objConnection EQ '' then + objConnection = SQL_Services('GetConnectionObject', Server, 3) + NewObject = True$ + end else + NewObject = False$ + end + + If Error_Services('NoError') then + ErrorMessage = '' + + // This statement allows us to return PK and Null constraints. + + If Database NE '' then + SQL_Services('ExecuteQuery', objConnection, "USE " : Database, False$) + end + If Error_Services('NoError') then + QueryStatement = "" + QueryStatement := "SELECT " + QueryStatement := " c.name 'Column Name', " + QueryStatement := " t.Name 'Data type', " + QueryStatement := " c.max_length 'Max Length', " + QueryStatement := " c.is_nullable, " + QueryStatement := " ISNULL(i.is_primary_key, 0) 'Primary Key' " + QueryStatement := "FROM " + QueryStatement := " sys.columns c " + QueryStatement := "INNER JOIN " + QueryStatement := " sys.types t ON c.user_type_id = t.user_type_id " + QueryStatement := "LEFT OUTER JOIN " + QueryStatement := " sys.index_columns ic ON ic.object_id = c.object_id AND ic.column_id = c.column_id " + QueryStatement := "LEFT OUTER JOIN " + QueryStatement := " sys.indexes i ON ic.object_id = i.object_id AND ic.index_id = i.index_id " + QueryStatement := "WHERE" + QueryStatement := " c.object_id = OBJECT_ID('" + If Database NE '' then QueryStatement := "[" : Database : "]." + If Schema NE '' then QueryStatement := "[" : Schema : "]." + QueryStatement := "[" : Table : "]')" + + TableColumns = SQL_Services('ExecuteQuery', objConnection, QueryStatement, True$) + If Error_Services('NoError') then + Convert @FM to @VM in TableColumns + Convert @RM to @FM in TableColumns + TableColumns = SRP_Array('SortRows', TableColumns, 'DR5' : @FM : 'AL1', 'LIST', @FM, @VM) + end else + ErrorMessage = Error_Services('GetMessage') + end + SQL_Services('DestroyConnectionObject', objConnection) + If ErrorMessage NE '' then Error_Services('Add', ErrorMessage) + end + end + + If NewObject EQ True$ then + ErrorMessage = Error_Services('GetMessage') + SQL_Services('DestroyConnectionObject', objConnection) + If ErrorMessage NE '' then Error_Services('Add', ErrorMessage) + end + end else + Error_Services('Add', 'The Server or Table argument was missing in the ' : Service : ' service.') + end + end else + Error_Services('Add', 'Table argument was missing in the ' : Service : ' service.') + end + Response = TableColumns + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetPrimarySQLTable +// +// OITableName - The name of the OpenInsight table that is mapped to the primary SQL table. - [Required] +// +// Returns the name of the primary SQL table that the indicated OpenInsight table is mapped to. +//---------------------------------------------------------------------------------------------------------------------- +Service GetPrimarySQLTable(OITableName) + + Convert @Lower_Case to @Upper_Case in OITableName + ServiceKeyID := '*' : OITableName + PrimarySQLTable = Memory_Services('GetValue', ServiceKeyID) + + If PrimarySQLTable EQ '' then + If OITableName NE '' then + OITableToSQLMap = SQL_Services('GetOITableToSQLMap', OITableName) + If SRP_JSON(MapObj, 'PARSE', OITableToSQLMap) EQ '' then + PrimarySQLTable = SRP_JSON(MapObj, 'GETVALUE', 'PrimarySQLTable.Name') + SRP_JSON(MapObj, 'RELEASE') + end + If PrimarySQLTable NE '' then Memory_Services('SetValue', ServiceKeyID, PrimarySQLTable) + end else + Error_Services('Add', 'The OITableName argument was missing in the ' : Service : ' service.') + end + end + + Response = PrimarySQLTable + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSecondarySQLTables +// +// OITableName - The name of the OpenInsight table that is mapped to secondary SQL tables. - [Required] +// +// Returns an @FM delimited list of the secondary SQL tables that the indicated OpenInsight table is mapped to. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSecondarySQLTables(OITableName) + + Convert @Lower_Case to @Upper_Case in OITableName + ServiceKeyID := '*' : OITableName + SecondarySQLTables = Memory_Services('GetValue', ServiceKeyID) + + If SecondarySQLTables EQ '' then + If OITableName NE '' then + OITableToSQLMap = SQL_Services('GetOITableToSQLMap', OITableName) + If SRP_JSON(MapObj, 'PARSE', OITableToSQLMap) EQ '' then + TablesArray = SRP_JSON(MapObj, 'GET', 'SecondarySQLTables') + NumTables = SRP_JSON(TablesArray, 'GETCOUNT') + MatchFound = False$ + For TableNum = 1 to NumTables + SecondarySQLTables := SRP_JSON(TablesArray, 'GETVALUE', '[' : TableNum : '].Name', '') : @FM + Until MatchFound + Next TableNum + SRP_JSON(TablesArray, 'RELEASE') + SRP_JSON(MapObj, 'RELEASE') + end + SecondarySQLTables[-1, 1] = '' + If SecondarySQLTables NE '' then Memory_Services('SetValue', ServiceKeyID, SecondarySQLTables) + end else + Error_Services('Add', 'The OITableName argument was missing in the ' : Service : ' service.') + end + end + + Response = SecondarySQLTables + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetStaticSQLColumnNames +// +// OITableName - The name of the OpenInsight table that columns mapped to a SQL table with static values. - [Required] +// +// Returns an @FM delimited list of SQL column names that have a static value. These are usually used in a SQL insert +// statement along with the mapped columns. +//---------------------------------------------------------------------------------------------------------------------- +Service GetStaticSQLColumnNames(OITableName) + + Convert @Lower_Case to @Upper_Case in OITableName + ServiceKeyID := '*' : OITableName + StaticSQLColumnNames = Memory_Services('GetValue', ServiceKeyID) + + If StaticSQLColumnNames EQ '' then + If (OITableName NE '') then + // Add all OpenInsight columns defined in the SQL Join Clause. + OITableToSQLMap = SQL_Services('GetOITableToSQLMap', OITableName) + If SRP_JSON(MapObj, 'PARSE', OITableToSQLMap) EQ '' then + StaticColumnsArray = SRP_JSON(MapObj, 'GET', 'StaticColumns') + NumColumns = SRP_JSON(StaticColumnsArray, 'GETCOUNT') + For ColumnNum = 1 to NumColumns + objStaticColumn = SRP_JSON(StaticColumnsArray, 'GET', '[' : ColumnNum : ']') + StaticSQLColumnNames := SRP_JSON(objStaticColumn, 'GETVALUE', 'SQLColumnName') : @FM + SRP_JSON(objStaticColumn, 'RELEASE') + Next NumColumns + StaticSQLColumnNames[-1, 1] = '' + SRP_JSON(StaticColumnsArray, 'RELEASE') + SRP_JSON(MapObj, 'RELEASE') + end + If StaticSQLColumnNames NE '' then Memory_Services('SetValue', ServiceKeyID, StaticSQLColumnNames) + end else + Error_Services('Add', 'The OITableName argument was missing in the ' : Service : ' service.') + end + end + + Response = StaticSQLColumnNames + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetStaticSQLColumnValues +// +// OITableName - The name of the OpenInsight table that columns mapped to a SQL table with static values. - [Required] +// +// Returns an @FM delimited list of values for SQL column names that have a static value. These are usually used in a +// SQL insert statement along with the mapped columns. +//---------------------------------------------------------------------------------------------------------------------- +Service GetStaticSQLColumnValues(OITableName) + + Convert @Lower_Case to @Upper_Case in OITableName + ServiceKeyID := '*' : OITableName + StaticSQLColumnValues = Memory_Services('GetValue', ServiceKeyID) + + If StaticSQLColumnValues EQ '' then + If (OITableName NE '') then + // Add all OpenInsight columns defined in the SQL Join Clause. + OITableToSQLMap = SQL_Services('GetOITableToSQLMap', OITableName) + If SRP_JSON(MapObj, 'PARSE', OITableToSQLMap) EQ '' then + StaticColumnsArray = SRP_JSON(MapObj, 'GET', 'StaticColumns') + NumColumns = SRP_JSON(StaticColumnsArray, 'GETCOUNT') + For ColumnNum = 1 to NumColumns + objStaticColumn = SRP_JSON(StaticColumnsArray, 'GET', '[' : ColumnNum : ']') + StaticValue = SRP_JSON(objStaticColumn, 'GETVALUE', 'StaticValue') + StaticValue = "'" : StaticValue : "'" + StaticSQLColumnValues := StaticValue : @FM + SRP_JSON(objStaticColumn, 'RELEASE') + Next NumColumns + StaticSQLColumnValues[-1, 1] = '' + SRP_JSON(StaticColumnsArray, 'RELEASE') + SRP_JSON(MapObj, 'RELEASE') + end + If StaticSQLColumnValues NE '' then Memory_Services('SetValue', ServiceKeyID, StaticSQLColumnValues) + end else + Error_Services('Add', 'The OITableName argument was missing in the ' : Service : ' service.') + end + end + + Response = StaticSQLColumnValues + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetAMVMaster +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// SQLTableName - The name of the SQL table that the Openinsight table is mapped to. - [Required] +// +// Returns the name of the OpenInsight column used as the AMV (associated multivalue) master used to determine the +// number of values needed to write into the secondary SQL table. +//---------------------------------------------------------------------------------------------------------------------- +Service GetAMVMaster(OITableName, SQLTableName) + + Convert @Lower_Case to @Upper_Case in OITableName + + ServiceKeyID := '*' : OITableName : '*' : SQLTableName + AMVMaster = Memory_Services('GetValue', ServiceKeyID) + + If AMVMaster EQ '' then + If (OITableName NE '') AND (SQLTableName NE '') then + OITableToSQLMap = SQL_Services('GetOITableToSQLMap', OITableName) + JoinArray = '' ; // Initialize the array. + If SRP_JSON(MapObj, 'Parse', OITableToSQLMap) EQ '' then + PrimarySQLTableName = SRP_JSON(MapObj, 'GetValue', 'PrimarySQLTable.Name') + If SQLTableName _EQC PrimarySQLTableName then + // Primary SQL tables do not have a Seq Key. Just return the empty string. + end else + // Look for a matching secondary SQL table. + TableArray = SRP_JSON(MapObj, 'Get', 'SecondarySQLTables') + TableObjs = SRP_JSON(TableArray, 'GetElements') + TableFound = False$ + For Each TableObj in TableObjs using @FM + SecondarySQLTableName = SRP_JSON(TableObj, 'GETVALUE', 'Name', '') + If SQLTableName _EQC SecondarySQLTableName then + JoinClassArray = SRP_JSON(TableObj, 'Get', 'JoinClause') + JoinClassObjs = SRP_JSON(JoinClassArray, 'GetElements') + For Each JoinClassObj in JoinClassObjs using @FM + If SRP_JSON(JoinClassObj, 'GetValue', 'AMVMaster') EQ True$ then + AMVMaster = SRP_JSON(JoinClassObj, 'GetValue', 'OIColumnName') + end + SRP_JSON(JoinClassObj, 'Release') + Until AMVMaster NE '' + Next JoinClassObj + TableFound = True$ + SRP_JSON(JoinClassArray, 'Release') + end + SRP_JSON(TableObj, 'Release') + Until TableFound + Next TableObj + SRP_JSON(TableArray, 'Release') + end + SRP_JSON(MapObj, 'Release') + end + + If AMVMaster NE '' then + Memory_Services('SetValue', ServiceKeyID, AMVMaster) + end + end else + Error_Services('Add', 'The OITableName or SQLTableName argument was missing in the ' : Service : ' service.') + end + end + + Response = AMVMaster + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMappedJoinedOIColumnNames +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// SQLTableName - The name of the SQL table that the Openinsight table is mapped to. - [Required] +// ValuesReturned - A return varabiable that will contain the type of values each associated column should return. +// See below for more information. - [Optional] +// +// Returns an @FM list of column names from the indicated OpenInsight table that are used to join with the indicated +// SQL table. This service will also populate the ValuesReturned variable with the intended value to be returned by the +// associated column (.e.g, Column Data or Index Position). +//---------------------------------------------------------------------------------------------------------------------- +Service GetMappedJoinedOIColumnNames(OITableName, SQLTableName, Ref ValuesReturned) + + Convert @Lower_Case to @Upper_Case in OITableName + + ServiceKeyID := '*' : OITableName : '*' : SQLTableName + ColumnNames = Memory_Services('GetValue', ServiceKeyID) + ValuesReturned = Memory_Services('GetValue', ServiceKeyID : '*ValuesReturned') + + If ColumnNames EQ '' then + If (OITableName NE '') AND (SQLTableName NE '') then + OITableToSQLMap = SQL_Services('GetOITableToSQLMap', OITableName) + JoinArray = '' ; // Initialize the array. + If SRP_JSON(MapObj, 'PARSE', OITableToSQLMap) EQ '' then + PrimarySQLTableName = SRP_JSON(MapObj, 'GETVALUE', 'PrimarySQLTable.Name') + If SQLTableName _EQC PrimarySQLTableName then + // Use the join array from the primary SQL Table. + JoinArray = SRP_JSON(MapObj, 'GET', 'PrimarySQLTable.JoinClause') + end else + // Look for a matching secondary SQL table. + TablesArray = SRP_JSON(MapObj, 'GET', 'SecondarySQLTables') + NumTables = SRP_JSON(TablesArray, 'GETCOUNT') + MatchFound = False$ + For TableNum = 1 to NumTables + TableObj = SRP_JSON(TablesArray, 'GET', '[' : TableNum : ']') + SecondarySQLTableName = SRP_JSON(TableObj, 'GETVALUE', 'Name', '') + If SQLTableName _EQC SecondarySQLTableName then + JoinArray = SRP_JSON(TableObj, 'GET', 'JoinClause') + MatchFound = True$ + end + SRP_JSON(TableObj, 'RELEASE') + Until MatchFound + Next TableNum + SRP_JSON(TablesArray, 'RELEASE') + end + SRP_JSON(MapObj, 'RELEASE') + end + + If JoinArray GT 0 then + NumColumns = SRP_JSON(JoinArray, 'GETCOUNT') + For ColumnNo = 1 to NumColumns + OIColumnName = SRP_JSON(JoinArray, 'GETVALUE', '[' : ColumnNo : ']' : 'OIColumnName', '') + ValueReturned = SRP_JSON(JoinArray, 'GETVALUE', '[' : ColumnNo : ']' : 'ValueReturned', '') + ColumnNames := OIColumnName : @FM + ValuesReturned := ValueReturned : @FM + Next ColumnNo + ColumnNames[-1, 1] = '' + ValuesReturned[-1, 1] = '' + SRP_JSON(JoinArray, 'RELEASE') + end + + If ColumnNames NE '' then + Memory_Services('SetValue', ServiceKeyID, ColumnNames) + Memory_Services('SetValue', ServiceKeyID : '*ValuesReturned', ValuesReturned) + end + end else + Error_Services('Add', 'The OITableName or SQLTableName argument was missing in the ' : Service : ' service.') + end + end + + Response = ColumnNames + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMappedJoinedSQLColumnNames +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// SQLTableName - The name of the SQL table that the Openinsight table is mapped to. - [Required] +// +// Returns an @FM list of column names from the indicated SQL table that are used to join with the indicated OpenInsight +// table. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMappedJoinedSQLColumnNames(OITableName, SQLTableName) + + Convert @Lower_Case to @Upper_Case in OITableName + + ServiceKeyID := '*' : OITableName : '*' : SQLTableName + ColumnNames = Memory_Services('GetValue', ServiceKeyID) + + If ColumnNames EQ '' then + If (OITableName NE '') AND (SQLTableName NE '') then + OITableToSQLMap = SQL_Services('GetOITableToSQLMap', OITableName) + JoinArray = '' ; // Initialize the array. + If SRP_JSON(MapObj, 'PARSE', OITableToSQLMap) EQ '' then + PrimarySQLTableName = SRP_JSON(MapObj, 'GETVALUE', 'PrimarySQLTable.Name') + If SQLTableName _EQC PrimarySQLTableName then + // Use the join array from the primary SQL Table. + JoinArray = SRP_JSON(MapObj, 'GET', 'PrimarySQLTable.JoinClause') + end else + // Look for a matching secondary SQL table. + TablesArray = SRP_JSON(MapObj, 'GET', 'SecondarySQLTables') + NumTables = SRP_JSON(TablesArray, 'GETCOUNT') + MatchFound = False$ + For TableNum = 1 to NumTables + TableObj = SRP_JSON(TablesArray, 'GET', '[' : TableNum : ']') + SecondarySQLTableName = SRP_JSON(TableObj, 'GETVALUE', 'Name', '') + If SQLTableName _EQC SecondarySQLTableName then + JoinArray = SRP_JSON(TableObj, 'GET', 'JoinClause') + MatchFound = True$ + end + SRP_JSON(TableObj, 'RELEASE') + Until MatchFound + Next TableNum + SRP_JSON(TablesArray, 'RELEASE') + end + SRP_JSON(MapObj, 'RELEASE') + end + + If JoinArray GT 0 then + NumColumns = SRP_JSON(JoinArray, 'GETCOUNT') + For ColumnNo = 1 to NumColumns + SQLColumnName = SRP_JSON(JoinArray, 'GETVALUE', '[' : ColumnNo : ']' : 'SQLColumnName', '') + ColumnNames := SQLColumnName : @FM + Next ColumnNo + ColumnNames[-1, 1] = '' + SRP_JSON(JoinArray, 'RELEASE') + end + + If ColumnNames NE '' then + Memory_Services('SetValue', ServiceKeyID, ColumnNames) + end + end else + Error_Services('Add', 'The OITableName or SQLTableName argument was missing in the ' : Service : ' service.') + end + end + + Response = ColumnNames + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMappedJoinedOperators +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// SQLTableName - The name of the SQL table that the Openinsight table is mapped to. - [Required] +// +// Returns an @FM list of operators from the indicated SQL table that are used to join with the indicated OpenInsight +// table. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMappedJoinedOperators(OITableName, SQLTableName) + + Convert @Lower_Case to @Upper_Case in OITableName + + ServiceKeyID := '*' : OITableName : '*' : SQLTableName + Operators = Memory_Services('GetValue', ServiceKeyID) + + If Operators EQ '' then + If (OITableName NE '') AND (SQLTableName NE '') then + OITableToSQLMap = SQL_Services('GetOITableToSQLMap', OITableName) + JoinArray = '' ; // Initialize the array. + If SRP_JSON(MapObj, 'PARSE', OITableToSQLMap) EQ '' then + PrimarySQLTableName = SRP_JSON(MapObj, 'GETVALUE', 'PrimarySQLTable.Name') + If SQLTableName _EQC PrimarySQLTableName then + // Use the join array from the primary SQL Table. + JoinArray = SRP_JSON(MapObj, 'GET', 'PrimarySQLTable.JoinClause') + end else + // Look for a matching secondary SQL table. + TablesArray = SRP_JSON(MapObj, 'GET', 'SecondarySQLTables') + NumTables = SRP_JSON(TablesArray, 'GETCOUNT') + MatchFound = False$ + For TableNum = 1 to NumTables + TableObj = SRP_JSON(TablesArray, 'GET', '[' : TableNum : ']') + SecondarySQLTableName = SRP_JSON(TableObj, 'GETVALUE', 'Name', '') + If SQLTableName _EQC SecondarySQLTableName then + JoinArray = SRP_JSON(TableObj, 'GET', 'JoinClause') + MatchFound = True$ + end + SRP_JSON(TableObj, 'RELEASE') + Until MatchFound + Next TableNum + SRP_JSON(TablesArray, 'RELEASE') + end + SRP_JSON(MapObj, 'RELEASE') + end + + If JoinArray GT 0 then + NumColumns = SRP_JSON(JoinArray, 'GETCOUNT') + For ColumnNo = 1 to NumColumns + Operator = SRP_JSON(JoinArray, 'GETVALUE', '[' : ColumnNo : ']' : 'Operator', '') + Operators := Operator : @FM + Next ColumnNo + Operators[-1, 1] = '' + SRP_JSON(JoinArray, 'RELEASE') + end + + If Operators NE '' then + Memory_Services('SetValue', ServiceKeyID, Operators) + end + end else + Error_Services('Add', 'The OITableName or SQLTableName argument was missing in the ' : Service : ' service.') + end + end + + Response = Operators + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMappedJoinedSQLColumnValues +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table to. - [Required] +// SQLTableName - The name of the SQL table that the Openinsight table is mapped to. - [Required] +// OIKeyID - The Key ID to the OpenInsight row being written to SQL. - [Required] +// OIRow - The OpenInsight row being written to SQL. - [Optional] +// AMVPosition - The position within the multivalue column that should be used in the join clause if the OpenInsight +// column is supposed to use its Index Position. - [Optional] +// +// Returns an @FM delimited list of SQL column values for the indicated table that are derived from the indicated +// OpenInsight table and associated joined columns. This service is normally called to create a fully formed Insert +// query statement. Note: OIRow will likely be an empty string since most join clauses will be based on the OpenInsight +// Key ID. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMappedJoinedSQLColumnValues(OITableName, SQLTableName, OIKeyID, OIRow, AMVPosition) + + Convert @Lower_Case to @Upper_Case in OITableName + + If Num(AMVPosition) else AMVPosition = '' + + ColumnValues = '' + + If (OITableName NE '') AND (SQLTableName NE '') AND (OIKeyID NE '') then + FieldArray = Database_Services('ReadDataRow', 'DICT.' : OITablename, '%FIELDS%') + OIColumnNames = SQL_Services('GetMappedJoinedOIColumnNames', OITableName, SQLTableName, ValuesReturned) + If Error_Services('NoError') then + If OIColumnNames NE '' then + For Each OIColumnName in OIColumnNames using @FM setting fPos + ValueReturned = ValuesReturned + If ValueReturned EQ '' then ValueReturned = 'Column Data' + Locate OIColumnName in FieldArray using @VM setting vPos then + OIColumnToSQLMap = SQL_Services('GetOIColumnToSQLMap', OITableName, OIColumnName) + If Error_Services('NoError') then + If SRP_JSON(MapObj, 'PARSE', OIColumnToSQLMap) EQ '' then + SQLColumnType = SRP_JSON(MapObj, 'GETVALUE', 'SQLColumnType') + OIColumnType = FieldArray + IsOIKey = False$ ; // Assume false for now. + If ValueReturned EQ 'Column Data' then + If OIColumnType EQ 'F' then + OIColumnPos = FieldArray + If OIColumnPos GT 0 then + OIColumnValue = OIRow + end else + IsOIKey = True$ + OIKeyPart = FieldArray + OIColumnValue = Field(OIKeyID, '*', OIKeyPart, 1) + If OIColumnValue EQ '' then + Error_Services('Add', 'Key ID Column ' : OIColumnName : ' was assigned an empty string value in ' : Service : '.') + end + end + end else + // OIColumnValue = Calculate(OIColumnName) ; // Actual logic used in MFS + OIColumnValue = Xlate(OITablename, OIKeyID, OIColumnName, 'X') + end + If (AMVPosition NE '') AND (IsOIKey NE True$) then + OIColumnValue = OIColumnValue<0, AMVPosition> + end + end else + If AMVPosition EQ '' then AMVPosition = 1 + OIColumnValue = AMVPosition + end + If ValueReturned EQ 'Column Data' then + // Make applicable data conversions. + Begin Case + Case OIColumnValue EQ '' + // Empty strings are treated as NULL values. + OIColumnValue = 'NULL' + Case InList('varchar,nvarchar,char,nchar', SQLColumnType, ',') + // Single quote the value. + SQLColumnLength = SRP_JSON(MapObj, 'GETVALUE', 'SQLColumnLength') + OIColumnConv = FieldArray + If OIColumnConv NE '' then + OIColumnValue = Fmt(OIColumnValue, OIColumnConv) + end + If (SQLColumnLength EQ '') OR (SQLColumnLength EQ '-1') then SQLColumnLength = Len(OIColumnValue) + OIColumnValue = OIColumnValue[1, SQLColumnLength, 1] + Swap "'" with "''" in OIColumnValue + OIColumnValue = "'" : OIColumnValue : "'" + Case InList('tinyint,smallint,bigint,int', SQLColumnType, ',') + // Treat as an integer. + OIColumnConv = 'MD0' + If OIColumnConv NE '' then + OIColumnValue = Fmt(OIColumnValue, OIColumnConv) + end + Case InList('decimal,numeric,float,real', SQLColumnType, ',') + // Treat as a floating point number using any OI column output conversion if it + // exists. + OIColumnConv = FieldArray + Convert 'Z' to '' in OIColumnConv ; // No empty strings with numeric columns. + If OIColumnConv NE '' then + OIColumnValue = Fmt(OIColumnValue, OIColumnConv) + end + Case SQLColumnType _EQC 'bit' + // Treat as a Boolean, but only return a 1, 0, or NULL. + If OIColumnValue EQ '' then + OIColumnValue = 'NULL' + end else + If OIColumnValue NE False$ then OIColumnValue = True$ + end + Case SQLColumnType _EQC 'date' + OIColumnValue = "'" : (SRP_Date('Format', OIColumnValue, 'YYYY-MM-DD')) : "'" + Case SQLColumnType _EQC 'datetime' + OIColumnValue = "'" : (SRP_DateTime('Format', OIColumnValue, 'YYYY-MM-DD hh:mm:ss')) : "'" + Case SQLColumnType _EQC 'time' + OIColumnValue = "'" : (SRP_Time('Format', OIColumnValue, 'hh:mm:ss')) : "'" + Case Otherwise$ + // Treat as a character type. + SQLColumnLength = SRP_JSON(MapObj, 'GETVALUE', 'SQLColumnLength') + OIColumnConv = FieldArray + If OIColumnConv NE '' then + OIColumnValue = Fmt(OIColumnValue, OIColumnConv) + end + If (SQLColumnLength EQ '') OR (SQLColumnLength EQ '-1') then SQLColumnLength = Len(OIColumnValue) + OIColumnValue = OIColumnValue[1, SQLColumnLength, 1] + Swap "'" with "''" in OIColumnValue + OIColumnValue = "'" : OIColumnValue : "'" + End Case + end + // Basic conversion rules. + Convert \09\ to ' ' in OIColumnValue + Swap \0D0A\ with ' ' in OIColumnValue + Convert @VM to '|' in OIColumnValue + Convert @SVM to ' ' in OIColumnValue + Convert @TM to ' ' in OIColumnValue + Convert @STM to ' ' in OIColumnValue + ColumnValues := OIColumnValue : @FM + + SRP_JSON(MapObj, 'RELEASE') + end + end + end + While Error_Services('NoError') + Next OIColumnName + end + ColumnValues[-1, 1] = '' + end + end else + Error_Services('Add', 'The OITableName, SQLTableName, OIKeyID, or OIRow argument was missing in the ' : Service : ' service.') + end + + Response = ColumnValues + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetJoinClause +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// SQLTableName - The name of the SQL table that the Openinsight table is mapped to. - [Required] +// OIKeyID - The Key ID to the OpenInsight row being written to SQL. - [Required] +// OIRow - The OpenInsight row being written to SQL. - [Optional] +// AMVPosition - The position within the multivalue column that should be used in the join clause if the +// OpenInsight column is supposed to use its Index Position. - [Optional] +// IgnoreAMVMaster - Boolean falg to indicate if the joined column associated with the OpenInsight AMV Master should +// be ignored. This is necessary for Join Clauses used for Select and Delete statements. - [Optional] +// +// Returns a well formed join clause using the indicated OpenInsight Key ID and row for the indicated OpenInsight table +// and SQL table. Note: OIRow will likely be an empty string since most join clauses will be based on the OpenInsight +// Key ID. +//---------------------------------------------------------------------------------------------------------------------- +Service GetJoinClause(OITableName, SQLTableName, OIKeyID, OIRow, AMVPosition, IgnoreAMVMaster=BOOLEAN) + + Convert @Lower_Case to @Upper_Case in OITableName + + JoinClause = '' + + If IgnoreAMVMaster NE True$ then IgnoreAMVMaster = False$ + + If (OITableName NE '') AND (SQLTableName NE '') AND (OIKeyID NE '') then + JoinedSQLColumns = SQL_Services('GetMappedJoinedSQLColumnNames', OITableName, SQLTableName) + If JoinedSQLColumns NE '' then + JoinedOperators = SQL_Services('GetMappedJoinedOperators', OITableName, SQLTableName) + JoinedSQLValues = SQL_Services('GetMappedJoinedSQLColumnValues', OITableName, SQLTableName, OIKeyID, OIRow, AMVPosition) + If IgnoreAMVMaster EQ True$ then + // Get all of the OpenInsight columns associated with this join and the AMV Master. Remove the SQL column, + // operator, and value associated with the AMV Master. + AMVMaster = SQL_Services('GetAMVMaster', OITableName, SQLTableName) + If AMVMaster NE '' then + JoinedOIColumns = SQL_Services('GetMappedJoinedOIColumnNames', OITableName, SQLTableName) + Locate AMVMaster in JoinedOIColumns using @FM setting Pos then + JoinedSQLColumns = Delete(JoinedSQLColumns, Pos, 0, 0) + JoinedOperators = Delete(JoinedOperators, Pos, 0, 0) + JoinedSQLValues = Delete(JoinedSQLValues, Pos, 0, 0) + end + end + end + For Each JoinedColumn in JoinedSQLColumns using @FM setting Pos + JoinClause := JoinedColumn : ' ' + JoinClause := JoinedOperators : ' ' + JoinClause := JoinedSQLValues + JoinClause := @FM + Next JoinedColumn + JoinClause[-1, 1] = '' + Swap @FM with ' AND ' in JoinClause + end + end else + Error_Services('Add', 'The OITableName, SQLTableName, OIKeyID argument was missing in the ' : Service : ' service.') + end + + Response = JoinClause + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetJoinClause +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// SQLTableName - The name of the SQL table that the Openinsight table is mapped to. - [Required] +// OIKeyID - The Key ID to the OpenInsight row being written to SQL. - [Required] +// OIRow - The OpenInsight row being written to SQL. - [Optional] +// AMVPosition - The position within the multivalue column that should be used in the join clause if the +// OpenInsight column is supposed to use its Index Position. - [Optional] +// IgnoreAMVMaster - Boolean falg to indicate if the joined column associated with the OpenInsight AMV Master should +// be ignored. This is necessary for Join Clauses used for Select and Delete statements. - [Optional] +// +// Returns a well formed join clause using the indicated OpenInsight Key ID and row for the indicated OpenInsight table +// and SQL table. Note: OIRow will likely be an empty string since most join clauses will be based on the OpenInsight +// Key ID. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMergeClause(OITableName, SQLTableName, OIKeyID, OIRow, AMVPosition, IgnoreAMVMaster=BOOLEAN) + + Convert @Lower_Case to @Upper_Case in OITableName + + JoinClause = '' + + If IgnoreAMVMaster NE True$ then IgnoreAMVMaster = False$ + + If (OITableName NE '') AND (SQLTableName NE '') AND (OIKeyID NE '') then + JoinedSQLColumns = SQL_Services('GetMappedJoinedSQLColumnNames', OITableName, SQLTableName) + If JoinedSQLColumns NE '' then + JoinedOperators = SQL_Services('GetMappedJoinedOperators', OITableName, SQLTableName) + JoinedSQLValues = SQL_Services('GetMappedJoinedSQLColumnValues', OITableName, SQLTableName, OIKeyID, OIRow, AMVPosition) + If IgnoreAMVMaster EQ True$ then + // Get all of the OpenInsight columns associated with this join and the AMV Master. Remove the SQL column, + // operator, and value associated with the AMV Master. + AMVMaster = SQL_Services('GetAMVMaster', OITableName, SQLTableName) + If AMVMaster NE '' then + JoinedOIColumns = SQL_Services('GetMappedJoinedOIColumnNames', OITableName, SQLTableName) + Locate AMVMaster in JoinedOIColumns using @FM setting Pos then + JoinedSQLColumns = Delete(JoinedSQLColumns, Pos, 0, 0) + JoinedOperators = Delete(JoinedOperators, Pos, 0, 0) + JoinedSQLValues = Delete(JoinedSQLValues, Pos, 0, 0) + end + end + end + For Each JoinedColumn in JoinedSQLColumns using @FM setting Pos + JoinClause := 'tgt.':JoinedColumn : ' ' + JoinClause := JoinedOperators : ' ' + JoinClause := 'src.':JoinedColumn + JoinClause := @FM + Next JoinedColumn + JoinClause[-1, 1] = '' + Swap @FM with ' AND ' in JoinClause + end + end else + Error_Services('Add', 'The OITableName, SQLTableName, OIKeyID argument was missing in the ' : Service : ' service.') + end + + Response = JoinClause + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMappedOIColumnNames +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// SQLTableName - The name of the SQL table that the Openinsight table is mapped to. - [Required] +// ExcludeJoinedColumns - Boolean flag indicating if the columns used for the join should be excluded from the +// list of columns returned. This would be done if the columns are used to insert or update +// the SQL table. Default is true. - [Optional] +// +// Returns an @FM delimited list of OpenInsight column names from the indicated table that are mapped to the indicated +// SQL table. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMappedOIColumnNames(OITableName, SQLTableName, ExcludeJoinedColumns=BOOLEAN) + + Convert @Lower_Case to @Upper_Case in OITableName + If ExcludeJoinedColumns NE False$ then ExcludeJoinedColumns = True$ + + ServiceKeyID := '*' : OITableName : '*' : SQLTableName : '*' : ExcludeJoinedColumns + ColumnNames = Memory_Services('GetValue', ServiceKeyID) + + If ColumnNames EQ '' then + If (OITableName NE '') AND (SQLTableName NE '') then + // Go through all of the OpenInsight column SQL maps and add any column which is bound to the same SQL + // table. Note, one or more of these columns might already be in the list from the + // GetMappedJoinedOIColumnNames service. These will be skipped. + AllOIColumnToSQLMaps = SQL_Services('GetAllOIColumnToSQLMaps', OITableName) + For Each OIColumnToSQLMapList in AllOIColumnToSQLMaps using @FM setting fPos + (OIColumnName, OIColumnToSQLMap) using @VM = OIColumnToSQLMapList + If SRP_JSON(MapObj, 'PARSE', OIColumnToSQLMap) EQ '' then + MappedSQLTableName = SRP_JSON(MapObj, 'GETVALUE', 'SQLTableName') + MappedSQLColumnName = SRP_JSON(MapObj, 'GETVALUE', 'SQLColumnName') + If (MappedSQLTableName NE '') AND (MappedSQLColumnName NE '') AND (SQLTableName EQ MappedSQLTableName) then + Locate OIColumnName in ColumnNames using @FM setting fPos else + ColumnNames := OIColumnName : @FM + end + end + SRP_JSON(MapObj, 'Release') + end + Next OIColumnToSQLMap + + If ExcludeJoinedColumns EQ True$ then + // Get all OpenInsight columns defined in the SQL Join Clause. Then remove any that are rely upon Column + // Data mapping rather than Index Position. This will avoid duplicate columns being used in a SQL statement. + JoinedValuesReturned = '' + JoinedOIColumns = SQL_Services('GetMappedJoinedOIColumnNames', OITableName, SQLTableName, JoinedValuesReturned) + If JoinedOIColumns NE '' then + For Each JoinedColumnName in JoinedOIColumns using @FM Setting JoinedPos + Locate JoinedColumnName in ColumnNames using @FM setting Pos then + If JoinedValuesReturned EQ 'Column Data' then + ColumnNames = Delete(ColumnNames, Pos, 0, 0) + end + end + Next JoinedColumnName + end + end + + ColumnNames[-1, 1] = '' + If ColumnNames NE '' then + Memory_Services('SetValue', ServiceKeyID, ColumnNames) + end + end else + Error_Services('Add', 'The OITableName or SQLTableName argument was missing in the ' : Service : ' service.') + end + end + + Response = ColumnNames + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMappedOIColumnValues +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// SQLTableName - The name of the SQL table that the Openinsight table is mapped to. - [Required] +// SQLRow - The SQL row that will be mapped to the OpenInsight row. - [Required] +// OIRow - The OpenInsight row with pre-existing data. See below for more information. - [Optional] +// +// Returns an OpenInsight data row for the indicated table that are derived from the indicated SQL table and +// corresponding SQL data. Note, since data can come from multiple SQL tables, the OIRow arguments can already contain +// data from a previous call to this service. This allows primary and secondary SQL tables to be passed into this +// service so that all relevant SQL data can be denormalized into a single OpenInsight data row. This service is +// normally called to create a denormalized OpenInsight row. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMappedOIColumnValues(OITableName, SQLTableName, SQLData, OIRow) + + Convert @Lower_Case to @Upper_Case in OITableName + + If (OITableName NE '') AND (SQLTableName NE '') AND (SQLData NE '') then + MappedOIColumnNames = SQL_Services('GetMappedOIColumnNames', OITableName, SQLTableName, False$) + MappedSQLColumnNames = SQL_Services('GetMappedSQLColumnNames', OITableName, SQLTableName, '', False$) + FieldArray = Database_Services('ReadDataRow', 'DICT.' : OITablename, '%FIELDS%') + If Error_Services('NoError') then + For Each SQLRow in SQLData using @RM setting ValuePos + For Each SQLColumnName in MappedSQLColumnNames using @FM setting fPos + OIColumnName = MappedOIColumnNames + Locate OIColumnName in FieldArray using @VM setting vPos then + OIColumnType = FieldArray + OIColumnPos = FieldArray + If OIColumnType EQ 'F' AND OIColumnPos NE 0 then + OIColumnToSQLMap = SQL_Services('GetOIColumnToSQLMap', OITableName, OIColumnName) + If Error_Services('NoError') then + If SRP_JSON(MapObj, 'PARSE', OIColumnToSQLMap) EQ '' then + SQLColumnType = SRP_JSON(MapObj, 'GETVALUE', 'SQLColumnType') + OIColumnValue = SQLRow + Swap '<@VM>' with @VM in OIColumnValue + Swap @SVM with '<@SVM>' in OIColumnValue + Swap @TM with '<@TM>' in OIColumnValue + Swap @STM with '<@STM>' in OIColumnValue + + Begin Case + Case InList('varchar,nvarchar,char,nchar', SQLColumnType, ',') + // Single quote the value. + OIColumnConv = FieldArray + If OIColumnConv NE '' then + OIColumnValue = Iconv(OIColumnValue, OIColumnConv) + end + Case InList('tinyint,smallint,bigint,int', SQLColumnType, ',') + // Treat as an integer. + OIColumnConv = 'MD0' + If OIColumnConv NE '' then + OIColumnValue = Iconv(OIColumnValue, OIColumnConv) + end + Case InList('decimal,numeric,float,real', SQLColumnType, ',') + // Treat as a floating point number using any OI column output conversion if it + // exists. + OIColumnConv = FieldArray + If OIColumnConv NE '' then + OIColumnValue = Iconv(OIColumnValue, OIColumnConv) + end + Case SQLColumnType _EQC 'date' + OIColumnValue = SRP_Date('Parse', OIColumnValue, 'MM/DD/YYYY') + Case SQLColumnType _EQC 'datetime' + OIColumnValue = SRP_DateTime('Parse', OIColumnValue, 'MM/DD/YYYY hh:mm:ss') + Case SQLColumnType _EQC 'time' + OIColumnValue = SRP_Time('Parse', OIColumnValue, 'hh:mm:ss') + Case Otherwise$ + // Treat as a character type. + OIColumnConv = FieldArray + If OIColumnConv NE '' then + OIColumnValue = Iconv(OIColumnValue, OIColumnConv) + end + End Case + OIRow = OIColumnValue + end + SRP_JSON(MapObj, 'RELEASE') + end + end + end + Next SQLColumnName + Next SQLRow + end + + end else + Error_Services('Add', 'The SQLTableName, SQLData, or OITableName argument was missing in the ' : Service : ' service.') + end + + Response = OIRow + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMappedSQLColumnNames +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// SQLTableName - The name of the SQL table that the Openinsight table is mapped to. - [Required] +// OIColumns - An @FM delimited list of OpenInsight table columns that should only be used to write to +// SQL. If empty, all columns that have a map defintion will be used. - [Optional] +// ExcludeJoinedColumns - Boolean flag indicating if the columns used for the join should be excluded from the +// list of columns returned. This would be done if the columns are used to insert or update +// the SQL table. Default is true. - [Optional] +// +// Returns an @FM delimited list of SQL column names from the indicated table that are mapped from the indicated +// OpenInsight table and associated OpenInsight columns. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMappedSQLColumnNames(OITableName, SQLTableName, OIColumns, ExcludeJoinedColumns) + + Convert @Lower_Case to @Upper_Case in OITableName + If ExcludeJoinedColumns NE False$ then ExcludeJoinedColumns = True$ + ServiceKeyID := '*' : OITableName : '*' : SQLTableName : '*' : ExcludeJoinedColumns + ColumnNames = Memory_Services('GetValue', ServiceKeyID) + If ColumnNames EQ '' then + If (OITableName NE '') AND (SQLTableName NE '') then + If OIColumns NE '' then + Transfer OIColumns to OIColumnNames + end else + // The GetMappedOIColumnNames service will automatically remove any columns that are also mapped in + // a join clause with the "Column Data" return value attribute. + OIColumnNames = SQL_Services('GetMappedOIColumnNames', OITableName, SQLTableName, ExcludeJoinedColumns) + end + If OIColumnNames NE '' then + For Each OIColumnName in OIColumnNames using @FM setting fPos + OIColumnToSQLMap = SQL_Services('GetOIColumnToSQLMap', OITableName, OIColumnName) + If Error_Services('NoError') then + If SRP_JSON(MapObj, 'PARSE', OIColumnToSQLMap) EQ '' then + MappedSQLTableName = SRP_JSON(MapObj, 'GETVALUE', 'SQLTableName') + MappedSQLColumnName = SRP_JSON(MapObj, 'GETVALUE', 'SQLColumnName') + If (MappedSQLTableName EQ SQLTablename) AND (MappedSQLColumnName NE '') then + ColumnNames := MappedSQLColumnName : @FM + end + SRP_JSON(MapObj, 'RELEASE') + end + end + Next OIColumnName + end + ColumnNames[-1, 1] = '' + If ColumnNames NE '' then Memory_Services('SetValue', ServiceKeyID, ColumnNames) + end else + Error_Services('Add', 'The OITableName or SQLTableName argument was missing in the ' : Service : ' service.') + end + end + Response = ColumnNames + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetMappedSQLColumnValues +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table to. - [Required] +// SQLTableName - The name of the SQL table that the Openinsight table is mapped to. - [Required] +// OIKeyID - The Key ID to the OpenInsight row being written to SQL. - [Required] +// OIRow - The OpenInsight row being written to SQL. - [Required] +// AMVPosition - The position within the multivalue column that should be used in the join clause if the OpenInsight +// column is supposed to use its Index Position. - [Optional] +// OIColumns - An @FM delimited list of OpenInsight table columns that should only be used to write to SQL. If empty, +// all columns that have a map defintion will be used. - [Optional] +// +// Returns an @FM delimited list of SQL column values for the indicated table that are derived from the indicated +// OpenInsight table and associated OpenInsight columns. This service is normally called to create a fully formed Insert +// query statement. +//---------------------------------------------------------------------------------------------------------------------- +Service GetMappedSQLColumnValues(OITableName, SQLTableName, OIKeyID, OIRow, AMVPosition, OIColumns) + + Convert @Lower_Case to @Upper_Case in OITableName + If Num(AMVPosition) else AMVPosition = '' + ColumnValues = '' + If (OITableName NE '') AND (SQLTableName NE '') AND (OIKeyID NE '') AND (OIRow NE '') then + FieldArray = Database_Services('ReadDataRow', 'DICT.' : OITablename, '%FIELDS%') + If OIColumns NE '' then + Transfer OIColumns to OIColumnNames + end else + // The GetMappedOIColumnNames service will automatically remove any columns that are also mapped in + // a join clause with the "Column Data" return value attribute. + OIColumnNames = SQL_Services('GetMappedOIColumnNames', OITableName, SQLTableName, True$) + end + If OIColumnNames NE '' then + For Each OIColumnName in OIColumnNames using @FM setting fPos + Locate OIColumnName in FieldArray using @VM setting vPos then + OIColumnToSQLMap = SQL_Services('GetOIColumnToSQLMap', OITableName, OIColumnName) + If Error_Services('NoError') then + If SRP_JSON(MapObj, 'PARSE', OIColumnToSQLMap) EQ '' then + MappedSQLTableName = SRP_JSON(MapObj, 'GETVALUE', 'SQLTableName') + If MappedSQLTableName EQ SQLTablename then + SQLColumnType = SRP_JSON(MapObj, 'GETVALUE', 'SQLColumnType') + OIColumnType = FieldArray + IsOIKey = False$ ; // Assume false for now. + If OIColumnType EQ 'F' then + OIColumnPos = FieldArray + If OIColumnPos GT 0 then + OIColumnValue = OIRow + end else + IsOIKey = True$ + OIKeyPart = FieldArray + OIColumnValue = Field(OIKeyID, '*', OIKeyPart, 1) + If OIColumnValue EQ '' then + Error_Services('Add', 'Key ID Column ' : OIColumnName : ' was assigned an empty string value in ' : Service : '.') + end + end + end else + // OIColumnValue = Calculate(OIColumnName) ; // Actual logic used in MFS + OIColumnValue = Xlate(OITablename, OIKeyID, OIColumnName, 'X') + end + If (AMVPosition NE '') AND (IsOIKey NE True$) then + OIColumnValue = OIColumnValue<0, AMVPosition> + end + Begin Case + Case SQLColumnType _EQC 'uniqueidentifier' + OIColumnValue = 'NEWID()' + Case OIColumnValue EQ '' + // Empty strings are treated as NULL values. + OIColumnValue = 'NULL' + Case InList('varchar,nvarchar,char,nchar', SQLColumnType, ',') + // Single quote the value. + SQLColumnLength = SRP_JSON(MapObj, 'GETVALUE', 'SQLColumnLength') + OIColumnConv = FieldArray + If OIColumnConv NE '' then + OIColumnValue = Fmt(OIColumnValue, OIColumnConv) + end + If (SQLColumnLength EQ '') OR (SQLColumnLength EQ '-1') then SQLColumnLength = Len(OIColumnValue) + OIColumnValue = OIColumnValue[1, SQLColumnLength, 1] + Swap "'" with "''" in OIColumnValue + OIColumnValue = "'" : OIColumnValue : "'" + Case InList('tinyint,smallint,bigint,int', SQLColumnType, ',') + // Treat as an integer. + OIColumnConv = 'MD0' + If Len(OIColumnConv) then + OIColumnValue = Fmt(OIColumnValue, OIColumnConv) + If Not(Num(OIColumnValue)) then + // Not a true number so format like a string. + OIColumnValue = "'" : OIColumnValue : "'" + end + end else + // Empty value so treat it as a NULL value. + OIColumnValue = 'NULL' + end + Case InList('decimal,numeric,float,real', SQLColumnType, ',') + // Treat as a floating point number using any OI column output conversion if it + // exists. + OIColumnConv = FieldArray + Convert 'Z' to '' in OIColumnConv ; // No empty strings with numeric columns. + If Len(OIColumnConv) then + OIColumnValue = Fmt(OIColumnValue, OIColumnConv) + If Not(Num(OIColumnValue)) then + // Not a true number so format like a string. + OIColumnValue = "'" : OIColumnValue : "'" + end + end else + // Empty value so treat it as a NULL value. + OIColumnValue = 'NULL' + end + Case SQLColumnType _EQC 'bit' + // Treat as a Boolean, but only return a 1, 0, or NULL. + If OIColumnValue EQ '' then + OIColumnValue = 'NULL' + end else + If OIColumnValue NE False$ then OIColumnValue = True$ + end + Case SQLColumnType _EQC 'date' + OIColumnValue = "'" : (SRP_Date('Format', OIColumnValue, 'YYYY-MM-DD')) : "'" + Case SQLColumnType _EQC 'datetime' + OIColumnValue = "'" : (SRP_DateTime('Format', OIColumnValue, 'YYYY-MM-DD hh:mm:ss')) : "'" + Case SQLColumnType _EQC 'time' + OIColumnValue = "'" : (SRP_Time('Format', OIColumnValue, 'hh:mm:ss')) : "'" + Case Otherwise$ + // Treat as a character type. + SQLColumnLength = SRP_JSON(MapObj, 'GETVALUE', 'SQLColumnLength') + OIColumnConv = FieldArray + If OIColumnConv NE '' then + OIColumnValue = Fmt(OIColumnValue, OIColumnConv) + end + If (SQLColumnLength EQ '') OR (SQLColumnLength EQ '-1') then SQLColumnLength = Len(OIColumnValue) + OIColumnValue = OIColumnValue[1, SQLColumnLength, 1] + Swap "'" with "''" in OIColumnValue + OIColumnValue = "'" : OIColumnValue : "'" + End Case + // Basic conversion rules. + Convert \09\ to ' ' in OIColumnValue + Swap \0D0A\ with ' ' in OIColumnValue + Convert @VM to '|' in OIColumnValue + Convert @SVM to ' ' in OIColumnValue + Convert @TM to ' ' in OIColumnValue + Convert @STM to ' ' in OIColumnValue + ColumnValues := OIColumnValue : @FM + end + SRP_JSON(MapObj, 'RELEASE') + end + Error_Services('Clear') ; // Any errors at this point would have been created during calculated column logic, which is unrelated to this service. + end + end + While Error_Services('NoError') + Next OIColumnName + end + ColumnValues[-1, 1] = '' + end else + Error_Services('Add', 'The OITableName, SQLTableName, OIKeyID, or OIRow argument was missing in the ' : Service : ' service.') + end + Response = ColumnValues + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSQLInsertStatements +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// OIKeyID - The Key ID to the OpenInsight row being deleted from SQL. - [Required] +// OIRow - The OpenInsight row associated with the OpenInsight Key ID. - [Optional] +// OIColumns - An @FM delimited list of OpenInsight table columns that should only be used to write to SQL. If empty, +// all columns that have a map defintion will be used. - [Optional] +// +// Returns an @FM delimited list of SQL insert statements for the SQL table mapped to the indicated OpenInsight table. +// This will automatically create all SQL insert statements for secondary SQL tables as well. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSQLInsertStatements(OITableName, OIKeyID, OIRow, OIColumns) + + Convert @Lower_Case to @Upper_Case in OITableName + SQLInsertStatements = '' + + If (OITableName NE '') AND (OIKeyID NE '') AND (OIRow NE '') then + + // Start with the primary SQL table that is mapped to this OpenInsight table. + PrimarySQLTableName = SQL_Services('GetPrimarySQLTable', OITableName) + MappedSQLColumnNames = SQL_Services('GetMappedSQLColumnNames', OITableName, PrimarySQLTableName, OIColumns) + If MappedSQLColumnNames NE '' then MappedSQLColumnNames := @FM + MappedSQLColumnValues = SQL_Services('GetMappedSQLColumnValues', OITablename, PrimarySQLTableName, OIKeyID, OIRow, '', OIColumns) + If MappedSQLColumnValues NE '' then MappedSQLColumnValues := @FM + JoinedSQLColumnNames = SQL_Services('GetMappedJoinedSQLColumnNames', OITableName, PrimarySQLTableName) + If JoinedSQLColumnNames NE '' then + MappedSQLColumnNames := JoinedSQLColumnNames : @FM + JoinedSQLColumnValues = SQL_Services('GetMappedJoinedSQLColumnValues', OITableName, PrimarySQLTableName, OIKeyID, OIRow) + MappedSQLColumnValues := JoinedSQLColumnValues : @FM + end + StaticSQLColumnNames = SQL_Services('GetStaticSQLColumnNames', OITableName) + If StaticSQLColumnNames NE '' then + MappedSQLColumnNames := StaticSQLColumnNames : @FM + StaticSQLColumnValues = SQL_Services('GetStaticSQLColumnValues', OITableName) + MappedSQLColumnValues := StaticSQLColumnValues : @FM + end + MappedSQLColumnNames[-1, 1] = '' + MappedSQLColumnValues[-1, 1] = '' + Swap @FM with ', ' in MappedSQLColumnNames + Swap @FM with ", " in MappedSQLColumnValues + SQLInsertStatement = 'INSERT INTO ' : PrimarySQLTableName : ' ' + SQLInsertStatement := '(' + SQLInsertStatement := MappedSQLColumnNames + SQLInsertStatement := ') VALUES (' + SQLInsertStatement := MappedSQLColumnValues + SQLInsertStatement := ')' + SQLInsertStatements := SQLInsertStatement : @FM + + If Error_Services('NoError') then + // Add any secondary SQL table inserts that might be required. + SecondarySQLTableNames = SQL_Services('GetSecondarySQLTables', OITableName) + If SecondarySQLTableNames NE '' then + For Each SecondarySQLTableName in SecondarySQLTableNames using @FM + OIColumnValue = '' ; // Default to empty string. Update if AMV Master is found. + NumPositions = 1 ; // Default to only 1 index position. Update if AMV Master is found. + AMVMaster = SQL_Services('GetAMVMaster', OITableName, SecondarySQLTableName) + If AMVMaster NE '' then + FieldArray = Database_Services('ReadDataRow', 'DICT.' : OITablename, '%FIELDS%') + If Error_Services('NoError') then + Locate AMVMaster in FieldArray using @VM setting vPos then + OIColumnType = FieldArray + If OIColumnType EQ 'F' then + OIColumnPos = FieldArray + If OIColumnPos GT 0 then + OIColumnValue = OIRow + end else + OIKeyPart = FieldArray + OIColumnValue = Field(OIKeyID, '*', OIKeyPart, 1) + end + end else + // OIColumnValue = Calculate(OIColumnName) ; // Actual logic used in MFS + OIColumnValue = Xlate(OITablename, OIKeyID, OIColumnName, 'X') + end + NumPositions = DCount(OIColumnValue, @VM) + end + end + end + + MappedSQLColumnNames = SQL_Services('GetMappedSQLColumnNames', OITableName, SecondarySQLTableName) + If MappedSQLColumnNames NE '' then + JoinedSQLColumnNames = SQL_Services('GetMappedJoinedSQLColumnNames', OITableName, SecondarySQLTableName) + If JoinedSQLColumnNames NE '' then + MappedSQLColumnNames := @FM : JoinedSQLColumnNames + end + Swap @FM with ', ' in MappedSQLColumnNames + For AMVPosition = 1 to NumPositions + If OIColumnValue<0, AMVPosition> NE '' then + MappedSQLColumnValues = SQL_Services('GetMappedSQLColumnValues', OITablename, SecondarySQLTableName, OIKeyID, OIRow, AMVPosition) + If JoinedSQLColumnNames NE '' then + JoinedSQLColumnValues = SQL_Services('GetMappedJoinedSQLColumnValues', OITableName, SecondarySQLTableName, OIKeyID, OIRow, AMVPosition) + MappedSQLColumnValues := @FM : JoinedSQLColumnValues + end + Swap @FM with ', ' in MappedSQLColumnValues + SQLInsertStatement = 'INSERT INTO ' : SecondarySQLTableName : ' ' + SQLInsertStatement := '(' + SQLInsertStatement := MappedSQLColumnNames + SQLInsertStatement := ') VALUES (' + SQLInsertStatement := MappedSQLColumnValues + SQLInsertStatement := ')' + SQLInsertStatements := SQLInsertStatement : @FM + end + Next AMVPosition + end + Next SecondarySQLTableName + end + end + + SQLInsertStatements[-1, 1] = '' + end else + Error_Services('Add', 'The OITableName, OIKeyID, or OIRow argument was missing in the ' : Service : ' service.') + end + + Response = SQLInsertStatements + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSQLUpdateStatements +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// OIKeyID - The Key ID to the OpenInsight row being deleted from SQL. - [Required] +// OIRow - The OpenInsight row associated with the OpenInsight Key ID. - [Optional] +// OIColumns - An @FM delimited list of OpenInsight table columns that should only be used to write to SQL. If empty, +// all columns that have a map defintion will be used. - [Optional] +// +// Returns an @FM delimited list of SQL update statements for the SQL table mapped to the indicated OpenInsight table. +// This will automatically create all SQL update statements for secondary SQL tables as well. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSQLUpdateStatements(OITableName, OIKeyID, OIRow, OIColumns) + + Convert @Lower_Case to @Upper_Case in OITableName + SQLUpdateStatements = '' + + If (OITableName NE '') AND (OIKeyID NE '') AND (OIRow NE '') then + + // Start with the primary SQL table that is mapped to this OpenInsight table. + PrimarySQLTableName = SQL_Services('GetPrimarySQLTable', OITableName) + JoinClause = SQL_Services('GetJoinClause', OITableName, PrimarySQLTableName, OIKeyID, OIRow) + MappedSQLColumnNames = SQL_Services('GetMappedSQLColumnNames', OITableName, PrimarySQLTableName, OIColumns) + If MappedSQLColumnNames NE '' then MappedSQLColumnNames := @FM + MappedSQLColumnValues = SQL_Services('GetMappedSQLColumnValues', OITablename, PrimarySQLTableName, OIKeyID, OIRow, '', OIColumns) + If MappedSQLColumnValues NE '' then MappedSQLColumnValues := @FM + JoinedSQLColumnNames = SQL_Services('GetMappedJoinedSQLColumnNames', OITableName, PrimarySQLTableName) + StaticSQLColumnNames = SQL_Services('GetStaticSQLColumnNames', OITableName) + If StaticSQLColumnNames NE '' then + MappedSQLColumnNames := StaticSQLColumnNames : @FM + StaticSQLColumnValues = SQL_Services('GetStaticSQLColumnValues', OITableName) + MappedSQLColumnValues := StaticSQLColumnValues : @FM + end + MappedSQLColumnNames[-1, 1] = '' + MappedSQLColumnValues[-1, 1] = '' + SQLUpdateStatement = '' + If MappedSQLColumnNames NE '' then + SQLUpdateStatement := 'UPDATE ' : PrimarySQLTableName : ' SET ' + For Each SQLColumnName in MappedSQLColumnNames using @FM setting fPos + SQLUpdateStatement := SQLColumnName : '=' : MappedSQLColumnValues : ', ' + Next SQLColumnName + SQLUpdateStatement[-2, 1] = '' + SQLUpdateStatement := 'WHERE ' + SQLUpdateStatement := JoinClause : ' ' + SQLUpdateStatements := SQLUpdateStatement : @FM + end + + If Error_Services('NoError') then + // Add any secondary SQL table inserts that might be required. + SecondarySQLTableNames = SQL_Services('GetSecondarySQLTables', OITableName) + If SecondarySQLTableNames NE '' then + For Each SecondarySQLTableName in SecondarySQLTableNames using @FM + OIColumnValue = '' ; // Default to empty string. Update if AMV Master is found. + NumPositions = 1 ; // Default to only 1 index position. Update if AMV Master is found. + AMVMaster = SQL_Services('GetAMVMaster', OITableName, SecondarySQLTableName) + If AMVMaster NE '' then + FieldArray = Database_Services('ReadDataRow', 'DICT.' : OITablename, '%FIELDS%') + If Error_Services('NoError') then + Locate AMVMaster in FieldArray using @VM setting vPos then + OIColumnType = FieldArray + If OIColumnType EQ 'F' then + OIColumnPos = FieldArray + If OIColumnPos GT 0 then + OIColumnValue = OIRow + end else + OIKeyPart = FieldArray + OIColumnValue = Field(OIKeyID, '*', OIKeyPart, 1) + end + end else + // OIColumnValue = Calculate(OIColumnName) ; // Actual logic used in MFS + OIColumnValue = Xlate(OITablename, OIKeyID, OIColumnName, 'X') + end + NumPositions = DCount(OIColumnValue, @VM) + end + end + end + + // Remove all rows from the secondary table. These will be added back using the INSERT statements as needed. + SQLUpdateStatement = 'DELETE FROM ' : SecondarySQLTableName : ' ' + SQLUpdateStatement := 'WHERE ' + SQLUpdateStatement := JoinClause + SQLUpdateStatements := SQLUpdateStatement : @FM + + MappedSQLColumnNames = SQL_Services('GetMappedSQLColumnNames', OITableName, SecondarySQLTableName) + If MappedSQLColumnNames NE '' then + JoinedSQLColumnNames = SQL_Services('GetMappedJoinedSQLColumnNames', OITableName, SecondarySQLTableName) + If JoinedSQLColumnNames NE '' then + MappedSQLColumnNames := @FM : JoinedSQLColumnNames + end + Swap @FM with ', ' in MappedSQLColumnNames + For AMVPosition = 1 to NumPositions + If OIColumnValue<0, AMVPosition> NE '' then + MappedSQLColumnValues = SQL_Services('GetMappedSQLColumnValues', OITablename, SecondarySQLTableName, OIKeyID, OIRow, AMVPosition) + If JoinedSQLColumnNames NE '' then + JoinedSQLColumnValues = SQL_Services('GetMappedJoinedSQLColumnValues', OITableName, SecondarySQLTableName, OIKeyID, OIRow, AMVPosition) + MappedSQLColumnValues := @FM : JoinedSQLColumnValues + end + Swap @FM with ', ' in MappedSQLColumnValues + SQLUpdateStatement = 'INSERT INTO ' : SecondarySQLTableName : ' ' + SQLUpdateStatement := '(' + SQLUpdateStatement := MappedSQLColumnNames + SQLUpdateStatement := ') VALUES (' + SQLUpdateStatement := MappedSQLColumnValues + SQLUpdateStatement := ')' + SQLUpdateStatements := SQLUpdateStatement : @FM + end + Next AMVPosition + end + Next SecondarySQLTableName + end + end + + SQLUpdateStatements[-1, 1] = '' + end else + Error_Services('Add', 'The OITableName, OIKeyID, or OIRow argument was missing in the ' : Service : ' service.') + end + + Response = SQLUpdateStatements + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSQLMergeStatements +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// OIKeyID - The Key ID to the OpenInsight row being deleted from SQL. - [Required] +// OIRow - The OpenInsight row associated with the OpenInsight Key ID. - [Optional] +// OIColumns - An @FM delimited list of OpenInsight table columns that should only be used to write to SQL. If empty, +// all columns that have a map defintion will be used. - [Optional] +// +// Returns an @FM delimited list of SQL insert statements for the SQL table mapped to the indicated OpenInsight table. +// This will automatically create all SQL insert statements for secondary SQL tables as well. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSQLMergeStatements(OITableName, OIKeyID, OIRow, OIColumns) + + Convert @Lower_Case to @Upper_Case in OITableName + SQLInsertStatements = '' + + If (OITableName NE '') AND (OIKeyID NE '') AND (OIRow NE '') then + + // Start with the primary SQL table that is mapped to this OpenInsight table. + PrimarySQLTableName = SQL_Services('GetPrimarySQLTable', OITableName) + MappedSQLColumnNames = SQL_Services('GetMappedSQLColumnNames', OITableName, PrimarySQLTableName, OIColumns) + MergeClause = SQL_Services('GetMergeClause', OITableName, PrimarySQLTableName, OIKeyID, OIRow) + If MappedSQLColumnNames NE '' then MappedSQLColumnNames := @FM + MappedSQLColumnValues = SQL_Services('GetMappedSQLColumnValues', OITablename, PrimarySQLTableName, OIKeyID, OIRow, '', OIColumns) + If MappedSQLColumnValues NE '' then MappedSQLColumnValues := @FM + JoinedSQLColumnNames = SQL_Services('GetMappedJoinedSQLColumnNames', OITableName, PrimarySQLTableName) + If JoinedSQLColumnNames NE '' then + MappedSQLColumnNames := JoinedSQLColumnNames : @FM + JoinedSQLColumnValues = SQL_Services('GetMappedJoinedSQLColumnValues', OITableName, PrimarySQLTableName, OIKeyID, OIRow) + MappedSQLColumnValues := JoinedSQLColumnValues : @FM + end + StaticSQLColumnNames = SQL_Services('GetStaticSQLColumnNames', OITableName) + If StaticSQLColumnNames NE '' then + MappedSQLColumnNames := StaticSQLColumnNames : @FM + StaticSQLColumnValues = SQL_Services('GetStaticSQLColumnValues', OITableName) + MappedSQLColumnValues := StaticSQLColumnValues : @FM + end + MappedSQLColumnNames[-1, 1] = '' + MappedSQLColumnValues[-1, 1] = '' + Swap @FM with ', ' in MappedSQLColumnNames + Swap @FM with ", " in MappedSQLColumnValues + + SQLInsertStatement = 'BEGIN ' + SQLInsertStatement := 'SET NOCOUNT ON; ' + SQLInsertStatement := 'MERGE ':PrimarySQLTableName:' AS tgt ' + SQLInsertStatement := 'USING (VALUES (':MappedSQLColumnValues:')) AS src (':MappedSQLColumnNames:') ' + SQLInsertStatement := 'ON (':MergeClause:') ' + SQLInsertStatement := 'WHEN MATCHED THEN ' + SQLInsertStatement := ' UPDATE SET ' + For Each SQLColumnName in MappedSQLColumnNames using ','setting fPos + SQLColumnName = Trim(SQLColumnName) + SQLInsertStatement := SQLColumnName : ' = src.' : SQLColumnName : ', ' + Next SQLColumnName + SQLInsertStatement[-2, 1] = '' + SQLInsertStatement := 'WHEN NOT MATCHED THEN ' + SQLInsertStatement := ' INSERT (':MappedSQLColumnNames:') ' + SQLInsertStatement := ' VALUES (':MappedSQLColumnValues:'); ' + SQLInsertStatement := 'END;' + SQLInsertStatements := SQLInsertStatement : @FM + + If Error_Services('NoError') then + // Add any secondary SQL table inserts that might be required. + SecondarySQLTableNames = SQL_Services('GetSecondarySQLTables', OITableName) + If SecondarySQLTableNames NE '' then + For Each SecondarySQLTableName in SecondarySQLTableNames using @FM + OIColumnValue = '' ; // Default to empty string. Update if AMV Master is found. + NumPositions = 1 ; // Default to only 1 index position. Update if AMV Master is found. + AMVMaster = SQL_Services('GetAMVMaster', OITableName, SecondarySQLTableName) + If AMVMaster NE '' then + FieldArray = Database_Services('ReadDataRow', 'DICT.' : OITablename, '%FIELDS%') + If Error_Services('NoError') then + Locate AMVMaster in FieldArray using @VM setting vPos then + OIColumnType = FieldArray + If OIColumnType EQ 'F' then + OIColumnPos = FieldArray + If OIColumnPos GT 0 then + OIColumnValue = OIRow + end else + OIKeyPart = FieldArray + OIColumnValue = Field(OIKeyID, '*', OIKeyPart, 1) + end + end else + // OIColumnValue = Calculate(OIColumnName) ; // Actual logic used in MFS + OIColumnValue = Xlate(OITablename, OIKeyID, OIColumnName, 'X') + end + NumPositions = DCount(OIColumnValue, @VM) + end + end + end + + MappedSQLColumnNames = SQL_Services('GetMappedSQLColumnNames', OITableName, SecondarySQLTableName) + If MappedSQLColumnNames NE '' then + JoinedSQLColumnNames = SQL_Services('GetMappedJoinedSQLColumnNames', OITableName, SecondarySQLTableName) + If JoinedSQLColumnNames NE '' then + MappedSQLColumnNames := @FM : JoinedSQLColumnNames + end + Swap @FM with ', ' in MappedSQLColumnNames + For AMVPosition = 1 to NumPositions + If OIColumnValue<0, AMVPosition> NE '' then + MergeClause = SQL_Services('GetMergeClause', OITableName, SecondarySQLTableName, OIKeyID, OIRow) + MappedSQLColumnValues = SQL_Services('GetMappedSQLColumnValues', OITablename, SecondarySQLTableName, OIKeyID, OIRow, AMVPosition) + If JoinedSQLColumnNames NE '' then + JoinedSQLColumnValues = SQL_Services('GetMappedJoinedSQLColumnValues', OITableName, SecondarySQLTableName, OIKeyID, OIRow, AMVPosition) + MappedSQLColumnValues := @FM : JoinedSQLColumnValues + end + Swap @FM with ', ' in MappedSQLColumnValues + + SQLInsertStatement = 'BEGIN ' + SQLInsertStatement := 'SET NOCOUNT ON; ' + SQLInsertStatement := 'MERGE ':SecondarySQLTableName:' AS tgt ' + SQLInsertStatement := 'USING (VALUES (':MappedSQLColumnValues:')) AS src (':MappedSQLColumnNames:') ' + SQLInsertStatement := 'ON (':MergeClause:') ' + SQLInsertStatement := 'WHEN MATCHED THEN ' + SQLInsertStatement := ' UPDATE SET ' + For Each SQLColumnName in MappedSQLColumnNames using ',' setting fPos + SQLColumnName = Trim(SQLColumnName) + SQLInsertStatement := SQLColumnName : ' = src.' : SQLColumnName : ', ' + Next SQLColumnName + SQLInsertStatement[-2, 1] = '' + SQLInsertStatement := 'WHEN NOT MATCHED THEN ' + SQLInsertStatement := ' INSERT (':MappedSQLColumnNames:') ' + SQLInsertStatement := ' VALUES (':MappedSQLColumnValues:'); ' + SQLInsertStatement := 'END;' + SQLInsertStatements := SQLInsertStatement : @FM + + end + Next AMVPosition + end + Next SecondarySQLTableName + end + end + + SQLInsertStatements[-1, 1] = '' + end else + Error_Services('Add', 'The OITableName, OIKeyID, or OIRow argument was missing in the ' : Service : ' service.') + end + + Response = SQLInsertStatements + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSQLSelectStatement +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// OIKeyID - The Key ID to the OpenInsight row being deleted from SQL. - [Required] +// OIRow - The OpenInsight row associated with the OpenInsight Key ID. - [Optional] +// +// Returns the SQL select statement for the indicated SQL table based on its mapping to the indicated OpenInsight table. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSQLSelectStatement(OITableName, SQLTableName, OIKeyID, OIRow) + + Convert @Lower_Case to @Upper_Case in OITableName + + SQLSelectStatement = '' + + If (OITableName NE '') AND (SQLTableName NE '') AND (OIKeyID NE '') then + + JoinClause = SQL_Services('GetJoinClause', OITableName, SQLTableName, OIKeyID, OIRow, '', True$) + If JoinClause NE '' then + MappedSQLColumnNames = SQL_Services('GetMappedSQLColumnNames', OITableName, SQLTableName) + If MappedSQLColumnNames NE '' then + // Include the join columns among the columns being returned so their values can be updated in their + // joined OpenInsight columns (if applicable). + MappedSQLColumnNames := @FM : SQL_Services('GetMappedJoinedSQLColumnNames', OITableName, SQLTableName) + Swap @FM with ', ' in MappedSQLColumnNames + SQLSelectStatement := 'SELECT ' + SQLSelectStatement := MappedSQLColumnNames : ' ' + SQLSelectStatement := 'FROM ' : SQLTableName : ' ' + SQLSelectStatement := 'WHERE ' + SQLSelectStatement := JoinClause : ' ' + end + end + + end else + Error_Services('Add', 'The OITableName, SQLTableName, or OIKeyID argument was missing in the ' : Service : ' service.') + end + + Response = SQLSelectStatement + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetSQLDeleteStatements +// +// OITableName - The name of the OpenInsight table that is mapped to the SQL table. - [Required] +// OIKeyID - The Key ID to the OpenInsight row being deleted from SQL. - [Required] +// OIRow - The OpenInsight row associated with the OpenInsight Key ID. - [Optional] +// +// Returns an @FM delimited list of SQL delete statements for the SQL table mapped to the indicated OpenInsight table. +// This will automatically create all SQL delete statements for secondary SQL tables as well. Note: OIRow will likely be +// an empty string since most join clauses will be based on the OpenInsight Key ID. +//---------------------------------------------------------------------------------------------------------------------- +Service GetSQLDeleteStatements(OITableName, OIKeyID, OIRow) + + Convert @Lower_Case to @Upper_Case in OITableName + SQLDeleteStatements = '' + + If (OITableName NE '') AND (OIKeyID NE '') then + + // Start with the primary SQL table that is mapped to this OpenInsight table. + PrimarySQLTableName = SQL_Services('GetPrimarySQLTable', OITableName) + JoinClause = SQL_Services('GetJoinClause', OITableName, PrimarySQLTableName, OIKeyID, OIRow, '', True$) + SQLDeleteStatement = 'DELETE FROM ' : PrimarySQLTableName : ' ' + SQLDeleteStatement := 'WHERE ' + SQLDeleteStatement := JoinClause + SQLDeleteStatements := SQLDeleteStatement : @FM + + // Add any secondary SQL table inserts that might be required. + SecondarySQLTableNames = SQL_Services('GetSecondarySQLTables', OITableName) + If SecondarySQLTableNames NE '' then + For Each SecondarySQLTableName in SecondarySQLTableNames using @FM + JoinClause = SQL_Services('GetJoinClause', OITableName, SecondarySQLTableName, OIKeyID, OIRow, '', True$) + SQLDeleteStatement = 'DELETE FROM ' : SecondarySQLTableName : ' ' + SQLDeleteStatement := 'WHERE ' + SQLDeleteStatement := JoinClause + SQLDeleteStatements := SQLDeleteStatement : @FM + Next SecondarySQLTableName + end + + SQLDeleteStatements[-1, 1] = '' + end else + Error_Services('Add', 'The OITableName or OIKeyID argument was missing in the ' : Service : ' service.') + end + + Response = SQLDeleteStatements + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// PostSQLRequest +// +// This service can be used to post SQL queries to databases that are not reachable from the originating server. +// Requests are processed within the ProcessSQLRequests service. +// +// Input: +// ServerID - Key to SERVERS record containing external SQL database connection string +// Query - SQL query to execute +// +// Output: +// Response - Query response +//---------------------------------------------------------------------------------------------------------------------- +Service PostSQLRequest(ServerID, Query) + + Response = '' + If (ServerID NE '') and (Query NE '') then + RequestDate = Date() + RequestTime = Time() + RequestKeyID = @Station:'*':RequestDate :'*':RequestTime + RequestRow = '' + RequestRow = ServerID + RequestRow = Query + Database_Services('WriteDataRow', 'SQL_REQUESTS', RequestKeyID, RequestRow, True$, False$, True$) + If Error_Services('NoError') then + TimeExpired = False$ + Start = GetTickCount() + Loop + RequestRow = Database_Services('ReadDataRow', 'SQL_REQUESTS', RequestKeyID) + ResponseDate = RequestRow + If ResponseDate NE '' then + Response = RequestRow + Response = SRP_Decode(Response) + end + // Time will expire after 60 seconds. + If GetTickCount() - Start GE 60000 then TimeExpired = True$ + Until (ResponseDate NE '') OR TimeExpired + Sleepery(10) + WinYield() + Yield();Yield();Yield();Yield();Yield();Yield();Yield();Yield() + Repeat + If TimeExpired then + Error_Services('Add', 'SQL request timed out in the ' : Service : ' service.') + end + Open 'SQL_REQUESTS' to hSQLRequests then + Delete hSQLRequests, RequestKeyID else + Null + //Error_Services('Add', 'Error in ':Service:' service. Failed to delete SQL_REQUESTS ':RequestKeyID) + end + end + end + end else + If RowExists('SQL_REQUESTS', RequestKeyID) then + Open 'SQL_REQUESTS' to hSQLRequests then + Delete hSQLRequests, RequestKeyID else + Null + //Error_Services('Add', 'Error in ':Service:' service. Failed to delete SQL_REQUESTS ':RequestKeyID) + end + end + end + Error_Services('Add', 'Null parameter passed into service call. All parameters are required.') + end + +return + + +//---------------------------------------------------------------------------------------------------------------------- +// PostSQLStatement +// +// This service can be used to post SQL statements to databases that are not reachable from the originating server. +// Requests are processed within the ProcessSQLRequests service. +// +// Input: +// ServerID - Key to SERVERS record containing external SQL database connection string +// Statement - SQL statement to execute +// +// Output: +// Response - Query response +//---------------------------------------------------------------------------------------------------------------------- +Service PostSQLStatement(ServerID, Statement) + + Response = '' + If (ServerID NE '') and (Statement NE '') then + RequestDate = Date() + RequestTime = Time() + RequestKeyID = @Station:'*':RequestDate :'*':RequestTime + RequestRow = '' + RequestRow = ServerID + RequestRow = Statement + Database_Services('WriteDataRow', 'SQL_REQUESTS', RequestKeyID, RequestRow, True$, False$, True$) + If Error_Services('HasError') then + Error_Services('Add', 'Error in ':Service:' service. Failed to post SQL statement to queue!') + end + end else + If RowExists('SQL_REQUESTS', RequestKeyID) then + Open 'SQL_REQUESTS' to hSQLRequests then + Delete hSQLRequests, RequestKeyID else + Error_Services('Add', 'Error in ':Service:' service. Failed to delete SQL_REQUESTS ':RequestKeyID) + end + end + end + Error_Services('Add', 'Null parameter passed into service call. All parameters are required.') + end + +return + + +//---------------------------------------------------------------------------------------------------------------------- +// ProcessSQLRequests +// +// Service that attempts to process external SQL requests. These requests are queued in the SQL_REQUESTS table. +//---------------------------------------------------------------------------------------------------------------------- +Service ProcessSQLRequests() + + hSysLists = Database_Services('GetTableHandle', 'SYSLISTS') + Lock hSysLists, ServiceKeyID then + Tablename = 'SQL_REQUESTS' + hSQLRequests = Database_Services('GetTableHandle', Tablename) + If Error_Services('NoError') then + GoSub ClearCursors + Sentence = 'SELECT ':Tablename:' WITH RESPONSE_DATE EQ "" BY REQUEST_DATE BY REQUEST_TIME' + Set_Status(0) + Update_Index(Tablename, 'REQUEST_DATE', 0) + Update_Index(Tablename, 'REQUEST_TIME', 0) + Update_Index(Tablename, 'RESPONSE_DATE', 0) + Update_Index(Tablename, 'RESPONSE_TIME', 0) + RList(Sentence, TARGET_ACTIVELIST$, '', '', '') + EOF = False$ + Loop + ReadNext RequestKeyID else EOF = True$ + Until EOF + RequestRow = Database_Services('ReadDataRow', 'SQL_REQUESTS', RequestKeyID) + ServerID = RequestRow + Query = RequestRow + Response = SQL_Services('GetDataRows', ServerID, Query, 3) + Response = SRP_Encode(Response) + RequestRow = Date() + RequestRow = Time() + RequestRow = Response + Database_Services('WriteDataRow', 'SQL_REQUESTS', RequestKeyID, RequestRow, True$, False$, True$) + KeyLocked = Database_Services('IsKeyIDLocked', 'SQL_REQUESTS', RequestKeyID) + If KeyLocked then Database_Services('ReleaseKeyIDLock', 'SQL_REQUESTS', RequestKeyID) + Repeat + // Cleanup really old requests (i.e. those that are older than 48 hours) + GoSub ClearCursors + Set_Status(0) + CleanDate = Date() - 1 + Sentence = 'SELECT ':Tablename:' WITH RESPONSE_DATE NE "" AND WITH RESPONSE_DATE LT ':Quote(OConv(CleanDate, 'D4/')) + RList(Sentence, TARGET_ACTIVELIST$, '', '', '') + EOF = False$ + Loop + ReadNext RequestKeyID else EOF = True$ + Until EOF + Database_Services('DeleteDataRow', 'SQL_REQUESTS', RequestKeyID) + KeyLocked = Database_Services('IsKeyIDLocked', 'SQL_REQUESTS', RequestKeyID) + If KeyLocked then Database_Services('ReleaseKeyIDLock', 'SQL_REQUESTS', RequestKeyID) + Repeat + // Cleanup old requests that may have been "abandoned" by the requesting process (i.e. those that are older + // than two minutes). + GoSub ClearCursors + Set_Status(0) + CleanTime = Time() - 240 + Sentence = 'SELECT ':Tablename:' WITH RESPONSE_DATE NE "" AND WITH REQUEST_TIME LT ':Quote(OConv(CleanTime, 'MT')) + RList(Sentence, TARGET_ACTIVELIST$, '', '', '') + EOF = False$ + Loop + ReadNext RequestKeyID else EOF = True$ + Until EOF + Database_Services('DeleteDataRow', 'SQL_REQUESTS', RequestKeyID) + KeyLocked = Database_Services('IsKeyIDLocked', 'SQL_REQUESTS', RequestKeyID) + If KeyLocked then Database_Services('ReleaseKeyIDLock', 'SQL_REQUESTS', RequestKeyID) + Repeat + end else + ErrorMsg = Error_Services('GetMessage') + end + Unlock hSysLists, ServiceKeyID else Null + end + +end service + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Internal GoSubs +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +ClearCursors: + For counter = 0 to 8 + ClearSelect counter + Next counter +return + + +WriteLog: + Declare function Environment_Services, Logging_Services + Declare subroutine Logging_Services + LogPath = Environment_Services('GetApplicationRootPath') : '\LogFiles\Replication' + LogDate = Oconv(Date(), 'D4/') + LogTime = Oconv(Time(), 'MTS') + LogFileName = LogDate[7, 4] : '-' : LogDate[1, 2] : '-' : LogDate[4, 2] : ' WRITE_OI_Error.csv' + Headers = 'Logging DTM' : @FM : 'User' : @FM : 'Table' :@FM : 'Key' + objLog = Logging_Services('NewLog', LogPath, LogFileName, CRLF$, Comma$, Headers, '', False$, False$) + LoggingDTM = LogDate : ' ' : LogTime ; // Logging DTM + + LogData = '' + LogData<1, 1> = LoggingDTM + LogData<1, 2> = @User4 + LogData<1, 3> = OITableName + LogData<1, 4> = OIKeyID + LogData<1, 5> = Message + Logging_Services('AppendLog', objLog, LogData, @FM, @VM) +return + + + + + diff --git a/SYSPROG/STPROC/SRP_EDITTABLE_MANAGER.txt b/SYSPROG/STPROC/SRP_EDITTABLE_MANAGER.txt new file mode 100644 index 0000000..d2c43de --- /dev/null +++ b/SYSPROG/STPROC/SRP_EDITTABLE_MANAGER.txt @@ -0,0 +1,398 @@ +Function SRP_EditTable_Manager(Method, CtrlEntId, Param1, Param2, Param3, Param4, Param5, Param6, Param7, Param8, Param9, Param10) + +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : SRP_EditTable_Manager + + Description : Provides common setup and event features for the SRP OLE EditTable. + + Notes : This is desiged to eliviate the need to duplicate large amounts of code to manage the SRP OLE + EditTable. Review the list of options in the top-level case statement of this program to see what is + available. + + Some methods will call other methods. For instance, the BeforeUpdate method will call the Validate + method. + + Parameters : + Method [in] -- A specific setup or event action to execute. + CtrlEntId [in] -- The full control entity ID for the SRP OLE EditTable. + Param2 [in] -- Generic parameter. + Param3 [in] -- Generic parameter. + Param4 [in] -- Generic parameter. + Param5 [in] -- Generic parameter. + Param6 [in] -- Generic parameter. + Param7 [in] -- Generic parameter. + Param8 [in] -- Generic parameter. + Param9 [in] -- Generic parameter. + Param10 [in] -- Generic parameter. + EventFlow [out] -- Flag to indicate how the calling routine should continue. This will return a 1 if everything + is successful. + + History : (Date, Initials, Notes) + 01/22/08 dmb Original programmer. Start with the Validate method. + 01/24/08 dmb Add Clear and Read methods. Updated the WritePre method. + 01/25/08 dmb Add GridLine color defaults for Setup1. + 01/26/08 dmb Add Fill flag for Clear method. + 01/26/08 dmb Add PopulateData method. + 01/26/08 dmb Move LostFocus transfer data logic into its own gosub. + 02/14/08 dmb Add support for custom clear fills (used by the Clear method). Add support for + @ROWSASCOLUMNS and @CELLSASFIELDS UDPs (used by Set_Record). + 02/14/08 dmb Update Style1 to default all header row and data rows to 19 pixels and not resizeable. + 02/16/08 dmb Add support for new UpdateCellEdit parameter in Transfer_EditTable_Data function. Only set + it to Yes$ during the WritePre method. + +***********************************************************************************************************************/ + +$insert LOGICAL + +GoSub Check_Variable_Assignments + +Declare function SRP_Edittable_Manager, Get_Property, Send_Message +Declare subroutine Transfer_Edittable_Data, SRP_Edittable_Manager, Set_Record, Send_Message, Set_Property + +Begin Case + // EditTable Events + Case Method EQ "BeforeUpdate" ; GoSub BeforeUpdate + Case Method EQ "AfterUpdate" ; GoSub AfterUpdate + Case Method EQ "PosChanged" ; GoSub PosChanged + Case Method EQ "AfterDeleteRecords" ; GoSub AfterDeleteRecords + Case Method EQ "LostFocus" ; GoSub LostFocus + + // Window Events + Case Method EQ "WritePre" ; GoSub WritePre + Case Method EQ "Read" ; GoSub Read + Case Method EQ "Clear" ; GoSub Clear + + // Event actions + Case Method EQ "Validate" ; GoSub Validate + Case Method EQ "Convert" ; GoSub Convert + + // Data population + Case Method EQ "PopulateData" ; GoSub PopulateData + + // Setup options + Case Method EQ "Setup1" ; GoSub Setup1 +End Case + +If Assigned(EventFlow) else EventFlow = 1 ; // If not method set this then assume all is well + +Return EventFlow + +Validate: + ////////////////////////////////////////////////////////////////////////////////////// + // + // The Validate method requires the following parameters to be populated: + // + // Param1 = SelPos + // Param2 = Data + // Param3 = Validation + // + // Optionally, these parameters can also be use to override default settings: + // + // Param4 = ValidationMessage + // Param5 = ValidationTitle + // Param6 = ValidationDisplayLength + // + // If ValidationMessage is populated then the ShowBalloonTooltip will be used. + // Otherwise, it is assumed tha the validation method will display its own + // message, which is the case for many UDCs. + // + ////////////////////////////////////////////////////////////////////////////////////// + + Transfer Param1 to SelPos + Transfer Param2 to Data + Transfer Param3 to Validation + Transfer Param4 to ValidationMessage + + If Len(Param5) then Transfer Param5 to ValidationTitle else ValidationTitle = "Validation Error" + If Len(Param6) then Transfer Param6 to ValidationDisplayLength else ValidationDisplayLength = 2000 + + Status() = 0 + iData = IConv(Data, Validation) + If Status() NE 0 then + // Validation failed. + + If Len(ValidationMessage) then + // Use the ShowBalloonTooltip to alert the user of the validation error. + Convert ";" to @FM in SelPos + Swap "@DATA" with Data in ValidationMessage + Config = "" + Config<1> = ValidationMessage ; // Message to display. + Config<2> = ValidationTitle ; // Title of the message. + Config<3> = 3 ; // Use the Error icon. + Config<4> = ValidationDisplayLength ; // Display for 2 seconds unless user clicks to close first. + Send_Message(CtrlEntId, "OLE.ShowBalloonTooltip", SelPos, Config) + end + + Set_Property(CtrlEntId, "OLE.Cancel", 2) ; // This forces the focus to return to the current cell and highlight the cell text. + EventFlow = 0 ; // Indicate that this event chain needs to abort. + end +return + +Convert: + ////////////////////////////////////////////////////////////////////////////////////// + // + // The Convert method requires the following parameters to be populated: + // + // Param1 = SelPos + // Param2 = Data + // Param3 = Conversion + // + ////////////////////////////////////////////////////////////////////////////////////// + + Transfer Param1 to SelPos + Transfer Param2 to Data + Transfer Param3 to Conversion + + NewData = Oconv(Iconv(Data, Conversion), Conversion) ; // Internally convert then externally convert the data to make sure it is formatted correctly. + Set_Property(CtrlEntId, "OLE.CellText[":SelPos:"]", NewData) +return + +BeforeUpdate: + // The BeforeUpdate event can be used for validation checking. + Transfer Param1 to SelPos + Transfer Param2 to Data + Transfer Param3 to Validation + + CellConv = Get_Property(CtrlEntId, "OLE.CellConv[":SelPos:"]") + ValidationMessage = CellConv<3> + + // If the Validation parameter has something, do a validation check. + If Len(Validation) then + EventFlow = SRP_EditTable_Manager("Validate", CtrlEntId, SelPos, Data, Validation, ValidationMessage) + end +return + +AfterUpdate: + // The AfterUpdate event can be used for conversion. + Transfer Param1 to SelPos + Transfer Param2 to Data + Transfer Param3 to Conversion + + // If the Conversion parameter has something, perform the conversion. + If Len(Conversion) then SRP_EditTable_Manager("Convert", CtrlEntId, SelPos, Data, Conversion) +return + +PosChanged: + // The PosChanged event can be used for defaults. + Transfer Param1 to SelPos + Transfer Param2 to PrevSelPos + Transfer Param3 to Cause + Transfer Param4 to Default ; // Note: this parameter is not a part of the PosChanged event + // but the calling routine can pass this in to allow default handling. + + // Get the data in the current cell. If null and a default value has been passed in then update the cell text. + Data = Get_Property(CtrlEntId, "OLE.CellText[":SelPos:"]") + If Data EQ "" AND Len(Default) then + Set_Property(CtrlEntId, "OLE.CellText[":SelPos:"]", Default) + Send_Message(CtrlEntId, "OLE.EditCell", "") + end + + // Since the PosChanged event can add default data make sure these changes are transferred to the OI EditTable. + UpdateCellEdit = No$ + GoSub Update_Databound_EditTable +return + +AfterDeleteRecords: + // Since deleting a record from the EditTable changes data make sure these changes are transferred to the OI + // EditTable. + UpdateCellEdit = No$ + GoSub Update_Databound_EditTable +return + +LostFocus: + UpdateCellEdit = No$ + GoSub Update_Databound_EditTable +return + +Read: + Record = Param1 + Set_Record(Record, "", Yes$) +return + +Clear: + // Find all the OLE EditTables and Clear them. + Transfer Param1 to DefaultClearFill + If DefaultClearFill EQ "" then DefaultClearFill = 1 + + CtrlMap = Get_Property(@Window, "CTRLMAP") + Convert @FM to @RM in CtrlMap + ProgIDs = Get_Property(CtrlMap, "OLE.ProgID") + BytePos = 1 ; // Byte position within the string. Used by the Remove statement + Flag = "" ; // Flag used by the Remove statement + RPos = 0 ; // Record position within the @RM delimited string + Loop + Remove ProgID from ProgIDs at BytePos setting Flag + RPos += 1 + If ProgID _EQC "SRP.EditTable.1" then + // This is an OLE EditTable so send the Clear method. + Ctrl = Field(CtrlMap, @RM, RPos) + ClearFill = Get_Property(Ctrl, "@CLEARFILL") + If ClearFill EQ "" then ClearFill = DefaultClearFill + Send_Message(Ctrl, "OLE.Clear", ClearFill) + end + While Flag + Repeat +return + +WritePre: + CtrlEntId = Get_Property(@Window, "FOCUS") + ProgID = Get_Property(CtrlEntId, "OLE.ProgID") + If ProgID _EQC "SRP.EditTable.1" then + // Control with focus is an SRP OLE EditTable. Before the system event handler executes, update the current cell + // text and then transfer the data from the OLE EditTable to the OI EditTable. + CellContents = Send_Message(CtrlEntId, "OLE.UpdateCellEdit") + If CellContents<2> EQ "" then + // The attempt to update the cell failed. Probably due to a validation error. Abort the event. + EventFlow = 0 + end else + // Cell update was successful. Transfer data to OI EditTable. + UpdateCellEdit = Yes$ + GoSub Update_Databound_EditTable + end + end +return + +PopulateData: + // It is assumed that @ID, @RECORD, and @DICT is already populated. This method uses + // the Calculate function which requires these system variables. + Transfer Param1 to DataArray ; // Dynamic array of field names. Used by the Calculate function to compute the value. + DictFields = Param2 ; // The %FIELDS% record from the dictionary table. Used to get the output conversion format. + Transfer Param3 to ArrayFlag ; // Flag that indicates if the DataArray is in Array or List format. Default is Array. + + If ArrayFlag EQ "" then ArrayFlag = Yes$ + + NumRows = FieldCount(DataArray, @FM) + For RowCnt = 1 to NumRows + NumCols = FieldCount(DataArray, @VM) + For ColCnt = 1 to NumCols + FieldName = DataArray + Locate FieldName in DictFields<3> using @VM setting vPos then + FieldData = Calculate(FieldName) + Format = DictFields<12, vPos> + If Len(Format) then FieldData = Oconv(FieldData, Format) + DataArray = FieldData + end + Next ColCnt + Next RowCnt + + If ArrayFlag then Prop = "OLE.Array" else Prop = "OLE.List" + Set_Property(CtrlEntId, Prop, DataArray) +return + +Setup1: + Transfer Param1 to ArrayDimension + Transfer Param2 to TitleList + Transfer Param3 to ColumnWidths + Transfer Param4 to ColumnAlignments + Transfer Param5 to VirtualPos + Transfer Param6 to RowsAsColumns + Transfer Param7 to CellsAsFields + Transfer Param8 to ClearFill + Transfer Param9 to RowsToRecord + + // Set up general properties that affect the entire EditTable. + Set_Property(CtrlEntId, "OLE.BorderType", "XP Flat") ; // XP border when possible. + Set_Property(CtrlEntId, "OLE.WorkspaceBkColor", "Window") ; // Fill in the space with no cells with the current theme's Window color. + If ArrayDimension then Set_Property(CtrlEntId, "OLE.Dimension", ArrayDimension) ; // Create the number of columns and rows for this EditTable. + If RowsToRecord then Set_Property(CtrlEntId, "OLE.RowsToRecords", RowsToRecord) ; // Set up RowsToRecord if required. + // Set up properties that affect navigation functional and visual behavior. + Set_Property(CtrlEntId, "OLE.QuickTabOut", Yes$) ; // Force the focus to move to the next control if the user tries to navigate on an empty row (i.e. just like AREV). "Yes" is the default, but it is added here anyway to help explain what the EditTable can do. + Set_Property(CtrlEntId, "OLE.CellEditMode[All; All]", "Edit") ; // Put the cell into edit mode upon entry. Notice that properties that accept coordinates can accept the keyword "All". + Set_Property(CtrlEntId, "OLE.AutoColors" , "Row(Auto; Auto; Auto; 3DFace L=95; 1)") ; // Automatically alternate the color of every other row. This makes different rows easier to identify, especially since we have set 2 RowsToRecord. + Set_Property(CtrlEntId, "OLE.SelectionStyle", @VM:"S L=80":@FM:@VM:"S L=95") ; // Automatically highlight the current row with one color and highlight the current row with another color. + // Set up the Column and Row headers. + If Len(TitleList) then + If TitleList then Set_Property(CtrlEntId, "OLE.TitleList", TitleList) ; // Set up the text to be displayed in each column header. + end else + Set_Property(CtrlEntId, "OLE.HeaderRow[1]", @FM:No$) ; // Hide the header row if no TitleList was passed in. + end + Set_Property(CtrlEntId, 'OLE.HeaderFont[All;All]', 'Segoe UI' : @SVM : 9) + Set_Property(CtrlEntId, 'OLE.CellFont[All;All]', 'Segoe UI' : @SVM : 9) + Set_Property(CtrlEntId, "OLE.HeaderRow[All]", "19":@FM:"":@FM:No$) ; // Make all column header rows to be 19 pixels tall and unable to be resized. + Set_Property(CtrlEntId, "OLE.DataRow[All]", "19":@FM:"":@FM:No$) ; // Make all data rows to be 19 pixels tall and unable to be resized. + Set_Property(CtrlEntId, "OLE.HeaderColumn[1]", "20":@FM:"":@FM:No$) ; // Make the row header column to be 20 pixels wide and unable to be resized. + Set_Property(CtrlEntId, "OLE.AutoNumbers", "I":@VM:1) ; // Make the row header column auto number with an integer starting with 1. + // Set up column properties. + If ColumnWidths then + NumColumns = Count(ColumnWidths, @FM) + (ColumnWidths NE "") + CharPos = 1 + For ColPos = 1 to NumColumns + Remove ColWidth from ColumnWidths at CharPos setting Flag + Begin Case + Case Num(ColWidth) ; Set_Property(CtrlEntId, "OLE.DataColumn[":ColPos:"]", ColWidth) ; // Set column to fixed width + Case ColWidth EQ "A" ; Set_Property(CtrlEntId, "OLE.DataColumn[":ColPos:"]", @FM:@FM:@FM:Yes$) ; // Set column to autosized + End Case + Next ColPos + end + If ColumnAlignments then + NumColumns = Count(ColumnAlignments, @FM) + (ColumnAlignments NE "") + CharPos = 1 + For ColPos = 1 to NumColumns + Remove ColumnAlignment from ColumnAlignments at CharPos setting Flag + If Len(ColumnAlignment) then Set_Property(CtrlEntId, "OLE.CellAlignment[":ColPos:"; All]", @FM:ColumnAlignment) ; // Set the column alignment + Next ColPos + end + // Set up the @POS UDP for Set_Record + If VirtualPos then Set_Property(CtrlEntId, "@POS", VirtualPos) + If RowsAsColumns then Set_Property(CtrlEntId, "@ROWSASCOLUMNS", RowsAsColumns) + If CellsAsFields then Set_Property(CtrlEntId, "@CELLSASFIELDS", CellsAsFields) + If ClearFill then Set_Property(CtrlEntId, "@CLEARFILL", ClearFill) + + GoSub Qualify_Events +return + +////////////////////////////////////////////////////////////////// +///////////////// Internal methods /////////////////////////////// +////////////////////////////////////////////////////////////////// + +Check_Variable_Assignments: + If Assigned(Method) else Method = "" + If Assigned(CtrlEntId) else CtrlEntId = "" + If Assigned(Param1) else Param1 = "" + If Assigned(Param2) else Param2 = "" + If Assigned(Param3) else Param3 = "" + If Assigned(Param4) else Param4 = "" + If Assigned(Param5) else Param5 = "" + If Assigned(Param6) else Param6 = "" + If Assigned(Param7) else Param7 = "" + If Assigned(Param8) else Param8 = "" + If Assigned(Param9) else Param9 = "" + If Assigned(Param10) else Param10 = "" +return + +ParseParam1: + SelPos1 = Param1 + FieldPos1 = Field(SelPos1, ";", 1) + RecordPos1 = Field(SelPos1, ";", 2) +return + +ParseParam2: + SelPos2 = Param2 + FieldPos2 = Field(SelPos2, ";", 1) + RecordPos2 = Field(SelPos2, ";", 2) +return + +Update_Databound_EditTable: + // Transfer the Array property of the OLE EditTable to the DEFPROP property of the OI EditTable. Assumes that the + // OLE EditTable begins with "OLE_EDT" and that the OI EditTable begins with "EDT" and it also assumes the rest of + // the control names match. + OIEditTable = CtrlEntId + Swap "OLE_EDT" with "EDT" in OIEditTable + Transfer_EditTable_Data(CtrlEntId, OIEditTable, No$, UpdateCellEdit) + + // Force a redisplay of any symbolic columns in the window. + Set_Record("", "SYM") +return + +Qualify_Events: + // Enable OLE event processing for this control. Set the Synchronous event flag for better event control. + Qualify = "" + Qualify<1> = 1 ; // Enable OLE event + Qualify<4> = 2 ; // Synchronous event processing + + Send_Message(CtrlEntId, "QUALIFY_EVENT", "ALL_OLES", Qualify) +return diff --git a/SYSPROG/STPROC/SRP_GIT_LISTENER.txt b/SYSPROG/STPROC/SRP_GIT_LISTENER.txt new file mode 100644 index 0000000..3ef1920 --- /dev/null +++ b/SYSPROG/STPROC/SRP_GIT_LISTENER.txt @@ -0,0 +1,40 @@ +Compile function SRP_Git_Listener(Message,OrigEntid,Arg1,Arg2,Arg3,Arg4,Arg5,Arg6,Arg7,Arg8,Arg9,Arg10,Arg11,Arg12,Arg13,Arg14,Arg15,Arg16,Arg17,Arg18,Arg19,Arg20) +#pragma precomp SRP_PreCompiler + +Declare function SRP_Git_Services, SRP_Git_Redirect, Status +Declare subroutine SRP_Git_Serializer, Set_Status + +Common /SRP_Git_Listener/ SRPGitListener_Suppress@ + +If SRPGitListener_Suppress@ NE 1 then + Name = OrigEntId[-1, "B*"] + If Name[1, 16] _NEC "SRP_EDITOR_TEMP_" AND Name[-14, 14] _NEC "__SRP_GIT_TEMP" then + Begin Case + + Case Message _EQC 'UPDATE' + + If SRP_Git_Services("IsEnabled") AND Assigned(Arg1) then + SRP_Git_Serializer('Write', OrigEntId, Arg1, SRP_Git_Services("GetRepoPath")) + end + + Case Message _EQC 'WRITE' OR Message _EQC 'NEW' + + If SRP_Git_Services("IsEnabled") AND Assigned(Arg10) then + // Ignore APPROW entities whose contents are the same as it's key + If Field(OrigEntId, "*", 2, 1) EQ "APPROW" AND Arg10 _EQC OrigEntId[-1, "B:"] else + SRP_Git_Serializer('Write', OrigEntId, Arg10, SRP_Git_Services("GetRepoPath")) + end + end + + Case Message _EQC 'DESTROY' OR Message _EQC 'TDESTROY' + + If SRP_Git_Services("IsEnabled") then + SRP_Git_Serializer('Delete', OrigEntId, SRP_Git_Services("GetRepoPath")) + end + + End Case + end +end +Ans = SRP_Git_Redirect(Message,OrigEntid,Arg1,Arg2,Arg3,Arg4,Arg5,Arg6,Arg7,Arg8,Arg9,Arg10,Arg11,Arg12,Arg13,Arg14,Arg15,Arg16,Arg17,Arg18,Arg19,Arg20) + +Return Ans diff --git a/SYSPROG/STPROC/SRP_GIT_SERIALIZER.txt b/SYSPROG/STPROC/SRP_GIT_SERIALIZER.txt new file mode 100644 index 0000000..9db9c2a --- /dev/null +++ b/SYSPROG/STPROC/SRP_GIT_SERIALIZER.txt @@ -0,0 +1,163 @@ +Compile function SRP_Git_Serializer(@Service, @Params) +/************************************************************************************************ + This program is proprietary and is not to be used by or disclosed to others, nor is it to + be copied without written permission from SRP Computer Solutions, Inc. + + Name : SRP_Git_Serializer + + Description : Service module for the converting files to formats suitable for Git. + + Parameters: + Service [IN] - The service to execute + Params [IN] - Service specific parameters + + History (Date, Initials, Notes) + 02/20/19 KRF Original programmer + 07/30/19 KRF Renamed to SRP_Git_Serializer and updated to use new DLL stubs +************************************************************************************************/ +#pragma precomp SRP_PreCompiler +#pragma output SYSLISTS SRP_GIT_SERIALIZER +$insert LOGICAL + +Declare function ISRPGitSerializer_ReadFromGit, ISRPGitSerializer_ReadFileFromGit, ISRPGitSerializer_PathToEntityId, ISRPGitSerializer_Deserialize +Declare function ISRPGitSerializer_EntityIdToPath, ISRPGitSerializer_GetSupportedTypes, ISRPGitSerializer_EntityIdToKeys, ISRPGitSerializer_EntityIdToRelativePath +Declare function Str_Unicode, Unicode_Str, ISRPGitSerializer_GetMetaData +Declare subroutine ISRPGitSerializer_WriteToGit, ISRPGitSerializer_WriteToGitSync, ISRPGitSerializer_DeleteFromGit, ISRPGitSerializer_CopyOutput, ISRPGitSerializer_SetMetaData + +GoToService + +Return Response or "" + +/////////////////////////////////////////////////////////////////////////////////////////////////// +// SERVICES +/////////////////////////////////////////////////////////////////////////////////////////////////// + +//------------------------------------------------------------------------------------------------- +// Converts the given entity into a file suitable for GIT comparisons. +//------------------------------------------------------------------------------------------------- +Service Write(EntityId, Record, RepoPath, Metadata) + + If Len(Metadata) then + ISRPGitSerializer_SetMetaData(Metadata) + end + RecordW = Str_Unicode(Record) + ISRPGitSerializer_WriteToGit(EntityId, RecordW, Len(Record), RepoPath) + +end service + +//------------------------------------------------------------------------------------------------- +// Converts the given entity into a file suitable for GIT comparisons. Synchronous. +//------------------------------------------------------------------------------------------------- +Service WriteSync(EntityId, Record, RepoPath, Metadata) + + If Len(Metadata) then + ISRPGitSerializer_SetMetaData(Metadata) + end + RecordW = Str_Unicode(Record) + ISRPGitSerializer_WriteToGitSync(EntityId, RecordW, Len(Record), RepoPath) + +end service + +//------------------------------------------------------------------------------------------------- +// Deletes the file associated with this entity id +//------------------------------------------------------------------------------------------------- +Service Delete(EntityId, RepoPath) + + ISRPGitSerializer_DeleteFromGit(EntityId, RepoPath) + +end service + +//------------------------------------------------------------------------------------------------- +// Converts a file suitable for GIT comparisons back into an OI entity. +//------------------------------------------------------------------------------------------------- +Service Read(EntityId, RepoPath, Ref Metadata) + + Len = ISRPGitSerializer_ReadFromGit(EntityId, RepoPath) + GoSub GetOutput + Metadata = ISRPGitSerializer_GetMetaData() + +end service + +//------------------------------------------------------------------------------------------------- +// Reads the given file, returning the record and it's entity id +//------------------------------------------------------------------------------------------------- +Service ReadFile(RepoPath, FilePath, Ref EntityId, Ref Metadata) + + EntityId = Str(\00\, 260) + Len = ISRPGitSerializer_ReadFileFromGit(EntityId, RepoPath, FilePath) + EntityId = EntityId[1, \00\] + GoSub GetOutput + Metadata = ISRPGitSerializer_GetMetaData() + +end service + +//------------------------------------------------------------------------------------------------- +// Deserializes text +//------------------------------------------------------------------------------------------------- +Service Deserialize(EntityId, Text, Ref Metadata) + + Len = ISRPGitSerializer_Deserialize(EntityId, Text) + GoSub GetOutput + Metadata = ISRPGitSerializer_GetMetaData() + +end service + +//------------------------------------------------------------------------------------------------- +// Given an EntityId, this service constructs the target full file and path name +//------------------------------------------------------------------------------------------------- +Service EntityIdToPath(RepoPath, EntityId) + + Response = ISRPGitSerializer_EntityIdToPath(RepoPath, EntityId) + +end service + +//------------------------------------------------------------------------------------------------- +// Given an EntityId, this service constructs the target path name relative to the repo directory +//------------------------------------------------------------------------------------------------- +Service EntityIdToRelativePath(EntityId) + + Response = ISRPGitSerializer_EntityIdToRelativePath(EntityId) + +end service + +//------------------------------------------------------------------------------------------------- +// Given a full file and path name, this service constructs the target EntityId +//------------------------------------------------------------------------------------------------- +Service PathToEntityId(RepoPath, FilePath) + + Response = ISRPGitSerializer_PathToEntityId(RepoPath, FilePath) + +end service + +//------------------------------------------------------------------------------------------------- +// Given an EntityId, this service constructs all the tables and keys housing that entities data +//------------------------------------------------------------------------------------------------- +Service EntityIdToKeys(EntityId) + + Response = ISRPGitSerializer_EntityIdToKeys(EntityId) + +end service + +//------------------------------------------------------------------------------------------------- +// An @FM delimited list of supported entity types +//------------------------------------------------------------------------------------------------- +Service GetSupportedEntityTypes() + + Response = ISRPGitSerializer_GetSupportedTypes() + +end service + +/////////////////////////////////////////////////////////////////////////////////////////////////// +// GOSUBS +/////////////////////////////////////////////////////////////////////////////////////////////////// + +GetOutput: + + If Len GT 0 then + ResponseW = Str(\0000\, Len) + ISRPGitSerializer_CopyOutput(ResponseW, Len) + Response = Unicode_Str(ResponseW) + end + +return + diff --git a/SYSPROG/STPROC/SRP_GIT_SERVICES.txt b/SYSPROG/STPROC/SRP_GIT_SERVICES.txt new file mode 100644 index 0000000..684e88c --- /dev/null +++ b/SYSPROG/STPROC/SRP_GIT_SERVICES.txt @@ -0,0 +1,756 @@ +Compile function SRP_Git_Services(@Service, @Params) +/************************************************************************************************ + This program is proprietary and is not to be used by or disclosed to others, nor is it to + be copied without written permission from SRP Computer Solutions, Inc. + + Name : SRP_GIT_SERVICES + Test + Description : Service module for the SRP GIT system. + + Parameters: + Service [IN] - The service to execute + Params [IN] - Service specific parameters + + History (Date, Initials, Notes) + 02/25/19 DJS Original programmer + 07/29/19 KRF Ported from Git_Services + 03/04/24 KRF Fixed bug in PullEntities where For Loop iterator was getting reset + by gosubs +************************************************************************************************/ +#pragma precomp SRP_PreCompiler + +Common /SRP_Git_Services/ SRPGitServices_UserSettings@ +Common /SRP_Git_Listener/ SRPGitListener_Suppress@ + +$insert LOGICAL +$insert MESSAGE_BOX_EQUATES +$insert RLIST_EQUATES + +Equ CRLF$ to \0D0A\ + +Equ SrpGitEnabled$ To 1 +Equ SrpGitRepoLoc$ To 2 +Equ SrpGitExePath$ To 3 +Equ SrpGitGUICommand$ To 4 +Equ SrpGitCommitCommand$ To 5 +Equ SrpGitPullCommand$ To 6 +Equ SrpGitPushCommand$ To 7 +Equ SrpGitHistCommand$ To 8 +Equ SrpGitDiffCommand$ To 9 +Equ SrpGitWarning$ To 10 + +Declare function SRP_Git_Services, SRP_Git_Serializer, Get_Repos_Entities, Repository, SRP_Editor_Parse, SRP_RevErrorMsg, SRP_Array, Min, DateTime +Declare subroutine SRP_Git_Serializer, Utility, Get_Status, Set_Status, Repository, Msg, Set_Property, Send_Message, Yield, SRP_Git_Services + +// load the settings on the first call +If Len(SRPGitServices_UserSettings@) else + SRPGitServices_UserSettings@ = Xlate("SYSENV", "SRP_GIT_SETTINGS", "", "X") + If Len(SRPGitServices_UserSettings@) else + SRPGitServices_UserSettings@ = Xlate("SYSENV", "SRP_GIT_SETTINGS*":@APPID<1>:"*":@Username, "", "X") + end +end + +GoToService + +Return Response or "" + +//----------------------------------------------------------------------------- +// SERVICES +//----------------------------------------------------------------------------- + +Service HasSettings() + Response = Len(SRPGitServices_UserSettings@) GT 0 AND Len(SRPGitServices_UserSettings@) GT 0 +end service + +Service IsEnabled() + Response = If Len(SRPGitServices_UserSettings@) then SRPGitServices_UserSettings@ else 0 +end service + +Service GetRepoPath() + Response = SRPGitServices_UserSettings@ +end service + +Service GetGitPath() + Response = SRPGitServices_UserSettings@ +end service + +Service GetGuiCommand() + Response = SRPGitServices_UserSettings@ +end service + +Service GetCommitCommand() + Response = SRPGitServices_UserSettings@ +end service + +Service GetPullCommand() + Response = SRPGitServices_UserSettings@ +end service + +Service GetPushCommand() + Response = SRPGitServices_UserSettings@ +end service + +Service GetHistCommand() + Response = SRPGitServices_UserSettings@ +end service + +Service GetDiffCommand() + Response = SRPGitServices_UserSettings@ +end service + +Service GetWarning() + Response = SRPGitServices_UserSettings@ +end service + +Service GetCurrentCommit() + + If Len(SRPGitServices_UserSettings@) then + Root = SRPGitServices_UserSettings@:' -C "':SRPGitServices_UserSettings@:'"' + Cmd = Root:" for-each-ref --count=1 --sort=-committerdate refs/heads --format=%(HEAD)":\0D\:"%(objectname:short=8)":\0D\:"%(refname:short)":\0D\:"%(committerdate:relative)":\0D\:"%(authorname)":\0D\:"%(subject)":\0D\:"[%(refname:short)]":\0B\:"%(subject)":\0B\:"(%(authorname))" + Output = "VAR" + Call SRP_Run_Command(Cmd, Output) + Convert \0D0B\ to @FM:" " in Output + Response = Field(Output, @FM, 1, 7) + end + +end service + +Service GetBranchHeads() + + If Len(SRPGitServices_UserSettings@) then + Root = SRPGitServices_UserSettings@:' -C "':SRPGitServices_UserSettings@:'"' + Cmd = Root:" for-each-ref --sort=-committerdate refs/heads --format=%(HEAD)":\0D\:"%(objectname:short=8)":\0D\:"%(refname:short)":\0D\:"%(committerdate:relative)":\0D\:"%(authorname)":\0D\:"%(subject)":\0D\:"[%(refname:short)]":\0B\:"%(subject)":\0B\:"(%(authorname))" + Response = "VAR" + Call SRP_Run_Command(Cmd, Response) + Convert \0A0D0B\ to @FM:@VM:" " in Response + If Response[-1, 1] EQ @FM then Response[-1, 1] = "" + end + +end service + +Service GetCommits() + + If Len(SRPGitServices_UserSettings@) then + Root = SRPGitServices_UserSettings@:' -C "':SRPGitServices_UserSettings@:'"' + Cmd = Root:" for-each-ref --sort=-committerdate refs --format=%(HEAD)":\0D\:"%(objectname:short=8)":\0D\:"%(refname:short)":\0D\:"%(committerdate:relative)":\0D\:"%(authorname)":\0D\:"%(subject)":\0D\:"[%(refname:short)]":\0B\:"%(subject)":\0B\:"(%(authorname))" + Response = "VAR" + Call SRP_Run_Command(Cmd, Response) + Convert \0A0D0B\ to @FM:@VM:" " in Response + If Response[-1, 1] EQ @FM then Response[-1, 1] = "" + end + +end service + +Service LoadLastCommit() + Response = Xlate("SYSENV", "SRP_GIT_LASTCOMMIT", "", "X") +end service + +Service SaveLastCommit(CommitId, CommitDesc, CommitBranch, CommitAuthor) + Open "SYSENV" to hSYSENV then + Rec = "" + Rec<-1> = CommitId + Rec<-1> = CommitDesc + Rec<-1> = CommitBranch + Rec<-1> = CommitAuthor + Write Rec to hSYSENV, "SRP_GIT_LASTCOMMIT" then NULL + end +end service + +Service GetFileChanges(StartCommit, EndCommit) + + Equ StatusName$ to "Added,Deleted,Modified" + Response = "" + ExePath = SRPGitServices_UserSettings@ + RepoPath = SRPGitServices_UserSettings@ + If Len(ExePath) then + Cmd = ExePath:' -C "':RepoPath:'" diff --name-status --no-renames --diff-filter=crtuxb ':StartCommit:' ':EndCommit + Output = "VAR" + Call SRP_Run_Command(Cmd, Output) + If RepoPath[-1, 1] NE '\' then RepoPath := '\' + For Each Line in Output using \0A\ + Status = Line[1, \09\] + File = Line[Col2() + 1, \09\] + If IndexC(File, ".gitignore", 1) EQ 0 then + Pos = Index("ADM", Status[1, 1], 1) + If Pos GT 0 then Status = Field(StatusName$, ",", Pos, 1) else Status = "Unknown" + EntId = SRP_Git_Serializer("PathToEntityId", RepoPath, RepoPath:File) + Response<-1> = Status:@VM:EntId + end + Next Line + end + +end service + +Service SaveUserSettings(GitEnabled, GitRepoLoc, GitExePath, GitGUICommand, GitWarning, GitCommitCommand, GitPullCommand, GitPushCommand, GitHistCommand, GitDiffCommand) + + // Update the settings + SRPGitServices_UserSettings@ = GitEnabled + SRPGitServices_UserSettings@ = GitRepoLoc + SRPGitServices_UserSettings@ = GitExePath + SRPGitServices_UserSettings@ = GitGUICommand + SRPGitServices_UserSettings@ = GitWarning + SRPGitServices_UserSettings@ = GitCommitCommand + SRPGitServices_UserSettings@ = GitPullCommand + SRPGitServices_UserSettings@ = GitPushCommand + SRPGitServices_UserSettings@ = GitHistCommand + SRPGitServices_UserSettings@ = GitDiffCommand + + // Write the settings to disk + Open 'SYSENV' to hSYSENV then + Write SRPGitServices_UserSettings@ on hSYSENV, "SRP_GIT_SETTINGS" else + Response = "Failed to save user Git settings. OpenInsight error code: ":Status() + end + end + + // Update the MD table base on whether or not things are enabled + Open "MD" to hMD then + If GitEnabled then + Read Rec from hMD, "REPOSITORY" else + Rec = 'P':@FM:@FM:@FM:@FM:'SYSOBJ':@FM:'SRP_GIT_LISTENER' + Write Rec to hMD, "REPOSITORY" then null + end + end else + Delete hMD, "REPOSITORY" then null + end + GarbageCollect + Flush + Call Set_Property("SYSTEM", "IDLEPROC", "RTP27":@FM:"REPOSITORY") + end + +end service + +Options ENTITY_TYPES = "ALL", "OIWIN", "STPROC", "STPROCINS" + +Service GetSupportedEntityTypes() + + Response = SRP_Git_Serializer("GetSupportedEntityTypes") + +end service + +Service GetOIEntities(EntityTypes=ENTITY_TYPES, Apps) + + Response = "" + If EntityTypes EQ "" OR EntityTypes EQ "ALL" then EntityTypes = SRP_Git_Services("GetSupportedEntityTypes") + If Apps EQ "" then Apps = @APPID + For each EntityType in EntityTypes using @FM + For each App in Apps + EntList = Get_Repos_Entities(App, EntityType, '') + If Len(EntList) then + For each EntID in EntList using @FM + Parts = EntID + Convert '*' to @VM in Parts + Response := EntID:@VM:Parts:@FM ; *:@VM:LastChanged:@FM + Next EntID + end + Next App + Next EntityType + Response[-1, 1] = "" + +end service + +Service GetRepoEntities(EntityTypes=ENTITY_TYPES, Apps, CommitStart, CommitEnd) + + // get the repo path + RepoPath = SRPGitServices_UserSettings@ + If RepoPath[-1, 1] NE '\' then RepoPath := '\' + + Response = "" + If EntityTypes EQ "" OR EntityTypes EQ "ALL" then EntityTypes = SRP_Git_Services("GetSupportedEntityTypes") + If Apps EQ "" then Apps = @APPID + + If Len(CommitStart) AND Len(CommitEnd) then + FileChanges = SRP_Git_Services("GetFileChanges", CommitStart, CommitEnd) + For Each FileChange in FileChanges + Status = FileChange<1, 1> + EntId = FileChange<1, 2> + Parts = EntId + Convert '*' to @VM in Parts + Locate Parts<1, 1> in Apps using @FM setting AppPos then + Locate Parts<1, 2> in EntityTypes using @FM setting TypePos then + Response := EntId:@VM:Parts:@VM:Status:@FM + end + end + Next FileChange + end else + For each EntityType in EntityTypes using @FM + For each App in Apps + ErrCode = '' + Type = EntityType[1, '*'] + Class = EntityType[Col2() + 1, '*'] + WinDir = If Len(Class) then RepoPath:App:'\':Type:'\':Class else RepoPath:App:'\':Type + Call SetInitDirOptions("D") + InitDir WinDir:'\*.*' + DirList = DirList() + NumDirs = DCount(DirList, @FM) + For iDir = 1 to NumDirs + Dir = DirList + If Dir NE ".." then + CurrPath = If Dir EQ "." then WinDir else WinDir:"\":Dir + InitDir CurrPath:'\*.*' + FileList = DirList() + If Len(FileList) then + For each Filename in FileList using @FM setting fPos + EntID = SRP_Git_Serializer("PathToEntityId", RepoPath, CurrPath:'\':Filename) + Parts = EntID + Convert '*' to @VM in Parts + Response := EntID:@VM:Parts:@FM + Next Filename + end + end + Next iDir + Next App + Next EntityType + end + Response[-1, 1] = "" + +return + +Service PushEntities(EntityList, StatusCtrl) + + OSWrite "" to "SRPGitLog.txt" + LogPos = 0 + SRPGitListener_Suppress@ = 1 + RepoPath = SRPGitServices_UserSettings@ + + NumEntities = DCount(EntityList, @FM) + SRP_Git_Services("SendStatus", StatusCtrl, "Pushing ":NumEntities:" entities.\n", "", LogPos) + For i = 1 to NumEntities + EntityId = EntityList + SRP_Git_Services("SendStatus", StatusCtrl, EntityId, "", LogPos) + If Field(EntityId, "*", 2, 1) EQ "APPROW" then + Name = EntityId[-1, "B*"] + Table = Name[1, ":"] + Open Table to hTable then + Key = Xlate("SYSREPOS", EntityId, 4, "X") + If Len(Key) else Key = Name[Col2() + 1, Len(Name)] + Read Record from hTable, Key then + SRP_Git_Services("SendStatus", StatusCtrl, " -- Pushed\n", "", LogPos) + SRP_Git_Serializer("WriteSync", EntityId, Record, RepoPath, Key) + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Push Failed\n Unable to read SYSREPOS, ":Key:".\n", "", LogPos) + end + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Push Failed\n Unable to open SYSREPOS.\n", "", LogPos) + end + end else + Set_Status(0) + Record = Repository("ACCESS", EntityId) + If Get_Status(ErrCode) then + SRP_Git_Services("SendStatus", StatusCtrl, " -- Push Failed\n", ErrCode, LogPos) + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Pushed\n", "", LogPos) + SRP_Git_Serializer("WriteSync", EntityId, Record, RepoPath) + end + end + Next i + + SRPGitListener_Suppress@ = "" + +end service + +Service PullEntities(EntityList, StatusList, StatusCtrl, CommitId) + + OSWrite "" to "SRPGitLog.txt" + LogPos = 0 + SRPGitListener_Suppress@ = 1 + ExePath = SRPGitServices_UserSettings@ + RepoPath = SRPGitServices_UserSettings@ + + EntitiesToCompile = '' + NumEntities = DCount(EntityList, @FM) + SRP_Git_Services("SendStatus", StatusCtrl, "Pulling ":NumEntities:" entities.\n", "", LogPos) + For iEntityToPull = 1 to NumEntities + EntityId = EntityList + Status = StatusList + App = EntityId[1, "*"] + Type = EntityId[Col2() + 1, "*"] + Class = EntityId[Col2() + 1, "*"] + Name = EntityId[Col2() + 1, "*"] + SRP_Git_Services("SendStatus", StatusCtrl, EntityId, "", LogPos) + If Status _EQC "Deleted" then + If Type EQ "APPROW" then + Table = Name[1, ":"] + Key = Xlate("SYSREPOS", EntityId, 4, "X") + If Len(Key) else Key = Name[Col2() + 1, Len(Name)] + Open Table to hTable then + Lock hTable, Key then + Unlock hTable, Key + Delete hTable, Key then + Open "SYSREPOS" to hTable then + Delete hTable, EntityID then null + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Delete Failed\n", Status(), LogPos) + end + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Delete Failed\n", Status(), LogPos) + end + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Delete Failed\n Locked or Doesn't Exist!\n", "", LogPos) + end + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Delete Failed\n", Status(), LogPos) + end + end else + If App EQ @APPID<1> then + Set_Status(0) + Repository("DESTROY", EntityId) + end else + GoSub DeleteInherited + end + SRP_Git_Services("SendStatus", StatusCtrl, " -- Deleted\n", "", LogPos) + end + end else + + // Get the file from git + Path = SRP_Git_Serializer("EntityIdToRelativePath", EntityId) + Convert "\" to "/" in Path + Cmd = ExePath:' -C "':RepoPath:'" show ':CommitId:':':Path + FileData = "VAR" + Call SRP_Run_Command(Cmd, FileData) + + // If it didn't work, just read it if possible + ErrCode = 0 + If FileData[1, 7] EQ "fatal: " then + Convert "/" to "\" in Path + OSRead FileData from RepoPath:"\":Path else + ErrCode = Status() + end + end + + If ErrCode EQ 0 then + + Metadata = "" + Record = SRP_Git_Serializer("Deserialize", EntityId, FileData, Metadata) + + If Len(Record) else Record = " " + If Type EQ "APPROW" then + Table = Name[1, ":"] + Key = If Len(Metadata) then Metadata else Key = Name[Col2() + 1, Len(Name)] + Open Table to hTable then + Write Record to hTable, Key then + Open "SYSREPOS" to hSYSREPOS then + Read RepoRec from hSYSREPOS, EntityId else + RepoRec = App + RepoRec<2> = "$PUBLIC" + RepoRec<3> = "$PUBLIC" + RepoRec<4> = Key + RepoRec<18> = "0" + RepoRec<20> = "0" + RepoRec<21> = "1" + RepoRec<22> = "0" + RepoRec<23> = "0" + RepoRec<26> = App + RepoRec<27> = Key + end + RepoRec<25> = DateTime() + Write RepoRec to hSYSREPOS, EntityId then + SRP_Git_Services("SendStatus", StatusCtrl, " -- Saved\n", "", LogPos) + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Save Failed\n", Status(), LogPos) + end + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Save Failed\n", Status(), LogPos) + end + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Save Failed\n", Status(), LogPos) + end + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Save Failed\n", Status(), LogPos) + end + end else + If App EQ @APPID<1> then + Set_Status(0) + Repository("LOCK", EntityId) + If Get_Status(ErrCode) then + SRP_Git_Services("SendStatus", StatusCtrl, " -- Save Failed\n Locked!\n", "", LogPos) + end else + Set_Status(0) + Repository("WRITE", EntityId, "", 1, 1, "", "", "", "", "", EntityId[-1, "B*"], Record) + If Get_Status(ErrCode) then + SRP_Git_Services("SendStatus", StatusCtrl, " -- Save Failed\n", ErrCode, LogPos) + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Saved\n", "", LogPos) + Get_Status(ErrCode) + If Type EQ "STPROC" OR Type EQ "OIWIN" OR Type EQ "OIEVENT" then EntitiesToCompile := EntityId:@FM + end + Set_Status(0) + Repository("UNLOCK", EntityId) + end + end else + GoSub WriteInherited + end + end + + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Save Failed\n", ErrCode, LogPos) + end + end + Next iEntityToPull + EntitiesToCompile[-1, 1] = "" + + NumEntities = DCount(EntitiesToCompile, @FM) + If NumEntities GT 0 then + SRP_Git_Services("SendStatus", StatusCtrl, "\nCompiling ":NumEntities:" entities.\n", "", LogPos) + For Each EntityId in EntitiesToCompile + SRP_Git_Services("SendStatus", StatusCtrl, EntityId, "", LogPos) + App = EntityId[1, "*"] + If App EQ @APPID<1> then + Set_Status(0) + Repository("COMPILE", EntityId, 1) + If Get_Status(ErrCode) then + SRP_Git_Services("SendStatus", StatusCtrl, " -- Compile Errors\n", ErrCode, LogPos) + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Compile Successful\n", "", LogPos) + end + end else + GoSub CompileInherited + end + Next EntityId + end else + SRP_Git_Services("SendStatus", StatusCtrl, "\nNo entities to compile.\n", "", LogPos) + end + SRPGitListener_Suppress@ = "" + +end service + +Service OpenRepo() + + Name = "GUI" + CmdPos = SrpGitGUICommand$ + GoSub RunGitCommand + If Assigned(ErrorMsg) then + If Len(ErrorMsg) then Msg(@Window, ErrorMsg:@FM:@FM:@FM:"!") + end + +end service + +Service Commit() + + Name = "Commit" + CmdPos = SrpGitCommitCommand$ + GoSub RunGitCommand + +end service + +Service Pull() + + Name = "Pull" + CmdPos = SrpGitPullCommand$ + GoSub RunGitCommand + +end service + +Service Push() + + Name = "Push" + CmdPos = SrpGitPushCommand$ + GoSub RunGitCommand + +end service + +Service ViewHist() + + Name = "ViewHist" + CmdPos = SrpGitHistCommand$ + GoSub RunGitCommand + +end service + +Service Diff() + + Name = "Diff" + CmdPos = SrpGitDiffCommand$ + GoSub RunGitCommand + +end service + +Service SendStatus(StatusCtrl, Text, ErrCode, Ref Pos) + + Swap "\n" with CRLF$ in Text + + OSOpen "SRPGitLog.txt" to hFile else hFile = "" + + If Len(StatusCtrl) then + Send_Message(StatusCtrl, "INSERT", -1, Text) + If Len(hFile) then + OSBWrite text on hFile at Pos + Pos += Len(Text) + end + If Len(ErrCode) then + For Each ErrorInfo in ErrCode using @FM + Text = " ":SRP_RevErrorMsg(ErrorInfo[1, @VM], ErrorInfo[Col2() + 1, Len(ErrorInfo)]):CRLF$ + Swap "__SRP_GIT_TEMP" with "" in Text + Send_Message(StatusCtrl, "INSERT", -1, Text) + If Len(hFile) then + OSBWrite text on hFile at Pos + Pos += Len(Text) + end + Next ErrorCode + end + Yield() + end + + If Len(hFile) then OSClose hFile + +end service + +RunGitCommand: + + ErrorList = '' + If SRPGitServices_UserSettings@ EQ True$ then + Command = SRPGitServices_UserSettings@ + RepoPath = SRPGitServices_UserSettings@ + If Command NE '' then + If RepoPath NE '' then + Utility("RUNWIN", Command, 1) + end else + // User has not set the Git repository location + ErrorMsg = "Git repository location has not been defined within Git Settings" + ErrorList<-1> = ErrorMsg + end + end else + // User has not set the Git open repo command (Git GUI command) + ErrorMsg = "Git ":Name:" command has not been configured within Git Settings" + ErrorList<-1> = ErrorMsg + end + end else + // User has Git disabled + ErrorMsg = "Git must first be enabled within Git Settings" + ErrorList<-1> = ErrorMsg + end + Response = ErrorList + +return + +CompileInherited: +// IN: EntityId + + // Read the original source record + DestList = SRP_Git_Serializer("EntityIdToKeys", EntityId) + Record = Xlate(DestList<1, 1>, DestList<1, 2>, "", "X") + + // Build a temporary entity in the current app + TempId = @APPID<1>:"*":Field(EntityID, "*", 2, 3):"__SRP_GIT_TEMP" + Type = Field(EntityId, "*", 2, 1) + + // If this is a stored procedure or insert, we need to rename it temporarily IN THE CODE + FirstLine = Record<1> + If Type[1, 6] _EQC "STPROC" AND Len(Xlate("SYSOBJ", "$SRP_EDITOR_PARSE", "", "X")) then + ProcType = If Type _EQC "STPROCINS" then "Insert" else "Procedure" + OrigProcName = "" + If SRP_Editor_Parse(FirstLine, "", ProcType, OrigProcName, "") then + TempName = Field(TempId, "*", 4) + TempFirstLine = FirstLine[1, "("] + Swap OrigProcName with TempName in TempFirstLine + If ProcType EQ "Insert" then + Record<1> = TempFirstLine + end else + Record<1> = TempFirstLine:"(":FirstLine[-1, "B("] + end + end + end + + // Update it and compile it + SRPGitListener_Suppress@ = 1 + Set_Status(0) + Repository("WRITE", TempID, "", 1, 1, "", "", "", "", "", TempID[-1, "F*"], Record) + If Get_Status(ErrCode) then + SRP_Git_Services("SendStatus", StatusCtrl, " -- Failed to create Temprorary Entity.\n", ErrCode, LogPos) + end else + Set_Status(0) + Repository("COMPILE", TempId) + If Get_Status(ErrCode) then + SRP_Git_Services("SendStatus", StatusCtrl, " -- Compile Errors\n", ErrCode, LogPos) + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Compile Successful\n", "", LogPos) + // Copy the temporary records back to the entity records + SourceList = SRP_Git_Serializer("EntityIdToKeys", TempId) + NumItems = DCount(SourceList, @FM) + For i = 1 to NumItems + Table = SourceList + SourceKey = SourceList + DestKey = DestList + If SourceKey NE DestKey then + Open Table to hTable then + Read Rec from hTable, SourceKey then + If Table EQ "SYSPROCS" then Rec<1> = FirstLine + Swap TempID with EntityID in Rec + Write Rec to hTable, DestKey then null + end + end + end + Next i + end + end + + // Delete the local copy + Set_Status(0) + Repository("DESTROY", TempId) + SRPGitListener_Suppress@ = "" + +return + +WriteInherited: +// IN: EntityId, Record + + // Delete the actual records + DestList = SRP_Git_Serializer("EntityIdToKeys", EntityId) + Table = DestList<1, 1> + DestKey = DestList<1, 2> + Open Table to hTable then + Lock hTable, DestKey then + Write Record to hTable, DestKey then + + // Update or create the SYSREPOS record at the correct app level + Open "SYSREPOS" to hSYSREPOS then + RepoKey = DestList[-1, "B":@VM] + Read RepoRec from hSYSREPOS, RepoKey else + RepoRec = App + RepoRec<2> = "$PUBLIC" + RepoRec<3> = "$PUBLIC" + RepoRec<18> = "0" + RepoRec<20> = "1" + RepoRec<21> = "1" + RepoRec<22> = "0" + RepoRec<23> = "1" + RepoRec<26> = App + RepoRec<27> = "Y" + end + RepoRec<24> = EntityId:"*":DateTime() + RepoRec<25> = DateTime() + Write RepoRec to hSYSREPOS, RepoKey then null + end + + SRP_Git_Services("SendStatus", StatusCtrl, " -- Saved\n", "", LogPos) + If Type EQ "STPROC" OR Type EQ "OIWIN" OR Type EQ "OIEVENT" then EntitiesToCompile := EntityId:@FM + end + Unlock hTable, DestKey + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Save Failed\n Locked!\n", "", LogPos) + end + end + +return + +DeleteInherited: +// IN: EntityId, Record + + // Delete the actual records + DestList = SRP_Git_Serializer("EntityIdToKeys", EntityId) + NumItems = DCount(DestList, @FM) + For i = 1 to NumItems + Table = DestList + DestKey = DestList + Open Table to hTable then + Lock hTable, DestKey then + Delete hTable, DestKey then + SRP_Git_Services("SendStatus", StatusCtrl, " -- Deleted\n", "", LogPos) + end + Unlock hTable, DestKey + end else + SRP_Git_Services("SendStatus", StatusCtrl, " -- Delete Failed\n Locked!\n", "", LogPos) + end + end + Next i + +return diff --git a/SYSPROG/STPROC/SRP_GIT_SETTINGS_EVENTS.txt b/SYSPROG/STPROC/SRP_GIT_SETTINGS_EVENTS.txt new file mode 100644 index 0000000..5b3b3f7 --- /dev/null +++ b/SYSPROG/STPROC/SRP_GIT_SETTINGS_EVENTS.txt @@ -0,0 +1,213 @@ +Compile function SRP_GIT_SETTINGS_EVENTS(Event, CtrlEntId, @PARAMS) +/************************************************************************************************ +* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to +* be copied without written permission from SRP Computer Solutions, Inc. +* +* Name : SRP_GIT_SETTINGS_Events +* +* Description: Event handling commuter module for the SRP_GIT_SETTINGS form. +* +* User Defined Properties: +* +* Parameters: +* EventID [in] -- Event ID +* CtrlEntId [in] -- Control whose event is being handled +* Param1-13 [in] -- Event Parameters +* +* Returns: +* Event handling result, usually 1 +* +* History (Date, Initials, Notes) +* 02/25/19 DJS Original programmer +* 07/29/19 KRF Updated with different controls and cleaned up the code +* +************************************************************************************************/ +#pragma precomp SRP_PreCompiler +#window SRP_GIT_SETTINGS + +$Insert LOGICAL + +Declare function SRP_Git_Services, Get_Property, Utility +Declare subroutine SRP_Git_Services, Set_Property, Post_Event, Send_Message + +GoToEvent Event for CtrlEntId else + // Event not implemented +end + +Return 1 + +//----------------------------------------------------------------------------- +// EVENT HANDLERS +//----------------------------------------------------------------------------- + +Event WINDOW.CREATE(CreateParam) + + GoSub Setup_OLE_Controls + GoSub FillUserSettings + +End Event + + +Event PUB_APPLY.CLICK() + + GoSub SaveUserSettings + Set_Property(CtrlEntID, 'ENABLED', False$) + +end event + + +Event PUB_OK.CLICK() + + GoSub SaveUserSettings + Post_Event(@Window, 'CLOSE') + +end event + + +Event CHB_ENABLED.CLICK() + + GoSub CheckModified + +end event + + +Event EDL_REPO_LOC.LOSTFOCUS(Flag, FocusID) + + GoSub CheckModified + +end event + + +Event EDL_GIT_LOC.LOSTFOCUS(Flag, FocusID) + + GoSub CheckModified + +end event + + +Event EDL_GUI_LOC.LOSTFOCUS(Flag, FocusID) + + GoSub CheckModified + +end event + + +Event EDL_WARNING.LOSTFOCUS(Flag, FocusID) + + GoSub CheckModified + +end event + + +Event OLE_SUBCLASS.OnOptionClick(CtrlId) + + OrigDirectory = Get_Property(CtrlId, 'TEXT') + + If CtrlId[-1, "B."] EQ "EDL_REPO_LOC" then + Directory = Utility("CHOOSEDIR", @Window, "Select directory":@FM:"%HOMEPATH%") + end else + Directory = Utility("CHOOSEFILE", @Window, "Select executable":@FM:"%HOMEPATH%") + end + + If Directory NE '' then + Set_Property(CtrlId, 'TEXT', Directory) + GoSub CheckModified + end + +end event + + +* Event OLE_EDITTABLE_GIT.OnOptionClick(Cell, Point, Button, Shift, Ctrl) +* +* Col = Field(Cell, ';', 1) +* Row = Field(Cell, ';', 2) +* OrigDirectory = Get_Property(CtrlEntID, 'OLE.CellText[':Col:'; ':Row:']') +* Directory = Utility("CHOOSEFILE", @Window, "Select executable":@FM:"%HOMEPATH%") +* If Directory NE '' then +* Set_Property(CtrlEntID, 'OLE.CellText[':Col:'; ':Row:']', Directory) +* GoSub CheckModified +* end +* +* end event + + +Event OLE_EDITTABLE_GIT.AfterUpdate(Cell, Text, Pattern, OldText) + GoSub CheckModified +end event + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Internal GoSubs +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + + +Setup_OLE_Controls: + + // Add browse buttons + Ctrl = @Window:".OLE_SUBCLASS" + CtrlIds = "EDL_REPO_LOC,EDL_GIT_LOC,EDL_GUI_LOC" + For i = 1 to 3 + CtrlId = @Window:".":Field(CtrlIds, ",", i, 1) + Handle = Get_Property(CtrlId, "HANDLE") + Send_Message(Ctrl, "OLE.Subclass", Handle, CtrlId) + Convert "." to ";" in CtrlId + Set_Property(Ctrl, "OLE.OptionButton[":CtrlId:"]", 1) + Set_Property(Ctrl, "OLE.OptionImage[":CtrlId:"]", "BMPS\SRPGit.zip#browse.png") + Send_Message(Ctrl, "QUALIFY_EVENT", "OLE.OnOptionClick", Yes$) + Next i + +return + + +CheckModified: + + OrigGenCtrlList = Get_Property(@Window, '@OrigGitCtrlList') + CurrGenCtrlList = Get_Property(@Window:".CHB_ENABLED", 'CHECK'):@RM:Get_Property(@Window:".EDL_REPO_LOC", 'TEXT'):@RM:Get_Property(@Window:".EDL_GIT_LOC", 'TEXT'):@RM:Get_Property(@Window:".EDL_GUI_LOC", 'TEXT'):@RM:Get_Property(@Window:".EDL_WARNING", 'TEXT') + If CurrGenCtrlList NE OrigGenCtrlList then + Set_Property(@Window:'.PUB_APPLY', 'ENABLED', True$) + end else + Set_Property(@Window:'.PUB_APPLY', 'ENABLED', False$) + end + +return + + +FillUserSettings: + + // Get the settings + GitEnabled = SRP_Git_Services("IsEnabled") + GitRepoLoc = SRP_Git_Services("GetRepoPath") + GitExePath = SRP_Git_Services("GetGitPath") + GitGUICommand = SRP_Git_Services("GetGuiCommand") + GitWarning = SRP_Git_Services("GetWarning") + + // Pass the data to the control + Set_Property(@Window:".CHB_ENABLED", "CHECK", GitEnabled) + Set_Property(@Window:".EDL_REPO_LOC", "TEXT", GitRepoLoc) + Set_Property(@Window:".EDL_GIT_LOC", "TEXT", GitExePath) + Set_Property(@Window:".EDL_GUI_LOC", "TEXT", GitGUICommand) + Set_Property(@Window:".EDL_WARNING", "TEXT", GitWarning) + + // Save the data so we know when we can apply + Set_Property(@Window, "@OrigGitCtrlList", GitEnabled:@RM:GitRepoLoc:@RM:GitExePath:@RM:GitWarning) + Set_Property(@Window:".PUB_APPLY", "ENABLED", False$) + +return + + +SaveUserSettings: + + GitEnabled = Get_Property(@Window:".CHB_ENABLED", "CHECK") + GitRepoLoc = Get_Property(@Window:".EDL_REPO_LOC", "TEXT") + GitExePath = Get_Property(@Window:".EDL_GIT_LOC", "TEXT") + GitGUICommand = Get_Property(@Window:".EDL_GUI_LOC", "TEXT") + GitWarning = Get_Property(@Window:".EDL_WARNING", "TEXT") + SRP_Git_Services("SaveUserSettings", GitEnabled, GitRepoLoc, GitExePath, GitGUICommand, GitWarning) + + // Save the data so we know when we can apply + Set_Property(@Window, "@OrigGitCtrlList", GitEnabled:@RM:GitRepoLoc:@RM:GitExePath:@RM:GitGUICommand:@RM:GitWarning) + Set_Property(@Window:".PUB_APPLY", "ENABLED", False$) + +return + diff --git a/SYSPROG/STPROC/SRP_GIT_UTILITY_EVENTS.txt b/SYSPROG/STPROC/SRP_GIT_UTILITY_EVENTS.txt new file mode 100644 index 0000000..18e64d0 --- /dev/null +++ b/SYSPROG/STPROC/SRP_GIT_UTILITY_EVENTS.txt @@ -0,0 +1,599 @@ +Compile function SRP_GIT_UTILITY_EVENTS(Event, CtrlEntId, @PARAMS) +/************************************************************************************************ +* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to +* be copied without written permission from SRP Computer Solutions, Inc. +* +* Name : SRP_GIT_UTILITY_Events +* +* Description: Event handling commuter module for the SRP_GIT_UTILITY form. +* +* User Defined Properties: +* +* Parameters: +* EventID [in] -- Event ID +* CtrlEntId [in] -- Control whose event is being handled +* Param1-13 [in] -- Event Parameters +* +* Returns: +* Event handling result, usually 1 +* +* History (Date, Initials, Notes) +* 04/05/19 DJS Original programmer +* 07/29/19 KRF Updated with different controls and cleaned up the code +* +************************************************************************************************/ +#pragma precomp SRP_PreCompiler +#window SRP_GIT_UTILITY + +$Insert LOGICAL + +Equ IMAGE_LOC$ to 'BMPS\SRPGit.zip#' + +Declare function RGB, SRP_Git_Services, Git_Services, SRP_Array, Set_Property, Get_Property +Declare subroutine SRP_Git_Services, SRP_Set_Minmaxinfo, Set_Property, Send_Event, Post_Event, Send_Message + +GoToEvent Event for CtrlEntId else + // Event not implemented +end + +Return 1 + +//----------------------------------------------------------------------------- +// EVENT HANDLERS +//----------------------------------------------------------------------------- + + +Event WINDOW.CREATE(CreateParam) + + If SRP_Git_Services("HasSettings") then + + // Setup combo boxes + Set_Property(@Window:'.CMB_FILTER_APP', 'LIST', @FM:@APPID) + Set_Property(@Window:'.CMB_FILTER_WORK', 'LIST', @FM:SRP_Git_Services("GetSupportedEntityTypes")) + + GoSub Setup_OLE_Controls + GoSub Load_Auto + + // Default to pull + Send_Event(@Window:".PUB_PULL", "OLE", "OnClick", "0,0", "Left", 0, 0) + + end else + + Call Start_Window("SRP_GIT_SETTINGS") + Call Post_Event(@Window, "CLOSE") + + end + +End Event + + +Event PUB_PULL.OnClick(Point, Button, Shift, Ctrl) + + Set_Property(@Window:".PUB_PULL", "OLE.State", 1) + Set_Property(@Window:".PUB_PULL", "OLE.FontBold", 1) + Set_Property(@Window:".PUB_PUSH", "OLE.State", 0) + Set_Property(@Window:".PUB_PUSH", "OLE.FontBold", 0) + Set_Property(@Window, "@OPERATION", "PULL") + + Set_Property(@Window:".STA_WORKING", "TEXT", "Git Repo Entities") + Set_Property(@Window:".STA_STAGE", "TEXT", "Entities to Pull into OpenInsight") + Set_Property(@Window:".EDL_FROM_COMMIT", "VISIBLE", Yes$) + Set_Property(@Window:".STA_FROM_COMMIT", "VISIBLE", Yes$) + Set_Property(@Window:".EDL_TO_COMMIT", "VISIBLE", Yes$) + Set_Property(@Window:".STA_TO_COMMIT", "VISIBLE", Yes$) + Set_Property(@Window:".OLE_REFRESH", "VISIBLE", Get_Property(@Window:".OLE_MANUAL", "OLE.Caption") _EQC "Auto") + Set_Property(@Window:".OLE_MANUAL", "VISIBLE", Yes$) + Set_Property(@Window:".OLE_HEADS", "VISIBLE", Get_Property(@Window:".OLE_MANUAL", "OLE.Caption") _EQC "Auto") + Set_Property(@Window:".PUB_APPLY", "TEXT", "Pull") + Set_Property(@Window:".OLE_RPT_STAGE", "OLE.EmptyTablePrompt", "Move items here you want to pull from Git into OpenInsight.") + + GoSub Populate + +end event + + +Event PUB_PUSH.OnClick(Point, Button, Shift, Ctrl) + + Set_Property(@Window:".PUB_PULL", "OLE.State", 0) + Set_Property(@Window:".PUB_PULL", "OLE.FontBold", 0) + Set_Property(@Window:".PUB_PUSH", "OLE.State", 1) + Set_Property(@Window:".PUB_PUSH", "OLE.FontBold", 1) + Set_Property(@Window, "@OPERATION", "PUSH") + + Set_Property(@Window:".STA_WORKING", "TEXT", "OpenInsight Entities") + Set_Property(@Window:".STA_STAGE", "TEXT", "Entities to Push into Git") + Set_Property(@Window:".EDL_FROM_COMMIT", "VISIBLE", No$) + Set_Property(@Window:".STA_FROM_COMMIT", "VISIBLE", No$) + Set_Property(@Window:".EDL_TO_COMMIT", "VISIBLE", No$) + Set_Property(@Window:".STA_TO_COMMIT", "VISIBLE", No$) + Set_Property(@Window:".OLE_REFRESH", "VISIBLE", No$) + Set_Property(@Window:".OLE_MANUAL", "VISIBLE", No$) + Set_Property(@Window:".OLE_HEADS", "VISIBLE", No$) + Set_Property(@Window:".EDL_SEARCH", "FOCUS", Yes$) + Set_Property(@Window:".PUB_APPLY", "TEXT", "Push") + Set_Property(@Window:".OLE_RPT_STAGE", "OLE.EmptyTablePrompt", "Move items here you want to push from OpenInsight into Git.") + + GoSub Populate + +end event + + +Event CMB_FILTER_APP.CHANGED(NewData) + GoSub Populate +end event + + +Event CMB_FILTER_WORK.CHANGED(NewData) + GoSub Populate +end event + + +* Event CMB_FROM_COMMIT.CHANGED(NewData) +* GoSub Populate +* end event +* +* +* Event CMB_TO_COMMIT.CHANGED(NewData) +* GoSub Populate +* end event + + +Event OLE_REFRESH.OnClick(Point, Button, Shift, Ctrl) + + Text = Get_Property(@Window:".OLE_MANUAL", "OLE.Caption") + If Text _EQC "Manual" then + GoSub Populate + end else + Set_Property(@Window, "REDRAW", No$) + Set_Property("SYSTEM", "CURSOR", "H") + GoSub Load_Commits + Set_Property("SYSTEM", "CURSOR", "A") + Set_Property(@Window, "REDRAW", Yes$) + end + +end event + + +Event OLE_MANUAL.OnClick(Point, Button, Shift, Ctrl) + + Set_Property(@Window, "REDRAW", No$) + Text = Get_Property(@Window:".OLE_MANUAL", "OLE.Caption") + If Text _EQC "Manual" then + Set_Property(@Window:".STA_FROM_COMMIT", "TEXT", "Start:") + Set_Property(@Window:".STA_TO_COMMIT", "TEXT", "End:") + Set_Property(@Window:".OLE_MANUAL", "OLE.Caption", "Auto") + Set_Property(@Window:".OLE_HEADS", "VISIBLE", Yes$) + Set_Property(@Window:".OLE_REFRESH", "VISIBLE", Yes$) + GoSub Enable_Combos + GoSub Load_Commits + end else + Set_Property(@Window:".OLE_SUBCLASS", "OLE.Combo[EDL_FROM_COMMIT]", 0) + Set_Property(@Window:".OLE_SUBCLASS", "OLE.Combo[EDL_TO_COMMIT]", 0) + Set_Property(@Window:".STA_FROM_COMMIT", "TEXT", "Last Pull:") + Set_Property(@Window:".STA_TO_COMMIT", "TEXT", "Current:") + Set_Property(@Window:".OLE_MANUAL", "OLE.Caption", "Manual") + Set_Property(@Window:".OLE_HEADS", "VISIBLE", No$) + Set_Property(@Window:".OLE_REFRESH", "VISIBLE", No$) + GoSub Load_Auto + GoSub Populate + end + Set_Property(@Window, "REDRAW", Yes$) + +end event + +Event OLE_HEADS.OnClick(Point, Button, Shift, Ctrl) + Text = Get_Property(@Window:".OLE_HEADS", "OLE.Caption") + If Text _EQC "All Refs" then + Set_Property(@Window:".OLE_HEADS", "OLE.Caption", "Heads") + end else + Set_Property(@Window:".OLE_HEADS", "OLE.Caption", "All Refs") + end + GoSub Load_Commits +end event + + +Event EDL_SEARCH.CHANGED(NewData) + Set_Property(@Window, "TIMER", 0:@FM:500) +end event + + +Event EDL_CONFIRM.CHAR(VirtCode, ScanCode, CtrlKey, ShiftKey, AltKey) + + If Get_Property(CtrlEntId, "TEXT") EQ "PULL" then + GoSub Execute + end + +end event + + +Event WINDOW.TIMER() + + Text = Get_Property(@Window:".EDL_SEARCH", "TEXT") + List = Get_Property(@Window:".OLE_RPT_WORK", "@ORIGLIST") + NewList = "" + If Len(Text) then + For Each Row in List + If IndexC(Row, Text, 1) GT 0 then + NewList := Row:@FM + end + Next Row + NewList[-1, 1] = "" + end else + Transfer List to NewList + end + Set_Property(@Window:".OLE_RPT_WORK", "OLE.List", NewList) + +end event + + +Event PUB_APPLY.CLICK() + + GitWarning = SRP_Git_Services("GetWarning") + If Len(GitWarning) AND Get_Property(@Window, '@OPERATION') EQ "PULL" then + Set_Property(@Window:".EDL_CONFIRM", "TEXT", "") + Set_Property(@Window, "VPOSITION", 3) + Set_Property(@Window:".EDL_CONFIRM", "FOCUS", Yes$) + end else + GoSub Execute + end + +end event + + +Event PUB_CLOSE.CLICK() + Post_Event(@Window, 'CLOSE') +end event + + +Event PUB_BACK.CLICK() + Set_Property(@Window, "VPOSITION", 1) +end event + + +Event OLE_ADD_ALL.OnClick(Point, Button, Shift, Ctrl) + + Send_Message(@Window:'.OLE_RPT_WORK', 'OLE.ExpandAll') + EntityList = Get_Property(@Window:'.OLE_RPT_WORK', 'OLE.List') + Set_Property(@Window:'.OLE_RPT_STAGE', 'OLE.List', EntityList) + GoSub EnableArrowButtons + GoSub EnableStagingCtrls + +end event + + +Event OLE_ADD_SELECTED.OnClick(Point, Button, Shift, Ctrl) + + EntitiesToAdd = Get_Property(@Window:'.OLE_RPT_WORK', 'OLE.SelList') + StageList = Get_Property(@Window:'.OLE_RPT_STAGE', 'OLE.List') + ResultList = SRP_Array('Join', StageList, EntitiesToAdd, 'OR', @FM) + Set_Property(@Window:'.OLE_RPT_STAGE', 'OLE.List', ResultList) + GoSub EnableArrowButtons + GoSub EnableStagingCtrls + +end event + + +Event OLE_REMOVE_ALL.OnClick(Point, Button, Shift, Ctrl) + + Send_Message(@Window:'.OLE_RPT_STAGE', 'OLE.ExpandAll') + Set_Property(@Window:'.OLE_RPT_STAGE', 'OLE.List', '') + GoSub EnableArrowButtons + GoSub EnableStagingCtrls + +end event + + +Event OLE_REMOVE_SELECTED.OnClick(Point, Button, Shift, Ctrl) + + StageRptCtrl = @Window : '.OLE_RPT_STAGE' + SelList = Get_Property(StageRptCtrl, 'OLE.SelList') + EntityList = Get_Property(StageRptCtrl, 'OLE.List') + For each Row in SelList using @FM setting sPos + Locate Row in EntityList using @FM setting ePos then EntityList = Delete(EntityList, ePos, 0, 0) + Next Row + Set_Property(StageRptCtrl, 'OLE.List', EntityList) + GoSub EnableArrowButtons + GoSub EnableStagingCtrls + +end event + + +Event OLE_RPT_WORK.OnSelChange() + GoSub EnableArrowButtons +end event + + +Event OLE_RPT_WORK.OnItemDblClick(Row, Button, Col, Point) + Send_Event(@Window:".OLE_ADD_SELECTED", "OLE", "OnClick", "", "", "", "") +end event + + +Event OLE_RPT_STAGE.OnSelChange() + GoSub EnableArrowButtons +end event + + +Event OLE_RPT_STAGE.OnItemDblClick(Row, Button, Col, Point) + Send_Event(@Window:".OLE_REMOVE_SELECTED", "OLE", "OnClick", "", "", "", "") +end event + + +Event OLE_SUBCLASS.OnComboClick(CtrlId, Sel, Value) + Set_Property(@Window:".EDL_FROM_COMMIT", "@HASH", Get_Property(@Window:".OLE_SUBCLASS", "OLE.ComboRowData[EDL_FROM_COMMIT]")<2>) + Set_Property(@Window:".EDL_TO_COMMIT", "@HASH", Get_Property(@Window:".OLE_SUBCLASS", "OLE.ComboRowData[EDL_TO_COMMIT]")<2>) + GoSub Populate +end event + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Internal GoSubs +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +Setup_OLE_Controls: + + // Subclassing + Ctrl = @Window:".OLE_SUBCLASS" + Send_Message(Ctrl, "OLE.Subclass", Get_Property(@Window:".EDL_FROM_COMMIT", "HANDLE"), @Window:".EDL_FROM_COMMIT") + Send_Message(Ctrl, "OLE.Subclass", Get_Property(@Window:".EDL_TO_COMMIT", "HANDLE"), @Window:".EDL_TO_COMMIT") + Set_Property(Ctrl, "OLE.CurrentWindow", @Window) + Send_Message(Ctrl, 'QUALIFY_EVENT', 'OLE.OnComboClick', Yes$) + + // Setup buttons + Background = "" + Background<1> = "Vertical(Gradient(White, White), Border(White))" + Background<2> = "Vertical(Gradient(White, White), Gradient(Blue L=50, Blue L=50, 4), Border(White))" + Background<3> = "Vertical(Gradient(White, White), Gradient(Blue L=50, Blue L=50, 4), Border(White))" + Foreground = "" + Foreground<1> = "Blue L=50" + Foreground<2> = "Blue L=50" + Foreground<3> = "Blue L=50" +* CtrlIds = "PUB_PULL,PUB_PUSH" + Set_Property(@Window:".PUB_PULL", "OLE.Background", Background) + Set_Property(@Window:".PUB_PULL", "OLE.Forecolor", Foreground) + Send_Message(@Window:".PUB_PULL", 'QUALIFY_EVENT', 'OLE.OnClick', Yes$) + Swap "Blue" with "Red" in Background + Swap "Blue" with "Red" in Foreground + Set_Property(@Window:".PUB_PUSH", "OLE.Background", Background) + Set_Property(@Window:".PUB_PUSH", "OLE.Forecolor", Foreground) + Send_Message(@Window:".PUB_PUSH", 'QUALIFY_EVENT', 'OLE.OnClick', Yes$) +* For i = 1 to 2 +* Ctrl = @Window:".":Field(CtrlIds, ",", i, 1) +* Set_Property(Ctrl, "OLE.Background", Background) +* Set_Property(Ctrl, "OLE.Forecolor", Foreground) +* Send_Message(Ctrl, 'QUALIFY_EVENT', 'OLE.OnClick', Yes$) +* Next i + + // Qualify OLE events that we want to intercept + Send_Message(@Window:'.OLE_ADD_ALL', 'QUALIFY_EVENT', 'OLE.OnClick', Yes$) + Send_Message(@Window:'.OLE_ADD_SELECTED', 'QUALIFY_EVENT', 'OLE.OnClick', Yes$) + Send_Message(@Window:'.OLE_REMOVE_ALL', 'QUALIFY_EVENT', 'OLE.OnClick', Yes$) + Send_Message(@Window:'.OLE_REMOVE_SELECTED', 'QUALIFY_EVENT', 'OLE.OnClick', Yes$) + Send_Message(@Window:'.OLE_REFRESH', 'QUALIFY_EVENT', 'OLE.OnClick', Yes$) + Send_Message(@Window:'.OLE_MANUAL', 'QUALIFY_EVENT', 'OLE.OnClick', Yes$) + Send_Message(@Window:'.OLE_HEADS', 'QUALIFY_EVENT', 'OLE.OnClick', Yes$) + + // Setup selection buttons + Style = 'TBNG' + Background = '' + Background<1> = 'None' + Background<2> = 'Vertical(Gradient(S L=90, S L=90), Border(S L=70))' + Background<3> = 'Vertical(Gradient(S L=80, S L=80), Border(S L=60))' + Background<4> = 'None' + Background<5> = 'Vertical(Gradient(S L=80, S L=80), Border(S L=60))' + Set_Property(@Window:'.OLE_ADD_ALL', 'OLE.Style', Style) + Set_Property(@Window:'.OLE_ADD_SELECTED', 'OLE.Style', Style) + Set_Property(@Window:'.OLE_REMOVE_SELECTED', 'OLE.Style', Style) + Set_Property(@Window:'.OLE_REMOVE_ALL', 'OLE.Style', Style) + Set_Property(@Window:'.OLE_ADD_ALL', 'OLE.Background', Background) + Set_Property(@Window:'.OLE_ADD_SELECTED', 'OLE.Background', Background) + Set_Property(@Window:'.OLE_REMOVE_SELECTED', 'OLE.Background', Background) + Set_Property(@Window:'.OLE_REMOVE_ALL', 'OLE.Background', Background) + Set_Property(@Window:'.OLE_ADD_ALL', 'OLE.Icon', IMAGE_LOC$:'ArrowDblRight.png') + Set_Property(@Window:'.OLE_ADD_SELECTED', 'OLE.Icon', IMAGE_LOC$:'ArrowRight.png') + Set_Property(@Window:'.OLE_REMOVE_SELECTED', 'OLE.Icon', IMAGE_LOC$:'ArrowLeft.png') + Set_Property(@Window:'.OLE_REMOVE_ALL', 'OLE.Icon', IMAGE_LOC$:'ArrowDblLeft.png') + + // Setup Working OLE Report Table + Ctrl = @Window:'.OLE_RPT_WORK' ; GoSub Setup_ReportTable + Ctrl = @Window:'.OLE_RPT_STAGE' ; GoSub Setup_ReportTable + +return + +Setup_ReportTable: + + ColumnList = '' + ColumnList<-1> = 'Id' :@VM:'Text':@VM:100:@VM:0:@VM:@VM:@VM:1:@VM:0:@VM:50:@VM:'Left':@VM:@VM:@VM:@VM:'Segeo UI Semilight':@SVM:'10' + ColumnList<-1> = 'App' :@VM:'Text':@VM:120:@VM:0:@VM:@VM:@VM:1:@VM:1:@VM:50:@VM:'Left':@VM:@VM:@VM:@VM:'Segoe UI Semilight':@SVM:'10' + ColumnList<-1> = 'Type' :@VM:'Text':@VM:100:@VM:0:@VM:@VM:@VM:1:@VM:0:@VM:50:@VM:'Left':@VM:@VM:@VM:@VM:'Segoe UI Semilight':@SVM:'10' + ColumnList<-1> = 'Class' :@VM:'Text':@VM:100:@VM:0:@VM:@VM:@VM:1:@VM:0:@VM:50:@VM:'Left':@VM:@VM:@VM:@VM:'Segoe UI Semilight':@SVM:'10' + ColumnList<-1> = 'Name' :@VM:'Text':@VM:300:@VM:1:@VM:@VM:@VM:1:@VM:1:@VM:50:@VM:'Left':@VM:@VM:@VM:@VM:'Segoe UI Semilight':@SVM:'10' + ColumnList<-1> = 'Status' :@VM:'Text':@VM:80 :@VM:0:@VM:@VM:@VM:0:@VM:1:@VM:50:@VM:'Left':@VM:@VM:@VM:@VM:'Segoe UI Semilight':@SVM:'10' + + Set_Property(Ctrl, 'OLE.ColumnList', ColumnList) + Set_Property(Ctrl, 'OLE.GroupOrder', 3) + Set_Property(Ctrl, 'OLE.SortOrder', 3:@FM:5) + Set_Property(Ctrl, 'OLE.MultiSelect', 1) + Set_Property(Ctrl, 'OLE.HorizontalGridStyle', 'None') + Set_Property(Ctrl, "OLE.AlwaysShowSelection", Yes$) + Send_Message(Ctrl, 'QUALIFY_EVENT', 'OLE.OnSelChange', Yes$) + Send_Message(Ctrl, 'QUALIFY_EVENT', 'OLE.OnItemDblClick', Yes$) + +return + + +EnableArrowButtons: + + Set_Property(@Window:'.OLE_ADD_ALL', 'ENABLED', Get_Property(@Window:'.OLE_RPT_WORK', 'OLE.RowCount') GT 0) + Set_Property(@Window:'.OLE_ADD_SELECTED', 'ENABLED', Get_Property(@Window:'.OLE_RPT_WORK', 'OLE.SelList') NE "") + Set_Property(@Window:'.OLE_REMOVE_SELECTED', 'ENABLED', Get_Property(@Window:'.OLE_RPT_STAGE', 'OLE.SelList') NE "") + Set_Property(@Window:'.OLE_REMOVE_ALL', 'ENABLED', Get_Property(@Window:'.OLE_RPT_STAGE', 'OLE.RowCount') GT 0) + +return + + +EnableStagingCtrls: + + StagingList = Get_Property(@Window:'.OLE_RPT_STAGE', 'OLE.List') + If StagingList NE '' then + Set_Property(@Window:'.PUB_APPLY', 'ENABLED', Yes$) + end else + Set_Property(@Window:'.PUB_APPLY', 'ENABLED', No$) + end + +return + + +Populate: + + Set_Property('SYSTEM', 'CURSOR', 'H') + Set_Property(@Window:".OLE_RPT_WORK", "OLE.EmptyTablePrompt", "Loading...") + Set_Property(@Window:'.OLE_RPT_WORK', 'OLE.List', "") + Set_Property(@Window:'.OLE_RPT_STAGE', 'OLE.List', "") + + Types = Get_Property(@Window:".CMB_FILTER_WORK", "TEXT") + Apps = Get_Property(@Window:".CMB_FILTER_APP", "TEXT") + Operation = Get_Property(@Window, '@OPERATION') + + Begin Case + + Case Operation EQ "PULL" + FromCommit = Get_Property(@Window:".EDL_FROM_COMMIT", "@HASH") + ToCommit = Get_Property(@Window:".EDL_TO_COMMIT", "@HASH") + EntityList = SRP_Git_Services("GetRepoEntities", Types, Apps, FromCommit, ToCommit) + + Case Operation EQ "PUSH" + EntityList = SRP_Git_Services("GetOIEntities", Types, Apps) + + End Case + + Set_Property(@Window:".EDL_SEARCH", "TEXT", "") + Set_Property(@Window:'.OLE_RPT_WORK', 'OLE.List', EntityList) + Set_Property(@Window:'.OLE_RPT_WORK', '@ORIGLIST', EntityList) + Apps = @APPID + NumApps = DCount(Apps, @FM) + If NumApps GE 2 then + FirstApps = Field(Apps, @FM, 1, NumApps - 1) + Swap @FM with ", " in FirstApps + Apps = FirstApps:", or ":Apps + end + Set_Property(@Window:".OLE_RPT_WORK", "OLE.EmptyTablePrompt", "No entities found in ":Apps:" matching criteria.") + + GoSub EnableArrowButtons + + Set_Property('SYSTEM', 'CURSOR', 'A') + +return + + +Load_Commits: + + // Clear lists + Set_Property(@Window:".EDL_FROM_COMMIT", "TEXT", "") + Set_Property(@Window:".EDL_TO_COMMIT", "TEXT", "") + + // Load the commit options + If Get_Property(@Window:".OLE_HEADS", "OLE.Caption") _EQC "Heads" then + CommitData = @FM:SRP_Git_Services("GetCommits") + end else + CommitData = @FM:SRP_Git_Services("GetBranchHeads") + end + + // Get the SHA for the last saved commit + LastCommit = SRP_Git_Services("LoadLastCommit")<1> + + // Find the curr head and the last saved commit + LastCommitPos = 1 + CurrPos = 1 + For Each Commit in CommitData setting Pos + If Commit<1, 2> EQ LastCommit then LastCommitPos = Pos + If Commit<1, 1> EQ "*" then CurrPos = Pos + Next Commit + + // Populate the controls + Convert @FM:@VM to @TM:@STM in CommitData + Set_Property(@Window:".OLE_SUBCLASS", "OLE.ComboData[EDL_FROM_COMMIT]", CommitData) + Set_Property(@Window:".OLE_SUBCLASS", "OLE.ComboData[EDL_TO_COMMIT]", CommitData) + Set_Property(@Window:".OLE_SUBCLASS", "OLE.ComboSelPos[EDL_FROM_COMMIT]", LastCommitPos) + Set_Property(@Window:".OLE_SUBCLASS", "OLE.ComboSelPos[EDL_TO_COMMIT]", CurrPos) + +return + + +Enable_Combos: + + // Subclassing + Ctrl = @Window:".OLE_SUBCLASS" + ComboDropDown = "" + ComboDropDown<1> = 1 ;// by default, we won't show the combo box itself + ComboDropDown<2, 1> = "*":@TM:"SHA":@TM:"Branch":@TM:"When":@TM:"Author":@TM:"Commit" :@TM:"" + ComboDropDown<2, 2> = "L":@TM:"L" :@TM:"L" :@TM:"L" :@TM:"L" :@TM:"L":@STM:300:@TM:"L":@STM:0 + ComboDropDown<2, 4> = 7 ;// master column + ComboDropDown<2, 5> = 0 ;// auto fill off + ComboDropDown<2, 10> = 0 ;// Only show the drop down when the user types + ComboDropDown<2, 11> = 1 ;// Use LIST Format + ComboDropDown<2, 18> = 1 ;// Show Popup while in read only mode + ComboDropDown<2, 22> = 'Segeo UI Semilight':@SVM:'9' ;// Font + Set_Property(Ctrl, "OLE.Combo[EDL_FROM_COMMIT]", ComboDropDown) + Set_Property(Ctrl, "OLE.Combo[EDL_TO_COMMIT]", ComboDropDown) + +return + +Load_Auto: + + LastCommit = SRP_Git_Services("LoadLastCommit") + If Len(LastCommit) then + Text = '[':LastCommit<3>:'] ':LastCommit<2>:' (':LastCommit<4>:')' + Set_Property(@Window:".EDL_FROM_COMMIT", "TEXT", Text) + Set_Property(@Window:".EDL_FROM_COMMIT", "@HASH", LastCommit<1>) + end else + Set_Property(@Window:".EDL_FROM_COMMIT", "TEXT", "") + Set_Property(@Window:".EDL_FROM_COMMIT", "@HASH", "") + end + + CurrCommit = SRP_Git_Services("GetCurrentCommit") + If Len(CurrCommit) then + Text = '[':CurrCommit<3>:'] ':CurrCommit<6>:' (':CurrCommit<5>:')' + Set_Property(@Window:".EDL_TO_COMMIT", "TEXT", Text) + Set_Property(@Window:".EDL_TO_COMMIT", "@HASH", "*") + end else + Set_Property(@Window:".EDL_TO_COMMIT", "TEXT", "") + Set_Property(@Window:".EDL_TO_COMMIT", "@HASH", "") + end + +return + +Execute: + + Set_Property('SYSTEM', 'CURSOR', 'H') + ErrorList = '' + Operation = Get_Property(@Window, '@OPERATION') + StageList = Get_Property(@Window:'.OLE_RPT_STAGE', 'OLE.List') + RotatedList = SRP_Array('Rotate', StageList) + EntityList = RotatedList<1> + StatusList = RotatedList<6> + Convert @VM to @FM in EntityList + Convert @VM to @FM in StatusList + Set_Property(@Window, "VPOSITION", 2) + Set_Property(@Window:".PUB_BACK", "ENABLED", No$) + Set_Property(@Window:".EDB_STATUS", "TEXT", "") + Begin Case + Case Operation EQ "PULL" + ToCommit = Get_Property(@Window:".CMB_TO_COMMIT", "TEXT") + If Len(ToCommit) then + CommitLabels = Get_Property(@Window:".CMB_TO_COMMIT", "LIST") + Locate ToCommit in CommitLabels using @FM setting Pos then + ToCommit = Get_Property(@Window:".CMB_TO_COMMIT", "@IDS") + end + end + ErrorList = SRP_Git_Services('PullEntities', EntityList, StatusList, @Window:".EDB_STATUS", ToCommit) + Case Operation EQ "PUSH" + ErrorList = SRP_Git_Services('PushEntities', EntityList, @Window:".EDB_STATUS") + End Case + Set_Property(@Window:".PUB_BACK", "ENABLED", Yes$) + CurrCommit = SRP_Git_Services("GetCurrentCommit") + SRP_Git_Services("SaveLastCommit", CurrCommit<2>, CurrCommit<6>, CurrCommit<3>, CurrCommit<5>) + Set_Property('SYSTEM', 'CURSOR', 'A') + +return + diff --git a/SYSPROG/STPROC/SRP_LOGON.txt b/SYSPROG/STPROC/SRP_LOGON.txt new file mode 100644 index 0000000..6589357 --- /dev/null +++ b/SYSPROG/STPROC/SRP_LOGON.txt @@ -0,0 +1,40 @@ +Compile function SRP_Logon(@Service, @Params) +/************************************************************************************************ + This program is proprietary and is not to be used by or disclosed to others, nor is it to + be copied without written permission from SRP Computer Solutions, Inc. + + Name : SRP_Logon + + Description : Service module for the SRP_Logon system. + + Parameters: + Service [IN] - The service to execute + Params [IN] - Service specific parameters + + History (Date, Initials, Notes) + 06/18/20 KRF Original programmer +************************************************************************************************/ +#pragma precomp SRP_PreCompiler +$insert LOGICAL + +Declare function SRPLogonAPI_ValidateUser, SRPLogonAPI_GetADGroups, SRPLogonAPI_GetError + +GoToService + +Return Response or "" + +//----------------------------------------------------------------------------- +// SERVICES +//----------------------------------------------------------------------------- + +Service ValidateUser(Username, Password, Domain) + Response = SRPLogonAPI_ValidateUser(Username, Password, Domain) +End Service + +Service GetADGroups(AdName, DcName) + Response = SRPLogonAPI_GetADGroups(AdName, DcName) +End Service + +Service GetError() + Response = SRPLogonAPI_GetError() +End Service diff --git a/SYSPROG/STPROC/SRP_MAIL_DEMO_EVENTS.txt b/SYSPROG/STPROC/SRP_MAIL_DEMO_EVENTS.txt new file mode 100644 index 0000000..d565d3c --- /dev/null +++ b/SYSPROG/STPROC/SRP_MAIL_DEMO_EVENTS.txt @@ -0,0 +1,310 @@ +Function SRP_MAIL_DEMO_EVENTS(CtrlEntID, Event, Param1, Param2, Param3, Param4, Param5, Param6, Param7, Param8) +/* +* Subroutine Name :SRP_MAIL_DEMO_EVENTS +* +* Description : Commuter Module for SRP_MAIL_DEMO +* +* Date : 01/07/2016 +* +* Author : SYSPROG +* +* OI Version : 9.4.0 +* +********************************************************/ + +Declare Subroutine Msg, FsMsg, Set_Status, Center_Window, Set_Property, Send_Message, Yield + +Declare Function Msg, Get_Property, Get_Status, Set_Property, Popup +Declare Function Repository, Send_Message, Send_Event, Unassigned, Utility +Declare Function ContextMenu, SRP_Send_Mail + +$Insert MSG_Equates +$Insert Popup_Equates +$INSERT LOGICAL +$Insert RTI_STYLE_EQUATES + +If Unassigned(CtrlEntID) Then CtrlEntID = '' +If Unassigned(Event) Then Event = '' +If Unassigned(Param1) Then Param1 = '' +If Unassigned(Param2) Then Param2 = '' +If Unassigned(Param3) Then Param3 = '' +If Unassigned(Param4) Then Param4 = '' +If Unassigned(Param5) Then Param5 = '' +If Unassigned(Param6) Then Param6 = '' +If Unassigned(Param7) Then Param7 = '' +If Unassigned(Param8) Then Param8 = '' + + +If index(CtrlEntID,".",1) then + WinName = Field(CtrlEntID,'.',1) + Control = Field(CtrlEntID,'.',2) +End else + WinName = CtrlEntID + Control = WinName +End + +Parent = @window +Frame = Get_Property(Parent,'MDIFRAME') +If len(Frame) then Parent = Frame + +Retval = 1 + +Begin Case + Case Event _EQC 'CREATE' ; Gosub CREATE + + Case Event _EQC 'CHANGED' + Begin Case + Case Control _EQC 'COB_BODY_TYPE' ; GoSub CHANGED.COB_BODY_TYPE + Case Control _EQC 'COB_SERVER_PORT' ; GoSub CHANGED.COB_SERVER_PORT + Case Control _EQC 'COB_ENCRYPTION' ; GoSub CHANGED.COB_ENCRYPTION + End Case + + Case Event _EQC 'OPTIONS' + Begin Case + Case Control _EQC 'EDT_ATTACHMENTS' ; GoSub OPTIONS.EDT_ATTACHMENTS + End Case + + Case Event _EQC 'CLICK' + Begin Case + Case Control _EQC 'PUB_SEND_EMAIL' ; GoSub CLICK.PUB_SEND_EMAIL + End Case +End Case + +return retval + + +CREATE: + HTMLCtrl = @Window : '.OLE_BODY' + Send_Message(HTMLCtrl, 'OLE.Navigate2', 'about:blank') + Loop + Status = Get_Property(HTMLCtrl, 'OLE.ReadyState') + While (Status NE 4) + Yield() + Repeat + + OSRead Body from Drive() : '\Sample HTML Email.htm' then + Send_Message(HTMLCtrl, 'OLE.document.open') + Send_Message(HTMLCtrl, 'OLE.document.write', Body) + Send_Message(HTMLCtrl, 'OLE.document.close') + end + + Send_Message(@Window : '.EDT_ATTACHMENTS', 'STYLE_BY_POS', 1, 0, DTCS_OPTIONSBUTTON$) + + Open "SYSLISTS" to hSYSLISTS then + Read Cache from hSYSLISTS, "SRP_MAIL_DEMO_CACHE" then + Set_Property(@Window : '.EDL_SUBJECT', 'TEXT', Cache<1>) + Set_Property(@Window : '.EDL_FROM', 'TEXT', Cache<2>) + Set_Property(@Window : '.EDL_TO', 'TEXT', Cache<3>) + Set_Property(@Window : '.EDL_CC', 'TEXT', Cache<4>) + Set_Property(@Window : '.EDL_BCC', 'TEXT', Cache<5>) + Set_Property(@Window : '.EDL_REPLY_TO', 'TEXT', Cache<6>) + Set_Property(@Window : '.COB_BODY_TYPE', 'TEXT', Cache<7>) + Set_Property(@Window : '.COB_SERVER_PORT', 'TEXT', Cache<8>) + Set_Property(@Window : '.COB_ENCRYPTION', 'TEXT', Cache<9>) + Set_Property(@Window : '.EDL_SMTP_SERVER', 'TEXT', Cache<10>) + Set_Property(@Window : '.EDL_ACCOUNT_USERNAME', 'TEXT', Cache<11>) + Set_Property(@Window : '.CHB_AUTHENTICATE', 'CHECK', Cache<12>) + Set_Property(@Window : '.EDT_ATTACHMENTS', 'ARRAY', Cache<13>:@FM:Cache<14>) +* Set_Property(@Window : '.EDL_ACCOUNT_PASSWORD', 'TEXT', Cache<15>) + GoSub CHANGED.COB_BODY_TYPE + end + end + + Size = Get_Property(@Window, 'SIZE') + TrackingSize = Size<3> : @FM : Size<4> : @FM : Size<3> : @FM : Size<4> + Set_Property(@Window, 'TRACKINGSIZE', TrackingSize) + + Center_Window(@Window) +Return + + +CHANGED.COB_BODY_TYPE: + BodyType = Get_Property(@Window : '.COB_BODY_TYPE', 'TEXT') + If BodyType _EQC 'HTML' Then + Set_Property(@Window : '.OLE_BODY', 'VISIBLE', True$) + Set_Property(@Window : '.EDB_BODY', 'VISIBLE', False$) + End Else + Set_Property(@Window : '.EDB_BODY', 'VISIBLE', True$) + Set_Property(@Window : '.OLE_BODY', 'VISIBLE', False$) + end +Return + + +OPTIONS.EDT_ATTACHMENTS: + SelPos = Get_Property(CtrlEntId, 'SELPOS') + RowPos = SelPos<2> + CurPath = Send_Message(CtrlEntId, 'TEXT_BY_POS', 2, RowPos) + If Len(CurPath) Then + FileName = CurPath[-1, 'B\'] + NumDelims = Count(CurPath, '\') + InitDir = Field(CurPath, '\', 1, NumDelims) + End Else + FileName = '' + InitDir = Drive() + end + ConfigOptions = '' + ConfigOptions<1> = 0 + ConfigOptions<4> = FileName + ConfigOptions<6> = InitDir + Path = Utility('CHOOSEFILE', @Window, ConfigOptions) + If Len(Path) And (Path NE CurPath) Then + Set_Property(CtrlEntId, 'ROWDATA', '' : @FM : Path) + end +Return + + +CHANGED.COB_SERVER_PORT: + ServerPort = Param1 + Begin Case + Case ServerPort[1, 2] EQ 25 ; Set_Property(@Window : '.COB_ENCRYPTION', 'TEXT', '') + Case ServerPort[1, 3] EQ 465 ; Set_Property(@Window : '.COB_ENCRYPTION', 'TEXT', 'SSL') + Case ServerPort[1, 3] EQ 587 ; Set_Property(@Window : '.COB_ENCRYPTION', 'TEXT', 'TLS') + End Case +Return + + +CHANGED.COB_ENCRYPTION: + Encryption = Param1 + Begin Case + Case Encryption EQ '' ; Set_Property(@Window : '.COB_SERVER_PORT', 'TEXT', '25 (Non-Secure SMTP)') + Case Encryption EQ 'SSL' ; Set_Property(@Window : '.COB_SERVER_PORT', 'TEXT', '465 (SSL)') + Case Encryption EQ 'TLS' ; Set_Property(@Window : '.COB_SERVER_PORT', 'TEXT', '587 (TLS)') + End Case +Return + + +CLICK.PUB_SEND_EMAIL: + TestResults = @Window : '.EDB_TEST_RESULTS' + Set_Property(TestResults, 'TEXTVAL', '') + Send_Message(TestResults, 'INSERT', -1, 'Attempting to send email...') + + Continue = True$ + Gosub Get_Message_Parameters + If Continue Then Gosub Get_Configuration_Parameters + If Continue Then Gosub Send_Email + + If Not(Continue) Then Send_Message(TestResults, 'INSERT', -1, \0D0A\ : 'Sending email failed.') + + Cache = '' + Cache<-1> = Get_Property(@Window : '.EDL_SUBJECT', 'TEXT') + Cache<-1> = Get_Property(@Window : '.EDL_FROM', 'TEXT') + Cache<-1> = Get_Property(@Window : '.EDL_TO', 'TEXT') + Cache<-1> = Get_Property(@Window : '.EDL_CC', 'TEXT') + Cache<-1> = Get_Property(@Window : '.EDL_BCC', 'TEXT') + Cache<-1> = Get_Property(@Window : '.EDL_REPLY_TO', 'TEXT') + Cache<-1> = Get_Property(@Window : '.COB_BODY_TYPE', 'TEXT') + Cache<-1> = Get_Property(@Window : '.COB_SERVER_PORT', 'TEXT') + Cache<-1> = Get_Property(@Window : '.COB_ENCRYPTION', 'TEXT') + Cache<-1> = Get_Property(@Window : '.EDL_SMTP_SERVER', 'TEXT') + Cache<-1> = Get_Property(@Window : '.EDL_ACCOUNT_USERNAME', 'TEXT') + Cache<-1> = Get_Property(@Window : '.CHB_AUTHENTICATE', 'CHECK') + Cache<-1> = Get_Property(@Window : '.EDT_ATTACHMENTS', 'ARRAY') +* Cache<-1> = Get_Property(@Window : '.EDL_ACCOUNT_PASSWORD', 'TEXT') + Open "SYSLISTS" to hSYSLISTS then + Write Cache to hSYSLISTS, "SRP_MAIL_DEMO_CACHE" then NULL + end + +Return + + +Get_Message_Parameters: + Subject = Get_Property(@Window : '.EDL_SUBJECT', 'TEXT') + From = Get_Property(@Window : '.EDL_FROM', 'TEXT') + To = Get_Property(@Window : '.EDL_TO', 'TEXT') + CC = Get_Property(@Window : '.EDL_CC', 'TEXT') + BCC = Get_Property(@Window : '.EDL_BCC', 'TEXT') + ReplyTo = Get_Property(@Window : '.EDL_REPLY_TO', 'TEXT') + BodyType = Get_Property(@Window : '.COB_BODY_TYPE', 'TEXT') + If BodyType _EQC 'HTML' Then + OSRead Body from Drive() : '\Sample HTML Email.htm' else Body = '' + End Else + Body = Get_Property(@Window : '.EDB_BODY', 'TEXT') + End + Attachments = Send_Message(@Window : '.EDT_ATTACHMENTS', 'TEXT_BY_POS', 2, 0) + NumAttachments = DCount(Attachments, @FM) + Loop + Attachment = Attachments + Until Len(Attachment) Or NumAttachments LT 1 + Attachments = Delete(Attachments, NumAttachments, 0, 0) + NumAttachments -= 1 + Repeat + Convert @FM To @VM In Attachments + + If Len(From) Else + Continue = False$ + Send_Message(TestResults, 'INSERT', -1, \0D0A\ : 'Missing the From email address.') + end + + If Len(To) Else + Continue = False$ + Send_Message(TestResults, 'INSERT', -1, \0D0A\ : 'Missing the To email address.') + end +Return + + +Get_Configuration_Parameters: + ServerPort = Get_Property(@Window : '.COB_SERVER_PORT', 'TEXT') + ServerPort = ServerPort[1, ' '] + Encryption = Get_Property(@Window : '.COB_ENCRYPTION', 'TEXT') + If Encryption _EQC '' Then Encryption = '' + Authenticate = Get_Property(@Window : '.CHB_AUTHENTICATE', 'CHECK') + SMTPServer = Get_Property(@Window : '.EDL_SMTP_SERVER', 'TEXT') + AccountUsername = Get_Property(@Window : '.EDL_ACCOUNT_USERNAME', 'TEXT') + AccountPassword = Get_Property(@Window : '.EDL_ACCOUNT_PASSWORD', 'TEXT') + + If Len(ServerPort) else + Continue = False$ + Send_Message(TestResults, 'INSERT', -1, \0D0A\ : 'Missing the Server Port.') + End + + If Len(SMTPServer) else + Continue = False$ + Send_Message(TestResults, 'INSERT', -1, \0D0A\ : 'Missing the SMTP Server URL.') + end + + If Len(AccountUsername) else + Continue = False$ + Send_Message(TestResults, 'INSERT', -1, \0D0A\ : 'Missing the Account Username.') + End + + If Len(AccountPassword) else + Continue = False$ + Send_Message(TestResults, 'INSERT', -1, \0D0A\ : 'Missing the Account Password.') + end +Return + + +Send_Email: + Message = '' + Message<1> = Subject + Message<2> = From + Message<3> = To + Message<4> = CC + Message<5> = BCC + Message<6> = ReplyTo + Message<7> = BodyType + Message<8> = Body + Message<9> = Attachments + Message<10> = '' + Message<11> = '' + Message<12> = '' + + Config = '' + Config<1> = '' ; // Send Using is deprecated + Config<2> = '' ; // Server Directory is deprecated + Config<3> = ServerPort + Config<4> = SMTPServer + Config<5> = Authenticate + Config<6> = AccountUsername + Config<7> = AccountPassword + Config<8> = Encryption + + Response = SRP_Send_Mail(Message, Config) + If Response EQ 1 Then + Send_Message(TestResults, 'INSERT', -1, \0D0A\ : 'Sending email was successful.') + End Else + Continue = False$ + Send_Message(TestResults, 'INSERT', -1, \0D0A\ : 'SMTP Server Response: ' : Response) + end +Return + diff --git a/SYSPROG/STPROC/SRP_PRECOMPILER.txt b/SYSPROG/STPROC/SRP_PRECOMPILER.txt new file mode 100644 index 0000000..0a68442 --- /dev/null +++ b/SYSPROG/STPROC/SRP_PRECOMPILER.txt @@ -0,0 +1,883 @@ +Compile Subroutine SRP_Precompiler(Routine, ProgName) + +/************************************************************************************************ + + This program is proprietary and is not to be used by or disclosed to others, nor is it to + be copied without written permission from SRP Computer Solutions, Inc. + + Name : SRP_Precompiler + + Description : Enhances BASIC+ with new features. + + Parameters: + Routine [IN] - The orginal source code when we will alter + ProgName [IN] - The stored procedure name + + History (Date, Initials, Notes) + 08/25/16 KRF Original programmer + 10/20/17 KRF Added support for unit test modules + 11/16/18 dmb Added support for web APIs + +************************************************************************************************/ +$insert LOGICAL +$insert SRPARRAY + +Declare function Max, Get_Property, RetStack, SRP_String + +// Don't precompile THIS!!!! +If ProgName _EQC "SRP_PRECOMPILER" then return + +#region Declarations + +UsesGoSubList = 0 +UsesEventNames = 0 +UsesTestResult = 0 +UsesEncoding = 0 +UsesUnpackTarget = 0 +UsesUnpackSkip = 0 +HasLoops = 0 + +EventNames = "" ; // List of all events +ServiceNames = "" ; // List of all services +APINames = "" ; // List of all Web APIs +ServicePos = 0 ; // The current position of the current service in ServiceNames (counts services essentially) +APIPos = 0 ; // The current position of the current API in APINames (counts APIs essentially) +ReturnVar = "" ; // The return variable for the store procedure +CommonsAdded = No$ ; // Keeps track as to whether or not the commons have been added yet +MaxNumParams = 0 ; // Keeps track of the number of generic parameters needed to cover all events or services +AutoParamsNeeded = No$ ; // Keeps track as to whether or not there is an auto parameter keyword +ReferenceParams = "" ; // Keeps track of servce parameters using pass-by-reference +InCommentBlock = No$ ; // Keeps track as to whether or not the current line is within a comment block +TestLineNumbers = "" ; // Keeps track of line numbers of test modules + +// The metadata types: SERVICE or TEST +Type = "" + +// The SERVICE metadata +DefaultParams = 0 ; // The service's default parameters +ServiceParamPos = 0 ; // Indicates position of the parameter to receive the service name +Param1Pos = 0 ; // Indicates the position of the first generic parameter +ServiceNamesQuoted = 1 ; // Service parameters are always quoted when using precompiler +ParamOptions = "" ; // Reserved. (Unused at the moment.) +ServiceParams = "" ; // The parameter lists for each service +ServiceParamOptions = "" ; // The parameter options for each service parameter +APIParams = "" ; // The parameter lists for each API +APIParamOptions = "" ; // The parameter options for each API parameter +OptionNames = "" ; // The list of all options, by name +OptionLists = "" ; // The option lists associated to the above option names +OptionQuoteFlags = "" ; // The option lists' quoted flag associated to the above option names + +// We need a stack to handle nest for-each and for loops. When a for-each loop is encountered, +// we push "FOREACH" to the stack. When a regular for loop is encountered, we push "FOR" to the +// stack. So, when we encounter "NEXT" statments, we know whether to handle them or ignore them +NextStack = "" +NextStackCount = 0 + +#endregion + +// Determine if this version of OI supports UTF8 op codes +SupportsUTF8Ops = Field(Get_Property("SYSTEM", "VERSION")<2>, ".", 1, 2) GE "9.2" +If SupportsUTF8Ops then + SupportsUTF8Ops = Xlate("SYSENV", "SRP_EDITOR_NO_UTF8_OPS", "", "X") NE 1 +end + +// Break the code into an array of lines and create a blank array of lines for the new code +Lines = Routine +NewLines = "" +NumLines = DCount(Lines, @FM) +ParseState = "" + +// Loop through each line +For iLine = 1 to NumLines + + Line = Lines + GoSub ParseLine + Begin Case + + // First line of code + Case iLine EQ 1 + + // Required @SERVICE parameter (if service) + Pos = IndexC(Line, "@SERVICE", 1) + If Pos GT 0 then + If Trim(Line[Pos, ")"][1, ","]) _EQC "@SERVICE" then + Line[Pos, 8] = "Service" + ServiceParamPos = DCount(Line[1, Pos], ",") + IsServiceModule = 1 + end + end + + // Required @TEST parameter (if unit test module) + Pos = IndexC(Line, "@TEST", 1) + If Pos GT 0 then + If Trim(Line[Pos, ")"][1, ","]) _EQC "@TEST" then + Line[Pos, 5] = "TestName" + ServiceParamPos = DCount(Line[1, Pos], ",") + UsesTestResult = 1 + end + end + + // Required @API parameter (if API module) + Pos = IndexC(Line, "@API", 1) + If Pos GT 0 then + If Trim(Line[Pos, ")"][1, ","]) _EQC "@API" then + Line[Pos, 4] = "Api" + ServiceParamPos = DCount(Line[1, Pos], ",") + IsServiceModule = 1 + end + end + + // Optional @PARAMS parameter + Pos = IndexC(Line, "@PARAMS", 1) + If Pos GT 0 then + If Trim(Line[Pos, ")"][1, ","]) _EQC "@PARAMS" then + Line[Pos, 7] = "%%AUTOPARAMLIST%%" + AutoParamsNeeded = Yes$ + end + end + Locate "(" in Tokens using @FM setting ParenPos then + ParamList = SRP_String("DetokenizeCode", Field(Tokens, @FM, ParenPos, NumTokens)) + GoSub CleanParamList + end else + ParamList = "" + end + DefaultParams = ParamList + Convert @FM to @SVM in DefaultParams + Convert @Lower.Case to @Upper.Case in ParamList + Locate "PARAM1" in ParamList using @FM setting Param1Pos else + Locate "@PARAMS" in ParamList using @FM setting Param1Pos else null + end + + // Get the proc name as it is written + CasedProcName = Line[1, "("][-1, "B "] + + NewLines<-1> = Line + + // Replace pragma with common statement. This is a much better place for it, assuming the pragma is at the top + Case Trim(Line[1, 15]) _EQC "*pragma precomp" + NewLines<-1> = "%%SRPAUTO_COMMON%%" + + // Ignore all assignment statements + Case IsAssignmentOrMethod + NewLines<-1> = Line + + // Check for For-Each loop + Case Tokens<1> _EQC "FOR" + LineFormat = "FOR,EACH,*,IN,*,USING|SETTING,*,SETTING" + GoSub FormatTokens + If Tokens<2> _EQC "EACH" AND Tokens<4> _EQC "IN" then + HasLoops = 1 + ElementVar = Tokens<3> + ListVar = Tokens<5> + CounterVar = "" + NextToken = 6 + If Tokens _EQC "USING" then + Delimiter = Tokens + NextToken += 2 + end else + Delimiter = '@FM' + end + If Tokens _EQC "SETTING" then + CounterVar = Tokens + NextToken += 2 + end + NewLine = '' + // Make UTF-8 compatible (thanks Matt Crozier) + NewLine<-1> = 'SRP_Precompiler_LoopStack@<-1> = SRP_Precompiler_LoopPos@:@VM:SRP_Precompiler_LoopLen@;' + NewLine<-1> = 'SRP_Precompiler_LoopPos@ = 1;' + If Len(CounterVar) then + NewLine<-1> = CounterVar:' = 0;' + end + If SupportsUTF8Ops then + NewLine<-1> = 'SRP_Precompiler_LoopLen@ = getByteSize(':ListVar:');' + NewLine<-1> = 'Loop;' + NewLine<-1> = ElementVar:' = ':ListVar:'[SRP_Precompiler_LoopPos@, "F":':Delimiter:', 1];' + NewLine<-1> = 'SRP_Precompiler_LoopPos@ = bCol2() + 1' + If Len(CounterVar) then + NewLine<-1> = ';':CounterVar:' += 1' + end + end else + NewLine<-1> = 'SRP_Precompiler_LoopLen@ = Len(':ListVar:');' + NewLine<-1> = 'Loop;' + NewLine<-1> = ElementVar:' = ':ListVar:'[SRP_Precompiler_LoopPos@, "F":':Delimiter:'];' + NewLine<-1> = 'SRP_Precompiler_LoopPos@ = Col2() + 1' + If Len(CounterVar) then + NewLine<-1> = ';':CounterVar:' += 1' + end + end + If Tokens _EQC "UNTIL" OR Tokens _EQC "WHILE" then + Pos = IndexC(Line, Tokens, 1) + If Pos GT 0 then + NewLine := ';':Line[Pos, LenLine] + end else + NewLine := ';':Field(Tokens, @FM, NextToken, NumTokens) + end + end + GoSub CommitNewLine + NextStack<-1> = "FOREACH" + NextStackCount += 1 + end else + NewLines<-1> = Line + NextStack<-1> = "FOR" + NextStackCount += 1 + end + + // Check for Next statement to match with For-Each loop + Case Tokens<1> _EQC "NEXT" AND NextStackCount GT 0 + NextData = NextStack[-1, "B":@FM] + NextType = NextData<1, 1> + NextStack = If Col1() GT 1 then NextStack[1, Col1() - 1] else "" + NextStackCount -= 1 + Begin Case + Case NextType EQ "FOREACH" + HasLoops = 1 + NewLine = '' + NewLine<-1> = 'Until SRP_Precompiler_LoopPos@ GT SRP_Precompiler_LoopLen@;' + NewLine<-1> = 'Repeat;' + If SupportsUTF8Ops then + NewLine<-1> = 'SRP_Precompiler_LoopLen@ = SRP_Precompiler_LoopStack@[-1, "B":@VM, 1];' + NewLine<-1> = 'SRP_Precompiler_LoopPos@ = SRP_Precompiler_LoopStack@[bCol1() - 1, "B":@FM, 1];' + NewLine<-1> = 'SRP_Precompiler_LoopStack@ = If bCol1() GT 1 then SRP_Precompiler_LoopStack@[1, bCol1() - 1, 1] else ""' + end else + NewLine<-1> = 'SRP_Precompiler_LoopLen@ = SRP_Precompiler_LoopStack@[-1, "B":@VM];' + NewLine<-1> = 'SRP_Precompiler_LoopPos@ = SRP_Precompiler_LoopStack@[Col1() - 1, "B":@FM];' + NewLine<-1> = 'SRP_Precompiler_LoopStack@ = If Col1() GT 1 then SRP_Precompiler_LoopStack@[1, Col1() - 1] else ""' + end + GoSub CommitNewLine + Case 1 + NewLines<-1> = Line + End Case + + // Check for final return value, we'll use it to make sure it's always assigned + Case Tokens<1> _EQC "RETURN" AND Len(ReturnVar) EQ 0 + ReturnVar = Tokens<2> + If Tokens<3> _EQC "OR" OR Tokens<3> _EQC "ELSE" then + NewLines<-1> = 'If Assigned(':ReturnVar:') then Return ':ReturnVar:' else Return ':Tokens<4>:'' + end else + NewLines<-1> = Line + end + + // Check for GoToEvent + Case Tokens<1> _EQC "GOTOEVENT" + UsesGoSubList = 1 + UsesEventNames = 1 + LineFormat = "GOTOEVENT,*,FOR,*,ELSE" + GoSub FormatTokens + If Tokens<3> _EQC "FOR" then + NewLine = '' + NewLine<-1> = '%%SRPAUTO_EVENTLIST%%;' + NewLine<-1> = 'SRP_Precompiler_EventEvent@ = ':Tokens<2>:';' + NewLine<-1> = 'SRP_Precompiler_EventCtrl@ = Field(':Tokens<4>:', ".", 2, 9);' + NewLine<-1> = 'SRP_Precompiler_GoSubTarget@ = (If Len(SRP_Precompiler_EventCtrl@) then SRP_Precompiler_EventCtrl@ else "WINDOW"):".":SRP_Precompiler_EventEvent@;' + NewLine<-1> = 'Convert @Lower.Case to @Upper.Case in SRP_Precompiler_GoSubTarget@;' + NewLine<-1> = 'Locate SRP_Precompiler_GoSubTarget@ in SRP_Precompiler_GoSubList@ using "," setting SRP_Precompiler_GoSubPos@ then' + NewLine<-1> = '%%SRPAUTO_EVENTGOSUBLIST%%' + If Tokens<5> _EQC "ELSE" then NewLine<-1> = 'else' else NewLine<-1> = 'else NULL' + GoSub CommitNewLine + end + + // Check for event + Case Tokens<1> _EQC "EVENT" + EventName = Tokens<2> + EventNames<-1> = EventName + If Tokens<3> EQ "(" then + ParamList = SRP_String("DetokenizeCode", Field(Tokens, @FM, 3, NumTokens)) + GoSub CleanParamList + MaxNumParams = Max(MaxNumParams, NumParams) + If NumParams GT 0 then + InitEventParams = "" + For iParam = 1 to NumParams + InitEventParams<-1> = Trim(ParamList):' = (If Assigned(Param':iParam:') then Param':iParam:' else "")' + Next iParam + Convert @FM to ";" in InitEventParams + NewLines<-1> = EventName:': | ':InitEventParams + end else + NewLines<-1> = EventName:':' + end + end else + NewLines<-1> = EventName:':' + end + + // Check for end of event + Case Tokens<1> _EQC "END" AND Tokens<2> _EQC "EVENT" + NewLines<-1> = 'return' + + // Check for GoToService + Case Tokens<1> _EQC "GOTOSERVICE" + UsesGoSubList = 1 + Type = "SERVICE" + NewLine = '' + NewLine<-1> = '%%SRPAUTO_SERVICELIST%%;' + NewLine<-1> = 'SRP_Precompiler_GoSubTarget@ = (If Assigned(Service) then Service else "");' + NewLine<-1> = 'Convert @Lower.Case to @Upper.Case in SRP_Precompiler_GoSubTarget@;' + NewLine<-1> = 'Locate SRP_Precompiler_GoSubTarget@ in SRP_Precompiler_GoSubList@ using "," setting SRP_Precompiler_GoSubPos@ then' + NewLine<-1> = '%%SRPAUTO_SERVICEGOSUBLIST%%' + If Tokens<2> _EQC "ELSE" then NewLine<-1> = 'else' else NewLine<-1> = 'else NULL' + GoSub CommitNewLine + + // Check for service + Case Tokens<1> _EQC "SERVICE" + ServicePos += 1 + ServiceName = Tokens<2> + ServiceNames<-1> = ServiceName + If Tokens<3> EQ "(" then + ParamList = SRP_String("DetokenizeCode", Field(Tokens, @FM, 3, NumTokens)) + GoSub CleanParamList + MaxNumParams = Max(MaxNumParams, NumParams) + InitServiceParams = "" + ReferenceParams = "" + For iParam = 1 to NumParams + DefaultParamValue = '""' + ParamSuffix = "" + Param = Trim(ParamList) + If Param[1, 4] _EQC "REF " then + Param = Trim(Param[5, Len(Param)][1, "="]) + ReferenceParams<-1> = Param:@VM:iParam + IsRef = Yes$ + end else + IsRef = No$ + end + If Index(Param, "=", 1) GT 0 then + ParamValue = Trim(Field(Param, "=", 2)) + Param = Trim(Field(Param, "=", 1)) + If Num(ParamValue) OR ParamValue[1, 1] EQ "'" OR ParamValue[1, 1] EQ '"' OR ParamValue[1, 1] EQ '@' then + DefaultParamValue = ParamValue + ParamSuffix = " = ":ParamValue + end else + If Index(ParamValue, "[", 1) then + ServiceParamOptions<1, ServicePos, iParam> = ParamValue[1, "["] + DefaultParamValue = Trim(ParamValue[Col2() + 1, "]"]) + ParamSuffix = " = ":DefaultParamValue + end else + ServiceParamOptions<1, ServicePos, iParam> = ParamValue + end + end + end else + ServiceParamOptions<1, ServicePos, iParam> = "" + end + If IsRef then + ServiceParams<1, ServicePos, iParam> = "Ref ":Param:ParamSuffix + end else + ServiceParams<1, ServicePos, iParam> = Param:ParamSuffix + end + InitServiceParams<-1> = Param:' = If Assigned(Param':iParam:') then Param':iParam:' else ':DefaultParamValue + Next iParam + Convert @FM to ";" in InitServiceParams + If Len(Trim(InitServiceParams)) then + NewLines<-1> = ServiceName:': | ':InitServiceParams + end else + NewLines<-1> = ServiceName:':' + end + Convert @FM to @SVM in ParamList + end else + NewLines<-1> = ServiceName:':' + end + + // Check for end of service + Case Tokens<1> _EQC "END" AND Tokens<2> _EQC "SERVICE" + ReturnLine = "" + NumParams = DCount(ReferenceParams, @FM) + For iParam = 1 to NumParams + Param = ReferenceParams + ParamNum = ReferenceParams + ReturnLine<-1> = 'Param':ParamNum:' = ':Param + Next iParam + ReturnLine<-1> = 'return' + Convert @FM to ";" in ReturnLine + NewLines<-1> = ReturnLine + + // Check for GoToAPI + Case Tokens<1> _EQC "GOTOAPI" + UsesGoSubList = 1 + Type = "API" + NewLine = '' + NewLine<-1> = '%%SRPAUTO_SERVICELIST%%;' + NewLine<-1> = 'SRP_Precompiler_GoSubTarget@ = (If Assigned(API) then API else "");' + NewLine<-1> = 'Convert @Lower.Case to @Upper.Case in SRP_Precompiler_GoSubTarget@;' + NewLine<-1> = 'Locate SRP_Precompiler_GoSubTarget@ in SRP_Precompiler_GoSubList@ using "," setting SRP_Precompiler_GoSubPos@ then' + NewLine<-1> = '%%SRPAUTO_SERVICEGOSUBLIST%%' + If Tokens<2> _EQC "ELSE" then NewLine<-1> = 'else' else NewLine<-1> = 'else NULL' + GoSub CommitNewLine + + // Check for service + Case Tokens<1> _EQC "API" + ServicePos += 1 + ServiceName = Tokens<2> + ServiceNames<-1> = ServiceName + If Tokens<3> EQ "(" then + ParamList = SRP_String("DetokenizeCode", Field(Tokens, @FM, 3, NumTokens)) + GoSub CleanParamList + MaxNumParams = Max(MaxNumParams, NumParams) + InitServiceParams = "" + ReferenceParams = "" + For iParam = 1 to NumParams + DefaultParamValue = '""' + ParamSuffix = "" + Param = Trim(ParamList) + If Param[1, 4] _EQC "REF " then + Param = Trim(Param[5, Len(Param)][1, "="]) + ReferenceParams<-1> = Param:@VM:iParam + IsRef = Yes$ + end else + IsRef = No$ + end + If Index(Param, "=", 1) GT 0 then + ParamValue = Trim(Field(Param, "=", 2)) + Param = Trim(Field(Param, "=", 1)) + If Num(ParamValue) OR ParamValue[1, 1] EQ "'" OR ParamValue[1, 1] EQ '"' OR ParamValue[1, 1] EQ '@' then + DefaultParamValue = ParamValue + ParamSuffix = " = ":ParamValue + end else + If Index(ParamValue, "[", 1) then + ServiceParamOptions<1, ServicePos, iParam> = ParamValue[1, "["] + DefaultParamValue = Trim(ParamValue[Col2() + 1, "]"]) + ParamSuffix = " = ":DefaultParamValue + end else + ServiceParamOptions<1, ServicePos, iParam> = ParamValue + end + end + end else + ServiceParamOptions<1, ServicePos, iParam> = "" + end + If IsRef then + ServiceParams<1, ServicePos, iParam> = "Ref ":Param:ParamSuffix + end else + ServiceParams<1, ServicePos, iParam> = Param:ParamSuffix + end + InitServiceParams<-1> = Param:' = If Assigned(Param':iParam:') then Param':iParam:' else ':DefaultParamValue + Next iParam + Convert @FM to ";" in InitServiceParams + If Len(Trim(InitServiceParams)) then + NewLines<-1> = ServiceName:': | ':InitServiceParams + end else + NewLines<-1> = ServiceName:':' + end + Convert @FM to @SVM in ParamList + end else + NewLines<-1> = ServiceName:':' + end + + // Check for end of API + Case Tokens<1> _EQC "END" AND Tokens<2> _EQC "API" + ReturnLine = "" + NumParams = DCount(ReferenceParams, @FM) + For iParam = 1 to NumParams + Param = ReferenceParams + ParamNum = ReferenceParams + ReturnLine<-1> = 'Param':ParamNum:' = ':Param + Next iParam + ReturnLine<-1> = 'return' + Convert @FM to ";" in ReturnLine + NewLines<-1> = ReturnLine + + // Parameter Options + Case Tokens<1> _EQC "OPTIONS" AND Alpha(Tokens<2>[1, 1]) AND Tokens<3> EQ "=" + CurrOptionList = "" + IsQuoted = No$ + FirstItem = Tokens<4> + IsQuoted = (FirstItem[1, 1] EQ FirstItem[-1, 1] AND (FirstItem[1, 1] EQ '"' OR FirstItem[1, 1] EQ "'")) + For iToken = 4 to NumTokens + Token = Trim(Tokens) + If Token NE "," then + If IsQuoted then + CurrOptionList<1, 1, -1> = Token[2, Len(Token) - 2] + end else + CurrOptionList<1, 1, -1> = Token + end + end + Next iToken + OptionNames<1, -1> = Tokens<2> + OptionLists<1, -1> = CurrOptionList + OptionQuoteFlags<1, -1> = IsQuoted + NewLines<-1> = "" + + // Check for GoToTest + Case Tokens<1> _EQC "GOTOTEST" + UsesGoSubList = 1 + Type = "TEST" + NewLine = '' + NewLine<-1> = '%%SRPAUTO_SERVICELIST%%;' + NewLine<-1> = 'SRP_Precompiler_GoSubTarget@ = (If Assigned(TestName) then TestName else "");' + NewLine<-1> = 'Convert @Lower.Case to @Upper.Case in SRP_Precompiler_GoSubTarget@;' + NewLine<-1> = 'Locate SRP_Precompiler_GoSubTarget@ in SRP_Precompiler_GoSubList@ using "," setting SRP_Precompiler_GoSubPos@ then' + NewLine<-1> = '%%SRPAUTO_SERVICEGOSUBLIST%%' + GoSub CommitNewLine + + // Check for test + Case Tokens<1> _EQC "TEST" + ServicePos += 1 + ServiceName = Tokens<2> + ServiceNames<-1> = ServiceName + TestLineNumbers<-1> = iLine + NewLines<-1> = ServiceName:':' + + // Check for end of test + Case Tokens<1> _EQC "END" AND Tokens<2> _EQC "TEST" + NewLines<-1> = 'return' + + // Check for Assert statement + Case Tokens<1> _EQC "ASSERT" + LineFormat = "ASSERT,*,EQUALS,*,USING,*" + GoSub FormatTokens + AssertExpression = Tokens<2> + If Tokens<3> _EQC "EQUALS" then + UsesTestResult = 1 + UsesEncoding = 1 + Expected = Tokens<4> + If Expected[1, 1] EQ '\' AND Expected[-1, 1] EQ '\' then + ExpectedFormatted = '"':Expected[2, Len(Expected) - 2]:'"' + WasHex = 1 + end else + ExpectedFormatted = Expected + WasHex = 0 + end + NewLine = 'SRP_Precompiler_TestResult@ = (':AssertExpression:');' + If Tokens<5> _EQC "USING" then + Format = Tokens<6> + If WasHex then + NewLine<-1> = 'If SRP_Precompiler_TestResult@ NE ':Expected:' then' + end else + NewLine<-1> = 'If SRP_Precompiler_TestResult@ NE IConv(':Expected:', ':Format:') then' + end + NewLine<-1> = ReturnVar:' = BASE64ENCODE(SRP_Precompiler_TestResult@):@FM:':iLine:':@FM:BASE64ENCODE(':ExpectedFormatted:'):@FM:':Format:';' + end else + NewLine<-1> = 'If SRP_Precompiler_TestResult@ NE (':Expected:') then' + NewLine<-1> = ReturnVar:' = BASE64ENCODE(SRP_Precompiler_TestResult@):@FM:':iLine:':@FM:BASE64ENCODE(':ExpectedFormatted:');' + end + NewLine<-1> = 'return' + end else + AssertCapture = AssertExpression + Swap '"' with '":':"'":'"':"'":':"' in AssertCapture + NewLine = 'If Not(':AssertExpression:') then' + NewLine<-1> = ReturnVar:' = "':AssertCapture:'":@FM:':iLine:';' + NewLine<-1> = 'return' + end + GoSub CommitNewLine + + // Check for unpacking syntax + Case Tokens<1> _EQC "(" + NewLine = "" + Success = 0 + Done = 0 + Delim = '@FM' + NextPos = If SupportsUTF8Ops then 'bCol2() + 1' else 'Col2() + 1' + For iToken = 2 to NumTokens Until Done + VarName = Tokens + Pos = If iToken EQ 2 then 1 else NextPos + If VarName _EQC 'Null' OR VarName EQ '_' OR VarName EQ ',' then + UsesUnpackSkip = 1 + NewLine<-1> = 'SRP_Precompiler_UnpackSkip@ = %UNPACKTARGET%[':Pos:',%UNPACKDELIM%];' + If Varname EQ ',' then iToken -= 1 + end else + NewLine<-1> = VarName:' = %UNPACKTARGET%[':Pos:',%UNPACKDELIM%];' + end + NextToken = Tokens + If NextToken EQ ',' then + iToken += 1 + end else if NextToken EQ ')' then + iToken += 1 + Done = 1 + end else + Done = 1 + end + Next iToken + If Tokens EQ "using" then + Delim = Tokens + iToken += 2 + end + If Tokens EQ '=' then + iToken += 1 + If iToken = NumTokens then + Swap "%UNPACKTARGET%" with Tokens in NewLine + end else + UnpackExpression = SRP_String("DetokenizeCode", Field(Tokens, @FM, iToken, NumTokens)) + NewLine = 'SRP_Precompiler_UnpackTarget@ = ':UnpackExpression:';':@FM:NewLine + Swap "%UNPACKTARGET%" with 'SRP_Precompiler_UnpackTarget@' in NewLine + UsesUnpackTarget = 1 + end + Success = 1 + end + If Success then + If SupportsUTF8Ops then + Swap "%UNPACKDELIM%" with Delim:', 1' in NewLine + end else + Swap "%UNPACKDELIM%" with Delim in NewLine + end + end else + NewLine = Line + end + GoSub CommitNewLine + + // This directive is used by SRP Editor. The Precompiler just strips it away + Case Tokens<1> _EQC "#" AND Tokens<2> _EQC "WINDOW" AND NumTokens EQ 3 + NewLines<-1> = "" + + // Otherwise, keep the line as is + Case 1 + NewLines<-1> = Line + + End Case + +Next iLine + +// New code +Routine = NewLines + +// Insert the event names +GoSubListVar = 'SRP_Precompiler_GoSubList@' +GoSubNames = EventNames +GoSubPlaceholders = "%%SRPAUTO_EVENTLIST%%":@FM:"%%SRPAUTO_EVENTGOSUBLIST%%" +If Len(EventNames) then + GoSub CreateGoSubList +end else + GoSub RemoveGoSubList +end + +// Insert the service names +GoSubListVar = 'SRP_Precompiler_GoSubList@' +GoSubNames = ServiceNames +GoSubPlaceholders = "%%SRPAUTO_SERVICELIST%%":@FM:"%%SRPAUTO_SERVICEGOSUBLIST%%" +If Len(ServiceNames) then + GoSub CreateGoSubList +end else + GoSub RemoveGoSubList +end + +// Insert the API names +* GoSubListVar = 'SRP_Precompiler_GoSubList@' +* GoSubNames = APINames +* GoSubPlaceholders = "%%SRPAUTO_APILIST%%":@FM:"%%SRPAUTO_APIGOSUBLIST%%" +* If Len(APINames) then +* GoSub CreateGoSubList +* end else +* GoSub RemoveGoSubList +* end + +// Insert Auto params +If AutoParamsNeeded then + NumParams = Max(1, MaxNumParams) + ParamList = "" + For iParam = 1 to NumParams + ParamList<-1> = "Param":iParam + Next iParam + Convert @FM to "," in ParamList + Swap "%%AUTOPARAMLIST%%" with ParamList in Routine +end + +// Insert commons +Vars = '' +If HasLoops then + Vars<-1> = 'SRP_Precompiler_LoopPos@':@FM:'SRP_Precompiler_LoopLen@':@FM:'SRP_Precompiler_LoopStack@' +end +If UsesGoSubList then + Vars<-1> = 'SRP_Precompiler_GoSubTarget@':@FM:'SRP_Precompiler_GoSubList@':@FM:'SRP_Precompiler_GoSubPos@' +end +If UsesEventNames then + Vars<-1> = 'SRP_Precompiler_EventEvent@':@FM:'SRP_Precompiler_EventCtrl@' +end +If UsesTestResult then + Vars<-1> = 'SRP_Precompiler_TestResult@' +end +If UsesUnpackTarget then + Vars<-1> = 'SRP_Precompiler_UnpackTarget@' +end +If UsesUnpackSkip then + Vars<-1> = 'SRP_Precompiler_UnpackSkip@' +end +If Len(Vars) then + CommonLine = "" + If UsesEncoding then CommonLine := "Declare function BASE64ENCODE;" + Swap @FM with ', ' in Vars + CommonLine := 'Common /SRP_Precompiler_':CasedProcName:'/ ':Vars + Swap "%%SRPAUTO_COMMON%%" with CommonLine in Routine +end else + Swap "%%SRPAUTO_COMMON%%" with "" in Routine +end +// Only save the metadata if we had at least one occurence of "SERVICES_SIGNATURE" +// AND if we not currently inside of BLINT +Locate "BLINT" in RetStack() using @FM setting DummyPos else + Open "SYSENV" to hTable then + + // Store the service metadata + Common /SRP_EDITOR_PRECOMPILER_HELPERS/ Frame@, ID@ + If Len(ID@) then + AppName = ID@[1, "*"] + ProcName = ID@[-1, "B*"] + end else + AppName = @AppID<1> + ProcName = ProgName + end + + // If it's a TEST, then register it + If Type EQ "TEST" then + Call SRP_Editor_UnitTest_Services("Register", "SRP_EDITOR", CasedProcName, ServiceNames, TestLineNumbers, AppName) + end else + + Convert @FM to @VM in ServiceNames + Record = Type:@FM:DefaultParams:@FM:ServiceParamPos:@FM:Param1Pos:@FM:ServiceNamesQuoted:@FM:ParamOptions:@FM:ServiceNames:@FM:ServiceParams:@FM:ServiceParamOptions:@FM:OptionNames:@FM:OptionLists:@FM:OptionQuoteFlags + If AppName EQ "SYSPROG" then + Key = "SRP_EDITOR_METADATA*":ProcName + end else + Key = "SRP_EDITOR_METADATA*":ProcName:"*":AppName + end + If Len(Type) then + Write Record to hTable, Key else NULL + If Len(Frame@) then + Call Send_Message(Frame@:".OLE_EDITOR", "OLE.MetaDataRequestedResponse", ProcName, Record) + end + end else + Delete hTable, Key else NULL + If Len(Frame@) then + Call Send_Message(Frame@:".OLE_EDITOR", "OLE.RemoveMetaData", ProcName) + end + end + + end + + end +end + +return + +ParseLine: +// Uses: [in]Line, [out]Tokens, [out]NumTokens + + LenLine = Len(Line) + Tokens = SRP_String("TokenizeCode", Line, "None", No$, ParseState) + NumTokens = DCount(Tokens, @FM) + GoSub IsAssignmentOrMethod + +return + +CommitNewLine: +// Uses: [in]NewLine, [in]NewLines + + If ProgName = "__TEST" then + Swap @FM with \0D0A\ in NewLine + end else + Convert @FM to " " in NewLine + end + NewLines<-1> = NewLine + +return + +CleanParamList: +// Uses: [in]ParamList, [out]NumParams + + Swap ", " with @FM in ParamList + Convert ",()" to @FM in ParamList +* ParamList = SRP_Array("Clean", Trim(ParamList)) + ParamList = SRP_Clean_Array(Trim(ParamList), @FM) + NumParams = DCount(ParamList, @FM) + +return + +CreateGoSubList: +// Uses: [in] GoSubListVar, [in] GoSubNames, [in] GoSubPlaceholders + + GoSubNamesLines = '' + GoSubNamesLine = GoSubListVar:' = "' + NumGoSubNames = DCount(GoSubNames, @FM) + If NumGoSubNames GT 0 then + For iGoSubName = 1 to NumGoSubNames + GoSubName = GoSubNames + Convert @Lower.Case to @Upper.Case in GoSubName + If Len(GoSubNamesLine) + Len(GoSubName) > 200 then + GoSubNamesLine[-1, 1] = ',"' + If ProgName = "__TEST" then + GoSubNamesLines<-1> = GoSubNamesLine:';':\0D0A\ + end else + GoSubNamesLines<-1> = GoSubNamesLine:';' + end + GoSubNamesLine = GoSubListVar:' := "' + end + GoSubNamesLine := GoSubName:',' + Next iGoSubName + GoSubNamesLine[-1, 1] = '"' + end else + GoSubNamesLine := '"' + end + GoSubNamesLines<-1> = GoSubNamesLine + Convert @FM to " " in GoSubNamesLines + Swap GoSubPlaceholders<1> with GoSubNamesLines in Routine + + NumGoSubNames = DCount(GoSubNames, @FM) + NumChunks = Int(NumGoSubNames / 255) + 1 + If NumChunks EQ 1 then + Swap @FM with ", " in GoSubNames + Swap GoSubPlaceholders<2> with GoSubNames in Routine + end else + Stmt = "Begin Case; " + For i = 1 to NumChunks + Temp = Field(GoSubNames, @FM, ((i - 1) * 255) + 1, 255) + Swap @FM with ", " in Temp + If i EQ NumChunks then + Stmt := "Case 1; On SRP_Precompiler_GoSubPos@ GoSub ":Temp:"; " + end else + Stmt := "Case SRP_Precompiler_GoSubPos@ LE ":(i * 255):"; On SRP_Precompiler_GoSubPos@ GoSub ":Temp:"; " + end + Next i + Stmt := "End Case" + Swap GoSubPlaceholders<2> with Stmt in Routine + end +Return + +RemoveGoSubList: +// Uses: [in] GoSubListVar, [in] GoSubNames, [in] GoSubPlaceholders + + PlaceholderPos = Index(Routine, GoSubPlaceholders<1>, 1) + If PlaceholderPos GT 0 then + LenToDelete = Len(Routine[PlaceholderPos, @FM]) + Routine[PlaceholderPos, LenToDelete] = "If 1 then" + end + +Return + +IsAssignmentOrMethod: +// Uses: [in]Tokens, [in]NumTokens, [out]IsAssignmentOrMethod + + Locate Tokens<2> in "= := += -=" using " " setting Pos then + IsAssignmentOrMethod = Yes$ + end else + If Trim(Tokens<2>)[1, 1] EQ "(" then + IsAssignmentOrMethod = Yes$ + end else + IsAssignmentOrMethod = No$ + end + end + +return + +FormatTokens: +// Uses: [in] LineFormat, [in\out] Tokens, [in\out] NumTokens + + // We are going to merge some tokens so more complication expressions can be supported. + // We do this by merging everything between required keywords, as defined in LineFormat + FormatValid = Yes$ + NumFormatItems = DCount(LineFormat, ",") + + For iItem = 1 to NumFormatItems while FormatValid + CurrKeyword = Field(LineFormat, ",", iItem, 1) + If CurrKeyword NE "*" AND iItem GT 1 then + Done = No$ + Loop While iItem LE NumTokens + CurrToken = Field(Tokens, @FM, iItem, 1) + Convert @Lower.Case to @Upper.Case in CurrToken + Locate CurrToken in CurrKeyword using "|" setting FormatPos then + Done = Yes$ + end else + Tokens[Col1(), 1] = @VM + NumTokens -= 1 + end + Until Done + Repeat + end + Next iItem + + // Now de-tokenize each field + NumTokens = DCount(Tokens, @FM) + For iToken = 1 to NumTokens + Tokens = SRP_String("DetokenizeCode", Tokens, @VM) + Next iToken + +return diff --git a/SYSPROG/STPROC/SRP_SET_PROPERTY.txt b/SYSPROG/STPROC/SRP_SET_PROPERTY.txt new file mode 100644 index 0000000..ed97f64 --- /dev/null +++ b/SYSPROG/STPROC/SRP_SET_PROPERTY.txt @@ -0,0 +1,82 @@ +Compile Function SRP_Set_Property(CtrlList, PropList, ValueList, AuxList, Window, AllPropsPerCtrl, Delim) + +************************************************************************************************ +* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to +* be copied without written permission from SRP Computer Solutions, Inc. +* +* Name : SRP_Set_Property +* +* Description: Sets controls properties if one of three ways: +* - 1 to 1: Sets one property to a single control +* - 1 to Many: Sets multiple properties for each control +* - Many to 1: Sets the same property for multiple controls +* +* Parameters: +* CtrlList [in] -- The list of controls whose property(s) are to be set +* PropList [in] -- The list of properties +* ValueList [in] -- The list of property values +* AuxList [in] -- The list of auxiliary values +* Window [in] -- If not empty, then this is prepended to each control is the ctrl list: default = "" +* AllPropsPerCtrl [in] -- If TRUE, the property list is applied to each control: default = 0 +* Delim [in] -- The lists delimiter: default = "~" +* +* Returns: +* The previous property value(s) +* +* History (Date, Initials, Notes) +* 04/06/2004 KRF Initial Programmer +* +************************************************************************************************ + +Declare function Set_Property, FieldStore + +* Prepare input +If Assigned(CtrlList) else CtrlList = "" +If Assigned(PropList) else PropList = "" +If Assigned(ValueList) else ValueList = "" +If Assigned(AuxList) else AuxList = "" +If Assigned(Window) else Window = "" +If Assigned(AllPropsPerCtrl) else AllPropsPerCtrl = 0 +If Assigned(Delim) else Delim = "~" + +* Prepare lists +Convert Delim to @RM in CtrlList +Convert Delim to @RM in PropList +Convert Delim to @RM in ValueList +Convert Delim to @RM in AuxList + +* If "1 to Many" then alter the ctrl list to meet OI's Set_Property specs +If AllPropsPerCtrl then + NumCtrls = Count(CtrlList, @RM) + (CtrlList NE "") + NumProps = Count(PropList, @RM) + (PropList NE "") + + * Expand the control list be repeating each control by the number of properties + OldCtrlList = CtrlList + CtrlList = "" + For i = 1 to NumCtrls + CtrlList := Str(Field(OldCtrlList, @RM, i):@RM, NumProps) + If i LT NumCtrls then CtrlList := @RM + next i + + * Expand the property list to repeat the list for each control + If NumCtrls GT 1 then + PropList = Str(PropList:@RM, NumCtrls) + PropList[-1, 1] = "" + end +end + +* Prepend Window Name +If Window then + Window := "." + NumCtrls = Count(CtrlList, @RM) + (CtrlList NE "") + For i = 1 to NumCtrls + CurrCtrl = Field(CtrlList, @RM, i) + CtrlList = FieldStore(CtrlList, @RM, i, 1, Window:CurrCtrl) + next i +end + +* Call the Set_Property +Ans = Set_Property(CtrlList, PropList, ValueList, AuxList) + +Return Ans diff --git a/SYSPROG/STPROC/SRP_SET_PROP_ARRAY.txt b/SYSPROG/STPROC/SRP_SET_PROP_ARRAY.txt new file mode 100644 index 0000000..a029c1e --- /dev/null +++ b/SYSPROG/STPROC/SRP_SET_PROP_ARRAY.txt @@ -0,0 +1,356 @@ +Compile Subroutine SRP_Set_Prop_Array(PropArray) + +************************************************************************************************ +* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to +* be copied without written permission from SRP Computer Solutions, Inc. +* +* Name : SRP_Set_Prop_Array +* +* Description: +* +* Sets multiple properties over multiple controls in one data structure. The +* structure is in a column/row format where rows are @FM delimited and columns +* are @VM delimited. The first row always specifies the properties. Each property +* may optionally include the angle-bracket syntax denoting that a particular +* column of values belongs in a Field, Value, etc. of a given procedure. For +* example, "SIZE<1>" indicates that all values represent the controls X position. +* This, "SIZE<2>":@VM:"SIZE<3>":@VM:"SIZE<4>" could be added with "SIZE<1>" to +* produce all fields of the property. +* +* The first column is always the control name with the left most 'cell' being the +* window name to which the controls belong. If you place a value in the left cell, +* then that value is prefixed to all of the following control names. If not, then +* the control names are used as is. (NOTE: you don't need to append a "." to the window +* name. If the top cell is not null, then this function will add the "." for you. So, +* you can set the top cell to @Window -- not @Window:".") Below is an example array for a +* series of buttons: +* +* PropArray = @Window :@VM: "ENABLED" :@VM: "SIZE<1>" :@VM: "SIZE<2>" :@VM: "SIZE<3>" :@VM: "SIZE<4>" +* PropArray<-1> = "BUTTON_1" :@VM: 0 :@VM: 10 :@VM: 10 :@VM: 100 :@VM: 100 +* PropArray<-1> = "BUTTON_2" :@VM: 0 :@VM: 20 :@VM: 20 :@VM: 100 :@VM: 100 +* PropArray<-1> = "BUTTON_3" :@VM: 0 :@VM: 30 :@VM: 30 :@VM: 100 :@VM: 100 +* PropArray<-1> = "BUTTON_4" :@VM: 0 :@VM: 40 :@VM: 40 :@VM: 100 :@VM: 100 +* +* You can optionally use this method to set many properties of one control. To +* do this, set the first value in the first field to the control name ensuring that there +* are absolutely no other value marks in the first row. When you have done this, then each +* following row represents a property/value pair delimited by @VM. Just like before +* you can use the angle-bracket syntax to denote property fields, values, etc. For +* example: +* +* PropArray = @Window:".BUTTON_1" +* PropArray<-1> = "ENABLED" :@VM: 0 +* PropArray<-1> = "SIZE<1>" :@VM: 0 +* PropArray<-1> = "SIZE<2>" :@VM: 0 +* PropArray<-1> = "SIZE<3>" :@VM: 0 +* PropArray<-1> = "SIZE<4>" :@VM: 0 +* +* This function also allows you to combine both formats for a powerful and flexible +* way to initialize a set of similar controls. In the first example above, notice that +* all values are the same for the ENABLED, SIZE<3>, and SIZE<4> properties. To save time +* and space, your array can also have a "Shared Properties" section. The section follows +* main array and separated by a field containing a single @RM. The section is formatted +* like the second example above. Each row in the section contains a property name and +* a value. The function will use these property/value pairs to set the same value for all +* controls in the preceding section. Here is first example rewritten to take advantage +* of this functionality: +* +* PropArray = @Window :@VM: "SIZE<1>" :@VM: "SIZE<2>" +* PropArray<-1> = "BUTTON_1" :@VM: 10 :@VM: 10 +* PropArray<-1> = "BUTTON_2" :@VM: 20 :@VM: 20 +* PropArray<-1> = "BUTTON_3" :@VM: 30 :@VM: 30 +* PropArray<-1> = "BUTTON_4" :@VM: 40 :@VM: 40 +* PropArray<-1> = @RM ;*<-- Notice that one row contains an @RM only +* PropArray<-1> = "ENABLED" :@VM: 0 +* PropArray<-1> = "SIZE<3>" :@VM: 100 +* PropArray<-1> = "SIZE<4>" :@VM: 100 +* +* For any value you want to "Leave Alone", pass "" (case insensative). Also, note +* that ommitting a field of a multivalue property will also "leave it alone". "Leaving it alone" is +* the equivalent of reading the property, changing those values you wish to change, and setting +* the property again. The following example leave's the control width alone and also leaves +* a couple other values alone as well: +* +* * Set all but SIZE<3> +* PropArray = @Window :@VM: "SIZE<1>" :@VM: "SIZE<2>" :@VM: "SIZE<4>" +* PropArray<-1> = "BUTTON_1" :@VM: 10 :@VM: 10 :@VM: 100 +* PropArray<-1> = "BUTTON_2" :@VM: "" :@VM: 20 :@VM: 100 +* PropArray<-1> = "BUTTON_3" :@VM: 30 :@VM: "" :@VM: 100 +* PropArray<-1> = "BUTTON_4" :@VM: 40 :@VM: 40 :@VM: "" +* +* Finally, you can also use this function to qualify events. To do so, simply specify "QUALIFY_EVENT" +* as a property. The value to this property will be a comma delimited list of events to be +* qualified. It only qualifies events, there is no rerouting of events involved. The following +* example qualifies events for OLE controls +* +* * Init OLE Buttons +* PropArray = @Window :@VM: "OLE.Style" :@VM: "QUALIFY_EVENT" +* PropArray<-1> = "OLE_BUTTON1" :@VM: "Standard" :@VM: "OnClick" +* PropArray<-1> = "OLE_BUTTON2" :@VM: "XP" :@VM: "OnClick,OnDblClick" +* PropArray<-1> = "OLE_BUTTON3" :@VM: "XP Toolbar" :@VM: "" +* PropArray<-1> = "OLE_BUTTON4" :@VM: "Office XP Toolbar" :@VM: "ALL_OLES" +* +* * Init a single OLE Edit Table +* PropArray = @Window:".OLE_EDITTABLE" +* PropArray<-1> = "Dimension<1>" :@VM: 10 +* PropArray<-1> = "Dimension<2>" :@VM: 10 +* PropArray<-1> = "QUALIFY_EVENT" :@VM: "PosChanging,PosChanged,BeforeUpdate,AfterUpdate" +* +* Parameters: +* PropArray [in] -- The controls, properties, and values in one array +* +* History (Date, Initials, Notes) +* 04/06/2004 KRF Initial Programmer +* +************************************************************************************************ + +Declare subroutine Set_Property, Send_Message +Declare function Get_Property, Extract, Replace, Delete + +* debug + +* Prepare input +If Assigned(PropArray) else PropArray = "" +If PropArray then + + CtrlList = "" + PropList = "" + ValueList = "" + UsedProps = "" + MV_Val = "" + Shared_MV_Val = "" + PrevProp = "" + PrevCtrl = "" + SharedPrevProp = "" + + If Count(PropArray<1>, @VM) EQ 0 then + + * One control ------------------------------------------------ + Ctrl = Extract(PropArray, 1, 0, 0) + PropArray = Delete(PropArray, 1, 0, 0) + + * Set each property + NumProps = Count(PropArray, @FM) + 1 + For i = 1 to NumProps + Prop = PropArray + Val = PropArray + GoSub Process_Property + next i + + * Just in case last property was MV + If MV_Val then + GoSub Add_MV_Property + end + + end else + + * Many controls ---------------------------------------------- + If Index(PropArray, @RM, 1) then + SharedProps = PropArray[-1, "B":@RM] + PropArray = PropArray[1, "F":@RM] + If SharedProps[1, 1] EQ @FM then SharedProps[1, 1] = "" + If PropArray[-1, 1] EQ @FM then PropArray[-1, 1] = "" + end else + SharedProps = "" + end + + SharedCtrlList = "" + + * First set individual properties + TopRow = Extract(PropArray, 1, 0, 0) + NumProps = Count(TopRow, @VM) + 1 + PropArray = Delete(PropArray, 1, 0, 0) + Window = TopRow<1, 1> + if Window then Window := "." + + * Set each property + NumCtrls = Count(PropArray, @FM) + 1 + For iCtrl = 1 to NumCtrls + Ctrl = Window:PropArray + If SharedProps NE "" then SharedCtrlList<-1> = Ctrl + For i = 2 to NumProps + Prop = TopRow<1, i> + Val = PropArray + GoSub Process_Property + If iCtrl EQ 1 then + Locate Prop in UsedProps using @FM setting Pos else + UsedProps<-1> = Prop + end + end + next i + next iCtrl + + * How many properties are there? + NumProps = Count(UsedProps, @FM) + 1 + + * Just in case last property was MV + If MV_Val then + GoSub Add_MV_Property + end + + * now set shared properties + If SharedProps NE "" AND PropArray NE "" then + Convert @FM to @RM in SharedCtrlList + NumSharedProps = Count(SharedProps, @FM) + 1 + For iSharedProp = 1 to NumSharedProps + SharedProp = SharedProps + SharedVal = SharedProps + GoSub Process_Shared_Property + next iSharedProp + + * Just in case last shared property was MV + If MV_Val then + GoSub Add_Shared_MV_Property + end + end + end + + * Set the properties + CtrlList[-1, 1] = "" + PropList[-1, 1] = "" + ValueList[-1, 1] = "" + Set_Property(CtrlList, PropList, ValueList) + +end + +Return + + +Process_Property: +* Params: [IN]Ctrl, [IN]Prop, [IN]Val, [IN]MV_Val, [IN|OUT]CtrlList, [IN|OUT]PropList, [IN|OUT]ValueList + GoSub Get_MV_Structure + If Prop NE PrevProp AND MV_Val NE "" then + GoSub Add_MV_Property + MV_Val = "" + end + + If Prop EQ "QUALIFY_EVENT" then + If VAL NE "" AND Val _NEC "" then + NumEvents = Count(Val, ",") + 1 + For iEvent = 1 to NumEvents + Send_Message(Ctrl, "QUALIFY_EVENT", Field(Val, ",", iEvent), 1) + next iEvent + end + end else + If Field then + If MV_Val EQ "" then + MV_Val = Get_Property(Ctrl, Prop) + end + If Val _NEC "" then MV_Val = Replace(MV_Val, Field, Value, SubValue, Val) + end else + If Val _NEC "" then GoSub Add_Property + end + end + PrevProp = Prop + PrevCtrl = Ctrl +return + + +Get_MV_Structure: +* Params: [IN]AnglePos, [IN|OUT]Prop, [OUT]Field, [OUT]Value, [OUT]SubValue + Field = 0; Value = 0; SubValue = 0; + AnglePos = Index(Prop, "<", 1) + If AnglePos then + Suffix = Prop[AnglePos + 1, "F>"] + Prop = Prop[1, "F<"] + Convert Char(9):" " to "" in Suffix + Field = Field(Suffix, ",", 1) + Value = Field(Suffix, ",", 2) + SubValue = Field(Suffix, ",", 3) + end +return + + +Add_Property: +* Params: [IN]Ctrl, [IN]Prop, [IN]Val, [IN|OUT]CtrlList, [IN|OUT]PropList, [IN|OUT]ValueList + CtrlList := Ctrl:@RM + PropList := Prop:@RM + ValueList := Val:@RM +return + + +Add_MV_Property: +* Params: [IN]PrevCtrl, [IN]PrevProp, [IN]MV_Val, [IN|OUT]CtrlList, [IN|OUT]PropList, [IN|OUT]ValueList + CtrlList := PrevCtrl:@RM + PropList := PrevProp:@RM + ValueList := MV_Val:@RM +return + + +Process_Shared_Property: +* Params: [IN]NumCtrls, [IN]SharedCtrlList, [IN]SharedProp, [IN]SharedVal, [IN]Shared_MV_Val, [IN|OUT]CtrlList, [IN|OUT]PropList, [IN|OUT]ValueList + GoSub Get_Shared_MV_Structure + If SharedProp NE SharedPrevProp AND Shared_MV_Val NE "" then + GoSub Add_Shared_MV_Property + Shared_MV_Val = "" + end + + If SharedProp EQ "QUALIFY_EVENT" then + If SharedVal NE "" AND SharedVal _NEC "" then + NumEvents = Count(SharedVal, ",") + 1 + For iCtrl = 1 to NumCtrls + CurrSharedCtrl = Field(SharedCtrlList, @RM, iCtrl) + For iEvent = 1 to NumEvents + Send_Message(CurrSharedCtrl, "QUALIFY_EVENT", Field(SharedVal, ",", iEvent), 1) + next iEvent + next iCtrl + end + end else + If Field then + If Shared_MV_Val EQ "" then + Locate SharedProp in UsedProps using @FM setting Pos then + For iCtrl = 1 to NumCtrls + Data = Field(ValueList, @RM, Pos) + Data = Replace(Data, Field, Value, SubValue, SharedVal) + ValueList = FieldStore(ValueList, @RM, Pos, 1, Data) + Pos += NumProps + next iCtrl + end else + Shared_MV_Val = Get_Property(SharedCtrlList, SharedProp) + end + end + If Shared_MV_Val NE "" AND SharedVal _NEC "" then + For iCtrl = 1 to NumCtrls + Data = Field(Shared_MV_Val, @RM, iCtrl) + Data = Replace(Data, Field, Value, SubValue, SharedVal) + Shared_MV_Val = FieldStore(Shared_MV_Val, @RM, iCtrl, 1, Data) + next i + end + end else + If SharedVal _NEC "" then GoSub Add_Shared_Property + end + end + SharedPrevProp = SharedProp +return + + +Get_Shared_MV_Structure: +* Params: [IN]AnglePos, [IN|OUT]SharedProp, [OUT]Field, [OUT]Value, [OUT]SubValue + Field = 0; Value = 0; SubValue = 0; + AnglePos = Index(SharedProp, "<", 1) + If AnglePos then + Suffix = SharedProp[AnglePos + 1, "F>"] + SharedProp = SharedProp[1, "F<"] + Suffix = Trim(Suffix) + Field = Field(Suffix, ",", 1) + Value = Field(Suffix, ",", 2) + SubValue = Field(Suffix, ",", 3) + end +return + + +Add_Shared_Property: +* Params: [IN]SharedCtrlList, [IN]SharedProp, [IN]SharedVal, [IN|OUT]CtrlList, [IN|OUT]PropList, [IN|OUT]ValueList + CtrlList := SharedCtrlList:@RM + PropList := Str(SharedProp:@RM, NumCtrls) + ValueList := Str(SharedVal:@RM, NumCtrls) +return + + +Add_Shared_MV_Property: +* Params: [IN]SharedCtrlList, [IN]SharedPrevProp, [IN]Shared_MV_Val, [IN|OUT]CtrlList, [IN|OUT]PropList, [IN|OUT]ValueList + CtrlList := SharedCtrlList:@RM + PropList := Str(SharedPrevProp:@RM, NumCtrls) + ValueList := Shared_MV_Val:@RM +return diff --git a/SYSPROG/STPROC/SRP_UTILITIES_SAMPLE.txt b/SYSPROG/STPROC/SRP_UTILITIES_SAMPLE.txt new file mode 100644 index 0000000..8fbf357 --- /dev/null +++ b/SYSPROG/STPROC/SRP_UTILITIES_SAMPLE.txt @@ -0,0 +1,134 @@ +Compile subroutine SRP_Utilities_Sample(VOID) +/**********************************************************************************************************************\ + + Name : SRP_Utilities_Sample + + Description : The SRP_Utilities_Sample includes sample code, with debugs, demonstrating the various functions + included in the SRP Utilities library. + + For best results, use the debugs provided. Some of them are placed after a call so you can see how fast, in + milliseconds, the routine executed. The result is always in the ElapsedTime variable. + +\**********************************************************************************************************************/ + +Declare function Rnd, GetTickCount + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// ARRAY FUNCTIONS +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +Declare function SRP_Clean_Array, SRP_Join_Arrays, SRP_Reorder_Array, SRP_Rotate_Array, SRP_Sort_Array + +// make a big array with blanks and duplicates +Array = "" +NumRows = 10000 +For iRow = 1 to NumRows + If Rnd(3) then + Array := Int(iRow / 2):@FM + end else + Array := @FM + end +Next iRow +Array[-1, 1] = "" + +// clean it +StartTime = GetTickCount() +Array = SRP_Clean_Array(Array, @FM, "UNIQUE") +ElapsedTime = GetTickCount() - StartTime:" ms" +debug + +// make two big arrays, the first is every two numbers, the second is every three numbers +LeftArray = "" +RightArray = "" +NumRows = 10000 +For iRow = 1 to NumRows + LeftArray := iRow * 2:@FM + RightArray := iRow * 3:@FM +Next iRow +LeftArray[-1, 1] = "" +RightArray[-1, 1] = "" + +// join them two different ways +ArrayIntersect = SRP_Join_Arrays(LeftArray, RightArray, @FM, 1) +ArrayUnion = SRP_Join_Arrays(LeftArray, RightArray) +debug + +// make a big array with random numbers +Array = "" +NumCols = 10 +NumRows = 10000 +StartTime = GetTickCount() +For iCol = 1 to NumCols + If iCol GT 1 then Array := @FM + For iRow = 1 to NumRows + If iRow GT 1 then Array := @VM + Array := Rnd(10000) + 1 + Next iRow +Next iCol + +// reorder the columns (move col 5 to col 1, col 7 to col 2, and col 9 to col 3) +StartTime = GetTickCount() +Array = SRP_Reorder_Array(Array, 5:@FM:7:@FM:9) +ElapsedTime = GetTickCount() - StartTime:" ms" +debug + +// rotate the array, making it suitable for the LIST property +StartTime = GetTickCount() +Array = SRP_Rotate_Array(Array) +ElapsedTime = GetTickCount() - StartTime:" ms" +debug + +// sort the array. Unlike V119, we can leave the delimiters alone and sort in LIST format +StartTime = GetTickCount() +Array = SRP_Sort_Array(Array, "AR1", 1) +ElapsedTime = GetTickCount() - StartTime:" ms" +debug + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// CRYPTOGRAPHY FUNCTIONS +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +Declare function SRP_Hash, SRP_Encode, SRP_Decode + +HashString = "My Hash" +Encode = "HEX" + +debug +Hash = SRP_Hash(HashString, "ADLER32", Encode) +Hash = SRP_Hash(HashString, "CRC32", Encode) +Hash = SRP_Hash(HashString, "MD2", Encode) +Hash = SRP_Hash(HashString, "MD4", Encode) +Hash = SRP_Hash(HashString, "MD5", Encode) +Hash = SRP_Hash(HashString, "SHA", Encode) +Hash = SRP_Hash(HashString, "SHA-1", Encode) +Hash = SRP_Hash(HashString, "SHA-2", Encode) +Hash = SRP_Hash(HashString, "SHA-224", Encode) +Hash = SRP_Hash(HashString, "SHA-256", Encode) +Hash = SRP_Hash(HashString, "SHA-384", Encode) +Hash = SRP_Hash(HashString, "SHA-512", Encode) +Hash = SRP_Hash(HashString, "RIPEMD", Encode) +Hash = SRP_Hash(HashString, "RIPEMD-128", Encode) +Hash = SRP_Hash(HashString, "RIPEMD-160", Encode) +Hash = SRP_Hash(HashString, "RIPEMD-256", Encode) +Hash = SRP_Hash(HashString, "RIPEMD-320", Encode) +Hash = SRP_Hash(HashString, "TIGER", Encode) +Hash = SRP_Hash(HashString, "WHIRLPOOL", Encode) +Hash = SRP_Hash(HashString, "SHA-1", Encode) +Hash = SRP_Hash(HashString, "", Encode) ; // default = SHA-1 +Hash = SRP_Hash(HashString, "asdf", Encode) ; // unrecognized = SHA-1 + +debug +EncodeString = "My String to Encode" +EncodeString = SRP_Encode(EncodeString, "HEX") +EncodeString = SRP_Decode(EncodeString, "HEX") +EncodeString = SRP_Encode(EncodeString, "BASE32") +EncodeString = SRP_Decode(EncodeString, "BASE32") +EncodeString = SRP_Encode(EncodeString, "BASE64") +EncodeString = SRP_Decode(EncodeString, "BASE64") +EncodeString = SRP_Encode(EncodeString, "") ; // default = BASE64 +EncodeString = SRP_Decode(EncodeString, "") ; // default = BASE64 +EncodeString = SRP_Encode(EncodeString, "asdf") ; // unrecognized = BASE64 +EncodeString = SRP_Decode(EncodeString, "asdf") ; // unrecognized = BASE64 + +Return diff --git a/SYSPROG/STPROC/SRP_VALIDATE_USER.txt b/SYSPROG/STPROC/SRP_VALIDATE_USER.txt new file mode 100644 index 0000000..25dcbbb --- /dev/null +++ b/SYSPROG/STPROC/SRP_VALIDATE_USER.txt @@ -0,0 +1,11 @@ +Compile function SRP_Validate_User(Username, Password, Domain) + +If Assigned(Username) else Username = "" +If Assigned(Password) else Password = "" +If Assigned(Domain) else Domain = "" +Debug +Declare function SRPLogonAPI_ValidateUser +Result = SRPLogonAPI_ValidateUser(Username, Password, Domain) + +Return Result + diff --git a/SYSPROG/STPROC/SSN_FORMAT.txt b/SYSPROG/STPROC/SSN_FORMAT.txt new file mode 100644 index 0000000..4204c20 --- /dev/null +++ b/SYSPROG/STPROC/SSN_FORMAT.txt @@ -0,0 +1,84 @@ +compile Subroutine SSN_FORMAT( charstr CONV, charstr ANS, charstr BRANCH, charstr RETURN_DATA) +* +* SSN_FORMAT is an example of a developer's custom prompt formatting +* routine using the square brackets call. +* +* It should be placed in square brackets, like this: +* +* [SSN_FORMAT] +* +* This subroutine should be used as the first and only "Input Validation" in +* a window prompt. Placed in "Output Format", it properly formats any +* reasonable string of numbers into a consistent US Social Security number format. +* +! +begin condition +pre: +post: +end condition + +* Subroutine declarations + +$insert msg_equates + +declare function msg + +* Local Equates +* The STATUS() variable is used to indicated the error condition of the +* pattern. They are: +EQU VALID$ TO 0 ;* Successful +EQU INVALID_MSG$ TO 1 ;* Bad Data - Print error message window +EQU INVALID_CONV$ TO 2 ;* Bad Conversion - " " +EQU INVALID_NOMSG$ TO 3 ;* Bad but do not print the error message window + +EQU THREEDGRAY$ TO 192 + +* Begin Conversion +* + RETURN_DATA = "" + IF ANS NE "" THEN + SSN = ANS + ANS = "" + STATUS() = VALID$ + + Convert " -()." TO "" IN SSN + + IF NUM( SSN ) THEN + LENGTH = LEN( SSN ) + * Case statement to validate all possible types of Social Security numbers. If + * a new format is required simply add another case. + * The fall-through (CASE 1) traps invalid conversions. + BEGIN CASE + CASE LENGTH = 9 + IF CONV EQ "OCONV" THEN + RETURN_DATA = FMT( SSN, "L###-##-####") + END ELSE + RETURN_DATA = SSN + END + CASE 1 + IF CONV = "ICONV" THEN + gosub DisplayError + END + STATUS() = INVALID_NOMSG$ + END CASE + END ELSE + IF CONV = "ICONV" THEN + gosub DisplayError + END + STATUS() = INVALID_NOMSG$ + END + END + RETURN +*} + +DisplayError: + msgrec = "" + msgrec = "Data Validation Error" + msgrec = SSN : " is not a valid Social Security number. Please enter a nine digit number in any format." + msgrec = THREEDGRAY$:@VM:THREEDGRAY$:@VM:THREEDGRAY$ + msgrec = 'L' + result = msg( "", msgrec) +Return + +* Source Date: 11:16:17 21 OCT 1991 Build ID: AREV*2.12.5 Level: 2.12 + diff --git a/SYSPROG/STPROC/STATUSLINE.txt b/SYSPROG/STPROC/STATUSLINE.txt new file mode 100644 index 0000000..30cf112 --- /dev/null +++ b/SYSPROG/STPROC/STATUSLINE.txt @@ -0,0 +1,14 @@ +COMPILE FUNCTION StatusLine(Window,StatusLine,StatusOutline) + +DECLARE Subroutine Set_Property + +Window = IF ASSIGNED(Window) THEN Window ELSE @WINDOW +StatusLine = IF ASSIGNED(StatusLine) THEN StatusLine ELSE 'STATUSLINE_FIX' +StatusOutLine = IF ASSIGNED(StatusOutLine) THEN StatusOutLine ELSE 'STATUS_OUTLINE_FIX' + +Ctrls = Window:'.":StatusOutLine':@RM ; Props = 'STYLE':@RM ; Vals = '0X0000008':@RM +Ctrls := Window ; Props := 'STATUSLINE' ; Vals := Window:'.':Statusline + +Set_Property(Ctrls,Props,Vals) + +RETURN '' diff --git a/SYSPROG/STPROC/SYSLISTS_PUSH.SELECT.txt b/SYSPROG/STPROC/SYSLISTS_PUSH.SELECT.txt new file mode 100644 index 0000000..2457976 --- /dev/null +++ b/SYSPROG/STPROC/SYSLISTS_PUSH.SELECT.txt @@ -0,0 +1,646 @@ +SUBROUTINE SYSLISTS_PUSH.SELECT(CURSOR, SAVE1, SAVE2, SAVE3) +*#ADDED 1,2,3,4 +*#SOURCE AREV32_BP +*#CTO +*#Precompile +*#FLAVOR AREV32 +* + + + + + + + + + + + + + + + + + + + + + + +! +* +! +* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied +* without written permission from COSMOS, INC. +* +! +* +*÷ VERSION : AdvRev 1.0 +* +*÷ PURPOSE : Push an active select list within an EXECUTE level to +* prevent it from being destroyed by another select process +* +*÷ AUTHOR : BDA +* +*÷ CREATED : April 19, 88 +* +*÷ PROCEDURES : +* +*÷ WARNINGS : +* + +! +*÷ REVISION HISTORY (Most CURRENT first) : + +* DATE IMPLEMENTOR FUNCTION +* -------- ----------- -------- +* DD-MM-YY initials Modification +* Aug 15-91 Pat Share code with RPM + +! + +*÷ THEORY OF OPERATION : +* NOTE THAT CURSOR IS NOT CURRENTLY USED - FOR FORWARD COMPATIBILITY + +! + +*÷ $INSERT Blocks : +*$insert syscommon +** INCLUDED SOURCE: SYSPROCS,SYSCOMMON ** +*compile insert SysCommon + +****************************************************************************** +* +* This program is proprietary and is not to be used by or disclosed +* to others, nor is it to be copied without written permission from +* Revelation Technologies, Inc. +* +* Name : SysCommon +* Description: OpenEngine System Common variable declarations +* +* History : (date, initials, notes) +* 08-13-91 ba original programmer +* 10-31-91 rkh removed SC_TIMEDATE_FMT (#215), per fix 4831 and 4813 +* 01-18-94 gg changed SC_UNUSED73 to SC_CONCURRENCY +* 04-05-94 Pat changed SC_UNUSED_107 to SC_ENGINE_LOGGING_REQ;the +* semaphore between oengine.exe and revexec.dll +* 04-25-94 Slj changed SC_UNUSED_78 to SC_ATWINDOW for event handlers +* 05-16-94 Pat change SC_UNUSED_165 to SC_CTRL_TYPES +* 06-13-94 tmc 10695 changed SC_ARRAY_VOLUMES to dim of 6 (was 5) +* 06-24-95 gg 11322 changed SC_UNUSED_155 to SC_DATASOURCETYPE +* 07-17-95 cp 11322 changed SC_UNUSED_154 to SC_XO_DEFAULTS +* 03-05-96 cp 11777 added SC_LHLICENSING SC_LHENABLED SC_LHFILESUSED +* (160-162) +* 08-05-96 gg 11853 changed PROGRAMS_DIM$ from '0299' to '0499' +* 06-23/97 cp added support for SYSLOGINS table (201-203) +* +****************************************************************************** + +equ FRAMES_DIM$ to 49 +equ PROGRAMS_DIM$ to '0499' ;* appears in obj code's literal pool +equ SC_ARRAY_VOLUMES_OFFSET$ to 17 +equ SC_ARRAY_TABLES_OFFSET$ to 19 + +* +SYSCOM SC_ATRM ;* Set by RTP1 to the value of char(255) +SYSCOM SC_ATFM ;* Set by RTP1 to the value of char(254) +SYSCOM SC_ATVM ;* Set by RTP1 to the value of char(253) +SYSCOM SC_ATSVM ;* Set by RTP1 to the value of char(252) +SYSCOM SC_TM ;* Set by RTP1 to the value of char(251) +SYSCOM SC_STM ;* Set by RTP1 to the value of char(13) +SYSCOM SC_CRLF ;* Set by RTP1 to the value of char(10) +SYSCOM SC_FILE_SYSENV ;* 8 The file handle for the SYSENV file +SYSCOM SC_TIMEDATA +SYSCOM SC_FILE_SYSPTRS ;* 10 The file handle for the SYSPTRS file +SYSCOM SC_PROGLIST ;* Array of program names, format of name is +SYSCOM SC_PROGRAMS(PROGRAMS_DIM$) ;* Object code for the program name in PROGLIST +SYSCOM SC_FSTACK(1) +SYSCOM SC_FRAMELIST +SYSCOM SC_FRAMES(FRAMES_DIM$) ;* Originally ROS frames, now also other ones +SYSCOM SC_FILE_VOLUMES ;* 16 The file handle for the VOLUMES file +SYSCOM SC_ARRAY_VOLUMES(6) ;* 17 anchor The physical location of the SYSVOLUMES file +SYSCOM SC_FILE_TABLES ;* 18 The file handle for the SYSTABLES file +SYSCOM SC_ARRAY_TABLES(5) ;* 19 anchor The physical location of the SYSTABLES file +SYSCOM SC_FILES_NO_DETACH ;* A list of system files that CAN NOT be detached +SYSCOM SC_RTP1 ;* RTP1 is executed from here. Then used for encryption key +SYSCOM SC_AFSNAMES ;* A list of all BFS and MFS encountered by the system +SYSCOM SC_FILE_SYSOBJ ;* 23 the file handle for the SYSOBJ file +SYSCOM SC_FILE_SYSDICT ;* 24 The file handle for the SYSDICT file +SYSCOM SC_USER ;* 25 anchor This is @USERNAME, the name of the current user +SYSCOM SC_DBID ;* 26 anchor This is @DBID, the name of the current account +SYSCOM SC_LIST +SYSCOM SC_TODAY ;* Today's date, used by RLIST +SYSCOM SC_SUNDAY0 ;* Day of the week (0-6) Sunday = 0 +SYSCOM SC_SUNDAY7 ;* Day of the week (1-7) Sunday = 7 +SYSCOM SC_ATUSER0 ;* 31 (C01F) anchor This is @USER0 +SYSCOM SC_ATUSER1 ;* 32 (C020) anchor This is @USER1 +SYSCOM SC_ATUSER2 ;* 33 (C021) anchor This is @USER2 +SYSCOM SC_ATUSER3 ;* 34 (C022) anchor This is @USER3 +SYSCOM SC_ATUSER4 ;* 35 (C023) anchor This is @USER4 +SYSCOM SC_CURR_PROGRAM ;* 36 (C024) moveable used by debugger +SYSCOM SC_CURRENT_LINE ;* 37 (C025) moveable Used by debugger current line number +SYSCOM SC_SYSTEM_STATE ;* 38 (C026) State of engine '' - uninitialized;'0' - initialized;'1' - Ready to terminate +SYSCOM SC_DBG_BUFFER ;* 39 (C027) moveable multipurpose var for the debugger +SYSCOM SC_WORKLIST ;* 40 (C028) Real questionable variable +SYSCOM SC_ATID ;* 41 (C029) (C0anchor) This is @ID +SYSCOM SC_ATREC ;* 42 (C02A) (C0anchor) This is @RECORD +SYSCOM SC_DATA_LIST ;* 43 (C02B) (anchor) This is @data +SYSCOM SC_ADMIN ;* 44 (C02C) The user has administrative privilege + +SYSCOM SC_SQL_PARAMS ;* 45 (C02d) @SQL_PARAMS Passed parameters in compiled SQL +SYSCOM SC_SQL_CURSPARAMS ;* 46 (C02E) @CURS_PARAMS Passed parameters for SQL cursors +SYSCOM SC_SQL_NCACHEIDS ;* 47 (C02F) @NCACHEIDS Normalized query id cache +SYSCOM SC_SQL_NCACHEDATA(8) ;* 48 (C030) @NCACHEDATA() Normalized query record cache +SYSCOM SC_FILE_SYSPROCS ;* 49 (C031) The file handle for the SYSPROCS table + +SYSCOM SC_FLAGS ;* 50 (C032) debug flags (trace, break, etc.) +SYSCOM SC_SYSPROCNAMES ;* 51 (C033) used by the compiler to protect system procedures +SYSCOM SC_SQL_SQBUFFS(20) ;* 52 (C034) @SQBUFFS( ) Sub Query Buffers +SYSCOM SC_SQL_SQBUFF_CURS ;* 53 (C035) Subquery buffer to cursor map +SYSCOM SC_SQL_CURS_SQBUFF ;* 54 (C036) Cursor to Subquery Buffer map +SYSCOM SC_SQL_CURSSLOTS ;* 55 (C037) SQL cursor to ReAL cursor map +SYSCOM SC_SQL_PROJEX ;* 56 (C038) PROJEX meta object cache +SYSCOM SC_ATLIMIT ;* 57 (C039) @LIMIT moveable RLIST count limit +SYSCOM SC_NEXT_GROUP ;* 58 (C03A) moveable list variable +SYSCOM SC_PRI_NAME ;* 59 (C03B) + +SYSCOM SC_PRI_DICT ;* 60 (C03C) +SYSCOM SC_PRI_FILE ;* 61 (C03D) anchor @PRI.FILE +SYSCOM SC_COMPILER ;* 62 (C03E) This holds a copy of the compiler, RBASIC_RUN record in the verbs file +SYSCOM SC_ATLIST_ACTIVE ;* 63 (C03F) Used in conjunction with LIST, is the data in LIST current +SYSCOM SC_LIST_OFF ;* 64 (C040) +SYSCOM SC_REDUCTION_SPEC ;* 65 (C041) +SYSCOM SC_SORT_SPEC ;* 66 (C042) +SYSCOM SC_ATANS ;* 67 (C043) anchor This is @ANS +SYSCOM SC_ATDICT ;* 68 (C044) anchor This is @DICT +SYSCOM SC_SQL_FIRSTIDS ;* 69 (C045) Used by SQL FETCH + +SYSCOM SC_SQL_LASTIDS ;* 70 (C046) Used by SQL FETCH +SYSCOM SC_SQL_SKIPWHERE ;* 71 (C047) Place holder for optimization flag +SYSCOM SC_SQL_LIKE ;* 72 (C048) Like buffer information +SYSCOM SC_CONCURRENCY ;* 73 (C049) Concurrency scheme for SQL bond optimization +SYSCOM SC_ATCONV ;* 74 (C04A) +SYSCOM SC_ATFORMAT ;* 75 (C04B) +SYSCOM SC_ATHEADER ;* 76 (C04C) anchor @header +SYSCOM SC_DATE_FORMAT ;* 77 (C04D) moveable +SYSCOM SC_ATWINDOW ;* 78 (C04E) current win id in event hdlrs +SYSCOM SC_IO_PROC ;* 79 (C04F) moveable select variable + +SYSCOM SC_ATRECUR0 ;* 80 (C050) anchor This is @RECUR0 +SYSCOM SC_ATRECUR1 ;* 81 (C051) anchor This is @RECUR1 +SYSCOM SC_ATRECUR2 ;* 82 (C052) anchor This is @RECUR2 +SYSCOM SC_ATRECUR3 ;* 83 (C053) anchor This is @RECUR3 +SYSCOM SC_ATRECUR4 ;* 84 (C054) anchor This is @RECUR4 +SYSCOM SC_MVCOUNT ;* 85 (C055) anchor This is @MV +SYSCOM SC_ATRECCOUNT ;* 86 (C056) anchor This is @RECCOUNT or @REC_COUNT +SYSCOM SC_ATQUERY_DICT ;* 87 (C057) anchor @query.dict +SYSCOM SC_DST_RECORDS(9) ;* 88 (C058) sql distinct records cache +SYSCOM SC_DST_OFFSETS(9) ;* 89 (C059) sql distinct keys cache + +SYSCOM SC_DST_HANDLES(9) ;* 90 (C05A) sql distinct table handles +SYSCOM SC_DST_HASHTABLES(9) ;* 91 (C05B) sql distinct hash tables +SYSCOM SC_ATLPTRWIDE ;* 92 (C05C) anchor This is @LPTRWIDE +SYSCOM SC_ATLPTRHIGH ;* 93 (C05D) anchor This is @LPTRHIGH +SYSCOM SC_FVSYSREPOS ;* 94 (C05E) to be fv for SYSREPOS +SYSCOM SC_FVSYSREPOSLOG ;* 95 (C05F) to be fv for SYSREPOSLOG +SYSCOM SC_FILE_REPOSEXE ;* 96 (C060) to be fv for SYSREPOSEVENTEXES +SYSCOM SC_ATTCL_STACK ;* 97 (C061) @tcl.stack +SYSCOM SC_DRIVER ;* 98 (C062) Used by op91, vspace and +SYSCOM SC_LONG_LIST ;* 99 (C063) moveable select variable + +SYSCOM SC_LIST_LEVEL ;* 100 (C064) moveable select variable +SYSCOM SC_ATCURSORS(8,12) ;* 101 (C065)anchor @cursors select cursors +SYSCOM SC_SORT_FILE ;* 102 (C066)name of the sort file +SYSCOM SC_APPID ;* 103 (C067) +SYSCOM SC_APPINFO ;* 104 (C068) +SYSCOM SC_NEXTREQARGS ;* 105 (C069) Delayed request arguments +SYSCOM SC_IDXSVR ;* 106 (C06A)flag for dedicate index server +SYSCOM SC_ENGINE_LOGGING_REQ ;* 107 (C06B) +SYSCOM SC_HUSH ;* 108 (C06C) Curtis - Patrick Alpha3 fix +SYSCOM SC_ATPRIVILEGE ;* 109 (C06D) + +SYSCOM SC_ATSTATION ;* 110 (C06E) anchor This is @STATION +SYSCOM SC_ATVIEW_MODE ;* 111 (C06F) @VIEW.MODE +SYSCOM SC_LINEAR_HASH_FRAMES ;* 112 (C070) lh vars +SYSCOM SC_ATHEADING ;* 113 (C071) anchor +SYSCOM SC_ATFOOTING ;* 114 (C072) anchor +SYSCOM SC_ATPAGE ;* 115 (C073) anchor @page +SYSCOM SC_ATBREAK1 ;* 116 (C074) @BREAK +SYSCOM SC_ATBREAK2 ;* 117 (C075) +SYSCOM SC_ATBREAK3 ;* 118 (C076) +SYSCOM SC_ATFIRST_PAGE ;* 119 (C077) + +SYSCOM SC_ATFIRST_COLHEAD ;* 120 (C078) +SYSCOM SC_ATCOLHEADING ;* 121 (C079) +SYSCOM SC_ATCOLLENGTH ;* 122 (C07A) +SYSCOM SC_ATCOLHEAD ;* 123 (C07B) +SYSCOM SC_ATCHACTIVE ;* 124 (C07C) +SYSCOM SC_EXT_LIST ;* 125 (C07D) moveable select variable +SYSCOM SC_CMDLINE ;* 126 (C07E) moveable DOS command line +SYSCOM SC_LOCKED_USER_ID ;* 127 (C07F) Moveable user lock semaphore +SYSCOM SC_LABELED_COMMON_NAMES ;* 128 (C080) moveable List of all LABELED COMMON names, defined so far +SYSCOM SC_LABELED_COMMON_SPTS ;* 129 (C081) Moveable Location of descriptors for the above labeled common vars + +SYSCOM SC_ATREDUCTION_DONE ;* 130 (C082) moveable select variable +SYSCOM SC_ATRETURN_VALUE ;* 131 (C083) moveable ??? The value being returned by a FUNCTION is placed here +SYSCOM SC_XLATE_KEYS ;* 132 (C084) +SYSCOM SC_XLATE_LRU ;* 133 (C085) +SYSCOM SC_SYS_LOCKS(8) ;* 134 (C086) +SYSCOM SC_USER_LIST ;* 135 (C087) list of users registered on this database +SYSCOM SC_ADMIN_LIST ;* 136 (C088) list of admin flags per user +SYSCOM SC_PASSWORD_LIST ;* 137 (C089) list of encrypted passwords per user +SYSCOM SC_XLATE_RESET ;* 138 (C08A) anchor +SYSCOM SC_PROT_DOCONV ;* 139 (C08B) @IOCONV do conversion on read or write + +SYSCOM SC_PROT_DEFCONV ;* 140 (C08C) default environmental conversion +SYSCOM SC_PROT_LOCKMODE ;* 141 (C08D) @LOCKMODE used to specify implicit or explicit lock mode +SYSCOM SC_PROT_HANDLES ;* 142 (C08E) handles of tables involved in a transaction +SYSCOM SC_PROT_TABLEDATA ;* 143 (C08F) data about tables involved in a transaction +SYSCOM SC_PROT_TRANSSTATE ;* 144 (C090) current state of transaction +SYSCOM SC_PROT_TRANSDATA ;* 145 (C091) data about current transaction +SYSCOM SC_PROT_CONSISTENCY ;* 146 (C092) @CONSISTENCY_LEVEL transaction consistency level +SYSCOM SC_PROT_TABLELOCKS(8) ;* 147 (C093) handles for tables locked in a transaction +SYSCOM SC_PROT_LOCKDATA(7) ;* 148 (C094) information about locks held in a transaction +SYSCOM SC_PROT_TRANSHANDLES ;* 149 (C095) handles of transaction temporary tables + +SYSCOM SC_PROT_CURSCONV ;* 150 (C096) defeats conversion logic +SYSCOM SC_PROT_SPECS ;* 151 (C097) protection specs for tables +SYSCOM SC_PROT_SPECS_LRU ;* 152 (C098) LRU information for sc_prot_specs +SYSCOM SC_AT_INSERT ;* 153 (C099) @INSERT +SYSCOM SC_XO_DEFAULTS ;* 154 (C09A)<1>=default XOInstance() options +SYSCOM SC_DATASOURCETYPE ;* 155 (C09B) current DataSource type (used by DSO) +SYSCOM SC_ATPSEUDO ;* 156 (C09C) anchor This is @PSEUDO +SYSCOM SC_ATPRIORITY_INT ;* 157 (C09D) @priority.int +SYSCOM SC_ATUPPER_CASE ;* 158 (C09E) anchor This is a string of all upper case letters +SYSCOM SC_ATLOWER_CASE ;* 159 (C09F) anchor This is a string of all lower case letters + +SYSCOM SC_LHLICENSING ;* 160 (C0A0) set to true for OI/WG runtimes with user count > 1 +SYSCOM SC_LHENABLED ;* 161 (C0A1) if SC_LHLICENSING, this is set to TRUE$ by RTP57 when the user semaphore is actually set +SYSCOM SC_LHFILESUSED ;* 162 (C0A2) if SC_LHLICENSING, this is a list of LH files that have been opened +SYSCOM SC_ATPROG_CHAR ;* 163 (C0A3) @PROG.CHAR +SYSCOM SC_ATMW ;* 164 (C0A4) @MW +SYSCOM SC_CTRL_TYPES ;* 165 (C0A5) holds control types info +SYSCOM SC_REPOSMIRROR ;* 166 (C0A6) Mirror data: mirrorHandle : @RM : configdata +SYSCOM SC_ATDEFAULT_STOPS ;* 167 (C0A7) @DEFAULT.STOPS anchor xref stop list +SYSCOM SC_ATPAGE_LINE ;* 168 (C0A8) @PAGE_LINE +SYSCOM SC_QHANDLE ;* 169 (C0A9) handle to queue + +SYSCOM SC_REQID ;* 170 (C0AA) request is (aka procid ) +SYSCOM SC_EXEC_COMMAND ;* 171 (C0AB) Current command +SYSCOM SC_SPSTATUS ;* 172 (C0AC) stored procedure status +SYSCOM SC_SPSTATCODE ;* 173 (C0AD) stored procedure status code string +SYSCOM SC_SPSTATTEMPL ;* 174 (C0AE) status code template +SYSCOM SC_SPABORT ;* 175 (C0AF) +SYSCOM SC_SPTYPE ;* 176 (C0B0) Store procedure type +SYSCOM SC_SPARGDTYPES ;* 177 (C0B1) Argument data types +SYSCOM SC_SPRECDTYPES ;* 178 (C0B2) Record data types (template) +SYSCOM SC_SPWRECDTYPES ;* 179 (C0B3) Working record data types + +SYSCOM SC_ATCRTWIDE ;* 180 (C0B4) @CRTWIDE +SYSCOM SC_ATCUR_BUF ;* 181 (C0B5) @CUR.BUF +SYSCOM SC_ATMACRO_WORDS ;* 182 (C0B6) @MACRO.WORDS +SYSCOM SC_ATMACRO_HEX ;* 183 (C0B7) @MACRO.HEX +SYSCOM SC_ATMACRO_MODE ;* 184 (C0B8) @MACRO.MODE +SYSCOM SC_ATMESSAGES ;* 185 (C0B9) @MESSAGES +SYSCOM SC_ATFILTER ;* 186 (C0BA) @FILTER +SYSCOM SC_ATSTATLIST ;* 187 (C0BB) @STATLIST +SYSCOM SC_ATSTATREC ;* 188 (C0BC) @STATREC +SYSCOM SC_ATSTATPOS ;* 189 (C0BD) @STATPOS +SYSCOM SC_ENCACTIVE ;* 190 (C0BE) OpenInsight security encryption + +SYSCOM SC_ATCAPTURE ;* 191 (C0BF) @capture +SYSCOM SC_ATSCRIPT ;* 192 (C0C0) @SCRIPT +SYSCOM SC_ATSTATUS_ON ;* 193 (C0C1) @STATUS.ON +SYSCOM SC_ATMODAL ;* 194 (C0C2) @MODAL +SYSCOM SC_DICT_MODE ;* 195 (C0C3) @DICT.MODE** new anchor Dict call mode ( LAST SELET PROC IN AREV ) +SYSCOM SC_ATTYPEAHEAD ;* 196 (C0C4) @TYPEAHEAD +SYSCOM SC_ATBROWSE_LIST ;* 197 (C0C5) @BROWSE.LIST +SYSCOM SC_ATBROWSE_MODE ;* 198 (C0C6) @BROWSE.MODE +SYSCOM SC_ATFILTER_MODE ;* 199 (C0C7) @FILTER.MODE +SYSCOM SC_ATHW ;* 200 (C0C8) @HW + +SYSCOM SC_FILE_SYSLOGINS ;* 201 (C0C9) file handle for SYSLOGINS table (v3.5) +SYSCOM SC_KEY_SYSLOGINS ;* 202 (C0CA) this session's key to the SYSLOGINS table (v3.5) +SYSCOM SC_LOGGED_ON ;* 203 (C0CB) the date/time value that this session started (v3.5) +SYSCOM SC_CHAR_MAPS ;* 204 (C0CC) moveable Character collation maps +SYSCOM SC_ATFILE_ERROR ;* 205 (C0CD) anchor @file.error Contains information about last I/O error +SYSCOM SC_MEM_ALLOC ;* 206 (C0CE) memory allocated open engine specific +SYSCOM SC_INDEXLIST ;* 207 (C0CF) old @index.time ) info for index flushing logic +SYSCOM SC_ATROLLOUT_FILE ;* 208 (C0D0) @ROLLOUT.FILE moveable +SYSCOM SC_ATFILE_ERROR_MODE ;* 209 (C0D1) anchor @file.error.mode +SYSCOM SC_LOCKED_TABLES ;* 210 (C0D2) + +SYSCOM SC_EP ;* 211 (C0D3) @EP Encrypted Password for Bonds +SYSCOM SC_LND_DATA ;* 212 (C0D4) Misc language/national data sets +SYSCOM SC_LND_NAMES ;* 213 (C0D5) Names of langage/national data sets +SYSCOM SC_LND_POINT ;* 214 (C0D6) Pointer to default language/national data set +SYSCOM SC_HW_ENV ;* 215 (C0D7) Node Hardware environent: byte 1 = current display mode, bytes 2-> =name of INI file with config. +SYSCOM SC_ATLEVEL ;* 216 (C0D8) CURRENT LEVEL OF TCL +SYSCOM SC_ATPRECISION ;* 217 (C0D9) Number of decimal digits of precision +SYSCOM SC_CM_NAMES ;* 217 (C0DA) +SYSCOM SC_CM_POINT ;* 219 (C0DB) +SYSCOM SC_ATENVIRON_SET ;* 220 (C0DC) moveable @environ.set +* +* mtr 12-6-06 +* We extended the SC addressspace to 250 today in order to bring back more of the system common needed for Arev32, and to add some more as needed for the pick compatibility. + +SYSCOM SC_SAVE(8,26) ;* 221 (C0DD) EXECUTE saves the previous level's state here +SYSCOM SC_ATCRT_MAX_Y ;* 222 (C0DE) @CRTMAXHIGH +SYSCOM SC_DEMO ;* 223 (C0DF) +SYSCOM SC_TCL_STATE ;* 224 (C0E0) +SYSCOM SC_RESET_ROUTINE ;* 225 (C0E1) holds code and command for TCL level 1 +SYSCOM SC_ATSENTENCE ;* 226 (C0E2) @SENTENCE the current tcl line being processed +SYSCOM SC_FILE_VOC ;* 227 (C0E3) The file handle for the VOC file +SYSCOM SC_DICT_VOC ;* 228 (C0E4) The file handle for the DICT_VOC file +SYSCOM SC_CHAIN_LINE ;* 229 (C0E5) Place to pass a command to RTP18 +SYSCOM SC_PARSE_TCL ;* 230 (C0E6) The parsed command line - @RM delimited word list +SYSCOM SC_VERB ;* 231 (C0E7) Name of last verb executed at tcl (example :EDIT VOC *, VERB= "EDIT") +SYSCOM SC_VERBS_FILE ;* 232 (C0E8) The file handle for the file in last TCL command +SYSCOM SC_BREAKKEY ;* 233 (C0E9) +SYSCOM SC_ABORT_FLAG ;* 234 (C0EA) +SYSCOM SC_ATSCREEN_SAVE ;* 235 (C0EB)screen image for view mode +SYSCOM SC_ATXW ;* 236 (C0EC) @XW +SYSCOM SC_VIEW_SCREEN ;* 237 (C0ED) +SYSCOM SC_VIEW_PARAMS ;* 238 (C0EE) +SYSCOM SC_MULTI_LIMIT ;* 239 (C0EF) +SYSCOM SC_CURR_EXEC_CNT ;* 240 (C0F0) +SYSCOM SC_FROM_PROC ;* 241 (C0F1) +SYSCOM SC_ATSAVE_SELECT ;* 242 (C0F2) @SAVE.SELECT +SYSCOM SC_BREAK_TABLE ;* 243 (C0F3) debug's break table +SYSCOM SC_TRACE_TABLE ;* 244 (C0F4) debug's trace table +SYSCOM SC_PROMPT_STR ;* 245 (C0F5) +SYSCOM SC_OPTIONS ;* 246 (C0F6) Each bit in this variable represents a system option See the equates below OPTION.EQUATES +SYSCOM SC_OPTLIST ;* 247 (C0F7) +SYSCOM SC_MOD_FLAGS ;* 248 (C0F8) +SYSCOM SC_LOADER_SEMAPHORE ;* 249 (C0F9) + +* mtr 12-13-06 +* bumped the number up to 320 for further availability + +SYSCOM SC_ATQUERY_DEPTH ;* 250 (C0FA)* +SYSCOM SC_ATQUERY_TABLE ;* 251 (C0FB)* +SYSCOM SC_ATEW ;* 252 (C0FC) This is @EW +SYSCOM SC_ATAW ;* 253 (C0FD) This is @AW +SYSCOM SC_SPACER1 ;* 254- SPACE HOLDER +SYSCOM SC_SPACER2 ;* 255- SPACE HOLDER +SYSCOM SC_ATPLAYDELAY ;* 256 (C10100) +SYSCOM SC_ATBACKGRND_TIME ;* 257 (C10101) +SYSCOM SC_ATINT_CONST ;* 258 (C10201) This is @INT_CONST +SYSCOM SC_ATEDIT_KEYS ;* 259 (C10301) This is @EDIT_KEYS +SYSCOM SC_TAB_STOPS ;* 260 (C10401) Used by the EDITOR +SYSCOM SC_ATMV_KEYS ;* 261 (C10501) @MV.KEYS +SYSCOM SC_ATMOVE_KEYS ;* 262 (C10601) This is @MOVE_KEYS +SYSCOM SC_ATMACRO_KEYS ;* 263 (C10701) @MACRO.KEYS +SYSCOM SC_ATUTOR ;* 264 (C10801) @TUTOR +SYSCOM SC_ATPAGE_REC ;* 265 (C10901) Used by Report Writer, repl. ATATRBP.PTR +SYSCOM SC_ATWINDOW_LEVEL ;* 266 (C10A01) @WINDOW.LEVEL +SYSCOM SC_ATSTATATR ;* 267 (C10B01) @statatr +SYSCOM SC_ATSCRIBE_MODE ;* 268 (C10C01) @SCRIBE.MODE +SYSCOM SC_ATPW ;* 269 (C10D01) This is @PW +SYSCOM SC_ATPLAYBACK ;* 270 (C10E01) @PLAYBACK +SYSCOM SC_ATENVIRON_KEYS ;* 271 (C10F01) @ENVIRON.KEYS +* MTR 12-18-06 +SYSCOM SC_SYMBOL_TABLE ;* 272 (C11001) used by Arev debuger +SYSCOM SC_PREV_PROG ;* 273 (C11101) used by Arev debugger +SYSCOM SC_MASTER_OPTIONS ;* 274 (C11201) Used by rtp29 +SYSCOM SC_VIDEO_DATA ;* 275 (C11301) Video card data, byte 1 = type, byte 2 = "CGA flag", bytes 3 & 4 = display adapter RAM segment (i.e. B800) */ +* MTR 12-26-06 +SYSCOM SC_ATHELP_LEVEL ;* 276 (C11401) +SYSCOM SC_ATCRTLFMAX ;* 277 (C11501) +SYSCOM SC_ATCRTLFS ;* 278 (C11601) + + + +***************************** +* OPTION.EQUATES +EQU D.OPT TO BITAND(SC_OPTIONS,1) +EQU O.OPT TO BITAND(SC_OPTIONS,2) +EQU P.OPT TO BITAND(SC_OPTIONS,4) +EQU T.OPT TO BITAND(SC_OPTIONS,8) +EQU X.OPT TO BITAND(SC_OPTIONS,16) +EQU I.OPT TO BITAND(SC_OPTIONS,32) +EQU R.OPT TO BITAND(SC_OPTIONS,64) +EQU N.OPT TO BITAND(SC_OPTIONS,128) +EQU S.OPT TO BITAND(SC_OPTIONS,256) +EQU C.OPT TO BITAND(SC_OPTIONS,512) +EQU L.OPT TO BITAND(SC_OPTIONS,1024) +EQU E.OPT TO BITAND(SC_OPTIONS,2048) +EQU WRITE.OPT TO BITAND(SC_OPTIONS,4096) +EQU U.OPT TO BITAND(SC_OPTIONS,8192) +EQU A.OPT TO BITAND(SC_OPTIONS,16384) +EQU K.OPT TO BITAND(SC_OPTIONS,32768) +EQU B.OPT TO BITAND(SC_OPTIONS,65536) +EQU F.OPT TO BITAND(SC_OPTIONS,131072) +* +EQU ONLY.MOD TO BITAND(SC_MOD_FLAGS,1) +EQU IDSUPP.MOD TO BITAND(SC_MOD_FLAGS,2) +EQU COLSUPP.MOD TO BITAND(SC_MOD_FLAGS,4) +EQU HDRSUPP.MOD TO BITAND(SC_MOD_FLAGS,8) +EQU DETSUPP.MOD TO BITAND(SC_MOD_FLAGS,16) +EQU DBLSPC.MOD TO BITAND(SC_MOD_FLAGS,32) +EQU ERRORSUPP.MOD TO BITAND(SC_MOD_FLAGS,64) +* +EQU NETWORK.FLAG TO BITAND(RUNTIME(),32768) +EQU NETWORK.MASK TO \48692047656E6521\ +* +* Meta objects are stored in the FRAMES array so they can be thrown +* out by the garbage collect if necessary. +* +EQU ROS.FRAME.CACHE TO 0 +EQU ROS.FRAME.CACHE.TOP TO 9 +EQU OCONV.RUN TO SC_FRAMES(10) +EQU WITH.RUN TO SC_FRAMES(11) +EQU WITH0.RUN TO SC_FRAMES(12) +EQU SORT.RUN TO SC_FRAMES(13) +EQU TEMPLATE.CACHE TO 14 +EQU TEMPLATE.NAMES TO SC_FRAMES(14) +EQU TEMPLATE.CACHE.TOP TO 40 +EQU XLATE.CACHE TO 41 +EQU XLATE.CACHE.TOP TO 49 + +*$INSERT AREV_BP, SELECT.CONSTANTS +** INCLUDED SOURCE: AREV_BP,SELECT.CONSTANTS ** +* MISC EQUATES * +EQUATE MAX.WORK.LIST.LEN$ TO 32768 +EQUATE MAX.SORT.KEY.LEN$ TO 32600 +EQUATE MAX.LIST.LEN$ TO 65527 +EQUATE MAX.LIMIT$ TO 9E99 ;* WHAT TO SET LIMIT TO TO AVOID LIMIT + +* SELECT MODE NUMERIC CODES * + +EQUATE COMPAT.SELECT$ TO 0 +EQUATE SETTING.SELECT$ TO 1 +EQUATE USING.SELECT$ TO 2 +EQUATE ASSIGN.SELECT$ TO 3 + +* REDUCE MODE NUMERIC CODES * + +EQUATE NEW.REDUCE$ TO 0 +EQUATE SETTING.REDUCE$ TO 1 +EQUATE AND.REDUCE$ TO 2 +EQUATE OR.REDUCE$ TO 3 + +* SEEK MODE NUMERIC CODES * + +EQUATE TOP.SEEK$ TO 0 +EQUATE BOTTOM.SEEK$ TO 1 +EQUATE CURRENT.SEEK$ TO 2 +EQUATE MARK.SEEK$ TO 3 +EQUATE RESTORE.SEEK$ TO 4 + +* FIELD POSITIONS FOR NEXT.GROUP * +* GROUP.LAST$: +* USED BY ALL SELECT MODES. IN INDEX MODE IS THE LAST NODE ID FOR CURRENT LIST +* GROUP.FIELD$: +* IN EXTRA LIST INDEX MODE IS THE FIELD NUMBER OF THE CURRENT LIST IN MEMORY +* GROUP.FIRST$: +* IN INDEX MODE IS THE FIRST NODE ID FOR THE CURRENT LIST IN MEMORY +* +EQUATE GROUP.LAST$ TO 1 +EQUATE GROUP.FIELD$ TO 2 +EQUATE GROUP.FIRST$ TO 3 + +* FIELD POSITIONS FOR LONG.LIST * +* USED IN EXTERNAL SELECT MODE AND BREAK SORT INDEX MODE * +* THE INDEX OF THE CURRENT OVERFLOW LIST IN THE LISTS FILE * +* +EQUATE LONG.LIST.NUMBER$ TO 1 +* +* THE LARGEST INDEX OF THE OVERFLOWS IN THE LISTS FILE * +EQUATE LONG.LIST.MAX$ TO 2 + +* CODES FOR LIST.ACTIVE * +EQUATE INACTIVE.SELECT$ TO 0 +EQUATE LATENT.FILE.SELECT$ TO 1 +EQUATE LATENT.INDEX.SELECT$ TO 2 +EQUATE EXTRN.SELECT$ TO 3 + +* CODES FOR READNEXT DIRECTION * +EQUATE ASND.TERM$ TO 0 +EQUATE ASND.NONTERM$ TO 1 +EQUATE DSND.TERM$ TO 2 +EQUATE DSND.NONTERM$ TO 3 + + + +* SECONDS ALLOWED BETWEEN BREAKS WHILE IN READNEXT * +EQUATE BREAK.TIME$ TO 10 + +EQUATE V119.INITIALIZE$ TO 'I' +EQUATE V119.SORT$ TO 'S' +EQUATE V119.WRITE$ TO 'W' +EQUATE V119.EXTRACT$ TO 'E' +EQUATE V119.MERGE$ TO 'M' +EQUATE V119.LONG.EXTRACT$ TO 'L' +EQUATE V119.DELETE$ TO 'D' + +*** CURSORS ARRAY EQUATES *** + +EQUATE MAX.CURSORS$ TO 8 +EQUATE MAX.CURSOR.ELEMENTS$ TO 12 + +EQUATE CURS.LIST$ TO 1 ;* referenced by number in OP118 +EQUATE CURS.LIST.OFF$ TO 2 ;* referenced by number in OP118 +EQUATE CURS.EXT.LIST$ TO 3 +EQUATE CURS.NEXT.GROUP$ TO 4 +EQUATE CURS.LIST.ACTIVE$ TO 5 +EQUATE CURS.LONG.LIST$ TO 6 +EQUATE CURS.QUERY.DICT$ TO 7 +EQUATE CURS.PRI.FILE$ TO 8 +EQUATE CURS.REDUCTION.SPEC$ TO 9 +EQUATE CURS.SORT.SPEC$ TO 10 +EQUATE CURS.REDUCTION.DONE$ TO 11 ;* refereced by number in OP118 +EQUATE CURS.IO.PROC$ TO 12 ;* Cursor I/O process + +EQUATE BY.DSND.FLAG$ TO '#' ;* FLAG FOR SELECT BY FIELD NAMES + +* CODES FOR SORT.SPEC FIELD 1 * +EQUATE SORT.DIR$ TO 1 +EQUATE SORT.JUST$ TO 2 +EQUATE BOTTOM.VAL$ TO 3 +EQUATE TOP.VAL$ TO 4 +EQUATE SORT.NAME$ TO 5 + +* CODES FOR BY.LIST FIELD 1 * +EQUATE BY.F1.NAME$ TO 1 +EQUATE BY.F1.BOTTOM$ TO 2 +EQUATE BY.F1.TOP$ TO 3 + +* SORT.SPEC DEFINES * + +EQUATE SORT.BYS$ TO 2 ;* FLAG TRUE IF DESCEND +EQUATE SORT.FMTS$ TO 3 ;* 'AL' 'AR' +EQUATE SORT.MULT$ TO 4 ;* FLAG TRUE IF MULTI-VALUE +EQUATE SORT.CALC$ TO 5 ;* VALUE TRUE IF FIELD IS SYMBOLIC +EQUATE SORT.FIELDS$ TO 6 ;* FIELD NAMES OR NUMBERS +EQUATE SORT.EXPLODE$ TO 7 ;* ANY MULTI-VALUES +EQUATE SORT.ID.ONLY$ TO 8 ;* SORTING ONLY BY @ID + +* REDUCTION.SPEC DEFINES * +EQUATE REDUCT.SCRIPT$ TO 1 ;* R/LIST WITH SCRIPT +EQUATE REDUCT.SPEC.RANGE$ TO 2 ;* RANGE INFO FOR FEED FORWARD TO SELECT +EQUATE RANGE.FIELD$ TO 1 +EQUATE RANGE.BOTTOM.VAL$ TO 2 +EQUATE RANGE.TOP.VAL$ TO 3 +EQUATE REDUCT.DONE$ TO 4 +EQUATE REDUCT.CASE.FORCE$ TO 3 ;* FIELD 3 FORCE CASE FLAG (INSENSITIVITY) +* +* IF REDUCT.DONE IS TRUE THEN, IF THE RANGE IS USED BY THE SELECT THEN +* THAT WILL SATISFY ALL REDUCTION AND REDUCTION.DONE MAY BE SET TO TRUE + +*** SELECT.SEEK STATUS ERROR CODES *** +EQUATE SEEK.ERR.BAD.CURS$ TO 1 ;* INVALID CURSOR +EQUATE SEEK.ERR.BAD.MODE$ TO 2 ;* INVALID MODE +EQUATE SEEK.ERR.BAD.POS$ TO 3 ;* INVALID POSITION +EQUATE SEEK.ERR.NO.SEL$ TO 4 ;* NO ACTIVE SELECT +EQUATE SEEK.ERR.BAD.SEL$ TO 5 ;* INVALID SELECT MODE +EQUATE SEEK.ERR.BAD.RN$ TO 6 ;* ERROR IN READNEXT +EQUATE SEEK.ERR.BAD.BRN$ TO 7 ;* ERROR IN BLOCK READNEXT +EQUATE SEEK.ERR.BAD.IRN$ TO 8 ;* ERROR IN INDEX READNEXT +EQUATE SEEK.ERR.BAD.ERN$ TO 9 ;* ERROR IN EXTERNAL READNEXT +* Source Date: 18:54:30 21 MAY 1992 Build ID: AREV*2.2.18 Level: 2.2 + +*÷ COMMON Variables (Terminate with '%') : + +*÷ LABELED COMMON Variables (Terminate with '@') : + + +*÷ EQUATE Variables (Terminate with '$') : + +EQU COSMO$ TO 'Copyright (C) 1987, COSMOS, INC.' +EQU TRUE$ TO 1 +EQU FALSE$ TO 0 +EQU YES$ TO 1 +EQU NO$ TO 0 +EQU OTHERWISE$ TO 1 + +*÷ LOCAL Variables : + +*÷ DECLARED - FUNCTIONS called : + +*÷ DECLARED - SUBROUTINES called : + +*÷ INDIRECT - FUNCTIONS/SUBROUTINES called if known (Make COMMENTS) : +* +*============================================================================ + +TRANSFER SC_LIST TO SAVE1 +SAVE2 = SC_ATLIST_ACTIVE +SAVE2 := @RM:SC_LONG_LIST +SAVE2 := @RM:SC_EXT_LIST +SAVE2 := @RM:SC_LIST_OFF +SAVE2 := @RM:SC_PRI_FILE +SAVE2 := @RM:SC_ATQUERY_DICT +SAVE2 := @RM:SC_REDUCTION_SPEC +SAVE2 := @RM:SC_SORT_SPEC +SAVE2 := @RM:SC_ATREDUCTION_DONE +SAVE2 := @RM:SC_IO_PROC +SAVE3 = SC_NEXT_GROUP +SC_ATLIST_ACTIVE = INACTIVE.SELECT$ +SC_LIST_LEVEL += 1 + +return +* Source Date: 13:54:30 03 MAY 1992 Build ID: AREV*2.2.5 Level: 2.2 + +* PreCompiled On 01/17/2007 at 11:57:18AM OpenInsight version CTO diff --git a/SYSPROG/STPROC/SYSLISTS_SETALIAS_SUB.txt b/SYSPROG/STPROC/SYSLISTS_SETALIAS_SUB.txt new file mode 100644 index 0000000..fd07c04 --- /dev/null +++ b/SYSPROG/STPROC/SYSLISTS_SETALIAS_SUB.txt @@ -0,0 +1,1031 @@ +SUBROUTINE SYSLISTS_SETALIAS_SUB(VOLUME, ACCOUNT, PASSWORD, TABLE, ALIASNAME, OPTIONS) +$INSERT U2ATVARS +Declare Function DO_XSWAP +*#ADDED 1,2 +*#SOURCE SYSPROCS + +* MTR 12-6-06 Compiled for Arev32/OI80 +*#CTO +*#Precompile +* +*#FLAVOR AREV32 + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +*÷ COMMON Variables (Terminate with '%') : + +*÷ LABELED COMMON Variables (Terminate with '@') : + +*÷ EQUATE Variables (Terminate with '$') : + +*$INSERT AREV_BP, COPYRIGHT + +* This insert contains the copyright message. This insert should be +* inserted into all programs. + +Copy_%%_Right = 'Copyright (C) 1994 Revelation Technologies, Inc.' +* Source Date: 11:35:08 06 MAY 1994 Build ID: AREV_HR*3.1.39 Level: 3.13 +*$insert arev_bp, logical +equ otherwise$ to 1 +equ true$ to 1 +equ false$ to 0 +equ yes$ to 1 +equ no$ to 0 + +* Source Date: 12:39:24 10 MAY 1994 Build ID: AREV_HR*3.1.41 Level: 3.13 +*$INSERT AREV_BP, FILE.SYSTEM.EQUATES + +* Advanced Revelation filing system action codes. + +EQU READ.RECORD TO 1 +EQU READO.RECORD TO 2 +EQU WRITE.RECORD TO 3 +EQU DELETE.RECORD TO 4 +EQU LOCK.RECORD TO 5 +EQU UNLOCK.RECORD TO 6 + +EQU SELECT TO 7 +EQU READNEXT TO 8 +EQU CLEARSELECT TO 9 + +EQU CLEARFILE TO 10 +EQU OPEN.FILE TO 11 +EQU CREATE.FILE TO 12 +EQU RENAME.FILE TO 13 +EQU MOVE.FILE TO 14 +EQU DELETE.FILE TO 15 + +EQU OPEN.MEDIA TO 16 +EQU CREATE.MEDIA TO 17 +EQU READ.MEDIA TO 18 +EQU WRITE.MEDIA TO 19 + +EQU UNLOCK.ALL TO 20 +EQU FLUSH TO 21 +EQU INSTALL TO 22 + +*EQU RESERVED TO 23 +*EQU RESERVED TO 24 +*EQU RESERVED TO 25 + +EQU OMNI.SCRIPT TO 26 +* Following OMNI.SCRIPT sub-codes are passed in the FMC +EQU OMNIBUS_LIST$ TO 'GROUP_NUMBER' +EQU OMNIBUS_CALL$ TO 0 ;* Required +EQU SMART_TEST$ TO 1 ;* Required - returns 0 in FLAG if +* bond is NOT smart. Otherwise returns +* an intelligence factor in FLAG. +EQU SCRIPT_CALL$ TO 2 ;* Intelligent database language script +* for smart bonds only +EQU SCRIPT_OK_CALL$ TO 3 ;* For smart bonds only. If true then +* asynchronous processesing is used. + +EQU CLOSE.MEDIA TO 27 +EQU RECORD.COUNT TO 28 +EQU REMAKE.FILE TO 29 + +EQU CREATE.INDEX TO 30 +EQU DELETE.INDEX TO 31 +EQU UPDATE.INDEX TO 32 +EQU SELECT.INDEX TO 33 +EQU READNEXT.INDEX TO 34 +* Source Date: 16:41:43 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 +*$INSERT AREV_BP, FSERRORS_HDR +* Advanced Revelation Filing System Error reporting protocol +* +* Error conditions are to be returned by BFSs and MFSs in the @FILE.ERROR +* variable. Each error code has an associated severity level. +* If an error condition is encountered, the filing system code should set +* 1. @FILE.ERROR to the associated code and fill in the message and detail +* as appropriate +* 2. Set STATUS() to the associated severity level +* 3. Set the FLAG (7th argument) to FALSE$ to indicate an operational failure. +* +* If FLAG is set to false, then the operation is defined to have failed. +* It is important for the application to know that a WRITE or DELETE was +* in fact not performed. Setting FLAG to FALSE is not an appropriate protocol +* for communicating any non-failure (informational) condition from the +* filing system. +* +* "Core" error codes are blocked in groups of 100 and are integer codes. +* Block 0 - 99 is allocated for logical error reporting. +* Block 100 - 199 is allocated for Revelation system BFS error codes. +* Block 200 - 299 is allocated for Revelation system MFS error codes. +* Block 300 - 399 is allocated for BOND.SUBS errors +* Blcok 400 - 499 is allocated for System, RTP, and R/BASIC cursor errors +* +* Some codes are intrinsically specific to the function of a particular +* BFS or MFS. Others may be and should be generally applied to a variety +* of filing systems. For example, code 100 is the standard status return in +* case of an attempt to read or delete a record which does not exist. +* +* Block BS - Bond-subs - is allocated for codes associated with the BOND.SUBS +* routine. +* +* Every error code should have an associated message in the MESSAGES file. +* The ID of the message should be error code preceeded by "FS". +* For example, code 105 would have an associated message "FS105" +* If any parameters are to be passed to this message they should appear in +* the FSMSG field of @FILE.ERROR. This field may be multivalued. + +*---- FILING SYSTEM SEVERITY LEVEL CODES -------- +* Value of STATUS() on return from Filing System. +* +Equate Fs_Informational$ To -2 ;* @File.Error contain FYI info. +EQUATE FS_USER_ABORT$ TO -1 ;* The user pressed [Esc], SPECIAL! +EQUATE FSLOGICAL$ TO 0 ;* Data does not meet logical constraints +EQUATE FSPHYSICAL$ TO 1 ;* Structural or operational error (retryable) +EQUATE FSFATAL$ TO 2 ;* Structural or operational error (fatal) + +*---- FILE.ERROR FIELD STRUCTURE ------- +EQUATE FSCODE$ TO 1 ;* error or status code identifier +EQUATE FSMSG$ TO 2 ;* error message data +EQUATE FSDETAIL$ TO 3 ;* file system dependent detail data +EQUATE FS_PREFIX$ TO 'FS' ;* used by OE for set_status Pat Oct/04/91 +* Source Date: 11:34:13 10 MAY 1994 Build ID: AREV_HR*3.1.40 Level: 3.13 +*$Insert SYSTABLE_NAMES +*compile insert SYSTABLE_NAMES + +equ sysdict_file$ to "SYSDICT" +equ sysenv_file$ to "SYSENV" +equ syslists_file$ to "SYSLISTS" +equ syslogins_file$ to "SYSLOGINS" +equ sysobj_file$ to "SYSOBJ" +equ sysprocs_file$ to "SYSPROCS" +equ sysptrs_file$ to "SYSPTRS" +equ systables_file$ to "SYSTABLES" +equ sysviews_file$ to "SYSVIEWS" +equ sysvolumes_file$ to "SYSVOLUMES" +equ systypes_file$ to "SYSTYPES" +equ systypemaps_file$ to "SYSTYPEMAPS" +equ sysprocindex_file$ to "SYSPROCINDEX" +equ syscolumns_file$ to "SYSCOLUMNS" +equ accessible_columns$ to "ACCESSIBLE_COLUMNS" +equ syslhgroup_file$ to "SYSLHGROUP" +equ syslhverify_file$ to "SYSLHVERIFY" +equ importexport_file$ to "IMPORTEXPORT" +equ OsFile$ to "WINDOWS" +equ LogFile$ to "LOG" + +equ SYSREPOS_FILE$ to "SYSREPOS" +equ SYSREPOS_TEMP_FILE$ to "SYSREPOS_TEMP" +equ SYSREPOSTYPES_FILE$ to "SYSREPOSTYPES" +equ SYSAPPS_FILE$ to "SYSAPPS" +equ SYSREPOSLOCKS_FILE$ to "SYSREPOSLOCKS" +equ SYSREPOSLOG_FILE$ to "SYSREPOSLOG" +equ SYSREPOSWINS_FILE$ to "SYSREPOSWINS" +equ SYSREPOSWINEXES_FILE$ to "SYSREPOSWINEXES" +equ SYSREPOSEVENTS_FILE$ to "SYSREPOSEVENTS" +equ SYSREPOSEVENTEXES_FILE$ to "SYSREPOSEVENTEXES" +equ SYSREPOSCLASSES_FILE$ to "SYSREPOSCLASSES" +equ SYSREPOSPOPUPS_FILE$ to "SYSREPOSPOPUPS" +equ SYSREPOSMESSAGES_FILE$ to "SYSREPOSMESSAGES" +equ SYSREPOSAPPNOTES_FILE$ to "SYSREPOSAPPNOTES" +equ SYSREPOSREPORTS_FILE$ to "SYSREPOSREPORTS" +equ SYSREPOSRELEASES_FILE$ to "SYSREPOSRELEASES" +equ SYSREPOSVIEWS_FILE$ to "SYSREPOSVIEWS" +equ SYSREPOSSTORAGE_FILE$ to "SYSREPOSSTORAGE" +equ SYSREPOSTYPEFAMILIES_FILE$ to "SYSREPOSTYPEFAMILIES" +equ SYSREPOSDATASOURCES_FILE$ to "SYSREPOSDATASOURCES" +equ SYSREPOSDBCOMPONENTS_FILE$ to "SYSREPOSDBCOMPONENTS" +equ SYSREPOSDBCOMPONENTEXES_FILE$ to "SYSREPOSDBCOMPONENTEXES" +equ sysreposxml_file$ to "SYSREPOSXML" +equ sysreposlanguage_file$ to "SYSREPOSLANGUAGE" +EQU SYSREPOSMENUCONTEXT_FILE$ TO 'SYSREPOSMENUCONTEXT' + +EQU AVERYLABELS_FILE$ TO 'AVERYLABELS' +* MTR 12-6-06 FOR aREV32 + +Equ DefaultSysAliasFile$ To "SYSALIAS" +Equ SysAliasesFile$ To "SYSALIASES" + +* Source Date: 10:20:52 22 SEP 2003 Build ID: OI*7.0.0 Level: 2.61 +*$INSERT SYSCOMMON +*compile insert SysCommon + +****************************************************************************** +* +* This program is proprietary and is not to be used by or disclosed +* to others, nor is it to be copied without written permission from +* Revelation Technologies, Inc. +* +* Name : SysCommon +* Description: OpenEngine System Common variable declarations +* +* History : (date, initials, notes) +* 08-13-91 ba original programmer +* 10-31-91 rkh removed SC_TIMEDATE_FMT (#215), per fix 4831 and 4813 +* 01-18-94 gg changed SC_UNUSED73 to SC_CONCURRENCY +* 04-05-94 Pat changed SC_UNUSED_107 to SC_ENGINE_LOGGING_REQ;the +* semaphore between oengine.exe and revexec.dll +* 04-25-94 Slj changed SC_UNUSED_78 to SC_ATWINDOW for event handlers +* 05-16-94 Pat change SC_UNUSED_165 to SC_CTRL_TYPES +* 06-13-94 tmc 10695 changed SC_ARRAY_VOLUMES to dim of 6 (was 5) +* 06-24-95 gg 11322 changed SC_UNUSED_155 to SC_DATASOURCETYPE +* 07-17-95 cp 11322 changed SC_UNUSED_154 to SC_XO_DEFAULTS +* 03-05-96 cp 11777 added SC_LHLICENSING SC_LHENABLED SC_LHFILESUSED +* (160-162) +* 08-05-96 gg 11853 changed PROGRAMS_DIM$ from '0299' to '0499' +* 06-23/97 cp added support for SYSLOGINS table (201-203) +* +****************************************************************************** + +equ FRAMES_DIM$ to 49 +equ PROGRAMS_DIM$ to '0499' ;* appears in obj code's literal pool +equ SC_ARRAY_VOLUMES_OFFSET$ to 17 +equ SC_ARRAY_TABLES_OFFSET$ to 19 + +* +SYSCOM SC_ATRM +SYSCOM SC_ATFM +SYSCOM SC_ATVM +SYSCOM SC_ATSVM +SYSCOM SC_TM +SYSCOM SC_STM +SYSCOM SC_CRLF +SYSCOM SC_FILE_SYSENV +SYSCOM SC_TIMEDATA +SYSCOM SC_FILE_SYSPTRS +SYSCOM SC_PROGLIST +SYSCOM SC_PROGRAMS(PROGRAMS_DIM$) +SYSCOM SC_FSTACK(1) +SYSCOM SC_FRAMELIST +SYSCOM SC_FRAMES(FRAMES_DIM$) +SYSCOM SC_FILE_VOLUMES +SYSCOM SC_ARRAY_VOLUMES(6) +SYSCOM SC_FILE_TABLES +SYSCOM SC_ARRAY_TABLES(5) +SYSCOM SC_FILES_NO_DETACH +SYSCOM SC_RTP1 +SYSCOM SC_AFSNAMES +SYSCOM SC_FILE_SYSOBJ +SYSCOM SC_FILE_SYSDICT +SYSCOM SC_USER +SYSCOM SC_DBID +SYSCOM SC_LIST +SYSCOM SC_TODAY +SYSCOM SC_SUNDAY0 +SYSCOM SC_SUNDAY7 +SYSCOM SC_ATUSER0 +SYSCOM SC_ATUSER1 +SYSCOM SC_ATUSER2 +SYSCOM SC_ATUSER3 +SYSCOM SC_ATUSER4 +SYSCOM SC_CURR_PROGRAM +SYSCOM SC_CURRENT_LINE +SYSCOM SC_SYSTEM_STATE +SYSCOM SC_DBG_BUFFER +SYSCOM SC_WORKLIST +SYSCOM SC_ATID +SYSCOM SC_ATREC +SYSCOM SC_DATA_LIST +SYSCOM SC_ADMIN + +SYSCOM SC_SQL_PARAMS +SYSCOM SC_SQL_CURSPARAMS +SYSCOM SC_SQL_NCACHEIDS +SYSCOM SC_SQL_NCACHEDATA(8) + +SYSCOM SC_FILE_SYSPROCS +SYSCOM SC_FLAGS +SYSCOM SC_SYSPROCNAMES + +SYSCOM SC_SQL_SQBUFFS(20) +SYSCOM SC_SQL_SQBUFF_CURS +SYSCOM SC_SQL_CURS_SQBUFF +SYSCOM SC_SQL_CURSSLOTS +SYSCOM SC_SQL_PROJEX + +SYSCOM SC_ATLIMIT +SYSCOM SC_NEXT_GROUP +SYSCOM SC_PRI_NAME +SYSCOM SC_PRI_DICT +SYSCOM SC_PRI_FILE +SYSCOM SC_COMPILER +SYSCOM SC_ATLIST_ACTIVE +SYSCOM SC_LIST_OFF +SYSCOM SC_REDUCTION_SPEC +SYSCOM SC_SORT_SPEC +SYSCOM SC_ATANS +SYSCOM SC_ATDICT + +SYSCOM SC_SQL_FIRSTIDS +SYSCOM SC_SQL_LASTIDS +SYSCOM SC_SQL_SKIPWHERE +SYSCOM SC_SQL_LIKE + +SYSCOM SC_CONCURRENCY + +SYSCOM SC_ATCONV +SYSCOM SC_ATFORMAT +SYSCOM SC_ATHEADER +SYSCOM SC_DATE_FORMAT + +SYSCOM SC_ATWINDOW + +SYSCOM SC_IO_PROC +SYSCOM SC_ATRECUR0 +SYSCOM SC_ATRECUR1 +SYSCOM SC_ATRECUR2 +SYSCOM SC_ATRECUR3 +SYSCOM SC_ATRECUR4 +SYSCOM SC_MVCOUNT +SYSCOM SC_ATRECCOUNT +SYSCOM SC_ATQUERY_DICT + +SYSCOM SC_DST_RECORDS(9) +SYSCOM SC_DST_OFFSETS(9) +SYSCOM SC_DST_HANDLES(9) +SYSCOM SC_DST_HASHTABLES(9) + +SYSCOM SC_ATLPTRWIDE +SYSCOM SC_ATLPTRHIGH + +SYSCOM SC_FVSYSREPOS +SYSCOM SC_FVSYSREPOSLOG +SYSCOM SC_FILE_REPOSEXE +* SYSCOM SC_UNUSED_97 +SYSCOM SC_ATTCL_STACK + +SYSCOM SC_DRIVER +SYSCOM SC_LONG_LIST +SYSCOM SC_LIST_LEVEL +SYSCOM SC_ATCURSORS(8,12) +SYSCOM SC_SORT_FILE + +SYSCOM SC_APPID +SYSCOM SC_APPINFO +SYSCOM SC_NEXTREQARGS +SYSCOM SC_IDXSVR +SYSCOM SC_ENGINE_LOGGING_REQ +SYSCOM SC_HUSH +SYSCOM SC_UNUSED_109 + +SYSCOM SC_ATSTATION +SYSCOM SC_UNUSED_111 +SYSCOM SC_LINEAR_HASH_FRAMES +SYSCOM SC_ATHEADING +SYSCOM SC_ATFOOTING +SYSCOM SC_ATPAGE +SYSCOM SC_ATBREAK1 +SYSCOM SC_ATBREAK2 +SYSCOM SC_ATBREAK3 +SYSCOM SC_ATFIRST_PAGE +SYSCOM SC_ATFIRST_COLHEAD +SYSCOM SC_ATCOLHEADING +SYSCOM SC_ATCOLLENGTH +SYSCOM SC_ATCOLHEAD +SYSCOM SC_ATCHACTIVE +SYSCOM SC_EXT_LIST +SYSCOM SC_CMDLINE +SYSCOM SC_LOCKED_USER_ID +SYSCOM SC_LABELED_COMMON_NAMES +SYSCOM SC_LABELED_COMMON_SPTS +SYSCOM SC_ATREDUCTION_DONE +SYSCOM SC_ATRETURN_VALUE +SYSCOM SC_XLATE_KEYS +SYSCOM SC_XLATE_LRU +SYSCOM SC_SYS_LOCKS(8) + +SYSCOM SC_USER_LIST +SYSCOM SC_ADMIN_LIST +SYSCOM SC_PASSWORD_LIST + +SYSCOM SC_XLATE_RESET + +SYSCOM SC_PROT_DOCONV +SYSCOM SC_PROT_DEFCONV +SYSCOM SC_PROT_LOCKMODE +SYSCOM SC_PROT_HANDLES +SYSCOM SC_PROT_TABLEDATA +SYSCOM SC_PROT_TRANSSTATE +SYSCOM SC_PROT_TRANSDATA +SYSCOM SC_PROT_CONSISTENCY +SYSCOM SC_PROT_TABLELOCKS(8) +SYSCOM SC_PROT_LOCKDATA(7) +SYSCOM SC_PROT_TRANSHANDLES +SYSCOM SC_PROT_CURSCONV +SYSCOM SC_PROT_SPECS +SYSCOM SC_PROT_SPECS_LRU + +SYSCOM SC_UNUSED_153 +SYSCOM SC_XO_DEFAULTS +SYSCOM SC_DATASOURCETYPE + +SYSCOM SC_ATPSEUDO + +SYSCOM SC_UNUSED_157 + +SYSCOM SC_ATUPPER_CASE +SYSCOM SC_ATLOWER_CASE + +SYSCOM SC_LHLICENSING +SYSCOM SC_LHENABLED +SYSCOM SC_LHFILESUSED +SYSCOM SC_UNUSED_163 +SYSCOM SC_UNUSED_164 +SYSCOM SC_CTRL_TYPES +SYSCOM SC_REPOSMIRROR + +SYSCOM SC_ATDEFAULT_STOPS + +SYSCOM SC_UNUSED_168 +SYSCOM SC_QHANDLE +SYSCOM SC_REQID +SYSCOM SC_EXEC_COMMAND +SYSCOM SC_SPSTATUS +SYSCOM SC_SPSTATCODE +SYSCOM SC_SPSTATTEMPL +SYSCOM SC_SPABORT +SYSCOM SC_SPTYPE +SYSCOM SC_SPARGDTYPES +SYSCOM SC_SPRECDTYPES +SYSCOM SC_SPWRECDTYPES + +SYSCOM SC_UNUSED_180 +SYSCOM SC_UNUSED_181 +SYSCOM SC_UNUSED_182 +SYSCOM SC_UNUSED_183 +SYSCOM SC_UNUSED_184 +SYSCOM SC_UNUSED_185 +SYSCOM SC_UNUSED_186 +SYSCOM SC_UNUSED_187 +SYSCOM SC_UNUSED_188 +SYSCOM SC_UNUSED_189 +SYSCOM SC_ENCACTIVE +SYSCOM SC_UNUSED_191 +SYSCOM SC_UNUSED_192 +SYSCOM SC_UNUSED_193 +SYSCOM SC_UNUSED_194 +SYSCOM SC_DICT_MODE +SYSCOM SC_UNUSED_196 +SYSCOM SC_UNUSED_197 +SYSCOM SC_UNUSED_198 +SYSCOM SC_UNUSED_199 +SYSCOM SC_UNUSED_200 + +SYSCOM SC_FILE_SYSLOGINS +SYSCOM SC_KEY_SYSLOGINS +SYSCOM SC_LOGGED_ON + +SYSCOM SC_CHAR_MAPS +SYSCOM SC_ATFILE_ERROR +SYSCOM SC_MEM_ALLOC +SYSCOM SC_INDEXLIST +SYSCOM SC_ATROLLOUT_FILE +SYSCOM SC_ATFILE_ERROR_MODE +SYSCOM SC_LOCKED_TABLES +SYSCOM SC_EP +SYSCOM SC_LND_DATA +SYSCOM SC_LND_NAMES +SYSCOM SC_LND_POINT +*SYSCOM SC_UNUSED_215 +SYSCOM SC_HW_ENV + + +* MTR 11-3-06 SYSCOM SC_UNUSED_216 +SYSCOM SC_ATLEVEL + +SYSCOM SC_ATPRECISION +SYSCOM SC_CM_NAMES +SYSCOM SC_CM_POINT +SYSCOM SC_ATENVIRON_SET +* +* mtr 12-6-06 +* We extended the SC addressspace to 250 today in order to bring back more of the system common needed for Arev32, and to add some more as needed for the pick compatibility. + +SYSCOM SC_SAVE(8,26) +SYSCOM SC_ATCRT_MAX_Y +SYSCOM SC_DEMO +SYSCOM SC_TCL_STATE +SYSCOM SC_RESET_ROUTINE +SYSCOM SC_ATSENTENCE +SYSCOM SC_FILE_VOC +SYSCOM SC_DICT_VOC +SYSCOM SC_CHAIN_LINE +SYSCOM SC_PARSE_TCL +SYSCOM SC_VERB +SYSCOM SC_VERBS_FILE +SYSCOM SC_BREAKKEY +SYSCOM SC_ABORT_FLAG +SYSCOM SC_ATSCREEN_SAVE +SYSCOM SC_ATVIEW_MODE +SYSCOM SC_VIEW_SCREEN +SYSCOM SC_VIEW_PARAMS +SYSCOM SC_MULTI_LIMIT +SYSCOM SC_CURR_EXEC_CNT +SYSCOM SC_FROM_PROC +SYSCOM SC_ATSAVE_SELECT +SYSCOM SC_BREAK_TABLE +SYSCOM SC_TRACE_TABLE +SYSCOM SC_PROMPT_STR +SYSCOM SC_OPTIONS + +SYSCOM SC_OPTLIST +SYSCOM SC_MOD_FLAGS +SYSCOM SC_LOADER_SEMAPHORE + +* +EQU NETWORK.FLAG TO BITAND(RUNTIME(),32768) +EQU NETWORK.MASK TO \48692047656E6521\ +* +* Meta objects are stored in the FRAMES array so they can be thrown +* out by the garbage collect if necessary. +* +EQU ROS.FRAME.CACHE TO 0 +EQU ROS.FRAME.CACHE.TOP TO 9 +EQU OCONV.RUN TO SC_FRAMES(10) +EQU WITH.RUN TO SC_FRAMES(11) +EQU WITH0.RUN TO SC_FRAMES(12) +EQU SORT.RUN TO SC_FRAMES(13) +EQU TEMPLATE.CACHE TO 14 +EQU TEMPLATE.NAMES TO SC_FRAMES(14) +EQU TEMPLATE.CACHE.TOP TO 40 +EQU XLATE.CACHE TO 41 +EQU XLATE.CACHE.TOP TO 49 + + +EQU NULL$ TO "" +EQU SPACE$ TO \20\ +EQU DBODELIM$ TO \2E\ ;* Databse owner delimiter "." + +*÷ MESSAGES called (Terminate with '$') : +EQU BADPASS$ TO "W125" ;* Incorrect password +EQU BADACCT$ TO "W116" ;* Invalid account name +EQU UNAVAIL$ TO "W505" ;* X is unavailable after Y +EQU MISMATCH$ TO "W500" ;* Mismatch between volumes and files +EQU NOEXIST$ TO "W517" ;* Unable to attach "file" in the "account" on the "volume" + +*÷ DECLARED - FUNCTIONS called : +DECLARE FUNCTION UNASSIGNED + +*÷ DECLARED - SUBROUTINES called : +DECLARE SUBROUTINE RTP49 + + + + + +*÷÷ PROGRAM TOP +! +IF UNASSIGNED(Options) THEN Options = NULL$ +IF UNASSIGNED(AliasName) THEN +AliasName = DefaultSysAliasFile$ +END + +SaveAlias = AliasName +@FILE.ERROR = NULL$ +Errors = NULL$ + +SysUser = SC_USER +CONVERT ".$-" TO "___" IN SysUser +* +IF @USERNAMENE 'SYSPROG' THEN +IF Account NE 'GLOBAL' THEN +IF Account NE @USERNAMETHEN +READ Rec FROM SC_FILE_SYSENV, Account THEN +IF Rec<1> = 'ACCOUNT' THEN +Encrypt.Data = Password +IF LEN(Encrypt.Data) THEN +gosub ENCRYPT.DATA +END +IF Rec<6> = Encrypt.Data ELSE +IF Rec<7> THEN +EncryptedPassword = Encrypt.Data +Ok = FALSE$ +Cnt = COUNT(Rec<7>, @VM) + (Rec<7> NE NULL$) +For J = 1 to Cnt +Encrypt.Data = Rec<7, J> +gosub ENCRYPT.DATA +IF Encrypt.Data = EncryptedPassword THEN +Ok = TRUE$ +END +Next J +IF Ok ELSE + +Errors := @RM : BADPASS$ +END +END ELSE + +Errors := @RM : BADPASS$ +END +END +END ELSE + +Errors := @RM : BADACCT$ : @fm : Account +END +END ELSE + +Errors := @RM : BADACCT$ : @fm : Account +END +END +END +END + +IF Errors ELSE +IF Table[1, 5] = "DATA." THEN +RealName = Table[6, len(table)] +END ELSE +RealName = Table +END + +RTP49(Volume, 0, VolumeRec, NULL$) + +IF @FILE.ERROR THEN +Errors := @RM : @FILE.ERROR +END ELSE +VolumeFiles = VolumeRec<3> +MapFS = VolumeRec<4> +CONVERT @VM TO @SVM IN MapFS +Pos = COUNT(MapFS, @SVM) +IF Pos THEN +MapFS1 = MapFS<1, 1, 1> +MapBFS = MapFS<1, 1, Pos + 1> +END ELSE +MapFS1 = MapFS +MapBFS = MapFS +END +MapHandle = VolumeRec<5> + +gosub SET_QFILE + +IF Status THEN +IF WRITE.OPT OR INDEX(Options, "W", 1) THEN +* FOO If DO_OPEN('',SysAliasesFile$ ,FileQfiles ) ELSE +OPEN SYSALIASESFILE$ TO FILEQFILES ELSE +FileQfiles = SC_FILE_VOC +END +CTO%KPLK=0;CALL WRITE_LOCK(FileQfiles,AliasName ,DefaultSysAliasFile$:@FM:Account:@FM:Table:@fm:Volume ,'',CTO%KPLK);if CTO%KPLK = '0' ELSE +Errors := @RM : @FILE.ERROR +END +END + +IF Table[1, 5] = "DICT." OR TABLE[1, 5] = "DATA." or table[1,1] = '!' ELSE + +RealName = 'DICT.' : Table +AliasName = 'DICT.' : AliasName +gosub SET_QFILE +IF Status THEN +RealName = '!' : Table +AliasName = '!' : AliasName[6,len(aliasname)] +gosub SET_QFILE +END +END +VolumeRec<3> = VolumeFiles +GOSUB_PARAM = Volume:@FM:VolumeRec +gosub WRITE_VOLUMES +END ELSE +Errors := @RM : NOEXIST$ : @FM : RealName : @VM : Account : @VM : Volume +END +END +END + +IF Errors THEN +@FILE.ERROR = Errors[2, LEN(Errors)] +STATUS() = FSLOGICAL$ +END ELSE +@FILE.ERROR = NULL$ +END +TRANSFER SaveAlias TO AliasName +return + +*----------------------------------------------------------------------------- +SET_QFILE: + +Status = FALSE$ + +IF RealName = "REVMEDIA" THEN +IF Account = "SYSPROG" THEN +gosub DETACH_FILE +GOSUB_PARAM = AliasName:@FM:Volume:@FM:RealName:@FM:Account:@FM:MapFS:@FM:MapHandle +gosub WRITE_FILES +LOCATE AliasName IN VolumeFiles USING @VM SETTING I ELSE +VolumeFiles = INSERT(VolumeFiles,1,I,0,AliasName) +END +Status = TRUE$ +return +END +END + +gosub GET_FILE_REC + +IF Status THEN +gosub DETACH_FILE +FileRec = FileRec<2> +IF MapBFS NE "RTP59" THEN +IF RealName[1, 5] = "DICT." THEN +FileRec = INSERT(FileRec, 1, 1, 0, "DICT.MFS") +END +LOCATE "PROTECT.MFS" IN FileRec USING @VM SETTING Pos THEN +IF POS > 1 THEN +FileRec = DELETE(FileRec, 1, Pos, 0) +FileRec = INSERT(FileRec, 1, 1, 0, "PROTECT.MFS") +END +END +END +*--> 12-25-93 - janem - bug #12320, #13921 +If Table[1,5] = 'DATA.' Then +Locate "SI.MFS" in FileRec Using @vm Setting Pos Then +FileRec = Delete(Filerec,1,Pos,0) +End +End +*--> 12-25-93 - janem - bug #12320, #13921 +GOSUB_PARAM = AliasName:@FM:Volume:@FM:RealName:@FM:Account:@FM:INSERT(FileRec,1,-1,0,MapFS) +gosub WRITE_FILES + +LOCATE AliasName IN VolumeFiles USING @VM SETTING Pos ELSE +VolumeFiles = INSERT(VolumeFiles, 1, Pos, 0, AliasName) +END + +BEGIN CASE +CASE AliasName = SysPtrs_File$ +If DO_OPEN('',SysPtrs_File$ ,SC_FILE_VOC ) ELSE +Status = FALSE$ +END + +CASE AliasName = SysDict_File$ +If DO_OPEN('',SysDict_File$ ,SC_DICT_VOC ) ELSE +Status = FALSE$ +END + +CASE AliasName = SysObj_File$ +If DO_OPEN('',SysObj_File$ ,SC_FILE_VERBS ) ELSE +Status = FALSE$ +END + +END CASE +IF Status ELSE +Errors := @RM : UNAVAIL$ : @FM : AliasName : @VM : "SetAlias_Sub" +END +END + +return + +*---------------------------------------------------------------------------- +GET_FILE_REC: + +Status = FALSE$ + +NameTemp = RealName +IF NameTemp[1,1] = '!' THEN +Bang = '!' +NameTemp[1,1] = NULL$ +END ELSE +Bang = '' +END + +IF NameTemp[1,5] = "DICT " OR NameTemp[1,5] = "DICT." THEN +Dict = "DICT." +NameTemp[1,5] = '' +NameTemp = DO_XSWAP('TRIM',NameTemp) +END ELSE +Dict = NULL$ +END + +If NameTemp[1,5] = "DATA " or NameTemp[1,5] = "DATA." Then +Dict = "DATA." +NameTemp[1,5] = '' +NameTemp = DO_XSWAP('TRIM',NameTemp) +End +UserSpec = '' +AtIX = INDEX(NameTemp, DBODELIM$, 1) +IF AtIX THEN +UserSpec = NameTemp[1, AtIX - 1] +NameTemp[1,AtIX] = '' +END + +IF UserSpec THEN +RealName = Bang:Dict:UserSpec:DBODELIM$:NameTemp +END ELSE +RealName = Bang:Dict:SysUser:DBODELIM$:NameTemp +END + +call @MapFS1(READO.RECORD, MapFS, MapHandle, RealName:'*':Account, '', FileRec, Status) +if status else +CALL @MapFS1(READO.RECORD, MapFS, MapHandle, RealName:'*GLOBAL', '', FileRec, Status) +if status then +Account = 'GLOBAL' +end else +RealName = Bang:Dict:NameTemp +CALL @MapFS1(READO.RECORD, MapFS, MapHandle, RealName:'*':Account, '', FileRec, Status) +if status else +CALL @MapFS1(READO.RECORD, MapFS, MapHandle, RealName:'*GLOBAL', '', FileRec, Status) +if status then +Account = 'GLOBAL' +end +end +end +end +return + +*---------------------------------------------------------------------------- +DETACH_FILE: +GOSUB_PARAM = AliasName +gosub READ_FILES +IF GOSUB_RETURN THEN +OrgVolume = GOSUB_RETURN<1> +IF OrgVolume NE Volume THEN +GOSUB_PARAM = OrgVolume +gosub READ_VOLUMES +IF GOSUB_RETURN THEN +LOCATE AliasName IN GOSUB_RETURN<3> USING @VM SETTING I THEN +GOSUB_PARAM = OrgVolume:@FM:DELETE(GOSUB_RETURN, 3, I, 0) +gosub WRITE_VOLUMES +END ELSE +Errors := @RM : MISMATCH$ : @FM : "SetAlias_Sub" +END +END ELSE +Errors := @RM : MISMATCH$ : @FM : "SetAlias_Sub" +END +END +END +return + +*$INSERT AREV_BP, FILE_VOL_GOSUB +* +* +! +* +* This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied +* without written permission from COSMOS, INC. +* +! +* +*÷ VERSION : Arev 2.0 +* +*÷ PURPOSE : Simulate READ, WRITE and DELETE calls to the FILES and +* VOLUMES files. +* It is 3 times faster to retrieve information directly +* from the system variables as opposed to using the +* RTP50 filing system. +* +*÷ AUTHOR : John Paul Voelk +* +*÷ CREATED : 9-11-89 +* +*÷ PROCEDURES : +* +*÷ WARNINGS : +* + +! +*÷ REVISION HISTORY (Most CURRENT first) : + +* DATE IMPLEMENTOR FUNCTION +* -------- ----------- -------- +* DD-MM-YY initials Modification + +! + +*÷ THEORY OF OPERATION : + +READ_FILES: +* +* Pass in Record to be read in GOSUB_PARAM variable. Record is returned +* in the GOSUB_RETURN variable. If this is null (0 length) then the +* record doesn't exist. +* + + +GOSUB_RETURN = '' +LOCATE GOSUB_PARAM IN SC_ARRAY_TABLES(0) USING @FM SETTING GOSUB_TMP THEN +GOSUB_RETURN = SC_ARRAY_TABLES(1):@FM:SC_ARRAY_TABLES(2):@FM:SC_ARRAY_TABLES(3):@FM:SC_ARRAY_TABLES(4) +END +return + +WRITE_FILES: +* +* Pass in all fields to be written (including the key), in order and @FM +* delimited in the GOSUB_PARAM variable. +* +LOCATE GOSUB_PARAM<1> IN SC_ARRAY_TABLES(0) USING @FM SETTING GOSUB_TMP THEN +SC_ARRAY_TABLES(1) = GOSUB_PARAM<2> +SC_ARRAY_TABLES(2) = GOSUB_PARAM<3> +SC_ARRAY_TABLES(3) = GOSUB_PARAM<4> +SC_ARRAY_TABLES(4) = GOSUB_PARAM<5> +SC_ARRAY_TABLES(5) = GOSUB_PARAM<6> +END ELSE +SC_ARRAY_TABLES(0) := @FM:GOSUB_PARAM<1> +SC_ARRAY_TABLES(1) := @FM:GOSUB_PARAM<2> +SC_ARRAY_TABLES(2) := @FM:GOSUB_PARAM<3> +SC_ARRAY_TABLES(3) := @FM:GOSUB_PARAM<4> +SC_ARRAY_TABLES(4) := @FM:GOSUB_PARAM<5> +SC_ARRAY_TABLES(5) := @FM:GOSUB_PARAM<6> +END +return + +DELETE_FILES: +* +* Pass in key name or filename of file to be removed in the GOSUB_PARAM +* variable. +* +LOCATE GOSUB_PARAM IN SC_ARRAY_TABLES(0) USING @FM SETTING GOSUB_TMP THEN +SC_ARRAY_TABLES(0) = DELETE(SC_ARRAY_TABLES(0), GOSUB_TMP, 0, 0) +SC_ARRAY_TABLES(1) = DELETE(SC_ARRAY_TABLES(1), GOSUB_TMP, 0, 0) +SC_ARRAY_TABLES(2) = DELETE(SC_ARRAY_TABLES(2), GOSUB_TMP, 0, 0) +SC_ARRAY_TABLES(3) = DELETE(SC_ARRAY_TABLES(3), GOSUB_TMP, 0, 0) +SC_ARRAY_TABLES(4) = DELETE(SC_ARRAY_TABLES(4), GOSUB_TMP, 0, 0) +SC_ARRAY_TABLES(5) = DELETE(SC_ARRAY_TABLES(5), GOSUB_TMP, 0, 0) +END +return + +* +READ_VOLUMES: +* +* Pass in Record to be read in GOSUB_PARAM variable. Record is returned +* in the GOSUB_RETURN variable. If this is null (0 length) then the +* record doesn't exist. +* +GOSUB_RETURN = '' +LOCATE GOSUB_PARAM IN SC_ARRAY_VOLUMES(0) USING @FM SETTING GOSUB_TMP THEN +GOSUB_RETURN = SC_ARRAY_VOLUMES(1):@FM:SC_ARRAY_VOLUMES(2) +GOSUB_RETURN := @FM:SC_ARRAY_VOLUMES(3):@FM:SC_ARRAY_VOLUMES(4) +GOSUB_RETURN := @FM:SC_ARRAY_VOLUMES(5) +END +return + +WRITE_VOLUMES: +* +* Pass in all fields to be written (including the key), in order and @FM +* delimited in the GOSUB_PARAM variable. +* +LOCATE GOSUB_PARAM<1> IN SC_ARRAY_VOLUMES(0) USING @FM SETTING GOSUB_TMP THEN +SC_ARRAY_VOLUMES(1) = GOSUB_PARAM<2> +SC_ARRAY_VOLUMES(2) = GOSUB_PARAM<3> +SC_ARRAY_VOLUMES(3) = GOSUB_PARAM<4> +SC_ARRAY_VOLUMES(4) = GOSUB_PARAM<5> +SC_ARRAY_VOLUMES(5) = GOSUB_PARAM<6> +END ELSE +SC_ARRAY_VOLUMES(0) := @FM:GOSUB_PARAM<1> +SC_ARRAY_VOLUMES(1) := @FM:GOSUB_PARAM<2> +SC_ARRAY_VOLUMES(2) := @FM:GOSUB_PARAM<3> +SC_ARRAY_VOLUMES(3) := @FM:GOSUB_PARAM<4> +SC_ARRAY_VOLUMES(4) := @FM:GOSUB_PARAM<5> +SC_ARRAY_VOLUMES(5) := @FM:GOSUB_PARAM<6> +END +return + +DELETE_VOLUMES: +* +* Pass in key name or filename of file to be removed in the GOSUB_PARAM +* variable. +* +LOCATE GOSUB_PARAM IN SC_ARRAY_VOLUMES(0) USING @FM SETTING GOSUB_TMP THEN +SC_ARRAY_VOLUMES(0) = DELETE(SC_ARRAY_VOLUMES(0), GOSUB_TMP, 0, 0) +SC_ARRAY_VOLUMES(1) = DELETE(SC_ARRAY_VOLUMES(1), GOSUB_TMP, 0, 0) +SC_ARRAY_VOLUMES(2) = DELETE(SC_ARRAY_VOLUMES(2), GOSUB_TMP, 0, 0) +SC_ARRAY_VOLUMES(3) = DELETE(SC_ARRAY_VOLUMES(3), GOSUB_TMP, 0, 0) +SC_ARRAY_VOLUMES(4) = DELETE(SC_ARRAY_VOLUMES(4), GOSUB_TMP, 0, 0) +SC_ARRAY_VOLUMES(5) = DELETE(SC_ARRAY_VOLUMES(5), GOSUB_TMP, 0, 0) +END +return +* Source Date: 11:38:47 13 NOV 1990 Build ID: AREV*2.0.108 Level: 2.1 +*$INSERT AREV_BP, ENCRYPT.DATA.GOSUB +ENCRYPT.DATA: +I = 1234567 +LOOP +WHILE ENCRYPT.DATA NE '' +I = MOD(I,390001) * SEQ(ENCRYPT.DATA[1,1]) + 1 +ENCRYPT.DATA[1,1] = '' +REPEAT +LOOP +ENCRYPT.DATA := CHAR(65+MOD(I,50)) +I = INT(I/50) +WHILE I +REPEAT +return +* Source Date: 10:20:16 03 FEB 1988 Build ID: 1.0 Level: 2.0 +* Source Date: 09:49:41 16 JUN 1994 Build ID: AREV_HR*3.1.56 Level: 3.13 + +* PreCompiled On 12/06/2006 at 04:41:49PM OpenInsight version CTO diff --git a/SYSPROG/STPROC/TEMP.txt b/SYSPROG/STPROC/TEMP.txt new file mode 100644 index 0000000..da8c294 --- /dev/null +++ b/SYSPROG/STPROC/TEMP.txt @@ -0,0 +1,24 @@ +Compile Subroutine Temp(dummy) + +Debug + +Open 'SYSENV' To hSysenv Then + Open 'TEMP_SYSENV' To hNewSysenv Then + Select hSysenv + EOF = 0 + Loop + Readnext Key Else EOF = 1 + Until EOF + //If IndexC(Key, 'SRP', 1) then + Read Rec From hSysenv, Key Then + Write Rec To hNewSysenv, Key Else + Debug + end + End + //end + Repeat + End +End + + +return diff --git a/SYSPROG/STPROC/TEMP2.txt b/SYSPROG/STPROC/TEMP2.txt new file mode 100644 index 0000000..ffbc8ff --- /dev/null +++ b/SYSPROG/STPROC/TEMP2.txt @@ -0,0 +1,24 @@ +Compile Subroutine Temp2(dummy) + +debug + +Open 'SYSENV' To hSysenv Then + Open 'TEMP_SYSENV' To hTempSysenv Then + Select hSysenv + EOF = 0 + Loop + Readnext Key Else EOF = 1 + Until EOF + + Read Rec From hSysenv, Key Then + Write Rec To hTempSysenv, Key Else + Debug + end + End + + Repeat + End +End + + +return diff --git a/SYSPROG/STPROC/TEST_LDAP.txt b/SYSPROG/STPROC/TEST_LDAP.txt new file mode 100644 index 0000000..7cffa2d --- /dev/null +++ b/SYSPROG/STPROC/TEST_LDAP.txt @@ -0,0 +1,12 @@ +Compile Function Test_LDAP(Param1) + +Declare Function RTI_LDAP_Groups_For_User + +Main: + + debug + ADGroups = RTI_LDAP_Groups_for_User('STIEBERD', 'infineon') + +Return + + diff --git a/SYSPROG/STPROC/T_CLEAN_SYSLISTS.txt b/SYSPROG/STPROC/T_CLEAN_SYSLISTS.txt new file mode 100644 index 0000000..fc8a956 --- /dev/null +++ b/SYSPROG/STPROC/T_CLEAN_SYSLISTS.txt @@ -0,0 +1,60 @@ +Subroutine t_clean_syslists(void) + + +Open 'SYSLISTS' To f_syslists Else + debug + x = 'wtf?' + Return '' +End + +debug +list = '' +done = '' +Select f_syslists +Loop + Readnext id Else done = 1 +Until done + killit = 0 + Begin Case + Case id[1,1] eq '$'; killit = 1 + Case Index(id, '__',1) + Case Indexc(id, 'BARRY',1) + Case Indexc(id, 'SEAN',1) + Case Indexc(id, 'BOBC',1) + Case Count(id,'*') gt 1 And Index(id, '201', 1) ; killit = 1 + Case Count(id,'*') gt 1 And Index(id, '*15', 1) ; killit = 1 + Case Count(id,'*') gt 1 And Index(id, '*14', 1) ; killit = 1 + Case id[1,2] _Eqc 'W*' + test = id[-1,'B*'] + test = test[1,'.'] + If test gt 0 And test lt date() Then + killit = 1 + end + End Case + If killit Then + list<-1> = id + End + +Repeat +debug + +id = '' +col = '' +Loop + Remove id From list at col Setting mark + If id # '' Then + test = id[-1,'B*'] + Begin Case + Case Index(test, '.',1) + Case alpha(test) + Case Num(test) + id = Field(id, '*', 1, Count(id, '*')) + End Case + If id # '' Then + Call Delete_Save_Select(id) + Call Set_Status(0) + end + End +While mark +repeat +Return '' diff --git a/SYSPROG/STPROC/WINDOWS_SERVICES.txt b/SYSPROG/STPROC/WINDOWS_SERVICES.txt new file mode 100644 index 0000000..195dc76 --- /dev/null +++ b/SYSPROG/STPROC/WINDOWS_SERVICES.txt @@ -0,0 +1,449 @@ +Function Windows_Services(@Service, @Params) +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Windows_Services + + Description : Handler program for all module related services. + + Notes : The generic parameters should contain all the necessary information to process the services. Often + this will be information like the data Record and Key ID. + + Parameters : + Service [in] -- Name of the service being requested + Error [out] -- Any errors that were created + Param1-10 [in/out] -- Additional request parameter holders + Response [out] -- Response to be sent back to the Controller (MCP) or requesting procedure + + History : (Date, Initials, Notes) + 05/14/13 dmb Original programmer. + 05/15/13 dmb Add the IsRunning and Close service. Update the GetHandle service to use the GetTopWindow + API function. + 05/22/13 dmb Add Hide, Show, Maximize, and Minimize services (all based on the ShowWindow API). + 10/02/13 dmb [SRPFW-18] Add IsVisible service. + 11/11/13 dmb [SRPFW-75] Add RunEXE and OpenFile services. + 11/12/13 dmb [SRPFW-76] Add KillEXE service. + 03/28/20 dmb [SRPFW-304] Update services to use Error_Services when applicable. + 05/13/20 dmb [SRPFW-312] Add MakeActive service. + +***********************************************************************************************************************/ + +#pragma precomp SRP_PreCompiler + +$insert LOGICAL +$insert SERVICE_SETUP + +// General Windows API equates +Equ WM_USER to 1024 +Equ WM_CLOSE to 16 +Equ WM_COMMAND to 273 +Equ WM_LBUTTONDOWN to 513 ; // 0x0201 +Equ WM_LBUTTONUP to 514 ; // 0x0202 +Equ WM_LBUTTONDBLCLK to 515 ; // 0x0203 +Equ WM_RBUTTONDOWN to 516 ; // 0x0204 +Equ WM_RBUTTONUP to 517 ; // 0x0205 +Equ WM_PARENTNOTIFY to 528 ; // 0x0210 +Equ WM_SYSCOLORCHANGE to 21 ; // 0x0015 +Equ WM_SETCURSOR to 32 ; // 0x0020 +Equ WM_SIZE to 5 ; // 0x0005 +Equ WM_MOVE to 3 ; // 0x0003 +Equ WM_GETMINMAXINFO to 36 ; // 0x0024 +Equ WM_WINDOWPOSCHANGING to 70 + +// ShowWindow API equates +Equ SW_FORCEMINIMIZE to 11 +Equ SW_HIDE to 0 +Equ SW_MAXIMIZE to 3 +Equ SW_MINIMIZE to 6 +Equ SW_RESTORE to 9 +Equ SW_SHOW to 5 +Equ SW_SHOWDEFAULT to 10 +Equ SW_SHOWMAXIMIZED to 3 +Equ SW_SHOWMINIMIZED to 2 +Equ SW_SHOWMINNOACTIVE to 7 +Equ SW_SHOWNA to 8 +Equ SW_SHOWNOACTIVATE to 4 +Equ SW_SHOWNORMAL to 1 + +Declare function Windows_Services, WinAPI_MoveWindow, WinAPI_GetWindowTextA, WinAPI_GetWindow, WinAPI_IsWindow +Declare function FindWindow, PostMessage, ShowWindow, IsWindowVisible +Declare function SRP_GetTopWindow, ShellExecute, Kill_Application, Utility +Declare subroutine Windows_Services, SRP_SetForeGroundWindow + +GoToService else + Error_Services('Set', Service : ' is not a valid service request within the ' : ServiceModule : ' services module.') +end + +Return Response else '' + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Service Parameter Options +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +Options BOOLEAN = True$, False$ + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Services +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// + +//---------------------------------------------------------------------------------------------------------------------- +// SetSize +// +// Param1 - Handle to the window. +// Param2 - Class Name to the window. This is ignored if there is a handle. +// Param3 - Caption text of the window. This is ignored if there is a handle or class name. +// Param4 - X Position. +// Param5 - Y Position. +// Param6 - Width. +// Param7 - Height. +// +// Sets the size of the window. +//---------------------------------------------------------------------------------------------------------------------- +Service SetSize(Handle, ClassName, CaptionText, XPos, YPos, Width, Height) + + If Len(Handle) EQ 0 then + Begin Case + Case Len(ClassName) + Handle = Windows_Services('GetHandle', ClassName) + + Case Len(CaptionText) + Handle = Windows_Services('GetHandle', '', CaptionText) + + End Case + end + + If Handle GT 0 then + rv = WinAPI_MoveWindow(Handle, XPos, YPos, Width, Height, True$) + end else + Error_Services('Add', 'No valid window was passed in to the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// IsRunning +// +// Param1 - Handle to the window. +// Param2 - Class Name to the window. This is ignored if there is a handle. +// Param3 - Caption text of the window. This is ignored if there is a handle or class name. +// +// Returns True if the window is running or False is not. +//---------------------------------------------------------------------------------------------------------------------- +Service IsRunning(Handle, ClassName, CaptionText) + + Begin Case + Case Len(Handle) + If WinAPI_IsWindow(Handle) else Handle = '' + + Case Len(ClassName) + Handle = Windows_Services('GetHandle', ClassName) + + Case Len(CaptionText) + Handle = Windows_Services('GetHandle', '', CaptionText) + + End Case + + Response = (Handle GT 0) + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// IsVisible +// +// Param1 - Handle to the window. +// Param2 - Class Name to the window. This is ignored if there is a handle. +// Param3 - Caption text of the window. This is ignored if there is a handle or class name. +// +// Returns True if the window is visible or False is not. +//---------------------------------------------------------------------------------------------------------------------- +Service IsVisible(Handle, ClassName, CaptionText) + + Begin Case + Case Len(Handle) + If WinAPI_IsWindow(Handle) else Handle = '' + + Case Len(ClassName) + Handle = Windows_Services('GetHandle', ClassName) + + Case Len(CaptionText) + Handle = Windows_Services('GetHandle', '', CaptionText) + + End Case + + Response = (IsWindowVisible(Handle) GT 0) + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// RunEXE +// +// Param1 - Full path and file name of the executable to run. +// +// Runs an executable program. This uses the RUNWIN service without any special flags. Therefore all executables will be +// launched modelessly and in normal mode. +//---------------------------------------------------------------------------------------------------------------------- +Service RunEXE(PathToEXE) + + If Len(PathToEXE) then + AppInfo = Utility('RUNWIN', PathToEXE) + If Len(AppInfo<2>) else + Error_Services('Add', Quote(PathToExe) : ' is an invalid executable file provided to the ' : Service : ' service.') + end + end else + Error_Services('Add', 'No path to an executable file was provided to the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// OpenFile +// +// Param1 - Full path and file name to open. +// +// Opens an OS file. This uses the ShellExecute Windows API without any special flags. +//---------------------------------------------------------------------------------------------------------------------- +Service OpenFile(PathToFile) + + If Len(PathToFile) then + rv = ShellExecute('', 'open' : \00\, PathToFile : \00\, '' : \00\, '' : \00\, 0) + end else + Error_Services('Add', 'No path to a file was provided to the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// Close +// +// Param1 - Handle to the window. +// Param2 - Class Name to the window. This is ignored if there is a handle. +// Param3 - Caption text of the window. This is ignored if there is a handle or class name. +// +// Close the window. If the class name or window caption is passed in, only the first instance of any window will be +// closed. The developer will need to call the Close service multiple times until there are no more matching windows. +//---------------------------------------------------------------------------------------------------------------------- +Service Close(Handle, ClassName, CaptionText) + + If Len(Handle) EQ 0 then + Begin Case + Case Len(ClassName) + Handle = Windows_Services('GetHandle', ClassName) + + Case Len(CaptionText) + Handle = Windows_Services('GetHandle', '', CaptionText) + + End Case + end + + If Handle GT 0 then + rv = PostMessage(Handle, WM_CLOSE, 0, 0) + end else + Error_Services('Add', 'No valid window was passed in to the ' : Service : ' service.') + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// KillEXE +// +// Param1 - Full path and file name of the executable to run. +// Param2 - Caption text of the window. +// +// Attempts to kill a running executable program. Returns a 1 if successful, or a negative number if unsuccessful. +//---------------------------------------------------------------------------------------------------------------------- +Service KillEXE(EXEName, CaptionText) + + Results = '' + + If Len(EXEName) OR Len(CaptionText) then + Results = Kill_Application(EXEName, CaptionText, TimeoutDelay, True$) + end else + Error_Services('Add', 'No valid executable file or caption was provided to the ' : Service : ' service.') + end + + Response = Results + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// Hide +// +// Param1 - Handle to the window. +// Param2 - Class Name to the window. This is ignored if there is a handle. +// Param3 - Caption text of the window. This is ignored if there is a handle or class name. +// +// Hide the window. If the class name or window caption is passed in, only the first instance of any window will be +// hidden. The developer will need to call the Hide service multiple times until there are no more matching windows. +//---------------------------------------------------------------------------------------------------------------------- +Service Hide(Handle, ClassName, CaptionText) + + CmdShow = SW_HIDE + GoSub ShowWindowAPI + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// Show +// +// Param1 - Handle to the window. +// Param2 - Class Name to the window. This is ignored if there is a handle. +// Param3 - Caption text of the window. This is ignored if there is a handle or class name. +// +// Activates the window and displays it in its current size and position. If the class name or window caption is passed +// in, only the first instance of any window will be hidden. The developer will need to call the Hide service multiple +// times until there are no more matching windows. +//---------------------------------------------------------------------------------------------------------------------- +Service Show(Handle, ClassName, CaptionText) + + CmdShow = SW_SHOW + GoSub ShowWindowAPI + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// Maximize +// +// Param1 - Handle to the window. +// Param2 - Class Name to the window. This is ignored if there is a handle. +// Param3 - Caption text of the window. This is ignored if there is a handle or class name. +// +// Maximizes the specified window. If the class name or window caption is passed in, only the first instance of any +// window will be hidden. The developer will need to call the Hide service multiple times until there are no more +// matching windows. +//---------------------------------------------------------------------------------------------------------------------- +Service Maximize(Handle, ClassName, CaptionText) + + CmdShow = SW_MAXIMIZE + GoSub ShowWindowAPI + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// Minimize +// +// Param1 - Handle to the window. +// Param2 - Class Name to the window. This is ignored if there is a handle. +// Param3 - Caption text of the window. This is ignored if there is a handle or class name. +// +// Minimizes the specified window. If the class name or window caption is passed in, only the first instance of any +// window will be hidden. The developer will need to call the Hide service multiple times until there are no more +// matching windows. +//---------------------------------------------------------------------------------------------------------------------- +Service Minimize(Handle, ClassName, CaptionText) + + CmdShow = SW_MINIMIZE + GoSub ShowWindowAPI + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// MakeActive +// +// Handle - Handle to the window. - [Required] +// +// Brings the window to the foreground and makes it active. This uses the SetForegroundWindow API: +// https://docs.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-setforegroundwindow +//---------------------------------------------------------------------------------------------------------------------- +Service MakeActive(Handle) + + If Handle NE '' then + SRP_SetForeGroundWindow(Handle) + end + +end service + + +//---------------------------------------------------------------------------------------------------------------------- +// GetHandle +// +// Param1 - Class Name to the window. +// Param2 - Caption text of the window. This is ignored if there is a handle or class name. +// Param3 - Flag that determines if all handles should be returned rather than the first match. Only works when finding +// handles by CaptionText. +// +// Gets the handle for the window. +//---------------------------------------------------------------------------------------------------------------------- +Service GetHandle(ClassName, CaptionText, AllHandles) + + Handle = '' + If AllHandles NE True$ then AllHandles = False$ + + Begin Case + Case Len(ClassName) + // The FindWindow API returns the handle of a valid class name that is already running. + Handle = FindWindow(ClassName : \00\, '') + + Case Len(CaptionText) + // The GetTopWindow API will return the handle of the first window running in z-order. + StartHandle = SRP_GetTopWindow('') + NextHandle = StartHandle + TextBuffer = Str(\00\, 100) + // The GetWindowText API will return the caption text of the window. + rv = WinAPI_GetWindowTextA(NextHandle, TextBuffer, Len(TextBuffer)) + ThisCaption = TextBuffer[1, \00\] + If ThisCaption EQ CaptionText then Handle = NextHandle : @FM + + // If the top window is not a match, then use the GetWindow API to retrieve the next running window's + // handle. Continue to loop through each window until a match is found or there are no more windows + // to process. + If Len(Handle) EQ 0 OR AllHandles = True$ then + Loop + Until (NextHandle EQ 0) OR (Len(Handle) AND AllHandles EQ False$) + NextHandle = WinAPI_GetWindow(NextHandle, 2) + TextBuffer = Str(\00\, 100) + rv = WinAPI_GetWindowTextA(NextHandle, TextBuffer, Len(TextBuffer)) + ThisCaption = TextBuffer[1, \00\] + If ThisCaption EQ CaptionText then + Locate NextHandle in Handle using @FM setting fPos else + Handle := NextHandle : @FM + end + end + Repeat + end + Handle[-1, 1] = '' ; // Strip off the final @FM + + End Case + + Response = Handle + +end service + + +//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Internal GoSubs +////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////? + +ShowWindowAPI: + + If Len(Handle) EQ 0 then + Begin Case + Case Len(ClassName) + Handle = Windows_Services('GetHandle', ClassName) + + Case Len(CaptionText) + Handle = Windows_Services('GetHandle', '', CaptionText) + + End Case + end + + If Handle GT 0 then + rv = ShowWindow(Handle, CmdShow) + end else + Error_Services('Add', 'No valid window was passed in to the ' : Service : ' service.') + end + +return diff --git a/SYSPROG/STPROC/WM_MFS.txt b/SYSPROG/STPROC/WM_MFS.txt new file mode 100644 index 0000000..9a565bf --- /dev/null +++ b/SYSPROG/STPROC/WM_MFS.txt @@ -0,0 +1,295 @@ +COMPILE SUBROUTINE WM_MFS(Code, BFS, Handle, Name, FMC, Record, Status) + +DECLARE Subroutine Msg, FSMsg, Set_Status +DECLARE FUNCTION Set_Status, Get_Status, obj_WM_In, obj_WM_Out + +COMMON /FILENAME/ Files_Array, Handles_Array + +FS = DELETE(BFS,1,1,1) +NEXTFS = FS<1,1,1> +@FILE.ERROR = '' + +$INSERT FILE.SYSTEM.ONGOSUB +$INSERT FILE.SYSTEM.EQUATES +$INSERT MSG_EQUATES +$INSERT DICT_EQUATES +$INSERT WM_OUT_EQUATES +$INSERT WM_IN_EQUATES +$INSERT WO_MAT_EQUATES + +EQU ReadRec$ TO 1 + +*EQU WO_MAT_WMI_CURR_STATUS$ TO 48 +*EQU WO_MAT_WMO_CURR_STATUS$ TO 49 + +RETURN + +/* Directly called functions - don't pass to next file system */ + +INSTALL: +FLUSH: +UNLOCK.ALL: +FLUSH.CACHE: + +Status = 1 +RETURN + +/* Not available to MFS */ + +LOCK.SEMAPHORE: +UNLOCK.SEMAPHORE: +SET.USER.SEMAPHORE: + +RETURN + +/* Directory level calls */ + +CREATE.MEDIA: +OPEN.MEDIA: +CLOSE.MEDIA: +READ.MEDIA: +WRITE.MEDIA: +GROUP.NUMBER: +RECORD.COUNT: +CREATE.FILE: +RENAME.FILE: +MOVE.FILE: +DELETE.FILE: + +Goto NEXT.FS + +OPEN.FILE: + + * Call BFS in order to get file handle + + FS = DELETE(BFS,1,1,1) + NEXTFS = FS<1,1,1> + CALL @NEXTFS(Code, FS, Handle, Name, FMC, Record, Status) + + * Load handle and file name into labelled common + + IF Status THEN + LOCATE Name IN Files_Array USING @FM SETTING POS THEN + Handles_Array = Record + END ELSE + Files_Array<-1> = Name + Handles_Array<-1> = Record + END + END + RETURN + +CLEARFILE: +REMAKE.FILE: +SELECT: +READNEXT: +CLEARSELECT: + +READ.RECORD: +READO.RECORD: + + GOTO NEXT.FS + +* * * * * * * +WRITE.RECORD: +* * * * * * * + + * Get original record and compare with RECORD being written + LOCATE Handle IN Handles_Array USING @FM SETTING POS ELSE + mesg = "Missing file handle in WM_MFS!|" + mesg := handle + MSG('',mesg) + GOTO NEXT.FS + END + + FileName = Files_Array[1,'*'] ;* Extract corresponding file name + + Write_Flag = 0 + OrgRecord = '' + NextFS = BFS<1,1,2> + + CALL @NextFS(ReadRec$, FS, Handle, Name, FMC, OrgRecord, Status) ;* Read old record + + OPEN 'WO_MAT' TO WOMatFile ELSE + MSG('',"Unable to open 'WO_MAT' table in WM_MFS") + GOTO NEXT.FS + END + + IF FileName = 'WM_IN' THEN + + WONo = Name[1,'*'] + WOStep = Name[COL2()+1,'*'] + CassNo = Name[COL2()+1,'*'] + + Set_Status(0) + NewStatus = obj_WM_In('CurrStatus',Name:@RM:RECORD) + + IF Get_Status(errCode) THEN + NewStatus = 'ERR' + END + + WOMatKey = WONo:'*':CassNo + READ WOMatRec FROM WOMatFile,WOMatKey THEN + + SlotCnt = COUNT(RECORD,@VM) + (RECORD NE '') + + FOR I = 1 TO SlotCnt + WOMatRec = RECORD + NEXT I + + IF WOMatRec NE NewStatus THEN + WOMatRec = NewStatus + END + + WRITE WOMatRec ON WOMatFile,WOMatKey ELSE Null + + END ELSE + *MSG('',"Unable to read 'WO_MAT' record ":QUOTE(WOMatKey):" in WM_MFS") + GOTO NEXT.FS + END + + + END ;* End of check for WM_IN table + + + IF FileName = 'WM_OUT' THEN + + WONo = Name[1,'*'] + WOStep = Name[COL2()+1,'*'] + CassNo = Name[COL2()+1,'*'] + + Set_Status(0) + NewStatus = obj_WM_Out('CurrStatus',Name:@RM:RECORD) + + IF Get_Status(errCode) THEN + NewStatus = 'ERR' + END + + WOMatKey = WONo:'*':CassNo + + READ WOMatRec FROM WOMatFile,WOMatKey ELSE WOMatRec = '' + + * Smaller outbound boxes won't have WO_MAT records when the are being created so it happens here. + + WOMatRec = NewStatus ;* Original code + + SlotCnt = COUNT(RECORD,@VM) + (RECORD NE '') + + FOR I = 1 TO Slotcnt + *WOMatRec = RECORD + + WOMatRec = I ;* 8/4/2011 JCH Keep all slot numbers for EPOS + + InCassNo = RECORD + InSlotNo = RECORD + + IF InCassNo NE '' AND InSlotNo NE '' THEN + WOMatRec = WONo:'.':InCassNo:'.':InSlotNo + END ELSE + WOMatRec = '' + END + + RDSNo = RECORD + + IF RDSNo NE '' THEN + WOMatRec = RDSNo:'.':RECORD:'.':RECORD + END ELSE + WOMatRec = '' + END + + WOMatRec = RECORD + WOMatRec = '' ;* Not used + + MUWONo = RECORD + + IF MUWONo NE '' THEN + WOMatRec = MUWONo:'.':RECORD:'.':RECORD + END ELSE + WOMatRec = '' + END + + MuWfrID = RECORD + + IF MuWfrID NE '' THEN + WOMatRec = MuWfrID[1,'.']:'.':FIELD(MuWfrID,'.',3):'.':RECORD + END ELSE + WOMatRec = '' + END + + NEXT I + + + WRITE WOMatRec ON WOMatFile,WOMatKey ELSE Null + + + END ;* End of check for WM_OUT table + + + + GOTO NEXT.FS + + +* * * * * * * +DELETE.RECORD: +* * * * * * * + + LOCATE Handle IN Handles_Array USING @FM SETTING POS ELSE + mesg = "Missing file handle in DUEIN_MFS!|" + mesg := handle + MSG('',mesg) + GOTO NEXT.FS + END + + FileName = Files_Array[1,'*'] ;* Extract corresponding file name + + OPEN 'WO_MAT' TO WOMatFile ELSE + MSG('',"Unable to Open 'WO_MAT' table in DueIn_MFS") + GOTO NEXT.FS + END + + OrgRecord = '' + NextFS = BFS<1,1,2> + + CALL @NextFS(ReadRec$, FS, Handle, Name, FMC, OrgRecord, Status) ;* Read old record + + WONo = Name[1,'*'] + WOStep = Name[COL2()+1,'*'] + CassNo = Name[COL2()+1,'*'] + + WOMatKey = WONo:'*':CassNo + + READ WOMatRec FROM WOMatFile,WOMatKey THEN + IF FileName = 'WM_IN' THEN + WOMatRec = '' + END + + IF FileName = 'WM_OUT' THEN + WOMatRec = '' + END + + WRITE WOMatRec ON WOMatFile,WOMatKey ELSE Null + END ELSE + *MSG('',"Unable to read 'WO_MAT' record ":QUOTE(WOMatKey):" in WM_MFS") + GOTO NEXT.FS + END + + GOTO NEXT.FS + +/* Unused calls */ +LOCK.RECORD: +UNLOCK.RECORD: +RESERVED: +OMNI.SCRIPT: + +CREATE.INDEX: +DELETE.INDEX: +SELECT.INDEX: +UPDATE.INDEX: +READNEXT.INDEX: + +NEXT.FS: + + FS = DELETE(BFS,1,1,1) + NEXTFS = FS<1,1,1> + CALL @NEXTFS(Code, FS, Handle, Name, FMC, Record, Status) + RETURN + diff --git a/SYSPROG/STPROCINS/ACD_EQU.txt b/SYSPROG/STPROCINS/ACD_EQU.txt new file mode 100644 index 0000000..04eb07b --- /dev/null +++ b/SYSPROG/STPROCINS/ACD_EQU.txt @@ -0,0 +1,84 @@ +compile insert ACD_EQU +* setup constants for ar_cash_detail file +EQU PAT.ID$ TO 1 +EQU TOT.CHARGES$ TO 2 +EQU AR.SEC.INS$ TO 3 +EQU AR.SEC.INSURED.NO$ TO 4 +EQU DT.POSTED$ TO 5 +EQU AR.DOS$ TO 6 +EQU AR.ON.SITE.PMT$ TO 7 +EQU AR.CHK.ON.SITE$ TO 8 +EQU TOT.BILLED$ TO 9 +* +EQU AR.ENC.TYPE$ TO 10 +EQU INV.DATE$ TO 11 +EQU AR.INSURED.NO$ TO 12 +EQU BILL.CODE$ TO 13 +EQU PRI.INS.NO$ TO 14 +EQU INV.AMT$ TO 15 +EQU XACT.PST.PERIOD$ TO 16 +EQU INV.AMT.PD$ TO 17 +EQU INV.DT.PD$ TO 18 +EQU INV.CHK.NO$ TO 19 +* +EQU AR.ADJ.DT$ TO 20 +EQU AR.ADJ.ACCT$ TO 21 +EQU AR.ADJ.AMT$ TO 22 +* +EQU ASSIGNMENT$ TO 23 +EQU ATTN.PHYS$ TO 24 +EQU PAT.PHYS$ TO 25 +EQU PAT.PMT.STATUS$ TO 26 +EQU COMPANY$ TO 27 +EQU AR.I.BAL$ TO 28 +EQU AR.P.BAL$ TO 29 +EQU AR.PST.NO$ TO 30 +EQU AR.BEG.BAL$ TO 31 +EQU ENC.PST.PER$ TO 32 +EQU AR.CR.NO$ TO 33 +EQU AR.BF$ TO 34 +* +EQU AR.PAT.PAID$ TO 35 +EQU AR.INS.PAID$ TO 36 +EQU AR.INS.ID$ TO 37 + +EQU ENC.PST.NO$ TO 38 +EQU WH$ TO 39 + +EQU BILL.DT$ TO 45 +EQU BILL.RUN.NO$ TO 46 + + +* 11/18/02 rmc, indicator used to track future reversal of cash posting + +Equ Rev_Ind$ to 55 +Equ Rev_Amt$ to 56 +Equ Rev_Adj$ to 57 +Equ Rev_Wh$ to 58 + + +* 4/30/02 track insurance filing for this encounter + +Equ Filed_Ins_ID$ To 50 ;* MV +Equ Filed_Ins_DT$ To 51 ;* MV + +Equ Filed_Ins_Method$ to 52 ;* MV + *HCFA-PAPER + *HCFA_ECS + *UB92-PAPER + *UB92-ECS + +Equ Filed_Ins_Amt$ to 52 ;* MV, Amt filed with Insurance +Equ Filed_Ins_Run_No$ to 54 ;* MV, the Run Number for this billing run. + + +* 08/29/03 jz, add to track who, how, when billed + +Equ AR.BILLING$ to 59 +Equ AR.DT_BILLING$ to 60 +Equ AR.BILLED_TO_ID$ to 61 + +* 10/07/2003 jz add amt_billed +Equ AR.INVOICED_AMT$ to 62 + +*** track insurance filing diff --git a/SYSPROG/STPROCINS/ACTION_SETUP.txt b/SYSPROG/STPROCINS/ACTION_SETUP.txt new file mode 100644 index 0000000..dadaa85 --- /dev/null +++ b/SYSPROG/STPROCINS/ACTION_SETUP.txt @@ -0,0 +1,133 @@ +Compile insert Action_Setup +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Action_Setup + + Description : Declarations and equates used by the table action commuters. + + Notes : Action_Setup also populates several variables that will often be useful within action handler code. + + History : (Date, Initials, Notes) + 08/13/10 dmb Original programmer. + 09/18/19 dmb Add TableVolumes@ and new Unused global commons in the /Tables/ common block. Remove + dependency upon the Locate statement in @Tables to find the volume of the current table. + - [SRPFW-282] + +***********************************************************************************************************************/ + +Common /Tables/ TableNames@, TableAccounts@, TableHandles@, SysObjHandle@, ActionListHandle@, PromotedListHandle@, NoActionListHandle@, NoPromotedListHandle@, TableVolumes@, Unused10@, Unused11@, Unused12@, Unused13@ + +Declare function RetStack + + +// SRP List declarations. +Declare function SRP_List_Create, SRP_List_CreateFromFastArray, SRP_List_Count, SRP_List_GetAt, SRP_List_GetVariable, SRP_List_Locate +Declare subroutine SRP_List_Add, SRP_List_InsertAt, SRP_List_Release, SRP_List_RemoveAt, SRP_List_SetAt + + +// Initialize handles if necessary. +// The handle to SYSOBJ is formatted for use with MFS/BFS calls. +If Len(SysObjHandle@) else Open 'SYSOBJ' to SysObjHandle@ then SysObjHandle@ = SysObjHandle@<0, 2> +If Len(ActionListHandle@) else ActionListHandle@ = SRP_List_Create() +If Len(PromotedListHandle@) else PromotedListHandle@ = SRP_List_Create() +If Len(NoActionListHandle@) else NoActionListHandle@ = SRP_List_Create() +If Len(NoPromotedListHandle@) else NoPromotedListHandle@ = SRP_List_Create() + + +// Return values to indicate how the action flow should continue. +Equ ACTION_STOP$ to 0 ; // Action flow should stop +Equ ACTION_CONTINUE$ to 1 ; // Action flow should continue until a later process changes this value +Equ ACTION_CONTINUE_NO_PROMOTED$ to 2 ; // Action flow should by-pass the promoted (generic) logic but allow the system action to execute +Equ ACTION_CONTINUE_NO_SYSTEM$ to 3 ; // Action flow should execute the promoted (generic) logic but stop the system action from executing +Equ ACTION_SYSTEM_ONLY$ to 4 ; // Action flow should execute the system action only + + +// Make sure any action parameters which have not been assigned are nulled. +If Assigned(Code) else Code = '' +If Assigned(Action) else Action = '' +If Assigned(CalcColName) else CalcColName = '' +If Assigned(FSList) else FSList = '' +If Assigned(Handle) else Handle = '' +If Assigned(Name) then KeyID = Name +If Assigned(KeyID) else KeyID = '' +If Assigned(FMC) else FMC = '' +If Assigned(Record) else Record = '' +If Assigned(Param1) else Param1 = '' +If Assigned(Param2) else Param2 = '' +If Assigned(Param3) else Param3 = '' +If Assigned(Param4) else Param4 = '' +If Assigned(Param5) else Param5 = '' +If Assigned(Param6) else Param6 = '' +If Assigned(Param7) else Param7 = '' +If Assigned(Param8) else Param8 = '' +If Assigned(Param9) else Param9 = '' +If Assigned(Param10) else Param10 = '' +If Assigned(OrigRecord) else OrigRecord = '' + + +// Get the program stack +RetStack = RetStack() + + +// 11 is the code value for the OPEN.FILE primitive. No need to call the following logic since it would be premature. +If Code NE 11 then + // Get the name of the database table if it has already been opened with the OPEN.FILE action. + If Len(Handle) then + // Being called from within the MFS. Most methods will pass in the valid database table handle. This should already + // be stored in the TableHandles@ global common. The associated regular database table name will be found in the + // TableNames@ global common. + Locate Handle in TableHandles@ using @FM Setting fPos then + TableName = TableNames@ + DictName = 'DICT.' : TableName + AccountName = TableAccounts@ + Volume = TableVolumes@ + TableHandle = FSList : @VM : Handle + end else + // If the handle was unable to be located in the TableHandles@ global common, this could be a situation where + // the handle was modified on-the-fly by the calling procedure (such as the MFS stack being manipulated for + // some reason). In this case, loop though each hnadle in TableHandles@ and see if it is contained within the + // handle being passed into the MFS. This isn't as precise, but a match will almost certainly be the correct + // handle. + FoundHandle = 0 + NumberHandles = DCount(TableHandles@, @FM) + For fPos = 1 to NumberHandles + CompareHandle = TableHandles@ + If Index(Handle, CompareHandle, 1) then + FoundHandle = 1 + TableName = TableNames@ + end + Until FoundHandle + Next CompareHandle + If FoundHandle then + DictName = 'DICT.' : TableName + AccountName = TableAccounts@ + Locate TableName in @Tables(0) using @FM setting fPos then + VolumeName = @Tables(1) + BFSType = VolumeName[1, '*'] + Volume = VolumeName[Col2() + 1, 99] + end else + Volume = '' + end + TableHandle = FSList : @VM : Handle + end + end + end + + If Assigned(TableName) else + // Either the Handle argument wasn't assigned or no match could be found in the TableHandles@ global common. + // Most likely this is because an ACTION commuter is being called directly from a program other than an MFS. + // Therefore the name of the database table will be extracted from the name of the ACTIONS program (which is + // assumed to follow the format _ACTIONS. + CurProc = RetStack[1, 'F' : @FM] + TableName = CurProc + Swap '_ACTIONS' with '' in TableName + + DictName = 'DICT.' : TableName + AccountName = '' + Volume = '' + Open TableName to TableHandle else TableHandle = '' + end +end diff --git a/SYSPROG/STPROCINS/APNDES_EQUATES.txt b/SYSPROG/STPROCINS/APNDES_EQUATES.txt new file mode 100644 index 0000000..403cd10 --- /dev/null +++ b/SYSPROG/STPROCINS/APNDES_EQUATES.txt @@ -0,0 +1,31 @@ +compile insert APNDES_EQUATES +*** APNDES_EQUATES + +* Declarations + +DECLARE FUNCTION GET_PROPERTY, UTILITY, MESSAGE_BOX, DIALOG_BOX +DECLARE FUNCTION GET_REPOS_ENTITIES, ENTID, REPOSITORY, GETAPPID, GET_STATUS +DECLARE SUBROUTINE SET_PROPERTY, UTILITY, END_WINDOW, SET_STATUS, MESSAGE_BOX +DECLARE SUBROUTINE APPNOTE + +* Constants + +EQU TITLE$ TO 'HelpNote Builder' +EQU UNTITLED$ TO '(UNTITLED)' +EQU APNTYPE$ TO 'APPNOTE' + +* Global variables + +EQU APPLIST$ TO '@APL' + +* MESSAGE_BOX answers + +EQU MBA_OK$ TO 1 +EQU MBA_CANCEL$ TO 2 +EQU MBA_ABORT$ TO 3 +EQU MBA_RETRY$ TO 4 +EQU MBA_IGNORE$ TO 5 +EQU MBA_YES$ TO 6 +EQU MBA_NO$ TO 7 + +* Source Date: 12:44:59 29 SEP 1993 Build ID: OI*1.0.323 Level: 2.0 diff --git a/SYSPROG/STPROCINS/APPNOTE_EQUATES.txt b/SYSPROG/STPROCINS/APPNOTE_EQUATES.txt new file mode 100644 index 0000000..896681b --- /dev/null +++ b/SYSPROG/STPROCINS/APPNOTE_EQUATES.txt @@ -0,0 +1,96 @@ +compile insert AppNote_Equates +/* + ** Copyright (C) 1992-2014 Revelation Software Inc. All Rights Reserved ** + + Author : ???? + Date : Between the years when the oceans drank Atlantis, and the rise + of the sons of Aryas ... + Purpose : Constants for use with APPNOTE entities + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + cp 15 Oct 97 Updated for 3.5; added header + mtr 05 Feb 14 Updated for OI10 (HTML format) + Mr C 24 Nov 14 Added header guards, default values + Mr C 03 Jan 15 Added "system" fields + Mr C 20 Mar 15 Added FrameStyle constants + Mr C 20 Jul 16 Changed default Font size to 9pt + Chnaged default size +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _APPNOTE_EQUATES_ +#define _APPNOTE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Window_Equates + $insert colors + $insert logical + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ ACOL$ to 1 + equ AROW$ to 2 + equ AWIDTH$ to 3 + equ AHEIGHT$ to 4 + equ AREADONLY$ to 5 + equ AFONT$ to 6 + equ ABKCOLOR$ to 7 + equ AFGCOLOR$ to 8 + equ AJUST$ to 9 + equ ATITLE$ to 10 + equ ATEXT$ to 11 + equ ASCROLL$ to 12 + equ AHTMLTEXT$ to 13 + equ ANONMODAL$ to 14 + equ AFRAMESTYLE$ to 15 + + equ ANUMFIELDS$ to 15 + + equ ATESTRUN$ to 100 ; * // "hidden" system field to denote + * // if we're in TESTRUN from the IDE + equ ALOCKED$ to 101 ; * // "hidden" system locked field + + equ AMINWIDTH$ To 200 + equ AMINHEIGHT$ to 160 + + equ HELPTOOLNAME$ to "QuickHelp" + equ APPNOTETYPE$ to "APPNOTE" + equ APPNOTECLASS$ to "" + + * // Default values + equ ADEFCOL$ to -1 + equ ADEFROW$ to -1 + equ ADEFWIDTH$ to 750 ; // wide enough for the editor toolbar + equ ADEFHEIGHT$ to 480 + equ ADEFREADONLY$ to FALSE$ + equ ADEFBKCOLOR$ to COLOR_WINDOW$ + equ ADEFFGCOLOR$ to COLOR_WINDOWTEXT$ + equ ADEFFRAMESTYLE$ to PS_FRAMESTYLE_SIZEABLE$ + + equ DFLT_FONT_SIZE$ to 9 ; * 9pt + + * // Property Panel Names + equ PPL_ACOL$ to "Left" + equ PPL_AROW$ to "Top" + equ PPL_AWIDTH$ to "Width" + equ PPL_AHEIGHT$ to "Height" + equ PPL_AREADONLY$ to "ReadOnly" + equ PPL_AFONT$ to "Font" + equ PPL_ABKCOLOR$ to "BackColor" + equ PPL_AFGCOLOR$ to "ForeColor" + equ PPL_AMODAL$ to "Modal" + equ PPL_AFRAMESTYLE$ to "FrameStyle" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/APP_INSERTS.txt b/SYSPROG/STPROCINS/APP_INSERTS.txt new file mode 100644 index 0000000..60e7cdb --- /dev/null +++ b/SYSPROG/STPROCINS/APP_INSERTS.txt @@ -0,0 +1,252 @@ +Compile insert App_Inserts + +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : App_Inserts + + Description : Common declarations and equates used by the application. + + Notes : App_Inserts is designed to be the most commonly used insert within SRP FrameWorks routines. + + History : (Date, Initials, Notes) + 07/23/98 dmb Original programmer. + 10/04/13 dmb Added insert for SystemFont$, SystemTypeface$, and SystemPoint$ to make it easier for + commuters to apply the FrameWorks default font. - [SRPFW-17] + +***********************************************************************************************************************/ + +Declare function Msg, PopUp, Set_Property, Get_Property, Utility, Send_Message, Dialog_Box, Start_Window +Declare function Start_MDIChild, Set_Printer, Get_Printer, SRP_Show_Window, MCP, GetTickCount +Declare function Form_Services, Error_Services, Memory_Services, MCP +Declare subroutine Set_Property, Utility, Send_Event, Send_Message, End_Dialog, Send_Info, Msg, SendMessage +Declare subroutine Forward_Event, Lock_Record, Post_Event, SRP_Show_Window, SRP_Set_Prop_Array +Declare subroutine Form_Services, Error_Services, SRP_Stopwatch, Memory_Services, MCP + +Equ SystemTable$ to 'APP_INFO' + +* Logical equates + +$insert LOGICAL + +Equ Success$ to 1 +Equ Failure$ to 0 +Equ Passed$ to 1 +Equ Failed$ to 0 +Equ Qualified$ to 1 +Equ Not_qualified$ to 0 +Equ Confirmed$ to 1 +Equ Not_confirmed$ to 0 +Equ OK$ to 1 + +* General equates + +Equ Tab$ to Char(9) +Equ Esc$ to \1B\ +Equ CRLF$ to \0D0A\ +Equ Lock$ to 1 +Equ Unlock$ to 2 +Equ ReadOnly$ to 0 +Equ FullWrite$ to 1 +Equ NoAccess$ to -1 + +* Font equates + +Equ Tahoma_8_Reg$ to 'Tahoma' : @SVM : -11 : @SVM : 400 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 34 : @SVM : 0 : @SVM : 3 : @SVM : 2 : @SVM : 1 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 +Equ Tahoma_8_Reg_UL$ to 'Tahoma' : @SVM : -11 : @SVM : 400 : @SVM : 0 : @SVM : 1 : @SVM : 0 : @SVM : 0 : @SVM : 34 : @SVM : 0 : @SVM : 3 : @SVM : 2 : @SVM : 1 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 +Equ Tahoma_8_Bold$ to 'Tahoma' : @SVM : -11 : @SVM : 700 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 34 : @SVM : 0 : @SVM : 3 : @SVM : 2 : @SVM : 1 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 + +Equ Tahoma_12_Reg$ to 'Tahoma' : @SVM : 12 : @SVM : 400 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 34 : @SVM : 0 : @SVM : 3 : @SVM : 2 : @SVM : 1 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 +Equ Tahoma_12_Reg_UL$ to 'Tahoma' : @SVM : 12 : @SVM : 400 : @SVM : 0 : @SVM : 1 : @SVM : 0 : @SVM : 0 : @SVM : 34 : @SVM : 0 : @SVM : 3 : @SVM : 2 : @SVM : 1 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 +Equ Tahoma_12_Bold$ to 'Tahoma' : @SVM : 12 : @SVM : 700 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 34 : @SVM : 0 : @SVM : 3 : @SVM : 2 : @SVM : 1 : @SVM : 0 : @SVM : 0 : @SVM : 0 : @SVM : 0 + +* Promoted Event equates + +Equ Create$ to 1 +Equ Activated$ to 2 +Equ Read_Pre_System$ to 3 +Equ Clear_Post_System$ to 4 +Equ Close_Post_System$ to 5 +Equ Size$ to 6 +Equ Delete_Post_System$ to 7 +Equ Winmsg$ to 8 +Equ Write_Pre_System$ to 9 +Equ Gotfocus$ to 10 +Equ Lostfocus$ to 11 +Equ Inactivated$ to 12 +Equ Read_Post_System$ to 13 +Equ Clear_Pre_System$ to 14 +Equ Poschanged$ to 15 +Equ Close_Pre_System$ to 16 +Equ Write_Post_System$ to 17 +Equ Delete_Pre_System$ to 18 +Equ InsertRow$ to 19 +Equ DeleteRow$ to 20 +Equ ColSize$ to 21 +Equ RightClickUp$ to 22 +Equ MouseOver$ to 23 +Equ MouseOff$ to 24 +Equ OLE$ to 25 +Equ Click$ to 26 +Equ Timer$ to 27 +Equ ContextMenu$ to 28 + +// General Windows API equates +Equ WM_USER to 1024 +Equ WM_CLOSE to 16 +Equ WM_COMMAND to 273 +Equ WM_LBUTTONDOWN to 513 ; // 0x0201 +Equ WM_LBUTTONUP to 514 ; // 0x0202 +Equ WM_LBUTTONDBLCLK to 515 ; // 0x0203 +Equ WM_RBUTTONDOWN to 516 ; // 0x0204 +Equ WM_RBUTTONUP to 517 ; // 0x0205 +Equ WM_PARENTNOTIFY to 528 ; // 0x0210 +Equ WM_SYSCOLORCHANGE to 21 ; // 0x0015 +Equ WM_SETCURSOR to 32 ; // 0x0020 +Equ WM_SIZE to 5 ; // 0x0005 +Equ WM_MOVE to 3 ; // 0x0003 +Equ WM_GETMINMAXINFO to 36 ; // 0x0024 +Equ WM_WINDOWPOSCHANGING to 70 + +// ShowWindow API equates +Equ SW_FORCEMINIMIZE to 11 +Equ SW_HIDE to 0 +Equ SW_MAXIMIZE to 3 +Equ SW_MINIMIZE to 6 +Equ SW_RESTORE to 9 +Equ SW_SHOW to 5 +Equ SW_SHOWDEFAULT to 10 +Equ SW_SHOWMAXIMIZED to 3 +Equ SW_SHOWMINIMIZED to 2 +Equ SW_SHOWMINNOACTIVE to 7 +Equ SW_SHOWNA to 8 +Equ SW_SHOWNOACTIVATE to 4 +Equ SW_SHOWNORMAL to 1 + + +Equ WS_CAPTION$ to 0x00C00000 +Equ WS_SYSMENU$ to 0x00080000 +Equ WS_THICKFRAME$ to 0x00040000 +Equ WS_EX_TOOLWINDOW$ to 0x00000080 +Equ WS_EX_CLIENTEDGE$ to 0x200 +Equ WS_CLIPCHILDREN$ to 0x02000000 + +Equ SM_CYCAPTION$ to 4 +Equ F4_VK_CODE to 115 ; // 115 is the virtual key code for F4. +Equ TAB_VK_CODE to 9 + +* Edittable/Datatable equates + +Equ DTN_ABORTEDIT to 17 +Equ DTM_EDITCURCELL to WM_USER + 95 ; * Change to Edit mode now +Equ DTM_SETEDITKEY to 1118 ; * Set key to change to Edit Mode +Equ DTM_SETCOLFORMAT to WM_USER + 18 + +Equ DT_BEGINEDIT to 1 ;* begin edit mode +Equ DT_ENDEDIT to 2 ;* end the edit +Equ DT_ABORTEDIT to 3 ;* Esc will undo changes +Equ DTS_EDIT to 4 +Equ DTCS_PROTECT to 8 + +* Help equates + +Equ HELP_CONTEXT to 1 +Equ HELP_QUIT to 2 +Equ HELP_INDEX to 3 +Equ HELP_CONTENTS to 3 +Equ HELP_HELPONHELP to 4 +Equ HELP_SETINDEX to 5 +Equ HELP_SETCONTENTS to 5 +Equ HELP_CONTEXTPOPUP to 8 +Equ HELP_FORCEFILE to 9 +Equ HELP_KEY to 257 +Equ HELP_COMMAND to 258 +Equ HELP_PARTIALKEY to 261 +Equ HELP_MULTIKEY to 513 +Equ HELP_SETWINPOS to 515 + +* Color equates + +Equ Msg_Light_Grey$ to 212:@VM:208:@VM:200 +Equ Msg_Dark_Grey$ to 127:@VM:127:@VM:127 +Equ Msg_Light_Blue$ to 0:@VM:255:@VM:255 +Equ Msg_Dark_Blue$ to 0:@VM:0:@VM:255 +Equ Msg_Red$ to 255:@VM:0:@VM:0 +Equ Msg_Green$ to 0:@VM:255:@VM:0 +Equ Msg_Purple$ to 255:@VM:0:@VM:255 +Equ Msg_Yellow$ to 255:@VM:255:@VM:0 +Equ Msg_Black$ to 0:@VM:0:@VM:0 +Equ Msg_White$ to 255:@VM:255:@VM:255 + +* RGB colors +EQU USEPARENT$ TO 0 ;* \000000\ +EQU BLACK$ TO 1 ;* \FFFFFF\ +EQU RED$ TO 255 ;* \0000FF\ +EQU ORANGE$ TO 33023 ;* \0080FF\ +EQU GREEN$ TO 65280 ;* \00FF00\ +EQU YELLOW$ TO 65535 ;* \00FFFF\ +EQU GREY$ TO 12632256 ;* \C0C0C0\ +EQU BLUE$ TO 16711680 ;* \FF0000\ +EQU PURPLE$ TO 16711808 ;* \FF0080\ +EQU MAGENTA$ TO 16711935 ;* \FF00FF\ +EQU CYAN$ TO 16776960 ;* \FFFF00\ +EQU WHITE$ TO 16777215 ;* \FFFFFF\ + +// The following color equates are used directly +// Example: Set_Property(CtrlEntID, "BACKCOLOR", COLOR_BTNFACE$) +EQU COLOR_SCROLLBAR$ TO 2147483648 ;* \80000000\ +EQU COLOR_BACKGROUND$ TO 2164260864 ;* \81000000\ +EQU COLOR_ACTIVECAPTION$ TO 2181038080 ;* \82000000\ +EQU COLOR_INACTIVECAPTION$ TO 2197815296 ;* \83000000\ +EQU COLOR_MENU$ TO 2214592512 ;* \84000000\ +EQU COLOR_WINDOW$ TO 2231369728 ;* \85000000\ +EQU COLOR_WINDOWFRAME$ TO 2248146944 ;* \86000000\ +EQU COLOR_MENUTEXT$ TO 2264924160 ;* \87000000\ +EQU COLOR_WINDOWTEXT$ TO 2281701376 ;* \88000000\ +EQU COLOR_CAPTIONTEXT$ TO 2298478592 ;* \89000000\ +EQU COLOR_ACTIVEBORDER$ TO 2315255808 ;* \8A000000\ +EQU COLOR_INACTIVEBORDER$ TO 2332033024 ;* \8B000000\ +EQU COLOR_APPWORKSPACE$ TO 2348810240 ;* \8C000000\ +EQU COLOR_HIGHLIGHT$ TO 2365587456 ;* \8D000000\ +EQU COLOR_HIGHLIGHTTEXT$ TO 2382364672 ;* \8E000000\ +EQU COLOR_BTNFACE$ TO 2399141888 ;* \8F000000\ +EQU COLOR_BTNSHADOW$ TO 2415919104 ;* \90000000\ +EQU COLOR_GRAYTEXT$ TO 2432696320 ;* \91000000\ +EQU COLOR_BTNTEXT$ TO 2449473536 ;* \92000000\ +EQU COLOR_INACTIVECAPTIONTEXT$ TO 2466250752 ;* \93000000\ +EQU COLOR_BTNHIGHLIGHT$ TO 2483027968 ;* \94000000\ + +// The following color equates are used with the GetSysColor WinAPI command +// Example: Set_Property(CtrlEntID, "BACKCOLOR", GetSysColor(API_COLOR_BTNFACE$)) +Equ API_COLOR_SCROLLBAR$ To 0 +Equ API_COLOR_BACKGROUND$ To 1 +Equ API_COLOR_ACTIVECAPTION$ To 2 +Equ API_COLOR_INACTIVECAPTION$ To 3 +Equ API_COLOR_MENU$ To 4 +Equ API_COLOR_WINDOW$ To 5 +Equ API_COLOR_WINDOWFRAME$ To 6 +Equ API_COLOR_MENUTEXT$ To 7 +Equ API_COLOR_WINDOWTEXT$ To 8 +Equ API_COLOR_CAPTIONTEXT$ To 9 +Equ API_COLOR_ACTIVEBORDER$ To 10 +Equ API_COLOR_INACTIVEBORDER$ To 11 +Equ API_COLOR_APPWORKSPACE$ To 12 +Equ API_COLOR_HIGHLIGHT$ To 13 +Equ API_COLOR_HIGHLIGHTTEXT$ To 14 +Equ API_COLOR_BTNFACE$ To 15 +Equ API_COLOR_BTNSHADOW$ To 16 +Equ API_COLOR_GRAYTEXT$ To 17 +Equ API_COLOR_BTNTEXT$ To 18 +Equ API_COLOR_INACTIVECAPTIONTEXT$ To 19 +Equ API_COLOR_BTNHIGHLIGHT$ To 20 + +// Preference Manager +Equ ImagePath$ to Memory_Services('GetValue', 'PM_CURRENT_IMAGE_PATH') : '\' +PMSystemFont = Memory_Services('GetValue', 'PM_SYSTEM_FONT') +Convert ',' to @SVM in PMSystemFont +Equ SystemFont$ to PMSystemFont +Equ SystemTypeface$ to SystemFont$[1, @SVM] +Equ SystemPoint$ to SystemFont$[Col2() + 1, @SVM] + diff --git a/SYSPROG/STPROCINS/AREV_POPUP_EQUATES.txt b/SYSPROG/STPROCINS/AREV_POPUP_EQUATES.txt new file mode 100644 index 0000000..8fcca25 --- /dev/null +++ b/SYSPROG/STPROCINS/AREV_POPUP_EQUATES.txt @@ -0,0 +1,16 @@ +compile insert AREV_POPUP_EQUATES +EQU POPX$ TO 1 +EQU POPY$ TO 2 +EQU POPFILE$ TO 3 +EQU POPLIST$ TO 4 +EQU POPFORMAT$ TO 5 +EQU POPMODE$ TO 6 +EQU POPMULT$ TO 7 +EQU POPTITLE$ TO 8 +EQU POPATTR$ TO 9 +EQU POPHELP$ TO 10 +EQU POPCOLUMN$ TO 11 +EQU POPTYPE$ TO 12 +*EQU DFLT.POP TO 0:@FM:0:@FM:@FM:@FM:25:@FM:'R' +EQU DFLT.POP TO "1:25:R::" +* Source Date: 07:20:26 18 AUG 1992 Build ID: AREV*2.2.76 Level: 2.2 diff --git a/SYSPROG/STPROCINS/ATTACH_IMAGE_EQUATES.txt b/SYSPROG/STPROCINS/ATTACH_IMAGE_EQUATES.txt new file mode 100644 index 0000000..2fea606 --- /dev/null +++ b/SYSPROG/STPROCINS/ATTACH_IMAGE_EQUATES.txt @@ -0,0 +1,33 @@ +cOMPILE Insert Attach_Image_Equates + + +* Equate record for attach image + +EQU TAG$ TO 1 +EQU BATCH_NAME$ TO 2 ;* Name of TCL batch command +EQU SYSTEM1$ TO 3 ;* SYSTEM USE ONLY!!! Do not change +EQU VOL_NAME_LIST$ TO 4 +EQU BFS_NAME_LIST$ TO 5 +EQU DATA_LOC_LIST$ TO 6 +EQU CONTROL_LOC_LIST$ TO 7 +EQU MAP_CHECKSUM$ TO 8 + +EQU IMAGE$ TO 20 + + +EQU IMAGE_TAG$ TO 'ATTACH_IMAGE' +EQU IMAGE_DELIM$ TO \00\ + + +****************************************************************************** +* SET_ATTACH_IMAGE errors +EQU SET_ERROR_1$ TO 'W109' ;* Image record already exists +EQU SET_ERROR_2$ To '120' ;* Image to Big + +****************************************************************************** +* USE_ATTACH_IMAGE errors +EQU USE_ERROR_1$ TO '202' ;* Image record does not exist +EQU USE_ERROR_2$ TO 'B127' ;* Not a valid image record +EQU USE_ERROR_3$ TO 'B308' ;* Open media failed on volume %?% +EQU USE_ERROR_4$ TO '201' ;* Unable to open system file %?% +* Source Date: 13:04:14 20 MAR 1992 Build ID: AREV*2.12.104 Level: 2.12 diff --git a/SYSPROG/STPROCINS/AUDIT_EQUATES.txt b/SYSPROG/STPROCINS/AUDIT_EQUATES.txt new file mode 100644 index 0000000..19f625b --- /dev/null +++ b/SYSPROG/STPROCINS/AUDIT_EQUATES.txt @@ -0,0 +1,13 @@ +COMPILE Insert AUDIT_EQUATES + +* Equates for COA table + +EQU AUDIT_TABLENAME$ TO 0.1 +EQU AUDIT_USERNAME$ TO 0.2 +EQU AUDIT_DATE_TIME$ TO 0.3 ;* Record key is in parts 0.4 through 0.n + +EQU AUDIT_ACTION$ TO 1 ;* New,Read, Write, Delete +EQU AUDIT_FIELDS$ TO 2 ;* Field name +EQU AUDIT_OLD_VALS$ TO 3 ;* Old values for each field +EQU AUDIT_NEW_VALS$ TO 4 ;* New values for each field +EQU AUDIT_DEL_RECORD$ TO 5 ;* complete record stored here on DELETE action diff --git a/SYSPROG/STPROCINS/AVERY_LABELS_EQUATES.txt b/SYSPROG/STPROCINS/AVERY_LABELS_EQUATES.txt new file mode 100644 index 0000000..4dd2780 --- /dev/null +++ b/SYSPROG/STPROCINS/AVERY_LABELS_EQUATES.txt @@ -0,0 +1,53 @@ +compile insert AVERY_LABELS_EQUATES +/*---------------------------------------- + Author : Table Create Insert Routine + Written : 08/08/2005 + Description : Insert for Table AVERY_LABELS +----------------------------------------*/ + + +Equ AVERY_LABELS_AVERY_PRODUCT_CATEGORY$ To 7 +Equ AVERY_LABELS_COATED_STOCK$ To 11 +Equ AVERY_LABELS_CORNER_RADIUS_IN$ To 23 +Equ AVERY_LABELS_CROSSREF$ To 3 +Equ AVERY_LABELS_DATE_LAUNCHED$ To 17 +Equ AVERY_LABELS_FOLDS_BI_DIRECTION$ To 36 +Equ AVERY_LABELS_FOLDS_HORIZ_TOP$ To 34 +Equ AVERY_LABELS_FOLDS_VERT_LEFT$ To 35 +Equ AVERY_LABELS_FULL_BLEED$ To 13 +Equ AVERY_LABELS_HORIZ_PITCH_IN$ To 30 +Equ AVERY_LABELS_LABELS_PER_SHEET$ To 20 +Equ AVERY_LABELS_LABEL_SECT_HEIGHT_IN$ To 21 +Equ AVERY_LABELS_LABEL_SECT_WIDTH_IN$ To 22 +Equ AVERY_LABELS_LABEL_TYPE$ To 42 +Equ AVERY_LABELS_MARGIN_BOTTOM_IN$ To 27 +Equ AVERY_LABELS_MARGIN_LEFT_IN$ To 28 +Equ AVERY_LABELS_MARGIN_RIGHT_IN$ To 29 +Equ AVERY_LABELS_MARGIN_TOP_IN$ To 26 +Equ AVERY_LABELS_MIRROR_IMAGE_REQD$ To 14 +Equ AVERY_LABELS_NON_STANDARD_DESIGN_ISSUES$ To 41 +Equ AVERY_LABELS_NUMBER_SECTIONS_ACROSS$ To 24 +Equ AVERY_LABELS_NUMBER_SECTIONS_DOWN$ To 25 +Equ AVERY_LABELS_ORIGINAL_NO$ To 4 +Equ AVERY_LABELS_PAGE_SIZE_IN$ To 18 +Equ AVERY_LABELS_PERFS_HORIZ_DESC$ To 38 +Equ AVERY_LABELS_PERFS_HORIZ_NO$ To 37 +Equ AVERY_LABELS_PERFS_VERT_DESC$ To 40 +Equ AVERY_LABELS_PERFS_VERT_NO$ To 39 +Equ AVERY_LABELS_PHOTO_QUALITY$ To 12 +Equ AVERY_LABELS_PRINTER_TYPE$ To 15 +Equ AVERY_LABELS_PRINT_ORIENT$ To 19 +Equ AVERY_LABELS_PRIORITY_SKU$ To 9 +Equ AVERY_LABELS_PRODUCTCODE$ To 1 +Equ AVERY_LABELS_PRODUCT_DESC$ To 8 +Equ AVERY_LABELS_PRODUCT_TYPE$ To 10 +Equ AVERY_LABELS_SEQUENCE$ To 2 +Equ AVERY_LABELS_SHEET_DEPT_IN$ To 33 +Equ AVERY_LABELS_SHEET_WIDTH_IN$ To 32 +Equ AVERY_LABELS_STATUS_GRP_NAME$ To 5 +Equ AVERY_LABELS_STATUS_NAME$ To 6 +Equ AVERY_LABELS_TEMPLATE_FAMILY$ To 16 + +Equ AVERY_LABELS_UNIQUEPRODUCTID$ To 0 +Equ AVERY_LABELS_UNITS$ To 43 +Equ AVERY_LABELS_VERT_PITCH_IN$ To 31 diff --git a/SYSPROG/STPROCINS/BERRORS.txt b/SYSPROG/STPROCINS/BERRORS.txt new file mode 100644 index 0000000..704fc34 --- /dev/null +++ b/SYSPROG/STPROCINS/BERRORS.txt @@ -0,0 +1,407 @@ +compile insert BErrors +if this then that +* mtr 9-11-2001 +* Provided per user request + +* B101" toSort mode selected is not correct. Column %1% already has relational index with %2% mode. Please apply this mode for creating c +* B102" to %1% already has a relational index established from table %2%. The Relational index cannot be set again from table %3%. +* B103" to Compressing %1%... +* B104 %1% has been selected, but cannot be found in %2%. +* B105 The dBASEIII file %1% already exists. Do you want to overwrite it? +* B106 The dBASEIII memo file %1% already exists. Do you want to overwrite it? +* B107 Cannot find the %1% command in the LIST.SUB subroutines. +* B108 Enter number. +* B109 Enter text without quotes. +* B110 Port Call: +* B111 An invalid option was used in the "PORT" command. +* B112 The code %2% is not valid in "%1%". +* B113 The %1% option is not currently implemented. +* B114 Not available. +* B115 The column must not be a symbolic, group, or key column, or have a relational index on it. +* B116 You must first select a column. +* B117 Enter a table name followed by a slash (/) and a column name. +* B118 Warning! All index information will be deleted from %1%. Do you want to continue? +* B119 Clearing indexing information in %1%... +* B120 Deleting Cross Reference information from %1%... +* B121 The character column %1% is longer than the 254 character limit. Use a memo field for this column. +* B123 Finding indexed tables... +* B124 Collecting indexing information... +* B125 Enter a new table name for the save list statement. Press [Esc] to cancel the process. +* B126 %1% is a new row. +* B127 %1% is an invalid row. +* B128 Hours cannot exceed 12. +* B129 Text cut into buffer %1%. +* B130 "%1%" was not found. +* B131 The default macro set %1% cannot be found. +* B132 The header for group 1 has been corrupted. No framesize or modulo information can be read. Do you want to fix group 1? +* B133 Cannot determine the framesize of this table. Please enter your best estimate for the framesize in bytes. +* B134 Framesize must divide evenly into the filesize (%1%). +* B135 The FRAMESIZE must be between 256 and 10000. +* B136 The FRAMESIZE parameter must be numeric. +* B137 Enter a group or group range to fix. Formats are: x, x-y, ALL. Press [Esc] to cancel the process. +* B138 Response = %1% +* B139 Fixing groups %1% through %2%... +* B140 Rebuilding the primary % figure... +* B141 Copying all good rows found from a temporary table back into re-initialized groups... +* B142 Another station is fixing. Please try again later. +* B143 The overflow freelist has been cleared. You can issue a compress to recover and re-order the overflow frames. +* B144 Compress file. There must be no other user of this file. After compression, this file should be re-attached at all other s +* B145 An error occurred during the compress operation. The operation has been canceled. +* B146 The drive %1% does not contain Advanced Revelation files. +* B147 The program OCONV.RUN is not available in the SYSOBJ table. +* B148 Enter the names of the programs to display. +* B149 The %1% table was not found. Do you want to list all indexed tables? +* B150 The %1% table is not indexed. Do you want to list all indexed tables? +* B151 You have defined an index. Do you want to turn it on? +* B152 *CAUTION* You have asked to delete rows from SYSCOLUMNS. These rows will also be deleted from your dictionaries. Do you want to c +* B153 The %1% column in the %2% table is not available. Do you want to list all indexed columns? +* B154 Will "%1%" be a key prompt? +* B155 Finding the %1% column in the dictionary... +* B156 %1% cannot be found. It must exist in %2%. +* B157 %1% is currently a Data Column at position %3% Do you want to convert it to a Symbolic column? +* B158 No formula has been saved. +* B159 The formula was not changed. +* B160 Collector windows do not use dictionary formulas. +* B161 The object code for %2% cannot be found in the %1% table. %2% is also not cataloged. Please enter the name of the table containin +* B162 The window %1% cannot be found. +* B163 Updating the dictionary... +* B164 %1% did not bind correctly. +* B165 No index values were found. +* B166 Cannot find the row %1% in the %2% table. +* B167 Collecting information about indexes... +* B168 Key capture functions have been disabled. +* B169 This is an invalid key. +* B170 Macro execution has been disabled. +* B171 Window %1% is about to be deleted from %2%. Do you want to continue? +* B172 Deleting... +* B173 No columns are indexed in %1%. +* B174 Sorting is not allowed within a protected group. +* B175 Sorting is not allowed before row %1%. +* B176 Enter the number of rows to select or leave this blank to select all rows. +* B177 Enter heading text for this column. +* B178 Enter an output format code. (example: "D2/" for a date format of mm/dd/yy) +* B179 Enter a heading. +* B180 Enter a footing. +* B181 QBEC1, HORMV.OUT sync error? +* B182 QBEC1, HORMV.SCB out of sync? +* B184 Building query... +* B185 Updating %1% in the %2% table... +* B186 No key prompt was specified. The default key prompt will be %1%. +* B187 You must create at least one prompt before you can save this window. The save operation has been canceled. +* B188 The window %1% was not locked. No changes will be saved. +* B189 Join prompt %1% cannot be found. +* B190 Do you want to execute the filter? +* B191 %1%, needed for index transactions is not available. Indexes depending on this table will probably need rebuilding. +* B192 The Lotus file %1% already exists. Do you want to overwrite it? +* B193 Enter a variable name. +* B194 Editing must be complete to continue. +* B195 There is nothing to pan. +* B196 This label is as large as you can make it in the current window. +* B197 You have reached the edge of window space. You may want to try resizing your window using [Ctrl-F7]. +* B198 The dictionary of %1% is in use. No changes will be saved. +* B199 The dictionary is in use elsewhere. The binding cannot be changed. +* B200 You have maximized this prompt entry in the current window. You may want to try resizing your window using [Ctrl-F7]. +* B201 Reading window... +* B202 %1% has %2% installed. Do you want to remove %2%? +* B203 Removing the %1% modifying filing system from %2%... +* B204 Waiting until the source record %1% can be locked... +* B205 %1% is locked. +* B206 No R/LIST program was generated. An invalid expression or column has been detected in line %1%. +* B207 %1% is not a valid dBASEIII file. +* B208 Do you want to perform the conversion? +* B209 That is an invalid color name. +* B210 If no record delimiter is specified, a record length must be specified. +* B211 The operating system file %1% already exists. Do you want to overwrite it? +* B212 The HELP file is not available. No help message will be saved. Do you want to continue? +* B213 Done. +* B214 There are no columns defined in the dictionary of %1%. +* B215 You must add a table to the window before you can use Quick Paint. +* B216 There are no tables in this window. +* B217 Formatting... +* B218 Printing... +* B220 The mode %1% is invalid. +* B221 The selected objects have been copied to the Paint clipboard. +* B222 Function key? %1% +* B223 You must be in Roam mode to Insert or Delete rows. +* B224 The record already exists in the VOC. Do you want to overwrite it? +* B225 Resizing is not supported in Table mode. +* B226 You may not pan while in Table mode. +* B227 The Window is fully displayed. +* B228 There is no transaction file for this Batch Update. +* B229 This label is at maximum length for the current window. You may want to try resizing your window using [Ctrl-F7]. +* B230 A starting byte and a length are required. +* B231 Lock information has been updated in the templates in the %1% file. +* B232 No related windows are available. +* B233 Macro building has been disabled. +* B234 Searching Indexes... Press [Esc] to cancel the search. +* B234.OLD Searching Cross References... Press [Esc] to cancel the search. +* B235 Waiting for index %1% to be available... +* B236 Error in compiling "%1%" +* B237 No [F2] Help for %1% type commands is available. +* B238 Collector windows do not have dictionaries. +* B239 Updating prompt %1%... +* B240 Updating the %1% field... +* B241 %1% is invalid. +* B242 Enter the table name to move to. +* B243 Selecting referenced programs... +* B244 %1% is not a valid table type. Press [F2] for table type options. +* B245 The %1% key is not active %2% Press [Ctrl-F9] for a list of the currently active keys. +* B246 The clipboard has been cleared. +* B247 Pasting is only allowed while Roaming. +* B248 Reading dictionary... +* B249 The dictionary is not bound to %1%. Use the Prompt Window to verify the prompt. +* B250 Table Information for %1%: Volume = %2% OS Path = %3% File Type = %4% File Number = %5% +* B251 The %1% table belongs to the %2% volume. You may only change indexing in tables under the same volume. +* B252 Do you want to save? +* B253 Shifting... +* B254 No block of text has been defined. +* B255 The menu options key is disabled. +* B256 An invalid attribute was passed to ATTR.TO.ESC. Attribute = "%1%" (hex). +* B257 Cannot access color definitions correctly. +* B258 The escape sequence "%1%" (hex) is invalid in ESC.TO.ATTR. +* B259 The %1% table belongs to the %2% application. You may only change indexing in tables in the same application. +* B260 %1% is not a valid volume name or an existing subdirectory. +* B261 Table name = %1% OS name = %8% Volume = %2% Application = %3% File Type = %4% %5% +* B262 %1% is indexed and cannot be renamed. +* B263 %1% in the %2% table is not a valid dictionary type for indexing. Only the dictionary types "F" and "S" may be indexed. +* B264 %1% already exists in the %3% application on the %2% volume. +* B265 The clipboard is empty. +* B266 %1% is not a Linear Hash table. You must convert your table before attempting to use it with PAINT. +* B267 The maximum length of the Quickdex index (65,530 characters) has been reached -- no more records will be added to the Quickdex in +* B268 The "BY" clause is invalid. You cannot sort by %1%. +* B269 The disk the drive is NOT a valid LAN Pack disk. Please insert a valid LAN Pack disk. +* B269A Fatal Bump error. Improper Bump information. +* B272 There is no disk in drive %1%. Insert a disk and then try agian. +* B273 To install a LAN Pack, you must log in as the "LANPACK" user. +* B274 This installation currently supports %1% user(s). Would you like to enable more users? +* B275 Insert a NEW Lanpack into Drive. Choose drive (A or B) or Cancel +* B276 If you change the location of your application without moving the DOS files, you will NOT be able to open the application. +* B279 Cannot find the %1% driver in the SYSNETWORKS table. +* B280 The REVBOOT file is too large. +* B282 The original REVBOOT file has been renamed REVBOOT.OLD. The new network driver will be available the next time you log onto Adva +* B284 Logging off. +* B285 No rows found. +* B286 %1% is not a valid index name. +* B287 Warning! The index update process must not be interrupted or indexes will be corrupted. Do you still want to update ALL i +* B288 There are invalid character(s) in the table name %1%. Use only alphanumeric characters and the special characters underscore "_" +* B289 The dictionary of %1% is not available. +* B291 The key list has exceeded the maximum allowed length. The list will be truncated. +* B292 The list accumulated in %1% has been truncated to the 64K bytes limit. Please use the R/LIST command to retrieve correct +* B293 The Btree index for the indexed column %1% in the table %2% has not been created. Please initialize the index for this column an +* B294 The list returned from BTREE.EXTRACT has been truncated to the 64K limit. To retrieve more rows from the %1% table use the SELEC +* B295 The list %1% cannot be found in the LISTS table. +* B296 Do you want to cancel this process? +* B297 The correct form for the TRANSACTION command is: TRANSACTION operator (option) where: operator = COMMIT, ROLLBACK, S +* B300 These table(s) are not found in this volume: +* B301 Table(s) not available: +* B303 No candidate tables found. +* B304 Domain and validation controls have been added to %1% tables. +* B305 Control features have been removed from %1% tables. +* B306 Locating tables... +* B307 No tables were affected. The "S" option is not active if no volume is specified. +* B308 The "%1%" volume is not available. +* B311 The "%1%" table does not have control features active. Press [Esc] to cancel the process or press any other key to continue. +* B312 The "%1%" table already has Control features active. Press [Esc] to cancel the process or press any other key to continue. +* B313 The "%2%" volume does not exist. +* B314 "%1%" is not a data table, and cannot have control features added. Press [Esc] to cancel the process or press any other key to c +* B315 The "%1%" table is not available. It must be attached before Control features can be added. Press [Esc] to cancel the process or +* B316 The "%1%" table does not exist on the "%2%" volume. Press [Esc] to cancel the process or press any other key to continue. +* B317 An error has occurred while writing to the volume directory for the "%2%" volume. Press [Esc] to cancel the process or press any +* B318 The "%1%" table is not on the "%2%" volume. Press [Esc] to cancel the process or press any other key to continue. +* B319 Unable to save "%1%" in the "%2%" table. +* B320 Subroutine: %1%|Branch value must be numeric! +* B321 Subroutine: %1%|Value of %2% exceeds highest ON...GOSUB branch. +* B322 The table: %1% is excluded from all EasyWriter and QBE|queries. Therefore, you may not set up additional|dictionary level contro +* B323 Link list in the table "%1%" is broken. Transactions cannot be properly flushed. To correct this problem, please rebuild a +* B324 The table: %1% has no dictionary attached or created.|Therefore, you may not set up additional|dictionary level control on the ta +* B325 Dictionary tables cannot be further qualified for EasyWriter queries. +* B326 Error writing to DOS file "%1%" +* B327 Default configuration record "%1%" is missing from the %2% table. +* B328 Error opening or reading from .INI file "%1%" +* B329 %1% is an invalid Advanced Revelation .INI file. +* B330 The file or path "%1%" does not contain .INI files. +* B331 Other .INI files only accessable from the SYSPROG account. +* B332 No INI-file has been found. "%1%" has been created as the default INI-file. +* B333 Finishing processing selections. Please wait. +* B400 Initializing the index control information... +* B401 Null I/O Error +* B402 Error compiling %1%. Use the dictionary window to correct the formula. +* B403 Error while copying row "%1%" to the "%2%" table. +* B404 Building the "%1%" index for the "%2%" table... +* B440 Another workstation is currently accessing table "%2%" and has row "%1%" locked. The index update you have requested will pr +* B441 Records can not be updated because the table "%1%" is not available or attached for reference to store index transactions. P +* B500 The "%1%" table has been dropped. +* B501 The wait-for-lock process has been interrupted. Lock information: Lock Type: "%1%" Table : "%2%" Row : "% +* B502 Transaction Control is OFF. +* B503 You must log in as the user "SYSPROG" to perform this function. +* B504 Do you want to remove the user "%1%" from the commit queue "%2%" ? +* B505 Do you want to remove the user "%1%" from ALL commit queues? +* B506 Do you want to clear the entire Commit Log? +* B507 Warning! Invoking Auto-Transaction Start causes all changes to be held until they are explicitly committed. Unless committed, ch +* B508 A pending transaction exists for this station. Do you want to Commit or Rollback before logoff? +* B509 A pending transaction exists for this station. Do you want to Commit, Rollback, or Ignore the transaction? +* B510 Invalid response. Entry must be "C", "R", or "I". +* B511 Invalid response. The entry must be a "C" or "R". +* B512 This function can only be used when Commit Protection is "ON". Commit protection causes commit queues to be maintained. A lock +* B513 The "COMMITLOG" file has been locked. Transactions cannot be committed while this utility is being run. +* B514 This volume does not contain any tables of the Revelation G type. +* B515 Row "%1%" was found in the "VOC", but is not a valid volume name. +* B516 "%1%" is mapped to drive "%2%". +* B517 "%1%" is not a volume. This process assumes that it is a path name. Is this correct? +* B518 The volume name that corresponds to the path "%1%" is "%2%" Is this correct? +* B519 The target must a be valid volume. Building "%TEMP.VOL.CONVERT%" using the path "%1%". +* B520 The volume directory on path "%1%" is not available. +* B521 Another workstation is currently updating indexes on table "%2%" with control column "%1%" locked. The index update you have +* B522 "%1%" is not a valid column name. +* B523 Help level can only be set from Level 1 of TCL. +* B524 All other users should reattach this table in order for indexing to remain up-to-date. +* B525 Error %1% in VSPACE. +* B526 The View window cannot be displayed. The operating system file required for the window is not available or cannot be created. +* B527 Your DOS path for temporary files is invalid. Please check your environment setting. +* B528 I/O error during join process. +* B529 An error was encountered while joining columns. No changes will be saved. +* B530 A Merge name is required. +* B531 The printer configuration for "%1%" cannot be found in "%2%". +* B532 The flag definition record "%1%" cannot be found. +* B533 Cannot find "%1%". +* B534 The "%C37%FIELDS%C37%" row in the the dictionary of "%1%" is not available. +* B535 Reprocessing row "%1%" from the "%2%" table %3% ... +* B536 Cannot find "%1%" in "%2%". +* B537 Merging row "%1%" from the "%2%" table to the output table %3% ... +* B538 The key list contains imbalanced single or double quote marks. +* B539 No output table was specified in the template. +* B540 Widow/Orphan override. +* B541 MERGE.SUB was passed a dispatch value out of range %1%. +* B542 Collecting column information... +* B543 %1% Enter a value. +* B544 Do you want to delete "%1%"? +* B545 The Merge sample is active only while editing the Merge script. +* B546 Do you want to view the previous sample? +* B547 The row "%1%" is not available in the "%2%" table to do a Merge sample. +* B548 Do you want to abandon the sample? +* B549 Selecting a random row. +* B550 Initializing... +* B551 "%1%" error(s) detected. +* B552 No errors have been detected. +* B553 This field is protected. Press [F2] to edit the Script. +* B554 Enter the name of the operating system text file to import. +* B555 The table can be accessed successfully. +* B556 "%1%" is not a legal operating system filename. +* B557 Access to this file has been denied by the operating system. +* B558 "%1%" does not exist. +* B559 "%1%" is not available or cannot be found. +* B560 Convert high ASCII characters (higher than character 127)? +* B561 The format flag template contains an invalid key flag (%1%-%2%). +* B562 The text file is too long. The file will be truncated to fit into the Merge template. +* B563 Wrap long lines? +* B564 The key flag "%1%" in the options list is a valid flag. +* B565 "%1%" is not a valid format code. Press [F2] for a list of valid formats. +* B566 The format code %1% is invalid. +* B567 The "%1%" table does not exist. Do you want to create it? +* B568 The Merge script is empty. +* B569 The Merge header has not been specified. +* B570 The Merge footer has not been specified. +* B571 Printer format specifications must be entered as up to 3 decimal numbers separated by spaces. (example: 27 72 105) +* B572 Selecting rows... +* B573 Enter the name of the filter row. +* B574 The "REPORTS" table is not available. Press [Enter] to return to the Query window. +* B575 The filter "%1%" has been saved. +* B576 Do you want to save your custom changes in a Filter? +* B577 The "%1%" prompt contains unbalanced quotation marks. +* B578 Converting the R/DESIGN row "%1%". +* B579 "%1%" This row already exists in "%2%". The row was not converted. +* B580 "%1%" This record was converted and saved in "%2%". +* B581 %1% Possible incompatibility. This prompt has a symbolic reference in %2%. The code has been placed in %3%. +* B582 The symbolic uses RDESIGN.COMMON. This is incompatible with window templates. +* B583 The symbolic defines COMMON variables. This may be incompatible with Window templates. +* B584 "%1%" This prompt has a subroutine reference in Description. The code has been placed in the Options prompt. This may be incompat +* B585 The subroutine "%1%" uses RDESIGN.COMMON. This is incompatible with window templates. +* B586 The subroutine "%1%" defines common. This may be incompatible with Window templates. +* B587 The program "%1%" cannot not be found. The process is unable to check for incompatibility. +* B588 The program table is not available. Unable to check for incompatibility. +* B589 "%1%" This row is not an "ENTRY" type. It cannot be converted by this program. +* B590 The "VOC" entry was not a catalog pointer. The process is unable to check for incompatibility. +* B591 "%1%" The "VOC" entry is not available. Unable to check for incompatibility. +* B592 "%1%" This row cannot be found in the "%2%" table. +* B593 "%1%" The cross reference login was not converted. +* B594 "%1%" The table accessed by this template is not available. The prompts for symbolic columns cannot be verified. +* B595 The change prompt has a value in "PARAMETER 1". Linked screen conversion is not completed yet. PARAMETER 1 = "%1%" +* B596 Prompt number %1% (R/DESIGN window number %2%) is more than one column wide. It has been truncated to one column. +* B597 %1% This prompt has a non-numeric value in Parameter 1. No action has been taken. +* B598 "%1%" This prompt has a value in the "DESCRIPTION" field that cannot be converted. +* B599 Mode %1% is an invalid reduction mode. +* B600 The first (meta) pass for "WITH" has failed. +* B601 WITH meta compilation failed. +* B602 This option/process is not supported. +* B603 The cursor value %1% is out of range. +* B604 The cursor "%1%" is invalid. +* B605 The template has not been saved. There is no Table or Collector information. +* B606 Position information must be numeric. +* B607 The mode %1% is invalid for LIST.ACTIVE. +* B608 Error during Readnext operation while seeking. +* B609 Waiting for an index lock... If you cancel this process, the table will not be deleted. +* B610 BFS name cannot be read for DICT %1% +* B611 The [Alt-V] key is functional only when using R/LIST commands. +* B615 The active select list is unresolved. Do you want to continue? +* B616 The active select list is unresolved with reduction pending. Do you want to continue? +* B617 The active select list is unresolved. The "%1%" table contains %2% rows. Do you want to continue? +* B618 The active SELECT list is unresolved. The "%1%" table contains %2% rows. Do you want to continue? +* B619 Seek to the top of table has failed. Do you want to continue the Savelist from the current position? +* B620 %B%No Cross Reference or Btree index has been established for the "%1%" table. +* B621 "%1%" is not a valid key in the "%2%" table. +* B622 Preparing "%1%" listing... +* B623 No rows have been selected. +* B624 The record "@CRT" in the dictionary of "%1%" contains an invalid column. "%2%" does not exist. +* B625 VSPACE status error %1%. +* B626 "%1%" is not available for the View window. Cancelling the process. +* B627 STATUS() error = "%1%" "%2%" +* B628 Cannot move to the top of the table. Do you want to continue the report from the current position? +* B629 Enter page number to display. +* B630 Do you want to print this report? +* B631 The "REPORTS" table is not available. +* B632 The row "%1%" cannot be found in the "REPORTS" table. +* B633 Moving "%1%" menus is not allowed. +* B634 This menu is too large to display. The process has been cancelled. +* B635 The [Alt-P] key is functional only when using R/LIST commands. +* B636 SELECT.INDEX failed during REDUCE operation. +* B700 The ASCII %1% character is reserved for system use and cannot be used in prompts or labels. +* B701 The index search type specified for "%1%" is invalid. +* B702 The index "%1%" must be rebuilt. +* B703 Warning! The index "%1%" must be rebuilt. (The primary data and index control information has not been corrupted.) +* B704 Restricted access. +* B705 The correct form for the "BUILD.TABLE" command is: BUILD.TABLE template.file.name template.name +* B706 Working on template "%1%" in the "%2%" table... +* B707 The "%1%" template is encrypted. Unable to build a table row. +* B708 No help is available for "%1%". +* B709 Row is locked. Retrying... +* B710 Do you want to change the message? +* B711 Waiting for "%1%" transaction lock in "%2%"... Warning! If you cancel this process, you will have to rebuild this index. +* B712 The "%1%" option is not available in FILE.CVT. +* B713 Working on "%1%"... +* B714 The popup has reached the maximum size allowed for your memory configuration. +* B772 +* B800 Waiting to lock the "%1%" table... Press [Esc] to cancel the process. +* B801 %1% row(s) have been selected. %2% logical error(s) were detected. +* B802 %1% row(s) have been selected. %2% error(s) were detected. +* B805 This statement contains unbalanced quotes. +* B810 "%1%" is an invalid active language set. The active language set must be in the list of loaded sets or must be "DEFAULT". +* B811 "%1%" is an invalid language set. Press [F2] for a list of valid choices. +* B812 "%1%" already exists in the load list. +* B813 "%1%" is an invalid output conversion pattern for the TIMEDATE() function. The pattern must be a valid "DT" (Date-Time) conversio +* B815 Case sensitive character sort order in record "%1%" is invalid. It must be 256 bytes in length exactly. +* B816 Case insensitive character sort order in record "%1%" is invalid. It must be 256 bytes in length exactly. +* B817 The language set control row "%1%" is not in the load list and is not "DEFAULT". +* B818 The language set control row "%1%" was not found in the SYSENV table. +* B820 No fonts or styles defined for this printer. +* B821 No printers have been defined in the environment. +* B822 Cannot initialize printer %1% +* B823 %1% is not a valid color. +* B824 %1% rows converted. +* B825 The spooling file %1% already exists.|Do you wish to overwrite the file? +* B826 Operation cancelled. +* B827 WARNING! If you cancel the print job, the spool file will be erased, and you must rerun any reports that you want printed. Do yo +* B828 A print process is open for this station and a close process has been defined for this printer. Do you wish to execute the Close +* B829 You have selected the postcript printer driver and any printed output will be spooled to a temporary file. To send any pendin +* B830 The value you have entered does not meet validation criteria. You can enter strings of characters to send to the printer in any +* B834 There is no ROSMEDIA.MAP file on "%1%". +* B835 "%1%" is in the "VOC" but it is not a volume pointer. diff --git a/SYSPROG/STPROCINS/BITMAP_IDX_MFS_EQUATES.txt b/SYSPROG/STPROCINS/BITMAP_IDX_MFS_EQUATES.txt new file mode 100644 index 0000000..586ee18 --- /dev/null +++ b/SYSPROG/STPROCINS/BITMAP_IDX_MFS_EQUATES.txt @@ -0,0 +1,13 @@ +compile insert Bitmap_Idx_MFS_Equates + +/* Bitmap index MFS equates + + Author: CP Sprezzatura Ltd, 16.10.2007, Insert created + ssc , 31.10.2007, Compacted and optimized */ + +equ BITMAP_IDX$ to "RTI_BITMAP_IDX" +equ BI_ERR_OPEN_DICT$ to 3000 ; * Error FS%1% opening DICT.%2% for Bitmap Index update +equ BI_ERR_OPEN_BI_DICT$ to 3001 ; * Error FS%1% opening DICT.%2% - Bitmap Index updates are not available +* rjc 03-31-10 +Equ BITMAP_IDX_SUFFIX$ To "_BITMAP_IDX" + diff --git a/SYSPROG/STPROCINS/BND_EQUATES.txt b/SYSPROG/STPROCINS/BND_EQUATES.txt new file mode 100644 index 0000000..cc9d112 --- /dev/null +++ b/SYSPROG/STPROCINS/BND_EQUATES.txt @@ -0,0 +1,21 @@ +compile insert bnd_equates +* +* Record Structure +Equ Rpt_Table$ to 1 +Equ Rpt_Detail$ to 2 +Equ group_header$ to 3 +Equ group_footer$ to 4 +Equ page_header$ to 5 +Equ page_footer$ to 6 +Equ Rpt_Header$ to 7 +Equ Rpt_Footer$ to 8 + +* Structure of bands +Equ Str_Table$ to 1 +Equ Str_col$ to 2 +Equ Str_x$ to 3 +Equ Str_y$ to 4 +Equ Str_Width$ to 5 +Equ Str_Font$ to 6 + + diff --git a/SYSPROG/STPROCINS/BOND.SUBS.EQUATES.txt b/SYSPROG/STPROCINS/BOND.SUBS.EQUATES.txt new file mode 100644 index 0000000..e7b2753 --- /dev/null +++ b/SYSPROG/STPROCINS/BOND.SUBS.EQUATES.txt @@ -0,0 +1,120 @@ +cOMPILE Insert Bond.Subs.Equates +* +* BOND.SUBS.EQUATES - equates for the central bonding kit dispatcher +* +DECLARE SUBROUTINE BOND.SUBS +! +! +* BOND.SUBS COMMAND CODES + +* The first argument to BOND.SUBS is a code which specifies the +* function to be performed: +EQU BS.TYPE.PARSE$ TO 1 ;* Parse parameterized type. +EQU BS.TYPE.EXPAND$ TO 2 ;* Parse and expand parameterized +* * type. +EQU BS.TYPE.POPUP$ TO 3 ;* Formatted popup of global data +* * types. +EQU BS.TYPE.WPOPUP$ TO 4 ;* Like TYPE.POPUP, only no args. +EQU BS.MACRO.EXPAND$ TO 5 ;* Apply parsed macro (parameterized +* * type) to template. +* +EQU BS.ERROR$ TO 6 ;* Error handler. +EQU BS.GET.TYPE.REC$ TO 7 ;* Get record from type table. +EQU BS.GET.MAP.REC$ TO 8 ;* Get record from type maps table. +EQU BS.GET.FLAG.ALL$ TO 1 ;* Get all map records +EQU BS.GET.FLAG.CREATE$ TO 2 ;* Get default creation mapping +EQU BS.GET.FLAG.ATTACH$ TO 3 ;* Get default attach mapping + +EQU BS.GET.TYPE$ TO 9 ;* Collect valid type from user. +EQU BS.REQUOTE$ TO 10 ;* requote a string. +EQU BS.FIELD.ATTR$ TO 11 ;* display field attr collector. +EQU BS.FILE.ATTR$ TO 12 ;* display file attr collector. +EQU BS.MAP.FILENAME$ TO 13 ;* Map filename into foreign env. +EQU BS.MAP.FIELDNAME$ TO 14 ;* Map fieldname into foreign env. +EQU BS.GET.FILE.ATTR$ TO 15 ;* Get default file attributes. +EQU BS.VOL.ATTR$ TO 16 ;* display volume attr collector. +EQU BS.TYPE.CREATE$ TO 17 ;* Type expansion when creating a + ;* dictionary field. +EQU BS.TYPE.ATTACH$ TO 18 ;* Type expansion when attaching + ;* to an existing dictionary field. +EQU BS.GET.WINFO$ TO 19 ;* For internal use only. +EQU BS.DEBUG$ TO 20 ;* Turn debugging on/off. +EQU BS.TYPE.WINDOW$ TO 21 ;* Call this for F2 for data type fields +EQU BS.GET.WINFO.MAP$ TO 22 ;* Internal use only. + +EQU BS.LAST.FUNC.CODE$ TO 22 ;* Sentinel for internal use + + + +! +! +* BOND.SUBS FILE DEFINITIONS + +* +EQU BSTM.FILE.NAME$ TO 'TYPE_MAPS' ;* Type mappings for each bond + + +EQU BSTM.BOND.NAME$ TO 1 ;* Key part 1. Name of bond. +EQU BSTM.FILE.TYPE$ TO 2 ;* Key part 2. File type ("." = default). +EQU BSTM.GENERIC.TYPE$ TO 3 ;* Key part 3. Name of corresponding + ;* record in generic data type table. +EQU BSTM.MAPPING.NAME$ TO 4 ;* The mapping name is the name selected + ;* by the bond developer which uniquely + ;* identifies a particular transformation + ;* of data between arev and the foreign + ;* environment. + +EQU BSTM.GEN.PARM.NAME$ TO 1 ;* A multi-valued list of the names of + ;* the parameters of the generic data + ;* type. The type mapping definition + ;* window initializes these to be the + ;* generic data type parameter names. The + ;* intent is that the mapping may append + ;* additional arguments, but that is not + ;* implemented in 2.0 +EQU BSTM.PARM.PROMPT$ TO 2 ;* A multi-valued list of scaled-down + ;* prompt window templates, each of which + ;* will be used in constructing the + ;* dynamic window for data type params. +EQU BSTM.DICT.TEMPLATE$ TO 3 ;* A dictionary template which contains + ;* replaceable parameters that will be + ;* used in expanding a data type into + ;* a dictionary record. +EQU BSTM.CALL.EDIT.ROUTINE$ TO 4 ;* Y/N. Should FOREIGN.SUBS be called + ;* at the end of a type expansion in order + ;* to perform additional editing? +EQU BSTM.DYNAMIC.FLAG$ TO 5 ;* 0 or 1. 1 means that the bond will + ;* have an opportunity to select the type + ;* mapping dynamically. + +EQU BSTM.NATURAL.FLAG$ TO 6 ;* 0 or 1. 1 means that this is a + ;* natural mapping. 0 means that if this + ;* data type is being created interactively, + ;* the user must be informed that the + ;* data type is being mapped to a less-than + ;* natural type in the foreign environment. +equ BSTM.DESCRIPTION$ TO 7 ;* one-line description of mapping for popup + + + +EQU BSTY.FILE.NAME$ TO "TYPE_TABLE" ;* The name of the file + ;* containing the generic + ;* data type records. + +EQU BSTY.TYPE.NAME$ TO 0 ;* The name of the generic data + ;* (this is the key to the file). +EQU BSTY.TYPE.DESCRIPTION$ TO 1 ;* One-liner description that will + ;* appear in the types popup. +EQU BSTY.SYNONYM.FOR$ TO 2 ;* Name of generic type that this + ;* type is just a synonym for. +EQU BSTY.DERIVED.FROM$ TO 3 ;* Name of generic type that this + ;* type is derived from. +EQU BSTY.PARM.NAME$ TO 4 ;* Multi-valued list of type + ;* parameters. +EQU BSTY.PARM.PROMPT$ TO 5 ;* Prompt template that will be + ;* used with this parameter. +EQU BSTY.DICT.TEMPLATE$ TO 6 ;* Dictionary template. +EQU BSTY.CALL.EDIT.ROUTINE$ TO 7 ;* 0 or 1. Specifies whether + ;* edit routine must be called. + +* Source Date: 09:48:07 02 MAR 1993 Build ID: AREV*3.1.31 Level: 3.1 diff --git a/SYSPROG/STPROCINS/BOND_SUBS_EQUATES.txt b/SYSPROG/STPROCINS/BOND_SUBS_EQUATES.txt new file mode 100644 index 0000000..2fc42d8 --- /dev/null +++ b/SYSPROG/STPROCINS/BOND_SUBS_EQUATES.txt @@ -0,0 +1,120 @@ +Compile Insert Bond_Subs_Equates +* +* BOND.SUBS.EQUATES - equates for the central bonding kit dispatcher +* +DECLARE SUBROUTINE BOND.SUBS + +* BOND.SUBS COMMAND CODES + +* The first argument to BOND.SUBS is a code which specifies the +* function to be performed: +EQU BS.TYPE.PARSE$ TO 1 ;* Parse parameterized type. +EQU BS.TYPE.EXPAND$ TO 2 ;* Parse and expand parameterized +* * type. +EQU BS.TYPE.POPUP$ TO 3 ;* Formatted popup of global data +* * types. +EQU BS.TYPE.WPOPUP$ TO 4 ;* Like TYPE.POPUP, only no args. +EQU BS.MACRO.EXPAND$ TO 5 ;* Apply parsed macro (parameterized +* * type) to template. +* +EQU BS.ERROR$ TO 6 ;* Error handler. +EQU BS.GET.TYPE.REC$ TO 7 ;* Get record from type table. +EQU BS.GET.MAP.REC$ TO 8 ;* Get record from type maps table. + +EQU BS.GET.FLAG.ALL$ TO 1 ;* Get all map records +EQU BS.GET.FLAG.CREATE$ TO 2 ;* Get default creation mapping +EQU BS.GET.FLAG.ATTACH$ TO 3 ;* Get default attach mapping + +EQU BS.GET.TYPE$ TO 9 ;* Collect valid type from user. +EQU BS.REQUOTE$ TO 10 ;* requote a string. +EQU BS.FIELD.ATTR$ TO 11 ;* display field attr collector. +EQU BS.FILE.ATTR$ TO 12 ;* display file attr collector. +EQU BS.MAP.FILENAME$ TO 13 ;* Map filename into foreign env. +EQU BS.MAP.FIELDNAME$ TO 14 ;* Map fieldname into foreign env. +EQU BS.GET.FILE.ATTR$ TO 15 ;* Get default file attributes. +EQU BS.VOL.ATTR$ TO 16 ;* display volume attr collector. +EQU BS.TYPE.CREATE$ TO 17 ;* Type expansion when creating a + ;* dictionary field. +EQU BS.TYPE.ATTACH$ TO 18 ;* Type expansion when attaching + ;* to an existing dictionary field. +EQU BS.GET.WINFO$ TO 19 ;* For internal use only. +EQU BS.DEBUG$ TO 20 ;* Turn debugging on/off. +EQU BS.TYPE.WINDOW$ TO 21 ;* Call this for F2 for data type fields +EQU BS.GET.WINFO.MAP$ TO 22 ;* Internal use only. + +EQU BS.LAST.FUNC.CODE$ TO 22 ;* Sentinel for internal use + + + +! +! +* BOND.SUBS FILE DEFINITIONS + +* +EQU BSTM.FILE.NAME$ TO 'SYSTYPEMAPS' ;* Type mappings for each bond + + +EQU BSTM.BOND.NAME$ TO 1 ;* Key part 1. Name of bond. +EQU BSTM.FILE.TYPE$ TO 2 ;* Key part 2. File type ("." = default). +EQU BSTM.GENERIC.TYPE$ TO 3 ;* Key part 3. Name of corresponding + ;* record in generic data type table. +EQU BSTM.MAPPING.NAME$ TO 4 ;* The mapping name is the name selected + ;* by the bond developer which uniquely + ;* identifies a particular transformation + ;* of data between arev and the foreign + ;* environment. + +EQU BSTM.GEN.PARM.NAME$ TO 1 ;* A multi-valued list of the names of + ;* the parameters of the generic data + ;* type. The type mapping definition + ;* window initializes these to be the + ;* generic data type parameter names. The + ;* intent is that the mapping may append + ;* additional arguments, but that is not + ;* implemented in 2.0 +EQU BSTM.PARM.PROMPT$ TO 2 ;* A multi-valued list of scaled-down + ;* prompt window templates, each of which + ;* will be used in constructing the + ;* dynamic window for data type params. +EQU BSTM.DICT.TEMPLATE$ TO 3 ;* A dictionary template which contains + ;* replaceable parameters that will be + ;* used in expanding a data type into + ;* a dictionary record. +EQU BSTM.CALL.EDIT.ROUTINE$ TO 4 ;* Y/N. Should FOREIGN.SUBS be called + ;* at the end of a type expansion in order + ;* to perform additional editing? +EQU BSTM.DYNAMIC.FLAG$ TO 5 ;* 0 or 1. 1 means that the bond will + ;* have an opportunity to select the type + ;* mapping dynamically. + +EQU BSTM.NATURAL.FLAG$ TO 6 ;* 0 or 1. 1 means that this is a + ;* natural mapping. 0 means that if this + ;* data type is being created interactively, + ;* the user must be informed that the + ;* data type is being mapped to a less-than + ;* natural type in the foreign environment. +equ BSTM.DESCRIPTION$ TO 7 ;* one-line description of mapping for popup + + + +EQU BSTY.FILE.NAME$ TO "SYSTYPES" ;* The name of the file + ;* containing the generic + ;* data type records. + +EQU BSTY.TYPE.NAME$ TO 0 ;* The name of the generic data + ;* (this is the key to the file). +EQU BSTY.TYPE.DESCRIPTION$ TO 1 ;* One-liner description that will + ;* appear in the types popup. +EQU BSTY.SYNONYM.FOR$ TO 2 ;* Name of generic type that this + ;* type is just a synonym for. +EQU BSTY.DERIVED.FROM$ TO 3 ;* Name of generic type that this + ;* type is derived from. +EQU BSTY.PARM.NAME$ TO 4 ;* Multi-valued list of type + ;* parameters. +EQU BSTY.PARM.PROMPT$ TO 5 ;* Prompt template that will be + ;* used with this parameter. +EQU BSTY.DICT.TEMPLATE$ TO 6 ;* Dictionary template. +EQU BSTY.CALL.EDIT.ROUTINE$ TO 7 ;* 0 or 1. Specifies whether + ;* edit routine must be called. + +* Source Date: 10:58:08 27 FEB 1991 Build ID: AREV*2.1 Level: 2.1 diff --git a/SYSPROG/STPROCINS/BRW_CFG_EQUATES.txt b/SYSPROG/STPROCINS/BRW_CFG_EQUATES.txt new file mode 100644 index 0000000..ab01bb1 --- /dev/null +++ b/SYSPROG/STPROCINS/BRW_CFG_EQUATES.txt @@ -0,0 +1,18 @@ +cOMPILE Insert BRW_Cfg_Equates + +* mtr 11-2-06 +* layout of the BRW_CFG record in the SYSENV file, used by the BRW + +Equ show_grid$ To 1 +Equ snap_grid$ To 2 +Equ grid_uom$ To 3 +Equ grid_spacing$ To 4 + +Equ grid_hspace$ To 1 +Equ grid_vspace$ To 2 + +Equ Font_List$ To 5 +Equ point_list$ To 6 + +Equ current_font$ To 7 +Equ current_point$ To 8 diff --git a/SYSPROG/STPROCINS/BRW_EQUATES.txt b/SYSPROG/STPROCINS/BRW_EQUATES.txt new file mode 100644 index 0000000..9705f37 --- /dev/null +++ b/SYSPROG/STPROCINS/BRW_EQUATES.txt @@ -0,0 +1,53 @@ +Compile Insert BRW_Equates + +* mtr 7-13-06 +* mtr 7-17-07 + +* Report Structure Equates +Equ RS_TableName$ To 1 +Equ RS_Detail_Info$ To 2 +Equ RS_Detail_Coords$ To 3 +Equ RS_Grouped_Fields$ To 4 +Equ RS_Grp_Header_Info$ To 5 +Equ RS_Grp_Footer_Info$ To 6 +Equ RS_Page_Header$ To 7 +Equ RS_Page_Footer$ To 8 +Equ RS_Report_Header$ To 9 +Equ RS_Report_Footer$ To 10 +Equ RS_Margin_Info$ To 11 +Equ RS_Sel_Criteria$ To 12 +Equ RS_Screen_Size$ To 13 +Equ RS_Group_Coords$ To 14 +Equ RS_Group_Params$ To 15 +Equ RS_Sel_Params$ To 16 +Equ RS_Splitter$ To 17 +Equ RS_Allctrls$ To 18 +Equ RS_Allsizes$ To 19 +Equ RS_Allfonts$ To 20 +Equ RS_Options$ To 21 + + +* detail Structure +Equ det_table$ To 1 +Equ det_col$ To 2 +Equ det_x$ To 3 +Equ det_y$ To 4 +Equ det_width$ To 5 +Equ det_height$ To 6 +Equ det_font$ To 7 +Equ det_just$ To 8 +* mtr 7-17-07 +Equ det_override_conv$ To 9 +* ro 10-26-07 +Equ det_override_total$ To 10 +* ro 02-21-08 +Equ det_override_formula$ To 11 +Equ det_override_colhdr$ To 12 + + +* header footer flag +Equ Grp_Fieldname$ To 1 +Equ Grp_HeaderFlag$ To 2 +Equ Grp_FooterFlag$ To 3 + + diff --git a/SYSPROG/STPROCINS/BTREE.EQUATES.txt b/SYSPROG/STPROCINS/BTREE.EQUATES.txt new file mode 100644 index 0000000..398b768 --- /dev/null +++ b/SYSPROG/STPROCINS/BTREE.EQUATES.txt @@ -0,0 +1,67 @@ +compile Insert BTREE.EQUATES +/* +* rjc 02-15-15 Copy In From Arev bp +*/ + +#pragma BLINT_NOWARN + +EQU TRUE TO 1 +EQU FALSE TO 0 + +EQUATE MAX.LISTLEN$ TO 4000000 +* MTR 9-11-13 WAS 65500 + +EQU V.INDEX.TYPE TO 0 ;* VALUE INDEX MARKER +EQU ID.INDEX.TYPE TO 1 ;* ID INDEX MARKER +EQU LEAF.TYPE TO 2 ;* VALUE RECORD MARKER +EQU REC.TYPE.IX TO 1 ;* FIELD # FOR RECORD TYPE +EQU NEXT.LEAF.IX TO REC.TYPE.IX + 1 ;* FIELD # FOR "RIGHT" REC ID PTR +EQU PREV.LEAF.IX TO NEXT.LEAF.IX + 1 ;* FIELD # FOR "LEFT" REC ID PTR +EQU SEP.IX TO REC.TYPE.IX + 1 ;* FIELD # FOR SEPARATORS IN INDEX +EQU OPT.IX TO SEP.IX + 1 +EQU VALUE.IX TO PREV.LEAF.IX + 1 ;* FIELD # FOR VALUES IN LEAF +EQU ID.IX TO VALUE.IX + 1 ;* FIELD # FOR IDS IN LEAF +EQU SVM TO \FC\ +* +* B+TREE INDEX RECORD FORMAT: +* +* F1: '0' OR '1' - INDICATING A NON-LEAF RECORD(INDEX). +* 0 => VALUE INDEX - SEPARATORS REFER TO VALUES +* 1 => ID INDEX - SEPARATORS REFER TO ID'S +* F2: Multivalued list of separator values +* F3: Associated multivalued list of optional identifiers +* +* THE SEPARATOR VALUES DOUBLE AS RECORD POINTERS +* D L S +* / | | \______________ +* | \ +* N Q S SEP SEP +* +* A SEPARATOR POINTS TO A RECORD CONTAINING INDEXES TO OR DATA WHOSE +* VALUES ARE LESS THAN OR EQUAL TO THE SEPARATOR VALUE. +* A SEPARATOR IMPLIES THE LARGEST POSSIBLE VALUE +* FOR LEFT JUSTIFIED INDEXES, = @SVM:@SVM:@SVM +* FOR RIGHT JUSTIFIED INDEXES, = 1E4932 +* +* RECORD ID'S ARE BUILT AS FOLLOWS: +* +* F.NAME:"*":OPTIONALIDENTIFIER:"*":SEPARATOR +* WHERE F.NAME IS THE FIELD NAME OF THE FIELD BEING INDEXED. +* E.G. THE TOP LINE IN THE TREE ABOVE INDICATES RECORD IDS OF: +* (ASSUMING FIELD IS "NAME") +* NAME**D +* NAME**L +* NAME**S +* NAME** +* THE OPTIONAL IDENTIFIER IS ADDED IF NECESSARY TO MAKE UNIQUE ID'S +* +* LEAF RECORD FORMAT: +* +* F1: '2' IMPLYING A LEAF RECORD +* F2: NEXT SEQUENTIAL LEAF ID +* F3: PREVIOUS SEQUENTIAL LEAF ID +* F4: MULTIVALUED LIST OF INDEX VALUES +* F5: ASSOCIATED MV LIST OF IDS FOR EACH VALUE IN F4 +* ID'S SEPARATED BY SVM'S +* +* Source Date: 17:15:53 16 FEB 1988 Build ID: AREV*1.0.2 Level: 2.0 diff --git a/SYSPROG/STPROCINS/CACHE_MFS_COMMON.txt b/SYSPROG/STPROCINS/CACHE_MFS_COMMON.txt new file mode 100644 index 0000000..d089447 --- /dev/null +++ b/SYSPROG/STPROCINS/CACHE_MFS_COMMON.txt @@ -0,0 +1,25 @@ +Compile Insert Cache_Mfs_Common +/* +** +** See CACHE_MFS, SYSLISTS_MFS +** +** +** 10-20-2005 rjc Created +*/ + +EQU CREATE_CACHE$ TO 0 +EQU OPEN_CACHE$ TO 1 +EQU CLOSE_CACHE$ TO 2 +EQU CLEAR_CACHE$ TO 3 +EQU READ_CACHE$ TO 4 +EQU WRITE_CACHE$ TO 5 +EQU DELETE_CACHE$ TO 6 +EQU MAX_CACHE_CNT$ to 100 + +EQU CACHE_HANDLE_DELIM$ to \F7\ +Equ CACHE_HANDLE_POS$ To 6 + +declare subroutine rtp65 + +common /cache_mfs_Common/init@,handle_cnt@,names@,file_handles@(max_cache_cnt$),cache_handles@,full_cache_flags@ + diff --git a/SYSPROG/STPROCINS/CAPTIONSUFFIX_EQUATES.txt b/SYSPROG/STPROCINS/CAPTIONSUFFIX_EQUATES.txt new file mode 100644 index 0000000..1517157 --- /dev/null +++ b/SYSPROG/STPROCINS/CAPTIONSUFFIX_EQUATES.txt @@ -0,0 +1,41 @@ +compile insert CAPTIONSUFFIX_EQUATES + +****** +* NOTE: This insert is dependant on the WINRES_EQUATES insert. Thus, to use +* this insert ( captionsuffix_equates ) you must include the other insert first: +* +* +* Changes +* -------------------------------------------------------- +* 10-18-95 VG Soft-coding literals +* 10-27-13 Mr C Added header guards - updated for v10 +****** + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _CAPTIONSUFFIX_EQUATES_ +#define _CAPTIONSUFFIX_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert winRes_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + EQU SUFF_NEWENTRY$ TO ResToString( WINRES_NEWENTRY$, SYSRES_SYSTEM$ ) + EQU SUFF_QBFINIT$ TO ResToString( WINRES_QBFDEFINE$, SYSRES_SYSTEM$ ) + EQU SUFF_QBFRUN$ TO ResToString( WINRES_QBFINPROGRESS$, SYSRES_SYSTEM$ ) + EQU SUFF_QBFBROWSE$ TO ResToString( WINRES_QBFBROWSE$, SYSRES_SYSTEM$ ) + EQU SUFF_LOCKED$ TO ResToString( WINRES_LOCKED$, SYSRES_SYSTEM$ ) + EQU SUFF_NONE$ TO '' + EQU SUFF_DELIM$ TO ' - <' + EQU SUFF_DELIM_LASTCHAR$ TO '<' + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/CBBFS_HELPER_EQUATES.txt b/SYSPROG/STPROCINS/CBBFS_HELPER_EQUATES.txt new file mode 100644 index 0000000..6fcb2c7 --- /dev/null +++ b/SYSPROG/STPROCINS/CBBFS_HELPER_EQUATES.txt @@ -0,0 +1,53 @@ +compile insert CBBFS_HELPER_EQUATES +/* +** Supporting equates For cbbfs_helper function +** 02-23-15 rjc move defaults To cbbfs_Equates, Add Lockmode_field, list_index, add_index, remove_Index, list_lock_methods commands +** 09-21-17 rjc added raw read, write, delete methods +** 03-26-18 rjc added admin port +*/ + +* Supported fields +Equ CMD_PING$ To 0 +Equ CMD_VOLUME_LIST$ To 1 +Equ CMD_VOLUME_READ$ To 2 +Equ CMD_VOLUME_ATTACH$ To 3 +Equ CMD_VOLUME_DETACH$ To 4 +Equ CMD_VOLUME_DELETE$ To 5 +Equ CMD_VOLUME_SAVE$ To 6 +Equ CMD_SERVER_TABLES$ To 7 +Equ CMD_LIST_STORAGE_TYPES$ To 8 +Equ CMD_LIST_LOCK_TYPES$ To 9 +Equ CMD_ADMIN_CONNECTION$ To 10 +Equ CMD_LIST_PLATFORMS$ To 11 +Equ CMD_USERNAMES$ To 12 +Equ CMD_WRITECRED$ To 13 +Equ CMD_REMOVECRED$ To 14 +EQU CMD_VOLUME_ADMIN$ To 15 +EQU CMD_STATUS_CONNECTION$ To 16 +Equ CMD_CHECK$ To 17 +Equ CMD_PREFIX$ To 18 +Equ CMD_WRITE_RAW$ To 19 +Equ CMD_READ_RAW$ To 20 +Equ CMD_DELETE_RAW$ To 21 +Equ CMD_LIST_LOCKS$ To 22 +Equ CMD_RELEASE_LOCKS$ To 23 + + +* record layout +EQU BFS_FIELD$ TO 1 +EQU BUCKET_FIELD$ TO 2 +EQU PLATFORM_FIELD$ TO 3 +EQU HOSTNAME_FIELD$ TO 4 +EQU DESIGN_DOC_FIELD$ TO 5 +EQU PORT_FIELD$ TO 6 +EQU USER_FIELD$ TO 7 +EQU PWD_FIELD$ TO 8 +EQU TABLE_ATT_FIELD$ TO 9 +EQU ATID_ATT_FIELD$ TO 10 +Equ STORAGE_TYPE_FIELD$ To 11 +Equ RECORD_ATT_FIELD$ To 12 +Equ LOCKMODE_FIELD$ To 13 +Equ APPLICATION_FIELD$ To 14 +Equ UNLINKED_TABLES_FIELD$ To 15 +Equ LINKED_TABLES_FIELD$ To 16 +Equ ADMIN_PORT_FIELD$ To 17 diff --git a/SYSPROG/STPROCINS/CDOMAIL_ERRORS.txt b/SYSPROG/STPROCINS/CDOMAIL_ERRORS.txt new file mode 100644 index 0000000..28d90b3 --- /dev/null +++ b/SYSPROG/STPROCINS/CDOMAIL_ERRORS.txt @@ -0,0 +1,59 @@ +compile insert CDOMAIL_ERRORS +* Error codes used by RTI_CDOMAIL +/* +0x80020009 An exception has occurred. +0×80040201 Exception %1 was generated at address %2. +0×80040202 No data source has been opened for the object. +0×80040203 The object does not support this type of data source. +0×80040204 The object does not support the requested property name or namespace. +0×80040205 The object does not support the requested property. +0×80040206 The object is not active. It may have been deleted or it may not have been opened. +0×80040207 The object does not support storing persistent state information for objects. +0×80040208 The requested property or feature, while supported, is not available at this time or in this context. +0×80040209 No default drop directory has been configured for this server. +0x8004020A The SMTP server name is required, and was not found in the configuration source. +0x8004020B The NNTP server name is required, and was not found in the configuration source. +0x8004020C At least one recipient is required, but none were found. +0x8004020D At least one of the From or Sender fields is required, and neither was found. +0x8004020E The server rejected the sender address. The server response was: %1 +0x8004020F The server rejected one or more recipient addresses. The server response was: %1 +0×80040210 The message could not be posted to the NNTP server. The transport error code was %2. The server response was %1 +0×80040211 The message could not be sent to the SMTP server. The transport error code was %2. The server response was %1 +0×80040212 The transport lost its connection to the server. +0×80040213 The transport failed to connect to the server. +0×80040214 The Subject, From, and Newsgroup fields are all required, and one or more was not found. +0×80040215 The server rejected the logon attempt due to authentication failure. The server response was: %1 +0×80040216 The content type was not valid in this context. For example, the root of an MHTML message must be an HTML document. +0×80040217 The transport was unable to log on to the server. +0×80040218 The requested resource could not be found. The server response was: %1. +0×80040219 Access to the requested resource is denied. The server response was: %1. +0x8004021A The HTTP request failed. The server response was: %1. +0x8004021B This is a multipart body part. It has no content other than the body parts contained within it. +0x8004021C Multipart body parts must be encoded as 7bit, 8bit, or binary. +0x8004021E The requested property was not found. +0×80040220 The "SendUsing" configuration value is invalid. +0×80040221 The "PostUsing" configuration value is invalid. +0×80040222 The pickup directory path is required and was not specified. +0×80040223 One or more messages could not be deleted. +0×80040227 The property is read-only. +0×80040228 The property cannot be deleted. +0×80040229 Data written to the object are inconsistent or invalid. +0x8004022A The requested property is not in the mail header namespace. +0x8004022B The requested character set is not installed on the computer. +0x8004022C The ADO stream has not been opened. +0x8004022D The content properties are missing. +0x8004022E Content properties XML must be encoded using UTF-8. +0x8004022F Failed to parse content properties XML. +0×80040230 Failed to convert a property from XML to a requested type. +0×80040231 No directories were specified for resolution. +0×80040232 Failed to resolve against one or more of the specified directories. +0×80040233 Could not find the Sender’s mailbox. +0×80040234 Binding to self is not allowed. +0×80044000 The first argument is invalid. +0×80044001 The second argument is invalid. +0×80044002 The third argument is invalid. +0×80044003 The fourth argument is invalid. +0×80044004 The fifth argument is invalid. +0x800CCE05 The requested body part was not found in this message. +0x800CCE1D The content encoding type is invalid. +*/ diff --git a/SYSPROG/STPROCINS/COLORS.txt b/SYSPROG/STPROCINS/COLORS.txt new file mode 100644 index 0000000..eb19502 --- /dev/null +++ b/SYSPROG/STPROCINS/COLORS.txt @@ -0,0 +1,84 @@ +compile insert colors +/* + ** Copyright (C) 1992-2016 Revelation Software Inc. All Rights Reserved ** + + Author : GG?? + Date : Way back when dinosaurs ruled the earth + Purpose : Basic and SysColor contants for use with the PS + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 10 Oct 14 Corrected USEPARENT$ and BLACK$ + Mr C 30 Jul 14 Updated for v10 + MTR 18 Sep 17 Touched for Update + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _COLORS_ +#define _COLORS_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * PS colors + equ CLR_TRANSPARENT$ to -1 + equ CLR_USEDEFAULT$ to -2 + + * // Beware of the "USEPARENT$" from v10 onwards - We no longer have the + * // concept of "ask the parent" for the color - instead we use the default + * // selected by the VSM. + * // + * // We want "0" to mean Black. + + * RGB colors + *EQU USEPARENT$ TO 0 ;* \000000\ <- Deprecated in v10 + *EQU BLACK$ TO 1 ;* \000001\ + EQU USEPARENT$ TO CLR_USEDEFAULT$ + EQU BLACK$ TO 0 ;* \000000\ + EQU RED$ TO 255 ;* \0000FF\ + EQU ORANGE$ TO 33023 ;* \0080FF\ + EQU GREEN$ TO 65280 ;* \00FF00\ + EQU YELLOW$ TO 65535 ;* \00FFFF\ + EQU GREY$ TO 12632256 ;* \C0C0C0\ + EQU BLUE$ TO 16711680 ;* \FF0000\ + EQU PURPLE$ TO 16711808 ;* \FF0080\ + EQU MAGENTA$ TO 16711935 ;* \FF00FF\ + EQU CYAN$ TO 16776960 ;* \FFFF00\ + EQU WHITE$ TO 16777215 ;* \FFFFFF\ + + * system colors (see windows.h) + EQU COLOR_SCROLLBAR$ TO 2147483648 ;* \80000000\ + EQU COLOR_BACKGROUND$ TO 2164260864 ;* \81000000\ + EQU COLOR_ACTIVECAPTION$ TO 2181038080 ;* \82000000\ + EQU COLOR_INACTIVECAPTION$ TO 2197815296 ;* \83000000\ + EQU COLOR_MENU$ TO 2214592512 ;* \84000000\ + EQU COLOR_WINDOW$ TO 2231369728 ;* \85000000\ + EQU COLOR_WINDOWFRAME$ TO 2248146944 ;* \86000000\ + EQU COLOR_MENUTEXT$ TO 2264924160 ;* \87000000\ + EQU COLOR_WINDOWTEXT$ TO 2281701376 ;* \88000000\ + EQU COLOR_CAPTIONTEXT$ TO 2298478592 ;* \89000000\ + EQU COLOR_ACTIVEBORDER$ TO 2315255808 ;* \8A000000\ + EQU COLOR_INACTIVEBORDER$ TO 2332033024 ;* \8B000000\ + EQU COLOR_APPWORKSPACE$ TO 2348810240 ;* \8C000000\ + EQU COLOR_HIGHLIGHT$ TO 2365587456 ;* \8D000000\ + EQU COLOR_HIGHLIGHTTEXT$ TO 2382364672 ;* \8E000000\ + EQU COLOR_BTNFACE$ TO 2399141888 ;* \8F000000\ + EQU COLOR_BTNSHADOW$ TO 2415919104 ;* \90000000\ + EQU COLOR_GRAYTEXT$ TO 2432696320 ;* \91000000\ + EQU COLOR_BTNTEXT$ TO 2449473536 ;* \92000000\ + EQU COLOR_INACTIVECAPTIONTEXT$ TO 2466250752 ;* \93000000\ + EQU COLOR_BTNHIGHLIGHT$ TO 2483027968 ;* \94000000\ + + EQU SYSCOLORMASK$ TO 0xFF000000 + EQU SYSCOLORBASE$ TO 0x80000000 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/COLOR_EQUATES.txt b/SYSPROG/STPROCINS/COLOR_EQUATES.txt new file mode 100644 index 0000000..2427e50 --- /dev/null +++ b/SYSPROG/STPROCINS/COLOR_EQUATES.txt @@ -0,0 +1,10 @@ +Compile Insert Color_Equates +/* + ** Copyright (C) 2015 Revelation Software Inc. All Rights Reserved ** + + Amended Date Reason + ======= ==== ====== + rjc 15 Apr 15 Colors is a superset of Color Equates + +*/ +$Insert Colors diff --git a/SYSPROG/STPROCINS/COMPDOC_EQUATES.txt b/SYSPROG/STPROCINS/COMPDOC_EQUATES.txt new file mode 100644 index 0000000..46ccebc --- /dev/null +++ b/SYSPROG/STPROCINS/COMPDOC_EQUATES.txt @@ -0,0 +1,49 @@ +Compile Insert CompDoc_Equates + +***************************************************************************** +* +* Product : OI/WG +* Poject : OI/CS +* Release : 2.7 +* +* Name : CompDoc() Equates +* Description: Instructions and return values for the CompDoc() function +* +* History (Date, Initials, Notes) +* 06/27/95 cp Original programmer +* +***************************************************************************** + +declare function CompDoc ;* Flag = CompDoc(Instruction, Doc, Name, SubDoc) + + +* Instruction values: +equ CD_LISTDOCS$ to 1 + * Doc [in] - the compound document + * Name [out] - an @vm delimited list of sub-document names + +equ CD_PUTDOC$ to 2 + * Doc [i/o] - the compound document + * Name [in] - the name of the sub-document to put + * SubDoc [in] - the body of the sub-document to put + * Error returned if the compound document would exceed 64k limit + +equ CD_GETDOC$ to 3 + * Doc [in] - the compound document + * Name [in] - the name of the sub-document to extract + * SubDoc [out] - the extracted sub-document + * Error returned if the sub-document is not found + +equ CD_DELDOC$ to 4 + * Doc [i/o] - the compound document + * Name [in] - the name of the sub-document to delete + * Error returned if the sub-document is not found + + +* Flag values +equ CD_ERROR$ to 0 +equ CD_SUCCESS$ to 1 + +* Compound Document header +equ CD_STAMP$ to "%CD%" + diff --git a/SYSPROG/STPROCINS/COMPSTAT_EQUATES.txt b/SYSPROG/STPROCINS/COMPSTAT_EQUATES.txt new file mode 100644 index 0000000..a054624 --- /dev/null +++ b/SYSPROG/STPROCINS/COMPSTAT_EQUATES.txt @@ -0,0 +1,37 @@ +compile insert COMPSTAT_EQUATES +/* + Copyright (c) 1992-2012 Revelation Software. All rights reserved. + + * This program is proprietary and is not to be used by or disclosed + * to others, nor is it to be copied without written permission from + * Revelation Technologies, Inc. + + Author Mr C + Date October 2012 + Purpose Compiler status constants + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _COMPSTAT_EQUATES_ +#define _COMPSTAT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ COMPSTAT_ERR$ to 0 ; * // error occured in compilation - return codes as appropriate + equ COMPSTAT_NOCOMP$ to 1 ; * // No compilation was required - return last update time of source + equ COMPSTAT_COMP$ to 2 ; * // Compilation performed successfully - return last update time of source + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/CONCURRENCY_EQUATES.txt b/SYSPROG/STPROCINS/CONCURRENCY_EQUATES.txt new file mode 100644 index 0000000..777fe8c --- /dev/null +++ b/SYSPROG/STPROCINS/CONCURRENCY_EQUATES.txt @@ -0,0 +1,19 @@ +Compile Insert Concurrency_Equates + +*SC_CONCURRENCY variable offsets and domains + +EQU CONC_SET$ TO 1 + EQU SET_ALL$ TO 1 + EQU SET_MODIFIED$ TO 2 + +EQU CONC_WHERE$ TO 2 + EQU WHERE_ID_ONLY$ TO 1 + EQU WHERE_MODIFIED$ TO 2 + EQU WHERE_ALL$ TO 3 + +EQU CONC_UPDATE$ TO 3 + EQU UPDATE_NO_TRANSACT$ TO 1 + EQU UPDATE_FULL_TRANSACT$ TO 2 + EQU UPDATE_EXPLICIT_LOCK$ TO 3 + +* Source Date: 15:31:40 20 JAN 1994 Build ID: OI*2.01.26 Level: 2.01 diff --git a/SYSPROG/STPROCINS/CONFIG_EQUATES.txt b/SYSPROG/STPROCINS/CONFIG_EQUATES.txt new file mode 100644 index 0000000..05fdc3e --- /dev/null +++ b/SYSPROG/STPROCINS/CONFIG_EQUATES.txt @@ -0,0 +1,9 @@ +compile insert CONFIG_EQUATES +/*---------------------------------------- + Author : Table Create Insert Routine + Written : 28/03/2005 + Description : Insert for Table CONFIG +----------------------------------------*/ + +Equ CONFIG_KEY_FIELD$ To 0 +Equ CONFIG_BASE_IP$ To 1 diff --git a/SYSPROG/STPROCINS/CONTEXTMENU_EQUATES.txt b/SYSPROG/STPROCINS/CONTEXTMENU_EQUATES.txt new file mode 100644 index 0000000..2d89026 --- /dev/null +++ b/SYSPROG/STPROCINS/CONTEXTMENU_EQUATES.txt @@ -0,0 +1,45 @@ +Compile Insert ContextMenu_Equates + +* Multi-valued fields +Equ CM_ITEMTEXT$ To 1 +Equ CM_ITEMNAME$ To 2 +Equ CM_HELPTEXT$ To 3 +Equ CM_STYLE$ To 4; * Unused +Equ CM_MSGTYPE$ To 5 +Equ CM_RECEIPIENT$ To 6 +Equ CM_MESSAGE$ To 7 +Equ CM_PARAMETERS$ To 8 +Equ CM_DISABLED$ To 9 +Equ CM_CHECKED$ To 10 +Equ CM_HIDDEN$ To 11 + +* Added for SRP Context Menus +Equ CM_STYLE_FUNCTION$ To 12 +Equ CM_STYLE_FUNC_PARAMS$ To 13 + +Equ CM_DISABLED_FUNCTION$ To 12 +Equ CM_DISABLED_PARAMS$ To 13 +Equ CM_HIDDEN_FUNCTION$ To 14 +Equ CM_HIDDEN_PARAMS$ To 15 +Equ CM_CHECKED_FUNCTION$ To 16 +Equ CM_CHECKED_PARAMS$ To 17 +Equ CM_VARIABLE_FUNCTION$ To 18 +Equ CM_VARIABLE_PARAMS$ To 19 + +* Single-value fields +*Equ CM_INCLUDE_OI_MENU$ To 14 +*Equ CM_INCLUDE_WIN_MENU$ To 15 +Equ CM_INCLUDE_OI_MENU$ To 20 +Equ CM_INCLUDE_WIN_MENU$ To 21 + +*Equ CM_NUM_MVFIELDS$ To 13 +*Equ CM_NUMFIELDS$ To 15 +Equ CM_NUM_MVFIELDS$ To 19 +Equ CM_NUMFIELDS$ To 21 + +* For Record 2 of Context Menu +*Equ CM_INCLUDE_OI_MENU$ To 1 +*Equ CM_INCLUDE_WIN_MENU$ To 2 + + + diff --git a/SYSPROG/STPROCINS/COPYRIGHT.txt b/SYSPROG/STPROCINS/COPYRIGHT.txt new file mode 100644 index 0000000..6037008 --- /dev/null +++ b/SYSPROG/STPROCINS/COPYRIGHT.txt @@ -0,0 +1,5 @@ +COMPILE Insert CopyRight + +* J.C. Henry, Inc. Copyright Notice + +CopyRight = 'Copyright 1996, 1997, 1998, 1999, 2000, 2001,2002, 2003 - J.C. Henry, Inc - All Rights Reserved' diff --git a/SYSPROG/STPROCINS/CTODICT_COMMON.txt b/SYSPROG/STPROCINS/CTODICT_COMMON.txt new file mode 100644 index 0000000..70b7c72 --- /dev/null +++ b/SYSPROG/STPROCINS/CTODICT_COMMON.txt @@ -0,0 +1,2 @@ +compile insert CTODICT_COMMON +COMMON /CTODICT_MFS_COMMON/ PreserveID%, overridePreserveID% diff --git a/SYSPROG/STPROCINS/CTOOPTIONSTATUS.txt b/SYSPROG/STPROCINS/CTOOPTIONSTATUS.txt new file mode 100644 index 0000000..50fab29 --- /dev/null +++ b/SYSPROG/STPROCINS/CTOOPTIONSTATUS.txt @@ -0,0 +1,3 @@ +COMPILE INSERT CTOOPTIONSTATUS + +COMMON /CTOOPTIONSTATUS/ OPTIONS_CHANGED% diff --git a/SYSPROG/STPROCINS/CTRL_PROPERTY_EQUATES.txt b/SYSPROG/STPROCINS/CTRL_PROPERTY_EQUATES.txt new file mode 100644 index 0000000..a4b6215 --- /dev/null +++ b/SYSPROG/STPROCINS/CTRL_PROPERTY_EQUATES.txt @@ -0,0 +1,270 @@ +compile insert Ctrl_Property_Equates +/* + ** Copyright (C) 1992-2016 Revelation Software Inc. All Rights Reserved ** + + ******************************************************************* + + @@@@@@ @@@@@@@ @@@@@@ @@@@@@ @ @ @ + @ @ @ @ @ @ @ @ @ + @ @ @ @ @ @ @ @ @ + @@@@@@ @ @ @ @@@@@@ @ @ @ + @ @ @ @ @ @ @ @ + @ @ @ @ @ + @@@@@@ @ @@@@@@ @ @ @ @ + + + This insert is for backwards compatibility only. From v10 onwards + it will NOT be updated - type information for a control should use + the PS_TYPEINFO stored procedure instead. + + ****************************************************************** + + Amended Date Reason + ======= ==== ====== + Mr C 29th Mar 16 Added STOP notice + + Mr C 10th Jan 06 Added ATRECORD + + Mr C 3rd Jan 06 Added RTFTEXT, RichEditBox DEFPROP + + Mr C 7th Oct 05 Added SCREENSIZE, HEADERHEIGHT, AUTOINDENT, ANCHORRIGHT, ANCHORBOTTOM + AUTOSCROLL, AUTOSIZEHEIGHT, AUTOSIZEWIDTH, IMAGE, IMAGE_INFO + IMAGETRANSPARENT, RESIZECOL, SEND_MESSAGE + Mr C 7th Sep 05 Added ROWLIMIT + Added ROWSHADE, ODDROWCOLOR, EVENROWCOLOR + Added DTCOLOR + Added DEVMODE, SERVERNAME +*/ + +* OpenInsight Window / Control Properties +equ ACCELERATOR$ to "ACCELERATOR" ;* for menu items +equ ACCESSDATA$ to "ACCESSDATA" +equ ACCESSPOS$ to "ACCESSPOS" +equ ANCHORBOTTOM$ to "ANCHORBOTTOM" +equ ANCHORRIGHT$ to "ANCHORRIGHT" +equ ARRAY$ to "ARRAY" +equ ATRECORD$ to "ATRECORD" +equ AUTOINDENT$ to "AUTOINDENT" +equ AUTOSCROLL$ to "AUTOSCROLL" +equ AUTOSIZEHEIGHT$ to "AUTOSIZEHEIGHT" +equ AUTOSIZEWIDTH$ to "AUTOSIZEWIDTH" +equ AUTOSIZECOL$ to "AUTOSIZECOL" +equ BACKCOLOR$ to "BACKCOLOR" +equ BITMAP$ to "BITMAP" +equ BLOCK_EVENTS$ to "BLOCK_EVENTS" ;* for "SYSTEM" object +equ CANCEL$ to "CANCEL" +equ CANUNDO$ to "CANUNDO" +equ CARETPOS$ to "CARETPOS" +equ CELLPOS$ to "CELLPOS" ;* for accessing cell of edittable. +equ CHECK$ to "CHECK" +equ CLICKPOS$ to "CLICKPOS" +equ CLIENTSIZE$ to "CLIENTSIZE" +equ COLDATA$ to "COLDATA" +equ COLUMN$ to "COLUMN" +equ CONV$ to "CONV" +equ COUNTER$ to "COUNTER" ;* for "SYSTEM" object +equ CTRLMAP$ to "CTRLMAP" ;* Master list of all controls in the current window +equ DATASOURCETYPE$ to "DATASOURCETYPE" +equ DDECOMMAND$ to "DDECOMMAND" +equ DDEDATA$ to "DDEDATA" +equ DDEERROR$ to "DDEERROR" +equ DDEITEM$ to "DDEITEM" +equ DDELINK$ to "DDELINK" +equ DDEMODE$ to "DDEMODE" +equ DDESERVICE$ to "DDESERVICE" +equ DDETOPIC$ to "DDETOPIC" +equ DEFAULT$ to "DEFAULT" +equ DEFPROP$ to "DEFPROP" ;* Default Property for database sensitive controls +equ DESTROY_FLAG$ to "DESTROY_FLAG" +equ DEVMODE$ to "DEVMODE" +equ DRAWTEXT$ to "DRAWTEXT" +equ DROPDOWN$ to "DROPDOWN" +equ DSOHANDLE$ to "DSOHANDLE" +equ DTHANDLE$ to "DTHANDLE" +equ DUMMYCAPTION$ to "DUMMYCAPTION" +equ ECHO$ to "ECHO" +equ ENABLED$ to "ENABLED" +equ EVENROWCOLOR$ to "EVENROWCOLOR" +equ EVENTQUALIFIER$ to "EVENTQUALIFIER" +equ EXITCODE$ to "EXITCODE" +equ FOCUS$ to "FOCUS" +equ FONT$ to "FONT" +equ FORECOLOR$ to "FORECOLOR" +equ GOTFOCUS_VALUE$ to "GOTFOCUS_VALUE" +equ HANDLE$ to "HANDLE" +equ HEADERHEIGHT$ to "HEADERHEIGHT" +equ HELPTEXT$ to "HELPTEXT" +equ HOLD_EVENTS$ to "HOLD_EVENTS" ;* for "SYSTEM" object +equ HPOSITION$ to "HPOSITION" +equ ICON$ to "ICON" +equ ID$ to "ID" ;* accessing @ID +equ IDLEPROC$ to "IDLEPROC" ;* for "SYSTEM" object +equ IMAGE$ to "IMAGE" +equ IMAGECLIP$ to "IMAGECLIP" +equ IMAGECOUNT$ to "IMAGECOUNT" +equ IMAGEINFO$ to "IMAGEINFO" +equ IMAGENUMBER$ to "IMAGENUMBER" +equ IMAGEOFFSET$ to "IMAGEOFFSET" +equ IMAGEORIGIN$ to "IMAGEORIGIN" +equ IMAGETRANSPARENT$ to "IMAGETRANSPARENT" +equ INVALUE$ to "INVALUE" ;* accessing internal value... +equ IOOPTIONS$ to "IOOPTIONS" ;* IO options to access LOCK MODE... +equ ITEMSTYLE$ to "ITEMSTYLE" +equ LABEL$ to "LABEL" +equ LIMIT$ to "LIMIT" +equ LIST$ to "LIST" +equ LIST_EX$ to "LIST_EX" ;* for hierarchical listboxes +equ LOCKMODE$ to "LOCKMODE" ;* accessing lock mode for a form +equ MDIACTIVE$ to "MDIACTIVE" +equ MDIFRAME$ to "MDIFRAME" +equ MISC$ to "MISC" +equ MODAL$ to "MODAL" ;* for "SYSTEM" object +equ MODIFIED$ to "MODIFIED" +equ MV$ to "MV" +equ NEXT$ to "NEXT" +equ NOTIFYPOS$ to "NOTIFYPOS" +equ ODDROWCOLOR$ to "ODDROWCOLOR" +equ ORIG_BKCOLOR$ to "ORIG_BACKCOLOR" +equ ORIG_ENABLED$ to "ORIG_ENABLED" +equ ORIG_FORECOLOR$ to "ORIG_FORECOLOR" +equ ORIG_HIGH$ to "ORIG_HIGH" +equ ORIG_LABEL$ to "ORIG_LABEL" +equ ORIG_LIST$ to "ORIG_LIST" +equ ORIG_LOGFONT$ to "ORIG_FONT" +equ ORIG_ROWVALUE$ to "ORIG_ROWVALUE" +equ ORIG_SIZE$ to "ORIG_SIZE" +equ ORIG_STRUCT$ to "ORIG_STRUCT" +equ ORIG_TEXT$ to "ORIG_TEXT" +equ ORIG_VALUE$ to "ORIG_VALUE" +equ ORIG_VISIBLE$ to "ORIG_VISIBLE" +equ ORIG_WIDE$ to "ORIG_WIDE" +equ ORIG_X$ to "ORIG_X" +equ ORIG_Y$ to "ORIG_Y" +equ PAGELIST$ to "PAGELIST" +equ PARENT$ to "PARENT" +equ PART$ to "PART" ;* if pos = 0, part = key part # +equ POPUP$ to "POPUP" +equ POPUP_LIMIT$ to "POPUP_LIMIT" +equ POS$ to "POS" ;* field position of the associated column in the table +equ POSITION$ to "POSITION" +equ PREVIOUS$ to "PREVIOUS" +equ PREVSELPOS$ to "PREVSELPOS" +equ QBFLIST$ to "QBFLIST" ;* QBF browse id list +equ QBFPOS$ to "QBFPOS" ;* QBF position within QBF list +equ QBFSTATUS$ to "QBFSTATUS" ;* QBF status (see QBFSTAT_ equates) +equ QUERYEND$ to "QUERYEND" +equ RECEIVER$ to "RECEIVER" +equ RECORD$ to "RECORD" ;* accessing @RECORD +equ REDRAW$ to "REDRAW" +equ REPOS_TYPE$ to "REPOS_TYPE" +equ REQUIRED$ to "REQUIRED" +equ RESIZECOL$ to "RESIZECOL" +equ ROWDATA$ to "ROWDATA" +equ ROWLIMIT$ to "ROWLIMIT" +equ ROWSHADE$ to "ROWSHADE" +equ RTFTEXT$ to "RTFTEXT" +equ SAVEWARN$ to "SAVEWARN" ;* accessing ControlSemantic@< 1, CS_GOTFOCUS_VALUE$> +equ SCREENSIZE$ to "SCREENSIZE" +equ SELECTION$ to "SELECTION" +equ SELPOS$ to "SELPOS" +equ SELPOS_EX$ to "SELPOS_EX" ;* for hierarchical listboxes +equ SEND_MESSAGE$ to "SEND_MESSAGE" +equ SERVERNAME$ to "SERVERNAME" +equ SIZE$ to "SIZE" +equ SORTEDCOL$ to "SORTEDCOL" +equ STATUSLINE$ to "STATUSLINE" +equ STYLE$ to "STYLE" +equ STYLE_EX$ to "STYLE_EX" +equ TABLE$ to "TABLE" +equ TABOUTEXCEED$ to "TABOUTEXCEED" +equ TABSTOPS$ to "TABSTOPS" +equ TEXT$ to "TEXT" +equ TEXTVAL$ to "TEXTVAL" ;* TEXT with conversion +equ THEMED$ to "THEMED" +equ TIMER$ to "TIMER" +equ TOPPOS$ to "TOPPOS" +equ TYPE$ to "TYPE" +equ VALID$ to "VALID" +equ VALUE$ to "VALUE" +equ VALUES$ to "VALUES" +equ VERSION$ to "VERSION" ;* for "SYSTEM" object +equ VISIBLE$ to "VISIBLE" +equ VPOSITION$ to "VPOSITION" +equ XPOS$ to "XPOS" ;* for accessing a column of an edittable +equ YPOS$ to "YPOS" ;* for accessing a row of an edittable + + +* QBFSTATUS equates + +equ QBFSTAT_OFF$ to 0 ;* QBF inactive +equ QBFSTAT_INIT$ to 1 ;* QBF initialization (null browse list) +equ QBFSTAT_ACTIVE$ to 2 ;* active browse list + + +* LOTUSNOTES specific properties + +* ... per database +equ NOTEPREFORMULA$ to "NOTEPREFORMULA" +equ NOTEPOSTFORMULA$ to "NOTEPOSTFORMULA" +equ NOTELIST$ to "NOTELIST" +equ NOTEPOS$ to "NOTEPOS" +equ NOTEDBLIST$ to "NOTEDBLIST" + +* ... per control +equ NOTEDB$ to "NOTEDB" +equ NOTEFIELD$ to "NOTEFIELD" + + +* GET_CONTROL_TYPES equates + +equ SYSCOM_CTRL_TYPE_LIST$ to 1 ;* first field of syscommon +equ SYSCOM_CTRL_DEFPROP$ to 2 +equ SYSCOM_CTRL_TYPE_DEF$ to 3 ;* ind. this is base or non-base control + +equ BASE_CTRL_TYPE$ to 0 +equ NON_BASE_CTRL_TYPE$ to 1 + +equ CTRL_TYPE_SYSTEM$ to 0 ;* query base ctrl types +equ CTRL_TYPE_NON_SYSTEM$ to 1 ;* query non-system ctrl types ( e.g. add-on ctrls..) +equ CTRL_TYPE_ALL_TYPES$ to 2 ;* query all the ctrls + + +* GET_CONTROL_METAINFO equates + +equ METAINFO_PROP_SUPPORTED$ to 0 ;* return properties supported +equ METAINFO_DEFPROP$ to 1 ;* return default properties +equ METAINFO_EVENT_SUPPORTED$ to 2 ;* events supported the the control + +equ METAINFO_SET_DISCRETE$ to 0 ;* return info discrete +equ METAINFO_SET_JOIN$ to 1 ;* return intersection of sets +equ METAINFO_SET_UNION$ to 2 ;* return union of sets + + +* DEFPROP property for each control... + +equ WINDOW_DEFPROP$ to TEXT$ +equ EDITBOX_DEFPROP$ to TEXTVAL$ +equ EDITFIELD_DEFPROP$ to TEXT$ +equ EDITTABLE_DEFPROP$ to "" ;* defprop is based on aux position (see help) +equ CHECKBOX_DEFPROP$ to CHECK$ +equ COMBOBOX_DEFPROP$ to TEXT$ +equ LISTBOX_DEFPROP$ to TEXT$ +equ PUSHBUTTON_DEFPROP$ to TEXT$ +equ RADIOBUTTON_DEFPROP$ to VALUE$ +equ RADIOGROUP_DEFPROP$ to VALUE$ +equ HSCROLLBAR_DEFPROP$ to HPOSITION$ +equ VSCROLLBAR_DEFPROP$ to VPOSITION$ +equ ICON_DEFPROP$ to TEXT$ +equ MENU_DEFPROP$ to CHECK$ +equ BITMAP_DEFPROP$ to BITMAP$ +equ GROUPBOX_DEFPROP$ to TEXT$ +equ STATIC_DEFPROP$ to TEXT$ +equ PUSHBMP_DEFPROP$ to BITMAP$ +equ RADIOBMP_DEFPROP$ to CHECK$ +equ CHECKBMP_DEFPROP$ to CHECK$ +equ RTFBOX_DEFPROP$ to TEXT$ +* mtr 9-20-04 +equ HSPLITBAR_DEFPROP$ TO HPOSITION$ +equ VSPLITBAR_DEFPROP$ to VPOSITION$ +Equ TABCONTROL_DEFPROP$ TO VALUE$ +equ RICHEDITBOX_DEFPROP$ to RTFTEXT$ ; // Mr C - 3rd Jan 06 diff --git a/SYSPROG/STPROCINS/CURSIO_CONSTANTS.txt b/SYSPROG/STPROCINS/CURSIO_CONSTANTS.txt new file mode 100644 index 0000000..9a48c16 --- /dev/null +++ b/SYSPROG/STPROCINS/CURSIO_CONSTANTS.txt @@ -0,0 +1,10 @@ +Compile Insert CURSIO_CONSTANTS +*** CURSOR I/O PROCESS CODES *** +* 09-01-2015 rjc OI10. Moved from Arev BP +EQUATE CIO_READ$ TO 1 +EQUATE CIO_READO$ TO 2 +EQUATE CIO_WRITE$ TO 3 +EQUATE CIO_DELETE$ TO 4 +EQUATE CIO_LOCK$ TO 5 +EQUATE CIO_UNLOCK$ TO 6 +* Source Date: 22:02:38 31 MAR 1989 Build ID: AREV*1.13.8 Level: 2.0 diff --git a/SYSPROG/STPROCINS/DATASET_EQUATES.txt b/SYSPROG/STPROCINS/DATASET_EQUATES.txt new file mode 100644 index 0000000..beea7b1 --- /dev/null +++ b/SYSPROG/STPROCINS/DATASET_EQUATES.txt @@ -0,0 +1,95 @@ +compile insert DataSet_Equates + +***************************************************************************** +* +* This program is proprietary and is not to be used by or disclosed +* to others, nor is it to be copied without written permission from +* Revelation Technologies, Inc. +* +* Product : OI/WG +* Poject : OI/CS +* Release : 3.1 +* +* Name : DataSet_Equates +* Description: Equates for the DataSet structure, DS_Child function and form +* +* History (Date, Initials, Notes) +* 02/15/96 cp Original programmer. +* 06/12/97 cp Updating to support new WorkSpace +* +***************************************************************************** + +* datasource type specific dataset structure +equ DSPOS_COLNAMES$ to 6 ;* Name of columns +equ DSPOS_DATATYPES$ to 7 ;* Type, Scale, and precision +equ DSPOS_NULLS$ to 8 ;* Is column nullable +equ DSPOS_KEYS$ to 9 ;* Is column a key column +equ DSPOS_DESC$ to 10 ;* Description of each column +equ DSPOS_VALIDATION$ to 11 ;* Validation for columns +equ DSPOS_CONV$ to 12 ;* Conversion for columns +equ DSPOS_DISPLAY$ to 13 ;* Heading fo columns + +equ DSPOS_SCRIPTS$ to 16 +equ DSPOS_ARGNAMES$ to 17 +equ DSPOS_ARGDFLTS$ to 18 + + +equ DS_COLDEFCNT$ to 8 +equ DS_SCRIPTCNT$ to 4 +equ DS_ARGCNT$ to 2 + +equ DS_VERSION$ to 30 + +equ DS_NOSOURCE$ to "" +equ DS_BASESRCTYPE$ to "BASE" + +* other +equ DEF_ARGVAL$ to "%DEFAULT%" ;* used to distinguish between "" and default +equ MAX_SRC_TYPES$ to 5 ;* this is a big enough number for now + +* type list +equ DATASET_TYPE_LIST$ to "BIT,UINT1,SINT1,UINT2,SINT2,UINT4,SINT4,DECIMAL,FLOAT,DOUBLE,CHAR,VARCHAR,LONGVARCHAR,BINARY,VARBINARY,LONGVARBINARY,DATE,TIME,DATETIME" + +* precision limits +equ MIN_PRECISION$ to "0,0,0,0,0,0,0,1,0,0,1,1,1,1,1,1,0,5,16" +equ MAX_PRECISION$ to "0,0,0,0,0,0,0,128,0,0,254,254,4294967294,255,255,4294967295,0,13,24" + +* scale limits +equ MIN_SCALE$ to "0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0" +equ MAX_SCALE$ to "0,0,0,0,0,0,0,128,0,0,0,0,0,0,0,0,0,4,4" + + +* instruction parameter for DS_Child() +equ DSEVENT_CREATE$ to 1 +equ DSEVENT_CLOSE$ to 2 +equ DSEVENT_ACTIVATE$ to 3 +equ DSEVENT_DEACTIVATE$ to 4 +equ DSEVENT_PAGE$ to 5 +equ DSEVENT_READ$ to 6 +equ DSEVENT_WRITE$ to 7 +equ DSEVENT_GETRECORD$ to 8 +equ DSEVENT_SETRECORD$ to 9 +equ DSEVENT_RESETRECORD$ to 10 +equ DSEVENT_SETKEY$ to 11 +equ DSEVENT_UNLOCKKEY$ to 12 +equ DSEVENT_LOCKWINDOW$ to 13 +equ DSEVENT_UNLOCKWINDOW$ to 14 +equ DSEVENT_TESTRUN$ to 15 +equ DSEVENT_HELP$ to 16 +equ DSEVENT_ABOUT$ to 17 +equ DSEVENT_SOURCECHANGED$ to 18 +equ DSEVENT_SCRIPTCHANGED$ to 19 +equ DSEVENT_TYPECHANGED$ to 20 +equ DSEVENT_REPOSMODIFIED$ to 21 +equ DSEVENT_UPDATEREPOS$ to 22 +equ DSEVENT_SCRIPTLOSTFOCUS$ to 23 +equ DSEVENT_USETABLE$ to 24 +equ DSEVENT_DEFINECOLUMNS$ to 25 +equ DSEVENT_DEFINESCRIPTS$ to 26 +equ DSEVENT_COLSGOTFOCUS$ to 27 +equ DSEVENT_COLSLOSTFOCUS$ to 28 +equ DSEVENT_COLSOPTIONS$ to 29 +equ DSEVENT_GETKEY$ to 30 +equ DSEVENT_OMNIEVENT$ to 31 +equ DSEVENT_DEFINESCRIPTSOK$ to 32 + diff --git a/SYSPROG/STPROCINS/DB_MGMT_EQUATES.txt b/SYSPROG/STPROCINS/DB_MGMT_EQUATES.txt new file mode 100644 index 0000000..6ed991c --- /dev/null +++ b/SYSPROG/STPROCINS/DB_MGMT_EQUATES.txt @@ -0,0 +1,68 @@ +Compile Insert DB_Mgmt_Equates + +/*-------------------------------------------------------------------------- +* EQUATES USED BY DATABASE MANAGEMENT SSPs + MM-DD-YY initials Modification + 09-25-91 Pat first created + 06-03-93 Pat fix lh_verify group file name... + 04-28-09 BZS Updated + 03-25-16 rjc Updated rtp49 attach modes +*---------------------------------------------------------------------------*/ + +/* +RTP49 Modes + BITAND(MODE,1) = 0 -> VOLUME MUST ALREADY EXIST + 1 -> AUTO-GENERATE MEDIA MAP IF POSSIBLE + BITAND(MODE,2) = 0 -> AUTO-ATTACH THE VOLUME IF NOT ALREADY ATTACHED + 1 -> DO NOT AUTO-ATTACH VOLUME +*/ +EQU ATTACH_EXIST_VOL$ TO 0 +equ auto_gen_auto_attach$ TO 1 ; * 03-25-16 rjc +equ auto_gen_not_auto_attach$ TO 3 +equ NO_ATTACH_ALREADY_EXIST$ to 2 + +EQU GLOBAL_dbid$ TO "GLOBAL" +equ global$ TO "GLOBAL" +equ SYSPROG$ TO "SYSPROG" +equ account$ TO "ACCOUNT" +EQU REVMEDIA_TABLE$ TO "REVMEDIA" +EQU REVBOOT_VOL$ TO "REVBOOT" +equ volume_script$ to "VOLUME" + +EQU DICT_PREFIX$ TO "DICT." +EQU DATA_PREFIX$ TO "DATA." +EQU SI_INDEX_PREFIX$ TO "!" + +equ SI_MFS$ TO "SI.MFS" +EQU DICT_MFS$ TO "DICT.MFS" +EQU PROTECT_MFS$ TO "PROTECT.MFS" +EQU ENV_PREFIX$ TO "ENV_" +equ LH_BFS$ TO "RTP57" + +EQU SYS_LHV_TAB$ to "SYSLHVERIFY" +EQU SYS_LHV_GRP$ to "SYSLHGROUP" + +EQU USER_SEPARATOR$ TO "@" +EQU VOLUME_REC_FS$ TO 2 +EQU SYS_USER_TOKEN$ TO "SYS" + + +** the following are used for FIX_LH +equ COMPRESS_FILE$ TO 1 +equ FIX_TABLE$ TO 2 +equ UPDATE_SIZELOCK$ TO 3 +equ UPDATE_THRESHOLD$ TO 4 +equ SET_SIZELOCK$ TO 5 +Equ SET_SIZELOCK_UD$ To 6 ;* BZS 021517 +equ OV_SUFFIX$ TO 'OV' +equ LK_SUFFIX$ TO 'LK' +equ FIXTEMP_LK$ TO 'FIXTEMP.LK' +equ FIXTEMP_OV$ TO 'FIXTEMP.OV' +equ DUMP_FIX_TEMP_FILE$ TO 'DUMP_FIX_TEMP' +equ DUMP_FIX_GARBAGE$ TO 'DUMP_FIX_GARBAGE' +equ DUMP_FIX_SEMAPHORE$ TO 'FIXING' +equ GROUP_NUMBER$ TO 'GROUP_NUMBER' +equ GROUP$ TO 'GROUP' +Equ DUMP_FIX_SAVE_FILE$ To 'DUMP_FIX_SAVE' ;* BZS 040309 +Equ MAXIMUM_KEY_LENGTH$ To 552 ;* BZS 042809 + diff --git a/SYSPROG/STPROCINS/DEBUGGER_FETCH_EQUATES.txt b/SYSPROG/STPROCINS/DEBUGGER_FETCH_EQUATES.txt new file mode 100644 index 0000000..1aaa325 --- /dev/null +++ b/SYSPROG/STPROCINS/DEBUGGER_FETCH_EQUATES.txt @@ -0,0 +1,174 @@ +compile insert debugger_fetch_equates +/* + Author : Meester C + Date : 15 October 2008 + Purpose : Constants for use with the Debugger_Fetch() + stored procedure + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 24 Jun 21 Updated for v10 + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _DEBUGGER_FETCH_EQUATES_ +#define _DEBUGGER_FETCH_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ COMMON_SIZEOF$ to 256 ; * // Size of a blank common + * // block - 256 descriptors + * // + + * // defined in rev_call.c + // Descriptor types + // typedef enum { + // E_LINK = 0, // indirect pointer, code assumes this is zero + // E_UNASSIGNED = 1, + // E_STRING = 2, + // E_DIM_ARRAY = 3, // array dope + // E_IDISPATCH = 4, // OLE automation object + // E_PTR = 5, // Generic pointer/handle + // E_NUMBER = 6, // >= E_NUMBER is a number + // E_MAPM = 6, // pointer to extend precision type + // E_NUMBER_64 = 7, // >= E_NUMBER_64 is a 64-bit int or double + // E_LONG = 7, // 64 bit int + // E_DOUBLE = 8 // 64 bit real + // } E_TYPE; + + equ VAR_TYPE_LINK to 0 + equ VAR_TYPE_UNASSIGNED$ to 1 + equ VAR_TYPE_STRING$ to 2 + equ VAR_TYPE_DIM_ARRAY$ to 3 + equ VAR_TYPE_IDISPATCH$ to 4 ; * // OLE object + equ VAR_TYPE_PTR$ to 5 ; * // Pointer type + equ VAR_TYPE_MAPM$ to 6 ; * // MAPM (extended precision) type. + equ VAR_TYPE_LONG$ to 7 ; * // 64 bit int + equ VAR_TYPE_DOUBLE$ to 8 ; * // 64 bit real + + equ VAR_TYPE_NUMBER$ to 6 ; // >= this is a number + equ VAR_TYPE_NUM64$ to 7 ; // >= this is a 64-bit number (int or double) + + equ VAR_TYPE_DESC_LINK$ to "" + equ VAR_TYPE_DESC_UNASSIGNED$ to "" + equ VAR_TYPE_DESC_STRING$ to "" + equ VAR_TYPE_DESC_DIM_ARRAY$ to "" + equ VAR_TYPE_DESC_IDISPATCH$ to "" + equ VAR_TYPE_DESC_LONG$ to "" + equ VAR_TYPE_DESC_DOUBLE$ to "" + + equ VAR_TYPE_DESC$ to VAR_TYPE_DESC_LINK$ : "," : | + VAR_TYPE_DESC_UNASSIGNED$ : "," : | + VAR_TYPE_DESC_STRING$ : "," : | + VAR_TYPE_DESC_DIM_ARRAY$ : "," : | + VAR_TYPE_DESC_IDISPATCH$ : "," : | + VAR_TYPE_DESC_LONG$ : "," : | + VAR_TYPE_DESC_DOUBLE$ + +/////////////////////////////////////////////////////////////////////////////// + + * // GetBreakFrame() equates - goes without saying if you change these + * // you're going to have to change the function itself in rev_call.c + * // + * // <1> Number of local variables in the break frame + * // <2> Number of labelled common areas in the break frame + * // <3> Number of variables in each labelled common area - there should + * // be one value here for each labelled common area + * // <4> "0" if no blank common area is associated with the break frame, + * // or "256" if there is a common area associated with the break + * // frame + + declare function getBreakFrame + + equ DBGF_BREAKFRAME_POS_LOCAL$ to 1 + equ DBGF_BREAKFRAME_POS_LCOMM$ to 2 + equ DBGF_BREAKFRAME_POS_LCOMM_VAR$ to 3 + equ DBGF_BREAKFRAME_POS_BCOMM$ to 4 + + equ DBGF_BREAKFRAME_NULL_BCOMM$ to 0 + equ DBGF_BREAKFRAME_DFLT_BCOMM$ to COMMON_SIZEOF$ + +/////////////////////////////////////////////////////////////////////////////// + + * // Equates for use with the getBreakVarType and getBreakVarValue + * // functions (from rev_call.c) + * // + * // When accessing variables in the BreakFrame we need to specify the area + * // where the variable is stored. Local and Common areas are + * // straightforward, but for Labelled Commons we need to pass the index + * // of the common area we are interested adding an offset of 1 + + declare function getBreakVarType, getBreakVarValue + + equ DBGF_BREAKVAR_STORAGE_LOCAL$ to -1 + equ DBGF_BREAKVAR_STORAGE_BCOMM$ to 1 + equ DBGF_BREAKVAR_STORAGE_LCOMM_OFFSET$ to 1 + +/////////////////////////////////////////////////////////////////////////////// + + equ DBGF_VARSYMTABLE_POS_NAME$ to 1 + equ DBGF_VARSYMTABLE_POS_TYPE$ to 2 + equ DBGF_VARSYMTABLE_POS_INDEX$ to 3 + + equ DBGF_VARSYMTABLE_TYPE_LOCAL$ to -1 + equ DBGF_VARSYMTABLE_TYPE_BCOMM$ to 1 + equ DBGF_VARSYMTABLE_TYPE_LCOMM$ to 2 + equ DBGF_VARSYMTABLE_TYPE_LCOMM_ID$ to 3 + +/////////////////////////////////////////////////////////////////////////////// + + * // LOCALLIST equates + + equ DBGF_LOCAL_PREFIX$ to "_local_" + + equ DBGF_LOCAL_POS_NAME$ to 1 + equ DBGF_LOCAL_POS_TYPE$ to 2 + equ DBGF_LOCAL_POS_DIM$ to 3 + +/////////////////////////////////////////////////////////////////////////////// + + * // LCOMMLIST equates + + equ DBGF_LCOMMID_PREFIX$ to "_lcid_" + equ DBGF_LCOMMVAR_PREFIX$ to "_lcomm_" + + equ DBGF_LCOMM_POS_COMMID$ to 1 + equ DBGF_LCOMM_POS_NAME$ to 2 + equ DBGF_LCOMM_POS_TYPE$ to 3 + equ DBGF_LCOMM_POS_DIM$ to 4 + +/////////////////////////////////////////////////////////////////////////////// + + * // COMMLIST equates + + equ DBGF_BCOMM_PREFIX$ to "_common_" + + equ DBGF_BCOMM_POS_NAME$ to 1 + equ DBGF_BCOMM_POS_TYPE$ to 2 + equ DBGF_BCOMM_POS_DIM$ to 3 + +/////////////////////////////////////////////////////////////////////////////// + + equ DBGF_ETEXT_MISSING_VAR_IDX$ to "No variable index passed to the %S% %M% method" + equ DBGF_ETEXT_INVALID_VAR_IDX$ to "Invalid variable index '%P1%' passed to the %S% %M% method" + equ DBGF_ETEXT_INVALID_VAR_DIM1$ to "Invalid subscript primary index '%P2%' passed to the %S% %M% method" + equ DBGF_ETEXT_INVALID_VAR_DIM2$ to "Invalid subscript secondary index '%P3%' passed to the %S% %M% method" + equ DBGF_ETEXT_MISSING_LBL_IDX$ to "No common label index passed to the %S% %M% method" + equ DBGF_ETEXT_INVALID_LBL_IDX$ to "Invalid common label index '%P1%' passed to the %S% %M% method" + equ DBGF_ETEXT_INVALID_LBLVAR_IDX$ to "Invalid labelled common variable index '%P2%' passed to the %S% %M% method" + equ DBGF_ETEXT_INVALID_LBLVAR_DIM1$ to "Invalid subscript primary index '%P3%' passed to the %S% %M% method" + equ DBGF_ETEXT_INVALID_LBLVAR_DIM2$ to "Invalid subscript secondary index '%P4%' passed to the %S% %M% method" + equ DBGF_ETEXT_NOT_A_DIM_VAR$ to "Non-dimensioned array variable '%P1%' passed to the %S% %M% method" + equ DBGF_ETEXT_NOT_A_LBL_DIM_VAR$ to "Non-dimensioned labelled common array variable ['%P1%','%P2%'] passed to the %S% %M% method" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/DICT.EQUATES.txt b/SYSPROG/STPROCINS/DICT.EQUATES.txt new file mode 100644 index 0000000..6467968 --- /dev/null +++ b/SYSPROG/STPROCINS/DICT.EQUATES.txt @@ -0,0 +1,161 @@ +compile insert DICT.EQUATES +* D I C T . E Q U A T E S +* +* Equates that define the structure of Advanced Revelation's Data Dictionary +* +* +EQUATE D.E.TYPE TO 1 ;* Type of current field. + ;* 'F' = Data Field + ;* 'S' = Symbolic (formula in D.E.FORMULA) + ;* 'G' = Group (group data in D.E.DISPLAY) + +EQUATE D.E.FIELD.NO TO 2 ;* The position of the data in the record + +EQUATE D.E.DISPLAY TO 3 ;* The Column Heading used by RLIST and other tools + ;* For type 'G' dictionary records, this field + ;* contains the group data. + +EQUATE D.E.SM TO 4 ;* Single or Multivalue flag "S"ingle "M"ulti + +EQUATE D.E.PART TO 5 ;* Key part. For multi-part keys, this field + ;* specifies the part number (1, 2, 3, etc.) + ;* For single-part key fields, this field should be 0. + +EQUATE D.E.INDEX.FLAG TO 6 ;* BTREE INDEX flag (boolean value). + +EQUATE D.E.CONV TO 7 ;* Contains the output conversion for data + +EQUATE D.E.FORMULA TO 8 ;* If the field type = "S" then this field will contain an rbasic formula + +EQUATE D.E.JUST TO 9 ;* Justification for displaying and sorting data. + ;* 'L' = Left + ;* 'R' = Right + ;* 'C' = Centered + ;* 'T' = Text + ;* Text justification means no justification. + +EQUATE D.E.LENGTH TO 10 ;* Display length for this field. Note that this length + ;* is not necessarily the length of the data itself, + ;* especially in bonded files. + +EQUATE D.E.PATTERN TO 11 ;* Input validation/conversion for this field + +EQUATE D.E.GENERIC.TYPE TO 12 ;* The Arev Generic Data type associated with this field + +EQUATE D.E.SOURCE TO 13 ;* This field is basically reserved for backwards compatibility + ;* with REV/G. Don't use it. + +EQUATE D.E.DESC TO 14 ;* Description of this field. Used for documentation. + ;* Can be displayed as online help using an HD code. + +EQUATE D.E.FOREIGN.TYPE TO 15 ;* The data type name in the foreign environment + +EQUATE D.E.FOREIGN.NAME TO 16 ;* The field name in the foreign environment + +EQUATE D.E.FOREIGN.MAP TO 17 ;* For bonded files, this field uniquely specifies + ;* a data mapping (that is, the algorithm used to + ;* transfer data between the Advanced Revelation data type + ;* and the foreign data type). + +EQUATE D.E.FOREIGN.ATTR TO 18 ;* This field contains any foreign field attributes + ;* that a bonded dictionary field may have, separated + ;* by value marks. + +EQUATE D.E.PMD TO 19 ;* This field is still being designed. + +EQUATE D.E.NULL.TRUNC TO 20 ;* This field allows the user to override the bond's + ;* default handling of null values for this field. + ;* If the bond cannot support null values, setting the first + ;* value of this field to 'Y' allows nulls to be stored + ;* without an error. A 'N' or null first value allows the + ;* default behaviour: if the bond cannot store nulls in this + ;* field and a null is written, an I/O error will result. + ;* If the first value is 'Y', the second value can be + ;* used to specify what value the bond should store in + ;* the field when a null is written. The bond is not + ;* required to support this latter ability. + +EQUATE D.E.DEPENDENT TO 21 ;* Reserved for indexing. + +EQUATE D.E.XREF TO 22 ;* If non-null, then there is a cross-reference index + ;* on this field. In that case, the value in D.E.XREF + ;* is the name of the symbolic field that calculates the + ;* cross-reference index. + +EQUATE D.E.RELATIONAL TO 23 ;* If non-null, then this field is used to update a relational + ;* index in another file and contains the key to a record + ;* in that other file. + +EQUATE D.E.RELATED TO 24 ;* For relational indexes, this field is updated to contain the + ;* keys to the related records in the other file. + +EQUATE D.E.PROTECT TO 25 ;* 1 if this field is protected. This flag is set by + ;* relational indexing process. + +EQUATE D.E.LOWERCASE TO 26 ;* Controls how indexed fields are indexed: + ;* 0 = convert to uppercase + ;* 1 = maintain case supplied. + +EQUATE D.E.COMPUTED TO 27 ;* Reserved for indexing. + +EQUATE D.E.MASTER.FLAG TO 28 ;* For 'F'-type dictionary records, this flag + ;* distinguishes synonym fields from the "real" field. + ;* This flag is '0' for synonyms and '1' otherwise. + +EQUATE D.E.DEFAULT TO 29 ;* SQL default value for insertions. + +EQUATE D.E.REFERENCE TO 30 ;* SQL. Indicates this column is a foreign key to the listed table(s). + +EQUATE D.E.NULL TO 31 ;* SQL. + ;* 0 = column can store nulls. + ;* 1 = column can't store nulls. + ;* We're still figuring out whether this field and + ;* D.E.NULL.TRUNC should be the same field. + +EQUATE D.E.UNIQUE TO 32 ;* SQL. 0=column may contain duplicate values. 1=column must contain unique values. + +EQUATE D.E.LENGTH.LIMIT TO 33 ;* SQL. Length (in chars) of data. Needs to be + ;* integrated with bonding. + +EQUATE D.E.IN.TRUNC TO 39 ;* The first value in this field is either null, 0, or 1. + ;* 0 or null means the default handling of input truncation: + ;* if transferring a field into AREV would result in any loss of + ;* information, an I/O error is returned. 1 allows the + ;* the bond to truncate the data without returning an error. + ;* In this case, either one or two values can follow the 1. + ;* For character-based fields, a single value specifies what the + ;* bond should read in when all information would be lost + ;* (e.g., the field consisted of 3 field marks). For numeric- + ;* based fields, the second value is the replacement for + ;* numeric underflow and the third value is the replacement for + ;* overflow. + +EQUATE D.E.OUT.TRUNC TO 40 ;* Same as D.E.IN.TRUNC, except for output. + +EQUATE D.E.USER1 TO 41 ;* This field is reserved for the application. +EQUATE D.E.USER2 TO 42 ;* "" +EQUATE D.E.USER3 TO 43 ;* "" +EQUATE D.E.USER4 TO 44 ;* "" +EQUATE D.E.USER5 TO 45 ;* "" + +EQUATE D.E.OBJECT TO 51 ;* This field contains binary data; object code for the current field + +* +* Equates that define the structure of the special record "%FIELDS%" found in each Arev Dictionary +* All of these fields are associated multivalued fields. +* + +EQUATE FIELDS.MAXFIELD$ TO 2 ;* The highest FMC number in the dictionary. +EQUATE FIELDS.NAME$ TO 3 ;* Contains field names. +EQUATE FIELDS.TYPE$ TO 4 ;* Contains D.E.TYPE values. +EQUATE FIELDS.FIELD.NO$ TO 5 ;* Contains D.E.FIELD.NO values. +EQUATE FIELDS.INDEX$ TO 6 ;* Contains D.E.INDEX.FLAG values. +EQUATE FIELDS.XREF$ TO 7 ;* Contains D.E.XREF values. +EQUATE FIELDS.PART$ TO 8 ;* Contains D.E.PART values. +EQUATE FIELDS.MVFLAG$ TO 9 ;* Contains D.E.SM values. +EQUATE FIELDS.JUST$ TO 10 ;* Contains D.E.JUST values. +EQUATE FIELDS.LENGTH$ TO 11 ;* Contains D.E.LENGTH values. +EQUATE FIELDS.CONV$ TO 12 ;* Contains D.E.CONV values. +EQUATE FIELDS.DEFAULT$ TO 13 ;* Contains D.E.DEFAULT values. +EQUATE FIELDS.MASTER.FLAG$ TO 14 ;* Contains D.E.MASTER.FLAG values. +* Source Date: 09:48:08 02 MAR 1993 Build ID: AREV*3.1.31 Level: 3.1 diff --git a/SYSPROG/STPROCINS/DICT_EQUATES.txt b/SYSPROG/STPROCINS/DICT_EQUATES.txt new file mode 100644 index 0000000..38340ed --- /dev/null +++ b/SYSPROG/STPROCINS/DICT_EQUATES.txt @@ -0,0 +1,216 @@ +compile insert DICT_EQUATES +/* + ** Copyright (C) 1992-2016 Revelation Software Inc. All Rights Reserved ** + + Author : The wizards of old + Date : Once upon a time ... + Purpose : Equates that define the structure of Advanced Revelation's and + OpenEngine's Data Dictionary + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 14 Jun 18 Added DICT_FOREIGN_KEY_TABLE$ + Mr C 16 Feb 16 Added a couple of delimiter notes + Mr C 24 Sep 15 Cleaned up, Added header guards, removed HR equates + mtr 05 Jan 11 Added DICT_BITMAP_IDX_FLAG$ for field 46 + mtr 21 Feb 06 Added fields 36 and 37, And FIELDS For %fields% + mtr 19 Jan 06 Added field 35 +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _DICT_EQUATES_ +#define _DICT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DICT_TYPE$ to 1 ;* Type of current field. + ;* 'F' = Data Field + ;* 'S' = Symbolic (formula in DICT_FORMULA) + ;* 'G' = Group (group data in DICT_DISPLAY) + + equ DICT_COLUMN_NO$ to 2 ;* The position of the data in the record + + equ DICT_DISPLAY$ to 3 ;* The Column Heading used by RLIST and other tools + ;* For type 'G' dictionary records, this field + ;* contains the group data. + ;* ( Lines are @vm delimited ) + + equ DICT_SM$ to 4 ;* Single or Multivalue flag "S"ingle "M"ulti + + equ DICT_PART$ to 5 ;* Key part. For multi-part keys, this field + ;* specifies the part number (1, 2, 3, etc.) + ;* For single-part key fields, this field should be 0. + + equ DICT_INDEX_FLAG$ to 6 ;* BTREE INDEX flag (boolean value). + + equ DICT_CONV$ to 7 ;* Contains the output conversion for data + + equ DICT_FORMULA$ to 8 ;* If the field type = "S" then this field will contain an rbasic formula + + equ DICT_JUST$ to 9 ;* Justification for displaying and sorting data. + ;* 'L' = Left + ;* 'R' = Right + ;* 'C' = Centered + ;* 'T' = Text + ;* Text justification means no justification. + + equ DICT_LENGTH$ to 10 ;* Display length for this field. Note that this length + ;* is not necessarily the length of the data itself, + ;* especially in bonded files. + + equ DICT_PATTERN$ to 11 ;* Input validation/conversion for this field + + equ DICT_GENERIC_TYPE$ to 12 ;* The Arev Generic Data type associated with this field + + equ DICT_SOURCE$ to 13 ;* This field is basically reserved for backwards compatibility + ;* with REV/G. Don't use it. + + equ DICT_LAST_UPDATE_BY$ to 13 ;* Well, I guess we are using it now then right? :) + + equ DICT_DESC$ to 14 ;* Description of this field. Used for documentation. + ;* Can be displayed as online help using an HD code. + ;* ( Lines are @tm delimited ) + + equ DICT_FOREIGN_TYPE$ to 15 ;* The data type name in the foreign environment + + equ DICT_FOREIGN_NAME$ to 16 ;* The field name in the foreign environment + + equ DICT_FOREIGN_MAP$ to 17 ;* For bonded files, this field uniquely specifies + ;* a data mapping (that is, the algorithm used to + ;* transfer data between the Advanced Revelation data type + ;* and the foreign data type). + + equ DICT_FOREIGN_ATTR$ to 18 ;* This field contains any foreign field attributes + ;* that a bonded dictionary field may have, separated + ;* by value marks. + + equ DICT_PMD$ to 19 ;* This field is still being designed. (Still?) + + equ DICT_NULL_TRUNC$ to 20 ;* This field allows the user to override the bond's + ;* default handling of null values for this field. + ;* If the bond cannot support null values, setting the first + ;* value of this field to 'Y' allows nulls to be stored + ;* without an error. A 'N' or null first value allows the + ;* default behaviour: if the bond cannot store nulls in this + ;* field and a null is written, an I/O error will result. + ;* If the first value is 'Y', the second value can be + ;* used to specify what value the bond should store in + ;* the field when a null is written. The bond is not + ;* required to support this latter ability. + + equ DICT_DEPENDENT$ to 21 ;* Reserved for indexing. + + equ DICT_XREF$ to 22 ;* If non-null, then there is a cross-reference index + ;* on this field. In that case, the value in DICT_XREF + ;* is the name of the symbolic field that calculates the + ;* cross-reference index. + + equ DICT_RELATIONAL$ to 23 ;* If non-null, then this field is used to update a relational + ;* index in another file and contains the key to a record + ;* in that other file. + + equ DICT_RELATED$ to 24 ;* For relational indexes, this field is updated to contain the + ;* keys to the related records in the other file. + + equ DICT_PROTECT$ to 25 ;* 1 if this field is protected. This flag is set by + ;* relational indexing process. + + equ DICT_LOWERCASE$ to 26 ;* Controls how indexed fields are indexed: + ;* 0 = convert to uppercase + ;* 1 = maintain case supplied. + + equ DICT_COMPUTED$ to 27 ;* Reserved for indexing. + + equ DICT_MASTER_FLAG$ to 28 ;* For 'F'-type dictionary records, this flag + ;* distinguishes synonym fields from the "real" field. + ;* This flag is '0' for synonyms and '1' otherwise. + + equ DICT_DEFAULT$ to 29 ;* SQL default value for insertions. + + equ DICT_REFERENCE$ to 30 ;* SQL. Indicates this column is a foreign key to the listed table(s). + + equ DICT_NULL$ to 31 ;* SQL. + ;* 0 = column can store nulls. + ;* 1 = column can't store nulls. + ;* We're still figuring out whether this field and + ;* DICT_NULL.TRUNC should be the same field. + ;* + ;* (Well don't keep us in suspense - you've have 20 years or so... ) + + equ DICT_UNIQUE$ to 32 ;* SQL. 0=column may contain duplicate values. 1=column must contain unique values. + + equ DICT_LENGTH_LIMIT$ to 33 ;* SQL. Length (in chars) of data. Needs to be + ;* integrated with bonding. + + equ DICT_PRODUCT$ to 34 ;* Product flag + ;* 0 or null - both Advanced Revelation and OpenInsight + ;* 1 Advanced Revelation only + ;* 2 OpenInsight only + + equ DICT_TIMEDATE$ to 35 ; *TimeDate stamp On dictionary Field - back For OI 8.0 + equ DICT_MV_GROUPNAME$ to 36 ; *GroupName For AMV groups - back For OI 8.0 + equ DICT_MV_GROUP_MASTER$ to 37 ; *GroupName For AMV groups - back For OI 8.0 + + equ DICT_IN_TRUNC$ to 39 ;* The first value in this field is either null, 0, or 1. + ;* 0 or null means the default handling of input truncation: + ;* if transferring a field into AREV would result in any loss of + ;* information, an I/O error is returned. 1 allows the + ;* the bond to truncate the data without returning an error. + ;* In this case, either one or two values can follow the 1. + ;* For character-based fields, a single value specifies what the + ;* bond should read in when all information would be lost + ;* (e.g., the field consisted of 3 field marks). For numeric- + ;* based fields, the second value is the replacement for + ;* numeric underflow and the third value is the replacement for + ;* overflow. + + equ DICT_OUT_TRUNC$ to 40 ;* Same as DICT_IN.TRUNC, except for output. + + equ DICT_USER1$ to 41 ;* This field is reserved for the application. + equ DICT_USER2$ to 42 ;* "" + equ DICT_USER3$ to 43 ;* "" + equ DICT_USER4$ to 44 ;* "" + equ DICT_USER5$ to 45 ;* "" + + equ DICT_BITMAP_IDX_FLAG$ to 46 ;* Bitmap Index Flag. MTR 1-5-2011 + equ DICT_FOREIGN_KEY_TABLE$ to 47 ;* Flags the column as containing keys to a foreign table + ;* (contains the foreign table name) + + equ DICT_OBJECT$ to 51 ;* This field contains binary data; object code for the current Field + + +/////////////////////////////////////////////////////////////////////////////// + + * // Equates that define the structure of the special record "%FIELDS%" + * // found in each Arev Dictionary. All of these fields are associated + * // multivalued fields. + + equ FIELDS_ID$ to "%FIELDS%" + + equ FIELDS_VERSION$ to 1 ;* Dict.mfs associated version number + equ FIELDS_MAXFIELD$ to 2 ;* The highest FMC number in the dictionary. + equ FIELDS_NAME$ to 3 ;* Contains field names. + equ FIELDS_TYPE$ to 4 ;* Contains DICT_TYPE values. + equ FIELDS_FIELD_NO$ to 5 ;* Contains DICT_FIELD.NO values. + equ FIELDS_INDEX$ to 6 ;* Contains DICT_INDEX.FLAG values. + equ FIELDS_XREF$ to 7 ;* Contains DICT_XREF values. + equ FIELDS_PART$ to 8 ;* Contains DICT_PART values. + equ FIELDS_MVFLAG$ to 9 ;* Contains DICT_SM values. + equ FIELDS_JUST$ to 10 ;* Contains DICT_JUST values. + equ FIELDS_LENGTH$ to 11 ;* Contains DICT_LENGTH values. + equ FIELDS_CONV$ to 12 ;* Contains DICT_CONV values. + equ FIELDS_DEFAULT$ to 13 ;* Contains DICT_DEFAULT values. + equ FIELDS_MASTER_FLAG$ to 14 ;* Contains DICT_MASTER.FLAG values. + + equ FIELDS_PRODUCT$ to 18 ;* Contains DICT_PRODUCT values + equ FIELDS_MV_GROUPNAME$ to 19 ;* GroupName For AMV groups - back For OI 8.0 * mtr 2-21-06 + equ FIELDS_MV_GROUP_MASTER$ to 20 ;* GroupMaster For AMV groups - back For OI 8.0 * mtr 2-21-06 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/DICT_SYSREPOSOLECONTROLS_EQUATES.txt b/SYSPROG/STPROCINS/DICT_SYSREPOSOLECONTROLS_EQUATES.txt new file mode 100644 index 0000000..229499c --- /dev/null +++ b/SYSPROG/STPROCINS/DICT_SYSREPOSOLECONTROLS_EQUATES.txt @@ -0,0 +1,48 @@ +compile insert dict_SYSREPOSOLECONTROLS_Equates +/* + ** Copyright (C) 1992-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : June 2021 + Purpose : Equates record for the SYSREPOSOLECONTROLS table + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 29 Jun 21 Added SYSREPOSOLECONTROLS$DEFVALUESUPPORT$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _DICT_SYSREPOSOLECONTROLS_EQUATES_ +#define _DICT_SYSREPOSOLECONTROLS_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Key Position Equates + equ SYSREPOSOLECONTROLS$APPID$ to 1 + equ SYSREPOSOLECONTROLS$ENTITYID$ to 2 + + // Column Position Equates + equ SYSREPOSOLECONTROLS$CLSID$ to 1 + equ SYSREPOSOLECONTROLS$DESCRIPTION$ to 2 + equ SYSREPOSOLECONTROLS$PROGID$ to 3 + equ SYSREPOSOLECONTROLS$DEFPROP_PROPERTY$ to 4 + equ SYSREPOSOLECONTROLS$DEFPROP_HANDLER$ to 5 + equ SYSREPOSOLECONTROLS$MULTICOLUMN$ to 6 + equ SYSREPOSOLECONTROLS$DEFPOSPROP_PROPERTY$ to 7 + equ SYSREPOSOLECONTROLS$DEFPOSPROP_HANDLER$ to 8 + equ SYSREPOSOLECONTROLS$DBSUPPORT$ to 9 + equ SYSREPOSOLECONTROLS$ICONVSUPPORT$ to 10 + equ SYSREPOSOLECONTROLS$OCONVSUPPORT$ to 11 + equ SYSREPOSOLECONTROLS$REQSUPPORT$ to 12 + equ SYSREPOSOLECONTROLS$CLICK_EVENT$ to 13 + equ SYSREPOSOLECONTROLS$POSCHANGED_EVENT$ to 14 + equ SYSREPOSOLECONTROLS$DEFVALUESUPPORT$ to 15 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/DSBFS_CONNECTION_COMMON.txt b/SYSPROG/STPROCINS/DSBFS_CONNECTION_COMMON.txt new file mode 100644 index 0000000..4162dc2 --- /dev/null +++ b/SYSPROG/STPROCINS/DSBFS_CONNECTION_COMMON.txt @@ -0,0 +1,2 @@ +Compile insert DSBFS_Connection_Common +Common /DSBFS_Connection_com/ DSBFS_Init@,DSBFS_Connections@ diff --git a/SYSPROG/STPROCINS/DSBFS_EQUATES.txt b/SYSPROG/STPROCINS/DSBFS_EQUATES.txt new file mode 100644 index 0000000..2e93dfc --- /dev/null +++ b/SYSPROG/STPROCINS/DSBFS_EQUATES.txt @@ -0,0 +1,180 @@ +Compile insert DSBFS_EQUATES +* +* rjc 05-12-10 Added Catalog +* rjc 06-09-10 Added s2o_xx items +* rjc 08-02-10 Added scales, precisions +* rjc 08-26-10 Added identity key support +* ------------------------------------- + + +Equ BFS$ To "DSBFS" + +* Hash tables for caching properties +equ DSBFS_TABLES$ to "DSBFS_TABLES" ; * table specific properites, key is tablename +equ DSBFS_VOLUMES$ to "DSBFS_VOLUMES" ; * volume specific properites, key is volname +equ DSBFS_Connections$ To "DSBFS_CONNECTIONS" ; * ado connection object for a volume, key is volname + +* Structure of handle info +EQU DSBFS_HANDLE_OINAME$ TO 1 ;* The foreign name of the file +EQU DSBFS_HANDLE_DSNAME$ TO 2 ;* dataset name +EQU DSBFS_HANDLE_VOLNAME$ TO 3 ;* volume name +* NOT USED*EQU DSBFS_HANDLE_DELIM$ TO "/" ;* A delimiter for our part of the handle + + +*EQU HANDLE_FILE_NAME$ TO 1 ;* The foreign name of the file +*EQU HANDLE_IC_OPEN_HANDLE$ TO 2 ;* Handle returned by an IC_OPEN call +*EQU HANDLE_FDICT_FLAG$ TO 3 ;* Flag indicating that U2 file's a dict +*EQU HANDLE_SESSION_ID$ TO 4 ;* The session id for this file + + +* Structure of cached info in table info +equ DSBFS_Key_Names$ to 1 ; * list of sql key columns +equ DSBFS_Key_Quotes$ to 2 ; * associated flags, true if keys need quotes in where clause +equ DSBFS_Data_Names$ to 3 ; * list of non-key sql columns +equ DSBFS_Data_Numbers$ to 4 ; * associated OI column number ( @record ) for each name +equ DSBFS_Data_Quotes$ to 5 ; * associated flags, true if values need quotes in where clause +equ DSBFS_Sorted_Names$ to 6 ; * sql names in sorted order? +equ DSBFS_Key_OConvs$ to 7 ; * conversion patterns for key fields, associated with key_names +equ DSBFS_Key_Iconvs$ to 8 ; * conversion patterns for data fields, associated with data_names +equ DSBFS_cmdtype$ to 9 ; * EXEC or SELECT. Defaults to SELECT +equ DSBFS_Vol_Name$ to 10 ; * name of the volume that owns the table +equ DSBFS_DS_Name$ to 11 ; * name of the dataset that created the table +equ DSBFS_Key_AdoTypes$ to 12 ; * Ado type codes for keys, associated with key_names, pulled from GENERIC_DATA_TYPE$ +equ DSBFS_Data_AdoTypes$ to 13 ; * Ado type codes for data columns, associated with data_names pulled from FOREIGN_DATA_TYPE$ +Equ DSBFS_SQL_Join$ To 14 ; * the sql from clause, usually a table, but could be table, table inner join on ... +Equ dsbfs_s2o_datanames$ To 15 ; * non-key sql colnames in the statement +Equ dsbfs_s2o_fmcs$ To 16 ; * associated oi record position (fmc) for each non-key in the sql statement. Thus, s2o_fmcs<1,sql_pos> = fmc +Equ dsbfs_s2o_iconvs$ To 17 ; * associated oi Iconv to use with read_row, non-key columns only +Equ dsbfs_s2o_oconvs$ To 18 ; * oi Oconv to use with write row, non-key columns only. +Equ dsbfs_key_adocodes$ To 19 ; * adotypecode for making parameters in write_row +Equ dsbfs_s2o_adocodes$ To 20 ; * adotypecode for making parameters in write_row +Equ dsbfs_s2o_select_script$ To 21 ; * scripts for parameterised query +Equ dsbfs_s2o_insert_script$ To 22 ; * +Equ dsbfs_s2o_update_script$ To 23 ; * +Equ dsbfs_s2o_delete_script$ To 24 ; * +Equ dsbfs_key_scales$ To 25 ; * list of numeric scale for each key column +Equ dsbfs_key_precisions$ To 26 ; * list of numeric precision for each key +Equ dsbfs_data_scales$ To 27 ; * list of numeric scale for each column +Equ dsbfs_data_precisions$ To 28 ; * list of numeric precision for each column +Equ dsbfs_data_Attributes$ To 29 ; * recordset attributes ( bit array, parse with bitand, see microsoft ado equates FieldAttributeEnum Values ) +Equ dsbfs_key_Attributes$ To 30 ; * recordset attributes ( bit array, parse with bitand, see microsoft ado equates FieldAttributeEnum Values ) +Equ dsbfs_key_identityFlags$ To 31 ; * true if the column is an identity type +Equ dsbfs_data_readonlyFlags$ To 32 ; * true if the column is an readonly + + + ; * note conv "$,<" are stripped out, dates get special treatment to work with datetime +** Volume Fields +Equ DSBFS_Volume$ to 1 ; * the literal "VOLUME" +Equ DSBFS_BfsType$ to 2 ; * the literal "DSBFS" +Equ DSBFS_ControlLoc$ to 3 ; * RTP49 uses this to create the volume ID. Make it the same as the id of the record +Equ DSBFS_LoginScr$ to 4 ; * Not used +Equ DSBFS_Shadow_loc$ to 4 ; * Location of the shadow dictionaries +Equ DSBFS_VolumeId$ to 5 ; * Name of the volume, same as the id of the record +Equ DSBFS_ConnectInfo$ to 6 ; * A sub-list of cionnection parameters +Equ DSBFS_DataSetList$ to 10 ; * list of datasets associated With this volume. Controls which tables get attached +Equ DSBFS_SqlTableList$ to 11 ; * associated group of tables used by the datasets +Equ DSBFS_OiTableList$ to 12 ; * associated group of OI tables bonded to the datasets +Equ DSBFS_RefreshTimeStamp$ to 13 ; * last time the list of tables was refreshed +Equ DSBFS_Quote_Char$ To 14 ; * character to use to quote literal strings in queries +Equ DSBFS_Quoted_Quote_Char$ To 15 ; * character to use to embed quotes in litertal strings +Equ DSBFS_Null_String$ To 16 ; * null string to use in queries +Equ DSBFS_Block_Max$ To 17 ; * max block size ( number of rows) for reading multiple records +Equ DSBFS_Force_Commit$ To 18 ; * true to force a commit after writes +Equ DSBFS_volOiDatatypes$ To 19 ; * list of oi data types, VARCHAR, INTEGER, etc. Used fro be mapped to ado data types +Equ DSBFS_volAdoDataTypes$ To 20 ; * associated list of ado data types for this volume. Used by refresh_shadow_dict to set FOREIGN_DATA_TYPE$ +Equ DSBFS_Type_Quoted$ To 21 ; * associated flags - true if this data type needs to be quoted +Equ DSBFS_Enable_Locking$ To 22 ; * allow locking of tables in this volume - true if you want to use rtp57 locks. Note - these are OI logical locks, not visible to non-oi clients +Equ DSBFS_DbVendor$ To 23 ; * Brand name of the Server software, e.g. Oracle +Equ DSBFS_DbCatalog$ To 24 ; * Initial Catalog / database, e.g Pubs - used by dsbfs_schema +Equ DSBFS_EscapeDelimiters$ To 25 ; * True$ If the connection should Swap @vm With , etc. defaults To true$ * added 03-04-15 rjc + + +** Breakdown of the Control Information +Equ DSBFS_Servername$ to 1 ; * ipaddress or name of server - Not used +Equ DSBFS_LoginId$ to 2 ; * Username on SQL server, not needed for integrated security +Equ DSBFS_Password$ to 3 ; * Password on SQL server , not needed for integrated security +Equ DSBFS_CredentialsEnabled$ to 4 ; * true if we must pass credentials ( i.e. not using integreated authentication ) +Equ DSBFS_ConnectionString$ to 5 ; * the ado connection string +Equ DSBFS_encryptor$ to 6 ; * the ado connection string + +equ DSBFS_SYNCDICTFLAG$ to 6 ; * Unused? + +equ DSBFS_AttachListOption$ to 8 ; * rjc 01-02-08 All or Specific Tables. +equ DSBFS_RefreshOption$ to 9 ; * rjc 01-02-08 Automatic (upon attach) or manual (upon request) resync of tables. +Equ DSBFS_Authentication$ to 10; * true if we need to supply credentials, false if using integrated Windows authentication + +Equ DSBFS_Password_key$ to "RTI902K606C31E9T" + +* Structure of the config record SYSENV, CFG_DSBFS +Equ cfg_vendors$ To 1 ; * vm delimited list of vendors * rjc 06-24-22 +Equ cfg_schema_proc$ To 2 ; * Associated list of procedure names for Schema, leave blank to get default +Equ cfg_select_proc$ To 3 ; * Associated list of procedure names for DSBFS_SELECT, leave blank to get default +Equ cfg_IO_proc$ To 4 ; * Associated list of procedure names for DSBFS_IO, leave blank to get default + + +EQU LOCATION_PATH$ TO 1 +EQU LOCATION_FS$ TO 2 +EQU LOCATION_CONTROL$ TO 3 + +EQU SRV_DBNAME$ TO 1 +EQU SRV_USER$ TO 2 +EQU SRV_PASSWD$ TO 3 + +EQU VOL_PTR_TOKEN$ TO 1 +EQU VOL_PTR_FS$ TO 2 +EQU VOL_PTR_LOCATION$ TO 3 +EQU VOL_PTR_CONTROL$ TO 4 +/* bda 1/21/94 -------------------- */ +EQU VOL_PTR_OVERRIDE_LOCATION$ TO 5 + +EQU VOL_PTR_SRVNAME$ TO 1 +EQU VOL_PTR_DBNAME$ TO 2 + + + +* OMNISCRIPT calls - Some of the meta functions are implemented as omniscript calls +* start the numbering at 100 to skip over other RTP57 uses of omniscript +* copied in from mvfs, not all implmented +Equ dsbfs_OmniGetServerTables$ To 110 ; * List the tables on the server +Equ dsbfs_OmniGetServerColumns$ To 111 ; * List the columns for a table on the server +Equ dsbfs_OmniGetColumnProperties$ To 112 ; * Get properties of a column on the server +Equ dsbfs_OmniSetVolSync$ To 113 ; * Set the Volume level synchronization info, e.g write all changes, write new cols ,write-none +Equ dsbfs_OmniGetVolSync$ To 114 ; * Get the Volume level synchronization info +Equ dsbfs_OmniSetTableSync$ To 115 ; * Set the Table level synchronization info, e.g. specific columns, or literal-only +Equ dsbfs_OmniGetTableSync$ To 116 ; * Get the Volume level synchronization info +Equ dsbfs_OmniGetPlatform$ To 117 ; * get the platform For this volume +Equ dsbfs_OmniSetParam$ To 118 ; * add / update a username password pair in the session +Equ dsbfs_OmniWriteParam$ To 119 ; * add / update a username password pair in the "wallet" ( and the session) +Equ dsbfs_OmniLinkTable$ To 120 ; * Attach a table - creates the media pointers ; DSBFS(OMNI.SCRIPT$, BFS$, volname, ds_name, '', dsbfs_omniLinkTable$, table_isOk ) +Equ dsbfs_OmniUnLinkTable$ To 121 ; * Detach a table - deletes the media pointers +Equ dsbfs_OmniMakeShadowColumns$ To 122 ; * Map columns for a table +Equ dsbfs_OmniGetVolumes$ To 123 ; * List the volumes defined for this bfs, optional filter on platform +Equ dsbfs_OmniExecute$ To 124 ; * Execute a TCL command +Equ dsbfs_OmniCallSub$ To 125 ; * Call a subrooutine +Equ dsbfs_OmniCompileBasic$ To 126 ; * Compile a subroutine ( h = volname, n = filename, f= omniscript r = rowId +Equ dsbfs_OmniCalculate$ To 127 ; * Like CalculateEx. Have the server calculate a column value. +Equ dsbfs_OmniIconv$ To 128 ; * Iconv at server +Equ dsbfs_OmniOconv$ To 129 ; * Oconv at server +Equ dsbfs_OmniGetParam$ To 130 ; * get a connection string parameter +Equ dsbfs_OmniReadUAllowed$ To 131 ; * Return true if ReadU / WriteRelease are supported +Equ dsbfs_OmniReadU$ To 132 ; * Native ReadU call +Equ dsbfs_OmniWriteRelease$ To 133 ; * Native Write Call, will release the lock +Equ dsbfs_OmniAddCredential$ To 134 ; * Add an oi To 1host user login +Equ dsbfs_OmniRemoveCredential$ To 135 ; * Remove an oi To host user login +Equ dsbfs_OmniTransactionBegin$ To 136 ; * Begin a transaction +Equ dsbfs_OmniTransactionCommit$ To 137 ; * Commit a transaction +Equ dsbfs_OmniTransactionRollBack$ To 138 ; * Roll back a transaction +Equ dsbfs_OmniSetUser$ To 139 ; * Activate the credentials for the curent user. Need to detach / attach if the credentials change +Equ dsbfs_OmnigetUser$ To 140 ; * Activate the credentials for the curent user. Need to detach / attach if the credentials change +Equ dsbfs_OmniTransactionStatus$ To 141 ; * Get the current transaction status +Equ dsbfs_OmniGetDatasections$ To 142 ; * Look up the names of multlevel data tables in the table +Equ dsbfs_OmniListVolumes$ To 143 ; * Return an array of defined volumes and their connection status +Equ dsbfs_OmniRelease$ To 144 ; * Release a READU lock +Equ dsbfs_OmniEnablePooling$ To 145 ; * Enable pooling Connections +Equ dsbfs_OmniDisablePooling$ To 146 ; * Disable pooling Connections +Equ dsbfs_OmniSetAdditionalProperty$ To 147 ; * pass-through a property setting. User is responsible for setting a valid property. ( e.g. Timeout) +Equ dsbfs_OmniGetAdditionalProperty$ To 148 ; * pass-through a property setting. User is responsible for setting a valid property. ( e.g. Timeout) +Equ dsbfs_OmniGetMediaHandle$ To 149 ; * return the media handle for a volumename, even if it is not attached yet +Equ dsbfs_OmniTranslateSelect$ To 150 ; * Given an OI select statement, return equivalent SQL from, with, by clauses + + diff --git a/SYSPROG/STPROCINS/DSBFS_HELPER_EQUATES.txt b/SYSPROG/STPROCINS/DSBFS_HELPER_EQUATES.txt new file mode 100644 index 0000000..d8ca00a --- /dev/null +++ b/SYSPROG/STPROCINS/DSBFS_HELPER_EQUATES.txt @@ -0,0 +1,43 @@ +compile insert DSBFS_HELPER_EQUATES +/* + ** Supporting equates For cbbfs_helper funiton + ** 02-23-15 rjc move defaults To cbbfs_Equates, Add Lockmode_field, list_index, add_index, remove_Index, list_lock_methods commands +*/ + +* Supported fields + +Equ CMD_PING$ To 0 +Equ CMD_VOLUME_LIST$ To 1 +Equ CMD_VOLUME_READ$ To 2 +Equ CMD_VOLUME_ATTACH$ To 3 +Equ CMD_VOLUME_DETACH$ To 4 +Equ CMD_VOLUME_DELETE$ To 5 +Equ CMD_VOLUME_SAVE$ To 6 +Equ CMD_SERVER_TABLES$ To 7 +Equ CMD_TABLE_LINK$ To 8 +Equ CMD_TABLE_UNLINK$ To 9 +Equ CMD_CREDENTIALS$ To 10 +Equ CMD_VENDORLIST$ To 11 +Equ CMD_USERNAMES$ To 12 +Equ CMD_WRITECRED$ To 13 +Equ CMD_REMOVECRED$ To 14 +EQU CMD_VOLUME_ADMIN$ To 15 +EQU CMD_STATUS_CONNECTION$ To 16 +Equ CMD_CHECK$ To 17 +Equ CMD_PREFIX$ To 18 + + + +* record layout +EQU VOLUMEID_FIELD$ To 1 +EQU SHADOW_LOC_FIELD$ To 2 +EQU VENDOR_FIELD$ To 3 +Equ SCHEMA_FIELD$ To 4 +equ CONNECTIONSTRING_FIELD$ To 5 +EQU USER_FIELD$ To 6 +EQU PWD_FIELD$ To 7 +Equ OI_LOCKING_ENABLED$ To 8 +Equ APPLICATION_FIELD$ To 9 +Equ UNLINKED_TABLES_FIELD$ To 10 +Equ LINKED_TABLES_FIELD$ To 11 +Equ CREDENTIALS_ENABLED_FIELD$ To 12 diff --git a/SYSPROG/STPROCINS/DSBFS_LC.txt b/SYSPROG/STPROCINS/DSBFS_LC.txt new file mode 100644 index 0000000..13f274d --- /dev/null +++ b/SYSPROG/STPROCINS/DSBFS_LC.txt @@ -0,0 +1,4 @@ +Compile Insert DSBFS_LC + +Common /DSBFS_LC/readlist_flag@, selected_ids@,selected_bys@,installed@,identity@@,volCache%, tableCache%, paramcache%, connCache% + diff --git a/SYSPROG/STPROCINS/DSBFS_SQL_KEYWORDS.txt b/SYSPROG/STPROCINS/DSBFS_SQL_KEYWORDS.txt new file mode 100644 index 0000000..a422d43 --- /dev/null +++ b/SYSPROG/STPROCINS/DSBFS_SQL_KEYWORDS.txt @@ -0,0 +1,194 @@ +compile Insert dsbfs_sql_keywords +/* + +ADD +EXCEPT +PERCENT +ALL +EXEC +PLAN +ALTER +EXECUTE +PRECISION +AND +EXISTS +PRIMARY +ANY +EXIT +PRINT +AS +FETCH +PROC +ASC +FILE +PROCEDURE +AUTHORIZATION +FILLFACTOR +PUBLIC +BACKUP +FOR +RAISERROR +BEGIN +FOREIGN +READ +BETWEEN +FREETEXT +READTEXT +BREAK +FREETEXTTABLE +RECONFIGURE +BROWSE +FROM +REFERENCES +BULK +FULL +REPLICATION +BY +FUNCTION +RESTORE +CASCADE +GOTO +RESTRICT +CASE +GRANT +RETURN +CHECK +GROUP +REVOKE +CHECKPOINT +HAVING +RIGHT +CLOSE +HOLDLOCK +ROLLBACK +CLUSTERED +IDENTITY +ROWCOUNT +COALESCE +IDENTITY_INSERT +ROWGUIDCOL +COLLATE +IDENTITYCOL +RULE +COLUMN +IF +SAVE +COMMIT +IN +SCHEMA +COMPUTE +INDEX +SELECT +CONSTRAINT +INNER +SESSION_USER +CONTAINS +INSERT +SET +CONTAINSTABLE +INTERSECT +SETUSER +CONTINUE +INTO +SHUTDOWN +CONVERT +IS +SOME +CREATE +JOIN +STATISTICS +CROSS +KEY +SYSTEM_USER +CURRENT +KILL +TABLE +CURRENT_DATE +LEFTTEXTSIZE +CURRENT_TIME +LIKE +THEN +CURRENT_TIMESTAMP +LINENO +TO +CURRENT_USER +LOADTOP +CURSOR +NATIONAL +TRAN +DATABASE +NOCHECK +TRANSACTION +DBCC +NONCLUSTERED +TRIGGER +DEALLOCATE +NOT +TRUNCATE +DECLARE +NULL +TSEQUAL +DEFAULT +NULLIF +UNION +DELETE +OF +UNIQUE +DENY +OFF +UPDATE +DESC +OFFSETS +UPDATETEXT +DISK +ON +USE +DISTINCT +OPEN +USER +DISTRIBUTED +OPENDATASOURCE +VALUES +DOUBLE +OPENQUERY +VARYING +DROP +OPENROWSET +VIEW +DUMMY +OPENXML +WAITFOR +DUMP +OPTION +WHEN +ELSE +OR +WHERE +END +ORDER +WHILE +ERRLVL +OUTER +WITH +ESCAPE +OVER +WRITETEXT +NOLOCK +SUBSTRING +LEN +LTRIM +RTRIM +ISNUMERIC +STR +REPLACE +UPPER +LOWER +COUNT +NOT +IN +NULL +AND +OR +IS + +*/ diff --git a/SYSPROG/STPROCINS/DSBFS_TRACE_EQUATES.txt b/SYSPROG/STPROCINS/DSBFS_TRACE_EQUATES.txt new file mode 100644 index 0000000..7afd4e1 --- /dev/null +++ b/SYSPROG/STPROCINS/DSBFS_TRACE_EQUATES.txt @@ -0,0 +1,16 @@ +compile Insert dsbfs_trace_equates +/* +** Support for the DSBFS_TRACE program +** 02-15-18 rjc recompiled +*/ + +Declare Function dsbfs_Trace +Declare Subroutine dsbfs_trace + +Equ cmd_traceOn$ To 1 +Equ cmd_traceOff$ To 2 +Equ cmd_traceEvent$ To 3 +Equ cmd_displayLog$ To 4 +Equ cmd_GetLogFileName$ To 5 + +common /rti_dsbfs_trace_com/traceInit@, traceMode@, traceFilename@, traceFileOffset@ diff --git a/SYSPROG/STPROCINS/EDIT.KEYS.txt b/SYSPROG/STPROCINS/EDIT.KEYS.txt new file mode 100644 index 0000000..09f1e8f --- /dev/null +++ b/SYSPROG/STPROCINS/EDIT.KEYS.txt @@ -0,0 +1,214 @@ +compile insert EDIT.KEYS +* +* E D I T K E Y S +* +* Revision History: +* 02/19/88 men Added VIEWER$ and Key Acronyms +* +* @PRIORITY.INT Definitions +* + +EQU GENERAL.HELP$ TO 1 ;* C-F1 General Help +EQU EXECUTE.TCL$ TO 2 ;* F5 TCL +EQU CAPTURE.KEY$ TO 3 ;* A-O Key capturing on/off +EQU CAPTURE.EDIT$ TO 4 ;* A-8 Captured keys on-the-fly edit +EQU PLAYBACK.KEY$ TO 5 ;* A-9 Key playback start +EQU PAUSE.INPUT$ TO 6 ;* C-\ Pause +EQU MACRO.MODE$ TO 7 ;* C-_ Key nmemonic macro mode on/off +EQU EDIT.MACRO$ TO 8 ;* A-M Edit key macro set +EQU MACROS.START$ TO 9 ;* A-1 Start of the macro keys + * Thru A-5 +* +* @MOVE.KEYS Definitions +* + +EQU ENTER$ TO 1 ;* CR Enter +EQU DOWN$ TO 2 ;* DOWN Move cursor down one line, maintaining current column +EQU UP$ TO 3 ;* UP Move cursor up one line, maintaining current column +EQU RIGHT$ TO 4 ;* RIGHT Move cursor one character (column) left +EQU LEFT$ TO 5 ;* LEFT Move cursor one character (column) left +EQU LAST.PAGE$ TO 6 ;* C-PGDN Move cursor to the first column, last line of the last page +EQU FIRST.PAGE$ TO 7 ;* C-PGUP Move cursor to the first column, first line of the first page +EQU PAGE.DOWN$ TO 8 ;* PDOWN Move cursor one page down, maintaining current column position +EQU PAGE.UP$ TO 9 ;* PUP Move cursor one page up, maintaining current column position +EQU TAB.RIGHT$ TO 10 ;* C-I Move cursor to next tab right +EQU TAB.LEFT$ TO 11 ;* S-TAB Move cursor to next tab left +EQU WORD.RIGHT$ TO 12 ;* C-RA Move cursor one word right +EQU WORD.LEFT$ TO 13 ;* C-LA Move cursor one word left +EQU END$ TO 14 ;* END Move cursor to end of current line +EQU HOME$ TO 15 ;* HOME Move cursor to beginning of current line +EQU END.LINE$ TO 16 ;* C-END Move cursor to the very end of current line +EQU START.LINE$ TO 17 ;* C-HOME Move cursor to the very beggining of current line +EQU TO.LINE$ TO 18 ;* C-G Go to line (prompt for line #) +EQU FIND.STR$ TO 19 ;* C-F Find string +EQU REPEAT.LAST$ TO 20 ;* C-A Repeat last find/replace again +EQU DEFINE.BLOCK$ TO 21 ;* C-B Start/Extend Block definition +EQU CLEAR.BLOCK$ TO 22 ;* C-U Kill any existing block definition +EQU CUT.BLOCK$ TO 23 ;* C-B Cut block to the buffer +EQU ZOOM$ TO 24 ;* F3 Expand current editing field to the expand window +EQU SUB.VALUES$ TO 25 ;* C-E Edit subvalue window +EQU AUTO.MODES$ TO 26 ;* C-W Toggle word wrap on/off +EQU SET.TABS$ TO 27 ;* C-T Set tab stops +EQU EDIT.TOGGLE$ TO 28 ;* F4 Turn on edit mode + +* +* @EDIT.KEYS Definitions +* + +EQU BACK$ TO 1 ;* C-H Delete character to the left of the cursor +EQU DEL$ TO 2 ;* DEL Delete character at current cursor position +EQU DEL.WORD$ TO 3 ;* C-Y Delete this word (or word right) (RESERVED) +EQU CLEAR.TO.END$ TO 4 ;* C-L Delete all characters from current position to end of current line +EQU CLEAR.TO.BEG$ TO 5 ;* C-K Delete all characters from beginning of current position to the left +EQU CLEAR.LINE$ TO 6 ;* C-X Kill all characters in line; lines below do not move up +EQU INS$ TO 7 ;* INS Insert/overwrite toggle +EQU PROG.KEY$ TO 8 ;* C-P Duplicate last character inserted (good for high ASCII characters) +EQU RESTART.EDIT$ TO 9 ;* C-Q Restart editing, undoing any changes (RESERVED) +EQU PASTE.BLOCK$ TO 10 ;* C-F4 Paste block from the buffer +EQU INS.LINE$ TO 11 ;* C-N Insert blank line at current cursor line +EQU DEL.LINE$ TO 12 ;* C-D Delete current line, moving lines below up +EQU BREAK.LINE$ TO 13 ;* C-C Cut line into two lines at current cursor position +EQU MERGE.LINE$ TO 14 ;* C-J Join current line with following line +EQU REPLACE.STR$ TO 15 ;* C-R Replace string +EQU SPECIAL.MODE$ TO 16 ;* C-S Toggle into Special Mode +EQU FIT.WINDOW$ TO 17 ;* C-Z Reformat text to fit the window (RESERVED) + +* +* @INT.CONST Definitions +* + +EQU QUIT$ TO 1 ;* ESC +EQU OPTIONS$ TO 2 ;* F2 +EQU SOFTKEYS$ TO 3 ;* F6 +EQU PAN$ TO 4 ;* F7 +EQU REFRESH$ TO 5 ;* F8 +EQU SAVE$ TO 6 ;* F9 +EQU MENU$ TO 7 ;* F10 +EQU DETAIL$ TO 8 ;* F1 +EQU TABLE$ TO 9 ;* C-F5 +EQU RELATIONS$ TO 10 ;* C-F6 +EQU RESIZE$ TO 11 ;* C-F7 +EQU MOVE$ TO 12 ;* C-F8 +EQU BROWSE$ TO 13 ;* C-F10 +EQU DEL.RECORD$ TO 14 ;* A-D +EQU NEXT.ID$ TO 15 ;* A-F +EQU PREV.ID$ TO 16 ;* A-B +EQU KEY.EDIT$ TO 17 ;* A-K +EQU DEBUG$ TO 18 ;* A-S +EQU DUP.PROMPT$ TO 19 ;* A-O +EQU BROWSE.EDIT$ TO 20 ;* A-I +EQU BROWSE.MODS$ TO 21 ;* A-U +EQU MIDDLE$ TO 22 ;* A-W +EQU TAB.FORWARD$ TO 23 ;* A-T +EQU TAB.BACKWARD$ TO 24 ;* A-Y +EQU ALL.PROMPTS$ TO 25 ;* A-A +EQU PRINT.BROWSE$ TO 26 ;* A-P +EQU TUTORIAL.KEY$ TO 27 ;* C-F2 Setup by MN to match WIN.INT +EQU ACTIVE.KEYS$ TO 28 ;* C-F9 Setup by MN " +EQU RECALC.ALL$ TO 29 ;* A-V Setup by MN " +EQU VIEWER$ TO 30 ;* Setup by MN " +EQU COPYREC$ TO 31 ;* A-C +* +* The original edit key names +* + +* Cursor Movement Keys: +* +EQU HM TO @MOVE.KEYS ;* Home Move cursor to beginning of current line +EQU ND TO @MOVE.KEYS ;* End Move cursor to end of current line +EQU UP TO @MOVE.KEYS ;* Up Move cursor up one line, maintaining current column +EQU DN TO @MOVE.KEYS ;* Down Move cursor down one line, maintaining current column +EQU LT TO @MOVE.KEYS ;* Left Move cursor one character (column) left +EQU RT TO @MOVE.KEYS ;* Right Move cursor one character (column) left +EQU PGUP TO @MOVE.KEYS ;* PgUp Move cursor one page up, maintaining current column position + * Full page if possible, else cursor at first line +EQU PGDN TO @MOVE.KEYS ;* PgDn Move cursor one page down, maintaining current column position + * Full page if possible, else cursor at last line +EQU TABRT TO @MOVE.KEYS ;* Tab Move cursor to next tab right +EQU TABLT TO @MOVE.KEYS ;* Sh-Tab Move cursor to next tab left +EQU END.LINE TO @MOVE.KEYS ;* ^Home Move cursor to first column of current line +EQU START.LINE TO @MOVE.KEYS ;* ^End Move cursor to first column, last line of current.line +EQU CRT TO @MOVE.KEYS ;* ^Rt Move cursor one word right +EQU CLT TO @MOVE.KEYS ;* ^Lt Move cursor one word left +EQU LAST.PAGE TO @MOVE.KEYS ;* ^PgDn Move cursor to the first column, last line of the last page +EQU CPGDN TO @MOVE.KEYS ;* ^PgDn Move cursor to the first column, last line of the last page +EQU FIRST.PAGE TO @MOVE.KEYS ;* ^PGUP Move cursor to the first column, first line of the first page +EQU CPGUP TO @MOVE.KEYS ;* ^PGUP Move cursor to the first column, first line of the first page +EQU TO.LINE TO @MOVE.KEYS ;* ^G Go to line (prompt for line #) +* +* Deleting/Inserting Keys: +* +EQU BACK TO @EDIT.KEYS ;* Back Delete character to the left of the cursor +EQU INS TO @EDIT.KEYS ;* Ins Insert/overwrite toggle +EQU INS.LINE TO @EDIT.KEYS ;* ^N Insert blank line at current cursor line +EQU DEL TO @EDIT.KEYS ;* Del Delete character at current cursor position +EQU DEL.LINE TO @EDIT.KEYS ;* ^D Delete current line, moving lines below up +EQU DEL.WORD TO @EDIT.KEYS ;* ^Y Delete this word (or word right) (RESERVED) +EQU CLEAR.LINE TO @EDIT.KEYS ;* ^X Kill all characters in line; lines below do not move up +EQU CLEAR.TO.END TO @EDIT.KEYS ;* ^L Delete all characters from current position to end of current line +EQU CLEAR.TO.BEG TO @EDIT.KEYS ;* ^K Delete all characters from beginning of current position to the left +* +* Find/Replace Keys: +* +EQU FIND.STR TO @MOVE.KEYS ;* ^F Find string +EQU REPLACE.STR TO @EDIT.KEYS ;* ^R Replace string +EQU REPEAT.LAST TO @MOVE.KEYS ;* ^A Repeat last find/replace again +* +* Block Keys: +* +EQU DEFINE.BLOCK TO @MOVE.KEYS ;* ^B Start/End Block definition +EQU CLEAR.BLOCK TO @MOVE.KEYS ;* ^U Kill any existing block definition +EQU CUT.BLOCK TO @MOVE.KEYS ;* ^F3 Cut block to the buffer +EQU PASTE.BLOCK TO @EDIT.KEYS ;* ^F4 Paste block from the buffer +* +* Special Keys: +* +EQU SPECIAL.MODE TO @EDIT.KEYS ;* ^S Toggle into Special Mode +* +* Other Keys: +* +EQU PROG.KEY TO @EDIT.KEYS ;* ^P Duplicate last character inserted (good for high ASCII characters) +EQU MERGE.LINE TO @EDIT.KEYS ;* ^J Join current line with following line +EQU BREAK.LINE TO @EDIT.KEYS ;* ^C Cut line into two lines at current cursor position +EQU SET.TABS TO @MOVE.KEYS ;* ^T Set tab stops +EQU AUTO.MODES TO @MOVE.KEYS ;* ^W Toggle word wrap on/off +EQU FIT.WINDOW TO @EDIT.KEYS ;* ^Z Reformat text to fit the window (RESERVED) +EQU RESTART.EDIT TO @EDIT.KEYS ;* ^Q Restart editing, undoing any changes (RESERVED) +EQU SUB.VALUES TO @MOVE.KEYS ;* ^E Edit subvalue window +EQU ZOOM.KEY TO @MOVE.KEYS ;* F3 Expand current editing field to the expand window +EQU EDIT.KEY TO @MOVE.KEYS ;* F4 Turn on edit mode +EQU ENTER TO @MOVE.KEYS ;* CR Carriage Return + +* +* Int Const's +* + +EQU QUIT TO @INT.CONST ;* +EQU OPTIONS.KEY TO @INT.CONST ;* +EQU SOFTKEYS.KEY TO @INT.CONST ;* +EQU PAN.KEY TO @INT.CONST ;* +EQU REFRESH.KEY TO @INT.CONST ;* +EQU SAVE.KEY TO @INT.CONST ;* +EQU MENU.KEY TO @INT.CONST ;* +EQU DETAIL.KEY TO @INT.CONST ;* +EQU TABLE.KEY TO @INT.CONST ;* +EQU RELATIONS.KEY TO @INT.CONST ;* +EQU RESIZE.KEY TO @INT.CONST ;* +EQU MOVE.KEY TO @INT.CONST ;* +EQU BROWSE.KEY TO @INT.CONST ;* +EQU DEL.REC TO @INT.CONST ;* +EQU NEXT.FORWARD TO @INT.CONST ;* +EQU NEXT.BACKWARD TO @INT.CONST ;* +EQU KEY.EDIT TO @INT.CONST ;* +EQU DEBUG.KEY TO @INT.CONST ;* +EQU DUP.PROMPT TO @INT.CONST ;* +EQU BROWSE.EDIT TO @INT.CONST ;* +EQU BROWSE.CHANGED TO @INT.CONST ;* +EQU MIDDLE.FIELD TO @INT.CONST ;* +EQU PTAB.FORWARD TO @INT.CONST ;* +EQU PTAB.BACKWARD TO @INT.CONST ;* +EQU ALL.PROMPTS TO @INT.CONST ;* +EQU PRINT.BROWSE TO @INT.CONST ;* +EQU VIEWER.KEY TO @INT.CONST ;* +EQU COPY.KEY$ TO @INT.CONST ;* +* Source Date: 13:11:08 28 JUL 1992 Build ID: AREV*2.2.58 Level: 2.2 diff --git a/SYSPROG/STPROCINS/EDIT.SHORT.txt b/SYSPROG/STPROCINS/EDIT.SHORT.txt new file mode 100644 index 0000000..538bcc6 --- /dev/null +++ b/SYSPROG/STPROCINS/EDIT.SHORT.txt @@ -0,0 +1,30 @@ +Compile Insert edit.short +* 12-08-15 rjc import from arev_bp +* 11/17/86 ERH - Changed to hex constants +EQU SVM TO \FC\ +EQU TEXT.MARK TO \FB\ +EQU DICT.HELP TO 14 + +EQU ESC TO \1B\ +EQU CPGDN TO \0076\ +EQU CPGUP TO \0084\ +EQU CR TO \0D\ + +EQU UP TO \0048\ +EQU DN TO \0050\ +EQU LT TO \004B\ +EQU RT TO \004D\ +EQU PGUP TO \0049\ +EQU PGDN TO \0051\ + +EQU DOWNKEYS TO \0050004D00760D\ +EQU UPKEYS TO \0048004B0084\ + +EQU DEL.LINE TO \04\ +EQU INS.LINE TO \0E\ + +EQU CRT TO \0074\ +EQU CLT TO \0073\ + +EQU BELL TO \07\ +* Source Date: 11:34:09 10 MAY 1994 Build ID: AREV_HR*3.1.40 Level: 3.13 diff --git a/SYSPROG/STPROCINS/EDITFIND_EQUATES.txt b/SYSPROG/STPROCINS/EDITFIND_EQUATES.txt new file mode 100644 index 0000000..0edba48 --- /dev/null +++ b/SYSPROG/STPROCINS/EDITFIND_EQUATES.txt @@ -0,0 +1,63 @@ +compile insert EditFind_Equates +****************************************************************************** +* +* Product : OpenInsight Works +* +* Name : EditFind_Equates +* Description: Instructions and constants for the EditFind function +* +* History : +* 02/23/96 cp Original programmer +* 10/15/97 cp Updated for 3.5 +* 10/28/15 Mr C Updated for 10.0, added header guards, added GETFINDFLAGS +* 03/01/18 Mr C Added EFP_OPT_TITLE$ +* +****************************************************************************** + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _EDITFIND_EQUATES_ +#define _EDITFIND_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function editFind + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * instructions + equ EFCMD_FIND$ to 1 + equ EFCMD_CLOSEFIND$ to 2 + equ EFCMD_FINDNEXT$ to 3 + equ EFCMD_FINDPREV$ to 4 + equ EFCMD_REPLACE$ to 5 ;* reserved + equ EFCMD_CLOSEREPLACE$ to 6 ;* reserved + equ EFCMD_ISFINDABLE$ to 7 + equ EFCMD_ISFINDNEXTABLE$ to 8 + equ EFCMD_ISREPLACEABLE$ to 9 ;* reserved + equ EFCMD_FINDCREATE$ to 10 ;* reserved + equ EFCMD_TEXTCHANGED$ to 11 ;* reserved + equ EFCMD_NEXTCLICKED$ to 12 ;* reserved + equ EFCMD_MARKALLCLICKED$ to 13 ;* reserved + equ EFCMD_FINDCLOSE$ to 14 ;* reserved + equ EFCMD_GETFINDFLAGS$ to 15 + + * options structure + equ EFP_OPT_MATCHCASE$ to 1 + equ EFP_OPT_WHOLEWORD$ to 2 + equ EFP_OPT_FORWARD$ to 3 + equ EFP_OPT_TITLE$ to 4 + + * find flags structure + equ EFF_FINDABLE$ to 1 + equ EFF_FINDNEXTABLE$ to 2 + equ EFF_REPLACEABLE$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/EDITTABLE_EQUATES.txt b/SYSPROG/STPROCINS/EDITTABLE_EQUATES.txt new file mode 100644 index 0000000..8306588 --- /dev/null +++ b/SYSPROG/STPROCINS/EDITTABLE_EQUATES.txt @@ -0,0 +1,493 @@ +compile insert EditTable_Equates +/* + Author Mr C + Date December 2001 + Purpose Equates for the Edit Table control + + Amended Date Reason + ======= ==== ====== + Mr C 09 Jun 10 Added DTPOS_ constants + + Mr C 26 May 10 Added DT_DEFAULTCOLOR$ + + Mr C 12 Feb 09 Updated DTM_ messages for OI9.2 + + Mr C 19 Aug 09 Updated DTM_ messages for OI9.1 + + Mr C 26 Jun 09 Added DTCS_CHECKBOXCENTER$ for OI9.1 + + Mr C 18 Jul 08 Added DROPDOWNLIST and MULTILINE styles/messages + for OI 9.0 compatibility + + Mr C 12 Mar 08 Added DTCS_SKIPPED$ + + Mr C 06 Aug 07 Added DTE_ error codes + Updated DTM_ messages to OI 8.0.x + + Mr C Sep 2006 Added new DTCS column styles + + Mr C Sep 2005 Added DTN_ notification codes + Added TABLEPOS_ notification codes + + Mr C Feb 2003 Added Access Modes, and DTM_GETCELLEFTBOTTOM$ + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _WINAPI_EDITTABLE_EQUATES_ +#define _WINAPI_EDITTABLE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert Window_Message_Equates + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Styles ////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTS_EDIT$ to 0x0004 + equ DTS_RESIZE$ to 0x0008 + equ DTS_NONE$ to 0x0000 + equ DTS_NUMBERS$ to 0x0010 + equ DTS_LETTERS$ to 0x0020 + equ DTS_OWNERDEF$ to 0x0030 + equ DTS_HGRID$ to 0x0040 + equ DTS_VGRID$ to 0x0080 + equ DTS_ROWSELECT$ to 0x0100 + equ DTS_MULTIROW$ to 0x0200 + equ DTS_COLSELECT$ to 0x0400 + equ DTS_MULTICOL$ to 0x0800 + equ DTS_SMALLDATA$ to 0x0000 + equ DTS_LARGEDATA$ to 0x1000 + equ DTS_ROWBUTTONS$ to 0x2000 + equ DTS_ROWNUMBERS$ to 0x4000 + equ DTS_DROPDOWN$ to 0x8000 + equ DTS_AUTODROPDN$ to 0x8002 + equ DTS_VIRTUALMEM$ to 0x0001 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Column Styles /////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTCS_LEFT$ to 0x00000000 + equ DTCS_HEADLEFT$ to 0x00000000 + equ DTCS_RESIZE$ to 0x00000001 + equ DTCS_FIXED$ to 0x00000002 + equ DTCS_EDIT$ to 0x00000004 + equ DTCS_PROTECT$ to 0x00000008 + equ DTCS_UPPERCASE$ to 0x00000010 + equ DTCS_HIDDEN$ to 0x00000020 + equ DTCS_CENTER$ to 0x00000040 + equ DTCS_RIGHT$ to 0x00000080 + equ DTCS_HEADCENTER$ to 0x00000100 + equ DTCS_HEADRIGHT$ to 0x00000200 + equ DTCS_VSCROLL$ to 0x00000400 ; * // only for DTCS_MULTILINE$ + equ DTCS_HSCROLL$ to 0x00000800 ; * // only for DTCS_MULTILINE$ + equ DTCS_SKIPPED$ to 0x00001000 + equ DTCS_LOCKED$ to 0x00002000 + equ DTCS_SORTASC$ to 0x00004000 + equ DTCS_SORTDES$ to 0x00008000 + equ DTCS_CHECKBOX$ to 0x00010000 + equ DTCS_DROPDOWN$ to 0x00020000 + equ DTCS_MULTILINEHEAD$ to 0x00040000 + equ DTCS_CHECKBOXRIGHT$ to 0x00080000 ; * // needs DTCS_CHECKBOX$ + equ DTCS_VALIGNCENTER$ to 0x00100000 + equ DTCS_VALIGNBOTTOM$ to 0x00200000 + equ DTCS_DROPDOWNEDIT$ to 0x00400000 + equ DTCS_OPTIONSBUTTON$ to 0x00800000 + equ DTCS_ENABLEDROPDOWNDRAG$ to 0x01000000 + equ DTCS_MULTILINE$ to 0x02000000 + equ DTCS_AUTOVSCROLL$ to 0x04000000 ; * // only for DTCS_MULTILINE$ + equ DTCS_AUTOHSCROLL$ to 0x08000000 ; * // only for DTCS_MULTILINE$ + equ DTCS_ENABLEDRAG$ to 0x10000000 + equ DTCS_ENABLEDROP$ to 0x20000000 + equ DTCS_CHECKBOXCENTER$ to 0x40000000 ; * // needs DTCS_CHECKBOX$ - no text! + equ DTCS_RESERVED$ to 0x80000000 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Messages //////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // WM_USER is redefined here so we don't have to worry about inserting it + * // from another record. + + equ DT_WM_USER$ to 1024 ; * // Defined here for ease of use! + + equ DTM_RESETALL$ to ( DT_WM_USER$ + 0 ) + equ DTM_RESETDATA$ to ( DT_WM_USER$ + 1 ) + equ DTM_GETWNDSTYLE$ to ( DT_WM_USER$ + 2 ) + equ DTM_SETWNDSTYLE$ to ( DT_WM_USER$ + 3 ) + equ DTM_GETCONFIGSIZE$ to ( DT_WM_USER$ + 4 ) + equ DTM_GETCONFIG$ to ( DT_WM_USER$ + 5 ) + equ DTM_SETCONFIG$ to ( DT_WM_USER$ + 6 ) + equ DTM_GETCOLCOUNT$ to ( DT_WM_USER$ + 7 ) + equ DTM_SETCOLCOUNT$ to ( DT_WM_USER$ + 8 ) + equ DTM_GETCOLSTYLE$ to ( DT_WM_USER$ + 9 ) + equ DTM_SETCOLSTYLE$ to ( DT_WM_USER$ + 10 ) + equ DTM_GETCOLTYPE$ to ( DT_WM_USER$ + 11 ) + equ DTM_SETCOLTYPE$ to ( DT_WM_USER$ + 12 ) + equ DTM_GETCOLDATALEN$ to ( DT_WM_USER$ + 13 ) + equ DTM_SETCOLDATALEN$ to ( DT_WM_USER$ + 14 ) + equ DTM_GETCOLWIDTH$ to ( DT_WM_USER$ + 15 ) + equ DTM_SETCOLWIDTH$ to ( DT_WM_USER$ + 16 ) + equ DTM_GETCOLFORMAT$ to ( DT_WM_USER$ + 17 ) + equ DTM_SETCOLFORMAT$ to ( DT_WM_USER$ + 18 ) + equ DTM_GETCOLHEAD$ to ( DT_WM_USER$ + 19 ) + equ DTM_SETCOLHEAD$ to ( DT_WM_USER$ + 20 ) + equ DTM_GETCOLNAME$ to ( DT_WM_USER$ + 21 ) + equ DTM_SETCOLNAME$ to ( DT_WM_USER$ + 22 ) + equ DTM_GETCOLEXTRA1$ to ( DT_WM_USER$ + 23 ) + equ DTM_SETCOLEXTRA1$ to ( DT_WM_USER$ + 24 ) + equ DTM_GETCOLEXTRA2$ to ( DT_WM_USER$ + 25 ) + equ DTM_SETCOLEXTRA2$ to ( DT_WM_USER$ + 26 ) + equ DTM_GETCOLNUMBER$ to ( DT_WM_USER$ + 27 ) + equ DTM_SHOWDROPDOWN$ to ( DT_WM_USER$ + 28 ) + equ DTM_ISDROPDOWN$ to ( DT_WM_USER$ + 29 ) + equ DTM_GETROWCOUNT$ to ( DT_WM_USER$ + 30 ) + equ DTM_GETTOPINDEX$ to ( DT_WM_USER$ + 32 ) + equ DTM_SETTOPINDEX$ to ( DT_WM_USER$ + 33 ) + equ DTM_GETLEFTINDEX$ to ( DT_WM_USER$ + 34 ) + equ DTM_SETLEFTINDEX$ to ( DT_WM_USER$ + 35 ) + equ DTM_GETCURROW$ to ( DT_WM_USER$ + 36 ) + equ DTM_GETCURCOL$ to ( DT_WM_USER$ + 37 ) + equ DTM_SETCURCELL$ to ( DT_WM_USER$ + 38 ) + equ DTM_GETACCESSROW$ to ( DT_WM_USER$ + 39 ) + equ DTM_GETACCESSCOL$ to ( DT_WM_USER$ + 40 ) + equ DTM_SETACCESSPOS$ to ( DT_WM_USER$ + 41 ) + equ DTM_READROW$ to ( DT_WM_USER$ + 42 ) + equ DTM_UPDATEROW$ to ( DT_WM_USER$ + 43 ) + equ DTM_INSERTROW$ to ( DT_WM_USER$ + 44 ) + equ DTM_DELETEROW$ to ( DT_WM_USER$ + 45 ) + equ DTM_MOVEROWTO$ to ( DT_WM_USER$ + 46 ) + equ DTM_REPLICATEROWTO$ to ( DT_WM_USER$ + 47 ) + equ DTM_READCOL$ to ( DT_WM_USER$ + 48 ) + equ DTM_UPDATECOL$ to ( DT_WM_USER$ + 49 ) + equ DTM_INSERTCOL$ to ( DT_WM_USER$ + 90 ) + equ DTM_DELETECOL$ to ( DT_WM_USER$ + 50 ) + equ DTM_MOVECOLTO$ to ( DT_WM_USER$ + 51 ) + equ DTM_REPLICATECOLTO$ to ( DT_WM_USER$ + 52 ) + equ DTM_READCELL$ to ( DT_WM_USER$ + 53 ) + equ DTM_UPDATECELL$ to ( DT_WM_USER$ + 54 ) + equ DTM_READCELLRECT$ to ( DT_WM_USER$ + 55 ) + equ DTM_GETSELMODE$ to ( DT_WM_USER$ + 56 ) + equ DTM_GETROWSTATUS$ to ( DT_WM_USER$ + 58 ) + equ DTM_GETCURROWSEL$ to ( DT_WM_USER$ + 91 ) + equ DTM_SELROW$ to ( DT_WM_USER$ + 59 ) + equ DTM_SELROWRANGE$ to ( DT_WM_USER$ + 60 ) + equ DTM_SELALLROWS$ to ( DT_WM_USER$ + 61 ) + equ DTM_GETROWSELCOUNT$ to ( DT_WM_USER$ + 62 ) + equ DTM_GETROWSELLIST$ to ( DT_WM_USER$ + 63 ) + equ DTM_GETROWSELFIRST$ to ( DT_WM_USER$ + 64 ) + equ DTM_GETROWSELNEXT$ to ( DT_WM_USER$ + 65 ) + equ DTM_GETCOLSTATUS$ to ( DT_WM_USER$ + 66 ) + equ DTM_GETCURCOLSEL$ to ( DT_WM_USER$ + 92 ) + equ DTM_SELCOL$ to ( DT_WM_USER$ + 67 ) + equ DTM_SELCOLRANGE$ to ( DT_WM_USER$ + 68 ) + equ DTM_SELALLCOLS$ to ( DT_WM_USER$ + 69 ) + equ DTM_GETCOLSELCOUNT$ to ( DT_WM_USER$ + 70 ) + equ DTM_GETCOLSELLIST$ to ( DT_WM_USER$ + 71 ) + equ DTM_GETCOLSELFIRST$ to ( DT_WM_USER$ + 72 ) + equ DTM_GETCOLSELNEXT$ to ( DT_WM_USER$ + 73 ) + equ DTM_GETCHARSEL$ to ( DT_WM_USER$ + 74 ) + equ DTM_SETCHARSEL$ to ( DT_WM_USER$ + 75 ) + equ DTM_GETVISROWS$ to ( DT_WM_USER$ + 81 ) + equ DTM_GETVISCOLS$ to ( DT_WM_USER$ + 82 ) + equ DTM_GETNOTIFYROW$ to ( DT_WM_USER$ + 83 ) + equ DTM_GETNOTIFYCOL$ to ( DT_WM_USER$ + 84 ) + equ DTM_GETCLICKPOS$ to ( DT_WM_USER$ + 85 ) + equ DTM_GETCOLCFGSIZE$ to ( DT_WM_USER$ + 87 ) + equ DTM_GETCOLCFG$ to ( DT_WM_USER$ + 88 ) + equ DTM_SETCOLCFG$ to ( DT_WM_USER$ + 89 ) + equ DTM_GETEDITKEY$ to ( DT_WM_USER$ + 93 ) + equ DTM_SETEDITKEY$ to ( DT_WM_USER$ + 94 ) + equ DTM_EDITCURRCELL$ to ( DT_WM_USER$ + 95 ) + equ DTM_GETDTMETRICS$ to ( DT_WM_USER$ + 96 ) + equ DTM_SETDTCOLOR$ to ( DT_WM_USER$ + 97 ) + equ DTM_SETROWCOLOR$ to ( DT_WM_USER$ + 98 ) + equ DTM_SETCOLCOLOR$ to ( DT_WM_USER$ + 99 ) + equ DTM_SETCELLCOLOR$ to ( DT_WM_USER$ + 100 ) + equ DTM_RESETDTCOLOR$ to ( DT_WM_USER$ + 101 ) + equ DTM_RESETALLCOLOR$ to ( DT_WM_USER$ + 102 ) + equ DTM_RESETROWCOLOR$ to ( DT_WM_USER$ + 103 ) + equ DTM_RESETCOLCOLOR$ to ( DT_WM_USER$ + 104 ) + equ DTM_RESETCELLCOLOR$ to ( DT_WM_USER$ + 105 ) + equ DTM_VM_INITIALIZE$ to ( DT_WM_USER$ + 106 ) + equ DTM_VM_GETROWDATA$ to ( DT_WM_USER$ + 107 ) + equ DTM_VM_GETFIRST$ to ( DT_WM_USER$ + 108 ) + equ DTM_VM_GETLAST$ to ( DT_WM_USER$ + 109 ) + equ DTM_VM_GETPREV$ to ( DT_WM_USER$ + 110 ) + equ DTM_VM_GETNEXT$ to ( DT_WM_USER$ + 111 ) + equ DTM_VM_GETPERCENT$ to ( DT_WM_USER$ + 112 ) + equ DTM_SETSORTCOL$ to ( DT_WM_USER$ + 113 ) + equ DTM_SETROWFONT$ to ( DT_WM_USER$ + 114 ) + equ DTM_SETCOLFONT$ to ( DT_WM_USER$ + 115 ) + equ DTM_SETCELLFONT$ to ( DT_WM_USER$ + 116 ) + equ DTM_RESETALLFONT$ to ( DT_WM_USER$ + 117 ) + equ DTM_RESETROWFONT$ to ( DT_WM_USER$ + 118 ) + equ DTM_RESETCOLFONT$ to ( DT_WM_USER$ + 119 ) + equ DTM_RESETCELLFONT$ to ( DT_WM_USER$ + 120 ) + equ DTM_SETDTFONT$ to ( DT_WM_USER$ + 121 ) + equ DTM_RESETDTFONT$ to ( DT_WM_USER$ + 122 ) + equ DTM_GETSORTCOL$ to ( DT_WM_USER$ + 123 ) + equ DTM_GETSORTDIR$ to ( DT_WM_USER$ + 124 ) + equ DTM_SETCFENDEDIT$ to ( DT_WM_USER$ + 125 ) + equ DTM_GETCFENDEDIT$ to ( DT_WM_USER$ + 126 ) + equ DTM_GETFIXEDHT$ to ( DT_WM_USER$ + 127 ) + equ DTM_SETFIXEDHT$ to ( DT_WM_USER$ + 128 ) + equ DTM_GETVERTALIGN$ to ( DT_WM_USER$ + 129 ) + equ DTM_SETVERTALIGN$ to ( DT_WM_USER$ + 130 ) + equ DTM_GETKEY$ to ( DT_WM_USER$ + 131 ) + equ DTM_SETKEY$ to ( DT_WM_USER$ + 132 ) + equ DTM_GETCOLPIXELS$ to ( DT_WM_USER$ + 133 ) + equ DTM_SETCOLPIXELS$ to ( DT_WM_USER$ + 134 ) + equ DTM_GETCLIENTWIDTH$ to ( DT_WM_USER$ + 135 ) + equ DTM_GETCELLLEFTBOTTOM$ to ( DT_WM_USER$ + 136 ) + equ DTM_GETCELLBITMAP$ to ( DT_WM_USER$ + 137 ) + equ DTM_SETCELLBITMAP$ to ( DT_WM_USER$ + 138 ) + equ DTM_SETDTROWHEIGHT$ to ( DT_WM_USER$ + 139 ) + equ DTM_RESETDTROWHEIGHT$ to ( DT_WM_USER$ + 140 ) + equ DTM_SETROWHEIGHT$ to ( DT_WM_USER$ + 141 ) + equ DTM_RESETROWHEIGHT$ to ( DT_WM_USER$ + 142 ) + equ DTM_GETRESIZECOL$ to ( DT_WM_USER$ + 143 ) + equ DTM_SETRESIZECOL$ to ( DT_WM_USER$ + 144 ) + equ DTM_AUTORESIZE$ to ( DT_WM_USER$ + 145 ) + equ DTM_SETLISTDATA$ to ( DT_WM_USER$ + 146 ) + equ DTM_RESYNCSCROLLBARS$ to ( DT_WM_USER$ + 147 ) + equ DTM_GETDTROWHEIGHT$ to ( DT_WM_USER$ + 148 ) + equ DTM_GETROWHEIGHT$ to ( DT_WM_USER$ + 149 ) + equ DTM_GETDTHDRHEIGHT$ to ( DT_WM_USER$ + 150 ) + equ DTM_SETDTHDRHEIGHT$ to ( DT_WM_USER$ + 151 ) + equ DTM_GETROWSHADE$ to ( DT_WM_USER$ + 152 ) + equ DTM_SETROWSHADE$ to ( DT_WM_USER$ + 153 ) + equ DTM_GETODDROWSHADECOLOR$ to ( DT_WM_USER$ + 154 ) + equ DTM_SETODDROWSHADECOLOR$ to ( DT_WM_USER$ + 155 ) + equ DTM_GETEVENROWSHADECOLOR$ to ( DT_WM_USER$ + 156 ) + equ DTM_SETEVENROWSHADECOLOR$ to ( DT_WM_USER$ + 157 ) + equ DTM_GETCURSORPOSCELL$ to ( DT_WM_USER$ + 158 ) + equ DTM_SETCOLHDRCOLOR$ to ( DT_WM_USER$ + 159 ) + equ DTM_RESETCOLHDRCOLOR$ to ( DT_WM_USER$ + 160 ) + equ DTM_SETCOLHDRFONT$ to ( DT_WM_USER$ + 161 ) + equ DTM_RESETCOLHDRFONT$ to ( DT_WM_USER$ + 162 ) + equ DTM_SETROWBTNCOLOR$ to ( DT_WM_USER$ + 163 ) + equ DTM_RESETROWBTNCOLOR$ to ( DT_WM_USER$ + 164 ) + equ DTM_SETROWBTNFONT$ to ( DT_WM_USER$ + 165 ) + equ DTM_RESETROWBTNFONT$ to ( DT_WM_USER$ + 166 ) + equ DTM_GETLASTVISCOL$ to ( DT_WM_USER$ + 167 ) + equ DTM_GETLASTVISROW$ to ( DT_WM_USER$ + 168 ) + equ DTM_GETFIRSTSCROLLCOL$ to ( DT_WM_USER$ + 169 ) + equ DTM_GETLASTSCROLLCOL$ to ( DT_WM_USER$ + 170 ) + equ DTM_GETEDITHWND$ to ( DT_WM_USER$ + 171 ) + equ DTM_GETVSCROLLHWND$ to ( DT_WM_USER$ + 172 ) + equ DTM_GETHSCROLLHWND$ to ( DT_WM_USER$ + 173 ) + equ DTM_GETCOMBOBOXHWND$ to ( DT_WM_USER$ + 174 ) + equ DTM_GETCOLFORMATLEN$ to ( DT_WM_USER$ + 175 ) + equ DTM_GETDRAGIMAGE$ to ( DT_WM_USER$ + 176 ) + equ DTM_GETCLIENTRECT$ to ( DT_WM_USER$ + 177 ) + equ DTM_GETCOLDROPFORMAT$ to ( DT_WM_USER$ + 178 ) + equ DTM_GETCOLDROPFORMATLEN$ to ( DT_WM_USER$ + 179 ) + equ DTM_SETCOLDROPFORMAT$ to ( DT_WM_USER$ + 180 ) + equ DTM_GETROWSTYLE$ to ( DT_WM_USER$ + 181 ) + equ DTM_SETROWSTYLE$ to ( DT_WM_USER$ + 182 ) + equ DTM_GETCELLSTYLE$ to ( DT_WM_USER$ + 183 ) + equ DTM_SETCELLSTYLE$ to ( DT_WM_USER$ + 184 ) + equ DTM_CALCCELLSTYLE$ to ( DT_WM_USER$ + 185 ) + equ DTM_GETROWDROPLIST$ to ( DT_WM_USER$ + 186 ) + equ DTM_GETROWDROPLISTLEN$ to ( DT_WM_USER$ + 187 ) + equ DTM_SETROWDROPLIST$ to ( DT_WM_USER$ + 188 ) + equ DTM_GETCELLDROPLIST$ to ( DT_WM_USER$ + 189 ) + equ DTM_GETCELLDROPLISTLEN$ to ( DT_WM_USER$ + 190 ) + equ DTM_SETCELLDROPLIST$ to ( DT_WM_USER$ + 191 ) + equ DTM_GETFOCUSCELLFONT to ( DT_WM_USER$ + 192 ) + equ DTM_SETFOCUSCELLFONT to ( DT_WM_USER$ + 193 ) + equ DTM_GETFOCUSCELLCOLOR to ( DT_WM_USER$ + 194 ) + equ DTM_SETFOCUSCELLCOLOR to ( DT_WM_USER$ + 195 ) + equ DTM_GETFOCUSRECTSTYLE to ( DT_WM_USER$ + 196 ) + equ DTM_SETFOCUSRECTSTYLE to ( DT_WM_USER$ + 197 ) + equ DTM_GETFOCUSRECTWEIGHT to ( DT_WM_USER$ + 198 ) + equ DTM_SETFOCUSRECTWEIGHT to ( DT_WM_USER$ + 199 ) + equ DTM_GETFOCUSRECTCOLOR to ( DT_WM_USER$ + 200 ) + equ DTM_SETFOCUSRECTCOLOR to ( DT_WM_USER$ + 201 ) + equ DTM_RESETFOCUSCELLFONT to ( DT_WM_USER$ + 202 ) + equ DTM_RESETFOCUSCELLCOLOR to ( DT_WM_USER$ + 203 ) + equ DTM_GETROWLABEL to ( DT_WM_USER$ + 204 ) + equ DTM_SETROWLABEL to ( DT_WM_USER$ + 205 ) + equ DTM_GETDTROWLABEL to ( DT_WM_USER$ + 206 ) + equ DTM_SETDTROWLABEL to ( DT_WM_USER$ + 207 ) + equ DTM_GETDTCURSOR to ( DT_WM_USER$ + 208 ) + equ DTM_SETDTCURSOR to ( DT_WM_USER$ + 209 ) + + equ DTM_FIRSTMSG$ to ( DT_WM_USER$ + 0 ) + equ DTM_LASTMSG$ to ( DT_WM_USER$ + 207 ) + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Metrics////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DT_ROWHEIGHT$ to 1 + equ DT_ROWWIDTH$ to 2 + equ DT_HEADINGHT$ to 3 + equ DT_LABELWIDTH$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Class Names ///////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DT_EDITTBLCLASSNAME$ to "EditTbl" + equ DT_DATATBLCLASSNAME$ to "DataTbl" + equ DT_EDITCTRLCLASSNAME$ to "dtedit" + +/////////////////////////////////////////////////////////////////////////////// +// EditCurrCell parameter values ////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DT_BEGINEDIT$ to 1 + equ DT_ENDEDIT$ to 2 + equ DT_ABORTEDIT$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Row/Column Access Modes ///////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTA_ACCESS$ to 0x0000 + equ DTA_CURRENT$ to 0x0001 + equ DTA_SELFIRST$ to 0x0002 + equ DTA_SELNEXT$ to 0x0003 + equ DTA_AUTOINC$ to 0x0004 + equ DTA_AUTODEC$ to 0x0008 + equ DTA_COLMAJOR$ to 0x0010 + +/////////////////////////////////////////////////////////////////////////////// +// SetAccessPos special locations ///////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTPOS_LAST$ to -1 ; * // last row or column + equ DTPOS_AFTERLAST$ to -2 ; * // after the last (insert & move only) + equ DTPOS_INVALID$ to -3 ; * // invalid pos (ie read past last row) + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Notification Codes ////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTN_CREATE$ to 1 + equ DTN_DESTROY$ to 2 + equ DTN_ERRSPACE$ to 3 + equ DTN_SETFOCUS$ to 4 + equ DTN_KILLFOCUS$ to 5 + equ DTN_HSCROLL$ to 6 + equ DTN_VSCROLL$ to 7 + equ DTN_CELLFULL$ to 8 + equ DTN_SELCHANGE$ to 9 + equ DTN_MODECHANGE$ to 10 + equ DTN_DBLCLK$ to 11 + equ DTN_CHANGE$ to 12 + equ DTN_UPDATE$ to 13 + equ DTN_DROPDOWN$ to 14 + equ DTN_POSCHANGE$ to 15 + equ DTN_BEGINEDIT$ to 16 + equ DTN_ABORTEDIT$ to 17 + equ DTN_CLICKED$ to 18 + + equ DTN_COLSIZE$ to 20 + equ DTN_COLADDED$ to 21 + equ DTN_COLDELETED$ to 22 + equ DTN_COLMOVED$ to 23 + equ DTN_COLNAMECHANGED$ to 24 + equ DTN_GOTKEY$ to 25 + + equ DTN_NOTAVAILABLE$ to 99 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table CLICKPOS Notification Codes ///////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ TABLEPOS_NOWHERE$ to 0 + equ TABLEPOS_ONHEADING$ to 1 + equ TABLEPOS_ONGRIDLINE$ to 2 + equ TABLEPOS_ONCELL$ to 3 + equ TABLEPOS_ONLABEL$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Error Codes ///////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTE_OKAY$ to 0 ; * // (DWORD)0 /* NO ERROR */ + equ DTE_NOTALLOWED$ to -1 ; * // (DWORD)-1 /* operation not allowed */ + equ DTE_MESSAGENUM$ to -2 ; * // (DWORD)-2 /* invalid message */ + equ DTE_CELLADDR$ to -3 ; * // (DWORD)-3 /* invalid cell address */ + equ DTE_COLNUM$ to -4 ; * // (DWORD)-4 /* invalid column number */ + equ DTE_ROWNUM$ to -5 ; * // (DWORD)-5 /* invalid row number */ + equ DTE_NUMCOLS$ to -6 ; * // (DWORD)-6 /* invalid number of columns */ + equ DTE_NUMROWS$ to -7 ; * // (DWORD)-7 /* invalid number of rows */ + equ DTE_COLWIDTH$ to -8 ; * // (DWORD)-8 /* invalid column width */ + equ DTE_COLTYPE$ to -9 ; * // (DWORD)-9 /* invalid column data type */ + equ DTE_FIXEDLENGTH$ to -10 ; * // (DWORD)-10 /* column data type has fixed length */ + equ DTE_TRUNCATED$ to -11 ; * // (DWORD)-11 /* data buffer was truncated */ + equ DTE_NULLPOINTER$ to -12 ; * // (DWORD)-12 /* null pointer passed to function*/ + equ DTE_NULLVALUE$ to -13 ; * // (DWORD)-13 /* null parameter passed to function */ + equ DTE_NOMEMORY$ to -21 ; * // (DWORD)-21 /* insufficient memory */ + equ DTE_NOMEMLOCK$ to -22 ; * // (DWORD)-22 /* cant lock memory */ + equ DTE_STRINGTABLE$ to -23 ; * // (DWORD)-23 /* fatal string table size error */ + equ DTE_OVERFLOW$ to -24 ; * // (DWORD)-24 /* exceeded max allowable length */ + equ DTE_NORESLOAD$ to -25 ; * // (DWORD)-25 /* cant load resource */ + equ DTE_NORESLOCK$ to -26 ; * // (DWORD)-26 /* cant lock resource */ + equ DTE_ROWNOTINVIEW$ to -27 ; * // (DWORD)-27 /* row not in view (VM Managed Only) */ + equ DTE_ROWOUTOFRANGE$ to -28 ; * // (DWORD)-28 /* row out of range (VM Managed Only) */ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DT_DEFAULTCOLOR$ to 6777217 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +/* + DTCOLORSTRUCT + ============= + + A structure for use with the DTM_ color messages. + + typedef struct + { + COLORREF BkgrdColor; // bkgrd color + COLORREF TextColor; // text color + COLORREF SelBkgrdColor; // selected bkgrd color + COLORREF SelTextColor; // selected text color + } DTCOLORSTRUCT; + + + ( COLORREF is defined in WinDef.H as a DWORD which is a 32-bit unsigned + integer ) + + This structure should be created and stored in SYSOBJ as: + + STRUCT_DTCOLORSTRUCT +*/ + + equ DTCS_POS_BACKCOLOR$ to 1 + equ DTCS_POS_FORECOLOR$ to 2 + equ DTCS_POS_SELBACKCOLOR$ to 3 + equ DTCS_POS_SELFORECOLOR$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ ETM_MOUSEMSGOFFSET$ to (WM_USER$ + 2100) + + equ ETM_LBUTTONDOWN$ to (ETM_MOUSEMSGOFFSET$ + WM_LBUTTONDOWN$ ) + equ ETM_LBUTTONUP$ to (ETM_MOUSEMSGOFFSET$ + WM_LBUTTONUP$ ) + equ ETM_LBUTTONDBLCLK$ to (ETM_MOUSEMSGOFFSET$ + WM_LBUTTONDBLCLK$ ) + equ ETM_MBUTTONDOWN$ to (ETM_MOUSEMSGOFFSET$ + WM_MBUTTONDOWN$ ) + equ ETM_MBUTTONUP$ to (ETM_MOUSEMSGOFFSET$ + WM_MBUTTONUP$ ) + equ ETM_MBUTTONDBLCLK$ to (ETM_MOUSEMSGOFFSET$ + WM_MBUTTONDBLCLK$ ) + equ ETM_RBUTTONDOWN$ to (ETM_MOUSEMSGOFFSET$ + WM_RBUTTONDOWN$ ) + equ ETM_RBUTTONUP$ to (ETM_MOUSEMSGOFFSET$ + WM_RBUTTONUP$ ) + equ ETM_RBUTTONDBLCLK$ to (ETM_MOUSEMSGOFFSET$ + WM_RBUTTONDBLCLK$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/ENCRYPT.CONSTANTS.txt b/SYSPROG/STPROCINS/ENCRYPT.CONSTANTS.txt new file mode 100644 index 0000000..72321d7 --- /dev/null +++ b/SYSPROG/STPROCINS/ENCRYPT.CONSTANTS.txt @@ -0,0 +1,7 @@ +compile Insert Encrypt.constants +EQU ENCRYPT.ON$ TO \80\ +EQU DEMO.ENCRYPT$ TO \81\ +EQU ENCRYPT.KEY$ TO \504A4D\ + +* 08-10-16 rjc copied from Arev bp +* Source Date: 16:38:27 05 FEB 1988 Build ID: AREV*1.0.1 Level: 2.0 diff --git a/SYSPROG/STPROCINS/ENVIRON.CONSTANTS.txt b/SYSPROG/STPROCINS/ENVIRON.CONSTANTS.txt new file mode 100644 index 0000000..baec9d4 --- /dev/null +++ b/SYSPROG/STPROCINS/ENVIRON.CONSTANTS.txt @@ -0,0 +1,196 @@ +compile insert ENVIRON.CONSTANTS +* Positional definitions into @ENVIRON.SET variable +* Revision History: +* 05-11-94 janem PR-10468 +* 04/23/93 SLJ Added HR-specific positions 120 thru 130 +* 10/30/91 RKH Removed E.TIMEDATE.FMT (=91) as consequence of bug 5441 +* 03/12/90 bda Added E.SYS.DELIM.SUPPRESS - suppress entry of system delimiters chars in INPUT.CHAR +* 10/11/90 rkp added E.DET - name of display equivalence table +* 10/11/90 rkp added E.PRN.DRVS,E.PRN.LPTNO - printer driver support vars +* 09/21/90 bda Added E.LND.DEFAULT -language set default name +* 09/21/90 bda Added E.QUERY.CASE - query case sensitivity (true=case insensitive) +* 10/02/90 bda Added E.LND.LOAD - language set load list +* 10/02/90 bda Added E.TIMEDATE.FMT - TIMEDATE() format override +* 06/29/90 rkp - Added E.VIDTYPE for storing monitor type +* 06/21/90 rkp - Added E.MOUSE.ON & E.MOUSE.DEF +* 01/08/90 bda - Added E.NULL.DISPLAY.STRING for SQL display formatting. +* 09/18/89 RKP - Added E.MSTYLE for menu style +* E.PULLDOWN.NUMBERS for numbering options on pulldowns +* 09/14/89 PAT - Added E.NETCACHE.OPTION for using network cache options +* 08/16/89 RKP - Added E.INDEX.CODE, E.INDEX.CMD, E.POST.CHECK.CODE, +* E.POST.CHECK.CMD for background process hooks +* 08/10/89 RKP - Added E.SHADOWS.ON +* 07/31/89 hhw - Added E.EDIT.CASE +* 07-07-89 JPV - Added E.DEFAULT.DATA.VOL +* 06-08-89 JPV - Removing some of the variables I added. +* 05-17-89 JPV - Added E.DISABLE.LOCK.INT +* 03-09-89 JPV - Added Concurrency control variables +* 02-18-88 MEN - Added E.VIEW.MODE +* 01/19/88 MEN - Added E.QUERY.BOTTOM E.QUERY.CHAR, E.QUERY.SEL.CODE, E.QUERY.SEL.CMD +* 02/02/87 MEN - Removed some PAINT and color variables +* 01/02/87 MEN - Added E.LINE.WRAP, E.LINE.INDENT, E.LINE.INSERT +* 11/18/86 MEN - Changed E.APPL.MENU to E.INSERT.MODE and got rid of +* E.ALT.ENVIRON, E.BACK.ATR +* 10/15/86 MEN - Added E.TCL.OFF, E.MACROS.OFF, E.CAPTURE.OFF, E.BREAK.OFF +* E.SET.MACROS.OFF, E.SELECT.FLUSH.OFF, E.DOS.SORT.VOL +* 10-15-86 JAH - Added E.MENU +* 09/08/86 JAW - Added Backdrop attribute +* 08/22/86 NGM - Added @QUERY.DEPTH +* 08/21/86 NGM - Added @TYPEAHEAD +* +EQU E.INSERT.MODE TO 1 ;* 1=Put editor in insert mode. +EQU E.BACK.CHAR TO 2 ;* If present, print this as the background char. +EQU E.TCL.DEPTH TO 3 ;* Number of TCL stack items saved in memory +EQU E.TCL.SAVE TO 4 ;* If not null, the FILE where to save stack. + * The key will be 'COMMAND.STACK*':@USERNAME +EQU E.PORT TO 5 ;* Communications port information baud, etc. +EQU E.LOGON TO 6 ;* 'M' brings up Main Menu when LOGON, 'T' brings + * up TCL window, 'S' displays the SQL window +EQU E.BG.BACK.COLOR TO 7 ;* Only needed for Color sequences +EQU E.ROLLOUT TO 8 ;* If present, this is the DOS filename where + * memory is rolled out to. (Used by PCS command) + * (not used by OS/2) +EQU E.DEFAULT.STOPS TO 9 ;* MV list of words thrown out when indexing and + * Cross-reference +EQU DATA.TYPE.VERIFICATION TO 10 ;* Flag to require prompting of data types +EQU E.TAB.STOPS TO 11 ;* System Tab stops variable separated by @VM +EQU E.STATUS.ON TO 12 ;* 1 = If status lines are to be printed. +EQU E.STATUS.FORE.COLOR TO 13 ;* Color literal of status line. +EQU E.CRTHIGH TO 14 ;* Height of CRT +EQU E.CRTWIDE TO 15 ;* Width of CRT +EQU E.LPTRHIGH TO 16 ;* Height of PRINTER +EQU E.LPTRWIDE TO 17 ;* Width of PRINTER +EQU E.EDIT.CASE TO 18 ;* True for case-insensitive edit searches +EQU E.DISP.CHFILL TO 20 ;* Column Heading Fill Char to Display +EQU E.EDIT.ATR TO 21 ;* Edit attribute color when in PAINT. +EQU E.ROW.LIMIT TO 22 ;* Maximum number of rows in a PAINT window. +EQU E.VIRTUAL.LIMIT TO 23 ;* Virtual space limitation +EQU E.PRT.CHFILL TO 24 ;* Column Heading Fill Char to Printer +EQU E.DISP.CHUND TO 25 ;* Column Heading Underline Char to Display +EQU E.PRT.CHUND TO 26 ;* Column Heading Underline Char to Printer +EQU E.TYPEAHEAD TO 27 ;* Type ahead flag - 1 = allow type ahead + * 0 = type ahead disabled ("eat" extra chars) +EQU E.QUERY.DEPTH TO 28 ;* Number of queries that may be stored +EQU E.INDEX.TIME TO 29 ;* Seconds before call to background indexing + * process. A zero or null will not call + * processor. A one will tell the + * background process that the station is + * dedicated to index processing. +EQU E.BACKGRND.TIME TO 30 ;* Seconds between checks for index + * transactions when no transactions found. +EQU E.PLAYDELAY TO 31 ;* Hundreths of seconds between keystrokes + * during CAPTURE playback. +EQU E.BG.FORE.COLOR TO 32 ;* Color to use with E.BACK.CHAR above. +EQU E.DFLT.DICT TO 33 +EQU E.BEEPS TO 34 ;* Beeping messages if non-NULL. +EQU E.DFLT.BIND TO 35 ;* Default Dictionary Binding mode for Paint +EQU E.MESSAGE.TIME TO 36 ;* Default message time when 'T' type is used. +EQU E.MENU TO 37 ;* Default system menu for use by windows that don't have custom menus +EQU E.TCL.ON TO 38 ;* 1 = TCL window turned on from INPUT.CHAR +EQU E.ENABLE.MACRO.EXEC TO 39 ;* 1 = MACROS playback enabled. +EQU E.CAPTURE.ON TO 40 ;* 1 = KEY CAPTURE process enabled. +EQU E.ENABLE.MACRO.BUILD TO 41 ;* 1 = MACRO building enabled. +EQU E.SELECT.FLUSH.ON TO 42 ;* 1 = Flush Index Transactions BEFORE select. +EQU E.DOS.SORT.VOL TO 43 ;* The DOS volume where the temporary sort + * files will be built. If not specified then + * it uses the default drive. +EQU E.EDIT.SNAPSHOTS TO 44 ;* 1 = EDIT will take snapshots while exiting each edit session +EQU E.LINE.WRAP TO 45 ;* 1 = EDIT will auto wrap lines +EQU E.LINE.INDENT TO 46 ;* 1 = EDIT will auto indent lines +EQU E.LINE.INSERT TO 47 ;* 1 = EDIT will auto insert lines +EQU E.DEFAULT.MACRO TO 48 ;* Name of the macro to be loaded at logon +EQU E.SYS.MENU.POPUP TO 49 ;* 1 = Displays system menus on menu +EQU E.STATUS.BACK.COLOR TO 50 ;* status line background color +EQU E.DEFAULT.DATA.VOL TO 51 ;* Default data volume where files are + * created and some TCL commands such as LISTDICT are used +*EQU E.XX TO 52 ;* reserved +EQU E.SUPPRESS.NONNUMERIC TO 53 ;* Suppress nonnumeric error messages +EQU E.SUPPRESS.SYSTEM.MSGS TO 54 ;* Suppress system error messages +EQU E.QUERY.BOTTOM TO 55 ;* 1 = Prompt for all QUERY mode info in border +EQU E.QUERY.CHAR TO 56 ;* If present, print this as the QUERY mask character +EQU E.QUERY.SEL.CODE TO 57 ;* The CATALYST code used to display the QUERY SELECT window. +EQU E.QUERY.SEL.CMD TO 58 ;* The command used to display the QUERY SELECT window. +EQU E.VIEW.MODE TO 59 ;* 1 = R/LIST in View window; '' = Non-windowed RLIST +EQU E.VIEW.RLIST.CODE TO 60 ;* The CATALYST code for displaying the default R/LIST builder in View +EQU E.VIEW.RLIST.CMD TO 61 ;* The command associated with E.VIEW.RLIST.CODE +EQU E.HELP.LEVEL TO 62 ;* Help Level @HELP.LEVEL +EQU E.DESTRUCT.EDIT TO 63 ;* If Yes then editor will erase line when toggling is originated by first typed char +EQU E.FKEY.FGROUND TO 64 ;* Help level 1 & 2 status line function key foreground +EQU E.FKEY.BGROUND TO 65 ;* Help level 1 & 2 status line function key background + +* Concurrency Control variables +EQU E.TRANS.VOL TO 66 ;* Transaction volume name. Where the + * trans files and other lock files are + * stored. +EQU E.UNLOCK.ALL.COMMIT TO 67 ;* 1 = true - then UNLOCK ALL imposed at + * commit time. 0 = false - only logged + * locks are unlocked at commit time. +EQU E.DEADLOCK.CHECK TO 68 ;* Interval (in seconds) for checking + * deadlock after deadlock process has + * been started. +EQU E.LOCK.TIMEOUT TO 69 ;* Number of seconds before transaction + * times out in a wait situation +EQU E.CONSISTENCY.LEVEL TO 70 ;* Number (0-4) for locking consistency +EQU E.LOCKING.GOV TO 72 ;* Number of allowable locks from this + * workstation. +EQU E.AUTOTRANS TO 73 ;* Auto transaction start mode. + * (ON = 1 or OFF = 0) +EQU E.DISABLE.LOCK.INT TO 74 ;* If "Y" this will disable the [Esc] key + * interrupt for the user while waiting + * for a lock. +EQU E.DEADLOCK.POSTING TO 75 ;* Number of seconds before deadlock + * checking is begun and locks are posted. + +EQU E.SHADOWS.ON TO 76 ;* If true, borders are displayed with + * shadows. +* Background process equates +EQU E.INDEX.CODE TO 77 ;* Catalyst code for replace background + * process +EQU E.INDEX.CMD TO 78 ;* Catalyst command for replace background + * process +EQU E.POST.CHECK.CODE TO 79 ;* Catalyst code for post index check + * process +EQU E.POST.CHECK.CMD TO 80 ;* Catalyst command for post index check + * process +EQU E.NETCACHE.OPTION TO 81 ;* For network cache option +EQU E.MSTYLE TO 82 ;* menu style for WINUS +EQU E.PULLDOWN.NUMBERS TO 83 ;* BOOLEAN, number options on pulldowns +EQU E.NULL.DISPLAY.STRING TO 84 ;* String to represent NULL values in SQL + * report (display only). +EQU E.MOUSE.ON TO 85 ;* BOOLEAN, mouse enable switch +EQU E.MOUSE.DEF TO 86 ;* Key to record in SYSTEM file containing + * mouse definition record +EQU E.VIDTYPE TO 87 ;* Stores video card type +EQU E.LND.DEFAULT TO 88 ;* Active language set default name +EQU E.LND.LOAD TO 89 ;* List of language sets to load into memory +EQU E.QUERY.CASE TO 90 ;* query case sensitivity (true=case insensitive) +EQU E.PRN.DRVS TO 92 ;* List of printer drivers selected +EQU E.PRN.LPTNO TO 93 ;* Associated list of devices for redirection +EQU E.DET TO 94 ;* Name of display equivalence table to use +EQU E.SYS.DELIM.SUPPRESS TO 95 ;* BOOLEAN, suppress input of system + ;* delimiter characters ( >= CHAR(250)). True = suppress. +Equ E.User1 To 96 ;* Reserved for Users/Developers +Equ E.User2 To 97 ;* "" +Equ E.User3 To 98 ;* "" +Equ E.User4 To 99 ;* "" +Equ E.User5 To 100 ;* "" + +*** equates 120-130 are for the HR product *** + +equ e.pen.view.color to 120 ;* pending view color +equ e.custom.colors to 121 ;* suppress the the custom colors (1/0) +equ bchar$ to 122 ;* background character with all video + * attributes gets constructed in + * initialize +* these are set by initialize + +equ sr.vendor$ to 123 ;* vendor name (e.g., cdc, isi, rti) +equ sr.changes$ to 124 ;* changes flag (1/0) +equ sr.product$ to 125 ;* name of the product +equ sr.dflt.ac$ to 126 ;* default area code +equ sr.dflt.dt$ to 127 ;* default date +equ sr.hr_paycheck$ to 128 ;* hr-paycheck type (e.g. cdc, rti, etc.) +equ sr.pit_on$ to 129 ;* point in time flag +equ sr.clean_station$ to 130 ;* cleaned-up stationid + +* Source Date: 12:06:56 11 MAY 1994 Build ID: AREV*3.1.180 Level: 3.13 diff --git a/SYSPROG/STPROCINS/ENVIRON_CONSTANTS.txt b/SYSPROG/STPROCINS/ENVIRON_CONSTANTS.txt new file mode 100644 index 0000000..3229b4a --- /dev/null +++ b/SYSPROG/STPROCINS/ENVIRON_CONSTANTS.txt @@ -0,0 +1,219 @@ +compile insert environ_constants +/* + Amended Date Reason + ======= ==== ====== + Mr C 24 Jan 06 Added ENV_UNIQUE_STATION_ID$ + mtr 05-25-06 Added ENV_DFLT_RPT_SHADOW_TYPE$ + bzs 06-02-06 Added ENV_ODBC_CAT_ALL_TABLES$ + WER 07/06/06 Added ENV_EXCLUDE_FROM_REPORTS$ + spf 10/19/06 Added Equ ENV_DM_SORT_BY_DBID$ - Sort tables within the Database Manager Add by Database ID + RO 11/16/06 Added Equ EQU ENV_RELATIONAL_UPD_0$ - Update Zero Records when relational indexes are updated + bzs 02/07/07 Added ENV_SAVE_CONVERTED$ and ENV_CREATE_AREVUSER$ + bzs 07/23/08 Added ENV_DATE_FORMAT$ + mtr 08/25/08 Added ENV_B_DFLT_WIN_BACKCOLOR$ + Added ENV_WIN_BACKCOLOR_VALUES$ + Mr C 10/20/08 Added ENV_DEBUGGER_INTERCEPT_PROC$ + bzs 10/22/08 Changed ENV_DATE_FORMAT$ To ENV_LOCALE$ + bzs 02/24/09 Added ENV_OSWRITE$ + rjc 05/06/09 Added env_BTREE_FLUSH_ON$ + djh 01/27/17 Comment out focuscell equates + Mr C 25 Apr 19 Corrected comments for ENV_LOCALE$ +*/ + +*** Pointers into the environment constants variable for OpenEngine + +EQU ENVIRON_PREFIX$ TO "ENV_" ;* Prefix in sysenv for environment records + +EQU E.DEFAULT.DATA.VOL TO 1 ;* Default data volume where files are + * created and some TCL commands such as LISTDICT are used +EQU ENV_DEFAULT_DATA_VOL$ TO 1 + +EQU E.DOS.SORT.VOL TO 2 ;* The DOS volume where the temporary sort + * files will be built. If not specified then + * it uses the default drive. +EQU ENV_DOS_SORT_VOL$ TO 2 + +EQU E.TRANS.VOL TO 3 ;* Transaction volume name. Where the + * trans files and other lock files are + * stored. +EQU ENV_TRANS_VOL$ TO 3 + +EQU E.DEFAULT.STOPS TO 4 ;* MV list of words thrown out when indexing and + * Cross-reference +EQU ENV_DEFAULT_STOPS$ TO 4 + +EQU E.INDEX.TIME TO 5 ;* Seconds before call to background indexing + * process. A zero or null will not call + * processor. A one will tell the + * background process that the station is + * dedicated to index processing. +EQU ENV_INDEX_TIME$ TO 5 + +EQU E.SELECT.FLUSH.ON TO 6 ;* 1 = Flush Index Transactions BEFORE select. +EQU ENV_SELECT_FLUSH_ON$ TO 6 + +EQU E.UNLOCK.ALL.COMMIT TO 7 ;* 1 = true - then UNLOCK ALL imposed at + * commit time. 0 = false - only logged + * locks are unlocked at commit time. +EQU ENV_UNLOCK_ALL_COMMIT$ TO 7 + +EQU E.DEADLOCK.CHECK TO 8 ;* Interval (in seconds) for checking + * deadlock after deadlock process has + * been started. +EQU ENV_DEADLOCK_CHECK$ TO 8 + +EQU E.LOCK.TIMEOUT TO 9 ;* Number of seconds before transaction + * times out in a wait situation +EQU ENV_LOCK_TIMEOUT$ TO 9 + +EQU E.CONSISTENCY.LEVEL TO 10 ;* Number (0-4) for locking consistency + +EQU ENV_CONSISTENCY_LEVEL$ TO 10 + +EQU E.LOCKING.GOV TO 11 ;* Number of allowable locks from this + * workstation. +EQU ENV_LOCKING_GOV$ TO 11 + +EQU E.AUTOTRANS TO 12 ;* Auto transaction start mode. + * (ON = 1 or OFF = 0) for a lock. +EQU ENV_AUTOTRANS$ TO 12 + +EQU E.DEADLOCK.POSTING TO 13 ;* Number of seconds before deadlock + * checking is begun and locks are posted. +EQU ENV_DEADLOCK_POSTING$ TO 13 + +EQU E.NETCACHE.OPTION TO 14 ;* For network cache option +EQU ENV_NETCACHE_OPTION$ TO 14 + +EQU E.LND.DEFAULT TO 15 ;* Active language set default name +EQU ENV_LND_DEFAULT$ TO 15 + +EQU E.LND.LOAD TO 16 ;* List of language sets to load into memory +EQU ENV_LND_LOAD$ TO 16 + +EQU E.QUERY.CASE TO 17 ;* query case sensitivity (true=case insensitive) +EQU ENV_QUERY_CASE$ TO 17 + +EQU E.TIMEDATE.FMT TO 18 ;* TIMEDATE() override output format for + ;* system processes and for TIMEDATE( ) function. +EQU ENV_TIMEDATE_FMT$ TO 18 + +EQU E.SUPPRESS.NONNUMERIC TO 19 ;* Suppress nonnumeric error messages +EQU ENV_SUPPRESS_NONNUMERIC$ TO 19 + +EQU E.LPTRHIGH TO 20 ;* Height of PRINTER +EQU ENV_LPTRHIGH$ TO 20 + +EQU E.LPTRWIDE TO 21 ;* Width of PRINTER +EQU ENV_LPTRWIDE$ TO 21 + +EQU E.NULL.DISPLAY.STRING TO 22 ;* String to represent NULL values in SQL + * report (display only). +EQU ENV_NULL_DISPLAY_STRING$ TO 22 + +EQU ENV_DEBUGGER_ENABLED$ TO 23 ;* 1 - Debugger Enabled 0 - Debugger Disabled, 2- Debugger Intercepted To Debugger_Replacement + +EQU ENV_DEFAULT_FOLDER$ TO 24 ;* Default folder for stored procedures. + +EQU ENV_DEFAULT_IOCONV$ TO 25 ;* 0 - No conversion 1 - do convert and validate - with protect.mfs + +EQU ENV_COMMIT_VOL$ TO 26 ;* Commit volume + +EQU ENV_COMMIT_PROTECT$ TO 27 ;* 1 - Commit protected 0 - commit unprotected. + +EQU ENV_VICTIM_SELECT$ TO 28 ;* (NUMERIC) deadlock resolution victim selection mode. + +EQU ENV_IMPLICIT_LOCK_TYPE$ TO 29 ;* 0 - Table lock, 1 - Record lock + +EQU ENV_COORDINATED_LOCK$ TO 30 ;* 1 - Table/record locks coordinated. + +EQU ENV_ENTITY_LOG_CNT$ TO 31 ;* no. of logs each entity keeps + +EQU ENV_STARTUP_PROC$ TO 32 ;* Startup procedure called by INITIALIZE when starting + ;* an application (boot or change application time) + ;* Prototype: + ;* subroutine ...(FirstInitFlag, StationId) + ;* where + ;* FirstInitFlag -- TRUE$ for initial engine startup + ;* StationId -- set this parameter to modify @station + +EQU ENV_SHUTDOWN_PROC$ TO 33 ;* Shutdown procedure... Called by REVSHUTDOWNPROC when closing + ;* Prototype: + ;* subroutine ...(FirstInitFlag, StationId) + ;* where + ;* FirstInitFlag -- TRUE$ for initial engine startup + ;* StationId -- set this parameter to modify @station + +EQU ENV_CONCURRENCY_SCHEME$ TO 34 ;* used for SQL bond optimization + +EQU ENV_FILTER_TABLES_PROC$ TO 35 ;* custom security filter (primarily for ReportDesigner): + ;* Prototype: function ... (AllTableList) + ;* Returns: @fm delimited list of allowed tables +EQU ENV_FILTER_COLUMNS_PROC$ TO 36 ;* custom security filter (primarily for ReportDesigner): + ;* Prototype: function ... (TableName, AllColumnList) + ;* Returns: @fm delimited list of allowed columns + +EQU ENV_DATASOURCE_TYPE$ TO 37 ;* DataSource type (primarily used by XOInstance, DSInstance) + +EQU ENV_XO_DEFAULTS$ TO 38 ;* DataSet/Connection Object defaults + +EQU ENV_AREV_COMPAT_RTP9$ TO 39 ;* 1=Arev compatibility mode for RTP9 (Warning! Breaks Rev_SQL) + ;* 0=OpenInsight compatibility mode for RTP9 (default) + +EQU ENV_UNIQUE_STATION_ID$ TO 40 ;* 1=Append ProcessID to 'normal' @station + +EQU ENV_DFLT_RPT_SHADOW_TYPE$ TO 41 ;* Html Or rtf + +EQU ENV_ODBC_CAT_ALL_TABLES$ TO 42 ;* Override flag - display _all_ attached tables regardless of SQLTables qualifier + +EQU ENV_EXCLUDE_FROM_REPORTS$ To 43 ;* Exclude these tables from list of available tables for Report Builder reports + +EQU ENV_DFLT_OIPI_UOM$ TO 44 ;* Standard Or Metric + +Equ ENV_DM_SORT_BY_DBID$ To 45 ; * Sort tables within the Database Manager Add by Database ID + +EQU ENV_RELATIONAL_UPD_0$ To 46 ;* Update Zero Records when relational indexes are updated + +equ ENV_SAVE_CONVERTED$ TO 47 ;* 0 = Do not preserve precompiled source + ;* 1 = Save converted precompiled source in SYSLISTS (DEFAULT) + +equ ENV_CREATE_AREVUSER$ TO 48 ;* 0 = Creation of OI user does not create AREV32 user (DEFAULT) + ;* 1 = Creation of OI user creates AREV32 user +equ ENV_OIPI_SAVE_PATH$ TO 49 ;* Default Path for OIPI files (PDF,RTF,Etc) +equ ENV_EXCLUDE_FIELDS$ TO 50 ;* Fields to be excluded from reports in report builder +* bzs 102208 Equ ENV_DATE_FORMAT$ To 51 ;* 0=US/1=European/-1=Determine from Locale +Equ ENV_LOCALE$ To 51 ;* 0=None/1=LND/2=Determine from Windows Locale ;* bzs 102208 + +* mtr 8-25-08 + +Equ ENV_B_DFLT_WIN_BACKCOLOR$ To 52 ;* Boolean: Yes means show a default background color for all windows +Equ ENV_WIN_BACKCOLOR_VALUES$ to 53 ;* From color and to color, @Vm delimited + +equ ENV_DEBUGGER_INTERCEPT_PROC$ to 54 ; * // Name of an SSP to use for debugger intercepts. + ; * // Defaults to "debugger_replacement" + +Equ ENV_LANG_SET$ To 55 ;* The language set used by the system. It should be one of the lnd_ records in the sysenv table. + +Equ ENV_OSWRITE$ To 56 ;* BZS 022409 Flag to use new style in oswrite (always convert value to string) + +* 01/27/17 djh - Remove focuscell equates, not deleting so we can see what used to be in these fields +* mtr 3-13-09 glad I'm not triskadeccaphobic +/*Equ ENV_B_USE_FOCUSCELL$ To 57; * MTR Use the FocusCell settings +Equ env_FOCUSCELL_FONT$ To 58; * mtr font and related data to use in the edittable cell that has focus +Equ env_FOCUSCELL_FGCOLOR$ To 59; * foreground color for the edittable cell that has does not focus +Equ env_FOCUSCELL_BGCOLOR$ To 60; * background color for the edittable cell that has does not focus +Equ env_FOCUSCELL_SELECT_FGCOLOR$ To 61; * foreground color for the edittable cell that has focus +Equ env_FOCUSCELL_SELECT_BGCOLOR$ To 62; * background color for the edittable cell that has focus +Equ env_FOCUSCELL_RECTSTYLE$ To 63; * rectangle style for the edittable cell that has focus; 0=dotted, 1=solid +Equ env_FOCUSCELL_RECTWEIGHT$ to 64; * rectangle weight for the edittable cell that has focus; 0=light, 1=medium, 2=thick +Equ env_FOCUSCELL_RECTCOLOR$ To 65; * color of the rectangle*/ + +* rjc 5-06-09 Hexakosioihexekontahexaphobia is a Revelation problem +Equ env_BTREE_FLUSH_ON$ To 66; * true if btree.extract should flush indexes before query + +* mtr 7-29-10 +*Equ env_source_code_management$ To 67; * true means we will use the source code management routines +* WER 10/27/14 +Equ env_git_enabled$ To 67; * true means we will use the Git system + +Equ ENV_MSG_STYLESHEET$ To 68 ;* STYLESHEET To BE USED For ALL MESSAGES diff --git a/SYSPROG/STPROCINS/EVENT_SETUP.txt b/SYSPROG/STPROCINS/EVENT_SETUP.txt new file mode 100644 index 0000000..86f684c --- /dev/null +++ b/SYSPROG/STPROCINS/EVENT_SETUP.txt @@ -0,0 +1,99 @@ +Compile insert Event_Setup + +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Event_Setup + + Description : Declarations and equates used by the form event commuters. + + Notes : Event_Setup also populates several variables that will often be useful within event handler code. + + History : (Date, Initials, Notes) + 08/13/10 dmb Original programmer. + +***********************************************************************************************************************/ + +Declare function Get_Property, Set_Property, Get_Current_Event, Get_Window_ID, Get_Record + +// Return values to indicate how the event flow should continue. +Equ EVENT_STOP$ to 0 ; // Event flow should stop +Equ EVENT_CONTINUE$ to 1 ; // Event flow should continue until a later process changes this value +Equ EVENT_CONTINUE_NO_PROMOTED$ to 2 ; // Event flow should by-pass the promoted (generic) logic but allow the system event handler to execute +Equ EVENT_CONTINUE_NO_SYSTEM$ to 3 ; // Event flow should execute the promoted (generic) logic but stop the system event handler from executing +Equ EVENT_SYSTEM_ONLY$ to 4 ; // Event flow should execute the system event handler only (normal option for third-party windows running in FrameWorks) + +// Make sure any event parameters which have not been assigned are nulled. +If Assigned(CtrlEntId) else CtrlEntId = '' +If Assigned(Event) else Event = '' +If Assigned(Param1) else Param1 = '' +If Assigned(Param2) else Param2 = '' +If Assigned(Param3) else Param3 = '' +If Assigned(Param4) else Param4 = '' +If Assigned(Param5) else Param5 = '' +If Assigned(Param6) else Param6 = '' +If Assigned(Param7) else Param7 = '' +If Assigned(Param8) else Param8 = '' +If Assigned(Param9) else Param9 = '' +If Assigned(Param10) else Param10 = '' +If Assigned(Param11) else Param11 = '' +If Assigned(Param12) else Param12 = '' +If Assigned(Param13) else Param13 = '' +If Assigned(Param14) else Param14 = '' +If Assigned(Param15) else Param15 = '' + +// Get the design time name of the window in case this is a multi-instance window. +Window = @Window[1, 'F*'] + +MDIFrame = Get_Property(@Window, 'MDIFRAME') +Parent = Get_Property(@Window, 'PARENT') +If MDIFrame EQ '' then MDIFrame = Parent ; // Dialog boxes won't set the MDIFRAME property so use the PARENT property. + +// Always get the CtrlClassID since we are not passing it through the event parameters. +CtrlClassId = Get_Property(CtrlEntId, 'TYPE') + +// Get the name of the control on the window based on the CtrlClassId. +Begin Case + Case CtrlClassId EQ 'WINDOW' + Control = Window + Case CtrlClassId EQ 'RADIOBUTTON' + Control = Field(CtrlEntId, '.', 2, 2) + Case CtrlClassId EQ 'MENU' + Control = CtrlEntId[-1, 'B.'] + Case 1 + Control = Field(CtrlEntId, '.', 2, 1) +End Case + +// If this is an OLE control, get the ProgID. +ProgID = '' +If CtrlClassId EQ 'OLECONTROL' then ProgID = Get_Property(CtrlEntId, 'ORIG_TEXT') + +// Get the Event Type so generic event functionality can be executed properly. +EventType = Get_Current_Event() + +// Combine the event type and control into an event action. +If EventType EQ 'OLE' then + // Because the Promoted_Events function transfers parameters, this will only appear correctly in a commuter module. + EventAction = Event : '.' : Control +end else + EventAction = EventType : '.' : Control +end + +// Get the current window's key ID. Strip off the @SVM if this window is ignoring self-locks. +KeyID = Get_Property(@Window, 'ID')[1, 'F' : @SVM] + +// If KeyID is null then check to see if the key controls are populated. If so, then this is probably a locked record. +// ID properties are null with locked records. +If KeyID EQ '' then + KeyID = Get_Window_ID(@Window) +end + +// Get the current window's record. +Record = Get_Property(@Window, 'ATRECORD') + +// If the window uses QuickEvents to call the commuter module, check for @EVENT in the event parameter. This is here for +// backwards compatability. OpenInsight 7.1 and higher automatically swaps @EVENT with the actual event. Prior versions +// of OpenInsight will just pass the literal through. Therefore, this will swap out @EVENT with the actual event. +If Event EQ '@EVENT' then Swap '@EVENT' with EventType in Event diff --git a/SYSPROG/STPROCINS/EVERRORS.txt b/SYSPROG/STPROCINS/EVERRORS.txt new file mode 100644 index 0000000..c231ec2 --- /dev/null +++ b/SYSPROG/STPROCINS/EVERRORS.txt @@ -0,0 +1,107 @@ +compile insert EVERRORS +*---------------------------------------------------------------------------- +* +* +* OpenInsight Event Error codes for Set_EventStatus and Get_EventStatus +* +* December 14, 1993 +* +* +* EventErrors format: +* = : @fm : : @fm : ... +* = : @vm : : @vm : : @vm : ... +* +*---------------------------------------------------------------------------- +/* + Comments + ======== + + EV_RETVAL$ is a bit of a hack. Basically we tend to use some events as + though they were methods, and there's nothing we can really do about that + now, but the problem with that is there isn't any way to return a value + from Send_Event to the calling routine. + + So... what we've done is defined EV999 as a code you can use to denote + that the values following it are just data and are _NOT_ an error. As + you're limited to an @vm-delimited array you should really be passing + back lots of complex data. Internally @vm's are stored as @tm's on the + event stack when pushed there via Set_EventStatus so you should really + avoid returning anything containing system delimiters. + + What we really need is Get/Set_Property and Exec_Method to work against + a registered type or instance specific "commuter" module, and then we + can really implement custom properties and methods, but that's a story + for another day methinks... + + + Amended Date Reason + ====== ==== ====== + Mr C 01 Feb 21 Added EV_RESETSKERR$ + Mr C 14 Sep 16 Added EV_PROPVALERR$ + Mr C 29 Dec 14 Added EV_ERRVAL$ + Mr C 27 Dec 14 Added EV_DSNTESTRUNERROR$ + Mr C 19 Sep 14 Added EV_FDSBUILDERROR$ + Mr C 04 Sep 14 Added EV_FDSPARSEERROR$ + Added EV_RETVAL$ + Mr C 25 Feb 14 Added EV_DSNCREATERROR$ + Added EV_TPLCREATERROR$ + Added EV_INVALIDDSNPROP$ + Mr C 12 Nov 13 Added EV_NULLWINNAME$ + Mr C 29 Jul 13 Added EV_NULLPROCNAME$ + Mr C 21 Feb 06 Added EV_WINMSGVAL$ for returning a value to PS + during WINMSG processing. Note this uses the same + field in the event stack as event status error codes + so PS will not get a return value if Set_EventStatus + is used to return an error. +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _EVERRORS_ +#define _EVERRORS_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ EV_CODE$ to 1 + equ EV_ARGS$ to 2 + equ EV_PREFIX$ to "EV" + + equ EV_UNKNOWNERR$ to "EV100" ; * // Unknown Event Handler error + equ EV_REQUIREERR$ to "EV101" ; * // Required Error + equ EV_VALIDERR$ to "EV102" ; * // Validation Error + equ EV_FORMREADERR$ to "EV103" ; * // Form Read Error + equ EV_FORMREADSUBERR$ to "EV104" ; * // Form Read Sub Error + equ EV_NULLKEYERR$ to "EV105" ; * // Null Key Error + equ EV_NOLOCKERR$ to "EV106" ; * // Locking Error + equ EV_USERCANCEL$ to "EV107" ; * // User Cancel + equ EV_NULLPROCNAME$ to "EV108" ; * // Null procedure name + equ EV_INVALIDPROCNAME$ to "EV109" ; * // %1% is not a valid stored procedure name + equ EV_PARAMNOTALLOWED$ to "EV110" ; * // The %1% stored procedure does not accept parameters + equ EV_NULLWINNAME$ to "EV111" ; * // Null window name + equ EV_DSNCREATERROR$ to "EV112" ; * // DSN (IDE Designer) Create Error [%1%] + equ EV_TPLCREATERROR$ to "EV113" ; * // TPL (IDE ToolPanel) Create Error [%1%] + equ EV_INVALIDDSNPROP$ to "EV114" ; * // DSN (IDE Designer) PROPCHANGED validation error + equ EV_FDSPARSEERROR$ to "EV115" ; * // FDS (IDE FormDes) Parser Error [%1%] + equ EV_FDSBUILDERROR$ to "EV116" ; * // FDS (IDE FormDes) Builder Error [%1%] + equ EV_DSNWRITEERROR$ to "EV117" ; * // DSN (IDE Designer) Write error [%1%] + equ EV_DSNTESTRUNERROR$ to "EV118" ; * // DSN (IDE Designer) Test-Run error [%1%] + equ EV_PROPVALERR$ to "EV119" ; * // Invalid Property Value [%1%] + equ EV_QBFPARSEERR$ to "EV130" ; * // QBF Parser Error [%1%] + equ EV_QBFINITOFF$ to "EV132" ; * // Query By Form is not active + equ EV_QBFACTIVATELIST$ to "EV133" ; * // QBF saved list activation error [%1%] + equ EV_QBFINVALIDINDEX$ to "EV134" ; * // "%1%" is not a valid position in the QBF result list + equ EV_QBFINVALIDID$ to "EV135" ; * // "%1%" is not a valid ID in the QBF result list + equ EV_RESETSKERR$ to "EV136" ; * // Error resetting sequential key counter [%1%] + + equ EV_WINMSGVAL$ to "EV200" ; * Return WINMSG value to PS + + equ EV_ERRVAL$ to "EV998" ; * Returned error data to the calling proc (usually contains SSP error details) + equ EV_RETVAL$ to "EV999" ; * Return data to the calling proc - NOT an error!!! + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/FFS_EQUATES.txt b/SYSPROG/STPROCINS/FFS_EQUATES.txt new file mode 100644 index 0000000..a5bcc51 --- /dev/null +++ b/SYSPROG/STPROCINS/FFS_EQUATES.txt @@ -0,0 +1,53 @@ +compile insert FFS_EQUATES +/* + Copyright (c) 1992-2012 Revelation Software. All rights reserved. + + * This program is proprietary and is not to be used by or disclosed + * to others, nor is it to be copied without written permission from + * Revelation Technologies, Inc. + + Author ??? + Date ??? + Purpose Equates for use with the Fast Filing System (aka RTP65) + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 15 Oct 12 Moved from REV_BP + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _FFS_EQUATES_ +#define _FFS_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +EQU FFS_NO_ERR$ TO 0 +EQU FFS_TABLE_EXIST_ERR$ TO 1 +EQU FFS_TABLE_NOT_EXIST_ERR$ TO 2 +EQU FFS_TABLE_ALREADY_OPEN_ERR$ TO 3 +EQU FFS_REC_DNE_ERR$ TO 4 +EQU FFS_UNKNOWN_CODE$ TO 5 + + +EQU CREATE$ TO 0 +EQU OPEN$ TO 1 +EQU CLOSE$ TO 2 +EQU CLEAR$ TO 3 +EQU READ$ TO 4 +EQU WRITE$ TO 5 +EQU DELETE$ TO 6 + +EQU NEXT_METHOD$ TO 1 +EQU ARG_CNT$ TO 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/FILE.SYSTEM.EQUATES.txt b/SYSPROG/STPROCINS/FILE.SYSTEM.EQUATES.txt new file mode 100644 index 0000000..b94b63a --- /dev/null +++ b/SYSPROG/STPROCINS/FILE.SYSTEM.EQUATES.txt @@ -0,0 +1,56 @@ +compile insert FILE.SYSTEM.EQUATES +* Advanced Revelation filing system action codes. + +EQU READ.RECORD TO 1 +EQU READO.RECORD TO 2 +EQU WRITE.RECORD TO 3 +EQU DELETE.RECORD TO 4 +EQU LOCK.RECORD TO 5 +EQU UNLOCK.RECORD TO 6 + +EQU SELECT TO 7 +EQU READNEXT TO 8 +EQU CLEARSELECT TO 9 + +EQU CLEARFILE TO 10 +EQU OPEN.FILE TO 11 +EQU CREATE.FILE TO 12 +EQU RENAME.FILE TO 13 +EQU MOVE.FILE TO 14 +EQU DELETE.FILE TO 15 + +EQU OPEN.MEDIA TO 16 +EQU CREATE.MEDIA TO 17 +EQU READ.MEDIA TO 18 +EQU WRITE.MEDIA TO 19 + +EQU UNLOCK.ALL TO 20 +EQU FLUSH TO 21 +EQU INSTALL TO 22 + +*EQU RESERVED TO 23 +*EQU RESERVED TO 24 +*EQU RESERVED TO 25 + +EQU OMNI.SCRIPT TO 26 + * Following OMNI.SCRIPT sub-codes are passed in the FMC + EQU OMNIBUS_LIST$ TO 'GROUP_NUMBER' + EQU OMNIBUS_CALL$ TO 0 ;* Required + EQU SMART_TEST$ TO 1 ;* Required - returns 0 in FLAG if + * bond is NOT smart. Otherwise returns + * an intelligence factor in FLAG. + EQU SCRIPT_CALL$ TO 2 ;* Intelligent database language script + * for smart bonds only + EQU SCRIPT_OK_CALL$ TO 3 ;* For smart bonds only. If true then + * asynchronous processesing is used. + +EQU CLOSE.MEDIA TO 27 +EQU RECORD.COUNT TO 28 +EQU REMAKE.FILE TO 29 + +EQU CREATE.INDEX TO 30 +EQU DELETE.INDEX TO 31 +EQU UPDATE.INDEX TO 32 +EQU SELECT.INDEX TO 33 +EQU READNEXT.INDEX TO 34 +* Source Date: 16:41:43 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/FILE.SYSTEM.ONGOSUB.txt b/SYSPROG/STPROCINS/FILE.SYSTEM.ONGOSUB.txt new file mode 100644 index 0000000..bd34402 --- /dev/null +++ b/SYSPROG/STPROCINS/FILE.SYSTEM.ONGOSUB.txt @@ -0,0 +1,3 @@ +compile insert FILE.SYSTEM.ONGOSUB +ON CODE GOSUB READ.RECORD,READO.RECORD,WRITE.RECORD,DELETE.RECORD,LOCK.RECORD,UNLOCK.RECORD,SELECT,READNEXT,CLEARSELECT,CLEARFILE,OPEN.FILE,CREATE.FILE,RENAME.FILE,MOVE.FILE,DELETE.FILE,OPEN.MEDIA,CREATE.MEDIA,READ.MEDIA,WRITE.MEDIA,UNLOCK.ALL,FLUSH,INSTALL,RESERVED,RESERVED,RESERVED,OMNI.SCRIPT,CLOSE.MEDIA,RECORD.COUNT, REMAKE.FILE,CREATE.INDEX,DELETE.INDEX,UPDATE.INDEX,SELECT.INDEX,READNEXT.INDEX +* Source Date: 16:41:43 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/FILE.VOLUMES.EQUATES.txt b/SYSPROG/STPROCINS/FILE.VOLUMES.EQUATES.txt new file mode 100644 index 0000000..e471f36 --- /dev/null +++ b/SYSPROG/STPROCINS/FILE.VOLUMES.EQUATES.txt @@ -0,0 +1,10 @@ +Compile Insert FILE.VOLUMES.EQUATES +* +* This is the equate record for the VOLUMES file. + +EQU F.V.MEDIA.NAME$ TO 1 +EQU F.V.DATA.LOCATION$ TO 2 +EQU F.V.FILE.LIST$ TO 3 +EQU F.V.VOLUME.FS$ TO 4 +EQU F.V.MAP.HANDLE$ TO 5 +* Source Date: 12:25:33 12 OCT 1989 Build ID: AREV*1.13.126 Level: 2.0 diff --git a/SYSPROG/STPROCINS/FILE_FILES_EQUATES.txt b/SYSPROG/STPROCINS/FILE_FILES_EQUATES.txt new file mode 100644 index 0000000..d85d597 --- /dev/null +++ b/SYSPROG/STPROCINS/FILE_FILES_EQUATES.txt @@ -0,0 +1,13 @@ +Compile Insert File_Files_Equates +* +* +* This is the equate record for the FILES file. + +EQU F.F.VOLUME.NAME$ TO 1 +EQU F.F.REAL.NAME$ TO 2 +EQU F.F.ACCOUNT.NAME$ TO 3 +EQU F.F.FILING.SYSTEM$ TO 4 +EQU F.F.FILE.HANDLE$ TO 5 + + + diff --git a/SYSPROG/STPROCINS/FONT_EQUATES.txt b/SYSPROG/STPROCINS/FONT_EQUATES.txt new file mode 100644 index 0000000..f4250eb --- /dev/null +++ b/SYSPROG/STPROCINS/FONT_EQUATES.txt @@ -0,0 +1,59 @@ +compile insert font_Equates +/* + Author Mr C + Date August 2002 + Purpose General FONT equates + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ + + * // FONT property structure position equates + equ FONT_POS_FACENAME$ to 1 + equ FONT_POS_HEIGHT$ to 2 + equ FONT_POS_WEIGHT$ to 3 + equ FONT_POS_ITALIC$ to 4 + equ FONT_POS_UNDERLINE$ to 5 + equ FONT_POS_WIDTH$ to 6 + equ FONT_POS_CHARSET$ to 7 + equ FONT_POS_PITCHANDFAMILY$ to 8 + equ FONT_POS_STRIKEOUT$ to 9 + equ FONT_POS_OUTPRECISION$ to 10 + equ FONT_POS_CLIPPRECISION$ to 11 + equ FONT_POS_QUALITY$ to 12 + + * // CHARSET equates + equ ANSI_CHARSET$ to 0 + equ DEFAULT_CHARSET$ to 1 + equ SYMBOL_CHARSET$ to 2 + + * // LOGFONT struct equates ( for use with STRUCT_LOGFONT ) + equ LOGFONT_POS_HEIGHT$ to 1 + equ LOGFONT_POS_WIDTH$ to 2 + equ LOGFONT_POS_ESCAPEMENT$ to 3 + equ LOGFONT_POS_ORIENTATION$ to 4 + equ LOGFONT_POS_WEIGHT$ to 5 + equ LOGFONT_POS_ITALIC$ to 6 + equ LOGFONT_POS_UNDERLINE$ to 7 + equ LOGFONT_POS_STRIKEOUT$ to 8 + equ LOGFONT_POS_CHARSET$ to 9 + equ LOGFONT_POS_OUTPRECISION$ to 10 + equ LOGFONT_POS_CLIPPRECISION$ to 11 + equ LOGFONT_POS_QUALITY$ to 12 + equ LOGFONT_POS_PITCHANDFAMILY$ to 13 + equ LOGFONT_POS_FACENAME$ to 14 + + * // FONT stock objects ... + + equ OEM_FIXED_FONT$ to 10 + equ ANSI_FIXED_FONT$ to 11 + equ ANSI_VAR_FONT$ to 12 + equ SYSTEM_FONT$ to 13 + equ DEVICE_DEFAULT_FONT$ to 14 + equ DEFAULT_PALETTE$ to 15 + equ SYSTEM_FIXED_FONT$ to 0x10 + equ DEFAULT_GUI_FONT$ to 17 diff --git a/SYSPROG/STPROCINS/FONT_PARM.txt b/SYSPROG/STPROCINS/FONT_PARM.txt new file mode 100644 index 0000000..41929d9 --- /dev/null +++ b/SYSPROG/STPROCINS/FONT_PARM.txt @@ -0,0 +1,15 @@ +compile insert FONT_PARM + +* FONT PARMS + + +EQU F_NAME$ TO 1 +EQU F_POINTSIZE$ TO 2 +EQU F_JUST$ TO 3 +EQU F_BOLD$ TO 4 +EQU F_ITALICS$ TO 5 +EQU F_UNDERLINE$ TO 6 +EQU F_STRIKETHRU$ TO 7 +EQU F_FORECOLOR$ TO 8 +EQU F_ESCAPEMENT$ TO 9 + diff --git a/SYSPROG/STPROCINS/FOREIGN.SUBS.EQUATES.txt b/SYSPROG/STPROCINS/FOREIGN.SUBS.EQUATES.txt new file mode 100644 index 0000000..76082b1 --- /dev/null +++ b/SYSPROG/STPROCINS/FOREIGN.SUBS.EQUATES.txt @@ -0,0 +1,150 @@ +COmpile Insert Foreign.Subs.Equates +*>> +* FOREIGN.SUBS.EQUATES - equates for the subroutine handler supplied with +* bond. +* +* Each environmental bond may supply a subroutine handler as part of its +* bonding kit. This subroutine has a name of the form XXXX.SUBS, where +* 'XXXX' is the name of the bond (e.g. DBASE, ASCII, etc.). +*<< +! +! +* +* FOREIGN.SUBS command codes +* +* The first argument to the subroutine handler is a code which specifies +* the function to be performed: +* +EQU FBS.TYPE.EXPAND$ TO 1 +*>> +* FBS.TYPE.EXPAND$ - bond-specific fill-out of dictionary record. +* +* Syntax: +* $INSERT FOREIGN.SUBS.EQUATES +* CALL ____.SUBS(FBS.TYPE.EXPAND$, TYPE.ARGS, MAP.RECORD, FILE.ATTR +* DICT.RECORD, STATUS) +* +* Where: +* TYPE.ARGS - +* contains the fieldmark-separated argument values for the core +* generic type. Note that, for derived types, this may be different +* than the argument list which appears in the 'D.E.GENERIC.TYPE' +* field of 'DICT.RECORD'. +* MAP.RECORD - +* is the record from the type-mapping table which corresponds to the +* type mapping the user has (implicitly or explicitly) selected. +* FILE.ATTR - +* contains the bond-specific file attributes as returned by the +* associated bond-specific collector window. Each attribute value +* is separated by a fieldmark. The first field is reserved for +* specifying the "file type". If this argument is NULL, the default +* file attributes are to be assumed. +* DICT.RECORD - +* contains the dictionary record to be filled out. This may already +* have been partially filled out by the user and/or the generic type +* expansion routines. +* STATUS - +* +* Description: +* FBS.TYPE.EXPAND$ may be called by BOND.SUBS when it is using a type +* specification to fill out a dictionary record. The bond designer specifies +* which mappings require bond-specific manipulation of the dictionary record +* by setting a flag (BSTM.CALL.EDIT$) in the corresponding record in the +* type mappings file. +*<< +EQU FBS.MAP.FILENAME$ TO 2 +*>> +* FBS.MAP.FILENAME$ - Map filename into acceptable foreign filename. +* +* Syntax: +* $INSERT FOREIGN.SUBS.EQUATES +* CALL ____.SUBS(FBS.MAP.FILENAME$, NAME.IN, NAME.OUT, STATUS) +* +* Where: +* NAME.IN - +* Contains a filename to be validated for the foreign +* environment. +* NAME.OUT - +* Will contain a translated version of the input filename +* which would be acceptable to the foreign environment. If +* the input filename did not require any translation, then +* NAME.OUT will be set to NAME.IN. +* STATUS - +* '' - The input filename is acceptable to +* the foreign environment as is. +* FS_INVALID_FILENAME_ERR$ +* - The input file name cannot be directly +* represented in the foreign environment. +* Description: +* FBS.MAP.FILENAME$ can be used to map an Advanced Revelation +* filename into a foreign filename. It can also be used to +* determine the validity of a foreign filename. If the given +* filename is legal in the foreign environment, then it is +* returned and STATUS will be NULL. If not, the bond will return +* (in NAME.OUT) a similar filename which is legal and will set the +* status to FS_INVALID_FILENAME_ERR$ +*<< +EQU FBS.MAP.FIELDNAME$ TO 3 +*>> +* FBS.MAP.FIELDNAME$ - Map fieldname into acceptable foreign fieldname. +* +* Syntax: +* $INSERT FOREIGN.SUBS.EQUATES +* CALL ____.SUBS(FBS.MAP.FIELDNAME$, NAME.IN, NAME.OUT, STATUS) +* +* Where: +* NAME.IN - +* Contains a fieldname to be validated for the foreign +* environment. +* NAME.OUT - +* Will contain a translated version of the input fieldname +* which would be acceptable to the foreign environment. If +* the input fieldname did not require any translation, then +* NAME.OUT will be set to NAME.IN. +* STATUS - +* '' - The input fieldname is acceptable to +* the foreign environment as is. +* FS_INVALID_FIELDNAME_ERR$ +* - The input file name cannot be directly +* represented in the foreign environment. +* Description: +* FBS.MAP.FIELDNAME$ can be used to map an Advanced Revelation +* fieldname into a foreign fieldname. It can also be used to +* determine the validity of a foreign fieldname. If the given +* fieldname is legal in the foreign environment, then it is +* returned and STATUS will be NULL. If not, the bond will return +* (in NAME.OUT) a similar fieldname which is legal and will set the +* status to FS_INVALID_FIELDNAME_ERR$ +*<< +EQU FBS.SELECT.DERIVED$ TO 4 +*>> +* FBS.SELECT.DERIVED$ - Select which type this one is derived from. +* +* Syntax: +* $INSERT FOREIGN.SUBS.EQUATES +* CALL ____.SUBS(FBS.SELECT.DERIVED$, TYPE.NAME, TYPE.ARGS, +* SELECTED.TYPE, STATUS) +* +* Where: +* TYPE.NAME - +* is an input variable containing the name of a data type in +* TYPE_TABLE. +* TYPE.ARGS - +* is an input variable containing the arguments to the data type +* specified in TYPE.NAME. These arguments will be separated by +* field marks. +* SELECTED.TYPE - +* is an output variable containing a data type specification, +* including parameters, if any. +* STATUS - +* is either NULL if no error was encountered +* Description: +* FBS.SELECT.DERIVED$ is used to dynamically decide what data type +* a particular type is derived from. When the "Derived From" field of +* a TYPE_TABLE record contains the word "DYNAMIC", BOND.SUBS will call +* FOREIGN.SUBS with this function code in order to obtain a dynamically- +* generated value for the "Derived From" field. This value may contain +* insertable parameters (e.g. "%1%"). +* +*<< +* Source Date: 15:47:15 09 JAN 1991 Build ID: AREV*2.1.26 Level: 2.1 diff --git a/SYSPROG/STPROCINS/FSERRORS_0.txt b/SYSPROG/STPROCINS/FSERRORS_0.txt new file mode 100644 index 0000000..ad7ee6c --- /dev/null +++ b/SYSPROG/STPROCINS/FSERRORS_0.txt @@ -0,0 +1,126 @@ +compile insert FSERRORS_0 +*---------------------------------------------------------------------------- +* Block 0 - 99 +* +* Advanced Revelation System Logical Error codes +* +* June 2, 1989 + +* ALL ERRORS IN THIS EQUATE ARE LOGICAL LEVEL (STATUS = 0) +* ;* Description / Parameters +*---------------------------------------------------------------------------- +EQUATE FS_DATA_DOMAIN_ERR$ TO 10 +* Domain validation error of data / KEY +* FSDETAIL$ structure - +* allows for SQL - multiple tables +* := { @vm } +* := [ ] @svm @svm +* +* +* := { @svm } +* := [ ] @stm [ ] @tm +* { @tm } +* +* General Rules: +* 1. Either column name or column number or both must be +* present in . Column name is preferred. +* 2. If the error report is for a single table then may be +* Null. +* 3. For special case detail code 30 (too many fields), column name is null +* +* Notes: +* For a single table error report: +* CODE<1, 1, 1> = "" ;* NO TABLE NUMBER REQUIRED (VALUE OF 1 ACCEPTABLE) +* CODE<1, 1, 2> = RECID +* ERRS = FIELD(CODE, @SVM, 3, 32768) +* * where each err is the field name and/or number and a list of errcodes +* * delimited by text marks. +* +* Error codes for column (field) error detail. +EQUATE FSDOMAIN_NULL$ TO 1 ;* attempt to write null to non-null column +EQUATE FSDOMAIN_INPAT_DATA$ TO 2 ;* data doesn't conform to input pattern +EQUATE FSDOMAIN_INPAT_PATRN$ TO 3 ;* invalid input pattern +EQUATE FSDOMAIN_INPAT_PATRN2$ TO 4 ;* more invalid input patterns +EQUATE FSDOMAIN_ICONV_DATA$ TO 5 ;* invalid data for iconv pattern. +EQUATE FSDOMAIN_ICONV_PATRN$ TO 6 ;* invalid iconv pattern +EQUATE FSDOMAIN_OCONV_DATA$ TO 7 ;* invalid data for oconv pattern +EQUATE FSDOMAIN_OCONV_PATRN$ TO 8 ;* invalid oconv pattern +EQUATE FSDOMAIN_OCONV_PATRN2$ TO 9 +EQUATE FSDOMAIN_UNIQUE$ TO 10 ;* attempt to write duplicate data into unique non-key column +EQUATE FSDOMAIN_TEST_NAME$ TO 11 ;* system error - + +EQUATE FSDOMAIN_CHAR_TRUNC$ TO 20 ;* character string too long for fixed length field - data truncated. +EQUATE FSDOMAIN_TRAIL_BLANK_LOSS$ TO 21 ;* trailing blanks would be lost. +EQUATE FSDOMAIN_ILLEGAL_CHARS$ TO 22 ;* illegal characters cannot be stored in this field. +EQUATE FSDOMAIN_NUM_TOO_LARGE$ TO 23 ;* number is too large to be stored +EQUATE FSDOMAIN_NUM_TOO_SMALL$ TO 24 ;* number is too small (negative) to be stored +EQUATE FSDOMAIN_NUM_TOO_PRECISE$ TO 25 ;* number is too precise (decimal part) to be stored. + +EQUATE FSDOMAIN_TOOMANY_FLDS$ TO 30 ;* too many fields in record written + +*............................................................................ + +EQUATE FS_BAD_CONVERSION_NAME$ TO 11 ; * Protect.mfs (Column name in valid or does not require conversion / Label +EQUATE FS_REDUCTION_FAIL$ TO 12 ; * Protect.mfs (Record did not pass Reduction criteria) / KEY +EQUATE FS_IMPLICIT_LOCK_FAIL$ TO 13 ; * Protect.mfs could not aquire lock. / KEY +EQUATE FS_ACCESS_DENIED$ TO 14 ; * Logical access denied (usually due to lock activity) +*---------------------------------------------------------------------------- +* Meta-data logical I/O errors: +* +EQUATE FS_DICT_REDEFINE_ERR$ TO 50 +* The dictionary may not be modified (master fields) - Write (update or +* insert) or Delete operations are not valid while a file is not in +* DEFINING state. This is intended for bonds which have rigid file structures +* Parameters: Dictionary record KEY. +* +EQUATE FS_DICT_DOMAIN_ERR$ TO 51 +* Used for errors encounterd in explicit or implicit writes to dictionary. +* FSMSG parameter Dict record key. +* FSDETAIL structure: +* = { svm } +* = [ tm ] + +EQUATE FSDICT_MULTIKEY_ERR$ TO 1 ;* detail: none +* multi-part key not allowed + +EQUATE FSDICT_KEYTYPE_ERR$ TO 2 ;* detail: foreign type +* data type not legal for key field + +EQUATE FSDICT_MULTIVALUES_ERR$ TO 3 ;* detail: none +* multi-valued fields not supported. + +EQUATE FSDICT_DATA_TYPE_ERR$ TO 4 ;* detail: data type +* illegal data type for this field in foreign environment + +EQUATE FSDICT_FOREIGN_NAME_ERR$ TO 5 ;* detail: foreign name +* Specified foreign field name not legal in foreign environment + +EQUATE FSDICT_ATTRIBUTE_ERR$ TO 6 ;* detail: attribute value +* The specified attribute value is illegal in the foreign environment +* +*---------------------------------------------------------------------------- +* These errors may be returned on attempt to create data file or +* on OPEN when synchronizing dict with foreign file structure + +EQUATE FS_FOREIGN_FILENAME_ERR$ TO 52 +* Invalid Foreign File name fsmsg: file name, foreign name + +EQUATE FS_TOOMANY_FIELDS_ERR$ TO 53 +* max field count exceeded fsmsg: max supported, requested + +EQUATE FS_COL_CONTINUITY_ERR$ TO 54 +* field positions not contiguous (gaps) fsmsg: missing field position(s) + +EQUATE FS_NO_MASTERFIELDS_ERR$ TO 55 +* no Master fields defined + +EQUATE FS_NO_DICTFILE_ERR$ TO 56 +* Dictionary file does not exist + +EQUATE FS_DUP_COLNAME_ERR$ TO 57 +* Duplicate foreign field name detected fsmsg: colname, foreign name + +EQU FS_NAMECHANGED$ TO 60 ;* Dict.mfs changed the name for + * backward compatibility reasons. + +* Source Date: 16:41:44 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/FSERRORS_100.txt b/SYSPROG/STPROCINS/FSERRORS_100.txt new file mode 100644 index 0000000..9d52ae7 --- /dev/null +++ b/SYSPROG/STPROCINS/FSERRORS_100.txt @@ -0,0 +1,97 @@ +compile insert fserrors_100 +*---------------------------------------------------------------------------- +* Block 100 +* +* Advanced Revelation System BFS error codes. +* +* June 1, 1989 Begun +* July 11, 1989 Pat added error code 107 & 124 +* July 19, 1989 Pat added error code 109, 134 & 160 +* July 28, 1989 Pat added error code 150, 151 & 152 +* Aug. 2, 1989 Pat added error code 171, 172, 173, 174 ,175 & 176. +* Apr 9, 1990 MKI Added error codes 180 - 184 +* Oct 15, 1990 JED Added error codes 190 - 196 +* Oct 22, 1990 MKI Added error codes 185 - 189 +* Mar 09, 1998 cp Added error code 112 (from Swap_Database) +* STATUS ; params +EQUATE FS_REC_DNE$ TO 100 ;* 0 record does not exist on read or delete ; +EQUATE FS_WRITE_FILE_DNE$ TO 101 ;* 2 Write error: file does not exist / bad DOS name. +EQUATE FS_WRITE_READONLY$ TO 102 ;* 0 Write error: attempt to write to read-only file / access to file denied by DOS. +EQUATE FS_WRITE_VOL_FULL$ TO 103 ;* 1 Write error: disk volume full. +EQUATE FS_WRITE_ERR$ TO 104 ;* 2 Write error: nature unknown. +EQUATE FS_READ_FILE_DNE$ TO 105 ;* 1 Read error: file does not exist / bad DOS name. +EQUATE FS_READ_DENIED$ TO 106 ;* 1 Read error: OS denied access to file. +EQUATE FS_READ_ERR$ TO 107 ;* 2 Read error: nature unknown. + +EQUATE FS_INVALID_MAP_QUALIFIER$ TO 109 ;* 1 Invalid map qualifier ; map_qualifier +EQUATE FS_INVALID_MAP_HANDLE$ TO 110 ;* 1 Invalid map handle ; map_handle +EQUATE FS_READNEXT_DONE$ TO 111 ;* 0 Normal condition of termination of readnext. ; no paramters +EQUATE FS_SYS_CANNOT_INSTALL$ TO 112 +EQUATE FS_INSTALL_LH_ERR$ TO 113 ;* 2 Install error,used in RTP59 +EQUATE FS_INSTALL_MEM_RES_ERR$ TO 114 ;* 2 Used in RTP50 +EQUATE FS_INSTALL_VOLUME_ERR$ TO 115 ;* 2 Used in RTP50 +EQUATE FS_INSTALL_FILES_ERR$ TO 116 ;* 2 Used in RTP50 + +EQUATE FS_GFE_RETRY_ERR$ TO 124 ;* 2 Group format (lhread.c) error retry again to read next group but failed +EQUATE FS_GFE_REC_TRUNC$ TO 125 ;* 2 Group format error record truncated across frame boundaries. +EQUATE FS_GFE_LINK_ERR$ TO 126 ;* 2 Group format error wrong ov frame linked to group. +EQUATE FS_GFE_REC_TERM_ERR$ TO 127 ;* 2 Group format error no @fm term. record (possibly record length corrupted) +EQUATE FS_LHE_LNP_ERR$ TO 128 ;* 2 Linear Hash error (LNP incorrect due to modulo corruption) +EQUATE FS_LHE_GROUP_ERR$ TO 129 ;* 2 Linear Hash error (Group calculation error - CHECK_HASH) +EQUATE FS_NOT_IMPL$ TO 130 ;* 1 BFS code not implemented ; code ; BFS name +EQUATE FS_UNDEFINED_ERROR$ TO 133 ;* 2 Undefined OS error ; error code:@FM:filename:@VM:status() +EQUATE FS_OMNI_BFS$ TO 134 ;* 0 for basic query (un)intelligent BFS, used when FMC is 1, for conform to 2.0 error handling. +EQUATE FS_SERVER_ERR$ TO 135 ;* 0 Basic Server Bond ; Server name, Server error #, Script sent, other info ... + +EQUATE FS_TOOMANY_FIELDS$ TO 140 ;* 0 Unable to create file %1% ; too many fields +EQUATE FS_MISSING_FIELD$ TO 141 ;* 0 Field no. %2% is missing from the dictionary of file %1% +EQUATE FS_ILLEGAL_DATA$ TO 142 ;* 0 Illegal data writing record %2% on file %1% +EQUATE FS_MISSING_DICT$ TO 143 ;* 0 The dictionary is missing for file %1% +EQUATE FS_MISSING_RECORD$ TO 144 ;* 0 Record %2% is missing from file %1% +EQUATE FS_FILE_NOT_EXIST$ TO 145 ;* 0 File %1% doesn't exist +EQUATE FS_FILE_ALREADY_EXISTS$ TO 146 ;* 0 File %1% already exists +EQUATE FS_ILLEGAL_FILE_ATTRIBUTES$ TO 147 ;* 0 Illegal file attribute - unable to create file %1% +EQUATE FS_ILLEGAL_KEY$ TO 148 ;* 0 %2% is an illegal key for file %1% +EQUATE FS_FILE_DELETE_PROTECTED$ TO 149 ;* 1 File %1% is delete-protected +EQUATE FS_DOS_REC_TOO_LONG$ TO 150 ;* 1 %1% is too long to manipulate - used in OSREAD/WRITE. +EQUATE FS_ROS_REC_TOO_LONG$ TO 151 ;* 1 %1% is too long to manipulate - used in OSREAD/WRITE. +EQUATE FS_CONTROL_REC_TOO_LONG$ TO 152 ;* 1 %1% is too long maintain, usually used by %RECORDS%, %FIELD%. + +EQUATE FS_LH_MEM_ERR$ TO 160 ;* 2 Failed to allocate enough string space, string space format error. +EQUATE FS_LH_LOCK_TAB_OVERFLOW$ TO 161 ;* LH lock table overflow, rev_stop will be called. +EQUATE FS_WRITE_DENIED_LICENSING$ TO 162 ;* wRITE DENIED due to licensing restrictions + +* The following are for the INSTALL call to the underlying engine. They +* are mainly used in netid()* for each different fsnet module. Note that one +* can still continue session but no locking will be provided. +* Pat Aug. 2, 89 + +EQUATE FS_INSTALL_DOS_WRONG_VER$ TO 171 ;* 0 wrong DOS version (3.1 and above) to support network version AREV. +EQUATE FS_INSTALL_OPEN_LOCKFILE_FAILED$ TO 172 ;* 0 can not open REVBOOT for doing byte range locking x3dc0. +EQUATE FS_INSTALL_GET_MACHINE_NAME_FAILED$ TO 173 ;* 0 can't get name in int21 call x5e00 . +EQUATE FS_INSTALL_DRV_LOCAL_NO_CONFIG$ TO 174 ;* 0 used in byte range & banyan network, either no driver configured (BYN) int 60 x0A or drive is local x4409. +EQUATE FS_INSTALL_BYN_INT_TABLE_ENTRY_NULL$ TO 175 ;* 0 interrupt vector table is not loaded with addr available for banyan shell call. +EQUATE FS_INSTALL_NOVELL_LOG_STATION_NULL$ TO 176;* 0 return 0 means network is not active. + +* FS180 through FS184 are generated in the OS/2 network drivers. +EQUATE FS_INSTALL_NOVELL_NO_NET$ TO 180 ;* 0 not logged in or server inactive +EQUATE FS_INSTALL_NOVELL_NO_NET_NO_LOCKING$ TO 181 ;* 0 same as 180 plus no local locking +EQUATE FS_INSTALL_LANMAN_NO_LOCKING$ TO 182 ;* 0 no locking +EQUATE FS_INSTALL_LANMAN_NO_NET$ TO 183 ;* 0 no computername or no network +EQUATE FS_INSTALL_LANMAN_NO_NET_NO_LOCKING$ TO 184 ;* 182 and 183 combined + +* FS185 through FS188 are initialization errors for multitasking network drivers +EQUATE FS_INSTALL_LOCAL_ONLY_ERR$ TO 185 ;* Will only work locally +EQUATE FS_INSTALL_NO_LOCKFILE$ TO 186 ;* Lockfile not found +EQUATE FS_INSTALL_NO_STN_ID$ TO 187 ;* Station ID not found +EQUATE FS_INSTALL_NO_SHARE_EXE$ TO 188 ;* Share.exe not loaded +EQUATE FS_INSTALL_LOCALLOCKS_NOT_SUPPORTED$ TO 189 ;* local locking not supported + +EQUATE FS_INSTALL_BANYAN_NO_INT$ TO 190 ;* The Banyan VINES Service Interrupt was not found +EQUATE FS_INSTALL_BANYAN_NO_TSR$ TO 191 ;* The "BANCOM" TSR was not found +EQUATE FS_INSTALL_BANYAN_NO_STREETTALK$ TO 192 ;* The user's VINES StreetTalk name was not found +EQUATE FS_INSTALL_BANYAN_SOCK_ERR$ TO 193 ;* An error was encountered while opening the VINES Communications Socket +EQUATE FS_INSTALL_BANYAN_INIT_ERR$ TO 194 ;* An error was encountered while initializing the network driver +EQUATE FS_INSTALL_BANYAN_NO_SERVICES$ TO 195 ;* No lock services are connected +EQUATE FS_INSTALL_BANYAN_CONN_ERR$ TO 196 ;* An error was encountered while connecting the lock service for drive %1% + diff --git a/SYSPROG/STPROCINS/FSERRORS_200.txt b/SYSPROG/STPROCINS/FSERRORS_200.txt new file mode 100644 index 0000000..ebb542d --- /dev/null +++ b/SYSPROG/STPROCINS/FSERRORS_200.txt @@ -0,0 +1,68 @@ +compile insert FSERRORS_200 +* compile insert FSERRORS_200 +* Had to rem out the above line to prevent compile errors, RLP 6-7-94. +*---------------------------------------------------------------------------- +* Block 200 - 299 +* +* Advanced Revelation System GENERIC and MFS error codes +* +* STATUS DESCRIPTION ; MSG PARAMETERS +*---------------------------------------------------------------------------- +EQUATE FS_FILE_OPEN_ERR$ TO 200 ;* 1 Generic R/BASIC OPEN fail in MFS, or BFS or support module ; FILE NAME +EQUATE FS_ITEM_READ_ERR$ TO 201 ;* 1 Generic read fail of non-relational data item (control record etc.) ; FILE_NAME, RECORD ID +EQUATE FS_NO_ERROR_CODE$ TO 202 ;* No error code returned in @file.error; PARAMLINE1, PARAMLINE2 ;* +EQUATE FS_INDEX_OPEN_ERR$ TO 210 ;* 1 Cannot open !file (index file) associated with data file. ; Data File Name +EQUATE FS_INDEX_CORRUPT_ERR$ TO 211 ;* 2 Index is corrupted ; Filename, Indexname +EQUATE FS_INDEX_COMPILE_ERR$ TO 212 ;* 1 Index transaction code compilation error ; DATA FILE NAME +EQUATE FS_BTREE_READ_ERR$ TO 213 ;* 2 trouble reading leaf node from btree %1% handle, %2% leaf node name. +EQUATE FS_RELATIONAL_CORRUPT_ERR$ TO 214 ;* 2 !file corrupted - reinstall relationals ; Filename +EQUATE FS_QUICK_RHTDEX_CORR_ERR$ TO 215 ;* 0 %RECORDS% corrupted, will ask to do select/readnext to re-create it. %1% filename. +EQUATE FS_TRANS_ATTACH_ERR$ TO 216 ;* 0 BFS cannot be attached during a transaction +EQUATE FS_TRANS_DETACH_ERR$ TO 217 ;* 0 BFS cannot be detach during a transaction +EQUATE FS_INDEX_SELECT_ERR$ TO 218 ;* 1 Invalid index select - field not indexed or not capable. +EQUATE FS_INDEX_NOT_CREATED_ERR$ TO 219 ;* index not created, field, file name +EQUATE FS_REL_NEED_REBUILD_ERR$ TO 220 ;* relational index needs rebuilt; field_name. +EQUATE FS_INVALID_REL_SORT_METHOD$ TO 221 ;* 0 not BOT, TOP, AL .... method in relational index; field, sort method. + +EQUATE FS_LOW_MEM_ERR$ TO 250 ;* 0 memory shortage to compile ; Req. mem size, available mem size +EQUATE FS_META_COMPILE_ERR$ TO 251 ;* 1 Problems compiling meta code ; Source code name, Code location +EQUATE FS_BASIC_COMPILE_ERR$ TO 252 ;* 1 Problems compiling R/BASIC code ; Source Code, Code Location +EQUATE FS_CALCULATEX_ERR$ TO 253 ;* 1 Failed to evaluate dictionary field ; Dictionary field +EQUATE FS_FILENAME_ERR$ TO 254 ;* 1 Error formulating the filename given the handle ; File handle +EQUATE FS_CREATE_FILE_ERR$ TO 255 ;* 1 Problems trying to create a file; Filename +EQUATE FS_RENAME_TRANS_ERR$ TO 256 ;* 0 Renaming a file isn't allowed when transaction control is ON. ; +EQUATE FS_CREATE_TRANS_LOG_ERR$ TO 257;* Creation of transaction log file failed; FILENAME +EQUATE FS_RENAME_INDEX_ERR$ TO 258 ;* 0 Rename only DATA portion of an indexed file; FILE.NAME. +EQUATE FS_RENAME_REL_ERR$ TO 259 ;* 0 Rename indexed failed bec related file is not attached for updating FILE.NAME:@vm:RELATED.FILE. + +EQUATE FS_LOCK_LIMIT_ERR$ TO 260 ;* 2 Lock limit exceeded ; Lock limit +EQUATE FS_LOCK_SYNC_ERR$ TO 261 ;* 2 LOCK_INFO@ variable out of synch with SYS.LOCKS variable ; Lock filename, Lock record (if record lock) +EQUATE FS_LOCK_TIMEOUT_ERR$ TO 262 ;* 2 Timer ran out while waiting for a lock ; Lock Timer (in seconds) +EQUATE FS_LOCK_INT_ERR$ TO 263 ;* 2 User interrupted wait for lock; Lock filename, Lock record (if record lock) +EQUATE FS_DEADLOCK_ERR$ TO 264 ;* 2 General deadlock error ; Operation or procedure +EQUATE FS_VICTIM_ERR$ TO 265 ;* 2 Selected as a victim ; +EQUATE FS_RENAME_REL_ACCT_ERR$ TO 266 ;* 0 rename index file to different acct with relational index on it, FILE.NAME. +EQUATE FS_FIL_CPY_NO_D$ TO 267 ;* 0 file has rel index but doing copy without D opt; FILENAME +EQUATE FS_DELAY_UNLOCK$ TO 268 ;* 0 Delay UNLOCK. Used only w/PROTECT.MFS & RTP37 modules + +EQUATE FS_FLD_DNE_ERR$ TO 270 ;* 0 The field specified Does Not Exist - SELECT.INDEX ; FIELD.NAME +EQUATE FS_FLD_NOT_INDEXED_ERR$ TO 271 ;* 0 The field specified is not indexed - SELECT.INDEX ; FIELD.NAME + +EQUATE FS_INVALID_FILENAME_ERR$ TO 272 ;* 0 The filename %1% specified is invalid in the foreign env. +EQUATE FS_INVALID_FIELDNAME_ERR$ TO 273 ;* 0 The fieldname %1% specified is invalid in the foreign env. +EQUATE FS_FOREIGN_SYNC_ERROR$ TO 274 ;* 1 Unable to open %1% - dictionary is out of sync with %2 +EQUATE FS_REC_WRITE_PROTECT_ERR$ TO 275 ;* 0 Can't be modified, FILENAME:@VM:FIELDNAME +EQUATE FS_BAD_MFS_LIST$ TO 276 ;* 2 BFS list is not complete, code:@FM:bfs. +EQUATE FS_INVALID_RN_DIRECTION$ TO 277 ;* 1 %1 is an invalid direction code in SI.MFS readnext call +EQUATE FS_INVALID_RN_POINTER$ TO 278 ;* 1 no arg - readnext pointer is invalid. +EQUATE FS_REC_DELETE_PROTECT_ERR$ TO 279 ;* 0 Can't be deleted, FILENAME:@VM:FIELDNAME + +EQUATE FS_C_DATA_SEG_READ_ERR$ TO 280 ;* 'C' subroutine Data segment not found in file %1%, record %2%. +EQUATE FS_C_ENVIRONMENT_ERR$ TO 281 ;* Undefined 'C' environment error. Possibly not enough memory + +EQUATE FS_LANG_MISMATCH$ TO 290 ;* %1% lang used, %2% curr system setup; for quick/rightdex lang mismatch +EQUATE FS_LIST_OVERFLOW_ERR$ TO 291 ;* list over 64K in btree.sub. operations or RELATER routines +EQUATE FS_INVALID_BFS_TYPE_ERR$ TO 292 ;* wrong type for lhverify; bfs type +EQUATE FS_WRONG_PRODUCT$ TO 293 ;* Can't compile %1% in current product. +EQUATE FS_ERROR_LENGTH_ERR$ TO 294 ;* Error detail approaching 64k, process aborted. +* Source Date: 15:13:50 07 JUN 1994 Build ID: OI*3.0.11 Level: 3.0 diff --git a/SYSPROG/STPROCINS/FSERRORS_300.txt b/SYSPROG/STPROCINS/FSERRORS_300.txt new file mode 100644 index 0000000..bf5af86 --- /dev/null +++ b/SYSPROG/STPROCINS/FSERRORS_300.txt @@ -0,0 +1,51 @@ +compile insert FSERRORS_300 +*---------------------------------------------------------------------------- +* Block 300 - 399 +* +* Advanced Revelation System BOND.SUBS error codes. +* +* June 2, 1989 +* +* Beneath the equates for each error code are comments which document +* the values that will appear in the second field of the error status +* variable. +*---------------------------------------------------------------------------- + + +EQU FS_BS_CANT_OPEN$ TO 300 ;* 0 Can't open file ; name of file +EQU FS_BS_NTYPE$ TO 301 ;* 0 No such generic type defined ; the type name +EQU FS_BS_NCOMMA$ TO 302 ;* 0 Missing comma in type specification. ; text of type specification +EQU FS_BS_NQUOTE$ TO 303 ;* 0 Unbalanced quotation marks ; text of type specification , # of argument at fault +EQU FS_BS_NMAP$ TO 304 ;* 0 The specified bond did not supply a mapping for the specified generic type ; Bond name , Type name +EQU FS_BS_NFIELD.ATTR$ TO 305 ;* 0 The specified bond did not supply a collector window for foreign field attributes ; Bond name +EQU FS_BS_NFILE.ATTR$ TO 306 ;* 0 The specified bond did not supply a collector window for foreign file attributes ; Bond name +EQU FS_BS_BAD_ARG$ TO 307 ;* 0 Invalid argument(s) to BOND.SUBS. +EQU FS_BS_NTYPE_ARG$ TO 308 ;* 0 The type specification did not supply a required argument or supplied an invalid value for it ; type specification , arg# , mnemonic name for arg +EQU FS_BS_TYPE_REQUIRED$ TO 309 ;* 0 This BFS requires datatypes on dictionary records ; BFS name +EQU FS_BS_NVOL.ATTR$ TO 310 ;* 0 The specified bond did not supply a collector window for foreign file attributes ; Bond name +EQU FS_BS_NBOND.DERIVED$ TO 311 ;* 0 The specified bond does not contain code to dynamically derive this type. ; BFS name, data type +EQU FS_BS_NBOND.MAPPING$ TO 312 ;* 0 The specified bond does not contain code to dynamically select a mapping for this data type. ; BFS name, data type +EQU FS_BS_NSYNONYM$ TO 313 ;* 0 The synonym specified by this data type does not exist in TYPE_TABLE. ; data type, synonym +EQU FS_BS_NDERIVED$ TO 314 ;* 0 The type this data type is derived from does not exist in TYPE_TABLE. ; data type, derived type. +EQU FS_BS_WRONGMAP$ TO 315 ;* 0 The specified mapping name is not a mapping for this generic type. ; Bond name, type name, mapping name +EQU FS_BS_DECIMAL_PREC$ to 316 ;* 0 Decimal precision must be >= decimal scale. + +* 03-25-10 rjc DSBFS errors +Equ FS_DSBFS_LOGICAL$ To 330 ; * Ado returned errors after executing a cmd statement. ; list of errors + +* 09-06-11 bzs Encrypted Volume errors +Equ FS_XBFS_NO_VOLUME$ to 350 ;* Cannot read volume information from media record +Equ FS_XBFS_VOLUME_ERR$ to 351 ;* Invalid/Missing volume information +Equ FS_XBFS_VOLUME_EXISTS$ to 352 ;* Volume %1% already exists +Equ FS_XBFS_NO_MHANDLE$ TO 353 ;* Missing/invalid media handle +Equ FS_XBFS_CACHE_ERR$ TO 354 ;* Cache failure +Equ FS_XBFS_PERMS_ERR$ TO 355 ;* Insufficient permissions for requested action + +Equ FS_EBFS_SERVER_ERR$ TO 360 ;* The Encryption Server returned the following errors: %1% +Equ FS_EBFS_MISSING_PARAMS_ENCRYPT$ To 361 ;* Encryption parameters not specified for table %1%. +Equ FS_EBFS_MISSING_PARAMS_PASS$ To 362 ;* Invalid/missing passphrase information for volume. +Equ FS_EBFS_MISSING_PARAMS_GROUPS$ To 363 ;* Encryption group parameter not specified for table. +Equ FS_EBFS_ENCRYPT_FAILURE_CHECK$ To 364 ;* Encryption check value failure: %1% +Equ FS_EBFS_ENCRYPT_FAILURE_TABLE$ To 365 ;* Unable to encrypt table %1%: %2%. + +* Source Date: 16:41:46 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/FSERRORS_400.txt b/SYSPROG/STPROCINS/FSERRORS_400.txt new file mode 100644 index 0000000..2143f6f --- /dev/null +++ b/SYSPROG/STPROCINS/FSERRORS_400.txt @@ -0,0 +1,112 @@ +compile insert FSERRORS_400 +*---------------------------------------------------------------------------- +* Block 400 - 499 +* +* Advanced Revelation System and RTP error codes return as @FILE.ERRORS +* +* June 23, 1989 +* Updated 31 October, 2002. Happy Halloween! +* +* +* Amended Date Reason +* ======= ==== ====== +* Mr C 18 Sep 16 Suffixed LH_INVALID_FILE_VARIABLE with a "$" +* +* +* STATUS DESCRIPTION ; MSG PARAMETERS +*---------------------------------------------------------------------------- +EQU FS_SYS_INVALID_HANDLE$ TO 400 ;* 1 - Generic not valid or not open file handle ; ??? +EQU FS_SYS_NOT_ATTACHED$ TO 401 ;* 1 - Generic File is not attached ; FILENAME +EQU FS_SYS_LISTS_REC_DNE$ TO 402 ;* 1 - List in LISTS file does not exist ; Record key +EQU FS_SYS_FILE_VOL_SYNC$ TO 403 ;* 1 - A file is attached but the volume isn't ; Procedure name +EQU FS_SYS_SAME_VOL_ID$ TO 404 ;* 1 - Cannot attach volume, same volume ID ; Attempted volume, Volume already attached, Volume ID +EQU FS_SYS_REQUIRED_VOL_ERR$ TO 405 ;* 0 - Volume is required and cannot be attached ; Volume name + +EQU FS_SYS_INVALID_LOCKTYPE$ TO 410 ;* 2 - lock type not valid ; null +EQU FS_SYS_LOCKFILE_NF$ TO 411 ;* 1 - File specified not found in list of locked files. +EQU FS_SYS_LOCKREC_NF$ TO 412 ;* 1 - record specified not found in list of locked records +EQU FS_SYS_LOCKSEMA_NF$ TO 413 ;* 1 - semaphore not found in list of locked semaphores. +EQU FS_SYS_OWN_LOCK_ERR$ TO 414 ;* 1 - Unsuccessful lock - station's own lock ; No parameters. +EQU FS_SYS_LOCK_ERR$ TO 415 ;* 0 - Unsuccessful lock - other station's lock ; No parameters. + +EQU FS_SYS_INVALID_RN_DIR$ TO 420 ;* 1 - Readnext Direction Out of Range ; Direction Parameter +EQU FS_SYS_USER_ABORT$ TO 421 ;* 1 - User terminated action ; No parameters. + +EQU FS_SYS_DICT_MISMATCH$ TO 430 ;* 1 - Dictionary handle mismatch in SELECT ; Dict handle name TO not displayed). +EQU FS_SYS_NO_CURSORS$ TO 431 ;* 1 - Ran out of cursor handles ; No parameters. +EQU FS_SYS_LIST_ACTIVE_ERR$ TO 432 ;* 1 - Invalid LIST.ACTIVE value ; No parameters. +EQU FS_SYS_INVALID_FIELD$ TO 434 ;* 1 - Invalid field type in sort list ; Attempted field type. +EQU FS_SYS_CLEAR_CURS_ERR$ TO 435 ;* 1 - Cannot clear designated cursor ; No parameters. +EQU FS_SYS_BAD_CURSOR_VAL$ TO 436 ;* 1 - Invalid cursor value ; No parameters. +EQU FS_SYS_SORT_FIELD_ERR$ TO 437 ;* 1 - Invalid field names in sort expression ; List of invalid field names +EQU FS_SYS_MULTI_HANDLES_ERR$ TO 438 ;* 1 - Multiple handles in a SELECT ; Handle list (not displayed) +EQU FS_SYS_COL_QUAL_ERR$ TO 439 ;* 1 - Column qualifier error ; No Parameters. +EQU FS_SYS_SORT_MERGE_ERR$ TO 440 ;* 1 - Error merging a sort file ; No Parameters. +EQU FS_SYS_SORT_EXTRACT_ERR$ TO 441 ;* 1 - Error extracting a sort file ; No Parameters. +EQU FS_SYS_SORT_INIT_ERR$ TO 442 ;* 1 - Error initializing sort file ; No Parameters. +EQU FS_SYS_SORT_WRITE_ERR$ TO 443 ;* 1 - Error writing to sort file ; No Parameters. + +EQU FS_SYS_SORT_ERR_OVER$ TO 444 ;* 1 - List of logical errors in sort > 32K in length - abort. +EQU FS_IDX_SETS_ERROR$ TO 445 ;* 1 - Error codes returned from IDX_SETS +EQU FS_IDX_SETS_OUT_OF_MEM$ TO 446 ;* 1 - Out of memory error +EQU FS_IDX_SETS_FILE_IO$ TO 447 ;* 1 - Usually out of disk or bad sort path +EQU FS_IDX_SETS_FATAL_ERR$ TO 448 ;* 1 - Fatal internal idx_sets error +EQU FS_IDX_SETS_OUT_OF_HAND$ TO 449;* 1 - Out of Resources (handles/cursors). + +*--- +* MTR 10-31-02 +* Used by network products. Included for documentation purposes only. +*--- + +equ LH_CLIENT_INIT_PROTOCAL_ERR$ TO 450 +equ LH_CLIENT_OPEN_PROTOCAL_ERR$ TO 451 +equ LH_CLIENT_NO_NEAREST_SERVER$ TO 452 +equ LH_CLIENT_NO_TSR$ TO 453 +equ LH_CLIENT_INIT_ALLOCATION_ERR$ TO 454 +equ LH_CLIENT_GET_CANOCICAL_PATH_ERR$ TO 455 +equ LH_CLIENT_LOCAL_FILE_ERR$ TO 456 +equ LH_CLIENT_FILE_NAME_FORMAT_ERR$ TO 457 +equ LH_CLIENT_ALLOCATION_ERR$ TO 458 +equ LH_CLIENT_INVALID_FILE_HANDLE$ TO 459 +equ LH_CLIENT_INVALID_SERVER_HANDLE$ TO 460 +equ LH_CLIENT_GET_LOCAL_TARGET_ERR$ TO 461 +equ LH_CLIENT_NO_SERVER$ TO 462 +equ LH_CLIENT_TSR_TABLE_FULL$ TO 463 +equ LH_CLIENT_SEND_PACKET_ERR$ TO 464 +equ LH_CLIENT_RECEIVE_PACKET_ERR$ TO 465 +equ LH_CLIENT_NO_SERVER_RESPONSE$ TO 466 +equ LH_CLIENT_SERVER_TABLE_FULL$ TO 467 +equ LH_CLIENT_FILE_TABLE_FULL$ TO 468 +equ LH_DUPLICATE_SERVER_SERIAL_NUMBER$ TO 469 + +equ LH_SERVER_ALLOCATION_ERR$ TO 470 +equ LH_SERVER_PACKET_SIZE_ERR$ TO 471 +equ LH_SERVER_SET_CONNECTION_ERR$ TO 472 +equ LH_SERVER_SET_TASK_ERR$ TO 473 +equ LH_SERVER_NEXT_PACKET_ERR$ TO 474 + +// 477, 478 and 479 are used internally by AREV and OI network drivers. + +equ LH_NOT_INITIALIZED$ TO 480 +equ LH_FILE_OPEN_ERR$ TO 481 +equ LH_TEMP_ALLOCATION_ERR$ TO 482 +equ LH_FILE_CLOSE_ERR$ TO 483 +equ LH_VERSION1_ERR$ TO 484 +equ LH_INVALID_FILE_HANDLE$ TO 485 +equ LH_INVALID_FILE_VARIABLE$ TO 486 +equ LH_CONNECTION_SYNC_ERR$ TO 487 +equ LH_TASK_SYNC_ERR$ TO 488 +equ LH_LOCK_ALLOCATION_ERR$ TO 489 +equ LH_FILE_HANDLE_TABLE_FULL$ TO 490 +equ LH_FILE_VARIABLE_TABLE_FULL$ TO 491 +equ LH_VERSION_SYNCRONIZATION_ERR$ TO 492 + +equ LH_GFE_READ_FRAME_TYPE_ERR$ TO 493 +equ LH_GFE_WRITE_FRAME_TYPE_ERR$ TO 494 +equ LH_GFE_RECORD_IN_GROUP_ERR$ TO 495 + +equ LH_RECORD_SIZE_ERR$ TO 496 +equ LH_ID_GROUP_SIZE_ERR$ TO 497 + +EQU FS_EXTENDED_ERR$ TO 499 ;* 1 - Extended bfs error ; detail msg +* Source Date: 10:46:34 06 DEC 1993 Build ID: OI*2.01.8 Level: 2.01 diff --git a/SYSPROG/STPROCINS/FSERRORS_HDR.txt b/SYSPROG/STPROCINS/FSERRORS_HDR.txt new file mode 100644 index 0000000..b9a3f19 --- /dev/null +++ b/SYSPROG/STPROCINS/FSERRORS_HDR.txt @@ -0,0 +1,61 @@ +compile insert FSERRORS_HDR +*---------------------------------------------------------------------------- +* Advanced Revelation 2.0 Filing System Error reporting protocol +* June 1, 1989 +* Begun: Brad Anderson +* + +* 05/16/91 - JMC Added special user abort mode ([Esc] press). This +* is a setting for the STATUS() variable, not a message number + + +* Error conditions are to be returned by BFSs and MFSs in the @FILE.ERROR +* variable. Each error code has an associated severity level. +* If an error condition is encountered, the filing system code should set +* 1. @FILE.ERROR to the associated code and fill in the message and detail +* as appropriate +* 2. Set STATUS() to the associated severity level +* 3. Set the FLAG (7th argument) to FALSE$ to indicate an operational failure. +* +* If FLAG is set to false, then the operation is defined to have failed. +* It is important for the application to know that a WRITE or DELETE was +* in fact not performed. Setting FLAG to FALSE is not an appropriate protocol +* for communicating any non-failure (informational) condition from the +* filing system. +* +* "Core" error codes are blocked in groups of 100 and are integer codes. +* Block 0 - 99 is allocated for logical error reporting. +* Block 100 - 199 is allocated for Revelation system BFS error codes. +* Block 200 - 299 is allocated for Revelation system MFS error codes. +* Block 300 - 399 is allocated for BOND.SUBS errors +* Blcok 400 - 499 is allocated for System, RTP, and R/BASIC cursor errors +* +* Some codes are intrinsically specific to the function of a particular +* BFS or MFS. Others may be and should be generally applied to a variety +* of filing systems. For example, code 100 is the standard status return in +* case of an attempt to read or delete a record which does not exist. +* +* Block BS - Bond-subs - is allocated for codes associated with the BOND.SUBS +* routine. +* +* Every error code should have an associated message in the MESSAGES file. +* The ID of the message should be error code preceeded by "FS". +* For example, code 105 would have an associated message "FS105" +* If any parameters are to be passed to this message they should appear in +* the FSMSG field of @FILE.ERROR. This field may be multivalued. + +*---- FILING SYSTEM SEVERITY LEVEL CODES -------- +* Value of STATUS() on return from Filing System. +* +Equate Fs_Informational$ To -2 ;* @File.Error contain FYI info. +EQUATE FS_USER_ABORT$ TO -1 ;* The user pressed [Esc], SPECIAL! +EQUATE FSLOGICAL$ TO 0 ;* Data does not meet logical constraints +EQUATE FSPHYSICAL$ TO 1 ;* Structural or operational error (retryable) +EQUATE FSFATAL$ TO 2 ;* Structural or operational error (fatal) + +*---- FILE.ERROR FIELD STRUCTURE ------- +EQUATE FSCODE$ TO 1 ; * error or status code identifier +EQUATE FSMSG$ TO 2 ; * error message data +EQUATE FSDETAIL$ TO 3 ; * file system dependent detail data +EQUATE FS_PREFIX$ TO 'FS' ; * used by OE for set_status Pat Oct/04/91 +* Source Date: 16:41:47 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/GASGAUGE_EQUATES.txt b/SYSPROG/STPROCINS/GASGAUGE_EQUATES.txt new file mode 100644 index 0000000..a4f164f --- /dev/null +++ b/SYSPROG/STPROCINS/GASGAUGE_EQUATES.txt @@ -0,0 +1,54 @@ +compile insert gasgauge_equates + +***************************************************************************** +* +* Product : OI/WG +* Poject : OI/RDK +* Release : 3.0 +* +* Name : gasgauge_equates +* Description: Instructions and structure for GasGauge function +* +* History (Date, Initials, Notes) +* 11/14/95 vg Original programmer +* 10/09/96 bb Added labeled common to handle advanced dialog box +* +***************************************************************************** + +* Function Declares +declare function RDK_GasGauge ;* Flag = RDK_GasGauge(Instruction, Arg [, ArgList]) + +* positions into structure to pass to GG_EXECUTE$ +EQU GGPOS_TITLE$ TO 1 ;* window title +EQU GGPOS_GBLABEL$ TO 2 ;* group box label +EQU GGPOS_SECTIONCNT$ TO 3 ;* number of sections to progress through +EQU GGPOS_LABELLIST$ TO 4 ;* @vm delimited list of labels for each section (last is propagated) +EQU GGPOS_SECTIONLIST$ TO 5 ;* @vm delimited list of section names +EQU GGPOS_ALLOWSTOP$ TO 6 ;* boolean val specifying whether process can be halted +EQU GGPOS_CALLBACKFUNC$ TO 7 ;* function to call to do processing ( argument can be passed in ArgList ) + +* instructions +EQU GG_EXECUTE$ TO 1 ;* start Gas Gauge +EQU GG_GET$ TO 2 ;* get saved structure (Not implemented yet) +EQU GG_SAVE$ TO 3 ;* save structure (Not implemented yet) +EQU GG_SETPERCENT$ TO 4 ;* set bar and text to a percentage done state +EQU GG_SETLABEL$ TO 5 ;* set label (can be used when changing section) +EQU GG_SETMESSAGE$ TO 6 ;* set message text +EQU GG_SETSECTION$ TO 7 ;* Checks current section as done and marks next section as current one +EQU GG_SETFORECOLOR$ TO 8 ;* change from the default blue +EQU GG_SETBKCOLOR$ TO 9 ;* change from the default white +EQU GG_ISSTOPPED$ TO 10 ;* Returns true if stop or cancel have been pressed + +* 11-14 are reserved for future use + +* following equates are used by system +EQU GG_CREATE$ TO 15 +EQU GG_CLOSE$ TO 16 +EQU GG_START$ TO 17 + +* this is used for inter - procedureal variable storage +EQU AUX_LAYOUT$ TO "%%AUXIL_DIALOG_SETTINGS%%" + +* declare labeled common +Common //AUX_LAYOUT$// AuxPage@, AdvncSttns@, ErrDescr@ + diff --git a/SYSPROG/STPROCINS/GEC_COMMON.txt b/SYSPROG/STPROCINS/GEC_COMMON.txt new file mode 100644 index 0000000..33a3029 --- /dev/null +++ b/SYSPROG/STPROCINS/GEC_COMMON.txt @@ -0,0 +1,21 @@ +compile insert GEC_COMMON +COMMON /GEC_COMMON/ SCREEN_TABLE@, PRINTER_TABLE@, PRINTER_INFO@ +/* + SCREEN_TABLE@ contains the display equivalence table. + It is loaded by DEVICE_CONTROL from the DISPLAY_CONFIG + file, using the key indicated in @ENVIRON.SET + + PRINTER_TABLE@ is the printer driver table, used to convert + generic escape codes into device specific instructions. + It is loaded by DEVICE_CONTROL from the PRINTER_CONFIG + file, using the key indicated in + @ENVIRON.SET> + + PRINTER_INFO@ contains the following information: + field 1 - contains an integer indicating the + currently active printer. + field 2 - used to track open/closed status of + print job + +*/ +* Source Date: 09:26:07 14 NOV 1990 Build ID: AREV*2.0.110 Level: 2.1 diff --git a/SYSPROG/STPROCINS/GEC_CONSTANTS.txt b/SYSPROG/STPROCINS/GEC_CONSTANTS.txt new file mode 100644 index 0000000..d5d6843 --- /dev/null +++ b/SYSPROG/STPROCINS/GEC_CONSTANTS.txt @@ -0,0 +1,178 @@ +compile insert GEC_CONSTANTS +EQU NORMAL$ TO -11 +EQU REVERSE$ TO -12 +EQU HIGHLIGHT$ TO -13 +EQU BLINK$ TO -14 +EQU RBLINK$ TO -15 +EQU ULINE$ TO -16 +EQU BULINE$ TO -17 +EQU DBLUE$ TO -18 +EQU LBLUE$ TO -19 +EQU DCYAN$ TO -20 +EQU LCYAN$ TO -21 +EQU DGRN$ TO -22 +EQU LGRN$ TO -23 +EQU DYEL$ TO -24 +EQU LYEL$ TO -25 +EQU DRED$ TO -26 +EQU LRED$ TO -27 +EQU DMAG$ TO -28 +EQU LMAG$ TO -29 +EQU DGREY$ TO -30 +EQU LGREY$ TO -31 +EQU BLACK$ TO -32 +EQU WHITE$ TO -33 +EQU WOB$ TO -34 +EQU YOB$ TO -35 +EQU WOR$ TO -36 +EQU WOY$ TO -37 +EQU YOR$ TO -38 +EQU BOG$ TO -39 +EQU DBOG$ TO -40 +EQU ROG$ TO -41 +EQU WOBLK$ TO -42 +EQU GOBLK$ TO -43 +EQU YOBLK$ TO -44 + +EQU BOLDON$ TO -50 +EQU BOLDOFF$ TO -51 +EQU ITALON$ TO -52 +EQU ITALOFF$ TO -53 +EQU ULINEON$ TO -54 +EQU ULINEOFF$ TO -55 +EQU SUBSON$ TO -56 +EQU SUBSOFF$ TO -57 +EQU SUPSON$ TO -58 +EQU SUPSOFF$ TO -59 +EQU ENHON$ TO -60 +EQU ENHOFF$ TO -61 +EQU WIDEON$ TO -62 +EQU WIDEOFF$ TO -63 + + +EQU PRNINIT$ TO -70 +EQU PRELUDE$ TO -71 +EQU ENDOFJOB$ TO -72 + +EQU DRIVERON$ TO -80 +EQU DRIVEROFF$ TO -81 +EQU VIDDRVOFF$ TO -82 +EQU PRNDRVOFF$ TO -83 +EQU DRIVERINIT$ TO -84 +EQU FLUSHDRVINFO$ TO -85 + +EQU BEGINFONT1$ TO -90 +EQU ENDFONT1$ TO -91 +EQU BEGINFONT2$ TO -92 +EQU ENDFONT2$ TO -93 +EQU BEGINFONT3$ TO -94 +EQU ENDFONT3$ TO -95 +EQU BEGINFONT4$ TO -96 +EQU ENDFONT4$ TO -97 +EQU BEGINFONT5$ TO -98 +EQU ENDFONT5$ TO -99 +EQU BEGINFONT6$ TO -100 +EQU ENDFONT6$ TO -101 +EQU BEGINFONT7$ TO -102 +EQU ENDFONT7$ TO -103 +EQU BEGINFONT8$ TO -104 +EQU ENDFONT8$ TO -105 +EQU BEGINFONT9$ TO -106 +EQU ENDFONT9$ TO -107 +EQU BEGINFONT10$ TO -108 +EQU ENDFONT10$ TO -109 +EQU BEGINFONT11$ TO -110 +EQU ENDFONT11$ TO -111 +EQU BEGINFONT12$ TO -112 +EQU ENDFONT12$ TO -113 +EQU BEGINFONT13$ TO -114 +EQU ENDFONT13$ TO -115 +EQU BEGINFONT14$ TO -116 +EQU ENDFONT14$ TO -117 +EQU BEGINFONT15$ TO -118 +EQU ENDFONT15$ TO -119 +EQU BEGINFONT16$ TO -120 +EQU ENDFONT16$ TO -121 + +* driver functions, defined by third byte of generic escape sequence + +EQU SETCOLOR$ TO \35\ +EQU SETSTYLE$ TO \32\ +EQU RESETSTYLE$ TO \22\ +EQU PRNCTRL$ TO \10\ +EQU DRVCTRL$ TO \34\ +EQU BEGINFONT$ TO \31\ +EQU ENDFONT$ TO \21\ + +* The first field in the printer definition record in the PRINTER_CONFIG file +* is an mv field that is loaded with page width/height information. This +* information is loaded into @LPTRWIDE/HIGH if present. + +EQU PRINTER_XY$ TO 1 +EQU PX_VAL$ TO 2 +EQU PY_VAL$ TO 1 + +* These equates define the field layout of the screen_table and printer_table +* information that is stored in labeled common variables. +* The printer definition record is "shifted up" by +* PRINTER_TABLE_OFFSET$ after the PRINTER_XY$ field information is extracted. +* +* this is the format as it is loaded into memory by DRIVER_CONTROL. +* To access fields in the PRINTER_CONFIG records, simply add +* PRINTER_TABLE_OFFSET$ to the field equate +* example: colors = @record + +EQU PRINTER_TABLE_OFFSET$ TO 1 + +EQU SETCOLOR_FIELD$ TO 1 +EQU SETSTYLE_FIELD$ TO 2 +EQU RESETSTYLE_FIELD$ TO 3 +EQU PRNCTRL_FIELD$ TO 4 +EQU BEGINFONT_FIELD$ TO 5 +EQU ENDFONT_FIELD$ TO 6 +EQU FONTNAME_FIELD$ TO 7 +*-->11/01/90 rkp changed userrem_field$ from 8 to 9 to allow +* charwidthtable_field$ to occupy 8. +* also added PSHELL_CODES_FIELD$ and PSHELL_CMDS_FIELD$, +* PSHELL_BEGIN$ and PSHELL_END$ equates. +* +EQU CHARWIDTHTABLE_FIELD$ TO 8 +EQU USERREM_FIELD$ TO 9 +EQU PSHELL_CODES_FIELD$ TO 10 +EQU PSHELL_CMDS_FIELD$ TO 11 +*--> 12/13/91 SLJ - add for end-of-job form feed feature +EQU FORCE_FEED_FIELD$ TO 12 +* 04/13/07 BZS +EQU ORIENTATION$ TO 13 +* 11/13/07 BZS +EQU OIPI_FONT_REG$ TO 14 +EQU OIPI_FONT_SIZE_REG$ TO 15 +EQU OIPI_FONT_BOLD$ TO 16 +EQU OIPI_FONT_SIZE_BOLD$ TO 17 + +* The following two equates are indexes into values for the +* PSHELL_CODES_FIELD$ and PSHELL_CMDS_FIELD$ fields +EQU PSHELL_BEGIN$ TO 1 +EQU PSHELL_END$ TO 2 +*-->11/01/90 rkp + +* the following equate is used to associate classes of esc codes with +* an index to the field inwhich they are stored. +EQU DRVINDEX$ TO \353222103121000000\ + +* These equates are used for referencing fields in the GEC_COMMON variable +* printer_info@ +EQU PINFO_PNO$ TO 1 +EQU PINFO_PSTAT$ TO 2 +EQU PS_SPECIAL$ TO 3 + +* These equates are used for building popups +EQU STYLE_LITERAL$ TO "Bold,Italic,Underline,Subscript,Superscript,Enhanced,Wide" + +* Equate for error messages +EQU NOFONT_MSG$ TO "B820" +EQU NOPRNDEF$ TO "B821" +EQU PRNINITERR$ TO "B822" +EQU BADCOLOR$ TO "B823" +EQU OPENPRINTPROC$ TO "B825" +* Source Date: 13:53:13 03 MAY 1992 Build ID: AREV*2.2.5 Level: 2.2 diff --git a/SYSPROG/STPROCINS/GETENTITY_EQUATES.txt b/SYSPROG/STPROCINS/GETENTITY_EQUATES.txt new file mode 100644 index 0000000..0aaba5b --- /dev/null +++ b/SYSPROG/STPROCINS/GETENTITY_EQUATES.txt @@ -0,0 +1,67 @@ +compile insert GetEntity_Equates + +****************************************************************************** +* +* This program is proprietary and is not to be used by or disclosed +* to others, nor is it to be copied without written permission from +* Revelation Technologies, Inc. +* +* Product : OpenInsight for Workgroups +* Client : Revelation Software +* Version : 3.1 +* +* History : (date, initials, notes) +* 01/12/96 cp Re-doing +* 01/02/07 spf Add GE_OPT_HEADTEXT$ and GE_OPT_SUBHEADTEXT$ +****************************************************************************** + +declare function GetEntity +declare subroutine GetEntity + +* Item = GetEntity(Mode, TypeDesc, bFilter, Display, ItemLabel, ListLabel, DefaultSelection, DefaultType, Options) +* +* Parameters: +* +* Mode - specifies the mode of entry +* GE_MODE_OPEN$ +* GE_MODE_SAVE$ +* +* TypeDesc - @fm-delim'd array of human-readable selection criteria (filters), ie: "Messages" +* +* bFilter - @fm-delim'd array of bool (corresponding to TypeDesc), TRUE$ signifies that +* Display contains a "TYPE*CLASS" repository filter, FALSE$ signifies that +* Display contains an @vm-delim'd list of items to display +* +* Display - @fm-delim'd array of display information (corresponding to TypeDesc), each either +* a "TYPE*CLASS" repository filter or an @vm-delim'd list of items (see bFilter) +* +* ItemLabel - (optional) @fm-delim'd array of labels that replace "Entity Name:" (for filters) +* or "Item Name" (for lists) +* +* ListLabel - (optional) @fm-delim'd array of labels that replace "List Entities of Type:" (for +* filters) or "List Items of Type:" (for lists) +* +* DefaultItem - (optional) default item name, defaults to NULL +* +* DefaultType - (optional) index into TypeDesc, defaults to 1 +* +* Options - (optional) additional options +* GE_OPT_TITLE$ - text string to replace window default title ("Open" and "Save As") +* GE_OPT_HIDE_CHK$ - TRUE$ hides the "Show Inherited" checkbox +* +* Return value: +* +* Item - index:@fm:name, where the index specifies the filter/list number (position within +* TypeDesc) and the name is either a fully qualified entity id (if bFilter is +* TRUE$) or the item selected from the list + +* entry modes +equ GE_MODE_OPEN$ to 0 +equ GE_MODE_SAVE$ to 1 + +* additional options +equ GE_OPT_TITLE$ to 1 +equ GE_OPT_HIDE_CHK$ to 2 +Equ GE_OPT_HEADTEXT$ To 3 +Equ GE_OPT_SUBHEADTEXT$ To 4 + diff --git a/SYSPROG/STPROCINS/GET_LH_INFO_EQUATES.txt b/SYSPROG/STPROCINS/GET_LH_INFO_EQUATES.txt new file mode 100644 index 0000000..3a8b7c1 --- /dev/null +++ b/SYSPROG/STPROCINS/GET_LH_INFO_EQUATES.txt @@ -0,0 +1,50 @@ +compile insert get_LH_Info_Equates +/* + ** Copyright (C) 1992-12015 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote (Hackius Geniusus) + Date : Sept 2015 + Purpose : Equates for use Get_LH_Info function + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _GET_LH_INFO_EQUATES_ +#define _GET_LH_INFO_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function get_LH_Info + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Get_LH_Info return value positional equates + + equ GLHI_MODULO$ to 1 + equ GLHI_FRAME_SIZE$ to 2 + equ GLHI_PRIMARY_FRAME$ to 3 + equ GLHI_ROWCOUNT$ to 4 + equ GLHI_SIZELOCK$ to 5 + equ GLHI_THRESHOLD$ to 6 + equ GLHI_OSFILE$ to 7 + equ GHLI_FILEVERSION$ to 8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + + diff --git a/SYSPROG/STPROCINS/GLOBAL_COMMON.txt b/SYSPROG/STPROCINS/GLOBAL_COMMON.txt new file mode 100644 index 0000000..5568bc0 --- /dev/null +++ b/SYSPROG/STPROCINS/GLOBAL_COMMON.txt @@ -0,0 +1,19 @@ +compile Insert global_Common +* +* GLOBAL_COMMON Insert File +* +* Labeled common variable which holds global environment parameters. +* +* created 6/7/89 jpv + + +COMMON /%GLOBAL.ENV%/ GLOBAL.ENV@ + +EQU E.COMMIT.VOLUME$ TO 1 ;* Contains global commit volume +EQU E.COMMIT.PROT$ TO 2 ;* 1 = Yes, 0 = No +EQU E.VICTIM.SELECTION$ TO 3 ;* For deadlock situations. +EQU E.IMPLICIT.LOCKING$ TO 4 ;* 1 = Record locking, 0 = File locking +EQU E.COORD.LOCKING$ TO 5 ;* Automatic coordinated locking (on/off) + +EQU SYSTEM_RECORD$ TO "%GLOBAL_ENVIRONMENT%" ;* Record name in SYSTEM file where global constants are kept +* Source Date: 17:07:55 30 JUN 1992 Build ID: AREV*2.2.38 Level: 2.2 diff --git a/SYSPROG/STPROCINS/IDXSVR_EQUATES.txt b/SYSPROG/STPROCINS/IDXSVR_EQUATES.txt new file mode 100644 index 0000000..8e2f427 --- /dev/null +++ b/SYSPROG/STPROCINS/IDXSVR_EQUATES.txt @@ -0,0 +1,18 @@ +compile Insert idxsvr_equates +EQU MSG_IDX_ENGINE$ to 1126 ;* the message for the engine... (WM_USER + 0x66) + ;* (used to be 401 for the old engine) +EQU INDEX_SERVER_INFO$ to 1 ;* the wParam for turning on/off the index server + +EQU SERVER_OFF$ to 0 +EQU SERVER_ON$ to 1 +EQU SERVER_ON_UPDATE$ to 2 +EQU SERVER_FLUSH_INDEX_BEGIN$ to 3 +EQU SERVER_FLUSH_INDEX_END$ to 4 + +EQU IDXSVR_FLAG$ TO 1 +EQU IDXSVR_TOTAL_FILES$ TO 2 +EQU IDXSVR_CURR_FILE$ TO 3 +EQU IDXSVR_CURR_FIELD$ TO 4 +EQU IDXSVR_PROGRESS$ TO 5 +* RJC 02-21-15 COPY FROM REV_BP +* Source Date: 10:36:35 22 AUG 1996 Build ID: OI*3.1.64 Level: 3.1 diff --git a/SYSPROG/STPROCINS/IDX_SETS.EQU.txt b/SYSPROG/STPROCINS/IDX_SETS.EQU.txt new file mode 100644 index 0000000..75678dc --- /dev/null +++ b/SYSPROG/STPROCINS/IDX_SETS.EQU.txt @@ -0,0 +1,147 @@ +Compile Insert IDX_SETS.EQU +! +* $INSERT record for R/BASIC callers of the IDX_SETS function +* +* +* IDX_SETS is a function that performs union, intersection and difference +* of delimited sets of row data. The function has 9 calling modes that +* allow it to create, add data to, intersect, union, differnce, extract +* data from, and clear sets. The parameters for each calling mode are +* specific to the calling mode, but basically the use of IDX_SETS is: +* +* return_parm = IDX_SETS(mode, parm_1,...parm_n) +! +* MrC 06-20-16 Added header guards +* rjc 05-21-09 Copied to SYSPROCS +! +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _IDX_SETS_EQU_ +#define _IDX_SETS_EQU_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +! +* Calling modes +! +EQU INIT_SET$ TO 1 ;* Initializes a set returning a + * set_handle (a positive integer) or + * an error code (a negative integer). + * Parameters are: the data, the + * "specification", and the map + +EQU ADD_TO_SET$ TO 2 ;* Adds data to an existing set. Returns + * 0 on successful completion or an + * an error code (a negative integer). + * Parameters are: the data, and the + * handle of the set to add to + +EQU UNION_SETS$ TO 3 ;* Performs the union of two sets + * returning a set_handle (a positive + * integer) or an error code (a + * negative integer). + * Parameters are: the 1st handle, the + * 2nd handle, and the union spec + +EQU INTERSECT_SETS$ TO 4 ;* Performs the intersection of two + * sets returning a set_handle (a + * positive integer) or an error code + * (a negative integer). + * Parameters are: the 1st handle, the + * 2nd handle, and the intersect spec + +EQU DIFFERENCE_SETS$ TO 5 ;* Performs the difference of two + * sets returning a set_handle (a + * positive integer) or an error code + * (a negative integer). + * Parameters are: the 1st handle, the + * 2nd handle, and the intersect spec + +EQU RESET_EXTRACT$ TO 6 ;* Sets the extract parameters (restart + * the extract or set for desc. extract) + * Parameters are: the handle, and + * a reset specification + +EQU EXTRACT_FROM_SET$ TO 7 ;* Extracts row data from a set. Returns + * 1 if more data exists in the set, 0 + * if all data has been extracted, or + * an error code (a negative integer). + * Parameter is: the handle. A 3rd + * variable is passed, it is filled + * with data by Set_Lib on "no error". + +EQU SET_INFO$ TO 8 ;* Reports data about a set. + * Parameter is: the handle. Set_Lib + * returns the count of all rows in the + * 3rd variable, the count of index + * rows in the 4th variable and the + * MODEFLAGS variable from the handle + * in the 5th variable. + +EQU CLEAR_SET$ TO 9 ;* Clears a set_handle from the library's + * storage. Returns 0 always. + +! +* Error codes +! + +EQU ERR_BAD_MODE$ TO -1 ;* Returned if calling mode is not a + * positive integer >= 1 and <= 9. +EQU ERR_OUT_OF_HANDLES$ TO -2 ;* IDX_SETS supports up to 7 active sets. + * This error is returned when modes + * 1, 3, or 4 cannot create a necessary + * set. Clear and recall. +EQU ERR_BAD_MAP$ TO -3 ;* Returned by mode 1 when the map to a + * set is bad. +EQU ERR_BAD_SET_STR$ TO -4 ;* Returned by modes 1 and 2 when the + * set data passed is corrupt (missing + * a trailing record mark). +EQU ERR_FILE_IO$ TO -5 ;* Returned by modes 1, 2, 3, 4, and 5 + * if an error occurs in support file + * I/O. There is nothing you can do + * at this point but blow away the set + * and start again. The most common + * sources for this error are: 1) the + * user's sort path has become corrupt; + * and 2) the user is out of disk space. +EQU ERR_OUT_OF_MEM$ TO -6 ;* Returned by modes 1, 3, 4 or 5 when + * not enough memory for operation. +EQU ERR_BAD_HANDLE$ TO -7 ;* Returned by modes 2, 3, 4, 5 when a + * handle parameter is no good. +EQU ERR_BAD_SRC_HANDLE$ TO -8 ;* Returned by modes 2, 3, 4, 5 when a + * source handle parameter is no good. +EQU ERR_BAD_TGT_HANDLE$ TO -9 ;* Returned by modes 2, 3, 4, 5 when a + * target handle parameter is no good. + +EQU ERR_NULL_SET$ TO -20 ;* Currently not returned by Set_Lib but + * used by "wrap around" R/Basic code to + * indicate that the set is NULL (no rows + * match requested criteria). + + +EQU IS_MORE_ROWS$ TO 1 ;* Returned by extract when more rows + * exist in the set than can be returned + * by the current call to IDX_SETS. +EQU IS_NO_MORE_ROWS$ TO 0 ;* Returned by extract when all rows + * have been returned from the set. + +EQU IS_ERR_NONE$ TO 0 + +! +* Intialization specification equates +! +EQU IS_NULL_SPEC$ TO 0 ;* No user specification +EQU IS_SORTED$ TO 2 ;* User set string is already sorted +EQU IS_UNIQUE$ TO 4 ;* All set items in the user string are + * unique + +! +* Extraction specification equates +! +EQU IS_DESC_EXT$ TO 1 +EQU IS_RESET_EXT$ TO 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/IMPORT.ASCII.COMMON.txt b/SYSPROG/STPROCINS/IMPORT.ASCII.COMMON.txt new file mode 100644 index 0000000..5499c7e --- /dev/null +++ b/SYSPROG/STPROCINS/IMPORT.ASCII.COMMON.txt @@ -0,0 +1,4 @@ +compile insert import.ascii.common + +common /VARIABLE/ DOS_FILE_HANDLE, REV_FILE_HANDLE, WORK_REC, SAVE_ID, SAVE_DICT, skip_fields, dosrec, dos_filename, filelist, dosblock, trailer, dos_file_pointer, dosrec_len, dos_file, temp, slock, filesizes, process(24), fields_to_read, block_pointer, ascii_bytes_read, rec_read, index_info, field_cnt, begintime + diff --git a/SYSPROG/STPROCINS/IMPORTEQUATES.txt b/SYSPROG/STPROCINS/IMPORTEQUATES.txt new file mode 100644 index 0000000..8114a40 --- /dev/null +++ b/SYSPROG/STPROCINS/IMPORTEQUATES.txt @@ -0,0 +1,90 @@ +compile insert IMPORTEQUATES + +EQU COMMA$ TO \2C\ +EQU SPACE$ TO \20\ +EQU VERIFY$ TO -1 +EQU SINGLE_QUOTE$ TO \27\ +EQU DOUBLE_QUOTE$ TO \22\ +*EQU ESC$ TO @INT.CONST<1> +EQU SINGLE$ TO 2 +EQU MULTI$ TO 3 +EQU PUSH$ TO 4 +EQU POP$ TO 5 +EQU MAXLEN$ TO 65530 ;* Approx 64K +EQU REBUILD$ TO 2 ;* INDEX_TOGGLE rebuild flag +EQU FIXED_LEN_FIELD_POS$ TO 4 +* +* Import Field Array parameters. +* +EQU FMC$ TO 1 +EQU MV$ TO 2 +EQU APPEND$ TO 3 +EQU FIELD_START_BYTE$ TO 4 +EQU FIELD_LEN$ TO 5 +EQU SKIP_IF_DATA$ TO 6 + +/* Literal resources equates */ + +EQU RES_UNTITLED$ TO 5 +EQU RES_CAPTION$ TO 6 +EQU RES_FILTERS$ TO 7 +EQU RES_TYPETEXT$ TO 8 +EQU RES_DELIMREQ$ TO 9 +EQU RES_FILETYPEREQ$ TO 10 +EQU RES_NOOPTIONS$ TO 11 +EQU RES_COLREQ$ TO 12 +EQU RES_ERRORWRI$ TO 13 +EQU RES_ERROROPN$ TO 14 +EQU RES_QUITOK$ TO 15 +EQU RES_ERRORREAD$ TO 16 +EQU RES_PROCESSREQ$ TO 17 +EQU RES_FILEREQ$ TO 18 +EQU RES_TABLEREQ$ TO 19 +EQU RES_TOTALROWREQ$ TO 20 +EQU RES_PROCESSDNE$ TO 21 +EQU RES_NORECDELIM$ TO 22 +EQU RES_TABLEEXISTS$ TO 23 +EQU RES_TABLENOTAVAIL$ TO 24 +EQU RES_NOFILES$ TO 25 +EQU RES_PRESIZEOK$ TO 26 +EQU RES_OPNDOSFILE$ TO 27 +EQU RES_STARTBYTEREQ$ TO 28 +EQU RES_PROCFILES$ TO 29 +EQU RES_IMPORTLASTDONE$ TO 30 +EQU RES_CANCELIMPORT$ TO 31 +EQU RES_PROCESSCANCEL$ TO 32 +EQU RES_IMPORTCOMPLETE$ TO 33 +EQU RES_INVALIDDATA$ TO 34 + +/*-------------------------------------------------------------------------- + + dictionary field equates for file IMPORT.EXPORT + +--------------------------------------------------------------------------*/ + +EQU DOS_FILENAME$ TO 1 +EQU REV_FILENAME$ TO 2 +EQU FIELD_DELIMITER$ TO 3 +EQU RECORD_DELIMITER$ TO 4 +EQU EOF_DELIMITER$ TO 5 +EQU IMPORT_REC_LENGTH$ TO 6 +EQU FIELD_NAMES$ TO 7 +EQU START_BYTE$ TO 8 +EQU FIELD_LENGTH$ TO 9 +EQU CONVERSION$ TO 10 +EQU CLEARFILE_FLAG$ TO 11 +EQU RECORDS_IN_FILE$ TO 12 +EQU OBSERVE_QUOTES$ TO 13 +EQU PRESIZE_FLAG$ TO 14 +EQU MERGE_FLAG$ TO 15 +EQU MAKEDICT_FLAG$ TO 16 +EQU SUPPRESS_FLAG$ TO 17 +EQU ACTUAL_FLAG$ TO 18 +EQU HEADER_FLAG$ TO 19 +EQU TEXT_MARKER_FLAG$ TO 20 +EQU MAKEFILE_FLAG$ TO 21 +EQU INDEXING_FLAG$ TO 22 +EQU BATCH_FLAG$ TO 23 +EQU PROCESS_TYPE$ TO 24 +EQU LOCK_FLAG$ TO 25 +* Source Date: 10:56:09 18 OCT 1995 Build ID: OI*3.0.150 Level: 2.8 diff --git a/SYSPROG/STPROCINS/INDEXING.CONSTANTS.txt b/SYSPROG/STPROCINS/INDEXING.CONSTANTS.txt new file mode 100644 index 0000000..e4a1189 --- /dev/null +++ b/SYSPROG/STPROCINS/INDEXING.CONSTANTS.txt @@ -0,0 +1,16 @@ +compile Insert indexing.constants +*12-=0=15 rjc Import from Arev_bp +EQUATE IXFLD.XREF.ON$ TO 60 +EQUATE IXFLD.XREF.DELIM$ TO 61 +EQUATE IXFLD.XREF.STOP.LIST$ TO 62 +EQUATE IXFLD.XREF.STOP.MODE$ TO 63 +* +EQUATE IXFLD.REL.ON$ TO 64 +EQUATE IXFLD.REL.FIELD$ TO 65 +EQUATE IXFLD.REL.SORT.MODE$ TO 66 +EQUATE IXFLD.COMP.ON$ TO 67 +EQUATE IXFLD.FILE$ TO 68 +EQUATE IXFLD.FIELD$ TO 69 + +equate IXFLD.SPINDEX.ON$ to 70 +* Source Date: 12:39:16 10 MAY 1994 Build ID: AREV_HR*3.1.41 Level: 3.13 diff --git a/SYSPROG/STPROCINS/INET_EQUATES.txt b/SYSPROG/STPROCINS/INET_EQUATES.txt new file mode 100644 index 0000000..0249500 --- /dev/null +++ b/SYSPROG/STPROCINS/INET_EQUATES.txt @@ -0,0 +1,77 @@ +compile insert Inet_Equates + + +* CGI enviromental variables (see source\oinsight\c\oicgi\request.h) +equ QUERY_STRING$ to 1 +equ PATH_INFO$ to 2 +equ CONTENT_TYPE$ to 3 +equ CONTENT_LENGTH$ to 4 +equ GATEWAY_INTERFACE$ to 5 +equ HTTPS$ to 6 +equ HTTP_ACCEPT$ to 7 +equ HTTP_COOKIE$ to 8 +equ HTTP_FROM$ to 9 +equ HTTP_REFERER$ to 10 +equ HTTP_USER_AGENT$ to 11 +equ PATH_TRANSLATED$ to 12 +equ REMOTE_ADDR$ to 13 +equ REMOTE_HOST$ to 14 +equ REMOTE_IDENT$ to 15 +equ REMOTE_USER$ to 16 +equ REQUEST_METHOD$ to 17 +equ SCRIPT_NAME$ to 18 +equ SERVER_NAME$ to 19 +equ SERVER_PORT$ to 20 +equ SERVER_PROTOCOL$ to 21 +equ SERVER_SOFTWARE$ to 22 +equ SERVER_URL$ to 23 +equ NOURLDECODE$ to 24 ; * // Mr C, Added 7th November 2003 +equ RESPONSE_IS_BINARY$ to 25 ; * // Mr C, Added 15th March 2006 +Equ REGISTRY_SETTINGS$ To 26 ;* bzs 031706 + +* BZS 031813 Added for OECGI4+ +Equ OECGI_VERSION$ To 27 +Equ GET_STRING$ To 28 +Equ POST_STRING$ To 29 +Equ ADDITIONAL_VALUES_STRING$ TO 30 + +* BZS 042419 Added for encryption +Equ ENCODING_STRING$ To 31 + +* Gateway Services Monitor window name +equ GS_MONITOR$ to 'INET_GATEWAY' + +* OMNIEVENT calls +equ INCOMING$ to 'INCOMING' ;* Param1 = request +equ OUTCOMING$ to 'OUTCOMING' ;* Param1 = response +equ INPROGRESS$ to 'INPROGRESS' ;* Param1 = time left before timeout (in secs) + + +* persistent configuration information +equ CFG_TABLE$ to "SYSENV" +equ CFG_KEY$ to "CFG_INET" + +* fields in CFG_INET +equ CFG_CALLBACK$ to 1 +equ CFG_ERRTEXT$ to 2 +Equ CFG_DEFAULTS$ To 3 ;* bzs 061209 +Equ CFG_QUERYPARAM_FLAG$ To 4 ;* BZS 060311 +Equ CFG_INET_WHITELIST$ To 5 ;* bzs 061711 +Equ CFG_TYPE_COMPRESSION$ To 6 ;* bzs 042419 +Equ CFG_TYPE_COMPRESSION_DEFAULT$ To "deflate":@VM:"gzip" ;* bzs 042419 what we support, in the preferred order +Equ CFG_MIN_COMPRESSION$ To 7 ;* bzs 042419 +Equ CFG_MIN_COMPRESSION_DEFAULT$ To 1000 ;* bzs 042419 + +* values in CFG_INET +equ CFG_FN_SECURITY$ to 1 ;* a la INET_SECURITY +equ CFG_FN_FINALIZE$ to 2 ;* a la INET_FINALIZE +equ CFG_FN_ABORTED$ to 3 ;* errtext=() - called when an inet procedure has crashed and the gateway recovers +equ CFG_FN_WHITELIST$ to 4 ;* a la INET_WHITELIST +Equ CFG_FN_HANDLER$ To 5 ;* bzs 031517 RESTful processing routine, if applicable + +* values in CFG_INET (multiple lines @tm-delim'd) +equ CFG_ERR_NORESULT$ to 1 + +* bzs 061209 values in CFG_INET +Equ CFG_DEF_CGI$ To 1 ; * a la ".CGI" +Equ CFG_DEF_PAGE$ To 2 ; * a la "/login" diff --git a/SYSPROG/STPROCINS/INET_HEADERS.txt b/SYSPROG/STPROCINS/INET_HEADERS.txt new file mode 100644 index 0000000..523fe00 --- /dev/null +++ b/SYSPROG/STPROCINS/INET_HEADERS.txt @@ -0,0 +1,33 @@ +compile insert INET_HEADERS +COMMON /INET_HEADERS/ Inet_Header_Names%, Inet_Header_Values% + +Equ Inet_Header_Content_type$ To "Content-Type" +Equ Inet_Header_Cookie$ To "Set-Cookie" +Equ Inet_Header_Location$ To "Location" +Equ Inet_Header_Server$ To "Server" +Equ Inet_Header_Date$ To "Date" +Equ Inet_Header_Pragma$ To "Pragma" +Equ Inet_Header_Cache_Control$ To "Cache-Control" +Equ Inet_Header_Expires$ To "Expires" +Equ Inet_Header_Status$ To "Status" +Equ Inet_Header_Content_Encoding$ To "Content-Encoding" + +Equ inet_default_content_type$ To "text/html; charset=utf-8" +Equ inet_default_server$ To "OpenInsight" +Equ inet_default_status$ To "200" + +Equ inet_content_type_html$ To "text/html" +Equ inet_content_type_xml$ To "text/xml" +Equ inet_content_type_json$ To "application/json" +Equ inet_content_type_plain$ To "text/plain" +Equ inet_content_type_csv$ To "text/csv" +Equ inet_content_type_zip$ To "application/x-zip" +Equ inet_content_type_pdf$ To "application/pdf" +Equ inet_content_type_gif$ To "image/gif" +Equ inet_content_type_binary$ To "application/octet-stream" + +Equ inet_content_encoding_none$ to "identity" +Equ inet_content_encoding_gzip$ To "gzip" +Equ inet_content_encoding_deflate$ To "deflate" + +Declare Subroutine inetAPI_setContentType, inetAPI_setCookie, inetAPI_setRedirect, inetAPI_setStatus, inetAPI_setNoCache diff --git a/SYSPROG/STPROCINS/IX_MGMT_EQUATES.txt b/SYSPROG/STPROCINS/IX_MGMT_EQUATES.txt new file mode 100644 index 0000000..c5bf620 --- /dev/null +++ b/SYSPROG/STPROCINS/IX_MGMT_EQUATES.txt @@ -0,0 +1,62 @@ +compile Insert ix_mgmt_equates +/*----------------------------------------------------------------------------- +* EQUATES USED BY INDEX MANAGEMENT SSPs + MM-DD-YY initials Modification + 09-25-91 Pat first created + 12-14-09 mtr bitmap indexing + 02-22-15 rjc Created + 05-07-21 rjc Index rebuild / rebalance flags. +*----------------------------------------------------------------------------*/ + + + +* ----- generic index type constants +equ btree_index$ to "1" +equ crossref_index$ to "2" +equ relational_index$ to "3" +equ computed_index$ to "4" +* mtr 12-14-09 +equ bitmap_index$ to "5" + +equ symbolic_field$ to "S" +equ mv_field$ to "M" + +equ create_index_now$ to "1" +equ create_index_later$ to "0" + +equ index_on$ to "1" + + + +*---- Crossref index constant +equ xref_stop_default_mode$ to "1" +equ xref_stop_default_plus_mode$ to "2" +equ xref_stop_user_defined_mode$ to "3" +equ xref_go_list_mode$ to "4" +equ xref_append$ to "_XREF" +equ default_delimiter$ to "SPACE" + +*---- Relational index constant +equ relational_sort_top_mode$ to "1" +equ relational_sort_bot_mode$ to "2" +equ relational_sort_al_mode$ to "3" +equ relational_sort_ar_mode$ to "4" +equ relational_sort_dl_mode$ to "5" +equ relational_sort_dr_mode$ to "6" + +equ top_mode_script$ to "TOP" +equ bot_mode_script$ to "BOT" +equ al_mode_script$ to "AL" +equ ar_mode_script$ to "AR" +equ dl_mode_script$ to "DL" +equ dr_mode_script$ to "DR" + + +*---- Add rebuild / rebalance flags for UPDATE_INDEX + +Equ rebuild_flag_update$ To 0 +Equ rebuild_flag_rebuild$ To 1 +Equ rebuild_flag_rebalance_onupdates$ To 2 +Equ rebuild_flag_rebalance_always$ To 3 +Equ remake_index_Control$ To 4 +Equ recompile_index_calc$ To 5 diff --git a/SYSPROG/STPROCINS/IX_SELECT_CONSTANTS.txt b/SYSPROG/STPROCINS/IX_SELECT_CONSTANTS.txt new file mode 100644 index 0000000..5832d45 --- /dev/null +++ b/SYSPROG/STPROCINS/IX_SELECT_CONSTANTS.txt @@ -0,0 +1,47 @@ +Compile Insert ix_select_constants + +* Index predicate constants +* for index reduction logic. + +EQU OP.ALL$ TO 1 +EQU OP.DESC$ TO 2 +EQU OP.EQ$ TO 3 +EQU OP.NE$ TO 4 +EQU OP.LT$ TO 5 +EQU OP.LE$ TO 6 +EQU OP.GT$ TO 7 +EQU OP.GE$ TO 8 +EQU OP.START$ TO 9 +EQU OP.NOT.START$ TO 10 +EQU OP.END$ TO 11 +EQU OP.NOT.END$ TO 12 +EQU OP.CONTAIN$ TO 13 +EQU OP.NOT.CONTAIN$ TO 14 +EQU OP.FROM.TO$ TO 15 +EQU OP.NOT.FROM.TO$ TO 16 +EQU OP.MATCH$ TO 17 +EQU OP.NOT.MATCH$ TO 18 +EQU OP.LIKE$ TO 19 +EQU OP.NOT.LIKE$ TO 20 +EQU OP.NULL$ TO 21 +EQU OP.NOT.NULL$ TO 22 + +EQUATE IX_REDUCE$ TO 1 ;* SELECT TEST RETURN - REDUCTION FLAG +EQUATE IX_SORT$ TO 2 ;* SELECT TEST RETURN - SORT FLAG +EQUATE IX_FULLMAP$ TO 6 ;* SELECT TEST RETURN - FULL MAP POSSIBLE BY BFS + + +* PAT: adding all the constants used in the SI_REDUCTION +* field constant used for the FMC in SI_REDUCTION +EQU IND.VAL1$ TO 1 +EQU IND.VAL2$ TO 2 +EQU IND.OCONV$ TO 3 +EQU IND.CASE$ TO 4 +EQU KEY.POS$ TO 5 +EQU LIST.POS$ TO 6 +EQU IND.FIX$ TO 7 +EQU IND.MODE$ TO 8 +EQU FLD.JUST$ TO 9 ;* field is 'AR' or 'AL' justified Pat 10/5/90 +EQU BLK.SEARCH$ TO 10 ;* this is only used for type 1# mentioned in SI.MFS Pat 12/10/90 +EQU FIRST.TIME$ TO 11 +Equ BITMAP.FLAG$ TO 22 ; * rjc 02-16-10 set by SELECT.INDEX if Bitmap index diff --git a/SYSPROG/STPROCINS/LABELLED.COMMONS.txt b/SYSPROG/STPROCINS/LABELLED.COMMONS.txt new file mode 100644 index 0000000..a643c0b --- /dev/null +++ b/SYSPROG/STPROCINS/LABELLED.COMMONS.txt @@ -0,0 +1,49 @@ +Compile Insert labelled.commons + +* 08-10-16 rjc Copeid from Arev BP + +! +COMMON /KEY/ KEYS , EXEC.POINTER ,OLD.POINTER , PASSING ,TRANSFER.TO, LINKED.GROUPS, EXEC.GROUP, PUPD, PRIMARY, MODE.FLAG, WINDOW.ON, TRANSFER.POP +! +* KEYS array Equates +EQU K.VIDS$ TO 1 ;* Voc Id +EQU K.SCANS$ TO 2 ;* Function Key's Scan Codes +EQU K.KEYS$ TO 3 ;* Function Key's Name +EQU K.TEMPLATES$ TO 4 ;* Name of the Record in the associated K.STORAGE$ File. +EQU K.TITLES$ TO 5 ;* Title for the Template +EQU K.FILES$ TO 6 ;* Name of the File the Template Accesses +EQU K.PT.FILES$ TO 7 ;* Names of the files to pass the keys to +EQU K.STORAGE$ TO 8 ;* Name of the file where the template is stored. + +* PRIMARY array Equates +EQU P.FILES$ TO 1 ;* Files with Primary Data Entry Screens +EQU P.VIDS$ TO 2 ;* Voc Ids of the Primary Screens by file +EQU P.ACT.MSGS$ TO 3 ;* Action Messages +EQU P.ALT.MSGS$ TO 4 ;* Alternative Messages +EQU P.CORREX$ TO 5 ;* List Of screens with Correction Mode - No longer Used + +* LINKED.GROUPS array Equates +EQU LG.NAMES TO 1 ;* Names of the Link Groups +EQU LG.VIDS TO 2 ;* Lists of Voc Ids in Each Group in Order of Execution +* +EQU KEY.IX$ TO '@KEYS@' +EQU KEY.US$ TO "@KEYS.":@USERNAME:"@" +EQU PRI.IX$ TO '@PRIMARY@' +EQU LNK.IX$ TO '@LINK.GROUPS@' +EQU LNK.US$ TO '@LINK.GROUPS.':@USERNAME:'@' + +* EXEC.POINTER - Pointer to the position in the KEYS array for Executing Template +* OLD.POINTER - Pointer to the previos Template when transfering Betwwen Templates +* PASSING - Variable contains the key from the last screen +* TRANSFER.TO - If has a value when Program Terminates, the Value will get +* Executed - Actual Transfer Mechanism +* EXEC.GROUP - Link Group currently Active +* PUPD - if True - Permanent Update Mode is ON +* MODE.FLAG - if True - Corections Mode is ON +* WINDOW.ON - flag for MMI.MFS to indicate the call comes from a WINDOW +* TRANSFER.POP - A list constructed and cached in TRANSFER of the valid keys + +* Source Date : 09:08:02 13 DEC 1989 - User : PJM - Product : HR-1 +* Copy Date : 09:17:11 04 APR 1990 - User : AG - Product : HR-1 +* Copy Date : 16:03:30 06 MAY 1992 - User : AG - Product : - V6.00 +* Originally BP LABELLED.COMMONS -- Moved by V5.5 upgrade 20:48:12 18 NOV 1992 diff --git a/SYSPROG/STPROCINS/LCMENUS.txt b/SYSPROG/STPROCINS/LCMENUS.txt new file mode 100644 index 0000000..59c22aa --- /dev/null +++ b/SYSPROG/STPROCINS/LCMENUS.txt @@ -0,0 +1,4 @@ +compile Insert LCMENUS +COMMON /LCMENUS/ MENU.PTR, PREV.POS +* rjc 08-10-16 copied from Arev bp +* Source Date: 10:24:10 03 FEB 1988 Build ID: 1.0 Level: 2.0 diff --git a/SYSPROG/STPROCINS/LCPOSITIONS.txt b/SYSPROG/STPROCINS/LCPOSITIONS.txt new file mode 100644 index 0000000..754ec20 --- /dev/null +++ b/SYSPROG/STPROCINS/LCPOSITIONS.txt @@ -0,0 +1,71 @@ +compile insert LCPOSITIONS +* +* WINDOW prompt structure +* Each prompt will conform to the following structure +* +* +* prompt position required description +* ------ -------- -------- ------------------------------------- +EQU PNO TO 1 ;* Yes Relative position number. +EQU DICT TO 2 ;* No Dictionary field representing prompt. +EQU TYPE TO 3 ;* Yes Type of prompt (F=data field, S=symbolic, N=filename, D=dict filename). +EQU FNO TO 4 ;* Yes Dictionary field number (0=key). +EQU D TO 5 ;* No Display label/literal. +EQU DA TO 6 ;* No Display label's video attribute (color). If null, WINDOW will use current system attribute + ;* setting for application window (AW) labels. +EQU DX TO 7 ;* Yes Display label x/column location relative to the upper left corner of window. +EQU DY TO 8 ;* Yes Display label y/row location relative to upper left corner of window. +EQU VA TO 9 ;* No Prompt value's video attribute (color). If null, WINDOW will use current system attribute + ;* setting for application window (AW) prompts. +EQU VX TO 10 ;* Yes Prompt value x/column location relative to upper left window corner. +EQU VY TO 11 ;* Yes Prompt value y/row location relative to upper left window corner. +EQU VINP TO 12 ;* No Prompt value input validation. +EQU VOTP TO 13 ;* No Prompt value output format for display. +EQU VJST TO 14 ;* No Prompt value justification for display (if null then just = 'L') +EQU VLEN TO 15 ;* No Prompt value display length/width. +EQU VDEPTH TO 16 ;* No Prompt value display depth for multi-value and text fields with depth. + ;* (0=single value, 1=single line mult-value, 2+=multi-line multi-value). +EQU DFLT TO 17 ;* No Prompt value default fill-in value if user has a null entry. +EQU ET TO 18 ;* No Prompt value Entry type. (R=required, P=protected, F=fill, etc.) +EQU JOIN.FILE TO 19 ;* No Secondary file source for this prompt/field +EQU JOIN.KEY TO 20 ;* No Key used to access JOIN.FILE +EQU JOIN.FIELD TO 21 ;* No Field number to retrieve/update in joined record of JOIN.FILE +EQU LOCASE TO 22 ;* No Permit lower case characters (default = false). +EQU MASK TO 23 ;* No Editing mask. +EQU PRE.CODE TO 24 ;* No Process to occur prior to user data entry into current prompt. +EQU PRE.COMMAND TO 25 ;* No +EQU POST.CODE TO 26 ;* No Process to occur after the user has entered data into the current prompt. +EQU POST.COMMAND TO 27 ;* No +EQU OPTIONS.CODE TO 28 ;* No Options key code type. +EQU OPTIONS.COMMAND TO 29 ;* No Options key command to perform when Options key is pressed. +EQU DEP.MAX TO 30 ;* No Maximum depth for associated multi-value prompt sets. +EQU JOIN.DEPENDENTS TO 31 ;* No A list of prompts that are dependent on this JOIN key. +EQU PROMPT.TAB TO 32 ;* No Tab stop for moving more quickly between prompts. +EQU HELP.CODE TO 33 ;* No Detail help for this prompt. Can take the form of code-vm-command or + ;* a generated number for use with the help file. +EQU SLMV TO 34 ;* No Permit a single line multivalue +EQU AMV.GROUP TO 35 ;* No Associated multi-value group flag +EQU INVALID.CODE TO 36 ;* No Process to occur when data entered is invalid. +EQU INVALID.COMMAND TO 37 ;* No +EQU CHAR.CNT TO 38 ;* No Number of characters entered at a field. Zero + ;* or '' allow 64k to be entered +EQU SCRIBE.CODE TO 39 ;* No Process to occur instead of Scribe. +EQU SCRIBE.COMMAND TO 40 ;* No +EQU TX TO 41 ;* No X/column during Table mode +EQU TLEN TO 42 ;* No Length of prompt during Table mode +EQU HELP.COMMAND TO 43 ;* No Help catalyst commands where PROMPT.HELP is the catalyst code. +EQU JOIN.DELETE TO 44 ;* No Delete joined record from JOIN.FILE if primary record is deleted (yes/no) +EQU JOIN.CHANGE TO 45 ;* No If JOIN.KEY is changed, delete previous JOIN.KEY from JOIN.FILE (yes/no) +EQU THEAD TO 46 ;* No Table column heading (overrides prompt label) +EQU PREG1 TO 47 ;* No Prompt register1 +EQU PREG2 TO 48 ;* No Prompt register2 +EQU PREG3 TO 49 ;* No Prompt register3 +EQU PREG4 TO 50 ;* No Prompt register4 +EQU PREG5 TO 51 ;* No Prompt register5 +EQU HOMEXY TO 52 ;* No Virtual page mark +EQU HIDDEN.LABEL TO 53 ;* No Hidden label when only prompt entry is needed (no prompt label shown) +EQU GENERIC.TYPE TO 54 ;* No Generic Field Data Type (2.0+) +Equ TBFlag To 55 ;* Flag for table browser +Equ MDatafile.NO To 56 ;* Multiple table supporting value + +* Source Date: 07:58:41 05 APR 1993 Build ID: AREV*3.1.46 Level: 3.1 diff --git a/SYSPROG/STPROCINS/LH_STATISTICS_EQUATES.txt b/SYSPROG/STPROCINS/LH_STATISTICS_EQUATES.txt new file mode 100644 index 0000000..30cbeee --- /dev/null +++ b/SYSPROG/STPROCINS/LH_STATISTICS_EQUATES.txt @@ -0,0 +1,33 @@ +compile insert LH_STATISTICS_EQUATES +/*---------------------------------------- + Author : Table Create Insert Routine + Written : 24/02/2015 + Description : Insert for Table LH_STATISTICS +----------------------------------------*/ + + +Equ LH_STATISTICS_ACCOUNT$ To 0 +Equ LH_STATISTICS_LOCATION$ To 0 +Equ LH_STATISTICS_TABLE$ To 0 +Equ LH_STATISTICS_TIMESTAMP$ To 1 +Equ LH_STATISTICS_MODULO$ To 2 +Equ LH_STATISTICS_FRAMESIZE$ To 3 +Equ LH_STATISTICS_PCTFULL$ To 4 +Equ LH_STATISTICS_SIZELOCK$ To 5 +Equ LH_STATISTICS_THRESHOLD$ To 6 +Equ LH_STATISTICS_OSNAME$ To 7 +Equ LH_STATISTICS_SAMPLE_SIZE$ To 8 +Equ LH_STATISTICS_LK_SIZE$ To 9 +Equ LH_STATISTICS_OV_SIZE$ To 10 +Equ LH_STATISTICS_TOTAL_SIZE$ To 11 +Equ LH_STATISTICS_RATIO$ To 12 +Equ LH_STATISTICS_RECCOUNT$ To 13 +Equ LH_STATISTICS_AVG_SIZE$ To 14 +Equ LH_STATISTICS_MAX_BIN$ To 15 +Equ LH_STATISTICS_MEAN_BIN_COUNT$ To 16 +Equ LH_STATISTICS_MIN_BIN_COUNT$ To 17 +Equ LH_STATISTICS_MAX_BIN_COUNT$ To 18 +Equ LH_STATISTICS_MEDIAN_BIN_COUNT$ To 19 +Equ LH_STATISTICS_BIN_COUNT_SIGMA$ To 20 +Equ LH_STATISTICS_BIN_COUNTS$ To 21 +Equ LH_STATISTICS_ATTACHED_BY_APPLICATION$ To 22 diff --git a/SYSPROG/STPROCINS/LH_VERIFY_ERRORS.txt b/SYSPROG/STPROCINS/LH_VERIFY_ERRORS.txt new file mode 100644 index 0000000..ef62feb --- /dev/null +++ b/SYSPROG/STPROCINS/LH_VERIFY_ERRORS.txt @@ -0,0 +1,21 @@ +Compile Insert LH_Verify_Errors + +LH_Errors = '' +LH_Errors<1,1> = "Table could not be read." +Lh_errors<1,2> = "Framesize %1%; should be between 256 and 10000 bytes." +LH_Errors<1,3> = "Primary frame header type %1% is incorrect." +LH_errors<1,4> = "Table size %1%, framesize %3%, modulo %2%; table size/framesize <> modulo." +Lh_Errors<1,5> = "Overflow frame header type %1% is incorrect." +LH_errors<1,6> = "L, N and P hash computation error." +LH_errors<1,7> = "Row is in the wrong group." +LH_errors<1,8> = "Offset %4%, frame %3%, in %2% table; row terminator (char(255)) is missing." +LH_errors<1,9> = "Group %2% in overflow frame header (frame %1%) is not consistent with the current group." +LH_errors<1,10> = "Overflow frame %2%, boundary %1%; forward pointer points to a nonexistent position in the overflow file." +LH_errors<1,11> = "Overflow frame %1%, which holds the free frame list, is missing." +LH_Errors<1,12> = "Free frame list in frame %1% is not sorted." +LH_Errors<1,13> = "Offset %3%, frame %2% in %1% table; byte after end-of-group mark (EOG--CHAR(80)) is not null." +LH_errors<1,14> = "Frame %2% in %1% Table; forward/skip forward pointer(s) in the last frame of this group is not null." +LH_errors<1,17> = "Record Key exceeds maximum length" +* the above is used for LH_VERIFY utility, should be very descriptive (took from arev systext record) + + diff --git a/SYSPROG/STPROCINS/LND_EQUATES.txt b/SYSPROG/STPROCINS/LND_EQUATES.txt new file mode 100644 index 0000000..5231c7b --- /dev/null +++ b/SYSPROG/STPROCINS/LND_EQUATES.txt @@ -0,0 +1,29 @@ +compile insert LND_EQUATES +* Structure of LND records (by field) +EQU LND_NAME$ TO 1 ;* Descriptive name +EQU LND_SHORT_MONTHS$ TO 2 ;* @VM delimited month abbreviations (12) +EQU LND_FULL_MONTHS$ TO 3 ;* @VM delimited full month names (12) +EQU LND_AM$ TO 4 ;* Ante meridiem designator +EQU LND_PM$ TO 5 ;* Post meridiem designator +EQU LND_DBCR$ TO 6 ;* @VM delimited Debit-Credit designators +EQU LND_UC$ TO 7 ;* Upper Case character set +EQU LND_LC$ TO 8 ;* Lower Case character set +EQU LND_CONV$ TO 9 ;* @VM delimited I/OCONV conversions + +* Structure of LND_CONV$ (by value) +EQU LND_CONV_B$ TO 1 ;* Boolean conversion default +EQU LND_CONV_D$ TO 2 ;* Date conversion default +EQU LND_CONV_MT$ TO 3 ;* Time conversion default +EQU LND_CONV_DT$ TO 4 ;* DateTime conversion default +EQU LND_CONV_MO$ TO 5 ;* Money conversion default (in MD/MC format) +EQU LND_CONV_MS$ TO 6 ;* Masked Scientific conversion default +* bzs 102208 +EQU LND_CONV_D_SHORT$ TO 7 ;* Short date output code +EQU LND_CONV_MD_DECIMAL$ TO 8 ;* Character to use as decimal point +EQU LND_CONV_MD_1000$ TO 9 ;* Character to use as thousands delimiter +EQU LND_CONV_MD_CURRENCY$ TO 10 ;* Character to use for currency + +* Structure of LND_DBCR$ (by value) +EQU LND_DBCR_DB$ TO 2 ;* Debit designator +EQU LND_DBCR_CR$ TO 3 ;* Credit designator +* Source Date: 17:44:54 09 JUL 1992 Build ID: AREV*2.2.48 Level: 2.2 diff --git a/SYSPROG/STPROCINS/LOGICAL.txt b/SYSPROG/STPROCINS/LOGICAL.txt new file mode 100644 index 0000000..657b1d1 --- /dev/null +++ b/SYSPROG/STPROCINS/LOGICAL.txt @@ -0,0 +1,29 @@ +compile insert Logical +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Amended Date Reason + ======= ==== ====== + Mr C 18 Sept 12 Added header guards so this insert can be nested. + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#IFNDEF _LOGICAL_ +#DEFINE _LOGICAL_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ OTHERWISE$ to 1 + equ TRUE$ to 1 + equ FALSE$ to 0 + equ YES$ to 1 + equ NO$ to 0 + Equ NULL$ to "" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ENDIF +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/LOGON32_EQUATES.txt b/SYSPROG/STPROCINS/LOGON32_EQUATES.txt new file mode 100644 index 0000000..418adf7 --- /dev/null +++ b/SYSPROG/STPROCINS/LOGON32_EQUATES.txt @@ -0,0 +1,57 @@ +Compile insert Logon32_Equates + +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Logon32_Equates + + Description : Used with the LogonUser Windows API function. + + Notes : The LogonUser function has been prototyped as SRP_LogonUser. See DLL_ADVAPI32_SRP. + + History : (Date, Initials, Notes) + 01/25/13 dmb Original programmer. - [FRWOI-6] + +***********************************************************************************************************************/ + +// This logon type is intended for users who will be interactively using the computer, such as a user being logged on +// by a terminal server, remote shell, or similar process. +// This logon type has the additional expense of caching logon information for disconnected operations; +// therefore, it is inappropriate for some client/server applications, +// such as a mail server. +Equ LOGON32_LOGON_INTERACTIVE$ to 2 +// This logon type is intended for high performance servers to authenticate plaintext passwords. +// The LogonUser function does not cache credentials for this logon type. +Equ LOGON32_LOGON_NETWORK$ to 3 +// This logon type is intended for batch servers, where processes may be executing on behalf of a user without +// their direct intervention. This type is also for higher performance servers that process many plaintext +// authentication attempts at a time, such as mail or Web servers. +// The LogonUser function does not cache credentials for this logon type. +Equ LOGON32_LOGON_BATCH$ to 4 +// Indicates a service-type logon. The account provided must have the service privilege enabled. +Equ LOGON32_LOGON_SERVICE$ to 5 +// This logon type is for GINA DLLs that log on users who will be interactively using the computer. +// This logon type can generate a unique audit record that shows when the workstation was unlocked. +Equ LOGON32_LOGON_UNLOCK$ to 7 +// This logon type preserves the name and password in the authentication package, which allows the server to make +// connections to other network servers while impersonating the client. A server can accept plaintext credentials +// from a client, call LogonUser, verify that the user can access the system across the network, and still +// communicate with other servers. +// NOTE: Windows NT: This value is not supported. +Equ LOGON32_LOGON_NETWORK_CLEARTEXT$ to 8 +// This logon type allows the caller to clone its current token and specify new credentials for outbound connections. +// The new logon session has the same local identifier but uses different credentials for other network connections. +// NOTE: This logon type is supported only by the LOGON32_PROVIDER_WINNT50 logon provider. +// NOTE: Windows NT: This value is not supported. +Equ LOGON32_LOGON_NEW_CREDENTIALS$ to 9 + +// Use the standard logon provider for the system. +// The default security provider is negotiate, unless you pass NULL for the domain name and the user name +// is not in UPN format. In this case, the default provider is NTLM. +// NOTE: Windows 2000/NT: The default security provider is NTLM. +Equ LOGON32_PROVIDER_DEFAULT$ to 0 +Equ LOGON32_PROVIDER_WINNT35$ to 1 +Equ LOGON32_PROVIDER_WINNT40$ to 2 +Equ LOGON32_PROVIDER_WINNT50$ to 3 diff --git a/SYSPROG/STPROCINS/LSL_COMMON.txt b/SYSPROG/STPROCINS/LSL_COMMON.txt new file mode 100644 index 0000000..64789e1 --- /dev/null +++ b/SYSPROG/STPROCINS/LSL_COMMON.txt @@ -0,0 +1,6 @@ +compile insert lsl_common +common /%LSLCommon%/ Misc@, SecTables@, SecRights@ + +* @fm equates for Misc@ +equ CenterWindow$ to 1 ;* used in create event of each window to center the window +equ RecipeKey$ to 2 ;* used to return the recipe key to the specification diff --git a/SYSPROG/STPROCINS/MAPI_EQUATES.txt b/SYSPROG/STPROCINS/MAPI_EQUATES.txt new file mode 100644 index 0000000..b1735e9 --- /dev/null +++ b/SYSPROG/STPROCINS/MAPI_EQUATES.txt @@ -0,0 +1,50 @@ +compile insert MAPI_EQUATES + +EQU MAPI_LOGON_UI$ to 1 ;* Display logon dialog +EQU MAPI_NEW_SESSION$ to 2 ;* Do not use default session +EQU MAPI_DIALOG$ to 8 ;* Display a send note dialog +EQU MAPI_UNREAD_ONLY$ to 32 ;* Only unread messages +EQU MAPI_ENVELOPE_ONLY$ to 64 ;* Only header information +EQU MAPI_PEEK$ to 128 ;* Do not mark as read +EQU MAPI_GUARANTEE_FIFO$ to 256 ;* Retain date order +EQU MAPI_BODY_AS_FILE$ to 512 ;* Attach body as file +EQU MAPI_AB_NOMODIFY$ to 1024 ;* Do not update address book +EQU MAPI_SUPPRESS_ATTACH$ to 2048 ;* Do not return files +EQU MAPI_FORCE_DOWNLOAD$ to 4096 ;* Download new mail + +EQU MAPI_UNREAD$ to 1 ;* Message has not been read +EQU MAPI_RECEIPT_REQUESTED$ to 2 ;* Notify when message has been received +EQU MAPI_SENT$ to 4 ;* Message has been sent + +* Maximum length of message id +EQU MAX_ID$ TO 64 + +* Maximum length of message parts returned +EQU MAX_SUBJECT$ TO 256 +EQU MAX_FROM$ TO 256 +EQU MAX_TO$ TO 1024 +EQU MAX_CC$ TO 1024 +EQU MAX_BCC$ TO 1024 +EQU MAX_DATE$ TO 32 +EQU MAX_TEXT$ TO 32767 +EQU MAX_CLASS$ TO 256 +EQU MAX_FLAGS$ TO 16 +EQU MAX_FILES$ TO 1024 +EQU MAX_PATHS$ TO 4096 +EQU MAX_POSITIONS$ TO 1024 + +* Position in structure of message parts returned +EQU POS_SUBJECT$ TO 1 +EQU POS_FROM$ TO 2 +EQU POS_TO$ TO 3 +EQU POS_CC$ TO 4 +EQU POS_BCC$ TO 5 +EQU POS_DATE$ TO 6 +EQU POS_TEXT$ TO 7 +EQU POS_TYPE$ TO 8 +EQU POS_CLASS$ TO 8 +EQU POS_FLAGS$ TO 9 +EQU POS_FILES$ TO 10 +EQU POS_PATHS$ TO 11 +EQU POS_POSITIONS$ TO 12 +* Source Date: 17:49:07 31 JAN 1996 Build ID: OINOTES*3.1.40 Level: 3.1 diff --git a/SYSPROG/STPROCINS/MEDIA.MAP.EQUATES.txt b/SYSPROG/STPROCINS/MEDIA.MAP.EQUATES.txt new file mode 100644 index 0000000..742aabb --- /dev/null +++ b/SYSPROG/STPROCINS/MEDIA.MAP.EQUATES.txt @@ -0,0 +1,97 @@ +Compile Insert Media.Map.Equates + +* This record defines the layout of media map records for Advanced +* Revelation 2.0. +* + +* The first two fields were already defined in Advanced Revelation +* before version 2.0 +* + +* MM.FILE.NAME$ - The name of the foreign file. +EQU MM.FILE.NAME$ TO 1 + +* MM.MFS.LIST$ - the Modifying File Systems list for this file. +EQU MM.MFS.LIST$ TO 2 + +! +* The following 10 fields are reserved for future definition of items +* that are required for both DICT. and DATA. media map records. +* +EQU MM.RESERVED.1$ TO 3 +EQU MM.RESERVED.2$ TO 4 +EQU MM.RESERVED.3$ TO 5 +EQU MM.RESERVED.4$ TO 6 +EQU MM.RESERVED.5$ TO 7 +EQU MM.RESERVED.6$ TO 8 +EQU MM.RESERVED.7$ TO 9 +EQU MM.RESERVED.8$ TO 10 +EQU MM.RESERVED.9$ TO 11 +EQU MM.RESERVED.10$ TO 12 + +! +* +* All fields defined below this point are defined only for DICT. media +* map records. These positions are available to be defined by individual +* bonds for DATA. media map records. +* + +* MM.DATA.NAME$ - The fully qualified name of the foreign data file, +* suitable for error messages. +EQU MM.DATA.NAME$ TO 13 + +* MM.FOREIGN.PASSWORD$ - The password for the foreign file, if the foreign +* environment supports foreign passwords and if the bond +* allows them to be resident. The password should not be +* stored as clear text. +EQU MM.FOREIGN.PASSWORD$ TO 14 + +* MM.FLAGS$ - a set of valuemark-delimited flags. +EQU MM.FLAGS$ TO 15 + +* MM.FLAG.DELFILE$ - if non-zero and non-null, this flag causes the bond +* fail any attempt to delete the data portion of the file. +EQU MM.FLAG.DELFILE$ TO 1 + +* MM.FLAG.IMPDICT$ - non-zero if this dictionary was created implicitly +* by the bond AND has never been written to. +EQU MM.FLAG.IMPDICT$ TO 2 + + + + + +* MM.TIME.STAMPS$ - a valuemark-delimited set of time stamps (DATE() + TIME()/86400). +EQU MM.TIME.STAMPS$ TO 16 + +* MM.TIME.CREATE$ - time that the dictionary portion of the file was +* created. +EQU MM.TIME.CREATE$ TO 1 + +* MM.FILE.STATE$ - specifies the current state of the file. +EQU MM.FILE.STATE$ TO 17 +EQU MM.STATE.DEFINED$ TO 0 +EQU MM.STATE.DEFINING$ TO 1 +EQU MM.STATE.REDEFINING$ TO 2 + +EQU MM.FOREIGN.ATTR$ TO 18 + +! +* +* The following fields are reserved for future definition of file attributes +* + +EQU MM.RESERVED.11$ TO 19 +EQU MM.RESERVED.12$ TO 20 +EQU MM.RESERVED.13$ TO 21 +EQU MM.RESERVED.14$ TO 22 +EQU MM.RESERVED.15$ TO 23 +EQU MM.RESERVED.16$ TO 24 +EQU MM.RESERVED.17$ TO 25 +EQU MM.RESERVED.18$ TO 26 +EQU MM.RESERVED.19$ TO 27 +EQU MM.RESERVED.20$ TO 29 + +* The remaining fields can be defined by each bond in any way it +* sees fit. +* Source Date: 09:47:30 24 OCT 1990 Build ID: AREV*2.0.98 Level: 2.1 diff --git a/SYSPROG/STPROCINS/MEDIA_MAP_EQUATES.txt b/SYSPROG/STPROCINS/MEDIA_MAP_EQUATES.txt new file mode 100644 index 0000000..bd94083 --- /dev/null +++ b/SYSPROG/STPROCINS/MEDIA_MAP_EQUATES.txt @@ -0,0 +1,97 @@ +Compile Insert Media_Map_Equates + +* This record defines the layout of media map records for Advanced +* Revelation 2.0. +* + +* The first two fields were already defined in Advanced Revelation +* before version 2.0 +* + +* MM.FILE.NAME$ - The name of the foreign file. +EQU MM.FILE.NAME$ TO 1 + +* MM.MFS.LIST$ - the Modifying File Systems list for this file. +EQU MM.MFS.LIST$ TO 2 + +! +* The following 10 fields are reserved for future definition of items +* that are required for both DICT. and DATA. media map records. +* +EQU MM.RESERVED.1$ TO 3 +EQU MM.RESERVED.2$ TO 4 +EQU MM.RESERVED.3$ TO 5 +EQU MM.RESERVED.4$ TO 6 +EQU MM.RESERVED.5$ TO 7 +EQU MM.RESERVED.6$ TO 8 +EQU MM.RESERVED.7$ TO 9 +EQU MM.RESERVED.8$ TO 10 +EQU MM.RESERVED.9$ TO 11 +EQU MM.RESERVED.10$ TO 12 + +! +* +* All fields defined below this point are defined only for DICT. media +* map records. These positions are available to be defined by individual +* bonds for DATA. media map records. +* + +* MM.DATA.NAME$ - The fully qualified name of the foreign data file, +* suitable for error messages. +EQU MM.DATA.NAME$ TO 13 + +* MM.FOREIGN.PASSWORD$ - The password for the foreign file, if the foreign +* environment supports foreign passwords and if the bond +* allows them to be resident. The password should not be +* stored as clear text. +EQU MM.FOREIGN.PASSWORD$ TO 14 + +* MM.FLAGS$ - a set of valuemark-delimited flags. +EQU MM.FLAGS$ TO 15 + +* MM.FLAG.DELFILE$ - if non-zero and non-null, this flag causes the bond +* fail any attempt to delete the data portion of the file. +EQU MM.FLAG.DELFILE$ TO 1 + +* MM.FLAG.IMPDICT$ - non-zero if this dictionary was created implicitly +* by the bond AND has never been written to. +EQU MM.FLAG.IMPDICT$ TO 2 + + + + + +* MM.TIME.STAMPS$ - a valuemark-delimited set of time stamps (DATE() + TIME()/86400). +EQU MM.TIME.STAMPS$ TO 16 + +* MM.TIME.CREATE$ - time that the dictionary portion of the file was +* created. +EQU MM.TIME.CREATE$ TO 1 + +* MM.FILE.STATE$ - specifies the current state of the file. +EQU MM.FILE.STATE$ TO 17 +EQU MM.STATE.DEFINED$ TO 0 +EQU MM.STATE.DEFINING$ TO 1 +EQU MM.STATE.REDEFINING$ TO 2 + +EQU MM.FOREIGN.ATTR$ TO 18 + +! +* +* The following fields are reserved for future definition of file attributes +* + +EQU MM.RESERVED.11$ TO 19 +EQU MM.RESERVED.12$ TO 20 +EQU MM.RESERVED.13$ TO 21 +EQU MM.RESERVED.14$ TO 22 +EQU MM.RESERVED.15$ TO 23 +EQU MM.RESERVED.16$ TO 24 +EQU MM.RESERVED.17$ TO 25 +EQU MM.RESERVED.18$ TO 26 +EQU MM.RESERVED.19$ TO 27 +EQU MM.RESERVED.20$ TO 29 + +* The remaining fields can be defined by each bond in any way it +* sees fit. +* Source Date: 09:47:30 24 OCT 1990 Build ID: AREV*2.0.98 Level: 2.1 diff --git a/SYSPROG/STPROCINS/MEMCACHED_MFS_EQUATES.txt b/SYSPROG/STPROCINS/MEMCACHED_MFS_EQUATES.txt new file mode 100644 index 0000000..01d9ec4 --- /dev/null +++ b/SYSPROG/STPROCINS/MEMCACHED_MFS_EQUATES.txt @@ -0,0 +1,11 @@ +compile insert memcached_mfs_Equates + +Equ MCD_MFS_TABLES$ To "MCD_MFS_TABLES" + +* +* Table specific definitions +* +Equ MCD_TABLE_CONNECTION$ To 1 ; +Equ MCD_TABLE_PREFIX$ To 2 ; +Equ MCD_TABLE_NOSTORE$ To 3 ; * True if the MFS should not store info. Implements a pure in_memory + diff --git a/SYSPROG/STPROCINS/MESSAGE_BOX_EQUATES.txt b/SYSPROG/STPROCINS/MESSAGE_BOX_EQUATES.txt new file mode 100644 index 0000000..49176f3 --- /dev/null +++ b/SYSPROG/STPROCINS/MESSAGE_BOX_EQUATES.txt @@ -0,0 +1,35 @@ +compile insert MESSAGE_BOX_EQUATES + +* button arrangement +equ MSG_BTN_OK$ to 0 +equ MSG_BTN_OKCAN$ to 1 +equ MSG_BTN_ABORT$ to 2 +equ MSG_BTN_YESNOCAN$ to 3 +equ MSG_BTN_YESNO$ to 4 +equ MSG_BTN_RETRYCAN$ to 5 + +* default button +equ MSG_DEFAULT1$ to 0 +equ MSG_DEFAULT2$ to 256 +equ MSG_DEFAULT3$ to 512 + +* message icon +equ MSG_ICON_NONE$ to 0 +equ MSG_ICON_STOP$ to 16 +equ MSG_ICON_QUESTION$ to 32 +equ MSG_ICON_EXCLAM$ to 48 +equ MSG_ICON_INFO$ to 64 + +* return values +equ MSG_RET_OK$ to 1 +equ MSG_RET_CAN$ to 2 +equ MSG_RET_ABORT$ to 3 +equ MSG_RET_RETRY$ to 4 +equ MSG_RET_IGNORE$ to 5 +equ MSG_RET_YES$ to 6 +equ MSG_RET_NO$ to 7 + +* new line (carriage return/line feed) +equ MSG_NL$ to \0D0A\ + +* Source Date: 18:30:59 26 APR 1995 Build ID: OINOTES*2.5.45 Level: 2.5 diff --git a/SYSPROG/STPROCINS/MICROSOFT_ADO_EQUATES.txt b/SYSPROG/STPROCINS/MICROSOFT_ADO_EQUATES.txt new file mode 100644 index 0000000..765157b --- /dev/null +++ b/SYSPROG/STPROCINS/MICROSOFT_ADO_EQUATES.txt @@ -0,0 +1,265 @@ +Compile Insert Microsoft_Ado_Equates + +//-------------------------------------------------------------------- +// Microsoft ADO +// +// (c) 1996 Microsoft Corporation. All Rights Reserved. +// +// +// +// ADO equates include file for VBScript +// +//-------------------------------------------------------------------- + +//---- CursorTypeEnum Values ---- +equ adOpenForwardOnly to 0 +equ adOpenKeyset to 1 +equ adOpenDynamic to 2 +equ adOpenStatic to 3 + +//---- CursorOptionEnum Values ---- +equ adHoldRecords to 0x00000100 +equ adMovePrevious to 0x00000200 +equ adAddNew to 0x01000400 +equ adDelete to 0x01000800 +equ adUpdate to 0x01008000 +equ adBookmark to 0x00002000 +equ adApproxPosition to 0x00004000 +equ adUpdateBatch to 0x00010000 +equ adResync to 0x00020000 +equ adNotify to 0x00040000 + +//---- LockTypeEnum Values ---- +equ adLockReadOnly to 1 +equ adLockPessimistic to 2 +equ adLockOptimistic to 3 +equ adLockBatchOptimistic to 4 + +//---- ExecuteOptionEnum Values ---- +equ adRunAsync to 0x00000010 + +//---- ObjectStateEnum Values ---- +equ adStateClosed to 0x00000000 +equ adStateOpen to 0x00000001 +equ adStateConnecting to 0x00000002 +equ adStateExecuting to 0x00000004 + +//---- CursorLocationEnum Values ---- +equ adUseServer to 2 +equ adUseClient to 3 + +//---- DataTypeEnum Values ---- +equ adEmpty to 0 +equ adTinyInt to 16 +equ adSmallInt to 2 +equ adInteger to 3 +equ adBigInt to 20 +equ adUnsignedTinyInt to 17 +equ adUnsignedSmallInt to 18 +equ adUnsignedInt to 19 +equ adUnsignedBigInt to 21 +equ adSingle to 4 +equ adDouble to 5 +equ adCurrency to 6 +equ adDecimal to 14 +equ adNumeric to 131 +equ adBoolean to 11 +equ adError to 10 +equ adUserDefined to 132 +equ adVariant to 12 +equ adIDispatch to 9 +equ adIUnknown to 13 +equ adGUID to 72 +equ adDate to 7 +equ adDBDate to 133 +equ adDBTime to 134 +equ adDBTimeStamp to 135 +equ adBSTR to 8 +equ adChar to 129 +equ adVarChar to 200 +equ adLongVarChar to 201 +equ adWChar to 130 +equ adVarWChar to 202 +equ adLongVarWChar to 203 +equ adBinary to 128 +equ adVarBinary to 204 +equ adLongVarBinary to 205 + +//---- FieldAttributeEnum Values ---- +equ adFldMayDefer to 0x00000002 +equ adFldUpdatable to 0x00000004 +equ adFldUnknownUpdatable to 0x00000008 +equ adFldFixed to 0x00000010 +equ adFldIsNullable to 0x00000020 +equ adFldMayBeNull to 0x00000040 +equ adFldLong to 0x00000080 +equ adFldRowID to 0x00000100 +equ adFldRowVersion to 0x00000200 +equ adFldCacheDeferred to 0x00001000 + +//---- EditModeEnum Values ---- +equ adEditNone to 0x0000 +equ adEditInProgress to 0x0001 +equ adEditAdd to 0x0002 +equ adEditDelete to 0x0004 + +//---- RecordStatusEnum Values ---- +equ adRecOK to 0x0000000 +equ adRecNew to 0x0000001 +equ adRecModified to 0x0000002 +equ adRecDeleted to 0x0000004 +equ adRecUnmodified to 0x0000008 +equ adRecInvalid to 0x0000010 +equ adRecMultipleChanges to 0x0000040 +equ adRecPendingChanges to 0x0000080 +equ adRecCanceled to 0x0000100 +equ adRecCantRelease to 0x0000400 +equ adRecConcurrencyViolation to 0x0000800 +equ adRecIntegrityViolation to 0x0001000 +equ adRecMaxChangesExceeded to 0x0002000 +equ adRecObjectOpen to 0x0004000 +equ adRecOutOfMemory to 0x0008000 +equ adRecPermissionDenied to 0x0010000 +equ adRecSchemaViolation to 0x0020000 +equ adRecDBDeleted to 0x0040000 + +//---- GetRowsOptionEnum Values ---- +equ adGetRowsRest to -1 + +//---- PositionEnum Values ---- +equ adPosUnknown to -1 +equ adPosBOF to -2 +equ adPosEOF to -3 + +//---- enum Values ---- +equ adBookmarkCurrent to 0 +equ adBookmarkFirst to 1 +equ adBookmarkLast to 2 + +//---- MarshalOptionsEnum Values ---- +equ adMarshalAll to 0 +equ adMarshalModifiedOnly to 1 + +//---- AffectEnum Values ---- +equ adAffectCurrent to 1 +equ adAffectGroup to 2 +equ adAffectAll to 3 + +//---- FilterGroupEnum Values ---- +equ adFilterNone to 0 +equ adFilterPendingRecords to 1 +equ adFilterAffectedRecords to 2 +equ adFilterFetchedRecords to 3 +equ adFilterPredicate to 4 + +//---- SearchDirection Values ---- +equ adSearchForward to 1 +equ adSearchBackward to -1 + +//---- ConnectPromptEnum Values ---- +equ adPromptAlways to 1 +equ adPromptComplete to 2 +equ adPromptCompleteRequired to 3 +equ adPromptNever to 4 + +//---- ConnectModeEnum Values ---- +equ adModeUnknown to 0 +equ adModeRead to 1 +equ adModeWrite to 2 +equ adModeReadWrite to 3 +equ adModeShareDenyRead to 4 +equ adModeShareDenyWrite to 8 +equ adModeShareExclusive to 0xc +equ adModeShareDenyNone to 0x10 + +//---- IsolationLevelEnum Values ---- +equ adXactUnspecified to 0xffffffff +equ adXactChaos to 0x00000010 +equ adXactReadUncommitted to 0x00000100 +equ adXactBrowse to 0x00000100 +equ adXactCursorStability to 0x00001000 +equ adXactReadCommitted to 0x00001000 +equ adXactRepeatableRead to 0x00010000 +equ adXactSerializable to 0x00100000 +equ adXactIsolated to 0x00100000 + +//---- XactAttributeEnum Values ---- +equ adXactCommitRetaining to 0x00020000 +equ adXactAbortRetaining to 0x00040000 + +//---- PropertyAttributesEnum Values ---- +equ adPropNotSupported to 0x0000 +equ adPropRequired to 0x0001 +equ adPropOptional to 0x0002 +equ adPropRead to 0x0200 +equ adPropWrite to 0x0400 + +//---- ErrorValueEnum Values ---- +equ adErrInvalidArgument to 0xbb9 +equ adErrNoCurrentRecord to 0xbcd +equ adErrIllegalOperation to 0xc93 +equ adErrInTransaction to 0xcae +equ adErrFeatureNotAvailable to 0xcb3 +equ adErrItemNotFound to 0xcc1 +equ adErrObjectInCollection to 0xd27 +equ adErrObjectNotSet to 0xd5c +equ adErrDataConversion to 0xd5d +equ adErrObjectClosed to 0xe78 +equ adErrObjectOpen to 0xe79 +equ adErrProviderNotFound to 0xe7a +equ adErrBoundToCommand to 0xe7b +equ adErrInvalidParamInfo to 0xe7c +equ adErrInvalidConnection to 0xe7d +equ adErrStillExecuting to 0xe7f +equ adErrStillConnecting to 0xe81 + +//---- ParameterAttributesEnum Values ---- +equ adParamSigned to 0x0010 +equ adParamNullable to 0x0040 +equ adParamLong to 0x0080 + +//---- ParameterDirectionEnum Values ---- +equ adParamUnknown to 0x0000 +equ adParamInput to 0x0001 +equ adParamOutput to 0x0002 +equ adParamInputOutput to 0x0003 +equ adParamReturnValue to 0x0004 + +//---- CommandTypeEnum Values ---- +equ adCmdUnknown to 0x0008 +equ adCmdText to 0x0001 +equ adCmdTable to 0x0002 +equ adCmdStoredProc to 0x0004 + +//---- SchemaEnum Values ---- +equ adSchemaProviderSpecific to -1 +equ adSchemaAsserts to 0 +equ adSchemaCatalogs to 1 +equ adSchemaCharacterSets to 2 +equ adSchemaCollations to 3 +equ adSchemaColumns to 4 +equ adSchemaCheckequraints to 5 +equ adSchemaequraintColumnUsage to 6 +equ adSchemaequraintTableUsage to 7 +equ adSchemaKeyColumnUsage to 8 +equ adSchemaReferentialContraints to 9 +equ adSchemaTableequraints to 10 +equ adSchemaColumnsDomainUsage to 11 +equ adSchemaIndexes to 12 +equ adSchemaColumnPrivileges to 13 +equ adSchemaTablePrivileges to 14 +equ adSchemaUsagePrivileges to 15 +equ adSchemaProcedures to 16 +equ adSchemaSchemata to 17 +equ adSchemaSQLLanguages to 18 +equ adSchemaStatistics to 19 +equ adSchemaTables to 20 +equ adSchemaTranslations to 21 +equ adSchemaProviderTypes to 22 +equ adSchemaViews to 23 +equ adSchemaViewColumnUsage to 24 +equ adSchemaViewTableUsage to 25 +equ adSchemaProcedureParameters to 26 +equ adSchemaForeignKeys to 27 +equ adSchemaPrimaryKeys to 28 +equ adSchemaProcedureColumns to 29 diff --git a/SYSPROG/STPROCINS/MOUSE_CONSTANTS.txt b/SYSPROG/STPROCINS/MOUSE_CONSTANTS.txt new file mode 100644 index 0000000..9b3ffe0 --- /dev/null +++ b/SYSPROG/STPROCINS/MOUSE_CONSTANTS.txt @@ -0,0 +1,42 @@ +compile Insert mouse_constants +* +* MOUSE_CONSTANTS - +* EQUates for use with MOUSE_SUBS interface to mouse driver. +* 08-10-16 rjc Copied from Arev bp +EQU RESET$ TO 0 +EQU SHOW$ TO 1 +EQU HIDE$ TO 2 +EQU GETXY$ TO 3 +EQU SETXY$ TO 4 +EQU PRESS$ TO 5 +EQU RELEASE$ TO 6 +EQU HLIMIT$ TO 7 +EQU VLIMIT$ TO 8 +EQU GTYPE$ TO 9 +EQU TTYPE$ TO 10 +EQU MCOUNT$ TO 11 +EQU INTHAND$ TO 12 +EQU LPON$ TO 13 +EQU LPOFF$ TO 14 +EQU PIXRAT$ TO 15 +EQU PEXCL$ TO 16 +EQU SETDST$ TO 19 +EQU SWAPIR$ TO 20 +EQU BSIZE$ TO 21 +EQU SSTATE$ TO 22 +EQU GSTATE$ TO 23 +EQU IAHAND$ TO 24 +EQU AAHAND$ TO 25 +EQU SETSEN$ TO 26 +EQU GETSEN$ TO 27 +EQU IRATE$ TO 28 +EQU SETPAGE$ TO 29 +EQU GETPAGE$ TO 30 +EQU DVRDIS$ TO 31 +EQU DVREN$ TO 32 +EQU DVRRES$ TO 33 +EQU SETLAN$ TO 34 +EQU GETLAN$ TO 35 +EQU DVRVER$ TO 36 + +* Source Date: 09:48:09 02 MAR 1993 Build ID: AREV*3.1.31 Level: 3.1 diff --git a/SYSPROG/STPROCINS/MSG_EQUATES.txt b/SYSPROG/STPROCINS/MSG_EQUATES.txt new file mode 100644 index 0000000..0494996 --- /dev/null +++ b/SYSPROG/STPROCINS/MSG_EQUATES.txt @@ -0,0 +1,291 @@ +compile insert Msg_Equates + +****************************************************************************** +* +* Product : OpenInsight for Workgroups +* Version : 10 +* +* History : (date, initials, notes) +* 12/15/95 apk Original programmer. +* 02/26/96 cp Changed OK return value to "" from 0 (backwards compat.) +* 03/28/96 cp Added MHELP$, MREQRESP$, and MBEEP$ fields +* Commented message structure and instructions +* 06/24/97 cp Added G (gauge) type, removed unused equates +* 02/23/15 djh Added gas gauge fields +* 04/13/15 djh Add new password peek and valid chars +* 05/29/15 djh Add Animation field +* 06/08/15 djh Add Pop-up Toast field +* 06/26/15 djh Add Frame option +* 07/06/15 djh Add Main Title text +* 08/20/15 djh Add EDITMASK fields +* 08/28/15 djh Add some documentation on the new fields +* 10/15/15 djh Add fields for styleSheets +****************************************************************************** + +declare subroutine Msg ;* Msg(Parent, MsgDef [, MsgKey, Instruction, Params]) +declare function Msg ;* Ans = Msg(Parent, MsgDef [, MsgKey, Instruction, Params]) + + +* message structure field definitions +equ MTEXT$ to 1 ;* the text to display in the message, multiple lines delimited by @tm, cr/lf, or "|" +equ MTYPE$ to 2 ;* the message type, defaults to "BO" (see below) +equ MMODAL$ to 3 ;* modality of message, defaults to "A" (see below) +equ MICON$ to 4 ;* icon to display (see below) +equ MDEFBTN$ to 5 ;* default button (1 for first, 2 for second, etc.) +equ MCOL$ to 6 ;* message h-pos in pixels, or -2 (center screen, the default), -1 (center parent) +equ MROW$ to 7 ;* message v-pos in pixels +equ MJUST$ to 8 ;* justification: T (text, the default), L (left), R (right), C (center) +equ MBKCOLOR$ to 9 ;* background color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR") +Equ MFGCOLOR$ To 10 ;* foreground color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR") - DO NOT USE - Use the color from the font structure +equ MTEXTWIDTH$ to 11 ;* the message width (or the response field width for response messages) +equ MCAPTION$ to 12 ;* the message title +equ MVALID$ to 13 ;* for response messages, this is the validation pattern (ie. (MD0) for integer) +equ MDEFINPUT$ to 14 ;* for reponse messages, this is the default response +equ MMASKINPUT$ to 15 ;* boolean, true for password (masked) input, false (default) for readable input +equ MBITMAP$ to 16 ;* name of a bitmap registered in repository (as it appears in the outliner) +equ MCLIPBMP$ to 17 ;* boolean, true to clip bitmaps, false to resize (see IMAGECLIP property) +equ MFONT$ to 18 ;* font structure for the text of the message +equ MLITERAL$ to 19 ;* boolean, defaults to false, true specifies that default value is a function (see below) +equ MHELP$ to 20 ;* help button, Type:@vm:Specifier:@vm:Text (see below), defaults to null (no help) +equ MREQRESP$ to 21 ;* boolean, for type "R" messages, false allows nulls (default) while true doesn't +equ MBEEP$ to 22 ;* integer, specifies beep (see MessageBeep in the Windows API) +equ MEXTENT$ to 23 ;* integer, specifies extent of the gauge (number of items to process for type="G") +Equ MGBORDER$ To 24 ;* boolean, adds border around gauge +Equ MGSMOOTH$ To 25 ;* boolean, set to true to see a smooth gauge and false to see the segmented gauge +Equ MGPERCOMPLETE$ To 26 ;* boolean, set to true to see the percent complete in the gauge +Equ MGSYNCTASK$ To 27 ;* boolean, set to true to mirror the state of the gauge on the taskbar +Equ MGVERTICAL$ To 28 ;* boolean, set to true to see a vertical gauge +Equ MGINCREMENT$ To 29 ;* integer, set the number to increment the gauge by +Equ MGTRANSLUCENT$ To 30 ;* integer, set the transparency of the gauge with 0 being fully apaque and 100 being fully transparent +Equ MGNORMALSTATE$ To 31 ;* gauge normal state color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR") +Equ MGERRORSTATE$ To 32 ;* gauge error state color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR") +Equ MGPAUSEDSTATE$ To 33 ;* gauge paused state color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR") +Equ MGMARQUEE$ To 34 ;* integer, time in milliseconds between marquee animation +Equ MGSTARTVALUE$ To 35 ;* integer, set the start value for the gauge, must be between the range values +Equ MGRANGESTART$ To 36 ;* integet, set the lower limit of the gauge +Equ MGRANGEEND$ To 37 ;* integer, set the upper limit of the gauge +Equ MGDECREMENT$ To 38 ;* boolean, set to true to decrement the gauge +Equ MPWDPEEK$ To 39 ;* integer, time in milliseconds to display the entered character before masking +Equ MVALIDCHARS$ To 40 ;* for response messages, these are the characters that are valid +Equ MANIMATE$ To 41 ;* animation file name to use with the gauge (see list below for options) +Equ MPOPUP$ To 42 ;* boolean, for timed messages set to true to see a popup "toast" message in the lower right hand corner of the screen +Equ MFRAME$ To 43 ;* integer, set type of frame (see list below for options) +Equ MHTML$ To 44 ;* boolean, set to true for HTML text rendering +Equ MMAINFGCOLOR$ To 45 ;* main text foreground color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR") +Equ MMAINBKCOLOR$ To 46 ;* main text background color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR") +Equ MMAINTEXT$ To 47 ;* main text to appear above the regular text +Equ MMASKFORMAT$ To 48 ;* edit mask format to be used on response line +Equ MMASKTYPE$ To 49 ;* edit mask character type required for each character of the edit mask format (see list below for options) +Equ MSTYLESHEET$ To 50 ;* name of window (style sheet) to use +Equ MOVERRIDEGSS$ To 51 ;* boolean, override global style sheet +Equ MWIDTH$ To 52 ;* integer, set width of message +Equ MHEIGHT$ To 53 ;* integer, set height of message +Equ MCURSOR$ To 54 ;* +Equ MPANBKCOLOR$ To 55 ;* +Equ MWINBKCOLOR$ To 56 ;* +Equ MBTNFGCOLOR$ To 57 ;* +Equ MBTNBKCOLOR$ To 58 ;* +Equ MRSPFGCOLOR$ To 59 ;* +Equ MRSPBKCOLOR$ To 60 ;* + +equ MNUMFIELDS$ to 60 + +* MTYPE$ details: +* +* there are six base types, B (buttons), R (response), U (up), and D (down), +* T (timed), and G (gauge) +* +* the button type has several pre-defined button sets which are localized +* using entries from the SYSTEM_RESOURCES record in the SYSENV table; for +* non-standard labels, the buttons can be specified in a comma-delimited +* list, like "B&One,&Two,&Three" (where the & specifies the accelerator) +* +* B Type Description +* ------ -------------------- +* BO OK +* BOC OK/Cancel +* BNY Yes/No +* BNYC Yes/No/Cancel +* BRC Retry/Cancel +* BAR Abort/Retry +* BARI Abort/Retry/Ignore +* B{list} User-defined buttons +* +* the response type displays an edit field and OK and Cancel buttons; +* the optional sub-types are C (upper-case only) and E (escape or +* cancel button returns escape character instead of default response); +* for example, the following types are valid: "R", "RC", "RE", "RCE" +* +* for B and R types, the type can be preceded with an N to specify that +* the default value for the message is to be returned without the message +* being displayed; this is one way to change messages from interactive +* to non-interactive for batch processes; for example, instead of "BARI", +* pass "NBARI" (meaning don't display the abort/retry/ignore message) +* +* to display a message while processing, use the "U" type: +* +* Def = "" +* Def = "Processing..." +* Def = "U" +* MsgUp = Msg(@window, Def) ;* display the processing message +* ... +* Msg(@window, MsgUp) ;* take down the processing message +* +* to display a message for a specific length of time, use the "T" type: +* +* Def = "" +* Def = "Waiting..." +* Def = "T2" ;* 2-second message +* Msg(@window, Def) +* +* the optional sub-type for T type is A (asynchronous), which displays +* the message and returns (allowing processing to continue) and takes +* the message down after the specified period of time; since this relies +* on a timer event, your event code must either complete within the +* specified period of time or you must regularly use Yield() to allow +* the processing of posted events (like the timer): +* +* Def = "" +* Def = "TA5" ;* 5-second splash-screen +* Msg(@window, Def, "SPLASHSCREEN") +* loop +* Done = AppLogonProcessing() +* Yield() +* until Done +* repeat +* +* to display a gauge (percent bar), use the "G" type; sub-types are C (show +* cancel button) and Y (yield on each cycle): +* +* Def = "" +* Def = "Processing Orders..." +* Def = "GC" +* Def = OrderCnt +* MsgUp = Msg(@window, Def) +* for Order = 1 to OrderCnt +* gosub ProcessOrder +* * update the gauge and check if cancel was pressed +* while Msg(@window, MsgUp, Order, MSGINSTUPDATE$) +* next Order +* Msg(@window, MsgUp) ;* take down the gauge + +* MMODAL$ detail: +* +* Code Modality Description +* ----------- ----------- ----------------------------- +* W Window only the parent is disabled +* A (default) Application all OI windows are disabled +* S System all applications are disabled + +* MICON$ detail: +* +* Code Icon +* ---- --------------- +* null None +* * Asterisk (Info) +* ? Question +* ! Exclaim (Warning) +* H Halt (Stop sign) +* B User-specified bitmap (specified in MBITMAP$ field) + +* MLITERAL$ details (applies only to response type messages): +* +* if MLITERAL$ is true, the Msg() function assumes that the default value is +* the name of a function which returns the default value for the message; +* for example, if you wrote a function called CURRENTUSER which returned +* the user name of the current user, you could specify CURRENTUSER as the +* default value (MDEFINPUT$) and set MLITERAL$ to true, so that the current +* user name would be the default value for the message; parameters are +* passed to the specified function depending on the number of parameters +* that are supported by the function: +* +* # Params Values Passed +* --------- -------------- +* 0 None +* 1 MsgKey +* 2 or more MsgKey, MsgDef + +* MHELP$ details: +* +* Type Description Specifier +* ---- ------------- ----------------- +* Q QuickHelp (AppNote) Name of AppNote +* M Message Name of Message +* H WinHelp HelpFile,HelpID +* S Stored Procedure ProcName[,Param1] +* +* Note: Specify the AppNote, Message, HelpFile, or ProcName as it appears +* in the repository outliner. For example, the OINSIGHT.HLP file is +* registered as OINSIGHT, so specify the HelpFile as "OINSIGHT" (look +* in the outline under "General", "Windows Components", "Help Files") +* +* Text defaults to "&Help" or a localized equivalent + +* Replaceable message parameters: +* +* Msg(@window, "Hello, %1%, how are you %2%?", "", "", @username: @fm: "today") + +* MANIMATE$ details: +* +* Value Description +* -------------------- ---------------- +* FileCopyXP.avi File Copy +* FileMoveXP.avi File Move +* FileDeleteXP.avi File Delete +* FileDestroyXP.avi File Destroy +* FilePropertiesXP.avi File Properties +* EmptyRecyclerXP.avi Empty Trash + +* MFRAME$ details: +* +* Value +* ---------------- +* None +* Fixed +* Sizeable +* Dialog +* Fixed Tool +* Sizeable Tool + +* MMASKTYPE$ details: +* +* Value Description +* -------------------- ---------------- +* D A digit +* d A digit or a space +* C An alpha character +* c An alpha character or space +* A An alphanumeric character +* a An alphanumeric character or space +* X A hexadecimal character +* x A hexadecimal character or space +* * Any printable character +* + A "+" character, a "-" character, or space + +* Msg() function instruction values +equ MSGINSTSTART$ to 1 ;* (default instruction) +equ MSGINSTREAD$ to 2 ;* bErr = Msg("", MsgDef, MsgID, MSGINSTREAD$) +equ MSGINSTWRITE$ to 3 ;* bErr = Msg("", MsgDef, MsgID, MSGINSTWRITE$) +equ MSGINSTLOCK$ to 4 ;* bErr = Msg("", "", MsgID, MSGINSTLOCK$) +equ MSGINSTUNLOCK$ to 5 ;* bErr = Msg("", "", MsgID, MSGINSTUNLOCK$) +equ MSGINSTBUTTON$ to 6 ;* reserved +equ MSGINSTCREATE$ to 7 ;* reserved +equ MSGINSTRESPCHG$ to 8 ;* reserved +equ MSGINSTCLOSE$ to 9 ;* reserved +equ MSGINSTTIMER$ to 10 ;* reserved +equ MSGINSTHELP$ to 11 ;* reserved +equ MSGINSTUPDATE$ to 12 ;* (see above) + +* Msg() function return values from MSGINSTSTART$ +equ RET_OK$ to "" +equ RET_CANCEL$ to \1B\ ;* escape character +equ RET_YES$ to 1 +equ RET_NO$ to 0 +equ RET_ABORT$ to 1 +equ RET_RETRY$ to 2 +equ RET_IGNORE$ to 3 + +* misc strings +equ MSGTYPE$ to "MSG" +equ MSGCLASS$ to "" + diff --git a/SYSPROG/STPROCINS/MSWIN_ACCESS_TYPE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_ACCESS_TYPE_EQUATES.txt new file mode 100644 index 0000000..4bab637 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_ACCESS_TYPE_EQUATES.txt @@ -0,0 +1,44 @@ +compile insert msWin_Access_Type_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Feb 2013 + Purpose Equates for WinAPI predefined Standard Access Types + + Comments + + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_ACCESS_TYPE_EQUATES_ +#define _MSWIN_ACCESS_TYPE_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ SYNCHRONIZE$ to 0x00100000 + equ STANDARD_RIGHTS_REQUIRED$ to 0x000F0000 + equ READ_CONTROL$ to 0x00020000 + equ WRITE_DAC$ to 0x00040000 + equ WRITE_OWNER$ to 0x00080000 + equ STANDARD_RIGHTS_READ$ to READ_CONTROL$ + equ STANDARD_RIGHTS_WRITE$ to READ_CONTROL$ + equ STANDARD_RIGHTS_EXECUTE$ to READ_CONTROL$ + equ STANDARD_RIGHTS_ALL$ to 0x001F0000 + equ SPECIFIC_RIGHTS_ALL$ to 0x0000FFFF + equ ACCESS_SYSTEM_SECURITY$ to 0x01000000 + equ MAXIMUM_ALLOWED$ to 0x02000000 + equ GENERIC_READ$ to 0x80000000 + equ GENERIC_WRITE$ to 0x40000000 + equ GENERIC_EXECUTE$ to 0x20000000 + equ GENERIC_ALL$ to 0x10000000 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_ADO_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_ADO_EQUATES.txt new file mode 100644 index 0000000..5132126 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_ADO_EQUATES.txt @@ -0,0 +1,620 @@ +compile insert msWin_ADO_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Sept 2013 + Purpose Equated constants for use with the MS ADO API + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_ADO_EQUATES_ +#define _MSWIN_ADO_EQUATES +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // CursorTypeEnum Values + equ ADOPENFORWARDONLY$ to 0 + equ ADOPENKEYSET$ to 1 + equ ADOPENDYNAMIC$ to 2 + equ ADOPENSTATIC$ to 3 + +/////////////////////////////////////////////////////////////////////////////// + + * // CursorOptionEnum Values + equ ADHOLDRECORDS$ to 0x00000100 + equ ADMOVEPREVIOUS$ to 0x00000200 + equ ADADDNEW$ to 0x01000400 + equ ADDELETE$ to 0x01000800 + equ ADUPDATE$ to 0x01008000 + equ ADBOOKMARK$ to 0x00002000 + equ ADAPPROXPOSITION$ to 0x00004000 + equ ADUPDATEBATCH$ to 0x00010000 + equ ADRESYNC$ to 0x00020000 + equ ADNOTIFY$ to 0x00040000 + equ ADFIND$ to 0x00080000 + equ ADSEEK$ to 0x00400000 + equ ADINDEX$ to 0x00800000 + +/////////////////////////////////////////////////////////////////////////////// + + * // LockTypeEnum Values + equ ADLOCKREADONLY$ to 1 + equ ADLOCKPESSIMISTIC$ to 2 + equ ADLOCKOPTIMISTIC$ to 3 + equ ADLOCKBATCHOPTIMISTIC$ to 4 + +/////////////////////////////////////////////////////////////////////////////// + + * // ExecuteOptionEnum Values + equ ADASYNCEXECUTE$ to 0x00000010 + equ ADASYNCFETCH$ to 0x00000020 + equ ADASYNCFETCHNONBLOCKING$ to 0x00000040 + equ ADEXECUTENORECORDS$ to 0x00000080 + +/////////////////////////////////////////////////////////////////////////////// + + * // ConnectOptionEnum Values + equ ADASYNCCONNECT$ to 0x00000010 + +/////////////////////////////////////////////////////////////////////////////// + + * // ObjectStateEnum Values + equ ADSTATECLOSED$ to 0x00000000 + equ ADSTATEOPEN$ to 0x00000001 + equ ADSTATECONNECTING$ to 0x00000002 + equ ADSTATEEXECUTING$ to 0x00000004 + equ ADSTATEFETCHING$ to 0x00000008 + +/////////////////////////////////////////////////////////////////////////////// + + * // CursorLocationEnum Values + equ ADUSESERVER$ to 2 + equ ADUSECLIENT$ to 3 + +/////////////////////////////////////////////////////////////////////////////// + + * // DataTypeEnum Values + equ ADEMPTY$ to 0 + equ ADTINYINT$ to 16 + equ ADSMALLINT$ to 2 + equ ADINTEGER$ to 3 + equ ADBIGINT$ to 20 + equ ADUNSIGNEDTINYINT$ to 17 + equ ADUNSIGNEDSMALLINT$ to 18 + equ ADUNSIGNEDINT$ to 19 + equ ADUNSIGNEDBIGINT$ to 21 + equ ADSINGLE$ to 4 + equ ADDOUBLE$ to 5 + equ ADCURRENCY$ to 6 + equ ADDECIMAL$ to 14 + equ ADNUMERIC$ to 131 + equ ADBOOLEAN$ to 11 + equ ADERROR$ to 10 + equ ADUSERDEFINED$ to 132 + equ ADVARIANT$ to 12 + equ ADIDISPATCH$ to 9 + equ ADIUNKNOWN$ to 13 + equ ADGUID$ to 72 + equ ADDATE$ to 7 + equ ADDBDATE$ to 133 + equ ADDBTIME$ to 134 + equ ADDBTIMESTAMP$ to 135 + equ ADBSTR$ to 8 + equ ADCHAR$ to 129 + equ ADVARCHAR$ to 200 + equ ADLONGVARCHAR$ to 201 + equ ADWCHAR$ to 130 + equ ADVARWCHAR$ to 202 + equ ADLONGVARWCHAR$ to 203 + equ ADBINARY$ to 128 + equ ADVARBINARY$ to 204 + equ ADLONGVARBINARY$ to 205 + equ ADCHAPTER$ to 136 + equ ADFILETIME$ to 64 + equ ADPROPVARIANT$ to 138 + equ ADVARNUMERIC$ to 139 + equ ADARRAY$ to 0x2000 + +/////////////////////////////////////////////////////////////////////////////// + + * // FieldAttributeEnum Values + equ ADFLDMAYDEFER$ to 0x00000002 + equ ADFLDUPDATABLE$ to 0x00000004 + equ ADFLDUNKNOWNUPDATABLE$ to 0x00000008 + equ ADFLDFIXED$ to 0x00000010 + equ ADFLDISNULLABLE$ to 0x00000020 + equ ADFLDMAYBENULL$ to 0x00000040 + equ ADFLDLONG$ to 0x00000080 + equ ADFLDROWID$ to 0x00000100 + equ ADFLDROWVERSION$ to 0x00000200 + equ ADFLDCACHEDEFERRED$ to 0x00001000 + equ ADFLDISCHAPTER$ to 0x00002000 + equ ADFLDNEGATIVESCALE$ to 0x00004000 + equ ADFLDKEYCOLUMN$ to 0x00008000 + equ ADFLDISROWURL$ to 0x00010000 + equ ADFLDISDEFAULTSTREAM$ to 0x00020000 + equ ADFLDISCOLLECTION$ to 0x00040000 + +/////////////////////////////////////////////////////////////////////////////// + + * // EditModeEnum Values + equ ADEDITNONE$ to 0x0000 + equ ADEDITINPROGRESS$ to 0x0001 + equ ADEDITADD$ to 0x0002 + equ ADEDITDELETE$ to 0x0004 + +/////////////////////////////////////////////////////////////////////////////// + + * // RecordStatusEnum Values + equ ADRECOK$ to 0x0000000 + equ ADRECNEW$ to 0x0000001 + equ ADRECMODIFIED$ to 0x0000002 + equ ADRECDELETED$ to 0x0000004 + equ ADRECUNMODIFIED$ to 0x0000008 + equ ADRECINVALID$ to 0x0000010 + equ ADRECMULTIPLECHANGES$ to 0x0000040 + equ ADRECPENDINGCHANGES$ to 0x0000080 + equ ADRECCANCELED$ to 0x0000100 + equ ADRECCANTRELEASE$ to 0x0000400 + equ ADRECCONCURRENCYVIOLATION$ to 0x0000800 + equ ADRECINTEGRITYVIOLATION$ to 0x0001000 + equ ADRECMAXCHANGESEXCEEDED$ to 0x0002000 + equ ADRECOBJECTOPEN$ to 0x0004000 + equ ADRECOUTOFMEMORY$ to 0x0008000 + equ ADRECPERMISSIONDENIED$ to 0x0010000 + equ ADRECSCHEMAVIOLATION$ to 0x0020000 + equ ADRECDBDELETED$ to 0x0040000 + +/////////////////////////////////////////////////////////////////////////////// + + * // GetRowsOptionEnum Values + equ ADGETROWSREST$ to -1 + +/////////////////////////////////////////////////////////////////////////////// + + * // PositionEnum Values + equ ADPOSUNKNOWN$ to -1 + equ ADPOSBOF$ to -2 + equ ADPOSEOF$ to -3 + +/////////////////////////////////////////////////////////////////////////////// + + * // BookmarkEnum Values + equ ADBOOKMARKCURRENT$ to 0 + equ ADBOOKMARKFIRST$ to 1 + equ ADBOOKMARKLAST$ to 2 + +/////////////////////////////////////////////////////////////////////////////// + + * // MarshalOptionsEnum Values + equ ADMARSHALALL$ to 0 + equ ADMARSHALMODIFIEDONLY$ to 1 + +/////////////////////////////////////////////////////////////////////////////// + + * // AffectEnum Values + equ ADAFFECTCURRENT$ to 1 + equ ADAFFECTGROUP$ to 2 + equ ADAFFECTALLCHAPTERS$ to 4 + +/////////////////////////////////////////////////////////////////////////////// + + * // ResyncEnum Values + equ ADRESYNCUNDERLYINGVALUES$ to 1 + equ ADRESYNCALLVALUES$ to 2 + +/////////////////////////////////////////////////////////////////////////////// + + * // CompareEnum Values + equ ADCOMPARELESSTHAN$ to 0 + equ ADCOMPAREEQUAL$ to 1 + equ ADCOMPAREGREATERTHAN$ to 2 + equ ADCOMPARENOTEQUAL$ to 3 + equ ADCOMPARENOTCOMPARABLE$ to 4 + +/////////////////////////////////////////////////////////////////////////////// + + * // FilterGroupEnum Values + equ ADFILTERNONE$ to 0 + equ ADFILTERPENDINGRECORDS$ to 1 + equ ADFILTERAFFECTEDRECORDS$ to 2 + equ ADFILTERFETCHEDRECORDS$ to 3 + equ ADFILTERCONFLICTINGRECORDS$ to 5 + +/////////////////////////////////////////////////////////////////////////////// + + * // SearchDirectionEnum Values + equ ADSEARCHFORWARD$ to 1 + equ ADSEARCHBACKWARD$ to -1 + +/////////////////////////////////////////////////////////////////////////////// + + * // PersistFormatEnum Values + equ ADPERSISTADTG$ to 0 + equ ADPERSISTXML$ to 1 + +/////////////////////////////////////////////////////////////////////////////// + + * // StringFormatEnum Values + equ ADCLIPSTRING$ to 2 + +/////////////////////////////////////////////////////////////////////////////// + + * // ConnectPromptEnum Values + equ ADPROMPTALWAYS$ to 1 + equ ADPROMPTCOMPLETE$ to 2 + equ ADPROMPTCOMPLETEREQUIRED$ to 3 + equ ADPROMPTNEVER$ to 4 + +/////////////////////////////////////////////////////////////////////////////// + + * // ConnectModeEnum Values + equ ADMODEUNKNOWN$ to 0 + equ ADMODEREAD$ to 1 + equ ADMODEWRITE$ to 2 + equ ADMODEREADWRITE$ to 3 + equ ADMODESHAREDENYREAD$ to 4 + equ ADMODESHAREDENYWRITE$ to 8 + equ ADMODESHAREEXCLUSIVE$ to 0xC + equ ADMODESHAREDENYNONE$ to 0x10 + equ ADMODERECURSIVE$ to 0x400000 + +/////////////////////////////////////////////////////////////////////////////// + + * // RecordCreateOptionsEnum Values + equ ADCREATECOLLECTION$ to 0x00002000 + equ ADCREATESTRUCTDOC$ to 0x80000000 + equ ADCREATENONCOLLECTION$ to 0x00000000 + equ ADOPENIFEXISTS$ to 0x02000000 + equ ADCREATEOVERWRITE$ to 0x04000000 + equ ADFAILIFNOTEXISTS$ to -1 + +/////////////////////////////////////////////////////////////////////////////// + + * // RecordOpenOptionsEnum Values + equ ADOPENRECORDUNSPECIFIED$ to -1 + equ ADOPENSOURCE$ to 0x00800000 + equ ADOPENASYNC$ to 0x00001000 + equ ADDELAYFETCHSTREAM$ to 0x00004000 + equ ADDELAYFETCHFIELDS$ to 0x00008000 + +/////////////////////////////////////////////////////////////////////////////// + + * // IsolationLevelEnum Values + equ ADXACTUNSPECIFIED$ to 0xFFFFFFFF + equ ADXACTCHAOS$ to 0x00000010 + equ ADXACTREADUNCOMMITTED$ to 0x00000100 + equ ADXACTBROWSE$ to 0x00000100 + equ ADXACTCURSORSTABILITY$ to 0x00001000 + equ ADXACTREADCOMMITTED$ to 0x00001000 + equ ADXACTREPEATABLEREAD$ to 0x00010000 + equ ADXACTSERIALIZABLE$ to 0x00100000 + equ ADXACTISOLATED$ to 0x00100000 + +/////////////////////////////////////////////////////////////////////////////// + + * // XactAttributeEnum Values + equ ADXACTCOMMITRETAINING$ to 0x00020000 + equ ADXACTABORTRETAINING$ to 0x00040000 + +/////////////////////////////////////////////////////////////////////////////// + + * // PropertyAttributesEnum Values + equ ADPROPNOTSUPPORTED$ to 0x0000 + equ ADPROPREQUIRED$ to 0x0001 + equ ADPROPOPTIONAL$ to 0x0002 + equ ADPROPREAD$ to 0x0200 + equ ADPROPWRITE$ to 0x0400 + +/////////////////////////////////////////////////////////////////////////////// + + * // ErrorValueEnum Values + equ ADERRPROVIDERFAILED$ to 0xBB8 + equ ADERRINVALIDARGUMENT$ to 0xBB9 + equ ADERROPENINGFILE$ to 0xBBA + equ ADERRREADFILE$ to 0xBBB + equ ADERRWRITEFILE$ to 0xBBC + equ ADERRNOCURRENTRECORD$ to 0xBCD + equ ADERRILLEGALOPERATION$ to 0xC93 + equ ADERRCANTCHANGEPROVIDER$ to 0xC94 + equ ADERRINTRANSACTION$ to 0xCAE + equ ADERRFEATURENOTAVAILABLE$ to 0xCB3 + equ ADERRITEMNOTFOUND$ to 0xCC1 + equ ADERROBJECTINCOLLECTION$ to 0xD27 + equ ADERROBJECTNOTSET$ to 0xD5C + equ ADERRDATACONVERSION$ to 0xD5D + equ ADERROBJECTCLOSED$ to 0xE78 + equ ADERROBJECTOPEN$ to 0xE79 + equ ADERRPROVIDERNOTFOUND$ to 0xE7A + equ ADERRBOUNDTOCOMMAND$ to 0xE7B + equ ADERRINVALIDPARAMINFO$ to 0xE7C + equ ADERRINVALIDCONNECTION$ to 0xE7D + equ ADERRNOTREENTRANT$ to 0xE7E + equ ADERRSTILLEXECUTING$ to 0xE7F + equ ADERROPERATIONCANCELLED$ to 0xE80 + equ ADERRSTILLCONNECTING$ to 0xE81 + equ ADERRINVALIDTRANSACTION$ to 0xE82 + equ ADERRUNSAFEOPERATION$ to 0xE84 + equ ADWRNSECURITYDIALOG$ to 0xE85 + equ ADWRNSECURITYDIALOGHEADER$ to 0xE86 + equ ADERRINTEGRITYVIOLATION$ to 0xE87 + equ ADERRPERMISSIONDENIED$ to 0xE88 + equ ADERRDATAOVERFLOW$ to 0xE89 + equ ADERRSCHEMAVIOLATION$ to 0xE8A + equ ADERRSIGNMISMATCH$ to 0xE8B + equ ADERRCANTCONVERTVALUE$ to 0xE8C + equ ADERRCANTCREATE$ to 0xE8D + equ ADERRCOLUMNNOTONTHISROW$ to 0xE8E + equ ADERRURLINTEGRVIOLSETCOLUMNS$ to 0xE8F + equ ADERRURLDOESNOTEXIST$ to 0xE8F + equ ADERRTREEPERMISSIONDENIED$ to 0xE90 + equ ADERRINVALIDURL$ to 0xE91 + equ ADERRRESOURCELOCKED$ to 0xE92 + equ ADERRRESOURCEEXISTS$ to 0xE93 + equ ADERRCANNOTCOMPLETE$ to 0xE94 + equ ADERRVOLUMENOTFOUND$ to 0xE95 + equ ADERROUTOFSPACE$ to 0xE96 + equ ADERRRESOURCEOUTOFSCOPE$ to 0xE97 + equ ADERRUNAVAILABLE$ to 0xE98 + equ ADERRURLNAMEDROWDOESNOTEXIST$ to 0xE99 + equ ADERRDELRESOUTOFSCOPE$ to 0xE9A + equ ADERRPROPINVALIDCOLUMN$ to 0xE9B + equ ADERRPROPINVALIDOPTION$ to 0xE9C + equ ADERRPROPINVALIDVALUE$ to 0xE9D + equ ADERRPROPCONFLICTING$ to 0xE9E + equ ADERRPROPNOTALLSETTABLE$ to 0xE9F + equ ADERRPROPNOTSET$ to 0xEA0 + equ ADERRPROPNOTSETTABLE$ to 0xEA1 + equ ADERRPROPNOTSUPPORTED$ to 0xEA2 + equ ADERRCATALOGNOTSET$ to 0xEA3 + equ ADERRCANTCHANGECONNECTION$ to 0xEA4 + equ ADERRFIELDSUPDATEFAILED$ to 0xEA5 + equ ADERRDENYNOTSUPPORTED$ to 0xEA6 + equ ADERRDENYTYPENOTSUPPORTED$ to 0xEA7 + +/////////////////////////////////////////////////////////////////////////////// + + * // ParameterAttributesEnum Values + equ ADPARAMSIGNED$ to 0x0010 + equ ADPARAMNULLABLE$ to 0x0040 + equ ADPARAMLONG$ to 0x0080 + +/////////////////////////////////////////////////////////////////////////////// + + * // ParameterDirectionEnum Values + equ ADPARAMUNKNOWN$ to 0x0000 + equ ADPARAMINPUT$ to 0x0001 + equ ADPARAMOUTPUT$ to 0x0002 + equ ADPARAMINPUTOUTPUT$ to 0x0003 + equ ADPARAMRETURNVALUE$ to 0x0004 + +/////////////////////////////////////////////////////////////////////////////// + + * // CommandTypeEnum Values + equ ADCMDUNKNOWN$ to 0x0008 + equ ADCMDTEXT$ to 0x0001 + equ ADCMDTABLE$ to 0x0002 + equ ADCMDSTOREDPROC$ to 0x0004 + equ ADCMDFILE$ to 0x0100 + equ ADCMDTABLEDIRECT$ to 0x0200 + +/////////////////////////////////////////////////////////////////////////////// + + * // EventStatusEnum Values + equ ADSTATUSOK$ to 0x0000001 + equ ADSTATUSERRORSOCCURRED$ to 0x0000002 + equ ADSTATUSCANTDENY$ to 0x0000003 + equ ADSTATUSCANCEL$ to 0x0000004 + equ ADSTATUSUNWANTEDEVENT$ to 0x0000005 + +/////////////////////////////////////////////////////////////////////////////// + + * // EventReasonEnum Values + equ ADRSNADDNEW$ to 1 + equ ADRSNDELETE$ to 2 + equ ADRSNUPDATE$ to 3 + equ ADRSNUNDOUPDATE$ to 4 + equ ADRSNUNDOADDNEW$ to 5 + equ ADRSNUNDODELETE$ to 6 + equ ADRSNREQUERY$ to 7 + equ ADRSNRESYNCH$ to 8 + equ ADRSNCLOSE$ to 9 + equ ADRSNMOVE$ to 10 + equ ADRSNFIRSTCHANGE$ to 11 + equ ADRSNMOVEFIRST$ to 12 + equ ADRSNMOVENEXT$ to 13 + equ ADRSNMOVEPREVIOUS$ to 14 + equ ADRSNMOVELAST$ to 15 + +/////////////////////////////////////////////////////////////////////////////// + + * // SchemaEnum Values + equ ADSCHEMAPROVIDERSPECIFIC$ to -1 + equ ADSCHEMAASSERTS$ to 0 + equ ADSCHEMACATALOGS$ to 1 + equ ADSCHEMACHARACTERSETS$ to 2 + equ ADSCHEMACOLLATIONS$ to 3 + equ ADSCHEMACOLUMNS$ to 4 + equ ADSCHEMACHECKCONSTRAINTS$ to 5 + equ ADSCHEMACONSTRAINTCOLUMNUSAGE$ to 6 + equ ADSCHEMACONSTRAINTTABLEUSAGE$ to 7 + equ ADSCHEMAKEYCOLUMNUSAGE$ to 8 + equ ADSCHEMAREFERENTIALCONSTRAINTS$ to 9 + equ ADSCHEMATABLECONSTRAINTS$ to 10 + equ ADSCHEMACOLUMNSDOMAINUSAGE$ to 11 + equ ADSCHEMAINDEXES$ to 12 + equ ADSCHEMACOLUMNPRIVILEGES$ to 13 + equ ADSCHEMATABLEPRIVILEGES$ to 14 + equ ADSCHEMAUSAGEPRIVILEGES$ to 15 + equ ADSCHEMAPROCEDURES$ to 16 + equ ADSCHEMASCHEMATA$ to 17 + equ ADSCHEMASQLLANGUAGES$ to 18 + equ ADSCHEMASTATISTICS$ to 19 + equ ADSCHEMATABLES$ to 20 + equ ADSCHEMATRANSLATIONS$ to 21 + equ ADSCHEMAPROVIDERTYPES$ to 22 + equ ADSCHEMAVIEWS$ to 23 + equ ADSCHEMAVIEWCOLUMNUSAGE$ to 24 + equ ADSCHEMAVIEWTABLEUSAGE$ to 25 + equ ADSCHEMAPROCEDUREPARAMETERS$ to 26 + equ ADSCHEMAFOREIGNKEYS$ to 27 + equ ADSCHEMAPRIMARYKEYS$ to 28 + equ ADSCHEMAPROCEDURECOLUMNS$ to 29 + equ ADSCHEMADBINFOKEYWORDS$ to 30 + equ ADSCHEMADBINFOLITERALS$ to 31 + equ ADSCHEMACUBES$ to 32 + equ ADSCHEMADIMENSIONS$ to 33 + equ ADSCHEMAHIERARCHIES$ to 34 + equ ADSCHEMALEVELS$ to 35 + equ ADSCHEMAMEASURES$ to 36 + equ ADSCHEMAPROPERTIES$ to 37 + equ ADSCHEMAMEMBERS$ to 38 + equ ADSCHEMATRUSTEES$ to 39 + +/////////////////////////////////////////////////////////////////////////////// + + * // FieldStatusEnum Values + equ ADFIELDOK$ to 0 + equ ADFIELDCANTCONVERTVALUE$ to 2 + equ ADFIELDISNULL$ to 3 + equ ADFIELDTRUNCATED$ to 4 + equ ADFIELDSIGNMISMATCH$ to 5 + equ ADFIELDDATAOVERFLOW$ to 6 + equ ADFIELDCANTCREATE$ to 7 + equ ADFIELDUNAVAILABLE$ to 8 + equ ADFIELDPERMISSIONDENIED$ to 9 + equ ADFIELDINTEGRITYVIOLATION$ to 10 + equ ADFIELDSCHEMAVIOLATION$ to 11 + equ ADFIELDBADSTATUS$ to 12 + equ ADFIELDDEFAULT$ to 13 + equ ADFIELDIGNORE$ to 15 + equ ADFIELDDOESNOTEXIST$ to 16 + equ ADFIELDINVALIDURL$ to 17 + equ ADFIELDRESOURCELOCKED$ to 18 + equ ADFIELDRESOURCEEXISTS$ to 19 + equ ADFIELDCANNOTCOMPLETE$ to 20 + equ ADFIELDVOLUMENOTFOUND$ to 21 + equ ADFIELDOUTOFSPACE$ to 22 + equ ADFIELDCANNOTDELETESOURCE$ to 23 + equ ADFIELDREADONLY$ to 24 + equ ADFIELDRESOURCEOUTOFSCOPE$ to 25 + equ ADFIELDALREADYEXISTS$ to 26 + equ ADFIELDPENDINGINSERT$ to 0x10000 + equ ADFIELDPENDINGDELETE$ to 0x20000 + equ ADFIELDPENDINGCHANGE$ to 0x40000 + equ ADFIELDPENDINGUNKNOWN$ to 0x80000 + equ ADFIELDPENDINGUNKNOWNDELETE$ to 0x100000 + +/////////////////////////////////////////////////////////////////////////////// + + * // SeekEnum Values + equ ADSEEKFIRSTEQ$ to 0x1 + equ ADSEEKLASTEQ$ to 0x2 + equ ADSEEKAFTEREQ$ to 0x4 + equ ADSEEKAFTER$ to 0x8 + equ ADSEEKBEFOREEQ$ to 0x10 + equ ADSEEKBEFORE$ to 0x20 + +/////////////////////////////////////////////////////////////////////////////// + + * // ADCPROP_UPDATECRITERIA_ENUM Values + equ ADCRITERIAKEY$ to 0 + equ ADCRITERIAALLCOLS$ to 1 + equ ADCRITERIAUPDCOLS$ to 2 + equ ADCRITERIATIMESTAMP$ to 3 + +/////////////////////////////////////////////////////////////////////////////// + + * // ADCPROP_ASYNCTHREADPRIORITY_ENUM Values + equ ADPRIORITYLOWEST$ to 1 + equ ADPRIORITYBELOWNORMAL$ to 2 + equ ADPRIORITYNORMAL$ to 3 + equ ADPRIORITYABOVENORMAL$ to 4 + equ ADPRIORITYHIGHEST$ to 5 + +/////////////////////////////////////////////////////////////////////////////// + + * // ADCPROP_AUTORECALC_ENUM Values + equ ADRECALCUPFRONT$ to 0 + equ ADRECALCALWAYS$ to 1 + +/////////////////////////////////////////////////////////////////////////////// + + * // MoveRecordOptionsEnum Values + equ ADMOVEUNSPECIFIED$ to -1 + equ ADMOVEOVERWRITE$ to 1 + equ ADMOVEDONTUPDATELINKS$ to 2 + equ ADMOVEALLOWEMULATION$ to 4 + +/////////////////////////////////////////////////////////////////////////////// + + * // CopyRecordOptionsEnum Values + equ ADCOPYUNSPECIFIED$ to -1 + equ ADCOPYOVERWRITE$ to 1 + equ ADCOPYALLOWEMULATION$ to 4 + equ ADCOPYNONRECURSIVE$ to 2 + +/////////////////////////////////////////////////////////////////////////////// + + * // StreamTypeEnum Values + equ ADTYPEBINARY$ to 1 + equ ADTYPETEXT$ to 2 + +/////////////////////////////////////////////////////////////////////////////// + + * // LineSeparatorEnum Values + equ ADLF$ to 10 + equ ADCR$ to 13 + equ ADCRLF$ to -1 + +/////////////////////////////////////////////////////////////////////////////// + + * // StreamOpenOptionsEnum Values + equ ADOPENSTREAMUNSPECIFIED$ to -1 + equ ADOPENSTREAMASYNC$ to 1 + equ ADOPENSTREAMFROMRECORD$ to 4 + +/////////////////////////////////////////////////////////////////////////////// + + * // StreamWriteEnum Values + equ ADWRITECHAR$ to 0 + equ ADWRITELINE$ to 1 + +/////////////////////////////////////////////////////////////////////////////// + + * // SaveOptionsEnum Values + equ ADSAVECREATENOTEXIST$ to 1 + equ ADSAVECREATEOVERWRITE$ to 2 + +/////////////////////////////////////////////////////////////////////////////// + + * // FieldEnum Values + equ ADDEFAULTSTREAM$ to -1 + equ ADRECORDURL$ to -2 + +/////////////////////////////////////////////////////////////////////////////// + + * // StreamReadEnum Values + equ ADREADALL$ to -1 + equ ADREADLINE$ to -2 + +/////////////////////////////////////////////////////////////////////////////// + + * // RecordTypeEnum Values ---- + equ ADSIMPLERECORD$ to 0 + equ ADCOLLECTIONRECORD$ to 1 + equ ADSTRUCTDOC$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_ANIMATE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_ANIMATE_EQUATES.txt new file mode 100644 index 0000000..a157e7a --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_ANIMATE_EQUATES.txt @@ -0,0 +1,80 @@ +compile insert msWin_Animate_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date February 2013 + Purpose Equates for Win32 Animate controls + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_ANIMATE_INSERT_ +#define _MSWIN_ANIMATE_INSERT_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $insert msWin_CommCtrl_Equates + +//////////////////////////////////////////////////////////////////////////////// +// Animate Class /////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ ANIMATE_CLASS$ to "SysAnimate32" + +//////////////////////////////////////////////////////////////////////////////// +// Animate Messages //////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ ACM_OPENA$ to 0x0464 ; * // ( WM_USER + 100 ) + equ ACM_PLAY$ to 0x0465 ; * // ( WM_USER + 101 ) + equ ACM_STOP$ to 0x0466 ; * // ( WM_USER + 102 ) + equ ACM_OPENW$ to 0x0467 ; * // ( WM_USER + 103 ) + +//////////////////////////////////////////////////////////////////////////////// +// Animate Styles ////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ ACS_CENTER$ to 0x0001 + equ ACS_TRANSPARENT$ to 0x0002 + equ ACS_AUTOPLAY$ to 0x0004 + equ ACS_TIMER$ to 0x0008 + +//////////////////////////////////////////////////////////////////////////////// +// Animate Notifications /////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ ACN_START$ to 1 + equ ACN_STOP$ to 2 + +//////////////////////////////////////////////////////////////////////////////// +// Animate Shell32 clips /////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // These are resource IDs for the standard platform AVI clips - note these + * // were removed as of Windows Vista. + + equ AC_SHELL32_FINDFOLDER$ to "shell32.dll#150" + equ AC_SHELL32_FINDFILE$ to "shell32.dll#151" + equ AC_SHELL32_FINDCOMPUTER$ to "shell32.dll#152" + equ AC_SHELL32_MOVEFILE$ to "shell32.dll#160" + equ AC_SHELL32_COPYFILE$ to "shell32.dll#161" + equ AC_SHELL32_RECYCLEFILE$ to "shell32.dll#162" + equ AC_SHELL32_EMPTYRECYCLE$ to "shell32.dll#163" + equ AC_SHELL32_DELETEFILE$ to "shell32.dll#164" + equ AC_SHELL32_CHECKPROPERTIES$ to "shell32.dll#165" ; * // XP+ only beyond this point! + equ AC_SHELL32_WEBSEARCH$ to "shell32.dll#166" + equ AC_SHELL32_MOVEFILE_ORIG$ to "shell32.dll#167" + equ AC_SHELL32_COPYFILE_ORIG$ to "shell32.dll#168" + equ AC_SHELL32_DELETEFILE_ORIG$ to "shell32.dll#169" + equ AC_SHELL32_WEBCOPY$ to "shell32.dll#170" + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_AUTOCOMPLETE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_AUTOCOMPLETE_EQUATES.txt new file mode 100644 index 0000000..9d0714b --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_AUTOCOMPLETE_EQUATES.txt @@ -0,0 +1,59 @@ +compile insert msWin_AutoComplete_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : Feb 2013 + Purpose : Autocomplete constant definitions + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_AUTOCOMPLETE_EQUATES_ +#define _MSWIN_AUTOCOMPLETE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SHAutoComplete equates + equ SHACF_DEFAULT$ to 0x00000000; * // Currently (SHACF_FILESYSTEM | SHACF_URLALL) + equ SHACF_FILESYSTEM$ to 0x00000001; * // This includes the File System as well as the rest of the shell (Desktop\My Computer\Control Panel\) + equ SHACF_URLHISTORY$ to 0x00000002; * // URLs in the User's History + equ SHACF_URLMRU$ to 0x00000004; * // URLs in the User's Recently Used list. + equ SHACF_USETAB$ to 0x00000008; * // Use the tab to move thru the autocomplete possibilities instead of to the next dialog/window control. + equ SHACF_FILESYS_ONLY$ to 0x00000010; * // This includes the File System + equ SHACF_FILESYS_DIRS$ to 0x00000020; * // Same as SHACF_FILESYS_ONLY except it only includes directories, UNC servers, and UNC server shares. + equ SHACF_VIRTUAL_NAMESPACE$ to 0x00000040; * // Also include the virtual namespace + equ SHACF_AUTOSUGGEST_FORCE_ON$ to 0x10000000; * // Ignore the registry default and force the feature on. + equ SHACF_AUTOSUGGEST_FORCE_OFF$ to 0x20000000; * // Ignore the registry default and force the feature off. + equ SHACF_AUTOAPPEND_FORCE_ON$ to 0x40000000; * // Ignore the registry default and force the feature on. (Also know as AutoComplete) + equ SHACF_AUTOAPPEND_FORCE_OFF$ to 0x80000000; * // Ignore the registry default and force the feature off. (Also know as AutoComplete) + + equ SHACF_URLALL$ to ( bitOr( SHACF_URLHISTORY$, SHACF_URLMRU ) ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // IAutoComplete equates + equ ACO_NONE$ to 0x00000000 + equ ACO_AUTOSUGGEST$ to 0x00000001 + equ ACO_AUTOAPPEND$ to 0x00000002 + equ ACO_SEARCH$ to 0x00000004 + equ ACO_FILTERPREFIXES$ to 0x00000008 + equ ACO_USETAB$ to 0x00000010 + equ ACO_UPDOWNKEYDROPSLIST$ to 0x00000020 + equ ACO_RTLREADING$ to 0x00000040 + equ ACO_WORD_FILTER$ to 0x00000080 + equ ACO_NOPREFIXFILTERING$ to 0x00000100 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_BUTTON_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_BUTTON_EQUATES.txt new file mode 100644 index 0000000..10f2055 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_BUTTON_EQUATES.txt @@ -0,0 +1,134 @@ +compile insert msWin_Button_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date June 2013 + Purpose Equates for Win32 Button controls + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_BUTTON_EQUATES_ +#define _MSWIN_BUTTON_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ BUTTON_CLASS$ to "Button" + +/////////////////////////////////////////////////////////////////////////////// +// Button Messages //////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // From winuser.h + + equ BM_GETCHECK$ to 0x00F0 + equ BM_SETCHECK$ to 0x00F1 + equ BM_GETSTATE$ to 0x00F2 + equ BM_SETSTATE$ to 0x00F3 + equ BM_SETSTYLE$ to 0x00F4 + equ BM_CLICK$ to 0x00F5 + equ BM_GETIMAGE$ to 0x00F6 + equ BM_SETIMAGE$ to 0x00F7 + equ BM_SETDONTCLICK$ to 0x00F8 + + * // From commctrl.h + + equ BCM_FIRST$ to 0x1600 + + equ BCM_GETIDEALSIZE$ to 0x1601 ; * // ( BCM_FIRST + 1 ) + equ BCM_SETIMAGELIST$ to 0x1602 ; * // ( BCM_FIRST + 2 ) + equ BCM_GETIMAGELIST$ to 0x1603 ; * // ( BCM_FIRST + 3 ) + equ BCM_SETTEXTMARGIN$ to 0x1604 ; * // ( BCM_FIRST + 4 ) + equ BCM_GETTEXTMARGIN$ to 0x1605 ; * // ( BCM_FIRST + 5 ) + equ BCM_SETDROPDOWNSTATE$ to 0x1606 ; * // ( BCM_FIRST + 6 ) + equ BCM_SETSPLITINFO$ to 0x1607 ; * // ( BCM_FIRST + 7 ) + equ BCM_GETSPLITINFO$ to 0x1608 ; * // ( BCM_FIRST + 8 ) + equ BCM_SETNOTE$ to 0x1609 ; * // ( BCM_FIRST + 9 ) + equ BCM_GETNOTE$ to 0x160A ; * // ( BCM_FIRST + 10 ) + equ BCM_GETNOTELENGTH$ to 0x160B ; * // ( BCM_FIRST + 11 ) + equ BCM_SETSHIELD$ to 0x160C ; * // ( BCM_FIRST + 12 ) + +/////////////////////////////////////////////////////////////////////////////// +// Button Messages //////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ BST_UNCHECKED$ to 0x0000 + equ BST_CHECKED$ to 0x0001 + equ BST_INDETERMINATE$ to 0x0002 + equ BST_PUSHED$ to 0x0004 + equ BST_FOCUS$ to 0x0008 + equ BST_HOT$ to 0x0200 + equ BST_DROPDOWNPUSHED$ to 0x0400 + +/////////////////////////////////////////////////////////////////////////////// +// Button Styles ////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ BS_PUSHBUTTON$ to 0x00000000 + equ BS_DEFPUSHBUTTON$ to 0x00000001 + equ BS_CHECKBOX$ to 0x00000002 + equ BS_AUTOCHECKBOX$ to 0x00000003 + equ BS_RADIOBUTTON$ to 0x00000004 + equ BS_3STATE$ to 0x00000005 + equ BS_AUTO3STATE$ to 0x00000006 + equ BS_GROUPBOX$ to 0x00000007 + equ BS_USERBUTTON$ to 0x00000008 + equ BS_AUTORADIOBUTTON$ to 0x00000009 + equ BS_PUSHBOX$ to 0x0000000A + equ BS_OWNERDRAW$ to 0x0000000B + equ BS_TYPEMASK$ to 0x0000000F + equ BS_LEFTTEXT$ to 0x00000020 + equ BS_TEXT$ to 0x00000000 + equ BS_ICON$ to 0x00000040 + equ BS_BITMAP$ to 0x00000080 + equ BS_LEFT$ to 0x00000100 + equ BS_RIGHT$ to 0x00000200 + equ BS_CENTER$ to 0x00000300 + equ BS_TOP$ to 0x00000400 + equ BS_BOTTOM$ to 0x00000800 + equ BS_VCENTER$ to 0x00000C00 + equ BS_PUSHLIKE$ to 0x00001000 + equ BS_MULTILINE$ to 0x00002000 + equ BS_NOTIFY$ to 0x00004000 + equ BS_FLAT$ to 0x00008000 + equ BS_RIGHTBUTTON$ to BS_LEFTTEXT$ + equ BS_SPLITBUTTON$ to 0x0000000C + equ BS_DEFSPLITBUTTON$ to 0x0000000D + equ BS_COMMANDLINK$ to 0x0000000E + equ BS_DEFCOMMANDLINK$ to 0x0000000F + +/////////////////////////////////////////////////////////////////////////////// +// Button Notification Codes ////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // WM_COMMAND codes + + equ BN_CLICKED$ to 0 + equ BN_PAINT$ to 1 + equ BN_HILITE$ to 2 + equ BN_UNHILITE$ to 3 + equ BN_DISABLE$ to 4 + equ BN_DOUBLECLICKED$ to 5 + equ BN_PUSHED$ to BN_HILITE$ + equ BN_UNPUSHED$ to BN_UNHILITE$ + equ BN_DBLCLK$ to BN_DOUBLECLICKED$ + equ BN_SETFOCUS$ to 6 + equ BN_KILLFOCUS$ to 7 + + // WM_NOTIFY codes + + equ BCN_FIRST$ to -1250 ; * // (0U-1250U) + equ BCN_LAST$ to -1350 ; * // (0U-1350U) + + equ BCN_HOTITEMCHANGE$ to -1249 ; * // (BCN_FIRST + 0x0001) + equ BCN_DROPDOWN$ to -1248 ; * // (BCN_FIRST + 0x0002) + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_CHOOSEFONT_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_CHOOSEFONT_EQUATES.txt new file mode 100644 index 0000000..d8a3da1 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_CHOOSEFONT_EQUATES.txt @@ -0,0 +1,57 @@ +compile insert msWin_ChooseFont_Equates +/* + ** Copyright (C) 2015 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Dec 2015 + Purpose Equates for use with the WINAPI ChooseFont function + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_CHOOSEFONT_EQUATES_ +#define _MSWIN_CHOOSEFONT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ CT_SCREENFONTS$ to 0x00000001 + equ CT_PRINTERFONTS$ to 0x00000002 + equ CT_BOTH$ bitOr( CF_SCREENFONTS$, CF_PRINTERFONTS$ ) + equ CT_SHOWHELP$ to 0x00000004 + equ CT_ENABLEHOOK$ to 0x00000008 + equ CT_ENABLETEMPLATE$ to 0x00000010 + equ CT_ENABLETEMPLATEHANDLE$ to 0x00000020 + equ CT_INITTOLOGFONTSTRUCT$ to 0x00000040 + equ CT_USESTYLE$ to 0x00000080 + equ CT_EFFECTS$ to 0x00000100 + equ CT_APPLY$ to 0x00000200 + equ CT_ANSIONLY$ to 0x00000400 + equ CT_SCRIPTSONLY$ CF_ANSIONLY$ + equ CT_NOVECTORFONTS$ to 0x00000800 + equ CT_NOOEMFONTS$ CF_NOVECTORFONTS$ + equ CT_NOSIMULATIONS$ to 0x00001000 + equ CT_LIMITSIZE$ to 0x00002000 + equ CT_FIXEDPITCHONLY$ to 0x00004000 + equ CT_WYSIWYG$ to 0x00008000 + equ CT_FORCEFONTEXIST$ to 0x00010000 + equ CT_SCALABLEONLY$ to 0x00020000 + equ CT_TTONLY$ to 0x00040000 + equ CT_NOFACESEL$ to 0x00080000 + equ CT_NOSTYLESEL$ to 0x00100000 + equ CT_NOSIZESEL$ to 0x00200000 + equ CT_SELECTSCRIPT$ to 0x00400000 + equ CT_NOSCRIPTSEL$ to 0x00800000 + equ CT_NOVERTFONTS$ to 0x01000000 + equ CT_INACTIVEFONTS$ to 0x02000000 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_CLSCTX_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_CLSCTX_EQUATES.txt new file mode 100644 index 0000000..c44cd69 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_CLSCTX_EQUATES.txt @@ -0,0 +1,55 @@ +compile insert msWin_CLSCTX_Equates +/* + ** Copyright (C) 2013-2021 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Oct 2021 + Purpose Equates for CLSCTX_ flags + + Comments + + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_CLSCTX_EQUATES_ +#define _MSWIN_CLSCTX_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ CLSCTX_INPROC_SERVER$ to 0x1 + equ CLSCTX_INPROC_HANDLER$ to 0x2 + equ CLSCTX_LOCAL_SERVER$ to 0x4 + equ CLSCTX_INPROC_SERVER16$ to 0x8 + equ CLSCTX_REMOTE_SERVER$ to 0x10 + equ CLSCTX_INPROC_HANDLER16$ to 0x20 + equ CLSCTX_RESERVED1$ to 0x40 + equ CLSCTX_RESERVED2$ to 0x80 + equ CLSCTX_RESERVED3$ to 0x100 + equ CLSCTX_RESERVED4$ to 0x200 + equ CLSCTX_NO_CODE_DOWNLOAD$ to 0x400 + equ CLSCTX_RESERVED5$ to 0x800 + equ CLSCTX_NO_CUSTOM_MARSHAL$ to 0x1000 + equ CLSCTX_ENABLE_CODE_DOWNLOAD$ to 0x2000 + equ CLSCTX_NO_FAILURE_LOG$ to 0x4000 + equ CLSCTX_DISABLE_AAA$ to 0x8000 + equ CLSCTX_ENABLE_AAA$ to 0x10000 + equ CLSCTX_FROM_DEFAULT_CONTEXT$ to 0x20000 + equ CLSCTX_ACTIVATE_X86_SERVER$ to 0x40000 + equ CLSCTX_ACTIVATE_32_BIT_SERVER$ to CLSCTX_ACTIVATE_X86_SERVER$ + equ CLSCTX_ACTIVATE_64_BIT_SERVER$ to 0x80000 + equ CLSCTX_ENABLE_CLOAKING$ to 0x100000 + equ CLSCTX_APPCONTAINER$ to 0x400000 + equ CLSCTX_ACTIVATE_AAA_AS_IU$ to 0x800000 + equ CLSCTX_RESERVED6$ to 0x1000000 + equ CLSCTX_ACTIVATE_ARM32_SERVER$ to 0x2000000 + equ CLSCTX_PS_DLL$ to 0x80000000 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_COMBOBOXEX_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_COMBOBOXEX_EQUATES.txt new file mode 100644 index 0000000..7736c6b --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_COMBOBOXEX_EQUATES.txt @@ -0,0 +1,114 @@ +compile insert msWin_ComboBoxEx_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date October 2012 + Purpose Equates for ComboboxEx controls + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + +#ifndef _MSWIN_COMBOBOXEX_EQUATES_ +#define _MSWIN_COMBOBOXEX_EQUATES_ + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $insert msWin_CommCtrl_Equates + $insert msWin_ComboBox_Equates + +//////////////////////////////////////////////////////////////////////////////// +// ComboBoxEx Class //////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ WC_COMBOBOX_EX$ to "ComboBoxEx32" + +//////////////////////////////////////////////////////////////////////////////// +// ComboBoxEx Messages ///////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ CBEM_INSERTITEMA$ to 0x401 ; * // (WM_USER + 1) + equ CBEM_SETIMAGELIST$ to 0x402 ; * // (WM_USER + 2) + equ CBEM_GETIMAGELIST$ to 0x403 ; * // (WM_USER + 3) + equ CBEM_GETITEMA$ to 0x404 ; * // (WM_USER + 4) + equ CBEM_SETITEMA$ to 0x405 ; * // (WM_USER + 5) + equ CBEM_DELETEITEM$ to CB_DELETESTRING$ + equ CBEM_GETCOMBOCONTROL$ to 0x406 ; * // (WM_USER + 6) + equ CBEM_GETEDITCONTROL$ to 0x407 ; * // (WM_USER + 7) + equ CBEM_SETEXSTYLE$ to 0x408 ; * // (WM_USER + 8) use SETEXTENDEDSTYLE instead + equ CBEM_SETEXTENDEDSTYLE$ to 0x40E ; * // (WM_USER + 14) lparam == new style, wParam (optional) == mask + equ CBEM_GETEXSTYLE$ to 0x409 ; * // (WM_USER + 9) use GETEXTENDEDSTYLE instead + equ CBEM_GETEXTENDEDSTYLE$ to 0x409 ; * // (WM_USER + 9) + equ CBEM_SETUNICODEFORMAT$ to CCM_SETUNICODEFORMAT$ + equ CBEM_GETUNICODEFORMAT$ to CCM_GETUNICODEFORMAT$ + equ CBEM_HASEDITCHANGED$ to 0x40A ; * // (WM_USER + 10) + equ CBEM_INSERTITEMW$ to 0x40B ; * // (WM_USER + 11) + equ CBEM_SETITEMW$ to 0x40C ; * // (WM_USER + 12) + equ CBEM_GETITEMW$ to 0x40D ; * // (WM_USER + 13) + equ CBEM_SETWINDOWTHEME$ to CCM_SETWINDOWTHEME$ + +#ifdef UNICODE + equ CBEM_INSERTITEM$ to CBEM_INSERTITEMW$ + equ CBEM_SETITEM$ to CBEM_SETITEMW$ + equ CBEM_GETITEM$ to CBEM_GETITEMW$ +#endif +#ifndef UNICODE + equ CBEM_INSERTITEM$ to CBEM_INSERTITEMA$ + equ CBEM_SETITEM$ to CBEM_SETITEMA$ + equ CBEM_GETITEM$ to CBEM_GETITEMA$ +#endif + +//////////////////////////////////////////////////////////////////////////////// +// ComboBoxEx Extended Styles ////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ CBES_EX_NOEDITIMAGE$ to 0x00000001 + equ CBES_EX_NOEDITIMAGEINDENT$ to 0x00000002 + equ CBES_EX_PATHWORDBREAKPROC$ to 0x00000004 + equ CBES_EX_NOSIZELIMIT$ to 0x00000008 + equ CBES_EX_CASESENSITIVE$ to 0x00000010 + +//////////////////////////////////////////////////////////////////////////////// +// ComboBoxEx Notifications //////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ CBEN_FIRST$ to -800 ; * // (0U-800U) + equ CBEN_LAST$ to -830 ; * // (0U-830U) + + equ CBEN_GETDISPINFOA$ to (CBEN_FIRST$ - 0) + equ CBEN_INSERTITEM$ to (CBEN_FIRST$ - 1) + equ CBEN_DELETEITEM$ to (CBEN_FIRST$ - 2) + equ CBEN_BEGINEDIT$ to (CBEN_FIRST$ - 4) + equ CBEN_ENDEDITA$ to (CBEN_FIRST$ - 5) + equ CBEN_ENDEDITW$ to (CBEN_FIRST$ - 6) + equ CBEN_GETDISPINFOW$ to (CBEN_FIRST$ - 7) + equ CBEN_DRAGBEGINA$ to (CBEN_FIRST$ - 8) + equ CBEN_DRAGBEGINW$ to (CBEN_FIRST$ - 9) + +#ifdef UNICODE + equ CBEN_DRAGBEGIN$ to CBEN_DRAGBEGINW$ + equ CBEN_ENDEDIT$ to CBEN_ENDEDITW$ + equ CBEN_GETDISPINFO$ to CBEN_GETDISPINFOW$ +#endif +#ifndef UNICODE + equ CBEN_DRAGBEGIN$ to CBEN_DRAGBEGINA$ + equ CBEN_ENDEDIT$ to CBEN_ENDEDITA$ + equ CBEN_GETDISPINFO$ to CBEN_GETDISPINFOW$ +#endif + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ CBEMAXSTRLEN$ to 260 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_COMBOBOX_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_COMBOBOX_EQUATES.txt new file mode 100644 index 0000000..24a3932 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_COMBOBOX_EQUATES.txt @@ -0,0 +1,140 @@ +compile insert msWin_ComboBox_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date October 2012 + Purpose Equates for Combobox controls + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_COMBOBOX_EQUATES_ +#define _MSWIN_COMBOBOX_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +// Combobox Messages ////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ CB_GETEDITSEL$ to 0x0140 + equ CB_LIMITTEXT$ to 0x0141 + equ CB_SETEDITSEL$ to 0x0142 + equ CB_ADDSTRING$ to 0x0143 + equ CB_DELETESTRING$ to 0x0144 + equ CB_DIR$ to 0x0145 + equ CB_GETCOUNT$ to 0x0146 + equ CB_GETCURSEL$ to 0x0147 + equ CB_GETLBTEXT$ to 0x0148 + equ CB_GETLBTEXTLEN$ to 0x0149 + equ CB_INSERTSTRING$ to 0x014A + equ CB_RESETCONTENT$ to 0x014B + equ CB_FINDSTRING$ to 0x014C + equ CB_SELECTSTRING$ to 0x014D + equ CB_SETCURSEL$ to 0x014E + equ CB_SHOWDROPDOWN$ to 0x014F + equ CB_GETITEMDATA$ to 0x0150 + equ CB_SETITEMDATA$ to 0x0151 + equ CB_GETDROPPEDCONTROLRECT$ to 0x0152 + equ CB_SETITEMHEIGHT$ to 0x0153 + equ CB_GETITEMHEIGHT$ to 0x0154 + equ CB_SETEXTENDEDUI$ to 0x0155 + equ CB_GETEXTENDEDUI$ to 0x0156 + equ CB_GETDROPPEDSTATE$ to 0x0157 + equ CB_FINDSTRINGEXACT$ to 0x0158 + equ CB_SETLOCALE$ to 345 + equ CB_GETLOCALE$ to 346 + equ CB_GETTOPINDEX$ to 347 + equ CB_SETTOPINDEX$ to 348 + equ CB_GETHORIZONTALEXTENT$ to 349 + equ CB_SETHORIZONTALEXTENT$ to 350 + equ CB_GETDROPPEDWIDTH$ to 351 + equ CB_SETDROPPEDWIDTH$ to 352 + equ CB_INITSTORAGE$ to 353 + equ CB_MSGMAX$ to 354 + + // Extended combobox control messages from commctrl.h + + equ CBM_FIRST$ to 0x1700 + equ CB_SETMINVISIBLE$ to 0x1701 ; * // ( CBM_FIRST + 1 ) + equ CB_GETMINVISIBLE$ to 0x1702 ; * // ( CBM_FIRST + 2 ) + +/////////////////////////////////////////////////////////////////////////////// +// Combobox Styles //////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ CBS_SIMPLE$ to 1 + equ CBS_DROPDOWN$ to 2 + equ CBS_DROPDOWNLIST$ to 3 + equ CBS_OWNERDRAWFIXED$ to 0x10 + equ CBS_OWNERDRAWVARIABLE$ to 0x20 + equ CBS_AUTOHSCROLL$ to 0x40 + equ CBS_OEMCONVERT$ to 0x80 + equ CBS_SORT$ to 0x100 + equ CBS_HASSTRINGS$ to 0x200 + equ CBS_NOINTEGRALHEIGHT$ to 0x400 + equ CBS_DISABLENOSCROLL$ to 0x800 + equ CBS_UPPERCASE$ to 0x2000 + equ CBS_LOWERCASE$ to 0x4000 + +/////////////////////////////////////////////////////////////////////////////// +// Combobox Return Values ///////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ CB_OKAY$ to 0 + equ CB_ERR$ to -1 + equ CB_ERRSPACE$ to -2; + +/////////////////////////////////////////////////////////////////////////////// +// Combobox Notification Codes //////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ CBN_ERRSPACE$ to (-1) + equ CBN_SELCHANGE$ to 1 + equ CBN_DBLCLK$ to 2 + equ CBN_SETFOCUS$ to 3 + equ CBN_KILLFOCUS$ to 4 + equ CBN_EDITCHANGE$ to 5 + equ CBN_EDITUPDATE$ to 6 + equ CBN_DROPDOWN$ to 7 + equ CBN_CLOSEUP$ to 8 + equ CBN_SELENDOK$ to 9 + equ CBN_SELENDCANCEL$ to 10 + +//////////////////////////////////////////////////////////////////////////////// +// COMBOBOXINFO structure ////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + +/* + Superceded by the GETINFO method in v10 + +typedef struct tagCOMBOBOXINFO +{ + DWORD cbSize; + RECT rcItem; + RECT rcButton; + DWORD stateButton; + HWND hwndCombo; + HWND hwndItem; + HWND hwndList; +} COMBOBOXINFO, *PCOMBOBOXINFO, *LPCOMBOBOXINFO; + + $uses @APPID*APPROW**SYSOBJ:STRUCT_MSWIN_COMBOBOXINFO + + equ COMBOBOXINFO$ to "MSWIN_COMBOBOXINFO" ; * // struct name + + equ CBI_POS_CBSIZE$ to 1 + equ CBI_POS_RCITEM$ to 2 + equ CBI_POS_RCBUTTON$ to 3 + equ CBI_POS_STATEBUTTON$ to 4 + equ CBI_POS_HWNDCOMBO$ to 5 + equ CBI_POS_HWNDITEM$ to 6 + equ CBI_POS_HWNDLIST$ to 7 + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + +#endif + diff --git a/SYSPROG/STPROCINS/MSWIN_COMMCTRL_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_COMMCTRL_EQUATES.txt new file mode 100644 index 0000000..3e0c038 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_COMMCTRL_EQUATES.txt @@ -0,0 +1,190 @@ +compile insert msWin_CommCtrl_Equates +/* + ** Copyright (C) 2013-2020 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date February 2013 + Purpose General Equates for Win32 common controls + + Amended Date Reason + ======= ==== ====== + Mr C 06 Apr 20 Updated to reference DLLSTRUCT entities +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_COMMCTRL_INSERT_ +#define _MSWIN_COMMCTRL_INSERT_ +//////////////////////////////////////////////////////////////////////////////// +// Images ////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ I_IMAGECALLBACK$ to -1 + equ I_IMAGENONE$ to -2 + +//////////////////////////////////////////////////////////////////////////////// +// Colors ////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ CLR_NONE$ to 0xFFFFFFFF + equ CLR_DEFAULT$ to 0xFF000000 + +//////////////////////////////////////////////////////////////////////////////// +// Common Messages ///////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ CCM_FIRST$ to 0x2000 ; * // Common control shared messages + equ CCM_LAST$ to 0x2200 ; * // ( CCM_FIRST + 0x200 ) + equ CCM_SETBKCOLOR$ to 0x2001 ; * // ( CCM_FIRST + 1 ) + equ CCM_SETCOLORSCHEME$ to 0x2002 ; * // ( CCM_FIRST + 2 ) + equ CCM_GETCOLORSCHEME$ to 0x2003 ; * // ( CCM_FIRST + 3 ) + equ CCM_GETDROPTARGET$ to 0x2004 ; * // ( CCM_FIRST + 4 ) + equ CCM_SETUNICODEFORMAT$ to 0x2005 ; * // ( CCM_FIRST + 5 ) + equ CCM_GETUNICODEFORMAT$ to 0x2006 ; * // ( CCM_FIRST + 6 ) + equ CCM_SETWINDOWTHEME$ to 0x200B ; * // ( CCM_FIRST + 0xB ) + equ CCM_DPISCALE$ to 0x200C ; * // ( CCM_FIRST + 0xC ) - wParam == Awareness + +//////////////////////////////////////////////////////////////////////////////// +// Common Styles /////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ CCS_TOP$ to 0x00000001 + equ CCS_NOMOVEY$ to 0x00000002 + equ CCS_BOTTOM$ to 0x00000003 + equ CCS_NORESIZE$ to 0x00000004 + equ CCS_NOPARENTALIGN$ to 0x00000008 + equ CCS_ADJUSTABLE$ to 0x00000020 + equ CCS_NODIVIDER$ to 0x00000040 + equ CCS_VERT$ to 0x00000080 + equ CCS_LEFT$ to (CCS_VERT$ + CCS_TOP$) + equ CCS_RIGHT$ to (CCS_VERT$ + CCS_BOTTOM$) + equ CCS_NOMOVEX$ to (CCS_VERT$ + CCS_NOMOVEY$) + +//////////////////////////////////////////////////////////////////////////////// +// Common Notification Messages //////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ NM_FIRST$ to 0 ; * // (0U- 0U) - generic to all controls + equ NM_LAST$ to -99 ; * // (0U- 99U) + + equ NM_OUTOFMEMORY$ to -1 ; * // (NM_FIRST-1) + equ NM_CLICK$ to -2 ; * // (NM_FIRST-2) // uses NMCLICK struct + equ NM_DBLCLK$ to -3 ; * // (NM_FIRST-3) + equ NM_RETURN$ to -4 ; * // (NM_FIRST-4) + equ NM_RCLICK$ to -5 ; * // (NM_FIRST-5) // uses NMCLICK struct + equ NM_RDBLCLK$ to -6 ; * // (NM_FIRST-6) + equ NM_SETFOCUS$ to -7 ; * // (NM_FIRST-7) + equ NM_KILLFOCUS$ to -8 ; * // (NM_FIRST-8) + equ NM_CUSTOMDRAW$ to -12 ; * // (NM_FIRST-12) + equ NM_HOVER$ to -13 ; * // (NM_FIRST-13) + equ NM_NCHITTEST$ to -14 ; * // (NM_FIRST-14) // uses NMMOUSE struct + equ NM_KEYDOWN$ to -15 ; * // (NM_FIRST-15) // uses NMKEY struct + equ NM_RELEASEDCAPTURE$ to -16 ; * // (NM_FIRST-16) + equ NM_SETCURSOR$ to -17 ; * // (NM_FIRST-17) // uses NMMOUSE struct + equ NM_CHAR$ to -18 ; * // (NM_FIRST-18) // uses NMCHAR struct + equ NM_TOOLTIPSCREATED$ to -19 ; * // (NM_FIRST-19) // notify of when the tooltips window is create + equ NM_LDOWN$ to -20 ; * // (NM_FIRST-20) + equ NM_RDOWN$ to -21 ; * // (NM_FIRST-21) + equ NM_THEMECHANGED$ to -22 ; * // (NM_FIRST-22) + + +//////////////////////////////////////////////////////////////////////////////// +// NM_CUSTOMDRAW Constants ///////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // custom draw return flags + * // values under 0x00010000 are reserved for global custom draw values. + * // above that are for specific controls + equ CDRF_DODEFAULT$ to 0x00000000 + equ CDRF_NEWFONT$ to 0x00000002 + equ CDRF_SKIPDEFAULT$ to 0x00000004 + equ CDRF_DOERASE$ to 0x00000008 ; * // draw the background + equ CDRF_SKIPPOSTPAINT$ to 0x00000100 ; * // don't draw the focus rect + + equ CDRF_NOTIFYPOSTPAINT$ to 0x00000010 + equ CDRF_NOTIFYITEMDRAW$ to 0x00000020 + equ CDRF_NOTIFYSUBITEMDRAW$ to 0x00000020 // flags are the same, we can distinguish by context + equ CDRF_NOTIFYPOSTERASE$ to 0x00000040 + + * // drawstage flags + * // values under 0x00010000 are reserved for global custom draw values. + * // above that are for specific controls + equ CDDS_PREPAINT$ to 0x00000001 + equ CDDS_POSTPAINT$ to 0x00000002 + equ CDDS_PREERASE$ to 0x00000003 + equ CDDS_POSTERASE$ to 0x00000004 + + * // the 0x000010000 bit means it's individual item specific + equ CDDS_ITEM$ to 0x00010000 + equ CDDS_ITEMPREPAINT$ to (CDDS_ITEM$ + CDDS_PREPAINT$) + equ CDDS_ITEMPOSTPAINT$ to (CDDS_ITEM$ + CDDS_POSTPAINT$) + equ CDDS_ITEMPREERASE$ to (CDDS_ITEM$ + CDDS_PREERASE$) + equ CDDS_ITEMPOSTERASE$ to (CDDS_ITEM$ + CDDS_POSTERASE$) + equ CDDS_SUBITEM$ to 0x00020000 + + * // itemState flags + equ CDIS_SELECTED$ to 0x0001 + equ CDIS_GRAYED$ to 0x0002 + equ CDIS_DISABLED$ to 0x0004 + equ CDIS_CHECKED$ to 0x0008 + equ CDIS_FOCUS$ to 0x0010 + equ CDIS_DEFAULT$ to 0x0020 + equ CDIS_HOT$ to 0x0040 + equ CDIS_MARKED$ to 0x0080 + equ CDIS_INDETERMINATE$ to 0x0100 + equ CDIS_SHOWKEYBOARDCUES$ to 0x0200 + equ CDIS_NEARHOT$ to 0x0400 + equ CDIS_OTHERSIDEHOT$ to 0x0800 + equ CDIS_DROPHILITED$ to 0x1000 + +//////////////////////////////////////////////////////////////////////////////// +// NMMOUSE structure ////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ NMMOUSE$ to "MSWIN_NMMOUSE" + + /* + typedef struct tagNMMOUSE { + NMHDR hdr; + DWORD_PTR dwItemSpec; + DWORD_PTR dwItemData; + POINT pt; + LPARAM dwHitInfo; + } NMMOUSE, *LPNMMOUSE; + */ + + equ NMMOUSE_POS_HWND_FROM$ to 1 + equ NMMOUSE_POS_ID_FROM$ to 2 + equ NMMOUSE_POS_CODE$ to 3 + equ NMMOUSE_POS_ITEM_SPEC$ to 4 + equ NMMOUSE_POS_ITEM_DATA$ to 5 + equ NMMOUSE_POS_PT_X$ to 6 + equ NMMOUSE_POS_PT_Y$ to 7 + equ NMMOUSE_POS_HIT_INFO$ to 8 + + $uses @APPID*DLLSTRUCT**MSWIN_NMMOUSE + +//////////////////////////////////////////////////////////////////////////////// +// COLORSCHEME structure /////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +/* + typedef struct tagCOLORSCHEME { + DWORD dwSize; + COLORREF clrBtnHighlight; + COLORREF clrBtnShadow; + } COLORSCHEME, *LPCOLORSCHEME; +*/ + + equ COLORSCHEME$ to "MSWIN_COLORSCHEME" + + equ COLORSCHEME_POS_CBSIZE$ to 1 + equ COLORSCHEME_POS_BTN_HILIGHT$ to 2 + equ COLORSCHEME_POS_BTN_SHADOW$ to 3 + + $uses @APPID*DLLSTRUCT**MSWIN_COLORSCHEME + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + +#endif + + diff --git a/SYSPROG/STPROCINS/MSWIN_COMPARESTRING_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_COMPARESTRING_EQUATES.txt new file mode 100644 index 0000000..9e17468 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_COMPARESTRING_EQUATES.txt @@ -0,0 +1,69 @@ +compile insert msWin_CompareString_Equates +/* + ** Copyright (C) 2012-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : May 2021 + Purpose : Equates for use with the Windows CompareStringEx API function + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_COMPARESTRING_EQUATES_ +#define _MSWIN_COMPARESTRING_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ NORM_IGNORECASE$ to 0x00000001 ; // ignore case + equ NORM_IGNORENONSPACE$ to 0x00000002 ; // ignore nonspacing chars + equ NORM_IGNORESYMBOLS$ to 0x00000004 ; // ignore symbols + + equ LINGUISTIC_IGNORECASE$ to 0x00000010 ; // linguistically appropriate 'ignore case' + equ LINGUISTIC_IGNOREDIACRITIC$ to 0x00000020 ; // linguistically appropriate 'ignore nonspace' + + equ NORM_IGNOREKANATYPE$ to 0x00010000 ; // ignore kanatype + equ NORM_IGNOREWIDTH$ to 0x00020000 ; // ignore width + equ NORM_LINGUISTIC_CASING$ to 0x08000000 ; // use linguistic rules for casing + + // WORD Sort: culturally correct sort + // hyphen and apostrophe are special cased + // example: "coop" and "co-op" will sort together in a list + // + // co_op <------- underscore (symbol) + // coat + // comb + // coop + // co-op <------- hyphen (punctuation) + // cork + // went + // were + // we're <------- apostrophe (punctuation) + // + // + // STRING Sort: hyphen and apostrophe will sort with all other symbols + // + // co-op <------- hyphen (punctuation) + // co_op <------- underscore (symbol) + // coat + // comb + // coop + // cork + // we're <------- apostrophe (punctuation) + // went + // were + // + equ SORT_STRINGSORT$ to 0x00001000 ; // use string sort method + equ SORT_DIGITSASNUMBERS$ to 0x00000008 ; // sort digits as numbers (ie: 2 comes before 10) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_DATETIMEPICKER_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_DATETIMEPICKER_EQUATES.txt new file mode 100644 index 0000000..a4d24fe --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_DATETIMEPICKER_EQUATES.txt @@ -0,0 +1,137 @@ +compile insert msWin_DateTimePicker_Equates +/* + ** Copyright (C) 2013-2020 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date February 2013 + Purpose Equates for Win32 DateTime Picker controls + + Amended Date Reason + ======= ==== ====== + Mr C 06 Apr 20 Updated to reference DLLSTRUCT entities +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_DATETIMEPICKER_EQUATES_ +#define _MSWIN_DATETIMEPICKER_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DATETIMEPICK_CLASS$ to "SysDateTimePick32" + +/////////////////////////////////////////////////////////////////////////////// +// DateTimePicker Messages //////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTM_FIRST$ to 0x1000 + equ DTM_GETSYSTEMTIME$ to 0x1001 + equ DTM_SETSYSTEMTIME$ to 0x1002 + equ DTM_GETRANGE$ to 0x1003 + equ DTM_SETRANGE$ to 0x1004 + equ DTM_SETFORMATA$ to 0x1005 + equ DTM_SETFORMATW$ to 0x1032 + equ DTM_SETMCCOLOR$ to 0x1006 + equ DTM_GETMCCOLOR$ to 0x1007 + equ DTM_GETMONTHCAL$ to 0x1008 + equ DTM_SETMCFONT$ to 0x1009 + equ DTM_GETMCFONT$ to 0x100A + equ DTM_SETMCSTYLE$ to 0x100B + equ DTM_GETMCSTYLE$ to 0x100C + equ DTM_CLOSEMONTHCAL$ to 0x100D + equ DTM_GETDATETIMEPICKERINFO$ to 0x100E + equ DTM_GETIDEALSIZE$ to 0x100F + +/////////////////////////////////////////////////////////////////////////////// +// DateTimePicker Styles ////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTS_SHORTDATEFORMAT$ to 0x00000000 + equ DTS_UPDOWN$ to 0x00000001 + equ DTS_SHOWNONE$ to 0x00000002 + equ DTS_LONGDATEFORMAT$ to 0x00000004 + equ DTS_TIMEFORMAT$ to 0x00000009 + equ DTS_SHORTDATECENTURYFORMAT$ to 0x0000000C + equ DTS_APPCANPARSE$ to 0x00000010 + equ DTS_RIGHTALIGN$ to 0x00000020 + +/////////////////////////////////////////////////////////////////////////////// +// DateTimePicker Notification Codes ////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTN_FIRST$ to -740 ; * // (0U-740U) + equ DTN_LAST$ to -745 ; * // (0U-745U) -> DTN_FIRST - 5 + + equ DTN_FIRST2$ to -753 ; * // (0U-753U) + equ DTN_LAST2$ to -799 ; * // (0U-799U) + + equ DTN_DATETIMECHANGE$ to ( DTN_FIRST2$ - 6 ) ; * // -759 + equ DTN_USERSTRINGA$ to ( DTN_FIRST2$ - 5 ) ; * // -758 + equ DTN_USERSTRINGW$ to ( DTN_FIRST$ - 5 ) ; * // -745 + equ DTN_WMKEYDOWNA$ to ( DTN_FIRST2$ - 4 ) ; * // -757 + equ DTN_WMKEYDOWNW$ to ( DTN_FIRST$ - 4 ) ; * // -744 + equ DTN_FORMATA$ to ( DTN_FIRST2$ - 3 ) ; * // -756 + equ DTN_FORMATW$ to ( DTN_FIRST$ - 3 ) ; * // -743 + equ DTN_FORMATQUERYA$ to ( DTN_FIRST2$ - 2 ) ; * // -755 + equ DTN_FORMATQUERYW$ to ( DTN_FIRST$ - 2 ) ; * // -742 + equ DTN_DROPDOWN$ to ( DTN_FIRST2$ - 1 ) ; * // -754 + equ DTN_CLOSEUP$ to ( DTN_FIRST2$ ) ; * // -753 + +/////////////////////////////////////////////////////////////////////////////// +// DateTimePicker Range constants ///////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ GDTR_MIN$ to 0x0001 + equ GDTR_MAX$ to 0x0002 + +/////////////////////////////////////////////////////////////////////////////// +// DateTimePicker Flags ////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ GDT_ERROR$ to -1 + equ GDT_VALID$ to 0 + equ GDT_NONE$ to 1 + +//////////////////////////////////////////////////////////////////////////////// +// DATETIMEPICKERINFOstructure ///////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +/* +typedef struct tagDATETIMEPICKERINFO +{ + DWORD cbSize; + RECT rcCheck; + DWORD stateCheck; + RECT rcButton; + DWORD stateButton; + HWND hwndEdit; + HWND hwndUD; + HWND hwndDropDown; +} DATETIMEPICKERINFO, *LPDATETIMEPICKERINFO; +*/ + + $uses @APPID*DLLSTRUCT**MSWIN_DATETIMEPICKERINFO + + equ DATETIMEPICKERINFO$ to "MSWIN_DATETIMEPICKERINFO" ; * // struct name + + equ DTPI_CBSIZE$ to 1 + equ DTPI_RCCHECK_LEFT$ to 2 + equ DTPI_RCCHECK_TOP$ to 3 + equ DTPI_RCCHECK_RIGHT$ to 4 + equ DTPI_RCCHECK_BOTTOM$ to 5 + equ DTPI_STATECHECK$ to 6 + equ DTPI_RCBUTTON_LEFT$ to 7 + equ DTPI_RCBUTTON_TOP$ to 8 + equ DTPI_RCBUTTON_RIGHT$ to 9 + equ DTPI_RCBUTTON_BOTTOM$ to 10 + equ DTPI_STATEBUTTON$ to 11 + equ DTPI_HWNDEDIT$ to 12 + equ DTPI_HWNDUD$ to 13 + equ DTPI_HWNDDROPDOWN$ to 14 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + + diff --git a/SYSPROG/STPROCINS/MSWIN_DRAWTEXT_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_DRAWTEXT_EQUATES.txt new file mode 100644 index 0000000..d0b5caf --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_DRAWTEXT_EQUATES.txt @@ -0,0 +1,51 @@ +compile insert msWin_DrawText_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date 02 March 2015 + Purpose Equates for use with the Windows API DrawText() function + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_DRAWTEXT_EQUATES_ +#define _MSWIN_DRAWTEXT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DT_TOP$ to 0x00000000 + equ DT_LEFT$ to 0x00000000 + equ DT_CENTER$ to 0x00000001 + equ DT_RIGHT$ to 0x00000002 + equ DT_VCENTER$ to 0x00000004 + equ DT_BOTTOM$ to 0x00000008 + equ DT_WORDBREAK$ to 0x00000010 + equ DT_SINGLELINE$ to 0x00000020 + equ DT_EXPANDTABS$ to 0x00000040 + equ DT_TABSTOP$ to 0x00000080 + equ DT_NOCLIP$ to 0x00000100 + equ DT_EXTERNALLEADING$ to 0x00000200 + equ DT_CALCRECT$ to 0x00000400 + equ DT_NOPREFIX$ to 0x00000800 + equ DT_INTERNAL$ to 0x00001000 + equ DT_EDITCONTROL$ to 0x00002000 + equ DT_PATH_ELLIPSIS$ to 0x00004000 + equ DT_END_ELLIPSIS$ to 0x00008000 + equ DT_MODIFYSTRING$ to 0x00010000 + equ DT_RTLREADING$ to 0x00020000 + equ DT_WORD_ELLIPSIS$ to 0x00040000 + equ DT_HIDEPREFIX$ to 0x00100000 + equ DT_PREFIXONLY$ to 0x00200000 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_EDIT_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_EDIT_EQUATES.txt new file mode 100644 index 0000000..7ea6196 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_EDIT_EQUATES.txt @@ -0,0 +1,94 @@ +compile insert MsWin_Edit_Equates +/* + Author Captain C + Date Oktober 2012 + Purpose Equates for the Windows EDIT controls + + Comments + + + Amended Date Reason + ======= ==== ====== + mtr 12 Dec 2014 Git sucks +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_EDIT_EQUATES_ +#define _MSWIN_EDIT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +// EDIT style equates ///////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ ES_LEFT$ to 0x0000 + equ ES_CENTER$ to 0x0001 + equ ES_RIGHT$ to 0x0002 + equ ES_MULTILINE$ to 0x0004 + equ ES_UPPERCASE$ to 0x0008 + equ ES_LOWERCASE$ to 0x0010 + equ ES_PASSWORD$ to 0x0020 + equ ES_AUTOVSCROLL$ to 0x0040 + equ ES_AUTOHSCROLL$ to 0x0080 + equ ES_NOHIDESEL$ to 0x0100 + equ ES_OEMCONVERT$ to 0x0400 + equ ES_READONLY$ to 0x0800 + equ ES_WANTRETURN$ to 0x1000 + +/////////////////////////////////////////////////////////////////////////////// +// EDIT message equates /////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ EM_GETSEL$ to 0x00B0 + equ EM_SETSEL$ to 0x00B1 + equ EM_GETRECT$ to 0x00B2 + equ EM_SETRECT$ to 0x00B3 + equ EM_SETRECTNP$ to 0x00B4 + equ EM_SCROLL$ to 0x00B5 + equ EM_LINESCROLL$ to 0x00B6 + equ EM_SCROLLCARET$ to 0x00B7 + equ EM_GETMODIFY$ to 0x00B8 + equ EM_SETMODIFY$ to 0x00B9 + equ EM_GETLINECOUNT$ to 0x00BA + equ EM_LINEINDEX$ to 0x00BB + equ EM_SETHANDLE$ to 0x00BC + equ EM_GETHANDLE$ to 0x00BD + equ EM_GETTHUMB$ to 0x00BE + equ EM_LINELENGTH$ to 0x00C1 + equ EM_REPLACESEL$ to 0x00C2 + equ EM_GETLINE$ to 0x00C4 + equ EM_LIMITTEXT$ to 0x00C5 + equ EM_CANUNDO$ to 0x00C6 + equ EM_UNDO$ to 0x00C7 + equ EM_FMTLINES$ to 0x00C8 + equ EM_LINEFROMCHAR$ to 0x00C9 + equ EM_SETTABSTOPS$ to 0x00CB + equ EM_SETPASSWORDCHAR$ to 0x00CC + equ EM_EMPTYUNDOBUFFER$ to 0x00CD + equ EM_GETFIRSTVISIBLELINE$ to 0x00CE + equ EM_SETREADONLY$ to 0x00CF + equ EM_SETWORDBREAKPROC$ to 0x00D0 + equ EM_GETWORDBREAKPROC$ to 0x00D1 + equ EM_GETPASSWORDCHAR$ to 0x00D2 + equ EM_SETMARGINS$ to 0x00D3 + equ EM_GETMARGINS$ to 0x00D4 + equ EM_SETLIMITTEXT$ to EM_LIMITTEXT$ + equ EM_GETLIMITTEXT$ to 0x00D5 + equ EM_POSFROMCHAR$ to 0x00D6 + equ EM_CHARFROMPOS$ to 0x00D7 + equ EM_SETIMESTATUS$ to 0x00D8 + equ EM_GETIMESTATUS$ to 0x00D9 + + equ ECM_FIRST$ to 0x1500 + equ EM_SETCUEBANNER$ to ECM_FIRST$ + 1 + equ EM_GETCUEBANNER$ to ECM_FIRST$ + 2 + equ EM_SHOWBALLOONTIP$ to ECM_FIRST$ + 3 + +/////////////////////////////////////////////////////////////////////////////// +// Misc EDIT equates ////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ EDIT_DFT_PASSWORD_CHAR$ to 42 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +#endif diff --git a/SYSPROG/STPROCINS/MSWIN_EVENTLOG_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_EVENTLOG_EQUATES.txt new file mode 100644 index 0000000..aff416f --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_EVENTLOG_EQUATES.txt @@ -0,0 +1,43 @@ +compile insert msWin_EventLog_Equates +/* + ** Copyright (C) 2020 Revelation Software Inc. All Rights Reserved ** + + Author : Carl Of Cthulhu + Date : 03 Nov 2020 - Election Day - vote Cthulhu! + Purpose : Constants for use with the Windows ReportEvent() API exported + from ADVAPI.DLL + + Comments + ======== + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_EVENT_LOG_EQUATES_ +#define _MSWIN_EVENT_LOG_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_RegisterEventSource + declare function msWin_DeregisterEventSource + declare function msWin_ReportEvent + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Event types + + equ EVENTLOG_SUCCESS$ to 0x0000 ; * // Information event + equ EVENTLOG_AUDIT_FAILURE$ to 0x0010 ; * // Failure Audit event + equ EVENTLOG_AUDIT_SUCCESS$ to 0x0008 ; * // Success Audit event + equ EVENTLOG_ERROR_TYPE$ to 0x0001 ; * // Error event + equ EVENTLOG_INFORMATION_TYPE$ to 0x0004 ; * // Information event + equ EVENTLOG_WARNING_TYPE$ to 0x0002 ; * // Warning event + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_FILEATTRIBUTE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_FILEATTRIBUTE_EQUATES.txt new file mode 100644 index 0000000..3c1145d --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_FILEATTRIBUTE_EQUATES.txt @@ -0,0 +1,47 @@ +compile insert msWin_FileAttribute_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Oct 2012 + Purpose Equates for use with the Windows File-related functions + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_FILEATTRIBUTE_EQUATES_ +#define _MSWIN_FILEATTRIBUTE_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + declare function msWin_GetFileAttributes + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ FILE_ATTRIBUTE_READONLY$ to 0x00000001 + equ FILE_ATTRIBUTE_HIDDEN$ to 0x00000002 + equ FILE_ATTRIBUTE_SYSTEM$ to 0x00000004 + equ FILE_ATTRIBUTE_DIRECTORY$ to 0x00000010 + equ FILE_ATTRIBUTE_ARCHIVE$ to 0x00000020 + equ FILE_ATTRIBUTE_NORMAL$ to 0x00000080 + equ FILE_ATTRIBUTE_TEMPORARY$ to 0x00000100 + equ FILE_ATTRIBUTE_SPARSE_FILE$ to 0x00000200 + equ FILE_ATTRIBUTE_REPARSE_POINT$ to 0x00000400 + equ FILE_ATTRIBUTE_COMPRESSED$ to 0x00000800 + equ FILE_ATTRIBUTE_OFFLINE$ to 0x00001000 + equ FILE_ATTRIBUTE_NOT_CONTENT_INDEXED$ to 0x00002000 + equ FILE_ATTRIBUTE_ENCRYPTED$ to 0x00004000 + equ FILE_ATTRIBUTE_VIRTUAL$ to 0x00010000 + + equ INVALID_FILE_ATTRIBUTES$ to 0xFFFFFFFF + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_FILENOTIFY_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_FILENOTIFY_EQUATES.txt new file mode 100644 index 0000000..41f004b --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_FILENOTIFY_EQUATES.txt @@ -0,0 +1,48 @@ +compile insert msWin_FileNotify_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Aug 2013 + Purpose Equates for use with the Windows ReadDirectoryChangesW functions + + Comments + ======== + + The FILE_NOTIFY_ constants below can be used with the DIRWATCHER WATCHDIR + method. + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_FILENOTIFY_EQUATES_ +#define _MSWIN_FILENOTIFY_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ FILE_NOTIFY_CHANGE_FILE_NAME$ to 0x00000001 + equ FILE_NOTIFY_CHANGE_DIR_NAME$ to 0x00000002 + equ FILE_NOTIFY_CHANGE_ATTRIBUTES$ to 0x00000004 + equ FILE_NOTIFY_CHANGE_SIZE$ to 0x00000008 + equ FILE_NOTIFY_CHANGE_LAST_WRITE$ to 0x00000010 + equ FILE_NOTIFY_CHANGE_LAST_ACCESS$ to 0x00000020 + equ FILE_NOTIFY_CHANGE_CREATION$ to 0x00000040 + equ FILE_NOTIFY_CHANGE_SECURITY$ to 0x00000100 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ FILE_ACTION_ADDED$ to 0x00000001 + equ FILE_ACTION_REMOVED$ to 0x00000002 + equ FILE_ACTION_MODIFIED$ to 0x00000003 + equ FILE_ACTION_RENAMED_OLD_NAME$ to 0x00000004 + equ FILE_ACTION_RENAMED_NEW_NAME$ to 0x00000005 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_FINDFILE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_FINDFILE_EQUATES.txt new file mode 100644 index 0000000..cd0fa69 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_FINDFILE_EQUATES.txt @@ -0,0 +1,60 @@ +compile insert msWin_FindFile_Equates +/* + ** Copyright (C) 2013-2018 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Nov 2018 + Purpose Equates for use with the Windows FindFile functions + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + +#ifndef _MSWIN_FINDFILE_EQUATES_ +#define _MSWIN_FINDFILE_EQUATES_ + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + declare function msWin_FindFirstFile, msWin_FindNextFile, msWin_FindClose + $insert rti_Struct_Equates + + $USES @APPID*DLLSTRUCT**MSWIN_WIN32_FIND_DATAW + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // FindFirstFile equates + equ FF_INVALID_HANDLE_VALUE$ to 0xFFFFFFFF ; * DWORD (-1) + + * // FindNextFile equates + equ FF_ERROR_NO_MORE_FILES$ to 18 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // FIND_DATA structure position equates + + equ WIN32_FIND_DATA$ to "WIN32_FIND_DATA" + equ WIN32_FIND_DATAA$ to "WIN32_FIND_DATA" + equ WIN32_FIND_DATAW$ to "WIN32_FIND_DATAW" + + equ FINDDATA_POS_FILEATTRIB$ to 1 + equ FINDDATA_POS_CREATETIME$ to 2 + equ FINDDATA_POS_ACCESSTIME$ to 3 + equ FINDDATA_POS_WRITETIME$ to 4 + equ FINDDATA_POS_HIGHSIZE$ to 5 + equ FINDDATA_POS_LOWSIZE$ to 6 + equ FINDDATA_POS_RESERVED1$ to 7 + equ FINDDATA_POS_RESERVED2$ to 8 + equ FINDDATA_POS_FILENAME$ to 9 + equ FINDDATA_POS_SHORTNAME$ to 10 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_FORMATMESSAGE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_FORMATMESSAGE_EQUATES.txt new file mode 100644 index 0000000..635ca30 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_FORMATMESSAGE_EQUATES.txt @@ -0,0 +1,34 @@ +compile insert msWin_FormatMessage_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Captain C + Date Oct 2012 + Purpose Equates for use with the Windows API FormatMessage function + + Amended Date Reason + ======= ==== ====== +*/ + declare function msWin_FormatMessage, msWin_GetLastError + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_FORMATMESSAGE_EQUATES_ +#define _MSWIN_FORMATMESSAGE_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ FORMAT_MESSAGE_ALLOCATE_BUFFER$ to 0x100 + equ FORMAT_MESSAGE_IGNORE_INSERTS$ to 0x200 + equ FORMAT_MESSAGE_FROM_STRING$ to 0x400 + equ FORMAT_MESSAGE_FROM_HMODULE$ to 0x800 + equ FORMAT_MESSAGE_FROM_SYSTEM$ to 0x1000 + equ FORMAT_MESSAGE_ARGUMENT_ARRAY$ to 0x2000 + equ FORMAT_MESSAGE_MAX_WIDTH_MASK$ to 255 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_GETANCESTOR_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_GETANCESTOR_EQUATES.txt new file mode 100644 index 0000000..9cf0e8a --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_GETANCESTOR_EQUATES.txt @@ -0,0 +1,30 @@ +compile insert msWin_GetAncestor_Equates +/* + ** Copyright (c) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author Captain C + Date Feb 2022 + Purpose Equates for the GetAncestor Windows API function. + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_GETANCESTOR_EQUATES_ +#define _MSWIN_GETANCESTOR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_GetAncestor + + equ GA_PARENT$ to 1 + equ GA_ROOT$ to 2 + equ GA_ROOTOWNER$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_GETDEVICECAPS_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_GETDEVICECAPS_EQUATES.txt new file mode 100644 index 0000000..0cab391 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_GETDEVICECAPS_EQUATES.txt @@ -0,0 +1,187 @@ +compile insert msWin_GetDeviceCaps_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Feb 2014 + Purpose Equates for Windows GetDeviceCaps function + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_GETDEVICECAPS_EQUATES_ +#define _MSWIN_GETDEVICECAPS_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_GetDeviceCaps + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Device Parameters for GetDeviceCaps() + equ DRIVERVERSION$ to 0 ; * Device driver version + equ TECHNOLOGY$ to 2 ; * Device classification + equ HORZSIZE$ to 4 ; * Horizontal size in millimeters + equ VERTSIZE$ to 6 ; * Vertical size in millimeters + equ HORZRES$ to 8 ; * Horizontal width in pixels + equ VERTRES$ to 10 ; * Vertical height in pixels + equ BITSPIXEL$ to 12 ; * Number of bits per pixel + equ PLANES$ to 14 ; * Number of planes + equ NUMBRUSHES$ to 16 ; * Number of brushes the device has + equ NUMPENS$ to 18 ; * Number of pens the device has + equ NUMMARKERS$ to 20 ; * Number of markers the device has + equ NUMFONTS$ to 22 ; * Number of fonts the device has + equ NUMCOLORS$ to 24 ; * Number of colors the device supports + equ PDEVICESIZE$ to 26 ; * Size required for device descriptor + equ CURVECAPS$ to 28 ; * Curve capabilities + equ LINECAPS$ to 30 ; * Line capabilities + equ POLYGONALCAPS$ to 32 ; * Polygonal capabilities + equ TEXTCAPS$ to 34 ; * Text capabilities + equ CLIPCAPS$ to 36 ; * Clipping capabilities + equ RASTERCAPS$ to 38 ; * Bitblt capabilities + equ ASPECTX$ to 40 ; * Length of the X leg + equ ASPECTY$ to 42 ; * Length of the Y leg + equ ASPECTXY$ to 44 ; * Length of the hypotenuse + equ LOGPIXELSX$ to 88 ; * Logical pixels/inch in X + equ LOGPIXELSY$ to 90 ; * Logical pixels/inch in Y + equ SIZEPALETTE$ to 104 ; * Number of entries in physical palette + equ NUMRESERVED$ to 106 ; * Number of reserved entries in palette + equ COLORRES$ to 108 ; * Actual color resolution + + * // Printing related DeviceCaps. These replace the appropriate Escapes + + equ PHYSICALWIDTH$ to 110 ; * // Physical Width in device units + equ PHYSICALHEIGHT$ to 111 ; * // Physical Height in device units + equ PHYSICALOFFSETX$ to 112 ; * // Physical Printable Area x margin + equ PHYSICALOFFSETY$ to 113 ; * // Physical Printable Area y margin + equ SCALINGFACTORX$ to 114 ; * // Scaling factor x + equ SCALINGFACTORY$ to 115 ; * // Scaling factor y + + * //Display driver specific + equ VREFRESH$ to 116 ; * Current vertical refresh rate of the + ; * display device (for displays only) in Hz + equ DESKTOPVERTRES$ to 117 ; * Horizontal width of entire desktop in + ; * pixels + equ DESKTOPHORZRES$ to 118 ; * Vertical height of entire desktop in + ; * pixels + equ BLTALIGNMENT$ to 119 ; * Preferred blt alignment + + equ SHADEBLENDCAPS$ to 120 ; * Shading and blending caps + equ COLORMGMTCAPS$ to 121 ; * Color Management caps + + * // Device Technologies + equ DT_PLOTTER$ to 0 ; * Vector plotter + equ DT_RASDISPLAY$ to 1 ; * Raster display + equ DT_RASPRINTER$ to 2 ; * Raster printer + equ DT_RASCAMERA$ to 3 ; * Raster camera + equ DT_CHARSTREAM$ to 4 ; * Character-stream, PLP + equ DT_METAFILE$ to 5 ; * Metafile, VDM + equ DT_DISPFILE$ to 6 ; * Display-file + + * // Curve Capabilities + equ CC_NONE$ to 0 ; * Curves not supported + equ CC_CIRCLES$ to 1 ; * Can do circles + equ CC_PIE$ to 2 ; * Can do pie wedges + equ CC_CHORD$ to 4 ; * Can do chord arcs + equ CC_ELLIPSES$ to 8 ; * Can do ellipese + equ CC_WIDE$ to 16 ; * Can do wide lines + equ CC_STYLED$ to 32 ; * Can do styled lines + equ CC_WIDESTYLED$ to 64 ; * Can do wide styled lines + equ CC_INTERIORS$ to 128 ; * Can do interiors + equ CC_ROUNDRECT$ to 256 + + * // Line Capabilities + equ LC_NONE$ to 0 ; * Lines not supported + equ LC_POLYLINE$ to 2 ; * Can do polylines + equ LC_MARKER$ to 4 ; * Can do markers + equ LC_POLYMARKER$ to 8 ; * Can do polymarkers + equ LC_WIDE$ to 16 ; * Can do wide lines + equ LC_STYLED$ to 32 ; * Can do styled lines + equ LC_WIDESTYLED$ to 64 ; * Can do wide styled lines + equ LC_INTERIORS$ to 128 ; * Can do interiors + + * // Polygonal Capabilities + equ PC_NONE$ to 0 ; * Polygonals not supported + equ PC_POLYGON$ to 1 ; * Can do polygons + equ PC_RECTANGLE$ to 2 ; * Can do rectangles + equ PC_WINDPOLYGON$ to 4 ; * Can do winding polygons + equ PC_TRAPEZOID$ to 4 ; * Can do trapezoids + equ PC_SCANLINE$ to 8 ; * Can do scanlines + equ PC_WIDE$ to 16 ; * Can do wide borders + equ PC_STYLED$ to 32 ; * Can do styled borders + equ PC_WIDESTYLED$ to 64 ; * Can do wide styled borders + equ PC_INTERIORS$ to 128 ; * Can do interiors + equ PC_POLYPOLYGON$ to 256 ; * Can do polypolygons + equ PC_PATHS$ to 512 ; * Can do paths + + * // Clipping Capabilities + equ CP_NONE$ to 0 ; * No clipping of output + equ CP_RECTANGLE$ to 1 ; * Output clipped to rects + equ CP_REGION$ to 2 ; * obsolete + + * // Text Capabilities + equ TC_OP_CHARACTER$ to 0x00000001 ; * Can do OutputPrecision CHARACTER + equ TC_OP_STROKE$ to 0x00000002 ; * Can do OutputPrecision STROKE + equ TC_CP_STROKE$ to 0x00000004 ; * Can do ClipPrecision STROKE + equ TC_CR_90$ to 0x00000008 ; * Can do CharRotAbility 90 + equ TC_CR_ANY$ to 0x00000010 ; * Can do CharRotAbility ANY + equ TC_SF_X_YINDEP$ to 0x00000020 ; * Can do ScaleFreedom X_YINDEPENDENT + equ TC_SA_DOUBLE$ to 0x00000040 ; * Can do ScaleAbility DOUBLE + equ TC_SA_INTEGER$ to 0x00000080 ; * Can do ScaleAbility INTEGER + equ TC_SA_CONTIN$ to 0x00000100 ; * Can do ScaleAbility CONTINUOUS + equ TC_EA_DOUBLE$ to 0x00000200 ; * Can do EmboldenAbility DOUBLE + equ TC_IA_ABLE$ to 0x00000400 ; * Can do ItalisizeAbility ABLE + equ TC_UA_ABLE$ to 0x00000800 ; * Can do UnderlineAbility ABLE + equ TC_SO_ABLE$ to 0x00001000 ; * Can do StrikeOutAbility ABLE + equ TC_RA_ABLE$ to 0x00002000 ; * Can do RasterFontAble ABLE + equ TC_VA_ABLE$ to 0x00004000 ; * Can do VectorFontAble ABLE + equ TC_RESERVED$ to 0x00008000 + equ TC_SCROLLBLT$ to 0x00010000 ; * Don't do text scroll with blt + + * // Raster Capabilities + equ RC_NONE$ to 0 + equ RC_BITBLT$ to 1 ; * Can do standard BLT. + equ RC_BANDING$ to 2 ; * Device requires banding support + equ RC_SCALING$ to 4 ; * Device requires scaling support + equ RC_BITMAP64$ to 8 ; * Device can support >64K bitmap + equ RC_GDI20_OUTPUT$ to 0x0010 ; * has 2.0 output calls + equ RC_GDI20_STATE$ to 0x0020 + equ RC_SAVEBITMAP$ to 0x0040 + equ RC_DI_BITMAP$ to 0x0080 ; * supports DIB to memory + equ RC_PALETTE$ to 0x0100 ; * supports a palette + equ RC_DIBTODEV$ to 0x0200 ; * supports DIBitsToDevice + equ RC_BIGFONT$ to 0x0400 ; * supports >64K fonts + equ RC_STRETCHBLT$ to 0x0800 ; * supports StretchBlt + equ RC_FLOODFILL$ to 0x1000 ; * supports FloodFill + equ RC_STRETCHDIB$ to 0x2000 ; * supports StretchDIBits + equ RC_OP_DX_OUTPUT$ to 0x4000 + equ RC_DEVBITS$ to 0x8000 + + * // Shading and blending caps + equ SB_NONE$ to 0x00000000 + equ SB_CONST_ALPHA$ to 0x00000001 + equ SB_PIXEL_ALPHA$ to 0x00000002 + equ SB_PREMULT_ALPHA$ to 0x00000004 + + equ SB_GRAD_RECT$ to 0x00000010 + equ SB_GRAD_TRI$ to 0x00000020 + + * // Color Management caps + equ CM_NONE$ to 0x00000000 + equ CM_DEVICE_ICM$ to 0x00000001 + equ CM_GAMMA_RAMP$ to 0x00000002 + equ CM_CMYK_COLOR$ to 0x00000004 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_GETGUITHREADINFO_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_GETGUITHREADINFO_EQUATES.txt new file mode 100644 index 0000000..5bc38a6 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_GETGUITHREADINFO_EQUATES.txt @@ -0,0 +1,64 @@ +compile insert msWin_GetGUIThreadInfo_Equates +/* + ** Copyright (C) 2012-2021 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date October 2021 + Purpose Equates for use with the GetGUIThreadInfo function. + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + +#ifndef _MSWIN_GETGUITHREADINFO_EQUATES_ +#define _MSWIN_GETGUITHREADINFO_EQUATES_ + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + // GUITHREADINFO Structure equates - this structure is defined in the + // Windows API as: + // + // typedef struct tagGUITHREADINFO + // { + // DWORD cbSize; + // DWORD flags; + // HWND hwndActive; + // HWND hwndFocus; + // HWND hwndCapture; + // HWND hwndMenuOwner; + // HWND hwndMoveSize; + // HWND hwndCaret; + // RECT rcCaret; + // } GUITHREADINFO, *PGUITHREADINFO, FAR * LPGUITHREADINFO; + + equ GTI_POS_CBSIZE$ to 1 + equ GTI_POS_FLAGS$ to 2 + equ GTI_POS_HWNDACTIVE$ to 3 + equ GTI_POS_HWNDFOCUS$ to 4 + equ GTI_POS_HWNDCAPTURE$ to 5 + equ GTI_POS_HWNDMENUOWNER$ to 6 + equ GTI_POS_HWNDMOVESIZE$ to 7 + equ GTI_POS_HWNDCARET$ to 8 + equ GTI_POS_RCCARET$ to 9 + +//////////////////////////////////////////////////////////////////////////////// + + // flags bitmask values + + equ GUI_CARETBLINKING$ to 0x00000001 + equ GUI_INMOVESIZE$ to 0x00000002 + equ GUI_INMENUMODE$ to 0x00000004 + equ GUI_SYSTEMMENUMODE$ to 0x00000008 + equ GUI_POPUPMENUMODE$ to 0x00000010 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/MSWIN_GETOPENFILENAME_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_GETOPENFILENAME_EQUATES.txt new file mode 100644 index 0000000..ee2f846 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_GETOPENFILENAME_EQUATES.txt @@ -0,0 +1,59 @@ +compile insert msWin_GetOpenFileName_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Feb 2013 + Purpose Equates for use with the WINAPI GetOpenFilename function + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_GETOPENFILENAME_EQUATES_ +#define _MSWIN_GETOPENFILENAME_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ OFN_READONLY$ to 1 ; * // 0x00000001 + equ OFN_OVERWRITEPROMPT$ to 2 ; * // 0x00000002 + equ OFN_HIDEREADONLY$ to 4 ; * // 0x00000004 + equ OFN_NOCHANGEDIR$ to 8 ; * // 0x00000008 + equ OFN_SHOWHELP$ to 16 ; * // 0x00000010 + equ OFN_ENABLEHOOK$ to 32 ; * // 0x00000020 + equ OFN_ENABLETEMPLATE$ to 64 ; * // 0x00000040 + equ OFN_ENABLETEMPLATEHANDLE$ to 128 ; * // 0x00000080 + equ OFN_NOVALIDATE$ to 256 ; * // 0x00000100 + equ OFN_ALLOWMULTISELECT$ to 512 ; * // 0x00000200 + equ OFN_EXTENSIONDIFFERENT$ to 1024 ; * // 0x00000400 + equ OFN_PATHMUSTEXIST$ to 2048 ; * // 0x00000800 + equ OFN_FILEMUSTEXIST$ to 4096 ; * // 0x00001000 + equ OFN_CREATEPROMPT$ to 8192 ; * // 0x00002000 + equ OFN_SHAREAWARE$ to 16384 ; * // 0x00004000 + equ OFN_NOREADONLYRETURN$ to 32768 ; * // 0x00008000 + equ OFN_NOTESTFILECREATE$ to 65536 ; * // 0x00010000 + equ OFN_NONETWORKBUTTON$ to 131072 ; * // 0x00020000 + equ OFN_NOLONGNAMES$ to 262144 ; * // 0x00040000 + equ OFN_EXPLORER$ to 524288 ; * // 0x00080000 + equ OFN_NODEREFERENCELINKS$ to 1048576 ; * // 0x00100000 + equ OFN_LONGNAMES$ to 2097152 ; * // 0x00200000 + equ OFN_ENABLEINCLUDENOTIFY$ to 4194304 ; * // 0x00400000 + equ OFN_ENABLESIZING$ to 8388608 ; * // 0x00800000 + equ OFN_DONTADDTORECENT$ to 33554432 ; * // 0x02000000 + equ OFN_FORCESHOWHIDDEN$ to 268435456 ; * // 0x10000000 + + equ OFN_MULTISELECT$ to OFN_ALLOWMULTISELECT$ + + * // FlagsEx Values + equ OFN_EX_NOPLACESBAR$ to 1 ; * // 0x00000001 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_GETVERSIONEX_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_GETVERSIONEX_EQUATES.txt new file mode 100644 index 0000000..2aac661 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_GETVERSIONEX_EQUATES.txt @@ -0,0 +1,102 @@ +compile insert msWin_GetVersionEx_Equates +/* + ** Copyright (C) 2013-2023 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date 10 May 23 + Purpose Equates for use with Win32 GetVersionEx function and associated + structures. + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_GETVERSIONEX_EQUATES_ +#define _MSWIN_GETVERSIONEX_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_GetVersionEx + +/////////////////////////////////////////////////////////////////////////////// + + // OSVERSIONINFOEX structure equates + // + // typedef struct _OSVERSIONINFOEXW { + // DWORD dwOSVersionInfoSize; + // DWORD dwMajorVersion; + // DWORD dwMinorVersion; + // DWORD dwBuildNumber; + // DWORD dwPlatformId; + // WCHAR szCSDVersion[128]; + // WORD wServicePackMajor; + // WORD wServicePackMinor; + // WORD wSuiteMask; + // BYTE wProductType; + // BYTE wReserved; + // } OSVERSIONINFOEXW; + + equ OSVERSIONINFOEX$ to "MSWIN_OSVERSIONINFOEX" + + // OSVERSIONINFOEX struct equates ( for use with MSWIN_OSVERSIONINFOEX DLLSTRUCT ) + equ OVIX_POS_DWOSVERSIONINFOSIZE$ to 1 + equ OVIX_POS_DWMAJORVERSION$ to 2 + equ OVIX_POS_DWMINORVERSION$ to 3 + equ OVIX_POS_DWBUILDNUMBER$ to 4 + equ OVIX_POS_DWPLATFORMID$ to 5 + equ OVIX_POS_SZCSDVERSION$ to 6 + equ OVIX_POS_WSERVICEPACKMAJOR$ to 7 + equ OVIX_POS_WSERVICEPACKMINOR$ to 8 + equ OVIX_POS_WSUITEMASK$ to 9 + equ OVIX_POS_WPRODUCTTYPE$ to 10 + equ OVIX_POS_WRESERVED$ to 11 + + //////////////////////////////////////////////////////////////////////////// + + // dwPlatformId equates + + equ VER_PLATFORM_WIN32s$ to 0 + equ VER_PLATFORM_WIN32_WINDOWS$ to 1 + equ VER_PLATFORM_WIN32_NT$ to 2 + + //////////////////////////////////////////////////////////////////////////// + + // wSuiteMask equates + equ VER_SERVER_NT$ to 0x80000000 + equ VER_WORKSTATION_NT$ to 0x40000000 + equ VER_SUITE_SMALLBUSINESS$ to 0x00000001 + equ VER_SUITE_ENTERPRISE$ to 0x00000002 + equ VER_SUITE_BACKOFFICE$ to 0x00000004 + equ VER_SUITE_COMMUNICATIONS$ to 0x00000008 + equ VER_SUITE_TERMINAL$ to 0x00000010 + equ VER_SUITE_SMALLBUSINESS_RESTRICTED$ to 0x00000020 + equ VER_SUITE_EMBEDDEDNT$ to 0x00000040 + equ VER_SUITE_DATACENTER$ to 0x00000080 + equ VER_SUITE_SINGLEUSERTS$ to 0x00000100 + equ VER_SUITE_PERSONAL$ to 0x00000200 + equ VER_SUITE_BLADE$ to 0x00000400 + equ VER_SUITE_EMBEDDED_RESTRICTED$ to 0x00000800 + equ VER_SUITE_SECURITY_APPLIANCE$ to 0x00001000 + equ VER_SUITE_STORAGE_SERVER$ to 0x00002000 + equ VER_SUITE_COMPUTE_SERVER$ to 0x00004000 + equ VER_SUITE_WH_SERVER$ to 0x00008000 + equ VER_SUITE_MULTIUSERTS$ to 0x00020000 + + //////////////////////////////////////////////////////////////////////////// + + // wProductType equates + equ VER_NT_WORKSTATION$ to 0x0000001 + equ VER_NT_DOMAIN_CONTROLLER$ to 0x0000002 + equ VER_NT_SERVER$ to 0x0000003 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_GETWINDOWLONG_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_GETWINDOWLONG_EQUATES.txt new file mode 100644 index 0000000..ffabebc --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_GETWINDOWLONG_EQUATES.txt @@ -0,0 +1,38 @@ +compile insert msWin_GetWindowLong_Equates +/* + ** Copyright (C) 2012-2017 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : 16 Feb 2017 + Purpose : Equates for the GetWindowLong and SetWindowLong Windows API + functions + + Amended Date Reason + ======= ==== ====== +*/ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_GETWINDOWLONG_EQUATES_ +#define _MSWIN_GETWINDOWLONG_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_GetWindowLongPtr, msWin_GetWindowLong + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ GWL_WNDPROC$ to -4 + equ GWL_HINSTANCE$ to -6 + equ GWL_HWNDPARENT$ to -8 + equ GWL_STYLE$ to -16 + equ GWL_EXSTYLE$ to -20 + equ GWL_USERDATA$ to -21 + equ GWL_ID$ to -12 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_GETWINDOW_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_GETWINDOW_EQUATES.txt new file mode 100644 index 0000000..8aa82b8 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_GETWINDOW_EQUATES.txt @@ -0,0 +1,37 @@ +compile insert msWin_GetWindow_Equates +/* + ** Copyright (C) 2012-2017 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : Feb 2017 + Purpose : Equates for the GetWindow Windows API function. + + Comments + ======== + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_GETWINDOW_EQUATES_ +#define _MSWIN_GETWINDOW_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_GetWindow + + equ GW_HWNDFIRST$ to 0 + equ GW_HWNDLAST$ to 1 + equ GW_HWNDNEXT$ to 2 + equ GW_HWNDPREV$ to 3 + equ GW_OWNER$ to 4 + equ GW_CHILD$ to 5 + equ GW_ENABLEDPOPUP$ to 6 + equ GW_MAX$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_HTMLHELP_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_HTMLHELP_EQUATES.txt new file mode 100644 index 0000000..9f98a6f --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_HTMLHELP_EQUATES.txt @@ -0,0 +1,32 @@ +compile insert msWin_HTMLHelp_Equates +/* + ** Copyright (C) 2013-2020 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Oct 2020 + Purpose Equates for use with the Windows HTMLHelp function + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_HTMLHELP_EQUATES_ +#define _MSWIN_HTMLHELP_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + // PS-Supported HTML commands + equ HH_DISPLAY_TOC$ to 0x0001 + equ HH_DISPLAY_INDEX$ to 0x0002 + equ HH_DISPLAY_SEARCH$ to 0x0003 + equ HH_KEYWORD_LOOKUP$ to 0x000D + equ HH_HELP_CONTEXT$ to 0x000F + equ HH_CLOSE_ALL$ to 0x0012 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_LASTINPUTINFO_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_LASTINPUTINFO_EQUATES.txt new file mode 100644 index 0000000..dd9f70a --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_LASTINPUTINFO_EQUATES.txt @@ -0,0 +1,46 @@ +compile insert msWin_LastInputInfo_Equates +/* + ** Copyright (C) 2012-2023 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date August 2023 + Purpose Equates for use with Windows LASTINPUTINFO Structure + + Comments + ======== + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_LASTINPUTINFO_EQUATES_ +#define _MSWIN_LASTINPUTINFO_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_GetLastInputInfo + $uses @APPID*DLLSTRUCT**MSWIN_LASTINPUTINFO + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // LASTINPUTINFO Structure equates - this structure is defined in the + // Windows API as: + // + // typedef struct tagLASTINPUTINFO { + // UINT cbSize; + // DWORD dwTime; + // } LASTINPUTINFO, *PLASTINPUTINFO; + + equ LASTINPUTINFO$ to "MSWIN_LASTINPUTINFO" + + equ LII_POS_CBSIZE$ to 1 + equ LII_POS_DWTIME$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_LISTBOX_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_LISTBOX_EQUATES.txt new file mode 100644 index 0000000..94e3984 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_LISTBOX_EQUATES.txt @@ -0,0 +1,122 @@ +compile insert msWin_ListBox_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date October 2012 + Purpose Equates for Windows Listbox controls + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + mtr 12 Dec 2014 Git sucks +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + +#ifndef _MSWIN_LISTBOX_EQUATES_ +#define _MSWIN_LISTBOX_EQUATES_ + +//////////////////////////////////////////////////////////////////////////////// +// Listbox Messages //////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ LB_ADDSTRING$ to 0x0180 + equ LB_INSERTSTRING$ to 0x0181 + equ LB_DELETESTRING$ to 0x0182 + equ LB_SELITEMRANGEEX$ to 0x0183 + equ LB_RESETCONTENT$ to 0x0184 + equ LB_SETSEL$ to 0x0185 + equ LB_SETCURSEL$ to 0x0186 + equ LB_GETSEL$ to 0x0187 + equ LB_GETCURSEL$ to 0x0188 + equ LB_GETTEXT$ to 0x0189 + equ LB_GETTEXTLEN$ to 0x018A + equ LB_GETCOUNT$ to 0x018B + equ LB_SELECTSTRING$ to 0x018C + equ LB_DIR$ to 0x018D + equ LB_GETTOPINDEX$ to 0x018E + equ LB_FINDSTRING$ to 0x018F + equ LB_GETSELCOUNT$ to 0x0190 + equ LB_GETSELITEMS$ to 0x0191 + equ LB_SETTABSTOPS$ to 0x0192 + equ LB_GETHORIZONTALEXTENT$ to 0x0193 + equ LB_SETHORIZONTALEXTENT$ to 0x0194 + equ LB_SETCOLUMNWIDTH$ to 0x0195 + equ LB_ADDFILE$ to 0x0196 + equ LB_SETTOPINDEX$ to 0x0197 + equ LB_GETITEMRECT$ to 0x0198 + equ LB_GETITEMDATA$ to 0x0199 + equ LB_SETITEMDATA$ to 0x019A + equ LB_SELITEMRANGE$ to 0x019B + equ LB_SETANCHORINDEX$ to 0x019C + equ LB_GETANCHORINDEX$ to 0x019D + equ LB_SETCARETINDEX$ to 0x019E + equ LB_GETCARETINDEX$ to 0x019F + equ LB_SETITEMHEIGHT$ to 0x01A0 + equ LB_GETITEMHEIGHT$ to 0x01A1 + equ LB_FINDSTRINGEXACT$ to 0x01A2 + equ LB_SETLOCALE$ to 0x01A5 + equ LB_GETLOCALE$ to 0x01A6 + equ LB_SETCOUNT$ to 0x01A7 + equ LB_INITSTORAGE$ to 0x01A8 + equ LB_ITEMFROMPOINT$ to 0x01A9 + equ LB_MSGMAX$ to 0x01B0 + +//////////////////////////////////////////////////////////////////////////////// +// Listbox Styles ////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ LBS_NOTIFY$ to 0x0001 + equ LBS_SORT$ to 0x0002 + equ LBS_NOREDRAW$ to 0x0004 + equ LBS_MULTIPLESEL$ to 0x0008 + equ LBS_OWNERDRAWFIXED$ to 0x0010 + equ LBS_OWNERDRAWVARIABLE$ to 0x0020 + equ LBS_HASSTRINGS$ to 0x0040 + equ LBS_USETABSTOPS$ to 0x0080 + equ LBS_NOINTEGRALHEIGHT$ to 0x0100 + equ LBS_MULTICOLUMN$ to 0x0200 + equ LBS_WANTKEYBOARDINPUT$ to 0x0400 + equ LBS_EXTENDEDSEL$ to 0x0800 + equ LBS_DISABLENOSCROLL$ to 0x1000 + equ LBS_NODATA$ to 0x2000 + equ LBS_NOSEL$ to 0x4000 + + // These are so we don't have to add in the + // generic windows styles when we define + // LBS_STANDARD below + + equ LBWS_BORDER$ to 0x00800000 + equ LBWS_VSCROLL$ to 0x00200000 + + equ LBS_STANDARD$ to (LBS_NOTIFY$ + LBS_SORT$ + LBWS_VSCROLL$ + LBWS_BORDER$ ) + +//////////////////////////////////////////////////////////////////////////////// +// Listbox Error Codes ///////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ LB_OKAY$ to 0 + equ LB_ERR$ to (-1) + equ LB_ERRSPACE$ to (-2) + +//////////////////////////////////////////////////////////////////////////////// +// Listbox Notification Codes ////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ LBN_ERRSPACE$ to (-2) + equ LBN_SELCHANGE$ to 1 + equ LBN_DBLCLK$ to 2 + equ LBN_SELCANCEL$ to 3 + equ LBN_SETFOCUS$ to 4 + equ LBN_KILLFOCUS$ to 5 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_LOADIMAGE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_LOADIMAGE_EQUATES.txt new file mode 100644 index 0000000..a06243b --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_LOADIMAGE_EQUATES.txt @@ -0,0 +1,56 @@ +compile insert msWin_LoadImage_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Feb 2013 + Purpose Equates for use with the WINAPI LoadImage function + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_LOADIMAGE_EQUATES_ +#define _MSWIN_LOADIMAGE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_LoadImage, msWin_LoadImageByResID + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ IMAGE_BITMAP$ to 0 + equ IMAGE_ICON$ to 1 + equ IMAGE_CURSOR$ to 2 + equ IMAGE_ENHMETAFILE$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ LR_DEFAULTCOLOR$ to 0x0000 + equ LR_MONOCHROME$ to 0x0001 + equ LR_COLOR$ to 0x0002 + equ LR_COPYRETURNORG$ to 0x0004 + equ LR_COPYDELETEORG$ to 0x0008 + equ LR_LOADFROMFILE$ to 0x0010 + equ LR_LOADTRANSPARENT$ to 0x0020 + equ LR_DEFAULTSIZE$ to 0x0040 + equ LR_VGACOLOR$ to 0x0080 + equ LR_LOADMAP3DCOLORS$ to 0x1000 + equ LR_CREATEDIBSECTION$ to 0x2000 + equ LR_COPYFROMRESOURCE$ to 0x4000 + equ LR_SHARED$ to 0x8000 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/MSWIN_LOCALE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_LOCALE_EQUATES.txt new file mode 100644 index 0000000..90ec842 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_LOCALE_EQUATES.txt @@ -0,0 +1,248 @@ +compile insert msWin_Locale_Equates +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Mr C + Date : 08 Feb 2017 + Purpose : Equates for the WinAPI GetLocaleInfo() function + + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_LOCALE_EQUATES_ +#define _MSWIN_LOCALE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_GetLocaleInfo, msWin_GetLocaleInfoEx + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Language IDs + equ LANG_NEUTRAL$ to 0x00 + equ LANG_INVARIANT$ to 0x7F + + equ SUBLANG_NEUTRAL$ to 0x00 ; * language neutral + equ SUBLANG_DEFAULT$ to 0x01 ; * user default + equ SUBLANG_SYS_DEFAULT$ to 0x02 ; * system default + equ SUBLANG_CUSTOM_DEFAULT$ to 0x03 ; * default custom language/locale + equ SUBLANG_CUSTOM_UNSPECIFIED$ to 0x04 ; * custom language/locale + equ SUBLANG_UI_CUSTOM_DEFAULT$ to 0x05 ; * Default custom MUI language/locale + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Sorting IDs + equ SORT_DEFAULT$ to 0x0 ; * sorting default + equ SORT_INVARIANT_MATH$ to 0x1 ; * Invariant (Mathematical Symbols) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Locale IDs + + * // #define MAKELANGID(p, s) ((((WORD )(s)) << 10) | (WORD )(p)) + * // + * // #define MAKELCID(lgid, srtid) ((DWORD)((((DWORD)((WORD )(srtid))) << 16) | \ + * // ((DWORD)((WORD )(lgid))))) + + equ LANG_SYSTEM_DEFAULT$ to 0x0800 ; * ( MAKELANGID(LANG_NEUTRAL, SUBLANG_SYS_DEFAULT) ) + equ LANG_USER_DEFAULT$ to 0x0400 ; * ( MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT) ) + + equ LOCALE_SYSTEM_DEFAULT$ to 0x0800 ; * ( MAKELCID(LANG_SYSTEM_DEFAULT, SORT_DEFAULT) ) + equ LOCALE_USER_DEFAULT$ to 0x0400 ; * ( MAKELCID(LANG_USER_DEFAULT, SORT_DEFAULT ) ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Locale Types. + equ LOCALE_NOUSEROVERRIDE$ to 0x80000000 ; * do not use user overrides + equ LOCALE_USE_CP_ACP$ to 0x40000000 ; * use the system ACP + equ LOCALE_RETURN_NUMBER$ to 0x20000000 ; * return number instead of string + + equ LOCALE_RETURN_GENITIVE_NAMES$ to 0x10000000 ; *Flag to return the Genitive forms of month names + equ LOCALE_ALLOW_NEUTRAL_NAMES$ to 0x08000000 ; *Flag to allow returning neutral names/lcids for name conversion + + * // The following LCTypes are mutually exclusive in that they may NOT + * // be used in combination with each other. + + * // These are the various forms of the name of the locale: + equ LOCALE_SLOCALIZEDDISPLAYNAME$ to 0x00000002 ; * localized name of locale, eg "German (Germany)" in UI language + equ LOCALE_SENGLISHDISPLAYNAME$ to 0x00000072 ; * Display name (language + country usually) in English, eg "German (Germany)" + equ LOCALE_SNATIVEDISPLAYNAME$ to 0x00000073 ; * Display name in native locale language, eg "Deutsch (Deutschland) + + equ LOCALE_SLOCALIZEDLANGUAGENAME$ to 0x0000006f ; * Language Display Name for a language, eg "German" in UI language + equ LOCALE_SENGLISHLANGUAGENAME$ to 0x00001001 ; * English name of language, eg "German" + equ LOCALE_SNATIVELANGUAGENAME$ to 0x00000004 ; * native name of language, eg "Deutsch" + + equ LOCALE_SLOCALIZEDCOUNTRYNAME$ to 0x00000006 ; * localized name of country, eg "Germany" in UI language + equ LOCALE_SENGLISHCOUNTRYNAME$ to 0x00001002 ; * English name of country, eg "Germany" + equ LOCALE_SNATIVECOUNTRYNAME$ to 0x00000008 ; * native name of country, eg "Deutschland" + + * // Legacy labels for the locale name values + equ LOCALE_SLANGUAGE$ to 0x00000002 ; * localized name of locale, eg "German (Germany)" in UI language + equ LOCALE_SLANGDISPLAYNAME$ to 0x0000006f ; * Language Display Name for a language, eg "German" in UI language + equ LOCALE_SENGLANGUAGE$ to 0x00001001 ; * English name of language, eg "German" + equ LOCALE_SNATIVELANGNAME$ to 0x00000004 ; * native name of language, eg "Deutsch" + equ LOCALE_SCOUNTRY$ to 0x00000006 ; * localized name of country, eg "Germany" in UI language + equ LOCALE_SENGCOUNTRY$ to 0x00001002 ; * English name of country, eg "Germany" + equ LOCALE_SNATIVECTRYNAME$ to 0x00000008 ; * native name of country, eg "Deutschland" + + * // Additional LCTypes + equ LOCALE_ILANGUAGE$ to 0x00000001 ; * language id, LOCALE_SNAME preferred + equ LOCALE_SABBREVLANGNAME$ to 0x00000003 ; * arbitrary abbreviated language name, LOCALE_SISO639LANGNAME preferred + equ LOCALE_ICOUNTRY$ to 0x00000005 ; * country code, eg 1, LOCALE_SISO3166CTRYNAME may be more useful. + equ LOCALE_SABBREVCTRYNAME$ to 0x00000007 ; * arbitrary abbreviated country name, LOCALE_SISO3166CTRYNAME preferred + equ LOCALE_IGEOID$ to 0x0000005B ; * geographical location id, eg "244" + equ LOCALE_IDEFAULTLANGUAGE$ to 0x00000009 ; * default language id, deprecated + equ LOCALE_IDEFAULTCOUNTRY$ to 0x0000000A ; * default country code, deprecated + equ LOCALE_IDEFAULTCODEPAGE$ to 0x0000000B ; * default oem code page (use of Unicode is recommended instead) + equ LOCALE_IDEFAULTANSICODEPAGE$ to 0x00001004 ; * default ansi code page (use of Unicode is recommended instead) + equ LOCALE_IDEFAULTMACCODEPAGE$ to 0x00001011 ; * default mac code page (use of Unicode is recommended instead) + equ LOCALE_SLIST$ to 0x0000000C ; * list item separator, eg "," for "1,2,3,4" + equ LOCALE_IMEASURE$ to 0x0000000D ; * 0 = metric, 1 = US measurement system + equ LOCALE_SDECIMAL$ to 0x0000000E ; * decimal separator, eg "." for 1,234.00 + equ LOCALE_STHOUSAND$ to 0x0000000F ; * thousand separator, eg "," for 1,234.00 + equ LOCALE_SGROUPING$ to 0x00000010 ; * digit grouping, eg "3;0" for 1,000,000 + equ LOCALE_IDIGITS$ to 0x00000011 ; * number of fractional digits eg 2 for 1.00 + equ LOCALE_ILZERO$ to 0x00000012 ; * leading zeros for decimal, 0 for .97, 1 for 0.97 + equ LOCALE_INEGNUMBER$ to 0x00001010 ; * negative number mode, 0-4, see documentation + equ LOCALE_SNATIVEDIGITS$ to 0x00000013 ; * native digits for 0-9, eg "0123456789" + equ LOCALE_SCURRENCY$ to 0x00000014 ; * local monetary symbol, eg "$" + equ LOCALE_SINTLSYMBOL$ to 0x00000015 ; * intl monetary symbol, eg "USD" + equ LOCALE_SMONDECIMALSEP$ to 0x00000016 ; * monetary decimal separator, eg "." for $1,234.00 + equ LOCALE_SMONTHOUSANDSEP$ to 0x00000017 ; * monetary thousand separator, eg "," for $1,234.00 + equ LOCALE_SMONGROUPING$ to 0x00000018 ; * monetary grouping, eg "3;0" for $1,000,000.00 + equ LOCALE_ICURRDIGITS$ to 0x00000019 ; * # local monetary digits, eg 2 for $1.00 + equ LOCALE_IINTLCURRDIGITS$ to 0x0000001A ; * # intl monetary digits, eg 2 for $1.00 + equ LOCALE_ICURRENCY$ to 0x0000001B ; * positive currency mode, 0-3, see documenation + equ LOCALE_INEGCURR$ to 0x0000001C ; * negative currency mode, 0-15, see documentation + equ LOCALE_SDATE$ to 0x0000001D ; * date separator (derived from LOCALE_SSHORTDATE, use that instead) + equ LOCALE_STIME$ to 0x0000001E ; * time separator (derived from LOCALE_STIMEFORMAT, use that instead) + equ LOCALE_SSHORTDATE$ to 0x0000001F ; * short date format string, eg "MM/dd/yyyy" + equ LOCALE_SLONGDATE$ to 0x00000020 ; * long date format string, eg "dddd, MMMM dd, yyyy" + equ LOCALE_STIMEFORMAT$ to 0x00001003 ; * time format string, eg "HH:mm:ss" + equ LOCALE_IDATE$ to 0x00000021 ; * short date format ordering (derived from LOCALE_SSHORTDATE, use that instead) + equ LOCALE_ILDATE$ to 0x00000022 ; * long date format ordering (derived from LOCALE_SLONGDATE, use that instead) + equ LOCALE_ITIME$ to 0x00000023 ; * time format specifier (derived from LOCALE_STIMEFORMAT, use that instead) + equ LOCALE_ITIMEMARKPOSN$ to 0x00001005 ; * time marker position (derived from LOCALE_STIMEFORMAT, use that instead) + equ LOCALE_ICENTURY$ to 0x00000024 ; * century format specifier (short date, LOCALE_SSHORTDATE is preferred) + equ LOCALE_ITLZERO$ to 0x00000025 ; * leading zeros in time field (derived from LOCALE_STIMEFORMAT, use that instead) + equ LOCALE_IDAYLZERO$ to 0x00000026 ; * leading zeros in day field (short date, LOCALE_SSHORTDATE is preferred) + equ LOCALE_IMONLZERO$ to 0x00000027 ; * leading zeros in month field (short date, LOCALE_SSHORTDATE is preferred) + equ LOCALE_S1159$ to 0x00000028 ; * AM designator, eg "AM" + equ LOCALE_S2359$ to 0x00000029 ; * PM designator, eg "PM" + equ LOCALE_ICALENDARTYPE$ to 0x00001009 ; * type of calendar specifier, eg CAL_GREGORIAN + equ LOCALE_IOPTIONALCALENDAR$ to 0x0000100B ; * additional calendar types specifier, eg CAL_GREGORIAN_US + equ LOCALE_IFIRSTDAYOFWEEK$ to 0x0000100C ; * first day of week specifier, 0-6, 0=Monday, 6=Sunday + equ LOCALE_IFIRSTWEEKOFYEAR$ to 0x0000100D ; * first week of year specifier, 0-2, see documentation + equ LOCALE_SDAYNAME1$ to 0x0000002A ; * long name for Monday + equ LOCALE_SDAYNAME2$ to 0x0000002B ; * long name for Tuesday + equ LOCALE_SDAYNAME3$ to 0x0000002C ; * long name for Wednesday + equ LOCALE_SDAYNAME4$ to 0x0000002D ; * long name for Thursday + equ LOCALE_SDAYNAME5$ to 0x0000002E ; * long name for Friday + equ LOCALE_SDAYNAME6$ to 0x0000002F ; * long name for Saturday + equ LOCALE_SDAYNAME7$ to 0x00000030 ; * long name for Sunday + equ LOCALE_SABBREVDAYNAME1$ to 0x00000031 ; * abbreviated name for Monday + equ LOCALE_SABBREVDAYNAME2$ to 0x00000032 ; * abbreviated name for Tuesday + equ LOCALE_SABBREVDAYNAME3$ to 0x00000033 ; * abbreviated name for Wednesday + equ LOCALE_SABBREVDAYNAME4$ to 0x00000034 ; * abbreviated name for Thursday + equ LOCALE_SABBREVDAYNAME5$ to 0x00000035 ; * abbreviated name for Friday + equ LOCALE_SABBREVDAYNAME6$ to 0x00000036 ; * abbreviated name for Saturday + equ LOCALE_SABBREVDAYNAME7$ to 0x00000037 ; * abbreviated name for Sunday + equ LOCALE_SMONTHNAME1$ to 0x00000038 ; * long name for January + equ LOCALE_SMONTHNAME2$ to 0x00000039 ; * long name for February + equ LOCALE_SMONTHNAME3$ to 0x0000003A ; * long name for March + equ LOCALE_SMONTHNAME4$ to 0x0000003B ; * long name for April + equ LOCALE_SMONTHNAME5$ to 0x0000003C ; * long name for May + equ LOCALE_SMONTHNAME6$ to 0x0000003D ; * long name for June + equ LOCALE_SMONTHNAME7$ to 0x0000003E ; * long name for July + equ LOCALE_SMONTHNAME8$ to 0x0000003F ; * long name for August + equ LOCALE_SMONTHNAME9$ to 0x00000040 ; * long name for September + equ LOCALE_SMONTHNAME10$ to 0x00000041 ; * long name for October + equ LOCALE_SMONTHNAME11$ to 0x00000042 ; * long name for November + equ LOCALE_SMONTHNAME12$ to 0x00000043 ; * long name for December + equ LOCALE_SMONTHNAME13$ to 0x0000100E ; * long name for 13th month (if exists) + equ LOCALE_SABBREVMONTHNAME1$ to 0x00000044 ; * abbreviated name for January + equ LOCALE_SABBREVMONTHNAME2$ to 0x00000045 ; * abbreviated name for February + equ LOCALE_SABBREVMONTHNAME3$ to 0x00000046 ; * abbreviated name for March + equ LOCALE_SABBREVMONTHNAME4$ to 0x00000047 ; * abbreviated name for April + equ LOCALE_SABBREVMONTHNAME5$ to 0x00000048 ; * abbreviated name for May + equ LOCALE_SABBREVMONTHNAME6$ to 0x00000049 ; * abbreviated name for June + equ LOCALE_SABBREVMONTHNAME7$ to 0x0000004A ; * abbreviated name for July + equ LOCALE_SABBREVMONTHNAME8$ to 0x0000004B ; * abbreviated name for August + equ LOCALE_SABBREVMONTHNAME9$ to 0x0000004C ; * abbreviated name for September + equ LOCALE_SABBREVMONTHNAME10$ to 0x0000004D ; * abbreviated name for October + equ LOCALE_SABBREVMONTHNAME11$ to 0x0000004E ; * abbreviated name for November + equ LOCALE_SABBREVMONTHNAME12$ to 0x0000004F ; * abbreviated name for December + equ LOCALE_SABBREVMONTHNAME13$ to 0x0000100F ; * abbreviated name for 13th month (if exists) + equ LOCALE_SPOSITIVESIGN$ to 0x00000050 ; * positive sign, eg "" + equ LOCALE_SNEGATIVESIGN$ to 0x00000051 ; * negative sign, eg "-" + equ LOCALE_IPOSSIGNPOSN$ to 0x00000052 ; * positive sign position (derived from INEGCURR) + equ LOCALE_INEGSIGNPOSN$ to 0x00000053 ; * negative sign position (derived from INEGCURR) + equ LOCALE_IPOSSYMPRECEDES$ to 0x00000054 ; * mon sym precedes pos amt (derived from ICURRENCY) + equ LOCALE_IPOSSEPBYSPACE$ to 0x00000055 ; * mon sym sep by space from pos amt (derived from ICURRENCY) + equ LOCALE_INEGSYMPRECEDES$ to 0x00000056 ; * mon sym precedes neg amt (derived from INEGCURR) + equ LOCALE_INEGSEPBYSPACE$ to 0x00000057 ; * mon sym sep by space from neg amt (derived from INEGCURR) + equ LOCALE_FONTSIGNATURE$ to 0x00000058 ; * font signature + equ LOCALE_SISO639LANGNAME$ to 0x00000059 ; * ISO abbreviated language name, eg "en" + equ LOCALE_SISO3166CTRYNAME$ to 0x0000005A ; * ISO abbreviated country name, eg "US" + equ LOCALE_IDEFAULTEBCDICCODEPAGE$ to 0x00001012 ; * default ebcdic code page (use of Unicode is recommended instead) + equ LOCALE_IPAPERSIZE$ to 0x0000100A ; * 1 = letter, 5 = legal, 8 = a3, 9 = a4 + equ LOCALE_SENGCURRNAME$ to 0x00001007 ; * english name of currency, eg "Euro" + equ LOCALE_SNATIVECURRNAME$ to 0x00001008 ; * native name of currency, eg "euro" + equ LOCALE_SYEARMONTH$ to 0x00001006 ; * year month format string, eg "MM/yyyy" + equ LOCALE_SSORTNAME$ to 0x00001013 ; * sort name, usually "", eg "Dictionary" in UI Language + equ LOCALE_IDIGITSUBSTITUTION$ to 0x00001014 ; * 0 = context, 1 = none, 2 = national + equ LOCALE_SNAME$ to 0x0000005c ; * locale name (ie: en-us) + equ LOCALE_SDURATION$ to 0x0000005d ; * time duration format, eg "hh:mm:ss" + equ LOCALE_SKEYBOARDSTOINSTALL$ to 0x0000005e ; * Used internally, see GetKeyboardLayoutName() function + equ LOCALE_SSHORTESTDAYNAME1$ to 0x00000060 ; * Shortest day name for Monday + equ LOCALE_SSHORTESTDAYNAME2$ to 0x00000061 ; * Shortest day name for Tuesday + equ LOCALE_SSHORTESTDAYNAME3$ to 0x00000062 ; * Shortest day name for Wednesday + equ LOCALE_SSHORTESTDAYNAME4$ to 0x00000063 ; * Shortest day name for Thursday + equ LOCALE_SSHORTESTDAYNAME5$ to 0x00000064 ; * Shortest day name for Friday + equ LOCALE_SSHORTESTDAYNAME6$ to 0x00000065 ; * Shortest day name for Saturday + equ LOCALE_SSHORTESTDAYNAME7$ to 0x00000066 ; * Shortest day name for Sunday + equ LOCALE_SISO639LANGNAME2$ to 0x00000067 ; * 3 character ISO abbreviated language name, eg "eng" + equ LOCALE_SISO3166CTRYNAME2$ to 0x00000068 ; * 3 character ISO country name, eg "USA" + equ LOCALE_SNAN$ to 0x00000069 ; * Not a Number, eg "NaN" + equ LOCALE_SPOSINFINITY$ to 0x0000006a ; * + Infinity, eg "infinity" + equ LOCALE_SNEGINFINITY$ to 0x0000006b ; * - Infinity, eg "-infinity" + equ LOCALE_SSCRIPTS$ to 0x0000006c ; * Typical scripts in the locale: ; delimited script codes, eg "Latn;" + equ LOCALE_SPARENT$ to 0x0000006d ; * Fallback name for resources, eg "en" for "en-US" + equ LOCALE_SCONSOLEFALLBACKNAME$ to 0x0000006e ; * Fallback name for within the console for Unicode Only locales, eg "en" for bn-IN + equ LOCALE_IREADINGLAYOUT$ to 0x00000070 ; * Returns one of the following 4 reading layout values: + ; * 0 - Left to right (eg en-US) + ; * 1 - Right to left (eg arabic locales) + ; * 2 - Vertical top to bottom with columns to the left and also left to right (ja-JP locales) + ; * 3 - Vertical top to bottom with columns proceeding to the right + equ LOCALE_INEUTRAL$ to 0x00000071 ; * Returns 0 for specific cultures, 1 for neutral cultures. + equ LOCALE_INEGATIVEPERCENT$ to 0x00000074 ; * Returns 0-11 for the negative percent format + equ LOCALE_IPOSITIVEPERCENT$ to 0x00000075 ; * Returns 0-3 for the positive percent formatIPOSITIVEPERCENT + equ LOCALE_SPERCENT$ to 0x00000076 ; * Returns the percent symbol + equ LOCALE_SPERMILLE$ to 0x00000077 ; * Returns the permille (U+2030) symbol + equ LOCALE_SMONTHDAY$ to 0x00000078 ; * Returns the preferred month/day format + equ LOCALE_SSHORTTIME$ to 0x00000079 ; * Returns the preferred short time format (ie: no seconds, just h:mm) + equ LOCALE_SOPENTYPELANGUAGETAG$ to 0x0000007a ; * Open type language tag, eg: "latn" or "dflt" + equ LOCALE_SSORTLOCALE$ to 0x0000007b ; * Name of locale to use for sorting/collation/casing behavior. + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/MSWIN_LOGFONT_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_LOGFONT_EQUATES.txt new file mode 100644 index 0000000..d23ebc8 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_LOGFONT_EQUATES.txt @@ -0,0 +1,103 @@ +compile insert msWin_LogFont_Equates +/* + ** Copyright (C) 2013-2019 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date June 2019 + Purpose Equates for use with Win32 LOGFONT structure + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 18 Sep 20 Added Font Weight equates +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_LOGFONT_EQUATES_ +#define _MSWIN_LOGFONT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // LOGFONT Structure equates - this structure is defined in the + // Windows API as: + // + // typedef struct tagLOGFONT { + // LONG lfHeight; + // LONG lfWidth; + // LONG lfEscapement; + // LONG lfOrientation; + // LONG lfWeight; + // BYTE lfItalic; + // BYTE lfUnderline; + // BYTE lfStrikeOut; + // BYTE lfCharSet; + // BYTE lfOutPrecision; + // BYTE lfClipPrecision; + // BYTE lfQuality; + // BYTE lfPitchAndFamily; + // TCHAR lfFaceName[LF_FACESIZE]; + // } LOGFONT, *PLOGFONT; + // + + equ LOGFONT$ to "MSWIN_LOGFONT" + + // LOGFONT struct equates ( for use with SYSPROGSTRUCT_MSWIN_LOGFONT ) + equ LOGFONT_POS_HEIGHT$ to 1 + equ LOGFONT_POS_WIDTH$ to 2 + equ LOGFONT_POS_ESCAPEMENT$ to 3 + equ LOGFONT_POS_ORIENTATION$ to 4 + equ LOGFONT_POS_WEIGHT$ to 5 + equ LOGFONT_POS_ITALIC$ to 6 + equ LOGFONT_POS_UNDERLINE$ to 7 + equ LOGFONT_POS_STRIKEOUT$ to 8 + equ LOGFONT_POS_CHARSET$ to 9 + equ LOGFONT_POS_OUTPRECISION$ to 10 + equ LOGFONT_POS_CLIPPRECISION$ to 11 + equ LOGFONT_POS_QUALITY$ to 12 + equ LOGFONT_POS_PITCHANDFAMILY$ to 13 + equ LOGFONT_POS_FACENAME$ to 14 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Font Weight + equ FW_DONTCARE$ to 0 + equ FW_THIN$ to 100 + equ FW_EXTRALIGHT$ to 200 + equ FW_LIGHT$ to 300 + equ FW_NORMAL$ to 400 + equ FW_MEDIUM$ to 500 + equ FW_SEMIBOLD$ to 600 + equ FW_BOLD$ to 700 + equ FW_EXTRABOLD$ to 800 + equ FW_HEAVY$ to 900 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CHARSET equates + equ ANSI_CHARSET$ to 0 + equ DEFAULT_CHARSET$ to 1 + equ SYMBOL_CHARSET$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // FONT stock objects ... + + equ OEM_FIXED_FONT$ to 10 + equ ANSI_FIXED_FONT$ to 11 + equ ANSI_VAR_FONT$ to 12 + equ SYSTEM_FONT$ to 13 + equ DEVICE_DEFAULT_FONT$ to 14 + equ DEFAULT_PALETTE$ to 15 + equ SYSTEM_FIXED_FONT$ to 0x10 + equ DEFAULT_GUI_FONT$ to 17 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_MAX_PATH_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_MAX_PATH_EQUATES.txt new file mode 100644 index 0000000..d50ec45 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_MAX_PATH_EQUATES.txt @@ -0,0 +1,32 @@ +compile insert msWin_MAX_PATH_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : Oct 2012 + Purpose : MAX_PATH constant definition + + Comments + ======== + + This is used all over the place so I'm moving it to it's own header ... + + Overkill or what? + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +#ifndef _MAX_PATH_EQUATES_ +#define _MAX_PATH_EQUATES_ + + equ MAX_PATH$ to 260 + +#endif + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_MENU_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_MENU_EQUATES.txt new file mode 100644 index 0000000..e18c3a9 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_MENU_EQUATES.txt @@ -0,0 +1,119 @@ +compile insert msWin_Menu_Equates +/* + ** Copyright (C) 2012-2017 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : 16 Feb 2017 + Purpose : Equated constants for use with Windows Menus + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_MENU_EQUATES_ +#define _MSWIN_MENU_EQUATES +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // win40 -- A lot of MF_* flags have been renamed as MFT_* and MFS_* flags + + * // Menu flags for Add/Check/EnableMenuItem() + equ MF_INSERT$ to 0x00000000 + equ MF_CHANGE$ to 0x00000080 + equ MF_APPEND$ to 0x00000100 + equ MF_DELETE$ to 0x00000200 + equ MF_REMOVE$ to 0x00001000 + + equ MF_BYCOMMAND$ to 0x00000000 + equ MF_BYPOSITION$ to 0x00000400 + + equ MF_SEPARATOR$ to 0x00000800 + + equ MF_ENABLED$ to 0x00000000 + equ MF_GRAYED$ to 0x00000001 + equ MF_DISABLED$ to 0x00000002 + + equ MF_UNCHECKED$ to 0x00000000 + equ MF_CHECKED$ to 0x00000008 + equ MF_USECHECKBITMAPS$ to 0x00000200 + + equ MF_STRING$ to 0x00000000 + equ MF_BITMAP$ to 0x00000004 + equ MF_OWNERDRAW$ to 0x00000100 + + equ MF_POPUP$ to 0x00000010 + equ MF_MENUBARBREAK$ to 0x00000020 + equ MF_MENUBREAK$ to 0x00000040 + + equ MF_UNHILITE$ to 0x00000000 + equ MF_HILITE$ to 0x00000080 + + equ MF_DEFAULT$ to 0x00001000 + equ MF_SYSMENU$ to 0x00002000 + equ MF_HELP$ to 0x00004000 + equ MF_RIGHTJUSTIFY$ to 0x00004000 + + equ MF_MOUSESELECT$ to 0x00008000 + equ MF_END$ to 0x00000080 ; * // Obsolete -- only used by old RES files + + equ MFT_STRING$ to MF_STRING$ + equ MFT_BITMAP$ to MF_BITMAP$ + equ MFT_MENUBARBREAK$ to MF_MENUBARBREAK$ + equ MFT_MENUBREAK$ to MF_MENUBREAK$ + equ MFT_OWNERDRAW$ to MF_OWNERDRAW$ + equ MFT_RADIOCHECK$ to 0x00000200 + equ MFT_SEPARATOR$ to MF_SEPARATOR$ + equ MFT_RIGHTORDER$ to 0x00002000 + equ MFT_RIGHTJUSTIFY$ to MF_RIGHTJUSTIFY$ + + equ MFS_GRAYED$ to 0x00000003 + equ MFS_DISABLED$ to MFS_GRAYED$ + equ MFS_CHECKED$ to MF_CHECKED$ + equ MFS_HILITE$ to MF_HILITE$ + equ MFS_ENABLED$ to MF_ENABLED$ + equ MFS_UNCHECKED$ to MF_UNCHECKED$ + equ MFS_UNHILITE$ to MF_UNHILITE$ + equ MFS_DEFAULT$ to MF_DEFAULT$ + + ///////////////////////////////////////////////////////////////////////////// + + * // Flags for TrackPopupMenu() + + equ TPM_LEFTBUTTON$ to 0x0000 + equ TPM_RIGHTBUTTON$ to 0x0002 + + equ TPM_LEFTALIGN$ to 0x0000 + equ TPM_CENTERALIGN$ to 0x0004 + equ TPM_RIGHTALIGN$ to 0x0008 + + equ TPM_TOPALIGN$ to 0x0000 + equ TPM_VCENTERALIGN$ to 0x0010 + equ TPM_BOTTOMALIGN$ to 0x0020 + + equ TPM_HORIZONTAL$ to 0x0000 ; * // Horz alignment matters more + equ TPM_VERTICAL$ to 0x0040 ; * // Vert alignment matters more + equ TPM_NONOTIFY$ to 0x0080 ; * // Don't send any notification msgs + + equ TPM_RETURNCMD$ to 0x0100 + + + equ TPM_RECURSE$ to 0x0001 + equ TPM_HORPOSANIMATION$ to 0x0400 + equ TPM_HORNEGANIMATION$ to 0x0800 + equ TPM_VERPOSANIMATION$ to 0x1000 + equ TPM_VERNEGANIMATION$ to 0x2000 + equ TPM_NOANIMATION$ to 0x4000 + equ TPM_LAYOUTRTL$ to 0x8000 + equ TPM_WORKAREA$ to 0x10000 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_MESSAGEBOX_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_MESSAGEBOX_EQUATES.txt new file mode 100644 index 0000000..e199a38 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_MESSAGEBOX_EQUATES.txt @@ -0,0 +1,98 @@ +compile insert msWin_MessageBox_Equates +/* + ** Copyright (C) 2015 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date January 2015 + Purpose Equates for use with the Windows API MessageBox function + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 22 Oct 15 Added function declarations, dialog command IDs + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_MESSAGEBOX_EQUATES_ +#define _MSWIN_MESSAGEBOX_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + declare function msWin_MessageBox, msWin_MessageBeep + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ MB_OK$ to 0x00000000 + equ MB_OKCANCEL$ to 0x00000001 + equ MB_ABORTRETRYIGNORE$ to 0x00000002 + equ MB_YESNOCANCEL$ to 0x00000003 + equ MB_YESNO$ to 0x00000004 + equ MB_RETRYCANCEL$ to 0x00000005 + equ MB_CANCELTRYCONTINUE$ to 0x00000006 + + equ MB_ICONHAND$ to 0x00000010 + equ MB_ICONQUESTION$ to 0x00000020 + equ MB_ICONEXCLAMATION$ to 0x00000030 + equ MB_ICONASTERISK$ to 0x00000040 + + equ MB_USERICON$ to 0x00000080 + equ MB_ICONWARNING$ to MB_ICONEXCLAMATION$ + equ MB_ICONERROR$ to MB_ICONHAND$ + + equ MB_ICONINFORMATION$ to MB_ICONASTERISK$ + equ MB_ICONSTOP$ to MB_ICONHAND$ + + equ MB_DEFBUTTON1$ to 0x00000000 + equ MB_DEFBUTTON2$ to 0x00000100 + equ MB_DEFBUTTON3$ to 0x00000200 + equ MB_DEFBUTTON4$ to 0x00000300 + + equ MB_APPLMODAL$ to 0x00000000 + equ MB_SYSTEMMODAL$ to 0x00001000 + equ MB_TASKMODAL$ to 0x00002000 + equ MB_HELP$ to 0x00004000 + + equ MB_NOFOCUS$ to 0x00008000 + equ MB_SETFOREGROUND$ to 0x00010000 + equ MB_DEFAULT_DESKTOP_ONLY$ to 0x00020000 + + equ MB_TOPMOST$ to 0x00040000 + equ MB_RIGHT$ to 0x00080000 + equ MB_RTLREADING$ to 0x00100000 + + equ MB_SERVICE_NOTIFICATION$ to 0x00200000 + + equ MB_TYPEMASK$ to 0x0000000F + equ MB_ICONMASK$ to 0x000000F0 + equ MB_DEFMASK$ to 0x00000F00 + equ MB_MODEMASK$ to 0x00003000 + equ MB_MISCMASK$ to 0x0000C000 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // Dialog Box Command IDs + + equ IDOK$ to 1 + equ IDCANCEL$ to 2 + equ IDABORT$ to 3 + equ IDRETRY$ to 4 + equ IDIGNORE$ to 5 + equ IDYES$ to 6 + equ IDNO$ to 7 + equ IDCLOSE$ to 8 + equ IDHELP$ to 9 + equ IDTRYAGAIN$ to 10 + equ IDCONTINUE$ to 11 + equ IDTIMEOUT$ to 32000 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_MONITOR_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_MONITOR_EQUATES.txt new file mode 100644 index 0000000..5aeb263 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_MONITOR_EQUATES.txt @@ -0,0 +1,78 @@ +compile insert msWin_Monitor_Equates +/* + ** Copyright (C) 1992-2015 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Oct 2015 + Purpose Equates for use with the Windows Monitor functions + + Amended Date Reason + ======= ==== ====== + Mr C 22 Feb 22 Added Monitor Info functions + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_MONITOR_EQUATES_ +#define _MSWIN_MONITOR_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + declare function msWin_GetMonitorInfo + declare function msWin_MonitorFromRect, msWin_MonitorFromWindow + +//////////////////////////////////////////////////////////////////////////////// + + $uses @APPID*DLLSTRUCT**MSWIN_MONITORINFOEXW + +//////////////////////////////////////////////////////////////////////////////// + + // MONITORINFOEX structure constants + + equ MONITORINFOEX$ to "MSWIN_MONITORINFOEXW" + + /* + typedef struct tagMONITORINFOEXW + { + DWORD cbSize; + RECT rcMonitor; + RECT rcWork; + DWORD dwFlags; + WCHAR szDevice[CCHDEVICENAME]; + } MONITORINFOEXW, *LPMONITORINFOEXW; + + #define CCHDEVICENAME 32 + + */ + + * // We have defined the MONITORINFOEX to expand out the RECT structures to + * // their individual components + + equ MI_POS_CBSIZE$ to 1 + equ MI_POS_RCMONITOR_LEFT$ to 2 + equ MI_POS_RCMONITOR_TOP$ to 3 + equ MI_POS_RCMONITOR_RIGHT$ to 4 + equ MI_POS_RCMONITOR_BOTTOM$ to 5 + equ MI_POS_RCWORK_LEFT$ to 6 + equ MI_POS_RCWORK_TOP$ to 7 + equ MI_POS_RCWORK_RIGHT$ to 8 + equ MI_POS_RCWORK_BOTTOM$ to 9 + equ MI_POS_DWFLAGS$ to 10 + equ MI_POS_SZDEVICENAME$ to 11 + + // MONITORINFOEX dwFlags constants + equ MONITORINFOF_PRIMARY$ to 0x00000001 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ MONITOR_DEFAULTTONULL$ to 0x00000000 + equ MONITOR_DEFAULTTOPRIMARY$ to 0x00000001 + equ MONITOR_DEFAULTTONEAREST$ to 0x00000002 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_MOUSE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_MOUSE_EQUATES.txt new file mode 100644 index 0000000..914c40c --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_MOUSE_EQUATES.txt @@ -0,0 +1,33 @@ +compile insert msWin_Mouse_Equates +/* + ** Copyright (C) 2016 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date July 2016 + Purpose Windows API Mouse equates + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_MOUSE_EQUATES_ +#define _MSWIN_MOUSE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ MK_LBUTTON$ to 0x0001 + equ MK_RBUTTON$ to 0x0002 + equ MK_SHIFT$ to 0x0004 + equ MK_CONTROL$ to 0x0008 + equ MK_MBUTTON$ to 0x0010 + equ MK_XBUTTON1$ to 0x0020 + equ MK_XBUTTON2$ to 0x0040 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_MSG_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_MSG_EQUATES.txt new file mode 100644 index 0000000..7fdac63 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_MSG_EQUATES.txt @@ -0,0 +1,59 @@ +compile insert msWin_Msg_Equates +/* + ** Copyright (C) 1992-2014 Revelation Software Inc. All Rights Reserved ** + + Author Captain C + Date April 2014 + Purpose Equates for use with the Windows API Message functions + + Amended Date Reason + ======= ==== ====== + Mr C 15 Jun 16 Added msWin_CallMsgFilter +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_MSG_EQUATES_ +#define _MSWIN_MSG_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + declare function msWin_SendMessage, msWin_PostMessage + declare function msWin_DispatchMessage, msWin_TranslateMessage + declare function msWin_CallMsgFilter + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $insert msWin_PeekMessage_Equates + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // MSG structure equates + * // + * // typedef struct tagMSG { + * // HWND hwnd; + * // UINT message; + * // WPARAM wParam; + * // LPARAM lParam; + * // DWORD time; + * // POINT pt; + * // } + * // + + equ MSG$ to "MSWIN_MSG" + + equ MSG_POS_HWND$ to 1 + equ MSG_POS_MESSAGE$ to 2 + equ MSG_POS_WPARAM$ to 3 + equ MSG_POS_LPARAM$ to 4 + equ MSG_POS_TIME$ to 5 + equ MSG_POS_POINT$ to 6 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/MSWIN_OBJECT_HANDLE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_OBJECT_HANDLE_EQUATES.txt new file mode 100644 index 0000000..ab0b09e --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_OBJECT_HANDLE_EQUATES.txt @@ -0,0 +1,33 @@ +compile insert msWin_Object_Handle_Equates +/* + ** Copyright (C) 1992-2014 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date 05 Apr 2014 + Purpose Equates for use with the Windows API object handle + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_OBJECT_HANDLE_EQUATES_ +#define _MSWIN_OBJECT_HANDLE_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + declare function msWin_GetStdHandle, msWin_SetHandleInformation + declare function msWin_CloseHandle + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ HANDLE_FLAG_INHERIT$ to 0x00000001 + equ HANDLE_FLAG_PROTECT_FROM_CLOSE$ to 0x00000002 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_OLECMDID_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_OLECMDID_EQUATES.txt new file mode 100644 index 0000000..40d8d18 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_OLECMDID_EQUATES.txt @@ -0,0 +1,113 @@ +compile insert msWin_OLECMDID_Equates +/* + ** Copyright (C) 2014 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date May 2016 + Purpose OLECMDID constants + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_OLECMDID_EQUATES_ +#define _MSWIN_OLECMDID_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ OLECMDID_OPEN$ to 1 + equ OLECMDID_NEW$ to 2 + equ OLECMDID_SAVE$ to 3 + equ OLECMDID_SAVEAS$ to 4 + equ OLECMDID_SAVECOPYAS$ to 5 + equ OLECMDID_PRINT$ to 6 + equ OLECMDID_PRINTPREVIEW$ to 7 + equ OLECMDID_PAGESETUP$ to 8 + equ OLECMDID_SPELL$ to 9 + equ OLECMDID_PROPERTIES$ to 10 + equ OLECMDID_CUT$ to 11 + equ OLECMDID_COPY$ to 12 + equ OLECMDID_PASTE$ to 13 + equ OLECMDID_PASTESPECIAL$ to 14 + equ OLECMDID_UNDO$ to 15 + equ OLECMDID_REDO$ to 16 + equ OLECMDID_SELECTALL$ to 17 + equ OLECMDID_CLEARSELECTION$ to 18 + equ OLECMDID_ZOOM$ to 19 + equ OLECMDID_GETZOOMRANGE$ to 20 + equ OLECMDID_UPDATECOMMANDS$ to 21 + equ OLECMDID_REFRESH$ to 22 + equ OLECMDID_STOP$ to 23 + equ OLECMDID_HIDETOOLBARS$ to 24 + equ OLECMDID_SETPROGRESSMAX$ to 25 + equ OLECMDID_SETPROGRESSPOS$ to 26 + equ OLECMDID_SETPROGRESSTEXT$ to 27 + equ OLECMDID_SETTITLE$ to 28 + equ OLECMDID_SETDOWNLOADSTATE$ to 29 + equ OLECMDID_STOPDOWNLOAD$ to 30 + equ OLECMDID_ONTOOLBARACTIVATED$ to 31 + equ OLECMDID_FIND$ to 32 + equ OLECMDID_DELETE$ to 33 + equ OLECMDID_HTTPEQUIV$ to 34 + equ OLECMDID_HTTPEQUIV_DONE$ to 35 + equ OLECMDID_ENABLE_INTERACTION$ to 36 + equ OLECMDID_ONUNLOAD$ to 37 + equ OLECMDID_PROPERTYBAG2$ to 38 + equ OLECMDID_PREREFRESH$ to 39 + equ OLECMDID_SHOWSCRIPTERROR$ to 40 + equ OLECMDID_SHOWMESSAGE$ to 41 + equ OLECMDID_SHOWFIND$ to 42 + equ OLECMDID_SHOWPAGESETUP$ to 43 + equ OLECMDID_SHOWPRINT$ to 44 + equ OLECMDID_CLOSE$ to 45 + equ OLECMDID_ALLOWUILESSSAVEAS$ to 46 + equ OLECMDID_DONTDOWNLOADCSS$ to 47 + equ OLECMDID_UPDATEPAGESTATUS$ to 48 + equ OLECMDID_PRINT2$ to 49 + equ OLECMDID_PRINTPREVIEW2$ to 50 + equ OLECMDID_SETPRINTTEMPLATE$ to 51 + equ OLECMDID_GETPRINTTEMPLATE$ to 52 + equ OLECMDID_PAGEACTIONBLOCKED$ to 55 + equ OLECMDID_PAGEACTIONUIQUERY$ to 56 + equ OLECMDID_FOCUSVIEWCONTROLS$ to 57 + equ OLECMDID_FOCUSVIEWCONTROLSQUERY$ to 58 + equ OLECMDID_SHOWPAGEACTIONMENU$ to 59 + equ OLECMDID_ADDTRAVELENTRY$ to 60 + equ OLECMDID_UPDATETRAVELENTRY$ to 61 + equ OLECMDID_UPDATEBACKFORWARDSTATE$ to 62 + equ OLECMDID_OPTICAL_ZOOM$ to 63 + equ OLECMDID_OPTICAL_GETZOOMRANGE$ to 64 + equ OLECMDID_WINDOWSTATECHANGED$ to 65 + equ OLECMDID_ACTIVEXINSTALLSCOPE$ to 66 + equ OLECMDID_UPDATETRAVELENTRY_DATARECOVERY$ to 67 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // OLECMDEXECOPT constants + equ OLECMDEXECOPT_DODEFAULT$ to 0 + equ OLECMDEXECOPT_PROMPTUSER$ to 1 + equ OLECMDEXECOPT_DONTPROMPTUSER$ to 2 + equ OLECMDEXECOPT_SHOWHELP$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // OLECMDDF constants + equ OLECMDF_SUPPORTED$ to 0x1 + equ OLECMDF_ENABLED$ to 0x2 + equ OLECMDF_LATCHED$ to 0x4 + equ OLECMDF_NINCHED$ to 0x8 + equ OLECMDF_INVISIBLE$ to 0x10 + equ OLECMDF_DEFHIDEONCTXTMENU$ to 0x20 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_PEEKMESSAGE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_PEEKMESSAGE_EQUATES.txt new file mode 100644 index 0000000..456b389 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_PEEKMESSAGE_EQUATES.txt @@ -0,0 +1,33 @@ +compile insert msWin_PeekMessage_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date February 2013 + Purpose Equates for use with the Windows PeekMessage function + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_PEEKMESSAGE_EQUATES_ +#define _MSWIN_PEEKMESSAGE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_PeekMessage + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ PM_NOREMOVE$ to 0 + equ PM_REMOVE$ to 1 + equ PM_NOYIELD$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_POINT_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_POINT_EQUATES.txt new file mode 100644 index 0000000..5d98f6b --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_POINT_EQUATES.txt @@ -0,0 +1,47 @@ +compile insert msWin_Point_Equates +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date October 2012 + Purpose Equates for use with Windows POINT Structure + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_POINT_EQUATES_ +#define _MSWIN_POINT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $uses @APPID*DLLSTRUCT**MSWIN_POINT + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // POINT Structure equates - this structure is defined in the Windows API as: + // + // typedef struct _POINT { + // LONG x; + // LONG y; + // } POINT, + // + // The structure definition in OI32 is stored in SYSOBJ as + // STRUCT_WIN32_POINT + + equ POINT$ to "MSWIN_POINT" + + equ PT_POS_X$ to 1 + equ PT_POS_Y$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_PROCESS_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_PROCESS_EQUATES.txt new file mode 100644 index 0000000..a664212 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_PROCESS_EQUATES.txt @@ -0,0 +1,180 @@ +compile insert msWin_Process_Equates +/* + ** Copyright (C) 1992-2020 Revelation Software Inc. All Rights Reserved ** + + Author Captain C + Date April 2014 + Purpose Equates for use with the Windows API Process function + + Amended Date Reason + ======= ==== ====== + Mr C 06 Apr 20 Updated to reference DLLSTRUCT entities +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_PROCESS_EQUATES_ +#define _MSWIN_PROCESS_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + declare function msWin_CreateProcess + declare function msWin_CreateProcessByPtr + declare function msWin_OpenProcess + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $insert msWin_Access_Type_Equates + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ PROCESS_TERMINATE$ to 0x0001 + equ PROCESS_CREATE_THREAD$ to 0x0002 + equ PROCESS_VM_OPERATION$ to 0x0008 + equ PROCESS_VM_READ$ to 0x0010 + equ PROCESS_VM_WRITE$ to 0x0020 + equ PROCESS_DUP_HANDLE$ to 0x0040 + equ PROCESS_CREATE_PROCESS$ to 0x0080 + equ PROCESS_SET_QUOTA$ to 0x0100 + equ PROCESS_SET_INFORMATION$ to 0x0200 + equ PROCESS_QUERY_INFORMATION$ to 0x0400 + equ PROCESS_ALL_ACCESS$ to bitOr( bitOr( STANDARD_RIGHTS_REQUIRED$, SYNCHRONIZE$ ), 0xFFF ) + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // Process Creation Flags + + equ DEBUG_PROCESS$ to 0x00000001 + equ DEBUG_ONLY_THIS_PROCESS$ to 0x00000002 + equ CREATE_SUSPENDED$ to 0x00000004 + equ DETACHED_PROCESS$ to 0x00000008 + + equ CREATE_NEW_CONSOLE$ to 0x00000010 + equ NORMAL_PRIORITY_CLASS$ to 0x00000020 + equ IDLE_PRIORITY_CLASS$ to 0x00000040 + equ HIGH_PRIORITY_CLASS$ to 0x00000080 + + equ REALTIME_PRIORITY_CLASS$ to 0x00000100 + equ CREATE_NEW_PROCESS_GROUP$ to 0x00000200 + equ CREATE_UNICODE_ENVIRONMENT$ to 0x00000400 + equ CREATE_SEPARATE_WOW_VDM$ to 0x00000800 + + equ CREATE_SHARED_WOW_VDM$ to 0x00001000 + equ CREATE_FORCEDOS$ to 0x00002000 + equ BELOW_NORMAL_PRIORITY_CLASS$ to 0x00004000 + equ ABOVE_NORMAL_PRIORITY_CLASS$ to 0x00008000 + + equ INHERIT_PARENT_AFFINITY$ to 0x00010000 + equ INHERIT_CALLER_PRIORITY$ to 0x00020000 ; * // Deprecated + equ CREATE_PROTECTED_PROCESS$ to 0x00040000 + equ EXTENDED_STARTUPINFO_PRESENT$ to 0x00080000 + + equ PROCESS_MODE_BACKGROUND_BEGIN$ to 0x00100000 + equ PROCESS_MODE_BACKGROUND_END$ to 0x00200000 + + equ CREATE_BREAKAWAY_FROM_JOB$ to 0x01000000 + equ CREATE_PRESERVE_CODE_AUTHZ_LEVEL$ to 0x02000000 + equ CREATE_DEFAULT_ERROR_MODE$ to 0x04000000 + equ CREATE_NO_WINDOW$ to 0x08000000 + + equ PROFILE_USER$ to 0x10000000 + equ PROFILE_KERNEL$ to 0x20000000 + equ PROFILE_SERVER$ to 0x40000000 + equ CREATE_IGNORE_SYSTEM_DEFAULT$ to 0x80000000 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $uses @APPID*DLLSTRUCT**MSWIN_PROCESS_INFORMATION + $uses @APPID*DLLSTRUCT**MSWIN_STARTUPINFO + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // PROCESS_INFORMATION structure equates + * // + * // typedef struct _PROCESS_INFORMATION { + * // HANDLE hProcess; + * // HANDLE hThread; + * // DWORD dwProcessId; + * // DWORD dwThreadId; + * // } PROCESS_INFORMATION + + equ PROCESS_INFORMATION$ to "MSWIN_PROCESS_INFORMATION" + + equ PI_POS_HPROCESS$ to 1 + equ PI_POS_HTHREAD$ to 2 + equ PI_POS_DWPROCESSID$ to 3 + equ PI_POS_DWTHREADID$ to 4 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // STARTUPINFO structure equates + * // + * // typedef struct _STARTUPINFO { + * // DWORD cbSize; + * // LPTSTR lpReserved; + * // LPTSTR lpDesktop; + * // LPTSTR lpTitle; + * // DWORD dwX; + * // DWORD dwY; + * // DWORD dwXSize; + * // DWORD dwYSize; + * // DWORD dwXCountChars; + * // DWORD dwYCountChars; + * // DWORD dwFillAttribute; + * // DWORD dwFlags; + * // WORD wShowWindow; + * // WORD cbReserved2; + * // LPBYTE lpReserved2; + * // HANDLE hStdInput; + * // HANDLE hStdOutput; + * // HANDLE hStdError; + * // } STARTUPINFO + + equ STARTUPINFO$ to "MSWIN_STARTUPINFO" + + equ SI_POS_CBSIZE$ to 1 + equ SI_POS_LPRESERVED$ to 2 + equ SI_POS_LPDESKTOP$ to 3 + equ SI_POS_LPTITLE$ to 4 + equ SI_POS_DWX$ to 5 + equ SI_POS_DWY$ to 6 + equ SI_POS_DWXSIZE$ to 7 + equ SI_POS_DWYSIZE$ to 8 + equ SI_POS_DWXCOUNTCHARS$ to 9 + equ SI_POS_DWYCOUNTCHARS$ to 10 + equ SI_POS_DWFILLATTRIBUTE$ to 11 + equ SI_POS_DWFLAGS$ to 12 + equ SI_POS_WSHOWWINDOW$ to 13 + equ SI_POS_CBRESERVED2$ to 14 + equ SI_POS_LPRESERVED2$ to 15 + equ SI_POS_HSTDINPUT$ to 16 + equ SI_POS_HSTDOUTPUT$ to 17 + equ SI_POS_HSTDERROR$ to 18 + + + * // STARTUPINFO dwFlags + equ STARTF_USESHOWWINDOW$ to 0x00000001 + equ STARTF_USESIZE$ to 0x00000002 + equ STARTF_USEPOSITION$ to 0x00000004 + equ STARTF_USECOUNTCHARS$ to 0x00000008 + equ STARTF_USEFILLATTRIBUTE$ to 0x00000010 + equ STARTF_RUNFULLSCREEN$ to 0x00000020 ; * // ignored for non-x86 platforms + equ STARTF_FORCEONFEEDBACK$ to 0x00000040 + equ STARTF_FORCEOFFFEEDBACK$ to 0x00000080 + equ STARTF_USESTDHANDLES$ to 0x00000100 + equ STARTF_USEHOTKEY$ to 0x00000200 + equ STARTF_TITLEISLINKNAME$ to 0x00000800 + equ STARTF_TITLEISAPPID$ to 0x00001000 + equ STARTF_PREVENTPINNING$ to 0x00002000 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_PROGRESSBAR_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_PROGRESSBAR_EQUATES.txt new file mode 100644 index 0000000..e749382 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_PROGRESSBAR_EQUATES.txt @@ -0,0 +1,57 @@ +compile insert msWin_ProgressBar_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Feb 2013 + Purpose Equates for Windows ProgressBar controls + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_PROGRESSBAR_EQUATES_ +#define _MSWIN_PROGRESSBAR_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $insert msWin_CommCtrl_Equates + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ PROGRESS_CLASS$ to "msctls_progress32" + +//////////////////////////////////////////////////////////////////////////////// +// ProgressBar Styles ////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ PBS_SMOOTH$ to 0x01 + equ PBS_VERTICAL$ to 0x04 + equ PBS_MARQUEE$ to 0x08 + equ PBS_SMOOTHREVERSE$ to 0x10 + +//////////////////////////////////////////////////////////////////////////////// +// ProgressBar States ////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ PBST_NORMAL$ to 0x0001 + equ PBST_ERROR$ to 0x0002 + equ PBST_PAUSED$ to 0x0003 + +//////////////////////////////////////////////////////////////////////////////// +// ProgressBar Misc //////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ PB_DFT_STEP$ to 10 ; * // as docced in SDK + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_REBAR_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_REBAR_EQUATES.txt new file mode 100644 index 0000000..0fb715e --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_REBAR_EQUATES.txt @@ -0,0 +1,301 @@ +compile insert msWin_Rebar_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Equates for Windows Rebar controls + + Comments + ======== + + + + Amended Date Reason + ======= ==== ====== +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_REBAR_EQUATES_ +#define _MSWIN_REBAR_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $insert msWin_CommCtrl_Equates + +//////////////////////////////////////////////////////////////////////////////// +// Rebar Class ///////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ REBARCLASSNAME$ to "ReBarWindow32" + +//////////////////////////////////////////////////////////////////////////////// +// Rebar Messages ////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ RB_INSERTBANDA$ to 0x401 ; * // (WM_USER + 1) + equ RB_DELETEBAND$ to 0x402 ; * // (WM_USER + 2) + equ RB_GETBARINFO$ to 0x403 ; * // (WM_USER + 3) + equ RB_SETBARINFO$ to 0x404 ; * // (WM_USER + 4) + equ RB_SETBANDINFOA$ to 0x406 ; * // (WM_USER + 6) + equ RB_SETPARENT$ to 0x407 ; * // (WM_USER + 7) + equ RB_HITTEST$ to 0x408 ; * // (WM_USER + 8) + equ RB_GETRECT$ to 0x409 ; * // (WM_USER + 9) + equ RB_INSERTBANDW$ to 0x40A ; * // (WM_USER + 10) + equ RB_SETBANDINFOW$ to 0x40B ; * // (WM_USER + 11) + equ RB_GETBANDCOUNT$ to 0x40C ; * // (WM_USER + 12) + equ RB_GETROWCOUNT$ to 0x40D ; * // (WM_USER + 13) + equ RB_GETROWHEIGHT$ to 0x40E ; * // (WM_USER + 14) + equ RB_IDTOINDEX$ to 0x410 ; * // (WM_USER + 16) wParam == id + equ RB_GETTOOLTIPS$ to 0x411 ; * // (WM_USER + 17) + equ RB_SETTOOLTIPS$ to 0x412 ; * // (WM_USER + 18) + equ RB_SETBKCOLOR$ to 0x413 ; * // (WM_USER + 19) sets the default BK color + equ RB_GETBKCOLOR$ to 0x414 ; * // (WM_USER + 20) defaults to CLR_NONE + equ RB_SETTEXTCOLOR$ to 0x415 ; * // (WM_USER + 21) + equ RB_GETTEXTCOLOR$ to 0x416 ; * // (WM_USER + 22) defaults to 0x00000000 + equ RB_SIZETORECT$ to 0x417 ; * // (WM_USER + 23) resize the rebar/break bands and such to this rect (lparam) + equ RB_BEGINDRAG$ to 0x418 ; * // (WM_USER + 24) + equ RB_ENDDRAG$ to 0x419 ; * // (WM_USER + 25) + equ RB_DRAGMOVE$ to 0x41A ; * // (WM_USER + 26) + equ RB_GETBARHEIGHT$ to 0x41B ; * // (WM_USER + 27) + equ RB_GETBANDINFOW$ to 0x41C ; * // (WM_USER + 28) + equ RB_GETBANDINFOA$ to 0x41D ; * // (WM_USER + 29) + equ RB_MINIMIZEBAND$ to 0x41E ; * // (WM_USER + 30) + equ RB_MAXIMIZEBAND$ to 0x41F ; * // (WM_USER + 31) + equ RB_GETBANDBORDERS$ to 0x422 ; * // (WM_USER + 34) returns in lparam = lprc the amount of edges added to band wparam + equ RB_SHOWBAND$ to 0x423 ; * // (WM_USER + 35) show/hide band + equ RB_SETPALETTE$ to 0x425 ; * // (WM_USER + 37) + equ RB_GETPALETTE$ to 0x426 ; * // (WM_USER + 38) + equ RB_MOVEBAND$ to 0x427 ; * // (WM_USER + 39) + equ RB_GETBANDMARGINS$ to 0x428 ; * // (WM_USER + 40) + equ RB_SETEXTENDEDSTYLE$ to 0x429 ; * // (WM_USER + 41) + equ RB_GETEXTENDEDSTYLE$ to 0x42A ; * // (WM_USER + 42) + equ RB_PUSHCHEVRON$ to 0x42B ; * // (WM_USER + 43) + equ RB_SETBANDWIDTH$ to 0x42C ; * // (WM_USER + 44) set width for docked band + + equ RB_SETCOLORSCHEME$ to CCM_SETCOLORSCHEME$ // lParam is color scheme + equ RB_GETCOLORSCHEME$ to CCM_GETCOLORSCHEME$ // fills in COLORSCHEME pointed to by lParam + equ RB_GETDROPTARGET$ to CCM_GETDROPTARGET$ + equ RB_SETUNICODEFORMAT$ to CCM_SETUNICODEFORMAT$ + equ RB_GETUNICODEFORMAT$ to CCM_GETUNICODEFORMAT$ + equ RB_SETWINDOWTHEME$ to CCM_SETWINDOWTHEME$ + +#IFDEF UNICODE + equ RB_INSERTBAND$ to RB_INSERTBANDW$ + equ RB_SETBANDINFO$ to RB_SETBANDINFOW$ + equ RB_GETBANDINFO$ to RB_GETBANDINFOW$ +#ENDIF + +#IFNDEF UNICODE + equ RB_INSERTBAND$ to RB_INSERTBANDA$ + equ RB_SETBANDINFO$ to RB_SETBANDINFOA$ + equ RB_GETBANDINFO$ to RB_GETBANDINFOA$ +#endif + +//////////////////////////////////////////////////////////////////////////////// +// RB_SIZETORECT flags ///////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ RBSTR_CHANGERECT$ to 0x0001 ; * // flags for RB_SIZETORECT + +//////////////////////////////////////////////////////////////////////////////// +// Rebar Styles //////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ RBS_TOOLTIPS$ to 0x00000100 + equ RBS_VARHEIGHT$ to 0x00000200 + equ RBS_BANDBORDERS$ to 0x00000400 + equ RBS_FIXEDORDER$ to 0x00000800 + equ RBS_REGISTERDROP$ to 0x00001000 + equ RBS_AUTOSIZE$ to 0x00002000 + equ RBS_VERTICALGRIPPER$ to 0x00004000 ; * // this always has the vertical gripper (default for horizontal mode) + equ RBS_DBLCLKTOGGLE$ to 0x00008000 + +//////////////////////////////////////////////////////////////////////////////// +// Rebar Band Styles /////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ RBBS_BREAK$ to 0x00000001 ; * // break to new line + equ RBBS_FIXEDSIZE$ to 0x00000002 ; * // band can't be sized + equ RBBS_CHILDEDGE$ to 0x00000004 ; * // edge around top & bottom of child window + equ RBBS_HIDDEN$ to 0x00000008 ; * // don't show + equ RBBS_NOVERT$ to 0x00000010 ; * // don't show when vertical + equ RBBS_FIXEDBMP$ to 0x00000020 ; * // bitmap doesn't move during band resize + equ RBBS_VARIABLEHEIGHT$ to 0x00000040 ; * // allow autosizing of this child vertically + equ RBBS_GRIPPERALWAYS$ to 0x00000080 ; * // always show the gripper + equ RBBS_NOGRIPPER$ to 0x00000100 ; * // never show the gripper + equ RBBS_USECHEVRON$ to 0x00000200 ; * // display drop-down button for this band if it's sized smaller than ideal width + equ RBBS_HIDETITLE$ to 0x00000400 ; * // keep band title hidden + equ RBBS_TOPALIGN$ to 0x00000800 ; * // keep band in top row + +//////////////////////////////////////////////////////////////////////////////// +// Rebar Notifications ///////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ RBN_FIRST$ to -831 ; * // (0U-831U) + equ RBN_LAST$ to -859 ; * // (0U-859U) + + equ RBN_HEIGHTCHANGE$ to -831 ; * // (RBN_FIRST - 0) + equ RBN_GETOBJECT$ to -832 ; * // (RBN_FIRST - 1) + equ RBN_LAYOUTCHANGED$ to -833 ; * // (RBN_FIRST - 2) + equ RBN_AUTOSIZE$ to -834 ; * // (RBN_FIRST - 3) + equ RBN_BEGINDRAG$ to -835 ; * // (RBN_FIRST - 4) + equ RBN_ENDDRAG$ to -836 ; * // (RBN_FIRST - 5) + equ RBN_DELETINGBAND$ to -837 ; * // (RBN_FIRST - 6) // Uses NMREBAR + equ RBN_DELETEDBAND$ to -838 ; * // (RBN_FIRST - 7) // Uses NMREBAR + equ RBN_CHILDSIZE$ to -839 ; * // (RBN_FIRST - 8) + equ RBN_CHEVRONPUSHED$ to -841 ; * // (RBN_FIRST - 10) + equ RBN_SPLITTERDRAG$ to -842 ; * // (RBN_FIRST - 11) + equ RBN_MINMAX$ to -852 ; * // (RBN_FIRST - 21) + equ RBN_AUTOBREAK$ to -853 ; * // (RBN_FIRST - 22) + +/* +//////////////////////////////////////////////////////////////////////////////// +// REBARINFO structure ///////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + typedef struct tagREBARINFO + { + UINT cbSize; + UINT fMask; + #ifndef NOIMAGEAPIS + HIMAGELIST himl; + #else + HANDLE himl; + #endif + } REBARINFO, *LPREBARINFO; + + + equ REBARINFO$ to "MSWIN_REBARINFO" + + equ REBARINFO_POS_CBSIZE$ to 1 + equ REBARINFO_POS_FMASK$ to 2 + equ REBARINFO_POS_HIML$ to 3 + + * // fMask flags + equ RBIM_IMAGELIST$ to 0x00000001 + +//////////////////////////////////////////////////////////////////////////////// +// REBARBANDINFO structure ///////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + typedef struct tagREBARBANDINFOW + { + UINT cbSize; + UINT fMask; + UINT fStyle; + COLORREF clrFore; + COLORREF clrBack; + LPWSTR lpText; + UINT cch; + int iImage; + HWND hwndChild; + UINT cxMinChild; + UINT cyMinChild; + UINT cx; + HBITMAP hbmBack; + UINT wID; + UINT cyChild; + UINT cyMaxChild; + UINT cyIntegral; + UINT cxIdeal; + LPARAM lParam; + UINT cxHeader; +} REBARBANDINFOW, *LPREBARBANDINFOW; + + equ REBARBANDINFO$ to "MSWIN_REBARBANDINFO" + + equ RBBI_POS_CBSIZE$ to 1 + equ RBBI_POS_FMASK$ to 2 + equ RBBI_POS_FSTYLE$ to 3 + equ RBBI_POS_CLRFORE$ to 4 + equ RBBI_POS_CLRBACK$ to 5 + equ RBBI_POS_LPTEXT$ to 6 + equ RBBI_POS_CCH$ to 7 + equ RBBI_POS_IIMAGE$ to 8 + equ RBBI_POS_HWNDCHILD$ to 9 + equ RBBI_POS_CXMINCHILD$ to 10 + equ RBBI_POS_CYMINCHILD$ to 11 + equ RBBI_POS_CX$ to 12 + equ RBBI_POS_HBM_BACK$ to 13 + equ RBBI_POS_WID$ to 14 + equ RBBI_POS_CYCHILD$ to 15 + equ RBBI_POS_CYMAXCHILD$ to 16 + equ RBBI_POS_CYINTEGRAL$ to 17 + equ RBBI_POS_CXIDEAL$ to 18 + equ RBBI_POS_LPARAM$ to 19 + equ RBBI_POS_CXHEADER$ to 20 + + * // fMask bit flags + equ RBBIM_STYLE$ to 0x00000001 + equ RBBIM_COLORS$ to 0x00000002 + equ RBBIM_TEXT$ to 0x00000004 + equ RBBIM_IMAGE$ to 0x00000008 + equ RBBIM_CHILD$ to 0x00000010 + equ RBBIM_CHILDSIZE$ to 0x00000020 + equ RBBIM_SIZE$ to 0x00000040 + equ RBBIM_BACKGROUND$ to 0x00000080 + equ RBBIM_ID$ to 0x00000100 + equ RBBIM_IDEALSIZE$ to 0x00000200 + equ RBBIM_LPARAM$ to 0x00000400 + equ RBBIM_HEADERSIZE$ to 0x00000800 // control the size of the header + + +//////////////////////////////////////////////////////////////////////////////// + + * // This version is the v6.00 version for Vista systems in case we ever need + * // it... + + typedef struct tagREBARBANDINFOW + { + UINT cbSize; + UINT fMask; + UINT fStyle; + COLORREF clrFore; + COLORREF clrBack; + LPWSTR lpText; + UINT cch; + int iImage; + HWND hwndChild; + UINT cxMinChild; + UINT cyMinChild; + UINT cx; + HBITMAP hbmBack; + UINT wID; + UINT cyChild; + UINT cyMaxChild; + UINT cyIntegral; + UINT cxIdeal; + LPARAM lParam; + UINT cxHeader; +#if (_WIN32_WINNT >= 0x0600) + RECT rcChevronLocation; // the rect is in client co-ord wrt hwndChild + UINT uChevronState; // STATE_SYSTEM_* +#endif +} REBARBANDINFOW, *LPREBARBANDINFOW; + + equ REBARBANDINFO_V6$ to "MSWIN_REBARBANDINFO_V6" + + * // Use the equates for the normal REBARBANDINFO for the first 20 positions + equ RBBI_POS_CHEVLOC_RC_LEFT$ to 21 ; * // rcChevronLocation.left + equ RBBI_POS_CHEVLOC_RC_TOP$ to 22 ; * // rcChevronLocation.top + equ RBBI_POS_CHEVLOC_RC_RIGHT$ to 23 ; * // rcChevronLocation.right + equ RBBI_POS_CHEVLOC_RC_BOTTOM$ to 24 ; * // rcChevronLocation.bottom + equ RBBI_POS_CHEVRONSTATE$ to 25 + + * // fMask bit flags + equ RBBIM_CHEVRONLOCATION$ to 0x00001000 + equ RBBIM_CHEVRONSTATE$ to 0x00002000 + + +*/ + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_RECT_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_RECT_EQUATES.txt new file mode 100644 index 0000000..8ea5a68 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_RECT_EQUATES.txt @@ -0,0 +1,49 @@ +compile insert msWin_Rect_Equates +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date October 2012 + Purpose Equates for use with Windows Rect Structure + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 06 Apr 20 Updated to reference DLLSTRUCT entities +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_RECT_EQUATES_ +#define _MSWIN_RECT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $uses @APPID*DLLSTRUCT**MSWIN_RECT + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // RECT Structure equates - this structure is defined in the Windows API as: + // + // typedef struct _RECT { + // LONG left; + // LONG top; + // LONG right; + // LONG bottom; + // } RECT, + + equ RECT$ to "MSWIN_RECT" + + equ RECT_POS_LEFT$ to 1 + equ RECT_POS_TOP$ to 2 + equ RECT_POS_RIGHT$ to 3 + equ RECT_POS_BOTTOM$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_REGISTRY_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_REGISTRY_EQUATES.txt new file mode 100644 index 0000000..8cf0e65 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_REGISTRY_EQUATES.txt @@ -0,0 +1,90 @@ +compile insert msWin_Registry_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Feb 2013 + Purpose Equates for Windows API Registry functions + + Comments + ======== + + Amended Date Reason + ======= ==== ====== +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_REGISTRY_EQUATES_ +#define _MSWIN_REGISTRY_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $insert msWin_Access_Type_Equates + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + declare function msWin_RegCreateKeyEx, msWin_RegOpenKeyEx + declare function msWin_RegQueryValueEx, msWin_RegSetValueEx + declare function msWin_RegCloseKey + + ///////////////////////////////////////////////////////////////////////////// + // Standard Registry Types ////////////////////////////////////////////////// + + equ REG_NONE$ to 0 + equ REG_SZ$ to 1 + equ REG_EXPAND_SZ$ to 2 + equ REG_BINARY$ to 3 + equ REG_DWORD$ to 4 + equ REG_DWORD_LITTLE_ENDIAN$ to 4 + equ REG_DWORD_BIG_ENDIAN$ to 5 + equ REG_LINK$ to 6 + equ REG_MULTI_SZ$ to 7 + equ REG_RESOURCE_LIST$ to 8 + + //////////////////////////////////////////////////////////////////////////// + // Registry option equates ///////////////////////////////////////////////// + + equ REG_OPTION_NON_VOLATILE$ to 0 + + //////////////////////////////////////////////////////////////////////////// + // Predefined registry keys from WINDOWS.H ///////////////////////////////// + + equ HKEY_CLASSES_ROOT$ to 0x80000000 + equ HKEY_CURRENT_USER$ to 0x80000001 + equ HKEY_LOCAL_MACHINE$ to 0x80000002 + equ HKEY_USERS$ to 0x80000003 + equ HKEY_PERFORMANCE_DATA$ to 0x80000004 + equ HKEY_CURRENT_CONFIG$ to 0x80000005 + equ HKEY_DYN_DATA$ to 0x80000006 + + ///////////////////////////////////////////////////////////////////////////// + // Root key text equates //////////////////////////////////////////////////// + + equ HKEYTXT_CLASSES_ROOT$ to "HKEY_CLASSES_ROOT" + equ HKEYTXT_CURRENT_USER$ to "HKEY_CURRENT_USER" + equ HKEYTXT_LOCAL_MACHINE$ to "HKEY_LOCAL_MACHINE" + equ HKEYTXT_USERS$ to "HKEY_USERS" + equ HKEYTXT_PERFORMANCE_DATA$ to "HKEY_PERFORMANCE_DATA" + equ HKEYTXT_CURRENT_CONFIG$ to "HKEY_CURRENT_CONFIG" + equ HKEYTXT_DYN_DATA$ to "HKEY_DYN_DATA" + + ///////////////////////////////////////////////////////////////////////////// + // Registry Access Types //////////////////////////////////////////////////// + + equ KEY_QUERY_VALUE$ to 0x0001 + equ KEY_SET_VALUE$ to 0x0002 + equ KEY_CREATE_SUB_KEY$ to 0x0004 + equ KEY_ENUMERATE_SUB_KEYS$ to 0x0008 + equ KEY_NOTIFY$ to 0x0010 + equ KEY_CREATE_LINK$ to 0x0020 + equ KEY_READ$ to ( STANDARD_RIGHTS_READ$ + KEY_QUERY_VALUE$ + KEY_ENUMERATE_SUB_KEYS$ + KEY_NOTIFY$ ) + equ KEY_WRITE$ to ( STANDARD_RIGHTS_WRITE$ + KEY_SET_VALUE$ + KEY_CREATE_SUB_KEY$ ) + equ KEY_EXECUTE$ to KEY_READ$ + equ KEY_ALL_ACCESS$ to ( STANDARD_RIGHTS_ALL$ + KEY_QUERY_VALUE$ + KEY_SET_VALUE$ + KEY_CREATE_SUB_KEY$ + KEY_ENUMERATE_SUB_KEYS$ + KEY_NOTIFY$ + KEY_CREATE_LINK$ ) - SYNCHRONIZE$ + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_SCROLLBAR_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SCROLLBAR_EQUATES.txt new file mode 100644 index 0000000..39f9a5d --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SCROLLBAR_EQUATES.txt @@ -0,0 +1,87 @@ +compile insert msWin_ScrollBar_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Scrollbar Constants + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + mtr 12 Dec 2014 Git sucks +*/ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SCROLLBAR_EQUATES_ +#define _MSWIN_SCROLLBAR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SB_HORZ$ to 0 + equ SB_VERT$ to 1 + equ SB_CTL$ to 2 + equ SB_BOTH$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +// Scrollbar Messages ///////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SBM_SETPOS$ to 224 + equ SBM_GETPOS$ to 225 + equ SBM_SETRANGE$ to 226 + equ SBM_SETRANGEREDRAW$ to 230 + equ SBM_GETRANGE$ to 227 + equ SBM_ENABLE_ARROWS$ to 228 + equ SBM_SETSCROLLINFO$ to 233 + equ SBM_GETSCROLLINFO$ to 234 + +/////////////////////////////////////////////////////////////////////////////// +// Scrollbar Styles /////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SBS_HORZ$ to 0 + equ SBS_VERT$ to 1 + equ SBS_TOPALIGN$ to 2 + equ SBS_LEFTALIGN$ to 2 + equ SBS_BOTTOMALIGN$ to 4 + equ SBS_RIGHTALIGN$ to 4 + equ SBS_SIZEBOXTOPLEFTALIGN$ to 2 + equ SBS_SIZEBOXBOTTOMRIGHTALIGN$ to 4 + equ SBS_SIZEBOX$ to 8 + equ SBS_SIZEGRIP$ to 0x10 + +/////////////////////////////////////////////////////////////////////////////// +// Scrollbar Commands ///////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SB_LINEUP$ to 0 + equ SB_LINELEFT$ to 0 + equ SB_LINEDOWN$ to 1 + equ SB_LINERIGHT$ to 1 + equ SB_PAGEUP$ to 2 + equ SB_PAGELEFT$ to 2 + equ SB_PAGEDOWN$ to 3 + equ SB_PAGERIGHT$ to 3 + equ SB_THUMBPOSITION$ to 4 + equ SB_THUMBTRACK$ to 5 + equ SB_TOP$ to 6 + equ SB_LEFT$ to 6 + equ SB_BOTTOM$ to 7 + equ SB_RIGHT$ to 7 + equ SB_ENDSCROLL$ to 8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_SECURITY_ATTRIBUTES_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SECURITY_ATTRIBUTES_EQUATES.txt new file mode 100644 index 0000000..aac35ff --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SECURITY_ATTRIBUTES_EQUATES.txt @@ -0,0 +1,43 @@ +compile insert msWin_Security_Attributes_Equates +/* + ** Copyright (C) 1992-2020 Revelation Software Inc. All Rights Reserved ** + + Author Captain C + Date April 2012 + Purpose Equates for use with the Windows API Security Attributes structure + + Amended Date Reason + ======= ==== ====== + Mr C 06 Apr 20 Updated to reference DLLSTRUCT entities +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SECURITY_ATTRIBUTES_EQUATES_ +#define _MSWIN_SECURITY_ATTRIBUTES_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $uses @APPID*DLLSTRUCT**MSWIN_SECURITY_ATTRIBUTES + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // PROCESS_INFORMATION structure equates + * // + * // typedef struct _SECURITY_ATTRIBUTES { + * // DWORD nLength; + * // LPVOID lpSecurityDescriptor; + * // BOOL bInheritHandle; + * // } SECURITY_ATTRIBUTES + + equ SECURITY_ATTRIBUTES$ to "MSWIN_SECURITY_ATTRIBUTES" + + equ SA_POS_NLENGTH$ to 1 + equ SA_POS_LPSECURITYDESCRIPTOR$ to 2 + equ SA_POS_BINHERITHANDLE$ to 3 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_SETWINDOWPOS_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SETWINDOWPOS_EQUATES.txt new file mode 100644 index 0000000..2fdceaa --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SETWINDOWPOS_EQUATES.txt @@ -0,0 +1,46 @@ +compile insert msWin_SetWindowPos_Equates +/* + ** Copyright (C) 2020 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date April 2020 + Purpose Equates for the setWindowPos Windows API function. + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SETWINDOWPOS_EQUATES_ +#define _MSWIN_SETWINDOWPOS_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SWP_NOSIZE$ to 1 + equ SWP_NOMOVE$ to 2 + equ SWP_NOZORDER$ to 4 + equ SWP_NOREDRAW$ to 8 + equ SWP_NOACTIVATE$ to 0x10 + equ SWP_FRAMECHANGED$ to 0x20 ; * // The frame changed: send WM_NCCALCSIZE + equ SWP_SHOWWINDOW$ to 0x40 + equ SWP_HIDEWINDOW$ to 0x80 + equ SWP_NOCOPYBITS$ to 0x100 + equ SWP_NOOWNERZORDER$ to 0x200 ; * // Don't do owner Z ordering + equ SWP_NOSENDCHANGING$ to 0x400 ; * // Don't send WM_WINDOWPOSCHANGING + equ SWP_DRAWFRAME$ to SWP_FRAMECHANGED$ + equ SWP_NOREPOSITION$ to SWP_NOOWNERZORDER$ + equ SWP_DEFERERASE$ to 0x2000 + equ SWP_ASYNCWINDOWPOS$ to 0x4000 + + equ HWND_TOP$ to 0 + equ HWND_BOTTOM$ to 1 + equ HWND_TOPMOST$ to -1 + equ HWND_NOTOPMOST$ to -2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_SHELLEXECUTEINFO_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SHELLEXECUTEINFO_EQUATES.txt new file mode 100644 index 0000000..a888992 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SHELLEXECUTEINFO_EQUATES.txt @@ -0,0 +1,98 @@ +compile insert msWin_ShellExecuteInfo_Equates +/* + ** Copyright (C) 1992-2019 Revelation Software Inc. All Rights Reserved ** + + Author Captain C + Date May 2019 + Purpose Equates for use with the Windows API ShellExecuteInfo structure + + + Comments + ======== + + typedef struct _SHELLEXECUTEINFO { + DWORD cbSize; + ULONG fMask; + hwnd hwnd; + LPCTSTR lpVerb; + LPCTSTR lpFile; + LPCTSTR lpParameters; + LPCTSTR lpDirectory; + int nShow; + HINSTANCE hInstApp; + LPVOID lpIDList; + LPCTSTR lpClass; + HKEY hkeyClass; + DWORD dwHotKey; + union { + HANDLE hIcon; + HANDLE hMonitor; + } DUMMYUNIONNAME; + HANDLE hProcess; + } SHELLEXECUTEINFO, *LPSHELLEXECUTEINFO; + + + Amended Date Reason + ======= ==== ====== +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SHELLEXECUTEINFO_EQUATES_ +#define _MSWIN_SHELLEXECUTEINFO_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $uses @APPID*DLLSTRUCT**MSWIN_SHELLEXECUTEINFO + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + // Structure "field positions" + + equ SEI_POS_CBSIZE$ to 1 + equ SET_POS_FMASK$ to 2 + equ SEI_POS_HWND$ to 3 + equ SEI_POS_LPVERB$ to 4 + equ SEI_POS_LPFILE$ to 5 + equ SEI_POS_LPPARAMETERS$ to 6 + equ SEI_POS_LPDIRECTORY$ to 7 + equ SEI_POS_NSHOW$ to 8 + equ SEI_POS_HINSTAPP$ to 9 + equ SEI_POS_LPIDLIST$ to 10 + equ SEI_POS_LPCLASS$ to 11 + equ SEI_POS_HKEYCLASS$ to 12 + equ SEI_POS_DWHOTKEY$ to 13 + equ SEI_POS_HMONITOR$ to 14 + equ SEI_POS_HPROCESS$ to 15 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + // fMask attributes + + equ SEE_MASK_DEFAULT$ to 0x00000000 + equ SEE_MASK_CLASSNAME$ to 0x00000001 ; // SHELLEXECUTEINFO.lpClass is valid + equ SEE_MASK_CLASSKEY$ to 0x00000003 ; // SHELLEXECUTEINFO.hkeyClass is valid + equ SEE_MASK_IDLIST$ to 0x00000004 ; // SHELLEXECUTEINFO.lpIDList is valid + equ SEE_MASK_INVOKEIDLIST$ to 0x0000000c ; // enable IContextMenu based verbs + equ SEE_MASK_HOTKEY$ to 0x00000020 ; // SHELLEXECUTEINFO.dwHotKey is valid + equ SEE_MASK_NOCLOSEPROCESS$ to 0x00000040 ; // SHELLEXECUTEINFO.hProcess + equ SEE_MASK_CONNECTNETDRV$ to 0x00000080 ; // enables re-connecting disconnected network drives + equ SEE_MASK_NOASYNC$ to 0x00000100 ; // block on the call until the invoke has completed, use for callers that exit after calling ShellExecuteEx() + equ SEE_MASK_FLAG_DDEWAIT$ to SEE_MASK_NOASYNC$ ; // Use SEE_MASK_NOASYNC instead of SEE_MASK_FLAG_DDEWAIT as it more accuratly describes the behavior + equ SEE_MASK_DOENVSUBST$ to 0x00000200 ; // indicates that SHELLEXECUTEINFO.lpFile contains env vars that should be expanded + equ SEE_MASK_FLAG_NO_UI$ to 0x00000400 ; // disable UI including error messages + equ SEE_MASK_UNICODE$ to 0x00004000 + equ SEE_MASK_NO_CONSOLE$ to 0x00008000 + equ SEE_MASK_ASYNCOK$ to 0x00100000 + equ SEE_MASK_HMONITOR$ to 0x00200000 ; // SHELLEXECUTEINFO.hMonitor + equ SEE_MASK_NOZONECHECKS$ to 0x00800000 + equ SEE_MASK_NOQUERYCLASSSTORE$ to 0x01000000 + equ SEE_MASK_WAITFORINPUTIDLE$ to 0x02000000 + equ SEE_MASK_FLAG_LOG_USAGE$ to 0x04000000 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_SHELLEXECUTE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SHELLEXECUTE_EQUATES.txt new file mode 100644 index 0000000..6ee649a --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SHELLEXECUTE_EQUATES.txt @@ -0,0 +1,39 @@ +compile insert msWin_ShellExecute_Equates +/* + ** Copyright (C) 2013-2020 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Oct 2020 + Purpose Equates for use with the Windows HTMLHep function + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SHELLEXECUTE_EQUATES_ +#define _MSWIN_SHELLEXECUTE_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + // Error values + equ SE_ERR_OS_OOR$ to 0 ; // The OS is out of resources + equ SE_ERR_FNF$ to 2 ; // The specified file was not found + equ SE_ERR_PNF$ to 3 ; // The specified path was not found + equ SE_ERR_ACCESSDENIED$ to 5 ; // The operating system denied access to the specified file + equ SE_ERR_OOM$ to 8 ; // There was not enough memory to complete the operation + equ SE_ERR_BAD_FORMAT$ to 11 ; // The .exe file is invalid (non-Win32 .exe or error in .exe image) + equ SE_ERR_SHARE$ to 26 ; // A sharing violation occurred + equ SE_ERR_ASSOCINCOMPLETE$ to 27 ; // The file name association is incomplete or invalid + equ SE_ERR_DDETIMEOUT$ to 28 ; // The DDE transaction could not be completed because the request timed out + equ SE_ERR_DDEFAIL$ to 29 ; // The DDE transaction failed + equ SE_ERR_DDEBUSY$ to 30 ; // The DDE transaction could not be completed because other DDE transactions were being processed + equ SE_ERR_NOASSOC$ to 31 ; // There is no application associated with the given file name extension. + equ SE_ERR_DLLNOTFOUND$ to 32 ; // The specified DLL was not found + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_SHFOLDER_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SHFOLDER_EQUATES.txt new file mode 100644 index 0000000..670e124 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SHFOLDER_EQUATES.txt @@ -0,0 +1,62 @@ +compile insert msWin_SHFolder_Equates +/* + Author Mr C + Date April 2018 + Purpose Equates for use with Win32 Shell Folder functions + + Comments + ======== + + Extracted from shfolder.h and shlobj.h + + + Amended Date Reason + ======= ==== ====== + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SHFOLDER_EQUATES_ +#define _MSWIN_SHFOLDER_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + declare function msWin_SHGetFolderPath + $insert msWin_Max_Path_Equates +/////////////////////////////////////////////////////////////////////////////// + + equ CSIDL_PERSONAL$ to 0x0005 ; * // My Documents + equ CSIDL_MYMUSIC$ to 0x000d ; * // "My Music" folder + equ CSIDL_APPDATA$ to 0x001A ; * // Application Data + equ CSIDL_LOCAL_APPDATA$ to 0x001C ; * // non roaming, + ; * // user\Local Settings\Application Data + equ CSIDL_INTERNET_CACHE$ to 0x0020 ; + equ CSIDL_COOKIES$ to 0x0021 ; + equ CSIDL_HISTORY$ to 0x0022 ; + equ CSIDL_COMMON_APPDATA$ to 0x0023 ; * // All Users\Application Data + equ CSIDL_WINDOWS$ to 0x0024 ; * // GetWindowsDirectory() + equ CSIDL_SYSTEM$ to 0x0025 ; * // GetSystemDirectory() + equ CSIDL_PROGRAM_FILES$ to 0x0026 ; * // C:\Program Files + equ CSIDL_MYPICTURES$ to 0x0027 ; * // My Pictures, new for Win2K + equ CSIDL_PROGRAM_FILES_COMMON$ to 0x002b ; * // C:\Program Files\Common + equ CSIDL_COMMON_DOCUMENTS$ to 0x002e ; * // All Users\Documents + equ CSIDL_RESOURCES$ to 0x0038 ; * // %windir%\Resources\, + ; * // For theme and other windows resources. + equ CSIDL_RESOURCES_LOCALIZED$ to 0x0039 ; * // %windir%\Resources\, + ; * // for theme and other windows specific resources. + equ CSIDL_COMMON_ADMINTOOLS$ to 0x002f ; * // All Users\Start Menu\Programs\Administrative Tools + equ CSIDL_ADMINTOOLS$ to 0x0030 ; * // \Start Menu\Programs\Administrative Tools + + equ CSIDL_FLAG_CREATE$ to 0x8000 ; * // new for Win2K, or this in to force creation of folder + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SHGFP_TYPE_CURRENT$ to 0 ; * // current value for user, verify it exists + equ SHGFP_TYPE_DEFAULT$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_SHOWWINDOW_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SHOWWINDOW_EQUATES.txt new file mode 100644 index 0000000..733ca8e --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SHOWWINDOW_EQUATES.txt @@ -0,0 +1,38 @@ +compile insert msWin_ShowWindow_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Captain C, BSG Revelation + Date Oktober 2012 + Purpose Equates for the ShowWindow Windows API function. + The SW_ constants may also be mapped onto a form's + VISIBLE property + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SHOWWINDOW_EQUATES_ +#define _MSWIN_SHOWWINDOW_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SW_HIDE$ to 0 + equ SW_SHOWNORMAL$ to 1 + equ SW_NORMAL$ to 1 + equ SW_SHOWMINIMIZED$ to 2 + equ SW_SHOWMAXIMIZED$ to 3 + equ SW_MAXIMIZE$ to 3 + equ SW_SHOWNOACTIVATE$ to 4 + equ SW_SHOW$ to 5 + equ SW_MINIMIZE$ to 6 + equ SW_SHOWMINNOACTIVE$ to 7 + equ SW_SHOWNA$ to 8 + equ SW_RESTORE$ to 9 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_SPI_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SPI_EQUATES.txt new file mode 100644 index 0000000..a466641 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SPI_EQUATES.txt @@ -0,0 +1,177 @@ +compile insert msWin_SPI_Equates +/* + ** Copyright (C) 2013-2022 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Feb 2022 + Purpose Equates for the SystemParametersInfo Windows API function. + + Amended Date Reason + ======= ==== ====== +*/ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SPI_EQUATES_ +#define _MSWIN_SPI_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_SystemParametersInfo + declare function msWin_SystemParametersInfoByPtr + +/////////////////////////////////////////////////////////////////////////////// + + equ SPI_GETBEEP$ to 1 + equ SPI_SETBEEP$ to 2 + equ SPI_GETMOUSE$ to 3 + equ SPI_SETMOUSE$ to 4 + equ SPI_GETBORDER$ to 5 + equ SPI_SETBORDER$ to 6 + equ SPI_GETKEYBOARDSPEED$ to 10 + equ SPI_SETKEYBOARDSPEED$ to 11 + equ SPI_LANGDRIVER$ to 12 + equ SPI_ICONHORIZONTALSPACING$ to 13 + equ SPI_GETSCREENSAVETIMEOUT$ to 14 + equ SPI_SETSCREENSAVETIMEOUT$ to 15 + equ SPI_GETSCREENSAVEACTIVE$ to 0x10 + equ SPI_SETSCREENSAVEACTIVE$ to 17 + equ SPI_GETGRIDGRANULARITY$ to 18 + equ SPI_SETGRIDGRANULARITY$ to 19 + equ SPI_SETDESKWALLPAPER$ to 20 + equ SPI_SETDESKPATTERN$ to 21 + equ SPI_GETKEYBOARDDELAY$ to 22 + equ SPI_SETKEYBOARDDELAY$ to 23 + equ SPI_ICONVERTICALSPACING$ to 24 + equ SPI_GETICONTITLEWRAP$ to 25 + equ SPI_SETICONTITLEWRAP$ to 26 + equ SPI_GETMENUDROPALIGNMENT$ to 27 + equ SPI_SETMENUDROPALIGNMENT$ to 28 + equ SPI_SETDOUBLECLKWIDTH$ to 29 + equ SPI_SETDOUBLECLKHEIGHT$ to 30 + equ SPI_GETICONTITLELOGFONT$ to 31 + equ SPI_SETDOUBLECLICKTIME$ to 0x20 + equ SPI_SETMOUSEBUTTONSWAP$ to 33 + equ SPI_SETICONTITLELOGFONT$ to 34 + equ SPI_GETFASTTASKSWITCH$ to 35 + equ SPI_SETFASTTASKSWITCH$ to 36 + equ SPI_SETDRAGFULLWINDOWS$ to 37 + equ SPI_GETDRAGFULLWINDOWS$ to 38 + equ SPI_GETNONCLIENTMETRICS$ to 41 + equ SPI_SETNONCLIENTMETRICS$ to 42 + equ SPI_GETMINIMIZEDMETRICS$ to 43 + equ SPI_SETMINIMIZEDMETRICS$ to 44 + equ SPI_GETICONMETRICS$ to 45 + equ SPI_SETICONMETRICS$ to 46 + equ SPI_SETWORKAREA$ to 47 + equ SPI_GETWORKAREA$ to 48 + equ SPI_SETPENWINDOWS$ to 49 + equ SPI_GETFILTERKEYS$ to 50 + equ SPI_SETFILTERKEYS$ to 51 + equ SPI_GETTOGGLEKEYS$ to 52 + equ SPI_SETTOGGLEKEYS$ to 53 + equ SPI_GETMOUSEKEYS$ to 54 + equ SPI_SETMOUSEKEYS$ to 55 + equ SPI_GETSHOWSOUNDS$ to 56 + equ SPI_SETSHOWSOUNDS$ to 57 + equ SPI_GETSTICKYKEYS$ to 58 + equ SPI_SETSTICKYKEYS$ to 59 + equ SPI_GETACCESSTIMEOUT$ to 60 + equ SPI_SETACCESSTIMEOUT$ to 61 + equ SPI_GETSERIALKEYS$ to 62 + equ SPI_SETSERIALKEYS$ to 63 + equ SPI_GETSOUNDSENTRY$ to 64 + equ SPI_SETSOUNDSENTRY$ to 65 + equ SPI_GETHIGHCONTRAST$ to 66 + equ SPI_SETHIGHCONTRAST$ to 67 + equ SPI_GETKEYBOARDPREF$ to 68 + equ SPI_SETKEYBOARDPREF$ to 69 + equ SPI_GETSCREENREADER$ to 70 + equ SPI_SETSCREENREADER$ to 71 + equ SPI_GETANIMATION$ to 72 + equ SPI_SETANIMATION$ to 73 + equ SPI_GETFONTSMOOTHING$ to 74 + equ SPI_SETFONTSMOOTHING$ to 75 + equ SPI_SETDRAGWIDTH$ to 76 + equ SPI_SETDRAGHEIGHT$ to 77 + equ SPI_SETHANDHELD$ to 78 + equ SPI_GETLOWPOWERTIMEOUT$ to 79 + equ SPI_GETPOWEROFFTIMEOUT$ to 80 + equ SPI_SETLOWPOWERTIMEOUT$ to 81 + equ SPI_SETPOWEROFFTIMEOUT$ to 82 + equ SPI_GETLOWPOWERACTIVE$ to 83 + equ SPI_GETPOWEROFFACTIVE$ to 84 + equ SPI_SETLOWPOWERACTIVE$ to 85 + equ SPI_SETPOWEROFFACTIVE$ to 86 + equ SPI_SETCURSORS$ to 87 + equ SPI_SETICONS$ to 88 + equ SPI_GETDEFAULTINPUTLANG$ to 89 + equ SPI_SETDEFAULTINPUTLANG$ to 90 + equ SPI_SETLANGTOGGLE$ to 91 + equ SPI_GETWINDOWSEXTENSION$ to 92 + equ SPI_SETMOUSETRAILS$ to 93 + equ SPI_GETMOUSETRAILS$ to 94 + equ SPI_GETSNAPTODEFBUTTON$ to 95 + equ SPI_SETSNAPTODEFBUTTON$ to 96 + equ SPI_SCREENSAVERRUNNING$ to 97 + equ SPI_GETMOUSEHOVERWIDTH$ to 98 + equ SPI_SETMOUSEHOVERWIDTH$ to 99 + equ SPI_GETMOUSEHOVERHEIGHT$ to 100 + equ SPI_SETMOUSEHOVERHEIGHT$ to 101 + equ SPI_GETMOUSEHOVERTIME$ to 102 + equ SPI_SETMOUSEHOVERTIME$ to 103 + equ SPI_GETWHEELSCROLLLINES$ to 104 + equ SPI_SETWHEELSCROLLLINES$ to 105; // For Win95 and WinNT3.51, + // Mswheel broadcasts the message + // WM_SETTINGCHANGE (equivalent to + // WM_WININICHANGE) when the scroll + // lines has changed. Applications + // will recieve the WM_SETTINGCHANGE + // message with the wParam set to + // SPI_SETWHEELSCROLLLINES. When + // this message is recieved the + // application should query Mswheel for + // the new setting. + equ SPI_GETSHOWIMEUI$ to 110 + equ SPI_SETSHOWIMEUI$ to 111 + equ SPI_GETMOUSESPEED$ to 112 + equ SPI_SETMOUSESPEED$ to 113 + equ SPI_GETSCREENSAVERRUNNING$ to 114 + + equ SPI_GETACTIVEWINDOWTRACKING$ to 0x1000 + equ SPI_SETACTIVEWINDOWTRACKING$ to 0x1001 + equ SPI_GETMENUANIMATION$ to 0x1002 + equ SPI_SETMENUANIMATION$ to 0x1003 + equ SPI_GETCOMBOBOXANIMATION$ to 0x1004 + equ SPI_SETCOMBOBOXANIMATION$ to 0x1005 + equ SPI_GETLISTBOXSMOOTHSCROLLING$ to 0x1006 + equ SPI_SETLISTBOXSMOOTHSCROLLING$ to 0x1007 + equ SPI_GETGRADIENTCAPTIONS$ to 0x1008 + equ SPI_SETGRADIENTCAPTIONS$ to 0x1009 + equ SPI_GETMENUUNDERLINES$ to 0x100A + equ SPI_SETMENUUNDERLINES$ to 0x100B + equ SPI_GETACTIVEWNDTRKZORDER$ to 0x100C + equ SPI_SETACTIVEWNDTRKZORDER$ to 0x100D + equ SPI_GETHOTTRACKING$ to 0x100E + equ SPI_SETHOTTRACKING$ to 0x100F + equ SPI_GETFOREGROUNDLOCKTIMEOUT$ to 0x2000 + equ SPI_SETFOREGROUNDLOCKTIMEOUT$ to 0x2001 + equ SPI_GETACTIVEWNDTRKTIMEOUT$ to 0x2002 + equ SPI_SETACTIVEWNDTRKTIMEOUT$ to 0x2003 + equ SPI_GETFOREGROUNDFLASHCOUNT$ to 0x2004 + equ SPI_SETFOREGROUNDFLASHCOUNT$ to 0x2005 + + ///////////////////////////////////////////////////////////////////////////// + // Flags //////////////////////////////////////////////////////////////////// + + equ SPIF_UPDATEINIFILE$ to 1; + equ SPIF_SENDWININICHANGE$ to 2; + equ SPIF_SENDCHANGE$ to SPIF_SENDWININICHANGE$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/MSWIN_STATIC_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_STATIC_EQUATES.txt new file mode 100644 index 0000000..fe671d2 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_STATIC_EQUATES.txt @@ -0,0 +1,84 @@ +compile insert msWin_Static_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : June 2013 + Purpose : Constants for Static controls + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + mtr 12 Dec 2014 Git sucks +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_STATIC_EQUATES_ +#define _MSWIN_STATIC_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/// STATIC style equates ////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SS_LEFT$ to 0x00000000 + equ SS_CENTER$ to 0x00000001 + equ SS_RIGHT$ to 0x00000002 + equ SS_ICON$ to 0x00000003 ; * // Not supported by PS STATIC + equ SS_BLACKRECT$ to 0x00000004 + equ SS_GRAYRECT$ to 0x00000005 + equ SS_WHITERECT$ to 0x00000006 + equ SS_BLACKFRAME$ to 0x00000007 + equ SS_GRAYFRAME$ to 0x00000008 + equ SS_WHITEFRAME$ to 0x00000009 + equ SS_USERITEM$ to 0x0000000A + equ SS_SIMPLE$ to 0x0000000B + equ SS_LEFTNOWORDWRAP$ to 0x0000000C + equ SS_OWNERDRAW$ to 0x0000000D + equ SS_BITMAP$ to 0x0000000E ; * // Not supported by PS STATIC + equ SS_ENHMETAFILE$ to 0x0000000F ; * // Not supported by PS STATIC + equ SS_ETCHEDHORZ$ to 0x00000010 + equ SS_ETCHEDVERT$ to 0x00000011 + equ SS_ETCHEDFRAME$ to 0x00000012 + equ SS_TYPEMASK$ to 0x0000001F + equ SS_NOPREFIX$ to 0x00000080 ; * // Don't do "&" character translation + equ SS_NOTIFY$ to 0x00000100 ; * // Enforced in PS + equ SS_CENTERIMAGE$ to 0x00000200 + equ SS_RIGHTJUST$ to 0x00000400 + equ SS_REALSIZEIMAGE$ to 0x00000800 + equ SS_SUNKEN$ to 0x00001000 + equ SS_ENDELLIPSIS$ to 0x00004000 + equ SS_PATHELLIPSIS$ to 0x00008000 + equ SS_WORDELLIPSIS$ to 0x0000C000 + equ SS_ELLIPSISMASK$ to 0x0000C000 + +/////////////////////////////////////////////////////////////////////////////// +// STATIC messages //////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ STM_SETICON$ to 0x0170 ; * // Not supported by PS STATIC + equ STM_GETICON$ to 0x0171 ; * // Not supported by PS STATIC + equ STM_SETIMAGE$ to 0x0172 ; * // Not supported by PS STATIC + equ STM_GETIMAGE$ to 0x0173 ; * // Not supported by PS STATIC + equ STM_MSGMAX$ to 0x0174 + +/////////////////////////////////////////////////////////////////////////////// +// STATIC Notification messages /////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ STN_CLICKED$ to 0 + equ STN_DBLCLK$ to 1 + equ STN_ENABLE$ to 2 + equ STN_DISABLE$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_SYSCOLOR_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SYSCOLOR_EQUATES.txt new file mode 100644 index 0000000..69d3dd7 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SYSCOLOR_EQUATES.txt @@ -0,0 +1,60 @@ +compile insert msWin_SysColor_Equates +/* + ** Copyright (C) 1992-2016 Revelation Software Inc. All Rights Reserved ** + + Author Captain C + Date March 2016 + Purpose Equates for the GetSysColor Windows API function. + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SYSCOLOR_EQUATES_ +#define _MSWIN_SYSCOLOR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SYSCOLOR_SCROLLBAR$ to 0 + equ SYSCOLOR_BACKGROUND$ to 1 + equ SYSCOLOR_ACTIVECAPTION$ to 2 + equ SYSCOLOR_INACTIVECAPTION$ to 3 + equ SYSCOLOR_MENU$ to 4 + equ SYSCOLOR_WINDOW$ to 5 + equ SYSCOLOR_WINDOWFRAME$ to 6 + equ SYSCOLOR_MENUTEXT$ to 7 + equ SYSCOLOR_WINDOWTEXT$ to 8 + equ SYSCOLOR_CAPTIONTEXT$ to 9 + equ SYSCOLOR_ACTIVEBORDER$ to 10 + equ SYSCOLOR_INACTIVEBORDER$ to 11 + equ SYSCOLOR_APPWORKSPACE$ to 12 + equ SYSCOLOR_HIGHLIGHT$ to 13 + equ SYSCOLOR_HIGHLIGHTTEXT$ to 14 + equ SYSCOLOR_BTNFACE$ to 15 + equ SYSCOLOR_BTNSHADOW$ to 0x10 + equ SYSCOLOR_GRAYTEXT$ to 17 + equ SYSCOLOR_BTNTEXT$ to 18 + equ SYSCOLOR_INACTIVECAPTIONTEXT$ to 19 + equ SYSCOLOR_BTNHIGHLIGHT$ to 20 + equ SYSCOLOR_3DDKSHADOW$ to 21 + equ SYSCOLOR_3DLIGHT$ to 22 + equ SYSCOLOR_INFOTEXT$ to 23 + equ SYSCOLOR_INFOBK$ to 24 + equ SYSCOLOR_HOTLIGHT$ to 26 + equ SYSCOLOR_GRADIENTACTIVECAPTION$ to 27 + equ SYSCOLOR_GRADIENTINACTIVECAPTION$ to 28 + equ SYSCOLOR_ENDCOLORS$ to SYSCOLOR_GRADIENTINACTIVECAPTION$ + equ SYSCOLOR_DESKTOP$ to SYSCOLOR_BACKGROUND$ + equ SYSCOLOR_3DFACE$ to SYSCOLOR_BTNFACE$ + equ SYSCOLOR_3DSHADOW$ to SYSCOLOR_BTNSHADOW$ + equ SYSCOLOR_3DHIGHLIGHT$ to SYSCOLOR_BTNHIGHLIGHT$ + equ SYSCOLOR_3DHILIGHT$ to SYSCOLOR_BTNHIGHLIGHT$ + equ SYSCOLOR_BTNHILIGHT$ to SYSCOLOR_BTNHIGHLIGHT$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_SYSCOMMAND_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SYSCOMMAND_EQUATES.txt new file mode 100644 index 0000000..7fbe760 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SYSCOMMAND_EQUATES.txt @@ -0,0 +1,53 @@ +compile insert MSWin_SysCommand_Equates +/* + ** Copyright (C) 2013-2019 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date June 2019 + Purpose Equates for the WM_SYSCOMMAND message + + Comments + ======== + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SYSCOMMAND_EQUATES_ +#define _MSWIN_SYSCOMMAND_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SC_SIZE$ to 61440 + equ SC_MOVE$ to 61456 + equ SC_MINIMIZE$ to 61472 + equ SC_MAXIMIZE$ to 61488 + equ SC_MAXIMIZE_DBLCLK$ to 61490 ; * // double click on caption + equ SC_NEXTWINDOW$ to 61504 + equ SC_PREVWINDOW$ to 61520 + equ SC_CLOSE$ to 61536 + equ SC_VSCROLL$ to 61552 + equ SC_HSCROLL$ to 61568 + equ SC_MOUSEMENU$ to 61584 + equ SC_KEYMENU$ to 61696 + equ SC_ARRANGE$ to 61712 + equ SC_RESTORE$ to 61728 + equ SC_RESTORE_DBLCLK$ to 61730 ; * // double click on caption + equ SC_TASKLIST$ to 61744 + equ SC_SCREENSAVE$ to 61760 + equ SC_HOTKEY$ to 61776 + equ SC_DEFAULT$ to 61792 + equ SC_MONITORPOWER$ to 61808 + equ SC_CONTEXTHELP$ to 61824 + equ SC_SEPARATOR$ to 61455 + + * // Obsolete names + equ SC_ICON$ to SC_MINIMIZE$ + equ SC_ZOOM$ to SC_MAXIMIZE$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_SYSTEMMETRIC_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SYSTEMMETRIC_EQUATES.txt new file mode 100644 index 0000000..a5b9721 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SYSTEMMETRIC_EQUATES.txt @@ -0,0 +1,134 @@ +compile insert msWin_SystemMetric_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date January 2013 + Purpose Equates for use with the System Metric API functions + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + mtr 12 Dec 2014 Git sucks +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SYSTEMMETRIC_EQUATES_ +#define _MSWIN_SYSTEMMETRIC_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_GetSystemMetrics + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SM_CXSCREEN$ to 0 + equ SM_CYSCREEN$ to 1 + equ SM_CXVSCROLL$ to 2 + equ SM_CYHSCROLL$ to 3 + equ SM_CYCAPTION$ to 4 + equ SM_CXBORDER$ to 5 + equ SM_CYBORDER$ to 6 + equ SM_CXDLGFRAME$ to 7 + equ SM_CYDLGFRAME$ to 8 + equ SM_CYVTHUMB$ to 9 + equ SM_CXHTHUMB$ to 10 + equ SM_CXICON$ to 11 + equ SM_CYICON$ to 12 + equ SM_CXCURSOR$ to 13 + equ SM_CYCURSOR$ to 14 + equ SM_CYMENU$ to 15 + equ SM_CXFULLSCREEN$ to 0x10 + equ SM_CYFULLSCREEN$ to 17 + equ SM_CYKANJIWINDOW$ to 18 + equ SM_MOUSEPRESENT$ to 19 + equ SM_CYVSCROLL$ to 20 + equ SM_CXHSCROLL$ to 21 + equ SM_DEBUG$ to 22 + equ SM_SWAPBUTTON$ to 23 + equ SM_RESERVED1$ to 24 + equ SM_RESERVED2$ to 25 + equ SM_RESERVED3$ to 26 + equ SM_RESERVED4$ to 27 + equ SM_CXMIN$ to 28 + equ SM_CYMIN$ to 29 + equ SM_CXSIZE$ to 30 + equ SM_CYSIZE$ to 31 + equ SM_CXFRAME$ to 0x20 + equ SM_CYFRAME$ to 33 + equ SM_CXMINTRACK$ to 34 + equ SM_CYMINTRACK$ to 35 + equ SM_CXDOUBLECLK$ to 36 + equ SM_CYDOUBLECLK$ to 37 + equ SM_CXICONSPACING$ to 38 + equ SM_CYICONSPACING$ to 39 + equ SM_MENUDROPALIGNMENT$ to 40 + equ SM_PENWINDOWS$ to 41 + equ SM_DBCSENABLED$ to 42 + equ SM_CMOUSEBUTTONS$ to 43 + + equ SM_CXFIXEDFRAME$ to SM_CXDLGFRAME$ + equ SM_CYFIXEDFRAME$ to SM_CYDLGFRAME$ + equ SM_CXSIZEFRAME$ to SM_CXFRAME$ + equ SM_CYSIZEFRAME$ to SM_CYFRAME$ + + equ SM_SECURE$ to 44 + equ SM_CXEDGE$ to 45 + equ SM_CYEDGE$ to 46 + equ SM_CXMINSPACING$ to 47 + equ SM_CYMINSPACING$ to 48 + equ SM_CXSMICON$ to 49 + equ SM_CYSMICON$ to 50 + equ SM_CYSMCAPTION$ to 51 + equ SM_CXSMSIZE$ to 52 + equ SM_CYSMSIZE$ to 53 + equ SM_CXMENUSIZE$ to 54 + equ SM_CYMENUSIZE$ to 55 + equ SM_ARRANGE$ to 56 + equ SM_CXMINIMIZED$ to 57 + equ SM_CYMINIMIZED$ to 58 + equ SM_CXMAXTRACK$ to 59 + equ SM_CYMAXTRACK$ to 60 + equ SM_CXMAXIMIZED$ to 61 + equ SM_CYMAXIMIZED$ to 62 + equ SM_NETWORK$ to 63 + equ SM_CLEANBOOT$ to 67 + equ SM_CXDRAG$ to 68 + equ SM_CYDRAG$ to 69 + equ SM_SHOWSOUNDS$ to 70 + equ SM_CXMENUCHECK$ to 71 ; * // Use instead of GetMenuCheckMarkDimensions()! + equ SM_CYMENUCHECK$ to 72 + equ SM_SLOWMACHINE$ to 73 + equ SM_MIDEASTENABLED$ to 74 + equ SM_MOUSEWHEELPRESENT$ to 75 + equ SM_XVIRTUALSCREEN$ to 76 + equ SM_YVIRTUALSCREEN$ to 77 + equ SM_CXVIRTUALSCREEN$ to 78 + equ SM_CYVIRTUALSCREEN$ to 79 + equ SM_CMONITORS$ to 80 + equ SM_SAMEDISPLAYFORMAT$ to 81 + equ SM_IMMENABLED$ to 82 + equ SM_CXFOCUSBORDER$ to 83 + equ SM_CYFOCUSBORDER$ to 84 + equ SM_TABLETPC$ to 86 + equ SM_MEDIACENTER$ to 87 + equ SM_STARTER$ to 88 + equ SM_SERVERR2$ to 89 + equ SM_MOUSEHORIZONTALWHEELPRESENT$ to 91 + equ SM_CXPADDEDBORDER$ to 92 + equ SM_DIGITIZER$ to 94 + equ SM_MAXIMUMTOUCHES$ to 95 + equ SM_REMOTESESSION$ to 0x1000 + equ SM_SHUTTINGDOWN$ to 0x2000 + equ SM_REMOTECONTROL$ to 0x2001 + equ SM_CARETBLINKINGENABLED$ to 0x2002 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +#endif + diff --git a/SYSPROG/STPROCINS/MSWIN_SYSTEMTIME_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_SYSTEMTIME_EQUATES.txt new file mode 100644 index 0000000..e5fe319 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_SYSTEMTIME_EQUATES.txt @@ -0,0 +1,57 @@ +compile insert msWin_SystemTime_Equates +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date 13 Jan 2022 + Purpose Equates for use with the Windows SYSTEMTIME Structure + + Comments + ======== + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_SYSTEMTIME_EQUATES_ +#define _MSWIN_SYSTEMTIME_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $uses @APPID*DLLSTRUCT**MSWIN_SYSTEMTIME + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSTEMTIME Structure equates - this structure is defined in the + // Windows API as: + // + // typedef struct _SYSTEMTIME { + // WORD wYear; + // WORD wMonth; + // WORD wDayOfWeek; + // WORD wDay; + // WORD wHour; + // WORD wMinute; + // WORD wSecond; + // WORD wMilliseconds; + // } SYSTEMTIME, *PSYSTEMTIME, *LPSYSTEMTIME; + + equ SYSTEMTIME$ to "MSWIN_SYSTEMTIME" + + equ SYSTEMTIME_POS_WYEAR$ to 1 + equ SYSTEMTIME_POS_WMONTH$ to 2 + equ SYSTEMTIME_POS_WDAYOFWEEK$ to 3 + equ SYSTEMTIME_POS_WDAY$ to 4 + equ SYSTEMTIME_POS_WHOUR$ to 5 + equ SYSTEMTIME_POS_WMINUTE$ to 6 + equ SYSTEMTIME_POS_WSECOND$ to 7 + equ SYSTEMTIME_POS_WMILLSECONDS$ to 8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_TABCONTROL_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_TABCONTROL_EQUATES.txt new file mode 100644 index 0000000..68b343d --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_TABCONTROL_EQUATES.txt @@ -0,0 +1,108 @@ +compile insert msWin_TabControl_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date April 2013 + Purpose Equates for Win32 TabControl controls + + Amended Date Reason + ======= ==== ====== + Mr C 08 Aug 19 Removed unneeded "WIN32_" struct equates + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_TABCONTROL_EQUATES_ +#define _MSWIN_TABCONTROL_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ WC_TABCONTROL$ to "SysTabControl32" + +/////////////////////////////////////////////////////////////////////////////// +// Tab Control Messages /////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ TCM_FIRST$ to 0x1300; + equ TCM_GETIMAGELIST$ to TCM_FIRST$ + 2 + equ TCM_SETIMAGELIST$ to TCM_FIRST$ + 3 + equ TCM_GETITEMCOUNT$ to TCM_FIRST$ + 4 + equ TCM_DELETEITEM$ to TCM_FIRST$ + 8 + equ TCM_DELETEALLITEMS$ to TCM_FIRST$ + 9 + equ TCM_GETITEMRECT$ to TCM_FIRST$ + 10 + equ TCM_GETCURSEL$ to TCM_FIRST$ + 11 + equ TCM_SETCURSEL$ to TCM_FIRST$ + 12 + equ TCM_HITTEST$ to TCM_FIRST$ + 13 + equ TCM_SETITEMEXTRA$ to TCM_FIRST$ + 14 + equ TCM_ADJUSTRECT$ to TCM_FIRST$ + 40 + equ TCM_SETITEMSIZE$ to TCM_FIRST$ + 41 + equ TCM_REMOVEIMAGE$ to TCM_FIRST$ + 42 + equ TCM_SETPADDING$ to TCM_FIRST$ + 43 + equ TCM_GETROWCOUNT$ to TCM_FIRST$ + 44 + equ TCM_GETTOOLTIPS$ to TCM_FIRST$ + 45 + equ TCM_SETTOOLTIPS$ to TCM_FIRST$ + 46 + equ TCM_GETCURFOCUS$ to TCM_FIRST$ + 47 + equ TCM_SETCURFOCUS$ to TCM_FIRST$ + 48 + equ TCM_SETMINTABWIDTH$ to TCM_FIRST$ + 49 + equ TCM_DESELECTALL$ to TCM_FIRST$ + 50 + equ TCM_HIGHLIGHTITEM$ to TCM_FIRST$ + 51 + equ TCM_SETEXTENDEDSTYLE$ to TCM_FIRST$ + 52 + equ TCM_GETEXTENDEDSTYLE$ to TCM_FIRST$ + 53 + + equ TCM_GETITEMA$ to TCM_FIRST$ + 5 + equ TCM_SETITEMA$ to TCM_FIRST$ + 6 + equ TCM_INSERTITEMA$ to TCM_FIRST$ + 7 + equ TCM_GETITEMW$ to TCM_FIRST$ + 60 + equ TCM_SETITEMW$ to TCM_FIRST$ + 61 + equ TCM_INSERTITEMW$ to TCM_FIRST$ + 62 + + equ TCM_GETITEM$ to TCM_GETITEMA$ + equ TCM_SETITEM$ to TCM_SETITEMA$ + equ TCM_INSERTITEM$ to TCM_INSERTITEMA$ + +/////////////////////////////////////////////////////////////////////////////// +// Tab Style bits ///////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ TCS_SCROLLOPPOSITE$ to 0x0001; // assumes multiline tab + equ TCS_BOTTOM$ to 0x0002; + equ TCS_RIGHT$ to 0x0002; + equ TCS_MULTISELECT$ to 0x0004; // allow multi-select in button mode + equ TCS_FLATBUTTONS$ to 0x0008; + equ TCS_FORCEICONLEFT$ to 0x0010; + equ TCS_FORCELABELLEFT$ to 0x0020; + equ TCS_HOTTRACK$ to 0x0040; + equ TCS_VERTICAL$ to 0x0080; + equ TCS_TABS$ to 0x0000; + equ TCS_BUTTONS$ to 0x0100; + equ TCS_SINGLELINE$ to 0x0000; + equ TCS_MULTILINE$ to 0x0200; + equ TCS_RIGHTJUSTIFY$ to 0x0000; + equ TCS_FIXEDWIDTH$ to 0x0400; + equ TCS_RAGGEDRIGHT$ to 0x0800; + equ TCS_FOCUSONBUTTONDOWN$ to 0x1000; + equ TCS_OWNERDRAWFIXED$ to 0x2000; + equ TCS_TOOLTIPS$ to 0x4000; + equ TCS_FOCUSNEVER$ to 0x8000; + + // Extended Styles + equ TCS_EX_FLATSEPARATORS$ to 0x00000001; + equ TCS_EX_REGISTERDROP$ to 0x00000002; + +/////////////////////////////////////////////////////////////////////////////// +// Tab Notification messages ////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ TCN_FIRST$ to ( 0 - 550 ) + equ TCN_LAST$ to ( 0 - 580 ) + equ TCN_KEYDOWN$ to TCN_FIRST$ - 0 + equ TCN_SELCHANGE$ to TCN_FIRST$ - 1 + equ TCN_SELCHANGING$ to TCN_FIRST$ - 2 + equ TCN_GETOBJECT$ to TCN_FIRST$ - 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_TASKBAR_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_TASKBAR_EQUATES.txt new file mode 100644 index 0000000..a95f6cd --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_TASKBAR_EQUATES.txt @@ -0,0 +1,36 @@ +compile insert msWin_TaskBar_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Feb 2013 + Purpose Equates for Windows 7+ Taskbar methods + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + +#ifndef _MSWIN_TASKBAR_EQUATES_ +#define _MSWIN_TASKBAR_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + // Progress States + + equ TBPF_NOPROGRESS$ to 0x00 + equ TBPF_INDETERMINATE$ to 0x01 + equ TBPF_NORMAL$ to 0x02 + equ TBPF_ERROR$ to 0x04 + equ TBPF_PAUSED$ to 0x08 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_TIME_ZONE_INFORMATION_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_TIME_ZONE_INFORMATION_EQUATES.txt new file mode 100644 index 0000000..35feec3 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_TIME_ZONE_INFORMATION_EQUATES.txt @@ -0,0 +1,70 @@ +compile insert msWin_Time_Zone_Information_Equates +/* + ** Copyright (C) 1992-2023 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : June 2023 + Purpose : Equates for use with the Windows API TIME_ZONE_INFORMATION structure + + + Comments + ======== + + typedef struct _TIME_ZONE_INFORMATION { + LONG Bias; + WCHAR StandardName[32]; + SYSTEMTIME StandardDate; + LONG StandardBias; + WCHAR DaylightName[32]; + SYSTEMTIME DaylightDate; + LONG DaylightBias; + } TIME_ZONE_INFORMATION, *PTIME_ZONE_INFORMATION, *LPTIME_ZONE_INFORMATION; + + + Amended Date Reason + ======= ==== ====== +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_TIME_ZONE_INFORMATION_EQUATES_ +#define _MSWIN_TIME_ZONE_INFORMATION_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $uses @APPID*DLLSTRUCT**MSWIN_TIME_ZONE_INFORMATION + + declare function msWin_GetTimeZoneInformation + + equ TIME_ZONE_INFORMATION$ to "MSWIN_TIME_ZONE_INFORMATION" + +//////////////////////////////////////////////////////////////////////////////// + + // Structure "field positions" + + equ TZI_POS_BIAS$ to 1 + equ TZI_POS_STANDARDNAME$ to 2 + equ TZI_POS_STANDARDDATE$ to 3 + equ TZI_POS_STANDARDBIAS$ to 4 + equ TZI_POS_DAYLIGHTNAME$ to 5 + equ TZI_POS_DAYLIGHTDATE$ to 6 + equ TZI_POS_DAYLIGHTBIAS$ to 7 + +//////////////////////////////////////////////////////////////////////////////// + + // msWin_GetTimeZoneInformation() - return value (prefixed "TZI_" to avoid + // conflicts with PS_SYSTEM_EQUATES) + + equ TZI_TIME_ZONE_ID_UNKNOWN$ to 0 + equ TZI_TIME_ZONE_ID_STANDARD$ to 1 + equ TZI_TIME_ZONE_ID_DAYLIGHT$ to 2 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + + + + diff --git a/SYSPROG/STPROCINS/MSWIN_TOOLBAR_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_TOOLBAR_EQUATES.txt new file mode 100644 index 0000000..123ec63 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_TOOLBAR_EQUATES.txt @@ -0,0 +1,342 @@ +compile insert msWin_ToolBar_Equates +/* + ** Copyright (C) 2013-2014 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : Sept 2014 + Purpose : Equates for Windows ToolBar controls + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 12 Mar 18 Added default values +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_TOOLBAR_EQUATES_ +#define _MSWIN_TOOLBAR_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + $insert msWin_CommCtrl_Equates + +//////////////////////////////////////////////////////////////////////////////// +// ToolBar Class /////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ TOOLBARCLASSNAME$ to "ToolbarWindow32" + +//////////////////////////////////////////////////////////////////////////////// +// ToolBar Messages //////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ TB_ENABLEBUTTON$ to 0x401 ; * // (WM_USER + 1) + equ TB_CHECKBUTTON$ to 0x402 ; * // (WM_USER + 2) + equ TB_PRESSBUTTON$ to 0x403 ; * // (WM_USER + 3) + equ TB_HIDEBUTTON$ to 0x404 ; * // (WM_USER + 4) + equ TB_INDETERMINATE$ to 0x405 ; * // (WM_USER + 5) + equ TB_MARKBUTTON$ to 0x406 ; * // (WM_USER + 6) + equ TB_ISBUTTONENABLED$ to 0x409 ; * // (WM_USER + 9) + equ TB_ISBUTTONCHECKED$ to 0x40A ; * // (WM_USER + 10) + equ TB_ISBUTTONPRESSED$ to 0x40B ; * // (WM_USER + 11) + equ TB_ISBUTTONHIDDEN$ to 0x40C ; * // (WM_USER + 12) + equ TB_ISBUTTONINDETERMINATE$ to 0x40D ; * // (WM_USER + 13) + equ TB_ISBUTTONHIGHLIGHTED$ to 0x40E ; * // (WM_USER + 14) + equ TB_SETSTATE$ to 0x411 ; * // (WM_USER + 17) + equ TB_GETSTATE$ to 0x412 ; * // (WM_USER + 18) + equ TB_ADDBITMAP$ to 0x413 ; * // (WM_USER + 19) + equ TB_ADDBUTTONSA$ to 0x414 ; * // (WM_USER + 20) + equ TB_INSERTBUTTONA$ to 0x415 ; * // (WM_USER + 21) + equ TB_DELETEBUTTON$ to 0x416 ; * // (WM_USER + 22) + equ TB_GETBUTTON$ to 0x417 ; * // (WM_USER + 23) + equ TB_BUTTONCOUNT$ to 0x418 ; * // (WM_USER + 24) + equ TB_COMMANDTOINDEX$ to 0x419 ; * // (WM_USER + 25) + equ TB_SAVERESTOREA$ to 0x41A ; * // (WM_USER + 26) + equ TB_SAVERESTOREW$ to 0x44C ; * // (WM_USER + 76) + equ TB_CUSTOMIZE$ to 0x41B ; * // (WM_USER + 27) + equ TB_ADDSTRINGA$ to 0x41C ; * // (WM_USER + 28) + equ TB_ADDSTRINGW$ to 0x44D ; * // (WM_USER + 77) + equ TB_GETITEMRECT$ to 0x41D ; * // (WM_USER + 29) + equ TB_BUTTONSTRUCTSIZE$ to 0x41E ; * // (WM_USER + 30) + equ TB_SETBUTTONSIZE$ to 0x41F ; * // (WM_USER + 31) + equ TB_SETBITMAPSIZE$ to 0x420 ; * // (WM_USER + 32) + equ TB_AUTOSIZE$ to 0x421 ; * // (WM_USER + 33) + equ TB_GETTOOLTIPS$ to 0x423 ; * // (WM_USER + 35) + equ TB_SETTOOLTIPS$ to 0x424 ; * // (WM_USER + 36) + equ TB_SETPARENT$ to 0x425 ; * // (WM_USER + 37) + equ TB_SETROWS$ to 0x427 ; * // (WM_USER + 39) + equ TB_GETROWS$ to 0x428 ; * // (WM_USER + 40) + equ TB_GETBITMAPFLAGS$ to 0x429 ; * // (WM_USER + 41) + equ TB_SETCMDID$ to 0x42A ; * // (WM_USER + 42) + equ TB_CHANGEBITMAP$ to 0x42B ; * // (WM_USER + 43) + equ TB_GETBITMAP$ to 0x42C ; * // (WM_USER + 44) + equ TB_GETBUTTONTEXTA$ to 0x42D ; * // (WM_USER + 45) + equ TB_GETBUTTONTEXTW$ to 0x44B ; * // (WM_USER + 75) + equ TB_REPLACEBITMAP$ to 0x42E ; * // (WM_USER + 46) + equ TB_SETINDENT$ to 0x42F ; * // (WM_USER + 47) + equ TB_SETIMAGELIST$ to 0x430 ; * // (WM_USER + 48) + equ TB_GETIMAGELIST$ to 0x431 ; * // (WM_USER + 49) + equ TB_LOADIMAGES$ to 0x432 ; * // (WM_USER + 50) + equ TB_GETRECT$ to 0x433 ; * // (WM_USER + 51) - wParam is the Cmd instead of index + equ TB_SETHOTIMAGELIST$ to 0x434 ; * // (WM_USER + 52) + equ TB_GETHOTIMAGELIST$ to 0x435 ; * // (WM_USER + 53) + equ TB_SETDISABLEDIMAGELIST$ to 0x436 ; * // (WM_USER + 54) + equ TB_GETDISABLEDIMAGELIST$ to 0x437 ; * // (WM_USER + 55) + equ TB_SETSTYLE$ to 0x438 ; * // (WM_USER + 56) + equ TB_GETSTYLE$ to 0x439 ; * // (WM_USER + 57) + equ TB_GETBUTTONSIZE$ to 0x43A ; * // (WM_USER + 58) + equ TB_SETBUTTONWIDTH$ to 0x43B ; * // (WM_USER + 59) + equ TB_SETMAXTEXTROWS$ to 0x43C ; * // (WM_USER + 60) + equ TB_GETTEXTROWS$ to 0x43D ; * // (WM_USER + 61) + equ TB_GETOBJECT$ to 0x43E ; * // (WM_USER + 62) - wParam == IID, lParam void **ppv + equ TB_GETBUTTONINFOW$ to 0x43F ; * // (WM_USER + 63) + equ TB_SETBUTTONINFOW$ to 0x440 ; * // (WM_USER + 64) + equ TB_GETBUTTONINFOA$ to 0x441 ; * // (WM_USER + 65) + equ TB_SETBUTTONINFOA$ to 0x442 ; * // (WM_USER + 66) + equ TB_INSERTBUTTONW$ to 0x443 ; * // (WM_USER + 67) + equ TB_ADDBUTTONSW$ to 0x444 ; * // (WM_USER + 68) + equ TB_HITTEST$ to 0x445 ; * // (WM_USER + 69) + equ TB_SETDRAWTEXTFLAGS$ to 0x446 ; * // (WM_USER + 70) - wParam == mask, lParam == bit values + equ TB_GETHOTITEM$ to 0x447 ; * // (WM_USER + 71) + equ TB_SETHOTITEM$ to 0x448 ; * // (WM_USER + 72) - wParam == iHotItem + equ TB_SETANCHORHIGHLIGHT$ to 0x449 ; * // (WM_USER + 73) - wParam == TRUE/FALSE + equ TB_GETANCHORHIGHLIGHT$ to 0x44A ; * // (WM_USER + 74) + equ TB_MAPACCELERATORA$ to 0x44E ; * // (WM_USER + 78) - wParam == ch, lParam int * pidBtn + equ TB_GETINSERTMARK$ to 0x44F ; * // (WM_USER + 79) - lParam == LPTBINSERTMARK + equ TB_SETINSERTMARK$ to 0x450 ; * // (WM_USER + 80) - lParam == LPTBINSERTMARK + equ TB_INSERTMARKHITTEST$ to 0x451 ; * // (WM_USER + 81) - wParam == LPPOINT lParam == LPTBINSERTMARK + equ TB_MOVEBUTTON$ to 0x452 ; * // (WM_USER + 82) + equ TB_GETMAXSIZE$ to 0x453 ; * // (WM_USER + 83) - lParam == LPSIZE + equ TB_SETEXTENDEDSTYLE$ to 0x454 ; * // (WM_USER + 84) - For TBSTYLE_EX_* + equ TB_GETEXTENDEDSTYLE$ to 0x455 ; * // (WM_USER + 85) - For TBSTYLE_EX_* + equ TB_GETPADDING$ to 0x456 ; * // (WM_USER + 86) + equ TB_SETPADDING$ to 0x457 ; * // (WM_USER + 87) + equ TB_SETINSERTMARKCOLOR$ to 0x458 ; * // (WM_USER + 88) + equ TB_GETINSERTMARKCOLOR$ to 0x459 ; * // (WM_USER + 89) + equ TB_MAPACCELERATORW$ to 0x45A ; * // (WM_USER + 90) - wParam == ch, lParam int * pidBtn + equ TB_GETSTRINGW$ to 0x45B ; * // (WM_USER + 91) + equ TB_GETSTRINGA$ to 0x45C ; * // (WM_USER + 92) + equ TB_SETLISTGAP$ to 0x460 ; * // (WM_USER + 96) - wParam = gap in pixels + equ TB_GETMETRICS$ to 0x465 ; * // (WM_USER + 101) + equ TB_SETMETRICS$ to 0x466 ; * // (WM_USER + 102) + equ TB_SETPRESSEDIMAGELIST$ to 0x468 ; * // (WM_USER + 104) + equ TB_GETPRESSEDIMAGELIST$ to 0x469 ; * // (WM_USER + 105) + + equ TB_SETCOLORSCHEME$ to CCM_SETCOLORSCHEME$ ; * // lParam is color scheme + equ TB_GETCOLORSCHEME$ to CCM_GETCOLORSCHEME$ ; * // fills in COLORSCHEME pointed to by lParam + equ TB_SETUNICODEFORMAT$ to CCM_SETUNICODEFORMAT$ + equ TB_GETUNICODEFORMAT$ to CCM_GETUNICODEFORMAT$ + equ TB_SETWINDOWTHEME$ to CCM_SETWINDOWTHEME$ + +#IFDEF UNICODE + equ TB_GETBUTTONTEXT$ to TB_GETBUTTONTEXTW$ + equ TB_SAVERESTORE$ to TB_SAVERESTOREW$ + equ TB_ADDSTRING$ to TB_ADDSTRINGW$ + equ TB_MAPACCELERATOR$ to TB_MAPACCELERATORW$ + equ TB_GETBUTTONINFO$ to TB_GETBUTTONINFOW$ + equ TB_SETBUTTONINFO$ to TB_SETBUTTONINFOW$ + equ TB_INSERTBUTTON$ to TB_INSERTBUTTONW$ + equ TB_ADDBUTTONS$ to TB_ADDBUTTONSW$ + equ TB_GETSTRING$ to TB_GETSTRINGW$ +#ENDIF + +#IFNDEF UNICODE + equ TB_GETBUTTONTEXT$ to TB_GETBUTTONTEXTA$ + equ TB_SAVERESTORE$ to TB_SAVERESTOREA$ + equ TB_ADDSTRING$ to TB_ADDSTRINGA$ + equ TB_MAPACCELERATOR$ to TB_MAPACCELERATORA$ + equ TB_GETBUTTONINFO$ to TB_GETBUTTONINFOA$ + equ TB_SETBUTTONINFO$ to TB_SETBUTTONINFOA$ + equ TB_INSERTBUTTON$ to TB_INSERTBUTTONA$ + equ TB_ADDBUTTONS$ to TB_ADDBUTTONSA$ + equ TB_GETSTRING$ to TB_GETSTRINGA$ +#endif + +/////////////////////////////////////////////////////////////////////////////// +// ToolBar Styles ///////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ TBSTYLE_BUTTON$ to 0x0000 ; * // obsolete; use BTNS_BUTTON instead + equ TBSTYLE_SEP$ to 0x0001 ; * // obsolete; use BTNS_SEP instead + equ TBSTYLE_CHECK$ to 0x0002 ; * // obsolete; use BTNS_CHECK instead + equ TBSTYLE_GROUP$ to 0x0004 ; * // obsolete; use BTNS_GROUP instead + equ TBSTYLE_DROPDOWN$ to 0x0008 ; * // obsolete; use BTNS_DROPDOWN instead + equ TBSTYLE_AUTOSIZE$ to 0x0010 ; * // obsolete; use BTNS_AUTOSIZE instead + equ TBSTYLE_NOPREFIX$ to 0x0020 ; * // obsolete; use BTNS_NOPREFIX instead + equ TBSTYLE_CHECKGROUP$ to ( TBSTYLE_GROUP$ | + + TBSTYLE_CHECK$ ) ; * // obsolete; use BTNS_CHECKGROUP instead + + equ TBSTYLE_TOOLTIPS$ to 0x0100 + equ TBSTYLE_WRAPABLE$ to 0x0200 + equ TBSTYLE_ALTDRAG$ to 0x0400 + equ TBSTYLE_FLAT$ to 0x0800 + equ TBSTYLE_LIST$ to 0x1000 + equ TBSTYLE_CUSTOMERASE$ to 0x2000 + equ TBSTYLE_REGISTERDROP$ to 0x4000 + equ TBSTYLE_TRANSPARENT$ to 0x8000 + +/////////////////////////////////////////////////////////////////////////////// +// ToolBar Extended Styles //////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ TBSTYLE_EX_DRAWDDARROWS$ to 0x00000001 + equ TBSTYLE_EX_MIXEDBUTTONS$ to 0x00000008 + equ TBSTYLE_EX_HIDECLIPPEDBUTTONS$ to 0x00000010 ; * // don't show partially obscured buttons + equ TBSTYLE_EX_DOUBLEBUFFER$ to 0x00000080 ; * // Double Buffer the toolbar + +/////////////////////////////////////////////////////////////////////////////// +// ToolBar Button Styles ////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ BTNS_BUTTON$ to TBSTYLE_BUTTON$ ; * // 0x0000 + equ BTNS_SEP$ to TBSTYLE_SEP$ ; * // 0x0001 + equ BTNS_CHECK$ to TBSTYLE_CHECK$ ; * // 0x0002 + equ BTNS_GROUP$ to TBSTYLE_GROUP$ ; * // 0x0004 + equ BTNS_CHECKGROUP$ to TBSTYLE_CHECKGROUP$ ; * // (TBSTYLE_GROUP | TBSTYLE_CHECK) + equ BTNS_DROPDOWN$ to TBSTYLE_DROPDOWN$ ; * // 0x0008 + equ BTNS_AUTOSIZE$ to TBSTYLE_AUTOSIZE$ ; * // 0x0010; automatically calculate the cx of the button + equ BTNS_NOPREFIX$ to TBSTYLE_NOPREFIX$ ; * // 0x0020; this button should not have accel prefix + equ BTNS_SHOWTEXT$ to 0x0040 ; * // ignored unless TBSTYLE_EX_MIXEDBUTTONS is set + equ BTNS_WHOLEDROPDOWN$ to 0x0080 ; * // draw drop-down arrow, but without split arrow section + +/////////////////////////////////////////////////////////////////////////////// +// ToolBar Button States ////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ CMB_MASKED$ to 0x02 + equ TBSTATE_CHECKED$ to 0x01 + equ TBSTATE_PRESSED$ to 0x02 + equ TBSTATE_ENABLED$ to 0x04 + equ TBSTATE_HIDDEN$ to 0x08 + equ TBSTATE_INDETERMINATE$ to 0x10 + equ TBSTATE_WRAP$ to 0x20 + equ TBSTATE_ELLIPSES$ to 0x40 + equ TBSTATE_MARKED$ to 0x80 + +//////////////////////////////////////////////////////////////////////////////// +// Toolbar Notification Messages /////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ TBN_FIRST$ to -700 ; * // (0U-700U) + equ TBN_LAST$ to -720 ; * // (0U-720U) + + equ TBN_GETBUTTONINFOA$ to -700 ; * // (TBN_FIRST-0) + equ TBN_BEGINDRAG$ to -701 ; * // (TBN_FIRST-1) + equ TBN_ENDDRAG$ to -702 ; * // (TBN_FIRST-2) + equ TBN_BEGINADJUST$ to -703 ; * // (TBN_FIRST-3) + equ TBN_ENDADJUST$ to -704 ; * // (TBN_FIRST-4) + equ TBN_RESET$ to -705 ; * // (TBN_FIRST-5) + equ TBN_QUERYINSERT$ to -706 ; * // (TBN_FIRST-6) + equ TBN_QUERYDELETE$ to -707 ; * // (TBN_FIRST-7) + equ TBN_TOOLBARCHANGE$ to -708 ; * // (TBN_FIRST-8) + equ TBN_CUSTHELP$ to -709 ; * // (TBN_FIRST-9) + equ TBN_DROPDOWN$ to -710 ; * // (TBN_FIRST-10) + equ TBN_GETOBJECT$ to -712 ; * // (TBN_FIRST-12) + equ TBN_HOTITEMCHANGE$ to -713 ; * // (TBN_FIRST-13) + equ TBN_DRAGOUT$ to -714 ; * // (TBN_FIRST-14) - this is sent when the user clicks down on a button then drags off the button + equ TBN_DELETINGBUTTON$ to -715 ; * // (TBN_FIRST-15) - uses TBNOTIFY + equ TBN_GETDISPINFOA$ to -716 ; * // (TBN_FIRST-16) - This is sent when the toolbar needs some display information + equ TBN_GETDISPINFOW$ to -717 ; * // (TBN_FIRST-17) - This is sent when the toolbar needs some display information + equ TBN_GETINFOTIPA$ to -718 ; * // (TBN_FIRST-18) + equ TBN_GETINFOTIPW$ to -719 ; * // (TBN_FIRST-19) + equ TBN_GETBUTTONINFOW$ to -720 ; * // (TBN_FIRST-20) + equ TBN_RESTORE$ to -721 ; * // (TBN_FIRST-21) + equ TBN_SAVE$ to -722 ; * // (TBN_FIRST-22) + equ TBN_INITCUSTOMIZE$ to -723 ; * // (TBN_FIRST-23) + +#IFDEF UNICODE + equ TBN_GETINFOTIP$ to TBN_GETINFOTIPW$ +// equ NMTBGETINFOTIP$ to NMTBGETINFOTIPW$ +// equ LPNMTBGETINFOTIP$ to LPNMTBGETINFOTIPW$ +#ENDIF + +#IFNDEF UNICODE + equ TBN_GETINFOTIP$ to TBN_GETINFOTIPA$ +// equ NMTBGETINFOTIP$ to NMTBGETINFOTIPA$ +// equ LPNMTBGETINFOTIP$ to LPNMTBGETINFOTIPA$ +#ENDIF + + // Return codes for TBN_DROPDOWN + equ TBDDRET_DEFAULT$ to 0 + equ TBDDRET_NODEFAULT$ to 1 + equ TBDDRET_TREATPRESSED$ to 2 ; * // Treat as a standard press button + +//////////////////////////////////////////////////////////////////////////////// +// Toolbar Button Standard Image Constants ///////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ HINST_COMMCTRL$ to (0xFFFFFFFF - 1) ; * // ((HINSTANCE)-1) + + equ IDB_STD_SMALL_COLOR$ to 0 + equ IDB_STD_LARGE_COLOR$ to 1 + equ IDB_VIEW_SMALL_COLOR$ to 4 + equ IDB_VIEW_LARGE_COLOR$ to 5 + equ IDB_HIST_SMALL_COLOR$ to 8 + equ IDB_HIST_LARGE_COLOR$ to 9 + + // icon indexes for standard bitmap + + equ STD_CUT$ to 0 + equ STD_COPY$ to 1 + equ STD_PASTE$ to 2 + equ STD_UNDO$ to 3 + equ STD_REDOW$ to 4 + equ STD_DELETE$ to 5 + equ STD_FILENEW$ to 6 + equ STD_FILEOPEN$ to 7 + equ STD_FILESAVE$ to 8 + equ STD_PRINTPRE$ to 9 + equ STD_PROPERTIES$ to 10 + equ STD_HELP$ to 11 + equ STD_FIND$ to 12 + equ STD_REPLACE$ to 13 + equ STD_PRINT$ to 14 + + // icon indexes for standard view bitmap + + equ VIEW_LARGEICONS$ to 0 + equ VIEW_SMALLICONS$ to 1 + equ VIEW_LIST$ to 2 + equ VIEW_DETAILS$ to 3 + equ VIEW_SORTNAME$ to 4 + equ VIEW_SORTSIZE$ to 5 + equ VIEW_SORTDATE$ to 6 + equ VIEW_SORTTYPE$ to 7 + equ VIEW_PARENTFOLDER$ to 8 + equ VIEW_NETCONNECT$ to 9 + equ VIEW_NETDISCONNECT$ to 10 + equ VIEW_NEWFOLDER$ to 11 + equ VIEW_VIEWMENU$ to 12 + + equ HIST_BACK$ to 0 + equ HIST_FORWARD$ to 1 + equ HIST_FAVORITES$ to 2 + equ HIST_ADDTOFAVORITES$ to 3 + equ HIST_VIEWTREE$ to 4 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + // default values + equ TBR_DEF_PADDING_CX$ to 7 + equ TBR_DEF_PADDING_CY$ to 6 + equ TBR_DEF_LISTGAP$ to 4 + equ TBR_DEF_SEPWIDTH$ to 8 + equ TBR_DEF_BORDER_TOP$ to 2 + equ TBR_DEF_BORDER_BOTTOM$ to 2 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + + diff --git a/SYSPROG/STPROCINS/MSWIN_TRACKMOUSEEVENT_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_TRACKMOUSEEVENT_EQUATES.txt new file mode 100644 index 0000000..c225fee --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_TRACKMOUSEEVENT_EQUATES.txt @@ -0,0 +1,61 @@ +compile insert msWin_TrackMouseEvent_Equates +/* + Author Mr C + Date Feb 2022 + Purpose Equates for use with the Win32 TrackMouseEvent function + + Comments + ======== + + The TrackMouseEvent function also uses the TRACKMOUSEEVENT structure. + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_TRACKMOUSEEVENT_EQUATES_ +#define _MSWIN_TRACKMOUSEEVENT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_TrackMouseEvent + + * // TME flag equates + + equ TME_HOVER$ to 0x00000001 + equ TME_LEAVE$ to 0x00000002 + equ TME_NONCLIENT$ to 0x00000010 + equ TME_QUERY$ to 0x40000000 + equ TME_CANCEL$ to 0x80000000 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Hover time equates + + equ HOVER_DEFAULT$ to 0xFFFFFFFF + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // TRACKMOUSEEVENT structure equates + + $uses @APPID*DLLSTRUCT**MSWIN_TRACKMOUSEEVENT + + equ TRACKMOUSEEVENT$ to "MSWIN_TRACKMOUSEEVENT" + + * // TRACKMOUSEEVENT structure pos equates + + equ TME_STRUCT_POS_CBSIZE$ to 1 + equ TME_STRUCT_POS_DWFLAGS$ to 2 + equ TME_STRUCT_POS_HWNDTRACK$ to 3 + equ TME_STRUCT_POS_DWHOVERTIME$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_UPDOWN_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_UPDOWN_EQUATES.txt new file mode 100644 index 0000000..d748369 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_UPDOWN_EQUATES.txt @@ -0,0 +1,70 @@ +compile insert msWin_UpDown_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date April 2013 + Purpose Equates for Win32 UpDown controls + + Amended Date Reason + ======= ==== ====== + mtr 12 Dec 2014 Git sucks + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_UPDOWN_EQUATES_ +#define _MSWIN_UPDOWN_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ UPDOWN_CLASS$ to "msctls_updown32" + +/////////////////////////////////////////////////////////////////////////////// +// UpDown Messages //////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ UDM_SETRANGE$ to 1125 ; * // ( WM_USER + 101 ) + equ UDM_GETRANGE$ to 1126 ; * // ( WM_USER + 102 ) + equ UDM_SETPOS$ to 1127 ; * // ( WM_USER + 103 ) + equ UDM_GETPOS$ to 1128 ; * // ( WM_USER + 104 ) + equ UDM_SETBUDDY$ to 1129 ; * // ( WM_USER + 105 ) + equ UDM_GETBUDDY$ to 1130 ; * // ( WM_USER + 106 ) + equ UDM_SETACCEL$ to 1131 ; * // ( WM_USER + 107 ) + equ UDM_GETACCEL$ to 1132 ; * // ( WM_USER + 108 ) + equ UDM_SETBASE$ to 1133 ; * // ( WM_USER + 109 ) + equ UDM_GETBASE$ to 1134 ; * // ( WM_USER + 110 ) + equ UDM_SETRANGE32$ to 1135 ; * // ( WM_USER + 111 ) + equ UDM_GETRANGE32$ to 1136 ; * // ( WM_USER + 112 ) + equ UDM_SETPOS32$ to 1137 ; * // ( WM_USER + 113 ) + equ UDM_GETPOS32$ to 1138 ; * // ( WM_USER + 114 ) + + +/////////////////////////////////////////////////////////////////////////////// +// UpDown Styles ////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ UDS_WRAP$ to 0x0001 + equ UDS_SETBUDDYINT$ to 0x0002 + equ UDS_ALIGNRIGHT$ to 0x0004 + equ UDS_ALIGNLEFT$ to 0x0008 + equ UDS_AUTOBUDDY$ to 0x0010 + equ UDS_ARROWKEYS$ to 0x0020 + equ UDS_HORZ$ to 0x0040 + equ UDS_NOTHOUSANDS$ to 0x0080 + equ UDS_HOTTRACK$ to 0x0100 + +/////////////////////////////////////////////////////////////////////////////// +// UpDown Notification Codes ////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ UDN_FIRST$ to -721 ; * // (0U-721U) + equ UDN_LAST$ to -729 ; * // (0U-729U) + + equ UDN_DELTAPOS$ to -722 ; * // (UDN_FIRST - 1) + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_VIRTUALKEY_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_VIRTUALKEY_EQUATES.txt new file mode 100644 index 0000000..590fcd2 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_VIRTUALKEY_EQUATES.txt @@ -0,0 +1,209 @@ +compile insert msWin_VirtualKey_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Oct 2012 + Purpose Virtual Key equates + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 10 Nov 15 Added KEYSTATE_DOWN$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_VIRTUALKEY_EQUATES_ +#define _MSWIN_VIRTUALKEY_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // KeyState constants for the KEYSTATE and ASYNCKEYSTATE properties + equ KEYSTATE_DOWN$ to 0x8000 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ VK_LBUTTON$ to 0x01 + equ VK_RBUTTON$ to 0x02 + equ VK_CANCEL$ to 0x03 + equ VK_MBUTTON$ to 0x04 /* NOT contiguous with L & RBUTTON */ + + equ VK_BACK$ to 0x08 + equ VK_TAB$ to 0x09 + + equ VK_CLEAR$ to 0x0C + equ VK_RETURN$ to 0x0D + + equ VK_SHIFT$ to 0x10 + equ VK_CONTROL$ to 0x11 + equ VK_MENU$ to 0x12 + equ VK_PAUSE$ to 0x13 + equ VK_CAPITAL$ to 0x14 + + equ VK_KANA$ to 0x15 + equ VK_HANGEUL$ to 0x15 /* old name - should be here for compatibility */ + equ VK_HANGUL$ to 0x15 + equ VK_JUNJA$ to 0x17 + equ VK_FINAL$ to 0x18 + equ VK_HANJA$ to 0x19 + equ VK_KANJI$ to 0x19 + + equ VK_ESCAPE$ to 0x1B + + equ VK_CONVERT$ to 0x1C + equ VK_NONCONVERT$ to 0x1D + equ VK_ACCEPT$ to 0x1E + equ VK_MODECHANGE$ to 0x1F + + equ VK_SPACE$ to 0x20 + equ VK_PRIOR$ to 0x21 + equ VK_NEXT$ to 0x22 + equ VK_END$ to 0x23 + equ VK_HOME$ to 0x24 + equ VK_LEFT$ to 0x25 + equ VK_UP$ to 0x26 + equ VK_RIGHT$ to 0x27 + equ VK_DOWN$ to 0x28 + equ VK_SELECT$ to 0x29 + equ VK_PRINT$ to 0x2A + equ VK_EXECUTE$ to 0x2B + equ VK_SNAPSHOT$ to 0x2C + equ VK_INSERT$ to 0x2D + equ VK_DELETE$ to 0x2E + equ VK_HELP$ to 0x2F + + equ VK_0$ to 0x30 + equ VK_1$ to 0x31 + equ VK_2$ to 0x32 + equ VK_3$ to 0x33 + equ VK_4$ to 0x34 + equ VK_5$ to 0x35 + equ VK_6$ to 0x36 + equ VK_7$ to 0x37 + equ VK_8$ to 0x38 + equ VK_9$ to 0x39 + + equ VK_A$ to 0x41 + equ VK_B$ to 0x42 + equ VK_C$ to 0x43 + equ VK_D$ to 0x44 + equ VK_E$ to 0x45 + equ VK_F$ to 0x46 + equ VK_G$ to 0x47 + equ VK_H$ to 0x48 + equ VK_I$ to 0x49 + equ VK_J$ to 0x4A + equ VK_K$ to 0x4B + equ VK_L$ to 0x4C + equ VK_M$ to 0x4D + equ VK_N$ to 0x4E + equ VK_O$ to 0x4F + equ VK_P$ to 0x50 + equ VK_Q$ to 0x51 + equ VK_R$ to 0x52 + equ VK_S$ to 0x53 + equ VK_T$ to 0x54 + equ VK_U$ to 0x55 + equ VK_V$ to 0x56 + equ VK_W$ to 0x57 + equ VK_X$ to 0x58 + equ VK_Y$ to 0x59 + equ VK_Z$ to 0x5A + + equ VK_LWIN$ to 0x5B + equ VK_RWIN$ to 0x5C + equ VK_APPS$ to 0x5D + + equ VK_NUMPAD0$ to 0x60 + equ VK_NUMPAD1$ to 0x61 + equ VK_NUMPAD2$ to 0x62 + equ VK_NUMPAD3$ to 0x63 + equ VK_NUMPAD4$ to 0x64 + equ VK_NUMPAD5$ to 0x65 + equ VK_NUMPAD6$ to 0x66 + equ VK_NUMPAD7$ to 0x67 + equ VK_NUMPAD8$ to 0x68 + equ VK_NUMPAD9$ to 0x69 + equ VK_MULTIPLY$ to 0x6A + equ VK_ADD$ to 0x6B + equ VK_SEPARATOR$ to 0x6C + equ VK_SUBTRACT$ to 0x6D + equ VK_DECIMAL$ to 0x6E + equ VK_DIVIDE$ to 0x6F + equ VK_F1$ to 0x70 + equ VK_F2$ to 0x71 + equ VK_F3$ to 0x72 + equ VK_F4$ to 0x73 + equ VK_F5$ to 0x74 + equ VK_F6$ to 0x75 + equ VK_F7$ to 0x76 + equ VK_F8$ to 0x77 + equ VK_F9$ to 0x78 + equ VK_F10$ to 0x79 + equ VK_F11$ to 0x7A + equ VK_F12$ to 0x7B + equ VK_F13$ to 0x7C + equ VK_F14$ to 0x7D + equ VK_F15$ to 0x7E + equ VK_F16$ to 0x7F + equ VK_F17$ to 0x80 + equ VK_F18$ to 0x81 + equ VK_F19$ to 0x82 + equ VK_F20$ to 0x83 + equ VK_F21$ to 0x84 + equ VK_F22$ to 0x85 + equ VK_F23$ to 0x86 + equ VK_F24$ to 0x87 + + equ VK_NUMLOCK$ to 0x90 + equ VK_SCROLL$ to 0x91 + +/* + * VK_L* & VK_R* - left and right Alt, Ctrl and Shift virtual keys. + * Used only as parameters to GetAsyncKeyState() and GetKeyState(). + * No other API or message will distinguish left and right keys in this way. + */ + + equ VK_LSHIFT$ to 0xA0 + equ VK_RSHIFT$ to 0xA1 + equ VK_LCONTROL$ to 0xA2 + equ VK_RCONTROL$ to 0xA3 + equ VK_LMENU$ to 0xA4 + equ VK_RMENU$ to 0xA5 + +/* + * 0xB8 - 0xB9 : reserved + */ + equ VK_OEM_1$ to 0xBA ; // ';:' for US + equ VK_OEM_PLUS$ to 0xBB ; // '+' any country + equ VK_OEM_COMMA$ to 0xBC ; // ',' any country + equ VK_OEM_MINUS$ to 0xBD ; // '-' any country + equ VK_OEM_PERIOD$ to 0xBE ; // '.' any country + equ VK_OEM_2$ to 0xBF ; // '/?' for US + equ VK_OEM_3$ to 0xC0 ; // '`~' for US + + + equ VK_PROCESSKEY$ to 0xE5 + + equ VK_ATTN$ to 0xF6 + equ VK_CRSEL$ to 0xF7 + equ VK_EXSEL$ to 0xF8 + equ VK_EREOF$ to 0xF9 + equ VK_PLAY$ to 0xFA + equ VK_ZOOM$ to 0xFB + equ VK_NONAME$ to 0xFC + equ VK_PA1$ to 0xFD + equ VK_OEM_CLEAR$ to 0xFE + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + + diff --git a/SYSPROG/STPROCINS/MSWIN_WAIT_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_WAIT_EQUATES.txt new file mode 100644 index 0000000..16d3c4b --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_WAIT_EQUATES.txt @@ -0,0 +1,65 @@ +compile insert msWin_Wait_Equates +/* + ** Copyright (C) 1992-2014 Revelation Software Inc. All Rights Reserved ** + + Author Captain C + Date April 2014 + Purpose Equates for use with the Windows API Wait functions + + Amended Date Reason + ======= ==== ====== +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_WAIT_EQUATES_ +#define _MSWIN_WAIT_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + declare function msWin_WaitForSingleObject, msWin_MsgWaitForMultipleObjects + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ INFINITE$ to 0xFFFFFFFF + + equ STATUS_WAIT_0$ to 0x00000000 + equ STATUS_ABANDONED_WAIT_0$ to 0x00000080 + equ STATUS_USER_APC$ to 0x000000C0 + equ STATUS_TIMEOUT$ to 0x00000102 + equ STATUS_PENDING$ to 0x00000103 + + equ MAXIMUM_WAIT_OBJECTS$ to 64 + + equ WAIT_FAILED$ to 0xFFFFFFFF + equ WAIT_OBJECT_0$ to ( ( STATUS_WAIT_0$ ) + 0 ) + equ WAIT_ABANDONED$ to ( ( STATUS_ABANDONED_WAIT_0$ ) + 0 ) + equ WAIT_ABANDONED_0$ to ( ( STATUS_ABANDONED_WAIT_0$ ) + 0 ) + equ WAIT_TIMEOUT$ to STATUS_TIMEOUT$ + equ WAIT_IO_COMPLETION$ to STATUS_USER_APC$ + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // Wake Mask constants (Queue Status) + + equ QS_KEY$ to 0x0001 + equ QS_MOUSEMOVE$ to 0x0002 + equ QS_MOUSEBUTTON$ to 0x0004 + equ QS_POSTMESSAGE$ to 0x0008 + equ QS_TIMER$ to 0x0010 + equ QS_PAINT$ to 0x0020 + equ QS_SENDMESSAGE$ to 0x0040 + equ QS_HOTKEY$ to 0x0080 + equ QS_ALLPOSTMESSAGE$ to 0x0100 + equ QS_RAWINPUT$ to 0x0400 + equ QS_MOUSE$ to ( QS_MOUSEMOVE$ + QS_MOUSEBUTTON$ ) + equ QS_INPUT$ to ( QS_MOUSE$ + QS_KEY$ + QS_RAWINPUT$ ) + equ QS_ALLEVENTS$ to ( QS_INPUT$ + QS_POSTMESSAGE$ + QS_TIMER$ + QS_PAINT$ + QS_HOTKEY$ ) + equ QS_ALLINPUT$ to ( QS_INPUT$ + QS_POSTMESSAGE$ + QS_TIMER$ + QS_PAINT$ + QS_HOTKEY$ + QS_SENDMESSAGE$ ) + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_WEBBROWSER_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_WEBBROWSER_EQUATES.txt new file mode 100644 index 0000000..2ce145f --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_WEBBROWSER_EQUATES.txt @@ -0,0 +1,35 @@ +compile insert msWin_WebBrowser_Equates +/* + ** Copyright (C) 2014 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Feb 2014 + Purpose Equates for use with the MS WebBrowser control + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_WEBBROWSER_EQUATES_ +#define _MSWIN_WEBBROWSER_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ WB_READYSTATE_UNINITIALIZED$ to 0 + equ WB_READYSTATE_LOADING$ to 1 + equ WB_READYSTATE_LOADED$ to 2 + equ WB_READYSTATE_INTERACTIVE$ to 3 + equ WB_READYSTATE_COMPLETE$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/MSWIN_WINDOWMESSAGE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_WINDOWMESSAGE_EQUATES.txt new file mode 100644 index 0000000..d55ce58 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_WINDOWMESSAGE_EQUATES.txt @@ -0,0 +1,278 @@ +compile insert msWin_WindowMessage_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Captain C + Date October 2012 + Purpose General Window Message ( WM_ ) Equates for the Windows API + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 09 Sep 16 Fixed WM_QUERYDRAGICON$ - thanks Blint! + + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_WINDOWMESSAGE_EQUATES_ +#define _MSWIN_WINDOWMESSAGE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ WM_NULL$ to 0x0000 + equ WM_CREATE$ to 0x0001 + equ WM_DESTROY$ to 0x0002 + equ WM_MOVE$ to 0x0003 + equ WM_SIZE$ to 0x0005 + equ WM_ACTIVATE$ to 0x0006 + equ WM_SETFOCUS$ to 0x0007 + equ WM_KILLFOCUS$ to 0x0008 + equ WM_ENABLE$ to 0x000A + equ WM_SETREDRAW$ to 0x000B + equ WM_SETTEXT$ to 0x000C + equ WM_GETTEXT$ to 0x000D + equ WM_GETTEXTLENGTH$ to 0x000E + equ WM_PAINT$ to 0x000F + equ WM_CLOSE$ to 0x0010 + equ WM_QUERYENDSESSION$ to 0x0011 + equ WM_QUIT$ to 0x0012 + equ WM_QUERYOPEN$ to 0x0013 + equ WM_ERASEBKGND$ to 0x0014 + equ WM_SYSCOLORCHANGE$ to 0x0015 + equ WM_ENDSESSION$ to 0x0016 + equ WM_SYSTEMERROR$ to 0x0017 + equ WM_SHOWWINDOW$ to 0x0018 + equ WM_CTLCOLOR$ to 0x0019 + equ WM_WININICHANGE$ to 0x001A + equ WM_SETTINGCHANGE$ to WM_WININICHANGE$ + equ WM_DEVMODECHANGE$ to 0x001B + equ WM_ACTIVATEAPP$ to 0x001C + equ WM_FONTCHANGE$ to 0x001D + equ WM_TIMECHANGE$ to 0x001E + equ WM_CANCELMODE$ to 0x001F + equ WM_SETCURSOR$ to 0x0020 + equ WM_MOUSEACTIVATE$ to 0x0021 + equ WM_CHILDACTIVATE$ to 0x0022 + equ WM_QUEUESYNC$ to 0x0023 + equ WM_GETMINMAXINFO$ to 0x0024 + equ WM_PAINTICON$ to 0x0026 + equ WM_ICONERASEBKGND$ to 0x0027 + equ WM_NEXTDLGCTL$ to 0x0028 + equ WM_SPOOLERSTATUS$ to 0x002A + equ WM_DRAWITEM$ to 0x002B + equ WM_MEASUREITEM$ to 0x002C + equ WM_DELETEITEM$ to 0x002D + equ WM_VKEYTOITEM$ to 0x002E + equ WM_CHARTOITEM$ to 0x002F + equ WM_SETFONT$ to 0x0030 + equ WM_GETFONT$ to 0x0031 + equ WM_SETHOTKEY$ to 0x0032; + equ WM_GETHOTKEY$ to 0x0033 + equ WM_QUERYDRAGICON$ to 0x0037 + equ WM_COMPAREITEM$ to 0x0039 + equ WM_GETOBJECT$ to 0x003D + equ WM_COMPACTING$ to 0x0041 + + equ WM_COMMNOTIFY$ to 0x0044 ; // obsolete in Win32 + + equ WM_WINDOWPOSCHANGING$ to 0x0046 + equ WM_WINDOWPOSCHANGED$ to 0x0047 + equ WM_POWER$ to 0x0048 + + equ WM_COPYDATA$ to 0x004A + equ WM_CANCELJOURNAL$ to 0x004B + equ WM_NOTIFY$ to 0x004E + equ WM_INPUTLANGCHANGEREQUEST$ to 0x0050 + equ WM_INPUTLANGCHANGE$ to 0x0051 + equ WM_TCARD$ to 0x0052 + equ WM_HELP$ to 0x0053 + equ WM_USERCHANGED$ to 0x0054 + equ WM_NOTIFYFORMAT$ to 0x0055 + + equ WM_CONTEXTMENU$ to 0x007B + equ WM_STYLECHANGING$ to 0x007C + equ WM_STYLECHANGED$ to 0x007D + equ WM_DISPLAYCHANGE$ to 0x007E + equ WM_GETICON$ to 0x007F + equ WM_SETICON$ to 0x0080 + + equ WM_NCCREATE$ to 0x0081 + equ WM_NCDESTROY$ to 0x0082 + equ WM_NCCALCSIZE$ to 0x0083 + equ WM_NCHITTEST$ to 0x0084 + equ WM_NCPAINT$ to 0x0085 + equ WM_NCACTIVATE$ to 0x0086 + equ WM_GETDLGCODE$ to 0x0087 + equ WM_NCMOUSEMOVE$ to 0x00A0 + equ WM_NCLBUTTONDOWN$ to 0x00A1 + equ WM_NCLBUTTONUP$ to 0x00A2 + equ WM_NCLBUTTONDBLCLK$ to 0x00A3 + equ WM_NCRBUTTONDOWN$ to 0x00A4 + equ WM_NCRBUTTONUP$ to 0x00A5 + equ WM_NCRBUTTONDBLCLK$ to 0x00A6 + equ WM_NCMBUTTONDOWN$ to 0x00A7 + equ WM_NCMBUTTONUP$ to 0x00A8 + equ WM_NCMBUTTONDBLCLK$ to 0x00A9 + + equ WM_KEYFIRST$ to 0x0100 + equ WM_KEYDOWN$ to 0x0100 + equ WM_KEYUP$ to 0x0101 + equ WM_CHAR$ to 0x0102 + equ WM_DEADCHAR$ to 0x0103 + equ WM_SYSKEYDOWN$ to 0x0104 + equ WM_SYSKEYUP$ to 0x0105 + equ WM_SYSCHAR$ to 0x0106 + equ WM_SYSDEADCHAR$ to 0x0107 + equ WM_KEYLAST$ to 0x0108 + + equ WM_INITDIALOG$ to 0x0110 + equ WM_COMMAND$ to 0x0111 + equ WM_SYSCOMMAND$ to 0x0112 + equ WM_TIMER$ to 0x0113 + equ WM_HSCROLL$ to 0x0114 + equ WM_VSCROLL$ to 0x0115 + equ WM_INITMENU$ to 0x0116 + equ WM_INITMENUPOPUP$ to 0x0117 + equ WM_MENUSELECT$ to 0x011F + equ WM_MENUCHAR$ to 0x0120 + equ WM_ENTERIDLE$ to 0x0121 + + equ WM_MENURBUTTONUP$ to 0x0122 + equ WM_MENUDRAG$ to 0x0123 + equ WM_MENUGETOBJECT$ to 0x0124 + equ WM_UNINITMENUPOPUP$ to 0x0125 + equ WM_MENUCOMMAND$ to 0x0126 + + equ WM_CHANGEUISTATE$ to 0x0127 + equ WM_UPDATEUISTATE$ to 0x0128 + equ WM_QUERYUISTATE$ to 0x0129 + + equ WM_CTLCOLORMSGBOX$ to 0x0132 + equ WM_CTLCOLOREDIT$ to 0x0133 + equ WM_CTLCOLORLISTBOX$ to 0x0134 + equ WM_CTLCOLORBTN$ to 0x0135 + equ WM_CTLCOLORDLG$ to 0x0136 + equ WM_CTLCOLORSCROLLBAR$ to 0x0137 + equ WM_CTLCOLORSTATIC$ to 0x0138 + + equ WM_MOUSEFIRST$ to 0x0200 + equ WM_MOUSEMOVE$ to 0x0200 + equ WM_LBUTTONDOWN$ to 0x0201 + equ WM_LBUTTONUP$ to 0x0202 + equ WM_LBUTTONDBLCLK$ to 0x0203 + equ WM_RBUTTONDOWN$ to 0x0204 + equ WM_RBUTTONUP$ to 0x0205 + equ WM_RBUTTONDBLCLK$ to 0x0206 + equ WM_MBUTTONDOWN$ to 0x0207 + equ WM_MBUTTONUP$ to 0x0208 + equ WM_MBUTTONDBLCLK$ to 0x0209 + equ WM_MOUSEWHEEL$ to 0x020A + equ WM_MOUSELAST$ to 0x020A + + equ WM_PARENTNOTIFY$ to 0x0210 + equ WM_ENTERMENULOOP$ to 0x0211 + equ WM_EXITMENULOOP$ to 0x0212 + equ WM_NEXTMENU$ to 0x0213 + + equ WM_SIZING$ to 532 + equ WM_CAPTURECHANGED$ to 533 + equ WM_MOVING$ to 534 + equ WM_POWERBROADCAST$ to 536 + equ WM_DEVICECHANGE$ to 537 + + equ WM_IME_STARTCOMPOSITION$ to 0x010D + equ WM_IME_ENDCOMPOSITION$ to 0x010E + equ WM_IME_COMPOSITION$ to 0x010F + equ WM_IME_KEYLAST$ to 0x010F + equ WM_IME_SETCONTEXT$ to 0x0281 + equ WM_IME_NOTIFY$ to 0x0282 + equ WM_IME_CONTROL$ to 0x0283 + equ WM_IME_COMPOSITIONFULL$ to 0x0284 + equ WM_IME_SELECT$ to 0x0285 + equ WM_IME_CHAR$ to 0x0286 + equ WM_IME_REQUEST$ to 0x0288 + equ WM_IME_KEYDOWN$ to 0x0290 + equ WM_IME_KEYUP$ to 0x0291 + + equ WM_MDICREATE$ to 0x0220 + equ WM_MDIDESTROY$ to 0x0221 + equ WM_MDIACTIVATE$ to 0x0222 + equ WM_MDIRESTORE$ to 0x0223 + equ WM_MDINEXT$ to 0x0224 + equ WM_MDIMAXIMIZE$ to 0x0225 + equ WM_MDITILE$ to 0x0226 + equ WM_MDICASCADE$ to 0x0227 + equ WM_MDIICONARRANGE$ to 0x0228 + equ WM_MDIGETACTIVE$ to 0x0229 + equ WM_MDISETMENU$ to 0x0230 + + equ WM_ENTERSIZEMOVE$ to 0x0231 + equ WM_EXITSIZEMOVE$ to 0x0232 + equ WM_DROPFILES$ to 0x0233 + equ WM_MDIREFRESHMENU$ to 0x0234 + + equ WM_MOUSEHOVER$ to 0x02A1 + equ WM_MOUSELEAVE$ to 0x02A3 + + equ WM_CUT$ to 0x0300 + equ WM_COPY$ to 0x0301 + equ WM_PASTE$ to 0x0302 + equ WM_CLEAR$ to 0x0303 + equ WM_UNDO$ to 0x0304 + equ WM_RENDERFORMAT$ to 0x0305 + equ WM_RENDERALLFORMATS$ to 0x0306 + equ WM_DESTROYCLIPBOARD$ to 0x0307; + equ WM_DRAWCLIPBOARD$ to 0x0308; + equ WM_PAINTCLIPBOARD$ to 0x0309; + equ WM_VSCROLLCLIPBOARD$ to 0x030A; + equ WM_SIZECLIPBOARD$ to 0x030B; + equ WM_ASKCBFORMATNAME$ to 0x030C; + equ WM_CHANGECBCHAIN$ to 0x030D; + equ WM_HSCROLLCLIPBOARD$ to 0x030E; + equ WM_QUERYNEWPALETTE$ to 0x030F; + equ WM_PALETTEISCHANGING$ to 0x0310; + equ WM_PALETTECHANGED$ to 0x0311; + equ WM_HOTKEY$ to 0x0312; + + equ WM_PRINT$ to 791 + equ WM_PRINTCLIENT$ to 792 + + equ WM_HANDHELDFIRST$ to 856 + equ WM_HANDHELDLAST$ to 863 + + equ WM_PENWINFIRST$ to 0x0380 + equ WM_PENWINLAST$ to 0x038F + + equ WM_COALESCE_FIRST$ to 0x0390 + equ WM_COALESCE_LAST$ to 0x039F + + equ WM_DDE_FIRST$ to 0x03E0 + equ WM_DDE_INITIATE$ to WM_DDE_FIRST$ + 0 + equ WM_DDE_TERMINATE$ to WM_DDE_FIRST$ + 1 + equ WM_DDE_ADVISE$ to WM_DDE_FIRST$ + 2 + equ WM_DDE_UNADVISE$ to WM_DDE_FIRST$ + 3 + equ WM_DDE_ACK$ to WM_DDE_FIRST$ + 4 + equ WM_DDE_DATA$ to WM_DDE_FIRST$ + 5 + equ WM_DDE_REQUEST$ to WM_DDE_FIRST$ + 6 + equ WM_DDE_POKE$ to WM_DDE_FIRST$ + 7 + equ WM_DDE_EXECUTE$ to WM_DDE_FIRST$ + 8 + equ WM_DDE_LAST$ to WM_DDE_FIRST$ + 8 + + equ WM_APP$ to 0x8000 + + // NOTE: All Message Numbers below 0x0400 are RESERVED + // + // Private Window Messages Start Here } + + equ WM_USER$ to 0x0400 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_WINDOWPLACEMENT_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_WINDOWPLACEMENT_EQUATES.txt new file mode 100644 index 0000000..f272a17 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_WINDOWPLACEMENT_EQUATES.txt @@ -0,0 +1,40 @@ +compile insert msWin_WindowPlacement_Equates +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author Captain C + Date October 2012 + Purpose Equates for use with the GetWindowPlacement and SetWindowPlacement + Windows API functions + + + Comments + ======== + + Calling GetWindowPlacement and SetWindowPlacement shouidl be avoided in + v10 as they are not DPI aware. The GETPLACEMENTDATA and SETPLACEMENTDATA + WINDOW methods should be used instead. + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +#ifndef _MSWIN_WINDOWPLACEMENT_EQUATES_ +#define _MSWIN_WINDOWPLACEMENT_EQUATES_ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // WINDOWPLACEMENT structure equates for the "flags" member. + + equ WPF_SETMINPOSITION$ to 0x0001 + equ WPF_RESTORETOMAXIMIZED$ to 0x0002 + equ WPF_ASYNCWINDOWPLACEMENT$ to 0x0004 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +#endif diff --git a/SYSPROG/STPROCINS/MSWIN_WINDOWSIZING_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_WINDOWSIZING_EQUATES.txt new file mode 100644 index 0000000..deecf61 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_WINDOWSIZING_EQUATES.txt @@ -0,0 +1,37 @@ +compile insert msWin_WindowSizing_Equates +/* + ** Copyright (C) 2013-2014 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Sept 2014 + Purpose Equates for use with the WM_SIZING message + + Comments + + Amended Date Reason + ======= ==== ====== + mtr 12 Dec 2014 Git sucks + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_WINDOWSIZING_EQUATES_ +#define _MSWIN_WINDOWSIZING_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ WMSZ_LEFT$ to 1 + equ WMSZ_RIGHT$ to 2 + equ WMSZ_TOP$ to 3 + equ WMSZ_TOPLEFT$ to 4 + equ WMSZ_TOPRIGHT$ to 5 + equ WMSZ_BOTTOM$ to 6 + equ WMSZ_BOTTOMLEFT$ to 7 + equ WMSZ_BOTTOMRIGHT$ to 8 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/MSWIN_WINDOWSTYLE_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_WINDOWSTYLE_EQUATES.txt new file mode 100644 index 0000000..1c9f30a --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_WINDOWSTYLE_EQUATES.txt @@ -0,0 +1,98 @@ +compile insert msWin_WindowStyle_Equates +/* + ** Copyright (c) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Captain C + Date August 2013 + Purpose General Style Equates for the Windows API + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 19 Feb 2014 Added missing WS_EX styles for WINVER >= 0x0501 +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_WINDOWSTYLE_EQUATES_ +#define _MSWIN_WINDOWSTYLE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // General Equates + + equ WS_OVERLAPPED$ to 0x00000000 + equ WS_POPUP$ to 0x80000000 + equ WS_CHILD$ to 0x40000000 + equ WS_MINIMIZE$ to 0x20000000 + equ WS_VISIBLE$ to 0x10000000 + equ WS_DISABLED$ to 0x08000000 + equ WS_CLIPSIBLINGS$ to 0x04000000 + equ WS_CLIPCHILDREN$ to 0x02000000 + equ WS_MAXIMIZE$ to 0x01000000 + equ WS_CAPTION$ to 0x00C00000 ; * // WS_BORDER | WS_DLGFRAME + equ WS_BORDER$ to 0x00800000 + equ WS_DLGFRAME$ to 0x00400000 + equ WS_VSCROLL$ to 0x00200000 + equ WS_HSCROLL$ to 0x00100000 + equ WS_SYSMENU$ to 0x00080000 + equ WS_THICKFRAME$ to 0x00040000 + equ WS_GROUP$ to 0x00020000 + equ WS_TABSTOP$ to 0x00010000 + + equ WS_MINIMIZEBOX$ to 0x00020000 + equ WS_MAXIMIZEBOX$ to 0x00010000 + + equ WS_OVERLAPPEDWINDOW$ to ( WS_OVERLAPPED$ + WS_CAPTION$ + WS_SYSMENU$ + WS_THICKFRAME$ + WS_MINIMIZEBOX$ + WS_MAXIMIZEBOX$ ) + equ WS_POPUPWINDOW$ to ( WS_POPUP$ + WS_BORDER$ + WS_SYSMENU$ ) + equ WS_CHILDWINDOW$ to WS_CHILD$ + + equ WS_TILED$ to WS_OVERLAPPED$ + equ WS_ICONIC$ to WS_MINIMIZE$ + equ WS_SIZEBOX$ to WS_THICKFRAME$ + equ WS_TILEDWINDOW$ to WS_OVERLAPPEDWINDOW$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Extended styles + + equ WS_EX_DLGMODALFRAME$ to 0x00000001 + equ WS_EX_DRAGOBJECT$ to 0x00000002 + equ WS_EX_NOPARENTNOTIFY$ to 0x00000004 + equ WS_EX_TOPMOST$ to 0x00000008 + equ WS_EX_ACCEPTFILES$ to 0x00000010 + equ WS_EX_TRANSPARENT$ to 0x00000020 + + equ WS_EX_MDICHILD$ to 0x00000040 + equ WS_EX_TOOLWINDOW$ to 0x00000080 + equ WS_EX_WINDOWEDGE$ to 0x00000100 + equ WS_EX_CLIENTEDGE$ to 0x00000200 + equ WS_EX_CONTEXTHELP$ to 0x00000400 + + equ WS_EX_RIGHT$ to 0x00001000 + equ WS_EX_LEFT$ to 0x00000000 + equ WS_EX_RTLREADING$ to 0x00002000 + equ WS_EX_LTRREADING$ to 0x00000000 + equ WS_EX_LEFTSCROLLBAR$ to 0x00004000 + equ WS_EX_RIGHTSCROLLBAR$ to 0x00000000 + + equ WS_EX_CONTROLPARENT$ to 0x00010000 + equ WS_EX_STATICEDGE$ to 0x00020000 + equ WS_EX_APPWINDOW$ to 0x00040000 + equ WS_EX_LAYERED$ to 0x00080000 + + equ WS_EX_NOINHERITLAYOUT$ to 0x00100000 ; * // Disable inheritence of mirroring by children + equ WS_EX_LAYOUTRTL$ to 0x00400000 ; * // Right to left mirroring + equ WS_EX_COMPOSITED$ to 0x02000000 + equ WS_EX_NOACTIVATE$ to 0x08000000 + + equ WS_EX_OVERLAPPEDWINDOW$ to ( WS_EX_WINDOWEDGE$ + WS_EX_CLIENTEDGE$ ) + equ WS_EX_PALETTEWINDOW$ to ( WS_EX_WINDOWEDGE$ + WS_EX_TOOLWINDOW$ + WS_EX_TOPMOST$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_WINERROR_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_WINERROR_EQUATES.txt new file mode 100644 index 0000000..2b90739 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_WINERROR_EQUATES.txt @@ -0,0 +1,84 @@ +compile insert msWin_WinError_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Sept 2013 + Purpose Equates for standard windows error conditions + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + +#ifndef _MSWIN_WINERROR_EQUATES_ +#define _MSWIN_WINERROR_EQUATES_ + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ NO_ERROR$ to 0 + + equ ERROR_SUCCESS$ to 0 + equ ERROR_INVALID_FUNCTION$ to 1 + equ ERROR_FILE_NOT_FOUND$ to 2 + equ ERROR_PATH_NOT_FOUND$ to 3 + equ ERROR_TOO_MANY_OPEN_FILES$ to 4 + equ ERROR_ACCESS_DENIED$ to 5 + equ ERROR_INVALID_HANDLE$ to 6 + equ ERROR_ARENA_TRASHED$ to 7 + equ ERROR_NOT_ENOUGH_MEMORY$ to 8 + equ ERROR_INVALID_BLOCK$ to 9 + equ ERROR_BAD_ENVIRONMENT$ to 10 + equ ERROR_BAD_FORMAT$ to 11 + equ ERROR_INVALID_ACCESS$ to 12 + equ ERROR_INVALID_DATA$ to 13 + equ ERROR_OUTOFMEMORY$ to 14 + equ ERROR_INVALID_DRIVE$ to 15 + equ ERROR_CURRENT_DIRECTORY$ to 0x10 + equ ERROR_NOT_SAME_DEVICE$ to 17 + equ ERROR_NO_MORE_FILES$ to 18 + equ ERROR_WRITE_PROTECT$ to 19 + equ ERROR_BAD_UNIT$ to 20 + equ ERROR_NOT_READY$ to 21 + equ ERROR_BAD_COMMAND$ to 22 + equ ERROR_CRC$ to 23 + equ ERROR_BAD_LENGTH$ to 24 + equ ERROR_SEEK$ to 25 + equ ERROR_NOT_DOS_DISK$ to 26 + equ ERROR_SECTOR_NOT_FOUND$ to 27 + equ ERROR_OUT_OF_PAPER$ to 28 + equ ERROR_WRITE_FAULT$ to 29 + equ ERROR_READ_FAULT$ to 30 + equ ERROR_GEN_FAILURE$ to 31 + equ ERROR_SHARING_VIOLATION$ to 0x20 + equ ERROR_NOT_SUPPORTED$ to 50 + equ ERROR_MORE_DATA$ to 234 + equ ERROR_NO_MORE_ITEMS$ to 259 + + equ ERROR_OPERATION_ABORTED$ to 995 + equ ERROR_IO_INCOMPLETE$ to 996 + equ ERROR_IO_PENDING$ to 997 + equ ERROR_NOACCESS$ to 998 + equ ERROR_SWAPERROR$ to 999 + equ ERROR_STACK_OVERFLOW$ to 1001 + + equ ERROR_BAD_DEVICE$ to 1200 + equ ERROR_CONNECTION_UNAVAIL$ to 1201 + equ ERROR_NO_NET_OR_BAD_PATH$ to 1203 + equ ERROR_EXTENDED_ERROR$ to 1208 + equ ERROR_NO_NETWORK$ to 1222 + equ ERROR_NOT_CONNECTED$ to 2250 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + +#endif + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_WININET_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_WININET_EQUATES.txt new file mode 100644 index 0000000..466816c --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_WININET_EQUATES.txt @@ -0,0 +1,195 @@ +compile insert msWin_WinInet_Equates +/* + ** Copyright (C) 2013-2018 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Nov 2018 + Purpose Equates for use with the WinInet library + + Comments + + + Amended Date Reason + ======= ==== ====== + Mr C 09 Nov 18 Added HTTP constants + +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_WININET_EQUATES_ +#define _MSWIN_WININET_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ INTERNET_INVALID_PORT_NUMBERS$ to 0 ; * // use the protocol-specific default + + equ INTERNET_DEFAULT_FTP_PORT$ to 21 ; * // default for FTP servers + equ INTERNET_DEFAULT_GOPHER_PORT$ to 70 ; * // " " gopher " + equ INTERNET_DEFAULT_HTTP_PORT$ to 80 ; * // " " HTTP " + equ INTERNET_DEFAULT_HTTPS_PORT$ to 443 ; * // " " HTTPS " + equ INTERNET_DEFAULT_SOCKS_PORT$ to 1080 ; * // default for SOCKS firewall servers. + + * // maximum field lengths (arbitrary) + equ INTERNET_MAX_HOST_NAME_LENGTH$ to 256 + equ INTERNET_MAX_USER_NAME_LENGTH$ to 128 + equ INTERNET_MAX_PASSWORD_LENGTH$ to 128 + equ INTERNET_MAX_PORT_NUMBER_LENGTH$ to 5 ; * // INTERNET_PORT is unsigned short + equ INTERNET_MAX_PORT_NUMBER_VALUE$ to 65535 ; * // maximum unsigned short value + equ INTERNET_MAX_PATH_LENGTH$ to 2048 + equ INTERNET_MAX_SCHEME_LENGTH$ to 32 ; * // longest protocol name length + equ INTERNET_MAX_URL_LENGTH$ to (INTERNET_MAX_SCHEME_LENGTH$ + len( "://" ) + INTERNET_MAX_PATH_LENGTH$ ) + + * // access types for InternetOpen() + equ INTERNET_OPEN_TYPE_PRECONFIG$ to 0 ; * // use registry configuration + equ INTERNET_OPEN_TYPE_DIRECT$ to 1 ; * // direct to net + equ INTERNET_OPEN_TYPE_PROXY$ to 3 ; * // via named proxy + equ INTERNET_OPEN_TYPE_PRECONFIG_WITH_NO_AUTOPROXY$ to 4 ; * // prevent using java/script/INS + + * // service types for InternetConnect() + equ INTERNET_SERVICE_FTP$ to 1 + equ INTERNET_SERVICE_GOPHER$ to 2 + equ INTERNET_SERVICE_HTTP$ to 3 + + * // values returned by InternetQueryOption() with + * // INTERNET_OPTION_KEEP_CONNECTION: + equ INTERNET_KEEP_ALIVE_UNKNOWN$ to (-1) + equ INTERNET_KEEP_ALIVE_ENABLED$ to 1 + equ INTERNET_KEEP_ALIVE_DISABLED$ to 0 + + * // flags returned by InternetQueryOption() with + * // INTERNET_OPTION_REQUEST_FLAGS + equ INTERNET_REQFLAG_FROM_CACHE$ to 0x00000001 ; * // response came from cache + equ INTERNET_REQFLAG_ASYNC$ to 0x00000002 ; * // request was made asynchronously + equ INTERNET_REQFLAG_VIA_PROXY$ to 0x00000004 ; * // request was made via a proxy + equ INTERNET_REQFLAG_NO_HEADERS$ to 0x00000008 ; * // orginal response contained no headers + equ INTERNET_REQFLAG_PA$SSIVE$ to 0x00000010 ; * // FTP: passive-mode connection + equ INTERNET_REQFLAG_CACHE_WRITE_DISABLED$ to 0x00000040 ; * // HTTPS: this request not cacheable + equ INTERNET_REQFLAG_NET_TIMEOUT$ to 0x00000080 ; * // w/ _FROM_CACHE: net request timed out + + * // flags for IDN enable/disable via INTERNET_OPTION_IDN + equ INTERNET_FLAG_IDN_DIRECT$ to 0x00000001 ; * // IDN enabled for direct connections + equ INTERNET_FLAG_IDN_PROXY$ to 0x00000002 ; * // IDN enabled for proxy + + * // flags common to open functions (not InternetOpen()): + equ INTERNET_FLAG_RELOAD$ to 0x80000000 ; * // retrieve the original item + + * // flags for InternetOpenUrl(): + equ INTERNET_FLAG_RAW_DATA$ to 0x40000000 ; * // FTP/gopher find: receive the item as raw (structured) data + equ INTERNET_FLAG_EXISTING_CONNECT$ to 0x20000000 ; * // FTP: use existing InternetConnect handle for server if possible + + * // flags for InternetOpen(): + equ INTERNET_FLAG_ASYNC$ to 0x10000000 ; * // this request is asynchronous (where supported) + + * // protocol-specific flags: + equ INTERNET_FLAG_PASSIVE$ to 0x08000000 ; * // used for FTP connections + + * // additional cache flags + equ INTERNET_FLAG_NO_CACHE_WRITE$ to 0x04000000 ; * // don't write this item to the cache + equ INTERNET_FLAG_DONT_CACHE$ to INTERNET_FLAG_NO_CACHE_WRITE$ + equ INTERNET_FLAG_MAKE_PERSISTENT$ to 0x02000000 ; * // make this item persistent in cache + equ INTERNET_FLAG_FROM_CACHE$ to 0x01000000 ; * // use offline semantics + equ INTERNET_FLAG_OFFLINE$ to INTERNET_FLAG_FROM_CACHE$ + + * // additional flags + equ INTERNET_FLAG_SECURE$ to 0x00800000 ; * // use PCT/SSL if applicable (HTTP) + equ INTERNET_FLAG_KEEP_CONNECTION$ to 0x00400000 ; * // use keep-alive semantics + equ INTERNET_FLAG_NO_AUTO_REDIRECT$ to 0x00200000 ; * // don't handle redirections automatically + equ INTERNET_FLAG_READ_PREFETCH$ to 0x00100000 ; * // do background read prefetch + equ INTERNET_FLAG_NO_COOKIES$ to 0x00080000 ; * // no automatic cookie handling + equ INTERNET_FLAG_NO_AUTH$ to 0x00040000 ; * // no automatic authentication handling + equ INTERNET_FLAG_RESTRICTED_ZONE$ to 0x00020000 ; * // apply restricted zone policies for cookies, auth + equ INTERNET_FLAG_CACHE_IF_NET_FAIL$ to 0x00010000 ; * // return cache file if net request fails + + * // Security Ignore Flags, Allow HttpOpenRequest to overide + * // Secure Channel (SSL/PCT) failures of the following types. + equ INTERNET_FLAG_IGNORE_REDIRECT_TO_HTTP$ to 0x00008000 ; * // ex: https: to http: + equ INTERNET_FLAG_IGNORE_REDIRECT_TO_HTTPS$ to 0x00004000 ; * // ex: http: to https: + equ INTERNET_FLAG_IGNORE_CERT_DATE_INVALID$ to 0x00002000 ; * // expired X509 Cert. + equ INTERNET_FLAG_IGNORE_CERT_CN_INVALID$ to 0x00001000 ; * // bad common name in X509 Cert. + + * // more caching flags + equ INTERNET_FLAG_RESYNCHRONIZE$ to 0x00000800 ; * // asking wininet to update an item if it is newer + equ INTERNET_FLAG_HYPERLINK$ to 0x00000400 ; * // asking wininet to do hyperlinking semantic which works right for scripts + equ INTERNET_FLAG_NO_UI$ to 0x00000200 ; * // no cookie popup + equ INTERNET_FLAG_PRAGMA_NOCACHE$ to 0x00000100 ; * // asking wininet to add "pragma: no-cache" + equ INTERNET_FLAG_CACHE_ASYNC$ to 0x00000080 ; * // ok to perform lazy cache-write + equ INTERNET_FLAG_FORMS_SUBMIT$ to 0x00000040 ; * // this is a forms submit + equ INTERNET_FLAG_FWD_BACK$ to 0x00000020 ; * // fwd-back button op + equ INTERNET_FLAG_NEED_FILE$ to 0x00000010 ; * // need a file for this request + equ INTERNET_FLAG_MUST_CACHE_REQUEST$ to INTERNET_FLAG_NEED_FILE$ + + equ WININET_API_FLAG_ASYNC$ to 0x00000001 ; // force async operation + equ WININET_API_FLAG_SYNC$ to 0x00000004 ; // force sync operation + equ WININET_API_FLAG_USE_CONTEXT$ to 0x00000008 ; // use value supplied in dwContext (even if 0) + + equ INTERNET_NO_CALLBACK$ to 0 + + //////////////////////////////////////////////////////////////////////////// + + // flags for FTP + + equ FTP_TRANSFER_TYPE_UNKNOWN$ to 0x00000000 + equ FTP_TRANSFER_TYPE_ASCII$ to 0x00000001 + equ FTP_TRANSFER_TYPE_BINARY$ to 0x00000002 + equ FTP_TRANSFER_TYPE_MASK$ to ( FTP_TRANSFER_TYPE_ASCII$ + FTP_TRANSFER_TYPE_BINARY$ ) + + equ INTERNET_FLAG_TRANSFER_ASCII$ to FTP_TRANSFER_TYPE_ASCII$ + equ INTERNET_FLAG_TRANSFER_BINARY$ to FTP_TRANSFER_TYPE_BINARY$ + + //////////////////////////////////////////////////////////////////////////// + + // flags for HttpAddRequestHeaders + + equ HTTP_ADDREQ_INDEX_MASK$ to 0x0000FFFF + equ HTTP_ADDREQ_FLAGS_MASK$ to 0xFFFF0000 + + equ HTTP_ADDREQ_FLAG_ADD$ to 0x20000000 + equ HTTP_ADDREQ_FLAG_ADD_IF_NEW$ to 0x10000000 + + equ HTTP_ADDREQ_FLAG_COALESCE_WITH_COMMA$ to 0x40000000 + equ HTTP_ADDREQ_FLAG_COALESCE_WITH_SEMICOLON$ to 0x01000000 + equ HTTP_ADDREQ_FLAG_COALESCE$ to HTTP_ADDREQ_FLAG_COALESCE_WITH_COMMA$ + + // flags for HttpSendRequestEx(), HttpEndRequest() + equ HSR_ASYNC$ to WININET_API_FLAG_ASYNC$ ; // force async + equ HSR_SYNC$ to WININET_API_FLAG_SYNC$ ; // force sync + equ HSR_USE_CONTEXT$ to WININET_API_FLAG_USE_CONTEXT$ ; // use dwContext value + equ HSR_INITIATE$ to 0x00000008 ; // iterative operation (completed by HttpEndRequest) + equ HSR_DOWNLOAD$ to 0x00000010 ; // download to file + equ HSR_CHUNKED$ to 0x00000020 ; // operation is send of chunked data + + //////////////////////////////////////////////////////////////////////////// + + // Internet status callback code + equ INTERNET_STATUS_RESOLVING_NAME$ to 10 + equ INTERNET_STATUS_NAME_RESOLVED$ to 11 + equ INTERNET_STATUS_CONNECTING_TO_SERVER$ to 20 + equ INTERNET_STATUS_CONNECTED_TO_SERVER$ to 21 + equ INTERNET_STATUS_SENDING_REQUEST$ to 30 + equ INTERNET_STATUS_REQUEST_SENT$ to 31 + equ INTERNET_STATUS_RECEIVING_RESPONSE$ to 40 + equ INTERNET_STATUS_RESPONSE_RECEIVED$ to 41 + equ INTERNET_STATUS_CTL_RESPONSE_RECEIVED$ to 42 + equ INTERNET_STATUS_PREFETCH$ to 43 + equ INTERNET_STATUS_CLOSING_CONNECTION$ to 50 + equ INTERNET_STATUS_CONNECTION_CLOSED$ to 51 + equ INTERNET_STATUS_HANDLE_CREATED$ to 60 + equ INTERNET_STATUS_HANDLE_CLOSING$ to 70 + equ INTERNET_STATUS_DETECTING_PROXY$ to 80 + equ INTERNET_STATUS_REQUEST_COMPLETE$ to 100 + equ INTERNET_STATUS_REDIRECT$ to 110 + equ INTERNET_STATUS_INTERMEDIATE_RESPONSE$ to 120 + equ INTERNET_STATUS_USER_INPUT_REQUIRED$ to 140 + equ INTERNET_STATUS_STATE_CHANGE$ to 200 + equ INTERNET_STATUS_COOKIE_SENT$ to 320 + equ INTERNET_STATUS_COOKIE_RECEIVED$ to 321 + equ INTERNET_STATUS_PRIVACY_IMPACTED$ to 324 + equ INTERNET_STATUS_P3P_HEADER$ to 325 + equ INTERNET_STATUS_P3P_POLICYREF$ to 326 + equ INTERNET_STATUS_COOKIE_HISTORY$ to 327 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/MSWIN_WINSOCK_EQUATES.txt b/SYSPROG/STPROCINS/MSWIN_WINSOCK_EQUATES.txt new file mode 100644 index 0000000..1322eb1 --- /dev/null +++ b/SYSPROG/STPROCINS/MSWIN_WINSOCK_EQUATES.txt @@ -0,0 +1,174 @@ +compile insert msWin_WinSock_Equates +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Feb 2022 + Purpose Equates for use with Windows WinSock functions + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _MSWIN_WINSOCK_EQUATES_ +#define _MSWIN_WINSOCK_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function msWin_WSAStartup, msWin_WSACleanUp, msWin_GetLastError + declare function msWin_GetHostByName, msWin_IcmpCreateFile + declare function msWin_IcmpCloseHandle, msWin_IcmpSendEcho + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $uses @APPID*DLLSTRUCT**MSWIN_WSADATA + $uses @APPID*DLLSTRUCT**MSWIN_HOSTENT + $uses @APPID*DLLSTRUCT**MSWIN_ICMP_ECHO_REPLY + $uses @APPID*DLLSTRUCT**MSWIN_IP_OPTION_INFORMATION + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Address families. + + equ AF_UNSPEC$ to 0 ; // unspecified + equ AF_UNIX$ to 1 ; // local to host (pipes, portals) + equ AF_INET$ to 2 ; // internetwork: UDP, TCP, etc. + equ AF_IMPLINK$ to 3 ; // arpanet imp addresses + equ AF_PUP$ to 4 ; // pup protocols: e.g. BSP + equ AF_CHAOS$ to 5 ; // mit CHAOS protocols + equ AF_IPX$ to 6 ; // IPX and SPX + equ AF_NS$ to 6 ; // XEROX NS protocols + equ AF_ISO$ to 7 ; // ISO protocols + equ AF_OSI$ to AF_ISO$ ; // OSI is ISO + equ AF_ECMA$ to 8 ; // european computer manufacturers + equ AF_DATAKIT$ to 9 ; // datakit protocols + equ AF_CCITT$ to 10 ; // CCITT protocols, X.25 etc + equ AF_SNA$ to 11 ; // IBM SNA + equ AF_DECnet$ to 12 ; // DECnet + equ AF_DLI$ to 13 ; // Direct data link interface + equ AF_LAT$ to 14 ; // LAT + equ AF_HYLINK$ to 15 ; // NSC Hyperchannel + equ AF_APPLETALK$ to 16 ; // AppleTalk + equ AF_NETBIOS$ to 17 ; // NetBios-style addresses + equ AF_VOICEVIEW$ to 18 ; // VoiceView + equ AF_FIREFOX$ to 19 ; // FireFox + equ AF_UNKNOWN1$ to 20 ; // Somebody is using this! + equ AF_BAN$ to 21 ; // Banyan + + equ AF_MAX$ to 22 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ WSADESCRIPTION_LEN$ to 256 + equ WSASYS_STATUS_LEN$ to 128 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // WSADATA Structure equates - this structure is defined in the Windows + // API as: + // + // typedef struct WSAData { + // WORD wVersion; + // WORD wHighVersion; + // unsigned short iMaxSockets; + // unsigned short iMaxUdpDg; + // char FAR * lpVendorInfo; + // char szDescription[WSADESCRIPTION_LEN+1]; + // char szSystemStatus[WSASYS_STATUS_LEN+1]; + // } WSADATA; + + equ WSADATA$ to "MSWIN_WSADATA" + + equ WSADATA_POS_VERSION$ to 1 + equ WSADATA_POS_WHIGHVERSION$ to 2 + equ WSADATA_POS_IMAXSOCKETS$ to 3 + equ WSADATA_POS_IMAXUDPDG$ to 4 + equ WSADATA_POS_LPVENDORINFO$ to 5 + equ WSADATA_POS_SZDESCRIPTION$ to 6 + equ WSADATA_POS_SZSYSTEMSTATUS$ to 7 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // HOSTENT Structure equates: + // + // typedef struct hostent { + // char *h_name; + // char **h_aliases; + // short h_addrtype; + // short h_length; + // char **h_addr_list; + // } HOSTENT, *PHOSTENT, *LPHOSTENT; + + equ HOSTENT$ to "MSWIN_HOSTENT" + + equ HOSTENT_POS_H_HAME$ to 1 + equ HOSTENT_POS_H_ALIASES$ to 2 + equ HOSTENT_POS_H_ADDRTYPE$ to 3 + equ HOSTENT_POS_H_LENGTH$ to 4 + equ HOSTENT_POS_H_ADDR_LIST$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ ICMP_INVALID_HANDLE_VALUE$ to -1 + + // IP_OPTION_INFORMATION is defined as: + // + // typedef struct ip_option_information { + // UCHAR Ttl; + // UCHAR Tos; + // UCHAR Flags; + // UCHAR OptionsSize; + // PUCHAR OptionsData; + // } IP_OPTION_INFORMATION, *PIP_OPTION_INFORMATION; + + equ IP_OPTION_INFORMATION$ to "MSWIN_IP_OPTION_INFORMATION" + + equ IPOI_POS_TTL$ to 1 + equ IPOI_POS_TOS$ to 2 + equ IPOI_POS_FLAGS$ to 3 + equ IPOI_POS_OPTIONSSIZE$ to 4 + equ IPOI_POS_OPTIONSDATA$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // ICMP_ECHO_REPLY is defined as: + // + // typedef struct icmp_echo_reply { + // IPAddr Address; + // ULONG Status; + // ULONG RoundTripTime; + // USHORT DataSize; + // USHORT Reserved; + // PVOID Data; + // struct ip_option_information Options; + // } ICMP_ECHO_REPLY, *PICMP_ECHO_REPLY; + + equ ICMP_ECHO_REPLY$ to "MSWIN_ICMP_ECHO_REPLY" + + equ ICMPER_POS_ADDRESS$ to 1 + equ ICMPER_POS_STATUS$ to 2 + equ ICMPER_POS_ROUNDTRIPTIME$ to 3 + equ ICMPER_POS_DATASIZE$ to 4 + equ ICMPER_POS_RESERVED$ to 5 + equ ICMPER_POS_DATA$ to 6 + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/MVBFS_EQUATES.txt b/SYSPROG/STPROCINS/MVBFS_EQUATES.txt new file mode 100644 index 0000000..4f8d4a1 --- /dev/null +++ b/SYSPROG/STPROCINS/MVBFS_EQUATES.txt @@ -0,0 +1,195 @@ +Compile insert MVBFS_EQUATES + +* 10-12-11 rjc/bzs Created +* 03-13-12 rjc Added ReadU, WriteRelease +* 04-26-12 rjc Add scopes for credentials +* 07-05-12 rjc Add list_volumes +* 05-25-17 rjc Add mvbfs_handle_delim. +* 05-10-19 rjc Add timeout property +* 08-07-19 rjc Add timeout +* 08-19-19 rjc Add credetial_params, labeels, iconvs +* 08-18-20 bzs Add new omni call for reading active list + +Equ BFS$ To "MVBFS" + +* Property Caches ( RTI_HASHTABLE ) +equ MVBFS_TABLES$ to "MVBFS_TABLES" ; * table specific properites, key is tablename +equ MVBFS_VOLUMES$ to "MVBFS_VOLUMES" ; * volume specific properites, key is volname +equ MVBFS_Connections$ To "MVBFS_CONNECTIONS" ; * ado connection object for a volume, key is volname + +* Structure of File handle +Equ Mvbfs_handle_delim$ To \F7\ +EQU MVBFS_HANDLE_REALHANDLE$ TO 1 ;* LH handle, populated for a dict, null for a data file +EQU MVBFS_HANDLE_OINAME$ TO 2 ;* Native name +EQU MVBFS_HANDLE_NATIVENAME$ TO 3 ;* Native name +EQU MVBFS_HANDLE_VOLNAME$ TO 4 ;* volume name + +/* +EQU MVBFS_HANDLE_OINAME$ TO 1 ;* oi name of the file +EQU MVBFS_HANDLE_NATIVENAME$ TO 2 ;* Native name +EQU MVBFS_HANDLE_VOLNAME$ TO 3 ;* volume name +*/ + +* Scopes +Equ CREDENTIAL_SCOPE_APPUSER$ To "APP+USER" +Equ CREDENTIAL_SCOPE_USER$ To "USER" +Equ CREDENTIAL_SCOPE_APP$ To "APP" +Equ CREDENTIAL_SCOPE_GLOBAL$ To "GLOBAL" +Equ CREDENTIAL_SCOPES$ To "APP+USER USER APP GLOBAL" +Equ USERNAME$ To "USERNAME" +Equ PASSWORD$ To "PASSWORD" +Equ RESOLVED_CREDENTIALS$ To "RESOLVED_CREDENTIALS" + +Equ CREDENTIAL_PARAMS$ To Username$:@vm:password$ +Equ CREDENTIAL_LABELS$ To "Username":@vm:"Password" +Equ CREDENTIAL_ICONVS$ To "":@vm:"" +Equ CREDENTIAL_DESCRIPTIONS$ To "UserName" | + :@vm: "Password" + +* Structure of credential info +Equ credential_pos_id$ To 1 +Equ credential_pos_id_scope$ To 1 +Equ credential_pos_id_app$ To 2 +Equ credential_pos_id_user$ To 3 +Equ credential_pos_method$ To 2 +Equ credential_pos_value$ To 3 +Equ credential_pos_encryptor$ To 4 + + + +* Methods +Equ auth_method_literal$ To 'LITERAL' +Equ auth_method_prompt$ To 'PROMPT' +Equ auth_method_custom$ To 'CUSTOM' +Equ auth_methods$ To 'LITERAL PROMPT CUSTOM' + +Equ MVBFS_rec_not_found$ To 202 + +* Structure of cached info in table info +* table info is just %fields% with some added NATIVE info +*table_info = tableid:@fm:table_Name:@fm:is_dict:@fm:is_bang:@fm:handler:@fm:volname:@fm:oi_colnames:@fm:native_colnames:@fm:native_tablename +Equ mvbfs_tbl_tableId$ To 1 +Equ mvbfs_tbl_tableName$ To 2 +Equ mvbfs_tbl_isDict$ To 3 +Equ mvbfs_tbl_isBang$ To 4 +Equ mvbfs_tbl_handler$ To 5 +Equ mvbfs_tbl_volname$ To 6 +Equ mvbfs_tbl_oiColnames$ To 7 +Equ mvbfs_tbl_nativeColnames$ To 8 +Equ mvbfs_tbl_nativeTablename$ To 9 + +/* +equ MVBFS_Vol_Name$ to 30 ; * name of the volume that owns the table +equ MVBFS_NATIVE_Name$ to 31 ; * name of the NATIVE table +equ MVBFS_NATIVE_ColNames$ to 32 ; * name of the NATIVE table +equ MVBFS_NATIVE_HANDLE$ To 33 ; * server handle assigned upon open +*/ +* Structure of cached vol info +*vol_info = vol_name:@fm:handler:@fm:platform:@fm:credentials +Equ mvbfs_vol_volname$ To 1 +Equ mvbfs_vol_handler$ To 2 +Equ mvbfs_vol_platform$ To 3 +Equ mvbfs_vol_credentials$ To 4 +Equ mvbfs_vol_ShadowLoc$ To 5 + +* ---- +* Layout of SYSPTR Volume definition +* ---- +* items 1-6 are OI standard for any BFS, beyond that is BFS specific +/* +* Standard definitions used by RTP49 +EQU VOL_PTR_TOKEN$ TO 1 +EQU VOL_PTR_FS$ TO 2 +EQU VOL_PTR_LOCATION$ TO 3 +EQU VOL_PTR_CONTROL$ TO 4 +*/ +Equ MVBFS_Volume$ to 1 ; * the literal "VOLUME" +Equ MVBFS_BfsType$ to 2 ; * the literal "MVBFS" +Equ MVBFS_ControlLoc$ to 3 ; * <1,1> = SYSPTR ID; <1,2> = PLATFORM +Equ MVBFS_Shadow_loc$ to 4 ; * Location of the shadow dictionaries +Equ MVBFS_Override_loc$ to 5 ; * Name of the volume +Equ MVBFS_ConnectParams$ to 6 ; * Associated sub-list of connection parameter values +Equ MVBFS_RefreshTimeStamp$ to 13 ; * last time the list of tables was refreshed + + +* controlLoc subfields +Equ MVBFS_Ctl_Id$ To 1 ; * id of the sysptr record +Equ MVBFS_Ctl_Platform$ To 2 ; * platform + + + + +* rjc 01-30-08 +* Dict Update Modes +* Control whether the bond will automatically Write changes From Server dict To shadow dict Or vice versa +* Notes: +* 1. Changes To symbolic columns In the shadow dict are never copied To the server +* 2. When OI creates a new Shadow dict, it will always create columns regardless of settings +* 3. CopyTable fs will copy colums To server regardless of settings +* +equ MVBFS_ServerDict_UpdateMode$ to 10 ; * Do we update the server dict when shadow dict changes? +equ MVBFS_ShadowDict_UpdateMode$ to 11 ; * Do we update the client dict when the server dict changes? + +Equ UpdateMode_InsertUpdate$ To 0 ; * New And changed columns replicated. Overwrite existing columns +Equ UpdateMode_InsertOnly$ To 1 ; * Only new columns replicated. Do not overwrite existing columns +Equ UpdateMode_NoWrite$ To 2 ; * Do Not Write To foreign dict + +Equ MVBFS_Password_key$ to "RFGXRM3AD2AC0F0B5" + + +equ mvbfs_Server_plugin_prefix$ to "RTI_MVBFS_SERVER_PLUGIN_" + +* OMNISCRIPT calls - Some of the meta functions are implemented as omniscript calls +* start the numbering at 100 to skip over other RTP57 uses of omniscript +Equ mvbfs_OmniGetServerTables$ To 110 ; * List the tables on the server +Equ mvbfs_OmniGetServerColumns$ To 111 ; * List the columns for a table on the server +Equ mvbfs_OmniGetColumnProperties$ To 112 ; * Get properties of a column on the server +Equ mvbfs_OmniSetVolSync$ To 113 ; * Set the Volume level synchronization info, e.g write all changes, write new cols ,write-none +Equ mvbfs_OmniGetVolSync$ To 114 ; * Get the Volume level synchronization info +Equ mvbfs_OmniSetTableSync$ To 115 ; * Set the Table level synchronization info, e.g. specific columns, or literal-only +Equ mvbfs_OmniGetTableSync$ To 116 ; * Get the Volume level synchronization info +Equ mvbfs_OmniGetPlatform$ To 117 ; * get the platform For this volume +Equ mvbfs_OmniSetParam$ To 118 ; * add / update a username password pair in the session +Equ mvbfs_OmniWriteParam$ To 119 ; * add / update a username password pair in the "wallet" ( and the session) +Equ mvbfs_OmniLinkTable$ To 120 ; * Attach a table - creates the media pointers +Equ mvbfs_OmniUnLinkTable$ To 121 ; * Detach a table - deletes the media pointers +Equ mvbfs_OmniMakeShadowColumns$ To 122 ; * Map columns for a table +Equ mvbfs_OmniGetVolumes$ To 123 ; * List the volumes defined for this bfs, optional filter on platform +Equ mvbfs_OmniExecute$ To 124 ; * Execute a TCL command +Equ mvbfs_OmniCallSub$ To 125 ; * Call a subrooutine +Equ mvbfs_OmniCompileBasic$ To 126 ; * Compile a subroutine ( h = volname, n = filename, f= omniscript r = rowId +Equ mvbfs_OmniCalculate$ To 127 ; * Like CalculateEx. Have the server calculate a column value. +Equ mvbfs_OmniIconv$ To 128 ; * Iconv at server +Equ mvbfs_OmniOconv$ To 129 ; * Oconv at server +Equ mvbfs_OmniGetParam$ To 130 ; * get a connection string parameter +Equ mvbfs_OmniReadUAllowed$ To 131 ; * Return true if ReadU / WriteRelease are supported +Equ mvbfs_OmniReadU$ To 132 ; * Native ReadU call +Equ mvbfs_OmniWriteRelease$ To 133 ; * Native Write Call, will release the lock +Equ mvbfs_OmniAddCredential$ To 134 ; * Add an oi To 1host user login +Equ mvbfs_OmniRemoveCredential$ To 135 ; * Remove an oi To host user login +Equ mvbfs_OmniTransactionBegin$ To 136 ; * Begin a transaction +Equ mvbfs_OmniTransactionCommit$ To 137 ; * Commit a transaction +Equ mvbfs_OmniTransactionRollBack$ To 138 ; * Roll back a transaction +Equ mvbfs_OmniSetUser$ To 139 ; * Activate the credentials for the curent user. Need to detach / attach if the credentials change +Equ mvbfs_OmnigetUser$ To 140 ; * Activate the credentials for the curent user. Need to detach / attach if the credentials change +Equ mvbfs_OmniTransactionStatus$ To 141 ; * Get the current transaction status +Equ mvbfs_OmniGetDatasections$ To 142 ; * Look up the names of multlevel data tables in the table +Equ mvbfs_OmniListVolumes$ To 143 ; * Return an array of defined volumes and their connection status +Equ mvbfs_OmniRelease$ To 144 ; * Release a READU lock +Equ mvbfs_OmniEnablePooling$ To 145 ; * Enable pooling Connections +Equ mvbfs_OmniDisablePooling$ To 146 ; * Disable pooling Connections +Equ mvbfs_OmniSetAdditionalProperty$ To 147 ; * pass-through a property setting. User is responsible for setting a valid property. ( e.g. Timeout) +Equ mvbfs_OmniGetMediaHandle$ To 149 ; * return the media handle for a volumename, even if it is not attached yet +Equ mvbfs_OmniAnalyzeFile$ To 150 ; * return some file statistics +Equ mvbfs_OmniretrieveConnectionString$ To 151 ; * assemble the platfrom specific parameters into a connection string +Equ mvbfs_OmniStoreConnectionString$ To 152 ; * split the connection string into platfrom specific parameters in the paramcache +Equ mvbfs_OmniGetParamNames$ To 153 ; * Get the list of connection string parameter names +Equ mvbfs_OmniCatalogBasic$ To 154 ; * Catalog a compiled Program +Equ mvbfs_OmniUnCatalogBasic$ To 155 ; * UnCatalog a compiled Program +Equ mvbfs_OmniGetConnectionStatus$ To 156 ; * returns true if connected to server +Equ mvbfs_OmniConnect$ To 157 ; * returns true if connected to server +Equ mvbfs_OmniReadActiveList$ To 158 ; * returns list of keys in an active select list + +common /mvbfs_Com/volCache%, tableCache%, selected_ids%,select_bys%,paramcache%, connCache%,extra3% + +Declare Subroutine MVBFS diff --git a/SYSPROG/STPROCINS/MVBFS_HANDLER_QM_EQUATES.txt b/SYSPROG/STPROCINS/MVBFS_HANDLER_QM_EQUATES.txt new file mode 100644 index 0000000..c96e764 --- /dev/null +++ b/SYSPROG/STPROCINS/MVBFS_HANDLER_QM_EQUATES.txt @@ -0,0 +1,29 @@ +Compile Insert MVBFS_HANDLER_QM_EQUATES +* Equates specific to the QM mvbfs connector + +* 06-13-19 rjc Add connectionsting params, labels, descriptions + +Equ HOSTNAME$ To "HOSTNAME" +Equ SERVERPORT$ To "SERVERPORT" +Equ APPLICATION$ To "APPLICATION" + + +Equ CONNECTION_STRING_PARAMS$ To hostname$:@vm:serverport$:@vm:application$ +Equ CONNECTION_STRING_LABELS$ To "Server":@vm:"Port" :@vm:"Account" +Equ CONNECTION_STRING_ICONVS$ To "" :@vm:"MD0" :@vm:"" +Equ CONNECTION_STRING_DESCRIPTIONS$ To "The name or ip address of the server" | + :@vm: "The ip port" | + :@vm: "The qm account you want to link to"| + + | + +Equ QM_COM_OBJECT$ To "OIBFSHelper_10_2.OI4QM" + + +* execute status +equ SV_OK$ to 0 ;* Action successful +equ SV_ON_ERROR$ To 1 ;* Action took ON ERROR clause +equ SV_ELSE$ to 2 ;* Action took ELSE clause +equ SV_ERROR$ to 3 ;* Action failed. Error text available +equ SV_LOCKED$ to 4 ;* Action took LOCKED clause +equ SV_PROMPT$ to 5 ;* Server requesting input diff --git a/SYSPROG/STPROCINS/MVBFS_HANDLER_TGBFS_EQUATES.txt b/SYSPROG/STPROCINS/MVBFS_HANDLER_TGBFS_EQUATES.txt new file mode 100644 index 0000000..dab2069 --- /dev/null +++ b/SYSPROG/STPROCINS/MVBFS_HANDLER_TGBFS_EQUATES.txt @@ -0,0 +1,28 @@ +Compile Insert MVBFS_HANDLER_TGBFS_EQUATES + +* Equates specific to the D3 mvbfs connector + +* 06-13-19 rjc Add connectionsting params, labels, descriptions + +Equ HOSTNAME$ To "HOSTNAME" +Equ SERVERPORT$ To "SERVERPORT" +*Equ USERNAME$ To "USERNAME" +*Equ PASSWORD$ To "PASSWORD" +Equ APPLICATION$ To "APPLICATION" +Equ CONNECTION_STRING_PARAMS$ To hostname$:@vm:SERVERPORT$:@vm:APPLICATION$ +Equ CONNECTION_STRING_LABELS$ To "Server":@vm:"Port" :@vm:"Account" +Equ CONNECTION_STRING_ICONVS$ To "" :@vm:"MD0" :@vm:"" +Equ CONNECTION_STRING_DESCRIPTIONS$ To "The name or ip address of the server" | + :@vm: "The ip port" | + :@vm: "The U2 account you want to link to"| + +Equ TGBFS_COM_OBJECT$ To "OIBFSHelper_10_2.OI4TL" + + +* execute status +equ SV_OK$ To 0 ;* Action successful +equ SV_ON_ERROR$ To 1 ;* Action took ON ERROR clause +equ SV_ELSE$ to 2 ;* Action took ELSE clause +equ SV_ERROR$ to 3 ;* Action failed. Error text available +equ SV_LOCKED$ to 4 ;* Action took LOCKED clause +equ SV_PROMPT$ to 5 ;* Server requesting input diff --git a/SYSPROG/STPROCINS/MVBFS_HANDLER_U2_EQUATES.txt b/SYSPROG/STPROCINS/MVBFS_HANDLER_U2_EQUATES.txt new file mode 100644 index 0000000..a31fa18 --- /dev/null +++ b/SYSPROG/STPROCINS/MVBFS_HANDLER_U2_EQUATES.txt @@ -0,0 +1,50 @@ +Compile Insert MVBFS_HANDLER_U2_EQUATES +* Equates specific to the U2 mvbfs connector + +* 06-13-19 rjc Add connectionsting params, labels, descriptions + +Equ HOSTNAME$ To "HOSTNAME" +Equ SERVERPORT$ To "SERVERPORT" +Equ SERVERSERVICE$ To "SERVICENAME" +Equ POOLING$ To "POOLING" ; * 08-29-12 rjc +Equ MINPOOL$ To "MINPOOL" +Equ MAXPOOL$ To "MAXPOOL" +Equ TIMEOUT$ To "TIMEOUT" ; * 05-19-19 rjc + +*Equ USERNAME$ To "USERNAME" +*Equ PASSWORD$ To "PASSWORD" +Equ APPLICATION$ To "APPLICATION" + + +* Connection specific params +* The dsn will ask for these in order to build the propery panel +Equ CONNECTION_STRING_PARAMS$ To hostname$ :@vm:SERVERPORT$:@vm:APPLICATION$:@vm:SERVERSERVICE$:@vm:POOLING$:@vm:MINPOOL$:@vm:MAXPOOL$:@vm:TIMEOUT$ +Equ CONNECTION_STRING_LABELS$ To "Server":@vm:"Port" :@vm:"Account":@vm:"ServerService":@vm:"Connection Pooling":@vm:"Minimum Pool":@vm:"Maximum Pool":@vm:"Connection Timeout" +Equ CONNECTION_STRING_ICONVS$ To "" :@vm:"MD0" :@vm:"" :@vm:"" :@vm:"(B)" :@vm:"MD0" :@vm:"MD0" :@vm:"MD0" +Equ CONNECTION_STRING_DESCRIPTIONS$ To "The name or ip address of the U2 server" | + :@vm: "server port" | + :@vm: "The U2 account you want to link to"| + :@vm: "The server service" | + :@vm: "Use connection pooling the Pooling flag is checked true" | + :@vm: "Minimum pool size" | + :@vm: "Maximum pool size" | + :@vm: "Seconds to wait before timing out the connection" + +Equ U2U_COM_OBJECT$ To "OIBFSHelper_10_2.OI4U2U" + + +* execute status +equ SV_OK$ to 0 ;* Action successful +equ SV_ON_ERROR$ To 1 ;* Action took ON ERROR clause +equ SV_ELSE$ to 2 ;* Action took ELSE clause +equ SV_ERROR$ to 3 ;* Action failed. Error text available +equ SV_LOCKED$ to 4 ;* Action took LOCKED clause +equ SV_PROMPT$ to 5 ;* Server requesting input + +/* Uniobject status codes +equ UVS_COMPLETE to 0 //' Execution complete +equ UVS_REPLY to 1 // ' Waiting for a reply +equ UVS_MORE to 2 // ' More data to come +equ UVE_NOERROR to 0 // ' No error +*/ + diff --git a/SYSPROG/STPROCINS/MVBFS_HELPER_EQUATES.txt b/SYSPROG/STPROCINS/MVBFS_HELPER_EQUATES.txt new file mode 100644 index 0000000..8cd051c --- /dev/null +++ b/SYSPROG/STPROCINS/MVBFS_HELPER_EQUATES.txt @@ -0,0 +1,34 @@ +Compile insert MVBFS_HELPER_EQUATES + +Equ CMD_CHECK$ To 0 +Equ CMD_PING$ To 0 +Equ CMD_VOLUME_LIST$ To 1 +Equ CMD_VOLUME_READ$ To 2 +Equ CMD_VOLUME_ATTACH$ To 3 +Equ CMD_VOLUME_DETACH$ To 4 +Equ CMD_VOLUME_DELETE$ To 5 +Equ CMD_VOLUME_SAVE$ To 6 +Equ CMD_SERVER_TABLES$ To 7 +Equ CMD_TABLE_LINK$ To 8 +Equ CMD_TABLE_UNLINK$ To 9 +Equ CMD_CREDENTIALS$ To 10 +Equ CMD_PLATFORMS$ To 11 +Equ CMD_USERNAMES$ To 12 +Equ CMD_WRITECRED$ To 13 +Equ CMD_REMOVECRED$ To 14 +EQU CMD_STATUS_CONNECTION$ TO 15 +Equ CMD_PREFIX$ To 16 +Equ CMD_PROMPTS$ To 17 + +* record layout +EQU PLATFORMDETAILS_FIELD$ To 1 +EQU USER_FIELD$ To 2 +EQU PWD_FIELD$ To 3 +Equ LOGINPROC_FIELD$ To 4 +EQU PLATFORM_FIELD$ To 5 +EQU SHADOW_LOC_FIELD$ To 6 +Equ UNLINKED_TABLES_FIELD$ To 7 +Equ LINKED_TABLES_FIELD$ To 8 +Equ MULTISCAN_FIELD$ To 9 +Equ VOLUMEID_FIELD$ To 10 + diff --git a/SYSPROG/STPROCINS/MYSQL_EQUATES.txt b/SYSPROG/STPROCINS/MYSQL_EQUATES.txt new file mode 100644 index 0000000..00f6b4e --- /dev/null +++ b/SYSPROG/STPROCINS/MYSQL_EQUATES.txt @@ -0,0 +1,211 @@ +Compile Insert MySql_Equates +;*############################################################################### +;*############################################################################### +;* MyVBQL - Visual Basic library to interface with a MySQL database +;* Copyright (C) 2000,2001 icarz, Inc. +;* +;* VBMySQLDirect - Extension of the original MyVBQL library +;* Copyright (C) 2004 Robert Rowe +;* +;* This library is free software; you can redistribute it and/or +;* modify it under the terms of the GNU Library General Public +;* License as published by the Free Software Foundation; either +;* version 2 of the License, or (at your option) any later version. +;* +;* This library is distributed in the hope that it will be useful, +;* but WITHOUT ANY WARRANTY; without even the implied warranty of +;* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +;* Library General Public License for more details. +;* +;* You should have received a copy of the GNU Library General Public +;* License along with this library; if not, write to the Free +;* Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +;* +;*############################################################################### +;*############################################################################### +;* +;* Written by Eric Grau (with additions and changes by Robert Rowe) +;* +;* Please send questions, comments, and changes to robert_rowe@yahoo.com +;* +;*############################################################################### +;*############################################################################### +;* + +equ LONG_SIZE to 4 +equ INT_SIZE to 2 +equ BYTE_SIZE to 1 + + +;*Error Description Constants +equ E40000 to "No Query Specified." +equ E40001 to "A valid Connection object is required to Open a recordset." +equ E40002 to "Connection Closed." +equ E40003 to "Server Error Detected." ;*(Server error appended) +equ E40004 to "Invalid Flush Option." +equ E40005 to "Recordset Closed." +equ E40006 to "Invalid Field Specified." +equ E40007 to "Add/Edit in progress. Call CancelUpdate first." +equ E40008 to "Cannot Add or Delete if source query is based on multiple tables." +equ E40009 to "Could not identify the table to delete from." +equ E40010 to "Could not identify the record to delete. Include the Primary Key in your query." +equ E40011 to "Could not identify the table to update." +equ E40012 to "Could not identify the record to update. Include the Primary Key in your query." +equ E40013 to "Could not identify the table to Insert Into." +equ E40014 to "Cannot Insert new record. You must set the value of at least one field." +equ E40015 to "No Current Record. The requested operation requires a current record and either BOF or EOF are true." +equ E40016 to "No Table specified." +equ E40017 to "Operation not allowed when Connection is opened." +equ E40018 to "Invalid Lock Option." +equ E40019 to "Missing Parameter. The specified Show Type requires a Table Name." +equ E40020 to "Missing Parameter. The specified Show Type requires a User." +equ E40021 to "Invalid Show Option." +equ E40022 to "No Database specified." +equ E40023 to "Operation not allowed when Recordset is opened." +equ E40024 to "Invalid Record Position. The requested position refers to a Deleted record or is greater than RecordCount." +equ E40025 to "Mismatched Number of Elements. FieldList and Values must contain the same number of elements." +equ E40026 to "Invalid Save Option." +equ E40027 to "Invalid Destination File Name." + + + +*Private Type MyOption ;*option variable to send to the server during OpenConnection +* eOption As MYSQL_OPTION +* sArg As String +*End Type + + +;*=============================================================================================== +;*========= connection state enum =============================================================== +;*=============================================================================================== + +*Public Enum MYSQL_CONNECTION_STATE +equ MY_CONN_OPEN to 0 +equ MY_CONN_CLOSED to 1 +*End Enum + +;*=============================================================================================== +;*========= server options enum ================================================================= +;*=============================================================================================== + +*Public Enum MYSQL_OPTION +equ MYSQL_OPT_CONNECT_TIMEOUT to 0 +equ MYSQL_OPT_COMPRESS to 1 +equ MYSQL_OPT_NAMED_PIPE to 2 +equ MYSQL_INIT_COMMAND to 3 +equ MYSQL_READ_DEFAULT_FILE to 4 +equ MYSQL_READ_DEFAULT_GROUP to 5 +equ MYSQL_SET_CHARSET_DIR to 6 +equ MYSQL_SET_CHARSET_NAME to 7 +equ MYSQL_OPT_LOCAL_INFILE to 8 +*End Enum + +;*=============================================================================================== +;*========= connection flags enum =============================================================== +;*=============================================================================================== + +;*Public Enum MYSQL_FLAG +equ CLIENT_LONG_PASSWORD to 1 ;*new more secure passwords +equ CLIENT_FOUND_ROWS to 2 ;*Found instead of affected rows +equ CLIENT_LONG_FLAG to 4 ;*Get all column flags +equ CLIENT_CONNECT_WITH_DB to 8 ;*One can specify db on connect +equ CLIENT_NO_SCHEMA to 16 ;*Don;*t allow database.table.column +equ CLIENT_COMPRESS to 32 ;*Can use compression protocol +equ CLIENT_ODBC to 64 ;*Odbc client +equ CLIENT_LOCAL_FILES to 128 ;*Can use LOAD DATA LOCAL +equ CLIENT_IGNORE_SPACE to 256 ;*Ignore spaces before ;*(;* +equ CLIENT_CHANGE_USER to 512 ;*Support the mysql_change_user() +equ CLIENT_INTERACTIVE to 1024 ;*This is an interactive client +equ CLIENT_SSL to 2048 ;*Switch to SSL after handshake +equ CLIENT_IGNORE_SIGPIPE to 4096 ;*IGNORE sigpipes +equ CLIENT_TRANSACTIONS to 8192 ;*Client knows about transactions +equ CLIENT_RESERVED to 16384 ;*Old flag for 4.1 protocol +equ CLIENT_SECURE_CONNECTION to 32768 ;*New 4.1 authentication +equ CLIENT_MULTI_STATEMENTS to 65536 ;*Enable/disable multi-stmt support +equ CLIENT_MULTI_RESULTS to 131072 ;*Enable/disable multi-results +;*End Enum + +;*=============================================================================================== +;*========= flush types enum ==================================================================== +;*=============================================================================================== + +;*Public Enum MYSQL_FLUSH +equ MY_FLUSH_ALL to 0 +equ MY_FLUSH_HOSTS to 1 +equ MY_FLUSH_LOGS to 2 +equ MY_FLUSH_PRIVILEGES to 3 +equ MY_FLUSH_STATUS to 4 +equ MY_FLUSH_TABLES to 5 +equ MY_FLUSH_TABLES_WITH_READ_LOCK to 6 +;*End Enum + +;*Public Enum MYSQL_LOCKTYPE +equ MY_LOCK_READ to 1 +equ MY_LOCK_READ_LOCAL to 2 +equ MY_LOCK_WRITE to 3 +equ MY_LOCK_LOW_PRIORITY_WRITE to 4 +;*End Enum + +;*Public Enum MYSQL_SHOWTYPE +equ MY_SHOW_DATABASES to 1 +equ MY_SHOW_TABLES to 2 +equ MY_SHOW_COLUMNS to 3 +equ MY_SHOW_INDEX to 4 +equ MY_SHOW_TABLE_STATUS to 5 +equ MY_SHOW_STATUS to 6 +equ MY_SHOW_VARIABLES to 7 +equ MY_SHOW_LOGS to 8 +equ MY_SHOW_PROCESSLIST to 9 +equ MY_SHOW_GRANTS_FOR to 10 +equ MY_SHOW_CREATE_TABLE to 11 +equ MY_SHOW_MASTER_STATUS to 12 +equ MY_SHOW_MASTER_LOGS to 13 +equ MY_SHOW_SLAVE_STATUS to 14 + ;*MY_SHOW_WARNINGS to 15 + ;*MY_SHOW_ERRORS to 16 +equ MY_SHOW_TABLE_TYPES to 17 +equ MY_SHOW_PRIVILEGES to 18 +;*End Enum + +*Public Enum CursorLocationEnum +equ adUseNone to 1 +equ adUseServer to 2 +equ adUseClient to 3 +*End Enum + + + +*connection management routines +declare subroutine mysql_close +declare function mysql_init +declare function mysql_options +declare function mysql_ping +declare function mysql_real_connect + +*status and error-reporting routines +declare function mysql_errno +declare function mysql_error + +*query contruction and execution routines +declare function mysql_query +declare function mysql_select_db + +*string escaping - Added by Robert Rowe - 02/07/04 +declare function mysql_escape_string +declare function mysql_real_escape_string +declare function mysql_real_query + +*result set processing routines +declare subroutine mysql_data_seek +declare subroutine mysql_free_result +declare function mysql_affected_rows +declare function mysql_fetch_field_direct +declare function mysql_fetch_lengths +declare function mysql_fetch_row +declare function mysql_field_count +declare function mysql_info +declare function mysql_insert_id +declare function mysql_num_fields +declare function mysql_num_rows +declare function mysql_store_result +declare function mysql_use_result diff --git a/SYSPROG/STPROCINS/NEWENTITY_EQUATES.txt b/SYSPROG/STPROCINS/NEWENTITY_EQUATES.txt new file mode 100644 index 0000000..54fc6bd --- /dev/null +++ b/SYSPROG/STPROCINS/NEWENTITY_EQUATES.txt @@ -0,0 +1,38 @@ +compile insert NewEntity_Equates + +****************************************************************************** +* +* This program is proprietary and is not to be used by or disclosed +* to others, nor is it to be copied without written permission from +* Revelation Technologies, Inc. +* +* Product : OpenInsight for Workgroups +* Client : Revelation Software +* Version : 3.1 +* +* History : (date, initials, notes) +* 01/16/96 cp Original programmer +* +****************************************************************************** + +declare function NewEntity +declare subroutine NewEntity + +* Item = NewEntity(Mode, List, Default, Title) +* +* Parameters: +* +* Mode - must be NE_MODE_NEW$ +* +* List - @fm-delim'd list of items to display +* +* Default - index into list (defaults to 1) +* +* Title - defaults to "New" +* +* Return value: +* +* Item - the item selected in the list or NULL if nothing selected + +equ NE_MODE_NEW$ to 1 + diff --git a/SYSPROG/STPROCINS/NPHANDLER_EQUATES.txt b/SYSPROG/STPROCINS/NPHANDLER_EQUATES.txt new file mode 100644 index 0000000..2ee06cc --- /dev/null +++ b/SYSPROG/STPROCINS/NPHANDLER_EQUATES.txt @@ -0,0 +1,274 @@ +compile insert npHandler_Equates +/* + ** Copyright (C) 2013-2023 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - (Le Singe de Code) + Date : May 2015 + Purpose : Constants for working with Non procedural event handlers + (a.k.a QuickEvents) + + + Comments + ======== + + This insert replaces the embedded constants in the GetNPHandler and + ExecNpHandler stored procedures. + + + Amended Date Reason + ======= ==== ====== + Mr C 06 Jan 23 Fxed sum shpelling mishtooks + Mr C 18 Jun 20 Added NP_ALLMSGTYPES$ + Mr C 03 Jun 20 Added "Execute a Method" fields + Mr C 30 May 18 Added "Get a Property" fields. + Mr C 01 Sep 17 Added NP_PRIORITYFLAG$ + Mr C 31 Mar 16 Updated comments + Mr C 29 May 15 Added CFG_RTI_IDE_QUICKEVENT_TYPES + Mr C 28 May 15 Added "Ignore if null" flags +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _NPHANDLER_EQUATES_ +#define _NPHANDLER_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // QuickEvent Types + // + // "R" - Repository. Execute a repository method on an entity + // "E" - Event - send an event to a PS object + // "G" - Get Property - get a PS object property + // "P" - Set Property - set a PS object property + // "M" - Exec_Method - execute a PS object method + // "X" - Execute a stored procedure + // "N" - Not set + + equ NP_NOTSETMSGTYPE$ to "N" + equ NP_REPOSMSGTYPE$ to "R" + equ NP_EVENTMSGTYPE$ to "E" + equ NP_GETPROPMSGTYPE$ to "G" + equ NP_PROPMSGTYPE$ to "P" + equ NP_PROCMSGTYPE$ to "X" + equ NP_EXECMETHODMSGTYPE$ to "M" + + equ NP_ALLMSGTYPES$ to "N,R,E,G,P,X,M" + + // Descriptions for these codes can be found in the + // CFG_RTI_IDE_QUICKEVENT_TYPES record described below + +/////////////////////////////////////////////////////////////////////////////// + + // Quickevent structure. + // + // Quickevents are stored in a pair of @svm-delimited values forming an + // AMV in the SYSREPOSWINS structure: + // + // (From OIWIN_EQUATES) + // + // equ POS_EVENT_HANDLER$ to 18 <- QE structures + // equ POS_QEVENTS$ to 19 <- QE Names + // + // (For some reason each of these values has a trailing @svm) + // + // In the SYSREPOSWINEXES structure they are stored in the Semantics + // block instead, still as an AMV pair of @svm delimited lists, again + // with a trailing @svm + // + // equ CS_EVENTS$ to 8 <- QE Names + // equ CS_EVENT_HDLR$ to 9 <- QE structure + // + // Prior to v10 the QE structure was a set of up to 6 @tm delimited values + // but with v10 we have extended this to: + // + // <0,0,0,1> Type + // <0,0,0,2> Message + // <0,0,0,3> Target + // <0,0,0,4> Parameters (@stm delimited) + // <0,0,0,5> Return Target + // <0,0,0,6> Return Message + // <0,0,0,7> Return Type (defaults to "P" for property) + // <0,0,0,8> Return Parameters (@stm delimited) + // <0,0,0,9> Return Flags (@stm delimited) + // <0,0,0,9,1> Ignore if RetVal is null + // <0,0,0,10> Final Type + // <0,0,0,11> Final Message + // <0,0,0,12> Final Target + // <0,0,0,13> Final Parameters (@stm delimited) + // <0,0,0,14> Return Flags (@stm delimited) + // <0,0,0,14,1> Ignore if RetVal is null + // <0,0,0,15> QuickEvent ID (for when it's reloaded back into the designer) - + + equ NP_MSGTYPE$ to 1 + equ NP_MSG$ to 2 + equ NP_TARGET$ to 3 ; // was NP_RECIPIENT$ pre-v10 + equ NP_ARGS$ to 4 + equ NP_RETTARGET$ to 5 ; // was NP_RETCTRL$ pre-v10 + equ NP_RETMSG$ to 6 ; // was NP_RETPROP$ pre-v10 + equ NP_RETTYPE$ to 7 + equ NP_RETARGS$ to 8 + equ NP_RETFLAGS$ to 9 + equ NP_FINALTYPE$ to 10 + equ NP_FINALMSG$ to 11 + equ NP_FINALTARGET$ to 12 + equ NP_FINALARGS$ to 13 + equ NP_FINALFLAGS$ to 14 + equ NP_ID$ to 15 + equ NP_PRIORITYFLAG$ to 16 + + // QE Action Flags - these are @stm delimited + // + // <0,0,0,0,1> If TRUE$ then skip the action if the returned value is null + + equ NP_FL_IGNOREIFNULL$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // QuickEvent config records + // + // These are stored in the SYSENV table with an appID-based key like so: + // + // CFG_RTI_IDE_QUICKEVENTS* + // + // Each record forms a AMV group with the following structure: + // + // <1> QuickEvent ID + // <2> QuickName Name (display name) + // + // <4> Allowed Types + // <5> Allowed Messages + // <6> Allowed Targets + // <7> Default Params + // <8> Config flags: + // <8,n,1> Types is ReadOnly + // <8,n,2> Targets is ReadOnly + // <8,n,3> Params is ReadOnly + // + // <12> Default Return Types + // <13> Default Return Messages + // <14> Default Return Targets + // <15> Default Return Params + // <16> Return Config flags: + // <16,n,1> Return Types is ReadOnly + // <16,n,2> Return Targets is ReadOnly + // <16,n,3> Return Params is ReadOnly + // <16,n,4> Ignore if return value is null + // + // <20> Default Final Types + // <21> Default Final Messages + // <22> Default Final Targets + // <23> Default Final Params + // <24> Final Config flags: + // <24,n,1> Final Types is ReadOnly + // <24,n,2> Final Targets is ReadOnly + // <24,n,3> Final Params is ReadOnly + + equ NP_CFG_TABLE$ to "SYSENV" + equ NP_CFG_ID_PREFIX$ to "CFG_RTI_IDE_QUICKEVENTS*" + + equ NP_CFGPOS_ID$ to 1 + equ NP_CFGPOS_NAME$ to 2 + + equ NP_CFGPOS_TYPES$ to 4 ; // Allowed types (R,E,G,P,X) + equ NP_CFGPOS_MESSAGES$ to 5 ; // Property for "P" type + equ NP_CFGPOS_TARGETS$ to 6 + equ NP_CFGPOS_PARAMS$ to 7 + equ NP_CFGPOS_FLAGS$ to 8 + + equ NP_CFGPOS_RETTYPE$ to 12 ; // Default type (R,E,G,P,X) + equ NP_CFGPOS_RETMESSAGES$ to 13 ; // Property for "P" type + equ NP_CFGPOS_RETTARGETS$ to 14 + equ NP_CFGPOS_RETPARAMS$ to 15 + equ NP_CFGPOS_RETFLAGS$ to 16 + + equ NP_CFGPOS_FINTYPES$ to 20 ; // Default type (R,E,G,P,X) + equ NP_CFGPOS_FINMESSAGES$ to 21 ; // Property for "P" type + equ NP_CFGPOS_FINTARGETS$ to 22 + equ NP_CFGPOS_FINPARAMS$ to 23 + equ NP_CFGPOS_FINFLAGS$ to 24 + + equ NP_CFGPOS_AMV_FIRST$ to NP_CFGPOS_ID$ + equ NP_CFGPOS_AMV_LAST$ to NP_CFGPOS_FINFLAGS$ + + // Flags + + equ NP_CFG_FPOS_TYPES_READONLY$ to 1 + equ NP_CFG_FPOS_MSG_READONLY$ to 2 + equ NP_CFG_FPOS_TARGET_READONLY$ to 3 + equ NP_CFG_FPOS_PARAMS_READONLY$ to 4 + equ NP_CFG_FPOS_IGNOREIFNULL$ to 5 + + // There are three sections to a quickevent config: + // + // Event Action - Starts at field<4> (NP_CFGPOS_TYPES$) + // Return Value - Starts at field<12> (NP_CFGPOS_RETTYPE$) + // Final Action - Starts at field<20> (NP_CFGPOS_FINTYPES$) + // + // Each section has 5 parts that may be set: + // + // Type + // Target + // Message + // Params + // Flags + + equ NP_CFG_SECTIONS$ to 3 + equ NP_CFG_ITEMSPERSECTION$ to 8 ; // 5 fields used, but 8 available + equ NP_CFG_SECTIONS_START$ to NP_CFGPOS_TYPES$ + + // Offsets into each section for each part + equ NP_CFG_SECT_TYPE$ to 0 + equ NP_CFG_SECT_MESSAGE$ to 1 + equ NP_CFG_SECT_TARGET$ to 2 + equ NP_CFG_SECT_PARAMS$ to 3 + equ NP_CFG_SECT_FLAGS$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // QuickEvent TYPE config record + // + // This record is stored in the SYSENV table with a key of: + // + // CFG_RTI_IDE_QUICKEVENT_TYPES + // + // This record describes the default properties to apply to the Target, + // Message and Params, along with a textual description of the type + // + // It is an AMV structured like so: + // + // <1> Type : ( "R","E","P","G","M" or"X" ) + // <2> Description : ( "Execute a repository method", "Send An Event" etc ) + // <3> Message : ( "EXECUTE", or a property name for a "P" type, an event name for an "E" type etc ) + // <4> Target : + // <5> Params : + // <6> Flags : @svm'd list of flags + // <6,n,1> Types is ReadOnly + // <6,n,2> Target is ReadOnly + // <6,n,3> Params is ReadOnly + + equ NP_TYPECFG_TABLE$ to "SYSENV" + equ NP_TYPECFG_ID$ to "CFG_RTI_IDE_QUICKEVENT_TYPES" + + equ NP_CFG_TPOS_TYPES$ to 1 ; // "R","E","G,","P","X" + equ NP_CFG_TPOS_DESCS$ to 2 ; // "Execute a repository method", "Send An Event" etc + equ NP_CFG_TPOS_MESSAGES$ to 3 ; // + equ NP_CFG_TPOS_TARGETS$ to 4 ; // + equ NP_CFG_TPOS_PARAMS$ to 5 ; // + equ NP_CFG_TPOS_FLAGS$ to 6 ; // + + // Flags (NP_CFG_TPOS_FLAGS$ - @svm delimited) + + equ NP_CFG_TFPOS_TYPES_READONLY$ to 1 + equ NP_CFG_TFPOS_TARGETS_READONLY$ to 2 + equ NP_CFG_TFPOS_MSGS_READONLY$ to 3 + equ NP_CFG_TFPOS_PARAMS_READONLY$ to 4 + equ NP_CFG_TFPOS_IGNOREIFNULL$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/O4W2FA_EQUATES.txt b/SYSPROG/STPROCINS/O4W2FA_EQUATES.txt new file mode 100644 index 0000000..2ee6bbd --- /dev/null +++ b/SYSPROG/STPROCINS/O4W2FA_EQUATES.txt @@ -0,0 +1,40 @@ +compile insert O4W2FA_EQUATES + +Declare Function O4WUTIL_OTP + + +Equ O4W_2FA_CFG_ID$ To "CFG_O4W2FA" +Equ O4W_2FA_FIELD_ACTIVE$ To 1 +Equ O4W_2FA_FIELD_ISSUER_NAME$ To 2 +Equ O4W_2FA_FIELD_URL_FRAGMENT$ To 3 +Equ O4W_2FA_FIELD_AUTHENTICATOR_EMAIL_SUBJECT$ To 4 +Equ O4W_2FA_FIELD_AUTHENTICATOR_EMAIL_SUBJECT_DEFAULT$ To "Your OTP authenticator configuration email" +Equ O4W_2FA_FIELD_AUTHENTICATOR_EMAIL_TEXT$ To 5 +Equ O4W_2FA_FIELD_AUTHENTICATOR_EMAIL_TEXT_DEFAULT$ To "Please click on the following link to generate your OTP authenticator software QR code: %1. Scan the QR code with your authenticator software. To log in, please use your existing credentials and this single-use OTP code: %2" +Equ O4W_2FA_FIELD_HOTP$ To 6 +Equ O4W_2FA_FIELD_HASHMODE$ To 7 +Equ O4W_2FA_FIELD_EXPIRING_TIME$ To 8 +Equ O4W_2FA_FIELD_DIGITS$ To 9 +Equ O4W_2FA_FIELD_EMAIL_SUBJECT$ To 10 +Equ O4W_2FA_FIELD_EMAIL_SUBJECT_DEFAULT$ To "Your one-time password challenge" +Equ O4W_2FA_FIELD_EMAIL_TEXT$ To 11 +Equ O4W_2FA_FIELD_EMAIL_TEXT_DEFAULT$ To "Here is your one-time generated password challenge. Please enter it when prompted: %1" + +Equ O4W_2FA_TYPE_NONE$ To 0 +Equ O4W_2FA_TYPE_VALIDATOR$ To 1 +Equ O4W_2FA_TYPE_EMAIL$ To 2 +Equ O4W_2FA_TYPE_ALL$ To 9 + +Equ ACTION_CHECK_STATUS$ To "" +Equ ACTION_GENERATE_KEY$ To "1" +Equ ACTION_GENERATE_URL$ To "2" +Equ ACTION_CHECK_OTP$ To "3" +Equ ACTION_GENERATE_EMAIL$ To "4" +Equ ACTION_CHECK_EMAIL$ To "5" +Equ ACTION_ENROLL$ To "6" +Equ ACTION_DELETE$ To "7" + +Equ ERR_MISSING_UNAME$ To "1" +Equ ERR_MISMATCH_UNAME$ To "2" +Equ ERR_MISSING_UINFO$ To "3" +Equ ERR_ALREADY_CONFIGURED$ To "4" diff --git a/SYSPROG/STPROCINS/O4WADHOCEQUATES.txt b/SYSPROG/STPROCINS/O4WADHOCEQUATES.txt new file mode 100644 index 0000000..fd2c391 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WADHOCEQUATES.txt @@ -0,0 +1,29 @@ +compile insert O4WADHOCEQUATES + +EQU ADHOCVERSION$ TO "1.0" +EQU ADHOC_STUB_CREATEEVENT$ TO "CREATE_SECTION" +EQU ADHOC_STUB_FINISHEVENT$ TO "FINISH_SECTION" +EQU ADHOC_STUB_HEADEREVENT$ TO "HEADER_SECTION" +EQU ADHOC_STUB_LISTEVENT$ TO "LIST_SECTION" +EQU ADHOC_STUB_RESETEVENT$ TO "RESET_SECTION" + +EQU ADHOC_VERSION$ TO 1 +EQU ADHOC_DESCRIPTION$ TO 2 +EQU ADHOC_TITLE$ TO 3 +EQU ADHOC_HEADER$ TO 4 +EQU ADHOC_PERMISSIONS$ TO 5 + +EQU ADHOC_COMMUTER$ TO 6 +EQU ADHOC_MENU$ TO 7 +EQU ADHOC_MODULES$ TO 8 + +EQU ADHOC_O4WFORM$ TO 10 +EQU ADHOC_O4WREPORT$ TO 11 +EQU ADHOC_SECTION_TITLES$ TO 12 + +Equ ADHOC_OPTIONS$ To 15 +Equ ADHOC_OPTIONS_SAMEPAGE$ To "SP" + +EQU ADHOC_STUB$ TO 20 + + diff --git a/SYSPROG/STPROCINS/O4WAPPEQUATES.txt b/SYSPROG/STPROCINS/O4WAPPEQUATES.txt new file mode 100644 index 0000000..0861e69 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WAPPEQUATES.txt @@ -0,0 +1,44 @@ +compile insert O4WAPPEQUATES +* O4W App Equates +Equ AdminFlag$ To 1 +Equ Permissions$ To 2 +Equ ProcedureType$ To 3 +Equ Description$ To 4 +Equ Menu$ To 5 +Equ Template$ To 6 +Equ Command$ To 7 +Equ PromptFor$ To 8 +Equ PromptText$ To 9 +Equ PromptConv$ To 10 +Equ ResultFrom$ To 11 +Equ HTMLWrap$ To 12 +Equ Paginate$ To 13 +Equ Modules$ To 14 +* value 1: modules for procedure definition (including object code) +* value 2: modules for source code +* value 3: modules for debug record +Equ ResponseType$ To 15 +Equ TransientFlag$ To 20 + +Equ PROCEDURETYPE_O4W$ To "" +Equ PROCEDURETYPE_CTO$ To "1" +Equ PROCEDURETYPE_PROC$ To "2" +Equ PROCEDURETYPE_FUNC$ To "3" + +Equ RESULTFROM_CAPTURE$ To "-1" +Equ RESULTFROM_FUNC$ To "0" + +Equ PARAMTYPE_PROC$ To "1" +Equ PARAMTYPE_DATA$ To "2" +Equ PARAMTYPE_CMD$ To "3" + +Equ RESPONSETYPE_HTML$ To "0" +Equ RESPONSETYPE_XML$ To "1" +Equ RESPONSETYPE_TEXT$ To "2" + +Equ WRAPTYPE_NONE$ To "0" +Equ WRAPTYPE_HTML$ To "1" +Equ WRAPTYPE_TEXT$ To "2" +Equ WRAPTYPE_LINK$ To "3" +Equ WRAPTYPE_REDIRECT$ To "4" + diff --git a/SYSPROG/STPROCINS/O4WBRWEQUATES.txt b/SYSPROG/STPROCINS/O4WBRWEQUATES.txt new file mode 100644 index 0000000..d175a5b --- /dev/null +++ b/SYSPROG/STPROCINS/O4WBRWEQUATES.txt @@ -0,0 +1,16 @@ +compile insert O4WBRWEQUATES +* O4W BRW Equates +Equ UNUSED_AdminFlag$ To 1 +Equ Permissions$ To 2 +Equ Allow_Override$ To 3 +Equ Description$ To 4 +Equ Report_Group$ To 5 +Equ Report_Name$ To 6 +Equ Report_PDF_Details$ To 7 + Equ Report_PDF_Details_Owner_PWD$ To 1 + Equ Report_PDF_Details_User_PWD$ To 2 + Equ Report_PDF_Details_Permissions$ To 3 +Equ Assistant_Procedure$ To 8 +Equ Modules$ To 14 +Equ TransientFlag$ To 20 + diff --git a/SYSPROG/STPROCINS/O4WCOMMON.txt b/SYSPROG/STPROCINS/O4WCOMMON.txt new file mode 100644 index 0000000..4b30aa3 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WCOMMON.txt @@ -0,0 +1,36 @@ +compile insert O4WCOMMON + +COMMON /O4WCOMMON/ O4WSuffixHandler%, | +O4WHtmlBody%, O4WHtmlHead%, O4WHtmlScripts%, O4WHtmlSheets%, O4WHtmlStyles%, O4WXml%, O4WHtml%,| +O4WCacheId%, O4WPlugins%, O4WHaveInput%, O4WHtmlFooter% + +COMMON /O4WTABLES/ O4WCurrTable%, O4WHtmlBodyBackup%, O4WHtmlTable%, O4WTableBackup%, O4WTableRow%, O4WTableCol%, O4WTableHead%, O4WTableRowDetails%, O4WTableColDetails% + +common /O4WDIV/ O4WSaveInput%, O4WCurrDiv%, O4WSaveDiv%, O4WSaveResponse% + +common /O4WINPUTS/ O4WControls%, O4WSelectInfo%, O4WCurrListBoxName%, O4WDialogs% + +common /O4WRESPONSE/ O4WInResponse%, O4WResponseBody% + +common /O4WLISTS/ O4WCurrList%, O4WSaveList% + +common /O4W/ O4WInit%, O4WCntr%, O4WCurrStream%, O4WEntity% + +common /O4WGRAPHS/ O4WGraphInfo%, O4WGraphValues%, O4WTickMarks% + +common /O4WMISC/ O4WDispatchRoutine%, O4WVersion%, jQueryParentTheme%, O4WGenericErrors%, O4WRequestFields%, O4WUnnamedStyles%, O4WExtra6%, O4WExtra7%, O4WExtra8%, O4WExtra9% + +Common /o4wlistboxcommon/ defaultEnhance% + +* Internal functions and subroutines +Declare Function O4WI_StyleParse, O4WI_Validate, O4WI_HANDLETABOX, O4WI_SetValue, O4WI_CLEANNAME, o4wi_linksub, o4wi_customattrextract +Declare Function O4WI_LoadTemplate, O4WI_StyleAdd, O4WI_AttrExtract, O4WI_AddValidate, O4WI_POPUP2RPT, O4WI_RELOADOBJECT, O4WI_UPDATEO4WFORM, o4wi_openidhelper +Declare Subroutine O4WI_WrapupInput, O4WI_ClearCommon, O4WI_UncrossStreams, O4WI_LinkSub, O4WI_ADDVALIDATE +Declare Subroutine O4WI_HANDLEUPLOAD, O4WI_SETSESSIONINFO, O4WI_UPDATEO4WFORM + +validTypes = "date":@VM:"time":@VM:"cc":@VM:"zip":@VM:"phone":@VM:"state":@VM:"ss":@VM:"num":@VM:"alpha":@VM:"alphanum":@VM:"range":@VM:"length":@VM:"daterange":@VM:"reset":@vm:"email":@VM:"url":@vm:"verifile":@vm:"user":@vm:"required":@vm:"pattern" +validTypes<2> = "D":@VM:"T":@VM:"C":@VM:"Z":@VM:"P":@VM:"ST":@VM:"S":@VM:"N":@VM:"A":@VM:"AN":@VM:"R":@VM:"L":@VM:"DR":@VM:"RESET":@VM:"E":@VM:"U":@VM:"F":@VM:"SU":@VM:"RQ":@VM:"PA" +validTypes<3> = "Date":@VM:"Time":@VM:"Credit Card":@VM:"Zip Code":@VM:"Phone":@VM:"State":@VM:"Social Security Number":@VM:"Numeric":@VM:"Alphabetic":@VM:"Alphanumeric":@VM:"Range":@VM:"Length":@VM:"Date Range":@VM:"Reset":@vm:"Email":@VM:"URL":@VM:"Table Lookup":@VM:"User Procedure":@VM:"Required":@VM:"Conversion Pattern" +validTypes<4> = "1":@VM:"1":@VM:"1":@VM:"1":@VM:"1":@VM:"1":@VM:"1":@VM:"1":@VM:"1":@VM:"1":@VM:"1":@VM:"1":@VM:"1":@VM:"0":@VM:"1":@VM:"1":@VM:"1":@VM:"1":@VM:"0":@VM:"1" +validTypes<5> = "0":@VM:"0":@VM:"0":@VM:"0":@VM:"0":@VM:"0":@VM:"0":@VM:"0":@VM:"0":@VM:"0":@VM:"2":@VM:"2":@VM:"2":@VM:"0":@VM:"0":@VM:"0":@VM:"1":@VM:"1":@VM:"0":@VM:"0" + diff --git a/SYSPROG/STPROCINS/O4WCONFIGEQUATES.txt b/SYSPROG/STPROCINS/O4WCONFIGEQUATES.txt new file mode 100644 index 0000000..0d693d9 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WCONFIGEQUATES.txt @@ -0,0 +1,93 @@ +compile insert O4WCONFIGEQUATES + +Declare Function RTI_GET_O4WCFG +Equ O4WCONFIG_INHERITED$ To "<>" + +Equ O4WCONFIG_VERSION$ To 1 +Equ O4WCONFIG_UPDATED$ To 2 +Equ O4WCONFIG_DEBUG_KEY$ To 3 + +Equ O4WCONFIG_AUTHORIZE_PROC$ To 5 +Equ O4WCONFIG_PERMISSIONS_PROC$ To 6 +Equ O4WCONFIG_FILTER_PROC$ To 7 +Equ O4WCONFIG_MESSAGE_PROC$ To 8 +Equ O4WCONFIG_LOCK_PROC$ To 9 + +Equ O4WCONFIG_CORE_SCRIPTS$ To 10 +Equ O4WCONFIG_STANDARD_SCRIPTS$ To 11 +Equ O4WCONFIG_GRAPH_SCRIPTS_CODE$ To 12 + Equ GRAPH_SCRIPTS_NONE$ To -1 + Equ GRAPH_SCRIPTS_JQPLOT$ To 0 + Equ GRAPH_SCRIPTS_GOOGLEVIS$ To 1 + Equ GRAPH_SCRIPTS_BOTH$ To 2 +Equ O4WCONFIG_GRAPH_GOOGLE_API_KEY$ To 13 + +Equ O4WCONFIG_TEMP_TABLE$ To 15 +Equ O4WCONFIG_CACHE_TABLE$ To 16 + +Equ O4WCONFIG_DEFAULT_TEMPLATE$ To 20 +Equ O4WCONFIG_DEFAULT_TEMPLATE_M$ To 21 +Equ O4WCONFIG_TEMPLATE_DIR$ To 22 +Equ O4WCONFIG_TEMPLATE_DIR_TYPE$ To 23 + +Equ O4WCONFIG_DEFAULT_MENU_TYPE$ To 25 +Equ O4WCONFIG_DYNAMIC_MENU_FLAG$ To 26 +Equ O4WCONFIG_DYNAMIC_MENU_MIN$ To 27 +Equ O4WCONFIG_DYNAMIC_MENU_MAX$ To 28 + +Equ O4WCONFIG_CODES_NAMES$ To 30 +Equ O4WCONFIG_CODES_DESC$ To 31 +Equ O4WCONFIG_GENERIC_MESSAGES$ To 32 + +Equ O4WCONFIG_DYNAMIC_REPORT_FLAG$ To 35 +Equ O4WCONFIG_DYNAMIC_REPORT_PERMS$ To 36 +Equ O4WCONFIG_DYNAMIC_REPORT_PARENT$ To 37 +Equ O4WCONFIG_DYNAMIC_FORM_PARENT$ To 38 + +Equ O4WCONFIG_BROWSER_NAMES$ To 40 +Equ O4WCONFIG_BROWSER_DESC$ To 41 +Equ O4WCONFIG_BROWSER_MIN$ To 42 +Equ O4WCONFIG_BROWSER_MESSAGE$ To 43 +Equ O4WCONFIG_BROWSER_MESSAGE_TYPE$ To 44 +Equ O4WCONFIG_BROWSER_SCRIPT$ To 45 +Equ O4WCONFIG_BROWSER_CHROMEPLUGIN$ To 46 + + +Equ O4WCONFIG_LOSTFOCUS_DELAY$ To 50 + +Equ O4WCONFIG_FORM_ENGINES$ To 55 + +Equ O4WCONFIG_JQUERY_TYPE$ To 60 +Equ O4WCONFIG_JQUERY_URL$ To 61 +Equ O4WCONFIG_JQUERY_VERSION$ To 62 +Equ O4WCONFIG_JQUERY_THEME$ To 63 + +Equ O4WCONFIG_TABLE_PROC$ To 65 +Equ O4WCONFIG_LOGIN_PROC$ To 66 +Equ O4WCONFIG_RSS_PROC$ To 67 + +Equ O4WCONFIG_MOBILE_JQUERY_TYPE$ To 70 +Equ O4WCONFIG_MOBILE_JQUERY_URL$ To 71 +Equ O4WCONFIG_MOBILE_JQUERY_VERSION$ To 72 +Equ O4WCONFIG_MOBILE_CORE_SCRIPTS$ To 73 +Equ O4WCONFIG_MOBILE_STANDARD_SCRIPTS$ To 74 +Equ O4WCONFIG_MOBILE_JQUERY_BASE_VERSION$ To 75 + +Equ O4WCONFIG_MOBILE_GRAPH$ TO 76 +Equ O4WCONFIG_MOBILE_JQUERY_PRELOAD$ To 77 + +* BZS 032521 +Equ O4WCONFIG_COOKIE_DOMAIN$ To 80 +Equ O4WCONFIG_COOKIE_PATH$ To 81 +Equ O4WCONFIG_COOKIE_SECURE$ To 82 +Equ O4WCONFIG_COOKIE_HTTPONLY$ To 83 +Equ O4WCONFIG_COOKIE_SAMESITE$ To 84 +Equ O4WCONFIG_COOKIE_IGNORE_SANITY_SECURE$ To 85 ;* BZS 041321 +Equ O4WCONFIG_COOKIE_IGNORE_SANITY_PATH$ To 86 ;* BZS 041321 + +* bzs 062422 +Equ O4WCONFIG_MISC_LISTBOX_ENHANCE$ To 90 +Equ O4WCONFIG_MISC_LISTBOX_ENHANCE_VALUE$ To "0" + +Equ Num_Fields_In_Cfg_Rec$ To 90 + diff --git a/SYSPROG/STPROCINS/O4WEQUATES.txt b/SYSPROG/STPROCINS/O4WEQUATES.txt new file mode 100644 index 0000000..4f7cd51 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WEQUATES.txt @@ -0,0 +1,213 @@ +compile insert O4WEQUATES +* named common elements useful to users of O4W + +COMMON /O4WUCOMMON/ O4WSessionId%, O4WSessionInfo%, | + O4WTempFile%, O4WCacheFile%, | + O4WTempFileName%, O4WCacheFileName%, O4WRequest% + +COMMON /o4wmobilecheck/ O4WIsMobile% + +* Subroutine, function declarations for O4W + +* Style definition functions/subroutines +Declare Function O4WColorStyle, O4WTextStyle, O4WTableStyle, O4WLinkStyle, O4WSizeStyle, O4WAttributeStyle, O4WDataStyle +Declare Function O4WRawStyle, O4WPositionStyle, O4WHelpStyle, O4WAlignStyle +Declare Subroutine O4WColorStyle, O4WTextStyle, O4WTableStyle, O4WLinkStyle, O4WSizeStyle, O4WAttributeStyle, O4WDataStyle +Declare Subroutine O4WRawStyle, O4WPositionStyle, O4WHelpStyle, O4WAlignStyle + +* Options functions +Declare Function O4WMarkedOptions, O4WResponseOptions, O4WValidateOptions, O4WTableAdvancedOptions, O4WTablePagerOptions, O4WMobileOptions, O4WMobileButtonOptions, O4WMobileTableOptions, O4WSemanticOptions, O4WUploadBoxOptions +Declare Function O4WTableCellOptions, O4WInputOptions, O4WListboxOptions, O4WHtmlOptions, O4WTableCellStyle, O4WInputboxOptions, O4WTextOptions, O4WMobilePageOptions, O4WFieldsetOptions, O4WGPSCoordinatesOptions + +* Deprecated style functions/subroutines +Declare Function O4WMarkedStyle, O4WResponseStyle, O4WValidateStyle, O4WColors, O4WCellStyle, O4WInputStyle, O4WListboxStyle, O4WI_Escape +Declare Subroutine O4WMarkedStyle, O4WResponseStyle, O4WValidateStyle, O4WColors, O4WCellStyle, O4WInputStyle, O4WListboxStyle + +* Utility functions/subroutines +Declare Function O4WCheckSecurity, O4WCache, O4WGenerateID, O4WCookie, O4WGetValue, O4WEscape, O4WI_FORMATMSG, O4WI_LockHandler, O4WI_ENCRYPT, O4WGetMobile, O4WGetPostValue +Declare Function O4WIsMobileBrowser, O4WTriggerEvent +Declare Subroutine O4WBreadCrumbs, O4WSetBreadCrumb, O4WPopup, O4WPopupReturn, O4WI_FORMATMSG, O4WI_DebugRecord, O4WSetHistory, O4WMsg, O4WSetMobile, O4WI_SetPostValue, O4WGotoPage +Declare Subroutine O4WError, O4WCookie, O4WDownload, O4WRedirect, O4WGotoTab, O4WFocus, O4WMenu, O4WSpecialForm, O4WI_LoadPluginData, O4WI_DOLOGIN, O4WMeta, O4WTriggerEvent + +* Form subroutines +Declare Subroutine O4WForm + +* Response subroutines +Declare Subroutine O4WResponse, O4WChange, O4WUpdate + +* Element/Control subroutines +Declare Subroutine O4WTitle, O4WHeader, O4WFooter, O4WLink, O4WText, O4WFixedText, O4WDivider +Declare Subroutine O4WBreak, O4WSpace, O4WRaw, O4WRawStyle, O4WImage, O4WTabs +Declare Function O4WLink, O4WImage, O4WText, O4WSpace +** Table subroutines +Declare Subroutine O4WTableStart, O4WTableEnd, O4WSetCell, O4WTableHeader, O4WTableModify +Declare Subroutine O4WTableAddRow, O4WTableAddCol, O4WTableDelRow, O4WTableDelCol +** Section subroutines +Declare Subroutine O4WSectionStart, O4WSectionEnd +Declare Function O4WSectionEnd +** List subroutines +Declare Subroutine O4WListStart, O4WListEnd, O4WListItem +** Input control subroutines +Declare Subroutine O4WTextBox, O4WTextArea, O4WButton, O4WImageButton, O4WIconButton, O4WStore, O4WPwdBox, O4WDatePicker, O4WTimePicker, O4WColorPicker +Declare Subroutine O4WCheckBox, O4WRadioButton, O4WListBox, O4WTimer, O4WUploadBox, O4WTABox, O4WNumberBox, o4wtexteditor +Declare Subroutine O4WListboxStart, O4WListboxEnd + +* Plugin/script/stylesheet subroutines +Declare Subroutine O4WQualifyEvent, O4WStyleSheet, O4WScript, O4WPlugin, O4WDialog, O4WPaypal, O4WFacebook, O4WLinkedIn, O4WAddThis, O4WRSSPublish, O4WRSSData, O4WMetaTag +Declare Function O4WPaypal, O4WQualifyEvent + +* Graphics subroutines +Declare Subroutine O4WGraphStart, O4WGraphData, O4WGraphEnd + +Equ LF$ To char(10) +Equ CR$ To char(13) +Equ HTMLDELIM$ To CR$:LF$ +Equ O4W_DEFAULT_FORM_NAME$ To "O4WformBody" +Equ O4W_NULL$ To "<>" +Equ O4W_DEFAULT_DIV$ To "O4WdivDefault" +Equ jqueryTheme$ to "ui-widget ui-widget-content ui-corner-all" +Equ O4W_DYNAMIC_APP$ To "OI_DYNAMIC" +Equ O4W_HEADER_APP$ To "oi_current_application" +Equ O4W_HEADER_ID$ To "oi_current_id" +Equ O4W_DYNAMIC_DIR$ To "o4wDynamicDir" + +Equ O4WMARKER_CORE_SCRIPT_START$ To @FM:"":@FM +Equ O4WMARKER_CORE_SCRIPT_END$ To @FM:"":@FM +Equ O4WMARKER_STANDARD_SCRIPT_START$ To @FM:"":@FM +Equ O4WMARKER_STANDARD_SCRIPT_END$ To @FM:"":@FM +Equ O4WMARKER_SCRIPT_START$ To @FM:"":@FM +Equ O4WMARKER_SCRIPT_END$ To @FM:"":@FM +Equ O4WMARKER_LOADED_SCRIPT_START$ To @FM:"":@FM +Equ O4WMARKER_LOADED_SCRIPT_END$ To @FM:"":@FM +Equ O4WMARKER_LOADED_SCRIPT_SRC_START$ To @FM:"":@FM +Equ O4WMARKER_PLUGIN_START$ To @FM:"":@FM +Equ O4WMARKER_PLUGIN_END$ To @FM:"":@FM +Equ O4WMARKER_STYLESHEET_START$ To @FM:"":@FM +Equ O4WMARKER_STYLESHEET_END$ To @FM:"":@FM +Equ O4WMARKER_INLINE_STYLE_START$ To @FM:"":@FM +Equ O4WMARKER_INLINE_STYLE_END$ To @FM:"":@FM +Equ O4WMARKER_FINAL_SCRIPT_START$ To @fm:"":@FM +Equ O4WMARKER_FINAL_SCRIPT_END$ To @FM:"":@FM + +Equ O4W_LINKTYPE_NORMAL$ To "0" +Equ O4W_LINKTYPE_WEBOI$ To "1" +Equ O4W_LINKTYPE_PROGRAM$ To "2" +Equ O4W_LINKTYPE_FORM$ To "3" +Equ O4W_LINKTYPE_EMAIL$ To "4" +Equ O4W_LINKTYPE_FORM_SEARCH$ To "5" +Equ O4W_LINKTYPE_EMBED$ To "6" +Equ O4W_LINKTYPE_REPORT$ To "7" +Equ O4W_LINKTYPE_LOCAL$ To "8" +Equ O4W_LINKTYPE_OI$ To "9" +Equ O4W_LINKTYPE_POPUP$ To "10" +Equ O4W_LINKTYPE_INDEXLOOKUP$ To "11" +Equ O4W_LINKTYPE_GRAPH$ To "12" +Equ O4W_LINKTYPE_CLICK$ To "13" +Equ O4W_LINKTYPE_LINKEDIN_PROFILE$ To "14" +Equ O4W_LINKTYPE_LINKEDIN_PROFILE_INLINE$ To "15" +Equ O4W_LINKTYPE_LINKEDIN_SHARE$ To "16" +Equ O4W_LINKTYPE_ADHOC$ TO 17 +Equ O4W_LINKTYPE_WYSIWYG$ To 18 +Equ O4W_LINKTYPE_FORM2$ To 18 +Equ O4W_LINKTYPE_PAGE$ To 19 +Equ O4W_LINKTYPE_XLATE$ To 99 + +Equ O4W_VALIDATE_DATE$ To "D" +Equ O4W_VALIDATE_TIME$ To "T" +Equ O4W_VALIDATE_CC$ To "C" +Equ O4W_VALIDATE_ZIP$ To "Z" +Equ O4W_VALIDATE_PHONE$ To "P" +Equ O4W_VALIDATE_STATE$ To "ST" +Equ O4W_VALIDATE_SS$ To "S" +Equ O4W_VALIDATE_NUM$ To "N" +Equ O4W_VALIDATE_ALPHA$ To "A" +Equ O4W_VALIDATE_ALPHANUM$ To "AN" +Equ O4W_VALIDATE_RANGE$ To "R" +Equ O4W_VALIDATE_LENGTH$ To "L" +Equ O4W_VALIDATE_DATERANGE$ To "DR" +Equ O4W_VALIDATE_REQUIRED$ To "RQ" +Equ O4W_VALIDATE_EMAIL$ To "E" +Equ O4W_VALIDATE_URl$ To "U" +Equ O4W_VALIDATE_VERIFILE$ To "F" +Equ O4W_VALIDATE_USER$ To "SU" +Equ O4W_VALIDATE_PATTERN$ To "PA" + +* common graphs +Equ O4W_GRAPH_LINE$ To "lines" +Equ O4W_GRAPH_POINT$ To "points" +Equ O4W_GRAPH_BAR$ To "bars" +Equ O4W_GRAPH_PIE$ To "pie" +Equ O4W_GRAPH_STACKED_LINE$ To "stacked_lines" +Equ O4W_GRAPH_STACKED_BAR$ To "stacked_bars" +Equ O4W_GRAPH_HORIZONTAL_BAR$ To "horizontal_bars" +Equ O4W_GRAPH_STACKED_HORIZONTAL_BAR$ To "stacked_horizontal_bars" +* google visualization ONLY +Equ O4W_GRAPH_PIE_3D$ To "PieChart_3D" +Equ O4W_GRAPH_GAUGE$ To "Gauge" +Equ O4W_GRAPH_MAP$ To "GeoChart" ;* bzs 110216 changed from GeoMap +Equ O4W_GRAPH_INTENSITY_MAP$ To "IntensityMap" +Equ O4W_GRAPH_TABLE$ To "Table" +Equ O4W_GRAPH_AREA$ To "AreaChart" +* bzs 110216 Equ O4W_GRAPH_SPARKLINE$ To "ImageSparkLine" + +* used for google visualization of common graphs +Equ O4W_GV_GRAPH_LINE$ To "LineChart" +Equ O4W_GV_GRAPH_POINT$ To "ScatterChart" +Equ O4W_GV_GRAPH_BAR$ To "ColumnChart" +Equ O4W_GV_GRAPH_PIE$ To "PieChart" +Equ O4W_GV_GRAPH_STACKED_LINE$ To "LineChart_stacked" +Equ O4W_GV_GRAPH_STACKED_BAR$ To "ColumnChart_stacked" +Equ O4W_GV_GRAPH_HORIZONTAL_BAR$ To "BarChart" +Equ O4W_GV_GRAPH_STACKED_HORIZONTAL_BAR$ To "BarChart_stacked" +Equ O4W_GV_GRAPH_GAUGE$ To "Gauge" +Equ O4W_GV_GRAPH_MAP$ To "GeoChart" ;* bzs 110216 changed from GeoMap +Equ O4W_GV_GRAPH_INTENSITY_MAP$ To "IntensityMap" +Equ O4W_GV_GRAPH_TABLE$ To "Table" +Equ O4W_GV_GRAPH_AREA$ To "AreaChart" +Equ O4W_GV_GRAPH_STACKED_AREA$ To "AreaChart_stacked" +* bzs 110216 Equ O4W_GV_GRAPH_SPARKLINE$ To "ImageSparkLine" +Equ O4W_GV_GRAPH_COMBO$ To "ComboChart" + + +Equ O4W_ESCAPE_HTML$ To "0" +Equ O4W_ESCAPE_URL$ To "1" +Equ O4W_ESCAPE_URL_COMPONENT$ To "3" +Equ O4W_ESCAPE_ID$ To "4" +Equ O4W_ESCAPE_JS$ To "" + +* html5/jquery mobile data role descriptions +Equ O4W_ROLE_PAGE$ To "page" +Equ O4W_ROLE_HEADER$ To "header" +Equ O4W_ROLE_NAVBAR$ To "navbar" +Equ O4W_ROLE_CONTENT$ To "content" +Equ O4W_ROLE_CONTAINER$ To "fieldcontain" +Equ O4W_ROLE_FOOTER$ To "footer" +Equ O4W_ROLE_POPUP$ To "popup" + +* O4W Mobile enhancements +Equ O4W_ROLE_SLIDER$ To "slider" +Equ O4W_ROLE_BUTTON$ To "button" +Equ O4W_ROLE_LISTVIEW$ To "listview" +Equ O4W_ROLE_LIST_DIVIDER$ To "list-divider" + +* O4W Mobile transitions +Equ O4WMOBILE_TRANSITION_SLIDE$ To "slide" +Equ O4WMOBILE_TRANSITION_SLIDEUP$ To "slideup" +Equ O4WMOBILE_TRANSITION_SLIDEDOWN$ To "slidedown" +Equ O4WMOBILE_TRANSITION_POP$ To "pop" +Equ O4WMOBILE_TRANSITION_FADE$ To "fade" +Equ O4WMOBILE_TRANSITION_FLIP$ To "flip" + +* Markers for O4W Mobile orientation +Equ O4WMOBILE_STYLE_PORTRAIT$ To "$mp$" +Equ O4WMOBILE_STYLE_LANDSCAPE$ To "$ml$" + +* Alignment options +Equ O4W_ALIGN_LEFT$ To "0" +Equ O4W_ALIGN_CENTER$ To "1" +Equ O4W_ALIGN_RIGHT$ To "2" + +$Insert O4WMESSAGEEQUATES + +$Insert O4WLOCKEQUATES diff --git a/SYSPROG/STPROCINS/O4WFORMEQUATES.txt b/SYSPROG/STPROCINS/O4WFORMEQUATES.txt new file mode 100644 index 0000000..26d113a --- /dev/null +++ b/SYSPROG/STPROCINS/O4WFORMEQUATES.txt @@ -0,0 +1,261 @@ +compile insert O4WFORMEQUATES +* O4FormEquates +* +Equ CURRENT_FORM_VERSION$ To "O4WINQUIRY" +* +Equ desktopOptionValue$ To 1 +Equ mobileOptionValue$ To 2 +* +Equ FormVersion$ To 1 +Equ LastUpdated$ To 2 +Equ TableName$ To 3 +Equ BGColor$ To 4 +Equ BGImage$ To 5 + +Equ TextColor$ To 6 +Equ LinkColor$ To 7 +Equ VisitedColor$ To 8 +Equ Title$ To 9 +Equ Banner$ To 10 + +Equ Footer$ To 11 +Equ KeyType$ To 12 + + Equ KeyType_Pick$ To "P" + Equ KeyType_Enter$ To "E" + Equ KeyType_Search$ To "S" + Equ KeyType_None$ To "A" + Equ KeyType_OI$ To "O" + +Equ KeyEntryPrompt$ To 13 +* subvalue 1: !, !, +* subvalue 2: dict to use for this key part + + Equ FIRST_SEARCH_FIELD$ To 14 + +Equ KeySearchPrompt$ To 14 + + +Equ SearchFields$ To 15 +Equ SearchType$ To 16 +* SearchType$, each.field,1 = type +* SearchType$, each.field,2 = comparison operator +* SearchType$, each.field,3 = skip if null +* SearchType$, each.field,4 = multiple select +* SearchType$, each.field,5 = maximum number of listbox items to display (if indexed field) (default ("") is all; negative number means do not show ANY if this number is exceeded) +* SearchType$, each.field,6 = sort direction (1=reverse) (if indexed field) + + Equ LAST_SEARCH_FIELD$ To 16 + +Equ SearchSub$ To 17 +Equ LinesPerPage$ To 18 + + Equ FIRST_SELECT_FIELD$ To 19 + +Equ SearchDisplayFields$ To 19 +Equ SearchDisplayLabels$ To 20 + * subvalue 1: label text + * subvalue 2: label (column) width + +Equ SearchDisplayLabelsBG$ To 21 +Equ SearchDisplayLabelsFG$ To 22 + + Equ LAST_SELECT_FIELD$ To 22 + +Equ AddOK$ To 23 + + Equ AddOK_User$ To "U" + Equ AddOK_Date$ To "Y" + Equ AddOK_DateTime$ To "D" + Equ AddOK_Sub$ To "S" + Equ AddOK_Counter$ To "C" + Equ AddOK_None$ To "N" + +Equ NewKeySub$ To 24 +Equ CounterKeyDetails$ To 25 + +Equ UpdateDisplayFlag$ To 26 + + Equ UpdateDisplayFlag_Update$ To "U" + Equ UpdateDisplayFlag_Display$ To "D" + +Equ HandleEvents$ To 27 +Equ CommuterModuleName$ To 28 +Equ FormEventFlags$ To 29 + Equ PREREAD_EVENT$ To 1 + Equ POSTREAD_EVENT$ To 2 + Equ PREWRITE_EVENT$ To 3 + Equ POSTWRITE_EVENT$ To 4 + Equ PREDELETE_EVENT$ To 5 + Equ POSTDELETE_EVENT$ To 6 + Equ SELECT_EVENT$ To 7 + Equ TAB_EVENT$ To 8 + Equ POPUP_EVENT$ To 9 + Equ POSTDRAW_EVENT$ To 10 + Equ FORM_CREATE_EVENT$ To 11 + Equ FORM_READY_EVENT$ To 12 + Equ BUILDCOMMUTER_TEMP$ To 20 ;* value 20=build commuter module shell (TEMPORARY) +Equ DeleteOK$ To 30 + +Equ URL$ To 31 +Equ URLDesc$ To 32 +Equ FormDesc$ To 33 +Equ FrmPermissions$ To 34 +Equ Align$ To 35 + +Equ MenuName$ To 36 +Equ TemplateMain$ To 37 +Equ TableBorder$ To 38 +Equ TransferToForm$ To 39 +Equ TopButtons$ To 40 +Equ AllowRetry$ To 41 +Equ SkipAddButton$ To 42 +Equ KeyParts$ To 43 +Equ SkipSaveOK$ To 44 + * value 1: flag to skip save message + * value 2: url to redirect to after save + * : <>, <> explicit values allowed + * value 3: target for URL + * : <> allowed + + Equ FIRST_DISPLAY_FIELD$ To 45 + +Equ Attr$ To 45 +Equ LabelName$ To 46 +Equ LabelColor$ To 47 +Equ LabelBGColor$ To 48 +Equ ValueMV$ To 49 +Equ ValueEditable$ To 50 + +Equ ValueOConv$ To 51 +Equ ValueIConv$ To 52 +* subvalue 1: conversion code (or "-" for use dict) +* subvalue 2: validation code +* subvalue 3: required flag +* subvalue 4: validation param 1 +* subvalue 5: validation param 2 +* subvalue 6: special conversion (U=uppercase, L=lowercase) +Equ ValueBold$ To 53 +Equ ValueItalic$ To 54 +Equ ValueInputType$ To 55 + + Equ ValueInputType_TABox$ To "A" + Equ ValueInputType_Button$ To "B" + Equ ValueInputType_Check$ To "C" + Equ ValueInputType_DatePicker$ To "D" + Equ ValueInputType_Upload$ To "E" + Equ ValueInputType_Hidden$ To "H" + Equ ValueInputType_Timepicker$ To "I" + Equ ValueInputType_Textarea$ To "M" + Equ ValueInputType_DDCombo$ To "N" + Equ ValueInputType_ColorPicker$ To "O" + Equ ValueInputType_Password$ To "P" + Equ ValueInputType_Radio$ To "R" + Equ ValueInputType_Combo$ To "S" + Equ ValueInputType_Textbox$ To "T" + + Equ NonTextInputTypes$ To "ACNRS" + +Equ ValueAssoc$ To 56 +Equ ValueTab$ To 57 +Equ ValueInputDetails$ To 58 + + Equ ValueInputDetails_CodeFile$ To "1" + Equ ValueInputDetails_CodeRec$ To "2" + Equ ValueInputDetails_Prog$ To "3" + * Values 4+ are 'standard codes', derived from O4WCONFIG STANDARD_CODES record + *Equ ValueInputDetails_MF$ To "4" + *Equ ValueInputDetails_TF$ To "5" + *Equ ValueInputDetails_States$ To "6" + *Equ ValueInputDetails_YN$ To "7" + +Equ ValueInputMod$ To 59 +Equ ValueTranslateTo$ To 60 + +Equ ValueTranslateFld$ To 61 +Equ LabelAlign$ To 62 +Equ ValueLabelPos$ To 63 + + Equ ValueLabelPos_SideBySide$ To "0" + Equ ValueLabelPos_LabelOverValue$ To "1" + +Equ ValueColor$ To 64 +Equ ValueBGColor$ To 65 + +Equ ValueAlign$ To 66 +Equ ValueInputSize$ To 67 +Equ LabelFont$ To 68 +Equ ValueFont$ To 69 +Equ ValueAddl$ To 70 + +Equ ValueDefault$ To 71 +Equ ValueEventFlag$ To 72 + * subvalue 1:getfocus + * subvalue 2:lostfocus + * subvalue 3:changed + Equ ActionList$ To "call,read,read-forward,write,write-forward,delete,delete-forward,clear,new" + +Equ ValuePopupType$ To 73 +Equ ValuePopupSrc$ To 74 +Equ ValuePopupArgs$ To 75 + +Equ ValuePopupTitle$ To 76 +Equ ValuePopupSize$ To 77 +Equ ValuePopupImage$ To 78 + * subvalue 1:width + * subvalue 2:height + + Equ FIRST_LINK_FIELD$ To 79 + +Equ ValueLinkTo$ To 79 +Equ ValueLinkType$ To 80 + +Equ ValuePicURL$ To 81 + + Equ LAST_LINK_FIELD$ To 81 +Equ ValueIsKey$ To 82 +Equ ValueKeyPart$ To 83 + Equ LAST_DISPLAY_FIELD$ To 83 + +Equ TabButtons$ To 84 +Equ TabNames$ To 85 + +Equ DEFAULT_ASSOC_NAME$ To "o4wdefault" + +Equ AssocNames$ To 86 +Equ ValueGridChangeFlag$ To 87 + + Equ ValueGridChange_AddAtTop$ To 1 + Equ ValueGridChange_AddAtBottom$ To 2 + Equ ValueGridChange_DelAtTop$ To 3 + Equ ValueGridChange_DelAtBottom$ To 4 + Equ ValueGridChange_Ins$ To 5 + Equ ValueGridChange_Del$ To 6 + Equ ValueGridChange_Move$ To 7 + +Equ AssocTableSize$ To 88 +Equ AssocTableBorder$ To 89 +Equ AssocTableZebra$ To 90 + +Equ AssocTableTitle$ To 91 +Equ AssocTableDesc$ To 92 +Equ AssocTableModifiers$ To 93 + +Equ UserFields$ To 94 + +Equ LocationID$ To 95 +Equ LocationInfo$ To 96 +Equ FormMargins$ To 97 +Equ ExtraPlugins$ To 98 +Equ ModuleList$ To 99 + * value 1: modules using this form (and obj code of commuter module, if present) + * value 2: modules using the src code of commuter module + * value 3: modules using the debug record of commuter module + +Equ SystemFlag$ To 100 +Equ RSSLists$ To 101 + * value 1: rss feeds to update on new records + * value 2: rss feeds to update on record delete + * value 3: rss feeds to update on record change + +Equ LAST_FIELD$ To 101 diff --git a/SYSPROG/STPROCINS/O4WFORMEQUATES1.1.txt b/SYSPROG/STPROCINS/O4WFORMEQUATES1.1.txt new file mode 100644 index 0000000..b246885 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WFORMEQUATES1.1.txt @@ -0,0 +1,248 @@ +compile insert O4WFORMEQUATES1.1 +* O4FormEquates +* +Equ CURRENT_FORM_VERSION$ To "O4WINQUIRY1.1" +* +Equ FormVersion$ To 1 +Equ LastUpdated$ To 2 +Equ TableName$ To 3 +Equ BGColor$ To 4 +Equ BGImage$ To 5 + +Equ TextColor$ To 6 +Equ LinkColor$ To 7 +Equ VisitedColor$ To 8 +Equ Title$ To 9 +Equ Banner$ To 10 + +Equ Footer$ To 11 +Equ KeyType$ To 12 + + Equ KeyType_Pick$ To "P" + Equ KeyType_Enter$ To "E" + Equ KeyType_Search$ To "S" + Equ KeyType_None$ To "A" + Equ KeyType_OI$ To "O" + +Equ KeyEntryPrompt$ To 13 + + Equ FIRST_SEARCH_FIELD$ To 14 + +Equ KeySearchPrompt$ To 14 + + +Equ SearchFields$ To 15 +Equ SearchType$ To 16 +* SearchType$, each.field,1 = type +* SearchType$, each.field,2 = comparison operator +* SearchType$, each.field,3 = skip if null +* SearchType$, each.field,4 = multiple select +* SearchType$, each.field,5 = maximum number of listbox items to display (if indexed field) (default ("") is all; negative number means do not show ANY if this number is exceeded) +* SearchType$, each.field,6 = sort direction (1=reverse) (if indexed field) + + Equ LAST_SEARCH_FIELD$ To 16 + +Equ SearchSub$ To 17 +Equ LinesPerPage$ To 18 + + Equ FIRST_SELECT_FIELD$ To 19 + +Equ SearchDisplayFields$ To 19 +Equ SearchDisplayLabels$ To 20 + * subvalue 1: label text + * subvalue 2: label (column) width + +Equ SearchDisplayLabelsBG$ To 21 +Equ SearchDisplayLabelsFG$ To 22 + + Equ LAST_SELECT_FIELD$ To 22 + +Equ AddOK$ To 23 + + Equ AddOK_User$ To "U" + Equ AddOK_Date$ To "Y" + Equ AddOK_DateTime$ To "D" + Equ AddOK_Sub$ To "S" + Equ AddOK_Counter$ To "C" + Equ AddOK_None$ To "N" + +Equ NewKeySub$ To 24 +Equ CounterKeyDetails$ To 25 + +Equ UpdateDisplayFlag$ To 26 + + Equ UpdateDisplayFlag_Update$ To "U" + Equ UpdateDisplayFlag_Display$ To "D" + +Equ HandleEvents$ To 27 +Equ CommuterModuleName$ To 28 +Equ FormEventFlags$ To 29 + Equ PREREAD_EVENT$ To 1 + Equ POSTREAD_EVENT$ To 2 + Equ PREWRITE_EVENT$ To 3 + Equ POSTWRITE_EVENT$ To 4 + Equ PREDELETE_EVENT$ To 5 + Equ POSTDELETE_EVENT$ To 6 + Equ SELECT_EVENT$ To 7 + Equ TAB_EVENT$ To 8 + Equ POPUP_EVENT$ To 9 + Equ POSTDRAW_EVENT$ To 10 + Equ BUILDCOMMUTER_TEMP$ To 20 ;* value 20=build commuter module shell (TEMPORARY) +Equ DeleteOK$ To 30 + +Equ URL$ To 31 +Equ URLDesc$ To 32 +Equ FormDesc$ To 33 +Equ FrmPermissions$ To 34 +Equ Align$ To 35 + +Equ MenuName$ To 36 +Equ TemplateMain$ To 37 +Equ TableBorder$ To 38 +Equ TransferToForm$ To 39 +Equ TopButtons$ To 40 +Equ AllowRetry$ To 41 +Equ SkipAddButton$ To 42 +Equ KeyParts$ To 43 +Equ SkipSaveOK$ To 44 + +Equ FormMargins$ To 45 +Equ ExtraPlugins$ To 46 + + Equ FIRST_DISPLAY_FIELD$ To 50 + +Equ FieldID$ To 50 +Equ SourceTable$ To 51 +Equ Attr$ To 52 +Equ ValueMV$ To 53 +Equ ValueEditable$ To 54 + +Equ ValueOConv$ To 55 +Equ ValueIConv$ To 56 +* subvalue 1: conversion code (or "-" for use dict) +* subvalue 2: validation code +* subvalue 3: required flag +* subvalue 4: validation param 1 +* subvalue 5: validation param 2 +* subvalue 6: special conversion (U=uppercase, L=lowercase) +Equ ValueBold$ To 57 +Equ ValueItalic$ To 58 +Equ ValueInputType$ To 59 + + Equ ValueInputType_NONE$ To "" + Equ ValueInputType_TABox$ To "A" + Equ ValueInputType_Button$ To "B" + Equ ValueInputType_Check$ To "C" + Equ ValueInputType_DatePicker$ To "D" + Equ ValueInputType_Upload$ To "E" + Equ ValueInputType_Hidden$ To "H" + Equ ValueInputType_Timepicker$ To "I" + Equ ValueInputType_Textarea$ To "M" + Equ ValueInputType_DDCombo$ To "N" + Equ ValueInputType_ColorPicker$ To "O" + Equ ValueInputType_Password$ To "P" + Equ ValueInputType_Radio$ To "R" + Equ ValueInputType_Combo$ To "S" + Equ ValueInputType_Textbox$ To "T" + + Equ NonTextInputTypes$ To "ACNRS" + +Equ ValueAssoc$ To 60 +Equ ValueTab$ To 61 +Equ ValueCol$ To 62 +Equ ValueInputDetails$ To 63 + + Equ ValueInputDetails_CodeFile$ To "1" + Equ ValueInputDetails_CodeRec$ To "2" + Equ ValueInputDetails_Prog$ To "3" + * Values 4+ are 'standard codes', derived from O4WCONFIG STANDARD_CODES record + *Equ ValueInputDetails_MF$ To "4" + *Equ ValueInputDetails_TF$ To "5" + *Equ ValueInputDetails_States$ To "6" + *Equ ValueInputDetails_YN$ To "7" + +Equ ValueInputMod$ To 64 + +Equ ValueTranslateTo$ To 65 +Equ ValueTranslateFld$ To 66 +Equ ValueColor$ To 67 +Equ ValueBGColor$ To 68 +Equ ValueAlign$ To 69 + +Equ ValueInputSize$ To 70 +Equ ValueFont$ To 71 +Equ ValueAddl$ To 72 +Equ ValueDefault$ To 73 +Equ ValueEventFlag$ To 74 + * subvalue 1:getfocus + * subvalue 2:lostfocus + * subvalue 3:changed + * subvalue 4:click + +Equ ValueEventAction$ To 75 + * action associated with event: + * '' none + * 'call' + * 'read' + * 'write' + * 'delete' + * 'clear' + * 'new' + Equ ActionList$ To "call,read,read-forward,write,write-forward,delete,delete-forward,clear,new" +Equ ValuePopupType$ To 76 +Equ ValuePopupSrc$ To 77 +Equ ValuePopupArgs$ To 78 +Equ ValuePopupTitle$ To 79 + +Equ ValuePopupSize$ To 80 +Equ ValuePopupImage$ To 81 + * subvalue 1:width + * subvalue 2:height + + Equ FIRST_LINK_FIELD$ To 85 + +Equ ValueLinkTo$ To 85 +Equ ValueLinkType$ To 86 +Equ ValuePicURL$ To 87 + + Equ LAST_LINK_FIELD$ To 89 + +Equ ValueIsKey$ To 90 +Equ ValueKeyPart$ To 91 +Equ ValueClass$ To 92 + Equ LAST_DISPLAY_FIELD$ To 99 + +Equ TabButtons$ To 100 +Equ TabNames$ To 101 + +Equ DEFAULT_ASSOC_NAME$ To "o4wdefault" + +Equ AssocNames$ To 105 +Equ ValueGridChangeFlag$ To 106 + + Equ ValueGridChange_AddAtTop$ To 1 + Equ ValueGridChange_AddAtBottom$ To 2 + Equ ValueGridChange_DelAtTop$ To 3 + Equ ValueGridChange_DelAtBottom$ To 4 + Equ ValueGridChange_Ins$ To 5 + Equ ValueGridChange_Del$ To 6 + Equ ValueGridChange_Move$ To 7 + +Equ AssocTableSize$ To 107 +Equ AssocTableBorder$ To 108 +Equ AssocTableZebra$ To 109 + +Equ AssocTableTitle$ To 110 +Equ AssocTableDesc$ To 111 +Equ AssocTableModifiers$ To 112 +Equ AssocTableCols$ To 113 +Equ AssocTableColSize$ To 114 + +Equ AssocTableClass$ To 115 + +Equ LocationID$ To 120 +Equ LocationInfo$ To 121 + +Equ SystemFlag$ To 130 + +Equ LAST_FIELD$ To 130 diff --git a/SYSPROG/STPROCINS/O4WGRAPHEQUATES.txt b/SYSPROG/STPROCINS/O4WGRAPHEQUATES.txt new file mode 100644 index 0000000..662ce60 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WGRAPHEQUATES.txt @@ -0,0 +1,71 @@ +compile insert O4WGRAPHEQUATES +* O4GraphEquates +* +Equ gLastUpdated$ To 2 +Equ gBGColor$ To 3 +Equ gBGImage$ To 4 +Equ gTextColor$ To 5 + +Equ gLinkColor$ To 6 +Equ gVisitedColor$ To 7 +Equ gTitle$ To 8 +Equ gBanner$ To 9 +Equ gFooter$ To 10 + +Equ gURL$ To 11 +Equ gURLDesc$ To 12 +Equ GraphDesc$ To 13 +Equ GraphPermissions$ To 14 +Equ gAlign$ To 15 + +Equ gMenuName$ To 16 +Equ gTemplateName$ To 17 +Equ RedrawInterval$ To 18 +Equ GraphRows$ To 19 +Equ GraphCols$ To 20 + +Equ TotalGraphs$ To 21 +Equ Modules$ To 22 +Equ gInitializeRoutine$ To 23 + +Equ FIRST_GRAPH_FIELD$ To 30 + +Equ gType$ To 30 + * type of graph - see O4WEQUATES for list of choices +Equ GraphWidth$ To 31 +Equ GraphHeight$ To 32 +Equ Graphtitle$ To 33 +Equ GraphSeries$ To 34 +Equ GraphData$ To 35 + Equ GraphData_FromTable$ To 1 + Equ GraphData_FromProc$ To 2 + Equ GraphData_FromReport$ To 3 + Equ GraphData_FromO4W$ To 4 + Equ GraphData_NULL$ To 5 + Equ GraphData_JustReport$ To 6 + Equ GraphData_JustForm$ To 7 + Equ GraphData_JustBRW$ To 8 + +Equ GraphDataName$ To 36 +Equ GraphDataExtra$ To 37 +Equ GraphDataX$ To 38 +Equ GraphDataY$ To 39 +Equ GraphDataXMods$ To 40 + +Equ GraphDataYMods$ To 41 +Equ gXOptions$ To 42 +Equ gYOptions$ To 43 +Equ gOptions$ To 44 +Equ gAllowDynamic$ To 45 + +Equ gDynamicSort$ To 46 +Equ gDynamicSelFields$ To 47 +Equ gDynamicSelPrompt$ To 48 +Equ gDynamicSelSourceType$ To 49 +Equ gDynamicSelSource$ To 50 + +Equ gDynamicHelp$ To 51 + +Equ gLinkTo$ To 60 +Equ LAST_GRAPH_FIELD$ To 60 +Equ gSystemFlag$ To 100 diff --git a/SYSPROG/STPROCINS/O4WI_DATASTORE_COMMON.txt b/SYSPROG/STPROCINS/O4WI_DATASTORE_COMMON.txt new file mode 100644 index 0000000..9f8a73f --- /dev/null +++ b/SYSPROG/STPROCINS/O4WI_DATASTORE_COMMON.txt @@ -0,0 +1,5 @@ +compile insert O4WI_DATASTORE_COMMON + +Equ O4WI_DATASTORE_NUM_ELEMENTS$ To 20 + +COMMON /O4WI_DATASTORE/ O4WI_DATASTORE_VARS@(O4WI_DATASTORE_NUM_ELEMENTS$), O4WI_DATASTORE_UNIQUEID@ diff --git a/SYSPROG/STPROCINS/O4WLOCKEQUATES.txt b/SYSPROG/STPROCINS/O4WLOCKEQUATES.txt new file mode 100644 index 0000000..81ad057 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WLOCKEQUATES.txt @@ -0,0 +1,29 @@ +compile insert O4WLOCKEQUATES +* +* LockHandler action codes: +* +Equ O4W_LOCKHANDLER_ACTION_READ$ To 0 +Equ O4W_LOCKHANDLER_ACTION_LOCK$ To 1 +Equ O4W_LOCKHANDLER_ACTION_CHECK$ To 2 +Equ O4W_LOCKHANDLER_ACTION_WRITE$ To 3 +Equ O4W_LOCKHANDLER_ACTION_UNLOCK$ To 4 +* +* LockHandler option codes: +* +Equ O4W_LOCKHANDLER_OPTION_LOCK$ To 1 +Equ O4W_LOCKHANDLER_OPTION_UNLOCK$ To 0 +* +* LockHandler Return codes: +* +Equ O4W_LOCKHANDLER_OK$ To 0 +Equ O4W_LOCKHANDLER_NO_LOCK$ To 1 +Equ O4W_LOCKHANDLER_ITEM_CHANGED$ To 2 +Equ O4W_LOCKHANDLER_WRITE_FAILED$ To 3 +* +Equ O4W_LOCKHANDLER_MISSING_ACTION$ To -1 +Equ O4W_LOCKHANDLER_MISSING_THANDLE$ To -2 +Equ O4W_LOCKHANDLER_MISSING_ID$ To -3 +Equ O4W_LOCKHANDLER_MISSING_RECORD$ To -4 +Equ O4W_LOCKHANDLER_MISSING_HANDLE$ To -5 +Equ O4W_LOCKHANDLER_INVALID_ACTION$ To -6 + diff --git a/SYSPROG/STPROCINS/O4WMENUEQUATES.txt b/SYSPROG/STPROCINS/O4WMENUEQUATES.txt new file mode 100644 index 0000000..7180c93 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WMENUEQUATES.txt @@ -0,0 +1,23 @@ +compile insert O4WMENUEQUATES +* O4WMenus record layout + +Equ Template_Name$ To 2 +Equ Permissions$ To 3 +Equ Description$ To 4 +Equ Modules$ To 5 +Equ Preprocess_Proc$ To 6 ;* bzs 110116 + +Equ Type$ To 10 +Equ Text$ To 11 +Equ LinkTo$ To 12 +Equ LinkType$ To 13 +Equ ItemPerms$ To 14 + +Equ RSSFeedName$ To 15 +Equ RSSFeedParams$ To 16 +Equ RSSDisplayText$ To 17 +Equ RSSDisplayImage$ To 18 +Equ RSSDisplayLoc$ To 19 + +Equ SystemFlag$ To 25 + diff --git a/SYSPROG/STPROCINS/O4WMESSAGEEQUATES.txt b/SYSPROG/STPROCINS/O4WMESSAGEEQUATES.txt new file mode 100644 index 0000000..a1407b7 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WMESSAGEEQUATES.txt @@ -0,0 +1,125 @@ +compile insert O4WMESSAGEEQUATES + +Equ O4W_MESSAGE_NO_DELETE_BUTTON$ To "B100" +Equ O4W_MESSAGE_DELETE_BUTTON$ To "B101" +Equ O4W_MESSAGE_GO_BUTTON$ To "B102" +Equ O4W_MESSAGE_ADD_NEW_RECORD_BUTTON$ To "B103" +Equ O4W_MESSAGE_ADD_BUTTON$ To "B104" +Equ O4W_MESSAGE_SAVE_BUTTON$ To "B105" +Equ O4W_MESSAGE_CANCEL_BUTTON$ To "B106" +Equ O4W_MESSAGE_SELECT_BUTTON$ To "B107" +Equ O4W_MESSAGE_DEL_BUTTON$ To "B108" +Equ O4W_MESSAGE_INS_BUTTON$ To "B109" +Equ O4W_MESSAGE_DOWNLOAD_AS_BUTTON$ To "B110" +Equ O4W_MESSAGE_YES_BUTTON$ To "B111" +Equ O4W_MESSAGE_NO_BUTTON$ To "B112" +Equ O4W_MESSAGE_GENERATE_GRAPH_BUTTON$ To "B113" +Equ O4W_MESSAGE_SEARCH_BUTTON$ To "B114" +Equ O4W_MESSAGE_FIRST_RECORD$ To "B115" +Equ O4W_MESSAGE_PREV_RECORD$ To "B116" +Equ O4W_MESSAGE_NEXT_RECORD$ To "B117" +Equ O4W_MESSAGE_LAST_RECORD$ To "B118" +Equ O4W_MESSAGE_BACK$ To "B119" +Equ O4W_MESSAGE_NEXT$ To "B120" + +Equ O4W_MESSAGE_DEFAULT_KEY_PROMPT$ To "D100" +Equ O4W_MESSAGE_DEFAULT_SEARCH_PROMPT$ To "D101" + +Equ O4W_MESSAGE_PERMISSION_DENIED$ To "E100" +Equ O4W_MESSAGE_INVALID_PROCEDURE$ To "E101" +Equ O4W_MESSAGE_NO_ITEM_SPECIFIED$ To "E102" +Equ O4W_MESSAGE_NO_RECORD_SPECIFIED$ To "E103" +Equ O4W_MESSAGE_NOT_ON_FILE$ To "E104" +Equ O4W_MESSAGE_NOT_AVAILABLE$ To "E105" +Equ O4W_MESSAGE_NO_TABLE_FOR_FORM$ To "E106" +Equ O4W_MESSAGE_NO_TABLE$ To "E107" +Equ O4W_MESSAGE_NO_LOCK_RETRY$ To "E108" +Equ O4W_MESSAGE_NO_LOCK_ERROR$ To "E109" +Equ O4W_MESSAGE_ALREADY_ON_FILE$ To "E110" +Equ O4W_MESSAGE_RECORD_CHANGED_RETRY$ To "E111" +Equ O4W_MESSAGE_RECORD_CHANGED_ERROR$ To "E112" +Equ O4W_MESSAGE_NO_COUNTER_FILE$ To "E113" +Equ O4W_MESSAGE_NO_COUNTER_RECORD$ To "E114" +Equ O4W_MESSAGE_INVALID_KEY$ To "E115" +Equ O4W_MESSAGE_NO_SELECTED$ To "E116" +Equ O4W_MESSAGE_LIST_LOST$ To "E117" +Equ O4W_MESSAGE_RETRIEVE_ERROR$ To "E118" +Equ O4W_MESSAGE_INVALID_CALL_ERROR$ To "E119" +Equ O4W_MESSAGE_WRITING_ERROR$ To "E120" +Equ O4W_MESSAGE_COPYING_ERROR$ To "E121" +Equ O4W_MESSAGE_NO_MATCHES$ To "E122" +Equ O4W_MESSAGE_GENERATE_ERROR$ To "E123" +Equ O4W_MESSAGE_COMM_ERROR$ To "E124" +Equ O4W_MESSAGE_MISSING_COMMUTER$ To "E125" + +Equ O4W_MESSAGE_LOGIN_PLEASE$ To "L100" +Equ O4W_MESSAGE_LOGIN$ To "L101" +Equ O4W_MESSAGE_USERNAME$ To "L102" +Equ O4W_MESSAGE_PASSWORD$ To "L103" +Equ O4W_MESSAGE_LOGIN_INVALID$ To "L104" +Equ O4W_MESSAGE_LOGIN_TITLE$ To "L105" +Equ O4W_MESSAGE_LOGOUT_SUCCESSFUL$ To "L106" +Equ O4W_MESSAGE_SIGNON_O4W$ To "L107" +Equ O4W_MESSAGE_SIGNON_OPENID$ To "L108" +Equ O4W_MESSAGE_OPENID_MATCH_TITLE$ To "L109" +Equ O4W_MESSAGE_OPENID_MATCH_DESCRIPTION$ To "L110" +Equ O4W_MESSAGE_OPENID_NEW_ACCOUNT$ To "L111" +Equ O4W_MESSAGE_OPENID_NO_ACCOUNT$ To "L112" + +Equ O4W_MESSAGE_RECORD_DISCARDED$ To "M100" +Equ O4W_MESSAGE_CONFIRM_DELETE$ To "M101" +Equ O4W_MESSAGE_RECORD_UPDATED$ To "M102" +Equ O4W_MESSAGE_RECORD_DELETED$ To "M103" +Equ O4W_MESSAGE_ENTIRE_STRING$ To "M104" +Equ O4W_MESSAGE_INDIVIDUAL_WORDS$ To "M105" +Equ O4W_MESSAGE_NEW_RECORD_ID$ To "M106" +Equ O4W_MESSAGE_OR_CANCEL$ To "M107" +Equ O4W_MESSAGE_CURRENT_PAGE$ To "M108" +Equ O4W_MESSAGE_ROWSPERPAGE$ To "M109" +Equ O4W_MESSAGE_OR$ To "M110" +Equ O4W_MESSAGE_PROCEED$ To "M111" +Equ O4W_MESSAGE_KEY$ To "M112" +Equ O4W_MESSAGE_REPORT_DISPLAY_COUNT$ To "M113" +Equ O4W_MESSAGE_REPORT_DISPLAY_OK$ To "M114" +Equ O4W_MESSAGE_PLEASE_WAIT$ To "M115" +Equ O4W_MESSAGE_GENERATING$ To "M116" +Equ O4W_MESSAGE_BREADCRUMB_SEARCH$ To "M117" +Equ O4W_MESSAGE_BREADCRUMB_SELECT$ To "M118" +Equ O4W_MESSAGE_BREADCRUMB_DISPLAY$ To "M119" +Equ O4W_MESSAGE_PROCESSING_ABORTED$ To "M120" +Equ O4W_MESSAGE_TABLE_PENDING$ To "M121" +Equ O4W_MESSAGE_GOTO$ To "M122" +Equ O4W_MESSAGE_SIMPLE_OR$ To "M123" +Equ O4W_MESSAGE_RESET$ To "M124" +Equ O4W_MESSAGE_EXIT$ To "M125" +Equ O4W_MESSAGE_REPORT_TRUNCATE_COUNT$ To "M126" +Equ O4W_MESSAGE_CONFIRM_DISCARD_CHANGES$ To "M127" + +Equ O4W_MESSAGE_VALIDATE_ERROR$ To "V100" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_REQUIRED$ To "V101" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_DATE$ To "V102" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_TIME$ To "V103" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_SS$ To "V104" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_EMAIL$ To "V105" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_URL$ To "V106" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_ZIP$ To "V107" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_PHONE$ To "V108" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_CC$ To "V109" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_NUMBER$ To "V110" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_ALPHA$ To "V111" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_ALPHANUM$ To "V112" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_RANGE$ To "V113" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_RANGE_LOWER$ To "V114" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_RANGE_UPPER$ To "V115" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_LENGTH$ To "V116" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_LENGTH_LOWER$ To "V117" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_LENGTH_UPPER$ To "V118" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_STATE$ To "V119" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_DATERANGE$ To "V120" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_DATERANGE_LOWER$ To "V121" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_DATERANGE_UPPER$ To "V122" +Equ O4W_MESSAGE_VALIDATION_FIELDNAME$ To "V123" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_VERIFILE$ To "V124" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_USERSUB$ To "V125" +Equ O4W_MESSAGE_VALIDATION_DEFAULT_INVALID_PATTERN$ To "V126" + diff --git a/SYSPROG/STPROCINS/O4WMISCEQUATES.txt b/SYSPROG/STPROCINS/O4WMISCEQUATES.txt new file mode 100644 index 0000000..d1dc2f2 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WMISCEQUATES.txt @@ -0,0 +1,12 @@ +compile insert O4WMISCEQUATES +* LockHandler Return codes: +Equ O4W_LOCKHANDLER_OK$ To 0 +Equ O4W_LOCKHANDLER_NO_LOCK$ To 1 +Equ O4W_LOCKHANDLER_ITEM_CHANGED$ To 2 +Equ O4W_LOCKHANDLER_MISSING_ACTION$ To -1 +Equ O4W_LOCKHANDLER_MISSING_THANDLE$ To -2 +Equ O4W_LOCKHANDLER_MISSING_ID$ To -3 +Equ O4W_LOCKHANDLER_MISSING_RECORD$ To -4 +Equ O4W_LOCKHANDLER_MISSING_HANDLE$ To -5 +Equ O4W_LOCKHANDLER_INVALID_ACTION$ To -6 + diff --git a/SYSPROG/STPROCINS/O4WOPENID.txt b/SYSPROG/STPROCINS/O4WOPENID.txt new file mode 100644 index 0000000..fb44a30 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WOPENID.txt @@ -0,0 +1,85 @@ +compile insert O4WOPENID + +common /openid_endpoints/ provider_info% + +* Config record values +Equ OPENID_CFG_ID$ To "CFG_OPENID" +/* Configurable parameters - read from config file +1. Flag to indicate OpenID should be available (0=no openid, 1=openid 2.0, 2=openid connect) +2. Name of generic OpenID user +3. Login UI Layout (O4W only/O4W then OpenID/OpenID then O4W/OpenID only) +4. Flag to indicate OpenID should ‘match’ O4W users] Flag To indicate OpenID can create new users +5. (Optional) Name of match routine +6. (Optional) Name of DEBUG record to create +10. OpenID Connect Allow text to allow dynamic selection of provider (leave blank if not allowed) +11. OpenID Connect Flag to allow for dynamic registration (1/0 Yes/No) +12. OpenID Connect Application Name (for dynamic registration) +13. OpenID Connect CSS for UI +15. OpenID Connect Provider Name] +16. OpenID Connect Provider Image URL] +17. OpenID Connect Provider style] +18. OpenID Connect Provider Discovery URL] +19. OpenID Connect Provider Authorization Endpoint URL] +20. OpenID Connect Provider Token Endpoint URL] +21. OpenID Connect Provider Registration Endpoint URL] +22. OpenID Connect Provider Registered Client ID] +23. OpenID Connect Provider Registered Client Secret] +24. OpenID Connect Provider Registered Redirect URL] +25. (Optional) Token name used during OpenID2.0 To OpenID Connect migration request (openid2_realm Or openid.realm)] +26. (Optional) Token name used during OpenID2.0 To OpenID Connect migration response (openid2_id Or openid_id)] +*/ +Equ OPENID_CFG_ACTIVE$ To 1 +Equ OPENID_CFG_GENERIC$ To 2 +Equ OPENID_CFG_LAYOUT$ To 3 +Equ OPENID_CFG_OPTIONS$ To 4 +Equ OPENID_CFG_MATCH_ROUTINE$ To 5 +Equ OPENID_CFG_DEBUG$ To 6 +* openid connect (o4wopenid v2) support: +EQU OPENID_CFG_DYNAMIC_SELECTION_PROMPT$ TO 10 +EQU OPENID_CFG_DYNAMIC_REGISTRATION_FLAG$ TO 11 +EQU OPENID_CFG_DYNAMIC_REGISTRATION_APPNAME$ TO 12 +EQU OPENID_CFG_CONNECT_CSS$ TO 13 +EQU OPENID_CFG_PROVIDER_NAME$ TO 15 +EQU OPENID_CFG_PROVIDER_IMG$ TO 16 +EQU OPENID_CFG_PROVIDER_STYLE$ TO 17 +EQU OPENID_CFG_PROVIDER_DISCOVERY_URL$ TO 18 +EQU OPENID_CFG_PROVIDER_AUTHORIZATION_URL$ TO 19 +EQU OPENID_CFG_PROVIDER_TOKEN_URL$ TO 20 +EQU OPENID_CFG_PROVIDER_REGISTRATION_URL$ TO 21 +EQU OPENID_CFG_PROVIDER_CLIENTID$ TO 22 +EQU OPENID_CFG_PROVIDER_SECRET$ TO 23 +EQU OPENID_CFG_PROVIDER_REDIRECT$ TO 24 +Equ OPENID_CFG_MIGRATE$ To 25 +Equ OPENID_CFG_MIGRATE_RESPONSE$ To 26 + +* what calls does the helper routine support? +Equ OPENID_ISACTIVE$ To "1" +Equ OPENID_LOGIN$ To "2" +Equ OPENID_VALIDATE$ To "3" +Equ OPENID_MATCH$ To "4" +Equ OPENID_OPTIONS$ To "5" + +EQU OPENID_ACTIVE_NO$ TO "0" +EQU OPENID_ACTIVE_V1$ TO "1" +EQU OPENID_ACTIVE_CONNECT$ TO "2" +Equ O4W_2FA$ To "2FA" + +* how should we support OpenID? +Equ LOGIN_TYPE_O4W_ONLY$ To 0 +Equ LOGIN_TYPE_O4W_OPENID$ To 1 +Equ LOGIN_TYPE_OPENID_O4W$ To 2 +Equ LOGIN_TYPE_OPENID_ONLY$ To -1 +Equ LOGIN_TYPE_2FA$ To 3 + +* what are the options? +Equ OPTION_TYPE_MATCH$ To 1 +Equ OPTION_TYPE_ADDNEW$ To 2 + + +* Specify some defaults +Equ OPENID_CFG_MATCHROUTINE_DEFAULT$ To "RTI_OPENID_SUPPORT" +Equ OPENID_CFG_LAYOUT_DEFAULT$ To LOGIN_TYPE_O4W_OPENID$ + +Equ OPENID_CONNECT_DISCOVERY_FRAGMENT$ TO ".well-known/openid-configuration" +equ openid_connect_issuer_discovery_fragment$ to ".well-known/webfinger" +equ openid_connect_issuer_discovery_rel$ to "http://openid.net/specs/connect/1.0/issuer" diff --git a/SYSPROG/STPROCINS/O4WREPORTEQUATES.txt b/SYSPROG/STPROCINS/O4WREPORTEQUATES.txt new file mode 100644 index 0000000..e36c061 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WREPORTEQUATES.txt @@ -0,0 +1,171 @@ +compile insert O4WREPORTEQUATES +* O4WReportEquates +* +equ popupOptionValue$ to 1 +equ mobileOptionValue$ to 2 +equ normalOptionValue$ to 3 + +Equ LastUpdated$ To 2 +Equ TableName$ To 3 +Equ BGColor$ To 4 +Equ BGImage$ To 5 + +Equ TextColor$ To 6 +Equ LinkColor$ To 7 +Equ VisitedColor$ To 8 +Equ Title$ To 9 +Equ Banner$ To 10 + +Equ Footer$ To 11 +Equ whichMV$ To 12 +Equ DetSupp$ To 13 +Equ DefaultReturnValue$ To 14 +Equ URL$ To 15 + +Equ URLDesc$ To 16 +Equ GraphType$ To 17 +Equ GraphName$ To 18 +Equ ModuleList$ To 19 + * value 1: modules using this report (and obj code of commuter module, if present) + * value 2: modules using the src code of commuter module + * value 3: modules using the debug record of commuter module + +Equ ReportDesc$ To 20 + +Equ RptPermissions$ To 21 +Equ Align$ To 22 + * 0 = left + * 1 = middle + * 2 = right + * -1 = non-columnar output + Equ NONCOLUMNAR$ To -1 +Equ Paginator$ To 23 +Equ MinCount$ To 24 +Equ MenuName$ To 25 + +Equ LinesPerPage$ To 26 +Equ ShowCount$ To 27 +Equ GrandTotalText$ To 28 +Equ GrandTotalColor$ To 29 +Equ Template_Name$ To 30 + +Equ RunFirst$ To 31 + * first value: RLIST statement to run, or stored procedure (preceded by @) + * second value: stored procedure to run to read each row +Equ OtherTemplate_Name$ To 32 + * first value: template to use when popup + * second value: template to use when mobile +Equ ZebraTable$ To 33 +Equ OtherLinesPerPage$ To 34 + * first value: lines per page when popup + * second value: lines per page when mobile +Equ TableBorder$ To 35 + +Equ DownloadType$ To 36 + Equ Download_CSV$ To 1 + Equ Download_XML$ To 2 + Equ Download_PDF$ To 3 + +Equ PopupShowCounter$ To 37 +*Equ RunRead$ To 38 +Equ CommuterModule$ To 38 + * first value: stored procedure name of commuter module + * second value: @SVM list of 'events' to call + Equ PRERUN_EVENT$ To "SELECT" + Equ READ_EVENT$ To "PRE_READ" + Equ SEARCH_EVENT$ To "SEARCH" + Equ PREPAGE_EVENT$ To "PRE_DRAW" + Equ POSTPAGE_EVENT$ To "POST_DRAW" + Equ REPORT_CREATE_EVENT$ To "CREATE" + Equ REPORT_READY_EVENT$ To "READY" + Equ LINK_EVENT$ To "URL_LINK" + Equ IMAGE_EVENT$ To "URL_IMAGE" + Equ BUILD_COMMUTER$ To "BUILD" + Equ FULL_EVENT_LIST$ To REPORT_CREATE_EVENT$:@vm:PRERUN_EVENT$:@VM:READ_EVENT$:@VM:SEARCH_EVENT$:@VM:PREPAGE_EVENT$:@VM:POSTPAGE_EVENT$:@VM:REPORT_READY_EVENT$ +Equ StaticList$ To 39 +Equ SORT_FIELDS_START$ To 40 +Equ SortAttr$ To 40 + +Equ SortDir$ To 41 +Equ SortExp$ To 42 +Equ SORT_FIELDS_END$ To 42 +Equ SELECT_FIELDS_START$ To 43 +Equ SelectionCase$ To 43 +Equ SelectionSkip$ To 44 +Equ SelectionAttr$ To 45 + +Equ SelectionType$ To 46 +* SelectionType$, each.field, 1 = type +* SelectionType$, each.field, 2 = multiple allowed? 1/0 +* SelectionType$, each.field, 3 = maximum number of items to display in listbox (if indexed field) (default ("") is all; negative number means do not show ANY if this value is exceeded) +* SelectionType$, each.field, 4 = sort direction (1=reverse) (if indexed field) +Equ SelectionPrompt$ To 47 +Equ SelectionMod$ To 48 +Equ SelectionConn$ To 49 +Equ SELECT_FIELDS_END$ To 49 + +Equ DISPLAY_FIELDS_START$ To 50 + +Equ DisplayField$ To 50 + +Equ ColumnName$ To 51 +Equ DISPLAY_FIELD_ATTRIBUTES_START$ To 52 +Equ ColumnColor$ To 52 +Equ ColumnBGColor$ To 53 +Equ ColumnAlign$ To 54 + * subvalue 1: column alignment (0/1/2 = left/center/right) + * subvalue 2: column width + +Equ ColumnBold$ To 55 + +Equ ColumnItalic$ To 56 +Equ ValueColor$ To 57 +Equ ValueBGColor$ To 58 +Equ ValueAlign$ To 59 +Equ ValueMod$ To 60 +Equ DISPLAY_FIELD_DISPLAY_ATTRIBUTES_END$ To 60 + +Equ DISPLAY_FIELD_UNIQUE_ATTRIBUTES_START$ To 61 +Equ ValueLinkTo$ To 61 +Equ ValueLinkType$ To 62 + * subvalue 1: link type + * subvalue 2: link target (default to "drilldown", "<>" for none) + +Equ ValueLinkImage$ To 63 + * subvalue 1: imageURL + * subvalue 2: desired width + * subvalue 3: desired height +Equ ValueModColor$ To 64 +Equ ValueModText$ To 65 + +Equ ValueMultiColorPrompt$ To 66 +Equ ValueMultiColor$ To 67 +Equ ValueBrkMultiColorPrompt$ To 68 +Equ ValueBrkMultiColor$ To 69 +Equ DISPLAY_FIELD_UNIQUE_ATTRIBUTES_END$ To 69 +Equ ColumnFont$ To 70 + * subvalue 1: font name + * subvalue 2: font size + +Equ ValueFont$ To 71 + * subvalue 1: font name + * subvalue 2: font size +Equ ColSortable$ To 72 +Equ ValueConv$ To 73 +Equ ValueNoSplit$ To 74 +Equ ColPerms$ To 75 + +Equ DISPLAY_FIELDS_END$ To 75 + +Equ SystemFlag$ To 100 +Equ MaxRecords$ to 101 +Equ RepeatTimer$ to 102 + * first value: ignored + * second value: #seconds for mobile output + * third value: #seconds for normal output +Equ NonColumnarOutput$ to 103 + * first value: 1/0 for popup output + * second value: 1/0 for mobile output + * third value: 1/0 for normal output +Equ ExtraPlugins$ To 104 + diff --git a/SYSPROG/STPROCINS/O4WRESTCOMMON.txt b/SYSPROG/STPROCINS/O4WRESTCOMMON.txt new file mode 100644 index 0000000..8c54997 --- /dev/null +++ b/SYSPROG/STPROCINS/O4WRESTCOMMON.txt @@ -0,0 +1,83 @@ +COMPILE Insert O4WRESTCommon + +common /O4WREST/ O4WRestFl%, O4WSecTokenValue%, O4WSecTokenName%, apiInfo%, versionInfo%, routeInfo%, varInfo%, routeID%, o4wSecType%, routeAction% +common /O4WRESTSession/ ParsedParameters% + +Equ END_TOKEN$ To "" + +Equ O4WRESTCONFIG_VERSION_DESCRIPTION$ To 1 +Equ O4WRESTCONFIG_VERSION_SERVERS$ To 2 ;* server URLs for this api/version +Equ O4WRESTCONFIG_VERSION_SECURITY_LOC$ To 5 ;* location for security token +Equ O4WRESTCONFIG_VERSION_SECURITY_TOKEN$ To 6 ;* security token name +Equ O4WRESTCONFIG_VERSION_SECURITY_PROC$ To 7 ;* routine to process security +Equ O4WRESTCONFIG_VERSION_SECURITY_TYPE$ To 8 ;* security "scheme" + +Equ O4WRESTCONFIG_VERSION_DEFAULT_HANDLER$ To 10 ;* default handler for this API (can be 'auto' for internal) +Equ O4WRESTCONFIG_VERSION_DEFAULT_RESPONSE_TYPE$ To 11 ;* default media type of response +Equ O4WRESTCONFIG_VERSION_COOKIE_SECURE$ To 15 ;* flag: are cookies secure? +Equ O4WRESTCONFIG_VERSION_COOKIE_PATH$ To 16 ;* path for cookies +Equ O4WRESTCONFIG_VERSION_COOKIE_IGNORE_SANITY_SECURE$ To 17 ;* flag: ignore error if not https & cookie secure +Equ O4WRESTCONFIG_VERSION_COOKIE_IGNORE_SANITY_PATH$ To 18 ;* flag: ignore error if cookie path <> path + +** @RM delimited parts in record ** +Equ O4WRESTCONFIG_ROUTE_PATH$ To 1 +Equ O4WRESTCONFIG_ROUTE_METHOD$ To 2 +Equ O4WRESTCONFIG_ROUTE_DESCRIPTION$ To 5 +Equ O4WRESTCONFIG_ROUTE_TAGS$ To 6 ;* "GROUP" THAT THIS ROUTE BELONGS TO +Equ O4WRESTCONFIG_ROUTE_SERVERS$ To 7 ;* OPTIONAL OVERRIDE OF DEFAULT API SERVERS +Equ O4WRESTCONFIG_ROUTE_SECURITY$ To 8 ;* security required for this route? +Equ O4WRESTCONFIG_ROUTE_HANDLER$ To 9 ;* what routine will handle this (can be 'auto' for internal) +Equ O4WRESTCONFIG_ROUTE_RESPONSE_TYPE$ To 10 ;* media type of response +Equ O4WRESTCONFIG_ROUTE_ACTION$ To 11 ;* operationID or "standard" action (if auto) +Equ O4WRESTCONFIG_ROUTE_INCOMING_PROPERTY_NAMES$ To 20 ;* parameter names ] +Equ O4WRESTCONFIG_ROUTE_INCOMING_PROPERTY_LOCS$ To 21 ;* where the paramter comes from] +Equ O4WRESTCONFIG_ROUTE_INCOMING_PROPERTY_TYPES$ To 22 ;* type of parameter (string, boolean, schema)] +Equ O4WRESTCONFIG_ROUTE_INCOMING_PROPERTY_REQD$ To 23 ;* 1/0 parameter required?] +Equ O4WRESTCONFIG_ROUTE_INCOMING_PROPERTY_DEFAULT$ To 24 ;* default value for parameter] +Equ O4WRESTCONFIG_ROUTE_INCOMING_PROPERTY_STD_TYPES$ To 25 ;* std code for this parameter (used by wizard)] +Equ O4WRESTCONFIG_ROUTE_RESPONSE_CODES$ To 30 +Equ O4WRESTCONFIG_ROUTE_RESPONSE_DETAILS$ To 31 +Equ O4WRESTCONFIG_ROUTE_RESPONSE_STD_TYPES$ To 32 +Equ O4WRESTCONFIG_ROUTE_RESPONSE_PROPERTY_NAMES$ To 35 +Equ O4WRESTCONFIG_ROUTE_RESPONSE_PROPERTY_LOCS$ To 36 +Equ O4WRESTCONFIG_ROUTE_RESPONSE_PROPERTY_TYPES$ To 37 + +Equ O4WRESTCONFIG_SCHEMA_DESCRIPTION$ To 1 +Equ O4WRESTCONFIG_SCHEMA_SOURCE$ To 2 +Equ O4WRESTCONFIG_SCHEMA_PARAM_NAME$ To 5 +Equ O4WRESTCONFIG_SCHEMA_PARAM_TYPE$ To 6 +Equ O4WRESTCONFIG_SCHEMA_PARAM_SOURCE_DETAILS_1$ To 10 +Equ O4WRESTCONFIG_SCHEMA_PARAM_SOURCE_DETAILS_2$ To 11 +Equ O4WRESTCONFIG_SCHEMA_PARAM_SOURCE_DETAILS_3$ To 12 + + + + +Equ O4WRESTCONFIG_SCHEMA_SOURCE_TYPE_FILE$ To "FILE" +Equ O4WRESTCONFIG_SCHEMA_SOURCE_TYPE_PROG$ To "STPROC" + + +Equ stdToken_KEY$ To "%ID%" +Equ stdToken_SEARCH_LIST_ID$ To "%LIST_ID%" +Equ stdToken_SEARCH_PAGE_NO$ To "%LIST_PAGE%" +Equ stdToken_SEARCH_NUM_PPG$ To "%LIST_PPG%" +Equ stdToken_SEARCH_PAGINATE$ To "%LIST_PAGINATE%" +Equ stdToken_SEARCH_PARAM$ To "%LIST_PARAM%" +Equ stdToken_ACTION_READ$ To "%READ_ITEM%" +Equ stdToken_ACTION_LIST$ To "%LIST%" +Equ stdToken_ACTION_CREATE$ To "%CREATE_ITEM%" +Equ stdToken_ACTION_UPDATE$ To "%UPDATE_ITEM%" +Equ stdToken_ACTION_DELETE$ To "%DELETE_ITEM%" +Equ stdToken_ACTION_PATCH$ To "%PATCH_ITEM%" +Equ stdToken_RESPONSE_SUCCESS$ To "%OK%" +Equ stdToken_RESPONSE_ERR_SECURITY$ To "%ERR_SEC%" +Equ stdToken_RESPONSE_ERR_PARAM$ To "%ERR_PARAM%" +Equ stdToken_RESPONSE_ERR_NOT_FOUND$ To "%ERR_NOTFOUND%" +Equ stdToken_RESPONSE_ERR_GENERIC$ To "%ERR%" + +Equ stdResponse_SUCCESS$ To "200" +Equ stdResponse_ERR_ID$ To "400" +Equ stdResponse_ERR_UNAUTHORIZED$ To "401" +Equ stdResponse_ERR_NOT_FOUND$ To "404" +Equ stdResponse_ERR_INPUT_INVALID$ To "405" + diff --git a/SYSPROG/STPROCINS/O4W_COMMUTER_COMMON.txt b/SYSPROG/STPROCINS/O4W_COMMUTER_COMMON.txt new file mode 100644 index 0000000..7254a51 --- /dev/null +++ b/SYSPROG/STPROCINS/O4W_COMMUTER_COMMON.txt @@ -0,0 +1,43 @@ +compile insert O4W_COMMUTER_COMMON +COMMON /O4W_COMMUTER/ FormName@, FormDef@, bisNew@, statMsg@, redirectTo@, userFields@ +COMMON /O4W_COMMUTER2/ tabInfo@ +common /O4W_COMMUTER3/ addlInfo@, selStmtToExecute@, PageNo@, saveWarn@, ErrMsg@ +COMMON /O4W_COMMUTER_RPT/ ReportName@, ReportDef@ +common /O4W_COMMUTER_DF/ o4wVersion@, HeaderDef@ + +Equ PDELIM$ To "_-_" + +Declare Function O4WCommuterUtility + +Equ O4WUTILITY_FIELDNAME$ To 1 +Equ O4WUTILITY_CONTROLTYPE$ To 2 +Equ O4WUTILITY_VALUE$ To 3 + +Equ O4WUTILITY_FORMELEMENT_LABEL_CELL$ To 4 +Equ O4WUTILITY_FORMELEMENT_LABEL_SECTION$ To 5 +Equ O4WUTILITY_FORMELEMENT_CONTROL_CELL$ To 6 +Equ O4WUTILITY_FORMELEMENT_CONTROL_SECTION$ To 7 +Equ O4WUTILITY_FORMELEMENT_CONTROL$ To 8 +Equ O4WUTILITY_FORMELEMENT_TEXT$ To 9 + +Equ O4WUTILITY_TABLENAME$ To 10 +Equ O4WUTILITY_CLASS_CONTROL_CELL$ To 11 +Equ O4WUTILITY_CLASS_CONTROL_SECTION$ To 12 +Equ O4WUTILITY_CLASS_CONTROL$ To 13 +Equ O4WUTILITY_CLASS_TEXT$ To 14 +Equ O4WUTILITY_SECTIONNAME$ To 15 + +Equ O4WUTILITY_CHILDREN$ To 20 +Equ O4WUTILITY_TABNAME$ To 21 +Equ O4WUTILITY_FORMELEMENT_LABEL$ To 22 + +Equ O4WUTILITY_OVERRIDE_SELECT$ To 23 +Equ O4WUTILITY_SELECT_RESTORE$ To 24 +Equ O4WUTILITY_OVERRIDE_READ$ To 25 +Equ O4WUTILITY_READ_RESTORE$ To 26 +Equ O4WUTILITY_SAVE$ To 27 + +Equ O4WUTILITY_EVENT$ To 30 + +Equ O4WUTILITY_VALUE_SET$ To 35 +Equ O4WUTILITY_VALUE_GET$ To 3 diff --git a/SYSPROG/STPROCINS/O4W_DESIGN_FORM_EQUATES.txt b/SYSPROG/STPROCINS/O4W_DESIGN_FORM_EQUATES.txt new file mode 100644 index 0000000..d34aac9 --- /dev/null +++ b/SYSPROG/STPROCINS/O4W_DESIGN_FORM_EQUATES.txt @@ -0,0 +1,526 @@ +compile insert O4W_DESIGN_FORM_EQUATES + +Declare Function O4WI_FORMDESIGNER_HELPER, O4WI_FORMDESIGNER_UTILITY, O4WI_FORMDESIGNER_PROPS_HELPER, UCASE, Function, O4WI_FORMDESIGNER_PAGE_HELPER, o4wi_formdesigner_widget_new, o4wi_formdesigner_widget_helper + + +COMMON /O4WDESIGNFORM/ bInitCommon%, linktypeNames%, linktypeValues%, noYesNames%, noYesValues%, labelPosnNames%, labelPosnValues%, themeNames%, themeValues%, convNames%, convValues%, updateTargets%, PHOLDER2% +COMMON /O4WDESIGNFORM_RUNR/ DRTables@, DRRecords@, DRKeys@, DRKeyList@, DRMV@, DRSuffix@, DRNumMV@, DRSuppressLayout@, DRROOverrideFlag@, DRSkipList@, DRShowNoneOverrideFlag@, DRSuppressDefault@ + +Equ DESIGN_SUPPORT_PREFIX$ To "O4WI_FORMDESIGNER_WIDGET_" +Equ PAGE_SUPPORT_PREFIX$ To "O4WI_FORMDESIGNER_PAGE_" +Equ TEMPLATE_SUPPORT_PREFIX$ To "O4WI_FORMDESIGNER_TEMPLATE_" +Equ GET_MAP_REQUEST$ To 'o4wMap=" + serializeUs() + "' +Equ DEFAULT_PREFIX$ To "FORMDESIGNER_SETTINGS_DEFAULT_" +Equ DEFAULT_SETTINGS_TABLE$ To "O4WCONFIG" +Equ READONLY_KEY_PREFIX$ To "%RD%" +Equ USER_COMMON_RECORD$ To "userFields@" +Equ ELEMENT_PREFIX$ To "element" + +// LAYOUT OF CONFIG RECORD +Equ CONFIG_SECTION_IDS$ To 1 +Equ CONFIG_SECTION_NAMES$ To 2 +Equ CONFIG_SUPPORTED_ELEMENTS$ To 3 +Equ CONFIG_SUPPORTED_TEMPLATES$ To 4 +Equ CONFIG_SUPPORTED_PAGE_NAMES$ To 5 +Equ CONFIG_SUPPORTED_PAGE_IDS$ To 6 +Equ CONFIG_GRID_SIZE_MAX$ To 8 +Equ CONFIG_GRID_SIZE_ELEMENT$ To 9 +Equ CONFIG_GRID_SIZE_CONTAINER$ To 10 +Equ CONFIG_CELL_HEIGHT$ To 11 +Equ CONFIG_GRID_COLOR$ To 13 +Equ CONFIG_GRID_WIDTH$ To 14 +Equ DEFAULT_SUPPORTED_TEMPLATES$ To "OI_FORM_MODE":@vm:"KEY_AND_SEARCH":@vm:"ENTER_KEY":@vm:"SEARCH":@vm:"PICKLIST":@vm:"ADD_ONLY":@vm:"ITEM_LISTING" + +// LAYOUT OF HEADER RECORD +Equ CURRENT_FORM_VERSION$ To "2.0" + +Equ HEADER_VERSION$ To 1 +Equ HEADER_MODIFIED$ To 2 +Equ HEADER_DESC$ To 4 +Equ HEADER_TITLE$ To 5 +Equ HEADER_TEMPLATE$ To 6 +Equ HEADER_TEMPLATE_M$ To 7 + Equ HEADER_TEMPLATE_M_NAME$ To 1 + Equ HEADER_TEMPLATE_M_THEME$ To 2 +Equ HEADER_TABLES$ To 8 +Equ HEADER_PAGES$ To 9 +Equ HEADER_CURR_PAGE$ To 10 +Equ HEADER_FORM_TYPE$ To 11 +Equ HEADER_PAGE_TYPE$ To 12 +Equ HEADER_FORM_RO_FLAG$ To 13 +Equ HEADER_FORM_BG_COLOR$ To 14 +Equ HEADER_FORM_FG_COLOR$ To 15 +Equ HEADER_FORM_BG_IMAGE$ To 16 +Equ HEADER_FORM_CELL_HEIGHT$ To 17 +Equ HEADER_ASSOCIATED_KEYS$ To 20 +Equ HEADER_COMMUTER_FLAG$ To 28 +Equ HEADER_COMMUTER_NAME$ To 29 +Equ HEADER_EVENT_FLAGS$ To 30 + Equ PREREAD_EVENT$ To 1 + Equ POSTREAD_EVENT$ To 2 + Equ PREWRITE_EVENT$ To 3 + Equ POSTWRITE_EVENT$ To 4 + Equ PREDELETE_EVENT$ To 5 + Equ POSTDELETE_EVENT$ To 6 + Equ SELECT_EVENT$ To 7 + Equ TAB_EVENT$ To 8 + Equ POPUP_EVENT$ To 9 + Equ POSTDRAW_EVENT$ To 10 + Equ FORM_CREATE_EVENT$ To 11 + Equ FORM_READY_EVENT$ To 12 + Equ POSTCANCEL_EVENT$ To 13 ;* BZS 030821 + Equ BUILDCOMMUTER_TEMP$ To 20 ;* value 20=build commuter module shell (TEMPORARY) + +Equ HEADER_NEXT_ID$ To 31 +Equ HEADER_PERMISSIONS$ To 34 +Equ HEADER_MENU$ To 36 +Equ HEADER_ADDL_SCRIPTS$ To 40 +Equ HEADER_ADDL_CSS$ To 41 +Equ HEADER_DEFAULT_LABELTYPE$ To 50 + Equ HEADER_DEFAULT_LABELTYPE_SXS$ To "1" + Equ HEADER_DEFAULT_LABELTYPE_OU$ To "0" + Equ HEADER_DEFAULT_LABELTYPE_INLINE$ To "-1" + Equ HEADER_DEFAULT_LABELTYPE_NONE$ To "-2" +Equ HEADER_UI_MODE$ To 51 + Equ HEADER_UI_MODE_NEW$ To "0" + Equ HEADER_UI_MODE_CLASSIC$ To "1" +Equ HEADER_CURR_PARENT$ To 90 +Equ HEADER_SYSTEMFLAG$ To 100 +// bzs 053118 preserve the original information (if any) so the wizard can recreate the form? +Equ HEADER_WIZDATA_MODE$ To 110 +Equ HEADER_WIZDATA_TABLE$ To 111 +Equ HEADER_WIZDATA_VARFIELDS$ To 112 +Equ HEADER_WIZDATA_FORMFIELDS$ To 113 +Equ HEADER_WIZDATA_SEARCHFIELDS$ To 114 +Equ HEADER_WIZDATA_RESULTFIELDS$ To 115 +Equ HEADER_WIZDATA_METAFIELDS$ To 116 + +// LAYOUT OF FORM (PAGE) RECORD +Equ FORMINFO_FIELD_ELEMENT_START$ To 1 +Equ FORMINFO_FIELD_ELEMENT_END$ To 29 + +Equ OVERALL_FORM_ID$ To "FORM_PARENT" +Equ MAX_GRID_WIDTH$ To 12 +Equ MAX_GRID_HEIGHT$ To 22 +Equ DEFAULT_GRID_WIDTH$ To 2 +Equ DEFAULT_GRID_HEIGHT$ To 1 +Equ DEFAULT_GRID_CONTAINER_WIDTH$ To 3 +Equ DEFAULT_GRID_CONTAINER_HEIGHT$ To 3 +Equ DEFAULT_GRID_CELL_HEIGHT$ To 40 + +Equ FORMINFO_ID$ To 1 +Equ FORMINFO_COMMENT$ To 2 +Equ FORMINFO_TYPE$ To 3 +Equ FORMINFO_CHILDREN$ To 4 +Equ FORMINFO_PARENT$ To 5 +Equ FORMINFO_PARAM_R$ To 6 +Equ FORMINFO_PARAM_O$ To 7 +Equ FORMINFO_POSN$ To 8 + Equ FORMINFO_POSN_COL$ To 1 + Equ FORMINFO_POSN_ROW$ To 2 + Equ FORMINFO_POSN_WIDTH$ To 3 + Equ FORMINFO_POSN_HEIGHT$ To 4 +Equ FORMINFO_PROTECTED$ To 9 +Equ FORMINFO_ASSOCIATED$ To 10 +Equ FORMINFO_DB_INFO$ To 11 +Equ FORMINFO_FMT_INFO$ To 12 +Equ FORMINFO_MOB_INFO$ To 13 +Equ FORMINFO_EVT_INFO$ To 14 +Equ FORMINFO_ADV_INFO$ To 15 +Equ FORMINFO_LABEL_TYPE$ To 16 ;* bzs 020720 + +Equ FORMINFO_NEXT_POSN$ To 30 + Equ FORMINFO_NEXT_POSN_COL$ To 1 + Equ FORMINFO_NEXT_POSN_ROW$ To 2 + +Equ FORMINFO_PAGE_CONTROL_HDR$ To 40 +Equ FORMINFO_PAGE_CONTROL$ To 41 +Equ FORMINFO_PAGE_OPTIONS_HDR$ To 42 +Equ FORMINFO_PAGE_OPTIONS$ To 43 + +Equ DEFAULT_TABLE_HEIGHT$ To 4 + +Equ TAG_CONTENT$ To "_content" +Equ TAG_HANDLE$ To "_handle" + +Equ CONTROL_TYPE_CONTROL_BLOCK$ To "ctl" +Equ CONTROL_TYPE_INPUT_STORE$ To "str" +Equ CONTROL_TYPE_HEADER$ To "hdr" +Equ CONTROL_TYPE_HEADER_CUSTOM$ To "chdr" +Equ CONTROL_TYPE_NAVBAR$ To "navbar" +Equ CONTROL_TYPE_FOOTER$ To "ftr" +Equ CONTROL_TYPE_BUTTON$ To "btn" +Equ CONTROL_TYPE_BUTTON_SET$ To "bset" +Equ CONTROL_TYPE_TAB$ To "tab" +Equ CONTROL_TYPE_TABLE$ To "tbl" +Equ CONTROL_TYPE_DIV$ To "sec" +Equ CONTROL_TYPE_RADIO$ To "rdio" +Equ CONTROL_TYPE_RADIO_SET$ To "srdio" +Equ CONTROL_TYPE_CHECK$ To "chk" +Equ CONTROL_TYPE_CHECK_SET$ To "schk" +Equ CONTROL_TYPE_INPUT_TEXT$ To "itxt" +Equ CONTROL_TYPE_INPUT_AREA$ To "iarea" +Equ CONTROL_TYPE_INPUT_FILE$ To "ifile" +Equ CONTROL_TYPE_TEXT$ To "txt" +Equ CONTROL_TYPE_INPUT_SLIDER$ To "slider" +Equ CONTROL_TYPE_INPUT_NUMBER$ To "inmbr" +Equ CONTROL_TYPE_IMAGE$ To "img" +Equ CONTROL_TYPE_LINK$ To "link" +Equ CONTROL_TYPE_DATEPICKER$ To "date" +Equ CONTROl_TYPE_TIMEPICKER$ To "time" +Equ CONTROL_TYPE_COLORPICKER$ To "color" +Equ CONTROL_TYPE_M_HEADER$ To "mhdr" +Equ CONTROL_TYPE_M_NAVBAR$ To "mnavbar" +Equ CONTROL_TYPE_M_FOOTER$ To "mftr" +Equ CONTROL_TYPE_M_BUTTON$ To "mbtn" +Equ CONTROL_TYPE_M_GRID$ To "grid" +Equ CONTROL_TYPE_M_DIV_COLLAPSE$ To "csec" +Equ CONTROL_TYPE_M_TOGGLE$ To "tgl" +Equ CONTROL_TYPE_SELECT_MENU$ To "fslct" +Equ CONTROL_TYPE_LIST_UNORDERED$ To "ulist" +Equ CONTROL_TYPE_LIST_ORDERED$ To "olist" +Equ CONTROL_TYPE_LIST_ITEM$ To "ilist" +Equ CONTROL_TYPE_M_LIST_DIVIDER$ To "dlist" + +Equ CONTROL_TYPE_GOOGLE_MAP$ To "gmap" +Equ CONTROL_TYPE_GOOGLE_MAP_ELEMENT$ To "gmelement" +Equ CONTROL_TYPE_GOOGLE_CHART$ To "gchart" +Equ CONTROL_TYPE_GOOGLE_CHART_ELEMENT$ To "gcelement" + +Equ CONTROL_TYPE_INTERNAL_TABLE$ To "TABLE" +Equ CONTROL_TYPE_INTERNAL_TABLE_ADV$ To "ATABLE" +Equ CONTROL_TYPE_INTERNAL_TABLE_DYN$ To "DTABLE" + +* Messages to widgets +Equ WIDGET_MSG_LABEL$ To "1" +Equ WIDGET_MSG_HTML5_TYPE$ To "2" +Equ WIDGET_MSG_LABEL_PLACEMENT$ To "3" +Equ WIDGET_MSG_LEGEND$ To "4" +Equ WIDGET_MSG_NAME$ To "5" +Equ WIDGET_MSG_PROMPT$ To "6" +Equ WIDGET_MSG_SIZE$ To "7" +Equ WIDGET_MSG_VALUE$ To "8" +Equ WIDGET_MSG_VALUE_MIN$ To "9" +Equ WIDGET_MSG_VALUE_MAX$ To "10" +Equ WIDGET_MSG_VALUE_STEP$ To "11" +Equ WIDGET_MSG_SPECIAL_STYLE$ To "12" +Equ WIDGET_MSG_DISPLAY_TYPE$ To "13" +Equ WIDGET_MSG_WIDTH$ To "14" +Equ WIDGET_MSG_HEIGHT$ To "15" +Equ WIDGET_MSG_PAGINATE$ To "16" +Equ WIDGET_MSG_INITIAL_HIDE$ To "17" +Equ WIDGET_MSG_LABEL_TYPE$ To "18" + +Equ WIDGET_MSG_LINK$ To "20" +Equ WIDGET_MSG_LINK_TYPE$ To "21" +Equ WIDGET_MSG_LINK_URL$ To "22" +Equ WIDGET_MSG_LINK_TARGET$ To "23" + +Equ WIDGET_MSG_FONT_NAME$ To "30" +Equ WIDGET_MSG_FONT_SIZE$ To "31" +Equ WIDGET_MSG_FONT_BOLD$ To "32" +Equ WIDGET_MSG_FONT_ITALIC$ To "33" +Equ WIDGET_MSG_FONT_ALIGN$ To "34" +Equ WIDGET_MSG_FONT_COLOR_FG$ To "35" +Equ WIDGET_MSG_FONT_COLOR_BG$ To "36" +Equ WIDGET_MSG_CONTROL_ALIGN$ To "37" + +Equ WIDGET_MSG_FMT_BORDER$ To "40" +Equ WIDGET_MSG_FMT_OVERFLOW$ To "41" + +Equ WIDGET_MSG_DB_TABLE$ To "50" +Equ WIDGET_MSG_DB_FIELD$ To "51" +Equ WIDGET_MSG_DB_RO$ To "52" +Equ WIDGET_MSG_DB_MV$ To "53" +Equ WIDGET_MSG_DB_DEFAULT$ To "54" +Equ WIDGET_MSG_DB_DEFAULT_P1$ To "55" +Equ WIDGET_MSG_DB_DEFAULT_P2$ To "56" +Equ WIDGET_MSG_DB_OVERRIDE$ To "57" +Equ WIDGET_MSG_DB_OVERRIDE_TYPE$ To "58" +Equ WIDGET_MSG_DB_OVERRIDE_TABLE$ To "59" + +Equ WIDGET_MSG_MOB_ICON$ To "60" +Equ WIDGET_MSG_MOB_THEME$ To "61" +Equ WIDGET_MSG_MOB_MINI$ To "62" +Equ WIDGET_MSG_MOB_INSET$ To "63" +Equ WIDGET_MSG_MOB_DIVIDER$ To "64" +Equ WIDGET_MSG_MOB_FILTERED$ To "65" +Equ WIDGET_MSG_MOB_GRID_SIZE$ To "66" +Equ WIDGET_MSG_MOB_LAYOUT$ To "67" +Equ WIDGET_MSG_MOB_CLEAR$ To "68" +Equ WIDGET_MSG_MOB_RESPONSIVE$ To "69" +Equ WIDGET_MSG_MOB_FIXED$ To "70" +Equ WIDGET_MSG_MOB_WIDTH$ To "71" +Equ WIDGET_MSG_MOB_HEIGHT$ To "72" + +Equ WIDGET_MSG_CONV_O$ To "80" +Equ WIDGET_MSG_CONV_I$ To "81" +Equ WIDGET_MSG_CONV_O_USER$ To "82" +Equ WIDGET_MSG_CONV_I_USER$ To "83" +Equ WIDGET_MSG_VALIDATION$ To "84" +Equ WIDGET_MSG_VALIDATION_USER_1$ To "85" +Equ WIDGET_MSG_VALIDATION_USER_2$ To "86" +Equ WIDGET_MSG_REQD$ To "87" + +Equ WIDGET_MSG_EVENT_CLICK$ To "90" +Equ WIDGET_MSG_EVENT_BEFORE$ To "91" +Equ WIDGET_MSG_EVENT_AFTER$ To "92" +Equ WIDGET_MSG_EVENT_CHANGED$ To "93" +Equ WIDGET_MSG_EVENT_UPDATE_ASSOCIATED$ To "94" + +Equ WIDGET_MSG_OPT_HEIGHT$ To "100" +Equ WIDGET_MSG_OPT_TABINDEX$ To "101" + +Equ WIDGET_MSG_SUPPRESS_LAYOUT$ To "110" +Equ WIDGET_MSG_SUPPRESS_DESIGN$ To "111" + +Equ WIDGET_MSG_SELECT_MULTI$ To "120" +Equ WIDGET_MSG_LIST_SOURCE$ To "121" +Equ WIDGET_MSG_LIST_TABLE$ To "122" +Equ WIDGET_MSG_LIST_SELECT$ To "123" +Equ WIDGET_MSG_LIST_CODE_RECORD$ To "124" +Equ WIDGET_MSG_LIST_CODE_FIELD_VALUE$ To "125" +Equ WIDGET_MSG_LIST_CODE_FIELD_DESC$ To "126" +Equ WIDGET_MSG_LIST_STPROC$ To "127" +Equ WIDGET_MSG_SET_SHOWNONE$ To "128" +Equ WIDGET_MSG_STATIC_OPTIONS$ To "129" + +Equ WIDGET_MSG_DATE_EURO$ To "130" +Equ WIDGET_MSG_DATE_DELIM$ To "131" +Equ WIDGET_MSG_TIME_24HR$ To "140" +Equ WIDGET_MSG_TIME_SECONDS$ To "141" + +Equ WIDGET_MSG_BTN_DEFAULT$ To "150" +Equ WIDGET_MSG_M_BUTTON_TYPE$ To "151" +Equ WIDGET_MSG_M_BUTTON_MENU$ To "152" +Equ WIDGET_MSG_M_BUTTON_POSN$ To "153" + +Equ WIDGET_MSG_TBL_COLUMNS$ To "160" +Equ WIDGET_MSG_TBL_INSDEL$ To "161" +Equ WIDGET_MSG_TBL_ADDDEL_TOP$ To "162" +Equ WIDGET_MSG_TBL_ADDDEL_BTM$ To "163" +Equ WIDGET_MSG_TBL_ZEBRA$ To "164" +Equ WIDGET_MSG_TBL_COLWIDTHS$ To "165" +Equ WIDGET_MSG_TBL_PAGINATE$ To "166" +Equ WIDGET_MSG_TBL_TYPE$ To "167" +Equ WIDGET_MSG_TBL_COLUMN_ADD$ To "168" +Equ WIDGET_MSG_TBL_REARRANGE$ To "169" + + +Equ WIDGET_MSG_TEXT_WRAP$ To "180" +Equ WIDGET_MSG_TEXT_MAX$ To "181" +Equ WIDGET_MSG_TEXT_BREAK$ To "182" + +Equ WIDGET_MSG_EVENT_POPUP$ To "190" +Equ WIDGET_MSG_POPUP_TYPE$ To "191" +Equ WIDGET_MSG_POPUP_TITLE$ To "192" +Equ WIDGET_MSG_POPUP_WIDTH$ To "193" +Equ WIDGET_MSG_POPUP_HEIGHT$ To "194" +Equ WIDGET_MSG_POPUP_SRC$ To "195" +Equ WIDGET_MSG_POPUP_MULTI$ To "196" +Equ WIDGET_MSG_POPUP_ARGS1$ To "197" +Equ WIDGET_MSG_POPUP_ARGS2$ To "198" +Equ WIDGET_MSG_POPUP_ARGS3$ To "199" +Equ WIDGET_MSG_POPUP_DEST$ To "200" + +Equ WIDGET_MSG_HDR_BUTTON_LEFT$ To "210" +Equ WIDGET_MSG_HDR_BUTTON_RIGHT$ To "211" + +Equ WIDGET_MSG_GOOGLE_API_KEY$ To "220" +Equ WIDGET_MSG_GOOGLE_TYPE$ To "221" + +Equ WIDGET_MSG_CLASSES$ To "230" +Equ WIDGET_MSG_CLASS_ADD$ To "232" +Equ WIDGET_MSG_CLASS_REMOVE$ To "233" +Equ WIDGET_MSG_CLASS_TOGGLE$ To "234" +Equ WIDGET_MSG_HTML_BEFORE$ To "235" +Equ WIDGET_MSG_HTML_AFTER$ To "236" +Equ WIDGET_MSG_DATASTYLE_NAMES$ To "237" +Equ WIDGET_MSG_DATASTYLE_VALUES$ To "238" + +Equ WIDGET_MSG_CUSTOM$ To "-1" + +* widget available actions +Equ WIDGET_ACTION_MIN_VALUE$ To 1 +Equ WIDGET_ACTION_INIT$ To "1" +Equ WIDGET_ACTION_INFO$ To "2" +Equ WIDGET_ACTION_DRAW$ To "3" +Equ WIDGET_ACTION_PROPS$ To "4" +Equ WIDGET_ACTION_UPDATE$ To "5" +Equ WIDGET_ACTION_VALIDATE$ To "6" +Equ WIDGET_ACTION_EVENT$ To "7" +Equ WIDGET_ACTION_PROPS_UPDATE$ To "8" +Equ WIDGET_ACTION_VALUE$ To "9" +Equ WIDGET_ACTION_READ$ To "10" +Equ WIDGET_ACTION_MAX_VALUE$ To 10 + +Equ WIDGET_ACTION_INVALID$ To "INVALID" + +Equ WIDGET_INFO_CONTAINER$ To "1" +Equ WIDGET_INFO_ASSOCIATED_LABEL$ To "2" +Equ WIDGET_INFO_CAN_DELETE$ To "3" +Equ WIDGET_INFO_DB$ To "4" +Equ WIDGET_INFO_ID$ To "5" +Equ WIDGET_INFO_DETAILS$ To "6" +Equ WIDGET_INFO_INPUT$ To "7" +Equ WIDGET_INFO_ALIGN$ To "8" +Equ WIDGET_INFO_EVENTS$ To "9" +Equ WIDGET_INFO_SUFFIX$ To "10" +Equ WIDGET_INFO_CHILD_INFO$ To "11" +Equ WIDGET_INFO_OVERFLOW$ To "12" +Equ WIDGET_INFO_STATIC_DATA$ To "13" +Equ WIDGET_INFO_BGCOLOR$ To "14" +Equ WIDGET_INFO_CHILDREN$ To "15" +Equ WIDGET_INFO_PRELOADS$ To "16" +Equ WIDGET_INFO_UPDATE_TARGET$ To "17" +Equ WIDGET_INFO_NAME$ To "18" +Equ WIDGET_INFO_NO_WRAPPER$ To "19" +Equ WIDGET_INFO_INVISIBLE$ To "20" +Equ WIDGET_INFO_PROPNAMES$ To "21" +Equ WIDGET_INFO_NO_LAYOUT$ To "22" +Equ WIDGET_INFO_CHANGE_TYPE$ To "23" +Equ WIDGET_INFO_TABINDEX$ To "24" +Equ WIDGET_INFO_CUSTOM$ To "99" + +Equ WIDGET_EVENT_CLICK$ To "EVT_CLICK" +Equ WIDGET_EVENT_CHANGED$ To "EVT_CHANGED" +Equ WIDGET_EVENT_BEFORE$ To "EVT_BEFORE" +Equ WIDGET_EVENT_AFTER$ To "EVT_AFTER" +Equ WIDGET_EVENT_ASSOCIATED$ To "EVT_ASSOC" +Equ WIDGET_EVENT_POPUP$ To "EVT_POPUP" +Equ WIDGET_EVENT_TAB$ To "EVT_TAB" +Equ WIDGET_EVENT_LINK_URL$ To "EVT_LINK" +Equ WIDGET_EVENT_IMG_URL$ To "EVT_IMG" + +Equ PROPS_TAB_LIST_COUNT$ To 7 +Equ PROPS_TAB_LIST_IDS$ to "req":@VM:"db":@VM:"opt":@VM:"fmt":@VM:"mob":@VM:"evt":@VM:"adv" +Equ PROPS_TAB_LIST_NAMES$ to "Required":@VM:"Data":@VM:"Optional":@VM:"Formatting":@VM:"Mobile":@VM:"Events" :@VM:"Advanced" +Equ PROPS_FIELDS_LIST_PREFIX$ To "PROP_REQ_":@vm:"PROP_DB_":@vm:"PROP_OPT_":@vm:"PROP_FMT_":@vm:"PROP_MOB_":@vm:"PROP_EVT_":@VM:"PROP_ADV_" +Equ PROPS_FIELDS_LIST_MAX$ To "PROP_MAX_REQ":@vm:"PROP_MAX_DB":@vm:"PROP_MAX_OPT":@vm:"PROP_MAX_FMT":@vm:"PROP_MAX_MOB":@vm:"PROP_MAX_EVT":@vm:"PROP_MAX_ADV" +Equ PROPS_TAB_NAME_REQ$ To "req" +Equ PROPS_TAB_NUM_REQ$ To 1 +Equ PROPS_TAB_NAME_DB$ To "db" +Equ PROPS_TAB_NUM_DB$ To 2 +Equ PROPS_TAB_NAME_OPTS$ To "opt" +Equ PROPS_TAB_NUM_OPTS$ To 3 +Equ PROPS_TAB_NAME_FMT$ To "fmt" +Equ PROPS_TAB_NUM_FMT$ To 4 +Equ PROPS_TAB_NAME_MOB$ To "mob" +Equ PROPS_TAB_NUM_MOB$ To 5 +Equ PROPS_TAB_NAME_EVT$ To "evt" +Equ PROPS_TAB_NUM_EVT$ To 6 +Equ PROPS_TAB_NAME_ADV$ To "adv" +Equ PROPS_TAB_NUM_ADV$ To 7 + +Equ PAGEWIDGET_ACTION_MIN_VALUE$ To 1 +Equ PAGEWIDGET_ACTION_MAX_VALUE$ To 6 + +Equ PAGEWIDGET_ACTION_PREDRAW$ To "1" +Equ PAGEWIDGET_ACTION_DRAW$ To "2" +Equ PAGEWIDGET_ACTION_RESULTS$ To "3" +Equ PAGEWIDGET_ACTION_PROPS_SHOW$ To "4" +Equ PAGEWIDGET_ACTION_PROPS_SAVE$ To "5" +Equ PAGEWIDGET_ACTION_PROPS_DEFAULT$ To "6" + +Equ PAGEHELPER_RSLT_NONE$ To "" +Equ PAGEHELPER_RSLT_REDRAW_CURRENT$ To "1" +Equ PAGEHELPER_RSLT_CHANGE_PAGE$ To "2" +Equ PAGEHELPER_RSLT_PROCEED$ To "3" + +Equ TEMPLATEWIDGET_ACTION_MIN_VALUE$ To 1 +Equ TEMPLATEWIDGET_ACTION_MAX_VALUE$ To 4 + +Equ TEMPLATEWIDGET_ACTION_INFO$ To "1" +Equ TEMPLATEWIDGET_ACTION_QUICKDRAW$ To "2" +Equ TEMPLATEWIDGET_ACTION_CREATE$ To "3" +Equ TEMPLATEWIDGET_ACTION_FORM_PROPERTIES$ To "4" + +Equ O4W_LOCAL_COMMON_ID_SUFFIX$ To "_LOCALSTATE" +Equ O4W_LOCAL_VAR_RESET_TEXT$ To "O4WSTORE_RESET_TEXT" +Equ O4W_LOCAL_VAR_SORT_BY$ To "O4WSTORE_SORT_BY" +Equ O4W_LOCAL_VAR_PAGINATION$ To "O4WSTORE_PER_PAGE" +Equ O4W_LOCAL_VAR_CURR_PAGE$ To "O4WSTORE_displayPage" +Equ O4W_LOCAL_VAR_STARTING_ITEM$ To "O4WSTORE_starting_num" +Equ O4W_LOCAL_VAR_ENDING_ITEM$ To "O4WSTORE_ending_num" +Equ O4W_LOCAL_VAR_RECENTLY_USED$ To "O4WSTORE_recently_used" + +* bzs 013121 manually-triggered events +Equ MANUAL_TRIGGER_EVENT_SAVE$ To "O4W_MANUALLY_TRIGGERED_SAVE" +Equ MANUAL_TRIGGER_EVENT_DEL$ To "O4W_MANUALLY_TRIGGERED_DEL" +Equ MANUAL_TRIGGER_EVENT_CANCEL$ To "O4W_MANUALLY_TRIGGERED_CANCEL" +Equ MANUAL_TRIGGER_EVENT_NEW$ To "O4W_MANUALLY_TRIGGERED_NEW" +Equ MANUAL_TRIGGER_EVENT_READ$ To "O4W_MANUALLY_TRIGGERED_READ" +Equ MANUAL_TRIGGER_EVENT_SEARCH$ To "O4W_MANUALLY_TRIGGERED_SEARCH" +Equ MANUAL_TRIGGER_EVENT_FORWARD$ To "O4W_MANUALLY_TRIGGERED_FWD" +Equ MANUAL_TRIGGER_EVENT_BACK$ To "O4W_MANUALLY_TRIGGERED_BACK" + +* in page_control_hdr/page_control +Equ HEADER_TAG_VERSION$ To "" +Equ HEADER_TAG_VERSION_VALUE$ To "2.0" + +Equ TRIGGER_EVENT_SAVE$ To "" +Equ TRIGGER_EVENT_DEL$ To "" +Equ TRIGGER_EVENT_CANCEL$ To "" +Equ TRIGGER_EVENT_NEW$ To "" +Equ TRIGGER_EVENT_READ$ To "" +Equ TRIGGER_EVENT_SEARCH$ To "" +Equ TRIGGER_EVENT_FORWARD$ To "" +Equ TRIGGER_EVENT_BACK$ To "" +Equ TRIGGER_EVENT_NONE$ To "" +* in page_options_hdr/page_options +Equ HEADER_TAG_NEW_DETAIL$ To "" +Equ HEADER_TAG_FOCUS$ To "" +Equ HEADER_TAG_TRIGGER_TYPE$ To "" +Equ HEADER_TAG_SEARCH_MAX$ To "" +Equ HEADER_TAG_SEARCH_WARN$ To "" +Equ HEADER_TAG_QBF_DISABLE$ To "" +Equ HEADER_TAG_NOSAVE_OK$ To "" +Equ HEADER_TAG_REDIRECT_TO$ To "" +Equ HEADER_TAG_SELSTMT$ To "" +Equ HEADER_TAG_PREDRAW_EVENT$ To "" +Equ HEADER_TAG_POSTDRAW_EVENT$ To "" +Equ HEADER_TAG_CUSTOM_EVENT$ To "" +Equ HEADER_TAG_TARGET$ To "" +Equ HEADER_TAG_SORT_BY$ To "" +Equ HEADER_TAG_PER_PAGE$ To "" +Equ HEADER_TAG_STATUS$ To "" +Equ HEADER_TAG_SORT_FIELDS$ To "" +Equ HEADER_TAG_SEARCH_READIFONESELECTED$ To "" + +Equ TRIGGER_EVENT_NAMES$ To "Save":@VM:"Delete":@VM:"Cancel":@VM:"New":@VM:"Read" +Equ TRIGGER_EVENT_VALS$ To TRIGGER_EVENT_SAVE$:@vm:TRIGGER_EVENT_DEL$:@VM:TRIGGER_EVENT_CANCEL$:@vm:TRIGGER_EVENT_NEW$:@vm:TRIGGER_EVENT_READ$ + + +If bInitCommon% <> "1" Then + bInitCommon% = "1" + + linktypeNames% = "None":@SVM:"Explicit URL":@SVM:"Page Link":@SVM:"Local Link":@SVM:"O4W Form (Key)":@SVM:"O4W Procedure":@SVM:"Email Link":@SVM:"Embedded URL":@SVM:"LinkedIn Profile":@SVM:"LinkedIn Share" + linktypeValues% = "":@SVM:O4W_LINKTYPE_NORMAL$:@svm:O4W_LINKTYPE_PAGE$:@svm:O4W_LINKTYPE_LOCAL$:@svm:O4W_LINKTYPE_FORM$:@SVM:O4W_LINKTYPE_PROGRAM$:@SVM:O4W_LINKTYPE_EMAIL$:@SVM:O4W_LINKTYPE_EMBED$:@SVM:O4W_LINKTYPE_LINKEDIN_PROFILE$:@SVM:O4W_LINKTYPE_LINKEDIN_SHARE$ + + noYesNames% = "No":@SVM:"Yes" + noYesValues% = "0":@SVM:"1" + + labelPosnNames% = "Side-by-Side":@SVM:"Over-Under":@SVM:"Inline":@SVM:"None" + labelPosnValues% = "1":@SVM:"0":@SVM:"-1":@SVM:"-2" + Equ WIDGET_LABEL_POSN_SXS$ To "1" + Equ WIDGET_LABEL_POSN_OU$ To "0" + Equ WIDGET_LABEL_POSN_INLINE$ To "-1" + Equ WIDGET_LABEL_POSN_NONE$ To "-2" + + convNames% = "Use dictionary":@SVM:"None":@SVM:"2-Place decimal number":@SVM:"Integer (truncates decimal)":@SVM:"4-Place decimal number":@svm:"Dollars":@SVM:"Date":@SVM:"Date, MM/DD/YYYY":@SVM:"Date, MM/DD/YY":@SVM:"European date, DD.MM.YY":@SVM:"Time":@SVM:"Date & Time":@SVM:"Boolean (True/False)":@SVM:"Zip code format (US, Canadian)":@SVM:"US phone number":@SVM:"US Social Security format":@SVM:"Valid email address":@svm:"Other (user entered)" + convValues% = "-":@SVM:"NONE":@SVM:"MD2":@svm:"MD0":@svm:"MD4":@svm:"MD2,$":@SVM:"D":@svm:"D4/":@SVM:"D2/":@svm:"DE.":@svm:"MT":@svm:"DT":@svm:"B":@svm:"[ZIP_FORMAT]":@svm:"[PHONE_FORMAT]":@svm:"[SSN_FORMAT]":@svm:"[EMAIL_FORMAT]":@svm:"USER" + + themeNames% = "Default" + themeValues% = "" + letters = "abcdefghijklmnopqrstuvwxyz" + For each.theme = 1 To 26 + themeNames%<1,1,each.theme+1> = letters[each.theme,1] + themeValues%<1,1,each.theme+1> = letters[each.theme,1] + Next each.theme + + updateTargets% = CONTROL_TYPE_HEADER$:@vm:CONTROL_TYPE_IMAGE$:@vm:CONTROL_TYPE_TEXT$:@vm:CONTROL_TYPE_GOOGLE_MAP$ + updateTargets%<2> = "1":@VM:"1":@VM:"1":@VM:"1" +End + + + diff --git a/SYSPROG/STPROCINS/O4W_JOOMLA_EQUATES.txt b/SYSPROG/STPROCINS/O4W_JOOMLA_EQUATES.txt new file mode 100644 index 0000000..ba2c50b --- /dev/null +++ b/SYSPROG/STPROCINS/O4W_JOOMLA_EQUATES.txt @@ -0,0 +1,22 @@ +compile insert O4W_JOOMLA_EQUATES +Equ JOOMLA_JSON_URL$ To "http://www.revelation.com/testauth.php" +Equ JOOMLA_COOKIE_ID$ To "a0e6d53bc73cf7c0611144d871d8cbdd" +Equ JOOMLA_PERSISTENT_COOKIE_ID$ To "269741eeaee08e441ff044b18e20a973" +Equ JOOMLA_COOKIE_DOMAIN$ To "www.revelation.com" +Equ JOOMLA_COOKIE_PATH$ To "/" +Equ WORKS_GROUP_ID$ To "9" +Equ O4W_TEMPLATE$ To "revtemplateRSS.htm" +Equ DEFAULT_GOOD_URL$ To "http://www.revelation.com" +Equ DEFAULT_BAD_URL$ To "http://www.revelation.com" +Equ MAIN_PAGE_URL$ To "http://www.revelation.com" +/* +Equ SESSION_TABLE_NAME$ To "JOS_SESSION" +Equ SESSION_INFO_ID$ To 5 +Equ SESSION_INFO_ISGUEST$ To 2 +Equ SESSION_INFO_USERNAME$ To 6 +*/ +Equ SESSION_TABLE_NAME$ To "JOS_SESSION_SHORT" +Equ SESSION_INFO_ID$ To 3 +Equ SESSION_INFO_ISGUEST$ To 2 +Equ SESSION_INFO_USERNAME$ To 4 + diff --git a/SYSPROG/STPROCINS/OESS_INFO.txt b/SYSPROG/STPROCINS/OESS_INFO.txt new file mode 100644 index 0000000..2b59a6a --- /dev/null +++ b/SYSPROG/STPROCINS/OESS_INFO.txt @@ -0,0 +1,11 @@ +compile Insert OESS_INFO + +// clientType: +// null: OI or unknown +// 1: EngineServer +// 2: NetOI direct connect ANSI .NET 2.0 +// 3: NetOI direct connect UTF8 .NET 2.0 +// 4: NetOI direct connect ANSI .NET 4.0 +// 5: NetOI direct connect UTF8 .NET 4.0 + +Common /OESS_INFO/ clientType, engineName diff --git a/SYSPROG/STPROCINS/OIPI2_COMMON.txt b/SYSPROG/STPROCINS/OIPI2_COMMON.txt new file mode 100644 index 0000000..a984419 --- /dev/null +++ b/SYSPROG/STPROCINS/OIPI2_COMMON.txt @@ -0,0 +1,16 @@ +compile insert OIPI2_COMMON + +//COMMON /OIPI_COMMON2%/ hWnd%, shell%, oipi_started%, WM_OIPI_SET%, WM_OIPI_GET%, OIPI_TABLE%, OIPI32%,locale,parent%,cancelproc%,handle%,init% + +*COMMON /OIPI_COMMON%/ hWnd%, shell%, oipi_started%, WM_OIPI_SET%, WM_OIPI_GET%, OIPI_CHARMAP%, OIPI32% +*COMMON /%OIPI_VARIABLES2%/ bPrinting,IntStartMode,bExporting,stroipi_charmap_display,stroipi_charmap_save,strPdfExportfile,IntRepeatCnt,Repeatgraphic,Twips_To_Units,bTerm,bPrintPages,bWMFFix +*COMMON /textinfo2/ alignInfo%, textInfo%, widenMargins%,env%,uom%,userpath%,oipiarchive +//OIPI_COMMON_NAME = "%OIPI_VARIABLES2%" +//OIPI_TEXTINFO_NAME = "textinfo2" + +Equ MAX_CHUNK_SIZE$ To 32000 + +* rjc 02-09-21 +$Insert OIPI_VARIABLE_COMMON + + diff --git a/SYSPROG/STPROCINS/OIPI_ALL_COMMON.txt b/SYSPROG/STPROCINS/OIPI_ALL_COMMON.txt new file mode 100644 index 0000000..b447578 --- /dev/null +++ b/SYSPROG/STPROCINS/OIPI_ALL_COMMON.txt @@ -0,0 +1,2 @@ +compile insert OIPI_ALL_COMMON +COMMON /%OIPI_SHARED%/ IsOIPI1@, IsOIPI2@, LastActive@ diff --git a/SYSPROG/STPROCINS/OIPI_COMMON.txt b/SYSPROG/STPROCINS/OIPI_COMMON.txt new file mode 100644 index 0000000..ceb3222 --- /dev/null +++ b/SYSPROG/STPROCINS/OIPI_COMMON.txt @@ -0,0 +1,11 @@ +compile insert OIPI_COMMON + +//COMMON /OIPI_COMMON%/ hWnd%, shell%, oipi_started%, WM_OIPI_SET%, WM_OIPI_GET%, OIPI_TABLE%, OIPI32%,locale,parent%,cancelproc%,handle%,init% + +*COMMON /OIPI_COMMON%/ hWnd%, shell%, oipi_started%, WM_OIPI_SET%, WM_OIPI_GET%, OIPI_CHARMAP%, OIPI32% +*COMMON /%OIPI_VARIABLES%/ bPrinting,IntStartMode,bExporting,stroipi_charmap_display,stroipi_charmap_save,strPdfExportfile,IntRepeatCnt,Repeatgraphic,Twips_To_Units,bTerm,bPrintPages,bWMFFix +*COMMON /textinfo/ alignInfo%, textInfo%, widenMargins%,env%,uom%,userpath%,oipiarchive +COMMON /OI_SP_OPEN_1/ bHoldOpen% + +* rjc 01-09-21 +$Insert OIPI_VARIABLE_COMMON diff --git a/SYSPROG/STPROCINS/OIPI_EQUATES.txt b/SYSPROG/STPROCINS/OIPI_EQUATES.txt new file mode 100644 index 0000000..650e9aa --- /dev/null +++ b/SYSPROG/STPROCINS/OIPI_EQUATES.txt @@ -0,0 +1,94 @@ +compile insert oipi_equates + +* Print Setup Equates + +Equ Portrait$ To 0 +Equ Landscape$ To 1 + +Equ Print_Style$ To 1 +Equ Print_Zoom$ To 2 + +Equ Print_ToPrinter$ To 0 +Equ Display_PrintSetup$ To 1 +Equ Preview_Normal$ To 2 +Equ Print_Mazimized$ To 3 + +Equ Display_AllButtons$ To 0 +Equ Hide_PrintButton$ To 1 +Equ Hide_PrintSetupButton$ To 2 +Equ Hide_AllButtons$ To 3 + + +* TableCell Properties equates - refer to the TABLECELL Help in the Programmer's Reference Manual for more details + +//Table Properties: These settings affect the entire table. + +Equ TcIndent$ To 0 +Equ TcRows$ To 1 +Equ TcCols$ To 2 +Equ TcInsertRow$ To 3 +Equ TcInsertCol$ To 4 +Equ TcDeleteRow$ To 5 +Equ TcDeleteCol$ To 6 + +// Row Properties: These settings affect entire rows or row ranges. + +Equ TcRowHeight$ To 7 +Equ TcRowBorder$ To 8 +Equ TcRowData$ To 9 +Equ TcRowSource$ To 10 +Equ TcRowKeepWithNext$ To 11 +Equ TcRowIsSubHeader$ To 12 +Equ TcRowSpaceBefore$ To 34 +Equ TcRowSpaceAfter$ To 35 +Equ TcRowBorderAbove$ To 36 +Equ TcRowBorderBelow$ To 37 +Equ TcRowBorderColor$ To 38 +Equ TcRowNewPage$ To 39 +Equ TcRowKeepTogether$ To 40 + +//Column Properties: These settings affect entire columns or column ranges. + +Equ TcColWidth$ To 13 +Equ TcColBorder$ To 14 +Equ TcColData$ To 15 +Equ TcColSource$ To 16 +Equ TcColAlign$ To 31 +Equ TcColNoWrap$ To 32 +Equ TcColSkipRepeats$ To 33 +Equ TcColBorderLeft$ To 43 +Equ TcColBorderRight$ To 44 +Equ TcColBorderColor$ To 45 + +//Cell Properties: These settings affect individual cells or cell ranges. + +Equ TcColSpan$ To 17 +Equ TcText$ To 18 +Equ TcAlign$ To 19 +Equ TcBackColor$ To 20 +Equ TcForeColor$ To 21 +Equ TcFont$ To 22 +Equ TcFontName$ To 23 +Equ TcFontSize$ To 24 +Equ TcFontBold$ To 25 +Equ TcFontItalic$ To 26 +Equ TcFontUnderline$ To 27 +Equ TcFontStrikeout$ To 28 +Equ TcPicture$ To 29 +Equ TcPictureAlign$ To 30 +Equ TcRowSpan$ To 41 +Equ TcVertical$ To 42 + +//Text Alignments - for use with the TableCell Alignment property +equ taLeftTop$ to 0 ; * Align to the left and to the top. +equ taCenterTop$ to 1 ; * Align to the center and to the top. +equ taRightTop$ to 2 ; * Align to the right and to the top. +equ taLeftBottom$ to 3 ; * Align to the left and to the bottom. +equ taCenterBottom$ to 4 ; * Align to the center and to the bottom. +equ taRightBottom$ to 5 ; * Align to the right and to the bottom. +equ taLeftMiddle$ to 6 ; * Align to the left and to the middle. +equ taCenterMiddle$ to 7 ; * Align to the center and to the middle. +equ taRightMiddle$ to 8 ; * Align to the right and to the middle. +equ taJustTop$ to 9 ; * Justify and align to the top. +equ taJustBottom$ to 10 ; * Justify and align to the bottom. +equ taJustMiddle$ to 11 ; * Justify and align to the middle. diff --git a/SYSPROG/STPROCINS/OIPI_PIECHART_EQUATES.txt b/SYSPROG/STPROCINS/OIPI_PIECHART_EQUATES.txt new file mode 100644 index 0000000..3908be7 --- /dev/null +++ b/SYSPROG/STPROCINS/OIPI_PIECHART_EQUATES.txt @@ -0,0 +1,9 @@ +compile insert OIPI_PIECHART_EQUATES + +Declare Function OIPI_PIECHART_HELPER +Equ WEDGE_COLOR_DEFAULTS$ To "<>" +Equ WEDGE_COLOR_NONE$ To "<>" +Equ LEGEND_DEFAULTS$ To "<>" +Equ LEGEND_NONE$ To "<>" +Equ LEGEND_BELOW$ To "1" +Equ LEGEND_LEFT$ To "-1" diff --git a/SYSPROG/STPROCINS/OIPI_VARIABLE_COMMON.txt b/SYSPROG/STPROCINS/OIPI_VARIABLE_COMMON.txt new file mode 100644 index 0000000..4acc441 --- /dev/null +++ b/SYSPROG/STPROCINS/OIPI_VARIABLE_COMMON.txt @@ -0,0 +1,57 @@ +compile insert OIPI_VARIABLE_COMMON + +* Rjc 02-09-21 +Declare Function retstack + common /oipi_whichversion/whichroutine@,do_debug@,vsprinter_Version@ + Common /oipi_whichversion_override/ override_vsprinter_value@ + + If vsprinter_Version@ == "" Then + call set_vsprinter() + End + + currstack = retstack() + Begin Case + Case override_vsprinter_value@ = "VSPRINTER1" + * explicit override (added 072823) + whichOne = 1 + Case override_vsprinter_value@ = "VSPRINTER2" + * explicit override (added 072823) + whichOne = 2 + Case inlist(currstack,'SET_PRINTER1',@fm) Or inlist(currstack,'GET_PRINTER1',@fm) Or inlist(currstack, 'VSPRINTER_EVENTS',@FM) + whichOne = 1 + Case inlist(currstack,'SET_PRINTER2',@fm) Or inlist(currstack,'GET_PRINTER2',@fm) Or inlist(currstack,'VSPRINTER2_EVENTS',@FM) + whichOne = 2 + Case vsprinter_version@ == "VSPRINTER1" Or vsprinter_version@ == "SET_PRINTER1" + whichOne = 1 + Case vsprinter_version@ == "VSPRINTER2" Or vsprinter_version@ == "SET_PRINTER2" + whichOne = 2 + Case 1 + * default to 2 + whichOne = 2 + End case + + + If whichOne = 1 then + * Rjc 02-09-21 + OIPI_WIN_COMMON_NAME = "%OIPI_WIN_COMMON%" + OIPI_COMMON_NAME = "%OIPI_VARIABLES%" + OIPI_TEXTINFO_NAME = "textinfo" + frmOIPI = "RTI_VSPRINTER_CLASSIC" + End Else + OIPI_WIN_COMMON_NAME = "%OIPI_WIN_COMMON2%" + OIPI_COMMON_NAME = "%OIPI_VARIABLES2%" + OIPI_TEXTINFO_NAME = "textinfo2" + frmOIPI = "RTI_VSPRINTER" + end + + +COMMON //OIPI_WIN_COMMON_NAME// hWnd%, shell%, oipi_started%, WM_OIPI_SET%, WM_OIPI_GET%, OIPI_TABLE%, OIPI32%,locale,parent%,cancelproc%,handle%,init% +COMMON //OIPI_COMMON_NAME// bPrinting,IntStartMode,bExporting,stroipi_charmap_display,stroipi_charmap_save,strPdfExportfile,IntRepeatCnt,Repeatgraphic,Twips_To_Units,bTerm,bPrintPages,bWMFFix +COMMON //OIPI_TEXTINFO_NAME// alignInfo%, textInfo%, widenMargins%,env%,uom%,userpath%,oipiarchive +* rjc 01-21-21 Added stringbuilder handle +COMMON /OIPI_STRINGBULDER/hCsvSb% +* bzs 041422 added bPutOnTaskbar +Common /OIPI_TASKBAR/ bPutOnTaskbar@ +* bzs 051122 added other options +Common /OIPI_OPTIONS/ bKeepOnTop@, exportFormatList@, EXTRA2@, EXTRA3@, EXTRA4@, EXTRA5@ + diff --git a/SYSPROG/STPROCINS/OIPRINT_EQUATES.txt b/SYSPROG/STPROCINS/OIPRINT_EQUATES.txt new file mode 100644 index 0000000..20299db --- /dev/null +++ b/SYSPROG/STPROCINS/OIPRINT_EQUATES.txt @@ -0,0 +1,168 @@ +compile insert OIPRINT_EQUATES +/*-----[ Font Weights ]-----*/ +equ FW_NORMAL to 0 +equ FW_BOLD to 1 + + +/*-----[ Pen Styles ]-----*/ +equ PS_SOLID to 0 +equ PS_DASH to 1 +equ PS_DOT to 2 +equ PS_DASHDOT to 3 +equ PS_DASHDOTDOT to 4 +equ PS_NULL to 5 +equ PS_INSIDEFRAME to 6 + +/*-----[ Brush Styles ]-----*/ +equ BS_SOLID to 0 +equ BS_HOLLOW to 1 +equ HS_HORIZONTAL to 2 +equ HS_VERTICAL to 3 +equ HS_FDIAGONAL to 4 +equ HS_BDIAGONAL to 5 +equ HS_CROSS to 6 +equ HS_DIAGCROSS to 7 + +/*-----[ Table Border Styles ]-----*/ +equ TB_NONE to 0 +equ TB_BOTTOM to 1 +equ TB_TOP to 2 +equ TB_TOP_BOTTOM to 3 +equ TB_BOX to 4 +equ TB_COLUMNS to 5 +equ TB_COLUMNS_TOP_BOTTOM to 6 +equ TB_ALL to 7 +equ TB_BOX_ROWS to 8 +equ TB_BOX_COLUMNS to 9 + +/*-----[ Page Sizes ]-----*/ +equ LETTER to 1 ;* Letter, 8 1/2 x 11 in. +equ LETTERSMALL to 2 ;* Letter Small, 8 1/2 x 11 in. +equ TABLOID to 3 ;* Tabloid, 11 x 17 in. +equ LEDGER to 4 ;* Ledger, 17 x 11 in. +equ LEGAL to 5 ;* Legal, 8 1/2 x 14 in. +equ STATEMENT to 6 ;* Statement, 5 1/2 x 8 1/2 in. +equ EXECUTIVE to 7 ;* Executive, 7 1/2 x 10 1/2 in. +equ A3 to 8 ;* A3, 297 x 420 mm +equ A4 to 9 ;* A4, 210 x 297 mm +equ A4SMALL to 10 ;* A4 Small, 210 x 297 mm +equ A5 to 11 ;* A5, 148 x 210 mm +equ B4 to 12 ;* B4, 250 x 354 mm +equ B5 to 13 ;* B5, 182 x 257 mm +equ FOLIO to 14 ;* Folio, 8 1/2 x 13 in. +equ QUARTO to 15 ;* Quarto, 215 x 275 mm +equ S10X14 to 16 ;* 10 x 14 in. +equ S11X17 to 17 ;* 11 x 17 in. +equ NOTE to 18 ;* Note, 8 1/2 x 11 in. +equ ENV9 to 19 ;* Envelope #9, 37/8 x 87/8 in. +equ ENV10 to 20 ;* Envelope #10, 41/8 x 9 1/2 in. +equ ENV11 to 21 ;* Envelope #11, 4 1/2 x 10 3/8 in. +equ ENV12 to 22 ;* Envelope #12, 4 1/2 x 11 in. +equ ENV14 to 23 ;* Envelope #14, 5 x 11 1/2 in. +equ CSHEET to 24 ;* C size sheet +equ DSHEET to 25 ;* D size sheet +equ ESHEET to 26 ;* E size sheet +equ ENVDL to 27 ;* Envelope DL, 110 x 220 mm +equ ENVC3 to 28 ;* Envelope C3, 324 x 458 mm +equ ENVC4 to 29 ;* Envelope C4, 229 x 324 mm +equ ENVC5 to 30 ;* Envelope C5, 162 x 229 mm +equ ENVC6 to 31 ;* Envelope C6, 114 x 162 mm +equ ENVC65 to 32 ;* Envelope C65, 114 x 229 mm +equ ENVB4 to 33 ;* Envelope B4, 250 x 353 mm +equ ENVB5 to 34 ;* Envelope B5, 176 x 250 mm +equ ENVB6 to 35 ;* Envelope B6, 176 x 125 mm +equ ENVITALY to 36 ;* Envelope, 110 x 230 mm +equ ENVMONARCH to 37 ;* Envelope Monarch, 37/8 x 7 1/2 in. +equ ENVPERSONAL to 38 ;* Envelope, 35/8 x 6 1/2 in. +equ FANFOLDUS to 39 ;* U.S. Standard Fanfold, 147/8 x 11 in. +equ FANFOLDSTDGERMAN to 40 ;* German Standard Fanfold, 8 1/2 x 12 in. +equ FANFOLDLGLGERMAN to 41 ;* German Legal Fanfold, 8 1/2 x 13 in. +equ ISO_B4 to 42 ;* B4 (ISO) 250 x 353 mm +equ JAPANESE_POSTCARD to 43 ;* Japanese Postcard 100 x 148 mm +equ PS9X11 to 44 ;* 9 x 11 in +equ PS10X11 to 45 ;* 10 x 11 in +equ PS15X11 to 46 ;* 15 x 11 in +equ ENV_INVITE to 47 ;* Envelope Invite 220 x 220 mm +equ RESERVED_48 to 48 ;* RESERVED--DO NOT USE +equ RESERVED_49 to 49 ;* RESERVED--DO NOT USE +equ LETTER_EXTRA to 50 ;* Letter Extra 9 \275 x 12 in +equ LEGAL_EXTRA to 51 ;* Legal Extra 9 \275 x 15 in +equ TABLOID_EXTRA to 52 ;* Tabloid Extra 11.69 x 18 in +equ A4_EXTRA to 53 ;* A4 Extra 9.27 x 12.69 in +equ LETTER_TRANSVERSE to 54 ;* Letter Transverse 8 \275 x 11 in +equ A4_TRANSVERSE to 55 ;* A4 Transverse 210 x 297 mm +equ LETTER_EXTRA_TRANSVERSE to 56 ;* Letter Extra Transverse 9\275 x 12 in +equ A_PLUS to 57 ;* SuperA/SuperA/A4 227 x 356 mm +equ B_PLUS to 58 ;* SuperB/SuperB/A3 305 x 487 mm +equ LETTER_PLUS to 59 ;* Letter Plus 8.5 x 12.69 in +equ A4_PLUS to 60 ;* A4 Plus 210 x 330 mm +equ A5_TRANSVERSE to 61 ;* A5 Transverse 148 x 210 mm +equ B5_TRANSVERSE to 62 ;* B5 (JIS) Transverse 182 x 257 mm +equ A3_EXTRA to 63 ;* A3 Extra 322 x 445 mm +equ A5_EXTRA to 64 ;* A5 Extra 174 x 235 mm +equ B5_EXTRA to 65 ;* B5 (ISO) Extra 201 x 276 mm +equ A2 to 66 ;* A2 420 x 594 mm +equ A3_TRANSVERSE to 67 ;* A3 Transverse 297 x 420 mm +equ A3_EXTRA_TRANSVERSE to 68 ;* A3 Extra Transverse 322 x 445 mm +equ USER to 256 ;* User-defined + +/*----[ Paper Bins ]-----*/ +equ UPPER to 1 ;* Use paper from the upper bin +equ LOWER to 2 ;* Use paper from the lower bin +equ MIDDLE to 3 ;* Use paper from the middle bin +equ MANUAL to 4 ;* Wait for manual insertion of each sheet of paper +equ ENVELOPE to 5 ;* Use envelopes from the envelope feeder +equ ENVMANUAL to 6 ;* Use envelopes from feeder, but wait for manual insertion +equ AUTO to 7 ;* (Default) Use paper from the current default bin +equ TRACTOR to 8 ;* Use paper fed from the tractor feeder +equ SMALLFMT to 9 ;* Use paper from the small paper feeder +equ LARGEFMT to 10 ;* Use paper from the large paper bin +equ LARGECAPACITY to 11 ;* Use paper from the large capacity feeder +equ CASSETTE to 12 ;* Use paper from the attached cassette cartridge + +/*-----[ Duplex Modes ]-----*/ +equ DUPLEX_SIMPLE to 1 ;* Simplex: Single-sided printing with the current orientation setting +equ DUPLEX_HORIZONTAL to 2 ;* Horizontal: Double-sided printing using a horizontal page turn +equ DUPLEX_VERTICAL to 3 ;* Vertical: Double-sided printing using a vertical page turn + +/*-----[ Colors ]-----*/ +equ BLACK to 0 +equ WHITE to 16777215 +equ GRAY to 12632256 +equ DKGRAY to 8421504 +equ RED to 192 +equ GREEN to 49152 +equ BLUE to 12582912 +equ CYAN to 12632064 +equ MAGENTA to 12583104 +equ YELLOW to 49344 +equ DKRED to 128 +equ DKGREEN to 32768 +equ DKBLUE to 8388608 +equ DKCYAN to 8421376 +equ DKMAGENTA to 8388736 +equ DKYELLOW to 32896 + +/*-----[ Misc Equates ]-----*/ +equ NULL_TERM$ to char(0) +equ CRLF$ to char(13):char(10) + +/*-----[ Export Formats ]-----*/ +Equ EF_NONE To 0 +Equ EF_RTF To 1 +Equ EF_HTML To 2 +Equ EF_PDF To 6 +Equ EF_CSV_HDR To 7 +Equ EF_CSV To 8 +Equ EF_TXT To 9 +Equ EF_OIPI To 10 +Equ EF_XLS To 101 +Equ EF_XLSX To 102 +Equ EF_DOCX To 103 +Equ EF_JPG To 104 +Equ EF_GIF To 105 +Equ EF_BMP To 106 +Equ EF_TIFF To 107 +Equ EF_PNG To 108 +Equ EF_EMF To 109 + diff --git a/SYSPROG/STPROCINS/OIREPORT_EQUATES.txt b/SYSPROG/STPROCINS/OIREPORT_EQUATES.txt new file mode 100644 index 0000000..c0b1601 --- /dev/null +++ b/SYSPROG/STPROCINS/OIREPORT_EQUATES.txt @@ -0,0 +1,15 @@ +compile insert oireport_equates + +*** equates for REPOS.OIREPORT.. methods + +EQU OIREPORT_FILE$ TO 'SYSREPOSREPORTS' + +* repository type + +EQU OIREPORT$ TO 'OIREPORT' + +* repository classes for OIREPORT type + +EQU REPORT_BUILDER_LAYOUT$ TO 'RBLAYOUT' +EQU REPORT_DESIGNER_LAYOUT$ TO 'RDLAYOUT' +EQU REPORT_DESIGNER_QUERY$ TO 'RDQUERY' diff --git a/SYSPROG/STPROCINS/OIWIN_COMM_INIT.txt b/SYSPROG/STPROCINS/OIWIN_COMM_INIT.txt new file mode 100644 index 0000000..8e2925d --- /dev/null +++ b/SYSPROG/STPROCINS/OIWIN_COMM_INIT.txt @@ -0,0 +1,51 @@ +compile insert OIWin_Comm_Init +/* + ** Copyright (C) 1992-2013 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : ???? + Date : Sometime before the 7th Day + Purpose : Dynamic Window Common Block + + Comments + ======== + + To access the internal attributes of a particular window, set the variable + WinID to the name of the window immediately before inserting this record + + + Amended Date Reason + ======= ==== ====== + Mr C 05 Mar 14 Updated for v10 + Mr C 27 Jul 10 Changed OIWinReserved@ -> PrevResultRow@ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ COMMON_PREFIX$ to "%COM_" + + CommName@ = COMMON_PREFIX$: WinID + common //CommName@// JoinMap@, | + RowMaps@, | + MasterRowMap@, | + KeyMap@, | + ControlMap@, | + ControlList@, | + OrigResultRow@, | + ControlSemantics@, | + QBFIds@, | + QBFRows@, | + QBFCount@, | + QBFPos@, | + RowLocks@, | + SubRows@(10), | + QBFMode@, | + DataSourceMap@, | + PrevResultRow@ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/OIWIN_COMM_INIT_EX.txt b/SYSPROG/STPROCINS/OIWIN_COMM_INIT_EX.txt new file mode 100644 index 0000000..c586747 --- /dev/null +++ b/SYSPROG/STPROCINS/OIWIN_COMM_INIT_EX.txt @@ -0,0 +1,66 @@ +compile insert OIWin_Comm_Init_Ex +/* + ** Copyright (C) 1992-2019 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : March 2014 + Purpose : Equate to insert the window common block by resolving the + WinID - useful for things like docked panels as the ID + is not prefixed with the the host window ID + + Comments + ======== + + This insert still expects WinID to be set prior to this insert. + + This insert sets a variable called "frameID__" to the actual runtime + frame found in case it is required. + + + Amended Date Reason + ======= ==== ====== + Mr C 11 Feb 19 Updated for bLen() + Mr C 26 Jan 16 Spelling! + Mr C 16 Jan 16 Reset winID so RUN_EVENT sets @window correctly + Mr C 13 Oct 15 Added ps_Get_Property declaration +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function ps_Get_Property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Resolve WinID to a WINDOW + + winID_ = winID + frameID__ = winID + + if ( ps_Get_Property( winID, "TYPE" ) != "WINDOW" ) then + loop + until ( ps_Get_Property( winID, "TYPE" ) == "WINDOW" ) + winID = ps_Get_Property( winID, "PARENT" ) + while bLen( winID ) + repeat + + if bLen( winID ) else + winID = @window + end + + frameID__ = winID + + end + + $insert oiWin_Comm_Init + + // Once we've resolved the window common area we need to reset winID so + // RUN_EVENT can set the correct @Window variable + transfer winID_ to winID + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/OIWIN_DEFAULT_MENU_EQUATES.txt b/SYSPROG/STPROCINS/OIWIN_DEFAULT_MENU_EQUATES.txt new file mode 100644 index 0000000..83c999b --- /dev/null +++ b/SYSPROG/STPROCINS/OIWIN_DEFAULT_MENU_EQUATES.txt @@ -0,0 +1,79 @@ +compile insert oiwin_Default_Menu_Equates +/* + ** Copyright (C) 1992-2021 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Agent C + Date : 14 Jan 21 + Purpose : Equates for use with the default form menu image list + + + Comments + ======== + + The default form image list is + + SYSPROG*IMAGELIST*PNG*OIWIN_DEFAULT_MENU + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _OIWIN_DEFAULT_MENU_EQUATES_ +#define _OIWIN_DEFAULT_MENU_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // OIWIN_DEFAULT_MENU image list index constants + + equ OIWIN_DEFMENU_IMG_NEW$ to 1 + equ OIWIN_DEFMENU_IMG_OPEN$ to 2 + equ OIWIN_DEFMENU_IMG_SAVE$ to 3 + equ OIWIN_DEFMENU_IMG_SAVE_AS$ to 4 + equ OIWIN_DEFMENU_IMG_SAVE_ALL$ to 5 + equ OIWIN_DEFMENU_IMG_CLEAR$ to 6 + equ OIWIN_DEFMENU_IMG_DELETE$ to 7 + equ OIWIN_DEFMENU_IMG_PRINT$ to 8 + equ OIWIN_DEFMENU_IMG_PRINT_PREVIEW$ to 9 + equ OIWIN_DEFMENU_IMG_PRINT_SETUP$ to 10 + equ OIWIN_DEFMENU_IMG_CLOSE$ to 11 + equ OIWIN_DEFMENU_IMG_EXIT$ to 12 + equ OIWIN_DEFMENU_IMG_UNDO$ to 13 + equ OIWIN_DEFMENU_IMG_REDO$ to 14 + equ OIWIN_DEFMENU_IMG_CUT$ to 15 + equ OIWIN_DEFMENU_IMG_COPY$ to 16 + equ OIWIN_DEFMENU_IMG_PASTE$ to 17 + equ OIWIN_DEFMENU_IMG_SELECT_ALL$ to 18 + equ OIWIN_DEFMENU_IMG_QBF_INIT$ to 19 + equ OIWIN_DEFMENU_IMG_QBF_RUN$ to 20 + equ OIWIN_DEFMENU_IMG_QBF_LOAD_LIST$ to 21 + equ OIWIN_DEFMENU_IMG_QBF_ASK_QUERY$ to 22 + equ OIWIN_DEFMENU_IMG_QBF_FIRST$ to 23 + equ OIWIN_DEFMENU_IMG_QBF_PREVIOUS$ to 24 + equ OIWIN_DEFMENU_IMG_QBF_NEXT$ to 25 + equ OIWIN_DEFMENU_IMG_QBF_LAST$ to 26 + equ OIWIN_DEFMENU_IMG_QBF_GOTO$ to 27 + equ OIWIN_DEFMENU_IMG_QBF_TABLE$ to 28 + equ OIWIN_DEFMENU_IMG_QBF_CLOSE$ to 29 + equ OIWIN_DEFMENU_IMG_MDI_CASCADE$ to 30 + equ OIWIN_DEFMENU_IMG_MDI_TILE$ to 31 + equ OIWIN_DEFMENU_IMG_OPTIONS$ to 32 + equ OIWIN_DEFMENU_IMG_HELP$ to 33 + equ OIWIN_DEFMENU_IMG_QUICKHELP$ to 34 + equ OIWIN_DEFMENU_IMG_QBF_GOTOID$ to 35 + equ OIWIN_DEFMENU_IMG_RESERVED_2$ to 36 + equ OIWIN_DEFMENU_IMG_RESERVED_3$ to 37 + equ OIWIN_DEFMENU_IMG_RESERVED_4$ to 38 + equ OIWIN_DEFMENU_IMG_RESERVED_5$ to 39 + equ OIWIN_DEFMENU_IMG_RESERVED_6$ to 40 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/OIWIN_EQUATES.txt b/SYSPROG/STPROCINS/OIWIN_EQUATES.txt new file mode 100644 index 0000000..c06f5a4 --- /dev/null +++ b/SYSPROG/STPROCINS/OIWIN_EQUATES.txt @@ -0,0 +1,604 @@ +compile insert OIWin_Equates +/* + ** Copyright (C) 1992-2022 Revelation Software Inc. All Rights Reserved ** + + Author : ???? + Date : 1992? + Purpose : Structure definitions for SYSREPOSWINS and SYSREPOSWINEXES records + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 01 Jun 22 Uncommented deprecated IOOPTIONS for back-compat reasons + Mr C 17 Jan 22 Added CS_COMMONLIST$ + Mr C 21 Jan 21 Added FIO_ALLOWSEQKEYRESET$ + Added "__" labels for source navigation + Mr C 17 Jan 21 Added FIO_ALLOWFORMSTATE$ + Mr C 09 Dec 20 Updated IOOPTIONS notes for QBFREADMODE + Mr C 05 Nov 20 Added FIO_SUPPRESSSAVEWARN$ + Mr C 16 Apr 20 Added POS_WINMSGLIST$ + Mr C 05 Dec 19 Added POS_UDPNAMES$ and POS_UDPVALUES$ + Mr C 13 Feb 19 Added POS_VIEWPROPERTIES$ + Mr C 11 Feb 19 Added ORR_MODE_CONTROLLISTEX$ + Mr C 04 Jun 18 Added JSPEC_CONTROL_LABEL$ + Mr C 06 Sep 17 Added SYSREPOSWINS row equates + Mr C 20 Aug 17 Added CLOSE event CloseFlags parameter equates + Mr C 04 Aug 17 Updated comments re. Image and ImageList properties + Mr C 14 Jul 17 Added MENUPOS_RESERVED_2$ + Mr C 13 Jul 17 Added MENUPOS_RESERVED_1$ + Mr C 07 Jul 17 Added MENUPOS_MISC$ and Image properties. + rjc 01 Feb 17 Added MENUQEPOS_xxx + Mr C 30 Aug 16 Added POS_FORMDES_SCRIPTS$ + Mr C 22 Jun 16 Added POS_FORMDES_ID$ + Mr C 20 Apr 16 Moved OIWINEXE structure into OIWIN_EQUATES + Mr C 21 Jan 16 Extended generic placeholders once more... + Mr C 10 Jan 16 Added MENUPOS_NAME$, and image/imagelist positions + Mr C 22 Dec 15 Added Menu header positions + Mr C 19 Dec 15 Added Menu Item styles + Mr C 10 Dec 15 Added Menu types + Mr C 09 Dec 15 Added Menu record structure + Mr C 07 Oct 15 Added POS_COMMUTERMODULE$, CS_COMMUTERMODULE$ + Mr C 02 Oct 15 Cleanup, added POS_CURSOR$ + Mr C 08 Sep 15 Extended generic placeholders + MTR 29 Jun 15 Added Temp Event Positions + Mr C 13 Feb 15 Removed DSO-based equates + Mr C 06 Dec 14 Added POS_CONTEXTMENu$ + Mr C 10 Nov 14 Added CS_VALIDMSG$ and POS_VALIDATIONMSG$ + mtr march, 2014 More v10 Updates + Mr C 25 Oct 13 Updated for v10 +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _OIWIN_EQUATES_ +#define _OIWIN_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // OIWIN structure (SYSREPOSWINS records) + // + // record is @rm-delim'd array of header, window, controls, menu + // positions (@vm-delim'd) of window attributes + // applies to window and controls + + equ POS_NAME$ to 1 + equ POS_CLASS$ to 2 + equ POS_TYPE$ to 3 + equ POS_PARENT$ to 4 + equ POS_X$ to 5 + equ POS_Y$ to 6 + equ POS_WIDE$ to 7 + equ POS_HIGH$ to 8 + equ POS_TEXT$ to 9 + equ POS_SDKSTYLE$ to 10 + equ POS_PSSTYLE$ to 11 + equ POS_TAB$ to 12 + equ POS_BKCOLOR$ to 13 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ POS_FORECOLOR$ to 14 + equ POS_LOGFONT$ to 15 + equ POS_MISC$ to 16 + equ POS_EVENTS$ to 17 + equ POS_EVENT_HANDLER$ to 18 + equ POS_QEVENTS$ to 19 + equ POS_RESERVED3$ to 20 + equ POS_RESERVED4$ to 21 + equ POS_SPOTPOS$ to 22 + equ POS_TABLE$ to 23 + equ POS_COLUMN$ to 24 + equ POS_KEY$ to 25 + equ POS_KEYPART$ to 26 + equ POS_JOININFO$ to 27 + equ POS_VALIDATION$ to 28 + equ POS_CONVERSION$ to 29 + equ POS_DEFAULT$ to 30 + equ POS_REQUIRED$ to 31 + equ POS_RESERVED10$ to 32 + equ POS_BITMAP$ to 33 + equ POS_IMAGE$ to 33 ; // synonym for OI10 + equ POS_ICON$ to 34 + equ POS_LIST$ to 35 + equ POS_VALUE$ to 36 + equ POS_SCROLLRANGE$ to 37 + equ POS_SCROLLCHANGE$ to 38 + equ POS_CHARCOUNT$ to 39 + equ POS_NUMCOLS$ to 40 + equ POS_ROWLIMIT$ to 41 + equ POS_COLSTYLES$ to 42 + equ POS_COLWIDE$ to 43 + equ POS_LABEL$ to 44 + equ POS_DDEMODE$ to 45 + equ POS_DDEITEM$ to 46 + equ POS_DDETOPIC$ to 47 + equ POS_DDESERVER$ to 48 + equ POS_DDETIMETOUT$ to 49 + equ POS_CHILD_COORD$ to 50 ; // Deprecated for v10 + equ POS_NOTESINFO$ to 51 ; // Deprecated for v10 - LOTUSNOTES specific -- see notes_oiwin_equates for layout + equ POS_DTSRCINFO$ to 51 ; // Deprecated for v10 - polymorphic structure (overlaps for DATASET and NOTES) + equ POS_GLYPH$ to 52 ; // + equ POS_GLYPHPROPERTIES$ to 53 ; // <0,0,1> ColorKey; <0,0,2> ImageStyle; <0,0,3> ImageOffset; <0,0,4> ImageOrigin; <0,0,5> Alpha value; <0,0,6> ImageCount; <0,0,7> ImageNumber; <0,0,8> ImageAlign; <0,0,9> ImageFrameNumber; <0,0,10> NoAutoScale + equ POS_IMAGEPROPERTIES$ to 54 ; // <0,0,1> ColorKey; <0,0,2> ImageStyle; <0,0,3> ImageOffset; <0,0,4> ImageOrigin; <0,0,5> Alpha value; <0,0,6> ImageCount; <0,0,7> ImageNumber; <0,0,8> ImageAlign; <0,0,9> ImageFrameNumber; <0,0,10> NoAutoScale + equ POS_TEXT_1$ to 55 ; // Generic property + equ POS_TEXT_2$ to 56 ; // Generic property + equ POS_TEXT_3$ to 57 ; // Generic property + equ POS_TEXT_4$ to 58 ; // Generic property + equ POS_TOOLTIP$ to 59 + equ POS_TYPESPECIFIC$ to 60 + equ POS_SIZING$ to 61 + equ POS_DISPLAY$ to 62 ; // <0,0,1> Alpha Value; <0,0,2> GlassMargins; <0,0,3> GlassFrame; <0,0,4> Create Position; <0,0,5> ShowEffect; <0,0,6> Hide Effect; <0,0,7> MaximizeSize + equ POS_BORDER$ to 63 ; // <0,0,1> Width; <0,0,2> Color; <0,0,3> Radius; <0,0,4> RndCnrs; <0,0,5> Edges; <0,0,6> BevelWidth; <0,0,7> BevelStyle; <0,0,8> BevelSysColor + equ POS_COLOR_1$ to 64 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ POS_COLOR_2$ to 65 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ POS_COLOR_3$ to 66 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ POS_COLOR_4$ to 67 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ POS_IMGLIST_1$ to 68 ; // + equ POS_IMGLIST_1_PROPS$ to 69 ; // <0,0,1> ColorKey; <0,0,2> ImageCount; <0,0,3> NoAutoScale + equ POS_IMGLIST_2$ to 70 ; // + equ POS_IMGLIST_2_PROPS$ to 71 ; // <0,0,1> ColorKey; <0,0,2> ImageCount; <0,0,3> NoAutoScale + equ POS_IMGLIST_3$ to 72 ; // + equ POS_IMGLIST_3_PROPS$ to 73 ; // <0,0,1> ColorKey; <0,0,2> ImageCount; <0,0,3> NoAutoScale + equ POS_IMGLIST_4$ to 74 ; // + equ POS_IMGLIST_4_PROPS$ to 75 ; // <0,0,1> ColorKey; <0,0,2> ImageCount; <0,0,3> NoAutoScale + equ POS_LOGFONT_1$ to 80 ; // Same structure as POS_LOGFONT + equ POS_LOGFONT_2$ to 81 ; // Same structure as POS_LOGFONT + equ POS_GLYPH1$ to 82 ; // + equ POS_GLYPH1PROPERTIES$ to 83 ; // <0,0,1> ColorKey; <0,0,2> ImageStyle; <0,0,3> ImageOffset; <0,0,4> ImageOrigin; <0,0,5> Alpha value; <0,0,6> ImageCount; <0,0,7> ImageNumber; <0,0,8> ImageAlign; <0,0,9> ImageFrameNumber; <0,0,10> NoAutoScale + equ POS_GLYPH2$ to 84 ; // + equ POS_GLYPH2PROPERTIES$ to 85 ; // <0,0,1> ColorKey; <0,0,2> ImageStyle; <0,0,3> ImageOffset; <0,0,4> ImageOrigin; <0,0,5> Alpha value; <0,0,6> ImageCount; <0,0,7> ImageNumber; <0,0,8> ImageAlign; <0,0,9> ImageFrameNumber; <0,0,10> NoAutoScale + equ POS_LAYOUT$ to 86 ; // <0,0,1> Padding + equ POS_COLOR_5$ to 87 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ POS_COLOR_6$ to 88 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ POS_ENABLED$ to 89 + equ POS_SPOT_X$ to 90 + equ POS_SPOT_Y$ to 91 + equ POS_VALIDATIONMSG$ to 92 + equ POS_CONTEXTMENU$ to 93 + equ POS_TEXT_5$ to 94 ; // Generic property + equ POS_TEXT_6$ to 95 ; // Generic property + equ POS_TEXT_7$ to 96 ; // Generic property + equ POS_TEXT_8$ to 97 ; // Generic property + equ POS_TEXT_9$ to 98 ; // Generic property + equ POS_TEXT_10$ to 99 ; // Generic property + equ POS_TEXT_11$ to 100 ; // Generic property + equ POS_TEXT_12$ to 101 ; // Generic property + equ POS_CURSOR$ to 102 + equ POS_COMMUTERMODULE$ to 103 ; // WINDOW only + equ POS_TEXT_13$ to 104 ; // Generic property + equ POS_TEXT_14$ to 105 ; // Generic property + equ POS_VIEWPROPERTIES$ to 106 ; // View Based properties <0,0,1> PageSwapRenderMode + equ POS_UDPNAMES$ to 107 ; // @svm'd list of custom property (UDP) names (minus the "@" prefix) + equ POS_UDPVALUES$ to 108 ; // @svm'd list of custom property (UDP) values + equ POS_WINMSGLIST$ to 109 ; // @svm'd list of qualified WINMSG events to track + equ POS_DROPACCEPTLIST$ to 110 ; // @svm'd list of acceptable drag-drop data format names + + equ POS_FORMDES_ID$ to 120 ; // Used by the FormDesigner to store the ID + // of the design-time control in dsProperties + equ POS_FORMDES_SCRIPTS$ to 121 ; // Used by the FormDesigner paste process to + // transfer event scripts + + equ DTSRC_MASTERLIST$ to 1 + equ DTSRC_MAXSTRUCTSIZE$ to 6 ;* max number of fields in any of overlapping structures + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS Menu structure (record 4) + // + // <1> @vm'd menu item structure + // + // <1,1> MENU header item + // <1,2> Menu item (ITEM,POPUP,SEPARATOR) + // ... + // <1,n> + // <2> Menu Event info + // + // <2,1> @tm'd list of Event Script handler IDs + // <2,2> @svm'd list of @tm/@stm Quick event handlers + // <2,3> @svm'd list of Quick Event menu items + // <2,4> Changed flag (ignored) + // + // <2,2> and <2,3> form an AMV group + + equ MENUREC_POS_ITEMS$ to 1 + equ MENUREC_POS_EVENTS$ to 2 + + // Menu Events + equ MENUREC_POS_EV_SCRIPTIDS$ to 1 ; // @tm'd + equ MENUREC_POS_EV_QEHANDLERS$ to 2 ; // @svm/@tm/@stm'd + equ MENUREC_POS_EV_QEIDS$ to 3 ; // @svm'd + equ MENUREC_POS_EV_FLAG$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // menu sub-structure positions + + equ MENUCLASS_CONTEXT$ to "FLOATING" + + // Header "item" + equ MENUHDRPOS_NAME$ to POS_NAME$ + equ MENUHDRPOS_CLASS$ to POS_CLASS$ ; // "FLOATING" for a context menu + equ MENUHDRPOS_TYPE$ to POS_TYPE$ ; // Always MENU + equ MENUHDRPOS_PARENT$ to POS_PARENT$ + + // Standard items + equ MENUPOS_TYPE$ to 1 + equ MENUPOS_NUMITEMS$ to 2 ;* source + equ MENUPOS_END$ to 2 ;* compiled + equ MENUPOS_EVENT$ to 3 ;* source + equ MENUPOS_RESERVED$ to 3 ;* deprecated - don't use this!! + equ MENUPOS_NAME$ to 3 ;* compiled + equ MENUPOS_TEXT$ to 4 + equ MENUPOS_GREY$ to 5 + equ MENUPOS_CHECK$ to 6 + equ MENUPOS_HIDDEN$ to 7 + equ MENUPOS_ACCEL$ to 8 + equ MENUPOS_TOTALITEMS$ to 9 ;* source + equ MENUPOS_HELP_TEXT$ to 9 ;* compiled + equ MENUPOS_HANDLER$ to 10 + equ MENUPOS_STYLE$ to 11 + equ MENUPOS_BITMAP$ to 12 + equ MENUPOS_COLORKEY$ to 13 + equ MENUPOS_IMAGELISTINDEX$ to 14 + equ MENUPOS_IMAGEAUTOSCALE$ to 15 + equ MENUPOS_IMAGEFRAMEINDEX$ to 16 + equ MENUPOS_IMAGEOFFSET$ to 17 + equ MENUPOS_IMAGEORIGIN$ to 18 + equ MENUPOS_IMAGETRANSLUCENCY$ to 19 + equ MENUPOS_MISC$ to 20 + equ MENUPOS_RESERVED_1$ to 21 ; // HMENU + equ MENUPOS_RESERVED_2$ to 22 ; // ItemID + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Quickevent structure + equ MENUQEPOS_TYPE$ to 1 + equ MENUQEPOS_MESSAGE$ to 2 + equ MENUQEPOS_TARGET$ to 3 + equ MENUQEPOS_PARAMS$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ MENUTYPE_MENU$ to "MENU" + equ MENUTYPE_POPUP$ to "POPUP" + equ MENUTYPE_SEPARATOR$ to "SEPARATOR" + equ MENUTYPE_ITEM$ to "ITEM" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // These are the only menu style flags allowed at runtime. + equ MENUSTYLE_AUTOCHECK$ to 0x00000001 + equ MENUSTYLE_GRPBEGIN$ to 0x00000002 + equ MENUSTYLE_GRPEND$ to 0x00000004 + equ MENUSTYLE_SKIPEVENT$ to 0x00000010 + equ MENUSTYLE_GENLOSTFOCUS$ to 0x00000020 + equ MENUSTYLE_PASSTOFRAME$ to 0x00000040 + equ MENUSTYLE_COPYSTATE$ to 0x00000080 + equ MENUSTYLE_TEXTSEPARATOR$ to 0x00000800 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PSCONTROL equates + + equ OIWIN_WINDOW$ to "WINDOW" + equ OIWIN_CHECKBOX$ to "CHECKBOX" + equ OIWIN_COMBOBOX$ to "COMBOBOX" + equ OIWIN_EDITLINE$ to "EDITLINE" + equ OIWIN_EDITFIELD$ to "EDITFIELD" + equ OIWIN_LISTBOX$ to "LISTBOX" + equ OIWIN_PUSHBUTTON$ to "PUSHBUTTON" + equ OIWIN_RADIOBUTTON$ to "RADIOBUTTON" + equ OIWIN_RADIOGROUP$ to "RADIOGROUP" + equ OIWIN_ICON$ to "ICON" + equ OIWIN_MENU$ to "MENU" + + equ OIWIN_BITMAP$ to "BITMAP" + equ OIWIN_EDITBOX$ to "EDITBOX" + equ OIWIN_GROUPBOX$ to "GROUPBOX" + equ OIWIN_SCROLLBAR$ to "SCROLLBAR" + equ OIWIN_DATATABLE$ to "EDITTABLE" + equ OIWIN_TABCONTROL$ to "TABCONTROL" + + equ OIWIN_RADIOBMP$ to "RADIOBMP" + equ OIWIN_CHECKBMP$ to "CHECKBMP" + equ OIWIN_PUSHBMP$ to "PUSHBMP" + + equ OIWIN_RTFBOX$ to "RTFBOX" ; // No longer valid in OI 7 + equ OIWIN_RICHEDITBOX$ to "RICHEDITBOX" + equ OIWIN_OLECONTROL$ to "OLECONTROL" + equ OIWIN_WINCONTROL$ to "WINCONTROL" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS row structures @rm delimited ------ + + equ WINSRC_HEADER$ to 1 + equ WINSRC_WINDOW$ to 2 + equ WINSRC_CONTROLS$ to 3 + equ WINSRC_MENU$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINEXES row structures @rm delimited ------ + + equ WINOBJ_CONTROLS$ to 1 + equ WINOBJ_JOINMAPS$ to 2 + equ WINOBJ_ROWMAPS$ to 3 + equ WINOBJ_MASTERROWMAP$ to 4 + equ WINOBJ_CONTROLMAPS$ to 5 + equ WINOBJ_KEYMAP$ to 6 + equ WINOBJ_CONTROLSEMS$ to 7 + equ WINOBJ_RESMAP$ to 8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +oiwin_JoinSpec__: + + // OIWIN Join Spec structure (source only) + + equ JSPEC_TABLENAME$ to 1 + equ JSPEC_JOIN_COLUMNS$ to 2 + equ JSPEC_JOIN_CONTROLS$ to 3 + equ JSPEC_JOIN_FUNCTION$ to 4 + equ JSPEC_JOIN_PRED$ to 5 + equ JSPEC_KEY_CONTROLS$ to 6 + equ JSPEC_INSERT_FLAG$ to 7 + equ JSPEC_UPDATE_FLAG$ to 8 + equ JSPEC_DELETE_FLAG$ to 9 + equ JSPEC_IMPL_DELETE_FLAG$ to 10 + + equ JSPEC_CONTROL_NAME$ to 1 + equ JSPEC_CONTROL_LABEL$ to 2 + equ JSPEC_CONTROL_INDEX$ to 3 ;* Used to specify column in edit table + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // OIWINEXE structure (SYSREPOSWINEXES records) + // + // record is @rm-delim'd array of control definitions, join maps, row maps, + // master row map, control map, key map; + // + // use oiwin_comm_init or oiwin_comm_init_ex insert to access + + //////////////////////////////////////////////////////////////////////////// + + // Control Map (controlMap@) + + //////////////////////////////////////////////////////////////////////////// + + // Control List (controlList@) -- associated with Control Map + // see PS_EQUATES for layout + + //////////////////////////////////////////////////////////////////////////// + +oiwin_JoinMap__: + + // Join Map structure (joinMap@) + + equ JMAP_TABLENAME$ to 1 + equ JMAP_JOIN_COLUMNS$ to 2 + equ JMAP_JCOLUMN_POS$ to 3 + equ JMAP_JCOLUMN_PART$ to 4 + equ JMAP_JOIN_FIELDS$ to 5 ; // position(s) in masterRowMap@ + equ JMAP_JOIN_FUNCTION$ to 6 + equ JMAP_JOIN_PRED$ to 7 + equ JMAP_KEY_CONTROLS$ to 8 + equ JMAP_KEY_FIELDS$ to 9 + equ JMAP_INSERT_FLAG$ to 10 + equ JMAP_UPDATE_FLAG$ to 11 + equ JMAP_DELETE_FLAG$ to 12 + equ JMAP_IMPL_DELETE_FLAG$ to 13 + equ JMAP_READ_OPTIM$ to 14 + equ JMAP_DBCOMP_CLASS$ to 15 + + //////////////////////////////////////////////////////////////////////////// + +oiwin_RowMap__: + + // Per-table Row Map structure (rowMaps@) + + equ RMAP_COLUMN$ to 1 + equ RMAP_POS$ to 2 + equ RMAP_PART$ to 3 + equ RMAP_FIELD$ to 4 ; // position in masterRowMap@ + equ RMAP_CONV$ to 5 + equ RMAP_VALID$ to 6 + equ RMAP_MV$ to 7 + + //////////////////////////////////////////////////////////////////////////// + +oiwin_MasterRowMap__: + + // Master Row Map structure (masterRowMap@) + + equ MRMAP_CONTROL$ to 1 ;* name of control + equ MRMAP_INDEX$ to 2 ;* index (column) of control (if edit table) + equ MRMAP_TYPE$ to 3 ;* type of control + equ MRMAP_CTLPOS$ to 4 ;* position of control in control list + equ MRMAP_TABPOS$ to 5 ;* Table number field/control is associated with + + //////////////////////////////////////////////////////////////////////////// + +oiwin_KeyMap__: + + // Key Map structure (keyMap@) + + equ KMAP_CONTROL$ to 1 + equ KMAP_TYPE$ to 2 + equ KMAP_CTLPOS$ to 3 ; // position of control in control list + + //////////////////////////////////////////////////////////////////////////// + +oiwin_ControlSemantics__: + + // Control Semantics (controlSemantics@) -- associated with Control Map + + equ CS_TABLE$ to 1 + equ CS_COLUMN$ to 2 + equ CS_IOOPTIONS$ to 2 ; // Aliased - Only for WINDOW objects + equ CS_POS$ to 3 + equ CS_PART$ to 4 + equ CS_CONV$ to 5 + equ CS_VALID$ to 6 + equ CS_MV$ to 7 + equ CS_EVENTS$ to 8 + equ CS_EVENT_HDLR$ to 9 + equ CS_QBFSTATUS$ to 10 + equ CS_LOSTFOCUS$ to 11 ; // True if any condition needs evaluation on losfocus (optim) + equ CS_SIBLING_CTLS$ to 12 ; // positions of sibling controls for update + equ CS_TABLEKEY$ to 13 ; // # of table this is key part for (for autoread and subrefetch) + equ CS_RECALC$ to 14 ; // list of controls to send recalcs to on change + equ CS_GOTFOCUS_VALUE$ to 16 ; // Now stored in UDP + equ CS_SAVEWARN$ to 16 ; // aliased - Only for WINDOW objects + equ CS_REQUIRED$ to 17 + equ CS_DEFAULT$ to 18 + equ CS_NOTESINFO$ to 19 ; // Deprecated - Lotus Notes specific information + equ CS_DATASETINFO$ to 20 ; // Deprecated - DataSet specific information + equ CS_DBCOMP_CLASS$ to 21 ; // class of DBCOMPONENT. + equ CS_VALIDMSG$ to 22 + equ CS_COMMUTERMODULE$ to 23 ; // For WINDOW objects only + equ CS_COMMONLIST$ to 24 ; // List of "attached" labelled common names + + // CS_DBCOMP_CLASS$ equates (DSO and Notes removed) + equ DBCOMPCLASS_NATIVE$ to "" + + // QBF State equates + equ CS_QBFSTATUS_ENABLED$ to 1 + equ CS_QBFSTATUS_READONLY$ to 2 + equ CS_QBFSTATUS_EDITMODE$ to 3 + equ CS_QBFSTATUS_SKIPMODE$ to 4 + equ CS_QBFSTATUS_VALUE$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Resolution Map equates + // + // Resolution map is used at load time to determine which and what + // location resolution need to be performed. It is a sort of run-time + // link map for windows + + equ RESMAP_CTLN$ to 1 + equ RESMAP_ICORES$ to 2 + equ RESMAP_BMPRES$ to 3 + equ RESMAP_NOTESRES$ to 4 + equ RESMAP_DSRES$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +oiwin_IOOoptions__: + + // IOOPTIONS property File I/O Options flags and modes equates + // References the CS_COLUMN$ attribute of semantics for the window + // + // The following options are not used by OI: + // + // FIO_LOCKSUB$ + // FIO_QUOTEPARAMS$ + // + // The following equate names have been deprecated: + // + // FIO_WRITECLEAR$ + // FIO_NOCOMMIT$ + // FIO_ROLLBACKONCLEAR$ + // FIO_REQONSAVEONLY$ + // + // The following options are not exposed because they cannot be used + // + // FIO_LOCKMODE$ + + equ FIO_LOCKMODE$ to 1 ; * 0 Pessemistic locking; 1 Optimistic Locking + equ FIO_LOCKLEVEL$ to 2 ; * Mode Pessimistic Optimistic + ; * 0 Exclusive Compare All + ; * 1 Shared Compare Changes + ; * 2 No Lock No Comparison + equ FIO_LOCKCOORD$ to 3 ; * Do File Coord locks + equ FIO_LOCKSELF$ to 4 ; * 1 - Self locks OK + equ FIO_NOWRITECLEAR$ to 6 ; * Equate is aliased to make more sense! + equ FIO_REQONWRITEONLY$ to 10 ; * 1 - Check required field on WRITE only (not on LOSTFOCUS) + equ FIO_REQONSAVEONLY$ to FIO_REQONWRITEONLY$ ; // synonym + equ FIO_QBFFIREREAD$ to 11 ; * 0 - OBF Load only, 1 - Fire a READ event after a QBF load; 2 - READ event only + equ FIO_NUMERICCOMPARE$ to 12 ; * 1 - Write logic calculates changes using standard comparison + ; * (instead of forcing string comparison) + equ FIO_WRITEMODE$ to 13 ; * 0 - Write controls only + ; * 1 - Write entire Row + equ FIO_WRITEATRECORD$ to FIO_WRITEMODE$ ; // synonym + + equ FIO_LOADPREVALWAYS$ to 14 ; * 1 - Load PrevResultRow@ on a read as well as a save + equ FIO_SUPPRESSSAVEWARN$ to 15 ; * 1 - Don't check SAVEWARN before CLEAR/CLOSE + equ FIO_ALLOWFORMSTATE$ to 16 ; * 1 - Allow FORMSTATECHANGED processing + equ FIO_ALLOWSEQKEYRESET$ to 17 ; * 1 - Allow "=" at key prompt to reset %SK% + + // Deprecated ... (try not to use them - left here for backwards compatibility!) + equ FIO_LOCKSUB$ to 5 ; * 1 - Ignore subrows that are locked + equ FIO_WRITECLEAR$ to 6 ; * 0 - Clear on write; 1 - Don't clear on write + equ FIO_NOCOMMIT$ to 7 ; * 1 - Don't commit transaction after commiting DSOs + equ FIO_NOROLLBACK$ to 8 ; * 1 - Don't rollback transacion if commiting DSOs failed + equ FIO_ROLLBACKONCLEAR$ to 9 ; * 1 - Rollback transaction when clearing the form + equ FIO_QUOTEPARAMS$ to 11 ; * 1 - Quote the quotes before setting DSO arguments in DSOSETPARAM event + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // OIWIN_RESULTROW equates: + + // SET method MODE (param2) + + equ ORR_MODE_ALL$ to 0 ; // or "" + equ ORR_MODE_TABLELIST$ to 1 + equ ORR_MODE_CONTROLLIST$ to 2 + equ ORR_MODE_CONTROLLISTEX$ to 3 + + // SET method FLAGS ( param4 ) + + equ ORR_FLAG_NEWREC$ to 0x00000001 ; // Use ORIG_ when data is null + equ ORR_FLAG_PREVLOAD$ to 0x00000002 ; // No key prompts + equ ORR_FLAG_UPDATEORIG$ to 0x00000004 ; // Update origResultRow@ + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CLOSE event equates + + // CloseFlags parameter + // + // <1> If TRUE$ then suppress savewarn processing + + equ OIW_CSF_POS_NOSAVEWARN$ to 1 + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // LOSTFOCUS event equates + + // Flag parameter - Specifies how the control has lost the focus + // + // 0 - Control has lost focus, and focus has moved to + // another application's window. + // + // 1 - Control has lost focus, and focus has moved to + // a different OpenInsight control. + // + // 2 - This LOSTFOCUS event was generated as a response + // to a MENU event (or programatically generated) + + equ OIW_LFF_OTHERAPP$ to 0 + equ OIW_LFF_OICONTROL$ to 1 + equ OIW_LFF_MENU$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/OIWIN_SYSMSG_EQUATES.txt b/SYSPROG/STPROCINS/OIWIN_SYSMSG_EQUATES.txt new file mode 100644 index 0000000..94b499b --- /dev/null +++ b/SYSPROG/STPROCINS/OIWIN_SYSMSG_EQUATES.txt @@ -0,0 +1,66 @@ +compile insert oiwin_SysMsg_Equates +/* + ** Copyright (C) 1992-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : Jan 2021 + Purpose : Constants for working with the SYSMSG event + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 01 Feb 21 Added SYSMSG_RESETSKERR$ +*/ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _OIWIN_SYSMSG_EQUATES_ +#define _OIWIN_SYSMSG_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Common "Cancel Flag" return values + + equ RESP_SAVE$ to 1 + equ RESP_CONTINUE$ to 2 + equ RESP_CANCEL$ to 3 + equ RESP_YES$ to 1 + equ RESP_NO$ to 2 + equ RESP_OK$ to "" + +/////////////////////////////////////////////////////////////////////////////// + + // SYSMSG codes + + equ SYSMSG_SAVEWARN$ to 1 ; // Data may be lost, save first warning + equ SYSMSG_DELETEWARN$ to 2 ; // Verify delete message + equ SYSMSG_VALIDERR$ to 3 ; // Data Validation error + equ SYSMSG_REQUIREERR$ to 4 ; // Required control value error + equ SYSMSG_READERR$ to 5 ; // Error reading row + equ SYSMSG_READSUBERR$ to 6 ; // Error reading subsidiary row + equ SYSMSG_LOCKERR$ to 7 ; // Error locking row + equ SYSMSG_SUBLOCKERR$ to 8 ; // Error locking subsidiary row - unused + equ SYSMSG_WRITELOCKERR$ to 9 ; // Do not have lock at write time + equ SYSMSG_NOHELPINFO$ to 10 ; // No help avail + equ SYSMSG_NOOPTIONSINFO$ to 11 ; // No option avail + equ SYSMSG_NEWROWINFO$ to 12 ; // New row informational - null msg + equ SYSMSG_QBFABSPROMPT$ to 13 ; // QBF Absolute prompt message + equ SYSMSG_QBFINITOFF$ to 14 ; // Can't execute - not in init mode + equ SYSMSG_NULLKEYERR$ to 15 ; // Null key - cannot read or write + equ SYSMSG_NOLOCKERR$ to 16 ; // Row not locked - cannot save or delete + equ SYSMSG_OVERWRITE$ to 17 ; // Record exists on write-without-read + equ SYSMSG_DELETEERR$ to 18 ; // Error deleting a row + equ SYSMSG_CHANGEWARN$ to 20 ; // Data may be lost warning - NO SAVE option! + equ SYSMSG_SAVEWARNINFO$ to 21 ; // Save warn has been changed - null msg + equ SYSMSG_READQBFCLOSE$ to 22 ; // Viewing this entry will close the current QBF session + equ SYSMSG_RESETSKERR$ to 23 ; // Error resetting sequential key counter + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/OLIST_COMMON.txt b/SYSPROG/STPROCINS/OLIST_COMMON.txt new file mode 100644 index 0000000..0908ced --- /dev/null +++ b/SYSPROG/STPROCINS/OLIST_COMMON.txt @@ -0,0 +1,45 @@ +Compile Insert OLIST_Common + +/* + +** +** NOTE: +** RTI_OLIST_COMMON holds and restores this family of common variables +** If you modify this common you must make the same modifications to the RTI_OLIST_COMMON procedure + + Amended Date Reason + ======= ==== ====== + + Mr C 29th July 1999 Added the SLRecCount@ common variable + + Mr C 23rd October 97 Combined the SLIST_BREAKS and SLIST_LIMIT common declarations together so that + we can use the %%SLIST%% common are in the same program + + ( The debugger GPFs if we break in a program with more than 10 Common declarations ) + + RJF 11/03/00 Added Legal_Paper to /SLIST_PRINT/ common + WER 07/14/03 Added old commons used in first version of Olist used for colors, shade, etc. + RJC 03/14/22 Added AutofitFlag + RJC 04/18/22 Added themes + RJC 04/25/22 Added ExplicitKeys +*/ + +Common /OLIST_SELECT/ Table,Dictionary,Handle,Select,Bys,Withs,NoOfRows,ListActive,SLRecCount@,OLRecCount@ +Common /OLIST_COLUMN/ Columns,NoOfColumns,ColumnHdrs,Widths,Justifications,OConvs,IConvs,MultiValues +Common /OLIST_FONTS/ Fonts,DefaultFont,DefaultFontName,DefaultFontSize,DefaultFontBold,DefaultFontItalic,DefaultFontULine,FootingFont,ColHdrFont,DefaultFontColor,HeadingFont +Common /OLIST_TOTALS/ TotalFlags,AverageFlags,GrandTotalFlags,Totals,TotalsRequired +Common /OLIST_BREAKS/ Breaks,BreakFlags,BreaksRequired,BreakHeadingColumn,Limit,AMV +Common /OLIST_FORMAT/ DetSupp,ColHdrSupp,DblSpc,Box,Grids,Centre,Grid,KeepTogether,CSVOpts@ +Common /OLIST_HDRFTR/ Heading,Footing,NoOfHeadingLines,NoOfFootingLines,cbDictItems@,cbDictFormats@,ColUdlSupp@ +Common /OLIST_CONVS/ DateFormat,TimeFormat +Common /OLIST_PRINT/ Portrait,Landscape,PageSetup,Output,PaperSize@,TotalLines@, PrinterDevice@ +Common /OLIST_SHADE/ Shade, ColShade, ColHdrShade +Common /OLIST_ORIGIN/ Olist_Origin +Common /OLIST_COLSIZE/ Colsizes +common /olist_target/ tgt_sgrid +common /olist_autofit/ ColWidthLockedFlags,FontSizeLockedFlags,autofitFlag +common /olist_colorthemes/ ColorThemeName +common /olist_ExplicitKeys/ ExplicitKeys +* Origin added 10/1/04 because of total line problems in report builder + +** Common /SLIST_LIMIT/ Limit,AMV diff --git a/SYSPROG/STPROCINS/OLIST_EQUATES.txt b/SYSPROG/STPROCINS/OLIST_EQUATES.txt new file mode 100644 index 0000000..e389ee7 --- /dev/null +++ b/SYSPROG/STPROCINS/OLIST_EQUATES.txt @@ -0,0 +1,82 @@ +Compile Insert OList_Equates +/* +** 03/09/22 rjc update for oi10 - untouched since original SLIST to OLIST conversion +*/ + +#pragma format_indent_comments +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#IFNDEF _OLIST_EQUATES_ +#DEFINE _OLIST_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + Equ ActiveListProperty$ To "@LISTACTIVE" ; * // Property used to flag (TRUE or FALSE) if there + * // a select list 'active'. @List_Active gets blown + * // away by the system..so we need to track an active + * .. ourselves + + + **************************************************************************************************************** + + +* // REPOSITORY EQUATES + + Equ ReposOListTypeName$ To "OIREPORT" + Equ ReposOListListClass$ To "OLISTLIST" + Equ ReposOListQueryClass$ To "OLISTQUERY" + Equ ReposOListReportClass$ To "OLISTLAYOUT" + + + **************************************************************************************************************** + + +* // %%OLIST%% COMMON + + * // SLCancel@ Set to true if if the user clicks the 'Stop' button on the SLIST MdiFrame + + Common /%%OLIST%%/ OLCancel@ + + + + **************************************************************************************************************** + + + * // Default Settings for %%OLIST%% + + Equ SListIniDefaultDest$ To "SCREEN" + Equ SListIniDefaultOrient$ to "PORTRAIT" + + + + * // SLIST_PRODUCE Equates + + Equ OIPIExport$ to 1 + Equ HTMLExport$ to 2 + Equ DOSExport$ to 3 + + Equ CSVType$ to 1 + Equ TABType$ to 2 + + + Equ CSVOptsQuote$ to 1 + Equ CSVOptsMVDelim$ to 2 + + + equ oipiFont_Name$ to 1 // Font Name + equ oipiFont_Size$ to 2 // Point Size 4-128 + equ oipiFont_Just$ to 3 // Justification "L", "R", or "C" + equ oipiFont_Bold$ TO 4 // 0 = off, 1 = on + equ oipiFont_Italics$ TO 5 // 0 = off, 1 = on + equ oipiFont_Underline$ to 6 // 0 = off, 1 = on + equ oipiFont_Strikethrough$ to 7 // Not Implemented + equ oipiFont_ForeColor$ to 8 // + equ oipiFont_TextAngle$ to 9 // In tenth of degrees + equ oipiFont_TextAlign$ to 10 //0=Top,1=Bottom,2=Baseline + equ oipiFont_Maxpos$ to 10 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ENDIF +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/OLIST_QUERY_EQUATES.txt b/SYSPROG/STPROCINS/OLIST_QUERY_EQUATES.txt new file mode 100644 index 0000000..be457a6 --- /dev/null +++ b/SYSPROG/STPROCINS/OLIST_QUERY_EQUATES.txt @@ -0,0 +1,17 @@ +Compile Insert OLIST_QUERY_EQUATES + +/* + Author Mr C + Date 13th August 1997 + + Structure of the OLISTQUERY record in SYSREPOSREPORTS +*/ + + Equ OLQ_Desc$ To 1 + Equ OLQ_Date$ To 2 + Equ OLQ_Time$ To 3 + Equ OLQ_User$ To 4 + Equ OLQ_SortBy$ To 5 + Equ OLQ_SelCriteria$ To 6 + Equ OLQ_TableName$ To 7 + Equ OLQ_Sentence$ To 8 diff --git a/SYSPROG/STPROCINS/OLIST_REPORT_EQUATES.txt b/SYSPROG/STPROCINS/OLIST_REPORT_EQUATES.txt new file mode 100644 index 0000000..ed00cae --- /dev/null +++ b/SYSPROG/STPROCINS/OLIST_REPORT_EQUATES.txt @@ -0,0 +1,85 @@ +Compile Insert OLIST_REPORT_EQUATES + +/* + Author Mr C + Date 30th July 1997 +*/ + +/* + Structure of the SLISTLAYOUT record in SYSREPOSREPORTS +*/ + + Equ OLR_Desc$ To 1 + Equ OLR_Date$ To 2 + Equ OLR_Time$ To 3 + Equ OLR_User$ To 4 + Equ OLR_IDSupp$ To 5 + Equ OLR_DetSupp$ To 6 + Equ OLR_ColHdrSupp$ To 7 + Equ OLR_HdrSupp$ To 8 + Equ OLR_DblSpc$ To 9 + Equ OLR_KeepTogether$ To 10 + Equ OLR_Box$ To 11 + Equ OLR_Grid$ To 12 + Equ OLR_Centre$ To 13 + Equ OLR_Orientation$ To 14 ; *** 14 USED TO BE PORTRAIT + *** 15 USED TO BE LANDSCAPE + Equ OLR_PaperSize$ to 15 + Equ OLR_GrandTotal$ To 16 + Equ OLR_GrandTotalOptions$ To 17 + *** 18 NOT DEFINED + Equ OLR_Font$ To 19 + *** 20 USED TO BE FONT SIZE + *** 21 USED TO BE FONT BOLD + *** 22 USED TO BE FONT ITALIC + *** 23 NOT DEFINED + Equ OLR_HeaderFont$ To 24 + *** 25 USED TO BE HEADER FONT SIZE + *** 26 USED TO BE HEADER FONT BOLD + *** 27 USED TO BE HEADER FONT ITALIC + *** 28 NOT DEFINED + Equ OLR_FooterFont$ To 29 + *** 30 USED TO BE FOOTER FONT SIZE + *** 31 USED TO BE FOOTER FONT BOLD + *** 32 USED TO BE FOOTER FONT ITALIC + *** 33 NOT DEFINED + Equ OLR_CHFFont$ To 34 + *** 35 USED TO BE COL HEADER FONT SIZE + *** 36 USED TO BE COL HEADER FONT BOLD + *** 37 USED TO BE COL HEADER FONT ITALIC + Equ OLR_CHFShading$ To 38 + *** 39 USED TO BE LIMIT...NOW MOVED IN WITH THE COLUMN DEFINITIONS + Equ OLR_Other To 40 + *** 41 NOT DEFINED + Equ OLR_HeaderText$ To 42 + Equ OLR_FooterText$ To 43 + Equ OLR_Destination$ To 44 + Equ OLR_ColumnNames$ To 45 + Equ OLR_TableName$ To 46 + Equ OLR_QueryName$ To 47 + Equ OLR_KeyList$ To 48 + Equ OLR_ColumnDefs$ To 49 ; *** NOT PREVIOUSLY DEFINED + Equ OLR_Sentence$ To 50 + Equ OLR_Legal$ To 51 ;* RJF 11/02/00 + Equ OLR_GTFont$ To 52 + Equ OLR_OutputFileName$ To 53 + Equ OLR_CSVOpts$ To 54 + Equ OLR_HeaderShade$ To 55 + Equ OLR_FooterShade$ To 56 + +/* + Structure of the Columns Definitions held in field 49 of the SLIST_LAYOUT record +*/ + + Equ ColDef_Heading$ To 1 + Equ ColDef_Conv$ To 2 + Equ ColDef_Length$ To 3 + Equ ColDef_Justification$ To 4 + Equ ColDef_FontName$ To 5 + Equ ColDef_Shading$ To 6 + Equ ColDef_BreakOn$ To 7 + Equ ColDef_Average$ To 8 + Equ ColDef_Total$ To 9 + Equ ColDef_Limit$ To 10 + Equ ColDef_MV$ To 11 ; * // Indicates if this column is flagged as an MV'd column in the dictionary + Equ ColDef_NullHeading$ To 12 diff --git a/SYSPROG/STPROCINS/OP.TOKEN.EQUATES.txt b/SYSPROG/STPROCINS/OP.TOKEN.EQUATES.txt new file mode 100644 index 0000000..b42d1a3 --- /dev/null +++ b/SYSPROG/STPROCINS/OP.TOKEN.EQUATES.txt @@ -0,0 +1,15 @@ +compile Insert OP.TOKEN.EQUATES +* rjc 02-22-15 copied From Arev_BP, +EQUATE NO.OP$ TO 0 +EQUATE EQ.OP$ TO 1 +EQUATE GT.OP$ TO 2 +EQUATE LT.OP$ TO 3 +EQUATE GE.OP$ TO 4 +EQUATE LE.OP$ TO 5 +EQUATE CONTAIN.OP$ TO 6 +EQUATE START.OP$ TO 7 +EQUATE END.OP$ TO 8 +EQUATE MATCH.OP$ TO 9 +EQUATE FROM.TO.OP$ TO 10 +EQUATE BETWEEN.OP$ TO 11 +* Source Date: 10:56:23 25 MAY 1988 Build ID: AREV*1.0.24 Level: 2.0 diff --git a/SYSPROG/STPROCINS/OR_EQUATES.txt b/SYSPROG/STPROCINS/OR_EQUATES.txt new file mode 100644 index 0000000..9594e20 --- /dev/null +++ b/SYSPROG/STPROCINS/OR_EQUATES.txt @@ -0,0 +1,232 @@ +compile insert or_equates + +******** OR_EQUATES ********* + +* declarations + +DECLARE FUNCTION GET_PROPERTY, SET_PROPERTY, SEND_MESSAGE, DIALOG_BOX +DECLARE FUNCTION MESSAGE_BOX, GET_DIALOG_PARAMS, UTILITY +DECLARE FUNCTION REPOSITORY, ENTID, GETAPPID, GET_STATUS +DECLARE FUNCTION REPOS_RESOLVE_ENTITY, RESTOSTRING + +DECLARE SUBROUTINE SET_PROPERTY, MESSAGE_BOX, SEND_MESSAGE, UTILITY +DECLARE SUBROUTINE END_DIALOG, START_WINDOW, END_WINDOW +DECLARE SUBROUTINE REPOSITORY, SET_STATUS + +* common constants + +EQU IMGSEP$ TO ':' ;* image separator for BMP-lists +EQU LSTSEP$ TO \F7\ ;* lists separator for @-properties + +EQU CHARWIDTH$ TO 8 ;* character width in pixels + +EQU ORDERIMG$ TO 3 +EQU SPACEIMG$ TO 1 + +EQU On$ TO 1 +EQU Off$ TO 0 + +* MESSAGE_BOX answers + +EQU MBA_OK$ TO 1 +EQU MBA_CANCEL$ TO 2 +EQU MBA_ABORT$ TO 3 +EQU MBA_RETRY$ TO 4 +EQU MBA_IGNORE$ TO 5 +EQU MBA_YES$ TO 6 +EQU MBA_NO$ TO 7 + +* for Select Rows dialog box + +EQU EPSILON_TOKEN$ TO 1 +EQU STATEMENT_TOKEN$ TO 2 +EQU OPARANTES_TOKEN$ TO 3 +EQU CPARANTES_TOKEN$ TO 4 +EQU OPERATOR_TOKEN$ TO 5 + +* objects + +EQU MAINWIN$ TO 'ORMAIN' + +* literals + +EQU RES_UNTITLED$ TO 5 +EQU RES_TITLE$ TO 6 +EQU RES_ORIG_TITLE$ TO 7 +EQU RES_SAVEAS$ TO 8 +EQU RES_OPEN$ TO 9 +EQU RES_REPORT$ TO 10 +EQU RES_FILTERS$ TO 11 +EQU RES_REPNOTFOUND$ TO 12 +EQU RES_TABLE$ TO 13 +EQU RES_TABLEUSING$ TO 14 +EQU RES_CANNOTSAVE$ TO 15 +EQU RES_CANNOTOPENDICT$ TO 16 +EQU RES_SAVEOK$ TO 17 +EQU RES_INUSE$ TO 18 +EQU RES_CHECKEDOUT$ TO 19 +EQU RES_NOSAVE$ TO 20 +EQU RES_NOREAD$ TO 21 +EQU RES_TOPIC$ TO 22 +EQU RES_PAGE$ TO 23 +EQU RES_DATE$ TO 24 +EQU RES_TIME$ TO 25 +EQU RES_TABLE1$ TO 26 +EQU RES_VALUE$ TO 27 +EQU RES_PRINTTOFILE$ TO 28 +EQU RES_REPWIDTH$ TO 29 +EQU RES_COLFROMTABLE$ TO 30 +EQU RES_DISKFULL$ TO 31 +EQU RES_PREVIEW$ TO 32 +EQU RES_ERRORWRITING$ TO 33 +EQU RES_ERRORCODE$ TO 34 +EQU RES_COLDESCRIPT$ TO 35 +EQU RES_ERRORWRIOSFILE$ TO 36 +EQU RES_WRITINGREP$ TO 37 +EQU RES_PREVIEWREP$ TO 38 +EQU RES_DISKOVRFLW$ TO 39 +EQU RES_COMPOSECOMP$ TO 40 +EQU RES_PARENMISMATCH$ TO 41 +EQU RES_STATMISSING$ TO 42 +EQU RES_OPMISSING$ TO 43 +EQU RES_STATORXOP$ TO 44 +EQU RES_USESTAT$ TO 45 +EQU RES_SELECTROWS$ TO 46 +EQU RES_AND$ TO 47 +EQU RES_OR$ TO 48 + +* Global variables (@-properties) + +EQU FOCUS$ TO '@FOCUS' ;* recent focus object + +EQU QUERY$ TO '@QUERY' + +EQU TABLE$ TO '@TABLE' + EQU TableName$ TO 1 + EQU DictName$ TO 2 + EQU ChangeFlag$ TO 3 + EQU NoChanges$ TO 0 + EQU TableChanged$ TO 1 + EQU DictChanged$ TO 2 + +EQU VIEW$ TO '@VIEW' +EQU DISPLAY$ TO '@DISPL' +EQU SORT$ TO '@SORT' + +* VIEW$ ::= +* <@fm delimeted list of ColumnName> LSTSEP$ +* <@fm delimeted list of ColumnDescription (defaults)> +* +* DISPLAY$ ::= +* <@fm-delimeted list of ColumnName> LSTSEP$ +* <@fm-delimeted list of ColumnDescription> +* +* SORT$ ::= +* <@fm-delimeted list of ImagedColumnName> +* +* +* ::= +* IMGSEP$ +* +* ::= +* <@vm delimeted array of data (see below)> +* + EQU CD_Statistic$ TO 1 + EQU CDS_None$ TO 1 + EQU CDS_BreakOn$ TO 2 + EQU CDS_Total$ TO 3 + EQU CDS_Average$ TO 4 + + EQU CD_Sort$ TO 2 + EQU CDSO_None$ TO 0 + EQU CDSO_Ascending$ TO 1 + EQU CDSO_Descending$ TO 2 + + EQU CD_BreakFormat$ TO 3 + EQU CDB_None$ TO 0 + EQU CDB_Condence$ TO 1 + EQU CDB_Insert$ TO 2 + EQU CDB_Underline$ TO 4 + EQU CDB_Overline$ TO 8 + EQU CDB_Page$ TO 16 + + EQU CD_BreakText$ TO 4 + * should be in sync witn CD_Statistic$ + EQU CDB_DefaultText$ TO '':@FM:'***':@FM:'{TOTAL}':@FM:'{AVERAGE}' + + EQU CD_ColumnLabel$ TO 5 + EQU CD_ColumnLength$ TO 6 + EQU CD_Oconv$ TO 7 + + EQU CD_Justification$ TO 8 + EQU CDJ_Left$ TO 'L' + EQU CDJ_Center$ TO 'C' + EQU CDJ_Right$ TO 'R' + +EQU FORMAT$ TO '@FRMT' +* +* FORMAT$ ::= +* <@vm-delimeted array of data (see below)> +* + EQU FR_IsHeading$ TO 1 + EQU FR_IsFooting$ TO 2 + EQU FR_IsColHead$ TO 3 + EQU FR_IsDetail$ TO 4 + EQU FR_Heading$ TO 5 + EQU FR_Footing$ TO 6 + EQU FR_GrandHeading$ TO 7 + EQU FR_GrandFooting$ TO 8 + EQU FR_Last$ TO 8 + +EQU PAGE$ TO '@PAGE' +* +* PAGE$ ::= +* <@vm-delimeted array of data (see below)> +* + EQU PG_Left$ TO 1 + EQU PG_Top$ TO 2 + EQU PG_Width$ TO 3 + EQU PG_Height$ TO 4 + +* +* ::= +* @FM +* @FM +* FORMAT$ +* @RM +* TABLE$ +* @RM +* DISPLAY$ +* @RM +* SORT$ +* @RM +* QUERY$ +* + + EQU RT_RLScript$ TO 1 + EQU RT_Date$ TO 2 + EQU RT_Format$ TO 3 + +*** VIEW processor's equates + +EQU VP_RLISTSCRIPT$ TO '@RLS' +EQU VP_TEMPFILE$ TO 'vp':@STATION [1, 5]:'~.tmp' +EQU VP_MAXFRAMESIZE$ TO 30000 + +EQU VP_FRAME$ TO '@FRAME' + EQU VPF_CURROFFSET$ TO 1 + EQU VPF_NEXTOFFSET$ TO 2 + EQU VPF_PREVOFFSET$ TO 3 + EQU VPF_FIRSTPAGE$ TO 4 + EQU VPF_LASTPAGE$ TO 5 + EQU VPF_DATA$ TO 6 + +EQU VP_PAGE$ TO '@VPG' + EQU VPP_WRITEPAGE$ TO 1 + EQU VPP_RLISTACTIVE$ TO 2 + EQU VPP_VIEWPAGE$ TO 3 + EQU VPP_TEXT$ TO 4 + +*** Help + +EQU HELPFILE$ TO 'OINSIGHT.HLP' diff --git a/SYSPROG/STPROCINS/OSERROR_EQUATES.txt b/SYSPROG/STPROCINS/OSERROR_EQUATES.txt new file mode 100644 index 0000000..a618ce7 --- /dev/null +++ b/SYSPROG/STPROCINS/OSERROR_EQUATES.txt @@ -0,0 +1,69 @@ +compile insert osError_equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : January 2013 + Purpose : OS Error constants + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _OSERROR_EQUATES_ +#define _OSERROR_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ OS_PREFIX$ to "OS" + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // Status() codes: + + equ OSERR_STAT_NONE$ to 0 ; * // No error + equ OSERR_STAT_INVALID_FILE_NAME$ to 1 ; * // Bad OS file name + equ OSERR_STAT_ACCESS_DENIED$ to 2 ; * // Access denied by the OS + equ OSERR_STAT_DISK_FULL$ to 3 ; * // Disk or directory is full + equ OSERR_STAT_FILE_DNE$ to 4 ; * // File does not exist + * what happened to 5? + equ OSERR_STAT_FILE_READONLY$ to 6 ; * // File is readonly + equ OSERR_STAT_UNDEFINED$ to 7 ; * // Undedfined OS Error + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + * // Error text codes -these are the "OS" errors in REVERROR.DAT + * // + * // OS101: "%1%" is an invalid OS file name. + * // OS102: Access denied by the operating system to the "%1%" file. + * // OS103: Error in the OS file "%1%". Disk volume full. + * // OS104: The OS file "%1%" does not exist. + * // OS106: The OS file "%1%" is read-only. + * // OS107: Undefined error during a OS file operation. File: "%1%" - Status(): "%2%" + + equ OSERR_BASE$ to 100 + + equ OSERR_INVALID_FILE_NAME$ to 101 ; * "%1%" is an invalid OS file name + equ OSERR_ACCESS_DENIED$ to 102 ; * Access denied by the operating system to the "%1%" file. + equ OSERR_DISK_FULL$ to 103 ; * Error in the OS file "%1%". Disk volume full. + equ OSERR_FILE_DNE$ to 104 ; * The OS file "%1%" does not exist. + * // no 5? + equ OSERR_FILE_READONLY$ to 106 ; * The OS file "%1%" is read-only. + equ OSERR_FILE_UNDEFINED$ to 107 ; * Undefined error during a read/write/delete operation. OS File : %1% Status(): %2% + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/POPUP_EQUATES.txt b/SYSPROG/STPROCINS/POPUP_EQUATES.txt new file mode 100644 index 0000000..fe6cb82 --- /dev/null +++ b/SYSPROG/STPROCINS/POPUP_EQUATES.txt @@ -0,0 +1,207 @@ +compile insert POPUP_EQUATES +/* + ** Copyright (C) 1992-2022 Revelation Software Inc. All Rights Reserved ** + + Author : ???? + Date : ???? + Purpose : Constants for use with the popup function + + Amended Date Reason + ======= ==== ====== + Mr C 13 Apr 22 Removed logical insert + Mr C 07 May 19 Added PMODE$ constants + Mr C 11 Jan 17 Added Async and PGO fields + WER 25 Apr 16 Expanded on WIDTH and HEIGHT + Mr C 09 Apr 16 Added PDISPLAY$ constants + Mr C 28 Mar 16 Added PEMPTYTEXT$ + Mr C 12 Feb 16 Removed DataSet notes, moved Popup DSN to separate + equates + Mr C 23 Jan 16 Clarified PVERSION$ contents + Mr C 03 Dec 15 Added PVERSION$ and PFORECOLOR$ + Mr C 09 Nov 15 Updated for v10 + rjc 15 Apr 15 Added colors (rather than color_equates) to fix + compiler warnings about color_window$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _POPUP_EQUATES_ +#define _POPUP_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function Popup + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + #ifdef POPUP_PS9 + common /%POPUP%/ Popup_Struct@, Popup_ColCount@, Popup_hFile@, Popup_KeyList@, Popup_OpenDocIDs@, Popup_ConInfo@, Popup_hWndET@, Popup_ClickPos@, Popup_Type@, Popup_Field@, Popup_Oconvs@, Popup_Fields@, Popup_RetVal@, Popup_Cancelled@, Popup_Unused_1@ + * ClickPos <1>=area <2>=row# <3>=state <4>=select counter + * hFile <1>=data <2>=dict + * ConInfo <1>=ds <2>=xo =name =handle =owned (created by Popup) + #endif + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * Popup Record structure EQUATEs + equ PCOL$ to 1 ;* Window X position, H-alignment, and desktop flag + equ PROW$ to 2 ;* Window Y position, V-alignment, and desktop flag + equ PWIDTH$ to 3 ;* Popup window width (number of visible columns) + equ PHEIGHT$ to 4 ;* Popup window height (number of visible rows) + equ PBKCOLOR$ to 5 ;* EditTable backcolor + equ PFONT$ to 6 ;* EditTable font + equ PFILE$ to 7 ;* C,F,K,R,T - Table Name, + equ PDISPLAY$ to 8 ;* C - CursorNo, F - , K - @vm'd keys, L - @vm,@svm'd data, R - key, T =- Select criteria + equ PFORMAT$ to 9 ;* column format information (@vm delim'd by column, @svm by attribute) field, width, just, heading just, oconv, heading + equ PMODE$ to 10 ;* T=Table, K=Table Keys, + ;* C=Cursor of Table Keys, L=Literal Data (@vm/@svm), + ;* R=Columns (values) from a row, F=Column from a row (subvalues from a value) + equ PSELECT$ to 11 ;* 0=none, 1=single, 2=multiple, 3=ordered multiple + equ PTITLE$ to 12 ;* Popup window title + equ PFIELD$ to 13 ;* Fields or columns to return + equ PTYPE$ to 14 ;* Return value: K{ey}/DocID, R{ead only}, Row P{ositions}, Popup F{ield} (ie. Column), Table C{olumn} (ie. Field), E{ntire} Row + equ PCOLHDR$ to 15 ;* bool: show column headings + equ PROWNUM$ to 16 ;* bool: show row numbers + equ PROWBTN$ to 17 ;* bool: show row buttons + equ PHGRID$ to 18 ;* bool: show horizontal grid + equ PVGRID$ to 19 ;* bool: show vertical grid - NOT USED IN v10 + equ PRESIZE$ to 20 ;* bool: allow column resizing + equ PBORDER$ to 21 ;* bool: show border + equ PBTNSBELOW$ to 22 ;* bool: buttons on bottom instead of right + equ PSEARCH$ to 23 ;* bool: allow search (FIND button) + equ PSORT$ to 24 ;* bool: allow column sorting + equ PLOCK$ to 25 ;* count: number of columns to "scroll lock" + equ PUSERDEF$ to 26 ;* this column is reserved as user-defineable + equ PTESTRUN$ to 27 ;* was PSUBFILE$ - for DataSet, Connection Name: @vm: hXO ( hXO can be supplied by caller ) + equ PINITSELECT$ to 28 ;* @vm list of positions to select initially + equ PSHOWMISSING$ to 29 ;* boolean; if true show the phrase 'Record Missing' in columns * mtr 8-21-03 + equ PPRINTABLE$ to 30 ;* boolean; if true show the print button * mtr 9-2-03 + equ PSHOWGAUGE$ to 31 ;* boolean; if true show the gasgauge when populating the popup * mtr 4-14-05 + equ PCAPTUREESC$ to 32 ;* boolean; if true return char(27) when user presses escape * mtr 4-14-05 + equ PGREENBAR$ to 33 ;* boolean; if true turn On rowshade property of popup edittable * mtr 11-29-05, flying To Orlando To demo the new CTO + equ PODDROWCOLOR$ to 34 ;* Color, If rowshade is enabled * mtr 11-29-05, flying To Orlando To demo the new CTO + equ PEVENROWCOLOR$ to 35 ;* Color, If rowshade is enabled * mtr 11-29-05, flying To Orlando To demo the new CTO + equ PCUSTOMTEXT$ to 36 ;* Custom button text + equ PCUSTOMPROC$ to 37 ;* Custom button callback proc - passed ID of the popup window instance + equ PINITPROC$ to 38 ;* Custom initproc - - passed ID of the popup window instance, and stage flag + equ PICON$ to 39 ;* Icon to use for the popup + equ PFORECOLOR$ to 40 ;* EditTable forecolor + equ PVERSION$ to 41 ;* Version number of the Popup DSN (1000 == 10.0) + equ PFRAMESTYLE$ to 42 ;* See PS_WINDOW_EQUATES + equ PEMPTYTEXT$ to 43 ;* See EditTable EMPTYTEXT property + equ PASYNCID$ to 44 ;* If not null then run ASYNC and return via parent ENDDIALOG event + equ PPGOCALLBACK$ to 45 ;* String: contains PGO target and property name + ;* - popup is modeless, close (cancel) the popup when inactive + ;* - don't show a caption etc + + equ PNUMFIELDS$ to 45 ;* Set to the total number of popup structure fields + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PCOL$ constants - @vm positions + equ PCOL_VALUE$ to 1 + equ PCOL_ALIGNR$ to 2 ; // TRUE$ if xpos is right-align + equ PCOL_SCREEN$ to 3 ; // TRUE$ if xpos is screen X + + // PROW$ constants - @vm positions + equ PROW_VALUE$ to 1 + equ PROW_ALIGNB$ to 2 ; // TRUE$ if yPos is bottom-align + equ PROW_SCREEN$ to 3 ; // TRUE$ if yPos is screen Y + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PMODE$ (Popup source) equates + equ PMODE_TABLE$ to "T" + equ PMODE_KEYS$ to "K" + equ PMODE_CURSOR$ to "C" + equ PMODE_ROW$ to "R" + equ PMODE_COLUMN$ to "F" + equ PMODE_LITERAL$ to "L" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PDISPLAY$ (Column format) equates + equ PDISPLAY_FIELD$ to 1 + equ PDISPLAY_WIDTH$ to 2 + equ PDISPLAY_DATAJUST$ to 3 + equ PDISPLAY_HDRJUST$ to 4 + equ PDISPLAY_OCONV$ to 5 + equ PDISPLAY_HEADING$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PTYPE$ (Return type) constants + equ PTYPE_KEY$ to "K" + equ PTYPE_READONLY$ to "R" + equ PTYPE_ROWPOS$ to "P" + equ PTYPE_FIELD$ to "F" + equ PTYPE_COLUMN$ to "C" + equ PTYPE_ENTIREROW$ to "E" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PSELECT$ (Selection) constants + equ PSELECT_NONE$ to 0 + equ PSELECT_SINGLE$ to 1 + equ PSELECT_MULTI$ to 2 + equ PSELECT_ORDERED$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Initialization proc constants + equ PINITPROC_INSERTROWS$ to 1 ; // Rows have just been inserted + equ PINITPROC_BEFORESHOW$ to 2 ; // Popup is about to be shown + equ PINITPROC_AFTERSHOW$ to 3 ; // Popup has just become visible + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * Popup() function calls + * + * function PopUp(OwnerWindow, Rec, Name, Instruction) + * + * where Instruction is: + * + equ PCMDEXEC$ to 1 ;* OwnerWindow should be supplied, Rec contains override information, Name is Popup name + * if Name is supplied, Popup record will be read and Rec will be used as an override + equ PCMDSELECT$ to 2 ;* OwnerWindow is required, Rec<1> is title for dialog, Rec<2> is either "OPEN" or "SAVE" + * Popup name is returned, first Get_Status error code will be REP_ENT_NOEXISTS_ERR$ if new Popup + equ PCMDLOCK$ to 3 ;* Name is Popup name, TRUE$ returned on success, first Get_Status will be either + * REP_ENT_SHORTLOCK_ERR$ or REP_ENT_OWNLOCK_ERR$ if the Popup is in use elsewhere, otherwise + * it will be REP_ENT_LONGLOCK_ERR$ if the Popup is checked out + equ PCMDREAD$ to 4 ;* Name is Popup name, Rec is set to Popup record, TRUE$ returned on success, Get_Status is + * available for error handling + equ PCMDWRITE$ to 5 ;* Name is Popup name, Rec is Popup record, TRUE$ returned on success, Get_Status is + * available for error handling + equ PCMDUNLOCK$ to 6 ;* Name is Popup name, TRUE$ returned on success, Get_Status is available for error handling + equ PEVENTOK$ to 7 ;* reserved by Popup window + equ PEVENTCANCEL$ to 8 ;* reserved by Popup window + equ PEVENTCLEAR$ to 9 ;* reserved by Popup window + equ PEVENTALL$ to 10 ;* reserved by Popup window + equ PEVENTFIND$ to 11 ;* reserved by Popup window + equ PEVENTCLICK$ to 12 ;* reserved by Popup window + equ PEVENTDBLCLK$ to 13 ;* reserved by Popup window + equ PCMDDEFAULT$ to 14 ;* Rec is set to default Popup record, TRUE$ returned on success + equ PCMDCLOSE$ to 15 ;* reserved by Popup window + equ PCMDRETRIEVE$ to 16 ;* reserved by Popup window + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * Popup entity ID + equ POPUPTYPE$ to "POPUP" + equ POPUPCLASS$ to "" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PRINTSETUP_EQUATES.txt b/SYSPROG/STPROCINS/PRINTSETUP_EQUATES.txt new file mode 100644 index 0000000..1989e08 --- /dev/null +++ b/SYSPROG/STPROCINS/PRINTSETUP_EQUATES.txt @@ -0,0 +1,40 @@ +compile insert PrintSetup_Equates + +****************************************************************************** +* +* Product : OpenInsight +* Version : 3.1 +* +* Description: Insert record for the PrintSetup() utility +* +* History : (date, initials, notes) +* 01/23/96 cp Original programmer +* +****************************************************************************** + +declare function PrintSetup +declare subroutine PrintSetup + +* To call the printer setup dialog: +* +* PrintSetup() +* +* To get a list of installed printer models, connected printers, and the +* default printer: +* +* PrinterCount = PrintSetup(PRN_GET$, Models, Printers, Default) +* +* To set the default printer: +* +* Success = PrintSetup(PRN_SET$, Default) + +equ PRN_DLG$ to 1 ;* call printer setup dialog (default) +equ PRN_GET$ to 2 ;* get list of printers +equ PRN_SET$ to 3 ;* set current (ie. default) printer +equ PRN_DLG_CREATE$ to 4 ;* reserved +equ PRN_DLG_SETDEFAULT$ to 5 ;* reserved +equ PRN_DLG_OPTIONS$ to 6 ;* reserved +equ PRN_DLG_HELP$ to 7 ;* reserved +equ PRN_DLG_SELCHANGE$ to 8 ;* reserved + + diff --git a/SYSPROG/STPROCINS/PRINT_CONSTANTS.txt b/SYSPROG/STPROCINS/PRINT_CONSTANTS.txt new file mode 100644 index 0000000..9642e9a --- /dev/null +++ b/SYSPROG/STPROCINS/PRINT_CONSTANTS.txt @@ -0,0 +1,95 @@ +compile insert PRINT_CONSTANTS +/* PRINT_CONSTANTS + + This record contains equates that may be used with the + @ function for changing printed attributes and styles. + +*/ + +EQU NORMAL$ TO -11 ; * Normal +EQU REVERSE$ TO -12 ; * Reverse +EQU HIGHLIGHT$ TO -13 ; * Highlight +EQU BLINK$ TO -14 ; * Blink +EQU RBLINK$ TO -15 ; * Reverse blink +EQU ULINE$ TO -16 ; * Underline +EQU BULINE$ TO -17 ; * Underline blink +EQU DBLUE$ TO -18 ; * Dark blue +EQU LBLUE$ TO -19 ; * Light blue +EQU DCYAN$ TO -20 ; * Dark cyan +EQU LCYAN$ TO -21 ; * Light cyan +EQU DGRN$ TO -22 ; * Dark green +EQU LGRN$ TO -23 ; * Light green +EQU DYEL$ TO -24 ; * Dark yellow +EQU LYEL$ TO -25 ; * Light yellow +EQU DRED$ TO -26 ; * Dark red +EQU LRED$ TO -27 ; * Light red +EQU DMAG$ TO -28 ; * Dark magenta +EQU LMAG$ TO -29 ; * Light magenta +EQU DGREY$ TO -30 ; * Dark grey +EQU LGREY$ TO -31 ; * Light grey +EQU BLACK$ TO -32 ; * Black +EQU WHITE$ TO -33 ; * White +EQU WOB$ TO -34 ; * White on blue +EQU YOB$ TO -35 ; * Yellow on blue +EQU WOR$ TO -36 ; * White on red +EQU WOY$ TO -37 ; * White on yellow +EQU YOR$ TO -38 ; * Yellow on red +EQU BOG$ TO -39 ; * Black on grey +EQU DBOG$ TO -40 ; * Dark blue on grey +EQU ROG$ TO -41 ; * Red on grey +EQU WOBLK$ TO -42 ; * White on black +EQU GOBLK$ TO -43 ; * Grey on black +EQU YOBLK$ TO -44 ; * Yellow on black + +EQU BOLDON$ TO -50 ; * Bold on +EQU BOLDOFF$ TO -51 ; * Bold off +EQU ITALON$ TO -52 ; * Italics on +EQU ITALOFF$ TO -53 ; * Italics off +EQU ULINEON$ TO -54 ; * Underline on +EQU ULINEOFF$ TO -55 ; * Underline off +EQU SUBSON$ TO -56 ; * Subscript on +EQU SUBSOFF$ TO -57 ; * Subscript off +EQU SUPSON$ TO -58 ; * Superscript on +EQU SUPSOFF$ TO -59 ; * Superscript off +EQU ENHON$ TO -60 ; * Enhanced on +EQU ENHOFF$ TO -61 ; * Enhanced off +EQU WIDEON$ TO -62 ; * Wide on +EQU WIDEOFF$ TO -63 ; * Wide off + +EQU PRNINIT$ TO -70 ; * Printer initialization +EQU PRELUDE$ TO -71 ; * Pre-defined for PostScript printers +EQU ENDOFJOB$ TO -72 ; * Pre-defined for PostScript printers + +EQU BEGINFONT1$ TO -90 ; * Begin fonts 1 - 16 and end fonts 1 - 16 +EQU ENDFONT1$ TO -91 +EQU BEGINFONT2$ TO -92 +EQU ENDFONT2$ TO -93 +EQU BEGINFONT3$ TO -94 +EQU ENDFONT3$ TO -95 +EQU BEGINFONT4$ TO -96 +EQU ENDFONT4$ TO -97 +EQU BEGINFONT5$ TO -98 +EQU ENDFONT5$ TO -99 +EQU BEGINFONT6$ TO -100 +EQU ENDFONT6$ TO -101 +EQU BEGINFONT7$ TO -102 +EQU ENDFONT7$ TO -103 +EQU BEGINFONT8$ TO -104 +EQU ENDFONT8$ TO -105 +EQU BEGINFONT9$ TO -106 +EQU ENDFONT9$ TO -107 +EQU BEGINFONT10$ TO -108 +EQU ENDFONT10$ TO -109 +EQU BEGINFONT11$ TO -110 +EQU ENDFONT11$ TO -111 +EQU BEGINFONT12$ TO -112 +EQU ENDFONT12$ TO -113 +EQU BEGINFONT13$ TO -114 +EQU ENDFONT13$ TO -115 +EQU BEGINFONT14$ TO -116 +EQU ENDFONT14$ TO -117 +EQU BEGINFONT15$ TO -118 +EQU ENDFONT15$ TO -119 +EQU BEGINFONT16$ TO -120 +EQU ENDFONT16$ TO -121 +* Source Date: 09:48:09 02 MAR 1993 Build ID: AREV*3.1.31 Level: 3.1 diff --git a/SYSPROG/STPROCINS/PRINT_EQUATES.txt b/SYSPROG/STPROCINS/PRINT_EQUATES.txt new file mode 100644 index 0000000..594fa89 --- /dev/null +++ b/SYSPROG/STPROCINS/PRINT_EQUATES.txt @@ -0,0 +1,29 @@ +compile insert Print_Equates + +equ PS_SOLID$ to 0 +equ PS_DASH$ to 1 +equ PS_DOT$ to 2 +equ PS_DASHDOT$ to 3 +equ PS_DASHDOTDOT$ to 4 +equ PS_NULL$ to 5 +equ PS_INSIDEFRAME$ to 6 + + +* Brush Styles +equ BS_SOLID$ to 0 +equ BS_NULL$ to 1 +equ BS_HOLLOW$ to 1 +equ BS_HATCHED$ to 2 +equ BS_PATTERN$ to 3 +equ BS_INDEXED$ to 4 +equ BS_DIBPATTERN$ to 5 + + +* Hatch Styles +equ HS_HORIZONTAL$ to 0 +equ HS_VERTICAL$ to 1 +equ HS_FDIAGONAL$ to 2 +equ HS_BDIAGONAL$ to 3 +equ HS_CROSS$ to 4 +equ HS_DIAGCROSS$ to 5 + diff --git a/SYSPROG/STPROCINS/PROGRESS_EQUATES.txt b/SYSPROG/STPROCINS/PROGRESS_EQUATES.txt new file mode 100644 index 0000000..3c73265 --- /dev/null +++ b/SYSPROG/STPROCINS/PROGRESS_EQUATES.txt @@ -0,0 +1,8 @@ +COMPILE Insert PROGRESS_EQUATES +/* Equates for PROGRESS */ +EQU PROGINIT$ TO 0 +EQU PROGUPDATEBAR$ TO 1 +EQU PROGUPDATETEXT$ TO 2 +EQU PROGCLEANUP$ TO 3 +* 02-23-2015 RJC Copied From Arev.bp +* Source Date: 18:18:07 16 JUN 1992 Build ID: AREV*2.2.33 Level: 2.2 diff --git a/SYSPROG/STPROCINS/PROTECT.CONSTANTS.txt b/SYSPROG/STPROCINS/PROTECT.CONSTANTS.txt new file mode 100644 index 0000000..da36dc0 --- /dev/null +++ b/SYSPROG/STPROCINS/PROTECT.CONSTANTS.txt @@ -0,0 +1,31 @@ +Compile Insert PROTECT.CONSTANTS +EQUATE PRO.SPEC$ TO "%PROTECT.SPEC%" +EQUATE PRO.SOURCE$ TO "%PROTECT.SRC%" +EQUATE PRO.OBJECT$ TO "%PROTECT%" + +*** %PROTECT.SPEC% FIELD DEFINES *** + +EQUATE PRO.FILE$ TO 1 +EQUATE PRO.FLD$ TO 2 + +*** VALUE DEFINES FOR PROT.FLD$ *** + +EQUATE PRO.FLD.NAME$ TO 1 +EQUATE PRO.FLD.TYPE$ TO 2 +EQUATE PRO.FLD.NO$ TO 3 +EQUATE PRO.FLD.CONV$ TO 4 +EQUATE PRO.FLD.PATT$ TO 5 +EQUATE PRO.FLD.NULL$ TO 6 +EQUATE PRO.FLD.UNIQ$ TO 7 +EQUATE PRO.FLD.LEN$ TO 8 +EQUATE PRO.FLD.JUST$ TO 9 +EQUATE PRO.FLD.PART$ TO 10 + +EQUATE NULL.ERR$ TO 1 +EQUATE IPAT.ERR$ TO 2 +EQUATE ICONV.ERR$ TO 5 +EQUATE OCONV.ERR$ TO 7 +EQUATE UNIQUE.ERR$ TO 10 +EQUATE TEST.ERR$ TO 11 +* Source Date: 18:48:31 29 MAR 1989 Build ID: AREV*1.13.7 Level: 2.0 +* 03-20-15 rjc Copied Into OI From Arev_Bp diff --git a/SYSPROG/STPROCINS/PROTECT_COMMON.txt b/SYSPROG/STPROCINS/PROTECT_COMMON.txt new file mode 100644 index 0000000..8558caa --- /dev/null +++ b/SYSPROG/STPROCINS/PROTECT_COMMON.txt @@ -0,0 +1,13 @@ +cOMPILE Insert protect_common +* mtr 1-24-06 +EQU PROT.DOCONV@ TO SC_PROT_DOCONV +EQU PROT.DEFCONV@ TO SC_PROT_DEFCONV +EQU PROT.CURSCONV@ TO SC_PROT_CURSCONV +EQU PROT.NOPASS@ TO SC_PROT_LOCKMODE +EQU FILE.HANDLES@ TO SC_PROT_HANDLES +EQU FILE.NAMES@ TO SC_PROT_TABLEDATA +EQU TRANS.CONTROL@ TO SC_PROT_TRANSSTATE +EQU TRANS.INFO@ TO SC_PROT_TRANSDATA +EQU CONSISTENCY_LEVEL@ TO SC_PROT_CONSISTENCY +EQU TRANSFILE_HANDLES@ TO SC_PROT_TRANSHANDLES +* Source Date: 10:12:03 22 OCT 1991 Build ID: OE*1.0.47 Level: 1.0 diff --git a/SYSPROG/STPROCINS/PS_ANIMATE_EQUATES.txt b/SYSPROG/STPROCINS/PS_ANIMATE_EQUATES.txt new file mode 100644 index 0000000..0b6319e --- /dev/null +++ b/SYSPROG/STPROCINS/PS_ANIMATE_EQUATES.txt @@ -0,0 +1,75 @@ +compile insert PS_Animate_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS ANIMATE object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + djh 04/03/2017 Add SYSREPOSWINS structure overrides +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_ANIMATE_EQUATES_ +#define _PS_ANIMATE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_Animate_Equates + $insert ps_Equates + $insert oiwin_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // ACS_AUTOPLAY -> AUTOPLAY property + // ACS_CENTER -> CENTER property + // ACS_TRANSPARENT -> TRANSPARENT property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + // + // n/a + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + + equ POS_ANI_CLIPNAME$ to POS_TYPESPECIFIC$ + equ POS_ANI_REPITITIONS$ to POS_VALUE$ + equ POS_ANI_FRAMERANGE$ to POS_SCROLLRANGE$ ; * // <0,0,1> StartFrame; <0,0,2> StopFrame + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINEXES structure overrides + + equ PSPOS_ANI_CLIPNAME$ to PSPOS_TYPESPECIFIC$ + equ PSPOS_ANI_REPITITIONS$ to PSPOS_VALUE$ + equ PSPOS_ANI_FRAMERANGE$ to PSPOS_SCROLLRANGE$ ; * // <0,0,1> StartFrame; <0,0,2> StopFrame + + // PSPOS_ANI_FRAMERANGE$ equates + equ PSPOS_ANI_FRAMERANGE_START$ to 1 ; * // STARTFRAME property + equ PSPOS_ANI_FRAMERANGE_STOP$ to 2 ; * // ENDFRAME property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_CHECKBOX_EQUATES.txt b/SYSPROG/STPROCINS/PS_CHECKBOX_EQUATES.txt new file mode 100644 index 0000000..31da534 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_CHECKBOX_EQUATES.txt @@ -0,0 +1,77 @@ +compile insert PS_CheckBox_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : June 2013 + Purpose : Constants for working with PS CHECKBOX object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 12 Jul 16 Added ThreeState notes, CHECK property equates +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_CHECKBOX_EQUATES_ +#define _PS_CHECKBOX_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_Button_Equates + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // BS_RIGHTBUTTON -> CHECKRIGHT property + // BS_LEFT -> TEXTALIGN property + // BS_RIGHT -> TEXTALIGN property + // BS_CENTER -> TEXTALIGN property + // BS_AUTOCHECKBOX -> THREESTATE property + // BS_AUTO3STATE -> THREESTATE property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + equ PSS_CHECKBOX_DRAWTEXT$ to 0x00000400 ; * // DRAWTEXT property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + equ POS_CHK_CHECK$ to POS_VALUE$ ; // CHECK property - 0, 1, 2 + equ POS_CHK_HOTBACKCOLOR$ to POS_COLOR_1$ ; // HOTBACKCOLOR property - <0,0,1> only + equ POS_CHK_HOTFORECOLOR$ to POS_COLOR_2$ ; // HOTFORECOLOR property - <0,0,1> only + equ POS_CHK_HOTFONT$ to POS_LOGFONT_1$ ; // HOTFONT property + equ POS_CHK_TEXTORIGIN_X$ to POS_SPOT_X$ ; // TEXTORIGIN property + equ POS_CHK_TEXTORIGIN_Y$ to POS_SPOT_Y$ ; // TEXTORIGIN property + + // SYSREPOSWINEXES structure overrides + equ PSPOS_CHK_CHECK$ to PSPOS_VALUE$ ; // CHECK property - 0, 1, 2 + equ PSPOS_CHK_HOTBACKCOLOR$ to PSPOS_COLOR_1$ ; // HOTBACKCOLOR property - <0,0,1> and <0,0,2> only + equ PSPOS_CHK_HOTFORECOLOR$ to PSPOS_COLOR_2$ ; // HOTFORECOLOR property - <0,0,1> only + equ PSPOS_CHK_HOTFONT$ to PSPOS_LOGFONT_1$ ; // HOTFONT property + equ PSPOS_CHK_TEXTORIGIN_X$ to PSPOS_SPOT_X$ ; // TEXTORIGIN property + equ PSPOS_CHK_TEXTORIGIN_Y$ to PSPOS_SPOT_Y$ ; // TEXTORIGIN property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CHECK property equates + equ PS_CHK_UNCHECKED$ to 0 + equ PS_CHK_CHECKED$ to 1 + equ PS_CHK_INDETERMINATE$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_CHOOSEDIR_EQUATES.txt b/SYSPROG/STPROCINS/PS_CHOOSEDIR_EQUATES.txt new file mode 100644 index 0000000..9880266 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_CHOOSEDIR_EQUATES.txt @@ -0,0 +1,40 @@ +compile insert ps_ChooseDir_Equates +/* + ** Copyright (C) 2015 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Dec 2015 + Purpose Equates for use with the FILESYSTEM CHOOSEDIR method + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_CHOOSEDIR_EQUATES_ +#define _PS_CHOOSEDIR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // CHOOSEDIR method + * // + * // dir = Exec_Method( "FILESYSTEM", | + * // "CHOOSEDIR", | + * // OwnerWindow, | + * // ChooseDirOptions ) + + * // ChooseDirOptions equates + equ CHDIR_POS_TITLE$ to 1 + equ CHDIR_POS_INITDIR$ to 2 + equ CHDIR_POS_HIDENEWBTN$ to 3 + equ CHDIR_POS_SHOWFILES$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_CHOOSEFILE_EQUATES.txt b/SYSPROG/STPROCINS/PS_CHOOSEFILE_EQUATES.txt new file mode 100644 index 0000000..31b3907 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_CHOOSEFILE_EQUATES.txt @@ -0,0 +1,54 @@ +compile insert ps_ChooseFile_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Feb 2013 + Purpose Equates for use with the FILESYSTEM CHOOSEFILE method + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_CHOOSEFILE_EQUATES_ +#define _PS_CHOOSEFILE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_GetOpenFileName_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // CHOOSEFILE method + * // + * // file = Exec_Method( "FILESYSTEM", | + * // "CHOOSEFILE", | + * // OwnerWindow, | + * // ChooseFileOptions ) + + * // ChooseFileOptions equates + equ CHFILE_POS_MODE$ to 1 + equ CHFILE_POS_FILTERSTRING$ to 2 + equ CHFILE_POS_FILTERINDEX$ to 3 + equ CHFILE_POS_DFLTNAME$ to 4 + equ CHFILE_POS_FLAGS$ to 5 + equ CHFILE_POS_INITDIR$ to 6 + equ CHFILE_POS_DFLTEXT$ to 7 + equ CHFILE_POS_TITLE$ to 8 + + * // CHOOSEFILE mode + equ CHFILE_MODE_OPEN$ to 0 + equ CHFILE_MODE_SAVEAS$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_CHOOSEFONT_EQUATES.txt b/SYSPROG/STPROCINS/PS_CHOOSEFONT_EQUATES.txt new file mode 100644 index 0000000..b094439 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_CHOOSEFONT_EQUATES.txt @@ -0,0 +1,46 @@ +compile insert ps_ChooseFont_Equates +/* + ** Copyright (C) 2015 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Dec 2015 + Purpose Equates for use with the SYSTEM CHOOSEFONT method + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_CHOOSEFONT_EQUATES_ +#define _PS_CHOOSEFONT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_ChooseFont_Equates + $insert ps_Font_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // CHOOSEFONT method + * // + * // Font = Exec_Method( "SYSTEM", | + * // "CHOOSEFILE", | + * // OwnerWindow, | + * // ChooseFontOptions, | + * // HideColors ) + + * // ChooseFontOptions equates + equ CHFONT_POS_FONT$ to 1 + equ CHFONT_POS_FLAGS$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_COLORDROPDOWN_EQUATES.txt b/SYSPROG/STPROCINS/PS_COLORDROPDOWN_EQUATES.txt new file mode 100644 index 0000000..45a3230 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_COLORDROPDOWN_EQUATES.txt @@ -0,0 +1,57 @@ +compile insert PS_ColorDropdown_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : February 2015 + Purpose : Constants for working with PS COLORDROPDOWN object structures + + + Comments + ======== + + This is pretty much the same as a normal dropdown COMBOBOX, but with some + restrictions enforced at runtime. + + The following combobox properties are not supported: + + COMBOSTYLE + HOTIMAGENUMBER + HOTTRACK + IMAGELIST + LIMITTEXT + LISTX + SELECTION + TABOUTEXCEED + TEXTCASE + + + Amended Date Reason + ======= ==== ====== + Mr C 08 Apr 15 Schpelling ... +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_COLORDROPDOWN_EQUATES_ +#define _PS_COLORDROPDOWN_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_ComboBox_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + + equ PSS_COLORDROPDOWN_COLORKEYMODE$ to 0x08000000 ; * // COLORKEYMODE property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_COMBOBOX_EQUATES.txt b/SYSPROG/STPROCINS/PS_COMBOBOX_EQUATES.txt new file mode 100644 index 0000000..0c9484c --- /dev/null +++ b/SYSPROG/STPROCINS/PS_COMBOBOX_EQUATES.txt @@ -0,0 +1,165 @@ +compile insert PS_ComboBox_Equates +/* + ** Copyright (C) 2013-2022 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS COMBOBOX object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 29 Jan 22 Updated PS style equates + Mr C 16 Apr 18 Added ItemState/Style equates + Mr C 15 Feb 18 Added TEXTCASE property values + Mr C 10 Jun 16 Added extended PS Styles + Mr C 19 May 16 Renamed MINVISIBLEITEMS to VISIBLEITEMS + Mr C 21 Nov 15 Added EMPTYTEXT constants + Mr C 30 Oct 15 Added OIWIN_EQUATES + mtr 12 Dec 14 Git sucks +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_COMBOBOX_EQUATES_ +#define _PS_COMBOBOX_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_ComboBox_Equates + $insert oiWin_Equates + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // CBS_SIMPLE -> COMBOSTYLE property + // CBS_DROPDOWN -> COMBOSTYLE property + // CBS_DROPDOWNLIST -> COMBOSTYLE property + // CBS_AUTOHSCROLL -> AUTOSCROLL property + // CBS_SORT -> SORTED property + // CBS_DISABLENOSCROLL -> SHOWVSCROLL property + // CBS_UPPERCASE -> TEXTCASE property + // CBS_LOWERCASE -> TEXTCASE property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // COMBOSTYLE property equates + + equ PS_COMBOSTYLE_SIMPLE$ to 1 + equ PS_COMBOSTYLE_DROPDOWN$ to 2 + equ PS_COMBOSTYLE_DROPDOWNLIST$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + // + equ PSS_COMBO_HOTTRACKITEMS$ to 0x00000001 ; * // HOTTRACK property + equ PSS_COMBO_MANUALDROPDOWN$ to 0x00000002 ; * // AUTODROPDOWN property (inverse) + equ PSS_COMBO_TABOUTEXCEED$ to 0x00000020 ; * // TABOUTEXCEED property + equ PSS_COMBO_ACCEPTRETURN$ to 0x00000040 ; * // ACCEPTENTER property + + * // Extended PS Style equates + equ PSSX_CBO_SHOWITEMTOOLTIPS$ to 0x00000010; * // SHOWITEMTOOLTIPS property + equ PSSX_CBO_INPLACEITEMTOOLTIPS$ to 0x00000020; * // SHOWITEMTOOLTIPS property + equ PSSX_CBO_SHOWVALUESFORTOOLTIPS$ to 0x00000040; * // SHOWVALUESASTIPS property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + + equ POS_CBO_LIST$ to POS_LIST$ ; * @svm delimited + equ POS_CBO_TEXT$ to POS_TEXT$ + equ POS_CBO_EDITSTYLE$ to POS_COLSTYLES$ ; * <0,0,1> + equ POS_CBO_LIMITTEXT$ to POS_CHARCOUNT$ ; * <0,0,1> + equ POS_CBO_HORZEXTENT$ to POS_NUMCOLS$ + equ POS_CBO_VISIBLEITEMS$ to POS_ROWLIMIT$ ; * <0,0,1> + + equ POS_CBO_IMAGELIST$ to POS_IMGLIST_1$ + equ POS_CBO_IMAGELIST_PROPS$ to POS_IMGLIST_1_PROPS$ + + equ POS_CBO_GLYPH$ to POS_GLYPH$ + equ POS_CBO_GLYPHPROPERTIES$ to POS_GLYPHPROPERTIES$ + + equ POS_CBO_BUTTONBACKCOLOR$ to POS_COLOR_1$ + equ POS_CBO_BUTTONFORECOLOR$ to POS_COLOR_2$ + equ POS_CBO_BUTTONHOTBACKCOLOR$ to POS_COLOR_3$ + equ POS_CBO_BUTTONHOTFORECOLOR$ to POS_COLOR_4$ + equ POS_CBO_EMPTYTEXT$ to POS_TEXT_14$ + + + // SYSREPOSWINEXES structure overrides + + equ PSPOS_CBO_LIST$ to PSPOS_LIST$ ; * @svm delimited + equ PSPOS_CBO_TEXT$ to PSPOS_TEXT$ + equ PSPOS_CBO_EDITSTYLE$ to PSPOS_COLSTYLES$ ; * <0,0,1> + equ PSPOS_CBO_LIMITTEXT$ to PSPOS_CHARCOUNT$ ; * <0,0,1> + equ PSPOS_CBO_HORZEXTENT$ to PSPOS_NUMCOLS$ + equ PSPOS_CBO_VISIBLEITEMS$ to PSPOS_ROWLIMIT$ ; * <0,0,1> + + equ PSPOS_CBO_IMAGELIST$ to PSPOS_IMGLIST_1$ + equ PSPOS_CBO_IMAGELIST_PROPS$ to PSPOS_IMGLIST_1_PROPS$ + + equ PSPOS_CBO_GLYPH$ to PSPOS_GLYPH$ + equ PSPOS_CBO_GLYPHPROPERTIES$ to PSPOS_GLYPHPROPERTIES$ + + equ PSPOS_CBO_BUTTONBACKCOLOR$ to PSPOS_COLOR_1$ + equ PSPOS_CBO_BUTTONFORECOLOR$ to PSPOS_COLOR_2$ + equ PSPOS_CBO_BUTTONHOTBACKCOLOR$ to PSPOS_COLOR_3$ + equ PSPOS_CBO_BUTTONHOTFORECOLOR$ to PSPOS_COLOR_4$ + + equ PSPOS_CBO_EMPTYTEXT$ to PSPOS_TEXT_14$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // TEXTCASE property + + equ PS_CBO_TEXTCASE_MIXED$ to 0 + equ PS_CBO_TEXTCASE_LOWER$ to 1 + equ PS_CBO_TEXTCASE_UPPER$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // ITEM State equates - used with ITEMIMAGE/STYLE methods + equ CBIS_NORMAL$ to 1 + equ CBIS_HOT$ to 2 + equ CBIS_DISABLED$ to 3 + equ CBIS_SELECTED$ to 4 + equ CBIS_HOTSELECTED$ to 5 + equ CBIS_SELNOFOCUS$ to 6 + + // ITEMSTYLE structure - used with ITEMSTYLE method + // + // <1> ForeColor + // <2> BackColor From + // <3> BackColor To + // <4> BorderColor + // <5> Bold + // <6> Italic + // <7> Underline + // <8> Translucency (0-100) + + equ CBIS_POS_FORECOLOR$ to 1 ; * // COLORREF + equ CBIS_POS_BACKCOLOR_FROM$ to 2 ; * // COLORREF + equ CBIS_POS_BACKCOLOR_TO$ to 3 ; * // COLORREF + equ CBIS_POS_BORDERCOLOR$ to 4 ; * // COLORREF + equ CBIS_POS_BOLD$ to 5 ; * // Boolean + equ CBIS_POS_ITALIC$ to 6 ; * // Boolean + equ CBIS_POS_UNDERLINE$ to 7 ; * // Boolean + equ CBIS_POS_TRANSLUCENCY$ to 8 ; * // UInt (0-100) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_DATETIME_EQUATES.txt b/SYSPROG/STPROCINS/PS_DATETIME_EQUATES.txt new file mode 100644 index 0000000..a8d892f --- /dev/null +++ b/SYSPROG/STPROCINS/PS_DATETIME_EQUATES.txt @@ -0,0 +1,112 @@ +compile insert PS_DateTime_Equates +/* + ** Copyright (C) 2012-2019 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : Aug 2014 + Purpose : Constants for working with PS DATETIME object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 02 Feb 15 Changed CALALIGN to CALENDARALIGN. Added FORMAT and + CALENDARALIGN equates + MTR 23 Oct 14 Added +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_DATETIME_EQUATES_ +#define _PS_DATETIME_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +////////////////////////////////////////////////////////////////////////////// + + $insert msWin_DateTimePicker_Equates + $insert oiWin_Equates + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // DTS_RIGHTALIGN - CALENDARALIGN property + // DTS_SHORTDATEFORMAT - FORMAT property + // DTS_SHORTLONGFORMAT - FORMAT property + // DTS_SHORTDATECENTURYFORMAT - FORMAT property + // DTS_TIMEFORMAT - FORMAT property + // DTS_SHOWNONE - CHECKBOX property + // DTS_UPDOWN - UPDOWN property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + equ PSS_DTM_INITCHECK$ to 0x00000001 ; * // CHECK property - only enabled if CHECKBOX is TRUE$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINEXES structure overrides + // + + equ POS_DTM_CALBACKCOLOR$ to POS_COLOR_1$ + equ POS_DTM_CALFORECOLOR$ to POS_COLOR_2$ + equ POS_DTM_CALMONTHBACKCOLOR$ to POS_COLOR_3$ + equ POS_DTM_CALTITLEBACKCOLOR$ to POS_COLOR_4$ + equ POS_DTM_CALTITLEFORECOLOR$ to POS_COLOR_5$ + equ POS_DTM_CALTRAILINGFORECOLOR$ to POS_COLOR_6$ + equ POS_DTM_CALFONT$ to POS_LOGFONT_1$ + equ POS_DTM_CUSTOMFORMAT$ to POS_TYPESPECIFIC$ + equ POS_DTM_MINVALUE$ to POS_TEXT_1$ + equ POS_DTM_MAXVALUE$ to POS_TEXT_2$ + equ POS_DTM_VALUE$ to POS_VALUE$ + + equ PSPOS_DTM_CALBACKCOLOR$ to PSPOS_COLOR_1$ + equ PSPOS_DTM_CALFORECOLOR$ to PSPOS_COLOR_2$ + equ PSPOS_DTM_CALMONTHBACKCOLOR$ to PSPOS_COLOR_3$ + equ PSPOS_DTM_CALTITLEBACKCOLOR$ to PSPOS_COLOR_4$ + equ PSPOS_DTM_CALTITLEFORECOLOR$ to PSPOS_COLOR_5$ + equ PSPOS_DTM_CALTRAILINGFORECOLOR$ to PSPOS_COLOR_6$ + equ PSPOS_DTM_CALFONT$ to PSPOS_LOGFONT_1$ + equ PSPOS_DTM_CUSTOMFORMAT$ to PSPOS_TYPESPECIFIC$ + equ PSPOS_DTM_MINVALUE$ to PSPOS_TEXT_1$ + equ PSPOS_DTM_MAXVALUE$ to PSPOS_TEXT_2$ + equ PSPOS_DTM_VALUE$ to PSPOS_VALUE$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CALENDARALIGN property + + equ PS_DTM_CALALIGN_LEFT$ to "L" + equ PS_DTM_CALALIGN_RIGHT$ to "R" ; * // DTS_RIGHTALIGN style + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // FORMAT property - combination of styles: + // + // DTS_SHORTDATEFORMAT + // DTS_SHORTLONGFORMAT + // DTS_SHORTDATECENTURYFORMAT + // DTS_TIMEFORMAT + + equ PS_DTM_FMT_CUSTOM$ to 0 ; * // No styles + equ PS_DTM_FMT_LONGDATE$ to 1 ; * // DTS_LONGDATEFORMAT only + equ PS_DTM_FMT_SHORTDATE$ to 2 ; * // DTS_SHORTDATECENTURYFORMAT only + equ PS_DTM_FMT_TIME$ to 3 ; * // DTS_TIMEFORMAT only + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_DIRWATCHER_EQUATES.txt b/SYSPROG/STPROCINS/PS_DIRWATCHER_EQUATES.txt new file mode 100644 index 0000000..3f1fae2 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_DIRWATCHER_EQUATES.txt @@ -0,0 +1,53 @@ +compile insert ps_DirWatcher_Equates +/* + ** Copyright (C) 2012-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : Nov 2021 + Purpose : Constants for working with PS DIRWATCHER object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_DIRWATCHER_EQUATES_ +#define _PS_DIRWATCHER_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // File notify flags for the WATCHDIR method + $insert msWin_FileNotify_Equates + + // DirWatcher controls are basically derived STATIC controls so most STATIC + // constants apply here as well + $insert ps_Static_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + equ POS_DRW_NOTIFYTHRESHOLD$ to POS_TEXT_1$ ; // NOTIFYTHRESHOLD property + equ POS_DRW_NOTIFYTIMER$ to POS_TEXT_2$ ; // NOTIFYTIMER property + + // SYSREPOSWINEXES structure overrides + equ PSPOS_DRW_NOTIFYTHRESHOLD$ to PSPOS_TEXT_1$ ; // NOTIFYTHRESHOLD property + equ PSPOS_DRW_NOTIFYTIMER$ to PSPOS_TEXT_2$ ; // NOTIFYTIMER property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ PS_DRW_DFLT_NOTIFYTHRESHOLD$ to 100; // items + equ PS_DRW_DFLT_NOTIFYTIMER$ to 50; // ms + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_EDITTABLE_EQUATES.txt b/SYSPROG/STPROCINS/PS_EDITTABLE_EQUATES.txt new file mode 100644 index 0000000..1703def --- /dev/null +++ b/SYSPROG/STPROCINS/PS_EDITTABLE_EQUATES.txt @@ -0,0 +1,840 @@ +compile insert PS_EditTable_Equates +/* + ** Copyright (C) 2015-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : April 2015 + Purpose : Constants for working with PS EDITTABLE object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 29 Aug 23 Update PS Extended styles for ALLOWRESETPREVPOS + Mr C 24 Oct 22 Added CELLPOSCHANGED context flags + Mr C 15 Dec 21 Corrected CELLTYPE comments + Mr C 21 Oct 21 Added missing PS extended style equates + Mr C 25 Aug 20 Added GlyphList OIWIN/OIWINEXE constants + Mr C 05 Sep 19 Added DELETEROW delInfo constants + Added INSERTROW insInfo constants + Mr C 13 Apr 19 Added PSS_EDT_ALLOWLASTROWDELETE$ + Mr C 10 Apr 19 Updated CellFocusRect properties + Mr C 09 Apr 18 Added PSS_EDT_NOAUTOSORTMARKERS$ + Mr C 27 Jan 17 Added ETCLS_MANUALDROPDOWN$ + Mr C 17 Jan 17 Removed ReadOnly CellStyle + Updated OIWIN/EXE structures for Column cellstyles + Mr C 16 Jan 17 Renamed PSS_EDT_NOROWPADDING$ to PSS_EDT_NOAUTOROWFILLING$ + Mr C 05 Jan 17 Added AUTOTRIMOPTIONS equates + Mr C 21 Sep 16 Fixed another missing "$" suffix?? + Mr C 08 Sep 16 Fixed missing "$" suffix + Mr C 01 Jul 16 And even more comment updates + Mr C 21 Jun 16 More comment updates + Mr C 24 May 16 Adjusted some comments for clarity regarding + CellStyles + Mr C 29 Mar 16 Added FOCUSRECTSTYLE equates + djh 25 Mar 16 Add FocusRect props to CFGINFO + djh 23 Mar 16 Add $ to end of PSS_EDT_COLHDRSORTCLICK and PSS_EDT_COLHDRSORTDBLCLICK + Mr C 22 Mar 16 More cleanup + Mr C 18 Feb 16 Updated comments + Mr C 21 Nov 15 Added EMPTYTEXT constants + Mr C 17 Nov 15 Added COLHEADERSORTINGMODE constants + Updated PS style equates + Mr C 05 Oct 15 Spelling ... + Mr C 28 Sep 15 Updated config info layout for v9 compatibility + Mr C 27 Sep 15 Updated SORT method + Mr C 25 Sep 15 Renamed SORTEDCOL prop -> SORT method + Mr C 09 Sep 15 Cleanup due to clarification of COLUMN API + Mr C 08 Sep 15 Readded config info layout :-S + Added PSS_EDT_COLHEADERSORTING$, PSS_EDT_V10ROWEVENTMODE$ + Added ROWEVENTMODE constants + Mr C 07 Sep 15 Added GridStyle equates, updated config info layout + Added PSS_EDT_NOROWPADDING$ + Mr C 10 Aug 15 Updated SORTEDCOL equates + Mr C 02 Jul 15 Added COL/ROWSELECTMODE equates +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_EDITTABLE_EQUATES_ +#define _PS_EDITTABLE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert oiWin_Equates + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ EDT_DEFCOLWIDTH$ to 80 ; // px + equ EDT_DEFROWHEADERWIDTH$ to 40 ; // px + equ EDT_DEFROWHEIGHT$ to 0 ; // Based on FONT + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CELLTYPE equates + // + // A data cell can support the following types + // + // Edit + // CheckBox + // Button + // DropDown + // DropDownEdit + // + // A header cell can support the following types + // + // Static + // CheckBox + + equ PS_EDT_CT_DEFAULT$ to -1 + equ PS_EDT_CT_NORMAL$ to 0 + equ PS_EDT_CT_CHECKBOX$ to 1 + equ PS_EDT_CT_BUTTON$ to 2 + equ PS_EDT_CT_DROPDOWN$ to 3 + equ PS_EDT_CT_DROPDOWNEDIT$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CELLSTYLE equates + // + // A column, row or cell can have a style applied to it that is used for + // a specific state (this applies to header cells as well) + // + // The states that can have a style applied are: + // + // Normal + // Hot + // Disabled + // Selected + // HotSelected + // SelectedNoFocus + // Current + + equ PS_EDT_CS_NORMAL$ to 0 + equ PS_EDT_CS_HOT$ to 1 + equ PS_EDT_CS_DISABLED$ to 2 + equ PS_EDT_CS_SELECTED$ to 3 + equ PS_EDT_CS_HOTSELECTED$ to 4 + equ PS_EDT_CS_SELNOFOCUS$ to 5 + equ PS_EDT_CS_CURRENT$ to 6 + + // The styling that can be applied for a state is defined by the + // following structure: + // + // <1> ForeColor (COLORREF) + // <2> BackColor From (COLORREF) + // <3> BackColor To (COLORREF) + // <4> Bold TRUE$/FALSE$ + // <5> Italic TRUE$/FALSE$ + // <6> Underline TRUE$/FALSE$ + // <7> Translucency (0-100) + // <8> GlyphIndex (>=0) + + equ PS_EDT_CS_POS_FORECOLOR$ to 1 + equ PS_EDT_CS_POS_BACKCOLORFROM$ to 2 + equ PS_EDT_CS_POS_BACKCOLORTO$ to 3 + equ PS_EDT_CS_POS_BOLD$ to 4 + equ PS_EDT_CS_POS_ITALIC$ to 5 + equ PS_EDT_CS_POS_UNDERLINE$ to 6 + equ PS_EDT_CS_POS_TRANSLUCENCY$ to 7 + equ PS_EDT_CS_POS_GLYPHINDEX$ to 8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Cell EDITMODE equates + // + // Note that DISABLED, PROTECTED and READONLY can apply to a checkbox, + // but they are mainly aimed at normal edit/dropdown cells + + equ PS_EDT_EM_DEFAULT$ to -1 ; // Resets the editmode to the col/row default + equ PS_EDT_EM_DISABLED$ to 0 ; // Gray Text, Gray Background + equ PS_EDT_EM_PROTECTED$ to 1 ; // Normal Text, Normal Background + equ PS_EDT_EM_READONLY$ to 2 ; // Normal Text, Gray Background + equ PS_EDT_EM_ENABLED$ to 3 ; // Normal Text, Normal Background + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // COL/ROWSELECTMODE equates + + equ PS_EDT_SM_NONE$ to 0; // Row/Column select mode disabled + equ PS_EDT_SM_SINGLE$ to 1; // Single Row/Column select mode + equ PS_EDT_SM_TOGGLE$ to 2; // Single "Toggle" Row/Column select mode + equ PS_EDT_SM_MULTI$ to 3; // Multi-Row/Column select mode + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // GRIDSTYLE equates + equ PS_EDT_GS_NONE$ to 0; // No grid + equ PS_EDT_GS_HORZ$ to 1; // Horizontal lines only + equ PS_EDT_GS_VERT$ to 2; // Vertical lines only + equ PS_EDT_GS_BOTH$ to 3; // Horizontal and vertical lines + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CLICKPOS equates + equ PS_EDT_CP_EMPTY$ to 0 + equ PS_EDT_CP_COLHEADER$ to 1 + equ PS_EDT_CP_GRIDLINE$ to 2 + equ PS_EDT_CP_CELL$ to 3 + equ PS_EDT_CP_ROWHEADER$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // ROWEVENTMODE equates + equ PS_EDT_REV_PREHANDLER$ to 0 ; // v9 style INSERTROW/DELETEROW processing + equ PS_EDT_REV_POSTHANDLER$ to 1 ; // v10 style INSERTROW/DELETEROW processing + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // COLHEADERSORTINGMODE equates + equ PS_EDT_CHSM_DISABLED$ to 0 + equ PS_EDT_CHSM_SINGLECLICK$ to 1 + equ PS_EDT_CHSM_DOUBLECLICK$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // FOCUSRECTSTYLE equates + equ PS_EDT_FRS_DEFAULT$ to -1 + equ PS_EDT_FRS_DOTTED$ to 0 + equ PS_EDT_FSR_SOLID$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // FOCUSRECTWEIGHT equates + equ PS_EDT_FRW_DEFAULT$ to -1 ; // 1px or SYSTEM + equ PS_EDT_FRW_MIN$ to 1 + equ PS_EDT_FSR_MAX$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SELECTIONSTYLE equates - determines if the non-header items in the + // edit table are painted in the classic Listbox style (solid fill), or in + // TreeView style (lighter color) + // + // Note that with some renderers (Classic and XP) the ListBox and TreeView + // items are painted in the same style so the SELECTIONSTYLE has no effect. + + equ PS_EDT_SS_AUTO$ to 0; // Use the renderer default + equ PS_EDT_SS_LISTBOX$ to 1; // Render as normal ListBox items + equ PS_EDT_SS_TREEVIEW$ to 2; // Render as per Treeview items + // (if supported by the renderer) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // AUTOTRIMOPTIONS equates + // + // <1> If TRUE$ then treat whitespace as data + // <2> If TRUE$ then leave a trailing blank row + // <3> If TRUE$ then scan all rows, not just the trailing ones + + equ PS_EDT_AT_WHITESPACEISDATA$ to 1; + equ PS_EDT_AT_LEAVETRAILINGROW$ to 2; + equ PS_EDT_AT_SCANALLROWS$ to 3; + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SORT method + // + // call exec_Method( ctrlEntID, "SORT", sortCriteria, sortOptions ) + // + // sortCriteria === + // + // This argument is comprised of three fields that form an an AMV + // group. + // + // <0,1> @svm'd list of columns to sort by + // <0,2> @svm'd list of sorting directions/justification + // + // 0 - Descending Left + // 1 - Ascending Left + // 2 - Descending Right + // 3 - Ascending Right + // + // <0,3> @svm'd list of ICONV patterns + // + + equ EGSC_POS_SORTCOLS$ to 1 + equ EGSC_POS_SORTDIRS$ to 2 + equ EGSC_POS_SORTCONV$ to 3 + + equ EGSC_SORT_DESCLEFT$ to 0 + equ EGSC_SORT_ASCLEFT$ to 1 + equ EGSC_SORT_DESCRIGHT$ to 2 + equ EGSC_SORT_ASCRIGHT$ to 3 + + // sortOptions === + // + // This argument specifies the options for the SORT. + // + // <0,1> If TRUE$ then exceute the TRIM method before the sorting + // operation takes place, respecting the TRIMOPTIONS + // property settings + // + + equ EGSC_SORT_OPT_TRIM$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Style equates (Properties held in window style bits in + // PSPOS_SDKSTYLE$ <0,0,1>) + + // Old v9 (DataTbl) equates for reference and mapping + + equ DTS_NONE$ to 0x00000000; + equ DTS_VIRTUALMEM$ to 0x00000001; + equ DTS_EDIT$ to 0x00000004; + equ DTS_RESIZE$ to 0x00000008; + equ DTS_NUMBERS$ to 0x00000010; + equ DTS_LETTERS$ to 0x00000020; + equ DTS_OWNERDEF$ to 0x00000030; // This is the default in v9 + equ DTS_HGRID$ to 0x00000040; + equ DTS_VGRID$ to 0x00000080; + equ DTS_ROWSELECT$ to 0x00000100; + equ DTS_MULTIROW$ to 0x00000200; + equ DTS_COLSELECT$ to 0x00000400; + equ DTS_MULTICOL$ to 0x00000800; + equ DTS_SCROLLNOHIDE$ to 0x00001000; + equ DTS_ROWBUTTONS$ to 0x00002000; + equ DTS_ROWNUMBERS$ to 0x00004000; + equ DTS_DROPDOWN$ to 0x00008000; + equ DTS_AUTODROPDN$ to 0x00008002; + + equ DTS_GRID$ to bitOr( DTS_HGRID$, DTS_VGRID$ ) + + //////////////////////////////////////////////////////////////////////////// + + // V10 (EditGrid) equates + + equ ETS_AUTOAPPENDROW$ to 0x00000001; + equ ETS_AUTOTRIMROWS$ to 0x00000002; + equ ETS_EDIT$ to 0x00000004; + equ ETS_AUTOTRIMWSOK$ to 0x00000008; // Treat whitespace as data for autotrim + equ ETS_COLHEADERS$ to 0x00000010; + equ ETS_AUTOTRIMDELALL$ to 0x00000020; // Don't leave a blank row after the last row + equ ETS_HGRID$ to 0x00000040; + equ ETS_VGRID$ to 0x00000080; + equ ETS_ROWSELECT$ to 0x00000100; + equ ETS_MULTIROWSELECT$ to 0x00000200; + equ ETS_COLSELECT$ to 0x00000400; + equ ETS_MULTICOLSELECT$ to 0x00000800; + equ ETS_SCROLLNOHIDE$ to 0x00001000; + equ ETS_ROWBUTTONS$ to 0x00002000; + equ ETS_ROWNUMBERS$ to 0x00004000; + equ ETS_UNUSED_BIT16$ to 0x00008000; + + equ ETS_COLTOGGLESELECT$ to bitOr( ETS_COLSELECT$, ETS_MULTICOLSELECT$ ) + equ ETS_ROWTOGGLESELECT$ to bitOr( ETS_ROWSELECT$, ETS_MULTIROWSELECT$ ) + equ ETS_GRID$ to bitOr( ETS_HGRID$, ETS_VGRID$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // EditGrid Cell styles + equ ETCLS_LEFT$ to 0x00000000; + equ ETCLS_DISABLED$ to 0x00000001; // Used in header for ETCHS_HIDDEN + equ ETCLS_PROTECTED$ to 0x00000002; // Used in header for ETCHS_RESIZE + equ ETCLS_SKIPPED$ to 0x00000004; // Used in header for EGCHS_SORTASCEND + equ ETCLS_AUTOEDIT$ to 0x00000008; // Used in header for EGCHS_SORTDESCEND + equ ETCLS_CENTER$ to 0x00000010; + equ ETCLS_RIGHT$ to 0x00000020; + equ ETCLS_VCENTER$ to 0x00000040; + equ ETCLS_VBOTTOM$ to 0x00000080; + equ ETCLS_LOWERCASE$ to 0x00000100; + equ ETCLS_UPPERCASE$ to 0x00000200; + equ ETCLS_PASSWORD$ to 0x00000400; + equ ETCLS_DRAWHTML$ to 0x00000800; + equ ETCLS_SHOWELLIPSES$ to 0x00001000; + equ ETCLS_MULTILINE$ to 0x00002000; + equ ETCLS_WORDWRAP$ to 0x00004000; + equ ETCLS_AUTOSCROLL$ to 0x00008000; + equ ETCLS_VSCROLL$ to 0x00010000; + equ ETCLS_HSCROLL$ to 0x00020000; + equ ETCLS_BUTTON$ to 0x00040000; + equ ETCLS_DROPDOWN$ to 0x00080000; + equ ETCLS_DROPDOWNEDIT$ to 0x00100000; + equ ETCLS_OPTIONSBUTTON$ to 0x00200000; + equ ETCLS_CHECKBOX$ to 0x00400000; + equ ETCLS_CHKRIGHT$ to 0x00800000; + equ ETCLS_CHKCENTER$ to 0x01000000; + equ ETCLS_GLYPHCENTER$ to 0x02000000; + equ ETCLS_GLYPHRIGHT$ to 0x04000000; + equ ETCLS_GLYPHVCENTER$ to 0x08000000; + equ ETCLS_GLYPHVBOTTOM$ to 0x10000000; + equ ETCLS_ENABLEDRAG$ to 0x20000000; + equ ETCLS_ENABLEDROP$ to 0x40000000; + equ ETCLS_MANUALDROPDOWN$ to 0x80000000; + + equ ETCLS_READONLY$ to ( ETCLS_DISABLED$ + ETCLS_PROTECTED$ ); + + equ ETCLS_EDITMODE_MASK$ to ( ETCLS_READONLY$ ); + equ ETCLS_TEXTALIGN_MASK$ to ( ETCLS_CENTER$ + ETCLS_RIGHT$ + ETCLS_VCENTER$ + ETCLS_VBOTTOM$ ); + equ ETCLS_TEXTCASE_MASK$ to ( ETCLS_LOWERCASE$ + ETCLS_UPPERCASE$ ); + equ ETCLS_CHECKBOX_MASK$ to ( ETCLS_CHECKBOX$ + ETCLS_CHKRIGHT$ + ETCLS_CHKCENTER$ ); + equ ETCLS_GLYPHALIGN_MASK$ to ( ETCLS_GLYPHCENTER$ + ETCLS_GLYPHRIGHT$ + ETCLS_GLYPHVCENTER$ + ETCLS_GLYPHVBOTTOM$ ); + equ ETCLS_SCROLLBARS_MASK$ to ( ETCLS_VSCROLL$ + ETCLS_HSCROLL$ ); + equ ETCLS_DROPDOWN_MASK$ to ( ETCLS_DROPDOWN$ + ETCLS_DROPDOWNEDIT$ ); + + //////////////////////////////////////////////////////////////////////////// + + // EditGrid Header Cell styles - these are mapped into normal cell styles + // for the most part. This is to avoid having to write virtual functions + // for the Header cells to handle TextAlign, DrawHTML and so on. + + equ ETCHS_LEFT$ to ETCLS_LEFT$; + equ ETCHS_HIDDEN$ to 0x00000001; + equ ETCHS_RESIZE$ to 0x00000002; + equ ETCHS_UNUSED_BIT3$ to 0x00000004; + equ ETCHS_UNUSED_BIT4$ to 0x00000008; + equ ETCHS_CENTER$ to ETCLS_CENTER$; + equ ETCHS_RIGHT$ to ETCLS_RIGHT$; + equ ETCHS_VCENTER$ to ETCLS_VCENTER$; + equ ETCHS_VBOTTOM$ to ETCLS_VBOTTOM$; + equ ETCHS_UNUSED_BIT09$ to 0x00000100; + equ ETCHS_UNUSED_BIT10$ to 0x00000200; + equ ETCHS_UNUSED_BIT11$ to 0x00000400; + equ ETCHS_DRAWHTML$ to ETCLS_DRAWHTML$; + equ ETCHS_SHOWELLIPSES$ to ETCLS_SHOWELLIPSES$; + equ ETCHS_MULTILINE$ to ETCLS_MULTILINE$; + equ ETCHS_WORDWRAP$ to ETCLS_WORDWRAP$; + equ ETCHS_UNUSED_BIT16$ to 0x00008000; + equ ETCHS_UNUSED_BIT17$ to 0x00010000; + equ ETCHS_UNUSED_BIT18$ to 0x00020000; + equ ETCHS_UNUSED_BIT19$ to 0x00040000; + equ ETCHS_UNUSED_BIT20$ to 0x00080000; + equ ETCHS_UNUSED_BIT21$ to 0x00100000; + equ ETCHS_UNUSED_BIT22$ to 0x00200000; + equ ETCHS_CHECKBOX$ to ETCLS_CHECKBOX$; + equ ETCHS_CHKRIGHT$ to ETCLS_CHKRIGHT$; + equ ETCHS_CHKCENTER$ to ETCLS_CHKCENTER$; + equ ETCHS_GLYPHCENTER$ to ETCLS_GLYPHCENTER$; + equ ETCHS_GLYPHRIGHT$ to ETCLS_GLYPHRIGHT$; + equ ETCHS_GLYPHVCENTER$ to ETCLS_GLYPHVCENTER$; + equ ETCHS_GLYPHVBOTTOM$ to ETCLS_GLYPHVBOTTOM$; + equ ETCHS_UNUSED_BIT29$ to 0x20000000; + equ ETCHS_UNUSED_BIT30$ to 0x40000000; + // equ ETCHS_IMAGESTRETCH$ to ETCLS_IMAGESTRETCH$; + + equ ETCHS_TEXTALIGN_MASK$ to ( ETCHS_CENTER$ + ETCHS_RIGHT$ + ETCHS_VCENTER$ + ETCHS_VBOTTOM$ ); + equ ETCHS_CHECKBOX_MASK$ to ( ETCHS_CHECKBOX$ + ETCHS_CHKRIGHT$ + ETCHS_CHKCENTER$ ); + equ ETCHS_GLYPHALIGN_MASK$ to ( ETCHS_GLYPHCENTER$ + ETCHS_GLYPHRIGHT$ + ETCHS_GLYPHVCENTER$ + ETCHS_GLYPHVBOTTOM$ ); + + //////////////////////////////////////////////////////////////////////////// + + // These are for mapping from the old DataTbl.dll for v9 EditTables + // being loaded in legacy mode + + equ DTCS_RESIZE$ to 0x00000001; + equ DTCS_FIXED$ to 0x00000002; // NOT USED + equ DTCS_EDIT$ to 0x00000004; + equ DTCS_PROTECT$ to 0x00000008; + equ DTCS_UPPERCASE$ to 0x00000010; + equ DTCS_HIDDEN$ to 0x00000020; + equ DTCS_LEFT$ to 0x00000000; + equ DTCS_CENTER$ to 0x00000040; + equ DTCS_RIGHT$ to 0x00000080; + equ DTCS_HEADCENTER$ to 0x00000100; + equ DTCS_HEADRIGHT$ to 0x00000200; + equ DTCS_VSCROLL$ to 0x00000400; + equ DTCS_HSCROLL$ to 0x00000800; + equ DTCS_SKIPPED$ to 0x00001000; + equ DTCS_LOCKED$ to 0x00002000; // NOT USED + equ DTCS_SORTASC$ to 0x00004000; // NOT USED + equ DTCS_SORTDES$ to 0x00008000; // NOT USED + equ DTCS_CHECKBOX$ to 0x00010000; + equ DTCS_DROPDOWN$ to 0x00020000; + equ DTCS_HEADMULTI$ to 0x00040000; + equ DTCS_CHKRIGHT$ to 0x00080000; // Right-aligned CheckBoxes + equ DTCS_VALIGNCENTER$ to 0x00100000; + equ DTCS_VALIGNBOTTOM$ to 0x00200000; + equ DTCS_DROPDOWNEDIT$ to 0x00400000; + equ DTCS_OPTIONSBUTTON$ to 0x00800000; + equ DTCS_ENABLEDROPDOWNDRAG$ to 0x01000000; // Can drag from Drop down LIST <- not supported in v10 + equ DTCS_MULTILINE$ to 0x02000000; + equ DTCS_AUTOVSCROLL$ to 0x04000000; + equ DTCS_AUTOHSCROLL$ to 0x08000000; + equ DTCS_ENABLEDRAG$ to 0x10000000; + equ DTCS_ENABLEDROP$ to 0x20000000; + equ DTCS_CHKCENTER$ to 0x40000000; + equ DTCS_RESERVED$ to 0x80000000; // Do not use for row and cell styles + + equ DTCS_BTNRIGHT$ to DTCS_CHKRIGHT$; + equ DTCS_BTNCENTER$ to DTCS_CHKCENTER$; + + equ DTCS_TEXTALIGN_MASK$ to ( DTCS_CENTER$ + DTCS_RIGHT$ + DTCS_VALIGNCENTER$ + DTCS_VALIGNBOTTOM$ ); + equ DTCS_HEADTEXTALIGN_MASK$ to ( DTCS_HEADCENTER$ + DTCS_HEADRIGHT$ ); + equ DTCS_SCROLLBARS_MASK$ to ( DTCS_VSCROLL$ + DTCS_HSCROLL$ ); + equ DTCS_CHECKBOXSTYLE_MASK$ to ( DTCS_CHECKBOX$ + DTCS_CHKRIGHT$ + DTCS_CHKCENTER$ ); + + // Row styles + equ DTRS_LABELLEFT$ to 0x00000100; // Hijacked DTCS_HEADCENTER + equ DTRS_LABELCENTER$ to 0x00000000; // The default .... + equ DTRS_LABELRIGHT$ to 0x00000200; // Hijacked DTCS_HEADRIGHT + + equ DTRS_HEADTEXTALIGN_MASK$ to bitOr( DTRS_LABELLEFT$, DTRS_LABELRIGHT$ ); + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates (Properties held in window style bits in + // PSPOS_PSSTYLE$ <0,0,1>) + + equ PSS_EDT_HOTTRACKCELL$ to 0x00000001; + equ PSS_EDT_HIGHLIGHTHEADERS$ to 0x00000002; + equ PSS_EDT_COLHDRSORTCLICK$ to 0x00000020; + equ PSS_EDT_COLHDRSORTDBLCLK$ to 0x00000040; + equ PSS_EDT_NOAUTOROWFILLING$ to 0x00000080; // SUPPRESSAUTOROWFILLING property + equ PSS_EDT_AUTOTRIMSCANALL$ to 0x00000100; + equ PSS_EDT_PRESERVEFORMATTING$ to 0x00000200; + equ PSS_EDT_V10ROWEVENTMODE$ to 0x00000400; // ROWEVENTMODE property + equ PSS_EDT_NOROWDRAGSELECT$ to 0x00000800; // ALLOWROWDRAGSELECT property (inverse) + equ PSS_EDT_ALLOWDELETE$ to 0x00020000; // ALLOWROWDELETE property + equ PSS_EDT_ALLOWINSERT$ to 0x00040000; // ALLOWROWINSERT property + equ PSS_EDT_ALLOWLASTROWDELETE$ to 0x00080000; // ALLOWLASTROWDELETE property + equ PSS_EDT_SORTTRIM$ to 0x00100000; // SORTTRIM property + equ PSS_EDT_ENABLECOLDRAG$ to 0x00200000; // ALLOWCOLDRAG property + equ PSS_EDT_ENABLEROWDRAG$ to 0x00400000; // ALLOWROWDRAG property + equ PSS_EDT_NOAUTOSORTMARKERS$ to 0x08000000; // SUPPRESSAUTOSORTMARKERS property + + // Extended PS Style equates - (Properties held in window style bits in + // PSPOS_PSSTYLE$ <0,0,2>) + + equ PSSX_EDT_HSCROLLBAR$ to 0x00000001 + equ PSSX_EDT_VSCROLLBAR$ to 0x00000002 + equ PSSX_EDT_DEFROWHEIGHTSET$ to 0x00000004 + equ PSSX_EDT_COLHDRHEIGHTSET$ to 0x00000008 + equ PSSX_EDT_ROWSTRIPE$ to 0x00000010 + equ PSSX_EDT_ALLOWROWCLIPCOPY$ to 0x00000020 + equ PSSX_EDT_ALLOWROWCLIPPASTE$ to 0x00000040 + equ PSSX_EDT_ACCEPTRETURN$ to 0x00000200 + equ PSSX_EDT_ALLOWRESETPREVPOS$ to 0x00000400 + equ PSSX_EDT_SHOWSELNOFOCUS$ to 0x00000800 + equ PSSX_EDT_SUPPRESSCELLTOOLTIPS$ to 0x00001000 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + + equ POS_EDT_LIST$ to POS_LIST$ ; // @svm/@tm-delimited + equ POS_EDT_CFGINFO$ to POS_ROWLIMIT$ ; // @svm-delimited + equ POS_EDT_COLHDRFONT$ to POS_LOGFONT_1$ ; // @svm-delimited + equ POS_EDT_CELLSTYLES$ to POS_TEXT_10$ ; // @svm/@tm-delimited + equ POS_EDT_GRIDLINECOLOR$ to POS_COLOR_1$ ; // Single color only - Not a gradient + equ POS_EDT_EMPTYTEXT$ to POS_TEXT_14$ + equ POS_EDT_GLYPHLIST$ to POS_IMGLIST_1$ + equ POS_EDT_GLYPHLIST_PROPS$ to POS_IMGLIST_1_PROPS$ + + // Column positions - these form an "AMV group". Note that the original four + // v9 fields were @tm delimited for some reason - All fields in the group are + // now standardized to @svm. + equ POS_EDT_COLLABELS$ to POS_LABEL$ ; // @svm-delimited + equ POS_EDT_COLSTYLES$ to POS_COLSTYLES$ ; // @svm-delimited + equ POS_EDT_COLDATALENS$ to POS_CHARCOUNT$ ; // @svm-delimited + equ POS_EDT_COLDISPWIDTHS$ to POS_COLWIDE$ ; // @svm-delimited + equ POS_EDT_HDRSTYLES$ to POS_TYPESPECIFIC$ ; // @svm-delimited + equ POS_EDT_HDRFONTS$ to POS_TEXT_8$ ; // @svm/@tm-delimited + equ POS_EDT_HDRTOOLTIPS$ to POS_TEXT_2$ ; // @svm-delimited + equ POS_EDT_DROPDOWNLIST$ to POS_TEXT_3$ ; // @svm/@tm-delimited + equ POS_EDT_COLFONTS$ to POS_TEXT_9$ ; // @svm/@tm-delimited + equ POS_EDT_COLTOOLTIPS$ to POS_TEXT_4$ ; // @svm/@tm-delimited + equ POS_EDT_CUEBANNERS$ to POS_TEXT_1$ ; // @svm-delimited + equ POS_EDT_EDITMASKS$ to POS_TEXT_5$ ; // @svm/@tm-delimited + equ POS_EDT_VALIDCHARS$ to POS_TEXT_6$ ; // @svm-delimited + equ POS_EDT_COLBUTTONS$ to POS_TEXT_7$ ; // @svm/@tm-delimited (Text/Width) + equ POS_EDT_COLCELLSTYLES$ to POS_TEXT_11$ ; // @svm/@tm/";" -delimited + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINEXES structure overrides + + equ PSPOS_EDT_LIST$ to PSPOS_LIST$ ; // @svm/@tm-delimited + equ PSPOS_EDT_CFGINFO$ to PSPOS_ROWLIMIT$ ; // @svm-delimited + equ PSPOS_EDT_COLHDRFONT$ to PSPOS_LOGFONT_1$ ; // @svm-delimited + equ PSPOS_EDT_CELLSTYLES$ to PSPOS_TEXT_10$ ; // @svm/@tm-delimited + equ PSPOS_EDT_GRIDLINECOLOR$ to PSPOS_COLOR_1$ ; // Single color only - Not a gradient + equ PSPOS_EDT_EMPTYTEXT$ to PSPOS_TEXT_14$ + equ PSPOS_EDT_GLYPHLIST$ to PSPOS_IMGLIST_1$ + equ PSPOS_EDT_GLYPHLIST_PROPS$ to PSPOS_IMGLIST_1_PROPS$ + + // Column positions - these form an "AMV group" (See POS_ equates above) + equ PSPOS_EDT_COLLABELS$ to PSPOS_LABEL$ ; // @svm-delimited + equ PSPOS_EDT_COLSTYLES$ to PSPOS_COLSTYLES$ ; // @svm-delimited + equ PSPOS_EDT_COLDATALENS$ to PSPOS_CHARCOUNT$ ; // @svm-delimited + equ PSPOS_EDT_COLDISPWIDTHS$ to PSPOS_COLWIDE$ ; // @svm-delimited + equ PSPOS_EDT_HDRSTYLES$ to PSPOS_TYPESPECIFIC$ ; // @svm-delimited + equ PSPOS_EDT_HDRFONTS$ to PSPOS_TEXT_8$ ; // @svm/@tm-delimited + equ PSPOS_EDT_HDRTOOLTIPS$ to PSPOS_TEXT_2$ ; // @svm-delimited + equ PSPOS_EDT_DROPDOWNLIST$ to PSPOS_TEXT_3$ ; // @svm/@tm-delimited + equ PSPOS_EDT_COLFONTS$ to PSPOS_TEXT_9$ ; // @svm/@tm-delimited + equ PSPOS_EDT_COLTOOLTIPS$ to PSPOS_TEXT_4$ ; // @svm/@tm-delimited + equ PSPOS_EDT_CUEBANNERS$ to PSPOS_TEXT_1$ ; // @svm-delimited + equ PSPOS_EDT_EDITMASKS$ to PSPOS_TEXT_5$ ; // @svm/@tm-delimited + equ PSPOS_EDT_VALIDCHARS$ to PSPOS_TEXT_6$ ; // @svm-delimited + equ PSPOS_EDT_COLBUTTONS$ to PSPOS_TEXT_7$ ; // @svm/@tm-delimited (Text/Width) + equ PSPOS_EDT_COLCELLSTYLES$ to PSPOS_TEXT_11$ ; // @svm/@tm/";" -delimited + + /////////////////////////////////////////////////////////////////////////// + // PSPOS_EDT_CFGINFO equates + // + // <0,0,1> Max Row Limit + // <0,0,2> Auto resize Col + // <0,0,3> RowStripe On Flag (Bool) + // <0,0,4> RowStripe Odd Color + // <0,0,5> RowStripe Even Color + // <0,0,6> Column Header Height + // <0,0,7> Row Height + // <0,0,8> Row Header Width (used to be <0,0,1> in PSPOS_COLWIDE$ ) + // <0,0,9> Edit Key + // <0,0,10> Options Key + // <0,0,11> Min Row Limit + // <0,0,12> FocusRect Color + // <0,0,13> FocusRect Style + // <0,0,14> FocusRect Weight + + equ PS_EDT_CIPOS_MAXROWLIMIT$ to 1 ; // 0 for no max row limit (the default) + equ PS_EDT_CIPOS_AUTOSIZECOL$ to 2 ; // 0 for no autosizing (the default) + equ PS_EDT_CIPOS_ROWSTRIPE$ to 3 ; // T/F - default is F + equ PS_EDT_CIPOS_ROWSTRIPEODDCOLOR$ to 4 ; // COLORREF + equ PS_EDT_CIPOS_ROWSTRIPEEVENCOLOR$ to 5 ; // COLORREF + equ PS_EDT_CIPOS_COLHDRHEIGHT$ to 6 ; // 0 to use default (font-based) + equ PS_EDT_CIPOS_COLROWHEIGHT$ to 7 ; // 0 to use default (font-based) + equ PS_EDT_CIPOS_ROWHEADERWIDTH$ to 8 ; // null to use default (40px) + equ PS_EDT_CIPOS_EDITKEY$ to 9 ; // Defaults to F2 + equ PS_EDT_CIPOS_OPTIONSKEY$ to 10 ; // Defaults to F4 + equ PS_EDT_CIPOS_MINROWLIMIT$ to 11 ; // 0 for no min row limit (the default) + equ PS_EDT_CIPOS_FOCUSRECTCOLOR$ to 12 ; // COLOROREF + equ PS_EDT_CIPOS_FOCUSRECTSTYLE$ to 13 ; // 0, 1 (Dotted,Solid) + equ PS_EDT_CIPOS_FOCUSRECTWEIGHT$ to 14 ; // 1-3 + + /////////////////////////////////////////////////////////////////////////// + // PSPOS_EDT_CELLSTYLES$ equates + // + // This field contains the default CELLSTYLE for each state. There are + // three groups of CELLSTYLES. One for each of: + // + // 1) Data Cells + // 2) Column Header Cells + // 3) Row Header Cells + // + // <0,0,1> Normal cell CELLSTYLE <- always NULL (we use the normal FONT,FORECOLOR etc properties for this + // <0,0,2> Hot cell CELLSTYLE + // <0,0,3> Disabled cell CELLSTYLE + // <0,0,4> Selected cell CELLSTYLE + // <0,0,5> HotSelected cell CELLSTYLE + // <0,0,6> SelectedNoFocus cell CELLSTYLE + // <0,0,7> Current cell CELLSTYLE + // + // <0,0,11> Normal col header cell CELLSTYLE + // <0,0,12> Hot col header cell CELLSTYLE + // <0,0,13> Disabled col header cell CELLSTYLE + // <0,0,14> Selected col header cell CELLSTYLE + // <0,0,15> HotSelected col header cell CELLSTYLE + // <0,0,16> SelectedNoFocus col header cell CELLSTYLE + // <0,0,17> Currrent cell CELLSTYLE + // + // <0,0,21> Normal row header cell CELLSTYLE + // <0,0,22> Hot row header cell CELLSTYLE + // <0,0,23> Disabled row header cell CELLSTYLE + // <0,0,24> Selected row header cell CELLSTYLE + // <0,0,25> HotSelected row header cell CELLSTYLE + // <0,0,26> SelectedNoFocus row header cell CELLSTYLE + // <0,0,27> Current cell CELLSTYLE + // + // Each CELLSTYLE in these subvalues is an @tm delimited structure as + // noted above, i.e. + // + // <0,0,0,1> ForeColor (COLORREF) + // <0,0,0,2> BackColor From (COLORREF) + // <0,0,0,3> BackColor To (COLORREF) + // <0,0,0,4> Bold TRUE$/FALSE$ + // <0,0,0,5> Italic TRUE$/FALSE$ + // <0,0,0,6> Underline TRUE$/FALSE$ + // <0,0,0,7> Translucency (0-100) + // <0,0,0,8> GlyphIndex (>=0) + + equ PS_EDT_DCCSPOS_NORMAL$ to 1 ; equ PS_EDT_DCCSPOS_START$ to PS_EDT_DCCSPOS_NORMAL$ + equ PS_EDT_DCCSPOS_HOT$ to 2 + equ PS_EDT_DCCSPOS_DISABLED$ to 3 + equ PS_EDT_DCCSPOS_SELECTED$ to 4 + equ PS_EDT_DCCSPOS_HOTSELECTED$ to 5 + equ PS_EDT_DCCSPOS_SELECTNOFOCUS$ to 6 + equ PS_EDT_DCCSPOS_CURRENT$ to 7 ; equ PS_EDT_DCCSPOS_END$ to PS_EDT_DCCSPOS_CURRENT$ + + // ------------------------------------------------- + + equ PS_EDT_CHCSPOS_NORMAL$ to 11 ; equ PS_EDT_CHCSPOS_START$ to PS_EDT_CHCSPOS_NORMAL$ + equ PS_EDT_CHCSPOS_HOT$ to 12 + equ PS_EDT_CHCSPOS_DISABLED$ to 13 + equ PS_EDT_CHCSPOS_SELECTED$ to 14 + equ PS_EDT_CHCSPOS_HOTSELECTED$ to 15 + equ PS_EDT_CHCSPOS_SELECTNOFOCUS$ to 16 + equ PS_EDT_CHCSPOS_CURRENT$ to 17 ; equ PS_EDT_CHCSPOS_END$ to PS_EDT_CHCSPOS_CURRENT$ + + // ------------------------------------------------- + + equ PS_EDT_RHCSPOS_NORMAL$ to 21 ; equ PS_EDT_RHCSPOS_START$ to PS_EDT_RHCSPOS_NORMAL$ + equ PS_EDT_RHCSPOS_HOT$ to 22 + equ PS_EDT_RHCSPOS_DISABLED$ to 23 + equ PS_EDT_RHCSPOS_SELECTED$ to 24 + equ PS_EDT_RHCSPOS_HOTSELECTED$ to 25 + equ PS_EDT_RHCSPOS_SELECTNOFOCUS$ to 26 + equ PS_EDT_RHCSPOS_CURRENT$ to 27 ; equ PS_EDT_RHCSPOS_END$ to PS_EDT_RHCSPOS_CURRENT$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // INSERT column equates - structure definition for inserting columns + // + // <1> Header Text (v9 COLLABEL) + // <2> Style (v9 COLSTYLE) ETCLS_ styles (or DTCS_ for v9) + // <3> Data Length (v9 COLCHARS) + // <4> Display Width (v9 COLWIDTH) + // <5> Header Style ETCHS_ styles + // <6> Header Font + // <7> Header ToolTip + // <8> Cell DropDown List + // <9> Cell Font + // <10> Cell ToolTip + // <11> Cell CueBanner + // <12> Cell EditMask (@vm delimited) + // <13> Cell ValidChars + // <14> Cell ButtonText/Width (@vm delimited) + + equ PS_EDT_INSPOS_HEADERTEXT$ to 1 + equ PS_EDT_INSPOS_CELLSTYLE$ to 2 + equ PS_EDT_INSPOS_DATALEN$ to 3 + equ PS_EDT_INSPOS_DISPWIDTH$ to 4 + equ PS_EDT_INSPOS_HEADERSTYLE$ to 5 + equ PS_EDT_INSPOS_HEADERFONT$ to 6 ; // @svm delimited + equ PS_EDT_INSPOS_HEADERHELPTEXT$ to 7 + equ PS_EDT_INSPOS_DROPDOWNLIST$ to 8 ; // @vm delimited + equ PS_EDT_INSPOS_FONT$ to 9 + equ PS_EDT_INSPOS_HELPTEXT$ to 10 + equ PS_EDT_INSPOS_CUEBANNER$ to 11 + equ PS_EDT_INSPOS_EDITMASK$ to 12 ; // @vm delimited + equ PS_EDT_INSPOS_VALIDCHARS$ to 13 + equ PS_EDT_INSPOS_BUTTONTEXT$ to 14 + + // However, both style fields can be substituted for an @vm'd array of + // property values if it makes life easier + // + // Column Style (field<2>) can be an @vm'd array structured like so: + // + // <0,1> CellType CELLTYPE property + // <0,2> EditMode EDITMODE property + // <0,3> TextAlign TEXTALIGN property + // <0,4> TextCase TEXTCASE property + // <0,5> CheckBoxAlign TEXTALIGN + // <0,6> OptionsButton 1/0 + // <0,7> PasswordStyle 1/0 + // <0,8> DrawHTML 1/0 + // <0,9> ShowEllipses 1/0 + // <0,10> Multiline 1/0 + // <0,11> ScrollBars SCROLLBARS property + // <0,12> AutoScroll 1/0 + // <0,13> WordWrap 1/0 + // <0,14> GlyphAlign IMAGEALIGN property + // <0,15> AutoEdit 1/0 + // <0,16> Skipped 1/0 + // <0,17> EnableDrag 1/0 + // <0,18> EnableDrop 1/0 + + equ PS_EDT_CCSPOS_CELLTYPE$ to 1 + equ PS_EDT_CCSPOS_EDITMODE$ to 2 + equ PS_EDT_CCSPOS_TEXTALIGN$ to 3 + equ PS_EDT_CCSPOS_TEXTCASE$ to 4 + equ PS_EDT_CCSPOS_CHECKBOXALIGN$ to 5 + equ PS_EDT_CCSPOS_OPTIONSBUTTON$ to 6 + equ PS_EDT_CCSPOS_PASSWORDSTYLE$ to 7 + equ PS_EDT_CCSPOS_DRAWHTML$ to 8 + equ PS_EDT_CCSPOS_SHOWELLIPSES$ to 9 + equ PS_EDT_CCSPOS_MULTILINE$ to 10 + equ PS_EDT_CCSPOS_SCROLLBARS$ to 11 + equ PS_EDT_CCSPOS_AUTOSCROLL$ to 12 + equ PS_EDT_CCSPOS_WORDWRAP$ to 13 + equ PS_EDT_CCSPOS_GLYPHALIGN$ to 14 + equ PS_EDT_CCSPOS_AUTOEDIT$ to 15 + equ PS_EDT_CCSPOS_SKIPPED$ to 16 + equ PS_EDT_CCSPOS_ENABLEDRAG$ to 17 + equ PS_EDT_CCSPOS_ENABLEDROP$ to 18 + + // Header Style (field<4>) can be an @vm'd array structured like so: + // + // <0,1> CellType Header CELLTYPE property + // <0,2> Hidden 1/0 + // <0,3> Resizable 1/0 + // <0,4> TextAlign TEXTALIGN property + // <0,5> CheckBoxAlign TEXTALIGN + // <0,6> DrawHTML 1/0 + // <0,7> ShowEllipses 1/0 + // <0,8> Multiline 1/0 + // <0,9> WordWrap 1/0 + // <0,10> GlyphALign IMAGEALIGN property + + equ PS_EDT_CHSPOS_CELLTYPE$ to 1 + equ PS_EDT_CHSPOS_HIDDEN$ to 2 + equ PS_EDT_CHSPOS_RESIZABLE$ to 3 + equ PS_EDT_CHSPOS_TEXTALIGN$ to 4 + equ PS_EDT_CHSPOS_CHECKBOXALIGN$ to 5 + equ PS_EDT_CHSPOS_DRAWHTML$ to 6 + equ PS_EDT_CHSPOS_SHOWELLIPSES$ to 7 + equ PS_EDT_CHSPOS_MULTILINE$ to 8 + equ PS_EDT_CHSPOS_WORDWRAP$ to 9 + equ PS_EDT_CHSPOS_GLYPHALIGN$ to 10 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // DELETEROW event + + // InsInfo parameter constants + // + // <0,1> TRUE$ if the DELETEROW event was triggered from a WM_CUT + // operation + + equ PS_EDT_DELINFOPOS_FROMCUT$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // INSERTROW event + + // InsInfo parameter constants + // + // <0,1> TRUE$ if the INSERTROW event was triggered from a WM_PASTE + // operation + + equ PS_EDT_INSINFOPOS_FROMPASTE$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CELLPOSCHANGED context flags + + equ PS_EDT_CTF_NONE$ to 0x00000000; + equ PS_EDT_CTF_KEYSTROKE$ to 0x00000001; + equ PS_EDT_CTF_MOUSECLICK$ to 0x00000002; + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_EDIT_EQUATES.txt b/SYSPROG/STPROCINS/PS_EDIT_EQUATES.txt new file mode 100644 index 0000000..9e878a1 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_EDIT_EQUATES.txt @@ -0,0 +1,206 @@ +compile insert PS_Edit_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS EDITLINE/EDITBOX object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 25 Nov 21 Added RICHEDITBOX equates + djh 12 Jan 18 fix equate POS_EDB_TABSTOPS$ to point to POS_COLWIDE$ instead of PSPOS_COLWIDE$ + Mr C 16 Nov 17 Added PSS_EDIT_V9_DISABLEDHARD$ + Mr C 07 Sep 16 Fixed missing equate "$" suffixes + Mr C 07 Jul 16 Include msWin_Edit_Equates + Mr C 02 Feb 16 Added SHOWBALLOONTIP constants + Mr C 30 Dec 15 Added oiWin_Equates + Mr C 20 Dec 15 Corrected Hard/Soft disabled styling + Mr C 04 Oct 15 Added more PS + Mr C 29 Sep 15 Updated PASSWORDSTYLE property styles + Mr C 08 Apr 15 Tidy up + Mr C 24 Mar 15 Moved ACCEPTRETURN and ACCEPTTAB + Mr C 23 Mar 15 Added AUTOCOMPLETE equates +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_EDIT_EQUATES_ +#define _PS_EDIT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +////////////////////////////////////////////////////////////////////////////// + + $insert msWin_Edit_Equates + $insert oiwin_Equates + $insert ps_Equates + $insert ps_Style_X_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // ES_LEFT -> TEXTALIGN property (all) + // ES_RIGHT -> TEXTALIGN property (all) + // ES_CENTER -> TEXTALIGN property (all) + // ES_UPPERCASE -> TEXTCASE property (all) + // ES_LOWERCASE -> TEXTCASE property (all) + // ES_PASSWORD -> Not used in v10 (EDITLINE) + // ES_AUTOVSCROLL -> AUTOSCROLL property (EDITBOX) + // ES_AUTOHSCROLL -> WORDWRAP property (EDITBOX) + // ES_NOHIDESEL -> HIDESELECTION property (all) + // ES_READONLY -> READONLY property (all) + // ES_WANTRETURN -> ACCEPTRETURN property (all) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + equ PSS_EDIT_TABOUTEXCEED$ to 0x00000020 ; // TABOUTEXCEED property + equ PSS_EDIT_SOFTDISABLED$ to 0x00080000 ; // ENABLED property + + // From v9 FormDes (obsolete) + equ PSS_EDIT_V9_DISABLEDHARD$ to 0x00000040 + + // PS Style equates for EDITLINEs + equ PSS_EDIT_ACCEPTTAB$ to 0x00000001 ; // ACCEPTTAB property + equ PSS_EDIT_AUTOSELECT$ to 0x00000008 ; // AUTOSELECT property + equ PSS_EDIT_SELECTBYGROUP$ to 0x00000200 ; // EDITMASKGROUPSEL property + equ PSS_EDIT_SETMASKEDONLY$ to 0x00000400 ; // SETMASKEDCHARSONLY property + equ PSS_EDIT_GETMASKEDONLY$ to 0x00000800 ; // GETMASKEDCHARSONLY property + + equ PSSX_EDIT_PASSWORD$ to 0x00000100; ; // PASSWORDSTYLE property + + // PS style equates for EDITBOXs + equ PSS_EDIT_AUTOINDENT$ to 0x00000200 ; // AUTOINDENT property + equ PSS_EDIT_TEXTVALVM$ to 0x00000400 ; // TEXTVALVM property + + // PS style equates for RICHEDITBOXs + equ PSS_RCH_USETEXTVALFORDEFPROP$ to 0x00000100 ; // USETEXTVALFORDEFPROP property + equ PSS_RCH_SPELLCHECK$ to 0x00000800 ; // SPELLCHECK property + equ PSS_RCH_SINGLELINE$ to 0x08000000 ; // SINGLELINE property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + + // all + equ POS_EDX_LIMIT$ to POS_CHARCOUNT$ + + // EDITLINE + equ POS_EDL_AUTOCOMP_LIST$ to POS_LIST$ ; // @svm delimited custom list + equ POS_EDL_AUTOCOMP_CFG$ to POS_VALUE$ ; // <0,0,1> source; <0,0,2> mode + equ POS_EDL_CUEBANNER$ to POS_TEXT_1$ + equ POS_EDL_EDITMASK$ to POS_TEXT_2$ ; // <0,0,1> mask; <0,0,2> template; <0,0,3> maskchar + equ POS_EDL_VALIDCHARS$ to POS_TEXT_3$ + equ POS_EDL_EXITCHARS$ to POS_TEXT_4$ + equ POS_EDL_PASSWORDPEEKTIME$ to POS_NUMCOLS$ + + // EDITBOX + equ POS_EDB_TABSTOPS$ to POS_COLWIDE$ ; // @svm delimited + + // RICHEDITBOX + equ POS_RCH_MARGINS$ to POS_TEXT_5$ ; // <0,0,1> Left margin; <0,0,2> Right Margin + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINEXES structure overrides + + // all + equ PSPOS_EDX_LIMIT$ to PSPOS_CHARCOUNT$ + + // EDITLINE + equ PSPOS_EDL_AUTOCOMP_LIST$ to PSPOS_LIST$ ; // @svm delimited custom list + equ PSPOS_EDL_AUTOCOMP_CFG$ to PSPOS_VALUE$ ; // <0,0,1> source; <0,0,2> mode + equ PSPOS_EDL_CUEBANNER$ to PSPOS_TEXT_1$ + equ PSPOS_EDL_EDITMASK$ to PSPOS_TEXT_2$ ; // <0,0,1> mask; <0,0,2> template; <0,0,3> maskchar + equ PSPOS_EDL_VALIDCHARS$ to PSPOS_TEXT_3$ + equ PSPOS_EDL_EXITCHARS$ to PSPOS_TEXT_4$ + equ PSPOS_EDL_PASSWORDPEEKTIME$ to PSPOS_NUMCOLS$ + + // EDITBOX + equ PSPOS_EDB_TABSTOPS$ to PSPOS_COLWIDE$ ; // @svm delimited + + // RICHEDITBOX + equ PSPOS_RCH_MARGINS$ to PSPOS_TEXT_5$ ; // <0,0,1> Left margin; <0,0,2> Right Margin + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // // OI EDIT controls have a "tri-bool" enabled state: + // + // -1 - means "hard disabled", which is the normal Windows OS disabled + // 0 - means soft disabled, which the control looks enabled but all + // keyboard and mouse interaction is blocked. + // 1 - means enabled. + + // ENABLED property values + + equ PS_EDL_ENABLED$ to 1 + equ PS_EDL_SOFTDISABLED$ to 0 + equ PS_EDL_HARDDISABLED$ to -1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // TEXTCASE property + + equ PS_EDX_TEXTCASE_MIXED$ to 0 + equ PS_EDX_TEXTCASE_LOWER$ to 1 + equ PS_EDX_TEXTCASE_UPPER$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SHOWBALLOONTIP method + // + // call exec_Method( ctrlEntID, "SHOWBALLOONTIP", title, message, iconID ) + + // Icon IDs + equ PS_EDX_TTI_NONE$ to 0 + equ PS_EDX_TTI_INFO$ to 1 + equ PS_EDX_TTI_WARNING$ to 2 + equ PS_EDX_TTI_ERROR$ to 3 + equ PS_EDX_TTI_INFO_LARGE$ to 4 + equ PS_EDX_TTI_WARNING_LARGE$ to 5 + equ PS_EDX_TTI_ERROR_LARGE$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // AUTOCOMPLETEMODE property + + equ PS_EDL_ACM_DISABLED$ to 0 + equ PS_EDL_ACM_APPEND$ to 1 + equ PS_EDL_ACM_SUGGEST$ to 2 ; // dropdown... + equ PS_EDL_ACM_ALL$ to 3 ; // append and dropdown + + // AUTOCOMPLETESOURCE property + + equ PS_EDL_ACS_CUSTOM$ to 0 ; // Use AUTOCOMPLETELIST + equ PS_EDL_ACS_FILELIST$ to 1 + equ PS_EDL_ACS_DIRLIST$ to 2 + equ PS_EDL_ACS_HISTORY$ to 3 + equ PS_EDL_ACS_MRULIST$ to 4 + equ PS_EDL_ACS_SHELL$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // RICHEDIT MARGINS property + + equ PS_RCH_DFLT_MARGIN$ to 5 + equ PS_RCH_MIN_MARGIN$ to 0 + equ PS_RCH_MAX_MARGIN$ to 100 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_EQUATES.txt b/SYSPROG/STPROCINS/PS_EQUATES.txt new file mode 100644 index 0000000..d6a4b38 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_EQUATES.txt @@ -0,0 +1,593 @@ +compile insert PS_EQUATES +/* + ** Copyright (C) 1992-2021 Revelation Software Inc. All Rights Reserved ** + + Author : GG + Date : A long time ago, in a Revelation far far away ... + Purpose : Constants for working with PS object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 01 Jun 23 Added IMAGE RESIZEMODE equates + Mr C 20 Jan 21 Moved SYSMSG codes to oiwin_SysMsg_Equates + Mr C 15 Oct 20 Added SETHBITMAP method equates + Moved Added SHOWEFFECT/HIDEEFFECT equates to PS_WINDOW_EQUATES + Mr C 20 Sep 20 Added MOUSEMOVE event equates + Mr C 05 Dec 19 Added PSPOS_UDPNAMES$ and PSPOS_UDPVALUES$ + Mr C 13 Feb 19 Added PSPOS_VIEWPROPERTIES$ + Mr C 22 Mar 18 Added PS_TRACKSIZE_VAL_NOTSET$ + Mr C 07 Aug 17 Moved InitialPosition equates to PS_WINDOW_EQUATES + Mr C 09 Jul 17 Added PSCTL_MENUBAR$ + Mr C 05 May 16 Added SCALEMETRICS equates + Mr C 21 Jan 16 Extended generic placeholders again again again!! + Mr C 07 Jan 16 Added mouse button equates + Mr C 20 Dec 15 Added Horizontal Text Align values + Mr C 13 Dec 15 Added PSCTL_GROUPBOXEX$ + djh 06 Nov 15 Remove SCALEUNITS, they already exist in PS_WINDOW_EQUATES + Mr C 04 Nov 15 Added PAGENUMBER constants + Mr C 28 Oct 15 Added SCALEUNITS, EDITSTATEFLAGS constants + Mr C 08 Sep 15 Extended generic placeholders again again!! + Mr C 20 Apr 15 Extended generic placeholders again! + Mr C 06 Mar 15 Fixed shpelling mishtook + Mr C 18 Feb 15 Added GETPARENTFRAME method equates + Mr C 13 Feb 15 Removed DSO items + Mr C 12 Feb 15 Added PSPOS_CURSOR$ + Mr C 10 Feb 15 Added PSPOS_WINMSGLIST$ + Mr C 22 Jan 15 Added TRACKINGSIZE equates + Mr C 06 Dec 14 Added PSPOS_CONTEXTMENU$ + Mr C 18 Nov 14 Added PSPOS_IMAGE$ + Mr C 23 Oct 14 Added NoAutoScale to standard image and imagelist + properties + Mr C 28 Dec 12 Updated for OI 10 +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_EQUATES_ +#define _PS_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSMSG codes moved to oiWin_SysMsg_Equates - include for backwards + // compatibility + $insert oiWin_SysMsg_Equates + +/////////////////////////////////////////////////////////////////////////////// + + // Presentation Server Control Types + + equ PSCTL_ANIMATION$ to "ANIMATE" + equ PSCTL_BITMAP$ to "BITMAP" + equ PSCTL_CHECKBOX$ to "CHECKBOX" + equ PSCTL_COLORDROPDOWN$ to "COLORDROPDOWN" + equ PSCTL_COMBOBOX$ to "COMBOBOX" + equ PSCTL_DATETIME$ to "DATETIME" + equ PSCTL_EDITBOX$ to "EDITBOX" + equ PSCTL_EDITFIELD$ to "EDITFIELD" + equ PSCTL_EDITTABLE$ to "EDITTABLE" + equ PSCTL_GROUPBOX$ to "GROUPBOX" ; // v9-style + equ PSCTL_GROUPBOXEX$ to "GROUPBOXEX" ; // v10-style + equ PSCTL_HSCROLLBAR$ to "HSCROLLBAR" + equ PSCTL_HSPLITBAR$ to "HSPLITBAR" + equ PSCTL_HYPERLINK$ to "HYPERLINK" + equ PSCTL_LISTBOX$ to "LISTBOX" + // equ PSCTL_LISTVIEW$ to "LISTVIEW" + equ PSCTL_MENU$ to "MENU" + equ PSCTL_MENUBAR$ to "MENUBAR" + // equ PSCTL_MONTHCAL$ to "MONTHCAL" + equ PSCTL_OLECONTROL$ to "OLECONTROL" + // equ PSCTL_PAGER$ to "PAGER" + equ PSCTL_PANEL$ to "PANEL" + equ PSCTL_PROGRESSBAR$ to "PROGRESSBAR" + equ PSCTL_PROPERTYGRID$ to "PROPERTYGRID" + equ PSCTL_PUSHBUTTON$ to "PUSHBUTTON" + equ PSCTL_RADIOBUTTON$ to "RADIOBUTTON" + equ PSCTL_RADIOGROUP$ to "RADIOGROUP" + equ PSCTL_REBAR$ to "REBAR" + equ PSCTL_RICHEDITBOX$ to "RICHEDITBOX" + equ PSCTL_STATIC$ to "STATIC" + equ PSCTL_STATUSBAR$ to "STATUSBAR" + equ PSCTL_TABCONTROL$ to "TABCONTROL" + equ PSCTL_TOOLBAR$ to "TOOLBAR" + // equ PSCTL_TRACKBAR$ to "TRACKBAR" + equ PSCTL_TREELISTBOX$ to "TREELISTBOX" ; // == Old Hierarchical ListBox + // equ PSCTL_TREEVIEW$ to "TREEVIEW" + equ PSCTL_UPDOWN$ to "UPDOWN" + equ PSCTL_VSCROLLBAR$ to "VSCROLLBAR" + equ PSCTL_VSPLITBAR$ to "VSPLITBAR" + equ PSCTL_WINCONTROL$ to "WINCONTROL" + equ PSCTL_WINDOW$ to "WINDOW" + + // Deprecated controls + equ PSCTL_PUSHBMP$ to "PUSHBMP" + equ PSCTL_CHECKBMP$ to "CHECKBMP" + + // Deleted controls + equ PSCTL_ICON$ to "ICON" + equ PSCTL_RTFBOX$ to "RTFBOX" + + // Non - HWND based types + equ PSCTL_REBARBAND$ to "REBARBAND" + equ PSCTL_REBARBANDS$ to "REBARBANDS" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Presentation Server Events + + equ PSEVENT_ACTIVATED$ to "ACTIVATED" + equ PSEVENT_ARRANGEICONS$ to "ARRANGEICONS" + equ PSEVENT_BUTTONDOWN$ to "BUTTONDOWN" + equ PSEVENT_BUTTONUP$ to "BUTTONUP" + equ PSEVENT_CASCADE$ to "CASCADE" + equ PSEVENT_CHANGED$ to "CHANGED" + equ PSEVENT_CHAR$ to "CHAR" + equ PSEVENT_CLICK$ to "CLICK" + equ PSEVENT_CLOSE$ to "CLOSE" + equ PSEVENT_COLRESIZE$ to "COLSIZE" + equ PSEVENT_CREATE$ to "CREATE" + equ PSEVENT_DBLCLK$ to "DBLCLK" + equ PSEVENT_DELETEROW$ to "DELETEROW" + equ PSEVENT_DDEADVISE$ to "DDEADVISE" + equ PSEVENT_DDEERROR$ to "DDEERROR" + equ PSEVENT_DRAGDROP$ to "DRAGDROP" + equ PSEVENT_DRAGEND$ to "DRAGEND" + equ PSEVENT_DRAGOVER$ to "DRAGOVER" + equ PSEVENT_DRAGSTART$ to "DRAGSTART" + equ PSEVENT_DROPDOWN$ to "DROPDOWN" + equ PSEVENT_DROPFILES$ to "DROPFILES" + equ PSEVENT_GETFOCUS$ to "GOTFOCUS" + equ PSEVENT_HSCROLL$ to "HSCROLL" + equ PSEVENT_INACTIVATED$ to "INACTIVATED" + equ PSEVENT_INSERTROW$ to "INSERTROW" + equ PSEVENT_LOSEFOCUS$ to "LOSTFOCUS" + equ PSEVENT_MENU$ to "MENU" + equ PSEVENT_OLE$ to "OLE" + equ PSEVENT_POSCHANGED$ to "POSCHANGED" + equ PSEVENT_RESIZE$ to "RESIZE" + equ PSEVENT_SIZE$ to "SIZE" + equ PSEVENT_WINMSG$ to "WINMSG" + equ PSEVENT_VSCROLL$ to "VSCROLL" + +/////////////////////////////////////////////////////////////////////////////// + + // "Synthetic" events - these are not recognised by the PS + + equ PSEVENT_READ$ to "READ" + equ PSEVENT_WRITE$ to "WRITE" + equ PSEVENT_CLEAR$ to "CLEAR" + equ PSEVENT_DELETE$ to "DELETE" + equ PSEVENT_CALCULATE$ to "CALCULATE" + equ PSEVENT_HELP$ to "HELP" + equ PSEVENT_OPTIONS$ to "OPTIONS" + equ PSEVENT_NOTES$ to "NOTES" + equ PSEVENT_OMNIEVENT$ to "OMNIEVENT" + equ PSEVENT_IXLOOKUP$ to "IXLOOKUP" + + equ PSEVENT_QBFINIT$ to "QBFINIT" + equ PSEVENT_QBFRUN$ to "QBFRUN" + equ PSEVENT_QBFFIRST$ to "QBFFIRST" + equ PSEVENT_QBFLAST$ to "QBFLAST" + equ PSEVENT_QBFNEXT$ to "QBFNEXT" + equ PSEVENT_QBFPREV$ to "QBFPREV" + equ PSEVENT_QBFGOTO$ to "QBFGOTO" + equ PSEVENT_QBFABS$ to "QBFABS" + equ PSEVENT_QBFCLOSE$ to "QBFCLOSE" + + // error processing + equ PSEVENT_VALIDERR$ to "VALIDERR" ; // special case of SYSMSG VALIDERR + equ PSEVENT_REQUIRERR$ to "REQUIRERR" ; // special case of SYSMSG REQUIREERR + equ PSEVENT_SYSMSG$ to "SYSMSG" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Presentation Server Control Attribute Positions + + equ PSPOS_NAME$ to 1 + equ PSPOS_CLASS$ to 2 + equ PSPOS_TYPE$ to 3 ; // . + equ PSPOS_PARENT$ to 4 + equ PSPOS_X$ to 5 + equ PSPOS_Y$ to 6 ; // pageNo:yPos + equ PSPOS_WIDE$ to 7 + equ PSPOS_HIGH$ to 8 + equ PSPOS_TEXT$ to 9 + equ PSPOS_ENABLED$ to 10 + equ PSPOS_VISIBLE$ to 11 + equ PSPOS_SDKSTYLE$ to 12 ; // <0,0,1> Style; <0,0,2> ExStyle + equ PSPOS_PSSTYLE$ to 13 ; // <0,0,1> Style; <0,0,2> ExStyle + equ PSPOS_TAB$ to 14 + equ PSPOS_BITMAP$ to 15 ; // <0,0,1> <=96 DPI; <0,0,2> <=120 DPI; <0,0,3> <=144 DPI; <0,0,4> >144 DPI + equ PSPOS_IMAGE$ to PSPOS_BITMAP$ ; // Alias - trying to get away from the word "bitmap"! + equ PSPOS_ICON$ to 16 + equ PSPOS_BKCOLOR$ to 17 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ PSPOS_FORECOLOR$ to 18 + equ PSPOS_LOGFONT$ to 19 + equ PSPOS_MISC$ to 20 + equ PSPOS_EVENTS$ to 21 + equ PSPOS_REPOSTYPE$ to 22 + equ PSPOS_LIST$ to 23 + equ PSPOS_VALUE$ to 24 + equ PSPOS_SCROLLRANGE$ to 25 ; * <0,0,1> Vert; <0,0,2>; Horz ( each subvalue is a DWORD, LOWORD is minVal, HIWORD is maxVal ) + equ PSPOS_SCROLLCHANGE$ to 26 ; * <0,0,1> Vert; <0,0,2>; Horz + equ PSPOS_CHARCOUNT$ to 27 + equ PSPOS_NUMCOLS$ to 28 + equ PSPOS_ROWLIMIT$ to 29 ; // Actually an @svm'd structure for edit tables... + equ PSPOS_COLSTYLES$ to 30 + equ PSPOS_COLWIDE$ to 31 + equ PSPOS_LABEL$ to 32 + equ PSPOS_SPOT_X$ to 33 ; // This is Text origin X + equ PSPOS_SPOT_Y$ to 34 ; // This is Text origin Y + equ PSPOS_TYPESPECIFIC$ to 35 ; // Type-specific values - Depends on object type + equ PSPOS_GLYPH$ to 36 ; // <0,0,1> <=96 DPI; <0,0,2> <=120 DPI; <0,0,3> <=144 DPI; <0,0,4> >144 DPI + equ PSPOS_GLYPHPROPERTIES$ to 37 ; // <0,0,1> ColorKey; <0,0,2> ImageStyle; <0,0,3> ImageOffset; <0,0,4> ImageOrigin; <0,0,5> Alpha value; <0,0,6> ImageCount; <0,0,7> ImageNumber; <0,0,8> ImageAlign; <0,0,9> ImageFrameNumber; <0,0,10>, NoAutoScale + equ PSPOS_IMAGEPROPERTIES$ to 38 ; // <0,0,1> ColorKey; <0,0,2> ImageStyle; <0,0,3> ImageOffset; <0,0,4> ImageOrigin; <0,0,5> Alpha value; <0,0,6> ImageCount; <0,0,7> ImageNumber; <0,0,8> ImageAlign; <0,0,9> ImageFrameNumber; <0,0,10>, NoAutoScale + equ PSPOS_SIZING$ to 39 ; // <0,0,1> TrackingSize + equ PSPOS_DISPLAY$ to 40 ; // <0,0,1> Alpha Value; <0,0,2> Unused; <0,0,3> Unused; <0,0,4> Create Position; <0,0,5> ShowEffect; <0,0,6> Hide Effect; <0,0,7> MaximizeSize; <0,0,8> MinScaleFactor; <0,0,9> MaxScaleFactor; <0,0,10> ScaleIncrement; + equ PSPOS_DDEMODE$ to 41 + equ PSPOS_DDEITEM$ to 42 + equ PSPOS_DDETOPIC$ to 43 + equ PSPOS_DDESERVER$ to 44 + equ PSPOS_DDETIMETOUT$ to 45 + equ PSPOS_TOOLTIP$ to 46 + + // Generic placeholders - polymorphic for different types + equ PSPOS_TEXT_1$ to 47 ; // Generic property + equ PSPOS_TEXT_2$ to 48 ; // Generic property + equ PSPOS_TEXT_3$ to 49 ; // Generic property + equ PSPOS_TEXT_4$ to 50 ; // Generic property + + equ PSPOS_COLOR_1$ to 51 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ PSPOS_COLOR_2$ to 52 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ PSPOS_COLOR_3$ to 53 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ PSPOS_COLOR_4$ to 54 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + + equ PSPOS_IMGLIST_1$ to 55 ; // <0,0,1> <=96 DPI; <0,0,2> <=120 DPI; <0,0,3> <=144 DPI; <0,0,4> >144 DPI + equ PSPOS_IMGLIST_1_PROPS$ to 56 ; // <0,0,1> ColorKey; <0,0,2> ImageCount; <0,0,3> NoAutoScale + equ PSPOS_IMGLIST_2$ to 57 ; // <0,0,1> <=96 DPI; <0,0,2> <=120 DPI; <0,0,3> <=144 DPI; <0,0,4> >144 DPI + equ PSPOS_IMGLIST_2_PROPS$ to 58 ; // <0,0,1> ColorKey; <0,0,2> ImageCount; <0,0,3> NoAutoScale + equ PSPOS_IMGLIST_3$ to 59 ; // <0,0,1> <=96 DPI; <0,0,2> <=120 DPI; <0,0,3> <=144 DPI; <0,0,4> >144 DPI + equ PSPOS_IMGLIST_3_PROPS$ to 60 ; // <0,0,1> ColorKey; <0,0,2> ImageCount; <0,0,3> NoAutoScale + equ PSPOS_IMGLIST_4$ to 61 ; // <0,0,1> <=96 DPI; <0,0,2> <=120 DPI; <0,0,3> <=144 DPI; <0,0,4> >144 DPI + equ PSPOS_IMGLIST_4_PROPS$ to 62 ; // <0,0,1> ColorKey; <0,0,2> ImageCount; <0,0,3> NoAutoScale + + equ PSPOS_LOGFONT_1$ to 63 ; // Same structure as PSPOS_LOGFONT + equ PSPOS_LOGFONT_2$ to 64 ; // Same structure as PSPOS_LOGFONT + + equ PSPOS_GLYPH1$ to 65 ; // <0,0,1> <=96 DPI; <0,0,2> <=120 DPI; <0,0,3> <=144 DPI; <0,0,4> >144 DPI + equ PSPOS_GLYPH1PROPERTIES$ to 66 ; // <0,0,1> ColorKey; <0,0,2> ImageStyle; <0,0,3> ImageOffset; <0,0,4> ImageOrigin; <0,0,5> Alpha value; <0,0,6> ImageCount; <0,0,7> ImageNumber; <0,0,8> ImageAlign; <0,0,9> ImageFrameNumber; <0,0,10>, NoAutoScale + equ PSPOS_GLYPH2$ to 67 ; // <0,0,1> <=96 DPI; <0,0,2> <=120 DPI; <0,0,3> <=144 DPI; <0,0,4> >144 DPI + equ PSPOS_GLYPH2PROPERTIES$ to 68 ; // <0,0,1> ColorKey; <0,0,2> ImageStyle; <0,0,3> ImageOffset; <0,0,4> ImageOrigin; <0,0,5> Alpha value; <0,0,6> ImageCount; <0,0,7> ImageNumber; <0,0,8> ImageAlign; <0,0,9> ImageFrameNumber; <0,0,10>, NoAutoScale + + equ PSPOS_BORDER$ to 69 ; // <0,0,1> Width; <0,0,2> Color; <0,0,3> Radius; <0,0,4> RndCnrs; <0,0,5> Edges; <0,0,6> BevelWidth; <0,0,7> BevelStyle; <0,0,8> BevelSysColor + equ PSPOS_LAYOUT$ to 70 ; // <0,0,1> Padding + + equ PSPOS_COLOR_5$ to 71 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + equ PSPOS_COLOR_6$ to 72 ; // <0,0,1> ColorFrom; <0,0,2> ColorTo; <0,0,3> GradientStyle + + equ PSPOS_CONTEXTMENU$ to 73 ; // CONTEXTMENU entity ID + equ PSPOS_CURSOR$ to 74 ; // CURSOR property - null, cursor symbol, or .cur file + equ PSPOS_WINMSGLIST$ to 75 ; // @svm'd list of qualified WINMSG messages to listen for <0,0,0,1> MsgNo; <0,0,0,2> Qualifier; <0,0,0,3> EventName; <0,0,0,4> SyncFlag + + // Even more generic placeholders - polymorphic for different types + equ PSPOS_TEXT_5$ to 76 ; // Generic property + equ PSPOS_TEXT_6$ to 77 ; // Generic property + equ PSPOS_TEXT_7$ to 78 ; // Generic property + equ PSPOS_TEXT_8$ to 79 ; // Generic property + equ PSPOS_TEXT_9$ to 80 ; // Generic property + equ PSPOS_TEXT_10$ to 81 ; // Generic property + equ PSPOS_TEXT_11$ to 82 ; // Generic property + equ PSPOS_TEXT_12$ to 83 ; // Generic property + equ PSPOS_TEXT_13$ to 84 ; // Generic property + equ PSPOS_TEXT_14$ to 85 ; // Generic property + equ PSPOS_VIEWPROPERTIES$ to 86 ; // View Based properties <0,0,1> PageSwapRenderMode + equ PSPOS_UDPNAMES$ to 87 ; // @svm'd list of custom property (UDP) names (minus the "@" prefix) + equ PSPOS_UDPVALUES$ to 88 ; // @svm'd list of custom property (UDP) values + equ PSPOS_DROPACCEPTLIST$ to 89 ; // @svm'd list of acceptable drag-drop data format names + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PSPOS_SIZING EQUATES - @svm positions + + equ PS_SIZING_TRACKING$ to 1; // WINDOW controls only + + // TRACKINGSIZE positions - @tm + // + // <0,0,0,1> Min tracking width + // <0,0,0,2> Min tracking height + // <0,0,0,3> Max tracking width + // <0,0,0,4> Max tracking height + + equ PS_TRACKSIZE_MINWIDTH$ to 1 + equ PS_TRACKSIZE_MINHEIGHT$ to 2 + equ PS_TRACKSIZE_MAXWIDTH$ to 3 + equ PS_TRACKSIZE_MAXHEIGHT$ to 4 + + equ PS_TRACKSIZE_VAL_NOTSET$ to -1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // POS_DISPLAY EQUATES - @svm positions + equ POS_DISPLAY_TRANSLUCENCY$ to 1 ; // 0-100 TRANSLUCENCY property + + // PSPOS_DISPLAY EQUATES - @svm positions + + equ PSPOS_DISPLAY_TRANSLUCENCY$ to 1 ; // 0-100 TRANSLUCENCY property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PSPOS_BKCOLOR EQUATES - @svm positions + + equ PS_BKCOLOR_FROM$ to 1 + equ PS_BKCOLOR_TO$ to 2 + equ PS_BKCOLOR_GRADSTYLE$ to 3 ; // None, Vertical, Horizontal + + equ PS_GRADSTYLE_NONE$ to 0 + equ PS_GRADSTYLE_VERT$ to 1 + equ PS_GRADSTYLE_HORZ$ to 2 + equ PS_GRADSTYLE_DFLT$ to 99 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PSPOS_IMAGEPROPERTIES equates - @svm delimited + // PSPOS_GLYPHPROPERTIES equates - @svm delimited + // PSPOS_GLYPH1PROPERTIES equates - @svm delimited + // PSPOS_GLYPH2PROPERTIES equates - @svm delimited + + equ PS_IMGPROP_COLORKEY$ to 1 + equ PS_IMGPROP_STYLE$ to 2 ; // IMAGESTYLE (0-3) + equ PS_IMGPROP_OFFSET$ to 3 ; // xy - @tm delimited + equ PS_IMGPROP_ORIGIN$ to 4 ; // xy - @tm delimited + equ PS_IMGPROP_TRANSLUCENCY$ to 5 ; // TRANSLUCENCY (0-100) + equ PS_IMGPROP_COUNT$ to 6 ; // Number of images + equ PS_IMGPROP_INDEX$ to 7 ; // Image index + equ PS_IMGPROP_ALIGN$ to 8 ; // IMAGEALIGN (0-8) + equ PS_IMGPROP_FRAMEINDEX$ to 9 ; // Image Frame index for GIFs etc + equ PS_IMGPROP_NOAUTOSCALE$ to 10 ; // Inverse AUTOSCALE flag + + // Deprecated terms ... now synonyms + equ PS_IMGPROP_IMAGECOUNT$ to 6 ; // Number of images (synonym) + equ PS_IMGPROP_IMAGENUMBER$ to 7 ; // Image index (synonym) + equ PS_IMGPROP_IMAGEFRAMENUMBER$ to 9 ; // Image Frame index for GIFs etc (synonym) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // IMAGELIST properties equates - @svm delimited + + equ PS_ILPROP_COLORKEY$ to 1 + equ PS_ILPROP_IMAGECOUNT$ to 2 ; // Number of images + equ PS_ILPROP_NOAUTOSCALE$ to 3 ; // Inverse AUTOSCALE property flag + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Internal VSM style bits + + // Flags for non "clipped" styling + equ VSM_IS_CLIP$ to 0x00000000 + equ VSM_IS_TILE$ to 0x00000010 + equ VSM_IS_STRETCH$ to 0x00000020 + equ VSM_IS_SCALED$ to 0x00000040 + + // V and H alignments for "clipped" styling + equ VSM_IS_ALIGN_VTOP$ to 0x00000000 + equ VSM_IS_ALIGN_VCENTER$ to 0x00000100 + equ VSM_IS_ALIGN_VBOTTOM$ to 0x00000200 + equ VSM_IS_ALIGN_HLEFT$ to 0x00000000 + equ VSM_IS_ALIGN_HCENTER$ to 0x00000400 + equ VSM_IS_ALIGN_HRIGHT$ to 0x00000800 + + equ VSM_IS_NON_CLIPPED_MASK$ to 0x000000F0 + equ VSM_IS_ALIGN_MASK$ to 0x00000F00 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // TRANSPARENTCOLOR/COLORKEY property equates + equ PS_TC_TOPLEFT$ to -1 + equ PS_TC_TOPRIGHT$ to -2 + equ PS_TC_BOTTOMLEFT$ to -3 + equ PS_TC_BOTTOMRIGHT$ to -4 + equ PS_TC_NOTSET$ to -5 ; // Opaque or use alpha channel + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // IMAGE STYLE property equates + equ PS_IS_CLIP$ to 0 + equ PS_IS_TILE$ to 1 + equ PS_IS_STRETCH$ to 2 + equ PS_IS_SCALE$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // IMAGE RESIZEMODE property equates + equ PS_IRM_DEFAULT$ to 0 + equ PS_IRM_ENHANCED$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // IMAGE ALIGN property equates + equ PS_IA_TOPLEFT$ to 0 + equ PS_IA_TOPCENTER$ to 1 + equ PS_IA_TOPRIGHT$ to 2 + equ PS_IA_CENTERLEFT$ to 3 + equ PS_IA_CENTERED$ to 4 + equ PS_IA_CENTERRIGHT$ to 5 + equ PS_IA_BOTTOMLEFT$ to 6 + equ PS_IA_BOTTOMCENTER$ to 7 + equ PS_IA_BOTTOMRIGHT$ to 8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PSPOS_BORDER$ equates @svm delimited + equ PS_BORDER_WIDTH$ to 1 + equ PS_BORDER_COLOR$ to 2 + equ PS_BORDER_RADIUS$ to 3 + equ PS_BORDER_RND_CORNERS$ to 4 ; // @tm'd BOOL flags (TL,TR,BR,BL) + equ PS_BORDER_EDGES$ to 5 ; // @tm'd BOOL flags (L,T,R,B) + equ PS_BORDER_BEVEL_WIDTH$ to 6 + equ PS_BORDER_BEVEL_STYLE$ to 7 + equ PS_BORDER_BEVEL_SYSCLR$ to 8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PSPOS_LAYOUT$ equates - @svm delimited + equ PS_LAYOUT_PADDING$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // BEVELSTYLE property equates + equ PS_BVS_NONE$ to 0 + equ PS_BVS_SUNKEN$ to 1 + equ PS_BVS_RAISED$ to 2 + equ PS_BVS_ETCHED$ to 3 + equ PS_BVS_RIDGED$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // EDGESTYLE property equates + equ PS_EGS_NONE$ to 0 + equ PS_EGS_SINGLE$ to 1 ; // WS_EX_STATICEDGE$ + equ PS_EGS_SUNKEN$ to 2 ; // WS_EX_CLIENTEDGE$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // TEXTALIGN property equates - same as IMAGEALIGNMENT actually. + // Note that not all controls support all these flags - e.g. Editline + // controls only support horizontal alignment, while Buttons support + // horizontal and vertical + + equ PS_TA_TOPLEFT$ to 0 ; // "TL" or "L" + equ PS_TA_TOPCENTER$ to 1 ; // "TC" or "C" + equ PS_TA_TOPRIGHT$ to 2 ; // "TR" or "R" + equ PS_TA_CENTERLEFT$ to 3 ; // "CL" + equ PS_TA_CENTERED$ to 4 ; // "CC" + equ PS_TA_CENTERRIGHT$ to 5 ; // "CR" + equ PS_TA_BOTTOMLEFT$ to 6 ; // "BL" + equ PS_TA_BOTTOMCENTER$ to 7 ; // "BC" + equ PS_TA_BOTTOMRIGHT$ to 8 ; // "BR" + + + // Horizontal TEXTALIGN equates - note these map onto the first three + // values of the standard TEXTALIGN property + equ PS_HTA_LEFT$ to 0 ; // "L" + equ PS_HTA_CENTER$ to 1 ; // "C" + equ PS_HTA_RIGHT$ to 2 ; // "R" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SCROLLBARS property equates + equ PS_SB_NONE$ to 0 + equ PS_SB_HORIZONTAL$ to 1 ; // WS_HSCROLL$ + equ PS_SB_VERTICAL$ to 2 ; // WS_VSCROLL$ + equ PS_SB_BOTH$ to 3 ; // ( WS_HSCROLL$ | WS_VSCROLL$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // GETPARENTFORM method equates + equ PS_GPF_DIRECT$ to 0 ; // Return first parent form - includes WS_CHILD forms + equ PS_GPF_NOCHILD$ to 1 ; // Return first non-child form + equ PS_GPF_TOPLEVEL$ to 2 ; // Return root (top-level) form. + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // EDITSTATEFLAGS equates + // + // <1> Can Undo + // <2> Can Redo + // <3> Can Cut + // <4> Can Copy + // <5> Can Paste + // <6> Can SelectAll + + equ PS_ESF_CANUNDO$ to 1 + equ PS_ESF_CANREDO$ to 2 + equ PS_ESF_CANCUT$ to 3 + equ PS_ESF_CANCOPY$ to 4 + equ PS_ESF_CANPASTE$ to 5 + equ PS_ESF_CANSELECTALL$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PAGENUMBER equates + equ PS_PGN_ALLPAGES$ to 0 + equ PS_PGN_REMOVE$ to -1 ; * // Remove from paging entirely + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // BUTTONDOWN/BUTTONUP event + equ MBUTTON_LEFT$ to 0 + equ MBUTTON_RIGHT$ to 1 + equ MBUTTON_CENTER$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // MOUSEMOVE event + equ MMEVENT_ENTER$ to "ENTER" + equ MMEVENT_MOVE$ to "MOVE" + equ MMEVENT_HOVER$ to "HOVER" + equ MMEVENT_LEAVE$ to "LEAVE" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SCALEUINTS property equates + equ PS_SCU_DIPS$ to 0 + equ PS_SCU_PIXELS$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SCALEMETRICS equates + // + // <1> DPI X + // <2> DPI Y + // <3> ScaleFactor + // <4> ScaleUnits + + equ PS_SCM_DPIX$ to 1 + equ PS_SCM_DPIY$ to 2 + equ PS_SCM_SCALEFACTOR$ to 3 + equ PS_SCM_SCALEUNITS$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SETHBITMAP method + // + // Options + + equ PS_SBM_OPT_USEALPHA$ to 0 + equ PS_SBM_OPT_USEPREMULALPHA$ to 1 + equ PS_SBM_OPT_IGNOREALPHA$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_EVENT_TYPEINFO_EQUATES.txt b/SYSPROG/STPROCINS/PS_EVENT_TYPEINFO_EQUATES.txt new file mode 100644 index 0000000..aec214a --- /dev/null +++ b/SYSPROG/STPROCINS/PS_EVENT_TYPEINFO_EQUATES.txt @@ -0,0 +1,159 @@ +compile insert ps_Event_TypeInfo_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : October 2013 + Purpose : Constants for working with PS Event Type Information + + + Comments + ======== + + This should be kept in sync with RevPS_EventTypeInfo.h + + + Amended Date Reason + ======= ==== ====== + Mr C 12 Oct 22 Added PSEF_SUPPRESS_FORCE$ + Mr C 25 Oct 18 Added PSEF_OVERRIDE_FORCE$ + Mr C 26 Jul 16 Added PS_EVPOS_DESCRIPTION$ + Mr C 04 Apr 16 Updated comments + Mr C 20 Jan 15 Added event arg flags + Mr C 29 Sep 15 Added QUALIFIEDEVENTS property equates + Mr C 25 Sep 15 Added PSEF_DEFAULT$ + Mr C 08 Apr 15 Added Event qualifier sync values + Mr C 11 Feb 15 Added Event Flags type info. +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_EVENT_TYPEINFO_EQUATES_ +#define _PS_EVENT_TYPEINFO_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // QUALIFIEDEVENTS property equates + equ PS_QEL_POS_NAME$ to 1 + equ PS_QEL_POS_QUALIFIER$ to 2 + equ PS_QEL_POS_EVENTNAME$ to 3 + equ PS_QEL_POS_SYNCFLAGS$ to 4 + + * // QUALIFYEVENT method equates + equ PS_QEM_POS_ENABLED$ to 1 + equ PS_QEM_POS_QUALIFIER$ to 2 + equ PS_QEM_POS_EVENTNAME$ to 3 + equ PS_QEM_POS_SYNCFLAGS$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Event qualifier sync values + + equ PS_EVSF_ASYNC$ to 0; + equ PS_EVSF_SYNC$ to 1; + equ PS_EVSF_CALLBACK$ to 2; * // Implies PS_EVSF_SYNC$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Event flags + equ PSEF_SYNTHETIC$ to 0x00000001 + equ PSEF_FORCE$ to 0x00000002 + equ PSEF_CUSTOM$ to 0x00000004 + equ PSEF_DEFAULT$ to 0x00000008 + equ PSEF_OVERRIDE_FORCE$ to 0x00000010 + equ PSEF_SUPPRESS_FORCE$ to 0x00000020 + + * // Event Arg Flags + equ PSEAF_DELIMUP$ to 0x00000001 ; * // Convert @fm:@vm:@svm:@tm:@stm to @rm:@fm:@vm:@svm:@tm + equ PSEAF_DELIMDOWN$ to 0x00000020 ; * // Convert @rm:@fm:@vm:@svm:@tm to @fm:@vm:@svm:@tm:@stm + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // REFLECTEVENTS equates - same format is used for the ps_TypeInfo + * // GETEVENTS method. + + equ PS_EVPOS_ID$ to 1 + equ PS_EVPOS_DISPLAYNAME$ to 2 + equ PS_EVPOS_ARGS$ to 3 ; * // @svm'd + equ PS_EVPOS_ARGTYPES$ to 4 ; * // @svm'd + equ PS_EVPOS_ARGFLAGS$ to 5 ; * // @svm'd + equ PS_EVPOS_CATEGORY$ to 6 + equ PS_EVPOS_FLAGS$ to 7 + equ PS_EVPOS_DESCRIPTION$ to 8 + + + * // PS_EVPOS_ARGS, PS_EVPOS_ARGTYPES and PS_EVPOS_ARGFLAGS form an AMV + * // group + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Event categories + + equ PSECTG_ACTION$ to "Action" + equ PSECTG_BEHAVIOR$ to "Behavior" + equ PSECTG_CUSTOM$ to "Custom" + equ PSECTG_DATA$ to "Data" + equ PSECTG_DRAGDROP$ to "Drag & Drop" + equ PSECTG_FOCUS$ to "Focus" + equ PSECTG_KEY$ to "Key" + equ PSECTG_LAYOUT$ to "Layout" + equ PSECTG_MOUSE$ to "Mouse" + equ PSECTG_OLE$ to "OLE" + equ PSECTG_QBF$ to "Query-By-Form" + equ PSECTG_VALIDATION$ to "Validation" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Event Arg types + + equ PSEVAT_UNTYPED$ to 0x00000000 + equ PSEVAT_STRING$ to 0x00000001 + equ PSEVAT_INT$ to 0x00000002 + equ PSEVAT_UINT$ to 0x00000004 + equ PSEVAT_FLOAT$ to 0x00000008 + equ PSEVAT_BOOL$ to 0x00000010 + equ PSEVAT_COLOR$ to 0x00000020 + equ PSEVAT_GRADIENT$ to 0x00000040 + equ PSEVAT_FONT$ to 0x00000080 + equ PSEVAT_FILE$ to 0x00000100 + equ PSEVAT_ENTITY$ to 0x00000200 + equ PSEVAT_OBJECT$ to 0x00000400 + equ PSEVAT_SIZE$ to 0x00000800 + equ PSEVAT_XYPOS$ to 0x00001000 + equ PSEVAT_WH$ to 0x00002000 + equ PSEVAT_DIR$ to 0x00004000 + equ PSEVAT_HEXLIT$ to 0x00008000 + equ PSEVAT_HANDLE$ to 0x00010000 + equ PSEVAT_POINTER$ to 0x00020000 + equ PSEVAT_BINARY$ to 0x00040000 + equ PSEVAT_VOID$ to 0x00080000 + equ PSEVAT_BYTE$ to 0x00100000 + equ PSEVAT_UNUSED2$ to 0x00200000 + equ PSEVAT_UNUSED3$ to 0x00400000 + equ PSEVAT_UNUSED4$ to 0x00800000 + equ PSEVAT_UNUSED5$ to 0x01000000 + equ PSEVAT_UNUSED6$ to 0x02000000 + equ PSEVAT_UNUSED7$ to 0x04000000 + equ PSEVAT_UNUSED8$ to 0x08000000 + equ PSEVAT_UNUSED9$ to 0x10000000 + equ PSEVAT_ARRAY$ to 0x20000000 + equ PSEVAT_VMLIST$ to 0x40000000 + equ PSEVAT_FMLIST$ to 0x80000000 + + // Common combination types + equ PSEVAT_FILELIST$ to bitAnd( PSEVAT_FILE$, PSEVAT_FMLIST$ ) + equ PSEVAT_COLLIST$ to bitAnd( PSEVAT_STRING$, PSEVAT_FMLIST$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_FILEEXPLORER_EQUATES.txt b/SYSPROG/STPROCINS/PS_FILEEXPLORER_EQUATES.txt new file mode 100644 index 0000000..6dc7d71 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_FILEEXPLORER_EQUATES.txt @@ -0,0 +1,117 @@ +compile insert PS_FileExplorer_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : May 2015 + Purpose : Constants for working with PS FILEEXPLORER object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 19 Apr 22 Added FILEFILTER and SHOW...FRAME property equates + Mr C 27 Oct 17 Removed "Auto" ViewMode +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_FILEEXPLORER_EQUATES_ +#define _PS_FILEEXPLORER_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + equ PSS_FILEEXP_ROWSELECT$ to 0x00000008 ; // ROWSELECT property + equ PSS_FILEEXP_HIDESUBFOLDERS$ to 0x00000010 ; // SHOWSUBFOLDERS property (inverse) + equ PSS_FILEEXP_SINGLESEL$ to 0x00000020 ; // MULTISELECT property (inverse) + equ PSS_FILEEXP_SHOWCOLHDRS$ to 0x00000040 ; // SHOWCOLUMNHEADERS property + equ PSS_FILEEXP_SHOWCOLHDRDETONLY$ to 0x00000080 ; // SHOWCOLUMNHEADERS property + equ PSS_FILEEXP_HIDEFILENAMES$ to 0x00000100 ; // SHOWFILENAMES property (inverse) + equ PSS_FILEEXP_LOCKPATH$ to 0x00000200 ; // LOCKPATH property + equ PSS_FILEEXP_SHOWBORDER$ to 0x00000400 ; // BORDER property + equ PSS_FILEEXP_SHOWFRAMES$ to 0x00000800 ; // SHOWFRAMES property + + // PS Extended Style equates + equ PSSX_FILEEXP_SHOWNAVPANE$ to 0x00000001; // SHOWNAVFRAME property + equ PSSX_FILEEXP_HIDENAVPANE$ to 0x00000002; // SHOWNAVFRAME property + equ PSSX_FILEEXP_SHOWPREVIEWPANE$ to 0x00000004; // SHOWPREVIEWFRAME property + equ PSSX_FILEEXP_HIDEPREVIEWPANE$ to 0x00000008; // SHOWPREVIEWFRAME property + equ PSSX_FILEEXP_SHOWDETAILSPANE$ to 0x00000010; // SHOWDETAILSFRAME property + equ PSSX_FILEEXP_HIDEDETAILSPANE$ to 0x00000020; // SHOWDETAILSFRAME property + equ PSSX_FILEEXP_SHOWCOMMANDSPANE$ to 0x00000040; // SHOWCOMMANDS bar property + equ PSSX_FILEEXP_HIDECOMMANDSPANE$ to 0x00000080; // SHOWCOMMANDS bar property + equ PSSX_FILEEXP_SHOWCOMMANDSORG$ to 0x00000100; // SHOWCOMMANDSORGANIZE property + equ PSSX_FILEEXP_HIDECOMMANDSORG$ to 0x00000200; // SHOWCOMMANDSORGANIZE property + equ PSSX_FILEEXP_SHOWCOMMANDSVIEW$ to 0x00000400; // SHOWCOMMANDSVIEW property + equ PSSX_FILEEXP_HIDECOMMANDSVIEW$ to 0x00000800; // SHOWCOMMANDSVIEW property + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + + // SYSREPOSWINS structure overrides + equ POS_FEX_PATH$ to POS_TEXT$ + equ POS_FEX_FILEFILTER$ to POS_TEXT_1$ ; // @svm delimited filter strings + + // PSPOS_TYPESPECIFIC$ position constants ( @svm delimited ) + equ POS_FEX_VIEWMODE$ to 1 ; // VIEWMODE property + + // SYSREPOSWINEXES structure overrides + equ PSPOS_FEX_PATH$ to PSPOS_TEXT$ + equ PSPOS_FEX_FILEFILTER$ to PSPOS_TEXT_1$ ; // @svm delimited filter strings + + // PSPOS_TYPESPECIFIC$ position constants ( @svm delimited ) + equ PSPOS_FEX_VIEWMODE$ to 1 ; // VIEWMODE property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // VIEWMODE property equates + equ FEX_VM_ICON$ to 1 + equ FEX_VM_SMALLICON$ to 2 + equ FEX_VM_LIST$ to 3 + equ FEX_VM_DETAILS$ to 4 + equ FEX_VM_THUMBNAIL$ to 5 + equ FEX_VM_TILE$ to 6 + equ FEX_VM_THUMBSTRIP$ to 7 + equ FEX_VM_CONTENT$ to 8 + + equ FEX_VM_FIRST$ to FEX_VM_ICON$ + equ FEX_VM_LAST$ to FEX_VM_CONTENT$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SHOWCOLUMNHEADERS property equates + equ FEX_CH_NONE$ to 0 + equ FEX_CH_DETAILSONLY$ to 1 ; // PSS_FILEEXP_SHOWCOLHDRDETONLY$ + equ FEX_CH_ALWAYS$ to 2 ; // PSS_FILEEXP_SHOWCOLHDRS$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SHOWDETAILSFRAME, SHOWNAVFRAME, SHOWDETAILSFRAME, SHOWCOMMANDSBAR, + // SHOWCOMMANDSORGANIZE, SHOWCOMMANDSVIEW property equates + + equ FEX_SFR_DEFAULT$ to 0 + equ FEX_SFR_ALWAYSSHOW$ to 1 + equ FEX_SFR_ALWAYSHIDE$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_FILEPREVIEW_EQUATES.txt b/SYSPROG/STPROCINS/PS_FILEPREVIEW_EQUATES.txt new file mode 100644 index 0000000..c5fbd4a --- /dev/null +++ b/SYSPROG/STPROCINS/PS_FILEPREVIEW_EQUATES.txt @@ -0,0 +1,44 @@ +compile insert PS_FilePreview_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : March 2016 + Purpose : Constants for working with PS FILEPREVIEW object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 30 Sep 21 Removed FORMDES support for FILENAME property +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_FILEPREVIEW_EQUATES_ +#define _PS_FILEPREVIEW_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +/* Mr C - 30 Sep 21 - POS_FPV_PATH$ and PSPOS_FPV_PATH$ deprecated with + removal of FormDes FileName property support + + // SYSREPOSWINS structure overrides + equ POS_FPV_PATH$ to POS_VALUE$ ; * // <0,1> FileName, <0,2> FileExtn + + // SYSREPOSWINEXES structure overrides + equ PSPOS_FPV_PATH$ to PSPOS_VALUE$ ; * // <0,1> FileName, <0,2> FileExtn +*/ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_FILESYSTEM_EQUATES.txt b/SYSPROG/STPROCINS/PS_FILESYSTEM_EQUATES.txt new file mode 100644 index 0000000..cd82b03 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_FILESYSTEM_EQUATES.txt @@ -0,0 +1,279 @@ +compile insert PS_FileSystem_Equates +/* + ** Copyright (C) 2013-2017 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with the PS FILESYSTEM object + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 18 Oct 17 Added FILEOPRESULT error codes + Mr C 13 Jun 17 Completed equates for all methods + Mr C 01 Jun 17 Added COPYDIR, FILEOPRESULT equates + Mr C 01 Feb 16 Added CHOOSEDIR equates +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_FILESYSTEM_EQUATES_ +#define _PS_FILESYSTEM_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // GETSPECIALDIR method equates. These are based on the CSIDL value used + // with the SHGetSpecialFolderPath API function. + // + // http://msdn.microsoft.com/en-us/library/windows/desktop/bb762203(v=vs.85).aspx + // http://msdn.microsoft.com/en-us/library/windows/desktop/bb762494(v=vs.85).aspx + + equ PS_GSD_ADMINTOOLS$ to "ADMINTOOLS" + equ PS_GSD_ALTSTARTUP$ to "ALTSTARTUP" + equ PS_GSD_APPDATA$ to "APPDATA" + equ PS_GSD_COMMON_DESKTOPDIRECTORY$ to "COMMON_DESKTOPDIRECTORY" + equ PS_GSD_COMMON_DOCUMENTS$ to "COMMON_DOCUMENTS" + equ PS_GSD_COMMON_FAVORITES$ to "COMMON_FAVORITES" + equ PS_GSD_COMMON_PROGRAMS$ to "COMMON_PROGRAMS" + equ PS_GSD_COMMON_STARTMENU$ to "COMMON_STARTMENU" + equ PS_GSD_COMMON_STARTUP$ to "COMMON_STARTUP" + equ PS_GSD_COMMON_TEMPLATES$ to "COMMON_TEMPLATES" + equ PS_GSD_COOKIES$ to "COOKIES" + equ PS_GSD_DESKTOPDIRECTORY$ to "DESKTOPDIRECTORY" + equ PS_GSD_FAVORITES$ to "FAVORITES" + equ PS_GSD_FONTS$ to "FONTS" + equ PS_GSD_HISTORY$ to "HISTORY" + equ PS_GSD_INTERNET_CACHE$ to "INTERNET_CACHE" + equ PS_GSD_LOCAL_APPDATA$ to "LOCAL_APPDATA" + equ PS_GSD_MYMUSIC$ to "MYMUSIC" + equ PS_GSD_MYPICTURES$ to "MYPICTURES" + equ PS_GSD_NETHOOD$ to "NETHOOD" + equ PS_GSD_PERSONAL$ to "PERSONAL" ; * // "My Documents" + equ PS_GSD_PRINTHOOD$ to "PRINTHOOD" + equ PS_GSD_PROFILE$ to "PROFILE" + equ PS_GSD_PROGRAM_FILES$ to "PROGRAM_FILES" + equ PS_GSD_PROGRAM_FILES_COMMON$ to "PROGRAM_FILES_COMMON" + equ PS_GSD_PROGRAMS$ to "PROGRAMS" + equ PS_GSD_RECENT$ to "RECENT" + equ PS_GSD_SENDTO$ to "SENDTO" + equ PS_GSD_STARTMENU$ to "STARTMENU" + equ PS_GSD_STARTUP$ to "STARTUP" + equ PS_GSD_SYSTEM$ to "SYSTEM" + equ PS_GSD_TEMPLATES$ to "TEMPLATES" + equ PS_GSD_WINDOWS$ to "WINDOWS" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CHOOSEDIR method equates + // + // folder = exec_Method( "FILESYSTEM", "CHOOSEDIR", ownerWindow, params ) + // + // params<1> == Title + // params<2> == InitialDir + // params<3> == Hide New Folder button (1/0) + // params<4> == Show Files (1/0) + + equ PS_CHD_TITLE$ to 1 + equ PS_CHD_INITIALDIR$ to 2 + equ PS_CHD_HIDENEWFOLDER$ to 3 + equ PS_CHD_SHOWFILES$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // COPYDIR method equates + // + // bCopied = exec_Method( "FILESYSTEM", "COPYDIR", dirFrom, dirTo, params ) + // + // params<1> == Allow Undo (1/0) + // params<2> == Allow UI (1/0) + // params<3> == ID of anchor window for UI + // params<4> == Progress Dialog title + // params<5> == Allow confirmations (only is AllowUI is set) (1/0) + + equ PS_CPD_ALLOWUNDO$ to 1 + equ PS_CPD_ALLOWUI$ to 2 + equ PS_CPD_PARENTWINDOW$ to 3 + equ PS_CPD_PROGRESSTITLE$ to 4 + equ PS_CPD_ALLOWCONFIRM$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // COPYFILES method equates + // + // bCopied = exec_Method( "FILESYSTEM", "COPYFILES", filesFrom, filesTo, params ) + // + // params<1> == Allow Undo (1/0) + // params<2> == Allow UI (1/0) + // params<3> == ID of anchor window for UI + // params<4> == Progress Dialog title + // params<5> == Allow confirmations (only is AllowUI is set) (1/0) + + equ PS_CPF_ALLOWUNDO$ to 1 + equ PS_CPF_ALLOWUI$ to 2 + equ PS_CPF_PARENTWINDOW$ to 3 + equ PS_CPF_PROGRESSTITLE$ to 4 + equ PS_CPF_ALLOWCONFIRM$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // DELETEFILES method equates + // + // bDeleted = exec_Method( "FILESYSTEM", "DELETEFILES", fileList, params ) + // + // params<1> == Allow Undo (1/0) + // params<2> == Allow UI (1/0) + // params<3> == ID of anchor window for UI + // params<4> == Progress Dialog title + // params<5> == Allow confirmations (only is AllowUI is set) (1/0) + + equ PS_DLF_ALLOWUNDO$ to 1 + equ PS_DLF_ALLOWUI$ to 2 + equ PS_DLF_PARENTWINDOW$ to 3 + equ PS_DLF_PROGRESSTITLE$ to 4 + equ PS_DLF_ALLOWCONFIRM$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // MOVEDIR method equates + // + // bMoved = exec_Method( "FILESYSTEM", "MOVEDIR", dirFrom, dirTo, params ) + // + // params<1> == Allow Undo (1/0) + // params<2> == Allow UI (1/0) + // params<3> == ID of anchor window for UI + // params<4> == Progress Dialog title + // params<5> == Allow confirmations (only is AllowUI is set) (1/0) + + equ PS_MVD_ALLOWUNDO$ to 1 + equ PS_MVD_ALLOWUI$ to 2 + equ PS_MVD_PARENTWINDOW$ to 3 + equ PS_MVD_PROGRESSTITLE$ to 4 + equ PS_MVD_ALLOWCONFIRM$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // MOVEFILES method equates + // + // bMoved = exec_Method( "FILESYSTEM", "MOVEFILES", filesFrom, filesTo, params ) + // + // params<1> == Allow Undo (1/0) + // params<2> == Allow UI (1/0) + // params<3> == ID of anchor window for UI + // params<4> == Progress Dialog title + // params<5> == Allow confirmations (only is AllowUI is set) (1/0) + + equ PS_MVF_ALLOWUNDO$ to 1 + equ PS_MVF_ALLOWUI$ to 2 + equ PS_MVF_PARENTWINDOW$ to 3 + equ PS_MVF_PROGRESSTITLE$ to 4 + equ PS_MVF_ALLOWCONFIRM$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // REMOVEDIR method equates + // + // bRemoved = exec_Method( "FILESYSTEM", "REMOVEDIR", dirName, params ) + // + // params<1> == Allow Undo (1/0) + // params<2> == Allow UI (1/0) + // params<3> == ID of anchor window for UI + // params<4> == Progress Dialog title + // params<5> == Allow confirmations (only is AllowUI is set) (1/0) + + equ PS_RMD_ALLOWUNDO$ to 1 + equ PS_RMD_ALLOWUI$ to 2 + equ PS_RMD_PARENTWINDOW$ to 3 + equ PS_RMD_PROGRESSTITLE$ to 4 + equ PS_RMD_ALLOWCONFIRM$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // RENAMEDIR method equates + // + // bRenamed = exec_Method( "FILESYSTEM", "RENAMEDIR", dirOldName, dirNewName, params ) + // + // params<1> == Allow Undo (1/0) + // params<2> == Allow UI (1/0) + // params<3> == ID of anchor window for UI + // params<4> == Progress Dialog title + // params<5> == Allow confirmations (only is AllowUI is set) (1/0) + + equ PS_RND_ALLOWUNDO$ to 1 + equ PS_RND_ALLOWUI$ to 2 + equ PS_RND_PARENTWINDOW$ to 3 + equ PS_RND_PROGRESSTITLE$ to 4 + equ PS_RND_ALLOWCONFIRM$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // RENAMEFILE method equates + // + // bRenamed = exec_Method( "FILESYSTEM", "RENAMEFILE", fileOldName, fileNewName, params ) + // + // params<1> == Allow Undo (1/0) + // params<2> == Allow UI (1/0) + // params<3> == ID of anchor window for UI + // params<4> == Progress Dialog title + // params<5> == Allow confirmations (only is AllowUI is set) (1/0) + + equ PS_RNF_ALLOWUNDO$ to 1 + equ PS_RNF_ALLOWUI$ to 2 + equ PS_RNF_PARENTWINDOW$ to 3 + equ PS_RNF_PROGRESSTITLE$ to 4 + equ PS_RNF_ALLOWCONFIRM$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // FILEOPRESULT property equates + // + // <1> ErrorCode + // <2> ErrorText + + equ PS_FOR_ERRORCODE$ to 1 + equ PS_FOR_ERRORTEXT$ to 2 + + // FILEOPRESULT error codes + equ DE_SAMEFILE$ to 0x71; // The source and destination files are the same file. + equ DE_MANYSRC1DEST$ to 0x72; // Multiple file paths were specified in the source buffer, but only one destination file path. + equ DE_DIFFDIR$ to 0x73; // Rename operation was specified but the destination path is a different directory. Use the move operation instead. + equ DE_ROOTDIR$ to 0x74; // The source is a root directory, which cannot be moved or renamed. + equ DE_OPCANCELLED$ to 0x75; // The operation was canceled by the user, or silently canceled if the appropriate flags were supplied. + equ DE_DESTSUBTREE$ to 0x76; // The destination is a subtree of the source. + equ DE_ACCESSDENIEDSRC$ to 0x78; // Security settings denied access to the source. + equ DE_PATHTOODEEP$ to 0x79; // The source or destination path exceeded or would exceed MAX_PATH. + equ DE_MANYDEST$ to 0x7A; // The operation involved multiple destination paths, which can fail in the case of a move operation. + equ DE_INVALIDFILES$ to 0x7C; // The path in the source or destination or both was invalid. + equ DE_DESTSAMETREE$ to 0x7D; // The source and destination have the same parent folder. + equ DE_FLDDESTISFILE$ to 0x7E; // The destination path is an existing file. + equ DE_FILEDESTISFLD$ to 0x80; // The destination path is an existing folder. + equ DE_FILENAMETOOLONG$ to 0x81; // The name of the file exceeds MAX_PATH. + equ DE_DEST_IS_CDROM$ to 0x82; // The destination is a read-only CD-ROM, possibly unformatted. + equ DE_DEST_IS_DVD$ to 0x83; // The destination is a read-only DVD, possibly unformatted. + equ DE_DEST_IS_CDRECORD$ to 0x84; // The destination is a writable CD-ROM, possibly unformatted. + equ DE_FILE_TOO_LARGE$ to 0x85; // The file involved in the operation is too large for the destination media or file system. + equ DE_SRC_IS_CDROM$ to 0x86; // The source is a read-only CD-ROM, possibly unformatted. + equ DE_SRC_IS_DVD$ to 0x87; // The source is a read-only DVD, possibly unformatted. + equ DE_SRC_IS_CDRECORD$ to 0x88; // The source is a writable CD-ROM, possibly unformatted. + equ DE_ERROR_MAX$ to 0xB7; // MAX_PATH was exceeded during the operation. + equ DE_UNKNOWN_ERROR$ to 0x402; // An unknown error occurred. This is typically due to an invalid path in the source or destination. + equ DE_ERRORONDEST$ to 0x10000; // strError = _T( "An unspecified error occurred on the destination. + equ DE_ROOTDIR_ERRORDEST$ to 0x10074; // Destination is a root directory and cannot be renamed. + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_FONT_EQUATES.txt b/SYSPROG/STPROCINS/PS_FONT_EQUATES.txt new file mode 100644 index 0000000..f9e7f9e --- /dev/null +++ b/SYSPROG/STPROCINS/PS_FONT_EQUATES.txt @@ -0,0 +1,57 @@ +compile insert ps_Font_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : June 2013 + Purpose : Constants for working with PS FONT structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 31 May 16 Removed ND comments +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_FONT_EQUATES_ +#define _PS_FONT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // OI FONT property structure position equates + equ PS_FONT_POS_FACENAME$ to 1 + equ PS_FONT_POS_HEIGHT$ to 2 + equ PS_FONT_POS_WEIGHT$ to 3 + equ PS_FONT_POS_ITALIC$ to 4 + equ PS_FONT_POS_UNDERLINE$ to 5 + equ PS_FONT_POS_WIDTH$ to 6 + equ PS_FONT_POS_CHARSET$ to 7 + equ PS_FONT_POS_PITCHANDFAMILY$ to 8 + equ PS_FONT_POS_STRIKEOUT$ to 9 + equ PS_FONT_POS_OUTPRECISION$ to 10 + equ PS_FONT_POS_CLIPPRECISION$ to 11 + equ PS_FONT_POS_QUALITY$ to 12 + + * // Define common attribute fields + equ PS_FONT_POS_COMMON_ATTRIB$ to PS_FONT_POS_QUALITY$ + + * // Get_Property positions + equ PS_FONT_POS_ASCENT$ to 13 + equ PS_FONT_POS_INTERNALLEADING$ to 14 + equ PS_FONT_POS_EXTERNALLEADING$ to 15 + equ PS_FONT_POS_MAXCHARWIDTH$ to 16 + + * // Set_Property positions + equ PS_FONT_POS_CLR_RED$ to 13 + equ PS_FONT_POS_CLR_GREEN$ to 14 + equ PS_FONT_POS_CLR_BLUE$ to 15 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_GROUPBOX_EQUATES.txt b/SYSPROG/STPROCINS/PS_GROUPBOX_EQUATES.txt new file mode 100644 index 0000000..2af3826 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_GROUPBOX_EQUATES.txt @@ -0,0 +1,50 @@ +compile insert PS_GroupBox_Equates +/* + ** Copyright (C) 2013-2015 Revelation Software Inc. All Rights Reserved ** + + Author : Carl Of Cthulhu + Date : Dec 2015 + Purpose : Constants for working with PS GROUPBOX and GROUPBOX object + structures + + + Comments + ======== + + Groupboxes are basically STATIC controls that are simply painted to look + like group boxes. + + There are two types: + + GROUPBOX - This is the standard v9 GroupBox that acts as a sibling + parent and can only be created on a VIEW-based host (i.e + the PANEL or WINDOW) + + GROUPBOXEX - This is a GroupBox the behaves like a normal control and + expects to have a proper parent->child relationship with + it's grouped controls. + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_GROUPBOX_EQUATES_ +#define _PS_GROUPBOX_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Static_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // PS Style equates + equ PSS_GROUPBOX_NOAFFECTSIBLINGS$ to 0x00000100 ; * // AUTODISABLECONTROLS property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_HTTPCLIENT_EQUATES.txt b/SYSPROG/STPROCINS/PS_HTTPCLIENT_EQUATES.txt new file mode 100644 index 0000000..13d4501 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_HTTPCLIENT_EQUATES.txt @@ -0,0 +1,134 @@ +compile insert ps_HTTPClient_Equates +/* + ** Copyright (C) 2012-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : June 2019 + Purpose : Constants for working with PS HTTPCLIENT object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_HTTPCLIENT_EQUATES_ +#define _PS_HTTPCLIENT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_WinInet_Equates + + // HTTPClients are basically derived STATIC controls so most STATIC + // constants apply here as well + $insert ps_Static_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS ExStyle Equates + equ PSSX_HCL_ASYNCMODE$ to 0x00000001 ; // ASYNCMODE property + equ PSSX_HCL_WORKOFFLINE$ to 0x00000002 ; // WORKOFFLINE property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + equ POS_HCL_VERB$ to POS_TEXT_1$ ; // VERB property + equ POS_HCL_URL$ to POS_TEXT_2$ ; // URL property + equ POS_HCL_PORT$ to POS_TEXT_3$ ; // PORT property + equ POS_HCL_USERAGENT$ to POS_TEXT_4$ ; // USERAGENT property + equ POS_HCL_CREDENTIALS$ to POS_TEXT_5$ ; // USERNAME/PASSWORD property <0,0,1> and <0,0,2> + equ POS_HCL_REFERRER$ to POS_TEXT_6$ ; // REFERRER property + equ POS_HCL_CONNINFO$ to POS_TEXT_7$ ; // ACCESSTYPE/REQUESTOPTIONS/TIMEOUT + equ POS_HCL_ACCEPTTYPES$ to POS_TEXT_8$ ; // ACCEPTTYPES property + equ POS_HCL_REQHEADERS$ to POS_TEXT_9$ ; // REQUESTHEADERS property + equ POS_HCL_PROXYNAMES$ to POS_TEXT_10$ ; // PROXYNAMES property + equ POS_HCL_PROXYBYPASSNAMES$ to POS_TEXT_11$ ; // PROXYBYPASSNAMES property + equ POS_HCL_RESPONSEFILE$ to POS_TEXT_12$ ; // RESPONSEFILE property + + // SYSREPOSWINEXES structure overrides + equ PSPOS_HCL_VERB$ to PSPOS_TEXT_1$ ; // VERB property + equ PSPOS_HCL_URL$ to PSPOS_TEXT_2$ ; // URL property + equ PSPOS_HCL_PORT$ to PSPOS_TEXT_3$ ; // PORT property + equ PSPOS_HCL_USERAGENT$ to PSPOS_TEXT_4$ ; // USERAGENT property + equ PSPOS_HCL_CREDENTIALS$ to PSPOS_TEXT_5$ ; // USERNAME/PASSWORD property <0,0,1> and <0,0,2> + equ PSPOS_HCL_REFERRER$ to PSPOS_TEXT_6$ ; // REFERRER property + equ PSPOS_HCL_CONNINFO$ to PSPOS_TEXT_7$ ; // ACCESSTYPE/REQUESTOPTIONS/TIMEOUT + equ PSPOS_HCL_ACCEPTTYPES$ to PSPOS_TEXT_8$ ; // ACCEPTTYPES property + equ PSPOS_HCL_REQHEADERS$ to PSPOS_TEXT_9$ ; // REQUESTHEADERS property + equ PSPOS_HCL_PROXYNAMES$ to PSPOS_TEXT_10$ ; // PROXYNAMES property + equ PSPOS_HCL_PROXYBYPASSNAMES$ to PSPOS_TEXT_11$ ; // PROXYBYPASSNAMES property + equ PSPOS_HCL_RESPONSEFILE$ to PSPOS_TEXT_12$ ; // RESPONSEFILE property + + //////////////////////////////////////////////////////////////////////////// + + // ConnInfo field (POS_HCL_CONNINFO$, PSPOS_HCL_CONNINFO$) + // + // <0,0,1> AccessType + // <0,0,2> RequestOptions + // <0,0,3> Timeout + equ PS_HCL_CI_POS_ACCESSTYPE$ to 1 + equ PS_HCL_CI_POS_REQUESTOPTIONS$ to 2 + equ PS_HCL_CI_POS_TIMEOUT$ to 3 + + //////////////////////////////////////////////////////////////////////////// + + // Credentials field (POS_HCL_CREDENTIALS$, PSPOS_HCL_CREDENTIALS$) + equ PS_HCL_CD_POS_USERNAME$ to 1 + equ PS_HCL_CD_POS_PASSWORD$ to 2 + equ PS_HCL_CD_POS_PROXYUSERNAME$ to 3 + equ PS_HCL_CD_POS_PROXYPASSWORD$ to 4 + +/////////////////////////////////////////////////////////////////////////////// + + // READYSTATE property + equ PS_HCL_RS_UNSENT$ to 0 + equ PS_HCL_RS_OPENED$ to 1 + equ PS_HCL_RS_HEADERS_RECEIVED$ to 2 + equ PS_HCL_RS_LOADING$ to 3 + equ PS_HCL_RS_DONE$ to 4 + +/////////////////////////////////////////////////////////////////////////////// + + // RESPONSESTATUS property + equ PS_HCL_RSPSTAT_POS_CODE$ to 1 + equ PS_HCL_RSPSTAT_POS_TEXT$ to 2 + equ PS_HCL_RSPSTAT_POS_CNTLEN$ to 3 + +/////////////////////////////////////////////////////////////////////////////// + + // TIMEOUT property + equ PS_HCL_DFLT_TIMEOUT$ to ( 3 * 60 * 1000 ) ; // 180 seconds or 3 mins... + equ PS_HCL_MIN_TIMEOUT$ to 0 ; // to infinity and beyond! + equ PS_HCL_MAX_TIMEOUT$ to ( 60 * 60 * 1000 ) ; // 1 hour + +/////////////////////////////////////////////////////////////////////////////// + + // VERB property + equ PS_HCL_DFLT_VERB$ to "GET" + equ PS_HCL_VERBS$ to "GET" : @fm : | + "HEAD" : @fm : | + "POST" : @fm : | + "PUT" : @fm : | + "DELETE" : @fm : | + "CONNECT" : @fm : | + "OPTIONS" : @fm : | + "TRACE" : @fm :| + "PATCH" + +/////////////////////////////////////////////////////////////////////////////// + + equ PS_HSL_HTTP_STATUS_TIMEOUT$ to 408 ; // This is "real" + equ PS_HSL_HTTP_STATUS_USERABORT$ to 477 ; // We made this up + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_HTTPSERVER_EQUATES.txt b/SYSPROG/STPROCINS/PS_HTTPSERVER_EQUATES.txt new file mode 100644 index 0000000..f716dad --- /dev/null +++ b/SYSPROG/STPROCINS/PS_HTTPSERVER_EQUATES.txt @@ -0,0 +1,213 @@ +compile insert ps_HTTPServer_Equates +/* + ** Copyright (C) 2012-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : January 2020 + Purpose : Constants for working with PS HTTPSERVER objects + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 19 May 23 Corrected STARTUPMODE equates + Mr C 31 Aug 22 Added "preserve-case" styles + Mr C 26 Aug 22 Added STARTUPMODE support +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_HTTPSERVER_EQUATES_ +#define _PS_HTTPSERVER_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // HTTPSERVER's are basically derived STATIC controls so most STATIC + // constants apply here as well + $insert ps_Static_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style Equates + equ PSS_HSV_MANUALSTART$ to 0x00000001 ; // STARTUPMODE property + equ PSS_HSV_PRESERVECOOKIECASE$ to 0x00000002 ; // PRESERVECOOKIENAMECASE property + equ PSS_HSV_PRESERVEHEADERCASE$ to 0x00000008 ; // PRESERVEHEADERNAMECASE property + equ PSS_HSV_PRESERVEQUERYCASE$ to 0x00000010 ; // PRESERVEQUERYNAMECASE property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + equ POS_HSV_PORT$ to POS_TEXT_1$ ; // PORT property + equ POS_HSV_CONNINFO$ to POS_TEXT_2$ ; // TIMEOUT/IPVERSION/MAXCONN + equ POS_HSV_IPWHITELIST$ to POS_TEXT_3$ ; // IPWHITELIST property + + // SYSREPOSWINEXES structure overrides + equ PSPOS_HSV_PORT$ to PSPOS_TEXT_1$ ; // PORT property + equ PSPOS_HSV_CONNINFO$ to PSPOS_TEXT_2$ ; // TIMEOUT/IPVERSION/MAXCONN + equ PSPOS_HSV_IPWHITELIST$ to PSPOS_TEXT_3$ ; // IPWHITELIST property + + //////////////////////////////////////////////////////////////////////////// + + // ConnInfo field (POS_HCL_CONNINFO$, PSPOS_HCL_CONNINFO$) + // + // <0,0,1> ConnectionTimeout + // <0,0,2> IpVersion + // <0,0,3> MaxConnections + equ PS_HSV_CI_POS_TIMEOUT$ to 1 + equ PS_HSV_CI_POS_IPVERSION$ to 2 + equ PS_HSV_CI_POS_MAXCONN$ to 3 + +/////////////////////////////////////////////////////////////////////////////// + + // CONNECTIONTIMEOUT property (in seconds) + equ PS_HSV_DFLT_TIMEOUT$ to 0 ; // Infinity (but not beyond) + equ PS_HSV_MIN_TIMEOUT$ to 0 ; // Infinity + equ PS_HSV_MAX_TIMEOUT$ to ( 60 * 60 ) ; // 1 hour + +/////////////////////////////////////////////////////////////////////////////// + + // IPVERSION property + equ PS_HSV_IPVERSION_IP4$ to 0 + equ PS_HSV_IPVERSION_IP6$ to 1 + equ PS_HSV_IPVERSION_DUALSTACK$ to 2 + + equ PS_HSV_DFLT_IPVERSION$ to PS_HSV_IPVERSION_IP4$ + +/////////////////////////////////////////////////////////////////////////////// + + // MAXCONNECTIONS property + equ PS_HSV_DFLT_MAXCONN$ to 60; // (FD_SETSIZE - 4); ==> 60 + equ PS_HSV_MIN_MAXCONN$ to 1 ; // Don't do this :) + equ PS_HSV_MAX_MAXCONN$ to PS_HSV_DFLT_MAXCONN$ + +/////////////////////////////////////////////////////////////////////////////// + + // STARTUPMODE property + equ HSV_STARTMODE_AUTO$ to 0 + equ HSV_STARTMODE_MANUAL$ to 1 + +/////////////////////////////////////////////////////////////////////////////// + + // HTTPREQUEST event (requestID, requestHeaders) + // + // requestID : ID of the request that triggered the event. This ID + // : must be used with the methods that set response + // : content. + // : + // requestHeaders : @fm'd list of request header information. This is + // : loosely based on the same struct as for an OECGI + // : request (see INET_EQUATES), but with a few + // : differences + // + // ------------------------------------------------------------------------- + // requestHeaders array structure: + // + // <1> QueryString - Not used (see QueryNames and QueryValues) + // <2> PathInfo - Path info from URL (See below) + // <3> ContentType - "Content-Type" header + // <4> ContentLength - "Content-Length" header + // <5> GatewayInterface - CGI version + // <6> HTTPS - "on" if called through a secure port + // <7> HTTPAccept - "Accept" Header + // <8> HTTPCookie - "Cookie" Header + // <9> HTTPFrom - "From" Header + // <10> HTTPReferrer - "Referer" Header + // <11> HTTPUserAgent - "User-Agent" Header + // <12> PathTranslated - Resolved "OS path" of the request + // <13> RemoteAddr - Client IP Address (decimal-dot) + // <14> RemoteHost - Client IP Address (decimal-dot) + // <15> RemoteIdent - Not used (we don't do a lookup) + // <16> RemoteUser - Client Username + // <17> RequestMethod - Request Method (GET,POST etc) + // <18> ScriptName - Script portion of URL (See Below) + // <19> ServerName - Fully Qualified domain name (e.g. www.cgi101.com) - "Host" header + // <20> ServerPort - TCPIP Port server is listening on + // <21> ServerProtocol - HTTP version + // <22> ServerSoftware - Server software string + // <23> ServerURL - URL + // <24> - Reserved for INET_EQUATES compatibility + // <25> - Reserved for INET_EQUATES compatibility + // <26> - Reserved for INET_EQUATES compatibility + // <27> - Reserved for INET_EQUATES compatibility + // <28> - Reserved for INET_EQUATES compatibility + // <29> - Reserved for INET_EQUATES compatibility + // <30> - Reserved for INET_EQUATES compatibility + // <31> - Reserved for INET_EQUATES compatibility + // <32> - Reserved for INET_EQUATES compatibility + // <33> - Reserved for INET_EQUATES compatibility + // <34> - Reserved for INET_EQUATES compatibility + // <35> HeaderNames - @vm delimited list of all Header names + // <36> HeaderValues - @vm delimited list of all Header values + // <37> QueryNames - @vm delimited list of all Query names + // <38> QueryValues - @vm delimited list of all Query values + // <39> CookieNames - @vm delimited list of all Cookie names + // <40> CookieValues - @vm delimited list of all Cookie values + // + // Parsing the URL: + // + // http://www.TSite.com/art/gallery.cgi/mammals?animal=dog&color=black + // + // HOST : www.TSite.com (+ port if it's there) + // SCRIPT_NAME : /art/gallery.cgi + // PATH_INFO : /mammals + // PATH_TRANSLATED : \art\gallery.cgi + // QUERY : animal=dog&color=black + // + // http://domain.tld/mydir/some_cgi_script.pl + // + // HOST : domain.tld + // SCRIPT_NAME : /mydir/some_cgi_script.pl + // PATH_INFO : /mydir/some_cgi_script.pl + // PATH_TRANSLATED : \mydir\some_cgi_script.pl + // QUERY : "" + // + // The problem we have with this is that a "normal" web-server can + // identify the script from the URL because it knows how to map ".pl", + // ".exe" and ".dll" files etc, so it can work out where the path + // info starts. We can't really do that - so we assume that the path + // info is the last part of the URL, and the script name is everything + // before that. + + equ PS_HSVR_REQHDR_UNUSED$ to 1 + equ PS_HSVR_REQHDR_PATHINFO$ to 2 + equ PS_HSVR_REQHDR_CONTENTTYPE$ to 3 + equ PS_HSVR_REQHDR_CONTENTLEN$ to 4 + equ PS_HSVR_REQHDR_GATEWAYINTERFACE$ to 5 + equ PS_HSVR_REQHDR_HTTPS$ to 6 + equ PS_HSVR_REQHDR_HTTPACCEPT$ to 7 + equ PS_HSVR_REQHDR_HTTPCOOKIE$ to 8 + equ PS_HSVR_REQHDR_HTTPFROM$ to 9 + equ PS_HSVR_REQHDR_HTTPREFERRER$ to 10 + equ PS_HSVR_REQHDR_HTTPUSERAGENT$ to 11 + equ PS_HSVR_REQHDR_PATHTRANSLATED$ to 12 + equ PS_HSVR_REQHDR_REMOTEADDR$ to 13 + equ PS_HSVR_REQHDR_REMOTEHOST$ to 14 + equ PS_HSVR_REQHDR_REMOTEIDENT$ to 15 + equ PS_HSVR_REQHDR_REMOTEUSER$ to 16 + equ PS_HSVR_REQHDR_REQUESTMETHOD$ to 17 + equ PS_HSVR_REQHDR_SCRIPTNAME$ to 18 + equ PS_HSVR_REQHDR_SERVERNAME$ to 19 + equ PS_HSVR_REQHDR_SERVERPORT$ to 20 + equ PS_HSVR_REQHDR_SERVERPROTOCOL$ to 21 + equ PS_HSVR_REQHDR_SERVERSOFTWARE$ to 22 + equ PS_HSVR_REQHDR_SERVERURL$ to 23 + + // Fields 24-34 reserved for INET_EQUATES compatibility + + equ PS_HSVR_REQHDR_HEADERNAMES$ to 35 ; // Headers AMV + equ PS_HSVR_REQHDR_HEADERVALUES$ to 36 ; // Headers AMV + equ PS_HSVR_REQHDR_QUERYNAMES$ to 37 ; // Query AMV + equ PS_HSVR_REQHDR_QUERYVALUES$ to 38 ; // Query AMV + equ PS_HSVR_REQHDR_COOKIENAMES$ to 39 ; // Cookies AMV + equ PS_HSVR_REQHDR_COOKIEVALUES$ to 40 ; // Cookies AMV + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_HYPERLINK_EQUATES.txt b/SYSPROG/STPROCINS/PS_HYPERLINK_EQUATES.txt new file mode 100644 index 0000000..326704c --- /dev/null +++ b/SYSPROG/STPROCINS/PS_HYPERLINK_EQUATES.txt @@ -0,0 +1,58 @@ +compile insert PS_HyperLink_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : June 2013 + Purpose : Constants for working with PS HYPERLINK object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 12 Feb 15 Added LINKCURSOR equates +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_HYPERLINK_EQUATES_ +#define _PS_HYPERLINK_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Hyperlinks are basically derived STATIC controls so most STATIC constants + // apply here as well + $insert ps_Static_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // PS Style equates + equ PSS_HYPERLINK_SHOWVISITED$ to 0x00020000 ; * // SHOWVISITED property + equ PSS_HYPERLINK_NOAUTOUNDERLINE$ to 0x00040000 ; * // AUTOUNDERLINE property (inverse) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + * // SYSREPOSWINS structure overrides + + equ POS_HPL_LINK$ to POS_TEXT_1$ ; * // LINK property + equ POS_HPL_LINKCURSOR$ to POS_TEXT_2$ ; * // LINKCURSOR property (Repos ID) + equ POS_HPL_VISITEDFORECOLOR$ to POS_COLOR_3$ ; * // VISITEDFORECOLOR property - <0,0,1> only + + * // SYSREPOSWINEXES structure overrides + + equ PSPOS_HPL_LINK$ to PSPOS_TEXT_1$ ; * // LINK property + equ PSPOS_HPL_LINKCURSOR$ to PSPOS_TEXT_2$ ; * // LINKCURSOR property + equ PSPOS_HPL_VISITEDFORECOLOR$ to PSPOS_COLOR_3$ ; * // VISITEDFORECOLOR property - <0,0,1> only + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_LISTBOX_EQUATES.txt b/SYSPROG/STPROCINS/PS_LISTBOX_EQUATES.txt new file mode 100644 index 0000000..b76e5c0 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_LISTBOX_EQUATES.txt @@ -0,0 +1,205 @@ +compile insert PS_ListBox_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS LISTBOX object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 05 May 20 Added PSS_LST_NOTIFYLASTITEM$ + Added PSS_LST_ACCEPTLEFTRIGHT$ + Mr C 12 Dec 16 Added PSSX_LST_ROWSTRIPE$ + Added HeaderStyles structure indexes + Mr C 29 Sep 16 Added PSS_LST_ACCEPTRETURN$ constant + Mr C 07 Sep 16 Added PSSX_LST_MAKEDRAGLIST constant + Added RowStripe Item Styles + Mr C 10 Jun 16 Added ShowItemToolTips constants + Mr C 04 Feb 16 Added PSPOS_LST_INITSTOREAGESIZE$ and PSPOS_LST_EDITKEY$ + Mr C 21 Nov 16 Added EMPTYTEXT constants + Mr C 15 Sep 15 Added EditOptions + Mr C 14 Sep 15 Added more PS Styles + Mr C 13 Jul 15 Tided up names, added SELECTIONSTYLE + Mr C 12 Feb 15 Added PSPOS_LST_ROWHEIGHT$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_LISTBOX_EQUATES_ +#define _PS_LISTBOX_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_ListBox_Equates + $insert oiWin_Equates + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // LBS_EXTENDEDSEL -> EXTENDEDSELECT property + // LBS_MULTICOLUMN -> MULTICOLUMN property + // LBS_MULTIPLESEL -> MULTIROWSELECT property + // LBS_SORT -> SORTED property + // LBS_DISABLENOSCROLL -> SHOWVSCROLL property + // LBS_USETABSTOPS -> USETABSTOPS property + // LBS_OWNERDRAWVARIABLE -> VARIABLEROWHIGHT property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + equ PSS_LST_HOTRACKITEMS$ to 0x00000001; // HOTTRACK property + equ PSS_LST_CHECKBOXES$ to 0x00000002; // CHECKBOXES property + equ PSS_LST_TRANSBMP$ to 0x00000008; // deprecated - backwards compat only + equ PSS_LST_NOSELBMP$ to 0x00000080; // HIGHLIGHTTEXTONLY property + equ PSS_LST_HIERARCHY$ to 0x00000100; // v9 == TREELISTBOX only + equ PSS_LST_OVERLAPTABS$ to 0x00000400; // OVERLAPPINGTABS property + equ PSS_LST_ACCEPTRETURN$ to 0x00020000; // ACCEPTRETURN property + equ PSS_LST_ALLOWEDIT$ to 0x00040000; // READONLY property (inverse) + equ PSS_LST_NOTIFYLASTITEM$ to 0x00080000; // NOTIFYLASTITEM property + equ PSS_LST_ENABLEDROPEXPAND$ to 0x00400000; + equ PSS_LST_ENTERASDBLCLK$ to 0x01000000; // ENTERASDBLCLK property + equ PSS_LST_ACCEPTLEFTRIGHT$ to 0x00200000; // ACCEPTLEFTRIGHT property + equ PSS_LST_VCENTER$ to 0x08000000; // Deprecated - always on in v10 + + // Extended PS Style equates + equ PSSX_LST_SHOWITEMTOOLTIPS$ to 0x00000010; // SHOWITEMTOOLTIPS property + equ PSSX_LST_INPLACEITEMTOOLTIPS$ to 0x00000020; // SHOWITEMTOOLTIPS property + equ PSSX_LST_SHOWVALUESFORTOOLTIPS$ to 0x00000040; // SHOWVALUESASTIPS property + equ PSSX_LST_ROWSTRIPE$ to 0x00000100; // ROWSTRIPE property + equ PSSX_LST_LISTBOXSELECTIONSTYLE$ to 0x00000400; // SELECTIONSTYLE property + equ PSSX_LST_TREEVIEWSELECTIONSTYLE$ to 0x00000800; // SELECTIONSTYLE property + equ PSSX_LST_MAKEDRAGLIST$ to 0x00001000; // ALLOWDRAGREORDER property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + equ POS_LST_LIST$ to POS_LIST$ ; * @svm delimited + equ POS_LST_VALUES$ to POS_VALUE$ ; * @svm delimited (AMV with PSPOS_LST_LIST$) + equ POS_LST_TEXT$ to POS_TEXT$ + equ POS_LST_IMAGELIST$ to POS_IMGLIST_1$ + equ POS_LST_IMAGELIST_PROPS$ to POS_IMGLIST_1_PROPS$ + equ POS_LST_HORZEXTENT$ to POS_NUMCOLS$ + equ POS_LST_TABSTOPS$ to POS_COLWIDE$ + equ POS_LST_COLWIDTH$ to POS_COLWIDE$ ; * <0,0,1> only for multi-col + ; * overrides tab stops... + equ POS_LST_ITEMSSTYLES$ to POS_TEXT_1$ ; * @svm/@tm delimited -Normal,Hot,Disabled,Selected,HotSelected,SelNoFocus + equ POS_LST_CHECK$ to POS_TEXT_2$ ; * @svm delimited (AMV with PSPOS_LST_LIST$) + equ POS_LST_ROWHEIGHT$ to POS_TEXT_3$ + equ POS_LST_EDITOPTIONS$ to POS_TEXT_4$ ; * @svm delimited - TextCase,ValidChars,MaxLimit + equ POS_LST_INITSTOREAGESIZE$ to POS_TEXT_5$ + equ POS_LST_EDITKEY$ to POS_TEXT_6$ + equ POS_LST_HEADERSTYLES$ to POS_TEXT_7$ ; * @svm/@tm delimited -Normal,Hot,Disabled + equ POS_LST_ROWSTRIPEITEMSTYLES$ to POS_TEXT_13$ ; * @svm/@tm delimited - Odd,Even + equ POS_LST_EMPTYTEXT$ to POS_TEXT_14$ + + // SYSREPOSWINEXES structure overrides + equ PSPOS_LST_LIST$ to PSPOS_LIST$ ; * @svm delimited + equ PSPOS_LST_VALUES$ to PSPOS_VALUE$ ; * @svm delimited (AMV with PSPOS_LST_LIST$) + equ PSPOS_LST_TEXT$ to PSPOS_TEXT$ + equ PSPOS_LST_IMAGELIST$ to PSPOS_IMGLIST_1$ + equ PSPOS_LST_IMAGELIST_PROPS$ to PSPOS_IMGLIST_1_PROPS$ + equ PSPOS_LST_HORZEXTENT$ to PSPOS_NUMCOLS$ + equ PSPOS_LST_TABSTOPS$ to PSPOS_COLWIDE$ + equ PSPOS_LST_COLWIDTH$ to PSPOS_COLWIDE$ ; * <0,0,1> only for multi-col + ; * overrides tab stops... + equ PSPOS_LST_ITEMSSTYLES$ to PSPOS_TEXT_1$ ; * @svm/@tm delimited -Normal,Hot,Disabled,Selected,HotSelected,SelNoFocus + equ PSPOS_LST_CHECK$ to PSPOS_TEXT_2$ ; * @svm delimited (AMV with PSPOS_LST_LIST$) + equ PSPOS_LST_ROWHEIGHT$ to PSPOS_TEXT_3$ + equ PSPOS_LST_EDITOPTIONS$ to PSPOS_TEXT_4$ ; * @svm delimited - TextCase,ValidChars,MaxLimit + equ PSPOS_LST_INITSTOREAGESIZE$ to PSPOS_TEXT_5$ + equ PSPOS_LST_EDITKEY$ to PSPOS_TEXT_6$ + equ PSPOS_LST_HEADERSTYLES$ to PSPOS_TEXT_7$ ; * @svm/@tm delimited -Normal,Hot,Disabled + equ PSPOS_LST_ROWSTRIPEITEMSTYLES$ to PSPOS_TEXT_13$ ; * @svm/@tm delimited - Odd,Even + equ PSPOS_LST_EMPTYTEXT$ to PSPOS_TEXT_14$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SELECTIONSTYLE equates - determines if the non-header items in the + // listbox are painted in the classic Listbox style (solid fill), or in + // TreeView style (lighter color with border). + // + // Note that with some renderers (Classic and XP) the ListBox and TreeView + // items are painted in the same style so the SELECTIONSTYLE has no effect. + + equ LBRS_AUTO$ to 0; // Use the renderer default + equ LBRS_LISTBOX$ to 1; // Render as normal ListBox items + equ LBRS_TREEVIEW$ to 2; // Render as per Treeview items + // (if supported by the renderer) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // EDITOPTIONS equates - an @fm delimited array of options to apply to the + // editor when editing items. + // + // <1> TextCase (see EditLine TEXTCASE property) + // <2> ValidChars (see EditLine VALIDCHARS property) + // <3> Max Limit (see EditLine LIMIT property) + + equ LBEO_POS_TEXTCASE$ to 1 + equ LBEO_POS_VALIDCHARS$ to 2 + equ LBEO_POS_MAXLIMIT$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SHOWITEMTOOLTIPS equates + // + // 0 - Disabled + // 1 - Offset (tooltip is shown offset to the cursor) + // 2 - Inplace (tooltip is shown over the item) + + equ LBITT_DISABLED$ to 0 + equ LBITT_OFFSET$ to 1 + equ LBITT_INPLACE$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // ITEM State equates - used with ITEMIMAGE/STYLE methods + equ LBIS_NORMAL$ to 1 + equ LBIS_HOT$ to 2 + equ LBIS_DISABLED$ to 3 + equ LBIS_SELECTED$ to 4 + equ LBIS_HOTSELECTED$ to 5 + equ LBIS_SELNOFOCUS$ to 6 + + // ITEMSTYLE structure - used with ITEMSTYLE method + // + // <1> ForeColor + // <2> BackColor From + // <3> BackColor To + // <4> BorderColor + // <5> Bold + // <6> Italic + // <7> Underline + // <8> Translucency (0-100) + + equ LBIS_POS_FORECOLOR$ to 1 ; // COLORREF + equ LBIS_POS_BACKCOLOR_FROM$ to 2 ; // COLORREF + equ LBIS_POS_BACKCOLOR_TO$ to 3 ; // COLORREF + equ LBIS_POS_BORDERCOLOR$ to 4 ; // COLORREF + equ LBIS_POS_BOLD$ to 5 ; // Boolean + equ LBIS_POS_ITALIC$ to 6 ; // Boolean + equ LBIS_POS_UNDERLINE$ to 7 ; // Boolean + equ LBIS_POS_TRANSLUCENCY$ to 8 ; // UInt (0-100) + + // Note that the NORMAL item style position in the PS structure is NOT + // used. + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_MENU_EQUATES.txt b/SYSPROG/STPROCINS/PS_MENU_EQUATES.txt new file mode 100644 index 0000000..9436fd9 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_MENU_EQUATES.txt @@ -0,0 +1,85 @@ +compile insert ps_Menu_Equates +/* + ** Copyright (C) 2020 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : Sept 2020 + Purpose : Constants for working with PS MENU object structures + + + Comments + ======== + + Menu position equates can be found in OIWIN_EQUATES - we'll keep them + there for backwards compatibility with existing code - this insert serves + to document the PS MENU structure. + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_MENU_EQUATES_ +#define _PS_MENU_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert oiwin_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Menus are structured as follows: + // + // <0,1> Menu Name + // <0,2> Menu class - context menus set this to "FLOATING", otherwise null. + // <0,3> Menu Type - always "MENU" + // <0,4> Parent Object + // + // After which each _value_ represents an @svm delimited item structure: + // + // <0,0,1> Type "P"opup, "S"eparator, "I"tem + // <0,0,2> End (T/F) + // <0,0,3> ID + // <0,0,4> Text + // <0,0,5> Grey (T/F) + // <0,0,6> Check (T/F) + // <0,0,7> Hidden (T/F) + // <0,0,8> Accelerator + // <0,0,9> HelpText + // <0,0,10> EventHandler <-- Currently unused. + // <0,0,11> Style + // <0,0,12> ImageName <-- @tm delimited DPI list + // <0,0,13> ImageColorKey + // <0,0,14> ImageListNumber + // <0,0,15> ImageAutoScale (T/F) + // <0,0,16> ImageFrameIndex + // <0,0,17> ImageOffset <- @tm'd (x,y) + // <0,0,18> ImageOrigin <- @tm'd (x,y) + // <0,0,19> ImageTranslucency (0-100) + // <0,0,20> Misc + // + // Still, we need to expand this somewhat - we need to add space to specify + // an ImageList file for a start, or series of them, so we need a way to + // identify a v10 expanded structure. + // + // Well, if the first char of an item is an "@" then we assume that we're + // still processing the header and _not_ the items. This allows us to specify + // an ImageList DPI list for a start like so: + // + // <0,1> Menu Name + // <0,2> Menu class - context menus set this to "FLOATING" + // <0,3> Menu Type - always "MENU" + // <0,4> Parent Object + // <0,5> @.\bmps\stdmenu_96dpi.png<@svm>.\bmps\stdmenu_120dpi.png<@svm> ...etc .. + // <0,6> @<@svm>ImageCount> + // + // ... and then have each value after this contain an item. + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif _PS_MENU_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_METHOD_TYPEINFO_EQUATES.txt b/SYSPROG/STPROCINS/PS_METHOD_TYPEINFO_EQUATES.txt new file mode 100644 index 0000000..b8cc0d1 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_METHOD_TYPEINFO_EQUATES.txt @@ -0,0 +1,94 @@ +compile insert ps_Method_TypeInfo_Equates +/* + ** Copyright (C) 2013-2016 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : 23 Jun 2016 - EU referendum day + Purpose : Constants for working with PS Method Type Information + + + Comments + ======== + + This should be kept in sync with RevPS_MethodTypeInfo.h + + + Amended Date Reason + ======= ==== ====== + Mr C 09 Jun 20 Added PS_METHODPOS_RETNAME$ + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_METHOD_TYPEINFO_EQUATES_ +#define _PS_METHOD_TYPEINFO_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Raw PS REFLECTMETHOD equates + equ PS_METHODPOS_ID$ to 1 + equ PS_METHODPOS_DISPLAYNAME$ to 2 + equ PS_METHODPOS_ARGNAMES$ to 3 ; // @svm delimited - AMV_1 + equ PS_METHODPOS_ARGTYPES$ to 4 ; // @svm delimited - AMV_1 + equ PS_METHODPOS_ARGFLAGS$ to 5 ; // @svm delimited - AMV_1 + equ PS_METHODPOS_RETNAME$ to 6 + equ PS_METHODPOS_RETTYPE$ to 7 + equ PS_METHODPOS_RETFLAGS$ to 8 + equ PS_METHODPOS_DESCRIPTION$ to 9 + + equ PS_METHODPOS_FIRST$ to PS_METHODPOS_ID$ + equ PS_METHODPOS_LAST$ to PS_METHODPOS_DESCRIPTION$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Method argument types (these are hints - they aren't really used) + + equ PSMTHDAT_UNTYPED$ to 0x00000000; + equ PSMTHDAT_STRING$ to 0x00000001; + equ PSMTHDAT_INT$ to 0x00000002; + equ PSMTHDAT_UINT$ to 0x00000004; + equ PSMTHDAT_FLOAT$ to 0x00000008; + equ PSMTHDAT_BOOL$ to 0x00000010; + equ PSMTHDAT_COLOR$ to 0x00000020; + equ PSMTHDAT_GRADIENT$ to 0x00000040; + equ PSMTHDAT_FONT$ to 0x00000080; + equ PSMTHDAT_FILE$ to 0x00000100; + equ PSMTHDAT_ENTITY$ to 0x00000200; + equ PSMTHDAT_OBJECT$ to 0x00000400; // PS Object ID + equ PSMTHDAT_SIZE$ to 0x00000800; + equ PSMTHDAT_XYPOS$ to 0x00001000; + equ PSMTHDAT_WH$ to 0x00002000; // Width & Height + equ PSMTHDAT_DIR$ to 0x00004000; + equ PSMTHDAT_HEXLIT$ to 0x00008000; // "0x" string + equ PSMTHDAT_HANDLE$ to 0x00010000; + equ PSMTHDAT_POINTER$ to 0x00020000; + equ PSMTHDAT_BINARY$ to 0x00040000; + equ PSMTHDAT_VOID$ to 0x00080000; + equ PSMTHDAT_TIME$ to 0x00100000; + equ PSMTHDAT_DATE$ to 0x00200000; + equ PSMTHDAT_UNUSED3$ to 0x00400000; + equ PSMTHDAT_UNUSED4$ to 0x00800000; + equ PSMTHDAT_UNUSED5$ to 0x01000000; + equ PSMTHDAT_UNUSED6$ to 0x02000000; + equ PSMTHDAT_UNUSED7$ to 0x04000000; + equ PSMTHDAT_UNUSED8$ to 0x08000000; + equ PSMTHDAT_LIST$ to 0x10000000; // EditTable style LIST + equ PSMTHDAT_ARRAY$ to 0x20000000; // EditTable style ARRAY + equ PSMTHDAT_VMLIST$ to 0x40000000; + equ PSMTHDAT_FMLIST$ to 0x80000000; + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Method argument flags + equ PSMTHDAF_OPTIONAL$ to 0x00000001; + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/PS_MONITOR_EQUATES.txt b/SYSPROG/STPROCINS/PS_MONITOR_EQUATES.txt new file mode 100644 index 0000000..e918513 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_MONITOR_EQUATES.txt @@ -0,0 +1,48 @@ +compile insert ps_Monitor_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : Sept 2014 + Purpose : Constants for working with PS MONITOR structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 06 Dec 16 Added DPI constants + Mr C 20 Oct 15 Added msWin_Monitor_Equates + mtr 12 Dec 14 Git sucks +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_MONITOR_EQUATES_ +#define _PS_MONITOR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_Monitor_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ PS_MON_POS_HANDLE$ to 1 + equ PS_MON_POS_SCREENRECT$ to 2 + equ PS_MON_POS_WORKAREARECT$ to 3 + equ PS_MON_POS_FLAGS$ to 4 + equ PS_MON_POS_NAME$ to 5 + equ PS_MON_POS_DPIX$ to 6 + equ PS_MON_POS_DPIY$ to 7 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_NEW_EQUATES.txt b/SYSPROG/STPROCINS/PS_NEW_EQUATES.txt new file mode 100644 index 0000000..4b2c519 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_NEW_EQUATES.txt @@ -0,0 +1,308 @@ +compile insert PS_NEW_EQUATES +// bzs 052208 Equates For new style (And style_ex) bits + +// NEW_STYLE_NAME_x: name of new style +// NEW_STYLE_APPLIESTO_x: name(s) of control(s) this style is applicable To +// NEW_STYLE_CODE_x: bitcode +// NEW_STYLE_TYPE_x: uses STYLE (0) Or STYLE_EX (1) + +Equ NEW_STYLE_NAME_1 To "USEBGCOLOR" +Equ NEW_STYLE_APPLIESTO_1 To PSCTL_WINDOW$ +Equ NEW_STYLE_CODE_1 To 0x8000 +Equ NEW_STYLE_TYPE_1 To 0 + +Equ NEW_STYLE_NAME_2 To "MULTIINSTANCE" +Equ NEW_STYLE_APPLIESTO_2 To PSCTL_WINDOW$ +Equ NEW_STYLE_CODE_2 To 0x4000 +Equ NEW_STYLE_TYPE_2 To 0 + +Equ NEW_STYLE_NAME_3 To "AUTOSCROLL" +Equ NEW_STYLE_APPLIESTO_3 To PSCTL_WINDOW$ +Equ NEW_STYLE_CODE_3 To 0x2000 +Equ NEW_STYLE_TYPE_3 To 0 + +Equ NEW_STYLE_NAME_4 To "DIALOGBOX" +Equ NEW_STYLE_APPLIESTO_4 To PSCTL_WINDOW$ +Equ NEW_STYLE_CODE_4 To 0x1000 +Equ NEW_STYLE_TYPE_4 To 0 + +Equ NEW_STYLE_NAME_5 To "IGNOREACCELCHAR" +Equ NEW_STYLE_APPLIESTO_5 To PSCTL_WINDOW$ +Equ NEW_STYLE_CODE_5 To 0x0800 +Equ NEW_STYLE_TYPE_5 To 0 + +Equ NEW_STYLE_NAME_6 To "INDEPENDENT" +Equ NEW_STYLE_APPLIESTO_6 To PSCTL_WINDOW$ +Equ NEW_STYLE_CODE_6 To 0x0400 +Equ NEW_STYLE_TYPE_6 To 0 + +Equ NEW_STYLE_NAME_7 To "ICONAUTOARRANGE" +Equ NEW_STYLE_APPLIESTO_7 To PSCTL_WINDOW$ +Equ NEW_STYLE_CODE_7 To 0x0200 +Equ NEW_STYLE_TYPE_7 To 0 + +Equ NEW_STYLE_NAME_8 To "HASMENU" +Equ NEW_STYLE_APPLIESTO_8 To PSCTL_WINDOW$ +Equ NEW_STYLE_CODE_8 To 0x0100 +Equ NEW_STYLE_TYPE_8 To 0 + +Equ NEW_STYLE_NAME_9 To "NOHELPTEXT" +Equ NEW_STYLE_APPLIESTO_9 To PSCTL_WINDOW$ +Equ NEW_STYLE_CODE_9 To 0x0080 +Equ NEW_STYLE_TYPE_9 To 0 + +Equ NEW_STYLE_NAME_10 To "TABONSCREEN" +Equ NEW_STYLE_APPLIESTO_10 To PSCTL_WINDOW$ +Equ NEW_STYLE_CODE_10 To 0x0040 +Equ NEW_STYLE_TYPE_10 To 0 + +Equ NEW_STYLE_NAME_11 To "TILEBMP" +Equ NEW_STYLE_APPLIESTO_11 To PSCTL_WINDOW$ ;* NEED PANEL +Equ NEW_STYLE_CODE_11 To 0x0020 +Equ NEW_STYLE_TYPE_11 To 0 + +Equ NEW_STYLE_NAME_12 To "BUTTONBAR" +Equ NEW_STYLE_APPLIESTO_12 To PSCTL_WINDOW$ +Equ NEW_STYLE_CODE_12 To 0x0010 +Equ NEW_STYLE_TYPE_12 To 0 + +Equ NEW_STYLE_NAME_13 To "TRANSBMP" +Equ NEW_STYLE_APPLIESTO_13 To PSCTL_WINDOW$:",":PSCTL_PUSHBUTTON$:",":PSCTL_CHECKBOX$:",":PSCTL_BITMAP$ ;* NEED PANEL +Equ NEW_STYLE_CODE_13 To 0x0008 +Equ NEW_STYLE_TYPE_13 To 0 + +Equ NEW_STYLE_NAME_14 To "CENTERBMP" +Equ NEW_STYLE_APPLIESTO_14 To PSCTL_WINDOW$ ;* NEED PANEL +Equ NEW_STYLE_CODE_14 To 0x0001 +Equ NEW_STYLE_TYPE_14 To 0 + +Equ NEW_STYLE_NAME_15 To "AUTOSIZEH" +Equ NEW_STYLE_APPLIESTO_15 To PSCTL_STATIC$:",":PSCTL_PUSHBUTTON$:",":PSCTL_CHECKBOX$:",":PSCTL_RADIOBUTTON$:",":PSCTL_GROUPBOX$:",":PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_COMBOBOX$:",":PSCTL_EDITTABLE$:",":PSCTL_BITMAP$:",":PSCTL_HSCROLLBAR$:",":PSCTL_VSCROLLBAR$:",":PSCTL_HSPLITBAR$:",":PSCTL_VSPLITBAR$:",":PSCTL_TABCONTROL$ ;* NEED PANEL AND OLE +Equ NEW_STYLE_CODE_15 To 0x8000 +Equ NEW_STYLE_TYPE_15 To 0 + +Equ NEW_STYLE_NAME_16 To "AUTOSIZEW" +Equ NEW_STYLE_APPLIESTO_16 To PSCTL_STATIC$:",":PSCTL_PUSHBUTTON$:",":PSCTL_CHECKBOX$:",":PSCTL_RADIOBUTTON$:",":PSCTL_GROUPBOX$:",":PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_COMBOBOX$:",":PSCTL_EDITTABLE$:",":PSCTL_BITMAP$:",":PSCTL_HSCROLLBAR$:",":PSCTL_VSCROLLBAR$:",":PSCTL_HSPLITBAR$:",":PSCTL_VSPLITBAR$:",":PSCTL_TABCONTROL$ ;* NEED PANEL AND OLE +Equ NEW_STYLE_CODE_16 To 0x4000 +Equ NEW_STYLE_TYPE_16 To 0 + +Equ NEW_STYLE_NAME_17 To "AUTOSIZEY" +Equ NEW_STYLE_APPLIESTO_17 To PSCTL_STATIC$:",":PSCTL_PUSHBUTTON$:",":PSCTL_CHECKBOX$:",":PSCTL_RADIOBUTTON$:",":PSCTL_GROUPBOX$:",":PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_COMBOBOX$:",":PSCTL_EDITTABLE$:",":PSCTL_BITMAP$:",":PSCTL_HSCROLLBAR$:",":PSCTL_VSCROLLBAR$:",":PSCTL_HSPLITBAR$:",":PSCTL_VSPLITBAR$:",":PSCTL_TABCONTROL$ ;* NEED PANEL AND OLE +Equ NEW_STYLE_CODE_17 To 0x2000 +Equ NEW_STYLE_TYPE_17 To 0 + +Equ NEW_STYLE_NAME_18 To "AUTOSIZEX" +Equ NEW_STYLE_APPLIESTO_18 To PSCTL_STATIC$:",":PSCTL_PUSHBUTTON$:",":PSCTL_CHECKBOX$:",":PSCTL_RADIOBUTTON$:",":PSCTL_GROUPBOX$:",":PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_COMBOBOX$:",":PSCTL_EDITTABLE$:",":PSCTL_BITMAP$:",":PSCTL_HSCROLLBAR$:",":PSCTL_VSCROLLBAR$:",":PSCTL_HSPLITBAR$:",":PSCTL_VSPLITBAR$:",":PSCTL_TABCONTROL$ ;* NEED PANEL AND OLE +Equ NEW_STYLE_CODE_18 To 0x1000 +Equ NEW_STYLE_TYPE_18 To 0 + +Equ NEW_STYLE_NAME_19 To "INITFOCUS" +Equ NEW_STYLE_APPLIESTO_19 To PSCTL_PUSHBUTTON$:",":PSCTL_CHECKBOX$:",":PSCTL_RADIOBUTTON$:",":PSCTL_GROUPBOX$:",":PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_COMBOBOX$:",":PSCTL_EDITTABLE$:",":PSCTL_HSCROLLBAR$:",":PSCTL_VSCROLLBAR$:",":PSCTL_HSPLITBAR$:",":PSCTL_VSPLITBAR$:",":PSCTL_TABCONTROL$ ;* NEED PANEL AND OLE +Equ NEW_STYLE_CODE_19 To 0x0004 +Equ NEW_STYLE_TYPE_19 To 0 + +Equ NEW_STYLE_NAME_20 To "CANCELBTN" +Equ NEW_STYLE_APPLIESTO_20 To PSCTL_PUSHBUTTON$ +Equ NEW_STYLE_CODE_20 To 0x0002 +Equ NEW_STYLE_TYPE_20 To 0 + +Equ NEW_STYLE_NAME_21 To "DEFAULTBTN" +Equ NEW_STYLE_APPLIESTO_21 To PSCTL_PUSHBUTTON$ +Equ NEW_STYLE_CODE_21 To 0x0001 +Equ NEW_STYLE_TYPE_21 To 0 + +Equ NEW_STYLE_NAME_22 To "NOAFFECTSIBLINES" +Equ NEW_STYLE_APPLIESTO_22 To PSCTL_GROUPBOX$ +Equ NEW_STYLE_CODE_22 To 0x0100 +Equ NEW_STYLE_TYPE_22 To 0 + +Equ NEW_STYLE_NAME_23 To "SOFTDISABLE" +Equ NEW_STYLE_APPLIESTO_23 To PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$ +Equ NEW_STYLE_CODE_23 To 0x0040 +Equ NEW_STYLE_TYPE_23 To 0 + +Equ NEW_STYLE_NAME_24 To "TABOUTEXCEED" +Equ NEW_STYLE_APPLIESTO_24 To PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$ +Equ NEW_STYLE_CODE_24 To 0x0020 +Equ NEW_STYLE_TYPE_24 To 0 + +Equ NEW_STYLE_NAME_25 To "NOECHO" +Equ NEW_STYLE_APPLIESTO_25 To PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_EDITTABLE$ +Equ NEW_STYLE_CODE_25 To 0x0010 +Equ NEW_STYLE_TYPE_25 To 0 + +Equ NEW_STYLE_NAME_26 To "AUTOINDENT" +Equ NEW_STYLE_APPLIESTO_26 To PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$ +Equ NEW_STYLE_CODE_26 To 0x0200 +Equ NEW_STYLE_TYPE_26 To 0 + +Equ NEW_STYLE_NAME_27 To "DISPLAYPOS" +Equ NEW_STYLE_APPLIESTO_27 To PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$ +Equ NEW_STYLE_CODE_27 To 0x0100 +Equ NEW_STYLE_TYPE_27 To 0 + +Equ NEW_STYLE_NAME_28 To "OVERLAPTABS" +Equ NEW_STYLE_APPLIESTO_28 To PSCTL_LISTBOX$ +Equ NEW_STYLE_CODE_28 To 0x0400 +Equ NEW_STYLE_TYPE_28 To 0 + +Equ NEW_STYLE_NAME_29 To "SOLIDBMP" +Equ NEW_STYLE_APPLIESTO_29 To PSCTL_LISTBOX$:",":PSCTL_BITMAP$ +Equ NEW_STYLE_CODE_29 To 0x0200 +Equ NEW_STYLE_TYPE_29 To 0 + +Equ NEW_STYLE_NAME_30 To "HIERARCHICAL" +Equ NEW_STYLE_APPLIESTO_30 To PSCTL_LISTBOX$ +Equ NEW_STYLE_CODE_30 To 0x0100 +Equ NEW_STYLE_TYPE_30 To 0 + +Equ NEW_STYLE_NAME_31 To "NOSELBMP" +Equ NEW_STYLE_APPLIESTO_31 To PSCTL_LISTBOX$ +Equ NEW_STYLE_CODE_31 To 0x0080 +Equ NEW_STYLE_TYPE_31 To 0 + +Equ NEW_STYLE_NAME_32 To "DRAWTEXT" +Equ NEW_STYLE_APPLIESTO_32 To PSCTL_BITMAP$ +Equ NEW_STYLE_CODE_32 To 0x0400 +Equ NEW_STYLE_TYPE_32 To 0 + +Equ NEW_STYLE_NAME_33 To "CLIPONLY" +Equ NEW_STYLE_APPLIESTO_33 To PSCTL_BITMAP$ +Equ NEW_STYLE_CODE_33 To 0x0100 +Equ NEW_STYLE_TYPE_33 To 0 + +Equ NEW_STYLE_NAME_34 To "DRAWAUTOTABBMP" +Equ NEW_STYLE_APPLIESTO_34 To PSCTL_BITMAP$ +Equ NEW_STYLE_CODE_34 To 0x0080 +Equ NEW_STYLE_TYPE_34 To 0 + +Equ NEW_STYLE_NAME_35 To "IGNOREACCELTRANSLATION" +Equ NEW_STYLE_APPLIESTO_35 To "" ;* NEED OLE +Equ NEW_STYLE_CODE_35 To 0x0800 +Equ NEW_STYLE_TYPE_35 To 0 + +Equ NEW_STYLE_NAME_36 To "NOTIFYALL" +Equ NEW_STYLE_APPLIESTO_36 To PSCTL_HSCROLLBAR$:',':PSCTL_VSCROLLBAR$ +Equ NEW_STYLE_CODE_36 To 0x0100 +Equ NEW_STYLE_TYPE_36 To 0 + +Equ NEW_STYLE_NAME_37 To "FIXEDPOS" +Equ NEW_STYLE_APPLIESTO_37 To PSCTL_HSPLITBAR$:',':PSCTL_VSPLITBAR$ +Equ NEW_STYLE_CODE_37 To 0x0800 +Equ NEW_STYLE_TYPE_37 To 0 + +Equ NEW_STYLE_NAME_38 To "GHOSTBAR" +Equ NEW_STYLE_APPLIESTO_38 To PSCTL_HSPLITBAR$:',':PSCTL_VSPLITBAR$ +Equ NEW_STYLE_CODE_38 To 0x0020 +Equ NEW_STYLE_TYPE_38 To 0 + +Equ NEW_STYLE_NAME_39 To "MANUALMOVE" +Equ NEW_STYLE_APPLIESTO_39 To PSCTL_HSPLITBAR$:',':PSCTL_VSPLITBAR$ +Equ NEW_STYLE_CODE_39 To 0x0010 +Equ NEW_STYLE_TYPE_39 To 0 + +Equ NEW_STYLE_NAMES_NORMAL To NEW_STYLE_NAME_1:" ":NEW_STYLE_NAME_2:" ":NEW_STYLE_NAME_3:" ":NEW_STYLE_NAME_4:" ":NEW_STYLE_NAME_5:" ":NEW_STYLE_NAME_6:" ":NEW_STYLE_NAME_7:" ":NEW_STYLE_NAME_8:" ":NEW_STYLE_NAME_9:" ":NEW_STYLE_NAME_10:" ":NEW_STYLE_NAME_11:" ":NEW_STYLE_NAME_12:" ":NEW_STYLE_NAME_13:" ":NEW_STYLE_NAME_14:" ":NEW_STYLE_NAME_15:" ":NEW_STYLE_NAME_16:" ":NEW_STYLE_NAME_17:" ":NEW_STYLE_NAME_18:" ":NEW_STYLE_NAME_19:" ":NEW_STYLE_NAME_20:" ":NEW_STYLE_NAME_21:" ":NEW_STYLE_NAME_22:" ":NEW_STYLE_NAME_23:" ":NEW_STYLE_NAME_24:" ":NEW_STYLE_NAME_25:" ":NEW_STYLE_NAME_26:" ":NEW_STYLE_NAME_27:" ":NEW_STYLE_NAME_28:" ":NEW_STYLE_NAME_29:" ":NEW_STYLE_NAME_30:" ":NEW_STYLE_NAME_31:" ":NEW_STYLE_NAME_32:" ":NEW_STYLE_NAME_33:" ":NEW_STYLE_NAME_34:" ":NEW_STYLE_NAME_35:" ":NEW_STYLE_NAME_36:" ":NEW_STYLE_NAME_37:" ":NEW_STYLE_NAME_38:" ":NEW_STYLE_NAME_39 +Equ NEW_STYLE_APPLIESTO_NORMAL To NEW_STYLE_APPLIESTO_1:" ":NEW_STYLE_APPLIESTO_2:" ":NEW_STYLE_APPLIESTO_3:" ":NEW_STYLE_APPLIESTO_4:" ":NEW_STYLE_APPLIESTO_5:" ":NEW_STYLE_APPLIESTO_6:" ":NEW_STYLE_APPLIESTO_7:" ":NEW_STYLE_APPLIESTO_8:" ":NEW_STYLE_APPLIESTO_9:" ":NEW_STYLE_APPLIESTO_10:" ":NEW_STYLE_APPLIESTO_11:" ":NEW_STYLE_APPLIESTO_12:" ":NEW_STYLE_APPLIESTO_13:" ":NEW_STYLE_APPLIESTO_14:" ":NEW_STYLE_APPLIESTO_15:" ":NEW_STYLE_APPLIESTO_16:" ":NEW_STYLE_APPLIESTO_17:" ":NEW_STYLE_APPLIESTO_18:" ":NEW_STYLE_APPLIESTO_19:" ":NEW_STYLE_APPLIESTO_20:" ":NEW_STYLE_APPLIESTO_21:" ":NEW_STYLE_APPLIESTO_22:" ":NEW_STYLE_APPLIESTO_23:" ":NEW_STYLE_APPLIESTO_24:" ":NEW_STYLE_APPLIESTO_25:" ":NEW_STYLE_APPLIESTO_26:" ":NEW_STYLE_APPLIESTO_27:" ":NEW_STYLE_APPLIESTO_28:" ":NEW_STYLE_APPLIESTO_29:" ":NEW_STYLE_APPLIESTO_30:" ":NEW_STYLE_APPLIESTO_31:" ":NEW_STYLE_APPLIESTO_32:" ":NEW_STYLE_APPLIESTO_33:" ":NEW_STYLE_APPLIESTO_34:" ":NEW_STYLE_APPLIESTO_35:" ":NEW_STYLE_APPLIESTO_36:" ":NEW_STYLE_APPLIESTO_37:" ":NEW_STYLE_APPLIESTO_38:" ":NEW_STYLE_APPLIESTO_39 +Equ NEW_STYLE_CODES_NORMAL To NEW_STYLE_CODE_1:" ":NEW_STYLE_CODE_2:" ":NEW_STYLE_CODE_3:" ":NEW_STYLE_CODE_4:" ":NEW_STYLE_CODE_5:" ":NEW_STYLE_CODE_6:" ":NEW_STYLE_CODE_7:" ":NEW_STYLE_CODE_8:" ":NEW_STYLE_CODE_9:" ":NEW_STYLE_CODE_10:" ":NEW_STYLE_CODE_11:" ":NEW_STYLE_CODE_12:" ":NEW_STYLE_CODE_13:" ":NEW_STYLE_CODE_14:" ":NEW_STYLE_CODE_15:" ":NEW_STYLE_CODE_16:" ":NEW_STYLE_CODE_17:" ":NEW_STYLE_CODE_18:" ":NEW_STYLE_CODE_19:" ":NEW_STYLE_CODE_20:" ":NEW_STYLE_CODE_21:" ":NEW_STYLE_CODE_22:" ":NEW_STYLE_CODE_23:" ":NEW_STYLE_CODE_24:" ":NEW_STYLE_CODE_25:" ":NEW_STYLE_CODE_26:" ":NEW_STYLE_CODE_27:" ":NEW_STYLE_CODE_28:" ":NEW_STYLE_CODE_29:" ":NEW_STYLE_CODE_30:" ":NEW_STYLE_CODE_31:" ":NEW_STYLE_CODE_32:" ":NEW_STYLE_CODE_33:" ":NEW_STYLE_CODE_34:" ":NEW_STYLE_CODE_35:" ":NEW_STYLE_CODE_36:" ":NEW_STYLE_CODE_37:" ":NEW_STYLE_CODE_38:" ":NEW_STYLE_CODE_39 +Equ NEW_STYLE_TYPES_NORMAL To NEW_STYLE_TYPE_1:" ":NEW_STYLE_TYPE_2:" ":NEW_STYLE_TYPE_3:" ":NEW_STYLE_TYPE_4:" ":NEW_STYLE_TYPE_5:" ":NEW_STYLE_TYPE_6:" ":NEW_STYLE_TYPE_7:" ":NEW_STYLE_TYPE_8:" ":NEW_STYLE_TYPE_9:" ":NEW_STYLE_TYPE_10:" ":NEW_STYLE_TYPE_11:" ":NEW_STYLE_TYPE_12:" ":NEW_STYLE_TYPE_13:" ":NEW_STYLE_TYPE_14:" ":NEW_STYLE_TYPE_15:" ":NEW_STYLE_TYPE_16:" ":NEW_STYLE_TYPE_17:" ":NEW_STYLE_TYPE_18:" ":NEW_STYLE_TYPE_19:" ":NEW_STYLE_TYPE_20:" ":NEW_STYLE_TYPE_21:" ":NEW_STYLE_TYPE_22:" ":NEW_STYLE_TYPE_23:" ":NEW_STYLE_TYPE_24:" ":NEW_STYLE_TYPE_25:" ":NEW_STYLE_TYPE_26:" ":NEW_STYLE_TYPE_27:" ":NEW_STYLE_TYPE_28:" ":NEW_STYLE_TYPE_29:" ":NEW_STYLE_TYPE_30:" ":NEW_STYLE_TYPE_31:" ":NEW_STYLE_TYPE_32:" ":NEW_STYLE_TYPE_33:" ":NEW_STYLE_TYPE_34:" ":NEW_STYLE_TYPE_35:" ":NEW_STYLE_TYPE_36:" ":NEW_STYLE_TYPE_37:" ":NEW_STYLE_TYPE_38:" ":NEW_STYLE_TYPE_39 + +Equ NEW_STYLEEX_NAME_1 To "CREATECOMPLETE" +Equ NEW_STYLEEX_APPLIESTO_1 To PSCTL_WINDOW$ +Equ NEW_STYLEEX_CODE_1 To 0X8000 +Equ NEW_STYLEEX_TYPE_1 To 1 + +Equ NEW_STYLEEX_NAME_2 To "ENABLEDRAGAUTOSCROLL" +Equ NEW_STYLEEX_APPLIESTO_2 To PSCTL_WINDOW$:",":PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_COMBOBOX$:",":PSCTL_LISTBOX$:",":PSCTL_EDITTABLE$:",":PSCTL_TABCONTROL$ +Equ NEW_STYLEEX_CODE_2 To 0X4000 +Equ NEW_STYLEEX_TYPE_2 To 1 + +Equ NEW_STYLEEX_NAME_3 To "ENABLEDROP" +Equ NEW_STYLEEX_APPLIESTO_3 To PSCTL_WINDOW$:",":PSCTL_STATIC$:",":PSCTL_PUSHBUTTON$:",":PSCTL_CHECKBOX$:",":PSCTL_RADIOBUTTON$:",":PSCTL_GROUPBOX$:",":PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_COMBOBOX$:",":PSCTL_EDITTABLE$:",":PSCTL_BITMAP$:",":PSCTL_HSCROLLBAR$:",":PSCTL_VSCROLLBAR$:",":PSCTL_HSPLITBAR$:",":PSCTL_VSPLITBAR$:",":PSCTL_TABCONTROL$ ;* NEED PANEL AND OLE +Equ NEW_STYLEEX_CODE_3 To 0X2000 +Equ NEW_STYLEEX_TYPE_3 To 1 + +Equ NEW_STYLEEX_NAME_4 To "NOREDRAW" +Equ NEW_STYLEEX_APPLIESTO_4 To PSCTL_WINDOW$:",":PSCTL_STATIC$:",":PSCTL_PUSHBUTTON$:",":PSCTL_CHECKBOX$:",":PSCTL_RADIOBUTTON$:",":PSCTL_GROUPBOX$:",":PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_COMBOBOX$:",":PSCTL_EDITTABLE$:",":PSCTL_BITMAP$:",":PSCTL_HSCROLLBAR$:",":PSCTL_VSCROLLBAR$:",":PSCTL_HSPLITBAR$:",":PSCTL_VSPLITBAR$:",":PSCTL_TABCONTROL$ ;* NEED PANEL AND OLE +Equ NEW_STYLEEX_CODE_4 To 0X0080 +Equ NEW_STYLEEX_TYPE_4 To 1 + +Equ NEW_STYLEEX_NAME_5 To "DOUBLEBUFFER" +Equ NEW_STYLEEX_APPLIESTO_5 To PSCTL_WINDOW$ ;* NEED PANEL +Equ NEW_STYLEEX_CODE_5 To 0X0010 +Equ NEW_STYLEEX_TYPE_5 To 1 + +Equ NEW_STYLEEX_NAME_6 To "DESIGNMODE" +Equ NEW_STYLEEX_APPLIESTO_6 To PSCTL_WINDOW$:",":PSCTL_STATIC$:",":PSCTL_PUSHBUTTON$:",":PSCTL_CHECKBOX$:",":PSCTL_RADIOBUTTON$:",":PSCTL_GROUPBOX$:",":PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_COMBOBOX$:",":PSCTL_EDITTABLE$:",":PSCTL_BITMAP$:",":PSCTL_HSCROLLBAR$:",":PSCTL_VSCROLLBAR$:",":PSCTL_HSPLITBAR$:",":PSCTL_VSPLITBAR$:",":PSCTL_TABCONTROL$ ;* NEED PANEL AND OLE +Equ NEW_STYLEEX_CODE_6 To 0X0008 +Equ NEW_STYLEEX_TYPE_6 To 1 + +Equ NEW_STYLEEX_NAME_7 To "ENABLEDRAG" +Equ NEW_STYLEEX_APPLIESTO_7 To PSCTL_STATIC$:",":PSCTL_PUSHBUTTON$:",":PSCTL_CHECKBOX$:",":PSCTL_RADIOBUTTON$:",":PSCTL_GROUPBOX$:",":PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_COMBOBOX$:",":PSCTL_EDITTABLE$:",":PSCTL_BITMAP$:",":PSCTL_HSCROLLBAR$:",":PSCTL_VSCROLLBAR$:",":PSCTL_HSPLITBAR$:",":PSCTL_VSPLITBAR$:",":PSCTL_TABCONTROL$ ;* NEED PANEL AND OLE +Equ NEW_STYLEEX_CODE_7 To 0X1000 +Equ NEW_STYLEEX_TYPE_7 To 1 + +Equ NEW_STYLEEX_NAME_8 To "DUMMYCAPTION" +Equ NEW_STYLEEX_APPLIESTO_8 To PSCTL_STATIC$:",":PSCTL_BITMAP$ ;* NEED PANEL +Equ NEW_STYLEEX_CODE_8 To 0X0002 +Equ NEW_STYLEEX_TYPE_8 To 1 + +Equ NEW_STYLEEX_NAME_9 To "ALLPAGES" +Equ NEW_STYLEEX_APPLIESTO_9 To PSCTL_STATIC$:",":PSCTL_PUSHBUTTON$:",":PSCTL_CHECKBOX$:",":PSCTL_RADIOBUTTON$:",":PSCTL_GROUPBOX$:",":PSCTL_EDITFIELD$:",":PSCTL_EDITBOX$:",":PSCTL_RICHEDITBOX$:",":PSCTL_COMBOBOX$:",":PSCTL_EDITTABLE$:",":PSCTL_BITMAP$:",":PSCTL_HSCROLLBAR$:",":PSCTL_VSCROLLBAR$:",":PSCTL_HSPLITBAR$:",":PSCTL_VSPLITBAR$:",":PSCTL_TABCONTROL$ ;* NEED PANEL AND OLE +Equ NEW_STYLEEX_CODE_9 To 0X0001 +Equ NEW_STYLEEX_TYPE_9 To 1 + +Equ NEW_STYLEEX_NAME_10 To "ENABLELISTDROP" +Equ NEW_STYLEEX_APPLIESTO_10 To PSCTL_COMBOBOX$ +Equ NEW_STYLEEX_CODE_10 To 0X0040 +Equ NEW_STYLEEX_TYPE_10 To 1 + +Equ NEW_STYLEEX_NAME_11 To "ENABLELISTDRAG" +Equ NEW_STYLEEX_APPLIESTO_11 To PSCTL_COMBOBOX$ +Equ NEW_STYLEEX_CODE_11 To 0X0020 +Equ NEW_STYLEEX_TYPE_11 To 1 + +Equ NEW_STYLEEX_NAME_12 To "VCENTERTEXT" +Equ NEW_STYLEEX_APPLIESTO_12 To PSCTL_LISTBOX$ +Equ NEW_STYLEEX_CODE_12 To 0X0800 +Equ NEW_STYLEEX_TYPE_12 To 1 + +Equ NEW_STYLEEX_NAME_13 To "INITCOLLAPSED" +Equ NEW_STYLEEX_APPLIESTO_13 To PSCTL_LISTBOX$ +Equ NEW_STYLEEX_CODE_13 To 0X0400 +Equ NEW_STYLEEX_TYPE_13 To 1 + +Equ NEW_STYLEEX_NAME_14 To "DRAWTREE" +Equ NEW_STYLEEX_APPLIESTO_14 To PSCTL_LISTBOX$ +Equ NEW_STYLEEX_CODE_14 To 0X0200 +Equ NEW_STYLEEX_TYPE_14 To 1 + +Equ NEW_STYLEEX_NAME_15 To "ENTERDBLCLICK" +Equ NEW_STYLEEX_APPLIESTO_15 To PSCTL_LISTBOX$ +Equ NEW_STYLEEX_CODE_15 To 0X0100 +Equ NEW_STYLEEX_TYPE_15 To 1 + +Equ NEW_STYLEEX_NAME_16 To "ENABLEDRAGAUTOEXPAND" +Equ NEW_STYLEEX_APPLIESTO_16 To PSCTL_LISTBOX$ +Equ NEW_STYLEEX_CODE_16 To 0X0040 +Equ NEW_STYLEEX_TYPE_16 To 1 + +Equ NEW_STYLEEX_NAME_17 To "ENABLEROWDRAG" +Equ NEW_STYLEEX_APPLIESTO_17 To PSCTL_EDITTABLE$ +Equ NEW_STYLEEX_CODE_17 To 0X0040 +Equ NEW_STYLEEX_TYPE_17 To 1 + +Equ NEW_STYLEEX_NAME_18 To "ENABLECOLDRAG" +Equ NEW_STYLEEX_APPLIESTO_18 To PSCTL_EDITTABLE$ +Equ NEW_STYLEEX_CODE_18 To 0X0020 +Equ NEW_STYLEEX_TYPE_18 To 1 + +Equ NEW_STYLE_NAMES_EX To NEW_STYLEEX_NAME_1:" ":NEW_STYLEEX_NAME_2:" ":NEW_STYLEEX_NAME_3:" ":NEW_STYLEEX_NAME_4:" ":NEW_STYLEEX_NAME_5:" ":NEW_STYLEEX_NAME_6:" ":NEW_STYLEEX_NAME_7:" ":NEW_STYLEEX_NAME_8:" ":NEW_STYLEEX_NAME_9:" ":NEW_STYLEEX_NAME_10:" ":NEW_STYLEEX_NAME_11:" ":NEW_STYLEEX_NAME_12:" ":NEW_STYLEEX_NAME_13:" ":NEW_STYLEEX_NAME_14:" ":NEW_STYLEEX_NAME_15:" ":NEW_STYLEEX_NAME_16:" ":NEW_STYLEEX_NAME_17:" ":NEW_STYLEEX_NAME_18 +Equ NEW_STYLE_APPLIESTO_EX To NEW_STYLEEX_APPLIESTO_1:" ":NEW_STYLEEX_APPLIESTO_2:" ":NEW_STYLEEX_APPLIESTO_3:" ":NEW_STYLEEX_APPLIESTO_4:" ":NEW_STYLEEX_APPLIESTO_5:" ":NEW_STYLEEX_APPLIESTO_6:" ":NEW_STYLEEX_APPLIESTO_7:" ":NEW_STYLEEX_APPLIESTO_8:" ":NEW_STYLEEX_APPLIESTO_9:" ":NEW_STYLEEX_APPLIESTO_10:" ":NEW_STYLEEX_APPLIESTO_11:" ":NEW_STYLEEX_APPLIESTO_12:" ":NEW_STYLEEX_APPLIESTO_13:" ":NEW_STYLEEX_APPLIESTO_14:" ":NEW_STYLEEX_APPLIESTO_15:" ":NEW_STYLEEX_APPLIESTO_16:" ":NEW_STYLEEX_APPLIESTO_17:" ":NEW_STYLEEX_APPLIESTO_18 +Equ NEW_STYLE_CODES_EX To NEW_STYLEEX_CODE_1:" ":NEW_STYLEEX_CODE_2:" ":NEW_STYLEEX_CODE_3:" ":NEW_STYLEEX_CODE_4:" ":NEW_STYLEEX_CODE_5:" ":NEW_STYLEEX_CODE_6:" ":NEW_STYLEEX_CODE_7:" ":NEW_STYLEEX_CODE_8:" ":NEW_STYLEEX_CODE_9:" ":NEW_STYLEEX_CODE_10:" ":NEW_STYLEEX_CODE_11:" ":NEW_STYLEEX_CODE_12:" ":NEW_STYLEEX_CODE_13:" ":NEW_STYLEEX_CODE_14:" ":NEW_STYLEEX_CODE_15:" ":NEW_STYLEEX_CODE_16:" ":NEW_STYLEEX_CODE_17:" ":NEW_STYLEEX_CODE_18 +Equ NEW_STYLE_TYPES_EX To NEW_STYLEEX_TYPE_1:" ":NEW_STYLEEX_TYPE_2:" ":NEW_STYLEEX_TYPE_3:" ":NEW_STYLEEX_TYPE_4:" ":NEW_STYLEEX_TYPE_5:" ":NEW_STYLEEX_TYPE_6:" ":NEW_STYLEEX_TYPE_7:" ":NEW_STYLEEX_TYPE_8:" ":NEW_STYLEEX_TYPE_9:" ":NEW_STYLEEX_TYPE_10:" ":NEW_STYLEEX_TYPE_11:" ":NEW_STYLEEX_TYPE_12:" ":NEW_STYLEEX_TYPE_13:" ":NEW_STYLEEX_TYPE_14:" ":NEW_STYLEEX_TYPE_15:" ":NEW_STYLEEX_TYPE_16:" ":NEW_STYLEEX_TYPE_17:" ":NEW_STYLEEX_TYPE_18 + +Equ NEW_STYLES_NAME To NEW_STYLE_NAMES_NORMAL:" ":NEW_STYLE_NAMES_EX +Equ NEW_STYLES_APPLIESTO To NEW_STYLE_APPLIESTO_NORMAL:" ":NEW_STYLE_APPLIESTO_EX +Equ NEW_STYLES_CODE To NEW_STYLE_CODES_NORMAL:" ":NEW_STYLE_CODES_EX +Equ NEW_STYLES_TYPE To NEW_STYLE_TYPES_NORMAL:" ":NEW_STYLE_TYPES_EX + diff --git a/SYSPROG/STPROCINS/PS_NOTIFYICON_EQUATES.txt b/SYSPROG/STPROCINS/PS_NOTIFYICON_EQUATES.txt new file mode 100644 index 0000000..1099078 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_NOTIFYICON_EQUATES.txt @@ -0,0 +1,46 @@ +compile insert ps_NotifyIcon_Equates +/* + ** Copyright (C) 2012-2023 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : May 2023 + Purpose : Constants for working with PS NOTIFYICON objects + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_NOTIFYICON_EQUATES_ +#define _PS_NOTIFYICON_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // NOTIFYICON's are basically derived STATIC controls so most STATIC + // constants apply here as well + $insert ps_Static_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style Equates + equ PSS_NTI_MANUALSTART$ to 0x00000001 ; // STARTUPMODE property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // STARTUPMODE property + equ NTI_STARTMODE_AUTO$ to 0 + equ NTI_STARTMODE_MANUAL$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_OLECONTROL_EQUATES.txt b/SYSPROG/STPROCINS/PS_OLECONTROL_EQUATES.txt new file mode 100644 index 0000000..c8a3712 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_OLECONTROL_EQUATES.txt @@ -0,0 +1,125 @@ +compile insert PS_OleControl_Equates +/* + ** Copyright (C) 2012-2019 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : April 2015 + Purpose : Constants for working with PS OLECONTROL object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 20 Sep 19 Added DESIGNPROPERTYLIST constants + Mr C 13 Sep 19 Added INITPROPNAMES and INITPROPVALUES fields +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_OLECONTROL_EQUATES_ +#define _PS_OLECONTROL_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Equates + $insert oiwin_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + + equ PSS_OLECONTROL_NOACCELTRANS$ to 0x00000800 ; // NOACCELTRANSLATION property + equ PSS_OLECONTROL_NOFOCUS$ to 0x00000400 ; // ALLOWFOCUS property (inverse) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + equ POS_OLE_QUALIFIED_EVENTS$ to POS_TYPESPECIFIC$ + equ POS_OLE_LICENSEKEY$ to POS_LIST$ + equ POS_OLE_INITSTREAM$ to POS_VALUE$ + equ POS_OLE_INITPROPNAMES$ to POS_TEXT_1$ + equ POS_OLE_INITPROPVALUES$ to POS_TEXT_2$ + + // SYSREPOSWINEXES structure overrides + equ PSPOS_OLE_QUALIFIED_EVENTS$ to PSPOS_TYPESPECIFIC$ + equ PSPOS_OLE_LICENSEKEY$ to PSPOS_LIST$ + equ PSPOS_OLE_INITSTREAM$ to PSPOS_VALUE$ + equ PSPOS_OLE_INITPROPNAMES$ to PSPOS_TEXT_1$ + equ PSPOS_OLE_INITPROPVALUES$ to PSPOS_TEXT_2$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Stored Qualified event structure + // + // @svm-delimited list of event qualifiers with the format: + // + // <0,0,0,1> EventName + // <0,0,0,2> Qualifier (optional) + // <0,0,0,3> EventName override (optional) + // <0,0,0,4> SyncType (0=Async,1=Sync,2=Callback) - see ps_Event_TypeInfo_Equates + // <0,0,0,5> SuppressName (T/F) + // <0,0,0,6> DispID flag (T/F) + // <0,0,0,7> Pass parameters as single array flag (T/F) + + equ PS_OLE_QE_POS_EVENTNAME$ to 1 + equ PS_OLE_QE_POS_QUALIFIER$ to 2 + equ PS_OLE_QE_POS_EVENTNAME_OVERRIDE$ to 3 + equ PS_OLE_QE_POS_SYNCTYPE$ to 4 + equ PS_OLE_QE_POS_SUPPRESSNAME$ to 5 + equ PS_OLE_QE_POS_DISPID$ to 6 + equ PS_OLE_QE_POS_SINGLEARG$ to 7 + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // DESIGNPROPERTYLIST property + // + // Returns an @fm delimited dynamic array of design time OLE properties with + // the format: + // + // Property Name + // Property Flags + // Property Type (VARTYPE) + // Property documentation string + // Extended Property Type (PS_OLE_PROPERTY_TYPE) + // @svm'd list of internal property values (for Enum types) + // @svm'd list of external property values (for enum types) + // + + equ PS_OLE_DPL_POS_PROPNAME$ to 1 + equ PS_OLE_DPL_POS_PROPFLAGS$ to 2 + equ PS_OLE_DPL_POS_VARTYPE$ to 3 + equ PS_OLE_DPL_POS_DOCTEXT$ to 4 + equ PS_OLE_DPL_POS_EXTTYPE$ to 5 + equ PS_OLE_DPL_POS_IVALS$ to 6 + equ PS_OLE_DPL_POS_OVALS$ to 7 + + // Extended OLE Property Types + equ PS_OLE_EXT_TYPE_USE_VT$ to 0 + equ PS_OLE_EXT_TYPE_COLOR$ to 1 + equ PS_OLE_EXT_TYPE_FONT$ to 2 + equ PS_OLE_EXT_TYPE_FILE$ to 3 + equ PS_OLE_EXT_TYPE_FOLDER$ to 4 + equ PS_OLE_EXT_TYPE_PICTURE$ to 5 + equ PS_OLE_EXT_TYPE_PAGE$ to 6 + equ PS_OLE_EXT_TYPE_COLOR_PAGE$ to 7 + equ PS_OLE_EXT_TYPE_FONT_PAGE$ to 8 + equ PS_OLE_EXT_TYPE_PICTURE_PAGE$ to 9 + equ PS_OLE_EXT_TYPE_ENUM$ to 10 + equ PS_OLE_EXT_TYPE_PREDEF_VALUE$ to 11 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_PANEL_EQUATES.txt b/SYSPROG/STPROCINS/PS_PANEL_EQUATES.txt new file mode 100644 index 0000000..6651bd5 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_PANEL_EQUATES.txt @@ -0,0 +1,81 @@ +compile insert ps_Panel_Equates +/* + ** Copyright (C) 2013-2019 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : Sept 2014 + Purpose : Constants for working with PS PANEL object structures + + + Comments + ======== + + PANEL inherits from view but shares much of it's UI appearance code with + STATIC. + + Amended Date Reason + ======= ==== ====== + Mr C 13 Feb 19 Fixed CHK_ -> PNL_ equate names. + Mr C 26 May 16 Added PSSX_PANEL_ATWINDOW$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_PANEL_EQUATES_ +#define _PS_PANEL_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +////////////////////////////////////////////////////////////////////////////// + + $insert msWin_Static_Equates + $insert ps_Style_X_Equates + $insert ps_Equates + $insert OIWIN_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // SS_ENDELLIPSES == AUTOELLIPSES property + // 0x00000020 == TEXTALIGN property + // SS_REALSIZEIMAGE == TEXTALIGN property + // SS_CENTERIMAGE == TEXTALIGN property + // SS_RIGHTJUST == TEXTALIGN property + // SS_LEFTNOWORDWRAP == WORDWRAP property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // PS Style equates + equ PSS_PANEL_HTMLTEXT$ to PSS_CHILD_HTMLTEXT$ ; * // DRAWHTML property + + * // PS Extended Styles + equ PSSX_PANEL_ATWINDOW$ to 0x00040000 ; * // == docked window for IDE + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // SYSREPOSWINS structure overrides + + equ PoS_PNL_HOTBACKCOLOR$ to POS_COLOR_1$ ; * // HOTBACKCOLOR property - <0,0,1> and <0,0,2> only + equ POS_PNL_HOTFORECOLOR$ to POS_COLOR_2$ ; * // HOTFORECOLOR property - <0,0,1> only + equ POS_PNL_HOTFONT$ to POS_LOGFONT_1$ ; * // HOTFONT property + equ POS_PNL_TEXTORIGIN_X$ to POS_SPOT_X$ ; * // TEXTORIGIN property + equ POS_PNL_TEXTORIGIN_Y$ to POS_SPOT_Y$ ; * // TEXTORIGIN property + + * // SYSREPOSWINEXES structure overrides + + equ PSPOS_PNL_HOTBACKCOLOR$ to PSPOS_COLOR_1$ ; * // HOTBACKCOLOR property - <0,0,1> and <0,0,2> only + equ PSPOS_PNL_HOTFORECOLOR$ to PSPOS_COLOR_2$ ; * // HOTFORECOLOR property - <0,0,1> only + equ PSPOS_PNL_HOTFONT$ to PSPOS_LOGFONT_1$ ; * // HOTFONT property + equ PSPOS_PNL_TEXTORIGIN_X$ to PSPOS_SPOT_X$ ; * // TEXTORIGIN property + equ PSPOS_PNL_TEXTORIGIN_Y$ to PSPOS_SPOT_Y$ ; * // TEXTORIGIN property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_PROGRESSBAR_EQUATES.txt b/SYSPROG/STPROCINS/PS_PROGRESSBAR_EQUATES.txt new file mode 100644 index 0000000..3d36756 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_PROGRESSBAR_EQUATES.txt @@ -0,0 +1,87 @@ +compile insert PS_ProgressBar_Equates +/* + ** Copyright (C) 2013-2023 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS PROGRESSBAR object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 13 Apr 23 Updated PS styles + Mr C 01 Jul 16 Added PS_PRG_RANGE_FROM$ and PS_PRG_RANGE_TO$ + Mr C 17 Mar 16 Added VALUE property to structures +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_PROGRESSBAR_EQUATES_ +#define _PS_PROGRESSBAR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_ProgressBar_Equates + $insert ps_Equates + $insert oiwin_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // PBS_SMOOTH -> SMOOTH property + // PBS_VERTICAL -> VERTICAL property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + equ PSS_PROGRESSBAR_SYNCTASKBAR$ to 0x00000080 ; * // SYNCTASKBAR property + equ PSS_PROGRESSBAR_PULSE_GO$ to 0x00000100 ; * // Runtime flag + equ PSS_PROGRESSBAR_PULSE_WAIT$ to 0x00000200 ; * // Runtime flag + equ PSS_PROGRESSBAR_SHOWTEXT$ to 0x00000400 ; * // SHOWTEXT property + equ PSS_PROGRESSBAR_NOBORDER$ to 0x00000800 ; * // BORDER property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + + equ POS_PRB_VALUE$ to POS_VALUE$ ; * // VALUE property + equ POS_PRB_RANGE$ to POS_SCROLLRANGE$ ; * // RANGE property for progress bars + equ POS_PRB_STEP$ to POS_SCROLLCHANGE$ ; * // <0,0,1> == STEP property for progress bars; + equ POS_PRB_SMOOTHTIMER$ to POS_CHARCOUNT$ ; * // SMOOTHTIMER property + equ POS_PRB_STATE$ to POS_NUMCOLS$ ; * // STATE for Progress Bars (1,2,3) + equ POS_PRB_MARQUEE$ to POS_ROWLIMIT$ ; * // MARQUEE property (ms) + equ POS_PRB_NORMALCOLOR$ to POS_COLOR_1$ ; * // NORMALCOLOR property + equ POS_PRB_ERRORCOLOR$ to POS_COLOR_2$ ; * // ERRORCOLOR property + equ POS_PRB_PAUSEDCOLOR$ to POS_COLOR_3$ ; * // PAUSEDCOLOR property + + // SYSREPOSWINEXES structure overrides + + equ PSPOS_PRB_VALUE$ to PSPOS_VALUE$ ; * // VALUE property + equ PSPOS_PRB_RANGE$ to PSPOS_SCROLLRANGE$ ; * // RANGE property for progress bars + equ PSPOS_PRB_STEP$ to PSPOS_SCROLLCHANGE$ ; * // <0,0,1> == STEP property for progress bars; + equ PSPOS_PRB_SMOOTHTIMER$ to PSPOS_CHARCOUNT$ ; * // SMOOTHTIMER property + equ PSPOS_PRB_STATE$ to PSPOS_NUMCOLS$ ; * // STATE for Progress Bars (1,2,3) + equ PSPOS_PRB_MARQUEE$ to PSPOS_ROWLIMIT$ ; * // MARQUEE property (ms) + equ PSPOS_PRB_NORMALCOLOR$ to PSPOS_COLOR_1$ ; * // NORMALCOLOR property + equ PSPOS_PRB_ERRORCOLOR$ to PSPOS_COLOR_2$ ; * // ERRORCOLOR property + equ PSPOS_PRB_PAUSEDCOLOR$ to PSPOS_COLOR_3$ ; * // PAUSEDCOLOR property + + // PSPOS_PRB_RANGE equates (@svm'd) + equ PS_PRG_RANGE_FROM$ to 1 ; // aka SCROLLRANGE V + equ PS_PRG_RANGE_TO$ to 2 ; // aka SCROLLRANGE H + + // PSPOS_DISPLAY equates + equ PS_PRB_DISPLAY_TRANSLUCENCY$ to 1 ; * // TRANSLUCENCY property <0,0,1> + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_PROPERTYGRID_EQUATES.txt b/SYSPROG/STPROCINS/PS_PROPERTYGRID_EQUATES.txt new file mode 100644 index 0000000..61da6f6 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_PROPERTYGRID_EQUATES.txt @@ -0,0 +1,249 @@ +compile insert PS_PropertyGrid_Equates +/* + ** Copyright (C) 2013-2016 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS PROPGRID object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 12 Aug 17 Added ContextFlag constants + Mr C 04 Aug 17 Added PSS_PROPGRID_AUTOEXPAND$ + Mr C 04 Apr 17 Added PSSX_PGD_ROWSTRIPE$ + Mr C 16 Jan 17 Update comments + Mr C 06 Sep 16 Added FileDlg item type equates + Mr C 02 Apr 16 Added PSPG_POS_DISPLAYNAME$ + Mr C 17 Feb 16 Updated comments + Mr C 21 Nov 16 Added EMPTYTEXT constants + Mr C 31 Aug 15 Added COLWIDTH + Mr C 27 Aug 15 Added PSPG_POS_OPTIONVALUES$ + Mr C 26 Feb 15 Added PS_PGIT_PASSWORD$ and related styles + Mr C 24 Feb 15 Added PSS_PROPGRID_HIDECATEGORIES$ + djh 10 May 17 Add items to LIST property for use in LIST PGO but not used in wins record +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_PROPERTYGRID_EQUATES_ +#define _PS_PROPERTYGRID_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Equates + $insert OIWIN_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // "Internal" PROPGRID types (see RevGrid_PropertyItemTypes.h) + +// Basic Property item types are : 0x0000 to 0x00FF +// Property Item Modifier flags are : 0x0100 to 0x4000 + + equ PS_PGIT_FLAG_BUTTON$ to 0x0100; + equ PS_PGIT_FLAG_COMBO$ to 0x0200; + equ PS_PGIT_FLAG_DLG$ to 0x0400; + + equ PS_PGIT_STATIC$ to 0x0000; + equ PS_PGIT_EDIT$ to 0x0001; + equ PS_PGIT_COLOR$ to 0x0002; + equ PS_PGIT_GRADIENT$ to 0x0003; + equ PS_PGIT_FONT$ to 0x0005; + equ PS_PGIT_CHECK$ to 0x0006; + equ PS_PGIT_FILE$ to 0x0007; + equ PS_PGIT_FOLDER$ to 0x0008; + // equ PS_PGIT_IP$ to 0x0009; + equ PS_PGIT_DATE$ to 0x000A; + equ PS_PGIT_TIME$ to 0x000B; + equ PS_PGIT_DATETIME$ to 0x000C; + equ PS_PGIT_COLOREDIT$ to 0x000D; + + equ PS_PGIT_CATEGORY$ to 0x00FF; + + equ PS_PGIT_COMBO$ to ( PS_PGIT_STATIC$ + PS_PGIT_FLAG_COMBO$ ); + equ PS_PGIT_EDITCOMBO$ to ( PS_PGIT_EDIT$ + PS_PGIT_FLAG_COMBO$ ); + equ PS_PGIT_BUTTON$ to ( PS_PGIT_STATIC$ + PS_PGIT_FLAG_BUTTON$ ); + equ PS_PGIT_EDITBUTTON$ to ( PS_PGIT_EDIT$ + PS_PGIT_FLAG_BUTTON$ ); + equ PS_PGIT_COLORBUTTON$ to ( PS_PGIT_COLOR$ + PS_PGIT_FLAG_BUTTON$ ); + equ PS_PGIT_COLORCOMBO$ to ( PS_PGIT_COLOR$ + PS_PGIT_FLAG_COMBO$ ); + equ PS_PGIT_COLORDLG$ to ( PS_PGIT_COLOR$ + PS_PGIT_FLAG_DLG$ ); + equ PS_PGIT_COLOREDITCOMBO$ to ( PS_PGIT_COLOREDIT$ + PS_PGIT_FLAG_COMBO$ ); + equ PS_PGIT_COLOREDITDLG$ to ( PS_PGIT_COLOREDIT$ + PS_PGIT_FLAG_DLG$ ); + equ PS_PGIT_COLOREDITBTN$ to ( PS_PGIT_COLOREDIT$ + PS_PGIT_FLAG_BUTTON$ ); + equ PS_PGIT_GRADIENTBUTTON$ to ( PS_PGIT_GRADIENT$ + PS_PGIT_FLAG_BUTTON$ ); + equ PS_PGIT_FONTBUTTON$ to ( PS_PGIT_FONT$ + PS_PGIT_FLAG_BUTTON$ ); + equ PS_PGIT_FONTDLG$ to ( PS_PGIT_FONT$ + PS_PGIT_FLAG_DLG$ ); + equ PS_PGIT_FILEDLG$ to ( PS_PGIT_FILE$ + PS_PGIT_FLAG_DLG$ ); + equ PS_PGIT_FOLDERDLG$ to ( PS_PGIT_FOLDER$ + PS_PGIT_FLAG_DLG$ ); + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Property Item "ItemStyle" equates - these styles can apply to the + // following types + // + // PGIT_EDIT$ + // PGIT_EDITCOMBO$ + // PGIT_EDITBUTTON$ + // PGIT_FILE$ + // PGIT_FOLDER$ + + equ PGIS_CENTER$ to 0x0001; * // ES_CENTER + equ PGIS_RIGHT$ to 0x0002; * // ES_RIGHT + equ PGIS_UPPERCASE$ to 0x0008; * // ES_UPPERCASE + equ PGIS_LOWERCASE$ to 0x0010; * // ES_LOWERCASE + + // Property item Color equates - these styles can apply to the following + // types + // + // PGIT_COLOR$ + // PGIT_COLORBUTTON$ + // PGIT_COLORCOMBO$ + // PGIT_COLORDLG$ + + equ PGIS_COLORKEYMODE$ to 0x0100; + + // Property Item "PasswordStyle" equates - these styles can apply to the + // following types + // + // PGIT_STATIC$ + // PGIT_BUTTON$ + // PGIT_EDIT$ + // PGIT_EDITBUTTON$ + + equ PGIS_PASSWORD$ to 0x0020; * // ES_PASSWORD + equ PGIS_PASSWORDPEEK$ to 0x0040; * // Only for password styles + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Options attribute for a FileDlg (PS_PGIT_FILEDLG$) type. + // @svm delimited + // + // <0,0,1> Dialog Title + // <0,0,2> Extension Filter string + // <0,0,3> Default extension string + // <0,0,4> OpenFileName Flags + + equ PGFD_OPT_TITLE$ to 1 + equ PGFD_OPT_EXTFILTER$ to 2 + equ PGFD_OPT_DEFEXT$ to 3 + equ PGFD_OPT_FLAGS$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // N/a - all styles overridden by the grid control itself ... + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + equ PSS_PROPGRID_AUTOEXPAND$ to 0x00000080 ; * // AUTOEXPAND property + equ PSS_PROPGRID_DESCDRAWHTML$ to 0x00000100 ; * // DESCRIPTIONDRAWHTML property + equ PSS_PROPGRID_HIDECATEGORIES$ to 0x00000200 ; * // Inverse SHOWCATEGORIES property + equ PSS_PROPGRID_SHOWDESCRIPTIONS$ to 0x00000400 ; * // SHOWDESCRIPTIONS property + equ PSS_PROPGRID_SHOWTOOLTIPS$ to 0x00000800 ; * // TOOLTIPS property + + // PS Extended style equates + equ PSSX_PGD_ROWSTRIPE$ to 0x00000100 ; * // ROWSTRIPE property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINEXES structure overrides + equ POS_PGD_LIST$ to POS_LIST$ ; * @svm delimited + equ POS_PGD_OPTIONSKEY$ to POS_TEXT_1$ + equ POS_PGD_COLWIDTH$ to POS_COLWIDE$ ; * <0,0,1> only + equ POS_PGD_EMPTYTEXT$ to POS_TEXT_14$ + + // SYSREPOSWINEXES structure overrides + equ PSPOS_PGD_LIST$ to PSPOS_LIST$ ; * @svm delimited + equ PSPOS_PGD_OPTIONSKEY$ to PSPOS_TEXT_1$ + equ PSPOS_PGD_COLWIDTH$ to PSPOS_COLWIDE$ ; * <0,0,1> only + equ PSPOS_PGD_EMPTYTEXT$ to PSPOS_TEXT_14$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Stored LIST property - @svm/@tm delimited + // + // At runtime this property is @vm/@svm delimited + // + // <0,0,0,1> Category + // <0,0,0,2> Name + // <0,0,0,3> Type + // <0,0,0,4> Value + // <0,0,0,5> Options (@stm) delimited + // <0,0,0,6> Description + // <0,0,0,7> Disabled (TRUE$/FALSE$) + // <0,0,0,8> ItemStyle (see PGIS_ equates above) + // <0,0,0,9> Iconv + // <0,0,0,10> ErrorText + // <0,0,0,11> Default Value + // <0,0,0,12> Internal Option values (@stm) delimited + // <0,0,0,13> Text To display (overrides Name) + // <0,0,0,14> Misc value + // + // Same layout for PROPERTY_BY_POS message, except we're @fm/@vm delimited, + // as we are for the LIST/LISTX propeties that we use at runtime. + + equ PSPG_POS_CATEGORY$ to 1 + equ PSPG_POS_NAME$ to 2 + equ PSPG_POS_TYPE$ to 3 + equ PSPG_POS_VALUE$ to 4 + equ PSPG_POS_OPTIONS$ to 5 + equ PSPG_POS_DESCRIPTION$ to 6 + equ PSPG_POS_DISABLED$ to 7 + equ PSPG_POS_EDITSTYLE$ to 8 ; * // deprecated - do not use + equ PSPG_POS_ITEMSTYLE$ to 8 + equ PSPG_POS_ICONV$ to 9 + equ PSPG_POS_ERRORTEXT$ to 10 + equ PSPG_POS_DEFVALUE$ to 11 + equ PSPG_POS_OPTIONVALUES$ to 12 + equ PSPG_POS_DISPLAYNAME$ to 13 + equ PSPG_POS_MISCVALUE$ to 14 + + // These items are just placeholders for ItemStyles but are not part of the LIST property layout + equ PSPG_POS_COLORKEY$ to 15 + equ PSPG_POS_TEXTALIGN$ to 16 + equ PSPG_POS_TEXTCASE$ to 17 + equ PSPG_POS_PASSWORD$ to 18 + equ PSPG_POS_PASSWORDPEEK$ to 19 + + // These items are just placeholders for Options but are not part of the LIST property layout + equ PSPG_POS_DIALOGTITLE$ to 20 + equ PSPG_POS_EXTFILESTRING$ to 21 + equ PSPG_POS_DEFEXTSTRING$ to 22 + equ PSPG_POS_OPENFILENAMEFLGS$ to 23 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PROPCHANGED context - these are normal used within the context of the IDE + + equ PPL_PRPCHG_CONTEXT_USEREDIT$ to 0x0000 ; // From user-edit + equ PPL_PRPCHG_CONTEXT_FROMOPTIONS$ to 0x0001 ; // From PROPOPTIONS + equ PPL_PRPCHG_CONTEXT_FROMCODE$ to 0x0002 ; // From code + equ PPL_PRPCHG_CONTEXT_NOVALIDERR$ to 0x0010 ; // Don't raise a VALIDERR event. + equ PPL_PRPCHG_CONTEXT_SYNCMODE$ to 0x0020 ; // All events must be fired synchronously + + /* Not implemented + equ PPL_PRPCHG_CONTEXT_NOSETPGL$ to 0x2000 ; // Don't apply the change to the PGL + equ PPL_PRPCHG_CONTEXT_NOSETDS$ to 0x4000 ; // Don't apply the change to the DS + equ PPL_PRPCHG_CONTEXT_NOSETPROP$ to 0x8000 ; // Don't apply the change to the design control + */ + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_PROPERTY_TYPEINFO_EQUATES.txt b/SYSPROG/STPROCINS/PS_PROPERTY_TYPEINFO_EQUATES.txt new file mode 100644 index 0000000..2564cbd --- /dev/null +++ b/SYSPROG/STPROCINS/PS_PROPERTY_TYPEINFO_EQUATES.txt @@ -0,0 +1,514 @@ +compile insert ps_Property_TypeInfo_Equates +/* + ** Copyright (C) 2013-2022 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : October 2013 + Purpose : Constants for working with PS Property Types + + + Comments + ======== + + This should be kept in sync with RevPS_PropertyTypeInfo.h + + + Amended Date Reason + ======= ==== ====== + Mr C 01 Jun 23 Added PSPTID_RESIZEMODE$ + Mr C 26 Aug 22 Added PSPTID_STARTUPMODE$ + Mr C 01 Aug 22 Added PSPTID_WBVCOLORSCHEME$, PSPTID_EVHANDLERMODE$ + Mr C 20 Apr 22 Added PSPTID_SHOWPANEOPT$, PSPTID_FILEFILTER$ + Mr C 25 Nov 21 Added PSPTID_HMARGINS, PS_PROPTYPE_HMARGINS + Mr C 25 Jun 21 Added PSPCTG_OLE$, PSPCTG_OLEINTEGRATION$ + Mr C 09 Dec 20 Added PS_PROPTYPE_QBFREADMODE$ + Mr C 20 Oct 20 Added PS_PROPTYPE_WRITEMODE$ + Mr C 16 Oct 20 Removed Glass-related properties + Mr C 14 Jan 20 Added PS_PROPTYPE_HSVIPVERSION$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_PROPERTY_TYPEINFO_EQUATES_ +#define _PS_PROPERTY_TYPEINFO_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function RTI_MAKELONG + $insert ps_PropertyGrid_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Raw PS REFLECTPROPERTIES equates - same structure for GETPROPERTIES + // method + + equ PS_PROPPOS_ID$ to 1 + equ PS_PROPPOS_DISPLAYNAME$ to 2 + equ PS_PROPPOS_TYPE$ to 3 + equ PS_PROPPOS_FLAGS$ to 4 + equ PS_PROPPOS_CATEGORY$ to 5 + equ PS_PROPPOS_STYLEBIT$ to 6 + equ PS_PROPPOS_DESCRIPTION$ to 7 + + equ PS_PROPPOS_FIRST$ to PS_PROPPOS_ID$ + equ PS_PROPPOS_LAST$ to PS_PROPPOS_DESCRIPTION$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Property flags + + equ PSPF_RUNGET$ to 0x00000001; + equ PSPF_RUNSET$ to 0x00000002; + equ PSPF_DEVGET$ to 0x00000004; + equ PSPF_DEVSET$ to 0x00000008; + equ PSPF_SYNTHETIC$ to 0x00000010; // Properties implemented in Basic+ + equ PSPF_INDEX1D$ to 0x00000020; // Property supports single indexes + equ PSPF_INDEX2D$ to 0x00000040; // Property supports 2D (col/row) indexes + equ PSPF_INVBIT$ to 0x00000080; // Invert the style bit when applying (e.g ENABLED prop == WS_DISABLED style) + equ PSPF_STYLE$ to 0x00000100; // Property is implemented in GWL_STYLE + equ PSPF_EXSTYLE$ to 0x00000200; // Property is implemented in GWL_EXSTYLE + equ PSPF_PSSTYLE$ to 0x00000400; // Property is implemented in PS_STYLE + equ PSPF_PSEXSTYLE$ to 0x00000800; // Property is implemented in PS_EXSTYLE + equ PSPF_APPLYDEV$ to 0x00001000; // Apply the style in design mode + equ PSPF_IMAGEAPI$ to 0x00002000; // Property uses the Image API PS_PROPPOS_STYLEBIT$ == Image API flags ) + equ PSPF_PSOBJECT$ to 0x00004000; // Property is implemented as actual PS object (e.g. ".IMAGE", ".GLYPH", etc) + equ PSPF_NOSHARE$ to 0x00008000; // Property cannot be group edited + equ PSPF_USECOMMON$ to 0x00010000; // Property is implemented in the Window common. + + equ PSPF_RUNGETSET$ to ( PSPF_RUNGET$ + PSPF_RUNSET$ ); + equ PSPF_DEVGETSET$ to ( PSPF_DEVGET$ + PSPF_DEVSET$ ); + equ PSPF_DEVRUNGET$ to ( PSPF_RUNGET$ + PSPF_DEVGET$ ); + equ PSPF_DEVALLRUNGET$ to ( PSPF_RUNGET$ + PSPF_DEVGETSET$ ); + equ PSPF_ALL$ to ( PSPF_RUNGETSET$ + PSPF_DEVGETSET$ ); + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Property categories + + equ PSPCTG_ADVANCED$ to "Advanced" + equ PSPCTG_APPEARANCE$ to "Appearance" + equ PSPCTG_BEHAVIOR$ to "Behavior" + equ PSPCTG_BORDER$ to "Border" + equ PSPCTG_BTREE$ to "BTree" + equ PSPCTG_XREF$ to "Cross Reference" + equ PSPCTG_DATA$ to "Data" + equ PSPCTG_DATABINDING$ to "DataBinding" + equ PSPCTG_DATABINDINGOPT$ to "DataBinding Options" + equ PSPCTG_DATASET$ to "DataSet" + equ PSPCTG_DESIGN$ to "Design" + equ PSPCTG_GLYPH$ to "Glyph" + equ PSPCTG_IMAGE$ to "Image" + equ PSPCTG_IMAGELIST$ to "Image List" + equ PSPCTG_LAYOUT$ to "Layout" + equ PSPCTG_MISC$ to "Misc" + equ PSPCTG_QBF$ to "QBF (Query-By-Form)" + equ PSPCTG_OLE$ to "OLE Properties" + equ PSPCTG_OLEINTEGRATION$ to "OLE Integration" + equ PSPCTG_REPOSITORY$ to "Repository" + equ PSPCTG_RELATIONAL$ to "Relational" + equ PSPCTG_SPLITGLYPH$ to "Split-Glyph" + equ PSPCTG_VALIDATION$ to "Validation" + equ PSPCTG_FORMSTYLE$ to "Form Style" + equ PSPCTG_ACCEL$ to "Accelerator Key" ; * 02-11-17 rjc + equ PSPCTG_RETBEHAVIOR$ to "Return Behavior" + equ PSPCTG_WEBVIEW$ to "WebView" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Property type IDs + + equ PSPTID_STRING$ to 0 + equ PSPTID_INT$ to 1 + equ PSPTID_UINT$ to 2 + equ PSPTID_FLOAT$ to 3 + equ PSPTID_BOOL$ to 4 + equ PSPTID_COLOR$ to 5 + equ PSPTID_BACKCOLOR$ to 6 + equ PSPTID_FONT$ to 7 + equ PSPTID_FILE$ to 8 + equ PSPTID_ENTITY$ to 9 + equ PSPTID_LIST$ to 10 + equ PSPTID_ARRAY$ to 11 + equ PSPTID_OBJECT$ to 12 + equ PSPTID_SIZE$ to 13 + equ PSPTID_XYPOS$ to 14 + equ PSPTID_DIR$ to 15 + equ PSPTID_HEXSTR$ to 16 + equ PSPTID_WH$ to 17 + equ PSPTID_HANDLE$ to 18 + equ PSPTID_TEXTSEL$ to 19 + equ PSPTID_IMGSTYLE$ to 20 + equ PSPTID_IMGALIGN$ to 21 + equ PSPTID_COLORKEY$ to 22 + equ PSPTID_FORMBORDERSTYLE$ to 23 + equ PSPTID_FRAMESTYLE$ to PSPTID_FORMBORDERSTYLE$ ; // Synonym + equ PSPTID_MAXIMIZESIZE$ to 24 + equ PSPTID_SHOWEFFECT$ to 25 + equ PSPTID_INITPOS$ to 26 + equ PSPTID_MARGINS$ to 27 + equ PSPTID_GRADSTYLE$ to 28 + equ PSPTID_TABSTOPS$ to 29 + equ PSPTID_AUTOCOMPSRC$ to 30 + equ PSPTID_AUTOCOMPMODE$ to 31 + equ PSPTID_PWCHAR$ to 32 + equ PSPTID_TEXTALIGN$ to 33 + equ PSPTID_TEXTCASE$ to 34 + equ PSPTID_SCROLLPOS$ to 35 + equ PSPTID_CALALIGN$ to 36 + equ PSPTID_DTFORMAT$ to 37 + equ PSPTID_DATETIME$ to 38 + equ PSPTID_IMAGEFILE$ to 39 + equ PSPTID_TIMEZONE$ to 40 + equ PSPTID_MINMAXWIDTH$ to 41 + equ PSPTID_EDGES$ to 42 + equ PSPTID_CORNERS$ to 43 + equ PSPTID_RANGE$ to 44 + equ PSPTID_PBSTATE$ to 45 + equ PSPTID_TPBSTATE$ to 46 + equ PSPTID_TPBVALUE$ to 47 + equ PSPTID_TVLIMIT$ to 48 + equ PSPTID_TVLINES$ to 49 + equ PSPTID_TVSCROLL$ to 50 + equ PSPTID_SPLITBUTTON$ to 51 + equ PSPTID_GLYPHLAYOUT$ to 52 + equ PSPTID_DRAWTEXT$ to 53 + equ PSPTID_HV$ to 54 + equ PSPTID_CURSOR$ to 55 + equ PSPTID_EDITMASK$ to 56 + equ PSPTID_CHECK$ to 57 + equ PSPTID_AUTOLAYOUT$ to 58 + equ PSPTID_CELLPOS$ to 59 + equ PSPTID_TABSTYLE$ to 60 + equ PSPTID_TABALIGN$ to 61 + equ PSPTID_IMAGEFILELIST$ to 62 + equ PSPTID_IMAGELIST$ to 63 + equ PSPTID_COMBOSTYLE$ to 64 + equ PSPTID_PROPERTY$ to 65 + equ PSPTID_TRACKSIZE$ to 66 + equ PSPTID_BANDMAXIMIZE$ to 67 + equ PSPTID_REBARBANDS$ to 68 + equ PSPTID_TABS$ to 69 + equ PSPTID_REBARGRIPPER$ to 70 + equ PSPTID_ENTITYLIST$ to 71 + equ PSPTID_EDITENABLED$ to 72 + equ PSPTID_TIMER$ to 73 + equ PSPTID_SCALEFACTOR$ to 74 + equ PSPTID_SCROLLBARS$ to 75 + equ PSPTID_SCALEUINTS$ to 76 + equ PSPTID_KEYCHAR$ to 77 + equ PSPTID_ITEMSTYLES$ to 78 + equ PSPTID_HTEXTALIGN$ to 79 + equ PSPTID_EDGESTYLE$ to 80 + equ PSPTID_BUTTONS$ to 81 + equ PSPTID_IMAGE$ to 82 + equ PSPTID_WINVISIBLE$ to 83 + equ PSPTID_CONTEXTMENU$ to 84 + equ PSPTID_MENU$ to 85 + equ PSPTID_TREEBUTTONS$ to 86 + equ PSPTID_ITEMS$ to 87 + equ PSPTID_BORDERAPI$ to 88 + equ PSPTID_BEVELAPI$ to 89 + equ PSPTID_BEVELSTYLE$ to 90 + equ PSPTID_LIRENDERSTYLE$ to 91 + equ PSPTID_LISELECTIONSTYLE$ to PSPTID_LIRENDERSTYLE$ ; // Synonym + equ PSPTID_IMGALIGNLR$ to 92 + equ PSPTID_IMGALIGNLRC$ to 93 + equ PSPTID_SCROLLMODE$ to 94 + equ PSPTID_AUTOTRIMOPTS$ to 95 + equ PSPTID_GRIDSTYLE$ to 96 + equ PSPTID_SELECTIONMODE$ to 97 + equ PSPTID_SORTEDCOL$ to 98 + equ PSPTID_RECT$ to 99 + equ PSPTID_FOLDERVIEWMODE$ to 100 + equ PSPTID_FEXSHOWCOLSHDRS$ to 101 + equ PSPTID_EGROWEVENTMODE$ to 102 + equ PSPTID_EGCELLSTYLES$ to 103 + equ PSPTID_EGCELLTYPE$ to 104 + equ PSPTID_EGEDITMODE$ to 105 + equ PSPTID_EGHCELLTYPE$ to 106 + equ PSPTID_EGCOLUMNS$ to 107 + equ PSPTID_LSTEDITOPTIONS$ to 108 + equ PSPTID_SORTCRITERIA$ to 109 + equ PSPTID_EDITFLAGS$ to 110 + equ PSPTID_COLHDRSORTMODE$ to 111 + equ PSPTID_EGCELLSTYLE$ to 112 + equ PSPTID_EGFOCUSSTYLE$ to 113 + equ PSPTID_SIZINGMODE$ to 114 + equ PSPTID_DEFINT$ to 115 + equ PSPTID_TOOLTIP$ to 116 + equ PSPTID_SHOWITEMTOOLTIPS$ to 117 + equ PSPTID_TOOLBARS$ to 118 + equ PSPTID_EGFOCUSWEIGHT$ to 119 + equ PSPTID_PGSWAPRENDERMODE$ to 120 + equ PSPTID_HCLACCESSTYPE$ to 121 + equ PSPTID_HSVIPVERSION$ to 122 + equ PSPTID_HMARGINS$ to 123 + equ PSPTID_SHOWPANEOPT$ to 124 + equ PSPTID_FILEFILTER$ to 125 + equ PSPTID_WBVSETTINGS$ to 126 + equ PSPTID_WBVDPFTBRCFG$ to 127 + equ PSPTID_WBVCOLORSCEHEME$ to 128 + equ PSPTID_EVHANDLERMODE$ to 129 + equ PSPTID_STARTUPMODE$ to 130 + equ PSPTID_DRAGHINTLIST$ to 131 + equ PSPTID_RESIZEMODE$ to 132 + + // Synthetic property types - non-PS + equ PSPTID_IOOPTIONS$ to 200 + equ PSPTID_LOCKMODE$ to 201 + equ PSPTID_LOCKLEVEL$ to 202 + equ PSPTID_TABLE$ to 203 + equ PSPTID_COLUMN$ to 204 + equ PSPTID_OCONV$ to 205 + equ PSPTID_ICONV$ to 206 + equ PSPTID_DEFVALUE$ to 207 + equ PSPTID_TABORDER$ to 208 + equ PSPTID_LOCKCOORD$ to 209 + equ PSPTID_WRITEMODE$ to 210 + equ PSPTID_QBFREADMODE$ to 211 + + // "Callback" property types - non-PS + equ PSPTID_CALLBACK$ to 300 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Property types + + equ PS_PROPTYPE_STRING$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_STRING$ ) + equ PS_PROPTYPE_INT$ to RTI_MAKELONG( PS_PGIT_EDIT$, PSPTID_INT$ ) + equ PS_PROPTYPE_UINT$ to RTI_MAKELONG( PS_PGIT_EDIT$, PSPTID_UINT$ ) + equ PS_PROPTYPE_FLOAT$ to RTI_MAKELONG( PS_PGIT_EDIT$, PSPTID_FLOAT$ ) + equ PS_PROPTYPE_BOOL$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_BOOL$ ) + equ PS_PROPTYPE_COLOR$ to RTI_MAKELONG( PS_PGIT_COLORCOMBO$, PSPTID_COLOR$ ) + equ PS_PROPTYPE_BACKCOLOR$ to RTI_MAKELONG( PS_PGIT_GRADIENTBUTTON$, PSPTID_BACKCOLOR$ ) ; // + equ PS_PROPTYPE_FONT$ to RTI_MAKELONG( PS_PGIT_FONTDLG$, PSPTID_FONT$ ) + equ PS_PROPTYPE_FILE$ to RTI_MAKELONG( PS_PGIT_FILEDLG$, PSPTID_FILE$ ) + equ PS_PROPTYPE_ENTITY$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_ENTITY$ ) + equ PS_PROPTYPE_LIST$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_LIST$ ) + equ PS_PROPTYPE_ARRAY$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_ARRAY$ ) + equ PS_PROPTYPE_OBJECT$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_OBJECT$ ) + equ PS_PROPTYPE_SIZE$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_SIZE$ ) ; // + equ PS_PROPTYPE_XYPOS$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_XYPOS$ ) ; // + equ PS_PROPTYPE_DIR$ to RTI_MAKELONG( PS_PGIT_FOLDERDLG$, PSPTID_DIR$ ) + equ PS_PROPTYPE_HEXSTR$ to RTI_MAKELONG( PS_PGIT_EDIT$, PSPTID_HEXSTR$ ) + equ PS_PROPTYPE_WH$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_WH$ ) ; // + equ PS_PROPTYPE_HANDLE$ to RTI_MAKELONG( PS_PGIT_STATIC$, PSPTID_HANDLE$ ) + equ PS_PROPTYPE_TEXTSEL$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_TEXTSEL$ ) ; // + equ PS_PROPTYPE_IMGSTYLE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_IMGSTYLE$ ) + equ PS_PROPTYPE_IMGALIGN$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_IMGALIGN$ ) + equ PS_PROPTYPE_COLORKEY$ to RTI_MAKELONG( PS_PGIT_COLORCOMBO$, PSPTID_COLORKEY$ ) + equ PS_PROPTYPE_FORMBORDERSTYLE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_FORMBORDERSTYLE$ ) + equ PS_PROPTYPE_FRAMESTYLE$ to PS_PROPTYPE_FORMBORDERSTYLE$ ; // Synonym + equ PS_PROPTYPE_MAXIMIZESIZE$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_MAXIMIZESIZE$ ) + equ PS_PROPTYPE_SHOWEFFECT$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_SHOWEFFECT$ ) + equ PS_PROPTYPE_INITPOS$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_INITPOS$ ) + equ PS_PROPTYPE_MARGINS$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_MARGINS$ ) + equ PS_PROPTYPE_GRADSTYLE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_GRADSTYLE$ ) + equ PS_PROPTYPE_TABSTOPS$ to RTI_MAKELONG( PS_PGIT_EDIT$, PSPTID_TABSTOPS$ ) + equ PS_PROPTYPE_AUTOCOMPSRC$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_AUTOCOMPSRC$ ) + equ PS_PROPTYPE_AUTOCOMPMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_AUTOCOMPMODE$ ) + equ PS_PROPTYPE_PWCHAR$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_PWCHAR$ ) + equ PS_PROPTYPE_TEXTALIGN$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_TEXTALIGN$ ) ; // L,R,C + equ PS_PROPTYPE_TEXTCASE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_TEXTCASE$ ) + equ PS_PROPTYPE_SCROLLPOS$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_SCROLLPOS$ ) + equ PS_PROPTYPE_CALALIGN$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_CALALIGN$ ) ; // L,R + equ PS_PROPTYPE_DTFORMAT$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_DTFORMAT$ ) ; // DL,DS,T,Cust + equ PS_PROPTYPE_DATETIME$ to RTI_MAKELONG( PS_PGIT_DATETIME$, PSPTID_DATETIME$ ) + equ PS_PROPTYPE_IMAGEFILE$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_IMAGEFILE$ ) + equ PS_PROPTYPE_TIMEZONE$ to RTI_MAKELONG( PS_PGIT_STATIC$, PSPTID_TIMEZONE$ ) + equ PS_PROPTYPE_MINMAXWIDTH$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_MINMAXWIDTH$ ) ; // + equ PS_PROPTYPE_EDGES$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_EDGES$ ) ; // L,T,R,B + equ PS_PROPTYPE_CORNERS$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_CORNERS$ ) ; // TL,TR, BL, BR + equ PS_PROPTYPE_RANGE$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_RANGE$ ) ; // From,To (integers) + equ PS_PROPTYPE_PBSTATE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_PBSTATE$ ) ; // 1, 2, or 3 - Progress Bar + equ PS_PROPTYPE_TBPSTATE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_TPBSTATE$ ) ; // 1, 2, or 3 - Progress Bar + equ PS_PROPTYPE_TBPVALUE$ to RTI_MAKELONG( PS_PGIT_STATIC$, PSPTID_TPBVALUE$ ) ; // Current,Max + equ PS_PROPTYPE_TVLIMIT$ to RTI_MAKELONG( PS_PGIT_STATIC$ PSPTID_TVLIMIT$ ) ; // Count, VisCount + equ PS_PROPTYPE_TVLINES$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_TVLINES$ ) ; // 0,1,2 = to (None,Show,ShowAll) + equ PS_PROPTYPE_TVSCROLL$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_TVSCROLL$ ) ; // 0,1,2 = to (All,Vert,None) + equ PS_PROPTYPE_SPLITBUTTON$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_SPLITBUTTON$ ) ; // null,L,R + equ PS_PROPTYPE_GLYPHLAYOUT$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_GLYPHLAYOUT$ ) ; // 0,1,2,3,4 = to (Left,Top,Right,Bottom,Centered) + equ PS_PROPTYPE_DRAWTEXT$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_DRAWTEXT$ ) ; // bDraw,TextX,TextY + equ PS_PROPTYPE_HV$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_HV$ ) ; // + equ PS_PROPTYPE_CURSOR$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_CURSOR$ ) ; // Filename or shorthand char + equ PS_PROPTYPE_EDITMASK$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_EDITMASK$ ) ; // Mask,Template,Char + equ PS_PROPTYPE_CHECK$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_CHECK$ ) ; // (0,1,2) None, Set, Indeterminate + equ PS_PROPTYPE_AUTOLAYOUT$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_AUTOLAYOUT$ ) ; // (0-4) None, Vert, Horz, VertFlow, HorzFlow + equ PS_PROPTYPE_CELLPOS$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_CELLPOS$ ) ; // + equ PS_PROPTYPE_TABSTYLE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_TABSTYLE$ ) ; // (0,1,2) Tabs, Buttons, FlatButtons + equ PS_PROPTYPE_TABALIGN$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_TABALIGN$ ) ; // 0,1,2,3 == (T,L,R,B) + equ PS_PROPTYPE_IMAGEFILELIST$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_IMAGEFILELIST$ ) ; // + equ PS_PROPTYPE_IMAGELIST$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_IMAGELIST$ ) ; // File,Count,ColorKey + equ PS_PROPTYPE_COMBOSTYLE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_COMBOSTYLE$ ) ; // 1,2,3 == Simple,Dropdown,.DropdownList + equ PS_PROPTYPE_PROPERTY$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_PROPERTY$ ) ; // Category,name,type,options + equ PS_PROPTYPE_TRACKSIZE$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_TRACKSIZE$ ) ; // + equ PS_PROPTYPE_BANDMAXIMIZE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_BANDMAXIMIZE$ ) ; // 0,1,2 == None,Click,DblClk + equ PS_PROPTYPE_REBARBANDS$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_REBARBANDS$ ) ; // FormDes Hook property for Band editor + equ PS_PROPTYPE_TABS$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_TABS$ ) ; // FormDes Hook property for Tabs editor + equ PS_PROPTYPE_REBARGRIPPER$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_REBARGRIPPER$ ) ; // 0,1,2 == Default,ShowAlways,HideAlways + equ PS_PROPTYPE_ENTITYLIST$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_ENTITYLIST$ ) + equ PS_PROPTYPE_EDITENABLED$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_EDITENABLED$ ) ; // -1,0,1 == Hard Disabled, Disabled, Enabled + equ PS_PROPTYPE_TIMER$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_TIMER$ ) ; // + equ PS_PROPTYPE_SCALEFACTOR$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_SCALEFACTOR$ ) ; // + equ PS_PROPTYPE_SCROLLBARS$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_SCROLLBARS$ ) ; // + equ PS_PROPTYPE_SCALEUINTS$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_SCALEUINTS$ ) ; // + equ PS_PROPTYPE_KEYCHAR$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_KEYCHAR$ ) ; // + equ PS_PROPTYPE_ITEMSTYLES$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_ITEMSTYLES$ ) ; // FormDes Hook property for ItemStyles Editor + equ PS_PROPTYPE_HTEXTALIGN$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_HTEXTALIGN$ ) ; // 0,1,2 - Left, Center, Right + equ PS_PROPTYPE_EDGESTYLE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_EDGESTYLE$ ) ; // 0,1,2 - None,Single,Sunken + equ PS_PROPTYPE_BUTTONS$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_BUTTONS$ ) ; // FormDes Hook property for Buttons editor + equ PS_PROPTYPE_IMAGE$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_IMAGE$ ) ; // FormDes Hook property for Image editor + equ PS_PROPTYPE_WINVISIBLE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_WINVISIBLE$ ) ; // 0,1,2,3 -> Hidden, Normal, Minimized, Maximized + equ PS_PROPTYPE_CONTEXTMENU$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_CONTEXTMENU$ ) ; // FormDes Hook property for Context Menu Editor/Selection dialog + equ PS_PROPTYPE_MENU$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_MENU$ ) ; // FormDes Hook property for Window Menu Editor + equ PS_PROPTYPE_TREEBUTTONS$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_TREEBUTTONS$ ) ; // 0,1,2 - Hidden, Standard, Arrows + equ PS_PROPTYPE_ITEMS$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_ITEMS$ ) ; // FormDes Hook property for Items Editor + equ PS_PROPTYPE_BORDERAPI$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_BORDERAPI$ ) ; // FormDes Hook property for Border Editor + equ PS_PROPTYPE_BEVELAPI$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_BEVELAPI$ ) ; // FormDes Hook property for Bevel Editor + equ PS_PROPTYPE_BEVELSTYLE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_BEVELSTYLE$ ) ; // 0,1,2,3,4 - None,Sunken,Raised,Etched,Ridged + equ PS_PROPTYPE_LIRENDERSTYLE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_LIRENDERSTYLE$ ) ; // 0,1,2 - Auto,ListBox,TreeView + equ PS_PROPTYPE_IMGALIGNLR$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_IMGALIGNLR$ ) ; // 0,2 - Left, Right + equ PS_PROPTYPE_IMGALIGNLRC$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_IMGALIGNLRC$ ) ; // 0,1,2 - Left, Center, Right + equ PS_PROPTYPE_SCROLLMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_SCROLLMODE$ ) ; // 0,1,2 - None, Paging, Panning + equ PS_PROPTYPE_AUTOTRIMOPTS$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_AUTOTRIMOPTS$ ) ; // FormDes Hook property for the Auto-trim options editor ) + equ PS_PROPTYPE_GRIDSTYLE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_GRIDSTYLE$ ) ; // 0,1,2,3 - None,Horz,Vert,Both + equ PS_PROPTYPE_SELECTIONMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_SELECTIONMODE$ ) ; // 0,1,2,3 - Disabled,Single,SingleToggle,Multiple + equ PS_PROPTYPE_SORTEDCOL$ to RTI_MAKELONG( PS_PGIT_STATIC$, PSPTID_SORTEDCOL$ ) ; // + equ PS_PROPTYPE_RECT$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_RECT$ ) ; // + equ PS_PROPTYPE_FOLDERVIEWMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_FOLDERVIEWMODE$ ) ; // Auto,Icon,SmallIcon,List,Details,ThumbNail,Tile,ThumbStrip,Content + equ PS_PROPTYPE_FEXSHOWCOLSHDRS$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_FEXSHOWCOLSHDRS$) ; // None,DetailViewOnly,Always + equ PS_PROPTYPE_EGROWEVENTMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_EGROWEVENTMODE$ ) ; // PreHandler,PostHandler + equ PS_PROPTYPE_EGCELLSTYLES$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_EGCELLSTYLES$ ) ; // FormDes Hook property for CellStyles editor dialog + equ PS_PROPTYPE_EGCELLTYPE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_EGCELLTYPE$ ) ; // 0,1,2,3,4 - Default,CheckBox,Button,DropDown,DropDownEdit + equ PS_PROPTYPE_EGEDITMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_EGEDITMODE$ ) ; // 0,1,2,3 - Disabled,Protected,ReadOnly,Enabled + equ PS_PROPTYPE_EGHCELLTYPE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_EGHCELLTYPE$ ) ; // 0,1 - Default,CheckBox + equ PS_PROPTYPE_EGCOLUMNS$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_EGCOLUMNS$ ) ; // FormDes Hook property for Columns editor dialog + equ PS_PROPTYPE_LSTEDITOPTIONS$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_LSTEDITOPTIONS$ ) ; // FormDes Hook property for editor options dialog + equ PS_PROPTYPE_SORTCRITERIA$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_SORTCRITERIA$ ) ; // AMV group of sorting criteria + equ PS_PROPTYPE_EDITFLAGS$ to RTI_MAKELONG( PS_PGIT_STATIC$, PSPTID_EDITFLAGS$ ) ; // @fm'd list of available edit options + equ PS_PROPTYPE_COLHDRSORTMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_COLHDRSORTMODE$ ) ; // Disabled,SingleClick,DoubleClick + equ PS_PROPTYPE_EGCELLSTYLE$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_EGCELLSTYLE$ ) ; // FormDes Hook property for CellStyles editor dialog + equ PS_PROPTYPE_EGFOCUSSTYLE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_EGFOCUSSTYLE$ ) ; // -1,0,1 - Default,Dotted, Solid + equ PS_PROPTYPE_SIZINGMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_SIZINGMODE$ ) ; // 0,1,2 - Default,Always,Never + equ PS_PROPTYPE_DEFINT$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_DEFINT$ ) ; // + equ PS_PROPTYPE_TOOLTIP$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_TOOLTIP$ ) ; // FormDes Hook property for ToolTip editor dialog + equ PS_PROPTYPE_SHOWITEMTOOLTIPS$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_SHOWITEMTOOLTIPS$) ; // 0,1,2 - Disabled, Offset, InPlace + equ PS_PROPTYPE_OPTONLYSTRING$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_STRING$ ) ; // ReadOnly string with a button + equ PS_PROPTYPE_COMBOSTRINGS$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_STRING$ ) ; // ReadOnly string with a dropdown + equ PS_PROPTYPE_TOOLBARS$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_TOOLBARS$ ) ; // FormDes Hook property for the ToolBars editor dialog + equ PS_PROPTYPE_EGFOCUSWEIGHT$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_EGFOCUSWEIGHT$ ) ; // -1,1,2,3 - Default, 1, 2, 3 + equ PS_PROPTYPE_PGSWAPRENDERMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_PGSWAPRENDERMODE$ ) ; // 0,1 - Normal, BackgroundFirst + equ PS_PROPTYPE_HCLACCESSTYPE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_HCLACCESSTYPE$ ) ; // 0,1,3,4 - PreConfig,Direct,Proxy,PreConfigNoAutoProxy + equ PS_PROPTYPE_HSVIPVERSION$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_HSVIPVERSION$ ) ; // 0,1,2 - IP4, IP6, DualStack + equ PS_PROPTYPE_HMARGINS$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_HMARGINS$ ) ; // FormDes Hook property for the Horizontal Margins editor ) + equ PS_PROPTYPE_SHOWPANEOPT$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_SHOWPANEOPT$ ) ; // 0,1,2 - Default,AlwaysShow,AlwaysHide + equ PS_PROPTYPE_FILEFILTER$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_FILEFILTER$ ) ; // FormDes Hook property for the File Filter editor ) + equ PS_PROPTYPE_WBVSETTINGS$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_WBVSETTINGS$ ) ; // FormDes Hook property for the WebView Settings editor ) + equ PS_PROPTYPE_WBVDPFTBRCFG$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_WBVDPFTBRCFG$ ) ; // FormDes Hook property for the WebView PDFToolbarSettings editor ) + equ PS_PROPTYPE_WBVCOLORSCHEME$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_WBVCOLORSCEHEME$ ) ; // 0,1,2 - Auto,Light,Dark + equ PS_PROPTYPE_EVHANDLERMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_EVHANDLERMODE$ ) ; // 0,1 - Default, Custom + equ PS_PROPTYPE_STARTUPMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_STARTUPMODE$ ) ; // 0,1 - Automatic, Manual + equ PS_PROPTYPE_DRAGHINTLIST$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_DRAGHINTLIST$ ) ; // FormDes Hook property for the DragSource Hint editor ) + equ PS_PROPTYPE_RESIZEMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_RESIZEMODE$ ) ; // 0,1 - Normal, Enhanced + + // Synthetic property types - non-PS + equ PS_PROPTYPE_IOOPTIONS$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_IOOPTIONS$ ) ; // @fm delimited array of flags + equ PS_PROPTYPE_LOCKMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_LOCKMODE$ ) ; // 0 - Pessimistic, 1 - Optimistic + equ PS_PROPTYPE_LOCKLEVEL$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_LOCKLEVEL$ ) ; // 1-Exclusive, 2-Shared, 3-NoLock + equ PS_PROPTYPE_TABLE$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_TABLE$ ) + equ PS_PROPTYPE_COLUMN$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_COLUMN$ ) + equ PS_PROPTYPE_OCONV$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_OCONV$ ) + equ PS_PROPTYPE_ICONV$ to RTI_MAKELONG( PS_PGIT_EDITBUTTON$, PSPTID_ICONV$ ) + equ PS_PROPTYPE_DEFVALUE$ to RTI_MAKELONG( PS_PGIT_EDITCOMBO$, PSPTID_DEFVALUE$ ) + equ PS_PROPTYPE_TABORDER$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_TABORDER$ ) + equ PS_PROPTYPE_TABLERO$ to RTI_MAKELONG( PS_PGIT_STATIC$, PSPTID_TABLE$ ) + equ PS_PROPTYPE_COLUMNRO$ to RTI_MAKELONG( PS_PGIT_STATIC$, PSPTID_COLUMN$ ) + equ PS_PROPTYPE_LOCKCOORD$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_LOCKCOORD$ ) ; // 0 - Normal, 1 - Use Table Locks + equ PS_PROPTYPE_WRITEMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_WRITEMODE$ ) ; // 0 - Controls Only, 1 - All Columns + equ PS_PROPTYPE_QBFREADMODE$ to RTI_MAKELONG( PS_PGIT_COMBO$, PSPTID_QBFREADMODE$ ) ; // 0 - OnlyQBF, 1 - QBFThenRead, 2-OnlyRead + + // Callback types + equ PS_PROPTYPE_BTN_CALLBACK$ to RTI_MAKELONG( PS_PGIT_BUTTON$, PSPTID_CALLBACK$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // All images/imagelists support the following properties: + // + // AUTOSCALE + // COLORKEY + // FILENAME + // FILENAMES + // FRAMECOUNT + // FRAMEINDEX + // SIZE + // + // Support for other properties is denoted by the following flags: + + equ PSPIF_ALIGN$ to 0x00000001; // Image supports ALIGN property + equ PSPIF_COUNT$ to 0x00000002; // Image supports COUNT property + equ PSPIF_INDEX$ to 0x00000004; // Image supports INDEX property + equ PSPIF_OFFSET$ to 0x00000008; // Image supports OFFSET property + equ PSPIF_ORIGIN$ to 0x00000010; // Image supports ORIGIN property + equ PSPIF_STYLE$ to 0x00000020; // Image supports STYLE property + equ PSPIF_TRANSLUCENCY$ to 0x00000040; // Image supports TRANSLUCENCY property + + equ PSPIF_ALIGNLR$ to 0x00010001; // Image only supports "Left" and "Right" alignment + equ PSPIF_ALIGNLRC$ to 0x00020001; // Image only supports "Left", "Right" and "Center" alignment + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +/* + Ancient History + =============== + + Mr C 24 Jun 19 Added PS_PROPTYPE_HCLACCESSTYPE$ + Mr C 09 May 19 Added PSPCTG_RETBEHAVIOR$ + Mr C 13 Feb 19 Added PS_PROPTYPE_PGSWAPRENDERMODE$ + Mr C 08 May 18 Added PSPTID_LOCKCOORD$ + Mr C 10 Apr 18 Added PS_PROPTYPE_EGFOCUSWEIGHT$ + Mr C 09 Feb 17 Added PSPTID_TOOLBARS$ + Mr C 14 Aug 17 Added PSPCTG_DATABINDINGOPT$ + Mr C 11 Aug 17 Added PS_PROPTYPE_COLUMNRO$ + rjc 11 Feb 17 Added PSPCTG_ACCEL$ + Mr C 07 Feb 17 Added PSPF_USECOMMON$ + Mr C 06 Oct 16 Updated PSPID_OBJECT$ to Button-Only + Mr C 26 Jul 16 Added PS_PROPPOS_DESCRIPTION$ + Mr C 23 Jun 16 Added PS_PROPTYPE_OPTONLYSTRING$ etc + Mr C 30 Dec 15 Added DefInt + Mr C 21 Dec 15 Added SizingMode and some EditTable types + Mr C 17 Nov 15 Added PSPTID_COLHDRSORTMODE$ + Mr C 03 Nov 15 Renamed PSPTID_DEFPROC$ to PSPTID_DEFVALUE$ + Mr C 20 Oct 15 Added PS_PROPTYPE_EDITFLAGS$ + Mr C 20 Sep 15 Corrected PS_PROPTYPE_COLOR$ + Mr C 25 Sep 15 Added PSPTID_LSTEDITOPTIONS$, PSPTID_SORTCRITERIA$ + Mr C 16 Sep 15 Added PSPTID_LISELECTIONSTYLE$ + Mr C 10 Sep 15 Added PSPTID_EGCOLUMNS$ + Mr C 09 Sep 15 Added more EditTable properties + Mr C 08 Sep 15 Added PSPTID_EGROWEVENTMODE$ + Mr C 17 Aug 15 Updated TRACKINGSIZE to none-editable + Mr C 11 Aug 15 Added PSPF_NOSHARE$, PS_PROPPOS_FIRST$, PS_PROPPOS_LAST$ + Mr C 02 Jul 15 Added EditTable types + Mr C 05 May 15 Added FOLDERVIEWMODE, FEXSHOWCOLHDRS + Mr C 16 Apr 15 Added RECT + MTR 01 Apr 15 Added Index types To categories section + Mr C 19 Mar 15 Added AutoTrimOpts, GridStyle, SelectionMode, SortedCol + Mr C 19 Feb 15 Added ScrollMode + Mr C 09 Feb 15 Added PS_PROPTYPE_TABLERO$ + Mr C 03 Feb 15 Changed OBJECT property type to EDITBUTTON + Mr C 16 Jan 15 Added LIRenderStyle + Mr C 14 Jan 15 Added BevelStyle + Mr C 09 Jan 15 Added PSPTID_BORDERAPI$, PSPTID_BEVELAPI$ + Changed PS_PROPTYPE_OCONV$ to EditButton + Mr C 20 Nov 14 Added PS_PROPTYPE_TABORDER$ and PSPTID_TABORDER$ + Mr C 19 Nov 14 Renamed image "NUMBER" properties to "INDEX" + Added PS_PROPTYPE_DEFPROC$ and PSPTID_DEFPROC$ + Mr C 31 Oct 14 Added IMAGE API flags, and PSPF_PSOBJECT flag +*/ diff --git a/SYSPROG/STPROCINS/PS_PUSHBUTTON_EQUATES.txt b/SYSPROG/STPROCINS/PS_PUSHBUTTON_EQUATES.txt new file mode 100644 index 0000000..233c8f7 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_PUSHBUTTON_EQUATES.txt @@ -0,0 +1,149 @@ +compile insert PS_PushButton_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : June 2013 + Purpose : Constants for working with PS PUSHBUTTON object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 30 Dec 15 Added PS_BGS_USEDEFAULT$ + Mr C 13 Dec 15 Updated comments for HOTBACKCOLOR + Removed proprietary notice + Mr C 11 Dec 15 Added msWin_Button_Equates + Mr C 12 Mar 15 Added ALLOWFOCUS +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_PUSHBUTTON_EQUATES_ +#define _PS_PUSHBUTTON_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_Button_Equates + $insert oiWin_Equates + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // BS_FLAT -> FLAT property + // BS_LEFT -> TEXTALIGN property + // BS_RIGHT -> TEXTALIGN property + // BS_CENTER -> TEXTALIGN property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // PS Style equates + equ PSS_PUSHBUTTON_DEFAULT$ to 0x00000001 ; * // DEFAULT property (only for create) + equ PSS_PUSHBUTTON_CANCEL$ to 0x00000002 ; * // CANCEL property (only for create) + equ PSS_PUSHBUTTON_SPLITRIGHT$ to 0x00000010 ; * // SPLITBUTTON property + equ PSS_PUSHBUTTON_SPLITLEFT$ to 0x00000020 ; * // SPLITBUTTON property + equ PSS_PUSHBUTTON_HIDESPLITSEP$ to 0x00000040 ; * // SPLITSEPARATOR property + equ PSS_PUSHBUTTON_CHECKED$ to 0x00000100 ; * // CHECK property + equ PSS_PUSHBUTTON_CHECKLIKE$ to 0x00000200 ; * // CHECKSTYLE property + equ PSS_PUSHBUTTON_DRAWTEXT$ to 0x00000400 ; * // DRAWTEXT property + equ PSS_PUSHBUTTON_SUPPRESSCHKCLICK$ to 0x00000800 ; * // SUPPRESSCHECKEDCLICK property + + equ PSSX_BTN_FOCUSNEVER$ to 0x00000100 ; * // Inverse ALLOWFOCUS property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // SYSREPOSWINS structure overrides + + equ POS_BTN_HOTBACKCOLOR$ to POS_COLOR_1$ ; * // HOTBACKCOLOR property - <0,0,1> only + equ POS_BTN_HOTFORECOLOR$ to POS_COLOR_2$ ; * // HOTFORECOLOR property - <0,0,1> only + equ POS_BTN_HOTFONT$ to POS_LOGFONT_1$ ; * // HOTFONT property + equ POS_BTN_TEXTORIGIN_X$ to POS_SPOT_X$ ; * // TEXTORIGIN property + equ POS_BTN_TEXTORIGIN_Y$ to POS_SPOT_Y$ ; * // TEXTORIGIN property + + equ POS_BTN_SPLITGLYPH$ to POS_GLYPH1$ ; * // SPLITGLYPH property + equ POS_BTN_SPLITGLYPHPROPERTIES$ to POS_GLYPH1PROPERTIES$ ; * // SPLITGLYPHPROPERTIES property + equ POS_BTN_SPLITWIDTH$ to POS_NUMCOLS$ ; * // SPLITWIDTH property + equ POS_BTN_GLYPHCFGINFO$ to POS_ROWLIMIT$ ; * // GLYPHLAYOUT and GLYPHSPACING (@svm'd) + + * // SYSREPOSWINEXES structure overrides + + equ PSPOS_BTN_HOTBACKCOLOR$ to PSPOS_COLOR_1$ ; * // HOTBACKCOLOR property - <0,0,1> only + equ PSPOS_BTN_HOTFORECOLOR$ to PSPOS_COLOR_2$ ; * // HOTFORECOLOR property - <0,0,1> only + equ PSPOS_BTN_HOTFONT$ to PSPOS_LOGFONT_1$ ; * // HOTFONT property + equ PSPOS_BTN_TEXTORIGIN_X$ to PSPOS_SPOT_X$ ; * // TEXTORIGIN property + equ PSPOS_BTN_TEXTORIGIN_Y$ to PSPOS_SPOT_Y$ ; * // TEXTORIGIN property + + equ PSPOS_BTN_SPLITGLYPH$ to PSPOS_GLYPH1$ ; * // SPLITGLYPH property + equ PSPOS_BTN_SPLITGLYPHPROPERTIES$ to PSPOS_GLYPH1PROPERTIES$ ; * // SPLITGLYPHPROPERTIES property + equ PSPOS_BTN_SPLITWIDTH$ to PSPOS_NUMCOLS$ ; * // SPLITWIDTH property + equ PSPOS_BTN_GLYPHCFGINFO$ to PSPOS_ROWLIMIT$ ; * // GLYPHLAYOUT and GLYPHSPACING (@svm'd) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // PSPOS_BTN_GLYPHCFGINFO equates - @svm delimited + + equ PSPOS_BTN_GLYPHTEXTLAYOUT$ to 1; ; * // GLYPHLAYOUT property + equ PSPOS_BTN_GLYPHTEXTSPACING$ to 2; ; * // GLYPHSPACING property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // GLYPHTEXTLAYOUT property values + * // + * // 0 - Left + * // 1 - Top + * // 2 - Right + * // 3 - Bottom + * // 4 - Centered + + equ PS_BGL_LEFT$ to 0 + equ PS_BGL_TOP$ to 1 + equ PS_BGL_RIGHT$ to 2 + equ PS_BGL_BOTTOM$ to 3 + equ PS_BGL_CENTERED$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // GLYPHTEXTSPACING property values + equ PS_BGS_USEDEFAULT$ to -1 + equ PS_BGS_MINVALUE$ to 0 + equ PS_BGS_MAXVALUE$ to 32767 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // SPLITBUTTON property values + equ PS_BSP_NOTSPLIT$ to "" + equ PS_BSP_LEFT$ to "L" + equ PS_BSP_RIGHT$ to "R" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // SPLITWIDTH property values + equ PS_BSW_USEDEFAULT$ to -1 + equ PS_BSW_MINVALUE$ to 1 + equ PS_BSW_MAXVALUE$ to 32767 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // TEXTORIGIN porperty values + equ PS_BTO_DEVALUE$ to 0 + equ PS_BTO_MINVALUE$ to -32767 + equ PS_BTO_MAXVALUE$ to 32767 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_RADIOGROUP_EQUATES.txt b/SYSPROG/STPROCINS/PS_RADIOGROUP_EQUATES.txt new file mode 100644 index 0000000..3373b19 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_RADIOGROUP_EQUATES.txt @@ -0,0 +1,88 @@ +compile insert ps_RadioGroup_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : June 2013 + Purpose : Constants for working with PS RADIOGROUP object + structures + + + Comments + ======== + + The RadioGroup inherits from Static and so supports all the same properties + except for: + + AUTOELLIPSES + DUMMYCAPTION + WORDWRAP + + + Amended Date Reason + ======= ==== ====== + Mr C 23 Jun 16 Updated PS style bits +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_RADIOGROUP_EQUATES_ +#define _PS_RADIOGROUP_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // PS Style equates + equ PSS_RADIOGROUP_ARRANGE_V$ to 0x00000100 ; * // AUTOLAYOUT property + equ PSS_RADIOGROUP_ARRANGE_H$ to 0x00000200 ; * // AUTOLAYOUT property + equ PSS_RADIOGROUP_ARRANGE_FLOW$ to 0x00000400 ; * // AUTOLAYOUT property + + equ PSS_RADIOGROUP_ARRANGE_VFLOW$ to ( PSS_RADIOGROUP_ARRANGE_V$ + | + PSS_RADIOGROUP_ARRANGE_FLOW$ ) + equ PSS_RADIOGROUP_ARRANGE_HFLOW$ to ( PSS_RADIOGROUP_ARRANGE_H$ + | + PSS_RADIOGROUP_ARRANGE_FLOW$ ) + equ PSS_RADIOGROUP_ARRANGE_MASK$ to ( PSS_RADIOGROUP_ARRANGE_V$ + | + PSS_RADIOGROUP_ARRANGE_H$ + | + PSS_RADIOGROUP_ARRANGE_FLOW$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // OIWIN/OIWINEXE structure overrides for RADIOGROUP + // + // PSPOS_RGP_VALUES$ and PSPOS_RGP_LABELS are an AMV group (they were + // @tm'd in v9, we've stepped them up to @svm in v10 in the interests + // of sanity + + equ POS_RGP_VALUES$ to POS_LIST$ ; * // @svm'd list of Button values + equ POS_RGP_LABELS$ to POS_LABEL$ ; * // @svm'd list of Button labels + equ POS_RGP_DEFAULTVALUE$ to POS_VALUE$ ; * // Default value (VALUE property) + + equ PSPOS_RGP_VALUES$ to PSPOS_LIST$ ; * // @svm'd list of Button values + equ PSPOS_RGP_LABELS$ to PSPOS_LABEL$ ; * // @svm'd list of Button labels + equ PSPOS_RGP_DEFAULTVALUE$ to PSPOS_VALUE$ ; * // Default value (VALUE property) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // AUTOLAYOUT property + + equ PS_RGP_AL_NONE$ to 0 + equ PS_RGP_AL_VERT$ to 1 + equ PS_RGP_AL_HORZ$ to 2 + equ PS_RGP_AL_VERT_FLOW$ to 3 + equ PS_RGP_AL_HORZ_FLOW$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_REBAR_EQUATES.txt b/SYSPROG/STPROCINS/PS_REBAR_EQUATES.txt new file mode 100644 index 0000000..5496d79 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_REBAR_EQUATES.txt @@ -0,0 +1,106 @@ +compile insert PS_Rebar_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS REBAR object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + mtr 12 Dec 2014 Git sucks +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_REBAR_EQUATES_ +#define _PS_REBAR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * $insert ps_Equates + * $insert oiwin_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // CCS_NORESIZE -> AUTODEPTH property (inverted) + // RBS_AUTOSIZE -> n/a + // RBS_FIXEDORDER -> FIXEDORDER property + // RBS_BANDBORDERS -> SHOWBANDBORDERS property + // RBS_VARIABLEHEIGHT -> VARIABLEHEIGHT property + // CCS_VERT -> VERTICAL property + // RBS_VERTICALGRIPPER -> VERTICALGRIPPERS property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + // + equ PSS_REBAR_NOBANDMAXIMIZE$ to 0x00000002 ; * // BANDMAXIMIZE property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINEXES structure overrides + + equ POS_RBR_BANDMAXIMIZE$ to POS_TYPESPECIFIC$ + equ POS_RBR_CHILDCONTROLS$ to POS_TEXT_1$ + equ POS_RBR_BANDS$ to POS_TEXT_2$ + Equ POS_RBR_IMAGELIST$ To POS_IMGLIST_1$ + + equ PSPOS_RBR_BANDMAXIMIZE$ to PSPOS_TYPESPECIFIC$ + equ PSPOS_RBR_CHILDCONTROLS$ to PSPOS_TEXT_1$ + equ PSPOS_RBR_BANDS$ to PSPOS_TEXT_2$ + Equ PSPOS_RBR_IMAGELIST$ To PSPOS_IMGLIST_1$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Band position equates (for use with .BANDS INSERT message) + + equ PSRBRBR_POS_NAME$ to 1 ; * // Required!!! + equ PSRBRBR_POS_WIDTH$ to 2 ; * // px + equ PSRBRBR_POS_HEADERWIDTH$ to 3 ; * // px + equ PSRBRBR_POS_IDEALWIDTH$ to 4 ; * // px + equ PSRBRBR_POS_TEXT$ to 5 + equ PSRBRBR_POS_HIDETEXT$ to 6 ; * // 1/0 + equ PSRBRBR_POS_IMAGE$ to 7 + equ PSRBRBR_POS_IMAGELISTNUMBER$ to 8 + equ PSRBRBR_POS_FIXEDIMAGE$ to 9 ; * // 1/0 + equ PSRBRBR_POS_FORECOLOR$ to 10 + equ PSRBRBR_POS_BACKCOLOR$ to 11 ; * // + equ PSRBRBR_POS_CHILDCONTROL$ to 12 ; * // ID or struct + equ PSRBRBR_POS_CHILDMINSIZE$ to 13 ; * // + equ PSRBRBR_POS_ALIGNTOP$ to 14 ; * // 1/0 + equ PSRBRBR_POS_VARIABLEHEIGHT$ to 15 ; * // 1/0 + equ PSRBRBR_POS_INITIALHIEGHT$ to 16 ; * // px (only if variable height is set) + equ PSRBRBR_POS_MAXHEIGHT$ to 17 ; * // px (only if variable height is set) + equ PSRBRBR_POS_INTEGRALSTEP$ to 18 ; * // px (only if variable height is set) + equ PSRBRBR_POS_SHOWCHILDEDGE$ to 19 ; * // 1/0 + equ PSRBRBR_POS_GRIPPERSTYLE$ to 20 ; * // 0/null, 1 or 2 + equ PSRBRBR_POS_SHOWCHEVRON$ to 21 ; * // 1/0 + equ PSRBRBR_POS_HIDEVERT$ to 22 ; * // 1/0 + equ PSRBRBR_POS_HIDDEN$ to 23 ; * // 1/0 + equ PSRBRBR_POS_BREAK$ to 24 ; * // 1/0 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // GRIPPERSTYLE property + + equ PSRBR_GRS_DEFAULT$ to 0; + equ PSRBR_GRS_SHOWALWAYS$ to 1; + equ PSRBR_GRS_HIDEALWAYS$ to 2; + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_SCROLLBAR_EQUATES.txt b/SYSPROG/STPROCINS/PS_SCROLLBAR_EQUATES.txt new file mode 100644 index 0000000..d43bed6 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_SCROLLBAR_EQUATES.txt @@ -0,0 +1,97 @@ +compile insert PS_ScrollBar_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS SCROLLBAR object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + mtr 12 Dec 2014 Git sucks +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_SCROLLBAR_EQUATES_ +#define _PS_SCROLLBAR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_ScrollBar_Equates + $insert oiWin_Equates + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + // + equ PSS_SCROLLBAR_NOTIFYALL$ to 0x00000100 ; * // NOTIFYALL property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINES structure overrides + equ POS_SB_RANGE$ to POS_SCROLLRANGE$; // <0,0,1> only - SCROLLRANGE property (LOWORD/HIWORD) + equ POS_SB_CHANGE$ to POS_SCROLLCHANGE$; // <0,0,1> only - SCROLLINCREMENT (LOWORD) and SCROLLPAGESIZE properties (HIWORD) + + // SYSREPOSWINEXES structure overrides + + equ PSPOS_SB_RANGE$ to PSPOS_SCROLLRANGE$; // <0,0,1> only - SCROLLRANGE property (LOWORD/HIWORD) + equ PSPOS_SB_CHANGE$ to PSPOS_SCROLLCHANGE$; // <0,0,1> only - SCROLLINCREMENT (LOWORD) and SCROLLPAGESIZE properties (HIWORD) + + * // For both the PSPOS_SCROLLRANGE$ and PSPOS_SCROLLCHANGE$ we only + * // use the first sub-value (the vertical scroll index) - the second + * // sub-value (the horizontal scroll index) is only used in controls that + * // have intrinsic scrollbars such as editboxes and listboxes and so on. + * // + * // All of these sub-values are actually DWORDs: + * // + * // PSPOS_SCROLLRANGE$ : LOWORD -> Range From + * // HIWORD -> Range To + * // + * // PSPOS_SCROLLCHANGE$ : LOWORD -> IncrementChange + * // : HIWORD -> PageChange + * // + * // In terms of scrollbars in v9 we never actually supported a LineChange, + * // we only supported the PageChange (which is actually the 4th field in + * // VPOSITION and HPOSITION properties), so we always ignored the LOWORD. + * // + * // Note that in v9 the FormDes actually hardcoded LineChange to 1 and + * // PageChange to 10 as per this excerpt from CTLSCRL.CPP in the + * // ScrollBar::BuildDef() method: + * // + * // change = MAKELONG(1, 10); //change this hard code later + * // + * // Guess no-one ever got back to that then :) + * // + +/////////////////////////////////////////////////////////////////////////////// + + * // Default values + + equ PS_SB_DFLT_RANGE_FROM$ to 0 + equ PS_SB_DFLT_RANGE_TO$ to 100 + + equ PS_SB_DFLT_INCREMENT$ to 1 + equ PS_SB_DFLT_PAGESIZE$ to 10 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_SPLITBAR_EQUATES.txt b/SYSPROG/STPROCINS/PS_SPLITBAR_EQUATES.txt new file mode 100644 index 0000000..c80bceb --- /dev/null +++ b/SYSPROG/STPROCINS/PS_SPLITBAR_EQUATES.txt @@ -0,0 +1,64 @@ +compile insert PS_SplitBar_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS SPLITBAR object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + mtr 12 Dec 2014 Git sucks +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_SPLITBAR_EQUATES_ +#define _PS_SPLITBAR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Splitbars are derived from the STATIC control so they inherit STATIC + // properties. + + $insert ps_Static_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + // + equ PSS_SPLITBAR_FIXEDPOSITION$ to 0x00000800 ; * // FIXEDPOSITION property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINEXES structure overrides + + equ PSPOS_SPB_LIMITS$ to PSPOS_SCROLLRANGE$; * // <0,0,1> HIGHLIMIT/LOWLIMIT property (WORD/WORD) + +/////////////////////////////////////////////////////////////////////////////// + + * // Default values + + equ PS_SPB_DFLT_LOWLIMIT$ to 0 + equ PS_SPB_DFLT_HIGHLIMIT$ to 0 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_STATIC_EQUATES.txt b/SYSPROG/STPROCINS/PS_STATIC_EQUATES.txt new file mode 100644 index 0000000..0499125 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_STATIC_EQUATES.txt @@ -0,0 +1,108 @@ +compile insert PS_Static_Equates +/* + ** Copyright (C) 2013-2023 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : June 2013 + Purpose : Constants for working with PS STATIC object structures + + + Comments + ======== + + The following controls basically derive from this type so be aware that + extending fields used in this structure doesn't break those: + + HYPERLINK + HTTPCLIENT + HTTPSERVER + SIMPLEPANEL + + Amended Date Reason + ======= ==== ====== + Mr C 13 Apr 23 Updated comments + Mr C 13 Dec 15 Removed proprietary notice + Mr C 07 Dec 15 $insert PS_Equates +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_STATIC_EQUATES_ +#define _PS_STATIC_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +////////////////////////////////////////////////////////////////////////////// + + $insert oiwin_Equates + $insert msWin_Static_Equates + $insert ps_Style_X_Equates + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // We've has to hijack some STATIC style bits due to the fact that they + // internally collide between text justification and etched frames, so you + // can only have one or the other. The PS static supports both at the + // same time. + // + // Hence the followng styles are ignored by the PS: + // + // SS_CENTER + // SS_RIGHT + // SS_ICON + // SS_BLACKRECT + // SS_GRAYRECT + // SS_WHITERECT + // SS_BLACKFRAME + // SS_GRAYFRAME + // SS_WHITEFRAME + // SS_USERITEM + // SS_SIMPLE + // SS_OWNERDRAW + // SS_BITMAP + // SS_ENHMETAFILE + // + // and the following styles have been hijacked: + // + // 0x00000020 == Center justified (this is not defined in WinUser.h) + // SS_REALSIZEIMAGE == Right justified + // SS_CENTERIMAGE == Vertically centered + // SS_RIGHTJUST == Bottom aligned + + equ PS_SS_CENTER$ to 0x00000020; + equ PS_SS_RIGHT$ to SS_REALSIZEIMAGE$ + equ PS_SS_VCENTER$ to SS_CENTERIMAGE$ + equ PS_SS_VBOTTOM$ to SS_RIGHTJUST$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // PS Style equates + equ PSS_STATIC_DUMMYCAPTION$ to 0x00020000 ; * // DUMMYCAPTION property + equ PSS_STATIC_HTMLTEXT$ to PSS_CHILD_HTMLTEXT$ ; * // DRAWHTML property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // SYSREPOSWINS structure overrides + + equ POS_STA_HOTBACKCOLOR$ to POS_COLOR_1$ ; * // HOTBACKCOLOR property - <0,0,1> and <0,0,2> only + equ POS_STA_HOTFORECOLOR$ to POS_COLOR_2$ ; * // HOTFORECOLOR property - <0,0,1> only + equ POS_STA_HOTFONT$ to POS_LOGFONT_1$ ; * // HOTFONT property + equ POS_STA_TEXTORIGIN_X$ to POS_SPOT_X$ ; * // TEXTORIGIN property + equ POS_STA_TEXTORIGIN_Y$ to POS_SPOT_Y$ ; * // TEXTORIGIN property + + * // SYSREPOSWINEXES structure overrides + + equ PSPOS_STA_HOTBACKCOLOR$ to PSPOS_COLOR_1$ ; * // HOTBACKCOLOR property - <0,0,1> and <0,0,2> only + equ PSPOS_STA_HOTFORECOLOR$ to PSPOS_COLOR_2$ ; * // HOTFORECOLOR property - <0,0,1> only + equ PSPOS_STA_HOTFONT$ to PSPOS_LOGFONT_1$ ; * // HOTFONT property + equ PSPOS_STA_TEXTORIGIN_X$ to PSPOS_SPOT_X$ ; * // TEXTORIGIN property + equ PSPOS_STA_TEXTORIGIN_Y$ to PSPOS_SPOT_Y$ ; * // TEXTORIGIN property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_STYLE_EQUATES.txt b/SYSPROG/STPROCINS/PS_STYLE_EQUATES.txt new file mode 100644 index 0000000..e13e1bc --- /dev/null +++ b/SYSPROG/STPROCINS/PS_STYLE_EQUATES.txt @@ -0,0 +1,152 @@ +Compile Insert PS_Style_Equates +/* + ** Copyright (C) 1992 -2023 Revelation Software Inc. All Rights Reserved ** + + Author : ??? + Date : ??? + Purpose : Pre-v10 Constants for working with PS styles + + Comments + ======== + + Consider this insert deprecated for v10 - use the PS__EQUATES and + PS_STYLE_X_EQUATES inserts instead. + + + Amended Date Reason + ======= ==== ====== + Mr C 18 May 23 Added deprecation notice + Mr C 02 Jun 16 Added "$" suffix to constant IDs + Mr C 16 Sep 14 Added header guards +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_STYLE_EQUATES_ +#define _PS_STYLE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +// ----------------------------------------------------------------- +// PSStyle values + +// specific for OT_WINDOW objects +Equ PSS_WIN_CENTERBMP$ To 0x0001 // also used by mdiclient +Equ PSS_WIN_HASBUTTONBAR$ To 0x0010 +Equ PSS_WIN_TILEBMP$ To 0x0020 // also used by mdiclient +Equ PSS_WIN_TABONSCREEN$ To 0x0040 +Equ PSS_WIN_NOHELPTEXT$ To 0x0080 +Equ PSS_WIN_HASMENU$ To 0x0100 // used for client area calculation only +Equ PSS_WIN_AUTOICONARRANGE$ To 0x0200 +Equ PSS_WIN_INDEPENDENT$ To 0x0400 +Equ PSS_WIN_IGNOREACCELCHAR$ To 0x0800 +Equ PSS_DIALOGBOX$ To 0x1000 +Equ PSS_WIN_AUTOSCROLL$ To 0x2000 +Equ PSS_WIN_MULTIINSTANCE$ To 0x4000 +Equ PSS_WIN_BACKGROUNDCOLOR$ To 0x8000 + +// generic for not OT_WINDOWs +Equ PSS_DEFAULTBUTTON$ To 0x0001 +Equ PSS_CANCELBUTTON$ To 0x0002 +Equ PSS_INITIALFOCUS$ To 0x0004 +Equ PSS_TRANSPARENT_BMP$ To 0x0008 + +Equ PSS_NOECHO$ To 0x0010 +Equ PSS_TABOUTEXCEEDED$ To 0x0020 +Equ PSS_DUMMYOBJECT$ To 0x0040 +Equ PSS_BM_AUTOTAB$ To 0x0080 +Equ PSS_AUTOSIZE_X$ To 0x1000 +Equ PSS_AUTOSIZE_Y$ To 0x2000 +Equ PSS_AUTOSIZE_W$ To 0x4000 +Equ PSS_AUTOSIZE_H$ To 0x8000 +Equ PSS_AUTOSIZE$ To PSS_AUTOSIZE_X$ + PSS_AUTOSIZE_Y$ + PSS_AUTOSIZE_W$ + PSS_AUTOSIZE_H$ + +// specific for not OT_WINDOWs +Equ PSS_EB_DISPLAYPOSITION$ To 0x0100 +Equ PSS_EB_AUTOINDENT$ To 0x0200 + +Equ PSS_BM_CLIPONLY$ To 0x0100 +Equ PSS_BM_SOLIDBMP$ To 0x0200 +Equ PSS_BM_DRAWTEXT$ To 0x0400 +Equ PSS_BM_SCALEIMAGE$ To 0x0800 + +Equ PSS_SB_MANUALMOVE$ To 0x0010 // Don't auto move splitbar components when in ghostbar mode +Equ PSS_SB_GHOSTBAR$ To 0x0020 // SplitBars - Draw ghost line +Equ PSS_SB_FIXEDPOSITION$ To 0x0800 // SplitBars - fixed bars, but we share some PSS_BM bits + +Equ PSS_LB_NOSELBMP$ To 0x0080 +Equ PSS_LB_HIERARCHY$ To 0x0100 +Equ PSS_LB_SOLIDBMP$ To 0x0200 // == PSS_BM_SOLIDBMP +Equ PSS_LB_OVERLAPTABS$ To 0x0400 // LotusNotes View alike tabs processing +Equ PSS_LB_VIEWBOX$ To PSS_LB_HIERARCHY$ + PSS_LB_OVERLAPTABS$ + +Equ PSS_GB_NOAFFECTSIBLINGS$ To 0x0100 // to preserve old (OI 2.0) behaviour + +Equ PSS_SB_NOTIFYALL$ To 0x0100 // SCROLLs -- generate events for all messages + +Equ PSS_OLE_IGNOREACCELTRANS$ To 0x0800 // Don't call OLE TranslateAccelerator() + +// ----------------------------------------------------------------- +// PSStyleEx values + +// generic for not OT_WINDOWs +Equ PSSX_DONTPAGE$ To 0x0001 +Equ PSSX_DUMMYCAPTION$ To 0x0002 +Equ PSSX_REJECTFOCUS$ To 0x0004 // Never implemented +Equ PSSX_DESIGNMODE$ To 0x0008 // DESIGNMODE property +Equ PSSX_DOUBLEBUFFER$ To 0x0010 // DOUBLEBUFFER property + +// generic for all (or some) +Equ PSSX_WIN_NOOWNERDRAWMENU$ To 0x0004 // OT_WINDOW only +Equ PSSX_NOREDRAW$ To 0x0080 // Windows doesn't maintain it +Equ PSSX_CREATE_COMPLETE$ To 0x8000 // Window creation complete + +// specific for not OT_WINDOWs +Equ PSSX_LB_ENABLEDROPEXPAND$ To 0x0040 // ENABLEDROPEXPAND property +Equ PSSX_LB_ENTERASDBLCLK$ To 0x0100 +Equ PSSX_LB_DRAWTREE$ To 0x0200 // Not implemented +Equ PSSX_LB_INITCOLLAPSED$ To 0x0400 +Equ PSSX_LB_VCENTER$ To 0x0800 + +Equ PSSX_CB_ENABLELISTDRAG$ To 0x0020 // ENABLEDRAGLIST property +Equ PSSX_CB_ENABLELISTDROP$ To 0x0040 // ENABLEDROPLIST property + +Equ PSSX_DT_ENABLECOLDRAG$ To 0x0020 // ALLOWDRAGCOL property +Equ PSSX_DT_ENABLEROWDRAG$ To 0x0040 // ALLOWDRAGROWS property + +Equ PSSX_BM_ENABLEFILEDRAG$ To 0x0040 // ALLOWDRAGBMPFILE property + +Equ PSSX_ENABLEDRAG$ To 0x1000 // ALLOWDRAG property +Equ PSSX_ENABLEDROP$ To 0x2000 // ALLOWDROP property +Equ PSSX_ENABLEDROPSCROLL$ To 0x4000 // ALLOWDROPSCROLL property + + +// ----------------------------------------------------------------- +// Menu Style values +Equ PSMS_FLOATING$ To 0x1 +Equ PSMS_HIDDEN$ To 0x2 + +// ----------------------------------------------------------------- +// Menu Item Style Values - see also CtlClass.h in formdes +Equ PSIS_AUTOCHECK$ To 0x0001 +Equ PSIS_GROUPBEGIN$ To 0x0002 +Equ PSIS_GROUPEND$ To 0x0004 +Equ PSIS_SKIPMENUEVENT$ To 0x0010 +Equ PSIS_GENERATELOSTFOCUS$ To 0x0020 +Equ PSIS_PASSEVENTTOFRAME$ To 0x0040 +Equ PSIS_COPYSTATE$ To 0x0080 + +Equ PSIS_TOPLEVELITEM$ To 0x0100 +Equ PSIS_SEPARATOR$ To 0x0200 +Equ PSIS_DROPPED$ To 0x0400 +Equ PSIS_TEXTSEPARATOR$ To 0x0800 +Equ PSIS_MDIWINDOWITEM$ To 0x1000 // Item is auto maintained - it's part of the MDI "Window" menu +Equ PSIS_HIDDENPOPUP$ To 0x2000 +Equ PSIS_MDIWINDOWPOPUP$ To 0x4000 +Equ PSIS_POPUP$ To 0x8000 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_STYLE_X_EQUATES.txt b/SYSPROG/STPROCINS/PS_STYLE_X_EQUATES.txt new file mode 100644 index 0000000..6eec726 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_STYLE_X_EQUATES.txt @@ -0,0 +1,64 @@ +compile insert PS_STYLE_X_EQUATES +/* + ** Copyright (C) 2012 -2017 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : January 2013 + Purpose : Constants for working with PS styles + + + Comments + ======== + + This insert supersedes the original PS_STYLE_EQUATES, but has been renamed + to preserve the original ("X" == 10 ;) + + + Amended Date Reason + ======= ==== ====== + Mr C 14 Aug 20 Added PSSX_LISTAUTOFILL$ + Mr C 11 Sep 19 Added PSSX_NEEDSPOSTPARSESTRUCT$ + Mr C 13 Oct 17 Added PSSX_NEEDSPOSTBUILDSTRUCT$ + Mr C 05 May 16 Added PSS_CHILD_ALLPAGES$ + Mr C 24 Jun 16 Added PSSX_INTERNALOBJECT$ + Mr C 19 Dec 15 Removed PSS_CHILD_SOFTDISABLED$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_STYLE_X_EQUATES_ +#define _PS_STYLE_X_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// PS Styles ////////////////////////////////////////////////////////////////// + + * // GLOBAL styles + equ PSS_ALL_NOREDRAW$ to 0x00800000 + + * // PS CHILD styles - applies to child controls + equ PSS_CHILD_AUTOSIZE_X$ to 0x00001000; // Right anchor + equ PSS_CHILD_AUTOSIZE_Y$ to 0x00002000; // Bottom anchor + equ PSS_CHILD_AUTOSIZE_W$ to 0x00004000; + equ PSS_CHILD_AUTOSIZE_H$ to 0x00008000; + equ PSS_CHILD_AUTOSIZE_MASK$ to 0x0000F000; + + equ PSS_CHILD_INITFOCUS$ to 0x00000004; + equ PSS_CHILD_NOECHO$ to 0x00000010; + equ PSS_CHILD_ALLPAGES$ to 0x00010000; + equ PSS_CHILD_HTMLTEXT$ to 0x02000000; // Enable CHTMLTextRender support where available + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// Extended PS styles ///////////////////////////////////////////////////////// + + * // GLOBAL styles + equ PSSX_LISTAUTOFILL$ to 0x00004000; // v10 form compiler + equ PSSX_NEEDSPOSTBUILDSTRUCT$ to 0x01000000; // v10 form compiler + equ PSSX_NEEDSPOSTPARSESTRUCT$ to 0x02000000; // v10 form compiler + equ PSSX_INTERNALOBJECT$ to 0x20000000; + equ PSSX_V10$ to 0x80000000; // v10 form compiler + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_SYSICON_EQUATES.txt b/SYSPROG/STPROCINS/PS_SYSICON_EQUATES.txt new file mode 100644 index 0000000..1ffe468 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_SYSICON_EQUATES.txt @@ -0,0 +1,54 @@ +compile insert ps_SysIcon_Equates +/* + ** Copyright (C) 2014 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : November 2014 + Purpose : Constants for working with PS properties that support system + icons + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_SYSICON_EQUATES_ +#define _PS_SYSICON_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // ICON property and Image API FILENAME(S) property constants + + equ PS_SYSICON_APPLICATION$ to "APPLICATION" + equ PS_SYSICON_ERROR$ to "ERROR" + equ PS_SYSICON_INFORMATION$ to "INFORMATION" + equ PS_SYSICON_QUESTION$ to "QUESTION" + equ PS_SYSICON_SHIELD$ to "SHIELD" + equ PS_SYSICON_WARNING$ to "WARNING" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // SysIcon Repository Keys + + equ PS_REP_SYSICON_APPLICATION$ to @appID<1> : "*IMAGE*ICO*SYSICON_APPLICATION" + equ PS_REP_SYSICON_ERROR$ to @appID<1> : "*IMAGE*ICO*SYSICON_ERROR" + equ PS_REP_SYSICON_INFORMATION$ to @appID<1> : "*IMAGE*ICO*SYSICON_INFORMATION" + equ PS_REP_SYSICON_QUESTION$ to @appID<1> : "*IMAGE*ICO*SYSICON_QUESTION" + equ PS_REP_SYSICON_SHIELD$ to @appID<1> : "*IMAGE*ICO*SYSICON_SHIELD" + equ PS_REP_SYSICON_WARNING$ to @appID<1> : "*IMAGE*ICO*SYSICON_WARNING" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_SYSTEMMONITOR_EQUATES.txt b/SYSPROG/STPROCINS/PS_SYSTEMMONITOR_EQUATES.txt new file mode 100644 index 0000000..b0b1f9f --- /dev/null +++ b/SYSPROG/STPROCINS/PS_SYSTEMMONITOR_EQUATES.txt @@ -0,0 +1,36 @@ +compile insert PS_SystemMonitor_Equates +/* + ** Copyright (C) 2013-2015 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : 06 September 2015 + Purpose : Constants for working with the PS SYSTEMMONITOR object + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_SYSTEMMONITOR_EQUATES_ +#define _PS_SYSTEMMONITOR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // "Special" code to load the system monitor from the saved registry + * // data + equ SW_SYSMON_SHOWFROMSAVED$ to 99 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_SYSTEM_EQUATES.txt b/SYSPROG/STPROCINS/PS_SYSTEM_EQUATES.txt new file mode 100644 index 0000000..059b918 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_SYSTEM_EQUATES.txt @@ -0,0 +1,320 @@ +compile insert ps_System_Equates +/* + ** Copyright (C) 2015-2023 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS SYSTEM object + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 12 May 22 Added VERSION constants + Mr C 28 Jul 22 Added WEBVIEWCONFIG constants + Mr C 07 Oct 21 Added GUITHREADINFO constants + Mr C 01 Feb 21 Added QUEUEEVENTS constants + Mr C 07 Oct 20 Added RUNHELP constants + Mr C 06 Oct 20 Added SYSTEMFONTS constants + Mr C 26 Sep 19 Added LOGINTEMPLATE constants + Mr C 13 May 19 Added CLEANBOOT constants + Mr C 31 Oct 18 Added TEXTRECT constants + Mr C 26 Oct 18 Updated FOCUSSTYLES constants + Mr C 10 Apr 18 Added FOCUSSTYLES constants + Mr C 16 Oct 17 Added DWMCOLORS constants + Mr C 19 Jul 17 Added TIMEZONE constants + Mr C 18 Jul 17 Added RUNMODE constants + Mr C 15 May 17 Added AutoForm + Mr C 24 Apr 17 Removed UseD2D + Mr C 11 Apr 17 Added PS_SYSCI_POS_RUNMODE$ + Mr C 18 May 16 Removed "UseDpiScaling" + Mr C 25 Aug 15 Updated for AppID, DevMode + Mr C 24 Aug 15 Updated for MaxInstances +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_SYSTEM_EQUATES_ +#define _PS_SYSTEM_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CONFIGINFO property equates + // + // <1> AutoExec + // <2> BannerFile + // <3> Caption + // <4> DevMode + // <5> Elevate + // <6> EnginePath + // <7> HideEngine + // <8> HidePS + // <9> MaxInstances + // <10> MinDisplaySecs + // <11> NoSpy + // <12> QueueName + // <13> ServerName + // <14> ShowBanner + // <15> ShowSystemMonitor + // <16> SuppressDpiAware + // <17> TaskBarID + // <18> RunMode + // <19> AutoForm + // <20> CleanBoot + // <21> LoginTemplate + + equ PS_SYSCI_POS_AUTOEXEC$ to 1 + equ PS_SYSCI_POS_BANNERFILE$ to 2 + equ PS_SYSCI_POS_CAPTION$ to 3 + equ PS_SYSCI_POS_DEVMODE$ to 4 + equ PS_SYSCI_POS_ELEVATE$ to 5 + equ PS_SYSCI_POS_ENGINEPATH$ to 6 + equ PS_SYSCI_POS_HIDEENGINE$ to 7 + equ PS_SYSCI_POS_HIDEPS$ to 8 + equ PS_SYSCI_POS_MAXINSTANCES$ to 9 + equ PS_SYSCI_POS_MINDISPLAYSECS$ to 10 + equ PS_SYSCI_POS_NOSPY$ to 11 + equ PS_SYSCI_POS_QUEUENAME$ to 12 + equ PS_SYSCI_POS_SERVERNAME$ to 13 + equ PS_SYSCI_POS_SHOWBANNER$ to 14 + equ PS_SYSCI_POS_SHOWSYSTEMMONITOR$ to 15 + equ PS_SYSCI_POS_SUPPRESSDPIAWARE$ to 16 + equ PS_SYSCI_POS_TASKBARID$ to 17 + equ PS_SYSCI_POS_RUNMODE$ to 18 + equ PS_SYSCI_POS_AUTOFORM$ to 19 + equ PS_SYSCI_POS_CLEANBOOT$ to 20 + equ PS_SYSCI_POS_LOGINTEMPLATE$ to 21 + +////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // DWMCOLORS equates + // + // <1> ColorizationColor + // <2> ColorizationAfterglow + // <3> ColorizationColorBalance + // <4> ColorizationAfterglowBalance + // <5> ColorizationBlurBalance + // <6> AccentColor + + equ PS_DWM_POS_COLORIZATIONCOLOR$ to 1 + equ PS_DWM_POS_COLORIZATIONAFTERGLOW$ to 2 + equ PS_DWM_POS_COLORIZATIONCOLORBALANCE$ to 3 + equ PS_DWM_POS_COLORIZATIONAFTERGLOWBALANCE$ to 4 + equ PS_DWM_POS_COLORIZATIONBLURBALANCE$ to 5 + equ PS_DWM_POS_ACCENTCOLOR$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // RUNMODE equates + equ PS_RUNMODE_NOTSPECIFIED$ to 0 + equ PS_RUNMODE_ANYAPP$ to 1 + equ PS_RUNMODE_SINGLEAPP$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // TIMEZONE equates + // + // <1> Time Zone ID: 0 == TIME_ZONE_ID_UNKNOWN + // 1 == TIME_ZONE_ID_STANDARD + // 2 == TIME_ZONE_ID_DAYLIGHT + // + // <2> Bias (minutes) + // <3> Standard Name + // <4> Standard DateTime + // <5> Standard Bias + // <6> Daylight Name + // <7> Daylight DateTime + // <8> Daylight Bias + + equ PS_TZ_POS_ID$ to 1 + equ PS_TZ_POS_BIAS$ to 2 + equ PS_TZ_POS_STD_NAME$ to 3 + equ PS_TZ_POS_STD_DATETIME$ to 4 + equ PS_TZ_POS_STD_BIAS$ to 5 + equ PS_TZ_POS_DAYLIGHT_NAME$ to 6 + equ PS_TZ_POS_DAYLIGHT_DATETIME$ to 7 + equ PS_TZ_POS_DAYLIGHT_BIAS$ to 8 + + // Timezone ID + equ TIME_ZONE_ID_UNKNOWN$ to 0 + equ TIME_ZONE_ID_STANDARD$ to 1 + equ TIME_ZONE_ID_DAYLIGHT$ to 2 + +////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // FOCUSSTYLES equates + // + // <1> Focus background color (COLORREF) + // <1> Focus text color (COLORREF) + // <2> Grid Cell Focus Rect color (COLORREF) + // <3> Grid Cell Focus Rect Style (Dotted/Solid == 0/1) + // <4> Grid Cell Focus Rect Weight (DIPs, -1 or 1->3) + + equ PS_FS_POS_BKCOLOR$ to 1 + equ PS_FS_POS_FGCOLOR$ to 2 + equ PS_FS_POS_CELLRECTCOLOR$ to 3 + equ PS_FS_POS_CELLRECTSTYLE$ to 4 + equ PS_FS_POS_CELLRECTWEIGHT$ to 5 + + equ PS_FS_CELLRECTSTYLE_DOTTED$ to 0 + equ PS_FS_CELLRECTSTYLE_SOLID$ to 1 + + equ PS_FS_POS_CELLRECTWEIGHT_DFLT$ to -1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // TEXTRECT equates + + // TextParams parameter + // + // <1> Text + // <2> DrawText flags + // <3> MaxWidth + // <4> Font + + equ PS_TP_POS_TEXT$ to 1 + equ PS_TP_POS_DTFLAGS$ to 2 + equ PS_TP_POS_MAXWIDTH$ to 3 + equ PS_TP_POS_FONT$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CLEANBOOT equates + equ PS_CLEANBOOT_NONE$ to 0 + equ PS_CLEANBOOT_WORKSPACE_ONLY$ to 1 + equ PS_CLEANBOOT_WORKSPACE_CFG$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSTEMFONTS equates + equ PS_SYSFONT_POS_CAPTION$ to 1 + equ PS_SYSFONT_POS_SMALLCAPTION$ to 2 + equ PS_SYSFONT_POS_MENU$ to 3 + equ PS_SYSFONT_POS_STATUS$ to 4 + equ PS_SYSFONT_POS_MESSAGE$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // RUNHELP equates + equ PS_RHP_POS_OWNERFORM$ to 1 + equ PS_RHP_POS_HELPCMD$ to 2 + equ PS_RHP_POS_HELPPARAM$ to 3 + equ PS_RHP_POS_HTMLHELP$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // RUNWIN equates + equ PS_RWP_POS_SHOWCMD$ to 1 + equ PS_RWP_POS_CALLBACKPROC$ to 2 + equ PS_RWP_POS_CALLBACKPROCARG$ to 3 + equ PS_RWP_POS_WORKINGDIR$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // QUEUEDEVENTS equates + // + // <0,1> Internal Event ID number + // <0,2> Repository Type + // <0,3> Object ID + // <0,4> Object Type + // <0,5> Event Qualifier + // + // <0,6> Event Arg 1 + // <0,7> Event Arg 2 + // <0,n> Event Arg etc ... + + equ PS_QES_POS_EVENTID$ to 1 + equ PS_QES_POS_REPOSTYPE$ to 2 + equ PS_QES_POS_OBJECTID$ to 3 + equ PS_QES_POS_OBJECTTYPE$ to 4 + equ PS_QES_POS_EVENTQUALIFIER$ to 5 + equ PS_QES_POS_EVENTARGSSTART$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // GUITHREADINFO equates + // + // <1> Flags (see MSWIN_GETGUITHREADEQUATES for details) + // <2> hwndActive + // <3> hwndFocus + // <4> hwndCapture + // <5> hwndMenuOwner + // <6> hwndMoveSize + // <7> hwndCaret + // <8> CaretSize (x,y,w,h, @vm-delimited) + + equ PS_GTI_POS_FLAGS$ to 1 + equ PS_GTI_POS_HWNDACTIVE$ to 2 + equ PS_GTI_POS_HWNDFOCUS$ to 3 + equ PS_GTI_POS_HWNDCAPTURE$ to 4 + equ PS_GTI_POS_HWNDMENUOWNER$ to 5 + equ PS_GTI_POS_HWNDMOVESIZE$ to 6 + equ PS_GTI_POS_HWNDCARET$ to 7 + equ PS_GTI_POS_CARETSIZE$ to 8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // VERSION equates + // + // <1> Windows Version Number in the format: + // + // “.” + // + // <2> Presentation Server Product version in the format: + // + // “.” “.” “.” + // + // <3> Presentation Server File version in the format: + // + // “.” “.” “.” + + equ PS_SYSVER_POS_WINDOWS$ to 1 + equ PS_SYSVER_POS_PRODUCT$ to 2 + equ PS_SYSVER_POS_FILE$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // WEBVIEWCONFIG equates + // + // <1> Default BrowserExeFolder + // <2> Default UserDataFolder + // <3> Default ProfileName + // <4> Default ExtraBrowserArgs + // <5> Default TargetVersion + // <6> Installed WebView2 Evergreen version (Get Only) + + equ PS_WVC_POS_DFLTBROWSEREXEFOLDER$ to 1 + equ PS_WVC_POS_DFLTUSERDATAFOLDER$ to 2 + equ PS_WVC_POS_DFLTPROFILENAME$ to 3 + equ PS_WVC_POS_DFLTEXTRABROWSERARGS$ to 4 + equ PS_WVC_POS_DFLTTARGETVERSION$ to 5 + equ PS_WVC_POS_EVERGREENVERSION$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + + diff --git a/SYSPROG/STPROCINS/PS_TABCONTROL_EQUATES.txt b/SYSPROG/STPROCINS/PS_TABCONTROL_EQUATES.txt new file mode 100644 index 0000000..adb0359 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_TABCONTROL_EQUATES.txt @@ -0,0 +1,199 @@ +compile insert ps_TabControl_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Stable Genius + Date : May 2013 + Purpose : Constants for working with PS TABCONTROL object structures + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 19 Jul 19 Added CloseButton to ItemStyle equates + Mr C 10 Jan 18 Updated for ITEMSTYLE information + Mr C 02 Jul 16 Added per-tab colors and fonts etc. + Mr C 02 Jun 16 Moved per-tab images so PSPOS_GLYPH$ remains in a + standard format for the form compiler. +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_TABCONTROL_EQUATES_ +#define _PS_TABCONTROL_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert oiWin_Equates + $insert ps_Equates + $insert msWin_TabControl_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // TCS_SCROLLOPPOSITE -> SCROLLOPPOSITE property + // TCS_BOTTOM -> TABALIGN property + // TCS_VERTICAL -> TABALIGN property + // TCS_RIGHT -> TABALIGN property + // TCS_FOCUSNEVER -> ALLOWFOCUS property + // TCS_TABS -> TABSTYLE property + // TCS_BUTTONS -> TABSTYLE property + // TCS_FLATBUTTONS -> TABSTYLE property + // TCS_FLATSEPARATORS -> FLATSEPARATORS property + // TCS_FIXEDWIDTH -> FIXEDWIDTH property + // TCS_FORCEICONLEFT -> FIXEDWIDTHICONLEFT property + // TCS_FORCELABELLEFT -> FIXEDWIDTHTEXTLEFT property + // TCS_HOTTRACK -> HOTTRACK property + // TCS_MULTILINE -> MULTILINE property + // TCS_RIGHTJUSTIFY -> USEFULLWIDTH property + // TCS_RAGGEDRIGHT -> RAGGEDRIGHT property + // TCS_MULTISELECT -> MULTISELECT property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS/SYSREPOSWINEXES structure overrides. + + // This is a little more complex due to the changes between v9 and v10. + // + // v9 supported individual images in PSPOS_BITMAP$ in a format like so: + // + // PSPOS_BITMAP$ -> This contains multiple @svm images (1 per tab) + // with a possible "transparent flag" @tm-suffixed to + // the end (This flag meant use the top-left pixel as + // the color key) + // + // <0,0,1> .\bmps\tabMain_General.bmp : @tm : 1 + // <0,0,2> .\bmps\tabMain_Address.bmp + // <0,0,3> .\bmps\tabMain_Contact.bmp : @tm : 1 + // + // and so on. + // + // For v10 this has changed: + // + // 1) PSPOS_BITMAP$/PSPOS_IMAGEPROPERTIES$ now contains the image to use + // as a background image for the entire tab panel (as per normal v10 + // controls) + // + // 2) PSPOS_IMAGELIST1$/PSPOS_IMGLIST_1_PROPS$ support an imagelist to + // use with actual tab images. The per-tab imagelist numbers are + // stored @svm'd in PSPOS_CHARCOUNT$ + // + // 3) We still support per-tab individual images but the properties + // for these have moved to: + // + // PSPOS_TYPESPECIFIC$ - Image file IDs - @svm'd, but @tm'd for + // DPI size + // PSPOS_TEXT_1$ - Image color keys - @svm'd + // PSPOS_TEXT_2$ - Image alpha values - @svm'd + // + // + // 4) PSPOS_TOOLTIP$ is not used - it is replaced by a per-tab tooltip + // field + // + // 5) This means that the following fields (values actually) form + // an @svm'd "AMV group" + // + // PSPOS_LABELS$ (Tab Text) + // PSPOS_LIST$ (Tab Values) + // PSPOS_TYPESPECIFIC$ (Tab Images) + // PSPOS_TEXT_1$ (Tab Image ColorKeys) + // PSPOS_TEXT_2$ (Tab Image Alpha Values) + // PSPOS_CHARCOUNT$ (Tab ImageList Numbers) + // PSPOS_TEXT_3$ (Tab ToolTips) + // PSPOS_TEXT_4$ (Tab Disabled Flags ) + + // v9 equates + equ POS_TAB_V9_IMAGES$ to POS_BITMAP$ ; // @svm/@tm delimited + equ PSPOS_TAB_V9_IMAGESS$ to PSPOS_BITMAP$ ; // @svm/@tm delimited + + // OIWIN structure + // + // (The Labels and values were @tm delimited in v9 - for v10 we've + // upped them to @svm) + + equ POS_TAB_VALUE$ to POS_VALUE$ + equ POS_TAB_PADDING$ to POS_SCROLLRANGE$ ; // <0,0,1> PaddingH; <0,0,2> paddingV + equ POS_TAB_FIXEDSIZE$ to POS_SCROLLCHANGE$ ; // <0,0,1> TabWidth; <0,0,2> TabHeight + equ POS_TAB_MINWIDTH$ to POS_NUMCOLS$ + equ POS_TAB_ITEMSTYLES$ to POS_TEXT_6$ ; // @svm-delimited list of @tm delimited styles - control + + // Tabs AMV + equ POS_TAB_LABELS$ to POS_LABEL$ ; // @svm-delimited + equ POS_TAB_VALUES$ to POS_LIST$ ; // @svm delimited + equ POS_TAB_IMAGES$ to POS_TYPESPECIFIC$ ; // @svm delimited repository IDs + equ POS_TAB_IMAGE_COLORKEYS$ to POS_TEXT_1$ + equ POS_TAB_IMAGE_TRANSLUCENCIES$ to POS_TEXT_2$ ; // @svm delimited (0-100) + equ POS_TAB_IMAGELIST_NOS$ to POS_CHARCOUNT$ ; // @svm delimited list of 1-based imagelist indexes + equ POS_TAB_TOOLTIPS$ to POS_TEXT_3$ ; // @svm-delimited + equ POS_TAB_DISABLEDFLAGS$ to POS_TEXT_4$ ; // @svm-delimited (T/F) + equ POS_TAB_TABITEMSTYLES$ to POS_TEXT_5$ ; // @svm-delimited (@tm/@stm delimited) + + // OIWINEXE structure + equ PSPOS_TAB_VALUE$ to PSPOS_VALUE$ + equ PSPOS_TAB_PADDING$ to PSPOS_SCROLLRANGE$ ; // <0,0,1> PaddingH; <0,0,2> paddingV + equ PSPOS_TAB_FIXEDSIZE$ to PSPOS_SCROLLCHANGE$ ; // <0,0,1> TabWidth; <0,0,2> TabHeight + equ PSPOS_TAB_MINWIDTH$ to PSPOS_NUMCOLS$ + equ PSPOS_TAB_ITEMSTYLES$ to PSPOS_TEXT_6$ ; // @svm-delimited list of @tm-delimited styles + + // Tabs AMV + equ PSPOS_TAB_LABELS$ to PSPOS_LABEL$ ; // @svm-delimited + equ PSPOS_TAB_VALUES$ to PSPOS_LIST$ ; // @svm delimited + equ PSPOS_TAB_IMAGES$ to PSPOS_TYPESPECIFIC$ ; // <0,0,n,1> <=96 DPI; <0,0,n,2> <=120 DPI; <0,0,n,3> <=144 DPI; <0,0,n,4> >144 DPI + equ PSPOS_TAB_IMAGE_COLORKEYS$ to PSPOS_TEXT_1$ ; // @svm delimited + equ PSPOS_TAB_IMAGE_TRANSLUCENCIES$ to PSPOS_TEXT_2$ ; // @svm delimited + equ PSPOS_TAB_IMAGELIST_NOS$ to PSPOS_CHARCOUNT$ ; // @svm delimited list of 1-based imagelist indexes + equ PSPOS_TAB_TOOLTIPS$ to PSPOS_TEXT_3$ ; // @svm-delimited + equ PSPOS_TAB_DISABLEDFLAGS$ to PSPOS_TEXT_4$ ; // @svm-delimited (T/F) + equ PSPOS_TAB_TABITEMSTYLES$ to PSPOS_TEXT_5$ ; // @svm-delimited (@tm/; delimited) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // TABALIGN property equates + equ PS_TCA_TOP$ to 0 + equ PS_TCA_LEFT$ to 1 + equ PS_TCA_RIGHT$ to 2 + equ PS_TCA_BOTTOM$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // ITEM State equates - used with ITEMSTYLE methods + equ TCIS_NORMAL$ to 1 + equ TCIS_HOT$ to 2 + equ TCIS_DISABLED$ to 3 + equ TCIS_SELECTED$ to 4 + equ TCIS_HOTSELECTED$ to 5 + + // ITEMSTYLE structure - used with ITEMSTYLE method + // + // <1> ForeColor + // <2> BackColor From + // <3> BackColor To + // <3> Bold + // <4> Italic + // <6> Underline + // <7> Translucency (0-100) + // <8> CloseButton ForeColor + // <9> CloseButton BackColor + + equ TCIS_POS_FORECOLOR$ to 1 ; * // COLORREF + equ TCIS_POS_BACKCOLOR_FROM$ to 2 ; * // COLORREF + equ TCIS_POS_BACKCOLOR_TO$ to 3 ; * // COLORREF + equ TCIS_POS_BOLD$ to 4 ; * // Boolean + equ TCIS_POS_ITALIC$ to 5 ; * // Boolean + equ TCIS_POS_UNDERLINE$ to 6 ; * // Boolean + equ TCIS_POS_TRANSLUCENCY$ to 7 ; * // UInt (0-100) + equ TCIS_POS_CLOSEBTNFORECOLOR$ to 8 ; * // COLORREF + equ TCIS_POS_CLOSEBTNBACKCOLOR$ to 9 ; * // COLORREF + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_TOOLBAR_EQUATES.txt b/SYSPROG/STPROCINS/PS_TOOLBAR_EQUATES.txt new file mode 100644 index 0000000..d425d45 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_TOOLBAR_EQUATES.txt @@ -0,0 +1,149 @@ +compile insert PS_ToolBar_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS REBAR object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_TOOLBAR_EQUATES_ +#define _PS_TOOLBAR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_ToolBar_Equates + $insert oiWin_Equates + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // TBSTYLE_FLAT -> FLATBUTTONS property + // TBSTYLE_LIST -> LISTBUTTONS property + // TBSTYLE_WRAPABLE -> WRAP property + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,2> + // + // TBSTYLE_EX_HIDECLIPPEDBUTTONS -> HIDECLIPPEDBUTTONS + // TBSTYLE_EX_DRAWDDARROWS -> DROPDOWNARROWS + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + // + equ PSS_REBAR_NOBANDMAXIMIZE$ to 0x00000002 ; * // BANDMAXIMIZE property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + + equ POS_TBR_BUTTONMETRICS$ to POS_TYPESPECIFIC$ + equ POS_TBR_IMGLIST$ to POS_IMGLIST_1$ + equ POS_TBR_IMGLIST_PROPS$ to POS_IMGLIST_1_PROPS$ + equ POS_TBR_HOTIMGLIST$ to POS_IMGLIST_2$ + equ POS_TBR_HOTIMGLIST_PROPS$ to POS_IMGLIST_2_PROPS$ + equ POS_TBR_DISABLEDIMGLIST$ to POS_IMGLIST_3$ + equ POS_TBR_DISABLEDIMGLIST_PROPS$ to POS_IMGLIST_3_PROPS$ + equ POS_TBR_PRESSEDIMGLIST$ to POS_IMGLIST_4$ + equ POS_TBR_PRESSEDIMGLIST_PROPS$ to POS_IMGLIST_4_PROPS$ + + // Buttons AMV + equ POS_TBR_BTNS_ID$ to POS_LIST$ + equ POS_TBR_BTNS_TEXT$ to POS_LABEL$ + equ POS_TBR_BTNS_STYLE$ to POS_COLSTYLES$ + equ POS_TBR_BTNS_STATE$ to POS_TEXT_1$ + equ POS_TBR_BTNS_IMAGELISTINDEX$ to POS_CHARCOUNT$ + equ POS_TBR_BTNS_TOOLTIP$ to POS_TEXT_2$ + equ POS_TBR_BTNS_SEPWIDTH$ to POS_COLWIDE$ + equ POS_TBR_BTNS_IMAGE$ to POS_TEXT_3$ + equ POS_TBR_BTNS_IMAGETRANSLUCENCY$ to POS_TEXT_4$ + + +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINEXES structure overrides + + equ PSPOS_TBR_BUTTONMETRICS$ to PSPOS_TYPESPECIFIC$ + equ PSPOS_TBR_IMGLIST$ to PSPOS_IMGLIST_1$ + equ PSPOS_TBR_IMGLIST_PROPS$ to PSPOS_IMGLIST_1_PROPS$ + equ PSPOS_TBR_HOTIMGLIST$ to PSPOS_IMGLIST_2$ + equ PSPOS_TBR_HOTIMGLIST_PROPS$ to PSPOS_IMGLIST_2_PROPS$ + equ PSPOS_TBR_DISABLEDIMGLIST$ to PSPOS_IMGLIST_3$ + equ PSPOS_TBR_DISABLEDIMGLIST_PROPS$ to PSPOS_IMGLIST_3_PROPS$ + equ PSPOS_TBR_PRESSEDIMGLIST$ to PSPOS_IMGLIST_4$ + equ PSPOS_TBR_PRESSEDIMGLIST_PROPS$ to PSPOS_IMGLIST_4_PROPS$ + + // Buttons AMV + equ PSPOS_TBR_BTNS_ID$ to PSPOS_LIST$ + equ PSPOS_TBR_BTNS_TEXT$ to PSPOS_LABEL$ + equ PSPOS_TBR_BTNS_STYLE$ to PSPOS_COLSTYLES$ + equ PSPOS_TBR_BTNS_STATE$ to PSPOS_TEXT_1$ + equ PSPOS_TBR_BTNS_IMAGELISTINDEX$ to PSPOS_CHARCOUNT$ + equ PSPOS_TBR_BTNS_TOOLTIP$ to PSPOS_TEXT_2$ + equ PSPOS_TBR_BTNS_SEPWIDTH$ to PSPOS_COLWIDE$ + equ PSPOS_TBR_BTNS_IMAGE$ to PSPOS_TEXT_3$ + equ PSPOS_TBR_BTNS_IMAGECOLORKEY$ to PSPOS_TEXT_5$ + equ PSPOS_TBR_BTNS_IMAGECOUNT$ to PSPOS_TEXT_6$ + equ PSPOS_TBR_BTNS_IMAGETRANSLUCENCY$ to PSPOS_TEXT_4$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // "BUTTONMETRICS" field layout + // + // <0,1> ButtonSize + // <0,1,1> Button Width + // <0,1,2> Button Height + // <0,2> Button MinMaxWidth + // <0,2,1> Min Button Width + // <0,2,2> Max Button Height + // <0,3> Button Padding + // <0,3,1> Horz Button Padding + // <0,3,2> Vert Button Padding + // <0,4> Button Spacing + // <0,4,1> Horz Button Spacing + // <0,4,2> Vert Button Spacing + + equ TBR_BTNMETRICS_SIZE$ to 1 + equ TBR_BTNMETRICS_SIZE_WIDTH$ to 1 + equ TBR_BTNMETRICS_SIZE_HEIGHT$ to 2 + + equ TBR_BTNMETRICS_MINMAXWIDTH$ to 2 + equ TBR_BTNMETRICS_MIN_WIDTH$ to 1 + equ TBR_BTNMETRICS_MAX_HEIGHT$ to 2 + + equ TBR_BTNMETRICS_PADDING$ to 3 + equ TBR_BTNMETRICS_PADDING_HORZ$ to 1 + equ TBR_BTNMETRICS_PADDING_VERT$ to 2 + + equ TBR_BTNMETRICS_SPACING$ to 4 + equ TBR_BTNMETRICS_SPACING_HORZ$ to 1 + equ TBR_BTNMETRICS_SPACING_VERT$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_TOOLTIP_EQUATES.txt b/SYSPROG/STPROCINS/PS_TOOLTIP_EQUATES.txt new file mode 100644 index 0000000..88bf9bc --- /dev/null +++ b/SYSPROG/STPROCINS/PS_TOOLTIP_EQUATES.txt @@ -0,0 +1,56 @@ +compile insert ps_ToolTip_Equates +/* + ** Copyright (C) 2016 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : 31 May 2019 + Purpose : Constants for working with PS the PS TOOLTIP property + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_TOOLTIP_EQUATES_ +#define _PS_TOOLTIP_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS TOOLTIP property structure position equates for standard controls + // + // The TOOLTIP property is a dynamic array formatted as: + // + // <1> Text (multiple lines are @tm delimited) + // <2> Maximum width (leave null for default) + // <3> Title + // <4> Icon ("*", "!", "H", or filename) + // <5> Large Icon (1/0) (small (16x16) or large (32x32) ) + // <6> Balloon Style (1/0) + // <7> Centered (1/0) + + equ PS_TOOLTIP_POS_TEXT$ to 1 + equ PS_TOOLTIP_POS_MAXWIDTH$ to 2 + equ PS_TOOLTIP_POS_TITLE$ to 3 + equ PS_TOOLTIP_POS_ICON$ to 4 + equ PS_TOOLTIP_POS_LARGEICON$ to 5 + equ PS_TOOLTIP_POS_BALLOON$ to 6 + equ PS_TOOLTIP_POS_CENTERED$ to 7 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // TOOLTIP property icons + equ PS_TOOLTIP_ICON_INFO$ to "*" + equ PS_TOOLTIP_ICON_WARNING$ to "!" + equ PS_TOOLTIP_ICON_ERROR$ to "H" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_TREELISTBOX_EQUATES.txt b/SYSPROG/STPROCINS/PS_TREELISTBOX_EQUATES.txt new file mode 100644 index 0000000..161e703 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_TREELISTBOX_EQUATES.txt @@ -0,0 +1,91 @@ +compile insert PS_TreeListBox_Equates +/* + ** Copyright (C) 2013-2020 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : Dec 2014 + Purpose : Constants for working with PS TREELISTBOX object structures + + + Comments + ======== + + TREELISTBOX is the v10 name for the v9 heirarichal listbox. It can now + be created as a control in it's own right, rather than as a listbox with + a style setting. Note that it still shares many of it's properties with + with the standard LISTBOX. + + + NOTE: When the v10 PS loads a v9 form containing a LISTBOX with the + PSS_LISTBOX_HIERARCHY$ PS style bit set it actually creates a TREELISTBOX + control (though the type name returns LISTBOX for backwards compatibility) + + Amended Date Reason + ======= ==== ====== + Mr C 06 May 20 Added SELPOSX property equates + djh 16 Mar 16 Added $ to PSS_TREELISTBOX_ARROWBUTTONS + Mr C 14 Dec 15 Added PSSX_TREELISTBOX_ENSUREHIERARCHY$ + Mr C 14 Sep 15 Added more PS styles +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_TREELISTBOX_EQUATES_ +#define _PS_TREELISTBOX_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_ListBox_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + equ PSS_TREELISTBOX_BUTTONS$ to 0x00000020; * // TREEBUTTONS property + equ PSS_TREELISTBOX_ARROWBUTTONS$ to 0x00000040; * // TREEBUTTONS property + equ PSS_TREELISTBOX_HIERARCHY$ to 0x00000100; * // from v9. not needed in v10 + equ PSS_TREELISTBOX_IGNOREBUTTONINDENT$ to 0x00000200; * // BUTTONINDENTALWAYS property (inverse) + equ PSS_TREELISTBOX_SHOWHEADERBUTTONS$ to 0x00000800; * // SHOWHEADERBUTTONS property + equ PSS_TREELISTBOX_INITCOLLAPSED$ to 0x04000000; * // INITCOLLAPSED property + + // PS Extended styles + equ PSSX_TREELISTBOX_ENSUREHIERARCHY$ to 0x00000004; * // ENSUREHIERARCHY property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SELPOSX property + // + // <1> Position of the selected item in the fully expanded list + // <2> Indent of the selected item + // <3> Number of sub-items in the next level + // + // 0 : None + // > 0 : Number of visible (expanded) items + // < 0 : Number of hidden (collapsed) items + // + // <4> Position in visible list (i.e. SELPOS) + // <5> Position of predecessor (immediately preceding "branch") + + equ PS_SLPX_FULLPOS$ to 1 + equ PS_SLPX_INDENT$ to 2 + equ PS_SLPX_CHILDREN$ to 3 + equ PS_SLPX_VISPOS$ to 4 + equ PS_SLPX_PARENTPOS$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // TREEBUTTONS property + equ PSTRBN_HIDDEN$ to 0 + equ PSTRBN_STANDARD$ to 1 + equ PSTRBN_ARROWS$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_TREEVIEW_EQUATES.txt b/SYSPROG/STPROCINS/PS_TREEVIEW_EQUATES.txt new file mode 100644 index 0000000..eae03d1 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_TREEVIEW_EQUATES.txt @@ -0,0 +1,47 @@ +compile insert PS_TreeView_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS TREEVIEW object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_TREEVIEW_EQUATES_ +#define _PS_TREEVIEW_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINEXES structure overrides + + equ PSPOS_TVW_LINECOLOR$ to PSPOS_COLOR_1$ + equ PSPOS_TVW_IMGLIST$ to PSPOS_IMGLIST_1$ + equ PSPOS_TVW_IMGLIST_PROPS$ to PSPOS_IMGLIST_1_PROPS$ + equ PSPOS_TVW_IMGLIST_STATE$ to PSPOS_IMGLIST_2$ + equ PSPOS_TVW_IMGLIST_STATE_PROPS$ to PSPOS_IMGLIST_2_PROPS$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/PS_TYPEINFO_EQUATES.txt b/SYSPROG/STPROCINS/PS_TYPEINFO_EQUATES.txt new file mode 100644 index 0000000..84e271a --- /dev/null +++ b/SYSPROG/STPROCINS/PS_TYPEINFO_EQUATES.txt @@ -0,0 +1,190 @@ +compile insert ps_TypeInfo_Equates +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : September 2012 + Purpose : PS_TYPEINFO constant declaration module + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 21 Oct 22 Added PS_TF_FLAG_DEFPROPLISTSELECT$ + Mr C 17 Sep 22 Added PS_TF_FLAG_FORMDESDBONLY$ + Mr C 02 Jul 21 Added PS_TF_FLAG_NODEFPROPIDXSUPPORT$ + Mr C 29 Mar 21 Added PS_TF_FLAG_DBSYMSOFTDISABLE$ + Mr C 03 May 20 Added PS_TF_FLAG_NOOMNIEVENT$ + Mr C 19 Sep 19 Added PSTI_MI_POS_OLECHECK$ + Mr C 03 Sep 17 Added GETEVENTS method equates + Mr C 14 Aug 17 Added constants for CFG_PS_TYPEINFO_SORT + Mr C 26 Jul 16 Removed FormDes fields - not needed + Added description fields + Mr C 21 Jan 16 Added GETEVENTINFO equates + Mr C 07 Dec 15 Added PS_TF_FLAG_SIBLINGPARENT$ + Mr C 03 Nov 15 Corrected PS_TF_FLAG_DEFVALSUPPORT$ + Mr C 10 Sep 15 Added PS_TF_FLAG_TYPEINFOONLY$ + Added PS_TF_FLAG_HIDEFORMDESDB$ + Mr C 11 Feb 15 Added PSTI_MI_POS_EVENTFLAGS$ + Mr C 19 Nov 14 Added PS_TF_FLAG_DEFVALSUPPORT$ + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_TYPEINFO_EQUATES_ +#define _PS_TYPEINFO_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function ps_TypeInfo + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Meta Info table record - keyed on the TYPECLASS + + equ PSTI_METAINFO_TABLE$ to "PSTI_METAINFO_TABLE" + + equ PSTI_MI_POS_DEFPROPHANDLER$ to 1 ; // PS Property Name or Basic+ Handler + equ PSTI_MI_POS_DBSUPPORT$ to 2 ; // Control supports Data Binding + equ PSTI_MI_POS_MULTICOLUMN$ to 3 ; // Control supports AMVs + equ PSTI_MI_POS_DEFPOSPROPHANDLER$ to 4 ; // PS Property Name or Basic+ Handler + equ PSTI_MI_POS_POSCHANGEDEVENT$ to 5 ; // Name of the OLE event used to trigger + ; // POSCHANGED events + equ PSTI_MI_POS_CLICKEVENT$ to 6 ; // Name of the OLE event used to trigger + ; // CLICK event processing + + equ PSTI_MI_POS_DISPLAYNAME$ to 7 ; // Display name for FormDes + equ PSTI_MI_POS_TYPEFLAGS$ to 8 ; // SysCreate, GUI etc + + equ PSTI_MI_POS_PROPERTIES$ to 10 ; // PS property system names + equ PSTI_MI_POS_PROPERTYNAMES$ to 11 ; // PS property display names + equ PSTI_MI_POS_PROPERTYFLAGS$ to 12 ; // PS property flags (Get/Set etc) + equ PSTI_MI_POS_PROPERTYTYPE$ to 13 ; // PS property types + equ PSTI_MI_POS_PROPERTYCAT$ to 14 ; // PS property categories + equ PSTI_MI_POS_PROPSTYLEBITS$ to 15 ; // PS property style bit(s) + equ PSTI_MI_POS_PROPDESCS$ to 16 ; // Property descriptions + + equ PSTI_MI_POS_EVENTS$ to 20 ; // PS events + equ PSTI_MI_POS_EVENTNAMES$ to 21 ; // PS event display names + equ PSTI_MI_POS_EVENTARGS$ to 22 ; // PS event arg names (@svm'd) + equ PSTI_MI_POS_EVENTARGTYPES$ to 23 ; // PS event arg types (@svm'd) + equ PSTI_MI_POS_EVENTARGFLAGS$ to 24 ; // PS event arg flags (@svm'd) + equ PSTI_MI_POS_EVENTCAT$ to 25 ; // PS event category strings + equ PSTI_MI_POS_EVENTFLAGS$ to 26 ; // PS event flags (custom event etc) + equ PSTI_MI_POS_EVENTDESCS$ to 27 ; // Event descriptions + + equ PSTI_MI_POS_METHODS$ to 30 ; // PS method system name + equ PSTI_MI_POS_METHODNAMES$ to 31 ; // PS method display names + equ PSTI_MI_POS_METHODARGS$ to 32 ; // PS method arg names (@svm'd) + equ PSTI_MI_POS_METHODARGTYPES$ to 33 ; // PS method arg types (@svm'd) + equ PSTI_MI_POS_METHODARGFLAGS$ to 34 ; // PS method arg flags (@svm'd) + equ PSTI_MI_POS_METHODRETVAL$ to 35 ; // PS method return value name + equ PSTI_MI_POS_METHODRETVALTYPES$ to 36 ; // PS method return value type + equ PSTI_MI_POS_METHODRETVALFLAGS$ to 37 ; // PS method return value flags + equ PSTI_MI_POS_METHODDESCS$ to 38 ; // PS method description strings + + equ PSTI_MI_POS_DESCCHECK$ to 40 ; // if TRUE$ then descriptions have been loaded + equ PSTI_MI_POS_OLECHECK$ to 41 ; // if TRUE$ then OLE properties have been sync'd + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSTEM TYPES type structure + // + // <0,1> Type Name + // <0,2> Type Flags + // <0,3> Display Name + // <0,4> DEFPROP property + // <0,5> DEFPOSPROP property + + equ PS_ST_POS_NAME$ to 1 + equ PS_ST_POS_FLAGS$ to 2 + equ PS_ST_POS_DISPNAME$ to 3 + equ PS_ST_POS_DEFPROP_NAME$ to 4 + equ PS_ST_POS_DEFPROPPOS_NAME$ to 5 + + // Type flags - from RevPS_TypeFactory.h + + equ PS_TF_FLAG_SYSCREATE$ to 0x00000001 ; // Only the PS App can create this type + equ PS_TF_FLAG_GUI$ to 0x00000002 ; // Type is a GUI object (i.e. HWND derived) + equ PS_TF_FLAG_FORMDESHIDE$ to 0x00000004 ; // Don't show in FormDes + equ PS_TF_FLAG_MULTICOLUMN$ to 0x00000008 ; // Supports AMV grouping + equ PS_TF_FLAG_DBSUPPORT$ to 0x00000010 ; // Can support data binding + equ PS_TF_FLAG_ICONVSUPPORT$ to 0x00000020 ; // Can support iconv (VALID property) + equ PS_TF_FLAG_OCONVSUPPORT$ to 0x00000040 ; // Can support oconv (CONV property) + equ PS_TF_FLAG_REQSUPPORT$ to 0x00000080 ; // Can support REQUIRED property + equ PS_TF_FLAG_ALLOWFOCUS$ to 0x00000100 ; // Can support GOT/LOSTFOCUS processing + equ PS_TF_FLAG_DATACLICK$ to 0x00000200 ; // CLICK event triggers DB uppdate + equ PS_TF_FLAG_DEFVALSUPPORT$ to 0x00000400 ; // Can support DEFAULTVALUE handler + equ PS_TF_FLAG_TYPEINFOONLY$ to 0x00000800 ; // Object Def is for type-info purposes only + equ PS_TF_FLAG_HIDEFORMDESDB$ to 0x00001000 ; // Hide DB properties from FormDes + equ PS_TF_FLAG_SIBLINGPARENT$ to 0x00002000 ; // Acts as a sibling parent - only allowed a WINDOW as a parent. + equ PS_TF_FLAG_FORMDESCONTAINER$ to 0x00004000 ; // Can be a FormDes container. + equ PS_TF_FLAG_FDPOSTPARSE$ to 0x00008000 ; // Requires post-PARSESTRUCT processing when loaded into the FD + equ PS_TF_FLAG_NOOMNIEVENT$ to 0x00010000 ; // No OMNIEVENT support + equ PS_TF_FLAG_DBSYMSOFTDISABLE$ to 0x00020000 ; // "Soft-disable" controls bound to symbolic columns + equ PS_TF_FLAG_NODEFPROPIDXSUPPORT$ to 0x00040000 ; // No DEFPROP property indexing support + equ PS_TF_FLAG_FORMDESDBONLY$ to 0x00080000 ; // Only show in FormDes DataBound ToolBox + equ PS_TF_FLAG_DEFPROPLISTSELECT$ to 0x00100000 ; // Move @fm <-> @vm for DB DEFPROP Read/Write ops + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // GETEVENTINFO method equates + + equ PSTI_GEI_POS_EVENTNAME$ to 1 ; // PS event display name + equ PSTI_GEI_POS_EVENTARGS$ to 2 ; // PS event arg names (@svm'd) + equ PSTI_GEI_POS_EVENTARGTYPES$ to 3 ; // PS event arg types (@svm'd) + equ PSTI_GEI_POS_EVENTARGFLAGS$ to 4 ; // PS event arg flags (@svm'd) + equ PSTI_GEI_POS_EVENTCAT$ to 5 ; // PS event category string + equ PSTI_GEI_POS_EVENTFLAGS$ to 6 ; // PS event flags (custom event etc) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // GETEVENTS method equates + + equ PSTI_GEV_POS_EVENTID$ to 1 ; // PS event ID + equ PSTI_GEV_POS_EVENTNAME$ to 2 ; // PS event display name + equ PSTI_GEV_POS_EVENTARGS$ to 3 ; // PS event arg names (@svm'd) + equ PSTI_GEV_POS_EVENTARGTYPES$ to 4 ; // PS event arg types (@svm'd) + equ PSTI_GEV_POS_EVENTARGFLAGS$ to 5 ; // PS event arg flags (@svm'd) + equ PSTI_GEV_POS_EVENTCAT$ to 6 ; // PS event category string + equ PSTI_GEV_POS_EVENTFLAGS$ to 7 ; // PS event flags (custom event etc) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // APPNOTE entity prefixes for type description records + + equ PSTI_APPNOTE_PROPERTY_ID$ to @appID<1> : "*APPNOTE**PSTI-P-" + equ PSTI_APPNOTE_EVENT_ID$ to @appID<1> : "*APPNOTE**PSTI-E-" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CFG_PS_TYPEINFO_SORT record layout + // + // <1> @vm delimited list of category names + // <2> @vm delimited list of category weights + // <3> @vm/@svm delimited list of property Names for each category + // <4> @vm/@svm delimited list of property weights for each category + // + // All four fields form an AMV group, which each value in <3> and <4> + // forming an @svm-based AMV. + + equ PSTI_SORTREC_ID$ to "CFG_PS_TYPEINFO_SORT" + equ PSTI_DFLT_SORT_WEIGHT$ to 500 + + equ PSTI_SORTREC_POS_CATNAMES$ to 1 + equ PSTI_SORTREC_POS_CATWEIGHTS$ to 2 + equ PSTI_SORTREC_POS_PROPNAMES$ to 3 + equ PSTI_SORTREC_POS_PROPWEIGHTS$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_UPDOWN_EQUATES.txt b/SYSPROG/STPROCINS/PS_UPDOWN_EQUATES.txt new file mode 100644 index 0000000..8032b89 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_UPDOWN_EQUATES.txt @@ -0,0 +1,90 @@ +compile insert ps_UpDown_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : May 2013 + Purpose : Constants for working with PS UPDOWN object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 07 Jul 15 Added VALUE equates + Mr C 10 Aug 15 Added default values +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_UPDOWN_EQUATES_ +#define _PS_UPDOWN_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_Updown_Equates + $insert oiWin_Equates + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in window style bits in PSPOS_SDKSTYLE$ <0,0,1> + // + // UDS_ALIGNRIGHT -> ALIGN property + // UDS_ALIGNLEFT -> ALIGN property + // UDS_ARROWKEYS -> ARROWKEYS property + // UDS_HORZ -> HORIZONTAL property + // UDS_HOTTRACK -> HOTTRACK property + // UDS_NOTHOUSANDS -> SHOWTHOUSANDS + // UDS_SETBUDDYINT -> AUTOUPDATEBUDDY property + // UDS_WRAP -> WRAP property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + + equ POS_UPD_VALUE$ to POS_VALUE$ + equ POS_UPD_RANGE$ to POS_SCROLLRANGE$ ; * // @svm delimited; <0,0,1> From; <0,0,2> To + equ POS_UPD_INCREMENT$ to POS_SCROLLCHANGE$ ; * // <0,0,1> == INCREMENT property for updown controls; + equ POS_UPD_BUDDY$ to POS_TYPESPECIFIC$ ; * // <0,0,1> == BUDDY id + equ POS_UPD_HEXADECIMAL$ to POS_TEXT_1$ ; * // HEXADECIMAL property + + // SYSREPOSWINEXES structure overrides + + equ PSPOS_UPD_VALUE$ to PSPOS_VALUE$ + equ PSPOS_UPD_RANGE$ to PSPOS_SCROLLRANGE$ ; * // RANGE property for progress bars + equ PSPOS_UPD_INCREMENT$ to PSPOS_SCROLLCHANGE$ ; * // <0,0,1> == INCREMENT property for updown controls; + equ PSPOS_UPD_BUDDY$ to PSPOS_TYPESPECIFIC$ ; * // <0,0,1> == BUDDY id + equ PSPOS_UPD_HEXADECIMAL$ to PSPOS_TEXT_1$ ; * // HEXADECIMAL property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ PS_UPD_DFLT_INCREMENT$ to 1 + equ PS_UPD_DFLT_RANGEFROM$ to 0 + equ PS_UPD_DFLT_RANGETO$ to 100 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Design-time Property Names + equ UPD_PTEXT_ARROWKEYS$ to "ArrowKeys" + equ UPD_PTEXT_AUTOUPDATEBUDDY$ to "AutoUpdateBuddy" + equ UPD_PTEXT_BUDDY$ to "Buddy" + equ UPD_PTEXT_HEXADECIMAL$ to "Hexadecimal" + equ UPD_PTEXT_HORIZONTAL$ to "Horizontal" + equ UPD_PTEXT_HOTTRACK$ to "HotTrack" + equ UPD_PTEXT_INCREMENT$ to "Increment" + equ UPD_PTEXT_RANGE$ to "Range" + equ UPD_PTEXT_SHOWTHOUSANDS$ to "ShowThousands" + equ UPD_PTEXT_VALUE$ to "Value" + equ UPD_PTEXT_WRAP$ to "Wrap" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/PS_VIEW_EQUATES.txt b/SYSPROG/STPROCINS/PS_VIEW_EQUATES.txt new file mode 100644 index 0000000..aa1e416 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_VIEW_EQUATES.txt @@ -0,0 +1,108 @@ +compile insert PS_View_Equates +/* + ** Copyright (C) 2013-2019 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Wile C Coyote (Codius Vulgaris) + Date : June 2013 + Purpose : Constants for working with PS VIEW-based object structures + + + Comments + ======== + + VIEW is not an actual PS type, rather it is a base class from which others + derive like PANEL and WINDOW. It essential provides paging and panning + functionality ... + + + Amended Date Reason + ======= ==== ====== + Mr C 13 Feb 19 Added VIEW Properties structure constants + Added PAGESWAPRENDERMODE equates + Mr C 03 Mar 15 Added SCROLLMODE equates +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_VIEW_EQUATES_ +#define _PS_VIEW_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in PS Style bits in PSPOS_PSSTYLE$ <0,0,1> + + // PS Style equates + equ PSS_VIEW_TABWITHINPAGE$ to 0x00000040 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS/SYSREPOSWINEXES structure overrides. + + // OIWIN + equ POS_VIEW_VIRTUALSIZE$ to POS_SCROLLRANGE$ ; // @svm delimited; <0,0,1> Height; <0,0,2> Width + equ POS_VIEW_PROPERTIES$ to POS_VIEWPROPERTIES$ ; // @svm delimited; <0,0,1> PageSwapRenderMode + + // OIWINEXE + equ PSPOS_VIEW_VIRTUALSIZE$ to PSPOS_SCROLLRANGE$ ; // @svm delimited; <0,0,1> Height; <0,0,2> Width + equ PSPOS_VIEW_PROPERTIES$ to PSPOS_VIEWPROPERTIES$ ; // @svm delimited; <0,0,1> PageSwapRenderMode + + // POS_VIEW_PROPERTIES$/PSPOS_VIEW_PROPERTIES$ struture equates + equ PS_VIEWPROPS_PAGESWAPRENDERMODE$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // OIWIN/OIWINEXE Virtual Size equates + equ PS_VIEW_VIRTUALSIZE_HEIGHT$ to 1 + equ PS_VIEW_VIRTUALSIZE_WIDTH$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Properties held in extended PS style bits in PSPOS_PSSTYLE$ <0,0,2> + + // PS Extended Style equates + equ PSSX_VIEW_SCROLLMODEPAGING$ to 0x00010000 ; * // SCROLLMODE property + equ PSSX_VIEW_SCROLLMODEPANNING$ to 0x00020000 ; * // SCROLLMODE property + + equ PSSX_VIEW_SCROLLMODE_MASK$ to bitOr( PSSX_VIEW_SCROLLMODEPAGING$, PSSX_VIEW_SCROLLMODEPANNING$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SCROLLMODE property + equ PSSM_NONE$ to 0 ; * // No scrolling + equ PSSM_PAGING$ to 1 ; * // Paging - show vScrollBar + equ PSSM_PANNING$ to 2 ; * // Panning - show both scroll + ; * // bars when needed. + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // VIRTUALSIZE property values + equ PS_VVS_DEVALUE$ to 0 + equ PS_VVS_MINVALUE$ to 0 + equ PS_VVS_MAXVALUE$ to 32767 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PAGESWAPRENDERMODE property + equ PS_PSRM_DEFAULT$ to 0 + equ PS_PSRM_BKGD_FIRST$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_WEBVIEW_EQUATES.txt b/SYSPROG/STPROCINS/PS_WEBVIEW_EQUATES.txt new file mode 100644 index 0000000..fdf6bdf --- /dev/null +++ b/SYSPROG/STPROCINS/PS_WEBVIEW_EQUATES.txt @@ -0,0 +1,456 @@ +compile insert ps_WebView_Equates +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : June 2022 + Purpose : Constants for working with PS WEBVIEW object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 06 Sep 22 Changed READYSTATE equates to match enum, not bit-mask! + Mr C 06 Sep 22 Added READYSTATE property equates +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_WEBVIEW_EQUATES_ +#define _PS_WEBVIEW_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Equates + $insert oiwin_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Default minimum version - this was the version the WEBVIEW control was + // developed with. + equ PS_WBV_MIN_TARGETVERSION$ to "103.0.1264.71" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // UserDataFolder - default value if nothing is set in the Application + // properties or the control itself (this is so it doesn't get created + // under RevBoot which is the WebView2 default) + + equ PS_WBV_DEFAULT_UDF$ to "%localappdata%\RevSoft\WBV\@APPID_@USERNAME" + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style Equates + equ PSS_WBV_ACCEPTDROPFILES$ to 0x00000001 + equ PSS_WBV_SYNCSTATUSLINE$ to 0x00000002 + equ PSS_WBV_SYNCTITLE$ to 0x00000008 + equ PSS_WBV_CUSTOMAUTHMODE$ to 0x00000010 + equ PSS_WBV_TRACKHISTORY$ to 0x00000020 + equ PSS_WBV_LOGERRORS$ to 0x00000040 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + equ POS_WBV_CREATESETTINGS$ to POS_TEXT_5$ ; // Environment settings used to create the WebView + equ POS_WBV_PDFTOOLBARSETTINGS$ to POS_TEXT_6$ ; // PDFTOOLBARSETTINGS property + equ POS_WBV_SETTINGS$ to POS_TEXT_4$ ; // SETTINGS property + equ POS_WBV_URI$ to POS_TEXT_1$ ; // URI property + equ POS_WBV_USERAGENT$ to POS_TEXT_2$ ; // USERAGENT property + equ POS_WBV_ZOOMFACTOR$ to POS_TEXT_3$ ; // ZOOMFACTOR property + +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINEXES structure overrides + equ PSPOS_WBV_CREATESETTINGS$ to PSPOS_TEXT_5$ ; // Environment settings used to create the WebView + equ PSPOS_WBV_PDFTOOLBARSETTINGS$ to PSPOS_TEXT_6$ ; // PDFTOOLBARSETTINGS property + equ PSPOS_WBV_SETTINGS$ to PSPOS_TEXT_4$ ; // SETTINGS property + equ PSPOS_WBV_URI$ to PSPOS_TEXT_1$ ; // URI property + equ PSPOS_WBV_USERAGENT$ to PSPOS_TEXT_2$ ; // USERAGENT property + equ PSPOS_WBV_ZOOMFACTOR$ to PSPOS_TEXT_3$ ; // ZOOMFACTOR property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Create settings constants - stored @svm-delimited in the OIWIN/OIWINEXE + // POS_WBV_CREATESETTINGS$/PSPOS_WBV_CREATESETTINGS$ value. + + equ WBV_CRSET_POS_USERDATAFOLDER$ to 1 ; // USERDATAFOLDER property + equ WBV_CRSET_POS_BROWSEREXEFOLDER$ to 2 ; // BROWSEREXEFOLDER property + equ WBV_CRSET_POS_EXTRABROWSERARGS$ to 3 ; // EXTRABROWSERARGS property + equ WBV_CRSET_POS_ALLOWSSO$ to 4 ; // ALLOWSSO property + equ WBV_CRSET_POS_LANGUAGE$ to 5 ; // LANGUAGE property + equ WBV_CRSET_POS_TARGETVERSION$ to 6 ; // TARGETVERSION property + equ WBV_CRSET_POS_EXCLUSIVEUDF$ to 7 ; // EXCLUSIVEUDFACCESS property + equ WBV_CRSET_POS_PROFILENAME$ to 8 ; // PROFILENAME property + equ WBV_CRSET_POS_INPRIVATEMODE$ to 9 ; // INPRIVATEMODE property + equ WBV_CRSET_POS_COLORSCHEME$ to 10 ; // COLORSCHEME property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // AUTHENTICATIONMODE property + equ WBV_AUTHMODE_DEFAULT$ to 0 ; // Ignore WEBAUTHREQUEST event + equ WBV_AUTHMODE_CUSTOM$ to 1 ; // Use WEBAUTHREQUEST event + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // COLORSCHEME property + equ WBV_COLORSCHEME_AUTO$ to 0 + equ WBV_COLORSCHEME_LIGHT$ to 1 + equ WBV_COLORSCHEME_DARK$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // WEBSHOWDIALOG event Dialog Types + equ WBV_DLGTYPE_ALERT$ to 0 ; // BO (window.alert) + equ WBV_DLGTYPE_CONFIRM$ to 1 ; // BOC (window.confirm) + equ WBV_DLGTYPE_PROMPT$ to 2 ; // RC (window.prompt) + equ WBV_DLGTYPE_BEFOREUNLOAD$ to 3 ; // LeavePage/StayOnPage + + // Leave/Stay buttons for OIWIN_WEBSHOWDIALOG_BEFOREUNLOAD message + equ WBV_MSG_BTN_LEAVE$ to 1 + equ WBV_MSG_BTN_STAY$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PRINTTOPDF method equates + // + // RetVal = Exec_Method( CtrlEntID, "PRINTTOPDF", PrintSettings ) + // + // + // PrintSettings parameter + // ----------------------- + // + // <1> PrintHeaderAndFooter (Bool - defaults to FALSE$) + // <2> PrintSelectedOnly (Bool - defaults to FALSE$) + // <3> PrintBackgrounds (Bool - defaults to FALSE$) + // <4> HeaderTitle (String - use "" for no title) + // <5> FooterURI (String - use "" for no URI) + // <6> Landscape (Bool - defaults to FALSE$) + // <7> PageWidth (Inches - defaults to 8.5) + // <8> PageHeight (Inches - defaults to 11.0) + // <9> LeftMargin (Inches - defaults to ~0.4) + // <10> TopMargin (Inches - defaults to ~0.4) + // <11> RightMargin (Inches - defaults to ~0.4) + // <12> BottomMargin (Inches - defaults to ~0.4) + // <13> ScaleFactor (Numeric - defaults to 1.0) + + equ WBV_P2PDFSET_POS_HDRANDFTR$ to 1 + equ WBV_P2PDFSET_POS_SELONLY$ to 2 + equ WBV_P2PDFSET_POS_BACKGROUND$ to 3 + equ WBV_P2PDFSET_POS_HDRTITLE$ to 4 + equ WBV_P2PDFSET_POS_FTRURI$ to 5 + equ WBV_P2PDFSET_POS_LANDSCAPE$ to 6 + equ WBV_P2PDFSET_POS_PAGEWIDTH$ to 7 + equ WBV_P2PDFSET_POS_PAGEHEIGHT$ to 8 + equ WBV_P2PDFSET_POS_LEFTMARGIN$ to 9 + equ WBV_P2PDFSET_POS_TOPMARGIN$ to 10 + equ WBV_P2PDFSET_POS_RIGHTMARGIN$ to 11 + equ WBV_P2PDFSET_POS_BOTTOMMARGIN$ to 12 + equ WBV_P2PDFSET_POS_SCALEFACTOR$ to 13 + + equ WBV_P2PDFSET_NO_HDRTITLE$ to "" + equ WBV_P2PDFSET_NO_FTRURI$ to "" + +/////////////////////////////////////////////////////////////////////////////// + + // PROFILENAME property + // + // Validation requirements: + // + // It has a maximum length of 64 characters excluding the null-terminator. + // It is ASCII case insensitive. + // + // alphabet characters: a-z and A-Z + // + // digit characters: 0-9 + // + // symbol characters: '#', + // '@', + // '$', + // '(', + // ')', + // '+', + // '-', + // '_', + // '~', + // '.', + // ' ' (space). + // + // Note: the text must not end with a period '.' or ' ' (space). And, + // although upper-case letters are allowed, they're treated just as + // lower-case counterparts because the profile name will be mapped to + // the real profile directory path on disk and Windows file system handles + // path names in a case-insensitive way. + + equ WBV_PROFILENAME_VALIDCHARS$ to "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789#@$()+-_~. " + equ WBV_PROFILENAME_BADENDCHARS$ to ". " + equ WBV_PROFILENAME_MAXCHARS$ to 64 + +/////////////////////////////////////////////////////////////////////////////// + + // SETTINGS property - this is a dynamic array of flags that map into the + // ICoreWebView2Settings and derived interfaces. + // + // At runtime it is @fm delimited when used with Get/Set_Property. In the + // OIWIN and OIWINEXE structure it is @svm delimited. + // + // <1> EnableAccleratorKeys (Bool - defaults to TRUE$) + // <2> EnableAutoFill (Bool - defaults to TRUE$) + // <3> EnableContextMenus (Bool - defaults to TRUE$) + // <4> EnableDevTools (Bool - defaults to TRUE$) + // <5> EnableDefaultErrorPage (Bool - defaults to TRUE$) + // <6> EnablePasswordAutoSave (Bool - defaults to FALSE$) + // <7> EnablePinchZoom (Bool - defaults to TRUE$) + // <8> EnableScripts (Bool - defaults to TRUE$) + // <9> EnableScriptDialogs (Bool - defaults to TRUE$) + // <10> EnableSwipeNavigation (Bool - defaults to TRUE$) + // <11> EnableStatusBar (Bool - defaults to TRUE$) + // <12> EnableWebMessages (Bool - defaults to TRUE$) + // <13> EnableZoom (Bool - defaults to TRUE$) + + equ WBV_SET_POS_ACCELERATORKEYS$ to 1 + equ WBV_SET_POS_AUTOFILL$ to 2 + equ WBV_SET_POS_CONTEXTMENUS$ to 3 + equ WBV_SET_POS_DEVTOOLS$ to 4 + equ WBV_SET_POS_DEFAULTERRORPAGE$ to 5 + equ WBV_SET_POS_PASSWORDAUTOSAVE$ to 6 + equ WBV_SET_POS_PINCHZOOM$ to 7 + equ WBV_SET_POS_SCRIPTS$ to 8 + equ WBV_SET_POS_SCRIPTDIALOGS$ to 9 + equ WBV_SET_POS_SWIPENAVIGATION$ to 10 + equ WBV_SET_POS_STATUSBAR$ to 11 + equ WBV_SET_POS_WEBMESSAGES$ to 12 + equ WBV_SET_POS_ZOOM$ to 13 + +/////////////////////////////////////////////////////////////////////////////// + + // PDFTOOLBARSETTINGS property - this is a dynamic array of flags that map + // into the ICoreWebView2Settings7 COREWEBVIEW2_PDF_TOOLBAR_ITEMS bit flags. + // + // At runtime it is @fm delimited when used with Get/Set_Property. In the + // OIWIN and OIWINEXE structure it is @svm delimited. + // + // All of these values default to FALSE$. + // + // <1> HideBookMarks COREWEBVIEW2_PDF_TOOLBAR_ITEMS_BOOKMARKS + // <2> HideFitPage COREWEBVIEW2_PDF_TOOLBAR_ITEMS_FIT_PAGE + // <3> HidePageLayout COREWEBVIEW2_PDF_TOOLBAR_ITEMS_PAGE_LAYOUT + // <4> HidePageSelector COREWEBVIEW2_PDF_TOOLBAR_ITEMS_PAGE_SELECTOR + // <5> HidePrint COREWEBVIEW2_PDF_TOOLBAR_ITEMS_PRINT + // <6> HideRotate COREWEBVIEW2_PDF_TOOLBAR_ITEMS_ROTATE + // <7> HideSave COREWEBVIEW2_PDF_TOOLBAR_ITEMS_SAVE + // <8> HideSaveAs COREWEBVIEW2_PDF_TOOLBAR_ITEMS_SAVE_AS + // <9> HideSearch COREWEBVIEW2_PDF_TOOLBAR_ITEMS_SEARCH + // <10> HideZoomIn COREWEBVIEW2_PDF_TOOLBAR_ITEMS_ZOOM_IN + // <11> HideZoomOut COREWEBVIEW2_PDF_TOOLBAR_ITEMS_ZOOM_OUT + + equ WBV_PDFTBRSET_POS_HIDEBOOKMARKS$ to 1 + equ WBV_PDFTBRSET_POS_HIDEFITPAGE$ to 2 + equ WBV_PDFTBRSET_POS_HIDEPAGELAYOUT$ to 3 + equ WBV_PDFTBRSET_POS_HIDEPAGESELECTOR$ to 4 + equ WBV_PDFTBRSET_POS_HIDEPRINT$ to 5 + equ WBV_PDFTBRSET_POS_HIDEROTATE$ to 6 + equ WBV_PDFTBRSET_POS_HIDESAVE$ to 7 + equ WBV_PDFTBRSET_POS_HIDESAVEAS$ to 8 + equ WBV_PDFTBRSET_POS_HIDESEARCH$ to 9 + equ WBV_PDFTBRSET_POS_HIDEZOOMIN$ to 10 + equ WBV_PDFTBRSET_POS_HIDEZOOMOUT$ to 11 + +/////////////////////////////////////////////////////////////////////////////// + + // CLEARBROWSINGDATA equates + // + // call exec_Method( ctrlEntID, "CLEARBROWSINGDATA", + // dataTypes, + // dateTimeFrom, + // dateTimeFrom ) + // + // The dataTypes parameter is an @fm delimited array of types to clear. + // Note that it is actually a hierarachy of types like so: + // + // DataType (Internal WebVew2 type) + // ======================= ======================================================= + // All Profile COREWEBVIEW2_BROWSING_DATA_KINDS_ALL_PROFILE + // All Site Data COREWEBVIEW2_BROWSING_DATA_KINDS_ALL_SITE + // All DOM Storage COREWEBVIEW2_BROWSING_DATA_KINDS_ALL_DOM_STORAGE + // File Systems COREWEBVIEW2_BROWSING_DATA_KINDS_FILE_SYSTEMS + // Indexed DB COREWEBVIEW2_BROWSING_DATA_KINDS_INDEXED_DB + // Local Storage COREWEBVIEW2_BROWSING_DATA_KINDS_LOCAL_STORAGE + // Web SQL COREWEBVIEW2_BROWSING_DATA_KINDS_WEB_SQL + // Cache Storage COREWEBVIEW2_BROWSING_DATA_KINDS_CACHE_STORAGE + // Cookies COREWEBVIEW2_BROWSING_DATA_KINDS_COOKIES + // Disk Cache COREWEBVIEW2_BROWSING_DATA_KINDS_DISK_CACHE + // Download History COREWEBVIEW2_BROWSING_DATA_KINDS_DOWNLOAD_HISTORY + // General Autofill COREWEBVIEW2_BROWSING_DATA_KINDS_GENERAL_AUTOFILL + // Password Autosave COREWEBVIEW2_BROWSING_DATA_KINDS_PASSWORD_AUTOSAVE + // Browsing History COREWEBVIEW2_BROWSING_DATA_KINDS_BROWSING_HISTORY + // Settings COREWEBVIEW2_BROWSING_DATA_KINDS_SETTINGS + // + // So clearing "All DOM Storage" will actually clear this data: + // + // File Systems + // Indexed DB + // Local Storage + // Web SQL + // Cache Storage + // + // Clearing "All Site Data" will clear All DOM Storage and Cookies, etc. + + equ WBV_CBD_POS_ALLPROFILE$ to 1 + equ WBV_CBD_POS_ALLSITEDATA$ to 2 + equ WBV_CBD_POS_ALLDOMSTORAGE$ to 3 + equ WBV_CBD_POS_FILESYSTEMS$ to 4 + equ WBV_CBD_POS_INDEXEDDB$ to 5 + equ WBV_CBD_POS_LOCALSTORAGE$ to 6 + equ WBV_CBD_POS_WEBSQL$ to 7 + equ WBV_CBD_POS_CACHESTORAGE$ to 8 + equ WBV_CBD_POS_COOKIES$ to 9 + equ WBV_CBD_POS_DISKCACHE$ to 10 + equ WBV_CBD_POS_DOWNLOADHISTORY$ to 11 + equ WBV_CBD_POS_GENERALAUTOFILL$ to 12 + equ WBV_CBD_POS_PASSWORDAUTOSAVE$ to 13 + equ WBV_CBD_POS_BROWSINGHISTORY$ to 14 + equ WBV_CBD_POS_SETTINGS$ to 15 + +/////////////////////////////////////////////////////////////////////////////// + + // GETCOOKIES/SETCOOKIE methods + // + // Cookie data in these methods comprises an @vm-delimited array like so: + // + // <0,1> Name + // <0,2> Value + // <0,3> Domain + // <0,4> Path + // <0,5> Expires (DateTime) + // <0,6> Secure (bool) + // <0,7> HTTPOnly (bool) + // <0,8> SameSite (None,Lax,Strict) + // <0,9> SessionOnly (bool) - GetCookies only. + + equ WBV_COOKIE_POS_NAME$ to 1 + equ WBV_COOKIE_POS_VALUE$ to 2 + equ WBV_COOKIE_POS_DOMAIN$ to 3 + equ WBV_COOKIE_POS_PATH$ to 4 + equ WBV_COOKIE_POS_EXPIRES$ to 5 + equ WBV_COOKIE_POS_SECURE$ to 6 + equ WBV_COOKIE_POS_HTTPONLY$ to 7 + equ WBV_COOKIE_POS_SAMESITE$ to 8 + equ WBV_COOKIE_POS_SESSIONONLY$ to 9 + + equ WBV_COOKIE_SAMESITE_NONE$ to "None" + equ WBV_COOKIE_SAMESITE_LAX$ to "Lax" + equ WBV_COOKIE_SAMESITE_STRICT$ to "Strict" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // WEBINITCONTEXTMENT event - targetInfo argument + + // Target types (COREWEBVIEW2_CONTEXT_MENU_TARGET_KIND) + equ WBV_TARGET_TYPE_PAGE$ to 0 + equ WBV_TARGET_TYPE_IMAGE$ to 1 + equ WBV_TARGET_TYPE_SELECTEDTEXT$ to 2 + equ WBV_TARGET_TYPE_AUDIO$ to 3 + equ WBV_TARGET_TYPE_VIDEO$ to 4 + + // <0,1> Type + // <0,2> IsEditable + // <0,3> PageUri + // <0,4> SourceUri + // <0,5> LinkUri + // <0,6> LinkText + // <0,7> FrameUri + // <0,8> SelectionText + // <0,9> MainFrameRequest + equ WBV_TARGETINFO_POS_TYPE$ to 1 + equ WBV_TARGETINFO_POS_EDITABLE$ to 2 + equ WBV_TARGETINFO_POS_PAGEURI$ to 3 + equ WBV_TARGETINFO_POS_SOURCEURI$ to 4 + equ WBV_TARGETINFO_POS_LINKURI$ to 5 + equ WBV_TARGETINFO_POS_LINKTEXT$ to 6 + equ WBV_TARGETINFO_POS_FRAMEURI$ to 7 + equ WBV_TARGETINFO_POS_SELECTEDTEXT$ to 8 + equ WBV_TARGETINFO_POS_MAINFRAMEREQUEST$ to 9 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // WEBPERMISSIONREQUEST event and SETPERMISSION method + + // Permission Type + equ WBV_PERMTYPE_UNKNOWN$ to 0 + equ WBV_PERMTYPE_MICROPHONE$ to 1 + equ WBV_PERMTYPE_CAMERA$ to 2 + equ WBV_PERMTYPE_GEOLOCATION$ to 3 + equ WBV_PERMTYPE_NOTIFICATIONS$ to 4 + equ WBV_PERMTYPE_OTHERSENSOR$ to 5 + equ WBV_PERMTYPE_CLIPBOARDREAD$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // WEBOPENWINDOW event - WindowInfo parameter + // + // Note that it's possible for the size and position values to be null if + // this wasn't specified in the originating window.open() call. + // + // <0,1> WindowName + // <0,2> Left + // <0,3> Top + // <0,4> Width + // <0,5> Height + // <0,6> ShowMenuBar + // <0,7> ShowScrollBars + // <0,8> ShowStatusBar + // <0,9> ShowToolBar + + equ WBV_WI_POS_WINDOWNAME$ to 1 + equ WBV_WI_POS_LEFT$ to 2 + equ WBV_WI_POS_TOP$ to 3 + equ WBV_WI_POS_WIDTH$ to 4 + equ WBV_WI_POS_HEIGHT$ to 5 + equ WBV_WI_POS_SHOWMENUBAR$ to 6 + equ WBV_WI_POS_SHOWSCROLLBARS$ to 7 + equ WBV_WI_POS_SHOWSTATUSBAR$ to 8 + equ WBV_WI_POS_SHOWTOOLBAR$ to 9 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // MAPHOSTNAMETOFOLDER method equates + + // AccessType parameter + equ WBV_MH2F_ACCESS_TYPE_DENY$ to 0 + equ WBV_MH2F_ACCESS_TYPE_ALLOW$ to 1 + equ WBV_MH2F_ACCESS_TYPE_DENY_CORS$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // READYSTATE property equates + + equ WBV_READYSTATE_UNINITIALIZED$ to 0 + equ WBV_READYSTATE_NAVIGATING$ to 1 + equ WBV_READYSTATE_CONTENTLOADING$ to 2 + equ WBV_READYSTATE_CONTENTLOADED$ to 3 + equ WBV_READYSTATE_NAVIGATED$ to 4 + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/PS_WINDOW_EQUATES.txt b/SYSPROG/STPROCINS/PS_WINDOW_EQUATES.txt new file mode 100644 index 0000000..137a060 --- /dev/null +++ b/SYSPROG/STPROCINS/PS_WINDOW_EQUATES.txt @@ -0,0 +1,319 @@ +compile insert PS_Window_Equates +/* + ** Copyright (C) 2013-2017 Revelation Software Inc. All Rights Reserved ** + + Author : Wile C Coyote - Super Genius + Date : June 2013 + Purpose : Constants for working with PS WINDOW object structures + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 15 Oct 20 Renamed FRAMESTYLE to FORMBORDERSTYLE + Added SHOWEFFECT/HIDEEFFECT equates + Mr C 19 Apr 18 Added PLACEMENTDATA property equates + Mr C 09 Feb 17 Added ToolBars equates + Mr C 07 Aug 17 Added InitialPosition equates + Mr C 12 Dec 16 Fixed PSS_WINDOW_HAS_MENU$ + Mr C 03 Oct 16 Added OIWIN/EXE structure overrides. + Mr C 18 May 16 Removed PSSX_WINDOW_DPISCALING$ + Mr C 05 May 16 Moved SCALEUNITS to ps_Equates + Mr C 26 Apr 16 Transposed scale units + Mr C 10 Feb 16 Added PSS_WINDOW_DIALOGBOX$ + Mr C 21 Dec 15 Added SIZINGMODE constants + Mr C 29 Jan 15 Added FrameStyle rules + Mr C 25 Jan 15 Added PSSX_WINDOW_SCALEMODEDIPS$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _PS_WINDOW_EQUATES_ +#define _PS_WINDOW_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_WindowStyle_Equates + $insert oiWin_Equates + $insert ps_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PS Style equates + equ PSS_WINDOW_BMP_CENTER$ to 0x00000001 ; + equ PSS_WINDOW_RESIZEALWAYS$ to 0x00000002 ; * // SIZINGMODE property + equ PSS_WINDOW_RESIZENEVER$ to 0x00000004 ; * // SIZINGMODE property + equ PSS_WINDOW_BMP_TILED$ to 0x00000020 ; + equ PSS_WINDOW_BMP_STRETCH$ to bitOr( PSS_WINDOW_BMP_CENTER$, PSS_WINDOW_BMP_TILED$ ) + equ PSS_WINDOW_HAS_MENU$ to 0x00000100 ; + equ PSS_WINDOW_DIALOGBOX$ to 0x00001000 ; + equ PSS_WINDOW_AUTOSCROLL$ to 0x00002000 ; + equ PSS_WINDOW_MULTIINSTANCE$ to 0x00004000 ; + equ PSS_WINDOW_USEBKGDCOLOR$ to 0x00008000 ; + equ PSS_WINDOW_CREATECOMPLETE$ to 0x80000000 ; + + equ PSSX_WINDOW_GLASSDRAG$ to 0x00800000 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSWINS structure overrides + + equ POS_TASKBARID$ to POS_TEXT_1$ + equ POS_STATUSLINE$ to POS_TEXT_2$ + equ POS_TOOLBARS$ to POS_TEXT_3$ + + // SYSREPOSWINEXES structure overrides + + equ PSPOS_TASKBARID$ to PSPOS_TEXT_1$ + equ PSPOS_STATUSLINE$ to PSPOS_TEXT_2$ + equ PSPOS_TOOLBARS$ to PSPOS_TEXT_3$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // POS_DISPLAY WINDOW-only sub-values... + equ POS_DISP_WIN_TRANSLUCENCY$ to POS_DISPLAY_TRANSLUCENCY$ + equ POS_DISP_WIN_RESERVED_2$ to 2 ; * // @tm delimited + equ POS_DISP_WIN_RESERVED_3$ to 3 + equ POS_DISP_WIN_INITIALPOS$ to 4 + equ POS_DISP_WIN_SHOWEFFECT$ to 5 + equ POS_DISP_WIN_HIDEEFFECT$ to 6 + equ POS_DISP_WIN_MAXIMIZESIZE$ to 7 ; * // @tm delimited + equ POS_DISP_WIN_MINSCALEFACTOR$ to 8 + equ POS_DISP_WIN_MAXSCALEFACTOR$ to 9 + equ POS_DISP_WIN_SCALEINCREMENT$ to 10 + + // PSPOS_DISPLAY WINDOW-only sub-values... + equ PSPOS_DISP_WIN_TRANSLUCENCY$ to PSPOS_DISPLAY_TRANSLUCENCY$ + equ PSPOS_DISP_WIN_RESERVED_2$ to 2 ; * // @tm delimited + equ PSPOS_DISP_WIN_RESERVED_3$ to 3 + equ PSPOS_DISP_WIN_INITIALPOS$ to 4 + equ PSPOS_DISP_WIN_SHOWEFFECT$ to 5 + equ PSPOS_DISP_WIN_HIDEEFFECT$ to 6 + equ PSPOS_DISP_WIN_MAXIMIZESIZE$ to 7 ; * // @tm delimited + equ PSPOS_DISP_WIN_MINSCALEFACTOR$ to 8 + equ PSPOS_DISP_WIN_MAXSCALEFACTOR$ to 9 + equ PSPOS_DISP_WIN_SCALEINCREMENT$ to 10 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // FORMBORDERSTYLE property equates + equ PS_FORMBORDERSTYLE_NONE$ to 0 + equ PS_FORMBORDERSTYLE_FIXED$ to 1 + equ PS_FORMBORDERSTYLE_SIZEABLE$ to 2 + equ PS_FORMBORDERSTYLE_DIALOG$ to 3 + equ PS_FORMBORDERSTYLE_FIXEDTOOL$ to 4 + equ PS_FORMBORDERSTYLE_SIZEABLETOOL$ to 5 + + // These values map onto the following window styles: + // + // FormBorderStyle | Window Styles Window Ex Styles + // ===================================================================== + // None | WS_POPUP | + // --------------------------------------------------------------------- + // Fixed | WS_POPUP | WS_EX_WINDOWEDGE + // | WS_BORDER | + // --------------------------------------------------------------------- + // Sizeable | WS_POPUP | WS_EX_WINDOWEDGE + // | WS_BORDER | + // | WS_THICKFRAME | + // --------------------------------------------------------------------- + // Dialog | WS_POPUP | WS_EX_DLGMODALFRAME + // | | WS_EX_WINDOWEDGE + // --------------------------------------------------------------------- + // FixedTool | WS_POPUP | WS_EX_WINDOWEDGE + // | WS_BORDER | WS_EX_TOOLWINDOW + // --------------------------------------------------------------------- + // SizeableTool | WS_POPUP | WS_EX_WINDOWEDGE + // | WS_BORDER | WS_EX_TOOLWINDOW + // | WS_THICKFRAME | + // --------------------------------------------------------------------- + // + // NB: The "None" style cannot be displayed with a caption. + + // Backwards compatibilty with the old FRAMESTYLE name. + equ PS_FRAMESTYLE_NONE$ to PS_FORMBORDERSTYLE_NONE$ + equ PS_FRAMESTYLE_FIXED$ to PS_FORMBORDERSTYLE_FIXED$ + equ PS_FRAMESTYLE_SIZEABLE$ to PS_FORMBORDERSTYLE_SIZEABLE$ + equ PS_FRAMESTYLE_DIALOG$ to PS_FORMBORDERSTYLE_DIALOG$ + equ PS_FRAMESTYLE_FIXEDTOOL$ to PS_FORMBORDERSTYLE_FIXEDTOOL$ + equ PS_FRAMESTYLE_SIZEABLETOOL$ to PS_FORMBORDERSTYLE_SIZEABLETOOL$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SIZINGMODE property equates + equ PS_SIZINGMODE_DEFAULT$ to 0 + equ PS_SIZINGMODE_ALWAYS$ to 1 + equ PS_SIZINGMODE_NEVER$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SHOWEFFECT/HIDEEFFECT property + equ PS_SHE_NONE$ to 0 + equ PS_SHE_FADE$ to 1 + equ PS_SHE_SLIDE_DOWN$ to 2 + equ PS_SHE_SLIDE_UP$ to 3 + equ PS_SHE_SLIDE_RIGHT$ to 4 + equ PS_SHE_SLIDE_LEFT$ to 5 + equ PS_SHE_SLIDE_DOWN_RIGHT$ to 6 + equ PS_SHE_SLIDE_DOWN_LEFT$ to 7 + equ PS_SHE_SLIDE_UP_RIGHT$ to 8 + equ PS_SHE_SLIDE_UP_LEFT$ to 9 + + equ PS_SHE_SLIDE_DEFAULT$ to -1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // CENTER method equates + * // + * // param1 - If TRUE then Center to Parent else Center to Desktop + * // + * // param2 - Requested SIZE (all fields default to "-1") + * // + * // <1> X-Position (-1 means center it on the X-Axis) + * // <2> Y-Position (-1 means center it on the Y-Axis) + * // <3> Width (-1 means leave the window width as is) + * // <4> Height (-1 means leave the window height as is) + * // + * // param3 - If TRUE then just return the calculated size, don't + * // actually set it. + * // + * // param4 - Options: + * // + * // - If Centering on the Parent then this argument contains + * // the Parent Size to use (@'fm'd - overrides actual parent + * // size) + * // + * // - If Centering on the Desktop then this contains: + * // + * // <1> Force Boundary Check: If TRUE then check that the + * // frame is within the bounds of desktop. Usually + * // this is only checked if we don't specify a specific + * // X or Y coordinate (i.e. vParams[1]<1> and <2> are + * // both "-1" ) + * // + * // <2> Desktop "anchor" window ID. This field can contain + * // the name of an "anchor" window - this means the frame + * // will be centered on the same monitor as the "anchor" + * // + * // Returns - Calculated size coordinates + + * // NewSize + equ PSMTD_CENTER_DFT_XPOS$ to -1 + equ PSMTD_CENTER_DFT_YPOS$ to -1 + equ PSMTD_CENTER_DFT_WIDTH$ to -1 + equ PSMTD_CENTER_DFT_HEIGHT$ to -1 + + * // Options (param4) + equ PSMTD_CENTER_OPT_BOUNDSCHECK$ to 1 + equ PSMTD_CENTER_OPT_ANCHORWINID$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Initial position equates + equ PS_IP_AS_DESIGNED$ to 0 + equ PS_IP_CENTER_DESKTOP$ to 1 + equ PS_IP_CENTER_PARENT$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PLACEMENTDATA property + // + // <1> showCmd ( SW_ value ) + // + // <2> Normal Position + // + // <2,1> Left + // <2,2> Top + // <2,3> Width + // <2,4> Height + // + // <3> Min position (Specifies the coordinates of the window's upper-left + // corner when the window is minimized) + // + // <3,1> Left + // <3,2> Top + // + // NB: If this is set then WPF_SETMINPOSITION must be set in the Flags + // field + // + // <4> Max position (Specifies the coordinates of the window's upper-left + // corner when the window is maximized) + // + // <4,1> Left + // <4,2> Top + // + // <5> Flags (Set_Property only) + + equ PS_PD_POS_SHOWCMD$ to 1 + equ PS_PD_POS_NORMALPOS$ to 2 + equ PS_PD_POS_MINPOS$ to 3 + equ PS_PD_POS_MAXPOS$ to 4 + equ PS_PD_POS_FLAGS$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // LOCKTYPE property equates + equ PS_LKTYPE_EXCLUSIVE$ to 0 + equ PS_LKTYPE_SHARED$ to 1 + equ PS_LKTYPE_NONE$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // LOCKCOORDINATION property equates + equ PS_LKCOORD_NORMAL$ to 0 + equ PS_LKCOORD_WITHTABLE$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // PROGRESSSTATE property equates + equ PS_PGS_NOPROGRESS$ to 0 + equ PS_PGS_NORMAL$ to 1 ; // Spectrum is Green + equ PS_PGS_ERROR$ to 2 ; // Red + equ PS_PGS_PAUSED$ to 3 ; // Amber + equ PS_PGS_INDETERMINATE$ to 4 ; // Green marquee + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SCALEFACTOR property equates + // + // <1> ScaleFactor + // <2> Min ScaleFactor + // <3> Max ScaleFactor + // <4> ScaleFactor Increment + + equ PS_SCF_POS_FACTOR$ to 1 + equ PS_SCF_POS_MINFACTOR$ to 2 + equ PS_SCF_POS_MAXFACTOR$ to 3 + equ PS_SCF_POS_INCREMENT$ to 4 + + equ PS_SCF_DFT_MINFACTOR$ to 0.5 + equ PS_SCF_DFT_MAXFACTOR$ to 5.0 + equ PS_SCF_DFT_INCREMENT$ to 0 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // WRITEMODE property equates + equ PS_WRMD_CONTROLS_ONLY$ to 0 + equ PS_WRMD_ALL$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RCI_RECORD_EQUATES.txt b/SYSPROG/STPROCINS/RCI_RECORD_EQUATES.txt new file mode 100644 index 0000000..61f9032 --- /dev/null +++ b/SYSPROG/STPROCINS/RCI_RECORD_EQUATES.txt @@ -0,0 +1,12 @@ +compile Insert RCI_RECORD_EQUATES + +Equ RCI_COMPANY_NAME$ To 1 +Equ RCI_ADDRESS$ To 2 +Equ RCI_CITY$ To 3 +Equ RCI_STATE$ To 4 +Equ RCI_ZIP$ To 5 +Equ RCI_COUNTRY$ To 6 +Equ RCI_PHONE$ To 7 +Equ RCI_FAX$ To 8 +Equ RCI_EMAIL$ To 9 +Equ RCI_WEB_ADDRESS$ To 10 diff --git a/SYSPROG/STPROCINS/RDKCTRLEQUATES.txt b/SYSPROG/STPROCINS/RDKCTRLEQUATES.txt new file mode 100644 index 0000000..3aeafa1 --- /dev/null +++ b/SYSPROG/STPROCINS/RDKCTRLEQUATES.txt @@ -0,0 +1,40 @@ +compile insert RDKCTRLEQUATES + +EQU CLEAR_FORM_CTRLS1$ TO "*.RELEASEID,*.TITLE,*.EXTRACTPATH,*.RELEASETYPE,*.INHERITCOMPRESS,*.DESC" +EQU CLEAR_FORM_CTRLS2$ TO ",*.WORKING_LIST,*.LOCMAP,*.BUILDINFO,*.ERROR_PHASE,*.ERROR_PHASE_TEXT,*,*.VIEWID,*.VIEWID,*.VIEWID" +EQU CLEAR_FORM_PROPS$ TO "TEXT,TEXT,TEXT,VALUE,VALUE,TEXT,LIST,ARRAY,ARRAY,TEXT,TEXT,@BUILD_ERRORS,LIST,TEXT,ENABLED" +EQU CLEAR_FORM_VALUES$ TO DEFAULTRELEASEID$ : ",,,0,0,,,,,,,," : ALLENTS$ : "," : ALLENTS$ : ",0" + +EQU READ_FORM_CTRLS$ TO "*.TITLE,*.EXTRACTPATH,*.RELEASETYPE,*.INHERITCOMPRESS,*.DESC,*.VIEWID,*.TARGETAPPID,*.PREVRELEASE,*.DBPROC,*.ALIASES,*.WORKING_LIST,*.LOCMAP,*.BUILDINFO,*.ERROR_PHASE,*,*.AUTHOR,*.CREATED,*.COMBO_NOTENAME,*.DBTABLE_DICT,*.VERSION_NUM,*.DATE,*.REQ_LOGOUT" +EQU READ_FORM_PROPS$ TO "TEXT,TEXT,VALUE,VALUE,TEXTVAL,TEXT,TEXT,TEXT,ARRAY,ARRAY,LIST,ARRAY,ARRAY,TEXT,@BUILD_ERRORS,TEXT,TEXT,TEXT,ARRAY,TEXT,TEXT,CHECK" + +EQU READ_FORM_TITLE$ TO 1 +EQU READ_FORM_PATH$ TO 2 +EQU READ_FORM_TYPE$ TO 3 +EQU READ_FORM_COMPRESS$ TO 4 +EQU READ_FORM_DESC$ TO 5 +EQU READ_FORM_VIEWID$ TO 6 +EQU READ_FORM_APPID$ TO 7 +EQU READ_FORM_PREVREL$ TO 8 +EQU READ_FORM_DBPROC$ TO 9 +EQU READ_FORM_ALIASES$ TO 10 +EQU READ_FORM_WORKLIST$ TO 11 +EQU READ_FORM_LOCMAP$ TO 12 +EQU READ_FORM_BLDINFO$ TO 13 +EQU READ_FORM_ERRPHASE$ TO 14 +EQU READ_FORM_BLDERRS$ TO 15 +EQU READ_FORM_AUTHOR$ TO 16 +EQU READ_FORM_CREATED$ TO 17 +EQU READ_FORM_NOTENAME$ TO 18 +* mtr +EQU READ_FORM_DICTINFO$ TO 19 +EQU READ_FORM_VERSION$ TO 20 +EQU READ_FORM_DATE$ TO 21 +EQU READ_FORM_REQLOGOUT$ TO 22 + + +EQU UPD_FORM_CTRLS1$ TO "*.TITLE,*.TITLE,*.EXTRACTPATH,*.EXTRACTPATH,*.RELEASETYPE,*.INHERITCOMPRESS,*.DESC,*.DESC," +EQU UPD_FORM_CTRLS2$ TO "*.VIEWID,*.VIEWID,*.TARGETAPPID,*.PREVRELEASE,*.DBPROC,*.ALIASES,*.WORKING_LIST,*.LOCMAP,*.BUILDINFO,*.ERROR_PHASE,*.ERROR_PHASE_TEXT,*,*.AUTHOR,*.CREATED,*.DBTABLE_DICT,*.VERSION_NUM,*.DATE,*.REQ_LOGOUT" +EQU UPD_FORM_PROPS$ TO "TEXT,ORIG_TEXT,TEXT,ORIG_TEXT,VALUE,VALUE,TEXTVAL,ORIG_TEXTVAL,TEXT,SELPOS,TEXT,TEXT,ARRAY,ARRAY,LIST,ARRAY,ARRAY,TEXT,TEXT,@BUILD_ERRORS,TEXT,TEXT,ARRAY,TEXT,TEXT,CHECK" + + diff --git a/SYSPROG/STPROCINS/RDKDEPLOY_EQUATES.txt b/SYSPROG/STPROCINS/RDKDEPLOY_EQUATES.txt new file mode 100644 index 0000000..db972e9 --- /dev/null +++ b/SYSPROG/STPROCINS/RDKDEPLOY_EQUATES.txt @@ -0,0 +1,164 @@ +compile insert rdkdeploy_equates + +* mtr 1 aug 16 Fixed Res2Str calls +* mtr 19 May 17 More fixes, more usage ;) +* bzs 08 May 20 Remember the "current tables only" checkbox value + +declare function rti_res2str + +$insert uires_equates + +* SYSREPOSRELEASES column position equates +EQU REL_APPID$ TO 1 ;* key part +EQU REL_RELEASEID$ TO 2 ;* key part + +EQU REC_TITLE$ TO 1 +EQU REC_DESC$ TO 2 +EQU REC_CREATED$ TO 3 +EQU REC_AUTHOR$ TO 4 +EQU REC_PREVREL$ TO 5 +EQU REC_VIEWID$ TO 6 +EQU REC_RELEASETYPE$ TO 7 +EQU REC_TARGETID$ TO 8 +EQU REC_INHERITCOMP$ TO 9 +EQU REC_EXTPATH$ TO 10 +EQU REC_LOCMAPIDS$ TO 11 +EQU REC_LOCMAPPATHS$ TO 12 +EQU REC_DBTABLES$ TO 13 +EQU REC_DBPROCS$ TO 14 +EQU REC_BLDDATE$ TO 19 +EQU REC_BLDSTAT$ TO 20 +EQU REC_BLDUSER$ TO 21 +EQU REC_BLDCOMMENT$ TO 22 +EQU REC_ERRPHASE$ TO 23 +EQU REC_ERRITEMS$ TO 24 +EQU REC_ERRCODES$ TO 25 +EQU REC_ERRTEXT$ TO 26 +EQU REC_NOTENAME$ TO 27 +EQU REC_ALIASES$ TO 28 +EQU REC_ALIASPROCS$ TO 29 +EQU REC_ALIASTBLS$ TO 30 + +EQU REC_DICTNAMES$ TO 31 +EQU REC_DICTFIELDS$ TO 32 +* MTR 3-28-03 +EQU REC_VERSION$ TO 33 +EQU REC_DATE$ TO 34 +* mtr 6-3-03 +EQU REC_VOLUMES$ TO 35 +EQU REC_REQUIRE_LOGOUT$ TO 36 +* mtr 8-5-08 +Equ REC_EXEPATH$ To 37 +Equ REC_EXEPRODUCT$ To 38 +Equ REC_EXEPUBLISHER$ To 39 +Equ REC_EXEURL$ To 40 +Equ REC_EXEUSERNAME$ To 41 +Equ REC_EXEPASSWORD$ To 42 +Equ REC_EXELOGONDISPLAY$ To 43 +Equ REC_EXEOIPATH$ To 44 +Equ REC_EXEDATAPATH$ To 45 +* mtr 4-7-11 HB MER! +Equ rec_exename$ To 46 +Equ REC_DBTABLES_CURAPP$ To 47 ;* BZS 050820 +Equ REC_POSTINSTALLLOG$ To 48 ;* BZS 052220 +Equ REC_RECOMPILE$ To 49 ;* BZS 121520 +Equ REC_ENTITYIDLIST$ To 50 + +* SYSENV, RDK_DEPLOYTABLES layout +EQU RDK_DEPLOY_CONFIG$ TO "RDK_DEPLOYTABLES" +EQU RDKDEP_COPY_TABLES$ TO 1 +EQU RDKDEP_CREATE_TABLES$ TO 2 +EQU RDKDEP_COPY_RECS$ TO 3 +EQU RDKDEP_TYPES$ TO 5 +EQU RDKDEP_PROCESSES$ TO 6 +EQU RDKDEP_FILES$ TO 7 + +* Window names +EQU DLG_ENTPROPS$ TO "RDKV_ENTPROPS" +EQU DLG_SEARCHUSES$ TO "RDKV_SELUSING" +EQU DLG_EXTRACT$ TO "RDKDD_EXTRACT" +EQU DLG_BUILDNOTES$ TO "RDKDD_BUILDNOTES" +EQU DLG_PUBFLAGS$ TO "RDK_DEPLOY_OPTION" +EQU DLG_ADVANCED$ TO "RDK_EXTRACT_AUX" +EQU DLG_GASGAUGE$ TO "RDK_GASGAUGE" + +* Release Type Equates +EQU RELTYPE_FULL$ TO 0 ;* Full Application Deployment +EQU RELTYPE_APP$ TO 1 ;* Application Deployment +EQU RELTYPE_UPDATE$ TO 2 ;* Application Update + +EQU COMPRESS_NONE$ TO 0 +EQU COMPRESS_TOSYSTEM$ TO 1 ;* compress all applications above SYSPROG + +* default tokens for deployment definitions +EQU USERAPP$ TO rti_Res2Str( RESID$, 'RDK278', '', 1 ) +EQU NONE$ TO rti_Res2Str( RESID$, 'RDK279' , '', 1 ) +EQU ALLENTS$ TO rti_Res2Str( RESID$, 'RDK280', '', 1 ) +EQU DEFAULTRELEASEID$ TO rti_Res2Str( RESID$, 'RDK281', '', 1 ) +EQU ERROR_PHASE_TEXT$ TO rti_Res2Str( RESID$, 'RDK282', '', 1 ) +EQU RELEASETYPE_TEXT$ TO rti_Res2Str( RESID$, 'RDK283' , '', 1 ) + +* Database processing text and values +EQU PROC_FULLDEPLOY$ TO 0 +EQU PROC_DEPLOYEMPTY$ TO 1 +EQU PROC_NODEPLOY$ TO 2 +EQU PROC_CREATEPTR$ TO 0 +EQU PROC_NOCREATEPTR$ TO 1 + +EQU TEXT_FULLDEPLOY$ TO field(rti_Res2Str(RESID$, 'RDK258', '', 1 ), ',', PROC_FULLDEPLOY$ + 1) +EQU TEXT_NODEPLOY$ TO field(rti_Res2Str(RESID$, 'RDK258', '', 1 ), ',', PROC_DEPLOYEMPTY$ + 1) +EQU TEXT_DEPLOYEMPTY$ TO field(rti_Res2Str(RESID$, 'RDK258', '', 1 ), ',', PROC_NODEPLOY$ + 1) +EQU TEXT_CREATEPTR$ TO field(rti_Res2Str(RESID$, 'RDK297', '', 1 ), ',', PROC_CREATEPTR$ + 1) +EQU TEXT_NOCREATEPTR$ TO field(rti_Res2Str(RESID$, 'RDK297', '', 1 ), ',', PROC_NOCREATEPTR$ + 1) + +* Progress window codes +EQU PROGRESS_UPDATE$ TO 1 ;* update the scale pointer +EQU PROGRESS_SETPHASE$ TO 2 ;* set the appropriate phase marker +EQU PROGRESS_NEWTEXT$ TO 3 ;* change the detail message text +EQU PROGRESS_TESTCANCEL$ TO 4 ;* test for process canceled +EQU PROGRESS_CLEAR$ TO 5 ;* clear the works + +* Setphase argument field structure +EQU SETPHASE_PHASE$ TO 1 +EQU SETPHASE_STATE$ TO 2 + +EQU SETPHASE_PHASE_INIT$ TO 1 +EQU SETPHASE_PHASE_DBPROC$ TO 2 +EQU SETPHASE_PHASE_EXTRACT$ TO 3 +EQU SETPHASE_PHASE_APPPREP$ TO 4 + +EQU SETPHASE_STATE_OFF$ TO 0 +EQU SETPHASE_STATE_DOING$ TO 1 +EQU SETPHASE_STATE_DONE$ TO 2 + +* Upgrade file and record names +EQU UPGRADE_FILE$ TO "SYSUPGRADE" +EQU UPGRADE_MAP$ TO "%PROCESS%" +EQU UPGRADE_DESC$ TO "%MODULE%" +EQU UPGRADE_REQ_LO$ TO "%REQLO%" +EQU UPGRADE_DELIM$ TO "/" +EQU UPGRADE_LOG$ TO "UPGRADE.LOG" +Equ UPGRADE_REQ_RECOMPILE$ To "%RECOMPILE%" +Equ ENTITIES_HASH$ To "%HASHES%" + + +* upgrade record sections +EQU CREATEAPP$ TO "[CREATE APPLICATION]" +EQU CREATEFILE$ TO "[CREATE TABLES]" +EQU COPYFILE$ TO "[COPY TABLES]" +EQU DELETEFILE$ TO "[DELETE TABLES]" +EQU ATTACHFILE$ TO "[ATTACH TABLES]" +EQU DETACHFILE$ TO "[DETACH TABLES]" +EQU ALIASFILE$ TO "[ALIAS TABLES]" +EQU COPYOSFILE$ TO "[COPY OSFILE]" +Equ COPYOSFOLDER$ To "[COPY OSFOLDER]" +EQU UPDATEROW$ TO "[UPDATE ROWS]" +EQU DELETEROW$ TO "[DELETE ROWS]" +Equ UPDATEROW_NOOVERWRITE$ To "[CONDITIONAL_ROWS]" +EQU EXECPROC$ TO "[EXECUTE PROCEDURES]" +EQU LINKPROCESS$ TO "[CHAIN PROCESS]" +EQU DECLAREDLL$ TO "[DECLARE DLL]" +EQU EXECPROCPOST$ TO "[EXECUTE PROCEDURES POST]" +Equ RECORDOILOG$ To "[UPDATE LOG]" + + diff --git a/SYSPROG/STPROCINS/RDKERRORS.txt b/SYSPROG/STPROCINS/RDKERRORS.txt new file mode 100644 index 0000000..cd4fc87 --- /dev/null +++ b/SYSPROG/STPROCINS/RDKERRORS.txt @@ -0,0 +1,47 @@ +compile insert rdkerrors +/* ======================================================================== */ +/* RDK Error codes. */ + +EQU RDK_SYSLISTS_DNE$ TO "RDK100" /* SYSLISTS table not attached! */ + +EQU RDK_APPID_REQUIRED$ TO "RDK101" /* APPID argument required */ +EQU RDK_APP_DNE$ TO "RDK102" /* specified application (APPID) does not exist */ +EQU RDK_ENT_DNE$ TO "RDK103" /* specified entity does not exist (but should ) */ + +EQU RDK_SYSREPOSVIEWS_DNE$ TO "RDK104" /* SYSREPOSVIEWS table not attached */ +EQU RDK_VIEWEXISTS$ TO "RDK105" /* View Exists collision */ + +EQU RDK_ADDLOGIC_ERR$ TO "RDK106" /* Some logical error in add */ +EQU RDK_REMOVELOGIC_ERR$ TO "RDK107" /* Some logical error in remove */ + +EQU RDK_VIEWDEF_DNE$ TO "RDK108" /* View definition does not exist */ + +EQU RDK_NULLTARGET_ERR$ TO "RDK110" /* Target directory not specified */ +EQU RDK_RDKSPEC_DNE$ TO "RDK111" /* RDK deploy spec record in SYSENV is missing */ +EQU RDK_SYSTABCOPY_ERR$ TO "RDK112" /* Error copying table %1% to target dir %2% */ +EQU RDK_SYSTABCREATE_ERR$ TO "RDK113" /* Error creating table %1% on target dir %2% */ +EQU RDK_SYSRECCOPY_ERR$ TO "RDK114" /* Error copying record %2% into table %1% */ + +EQU RDK_USERCANCEL$ TO "RDK115" /* User canceled operation */ +EQU RDK_LISTLEN_OVERFLOW$ TO "RDK116" /* List exceeded maximum length */ +EQU RDK_OSDELETE_ERR$ TO "RDK117" /* Error deleting file */ + +EQU RDK_RETAIN_OVERRIDE$ TO "RDK118" /* Could not retain path %1% for table %2%, moved to default data volume %3% */ +EQU RDK_NO_DEF_DATA_VOL$ TO "RDK119" /* A default data volume is necessary for extraction */ +EQU RDK_CANNOT_CREATE_DIR$ TO "RDK120" /* Cannot create non-relative directory %1% */ +EQU RDK_CANNOT_CREATE_RELDIR$ TO "RDK121" /* Error creating relative directory %1% */ + +EQU RDK_EXTRACT_DIR_NG$ TO "RDK122" /* Extraction directory %1% is invalid */ +EQU RDK_EXTRACT_DIR_FULL$ TO "RDK123" /* There is a repository in extract dir */ +EQU RDK_EXTRACT_DIR_LH$ TO "RDK124" /* There are LH files in extraction dir */ +EQU RDK_EXTRACT_DIR_CV$ TO "RDK125" /* Operating system error. Cannot validate extraction directory */ + +EQU RDK_INSTDEF_WRITE_ERR$ TO "RDK126" /* Error writing Install definition Record */ +EQU RDK_CREATE_USER_ERR$ TO "RDK127" /* Error creating user record */ + +/* RDK Installation Error Codes -------------------------------------- */ + +EQU RDK_INST_INVALID_LOC$ TO "RDK200" /* Specified location "%1%" does not contain a valid install image */ +EQU RDK_INST_DEFREC_DNE$ TO "RDK201" /* Install definition record not found */ +EQU RDK_INST_APPID_REQUIRED$ TO "RDK202" /* User must provide appid at install time */ + diff --git a/SYSPROG/STPROCINS/RDKHIERARCHY_EQUATES.txt b/SYSPROG/STPROCINS/RDKHIERARCHY_EQUATES.txt new file mode 100644 index 0000000..ad6adb1 --- /dev/null +++ b/SYSPROG/STPROCINS/RDKHIERARCHY_EQUATES.txt @@ -0,0 +1,8 @@ +compile insert RDKHIERARCHY_EQUATES +/* Equates for hierachical listbox control */ + +EQU RDKTYPE_PREFIX$ TO "1-1:" +EQU RDKCLASS_PREFIX$ TO "2-2:" +EQU RDKENTITY_PREFIX$ TO "3-3:" + +EQU RDKPREFIX_LEN$ TO 4 /* Adjust if the prefixes change length */ diff --git a/SYSPROG/STPROCINS/RDKLOCATETYPE_EQUATES.txt b/SYSPROG/STPROCINS/RDKLOCATETYPE_EQUATES.txt new file mode 100644 index 0000000..5a46380 --- /dev/null +++ b/SYSPROG/STPROCINS/RDKLOCATETYPE_EQUATES.txt @@ -0,0 +1,4 @@ +compile insert RDKLOCATETYPE_EQUATES +/* RDKLocateType equates */ +EQU RDKTYPEBYDESC$ TO 0 +EQU RDKTYPEBYNAME$ TO 1 diff --git a/SYSPROG/STPROCINS/RDKVIEW_EQUATES.txt b/SYSPROG/STPROCINS/RDKVIEW_EQUATES.txt new file mode 100644 index 0000000..6080119 --- /dev/null +++ b/SYSPROG/STPROCINS/RDKVIEW_EQUATES.txt @@ -0,0 +1,80 @@ +compile insert rdkview_equates +/* + ** Copyright (c) 1992-2016 Revelation Software. All rights reserved.** + + Author ?? + Date Pre-history + Purpose SYSREPOSVIEWS table column equates + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 16 Mar 16 Added Header Guards and versioning. + Added filter fields + mtr 04 Nov 15 Added to v10 +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RDKVIEW_EQUATES_ +#define _RDKVIEW_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ VIEW_MINVERSION$ to "1000" ; * // (10.00) + equ VIEW_CURVERSION$ to "1000" ; * // (10.00) Current version + + // SYSREPOSVIEWS column position equates// + equ VIEW_APPID$ to 1 // Key part + equ VIEW_VIEWID$ to 2 // Key part + + equ VIEW_TITLE$ to 1 + equ VIEW_DESC$ to 2 + equ VIEW_CREATED$ to 3 + equ VIEW_AUTHOR$ to 4 + equ VIEW_ENTCOUNT$ to 5 + equ VIEW_HISTDATE$ to 6 + equ VIEW_HISTBY$ to 7 + equ VIEW_HISTNOTE$ to 8 + equ VIEW_RES1$ to 9 + equ VIEW_RES2$ to 10 + equ VIEW_ENTLIST$ to 11 + equ VIEW_ENTIDS$ to 15 ; // * mtr Added 4 Nov 2015 + Equ view_QUICKDEPLOY_ENTIDS$ to 16 ; // * mtr Added 7 Apr 2023 + equ VIEW_VERSION$ to 20 + + equ VIEW_HEADERSIZE$ to 10 + + equ VIEW_FILTER_FLAG$ to 31 ; // TRUE$ if this is a filter view + equ VIEW_FILTER_VIEWID$ to 32 ; // VIEW ID to use as the base for the filter + equ VIEW_FILTER_TYPECLASS$ to 33 ; // @vm'd list of TYPE/CLASS IDS of entities to include + equ VIEW_FILTER_NOINHERIT$ to 34 ; // TRUE$ to only include entities from the current Application + equ VIEW_FILTER_PUBONLY$ to 35 ; // TRUE$ to only include publishable entities + equ VIEW_FILTER_LOCKEDONLY$ to 36 ; // TRUE$ to only include locked (checked out entities) + equ VIEW_FILTER_EVALONLY$ to 37 ; // TRUE$ to only include entities marked with the eval flag + equ VIEW_FILTER_RECMPONLY$ to 38 ; // TRUE$ to only include entities marked for recompilation + equ VIEW_FILTER_UPDATEDBY$ to 39 ; // Last user to update the entities (@vm for multiple) + equ VIEW_FILTER_NAME$ to 40 ; // Comparison for the ENTITYID, supports "[","]" and "[]" ops + equ VIEW_FILTER_FROM$ to 41 ; // Updated since - DT format or "nD" format for "days since" + equ VIEW_FILTER_TO$ to 42 ; // Updated to - DT format + equ VIEW_FILTER_SELECTSTMT$ to 43 ; // SELECT statement to execute + equ VIEW_FILTER_RESERVED$ to 44 ; // Reserved for system use. + + equ VIEW_FILTER_ID_PREFIX$ to "@" + + /* Menu equate values (branches for RepViewEdit_Menu) */ + equ VMENU_FILE_NEW$ to 1 + equ VMENU_FILE_OPEN$ to 2 + equ VMENU_FILE_SAVE$ to 3 + equ VMENU_FILE_SAVEAS$ to 4 + equ VMENU_GETWORKLIST$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/RDK_CFG_EQUATES.txt b/SYSPROG/STPROCINS/RDK_CFG_EQUATES.txt new file mode 100644 index 0000000..2aba6c7 --- /dev/null +++ b/SYSPROG/STPROCINS/RDK_CFG_EQUATES.txt @@ -0,0 +1,9 @@ +COMPILE Insert RDK_CFG_EQUATES + +Equ X_COORD$ To 1 +Equ Y_COORD$ To 2 +Equ W_COORD$ To 3 +Equ H_COORD$ To 4 +Equ PRODUCT_NAME$ To 5 +Equ PUBLISHER$ To 6 +Equ PRODUCT_URL$ To 7 diff --git a/SYSPROG/STPROCINS/REGISTRY_METHOD_EQUATES.txt b/SYSPROG/STPROCINS/REGISTRY_METHOD_EQUATES.txt new file mode 100644 index 0000000..44873dd --- /dev/null +++ b/SYSPROG/STPROCINS/REGISTRY_METHOD_EQUATES.txt @@ -0,0 +1,81 @@ +compile insert registry_Method_Equates +/* + Author : Captain C + Date : September 2002 + Purpose : equates for use with the registry_Method function + + Modified 110514 bzs to include registry redirect flags + +*/ + + * // Access right equates from WINDOWS.H + equ SYNCHRONIZE$ to 0x00100000 + equ STANDARD_RIGHTS_REQUIRED$ to 0x000F0000 + equ READ_CONTROL$ to 0x00020000 + equ WRITE_DAC$ to 0x00040000 + equ WRITE_OWNER$ to 0x00080000 + equ STANDARD_RIGHTS_READ$ to READ_CONTROL$ + equ STANDARD_RIGHTS_WRITE$ to READ_CONTROL$ + equ STANDARD_RIGHTS_EXECUTE$ to READ_CONTROL$ + equ STANDARD_RIGHTS_ALL$ to 0x001F0000 + equ SPECIFIC_RIGHTS_ALL$ to 0x0000FFFF + equ ACCESS_SYSTEM_SECURITY$ to 0x01000000 + equ MAXIMUM_ALLOWED$ to 0x02000000 + equ GENERIC_READ$ to 0x80000000 + equ GENERIC_WRITE$ to 0x40000000 + equ GENERIC_EXECUTE$ to 0x20000000 + equ GENERIC_ALL$ to 0x10000000 + equ KEY_QUERY_VALUE$ to 0x0001 + equ KEY_SET_VALUE$ to 0x0002 + equ KEY_CREATE_SUB_KEY$ to 0x0004 + equ KEY_ENUMERATE_SUB_KEYS$ to 0x0008 + equ KEY_NOTIFY$ to 0x0010 + equ KEY_CREATE_LINK$ to 0x0020 + equ KEY_READ$ to ( STANDARD_RIGHTS_READ$ + KEY_QUERY_VALUE$ + KEY_ENUMERATE_SUB_KEYS$ + KEY_NOTIFY$ ) + equ KEY_WRITE$ to ( STANDARD_RIGHTS_WRITE$ + KEY_SET_VALUE$ + KEY_CREATE_SUB_KEY$ ) + equ KEY_EXECUTE$ to KEY_READ$ + equ KEY_ALL_ACCESS$ to ( STANDARD_RIGHTS_ALL$ + KEY_QUERY_VALUE$ + KEY_SET_VALUE$ + KEY_CREATE_SUB_KEY$ + KEY_ENUMERATE_SUB_KEYS$ + KEY_NOTIFY$ + KEY_CREATE_LINK$ ) - SYNCHRONIZE$ + + * bzs 110514 added: + equ KEY_WOW64_32KEY$ to 0x0200 + equ KEY_WOW64_64KEY$ to 0x0100 + + * // Standard Registry Types + equ REG_NONE$ to 0 + equ REG_SZ$ to 1 + equ REG_EXPAND_SZ$ to 2 + equ REG_BINARY$ to 3 + equ REG_DWORD$ to 4 + equ REG_DWORD_LITTLE_ENDIAN$ to 4 + equ REG_DWORD_BIG_ENDIAN$ to 5 + equ REG_LINK$ to 6 + equ REG_MULTI_SZ$ to 7 + equ REG_RESOURCE_LIST$ to 8 + + * // Registry option equates + equ REG_OPTION_NON_VOLATILE$ to 0 + + * // Predefined registry keys from WINDOWS.H + equ HKEY_CLASSES_ROOT$ to 0x80000000 + equ HKEY_CURRENT_USER$ to 0x80000001 + equ HKEY_LOCAL_MACHINE$ to 0x80000002 + equ HKEY_USERS$ to 0x80000003 + equ HKEY_PERFORMANCE_DATA$ to 0x80000004 + equ HKEY_CURRENT_CONFIG$ to 0x80000005 + equ HKEY_DYN_DATA$ to 0x80000006 + + * // Root key text equates + equ HKEYTXT_CLASSES_ROOT$ to "HKEY_CLASSES_ROOT" + equ HKEYTXT_CURRENT_USER$ to "HKEY_CURRENT_USER" + equ HKEYTXT_LOCAL_MACHINE$ to "HKEY_LOCAL_MACHINE" + equ HKEYTXT_USERS$ to "HKEY_USERS" + equ HKEYTXT_PERFORMANCE_DATA$ to "HKEY_PERFORMANCE_DATA" + equ HKEYTXT_CURRENT_CONFIG$ to "HKEY_CURRENT_CONFIG" + equ HKEYTXT_DYN_DATA$ to "HKEY_DYN_DATA" + + * // Error codes from WINDOWS.H + equ ERROR_SUCCESS$ to 0 + + * // FormatMessage equates + equ FORMAT_MESSAGE_FROM_SYSTEM$ to 0x1000 + diff --git a/SYSPROG/STPROCINS/REPOSERRORS.txt b/SYSPROG/STPROCINS/REPOSERRORS.txt new file mode 100644 index 0000000..8a12283 --- /dev/null +++ b/SYSPROG/STPROCINS/REPOSERRORS.txt @@ -0,0 +1,173 @@ +compile insert REPOSERRORS +/* + * This program is proprietary and is not to be used by or disclosed + * to others, nor is it to be copied without written permission from + * Revelation Technologies, Inc. + + Author ??? + Date ??? + Purpose Error constants for use with repository-based functions + + Copyright (c) 1992-2015 Revelation Software. All rights reserved. + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 18 Dec 20 Added QBF Errors + Mr C 10 Oct 19 Added REP143/144 + Mr C 12 Mar 18 Added REP143 + Mr C 16 Apr 16 Added REP142 + Mr C 12 Jan 15 Added REP141 + Mr C 09 Nov 15 Added POP110-POP114 + Mr C 07 Oct 15 Added REP_OIWIN_COMMID_MISSING$ (REP315) + Mr C 15 Jun 15 Added REP510 + Mr C 21 Nov 14 Added REP140 + Mr C Feb 2014 Updated for v10 + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _REPOSERRORS_ +#define _REPOSERRORS_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Repository base method general error codes + equ REP_NO_METHOD_ERR$ to "REP100" ; * // no method for entity (entityid, message) + equ REP_2FEW_ARG_ERR$ to "REP101" ; * // least two args required for methods + equ REP_NO_FORWARD_ERR$ to "REP102" ; * // cannot forward message - no more parent class levels + equ REP_ENT_EXISTS_ERR$ to "REP110" ; * // cannot add entity - it already exists + equ REP_REF_MISSING$ to "REP111" ; * // Reference is missing - referential error ( ref entityid ) + equ REP_REF_APP_ERR$ to "REP112" ; * // reference crosses application lines (entityid) + equ REP_ENT_INVALID_ID$ to "REP113" ; * // Invalid entid (too many '*') + equ REP_TYPE_EXISTS_ERR$ to "REP117" ; * // cannot add type - it already exists + equ REP_APP_EXISTS_ERR$ to "REP118" ; * // cannot add app - it already exists + equ REP_APP_ILLEGAL_RIGHTS_ERR$ to "REP119" ; * // user %1% does not have rights to perform operation %2% against entity %3% + equ REP_APP_INHERIT_MOD_ERR$ to "REP120" ; * // inherited entity %1% cannot be modified + equ REP_BAD_FLAG_OPT_ERR$ to "REP121" ; * // invalid flag option code ( option ) + equ REP_BAD_FLAG_OP_ERR$ to "REP122" ; * // invalid flag operator code + equ REP_COMPONENT_NOEXISTS_ERR$ to "REP123" ; * // cannot find associated component %2% of entity %1% + equ REP_ILLEGAL_METHOD_ERR$ to "REP124" ; * // message %2% is not supported by the entity type/class %1% + equ REP_APP_MISSING_ERR$ to "REP125" ; * // app body missing in SYSAPPS + equ REP_DBSYNCH_LOCK_ERR$ to 'REP126' ; * // repository is being synchronized with the Database from another station + equ REP_CHECKCOPY_ERR$ to "REP127" ; * // Error copy entity %1% component %2% in checkout or extraction + equ REP_CHECKTOKEN_ERR$ to "REP128" ; * // Illegal location token used on hot format checkout + equ REP_COMPONENT_UPDATE_ERR$ to "REP129" ; * // Cannot update associated component %2% of entity %1% (%3%) + equ REP_MISSING_CLASS_DEF$ to "REP130" ; * // Missing SYSREPOSCLASSES definition for entity %1% (%2%).*/ + equ REP_MISSING_TYPE_DEF$ to "REP131" ; * // Missing SYSREPOSTYPES definition for entity %1% (%2%).*/ + equ REP_OPEN_SYSREPTYPES_ERR$ to "REP132" ; * // Error opening SYSREPOSTYPES table (%1%). + equ REP_OPEN_SYSREPCLASSES_ERR$ to "REP133" ; * // Error opening SYSREPOSCLASSES table (%1%). + equ REP_OLECREATESCRIPTCTRL_ERR$ to "REP134" ; * // Error creating MSScriptControl.ScriptControl (%1%). + equ REP_SCRIPTCTRLADDCODE_ERR$ to "REP135" ; * // Error adding code to Script Control (%1%). + equ REP_SCRIPTCTRLRUN_ERR$ to "REP136" ; * // Error running "%1%" function in Script Control (%2%). + equ REP_NOTEVENTCONTEXT$ to "REP137" ; * // %1% method for the %2% entity can only be executed in Event Context + equ REP_NOIDE$ to "REP138" ; * // %1% method for the %2% entity can only be executed with a running IDE + equ REP_INVALIDARG$ to "REP139" ; * // "%1%" is not a valid "%2%" parameter for the %3% method + equ REP_MISSING_LOCATION$ to "REP140" ; * // No LOCATION defined for the %1% entity + equ REP_MISSING_APPROW_ARG$ to "REP141" ; * // No AppRow passed to the %1% method for the %2% entity + equ REP_QETARGETNORESOLVED_ERR$ to "REP142" ; * // Unable to resolve the "%1%" quick event target for the "%2%" %3% event + equ REP_MISSING_PARENT_ID$ to "REP143" ; * // No parent ID specified for the %1% %2% method + equ REP_CANNOT_DELETE_SYSPROG$ to "REP144" ; * // The SYSPROG application cannot be deleted + equ REP_INVALID_APP_ERR$ to "REP145" ; * // %1% is not a valid application ID + + * // REP190 - REPOS_FILTER + equ REP_INVALID_FILTER$ to "REP190" ; * // Invalid REPFILTER definition passed to the %1% procedure + equ REP_INVALID_VIEW$ to "REP191" ; * // Invalid REPVIEW ID passed to the %1% procedure [%2%] + equ REP_EMPTY_VIEW$ to "REP192" ; * // Empty REPVIEW passed to the the %1% procedure + + equ REP_NO_EVENT_ERR$ to "REP200" ; * // No event found (controlid, controlclass, event ) + equ REP_BAD_WINNAME_ERR$ to "REP201" ; * // %1% is not a valid window, or is not currently running + + equ REP_ENT_NOEXISTS_ERR$ to "REP300" ; * // Entity %1% does not exist in the repository + equ REP_UNKNOWN_EVENT_TOKEN$ to "REP303" + equ REP_WIN_OBJ_DNE$ to "REP305" ; * // Window Executable %1% was not found in this application + + * // REP310 - 320 reserved for OIWIN_COMPILE_EQUATES + + equ REP_JMAP_TABLE_MISSING$ to "REP310" ; * // compile error: join information for table "%1%" has not been specified for the form + equ REP_JMAP_COLUMN_ERROR$ to "REP311" ; * // compile error: The column %2% is not found in table %1% + equ REP_JMAP_CONTROL_ERROR$ to "REP312" ; * // compile error: The join control %1% is not found in the form + equ REP_OIWIN_MENUCOMP_ERR$ to "REP313" ; * // menu compile error: nesting error + equ REP_JMAP_KEYPART_ERROR$ to "REP314" ; * // Incomplete key: Control for key part %1% is missing. + equ REP_OIWIN_COMMID_MISSING$ to "REP315" ; * // compile error: Commuter Moduler has not been defined for the form + + equ REP_ENT_MISMATCH_ERR$ to "REP333" + equ REP_UPDATE_PTR_ENTITY_ERR$ to "REP389" + + * // ----- 500 -------------------- + equ REP_WINEXEC_ERR$ to "REP500" ; * // Winexec Error #%1% + + * // GET_REPOS_ENTITIES_LAST_UPDATED + equ REP_INVALID_DATE_PARAMS$ to "REP510" ; * // The "Date From" cannot be after the "Date To" + + + * // OIEVENT error codes start from 700 + equ REP_OIEVENT_NOSUPER$ to "REP700" ; * // OIEVENT must have a super-control ( full-entid ) + equ REP_OIEVENT_ENT_DIFF$ to "REP701" ; * // POEVENT need to have entitid same + equ REP_OIEVENT_INVALID_CLASSID$ to "REP703" ; * // invalid classid as token + + * // Collaborative development -- 800 + equ REP_ENT_SHORTLOCK_ERR$ to "REP800" ; * // "Entity %1% locked by another session and could not be locked." + equ REP_ENT_OWNLOCK_ERR$ to "REP801" ; * // "Entity %1% is already locked by this session." + equ REP_ENT_LONGLOCK_ERR$ to "REP802" ; * // "Entity %1% is checked out by %2% and could not be locked." + equ REP_ENT_OWNLONGLOCK_ERR$ to "REP803" ; * // "Entity %1% is checked out by current user." + + equ REP_ENT_SHORTLOCK_TRANS_ERR$ to "REP804" ;* "Remote entity %1% locked by another session and could not be locked." + equ REP_ENT_OWNLOCK_TRANS_ERR$ to "REP805" ;* "Remote entity %1% is already locked by this session." + equ REP_ENT_LONGLOCK_TRANS_ERR$ to "REP806" ;* "Remote entity %1% is checked out by %2% and could not be locked." + equ REP_ENT_OWNLONGLOCK_TRANS_ERR$ to "REP807" ;* "Remote entity %1% is checked out by current user." + + ; * // Repository mirroring -- 900 + equ REP_MIRROR_CREATEFILE_ERR$ to "REP900" ;* "Error creating mirror file %1%; status %2" + equ REP_MIRROR_DELETEFILE_ERR$ to "REP901" ;* "Error deleting mirror file %1%; status %2" + equ REP_MIRROR_FILE_EXISTS_ERR$ to "REP902" ;* "A repository mirror file exists at location %1%." + equ REP_MIRROR_INSTALLED_ERR$ to "REP903" ;* "A repository mirror is already installed in this system." + equ REP_MIRROR_NOTINSTALLED_ERR$ to "REP904" ;* "A repository mirror is not installed in this system." + equ REP_MIRROR_COMPARE_ERR$ to "REP905" ;* "Row %1% shows differences." + equ REP_MIRROR_REPOS_LOCKED_ERR$ to "REP906" ;* "The Repository is in a state of error. Access to the repository is denied until a system administrator remedies the error condition." + + ; * // QBF errors + equ REP_NO_QBF_CRITERIA$ to 'REP932' ; // There are no records meeting this criteria + equ REP_QBF_SELECT_ERR$ to 'REP933' ; // The selection criteria is invalid + + ; * // Check-in/check-out errors. + equ CHK_DIR_CREATE_ERR$ to "CHK100" ;* Could not create directory %1%. + equ CHK_INVALID_STATUS$ to "CHK101" ;* Status %1% cannot be processed. + equ CHK_CREATE_REPOS_HOT_ERR$ to "CHK102" ;* Could not create hot repository on "%1%". + equ CHK_CREATE_REPOS_COLD_ERR$ to "CHK103" ;* Could not create cold repository on "%1%". + equ CHK_CREATE_VOL_EXIST_ERR$ to "CHK104" ;* Volume "%1%" already exists. Repository could not be created. + equ CHK_INVALID_FORMAT$ to "CHK105" ;* Invalid repository format "%1%". + + * // Popup Error codes + + equ POPUP_BADFILE$ to "POP101" ;* File %1% does not exist! + equ POPUP_BADFIELD$ to "POP102" ;* Field %1% set to null when a value expected! + equ POPUP_BADKEY$ to "POP103" ;* Invalid key %1% in file %2%! + equ POPUP_MODETYPE_CONFLICT$ to "POP104" ;* Mode %1% is incompatible with type %2%! + equ POPUP_BADTYPE$ to "POP105" ;* Type %1% is invalid! + equ POPUP_BADMODE$ to "POP106" ;* Mode %1% is invalid! + equ POPUP_NODICT$ to "POP107" ;* Dictionary does not exist for file %1%! + equ POPUP_NONNUM_FIELD$ to "POP108" ;* Non-numeric field name %1% in format argument not allowed with mode F! + equ POPUP_BADFORMAT$ to "POP109" ;* Format argument not allowed to be null! + equ POPUP_BADINSERT$ to "POP110" ;* Error inserting the "%1%" column! + equ POPUP_BADCUSTOMPROC$ to "POP111" ;* "%1%" is not a valid custom button procedure [%2%] + equ POPUP_BADCUSTOMPROCNOARGS$ to "POP112" ;* The "%1%" custom button procedure must accept at least one argument + equ POPUP_BADINITPROC$ to "POP113" ;* "%1%" is not a valid initialization procedure [%2%] + equ POPUP_BADINITPROCNOARGS$ to "POP114" ;* The "%1%" initialization procedure must accept at least two arguments + + * // MSG Error codes + + equ MSG_CREATION_ERROR$ to "MSG101" ;* Out of memory, or could not create MSG Dialog Box! + equ MSG_BADPARAMS_ERROR$ to "MSG102" ;* One or more parameters were invalid, or @fm's found in text! + + equ INDEXLOOKUP_NODICT$ to "IDX101" ;* Dictionary does not exist for file %1%! + equ INDEXLOOKUP_BADFILE$ to "IDX102" ;* File %1% does not exist! + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/REPOSITORY_EQUATES.txt b/SYSPROG/STPROCINS/REPOSITORY_EQUATES.txt new file mode 100644 index 0000000..2dde3ca --- /dev/null +++ b/SYSPROG/STPROCINS/REPOSITORY_EQUATES.txt @@ -0,0 +1,363 @@ +compile insert repository_equates +/* + Author ??? + Date ??? + Purpose Equates for use with repository-based functions + + Copyright (c) 1992-2022 Revelation Software. All rights reserved. + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 09 Sep 22 Added SYSAPPS ESERVER fields + Mr C 27 Jul 22 Added SYSAPPS WEBVIEWCONFIG fields + Mr C 14 Sep 21 Added SYSAPPS_FOCUSFGCOLOR$ + Mr C 25 Aug 20 Added SYSREPTYPES_CLASSHANDLERPROC$ + Added SYSREPTYPES_ENTHANDLERPROC$ + Added SYSREP_KEYFORMAT_ROW$ + Mr C 10 Oct 19 Added PUBLIC_DESC$ + Mr C 28 Sep 19 Added SYSAPPS_LOGON_TEMPLATE$ + MTR 04 Jun 19 Added Extended Math operators For Precision + Mr C 10 Apr 18 Added SYSAPPS SYSTEM FOCUSSTYLES fields + Mr C 04 Feb 18 Added SYSAPPS SHOWACCELERATORS field. + Mr C 09 Nov 17 Updated SYSAPPS structure. + Mr C 13 Sep 17 Added SYSBUILD values + Mr C 30 Aug 17 Added REPSTATE_SCMPREFIX$ + Mr C 24 Aug 17 Expanded KeyFormat definitions + Mr C 10 Aug 17 Added RTI_DSN_GENERIC preview handling fields + Mr C 07 Aug 17 Added SCMPULL/PUSH LOG tokens + bzs 22 May 17 Added support for specification of "utility" function + in type info to call to handle GET_REPOS_xxx functions + Mr C 21 Feb 17 Added PURGE log op. + Mr C 31 Mar 16 Added SYSREP_KEYFORMAT_E_$ + Mr C 22 Feb 16 Added RDKEXTRACTSPEC types + Mr C 11 Feb 16 Added 16x16 image fields + Mr C 28 Jan 16 Added SYSREPCLASSES_DESIGNTOOL$ + Mr C 14 Mar 15 Added UTF8 fields to SYSAPPS equates + Mr C 08 Mar 15 Added GETRDKEXTRACTSPEC equates + Added SYSREPOSTYPES fields for RTI_IDE integration + Mr C 26 Feb 15 Updated for more RDK/SCM mods + Mr C 01 Feb 14 Updated for v10 with new SYSREPOSTYPES and + SYSREPOSCLASSES columns. +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _REPOSITORY_EQUATES_ +#define _REPOSITORY_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function repository + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Entity States + equ REPSTATE_NEW$ to 1 + + // SCMNEW and SCMWRITE operations "hijack" the unused State parameter by + // adding a prefix to it to denote to the normal NEW/WRITE handlers that + // the operation is actually initiated from an SCM process (e.g. Git) + + // SCMNEW/WRITE prefix + equ REPSTATE_SCMPREFIX$ to "SCM*" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Repository Messages - this list is _way_ out of date!! + + equ MSG_ACCESS$ to 'ACCESS' + equ MSG_COMPILE$ to 'COMPILE' + equ MSG_DESTROY$ to 'DESTROY' + equ MSG_NEW$ to 'NEW' + // equ MSG_RENAME$ to 'RENAME' - never implemented? + equ MSG_TDESTROY$ to 'TDESTROY' + equ MSG_UPDATE$ to 'UPDATE' + equ MSG_WRITE$ to 'WRITE' + equ MSG_EXECUTE$ to 'EXECUTE' + equ MSG_COPY$ to 'COPY' + equ MSG_GETAPPID$ to 'GETAPPID' + equ MSG_GETSUB$ to 'GETSUB' + equ MSG_GETSUPER$ to 'GETSUPER' + equ MSG_SETSUB$ to 'SETSUB' + equ MSG_SETSUPER$ to 'SETSUPER' + equ MSG_GETDOCUMENT$ to 'GETDOCUMENT' + equ MSG_SETDOCUMENT$ to 'SETDOCUMENT' + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Repository Types - again, a tad out of date methinks ... + + equ REPTYPE_NOTE$ to 'APPNOTE' + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Log Operations + + equ LOGOP_NEW$ to "NEW" + equ LOGOP_CHECKOUT$ to "CHECKOUT" + equ LOGOP_CHECKIN$ to "CHECKIN" + equ LOGOP_UPDATE$ to "UPDATE" + equ LOGOP_DESTROY$ to "DESTROY" + equ LOGOP_WRITE$ to "WRITE" + equ LOGOP_RENAME$ to "RENAME" + equ LOGOP_COMPILE$ to "COMPILE" + equ LOGOP_COPY$ to "COPY" + equ LOGOP_PURGE$ to "PURGE" + equ LOGOP_SCMPULL$ to "SCMPULL" + equ LOGOP_SCMPUSH$ to "SCMPUSH" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // ENTID EQUATES + equ APPID$ to 1 + equ TYPEID$ to 2 + equ CLASSID$ to 3 + equ ENTITYID$ to 4 + equ TIMESTAMP$ to 5 + + equ METH_TYPEID$ to 2 + equ METH_CLASSID$ to 3 + equ METH_MESSAGE$ to 4 + + equ REPMETHOD$ to "$REPOS." + equ METHSEP$ to '.' + equ EVENTSEP$ to '.' + equ KEYSEP$ to '*' + equ ENTIDSEP$ to '.' + + equ PUBLIC$ to "$PUBLIC" + equ PUBLIC_DESC$ to "" + + // SCM conversion formats + equ SCMFMT_JSON$ to 0 ; // dynarray <-> JSON + equ SCMFMT_TEXT$ to 1 ; // @fm <-> CRLF + equ SCMFMT_BINARY$ to 2 ; // no conversion + + // SCMINCLUDE for SYSREPOSTYPES + equ SCMINCLUDE_TYPE_NEVER$ to 0; // == NULL + equ SCMINCLUDE_TYPE_EXCLUDE$ to 1; // Exclude, but allow entity to override + equ SCMINCLUDE_TYPE_INCLUDE$ to 2; // Include + + // SCMINCLUDE for SYSREPOSCLASSES + equ SCMINCLUDE_CLASS_USETYPE$ to ""; // + equ SCMINCLUDE_CLASS_NEVER$ to 0; // + equ SCMINCLUDE_CLASS_EXCLUDE$ to 1; // Exclude, but allow entity to override + equ SCMINCLUDE_CLASS_INCLUDE$ to 2; // Include + + // GETRDKEXTRACTSPEC method equates + equ GRES_POS_EXTRACTTYPE$ to 1 ; // PROC,OS,OI,REPOS,DOC etc + equ GRES_POS_STORAGETYPE$ to 2 ; // TRUE$ if OS storage, FALSE$ if LH + equ GRES_POS_STORAGELOCATION$ to 3 ; // TableName or OS directory (can be MV'd) + equ GRES_POS_STORAGEID$ to 4 ; // RecordID or OS filename (can be MV'd) + + // GETRDKEXTRACTSPEC types + equ GRES_TYPE_DOC$ to "DOC" + equ GRES_TYPE_OI$ to "OI" + equ GRES_TYPE_OS$ to "OS" + equ GRES_TYPE_PROC$ to "PROC" + equ GRES_TYPE_REPOS$ to "REPOS" + + // GETRDKEXTRACTSPEC storage types + equ GRES_STORAGE_LH$ to 0 + equ GRES_STORAGE_OS$ to 1 + + // SYSREPOSTYPES Key Formats + + equ SYSREP_KEYFORMAT_ACE$ to "ACE" ; // App*Class*Ent (default) + equ SYSREP_KEYFORMAT_ACE_DBG$ to "@ACE" ; // @App*Class*Ent (e.g OIEVENTDBG) + equ SYSREP_KEYFORMAT_AE$ to "AE" ; // App*Ent + equ SYSREP_KEYFORMAT_APR$ to "APR" ; // in Ent, in subkey + equ SYSREP_KEYFORMAT_COL$ to "COL" ; //
"." in Ent + equ SYSREP_KEYFORMAT_E$ to "E" ; // Ent + equ SYSREP_KEYFORMAT_E_$ to "E_" ; // Ent (first "_" to "*", e.g. SYSREPOSCLASSES record) + equ SYSREP_KEYFORMAT_EA$ to "EA" ; // Ent or Ent*App (e.g. STPROC) + equ SYSREP_KEYFORMAT_EA_DBG$ to "@EA" ; // @Ent or @Ent*App (e.g. STPROCEXE) + equ SYSREP_KEYFORMAT_EA_OBJ$ to "$EA" ; // $Ent or $Ent*App (e.g. STPROCDBG) + equ SYSREP_KEYFORMAT_LHOS$ to "LHOS" ; // OS or Rec in subkey, e.g. DOC types + equ SYSREP_KEYFORMAT_OS$ to "OS" ; // OS FilePath in subkey + equ SYSREP_KEYFORMAT_PEV$ to "PEV" ; // Promoted Event/Exe + equ SYSREP_KEYFORMAT_PEV_DBG$ to "@PEV" ; // Promoted Event/Exe Debug + equ SYSREP_KEYFORMAT_REC$ to "R" ; //
" " in subkey + equ SYSREP_KEYFORMAT_TBL$ to "TBL" ; // No location or key + + // Preview handling for OS files in RTI_DSN_GENERIC + equ OSGENPRVW_NONE$ to 0 ; // (Or null) - no preview + equ OSGENPRVW_RECEDIT$ to 1 ; // Use the record editor control + equ OSGENPRVW_WEBBROWSER$ to 2 ; // Use the web browser. + + // SYSBUILD values + equ SYSBUILD_IGNORE$ to 0 + equ SYSBUILD_INCLUDE$ to 1 + equ SYSBUILD_INCLUDE_SRC$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // following is the equates for SYSREPOSTYPEFAMILIES + equ SYSREPFAMILIES_NAME$ to 1 + equ SYSREPFAMILIES_ICON$ to 2 + equ SYSREPFAMILIES_IMAGESMALL$ to 3 ; // 24x24 + equ SYSREPFAMILIES_IMAGEMEDIUM$ to 4 ; // 32x32 + equ SYSREPFAMILIES_IMAGEMENU$ to 5 ; // 16x16 + equ SYSREPFAMILIES_DESIGNHELP$ to 6 ; // Repos key For an APPNOTE entity to display the "help" in RTI_IDE_NEW + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // following is the equates for SYSREPOSTYPES + equ SYSREPTYPES_TITLE$ to 1 + equ SYSREPTYPES_DESCRIPTION$ to 2 + equ SYSREPTYPES_MESSAGES$ to 3 ; // **DEPRECATED** Nothing in the toolset uses these? + equ SYSREPTYPES_EXEC_METHOD$ to 3 ; // **DEPRECATED** + equ SYSREPTYPES_CLASSHANDLERPROC$ to 3 ; // 'Utility' function to handle type/class REPOS_xxx calls + equ SYSREPTYPES_LOCATION$ to 4 + equ SYSREPTYPES_CLASSFLAG$ to 5 + equ SYSREPTYPES_FAMILY$ to 6 ; // **DEPRECATED** + equ SYSREPTYPES_STORAGEID$ to 6 ; // SYSREPOSSTORAGE + equ SYSREPTYPES_TYPEFAMILYID$ to 7 ; // SYSREPOSTYPEFAMILIES + equ SYSREPTYPES_OIEDITOR$ to 8 + equ SYSREPTYPES_FILTERMASK$ to 9 + equ SYSREPTYPES_ICON$ to 10 + equ SYSREPTYPES_IMAGESMALL$ to 11 ; // 24x24 + equ SYSREPTYPES_IMAGEMEDIUM$ to 12 ; // 32x32 + equ SYSREPTYPES_IMAGEMENU$ to 13 ; // 16x16 + equ SYSREPTYPES_STORAGETYPEOS$ to 14 ; // TRUE$ if entity can be stored as an OS file + equ SYSREPTYPES_STORAGETYPELH$ to 15 ; // TRUE$ if entity can be stored as an LH record + equ SYSREPTYPES_SCMFORMAT$ to 16 ; // See SCMFMT_ equates above + equ SYSREPTYPES_SCMINCLUDE$ to 17 ; // See SCMINCLUDE_TYPE_ equates above + equ SYSREPTYPES_RDKEXTRACTTYPE$ to 18 ; // PROC,DOC,OS,OI,REPOS + equ SYSREPTYPES_COMPILEFLAG$ to 19 ; // TRUE$ if entities of this type can be compiled + equ SYSREPTYPES_RESERVED_F20$ to 20 + equ SYSREPTYPES_DESIGNTOOL$ to 21 ; // RTI_DSN_DBTABLE, RTI_DSN_OIWIN, RTI_DSN_MSG, etc + equ SYSREPTYPES_DESIGNHELP$ to 22 ; // Repos key For an APPNOTE entity to display the "help" in RTI_IDE_NEW + equ SYSREPTYPES_NEWTEXT$ to 23 ; // The user-friendly text to be displayed in the RTI_IDE_NEW Types panel + equ SYSREPTYPES_NEWTOKEN$ to 24 ; // Token to pass to the DSN when creating a new entity + equ SYSREPTYPES_DESIGNSUB$ to 25 ; // TRUE$ if entities of this type support the DESIGNSUB method + equ SYSREPTYPES_KEYFORMAT$ to 26 ; // ACE (default), AE + equ SYSREPTYPES_ALLOWNEW$ to 27 ; // TRUE$ to show in the IDE NEW dialog + equ SYSREPTYPES_OSPREVIEWTYPE$ to 28 ; // How to handle previewing OS files in the the Generic DSN + equ SYSREPTYPES_ENTHANDLERPROC$ to 29 ; // 'Utility' function to handle entity-based REPOS_xxx calls + equ SYSREPTYPES_RESERVED_F30$ to 30 + + // PREVIEWTYPE - ITYPEHANDLER, WEBBROWSER, RECORD + + equ SYSREPTYPES_USER1$ to 31 + equ SYSREPTYPES_USER2$ to 32 + equ SYSREPTYPES_USER3$ to 33 + equ SYSREPTYPES_USER4$ to 34 + equ SYSREPTYPES_USER5$ to 35 + + equ SYSREPTYPES_SUBIDS$ to 40 + equ SYSREPTYPES_SUBTITLES$ to 41 + equ SYSREPTYPES_SUBICONS$ to 42 + equ SYSREPTYPES_SUBIMAGESMENU$ to 43 + equ SYSREPTYPES_SUBIMAGESSMALL$ to 44 + equ SYSREPTYPES_SUBIMAGESMEDIUM$ to 45 + equ SYSREPTYPES_SUBNEWTOKENS$ to 46 + equ SYSREPTYPES_SUBDESIGNHELP$ to 47 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // following is the equates for SYSREPOSCLASSES + equ SYSREPCLASSES_TITLE$ to 1 + equ SYSREPCLASSES_DESCRIPTION$ to 2 + equ SYSREPCLASSES_INFO$ to 3 ; // Deprecated + equ SYSREPCLASSES_LOCATION$ to 4 + equ SYSREPCLASSES_STORAGE$ to 5 + equ SYSREPCLASSES_FAMILY$ to 6 + equ SYSREPCLASSES_RESERVED_F7$ to 7 + equ SYSREPCLASSES_OIEDITOR$ to 8 + equ SYSREPCLASSES_FILTERMASK$ to 9 + equ SYSREPCLASSES_ICON$ to 10 + equ SYSREPCLASSES_IMAGESMALL$ to 11 ; // 24x24 + equ SYSREPCLASSES_IMAGEMEDIUM$ to 12 ; // 32x32 + equ SYSREPCLASSES_IMAGEMENU$ to 13 ; // 16x16 + equ SYSREPCLASSES_STORAGETYPEOS$ to 14 ; // TRUE$ if entity can be stored as an OS file + equ SYSREPCLASSES_STORAGETYPELH$ to 15 ; // TRUE$ if entity can be stored as an LH record + equ SYSREPCLASSES_SCMFORMAT$ to 16 ; // See SCMFMT_ equates above + equ SYSREPCLASSES_SCMINCLUDE$ to 17 ; // See SCMINCLUDE_CLASS_ equates above + equ SYSREPCLASSES_RDKEXTRACTTYPE$ to 18 ; // PROC,DOC,OS,OI,REPOS + equ SYSREPCLASSES_RESERVED_F19$ to 19 + equ SYSREPCLASSES_RESERVED_F20$ to 20 + equ SYSREPCLASSES_DESIGNTOOL$ to 21 ; // RTI_DSN_DBTABLE, RTI_DSN_OIWIN, RTI_DSN_MSG, etc + equ SYSREPCLASSES_DESIGNHELP$ to 22 ; // Repos key For an APPNOTE entity to display the "help" in RTI_IDE_NEW + equ SYSREPCLASSES_NEWTEXT$ to 23 ; // The user-friendly text to be displayed in the RTI_IDE_NEW Types panel + equ SYSREPCLASSES_NEWTOKEN$ to 24 ; // Token to pass to the DSN when creating a new entity + equ SYSREPCLASSES_DESIGNSUB$ to 25 ; // TRUE if entities of this class support the DESIGNSUB method (null to use the TYPE) + equ SYSREPCLASSES_KEYFORMAT$ to 26 ; // ACE (default), AE, (null to use the TYPE) + equ SYSREPCLASSES_ALLOWNEW$ to 27 ; // TRUE$ to show in the IDE NEW dialog (null to use the TYPE) + equ SYSREPCLASSES_OSPREVIEWTYPE$ to 28 ; // How to handle previewing OS files in the the Generic DSN + equ SYSREPCLASSES_RESERVED_F29$ to 29 + equ SYSREPCLASSES_RESERVED_F30$ to 30 + equ SYSREPCLASSES_USER1$ to 31 + equ SYSREPCLASSES_USER2$ to 32 + equ SYSREPCLASSES_USER3$ to 33 + equ SYSREPCLASSES_USER4$ to 34 + equ SYSREPCLASSES_USER5$ to 35 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // following is the equates for SYSAPPS - don't forget to update the fields + // in RevPS_Application.h if you change them here. + equ SYSAPPS_APPID$ to 0 + equ SYSAPPS_APPNAME$ to 1 + equ SYSAPPS_DBID$ to 2 + equ SYSAPPS_TEMPLATE_APP$ to 3 + equ SYSAPPS_INHERIT_APP$ to SYSAPPS_TEMPLATE_APP$ ; // Synonym + equ SYSAPPS_CREATED$ to 4 + equ SYSAPPS_COMPANY$ to 5 + equ SYSAPPS_AUTHOR$ to 6 + equ SYSAPPS_CREATE_PERMIT$ to 7 + equ SYSAPPS_ABSTRACT$ to 8 + equ SYSAPPS_DOCREF$ to 9 ; // Not used for v10 + equ SYSAPPS_DOCTOOL$ to 10 + equ SYSAPPS_ENTRY_TYPEID$ to 11 ; // Not used + equ SYSAPPS_ENTRY_CLASSID$ to 12 ; // Not used + equ SYSAPPS_ENTRY_ENTITYID$ to 13 + equ SYSAPPS_COLUMN_SUPPORT$ to 14 + equ SYSAPPS_LOGON_BANNER$ to 15 ; // Not used for v10 + equ SYSAPPS_UTF8_ENABLED$ to 16 + equ SYSAPPS_UTF8_DELIMCOUNT$ to 17 + equ SYSAPPS_LOGON_TEXT$ to 18 + equ SYSAPPS_FORM_BKCOLOR_FROM$ to 19 + equ SYSAPPS_FORM_BKCOLOR_TO$ to 20 + equ SYSAPPS_SHOWACCELERATORS$ to 21 + equ SYSAPPS_FOCUSBKCOLOR$ to 22 + equ SYSAPPS_CELLFOCUSRECTCOLOR$ to 23 + equ SYSAPPS_CELLFOCUSRECTSTYLE$ to 24 + equ SYSAPPS_CELLFOCUSRECTWEIGHT$ to 25 + equ SYSAPPS_EXTENDEDPRECISIONMODE$ to 26 + equ SYSAPPS_EXTENDEDPRECISIONDECIMALPLACES$ to 27 + equ SYSAPPS_LOGON_TEMPLATE$ to 28 + equ SYSAPPS_FOCUSFGCOLOR$ to 29 + equ SYSAPPS_WBV_BROWSEREXEFOLDER$ to 30 + equ SYSAPPS_WBV_USERDATAFOLDER$ to 31 + equ SYSAPPS_WBV_PROFILENAME$ to 32 + equ SYSAPPS_WBV_EXTRABROWSERARGS$ to 33 + equ SYSAPPS_WBV_TARGETVERSION$ to 34 + equ SYSAPPS_ESERVER_URL$ to 35 + equ SYSAPPS_ESERVER_PORT$ to 36 + equ SYSAPPS_ESERVER_UTF8_PORT$ to 37 + equ SYSAPPS_ESERVER_WEB_PORT$ to 38 + equ SYSAPPS_ESERVER_CHAT_PORT$ to 39 + equ SYSAPPS_ESERVER_VDIR$ to 40 + + // Defaults + equ SYSAPPS_DEF_EP_MODE$ to 0 ; // FALSE$ + equ SYSAPPS_DEF_EP_DECIMALPLACES$ to 32 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/REPOSIX_EQUATES.txt b/SYSPROG/STPROCINS/REPOSIX_EQUATES.txt new file mode 100644 index 0000000..0d0d0e4 --- /dev/null +++ b/SYSPROG/STPROCINS/REPOSIX_EQUATES.txt @@ -0,0 +1,68 @@ +compile insert reposix_Equates +/* + ** Copyright (C) 1992-2015 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Breanna Anderson + Date : July 2, 1993 + Purpose : Repository indexing system equates + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 12 Jun 15 Updated for v10, Added UPDATED indexing constants + mtr 12 Dec 02 Increased Max-Block_Size by 2 orders of magnitude +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _REPOSIX_EQUATES_ +#define _REPOSIX_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SYSREPOSIX_FILE$ to "SYSREPOSIX" + equ SYSREPOSIX_TEMP_FILE$ to "SYSREPOSIX_TEMP" + + equ REPIX_INDEX_COUNT$ to 9 + + * // index names + + equ REPIX_APP_TYPE_CLASS$ to "ATC" + equ REPIX_APP_TYPE_FLAG$ to "ATF" + equ REPIX_APP_TYPE$ to "ATX" + equ REPIX_APP$ to "AXX" + + equ REPIX_TYPE_BY_APP$ to "TBA" + equ REPIX_CLASS_BY_TYPE$ to "CTA" + equ REPIX_COL_BY_TABLE$ to "CBT" + + equ REPIX_UPDATED_YEAR$ to "AUY" + equ REPIX_UPDATED_DATE$ to "AUD" + + + equ SWAP_TOKEN$ to "~" + + *--- + * MTR 12-12-02 Increased Max-Block_Size by 2 orders of magnitude + *--- + equ MAX_BLOCK_SIZE$ to 3276800 + + + equ OVERFLOW_EXT$ to ".RIX" + + * // lockval = sc_appid<1> : REPOSIX_LOCK$ + equ REPOSIX_LOCK$ to "REPOSIX" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/REPOS_TOOLBAR_EQUATES.txt b/SYSPROG/STPROCINS/REPOS_TOOLBAR_EQUATES.txt new file mode 100644 index 0000000..82d526c --- /dev/null +++ b/SYSPROG/STPROCINS/REPOS_TOOLBAR_EQUATES.txt @@ -0,0 +1,85 @@ +compile insert repos_Toolbar_Equates +/* + Copyright (c) 2000-2018 Revelation Software. All rights reserved. + + * This program is proprietary and is not to be used by or disclosed + * to others, nor is it to be copied without written permission from + * Revelation Technologies, Inc. + + Author Mike Ruane + Date 07 Feb 2018 + Purpose Equates for the repos_ToolBar procedure + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _REPOS_TOOLBAR_EQUATES_ +#define _REPOS_TOOLBAR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + $insert repository_Equates + $insert logical +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ TOOLBAR_STORAGEID$ to "OI" ; * // SYSREPOSSTORAGE + equ TOOLBAR_FAMILYID$ to "UITOOLS" ; * // SYSREPOSTYPEFAMILIES + + equ TOOLBAR_REPOSTABLE$ to "SYSREPOSTOOLBARS" + equ TOOLBAR_REPOSVOL$ to "REVBOOT" + equ TOOLBAR_NEWTEXT$ to "Toolbar Definition" + equ TOOLBAR_REPOSDESC$ to "Toolbar Definitions" + equ TOOLBAR_REPOSDESCS$ to "Toolbar Definition records" + equ TOOLBAR_REPOSTYPE$ to "TOOLBAR" + equ TOOLBAR_REPOSCLASS$ to "" + equ TOOLBAR_METHODS$ to "ACCESS, | + CHECKCOPYINIT, | + CHECKIN, | + CHECKIN_TRANS, | + CHECKOUT, | + CHECKOUT_TRANS, | + CHECKWRAPUP, | + COMPILE, | + COPY, | + DESIGN, | + DESTROY, | + NEW, | + UPDATE, | + WRITE" + + equ TOOLBAR_HOOKPROCID$ to "REPOS_TOOLBAR_HOOK" + equ TOOLBAR_HOOKPROC$ to "$REPOS_TOOLBAR_HOOK" + equ TOOLBAR_HOOKPREFIX$ to "$REPOS." : TOOLBAR_REPOSTYPE$ : ".." + + equ TOOLBAR_SCMFORMAT$ to SCMFMT_JSON$ + equ TOOLBAR_SCMINCLUDE$ to SCMINCLUDE_TYPE_INCLUDE$ + equ TOOLBAR_STORAGETYPEOS$ to FALSE$ + equ TOOLBAR_STORAGETYPELH$ to TRUE$ + equ TOOLBAR_RDKEXTRACT$ to "OI" ; * ; * // RDKEXTRACTREPOSBODY + equ TOOLBAR_KEYFORMAT$ to SYSREP_KEYFORMAT_ACE$ + equ TOOLBAR_CLASSFLAG$ to FALSE$ + + equ TOOLBAR_ICON$ to "SYSPROG*IMAGE*ICO*RTI_IDE_REPTYPE_TOOLBAR" + equ TOOLBAR_IMG$ to "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_TOOLBAR" + equ TOOLBAR_IMG_SMALL$ to "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_TOOLBAR_S" + equ TOOLBAR_IMG_MEDIUM$ to "SYSPROG*IMAGE*PNG*RTI_IDE_REPTYPE_TOOLBAR_M" + + equ TOOLBAR_DSNTOOL$ to "RTI_DSN_TOOLBAR" + equ TOOLBAR_DSNHELP$ to "SYSPROG*APPNOTE**RTI_IDE_NEW_TOOLBAR" + equ TOOLBAR_DESIGNSUB$ to FALSE$ + equ TOOLBAR_COMPILEFLAG$ to FALSE$ + equ TOOLBAR_ALLOWNEW$ to TRUE$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/REPRES_EQUATES.txt b/SYSPROG/STPROCINS/REPRES_EQUATES.txt new file mode 100644 index 0000000..77cec88 --- /dev/null +++ b/SYSPROG/STPROCINS/REPRES_EQUATES.txt @@ -0,0 +1,99 @@ +compile insert repres_equates +/* + ** Copyright (C) 1992-2015 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : ?? + Date : ?? + Purpose : Equates for repository resource strings + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 12 Jun 15 Reviewed for v10 + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _REPRES_EQUATES_ +#define _REPRES_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function resToString + +/////////////////////////////////////////////////////////////////////////////// + + equ SYSRES_PREFIX_REP$ to 'REP' + equ REPRES_SYSTEM$ to 'SYSTEM' + + equ REPRES_SELECTREPOS$ to SYSRES_PREFIX_REP$ : 100 + equ REPRES_SELECTMIRROR$ to SYSRES_PREFIX_REP$ : 101 + equ REPRES_COMPAREROWS$ to SYSRES_PREFIX_REP$ : 102 + equ REPRES_REPMIRCOMPARE$ to SYSRES_PREFIX_REP$ : 103 + equ REPRES_SELECTTABLES$ to SYSRES_PREFIX_REP$ : 104 + equ REPRES_COMPARETABLES$ to SYSRES_PREFIX_REP$ : 105 + equ REPRES_MIRROR_PHYSICAL$ to SYSRES_PREFIX_REP$ : 106 + equ REPRES_MIRROR_FATAL$ to SYSRES_PREFIX_REP$ : 107 + equ REPRES_MIRROR_COMPARE$ to SYSRES_PREFIX_REP$ : 108 + equ REPRES_MIRROR_GET_ADMIN$ to SYSRES_PREFIX_REP$ : 109 + equ REPRES_MIRROR_LOG_MESSAGE$ to SYSRES_PREFIX_REP$ : 110 + equ REPRES_MIRROR_ATTACH_ERR$ to SYSRES_PREFIX_REP$ : 111 + equ REPRES_AUXVALUE$ to SYSRES_PREFIX_REP$ : 112 + equ REPRES_INDEXVALMISSING$ to SYSRES_PREFIX_REP$ : 113 + equ REPRES_PAGEMISSING$ to SYSRES_PREFIX_REP$ : 114 + equ REPRES_INDEXPAGEMISSING$ to SYSRES_PREFIX_REP$ : 115 + equ REPRES_ANALYZE$ to SYSRES_PREFIX_REP$ : 116 + equ REPRES_REMOVE$ to SYSRES_PREFIX_REP$ : 117 + equ REPRES_ADD$ to SYSRES_PREFIX_REP$ : 118 + equ REPRES_INDEX$ to SYSRES_PREFIX_REP$ : 119 + equ REPRES_REMOVINGFROMIX$ to SYSRES_PREFIX_REP$ : 120 + equ REPRES_DBREPSYNCH$ to SYSRES_PREFIX_REP$ : 121 + equ REPRES_GETTINGDBLIST$ to SYSRES_PREFIX_REP$ : 122 + equ REPRES_GETTINGREPTABLELIST$ to SYSRES_PREFIX_REP$ : 123 + equ REPRES_GETTINGREMOVELIST$ to SYSRES_PREFIX_REP$ : 124 + equ REPRES_REMOVETHIS$ to SYSRES_PREFIX_REP$ : 125 + equ REPRES_GETADDLIST$ to SYSRES_PREFIX_REP$ : 126 + equ REPRES_ADDTHIS$ to SYSRES_PREFIX_REP$ : 127 + equ REPRES_SOURCE$ to SYSRES_PREFIX_REP$ : 128 + equ REPRES_DEBUGTABLES$ to SYSRES_PREFIX_REP$ : 129 + equ REPRES_EXECUTABLES$ to SYSRES_PREFIX_REP$ : 130 + equ REPRES_INSERTS$ to SYSRES_PREFIX_REP$ : 131 + equ REPRES_STPROCREPOSSYNCH$ to SYSRES_PREFIX_REP$ : 132 + equ REPRES_GETTINGSTPROCLIST$ to SYSRES_PREFIX_REP$ : 133 + equ REPRES_REMOVINGENTITIES$ to SYSRES_PREFIX_REP$ : 134 + equ REPRES_REMOVINGEXECUTENTITIES$ to SYSRES_PREFIX_REP$ : 135 + equ REPRES_ADDINGENTITIES$ to SYSRES_PREFIX_REP$ : 136 + equ REPRES_ADDINGEXECUTENTITIES$ to SYSRES_PREFIX_REP$ : 137 + equ REPRES_ADDINGSOURCEENTITIES$ to SYSRES_PREFIX_REP$ : 138 + equ REPRES_ADDINGINSERTENTITIES$ to SYSRES_PREFIX_REP$ : 139 + equ REPRES_ADDINGTOINDEX$ to SYSRES_PREFIX_REP$ : 140 + equ REPRES_INITIALIZING$ to SYSRES_PREFIX_REP$ : 141 + equ REPRES_INSTALLING$ to SYSRES_PREFIX_REP$ : 142 + equ REPRES_SELECTINGRECORDS$ to SYSRES_PREFIX_REP$ : 143 + equ REPRES_INSTALLINGRECORDS$ to SYSRES_PREFIX_REP$ : 144 + equ REPRES_THISLOCATIONCONTAINSIX$ to SYSRES_PREFIX_REP$ : 145 + equ REPRES_UNDECLAREDVAR$ to SYSRES_PREFIX_REP$ : 150 + equ REPRES_UNUSEDVAR$ to SYSRES_PREFIX_REP$ : 151 + equ REPRES_MISTYPEDSYSCOMVAR$ to SYSRES_PREFIX_REP$ : 152 + equ REPRES_MISTYPEDVAR$ to SYSRES_PREFIX_REP$ : 153 + equ REPRES_DICTEQUATEORPHAN$ to SYSRES_PREFIX_REP$ : 154 + equ REPRES_LINECOUNT$ to SYSRES_PREFIX_REP$ : 155 + equ REPRES_EXTRACTING$ to SYSRES_PREFIX_REP$ : 156 + equ REPRES_BUILDING$ to SYSRES_PREFIX_REP$ : 157 + equ REPRES_REBUILDREPOSINDEX$ to SYSRES_PREFIX_REP$ : 158 + equ REPRES_EXTRACTINDEXINFO$ to SYSRES_PREFIX_REP$ : 159 + equ REPRES_BUILDINGINDEXAOFB$ to SYSRES_PREFIX_REP$ : 160 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/REVCAPI_EQUATES.txt b/SYSPROG/STPROCINS/REVCAPI_EQUATES.txt new file mode 100644 index 0000000..9ef626f --- /dev/null +++ b/SYSPROG/STPROCINS/REVCAPI_EQUATES.txt @@ -0,0 +1,35 @@ +compile Insert REVCAPI_EQUATES + +// CreateEngine Constants +equ CREATE_ENGINE_OPEN_EXISTING$ to 0x000 +equ CREATE_ENGINE_CREATE_NEW$ to 0x001 +equ CREATE_ENGINE_OPEN_ALWAYS$ to 0x002 +equ CREATE_ENGINE_INDEXER$ to 0x010 +equ CREATE_ENGINE_WAIT_ON_CLOSE$ to 0x020 + +equ UNPROCESSED$ to 0 ;*Server has not begun request. +equ PROCESSING$ to 1 ;* Server is processing request. +equ DATA_AVAILABLE$ to 2 ;* Server has data available. +equ COMPLETED$ to 3 ;* Server has completed request, status information is available. +equ PROC_ERROR$ to 4 ;* Server process failed, status information is available. +equ INFO_AVAILABLE$ to 5 ;* Server has intermediate status information available. +equ INFO_REQUEST$ to 10 ;* Server is requesting information from client. + +declare function CreateEngine ;* Error = CreateEngine(Engine, ServerSpec, DatabaseName, Flags, ShutdownSessions) +declare function CreateQueue ;* Error = CreateQueue(Queue, Engine, QueueName, DatabaseName, UserName, Password) +declare function CreateRequest ;* Error = CreateRequest(Request, Queue, Script, Arg1, Arg2, ...) +declare function PollForReply ;* Error = PollForReply(Request, Status[, Reply]) +declare function WaitForReply ;* Error = WaitForReply(Request, Status[, Reply]) +declare function GetReply ;* Error = GetReply(Request, Reply) +declare function SendResponse ;* Error = SendResponse(Request, Response) +declare function GetStatusText ;* Error = GetStatusText(Request, Delimiter, Text) +declare function CloseRequest ;* Error = CloseRequest(Request) +declare subroutine CloseRequest ;* Error = CloseRequest(Request) +declare function CallSubroutine ;* Error = CallSubroutine(Queue, Procedure, Arg1, Arg2, ...) +declare function CallFunction ;* Error = CallFunction(Queue, ReturnValue, Procedure, Arg1, Arg2,...) +declare function CloseQueue ;* Error = CloseQueue(Queue) +declare subroutine CloseQueue +declare function CloseEngine ;* Error = CloseEngine(Engine) +declare subroutine CloseEngine + + diff --git a/SYSPROG/STPROCINS/REVCMDLOCKS.txt b/SYSPROG/STPROCINS/REVCMDLOCKS.txt new file mode 100644 index 0000000..0cdb4a6 --- /dev/null +++ b/SYSPROG/STPROCINS/REVCMDLOCKS.txt @@ -0,0 +1,2 @@ +compile insert REVCMDLOCKS +COMMON /REVCMDLOCKS/ REVCMD_TOTALLOCKS, REVCMD_NEWLOCKS diff --git a/SYSPROG/STPROCINS/REVDOTNETEQUATES.txt b/SYSPROG/STPROCINS/REVDOTNETEQUATES.txt new file mode 100644 index 0000000..ba11e18 --- /dev/null +++ b/SYSPROG/STPROCINS/REVDOTNETEQUATES.txt @@ -0,0 +1,17 @@ +compile insert REVDOTNETEQUATES + + Equ REVDOTNET_INFO_CLASSES To 1 + Equ REVDOTNET_INFO_METHODS To 2 + Equ REVDOTNET_INFO_PROPERTIES To 3 + Equ REVDOTNET_INFO_EVENTS To 4 + Equ REVDOTNET_INFO_FIELDS To 5 + Equ REVDOTNET_INFO_INTERFACES To 6 + Equ REVDOTNET_INFO_TYPE_VALUES To 7 + Equ REVDOTNET_INFO_ERROR_OBJECT_NAME To 8 + Equ REVDOTNET_INFO_ERROR_OBJECT To 9 + + Equ REVDOTNET_COMMON_NAME_DEFAULT$ To "DOTNETCOMMON_DEFAULT" + + Declare Subroutine events.net, free_class.net + Declare Function GET_INFO.NET, CREATE_CLASS.NET, StartDotNet, ParseDotNet, Create_Params.net + Declare function set_property.net, send_message.net, get_property.net, CheckDotNet, Array_Utility.net diff --git a/SYSPROG/STPROCINS/REVDOTNET_COMMON.txt b/SYSPROG/STPROCINS/REVDOTNET_COMMON.txt new file mode 100644 index 0000000..9cc5178 --- /dev/null +++ b/SYSPROG/STPROCINS/REVDOTNET_COMMON.txt @@ -0,0 +1,14 @@ +compile insert REVDOTNET_COMMON + +Equ INTERNAL_OBJECT_START$ To "{RevDotNet Object:" +Equ INTERNAL_OBJECT_PREFIX$ To 18 +Equ INTERNAL_PARAMS_START$ To "{RevDotNet Params:" +Equ INTERNAL_PARAMS_PREFIX$ To 18 +Equ INTERNAL_DLLOBJECT_START$ To "{-R.N-" +Equ INTERNAL_DLLOBJECT_END$ To "-R.N-}" +Equ INTERNAL_DLLOBJECT_PREFIX$ To 6 + +Equ MAX_OBJECTS$ To 50000 +*common /DOTNETINTERNALS/ ObjectStack(MAX_OBJECTS$), DetailsStack(MAX_OBJECTS$), NextUsed@, FreeList@ + +COMMON //SDNHandle// DotNetHashTable@, NextUsed@ diff --git a/SYSPROG/STPROCINS/REV_CONVCONTEXT_EQUATES.txt b/SYSPROG/STPROCINS/REV_CONVCONTEXT_EQUATES.txt new file mode 100644 index 0000000..d9fa3a3 --- /dev/null +++ b/SYSPROG/STPROCINS/REV_CONVCONTEXT_EQUATES.txt @@ -0,0 +1,43 @@ +compile insert rev_ConvContext_Equates +/* + Author : Darth McC + Date : 18 Jun 07 + Purpose : Equates for use with the GetConvContext and SetConvContext + functions + + + Comments + ======== + + + Amended Date Version Reason + ======= ==== ======= ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +#IFNDEF _REV_CONVCONTEXT_EQUATES_ +#DEFINE _REV_CONVCONTEXT_EQUATES_ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare subroutine setOIState + declare function getOIState + + $insert rev_Conv_Equates + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Context equates + + equ OISTATE_NORMAL$ to 0 + equ OISTATE_CTO$ to 1 + Equ OISTATE_AREV32$ To 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +#ENDIF + diff --git a/SYSPROG/STPROCINS/REV_CONV_EQUATES.txt b/SYSPROG/STPROCINS/REV_CONV_EQUATES.txt new file mode 100644 index 0000000..2968769 --- /dev/null +++ b/SYSPROG/STPROCINS/REV_CONV_EQUATES.txt @@ -0,0 +1,31 @@ +compile insert rev_Conv_Equates +/* + Author : Darth McC + Date : 18 Jun 07 + Purpose : Equates for use with iconv and oconv + + + Comments + ======== + + + Amended Date Version Reason + ======= ==== ======= ====== +*/ +#IFNDEF _REV_CONV_EQUATES_ +#DEFINE _REV_CONV_EQUATES_ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Conv Status() equates + + equ CONV_VALID$ to 0 ; * // Sucessful + equ CONV_INVALID_MSG$ to 1 ; * // Bad Data - Display error message + equ CONV_INVALID_CONV$ to 2 ; * // Bad Conv pattern - Display error message + equ CONV_INVALID_MOMSG$ to 3 ; * // Bad - No error message + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +#ENDIF diff --git a/SYSPROG/STPROCINS/REV_DATATYPES.txt b/SYSPROG/STPROCINS/REV_DATATYPES.txt new file mode 100644 index 0000000..5600c64 --- /dev/null +++ b/SYSPROG/STPROCINS/REV_DATATYPES.txt @@ -0,0 +1,8 @@ +compile insert REV_DATATYPES +equ rev_charstr$ to 1 +equ rev_integer$ to 2 +equ rev_float$ to 3 +equ rev_binary$ to 4 +equ rev_text to 5 +equ rev_lrgbinary$ to 6 +* Source Date: 16:42:21 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/REV_PRECOMPILERS_COMMON.txt b/SYSPROG/STPROCINS/REV_PRECOMPILERS_COMMON.txt new file mode 100644 index 0000000..eab2022 --- /dev/null +++ b/SYSPROG/STPROCINS/REV_PRECOMPILERS_COMMON.txt @@ -0,0 +1,11 @@ +compile Insert rev_precompilers_common +/* + + SEE proc REV_PRECOMPILERS + + 10-07-2005 rjc Created +*/ +common /rev_precompilers_common/precompiler_list@,precomp_init@,precomp_extra1@,precomp_extra2@,precomp_extra3@,precomp_extra4@ + + + diff --git a/SYSPROG/STPROCINS/RLIST_EQUATES.txt b/SYSPROG/STPROCINS/RLIST_EQUATES.txt new file mode 100644 index 0000000..1c96572 --- /dev/null +++ b/SYSPROG/STPROCINS/RLIST_EQUATES.txt @@ -0,0 +1,54 @@ +compile insert rList_Equates +/* + *** RLIST_EQUATES *** + + Amended Date Reason + ======= ==== ====== + rjc 20 Jan 22 Added TARGET_EDITTABLE$ + rjc 28 Dec 17 Added TARGET_CALLBACK_NOFMT$ + bzs 25 Jan 17 Added TARGET_VARIABLE$ + Mr C 29 Oct 15 Added header guards +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RLIST_EQUATES_ +#define _RLIST_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + DECLARE SUBROUTINE RLIST + + ** Targets + + EQU TARGET_PRINTER$ TO 0 + EQU TARGET_CLIENT$ TO 1 + Equ TARGET_VARIABLE$ To 2 ;* BZS 012517 + EQU TARGET_CALLBACK$ TO 3 + EQU TARGET_SAVELIST$ TO 4 + EQU TARGET_ACTIVELIST$ TO 5 + EQU TARGET_LATENTLIST$ TO 6 + EQU TARGET_CHECKSYNTAX$ TO 7 + Equ TARGET_CALLBACK_NOFMT$ To 8 + Equ TARGET_BRWDESIGN$ To 9 + Equ TARGET_XLIST$ To 10 + Equ TARGET_EDITTABLE$ To 11 + Equ TARGET_OSFILE$ To 12 + Equ TARGET_OLIST$ To 13 + + ** Callback Codes + + EQU CALLCODE_DATA$ TO 1 + EQU CALLCODE_INFO$ TO 2 + EQU CALLCODE_ERR$ TO 3 + EQU CALLCODE_HEADER$ TO 4 + EQU CALLCODE_COLHEAD$ TO 5 + EQU CALLCODE_FOOTER$ TO 6 + Equ CALLCODE_DATA_DELIMITED$ To 7 + EQU CALLCODE_ENDREPORT$ TO 9 + + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_AXSH_EQUATES.txt b/SYSPROG/STPROCINS/RTI_AXSH_EQUATES.txt new file mode 100644 index 0000000..c735c77 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_AXSH_EQUATES.txt @@ -0,0 +1,366 @@ +compile insert rti_AXSH_Equates +/* + ** Copyright (C) 1992-2019 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : March 2017 + Purpose : Constants for use with the ActiveX Scripting Host function in + : RevAXSH.dll + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 14 Mar 19 Documentation update + Mr C 30 Mar 17 Documentation update + Mr C 29 Mar 17 Added RevEx and AddObject methods + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_AXSH_EQUATES_ +#define _RTI_AXSH_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_AXSH + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Return error codes + + equ REVAXSH_SUCCESS$ to 0 + equ REVAXSH_ERR_BAD_METHOD$ to -1; + equ REVJSON_ERR_NULL_RET_AXSH$ to -2; + equ REVAXSH_ERR_NO_LANG$ to -3; + equ REVAXSH_ERR_SCRIPT_INIT$ to -4; + equ REVAXSH_ERR_SET_SITE$ to -5; + equ REVAXSH_ERR_GET_PARSER$ to -6; + equ REVAXSH_ERR_PARSER_INIT$ to -7; + equ REVAXSH_ERR_NULL_HANDLE$ to -8; + equ REVAXSH_ERR_BAD_HANDLE$ to -9; + equ REVAXSH_ERR_NULL_SIZE$ to -10; + equ REVAXSH_ERR_NULL_BUFFER$ to -11; + equ REVAXSH_ERR_BUFFER_SIZE$ to -12; + equ REVAXSH_ERR_BUFFER_TOO_SMALL$ to -13; + equ REVAXSH_ERR_BAD_PROP_NAME$ to -14; + equ REVAXSH_ERR_NULL_RET_SIZE$ to -15; + equ REVAXSH_ERR_NULL_STATEMENT$ to -16; + equ REVAXSH_ERR_EVAL$ to -17; + equ REVAXSH_ERR_CATINFO$ to -18; + equ REVAXSH_ERR_IDISPATCH$ to -19; + equ REVAXSH_ERR_BAD_SCRIPT_MTD$ to -20; + equ REVAXSH_ERR_OUT_OF_MEM$ to -21; + equ REVAXSH_ERR_NULL_OBJ_NAME$ to -22; + equ REVAXSH_ERR_NULL_OBJ_IDISP$ to -23; + equ REVAXSH_ERR_STDEXCEPTION$ to -99; + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Method IDs + + equ REVAXSH_MTD_CREATE$ to 1; + equ REVAXSH_MTD_DESTROY$ to 2; + equ REVAXSH_MTD_GETPROP$ to 3; + equ REVAXSH_MTD_SETPROP$ to 4; + equ REVAXSH_MTD_ADDCODE$ to 5; + equ REVAXSH_MTD_EVAL$ to 6; + equ REVAXSH_MTD_EXECUTE$ to 7; + equ REVAXSH_MTD_RUN$ to 8; + equ REVAXSH_MTD_GETENGINES$ to 9; + equ REVAXSH_MTD_ADDOBJECT$ to 10; + equ REVAXSH_MTD_RUNEX$ to 11; + equ REVAXSH_MTD_GETRETVAL$ to 99; + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVAXSH_MTD_CREATE$ +// +// Creates an ActiveX scripting host instance and returns it's handle. +// +// The instance is initialised with the following information: +// +// <1> Script Language (required) +// <2> AllowUI (1/0) +// <3> hwndSite +// <4> Timeout in milliseconds (-1 == no Timeout, otherwise > 0) +// +// e.g. +// +// createParam = "jScript" : @fm : TRUE$ : @fm : @@window->handle +// hAXSH = rti_AXSH( REVAXSH_MTD_CREATE$, createParam ) +// +// ---------------------------------------------------------------------------- +// [i] createParam : an @fm delimited dynamic array as specified [required] +// : above. +// ---------------------------------------------------------------------------- +// [r] The handle of the new AXSH instance of successful, otherwise "0". +// ---------------------------------------------------------------------------- +// [e] All errors are returned via Set_Status() +// ---------------------------------------------------------------------------- + + // CreateParam constants + equ REVAXSH_CREATE_POS_LANGUAGE$ to 1 + equ REVAXSH_CREATE_POS_ALLOWUI$ to 2 + equ REVAXSH_CREATE_POS_HWNDSITE$ to 3 + equ REVAXSH_CREATE_POS_TIMEOUT$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVAXSH_MTD_DESTROY$ +// +// Destroys a script host instance. +// +// call rti_AXSH( REVAXSH_MTD_DESTROY$, hAXSH ) +// +// ---------------------------------------------------------------------------- +// [i] hAXSH : Handle of the scripting host to destroy [required] +// ---------------------------------------------------------------------------- +// [e] All errors are returned via Set_Status() +// ---------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVAXSH_MTD_GETPROP$ +// +// Returns the value of a specified property +// +// e.g. +// +// propName = REVAXSH_PROP_LANGAUGE$ +// language = rti_AXSH( REVAXSH_MTD_GETPROP$, hAXSH, propName ) +// +// ---------------------------------------------------------------------------- +// [i] hAXSH : Handle of the scripting host to access [required] +// [i] propName : Name of the property to access [required] +// ---------------------------------------------------------------------------- +// [r] The property value +// ---------------------------------------------------------------------------- +// [e] All errors are returned via Set_Status() +// ---------------------------------------------------------------------------- + + // Supported properties: + equ REVAXSH_PROP_LANGAUGE$ to "Language" // Get + equ REXAXSH_PROP_ALLOWUI$ to "AllowUI" // Get/Set + equ REXAXSH_PROP_SITEHWND$ to "SiteHwnd" // Get/Set + equ REXAXSH_PROP_TIMEOUT$ to "Timeout" // Get/Set + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVAXSH_MTD_SETPROP$ +// +// Sets the value of a specified property +// +// e.g. +// +// propName = REVAXSH_PROP_ALLOWUI$ +// propValue = FALSE$ +// call rti_AXSH( REVAXSH_MTD_SETPROP$, hAXSH, propName, propValue ) +// +// ---------------------------------------------------------------------------- +// [i] hAXSH : Handle of the scripting host to access [required] +// [i] propName : Name of the property to access [required] +// [i] propValue : New property value to set. +// ---------------------------------------------------------------------------- +// [r] N/a +// ---------------------------------------------------------------------------- +// [e] All errors are returned via Set_Status() +// ---------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVAXSH_MTD_ADDOBJECT$ +// +// Adds a global named object to the scripting host +// +// e.g. +// +// objName = "MyXmlDoc" +// objDoc = OleCreateInstance( "Msxml2.DOMDocument" ) +// call rti_AXSH( REVAXSH_MTD_ADDOBJECT$, hAXSH, objName, objDoc ) +// +// ---------------------------------------------------------------------------- +// [i] hAXSH : Handle of the scripting host to access [required] +// [i] objName : "Script name" of the object being added [required] +// [i] oleVar : OLE object being added [required] +// ---------------------------------------------------------------------------- +// [r] N/a +// ---------------------------------------------------------------------------- +// [e] All errors are returned via Set_Status(). See below for notes on +// scripting errors +// ---------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVAXSH_MTD_ADDCODE$ +// +// Adds a block of code to the scripting host (Any immediate code will be +// executed as normal) +// +// e.g. +// +// scriptCode = "function add( a, b ) { return a + b; }" +// call rti_AXSH( REVAXSH_MTD_ADDCODE$, hAXSH, scriptCode ) +// +// ---------------------------------------------------------------------------- +// [i] hAXSH : Handle of the scripting host to access [required] +// [i] scriptCode : Code to add. [required] +// ---------------------------------------------------------------------------- +// [r] N/a +// ---------------------------------------------------------------------------- +// [e] All errors are returned via Set_Status(). See below for notes on +// scripting errors +// ---------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVAXSH_MTD_EVAL$ +// +// Evaluates a statement and returns the result. +// +// e.g. +// +// statement = "3+10;" +// retVal = rti_AXSH( REVAXSH_MTD_EVAL$, hAXSH, statement ) +// +// ---------------------------------------------------------------------------- +// [i] hAXSH : Handle of the scripting host to access [required] +// [i] statement : Code to evaluate. [required] +// ---------------------------------------------------------------------------- +// [r] The result of the evaluation. +// ---------------------------------------------------------------------------- +// [e] All errors are returned via Set_Status(). See below for notes on +// scripting errors +// ---------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVAXSH_MTD_EXECUTE$ +// +// Executes one or more statements (no result is returned) +// +// e.g. +// +// scriptCode = "function add10( a, b ) { return a + 10; }; add10( 3 );" +// call rti_AXSH( REVAXSH_MTD_EXECUTE$, hAXSH, scriptCode ) +// +// ---------------------------------------------------------------------------- +// [i] hAXSH : Handle of the scripting host to access [required] +// [i] statement : Code to execute. [required] +// ---------------------------------------------------------------------------- +// [r] N/a +// ---------------------------------------------------------------------------- +// [e] All errors are returned via Set_Status(). See below for notes on +// scripting errors +// ---------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVAXSH_MTD_RUN$ +// +// Executes a specific script function and returns the result (if any). +// +// e.g. +// +// scriptCode = "function add( a, b ) { return a + b; }" +// call rti_AXSH( REVAXSH_MTD_ADDCODE$, hAXSH, scriptCode ) +// +// method = "add" +// args = 3 : @rm : 4 +// retVal = rti_AXSH( REVAXSH_MTD_RUN$, hAXSH, method, args ) +// +// ---------------------------------------------------------------------------- +// [i] hAXSH : Handle of the scripting host to access [required] +// [i] method : name of the function to execute [required] +// [i] args : @rm'd list of arguments to pass to the function. +// ---------------------------------------------------------------------------- +// [r] Return value from the function (if any) +// ---------------------------------------------------------------------------- +// [e] All errors are returned via Set_Status(). See below for notes on +// scripting errors +// ---------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVAXSH_MTD_RUNEX$ +// +// Executes a specific script function and returns the result (if any), allowing +// the script function parameters to be passed as separate arguments (This +// method is the only method that can pass OLE objects to a script function) +// +// The maximum number of parameters that can be passed is 10. Note that this +// method stops looking for script function arguments when it encounters the +// first unassigned one. +// +// e.g. +// +// scriptCode = "function add( a, b ) { return a + b; }" +// call rti_AXSH( REVAXSH_MTD_ADDCODE$, hAXSH, scriptCode ) +// +// method = "add" +// arg1 = 3 +// arg2 = 4 +// retVal = rti_AXSH( REVAXSH_MTD_RUN$, hAXSH, method, arg1, arg2 ) +// +// ---------------------------------------------------------------------------- +// [i] hAXSH : Handle of the scripting host to access [required] +// [i] method : name of the function to execute [required] +// [i] arg1 : First parameter to pass to the function +// [i] arg2 : Second parameter to pass to the function +// | | +// v v +// [i] arg10 : Tenth parameter to pass to the function +// ---------------------------------------------------------------------------- +// [r] Return value from the function (if any) +// ---------------------------------------------------------------------------- +// [e] All errors are returned via Set_Status(). See below for notes on +// scripting errors +// ---------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVAXSH_MTD_GETENGINES$ +// +// Returns a list of ActiveX script engines installed on the workstation. +// +// e.g. +// +// engineList = rti_AXSH( REVAXSH_MTD_GETENGINES$ ) +// +// ---------------------------------------------------------------------------- +// [r] An @fm delimited list of installed engines. +// ---------------------------------------------------------------------------- +// [e] All errors are returned via Set_Status(). See below for notes on +// scripting errors +// ---------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// Scripting errors +// +// The Execute, AddCode, Eval and Run methods can all return parsing and +// execution errors from the scripting engine. In this case an @svm delimited +// list of error information is returned with the following structure: +// +// <0,0,1> Error Source +// <0,0,2> Error Description +// <0,0,3> LineText +// <0,0,4> LineNumber +// <0,0,5> CharPos +// <0,0,6> ContextID + + equ REVAXSH_SERR_POS_SOURCE$ to 1 + equ REVAXSH_SERR_POS_DESC$ to 2 + equ REVAXSH_SERR_POS_LINETEXT$ to 3 + equ REVAXSH_SERR_POS_LINENUM$ to 4 + equ REVAXSH_SERR_POS_CHARPOS$ to 5 + equ REVAXSH_SERR_POS_CONTEXTID$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_BBC2HTML.txt b/SYSPROG/STPROCINS/RTI_BBC2HTML.txt new file mode 100644 index 0000000..3dcd76a --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_BBC2HTML.txt @@ -0,0 +1,149 @@ +compile insert RTI_BBC2HTML + +function BBC2HTML(S) { + + if (S===undefined) { + return ""; + } + + var smileyList = {smile: [[':smile:',':-\\)',':\\)'], 'smile'], bigsmile: [[':biggrin:',':-D',':D'],'big grin'], vsad:[[':vsad:',':-\\(\\('],'very sad'], sad:[[':sad:',':-\\('],'sad'], wink:[[':wink:',';-\\)'],'wink'], vshocked:[[':surprised:',':-o'],'shocked'], tongue:[[':tongue:',':-\\!'],'tongue'], cool:[[':cool:'], 'cool!'], mad:[[':mad:'],'mad!'], sconf:[[':confused:'], 'confused'], paranoid:[[':paranoid:'],'paranoid'], question:[[':question:'],'question?'], thumbup:[[':thumbsup:'],'Yes!'], thumbdown:[[':thumbsdown:'], 'No!']}; + + S = smileyParse(S); + if (S.indexOf('[') < 0) return S; + + function X(p, f) {return new RegExp(p, f)} + function D(s) {return rD.exec(s)} + function R(s) {return s.replace(rB, P)} + function A(s, p) {for (var i in p) s = s.replace(X(i, 'g'), p[i]); return s;} + + function P($0, $1, $2, $3) { + if ($3 && $3.indexOf('[') > -1) $3 = R($3); + switch ($1) { + case 'url':case 'anchor':case 'email': return ''+ $3 +''; + case 'img': var d = D($2); return ''+ (d ? '' : $2) +''; + case 'flash':case 'youtube': var d = D($2)||[0, 425, 366]; return ''; + case 'float': return ''+ $3 +''; + case 'left':case 'right':case 'center':case 'justify': return '
'+ $3 +'
'; + case 'google':case 'wikipedia': return ''+ $3 +''; + case 'b':case 'i':case 'u':case 's':case 'sup':case 'sub':case 'h1':case 'h2':case 'h3':case 'h4':case 'h5':case 'h6':case 'table':case 'tr':case 'th':case 'td': return '<'+ $1 +'>'+ $3 +''; + case 'row': case 'r':case 'header':case 'head':case 'h':case 'col':case 'c': return '<'+ T[$1] +'>'+ $3 +''; + case 'acronym':case 'abbr': return '<'+ $1 +' title="'+ $2 +'">'+ $3 +''; + } + return '['+ $1 + ($2 ? '='+ $2 : '') +']'+ $3 +'[/'+ $1 +']'; + } + + var rB = X('\\[([a-z][a-z0-9]*)(?:=([^\\]]+))?]((?:.|[\r\n])*?)\\[/\\1]', 'g'), rD = X('^(\\d+)x(\\d+)$'); + var L = {url: 'href="', 'anchor': 'name="', email: 'href="mailto: '}; + var G = {google: 'http://www.google.com/search?q=', wikipedia: 'http://www.wikipedia.org/wiki/'}; + var Y = {youtube: 'http://www.youtube.com/v/', flash: ''}; + var T = {row: 'tr', r: 'tr', header: 'th', head: 'th', h: 'th', col: 'td', c: 'td'}; + //var C = {notag: [{'\\[': '[', ']': ']'}, '', ''], code: [{'<': '<'}, '
', '
']}; + var C = {notag: [{'\\[': '[', ']': ']'}, '', '']}; + //C.php = [C.code[0], C.code[1]+ '<?php ', '?>'+ C.code[2]]; + var F = {font: 'font-family:$1', size: 'font-size:$1px', color: 'color:$1'}; + var U = {c: 'circle', d: 'disc', s: 'square', '1': 'decimal', a: 'lower-alpha', A: 'upper-alpha', i: 'lower-roman', I: 'upper-roman'}; + var I = {}, B = {}; + + function smileyParse(origStr) { + var i, j, target, re; + // first make sure any 'notag' wrappers are respected + origStr = origStr.replace(/\[notag\]((?:.|[\r\n])*?)\[\/notag\]/g, function($0, $1) {var p1 = $1.replace(/\;-\)/g,":wink:"); p1 = p1.replace(/\;\)/g, ":wink:"); p1 = p1.replace(/\:-\)/g, ":smile:"); p1 = p1.replace(/\:\)/g, ":smile:"); p1 = p1.replace(/\:-D/g, ":biggrin:"); p1 = p1.replace(/\:D/g, ":biggrin:"); p1 = p1.replace(/\:-\(/g, ":sad:"); p1 = p1.replace(/\:\(/g, ":sad:"); p1 = p1.replace(/\:-O/g, ":surprised:"); p1 = p1.replace(/\:-o/g, ":surprised:"); p1 = p1.replace(/\:O/g, ":surprised:"); p1 = p1.replace(/\:o/g, ":surprised:"); p1 = p1.replace(/:-\!/g, ":tongue:"); p1 = p1.replace(/:\!/g, ":tongue:"); p1 = p1.replace(/:-\(\(/g, ":vsad:"); p1 = p1.replace(/\:/g, ":"); return "[notag]" + p1 + "[/notag]";}); + origStr = origStr.replace(/\[code\]((?:.|[\r\n])*?)\[\/code\]/g, function($0, $1) {var p1 = $1.replace(/\:/g, ":"); return "[code]" + p1 + "[/code]";}); +// for (i in smileyList) { +// { +// for (j in smileyList[i][0]) { +// target = smileyList[i][0][j]; +// re = new RegExp(target, "g"); +// origStr = origStr.replace(re, '' + smileyList[i][1] + ''); +// } +// } + + re = new RegExp(":smile:", "g"); + origStr = origStr.replace(re, 'smile'); + re = new RegExp(":-\\)", "g"); + origStr = origStr.replace(re, 'smile'); + re = new RegExp(":\\)", "g"); + origStr = origStr.replace(re, 'smile'); + + re = new RegExp(":biggrin:", "g"); + origStr = origStr.replace(re, 'big grin'); + re = new RegExp(":-D", "g"); + origStr = origStr.replace(re, 'big grin'); + re = new RegExp(":D", "g"); + origStr = origStr.replace(re, 'big grin'); + + re = new RegExp(":vsad:", "g"); + origStr = origStr.replace(re, 'very sad'); + re = new RegExp(":-\\(\\(", "g"); + origStr = origStr.replace(re, 'very sad'); + + re = new RegExp(":sad:", "g"); + origStr = origStr.replace(re, 'sad'); + re = new RegExp(":-\\(", "g"); + origStr = origStr.replace(re, 'sad'); + re = new RegExp(":\\(", "g"); + origStr = origStr.replace(re, 'sad'); + + re = new RegExp(":wink:", "g"); + origStr = origStr.replace(re, 'wink'); + re = new RegExp(";-\\)", "g"); + origStr = origStr.replace(re, 'wink'); + re = new RegExp(";\\)", "g"); + origStr = origStr.replace(re, 'wink'); + + re = new RegExp(":surprised:", "g"); + origStr = origStr.replace(re, 'shocked'); + re = new RegExp(":-o", "g"); + origStr = origStr.replace(re, 'shocked'); + re = new RegExp(":o", "g"); + origStr = origStr.replace(re, 'shocked'); + re = new RegExp(":-O", "g"); + origStr = origStr.replace(re, 'shocked'); + re = new RegExp(":O", "g"); + origStr = origStr.replace(re, 'shocked'); + + re = new RegExp(":tongue:", "g"); + origStr = origStr.replace(re, 'tongue'); + re = new RegExp(":-\\!", "g"); + origStr = origStr.replace(re, 'tongue'); + re = new RegExp(":\\!", "g"); + origStr = origStr.replace(re, 'tongue'); + + re = new RegExp(":cool:", "g"); + origStr = origStr.replace(re, 'cool'); + + re = new RegExp(":mad:", "g"); + origStr = origStr.replace(re, 'mad!'); + + re = new RegExp(":confused:", "g"); + origStr = origStr.replace(re, 'confused'); + + re = new RegExp(":paranoid:", "g"); + origStr = origStr.replace(re, 'paranoid'); + + re = new RegExp(":question:", "g"); + origStr = origStr.replace(re, 'question?'); + + re = new RegExp(":thumbsup:", "g"); + origStr = origStr.replace(re, 'Yes!'); + + re = new RegExp(":thumbsdown:", "g"); + origStr = origStr.replace(re, 'No!'); + + return origStr; + } + + for (var i in C) I['\\[('+ i +')]((?:.|[\r\n])*?)\\[/\\1]'] = function($0, $1, $2) {var p1 = $1, p2 = $2, rslt; if (p1 == "code") {p2 = p2.replace(/
/gi,"\r"); p2 = p2.replace(//gi, "\r");} rslt = C[$1][1] + A(p2, C[$1][0]) + C[$1][2]; return rslt;}; + for (var i in F) {B['\\['+ i +'=([^\\]]+)]'] = ''; B['\\[/'+ i +']'] = '';} + B['\\[list]'] = '
    '; B['\\[list=(\\w)]'] = function($0, $1) {return '
      '}; B['\\[/list]'] = '
    '; B['\\[\\*]'] = '
  • '; + B['\\[parentquote(?:=([^\@\\]]+))(?:\@([^\\]]+))?]'] = function($0, $1, $2) {return '
    ' + ($2? '':'') + ($1 ? $1 +' wrote': 'Quote') + ($2 ? '':'') + ':
    '}; B['\\[/parentquote]'] = '
    '; + B['\\[quote(?:=([^\@\\]]+))(?:\@([^\\]]+))?]'] = function($0, $1, $2) {return '
    ' + ($2? '':'') + ($1 ? $1 +' wrote': 'Quote') + ($2 ? '':'') + ':
    '}; B['\\[/quote]'] = '
    '; + B['\\[(hr|br)]'] = '<$1 />'; B['\\[sp]'] = ' '; + B['\\[code]'] = '
    '; B['\\[/code]'] = '
    '; + B['\\[pre]'] = '
    '; B['\\[/pre]'] = '
    '; + + + return R(A(A(S, I), B)); +} + + diff --git a/SYSPROG/STPROCINS/RTI_BBC2HTML_EDITED.txt b/SYSPROG/STPROCINS/RTI_BBC2HTML_EDITED.txt new file mode 100644 index 0000000..0670222 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_BBC2HTML_EDITED.txt @@ -0,0 +1,71 @@ +compile insert RTI_BBC2HTML_EDITED + +function BBC2HTML(S) { + + var smileyList = {smile: [[':smile:',':-\\)'], 'smile'], bigsmile: [[':biggrin:',':-D'],'big grin'], vsad:[[':vsad:',':-\\(\\('],'very sad'], sad:[[':sad:',':-\\('],'sad'], wink:[[':wink:',';-\\)'],'wink'], vshocked:[[':surprised:',':-o'],'shocked'], tongue:[[':tongue:',':-\\!'],'tongue'], cool:[[':cool:'], 'cool!'], mad:[[':mad:'],'mad!'], sconf:[[':confused:'], 'confused'], paranoid:[[':paranoid:'],'paranoid'], question:[[':question:'],'question?'], thumbup:[[':thumbsup:'],'Yes!'], thumbdown:[[':thumbsdown:'], 'No!']}; + + //S = smileyParse(S); + if (S.indexOf('[') < 0) return S; + + function X(p, f) {return new RegExp(p, f)} + function D(s) {return rD.exec(s)} + function R(s) {return s.replace(rB, P)} + function A(s, p) {for (var i in p) s = s.replace(X(i, 'g'), p[i]); return s;} + + function P($0, $1, $2, $3) { + if ($3 && $3.indexOf('[') > -1) $3 = R($3); + switch ($1) { + case 'url':case 'anchor':case 'email': return ''+ $3 +''; + case 'img': var d = D($2); return ''+ (d ? '' : $2) +''; + case 'flash':case 'youtube': var d = D($2)||[0, 425, 366]; return ''; + case 'float': return ''+ $3 +''; + case 'left':case 'right':case 'center':case 'justify': return '
    '+ $3 +'
    '; + case 'google':case 'wikipedia': return ''+ $3 +''; + case 'b':case 'i':case 'u':case 's':case 'sup':case 'sub':case 'h1':case 'h2':case 'h3':case 'h4':case 'h5':case 'h6':case 'table':case 'tr':case 'th':case 'td': return '<'+ $1 +'>'+ $3 +''; + case 'row': case 'r':case 'header':case 'head':case 'h':case 'col':case 'c': return '<'+ T[$1] +'>'+ $3 +''; + case 'acronym':case 'abbr': return '<'+ $1 +' title="'+ $2 +'">'+ $3 +''; + } + return '['+ $1 + ($2 ? '='+ $2 : '') +']'+ $3 +'[/'+ $1 +']'; + } + + var rB = X('\\[([a-z][a-z0-9]*)(?:=([^\\]]+))?]((?:.|[\r\n])*?)\\[/\\1]', 'g'), rD = X('^(\\d+)x(\\d+)$'); + var L = {url: 'href="', 'anchor': 'name="', email: 'href="mailto: '}; + var G = {google: 'http://www.google.com/search?q=', wikipedia: 'http://www.wikipedia.org/wiki/'}; + var Y = {youtube: 'http://www.youtube.com/v/', flash: ''}; + var T = {row: 'tr', r: 'tr', header: 'th', head: 'th', h: 'th', col: 'td', c: 'td'}; + //var C = {notag: [{'\\[': '[', ']': ']'}, '', ''], code: [{'<': '<'}, '
    ', '
    ']}; + var C = {notag: [{'\\[': '[', ']': ']'}, '', '']}; + //C.php = [C.code[0], C.code[1]+ '<?php ', '?>'+ C.code[2]]; + var F = {font: 'font-family:$1', size: 'font-size:$1px', color: 'color:$1'}; + var U = {c: 'circle', d: 'disc', s: 'square', '1': 'decimal', a: 'lower-alpha', A: 'upper-alpha', i: 'lower-roman', I: 'upper-roman'}; + var I = {}, B = {}; + + function smileyParse(origStr) { + var i, j, target, re; + // first make sure any 'notag' wrappers are respected + alert("before change"); + origStr = origStr.replace(/\[notag\]((?:.|[\r\n])*?)\[\/notag\]/g, function($0, $1) {var p1 = $1.replace(/\;-\)/g,":wink:"); p1 = p1.replace(/\:-\)/g, ":smile:"); p1 = p1.replace(/\:/g, ":"); return "[notag]" + p1 + "[/notag]";}); +alert("after change"); + for (i in smileyList) { + for (j in smileyList[i][0]) { + target = smileyList[i][0][j]; +alert("target is *" + target + "*"); + re = new RegExp(target, "g"); + origStr = origStr.replace(re, '' + smileyList[i][1] + ''); + } + } + return origStr; + } + + for (var i in C) I['\\[('+ i +')]((?:.|[\r\n])*?)\\[/\\1]'] = function($0, $1, $2) {var p1 = $1, p2 = $2, rslt; if (p1 == "code") {p2 = p2.replace(/
    /gi,"\r"); p2 = p2.replace(//gi, "\r");} rslt = C[$1][1] + A(p2, C[$1][0]) + C[$1][2]; return rslt;}; + for (var i in F) {B['\\['+ i +'=([^\\]]+)]'] = ''; B['\\[/'+ i +']'] = '';} + B['\\[list]'] = '
      '; B['\\[list=(\\w)]'] = function($0, $1) {return '
        '}; B['\\[/list]'] = '
      '; B['\\[\\*]'] = '
    • '; + B['\\[quote(?:=([^\@\\]]+))(?:\@([^\\]]+))?]'] = function($0, $1, $2) {return '
      ' + ($2? '':'') + ($1 ? $1 +' wrote': 'Quote') + ($2 ? '':'') + ':
      '}; B['\\[/quote]'] = '
      '; + B['\\[(hr|br)]'] = '<$1 />'; B['\\[sp]'] = ' '; + B['\\[code]'] = '
      '; B['\\[/code]'] = '
      '; + B['\\[pre]'] = '
      '; B['\\[/pre]'] = '
      '; + + + return R(A(A(S, I), B)); +} + diff --git a/SYSPROG/STPROCINS/RTI_BITMAP_IDX_COMMON.txt b/SYSPROG/STPROCINS/RTI_BITMAP_IDX_COMMON.txt new file mode 100644 index 0000000..9fccc5b --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_BITMAP_IDX_COMMON.txt @@ -0,0 +1,11 @@ +compile insert RTI_Bitmap_Idx_Common + +/* Bitmap index SI.MFS common block + + Author: CP Sprezzatura Ltd, 16.10.2007, Insert created + ssc , 31.10.2007, Compacted and optimized + rjc , 17.10.2009, Copied for SI.MFS +*/ +common /RTI_BITMAP_IDX_COM/ biSelectInfo@, biVar2@, biVar3@, biVar4@, biVar5@, biVar6@ + + diff --git a/SYSPROG/STPROCINS/RTI_BITMAP_IDX_EQUATES.txt b/SYSPROG/STPROCINS/RTI_BITMAP_IDX_EQUATES.txt new file mode 100644 index 0000000..4d91ef1 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_BITMAP_IDX_EQUATES.txt @@ -0,0 +1,13 @@ +compile insert RTI_Bitmap_Idx_Equates + +/* Bitmap index MFS equates + + Author: CP Sprezzatura Ltd, 16.10.2007, Insert created + ssc , 31.10.2007, Compacted and optimized */ + +equ BITMAP_IDX$ to "RTI_BITMAP_IDX" +equ BI_ERR_OPEN_DICT$ to 3000 ; * Error FS%1% opening DICT.%2% for Bitmap Index update +equ BI_ERR_OPEN_BI_DICT$ to 3001 ; * Error FS%1% opening DICT.%2% - Bitmap Index updates are not available +* rjc 03-31-10 +Equ BITMAP_IDX_SUFFIX$ To "_BITMAP_IDX" + diff --git a/SYSPROG/STPROCINS/RTI_BROLIST_DATASOURCE_TEMPLATE.txt b/SYSPROG/STPROCINS/RTI_BROLIST_DATASOURCE_TEMPLATE.txt new file mode 100644 index 0000000..b2bcfd7 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_BROLIST_DATASOURCE_TEMPLATE.txt @@ -0,0 +1,189 @@ +compile Insert RTI_BROLIST_DATASOURCE_TEMPLATE + +Function RTI_BROLIST_DATASOURCE(ACTION, PARAM1, PARAM2, PARAM3) +/* +** Mimic using An SQL stored procedure to build a recordset +** Build a workging table were oconv, sort is all done "server-side" +** So report can just have groups with Break-on, minimal chatter with OI. +** +** +*/ + +Declare Function dcount + +$Insert logical +If Assigned(ACTION) Else ACTION = "" +If Assigned(PARAM1) Else PARAM1 = "" +If Assigned(PARAM2) Else PARAM2 = "" +If Assigned(PARAM3) Else PARAM3 = "" +* {CMD} + +common /brolist_ds_Com/selected%, keys% +If Assigned(selected%) Else selected% = 0 +RSLT = "" +Begin Case + Case ACTION _EQC "FIELDS" + * New report, cleasr the selected cache + selected% = 0 + + * return: + * <1> Field Name] + * <2> Field #] + * <3> conv code] + * <4> MVFlag (0/1)] + * <6> Association] + + * For speed define a dict that is all hard fields, no oConv + * Then on the read, do the calculations and oconv here, send result to BRW + * Colname ; * Position ; * Conv + {FIELDS_BLOCK} + + Case action _eqc "DATATYPE" + whichField = param1 + + {DATATYPE_BLOCK} + + + Case ACTION _EQC "KEYS" + * return: + * <1-n> key + * Build a dynamic select + * Param1 looks like "100 WHERE FILTER = trUE + + * Seems to come here twice, so do the select the first time, return the keys the second time + If selected% Then + transfer keys% To rslt + selected% = 0 + End else + keys% = '' + selected% = 1 + selstmt = trim(param1) + cmds = '' + + firstword = selstmt[1,' '] + tablename = "{TABLE}" + If Num(firstword) Then + num_to_select = firstword + with_clause = trim(Field(selstmt, ' ', 2, Len(selstmt))) + by_clause = '' + End Else + num_to_select = "" + with_clause = selstmt + by_clause = '' + End + + Begin Case + Case with_clause[1,2] _eqc 'BY' + by_clause = with_clause + with_clause = '' + + Case indexc(with_clause, ' BY ', 1) Or indexc(with_clause, ' BY-DSND', 1) + pos1 = indexc(with_clause, ' BY ', 1) + pos2 = indexc(with_clause, ' BY-DSND', 1) + pos = If pos1 gt pos2 Then pos1 Else pos2 + If pos then + by_clause = with_clause[pos,getByteSize(with_clause)] + with_clause = with_clause[1,pos-1] + End + End case + + If indexc(with_clause, 'WITH', 1) then + CMDS<-1> = 'SELECT ': num_to_select:' ':tablename:' ' : with_clause + end + If indexc(by_clause, 'BY', 1) Then + * Do the sort after the select + CMDS<-1> = 'SELECT ': num_to_select:' ':tablename: ' ' : by_clause + End + If cmds = '' Then + CMDS<-1> = 'SELECT ': num_to_select:' ':tablename + end + col = '' + Loop + Remove cmd From cmds At col Setting mark + If cmd # '' then + Call Rlist(cmd,5, '', '', '') + End + While @list.active And mark + Repeat + + rslt = '' + If @list.active Then + alloc_size = 0xFFFF + buffer = space(alloc_size) + bsize = alloc_Size + bpos = 1 + + done = false$ + Loop + Readnext val Else done = true$ + Until done + Gosub Append + Repeat + If bpos gt 2 Then + keys% = buffer[1,bpos-2] + end + end + end + Case ACTION _EQC "READ" + rslt = '' + @id = param1 + alloc_size = 500 + buffer = space(alloc_size) + bsize = alloc_Size + bpos = 1 + *LIST PERSON_SONG_PLAY FULL_NAME PLAY_COST PLAY_MONTH TITLE BY PLAY_MONTH BY TITLE + tablename = "{TABLE}" + dictname = "{DICTIONARY}" + colnames = "{DATASOURCE_COLS}" + convs = "{DATASOURCE_CONVS}" + col_cnt = "{DATASOURCE_CNT}" + Convert ',' To @vm In colnames + Convert ',' To @vm In convs + Open dictname To @dict Then + Open tablename To f_psp Then + ReadO @record From f_psp, @id Then + clpos = 1 + cvpos = 1 + For col_nr = 1 To col_cnt + colname = colnames[clpos,@vm,1];clpos = bcol2()+1 + conv = convs[cvpos,@vm,1];cvpos = bcol2()+1 + Begin Case + Case colname _Eqc '@ID' Or colname _Eqc 'AT_ID' + val = @id + case Num(colname) + val = @record + Case 1 + val = calculate(colname) + End case + If conv # '' Then + val = Oconv(val, conv) + end + Gosub append + next + If bpos gt 2 Then + rslt = buffer[1,bpos-2] + end + end + End + End + + Case ACTION _EQC "WRITE" + id = param2 + rec = param3 + + Case ACTION _EQC "DELETE" + id = param1 + +End Case + +Return RSLT + +append: +vlen = getByteSize(val) + 1 +If vlen + bpos gt bsize then + buffer := space(alloc_size) + bsize += alloc_Size +end +putbinaryValue( buffer, bpos,CHAR, val:@fm) +bpos += vlen +return diff --git a/SYSPROG/STPROCINS/RTI_BROLIST_XML_TEMPLATE.txt b/SYSPROG/STPROCINS/RTI_BROLIST_XML_TEMPLATE.txt new file mode 100644 index 0000000..f848726 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_BROLIST_XML_TEMPLATE.txt @@ -0,0 +1,34 @@ +Compile Insert rti_brolist_xml_template + + + + + RLIST + + SYSPROG + + + Provider=OI + + + 0 + + + 9410 + 1 + + + Eras Medium ITC + 9 + + _styleCtr = 0 + + + + + + + + + RLIST + diff --git a/SYSPROG/STPROCINS/RTI_CBBFS_DLL_EQUATES.txt b/SYSPROG/STPROCINS/RTI_CBBFS_DLL_EQUATES.txt new file mode 100644 index 0000000..121ea30 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_CBBFS_DLL_EQUATES.txt @@ -0,0 +1,88 @@ +compile insert RTI_CBBFS_DLL_EQUATES + +* 03-09-18 rjc Add COnnectEx + +Declare Function RTI_CBBFS_DLL + +Equ MAXCONNS$ To 100 +Equ MAXLISTS$ To 10 + +Equ CMD_CONNECT$ To 1 +Equ CMD_DISCONNECT$ To 2 +Equ CMD_READ$ To 3 +Equ CMD_READ_RAW$ To 4 +Equ CMD_WRITE$ To 5 +Equ CMD_WRITE_RAW$ To 6 +Equ CMD_DELETE$ To 7 +Equ CMD_DELETE_RAW$ To 8 +Equ CMD_SELECT$ To 9 +Equ CMD_ERROR$ To 10 +Equ CMD_CLEARSELECT$ To 11 +Equ CMD_ROWCOUNT$ To 12 +Equ CMD_CLEARTABLE$ To 13 +Equ CMD_READNEXT_DATA$ To 14 +Equ CMD_GENERIC$ To 15 +EQU CMD_SETTINGS$ To 16 +EQU CMD_CONNECTEX$ To 17 + +EQU cmd_max$ To CMD_CONNECTEX$ + +equ ERR_SUCCESS$ To 1 + +Equ ERR_INVALID_HANDLE$ To 0 +Equ ERR_NO_INSTANCE$ To -1 +Equ ERR_NO_CONNECT$ TO -2 +Equ ERR_NO_BOOTSTRAP$ To -3 +Equ ERR_GET_FAILED$ To -4 +Equ ERR_GET_NO_RESULTS$ To -5 +Equ ERR_GET_CALLBACK_FAILED$ To -6 +Equ ERR_GET_BUFFER$ To -7 +Equ ERR_STORE_FAILED$ To -8 +Equ ERR_STORE_FAILED_WRITE$ To -9 +Equ ERR_REMOVE_FAILED$ To -10 +Equ ERR_REMOVE_FAILED_WRITE$ To -11 +Equ ERR_INVALID_CONN_HANDLE$ To -12 +Equ ERR_TOO_MANY_CONN$ To -13 +Equ ERR_SELECT$ To -14 +Equ ERR_INVALID_SEL_HANDLE$ To -15 +Equ ERR_INVALID_SEL_USED$ To -16 +Equ ERR_INVALID_SEL_UNUSED$ To -17 +Equ ERR_INVALID_SEL_BUSY$ To -18 +Equ ERR_INVALID_SEL_SPACE$ To -19 +Equ ERR_SELECT_RESULT$ To -20 +Equ ERR_INVALID_SEL_SPACE2$ To -21 + +Equ ERR_INVALID_REQUEST$ To -50 +Equ ERR_INVALID_TABLE$ To -51 +Equ ERR_INVALID_KEY$ To -52 +Equ ERR_NO_RESULTS$ To -53 +Equ ERR_NO_SIZES$ To -54 + +* Settings +Equ MAX_INCOMING_PARAM$ To 1 +Equ MAX_ERRSIZE_PARAM$ To 2 +Equ MAX_SIZEINFOSIZE_PARAM$ To 3 +Equ KEYSIZE_PARAM$ To 4 +Equ VALUESIZE_PARAM$ To 5 +Equ METASIZE_PARAM$ To 6 +Equ DOCIDSIZE_PARAM$ To 7 +Equ SIZESSIZE_PARAM$ To 8 +Equ MAX_SLEEP_PARAM$ To 9 +Equ SLEEP_TIME_PARAM$ To 10 + +Equ MAX_INCOMING_DEFAULT$ To 1000 +Equ MAX_ERRSIZE_DEFAULT$ To 1000 +Equ MAX_SIZEINFOSIZE_DEFAULT$ To 1000 +Equ KEYSIZE_DEFAULT$ To 1000 +Equ VALUESIZE_DEFAULT$ To 1000 +Equ METASIZE_DEFAULT$ To 1000 +Equ DOCIDSIZE_DEFAULT$ To 1000 +Equ SIZESSIZE_DEFAULT$ To 1000 +Equ MAX_SLEEP_DEFAULT$ To 10 +Equ SLEEP_TIME_DEFAULT$ To 50 + +Equ write_type_set$ To "0" +Equ write_type_add$ To "1" +Equ write_type_update$ To "2" +Equ write_type_append$ To "3" +Equ write_typr_prepend$ To "4" diff --git a/SYSPROG/STPROCINS/RTI_CFG_C2OE_MAP_EQUATES.txt b/SYSPROG/STPROCINS/RTI_CFG_C2OE_MAP_EQUATES.txt new file mode 100644 index 0000000..81b1401 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_CFG_C2OE_MAP_EQUATES.txt @@ -0,0 +1,42 @@ +compile insert RTI_CFG_C2OE_MAP_EQUATES +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : September 2012 + Purpose : Constants for use with the C to OE data type configuration + record + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + djh 07/19/17 Add CFG_C2OE_POS_OISTRUCT$ +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_CFG_C2OE_MAP_EQUATES_ +#define _RTI_CFG_C2OE_MAP_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ CFG_C2OE_TABLE$ to "SYSENV" + equ CFG_C2OE_ID$ to "CFG_C2OE_MAP" + equ CFG_C2OE_REPOS_ID$ to @appID<1> : "*APPROW**" : CFG_C2OE_TABLE$ : ":" : CFG_C2OE_ID$ + equ CFG_C2OE_REPOS_TITLE$ to "C-To-OE DataType mapping record" + + equ CFG_C2OE_POS_CTYPE$ to 1 + equ CFG_C2OE_POS_OETYPE$ to 2 + equ CFG_C2OE_POS_OISTRUCT$ to 3 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_CFG_EVENTS_EQUATES.txt b/SYSPROG/STPROCINS/RTI_CFG_EVENTS_EQUATES.txt new file mode 100644 index 0000000..57c1a9d --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_CFG_EVENTS_EQUATES.txt @@ -0,0 +1,57 @@ +compile insert rti_Cfg_Events_Equates +/* + ** Copyright (C) 2012-2018 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : October 2018 + Purpose : Constants for use with the SYSENV CFG_EVENTS record + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_CFG_EVENTS_EQUATES_ +#define _RTI_CFG_EVENTS_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ CFG_EVENTS_TABLE$ to "SYSENV" + equ CFG_EVENTS_KEY$ to "CFG_EVENTS" + + // Note this is hardcoded to SYSPROG, NOT @appid<1> !!! + equ CFG_EVENTS_ENTID$ to "SYSPROG*APPROW**SYSENV:CFG_EVENTS" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CFG_EVENTS record layout + // + // CFG_EVENTS is in a "LIST" format with one type per row. Each row + // has the following format: + // + // <0,1> TypeID + // <0,2> EventIDs (@svm delimited) + // <0,3> EventArgs (@svm/"," delimited) + // <0,4> EventForceFlags (@svm delimited) + // <0,5> EventNames (@svm delimited) + + equ CFG_EVENTS_POS_TYPEID$ to 1 + equ CFG_EVENTS_POS_EVENTID$ to 2 + equ CFG_EVENTS_POS_EVENTARGS$ to 3 + equ CFG_EVENTS_POS_EVENTFORCE$ to 4 + equ CFG_EVENTS_POS_EVENTNAMES$ to 5 + + equ CFG_EVENTS_POS_FIRST$ to CFG_EVENTS_POS_TYPEID$ + equ CFG_EVENTS_POS_LAST$ to CFG_EVENTS_POS_EVENTNAMES$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/RTI_CJSON_EQUATES.txt b/SYSPROG/STPROCINS/RTI_CJSON_EQUATES.txt new file mode 100644 index 0000000..a40b371 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_CJSON_EQUATES.txt @@ -0,0 +1,189 @@ +compile insert rti_CJSON_Equates +/* + ** Copyright (C) 1992-2023 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : RJC/Captain C + Date : September 2016 + Purpose : Constants for use with the RevJSON DLL functions + + + Comments + ======== + + The "safe" way of using RevJSON is to use the rti_CJSON function + with the methods detailed below. + + There is a "raw" API however that exposes the internal cJSON functions that + have not, by default, been prototyped - only prototype what you need to + avoid DLL stub proliferation. + + The prototypes are defined below if you wish to add them to the DLLPROTOTYPE + entity at some point in the future (DLL_RTI_REVJSON) + + + Amended Date Reason + ======= ==== ====== + Mr C 09 Mar 23 Added RJSON Error codes + Mr C 20 Apr 17 Added REVJSON_GETITEMVALUE$ method +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_CJSON_EQUATES_ +#define _RTI_CJSON_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_CJSON + + // rti_CJSON method constants + + equ REVJSON_PARSE$ to 1; // cJSON_Parse + equ REVJSON_PRINT$ to 2; // cJSON_Print + equ REVJSON_PRINTUNFORMATTED$ to 3; // cJSON_PrintUnformatted + equ REVJSON_PRINTBUFFERED$ to 4; // cJSON_PrintBuffered + equ REVJSON_DELETE$ to 5; // cJSON_Delete + equ REVJSON_GETARRAYSIZE$ to 6; // cJSON_GetArraySize + equ REVJSON_GETARRAYITEM$ to 7; // cJSON_GetArrayItem + equ REVJSON_GETOBJECTITEM$ to 8; // cJSON_GetObjectItem + equ REVJSON_HASOBJECTITEM$ to 9; // cJSON_HasObjectItem + equ REVJSON_GETERRORPTR$ to 10; // cJSON_GetErrorPtr + equ REVJSON_CREATENULL$ to 11; // cJSON_CreateNull + equ REVJSON_CREATETRUE$ to 12; // cJSON_CreateTrue + equ REVJSON_CREATEFALSE$ to 13; // cJSON_CreateFalse + equ REVJSON_CREATEBOOL$ to 14; // cJSON_CreateBool + equ REVJSON_CREATENUMBER$ to 15; // cJSON_CreateNumber + equ REVJSON_CREATESTRING$ to 16; // cJSON_CreateString + equ REVJSON_CREATEARRAY$ to 17; // cJSON_CreateArray + equ REVJSON_CREATEOBJECT$ to 18; // cJSON_CreateObject + equ REVJSON_CREATEINTARRAY$ to 19; // cJSON_CreateIntArray + equ REVJSON_CREATEFLOATARRAY$ to 20; // cJSON_CreateFloatArray + equ REVJSON_CREATEDOUBLEARRAY$ to 21; // cJSON_CreateDoubleArray + equ REVJSON_CREATESTRINGARRAY$ to 22; // cJSON_CreateStringArray + equ REVJSON_ADDITEMTOARRAY$ to 23; // cJSON_AddItemToArray + equ REVJSON_ADDITEMTOOBJECT$ to 24; // cJSON_AddItemToObject + equ REVJSON_ADDITEMTOOBJECTS$ to 25; // cJSON_AddItemToObjects + equ REVJSON_ADDITEMREFERENCETOARRAY$ to 26; // cJSON_AddItemReferenceToArray + equ REVJSON_ADDITEMREFERENCETOOBJECT$ to 27; // cJSON_AddItemReferenceToObject + equ REVJSON_DETACHITEMFROMARRAY$ to 28; // cJSON_DetachItemFromArray + equ REVJSON_DELETEITEMFROMARRAY$ to 29; // cJSON_DeleteItemFromArray + equ REVJSON_DETACHITEMFROMOBJECT$ to 30; // cJSON_DetachItemFromObject + equ REVJSON_DELETEITEMFROMOBJECT$ to 31; // cJSON_DeleteItemFromObject + equ REVJSON_INSERTITEMINARRAY$ to 32; // cJSON_InsertItemInArray + equ REVJSON_REPLACEITEMINARRAY$ to 33; // cJSON_ReplaceItemInArray + equ REVJSON_REPLACEITEMINOBJECT$ to 34; // cJSON_ReplaceItemInObject + equ REVJSON_DUPLICATE$ to 35; // cJSON_Duplicate + equ REVJSON_PARSEWITHOPTS$ to 36; // cJSON_ParseWithOpts *** NOT IMPLEMENTED *** + equ REVJSON_MINIFY$ to 37; // cJSON_Minify + equ REVJSON_FREE$ to 38; // cJSON_Free + equ REVJSON_GETITEMNEXT$ to 39; + equ REVJSON_GETITEMCHILD$ to 40; + equ REVJSON_GETITEMTYPE$ to 41; + equ REVJSON_GETITEMNAME$ to 42; + equ REVJSON_GETITEMVALUE$ to 43; // cJSON_GetObjectItem or cJSON_GetArrayItem + cJSON_Print + + equ REVJSON_GETVALUE$ to REVJSON_GETITEMVALUE$ ; // synonym + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // RevJSON type IDs + + equ REVJSON_T_FALSE$ to 0 + equ REVJSON_T_TRUE$ to 1 + equ REVJSON_T_NULL$ to 2 + equ REVJSON_T_NUMBER$ to 8 + equ REVJSON_T_STRING$ to 16 + equ REVJSON_T_ARRAY$ to 32 + equ REVJSON_T_OBJECT$ to 64 + + equ REVJSON_T_ISREFERENCE$ to 256 + equ REVJSON_T_STRINGISCONST$ to 512 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ REVJSON_SUCCESS$ to 0; + equ REVJSON_ERR_NULL_JSON$ to -1; + equ REVJSON_ERR_NULL_RETBUFFER$ to -2; + equ REVJSON_ERR_NULL_VALUE$ to -3; + equ REVJSON_ERR_NULL_RETJSON$ to -4; + equ REVJSON_ERR_PARSE$ to -5; + equ REVJSON_ERR_NULL_RETINT$ to -6; + equ REVJSON_ERR_NULL_NAME$ to -7; + equ REVJSON_ERR_NULL_PARSEEND$ to -8; + + equ REVJSON_ERR_CREATE_DOC$ to -9; + equ REVJSON_ERR_INVALID_TYPE$ to -10; + equ REVJSON_ERR_BAD_MEMBER_NAME$ to -11; // Bad element name + equ REVJSON_ERR_BAD_ARRAY_SYNTAX$ to -12; // Invalid path - array syntax + equ REVJSON_ERR_BAD_ARRAY_INDEX$ to -13; // Invalid path - array out of bounds + equ REVJSON_ERR_NO_ARRAY_INDEX$ to -14; // Invalid path - No index + equ REVJSON_ERR_INVALID_JSON$ to -15; // Invalid handle + equ REVJSON_ERR_USE_RETBUFFER$ to -16; + equ REVJSON_ERR_BUFFER_TOO_SMALL$ to -17; + equ REVJSON_ERR_BAD_BUFFER_SIZE$ to -18; + + equ REVJSON_ERR_STDEXCEPTION$ to -99; + + equ REVJSON_MAX_ERROR_LEN$ to 2048; // LPSTR pErrorText length + // including null terminator + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +/* + "Raw" API prototypes - only add these to DLL_RTI_REVJSON if you really need + them and you know what you're doing. + + LPVOID STDCALL JSON_Parse( LPSTR ) as rti_RevJSON_Parse + LPVOID STDCALL JSON_Print( LPVOID ) as rti_RevJSON_Print + LPVOID STDCALL JSON_PrintUnformatted( LPVOID ) as rti_RevJSON_PrintUnformatted + LPVOID STDCALL JSON_PrintBuffered( LPVOID, INT, INT ) as rti_RevJSON_PrintBuffered + VOID STDCALL JSON_Delete( LPVOID ) as rti_RevJSON_Delete + INT STDCALL JSON_GetArraySize( LPVOID ) as rti_RevJSON_GetArraySize + LPVOID STDCALL JSON_GetArrayItem( LPVOID, INT ) as rti_RevJSON_GetArrayItem + LPVOID STDCALL JSON_GetObjectItem( LPVOID, LPSTR ) as rti_RevJSON_GetObjectItem + INT STDCALL JSON_HasObjectItem( LPVOID, LPSTR ) as rti_RevJSON_HasObjectItem + LPSTR STDCALL JSON_GetErrorPtr( VOID ) as rti_RevJSON_GetErrorPtr + LPVOID STDCALL JSON_CreateNull( VOID ) as rti_RevJSON_CreateNull + LPVOID STDCALL JSON_CreateTrue( VOID ) as rti_RevJSON_CreateTrue + LPVOID STDCALL JSON_CreateFalse( VOID ) as rti_RevJSON_CreateFalse + LPVOID STDCALL JSON_CreateBool( INT ) as rti_RevJSON_CreateBool + LPVOID STDCALL JSON_CreateNumber( DOUBLE ) as rti_RevJSON_CreateNumber + LPVOID STDCALL JSON_CreateString( LPSTR ) as rti_RevJSON_CreateString + LPVOID STDCALL JSON_CreateArray( VOID ) as rti_RevJSON_CreateArray + LPVOID STDCALL JSON_CreateObject( VOID ) as rti_RevJSON_CreateObject + LPVOID STDCALL JSON_CreateIntArray( LPVOID, INT ) as rti_RevJSON_CreateIntArray + LPVOID STDCALL JSON_CreateFloatArray( LPVOID, INT ) as rti_RevJSON_CreateFloatArray + LPVOID STDCALL JSON_CreateDoubleArray( LPVOID, INT ) as rti_RevJSON_CreateDoubleArray + LPVOID STDCALL JSON_CreateStringArray( LPVOID, INT ) as rti_RevJSON_CreateStringArray + VOID STDCALL JSON_AddItemToArray( LPVOID, LPVOID ) as rti_RevJSON_AddItemToArray + VOID STDCALL JSON_AddItemToObject( LPVOID, LPSTR, LPVOID ) as rti_RevJSON_AddItemToObject + VOID STDCALL JSON_AddItemToObjectCS( LPVOID, LPSTR, LPVOID ) as rti_RevJSON_AddItemToObjectCS + VOID STDCALL JSON_AddItemReferenceToArray( LPVOID, LPVOID ) as rti_RevJSON_AddItemReferenceToArray + VOID STDCALL JSON_AddItemReferenceToObject( LPVOID, LPSTR, LPVOID ) as rti_RevJSON_AddItemReferenceToObject + LPVOID STDCALL JSON_DetachItemFromArray( LPVOID, INT ) as rti_RevJSON_DetachItemFromArray + VOID STDCALL JSON_DeleteItemFromArray( LPVOID, INT ) as rti_RevJSON_DeleteItemFromArray + LPVOID STDCALL JSON_DetachItemFromObject( LPVOID, LPSTR ) as rti_RevJSON_DetachItemFromObject + VOID STDCALL JSON_DeleteItemFromObject( LPVOID, LPSTR ) as rti_RevJSON_DeleteItemFromObject + VOID STDCALL JSON_InsertItemInArray( LPVOID, INT, LPVOID ) as rti_RevJSON_InsertItemInArray + VOID STDCALL JSON_ReplaceItemInArray( LPVOID, INT, LPVOID ) as rti_RevJSON_ReplaceItemInArray + VOID STDCALL JSON_ReplaceItemInObject( LPVOID, LPSTR, LPVOID ) as rti_RevJSON_ReplaceItemInObject + LPVOID STDCALL JSON_Duplicate( LPVOID, INT ) as rti_RevJSON_Duplicate + LPVOID STDCALL JSON_ParseWithOpts( LPSTR, LPVOID, INT ) as rti_RevJSON_ParseWithOpts + VOID STDCALL JSON_Minify( LPSTR ) as rti_RevJSON_Minify + VOID STDCALL JSON_Free( LPVOID ) as rti_RevJSON_Free + LPVOID STDCALL JSON_GetNextItem( LPVOID ) as rti_RevJSON_GetNextItem + LPVOID STDCALL JSON_GetChildItem( LPVOID ) as rti_RevJSON_GetChildItem + int STDCALL JSON_GetItemType( LPVOID ) as rti_RevJSON_GetItemType + LPSTR STDCALL JSON_GetItemName( LPVOID ) as rti_RevJSON_GetItemName +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/RTI_CMG_EQUATES.txt b/SYSPROG/STPROCINS/RTI_CMG_EQUATES.txt new file mode 100644 index 0000000..a179004 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_CMG_EQUATES.txt @@ -0,0 +1,8 @@ +compile insert RTI_CMG_EQUATES + +* Functions +Declare Function Get_Repos_Entities + +* CFG_EVENTS items +Equ EV_CTRL_TYPE$ To 1 +Equ EV_CTRL_EVENTS$ To 2 diff --git a/SYSPROG/STPROCINS/RTI_COMMANDER_COMMON.txt b/SYSPROG/STPROCINS/RTI_COMMANDER_COMMON.txt new file mode 100644 index 0000000..5c4c22f --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_COMMANDER_COMMON.txt @@ -0,0 +1,6 @@ +compile insert RTI_COMMANDER_COMMON + +COMMON /RTICOMMANDER/ OICOMMANDER%, OICOMMANDER_INIT% + +Declare Function oleCallMethod, oleGetProperty +Declare Subroutine olePutProperty diff --git a/SYSPROG/STPROCINS/RTI_CONV_EQUATES.txt b/SYSPROG/STPROCINS/RTI_CONV_EQUATES.txt new file mode 100644 index 0000000..f2ca2df --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_CONV_EQUATES.txt @@ -0,0 +1,38 @@ +compile insert rti_Conv_Equates +/* + ** Copyright (C) 1992-2013 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : December 2013 + Purpose : Equates for use with iconv/oconv processing + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_CONV_EQUATES_ +#define _RTI_CONV_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Status() equates + equ CONV_VALID$ to 0 ; * // Successful + equ CONV_INVALID_MSG$ to 1 ; * // Bad Data - Display error message + equ CONV_INVALID_CONV$ to 2 ; * // Bad Conversion - Display error message + equ CONV_INVALID_NOMSG$ to 3 ; * // Bad but do not show the error message + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_CRC32_SCRIPT.txt b/SYSPROG/STPROCINS/RTI_CRC32_SCRIPT.txt new file mode 100644 index 0000000..025efe0 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_CRC32_SCRIPT.txt @@ -0,0 +1,85 @@ +compile insert RTI_CRC32_SCRIPT +/* + * crc32 + * + * This routine is compatible with libmemcache and nginx upstream hash. + * + * Copyright Runcible Labs, Inc. + * + */ + +function crc32 (str) { + + var crc32tab = [ + 0x00000000, 0x77073096, 0xee0e612c, 0x990951ba, + 0x076dc419, 0x706af48f, 0xe963a535, 0x9e6495a3, + 0x0edb8832, 0x79dcb8a4, 0xe0d5e91e, 0x97d2d988, + 0x09b64c2b, 0x7eb17cbd, 0xe7b82d07, 0x90bf1d91, + 0x1db71064, 0x6ab020f2, 0xf3b97148, 0x84be41de, + 0x1adad47d, 0x6ddde4eb, 0xf4d4b551, 0x83d385c7, + 0x136c9856, 0x646ba8c0, 0xfd62f97a, 0x8a65c9ec, + 0x14015c4f, 0x63066cd9, 0xfa0f3d63, 0x8d080df5, + 0x3b6e20c8, 0x4c69105e, 0xd56041e4, 0xa2677172, + 0x3c03e4d1, 0x4b04d447, 0xd20d85fd, 0xa50ab56b, + 0x35b5a8fa, 0x42b2986c, 0xdbbbc9d6, 0xacbcf940, + 0x32d86ce3, 0x45df5c75, 0xdcd60dcf, 0xabd13d59, + 0x26d930ac, 0x51de003a, 0xc8d75180, 0xbfd06116, + 0x21b4f4b5, 0x56b3c423, 0xcfba9599, 0xb8bda50f, + 0x2802b89e, 0x5f058808, 0xc60cd9b2, 0xb10be924, + 0x2f6f7c87, 0x58684c11, 0xc1611dab, 0xb6662d3d, + 0x76dc4190, 0x01db7106, 0x98d220bc, 0xefd5102a, + 0x71b18589, 0x06b6b51f, 0x9fbfe4a5, 0xe8b8d433, + 0x7807c9a2, 0x0f00f934, 0x9609a88e, 0xe10e9818, + 0x7f6a0dbb, 0x086d3d2d, 0x91646c97, 0xe6635c01, + 0x6b6b51f4, 0x1c6c6162, 0x856530d8, 0xf262004e, + 0x6c0695ed, 0x1b01a57b, 0x8208f4c1, 0xf50fc457, + 0x65b0d9c6, 0x12b7e950, 0x8bbeb8ea, 0xfcb9887c, + 0x62dd1ddf, 0x15da2d49, 0x8cd37cf3, 0xfbd44c65, + 0x4db26158, 0x3ab551ce, 0xa3bc0074, 0xd4bb30e2, + 0x4adfa541, 0x3dd895d7, 0xa4d1c46d, 0xd3d6f4fb, + 0x4369e96a, 0x346ed9fc, 0xad678846, 0xda60b8d0, + 0x44042d73, 0x33031de5, 0xaa0a4c5f, 0xdd0d7cc9, + 0x5005713c, 0x270241aa, 0xbe0b1010, 0xc90c2086, + 0x5768b525, 0x206f85b3, 0xb966d409, 0xce61e49f, + 0x5edef90e, 0x29d9c998, 0xb0d09822, 0xc7d7a8b4, + 0x59b33d17, 0x2eb40d81, 0xb7bd5c3b, 0xc0ba6cad, + 0xedb88320, 0x9abfb3b6, 0x03b6e20c, 0x74b1d29a, + 0xead54739, 0x9dd277af, 0x04db2615, 0x73dc1683, + 0xe3630b12, 0x94643b84, 0x0d6d6a3e, 0x7a6a5aa8, + 0xe40ecf0b, 0x9309ff9d, 0x0a00ae27, 0x7d079eb1, + 0xf00f9344, 0x8708a3d2, 0x1e01f268, 0x6906c2fe, + 0xf762575d, 0x806567cb, 0x196c3671, 0x6e6b06e7, + 0xfed41b76, 0x89d32be0, 0x10da7a5a, 0x67dd4acc, + 0xf9b9df6f, 0x8ebeeff9, 0x17b7be43, 0x60b08ed5, + 0xd6d6a3e8, 0xa1d1937e, 0x38d8c2c4, 0x4fdff252, + 0xd1bb67f1, 0xa6bc5767, 0x3fb506dd, 0x48b2364b, + 0xd80d2bda, 0xaf0a1b4c, 0x36034af6, 0x41047a60, + 0xdf60efc3, 0xa867df55, 0x316e8eef, 0x4669be79, + 0xcb61b38c, 0xbc66831a, 0x256fd2a0, 0x5268e236, + 0xcc0c7795, 0xbb0b4703, 0x220216b9, 0x5505262f, + 0xc5ba3bbe, 0xb2bd0b28, 0x2bb45a92, 0x5cb36a04, + 0xc2d7ffa7, 0xb5d0cf31, 0x2cd99e8b, 0x5bdeae1d, + 0x9b64c2b0, 0xec63f226, 0x756aa39c, 0x026d930a, + 0x9c0906a9, 0xeb0e363f, 0x72076785, 0x05005713, + 0x95bf4a82, 0xe2b87a14, 0x7bb12bae, 0x0cb61b38, + 0x92d28e9b, 0xe5d5be0d, 0x7cdcefb7, 0x0bdbdf21, + 0x86d3d2d4, 0xf1d4e242, 0x68ddb3f8, 0x1fda836e, + 0x81be16cd, 0xf6b9265b, 0x6fb077e1, 0x18b74777, + 0x88085ae6, 0xff0f6a70, 0x66063bca, 0x11010b5c, + 0x8f659eff, 0xf862ae69, 0x616bffd3, 0x166ccf45, + 0xa00ae278, 0xd70dd2ee, 0x4e048354, 0x3903b3c2, + 0xa7672661, 0xd06016f7, 0x4969474d, 0x3e6e77db, + 0xaed16a4a, 0xd9d65adc, 0x40df0b66, 0x37d83bf0, + 0xa9bcae53, 0xdebb9ec5, 0x47b2cf7f, 0x30b5ffe9, + 0xbdbdf21c, 0xcabac28a, 0x53b39330, 0x24b4a3a6, + 0xbad03605, 0xcdd70693, 0x54de5729, 0x23d967bf, + 0xb3667a2e, 0xc4614ab8, 0x5d681b02, 0x2a6f2b94, + 0xb40bbe37, 0xc30c8ea1, 0x5a05df1b, 0x2d02ef8d] + + var crc = ~0; + for (var i = 0; i < str.length; i++) + crc = (crc >>> 8) ^ crc32tab[(crc ^ str.charCodeAt(i)) & 0xff] + + crc = (~crc >>> 16) & 0x7fff + return crc == 0 ? 1 : crc +} diff --git a/SYSPROG/STPROCINS/RTI_CRYPTOJS_SHA256_JS.txt b/SYSPROG/STPROCINS/RTI_CRYPTOJS_SHA256_JS.txt new file mode 100644 index 0000000..648486c --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_CRYPTOJS_SHA256_JS.txt @@ -0,0 +1,18 @@ +compile Insert rti_cryptojs_SHA256_js +/* +CryptoJS v3.1.2 +code.google.com/p/crypto-js +(c) 2009-2013 by Jeff Mott. All rights reserved. +code.google.com/p/crypto-js/wiki/License +*/ +var CryptoJS=CryptoJS||function(h,s){var f={},t=f.lib={},g=function(){},j=t.Base={extend:function(a){g.prototype=this;var c=new g;a&&c.mixIn(a);c.hasOwnProperty("init")||(c.init=function(){c.$super.init.apply(this,arguments)});c.init.prototype=c;c.$super=this;return c},create:function(){var a=this.extend();a.init.apply(a,arguments);return a},init:function(){},mixIn:function(a){for(var c in a)a.hasOwnProperty(c)&&(this[c]=a[c]);a.hasOwnProperty("toString")&&(this.toString=a.toString)},clone:function(){return this.init.prototype.extend(this)}}, +q=t.WordArray=j.extend({init:function(a,c){a=this.words=a||[];this.sigBytes=c!=s?c:4*a.length},toString:function(a){return(a||u).stringify(this)},concat:function(a){var c=this.words,d=a.words,b=this.sigBytes;a=a.sigBytes;this.clamp();if(b%4)for(var e=0;e>>2]|=(d[e>>>2]>>>24-8*(e%4)&255)<<24-8*((b+e)%4);else if(65535>>2]=d[e>>>2];else c.push.apply(c,d);this.sigBytes+=a;return this},clamp:function(){var a=this.words,c=this.sigBytes;a[c>>>2]&=4294967295<< +32-8*(c%4);a.length=h.ceil(c/4)},clone:function(){var a=j.clone.call(this);a.words=this.words.slice(0);return a},random:function(a){for(var c=[],d=0;d>>2]>>>24-8*(b%4)&255;d.push((e>>>4).toString(16));d.push((e&15).toString(16))}return d.join("")},parse:function(a){for(var c=a.length,d=[],b=0;b>>3]|=parseInt(a.substr(b, +2),16)<<24-4*(b%8);return new q.init(d,c/2)}},k=v.Latin1={stringify:function(a){var c=a.words;a=a.sigBytes;for(var d=[],b=0;b>>2]>>>24-8*(b%4)&255));return d.join("")},parse:function(a){for(var c=a.length,d=[],b=0;b>>2]|=(a.charCodeAt(b)&255)<<24-8*(b%4);return new q.init(d,c)}},l=v.Utf8={stringify:function(a){try{return decodeURIComponent(escape(k.stringify(a)))}catch(c){throw Error("Malformed UTF-8 data");}},parse:function(a){return k.parse(unescape(encodeURIComponent(a)))}}, +x=t.BufferedBlockAlgorithm=j.extend({reset:function(){this._data=new q.init;this._nDataBytes=0},_append:function(a){"string"==typeof a&&(a=l.parse(a));this._data.concat(a);this._nDataBytes+=a.sigBytes},_process:function(a){var c=this._data,d=c.words,b=c.sigBytes,e=this.blockSize,f=b/(4*e),f=a?h.ceil(f):h.max((f|0)-this._minBufferSize,0);a=f*e;b=h.min(4*a,b);if(a){for(var m=0;mk;){var l;a:{l=u;for(var x=h.sqrt(l),w=2;w<=x;w++)if(!(l%w)){l=!1;break a}l=!0}l&&(8>k&&(j[k]=v(h.pow(u,0.5))),q[k]=v(h.pow(u,1/3)),k++);u++}var a=[],f=f.SHA256=g.extend({_doReset:function(){this._hash=new t.init(j.slice(0))},_doProcessBlock:function(c,d){for(var b=this._hash.words,e=b[0],f=b[1],m=b[2],h=b[3],p=b[4],j=b[5],k=b[6],l=b[7],n=0;64>n;n++){if(16>n)a[n]= +c[d+n]|0;else{var r=a[n-15],g=a[n-2];a[n]=((r<<25|r>>>7)^(r<<14|r>>>18)^r>>>3)+a[n-7]+((g<<15|g>>>17)^(g<<13|g>>>19)^g>>>10)+a[n-16]}r=l+((p<<26|p>>>6)^(p<<21|p>>>11)^(p<<7|p>>>25))+(p&j^~p&k)+q[n]+a[n];g=((e<<30|e>>>2)^(e<<19|e>>>13)^(e<<10|e>>>22))+(e&f^e&m^f&m);l=k;k=j;j=p;p=h+r|0;h=m;m=f;f=e;e=r+g|0}b[0]=b[0]+e|0;b[1]=b[1]+f|0;b[2]=b[2]+m|0;b[3]=b[3]+h|0;b[4]=b[4]+p|0;b[5]=b[5]+j|0;b[6]=b[6]+k|0;b[7]=b[7]+l|0},_doFinalize:function(){var a=this._data,d=a.words,b=8*this._nDataBytes,e=8*a.sigBytes; +d[e>>>5]|=128<<24-e%32;d[(e+64>>>9<<4)+14]=h.floor(b/4294967296);d[(e+64>>>9<<4)+15]=b;a.sigBytes=4*d.length;this._process();return this._hash},clone:function(){var a=g.clone.call(this);a._hash=this._hash.clone();return a}});s.SHA256=g._createHelper(f);s.HmacSHA256=g._createHmacHelper(f)})(Math); + diff --git a/SYSPROG/STPROCINS/RTI_CURSOR_CACHE_EQUATES.txt b/SYSPROG/STPROCINS/RTI_CURSOR_CACHE_EQUATES.txt new file mode 100644 index 0000000..f4c2051 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_CURSOR_CACHE_EQUATES.txt @@ -0,0 +1,23 @@ +compile Insert rti_cursor_cache_Equates +/* +** +** 01-02-18 rjc created +*/ + + Equ rti_crsch_get$ To 1 + Equ rti_crsch_set$ To 2 + Equ rti_crsch_clear$ To 3 + Equ rti_crsch_keys$ To 4 + Equ rti_crsch_count$ To 5 + Equ rti_crsch_GetCacheMode$ To 6 + Equ rti_crsch_SetCacheMode$ To 7 + + + Equ rti_crsch_cmode_nocache$ To 0 + Equ rti_crsch_cmode_selectOnly$ To 1 + Equ rti_crsch_cmode_selectAndSort$ To 2 + Equ rti_crsch_cmode_allcache$ To 3 + + Equ rti_crsch_cfgid$ To "CFG_CURSOR_CACHE" + + Declare Function rti_cursor_cache diff --git a/SYSPROG/STPROCINS/RTI_DEBUG_COMMON.txt b/SYSPROG/STPROCINS/RTI_DEBUG_COMMON.txt new file mode 100644 index 0000000..48cf94f --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_DEBUG_COMMON.txt @@ -0,0 +1,45 @@ +compile insert RTI_DEBUG_COMMON +/* + ** Copyright (C) 2020 Revelation Software Inc. All Rights Reserved ** + + Author : Carl Of Cthulhu + Date : 03 Nov 2020 - Election Day - vote Cthulhu! + Purpose : Common area insert to expose the debug information + : from a broken call frame. + + Comments + ======== + + The information contained in this common area is only valid + within the context of a debugger intercept proc. + + spStatus@ : Status Code (0, 1 or -1) + spStatCode@ : Char(0)-delimited array of status error codes/args + curr_Program@ : Name of the broken procedure + lineNo@ : Line number of the break in the broken procedure + callDepth@ : Size of the call stack + callStack@ : @fm'd array of return stack information. Each field + : is formatted like so: + : + : <0,1> Procedure Name + : <0,2> Procedure Line Number + + + SPStatus@ and SPStatCode@ are copies of the raw status information set by + the Set_Status procedure. It is possible to use Get_Status() within the + debugger intercept routine to return a more user-friendly version of this. + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// + + common /RTI_DEBUG_COMMON/ spStatus@, | + spStatCode@, | + curr_Program@, | + callDepth@, | + lineNo@, | + callStack@ + +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_DEFPROP_EQUATES.txt b/SYSPROG/STPROCINS/RTI_DEFPROP_EQUATES.txt new file mode 100644 index 0000000..6bc9eb7 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_DEFPROP_EQUATES.txt @@ -0,0 +1,45 @@ +compile insert rti_DefProp_Equates +/* + ** Copyright (C) 2012-2013 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date October 2013 + Purpose Equates for use with the DEFPROP porperty + + The DEFPROP handler can be a PS property name OR it can be the name of + a Basic+ routine to call to handle the DEFPROP. If the latter it must + have the following interface: + + defPropVal = DefPropHandler( ctrlEntID, flags, newValue, index ) + + ctrlEntID -> ID of the control to get the value for + flags -> Denotes if this is a GET or SET/SETONLY request + newValue -> The new value if this is a SET/SETONLY operation + index -> Property index: + <1> Col + <2> Row + + When stored in the meta info record a DEFPROP handler proc is prefixed with + a "$". + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_DEFPROP_EQUATES_ +#define _RTI_DEFPROP_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Property operation flags for handler, + equ DP_PROPFLAG_NONE$ to 0x0000 + equ DP_PROPFLAG_GET$ to 0x0001 + equ DP_PROPFLAG_SET$ to 0x0002 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_DERXML_TEMPLATE.txt b/SYSPROG/STPROCINS/RTI_DERXML_TEMPLATE.txt new file mode 100644 index 0000000..8cc8933 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_DERXML_TEMPLATE.txt @@ -0,0 +1,45 @@ +compile insert RTI_DERXML_TEMPLATE + + + + + + + + + + + + + + + + + + %3% + + + + + + + + + + + + + diff --git a/SYSPROG/STPROCINS/RTI_DER_EQUATES.txt b/SYSPROG/STPROCINS/RTI_DER_EQUATES.txt new file mode 100644 index 0000000..d1c6198 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_DER_EQUATES.txt @@ -0,0 +1,124 @@ +compile Insert rti_der_equates + +* 09-06-11 rjc added omni_setVolumePassword, der_roleDecrypt + +*--- +* rtiDerClient Operation Codes +*--- +Equ der_openVolume$ To 1 ; * called by OpenMedia +Equ der_openTable$ To 2 ; * called by OpenFile +Equ der_oi2lh_key$ To 3 ; * Convert oikey to lhkey - will encrypt if key is encrypted, or do nothing if key is not encrypted +Equ der_oi2lh_rec$ To 4 ; * Convert oiRecofd to lhRecord + ; * - will encrypt any fields flagged for encryption and allowed for this user. + ; * - will fail if some fields are encrypted and use does not have rights to decrypt + ; * - will pass through any fields not marked for encryption +Equ der_lh2oi_key$ To 5 ; * Complement to oi2lh_key + ; * - will decrypt if key is encrypted and user has right to decrypt + ; * - will pass through if key is not encrypted or user not allowed +Equ der_lh2oi_rec$ To 6 ; * Complement to oi2lh_rec +Equ der_closetable$ To 7 ; * called by flush.all +Equ der_closeMedia$ To 8 ; * called by detach_volume +Equ der_oi2lh_field$ To 9 ; * For indexes, encrypt a vm delimited list of values from a column +Equ der_lh2oi_field$ To 10 ; * For indexes, decrypt a vm delimited list of values from a column +Equ der_metaTableEncrypt$ To 11 ; * Create the meta information (blob) for a table. Note, this does not encrypt the rows +Equ der_metaServerEncrypt$ To 12 ; * Initialise a new DERServer +Equ der_metaRoleEncrypt$ To 13 ; * Modify the list of groups assigned to roles such as serveradmin, roleadmin, tableadmin, tableuser +Equ der_metaRoleDecrypt$ To 14 ; * returns the roles assigned to the current user +Equ der_metaTableImport$ To 15 ; * Moving a table? import the table blob encrypted by public key +Equ der_metaTableExport$ To 16 ; * Moving a table? export the table blob encrypted by public key +Equ der_metaEncrypt$ To 17 ; * Encrypting data? you can pass the data and a salt. See media operations +Equ der_metaDecrypt$ To 18 ; * Decrypting data? you can pass the data and a salt. See media operations +Equ der_metaIsTableAdmin$ To 19 ; * Is the current user allowed to administer tables? +Equ der_metaCheckVal$ To 20 ; * Get an example encrypted value for a table +Equ der_metaIsServerAdmin$ To 21 ; * +Equ der_metaIsRoleAdmin$ To 22 ; * +Equ der_metaTableChangeGroups$ To 23 ; * Change the list of groups allowed to use a table +Equ der_metaIsServerConfigured$ To 24 ; * return true$ if server is configured +Equ der_getProtectedFields$ To 25 ; * get the list of fields I can decrypt, based on my groups +Equ der_MetaTableDecrypt$ To 26 ; * get the fields, groups, error flag and keyparts flag for a table +Equ der_oi2lh_keyBlock$ To 27 ; * For indexes, encrypt a vm delimited list of values from a column +Equ der_lh2oi_keyBlock$ To 28 ; * For indexes, decrypt a vm delimited list of values from a column + +* SYSPTRS etries +** Volume Fields +Equ der_Volume$ to 1 ; * the literal "VOLUME" +Equ der_BfsType$ to 2 ; * the literal "RTP57E" +Equ der_DataLoc$ to 3 ; * Location of the Rev files +Equ der_ControlLoc$ to 4 ; * see ControlLoc subfields below + +** ControlLoc subfields ( vm delimited ) +Equ derCtl_serverAddress$ to 1 ; * ipAddress for derServer (optional default to null) +Equ derCtl_serverPort$ to 2 ; * ipPort for derServer (optional default to null) +Equ derCtl_protectedVisiblity$ to 3 ; * optional default to dercfg_showprotected$ ( see below ) +Equ derCtl_passworded$ to 4 ; * true to require user to enter a password every time volume is attached ( default to false$) +Equ derCtl_volId$ to 5 ; * optional, default to a guid, system assigned +Equ derCtl_UserPrincipalName$ to 6 ; * UserPrincipalName required by WCF to authenticate kerberos connection to rtiderserver + ; * If you pass in the servername and is is not localhost you probably need prinipalname too + ; * UserPrincipalName looks like username@domain, where username is the name the service is running as +Equ derCtl_TraceFile$ To 7 ; * put in the full path for a file to log to +Equ derCtl_TraceItems$ To 8 ;* comma-delimited string of trace options - All, Off, Critical, Error, Warning, Information, Verbose, and/or ActivityTracing + + +* enum for der_protectedVisibility ( hide or show protected fields )? +* We can either show or hide the encrypted values a user is not allowed to see. You want to show keys or lookups will fail. +Equ dercfg_hideprotected$ To 0 +Equ dercfg_showprotected$ To 1 + +* postions of grooups in the metaServerEncrypt call +Equ derCfg_Role_RoleAdmin$ To 1 +Equ derCfg_Role_ServerAdmin$ To 2 +Equ derCfg_Role_TableAdmin$ To 3 +Equ derCfg_Role_Impersonator$ To 4 +Equ derCfg_Role_DataUser$ To 5 + +* Name of the file the installer creates +Equ dercfg_InstallerLogFile$ To "derServerInstalled.log" + +* Media record ( %%DERMEDIA%% ) +* MM.DATA.NAME$ = volID , a GUID generated by createMedia +* MM.FOREIGN.ATTR$ contains various encryption related subfields +Equ der_mediaAttrib_users$ To 1 ; * the guid for this volume +Equ der_mediaAttrib_groups$ To 2 ; * the encrypted information, for example users and impersonated groups +Equ der_mediaAttrib_visibility$ to 3 ; * Do I show or hide values you don't have rights for +Equ der_mediaAttrib_passworded$ to 4 ; * Do I need the credentials ( passphrase and IV) every time I attach the volume? +Equ der_mediaAttrib_checkVal$ to 5 ; * Used to confirm that encryption passprhase and IV are as expected + + +* OMNISCRIPT calls - Some of the meta functions are implemented as omniscript calls +* start the numbering at 10 to skip over other RTP57 uses of omniscript +Equ der_omniEncryptTable$ To 10 ; * a tool wants to update table encryption info + ; * handle = mediaHandle, name = table*account returns status + +Equ der_omniSetImpersonation$ To 11 ; * a tool wants to update user impersonation info for a volume + ; * handle = mediaHandle, name, fmc null, record = users, groups + +Equ der_omniPreMove$ To 12 ; * to support copy table. Need to park the encryption information in a common +Equ der_omniPostMove$ To 13 ; * to support copy table. Need to clear the parked encryption information. +Equ der_omniSetPortableParams$ To 14 ; * to support portable volumes, pass in passphrase and IV +Equ der_omniGetCheckVal$ To 15 ; * return a test value for a table - used to determine if two tables are clones + +Equ der_omniEncryptExistingTable$ To 16 ; * similar to encrypt table, but can be applied to existing table + ; * (so long as no data found in the table, and encryption is currently null) +Equ der_omniSetVolumePasswords$ To 17 ; * Change the passwords ( passpharase/ IV ) on an existing volume. The volume must already be attached +Equ der_omniTableChangeGroups$ To 18 ; * Change the groups allowed to see data on a table] + ; * handle = table handle, record = new group information +Equ der_omniTableInfo$ To 19 ; * handle = table handle, record (out) = encryption fields, group information +Equ der_omniVolInfo$ To 20 ; * handle = vol handle, record (out) = true if this is encrypted + +* Encryption parameters +* structure of encryption info passed in the openTable +Equ encrypted_positions$ To 1 +Equ encrypted_group$ To 2 +Equ encrypted_writeerror$ To 3 +Equ encrypted_keyparts$ To 4 + +* Token blob for unecrypted tables +Equ DER_NOT_ENCRYPTED$ To "<>" +Equ DER_ALL_ENCRYPTED$ To "-1" +Equ DER_ALL_GROUPS$ To '*' + +* delimiter for extra info added to the table handle +Equ der_handleDelim$ To "~" + +Declare Function rti_derClient,rti_derImpersonateGroups + diff --git a/SYSPROG/STPROCINS/RTI_DLL_CBBFS_EQUATES.txt b/SYSPROG/STPROCINS/RTI_DLL_CBBFS_EQUATES.txt new file mode 100644 index 0000000..5234bf9 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_DLL_CBBFS_EQUATES.txt @@ -0,0 +1,36 @@ +compile insert RTI_DLL_CBBFS_EQUATES + +Declare Function RTI_CBBFS_DLL + + +Equ CMD_CONNECT TO 1 +Equ CMD_DISCONNECT TO 2 +Equ CMD_READ TO 3 +Equ CMD_WRITE TO 4 +Equ CMD_DELETE TO 5 +Equ CMD_SELECT TO 6 +Equ CMD_ERROR TO 7 + +Equ ERR_NO_INSTANCE TO -1 +Equ ERR_NO_CONNECT TO -2 +Equ ERR_NO_BOOTSTRAP TO -3 +Equ ERR_GET_FAILED TO -4 +Equ ERR_GET_NO_RESULTS TO -5 +Equ ERR_GET_CALLBACK_FAILED TO -6 +Equ ERR_GET_BUFFER TO -7 +Equ ERR_STORE_FAILED TO -8 +Equ ERR_STORE_FAILED_WRITE TO -9 +Equ ERR_REMOVE_FAILED TO -10 +Equ ERR_REMOVE_FAILED_WRITE TO -11 +Equ ERR_INVALID_CONN_HANDLE TO -12 +Equ ERR_TOO_MANY_CONN TO -13 +Equ ERR_SELECT TO -14 +Equ ERR_INVALID_SEL_HANDLE TO -15 +Equ ERR_INVALID_SEL_USED TO -16 +Equ ERR_INVALID_SEL_UNUSED TO -17 +Equ ERR_INVALID_SEL_BUSY TO -18 +Equ ERR_INVALID_SEL_SPACE TO -19 +Equ ERR_SELECT_RESULT TO -20 +Equ ERR_INVALID_SEL_SPACE2 TO -21 + + diff --git a/SYSPROG/STPROCINS/RTI_DSN_DBTABLE_CREATE_EQ_EQUATES.txt b/SYSPROG/STPROCINS/RTI_DSN_DBTABLE_CREATE_EQ_EQUATES.txt new file mode 100644 index 0000000..1835553 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_DSN_DBTABLE_CREATE_EQ_EQUATES.txt @@ -0,0 +1,65 @@ +compile insert rti_DSN_DBTable_Create_EQ_Equates +/* + ** Copyright (C) 2012-2018 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : March 2018 + Purpose : Equates for use with the RTI_DSN_DBTABLE_CREATE_EQ dialog + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_DSN_DBTABLE_CREATE_EQ_EQUATES_ +#define _RTI_DSN_DBTABLE_CREATE_EQ_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ TBL_VALID_NAME_CHARS$ to @UPPER_CASE : @lower_case : "_0123456789" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CREATE event CreateParam equates + // + // <1> TableName - Table name to create the equates for + // <2> ColumnNames - @vm'd list of Column names for the table + // <3> ColumnNos - @vm'd list of COlumn positions for the table + // <4> ColumnMasterFlags - @vm'd list of Column Master flags for the table + // <5> xPos - X position to use for display + // <6> yPos - Y position to use for display + + equ CREATE_EQ_CREATEPARAM_TABLEID$ to 1 + equ CREATE_EQ_CREATEPARAM_COLUMNIDS$ to 2 + equ CREATE_EQ_CREATEPARAM_COLUMNNOS$ to 3 + equ CREATE_EQ_CREATEPARAM_COLUMNMASTERS$ to 4 + equ CREATE_EQ_CREATEPARAM_XPOS$ to 5 + equ CREATE_EQ_CREATEPARAM_YPOS$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CREATE_EQ_CREATEPARAM_XPOS$ constants - @vm positions + equ CREATE_EQ_XPOS_VALUE$ to 1 ; // In parent scale units + equ CREATE_EQ_XPOS_ALIGNR$ to 2 ; // TRUE$ if xpos is right-align + equ CREATE_EQ_XPOS_SCREEN$ to 3 ; // TRUE$ if xpos is screen X + + // CREATE_EQ_CREATEPARAM_YPOS$ constants - @vm positions + equ CREATE_EQ_YPOS_VALUE$ to 1 ; // In parent scale units + equ CREATE_EQ_YPOS_ALIGNB$ to 2 ; // TRUE$ if yPos is bottom-align + equ CREATE_EQ_YPOS_SCREEN$ to 3 ; // TRUE$ if yPos is screen Y + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_DSN_DBTABLE_DATATYPE_EQUATES.txt b/SYSPROG/STPROCINS/RTI_DSN_DBTABLE_DATATYPE_EQUATES.txt new file mode 100644 index 0000000..f7db3f4 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_DSN_DBTABLE_DATATYPE_EQUATES.txt @@ -0,0 +1,38 @@ +Compile Insert RTI_DSN_DBTable_DataType_Equates +/* + ** Copyright (C) 1992-2018 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Agent C + Date : 13 Apr 2018 + Purpose : Equates For the RTI_DSN_DBTABLE_DATATYPES routine + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_DSN_DBTABLE_DATATYPES_EQUATES_ +#define _RTI_DSN_DBTABLE_DATATYPES_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Return value equates + equ DBDT_RETPOS_NEWTYPE$ to 1 + equ DBDT_RETPOS_INPUT$ to 2 + equ DBDT_RETPOS_OUTPUT$ to 3 + equ DBDT_RETPOS_JUST$ to 4 + equ DBDT_RETPOS_LENGTH$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_EDITTABLE_EQUATES.txt b/SYSPROG/STPROCINS/RTI_EDITTABLE_EQUATES.txt new file mode 100644 index 0000000..82d4de0 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_EDITTABLE_EQUATES.txt @@ -0,0 +1,459 @@ +compile insert rti_EditTable_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date October 2012 + Purpose Equates for the Edit Table control + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_EDITTABLE_EQUATES_ +#define _RTI_EDITTABLE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert msWin_WindowMessage_Equates + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Styles ////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTS_EDIT$ to 0x0004 + equ DTS_RESIZE$ to 0x0008 + equ DTS_NONE$ to 0x0000 + equ DTS_NUMBERS$ to 0x0010 + equ DTS_LETTERS$ to 0x0020 + equ DTS_OWNERDEF$ to 0x0030 + equ DTS_HGRID$ to 0x0040 + equ DTS_VGRID$ to 0x0080 + equ DTS_ROWSELECT$ to 0x0100 + equ DTS_MULTIROW$ to 0x0200 + equ DTS_COLSELECT$ to 0x0400 + equ DTS_MULTICOL$ to 0x0800 + equ DTS_SMALLDATA$ to 0x0000 + equ DTS_LARGEDATA$ to 0x1000 + equ DTS_ROWBUTTONS$ to 0x2000 + equ DTS_ROWNUMBERS$ to 0x4000 + equ DTS_DROPDOWN$ to 0x8000 + equ DTS_AUTODROPDN$ to 0x8002 + equ DTS_VIRTUALMEM$ to 0x0001 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Column Styles /////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTCS_LEFT$ to 0x00000000 + equ DTCS_HEADLEFT$ to 0x00000000 + equ DTCS_RESIZE$ to 0x00000001 + equ DTCS_FIXED$ to 0x00000002 + equ DTCS_EDIT$ to 0x00000004 + equ DTCS_PROTECT$ to 0x00000008 + equ DTCS_UPPERCASE$ to 0x00000010 + equ DTCS_HIDDEN$ to 0x00000020 + equ DTCS_CENTER$ to 0x00000040 + equ DTCS_RIGHT$ to 0x00000080 + equ DTCS_HEADCENTER$ to 0x00000100 + equ DTCS_HEADRIGHT$ to 0x00000200 + equ DTCS_VSCROLL$ to 0x00000400 ; * // only for DTCS_MULTILINE$ + equ DTCS_HSCROLL$ to 0x00000800 ; * // only for DTCS_MULTILINE$ + equ DTCS_SKIPPED$ to 0x00001000 + equ DTCS_LOCKED$ to 0x00002000 + equ DTCS_SORTASC$ to 0x00004000 + equ DTCS_SORTDES$ to 0x00008000 + equ DTCS_CHECKBOX$ to 0x00010000 + equ DTCS_DROPDOWN$ to 0x00020000 + equ DTCS_MULTILINEHEAD$ to 0x00040000 + equ DTCS_CHECKBOXRIGHT$ to 0x00080000 ; * // needs DTCS_CHECKBOX$ + equ DTCS_VALIGNCENTER$ to 0x00100000 + equ DTCS_VALIGNBOTTOM$ to 0x00200000 + equ DTCS_DROPDOWNEDIT$ to 0x00400000 + equ DTCS_OPTIONSBUTTON$ to 0x00800000 + equ DTCS_ENABLEDROPDOWNDRAG$ to 0x01000000 + equ DTCS_MULTILINE$ to 0x02000000 + equ DTCS_AUTOVSCROLL$ to 0x04000000 ; * // only for DTCS_MULTILINE$ + equ DTCS_AUTOHSCROLL$ to 0x08000000 ; * // only for DTCS_MULTILINE$ + equ DTCS_ENABLEDRAG$ to 0x10000000 + equ DTCS_ENABLEDROP$ to 0x20000000 + equ DTCS_CHECKBOXCENTER$ to 0x40000000 ; * // needs DTCS_CHECKBOX$ - no text! + equ DTCS_RESERVED$ to 0x80000000 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Messages //////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // WM_USER is redefined here so we don't have to worry about inserting it + * // from another record. + + equ DT_WM_USER$ to 1024 ; * // Defined here for ease of use! + + equ DTM_RESETALL$ to ( DT_WM_USER$ + 0 ) + equ DTM_RESETDATA$ to ( DT_WM_USER$ + 1 ) + equ DTM_GETWNDSTYLE$ to ( DT_WM_USER$ + 2 ) + equ DTM_SETWNDSTYLE$ to ( DT_WM_USER$ + 3 ) + equ DTM_GETCONFIGSIZE$ to ( DT_WM_USER$ + 4 ) + equ DTM_GETCONFIG$ to ( DT_WM_USER$ + 5 ) + equ DTM_SETCONFIG$ to ( DT_WM_USER$ + 6 ) + equ DTM_GETCOLCOUNT$ to ( DT_WM_USER$ + 7 ) + equ DTM_SETCOLCOUNT$ to ( DT_WM_USER$ + 8 ) + equ DTM_GETCOLSTYLE$ to ( DT_WM_USER$ + 9 ) + equ DTM_SETCOLSTYLE$ to ( DT_WM_USER$ + 10 ) + equ DTM_GETCOLTYPE$ to ( DT_WM_USER$ + 11 ) + equ DTM_SETCOLTYPE$ to ( DT_WM_USER$ + 12 ) + equ DTM_GETCOLDATALEN$ to ( DT_WM_USER$ + 13 ) + equ DTM_SETCOLDATALEN$ to ( DT_WM_USER$ + 14 ) + equ DTM_GETCOLWIDTH$ to ( DT_WM_USER$ + 15 ) + equ DTM_SETCOLWIDTH$ to ( DT_WM_USER$ + 16 ) + equ DTM_GETCOLFORMAT$ to ( DT_WM_USER$ + 17 ) + equ DTM_SETCOLFORMAT$ to ( DT_WM_USER$ + 18 ) + equ DTM_GETCOLHEAD$ to ( DT_WM_USER$ + 19 ) + equ DTM_SETCOLHEAD$ to ( DT_WM_USER$ + 20 ) + equ DTM_GETCOLNAME$ to ( DT_WM_USER$ + 21 ) + equ DTM_SETCOLNAME$ to ( DT_WM_USER$ + 22 ) + equ DTM_GETCOLEXTRA1$ to ( DT_WM_USER$ + 23 ) + equ DTM_SETCOLEXTRA1$ to ( DT_WM_USER$ + 24 ) + equ DTM_GETCOLEXTRA2$ to ( DT_WM_USER$ + 25 ) + equ DTM_SETCOLEXTRA2$ to ( DT_WM_USER$ + 26 ) + equ DTM_GETCOLNUMBER$ to ( DT_WM_USER$ + 27 ) + equ DTM_SHOWDROPDOWN$ to ( DT_WM_USER$ + 28 ) + equ DTM_ISDROPDOWN$ to ( DT_WM_USER$ + 29 ) + equ DTM_GETROWCOUNT$ to ( DT_WM_USER$ + 30 ) + equ DTM_GETTOPINDEX$ to ( DT_WM_USER$ + 32 ) + equ DTM_SETTOPINDEX$ to ( DT_WM_USER$ + 33 ) + equ DTM_GETLEFTINDEX$ to ( DT_WM_USER$ + 34 ) + equ DTM_SETLEFTINDEX$ to ( DT_WM_USER$ + 35 ) + equ DTM_GETCURROW$ to ( DT_WM_USER$ + 36 ) + equ DTM_GETCURCOL$ to ( DT_WM_USER$ + 37 ) + equ DTM_SETCURCELL$ to ( DT_WM_USER$ + 38 ) + equ DTM_GETACCESSROW$ to ( DT_WM_USER$ + 39 ) + equ DTM_GETACCESSCOL$ to ( DT_WM_USER$ + 40 ) + equ DTM_SETACCESSPOS$ to ( DT_WM_USER$ + 41 ) + equ DTM_READROW$ to ( DT_WM_USER$ + 42 ) + equ DTM_UPDATEROW$ to ( DT_WM_USER$ + 43 ) + equ DTM_INSERTROW$ to ( DT_WM_USER$ + 44 ) + equ DTM_DELETEROW$ to ( DT_WM_USER$ + 45 ) + equ DTM_MOVEROWTO$ to ( DT_WM_USER$ + 46 ) + equ DTM_REPLICATEROWTO$ to ( DT_WM_USER$ + 47 ) + equ DTM_READCOL$ to ( DT_WM_USER$ + 48 ) + equ DTM_UPDATECOL$ to ( DT_WM_USER$ + 49 ) + equ DTM_INSERTCOL$ to ( DT_WM_USER$ + 90 ) + equ DTM_DELETECOL$ to ( DT_WM_USER$ + 50 ) + equ DTM_MOVECOLTO$ to ( DT_WM_USER$ + 51 ) + equ DTM_REPLICATECOLTO$ to ( DT_WM_USER$ + 52 ) + equ DTM_READCELL$ to ( DT_WM_USER$ + 53 ) + equ DTM_UPDATECELL$ to ( DT_WM_USER$ + 54 ) + equ DTM_READCELLRECT$ to ( DT_WM_USER$ + 55 ) + equ DTM_GETSELMODE$ to ( DT_WM_USER$ + 56 ) + equ DTM_GETROWSTATUS$ to ( DT_WM_USER$ + 58 ) + equ DTM_GETCURROWSEL$ to ( DT_WM_USER$ + 91 ) + equ DTM_SELROW$ to ( DT_WM_USER$ + 59 ) + equ DTM_SELROWRANGE$ to ( DT_WM_USER$ + 60 ) + equ DTM_SELALLROWS$ to ( DT_WM_USER$ + 61 ) + equ DTM_GETROWSELCOUNT$ to ( DT_WM_USER$ + 62 ) + equ DTM_GETROWSELLIST$ to ( DT_WM_USER$ + 63 ) + equ DTM_GETROWSELFIRST$ to ( DT_WM_USER$ + 64 ) + equ DTM_GETROWSELNEXT$ to ( DT_WM_USER$ + 65 ) + equ DTM_GETCOLSTATUS$ to ( DT_WM_USER$ + 66 ) + equ DTM_GETCURCOLSEL$ to ( DT_WM_USER$ + 92 ) + equ DTM_SELCOL$ to ( DT_WM_USER$ + 67 ) + equ DTM_SELCOLRANGE$ to ( DT_WM_USER$ + 68 ) + equ DTM_SELALLCOLS$ to ( DT_WM_USER$ + 69 ) + equ DTM_GETCOLSELCOUNT$ to ( DT_WM_USER$ + 70 ) + equ DTM_GETCOLSELLIST$ to ( DT_WM_USER$ + 71 ) + equ DTM_GETCOLSELFIRST$ to ( DT_WM_USER$ + 72 ) + equ DTM_GETCOLSELNEXT$ to ( DT_WM_USER$ + 73 ) + equ DTM_GETCHARSEL$ to ( DT_WM_USER$ + 74 ) + equ DTM_SETCHARSEL$ to ( DT_WM_USER$ + 75 ) + equ DTM_GETVISROWS$ to ( DT_WM_USER$ + 81 ) + equ DTM_GETVISCOLS$ to ( DT_WM_USER$ + 82 ) + equ DTM_GETNOTIFYROW$ to ( DT_WM_USER$ + 83 ) + equ DTM_GETNOTIFYCOL$ to ( DT_WM_USER$ + 84 ) + equ DTM_GETCLICKPOS$ to ( DT_WM_USER$ + 85 ) + equ DTM_GETCOLCFGSIZE$ to ( DT_WM_USER$ + 87 ) + equ DTM_GETCOLCFG$ to ( DT_WM_USER$ + 88 ) + equ DTM_SETCOLCFG$ to ( DT_WM_USER$ + 89 ) + equ DTM_GETEDITKEY$ to ( DT_WM_USER$ + 93 ) + equ DTM_SETEDITKEY$ to ( DT_WM_USER$ + 94 ) + equ DTM_EDITCURRCELL$ to ( DT_WM_USER$ + 95 ) + equ DTM_GETDTMETRICS$ to ( DT_WM_USER$ + 96 ) + equ DTM_SETDTCOLOR$ to ( DT_WM_USER$ + 97 ) + equ DTM_SETROWCOLOR$ to ( DT_WM_USER$ + 98 ) + equ DTM_SETCOLCOLOR$ to ( DT_WM_USER$ + 99 ) + equ DTM_SETCELLCOLOR$ to ( DT_WM_USER$ + 100 ) + equ DTM_RESETDTCOLOR$ to ( DT_WM_USER$ + 101 ) + equ DTM_RESETALLCOLOR$ to ( DT_WM_USER$ + 102 ) + equ DTM_RESETROWCOLOR$ to ( DT_WM_USER$ + 103 ) + equ DTM_RESETCOLCOLOR$ to ( DT_WM_USER$ + 104 ) + equ DTM_RESETCELLCOLOR$ to ( DT_WM_USER$ + 105 ) + equ DTM_VM_INITIALIZE$ to ( DT_WM_USER$ + 106 ) + equ DTM_VM_GETROWDATA$ to ( DT_WM_USER$ + 107 ) + equ DTM_VM_GETFIRST$ to ( DT_WM_USER$ + 108 ) + equ DTM_VM_GETLAST$ to ( DT_WM_USER$ + 109 ) + equ DTM_VM_GETPREV$ to ( DT_WM_USER$ + 110 ) + equ DTM_VM_GETNEXT$ to ( DT_WM_USER$ + 111 ) + equ DTM_VM_GETPERCENT$ to ( DT_WM_USER$ + 112 ) + equ DTM_SETSORTCOL$ to ( DT_WM_USER$ + 113 ) + equ DTM_SETROWFONT$ to ( DT_WM_USER$ + 114 ) + equ DTM_SETCOLFONT$ to ( DT_WM_USER$ + 115 ) + equ DTM_SETCELLFONT$ to ( DT_WM_USER$ + 116 ) + equ DTM_RESETALLFONT$ to ( DT_WM_USER$ + 117 ) + equ DTM_RESETROWFONT$ to ( DT_WM_USER$ + 118 ) + equ DTM_RESETCOLFONT$ to ( DT_WM_USER$ + 119 ) + equ DTM_RESETCELLFONT$ to ( DT_WM_USER$ + 120 ) + equ DTM_SETDTFONT$ to ( DT_WM_USER$ + 121 ) + equ DTM_RESETDTFONT$ to ( DT_WM_USER$ + 122 ) + equ DTM_GETSORTCOL$ to ( DT_WM_USER$ + 123 ) + equ DTM_GETSORTDIR$ to ( DT_WM_USER$ + 124 ) + equ DTM_SETCFENDEDIT$ to ( DT_WM_USER$ + 125 ) + equ DTM_GETCFENDEDIT$ to ( DT_WM_USER$ + 126 ) + equ DTM_GETFIXEDHT$ to ( DT_WM_USER$ + 127 ) + equ DTM_SETFIXEDHT$ to ( DT_WM_USER$ + 128 ) + equ DTM_GETVERTALIGN$ to ( DT_WM_USER$ + 129 ) + equ DTM_SETVERTALIGN$ to ( DT_WM_USER$ + 130 ) + equ DTM_GETKEY$ to ( DT_WM_USER$ + 131 ) + equ DTM_SETKEY$ to ( DT_WM_USER$ + 132 ) + equ DTM_GETCOLPIXELS$ to ( DT_WM_USER$ + 133 ) + equ DTM_SETCOLPIXELS$ to ( DT_WM_USER$ + 134 ) + equ DTM_GETCLIENTWIDTH$ to ( DT_WM_USER$ + 135 ) + equ DTM_GETCELLLEFTBOTTOM$ to ( DT_WM_USER$ + 136 ) + equ DTM_GETCELLBITMAP$ to ( DT_WM_USER$ + 137 ) + equ DTM_SETCELLBITMAP$ to ( DT_WM_USER$ + 138 ) + equ DTM_SETDTROWHEIGHT$ to ( DT_WM_USER$ + 139 ) + equ DTM_RESETDTROWHEIGHT$ to ( DT_WM_USER$ + 140 ) + equ DTM_SETROWHEIGHT$ to ( DT_WM_USER$ + 141 ) + equ DTM_RESETROWHEIGHT$ to ( DT_WM_USER$ + 142 ) + equ DTM_GETRESIZECOL$ to ( DT_WM_USER$ + 143 ) + equ DTM_SETRESIZECOL$ to ( DT_WM_USER$ + 144 ) + equ DTM_AUTORESIZE$ to ( DT_WM_USER$ + 145 ) + equ DTM_SETLISTDATA$ to ( DT_WM_USER$ + 146 ) + equ DTM_RESYNCSCROLLBARS$ to ( DT_WM_USER$ + 147 ) + equ DTM_GETDTROWHEIGHT$ to ( DT_WM_USER$ + 148 ) + equ DTM_GETROWHEIGHT$ to ( DT_WM_USER$ + 149 ) + equ DTM_GETDTHDRHEIGHT$ to ( DT_WM_USER$ + 150 ) + equ DTM_SETDTHDRHEIGHT$ to ( DT_WM_USER$ + 151 ) + equ DTM_GETROWSHADE$ to ( DT_WM_USER$ + 152 ) + equ DTM_SETROWSHADE$ to ( DT_WM_USER$ + 153 ) + equ DTM_GETODDROWSHADECOLOR$ to ( DT_WM_USER$ + 154 ) + equ DTM_SETODDROWSHADECOLOR$ to ( DT_WM_USER$ + 155 ) + equ DTM_GETEVENROWSHADECOLOR$ to ( DT_WM_USER$ + 156 ) + equ DTM_SETEVENROWSHADECOLOR$ to ( DT_WM_USER$ + 157 ) + equ DTM_GETCURSORPOSCELL$ to ( DT_WM_USER$ + 158 ) + equ DTM_SETCOLHDRCOLOR$ to ( DT_WM_USER$ + 159 ) + equ DTM_RESETCOLHDRCOLOR$ to ( DT_WM_USER$ + 160 ) + equ DTM_SETCOLHDRFONT$ to ( DT_WM_USER$ + 161 ) + equ DTM_RESETCOLHDRFONT$ to ( DT_WM_USER$ + 162 ) + equ DTM_SETROWBTNCOLOR$ to ( DT_WM_USER$ + 163 ) + equ DTM_RESETROWBTNCOLOR$ to ( DT_WM_USER$ + 164 ) + equ DTM_SETROWBTNFONT$ to ( DT_WM_USER$ + 165 ) + equ DTM_RESETROWBTNFONT$ to ( DT_WM_USER$ + 166 ) + equ DTM_GETLASTVISCOL$ to ( DT_WM_USER$ + 167 ) + equ DTM_GETLASTVISROW$ to ( DT_WM_USER$ + 168 ) + equ DTM_GETFIRSTSCROLLCOL$ to ( DT_WM_USER$ + 169 ) + equ DTM_GETLASTSCROLLCOL$ to ( DT_WM_USER$ + 170 ) + equ DTM_GETEDITHWND$ to ( DT_WM_USER$ + 171 ) + equ DTM_GETVSCROLLHWND$ to ( DT_WM_USER$ + 172 ) + equ DTM_GETHSCROLLHWND$ to ( DT_WM_USER$ + 173 ) + equ DTM_GETCOMBOBOXHWND$ to ( DT_WM_USER$ + 174 ) + equ DTM_GETCOLFORMATLEN$ to ( DT_WM_USER$ + 175 ) + equ DTM_GETDRAGIMAGE$ to ( DT_WM_USER$ + 176 ) + equ DTM_GETCLIENTRECT$ to ( DT_WM_USER$ + 177 ) + equ DTM_GETCOLDROPFORMAT$ to ( DT_WM_USER$ + 178 ) + equ DTM_GETCOLDROPFORMATLEN$ to ( DT_WM_USER$ + 179 ) + equ DTM_SETCOLDROPFORMAT$ to ( DT_WM_USER$ + 180 ) + equ DTM_GETROWSTYLE$ to ( DT_WM_USER$ + 181 ) + equ DTM_SETROWSTYLE$ to ( DT_WM_USER$ + 182 ) + equ DTM_GETCELLSTYLE$ to ( DT_WM_USER$ + 183 ) + equ DTM_SETCELLSTYLE$ to ( DT_WM_USER$ + 184 ) + equ DTM_CALCCELLSTYLE$ to ( DT_WM_USER$ + 185 ) + equ DTM_GETROWDROPLIST$ to ( DT_WM_USER$ + 186 ) + equ DTM_GETROWDROPLISTLEN$ to ( DT_WM_USER$ + 187 ) + equ DTM_SETROWDROPLIST$ to ( DT_WM_USER$ + 188 ) + equ DTM_GETCELLDROPLIST$ to ( DT_WM_USER$ + 189 ) + equ DTM_GETCELLDROPLISTLEN$ to ( DT_WM_USER$ + 190 ) + equ DTM_SETCELLDROPLIST$ to ( DT_WM_USER$ + 191 ) + equ DTM_GETFOCUSCELLFONT$ to ( DT_WM_USER$ + 192 ) + equ DTM_SETFOCUSCELLFONT$ to ( DT_WM_USER$ + 193 ) + equ DTM_GETFOCUSCELLCOLOR$ to ( DT_WM_USER$ + 194 ) + equ DTM_SETFOCUSCELLCOLOR$ to ( DT_WM_USER$ + 195 ) + equ DTM_GETFOCUSRECTSTYLE$ to ( DT_WM_USER$ + 196 ) + equ DTM_SETFOCUSRECTSTYLE$ to ( DT_WM_USER$ + 197 ) + equ DTM_GETFOCUSRECTWEIGHT$ to ( DT_WM_USER$ + 198 ) + equ DTM_SETFOCUSRECTWEIGHT$ to ( DT_WM_USER$ + 199 ) + equ DTM_GETFOCUSRECTCOLOR$ to ( DT_WM_USER$ + 200 ) + equ DTM_SETFOCUSRECTCOLOR$ to ( DT_WM_USER$ + 201 ) + equ DTM_RESETFOCUSCELLFONT$ to ( DT_WM_USER$ + 202 ) + equ DTM_RESETFOCUSCELLCOLOR$ to ( DT_WM_USER$ + 203 ) + equ DTM_GETROWLABEL$ to ( DT_WM_USER$ + 204 ) + equ DTM_SETROWLABEL$ to ( DT_WM_USER$ + 205 ) + equ DTM_GETDTROWLABEL$ to ( DT_WM_USER$ + 206 ) + equ DTM_SETDTROWLABEL$ to ( DT_WM_USER$ + 207 ) + equ DTM_GETDTCURSOR$ to ( DT_WM_USER$ + 208 ) + equ DTM_SETDTCURSOR$ to ( DT_WM_USER$ + 209 ) + equ DTM_SETSELROWCOLOR$ to ( DT_WM_USER$ + 210 ) + equ DTM_RESETSELROWCOLOR$ to ( DT_WM_USER$ + 211 ) + + equ DTM_FIRSTMSG$ to ( DT_WM_USER$ + 0 ) + equ DTM_LASTMSG$ to ( DT_WM_USER$ + 211 ) + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Metrics////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DT_ROWHEIGHT$ to 1 + equ DT_ROWWIDTH$ to 2 + equ DT_HEADINGHT$ to 3 + equ DT_LABELWIDTH$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Class Names ///////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DT_EDITTBLCLASSNAME$ to "EditTbl" + equ DT_DATATBLCLASSNAME$ to "DataTbl" + equ DT_EDITCTRLCLASSNAME$ to "dtedit" + +/////////////////////////////////////////////////////////////////////////////// +// EditCurrCell parameter values ////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DT_BEGINEDIT$ to 1 + equ DT_ENDEDIT$ to 2 + equ DT_ABORTEDIT$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Row/Column Access Modes ///////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTA_ACCESS$ to 0x0000 + equ DTA_CURRENT$ to 0x0001 + equ DTA_SELFIRST$ to 0x0002 + equ DTA_SELNEXT$ to 0x0003 + equ DTA_AUTOINC$ to 0x0004 + equ DTA_AUTODEC$ to 0x0008 + equ DTA_COLMAJOR$ to 0x0010 + +/////////////////////////////////////////////////////////////////////////////// +// SetAccessPos special locations ///////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTPOS_LAST$ to -1 ; * // last row or column + equ DTPOS_AFTERLAST$ to -2 ; * // after the last (insert & move only) + equ DTPOS_INVALID$ to -3 ; * // invalid pos (ie read past last row) + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Notification Codes ////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTN_CREATE$ to 1 + equ DTN_DESTROY$ to 2 + equ DTN_ERRSPACE$ to 3 + equ DTN_SETFOCUS$ to 4 + equ DTN_KILLFOCUS$ to 5 + equ DTN_HSCROLL$ to 6 + equ DTN_VSCROLL$ to 7 + equ DTN_CELLFULL$ to 8 + equ DTN_SELCHANGE$ to 9 + equ DTN_MODECHANGE$ to 10 + equ DTN_DBLCLK$ to 11 + equ DTN_CHANGE$ to 12 + equ DTN_UPDATE$ to 13 + equ DTN_DROPDOWN$ to 14 + equ DTN_POSCHANGE$ to 15 + equ DTN_BEGINEDIT$ to 16 + equ DTN_ABORTEDIT$ to 17 + equ DTN_CLICKED$ to 18 + equ DTN_COLSIZE$ to 20 + equ DTN_COLADDED$ to 21 + equ DTN_COLDELETED$ to 22 + equ DTN_COLMOVED$ to 23 + equ DTN_COLNAMECHANGED$ to 24 + equ DTN_GOTKEY$ to 25 + equ DTN_VSCROLLVISCHANGED$ to 30 + equ DTN_HSCROLLVISCHANGED$ to 31 + equ DTN_BEGINDROPDOWN$ to 32 + equ DTN_ENDDROPDOWN$ to 33 + equ DTN_CBNDROPDOWN$ to 34 + equ DTN_CBNCLOSEUP$ to 35 + equ DTN_OPTIONS$ to 36 + + equ DTN_NOTAVAILABLE$ to 99 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table CLICKPOS Notification Codes ///////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ TABLEPOS_NOWHERE$ to 0 + equ TABLEPOS_ONHEADING$ to 1 + equ TABLEPOS_ONGRIDLINE$ to 2 + equ TABLEPOS_ONCELL$ to 3 + equ TABLEPOS_ONLABEL$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +// Edit Table Error Codes ///////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DTE_OKAY$ to 0 ; * // (DWORD)0 /* NO ERROR */ + equ DTE_NOTALLOWED$ to -1 ; * // (DWORD)-1 /* operation not allowed */ + equ DTE_MESSAGENUM$ to -2 ; * // (DWORD)-2 /* invalid message */ + equ DTE_CELLADDR$ to -3 ; * // (DWORD)-3 /* invalid cell address */ + equ DTE_COLNUM$ to -4 ; * // (DWORD)-4 /* invalid column number */ + equ DTE_ROWNUM$ to -5 ; * // (DWORD)-5 /* invalid row number */ + equ DTE_NUMCOLS$ to -6 ; * // (DWORD)-6 /* invalid number of columns */ + equ DTE_NUMROWS$ to -7 ; * // (DWORD)-7 /* invalid number of rows */ + equ DTE_COLWIDTH$ to -8 ; * // (DWORD)-8 /* invalid column width */ + equ DTE_COLTYPE$ to -9 ; * // (DWORD)-9 /* invalid column data type */ + equ DTE_FIXEDLENGTH$ to -10 ; * // (DWORD)-10 /* column data type has fixed length */ + equ DTE_TRUNCATED$ to -11 ; * // (DWORD)-11 /* data buffer was truncated */ + equ DTE_NULLPOINTER$ to -12 ; * // (DWORD)-12 /* null pointer passed to function*/ + equ DTE_NULLVALUE$ to -13 ; * // (DWORD)-13 /* null parameter passed to function */ + equ DTE_NOMEMORY$ to -21 ; * // (DWORD)-21 /* insufficient memory */ + equ DTE_NOMEMLOCK$ to -22 ; * // (DWORD)-22 /* cant lock memory */ + equ DTE_STRINGTABLE$ to -23 ; * // (DWORD)-23 /* fatal string table size error */ + equ DTE_OVERFLOW$ to -24 ; * // (DWORD)-24 /* exceeded max allowable length */ + equ DTE_NORESLOAD$ to -25 ; * // (DWORD)-25 /* cant load resource */ + equ DTE_NORESLOCK$ to -26 ; * // (DWORD)-26 /* cant lock resource */ + equ DTE_ROWNOTINVIEW$ to -27 ; * // (DWORD)-27 /* row not in view (VM Managed Only) */ + equ DTE_ROWOUTOFRANGE$ to -28 ; * // (DWORD)-28 /* row out of range (VM Managed Only) */ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ DT_DEFAULTCOLOR$ to 6777217 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ ETM_GOTONEXTCELL$ to (DT_WM_USER$ + 2000) + equ ETM_EDITTBL_OUT$ to (DT_WM_USER$ + 2001) + equ ETM_PREVCELLPOS$ to (DT_WM_USER$ + 2002) + equ ETM_SETROWLIMIT$ to (DT_WM_USER$ + 2003) + equ ETM_INSERTROW$ to (DT_WM_USER$ + 2004) + equ ETM_DELETEROW$ to (DT_WM_USER$ + 2005) + equ ETM_GETDTHWND$ to (DT_WM_USER$ + 2006) + equ ETM_GETROWLIMIT$ to (DT_WM_USER$ + 2007) + equ ETM_GETPREVCELLPOS$ to ETM_PREVCELLPOS$ + equ ETM_SETPREVCELLPOS$ to (DT_WM_USER$ + 2008) + + equ ETM_MOUSEMSGOFFSET$ to (DT_WM_USER$ + 2100) + + equ ETM_LBUTTONDOWN$ to (ETM_MOUSEMSGOFFSET$ + WM_LBUTTONDOWN$ ) + equ ETM_LBUTTONUP$ to (ETM_MOUSEMSGOFFSET$ + WM_LBUTTONUP$ ) + equ ETM_LBUTTONDBLCLK$ to (ETM_MOUSEMSGOFFSET$ + WM_LBUTTONDBLCLK$ ) + equ ETM_MBUTTONDOWN$ to (ETM_MOUSEMSGOFFSET$ + WM_MBUTTONDOWN$ ) + equ ETM_MBUTTONUP$ to (ETM_MOUSEMSGOFFSET$ + WM_MBUTTONUP$ ) + equ ETM_MBUTTONDBLCLK$ to (ETM_MOUSEMSGOFFSET$ + WM_MBUTTONDBLCLK$ ) + equ ETM_RBUTTONDOWN$ to (ETM_MOUSEMSGOFFSET$ + WM_RBUTTONDOWN$ ) + equ ETM_RBUTTONUP$ to (ETM_MOUSEMSGOFFSET$ + WM_RBUTTONUP$ ) + equ ETM_RBUTTONDBLCLK$ to (ETM_MOUSEMSGOFFSET$ + WM_RBUTTONDBLCLK$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/RTI_EMAIL_EQUATES.txt b/SYSPROG/STPROCINS/RTI_EMAIL_EQUATES.txt new file mode 100644 index 0000000..331b63a --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_EMAIL_EQUATES.txt @@ -0,0 +1,46 @@ +compile Insert rti_email_equates + + Equ EMAIL_ACTION_CONNECT$ To "CONNECT" + Equ EMAIL_ACTION_SEND$ To "SEND" + Equ EMAIL_ACTION_FOLDER$ To "FOLDER" + Equ EMAIL_ACTION_SEARCH$ To "SEARCH" + Equ EMAIL_ACTION_RECEIVE$ To "RECEIVE" + Equ EMAIL_ACTION_COUNT$ To "COUNT" + Equ EMAIL_ACTION_DELETE$ To "DELETE" + Equ EMAIL_ACTION_FLAG$ To "FLAG" + Equ EMAIL_ACTION_DISCONNECT$ To "DISCONNECT" + Equ EMAIL_ACTION_ERRORS$ To "ERRORS" + Equ EMAIL_ACTION_SEARCH_CLEANUP$ To "CLEANUP" + + Equ EMAIL_SERVER_TYPE_POP$ To "POP" + Equ EMAIL_SERVER_TYPE_IMAP$ To "IMAP" + Equ EMAIL_SERVER_TYPE_SMTP$ To "SMTP" + + Equ IMAP_SEARCH_KEYS_NONE$ To "ALL,ANSWERED,DELETED,DRAFT,FLAGGED,NEW,NOT,OLD,RECENT,SEEN,UNANSWERED,UNDELETED,UNDRAFT,UNFLAGGED,UNSEEN" + Equ IMAP_SEARCH_KEYS_STRING$ To "BCC,BODY,CC,FROM,SUBJECT,TEXT,TO" + Equ IMAP_SEARCH_KEYS_DATE$ To "BEFORE,ON,SENTBEFORE,SENTON,SENTSINCE,SINCE" + Equ IMAP_SEARCH_KEYS_KEYWORD$ To "UNKEYWORD,KEYWORD" + Equ IMAP_SEARCH_KEYS_NUMBER$ To "LARGER,SMALLER" + Equ IMAP_SEARCH_KEYS_UNSUPPORTED$ To "HEADER,UID" + + Equ IMAP_FLAGS$ To "None,Seen,Answered,Flagged,Deleted,Draft" + + Equ EMSG_FROM$ To 1 + Equ EMSG_TO$ To 2 + Equ EMSG_SUBJECT$ To 3 + Equ EMSG_BODY$ To 4 + Equ EMSG_CC$ To 5 + Equ EMSG_HEADERS$ To 6 + Equ EMSG_REPLYTO$ To 7 + Equ EMSG_CONTENT$ To 8 + Equ EMSG_ATTACHMENTS$ To 9 + Equ EMSG_DATE$ To 10 + Equ EMSG_FLAGS$ To 11 + Equ EMSG_ID$ To 12 + + Equ EMSG_ATTACHMENT_FILENAME$ To 1 + Equ EMSG_ATTACHMENT_ENCODING$ To 2 + Equ EMSG_ATTACHMENT_TYPE$ To 3 + Equ EMSG_ATTACHMENT_BODY$ To 4 + + Declare Function RTI_EMAIL_CLIENT diff --git a/SYSPROG/STPROCINS/RTI_EVENTSTACK_EQUATES.txt b/SYSPROG/STPROCINS/RTI_EVENTSTACK_EQUATES.txt new file mode 100644 index 0000000..b1a7861 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_EVENTSTACK_EQUATES.txt @@ -0,0 +1,55 @@ +compile insert RTI_EVENTSTACK_EQUATES +/* + Copyright (c) 1992-2020 Revelation Software. All rights reserved. + + Author Agent C + Date 03 Apr 2014 + Purpose Constant definition module for use with the EventStack + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 31 Aug 17 Added EVS_POS_NP_HANDLER$ and EVS_POS_NP_RETVAL$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_EVENTSTACK_EQUATES_ +#define _RTI_EVENTSTACK_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // OIEventStack@ item equates: + // + // <0,1> ControlID + // <0,2> AppID + // <0,3> ReposType + // <0,4> WorkControlID + // <0,5> ControlType + // <0,6> EventName + // <0,7> GenericLevel + // <0,8> EventStatus + // <0,9> GenericAppID + // <0,10> QuickEvent Priority flag + // <0,11> QuickEvent handler + // <0,12> QuickEvent return value + + equ EVS_POS_CONTROL_ID$ to 1 + equ EVS_POS_APP_ID$ to 2 + equ EVS_POS_REPOS_TYPE$ to 3 + equ EVS_POS_WORK_CONTROL_ID$ to 4 + equ EVS_POS_CONTROL_TYPE$ to 5 + equ EVS_POS_EVENT_NAME$ to 6 + equ EVS_POS_GENERIC_LEVEL$ to 7 + equ EVS_POS_EVENT_STATUS$ to 8 + equ EVS_POS_GENERIC_APP_ID$ to 9 + equ EVS_POS_NP_EXECUTED$ to 10 + equ EVS_POS_NP_HANDLER$ to 11 + equ EVS_POS_NP_RETVAL$ to 12 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_FORMSTATE_EQUATES.txt b/SYSPROG/STPROCINS/RTI_FORMSTATE_EQUATES.txt new file mode 100644 index 0000000..a5bb499 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_FORMSTATE_EQUATES.txt @@ -0,0 +1,68 @@ +compile insert rti_FormState_Equates +/* + ** Copyright (C) 1992-2020 Revelation Software Inc. All Rights Reserved ** + + Author : Carl Of Cthulhu + Date : Dec 2020 + Purpose : Constants for use with the FORMSTATECHANGED event. + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_FORMSTATE_EQUATES +#define _RTI_FORMSTATE_EQUATES +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // File Menu + equ FSTATE_POS_SAVE$ to 1 ; // Save Record enabled + equ FSTATE_POS_SAVE_AS$ to 2 ; // Save Record As enabled + equ FSTATE_POS_CLEAR$ to 3 ; // Clear record enabled + equ FSTATE_POS_DELETE$ to 4 ; // Delete Record enabled + equ FSTATE_POS_ALT_C$ to 5 ; // Load Prev Row (Arev Alt-C) Enabled + equ FSTATE_POS_PRINT$ to 6 ; // Print record enabled + equ FSTATE_POS_PRINT_PREVIEW$ to 7 ; // Print preview enabled + equ FSTATE_POS_CLOSE$ to 8 ; // Close enabled + + // QBF Menu + equ FSTATE_POS_QBF_INIT$ to 20 ; // QBF Init enabled + equ FSTATE_POS_QBF_RUN$ to 21 ; // QBF Run enabled + equ FSTATE_POS_QBF_FIRST$ to 22 ; // QBF First enabled + equ FSTATE_POS_QBF_PREV$ to 23 ; // QBF Prev enabled + equ FSTATE_POS_QBF_NEXT$ to 24 ; // QBF Next enabled + equ FSTATE_POS_QBF_LAST$ to 25 ; // QBF Last enabled + equ FSTATE_POS_QBF_POS$ to 26 ; // QBF Position enabled + equ FSTATE_POS_QBF_TABLE$ to 27 ; // QBF Table enabled + equ FSTATE_POS_QBF_LOADLIST$ to 28 ; // QBF LoadList enabled + equ FSTATE_POS_QBF_GETQUERY$ to 29 ; // QBF GetQuery enabled + equ FSTATE_POS_QBF_CLOSE$ to 30 ; // QBF Close enabled + + equ FSTATE_POS_LAST_BOOL$ to FSTATE_POS_QBF_CLOSE$ + + equ FSTATE_POS_SK_ID$ to 40 ; // Root softkey menu text + equ FSTATE_POS_SK_TEXT$ to 41 ; // Array of texts for softkey menu items + equ FSTATE_POS_SK_DATA$ to 42 ; // Array of data for softkey menu items + equ FSTATE_POS_SK_HELP$ to 43 ; // Array of helptexts for softkey menu items + equ FSTATE_POS_SK_ACCEL$ to 44 ; // Array of accelerator keys for softkey menu items + equ FSTATE_POS_SK_IMAGE$ to 45 ; // Array of image paths for softkey menu items + equ FSTATE_POS_SK_VISIBLE$ to 46 ; // Array of visible flags for softkey menu items + equ FSTATE_POS_SK_DISABLED$ to 47 ; // Array of diabled flags for softkey menu items + + equ FSTATE_POS_LAST$ to FSTATE_POS_SK_DISABLED$ + + equ FSTATE_POS_USERDEF$ to 100 ; // Starting field for user + ; // defined flags + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_GET_OLE_INFO_EQUATES.txt b/SYSPROG/STPROCINS/RTI_GET_OLE_INFO_EQUATES.txt new file mode 100644 index 0000000..20623a3 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_GET_OLE_INFO_EQUATES.txt @@ -0,0 +1,188 @@ +compile insert rti_Get_Ole_Info_Equates +/* + ** Copyright (C) 2013 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Mr C + Date : Feb 2013 + Purpose : Equates for use rti_Get_Ole_Info function + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 01 Mar 18 Added Error fields for TypeInfo problem reporting + Mr C 17 Aug 17 Added GOI_PROPFLAG_FORMDESHIDE$ + Mr C 17 Apr 15 Added COM-registred .NET DLL handling + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_GET_OLE_INFO_EQUATES_ +#define _RTI_GET_OLE_INFO_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_Get_Ole_Info + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Returned info equates + // + // <1> CLSID + // <2> Name + // <3> ProgID + // <4> Version Independant ProgID + // <5> Version + // <6> InprocServer32 (DLL name & path) + // <7> Threading Model + // <8> ToolBoxBitmap (Path and index) + // <9> TypeLib (File name and path) + // <10> Control Flag + // <11> Verb + // <12> Insertable Flag + // <13> MiscStatus + // <14> InprocHandler32 (DLL name & path) + // <15> LocalServer32 (EXE name & path) + // <16> Assembly Info ( == COM-registered .NET DLL ) + // <20> Property Names + // <21> Property Flags + // <22> Property Types + // <25> Method Names + // <26> Method Args + // <30> Event Names + // <31> Event Args + // <40> Property Errors + // <41> Method Errors + // <42> Event Errors + + equ GOI_CLSID$ to 1 + equ GOI_NAME$ to 2 + equ GOI_PROGID$ to 3 + equ GOI_PROGID_NOVER$ to 4 + equ GOI_VERSION$ to 5 + equ GOI_INPROCSVR32$ to 6 + equ GOI_THREADMODEL$ to 7 + equ GOI_TOOLBOXBMP$ to 8 + equ GOI_TYPELIB$ to 9 + equ GOI_CONTROL$ to 10 + equ GOI_VERB$ to 11 + equ GOI_INSERTABLE$ to 12 + equ GOI_MISCSTATUS$ to 13 + equ GOI_INPROCHNDLR32$ to 14 + equ GOI_LOCALSVR32$ to 15 + equ GOI_ASSEMBLY$ to 16 + equ GOI_PROPERTIES$ to 20 + equ GOI_PROPERTYFLAGS$ to 21 + equ GOI_PROPERTYTYPES$ to 22 + equ GOI_METHODS$ to 25 + equ GOI_METHODARGS$ to 26 + equ GOI_EVENTS$ to 30 + equ GOI_EVENTARGS$ to 31 + equ GOI_PROPERTYERRORS$ to 40 + equ GOI_METHODERRORS$ to 41 + equ GOI_EVENTERRORS$ to 42 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // From RevOLE_ClsTypeInfo.h (mappings from OAIdl.h) + + equ GOI_PROPFLAG_METHOD$ to 0x00000001 ; // INVOKEKIND INVOKE_FUNC + equ GOI_PROPFLAG_GET$ to 0x00000002 ; // INVOKEKIND INVOKE_PROPERTYGET + equ GOI_PROPFLAG_SET$ to 0x00000004 ; // INVOKEKIND INVOKE_PROPERTYPUT + equ GOI_PROPFLAG_SETREF$ to 0x00000008 ; // INVOKEKIND INVOKE_PROPERTYPUTREF + + equ GOI_PROPFLAG_RESTRICTED$ to 0x00000010 ; // FUNCFLAG_FRESTRICTED + equ GOI_PROPFLAG_SOURCE$ to 0x00000020 ; // FUNCFLAG_FSOURCE + equ GOI_PROPFLAG_BINDABLE$ to 0x00000040 ; // FUNCFLAG_FBINDABLE + equ GOI_PROPFLAG_REQUESTEDIT$ to 0x00000080 ; // FUNCFLAG_FREQUESTEDIT + equ GOI_PROPFLAG_DISPLAYBIND$ to 0x00000100 ; // FUNCFLAG_FDISPLAYBIND + equ GOI_PROPFLAG_DEFAULTBIND$ to 0x00000200 ; // FUNCFLAG_FDEFAULTBIND + equ GOI_PROPFLAG_HIDDEN$ to 0x00000400 ; // FUNCFLAG_FHIDDEN + equ GOI_PROPFLAG_USESGETLASTERROR$ to 0x00000800 ; // FUNCFLAG_FUSESGETLASTERROR + equ GOI_PROPFLAG_DEFAULTCOLLELEM$ to 0x00001000 ; // FUNCFLAG_FDEFAULTCOLLELEM + equ GOI_PROPFLAG_UIDEFAULT$ to 0x00002000 ; // FUNCFLAG_FUIDEFAULT + equ GOI_PROPFLAG_NONBROWSABLE$ to 0x00004000 ; // FUNCFLAG_FNONBROWSABLE + equ GOI_PROPFLAG_REPLACEABLE$ to 0x00008000 ; // FUNCFLAG_FREPLACEABLE + equ GOI_PROPFLAG_IMMEDIATEBIND$ to 0x00010000 ; // FUNCFLAG_FIMMEDIATEBIND + equ GOI_PROPFLAG_VARARG$ to 0x00020000 ; // Has optional params + + equ GOI_PROPFLAG_FORMDESHIDE$ to ( GOI_PROPFLAG_NONBROWSABLE$ + | + GOI_PROPFLAG_RESTRICTED$ + | + GOI_PROPFLAG_HIDDEN$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // OLE property types - these map directly onto the VARTYPE enum + + equ GOI_PROPTYPE_VT_EMPTY$ to 0 + equ GOI_PROPTYPE_VT_NULL$ to 1 + equ GOI_PROPTYPE_VT_I2$ to 2 + equ GOI_PROPTYPE_VT_I4$ to 3 + equ GOI_PROPTYPE_VT_R4$ to 4 + equ GOI_PROPTYPE_VT_R8$ to 5 + equ GOI_PROPTYPE_VT_CY$ to 6 + equ GOI_PROPTYPE_VT_DATE$ to 7 + equ GOI_PROPTYPE_VT_BSTR$ to 8 + equ GOI_PROPTYPE_VT_DISPATCH$ to 9 + equ GOI_PROPTYPE_VT_ERROR$ to 10 + equ GOI_PROPTYPE_VT_BOOL$ to 11 + equ GOI_PROPTYPE_VT_VARIANT$ to 12 + equ GOI_PROPTYPE_VT_UNKNOWN$ to 13 + equ GOI_PROPTYPE_VT_DECIMAL$ to 14 + equ GOI_PROPTYPE_VT_I1$ to 16 + equ GOI_PROPTYPE_VT_UI1$ to 17 + equ GOI_PROPTYPE_VT_UI2$ to 18 + equ GOI_PROPTYPE_VT_UI4$ to 19 + equ GOI_PROPTYPE_VT_I8$ to 20 + equ GOI_PROPTYPE_VT_UI8$ to 21 + equ GOI_PROPTYPE_VT_INT$ to 22 + equ GOI_PROPTYPE_VT_UINT$ to 23 + equ GOI_PROPTYPE_VT_VOID$ to 24 + equ GOI_PROPTYPE_VT_HRESULT$ to 25 + equ GOI_PROPTYPE_VT_PTR$ to 26 + equ GOI_PROPTYPE_VT_SAFEARRAY$ to 27 + equ GOI_PROPTYPE_VT_CARRAY$ to 28 + equ GOI_PROPTYPE_VT_USERDEFINED$ to 29 + equ GOI_PROPTYPE_VT_LPSTR$ to 30 + equ GOI_PROPTYPE_VT_LPWSTR$ to 31 + equ GOI_PROPTYPE_VT_RECORD$ to 36 + equ GOI_PROPTYPE_VT_INT_PTR$ to 37 + equ GOI_PROPTYPE_VT_UINT_PTR$ to 38 + equ GOI_PROPTYPE_VT_FILETIME$ to 64 + equ GOI_PROPTYPE_VT_BLOB$ to 65 + equ GOI_PROPTYPE_VT_STREAM$ to 66 + equ GOI_PROPTYPE_VT_STORAGE$ to 67 + equ GOI_PROPTYPE_VT_STREAMED_OBJECT$ to 68 + equ GOI_PROPTYPE_VT_STORED_OBJECT$ to 69 + equ GOI_PROPTYPE_VT_BLOB_OBJECT$ to 70 + equ GOI_PROPTYPE_VT_CF$ to 71 + equ GOI_PROPTYPE_VT_CLSID$ to 72 + equ GOI_PROPTYPE_VT_VERSIONED_STREAM$ to 73 + + equ GOI_PROPTYPE_VT_LAST$ to GOI_PROPTYPE_VT_VERSIONED_STREAM$ + + equ GOI_PROPTYPE_VT_BSTR_BLOB$ to 0x0FFF + equ GOI_PROPTYPE_VT_VECTOR$ to 0x1000 + equ GOI_PROPTYPE_VT_ARRAY$ to 0x2000 + equ GOI_PROPTYPE_VT_BYREF$ to 0x4000 + equ GOI_PROPTYPE_VT_RESERVED$ to 0x8000 + equ GOI_PROPTYPE_VT_ILLEGAL$ to 0xFFFF + equ GOI_PROPTYPE_VT_ILLEGALMASKED$ to 0x0FFF + equ GOI_PROPTYPE_VT_TYPEMASK$ to 0x0FFF + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + + diff --git a/SYSPROG/STPROCINS/RTI_GET_PROC_INFO_EQUATES.txt b/SYSPROG/STPROCINS/RTI_GET_PROC_INFO_EQUATES.txt new file mode 100644 index 0000000..4f80a49 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_GET_PROC_INFO_EQUATES.txt @@ -0,0 +1,99 @@ +compile insert rti_Get_Proc_Info_Equates +/* + ** Copyright (C) 2013-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : Oct 2013 + Purpose : Equates for use rti_Get_Proc_Info function + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 27 May 21 Added GPI_OESOURCEHASH$ + Mr C 26 May 21 Added GPI_OENOLINEMARKS$ + Mr C 17 Dec 20 Added GPI_OECOMPILEVER$ + Mr C 11 Apr 15 Updated comments + Mr C 12 Feb 15 Added object code and literal pool size fields to retVal + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_GET_PROC_INFO_EQUATES_ +#define _RTI_GET_PROC_INFO_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_Get_Proc_Info + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Returned info equates + // + // <1> Proc type + // <2> Argument count + // <3> Variable count + // <4> Expendable flag + // <5> DLL name + // <6> DLL exported function name + // <7> DLL Return Type + // <8> DLL Calling convention + // <9> DLL argument list type + // <10> OE DLL Internal pointer number + // <11> Basic+ Proc Type ( subroutine (1), function(2), routine(3) ) + // <12> Compile User + // <13> Compile Time + // <14> ArgNames + // <15> ArgTypes + // <16> RowDef + // <17> Object Code Size + // <18> Literal Pool Size + // <19> Compiler Engine Version + // <20> Strip Linemarks flag + // <21> Source Hash + + equ GPI_PROCTYPE$ to 1 + equ GPI_ARGCOUNT$ to 2 + equ GPI_VARCOUNT$ to 3 + equ GPI_EXPENDABLEFLAG$ to 4 + equ GPI_DLLNAME$ to 5 + equ GPI_DLLFUNCTION$ to 6 + equ GPI_DLLRETTYPE$ to 7 + equ GPI_DLLCALLCONV$ to 8 + equ GPI_DLLARGTYPES$ to 9 + equ GPI_OECALLNO$ to 10 + equ GPI_OEPROCTYPE$ to 11 + equ GPI_OECOMPILEUSER$ to 12 + equ GPI_OECOMPILETIME$ to 13 + equ GPI_OEARGNAMES$ to 14 ; // @vm delimited + equ GPI_OEARGTYPES$ to 15 ; // @vm delimited + equ GPI_OEROWDEF$ to 16 + equ GPI_OECODESEGSIZE$ to 17 + equ GPI_OEDATASEGSIZE$ to 18 + equ GPI_OECOMPILEVER$ to 19 + equ GPI_OENOLINEMARKS$ to 20 + equ GPI_OESOURCEHASH$ to 21 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ GPI_PROCTYPE_OE_SUB$ to 0 ; // Basic+ Subroutine/Function + equ GPI_PROCTYPE_OE_MAIN$ to 1 ; // Basic+ Main + equ GPI_PROCTYPE_DLL$ to 2 ; // DLL/OECall/ASM + equ GPI_PROCTYPE_OE_EXPEND$ to 3 ; // Basic+ Expendable + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ GPI_OEPROCTYPE_SUB$ to 1 + equ GPI_OEPROCTYPE_FUNC$ to 2 + equ GPI_OEPROCTYPE_ROUTINE$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_GET_SYSINFO_EQUATES.txt b/SYSPROG/STPROCINS/RTI_GET_SYSINFO_EQUATES.txt new file mode 100644 index 0000000..bc50258 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_GET_SYSINFO_EQUATES.txt @@ -0,0 +1,62 @@ +compile insert rti_Get_SysInfo_Equates +/* + ** Copyright (C) 1992-2023 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : 12 May 2023 + Purpose : Equates for use with the RTI_GET_SYSINFO stored procedure + : and GET_SYSINFO routine + + Comments + ======== + + RTI_GET_SYSINFO is basically a copy of the old GET_SYSINFO routine so that + the info can be returned without using SYSTEM RECEIVER property. + + GET_SYSINFO is now a SEND_DYN wrapper around RTI_GET_SYSINFO. + + (TBH - all this info can be accessed directly via other means, so these + SYSINFO procs are basically for backwards compatibility with older systems) + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_GET_SYSINFO_EQUATES_ +#define _RTI_GET_SYSINFO_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// + + // RTI_GET_SYSINFO return array index equates + // + // <1> Database ID (@dbID + // <2> Username (@username) + // <3> Admin level (@admin) + // <4> Version (PS Product version - event context only!) + // <5> CPU Type (@cpu_Type - deprecated) + // <6> Coprocessor (@exist8087 - deprecated) + // <7> MemAvail (null - deprecated) + // <8> DescriptorsAvail (null - deprecated) + // <9> Network Type (Extracted from RevLH.dll) + // <10> Station ID (@station) + // <11> Max Users (max_oi_users) + + equ RTIGSI_POS_DBID$ to 1 + equ RTIGSI_POS_USERNAME$ to 2 + equ RTIGSI_POS_ADMIN$ to 3 + equ RTIGSI_POS_SERIAL$ to 4 + equ RTIGSI_POS_VERSION$ to 5 ; // OI product version + equ RTIGSI_POS_CPU_TYPE$ to 6 + equ RTIGSI_POS_COPROC$ to 7 + equ RTIGSI_POS_MEM_AVAIL$ to 8 + equ RTIGSI_POS_DES_AVAIL$ to 9 + equ RTIGSI_POS_NETWORK$ to 10 + equ RTIGSI_POS_STATION$ to 11 + equ RTIGSI_POS_MAX_USERS$ to 12 + +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/RTI_HASHTABLE2_SCRIPT.txt b/SYSPROG/STPROCINS/RTI_HASHTABLE2_SCRIPT.txt new file mode 100644 index 0000000..1439145 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_HASHTABLE2_SCRIPT.txt @@ -0,0 +1,87 @@ +compile Insert RTI_HASHTABLE2_SCRIPT +function newTable() { + + var HashTable = new function(){ + + var ourArray = []; + this.init = function() { + ourArray.items = []; + ourArray.length = 0; + for (var i = 0; i < arguments.length; i += 2) { + if (typeof(arguments[i + 1]) != 'undefined') { + ourArray.items[arguments[i]] = arguments[i + 1]; + ourArray.length++; + } + } + }; + this.removeItem = function(in_key) + { + var tmp_previous; + if (typeof(ourArray.items[in_key]) != 'undefined') { + ourArray.length--; + var tmp_previous = ourArray.items[in_key]; + delete ourArray.items[in_key]; + } + + return tmp_previous; + }; + + + this.getItem = function(in_key) { + return ourArray.items[in_key]; + }; + + + this.setItem = function(in_key, in_value) + { + var tmp_previous; + if (typeof(in_value) != 'undefined') { + if (typeof(ourArray.items[in_key]) == 'undefined') { + ourArray.length++; + } + else { + tmp_previous = ourArray.items[in_key]; + } + + ourArray.items[in_key] = in_value; + } + + return tmp_previous; + }; + + this.hasItem = function(in_key) + { + return typeof(ourArray.items[in_key]) != 'undefined'; + } ; + + + this.clear = function() + { + for (var i in ourArray.items) { + delete ourArray.items[i]; + } + + ourArray.length = 0; + }; + + + this.keyList = function(delimChar) + { + var rslt = "", + prefixChar = ""; + for (var i in ourArray.items) { + rslt += prefixChar + i; + prefixChar = delimChar; + } + + return rslt; + }; + + this.getLength = function() { + return ourArray.length; + }; +}; + HashTable.init(); + return HashTable +}; + diff --git a/SYSPROG/STPROCINS/RTI_HASHTABLE_EQUATES.txt b/SYSPROG/STPROCINS/RTI_HASHTABLE_EQUATES.txt new file mode 100644 index 0000000..d84ad8d --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_HASHTABLE_EQUATES.txt @@ -0,0 +1,257 @@ +compile insert rti_HashTable_Equates +/* + ** Copyright (C) 1992-2016 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : September 2016 + Purpose : Constants for use with the HashTable functions in RevSTL.DLL + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 31 Mar 17 Added Hashtable row flags + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_HASHTABLE_EQUATES_ +#define _RTI_HASHTABLE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ REVSTL_HTBL_SUCCESS$ to 0 + equ REVSTL_HTBL_MAX_ERROR_LEN$ to 2048 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // HashTable methods + equ REVSTL_HTBLMTD_CREATETABLE$ to 1 + equ REVSTL_HTBLMTD_READROW$ to 2 + equ REVSTL_HTBLMTD_WRITEROW$ to 3 + equ REVSTL_HTBLMTD_DELETEROW$ to 4 + equ REVSTL_HTBLMTD_CLEARTABLE$ to 5 + equ REVSTL_HTBLMTD_CLOSETABLE$ to 6 + equ REVSTL_HTBLMTD_ROWEXISTS$ to 7 + equ REVSTL_HTBLMTD_LISTKEYS$ to 8 + equ REVSTL_HTBLMTD_GETROWCOUNT$ to 9 + + equ REVSTL_HTBLMTD_FIRST$ to REVSTL_HTBLMTD_CREATETABLE$ + equ REVSTL_HTBLMTD_LAST$ to REVSTL_HTBLMTD_GETROWCOUNT$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // HashTable types + equ REVSTL_HTBLTYPE_STD$ to 1 ; // std::unordered_map (VS2015) + equ REVSTL_HTBLTYPE_BOOST$ to 2 ; // boost::unordered_map + equ REVSTL_HTBLTYPE_SPP$ to 3 ; // spp::sparsepp + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Hashtable row flags + equ REVSTL_HTBLROW_IDISPATCH$ to 0x0001; // Store OleVar + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // HashTable error codes + equ REVSTL_HTBLERR_BADMETHOD$ to -1 + equ REVSTL_HTBLERR_OUTOFHANDLES$ to -2 + equ REVSTL_HTBLERR_BADINITPARAM$ to -3 + equ REVSTL_HTBLERR_OUTOFMEM$ to -4 + equ REVSTL_HTBLERR_BADHANDLE$ to -5 + equ REVSTL_HTBLERR_BADKEY$ to -6 + equ REVSTL_HTBLERR_ROW_DNE$ to -7 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// REVSTL_HTBLMTD_CREATETABLE$ method +// +// Creates a hashtable and returns the handle. +// +// ---------------------------------------------------------------------------- +// [i] param1 : InitParam. This is an @fm delimited array of init parameters +// : structures as follows: +// : +// : <1> Type of HashTable - defaults to REVSTL_HTBLTYPE_STD$ +// : <2> Expected RowCount - presizes the table to hold the +// : passed number of rows. Defaults to 0. +// ---------------------------------------------------------------------------- +// [r] Returns the table handle if successful (a value > 0), or an error code +// (a value < 0) if it fails. +// ---------------------------------------------------------------------------- +// [e] Error details are returned via Set_Status() +// ---------------------------------------------------------------------------- + + // InitParam constants + equ REVSTL_HTBL_INITPARAM_TYPE$ to 1 + equ REVSTL_HTBL_INITPARAM_ROWCOUNT$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +// REVSTL_HTBLMTD_READROW$ method +// +// Reads a row from the specified hash table. +// +// ---------------------------------------------------------------------------- +// [i] param1 : HashTable handle +// [i] param2 : Key to read +// [o] param3 : The row data retrieved from the hash table +// ---------------------------------------------------------------------------- +// [r] The size of the row data read from the table, or an error code +// (a value < 0) if it fails. +// ---------------------------------------------------------------------------- +// [e] Errors are returned via set_Status() +// ---------------------------------------------------------------------------- + +//////////////////////////////////////////////////////////////////////////////// +// REVSTL_HTBLMTD_WRITEROW$ method +// +// Writes a row to the specified hash table using the specified key. +// +// ----------------------------------------------------------------------------- +// [i] param1 : HashTable handle +// [i] param2 : Key to write +// [i] param3 : Row data to write +// ----------------------------------------------------------------------------- +// [r] Returns 0 if successful or an error code (a value < 0) if it fails. +// ----------------------------------------------------------------------------- +// [e] Errors are returned via set_Status() +// ----------------------------------------------------------------------------- + +//////////////////////////////////////////////////////////////////////////////// +// REVSTL_HTBLMTD_DELETEROW$ method +// +// Deletes a row from the specified hash table using the specified key. +// +// ----------------------------------------------------------------------------- +// [i] param1 : HashTable handle +// [i] param2 : Key to delete +// ----------------------------------------------------------------------------- +// [r] Returns 1 if the row was deleted, 0 if it didn't exist, or an error +// code (a value < 0) if it fails. +// ----------------------------------------------------------------------------- +// [e] Errors are returned via set_Status() +// ----------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +// REVSTL_HTBLMTD_CLEARTABLE$ method +// +// Deletes all records from the HashTable +// +// ----------------------------------------------------------------------------- +// [i] param1 : HashTable handle +// ----------------------------------------------------------------------------- +// [r] Returns 0 if the table was cleared, or an error code (a value < 0) if it +// fails. +// ----------------------------------------------------------------------------- +// [e] Errors are returned via set_Status() +// ----------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +// REVSTL_HTBLMTD_CLOSETABLE$ method +// +// Closes (destroys) a HashTable. Do not use the handle afterwards! +// +// ----------------------------------------------------------------------------- +// [i,o] param1 : HashTable handle. This is set to 0 if the table is closed. +// ----------------------------------------------------------------------------- +// [r] Returns 0 if the table was destoryed, or an error code (a value < 0) if +// fails. +// ----------------------------------------------------------------------------- +// [e] Errors are returned via set_Status() +// ----------------------------------------------------------------------------- + +//////////////////////////////////////////////////////////////////////////////// +// REVSTL_HTBLMTD_ROWEXISTS$ method +// +// Verifies that a row exists within a HashTable. +// +// ----------------------------------------------------------------------------- +// [i] param1 : HashTable handle +// [i] param2 : Key to verify +// ----------------------------------------------------------------------------- +// [r] Returns 1 if the row exists, 0 if it doesn't, or an error code (a +// value < 0) if it fails. +// ----------------------------------------------------------------------------- +// [e] Errors are returned via set_Status() +// ----------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +// REVSTL_HTBLMTD_LISTKEYS$ method +// +// Returns an @fm delimited list of keys from the hashtable +// +// ----------------------------------------------------------------------------- +// [i] param1 : HashTable handle +// [o] param2 : @fm'd list of keys +// ----------------------------------------------------------------------------- +// [r] Returns the number of keys in the list if successful, or an error code +// (a value < 0) if it fails. +// ----------------------------------------------------------------------------- +// [e] Errors are returned via set_Status() +// ----------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +// REVSTL_HTBLMTD_GETROWCOUNT$ method +// +// Returns the number of rows stored in the hashtable +// +// ----------------------------------------------------------------------------- +// [i] param1 : HashTable handle +// ----------------------------------------------------------------------------- +// [r] Returns the number of rows in the table if successful, or an error code +// (a value < 0) if it fails. +// ----------------------------------------------------------------------------- +// [e] Errors are returned via set_Status() +// ----------------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +// Licensing Info for SparsePP //////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +// +// ---------------------------------------------------------------------- +// Copyright (c) 2016, Gregory Popovitch - greg7mdp@gmail.com +// All rights reserved. +// +// This work is derived from Google's sparsehash library +// +// Copyright (c) 2005, Google Inc. +// All rights reserved. +// +// Redistribution and use in source and binary forms, with or without +// modification, are permitted provided that the following conditions are +// met: +// +// * Redistributions of source code must retain the above copyright +// notice, this list of conditions and the following disclaimer. +// * Redistributions in binary form must reproduce the above +// copyright notice, this list of conditions and the following disclaimer +// in the documentation and/or other materials provided with the +// distribution. +// * Neither the name of Google Inc. nor the names of its +// contributors may be used to endorse or promote products derived from +// this software without specific prior written permission. +// +// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS +// "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT +// LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR +// A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT +// OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, +// SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT +// LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, +// DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY +// THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE +// OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +// ---------------------------------------------------------------------- + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif _RTI_HASHTABLE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/RTI_HTTP_DOWNLOAD_EQUATES.txt b/SYSPROG/STPROCINS/RTI_HTTP_DOWNLOAD_EQUATES.txt new file mode 100644 index 0000000..47a10cd --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_HTTP_DOWNLOAD_EQUATES.txt @@ -0,0 +1,260 @@ +compile insert rti_HTTP_Download_Equates +/* + ** Copyright (C) 2013-2019 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : June 2019 + Purpose : Equates for use with the RTI_HTTP_DOWNLOAD stored procedure + + Parameters + ========== + + uiParams - [required] This is an @fm delimited array of UI info for the + download process: + + <1> Parent Window [optional] + + ID of the parent window for the download dialog. If not + specified the caller must provide a CallBackID to receive + the returned response content. + + <2> Modal Flag [optional]. + + If TRUE$ then the parent window will be disabled for + the duration of the download. + + <3> EndDialogAsyncID [optional/required **] + + Callback token for the download to return to the parent + window's ENDDIALOG event as the AsyncID parameter. + + <4> CallbackProc [optional/required **] + + Name of a stored procedure to call with the response data + if "EndDialogAsyncID" is not specified. The Callback + proc must support the following interface: + + proc( callbackID, responseContent ) + + <5> CallbackID [optional, required for CallbackProc] + + If a CallBackProc is specified this field contains a + token returned to the CallBackProc with the response + content. See "Callback details" below for more info. + + <6> Loading text [optional] + + Contains text to display in the dialog - defaults to + the URL + + <7> Show Progress in Taskbar [optional] + + If TRUE$ then sync the progress bar to the parent + window's task bar icon. Defaults to FALSE$. + + <8> Hide UI [optional] + + If TRUE$ then don't show the progress dialog. + + + ** Note: If you don't specify EndDialogAsyncID or + CallbackProc in uiParams you will not be notified + of the result of the download. + + + url - [required] Contains the URL to download from + + method - [optional] HTTP verb (GET,POST,HEAD,DELETE etc). Defaults + to "GET + + payload - [optional] Content to send to the server as part of the + request + + credentials - [optional] Username and password to send to the server + + <1> Username + <2> Password> + + headers - [optional] - Dynamic array of request headers to send to + the server in the format: + + <1> @vm'd list of header names + <2> @vm'd list of header values + + timeoutInfo - [optional] Timeout in milliseconds. + + responseFile- [optional] Name of a file to download the response + content to + + + Returns + ======= + + TRUE$ if the download was started sucessfully, or FALSE$ otherwise. + Error information is returned via Get/Set_Status(). + + + + Comments + ======== + + This function is designed to mimic the existing OLE_GETWEBPAGE stored proc + and provide an example of how to use the HTTPCLIENT control to provide + a UI for a download. As such the arguments passed have been kept to the + same format as much as possible. + + Changes from OLE_GETWEBPAGE are: + + 1) "uiParams" has been added so we can specify UI information. + + 2) "timeoutInfo" only supports a single value - the HTTPCLIENT control + does not have separate timeout parameters for different states + + 3) "responseBody" has been removed - the actual response content is + returned directly via the parent window's ENDDIALOG event or the + specified callback proc, unless a responseFile name was specified, + in which case the contents are writtent there instead. + + 4) This routine returns a simple boolean value. There is no + "ResponseText" property as such, and because this is asynchronous + the actual response content is returned directly via the parent + window's ENDDIALOG event or the specified callback proc. + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_HTTP_DOWNLOAD_EQUATES_ +#define _RTI_HTTP_DOWNLOAD_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_HTTP_Download + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +/* + Example for using with the ENDDIALOG event on a parent window: + + + url = "https://www.revelation.com" + method = "GET" + + // AsyncID is just a string you set that is passed back with the response + // so that you can recognize it easily in the ENDDIALOG event. it can + // be anything you wish - for example we're just using the URL along + // with a "$HTTPRESPONSE:" prefix here. + + asyncID = "$HTTPRESPONSE:: "url" + + uiParams = "" + uiParams = @window + uiParams = TRUE$ + uiParams = asyncID + uiParams = "Getting Rev homepage" + uiParams = TRUE$ + + call rti_HTTP_Download( uiParams, url, method ) + + + Example for using a stored procedure callback - in this case + + url = "https://www.revelation.com" + method = "GET" + + // CallBackID is just a string you set that is passed back with the + // response so that you can recognize it easily in the ENDDIALOG event. + // It canbe anything you wish - for example we're just using the URL + // along with a "$HTTPRESPONSE:" prefix here: + + callBackID = "$HTTPRESPONSE:: "url" + + uiParams = "" + uiParams = @window + uiParams = TRUE$ + uiParams = "MY_HTTP_RESPONSE_HANDLER" + uiParams = callBackID + uiParams = "Getting Rev homepage" + uiParams = TRUE$ + + call rti_HTTP_Download( uiParams, url, method ) +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // uiParams constants + // + // <1> ParentWin + // <2> Modal Flag + // <3> EndDialogAsyncID + // <4> CallbackProc + // <5> CallbackID + // <6> Download Text + // <7> SyncProgress + // <8> Hide UI + + equ HDL_UIPARAM_POS_PARENTWIN$ to 1 + equ HDL_UIPARAM_POS_MODAL$ to 2 + equ HDL_UIPARAM_POS_ENDDIALOGASYNCID$ to 3 + equ HDL_UIPARAM_POS_CALLBACKPROC$ to 4 + equ HDL_UIPARAM_POS_CALLBACKID$ to 5 + equ HDL_UIPARAM_POS_DOWNLOADTEXT$ to 6 + equ HDL_UIPARAM_POS_SYNCPROGRESS$ to 7 + equ HDL_UIPARAM_POS_HIDEUI$ to 8 + + // credentials constants + + equ HDL_CRED_POS_USERNAME$ to 1 + equ HDL_CRED_POS_PASSWORD$ to 2 + + // headers constants + + equ HDL_HDR_POS_NAMES$ to 1 + equ HDL_HDR_POS_VALUES$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Callback details + // ================= + // + // When the download dialog calls back to the target event or proc it + // passes two items of infomation: + // + // 1) The response content + // 2) An array of response information: + // + // <1> AsyncID or CallBackID + // <2> Response Status Code + // <3> Response Status Text + // <4> Content Length + // <5> Response Headers + // <6> Bytes Received + // + // + // If calling back to the ENDDIALOG event the response content is passed + // in the "dialogValue" parameter, and the response info is passed in the + // "asyncID" parameter + // + // call post_Event( parentID, "ENDDIALOG", @window, responseContent, responseInfo ) + // + // If calling back to a stored procedure the responseInfo is passed as the + // first parameter, and the responseContent as the second: + // + // call @procID( responseInfo, responseContent ) + + equ HDL_RSPINFO_POS_ID$ to 1 + equ HDL_RSPINFO_POS_STATUSCODE$ to 2 + equ HDL_RSPINFO_POS_STATUSTEXT$ to 3 + equ HDL_RSPINFO_POS_CONTENTLEN$ to 4 + equ HDL_RSPINFO_POS_HEADERS$ to 5 + equ HDL_RSPINFO_POS_BYTESRECEIVED$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_IDE_CFG_EQUATES.txt b/SYSPROG/STPROCINS/RTI_IDE_CFG_EQUATES.txt new file mode 100644 index 0000000..0968c6e --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_CFG_EQUATES.txt @@ -0,0 +1,760 @@ +compile insert rti_IDE_Cfg_Equates +/* + ** Copyright (C) 2012-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : December 2014 + Purpose : Constants for use with the RTI_IDE configuration processes + + + Comments + ======== + + ** PLEASE inform me (bzs) when you change this record ** + + Amended Date Reason + ======= ==== ====== + Mr C 14 Mar 23 Standardize default control prefix names + Mr C 30 Nov 22 Added IDE_CFG_POS_CTRL_W_MODE$ + Mr C 02 Nov 22 Added IDE_CFG_REVPROFILELOG_FILES$ + Mr C 28 Sep 22 Added IDE_CFG_POS_OPENREC_KEYREADDISABLED$ + Mr C 16 Sep 22 Added IDE_CFG_POS_HTTPSERVER_PORT$ + Mr C 09 Sep 22 Added IDE_CFG_POS_ESERVER_SERVER_TYPE$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_IDE_CFG_EQUATES_ +#define _RTI_IDE_CFG_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_IDE_Cfg + $insert logical + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // The IDE configuration record is stored in the SYSENV table with + // the following key: + // + // CFG_RTI_IDE_X*** + // + // Note the "_X" (for v10) suffix - this is to stop collisions with + // prev v10 versions of RTI_IDE that a config record called + // "CFG_RTI_IDE" + + equ IDE_CFG_TABLE$ to "SYSENV" + equ IDE_CFG_ID_PREFIX$ to "CFG_RTI_IDE_X" + Equ IDE_CFG_ID_GIT_APP_PREFIX$ To "CFG_RTI_GIT_APP" + Equ IDE_CFG_ID_GIT_WS_PREFIX$ To "CFG_RTI_GIT_WS" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SAVELAYOUT (IDE_CFG_POS_SAVELAYOUT$) equates + + equ IDE_CFG_SAVELAYOUT_RESTORE$ to 1 + equ IDE_CFG_SAVELAYOUT_RESTORE_NOLOCKED$ to -1 + equ IDE_CFG_SAVELAYOUT_NORESTORE$ to 0 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ IDE_CFG_POS_SAVELAYOUT$ to 1 ; // Save the IDE layout data when closing + equ IDE_CFG_DEF_SAVELAYOUT$ to IDE_CFG_SAVELAYOUT_RESTORE$ + equ IDE_CFG_POS_SHOWSTART$ to 2 ; // Bool - Show Start Page + equ IDE_CFG_DEF_SHOWSTART$ to TRUE$ + equ IDE_CFG_POS_SHOWAPPEXPLORER$ to 3 ; // Bool - Show App Explorer + equ IDE_CFG_DEF_SHOWAPPEXPLORER$ to TRUE$ + equ IDE_CFG_POS_SHOWDBEXPLORER$ to 4 ; // Bool - Show DB Explorer + equ IDE_CFG_DEF_SHOWDBEXPLORER$ to FALSE$ + equ IDE_CFG_POS_SHOWOUTPUT$ to 5 ; // Bool - Show Output Toolpanel + Equ IDE_CFG_DEF_SHOWOUTPUT$ To TRUE$ + equ IDE_CFG_POS_SHOWCONSOLE$ to 6 ; // Bool - Show CONSOLE Page + Equ IDE_CFG_DEF_SHOWCONSOLE$ To FALSE$ + equ IDE_CFG_POS_SHOWFAVORITES$ to 7 ; // Bool - Show Favorites Panel + equ IDE_CFG_DEF_SHOWFAVORITES$ to TRUE$ + equ IDE_CFG_POS_SHOWPROPERTIES$ to 8 ; // Bool - Show Properties Panel + equ IDE_CFG_DEF_SHOWPROPERTIES$ To FALSE$ + equ IDE_CFG_POS_SHOWREPOSITORY$ to 9 ; // Bool - Show Repository Panel + equ IDE_CFG_DEF_SHOWREPOSITORY$ To FALSE$ + equ IDE_CFG_POS_OPLDOCKSITE$ to 10 ; // Last docksite the Output panel appeared in + equ IDE_CFG_DEF_OPLDOCKSITE$ to "S" + equ IDE_CFG_POS_PPLDOCKSITE$ to 11 ; // Last docksite the Property panel appeared in + equ IDE_CFG_DEF_PPLDOCKSITE$ to "E" + equ IDE_CFG_POS_FDSTBXDOCKSITE$ to 12 ; // Last docksite the FormDes Toolbox appeared In + equ IDE_CFG_DEF_FDSTBXDOCKSITE$ to "W" + equ IDE_CFG_POS_DPLDOCKSITE$ to 13 ; // Last docksite the Database panel appeared in + equ IDE_CFG_DEF_DPLDOCKSITE$ to "W" + equ IDE_CFG_POS_FPLDOCKSITE$ to 14 ; // Last docksite the Favorites panel appeared in + equ IDE_CFG_DEF_FPLDOCKSITE$ to "W" + equ IDE_CFG_POS_RPLDOCKSITE$ to 15 ; // Last docksite the Repository panel appeared in + equ IDE_CFG_DEF_RPLDOCKSITE$ to "W" + Equ IDE_CFG_POS_REFRESHSTART$ To 16 ; // bzs 062118 refresh interval on start page feeds + Equ IDE_CFG_DEF_REFRESHSTART$ To "15" ; // bzs 062118 + Equ IDE_CFG_POS_STARTHOMEPAGE$ To 17 ; // bzs 062118 home page for this application + Equ IDE_CFG_DEF_STARTHOMEPAGE$ To "https://www.revelation.com" + Equ IDE_CFG_POS_NEWSFEEDURL$ To 18 ; // bzs 030922 URL for other news feed on start page + + *// Form Designer Equates + equ IDE_CFG_POS_FDS_SNAPGRID$ to 20 ; + equ IDE_CFG_DEF_FDS_SNAPGRID$ to TRUE$ + equ IDE_CFG_POS_FDS_SHOWGRID$ to 21 ; + equ IDE_CFG_DEF_FDS_SHOWGRID$ to TRUE$ + equ IDE_CFG_POS_FDS_GRIDSIZE$ to 22 ; + equ IDE_CFG_DEF_FDS_GRIDSIZE$ to 4 ; // px + + equ IDE_CFG_POS_FDS_ANCHORFORMS$ to 23 ; + equ IDE_CFG_DEF_FDS_ANCHORFORMS$ to TRUE$ ; + + equ IDE_CFG_POS_FDS_CREATETEXT$ to 24 ; // toggle creating the text label for databound controls + equ IDE_CFG_DEF_FDS_CREATETEXT$ to TRUE$ + equ IDE_CFG_POS_FDS_CREATETEXTLOC$ to 25 ; // defines where to place the text lable for databound controls + equ IDE_CFG_DEF_FDS_CREATETEXTLOC$ to "L" + equ IDE_CFG_POS_FDS_APPENDCOLON$ to 26 ; // append a colon at the end of a label controls + equ IDE_CFG_DEF_FDS_APPENDCOLON$ to TRUE$ + equ IDE_CFG_POS_FDS_QPALIGNMENT$ to 27 ; // whether to right align quick panel labels + Equ IDE_CFG_DEF_FDS_QPALIGNMENT$ To false$ + // equ IDE_CFG_POS_FDS_SHOW_INVIS$ to 28 ; // toggle showing invisible controls + // equ IDE_CFG_DEF_FDS_SHOW_INVIS$ to false$ + equ IDE_CFG_POS_FDS_DEFFONT$ to 29 ; // default font for ? + equ IDE_CFG_DEF_FDS_DEFFONT$ to "Segoe UI" :@TM: "-12" :@TM: "400" :@TM: "0" :@TM: "0" :@TM: "0" :@TM: "0" :@TM: "34" :@TM: "0" :@TM: "3" :@TM: "2" :@TM: "1" :@TM: "11" :@TM: "2" :@TM: "0" :@TM: "0" + equ IDE_CFG_POS_FDS_DEFBACKCOLOR$ to 30 ; // default window backcolor + equ IDE_CFG_DEF_FDS_DEFBACKCOLOR$ to "-2" + equ IDE_CFG_POS_FDS_CTRLTYPES$ to 31 ; // array that contains the types of controls + equ IDE_CFG_DEF_FDS_CTRLTYPES$ To "BITMAP":@vm:"CHECKBMP":@VM:"CHECKBOX":@vm:"COMBOBOX":@VM:"EDITBOX":@vm:"EDITFIELD":@VM:"EDITTABLE":@VM:"GROUPBOX":@VM:"HSCROLLBAR":@VM:"HSPLITBAR":@VM:"LISTBOX":@VM:"PUSHBMP":@VM:"PUSHBUTTON":@VM:"RADIOBMP":@VM:"RADIOBUTTON":@VM:"RICHEDITBOX":@VM:"STATIC":@VM:"TABCONTROL":@VM:"VSCROLLBAR":@VM:"VSPLITBAR":@VM:"OLECONTROL" + equ IDE_CFG_POS_FDS_CTRLPREFIXES$ to 32 ; // array that contains the prefixes for the control type array + equ IDE_CFG_DEF_FDS_CTRLPREFIXES$ To "BMP_":@vm:"CHK_":@vm:"CHK_":@vm:"CBO_":@VM:"EDB_":@vm:"EDL_":@vm:"EDT_":@vm:"GRP_":@vm:"HSC_":@vm:"HSP_":@vm:"LST_":@vm:"BTN_":@vm:"BTN_":@vm:"RBO_":@vm:"RBO_":@vm:"REB_":@vm:"LBL_":@vm:"TAB_":@vm:"VSC_":@vm:"VSP_":@vm:"OLE_" + + equ IDE_CFG_POS_FDS_MINIMIZE4TEST$ to 33 ; + equ IDE_CFG_DEF_FDS_MINIMIZE4TEST$ to TRUE$; + + + equ IDE_CFG_POS_CTRL_W_MODE$ to 39 ; // "Ctrl-W Mode" - "0" for "Close Tab", 1 for "Test-Run" + equ IDE_CFG_DEF_CTRL_W_MODE$ to 0 + + // MRU equates + equ IDE_CFG_POS_MRUMAXITEMS$ to 40 ; // Max number of MRU items on the file menu. + equ IDE_CFG_DEF_MRUMAXITEMS$ to 20 + equ IDE_CFG_POS_MRUDSNIDS$ to 41 ; // @vm'd list of MRU DSN IDs + equ IDE_CFG_POS_MRUDSNKEYS$ to 42 ; // @vm'd list of MRU DSN entity keys + equ IDE_CFG_POS_MRUOSFOLDERS$ to 43 ; // @vm'd list of MRU Add Table OS Folders + + // Help system equates + equ IDE_CFG_POS_HELPURL$ to 45 ; // Starting URL for the help system + + // TCL system equates + equ IDE_CFG_POS_TCLID$ to 46 ; // Form to use as an embedded TCL window + equ IDE_CFG_DEF_TCLID$ to "RTI_IDE_TCL" + + * git preferences/configuration + equ IDE_CFG_POS_GIT_ENABLED$ to 49 ; // IF TRUE$ then use GIT + Equ IDE_CFG_DEF_GIT_ENABLED$ To FALSE$ + equ IDE_CFG_POS_GIT_REPOS_LOCATIONS$ to 50 ;* git Repository locatiopns + equ IDE_CFG_POS_GIT_REPOS_DIR_NAME$ to 51 ;* git Repository Directory Name + // equ IDE_CFG_POS_GIT_REPOS_INCLUSIONS$ to 52 ;* oi Repository types to include + // equ IDE_CFG_POS_GIT_REPOS_EXCLUSIONS$ to 53 ;* oi Repository types to include + equ IDE_CFG_POS_GIT_INTERFACE_PATH$ to 54 ;* Path to the git interface executable + equ IDE_CFG_POS_GIT_INTERFACE_GUI$ to 55 ;* command For the git interface + equ IDE_CFG_POS_GIT_INTERFACE_COMMIT$ to 56 ;* command For the git COMMIT + equ IDE_CFG_POS_GIT_INTERFACE_PULL$ to 57 ;* command For the git PULL + equ IDE_CFG_POS_GIT_INTERFACE_PUSH$ to 58 ;* command For the git PUsh + equ IDE_CFG_POS_GIT_INTERFACE_HIST$ to 59 ;* command For the git file history + equ IDE_CFG_POS_GIT_INTERFACE_DIFF$ to 60 ;* command For the git Diff tool + + * EDITOR Interface + // equ IDE_CFG_POS_EDIT_MAXIMIZE_CHILDREN$ to 61 ;* maximize editor children + // equ IDE_CFG_DEF_EDIT_MAXIMIZE_CHILDREN$ to TRUE$ + // equ IDE_CFG_POS_EDIT_SHOW_BUTTONBAR$ to 62 ;* Show editor button bar + // equ IDE_CFG_DEF_EDIT_SHOW_BUTTONBAR$ to TRUE$ + equ IDE_CFG_POS_EDIT_SHOW_LINENUM$ to 63 ;* show editor line numbers + equ IDE_CFG_DEF_EDIT_SHOW_LINENUM$ to TRUE$ + equ IDE_CFG_POS_EDIT_SHOW_STATUS$ to 64 ;* show editor status area + equ IDE_CFG_DEF_EDIT_SHOW_STATUS$ to TRUE$ + // equ IDE_CFG_POS_EDIT_USETABS$ to 65 ;* show editor Tabs + // Equ IDE_CFG_DEF_EDIT_USETABS$ To FALSE$ + // equ IDE_CFG_POS_EDIT_SAVETABS$ to 66 ;* save editor tabs that are Open when editor closes + // equ IDE_CFG_DEF_EDIT_SAVETABS$ To TRUE$ + equ IDE_CFG_POS_EDIT_FIND_CASESENS$ to 67 ;* Case Sensitive Find + equ IDE_CFG_DEF_EDIT_FIND_CASESENS$ To FALSE$ + equ IDE_CFG_POS_EDIT_FIND_WHOLE$ to 68 ;* find whole word + equ IDE_CFG_DEF_EDIT_FIND_WHOLE$ To FALSE$ + equ IDE_CFG_POS_EDIT_FINDREP_CASESENS$ to 69 ;* Case Sensitive Find/replace + equ IDE_CFG_DEF_EDIT_FINDREP_CASESENS$ To FALSE$ + equ IDE_CFG_POS_EDIT_FINDREP_WHOLE$ to 70 ;* find/replace whole word + equ IDE_CFG_DEF_EDIT_FINDREP_WHOLE$ To FALSE$ + + * Editor Code Interface + equ IDE_CFG_POS_EDIT_CONVERT_KEYWORDS$ to 71 ;* Boolean, Convert Keywords + equ IDE_CFG_DEF_EDIT_CONVERT_KEYWORDS$ To TRUE$ + equ IDE_CFG_POS_EDIT_DBLCLK_OPENS_ENTITY$ to 72 ;* Disabled (0)/Opens Entity (1)/Does gosub (2)/Does both + equ IDE_CFG_DEF_EDIT_DBLCLK_OPENS_ENTITY$ To 3 + equ IDE_CFG_POS_EDIT_AUTOCOMPLETE_BRACES$ to 73 ;* Boolean, automatically cose Open races, brackets, etc + equ IDE_CFG_DEF_EDIT_AUTOCOMPLETE_BRACES$ To FALSE$ + equ IDE_CFG_POS_EDIT_SHOW_CALLTIPS$ to 74 ;* bzs 04/23/18 None (0) / Show tooltips (1) / Show autocomplete (2) / Does both (3) + * bzs 042318 equ IDE_CFG_DEF_EDIT_SHOW_CALLTIPS$ To FALSE$ + Equ IDE_CFG_DEF_EDIT_SHOW_CALLTIPS$ To 0 + equ IDE_CFG_POS_EDIT_TABSTOPS$ to 75 ;* Number of characters In a tabstop + equ IDE_CFG_DEF_EDIT_TABSTOPS$ To 5 + equ IDE_CFG_POS_EDIT_INDENT_CHARS$ to 76 ;* How to indent: tab Or space + equ IDE_CFG_DEF_EDIT_INDENT_CHARS$ To FALSE$ + equ IDE_CFG_POS_EDIT_FONT$ to 77 ;* Font for the editor + * BZS 111717 equ IDE_CFG_DEF_EDIT_FONT$ To "Courier New,-13,400,0,0,0,0,49,0,3,2,1" + equ IDE_CFG_DEF_EDIT_FONT$ To "Courier New":@tm:"-13":@tm:"-400":@tm:"0":@tm:"0":@tm:"0":@tm:"0":@tm:"49":@tm:"0":@tm:"3":@tm:"2":@tm:"1" ;* BZS 111717 + + equ IDE_CFG_POS_EDIT_NO_COLORIZATION$ to 78 ;* Boolean, colorize words? + equ IDE_CFG_DEF_EDIT_NO_COLORIZATION$ To FALSE$ + equ IDE_CFG_POS_EDIT_COLOR_KEYWORDS$ to 79 ;* Boolean, colorize keywords? + equ IDE_CFG_DEF_EDIT_COLOR_KEYWORDS$ To TRUE$ + equ IDE_CFG_POS_EDIT_COLOR_NUMBERS$ to 80 ;* Boolean, colorize Numbers? + equ IDE_CFG_DEF_EDIT_COLOR_NUMBERS$ To TRUE$ + equ IDE_CFG_POS_EDIT_COLOR_IDENTIFIERS$ to 81 ;* Boolean, colorize Identifiers? + equ IDE_CFG_DEF_EDIT_COLOR_IDENTIFIERS$ To TRUE$ + equ IDE_CFG_POS_EDIT_COLOR_QUOTES$ to 82 ;* Boolean, colorize quotes? + equ IDE_CFG_DEF_EDIT_COLOR_QUOTES$ To TRUE$ + equ IDE_CFG_POS_EDIT_COLOR_COMMENTS$ to 83 ;* Boolean, colorize comments? + equ IDE_CFG_DEF_EDIT_COLOR_COMMENTS$ To TRUE$ + equ IDE_CFG_POS_EDIT_COLOR_OPERATORS$ to 84 ;* Boolean, colorize operators? + equ IDE_CFG_DEF_EDIT_COLOR_OPERATORS$ To TRUE$ + equ IDE_CFG_POS_EDIT_COLOR_LABELS$ to 85 ;* Boolean, colorize labels? + equ IDE_CFG_DEF_EDIT_COLOR_LABELS$ To TRUE$ + equ IDE_CFG_POS_EDIT_COLOR_PREPROCESSORS$ to 86 ;* Boolean, colorize preprocessor commands? + equ IDE_CFG_DEF_EDIT_COLOR_PREPROCESSORS$ To TRUE$ + equ IDE_CFG_POS_EDIT_SELECTION_COLOR$ to 87 ;* Color For Selection + equ IDE_CFG_DEF_EDIT_SELECTION_COLOR$ To "16748574" + equ IDE_CFG_POS_EDIT_USE_INDENT_GUIDES$ to 88 ;* Boolean, use indent guides? + * bzs 073021 equ IDE_CFG_DEF_EDIT_USE_INDENT_GUIDES$ To TRUE$ + equ IDE_CFG_DEF_EDIT_USE_INDENT_GUIDES$ To false$ ;* bzs 073021 + equ IDE_CFG_POS_EDIT_INDENT_GUIDES_COLOR$ to 89 ;* Color For indent Guides + equ IDE_CFG_DEF_EDIT_INDENT_GUIDES_COLOR$ To "-2" + + * Editor Dialogs + equ IDE_CFG_POS_EDIT_GLOBALFR_SHOW_INHERITED$ to 90 ;* Show inherited entities In Global Find And Replace + equ IDE_CFG_POS_EDIT_GLOBALFR_CASESENS$ to 91 ;* make the Global Find And Replace be Case sensitive + equ IDE_CFG_POS_EDIT_GLOBALFR_WHOLE_WORD$ to 92 ;* make the Global Find And Replace match On whole words + equ IDE_CFG_POS_EDIT_GLOBALFR_RECOMPILE_ALL$ to 93 ;* allow the Global Find And Replace recompile all programs where found + + equ IDE_CFG_POS_EDIT_OPENOS_DFLT_EXTENSION$ to 101 ;* when exporting OS Files, what is the default extension + equ IDE_CFG_DEF_EDIT_OPENOS_DFLT_EXTENSION$ To "txt" + equ IDE_CFG_POS_EDIT_OPENOS_DFLT_FOLDER$ to 102 ;* when exporting OS Files, what is the default folder + + *Editor Miscellaneous + equ IDE_CFG_POS_EDIT_PRINT_ORIENTATION$ to 103 ;* Listbasic orientation - portrait Or landscape + equ IDE_CFG_DEF_EDIT_PRINT_ORIENTATION$ To "Portrait" + equ IDE_CFG_POS_EDIT_SHOW_PRINT_PREVIEW$ to 104 ;* Booean, show Print preview Or Not + equ IDE_CFG_DEF_EDIT_SHOW_PRINT_PREVIEW$ To TRUE$ + equ IDE_CFG_POS_EDIT_PRINT_LINE_NUMBERS$ to 105 ;* Booean, show line numbers In printouts + equ IDE_CFG_DEF_EDIT_PRINT_LINE_NUMBERS$ To TRUE$ + equ IDE_CFG_POS_EDIT_PRINT_HEADER$ to 106 ;* Booean, show header In printouts + equ IDE_CFG_DEF_EDIT_PRINT_HEADER$ To TRUE$ + equ IDE_CFG_POS_EDIT_PRINT_DBLSPC$ to 107 ;* Booean, double-space the printout + equ IDE_CFG_DEF_EDIT_PRINT_DBLSPC$ To FALSE$ + equ IDE_CFG_POS_EDIT_PRINT_WRAPTEXT$ to 108 ;* Booean, wrap the text on the printout + equ IDE_CFG_DEF_EDIT_PRINT_WRAPTEXT$ To TRUE$ + equ IDE_CFG_POS_EDIT_EMAIL_MAILSERVER$ to 109 ;* Mailserver Name For emailing + equ IDE_CFG_POS_EDIT_EMAIL_SENDERNAME$ to 110 ;* Sendername For emailing + equ IDE_CFG_POS_EDIT_EMAIL_USERNAME$ to 111 ;* Username For emailing + equ IDE_CFG_POS_EDIT_EMAIL_PASSWORD$ to 112 ;* password For username For emailing + equ IDE_CFG_POS_EDIT_EMAIL_USESSL$ to 113 ;* password For username For emailing + equ IDE_CFG_DEF_EDIT_EMAIL_USESSL$ To FALSE$ + + * basic Keywords + equ IDE_CFG_POS_EDIT_BASIC_KEYWORDS_UNUSED$ to 114 ;* MV list of keywords to watch For **NOT STORED IN CFG RECORD** + equ IDE_CFG_POS_EDIT_BASIC_CHANGETO_UNUSED$ to 115 ;* MV list of keywords to change to **NOT STORED IN CFG RECORD** + + //////////////////////////////////////////////////////////////////////////// + // BLint Warnings: MV'd list of bool flags - TRUE$ to ignore + // + // : Ignore SYS1122 - VNAV + // : Ignore SYS1123 - Equate suffixes + // : Ignore SYS1124 - Debug statements + + equ IDE_CFG_POS_BLINT_IGNORE_WARNINGS$ to 118 ; + equ IDE_CFG_DEF_BLINT_IGNORE_WARNINGS$ to 0 : @vm : 0 : @vm : 0 + + equ IDE_CFG_BLINT_NOWARN_VNAV$ to 1 + equ IDE_CFG_BLINT_NOWARN_EQU$ to 2 + equ IDE_CFG_BLINT_NOWARN_DEBUG$ to 3 + + //////////////////////////////////////////////////////////////////////////// + + // DB toolpanel view options + equ IDE_CFG_POS_DPL_VIEW_OPTION$ to 119 + + * Add Table + equ IDE_CFG_ADD_TABLE_POS$ to 120 ;* MV list of XY pos with respect to the IDE + + // RTI_IDE_PGO_IMAGE + equ IDE_CFG_POS_PGOIMG_SHOWINHERITED$ to 121 + + // RTI_IDE_OPEN_RECORD + equ IDE_CFG_POS_OPENREC_KEYREADDISABLED$ to 122 ; // If TRUE$ then don't key-read on each CHAR + equ IDE_CFG_POS_OPENREC_POS$ to 123 + equ IDE_CFG_POS_OPENREC_FLAGS$ to 124 + + * TYPE MRU from RTI_IDE_OPEN + equ IDE_CFG_POS_OPENENT_MRU$ to 125 + equ IDE_CFG_POS_OPENENT_SHOWINHERITED$ to 126 + equ IDE_CFG_POS_OPENENT_POS$ to 127 + + * FAMILY MRU from RTI_IDE_NEW + equ IDE_CFG_POS_NEWENT_MRU$ to 128 + equ IDE_CFG_POS_NEWENT_POS$ to 129 + + // ToolBars + equ IDE_CFG_POS_SHOWTB_TCL$ to 130 ; // If TRUE$ then show TCL in the IDE + equ IDE_CFG_DEF_SHOWTB_TCL$ to TRUE$ + equ IDE_CFG_POS_SHOWTB_STANDARD$ to 131 ; // If TRUE$ then show the standard IDE Toobar + equ IDE_CFG_DEF_SHOWTB_STANDARD$ to TRUE$ + + * More TYPE MRU from RTI_IDE_OPEN + equ IDE_CFG_POS_OPENENT_PREVTYPE$ to 132 ; // TYPE or TYPE*CLASS + + // Misc stuff + equ IDE_CFG_POS_HTTPSERVER_PORT$ to 139 ; // Port to use - leave blank for a "random" one. + equ IDE_CFG_POS_CUSTOM_COLORS$ to 140 ; // @vm'd list - SYSTEM CUSTOMCOLORS property + equ IDE_CFG_POS_HINT_REC_64K$ to 141 ; // Show records over 64K as red on the IDE status bar? + Equ IDE_CFG_DEF_HINT_REC_64K$ To FALSE$ + equ IDE_CFG_RDKINSTALL_DIR$ to 142 ; // MRU folder for the IDE Install RDK tool + equ IDE_CFG_NEWENT_DLG_ID$ to 143 ; // ID to replace RTI_IDE_NEW + equ IDE_CFG_OPENENT_DLG_ID$ to 144 ; // ID to replace RTI_IDE_OPEN + equ IDE_CFG_OPENREC_DLG_ID$ to 145 ; // ID to replace RTI_IDE_OPEN_RECORD + Equ IDE_CFG_POS_STARTUP_UPDATE_CHECK$ To 146 ; // BZS 061518 check for updates when OI starts up? + Equ IDE_CFG_DEF_STARTUP_UPDATE_CHECK$ To TRUE$ ; // bzs 061518 + + // PGO Cache + equ IDE_CFG_POS_PGO_CACHEIDS$ to 147 ; // @vm'd list of PGO cache IDs + equ IDE_CFG_POS_PGO_CACHEDATA$ to 148 ; // @vm'd list of PGO cache data + + // Update History + equ IDE_CFG_POS_UPD_HIST_MAX_DAYS$ to 150 ; // Maximum number of days to keep the history for + equ IDE_CFG_DEF_UPD_HIST_MAX_DAYS$ to 30 + equ IDE_CFG_POS_UPD_HIST_DATES$ to 151 ; // @vm'd list of update history dates - AMV'd with IDE_CFG_POS_UPD_HIST_IDS$ + equ IDE_CFG_POS_UPD_HIST_IDS$ to 152 ; // @vm/@svm'd list of update history repos IDs - AMV'd with IDE_CFG_POS_UPD_HIST_DATES$ + + // Favorites + equ IDE_CFG_POS_FAV_IDS$ to 153 ; // @vm'd list of favorites reposIDs. + equ IDE_CFG_POS_FAB_TAB$ to 154 ; // Last opened Tab on the FPL (Tab Index) + equ IDE_CFG_POS_FAV_NAMES$ to 155 ; // @vm'd list of favorites names. + + // More GIT ... + equ IDE_CFG_POS_GIT_LASTPULLDATE$ to 157 ; // Date of last GIT pull + equ IDE_CFG_POS_GIT_LASTPUSHDATE$ to 158 ; // Date of last GIT push + equ IDE_CFG_POS_GIT_ENFORCEPUBLISABLE$ to 159 ; // True if you want to only push publishable items + equ IDE_CFG_POS_GIT_LASTPULLCOMMIT$ to 160 ; // Id of most recent commit upon pull, used by "Since Previous Pull" * rjc 12-01-17 + + // RDKInstall + equ IDE_CFG_RDKINSTALL_MODE$ to 161 ; // 0 - Cache parent folder, 1 - Cache selected folder, 2 - User default folder + equ IDE_CFG_RDKINSTALL_DFLT_DIR$ to 162 + + //////////////////////////////////////////////////////////////////////////// + // RDKInstall default dir mode + // + // 0 - Use selected folder parent + // 1 - Use selected folder + // 2 - Use default folder + equ IDE_CFG_RDKINSTALL_MODE_PARENTDIR$ to 0 + equ IDE_CFG_RDKINSTALL_MODE_SELECTEDDIR$ to 1 + equ IDE_CFG_RDKINSTALL_MODE_DEFAULTDIR$ to 2 + + // Console/Engine Server + // bzs 020917 + Equ IDE_CFG_POS_CONSOLE_ESERVER_URL$ To 170 ; // Deprecated - moved to SYSAPPS + Equ IDE_CFG_DEF_CONSOLE_ESERVER_URL$ To "localhost" + Equ IDE_CFG_POS_CONSOLE_ESERVER_PORT$ To 171 ; // Deprecated - moved to SYSAPPS + Equ IDE_CFG_DEF_CONSOLE_ESERVER_PORT$ To "18088" + Equ IDE_CFG_POS_CONSOLE_ESERVER_UTF8$ To 172 ; // Deprecated - moved to SYSAPPS + Equ IDE_CFG_DEF_CONSOLE_ESERVER_UTF8$ To "18089" + Equ IDE_CFG_POS_CONSOLE_ESERVER_WEB$ To 173 ; // Deprecated - moved to SYSAPPS + Equ IDE_CFG_DEF_CONSOLE_ESERVER_WEB$ To "18888" + Equ IDE_CFG_POS_CONSOLE_ESERVER_CHAT$ To 174 ; // Deprecated - moved to SYSAPPS + Equ IDE_CFG_DEF_CONSOLE_ESERVER_CHAT$ To "18889" + Equ IDE_CFG_POS_CONSOLE_ESERVER_WSNAME$ To 175 ; // Deprecated - moved to SYSAPPS + Equ IDE_CFG_POS_CONSOLE_ESERVER_VDIR$ To 176 ; // Deprecated - moved to SYSAPPS + Equ IDE_CFG_DEF_CONSOLE_ESERVER_VDIR$ To "" ;* bzs 041919 + + equ IDE_CFG_POS_ESERVER_SERVER_TYPE$ to 177 ; // (0) Internal HTTP Server, (1) External Engine Server + equ IDE_CFG_DEF_ESERVER_SERVER_TYPE$ to 0 ; // (0) Internal HTTP Server + + // More editor code interface + // bzs 051217 Really should be up above, but no more room at the inn(sert) + equ IDE_CFG_POS_EDIT_COLOR_EQU$ to 180 ;* Boolean, colorize preprocessor commands? + equ IDE_CFG_DEF_EDIT_COLOR_EQU$ To TRUE$ + + // more email settings + // bzs 122021 Really should be up above, but no more sequential values + Equ IDE_CFG_POS_EDIT_EMAIL_OPTIONS$ To 185 ;* options for email (semicolon delimited) + + // More misc... + equ IDE_CFG_POS_DSN_GENERIC_DEF_OSPATH$ to 190 ; // Path for the RTI_DSN_GENERIC options dialog + + //GLobal Find and replace dialog + Equ IDE_CFG_POS_GLOBALFINDREPLACE_SIZE$ to 191 + Equ IDE_CFG_POS_GLOBALFINDREPLACE_OPTS$ To 192 + + // bzs 050318 position and size of CTO windows + Equ IDE_CFG_POS_CTO_SIZE$ To 200 ; + // bzs 080818 position and size of find/replace window + Equ IDE_CFG_POS_FIND_SIZE$ To 201 ; + + equ IDE_CFG_REVPROFILELOG_FILES$ to 202; // Previous files for the RevProfileLog Analyzer + + // bzs 071818 allow for some modifications on the "auto check for update" + Equ IDE_CFG_POS_STARTUP_UPDATE_CHECK_SLEEP_UNTIL$ To 210 + Equ IDE_CFG_POS_STARTUP_UPDATE_CHECK_SKIP_VERSION$ To 211 + + // When the IDE is closed each instance has it's position recorded along + // with the contents of each of it's docksites and any undocked owned + // windows. + // + // Because we can have multiple IDE instances we hold an AMV with + // details for each instance that contains the following data: + // + // Docksite config + // Undocked TPLs + // Undocked DSNs + // + // For each docksite/undocked list we store an @svm'd array of views + // + // For each view we stored an @tm'd list of DSN or TPLS in the view + // (Note that the first @tm member is a comma delimited array of size + // information.) + // + // <0,0,0,1> View Position + // <0,0,0,2> First TPL/DSN + // <0,0,0,3> Second TPL/DSN + // <0,0,0,4> Third TPL/DSN etc + // + // For each TPL/DSN we store an @stm'd list of attributes + // + // <0,0,0,0,1> TPL/DSN ID (RTI_DSN_OIWIN,RTI_IDE_TPL_OUTPUT etc) + // <0,0,0,0,2> DSN Key (Repository key to load) + // <0,0,0,0,3> Active Flag - TRUE if this is the TPL to activate + // + // Yucky eh? + + equ IDE_CFG_POS_IDS_POSITION$ to 300 ; // @vm'd array of instance position info (PLACEMENTDATA arrays) + equ IDE_CFG_POS_IDS_EAST$ to 301 ; // Contents of the EAST docksite, @vm delimited per instance + equ IDE_CFG_POS_IDS_WEST$ to 302 ; // Contents of the WEST docksite, @vm delimited per instance + equ IDE_CFG_POS_IDS_SOUTH$ to 303 ; // Contents of the SOUTH docksite, @vm delimited per instance + equ IDE_CFG_POS_IDS_DSN$ to 304 ; // Contents of the DSN docksite, @vm delimited per instance + equ IDE_CFG_POS_UNDOCKED_DSN$ to 305 ; // Details for undocked DSNs, @vm delimited per instance + equ IDE_CFG_POS_UNDOCKED_TPL$ to 306 ; // Details for undocked TPLs, @vm delimited per instance + + equ IDE_CFG_POS_INSTANCE_FIRST$ to IDE_CFG_POS_IDS_POSITION$ + equ IDE_CFG_POS_INSTANCE_LAST$ to IDE_CFG_POS_UNDOCKED_TPL$ + + // bzs 021721 added IDE_CFG_POS_GIT_ENABLED$ to blanked-out lists + // bzs 041919 this (comma delimited) list enumerates those fields that should be blanked out when creating a new record from the system-wide default + Equ IDE_CFG_SYSTEM_NODEFAULT$ To IDE_CFG_POS_GIT_LASTPULLDATE$:",":IDE_CFG_POS_GIT_LASTPUSHDATE$:",":IDE_CFG_POS_GIT_LASTPULLCOMMIT$:",":IDE_CFG_POS_GIT_ENABLED$ + // this (comma delimited) list enumerates those fields that should be blankedout when creating a new record from the current application default + Equ IDE_CFG_APP_NODEFAULT$ To IDE_CFG_POS_UPD_HIST_DATES$:",":IDE_CFG_POS_UPD_HIST_IDS$:",":IDE_CFG_POS_FAV_IDS$:",":IDE_CFG_POS_FAV_NAMES$:",":IDE_CFG_POS_CONSOLE_ESERVER_VDIR$:",":IDE_CFG_POS_STARTUP_UPDATE_CHECK$:",":IDE_CFG_POS_STARTUP_UPDATE_CHECK_SLEEP_UNTIL$:",":IDE_CFG_POS_STARTUP_UPDATE_CHECK_SKIP_VERSION$:",":IDE_CFG_POS_MRUDSNIDS$:",":IDE_CFG_POS_MRUDSNKEYS$:",":IDE_CFG_POS_GIT_ENABLED$ + + /////////////////////////////////////////////////////////////////////////////// + /////////////////////////////////////////////////////////////////////////////// + + // GETINSTANCECFG method: This method returns the config data for a single + // instance, identified by an instance index. + // + // param1 -> instanceIdx. Identifies the instance data to retrieve. + // + // param2 <- instanceCfg. Returned instance data array. This has the + // following structure: + // + // <1> Position info + // <2> EAST docksite info + // <3> WEST docksite info + // <4> SOUTH docksite info + // <5> DSN docksite info + // <6> Undocked DSN info + // <7> Undocked toolpanel info + // + // retVal <- TRUE$ if successful, FALSE$ otherwise. Errors are returned + // via Set_Status() + + + // Returned config data has the following structure + + equ IDE_GIC_POS_POSITION$ to 1 + equ IDE_GIC_POS_EAST$ to 2 + equ IDE_GIC_POS_WEST$ to 3 + equ IDE_GIC_POS_SOUTH$ to 4 + equ IDE_GIC_POS_DSN$ to 5 + equ IDE_GIC_POS_UNDOCKED_DSN$ to 6 + equ IDE_GIC_POS_UNDOCKED_TPL$ to 7 + + /////////////////////////////////////////////////////////////////////////////// + /////////////////////////////////////////////////////////////////////////////// + + // Color config inforamtion - used to load Color Combo controls for the + // IDE. + // + // The color configuration record is stored in the SYSENV table with the + // following key: + // + // CFG_RTI_IDE_X_COLORS*** + // + + equ IDE_CFG_COLORS_TABLE$ to IDE_CFG_TABLE$ + equ IDE_CFG_COLORS_ID_PREFIX$ to "CFG_RTI_IDE_X_COLORS" + + // Config record layout + // + // <1> PS Colors (Transparent and Default etc) + // <2> System colors + // <3> Web colors + // <4> X11 colors + // <5> ColorKey "colors" + // <6> "Custom" color ID + + equ IDE_CLR_CFG_POS_PSCOLORS$ to 1 + equ IDE_CLR_CFG_POS_SYSCOLORS$ to 2 + equ IDE_CLR_CFG_POS_WEBCOLORS$ to 3 + equ IDE_CLR_CFG_POS_X11COLORS$ to 4 + equ IDE_CLR_CFG_POS_COLORKEYS$ to 5 + equ IDE_CLR_CFG_POS_CUSTOM$ to 6 + + equ IDE_CLR_CFG_POS_FIRST$ to IDE_CLR_CFG_POS_PSCOLORS$ + equ IDE_CLR_CFG_POS_LAST$ to IDE_CLR_CFG_POS_CUSTOM$ + + // Cached color names array (cfgColorNames@) + // + // <1> ColorRef values + // <2> ColorName values + // <1> PS ColorRef values + // <2> PS ColorName values + // <1> CK ColorRef values + // <2> CK ColorName values + + equ IDE_CLR_CFG_POS_COLORREFS$ to 1 + equ IDE_CLR_CFG_POS_COLORNAMES$ to 2 + equ IDE_CLR_CFG_POS_PSCOLORREFS$ to 3 + equ IDE_CLR_CFG_POS_PSCOLORNAMES$ to 4 + equ IDE_CLR_CFG_POS_CKCOLORREFS$ to 5 + equ IDE_CLR_CFG_POS_CKCOLORNAMES$ to 6 + + /////////////////////////////////////////////////////////////////////////////// + /////////////////////////////////////////////////////////////////////////////// + + // CLEARINSTANCECFG method: This method removes all config data for all + // IDE instances. + // + // retVal <- TRUE$ if successful, FALSE$ otherwise. Errors are returned + // via Set_Status() + + ////////////////////////////////////////////////////////////////////////// + + // FLUSH method: Writes the cached config information to disk + // + // retVal <- TRUE$ if successful, FALSE$ otherwise. Errors are returned + // via Set_Status() + + ////////////////////////////////////////////////////////////////////////// + + // GETCOLORSET method: This method returns an @fm delimited array of color + // values in the format: + // + // ":" + // + // param1 -> ColorSet index. Indentifies the set of colors to retrieve. + // Can be one of the following: + // + // 1: PS Colors (Transparent and Default etc) + // 2: System Colors + // 3: Web Colors + // 4: X11 Colors + // 5: ColorKey Colors + // 6: Custom" color ID (defaults to "Custom...") + // + // "CR": All colors (PS,System,Web,X11) + // "CK": All colorkey (ColorKey,System,Web,X11) + // + // param2 -> Flags + // + // <1> RemoveTransparant. If TRUE$ then remove the Transparent + // color value when retrieving the PS Colorset + // <2> RemoveCustom. If TRUE$ then remove the Custom colorset + // retrieving a "CR" or "CK" colorset + // + // param3 -> "Reset" Color. Specifies the "original color" to use as the + // reset color. This color can be used by the toolset to allow + // the user to reset a color choice in case they change it and + // wish to revert. It is always added to the end of the returned + // color array, but before the "Custom..." item. + // + // <1> ColorRef + // <2> Item Text. This is the text to display for the reset + // item. The color name itself can be inserted by using + // a "%c%" place holder. If the name cannot be found the + // RGB version will be displayed instead, using the format + // "(r,g,b)" + // + // e.g. If the Reset Color is: + // + // 255 : @fm : "Reset to %1%" + // + // Then the item will be displayed as: + // + // "Reset to Red" + // + // If the Reset Color is: + // + // 13931007 : @fm : "Reset to %c%" + // + // Then the item will be displayed as: + // + // "Reset to (255,145,212)" + + equ IDE_CFG_CS_RESETCOLORTOKEN$ to "%c%" + equ IDE_CFG_CS_CUSTOMSUFFIX$ to "..." + equ IDE_CFG_CS_DEF_CUSTOM$ to "Custom" : IDE_CFG_CS_CUSTOMSUFFIX$ + + equ IDE_CFG_CS_ALLCOLORS$ to "CR" + equ IDE_CFG_CS_ALLCOLORKEY$ to "CK" + + equ IDE_CFG_CS_PSCOLORS$ to IDE_CLR_CFG_POS_PSCOLORS$ + equ IDE_CFG_CS_SYSCOLORS$ to IDE_CLR_CFG_POS_SYSCOLORS$ + equ IDE_CFG_CS_WEBCOLORS$ to IDE_CLR_CFG_POS_WEBCOLORS$ + equ IDE_CFG_CS_X11COLORS$ to IDE_CLR_CFG_POS_X11COLORS$ + equ IDE_CFG_CS_COLORKEYS$ to IDE_CLR_CFG_POS_COLORKEYS$ + equ IDE_CFG_CS_CUSTOM$ to IDE_CLR_CFG_POS_CUSTOM$ + + // param2 (flags) + equ IDE_CFG_CS_POS_NOTRANSPARENT$ to 1 + equ IDE_CFG_CS_POS_NOCUSTOM$ to 2 + + // param3 (resetColor) + equ IDE_CFG_CS_POS_RESETCOLORREF$ to 1 + equ IDE_CFG_CS_POS_RESETCOLORTEXT$ to 2 + + ////////////////////////////////////////////////////////////////////////// + + // GETDIALOG method: This method returns the name of an IDE common dialog + // + // param1 -> Dialog Type: + // + // 1 - New Entity + // 2 - Open Entity + // 3 - Open Record + + // Dialog types + equ IDE_CFG_GETDLG_T_NEWENT$ to 1 + equ IDE_CFG_GETDLG_T_OPENENT$ to 2 + equ IDE_CFG_GETDLG_T_OPENREC$ to 3 + + ////////////////////////////////////////////////////////////////////////// + + // GETINSTANCECFG method: This method returns the config data for a single + // instance, identified by an instance index. + // + // param1 -> instanceIdx. Identifies the instance data to retrieve. + // + // param2 <- instanceCfg. Returned instance data array. This has the + // following structure: + // + // <1> Position info + // <2> EAST docksite info + // <3> WEST docksite info + // <4> SOUTH docksite info + // <5> DSN docksite info + // <6> Undocked DSN info + // <7> Undocked toolpanel info + // + // retVal <- TRUE$ if successful, FALSE$ otherwise. Errors are returned + // via Set_Status() + + ////////////////////////////////////////////////////////////////////////// + + // GETMRU method: This method returns the MRU information as an AMV array + // formatted like so: + // + // <1> @vm'd list of DSN IDs + // <2> @vm'd list of entity keys for the DSN + + equ IDE_CFG_MRU_POS_DSNIDS$ to 1 + equ IDE_CFG_MRU_POS_ENTITYIDS$ to 2 + + ////////////////////////////////////////////////////////////////////////// + + // GETVALUE method: This method retrieves a value from the IDE + // configuration information + // + // param1 -> ValueID : Identifies the value to retrieve, + // + // retVal <- Value + // + // Errors are returned via Set_Status(). + + ////////////////////////////////////////////////////////////////////////// + + // PURGE method: Deletes all cached config information + // + // retVal <- TRUE$ if successful, FALSE$ otherwise. Errors are returned + // via Set_Status() + + ////////////////////////////////////////////////////////////////////////// + + // SETVALUE method: This method retrieves a value from the IDE + // configuration information + // + // param1 -> ValueID : Identifies the value to retrieve + // + // param2 -> New Value + // + // param3 -> NoFlush: If TRUE$ then do NOT flush the update direct to + // disk + // + // Errors are returned via Set_Status(). + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +/* + Previously, in this insert ... + ============================== + + bzs 30 Jul 21 Changed default for "use indent guides" to false + Mr C 13 May 21 Added IDE_CFG_POS_OPENENT_PREVTYPE$ + Mr C 26 Mar 21 Added RDKInstall folder mode equates + Mr C 05 Mar 21 Added IDE_CFG_POS_PGOIMG_SHOWINHERITED$ + Mr C 02 Mar 21 Added IDE_CFG_POS_DPL_VIEW_OPTION$ + Mr C 07 Sep 19 Added "Compiler Warnings" section + Mr C 06 Sep 19 Added SAVELAYOUT equates + BZS 19 Apr 19 Added list of fields to clear out if pulling from default for system (IDE_CFG_SYSTEM_NODEFAULT) or default for app (IDE_CFG_APP_NODEFAULT) + mtr 17 Jan 19 Added IDE_CFG_POS_GLOBALFINDREPLACE_SIZE and IDE_CFG_POS_GLOBALFINDREPLACE_OPTS + Mr C 12 Jul 18 Added IDE_CFG_POS_FAV_NAMES$ + bzs 15 Jun 18 Added "check for updates at startup" + bzs 03 May 18 Added CTO size and position + Mr C 08 Mar 18 Fixed IDE_CFG_POS_INSTANCE_LAST$ constant. + rjc 01 Dec 17 Added GIT_LASTPULLCOMMIT, the id of most recent commit, used by "Since Previous Pull" + Mr C 20 Nov 17 Added "Minimize on Test Run" and "Anchor Form" FormDes settings + Mr C 05 Aug 17 Removed deprecated settings. + bzs 12 May 17 Added 'equ' color option in editor cfg + bzs 09 Feb 17 Added engine server + Mr C 03 Jan 16 Added FPL processing + Mr C 29 Dec 16 Moved extra GIT fields to maintain numeric ordering + and avoid accidental overwriting. + Added Update History fields + Mr C 26 Sep 16 Added GETDIALOG constants + Mr C 25 Sep 16 Added IDE_CFG_RDKINSTALL_DIR$ + Mr C 15 Jun 16 Added IDE_CFG_POS_EDIT_WARN_64K$ + Mr C 24 Mar 16 Added RTI_IDE_OPEN_RECORD constants + Mr C 15 Mar 16 Added RTI_IDE_NEW cache constants + Mr C 27 Feb 16 Added PGO cache fields + Mr C 28 Jan 16 Extended RTI_IDE_OPEN config constants + Mr C 18 Jan 16 Added Favorites and Repository panel equates + Changed to single grid size. + bzs 07 Jan 16 Enhanced definition of IDE_CFG_POS_EDIT_DBLCLK_OPENS_ENTITY + RJC 06 Nov 15 Added IDE_CFG_POS_GIT_LASTPULLDATE$, LAST_PUSHDATE$, _ENFORCEPUBLISHABLE + Mr C 20 Oct 15 Added TCL config info + Mr C 05 Oct 15 Added IDE_CFG_POS_CUSTOM_COLORS$ + DJH 03 Sep 15 Add MRU for Add Table previous directories chosen + MTR 21 Aug 15 Added more Defaults + MTR 30 Apr 15 Additions For Database Tool Panel - DPL + Mr C 01 Apr 15 Added FormDes defaults + Major tidy up to adopt singlar naming convention + Mr C 04 Feb 15 Added MRU equates +*/ + diff --git a/SYSPROG/STPROCINS/RTI_IDE_GET_ENTITY_EQUATES.txt b/SYSPROG/STPROCINS/RTI_IDE_GET_ENTITY_EQUATES.txt new file mode 100644 index 0000000..f54f7bc --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_GET_ENTITY_EQUATES.txt @@ -0,0 +1,19 @@ +compile insert RTI_IDE_GET_ENTITY_Equates +/* + ** Copyright (C) 2012-2015 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : MTR + Date : December 2015 + Purpose : Constants for use with the RTI_IDE_GET_ENTITY handler procs + */ + +equ IDE_GET_ENTITY_APPID$ to 1 ;* Appid the window will be 'locked' into +equ IDE_GET_ENTITY_TYPECLASS$ to 2 ;* TYPE/Class of the entity To Lock in. Separated byt an '*' +equ IDE_GET_ENTITY_HIDEINHERIT$ to 3 ;* if TRUE$ then don't allow inherited entities to be shown +equ IDE_GET_ENTITY_FILTERSTRING$ to 4 ;* filter string used to load the dialog +equ IDE_GET_ENTITY_INITXY$ to 5 ;* @vm'd position to display the dialog at. If not set the display over @focus +equ IDE_GET_ENTITY_INITENTITY$ to 6 ;* TYPE/Class of the entity To Lock in. Separated byt an '*' diff --git a/SYSPROG/STPROCINS/RTI_IDE_HTML_GOOGLE_DYNAMICFEED.txt b/SYSPROG/STPROCINS/RTI_IDE_HTML_GOOGLE_DYNAMICFEED.txt new file mode 100644 index 0000000..e875919 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_HTML_GOOGLE_DYNAMICFEED.txt @@ -0,0 +1,866 @@ +compile insert RTI_IDE_HTML_GOOGLE_DYNAMICFEED +/** + * Copyright (c) 2008 Google Inc. + * + * You are free to copy and use this sample. + * License can be found here: http://code.google.com/apis/ajaxsearch/faq/#license +*/ + +/** + * @fileoverview A feed gadget based on the AJAX Feed API. + * @author dcollison@google.com (Derek Collison) + */ + +/** + * GFdynamicFeedControl + * @param {string} feed The feed URL. + * @param {String|Object} container Either the id string or the element itself. + * @param {Object} options Options map. + * @constructor + */ + +function GFdynamicFeedControl(feedUrls, container, options) { + // node elements. + this.nodes = {}; + this.collapseElements = []; + + // the feeds. + this.feeds = []; + this.results = []; + + if (typeof feedUrls == 'string') { + this.feeds.push({url:feedUrls}); + } else if (typeof feedUrls == 'object') { + for (var i=0; i/g, '>'); + } + } + this.feeds.push(o); + } + } + + if (typeof container == "string") { + container = document.getElementById(container); + } + this.parseOptions_(options); + this.setup_(container); +} + +/* + * Default time in milliseconds for the feed to be reloaded. + * @type Number + */ +GFdynamicFeedControl.DEFAULT_NUM_RESULTS = 4; +/* + * Default time in milliseconds for the feed to be reloaded. + * @type Number + */ +GFdynamicFeedControl.DEFAULT_FEED_CYCLE_TIME = 1800000; +/* + * Default display time in milliseconds for each entry. + * @type Number + */ +GFdynamicFeedControl.DEFAULT_DISPLAY_TIME = 5000; +/* + * Default fadeout transition time in milliseconds for each entry. + * @type Number + */ +GFdynamicFeedControl.DEFAULT_FADEOUT_TIME = 1000; +/* + * Default time between transition steps in milliseconds + * @type Number + */ +GFdynamicFeedControl.DEFAULT_TRANSISTION_STEP = 40; +/* + * Default hover time in milliseconds for each entry. + * @type Number + */ +GFdynamicFeedControl.DEFAULT_HOVER_TIME = 100; + +/** + * Setup default option map and apply overrides from constructor. + * @param {Object} options Options map. + * @private + */ +GFdynamicFeedControl.prototype.parseOptions_ = function(options) { + // Default Options + // TODO(dcollison) - implement Feed Cycle. + this.options = { + numResults : GFdynamicFeedControl.DEFAULT_NUM_RESULTS, + feedCycleTime : GFdynamicFeedControl.DEFAULT_FEED_CYCLE_TIME, + linkTarget : google.feeds.LINK_TARGET_BLANK, + displayTime : GFdynamicFeedControl.DEFAULT_DISPLAY_TIME, + transitionTime : GFdynamicFeedControl.DEFAULT_TRANSISTION_TIME, + transitionStep : GFdynamicFeedControl.DEFAULT_TRANSISTION_STEP, + fadeOutTime: GFdynamicFeedControl.DEFAULT_FADEOUT_TIME, + scrollOnFadeOut : true, + pauseOnHover : true, + hoverTime : GFdynamicFeedControl.DEFAULT_HOVER_TIME, + autoCleanup : true, + transitionCallback : null, + feedTransitionCallback : null, + feedLoadCallback : null, + collapseable : false, + sortByDate : false, + horizontal : false, + stacked : false, + title : null + }; + + if (options) { + for (var o in this.options) { + if (typeof options[o] != 'undefined') { + this.options[o] = options[o]; + } + } + } + + // Cant be collapseable unless stacked + if(!this.options.stacked) { + this.options.collapseable = false; + } + + // Override strange/bad options + this.options.displayTime = Math.max(200, this.options.displayTime); + this.options.fadeOutTime = Math.max(0, this.options.fadeOutTime); + + // Calculated + var ts = this.options.fadeOutTime / this.options.transitionStep; + this.fadeOutDelta = Math.min(1, (1.0/ts)); + + // Flag to start + this.started = false; +}; + +/** + * Basic setup. + * @private + */ +GFdynamicFeedControl.prototype.setup_ = function(container) { + if (container == null) return; + this.nodes.container = container; + + // Browser fun. + if (window.ActiveXObject) { + this.ie = this[window.XMLHttpRequest ? 'ie7' : 'ie6'] = true; + } else if (document.childNodes && !document.all && !navigator.taintEnabled) { + this.safari = true; + } else if (document.getBoxObjectFor != null) { + this.gecko = true; + } + // The feedControl instance for generating entry HTML. + this.feedControl = new google.feeds.FeedControl(); + this.feedControl.setLinkTarget(this.options.linkTarget); + + // The feeds + this.expected = this.feeds.length; + this.errors = 0; + + for (var i = 0; i < this.feeds.length; i++) { + var feed = new google.feeds.Feed(this.feeds[i].url); + feed.setResultFormat(google.feeds.Feed.JSON_FORMAT); + feed.setNumEntries(this.options.numResults); + feed.load(this.bind_(this.feedLoaded_, i)); + } +}; + +/** + * Helper method to bind this instance correctly. + * @param {Object} method function/method to bind. + * @return {Function} + * @private + */ +GFdynamicFeedControl.prototype.bind_ = function(method) { + var self = this; + var opt_args = [].slice.call(arguments, 1); + return function() { + var args = opt_args.concat([].slice.call(arguments)); + return method.apply(self, args); + } +}; + +/** + * Callback associated with the AJAX Feed api after load. + * @param {Object} result Loaded result. + * @private + */ +GFdynamicFeedControl.prototype.feedLoaded_ = function(index, result) { + if (this.options.feedLoadCallback) { + this.options.feedLoadCallback(result); + } + if (result.error) { + // Ignore failed feeds for the most part. + // The user has control through the feedLoadCallback above + // if they choose to do something more createive. + // Only complain if we can't load anything. + if (++this.errors >= this.expected) { + this.nodes.container.innerHTML = 'Feed' + ((this.expected > 1)?'s ':' ') + + 'could not be loaded.'; + } + return; + } + // Override of title option. + if (this.feeds[index].title) { + result.feed.title = this.feeds[index].title; + } + this.results.push(result); + + if (!this.started) { + this.createSubContainers_(); + this.displayResult_(0); + } else if (!this.options.horizontal && this.options.stacked) { + this.addResult_(this.results.length-1); + } +}; + +/** + * Insert blog in correct place + * @private + */ +GFdynamicFeedControl.prototype.sortByDate_ = function(resultIndex, newTitle, + newList) { + // if sorting by date, insert it into the correct spot + var newEntryDate = this.results[resultIndex].feed.entries[0].publishedDate; + var newEntryDateMS = Date.parse(newEntryDate); + var insertIndex = null; + + for (var i = 0; i < this.results.length; i++) { + var mostRecentPost = this.results[i].feed.entries[0].publishedDate; + var mostRecentPostMS = Date.parse(mostRecentPost); + if(newEntryDateMS > mostRecentPostMS) { + insertIndex = i; + break; + } + } + + // If it's most stale blog, just append as usual + if(insertIndex == null) { + this.nodes.root.appendChild(newTitle); + this.nodes.root.appendChild(newList); + this.createListEntries_(resultIndex, newList); + return; + } + + // If it is fresher than a blog, insert to correct position + var insertBeforeIndex = 2 + (insertIndex * 2); + var swapToIndex = insertBeforeIndex + 2; + var tempSwap = null; + var myResultIndex = resultIndex + 1; + + var sectionsToChange = this.nodes.root.childNodes; + var nodeToInsertBefore = sectionsToChange[insertBeforeIndex]; + + this.nodes.root.insertBefore(newTitle, nodeToInsertBefore); + this.nodes.root.insertBefore(newList, nodeToInsertBefore); + + this.results.splice(insertIndex, 0, this.results[resultIndex]); + this.results.splice(myResultIndex, 1); + + var nodesToChangeClick = sectionsToChange[swapToIndex].nextSibling.childNodes; + + this.createListEntries_(insertIndex, newList); + + // Keep freshest blog open first + if(insertIndex == 0) { + this.displayResult_(0); + } + + insertIndex += 1; + // Reset all of the onmousehover listeners to highlight corect index + for (var i = swapToIndex; i < sectionsToChange.length; i += 2) { + var nodesToChangeClick = sectionsToChange[i].nextSibling.childNodes; + for (var j=0; j < nodesToChangeClick.length; j++) { + nodesToChangeClick[j].onmouseover = this.bind_(this.listMouseOver_, + insertIndex, j); + nodesToChangeClick[j].onmouseout = this.bind_(this.listMouseOut_, + insertIndex, j); + } + insertIndex++; + } +}; + +/** + * Setup to display the Result for stacked mode + * @private + */ +GFdynamicFeedControl.prototype.addResult_ = function(resultIndex) { + var result = this.results[resultIndex]; + var newTitle = this.createDiv_('gfg-subtitle'); + this.setTitle_(result.feed, newTitle); + var newList = this.createDiv_('gfg-list'); + + // add a collapseable button + if(this.options.collapseable) { + var collapseLink = document.createElement('div'); + newList.style.display = 'none'; + collapseLink.className = 'gfg-collapse-closed'; + newTitle.appendChild(collapseLink); + collapseLink.onclick = this.toggleCollapse(this, newList, collapseLink); + this.collapseElements.push({ + list : newList, + collapse : collapseLink + }); + } + + + var clearFloat = document.createElement('div'); + clearFloat.className = 'clearFloat'; + newTitle.appendChild(clearFloat); + + // If not sorting by date, add them as usual + if(!this.options.sortByDate) { + this.nodes.root.appendChild(newTitle); + this.nodes.root.appendChild(newList); + this.createListEntries_(resultIndex, newList); + } else { + this.sortByDate_(resultIndex, newTitle, newList); + } + +}; + +/** + * Setup to display the Result + * @private + */ +GFdynamicFeedControl.prototype.displayResult_ = function(resultIndex) { + this.resultIndex = resultIndex; + var result = this.results[resultIndex]; + if (this.options.feedTransitionCallback) { + this.options.feedTransitionCallback(result); + } + if (this.options.title) { + this.setPlainTitle_(this.options.title); + } else { + this.setTitle_(result.feed); + } + this.clearNode_(this.nodes.entry); + + if (this.started && !this.options.horizontal && this.options.stacked) { + this.entries = result.feed.entries; + } else { + this.createListEntries_(resultIndex, this.nodes.list); + } + this.displayEntries_(); +} + +/** + * Set the Title to just plaintext + * @private + */ +GFdynamicFeedControl.prototype.setPlainTitle_ = function(title, opt_element) { + var el = opt_element || this.nodes.title; + el.innerHTML = title; +} + +/** + * Set the Title + * @private + */ +GFdynamicFeedControl.prototype.setTitle_ = function(resultFeed, opt_element) { + var el = opt_element || this.nodes.title; + this.clearNode_(el); + var link = document.createElement('a'); + link.target = google.feeds.LINK_TARGET_BLANK; + link.href = resultFeed.link; + link.className = 'gfg-collapse-href'; + link.innerHTML = resultFeed.title; + el.appendChild(link); +} + +GFdynamicFeedControl.prototype.toggleCollapse = function(feedControl, + listReference, + collapseLink) { + return function() { + var els = feedControl.collapseElements; + for (var i=0; i < els.length; i++) { + var el = els[i]; + el.list.style.display = 'none'; + el.collapse.className = 'gfg-collapse-closed'; + } + listReference.style.display = 'block'; + collapseLink.className = 'gfg-collapse-open'; + } +} + +/** + * Create the list Entries + * @private + */ +GFdynamicFeedControl.prototype.createListEntries_ = function(resultIndex, node) { + var entries = this.results[resultIndex].feed.entries; + this.clearNode_(node); + for (var i = 0; i < entries.length; i++) { + this.feedControl.createHtml(entries[i]); + var className = 'gfg-listentry '; + className += (i%2)?'gfg-listentry-even':'gfg-listentry-odd'; + var listEntry = this.createDiv_(className); + var link = this.createLink_(entries[i].link, + entries[i].title, + this.options.linkTarget); + listEntry.appendChild(link); + if (this.options.pauseOnHover) { + listEntry.onmouseover = this.bind_(this.listMouseOver_, resultIndex, i); + listEntry.onmouseout = this.bind_(this.listMouseOut_, resultIndex, i); + } + entries[i].listEntry = listEntry; + node.appendChild(listEntry); + } + if (node == this.nodes.list) { + this.entries = entries; + } +} + +/** + * Begin to display the entries. + * @private + */ +GFdynamicFeedControl.prototype.displayEntries_ = function() { + this.entryIndex = 0; + this.displayCurrentEntry_(); + this.setDisplayTimer_(); + this.started = true; +} + +/** + * Display next entry. + * @private + */ +GFdynamicFeedControl.prototype.displayNextEntry_ = function() { + // Check to see if we have been orphaned and need to cleanup.. + if (this.options.autoCleanup && this.isOrphaned_()) { + this.cleanup_(); + return; + } + + if (++this.entryIndex >= this.entries.length) { + // End of list, see if we should rotate feeds.. + if (this.results.length > 1) { + if (++this.resultIndex >= this.results.length) { + this.resultIndex = 0; + } + this.displayResult_(this.resultIndex); + return; + } else { + this.entryIndex = 0; + } + } + + if (this.options.transitionCallback) { + this.options.transitionCallback(this.entries[this.entryIndex]); + } + this.displayCurrentEntry_(); + this.setDisplayTimer_(); +} + +/** + * Display current entry. + * @private + */ +GFdynamicFeedControl.prototype.displayCurrentEntry_ = function() { + this.clearNode_(this.nodes.entry); + this.current = this.entries[this.entryIndex].html; + this.current.style.top = '0px'; + this.nodes.entry.appendChild(this.current); + this.createOverlay_(); + + // Expand the blog who's post is being displayed + if(this.options.collapseable) { + var feedTitle = null; + + for (var i=0; i < this.results.length; i++) { + if(this.results[i].feed.entries == this.entries) { + feedTitle = this.results[i].feed.title; + } + } + + var els = this.collapseElements; + + for (var i=0; i < els.length; i++) { + var el = els[i]; + var divfeedTitle = el.collapse.previousSibling.innerHTML; + var expandClicker = el.collapse; + if(feedTitle == divfeedTitle) { + if(this.ie) { + expandClicker.click(); + } else { + expandClicker.onclick(); + } + + } + } + } + + if (this.currentList) { + var className = 'gfg-listentry '; + className += (this.currentListIndex%2)? + 'gfg-listentry-even':'gfg-listentry-odd'; + this.currentList.className = className; + } + this.currentList = this.entries[this.entryIndex].listEntry; + this.currentListIndex = this.entryIndex; + var className = 'gfg-listentry gfg-listentry-highlight '; + className += (this.currentListIndex%2)? + 'gfg-listentry-even':'gfg-listentry-odd'; + this.currentList.className = className; +} + +/** + * Simulated mouse hover events for list entries. + * @private + */ +GFdynamicFeedControl.prototype.listMouseHover_ = function(resultIndex, + listIndex) { + var result = this.results[resultIndex]; + var listEntry = result.feed.entries[listIndex].listEntry; + listEntry.selectTimer = null; + this.clearTransitionTimer_(); + this.clearDisplayTimer_(); + this.resultIndex = resultIndex; + this.entries = result.feed.entries; + this.entryIndex = listIndex; + this.displayCurrentEntry_(); +} + +/** + * Mouse over events for list entries. + * @private + */ +GFdynamicFeedControl.prototype.listMouseOver_ = function(resultIndex, + listIndex) { + var result = this.results[resultIndex]; + var listEntry = result.feed.entries[listIndex].listEntry; + var cb = this.bind_(this.listMouseHover_, resultIndex, listIndex); + listEntry.selectTimer = setTimeout(cb, this.options.hoverTime); +} + +/** + * Mouse out events for list entries. + * @private + */ +GFdynamicFeedControl.prototype.listMouseOut_ = function(resultIndex, listIndex) { + var result = this.results[resultIndex]; + var listEntry = result.feed.entries[listIndex].listEntry; + if (listEntry.selectTimer) { + clearTimeout(listEntry.selectTimer); + listEntry.selectTimer = null; + } else { + this.setDisplayTimer_(); + } +} + +/** + * Mouse over events for main entry. + * @private + */ +GFdynamicFeedControl.prototype.entryMouseOver_ = function(e) { + this.clearDisplayTimer_(); + if (this.transitionTimer) { + this.clearTransitionTimer_(); + this.displayCurrentEntry_(); + } +} + +/** + * Mouse out events for main entry. + * @private + */ +GFdynamicFeedControl.prototype.entryMouseOut_ = function(e) { + this.setDisplayTimer_(); +} + +/** + * Create the overlay div. This hack is for IE and transparency effects. + * @private + */ +GFdynamicFeedControl.prototype.createOverlay_ = function() { + if (this.current == null) return; + // Create div lazily and hold on to it.. + if (this.overlay == null) { + var overlay = this.createDiv_('gfg-entry'); + overlay.style.position = 'absolute'; + overlay.style.top = '0px'; + overlay.style.left = '0px'; + this.overlay = overlay; + } + this.setOpacity_(this.overlay, 0); + this.nodes.entry.appendChild(this.overlay); +} + +/** + * Sets the display timer. + * @private + */ +GFdynamicFeedControl.prototype.setDisplayTimer_ = function() { + if (this.displayTimer) { + this.clearDisplayTimer_(); + } + var cb = this.bind_(this.setFadeOutTimer_); + this.displayTimer = setTimeout(cb, this.options.displayTime); +}; + +/** + * Class helper method for the time now in milliseconds + * @private + */ +GFdynamicFeedControl.timeNow = function() { + var d = new Date(); + return d.getTime(); +}; + +/** + * Transition animation for fadeout. Cleanup when finished. + * @private + */ +GFdynamicFeedControl.prototype.fadeOutEntry_ = function() { + if (this.overlay) { + var delta = this.fadeOutDelta; + var ts = this.options.transitionStep; + var now = GFdynamicFeedControl.timeNow(); + var tick = now - this.lastTick; + this.lastTick = now; + delta *= (tick/ts); + + var op = this.overlay.opacity + delta; + // Overlay opacity + this.setOpacity_(this.overlay, op); + // Scroll down + if (this.options.scrollOnFadeOut && (op > .5)) { + var r = (op-.5)*2; + var newTop = Math.round(this.current.offsetHeight * r); + this.current.style.top = newTop + 'px'; + } + if (op < 1) return; + } + // Finished. + this.clearTransitionTimer_(); + this.displayNextEntry_(); +}; + +/** + * Sets the transition timer for fadeout. + * @private + */ +GFdynamicFeedControl.prototype.setFadeOutTimer_ = function() { + this.clearTransitionTimer_(); + this.lastTick = GFdynamicFeedControl.timeNow(); + var cb = this.bind_(this.fadeOutEntry_); + this.transitionTimer = setInterval(cb, this.options.transitionStep); +}; + +/** + * Clear the transition timer. Used to prevent leaks. + * @private + */ +GFdynamicFeedControl.prototype.clearTransitionTimer_ = function() { + if (this.transitionTimer) { + clearInterval(this.transitionTimer); + this.transitionTimer = null; + } +}; + +/** + * Clear the display timer. + * @private + */ +GFdynamicFeedControl.prototype.clearDisplayTimer_ = function() { + if (this.displayTimer) { + clearTimeout(this.displayTimer); + this.displayTimer = null; + } +}; + +/** + * Setup our own subcontainer to the user supplied container. + * @private + */ +GFdynamicFeedControl.prototype.createSubContainers_ = function() { + var nodes = this.nodes; + var container = this.nodes.container; + + this.clearNode_(container); + if (this.options.horizontal) { + container = this.createDiv_('gfg-horizontal-container'); + nodes.root = this.createDiv_('gfg-horizontal-root'); + this.nodes.container.appendChild(container); + } else { + nodes.root = this.createDiv_('gfg-root'); + } + nodes.title = this.createDiv_('gfg-title'); + nodes.entry = this.createDiv_('gfg-entry'); + nodes.list = this.createDiv_('gfg-list'); + nodes.root.appendChild(nodes.title); + nodes.root.appendChild(nodes.entry); + + if (!this.options.horizontal && this.options.stacked) { + var newTitle = this.createDiv_('gfg-subtitle'); + nodes.root.appendChild(newTitle); + this.setTitle_(this.results[0].feed, newTitle); + + if(this.options.collapseable) { + var collapseLink = document.createElement('div'); + collapseLink.className = 'gfg-collapse-open'; + newTitle.appendChild(collapseLink); + collapseLink.onclick = this.toggleCollapse(this, nodes.list, collapseLink); + this.collapseElements.push({ + list : nodes.list, + collapse : collapseLink + }); + nodes.list.style.display = 'block'; + } + + var clearFloat = document.createElement('div'); + clearFloat.className = 'clearFloat'; + newTitle.appendChild(clearFloat); + } + + nodes.root.appendChild(nodes.list); + container.appendChild(nodes.root); + + if (this.options.pauseOnHover) { + nodes.entry.onmouseover = this.bind_(this.entryMouseOver_); + nodes.entry.onmouseout = this.bind_(this.entryMouseOut_); + } + + // Add Branding. + if (this.options.horizontal) { + nodes.branding = this.createDiv_('gfg-branding'); + google.feeds.getBranding(nodes.branding, google.feeds.VERTICAL_BRANDING); + container.appendChild(nodes.branding); + } +}; + +/** + * Helper method to properly clear a node and its children. + * @param {Object} node Node to clear. + * @private + */ +GFdynamicFeedControl.prototype.clearNode_ = function(node) { + if (node == null) return; + var child; + while ((child = node.firstChild)) { + node.removeChild(child); + } +}; + +/** + * Helper method to create a div with optional class and text. + * @param {string} opt_className Optional className for the div. + * @param {string} opt_text Optional text for the innerHTML. + * @private + */ +GFdynamicFeedControl.prototype.createDiv_ = function(opt_className, opt_text) { + var el = document.createElement("div"); + if (opt_text) { + el.innerHTML = opt_text; + } + if (opt_className) { el.className = opt_className; } + return el; +}; + +/** + * Helper method to create a link with href and text. + * @param {string} href Href URL + * @param {string} text text for the link. + * @param {string} opt_target Optional link target. + * @private + */ +GFdynamicFeedControl.prototype.createLink_ = function(href, text, opt_target) { + var link = document.createElement('a'); + link.href = href; + link.innerHTML = text; + if (opt_target) { + link.target = opt_target; + } + return link; +}; + +/** + * Cleanup results on being orphaned. + * @private + */ +GFdynamicFeedControl.prototype.clearResults_ = function() { + for (var i=0; i < this.results.length; i++) { + var result = this.results[i]; + var entries = result.feed.entries; + for (var i = 0; i < entries.length; i++) { + var entry = entries[i]; + entry.html = null; + entry.listEntry.onmouseover = null; + entry.listEntry.onmouseout = null; + if (entry.listEntry.selectTimer) { + clearTimeout(entry.listEntry.selectTimer); + entry.listEntry.selectTimer = null; + } + entry.listEntry = null; + } + } +} + +/** + * Check for being orphaned. + * @private + */ +GFdynamicFeedControl.prototype.isOrphaned_ = function() { + var root = this.nodes.root; + var orphaned = false; + if (!root || !root.parentNode) { + orphaned = true; + } else if (this.options.horizontal && !root.parentNode.parentNode) { + orphaned = true; + } + return orphaned; +} + +/** + * Cleanup on being orphaned. + * @private + */ +GFdynamicFeedControl.prototype.cleanup_ = function() { + this.started = false; + // Timer Events. + this.clearDisplayTimer_(); + this.clearTransitionTimer_(); + // Structures + this.clearResults_(); + // Nodes + this.clearNode_(this.nodes.root); + this.nodes.container = null; +} + +/** + * Helper method to set opacity for nodes.. Also takes into account + * visibility in general. + * @param {Element} node element. + * @param {Number} opacity alpha level. + * @private + */ +GFdynamicFeedControl.prototype.setOpacity_ = function(node, opacity) { + if (node == null) return; + opacity = Math.max(0, Math.min(1, opacity)); + if (opacity == 0) { + if (node.style.visibility != 'hidden') { + node.style.visibility = 'hidden'; + } + } else { + if (node.style.visibility != 'visible') { + node.style.visibility = 'visible'; + } + } + if (this.ie) { + var normalized = Math.round(opacity*100); + node.style.filter = 'alpha(opacity=' + normalized + ')'; + } + node.style.opacity = node.opacity = opacity; +}; + +GFgadget = GFdynamicFeedControl; + diff --git a/SYSPROG/STPROCINS/RTI_IDE_HTML_GOOGLE_DYNAMICFEED_CSS.txt b/SYSPROG/STPROCINS/RTI_IDE_HTML_GOOGLE_DYNAMICFEED_CSS.txt new file mode 100644 index 0000000..60c8183 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_HTML_GOOGLE_DYNAMICFEED_CSS.txt @@ -0,0 +1,237 @@ +compile insert RTi_IDE_HTML_GOOGLE_DYNAMICFEED_CSS +.gfg-root { + width : 100%; + height : auto; + position : relative; + overflow : hidden; + text-align : center; + font-family: "Arial", sans-serif; + font-size: 12px; + border: 1px solid #BCCDF0; +} + +.gfg-title { + font-size: 14px; + font-weight : bold; + color : #3366cc; + background-color: #E5ECF9; + line-height : 1.4em; + overflow : hidden; + white-space : nowrap; +} + +.gfg-title a { + color : #3366cc; +} + +.gfg-subtitle { + font-size: 12px; + font-weight : bold; + color : #3366cc; + background-color: #E5ECF9; + line-height : 1.4em; + overflow : hidden; + white-space : nowrap; + margin-bottom : 5px; +} + +.gfg-subtitle a { + color : #3366cc; +} + +.gfg-entry { + background-color : white; + width : 100%; + height : 6.9em; + position : relative; + overflow : hidden; + text-align : left; + margin-top : 3px; +} + +/* To allow correct behavior for overlay */ +.gfg-root .gfg-entry .gf-result { + position : relative; + background-color : white; + width : auto; + height : 100%; + padding-left : 20px; + padding-right : 5px; +} + +.gfg-list { + position : relative; + overflow : hidden; + text-align : left; + margin-bottom : 5px; +} + +.gfg-listentry { + line-height : 1.5em; + overflow : hidden; + white-space : nowrap; + text-overflow : ellipsis; + -o-text-overflow : ellipsis; + padding-left : 15px; + padding-right : 5px; + margin-left : 5px; + margin-right : 5px; +} + +.gfg-listentry-odd { + background-color : #F6F6F6; +} + +.gfg-listentry-even { +} + +.gfg-listentry-highlight { + background-image : url('garrow.gif'); + background-repeat: no-repeat; + background-position : center left; +} + +/* + * FeedControl customizations. + */ + +.gfg-root .gfg-entry .gf-result .gf-title { + font-size: 14px; + line-height : 1.2em; + overflow : hidden; + white-space : nowrap; + text-overflow : ellipsis; + -o-text-overflow : ellipsis; + margin-bottom : 2px; +} + +.gfg-root .gfg-entry .gf-result .gf-snippet { + height : 3.8em; + color: #000000; + margin-top : 3px; +} + +/* + * Easy way to get horizontal mode, applicable via js options to gadget. + */ + +.gfg-horizontal-container { + position : relative; +} + +.gfg-horizontal-root { + height : 1.5em; + _height : 100%; + position : relative; + white-space : nowrap; + overflow : hidden; + text-align : center; + font-family: "Arial", sans-serif; + font-size: 13px; + border: 1px solid #AAAAAA; + padding : 5px; + margin-right : 80px; +} + +.gfg-horizontal-root .gfg-title { + font-weight : bold; + background-color: #FFFFFF; + line-height : 1.5em; + overflow : hidden; + white-space : nowrap; + float : left; + padding-left : 10px; + padding-right : 12px; + border-right: 1px solid #AAAAAA; +} + +.gfg-horizontal-root .gfg-title a { + color : #444444; + text-decoration : none; +} + +.gfg-horizontal-root .gfg-entry { + width : auto; + height : 1.5em; + position : relative; + overflow : hidden; + text-align : left; + margin-top : 0px; + margin-left : 0px; + padding-left : 10px; +} + +/* To allow correct behavior for overlay */ +.gfg-horizontal-root .gfg-entry .gf-result { + position : relative; + background-color : white; + width : 100%; + height : 100%; + line-height : 1.5em; + overflow : hidden; + white-space : nowrap; +} + +.gfg-horizontal-root .gfg-list { + display : none; +} + +/* + * FeedControl customizations. + */ + +.gfg-horizontal-root .gfg-entry .gf-result .gf-snippet, +.gfg-horizontal-root .gfg-entry .gf-result .gf-author { + display : none; +} + +.gfg-horizontal-root .gfg-entry .gf-result .gf-title { + color: #0000cc; + margin-right : 3px; + float : left; +} + +.gfg-horizontal-root .gfg-entry .gf-result .gf-spacer { + float : left; +} + +.gfg-horizontal-root .gfg-entry .gf-result .gf-spacer, +.gfg-horizontal-root .gfg-entry .gf-result .gf-relativePublishedDate { + display : block; + color: #AAAAAA; +} + +.gfg-branding { + white-space : nowrap; + overflow : hidden; + text-align : left; + position : absolute; + right : 0px; + top : 0px; + width : 80px; +} + +.gfg-collapse-open, .gfg-collapse-closed { + background-repeat : no-repeat; + background-position : center; + cursor : pointer; + float : right; + width : 17px; + height : 20px; +} + +.gfg-collapse-open { + background-image : url('arrow_open.gif'); +} + +.gfg-collapse-closed { + background-image : url('arrow_close.gif'); +} + +.gfg-collapse-href { + float : left; +} + +.clearFloat { + clear : both; +} diff --git a/SYSPROG/STPROCINS/RTI_IDE_HTML_GOOGLE_JSAPI.txt b/SYSPROG/STPROCINS/RTI_IDE_HTML_GOOGLE_JSAPI.txt new file mode 100644 index 0000000..792d855 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_HTML_GOOGLE_JSAPI.txt @@ -0,0 +1,41 @@ +compile insert RTI_IDE_HTML_GOOGLE_JSAPI +if(!window['googleLT_']){window['googleLT_']=(new Date()).getTime();}if (!window['google']) { +window['google'] = {}; +} +if (!window['google']['loader']) { +window['google']['loader'] = {}; +google.loader.ServiceBase = 'http://www.google.com/uds'; +google.loader.GoogleApisBase = 'http://ajax.googleapis.com/ajax'; +google.loader.ApiKey = 'notsupplied'; +google.loader.KeyVerified = true; +google.loader.LoadFailure = false; +google.loader.Secure = false; +google.loader.GoogleLocale = 'www.google.com'; +google.loader.ClientLocation = null; +google.loader.AdditionalParams = ''; +(function() {var d=encodeURIComponent,g=window,h=document;function l(a,b){return a.load=b}var m="push",n="replace",q="charAt",r="indexOf",t="ServiceBase",u="name",v="getTime",w="length",x="prototype",y="setTimeout",z="loader",A="substring",B="join",C="toLowerCase";function D(a){return a in E?E[a]:E[a]=-1!=navigator.userAgent[C]()[r](a)}var E={};function F(a,b){var c=function(){};c.prototype=b[x];a.U=b[x];a.prototype=new c} +function G(a,b,c){var e=Array[x].slice.call(arguments,2)||[];return function(){return a.apply(b,e.concat(Array[x].slice.call(arguments)))}}function H(a){a=Error(a);a.toString=function(){return this.message};return a}function I(a,b){for(var c=a.split(/\./),e=g,f=0;f\x3c/script>"):(D("safari")||D("konqueror"))&&g[y](S,10)),O[m](a)):P(g,"load",a)};K("google.setOnLoadCallback",google.T); +function P(a,b,c){if(a.addEventListener)a.addEventListener(b,c,!1);else if(a.attachEvent)a.attachEvent("on"+b,c);else{var e=a["on"+b];a["on"+b]=null!=e?aa([c,e]):c}}function aa(a){return function(){for(var b=0;b\x3c/script>'):"css"==a&&h.write('')}; +K("google.loader.writeLoadTag",google[z].d);google[z].Q=function(a){N=a};K("google.loader.rfm",google[z].Q);google[z].S=function(a){for(var b in a)"string"==typeof b&&b&&":"==b[q](0)&&!M[b]&&(M[b]=new T(b[A](1),a[b]))};K("google.loader.rpl",google[z].S);google[z].R=function(a){if((a=a.specs)&&a[w])for(var b=0;b Dialog Window Caption + * // <2> Dialog Title + * // <3> Dialog Message + * // <4> Show Tree-Delete + * // <5> X Pos ( Same as Msg() ) + * // <6> Y Pos ( Same as Msg() ) + * // <7> Tree-Delete Text + + equ MSGDELWARN_CREATEPARAM_CAPTION$ to 1 + equ MSGDELWARN_CREATEPARAM_TITLE$ to 2 + equ MSGDELWARN_CREATEPARAM_MESSAGE$ to 3 + equ MSGDELWARN_CREATEPARAM_SHOWTREEDEL$ to 4 + equ MSGDELWARN_CREATEPARAM_X$ to 5 + equ MSGDELWARN_CREATEPARAM_Y$ to 6 + equ MSGDELWARN_CREATEPARAM_TREEDELTEXT$ to 7 + + +/////////////////////////////////////////////////////////////////////////////// + + * // Return Value + + equ MSGDELWARN_RETVAL_DELETE$ to 1 + equ MSGDELWARN_RETVAL_TREEDELETE$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/RTI_IDE_MSG_OVERWRITEWARN_EQUATES.txt b/SYSPROG/STPROCINS/RTI_IDE_MSG_OVERWRITEWARN_EQUATES.txt new file mode 100644 index 0000000..759059c --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_MSG_OVERWRITEWARN_EQUATES.txt @@ -0,0 +1,54 @@ +compile insert rti_IDE_Msg_OverWriteWarn_Equates +/* + ** Copyright (C) 2012-2016 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : January 2015 + Purpose : Equates for use with the RTI_IDE_MSG_OVERWRITEWARN dialog + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_IDE_MSG_OVERWRITEWARN_EQUATES_ +#define _RTI_IDE_MSG_OVERWRITEWARN_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // CREATE method CreateParam equates + * // + * // <1> Dialog Window Caption + * // <2> Dialog Title + * // <3> Dialog Message + * // <4> X Pos ( Same as Msg() ) + * // <5> Y Pos ( Same as Msg() ) + + equ MSGOVWWARN_CREATEPARAM_CAPTION$ to 1 + equ MSGOVWWARN_CREATEPARAM_TITLE$ to 2 + equ MSGOVWWARN_CREATEPARAM_MESSAGE$ to 3 + equ MSGOVWWARN_CREATEPARAM_X$ to 4 + equ MSGOVWWARN_CREATEPARAM_Y$ to 5 + +/////////////////////////////////////////////////////////////////////////////// + + * // Return Value + + equ MSGOVWWARN_RETVAL_OVERWRITE$ to 1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/RTI_IDE_NEW_EQUATES.txt b/SYSPROG/STPROCINS/RTI_IDE_NEW_EQUATES.txt new file mode 100644 index 0000000..ef6f5af --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_NEW_EQUATES.txt @@ -0,0 +1,86 @@ +compile insert rti_IDE_New_Equates +/* + ** Copyright (C) 2012-2016 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : 15 March 2016 + Purpose : Equates for use with the RTI_IDE_NEW dialog + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 01 Oct 17 Added createParam equates +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_IDE_NEW_EQUATES_ +#define _RTI_IDE_NEW_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ IDE_NEW_UDP_FAMILYINFO$ to "@_$$_IDENEW_FAMILYINFO" ; // SYSTEM + equ IDE_NEW_UDP_CREATEOK$ to "@_$$_IDEOPEN_CREATEOK" ; // @window + equ IDE_NEW_UDP_REFRESHINFO$ to "@_$$_IDEOPEN_REFRESHINFO" ; // bzs 052217 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CreateParam + // + // <1> m'd list of specific FAMILY IDs to load + // <2> @vm'd list of TYPE IDs to load + // <3> @vm/@svm'd list of CLASS IDs to load + // + // <2> and <3> form an AMV and are mutually exclusive with <1>, which takes + // preference. + + equ IDE_NEW_CP_POS_FAMILYIDS$ to 1 + equ IDE_NEW_CP_POS_TYPEIDS$ to 2 + equ IDE_NEW_CP_POS_CLASSIDS$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Cached type information structure (IDE_NEW_UDP_FAMILYINFO$) + // + // <1> @vm'd list of family IDs + // <2> @vm'd list of family descriptions + // <3> @vm'd list of family image info (@svm/@tm delimited) + // <4> @vm'd list of family APPNOTE IDs + // <5> @vm/@svm'd list of type/class IDs + // <6> @vm/@svm'd list of type/class descriptions + // <7> @vm/@svm'd list of type/class image info (@tm/@stm delimited) + // <8> @vm/@svm'd list of type/class DSN IDs + // <9> @vm/@svm'd list of type/class APPNOTE IDs + // <10> @vm/@svm'd list of type/class New tokens + // <11> @vm list of boolean show flags + + equ IDE_NEW_FAM_ID$ to 1 + equ IDE_NEW_FAM_DESC$ to 2 + equ IDE_NEW_FAM_IMAGEINFO$ to 3 + equ IDE_NEW_FAM_APPNOTE_ID$ to 4 + equ IDE_NEW_FAM_TC_ID$ to 5 + equ IDE_NEW_FAM_TC_DESC$ to 6 + equ IDE_NEW_FAM_TC_IMAGEINFO$ to 7 + equ IDE_NEW_FAM_TC_DSN_ID$ to 8 + equ IDE_NEW_FAM_TC_APPNOTE_ID$ to 9 + equ IDE_NEW_FAM_TC_NEW_TOKEN$ to 10 + equ IDE_NEW_FAM_TC_SHOW$ to 11 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + + + + + diff --git a/SYSPROG/STPROCINS/RTI_IDE_OPEN_EQUATES.txt b/SYSPROG/STPROCINS/RTI_IDE_OPEN_EQUATES.txt new file mode 100644 index 0000000..8e2988f --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_OPEN_EQUATES.txt @@ -0,0 +1,156 @@ +compile insert rti_IDE_Open_Equates +/* + ** Copyright (C) 2012-2019 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : February 2016 + Purpose : Equates for use with the RTI_IDE_OPEN dialog + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 06 Feb 19 Added "New Item" create params + Mr C 14 Sep 16 Added None-Selected flag + Mr C 04 May 16 Clarified parent scale units for positioning + Mr C 16 Apr 16 Added positioning params + djh 14 Apr 16 Added IDE_OPN_CREATEPARAM_PROPGRID$ and + IDE_OPN_CREATEPARAM_PROPNAME$ for use with property + grid + Mr C 11 Feb 16 Added IDE_OPN_UDP_CLASSINFO$ and related constants + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_IDE_OPEN_EQUATES_ +#define _RTI_IDE_OPEN_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ IDE_OPN_UDP_CREATEPARAM$ to "@_$$_IDEOPEN_CREATEPARAM" ; // @window + equ IDE_OPN_UDP_CREATEOK$ to "@_$$_IDEOPEN_CREATEOK" ; // @window + equ IDE_OPN_UDP_TYPEINFO$ to "@_$$_IDEOPEN_TYPEINFO" ; // SYSTEM + equ IDE_OPN_UDP_CLASSINFO$ to "@_$$_IDEOPEN_CLASSINFO" ; // SYSTEM + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Icons + equ IDE_OPN_ICO_OPEN$ to "RTI_IDE_OPEN" + equ IDE_OPN_ICO_SAVE$ to "RTI_IDE_OPEN_SAVE" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ IDE_OPN_CTRLSPACING$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CREATE event CreateParam equates + // + // <1> Type ID to load - leave blank for all types + // <2> Class ID to load - leave blank for all types + // <3> Entity ID to load - only valid of one type/class is specified + // <4> Save Mode - If TRUE$ then the dialog is acting in "Save Mode" + // and Type ID and Class ID are required + // <5> xPos - X position to use for display + // <6> yPos - Y position to use for display + // <7> None-Selected flag - If TRUE$ then show the non-selected flag + // <8> Dialog Title - Title to display in the dialog + // <9> New Item Text - Text for the "New Item" item + // <10> New Item ID - Token for the caller to recognise a "New Item" + // item; defaults to "" + + + equ IDE_OPN_CREATEPARAM_TYPEID$ to 1 ; // can be @vm delimited + equ IDE_OPN_CREATEPARAM_CLASSID$ to 2 ; // can be @vm delimited + equ IDE_OPN_CREATEPARAM_ENTITYID$ to 3 + equ IDE_OPN_CREATEPARAM_MODE$ to 4 + equ IDE_OPN_CREATEPARAM_XPOS$ to 5 + equ IDE_OPN_CREATEPARAM_YPOS$ to 6 + equ IDE_OPN_CREATEPARAM_NONSEL$ to 7 + equ IDE_OPN_CREATEPARAM_TITLE$ to 8 + equ IDE_OPN_CREATEPARAM_NEWITEMTEXTID$ to 9 + equ IDE_OPN_CREATEPARAM_NEWITEMID$ to 10 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // IDE_OPN_CREATEPARAM_XPOS$ constants - @vm positions + equ IDE_OPN_XPOS_VALUE$ to 1 ; // In parent scale units + equ IDE_OPN_XPOS_ALIGNR$ to 2 ; // TRUE$ if xpos is right-align + equ IDE_OPN_XPOS_SCREEN$ to 3 ; // TRUE$ if xpos is screen X + + // IDE_OPN_CREATEPARAM_YPOS$ constants - @vm positions + equ IDE_OPN_YPOS_VALUE$ to 1 ; // In parent scale units + equ IDE_OPN_YPOS_ALIGNB$ to 2 ; // TRUE$ if yPos is bottom-align + equ IDE_OPN_YPOS_SCREEN$ to 3 ; // TRUE$ if yPos is screen Y + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ IDE_OPN_NONSEL_TOKEN$ to "" + equ IDE_OPN_NEWITEM_TOKEN$ to "" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Cached type information structure (IDE_OPEN_UDP_TYPEINFO$) + // + // <1> @vm'd list of type IDs + // <2> @vm'd list of type image info (@svm/@tm delimited) + // <3> @vm'd list of type DSN IDs + // <4> @vm'd list of type descriptions + // <5> @vm'd list of class flags + + equ IDE_OPN_TI_ID$ to 1 + equ IDE_OPN_TI_IMAGEINFO$ to 2 + equ IDE_OPN_TI_DSNID$ to 3 + equ IDE_OPN_TI_DESC$ to 4 + equ IDE_OPN_TI_CLASSFLAG$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Cached type information structure (IDE_OPEN_UDP_CLASSINFO$) + // + // <1> @vm'd list of class IDs + // <2> @vm'd list of class image info (@svm/@tm delimited) + // <3> @vm'd list of class DSN IDs + // <4> @vm'd list of class descriptions + + equ IDE_OPN_CI_ID$ to 1 + equ IDE_OPN_CI_IMAGEINFO$ to 2 + equ IDE_OPN_CI_DSNID$ to 3 + equ IDE_OPN_CI_DESC$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Cached info stored in the VALUE property for each TYPE in LST_TYPEID + // + // <0,1> TypeID + // <0,2> DSN ID + // <0,3> Class Flag + + equ IDE_OPN_TV_TYPEID$ to 1 + equ IDE_OPN_TV_DSNID$ to 2 + equ IDE_OPN_TV_CLASSFLAG$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + + + + + diff --git a/SYSPROG/STPROCINS/RTI_IDE_OPEN_RECORD_EQUATES.txt b/SYSPROG/STPROCINS/RTI_IDE_OPEN_RECORD_EQUATES.txt new file mode 100644 index 0000000..a91cc2c --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_OPEN_RECORD_EQUATES.txt @@ -0,0 +1,107 @@ +compile insert rti_IDE_Open_Record_Equates +/* + ** Copyright (C) 2012-2017 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : March 2016 + Purpose : Equates for use with the RTI_IDE_OPEN_RECORD dialog + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + mtr 12 Oct 17 Added ODE_OPNREC_WARNTHRESHOLD$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_IDE_OPEN_RECORD_EQUATES_ +#define _RTI_IDE_OPEN_RECORD_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ ODE_OPNREC_PROGRESSTHRESHOLD$ to 500 + equ ODE_OPNREC_YIELDTHRESHOLD$ to 50 + equ ODE_OPNREC_WARNTHRESHOLD$ to 50000 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // UDPs + equ IDE_OPNREC_UDP_CREATEPARAM$ to "@_$$_IDEOPENREC_CREATEPARAM" ; // @window + equ IDE_OPNREC_UDP_CREATEOK$ to "@_$$_IDEOPENREC_CREATEOK" ; // @window + equ IDE_OPNREC_UDP_CACHEINFO$ to "@_$$_IDEOPENREC_CACHEINFO" ; // SYSTEM + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Icons + equ IDE_OPNREC_ICO_OPEN$ to "RTI_IDE_OPEN_RECORD" + equ IDE_OPNREC_ICO_SAVE$ to "RTI_IDE_OPEN_RECORD_SAVE" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CREATE event CreateParam equates + // + // <1> Mode - FALSE$ for "Open", TRUE$ for "Save" + // <2> Table ID - Table name to pre-select + // <3> Record ID - Record name to pre-select + // <4> NoMulti - TRUE$ to disable multiselect mode + // <5> xPos - X position to use for display + // <6> yPos - Y position to use for display + // <7> Dialog title - Text to put in the dialog caption bar + // <8> MustExistFlag - If TRUE$ then only allow selection of preexisting + // records (this is the default for open) + + equ IDE_OPNREC_CREATEPARAM_MODE$ to 1 + equ IDE_OPNREC_CREATEPARAM_TABLEID$ to 2 + equ IDE_OPNREC_CREATEPARAM_RECORDID$ to 3 + equ IDE_OPNREC_CREATEPARAM_NOMULTISEL$ to 4 + equ IDE_OPNREC_CREATEPARAM_XPOS$ to 5 + equ IDE_OPNREC_CREATEPARAM_YPOS$ to 6 + equ IDE_OPNREC_CREATEPARAM_TITLE$ to 7 + equ IDE_OPNREC_CREATEPARAM_EXISTSFLAG$ to 8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // IDE_OPNREC_CREATEPARAM_XPOS$ constants - @vm positions + equ IDE_OPNREC_XPOS_VALUE$ to 1 ; // In parent scale units + equ IDE_OPNREC_XPOS_ALIGNR$ to 2 ; // TRUE$ if xpos is right-align + equ IDE_OPNREC_XPOS_SCREEN$ to 3 ; // TRUE$ if xpos is screen X + + // IDE_OPNREC_CREATEPARAM_YPOS$ constants - @vm positions + equ IDE_OPNREC_YPOS_VALUE$ to 1 ; // In parent scale units + equ IDE_OPNREC_YPOS_ALIGNB$ to 2 ; // TRUE$ if yPos is bottom-align + equ IDE_OPNREC_YPOS_SCREEN$ to 3 ; // TRUE$ if yPos is screen Y + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // RTI_IDE_CFG constants + // + // An array of persitent data for the dialog is saved in the IDE config + // record as an MV'd list. + // + // <0,1> Show DICT tables + // <0,2> Show Index tables + // <0,3> Show System tables + // <0,4> Multi-Select mode + // <0,5> Mixed Case mode + + equ IDE_OPENREC_CFG_SHOWDICTTABLES$ to 1 + equ IDE_OPENREC_CFG_SHOWINDEXTABLES$ to 2 + equ IDE_OPENREC_CFG_SHOWSYSTEMTABLES$ to 3 + equ IDE_OPENREC_CFG_MULTISELECT$ to 4 + equ IDE_OPENREC_CFG_MIXEDCASE$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_IDE_PGO_IMAGE_EQUATES.txt b/SYSPROG/STPROCINS/RTI_IDE_PGO_IMAGE_EQUATES.txt new file mode 100644 index 0000000..3da1ed7 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_PGO_IMAGE_EQUATES.txt @@ -0,0 +1,123 @@ +compile insert rti_IDE_PGO_Image_Equates +/* + ** Copyright (C) 2012-2014 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : October 2014 + Purpose : Equates for use with the RTI_IDE_PGO_IMAGE dialog + + Comments + ======== + + ("PGO" == Property Grid Options) + + This dialog is used by the form designer to select and image for a control + and define it's properties. + + An image can support the following design time properties: + + ALIGN (optional) + AUTOSCALE + COLORKEY + COUNT (optional) + INDEX (optional) + OFFSET (optional) + ORIGIN (optional) + STYLE (optional) + TRANSLUCENCY (optional) + + So a set of flags (from PS_PROPERTY_TYPEINFO_EQUATES) is passed to denote + which properties should be shown. + + + Amended Date Reason + ======= ==== ====== + Mr C 17 Sep 17 Added PGOIMAGE_CREATEPARAM_MULTIMODE$ + Mr C 30 Dec 16 Added Async mode + Mr C 08 Sep 16 Added PGOIMAGE_CREATEPARAM_CLASSIDS$ + Mr C 19 Nov 14 Renamed image "NUMBER" properties to "INDEX" +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_IDE_PGO_IMAGE_EQUATES_ +#define _RTI_IDE_PGO_IMAGE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CREATE method CreateParam equates + // + // <1> "Parent" property grid ID + // <2> Property name that is being edited + // <3> Property Flags - flags from the property typeinfo that + // specify what properties can be edited. + // <4> ImageInfo (@vm delimited) + // <5> TRUE$ if the image cannot be changed. + // <6> List of CLASSIDs to load into the combo (@vm delimited) + // Defaults to all IMAGE classes. + // <7> TRUE$ to execute as a modeless/async dialog + // <8> TRUE$ to operate in "multi-mode" + + equ PGOIMAGE_CREATEPARAM_PROPGRID$ to 1 + equ PGOIMAGE_CREATEPARAM_PROPNAME$ to 2 + equ PGOIMAGE_CREATEPARAM_PROPFLAGS$ to 3 + equ PGOIMAGE_CREATEPARAM_IMAGEINFO$ to 4 + equ PGOIMAGE_CREATEPARAM_READONLY$ to 5 + equ PGOIMAGE_CREATEPARAM_CLASSIDS$ to 6 + equ PGOIMAGE_CREATEPARAM_ASYNC$ to 7 + equ PGOIMAGE_CREATEPARAM_MULTIMODE$ to 8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Some image types like ICON and CURSOR don't have any properties to + // apply, so in that case we hide the property grid. To specify this pass + // the following value in PGOIMAGE_CREATEPARAM_PROPFLAGS$ + + equ PGOIMAGE_FLAGS_HIDE_PROPERTIES$ to -1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Image Info structure - this is an @vm delimited array that is passed + // in the CREATE method and returned via End_Dialog() + + equ PGOIMAGE_INFO_TYPEID$ to 1 ; // Repos Type ID - IMAGE (default) or IMAGELIST + equ PGOIMAGE_INFO_CLASSID$ to 2 ; // Repos Class ID + equ PGOIMAGE_INFO_ENTITYID$ to 3 ; // Repos Entity ID + equ PGOIMAGE_INFO_ALIGN$ to 4 ; // ALIGN property + equ PGOIMAGE_INFO_AUTOSCALE$ to 5 ; // AUTOSCALE property + equ PGOIMAGE_INFO_COLORKEY$ to 6 ; // COLORKEY property + equ PGOIMAGE_INFO_COUNT$ to 7 ; // COUNT property + equ PGOIMAGE_INFO_INDEX$ to 8 ; // INDEX property + equ PGOIMAGE_INFO_OFFSET$ to 9 ; // OFFSET property (@svm delimited) + equ PGOIMAGE_INFO_ORIGIN$ to 10 ; // ORIGIN property (@svm delimited) + equ PGOIMAGE_INFO_STYLE$ to 11 ; // STYLE property + equ PGOIMAGE_INFO_TRANSLUCENCY$ to 12 ; // TRANSLUCENCY property + equ PGOIMAGE_INFO_WIDTH$ to 13 ; // Image Width property + equ PGOIMAGE_INFO_HEIGHT$ to 14 ; // Image Height property + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Valid character strings for properties + + equ PGOIMAGE_VALID_INT_CHARS$ to "0123456789-+" + equ PGOIMAGE_VALID_UINT_CHARS$ to "0123456789" + equ PGOIMAGE_VALID_XYPOS_CHARS$ to PGOIMAGE_VALID_INT_CHARS$ : "," + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ PGOIMAGE_RETVAL_NOIMAGE$ to "" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/RTI_IDE_PGO_STOPLIST_EQUATES.txt b/SYSPROG/STPROCINS/RTI_IDE_PGO_STOPLIST_EQUATES.txt new file mode 100644 index 0000000..28fc0ae --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_PGO_STOPLIST_EQUATES.txt @@ -0,0 +1,50 @@ +compile insert RTI_IDE_PGO_STOPLIST_EQUATES +/* + ** Copyright (C) 2012-2014 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : mtr + Date : March 2018 + Purpose : Equates for use with the RTI_IDE_PGO_STOPLIST dialog + + Comments + ======== + + ("PGO" == Property Grid Options) + + This dialog is used in the IDE Preferences to set the form designer control prefixes + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_IDE_PGO_STOPLIST_EQUATES_ +#define _RTI_IDE_PGO_STOPLIST_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // CREATE method CreateParam equates + * // + * // <1> "Parent" property grid ID + * // <2> Property name that is being edited + * // <3> The items in the list + * // <4> The delimiter for the items + + equ PGO_STOPLIST_CREATEPARAM_PROPGRID$ To 1 + equ PGO_STOPLIST_CREATEPARAM_PROPNAME$ To 2 + equ PGO_STOPLIST_CREATEPARAM_ITEMS$ To 3 + equ PGO_STOPLIST_CREATEPARAM_DELIMITER$ To 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/RTI_IDE_PGO_TEXTLINE_EQUATES.txt b/SYSPROG/STPROCINS/RTI_IDE_PGO_TEXTLINE_EQUATES.txt new file mode 100644 index 0000000..90ce38a --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_IDE_PGO_TEXTLINE_EQUATES.txt @@ -0,0 +1,72 @@ +compile insert rti_IDE_PGO_TEXTLINE_Equates +/* + ** Copyright (C) 2012-2016 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Mr C + Date : 16 Feb 2016 + Purpose : Equates for use with the RTI_IDE_PGO_TEXTLINE dialog + + Comments + ======== + + ("PGO" == Property Grid Options) + o + This dialog is used by the form designer to show extra text that doesn't fit + in the property grid + + It should return the text as entered. + + + Amended Date Reason + ======= ==== ====== + Mr C 21 Jul 22 Added PGOTEXTLINE_CREATEPARAM_MAXCHAR$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_IDE_PGO_TEXTLINE_EQUATES_ +#define _RTI_IDE_PGO_TEXTLINE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CREATE method CreateParam equates + // + // <1> "Parent" property grid ID + // <2> Property name that is being edited + // <3> The Text + // <4> If TRUE then the text should be read-only + // <5> VALIDCHARS property for the editline + // <6> TEXTCASE property for the editline + // <7> Cache ID - this dialog can cache it's client size for use with + // subsequent operations + // <8> Maximum number of chars that may be entered + + equ PGOTEXTLINE_CREATEPARAM_PROPGRID$ to 1 + equ PGOTEXTLINE_CREATEPARAM_PROPNAME$ to 2 + equ PGOTEXTLINE_CREATEPARAM_TEXT$ to 3 + equ PGOTEXTLINE_CREATEPARAM_READONLY$ to 4 + equ PGOTEXTLINE_CREATEPARAM_VALIDCHARS$ to 5 + equ PGOTEXTLINE_CREATEPARAM_TEXTCASE$ to 6 + equ PGOTEXTLINE_CREATEPARAM_CACHEID$ to 7 + equ PGOTEXTLINE_CREATEPARAM_MAXCHARS$ to 8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Cache structure + // + // <0,0,1> Client Width + // <0,0,2> Client Height + + equ PGOTEXTLINE_CACHEPOS_CLIENT_W$ to 1 + equ PGOTEXTLINE_CACHEPOS_CLIENT_H$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/RTI_JSDIFFLIB.txt b/SYSPROG/STPROCINS/RTI_JSDIFFLIB.txt new file mode 100644 index 0000000..4da660a --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_JSDIFFLIB.txt @@ -0,0 +1,423 @@ +compile Insert rti_jsdifflib +/*** +This is part of jsdifflib v1.0. + +Copyright (c) 2007, Snowtide Informatics Systems, Inc. +All rights reserved. + +Redistribution and use in source and binary forms, with or without modification, +are permitted provided that the following conditions are met: + + * Redistributions of source code must retain the above copyright notice, this + list of conditions and the following disclaimer. + * Redistributions in binary form must reproduce the above copyright notice, + this list of conditions and the following disclaimer in the documentation + and/or other materials provided with the distribution. + * Neither the name of the Snowtide Informatics Systems nor the names of its + contributors may be used to endorse or promote products derived from this + software without specific prior written permission. + +THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY +EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES +OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT +SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, +INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED +TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR +BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN +CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN +ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH +DAMAGE. +***/ +/* Author: Chas Emerick */ + +// Modified 081610 Revelation Software, Inc. - removed from difflib namespace, added doDiff function, changed to use named functions everywhere + + __whitespace = {" ":true, "\t":true, "\n":true, "\f":true, "\r":true}; + + function doDiff(left, right) { + + var a = stringAsLines(left), + b = stringAsLines(right), + c = new SequenceMatcher(a,b), + opcodes = c.get_opcodes(), + newStr = "", + iCnt = 0; + + // each element contains a tag and 4 values + // convert each element to @FM delimited and each piece within element to @VM delimited + for (iCnt = 0; iCnt < opcodes.length; iCnt++) { + newStr += opcodes[iCnt][0] + "\t" + opcodes[iCnt][1] + "\t" + opcodes[iCnt][2] + "\t" + opcodes[iCnt][3] + "\t" + opcodes[iCnt][4] + "*"; + } + return newStr; + + }; + + + + function defaultJunkFunction(c) { + return c in __whitespace; + }; + + + function stripLinebreaks(str) { return str.replace(/^[\n\r]*|[\n\r]*$/g, ""); }; + + function stringAsLines(str) { + var lfpos = str.indexOf("\n"); + var crpos = str.indexOf("\r"); + var linebreak = ((lfpos > -1 && crpos > -1) || crpos < 0) ? "\n" : "\r"; + + var lines = str.split(linebreak); + for (var i = 0; i < lines.length; i++) { + lines[i] = stripLinebreaks(lines[i]); + } + + return lines; + }; + + // iteration-based reduce implementation + function __reduce(func, list, initial) { + if (initial != null) { + var value = initial; + var idx = 0; + } else if (list) { + var value = list[0]; + var idx = 1; + } else { + return null; + } + + for (; idx < list.length; idx++) { + value = func(value, list[idx]); + } + + return value; + }; + + // comparison function for sorting lists of numeric tuples + function __ntuplecomp(a, b) { + var mlen = Math.max(a.length, b.length); + for (var i = 0; i < mlen; i++) { + if (a[i] < b[i]) return -1; + if (a[i] > b[i]) return 1; + } + + return a.length == b.length ? 0 : (a.length < b.length ? -1 : 1); + }; + + function __calculate_ratio(matches, length) { + return length ? 2.0 * matches / length : 1.0; + }; + + // returns a function that returns true if a key passed to the returned function + // is in the dict (js object) provided to this function; replaces being able to + // carry around dict.has_key in python... + function __isindict(dict) { + return function (key) { return key in dict; }; + }; + + // replacement for python's dict.get function -- need easy default values + function __dictget(dict, key, defaultValue) { + return key in dict ? dict[key] : defaultValue; + }; + + function SequenceMatcher(a, b, isjunk) { + this.set_seqs = function (a, b) { + this.set_seq1(a); + this.set_seq2(b); + } + + this.set_seq1 = function (a) { + if (a == this.a) return; + this.a = a; + this.matching_blocks = this.opcodes = null; + } + + this.set_seq2 = function (b) { + if (b == this.b) return; + this.b = b; + this.matching_blocks = this.opcodes = this.fullbcount = null; + this.__chain_b(); + } + + this.__chain_b = function () { + var b = this.b; + var n = b.length; + var b2j = this.b2j = {}; + var populardict = {}; + for (var i = 0; i < b.length; i++) { + var elt = b[i]; + if (elt in b2j) { + var indices = b2j[elt]; + if (n >= 200 && indices.length * 100 > n) { + populardict[elt] = 1; + delete b2j[elt]; + } else { + indices.push(i); + } + } else { + b2j[elt] = [i]; + } + } + + for (var elt in populardict) + delete b2j[elt]; + + var isjunk = this.isjunk; + var junkdict = {}; + if (isjunk) { + for (var elt in populardict) { + if (isjunk(elt)) { + junkdict[elt] = 1; + delete populardict[elt]; + } + } + for (var elt in b2j) { + if (isjunk(elt)) { + junkdict[elt] = 1; + delete b2j[elt]; + } + } + } + + this.isbjunk = __isindict(junkdict); + this.isbpopular = __isindict(populardict); + } + + this.find_longest_match = function (alo, ahi, blo, bhi) { + var a = this.a; + var b = this.b; + var b2j = this.b2j; + var isbjunk = this.isbjunk; + var besti = alo; + var bestj = blo; + var bestsize = 0; + var j = null; + + var j2len = {}; + var nothing = []; + for (var i = alo; i < ahi; i++) { + var newj2len = {}; + var jdict = __dictget(b2j, a[i], nothing); + for (var jkey in jdict) { + j = jdict[jkey]; + if (j < blo) continue; + if (j >= bhi) break; + newj2len[j] = k = __dictget(j2len, j - 1, 0) + 1; + if (k > bestsize) { + besti = i - k + 1; + bestj = j - k + 1; + bestsize = k; + } + } + j2len = newj2len; + } + + while (besti > alo && bestj > blo && !isbjunk(b[bestj - 1]) && a[besti - 1] == b[bestj - 1]) { + besti--; + bestj--; + bestsize++; + } + + while (besti + bestsize < ahi && bestj + bestsize < bhi && + !isbjunk(b[bestj + bestsize]) && + a[besti + bestsize] == b[bestj + bestsize]) { + bestsize++; + } + + while (besti > alo && bestj > blo && isbjunk(b[bestj - 1]) && a[besti - 1] == b[bestj - 1]) { + besti--; + bestj--; + bestsize++; + } + + while (besti + bestsize < ahi && bestj + bestsize < bhi && isbjunk(b[bestj + bestsize]) && + a[besti + bestsize] == b[bestj + bestsize]) { + bestsize++; + } + + return [besti, bestj, bestsize]; + } + + this.get_matching_blocks = function () { + if (this.matching_blocks != null) return this.matching_blocks; + var la = this.a.length; + var lb = this.b.length; + + var queue = [[0, la, 0, lb]]; + var matching_blocks = []; + var alo, ahi, blo, bhi, qi, i, j, k, x; + while (queue.length) { + qi = queue.pop(); + alo = qi[0]; + ahi = qi[1]; + blo = qi[2]; + bhi = qi[3]; + x = this.find_longest_match(alo, ahi, blo, bhi); + i = x[0]; + j = x[1]; + k = x[2]; + + if (k) { + matching_blocks.push(x); + if (alo < i && blo < j) + queue.push([alo, i, blo, j]); + if (i+k < ahi && j+k < bhi) + queue.push([i + k, ahi, j + k, bhi]); + } + } + + matching_blocks.sort(__ntuplecomp); + + var i1 = j1 = k1 = block = 0; + var non_adjacent = []; + for (var idx in matching_blocks) { + block = matching_blocks[idx]; + i2 = block[0]; + j2 = block[1]; + k2 = block[2]; + if (i1 + k1 == i2 && j1 + k1 == j2) { + k1 += k2; + } else { + if (k1) non_adjacent.push([i1, j1, k1]); + i1 = i2; + j1 = j2; + k1 = k2; + } + } + + if (k1) non_adjacent.push([i1, j1, k1]); + + non_adjacent.push([la, lb, 0]); + this.matching_blocks = non_adjacent; + return this.matching_blocks; + } + + this.get_opcodes = function () { + if (this.opcodes != null) return this.opcodes; + var i = 0; + var j = 0; + var answer = []; + this.opcodes = answer; + var block, ai, bj, size, tag; + var blocks = this.get_matching_blocks(); + for (var idx in blocks) { + block = blocks[idx]; + ai = block[0]; + bj = block[1]; + size = block[2]; + tag = ''; + if (i < ai && j < bj) { + tag = 'replace'; + } else if (i < ai) { + tag = 'delete'; + } else if (j < bj) { + tag = 'insert'; + } + if (tag) answer.push([tag, i, ai, j, bj]); + i = ai + size; + j = bj + size; + + if (size) answer.push(['equal', ai, i, bj, j]); + } + + return answer; + } + + // this is a generator function in the python lib, which of course is not supported in javascript + // the reimplementation builds up the grouped opcodes into a list in their entirety and returns that. + this.get_grouped_opcodes = function (n) { + if (!n) n = 3; + var codes = this.get_opcodes(); + if (!codes) codes = [["equal", 0, 1, 0, 1]]; + var code, tag, i1, i2, j1, j2; + if (codes[0][0] == 'equal') { + code = codes[0]; + tag = code[0]; + i1 = code[1]; + i2 = code[2]; + j1 = code[3]; + j2 = code[4]; + codes[0] = [tag, Math.max(i1, i2 - n), i2, Math.max(j1, j2 - n), j2]; + } + if (codes[codes.length - 1][0] == 'equal') { + code = codes[codes.length - 1]; + tag = code[0]; + i1 = code[1]; + i2 = code[2]; + j1 = code[3]; + j2 = code[4]; + codes[codes.length - 1] = [tag, i1, Math.min(i2, i1 + n), j1, Math.min(j2, j1 + n)]; + } + + var nn = n + n; + var groups = []; + for (var idx in codes) { + code = codes[idx]; + tag = code[0]; + i1 = code[1]; + i2 = code[2]; + j1 = code[3]; + j2 = code[4]; + if (tag == 'equal' && i2 - i1 > nn) { + groups.push([tag, i1, Math.min(i2, i1 + n), j1, Math.min(j2, j1 + n)]); + i1 = Math.max(i1, i2-n); + j1 = Math.max(j1, j2-n); + } + + groups.push([tag, i1, i2, j1, j2]); + } + + if (groups && groups[groups.length - 1][0] == 'equal') groups.pop(); + + return groups; + } + + this.ratio = function () { + matches = __reduce( + function (sum, triple) { + return sum + triple[triple.length - 1]; + }, + this.get_matching_blocks(), + 0 + ); + return __calculate_ratio(matches, this.a.length + this.b.length); + } + + this.quick_ratio = function () { + var fullbcount, elt; + if (this.fullbcount == null) { + this.fullbcount = fullbcount = {}; + for (var i = 0; i < this.b.length; i++) { + elt = this.b[i]; + fullbcount[elt] = __dictget(fullbcount, elt, 0) + 1; + } + } + fullbcount = this.fullbcount; + + var avail = {}; + var availhas = __isindict(avail); + var matches = numb = 0; + for (var i = 0; i < this.a.length; i++) { + elt = this.a[i]; + if (availhas(elt)) { + numb = avail[elt]; + } else { + numb = __dictget(fullbcount, elt, 0); + } + avail[elt] = numb - 1; + if (numb > 0) matches++; + } + + return __calculate_ratio(matches, this.a.length + this.b.length); + } + + this.real_quick_ratio = function () { + var la = this.a.length; + var lb = this.b.length; + return _calculate_ratio(Math.min(la, lb), la + lb); + } + + this.isjunk = isjunk ? isjunk : defaultJunkFunction; + this.a = this.b = null; + this.set_seqs(a, b); + } diff --git a/SYSPROG/STPROCINS/RTI_JSON2.JS.txt b/SYSPROG/STPROCINS/RTI_JSON2.JS.txt new file mode 100644 index 0000000..d00d126 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_JSON2.JS.txt @@ -0,0 +1,488 @@ +compile insert RTI_JSON2.JS +/* + json2.js + 2011-10-19 + + Public Domain. + + NO WARRANTY EXPRESSED OR IMPLIED. USE AT YOUR OWN RISK. + + See http://www.JSON.org/js.html + + + This code should be minified before deployment. + See http://javascript.crockford.com/jsmin.html + + USE YOUR OWN COPY. IT IS EXTREMELY UNWISE TO LOAD CODE FROM SERVERS YOU DO + NOT CONTROL. + + + This file creates a global JSON object containing two methods: stringify + and parse. + + JSON.stringify(value, replacer, space) + value any JavaScript value, usually an object or array. + + replacer an optional parameter that determines how object + values are stringified for objects. It can be a + function or an array of strings. + + space an optional parameter that specifies the indentation + of nested structures. If it is omitted, the text will + be packed without extra whitespace. If it is a number, + it will specify the number of spaces to indent at each + level. If it is a string (such as '\t' or ' '), + it contains the characters used to indent at each level. + + This method produces a JSON text from a JavaScript value. + + When an object value is found, if the object contains a toJSON + method, its toJSON method will be called and the result will be + stringified. A toJSON method does not serialize: it returns the + value represented by the name/value pair that should be serialized, + or undefined if nothing should be serialized. The toJSON method + will be passed the key associated with the value, and this will be + bound to the value + + For example, this would serialize Dates as ISO strings. + + Date.prototype.toJSON = function (key) { + function f(n) { + // Format integers to have at least two digits. + return n < 10 ? '0' + n : n; + } + + return this.getUTCFullYear() + '-' + + f(this.getUTCMonth() + 1) + '-' + + f(this.getUTCDate()) + 'T' + + f(this.getUTCHours()) + ':' + + f(this.getUTCMinutes()) + ':' + + f(this.getUTCSeconds()) + 'Z'; + }; + + You can provide an optional replacer method. It will be passed the + key and value of each member, with this bound to the containing + object. The value that is returned from your method will be + serialized. If your method returns undefined, then the member will + be excluded from the serialization. + + If the replacer parameter is an array of strings, then it will be + used to select the members to be serialized. It filters the results + such that only members with keys listed in the replacer array are + stringified. + + Values that do not have JSON representations, such as undefined or + functions, will not be serialized. Such values in objects will be + dropped; in arrays they will be replaced with null. You can use + a replacer function to replace those with JSON values. + JSON.stringify(undefined) returns undefined. + + The optional space parameter produces a stringification of the + value that is filled with line breaks and indentation to make it + easier to read. + + If the space parameter is a non-empty string, then that string will + be used for indentation. If the space parameter is a number, then + the indentation will be that many spaces. + + Example: + + text = JSON.stringify(['e', {pluribus: 'unum'}]); + // text is '["e",{"pluribus":"unum"}]' + + + text = JSON.stringify(['e', {pluribus: 'unum'}], null, '\t'); + // text is '[\n\t"e",\n\t{\n\t\t"pluribus": "unum"\n\t}\n]' + + text = JSON.stringify([new Date()], function (key, value) { + return this[key] instanceof Date ? + 'Date(' + this[key] + ')' : value; + }); + // text is '["Date(---current time---)"]' + + + JSON.parse(text, reviver) + This method parses a JSON text to produce an object or array. + It can throw a SyntaxError exception. + + The optional reviver parameter is a function that can filter and + transform the results. It receives each of the keys and values, + and its return value is used instead of the original value. + If it returns what it received, then the structure is not modified. + If it returns undefined then the member is deleted. + + Example: + + // Parse the text. Values that look like ISO date strings will + // be converted to Date objects. + + myData = JSON.parse(text, function (key, value) { + var a; + if (typeof value === 'string') { + a = +/^(\d{4})-(\d{2})-(\d{2})T(\d{2}):(\d{2}):(\d{2}(?:\.\d*)?)Z$/.exec(value); + if (a) { + return new Date(Date.UTC(+a[1], +a[2] - 1, +a[3], +a[4], + +a[5], +a[6])); + } + } + return value; + }); + + myData = JSON.parse('["Date(09/09/2001)"]', function (key, value) { + var d; + if (typeof value === 'string' && + value.slice(0, 5) === 'Date(' && + value.slice(-1) === ')') { + d = new Date(value.slice(5, -1)); + if (d) { + return d; + } + } + return value; + }); + + + This is a reference implementation. You are free to copy, modify, or + redistribute. +*/ + +/*jslint evil: true, regexp: true */ + +/*members "", "\b", "\t", "\n", "\f", "\r", "\"", JSON, "\\", apply, + call, charCodeAt, getUTCDate, getUTCFullYear, getUTCHours, + getUTCMinutes, getUTCMonth, getUTCSeconds, hasOwnProperty, join, + lastIndex, length, parse, prototype, push, replace, slice, stringify, + test, toJSON, toString, valueOf +*/ + + +// Create a JSON object only if one does not already exist. We create the +// methods in a closure to avoid creating global variables. + +var JSON; +if (!JSON) { + JSON = {}; +} + +(function () { + 'use strict'; + + function f(n) { + // Format integers to have at least two digits. + return n < 10 ? '0' + n : n; + } + + if (typeof Date.prototype.toJSON !== 'function') { + + Date.prototype.toJSON = function (key) { + + return isFinite(this.valueOf()) + ? this.getUTCFullYear() + '-' + + f(this.getUTCMonth() + 1) + '-' + + f(this.getUTCDate()) + 'T' + + f(this.getUTCHours()) + ':' + + f(this.getUTCMinutes()) + ':' + + f(this.getUTCSeconds()) + 'Z' + : null; + }; + + String.prototype.toJSON = + Number.prototype.toJSON = + Boolean.prototype.toJSON = function (key) { + return this.valueOf(); + }; + } + + var cx = /[\u0000\u00ad\u0600-\u0604\u070f\u17b4\u17b5\u200c-\u200f\u2028-\u202f\u2060-\u206f\ufeff\ufff0-\uffff]/g, + escapable = /[\\\"\x00-\x1f\x7f-\x9f\u00ad\u0600-\u0604\u070f\u17b4\u17b5\u200c-\u200f\u2028-\u202f\u2060-\u206f\ufeff\ufff0-\uffff]/g, + gap, + indent, + meta = { // table of character substitutions + '\b': '\\b', + '\t': '\\t', + '\n': '\\n', + '\f': '\\f', + '\r': '\\r', + '"' : '\\"', + '\\': '\\\\' + }, + rep; + + + function quote(string) { + +// If the string contains no control characters, no quote characters, and no +// backslash characters, then we can safely slap some quotes around it. +// Otherwise we must also replace the offending characters with safe escape +// sequences. + + escapable.lastIndex = 0; + return escapable.test(string) ? '"' + string.replace(escapable, function (a) { + var c = meta[a]; + return typeof c === 'string' + ? c + : '\\u' + ('0000' + a.charCodeAt(0).toString(16)).slice(-4); + }) + '"' : '"' + string + '"'; + } + + + function str(key, holder) { + +// Produce a string from holder[key]. + + var i, // The loop counter. + k, // The member key. + v, // The member value. + length, + mind = gap, + partial, + value = holder[key]; + +// If the value has a toJSON method, call it to obtain a replacement value. + + if (value && typeof value === 'object' && + typeof value.toJSON === 'function') { + value = value.toJSON(key); + } + +// If we were called with a replacer function, then call the replacer to +// obtain a replacement value. + + if (typeof rep === 'function') { + value = rep.call(holder, key, value); + } + +// What happens next depends on the value's type. + + switch (typeof value) { + case 'string': + return quote(value); + + case 'number': + +// JSON numbers must be finite. Encode non-finite numbers as null. + + return isFinite(value) ? String(value) : 'null'; + + case 'boolean': + case 'null': + +// If the value is a boolean or null, convert it to a string. Note: +// typeof null does not produce 'null'. The case is included here in +// the remote chance that this gets fixed someday. + + return String(value); + +// If the type is 'object', we might be dealing with an object or an array or +// null. + + case 'object': + +// Due to a specification blunder in ECMAScript, typeof null is 'object', +// so watch out for that case. + + if (!value) { + return 'null'; + } + +// Make an array to hold the partial results of stringifying this object value. + + gap += indent; + partial = []; + +// Is the value an array? + + if (Object.prototype.toString.apply(value) === '[object Array]') { + +// The value is an array. Stringify every element. Use null as a placeholder +// for non-JSON values. + + length = value.length; + for (i = 0; i < length; i += 1) { + partial[i] = str(i, value) || 'null'; + } + +// Join all of the elements together, separated with commas, and wrap them in +// brackets. + + v = partial.length === 0 + ? '[]' + : gap + ? '[\n' + gap + partial.join(',\n' + gap) + '\n' + mind + ']' + : '[' + partial.join(',') + ']'; + gap = mind; + return v; + } + +// If the replacer is an array, use it to select the members to be stringified. + + if (rep && typeof rep === 'object') { + length = rep.length; + for (i = 0; i < length; i += 1) { + if (typeof rep[i] === 'string') { + k = rep[i]; + v = str(k, value); + if (v) { + partial.push(quote(k) + (gap ? ': ' : ':') + v); + } + } + } + } else { + +// Otherwise, iterate through all of the keys in the object. + + for (k in value) { + if (Object.prototype.hasOwnProperty.call(value, k)) { + v = str(k, value); + if (v) { + partial.push(quote(k) + (gap ? ': ' : ':') + v); + } + } + } + } + +// Join all of the member texts together, separated with commas, +// and wrap them in braces. + + v = partial.length === 0 + ? '{}' + : gap + ? '{\n' + gap + partial.join(',\n' + gap) + '\n' + mind + '}' + : '{' + partial.join(',') + '}'; + gap = mind; + return v; + } + } + +// If the JSON object does not yet have a stringify method, give it one. + + if (typeof JSON.stringify !== 'function') { + JSON.stringify = function (value, replacer, space) { + +// The stringify method takes a value and an optional replacer, and an optional +// space parameter, and returns a JSON text. The replacer can be a function +// that can replace values, or an array of strings that will select the keys. +// A default replacer method can be provided. Use of the space parameter can +// produce text that is more easily readable. + + var i; + gap = ''; + indent = ''; + +// If the space parameter is a number, make an indent string containing that +// many spaces. + + if (typeof space === 'number') { + for (i = 0; i < space; i += 1) { + indent += ' '; + } + +// If the space parameter is a string, it will be used as the indent string. + + } else if (typeof space === 'string') { + indent = space; + } + +// If there is a replacer, it must be a function or an array. +// Otherwise, throw an error. + + rep = replacer; + if (replacer && typeof replacer !== 'function' && + (typeof replacer !== 'object' || + typeof replacer.length !== 'number')) { + throw new Error('JSON.stringify'); + } + +// Make a fake root object containing our value under the key of ''. +// Return the result of stringifying the value. + + return str('', {'': value}); + }; + } + + +// If the JSON object does not yet have a parse method, give it one. + + if (typeof JSON.parse !== 'function') { + JSON.parse = function (text, reviver) { + +// The parse method takes a text and an optional reviver function, and returns +// a JavaScript value if the text is a valid JSON text. + + var j; + + function walk(holder, key) { + +// The walk method is used to recursively walk the resulting structure so +// that modifications can be made. + + var k, v, value = holder[key]; + if (value && typeof value === 'object') { + for (k in value) { + if (Object.prototype.hasOwnProperty.call(value, k)) { + v = walk(value, k); + if (v !== undefined) { + value[k] = v; + } else { + delete value[k]; + } + } + } + } + return reviver.call(holder, key, value); + } + + +// Parsing happens in four stages. In the first stage, we replace certain +// Unicode characters with escape sequences. JavaScript handles many characters +// incorrectly, either silently deleting them, or treating them as line endings. + + text = String(text); + cx.lastIndex = 0; + if (cx.test(text)) { + text = text.replace(cx, function (a) { + return '\\u' + + ('0000' + a.charCodeAt(0).toString(16)).slice(-4); + }); + } + +// In the second stage, we run the text against regular expressions that look +// for non-JSON patterns. We are especially concerned with '()' and 'new' +// because they can cause invocation, and '=' because it can cause mutation. +// But just to be safe, we want to reject all unexpected forms. + +// We split the second stage into 4 regexp operations in order to work around +// crippling inefficiencies in IE's and Safari's regexp engines. First we +// replace the JSON backslash pairs with '@' (a non-JSON character). Second, we +// replace all simple value tokens with ']' characters. Third, we delete all +// open brackets that follow a colon or comma or that begin the text. Finally, +// we look to see that the remaining characters are only whitespace or ']' or +// ',' or ':' or '{' or '}'. If that is so, then the text is safe for eval. + + if (/^[\],:{}\s]*$/ + .test(text.replace(/\\(?:["\\\/bfnrt]|u[0-9a-fA-F]{4})/g, '@') + .replace(/"[^"\\\n\r]*"|true|false|null|-?\d+(?:\.\d*)?(?:[eE][+\-]?\d+)?/g, ']') + .replace(/(?:^|:|,)(?:\s*\[)+/g, ''))) { + +// In the third stage we use the eval function to compile the text into a +// JavaScript structure. The '{' operator is subject to a syntactic ambiguity +// in JavaScript: it can begin a block or an object literal. We wrap the text +// in parens to eliminate the ambiguity. + + j = eval('(' + text + ')'); + +// In the optional fourth stage, we recursively walk the new structure, passing +// each name/value pair to a reviver function for possible transformation. + + return typeof reviver === 'function' + ? walk({'': j}, '') + : j; + } + +// If the text is not JSON parseable, then a SyntaxError is thrown. + + throw new SyntaxError('JSON.parse'); + }; + } +}()); diff --git a/SYSPROG/STPROCINS/RTI_LH_INFO_EQUATES.txt b/SYSPROG/STPROCINS/RTI_LH_INFO_EQUATES.txt new file mode 100644 index 0000000..feeaffb --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_LH_INFO_EQUATES.txt @@ -0,0 +1,26 @@ +compile insert RTI_LH_INFO_EQUATES +* 05-17-16 rjc Added CMD_RESIZING_THREAD$, CMD_SIZELOCK$ +* 07-01-18 rjc Added CMD_LOCAL_LOCKS_INFO$ + + EQU CMD_SESSION_INFO$ TO 1 + EQU CMD_TABLE_INFO$ TO 2 + EQU CMD_LOCK_INFO$ TO 3 + EQU CMD_LOCKS_INFO$ TO 4 + equ CMD_TABLES_IN_VOL$ TO 5 + equ CMD_UNLOCK$ TO 6 + Equ CMD_LOGGING$ To 7 + Equ CMD_RESIZING_THREAD$ To 8 + Equ CMD_SIZELOCK$ To 9 + Equ CMD_RESIZING_LOG$ To 10 + Equ CMD_SELF_LOCKS_INFO$ To 11 + Equ CMD_SELF_LOCK_INFO$ To 12 + + + equ self_lock_files$ to 1 + equ self_lock_filelock$ to 2 + equ self_lock_recs_key$ to 3 + equ self_lock_recs_shared$ to 4 + equ self_lock_recs_sema$ to 5 + equ self_lock_sema_name$ to 6 + equ self_lock_sema_cnts$ to 7 + equ self_lock_lock_count$ to 8 diff --git a/SYSPROG/STPROCINS/RTI_LND_EQUATES.txt b/SYSPROG/STPROCINS/RTI_LND_EQUATES.txt new file mode 100644 index 0000000..856f404 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_LND_EQUATES.txt @@ -0,0 +1,43 @@ +compile Insert RTI_LND_EQUATES + +EQU LND_DESCRIP$ TO 1 ;* Descriptive name +EQU LND_NAME$ TO 1 ;* Descriptive name +EQU LND_SHORT_MONTHS$ TO 2 ;* @VM delimited month abbreviations (12) +EQU LND_FULL_MONTHS$ TO 3 ;* @VM delimited full month names (12) +EQU LND_AM$ TO 4 ;* Ante meridiem designator +EQU LND_PM$ TO 5 ;* Post meridiem designator +EQU LND_DBCR$ TO 6 ;* @VM delimited Debit-Credit designators +EQU LND_UC$ TO 7 ;* Upper Case character set +EQU LND_LC$ TO 8 ;* Lower Case character set +EQU LND_CONV$ TO 9 ;* @VM delimited I/OCONV conversions +**************** ems 11-19-08******************** +Equ LND_COLSEQ$ To 11 ;*Collation Sequence + + +* Structure of LND_CONV$ (by value) +EQU LND_CONV_B$ TO 1 ;* Boolean conversion default +EQU LND_CONV_D$ TO 2 ;* Date conversion default +EQU LND_CONV_MT$ TO 3 ;* Time conversion default +EQU LND_CONV_DT$ TO 4 ;* DateTime conversion default +EQU LND_CONV_MO$ TO 5 ;* Money conversion default (in MD/MC format) +EQU LND_CONV_MS$ TO 6 ;* Masked Scientific conversion default +;*UPDATE +EQU LND_CONV_D_SHORT$ TO 7 ;* Short date output code +EQU LND_CONV_MD_DECIMAL$ TO 8 ;* Character to use as decimal point +EQU LND_CONV_MD_1000$ TO 9 ;* Character to use as thousands delimiter +EQU LND_CONV_MD_CURRENCY$ TO 10 ;* Character to use for currency + + +* Structure of LND_DBCR$ (by value) +EQU LND_DBCR_DB$ TO 2 ;* Debit designator +EQU LND_DBCR_CR$ TO 3 ;* Credit designator + + + +EQU LND_BOOL$ To 1 +EQU LND_DATE$ To 2 +EQU LND_TIME$ To 3 +EQU LND_DATETIME$ To 4 +EQU LND_MASKDEC$ To 5 +EQU LND_MASKSCI$ To 6 +* Source Date: 17:44:54 09 JUL 1992 Build ID: AREV*2.2.48 Level: 2.2 diff --git a/SYSPROG/STPROCINS/RTI_MEMCACHED_EQUATES.txt b/SYSPROG/STPROCINS/RTI_MEMCACHED_EQUATES.txt new file mode 100644 index 0000000..5859299 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_MEMCACHED_EQUATES.txt @@ -0,0 +1,160 @@ +compile insert RTI_MEMCACHED_EQUATES +*Compile Insert RTI_MEMCACHED_EQUATES + +* Magic Values for request. response, this protocol +Equ MCB_MAGIC_REQUEST$ To 0x80 +Equ MCB_MAGIC_RESPONSE$ To 0x81 + +* Response Status +Equ MCB_OK$ To 0x0000 ; * No error +Equ MCB_KEY_NOT_FOUND$ To 0x0001 ; * Key not found +Equ MCB_KEY_EXISTS$ To 0x0002 ; * Key exists +Equ MCB_VALUE_TOO_LARGE$ To 0x0003 ; * Value too large +Equ MCB_INVALID_ARGS$ To 0x0004 ; * Invalid arguments +Equ MCB_NOT_STORED$ To 0x0005 ; * Item not stored +Equ MCB_NON_NUMERIC$ To 0x0006 ; * Incr/Decr on non-numeric value +Equ MCB_UNKNOWN$ To 0x0081 ; * Unknown command +Equ MCB_OUT_OF_MEM$ To 0x0082 ; * Out of memory +Equ MCB_SOCKET_ERROR$ To 0x0101 ; * Socket Error - this an OI specific error, so leave a gap in error numbers +Equ MCB_INVALID_HANDLE$ To 0x0102 ; * Invalid connection handle +Equ MCB_CLIENT_ERROR$ To 0x0103 ; * Invalid connection handle +Equ MCB_SERVER_ERROR$ To 0x0104 ; * Invalid connection handle + +* Commands +Equ Mcb_cmd_cnt$ To 5 + +Equ mcb_get$ To 1 +Equ mcb_set$ To 2 +Equ mcb_delete$ To 3 +Equ mcb_flush$ To 4 +Equ mcb_quit$ To 5 + +Equ mcb_binary_Get$ to \00\ +Equ mcb_binary_Set$ to \01\ +Equ mcb_binary_Add$ to \02\ +Equ mcb_binary_Replace$ to \03\ +Equ mcb_binary_Delete$ to \04\ +Equ mcb_binary_Increment$ to \05\ +Equ mcb_binary_Decrement$ to \06\ +Equ mcb_binary_Quit$ to \07\ +Equ mcb_binary_Flush$ to \08\ +Equ mcb_binary_GetQ$ to \09\ +Equ mcb_binary_No_op$ to \0A\ +Equ mcb_binary_Version$ to \0B\ +Equ mcb_binary_GetK$ to \0C\ +Equ mcb_binary_GetKQ$ to \0D\ +Equ mcb_binary_Append$ to \0E\ +Equ mcb_binary_Prepend$ to \0F\ +Equ mcb_binary_Stat$ to \10\ +Equ mcb_binary_SetQ$ to \11\ +Equ mcb_binary_AddQ$ to \12\ +Equ mcb_binary_ReplaceQ$ to \13\ +Equ mcb_binary_DeleteQ$ to \14\ +Equ mcb_binary_IncrementQ$ to \15\ +Equ mcb_binary_DecrementQ$ to \16\ +Equ mcb_binary_QuitQ$ to \17\ +Equ mcb_binary_FlushQ$ to \18\ +Equ mcb_binary_AppendQ$ to \19\ +Equ mcb_binary_PrependQ$ to \1A\ + +Equ mcb_ascii_Get$ To "get" +Equ mcb_ascii_Set$ To "set" +Equ mcb_ascii_Add$ to "add" +Equ mcb_ascii_Replace$ to "replace" +Equ mcb_ascii_Delete$ To "delete" +Equ mcb_ascii_Increment$ to "increment" +Equ mcb_ascii_Decrement$ to "decrement" +Equ mcb_ascii_Quit$ To "quit" +Equ mcb_ascii_Flush$ To "flush-all" +Equ mcb_ascii_GetQ$ to "getq" +Equ mcb_ascii_No_op$ to "no_op" +Equ mcb_ascii_Version$ to "version" +Equ mcb_ascii_GetK$ to "getk" +Equ mcb_ascii_GetKQ$ to "getkq" +Equ mcb_ascii_Append$ to "append" +Equ mcb_ascii_Prepend$ to "prepend" +Equ mcb_ascii_Stat$ to "stat" +Equ mcb_ascii_SetQ$ to "setq" +Equ mcb_ascii_AddQ$ to "addq" +Equ mcb_ascii_ReplaceQ$ to "replaceq" +Equ mcb_ascii_DeleteQ$ to "deleteq" +Equ mcb_ascii_IncrementQ$ to "incrementq" +Equ mcb_ascii_DecrementQ$ to "decrementq" +Equ mcb_ascii_QuitQ$ to "quitq" +Equ mcb_ascii_FlushQ$ to "flushq" +Equ mcb_ascii_AppendQ$ to "appendq" +Equ mcb_ascii_PrependQ$ to "prependq" + + +* Data Types +Equ RawBytes$ To 0x00 + +* +Equ MCB_BINARY_EXPIRE_NEVER$ To \00000000\ ; * Expire in 0 seconds +Equ MCB_BINARY_EXPIRE_DAILY$ To \00015180\ ; * Expire in one day (86400 seconds ) +Equ MCB_BINARY_NULL_FLAGS$ To \00000000\ ; * four null bytes for no flags + +Equ MCB_ASCII_EXPIRE_NEVER$ To 0 ; * Expire in 0 seconds +Equ MCB_ASCII_EXPIRE_DAILY$ To 86400 ; * Expire in one day (86400 seconds ) +Equ MCB_ASCII_NULL_FLAGS$ To 0 + + +* Packaging +Equ headerSize$ To 24 +Equ keyLenSize$ To 2 +Equ flagSize$ To 4 +Equ expirationSize$ To 4 +Equ valLenSize$ To 4 + +Equ nil$ To \00\ + + +* Local (RTI_HASHTABLE2) property bags. +Equ RTI_MCB_SOCKS$ To "RTI_MEMCACHED_SOCKS" ; * Socket handles by servername +Equ RTI_MCB_PROPS$ To "RTI_MEMCACHED_PROPS" ; * properties by connection, such see MCB_PROPS_XXX below + +Equ MCB_PROPS_SERVERLIST$ To 1 ; * list of ipaddress:port, ipaddress2:port2, ipaddress3:port3 for available servers +Equ MCB_PROPS_WRITEFLAGS$ To 2 ; * Any flags For SET, defaults To null +Equ MCB_PROPS_GETSERVER_PROCNAME$ To 3 ; * Name of a Function that calculates the server For a key +Equ MCB_PROPS_EXPIRATION$ To 4 ; * Default Expiration time ( In seconds) For this cache ; default To 1 day +Equ MCB_PROPS_MODE$ To 5 ; * Transmit mode, default to Binary +Equ MCB_PROPS_NOSTORE$ To 6 ; * Flag used by mfs; true if data is cache-only, should not be written to dic + + +Equ MCB_MODE_BINARY$ To 0 +Equ MCB_MODE_ASCII$ To 1 + +/* +'X' +type +serverlist +write_flags +getserver_procname +default_expiration +transmitmode +mfs_nostore_Flag + +*/ + +Equ MCB_CFG_UNUSED$ To 1 ; * Dict rec is always X +Equ MCB_CFG_type$ To 2 +Equ MCB_CFG_serverlist$ To 3 +Equ MCB_CFG_write_flags$ To 4 +Equ MCB_CFG_getserver_procname$ To 5 +Equ MCB_CFG_default_expiration$ To 6 +Equ MCB_CFG_transmitmode$ To 7 +Equ MCB_CFG_mfs_nostore_Flag$ To 8 + + +Equ MCB_CFG_type_table_specific$ To 1 +Equ MCB_CFG_type_Application$ To 2 +Equ MCB_CFG_type_Global$ To 3 +Equ MCB_CFG_type_Custom$ To 4 + + +Equ MCB_GS_GetOne$ To 1 +Equ MCB_GS_Get$ To 2 +Equ MCB_GS_GetServerList$ To 3 +Equ MCB_GS_New$ to 4 +Equ MCB_GS_Add_Server$ To 5 +Equ MCB_GS_Remove_Server$ To 6 diff --git a/SYSPROG/STPROCINS/RTI_MVBFS_SERVER_PLUGIN_D3_SOURCE.txt b/SYSPROG/STPROCINS/RTI_MVBFS_SERVER_PLUGIN_D3_SOURCE.txt new file mode 100644 index 0000000..ac110af --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_MVBFS_SERVER_PLUGIN_D3_SOURCE.txt @@ -0,0 +1,79 @@ +compile Insert RTI_MVBFS_SERVER_PLUGIN_D3_SOURCE +/* +* This insert contains the source for a program to install on the D3 server +* The program will support efficient record selection +* I used conditional compilation to prevent compiling in oi +*/ +#UNDEFINE _IGNORE_THE_FOLLOWING_ +#IFDEF _IGNORE_THE_FOLLOWING_ +SUBROUTINE RTI_MVBFS_SERVER_PLUGIN_D3(METHOD, COMMANDS, ACTIVELIST, UNIQUEID, RESULTS) +* +* +* THIS SUBROUTINE IS USED FOR EXECUTING A CHAIN OF QUERIES ON D3, RETURNING THE KEYS TO OI +* SEE RTI_CHAIN_SELECT. +* +* 01/31/19 rjc Created +* 02/07/19 rjc Pass in unique list id +* ********************************** + + + +EQU TRUE TO 1, FALSE TO 0 +EQU AM TO CHAR(254), VM TO CHAR(253), SVM TO CHAR(252), FM TO CHAR(254) + +RESULTS = "NO RECORDS SELECTED" +LISTID = 'RTI_SERVER_SELECT_':UNIQUEID + +* +* Did they pass in some keys? +* If so, make an active select list +* + +LISTFILE = 'POINTER-FILE' + +OPEN LISTFILE TO F_LISTS ELSE + STOP +END + +IF ACTIVELIST NE '' THEN + + WRITE ACTIVELIST ON F_LISTS, LISTID + + EXECUTE 'GET-LIST ':LISTID + +END + + +* +* Run the commands +* +EXEC.ERR = "" + +CMD_CNT = DCOUNT(COMMANDS, AM) + +FOR WHICH_COMMAND = 1 TO CMD_CNT-1 + + CMD = COMMANDS + IF CMD # "" THEN + data CMD + END + +NEXT WHICH_COMMAND + +EXECUTE COMMANDS ;* OPTIONALLY "CAPTURING" OR "RETURNING" CLAUSE + +* +* Pass back the keys +* +EXECUTE 'SAVE-LIST ' : LISTID + +READ RESULTS FROM F_LISTS, LISTID ELSE + RESULTS = "ERROR" +END + + +EXECUTE 'DELETE-LIST ' :LISTID + + +RETURN +#ENDIF diff --git a/SYSPROG/STPROCINS/RTI_MVBFS_SERVER_PLUGIN_QM_SOURCE.txt b/SYSPROG/STPROCINS/RTI_MVBFS_SERVER_PLUGIN_QM_SOURCE.txt new file mode 100644 index 0000000..b3261e9 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_MVBFS_SERVER_PLUGIN_QM_SOURCE.txt @@ -0,0 +1,67 @@ +compile Insert RTI_MVBFS_SERVER_PLUGIN_QM_SOURCE + +/* +* This insert contains the source for a program to install on the QM server +* The program will support efficient record selection +*/ +#UNDEFINE _IGNORE_THE_FOLLOWING_ +#IFDEF _IGNORE_THE_FOLLOWING_ +SUBROUTINE RTI_MVBFS_SERVER_PLUGIN_QM( METHOD, COMMANDS, ACTIVELIST, UNIQUEID, RESULTS) +* +* +* THIS SUBROUTINE IS USED FOR EXECUTING A CHAIN OF QUERIES ON QM, RETURNING THE KEYS TO OI +* SEE RTI_CHAIN_SELECT. +* +* 03/24/19 rjc Created from D3 version +* ********************************** + +* Selectinfo equates +EQU SL$ACTIVE TO 1 + +EQU TRUE TO 1, FALSE TO 0 +EQU AM TO CHAR(254), VM TO CHAR(253), SVM TO CHAR(252), FM TO CHAR(254) + +LISTID = 'RTI_SERVER_SELECT_':UNIQUEID + +* Did they pass in some keys? +* If so, make an active select list +IF ACTIVELIST NE "" THEN + FORMLIST ACTIVELIST +END + + +* +* Run the commands +* +EXEC.ERR = "" +RESULTS = "" + +CMD_CNT = DCOUNT(COMMANDS, AM) + +FOR WHICH_COMMAND = 1 TO CMD_CNT + + CMD = COMMANDS + + CONTINUE = ( CMD # "" ) AND ( WHICH_COMMAND = 1 OR SELECTINFO(0,SL$ACTIVE) = 1 ) + IF CONTINUE THEN + EXECUTE CMD + END + +NEXT WHICH_COMMAND + + IF ( SELECTINFO(0,SL$ACTIVE) = 1 ) THEN + + DONE = 0 + I = 0 + LOOP + READNEXT ID ELSE DONE = 1 + UNTIL DONE + I = I + 1 + RESULTS = ID + REPEAT + +END + +RETURN +END +#ENDIF diff --git a/SYSPROG/STPROCINS/RTI_MVBFS_SERVER_PLUGIN_UNIVERSE_SOURCE.txt b/SYSPROG/STPROCINS/RTI_MVBFS_SERVER_PLUGIN_UNIVERSE_SOURCE.txt new file mode 100644 index 0000000..a7a0c9b --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_MVBFS_SERVER_PLUGIN_UNIVERSE_SOURCE.txt @@ -0,0 +1,85 @@ +compile Insert RTI_MVBFS_SERVER_PLUGIN_UNIVERSE_SOURCE + +/* +* This insert contains the source for a program to install on the U2 server +* The program will support efficient record selection +* I used conditional compilation to prevent compiling in oi +*/ +#UNDEFINE _IGNORE_THE_FOLLOWING_ +#IFDEF _IGNORE_THE_FOLLOWING_ +SUBROUTINE RTI_MVBFS_SERVER_PLUGIN_UNIVERSE( METHOD, COMMANDS, OILIST, UNIQUEID, RESULTS) +* +* +* THIS SUBROUTINE IS USED FOR EXECUTING A CHAIN OF QUERIES ON U2, RETURNING THE KEYS TO OI +* SEE RTI_CHAIN_SELECT. +* +* 03/24/19 rjc Created from D3 version +* ********************************** +* +* Selectinfo equates +$INCLUDE UNIVERSE.INCLUDE INFO_KEYS.INS.IBAS + +EQU TRUE TO 1, FALSE TO 0 +EQU AM TO CHAR(254), VM TO CHAR(253), SVM TO CHAR(252), FM TO CHAR(254) + + + RESULTS = "" + +* cursorvar will be a list variable ( not a dynamic array) +* used to pass keys from one select into the next + CURSORVAR = "" + + +* Cannot test list variables directly, so keep a LIST.ACTIVE flag + LIST.ACTIVE = ( OILIST <> "" ) + +* Did they pass a list of keys from OI? Load into cursorvar + IF LIST.ACTIVE NE "" THEN + FORMLIST OILIST + READLIST CURSORVAR ELSE LIST.ACTIVE = FALSE + END + +* Run the commands + +CMD_CNT = DCOUNT(COMMANDS, AM) + +FOR WHICH_COMMAND = 1 TO CMD_CNT + + CMD = COMMANDS + + CONTINUE = ( CMD # "" ) AND ( WHICH_COMMAND = 1 OR LIST.ACTIVE ) + + IF CONTINUE THEN + + IF LIST.ACTIVE THEN + EXECUTE CMD PASSLIST CURSORVAR + END ELSE + EXECUTE CMD + END + + * Save the keys from the last select to pass to the next select + LIST.ACTIVE = SELECTINFO(0,IK$SLACTIVE) + IF LIST.ACTIVE THEN + READLIST CURSORVAR ELSE LIST.ACTIVE = FALSE + END + + END + +NEXT WHICH_COMMAND + +* +* Return results as @fm delimited list +* +IF LIST.ACTIVE THEN + IF UNIQUEID <> "" And Len(CURSORVAR) > 32000 Then + WRITELIST CURSORVAR ON UNIQUEID + RESULTS = "?":UNIQUEID:"?" + END Else + RESULTS = CURSORVAR + END +END + +RETURN + +End +#ENDIF diff --git a/SYSPROG/STPROCINS/RTI_OIWIN_RESOURCES_EQUATES.txt b/SYSPROG/STPROCINS/RTI_OIWIN_RESOURCES_EQUATES.txt new file mode 100644 index 0000000..94cd58d --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_OIWIN_RESOURCES_EQUATES.txt @@ -0,0 +1,36 @@ +compile insert rti_OiWin_Resources_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : September 2012 + Purpose : Equates for use with programs that link to the RTI_OIWIN_RESOURCES + record. + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_OIWIN_RESOURCES_EQUATES_ +#define _RTI_OIWIN_RESOURCES_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $uses @APPID*APPROW**SYSENV:RTI_OIWIN_RESOURCES + equ OIWIN_RESID$ to "RTI_OIWIN_RESOURCES" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_OS_DIR_EQUATES.txt b/SYSPROG/STPROCINS/RTI_OS_DIR_EQUATES.txt new file mode 100644 index 0000000..4416c8d --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_OS_DIR_EQUATES.txt @@ -0,0 +1,30 @@ +compile insert rti_OS_Dir_Equates +/* + ** Copyright (C) 1992-2023 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : September 2017 + Purpose : Constants for use with the DirMethod functions in RevOS.dll + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 30 Mar 23 Moved internal equates to RTI_OS_DIR + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_OS_DIR_EQUATES_ +#define _RTI_OS_DIR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_OSDirMethod + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_OS_USER_EQUATES.txt b/SYSPROG/STPROCINS/RTI_OS_USER_EQUATES.txt new file mode 100644 index 0000000..492749d --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_OS_USER_EQUATES.txt @@ -0,0 +1,99 @@ +compile insert rti_OS_User_Equates +/* + ** Copyright (C) 1992-2023 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : September 2017 + Purpose : Constants for use with the UserMethod functions in RevOS.dll + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 30 Mar 23 Moved internal equates to RTI_OS_USER. + Added GetComputerNameInfo equates + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_OS_USER_EQUATES_ +#define _RTI_OS_USER_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_OSUserMethod + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // UserMethod() error codes + equ REVOS_USERMTD_ERR_NETAPI$ to -1; + equ REVOS_USERMTD_ERR_NODOMAIN$ to -2; + equ REVOS_USERMTD_ERR_BADDOMAIN$ to -3; + equ REVOS_USERMTD_ERR_BADFLAGS$ to -4; + equ REVOS_USERMTD_ERR_BADLEVEL$ to -5; + equ REVOS_USERMTD_ERR_USERNOTFOUND$ to -6; + equ REVOS_USERMTD_ERR_INTERNAL$ to -7; + equ REVOS_USERMTD_ERR_BADNETPATH$ to -8; + equ REVOS_USERMTD_ERR_BADSVRNAME$ to -9; + equ REVOS_USERMTD_ERR_DCNOTFOUND$ to -10; + equ REVOS_USERMTD_ERR_NORPCSVR$ to -11; + +/////////////////////////////////////////////////////////////////////////////// + + // UserMethod GetComputerNameInfo return array structure (@fm'd) + // + // <1> NetBIOS name + // <2> DNS host name + // <3> DNS domain name + // <4> DNS fully qualified name + // <5> Physical NetBIOS name + // <6> Physical DNS host name + // <7> Physical DNS domain name + // <8> Physical DNS fully qualified name + // + // See the Windows API GetComputerNameEx function for more info + + equ REVOS_GDI_POS_NETBIOSNAME$ to 1 + equ REVOS_GDI_POS_DNSHOSTNAME$ to 2 + equ REVOS_GDI_POS_DNSDOMAINNAME$ to 3 + equ REVOS_GDI_POS_DNSFULLQUALNAME$ to 4 + equ REVOS_GDI_POS_PHYNETBIOSNAME$ to 5 + equ REVOS_GDI_POS_PHYDNSHOSTNAME$ to 6 + equ REVOS_GDI_POS_PHYDNSDOMAINNAME$ to 7 + equ REVOS_GDI_POS_PHYDNSFULLQUALNAME$ to 8 + +/////////////////////////////////////////////////////////////////////////////// + + // UserMethod GetUserNameInfo return array structure (@fm'd) + // + // <1> SamCompatible : A legacy account name (for example, Engineering\JSmith). + // <2> Display : A "friendly" display name (for example, Jeff Smith). + // <3> DnsDomain : The DNS domain name followed by a backward-slash and the SAM user name. + // <4> FullyQualifiedDN : The fully qualified distinguished name (for example, CN=Jeff Smith,OU=Users,DC=Engineering,DC=Microsoft,DC=Com). + // <5> Canonical : The complete canonical name (for example, engineering.microsoft.com/software/someone) + // <6> Principal : The user principal name (for example, someone@example.com). + // <7> ServicePrincipal : The generalized service principal name (for example, www/www.microsoft.com@microsoft.com). + // + // See the Windows API GetUserNameEx function for more info + + equ REVOS_GUI_POS_SAMCOMPATIBLE$ to 1 + equ REVOS_GUI_POS_DISPLAY$ to 2 + equ REVOS_GUI_POS_DNSDOMAIN$ to 3 + equ REVOS_GUI_POS_FULLYQUALIFIEDDN$ to 4 + equ REVOS_GUI_POS_CANONICAL$ to 5 + equ REVOS_GDI_POS_PRINCIPLE$ to 6 + equ REVOS_GUI_POS_SERVICEPRINCIPLE$ to 7 + +/////////////////////////////////////////////////////////////////////////////// + + // UserMethod GetUserGroups method - uFlags parameter + equ REVOS_GUG_USE_AD$ to 0x00000001; // Not supported yet + equ REVOS_GUG_LOCAL$ to 0x00000002; + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_OS_VERSION_INFO_EQUATES.txt b/SYSPROG/STPROCINS/RTI_OS_VERSION_INFO_EQUATES.txt new file mode 100644 index 0000000..c83c5ff --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_OS_VERSION_INFO_EQUATES.txt @@ -0,0 +1,86 @@ +compile insert rti_OS_Version_Info_Equates +/* + ** Copyright (C) 1992-2023 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : March 2023 + Purpose : Constants for use with the VersionMethod function in RevOS.dll + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 30 Mar 23 Moved method constants to RTI_OS_VERSION_INFO + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_OS_VERSION_INFO_EQUATES_ +#define _RTI_OS_VERSION_INFO_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_OSVersionMethod + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // GETINFO method - version information array structure: + // + // <1> File Description + // <2> Company Name + // <3> File Version + // <4> Product Name + // <5> Product Version + // <6> Comments + // <7> Legal Copyright + // <8> Legal Trademarks + // <9> Original Filename + // <10> Internal Name + // <11> Debug Build + // <12> Private Build + // <13> Special Build + // <14> File Flags + // <15> File Flags Mask + // <16> File Type + // <17> File SubType + // <18> File OS + // <19> Language IDs **(@vm'd) + // <20> Code pages **(@vm'd) + // + // ** <19> and <20> form an AMV. + + equ REVOS_VERINFO_FILEDESCRIPTION$ to 1 + equ REVOS_VERINFO_COMPANYNAME$ to 2 + equ REVOS_VERINFO_FILEVERSION$ to 3 + equ REVOS_VERINFO_PRODUCTNAME$ to 4 + equ REVOS_VERINFO_PRODUCTVERSION$ to 5 + equ REVOS_VERINFO_COMMENTS$ to 6 + equ REVOS_VERINFO_LEGALCOPYRIGHT$ to 7 + equ REVOS_VERINFO_LEGALTRADEMARKS$ to 8 + equ REVOS_VERINFO_ORIGINALFILENAME$ to 9 + equ REVOS_VERINFO_INTERNALNAME$ to 10 + equ REVOS_VERINFO_DEBUGBUILD$ to 11 + equ REVOS_VERINFO_PRIVATEBUILD$ to 12 + equ REVOS_VERINFO_SPECIALBUILD$ to 13 + equ REVOS_VERINFO_FILEFLAGS$ to 14 + equ REVOS_VERINFO_FILEFLAGSMASK$ to 15 + equ REVOS_VERINFO_FILETYPE$ to 16 + equ REVOS_VERINFO_FILESUBTYPE$ to 17 + equ REVOS_VERINFO_FILEOS$ to 18 + equ REVOS_VERINFO_LANGUAGEIDS$ to 19 + equ REVOS_VERINFO_CODEPAGES$ to 20 + +/////////////////////////////////////////////////////////////////////////////// + + // VersionInfo() error codes + equ REVOS_VER_ERR_NOFILENAME$ to -1; + equ REVOS_VER_ERR_LOAD$ to -2; + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/RTI_PAJ_MD5.txt b/SYSPROG/STPROCINS/RTI_PAJ_MD5.txt new file mode 100644 index 0000000..f341222 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_PAJ_MD5.txt @@ -0,0 +1,381 @@ +compile Insert rti_paj_md5 +/* + * A JavaScript implementation of the RSA Data Security, Inc. MD5 Message + * Digest Algorithm, as defined in RFC 1321. + * Version 2.2 Copyright (C) Paul Johnston 1999 - 2009 + * Other contributors: Greg Holt, Andrew Kepert, Ydnar, Lostinet + * Distributed under the BSD License + * See http://pajhome.org.uk/crypt/md5 for more info. + */ + +/* + * Configurable variables. You may need to tweak these to be compatible with + * the server-side, but the defaults work in most cases. + */ +var hexcase = 0; /* hex output format. 0 - lowercase; 1 - uppercase */ +var b64pad = ""; /* base-64 pad character. "=" for strict RFC compliance */ + +/* + * These are the functions you'll usually want to call + * They take string arguments and return either hex or base-64 encoded strings + */ +function hex_md5(s) { return rstr2hex(rstr_md5(str2rstr_utf8(s))); } +function b64_md5(s) { return rstr2b64(rstr_md5(str2rstr_utf8(s))); } +function any_md5(s, e) { return rstr2any(rstr_md5(str2rstr_utf8(s)), e); } +function hex_hmac_md5(k, d) + { return rstr2hex(rstr_hmac_md5(str2rstr_utf8(k), str2rstr_utf8(d))); } +function b64_hmac_md5(k, d) + { return rstr2b64(rstr_hmac_md5(str2rstr_utf8(k), str2rstr_utf8(d))); } +function any_hmac_md5(k, d, e) + { return rstr2any(rstr_hmac_md5(str2rstr_utf8(k), str2rstr_utf8(d)), e); } + +/* + * Perform a simple self-test to see if the VM is working + */ +function md5_vm_test() +{ + return hex_md5("abc").toLowerCase() == "900150983cd24fb0d6963f7d28e17f72"; +} + +/* + * Calculate the MD5 of a raw string + */ +function rstr_md5(s) +{ + return binl2rstr(binl_md5(rstr2binl(s), s.length * 8)); +} + +/* + * Calculate the HMAC-MD5, of a key and some data (raw strings) + */ +function rstr_hmac_md5(key, data) +{ + var bkey = rstr2binl(key); + if(bkey.length > 16) bkey = binl_md5(bkey, key.length * 8); + + var ipad = Array(16), opad = Array(16); + for(var i = 0; i < 16; i++) + { + ipad[i] = bkey[i] ^ 0x36363636; + opad[i] = bkey[i] ^ 0x5C5C5C5C; + } + + var hash = binl_md5(ipad.concat(rstr2binl(data)), 512 + data.length * 8); + return binl2rstr(binl_md5(opad.concat(hash), 512 + 128)); +} + +/* + * Convert a raw string to a hex string + */ +function rstr2hex(input) +{ + try { hexcase } catch(e) { hexcase=0; } + var hex_tab = hexcase ? "0123456789ABCDEF" : "0123456789abcdef"; + var output = ""; + var x; + for(var i = 0; i < input.length; i++) + { + x = input.charCodeAt(i); + output += hex_tab.charAt((x >>> 4) & 0x0F) + + hex_tab.charAt( x & 0x0F); + } + return output; +} + +/* + * Convert a raw string to a base-64 string + */ +function rstr2b64(input) +{ + try { b64pad } catch(e) { b64pad=''; } + var tab = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"; + var output = ""; + var len = input.length; + for(var i = 0; i < len; i += 3) + { + var triplet = (input.charCodeAt(i) << 16) + | (i + 1 < len ? input.charCodeAt(i+1) << 8 : 0) + | (i + 2 < len ? input.charCodeAt(i+2) : 0); + for(var j = 0; j < 4; j++) + { + if(i * 8 + j * 6 > input.length * 8) output += b64pad; + else output += tab.charAt((triplet >>> 6*(3-j)) & 0x3F); + } + } + return output; +} + +/* + * Convert a raw string to an arbitrary string encoding + */ +function rstr2any(input, encoding) +{ + var divisor = encoding.length; + var i, j, q, x, quotient; + + /* Convert to an array of 16-bit big-endian values, forming the dividend */ + var dividend = Array(Math.ceil(input.length / 2)); + for(i = 0; i < dividend.length; i++) + { + dividend[i] = (input.charCodeAt(i * 2) << 8) | input.charCodeAt(i * 2 + 1); + } + + /* + * Repeatedly perform a long division. The binary array forms the dividend, + * the length of the encoding is the divisor. Once computed, the quotient + * forms the dividend for the next step. All remainders are stored for later + * use. + */ + var full_length = Math.ceil(input.length * 8 / + (Math.log(encoding.length) / Math.log(2))); + var remainders = Array(full_length); + for(j = 0; j < full_length; j++) + { + quotient = Array(); + x = 0; + for(i = 0; i < dividend.length; i++) + { + x = (x << 16) + dividend[i]; + q = Math.floor(x / divisor); + x -= q * divisor; + if(quotient.length > 0 || q > 0) + quotient[quotient.length] = q; + } + remainders[j] = x; + dividend = quotient; + } + + /* Convert the remainders to the output string */ + var output = ""; + for(i = remainders.length - 1; i >= 0; i--) + output += encoding.charAt(remainders[i]); + + return output; +} + +/* + * Encode a string as utf-8. + * For efficiency, this assumes the input is valid utf-16. + */ +function str2rstr_utf8(input) +{ + var output = ""; + var i = -1; + var x, y; + + while(++i < input.length) + { + /* Decode utf-16 surrogate pairs */ + x = input.charCodeAt(i); + y = i + 1 < input.length ? input.charCodeAt(i + 1) : 0; + if(0xD800 <= x && x <= 0xDBFF && 0xDC00 <= y && y <= 0xDFFF) + { + x = 0x10000 + ((x & 0x03FF) << 10) + (y & 0x03FF); + i++; + } + + /* Encode output as utf-8 */ + if(x <= 0x7F) + output += String.fromCharCode(x); + else if(x <= 0x7FF) + output += String.fromCharCode(0xC0 | ((x >>> 6 ) & 0x1F), + 0x80 | ( x & 0x3F)); + else if(x <= 0xFFFF) + output += String.fromCharCode(0xE0 | ((x >>> 12) & 0x0F), + 0x80 | ((x >>> 6 ) & 0x3F), + 0x80 | ( x & 0x3F)); + else if(x <= 0x1FFFFF) + output += String.fromCharCode(0xF0 | ((x >>> 18) & 0x07), + 0x80 | ((x >>> 12) & 0x3F), + 0x80 | ((x >>> 6 ) & 0x3F), + 0x80 | ( x & 0x3F)); + } + return output; +} + +/* + * Encode a string as utf-16 + */ +function str2rstr_utf16le(input) +{ + var output = ""; + for(var i = 0; i < input.length; i++) + output += String.fromCharCode( input.charCodeAt(i) & 0xFF, + (input.charCodeAt(i) >>> 8) & 0xFF); + return output; +} + +function str2rstr_utf16be(input) +{ + var output = ""; + for(var i = 0; i < input.length; i++) + output += String.fromCharCode((input.charCodeAt(i) >>> 8) & 0xFF, + input.charCodeAt(i) & 0xFF); + return output; +} + +/* + * Convert a raw string to an array of little-endian words + * Characters >255 have their high-byte silently ignored. + */ +function rstr2binl(input) +{ + var output = Array(input.length >> 2); + for(var i = 0; i < output.length; i++) + output[i] = 0; + for(var i = 0; i < input.length * 8; i += 8) + output[i>>5] |= (input.charCodeAt(i / 8) & 0xFF) << (i%32); + return output; +} + +/* + * Convert an array of little-endian words to a string + */ +function binl2rstr(input) +{ + var output = ""; + for(var i = 0; i < input.length * 32; i += 8) + output += String.fromCharCode((input[i>>5] >>> (i % 32)) & 0xFF); + return output; +} + +/* + * Calculate the MD5 of an array of little-endian words, and a bit length. + */ +function binl_md5(x, len) +{ + /* append padding */ + x[len >> 5] |= 0x80 << ((len) % 32); + x[(((len + 64) >>> 9) << 4) + 14] = len; + + var a = 1732584193; + var b = -271733879; + var c = -1732584194; + var d = 271733878; + + for(var i = 0; i < x.length; i += 16) + { + var olda = a; + var oldb = b; + var oldc = c; + var oldd = d; + + a = md5_ff(a, b, c, d, x[i+ 0], 7 , -680876936); + d = md5_ff(d, a, b, c, x[i+ 1], 12, -389564586); + c = md5_ff(c, d, a, b, x[i+ 2], 17, 606105819); + b = md5_ff(b, c, d, a, x[i+ 3], 22, -1044525330); + a = md5_ff(a, b, c, d, x[i+ 4], 7 , -176418897); + d = md5_ff(d, a, b, c, x[i+ 5], 12, 1200080426); + c = md5_ff(c, d, a, b, x[i+ 6], 17, -1473231341); + b = md5_ff(b, c, d, a, x[i+ 7], 22, -45705983); + a = md5_ff(a, b, c, d, x[i+ 8], 7 , 1770035416); + d = md5_ff(d, a, b, c, x[i+ 9], 12, -1958414417); + c = md5_ff(c, d, a, b, x[i+10], 17, -42063); + b = md5_ff(b, c, d, a, x[i+11], 22, -1990404162); + a = md5_ff(a, b, c, d, x[i+12], 7 , 1804603682); + d = md5_ff(d, a, b, c, x[i+13], 12, -40341101); + c = md5_ff(c, d, a, b, x[i+14], 17, -1502002290); + b = md5_ff(b, c, d, a, x[i+15], 22, 1236535329); + + a = md5_gg(a, b, c, d, x[i+ 1], 5 , -165796510); + d = md5_gg(d, a, b, c, x[i+ 6], 9 , -1069501632); + c = md5_gg(c, d, a, b, x[i+11], 14, 643717713); + b = md5_gg(b, c, d, a, x[i+ 0], 20, -373897302); + a = md5_gg(a, b, c, d, x[i+ 5], 5 , -701558691); + d = md5_gg(d, a, b, c, x[i+10], 9 , 38016083); + c = md5_gg(c, d, a, b, x[i+15], 14, -660478335); + b = md5_gg(b, c, d, a, x[i+ 4], 20, -405537848); + a = md5_gg(a, b, c, d, x[i+ 9], 5 , 568446438); + d = md5_gg(d, a, b, c, x[i+14], 9 , -1019803690); + c = md5_gg(c, d, a, b, x[i+ 3], 14, -187363961); + b = md5_gg(b, c, d, a, x[i+ 8], 20, 1163531501); + a = md5_gg(a, b, c, d, x[i+13], 5 , -1444681467); + d = md5_gg(d, a, b, c, x[i+ 2], 9 , -51403784); + c = md5_gg(c, d, a, b, x[i+ 7], 14, 1735328473); + b = md5_gg(b, c, d, a, x[i+12], 20, -1926607734); + + a = md5_hh(a, b, c, d, x[i+ 5], 4 , -378558); + d = md5_hh(d, a, b, c, x[i+ 8], 11, -2022574463); + c = md5_hh(c, d, a, b, x[i+11], 16, 1839030562); + b = md5_hh(b, c, d, a, x[i+14], 23, -35309556); + a = md5_hh(a, b, c, d, x[i+ 1], 4 , -1530992060); + d = md5_hh(d, a, b, c, x[i+ 4], 11, 1272893353); + c = md5_hh(c, d, a, b, x[i+ 7], 16, -155497632); + b = md5_hh(b, c, d, a, x[i+10], 23, -1094730640); + a = md5_hh(a, b, c, d, x[i+13], 4 , 681279174); + d = md5_hh(d, a, b, c, x[i+ 0], 11, -358537222); + c = md5_hh(c, d, a, b, x[i+ 3], 16, -722521979); + b = md5_hh(b, c, d, a, x[i+ 6], 23, 76029189); + a = md5_hh(a, b, c, d, x[i+ 9], 4 , -640364487); + d = md5_hh(d, a, b, c, x[i+12], 11, -421815835); + c = md5_hh(c, d, a, b, x[i+15], 16, 530742520); + b = md5_hh(b, c, d, a, x[i+ 2], 23, -995338651); + + a = md5_ii(a, b, c, d, x[i+ 0], 6 , -198630844); + d = md5_ii(d, a, b, c, x[i+ 7], 10, 1126891415); + c = md5_ii(c, d, a, b, x[i+14], 15, -1416354905); + b = md5_ii(b, c, d, a, x[i+ 5], 21, -57434055); + a = md5_ii(a, b, c, d, x[i+12], 6 , 1700485571); + d = md5_ii(d, a, b, c, x[i+ 3], 10, -1894986606); + c = md5_ii(c, d, a, b, x[i+10], 15, -1051523); + b = md5_ii(b, c, d, a, x[i+ 1], 21, -2054922799); + a = md5_ii(a, b, c, d, x[i+ 8], 6 , 1873313359); + d = md5_ii(d, a, b, c, x[i+15], 10, -30611744); + c = md5_ii(c, d, a, b, x[i+ 6], 15, -1560198380); + b = md5_ii(b, c, d, a, x[i+13], 21, 1309151649); + a = md5_ii(a, b, c, d, x[i+ 4], 6 , -145523070); + d = md5_ii(d, a, b, c, x[i+11], 10, -1120210379); + c = md5_ii(c, d, a, b, x[i+ 2], 15, 718787259); + b = md5_ii(b, c, d, a, x[i+ 9], 21, -343485551); + + a = safe_add(a, olda); + b = safe_add(b, oldb); + c = safe_add(c, oldc); + d = safe_add(d, oldd); + } + return Array(a, b, c, d); +} + +/* + * These functions implement the four basic operations the algorithm uses. + */ +function md5_cmn(q, a, b, x, s, t) +{ + return safe_add(bit_rol(safe_add(safe_add(a, q), safe_add(x, t)), s),b); +} +function md5_ff(a, b, c, d, x, s, t) +{ + return md5_cmn((b & c) | ((~b) & d), a, b, x, s, t); +} +function md5_gg(a, b, c, d, x, s, t) +{ + return md5_cmn((b & d) | (c & (~d)), a, b, x, s, t); +} +function md5_hh(a, b, c, d, x, s, t) +{ + return md5_cmn(b ^ c ^ d, a, b, x, s, t); +} +function md5_ii(a, b, c, d, x, s, t) +{ + return md5_cmn(c ^ (b | (~d)), a, b, x, s, t); +} + +/* + * Add integers, wrapping at 2^32. This uses 16-bit operations internally + * to work around bugs in some JS interpreters. + */ +function safe_add(x, y) +{ + var lsw = (x & 0xFFFF) + (y & 0xFFFF); + var msw = (x >> 16) + (y >> 16) + (lsw >> 16); + return (msw << 16) | (lsw & 0xFFFF); +} + +/* + * Bitwise rotate a 32-bit number to the left. + */ +function bit_rol(num, cnt) +{ + return (num << cnt) | (num >>> (32 - cnt)); +} + diff --git a/SYSPROG/STPROCINS/RTI_PAJ_SHA1.txt b/SYSPROG/STPROCINS/RTI_PAJ_SHA1.txt new file mode 100644 index 0000000..a5e3178 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_PAJ_SHA1.txt @@ -0,0 +1,332 @@ +compile insert RTI_PAJ_SHA1 +/* + * A JavaScript implementation of the Secure Hash Algorithm, SHA-1, as defined + * in FIPS 180-1 + * Version 2.2 Copyright Paul Johnston 2000 - 2009. + * Other contributors: Greg Holt, Andrew Kepert, Ydnar, Lostinet + * Distributed under the BSD License + * See http://pajhome.org.uk/crypt/md5 for details. + */ + +/* + * Configurable variables. You may need to tweak these to be compatible with + * the server-side, but the defaults work in most cases. + */ +var hexcase = 0; /* hex output format. 0 - lowercase; 1 - uppercase */ +var b64pad = ""; /* base-64 pad character. "=" for strict RFC compliance */ + +/* + * These are the functions you'll usually want to call + * They take string arguments and return either hex or base-64 encoded strings + */ +function hex_sha1(s) { return rstr2hex(rstr_sha1(str2rstr_utf8(s))); } +function b64_sha1(s) { return rstr2b64(rstr_sha1(str2rstr_utf8(s))); } +function any_sha1(s, e) { return rstr2any(rstr_sha1(str2rstr_utf8(s)), e); } +function hex_hmac_sha1(k, d) + { return rstr2hex(rstr_hmac_sha1(str2rstr_utf8(k), str2rstr_utf8(d))); } +function b64_hmac_sha1(k, d) + { return rstr2b64(rstr_hmac_sha1(str2rstr_utf8(k), str2rstr_utf8(d))); } +function any_hmac_sha1(k, d, e) + { return rstr2any(rstr_hmac_sha1(str2rstr_utf8(k), str2rstr_utf8(d)), e); } + +/* + * Perform a simple self-test to see if the VM is working + */ +function sha1_vm_test() +{ + return hex_sha1("abc").toLowerCase() == "a9993e364706816aba3e25717850c26c9cd0d89d"; +} + +/* + * Calculate the SHA1 of a raw string + */ +function rstr_sha1(s) +{ + return binb2rstr(binb_sha1(rstr2binb(s), s.length * 8)); +} + +/* + * Calculate the HMAC-SHA1 of a key and some data (raw strings) + */ +function rstr_hmac_sha1(key, data) +{ + var bkey = rstr2binb(key); + if(bkey.length > 16) bkey = binb_sha1(bkey, key.length * 8); + + var ipad = Array(16), opad = Array(16); + for(var i = 0; i < 16; i++) + { + ipad[i] = bkey[i] ^ 0x36363636; + opad[i] = bkey[i] ^ 0x5C5C5C5C; + } + + var hash = binb_sha1(ipad.concat(rstr2binb(data)), 512 + data.length * 8); + return binb2rstr(binb_sha1(opad.concat(hash), 512 + 160)); +} + +/* + * Convert a raw string to a hex string + */ +function rstr2hex(input) +{ + try { hexcase } catch(e) { hexcase=0; } + var hex_tab = hexcase ? "0123456789ABCDEF" : "0123456789abcdef"; + var output = ""; + var x; + for(var i = 0; i < input.length; i++) + { + x = input.charCodeAt(i); + output += hex_tab.charAt((x >>> 4) & 0x0F) + + hex_tab.charAt( x & 0x0F); + } + return output; +} + +/* + * Convert a raw string to a base-64 string + */ +function rstr2b64(input) +{ + try { b64pad } catch(e) { b64pad=''; } + var tab = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"; + var output = ""; + var len = input.length; + for(var i = 0; i < len; i += 3) + { + var triplet = (input.charCodeAt(i) << 16) + | (i + 1 < len ? input.charCodeAt(i+1) << 8 : 0) + | (i + 2 < len ? input.charCodeAt(i+2) : 0); + for(var j = 0; j < 4; j++) + { + if(i * 8 + j * 6 > input.length * 8) output += b64pad; + else output += tab.charAt((triplet >>> 6*(3-j)) & 0x3F); + } + } + return output; +} + +/* + * Convert a raw string to an arbitrary string encoding + */ +function rstr2any(input, encoding) +{ + var divisor = encoding.length; + var remainders = Array(); + var i, q, x, quotient; + + /* Convert to an array of 16-bit big-endian values, forming the dividend */ + var dividend = Array(Math.ceil(input.length / 2)); + for(i = 0; i < dividend.length; i++) + { + dividend[i] = (input.charCodeAt(i * 2) << 8) | input.charCodeAt(i * 2 + 1); + } + + /* + * Repeatedly perform a long division. The binary array forms the dividend, + * the length of the encoding is the divisor. Once computed, the quotient + * forms the dividend for the next step. We stop when the dividend is zero. + * All remainders are stored for later use. + */ + while(dividend.length > 0) + { + quotient = Array(); + x = 0; + for(i = 0; i < dividend.length; i++) + { + x = (x << 16) + dividend[i]; + q = Math.floor(x / divisor); + x -= q * divisor; + if(quotient.length > 0 || q > 0) + quotient[quotient.length] = q; + } + remainders[remainders.length] = x; + dividend = quotient; + } + + /* Convert the remainders to the output string */ + var output = ""; + for(i = remainders.length - 1; i >= 0; i--) + output += encoding.charAt(remainders[i]); + + /* Append leading zero equivalents */ + var full_length = Math.ceil(input.length * 8 / + (Math.log(encoding.length) / Math.log(2))) + for(i = output.length; i < full_length; i++) + output = encoding[0] + output; + + return output; +} + +/* + * Encode a string as utf-8. + * For efficiency, this assumes the input is valid utf-16. + */ +function str2rstr_utf8(input) +{ + var output = ""; + var i = -1; + var x, y; + + while(++i < input.length) + { + /* Decode utf-16 surrogate pairs */ + x = input.charCodeAt(i); + y = i + 1 < input.length ? input.charCodeAt(i + 1) : 0; + if(0xD800 <= x && x <= 0xDBFF && 0xDC00 <= y && y <= 0xDFFF) + { + x = 0x10000 + ((x & 0x03FF) << 10) + (y & 0x03FF); + i++; + } + + /* Encode output as utf-8 */ + if(x <= 0x7F) + output += String.fromCharCode(x); + else if(x <= 0x7FF) + output += String.fromCharCode(0xC0 | ((x >>> 6 ) & 0x1F), + 0x80 | ( x & 0x3F)); + else if(x <= 0xFFFF) + output += String.fromCharCode(0xE0 | ((x >>> 12) & 0x0F), + 0x80 | ((x >>> 6 ) & 0x3F), + 0x80 | ( x & 0x3F)); + else if(x <= 0x1FFFFF) + output += String.fromCharCode(0xF0 | ((x >>> 18) & 0x07), + 0x80 | ((x >>> 12) & 0x3F), + 0x80 | ((x >>> 6 ) & 0x3F), + 0x80 | ( x & 0x3F)); + } + return output; +} + +/* + * Encode a string as utf-16 + */ +function str2rstr_utf16le(input) +{ + var output = ""; + for(var i = 0; i < input.length; i++) + output += String.fromCharCode( input.charCodeAt(i) & 0xFF, + (input.charCodeAt(i) >>> 8) & 0xFF); + return output; +} + +function str2rstr_utf16be(input) +{ + var output = ""; + for(var i = 0; i < input.length; i++) + output += String.fromCharCode((input.charCodeAt(i) >>> 8) & 0xFF, + input.charCodeAt(i) & 0xFF); + return output; +} + +/* + * Convert a raw string to an array of big-endian words + * Characters >255 have their high-byte silently ignored. + */ +function rstr2binb(input) +{ + var output = Array(input.length >> 2); + for(var i = 0; i < output.length; i++) + output[i] = 0; + for(var i = 0; i < input.length * 8; i += 8) + output[i>>5] |= (input.charCodeAt(i / 8) & 0xFF) << (24 - i % 32); + return output; +} + +/* + * Convert an array of big-endian words to a string + */ +function binb2rstr(input) +{ + var output = ""; + for(var i = 0; i < input.length * 32; i += 8) + output += String.fromCharCode((input[i>>5] >>> (24 - i % 32)) & 0xFF); + return output; +} + +/* + * Calculate the SHA-1 of an array of big-endian words, and a bit length + */ +function binb_sha1(x, len) +{ + /* append padding */ + x[len >> 5] |= 0x80 << (24 - len % 32); + x[((len + 64 >> 9) << 4) + 15] = len; + + var w = Array(80); + var a = 1732584193; + var b = -271733879; + var c = -1732584194; + var d = 271733878; + var e = -1009589776; + + for(var i = 0; i < x.length; i += 16) + { + var olda = a; + var oldb = b; + var oldc = c; + var oldd = d; + var olde = e; + + for(var j = 0; j < 80; j++) + { + if(j < 16) w[j] = x[i + j]; + else w[j] = bit_rol(w[j-3] ^ w[j-8] ^ w[j-14] ^ w[j-16], 1); + var t = safe_add(safe_add(bit_rol(a, 5), sha1_ft(j, b, c, d)), + safe_add(safe_add(e, w[j]), sha1_kt(j))); + e = d; + d = c; + c = bit_rol(b, 30); + b = a; + a = t; + } + + a = safe_add(a, olda); + b = safe_add(b, oldb); + c = safe_add(c, oldc); + d = safe_add(d, oldd); + e = safe_add(e, olde); + } + return Array(a, b, c, d, e); + +} + +/* + * Perform the appropriate triplet combination function for the current + * iteration + */ +function sha1_ft(t, b, c, d) +{ + if(t < 20) return (b & c) | ((~b) & d); + if(t < 40) return b ^ c ^ d; + if(t < 60) return (b & c) | (b & d) | (c & d); + return b ^ c ^ d; +} + +/* + * Determine the appropriate additive constant for the current iteration + */ +function sha1_kt(t) +{ + return (t < 20) ? 1518500249 : (t < 40) ? 1859775393 : + (t < 60) ? -1894007588 : -899497514; +} + +/* + * Add integers, wrapping at 2^32. This uses 16-bit operations internally + * to work around bugs in some JS interpreters. + */ +function safe_add(x, y) +{ + var lsw = (x & 0xFFFF) + (y & 0xFFFF); + var msw = (x >> 16) + (y >> 16) + (lsw >> 16); + return (msw << 16) | (lsw & 0xFFFF); +} + +/* + * Bitwise rotate a 32-bit number to the left. + */ +function bit_rol(num, cnt) +{ + return (num << cnt) | (num >>> (32 - cnt)); +} + diff --git a/SYSPROG/STPROCINS/RTI_PAJ_SHA_1.txt b/SYSPROG/STPROCINS/RTI_PAJ_SHA_1.txt new file mode 100644 index 0000000..721e70d --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_PAJ_SHA_1.txt @@ -0,0 +1,332 @@ +compile insert RTI_PAJ_SHA_1 +/* + * A JavaScript implementation of the Secure Hash Algorithm, SHA-1, as defined + * in FIPS 180-1 + * Version 2.2 Copyright Paul Johnston 2000 - 2009. + * Other contributors: Greg Holt, Andrew Kepert, Ydnar, Lostinet + * Distributed under the BSD License + * See http://pajhome.org.uk/crypt/md5 for details. + */ + +/* + * Configurable variables. You may need to tweak these to be compatible with + * the server-side, but the defaults work in most cases. + */ +var hexcase = 0; /* hex output format. 0 - lowercase; 1 - uppercase */ +var b64pad = ""; /* base-64 pad character. "=" for strict RFC compliance */ + +/* + * These are the functions you'll usually want to call + * They take string arguments and return either hex or base-64 encoded strings + */ +function hex_sha1(s) { return rstr2hex(rstr_sha1(str2rstr_utf8(s))); } +function b64_sha1(s) { return rstr2b64(rstr_sha1(str2rstr_utf8(s))); } +function any_sha1(s, e) { return rstr2any(rstr_sha1(str2rstr_utf8(s)), e); } +function hex_hmac_sha1(k, d) + { return rstr2hex(rstr_hmac_sha1(str2rstr_utf8(k), str2rstr_utf8(d))); } +function b64_hmac_sha1(k, d) + { return rstr2b64(rstr_hmac_sha1(str2rstr_utf8(k), str2rstr_utf8(d))); } +function any_hmac_sha1(k, d, e) + { return rstr2any(rstr_hmac_sha1(str2rstr_utf8(k), str2rstr_utf8(d)), e); } + +/* + * Perform a simple self-test to see if the VM is working + */ +function sha1_vm_test() +{ + return hex_sha1("abc").toLowerCase() == "a9993e364706816aba3e25717850c26c9cd0d89d"; +} + +/* + * Calculate the SHA1 of a raw string + */ +function rstr_sha1(s) +{ + return binb2rstr(binb_sha1(rstr2binb(s), s.length * 8)); +} + +/* + * Calculate the HMAC-SHA1 of a key and some data (raw strings) + */ +function rstr_hmac_sha1(key, data) +{ + var bkey = rstr2binb(key); + if(bkey.length > 16) bkey = binb_sha1(bkey, key.length * 8); + + var ipad = Array(16), opad = Array(16); + for(var i = 0; i < 16; i++) + { + ipad[i] = bkey[i] ^ 0x36363636; + opad[i] = bkey[i] ^ 0x5C5C5C5C; + } + + var hash = binb_sha1(ipad.concat(rstr2binb(data)), 512 + data.length * 8); + return binb2rstr(binb_sha1(opad.concat(hash), 512 + 160)); +} + +/* + * Convert a raw string to a hex string + */ +function rstr2hex(input) +{ + try { hexcase } catch(e) { hexcase=0; } + var hex_tab = hexcase ? "0123456789ABCDEF" : "0123456789abcdef"; + var output = ""; + var x; + for(var i = 0; i < input.length; i++) + { + x = input.charCodeAt(i); + output += hex_tab.charAt((x >>> 4) & 0x0F) + + hex_tab.charAt( x & 0x0F); + } + return output; +} + +/* + * Convert a raw string to a base-64 string + */ +function rstr2b64(input) +{ + try { b64pad } catch(e) { b64pad=''; } + var tab = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"; + var output = ""; + var len = input.length; + for(var i = 0; i < len; i += 3) + { + var triplet = (input.charCodeAt(i) << 16) + | (i + 1 < len ? input.charCodeAt(i+1) << 8 : 0) + | (i + 2 < len ? input.charCodeAt(i+2) : 0); + for(var j = 0; j < 4; j++) + { + if(i * 8 + j * 6 > input.length * 8) output += b64pad; + else output += tab.charAt((triplet >>> 6*(3-j)) & 0x3F); + } + } + return output; +} + +/* + * Convert a raw string to an arbitrary string encoding + */ +function rstr2any(input, encoding) +{ + var divisor = encoding.length; + var remainders = Array(); + var i, q, x, quotient; + + /* Convert to an array of 16-bit big-endian values, forming the dividend */ + var dividend = Array(Math.ceil(input.length / 2)); + for(i = 0; i < dividend.length; i++) + { + dividend[i] = (input.charCodeAt(i * 2) << 8) | input.charCodeAt(i * 2 + 1); + } + + /* + * Repeatedly perform a long division. The binary array forms the dividend, + * the length of the encoding is the divisor. Once computed, the quotient + * forms the dividend for the next step. We stop when the dividend is zero. + * All remainders are stored for later use. + */ + while(dividend.length > 0) + { + quotient = Array(); + x = 0; + for(i = 0; i < dividend.length; i++) + { + x = (x << 16) + dividend[i]; + q = Math.floor(x / divisor); + x -= q * divisor; + if(quotient.length > 0 || q > 0) + quotient[quotient.length] = q; + } + remainders[remainders.length] = x; + dividend = quotient; + } + + /* Convert the remainders to the output string */ + var output = ""; + for(i = remainders.length - 1; i >= 0; i--) + output += encoding.charAt(remainders[i]); + + /* Append leading zero equivalents */ + var full_length = Math.ceil(input.length * 8 / + (Math.log(encoding.length) / Math.log(2))) + for(i = output.length; i < full_length; i++) + output = encoding[0] + output; + + return output; +} + +/* + * Encode a string as utf-8. + * For efficiency, this assumes the input is valid utf-16. + */ +function str2rstr_utf8(input) +{ + var output = ""; + var i = -1; + var x, y; + + while(++i < input.length) + { + /* Decode utf-16 surrogate pairs */ + x = input.charCodeAt(i); + y = i + 1 < input.length ? input.charCodeAt(i + 1) : 0; + if(0xD800 <= x && x <= 0xDBFF && 0xDC00 <= y && y <= 0xDFFF) + { + x = 0x10000 + ((x & 0x03FF) << 10) + (y & 0x03FF); + i++; + } + + /* Encode output as utf-8 */ + if(x <= 0x7F) + output += String.fromCharCode(x); + else if(x <= 0x7FF) + output += String.fromCharCode(0xC0 | ((x >>> 6 ) & 0x1F), + 0x80 | ( x & 0x3F)); + else if(x <= 0xFFFF) + output += String.fromCharCode(0xE0 | ((x >>> 12) & 0x0F), + 0x80 | ((x >>> 6 ) & 0x3F), + 0x80 | ( x & 0x3F)); + else if(x <= 0x1FFFFF) + output += String.fromCharCode(0xF0 | ((x >>> 18) & 0x07), + 0x80 | ((x >>> 12) & 0x3F), + 0x80 | ((x >>> 6 ) & 0x3F), + 0x80 | ( x & 0x3F)); + } + return output; +} + +/* + * Encode a string as utf-16 + */ +function str2rstr_utf16le(input) +{ + var output = ""; + for(var i = 0; i < input.length; i++) + output += String.fromCharCode( input.charCodeAt(i) & 0xFF, + (input.charCodeAt(i) >>> 8) & 0xFF); + return output; +} + +function str2rstr_utf16be(input) +{ + var output = ""; + for(var i = 0; i < input.length; i++) + output += String.fromCharCode((input.charCodeAt(i) >>> 8) & 0xFF, + input.charCodeAt(i) & 0xFF); + return output; +} + +/* + * Convert a raw string to an array of big-endian words + * Characters >255 have their high-byte silently ignored. + */ +function rstr2binb(input) +{ + var output = Array(input.length >> 2); + for(var i = 0; i < output.length; i++) + output[i] = 0; + for(var i = 0; i < input.length * 8; i += 8) + output[i>>5] |= (input.charCodeAt(i / 8) & 0xFF) << (24 - i % 32); + return output; +} + +/* + * Convert an array of big-endian words to a string + */ +function binb2rstr(input) +{ + var output = ""; + for(var i = 0; i < input.length * 32; i += 8) + output += String.fromCharCode((input[i>>5] >>> (24 - i % 32)) & 0xFF); + return output; +} + +/* + * Calculate the SHA-1 of an array of big-endian words, and a bit length + */ +function binb_sha1(x, len) +{ + /* append padding */ + x[len >> 5] |= 0x80 << (24 - len % 32); + x[((len + 64 >> 9) << 4) + 15] = len; + + var w = Array(80); + var a = 1732584193; + var b = -271733879; + var c = -1732584194; + var d = 271733878; + var e = -1009589776; + + for(var i = 0; i < x.length; i += 16) + { + var olda = a; + var oldb = b; + var oldc = c; + var oldd = d; + var olde = e; + + for(var j = 0; j < 80; j++) + { + if(j < 16) w[j] = x[i + j]; + else w[j] = bit_rol(w[j-3] ^ w[j-8] ^ w[j-14] ^ w[j-16], 1); + var t = safe_add(safe_add(bit_rol(a, 5), sha1_ft(j, b, c, d)), + safe_add(safe_add(e, w[j]), sha1_kt(j))); + e = d; + d = c; + c = bit_rol(b, 30); + b = a; + a = t; + } + + a = safe_add(a, olda); + b = safe_add(b, oldb); + c = safe_add(c, oldc); + d = safe_add(d, oldd); + e = safe_add(e, olde); + } + return Array(a, b, c, d, e); + +} + +/* + * Perform the appropriate triplet combination function for the current + * iteration + */ +function sha1_ft(t, b, c, d) +{ + if(t < 20) return (b & c) | ((~b) & d); + if(t < 40) return b ^ c ^ d; + if(t < 60) return (b & c) | (b & d) | (c & d); + return b ^ c ^ d; +} + +/* + * Determine the appropriate additive constant for the current iteration + */ +function sha1_kt(t) +{ + return (t < 20) ? 1518500249 : (t < 40) ? 1859775393 : + (t < 60) ? -1894007588 : -899497514; +} + +/* + * Add integers, wrapping at 2^32. This uses 16-bit operations internally + * to work around bugs in some JS interpreters. + */ +function safe_add(x, y) +{ + var lsw = (x & 0xFFFF) + (y & 0xFFFF); + var msw = (x >> 16) + (y >> 16) + (lsw >> 16); + return (msw << 16) | (lsw & 0xFFFF); +} + +/* + * Bitwise rotate a 32-bit number to the left. + */ +function bit_rol(num, cnt) +{ + return (num << cnt) | (num >>> (32 - cnt)); +} + diff --git a/SYSPROG/STPROCINS/RTI_POPUP_DATETIME_EQUATES.txt b/SYSPROG/STPROCINS/RTI_POPUP_DATETIME_EQUATES.txt new file mode 100644 index 0000000..4f43cd3 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_POPUP_DATETIME_EQUATES.txt @@ -0,0 +1,87 @@ +compile insert rti_Popup_DateTime_Equates +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : 12 Jan 22 + Purpose : Equates for use with the RTI_POPUP_DATETIME dialog + + Comments + ======== + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_POPUP_DATETIME_EQUATES_ +#define _RTI_POPUP_DATETIME_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // CreateParam constants + // + // <1> Mode (DTS,DT,MTS,MT or D) + // <2> InitDate + // <3> InitTime + // <4> ownerCtrl + // <5> ownerAlign (L or R) + // <6> ownerScreenSize (see notes below) + // <7> firstYear + // <8> lastYear + // + // + // Notes + // ----- + // ownerScreenSize : If the owner is an AMV control and it's an EditTable + // : then we know how to get the screen size of the current + // : cell. If it's an OLE control then the caller will have + // : to pass it as we don't know how to access it. + + equ PDT_CP_POS_MODE$ to 1 ; // DTS,DT,MTS,MT or D + equ PDT_CP_POS_INITDATE$ to 2 ; // days + equ PDT_CP_POS_INITTIME$ to 3 ; // seconds + equ PDT_CP_POS_OWNERID$ to 4 ; // owner control + equ PDT_CP_POS_OWNERALIGN$ to 5 ; // h-alignment against owner, L or R + equ PDT_CP_POS_OWNERSCREENSIZE$ to 6 ; // @vm'd screensize (DIPs) of owner + equ PDT_CP_POS_FIRSTYEAR$ to 7 ; // First year in CBO_YEAR + equ PDT_CP_POS_LASTYEAR$ to 8 ; // Last year in CBO_YEAR + + // Mode + equ PDT_MODE_DTS$ to "DTS" + equ PDT_MODE_DT$ to "DT" + equ PDT_MODE_MTS$ to "MTS" + equ PDT_MODE_MT$ to "MT" + equ PDT_MODE_D$ to "D" + equ PDT_MODE_DEFAULT$ to PDT_MODE_D$ + + // Alignment + equ PDT_ALIGN_L$ to "L" + equ PDT_ALIGN_R$ to "R" + equ PDT_ALIGN_DEFAULT$ to PDT_ALIGN_L$ + +/////////////////////////////////////////////////////////////////////////////// + + // UDPs + equ PDT_UDP_CREATEPARAM$ to "@_PDT_CREATEPARAM" ; // @window + equ PDT_UDP_PREVYEAR$ to "@_PDT_PREVYEAR" ; // @window + equ PDT_UDP_PREVMONTH$ to "@_PDT_PREVMONTH" ; // @window + equ PDT_UDP_CURRDAY$ to "@_PDT_CURRDAY" ; // @window + equ PDT_UDP_CARETPOS$ to "@_PDT_CARETPOS" ; // @window + equ PDT_UDP_COLORPOS$ to "@_PDT_COLORPOS" ; // EDT_DAY + equ PDT_UDP_SELFORECOLOR$ to "@_PDT_SELFORECOLOR" ; // EDT_DAY + equ PDT_UDP_SELBACKCOLORCOLOR$ to "@_PDT_SELBACKCOLOR" ; // EDT_DAY + equ PDT_UDP_EXECWRITE$ to "@_PDT_EXECWRITE$" ; // @window + +/////////////////////////////////////////////////////////////////////////////// + + // Layout + equ PDT_BORDERMARGIN$ to 4 ; // DIPs + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + diff --git a/SYSPROG/STPROCINS/RTI_POSTSCRIPT_COMMON.txt b/SYSPROG/STPROCINS/RTI_POSTSCRIPT_COMMON.txt new file mode 100644 index 0000000..07158b8 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_POSTSCRIPT_COMMON.txt @@ -0,0 +1,19 @@ +compile insert RTI_POSTSCRIPT_COMMON + +COMMON /RTI_PS/ header@,footer@,body@,proforma_key@,proforma_def@,pagecount@,linecount@,bMultiFont@, Num_Hlines@, LinesPrinted@ + +/* +* mtr 1-17-04 + +header@ The Postscript Header, nothing to do with an Rlist heading on a page +footer@ The PostScript footer, nothing to do with an Rlist heading on a page +Body@ The data that eill be written to the .PS file, with all markup information +proforma_key@ The key for the proforma record in the SYSPROCS file, if used +proforma_def@ The proforma record in the SYSPROCS file, if used +pagecount@ The page number currently being processed +linecount@ The line number of the proforma definition currently being processed +bMultiFont@ A flag indicating whether Or Not there are multiple fonts In a line +Num_Hlines@ The number of lines In the Rlist header +LinesPrinted@ The number of lines printed In a page + +*/ diff --git a/SYSPROG/STPROCINS/RTI_QBF_EQUATES.txt b/SYSPROG/STPROCINS/RTI_QBF_EQUATES.txt new file mode 100644 index 0000000..805b913 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_QBF_EQUATES.txt @@ -0,0 +1,45 @@ +compile insert rti_QBF_Equates +/* + ** Copyright (C) 2012-2020 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date October 2013 + Purpose Equates for use with QBF functionality + + Amended Date Reason + ======= ==== ====== + Mr C 08 Dec 20 Added QBF_COLLECTION_MODE_OFF$ + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_QBF_EQUATES_ +#define _RTI_QBF_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ QBF_COLLECTION_MODE_OFF$ to 0 + equ QBF_COLLECTION_MODE_ON$ to 1 + +/////////////////////////////////////////////////////////////////////////////// + + // QBFSTATUS equates + + equ QBFSTAT_OFF$ to 0 ; * // QBF inactive + equ QBFSTAT_INIT$ to 1 ; * // QBF initialization (null browse list) + equ QBFSTAT_ACTIVE$ to 2 ; * // active browse list + + +/////////////////////////////////////////////////////////////////////////////// + + // QBFREADMODE equates + + equ QBFREADMODE_ONLYQBF$ to 0 ; // Use legacy QBF loader + equ QBFREADMODE_QBFTHENREAD$ to 1 ; // Use legacy QBF loader the READ event + equ QBFREADMODE_ONLYREAD$ to 2 ; // The READ event only + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_RBLAYOUT_EQUATES.txt b/SYSPROG/STPROCINS/RTI_RBLAYOUT_EQUATES.txt new file mode 100644 index 0000000..914db5a --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_RBLAYOUT_EQUATES.txt @@ -0,0 +1,88 @@ +Compile Insert RTI_rblayout_Equates +/* +* mtr 2-29-16 Happy Leap Day +* A record mark delimited structure - 14 parts or so... + +Reverse engineered from existing code...kinda...maybe 15 years late... + +* mtr 29 Mar 18 Added in ColDets equates + +*/ + + +Equ RPTPROPS$ To 1 +equ RPTTBLINFO$ To 2 +equ RPTCOLINFO$ To 3 +equ RPTSORTINFO$ To 4 +equ RPTSELCRIT$ To 5 +equ RPTPRINTERINFO$ To 6 ;* printerinfo = field(ReportTemplate, @rm,6) +equ RPTOUTFILEINFO$ To 7 ;* outfileinfo = field(ReportTemplate, @rm,7) +equ RPTFONTINFO$ To 8 ;* fontdetails = field(ReportTemplate, @rm,8) +equ RPTTYPEINFO$ To 9 ;* reporttype = field(ReportTemplate,@rm,9) +equ RPTLABELINFO$ To 10 ;* labeltype = field(ReportTemplate,@rm,10) +equ RPTSCRIPTINFO$ to 11 ;* scriptlist = field(ReportTemplate,@rm,11) +equ RPTGRIDINFO$ To 12 ;* gridson = field(ReportTemplate,@rm,12) +* what's in 13? +equ RPTMARGININFO$ To 14 ;* mymargins = Field(ReportTemplate,@rm,14) + + +// @rm part 1 - Report Properties + +Equ RPTLISTSTMT$ To 1 +Equ RPTUPDATED$ To 2 +Equ RPTOPTS$ To 3 + +Equ RPTOPTS_SHOWHEADER$ To 1 ;* <3,1> +Equ RPTOPTS_SHOWFOOTER$ To 2 ;* <3,2> +Equ RPTOPTS_SHOWCOLHEADER$ To 3 ;* <3,3> +Equ RPTOPTS_SHOWDETAIL$ To 4 ;* <3,4> +Equ RPTOPTS_HEADERTEXT$ To 5 ;* <3,5> +Equ RPTOPTS_FOOTERTEXT$ To 6 ;* <3,6> +Equ RPTOPTS_DESCRIPTION$ To 7 ;* <3,7> +Equ RPTOPTS_SHOWGRID$ To 8 ;* <3,8> +Equ RPTOPTS_LABELFLAG$ To 9 ;* <3,9> +Equ RPTOPTS_ORIENTATION$ To 10 ;* <3,10> +Equ RPTOPTS_SUPPRESSION$ To 11 ;* <3,11> +Equ RPTOPTS_SHOWROWCOUNT$ To 12 ;* <3,12> + +Equ RPTOPTS_BEHAVIOR$ To 13 ;* <12,1> +Equ RPTOPTS_ROWSON$ To 14 ;* <12,4> +Equ RPTOPTS_NOCOLUMNS$ To 15 ;* <12,2> + +Equ RPTOPTS_DEFAULTFONT$ To 16 ;* <12,1> +Equ RPTOPTS_COLHDRFONT$ To 17 ;* <12,2> +Equ RPTOPTS_HEADERFONT$ To 18 ;* <12,3> +Equ RPTOPTS_FOOTERFONT$ To 19 ;* <12,4> + + +// @RM part 2 - Table Info +Equ RPTTABLE$ To 1 +Equ RPTDICT$ To 2 + +// @RM part 3 - Column Info, names and details, separated by a division symbol... +Equ RPTCOLNAME$ To 1 +Equ RPTCOLDETS$ To 2 + +// ColumnDetails = 11 parts + +Equ ColDetAction$ To 1 ;* 2=BreakOn, 3=Total, 4=Average +Equ ColDetSortOrder$ To 2 ;* 1=Ascending, 2=Descending +Equ ColDetBreaks$ To 3 ;* underline, overline, page, etc +Equ ColDetBreakVal$ To 4 +Equ ColDetLabel$ To 5 +Equ ColDetWidth$ To 6 +Equ ColDetConv$ To 7 +Equ ColDetJust$ To 8 +Equ ColDetShade$ To 9 +Equ ColDetFont$ To 10 +Equ ColDetSizeUnit$ To 11 + +Equ ColDetBreakOn$ To 2 +Equ ColDetTotal$ To 3 +Equ ColDetAvg$ To 4 + +Equ ColDetsortAsc$ To 1 +Equ ColDetsortDesc$ To 2 + + + diff --git a/SYSPROG/STPROCINS/RTI_READU_EQUATES.txt b/SYSPROG/STPROCINS/RTI_READU_EQUATES.txt new file mode 100644 index 0000000..603d4bf --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_READU_EQUATES.txt @@ -0,0 +1,13 @@ +COMPILE Insert RTI_READU_EQUATES + +$insert Fserrors_Hdr +$insert FSErrors_100 +$insert FSErrors_200 +$insert FSErrors_400 + +EQU STATUS_READ_OK$ TO 1 +Equ STATUS_UNLOCK_OK$ To 1 +Equ STATUS_WRITE_OK$ To 1 + +Declare Function RTI_READU, RTI_WRITEU, RTI_WRITERELEASE, RTI_UNLOCK + diff --git a/SYSPROG/STPROCINS/RTI_REGENERATE_BANG_RECORD_EQUATES.txt b/SYSPROG/STPROCINS/RTI_REGENERATE_BANG_RECORD_EQUATES.txt new file mode 100644 index 0000000..e3129c9 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_REGENERATE_BANG_RECORD_EQUATES.txt @@ -0,0 +1,47 @@ +compile Insert rti_regenerate_bang_Record_equates +/* +** Equates for rti_regenerate_bang_record +** 08-21-21 rjc Created +** +** + + /* -------------------------------------------------------------------------- + Equates for RTI_REGENERATE_BANG_RECORD + + Regenerate the '!' record in the '!MYTABLE' file without needing to toggle an index + + filename (in, required) = a delimited list of table names, + '*' for all attached indexed tables + + + Modes: + + mode 1 (default) - Regenerate the ! record as a dictionary compiled entity without linemarks + mode 2 - Generate BANG_MYTABLE stored procedure, + and a dummy '!' record which calls the stored procedure. + This allows you to de-bug or customize the indexing code. + mode 3 - Fix FS210. It will modify the !MYTABLE record in the !MYTABLE file to match the volume id. + + + Notes: + + This program regenerates the ! from the '*INDEXES' record in the '!MYTABLE' file + It does not compare the '*INDEXES' to the dictionary flags + It tries to flush the indexes in order to trigger errors. + + + Examples: + + table = "BOOKS" + mode = mode_shim$ + call rti_regenerate_bang_record( table, mode) + +*/ + + + + Equ mode_default$ to 1 ; * regenerate the ! record + Equ mode_shim$ To 2 ; * create a stored procedure for debugging the ! record + Equ mode_fix_volid$ To 3 ; * fix the volumne label stored in the ! file. + + Declare Function rti_regenerate_bang_Record diff --git a/SYSPROG/STPROCINS/RTI_RESOLVE_SELECT_CALLBACK_COMMON.txt b/SYSPROG/STPROCINS/RTI_RESOLVE_SELECT_CALLBACK_COMMON.txt new file mode 100644 index 0000000..099b7fb --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_RESOLVE_SELECT_CALLBACK_COMMON.txt @@ -0,0 +1,9 @@ +compile Insert rti_resolve_Select_callback_common +/* +** 12-19-21 rjc Created +*/ + +Equ cursor_common_max$ To 8 +common /rti_resolve_Select_com/init@, continue@(cursor_common_max$), listeners@, listener_Cnt@, lastYield@, progressId(cursor_common_max$), pctDone(cursor_common_max$), tableCount(cursor_common_max$),tableName(cursor_common_max$),progressCount(cursor_common_max$),action(cursor_Common_max$),debugging +common /rti_rslvSel_Gui_com/bGuiEnabled(cursor_common_max$),guiHandler(cursor_common_max$) +common /rti_rslvSel_brw_com/bRemoteMode@,hEngine@,hQueue@,uid@ diff --git a/SYSPROG/STPROCINS/RTI_RESOLVE_SELECT_CALLBACK_EQUATES.txt b/SYSPROG/STPROCINS/RTI_RESOLVE_SELECT_CALLBACK_EQUATES.txt new file mode 100644 index 0000000..0c32195 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_RESOLVE_SELECT_CALLBACK_EQUATES.txt @@ -0,0 +1,40 @@ +compile Insert rti_resolve_Select_callback_equates +/* +** Parameters for implementing your own select callback +** +** 12-17-21 rjc fix max_cursor, move the common here +*/ + + +* Methods +Equ rtirsc_start$ To 1 +Equ rtirsc_progress$ To 2 +Equ rtirsc_complete$ To 3 +Equ rtirsc_cancel$ To 4 +Equ rtirsc_error$ To 5 +Equ rtirsc_register_listener$ To 6 +Equ rtirsc_unregister_listener$ To 7 +Equ rtirsc_getContinue$ To 8 +Equ rtirsc_SetContinue$ To 9 +Equ rtirsc_IncrementCount$ To 10 +Equ rtirsc_setDisplayHandler$ To 11 +Equ rtirsc_getDisplayHandler$ To 12 +Equ rtirsc_EnableGui$ To 13 +Equ rtirsc_DisableGui$ To 14 +Equ rtirsc_getGuiEnabled$ To 15 + +* Dimenson of all xxx(cursor) arrays +Equ max_cursor$ To 8 ; * 12-17-21 rjc + +* nr of params required to register as a listener or guiHandler +Equ minParamCount$ to 6 + +* Phases +Equ rtirsc_phase_select$ To 1 +Equ rtirsc_phase_sort$ To 2 +Equ rtirsc_phase_report$ To 3 + +Equ rtirsc_phase_descriptions$ To 'Selecting':@svm:'Sorting':@svm:'Reporting' + +Declare Function rti_resolve_select_callback +Declare subroutine rti_resolve_select_callback diff --git a/SYSPROG/STPROCINS/RTI_RESOURCES_EQUATES.txt b/SYSPROG/STPROCINS/RTI_RESOURCES_EQUATES.txt new file mode 100644 index 0000000..a76b176 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_RESOURCES_EQUATES.txt @@ -0,0 +1,41 @@ +compile insert rti_Resources_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + This insert is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : September 2012 + Purpose : Equates for use with programs that link to the RTI_RESOURCES + record. + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_RESOURCES_EQUATES_ +#define _RTI_RESOURCES_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_Res2Str + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $uses @APPID*APPROW**SYSENV:RTI_RESOURCES + equ RESID$ to "RTI_RESOURCES" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_REVPROFILELOG_EQUATES.txt b/SYSPROG/STPROCINS/RTI_REVPROFILELOG_EQUATES.txt new file mode 100644 index 0000000..3713824 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_REVPROFILELOG_EQUATES.txt @@ -0,0 +1,42 @@ +compile insert rti_RevProfileLog_Equates +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date 02 Nov 2022 + Purpose Equates for use with the RevProfileLog function + + Comments + ======== + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_REVPROFILELOG_EQUATES_ +#define _RTI_REVPROFILELOG_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare subroutine RevProfileLog + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ RPL_STARTLOG$ to 1; // Call RevProfileLog( RPL_STARTLOG$, fileName, bClear ) + equ RPL_STOPLOG$ to 2; // Call RevProfileLog( RPL_STOPLOG$ ) + equ RPL_SETNOTE$ to 3; // Call RevProfileLog( RPL_SETNOTE$, Text ) + equ RPL_OUTPUTTEXT$ to 4; // Call RevProfileLog( RPL_OUTPUTTEXT$, Text, Indent ) + equ RPL_EXCLUDEPROC$ to 5; // Call RevProfileLog( RPL_EXCLUDEPROC$, procName ) + equ RPL_INCLUDEPROC$ to 6; // Call RevProfileLog( RPL_INCLUDEPROC$, procName ) + equ RPL_CLEAREXCLUDED$ to 7; // Call RevProfileLog( RPL_CLEAREXCLUDED$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + + diff --git a/SYSPROG/STPROCINS/RTI_RJSON_EQUATES.txt b/SYSPROG/STPROCINS/RTI_RJSON_EQUATES.txt new file mode 100644 index 0000000..550b4f6 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_RJSON_EQUATES.txt @@ -0,0 +1,69 @@ +compile insert rti_RJSON_Equates +/* + ** Copyright (C) 1992-2023 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : March 2023 + Purpose : Constants for use with the RevJSON DLL "RapidJSON" functions + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_RJSON_EQUATES_ +#define _RTI_RJSON_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_RJSON + + equ RJSON_MTD_PARSE$ to 1 + equ RJSON_MTD_DELETE$ to 2 + equ RJSON_MTD_GETITEM$ to 3 + equ RJSON_MTD_GETITEMTYPE$ to 4 + equ RJSON_MTD_GETITEMCOUNT$ to 5 + equ RJSON_MTD_GETITEMVALUE$ to 6 + equ RJSON_MTD_GETOBJECTMEMBERS$ to 7 + equ RJSON_MTD_GETARRAYELEMENTS$ to 8 + equ RJSON_MTD_HASMEMBER$ to 9; + equ RJSON_MTD_HASELEMENT$ to 10; + equ RJSON_MTD_CREATEITEM$ to 11; + equ RJSON_MTD_SETITEMMEMBER$ to 12; + equ RJSON_MTD_SETITEMELEMENT$ to 13; + equ RJSON_MTD_SETITEMVALUE$ to 14; + equ RJSON_MTD_SETITEMARRAY$ to 15; + equ RJSON_MTD_APPENDITEM$ to 16; + equ RJSON_MTD_APPENDVALUE$ to 17; + equ RJSON_MTD_APPENDARRAY$ to 18; + equ RJSON_MTD_REMOVEITEM$ to 19; + equ RJSON_MTD_REMOVEALL$ to 20; + equ RJSON_MTD_STRINGIFY$ to 21; + equ RJSON_MTD_VALIDATE$ to 22; + +/////////////////////////////////////////////////////////////////////////////// + + // JSON item types + equ RJSON_TYPE_UNKNOWN$ to 0 + equ RJSON_TYPE_NULL$ to 1 + equ RJSON_TYPE_BOOL$ to 2 + equ RJSON_TYPE_NUMBER$ to 3 + equ RJSON_TYPE_OBJECT$ to 4 + equ RJSON_TYPE_ARRAY$ to 5 + equ RJSON_TYPE_STRING$ to 6 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_SELECT_REPOS_ENTITIES_EQUATES.txt b/SYSPROG/STPROCINS/RTI_SELECT_REPOS_ENTITIES_EQUATES.txt new file mode 100644 index 0000000..6d38cb7 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_SELECT_REPOS_ENTITIES_EQUATES.txt @@ -0,0 +1,79 @@ +compile insert rti_Select_Repos_Entities_Equates +/* + ** Copyright (c) 1990-2015 Revelation Software. All rights reserved.** + + * This program is proprietary and is not to be used by or disclosed + * to others, nor is it to be copied without written permission from + * Revelation Technologies, Inc. + + Author Carl Of Cthulhu + Date June 2015 + Purpose Constants for use with the SELECT_REPOS_ENTITIES function + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +///////////////////////////////////////////////////////////////////////////////*/ + + equ SRE_FILTERCMD_PREFIX$ to "?" + equ SRE_FILTEROPS$ to "=,==,<>,!=,#,>,>=,<,<=,[,],[]" + + equ SRE_FILTERSTATE_CMD$ to 1 + equ SRE_FILTERSTATE_OP$ to 2 + equ SRE_FILTERSTATE_DATA$ to 3 + equ SRE_FILTERSTATE_EOF$ to 4 + + equ SRE_FILTERCMD_CLASS$ to "CL" + equ SRE_FILTERCMD_DATE$ to "DT" + equ SRE_FILTERCMD_ENTID$ to "ID" + equ SRE_FILTERCMD_FLAGS$ to "FL" + equ SRE_FILTERCMD_TIME$ to "TM" + equ SRE_FILTERCMD_TYPE$ to "TY" + equ SRE_FILTERCMD_USER$ to "UN" + equ SRE_FILTERCMD_USING$ to "US" + equ SRE_FILTERCMD_USEDBY$ to "UB" + equ SRE_FILTERCMD_VIEW$ to "VW" + + equ SRE_FILTERIDX_CLASS$ to 1 + equ SRE_FILTERIDX_DATE$ to 2 + equ SRE_FILTERIDX_ENTID$ to 3 + equ SRE_FILTERIDX_FLAGS$ to 4 + equ SRE_FILTERIDX_TIME$ to 5 + equ SRE_FILTERIDX_TYPE$ to 6 + equ SRE_FILTERIDX_USER$ to 7 + equ SRE_FILTERIDX_USING$ to 8 + equ SRE_FILTERIDX_USEDBY$ to 9 + equ SRE_FILTERIDX_VIEW$ to 10 + + equ SRE_FILTERFLG_CLASS$ to 0x0001 + equ SRE_FILTERFLG_DATE$ to 0x0002 + equ SRE_FILTERFLG_ENTID$ to 0x0004 + equ SRE_FILTERFLG_FLAGS$ to 0x0008 + equ SRE_FILTERFLG_TIME$ to 0x0010 + equ SRE_FILTERFLG_TYPE$ to 0x0020 + equ SRE_FILTERFLG_USER$ to 0x0040 + equ SRE_FILTERFLG_USING$ to 0x0080 + equ SRE_FILTERFLG_USEDBY$ to 0x0100 + equ SRE_FILTERFLG_VIEW$ to 0x0200 + + equ SRE_FILTERFLG_DATETIME$ to 0x0012; ; * // Mask of FILTERFLG_DATE$ and FILTERFLG_TIME$ + + equ SRE_FILTERARRAY_CMD$ to 1 + equ SRE_FILTERARRAY_OP$ to 2 + equ SRE_FILTERARRAY_DATA$ to 3 + + equ SRE_FILTERMASK_READRECS$ to ( SRE_FILTERFLG_DATE$ + SRE_FILTERFLG_FLAGS$ + SRE_FILTERFLG_TIME$ + SRE_FILTERFLG_USER$ ) + equ SRE_FILTERMASK_SCANIDS$ to ( SRE_FILTERMASK_READRECS$ + SRE_FILTERFLG_ENTID$ ) + + equ SRE_FILTER_FLAG_CHKOUT$ to "C" + equ SRE_FILTER_FLAG_EVAL$ to "E" + equ SRE_FILTER_FLAG_PUB$ to "P" + equ SRE_FILTER_FLAG_RECMP$ to "R" + equ SRE_FILTER_FLAG_SHARE$ to "S" + diff --git a/SYSPROG/STPROCINS/RTI_SEND_INFO_PROGRESS_EQUATES.txt b/SYSPROG/STPROCINS/RTI_SEND_INFO_PROGRESS_EQUATES.txt new file mode 100644 index 0000000..5abf481 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_SEND_INFO_PROGRESS_EQUATES.txt @@ -0,0 +1,59 @@ +compile insert rti_Send_Info_Progress_Equates +/* + ** Copyright (C) 2014-2022 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : 19 Oct 2018 + Purpose : Equates for use with the RTI_SEND_INFO_PROGRESS subroutine + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 31 Oct 22 Added PROGRESS_OPTIONS$ +*/ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_SEND_INFO_PROGRESS_EQUATES_ +#define _RTI_SEND_INFO_PROGRESS_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function rti_Send_Info_Progress + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Client interface array structure + + equ PROGRESS_PHASE$ to 1 + equ PROGRESS_TITLE$ to 2 + equ PROGRESS_DATA$ to 3 + equ PROGRESS_WINID$ to 4 + equ PROGRESS_OPTIONS$ to 5 + + // Client interface tokens + + equ PROGRESS_INIT_TOKEN$ to "%INIT%" + equ PROGRESS_QUIT_TOKEN$ to "%QUIT%" + + equ PROGRESS_WIN_ID$ to "RTI_SEND_INFO_PROGRESS" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // RTI_SEND_INFO_PROGRESS_TASKLIST image equates + + equ PROGRESS_IMGNO_UNKNOWN$ to 1 + equ PROGRESS_IMGNO_PROCESSING$ to 2 + equ PROGRESS_IMGNO_COMPLETE$ to 3 + equ PROGRESS_IMGNO_ERROR$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_SSP_EQUATES.txt b/SYSPROG/STPROCINS/RTI_SSP_EQUATES.txt new file mode 100644 index 0000000..9b3b31f --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_SSP_EQUATES.txt @@ -0,0 +1,37 @@ +compile insert rti_SSP_Equates +/* + ** Copyright (C) 2012 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Oct 2012 + Purpose Simple equates to declare the OI SSP constants for use with + Get_Status and Set_Status + + Comments + ======== + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_SSP_EQUATES_ +#define _RTI_SSP_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function get_Status, set_Status + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SETSTAT_OK$ to 0 + equ SETSTAT_ERR$ to 1 + equ SETSTAT_APPEND$ to -1 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/RTI_STD_INSERT.txt b/SYSPROG/STPROCINS/RTI_STD_INSERT.txt new file mode 100644 index 0000000..27b6e9f --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_STD_INSERT.txt @@ -0,0 +1,64 @@ +compile insert rti_std_insert +/* ---------------------------------------------------------------------------- + Author : David Goddard, WinWin Solutions Australia Pty Ltd + Created : 12 April 2005 + Version : 1.0.0.2 + Date : 7 July 2011 + Purpose : Standard insert for use with stored procedures + + Modification Info: + ---------------------------------------------------------------------------- + Date Who Notes + ---------------------------------------------------------------------------- + 110707 DGG Added rti namespace equates + + 100601 DGG Added NullTerm$ + --------------------------------------------------------------------------*/ + +/* comparision operators - from logical insert DEPRECIATED */ +equ otherwise$ to 1 +equ true$ to 1 +equ false$ to 0 +equ yes$ to 1 +equ no$ to 0 + +/* common ascii characters DEPRECIATED */ +equ null$ to '' +equ cr$ to \0D\ +equ lf$ to \0A\ +equ crlf$ to \0D0A\ +equ space$ to \20\ +equ tab$ to \09\ +equ comma$ to \2C\ +equ nullTerm$ to \00\ +equ star$ to \2A\ +equ dash$ to \2D\ +equ underscore$ to \5F\ +equ backslash$ to \5C\ +equ forwardslash$ to \2F\ + +/* rti namespace equates */ +equ rti_otherwise$ to 1 +equ rti_true$ to 1 +equ rti_false$ to 0 +equ rti_yes$ to 1 +equ rti_no$ to 0 + +equ rti_null$ to '' +equ rti_nullTerm$ to \00\ +equ rti_tab$ to \09\ +equ rti_cr$ to \0D\ +equ rti_lf$ to \0A\ +equ rti_crlf$ to \0D0A\ +equ rti_space$ to \20\ +equ rti_bang$ to \21\ +equ rti_star$ to \2A\ +equ rti_comma$ to \2C\ +equ rti_dash$ to \2D\ +equ rti_dot$ to \2E\ +equ rti_forwardslash$ to \2F\ +equ rti_at$ to \40\ +equ rti_backslash$ to \5C\ +equ rti_underscore$ to \5F\ +equ rti_pipe$ to \7C\ + diff --git a/SYSPROG/STPROCINS/RTI_STRCMPMODE_EQUATES.txt b/SYSPROG/STPROCINS/RTI_STRCMPMODE_EQUATES.txt new file mode 100644 index 0000000..aeba79a --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_STRCMPMODE_EQUATES.txt @@ -0,0 +1,49 @@ +compile insert rti_StrCmpMode_Equates +/* + ** Copyright (C) 2012-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : May 2021 + Purpose : Equates for use with the Extended String Compare Mode functions + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 19 May 21 Added function declarations + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_STRCMPMODE_EQUATES_ +#define _RTI_STRCMPMODE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function GetDefaultStrCmpMode, SetDefaultStrCmpMode + declare function GetStrCmpMode, SetStrCmpMode, GetStrCmpStatus + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Extended String Compare Mode values + equ STRCMPMODE_NORMAL$ to 0 + equ STRCMPMODE_LINGUISTIC$ to 1 ; // Use CompareStringEx() + equ STRCMPMODE_ORDINAL$ to 2 ; // Use CompareStringOrdinal() + + // GetDefaultStrCmpMode and GetStrCmpMode return value equates + // + // <1> Mode + // <2> Flags + // <3> Locale + equ GETSTRCMPMODE_MODE$ to 1 + equ GETSTRCMPMODE_FLAGS$ to 2 + equ GETSTRCMPMODE_LOCALE$ to 3 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_STRCONV_EQUATES.txt b/SYSPROG/STPROCINS/RTI_STRCONV_EQUATES.txt new file mode 100644 index 0000000..4fa26f1 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_STRCONV_EQUATES.txt @@ -0,0 +1,35 @@ +compile insert rti_StrConv_Equates +/* + ** Copyright (C) 2013-2022 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date October 2013 + Purpose Equates for OE String conversion functions + + Comments + ======== + + This module simply declares the OE string encoding functions exported from + CRevExt.Dll. Basically it's because I'm sick of typing them :) + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_STRCONV_EQUATES_ +#define _RTI_STRCONV_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function str_ANSI, str_UTF8, str_Unicode + declare function ANSI_Str, ANSI_UTF8, ANSI_Unicode + declare function UTF8_Str, UTF8_ANSI, UTF8_Unicode + declare function Unicode_Str, Unicode_ANSI, Unicode_UTF8 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_STRUCT_EQUATES.txt b/SYSPROG/STPROCINS/RTI_STRUCT_EQUATES.txt new file mode 100644 index 0000000..eb28000 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_STRUCT_EQUATES.txt @@ -0,0 +1,35 @@ +compile insert rti_Struct_Equates +/* + ** Copyright (C) 2012-2022 Revelation Software Inc. All Rights Reserved ** + + Author Mr C + Date Oct 2012 + Purpose Simple equates to declare the OI struct functions as I'm sick of + having to type them when I need them + + Comments + ======== + + This is not the full Struct_Equates - that brings in all the internal + workings of the C-Structure routines, which we don't need to expose for + every program that uses a structure. + + Amended Date Reason + ======= ==== ====== +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _RTI_STRUCT_EQUATES_ +#define _RTI_STRUCT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function blank_Struct, struct_Len, struct_To_Var, var_To_Struct + declare function build_Struct, parse_Struct + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/RTI_STYLE_EQUATES.txt b/SYSPROG/STPROCINS/RTI_STYLE_EQUATES.txt new file mode 100644 index 0000000..99a114f --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_STYLE_EQUATES.txt @@ -0,0 +1,208 @@ +Compile Insert RTI_Style_Equates + +/////////////////////////////////////////////////////////////////////////////////////////////////////////// +// Copyright (c) 2011 Revelation Software - All Rights Reserved +// +// Author - Erik Smith +// Date - January 2011 +// Purpose - Various Values For Window And Control Styles. +// Notes - Released In 9.2.1. Derived From STYLE_EQUATES. Credit To Carl Pates At Sprezzatura For +// Portions of this Code. They can be downloaded as part of the Sprezzatura API Library at +// http://sprezzblog.blogspot.com/2010/06/sprezzatura-windows-api-library.html +// Warnings - This Is Not a Complete List Of Styles. Please Visit Microsoft MSDN for a more complete List. +// ANY CHANGES TO THIS PROGRAM MAY BE OVERWRITTEN IN SUBSEQUENT RELEASES! +// +// Version - 1.0 +// +// Amended Date Reason +// ======= ======== ============================================================================ +// +// +//////////////////////////////////////////////////////////////////////////////////////////////////////////// + +// Window Styles ------------------------------------------------------------------------------------------- +Equ WS_OVERLAPPED$ To 0x00000000 +Equ WS_POPUP$ To 0x80000000 +Equ WS_CHILD$ To 0x40000000 +Equ WS_MINIMIZE$ To 0x20000000 +Equ WS_VISIBLE$ To 0x10000000 +Equ WS_DISABLED$ To 0x08000000 +Equ WS_CLIPSIBLINGS$ To 0x04000000 +Equ WS_CLIPCHILDREN$ To 0x02000000 +Equ WS_MAXIMIZE$ To 0x01000000 +Equ WS_CAPTION$ To 0x00C00000 +Equ WS_BORDER$ To 0x00800000 +Equ WS_DLGFRAME$ To 0x00400000 +Equ WS_VSCROLL$ To 0x00200000 +Equ WS_HSCROLL$ To 0x00100000 +Equ WS_SYSMENU$ To 0x00080000 +Equ WS_THICKFRAME$ To 0x00040000 +Equ WS_GROUP$ To 0x00020000 +Equ WS_TABSTOP$ To 0x00010000 +Equ WS_MINIMIZEBOX$ To 0x00020000 +Equ WS_MAXIMIZEBOX$ To 0x00010000 + +// Extended Window Styles ---------------------------------------------------------------------------------- +Equ WS_EX_DLGMODALFRAME$ To 0x00000001 +Equ WS_EX_DRAGOBJECT$ To 0x00000002 +Equ WS_EX_NOPARENTNOTIFY$ To 0x00000004 +Equ WS_EX_TOPMOST$ To 0x00000008 +Equ WS_EX_ACCEPTFILES$ To 0x00000010 +Equ WS_EX_TRANSPARENT$ To 0x00000020 + +// Button Styles ------------------------------------------------------------------------------------------- +Equ BS_PUSHBUTTON$ To 0x00000000 +Equ BS_DEFPUSHBUTTON$ To 0x00000001 +Equ BS_CHECKBOX$ To 0x00000002 +Equ BS_AUTOCHECKBOX$ To 0x00000003 +Equ BS_RADIOBUTTON$ To 0x00000004 +Equ BS_3STATE$ To 0x00000005 +Equ BS_AUTO3STATE$ To 0x00000006 +Equ BS_GROUPBOX$ To 0x00000007 +Equ BS_USERBUTTON$ To 0x00000008 +Equ BS_AUTORADIOBUTTON$ To 0x00000009 +Equ BS_PUSHBOX$ To 0x0000000A +Equ BS_OWNERDRAW$ To 0x0000000B +Equ BS_LEFTTEXT$ To 0x00000020 + +// Static Styles ------------------------------------------------------------------------------------------- +Equ SS_LEFT$ To 0x00000000 +Equ SS_CENTER$ To 0x00000001 +Equ SS_RIGHT$ To 0x00000002 +Equ SS_ICON$ To 0x00000003 +Equ SS_BLACKRECT$ To 0x00000004 +Equ SS_GRAYRECT$ To 0x00000005 +Equ SS_WHITERECT$ To 0x00000006 +Equ SS_BLACKFRAME$ To 0x00000007 +Equ SS_GRAYFRAME$ To 0x00000008 +Equ SS_WHITEFRAME$ To 0x00000009 +Equ SS_USERITEM$ To 0x0000000A +Equ SS_SIMPLE$ To 0x0000000B +Equ SS_LEFTNOWORDWRAP$ To 0x0000000C +Equ SS_OWNERDRAW$ To 0x0000000D + +// ListBox Styles ------------------------------------------------------------------------------------------ +Equ LBS_NOTIFY$ To 0x00000001 +Equ LBS_SORT$ To 0x00000002 +Equ LBS_NOREDRAW$ To 0x00000004 +Equ LBS_MULTIPLESEL$ To 0x00000008 +Equ LBS_OWNERDRAWFIXED$ To 0x00000010 +Equ LBS_OWNERDRAWVARIABLE$ To 0x00000020 +Equ LBS_HASSTRINGS$ To 0x00000040 +Equ LBS_USETABSTOPS$ To 0x00000080 +Equ LBS_NOINTEGRALHEIGHT$ To 0x00000100 +Equ LBS_MULTICOLUMN$ To 0x00000200 +Equ LBS_WANTKEYBOARDINPUT$ To 0x00000400 +Equ LBS_EXTENDEDSEL$ To 0x00000800 +Equ LBS_DISABLENOSCROLL$ To 0x00001000 +Equ LBS_NODATA$ To 0x00002000 +Equ LBS_NOSEL$ To 0x00004000 + +// ComboBox Styles ----------------------------------------------------------------------------------------- +Equ CBS_SIMPLE$ To 0x00000001 +Equ CBS_DROPDOWN$ To 0x00000002 +Equ CBS_DROPDOWNLIST$ To 0x00000003 +Equ CBS_OWNERDRAWFIXED$ To 0x00000010 +Equ CBS_OWNERDRAWVARIABLE$ To 0x00000020 +Equ CBS_AUTOHSCROLL$ To 0x00000040 +Equ CBS_OEMCONVERT$ To 0x00000080 +Equ CBS_SORT$ To 0x00000100 +Equ CBS_HASSTRINGS$ To 0x00000200 +Equ CBS_NOINTEGRALHEIGHT$ To 0x00000400 +Equ CBS_DISABLENOSCROLL$ To 0x00000800 +Equ CBS_UPPERCASE$ To 0x00002000 +Equ CBS_LOWERCASE$ To 0x00004000 + +// ScrollBar Styles ---------------------------------------------------------------------------------------- +Equ SBS_HORZ$ To 0x00000000 +Equ SBS_VERT$ To 0x00000001 +Equ SBS_TOPALIGN$ To 0x00000002 +Equ SBS_LEFTALIGN$ To 0x00000002 +Equ SBS_BOTTOMALIGN$ To 0x00000004 +Equ SBS_RIGHTALIGN$ To 0x00000004 +Equ SBS_SIZEBOXTOPLEFTALIGN$ To 0x00000002 +Equ SBS_SIZEBOXBOTTOMRIGHTALIGN$ To 0x00000004 +Equ SBS_SIZEBOX$ To 0x00000008 +Equ SBS_SIZEGRIP$ To 0x00000010 + +// EditTable Styles ---------------------------------------------------------------------------------------- +Equ DTS_EDIT$ To 0x00000004 +Equ DTS_RESIZE$ To 0x00000008 +Equ DTS_NONE$ To 0x00000000 +Equ DTS_NUMBERS$ To 0x00000010 +Equ DTS_LETTERS$ To 0x00000020 +Equ DTS_OWNERDEF$ To 0x00000030 +Equ DTS_HGRID$ To 0x00000040 +Equ DTS_VGRID$ To 0x00000080 +Equ DTS_ROWSELECT$ To 0x00000100 +Equ DTS_MULTIROW$ To 0x00000200 +Equ DTS_COLSELECT$ To 0x00000400 +Equ DTS_MULTICOL$ To 0x00000800 +Equ DTS_SMALLDATA$ To 0x00000000 +Equ DTS_LARGEDATA$ To 0x00001000 +Equ DTS_ROWBUTTONS$ To 0x00002000 +Equ DTS_ROWNUMBERS$ To 0x00004000 +Equ DTS_DROPDOWN$ To 0x00008000 +Equ DTS_AUTODROPDN$ To 0x00008002 +Equ DTS_VIRTUALMEM$ To 0x00000001 + +// EditTable Column Styles --------------------------------------------------------------------------------- +Equ DTCS_LEFT$ To 0x00000000 +Equ DTCS_HEADLEFT$ To 0x00000000 +Equ DTCS_RESIZE$ To 0x00000001 +Equ DTCS_FIXED$ To 0x00000002 +Equ DTCS_EDIT$ To 0x00000004 +Equ DTCS_PROTECT$ To 0x00000008 +Equ DTCS_UPPERCASE$ To 0x00000010 +Equ DTCS_HIDDEN$ To 0x00000020 +Equ DTCS_CENTER$ To 0x00000040 +Equ DTCS_RIGHT$ To 0x00000080 +Equ DTCS_HEADCENTER$ To 0x00000100 +Equ DTCS_HEADRIGHT$ To 0x00000200 +Equ DTCS_VSCROLL$ To 0x00000400 +Equ DTCS_HSCROLL$ To 0x00000800 +Equ DTCS_SKIPPED$ To 0x00001000 +Equ DTCS_LOCKED$ To 0x00002000 +Equ DTCS_SORTASC$ To 0x00004000 +Equ DTCS_SORTDES$ To 0x00008000 +Equ DTCS_CHECKBOX$ To 0x00010000 +Equ DTCS_DROPDOWN$ To 0x00020000 +Equ DTCS_MULTILINEHEAD$ To 0x00040000 +Equ DTCS_CHECKBOXRIGHT$ To 0x00080000 +Equ DTCS_VALIGNCENTER$ To 0x00100000 +Equ DTCS_VALIGNBOTTOM$ To 0x00200000 +Equ DTCS_DROPDOWNEDIT$ To 0x00400000 +Equ DTCS_OPTIONSBUTTON$ To 0x00800000 +Equ DTCS_ENABLEDROPDOWNDRAG$ To 0x01000000 +Equ DTCS_MULTILINE$ To 0x02000000 +Equ DTCS_AUTOVSCROLL$ To 0x04000000 +Equ DTCS_AUTOHSCROLL$ To 0x08000000 +Equ DTCS_ENABLEDRAG$ To 0x10000000 +Equ DTCS_ENABLEDROP$ To 0x20000000 +Equ DTCS_CHECKBOXCENTER$ To 0x40000000 + +// Tab Control Styles ---------------------------------------------------------------------------------- +Equ TCS_SCROLLOPPOSITE$ To 0x00000001 +Equ TCS_BOTTOM$ To 0x00000002 +Equ TCS_RIGHT$ To 0x00000002 +Equ TCS_MULTISELECT$ To 0x00000004 +Equ TCS_FLATBUTTONS$ To 0x00000008 +Equ TCS_FORCEICONLEFT$ To 0x00000010 +Equ TCS_FORCELABELLEFT$ To 0x00000020 +Equ TCS_HOTTRACK$ To 0x00000040 +Equ TCS_VERTICAL$ To 0x00000080 +Equ TCS_TABS$ To 0x00000000 +Equ TCS_BUTTONS$ To 0x00000100 +Equ TCS_SINGLELINE$ To 0x00000000 +Equ TCS_MULTILINE$ To 0x00000200 +Equ TCS_RIGHTJUSTIFY$ To 0x00000000 +Equ TCS_FIXEDWIDTH$ To 0x00000400 +Equ TCS_RAGGEDRIGHT$ To 0x00000800 +Equ TCS_FOCUSONBUTTONDOWN$ To 0x00001000 +Equ TCS_OWNERDRAWFIXED$ To 0x00002000 +Equ TCS_TOOLTIPS$ To 0x00004000 +Equ TCS_FOCUSNEVER$ To 0x00008000 + +// Tab Control Extended Styles ------------------------------------------------------------------------- +Equ TCS_EX_FLATSEPARATORS$ To 0x00000001 +Equ TCS_EX_REGISTERDROP$ To 0x00000002 diff --git a/SYSPROG/STPROCINS/RTI_SYS_ERRORS_EQUATES.txt b/SYSPROG/STPROCINS/RTI_SYS_ERRORS_EQUATES.txt new file mode 100644 index 0000000..fa8db9e --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_SYS_ERRORS_EQUATES.txt @@ -0,0 +1,29 @@ +compile insert RTI_SYS_ERRORS_EQUATES +/*---------------------------------------- + Author : Table Create Insert Routine + Written : 31/03/2011 + Description : Insert for Table WWA_SYS_ERRORS +----------------------------------------*/ + + +Equ ERR_ERROR_GUID$ To 0 +Equ ERR_DATETIME$ To 1 +Equ ERR_TYPE$ To 2 +Equ ERR_STATION$ To 3 +Equ ERR_USER$ To 4 +Equ ERR_OIVERSION$ To 5 +Equ ERR_OSVERSION$ To 6 +Equ ERR_PROCEDURE_NAME$ To 7 +Equ ERR_ERROR_CODE$ To 8 +Equ ERR_ERROR_TEXT$ To 9 +Equ ERR_LINE_NUMBER$ To 10 +Equ ERR_LOCAL_VARIABLES$ To 11 +Equ ERR_GLOBAL_VARIABLES$ To 12 +Equ ERR_LABEL_COMMONS$ To 13 +Equ ERR_CALL_STACK$ To 14 +Equ ERR_CALL_DEPTH$ To 15 +Equ ERR_PARAM$ To 16 +Equ ERR_STATUS$ To 17 +Equ ERR_ATID$ To 18 +Equ ERR_ATRECORD$ To 19 +Equ ERR_OECGI_REQUEST$ To 20 diff --git a/SYSPROG/STPROCINS/RTI_SYS_ERRORS_INSERT.txt b/SYSPROG/STPROCINS/RTI_SYS_ERRORS_INSERT.txt new file mode 100644 index 0000000..5440b76 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_SYS_ERRORS_INSERT.txt @@ -0,0 +1,27 @@ +compile insert rti_sys_errors_insert +/* ---------------------------------------------------------------------------- + Author : David Goddard, Win Win Solutions Australia Pty Ltd + Date : 26 July 2008 + Version : 1.0.0.0 + Date : 26 July 2008 + Purpose : RTI Error codes and descriptions + + Modification Info: + ---------------------------------------------------------------------------- + Date Who Notes + ---------------------------------------------------------------------------- + 090513 WER Changed WWA To RTI + --------------------------------------------------------------------------*/ + +/* Settings Errors */ +equ rti_err_systemTableOpen$ to 'RTI1000' +equ rti_err_sysenvOpen$ to 'RTI1001' +equ rti_err_cfgrtiMissing$ to 'RTI1003' +equ rti_err_SysGetReadFailed$ to 'RTI1004' +equ rti_err_SysSetWriteFailed$ to 'RTI1005' +equ rti_err_SysMissingTypeId$ to 'RTI1006' +equ rti_err_errorTableOpenFail$ to 'RTI1007' + + +/* Unittesting Errors */ +equ rti_err_invalidStatus$ to 'RTI2000' diff --git a/SYSPROG/STPROCINS/RTI_TEXT_EQUATES.txt b/SYSPROG/STPROCINS/RTI_TEXT_EQUATES.txt new file mode 100644 index 0000000..a7eb75c --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_TEXT_EQUATES.txt @@ -0,0 +1,33 @@ +compile insert rti_Text_Equates +/* + ** Copyright (C) 1992-2016 Revelation Software Inc. All Rights Reserved ** + + Author : Mr C + Date : 16 Feb 2016 + Purpose : Non-printable Text character equates + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 22 Feb 16 Added SPACE$ +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#IFNDEF _RTI_TEXT_EQUATES_ +#DEFINE _RTI_TEXT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ CRLF$ to \0D0A\ + equ CR$ to \0D\ + equ LF$ to \0A\ + equ TAB$ to \09\ + equ SPACE$ to \20\ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ENDIF +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RTI_UTL_COMPARE_INSERT.txt b/SYSPROG/STPROCINS/RTI_UTL_COMPARE_INSERT.txt new file mode 100644 index 0000000..5d8506f --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_UTL_COMPARE_INSERT.txt @@ -0,0 +1,24 @@ +compile insert rti_utl_compare_insert +/* ---------------------------------------------------------------------------- + Author : David Goddard, Win Win Solutions Australia Pty Ltd + Date : 16 April 2012 + Build : 12.4.16.0 + Date : 16 April 2012 + Purpose : Insert for the rti UTL COMPARE utlity + + the wuComp_text@ dimensioned array is used to store sets of text + to compare. + + The zero element stores control information for the sets of text, + for example the table,id for each set of text. + + Modification Info: + ---------------------------------------------------------------------------- + Date Who Build Notes + ---------------------------------------------------------------------------- + + --------------------------------------------------------------------------*/ + +common /rti_utl_compare/ wuComp_text@(100,2), wuComp_text1@, wuComp_text2@, wcComp_text3@, wcComp_unUsed1@, wcComp_unUsed2@ + + diff --git a/SYSPROG/STPROCINS/RTI_UTL_OESERVER_EQUATES.txt b/SYSPROG/STPROCINS/RTI_UTL_OESERVER_EQUATES.txt new file mode 100644 index 0000000..703db84 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_UTL_OESERVER_EQUATES.txt @@ -0,0 +1,61 @@ +compile insert rti_utl_oeserver_equates +/* ---------------------------------------------------------------------------- + Author : David Goddard, WinWin Solutions Australia Pty Ltd + Created : 18 November 2009 + Version : 13.2.7.0 + Date : 7 February 2013 + Purpose : Equates for the talking to oEngineServer service via the socket_function + + Modification Info: + ---------------------------------------------------------------------------- + Date Who Notes + 130207 DGG Added other commands section which require version 1.0.1.35 or higher + 110705 DGG Added -4, -5 & -6 options which require socket server version 1.0.1.35 or higher. + --------------------------------------------------------------------------*/ + +Equ wwa_oes_delim$ To \01\ +Equ wwa_oes_cLOGIN$ To "1" ;* Send the oengine login details. This will start a new engine. See below for details +Equ wwa_oes_cLOGOFF$ To "2" ;* Logout of an oengine. Engine will remain alive as per eserver.cfg settings +Equ wwa_oes_cCALL$ To "3" ;* Send a request to process. The procedure specified in the Login call will receive the request in the first parameter + +Equ wwa_oes_cQuery$ To "-1" ;* returns a HTML table containing details of running engines +Equ wwa_oes_cResetGentle$ To "-2" ;* shut down one or more ‘idle’ engines +Equ wwa_oes_cResetForce$ To "-3" ;* shut down one or more engines (whether ‘idle’ or ‘in use’); +Equ wwa_oes_cPhantom$ To "-4" ;* starts up a phantom thread +Equ wwa_oes_cGetStartTime$ To "-5" ;* returns the startup time for the engine server and the current time (according to the engine server) +Equ wwa_oes_cVersion$ To "-6" ;* returns the version number of the oesocketserver + +Equ wwa_oes_valid_codes$ To "1 2 3 -1 -2 -3 -4 -5 -6" + +/* cLogin format as below delimited by wwa_oes_delim$ +server.request = wwa_oes_cLOGIN$ +server.request := wwa_oes_delim$ : server.username ;* the username to login with. Must be uppercase +server.request := wwa_oes_delim$ : server.password ;* the users password. +server.request := wwa_oes_delim$ : server.database ;* OpenInsight application name. Must be uppercase +server.request := wwa_oes_delim$ : wwa_oes_modeStateless$ ;* Connection Mode - See connection mode section below +server.request := wwa_oes_delim$ : server.engineName ;* A specific engine name to send the request to. Must set startup flags to 0 +server.request := wwa_oes_delim$ : server.funcName ;* Procedure that will receive data from the cCall$ request +server.request := wwa_oes_delim$ : wwa_oes_startupNew$ ;* StartUp Flags. 1 will show on the desktop. 65 will hide from the desktop +server.request := wwa_oes_delim$ : wwa_oes_shutdownYes$ ;* Shut Down Flags +server.request := wwa_oes_delim$ : server.OIlocation ;* OI Location, tells the EngineServer to "cd" to some other folder +server.request := wwa_oes_delim$ / * + +/* Connection Mode */ +equ wwa_oes_modeJD3$ to -1 ;* or null, JD3 mode +equ wwa_oes_modeBlock$ to 0 ;* "block" mode +equ wwa_oes_modeCharacter$ to 1 ;* character mode (CTI/AREv32) +equ wwa_oes_modeStateless$ to 2 ;* stateless mode (OECGI3) + +/* Startup Flags */ +equ wwa_oes_startupExisting$ to 0 ;* Connect to an existing engine as specified in server.engineName setting, show on desktop. +equ wwa_oes_startupNew$ to 1 ;* start a new engine, show on desktop +equ wwa_oes_startupExistingNew$ to 2 ;* connect to existing if available, otherwise create a new engine, show on desktop +equ wwa_oes_startupNewHide$ to 65 ;* start a new engine, hide from desktop + +/*Shutdown Flags */ +equ wwa_oes_shutdownNo$ to 0 ;* do not shutdown the engine after the connection is completed +equ wwa_oes_shutdownYes$ to 1 ;* shutdown the engine after the connection is completed. + +/* other commands used when calling revcmd_input function */ +equ wwa_oes_getEngineName$ to \06\ +equ wwa_oes_closeEngineOnExit$ to \08\ diff --git a/SYSPROG/STPROCINS/RTI_WIN_CONTEXTMENU_EQUATES.txt b/SYSPROG/STPROCINS/RTI_WIN_CONTEXTMENU_EQUATES.txt new file mode 100644 index 0000000..33230a7 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_WIN_CONTEXTMENU_EQUATES.txt @@ -0,0 +1,28 @@ +Compile Insert rti_win_contextMenu_equates +/* ---------------------------------------------------------------------------- + Author : David Goddard + Created : 3 July 2012 + Version : 10.0 + Purpose : Equates for use with context menus in OpenInsight + + Modification Info: + ---------------------------------------------------------------------------- + Date Who Notes + ---------------------------------------------------------------------------- + 3 July 2012 DGG Added CM_IMAGE equate to supoprt menu images. + 090513 WER Changed WWA To RTI + --------------------------------------------------------------------------*/ + +Equ CM_ItemText$ To 1 +Equ CM_ItemID$ To 2 +Equ CM_ItemHelp$ To 3 + +Equ CM_SendMessage$ To 5 +Equ CM_Entity$ To 6 +Equ CM_Control$ To 6 +Equ CM_Message$ To 7 +Equ CM_Params$ To 8 + + + +equ CM_Image$ to 12 diff --git a/SYSPROG/STPROCINS/RTI_WIN_INSERT.txt b/SYSPROG/STPROCINS/RTI_WIN_INSERT.txt new file mode 100644 index 0000000..7afcce5 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_WIN_INSERT.txt @@ -0,0 +1,48 @@ +compile insert RTI_WIN_INSERT +/* ---------------------------------------------------------------------------- + Author : David Goddard + Created : 15 Sept 2009 + Version : 10.0 + Purpose : Standard window communter module insert + + Modification Info: + ---------------------------------------------------------------------------- + Date Who Version Notes + ---------------------------------------------------------------------------- + 090513 WER Changed WWA To RTI + + 120312 DGG 1.0.0.4 Added wwa_sys_settings delcare function + + 110822 DGG 1.0.0.3 Updated to use WWA nampespace + + 110715 DGG 1.0.0.2 Added wwa_win_memory function + + --------------------------------------------------------------------------*/ + +declare function get_property, set_property, send_event, send_message +declare subroutine rti_win_setProperties +declare function rti_win_collector_io, rti_win_edittable, rti_win_combobox +declare function rti_win_memory, rti_sys_settings + +/* setup a common area for use with rti_win_setproperties routine */ +common /rti_win_common/ win.ctrls@, win.props@, win.vals@ + +win.ctrls@ = rti_null$ +win.props@ = rti_null$ +win.vals@ = rti_null$ + +/* check for unassigned variables */ +if assigned(ctrlEntId) else ctrlEntId = rti_null$ +if assigned(event) else event = rti_null$ +if assigned(param1) else param1 = rti_null$ +if assigned(param2) else param2 = rti_null$ +if assigned(param3) else param3 = rti_null$ +if assigned(param4) else param4 = rti_null$ +if assigned(param5) else param5 = rti_null$ +if assigned(param6) else param6 = rti_null$ + +/* initialise variables */ +window = ctrlEntId[1,"F."] ;* the name of the current window +ctrl = ctrlEntId[-1,"B."] ;* the name of the current control + +result = rti_true$ ;* initialise result, 0 for failure an 1 for success diff --git a/SYSPROG/STPROCINS/RTI_WORKSPACE_EQUATES.txt b/SYSPROG/STPROCINS/RTI_WORKSPACE_EQUATES.txt new file mode 100644 index 0000000..153a7a7 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_WORKSPACE_EQUATES.txt @@ -0,0 +1,155 @@ +compile insert RTI_WorkSpace_Equates + +****************************************************************************** +* +* Name : Workspace Equates +* Description: Constants for the WorkSpace frame +* +* History : (date, initials, notes) +* 12/16/96 apk Initial creation +* 01/12/96 cp Assisting with UI/WS for Hoffa +* 05/28/96 cp Added get-key message for "Save As..." functionality +* 06/10/97 cp Created WorkSpace_Equates based on User Interface WorkSpace +* 04/01/08 spf Cloned for use with RTI_WORKSPACE +****************************************************************************** + +equ FRAME$ to "RTI_WORKSPACE" +equ PREF$ to "RTI_WORKSPACE_PREF" + +* the WorkSpace MDI frame communicates with its children using events. +* the following list of events are generated by the frame to the children: +* +* Event Parameter Description +* ----------- ------------------- ------------------------------------- +* CREATE EntID the CREATE event for the child window represents either File-New +* or File-Open; the parameter is the repository component id to open; +* File-New passes a null create parameter +* CLOSE the CLOSE event is sent directly from the frame to all registered +* children when the frame closes +* WRITE the WRITE event is used for both "File-Save" and "File-Save As"; +* for more information on "File-Save As", see OMNIEVENT WSM_SETKEY$; +* reporting errors to the user during WRITE is the responsibility +* of the child window; errors are reported back to the frame using +* Set_EventStatus() +* OMNIEVENT WSM_SETKEY$, EntID the only time that the component id for a child window can change +* is when the user saves the component under a diferent id; the frame +* sends OMNIEVENT WSM_SETKEY$ to change the key and then sends WRITE +* to save the component; reporting errors to the user during locking is +* the responsibility of the child window; an error is reported back +* to the frame using Set_EventStatus() +* OMNIEVENT WSM_GETKEY$, &EntID since the child maintains the current component id, the frame uses +* this message to request the component id, which is returned in EntID +* OMNIEVENT WSM_TESTRUN$ the frame sends this message when the user selects test run +* +* +* +* the following list of events are generated by the children to the frame: +* +* Event Parameter Description +* ----------- -------------------------- ------------------------------------- +* OMNIEVENT WSM_REGISTER$, child the child has successfully created +* OMNIEVENT WSM_UNREGISTER$, child the child is terminating +* OMNIEVENT WSM_ACTIVATE$, child the child window has received focus +* OMNIEVENT WSM_DEACTIVATE$, child the child window no longer has focus +* OMNIEVENT WSM_REQSAVEAS$, child the child window requests save-as processing +* OMNIEVENT WSM_SETSTATE$, child, list the child window requests options toggled; list is a structure +* composed of two fields; the first field is a list (@vm-delim'd +* of items to toggle the states of; the second field is an +* associated list of booleans specifying whether to enable or +* disable each item +* OMNIEVENT WSM_OPENENTID$, entid requests WorkSpace to open the specified entid + +* messages to the child +equ WSM_SETKEY$ to "SETKEY" ;* frame informs child what the component key is +equ WSM_TESTRUN$ to "TESTRUN" ;* the user requests test run +equ WSM_HELP$ to "HELP" ;* the user requests help +equ WSM_ABOUT$ to "ABOUT" ;* the user requests help-about +equ WSM_COMMAND$ to "COMMAND" ;* the user selected a menu item which is handled by the child +equ WSM_GETKEY$ to "GETKEY" ;* frame requests the component key from the child + +* messages to the frame +equ WSM_REGISTER$ to "REGISTER" ;* a child is being created +equ WSM_UNREGISTER$ to "UNREGISTER" ;* a child is being closed +equ WSM_ACTIVATE$ to "ACTIVATE" ;* a child is being activated +equ WSM_DEACTIVATE$ to "DEACTIVATE" ;* a child is being deactivated +equ WSM_REQSAVEAS$ to "REQSAVEAS" ;* a child is requesting to be saved under a new name +equ WSM_SETSTATE$ to "SETSTATE" ;* the state of a child is changing, so adjust the menu +equ WSM_OPENENTID$ to "OPENENTID" ;* the frame is instructed to open a component (not typically sent from a child) + +* WSM_SETSTATE$ structure +equ WSS_ITEM$ to 1 +equ WSS_ENABLE$ to 2 + +* WSS_ITEM$ values +equ WSS_SAVE$ to 1 +equ WSS_SAVEAS$ to 2 +equ WSS_TESTRUN$ to 3 +equ WSS_OPTIONS$ to 4 +equ WSS_SPECIFIC$ to 11 ;* first specific item is 11, second is 12, etc. + + +************************* +* WorkSpace INI structure +************************* + +equ WS_INI_FILE$ to "OINSIGHT.INI" +equ WS_INI_SECT$ to "Workspace" +equ WS_INI_MRU$ to "FileList" +equ WS_INI_SIZE$ to "WorkspaceSize" +equ WS_INI_TYPE$ to "DefaultType" + + +********************************************* +* structure of WorkSpace configuration record +********************************************* + +* configuration stored in SYSENV file using the following key prefix +equ CFG_KEY_PREFIX$ to 'CFG_' + +* structure of configuration record +equ WSCFG_TOOLNAME$ to 1 ;* The tool appearing in the WorkSpace +equ WSCFG_TOOLTYPE$ to 2 ;* Enumerated value of tool type +equ WSCFG_TYPECLASS$ to 3 ;* The type and class (*-delim'd) of the component (if applicable) +equ WSCFG_WINDOWNAME$ to 4 ;* The MDI child window for the tool +equ WSCFG_MULTIINSTANCE$ to 5 ;* Is the tool multi-instance? (Most likely yes) +equ WSCFG_MENUNAME$ to 6 ;* The tool specific menu on the main menu +equ WSCFG_MENUITEMS$ to 7 ;* Items in the tools specific menu +equ WSCFG_BUTTONS$ to 8 ;* Buttons on the frame +equ WSCFG_DFTSTATE$ to 9 ;* default state information (bool array) (see WSS_ITEM$ values) +equ WSCFG_TITLE$ to 10 ;* title for the workspace +equ WSCFG_ICON$ to 11 ;* icon for the workspace +equ WSCFG_HELP$ to 12 ;* help info for the workspace: <0,1>=help file, <0,2>=topic id +equ WSCFG_ABOUT$ to 13 ;* about message name + +* values for WSCFG_TOOLTYPE$ +equ WSCFG_TYPEBUILDER$ to 0 ;* Builder (Entity-based) +equ WSCFG_TYPETOOL$ to 1 ;* Tool +equ WSCFG_TYPEDIALOG$ to 2 ;* Modal dialog +Equ WSCFG_TYPEWIN$ To 3 ; * Start Window + +* structure of WSCFG_MENUITEMS$ +equ WSCFG_MENUITEMTYPE$ to 1 ;* menu item type +equ WSCFG_MENUITEMTEXT$ to 2 ;* text of the menu option +equ WSCFG_MENUITEMACCEL$ to 3 ;* see ACCELERATOR property +equ WSCFG_MENUITEMSTYLE$ to 4 ;* see ITEMSTYLE property +equ WSCFG_MENUITEMHELP$ to 5 ;* status line help text for the menu item + +* values for WSCFG_MENUITEMTYPE$ +equ WSCFG_MENUTYPETEXT$ to 0 ;* regular menu item +equ WSCFG_MENUTYPESEP$ to 2048 ;* not implemented yet + +* structure of WSCFG_BUTTONS$ +equ WSCFG_BUTTONSITEM$ to 1 ;* Button name +equ WSCFG_BUTTONSBMP$ to 2 ;* Entity for the BMP +equ WSCFG_BUTTONSIMAGES$ to 3 ;* Number of images in the BMP +equ WSCFG_BUTTONSTEXT$ to 4 ;* Text to appear on button +equ WSCFG_BUTTONSBUBBLE$ to 5 ;* Bubble help text +equ WSCFG_BUTTONSHELP$ to 6 ;* Button help text +equ WSCFG_BUTTONSCLIP$ to 7 ;* Boolean value for clip (true) or resize (false) + +* structure of WSCFG_TOOLMENU$ +!equ WSCFG_TOOLTEXT$ to 1 ;* Menu text +!equ WSCFG_TOOLHELP$ to 2 ;* Menu Help +!equ WSCFG_TOOLFUNCTION$ to 3 ;* Function call for menu option +!equ WSCFG_TOOLPARAM$ to 4 ;* Paramter list for function + diff --git a/SYSPROG/STPROCINS/RTI_WTK_COMMON.txt b/SYSPROG/STPROCINS/RTI_WTK_COMMON.txt new file mode 100644 index 0000000..eb42ce8 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_WTK_COMMON.txt @@ -0,0 +1,81 @@ +compile insert rti_wtk_common +/*------------------------------------------------------------------------------ + Author : David Goddard, WinWin Solutions Australia Pty Ltd + Date : 26 April 2006 + Purpose : OpenInsight Web Toolkit Common +------------------------------------------------------------------------------*/ + +common /wtk/ wtk_siteConfig@, wtk_sessionId@, wtk_sessionRec@, wtk_refresh@, wtk_serverURL@, wtk_requestOrig@, wtk_siteID@, wtk_responseHeader@ + +/* wtk_siteConfig@ settings */ +equ wtk_siteName$ to 1 +equ wtk_siteURL$ to 2 +equ wtk_siteAppId$ to 3 +equ wtk_gateway$ to 4 +equ wtk_sessionFileName$ to 5 +equ wtk_systemProcs$ to 6 +equ wtk_badProcNameError$ to 7 +equ wtk_sessionTimeOut$ to 8 +equ wtk_SessionLastArchiveDate$ to 9 +equ wtk_anonProcs$ to 10 ;* multivalued list of procedures that can be run anonymously, * = all procedures can run anonymously, null = no procedures can run anonymously. +equ wtk_loginProc$ to 11 ;* the name of the procedure to run to authenticate the user. +equ wtk_authProcs$ to 12 ;* multivalued list of procedures that can be run authenticated. null = all procedures run authenticated. +equ wtk_siteIdOnlyProcs$ to 13 ;* restrict the running of procedures to only those starting with INET_siteid_ +equ wtk_htmlFileName$ to 14 +equ wtk_templateFileName$ to 15 +equ wtk_mailServerIn$ to 16 +equ wtk_mailServerOut$ to 17 +equ wtk_mailServerUsername$ to 18 +equ wtk_mailServerPassword$ to 19 +equ wtk_consoleLog$ to 20 ;* Boolean - When true, WWA_WTK_CONSOLE will log all requests for this site to WWA_WTK_CONSOLE_LOG +/* 21 ~ 30 = Console Log settings */ +equ wtk_requestCount$ to 21 +equ wtk_serverURLs$ to 22 +equ wtk_serverPorts$ to 23 +equ wtk_applicationNames$ to 24 +equ wtk_userNames$ to 25 +equ wtk_userPasswords$ to 26 +equ wtk_engineNames$ to 27 +equ wtk_procedureNames$ to 28 +equ wtk_serviceNames$ to 29 +equ wtk_noLogProcedures$ to 30 +equ wtk_procedurePrefix$ to 31 +equ site_loginUrl$ to 32 +equ site_landingPageUrl$ to 33 +equ site_template$ to 34 +equ site_httpHeaderKeys$ to 35 +equ site_httpHeaderValues$ to 36 + + + +equ wtk_cartProdTable$ to 40 +equ wtk_cartProdDescCol$ to 41 +equ wtk_cartProdPriceCol$ to 42 + + +/* These values are not stored, they are set by a process and the text is + swapped out when the page template is loaded */ + +equ wtk_pageHeaderText$ to 101 +equ wtk_pageHeaderToolbar$ to 102 +equ wtk_pageFooterText$ to 103 +equ wtk_pageFooterToolbar$ to 104 + + +/* wtk responseHeader settings */ +equ wtk_respHdr_contentType$ to 1 +equ wtk_respHdr_location$ to 2 +equ wtk_respHdr_cookies$ to 3 +equ wtk_respHdr_options$ to 4 +equ wtk_respHdr_status$ to 5 +equ wtk_respHdr_noCache$ to 6 +equ wtk_httpHdr_other$ to 7 + +equ wtk_httpHdr_cookie_name$ to 1 +equ wtk_httpHdr_cookie_value$ to 2 +equ wtk_httpHdr_cookie_path$ to 3 +equ wtk_httpHdr_cookie_expiryDate$ to 4 +equ wtk_httpHdr_cookie_expiryTime$ to 5 +equ wtk_httpHdr_cookie_httpOnly$ to 6 +equ wtk_httpHdr_cookie_secure$ to 7 + diff --git a/SYSPROG/STPROCINS/RTI_XBAND_DATASOURCE_DATATABLE_TEMPLATE.txt b/SYSPROG/STPROCINS/RTI_XBAND_DATASOURCE_DATATABLE_TEMPLATE.txt new file mode 100644 index 0000000..0ae9c72 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_XBAND_DATASOURCE_DATATABLE_TEMPLATE.txt @@ -0,0 +1,97 @@ +compile Insert RTI_XBAND_DATASOURCE_DATATABLE_TEMPLATE + + Function {PROCNAME}(UID) + /* + ** Mimic BRW using An SQL stored procedure return a dataset + ** Build a workging table were oconv, sort is all done "server-side" + ** So report can just have groups with Break-on, minimal chatter with OI. + ** + ** Note: RTI_XBAND_DATASOURCE_TEMPLATE is the basis for the program + ** RTI_XBAND_GENPROC uses the template to generate the code + ** RTI_XBAND_SUPPORT calls RTI_XBAND_GENPROC, compiles the source, loads it on stack like rlist + ** + ** The BRW, via NetOI / RunDotNet, calls RTI_XBAND_SUPPORT + ** + ** 03-27-13 rjc Created + ** 06-27-18 rjc Support @mv in readnext / read, use onGosub + ** 07-17-18 rjc Fixes for 10.0.0.3 + ** 12-05-19 rjc Add records_processed for 10.0.8 + ** 01-14-20 rjc use rlist_text_1 for row processed + */ + + Declare Function dcount, isEventContext,select_into + + equ OTHERWISE$ to 1 + equ TRUE$ to 1 + equ FALSE$ to 0 + equ YES$ to 1 + equ NO$ to 0 + Equ NULL$ to "" + Equ tab$ To \09\ + Equ crlf$ To \0D0A\ + + + $Insert msg_equates + $Insert rti_resolve_select_callback_equates + + Declare Function isEventContext,select_Into + If Assigned(UID) Else UID = "" + RSLT = "" + + Equ logid$ To "" + Open 'SYSLISTS' To f_syslists Else null + + If logid$ Then + Writev "IN->":uid on f_syslists, logid$,-1 Else null + end + + + Call Set_Status(0) + //"ID":@SVM:"FNAME":@svm:"LNAME":@vm:"System.String":@SVM:"System.String":@SVM:"System.String" + // bzs remove quote(), force in at_id + + descriptor_names = "{COLHEADS}" + descriptor_types = "{COLTYPES}" + Descriptor = descriptor_names:@VM:descriptor_types + Convert "," To @SVM In descriptor + + * bzs don't join them until the end + * rslt = descriptor:@fm:Select_into('{CMD}', 'TABNORMALIZED') + wasGuiEnabled = rti_resolve_Select_callback(rtirsc_getGuiEnabled$) + If wasGuiEnabled else + unused = rti_resolve_Select_callback(rtirsc_EnableGui$) + end + + + rslt = Select_into('{CMD}', 'TABNORMALIZED') + + If wasGuiEnabled else + unused = rti_resolve_Select_callback(rtirsc_DisableGui$) + end + + * remove trailing crlf$ + Loop + While rslt[-2,2] == crlf$ + rslt[-2,2] = "" + Repeat + + * Switch to @svm for columns,@vm for rows + Convert tab$:crlf$ to @svm:@vm In rslt + + * bzs remove "column heading" row + rslt = Delete(rslt, 1, 1, 0) + + * bzs join them together now + rslt = Descriptor:@FM:rslt + + + + If logid$ Then + Writev "OUT->":quote(rslt) on f_syslists, logid$,-1 Else null + tmp= rslt + Convert @svm To tab$ In tmp + Swap @vm With crlf$ In tmp + OSWrite tmp On 'c:\temp\xb_dataset.txt' + end + +Return RSLT diff --git a/SYSPROG/STPROCINS/RTI_XBAND_DATASOURCE_TEMPLATE.txt b/SYSPROG/STPROCINS/RTI_XBAND_DATASOURCE_TEMPLATE.txt new file mode 100644 index 0000000..4f34598 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_XBAND_DATASOURCE_TEMPLATE.txt @@ -0,0 +1,430 @@ +compile Insert RTI_XBAND_DATASOURCE_TEMPLATE + + Function {PROCNAME}(ACTION, PARAM1, PARAM2, PARAM3) + /* + ** Mimic BRW using An SQL stored procedure to build a recordset + ** Build a workging table were oconv, sort is all done "server-side" + ** So report can just have groups with Break-on, minimal chatter with OI. + ** + ** Note: RTI_XBAND_DATASOURCE_TEMPLATE is the basis for the program + ** RTI_XBAND_GENPROC uses the template to generate the code + ** RTI_XBAND_SUPPORT calls RTI_XBAND_GENPROC, compiles the source, loads it on stack like rlist + ** + ** The BRW, via NetOI / RunDotNet, calls RTI_XBAND_SUPPORT + ** + ** 03-27-13 rjc Created + ** 06-27-18 rjc Support @mv in readnext / read, use onGosub + ** 07-17-18 rjc Fixes for 10.0.0.3 + ** 12-05-19 rjc Add records_processed for 10.0.8 + ** 01-14-20 rjc use rlist_text_1 for row processed + */ + + Declare Function dcount, isEventContext,calculatex + + equ OTHERWISE$ to 1 + equ TRUE$ to 1 + equ FALSE$ to 0 + equ YES$ to 1 + equ NO$ to 0 + Equ NULL$ to "" + + * FROM RLIST_EQU + Equ TARGET_VARIABLE$ To 2 + + $Insert msg_equates + + Declare Function isEventContext + If Assigned(ACTION) Else ACTION = "" + If Assigned(PARAM1) Else PARAM1 = "" + If Assigned(PARAM2) Else PARAM2 = "" + If Assigned(PARAM3) Else PARAM3 = "" + + + Equ logid$ To "" + Open 'SYSLISTS' To f_syslists Else null + + If logid$ Then + Writev "IN->":param1:"|":param2:"|":param3 on f_syslists, logid$,-1 Else null + end + + + Call Set_Status(0) + * {CMD} + com_id = "XBDS_{DATASOURCE_PROCNAME}" + common //com_id//selected%, keys%,msgUp%,selected_Cnt%,processed_cnt%, progress_extent%, progress_value%,mvColumns% + If Assigned(selected%) Else + selected% = 0 + keys% = '' + msgUp% = '' + selected_cnt% = 0 + processed_Cnt% = 0 + progress_extent% = 0 + progress_value% = 0 + End + RSLT = "" + + Locate action[1,2] In 'RE,FI,DA,KE,WR,DE' using ',' setting pos Then + On pos Gosub onRead, onFields, onDataType, onKeys, onWrite, onDelete + End Else + rslt = Quote(action) : ' is not implemented' + End + + If logid$ Then + Writev "OUT->":quote(rslt) on f_syslists, logid$,-1 Else null + end + +Return RSLT + +//////////////////////////////////////// + +onDataType: + + whichField = param1 + + If logid$ Then + Writev "Datatype->":param1:"|":param2:"|":param3 on f_syslists, logid$,-1 Else null + end + + {DATATYPE_BLOCK} + + +Return + +//////////////////////////////////////// + + +onFields: + + * New report, cleasr the selected cache + selected% = 0 + + * return: + * <1> Field Name] + * <2> Field #] + * <3> conv code] + * <4> MVFlag (0/1)] + * <6> Association] + + * For speed define a dict that is all hard fields, no oConv + * Then on the read, do the calculations and oconv here, send result to BRW + * Colname ; * Position ; * Conv + + If logid$ Then + Writev "Fields->":param1:"|":param2:"|":param3 on f_syslists, logid$,-1 Else null + end + + {FIELDS_BLOCK} + +Return + +//////////////////////////////////////// + +onKeys: + * return: + * <1-n> key + * Build a dynamic select + * Param1 looks like "100 WHERE FILTER = trUE + * if there is any filter the BRW comes back a second time for the keys + * else it wants them returned on the first call + * so, we select on the first call, buffer in a common if needed + * selected% is a flag, true$ if keys are already in the common + * + cmds = '' + selstmt = trim(param1) + tablename = "{TABLE}" + dictname = "{DICTIONARY}" + colnames = "{DATASOURCE_COLS}" + convs = "{DATASOURCE_CONVS}" + col_cnt = "{DATASOURCE_CNT}" + mvFlags = "{DATASOURCE_MVFLAGS}" + sysFlags = "{DATASOURCE_SYSFLAGS}" + datasource_grpNames = "{DATASOURCE_GRPNAMES}" + + Convert ',' To @vm In colnames + Convert ',' To @vm In convs + Convert ',' To @vm In mvFlags + Convert ',' To @vm In sysFlags + Convert ',' To @vm In datasource_grpNames + + If logid$ Then + Writev "Keys->":param1:"|":param2:"|":param3 on f_syslists, logid$,-1 Else null + end + + + If Not(selected%) then + * first time called, do the select + keys% = '' + firstword = selstmt[1,' '] + tablename = "{TABLE}" + + hold_at_Record = @record + hold_at_id = @id + hold_at_dict = @DICT + + + mvColcnt = sum(mvFlags) + mvColNames = null$ + mvSysFlags = null$ + isMvSorted = false$ + If mvColcnt then + c1="";c2="";c3="" + loop + bRemove colName From colnames at c1 setting mark + bRemove mvFlag From mvFlags at c2 setting unused + bremove sysFlag From sysFlags at c3 setting unused + If mvFlag Then + mvColNames<-1> = colname + mvSysFlags<-1> = ( sysFlag == true$ ) ;* force a 1 or zero so <-1> is not confused + If indexc(selStmt, 'BY ':colname,1) Or indexc(selStmt, 'BY-DSND ':colname,1) Then + isMvSorted = true$ + end + End + While mark + repeat + + + End + + + Open tablename To f_Table Else + End + Open dictName To @DICT Else + End + Open 'SYSDICT' To f_sysdict Else + end + + If Num(firstword) Then + num_to_select = firstword + with_clause = trim(Field(selstmt, ' ', 2, Len(selstmt))) + by_clause = '' + End Else + num_to_select = "" + with_clause = selstmt + by_clause = '' + End + + cmds = 'SELECT ': trim( num_to_select :' ' : tablename ) : ' ' : trim(with_clause) + Begin Case + Case mvColNames == "" + Case indexc(with_clause, 'EXPLODE-ON',1) + + Swap ' EXPLODE-ON' With @fm:'EXPLODE-ON' In cmds + Case isMvSorted + Case mvColNames != "" + * not sorted, need explode + Convert @fm To ' ' In mvColnames + cmds<-1> = 'EXPLODE-ON ' : tablename : ' ' : mvColNames + End case + + + If logid$ Then + Writev "Select cmds->":@fm:cmds on f_syslists, logid$,-1 Else null + end + + * rjc 08-04-10 + call rti_rlistx(cmds, target_variable$, keys%, "KEYS", "", cursor, "", "","") + Convert @vm To '|' In keys% + + + If logid$ Then + Writev "keys->":@fm:keys% on f_syslists, logid$,-1 Else null + end + End + + * + + * return the keys or buffer them? + selected% = 1 + selected_Cnt% = fieldCount(keys%,@fm) + rslt = keys% + + * Start Progess Bar + If isEventContext() Then + If selected_Cnt% gt 800 Then + progress_extent% = 800 + End Else + progress_Extent% = selected_Cnt% + End + + def = "" + def = "G" + def = progress_extent% + def = "Reading report rows" + def = "Processing ":selected_cnt%:" rows" + def = "I" + + msgUp% = Msg(@Window, def) + end + + Call Set_Status(0) + +return + +//////////////////////////////////////// + + +onRead: + + + If logid$ Then + Writev "Read->":param1:" ":param2:" ":param3 on f_syslists, logid$,-1 Else null + end + + + rslt = '' + @id = param1[1,"|"] + mv = param1[bcol2() + 1,@rm] + + alloc_size = 500 + buffer = space(alloc_size) + bsize = alloc_Size + bpos = 1 + *LIST PERSON_SONG_PLAY FULL_NAME PLAY_COST PLAY_MONTH TITLE BY PLAY_MONTH BY TITLE + tablename = "{TABLE}" + dictname = "{DICTIONARY}" + colnames = "{DATASOURCE_COLS}" + convs = "{DATASOURCE_CONVS}" + col_cnt = "{DATASOURCE_CNT}" + mvFlags = "{DATASOURCE_MVFLAGS}" + sysFlags = "{DATASOURCE_SYSFLAGS}" + datasource_grpNames = "{DATASOURCE_GRPNAMES}" + + Convert ',' To @vm In colnames + Convert ',' To @vm In convs + Convert ',' To @vm In mvFlags + Convert ',' To @vm In datasource_grpNames + Convert ',' To @vm In sysflags + processed_Cnt% += 1 + + * Update Progess Bar + If msgUp% != null$ Then + + * Bump record count every read, bump the display every progress_extent reads + + If mod(processed_Cnt%, progress_extent%) == 1 Or processed_Cnt% == selected_Cnt% Then + * Bump the progress value, down the message if over 100% + progress_value% += 1 + If progress_value% lt progress_extent% Then + unused = Msg(@window, MsgUp%, progress_value%, MSGINSTUPDATE$ ) + End else + * Xband won't call us when it is done, so down the message @100% progress + Msg(@window, MsgUp%, progress_value%, MSGINSTUPDATE$ ) + end + end + end + + If Index(sysFlags,'1',1) Then + Open 'SYSDICT' To f_sysdict Else null + end + + + bHaveDict = 1 + Open dictname To @dict Else + Open 'SYSDICT' To @dict Else + bHaveDict = 0 + end + End + If bHaveDict then + Open tablename To f_psp Then + ReadO @record From f_psp, @id Then + clpos = 1; cvpos = 1; mvpos = 1; syspos = 1 + For col_nr = 1 To col_cnt + colname = colnames[clpos,@vm,1];clpos = bcol2()+1 + conv = convs[cvpos,@vm,1];cvpos = bcol2()+1 + mvFlag = mvFlags[mvpos,@vm,1];mvpos = bcol2()+1 + sysFlag =sysFlags[syspos,@vm,1];syspos = bcol2()+1 + Begin Case + Case colname _Eqc '@ID' Or colname _Eqc 'AT_ID' Or colname == "DYNAMIC_ID" + val = @id + + case colname = 'RLIST_TEXT_1' Or colname == "DYNAMIC_SELECTED" + val = if processed_Cnt% then processed_Cnt% else 'Zero' + val:= ' Rows Processed' + case Num(colname) + val = @record + Case sysFlag + If logid$ Then + Writev "Read sysdict ->":colname on f_syslists, logid$,-1 Else null + end + + val = calculatex(colname, f_sysdict, @id, @record, 0) + Case 1 + val = calculate(colname) + End Case + + + /* Handle multivalues + ** Goal is to return <1,mv>, so single valued data appears once + ** But must repeat the breaking/group values else we trigger false breaks + */ + + Locate colname In datasource_grpNames using @vm setting unused Then + is_breakCol = true$ + End Else + is_breakCol = false$ + end + + Begin Case + Case mv lt 1 + * No multivalues in the row, Use the whole value + Case mvFlag + * Multivalued column, so <1,mv> + val = val<1,mv> + Case is_breakCol + * Breaking column. return the full value, else we'll return a null, trigger a break + //val = val<1,1> + + Case otherwise$ + //val = val<1,mv> + End case + + /* If conv # '' Then + val = Oconv(val, conv) + If conv[1,2] == "MT" Or conv[1,1] == "D" Then + * brw wants them bracketed by "#" + val = "#" : val : "#" + End + + end + */ + Gosub append + next + If bpos gt 2 Then + rslt = buffer[1,bpos-2] + end + end + End + End + Call Set_Status(0) +Return + +//////////////////////////////////////// + + +onWrite: + id = param2 + rec = param3 +Return + +//////////////////////////////////////// + +onDelete: + id = param1 +Return + +//////////////////////////////////////// + +append: + + + vlen = getByteSize( val ) + 1 + + If vlen + bpos gt bsize then + buffer := space(alloc_size) + bsize += alloc_Size + End + + putbinaryValue( buffer, bpos,CHAR, val:@fm) + bpos += vlen + +return diff --git a/SYSPROG/STPROCINS/RTI_XBAND_EQUATES.txt b/SYSPROG/STPROCINS/RTI_XBAND_EQUATES.txt new file mode 100644 index 0000000..b9a95a7 --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_XBAND_EQUATES.txt @@ -0,0 +1,64 @@ +Compile Insert RTI_XBAND_EQUATES + + * 2013? rjc Created + * 06-27-18 rjc Add font, align positions + * 07-18-18 rjc 10.0.0.3 + * 03-21-22 rjc added color pos + * 04-19-22 rjc Added theme tokens + + Equ font_name_pos$ To 1 + Equ font_size_pos$ To 2 + Equ font_just_pos$ To 3 + Equ font_bold_pos$ To 4 + Equ font_it_pos$ To 5 + Equ font_ul_pos$ To 6 + Equ font_color_pos$ To 8 + + Equ BackColor_none$ To "" + Equ vbTrue$ To "-1" + + + Equ alignLeft$ To 0 + Equ alignRight$ To 2 + Equ alignCenter$ To 1 + Equ alignGeneral$ To "" + + Equ xb_dynamic_datasource$ To 'RTI_BRW_DYNAMIC_DATASOURCE' ; * place holder name for a dynamic datasource + + Equ custom_theme_name$ To "RTI_XBAND_THEME_CUSTOM" + Equ builtin_theme_name$ To "RTI_XBAND_THEME_DEFAULTS" + Equ theme_null$ To "<>" + + GetTheme: * bzs 041822 + * passed in: themeName in p1 + * returns: details for that theme: + * <1,x> fontName + * <2,x> fontSize + * <3,x> fontStyle + * <4,x> foreColor + * <5,x> backColor + * <6,x> lines + * <7,x> alternateColor + * where x = 1 to 5, representing reportHeader,PageHeader,GroupHeader,Detail,PageFooter sections + + * fm positions + Equ theme_fontName_pos$ To 1 + Equ theme_fontSize_pos$ To 2 + Equ theme_fontStyle_pos$ To 3 + Equ theme_foreColor_pos$ To 4 + Equ theme_backColor_pos$ To 5 + Equ theme_lines_pos$ To 6 + Equ theme_alternateColor_pos$ To 7 + + * vm positions + Equ theme_reportHeader_pos$ To 1 + Equ theme_pageHeader_pos$ To 2 + Equ theme_groupHeader_pos$ To 3 + Equ theme_Detail_pos$ To 4 + Equ theme_pageFooter_pos$ To 5 + + + + + + diff --git a/SYSPROG/STPROCINS/RTI_XBAND_XML_TEMPLATE.txt b/SYSPROG/STPROCINS/RTI_XBAND_XML_TEMPLATE.txt new file mode 100644 index 0000000..cf744df --- /dev/null +++ b/SYSPROG/STPROCINS/RTI_XBAND_XML_TEMPLATE.txt @@ -0,0 +1,44 @@ +compile insert RTI_XBAND_XML_TEMPLATE + + + 1.0 1.0.0.0 + + + RTIXBDS + Main + + SYSPROG + + + Portrait + 9800 + + + Courier New + 10 + + + + Main + ExternalObject + Provider=OI + + StoredProcedure + Literal + 0 + + + ' -- style script start +_styleCtr = 0 +' -- style script end + + + + + + + + + + RLIST + diff --git a/SYSPROG/STPROCINS/RTK_IDE_HTML_GOOGLE_DYNAMICFEED_CSS.txt b/SYSPROG/STPROCINS/RTK_IDE_HTML_GOOGLE_DYNAMICFEED_CSS.txt new file mode 100644 index 0000000..239b369 --- /dev/null +++ b/SYSPROG/STPROCINS/RTK_IDE_HTML_GOOGLE_DYNAMICFEED_CSS.txt @@ -0,0 +1,237 @@ +compile insert RTK_IDE_HTML_GOOGLE_DYNAMICFEED_CSS +.gfg-root { + width : 100%; + height : auto; + position : relative; + overflow : hidden; + text-align : center; + font-family: "Arial", sans-serif; + font-size: 12px; + border: 1px solid #BCCDF0; +} + +.gfg-title { + font-size: 14px; + font-weight : bold; + color : #3366cc; + background-color: #E5ECF9; + line-height : 1.4em; + overflow : hidden; + white-space : nowrap; +} + +.gfg-title a { + color : #3366cc; +} + +.gfg-subtitle { + font-size: 12px; + font-weight : bold; + color : #3366cc; + background-color: #E5ECF9; + line-height : 1.4em; + overflow : hidden; + white-space : nowrap; + margin-bottom : 5px; +} + +.gfg-subtitle a { + color : #3366cc; +} + +.gfg-entry { + background-color : white; + width : 100%; + height : 6.9em; + position : relative; + overflow : hidden; + text-align : left; + margin-top : 3px; +} + +/* To allow correct behavior for overlay */ +.gfg-root .gfg-entry .gf-result { + position : relative; + background-color : white; + width : auto; + height : 100%; + padding-left : 20px; + padding-right : 5px; +} + +.gfg-list { + position : relative; + overflow : hidden; + text-align : left; + margin-bottom : 5px; +} + +.gfg-listentry { + line-height : 1.5em; + overflow : hidden; + white-space : nowrap; + text-overflow : ellipsis; + -o-text-overflow : ellipsis; + padding-left : 15px; + padding-right : 5px; + margin-left : 5px; + margin-right : 5px; +} + +.gfg-listentry-odd { + background-color : #F6F6F6; +} + +.gfg-listentry-even { +} + +.gfg-listentry-highlight { + background-image : url('garrow.gif'); + background-repeat: no-repeat; + background-position : center left; +} + +/* + * FeedControl customizations. + */ + +.gfg-root .gfg-entry .gf-result .gf-title { + font-size: 14px; + line-height : 1.2em; + overflow : hidden; + white-space : nowrap; + text-overflow : ellipsis; + -o-text-overflow : ellipsis; + margin-bottom : 2px; +} + +.gfg-root .gfg-entry .gf-result .gf-snippet { + height : 3.8em; + color: #000000; + margin-top : 3px; +} + +/* + * Easy way to get horizontal mode, applicable via js options to gadget. + */ + +.gfg-horizontal-container { + position : relative; +} + +.gfg-horizontal-root { + height : 1.5em; + _height : 100%; + position : relative; + white-space : nowrap; + overflow : hidden; + text-align : center; + font-family: "Arial", sans-serif; + font-size: 13px; + border: 1px solid #AAAAAA; + padding : 5px; + margin-right : 80px; +} + +.gfg-horizontal-root .gfg-title { + font-weight : bold; + background-color: #FFFFFF; + line-height : 1.5em; + overflow : hidden; + white-space : nowrap; + float : left; + padding-left : 10px; + padding-right : 12px; + border-right: 1px solid #AAAAAA; +} + +.gfg-horizontal-root .gfg-title a { + color : #444444; + text-decoration : none; +} + +.gfg-horizontal-root .gfg-entry { + width : auto; + height : 1.5em; + position : relative; + overflow : hidden; + text-align : left; + margin-top : 0px; + margin-left : 0px; + padding-left : 10px; +} + +/* To allow correct behavior for overlay */ +.gfg-horizontal-root .gfg-entry .gf-result { + position : relative; + background-color : white; + width : 100%; + height : 100%; + line-height : 1.5em; + overflow : hidden; + white-space : nowrap; +} + +.gfg-horizontal-root .gfg-list { + display : none; +} + +/* + * FeedControl customizations. + */ + +.gfg-horizontal-root .gfg-entry .gf-result .gf-snippet, +.gfg-horizontal-root .gfg-entry .gf-result .gf-author { + display : none; +} + +.gfg-horizontal-root .gfg-entry .gf-result .gf-title { + color: #0000cc; + margin-right : 3px; + float : left; +} + +.gfg-horizontal-root .gfg-entry .gf-result .gf-spacer { + float : left; +} + +.gfg-horizontal-root .gfg-entry .gf-result .gf-spacer, +.gfg-horizontal-root .gfg-entry .gf-result .gf-relativePublishedDate { + display : block; + color: #AAAAAA; +} + +.gfg-branding { + white-space : nowrap; + overflow : hidden; + text-align : left; + position : absolute; + right : 0px; + top : 0px; + width : 80px; +} + +.gfg-collapse-open, .gfg-collapse-closed { + background-repeat : no-repeat; + background-position : center; + cursor : pointer; + float : right; + width : 17px; + height : 20px; +} + +.gfg-collapse-open { + background-image : url('arrow_open.gif'); +} + +.gfg-collapse-closed { + background-image : url('arrow_close.gif'); +} + +.gfg-collapse-href { + float : left; +} + +.clearFloat { + clear : both; +} diff --git a/SYSPROG/STPROCINS/RTP57.EQUATES.txt b/SYSPROG/STPROCINS/RTP57.EQUATES.txt new file mode 100644 index 0000000..b6e8575 --- /dev/null +++ b/SYSPROG/STPROCINS/RTP57.EQUATES.txt @@ -0,0 +1,27 @@ +compile insert RTP57.EQUATES + +* rjc 02-23-15 Copied From AREV_BP +* rjc 05/12/21 Add lhfileversion equates + +EQU LOCK.SEMAPHORE TO 36 +EQU UNLOCK.SEMAPHORE TO 37 +EQU SET.USER.SEMAPHORE TO 38 + +* rjc 07-06-16 Add constrToken +Equ VERSION_TOKEN$ To "UDVERSION" +Equ VERSION_TOKEN_LENGTH$ To 9 + + +Equ createfile_reccount_pos$ To 1 ; * expected reccount +Equ createfile_avg_Size_pos$ To 2 ; * expected average size +Equ createfile_dictcount_pos$ To 3 ; * expected dict item count +Equ createfile_framesize_pos$ To 4 ; * desired framesize +Equ createfile_threshold_pos$ To 5 ; * desired resize threshold +Equ createfile_sizelock_pos$ To 6 ; * sizelock at create +Equ createfile_fileversion_pos$ To 7 ; * lh file version + +* rjc 05-12-21 -- lhfileversion, used for attribute 5 of create_table +Equ LH_FILETYPE_1$ To 100 ; * lt 64k modulus, lt 2gb lk +Equ LH_FILETYPE_2$ To 110 ; * supports > 64k modulus, < 2gb lk +Equ LH_FILETYPE_3$ To 120 ; * supports > 65k modulus, > 2gb lk +Equ LH_FILETYPE_3A$ To 130 ; * supports > 65k modulus, > 2gb lk, new hashing algorithm diff --git a/SYSPROG/STPROCINS/RTP57_BFS_EQUATES.txt b/SYSPROG/STPROCINS/RTP57_BFS_EQUATES.txt new file mode 100644 index 0000000..bea8537 --- /dev/null +++ b/SYSPROG/STPROCINS/RTP57_BFS_EQUATES.txt @@ -0,0 +1,34 @@ +Compile insert RTP57_BFS_EQUATES + + +Equ BFS$ To "RTP57" +Equ null_term$ To \00\ + +* ---- +* Layout of SYSPTR Volume definition +* ---- +* items 1-6 are OI standard for any BFS, beyond that is BFS specific +/* +* Standard definitions used by RTP49 +EQU VOL_PTR_TOKEN$ TO 1 +EQU VOL_PTR_FS$ TO 2 +EQU VOL_PTR_LOCATION$ TO 3 +EQU VOL_PTR_CONTROL$ TO 4 +*/ +Equ RTP57_Volume$ to 1 ; * the literal "VOLUME" +Equ RTP57_BfsType$ to 2 ; * the literal "RTP57" +Equ RTP57_Ctl_Info$ to 3 ; * <1,1> = SYSPTR ID or physical location +Equ RTP57_Foreign_Info$ to 4 ; * Connectionstring parameters +Equ RTP57_VolumeId$ to 5 ; * Name of the volume + +* layout of +Equ RTP57_foreign_Server$ To 1 ; * BOBCART +Equ RTP57_foreign_Port$ To 2 ; * 8091 +Equ RTP57_foreign_Sharename$ To 3 ; * OIFOLDER +Equ RTP57_foreign_encrypt_transport$ To 4 ; * 0 / 1 +Equ RTP57_foreign_require_authentication$ To 5 ; * 0 / 1 +Equ RTP57_foreign_is_connectionstring$ To 6 ; *"0 / 1" + + + +Declare Subroutine RTP57 diff --git a/SYSPROG/STPROCINS/RTP65_EQUATES.txt b/SYSPROG/STPROCINS/RTP65_EQUATES.txt new file mode 100644 index 0000000..570f83e --- /dev/null +++ b/SYSPROG/STPROCINS/RTP65_EQUATES.txt @@ -0,0 +1,50 @@ +compile insert rtp65_equates +/* + ** Copyright (C) 2012-2021 Revelation Software Inc. All Rights Reserved ** + + Author : Captain C + Date : September 2012 + Purpose : RTP65 constants + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== +*/ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#ifndef _RTP65_EQUATES_ +#define _RTP65_EQUATES_ +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// + + equ RTP65_CREATE$ to 0 + equ RTP65_OPEN$ to 1 + equ RTP65_CLOSE$ to 2 + equ RTP65_CLEAR$ to 3 + equ RTP65_READ$ to 4 + equ RTP65_WRITE$ to 5 + equ RTP65_DELETE$ to 6 + + equ RTP65_NO_ERR$ to 0 + equ RTP65_TABLE_EXIST_ERR$ to 1 ; * // FS146 + equ RTP65_TABLE_NOT_EXIST_ERR$ to 2 ; * // FS145 + equ RTP65_TABLE_ALREADY_OPEN_ERR$ to 3 ; * // FS200 + equ RTP65_REC_DNE_ERR$ to 4 ; * // FS100 + equ RTP65_UNKNOWN_CODE$ to 5 ; * // FS281 + equ RTP65_INIT_ERR$ to 6 + equ RTP65_OPEN_ERR$ to 7 + equ RTP65_NULL_TABLE_ERR$ to 8 + equ RTP65_NULL_METHOD_ERR$ to 9 + equ RTP65_BAD_METHOD_ERR$ to 10 + equ RTP65_REVSTL_ERR$ to 11 + + equ RTP65_NULL_HANDLE$ to -1 + +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// +#endif +//////////////////////////////////////////////////////////////////////////////// +//////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/RW_EQUATES.txt b/SYSPROG/STPROCINS/RW_EQUATES.txt new file mode 100644 index 0000000..ea31208 --- /dev/null +++ b/SYSPROG/STPROCINS/RW_EQUATES.txt @@ -0,0 +1,80 @@ +compile insert rw_equates +* JBK.RTI.01/25/96 Added equates for Lotus Notes Folders +* JBK/RTI/03/14/95 Added RWD_DT_RICHTEXT$ for Rich Text Fields +* declarations + +DECLARE FUNCTION GET_REPOS_ENTITIES, REPOSITORY, GET.RECCOUNT +DECLARE FUNCTION REPOS_RESOLVE_ENTITY, ENTID, REQUEST_INFO +DECLARE FUNCTION OPENNOTE, CLOSENOTE, GETNOTEFIELD, RUNNOTESMACRO + +* equates for different data sources + +EQU RD_LH$ TO 1 +EQU RD_NOTES$ TO 2 + +* equates for reporter supporting procedures + +EQU RW_PREFIX$ TO 'RW' :@STATION: '_' +EQU RW_MAXCURSOR$ TO 8 +EQU RW_GETLIST$ TO 'GETLIST' +EQU RW_ATSTATION$ TO '@STATION' ;* This token is replaced by @station + +* LotusNotes specific equates + +EQU RW_NOTESDELIM$ TO '#' +EQU RW_GETFIELDS_ALL$ TO 0 +EQU RW_GETFIELDS_BY_FORM$ TO 1 +EQU RW_GETFIELDS_BY_VIEW$ TO 2 +EQU RW_GETFIELDS_BY_FOLDER$ TO 3 + +* equates for GetBlock processor + +EQU FRMDATA_ONLY$ TO 1 +EQU RAWDATA_ONLY$ TO 2 + +*COMMON /_RW_COM_/ lastKey@ ;* for now it's in @RECUR1 +EQU lastKey@ TO @RECUR1 + +* Column Decriptor structure + +EQU RWD_POS$ TO 1 +EQU RWD_NAME$ TO 2 +EQU RWD_DATATYPE$ TO 3 + EQU RWD_DT_SDWORD$ TO 3 + EQU RWD_DT_SDOUBLE$ TO 7 + EQU RWD_DT_LPSTR$ TO 10 + EQU RWD_DT_BOOLEAN$ TO 11 + EQU RWD_DT_DATE$ TO 12 + EQU RWD_DT_TIME$ TO 14 + EQU RWD_DT_RICHTEXT$ TO 16 +EQU RWD_FIELDTYPE$ TO 4 +EQU RWD_LEN$ TO 5 +EQU RWD_JUST$ TO 6 +EQU RWD_CONV$ TO 7 +EQU RWD_MV$ TO 8 +EQU RWD_INDEXED$ TO 9 + +* repository types / classes + +EQU RTYPE_DBTABLE$ TO 'DBTABLE' +EQU RTYPE_DBSOURCE$ TO 'DATASOURCE' + EQU RCLASS_NOTESDB$ TO 'NOTESDB' + +EQU RTYPE_DBCOMPONENT$ TO 'DBCOMPONENT' + EQU RCLASS_NOTESVIEW$ TO 'NOTESVIEW' + EQU RCLASS_NOTESFORM$ TO 'NOTESFORM' + EQU RCLASS_NOTESFOLD$ TO 'NOTESFOLD' + + +EQU RTYPE_NOTESDB$ TO "DATASOURCE" +EQU RTYPE_NOTESVIEW$ TO "DBCOMPONENT" +EQU RTYPE_NOTESFORM$ TO "DBCOMPONENT" +EQU RTYPE_NOTESFOLD$ TO "DBCOMPONENT" + +* rich text stuff + +EQU RW_RTF_STARTTEXT$ TO '{\rtf1\ansi \deff0\deflang1024' +EQU RW_RTF_ENDTEXT$ TO '\par}' +EQU RW_RTF_FONTS$ TO '$Fonts':@fm:'RichText' +EQU RW_RTF_COLORS$ TO '$Colors':@fm:'RichText' + diff --git a/SYSPROG/STPROCINS/SCHEMA.CONSTANTS.txt b/SYSPROG/STPROCINS/SCHEMA.CONSTANTS.txt new file mode 100644 index 0000000..7ee8660 --- /dev/null +++ b/SYSPROG/STPROCINS/SCHEMA.CONSTANTS.txt @@ -0,0 +1,124 @@ +Compile Insert Schema.Constants + +* mtr moved 1-24-06 +*** DISPATCH CODES FOR SQL.SCHEMA MODULE *** + +EQUATE CREATE.TABLE$ TO 1 +EQUATE ALTER.TABLE$ TO 2 +EQUATE DROP.TABLE$ TO 3 +EQUATE CREATE.VIEW$ TO 4 +EQUATE DROP.VIEW$ TO 5 +EQUATE CREATE.INDEX$ TO 6 +EQUATE DROP.INDEX$ TO 7 +EQUATE GRANT.PRIVILEGE$ TO 8 +EQUATE REVOKE.PRIVILEGE$ TO 9 + +*** SCRIPT POSITIONS FOR CREATE.TABLE *** +EQUATE SCRIPT.TABLE$ TO 1 +EQUATE SCRIPT.VOLUME$ TO 2 +EQUATE SCRIPT.ALTER$ TO 2 +EQUATE SCRIPT.COLUMNS$ TO 3 + +EQUATE COLUMN.NAME$ TO 1 +EQUATE COLUMN.TYPE$ TO 2 +EQUATE COLUMN.DFLT$ TO 3 +EQUATE COLUMN.NULL$ TO 4 +EQUATE COLUMN.UNIQ$ TO 5 +EQUATE COLUMN.KEY$ TO 6 +EQUATE COLUMN.REF$ TO 7 +EQUATE COLUMN.CHECK$ TO 8 +EQUATE COLUMN.REPEAT$ TO 9 + +EQUATE COLUMN.TYPE.ARG1$ TO 2 +EQUATE COLUMN.TYPE.ARG2$ TO 3 + +EQUATE UNIQUE.MARKER$ TO "%UNIQUE%" + +EQUATE TYPES.FILE$ TO "SYSTYPES" + +EQUATE DELIMITERS$ TO "$_.,/\" +EQUATE INVALID.CHARS$ TO "~!@#$%^&*()+`-={}[]|\:;<,>.?/" + +EQUATE USER.DELIM$ TO '.' + +*** DELIMITERS FOR COLUMN REFERENCES IN SQL SCRIPTS *** +* 08/11/04 - PJM - Changed the following high 8-bit delimiters to low 8-bit +* values to avoid conflict with UTF8 character encoding. +*EQUATE COLSC$ TO '´' ;* COLUMN START CHARACTER +*EQUATE COLEC$ TO 'Ã' ;* COLUMN END CHARACTER +*EQUATE COLCC$ TO 'Å' ;* COLUMN CONVERSION CHARACTER +*EQUATE COLPC$ TO '¶' ;* COLUMN POSITION CHARACTER +*EQUATE PARAMC$ TO 'Î' ;* PARAMETER CHARACTER +*EQUATE BLOCKC$ TO "Û" ;* Script Block separater character. +*EQUATE LQUOTEC$ TO "Ô" ;* Left quote character +*EQUATE RQUOTEC$ TO "¾" ;* Right quote character +*EQUATE SUBQC$ TO '×' ;* Subquery token character +*EQUATE LCOLOCC$ TO '·' ;* Left delimiter for output conversion +*EQUATE RCOLOCC$ TO 'Ö' ;* Right delimiter for output conversion +* +*--> 01/14/91 - RKH - Fix 3838: Add a USER token for embedded inserts +*EQUATE USER_TOKEN$ TO "ÑUSER" ;* CHAR(209):"USER" for embedded SQL only + +EQUATE COLSC$ TO \1F\ ;* COLUMN START CHARACTER +EQUATE COLEC$ TO \1E\ ;* COLUMN END CHARACTER +EQUATE COLCC$ TO \1D\ ;* COLUMN CONVERSION CHARACTER +EQUATE COLPC$ TO \1C\ ;* COLUMN POSITION CHARACTER +EQUATE PARAMC$ TO \1B\ ;* PARAMETER CHARACTER +EQUATE BLOCKC$ TO \1A\ ;* Script Block separater character. +EQUATE LQUOTEC$ TO \19\ ;* Left quote character +EQUATE RQUOTEC$ TO \18\ ;* Right quote character +EQUATE SUBQC$ TO \17\ ;* Subquery token character +EQUATE LCOLOCC$ TO \16\ ;* Left delimiter for output conversion +EQUATE RCOLOCC$ TO \15\ ;* Right delimiter for output conversion +EQUATE USER_TOKEN$ TO \14\:"USER" ;* CHAR(20):"USER" for embedded SQL only + +EQUATE TOP.OR$ TO CHAR(252) ;* TEXT MARK +EQUATE TOP.AND$ TO CHAR(251) ;* SUB TEXT MARK + +*** SCRIPT POSITIONS FOR QUALIFY *** +EQUATE QUAL.DISTINCT$ TO 1 +EQUATE QUAL.SELECTION$ TO 2 +EQUATE QUAL.FROM$ TO 3 +EQUATE QUAL.WHERE$ TO 4 +EQUATE QUAL.GROUP.BY$ TO 5 +EQUATE QUAL.HAVING$ TO 6 +EQUATE QUAL.SUB.RUNTIME$ TO 8 +EQUATE QUAL.SUB.SETFUNC$ TO 9 +* update following whenever new field added to structure. +EQUATE QUAL.SUB.MAX$ TO 9 ;* Highest defined field in structure + +*** SCRIPT POSITIONS FOR CREATE.VIEW *** +EQUATE VIEW.NAME$ TO 1 +EQUATE VIEW.COLUMNS$ TO 2 +EQUATE VIEW.INSERTABLE$ TO 3 +EQUATE VIEW.UPDATEABLE$ TO 4 +EQUATE VIEW.DELETEABLE$ TO 5 +EQUATE VIEW.TEXT$ TO 6 +EQUATE VIEW.KEY.ASSOC$ TO 7 +* 8 - 9 RESERVED +EQUATE VIEW.DISTINCT$ TO 10 +EQUATE VIEW.SELECTION$ TO 11 +EQUATE VIEW.FROM$ TO 12 +EQUATE VIEW.WHERE$ TO 13 +EQUATE VIEW.GROUP.BY$ TO 14 +EQUATE VIEW.HAVING$ TO 15 +EQUATE VIEW.CHECK.OPT$ TO 16 +EQUATE VIEW.SETFUNC$ TO 17 +* 18 - 19 RESERVED +EQUATE VIEW.SUBQ$ TO 20 + +EQUATE VIEWTEMP_PREFIX$ TO "@VF/" ;* PREFIX TO VIEW TEMPORARY FILE + +*** "RAW" ORDER SPEC - INPUT TO QUALIFY_ORDER *** +*** VALUE STRUCTURE *** + +EQUATE ORDER_COLUMN_SPEC$ TO 1 +EQUATE ORDER_DIR_SPEC$ TO 2 + +*** VALUE EQUATE FOR SQL ORDER PLAN *** +EQUATE ORDER.TABLE$ TO 1 +EQUATE ORDER.COLUMN$ TO 2 +EQUATE ORDER.POSITION$ TO 3 + +EQUATE VIEW.CATALOG$ TO "SYSVIEWS" +* Source Date: 07:37:54 05 NOV 1991 Build ID: OE*1.0.60 Level: 1.0 diff --git a/SYSPROG/STPROCINS/SCM_CONSTANTS.txt b/SYSPROG/STPROCINS/SCM_CONSTANTS.txt new file mode 100644 index 0000000..a7a4697 --- /dev/null +++ b/SYSPROG/STPROCINS/SCM_CONSTANTS.txt @@ -0,0 +1,13 @@ +compile insert SCM_constants + +/* + Amended Date Reason + ======= ==== ====== + MTR 07-29-10 Initial Creation +*/ + +common /scm_common/ progname@, appname@, versionid@, override_version_number@ + +Equ scm_Version_table$ To 'SYSPROCS_VERSIONS' +Equ scm_object_table$ To 'SYSOBJ_VERSIONS' +Equ scm_Control_table$ To 'SYSPROCS_VERSIONS_CONTROL' diff --git a/SYSPROG/STPROCINS/SCM_EQUATES.txt b/SYSPROG/STPROCINS/SCM_EQUATES.txt new file mode 100644 index 0000000..9bd09ee --- /dev/null +++ b/SYSPROG/STPROCINS/SCM_EQUATES.txt @@ -0,0 +1,13 @@ +Compile Insert SCM_Equates + +* mtr 8-31-10 For SCM screens and related + +Equ cfg_key$ To 'CFG_SCM' + +Equ Sync_EditTables$ To 1 +Equ Scroll_to_first_error$ To 2 +Equ Show_Diff_only$ To 3 +Equ New_Only_Color$ To 4 +Equ old_only_color$ To 5 +Equ Spacing_Color$ To 6 + diff --git a/SYSPROG/STPROCINS/SELECT.CONSTANTS.txt b/SYSPROG/STPROCINS/SELECT.CONSTANTS.txt new file mode 100644 index 0000000..00df684 --- /dev/null +++ b/SYSPROG/STPROCINS/SELECT.CONSTANTS.txt @@ -0,0 +1,151 @@ +compile insert select.constants + +* MISC EQUATES * +* rjc 10 Nov 2003 - increase MAX sizes for MAX.WORK.LIST, MAX.LIST.LEN +EQUATE MAX.WORK.LIST.LEN$ TO 32768 +*EQUATE MAX.WORK.LIST.LEN$ TO 1048576 ; * 2^20, 1MB -- a compromise between unlimited list and well-framed lists file +EQUATE MAX.SORT.KEY.LEN$ TO 32600 +*** rjc * EQUATE MAX.LIST.LEN$ TO 65527 +EQUATE MAX.LIST.LEN$ TO 1048576 ; * 2^20, 1MB -- a compromise between unlimited lsit and well-framed lists file +EQUATE MAX.LIMIT$ TO 9E99 ;* WHAT TO SET LIMIT TO TO AVOID LIMIT + +* SELECT MODE NUMERIC CODES * + +EQUATE COMPAT.SELECT$ TO 0 +EQUATE SETTING.SELECT$ TO 1 +EQUATE USING.SELECT$ TO 2 +EQUATE ASSIGN.SELECT$ TO 3 + +* REDUCE MODE NUMERIC CODES * + +EQUATE NEW.REDUCE$ TO 0 +EQUATE SETTING.REDUCE$ TO 1 +EQUATE AND.REDUCE$ TO 2 +EQUATE OR.REDUCE$ TO 3 + +* SEEK MODE NUMERIC CODES * + +EQUATE TOP.SEEK$ TO 0 +EQUATE BOTTOM.SEEK$ TO 1 +EQUATE CURRENT.SEEK$ TO 2 +EQUATE MARK.SEEK$ TO 3 +EQUATE RESTORE.SEEK$ TO 4 + +* FIELD POSITIONS FOR NEXT.GROUP * +* GROUP.LAST$: +* USED BY ALL SELECT MODES. IN INDEX MODE IS THE LAST NODE ID FOR CURRENT LIST +* GROUP.FIELD$: +* IN EXTRA LIST INDEX MODE IS THE FIELD NUMBER OF THE CURRENT LIST IN MEMORY +* GROUP.FIRST$: +* IN INDEX MODE IS THE FIRST NODE ID FOR THE CURRENT LIST IN MEMORY +* +EQUATE GROUP.LAST$ TO 1 +EQUATE GROUP.FIELD$ TO 2 +EQUATE GROUP.FIRST$ TO 3 + +* FIELD POSITIONS FOR LONG.LIST * +* USED IN EXTERNAL SELECT MODE AND BREAK SORT INDEX MODE * +* THE INDEX OF THE CURRENT OVERFLOW LIST IN THE LISTS FILE * +* +EQUATE LONG.LIST.NUMBER$ TO 1 +* +* THE LARGEST INDEX OF THE OVERFLOWS IN THE LISTS FILE * +EQUATE LONG.LIST.MAX$ TO 2 + +* CODES FOR LIST.ACTIVE * +EQUATE INACTIVE.SELECT$ TO 0 +EQUATE LATENT.FILE.SELECT$ TO 1 +EQUATE LATENT.INDEX.SELECT$ TO 2 +EQUATE EXTRN.SELECT$ TO 3 + +* CODES FOR READNEXT DIRECTION * +EQUATE ASND.TERM$ TO 0 +EQUATE ASND.NONTERM$ TO 1 +EQUATE DSND.TERM$ TO 2 +EQUATE DSND.NONTERM$ TO 3 + +* SECONDS ALLOWED BETWEEN BREAKS WHILE IN READNEXT * +EQUATE BREAK.TIME$ TO 10 + +EQUATE V119.INITIALIZE$ TO 'I' +EQUATE V119.SORT$ TO 'S' +EQUATE V119.WRITE$ TO 'W' +EQUATE V119.EXTRACT$ TO 'E' +EQUATE V119.MERGE$ TO 'M' +EQUATE V119.LONG.EXTRACT$ TO 'L' +EQUATE V119.DELETE$ TO 'D' + +*** CURSORS ARRAY EQUATES *** + +EQUATE MAX.CURSORS$ TO 8 +EQUATE MAX.CURSOR.ELEMENTS$ TO 12 + +EQUATE CURS.LIST$ TO 1 ;* referenced by number in OP118 +EQUATE CURS.LIST.OFF$ TO 2 ;* referenced by number in OP118 +EQUATE CURS.EXT.LIST$ TO 3 +EQUATE CURS.NEXT.GROUP$ TO 4 +EQUATE CURS.LIST.ACTIVE$ TO 5 +EQUATE CURS.LONG.LIST$ TO 6 +EQUATE CURS.QUERY.DICT$ TO 7 +EQUATE CURS.PRI.FILE$ TO 8 +EQUATE CURS.REDUCTION.SPEC$ TO 9 +EQUATE CURS.SORT.SPEC$ TO 10 +EQUATE CURS.REDUCTION.DONE$ TO 11 ;* refereced by number in OP118 +EQUATE CURS.IO.PROC$ TO 12 ;* Cursor I/O process + +EQUATE BY.DSND.FLAG$ TO '#' ;* FLAG FOR SELECT BY FIELD NAMES + +* CODES FOR SORT.SPEC FIELD 1 * +EQUATE SORT.DIR$ TO 1 +EQUATE SORT.JUST$ TO 2 +EQUATE BOTTOM.VAL$ TO 3 +EQUATE TOP.VAL$ TO 4 +EQUATE SORT.NAME$ TO 5 + +* CODES FOR BY.LIST FIELD 1 * +EQUATE BY.F1.NAME$ TO 1 +EQUATE BY.F1.BOTTOM$ TO 2 +EQUATE BY.F1.TOP$ TO 3 + +* SORT.SPEC DEFINES * + +EQUATE SORT.BYS$ TO 2 ;* FLAG TRUE IF DESCEND +EQUATE SORT.FMTS$ TO 3 ;* 'AL' 'AR' +EQUATE SORT.MULT$ TO 4 ;* FLAG TRUE IF MULTI-VALUE +EQUATE SORT.CALC$ TO 5 ;* VALUE TRUE IF FIELD IS SYMBOLIC +EQUATE SORT.FIELDS$ TO 6 ;* FIELD NAMES OR NUMBERS +EQUATE SORT.EXPLODE$ TO 7 ;* ANY MULTI-VALUES +EQUATE SORT.ID.ONLY$ TO 8 ;* SORTING ONLY BY @ID + +* REDUCTION.SPEC DEFINES * +EQUATE REDUCT.SCRIPT$ TO 1 ;* R/LIST WITH SCRIPT +EQUATE REDUCT.SPEC.RANGE$ TO 2 ;* RANGE INFO FOR FEED FORWARD TO SELECT +EQUATE RANGE.FIELD$ TO 1 +EQUATE RANGE.BOTTOM.VAL$ TO 2 +EQUATE RANGE.TOP.VAL$ TO 3 +EQUATE REDUCT.DONE$ TO 4 +EQUATE REDUCT.CASE.FORCE$ TO 3 ;* FIELD 3 FORCE CASE FLAG (INSENSITIVITY) +* +* IF REDUCT.DONE IS TRUE THEN, IF THE RANGE IS USED BY THE SELECT THEN +* THAT WILL SATISFY ALL REDUCTION AND REDUCTION.DONE MAY BE SET TO TRUE + +*** SELECT.SEEK STATUS ERROR CODES *** +EQUATE SEEK.ERR.BAD.CURS$ TO 1 ;* INVALID CURSOR +EQUATE SEEK.ERR.BAD.MODE$ TO 2 ;* INVALID MODE +EQUATE SEEK.ERR.BAD.POS$ TO 3 ;* INVALID POSITION +EQUATE SEEK.ERR.NO.SEL$ TO 4 ;* NO ACTIVE SELECT +EQUATE SEEK.ERR.BAD.SEL$ TO 5 ;* INVALID SELECT MODE +EQUATE SEEK.ERR.BAD.RN$ TO 6 ;* ERROR IN READNEXT +EQUATE SEEK.ERR.BAD.BRN$ TO 7 ;* ERROR IN BLOCK READNEXT +EQUATE SEEK.ERR.BAD.IRN$ TO 8 ;* ERROR IN INDEX READNEXT +EQUATE SEEK.ERR.BAD.ERN$ TO 9 ;* ERROR IN EXTERNAL READNEXT + +* saved select header info (@tm-delim'd) +equ SAVSEL_TIMEDATE$ to 2 +equ SAVSEL_USER$ to 3 +equ SAVSEL_RECCOUNT$ to 4 +equ SAVSEL_COMMENTS$ to 5 + +* placeholder for inverting for null vlues +Equ NULL_TOKEN$ To "%%NULL%%" + diff --git a/SYSPROG/STPROCINS/SERVERS_EQUATES.txt b/SYSPROG/STPROCINS/SERVERS_EQUATES.txt new file mode 100644 index 0000000..fc1f67e --- /dev/null +++ b/SYSPROG/STPROCINS/SERVERS_EQUATES.txt @@ -0,0 +1,11 @@ +compile insert SERVERS_EQUATES +/*---------------------------------------- + Author : Table Create Insert Routine + Written : 11/05/2020 + Description : Insert for Table SERVERS +----------------------------------------*/ + + +Equ SERVERS.SERVER_ID$ To 0 +Equ SERVERS.CONNECTION_STRING$ To 1 +Equ SERVERS.DESCRIPTION$ To 2 diff --git a/SYSPROG/STPROCINS/SERVICE_SETUP.txt b/SYSPROG/STPROCINS/SERVICE_SETUP.txt new file mode 100644 index 0000000..d4de932 --- /dev/null +++ b/SYSPROG/STPROCINS/SERVICE_SETUP.txt @@ -0,0 +1,43 @@ +Compile insert Service_Setup + +/*********************************************************************************************************************** + + This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written + permission from SRP Computer Solutions, Inc. + + Name : Service_Setup + + Description : Equates used by the Service modules. + + Notes : + + History : (Date, Initials, Notes) + 08/13/10 dmb Original programmer. + +***********************************************************************************************************************/ + +Declare function RetStack, Error_Services +Declare subroutine Error_Services + + +// Make sure any request parameters which have not been assigned are nulled. +If Assigned(Service) else Service = '' +If Assigned(Error) else Error = '' +If Assigned(Param1) else Param1 = '' +If Assigned(Param2) else Param2 = '' +If Assigned(Param3) else Param3 = '' +If Assigned(Param4) else Param4 = '' +If Assigned(Param5) else Param5 = '' +If Assigned(Param6) else Param6 = '' +If Assigned(Param7) else Param7 = '' +If Assigned(Param8) else Param8 = '' +If Assigned(Param9) else Param9 = '' +If Assigned(Param10) else Param10 = '' +If Assigned(Response) else Response = '' + +// Create the service Key ID in case Memory_Services is used. +ServiceModule = RetStack()<1> +ServiceKeyID = ServiceModule : '*' : Service + +// Clear any error conditions. +Error_Services('Clear') diff --git a/SYSPROG/STPROCINS/SETDEBUGGER_EQUATES.txt b/SYSPROG/STPROCINS/SETDEBUGGER_EQUATES.txt new file mode 100644 index 0000000..ffb5395 --- /dev/null +++ b/SYSPROG/STPROCINS/SETDEBUGGER_EQUATES.txt @@ -0,0 +1,54 @@ +compile insert setDebugger_Equates +/* + ** Copyright (C) 2012-2018 Revelation Software Inc. All Rights Reserved ** + + This program is proprietary and is not to be used by or disclosed + to others, nor is it to be copied without written permission from + Revelation Technologies, Inc. + + Author : Captain C + Date : 22 Oct 2018 + Purpose : Constant definitions for use with the SETDEBUGGER stored + procedure + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 01 Nov 18 Added SAVEWARN flag + Mr C 25 Apr 18 Added SPY method equates and SETDEBUGGER_SPYIDE$ + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _SETDEBUGGER_EQUATES_ +#define _SETDEBUGGER_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SPY method + + // Command equates + equ SETDEBUGGER_SPY_OFF$ to 0 + equ SETDEBUGGER_SPY_ON$ to 1 + equ SETDEBUGGER_SPY_ONIDE$ to 2 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // %%_SETDEBUGGER_%% Common area flags + + equ SETDEBUGGER_SPY$ to 0x00000001 + equ SETDEBUGGER_NOASSERT$ to 0x00000002 ; * // inverse! + equ SETDEBUGGER_SPYTRACKIDE$ to 0x00000004 + equ SETDEBUGGER_SPY2SYSMON$ to 0x00000008 + equ SETDEBUGGER_SAVEWARN$ to 0x00000010 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/SETWINDOWPOS_EQUATES.txt b/SYSPROG/STPROCINS/SETWINDOWPOS_EQUATES.txt new file mode 100644 index 0000000..c9f9cd2 --- /dev/null +++ b/SYSPROG/STPROCINS/SETWINDOWPOS_EQUATES.txt @@ -0,0 +1,32 @@ +compile insert setWindowPos_Equates +/* + Author Captain C + Date April 2002 + Purpose equates for the setWindowPos Windows API function. + + + Amended Date Reason + ======= ==== ====== +*/ + declare function setWindowPos + + equ SWP_NOSIZE$ to 1 + equ SWP_NOMOVE$ to 2 + equ SWP_NOZORDER$ to 4 + equ SWP_NOREDRAW$ to 8 + equ SWP_NOACTIVATE$ to 0x10 + equ SWP_FRAMECHANGED$ to 0x20 ; * // The frame changed: send WM_NCCALCSIZE + equ SWP_SHOWWINDOW$ to 0x40 + equ SWP_HIDEWINDOW$ to 0x80 + equ SWP_NOCOPYBITS$ to 0x100 + equ SWP_NOOWNERZORDER$ to 0x200 ; * // Don't do owner Z ordering + equ SWP_NOSENDCHANGING$ to 0x400 ; * // Don't send WM_WINDOWPOSCHANGING + equ SWP_DRAWFRAME$ to SWP_FRAMECHANGED$ + equ SWP_NOREPOSITION$ to SWP_NOOWNERZORDER$ + equ SWP_DEFERERASE$ to 0x2000 + equ SWP_ASYNCWINDOWPOS$ to 0x4000 + + equ HWND_TOP$ to 0 + equ HWND_BOTTOM$ to 1 + equ HWND_TOPMOST$ to -1 + equ HWND_NOTOPMOST$ to -2 diff --git a/SYSPROG/STPROCINS/SHOWWINDOW_EQUATES.txt b/SYSPROG/STPROCINS/SHOWWINDOW_EQUATES.txt new file mode 100644 index 0000000..f92cd0d --- /dev/null +++ b/SYSPROG/STPROCINS/SHOWWINDOW_EQUATES.txt @@ -0,0 +1,25 @@ +compile insert showWindow_Equates +/* + Author Captain C + Date Oktober 2001 + Purpose equates for the ShowWindow Windows API function. + The SW_ constants may also be mapped onto a form's + VISIBLE property + + Amended Date Reason + ======= ==== ====== +*/ + declare function showWindow + + equ SW_HIDE$ to 0 + equ SW_SHOWNORMAL$ to 1 + equ SW_NORMAL$ to 1 + equ SW_SHOWMINIMIZED$ to 2 + equ SW_SHOWMAXIMIZED$ to 3 + equ SW_MAXIMIZE$ to 3 + equ SW_SHOWNOACTIVATE$ to 4 + equ SW_SHOW$ to 5 + equ SW_MINIMIZE$ to 6 + equ SW_SHOWMINNOACTIVE$ to 7 + equ SW_SHOWNA$ to 8 + equ SW_RESTORE$ to 9 diff --git a/SYSPROG/STPROCINS/SOCKETEQUATES.txt b/SYSPROG/STPROCINS/SOCKETEQUATES.txt new file mode 100644 index 0000000..06e2edc --- /dev/null +++ b/SYSPROG/STPROCINS/SOCKETEQUATES.txt @@ -0,0 +1,8 @@ +compile insert SOCKETEQUATES +* MTR 8-30-05 Moved to Gold + +Equ SOCKET$OPEN To 1 +Equ SOCKET$READ To 2 +Equ SOCKET$WRITE To 3 +Equ SOCKET$CLOSE To 4 + diff --git a/SYSPROG/STPROCINS/SP.MFS.COMMON.txt b/SYSPROG/STPROCINS/SP.MFS.COMMON.txt new file mode 100644 index 0000000..8d38cf4 --- /dev/null +++ b/SYSPROG/STPROCINS/SP.MFS.COMMON.txt @@ -0,0 +1,121 @@ +compile insert SP.MFS.COMMON +* This is the LABELLED COMMON area for the SPINDEX MFS and the +* Background indexing routines... +* +COMMON /XSELECT.FLAGS/ SP.VAR0@, SP.VAR1@, SP.VAR2@, SP.VAR3@, SP.VAR4@, SP.SHO@, SP.PRN@, SP.IGN@, SP.MAK@, SP.USE@, SP.BEL@, SP.FOR@, SP.FAND@, SP.LASTX@, SP.LASTS@, SP.PCODE@ +COMMON /FLAG.DEFAULTS/ SP.ERR@, SP.DSHO@, SP.DPRN@, SP.DIGN@, SP.DMAK@, SP.DUSE@, SP.DBEL@, SP.DFOR@, SP.DFAND@ +COMMON /SPINDEX.COMMON/ SP.TABLE@, SP.TABLEDATA@, SP.TABLEKEYS@(10), SP.SORTKEYS@, SP.RN.NR@, SP.STAT@ +COMMON /MSG.IMAGES/ IMAGE1@, IMAGE2@, IMAGE3@ +* +* SP.TABLE@ ;* This carries the current spindex table, with overflow stored +* ;* in the ram.drive.file defined in sp.parms +* SP.TABLEDATA@ ;* Carries the data that tracks the 10 most recent tables used +* ;* in a readnext statment. +* SP.TABLEKEYS@(10) ;* This is a dimensionsed array that carries 10 blocks +* ;* of keys read from disk via this readnext. The 10 +* ;* blocks correspond with the 10 sets of tabledata stored +* ;* in sp.tabledata@. This is done so that actual disk I/O +* ;* is eliminated when getting each record id via this +* ;* readnext... +* SP.SORTKEYS@ ;* If a sort has taken place, then this is the list of +* ;* resolved keys... +* SP.RN.NR@ ;* This is the readnext number that tells us what readnext +* ;* block of keys we are currently processing +* SP.STAT@ ;* the station's ID, usually the same as @station, but +* ;* could be different if on a banyon-vines network +*--------------------- +* +* SP.PCODE@ ;* used to communicate to sp.parms.mfs that we are doing +* ;* an authorized access of spinp 'P' record...usually set +* ;* to the value of 'ESTER' +* SP.VAR1@ ;* THIS IS USED BY XSELECT TO TELL ALL OTHER PROCESSES, +* ;* PARTICULARLY XREADNEXT, THAT AN XSELECT HAS JUST TAKEN +* ;* PLACE; XREADNEXT WILL IMMEDIATELY TURN SP.VAR1@ OFF AND +* ;* START PROCESSING THE NEW SELECT DATA... +* SP.VAR2@ ;* USED BY SPINDFEX SELECT PROCESS TO TELL SP.MFS THAT +* ;* AN AREV SELECT IS NOW TAKING PLACWE AND THAT THE +* ;* CLEARSELECT FUNCTION MUST NOT BE EXECUTED AT COMPLETION +* ;* OF THE AREV SELECT! +* SP.VAR3@ ;* used ONLY by sp.mfs to handle readnext processing of +* ;* of sorted keys... +* SP.VAR4@ ;* Used by XSELECT to tell SPINDEX version of +* ;* RTP18.ENGLISH that the actual AREV select must be +* ;* perrformed instead of another call to XSELECT... +* SP.FOR@ ;* used for passing flags between certain processes +* ;* such as between xselect and sp.q33 regarding use of OR +* ;* operation... +* SP.FAND@ ;* forces an AND operation...with no msg prompt +* SP.LASTX@ ;* text of the last XSELECT statement +* +* +* +COMMON /SP.MFS.COMMON/ SP.FNAME@, SP.HAND@, SP.FNRS@, SP.ACC@, SP.STP1@, SP.STP2@, SP.1@, SP.DOS@, SP.TKEY@, SP.TFIL@(4), SP.PFIL@, SP.PARMS, SP.CODE@, SP.SNP1@, SP.SNP2@, SP.FILE@, SP.XREF@, SP.FIL@, SP.FLD@, SP.GRP@, SP.BUILD@ +* +* SP.FNAME@ ;* All filenames that have been opened and correspond to +* ;* the SP.HAND@ array +* SP.HAND@ ;* All file handles used with OPEN statement, correspoinding to +* ;* the SP.FNAME@ array +* SP.FNRS@ ;* Actual SPINDEX File Numbers; in parallel with SP.FNAME@ +* ;* and SP.HAND@ above + +* SP.ACC@ ;* Field 1 has a flag; TRUE = allowed access; FALSE =no access +* ;* Field 2 contains the @STATION relative position in SPINP 'P' +* ;* Parameters File. This position tells SP.BUILD what volume +* ;* to use for RAM drive, etc. +* SP.STP1@ ;* The current directories that SP.BACKGROUND was at when interrupted +* Field 001: start.day (directory) +* Field 002: start.hr "" +* Field 003: days.left.to.check +* Field 004: hrs.left.to.check +* +* SP.STP2@ ;* USED BY SP.MFS to determine if the user wants to save the +* entire set of changed data fields, or just the SPINDEX +* INDEXED data fields that have changed! +* +* SP.1@ ;* Used by sp.mfs to hold the file variable of the current file +* dictionary during sort operations... +* +* SP.DOS@ ;* Name of DOS file that holds the name of the DOS extensions +* used during low level SPINDEX Boolean operations +* SP.TKEY@ ;* Used by SP.I01 to hold the keys for the TABLE1, TABLE2, +* RESULT, and BOOLEAN tables during table processing... +* This data is in the form of a @FM delimited variable. +* SP.TFIL@(4) ;* Used by SP.I01 to hold the TABLE file variables, +* where (1)=table1; (2)=result/table2; (3)=unused; (4)=Boolean +* SP.PFIL@ ;* SPINDEX SPINP Parms file +* SP.PARMS ;* The PARMS variable read from the SPINP +* SP.CODE@ ;* <1> used by sp.r04 (RTP18.ENGLISH) to tell whether or not to +* read the xselect voc file item...stores @account here +* <2> used to store the last xref key read by sp.mfs +* <3> used to store the list of 500 xref keys read by sp.mfs +* which is cleared out at the end of a series of readnexts +* +* SP.SNP1@ ;* used to store the RAM.STORE file's file handle for sp.d06 MFS +* SP.SNP2@ ;* not used +* SP.FILE@ ;* The file NAME that is currently being updated by the trans +* SP.XREF@ ;* Used to store the !filename data for all AREV indexed files; +* The variable uses SP.FIL@ to determine which attribute to +* look at; then, within each attribute is the same !filename +* record that is stored by AREV (see REVMEDIA vol 2, issue 1 +* pg 6,7). We load that data here whenever the INSTALL is run +* and then we can use that data to determine whether a +* relational update is taking place! Because, on relational +* update, we CANNOT write the update to disk! +* SP.FIL@ ;* The actual indexed SP.FIL@ +* SP.FLD@ ;* The attribute number of the current indexed field +* SP.GRP@ ;* The actual GROUP number that the indexed field belongs to +* +* SP.BUILD@ ;* flag indicating that SP.BUILD is in progress +* +* 08/03/93 - rkh comment out old copyright +*EQUATE COPYRIGHT TO "COPYRIGHT (C) 1991, 1992, BY SEARCH TECHNOLOGIES, ALL RIGHTS RESERVED" +* +EQUATE ONE.NULL TO CHAR(31) +EQUATE TWO.NULL TO CHAR(31): CHAR(31) +EQUATE SPINDEX.FOUR TO "SP": CHAR(125): CHAR(126) +EQUATE SPINDEX.SORT.FOUR TO "SP": CHAR(123): CHAR(156) +EQUATE SPINDEX.SORT.KEYS.FOUR TO "SP": CHAR(122): CHAR(157) +EQUATE SPINDEX.SORT.REAL.KEYS TO "SP": CHAR(121): CHAR(158) +* +EQUATE NULL.TABLE TO STR( CHAR(0), 3): CHAR(11): CHAR(0): CHAR(0): CHAR(0): CHAR(129): CHAR(128): CHAR(129): CHAR(128) +* Source Date: 09:27:40 04 OCT 1993 Build ID: SPINDEX_21*1.0.14 Level: 1.0 diff --git a/SYSPROG/STPROCINS/SQLEXP_MANAGER_EQUATES.txt b/SYSPROG/STPROCINS/SQLEXP_MANAGER_EQUATES.txt new file mode 100644 index 0000000..faee748 --- /dev/null +++ b/SYSPROG/STPROCINS/SQLEXP_MANAGER_EQUATES.txt @@ -0,0 +1,330 @@ +compile insert SQLExp_Manager_Equates + +***************************************************************************** +* +* Name : SQLExp_Manager_Equates +* Description: Equates and internal subroutines used by the SQL Warehousing +* Manager and the wizard which starts the warehousing process. +* +* History (Date, Initials, Notes) +* 03/03/97 cp Original programmer +* 06/16/97 cp Updated for 3.5, split out of SQLExp_Manager +* +***************************************************************************** + +goto SkipCode + + +equ WP_ALL$ to "WP" + +* values selected in the start wizard the last time run are stored in SYSENV/CFG_SQLEXP +equ OPT_WPLIST$ to 41 ;* list of WP names to run, @vm-delim'd +equ OPT_LOCK$ to 42 ;* 1=prevent all, 2=prevent specific, 3=prevent none +equ OPT_CREATE$ to 43 ;* bool, TRUE$ means create tables first +equ OPT_CLEAR$ to 44 ;* 1=clear, 2=drop/create, 3=don't clear +equ OPT_NOTUSED45$ to 45 +equ OPT_NOTUSED46$ to 46 +equ OPT_DUALCON$ to 47 ;* TRUE$ if second non-transacted con needed +equ OPT_SCHEDTYPE$ to 48 ;* 1=last-used sched, 2=every n seconds, 3=once apiece +equ OPT_DELAY$ to 49 ;* delay, in seconds, between re-runs + +* schedule data (amv) from the manager is stored in SYSENV/CFG_SQLEXP +equ SCHED_WPNAME$ to 51 ;* list of wp names, @vm-delim'd +equ SCHED_TYPE$ to 52 ;* 1=not scheduled, 2=next available, 3=certain date/time +equ SCHED_TIME$ to 53 ;* dt value for type=3 +equ SCHED_REPEAT$ to 54 ;* TRUE$ means repeat +equ SCHED_INTERVAL$ to 55 ;* interval in seconds +equ SCHED_SELECT$ to 56 ;* FULL, UPDATES, or custom +equ SCHED_CREATE$ to 57 ;* TRUE$ means this wp needs tables created +equ SCHED_CLEAR$ to 58 ;* 1=clear, 2=drop/create, 3=none +equ SCHED_LASTRUN$ to 59 ;* last time run +equ SCHED_DTFMT$ to 60 ;* date format (sv), defaults to "D2/" + +* manager states +equ MGR_ST_STOP$ to 0 ;* not running +equ MGR_ST_WAIT$ to 1 ;* waiting to exec next +equ MGR_ST_RUN$ to 2 ;* running wp +equ MGR_ST_PAUSE$ to 3 ;* pausing (pause button) +equ MGR_ST_ABORT$ to 4 ;* running wp with expectation of a possible debugger abort (i.e. a wp blows up) + +* proc info +equ PROC_NAME$ to 1 +equ PROC_LASTRUN$ to 2 +equ PROC_NEXTRUN$ to 3 +equ PROC_TYPE$ to 4 ;* see SCHED_TYPE$ +equ PROC_TIME$ to 5 ;* see SCHED_TIME$ +equ PROC_REPEAT$ to 6 ;* see SCHED_REPEAT$ +equ PROC_INTERVAL$ to 7 ;* see SCHED_INTERVAL$ +equ PROC_SELECT$ to 8 ;* see SCHED_SELECT$ +equ PROC_CREATE$ to 9 ;* see SCHED_CREATE$ +equ PROC_CLEAR$ to 10 ;* see SCHED_CLEAR$ +equ PROC_FIRST$ to 11 ;* TRUE$ if proc hasn't been run yet (used for create table logic) +equ PROC_SCHED$ to 12 ;* time at which proc is scheduled to run + + +********************* +* bulk get properties +********************* +GetProps: + swap "@" with @window in Ctrls + convert "," to @rm in Ctrls + convert "," to @rm in Props + Vals = Get_Property(Ctrls, Props) +return + + +********************* +* bulk set properties +********************* +SetProps: + swap "@" with @window in Ctrls + convert "," to @rm in Ctrls + convert "," to @rm in Props + Set_Property(Ctrls, Props, Vals) +return + + +*********************** +* display error message +*********************** +* Error [in ] - text of error message +* Ret [out] - failure +ErrMsg: + Error = "H" + Error = Get_Property(@window, "TEXT") + Msg(@window, Error) + Ret = FALSE$ +return + + +********************** +* display info message +********************** +* Error [in ] - text of info message +InfoMsg: + Error = "!" + Error = Get_Property(@window, "TEXT") + Msg(@window, Error) +return + + +****************** +* add error to log +****************** +* Error [in ] - text to log (can be @fm-delim'd for multi errors) +LogError: + Limit = Get_Property(@window: ".ET_LOG", "LIMIT") <2> + if Limit < 1000 then + * remove blank errors + convert " ":@fm to @fm:" " in Error + Error = trim(Error) + convert " ":@fm to @fm:" " in Error + + * stamp each error with currrent time + Error = @fm: Error + Limit += count(Error, @fm) + if Limit >= 1000 then + Error := @fm: "" + end + dFmt = Get_Property(@window, "@OPTIONS") + swap @fm with (@fm: fmt(date(), dFmt): " ": fmt(time(), "MTS"): @vm) in Error + Error [1,1] = "" + + * append to error log + Send_Message(@window: ".ET_LOG", "INSERT", -1, Error) + Set_Property(@window: ".CB_REVIEW", "ENABLED", TRUE$) + end +return + + +*************************** +* lock warehouse procedures +*************************** +* Type [in ] - 1=all, 2=specific, 3=none +* List [in ] - @fm-delim'd list of procs +* Init [in ] - TRUE$ if this is the first lock attempt +* Ret [out] - TRUE$ on success, FALSE$ on failure +* Error [out] - description on failure +LockProcs: + Ret = TRUE$ + if Type and len(List) else return + + open "SYSENV" to f else + Error = "Unable to open SYSENV." + Ret = FALSE$ + return + end + + * type 1 puts an exclusive (obtrusive) lock on "all" + if Type = 1 then + if Init then + lock f, WP_ALL$, X else + Error = "Another workstation is already using the Warehouse Manager." + Ret = FALSE$ + end + end + return + end + + * types 2&3 put a shared (non-obtrusive) lock on "all" + if Init then + lock f, WP_ALL$, S else + Error = "Another workstation is already using the Warehouse Manager " + Error := "and has prevented other workstations from warehousing." + Ret = FALSE$ + return + end + end + + Count = count(List, @fm) + (List # "") + Pos = 1 + loop + while Pos <= Count + Text = List + if Type = 2 then + * type 2 puts an exclusive (obtrusive) lock on each warehouse procedure + lock f, Text, X else + Error = "Another workstation is already using the ": Text: " Warehouse Procedure." + Ret = FALSE$ + end + end else + * type 3 puts a shared (non-obtrusive) lock on each warehouse procedure, + * but detects if a workstation has an exclusive (obtrusive) lock already + lock f, Text, S else + Error = "Another workstation is already using the Warehouse Manager " + Error := "and has prevented other workstations from executing the " + Error := Text: " Warehouse Procedure." + Ret = FALSE$ + end + end + while Ret + Pos += 1 + repeat + + if Ret else + * unlock each wp that was successfully locked + Count = Pos - 1 + for i = 1 to Count + unlock f, List else null + next i + + if Init then + * remove the lock from "all" + unlock f, WP_ALL$ else null + end + end +return + + +***************************** +* unlock warehouse procedures +***************************** +* Type [in ] - 1=all, 2=specific, 3=none +* List [in ] - @fm-delim'd list of procs +* Final [in ] - TRUE$ means this is unlocking all procs +* Ret [out] - TRUE$ on success, FALSE$ on failure +* Error [out] - description on failure +UnlockProcs: + Ret = TRUE$ + if Type else return + + open "SYSENV" to f else + Error = "Unable to open SYSENV." + Ret = FALSE$ + return + end + + * type 1 only bothers to put an exclusive lock on "all"; + * the other types use exclusive or shared record locks on the wp's + if Type > 1 and len(List) then + Count = count(List, @fm) + (List # "") + for i = 1 to Count + unlock f, List else null + next i + end + + if Final then + unlock f, WP_ALL$ else null + end +return + + +****************************** +* check if time interval is ok +****************************** +* Text [in ] - time interval string +* Value [out] - time interval in seconds (only if ok) +* Ret [out] - TRUE$ if ok, FALSE$ otherwise +CheckInterval: + Ret = TRUE$ + Value = 0 + Count = count(Text, ":") + (Text # "") + + if Count < 1 or Count > 3 then + Ret = FALSE$ + return + end + + for i = 1 to Count + Temp = field(Text, ":", Count - i + 1) + Test = Temp + convert "0123456789" to "" in Test + if num(Temp) and len(Temp) and not(len(Test)) then + if Temp >= 0 and Temp <= 59 then + Value += Temp * field("1,60,3600", ",", i) + end else + Ret = FALSE$ + return + end + end else + Ret = FALSE$ + return + end + next i + + * zero not allowed + if Value else + Ret = FALSE$ + end +return + + +************************************* +* format seconds into interval string +************************************* +* Value [in ] - time interval in seconds +* Text [out] - time interval string +FormatInterval: + Text = fmt(int(Value / 3600), "R(0)#2"): ":": fmt(int(mod(Value, 3600) / 60), "R(0)#2"): ":": fmt(mod(Value, 60), "R(0)#2") +return + + +****************************** +* build list of available WP's +****************************** +* Procs [out] - @fm-delim'd list of procs +GetProcs: + More = 1 + Procs = "" + *loop + List = Get_Repos_Entities(@appid<1>, "STPROCEXE", "", FALSE$, FALSE$, FALSE$, More) + Count = count(List, @fm) + (List # "") + *if List<1> [1,3] <= "WP_" and List [1,3] >= "WP_" then + * extract wp's + Pos = index(@fm: List, @fm: "WP_", 1) + if Pos then + Pos = count(List [1,Pos], @fm) + 1 + loop + Text = List + while Text [1,3] = "WP_" + Procs<-1> = Text [4,99999] + Pos += 1 + repeat + end + *end + *while More and List [1,3] <= "WP_" + *repeat +return + + +SkipCode: diff --git a/SYSPROG/STPROCINS/SQLSTATES_100.txt b/SYSPROG/STPROCINS/SQLSTATES_100.txt new file mode 100644 index 0000000..eaf56a3 --- /dev/null +++ b/SYSPROG/STPROCINS/SQLSTATES_100.txt @@ -0,0 +1,14 @@ +compile insert SQLSTATES_100 + +* +*================================ BLOCK -100 ================================== +* Cursor/ Error Codes +EQU SQL_INVALID_CURSOR_ERR$ TO -100 ;* Invalid Cursor State (Usually not open) +EQU SQL_CURSOR_MOVE_ERR$ TO -101 ;* Error repositioning cursor (SELECT.SEEK) +EQU SQL_FETCH_ORIENT_BAD_ERR$ TO -102 ;* Non-numeric position for Relative or Absolute +EQU SQL_FETCH_ORIENT_ZERO_ERR$ TO -103 ;* Zero position for Relative and Absolute not allowed +EQU SQL_NO_MORE_CURSORS_ERR$ TO -104 ;* No more cursors to allocate at runtime (max 6) +EQU SQL_NO_MORE_SQBUFFS_ERR$ TO -105 ;* No more sub-query buffers + + +* Source Date: 16:42:24 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/SQLSTATES_200.txt b/SYSPROG/STPROCINS/SQLSTATES_200.txt new file mode 100644 index 0000000..cc61ce4 --- /dev/null +++ b/SYSPROG/STPROCINS/SQLSTATES_200.txt @@ -0,0 +1,30 @@ +compile insert SQLSTATES_200 +* +*================================ BLOCK -200 ================================= +* Transaction Errors +* +* File I/O specific +EQU SQL_PRE_COM_ERR$ TO -200 ;* Pre-commit error ; Commit log name or smart filing system +EQU SQL_COM_DEL_ERR$ TO -201 ;* Commit Log delete error ; Commit log name +EQU SQL_COM_READ_ERR$ TO -202 ;* Commit Log read error ; Commit log name +EQU SQL_STABLE_DB_ERR$ TO -203 ;* Stable Database File open error ; Data file name +EQU SQL_TRANS_FILE_ERR$ TO -204 ;* Transaction File access error ; Transaction file name +EQU SQL_STABLE_DB_DEL_ERR$ TO -205 ;* Stable Database File delete error ; Data file name +EQU SQL_STABLE_DB_CLR_ERR$ TO -206 ;* Stable Database File clear error ; Data file name +EQU SQL_TRANS_FILE_CLR_ERR$ TO -207 ;* Transaction File clear error ; Transaction file name +EQU SQL_TRANS_FILE_READ_ERR$ TO -208 ;* Transaction File read error ; Transaction file name +EQU SQL_COM_WRITE_ERR$ TO -209 ;* Commit Log write error ; Commit log name +EQU SQL_STABLE_DB_WRITE_ERR$ TO -210 ;* Stable Database File write error ; Data file name +EQU SQL_BTRANS_ERR$ TO -211 ;* Begin transaction error w/smart volume or COMMITLOG ; Smart FS or COMMITLOG name +EQU SQL_COM_LOG_ERR$ TO -212 ;* Commit log open error ; Commit log name + +* Locking and other miscellaneous errors +EQU SQL_SET_TRANS_ERR$ TO -220 ;* SET TRANSACTION statement requires that TRANS.CONTROL = ON (first statement in a transaction) ; None +EQU SQL_VICTIM_ERR$ TO -221 ;* Selected as a victim in deadlock ; None +EQU SQL_LOCK_ERR$ TO -222 ;* General implicit SQL lock failure ; Source code name, location (not displayed) @FILE.ERROR in SUBCODE$ +EQU SQL_UNLOCK_ERR$ TO -223 ;* General implicit SQL unlock failure ; Source code name, location (not displayed), @FILE.ERROR in SUBCODE$ +EQU SQL_LOCK_INT_ERR$ TO -224 ;* Lock wait interrupted by user or timer ; None, @FILE.ERROR in SUBCODE - see FSERRORS_200 +EQU SQL_REC_CL4_ERR$ TO -225 ;* Record level locking and cl of 4 not allowed +EQU SQL_INVALID_CL_ERR$ TO -226 ;* Invalid consistency level entered. +EQU SQL_LOCK_LIMIT_ERR$ TO -227 ;* Lock governor limit has been reached ; Lock governor value +* Source Date: 16:42:25 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/SQLSTATES_300.txt b/SYSPROG/STPROCINS/SQLSTATES_300.txt new file mode 100644 index 0000000..f7b3828 --- /dev/null +++ b/SYSPROG/STPROCINS/SQLSTATES_300.txt @@ -0,0 +1,44 @@ +compile insert SQLSTATES_300 + +* +*================================ BLOCK -300 ================================= +* I/O Error Codes +EQU SQL_LOGICAL_FETCH_ERR$ TO -300 ;* Logical (Security/Domain) error while fetching row +EQU SQL_PHYSICAL_FETCH_ERR$ TO -301 ;* Physical level (OS; Language; File structure) error ; Record key +EQU SQL_TABLE_MISSING_ERR$ TO -302 ;* General File Open fail error. +EQU SQL_ROW_EXISTS_ERR$ TO -303 ;* Row already exists on an SQL INSERT +EQU SQL_LOGICAL_INSERT_ERR$ TO -304 ;* Logical (Security/Domain) error while inserting row +EQU SQL_PHYSICAL_INSERT_ERR$ TO -305 ;* Physical level (OS; Language; File Structure) error while inserting row. +EQU SQL_LOGICAL_INSERT_READ_ERR$ TO -306 ;* Logical error reading record for multi-row insert +EQU SQL_PHYSICAL_INSERT_READ_ERR$ TO -307 ;* Physical error reading record for multi-row insert +EQU SQL_UPDATE_KEY_ERR$ TO -308 ;* Attempt to update key fields of record - Should Delete then Insert. +EQU SQL_LOGICAL_UPDATE_READ_ERR$ TO -309 ;* Logical (Security/Domain) reading record for UPDATE operation. +EQU SQL_PHYSICAL_UPDATE_READ_ERR$ TO -310 ;* Physical level (OS; Language; File structure) error reading record for UPDATE +EQU SQL_LOGICAL_UPDATE_ERR$ TO -311 ;* Logical error writing update ; Record key +EQU SQL_PHYSICAL_UPDATE_ERR$ TO -312 ;* Physical error writing update ; Record key +EQU SQL_LOGICAL_DELETE_ERR$ TO -313 ;* Logical error deleting row ; Record key +EQU SQL_PHYSICAL_DELETE_ERR$ TO -314 ;* Physical error deleting row ; Record key +EQU SQL_LOGICAL_SUBQ_READ_ERR$ TO -315 ;* Logical error reading for subquery ; Record key +EQU SQL_PHYSICAL_SUBQ_READ_ERR$ TO -316 ;* Physical error reading for subquery ; Record key +EQU SQL_INSERT_INVALID_COLTYPE_ERR$ TO -317 ;* Column type not updateable (not a real field - symbolic or group) +EQU SQL_USER_ABORT_ERR$ TO -318 ;* User aborted I/O operation. +EQU SQL_LOGICAL_JOIN_READ_ERR$ TO -319 ;* Logical error while reading for join ; Table name, key name +EQU SQL_PHYSICAL_JOIN_READ_ERR$ TO -320 ;* Physical error while reading for join ; Table name, key name +EQU SQL_JOIN_IO_ERR$ TO -321 ;* reading or writing key data during join. +EQU SQL_CURSOR_SEEK_ERR$ TO -322 ;* Error while seeking in cursor during join ; Table name +EQU SQL_NULL_JOIN_PARAM_ERR$ TO -323 ;* Errors in SQL.JOIN input parameters. +* +EQU SQL_TEMP_TABLE_MISSING_ERR$ TO -324 ;* Failure in open of temporary table. ; Filename +EQU SQL_TEMP_TABLE_CREATE_ERR$ TO -325 ;* Failed to create temporary table ; Volume, Filename +EQU SQL_TEMP_WRITE_ERR$ TO -326 ;* Failure writing record to temp table ; Filename, record + +EQU SQL_NORM_COMPLEX_ERR$ TO -330 ;* Cannot normalize a complex cursor. (involving a join) +EQU SQL_NORM_EXTERN_ERR$ TO -331 ;* Cannot normalize an external select list. +EQU SQL_NORM_IO_ERR$ TO -332 ;* I/O error writing key lists during normalization. +EQU SQL_INSERT_CONSISTENCY_ERR$ TO -333 ;* Insert into repeating table - non-repeating columns are not consistent. ; Column name list (1st displayed) +EQU SQL_UNION_PLAN_ERR$ TO -334 ;* Query union plan error. +EQU SQL_INSERT_VIEW_TABLE_ERR$ TO -335 ;* Insert to view table not supported. +EQU SQL_FCT_INVALID_DATA_TYPE$ TO -336 ;* SUM or AVG functions tried on non-integers + +EQU SQL_COMPILE_IO_ERR$ TO -350 ;* I/O error writing object/source records during compile +* Source Date: 16:42:25 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/SQLSTATES_400.txt b/SYSPROG/STPROCINS/SQLSTATES_400.txt new file mode 100644 index 0000000..558309d --- /dev/null +++ b/SYSPROG/STPROCINS/SQLSTATES_400.txt @@ -0,0 +1,78 @@ +compile insert SQLSTATES_400 + +* +*================================ BLOCK -400 ================================= +* Compiler/Parsing Errors + +EQU SQL_NOT_SUPPORTED_ERR$ TO -401 ;* Statement or feature not supported +EQU SQL_VIEW_INSERT_NS_ERR$ TO -402 ;* insert to view tables not supported +EQU SQL_SERVER_TERMINAL_ERR$ TO -403 ;* Server request hard failure - @file.error returned in detail + +EQU SQL_PROJEX_GENERATE_ERR$ TO -405 ;* Projex module meta generation failed. + +EQU SQL_PROJEX_COMPILE_ERR$ TO -410 ;* Projex module failed R/BASIC compilation - internal error. +EQU SQL_COMP_TABLE_ORDER_ERR$ TO -415 ;* Could not find table name in TABLE ORDER list - internal error +EQU SQL_BAD_TABLE_REF_ERR$ TO -416 ;* Table reference token invalid (internal compiler error ) +EQU SQL_INVALID_SCHEMA_CODE_ERR$ TO -417 ;* Not a valid request code to the schema processor. +EQU SQL_JOIN_ORDER_SYNCH_ERR$ TO -418 ;* Internal error - Join plan not synched with table.order. +EQU SQL_JOIN_FIELDS_COMPAT_ERR$ TO -419 ;* Both join fields must be right just or not. ; Table1, col1, table2, col2 + +EQU SQL_IXPLAN1_READ_ERR$ TO -425 ;* SQLINDEX1.RUN meta object missing from VERBS. +EQU SQL_IXPLAN2_READ_ERR$ TO -426 ;* SQLINDEX2.RUN meta object missing from VERBS +EQU SQL_IXPLAN1_GENERATE_ERR$ TO -427 ;* Error in SQLINDEX1 meta. +EQU SQL_IXPLAN2_GENERATE_ERR$ TO -428 ;* Error in SQLINDEX2 meta. +EQU SQL_INDEX_TEST_ERR$ TO -429 ;* Error in index test call to filing system + +EQU SQL_UNRECOGNIZE_CMD_ERR$ TO -440 ;* not TCL or SQL command +EQU SQL_ISQL_MOD_MISSING_ERR$ TO -441 ;* ISQL.MOD is missing in verbs file +EQU SQL_ISQL_MOD_COMPILE_ERR$ TO -442 ;* error compile code from ISQL.MOD + +EQU SQL_DICT_MISSING_ERR$ TO -450 ;* Could not find dict while attempting to compile ; Table name +EQU SQL_DICT_REC_MISSING_ERR$ TO -451 ;* Could not find dict record while compiling. ; Table name, key name +EQU SQL_VIEW_CATALOG_MISSING_ERR$ TO -452 ;* Could not open the View Catalog file VIEW_CATAOG +EQU SQL_INS_DATA_MISMATCH_ERR$ TO -453 ;* # of columns & inserted val are not matched; Tabname:@VM:#of col:@VM:# of ins val. +EQU SQL_DICT_UPDATE_ERR$ TO -454 ;* Error writing to dict; Tablename, columnname +EQU SQL_COMPILE_TABLE_MISSING_ERR$ TO -455 ;* Table(s) not available during compilation + +EQU SQL_QUAL_COL1_ERR$ TO -460 ;* Qualification error: Column not found in Table. +EQU SQL_QUAL_COL2_ERR$ TO -461 ;* Qualification error: Column not found in any tables. +EQU SQL_QUAL_COL3_ERR$ TO -462 ;* Qualification error: Column found in multiple tables +EQU SQL_QUAL_TABLE_ERR$ TO -463 ;* Qualification error: Reference not a view or base table. +EQU SQL_INSERT_QUAL1_ERR$ TO -464 ;* Qualification error: Column(s) not found ; Column list (1st displayed). +EQU SQL_INSERT_QUAL2_ERR$ TO -465 ;* Qualification error: Column(s) were symbolic and not updateable. ; Column list (1st displayed) +EQU SQL_JOIN_PLAN_ERR$ TO -466 ;* Internal error developing join plan +EQU SQL_ORDER_UNION_NUMERIC_ERR$ TO -467 ;* Order by specifiers must be numeric in UNION queries. +EQU SQL_ORDER_SPEC_OORANGE_ERR$ TO -468 ;* Order by numeric specifier out of range of columns defined. +EQU SQL_ORDER_SPEC_INVALID_ERR$ TO -469 ;* Non numeric order spec not in selection list. + +EQU SQL_BAD_SELECT_LITERAL_ERR$ TO -470 ;* Failure on ICONV of literal in SELECTION clause (data type err) +EQU SQL_BAD_WHERE_LITERAL_ERR$ TO -471 ;* Failure on Iconv of literal in WHERE clause (data type err) +EQU SQL_TABLES_SYNCH_ERR$ TO -472 ;* Could not find qualified table in TABLES. +EQU SQL_VOLUMES_SYNCH_ERR$ TO -473 ;* Could not find qualified volume in VOLUMES. + +EQU SQL_EMB_PARSE_NEST_ERR$ TO -475 ;* EXEC SQL encountered before prior END EXEC - return line number +EQU SQL_EMB_PARSE_TERM_ERR$ TO -476 ;* No END EXEC found before end of source. +EQU SQL_EMB_BASIC_COMPILE_ERR$ TO -477 ;* Error compiling R/BASIC source. +EQU SQL_EMB_SQL_COMPILE_ERR$ TO -478 ;* Error compiling SQL source. +EQU SQL_EMB_USING_SUB_ERR$ TO -479 ;* USING MODULE only allowed in Subroutines and Functions + +EQU SQL_EMB_USING_FIRST_ERR$ TO -480 ;* USING MODULE must be first SQL statement +EQU SQL_EMB_MULT_DECLARE_ERR$ TO -481 ;* Multiple BEGIN DECLARE statements +EQU SQL_EMB_MULT_END_DECLARE_ERR$ TO -482 ;* Multiple END DECLARE statements +EQU SQL_EMB_WHENEVER_TEST_ERR$ TO -483 ;* WHENEVER statement test must be SQLERROR or NOT FOUND +EQU SQL_EMB_WHENEVER_ACT_ERR$ TO -484 ;* WHENEVER action must be GOSUB, GOTO or CONTINUE +EQU SQL_EMB_CURS_DECL_SUB_ERR$ TO -485 ;* Cursor declarations allowed only in MAIN programs. +EQU SQL_EMB_CURS_DECL_OPEN_ERR$ TO -486 ;* OPEN compile failed. Cursor not declared +EQU SQL_EMB_QUOTE_BALANCE_ERR$ TO -487 ;* Unbalanced quotes in SQL_MODULE source. +EQU SQL_EMB_INVALID_PARAMS$ TO -488 ;* Invalid RBASIC variables used in embedded SQL statement +EQU SQL_EMB_MODULE_FIRST_ERR$ TO -489 ;* SQL MODULE must begin with SQL MODULE + +EQU SQL_EMB_AUTHORIZATION_ERR$ TO -490 ;* Missing AUTHORIZATION specifier +EQU SQL_EMB_CURSOR_OPEN_ERR$ TO -491 ;* Cursor has already been opened; cursor name +EQU SQL_EMB_CURSOR_NOT_DEF_ERR$ TO -492 ;* Cursor is not defined; cursor name +EQU SQL_EMB_UPDATE_PARMS_ERR$ TO -493 ;* bad parameters for UPDATE statement +EQU SQL_EMB_KEY_PART_ERR$ TO -494 ;* incomplete multi-part key +EQU SQL_EMB_KEY_ALTER_ERR$ TO -495 ;* attempt to alter key column +EQU SQL_EMB_PARAM_COL_ERR$ TO -496 ;* param/column reference collision. +EQU SQL_EMB_BAD_PARAM_ERR$ TO -497 ;* bad paramter name. +* Source Date: 16:42:26 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/SQLSTATES_500.txt b/SYSPROG/STPROCINS/SQLSTATES_500.txt new file mode 100644 index 0000000..8fe7fbb --- /dev/null +++ b/SYSPROG/STPROCINS/SQLSTATES_500.txt @@ -0,0 +1,36 @@ +compile insert SQLSTATES_500 + + +* +*=============================== BLOCK -500 ================================= +* SCHEMA ERRORS + +EQU SQL_CREATE_TABLE_USER_ERR$ TO -500 ;* Cannot create a table for another user. +EQU SQL_INVALID_TABLE_ID_ERR$ TO -501 ;* Invalid characters in table id name in create table. +EQU SQL_LOCAL_CREATE_TABLE_ERR$ TO -502 ;* Failure creating a local (non-server) file in create table. +EQU SQL_LOCAL_CREATE_DICT_ERR$ TO -503 ;* Failure creating a local (non-server) DICT file in create table. +EQU SQL_FILES_VOLUMES_SYNCH_ERR$ TO -504 ;* Files/Volumes synchronization error in create table. (internal error) +EQU SQL_MEDIAMAP_READ_ERR$ TO -505 ;* Failure reading media map in create table +EQU SQL_MEDIAMAP_WRITE_ERR$ TO -506 ;* Failure writing media map in create table +EQU SQL_CTTABL_NO_KEY_ERR$ TO -507 ;* No key columns specified in create table. +EQU SQL_BAD_UNIQUE_SPEC_ERR$ TO -508 ;* Bad unique spec in create table +EQU SQL_DROP_COL_FAIL_ERR$ TO -509 ;* Failure dropping column (DELETE FAIL) +EQU SQL_DROP_COL_EXIST_ERR$ TO -510 ;* Column specified to drop did not exist. +EQU SQL_MOD_KEY1_ERR$ TO -511 ;* An existing column cannot be modified to become a key column. must ADD a new key column +EQU SQL_MOD_KEY2_ERR$ TO -512 ;* An existing key column cannot be modified to be a non-key column. +EQU SQL_MOD_COL_EXIST_ERR$ TO -513 ;* Column specified for modification does not exist. +EQU SQL_INVALID_TYPES_ERR$ TO -514 ;* Invalid data type(s) in create or alter table. +EQU SQL_ALTER_COL_FAIL_ERR$ TO -515 ;* Failure altering column (write fail ) +EQU SQL_DROP_VIEW_EXIST_ERR$ TO -516 ;* View does not exist to be dropped. +EQU SQL_DROP_TABLE_EXIST_ERR$ TO -517 ;* Base table or View does not exist to be dropped. +EQU SQL_VIEW_COLUMN_MISMATCH_ERR$ TO -518 ;* Mismatch count between view columns and selections. +EQU SQL_DEFAULT_VIEW_COLUMN_ERR$ TO -519 ;* Complex selection - cannot create default view columns. +EQU SQL_SCHEMA_NOT_SUPPORTED_ERR$ TO -520 ;* Schema feature not supported. +EQU SQL_CREATE_TABLE_EXISTS_ERR$ TO -521 ;* CREATE TABLE failed because table already exists +EQU SQL_CREATE_VIEW_EXISTS_ERR$ TO -522 ;* CREATE VIEW failed because view already exists +EQU SQL_CREATE_VIEW_WRITE_ERR$ TO -523 ;* Failure writing view templates in CREATE VIEW . +EQU SQL_VOL_DNE_ERR$ TO -524 ;* Specified CREATE TABLE volume does not exist ; Bad volume name. +EQU SQL_ADD_COL_EXIST_ERR$ TO -525 ;* Column specified to add already exists. +EQU SQL_DROP_VIEW_SYS_ERR$ TO -526 ;* I/O error dropping (deleting) view.; View name, fserror code. +EQU SQL_DROP_TABLE_SYS_ERR$ TO -527 ;* I/O error dropping base table.; Base table name, fserror code +* Source Date: 16:42:26 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/SQLSTATES_600.txt b/SYSPROG/STPROCINS/SQLSTATES_600.txt new file mode 100644 index 0000000..aeb6004 --- /dev/null +++ b/SYSPROG/STPROCINS/SQLSTATES_600.txt @@ -0,0 +1,8 @@ +compile insert SQLSTATES_600 + +* +*================================ BLOCK -600 ================================= +* Revelation SELECT processor errors +EQUATE SQL_REV_SELECT_ERR$ TO -600 ;* Corresponds to R/BASIC SELECT error - STATUS() value ; FSCODE - FILE.ERROR in SUBCODE$ +EQUATE SQL_REV_SORT_SELECT_ERR$ TO -650 ;* Same as above except reported from sql.order.group ; FSCODE - FILE.ERROR in SUBCODE$ +* Source Date: 16:42:26 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/SQLSTATES_HDR.txt b/SYSPROG/STPROCINS/SQLSTATES_HDR.txt new file mode 100644 index 0000000..72b0173 --- /dev/null +++ b/SYSPROG/STPROCINS/SQLSTATES_HDR.txt @@ -0,0 +1,38 @@ +compile insert SQLSTATES_HDR +* +* Contains basic SQL equates for the SQLSTATES variable. +* +* Error codes are grouped by 100's. Equates for each group of error codes +* can be found in the INCLUDE file under the record "SQLSTATES_" followed +* by the group #. (e.g. SQLSTATES_100 - contains equates for errors +* numbered -100 to -199.) +* + +* Components of the SQLSTATE variable +EQUATE SQLCODE$ TO 1 +EQUATE DETAIL$ TO 2 +EQUATE ROWS_EFF$ TO 3 +EQUATE SUBCODE$ TO 4 +EQUATE STATS$ TO 5 + +* Prefix used as the key in the MESSAGES file +EQUATE SQL_MSG_PREFIX$ TO "SQL" + +* _ERR$ : indicates an error condition ( negative SQLCODE ) +* _WARN$ : indicates a non-failing warning ( positive SQLCODE ) +* _STAT$ : indicates a non-failing status ( positive SQLCODE ) +* +EQUATE SQL_OK_STAT$ TO 0 + +*================================ BLOCK 100 ================================== +* Cursor/Select Status and Warning Codes + +EQUATE SQL_NOMORE_ROWS_WARN$ TO 100 ;* Zero rows returned +EQUATE SQL_SELECT_MULTI_DONE_WARN$ TO 101 ;* Multiple row Select return - all rows returned +EQUATE SQL_SELECT_MULTI_MORE_WARN$ TO 102 ;* Multiple row Select return - not all rows returned - come back for more + +*================================ BLOCK 0 ==================================== +* General Runtime Errors +EQUATE SQL_INVALID_PROCESS_NAME_ERR$ TO 50 ;* Invalid Process dispatch name used in call to SQL Module subroutine. + * Hard coded into SQL_COMPILE!!! +* Source Date: 16:42:27 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/SQLSTATES_STAT.txt b/SYSPROG/STPROCINS/SQLSTATES_STAT.txt new file mode 100644 index 0000000..fa85745 --- /dev/null +++ b/SYSPROG/STPROCINS/SQLSTATES_STAT.txt @@ -0,0 +1,35 @@ +compile insert SQLSTATES_STAT +* +* Contains SQL Status codes. These equates are suffixed by "_STAT$" and +* are >= 1000. + +*================================ BLOCK 1000 ================================= +* SQL Status codes. +* +EQUATE SQL_RESTART_STAT$ TO 1000 ;* Popup for the restart process +EQUATE SQL_IGNORE_TRANS_STAT$ TO 1001 ;* A pending transaction exists and is being ignored +EQUATE SQL_INVALID_RESTART_STAT$ TO 1002 ;* Invalid entry on the restart popup +EQUATE SQL_TRANS_ALREADY_ON_STAT$ TO 1003 ;* This transaction is already on and doesn't have to be set. +EQUATE SQL_TABLE_CREATED_STAT$ TO 1004 ;* Table created using CREATE TABLE ; Table name, Volume name + +EQUATE SQL_INSERT_KEY_MISSING_STAT$ TO 1100 ;* Interactive SQL insert keypart missing +EQUATE SQL_VIEW_DROPPED_STAT$ TO 1101 ;* View Dropped by Drop Table. +EQUATE SQL_INSERTED_ROWS_STAT$ TO 1102 ;* INSERT was successful; display number of inserted rows. +EQUATE SQL_UPDATE_ROWS_STAT$ TO 1103 ;* UPDATE was successful; number of rows affected +EQUATE SQL_DELETED_ROWS_STAT$ TO 1104 ;* DELETE was successful; # rows deleted. +EQUATE SQL_TABLE_CLEARED_STAT$ TO 1105 ;* DELETE was successful entire table cleared; table name +EQUATE SQL_TABLE_DROPPED_STAT$ TO 1106 ;* Base table Dropped by Drop Table. + +EQUATE SQL_EMB_PROCESS_STAT$ TO 1110 ;* Embedded preprocessor stripping... +EQUATE SQL_EMB_GENERATING_OBJ_STAT$ TO 1111 ;* Generating object... +EQUATE SQL_EMB_COMPILED_STAT$ TO 1112 ;* Compilation done + + +EQUATE SQL_UPDATING_STAT$ TO 1120 ;* Interactive updating records... +EQUATE SQL_INSERTING_STAT$ TO 1121 ;* Interactive inserting records... +EQUATE SQL_DELETING_STAT$ TO 1122 ;* Interactive deleteing records... +EQUATE SQL_NORMALIZING_STAT$ TO 1123 ;* Normalizing repeating data... +EQUATE SQL_ORDERING_STAT$ TO 1124 ;* Ordering table... + + +* Source Date: 16:42:27 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/SQL_CFG_EQUATES.txt b/SYSPROG/STPROCINS/SQL_CFG_EQUATES.txt new file mode 100644 index 0000000..d321af1 --- /dev/null +++ b/SYSPROG/STPROCINS/SQL_CFG_EQUATES.txt @@ -0,0 +1,6 @@ +COMPILE Insert SQL_CFG_EQUATES + +Equ X_COORD$ To 1 +Equ Y_COORD$ To 2 +Equ W_COORD$ To 3 +Equ H_COORD$ To 4 diff --git a/SYSPROG/STPROCINS/SRPARRAY.txt b/SYSPROG/STPROCINS/SRPARRAY.txt new file mode 100644 index 0000000..aef21ed --- /dev/null +++ b/SYSPROG/STPROCINS/SRPARRAY.txt @@ -0,0 +1,3 @@ +Compile Insert SRPARRAY + +Declare function SRP_Array, SRP_Clean_Array, SRP_Join_Arrays, SRP_Reorder_Array, SRP_Rotate_Array, SRP_Sort_Array diff --git a/SYSPROG/STPROCINS/SRPFASTARRAY.txt b/SYSPROG/STPROCINS/SRPFASTARRAY.txt new file mode 100644 index 0000000..528c31f --- /dev/null +++ b/SYSPROG/STPROCINS/SRPFASTARRAY.txt @@ -0,0 +1,5 @@ +Compile Insert SRPFASTARRAY + +Declare function SRP_FastArray, SRP_FastArray_Create, SRP_FastArray_GetVariable, SRP_FastArray_Extract, SRP_FastArray_Count, SRP_FastArray_Reduce +Declare subroutine SRP_FastArray, SRP_FastArray_Release, SRP_FastArray_Insert, SRP_FastArray_Replace, SRP_FastArray_Delete, SRP_FastArray_Match +Declare subroutine SRP_FastArray_InsertFromList, SRP_FastArray_ReplaceWithList diff --git a/SYSPROG/STPROCINS/SRPHASHTABLE.txt b/SYSPROG/STPROCINS/SRPHASHTABLE.txt new file mode 100644 index 0000000..e71220e --- /dev/null +++ b/SYSPROG/STPROCINS/SRPHASHTABLE.txt @@ -0,0 +1,6 @@ +Compile Insert SRPHASHTABLE + +Declare function SRP_HashTable, SRP_HashTable_Create, SRP_HashTable_Get, SRP_HashTable_Contains, SRP_HashTable_Count +Declare function SRP_HashTable_GetKeys, SRP_HashTable_GetValues, SRP_HashTable_GetKeyValuePairs +Declare subroutine SRP_HashTable, SRP_HashTable_Release, SRP_HashTable_Set, SRP_HashTable_Remove + diff --git a/SYSPROG/STPROCINS/SRPJSONX.txt b/SYSPROG/STPROCINS/SRPJSONX.txt new file mode 100644 index 0000000..08479bd --- /dev/null +++ b/SYSPROG/STPROCINS/SRPJSONX.txt @@ -0,0 +1,16 @@ +Compile insert SRPJSONX + +Declare subroutine SRP_Jsonx_Begin, SRP_Jsonx_BeginString, SRP_Jsonx_Parse, SRP_Jsonx_Trace, SRP_Jsonx_End, SRP_Jsonx +Declare subroutine SRP_Jsonx_Clear, SRP_Jsonx_Delete, SRP_Jsonx_Go, SRP_Jsonx_GoBack, SRP_Jsonx_GoRoot, SRP_Jsonx_Set, SRP_Jsonx_Sort +Declare function SRP_Jsonx_Parse, SRP_Jsonx_End, SRP_Jsonx, SRP_Jsonx_State, SRP_Jsonx_Error, SRP_Jsonx_Sort +Declare function SRP_Jsonx_Clear, SRP_Jsonx_Delete, SRP_Jsonx_Go, SRP_Jsonx_GoBack, SRP_Jsonx_GoRoot, SRP_Jsonx_Set +Declare function SRP_Jsonx_Count, SRP_Jsonx_Get, SRP_Jsonx_Has, SRP_Jsonx_Members, SRP_Jsonx_Type, SRP_Jsonx_Values + +// Alternative equates for BeginString, but you can also just use True$ or False$ +Equ JsonxConcise$ to 0 +Equ JsonxPretty$ to 1 + +// Alternative equates for Sort, but you can also just use True$ or False$ +Equ JsonxNonRecursive$ to 0 +Equ JsonxRecursive$ to 1 + diff --git a/SYSPROG/STPROCINS/SRPLIST.txt b/SYSPROG/STPROCINS/SRPLIST.txt new file mode 100644 index 0000000..9d9a199 --- /dev/null +++ b/SYSPROG/STPROCINS/SRPLIST.txt @@ -0,0 +1,5 @@ +Compile Insert SRPLIST + +Declare function SRP_List, SRP_List_Create, SRP_List_CreateFromFastArray, SRP_List_Count, SRP_List_GetVariable, SRP_List_GetAt +Declare function SRP_List_Locate, SRP_List_Match, SRP_List_Reduce +Declare subroutine SRP_List, SRP_List_Release, SRP_List_Add, SRP_List_InsertAt, SRP_List_SetAt, SRP_List_RemoveAt diff --git a/SYSPROG/STPROCINS/SRPMAIL_INSERTS.txt b/SYSPROG/STPROCINS/SRPMAIL_INSERTS.txt new file mode 100644 index 0000000..ec3d761 --- /dev/null +++ b/SYSPROG/STPROCINS/SRPMAIL_INSERTS.txt @@ -0,0 +1,42 @@ +Compile insert SRPMAIL_INSERTS + +Declare function SRPSendMail, SRP_Send_Mail + +*---------------------------------------------------- +* Configuration + +* field +Equ SendUsing$ to 1 +Equ SMTPServerPickupDir$ to 2 +Equ SMTPServerPort$ to 3 +Equ SMTPServer$ to 4 +Equ SMTPAuthenticate$ to 5 +Equ SMTPSendUsername$ to 6 +Equ SMTPSendPassword$ to 7 + +* SendUsing values +Equ SendUsing_Pickup$ to 1 +Equ SendUsing_Port$ to 2 + +* SMTPServerPort values +Equ SMTPServerPortDefault$ to 25 + +*---------------------------------------------------- +* Message + +* fields +Equ SRPMail_Subject$ to 1 +Equ SRPMail_From$ to 2 +Equ SRPMail_To$ to 3 +Equ SRPMail_Cc$ to 4 +Equ SRPMail_Bcc$ to 5 +Equ SRPMail_ReplyTo$ to 6 +Equ SRPMail_BodyType$ to 7 +Equ SRPMail_Body$ to 8 +Equ SRPMail_Attachments$ to 9 +Equ SRPMail_Importance$ to 10 + +* Importance Levels +Equ SRPMail_Importance_Low$ to 0 +Equ SRPMail_Importance_Normal$ to 1 +Equ SRPMail_Importance_High$ to 2 diff --git a/SYSPROG/STPROCINS/SRPSTACK.txt b/SYSPROG/STPROCINS/SRPSTACK.txt new file mode 100644 index 0000000..2250d11 --- /dev/null +++ b/SYSPROG/STPROCINS/SRPSTACK.txt @@ -0,0 +1,4 @@ +Compile Insert SRPSTACK + +Declare function SRP_Stack +Declare subroutine SRP_Stack diff --git a/SYSPROG/STPROCINS/SRP_TCL_EQUATES.txt b/SYSPROG/STPROCINS/SRP_TCL_EQUATES.txt new file mode 100644 index 0000000..7812fc7 --- /dev/null +++ b/SYSPROG/STPROCINS/SRP_TCL_EQUATES.txt @@ -0,0 +1,8 @@ +Compile Insert SRP_TCL_EQUATES + +EQU SRP_TCLMSG_FIRST$ to 1 +EQU SRP_TCLMSG_SYNTAX$ to 1 +EQU SRP_TCLMSG_HELP$ to 2 +EQU SRP_TCLMSG_PROCESS$ to 3 +EQU SRP_TCLMSG_AUTHOR$ to 4 +EQU SRP_TCLMSG_LAST$ to 4 diff --git a/SYSPROG/STPROCINS/SSPERRORS_100.txt b/SYSPROG/STPROCINS/SSPERRORS_100.txt new file mode 100644 index 0000000..0abbd4c --- /dev/null +++ b/SYSPROG/STPROCINS/SSPERRORS_100.txt @@ -0,0 +1,23 @@ +compile insert SSPERRORS_100 +/*------------------------------------------------------------------------- + This is the sperrors for GENERIC ACCESS SPs + + DATE IMPLEMENTOR FUNCTION + -------- ----------- -------- + MM-DD-YY initials Modification + 09-17-91 Pat First created +---------------------------------------------------------------------------*/ + +equ ssp_table_list_null_err$ to "SSP100" ;* pass in table name is null value +equ ssp_dbrec_missing_err$ to "SSP101" ;* database record missing %1% database name +equ ssp_param_with_sys_delim_err$ to "SSP102" ;* passed in param contain system delimiter ( i.e. @FM, @VM,.... +equ ssp_user_abort_err$ to "SYS103" ;* user hit abort for this req + +EQU SSP_USER_ADMIN_ERR$ TO "SSP110" ;* User must have admin priveleges for this operation +EQU SSP_SEND_ERR$ TO "SSP111" ;* Some error sending data (code) +EQU SSP_INVALID_IDENTIFIER$ TO "SSP112" ;* Invalid system identifier (identifier) +EQU SSP_INVALID_BOND_DATA_TYPE$ TO "SSP113" ;* Invalid dict data type specified +EQU SSP_AUTHOR_PROTECTED_ERR$ TO "SSP114" ;* the SysAdmin level can not be modified for the author... +EQU SSP_USER_SYS_ADMIN_ERR$ TO "SSP115" ;* User must have system admin priveleges for this operation +EQU SSP_USER_LOWER_LEVEL_ERR$ TO "SSP116" ;* lower level user cannot update higher level user attribute +* Source Date: 16:30:24 06 JAN 1994 Build ID: OI*2.01.19 Level: 2.01 diff --git a/SYSPROG/STPROCINS/SSPERRORS_200.txt b/SYSPROG/STPROCINS/SSPERRORS_200.txt new file mode 100644 index 0000000..8187c72 --- /dev/null +++ b/SYSPROG/STPROCINS/SSPERRORS_200.txt @@ -0,0 +1,80 @@ +compile insert SSPERRORS_200 +/*------------------------------------------------------------------------- + This is the sperrors for DATABASE MANAGEMENT ACCESS SPs + + DATE IMPLEMENTOR FUNCTION + -------- ----------- -------- + MM-DD-YY initials Modification + 01-31-23 Mr C Added SSP_TABLE_OPEN_IN_IDE$ + 09-17-91 Pat First created +---------------------------------------------------------------------------*/ + +*-------------------------------------------------------------------------- +* 200 BLOCK FOR DELETE, CLEAR_TABLE SPS +equ ssp_delete_sysfile_err$ to "SSP200" ;* try to delete system file %1% +equ ssp_clear_sysfile_err$ to "SSP205" ;* try clear sys table %1% sys tablename. + +*-------------------------------------------------------------------------- +* 210 FOR COPY_TABLE SP +equ ssp_invalid_drive_err$ to "SSP210" ;* invalid drive for copy table %1% drive letter +equ ssp_not_enough_space_err$ to "SSP211" ;* space not enough for copy table +equ ssp_copy_diff_file_sys_err$ to "SSP212" ;* copy bet. different file sys %1%, %2% type file types. +equ ssp_copy_same_file_name_err$ to "SSP213" ;* source and dest table name same %1% table_name +equ ssp_copy_over_exist_file_err$ to "SSP214" ;* copy over exist file %1% table_name +equ ssp_copy_non_exist_file_err$ to "SSP215" ;* dest table non exist error +equ ssp_copy_file_err$ to "SSP216" ;* failed at copy time +equ ssp_name_mismatching_err$ to "SSP217" ;* for copy_table/rename_table inconsistency( e.g. !OLD_NAME AND NEW_NAME) + + +*-------------------------------------------------------------------------- +* 220 BLOCK FOR RENAME_TABLE AND LHVERIFY_TABLE SPS +equ ssp_rename_sysfile_err$ to "SSP220" ;* try renaming system table %1% systable name. +equ ssp_rename_alias_table_err$ to "SSP221" ;* try renaming alias table %1% alias table_name + +equ ssp_lhverify_parm_err$ to "SSP225" ;* param for table and volume inconsistent. +equ ssp_revmedia_gfe_err$ to "SSP226" ;* revmedia gfe error %1% vol name. + + +*-------------------------------------------------------------------------- +* 230 Block for Bond Security related SSPs and attach-time issues. + +equ SSP_NO_SERVERNAME_ERR$ to "SSP230" ;* required server name not passed +equ SSP_NO_BOND_DATABASE_ERR$ to "SSP231" ;* required bond database name not passed +equ SSP_NO_BOND_USERNAME_ERR$ to "SSP232" ;* required bond user name not passed +equ SSP_INVALID_SERVERNAME_ERR$ to "SSP233" ;* Server name passed is not valid ( Passed Server Name ) +equ SSP_INVALID_BOND_DATABASE_ERR$ to "SSP234" ;* Bond Database name passed is not valid ( Passed bond database name ) +equ SSP_INVALID_BOND_USERNAME_ERR$ to "SSP235" ;* Bond User name passed is not valid ( Passed bond user name ) +equ SSP_INVALID_BOND_PASSWORD_ERR$ to "SSP236" ;* Bond Password passed is not valud (Passed bond password ) +equ SSP_INVALID_TABLETYPE$ to "SSP237" ;* +equ SSP_NOT_SERVER_TABLETYPE$ to "SSP238" + + +*-------------------------------------------------------------------------- +* 240 BLOCK FOR ALIAS_TABLE SP +equ ssp_alias_wrong_file_type$ to "SSP245" ;* wrong bfs type for aliasing %1% BFS type. +equ ssp_alias_sysfile_err$ to "SSP246" ;* try alias system table %1% systable name. +equ ssp_alias_mismatching_err$ to "SSP247" ;* naming %1%, %2% mismatching error +equ ssp_alias_table_rec_missing_err$ to "SSP248" ;* the table record %1% is missing in revmedia + +*-------------------------------------------------------------------------- +* 270 BLOCK WILL BE FOR FIX_LH + +equ SSP_HDR_CORRUPTED_ERR$ to "SSP271" ;* The header of table %1% is corrupted for fix. +equ SSP_INVALID_FIX_TYPE_ERR$ to "SSP272" ;* Invalid fix type passed in %1% type. +equ SSP_ANOTHER_STATION_FIX$ to "SSP273" ;* another is having %1% semaphore locked for fix tables . + +*-------------------------------------------------------------------------- +* 280 BLOCK WILL BE FOR MISC + +equ ssp_no_table_on_vol$ to "SSP280" ;* Table %1% not found at %2%, filing system %3% +equ ssp_invalid_tablename$ to "SSP281" ;* Invalid table name %1% +equ ssp_control_already_off_err$ to 'SSP282' ;* table %1% already has contro off +equ ssp_control_already_on_err$ to 'SSP283' ;* table %1% already has control on +equ ssp_generic_control_err$ to 'SSP284' ;* generic control_on/off error +equ SSP_DICT_MASTER_COLLIDE_ERR$ to 'SSP285' ;* %1% is already a master definition for this column position +equ SSP_DICT_MASTER_REQ_ERR$ to 'SSP286' ;* %1% must be a master column definition +equ SSP_APP_PTR_DNE$ to 'SSP287' ;* Table is not used in application "%1%" +equ SSP_INHERIT_APP_DNE$ to "SSP288" ;* Inherited Application %1% does not exist +equ SSP_TABLE_OPEN_IN_IDE$ to "SSP289" ;* Table %1% is already open in the IDE + +* Source Date: 17:24:04 26 MAR 1993 Build ID: OI*1.0.106 Level: 2.0 diff --git a/SYSPROG/STPROCINS/SSPERRORS_300.txt b/SYSPROG/STPROCINS/SSPERRORS_300.txt new file mode 100644 index 0000000..17c4920 --- /dev/null +++ b/SYSPROG/STPROCINS/SSPERRORS_300.txt @@ -0,0 +1,34 @@ +Compile insert ssperrors_300 +/*---------------- System Stored Procedures Error Codes -------------------*/ +/* Environment Management Block 300 */ +* 08-27-15 rjc Updated from OI 9.4 rev_bp + +EQU SSP_INVALID_ENV_ATTRIB$ TO "SSP301" ;* Invalid environment attribute value - (validation pattern) + +EQU SSP_INVALID_DBID$ TO "SSP310" ;* The Database Identifier is not valid - must be 8 chars or less - valid chars. - (dbid) +EQU SSP_DBTEMPLATE_EXISTS$ TO "SSP311" ;* The Database template already exists. - (dbid) +EQU SSP_ENVIRON_NOT_SAVED$ TO "SSP312" ;* Error writing the environment record (dbid) +EQU SSP_DBTEMPLATE_OVERFLOW$ TO "SSP313" ;* Database template > 64K. +EQU SSP_DBTEMPLATE_MISSING$ TO "SSP314" ;* Database template not found. + +EQU SSP_INVALID_USERID$ TO "SSP320" ;* Invalid user id +EQU SSP_USERID_NOT_SAVED$ TO "SSO321" ;* Error writing the user record. +EQU SSP_INVALID_PASSWORD$ TO "SSP322" ;* Password must be between 6 and 20 characters +EQU SSP_USERID_EXISTS$ TO "SSP323" ;* Userid already registered - no overwrite specified. +EQU SSP_USERID_MISSING$ TO "SSP324" ;* Userid not found in user record +EQU SSP_USERID_PROTECTED$ TO "SSP325" ;* Userid cannot be deleted or modified +EQU SSP_INVALID_ADMIN$ TO "SSP326" ;* Only Admin values of '0', '1', and '2' are valid +EQU SPP_ILLEGAL_USER_RIGHTS$ TO "SSP327" ;* illegal user to access app. + +EQU SSP_INVALID_DICT_PARAM$ TO "SSP330" ;* +EQU SSP_SYMBOLIC_SAVE_FAIL$ TO "SSP331" ;* Error writing symbolic column +EQU SSP_MISSING_MEDIAS_ERR$ TO "SSP332" ;* Missing list of open media names cr+lf used in swap_database. +EQU SSP_INVALID_SORT_PATH$ TO "SSP333" ;* invalid sort path bailed out... + +EQU SSP_DOS_FILE_OR_EXT_TRUNCATED$ TO "SSP340" ;* Dos file name and Dos File Extenstion TRUNCATED +EQU SSP_DOS_FILE_TRUNCATED$ TO "SSP341" ;* Dos file name TRUNCATED +EQU SSP_DOS_FILE_EXT_TRUNCATED$ TO "SSP342" ;* Dos File Extenstion TRUNCATED +EQU SSP_INVALID_CHARS_IN_DOS_FILE$ TO "SSP343" ;* Dos File Name contained Invalid chars +EQU SSP_INVALID_SEARCH_METHOD$ TO "SSP344" ;* Invalid search method "%1%" + +* Source Date: 14:01:32 10 NOV 1993 Build ID: OI*2.01.5 Level: 2.01 diff --git a/SYSPROG/STPROCINS/SSPERRORS_600.txt b/SYSPROG/STPROCINS/SSPERRORS_600.txt new file mode 100644 index 0000000..fe55873 --- /dev/null +++ b/SYSPROG/STPROCINS/SSPERRORS_600.txt @@ -0,0 +1,37 @@ +compile insert SSPERRORS_600 +* 2-16-94 eam - removed SSP631 & 632 because of dupes in SSPERRORS_200 + +EQU SSP_COLUMN_LOCK_FAILED$ TO "SSP601" +EQU SSP_COLUMNS_LOCKED_OK$ TO "SSP602" +EQU SSP_ROW_LOCK_FAILED$ TO "SSP603" +EQU SSP_ROW_LOCKED_OK$ TO "SSP604" +EQU SSP_TABLE_LOCK_FAILED$ TO "SSP605" +EQU SSP_TABLE_LOCKED_OK$ TO "SSP606" +EQU SSP_INVALID_LOCKTYPE$ TO "SSP607" +EQU SSP_COLUMN_UNLOCK_FAILED$ TO "SSP608" +EQU SSP_COLUMNS_UNLOCKED_OK$ TO "SSP609" +EQU SSP_ROW_UNLOCK_FAILED$ TO "SSP610" +EQU SSP_ROW_UNLOCKED_OK$ TO "SSP611" +EQU SSP_DELETE_ROW_FAILED$ TO "SSP612" +EQU SSP_ROWS_DELETED_OK$ TO "SSP613" +EQU SSP_ROW_DELETED$ TO "SSP614" +EQU SSP_ROW_WRITTEN_OK$ TO "SSP615" +EQU SSP_COLUMNS_WRITTEN_OK$ TO "SSP616" +EQU SSP_ROWS_COPIED_OK$ TO "SSP617" +EQU SSP_COPY_ROW_FAILED$ TO "SSP618" +EQU SSP_INVALID_COLUMN$ TO "SSP619" +EQU SSP_WRITE_DENIED$ TO "SSP620" +EQU SSP_UNLOCK_ALL_OK$ TO "SSP621" +EQU SSP_INVALID_OPTION$ TO "SSP622" +EQU SSP_READ_ROW_FAILED$ TO "SSP623" +EQU SSP_ROWS_READ_OK$ TO "SSP624" +EQU SSP_DEST_ROW_EXISTS$ TO "SSP625" +EQU SSP_DEST_ROW_REQUIRED$ TO "SSP626" +EQU SSP_CONV_ROW_EXCEEDS_MAX$ TO "SSP627" +EQU SSP_TABLE_UNLOCK_FAILED$ TO "SSP628" +EQU SSP_TABLE_UNLOCKED_OK$ TO "SSP629" +* EQU SSP_INVALID_TABLETYPE$ TO "SSP631" +* EQU SSP_NOT_SERVER_TABLETYPE$ TO "SSP632" +EQU SSP_REQUIRED_PARAM$ TO "SSP633" +EQU SSP_SERVER_NOT_FOUND$ TO "SSP634" +* Source Date: 13:43:47 04 MAR 1994 Build ID: OI*2.01.46 Level: 2.01 diff --git a/SYSPROG/STPROCINS/SSPERRORS_700.txt b/SYSPROG/STPROCINS/SSPERRORS_700.txt new file mode 100644 index 0000000..5445e5f --- /dev/null +++ b/SYSPROG/STPROCINS/SSPERRORS_700.txt @@ -0,0 +1,26 @@ +compile insert SSPERRORS_700 +/*------------------------------------------------------------------------- + This is the sperrors for INDEX MANAGEMENT ACCESS SPs + + DATE IMPLEMENTOR FUNCTION + -------- ----------- -------- + MM-DD-YY initials Modification + 09-17-91 Pat First created + 06-10-10 mtr Added 711 +---------------------------------------------------------------------------*/ + + +equ ssp_invalid_index_type_err$ to "SSP700" ;* passed in incorrect index_type, %1% passed in type. +equ ssp_remove_wrong_index_type_err$ to "SSP701" ;* specified indexed type not exist %1% index name, %2% index type +equ ssp_relational_sort_mode_err$ to "SSP702" ;* invalid sort mode %1% pass in sort mode. +equ ssp_index_already_exist_err$ to "SSP703" ;* index alredy exist index_name:@FM:index_type. +equ ssp_invalid_case_mode_err$ to "SSP704" ;* invalid case mode %1% wrong case_mode. +equ ssp_invalid_create_mode_err$ to "SSP705" ;* invalid create mode %1% wrong creating mode. +equ ssp_invalid_stop_mode_err$ to "SSP706" ;* invalid stop mode %1% wrong stop mode. +equ ssp_related_table_non_exist_err$ to "SSP707" ;* related table nonexist %1% non-exist tablename. +equ ssp_rel_sort_mode_inconsist_err$ to "SSP708" ;* many to 1 rel index have diff sorting mode %1% previous sort mode %2 current sort mode. +EQU ssp_index_different_account_err$ to "SSP709" ;* try to create index on table with different account %1 +EQU ssp_add_index_under_diff_acct$ to "SSP710" ;* Table % is under different account %2. Index cannot be added. +EQU ssp_add_index_dict_quickdex$ to "SSP711" ;* Cannot create index for table "%1%" when it has a Quickdex/Rightdex on its dictionary. + +* Source Date: 11:00:17 24 MAR 1994 Build ID: OI*2.01.54 Level: 2.01 diff --git a/SYSPROG/STPROCINS/SSPERRORS_800.txt b/SYSPROG/STPROCINS/SSPERRORS_800.txt new file mode 100644 index 0000000..5591d1e --- /dev/null +++ b/SYSPROG/STPROCINS/SSPERRORS_800.txt @@ -0,0 +1,9 @@ +compile insert SSPERRORS_800 +/* 800 series of stored procedure error equates */ + +EQU SSP_FOLDER_EXISTS$ TO "SSP0800" ;* The folder %1% already exists. +EQU SSP_FOLDER_DNE$ TO "SSP0801" ;* The folder %1% does not exist. +EQU SSP_SUBFOLDERS_EXIST$ TO "SSP0802" ;* The folder has subfolders, unable to delete. +EQU SSP_CORRUPTED_OBJ$ TO "SSP0803" ;* The object code for %1% appears to be corrupted. +EQU SSP_NO_INFOSHEET$ TO "SSP0804" ;* The information sheet for %1% is missing. +* Source Date: 16:42:29 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/STATUS.CONSTANTS.txt b/SYSPROG/STPROCINS/STATUS.CONSTANTS.txt new file mode 100644 index 0000000..27f2814 --- /dev/null +++ b/SYSPROG/STPROCINS/STATUS.CONSTANTS.txt @@ -0,0 +1,57 @@ +Compile Insert STATUS.CONSTANTS +* @STATLIST "record" offsets +* +EQU STATLIST.KEY$ TO 1 +EQU STATLIST.UNITDESC$ TO 2 +EQU STATLIST.UNITFMT$ TO 3 +EQU STATLIST.PRINTSTR$ TO 4 +* +* @STATLIST record 1 offsets +EQU STAT_NAME$ TO 1 ;* Field one is an @VM list of status line names. If it's on the list its in memory. +EQU STAT_POS$ TO 2 ;* Field two contains the pointer to the slot for the names. +* +* STATPOS +* +EQU SX$ TO 1 +EQU SY$ TO 2 +* +* STATPOS & STATREC Modified by Module or elsewhere +* +EQU STAT.MODULE$ TO 1 ;* Module +EQU STAT.MODE$ TO 2 ;* Module +EQU STAT.MODAL$ TO 3 ;* Module +EQU STAT.FUNKEYS$ TO 4 ;* Function keys for easier help levels +EQU STAT.ED$ TO 4 ;* Module or Scribe +EQU STAT.FILT$ TO 5 ;* System (Readnext & clearselect process) +EQU STAT.ROW$ TO 6 ;* Module or Scribe +EQU STAT.MAC$ TO 7 ;* Input.char +EQU STAT.ID$ TO 8 ;* System +EQU STAT.BACKG$ TO 9 ;* Background process in progress +EQU STAT.LEV$ TO 10 ;* Module +EQU STAT.POS$ TO 11 ;* used only to determine what module you are in when +* * popping back +* +* @STATATR +* +EQU STAT.COLOR$ TO 1 +*EQU STAT.BOT$ TO 2 ;* This is no longer used. +EQU STAT.FKEY$ TO 2 +EQU STAT.FRESH$ TO 3 +EQU STAT.XY$ TO 4 +EQU STAT.LINES$ TO 5 +EQU STAT.DEF$ TO 6 +* +EQU MULTI.MODAL$ TO 1 +EQU SINGLE$ TO 2 +EQU MULTI$ TO 3 +EQU PUSH$ TO 4 +EQU POP$ TO 5 +EQU SINGLE.MODAL$ TO 6 +EQU METER_MODAL$ TO 7 +* +* +EQU HELP.OFF$ TO 0 + +DECLARE SUBROUTINE STATUP + +* Source Date: 10:44:20 17 JUN 1994 Build ID: AREV*3.1.200 Level: 3.13 diff --git a/SYSPROG/STPROCINS/STATUS_EQUATES.txt b/SYSPROG/STPROCINS/STATUS_EQUATES.txt new file mode 100644 index 0000000..b278f56 --- /dev/null +++ b/SYSPROG/STPROCINS/STATUS_EQUATES.txt @@ -0,0 +1,9 @@ +Compile Insert STATUS_EQUATES +* cp 12/22/95 +* rjc 02/20/2016 copied in from rev_bp + +EQU SETSTAT_OK$ TO 0 +EQU SETSTAT_ERR$ TO 1 +EQU SETSTAT_APPEND$ TO -1 + +* Source Date: 09:45:35 03 JAN 1996 Build ID: OI*3.1.6 Level: 3.1 diff --git a/SYSPROG/STPROCINS/STRUCT_EQUATES.txt b/SYSPROG/STPROCINS/STRUCT_EQUATES.txt new file mode 100644 index 0000000..4469d2f --- /dev/null +++ b/SYSPROG/STPROCINS/STRUCT_EQUATES.txt @@ -0,0 +1,150 @@ +compile insert Struct_Equates +/* + ** Copyright (C) 1992-2017 Revelation Software Inc. All Rights Reserved ** + + Author cp + Date 21 Nov 1994 + Purpose Equates for use with C-structure functions + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 01 Dec 21 Added STRUCT_FLD_COMMENTS$ + Mr C 28 Jun 17 Added STRUCT_FLD_ALIGNMENT$ + Mr C 30 Mar 17 Fixed bad type equate + bzs 24 Mar 17 Added fields for alignment + Mr C 17 Feb 17 Updated for v10 + cp 15 Oct 97 Updated for 3.5 + cp 28 Jan 96 Updated for Hoffa project + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _STRUCT_EQUATES_ +#define _STRUCT_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * structure functions + declare function Struct_Def ;* def = Struct_Def(name) + declare subroutine Struct_Flush ;* Struct_Flush(name) or Struct_Flush() + declare function Struct_Len ;* len = Struct_Len(name) + declare function Blank_Struct ;* struct = Blank_Struct(name) + declare function Build_Struct ;* struct = Build_Struct(name, ...) + declare subroutine Parse_Struct ;* Parse_Struct(struct, name, ...) + declare function Var_To_Struct ;* struct = Var_To_Struct(var, name) + declare function Struct_To_Var ;* var = Struct_To_Var(struct, name) + declare function Define_Struct ;* ret = Define_Struct(instruction, ...) + declare subroutine Define_Struct ;* Define_Struct(instruction, ...) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + common /%%_struct_com%%/ structInit@, structHashTable@, structVar2@, structVar3@ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * fields in each structure record + equ STRUCT_TOT_LEN$ to 1 ;* length (in bytes) of the structure + equ STRUCT_FLD_CNT$ to 2 ;* number of fields in the structure + equ STRUCT_FLD_DEF$ to 3 ;* intrinsic types of each field (@vm delim) + equ STRUCT_FLD_LEN$ to 4 ;* lengths of each field (@vm delim) + // equ STRUCT_TMP_DEF$ to 5 ;* mangled on load; types without @vm delim - no longer used - clever trick if you have < 10 types ;). + equ STRUCT_FLD_VARNAMES$ to 6 ;* variable names of each field (@vm delim) + equ STRUCT_FLD_VARTYPES$ to 7 ;* variable types of each field (@vm delim) + equ STRUCT_FLD_ALIGNMENT$ to 8 ;* Specific data alignment value + equ STRUCT_FLD_COMMENTS$ to 9 ;* @tm'd free text field + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * structure definition codes + equ T_SIGNED_CHAR$ to 0 + equ T_UNSIGNED_CHAR$ to 1 ;* (Byte) + equ T_SIGNED_SHORT$ to 2 + equ T_UNSIGNED_SHORT$ to 3 + equ T_SIGNED_LONG$ to 4 + equ T_UNSIGNED_LONG$ to 5 + equ T_FLOAT$ to 6 + equ T_DOUBLE$ to 7 + equ T_POINTER$ to 8 + equ T_CHAR_ARRAY$ to 9 ;* size of array is stored in "struct_fld_len$" + + // v10+ + equ T_WCHAR_ARRAY$ to 10 ;* size of array is stored in "struct_fld_len$" + equ T_BINARY$ to 11 ;* (Byte-array) size of array is stored in "struct_fld_len$" + equ T_SIGNED_INT$ to 12 + equ T_UNSIGNED_INT$ to 13 + equ T_SIGNED_INT64$ to 14 ;* 64-bit only + equ T_UNSIGNED_INT64$ to 15 ;* 64-bit only + equ T_SIGNED_INTPTR$ to 16 + equ T_UNSIGNED_INTPTR$ to 17 + equ T_SIZET$ to 18 + equ T_HANDLE$ to 19 + equ T_LPBYTE$ to 20 + equ T_LPUBYTE$ to 21 + equ T_LPSHORT$ to 22 + equ T_LPUSHORT$ to 23 + equ T_LPLONG$ to 24 + equ T_LPULONG$ to 25 + equ T_LPINT$ to 26 + equ T_LPUINT$ to 27 + equ T_LPINT64$ to 28 + equ T_LPUINT64$ to 29 + equ T_LPINTPTR$ to 30 + equ T_LPUINTPTR$ to 31 + equ T_LPSIZET$ to 32 + equ T_LPFLOAT$ to 33 + equ T_LPDOUBLE$ to 34 + equ T_LPACHAR$ to 35 + equ T_LPWCHAR$ to 36 + equ T_LPASTR$ to 37 + equ T_LPWSTR$ to 38 + equ T_LPBINARY$ to 39 + equ T_LPHANDLE$ to 40 + + equ T_PADDING$ to 41 ;* bzs 032417 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * define struct + equ DS_ENUM$ to 1 ;* list = Define_Struct(DS_ENUM$) + equ DS_PUT$ to 2 ;* success = Define_Struct(DS_PUT$, name, def) + equ DS_DELETE$ to 3 ;* success = Define_Struct(DS_DELETE$, name) + equ DS_REINDEX$ to 4 ;* success = Define_Struct(DS_REINDEX$) + equ DS_DIALOG$ to 5 ;* Define_Struct(DS_DIALOG$) (default) + equ DS_DLG_CREATE$ to 6 ;* reserved + equ DS_DLG_CLOSE$ to 7 ;* reserved + equ DS_DLG_GETDEF$ to 8 ;* reserved + equ DS_DLG_PUTDEF$ to 9 ;* reserved + equ DS_DLG_READ$ to 10 ;* reserved + equ DS_DLG_SAVE$ to 11 ;* reserved + equ DS_DLG_NEW$ to 12 ;* reserved + equ DS_DLG_COPY$ to 13 ;* reserved + equ DS_DLG_DELETE$ to 14 ;* reserved + equ DS_DLG_CHANGEKEY$ to 15 ;* reserved + equ DS_DLG_ETINSERT$ to 16 ;* reserved + equ DS_DLG_ETDELETE$ to 17 ;* reserved + equ DS_DLG_ETOPTIONS$ to 18 ;* reserved + equ DS_DLG_ETGOTFOCUS$ to 19 ;* reserved + equ DS_DLG_ETPOSCHANGE$ to 20 ;* reserved + equ DS_DLG_ETLOSTFOCUS$ to 21 ;* reserved + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * miscellaneous + equ STRUCT_FILE$ to "SYSOBJ" + equ STRUCT_KEY_PREFIX$ to "STRUCT_" + equ STRUCT_INDEX$ to "!STRUCT" + equ STRUCT_DIALOG$ to "DEFINE_STRUCT" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/STYLE_EQUATES.txt b/SYSPROG/STPROCINS/STYLE_EQUATES.txt new file mode 100644 index 0000000..8e3b5c2 --- /dev/null +++ b/SYSPROG/STPROCINS/STYLE_EQUATES.txt @@ -0,0 +1,164 @@ +compile insert Style_Equates + +****************************************************************************** +* +* Name : Style_Equates +* Description: Values for various window and control styles +* +* History : +* 10/26/97 cp Original programmer, based on Windows SDK and DataTable +* +****************************************************************************** + +* window styles +equ WS_OVERLAPPED$ to 0 +equ WS_POPUP$ to 2147483648 +equ WS_CHILD$ to 1073741824 +equ WS_MINIMIZE$ to 536870912 +equ WS_VISIBLE$ to 268435456 +equ WS_DISABLED$ to 134217728 +equ WS_CLIPSIBLINGS$ to 67108864 +equ WS_CLIPCHILDREN$ to 33554432 +equ WS_MAXIMIZE$ to 16777216 +equ WS_CAPTION$ to 12582912 +equ WS_BORDER$ to 8388608 +equ WS_DLGFRAME$ to 4194304 +equ WS_VSCROLL$ to 2097152 +equ WS_HSCROLL$ to 1048576 +equ WS_SYSMENU$ to 524288 +equ WS_THICKFRAME$ to 262144 +equ WS_GROUP$ to 131072 +equ WS_TABSTOP$ to 65536 +equ WS_MINIMIZEBOX$ to 131072 +equ WS_MAXIMIZEBOX$ to 65536 + +* extended window styles +equ WS_EX_DLGMODALFRAME$ to 1 +equ WS_EX_NOPARENTNOTIFY$ to 4 +equ WS_EX_TOPMOST$ to 8 +equ WS_EX_ACCEPTFILES$ to 16 +equ WS_EX_TRANSPARENT$ to 32 + +* edit styles +equ ES_LEFT$ to 0 +equ ES_CENTER$ to 1 +equ ES_RIGHT$ to 2 +equ ES_MULTILINE$ to 4 +equ ES_UPPERCASE$ to 8 +equ ES_LOWERCASE$ to 16 +equ ES_PASSWORD$ to 32 +equ ES_AUTOVSCROLL$ to 64 +equ ES_AUTOHSCROLL$ to 128 +equ ES_NOHIDESEL$ to 256 +equ ES_OEMCONVERT$ to 1024 +equ ES_READONLY$ to 2048 +equ ES_WANTRETURN$ to 4096 + +* button styles +equ BS_PUSHBUTTON$ to 0 +equ BS_DEFPUSHBUTTON$ to 1 +equ BS_CHECKBOX$ to 2 +equ BS_AUTOCHECKBOX$ to 3 +equ BS_RADIOBUTTON$ to 4 +equ BS_3STATE$ to 5 +equ BS_AUTO3STATE$ to 6 +equ BS_GROUPBOX$ to 7 +equ BS_USERBUTTON$ to 8 +equ BS_AUTORADIOBUTTON$ to 9 +equ BS_OWNERDRAW$ to 11 +equ BS_LEFTTEXT$ to 32 + +* static text styles +equ SS_LEFT$ to 0 +equ SS_CENTER$ to 1 +equ SS_RIGHT$ to 2 +equ SS_ICON$ to 3 +equ SS_BLACKRECT$ to 4 +equ SS_GRAYRECT$ to 5 +equ SS_WHITERECT$ to 6 +equ SS_BLACKFRAME$ to 7 +equ SS_GRAYFRAME$ to 8 +equ SS_WHITEFRAME$ to 9 +equ SS_USERITEM$ to 10 +equ SS_SIMPLE$ to 11 +equ SS_LEFTNOWORDWRAP$ to 12 + +* listbox styles +equ LBS_NOTIFY$ to 1 +equ LBS_SORT$ to 2 +equ LBS_NOREDRAW$ to 4 +equ LBS_MULTIPLESEL$ to 8 +equ LBS_OWNERDRAWFIXED$ to 16 +equ LBS_OWNERDRAWVARIABLE$ to 32 +equ LBS_HASSTRINGS$ to 64 +equ LBS_USETABSTOPS$ to 128 +equ LBS_NOINTEGRALHEIGHT$ to 256 +equ LBS_MULTICOLUMN$ to 512 +equ LBS_WANTKEYBOARDINPUT$ to 1024 +equ LBS_EXTENDEDSEL$ to 2048 +equ LBS_DISABLENOSCROLL$ to 4096 +equ LBS_NODATA$ to 8192 + +* combobox styles +equ CBS_SIMPLE$ to 1 +equ CBS_DROPDOWN$ to 2 +equ CBS_DROPDOWNLIST$ to 3 +equ CBS_OWNERDRAWFIXED$ to 16 +equ CBS_OWNERDRAWVARIABLE$ to 32 +equ CBS_AUTOHSCROLL$ to 64 +equ CBS_OEMCONVERT$ to 128 +equ CBS_SORT$ to 256 +equ CBS_HASSTRINGS$ to 512 +equ CBS_NOINTEGRALHEIGHT$ to 1024 +equ CBS_DISABLENOSCROLL$ to 2048 + +* scrollbar styles +equ SBS_HORZ$ to 0 +equ SBS_VERT$ to 1 +equ SBS_TOPALIGN$ to 2 +equ SBS_LEFTALIGN$ to 2 +equ SBS_BOTTOMALIGN$ to 4 +equ SBS_RIGHTALIGN$ to 4 +equ SBS_SIZEBOXTOPLEFTALIGN$ to 2 +equ SBS_SIZEBOXBOTTOMRIGHTALIGN$ to 4 +equ SBS_SIZEBOX$ to 8 + +* edit table styles +equ DTS_EDIT$ to 4 +equ DTS_RESIZE$ to 8 +equ DTS_NUMBERS$ to 16 +equ DTS_LETTERS$ to 32 +equ DTS_OWNERDEF$ to 48 +equ DTS_HGRID$ to 64 +equ DTS_VGRID$ to 128 +equ DTS_ROWSELECT$ to 256 +equ DTS_MULTIROW$ to 512 +equ DTS_COLSELECT$ to 1024 +equ DTS_MULTICOL$ to 2048 +equ DTS_SMALLDATA$ to 0 +equ DTS_LARGEDATA$ to 4096 +equ DTS_ROWBUTTONS$ to 8192 +equ DTS_ROWNUMBERS$ to 16384 +equ DTS_DROPDOWN$ to 32768 +equ DTS_AUTODROPDN$ to 32770 +equ DTS_VIRTUALMEM$ to 1 +equ DTS_HSCROLL$ to 1048576 ;* redundant, WS_HSCROLL$ +equ DTS_VSCROLL$ to 2097152 ;* redundant, WS_VSCROLL$ +equ DTS_BORDER$ to 8388608 ;* redundant, WS_BORDER$ + +* edit-table column styles +equ DTCS_RESIZE$ to 1 +equ DTCS_FIXED$ to 2 +equ DTCS_EDIT$ to 4 +equ DTCS_PROTECT$ to 8 +equ DTCS_HIDDEN$ to 32 +equ DTCS_LEFT$ to 0 +equ DTCS_CENTER$ to 64 +equ DTCS_RIGHT$ to 128 +equ DTCS_HEADLEFT$ to 0 +equ DTCS_HEADCENTER$ to 256 +equ DTCS_HEADRIGHT$ to 512 +equ DTCS_LOCKED$ to 8192 +equ DTCS_SORTASC$ to 16384 +equ DTCS_SORTDESC$ to 32768 + diff --git a/SYSPROG/STPROCINS/SYNCDB_INSERT.txt b/SYSPROG/STPROCINS/SYNCDB_INSERT.txt new file mode 100644 index 0000000..eff9618 --- /dev/null +++ b/SYSPROG/STPROCINS/SYNCDB_INSERT.txt @@ -0,0 +1,77 @@ +compile insert SyncDB_Insert + +****************************************************************************** +* +* This program is proprietary and is not to be used by or disclosed +* to others, nor is it to be copied without written permission from +* Revelation Technologies, Inc. +* +* Name : SyncDB_Insert +* Description: Ensure that the @tables/@volumes arrays are synchronized. +* Requires System Compiler with SysCommon already defined. +* +* History : (date, initials, notes) +* 03/09/98 cp Original programmer, based on the original SyncDB utility. +* 08/04/10 rjc Add cleanup of empty volume references +****************************************************************************** + +point Vols to sc_Array_Volumes(0) +point VolFiles to sc_Array_Volumes(3) +point Files to sc_Array_Tables(0) +point FileVols to sc_Array_Tables(1) + +* first verify volume structures +cVols = count(Vols, @fm) + (Vols # "") +for iVol = 1 to cVols + Vol = Vols + cFiles = count(VolFiles, @vm) + (VolFiles # "") + for iFile = 1 to cFiles + File = VolFiles + locate File in Files using @fm setting Pos then + * check volume reference + if FileVols # Vol then + VolFiles = delete(VolFiles, iVol, iFile, 0) + end + end else + * file does not exist but is referenced by volume + VolFiles = delete(VolFiles, iVol, iFile, 0) + end + next iFiles +next iVol + +cFiles = count(Files, @fm) + (Files # "") +for iFile = cFiles to 1 step -1 + File = Files + Vol = FileVols + * check volume reference + locate Vol in Vols using @fm setting Pos then + locate File in VolFiles using @vm setting Pos else + * file not referenced by a volume + for i = 0 to 5 + sc_Array_Tables(i) = delete(sc_Array_Tables(i), iFile, 0, 0) + next i + end + end else + * file references unattached volume + for i = 0 to 5 + sc_Array_Tables(i) = delete(sc_Array_Tables(i), iFile, 0, 0) + next i + end +next iFile + + +* rjc 08-04-10 Clean out empty volumes. +cVols = count(Vols, @fm) + (Vols # "") +for iVol = cVols To 1 step -1 + Vol = Vols + cFiles = count(VolFiles, @vm) + (VolFiles # "") + Begin Case + Case vol _eqc 'SYSCOLUMNS*SYSCOLUMNS' + * SYSCOLUMNS is special case, do nothing + Case cfiles = 0 + * Empty vol, remove it + for i = 0 To 6 + sc_Array_Volumes(i) = delete(sc_Array_Volumes(i), iVol, 0, 0) + next + End case +next iVol diff --git a/SYSPROG/STPROCINS/SYSCOMMODULES_EQUATES.txt b/SYSPROG/STPROCINS/SYSCOMMODULES_EQUATES.txt new file mode 100644 index 0000000..15008ca --- /dev/null +++ b/SYSPROG/STPROCINS/SYSCOMMODULES_EQUATES.txt @@ -0,0 +1,20 @@ +compile insert SYSCOMMODULES_EQUATES +/*---------------------------------------- + Author : Table Create Insert Routine + Written : 11/07/2008 + Description : Insert for Table SYSCOMMODULES +----------------------------------------*/ + + +Equ SYSCOMMODULES_WINDOW_NAME$ To 0 +Equ SYSCOMMODULES_CONTROLS$ To 1 +Equ SYSCOMMODULES_EVENTS$ To 2 +Equ SYSCOMMODULES_PREEVENT$ To 3 +Equ SYSCOMMODULES_POSTEVENT$ To 4 +Equ SYSCOMMODULES_INSERTS$ To 5 +Equ SYSCOMMODULES_COMMENTS$ To 6 +Equ SYSCOMMODULES_ALLEVENTS$ To 7 +Equ SYSCOMMODULES_COMPILENOW$ To 8 +Equ SYSCOMMODULES_DOFORM$ To 9 +Equ SYSCOMMODULES_ACCONTROLS$ To 10 +Equ SYSCOMMODULES_WEBOI_COMPATIBILITY$ To 11 diff --git a/SYSPROG/STPROCINS/SYSERRORS_1000.txt b/SYSPROG/STPROCINS/SYSERRORS_1000.txt new file mode 100644 index 0000000..1f18d39 --- /dev/null +++ b/SYSPROG/STPROCINS/SYSERRORS_1000.txt @@ -0,0 +1,146 @@ +compile insert SYSERRORS_1000 +/* + Copyright (c) 1992-2018 Revelation Software. All rights reserved. + + * This program is proprietary and is not to be used by or disclosed + * to others, nor is it to be copied without written permission from + * Revelation Technologies, Inc. + + Author : ??? + Date : Before Time Began + Purpose : "SYS" error series equates + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 13 Nov 18 Added SYS1250 series. + Mr C 20 Mar 18 Added SYS1005, SYS1011, SYS1012 + Mr C 24 Aug 17 Remove insane indents + Mr C 29 Sep 14 Added header guards, cleanup for v10 + Mr C 10 Feb 10 Added SYS1107 + Mr C 29 Sep 05 Added SYS1104, SYS1105, SYS1106 + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#IFNDEF _SYSERRORS_1000_ +#DEFINE _SYSERRORS_1000_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ sys_load_err$ to "SYS1000" ; * Error loading program "%1%". + equ sys_null_load$ to "SYS1001" ; * Null loading error. + equ sys_invalid_object$ to "SYS1002" ; * The object code is invalid. + equ sys_load_overflow$ to "SYS1003" ; * The maximum number of programs has been exceeded. + equ sys_dict_load_err$ to "SYS1004" ; * Error loading dictionary item "%1%". + equ sys_symbolic_insert_err$ to "SYS1005" ; * cant do dict insert into symbolic (%1%) + equ SYS_RUNTIME_RESTRICT_ERR$ to "SYS1006" ; * Module "%1%" terminated due to runtime restrictions. + + equ sys_invalid_login_null_user$ to "SYS1008" ; * Invalid login null user name. + equ sys_invalid_login_username$ to "SYS1009" ; * Invalid login user name. + equ sys_invalid_login_passsword$ to "SYS1010" ; * Invalid login password. + equ sys_invalid_login_acc_disabled$ to "SYS1011" ; * Invalid login (Account disabled due to excessive attempts). + equ sys_invalid_login_sys_disabled$ to "SYS1012" ; * Invalid login (Workstation disabled due to excessive attempts). + +/////////////////////////////////////////////////////////////////////////////// +// compiler preprocessor errors + + equ sys_comp_compile_errors$ to "SYS1100" ; * The "%1%" event for "%2%" contains syntax errors. + equ sys_comp_preproc_err$ to "SYS1101" ; * Compiler error: Preprocessing error. + equ sys_comp_source_oversize$ to "SYS1102" ; * Compiler error: Source code exceeds maximum size for compiler. + equ sys_comp_invalid_insert$ to "SYS1103" ; * Compiler error: Old tablename; record name format is not supported. Invalid $insert. + equ SYS_COMP_INVALID_USES$ to "SYS1104" ; * Compiler error: Module "%1%" Line "%2%" : Invalid $USES entity name[%3%] + equ SYS_COMP_INSERT_ERROR$ to "SYS1105" ; * Compiler error: Module "%1%" Line "%2%" : $INSERT access error [%3%] + equ SYS_COMP_INSERT_CIRCULAR_REF$ to "SYS1106" ; * Compiler error: Module "%1%" Line "%2%" : $INSERT circular reference error [$INSERT %3%] + equ SYS_COMP_UNMATCHED_IFDEF$ to "SYS1107" ; * Compiler error: Module "%1%" Line "%2%" : Unmatched compiler define condition + +/////////////////////////////////////////////////////////////////////////////// +// Contract processing - very very deprecated and unsupported. + + equ sys_comp_contr_err_base$ to '1110' + equ sys_comp_contr_position$ to "SYS1111" ; * Compiler error: Contract must be before executable code + equ sys_comp_contr_no_begin$ to "SYS1112" ; * Compiler error: Contract BEGIN CONDITION is missing. + equ sys_comp_contr_no_end$ to "SYS1113" ; * Compiler error: Contract END CONDITION is missing. + equ sys_comp_contr_multi_pre$ to "SYS1114" ; * Compiler error: Contract contains multiple PRE: statements. + equ sys_comp_contr_multi_post$ to "SYS1115" ; * Compiler error: Contract contains multiple POST: statements. + equ sys_comp_contr_no_pre$ to "SYS1116" ; * Compiler error: Contract PRE: statement is missing. + equ sys_comp_contr_no_post$ to "SYS1117" ; * Compiler error: Contract POST: statement is missing. + equ sys_comp_generic_error$ to "SYS1119" ; * Compiler error: ( used by Oproc compile to forward foreign compiler Errors) + equ sys_comp_vnav_warning$ to "SYS1120" ; * Compiler warning: Unassigned Variable "%1% on line: "%2%" + equ sys_comp_elapsed_info$ to "SYS1121" ; * Compiler information: "%1% elapsed time "%2%" secs + equ sys_comp_var_equatename_warn$ to "SYS1122" ; * Compiler warning: Variable "%1% on line "%2%" ends with "$" + equ sys_comp_equ_noSuffix_warn$ to "SYS1123" ; * Compiler warning: Equate "%1% on line "%2%" does not end with "$" + equ sys_comp_debug_detected_warn$ to "SYS1124" ; * Compiler warning: Debug statement found + equ sys_comp_generic_warn$ to "SYS1125" ; * Compiler warning: %1% ( used by Oproc compile to forward foreign compiler warnings) + + // More contract processing - conflicts with FORM error codes but shouldn't + // be a problem as contract preprocessing is very very deprecated. + + equ sys_precondition_fail$ to "SYS1500" ; * Contract precondition failure : Module name, condition failed + equ sys_postcondition_fail$ to "SYS1501" ; * Contract postcondition failure : Module name, condition failed + +/////////////////////////////////////////////////////////////////////////////// +// compiler errors + + equ sys_proc_abort$ to "SYS1200" ; * The process has been aborted. + equ sys_unsupported$ to "SYS1201" ; * This feature is not supported. + + equ sys_invalid_proctype$ to "SYS1210" ; * The procedure type is invalid. + equ sys_no_arg_lparen$ to "SYS1211" ; * A left parenthesis is missing. + equ sys_no_arg_rparen$ to "SYS1212" ; * A right parenthesis is missing. + equ sys_invalid_argtype$ to "SYS1213" ; * The argument type is invalid. + equ sys_missing_argid$ to "SYS1214" ; * An argument identifier is missing. + equ sys_compile_fail$ to "SYS1215" ; * The compilation has failed. + equ sys_arg_overflow$ to "SYS1216" ; * Too many arguments have been passed. + equ sys_missing_rowdef$ to "SYS1217" ; * A ROWDEF is missing in the routine. + + equ sys_obj_missing$ to "SYS1220" ; * The object code is missing. + equ sys_invalid_arg$ to "SYS1221" ; * The argument is invalid. + equ sys_putdata_fail$ to "SYS1222" ; * PutData has failed. + equ sys_invalid_procname$ to "SYS1223" ; * The stored procedure name is invalid. + equ sys_protected_proc$ to "SYS1224" ; * The procedure cannot be overwritten - no arguments. + + equ sys_sql_read_err$ to "SYS1230" ; * SQL read error. + + equ sys_missing_comma_quote$ to "SYS1240" ; * A comma or quote is missing in the script. + equ sys_missing_matching_quote$ to "SYS1241" ; * A matching quote is missing in the script. + equ sys_invalid_param$ to "SYS1242" ; * The parameter number in the script is invalid. + equ sys_nesting_too_deep$ to "SYS1243" ; * The list is too deeply nested in brackets. + equ sys_invalid_char$ to "SYS1244" ; * The script contains an invalid character. + equ sys_bracket_mismatch$ to "SYS1245" ; * A matching bracket is missing in the script. + + equ sys_null_prototype$ to "SYS1250" ; * The prototype definition is missing + equ sys_null_ret_type$ to "SYS1251" ; * The prototype return type is missing + equ sys_null_calling_conv$ to "SYS1252" ; * The prototype calling convention is missing + equ sys_null_function_name$ to "SYS1253" ; * The prototype function name is missing + equ sys_invalid_var_type$ to "SYS1254" ; * "%1%" is not a valid variable type + equ sys_invalid_calling_conv$ to "SYS1255" ; * "%1%" is not a valid calling convention + equ sys_invalid_func_pointer$ to "SYS1256" ; * "%1%" is not a valid internal function pointer + equ sys_null_dll_name$ to "SYS1257" ; * The prototype definition is missing + +/////////////////////////////////////////////////////////////////////////////// +// Volume/Table errors + + equ sys_sysnodetach_err$ to "SYS1300" ; * Cannot detach or redefine table + equ sys_notab_invol_err$ to "SYS1301" ; * Table was not found in volume rec table list + equ sys_volrec_missing_err$ to "SYS1302" ; * Volume record for attached table is missing + equ sys_volrec_synch_err$ to "SYS1303" ; * Table list in the volume record does not synch with the systables record + +/////////////////////////////////////////////////////////////////////////////// +// Form runtime errors + + equ SYS_FORM_PRILOCK_ERR$ to "SYS1500" ; * Primary row locked: Table %1%, key %2% + equ SYS_FORM_SUBLOCK_ERR$ to "SYS1501" ; * Subsidiary row locked: Table %1% key %2% + equ SYS_FORM_SAVELOCK_ERR$ to "SYS1502" ; * Lock not held at update time: Table %1%, key %2%, operation %3% + equ SYS_FORM_OPEN_EXPLODE_ERR$ to "SYS1503" ; * form fetch denormalization beyond 2 levels is not supported + equ SYS_FORM_READLOCKED_STAT$ to "SYS1510" ; * locked record is read into a form (warning, not an error) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ENDIF +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/SYSLHVERIFY_EQUATES.txt b/SYSPROG/STPROCINS/SYSLHVERIFY_EQUATES.txt new file mode 100644 index 0000000..83e4a36 --- /dev/null +++ b/SYSPROG/STPROCINS/SYSLHVERIFY_EQUATES.txt @@ -0,0 +1,22 @@ +Compile Insert SysLhVerify_Equates + +Equ Syslhv_Date_Time to 1 +Equ Syslhv_GFE_Info to 2 +Equ Syslhv_FrameSize to 3 +Equ Syslhv_lk_Size to 4 +Equ Syslhv_Ov_size to 5 +Equ Syslhv_Modulo to 6 +Equ Syslhv_Sizelock to 7 +Equ Syslhv_Frames_For_Free_Frames to 8 +Equ Syslhv_No_Free_frames to 9 +Equ Syslhv_Actual_Rows to 10 +Equ Syslhv_Header_Rows to 11 +Equ Syslhv_Average_Rows_per_Group to 12 +Equ Syslhv_Average_Row_Length to 13 +Equ Syslhv_Primary_percent to 14 +Equ Syslhv_Table_percent to 15 +Equ Syslhv_Average_IO to 16 +Equ Syslhv_std_Deviation to 17 +Equ Syslhv_Average_ov_to_lk to 18 +Equ Syslhv_Std_Deviation_Ov to 19 + diff --git a/SYSPROG/STPROCINS/SYSREPOSLOG_COL_EQUATES.txt b/SYSPROG/STPROCINS/SYSREPOSLOG_COL_EQUATES.txt new file mode 100644 index 0000000..43c474e --- /dev/null +++ b/SYSPROG/STPROCINS/SYSREPOSLOG_COL_EQUATES.txt @@ -0,0 +1,44 @@ +compile insert SYSREPOSLOG_COL_EQUATES +/* + ** Copyright (c) 1992-2016 Revelation Software. All rights reserved.** + + Author ?? + Date Pre-history + Purpose SYSREPOSLOG table column equates + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 30 Mar 16 Added Header Guards +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _SYSREPOSLOG_COL_EQUATES_ +#define _SYSREPOSLOG_COL_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Key structure + equ SYSREPLOG_APPID$ to 1 + equ SYSREPLOG_TYPEID$ to 2 + equ SYSREPLOG_CLASSID$ to 3 + equ SYSREPLOG_ENTITYID$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // Row structure + equ SYSREPLOG_TIMESTAMP$ to 1 + equ SYSREPLOG_OPERATION$ to 2 + equ SYSREPLOG_USERID$ to 3 + equ SYSREPLOG_DESCRIPTION$ to 4 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/SYSREPOSTOOLBARS_EQUATES.txt b/SYSPROG/STPROCINS/SYSREPOSTOOLBARS_EQUATES.txt new file mode 100644 index 0000000..b4b7ea4 --- /dev/null +++ b/SYSPROG/STPROCINS/SYSREPOSTOOLBARS_EQUATES.txt @@ -0,0 +1,27 @@ +compile insert SYSREPOSTOOLBARS_EQUATES +/*---------------------------------------- + Author : Table Create Insert Routine + Written : 08/02/2018 + Description : Insert for Table SYSREPOSTOOLBARS +----------------------------------------*/ + + +Equ TLBR_APPID$ To 0 +Equ TLBR_CLASSID$ To 0 +Equ TLBR_ENTITYID$ To 0 +Equ TLBR_BTN_ID$ To 1 +Equ TLBR_BTN_TEXT$ To 2 +Equ TLBR_BTN_IMAGELIST_INDEX$ To 3 +Equ TLBR_BTN_IMAGE$ To 4 +Equ TLBR_BTN_AUTOSIZE$ To 5 +Equ TLBR_BTN_VISIBLE$ To 6 +Equ TLBR_BTN_ENABLED$ To 7 +Equ TLBR_BTN_TOOLTIP_TEXT$ To 8 +Equ TLBR_BTN_BUTTONTYPE$ To 9 +Equ TLBR_BUTTONPADDING$ To 10 +Equ TLBR_BUTTONSIZE$ To 11 +Equ TLBR_BUTTONSPACING$ To 12 +Equ TLBR_LISTSTYLE$ To 13 +Equ TLBR_WRAPPABLE$ To 14 +Equ TLBR_SHOWDROPDOWNARROWS$ To 15 +Equ TLBR_IMAGELIST$ To 16 diff --git a/SYSPROG/STPROCINS/SYSREPOSXML_EQUATES.txt b/SYSPROG/STPROCINS/SYSREPOSXML_EQUATES.txt new file mode 100644 index 0000000..6a08348 --- /dev/null +++ b/SYSPROG/STPROCINS/SYSREPOSXML_EQUATES.txt @@ -0,0 +1,12 @@ +compile insert SYSREPOSXML_EQUATES +equ SYSREPOSXML_OI_Data_File to 1 +equ SYSREPOSXML_XML_File$ to 2 +equ SYSREPOSXML_dict_mappings to 3 +equ SYSREPOSXML_Target_tags to 4 +equ SYSREPOSXML_key_tag to 5 +equ SYSREPOSXML_schema_name to 6 + +equ SYSREPOSXML_storage_Opts to 9 +equ SYSREPOSXML_table_tag to 10 +equ SYSREPOSXML_row_tag to 11 + diff --git a/SYSPROG/STPROCINS/SYSREPOS_COL_EQUATES.txt b/SYSPROG/STPROCINS/SYSREPOS_COL_EQUATES.txt new file mode 100644 index 0000000..825776a --- /dev/null +++ b/SYSPROG/STPROCINS/SYSREPOS_COL_EQUATES.txt @@ -0,0 +1,116 @@ +compile insert sysrepos_col_equates +/* + ** Copyright (c) 1992-2015 Revelation Software. All rights reserved.** + + Author ?? + Date Pre-history + Purpose SYSREPOS table column equates + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + Mr C 07 Apr 20 Added SYSREP_APPROW_OWNER$ + Mr C 13 Sep 17 Renamed SYSREP_SYSENTITY$ -> SYSREP_SYSBUILD$ + Mr C 11 Sep 17 Added SYSREP_SYSENTITY$ + Mr C 30 Jan 16 Readded SCMFORMAT column + Mr C 21 Jan 16 Removed SCMFORMAT column, updated SCMINCLUDE values + Mr C 11 Sep 14 Moved USERn fields (collision with GIT) + Added GIT fields + Added COLORKEY/IMAGECOUNT fields + Mr C 10 Oct 12 Added USERn fields +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _SYSREPOS_COL_EQUATES_ +#define _SYSREPOS_COL_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // key columns + equ SYSREP_APPID$ to 1 + equ SYSREP_TYPEID$ to 2 + equ SYSREP_CLASSID$ to 3 + equ SYSREP_ENTITYID$ to 4 + + equ SYSREP_APPID_NAME$ to 'APPID' + equ SYSREP_TYPEID_NAME$ to 'TYPEID' + equ SYSREP_CLASSID_NAME$ to 'CLASSID' + equ SYSREP_ENTITYID_NAME$ to 'ENTITYID' + + equ APP_TYPE_SYM$ to 'APP_TYPE' + equ APP_TYPE_CLASS_SYM$ to 'APP_TYPE_CLASS' + + * // SCMINCLUDE for SYSREPOS + equ SCMINCLUDE_DEFAULT$ to 0 ; * // Use TYPE/CLASS setting + equ SCMINCLUDE_EXCLUDE$ to 1 ; * // Exclude + equ SCMINCLUDE_INCLUDE$ to 2 ; * // Include + + * // Field columns + equ SYSREP_AUTHOR$ to 1 + equ SYSREP_ACCESS_PERMIT$ to 2 + equ SYSREP_UPDATE_PERMIT$ to 3 + equ SYSREP_SUB_KEY$ to 4 + equ SYSREP_SUPER$ to 5 + equ SYSREP_SUB$ to 6 + equ SYSREP_RESERVED1$ to 7 + equ SYSREP_COLORKEY$ to 7 ; * // For IMAGE and IMAGELIST entities + equ SYSREP_RESERVED2$ to 8 + equ SYSREP_MODULE$ to 8 + equ SYSREP_RESERVED3$ to 9 + equ SYSREP_IMAGECOUNT$ to 9 ; * // For IMAGE and IMAGELIST entities + equ SYSREP_RESERVED4$ to 10 + equ SYSREP_POINTER_APPID$ to 11 + equ SYSREP_POINTER_ENTITYID$ to 12 + equ SYSREP_POINTED_APPID$ to 13 + equ SYSREP_POINTED_ENTITYID$ to 14 + equ SYSREP_DOC$ to 15 + equ SYSREP_RESERVED5$ to 16 + equ SYSREP_KEYWORD$ to 17 + equ SYSREP_EVALUATE$ to 18 + equ SYSREP_EVAL_NOTES$ to 19 + equ SYSREP_SHAREABLE$ to 20 + equ SYSREP_PUBLISHABLE$ to 21 + equ SYSREP_CHECKOUT$ to 22 + equ SYSREP_STATE$ to 23 + equ SYSREP_LOGPOINTER$ to 24 + equ SYSREP_UPDATED$ to 25 + equ SYSREP_UPDATED_BY$ to 26 + equ SYSREP_TITLE$ to 27 + equ SYSREP_DESCRIPTION$ to 28 + equ SYSREP_RECOMPILE$ to 29 + equ SYSREP_SCMFORMAT$ to 30 + equ SYSREP_SCMINCLUDE$ to 31 + equ SYSREP_SCMPURGE$ to 32 ;* // Flag items for destruction by a purge program. + equ SYSREP_SCMAUTHOR$ to 33 ;* // GIT committer as of most recent import into OI + equ SYSREP_SCMCOMMIT$ to 34 + equ SYSREP_SYSBUILD$ to 35 + equ SYSREP_SYSPUBLISH$ to 36 + equ SYSREP_APPROW_OWNER$ to 37 + + equ SYSREP_SCMPULL_DT$ to 41 ; * // GIT Pull date + equ SYSREP_SCMPUSH_DT$ to 42 ; * // GIT Push date + + * // User defined fields - RTI won't touch these columns + equ SYSREP_USER1$ to 51 + equ SYSREP_USER2$ to 52 + equ SYSREP_USER3$ to 53 + equ SYSREP_USER4$ to 54 + equ SYSREP_USER5$ to 55 + equ SYSREP_USER6$ to 56 + equ SYSREP_USER7$ to 57 + equ SYSREP_USER8$ to 58 + equ SYSREP_USER9$ to 59 + + equ SYSREP_TABLE_ASSOC_NAME$ to 'TABLE_ASSOC' + equ SYSREP_COLUMN_ASSOC_NAME$ to 'COLUMN_ASSOC' + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/SYSTABLE_NAMES.txt b/SYSPROG/STPROCINS/SYSTABLE_NAMES.txt new file mode 100644 index 0000000..6c3a4bb --- /dev/null +++ b/SYSPROG/STPROCINS/SYSTABLE_NAMES.txt @@ -0,0 +1,117 @@ +compile insert SYSTABLE_NAMES +/* + ** Copyright (C) 1992-2018 Revelation Software Inc. All Rights Reserved ** + + Author : ???? + Date : ???? + Purpose : Constants for system table names + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + Mr C 08 Aug 18 Added sys tabes for v10.0.4 + Don't forget SYSCOMMODULES! + BZS 08 Dec 17 Added VOC + Mr C 15 Nov 17 Added SYSREPOSOLECONTROLS, SYSREPOSTOOLBARS + Mr C 10 Oct 17 Added header guards +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _SYSTABLE_NAMES_ +#define _SYSTABLE_NAMES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + equ SYSDICT_FILE$ to "SYSDICT" + equ SYSENV_FILE$ to "SYSENV" + equ SYSLISTS_FILE$ to "SYSLISTS" + equ SYSLOGINS_FILE$ to "SYSLOGINS" + equ SYSOBJ_FILE$ to "SYSOBJ" + equ SYSPROCS_FILE$ to "SYSPROCS" + equ SYSPTRS_FILE$ to "SYSPTRS" + equ SYSTABLES_FILE$ to "SYSTABLES" + equ SYSVIEWS_FILE$ to "SYSVIEWS" + equ SYSVOLUMES_FILE$ to "SYSVOLUMES" + equ SYSTYPES_FILE$ to "SYSTYPES" + equ SYSTYPEMAPS_FILE$ to "SYSTYPEMAPS" + equ SYSPROCINDEX_FILE$ to "SYSPROCINDEX" + equ SYSCOLUMNS_FILE$ to "SYSCOLUMNS" + equ ACCESSIBLE_COLUMNS$ to "ACCESSIBLE_COLUMNS" + equ SYSLHGROUP_FILE$ to "SYSLHGROUP" + equ SYSLHVERIFY_FILE$ to "SYSLHVERIFY" + equ IMPORTEXPORT_FILE$ to "IMPORTEXPORT" + equ OSFILE$ to "WINDOWS" + equ LOGFILE$ to "LOG" + + equ SYSREPOS_FILE$ to "SYSREPOS" + equ SYSREPOS_TEMP_FILE$ to "SYSREPOS_TEMP" + equ SYSREPOSTYPES_FILE$ to "SYSREPOSTYPES" + equ SYSAPPS_FILE$ to "SYSAPPS" + equ SYSREPOSLOCKS_FILE$ to "SYSREPOSLOCKS" + equ SYSREPOSLOG_FILE$ to "SYSREPOSLOG" + equ SYSREPOSWINS_FILE$ to "SYSREPOSWINS" + equ SYSREPOSWINEXES_FILE$ to "SYSREPOSWINEXES" + equ SYSREPOSEVENTS_FILE$ to "SYSREPOSEVENTS" + equ SYSREPOSEVENTEXES_FILE$ to "SYSREPOSEVENTEXES" + equ SYSREPOSCLASSES_FILE$ to "SYSREPOSCLASSES" + equ SYSREPOSPOPUPS_FILE$ to "SYSREPOSPOPUPS" + equ SYSREPOSMESSAGES_FILE$ to "SYSREPOSMESSAGES" + equ SYSREPOSAPPNOTES_FILE$ to "SYSREPOSAPPNOTES" + equ SYSREPOSREPORTS_FILE$ to "SYSREPOSREPORTS" + equ SYSREPOSRELEASES_FILE$ to "SYSREPOSRELEASES" + equ SYSREPOSVIEWS_FILE$ to "SYSREPOSVIEWS" + equ SYSREPOSSTORAGE_FILE$ to "SYSREPOSSTORAGE" + equ SYSREPOSTYPEFAMILIES_FILE$ to "SYSREPOSTYPEFAMILIES" + equ SYSTEMPFILE$ to "SYSTEMP" + equ SYSREPOSDATASOURCES_FILE$ to "SYSREPOSDATASOURCES" + equ SYSREPOSDBCOMPONENTS_FILE$ to "SYSREPOSDBCOMPONENTS" + equ SYSREPOSDBCOMPONENTEXES_FILE$ to "SYSREPOSDBCOMPONENTEXES" + equ SYSREPOSXML_FILE$ to "SYSREPOSXML" + equ SYSREPOSLANGUAGE_FILE$ to "SYSREPOSLANGUAGE" + equ SYSREPOSMENUCONTEXT_FILE$ to 'SYSREPOSMENUCONTEXT' + equ SYSCODETEMPLATES_FILE$ to 'SYSCODETEMPLATES' + equ SYSREPOSOLECONTROLS_FILE$ to "SYSREPOSOLECONTROLS" + equ SYSREPOSTOOLBARS_FILE$ to "SYSREPOSTOOLBARS" + equ SYSAUTHLOG_FILE$ to "SYSAUTHLOG" + equ SYSTASKS_FILE$ to "SYSTASKS" + equ SYSU2PROCS_FILE$ to "SYSU2PROCS" + equ SYSUSERS_FILE$ to "SYSUSERS" + equ SYSVOC_FILE$ to "SYSVOC" + equ SYSCOMMODULES_FILE$ to "SYSCOMMODULES" + + equ AVERYLABELS_FILE$ to 'AVERY_LABELS' + equ CUSTOMLABELS_FILE$ to 'CUSTOM_LABELS' + equ LOG_FILE$ to 'LOG' + equ U2_CODES_FILE$ to 'U2_CODES' + equ PRECOMPILED_FILE$ to 'OI_PRECOMPILED_CODE' + equ MD_MASTER_FILE$ to 'MD_MASTER' + equ MD_FILE$ to 'MD' + Equ VOC_FILE$ To "VOC" + + * MTR 12-6-06 FOR aREV32 + equ DEFAULTSYSALIASFILE$ to "SYSALIAS" + equ SYSALIASESFILE$ to "SYSALIASES" + equ SYSPOPUPSFILE$ to "SYSPOPUPS" + equ SYSPOPUPSFILESTAR$ to "SYSPOPUPS*" + equ SYSCOLUMNSFILE$ to "SYSCOLUMNS" + equ SYSPRINTERSFILE$ to "SYSPRINTERS" + equ SYSWINDOWSFILE$ to "SYSWINDOWS" + equ SYSTEXTFILE$ to "SYSTEXT" + equ SYSCONFIGUREFILE$ to "SYSENV" + equ MESSAGESFILE$ to "MESSAGES" + equ SYSMESSAGESFILE$ to "SYSMESSAGES" + equ IMPORTEXPORTFILE$ to "IMPORTEXPORT" + equ BATCHUPDATEFILE$ to "BATCHUPDATE" + equ DICTBATCHUPDATEFILE$ to "DICT.BATCHUPDATE" + equ DICTIMPORTEXPORTFILE$ to "DICT.IMPORTEXPORT" + equ SYSWINDOWSFILEAT$ to "@SYSWINDOWS@" + equ WINDOWSFILE$ to "WINDOWS" + equ REPORTSFILE$ to "REPORTS" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/SYSTEM_METRIC_EQUATES.txt b/SYSPROG/STPROCINS/SYSTEM_METRIC_EQUATES.txt new file mode 100644 index 0000000..b2c6acb --- /dev/null +++ b/SYSPROG/STPROCINS/SYSTEM_METRIC_EQUATES.txt @@ -0,0 +1,96 @@ +compile insert system_Metric_Equates +/* + Author Mr C, Sprezzatura + Date May 2002 + Purpose Equates for use with the System Metric API functions + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ + declare function getSystemMetrics + + equ SM_CXSCREEN$ to 0 + equ SM_CYSCREEN$ to 1 + equ SM_CXVSCROLL$ to 2 + equ SM_CYHSCROLL$ to 3 + equ SM_CYCAPTION$ to 4 + equ SM_CXBORDER$ to 5 + equ SM_CYBORDER$ to 6 + equ SM_CXDLGFRAME$ to 7 + equ SM_CYDLGFRAME$ to 8 + equ SM_CYVTHUMB$ to 9 + equ SM_CXHTHUMB$ to 10 + equ SM_CXICON$ to 11 + equ SM_CYICON$ to 12 + equ SM_CXCURSOR$ to 13 + equ SM_CYCURSOR$ to 14 + equ SM_CYMENU$ to 15 + equ SM_CXFULLSCREEN$ to 0x10 + equ SM_CYFULLSCREEN$ to 17 + equ SM_CYKANJIWINDOW$ to 18 + equ SM_MOUSEPRESENT$ to 19 + equ SM_CYVSCROLL$ to 20 + equ SM_CXHSCROLL$ to 21 + equ SM_DEBUG$ to 22 + equ SM_SWAPBUTTON$ to 23 + equ SM_RESERVED1$ to 24 + equ SM_RESERVED2$ to 25 + equ SM_RESERVED3$ to 26 + equ SM_RESERVED4$ to 27 + equ SM_CXMIN$ to 28 + equ SM_CYMIN$ to 29 + equ SM_CXSIZE$ to 30 + equ SM_CYSIZE$ to 31 + equ SM_CXFRAME$ to 0x20 + equ SM_CYFRAME$ to 33 + equ SM_CXMINTRACK$ to 34 + equ SM_CYMINTRACK$ to 35 + equ SM_CXDOUBLECLK$ to 36 + equ SM_CYDOUBLECLK$ to 37 + equ SM_CXICONSPACING$ to 38 + equ SM_CYICONSPACING$ to 39 + equ SM_MENUDROPALIGNMENT$ to 40 + equ SM_PENWINDOWS$ to 41 + equ SM_DBCSENABLED$ to 42 + equ SM_CMOUSEBUTTONS$ to 43 + + equ SM_CXFIXEDFRAME$ to SM_CXDLGFRAME$ + equ SM_CYFIXEDFRAME$ to SM_CYDLGFRAME$ + equ SM_CXSIZEFRAME$ to SM_CXFRAME$ + equ SM_CYSIZEFRAME$ to SM_CYFRAME$ + + equ SM_SECURE$ to 44 + equ SM_CXEDGE$ to 45 + equ SM_CYEDGE$ to 46 + equ SM_CXMINSPACING$ to 47 + equ SM_CYMINSPACING$ to 48 + equ SM_CXSMICON$ to 49 + equ SM_CYSMICON$ to 50 + equ SM_CYSMCAPTION$ to 51 + equ SM_CXSMSIZE$ to 52 + equ SM_CYSMSIZE$ to 53 + equ SM_CXMENUSIZE$ to 54 + equ SM_CYMENUSIZE$ to 55 + equ SM_ARRANGE$ to 56 + equ SM_CXMINIMIZED$ to 57 + equ SM_CYMINIMIZED$ to 58 + equ SM_CXMAXTRACK$ to 59 + equ SM_CYMAXTRACK$ to 60 + equ SM_CXMAXIMIZED$ to 61 + equ SM_CYMAXIMIZED$ to 62 + equ SM_NETWORK$ to 63 + equ SM_CLEANBOOT$ to 67 + equ SM_CXDRAG$ to 68 + equ SM_CYDRAG$ to 69 + equ SM_SHOWSOUNDS$ to 70 + equ SM_CXMENUCHECK$ to 71 ; * // Use instead of GetMenuCheckMarkDimensions()! + equ SM_CYMENUCHECK$ to 72 + equ SM_SLOWMACHINE$ to 73 + equ SM_MIDEASTENABLED$ to 74 + equ SM_MOUSEWHEELPRESENT$ to 75 + equ SM_CMETRICS$ to 76 diff --git a/SYSPROG/STPROCINS/TABLE_TYPE_EQUATES.txt b/SYSPROG/STPROCINS/TABLE_TYPE_EQUATES.txt new file mode 100644 index 0000000..80409cd --- /dev/null +++ b/SYSPROG/STPROCINS/TABLE_TYPE_EQUATES.txt @@ -0,0 +1,21 @@ +compile insert Table_Type_Equates + +* GET_TABLE_TYPE return value list: + +EQU GTT_NOT_FOUND$ TO 0 +EQU GTT_LH$ TO 1 +EQU GTT_MEMRES$ TO 2 +EQU GTT_REVG2B$ TO 3 +EQU GTT_AREVROS$ TO 4 +EQU GTT_SYSCOLS$ TO 5 +EQU GTT_MSSQL$ TO 6 +EQU GTT_PI_OPEN$ TO 7 +EQU GTT_ORACLE$ TO 8 +EQU GTT_DBASE2$ TO 9 +EQU GTT_ASCII$ TO 10 +EQU GTT_DBASE3$ TO 11 + +EQU GTT_LASTKNOWN$ TO 11 +EQU GTT_UNKNOWN$ TO 999 + +* Source Date: 14:55:47 03 JAN 1994 Build ID: OI*2.01.17 Level: 2.01 diff --git a/SYSPROG/STPROCINS/TOOLBAR_EQUATES.txt b/SYSPROG/STPROCINS/TOOLBAR_EQUATES.txt new file mode 100644 index 0000000..cd74ff1 --- /dev/null +++ b/SYSPROG/STPROCINS/TOOLBAR_EQUATES.txt @@ -0,0 +1,77 @@ +compile insert toolBar_Equates +/* + ** Copyright (C) 1992-2018 Revelation Software Inc. All Rights Reserved ** + + Author : MTR + Date : February 2018 + Purpose : Constants for use with TOOLBAR entities + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _TOOLBAR_EQUATES_ +#define _TOOLBAR_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + $insert ps_Window_equates + $insert colors + $insert logical + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + // SYSREPOSTOOLBARS table layout + equ TLBR_APPID$ to 0 ; // Key 1 + equ TLBR_CLASSID$ to 0 ; // Key 2 + equ TLBR_ENTITYID$ to 0 ; // Key 3 + + // Buttons AMV + equ TLBR_BTN_ID$ to 1 + equ TLBR_BTN_TEXT$ to 2 + equ TLBR_BTN_IMAGELIST_INDEX$ to 3 + equ TLBR_BTN_IMAGE$ to 4 + equ TLBR_BTN_AUTOSIZE$ to 5 + equ TLBR_BTN_VISIBLE$ to 6 + equ TLBR_BTN_ENABLED$ to 7 + equ TLBR_BTN_TOOLTIP_TEXT$ to 8 + equ TLBR_BTN_BUTTONTYPE$ to 9 + + equ TLBR_BUTTONPADDING$ to 10 + equ TLBR_BUTTONSIZE$ to 11 + equ TLBR_BUTTONSPACING$ to 12 + equ TLBR_LISTSTYLE$ to 13 + equ TLBR_WRAPPABLE$ to 14 + equ TLBR_SHOWDROPDOWNARROWS$ to 15 + equ TLBR_IMAGELIST$ to 16 + + + equ TLBR_BTNTYPE_PUSHBUTTON$ to 0 + equ TLBR_BTNTYPE_CHECKBUTTON$ to 1 + equ TLBR_BTNTYPE_DROPDOWN$ to 2 + equ TLBR_BTNTYPE_SPLITBUTTON$ to 3 + equ TLBR_BTNTYPE_GROUPED$ to 4 + equ TLBR_BTNTYPE_SEPARATOR$ to 5 + + // Property Panel Names + equ PPL_BTNPADDING$ to "Button Padding" + equ PPL_BTNSIZE$ to "Button Size" + equ PPL_BTNSPACING$ to "Button Spacing" + equ PPL_WRAPPABLE$ to "Wrappable" + equ PPL_LISTSTYLE$ to "Show Text and Image" + equ PPL_SHOWARROWS$ to "Show DropDown Arrows" + equ PPL_IMAGELIST$ to "Imagelist" + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/TRANSACT_CONSTANTS.txt b/SYSPROG/STPROCINS/TRANSACT_CONSTANTS.txt new file mode 100644 index 0000000..6acb0e1 --- /dev/null +++ b/SYSPROG/STPROCINS/TRANSACT_CONSTANTS.txt @@ -0,0 +1,131 @@ +Compile Insert Transact_Constants +* +* CONSTANTS FILE FOR THE SQL TRANSACTION CONTROL PROCEDURES +* +* 03-20-2015 rjc Copied In From Rev_BP + +* TRANSACT function - miscellaneous equates +* +EQU OFF$ TO 0 +EQU ON$ TO 1 + +* Names of the SQL transaction files +* +EQU COMMIT_FILE_NAME$ TO "REVCOMMITLOG" ;* Prefix for the Commit Log (CL) +EQU TRANS_FILE_NAME$ TO "REVTF_" ;* Prefix of the transaction files (TF) +EQU TRANS_LOG_NAME$ TO "REVTL_" ;* Prefix of transaction log (TL) + +* Smart filing system equates for transactions +* +EQU SMART_FS_INDEX$ TO 0 ;* Smart filing system no trans file needed +* +* Record prefix in the commit log +* +EQU MACHINE_NAME_ENTRY$ TO "%ID%" ;* Prefix of record name for machine entry in commit log + +* Transaction File Codes - 1st character of the record +* +EQU DELETE_CODE$ TO 'D' ;* Signifies DELETE in transaction file +EQU CLEAR_CODE$ TO 'C' ;* '' CLEARFILE '' '' +EQU WRITE_CODE$ TO 'W' ;* This code is either an UPDATE or INSERT +EQU DELETE_RECORD$ TO '%%DELETEMASK%%' ;* This record contains values + * which are used in SQL_DISTINCT. + +* Field numbers for the TRANS.INFO@ variable and DEADLOCK log record +* +EQU TRANS.INFO.TIME$ TO 1 ;* Start time of transaction +EQU TRANS.INFO.DATE$ TO 2 ;* Start date of transaction. +EQU TRANS.INFO.ACTIVITY$ TO 3 ;* Read/Write activity field. +EQU TRANS.INFO.MASK$ TO 4 ;* Contains the file name whose delete mask is in use +EQU STATION.NAMES$ TO 4 ;* Stations which are in contention +EQU READ.VALUE$ TO 1 ;* Activity value of Read Statement +EQU WRITE.VALUE$ TO 3 ;* Activity value of Write/Delete Statement +EQU CLEAR.VALUE$ TO 5 ;* Activity value of Clearfile Statement + +* Constants which pertain to locking and deadlock detection +* +EQU SHARED_LOCK_MARK$ TO 2 ;* This mark indicates a shared lock record in the lock file +EQU EXCL_LOCK_MARK$ TO 1 ;* This mark indicates an exclusive lock record in the lock file +EQU FILE_LOCK_MARK$ TO 1 ;* This mark indicates a file lock +EQU REC_LOCK_MARK$ TO 2 ;* This mark indicates a record lock +EQU TRANS_LOCK_NAME$ TO "SQL_LF." ;* Prefix for a lock file (LF) +EQU DEADLOCK_FILE_NAME$ TO "SQL_DF" ;* Name of centralized deadlock file (DL) +EQU VICTIM_YOUNGEST$ TO 0 ;* Selects the youngest as a victim +EQU VICTIM_ACTIVITY$ TO 1 ;* Selects the transaction with lowest activity +EQU UPDATE_RECORD$ TO "%%SQL_UPGRADE_LOCK%%" ;* Record name when upgrading + * shared lock to table lock. +EQU SEMA_LOCK_NAME$ TO "SEMAPHORE" ;* Pseudo-file handle for a semaphore lock + + +* TRANSACT function - parameter values for the ACTION parameter +* +EQU ROLLBACK$ TO 0 +EQU COMMIT$ TO 1 +EQU BEGIN_TRANSACTION$ TO 2 +EQU RESTART$ TO 3 +EQU RESTART_SUPPRESS$ TO 4 ;* This will suppress all STATUP on-screen messages +EQU ROLLBACK_SUPPRESS$ TO 5 ;* This will suppress all STATUP on-screen messages +EQU COMMIT_SUPPRESS$ TO 6 ;* '' '' '' '' +EQU SET_TRANS$ TO 7 ;* Parameters passed in SQLSTATE + +* Locking functions - parameter values for the OPERATION parameter +* +EQU OP_MODIFY$ TO 0 ;* This statement is changing data +EQU OP_SELECT$ TO 1 ;* This statement is only querying data + +* Equates for the different consistency levels +* +EQU CL_4$ TO 4 ;* 4 defined under the SQL2 standards +EQU CL_3$ TO 3 ;* 3 releases shared locks early (at post-query/op time) +EQU CL_2$ TO 2 ;* 2 defined under the SQL2 standards +EQU CL_1$ TO 1 ;* 1 like 0, but locking for update is performed (the + * lock is released at post-query/op time). +EQU CL_0$ TO 0 ;* 0 defined under SQL2 standards except ROLLBACK and + * COMMIT operations are not functional and NO locking is + * performed. + +* FILE.NAMES@ variable +EQU FILE_NAME$ TO 1 ;* List of filenames is first field +EQU CLEAR_FILE$ TO 2 ;* List of associated clear file marks is the second +EQU DELETE_FLAG$ TO 3 ;* A flag which marks a file has had deletions. +EQU VOLUME_NAME$ TO 4 ;* Volume where the file exists - used for Restart +EQU SMART_VOLUMES$ TO 5 ;* Ordered list of smart AFS's which contain their + * own transaction control. Ordering based on + * intelligence - Most intelligent are first. + +* LOCK_INFO@ variable +* +EQU TOTAL$ TO 1 ;* Total lock counts for file/record & impl/expl locks +EQU FILE_NAMES$ TO 2 ;* Lock file names +EQU FILE_LOCKS$ TO 3 ;* List of codes for shared or file locks +EQU FILE_LOCK_TYPES$ TO 4 ;* Mode of the lock +EQU REC_KEYS$ TO 5 ;* List of keys for record locks +EQU REC_LOCKS$ TO 6 ;* Type of record lock used +EQU REC_LOCK_TYPES$ TO 7 ;* Mode of this record lock + +* LOCK_INFO@ variable - lock types for FILE_LOCK_TYPES$ and REC_LOCK_TYPES$ +* +EQU LOCK_TYPE_EXPL$ TO 0 ;* Explicit lock type +EQU LOCK_TYPE_BUMP$ TO 1 ;* Explicit lock type which has been bumped - the + * unlock will be delayed until commit time. +EQU LOCK_TYPE_IMPL$ TO 2 ;* Implicit lock type + +* Possible values for the TRANS.CONTROL@ variable +* +EQU TRANS_OFF$ TO 0 ;* Transaction is turned off +EQU TRANS_ON$ TO 1 ;* Transaction is turned on +EQU TRANS_ACTIVE$ TO 2 ;* Transaction is active + +* Equates for the INSERT_LIST_DATA@ variable +* +EQU SELECT_RN_DATA$ TO 1 ;* This is the first field of this variable +EQU KEY_LIST_DATA$ TO 2 ;* This is the second field of this variable + +* Subfields of the SELECT_RN_DATA$ field of the INSERT_LIST_DATA@ var +* +EQU TOTAL_LISTS$ TO 1 ;* Total number of lists (on disk & in memory) +EQU LISTS_PROCESSED$ TO 2 ;* Total number of lists processed by READNEXT + +EQU MAX_INSERT_LIST_LEN$ TO 55000 ;* Maximum size of total list +EQU MAX_FILE_LIST_LEN$ TO 6 ;* Max size of a list per file +* Source Date: 16:42:32 12 JAN 1993 Build ID: OI*1.0.10 Level: 2.0 diff --git a/SYSPROG/STPROCINS/UIRES_EQUATES.txt b/SYSPROG/STPROCINS/UIRES_EQUATES.txt new file mode 100644 index 0000000..9e9a3c8 --- /dev/null +++ b/SYSPROG/STPROCINS/UIRES_EQUATES.txt @@ -0,0 +1,254 @@ +compile insert UIRes_Equates +/* + user interface equates + + Amended Date Reason + ======= ==== ====== + Mr C 18 Dec 20 Added UIRES_QBFNOQUERYDATA$ + Mr C 09 Sep 16 Fixed UIRES_POPUPNOSTRUCT - missing "$" + Mr C 28 Oct 15 Added UIRES_POPUPNOSTRUCT, UIRES_POPUPEMPTY$, header guards +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _UIRES_EQUATES_ +#define _UIRES_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + +declare function ResToString + +EQU SYSRES_PREFIX_UI$ TO 'UI' +EQU UIRES_SYSTEM$ TO 'SYSTEM' + +EQU UIRES_COLNOVERIFIED$ TO SYSRES_PREFIX_UI$ : 100 +EQU UIRES_FIELDNOTSEL$ TO SYSRES_PREFIX_UI$ : 101 +EQU UIRES_COLNOTSEL$ TO SYSRES_PREFIX_UI$ : 102 +EQU UIRES_COLDNEINDS$ TO SYSRES_PREFIX_UI$ : 103 +EQU UIRES_COLIDNOTNUM$ TO SYSRES_PREFIX_UI$ : 104 +EQU UIRES_INVALIDRETTYPE$ TO SYSRES_PREFIX_UI$ : 105 +EQU UIRES_NEW$ TO SYSRES_PREFIX_UI$ : 106 +EQU UIRES_OPEN$ TO SYSRES_PREFIX_UI$ : 107 +EQU UIRES_SAVEAS$ TO SYSRES_PREFIX_UI$ : 108 +EQU UIRES_SAVETHISAS$ TO SYSRES_PREFIX_UI$ : 108 +EQU UIRES_OPENTHIS$ TO SYSRES_PREFIX_UI$ : 109 +EQU UIRES_THISNAME$ TO SYSRES_PREFIX_UI$ : 110 +EQU UIRES_INVALIDCOLNAME$ TO SYSRES_PREFIX_UI$ : 111 +EQU UIRES_VALIDERROR$ TO SYSRES_PREFIX_UI$ : 112 +EQU UIRES_INVALIDDATATYPE$ TO SYSRES_PREFIX_UI$ : 113 +EQU UIRES_SCALELIMITS$ TO SYSRES_PREFIX_UI$ : 114 +EQU UIRES_PRECISIONLIMITS$ TO SYSRES_PREFIX_UI$ : 115 +EQU UIRES_CLEARDATASET$ TO SYSRES_PREFIX_UI$ : 116 +EQU UIRES_CLICKFOROPTIONS$ TO SYSRES_PREFIX_UI$ : 117 +EQU UIRES_NATIVETYPE$ TO SYSRES_PREFIX_UI$ : 118 +EQU UIRES_OITYPE$ TO SYSRES_PREFIX_UI$ : 119 +EQU UIRES_TABLELISTERROR$ TO SYSRES_PREFIX_UI$ : 120 +EQU UIRES_TRANSACTNOSAVE$ TO SYSRES_PREFIX_UI$ : 121 +EQU UIRES_ROWSPROCESSED$ TO SYSRES_PREFIX_UI$ : 122 +EQU UIRES_NOOPTIONS$ TO SYSRES_PREFIX_UI$ : 123 +EQU UIRES_XOCOLHEADINGS$ TO SYSRES_PREFIX_UI$ : 124 +EQU UIRES_OBJECTSPROCESSED$ TO SYSRES_PREFIX_UI$ : 125 +EQU UIRES_CONFIGERROR$ TO SYSRES_PREFIX_UI$ : 126 +EQU UIRES_NOTCONFIGURED$ TO SYSRES_PREFIX_UI$ : 127 +EQU UIRES_UNABLETOCONNECT$ TO SYSRES_PREFIX_UI$ : 128 +EQU UIRES_UNABLETOSAVEDFLTS$ TO SYSRES_PREFIX_UI$ : 129 +EQU UIRES_APPLYSETTINGS$ TO SYSRES_PREFIX_UI$ : 130 +EQU UIRES_UPDATESETTINGS$ TO SYSRES_PREFIX_UI$ : 131 +EQU UIRES_DEFAULTSREADERROR$ TO SYSRES_PREFIX_UI$ : 132 +EQU UIRES_ERROR$ TO SYSRES_PREFIX_UI$ : 133 +EQU UIRES_YES$ TO SYSRES_PREFIX_UI$ : 140 +EQU UIRES_NO$ TO SYSRES_PREFIX_UI$ : 141 +EQU UIRES_CANCEL$ TO SYSRES_PREFIX_UI$ : 142 +EQU UIRES_OK$ TO SYSRES_PREFIX_UI$ : 143 +EQU UIRES_MESSAGE$ TO SYSRES_PREFIX_UI$ : 144 +EQU UIRES_OUTOFMEMORY$ TO SYSRES_PREFIX_UI$ : 145 +EQU UIRES_THISINPUTDOESNOTPASSCRIT$ TO SYSRES_PREFIX_UI$ : 146 +EQU UIRES_INPUTVALIDATIONERROR$ TO SYSRES_PREFIX_UI$ : 147 +EQU UIRES_TEXTFIELDCANNOTHAVETM$ TO SYSRES_PREFIX_UI$ : 148 +EQU UIRES_NOTESDBANDFORMS$ TO SYSRES_PREFIX_UI$ : 149 +EQU UIRES_NOTESDBANDVIEWS$ TO SYSRES_PREFIX_UI$ : 150 +EQU UIRES_REGDBANDVIEWS$ TO SYSRES_PREFIX_UI$ : 151 +EQU UIRES_REGDBANDFORMS$ TO SYSRES_PREFIX_UI$ : 152 +EQU UIRES_DEFAULT$ TO SYSRES_PREFIX_UI$ : 153 +EQU UIRES_SEQCOUNTERISEMPTY$ TO SYSRES_PREFIX_UI$ : 154 +EQU UIRES_ONEITEMINBROWSELIST$ TO SYSRES_PREFIX_UI$ : 155 +EQU UIRES_SELECTITEMTOVIEW$ TO SYSRES_PREFIX_UI$ : 156 +EQU UIRES_CLEARBROWSELIST$ TO SYSRES_PREFIX_UI$ : 157 +EQU UIRES_DELDISPLAYEDNOTE$ TO SYSRES_PREFIX_UI$ : 158 +EQU UIRES_NONOTESINBROWSELIST$ TO SYSRES_PREFIX_UI$ : 159 +EQU UIRES_QBFITEMSELECT$ TO SYSRES_PREFIX_UI$ : 160 +EQU UIRES_QBFQUERYCRITERIA$ TO SYSRES_PREFIX_UI$ : 161 +EQU UIRES_QBFQUERYWARNING$ TO SYSRES_PREFIX_UI$ : 162 +EQU UIRES_QBFFULLUSETRUNCATEDLIST$ TO SYSRES_PREFIX_UI$ : 163 +EQU UIRES_CANNOTCANCELSQLPROCESS$ TO SYSRES_PREFIX_UI$ : 164 +EQU UIRES_SQLREADMESSAGE$ TO SYSRES_PREFIX_UI$ : 165 +EQU UIRES_DATAREQUIREDINTHISFIELD$ TO SYSRES_PREFIX_UI$ : 166 +EQU UIRES_QBFNOQUERYDATA$ TO SYSRES_PREFIX_UI$ : 167 +EQU UIRES_QBFPARSEERROR$ TO SYSRES_PREFIX_UI$ : 168 +EQU UIRES_QBFNORECORDSFOUND$ TO SYSRES_PREFIX_UI$ : 169 +EQU UIRES_POPUPNAME$ TO SYSRES_PREFIX_UI$ : 170 +EQU UIRES_ERRORREADINGPOPUP$ TO SYSRES_PREFIX_UI$ : 171 +EQU UIRES_ERRORWRITINGPOPUP$ TO SYSRES_PREFIX_UI$ : 172 +EQU UIRES_SAVEPOPUPCHANGES$ TO SYSRES_PREFIX_UI$ : 173 +EQU UIRES_CHANGESNOTPERMITTED$ TO SYSRES_PREFIX_UI$ : 174 +EQU UIRES_UNTITLED$ TO SYSRES_PREFIX_UI$ : 175 +EQU UIRES_RETURNVALUES$ TO SYSRES_PREFIX_UI$ : 176 +EQU UIRES_NORETURNVALUES$ TO SYSRES_PREFIX_UI$ : 177 +EQU UIRES_SPECIFYARGUMENT$ TO SYSRES_PREFIX_UI$ : 178 +EQU UIRES_ARGUMENT$ TO SYSRES_PREFIX_UI$ : 179 +EQU UIRES_POPUPNOTESDBDESC$ TO SYSRES_PREFIX_UI$ : 180 +EQU UIRES_POPUPDATASETDBDESC$ TO SYSRES_PREFIX_UI$ : 181 +EQU UIRES_POPUPLHDBKEYS$ TO SYSRES_PREFIX_UI$ : 182 +EQU UIRES_POPUPLHDBCURSOR$ TO SYSRES_PREFIX_UI$ : 183 +EQU UIRES_POPUPDESCLITERALDATA$ TO SYSRES_PREFIX_UI$ : 184 +EQU UIRES_POPUPMVLHDATA$ TO SYSRES_PREFIX_UI$ : 185 +EQU UIRES_POPUPSUBVALLHCOLDATA$ TO SYSRES_PREFIX_UI$ : 186 +EQU UIRES_POPUPSELECTLHTABLE$ TO SYSRES_PREFIX_UI$ : 187 +EQU UIRES_POPUPMODET$ TO SYSRES_PREFIX_UI$ : 188 +EQU UIRES_POPUPMODET_CONT$ TO SYSRES_PREFIX_UI$ : 189 +EQU UIRES_POPUPENTERLISTOFKEYS$ TO SYSRES_PREFIX_UI$ : 190 +EQU UIRES_POPUCURSORNUMBER$ TO SYSRES_PREFIX_UI$ : 191 +EQU UIRES_POPUPNOSTRUCT$ TO SYSRES_PREFIX_UI$ : 192 +EQU UIRES_POPUPEMPTY$ TO SYSRES_PREFIX_UI$ : 193 +EQU UIRES_QBFBADID$ TO SYSRES_PREFIX_UI$ : 194 +EQU UIRES_QBFLOADID$ TO SYSRES_PREFIX_UI$ : 195 +EQU UIRES_SELECTIDTOVIEW$ TO SYSRES_PREFIX_UI$ : 196 + +EQU UIRES_POPUPSELNOTESDOC$ TO SYSRES_PREFIX_UI$ : 200 +EQU UIRES_POPUPSELFORMULA$ TO SYSRES_PREFIX_UI$ : 201 +EQU UIRES_POPUPSELDATASETARG$ TO SYSRES_PREFIX_UI$ : 202 +EQU UIRES_POPUPARGUMENTS$ TO SYSRES_PREFIX_UI$ : 203 +EQU UIRES_POPUPSELROWSANDCOLUMNS$ TO SYSRES_PREFIX_UI$ : 204 +EQU UIRES_POPUPSELCRITERIA$ TO SYSRES_PREFIX_UI$ : 205 +EQU UIRES_POPUPTABLEROWSANDCOLS$ TO SYSRES_PREFIX_UI$ : 206 +EQU UIRES_POPUPLISTOFKEYS$ TO SYSRES_PREFIX_UI$ : 207 +EQU UIRES_POPUPCURSORTABLECOLS$ TO SYSRES_PREFIX_UI$ : 208 +EQU UIRES_POPUPCURSORNUMBER$ TO SYSRES_PREFIX_UI$ : 209 +EQU UIRES_POPUPENTERLITERALDATA$ TO SYSRES_PREFIX_UI$ : 210 +EQU UIRES_POPUPLITERALDATA$ TO SYSRES_PREFIX_UI$ : 211 +EQU UIRES_POPUPSELTABLEANDROW$ TO SYSRES_PREFIX_UI$ : 212 +EQU UIRES_POPUPROWID$ TO SYSRES_PREFIX_UI$ : 213 +EQU UIRES_POPUPROW$ TO SYSRES_PREFIX_UI$ : 214 +EQU UIRES_POPUPCOLUMN$ TO SYSRES_PREFIX_UI$ : 215 +EQU UIRES_POPUPSELROWCOLUMN$ TO SYSRES_PREFIX_UI$ : 216 +EQU UIRES_POPUPROWIDANDCOLUMN$ TO SYSRES_PREFIX_UI$ : 217 +EQU UIRES_POPUPINVALIDMODESELECTED$ TO SYSRES_PREFIX_UI$ : 218 +EQU UIRES_DATABASE$ TO SYSRES_PREFIX_UI$ : 219 +EQU UIRES_DATASET$ TO SYSRES_PREFIX_UI$ : 220 +EQU UIRES_TABLE$ TO SYSRES_PREFIX_UI$ : 221 +EQU UIRES_DOCID$ TO SYSRES_PREFIX_UI$ : 222 +EQU UIRES_DOCUMENTFIELD$ TO SYSRES_PREFIX_UI$ : 223 +EQU UIRES_ROWID$ TO SYSRES_PREFIX_UI$ : 224 +EQU UIRES_DATASETCOLUMN$ TO SYSRES_PREFIX_UI$ : 225 +EQU UIRES_TABLECOLUMN$ TO SYSRES_PREFIX_UI$ : 226 +EQU UIRES_COMPONENTFIELD$ TO SYSRES_PREFIX_UI$ : 227 +EQU UIRES_TABLENOTATTACHED$ TO SYSRES_PREFIX_UI$ : 228 +EQU UIRES_DBNOTREGISTERED$ TO SYSRES_PREFIX_UI$ : 229 +EQU UIRES_INTERNALCALERROR$ TO SYSRES_PREFIX_UI$ : 230 +EQU UIRES_REMOVESELECTEDITEMS$ TO SYSRES_PREFIX_UI$ : 231 +EQU UIRES_POPUPDESIGNERTITLE$ TO SYSRES_PREFIX_UI$ : 232 +EQU UIRES_DEFAULTARGUMENT$ TO SYSRES_PREFIX_UI$ : 233 +EQU UIRES_TRUNCATED$ TO SYSRES_PREFIX_UI$ : 234 +EQU UIRES_EMPTY$ TO SYSRES_PREFIX_UI$ : 235 +EQU UIRES_THISLOCKED$ TO SYSRES_PREFIX_UI$ : 236 +EQU UIRES_STOP$ TO SYSRES_PREFIX_UI$ : 237 + +EQU UIRES_RDKDEFLOCKED$ TO SYSRES_PREFIX_UI$ : 250 +EQU UIRES_DEPLOYDEF$ TO SYSRES_PREFIX_UI$ : 251 +EQU UIRES_RDKDEFSAVECHANGES$ TO SYSRES_PREFIX_UI$ : 252 +EQU UIRES_RDKREPVIEWEDIT$ TO SYSRES_PREFIX_UI$ : 253 +EQU UIRES_THISEXISTSOVERWRITE$ TO SYSRES_PREFIX_UI$ : 254 +EQU UIRES_RDKVIEWLOCKED$ TO SYSRES_PREFIX_UI$ : 255 +EQU UIRES_RDKVIEWSAVECHANGES$ TO SYSRES_PREFIX_UI$ : 256 +EQU UIRES_EXTRACTIONPATH$ TO SYSRES_PREFIX_UI$ : 257 +EQU UIRES_RDKTABLEOPTIONS$ TO SYSRES_PREFIX_UI$ : 258 +EQU UIRES_THISITEMDOESNOTEXIST$ TO SYSRES_PREFIX_UI$ : 259 +EQU UIRES_DELETETHISITEM$ TO SYSRES_PREFIX_UI$ : 260 +EQU UIRES_RDKGGLABELS$ TO SYSRES_PREFIX_UI$ : 261 +EQU UIRES_DIRDNECREATENOW$ TO SYSRES_PREFIX_UI$ : 262 +EQU UIRES_INITREPOSTABLES$ TO SYSRES_PREFIX_UI$ : 263 +EQU UIRES_CREATINGTHISREPOSTABLE$ TO SYSRES_PREFIX_UI$ : 264 +EQU UIRES_COPYINGTHISREPOSTABLE$ TO SYSRES_PREFIX_UI$ : 265 +EQU UIRES_COPYINGSYSROWSINTOTHIS$ TO SYSRES_PREFIX_UI$ : 266 +EQU UIRES_BUILDTARGETREPOSIX$ TO SYSRES_PREFIX_UI$ : 267 +EQU UIRES_CONTINUEFROMFAILUREPOINT$ TO SYSRES_PREFIX_UI$ : 268 +EQU UIRES_EXTRACTIONSUCEEDED$ TO SYSRES_PREFIX_UI$ : 269 +EQU UIRES_CREATINGTHISDBTABLE$ TO SYSRES_PREFIX_UI$ : 270 +EQU UIRES_COPYINGTHISDBTABLE$ TO SYSRES_PREFIX_UI$ : 271 +EQU UIRES_LOADINGTHISVIEW$ TO SYSRES_PREFIX_UI$ : 272 +EQU UIRES_EXTRACTINGTHIS$ TO SYSRES_PREFIX_UI$ : 273 +EQU UIRES_PREPARINGENTSTORAGE$ TO SYSRES_PREFIX_UI$ : 274 +EQU UIRES_DIRCONTAINSDATACANNOTWRITE$ TO SYSRES_PREFIX_UI$ : 275 +EQU UIRES_DELETERDKFILES$ TO SYSRES_PREFIX_UI$ : 276 +EQU UIRES_OPTIONS$ TO SYSRES_PREFIX_UI$ : 277 +EQU UIRES_RDKUSERDEFINED$ TO SYSRES_PREFIX_UI$ : 278 +EQU UIRES_RDKNONE$ TO SYSRES_PREFIX_UI$ : 279 +EQU UIRES_RDKALLPUBLISHABLE$ TO SYSRES_PREFIX_UI$ : 280 +EQU UIRES_RDKUNTITLED$ TO SYSRES_PREFIX_UI$ : 281 +EQU UIRES_RDKERRORPHASES$ TO SYSRES_PREFIX_UI$ : 282 +EQU UIRES_RDKRELEASETYPES$ TO SYSRES_PREFIX_UI$ : 283 +EQU UIRES_LISTTRUNCATEDFORLISTBOX$ TO SYSRES_PREFIX_UI$ : 284 +EQU UIRES_RDKNOENTITYSELFORALTERATION$ TO SYSRES_PREFIX_UI$ : 285 +EQU UIRES_PROGTEXT_BUILD_REPOSIX$ TO SYSRES_PREFIX_UI$ : 286 +EQU UIRES_PROGTEXT_BUILD_DBT$ TO SYSRES_PREFIX_UI$ : 287 +EQU UIRES_PROGTEXT_BUILD_APPDEF$ TO SYSRES_PREFIX_UI$ : 288 +EQU UIRES_PROGTEXT_BUILD_RELIX$ TO SYSRES_PREFIX_UI$ : 289 +EQU UIRES_PROGTEXT_SAVE_DEPLOYDEF$ TO SYSRES_PREFIX_UI$ : 290 +EQU UIRES_TABLEPROCESSING$ TO SYSRES_PREFIX_UI$ : 291 +EQU UIRES_EXTRACT$ TO SYSRES_PREFIX_UI$ : 292 +EQU UIRES_ITEM$ TO SYSRES_PREFIX_UI$ : 293 +EQU UIRES_ITEMTYPE$ TO SYSRES_PREFIX_UI$ : 294 +EQU UIRES_CSWSP_CHILDNAMES$ TO SYSRES_PREFIX_UI$ : 295 +EQU UIRES_ENTITYNAME$ TO SYSRES_PREFIX_UI$ : 296 +EQU UIRES_RDKALIASOPTIONS$ TO SYSRES_PREFIX_UI$ : 297 + +EQU UIRES_ABORT$ TO SYSRES_PREFIX_UI$ : 400 +EQU UIRES_RETRY$ TO SYSRES_PREFIX_UI$ : 401 +EQU UIRES_IGNORE$ TO SYSRES_PREFIX_UI$ : 402 +EQU UIRES_SAVEMSGCHANGES$ TO SYSRES_PREFIX_UI$ : 403 +EQU UIRES_HELP$ TO SYSRES_PREFIX_UI$ : 404 +EQU UIRES_SAVETHISTABLE$ TO SYSRES_PREFIX_UI$ : 405 +EQU UIRES_ERRORREADINGMSG$ TO SYSRES_PREFIX_UI$ : 406 +EQU UIRES_ERRORWRITINGMSG$ TO SYSRES_PREFIX_UI$ : 407 +EQU UIRES_UNABLETOLOCKTHISMSG$ TO SYSRES_PREFIX_UI$ : 408 +EQU UIRES_ESCCHARRETURNED$ TO SYSRES_PREFIX_UI$ : 409 +EQU UIRES_NULLRETURNED$ TO SYSRES_PREFIX_UI$ : 410 +EQU UIRES_THISDUPLICATENAMEFOUND$ TO SYSRES_PREFIX_UI$ : 411 +EQU UIRES_SAVEXOCHANGES$ TO SYSRES_PREFIX_UI$ : 412 +EQU UIRES_ERRORREADINGXO$ TO SYSRES_PREFIX_UI$ : 413 +EQU UIRES_ERRORWRITINGXO$ TO SYSRES_PREFIX_UI$ : 414 +EQU UIRES_UNABLETOLOCKTHISXO$ TO SYSRES_PREFIX_UI$ : 415 +EQU UIRES_XOQRYOBJECTTITLE$ TO SYSRES_PREFIX_UI$ : 416 +EQU UIRES_XOQRYOBJECTTYPES$ TO SYSRES_PREFIX_UI$ : 417 +EQU UIRES_XOQRYOBJSPROCESSED$ TO SYSRES_PREFIX_UI$ : 418 +EQU UIRES_XOQRYROWSPROCESSED$ TO SYSRES_PREFIX_UI$ : 419 +EQU UIRES_SAVEDSOCHANGES$ TO SYSRES_PREFIX_UI$ : 420 +EQU UIRES_ERRORREADINGDSO$ TO SYSRES_PREFIX_UI$ : 421 +EQU UIRES_ERRORWRITINGDSO$ TO SYSRES_PREFIX_UI$ : 422 +EQU UIRES_UNABLETOLOCKTHISDSO$ TO SYSRES_PREFIX_UI$ : 423 +EQU UIRES_NO_CON_DEF_FOR_TYPE$ TO SYSRES_PREFIX_UI$ : 424 +EQU UIRES_DS_COL_OPTIONS$ TO SYSRES_PREFIX_UI$ : 425 +EQU UIRES_XOCONNECTING$ TO SYSRES_PREFIX_UI$ : 426 +EQU UIRES_XODISCONNECTING$ TO SYSRES_PREFIX_UI$ : 427 +EQU UIRES_FINDTITLE$ TO SYSRES_PREFIX_UI$ : 428 +EQU UIRES_FINDFAILED$ TO SYSRES_PREFIX_UI$ : 429 +EQU UIRES_RETURNVALUE$ TO SYSRES_PREFIX_UI$ : 430 +EQU UIRES_SAVEHELPCHANGES$ TO SYSRES_PREFIX_UI$ : 431 +EQU UIRES_ERRORREADINGHELP$ TO SYSRES_PREFIX_UI$ : 432 +EQU UIRES_ERRORWRITINGHELP$ TO SYSRES_PREFIX_UI$ : 433 +EQU UIRES_UNABLETOLOCKTHISHELP$ TO SYSRES_PREFIX_UI$ : 434 +EQU UIRES_DEFAULTMSGDEF$ TO SYSRES_PREFIX_UI$ : 435 +EQU UIRES_DEFAULTPOPUPDEF$ TO SYSRES_PREFIX_UI$ : 436 + +EQU UIRES_GE_ENTNAME$ TO SYSRES_PREFIX_UI$ : 440 +EQU UIRES_GE_ENTLIST$ TO SYSRES_PREFIX_UI$ : 441 +EQU UIRES_GE_ITEMNAME$ TO SYSRES_PREFIX_UI$ : 442 +EQU UIRES_GE_ITEMLIST$ TO SYSRES_PREFIX_UI$ : 443 +EQU UIRES_GE_WARNINHERITCOPY$ TO SYSRES_PREFIX_UI$ : 444 +EQU UIRES_GE_ASKINHERITCOPY$ TO SYSRES_PREFIX_UI$ : 445 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + diff --git a/SYSPROG/STPROCINS/URLBFS_COMMON.txt b/SYSPROG/STPROCINS/URLBFS_COMMON.txt new file mode 100644 index 0000000..80357b8 --- /dev/null +++ b/SYSPROG/STPROCINS/URLBFS_COMMON.txt @@ -0,0 +1,6 @@ +compile insert URLBFS_COMMON +// Named common for URL BFS support +// (c) 2008 Revelation Software, Inc. All Rights Reserved + +common /URLBFS/ URL_WRITE_RESPONSE@ + diff --git a/SYSPROG/STPROCINS/USERIX.COMMON.txt b/SYSPROG/STPROCINS/USERIX.COMMON.txt new file mode 100644 index 0000000..aea0080 --- /dev/null +++ b/SYSPROG/STPROCINS/USERIX.COMMON.txt @@ -0,0 +1,4 @@ +COMPILE Insert USERIX.COMMON +COMMON /USERIX/ UIX.SM.FLAG, UIX.DCONV +* 02-23-2015 RJC COPIED From arev_bp +* Source Date: 17:16:45 16 FEB 1988 Build ID: AREV*1.0.2 Level: 2.0 diff --git a/SYSPROG/STPROCINS/USERREC_EQUATES.txt b/SYSPROG/STPROCINS/USERREC_EQUATES.txt new file mode 100644 index 0000000..cabc0e0 --- /dev/null +++ b/SYSPROG/STPROCINS/USERREC_EQUATES.txt @@ -0,0 +1,30 @@ +compile insert UserRec_equates + +***************************************************************************** +* +* Product : OI +* Poject : OI/RDK +* Release : 4.1.2 +* +* Name : UserRec_equates +* +* History (Date, Initials, Notes) +* 11/08/02 mtr New Insert for all UserRec pieces +* +***************************************************************************** + + +EQU USERREC_PREFIX$ TO "USR_" + +EQU USERREC_USERID$ TO 1 ;* Field 1 in the User Record +EQU USERREC_INFO$ TO 2 ;* Field 2 in the User Record + +EQU USERREC_ADMIN$ TO 1 ;* SUbValue 1 in Field 2 in the User Record +* MTR +EQU USERREC_EXPIRVAL$ TO 2 ;* SubValue 2 in Field 2 in the User Record +EQU USERREC_EXPIRDATE$ TO 3 ;* SUbValue 3 in Field 2 in the User Record + +EQU USERREC_PASSWORD$ TO 3 ;* Field 3 in the User Record + + +EQU PASSBLOCK_LEN$ TO 43 diff --git a/SYSPROG/STPROCINS/VIDEO_CONSTANTS.txt b/SYSPROG/STPROCINS/VIDEO_CONSTANTS.txt new file mode 100644 index 0000000..ac3c9e2 --- /dev/null +++ b/SYSPROG/STPROCINS/VIDEO_CONSTANTS.txt @@ -0,0 +1,58 @@ +compile insert VIDEO_CONSTANTS +/* + (c) Revelation Technologies, Inc. 1990 + + PROGRAM : vidctrl.h + AUTHOR : Ron Phillips + DATE : + PURPOSE : include file for vidctrl.c + + + REVISION HISTORY: + | Date | By | Description | + --------------------------------------------------------- + | | | | + + + THEORY: + +*/ + +/* define video types */ +EQU EGA25 TO 1 +EQU EGA43 TO 2 +EQU VGA25 TO 3 +EQU VGA43 TO 4 +EQU VGA50 TO 5 +EQU VGA14 TO 6 + +/* define functions */ +EQU INIT$ TO 0 +EQU SET$ TO 1 +EQU RESET$ TO 2 +EQU FLOAD$ TO 3 + +/* hardware types - returned by vcard.asm */ +EQU MDA_CARD$ TO 0 +EQU CGA_CARD$ TO 1 +EQU EGA_CARD$ TO 2 +EQU PGA_CARD$ TO 3 +EQU VGA_CARD$ TO 4 +EQU MCGA_CARD$ TO 5 +EQU WHOKNOWS_CARD$ TO 6 + +EQU VIDEOREC$ TO 'VIDEOCONFIG' +EQU VMODE$ TO 1 +EQU VNAME$ TO 2 +EQU VX$ TO 3 +EQU VY$ TO 4 +EQU CARD$ TO 5 + +EQU DEFAULTMODE$ TO 0 +EQU DEFAULTX$ TO 80 +EQU DEFAULTY$ TO 25 + +EQU POPUPREC$ TO 'VIDEO' +EQU BADMODE$ TO '850' +EQU BADMATCH$ TO '851' +* Source Date: 18:54:31 21 MAY 1992 Build ID: AREV*2.2.18 Level: 2.2 diff --git a/SYSPROG/STPROCINS/VK_CODES.txt b/SYSPROG/STPROCINS/VK_CODES.txt new file mode 100644 index 0000000..9cbf972 --- /dev/null +++ b/SYSPROG/STPROCINS/VK_CODES.txt @@ -0,0 +1,131 @@ +Compile Insert VK_Codes + +* mtr for new editor + + + +Equ VK_LBUTTON$ to 1 +Equ VK_RBUTTON$ to 2 +Equ VK_CANCEL$ to 3 +Equ VK_MBUTTON$ to 4 + +Equ VK_BACK$ to 8 +Equ VK_TAB$ to 9 + +Equ VK_CLEAR$ to 12 +Equ VK_RETURN$ to 13 + +Equ VK_SHIFT$ to 16 +Equ VK_CONTROL% to 17 +Equ VK_MENU$ to 18 +Equ VK_PAUSE$ to 19 +Equ VK_CAPITAL$ to 20 +Equ VK_CAPSLOCK$ to 20 + +Equ VK_KANA$ to 21 +Equ VK_HANGEUL$ to 21 +Equ VK_HANGUL$ to 21 +Equ VK_JUNJA$ to 23 +Equ VK_FINAL$ to 24 +Equ VK_HANJA$ to 25 +Equ VK_KANJI$ to 25 + +Equ VK_ESCAPE$ to 27 + +Equ VK_CONVERT$ to 28 +Equ VK_NONCONVERT$ to 29 +Equ VK_ACCEPT$ to 30 +Equ VK_MODECHANGE$ to 31 + +Equ VK_SPACE$ to 32 +Equ VK_PRIOR$ to 33 +Equ VK_NEXT$ to 34 +Equ VK_END$ to 35 +Equ VK_HOME$ to 36 +Equ VK_LEFT$ to 37 +Equ VK_UP$ to 38 +Equ VK_RIGHT$ to 39 +Equ VK_DOWN$ to 40 +Equ VK_SELECT$ to 41 +Equ VK_PRINT$ to 42 +Equ VK_EXECUTE$ to 43 +Equ VK_SNAPSHOT$ to 44 +Equ VK_INSERT$ to 45 +Equ VK_DELETE$ to 46 +Equ VK_HELP$ to 47 + +/* VK_0 thru VK_9 are the same as ASCII '0' thru '9' (0x30 - 0x39) */ +/* VK_A thru VK_Z are the same as ASCII 'A' thru 'Z' (0x41 - 0x5A) */ + +Equ VK_LWIN$ to 91 +Equ VK_RWIN$ to 92 +Equ VK_APPS$ to 93 + +Equ VK_NUMPAD0$ to 96 +Equ VK_NUMPAD1$ to 97 +Equ VK_NUMPAD2$ to 98 +Equ VK_NUMPAD3$ to 99 +Equ VK_NUMPAD4$ to 100 +Equ VK_NUMPAD5$ to 101 +Equ VK_NUMPAD6$ to 102 +Equ VK_NUMPAD7$ to 103 +Equ VK_NUMPAD8$ to 104 +Equ VK_NUMPAD9$ to 105 +Equ VK_MULTIPLY$ to 106 +Equ VK_ADD$ to 107 +Equ VK_SEPARATOR$ to 108 +Equ VK_SUBTRACT$ to 109 +Equ VK_DECIMAL$ to 110 +Equ VK_DIVIDE$ to 111 +Equ VK_F1$ to 112 +Equ VK_F2$ to 113 +Equ VK_F3$ to 114 +Equ VK_F4$ to 115 +Equ VK_F5$ to 116 +Equ VK_F6$ to 117 +Equ VK_F7$ to 118 +Equ VK_F8$ to 119 +Equ VK_F9$ to 120 +Equ VK_F10$ to 121 +Equ VK_F11$ to 122 +Equ VK_F12$ to 123 +Equ VK_F13$ to 124 +Equ VK_F14$ to 125 +Equ VK_F15$ to 126 +Equ VK_F16$ to 127 +Equ VK_F17$ to 128 +Equ VK_F18$ to 129 +Equ VK_F19$ to 130 +Equ VK_F20$ to 131 +Equ VK_F21$ to 132 +Equ VK_F22$ to 133 +Equ VK_F23$ to 134 +Equ VK_F24$ to 135 + +Equ VK_NUMLOCK$ to 144 +Equ VK_SCROLL$ to 145 + +/* + * VK_L* & VK_R* - left and right Alt, Ctrl and Shift virtual keys. + * Used only as parameters to GetAsyncKeyState() and GetKeyState(). + * No other API or message will distinguish left and right keys in this way. + */ +Equ VK_LSHIFT$ to 160 +Equ VK_RSHIFT$ to 161 +Equ VK_LCONTROL$ to 162 +Equ VK_RCONTROL$ to 163 +Equ VK_LMENU$ to 164 +Equ VK_RMENU$ to 165 + +Equ VK_PROCESSKEY$ to 229 + +Equ VK_ATTN$ to 246 +Equ VK_CRSEL$ to 247 +Equ VK_EXSEL$ to 248 +Equ VK_EREOF$ to 249 +Equ VK_PLAY$ to 250 +Equ VK_ZOOM$ to 251 +Equ VK_NONAME$ to 252 +Equ VK_PA1$ to 253 +Equ VK_OEM_CLEAR$ to 254 + diff --git a/SYSPROG/STPROCINS/VOL_TABLE_EQUATES.txt b/SYSPROG/STPROCINS/VOL_TABLE_EQUATES.txt new file mode 100644 index 0000000..40ada91 --- /dev/null +++ b/SYSPROG/STPROCINS/VOL_TABLE_EQUATES.txt @@ -0,0 +1,43 @@ +compile insert VOL_TABLE_EQUATES +/* + ** Copyright (C) 1992 - 2023 Revelation Software Inc. All Rights Reserved ** + + Amended Date Reason + ======= ==== ====== + Mr C 02 Feb 23 Added header guards + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#IFNDEF _VOL_TABLE_EQUATES_ +#DEFINE _VOL_TABLE_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * sysvolumes array element equates + * MTR added col_control + + equ VOL_NAME$ to 0 + equ VOL_LABEL$ to 1 + equ VOL_LOCATION$ to 2 + equ VOL_FILE_LIST$ to 3 + equ VOL_FILE_SYS$ to 4 + equ VOL_HANDLE$ to 5 + equ VOL_CONTROL$ to 6 + +/////////////////////////////////////////////////////////////////////////////// + + * systables array element equates + + equ TAB_NAME$ to 0 + equ TAB_VOL_NAME$ to 1 + equ TAB_REAL_NAME$ to 2 + equ TAB_ACCOUNT$ to 3 + equ TAB_FILE_SYS$ to 4 + equ TAB_HANDLE$ to 5 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/WINDOW.CONSTANTS.txt b/SYSPROG/STPROCINS/WINDOW.CONSTANTS.txt new file mode 100644 index 0000000..6b5fb76 --- /dev/null +++ b/SYSPROG/STPROCINS/WINDOW.CONSTANTS.txt @@ -0,0 +1,87 @@ +Compile Insert window.constants +* rjc 12-08-15 Import from Arev_bp +* W.ENV LAYOUT + +EQU NEXT.HELP.NO$ TO 1 +EQU VARY.TYPE$ TO 2 +EQU VARY.POS$ TO 3 +EQU PRESERVE.KEYS$ TO 4 +EQU PRESERVE.FIELDS$ TO 5 +EQU DFLT.MASK$ TO 6 +EQU BROWSE.OFF$ TO 8 + +* DISPLAY.ACTION DEFINITIONS + +EQU REDISPLAY.HIGHLIGHTS$ TO 4 +EQU REDISPLAY.PROMPTS$ TO 5 +EQU REDISPLAY.LIST$ TO 6 +EQU REDISPLAY.ALL$ TO 7 +EQU RECALC.PROMPTS$ TO 9 + +* WINDOW.ACTION DEFINITIONS + +EQU TOGGLE.TW.MODE$ TO 1 +EQU PRINT.BROWSE.LIST$ TO 2 +EQU MPR.MODE$ TO 12 +EQU PAN.MODE$ TO 4 +EQU MOVE.MODE$ TO 8 +EQU RESIZE.MODE$ TO 12 + +* PROMPT.TYPE DEFINITIONS + +EQU PT.FILE$ TO 1 +EQU PT.KEY$ TO 2 +EQU PT.SYMBOLIC$ TO 3 +EQU PT.DATA$ TO 4 + +* AMV.VARS DEFINITIONS + +EQU AMV.DISPLAY$ TO 1 +EQU AMV.WIDTH$ TO 2 +EQU AMV.DEPTH$ TO 3 +EQU AMV.MAX$ TO 4 +EQU AMV.LINER$ TO 5 + +* AMV.ACTION DEFINITIONS + +EQU AMV.CLEAR$ TO 1 +EQU AMV.DELETE$ TO 2 +EQU AMV.INSERT$ TO 3 +EQU AMV.CHANGED$ TO 4 +EQU AMV.CHANGED.ALL$ TO 5 + +* MODULE # PARAMETER TO JOINER() + +EQU READ.ALL.JOINS$ TO 1 +EQU CHANGE.JOIN$ TO 2 +EQU UNLOCK.JOIN$ TO 3 +EQU UPDATE.JOIN$ TO 4 +EQU DELETE.JOIN$ TO 5 +EQU INIT.JOIN$ TO 6 +EQU JOIN.COUNT$ TO 9 + +* PSEUDO.FILE LAYOUT + +EQU PSEUDO.SETUP$ TO 1 +EQU PSEUDO.SAVE$ TO 4 +EQU PSEUDO.EXIT$ TO 7 +*EQU PSEUDO.SET$ TO 8 (Removed to allow collector window to null pseudo.file) + +* FORMAT TYPE + +EQU TEXT TO 'T' +EQU NOFORMAT TO 'TN' + +* RESET VALUES + +EQU CLEAN.UP.LINE$ TO 1 +EQU CLEAN.UP.EDIT$ TO 2 +EQU RESET.EDIT$ TO 3 +EQU RESET.PROMPT$ TO 4 +EQU RESET.RECORD$ TO 5 +EQU RESET.WINDOW$ TO 6 + +* EXTRA KEY DEFINITIONS + +*EQU COPY.KEY$ TO \002E\ ;* 02/02/88 - DW - SPEC 111 USED IN WIN.INT +* Source Date: 13:11:06 28 JUL 1992 Build ID: AREV*2.2.58 Level: 2.2 diff --git a/SYSPROG/STPROCINS/WINDOW.POINTERS.txt b/SYSPROG/STPROCINS/WINDOW.POINTERS.txt new file mode 100644 index 0000000..27b40ab --- /dev/null +++ b/SYSPROG/STPROCINS/WINDOW.POINTERS.txt @@ -0,0 +1,34 @@ +compile insert WINDOW.POINTERS +* WINDOW.POINTERS +* Pointers into WINDOWS variables. Whenever any of the system window +* colors are referenced, they are accessed by these pointers. +* For example, to print the highlighted bar color in a popup window: +* +* PRINT @PW +* +* To store the current menu border type in X: +* +* X = @MW +* +* Pointer Desc +EQU CBORDER TO 1 ;* Border +EQU CTITLE TO 2 ;* Title +EQU CBACKG TO 3 ;* Background color for all characters in a window +EQU CCOMMENT TO 4 ;* Comments for @HW +EQU CBAR TO 4 ;* Highlight bar for @PW and @MW +EQU CPROMPT TO 4 ;* Prompt label +EQU CSEL TO 5 ;* Multiple selections in @PW +EQU CINDEX TO 5 ;* Index verification (XR.VERIFY) in @AW +EQU CNONSEL TO 6 ;* Non-selected items in @PW and @MW +EQU CMESSAGE TO 6 ;* Message colors +EQU CLABEL TO 7 ;* Labels +EQU CDESC TO 7 ;* Quoted Description in @MW +EQU CTEXT TO 8 ;* Text in @HW +EQU CENTRY TO 8 ;* Prompt Entries in @AW +EQU CBORDER.TYPE TO 9 ;* One of five border types +EQU CBACKCUR TO 10 ;* Current background setting with background postition + * set to foreground. (i.e. C?7 in CBACKG will be + * set to C77) + +EQU HCOLOR$ TO 6 ;* Pointer into @AW for highlight color +* Source Date: 15:25:11 25 JAN 1990 Build ID: AREV*1.13.203 Level: 2.0 diff --git a/SYSPROG/STPROCINS/WINDOW_COMMON%0025.txt b/SYSPROG/STPROCINS/WINDOW_COMMON%0025.txt new file mode 100644 index 0000000..7d75df3 --- /dev/null +++ b/SYSPROG/STPROCINS/WINDOW_COMMON%0025.txt @@ -0,0 +1,149 @@ +compile insert WINDOW_COMMON% +/* The Window Processor Common Area Definitions + + This definition is the same as AREV.COMMON. Both insert records refer to + the same variables in memory, so you can use either in your programs. + + By using the WINDOW_COMMON% block you are less likely to inadvertently use a + common variable as a local variable and introduce bugs into your program. We + recommend the use of WINDOW_COMMON% for all new development. AREV.COMMON is + provided for programs that already use that version of the common block. + +*/ + +COMMON WC_SRC_FILE% ;* The Window's File's file-variable. +COMMON WC_SRC_DICT% ;* The Window's Dictionary's file-variable. +COMMON WC_XREF_WINDOW% ;* The Xref Window. Used in XREF.BROWSE +COMMON WC_WINDXY% ;* Upper-left and lower-right initial coordinates. +COMMON WC_LABEL% ;* Labels in the entry screen. +COMMON WC_KEY_FULL% ;* True when @ID contains the full key. +COMMON WC_PROMPTS% ;* The prompt data. +COMMON WC_TEMPLATE% ;* The Template record name. +COMMON WC_VSP_VY% ;* Vspace Y coordinate for current prompt. +COMMON WC_QUERY_TEMPLATE% ;* Contains stripped template used by QUERY process +COMMON WC_SOFT_KEYS% ;* The Soft Keys. +COMMON WC_SOFT_DATA% ;* The CATALYST calls associated with the above. +COMMON WC_AMV% ;* List of prompts that are AMVs. +COMMON WC_AMV_VARS% ;* Information maintained per set of AMVs. See WINDOW.CONSTANTS. +COMMON WC_RECALC% ;* List of prompts to be recalculated when a change occurs. +COMMON WC_DETAIL_HELP% ;* Catalyst call for Detail Help. +COMMON WC_JOINED_LOCKS% ;* Array of joined record keys that are locked. +COMMON WC_REDISPLAY_LIST% ;* List of prompts to redisplay. +COMMON WC_WINDOW_ACTION% ;* Causes Window shape changes. See WINDOW.CONSTANTS +COMMON WC_VSP_VLEN% ;* Vspace length for current prompt. +COMMON WC_DELETE_REC% ;* True means delete the current record. +COMMON WC_ID_NEXT% ;* The next @ID to use. +COMMON WC_BROWSE_NEXT% ;* The next Browse List to use. +COMMON WC_SAVE_REC% ;* True means save the current record. +COMMON WC_DISPLAY_ACTION% ;* Causes specific display actions. See WINDOW.CONSTANTS. +COMMON WC_INDEX_POPUP% ;* Catalyst Code/Command to support INDEX/QUERY POPUP +COMMON WC_HELP_PROTECT% ;* True means don't allow changes to Help text. +COMMON WC_INT_KEYS% ;* List of prompts where calculations depend on the current prompt. +COMMON WC_RELATED_KEYS% ;* The Related Keys. +COMMON WC_RELATED_DATA% ;* The Catalyst calls associated with the above. +COMMON WC_FREEFORM% ;* The Freeform printing definition. +COMMON WC_PREC% ;* The previous record. +COMMON WC_BLABEL% ;* The Window Title. +COMMON WC_PREPROC% ;* The Pre-Processes. +COMMON WC_POSTPROC% ;* The Post-Processes. +COMMON WC_TEMPLATE_FILE.NAME% ;* The name of the file containing the template. +COMMON WC_PSEUDO_FILE% ;* The collector window codes. +COMMON WC_JOINED_HANDLES% ;* Array of file handles associated with JOINED.LOCKS +COMMON WC_BROWSE_LIST% ;* The current Browse List. +COMMON WC_MAINT_KEY% ;* (Used in Paint only.) +COMMON WC_BROWSE_POPUP% ;* The Browse Popup. Used in XREF.BROWSE. +COMMON WC_XCNT% ;* The count of IDs in the current Browse List. +COMMON WC_TABLE_WIDTH% ;* The width of VSPACE needed for Table Mode. +COMMON WC_TUTORIAL% ;* Contains the code/cmd called when you press [Ctrl-F2]. +COMMON WC_WIN_ACCOUNT% ;* This Window's Account. +COMMON WC_UPSWD% ;* This Window's Password. +COMMON WC_ULVL% ;* This Window's Restriction Level. +COMMON WC_RLIST_SELECT% ;* The R/LIST select criteria created by QUERY. +COMMON WC_RLIST_SORT% ;* The R/LIST sort fields created by QUERY. +COMMON WC_UBROWSE_LIST% ;* List of IDs that have been written. +COMMON WC_RING_PTR% ;* The position of the current ID in the Browse List. +COMMON WC_MPR_MODE% ;* MOVE/PAN/RESIZE mode flag +COMMON WC_DELIM% ;* The delimiter of the current prompt. +COMMON WC_VSP_VDEPTH% ;* Vspace depth for the current prompt. +COMMON WC_IS_ORIG% ;* The original value of the current prompt. +COMMON WC_YMAX% ;* The height of the window borders. +COMMON WC_STOP_LIST% ;* Contains the INDEX stop words +COMMON WC_QUERY_MODE% ;* True means QUERY mode entered at TCL instead of '\' +COMMON WC_LABEL_LIST% ;* USED IN REDISPLAY OF LABELS DISPLAY.ACTIONS = REDISPLAY.ALL$ +COMMON WC_REPROC% ;* The Replacement Processes. +COMMON WC_PERPROC% ;* The Perpetual Process. +COMMON WC_WC% ;* The exit key from SCRIBE. +COMMON WC_WST_CHAR% ;* The starting key for SCRIBE. +COMMON WC_HCOLOR% ;* Prompt Highlight colors for editable fields +COMMON WC_WI% ;* The current prompt number. +COMMON WC_REC_MAP% ;* Recalculate map for dependent symbolics. +COMMON WC_OREC% ;* The original record. +COMMON WC_PKEY% ;* The previous key. +COMMON WC_XMAX% ;* The width of the window borders. +COMMON WC_KEY_CNT% ;* The count of prompts in the key. +COMMON WC_KEY_MAP% ;* List of prompts in the key. +COMMON WC_W_CNT% ;* The count of prompts in the window. +COMMON WC_SI% ;* The current prompt attributes. +COMMON WC_IS% ;* The current prompt data. +COMMON WC_IS_DFLT% ;* The default value for the current prompt. +COMMON WC_VIEWER_ENV% ;* Environmental array used by VIEW process. +COMMON WC_VIRTUAL% ;* Virtual space coordinates. +COMMON WC_WLX% ;* The left border position. +COMMON WC_WLY% ;* The top border position. +COMMON WC_WRX% ;* The right border position. +COMMON WC_WRY% ;* The bottom border position. +COMMON WC_WDONE% ;* True means done with this Window. +COMMON WC_WCHANGE% ;* True means the current prompt data has changed. +COMMON WC_REQ_FIELDS% ;* List of prompts that are required. +COMMON WC_REQ_CNT% ;* The count of prompts that are required. +COMMON WC_RESET% ;* The Reset flag. See WINDOW.CONSTANTS. +COMMON WC_LOCKING_ON% ;* True means lock the records. +COMMON WC_WLOCKED% ;* True means the record is available for changing. +COMMON WC_WEXIT_KEYS% ;* The exit keys passed to SCRIBE. +COMMON WC_MAIN_MENU% ;* The menu associated with this window. +COMMON WC_ATR_OVR% ;* The Window's display attributes. +COMMON WC_APPL_DOMAIN% ;* Reserved for future use +COMMON WC_JOINED_KEYS% ;* Array of record keys that relate to joined files. +COMMON WC_RECALC_CNT% ;* The count of prompts to be recalculated. +COMMON WC_DATAFILE% ;* The name of the data file. +COMMON WC_VWINDOW% ;* The virtual space buffer. +COMMON WC_VDX% ;* The left edge of the visible part of the window. +COMMON WC_VDY% ;* The right edge of the visible part of the window. +COMMON WC_VPREV% ;* The save image of the screen. +COMMON WC_WEXPLODE% ;* True means start the window with an explosion. +COMMON WC_VALID% ;* False means stop the current operation. +COMMON WC_FORCE_CHANGE% ;* True means force WCHANGE to true. +COMMON WC_TABLE_EXIT_MODE% ;* True means exit table mode at [Esc], else return to window mode. +COMMON WC_SCRIBE_FLAGS% ;* Passed to SCRIBE. See SCRIBE.FLAG.CONSTANTS. +COMMON WC_EXCEPT_KEYS% ;* The exception keys passed to SCRIBE. +COMMON WC_PSEUDO% ;* Contents of @PSEUDO when current window is called. +COMMON WC_LABEL_IMAGE% ;* Used to hold label print images. +COMMON WC_W_ENV% ;* Window Environment. See WINDOW.CONSTANTS. +COMMON WC_WI_NEXT% ;* The next prompt number to process. +COMMON WC_W%(WC_W_CNT%) ;* The prompt array. PROMPTS is MatParsed into here. +COMMON WC_VSP_VX% ;* Vspace X coordinate for current prompt. +COMMON WC_VIRTUAL_ON% ;* True means that part of the window is not visible. +COMMON WC_RING_NEXT% ;* The next value for RING.PTR. +COMMON WC_TABLE_ON% ;* True means we are in Table Mode. +COMMON WC_NEW_ID% ;* True means we have a new key in ID.NEXT. +COMMON WC_START% ;* The starting prompt after the key has been input. +COMMON WC_DATAFILE_NEXT% ;* The next data file name to use. +COMMON WC_NEW_BROWSE% ;* True means we have a new Browse List in BROWSE.NEXT. +COMMON WC_NEW_DATAFILE% ;* True means we have a new data file in DATAFILE.NEXT. +COMMON WC_CRT_VX% ;* The physical screen X-coordinate of the current prompt. +COMMON WC_CRT_VY% ;* The physical screen Y-coordinate of the current prompt. +COMMON WC_CRT_VLEN% ;* The physical screen length of the current prompt. +COMMON WC_CRT_VDEPTH% ;* The physical screen depth of the current prompt. +COMMON WC_PROMPT_TYPE% ;* The type of the current prompt. See WINDOW.CONSTANTS. +COMMON WC_MV_NEXT% ;* The next value index for the current AMV group. +COMMON WC_CURR_AMV_GROUP% ;* The current AMV group number. +COMMON WC_MV% ;* The current value index for the current AMV group. +COMMON WC_SCRIBE_STATE% ;* The state of SCRIBE after an exit. See SCRIBE.STATE.CONSTANTS. +COMMON WC_VHEAD% ;* More virtual space. Used in Table Mode. +COMMON WC_AMV_ACTION% ;* The action to perform on the current AMV group. See WINDOW.CONSTANTS. +COMMON WC_UNKEYS% ;* List of keys to disable in this window. +COMMON WC_LABEL_CNT% ;* Count of the number of labels in the window. +COMMON WC_REGISTER%(10) ;* Storage available for customizing window. +COMMON WC_REAL_DATAFILE% ;* The real datafile name is stored here for + * paint - Arev 2.0 +COMMON WC_DICTFILE% ;* Dictionary File name diff --git a/SYSPROG/STPROCINS/WINDOW_MESSAGE_EQUATES.txt b/SYSPROG/STPROCINS/WINDOW_MESSAGE_EQUATES.txt new file mode 100644 index 0000000..8d00abb --- /dev/null +++ b/SYSPROG/STPROCINS/WINDOW_MESSAGE_EQUATES.txt @@ -0,0 +1,262 @@ +compile insert window_Message_Equates +/* + Author Captain C + Date March 2002 + Purpose General Window Message ( WM_ ) Equates for the Windows API + + + Comments + ======== + + + Amended Date Reason + ======= ==== ====== + +*/ + + equ WM_NULL$ to 0x0000 + equ WM_CREATE$ to 0x0001 + equ WM_DESTROY$ to 0x0002 + equ WM_MOVE$ to 0x0003 + equ WM_SIZE$ to 0x0005 + equ WM_ACTIVATE$ to 0x0006 + equ WM_SETFOCUS$ to 0x0007 + equ WM_KILLFOCUS$ to 0x0008 + equ WM_ENABLE$ to 0x000A + equ WM_SETREDRAW$ to 0x000B + equ WM_SETTEXT$ to 0x000C + equ WM_GETTEXT$ to 0x000D + equ WM_GETTEXTLENGTH$ to 0x000E + equ WM_PAINT$ to 0x000F + equ WM_CLOSE$ to 0x0010 + equ WM_QUERYENDSESSION$ to 0x0011 + equ WM_QUIT$ to 0x0012 + equ WM_QUERYOPEN$ to 0x0013 + equ WM_ERASEBKGND$ to 0x0014 + equ WM_SYSCOLORCHANGE$ to 0x0015 + equ WM_ENDSESSION$ to 0x0016 + equ WM_SYSTEMERROR$ to 0x0017 + equ WM_SHOWWINDOW$ to 0x0018 + equ WM_CTLCOLOR$ to 0x0019 + equ WM_WININICHANGE$ to 0x001A + equ WM_SETTINGCHANGE$ to WM_WININICHANGE$ + equ WM_DEVMODECHANGE$ to 0x001B + equ WM_ACTIVATEAPP$ to 0x001C + equ WM_FONTCHANGE$ to 0x001D + equ WM_TIMECHANGE$ to 0x001E + equ WM_CANCELMODE$ to 0x001F + equ WM_SETCURSOR$ to 0x0020 + equ WM_MOUSEACTIVATE$ to 0x0021 + equ WM_CHILDACTIVATE$ to 0x0022 + equ WM_QUEUESYNC$ to 0x0023 + equ WM_GETMINMAXINFO$ to 0x0024 + equ WM_PAINTICON$ to 0x0026 + equ WM_ICONERASEBKGND$ to 0x0027 + equ WM_NEXTDLGCTL$ to 0x0028 + equ WM_SPOOLERSTATUS$ to 0x002A + equ WM_DRAWITEM$ to 0x002B + equ WM_MEASUREITEM$ to 0x002C + equ WM_DELETEITEM$ to 0x002D + equ WM_VKEYTOITEM$ to 0x002E + equ WM_CHARTOITEM$ to 0x002F + equ WM_SETFONT$ to 0x0030 + equ WM_GETFONT$ to 0x0031 + equ WM_SETHOTKEY$ to 0x0032; + equ WM_GETHOTKEY$ to 0x0033 + equ WM_QUERYDRAGICON to 0x0037 + equ WM_COMPAREITEM$ to 0x0039 + equ WM_GETOBJECT$ to 0x003D + equ WM_COMPACTING$ to 0x0041 + + equ WM_COMMNOTIFY$ to 0x0044 ; // obsolete in Win32 + + equ WM_WINDOWPOSCHANGING$ to 0x0046 + equ WM_WINDOWPOSCHANGED$ to 0x0047 + equ WM_POWER$ to 0x0048 + + equ WM_COPYDATA$ to 0x004A + equ WM_CANCELJOURNAL$ to 0x004B + equ WM_NOTIFY$ to 0x004E + equ WM_INPUTLANGCHANGEREQUEST$ to 0x0050 + equ WM_INPUTLANGCHANGE$ to 0x0051 + equ WM_TCARD$ to 0x0052 + equ WM_HELP$ to 0x0053 + equ WM_USERCHANGED$ to 0x0054 + equ WM_NOTIFYFORMAT$ to 0x0055 + + equ WM_CONTEXTMENU$ to 0x007B + equ WM_STYLECHANGING$ to 0x007C + equ WM_STYLECHANGED$ to 0x007D + equ WM_DISPLAYCHANGE$ to 0x007E + equ WM_GETICON$ to 0x007F + equ WM_SETICON$ to 0x0080 + + equ WM_NCCREATE$ to 0x0081 + equ WM_NCDESTROY$ to 0x0082 + equ WM_NCCALCSIZE$ to 0x0083 + equ WM_NCHITTEST$ to 0x0084 + equ WM_NCPAINT$ to 0x0085 + equ WM_NCACTIVATE$ to 0x0086 + equ WM_GETDLGCODE$ to 0x0087 + equ WM_NCMOUSEMOVE$ to 0x00A0 + equ WM_NCLBUTTONDOWN$ to 0x00A1 + equ WM_NCLBUTTONUP$ to 0x00A2 + equ WM_NCLBUTTONDBLCLK$ to 0x00A3 + equ WM_NCRBUTTONDOWN$ to 0x00A4 + equ WM_NCRBUTTONUP$ to 0x00A5 + equ WM_NCRBUTTONDBLCLK$ to 0x00A6 + equ WM_NCMBUTTONDOWN$ to 0x00A7 + equ WM_NCMBUTTONUP$ to 0x00A8 + equ WM_NCMBUTTONDBLCLK$ to 0x00A9 + + equ WM_KEYFIRST$ to 0x0100 + equ WM_KEYDOWN$ to 0x0100 + equ WM_KEYUP$ to 0x0101 + equ WM_CHAR$ to 0x0102 + equ WM_DEADCHAR$ to 0x0103 + equ WM_SYSKEYDOWN$ to 0x0104 + equ WM_SYSKEYUP$ to 0x0105 + equ WM_SYSCHAR$ to 0x0106 + equ WM_SYSDEADCHAR$ to 0x0107 + equ WM_KEYLAST$ to 0x0108 + + equ WM_INITDIALOG$ to 0x0110 + equ WM_COMMAND$ to 0x0111 + equ WM_SYSCOMMAND$ to 0x0112 + equ WM_TIMER$ to 0x0113 + equ WM_HSCROLL$ to 0x0114 + equ WM_VSCROLL$ to 0x0115 + equ WM_INITMENU$ to 0x0116 + equ WM_INITMENUPOPUP$ to 0x0117 + equ WM_MENUSELECT$ to 0x011F + equ WM_MENUCHAR$ to 0x0120 + equ WM_ENTERIDLE$ to 0x0121 + + equ WM_MENURBUTTONUP$ to 0x0122 + equ WM_MENUDRAG$ to 0x0123 + equ WM_MENUGETOBJECT$ to 0x0124 + equ WM_UNINITMENUPOPUP$ to 0x0125 + equ WM_MENUCOMMAND$ to 0x0126 + + equ WM_CHANGEUISTATE$ to 0x0127 + equ WM_UPDATEUISTATE$ to 0x0128 + equ WM_QUERYUISTATE$ to 0x0129 + + equ WM_CTLCOLORMSGBOX$ to 0x0132 + equ WM_CTLCOLOREDIT$ to 0x0133 + equ WM_CTLCOLORLISTBOX$ to 0x0134 + equ WM_CTLCOLORBTN$ to 0x0135 + equ WM_CTLCOLORDLG$ to 0x0136 + equ WM_CTLCOLORSCROLLBAR$ to 0x0137 + equ WM_CTLCOLORSTATIC$ to 0x0138 + + equ WM_MOUSEFIRST$ to 0x0200 + equ WM_MOUSEMOVE$ to 0x0200 + equ WM_LBUTTONDOWN$ to 0x0201 + equ WM_LBUTTONUP$ to 0x0202 + equ WM_LBUTTONDBLCLK$ to 0x0203 + equ WM_RBUTTONDOWN$ to 0x0204 + equ WM_RBUTTONUP$ to 0x0205 + equ WM_RBUTTONDBLCLK$ to 0x0206 + equ WM_MBUTTONDOWN$ to 0x0207 + equ WM_MBUTTONUP$ to 0x0208 + equ WM_MBUTTONDBLCLK$ to 0x0209 + equ WM_MOUSEWHEEL$ to 0x020A + equ WM_MOUSELAST$ to 0x020A + + equ WM_PARENTNOTIFY$ to 0x0210 + equ WM_ENTERMENULOOP$ to 0x0211 + equ WM_EXITMENULOOP$ to 0x0212 + equ WM_NEXTMENU$ to 0x0213 + + equ WM_SIZING$ to 532 + equ WM_CAPTURECHANGED$ to 533 + equ WM_MOVING$ to 534 + equ WM_POWERBROADCAST$ to 536 + equ WM_DEVICECHANGE$ to 537 + + equ WM_IME_STARTCOMPOSITION$ to 0x010D + equ WM_IME_ENDCOMPOSITION$ to 0x010E + equ WM_IME_COMPOSITION$ to 0x010F + equ WM_IME_KEYLAST$ to 0x010F + equ WM_IME_SETCONTEXT$ to 0x0281 + equ WM_IME_NOTIFY$ to 0x0282 + equ WM_IME_CONTROL$ to 0x0283 + equ WM_IME_COMPOSITIONFULL$ to 0x0284 + equ WM_IME_SELECT$ to 0x0285 + equ WM_IME_CHAR$ to 0x0286 + equ WM_IME_REQUEST$ to 0x0288 + equ WM_IME_KEYDOWN$ to 0x0290 + equ WM_IME_KEYUP$ to 0x0291 + + equ WM_MDICREATE$ to 0x0220 + equ WM_MDIDESTROY$ to 0x0221 + equ WM_MDIACTIVATE$ to 0x0222 + equ WM_MDIRESTORE$ to 0x0223 + equ WM_MDINEXT$ to 0x0224 + equ WM_MDIMAXIMIZE$ to 0x0225 + equ WM_MDITILE$ to 0x0226 + equ WM_MDICASCADE$ to 0x0227 + equ WM_MDIICONARRANGE$ to 0x0228 + equ WM_MDIGETACTIVE$ to 0x0229 + equ WM_MDISETMENU$ to 0x0230 + + equ WM_ENTERSIZEMOVE$ to 0x0231 + equ WM_EXITSIZEMOVE$ to 0x0232 + equ WM_DROPFILES$ to 0x0233 + equ WM_MDIREFRESHMENU$ to 0x0234 + + equ WM_MOUSEHOVER$ to 0x02A1 + equ WM_MOUSELEAVE$ to 0x02A3 + + equ WM_CUT$ to 0x0300 + equ WM_COPY$ to 0x0301 + equ WM_PASTE$ to 0x0302 + equ WM_CLEAR$ to 0x0303 + equ WM_UNDO$ to 0x0304 + equ WM_RENDERFORMAT$ to 0x0305 + equ WM_RENDERALLFORMATS$ to 0x0306 + equ WM_DESTROYCLIPBOARD$ to 0x0307; + equ WM_DRAWCLIPBOARD$ to 0x0308; + equ WM_PAINTCLIPBOARD$ to 0x0309; + equ WM_VSCROLLCLIPBOARD$ to 0x030A; + equ WM_SIZECLIPBOARD$ to 0x030B; + equ WM_ASKCBFORMATNAME$ to 0x030C; + equ WM_CHANGECBCHAIN$ to 0x030D; + equ WM_HSCROLLCLIPBOARD$ to 0x030E; + equ WM_QUERYNEWPALETTE$ to 0x030F; + equ WM_PALETTEISCHANGING$ to 0x0310; + equ WM_PALETTECHANGED$ to 0x0311; + equ WM_HOTKEY$ to 0x0312; + + equ WM_PRINT$ to 791 + equ WM_PRINTCLIENT$ to 792 + + equ WM_HANDHELDFIRST$ to 856 + equ WM_HANDHELDLAST$ to 863 + + equ WM_PENWINFIRST$ to 0x0380 + equ WM_PENWINLAST$ to 0x038F + + equ WM_COALESCE_FIRST$ to 0x0390 + equ WM_COALESCE_LAST$ to 0x039F + + equ WM_DDE_FIRST$ to 0x03E0 + equ WM_DDE_INITIATE$ to WM_DDE_FIRST$ + 0 + equ WM_DDE_TERMINATE$ to WM_DDE_FIRST$ + 1 + equ WM_DDE_ADVISE$ to WM_DDE_FIRST$ + 2 + equ WM_DDE_UNADVISE$ to WM_DDE_FIRST$ + 3 + equ WM_DDE_ACK$ to WM_DDE_FIRST$ + 4 + equ WM_DDE_DATA$ to WM_DDE_FIRST$ + 5 + equ WM_DDE_REQUEST$ to WM_DDE_FIRST$ + 6 + equ WM_DDE_POKE$ to WM_DDE_FIRST$ + 7 + equ WM_DDE_EXECUTE$ to WM_DDE_FIRST$ + 8 + equ WM_DDE_LAST$ to WM_DDE_FIRST$ + 8 + + equ WM_APP$ to 0x8000 + + // NOTE: All Message Numbers below 0x0400 are RESERVED + // + // Private Window Messages Start Here } + + equ WM_USER$ to 0x0400 diff --git a/SYSPROG/STPROCINS/WINDOW_STYLE_EQUATES.txt b/SYSPROG/STPROCINS/WINDOW_STYLE_EQUATES.txt new file mode 100644 index 0000000..d3b424b --- /dev/null +++ b/SYSPROG/STPROCINS/WINDOW_STYLE_EQUATES.txt @@ -0,0 +1,84 @@ +compile insert window_Style_Equates +/* + Author Captain C + Date Oktober 2001 + Purpose General Style Equates for the Windows API + + + Comments + ======== + + Amended Date Reason + ======= ==== ====== + +*/ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // General Equates + + equ WS_OVERLAPPED$ to 0x00000000 + equ WS_POPUP$ to 0x80000000 + equ WS_CHILD$ to 0x40000000 + equ WS_MINIMIZE$ to 0x20000000 + equ WS_VISIBLE$ to 0x10000000 + equ WS_DISABLED$ to 0x08000000 + equ WS_CLIPSIBLINGS$ to 0x04000000 + equ WS_CLIPCHILDREN$ to 0x02000000 + equ WS_MAXIMIZE$ to 0x01000000 + equ WS_CAPTION$ to 0x00C00000 ; * // WS_BORDER | WS_DLGFRAME + equ WS_BORDER$ to 0x00800000 + equ WS_DLGFRAME$ to 0x00400000 + equ WS_VSCROLL$ to 0x00200000 + equ WS_HSCROLL$ to 0x00100000 + equ WS_SYSMENU$ to 0x00080000 + equ WS_THICKFRAME$ to 0x00040000 + equ WS_GROUP$ to 0x00020000 + equ WS_TABSTOP$ to 0x00010000 + + equ WS_MINIMIZEBOX$ to 0x00020000 + equ WS_MAXIMIZEBOX$ to 0x00010000 + + equ WS_OVERLAPPEDWINDOW$ to ( WS_OVERLAPPED$ + WS_CAPTION$ + WS_SYSMENU$ + WS_THICKFRAME$ + WS_MINIMIZEBOX$ + WS_MAXIMIZEBOX$ ) + equ WS_POPUPWINDOW$ to ( WS_POPUP$ + WS_BORDER$ + WS_SYSMENU$ ) + equ WS_CHILDWINDOW$ to WS_CHILD$ + + equ WS_TILED$ to WS_OVERLAPPED$ + equ WS_ICONIC$ to WS_MINIMIZE$ + equ WS_SIZEBOX$ to WS_THICKFRAME$ + equ WS_TILEDWINDOW$ to WS_OVERLAPPEDWINDOW$ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + * // Extended styles + + equ WS_EX_DLGMODALFRAME$ to 0x00000001 + equ WS_EX_DRAGOBJECT$ to 0x00000002 + equ WS_EX_NOPARENTNOTIFY$ to 0x00000004 + equ WS_EX_TOPMOST$ to 0x00000008 + equ WS_EX_ACCEPTFILES$ to 0x00000010 + equ WS_EX_TRANSPARENT$ to 0x00000020 + + equ WS_EX_MDICHILD$ to 0x00000040 + equ WS_EX_TOOLWINDOW$ to 0x00000080 + equ WS_EX_WINDOWEDGE$ to 0x00000100 + equ WS_EX_CLIENTEDGE$ to 0x00000200 + equ WS_EX_CONTEXTHELP$ to 0x00000400 + + equ WS_EX_RIGHT$ to 0x00001000 + equ WS_EX_LEFT$ to 0x00000000 + equ WS_EX_RTLREADING$ to 0x00002000 + equ WS_EX_LTRREADING$ to 0x00000000 + equ WS_EX_LEFTSCROLLBAR$ to 0x00004000 + equ WS_EX_RIGHTSCROLLBAR$ to 0x00000000 + + equ WS_EX_CONTROLPARENT$ to 0x00010000 + equ WS_EX_STATICEDGE$ to 0x00020000 + equ WS_EX_APPWINDOW$ to 0x00040000 + + equ WS_EX_OVERLAPPEDWINDOW$ to ( WS_EX_WINDOWEDGE$ + WS_EX_CLIENTEDGE$ ) + equ WS_EX_PALETTEWINDOW$ to ( WS_EX_WINDOWEDGE$ + WS_EX_TOOLWINDOW$ + WS_EX_TOPMOST$ ) + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/WINRES_EQUATES.txt b/SYSPROG/STPROCINS/WINRES_EQUATES.txt new file mode 100644 index 0000000..8c00d2e --- /dev/null +++ b/SYSPROG/STPROCINS/WINRES_EQUATES.txt @@ -0,0 +1,59 @@ +compile insert winres_equates + +****************************************************************************** +* +* Product : OpenInsight +* Client : RTI +* Version : 3.1 +* +* Description: Soft-coded messages for Form IO layer +* (see SYSENV/SYSTEM_RESOURCES) +* +* Example : msgLocked = ResToString(WINRES_LOCKED$, 'SYSTEM') +* +* History : (date, initials, notes) +* 12/10/20 Mr C Added SUFF_QBFBROWSELOCKED$ +* 10/27/13 MrC Added header guards +* 12/15/95 vg Original programmer. +****************************************************************************** + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#ifndef _WINRES_EQUATES_ +#define _WINRES_EQUATES_ +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + declare function ResToString + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// + + EQU SYSRES_PREFIX_WIN$ TO 'WIN' + EQU SYSRES_SYSTEM$ TO 'SYSTEM' + EQU WINRES_SYSTEM$ TO 'SYSTEM' + EQU WINRES_PSNOTRUNNING$ TO SYSRES_PREFIX_WIN$ : 100 + EQU WINRES_WINEXISTS$ TO SYSRES_PREFIX_WIN$ : 101 + EQU WINRES_COMPILEFAILED$ TO SYSRES_PREFIX_WIN$ : 102 + + EQU WINRES_NEWENTRY$ TO SYSRES_PREFIX_WIN$ : 110 + EQU WINRES_QBFDEFINE$ TO SYSRES_PREFIX_WIN$ : 111 + EQU WINRES_QBFINPROGRESS$ TO SYSRES_PREFIX_WIN$ : 112 + EQU WINRES_QBFBROWSE$ TO SYSRES_PREFIX_WIN$ : 113 + EQU WINRES_LOCKED$ TO SYSRES_PREFIX_WIN$ : 114 + EQU WINRES_QBFBROWSELOCKED$ TO SYSRES_PREFIX_WIN$ : 115 + + EQU WINRES_QBFQUERYCRITERIA$ TO SYSRES_PREFIX_WIN$ : 120 + EQU WINRES_APPNOTE$ TO SYSRES_PREFIX_WIN$ : 130 + EQU WINRES_UNKNOWNERR$ TO SYSRES_PREFIX_WIN$ : 131 + EQU WINRES_APPMANAGER$ TO SYSRES_PREFIX_WIN$ : 132 + EQU WINRES_INVALIDITEMTYPE$ TO SYSRES_PREFIX_WIN$ : 133 + EQU WINRES_STARTFORMERR$ TO SYSRES_PREFIX_WIN$ : 134 + EQU WINRES_HELPDNE$ TO SYSRES_PREFIX_WIN$ : 135 + EQU WINRES_OPTIONSDNE$ TO SYSRES_PREFIX_WIN$ : 136 + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +#endif +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// diff --git a/SYSPROG/STPROCINS/WINUS.CONSTANTS.txt b/SYSPROG/STPROCINS/WINUS.CONSTANTS.txt new file mode 100644 index 0000000..0a8e2f0 --- /dev/null +++ b/SYSPROG/STPROCINS/WINUS.CONSTANTS.txt @@ -0,0 +1,58 @@ +compile insert WINUS.CONSTANTS +* Winus constants +* +* Change History +* +* 01/16/87 JAW Changed to new edit keys definition +* +* +EQU ULINE TO CHAR(186) +EQU FORWARD TO 'F' : @FM +EQU ROUND TO 0.9999 +EQU DFLT.NCOLS TO 7 +*-->11/27/90 rkp commented this guy out. isn't used anywhere +*EQU NOHELP.EXIT TO 'No help specified ... press to exit' +*-->11/27/90 +* +* MENU.NAME field constants +* +EQU MTITLE TO 1 ;* Menu title in field 1 +EQU MTYPE TO 2 ;* (No longer used? - 10/23/91 SLJ) +EQU MACCOUNTS TO 2 ;* Accounts with access to this menu. +EQU MDIM TO 3 ;* Number of columns in AREV-style menus. +EQU MSEL TO 4 ;* Menu selection. this value is diplayed to the user. +EQU MDESC TO 5 ;* Menu description + * Shows at bottom of menu or status line + * longer descriptions are stored as subvalues and are + * shown as default detail help +EQU MCOM TO 6 ;* Menu command. this command is processed when it is selected from menu +EQU MCODE TO 7 ;* Menu code. this is a code determines how to process MCOM +EQU MSELRESTRICT TO 8 ;* Restricion level of each item +EQU MCONCEPT TO 9 ;* Concept help (CODE,CMD or id) +EQU MCAPS TO 10 ;* Menu capital letter selections. bypasses movement keys +EQU MANCHOR TO 11 ;* Menu anchor. if a menu is anchored, the command selection will + * be processed without popping out of menu. +EQU MATR TO 12 ;* Menu video attributes. +EQU MUPSWD TO 13 ;* Menu password(s). +EQU MULEVEL TO 14 ;* Menu restriction level. +EQU MSELPSWD TO 15 ;* Menu passwords for individual selections. + * Multiple passwords stored as subvalues +EQU MTUTOR TO 16 ;* Default detail help (CODE,CMD or id) +EQU MHELP TO 17 ;* Help for each item (CODE,CMD or id) +EQU MPUSHSES TO 18 ;* Flag if true to push.session +EQU MOPTCODE TO 19 ;* Code and command for [F2] +EQU MOPTCMD TO 20 +equ standalone to 21 ;* standalone flag +EQU MLEVEL TO 2 +* +* MENU selection cases +* +EQU SAVESEL TO @FM : @MOVE.KEYS : @FM : @INT.CONST : @FM ;* Save current menu selection +EQU UPSEL TO @FM : @MOVE.KEYS : @FM : @MOVE.KEYS : @FM : @EDIT.KEYS : @FM ;* Move left, up, or back one selection +EQU DOWNSEL TO @FM : @MOVE.KEYS : @FM :@MOVE.KEYS : @FM : " " : @FM ;* Move right, down, or over one selection +* +* Used for swapping @FM in and out of MENU.DATA +* +EQU SPOTS TO CHAR(250) +EQU MODULE$ TO 'MENU' +* Source Date: 15:54:19 04 MAY 1994 Build ID: AREV_HR*3.1.23 Level: 3.13 diff --git a/SYSPROG/STPROCINS/XML_EQUATES.txt b/SYSPROG/STPROCINS/XML_EQUATES.txt new file mode 100644 index 0000000..244b241 --- /dev/null +++ b/SYSPROG/STPROCINS/XML_EQUATES.txt @@ -0,0 +1,17 @@ +compile insert XML_Equates + +declare function XML +declare subroutine XML + +* Success = XML(XML_LOGTRAN$, TableName, RecordKey) +equ XML_LOGTRAN$ to 1 + +* Success = XML(XML_GETTRAN$, TableName, PurgeID /* out */, CutOffDateTime, DestCursor) +equ XML_GETTRAN$ to 2 + +* Success = XML(XML_PURGETRAN$, TableName, PurgeID) +equ XML_PURGETRAN$ to 3 + +* Success = XML(XML_PURGEALL$, TableName) +equ XML_PURGEALL$ to 4 + diff --git a/SYSPROG/STPROCINS/XO_EQUATES.txt b/SYSPROG/STPROCINS/XO_EQUATES.txt new file mode 100644 index 0000000..00c0164 --- /dev/null +++ b/SYSPROG/STPROCINS/XO_EQUATES.txt @@ -0,0 +1,149 @@ +Compile Insert XO_Equates + +***************************************************************************** +* +* This program is proprietary and is not to be used by or disclosed +* to others, nor is it to be copied without written permission from +* Revelation Technologies, Inc. +* +* Product : OI/WG +* Poject : OI/CS +* Release : 3.11 +* +* Name : XO_Equates Insert +* Description: Connection Object Basic+ API declarations and constants +* +* History (Date, Initials, Notes) +* 06/28/95 cp Original programmer +* 08/18/95 vg Added Datasource Type procedure support +* 11/05/95 cp Added internal handle property for connection objects +* 05/22/96 cp Updated for 3.11. +* 06/07/96 cp Added XO properties for string formatting information +***************************************************************************** + + +* Basic+ functions +declare function XOGetCompDef ;* body = (DataSourceName, [DataSourceType]) +declare function XOInstance ;* hXO = (DataSourceName, [DataSourceType, LoginID, Password, Timeout, Options, Scope]) +declare function XOMethod ;* flag = (hXO, MethodName [, Param1, ...]) +declare function XOGetProperty ;* flag = (hXO, PropertyName, RetValue [, Qualifier]) +declare function XOSetProperty ;* flag = (hXO, PropertyName, Value, [, Qaulifier]) +declare function QryInstance ;* hQry = (hXO) +declare function QryMethod ;* flag = (hQry, MethodName [, Param1, ...]) +declare function QryGetProperty ;* flag = (hQry, PropertyName, RetValue [, Qualifier]) +declare function QrySetProperty ;* flag = (hQry, PropertyName, Value, [, Qaulifier]) + +* by declaring the Connection functions as subroutines, the return value can be ignored +declare subroutine XOGetProperty , XOSetProperty , XOMethod +declare subroutine QryGetProperty, QrySetProperty, QryMethod + + +* Repository constants +equ XO_TABLE$ to "SYSREPOSDATASOURCES" +equ XO_TYPE$ to "DATASOURCE" +equ XO_CLASS$ to "CONNECTION" + + +* XO parameter information +equ XO_PARM_FILE$ to "SYSENV" +equ XO_PARM_KEY$ to "CFG_CONNECTION" +equ XO_DATASOURCETYPES$ to 1 ;* @vm delimited list of all supported Data Source Types +equ XO_ATTRIBUTES$ to 2 ;* for each Data Source Type, @svm delimited list of attribute names +equ XO_ATTRIBDESC$ to 3 ;* a short description for each attribute name +equ XO_DATASOURCETYPESUB$ to 4 ;* a function that performs datasource specific tasks + + +* options for XOInstance() +equ XO_USETRANS$ to 0 ;* use transactions (default) +equ XO_NOTRANS$ to 1 ;* do not use transactions + +equ XO_NOSHARE$ to 0 ;* do not share XO (default) +equ XO_SCOPEDSHARE$ to 2 ;* share only within the specified scope +equ XO_GLOBALSHARE$ to 4 ;* share globally (anyone can use it) + +equ XO_LOGINDIALOG$ to 0 ;* if login fails, allow entry of login ID and password (default) +equ XO_NODIALOG$ to 8 ;* if login fails, just return error +equ XO_ONLYDIALOG$ to 16 ;* don't attempt to log in without allowing the user to enter connection data + +equ XO_RESOLVE$ to 0 ;* attempt to fill in blank connection parms (default) +equ XO_NORESOLVE$ to 32 ;* do not attempt to fill in blank connection parms + + +* connection methods +equ XO_DESTROY$ to 1 ;* destroy passed XO +equ XO_TRANSLATEFLAG$ to 2 ;* Param1 is a DS/XO API FLAG, returns TRUE$=success or FALSE$=failure +equ XO_GETERROR$ to 3 ;* Retrieves pending errors for the Connection Object +equ XO_COMMITTRAN$ to 4 ;* commits the current transaction +equ XO_ROLLBACKTRAN$ to 5 ;* rolls back the current transaction +equ XO_ADDREF$ to 6 ;* add reference to Connection Object handle + +equ XO_METHOD_MIN$ to XO_DESTROY$ +equ XO_METHOD_MAX$ to XO_ADDREF$ + + +* connection properties +equ XO_VALID$ to 1 ;* TRUE$ if Connection Object handle is valid +equ XO_QRYLIST$ to 2 ;* @vm delimited list of Query handles for the Connection Object handle +equ XO_DSLIST$ to 3 ;* @vm delimited list of DataSet handles for the Connection Object handle +equ XO_SOURCENAME$ to 4 ;* data source name +equ XO_SOURCETYPE$ to 5 ;* data source type +equ XO_TABLELIST$ to 6 ;* list of data source tables (Arg=TableTypes) +equ XO_TABLEDESCRIPT$ to 7 ;* returns column descriptions for the specified table (Arg=TableName) +equ XO_TRANSACTIONS$ to 8 ;* returns boolean (TRUE=transactions specified) +equ XO_OPTIONS$ to 9 ;* returns bitmasked options as passed to XOInstance() +equ XO_SCOPE$ to 10 ;* returns scope of connection as passed to XOInstance() +equ XO_INTERNALHANDLE$ to 11 ;* returns internal handle used by connection object +equ XO_TYPEQUOTED$ to 12 ;* returns information on which types are quoted; @fm-delim'd array indexed by DT_... values (see DSXO_API insert) +equ XO_QUOTECHAR$ to 13 ;* returns the character used to quote data, eg. ' +equ XO_QUOTEDQUOTE$ to 14 ;* returns the quote character as it appears if it is quoted, eg. '' or \' +equ XO_NULLVALUE$ to 15 ;* returns value used to specify null value, eg. NULL +equ XO_FORMATDATETIME$ to 16 ;* returns formats for date (field 1), time (field 2), and datetime (field 3) using strftime() notation (see DSXO_API) + +equ XO_PROPERTY_MIN$ to XO_VALID$ +equ XO_PROPERTY_MAX$ to XO_FORMATDATETIME$ + + +* query methods +equ QRY_DESTROY$ to 1 ;* destroy passed query +equ QRY_TRANSLATEFLAG$ to 2 ;* Param1 is a DS/XO API FLAG, returns TRUE$=success or FALSE$=failure +equ QRY_GETERROR$ to 3 ;* Retrieves pending errors for the query +equ QRY_EXECUTE$ to 4 ;* exectes a script +equ QRY_GETROW$ to 5 ;* gets the next result row +equ QRY_CANCEL$ to 6 ;* cancels the query +equ QRY_LISTTABLES$ to 7 ;* create result set of tables (Arg1=TableTypes) +equ QRY_LISTCOLUMNS$ to 8 ;* create result set of columns (Arg1=Table) + +equ QRY_METHOD_MIN$ to QRY_DESTROY$ +equ QRY_METHOD_MAX$ to QRY_LISTCOLUMNS$ + + +* query properties +equ QRY_VALID$ to 1 ;* returns TRUE$ if handle is valid +equ QRY_CONNECTION$ to 2 ;* connection handle for the query +equ QRY_ROWCOUNT$ to 3 ;* number of rows in query +equ QRY_COLCOUNT$ to 4 ;* number of columns in query +equ QRY_COLDESCRIPT$ to 5 ;* column name, type, precision, scale, nullable, and OI type (Arg=iCol) +equ QRY_COLNAME$ to 6 ;* column name (Arg=iCol) +equ QRY_COLTYPE$ to 7 ;* column type (Arg=iCol) +equ QRY_COLPRECISION$ to 8 ;* column precision (Arg=iCol) +equ QRY_COLSCALE$ to 9 ;* column scale (Arg=iCol) +equ QRY_COLNULLABLE$ to 10 ;* column nullable (Arg=iCol) +equ QRY_COLOITYPE$ to 11 ;* column OpenInsight type (Arg=iCol) +equ QRY_TIMEOUT$ to 12 ;* timeout in seconds + +equ QRY_PROPERTY_MIN$ to QRY_VALID$ +equ QRY_PROPERTY_MAX$ to QRY_TIMEOUT$ + + +* datasource type functions +* flag = fn(Instruction, In, Out, Arg ) +declare function ODBC_Sub +declare function SQLServer_Sub + +* instructions for datasource type function +equ DST_HASOPTIONS$ to 1 ;* in = xo_attribute, out = true if it has options +equ DST_CHOOSEOPTION$ to 2 ;* in = xo_attribute, out = chosen option, arg = current setting +equ DST_INSERTFROMSELECT$ to 3 ;* take a SELECT script and return an INSERT script +equ DST_UPDATEFROMSELECT$ to 4 ;* take a SELECT script and return an UPDATE script +equ DST_DELETEFROMSELECT$ to 5 ;* take a SELECT script and return an DELETE script +