⟦d9d898e60⟧

HexDump

0x0000…0020 (0, 0, 400)  Head {h00=0x001c, h01=0x0050, text=» IDENT SUBAPL 830907 EV «, t00=0x0000, t01=0x0004}
0x0020…0034              Head {h00=0x0010, h01=0x0050, text=» DDUM KMD08 «, t00=0x0000, t01=0x0024}
0x0034…0042              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0038}
0x0042…0058              Head {h00=0x0012, h01=0x0050, text=» ENTRY SPAPPL «, t00=0x0000, t01=0x0046}
0x0058…006e              Head {h00=0x0012, h01=0x0050, text=» ENTRY SETKRE «, t00=0x0000, t01=0x005c}
0x006e…0084              Head {h00=0x0012, h01=0x0050, text=» ENTRY SETDEB «, t00=0x0000, t01=0x0072}
0x0084…0098              Head {h00=0x0010, h01=0x0050, text=» ENTRY CLRSW«, t00=0x0000, t01=0x0088}
0x0098…00ac              Head {h00=0x0010, h01=0x0050, text=» ENTRY SELTR«, t00=0x0000, t01=0x009c}
0x00ac…00c2              Head {h00=0x0012, h01=0x0050, text=» ENTRY CHDATO «, t00=0x0000, t01=0x00b0}
0x00c2…00d6              Head {h00=0x0010, h01=0x0050, text=» ENTRY XCOP «, t00=0x0000, t01=0x00c6}
0x00d6…00ec              Head {h00=0x0012, h01=0x0050, text=» ENTRY YYMMDD «, t00=0x0000, t01=0x00da}
0x00ec…0100              Head {h00=0x0010, h01=0x0050, text=» EXT PACKCL «, t00=0x0000, t01=0x00f0}
0x0100…0112              Head {h00=0x000e, h01=0x0050, text=» EXT CRKJ «, t00=0x0000, t01=0x0104}
0x0112…0124              Head {h00=0x000e, h01=0x0050, text=» EXT KKCH «, t00=0x0000, t01=0x0116}
0x0124…0138              Head {h00=0x0010, h01=0x0050, text=» EXT KTPLAN «, t00=0x0000, t01=0x0128}
0x0138…014e              Head {h00=0x0012, h01=0x0050, text=» ENTRY REPL00 «, t00=0x0000, t01=0x013c}
0x014e…0156              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0152}
0x0156…016e              Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0000, t01=0x015a}
0x016e…017c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0000, t01=0x0172}
0x017c…0190              Head {h00=0x0010, h01=0x0050, text=»SPAPPL PROC «, t00=0x0000, t01=0x0180}
0x0190…01ac (1, 0, 400)  Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0001, t01=0x0004}
0x01ac…01b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0020}
0x01b6…0206              Head {h00=0x004c, h01=0x0050, text=»*          SPAPPL - PROCEDURE ACTIVATED BY SCREEN PACKAGE IF APPL-VALUE «, t00=0x0001, t01=0x002a}
0x0206…0248              Head {h00=0x003e, h01=0x0050, text=»*          IS NOT ZERO, WHICH IS THE CASE FOR ALL FIELDS. «, t00=0x0001, t01=0x007a}
0x0248…0252              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00bc}
0x0252…0296              Head {h00=0x0040, h01=0x0050, text=»*          APPL-VALUE IS EQUAL TO FIELD-NAME (KMD FELT-KODE)«, t00=0x0001, t01=0x00c6}
0x0296…02da              Head {h00=0x0040, h01=0x0050, text=»*          A BRANCH IS MADE TO A PIECE OF CODE FOR RELEVANT «, t00=0x0001, t01=0x010a}
0x02da…0312              Head {h00=0x0034, h01=0x0050, text=»*          TESTING AND BRANCH TO PACKING ROUTINE«, t00=0x0001, t01=0x014e}
0x0312…031c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0186}
0x031c…0338              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0001, t01=0x0190}
0x0338…0342              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001c}
0x0342…0374              Head {h00=0x002e, h01=0x0050, text=»*          SPBINW3 IS CURRENT APPL NUMBER «, t00=0x0002, t01=0x0026}
0x0374…038c              Head {h00=0x0014, h01=0x0050, text=»   ART - RETURN «, t00=0x0002, t01=0x0058}
0x038c…03a8              Head {h00=0x0018, h01=0x0050, text=»   APK - PACK FIELD «, t00=0x0002, t01=0x0070}
0x03a8…03ce              Head {h00=0x0022, h01=0x0050, text=»   APF - PACK FIELD WITH SIGN «, t00=0x0002, t01=0x008c}
0x03ce…03f4              Head {h00=0x0022, h01=0x0050, text=»   AA01 - TEST FOR FIELD TO BE«, t00=0x0002, t01=0x00b2}
0x03f4…0410              Head {h00=0x0018, h01=0x0050, text=»   ---- - AUTODUPPED«, t00=0x0002, t01=0x00d8}
0x0410…0436              Head {h00=0x0022, h01=0x0050, text=»   AA02 - TEST FOR AUTODUP KEY«, t00=0x0002, t01=0x00f4}
0x0436…0458              Head {h00=0x001e, h01=0x0050, text=»   AA03 - IF LENGTH ZERO, «, t00=0x0002, t01=0x011a}
0x0458…0476              Head {h00=0x001a, h01=0x0050, text=»   ---- - DELETE FIELS«, t00=0x0002, t01=0x013c}
0x0476…0494              Head {h00=0x001a, h01=0x0050, text=»   AA05 - TEST FIELD 5«, t00=0x0002, t01=0x015a}
0x0494…04b2              Head {h00=0x001a, h01=0x0050, text=»   AA06 - TEST FIELD 6«, t00=0x0002, t01=0x0178}
0x04b2…04d4              Head {h00=0x001e, h01=0x0050, text=»   AA11 - TEST VALOERDATE «, t00=0x0003, t01=0x0008}
0x04d4…04f6              Head {h00=0x001e, h01=0x0050, text=»   AA17 - TEST FORFALDSAAR«, t00=0x0003, t01=0x002a}
0x04f6…051c              Head {h00=0x0022, h01=0x0050, text=»   AA65 - IF AA05, AA06 THERE «, t00=0x0003, t01=0x004c}
0x051c…0540              Head {h00=0x0020, h01=0x0050, text=»   ---- - MIGHT BE A CHOICE «, t00=0x0003, t01=0x0072}
0x0540…0562              Head {h00=0x001e, h01=0x0050, text=»   ---- - OF NEW TRANSTYPE«, t00=0x0003, t01=0x0096}
0x0562…0580              Head {h00=0x001a, h01=0x0050, text=»   A64 - TEST FIELD 64«, t00=0x0003, t01=0x00b8}
0x0580…059e              Head {h00=0x001a, h01=0x0050, text=»   A65 - TEST FIELD 65«, t00=0x0003, t01=0x00d6}
0x059e…05c6              Head {h00=0x0024, h01=0x0050, text=»   AA70 - KONTONR WITHOUT CHECK «, t00=0x0003, t01=0x00f4}
0x05c6…05ec              Head {h00=0x0022, h01=0x0050, text=»   AA71 - 'ANTAL' IN TRANSTYPE«, t00=0x0003, t01=0x011c}
0x05ec…0604              Head {h00=0x0014, h01=0x0050, text=»   ---- - 51, 53«, t00=0x0003, t01=0x0142}
0x0604…0628              Head {h00=0x0020, h01=0x0050, text=»   A76  - COUNTER, TRANS 12 «, t00=0x0003, t01=0x015a}
0x0628…0650              Head {h00=0x0024, h01=0x0050, text=»   A77  - TR 4, INSERT BKO 51,52«, t00=0x0003, t01=0x017e}
0x0650…0676              Head {h00=0x0022, h01=0x0050, text=»   A78  - ACCOUNT NO, TRANS 12«, t00=0x0004, t01=0x0016}
0x0676…069e              Head {h00=0x0024, h01=0x0050, text=»   A79  -   -  -  -  -  - (COPY)«, t00=0x0004, t01=0x003c}
0x069e…06c4              Head {h00=0x0022, h01=0x0050, text=»   A80-A87 - CHECK OF CONTROL «, t00=0x0004, t01=0x0064}
0x06c4…06e6              Head {h00=0x001e, h01=0x0050, text=»   ---- - INFORMATION FOR «, t00=0x0004, t01=0x008a}
0x06e6…0702              Head {h00=0x0018, h01=0x0050, text=»   ---- - TRANSTYPES«, t00=0x0004, t01=0x00ac}
0x0702…0726              Head {h00=0x0020, h01=0x0050, text=»   A88  - AUTODUP BKO, TR 4 «, t00=0x0004, t01=0x00c8}
0x0726…0748              Head {h00=0x001e, h01=0x0050, text=»   A89  - STORE IN FIELD 6«, t00=0x0004, t01=0x00ec}
0x0748…076c              Head {h00=0x0020, h01=0x0050, text=»   A90  - SPECIAL SLUT-FIELD«, t00=0x0004, t01=0x010e}
0x076c…078e              Head {h00=0x001e, h01=0x0050, text=»   A91 - ENTER TO SLUT-KEY«, t00=0x0004, t01=0x0132}
0x078e…07ac              Head {h00=0x001a, h01=0x0050, text=»   A100 - CHECK TR 12 «, t00=0x0004, t01=0x0154}
0x07ac…07d0              Head {h00=0x0020, h01=0x0050, text=»   A101 - CHECK BEHL. COUNT.«, t00=0x0004, t01=0x0172}
0x07d0…07ea              Head {h00=0x0016, h01=0x0050, text=»   A102 - REL. DAY«, t00=0x0005, t01=0x0008}
0x07ea…080c              Head {h00=0x001e, h01=0x0050, text=»   A103 - SET BEHL. COUNT «, t00=0x0005, t01=0x0022}
0x080c…082a              Head {h00=0x001a, h01=0x0050, text=»   A104 - SET TRANS 12«, t00=0x0005, t01=0x0044}
0x082a…087a              Head {h00=0x004c, h01=0x0050, text=»                                                 A105 - CTRL.DIGIT CALC.«, t00=0x0005, t01=0x0062}
0x087a…089c              Head {h00=0x001e, h01=0x0050, text=»   A106 - CHECK VALUE 0-3 «, t00=0x0005, t01=0x00b2}
0x089c…08b6              Head {h00=0x0016, h01=0x0050, text=»   A107 - AS A102 «, t00=0x0005, t01=0x00d4}
0x08b6…08d8              Head {h00=0x001e, h01=0x0050, text=»   A108 - SPG -REGKONTONR «, t00=0x0005, t01=0x00ee}
0x08d8…08f8              Head {h00=0x001c, h01=0x0050, text=»   A109 - SPG-CPR/CIR/NR«, t00=0x0005, t01=0x0110}
0x08f8…0914              Head {h00=0x0018, h01=0x0050, text=»   A110 - SPG-BELOB «, t00=0x0005, t01=0x0130}
0x0914…0936              Head {h00=0x001e, h01=0x0050, text=»   A111 - SPG-OTHER FIELD «, t00=0x0005, t01=0x014c}
0x0936…095c              Head {h00=0x0022, h01=0x0050, text=»   A112 - CHECK TASKNR, START «, t00=0x0005, t01=0x016e}
0x095c…0966 (6, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0004}
0x0966…09a0              Head {h00=0x0036, h01=0x0050, text=» CBG SPBINW3,=W'89',AAA SLUT FIELD OR DIV. CHECKS «, t00=0x0006, t01=0x000e}
0x09a0…09aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0048}
0x09aa…09b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0052}
0x09b4…09c0              Head {h00=0x0008, h01=0x0050, text=»AA01«, t00=0x0006, t01=0x005c}
0x09c0…09d6              Head {h00=0x0012, h01=0x0050, text=»   IN FORMATS «, t00=0x0006, t01=0x0068}
0x09d6…0a08              Head {h00=0x002e, h01=0x0050, text=» CBNE SPBINW1,CBIN0,AAA IF LENGTH IS ZERO «, t00=0x0006, t01=0x007e}
0x0a08…0a4a              Head {h00=0x003e, h01=0x0050, text=» MOVE GSWBIN4,CFLTDEX(SPBINW3) GET INDEX VALUE TO GSWBIN4 «, t00=0x0006, t01=0x00b0}
0x0a4a…0a7a              Head {h00=0x002c, h01=0x0050, text=» MOVE GTUSED(GSWBIN4),CBIN0 DELETE FIELD«, t00=0x0006, t01=0x00f2}
0x0a7a…0a88              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0006, t01=0x0122}
0x0a88…0a92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0130}
0x0a92…0aac              Head {h00=0x0016, h01=0x0050, text=»AAA IB SPBINW3,  C«, t00=0x0006, t01=0x013a}
0x0aac…0ae8              Head {h00=0x0038, h01=0x0050, text=»  ART,ART,ART,ART,A05,A06,A07,APF,ART, FIELDS 1-9 C «, t00=0x0006, t01=0x0154}
0x0ae8…0afa              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0006, t01=0x0190}
0x0afa…0b0c              Head {h00=0x000e, h01=0x0050, text=»  A11,  C «, t00=0x0007, t01=0x0012}
0x0b0c…0b1e              Head {h00=0x000e, h01=0x0050, text=»  A12,  C «, t00=0x0007, t01=0x0024}
0x0b1e…0b30              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x0036}
0x0b30…0b42              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x0048}
0x0b42…0b54              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x005a}
0x0b54…0b66              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x006c}
0x0b66…0b78              Head {h00=0x000e, h01=0x0050, text=»  A17,  C «, t00=0x0007, t01=0x007e}
0x0b78…0b8a              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x0090}
0x0b8a…0b9c              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x00a2}
0x0b9c…0bae              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x00b4}
0x0bae…0bc0              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x00c6}
0x0bc0…0bd2              Head {h00=0x000e, h01=0x0050, text=»  A22,  C «, t00=0x0007, t01=0x00d8}
0x0bd2…0be4              Head {h00=0x000e, h01=0x0050, text=»  A23,  C «, t00=0x0007, t01=0x00ea}
0x0be4…0bf6              Head {h00=0x000e, h01=0x0050, text=»  A24,  C «, t00=0x0007, t01=0x00fc}
0x0bf6…0c08              Head {h00=0x000e, h01=0x0050, text=»  A25,  C «, t00=0x0007, t01=0x010e}
0x0c08…0c1a              Head {h00=0x000e, h01=0x0050, text=»  A26,  C «, t00=0x0007, t01=0x0120}
0x0c1a…0c2c              Head {h00=0x000e, h01=0x0050, text=»  A27,  C «, t00=0x0007, t01=0x0132}
0x0c2c…0c3e              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x0144}
0x0c3e…0c50              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x0156}
0x0c50…0c62              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x0168}
0x0c62…0c74              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x017a}
0x0c74…0c86              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0007, t01=0x018c}
0x0c86…0c98              Head {h00=0x000e, h01=0x0050, text=»  APF,  C «, t00=0x0008, t01=0x000e}
0x0c98…0caa              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0008, t01=0x0020}
0x0caa…0cbc              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0008, t01=0x0032}
0x0cbc…0cce              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0008, t01=0x0044}
0x0cce…0ce0              Head {h00=0x000e, h01=0x0050, text=»  A37,  C «, t00=0x0008, t01=0x0056}
0x0ce0…0cf2              Head {h00=0x000e, h01=0x0050, text=»  A38,  C «, t00=0x0008, t01=0x0068}
0x0cf2…0d04              Head {h00=0x000e, h01=0x0050, text=»  APF,  C «, t00=0x0008, t01=0x007a}
0x0d04…0d16              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0008, t01=0x008c}
0x0d16…0d28              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0008, t01=0x009e}
0x0d28…0d3a              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0008, t01=0x00b0}
0x0d3a…0d4c              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0008, t01=0x00c2}
0x0d4c…0d5e              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0008, t01=0x00d4}
0x0d5e…0d70              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0008, t01=0x00e6}
0x0d70…0d82              Head {h00=0x000e, h01=0x0050, text=»  A46,  C «, t00=0x0008, t01=0x00f8}
0x0d82…0d94              Head {h00=0x000e, h01=0x0050, text=»  APF,  C «, t00=0x0008, t01=0x010a}
0x0d94…0da6              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0008, t01=0x011c}
0x0da6…0db8              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x0008, t01=0x012e}
0x0db8…0dfa              Head {h00=0x003e, h01=0x0050, text=»  APK,APK,APF,APF,A54,APF,APF,APF,APF,APF, FIELDS 50-59 C «, t00=0x0008, t01=0x0140}
0x0dfa…0e3c              Head {h00=0x003e, h01=0x0050, text=»  APF,APF,APF,APK,A64,A65,APK,ART,ART,ART, FIELDS 60-69 C «, t00=0x0008, t01=0x0182}
0x0e3c…0e7e              Head {h00=0x003e, h01=0x0050, text=»  A70,A71,ART,ART,ART,ART,A76,A77,A78,A79, FIELDS 70,79 C «, t00=0x0009, t01=0x0034}
0x0e7e…0ec0              Head {h00=0x003e, h01=0x0050, text=»  A80,A81,A82,A83,A84,A85,A86,A87,A88,A89, FIELDS 80-89 C «, t00=0x0009, t01=0x0076}
0x0ec0…0f02              Head {h00=0x003e, h01=0x0050, text=»  A90,A91,A92,A93,A94,ART,ART,ART,ART,ART, FIELDS 90,99 C «, t00=0x0009, t01=0x00b8}
0x0f02…0f36              Head {h00=0x0030, h01=0x0050, text=»  A100,A101,A102,A103,A104, FIELDS 100,104 C«, t00=0x0009, t01=0x00fa}
0x0f36…0f6a              Head {h00=0x0030, h01=0x0050, text=»  A105,A106,A107,A108,A109, FIELDS 105,109 C«, t00=0x0009, t01=0x012e}
0x0f6a…0f9c              Head {h00=0x002e, h01=0x0050, text=»  A110,A111,A112,ART,ART, FIELDS 110,114 C«, t00=0x0009, t01=0x0162}
0x0f9c…0fc8 (10, 0, 400) Head {h00=0x0028, h01=0x0050, text=»  ART,ART,ART,ART,ART,ART,  C EMPTY «, t00=0x000a, t01=0x0004}
0x0fc8…0fda              Head {h00=0x000e, h01=0x0050, text=»  A121,  C«, t00=0x000a, t01=0x0030}
0x0fda…0fec              Head {h00=0x000e, h01=0x0050, text=»  A122,  C«, t00=0x000a, t01=0x0042}
0x0fec…0ffe              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x000a, t01=0x0054}
0x0ffe…1010              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x000a, t01=0x0066}
0x1010…1022              Head {h00=0x000e, h01=0x0050, text=»  APK,  C «, t00=0x000a, t01=0x0078}
0x1022…1034              Head {h00=0x000e, h01=0x0050, text=»  ART,  C «, t00=0x000a, t01=0x008a}
0x1034…1046              Head {h00=0x000e, h01=0x0050, text=»  ART,  C «, t00=0x000a, t01=0x009c}
0x1046…1058              Head {h00=0x000e, h01=0x0050, text=»  ART,  C «, t00=0x000a, t01=0x00ae}
0x1058…106a              Head {h00=0x000e, h01=0x0050, text=»  ART,  C «, t00=0x000a, t01=0x00c0}
0x106a…107c              Head {h00=0x000e, h01=0x0050, text=»  A130,  C«, t00=0x000a, t01=0x00d2}
0x107c…108e              Head {h00=0x000e, h01=0x0050, text=»  A131,  C«, t00=0x000a, t01=0x00e4}
0x108e…10a0              Head {h00=0x000e, h01=0x0050, text=»  A132,  C«, t00=0x000a, t01=0x00f6}
0x10a0…10b2              Head {h00=0x000e, h01=0x0050, text=»  A133,  C«, t00=0x000a, t01=0x0108}
0x10b2…10c4              Head {h00=0x000e, h01=0x0050, text=»  A134,  C«, t00=0x000a, t01=0x011a}
0x10c4…10d6              Head {h00=0x000e, h01=0x0050, text=»  A135,  C«, t00=0x000a, t01=0x012c}
0x10d6…10e8              Head {h00=0x000e, h01=0x0050, text=»  A136,  C«, t00=0x000a, t01=0x013e}
0x10e8…10fa              Head {h00=0x000e, h01=0x0050, text=»  A137,  C«, t00=0x000a, t01=0x0150}
0x10fa…1108              Head {h00=0x000a, h01=0x0050, text=»  A138«, t00=0x000a, t01=0x0162}
0x1108…111a              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000a, t01=0x0170}
0x111a…1146              Head {h00=0x0028, h01=0x0050, text=»A05   CHECK REGISTRERINGSKONTONUMMER«, t00=0x000a, t01=0x0182}
0x1146…116e              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN1,SPBINW1 GET LENGTH«, t00=0x000b, t01=0x001e}
0x116e…119a              Head {h00=0x0028, h01=0x0050, text=» CBE GSWBIN1,CBIN4,A059 LENGTH = 4? «, t00=0x000b, t01=0x0046}
0x119a…11d4              Head {h00=0x0036, h01=0x0050, text=» CBL GSWBIN1,CBIN3,A065 TRANSTYPE HANDLING IN A065«, t00=0x000b, t01=0x0072}
0x11d4…1202              Head {h00=0x002a, h01=0x0050, text=» CMP GSWBIN1,CBIN10 LENGTH MUST BE 10 «, t00=0x000b, t01=0x00ac}
0x1202…1214              Head {h00=0x000e, h01=0x0050, text=» BNE A058 «, t00=0x000b, t01=0x00da}
0x1214…1232              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD1,SPINPUT «, t00=0x000b, t01=0x00ec}
0x1232…1256              Head {h00=0x0020, h01=0x0050, text=» PERF KTPLAN,GSWBCD1,GTKTTYP«, t00=0x000b, t01=0x010a}
0x1256…1274              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GTKTTYP «, t00=0x000b, t01=0x012e}
0x1274…128c              Head {h00=0x0014, h01=0x0050, text=» IB GSWBIN1,  C «, t00=0x000b, t01=0x014c}
0x128c…12c0              Head {h00=0x0030, h01=0x0050, text=»  A053,A053,A051,A053,A053,A052,A0570,A0575 «, t00=0x000b, t01=0x0164}
0x12c0…12cc              Head {h00=0x0008, h01=0x0050, text=»A051«, t00=0x000c, t01=0x0008}
0x12cc…12ec              Head {h00=0x001c, h01=0x0050, text=» B APK CPR NOT NECESSARY«, t00=0x000c, t01=0x0014}
0x12ec…130e              Head {h00=0x001e, h01=0x0050, text=»A052   REMIT. NOT ALLOWED «, t00=0x000c, t01=0x0034}
0x130e…1326              Head {h00=0x0014, h01=0x0050, text=» IB GTREGDEX,  C«, t00=0x000c, t01=0x0056}
0x1326…135e              Head {h00=0x0034, h01=0x0050, text=»  A0520,A0520,A0520,A0520,A0520, TR 1,2,3,4,5 C «, t00=0x000c, t01=0x006e}
0x135e…1396              Head {h00=0x0034, h01=0x0050, text=»  A0520,A0520,A0525,A0525,A0520, TR 6,7,8,9,10 C«, t00=0x000c, t01=0x00a6}
0x1396…13d0              Head {h00=0x0036, h01=0x0050, text=»  A0520,A0525,A0525,A0525,A0525 TR 12,18,19,28,29 «, t00=0x000c, t01=0x00de}
0x13d0…13de              Head {h00=0x000a, h01=0x0050, text=»A0520 «, t00=0x000c, t01=0x0118}
0x13de…13ec              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x000c, t01=0x0126}
0x13ec…13fa              Head {h00=0x000a, h01=0x0050, text=»A0525 «, t00=0x000c, t01=0x0134}
0x13fa…141c              Head {h00=0x001e, h01=0x0050, text=» MOVE SPBINW4,CBIN20 ERROR«, t00=0x000c, t01=0x0142}
0x141c…142a              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x000c, t01=0x0164}
0x142a…1446              Head {h00=0x0018, h01=0x0050, text=»A053   CPR NECESSARY«, t00=0x000c, t01=0x0172}
0x1446…145e              Head {h00=0x0014, h01=0x0050, text=» IB GTREGDEX,  C«, t00=0x000c, t01=0x018e}
0x145e…1490              Head {h00=0x002e, h01=0x0050, text=»  A054,A055,A054,A054,A055, TR 1,2,3,4,5 C«, t00=0x000d, t01=0x0016}
0x1490…14c4              Head {h00=0x0030, h01=0x0050, text=»  A054,A055,A055,A054,A054, TR 6,7,8,9,10 C «, t00=0x000d, t01=0x0048}
0x14c4…14f8              Head {h00=0x0030, h01=0x0050, text=»  A054,A055,A054,A055,A054 TR 12,18,19,28,29«, t00=0x000d, t01=0x007c}
0x14f8…1504              Head {h00=0x0008, h01=0x0050, text=»A054«, t00=0x000d, t01=0x00b0}
0x1504…1512              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x000d, t01=0x00bc}
0x1512…151e              Head {h00=0x0008, h01=0x0050, text=»A055«, t00=0x000d, t01=0x00ca}
0x151e…1544              Head {h00=0x0022, h01=0x0050, text=» CBL GSWBIN1,CBIN3,A056 ERROR «, t00=0x000d, t01=0x00d6}
0x1544…1562              Head {h00=0x001a, h01=0x0050, text=» SET SPWARNFL WARNING «, t00=0x000d, t01=0x00fc}
0x1562…1572              Head {h00=0x000c, h01=0x0050, text=» B A054 «, t00=0x000d, t01=0x011a}
0x1572…157e              Head {h00=0x0008, h01=0x0050, text=»A056«, t00=0x000d, t01=0x012a}
0x157e…159a              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN19«, t00=0x000d, t01=0x0136}
0x159a…15a8              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x000d, t01=0x0152}
0x15a8…15b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0160}
0x15b2…15d8              Head {h00=0x0022, h01=0x0050, text=»A0570   7: KNT.NO. NOT ALLOWED«, t00=0x000d, t01=0x016a}
0x15d8…15f4              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,=W'23'«, t00=0x000d, t01=0x0190}
0x15f4…1602              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x000e, t01=0x001c}
0x1602…160c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x002a}
0x160c…163a              Head {h00=0x002a, h01=0x0050, text=»A0575   8:KNT.NO. NOT ALLOWED IN SUPL «, t00=0x000e, t01=0x0034}
0x163a…1662              Head {h00=0x0024, h01=0x0050, text=» CBE GTREGDEX,CBIN10,A0577 TR 10«, t00=0x000e, t01=0x0062}
0x1662…1682              Head {h00=0x001c, h01=0x0050, text=» TBT TTSUPFLG,A0577 SUPL«, t00=0x000e, t01=0x008a}
0x1682…1694              Head {h00=0x000e, h01=0x0050, text=» B APK OK «, t00=0x000e, t01=0x00aa}
0x1694…16aa              Head {h00=0x0012, h01=0x0050, text=»A0577   NOT OK«, t00=0x000e, t01=0x00bc}
0x16aa…16c6              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN22«, t00=0x000e, t01=0x00d2}
0x16c6…16d4              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x000e, t01=0x00ee}
0x16d4…16de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00fc}
0x16de…16ea              Head {h00=0x0008, h01=0x0050, text=»A059«, t00=0x000e, t01=0x0106}
0x16ea…171c              Head {h00=0x002e, h01=0x0050, text=» CBL GTREGNR,=D'48',A058 ONLY ALLOWED WHEN«, t00=0x000e, t01=0x0112}
0x171c…1750              Head {h00=0x0030, h01=0x0050, text=» CBG GTREGNR,=D'49',A058 IN BUDGET TR.48/49 «, t00=0x000e, t01=0x0144}
0x1750…175e              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x000e, t01=0x0178}
0x175e…1768              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0186}
0x1768…1774              Head {h00=0x0008, h01=0x0050, text=»A058«, t00=0x000e, t01=0x0190}
0x1774…179e              Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW4,CBIN3 SET ERRORCODE «, t00=0x000f, t01=0x000c}
0x179e…17ac              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x000f, t01=0x0036}
0x17ac…17be              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000f, t01=0x0044}
0x17be…17e0              Head {h00=0x001e, h01=0x0050, text=»A06   CHECK CPR/CIR NUMBER«, t00=0x000f, t01=0x0056}
0x17e0…1808              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN1,SPBINW1 GET LENGTH«, t00=0x000f, t01=0x0078}
0x1808…1842              Head {h00=0x0036, h01=0x0050, text=» CBL GSWBIN1,CBIN3,A065 TRANSTYPE HANDLING IN A065«, t00=0x000f, t01=0x00a0}
0x1842…1856              Head {h00=0x0010, h01=0x0050, text=» PERF TESTAD«, t00=0x000f, t01=0x00da}
0x1856…1880              Head {h00=0x0026, h01=0x0050, text=» SET BCPR SET CPR-SWITCH (CPR-NO) «, t00=0x000f, t01=0x00ee}
0x1880…189e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD1,SPINPUT «, t00=0x000f, t01=0x0118}
0x189e…18c0              Head {h00=0x001e, h01=0x0050, text=» CMP GSWBCD1,=D'10000000' «, t00=0x000f, t01=0x0136}
0x18c0…18d0              Head {h00=0x000c, h01=0x0050, text=» BL A061«, t00=0x000f, t01=0x0158}
0x18d0…18ec              Head {h00=0x0018, h01=0x0050, text=» SET BLEV LEVERAND. «, t00=0x000f, t01=0x0168}
0x18ec…1910              Head {h00=0x0020, h01=0x0050, text=» CMP GSWBCD1,=D'3200000000' «, t00=0x000f, t01=0x0184}
0x1910…1920              Head {h00=0x000c, h01=0x0050, text=» BG APK «, t00=0x0010, t01=0x0018}
0x1920…1938              Head {h00=0x0014, h01=0x0050, text=» CLEAR BLEV CPR.«, t00=0x0010, t01=0x0028}
0x1938…1946              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x0010, t01=0x0040}
0x1946…1952              Head {h00=0x0008, h01=0x0050, text=»A061«, t00=0x0010, t01=0x004e}
0x1952…1980              Head {h00=0x002a, h01=0x0050, text=» CLEAR BCPR CLEAR CPR-SWITCH (CIR-NO) «, t00=0x0010, t01=0x005a}
0x1980…198e              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x0010, t01=0x0088}
0x198e…199c              Head {h00=0x000a, h01=0x0050, text=»******«, t00=0x0010, t01=0x0096}
0x199c…19a8              Head {h00=0x0008, h01=0x0050, text=»A065«, t00=0x0010, t01=0x00a4}
0x19a8…19e2              Head {h00=0x0036, h01=0x0050, text=» MOVE SPBINW1,CBIN0 SET LENGTH TO ZERO (FUNCTION) «, t00=0x0010, t01=0x00b0}
0x19e2…1a12              Head {h00=0x002c, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT GET NEW TRANSTYPE «, t00=0x0010, t01=0x00ea}
0x1a12…1a1c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x011a}
0x1a1c…1a44              Head {h00=0x0024, h01=0x0050, text=» CMP SPBINW2,=W'30' ADM ROUTINE «, t00=0x0010, t01=0x0124}
0x1a44…1a54              Head {h00=0x000c, h01=0x0050, text=» BE ART «, t00=0x0010, t01=0x014c}
0x1a54…1a76              Head {h00=0x001e, h01=0x0050, text=» CMP SPBINW2,=W'31' CYCLE «, t00=0x0010, t01=0x015c}
0x1a76…1a86              Head {h00=0x000c, h01=0x0050, text=» BE ART «, t00=0x0010, t01=0x017e}
0x1a86…1a90              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x018e}
0x1a90…1abc              Head {h00=0x0028, h01=0x0050, text=»*          CHECK FOR VALID TRANSTYPE«, t00=0x0011, t01=0x0008}
0x1abc…1ac6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0034}
0x1ac6…1ae6              Head {h00=0x001c, h01=0x0050, text=»*          ADJUST REGDEX«, t00=0x0011, t01=0x003e}
0x1ae6…1af4              Head {h00=0x000a, h01=0x0050, text=»A0655 «, t00=0x0011, t01=0x005e}
0x1af4…1afe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x006c}
0x1afe…1b1a              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x0011, t01=0x0076}
0x1b1a…1b56              Head {h00=0x0038, h01=0x0050, text=»*   TEST FOR CORRECT TRANSACTIONS IN THIS CONNECTION«, t00=0x0011, t01=0x0092}
0x1b56…1b70              Head {h00=0x0016, h01=0x0050, text=» TBT GTKASSE,A0672«, t00=0x0011, t01=0x00ce}
0x1b70…1baa              Head {h00=0x0036, h01=0x0050, text=» CBG GSWBCD3,=D'30',A067 CORRECT FOR NOT IN KASSE «, t00=0x0011, t01=0x00e8}
0x1baa…1bba              Head {h00=0x000c, h01=0x0050, text=» B A0675«, t00=0x0011, t01=0x0122}
0x1bba…1bc8              Head {h00=0x000a, h01=0x0050, text=»A0672 «, t00=0x0011, t01=0x0132}
0x1bc8…1bfa              Head {h00=0x002e, h01=0x0050, text=» CBL GSWBCD3,=D'30',A067 CORRECT IN KASSE «, t00=0x0011, t01=0x0140}
0x1bfa…1c02              Head {h00=0x0004, h01=0x0050, t00=0x0011, t01=0x0172}
0x1c02…1c12              Head {h00=0x000c, h01=0x0050, text=» B A0675«, t00=0x0011, t01=0x017a}
0x1c12…1c1c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x018a}
0x1c1c…1c28 (18, 0, 400) Head {h00=0x0008, h01=0x0050, text=»A067«, t00=0x0012, t01=0x0004}
0x1c28…1c68              Head {h00=0x003c, h01=0x0050, text=» CBE GSWBCD3,CREGTAB(GSWBIN1,GTCLASS),A068 SEARCH REGNR «, t00=0x0012, t01=0x0010}
0x1c68…1c92              Head {h00=0x0026, h01=0x0050, text=» ADD GSWBIN1,CBIN1 ADD 1 TO INDEX «, t00=0x0012, t01=0x0050}
0x1c92…1cd2              Head {h00=0x003c, h01=0x0050, text=» CBNE CREGTAB(GSWBIN1,GTCLASS),=D'-1',A067 END OF TABLE?«, t00=0x0012, t01=0x007a}
0x1cd2…1cdc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ba}
0x1cdc…1cea              Head {h00=0x000a, h01=0x0050, text=»A0675 «, t00=0x0012, t01=0x00c4}
0x1cea…1d18              Head {h00=0x002a, h01=0x0050, text=» MOVE SPBINW4,CBIN9 INVALID TRANSTYPE «, t00=0x0012, t01=0x00d2}
0x1d18…1d26              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0012, t01=0x0100}
0x1d26…1d32              Head {h00=0x0008, h01=0x0050, text=»A068«, t00=0x0012, t01=0x010e}
0x1d32…1d56              Head {h00=0x0020, h01=0x0050, text=» TBF TTCY5FLG,A069 IN CYK 5?«, t00=0x0012, t01=0x011a}
0x1d56…1d88              Head {h00=0x002e, h01=0x0050, text=» CBL GSWBCD3,=D'8',A0675 IF SO, ONLY TRANS«, t00=0x0012, t01=0x013e}
0x1d88…1db4              Head {h00=0x0028, h01=0x0050, text=» CBG GSWBCD3,=D'9',A0675 8/9 ALLOWED«, t00=0x0012, t01=0x0170}
0x1db4…1dc0              Head {h00=0x0008, h01=0x0050, text=»A069«, t00=0x0013, t01=0x000c}
0x1dc0…1de6              Head {h00=0x0022, h01=0x0050, text=»   TAKE CARE OF NEW TRANSTYPE «, t00=0x0013, t01=0x0018}
0x1de6…1e20              Head {h00=0x0036, h01=0x0050, text=» CBE SPBINW2,CBIN18,A06KRE HANDLING OF KREDIT KEY «, t00=0x0013, t01=0x003e}
0x1e20…1e50              Head {h00=0x002c, h01=0x0050, text=» CBE SPBINW2,CBIN17,A06DEB SLUT/DEB KEY «, t00=0x0013, t01=0x0078}
0x1e50…1e88              Head {h00=0x0034, h01=0x0050, text=» CBE SPBINW2,CBIN3,A06DEB HANDLING OF DEBIT KEY «, t00=0x0013, t01=0x00a8}
0x1e88…1eba              Head {h00=0x002e, h01=0x0050, text=» MOVE SPBINW4,CBIN4 HANDLING OF WRONG KEY «, t00=0x0013, t01=0x00e0}
0x1eba…1ec8              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0013, t01=0x0112}
0x1ec8…1ed6              Head {h00=0x000a, h01=0x0050, text=»A06KRE«, t00=0x0013, t01=0x0120}
0x1ed6…1eea              Head {h00=0x0010, h01=0x0050, text=» PERF SETKRE«, t00=0x0013, t01=0x012e}
0x1eea…1efa              Head {h00=0x000c, h01=0x0050, text=» B A066 «, t00=0x0013, t01=0x0142}
0x1efa…1f08              Head {h00=0x000a, h01=0x0050, text=»A06DEB«, t00=0x0013, t01=0x0152}
0x1f08…1f1c              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0013, t01=0x0160}
0x1f1c…1f28              Head {h00=0x0008, h01=0x0050, text=»A066«, t00=0x0013, t01=0x0174}
0x1f28…1f46              Head {h00=0x001a, h01=0x0050, text=» MOVE GTREGNR,GSWBCD3 «, t00=0x0013, t01=0x0180}
0x1f46…1f64              Head {h00=0x001a, h01=0x0050, text=» MOVE GTREGDEX,GSWBIN1«, t00=0x0014, t01=0x000e}
0x1f64…1f90              Head {h00=0x0028, h01=0x0050, text=» SET GTREGFLG VALID TRANSTYPE FOUND «, t00=0x0014, t01=0x002c}
0x1f90…1fb6              Head {h00=0x0022, h01=0x0050, text=» SET TTEORFLG START NEW TRANS «, t00=0x0014, t01=0x0058}
0x1fb6…1fc0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x007e}
0x1fc0…1ffa              Head {h00=0x0036, h01=0x0050, text=» MOVE SPBINW2,=W'36' SIMULATE TRANSACTION SELECTED«, t00=0x0014, t01=0x0088}
0x1ffa…2008              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0014, t01=0x00c2}
0x2008…201a              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0014, t01=0x00d0}
0x201a…2032              Head {h00=0x0014, h01=0x0050, text=»A07   BKO FIELD «, t00=0x0014, t01=0x00e2}
0x2032…2054              Head {h00=0x001e, h01=0x0050, text=»   INSERT TEXT IN TT07TXT «, t00=0x0014, t01=0x00fa}
0x2054…206a              Head {h00=0x0012, h01=0x0050, text=» CLEAR TTASKAT«, t00=0x0014, t01=0x011c}
0x206a…2088              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT «, t00=0x0014, t01=0x0132}
0x2088…20aa              Head {h00=0x001e, h01=0x0050, text=» CBNE GSWBCD3,=D'51',A070 «, t00=0x0014, t01=0x0150}
0x20aa…20be              Head {h00=0x0010, h01=0x0050, text=» SET TTASKAT«, t00=0x0014, t01=0x0172}
0x20be…20ca              Head {h00=0x0008, h01=0x0050, text=»A070«, t00=0x0014, t01=0x0186}
0x20ca…20ec (21, 0, 400) Head {h00=0x001e, h01=0x0050, text=» CBNE GTREGDEX,CBIN3,A0705«, t00=0x0015, t01=0x0004}
0x20ec…2114              Head {h00=0x0024, h01=0x0050, text=» CBE GSWBCD3,=D'51',A076 TRANS 3«, t00=0x0015, t01=0x0026}
0x2114…2134              Head {h00=0x001c, h01=0x0050, text=» CBE GSWBCD3,=D'52',A076«, t00=0x0015, t01=0x004e}
0x2134…2142              Head {h00=0x000a, h01=0x0050, text=»A0705 «, t00=0x0015, t01=0x006e}
0x2142…2172              Head {h00=0x002c, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 GET LENGTH OF STRING«, t00=0x0015, t01=0x007c}
0x2172…21a4              Head {h00=0x002e, h01=0x0050, text=» COPY TT07TXT,CBIN0,CBIN5,CTTXT07,GSWBIN1 «, t00=0x0015, t01=0x00ac}
0x21a4…21c2              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD3,TT07TXT «, t00=0x0015, t01=0x00de}
0x21c2…21e0              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBCD3 «, t00=0x0015, t01=0x00fc}
0x21e0…21fe              Head {h00=0x001a, h01=0x0050, text=» MOVE TT07TXT,CBLANKS «, t00=0x0015, t01=0x011a}
0x21fe…222e              Head {h00=0x002c, h01=0x0050, text=» MOVE GSWBIN1,CBIN5 FIRST CHAR, POINTER «, t00=0x0015, t01=0x0138}
0x222e…224a              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 «, t00=0x0015, t01=0x0168}
0x224a…226a              Head {h00=0x001c, h01=0x0050, text=» CBNG SPBINW1,CBIN2,A071«, t00=0x0015, t01=0x0184}
0x226a…22a0              Head {h00=0x0032, h01=0x0050, text=» MOVE GSWBIN3,CBIN1 ADJUST DUPPED FIELD INDEX «, t00=0x0016, t01=0x0014}
0x22a0…22ac              Head {h00=0x0008, h01=0x0050, text=»A071«, t00=0x0016, t01=0x004a}
0x22ac…22c6              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN1,CBIN7«, t00=0x0016, t01=0x0056}
0x22c6…22d4              Head {h00=0x000a, h01=0x0050, text=»A0708 «, t00=0x0016, t01=0x0070}
0x22d4…22ee              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN7«, t00=0x0016, t01=0x007e}
0x22ee…2310              Head {h00=0x001e, h01=0x0050, text=» CBG GSWBIN1,GSWBIN2,A075 «, t00=0x0016, t01=0x0098}
0x2310…234a              Head {h00=0x0036, h01=0x0050, text=» MATCH CTTXT07,GSWBIN1,CBIN2,SPINPUT,GSWBIN3,CBIN2«, t00=0x0016, t01=0x00ba}
0x234a…235e              Head {h00=0x0010, h01=0x0050, text=» BNOK A0708 «, t00=0x0016, t01=0x00f4}
0x235e…2382              Head {h00=0x0020, h01=0x0050, text=»*  NEXT 5 CHARS CONTAIN TEXT«, t00=0x0016, t01=0x0108}
0x2382…239c              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN2«, t00=0x0016, t01=0x012c}
0x239c…23ce              Head {h00=0x002e, h01=0x0050, text=» COPY TT07TXT,CBIN0,CBIN5,CTTXT07,GSWBIN1 «, t00=0x0016, t01=0x0146}
0x23ce…23f0              Head {h00=0x001e, h01=0x0050, text=»*          SEE IF ALLOWED «, t00=0x0016, t01=0x0178}
0x23f0…242c              Head {h00=0x0038, h01=0x0050, text=» CBNE GTREGDEX,CBIN3,A077 ONLY CHECK IF TRANSTYPE 3 «, t00=0x0017, t01=0x000a}
0x242c…2446              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN5«, t00=0x0017, t01=0x0046}
0x2446…2464              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR2,CBLANKS «, t00=0x0017, t01=0x0060}
0x2464…249e              Head {h00=0x0036, h01=0x0050, text=» COPY GSWSTR2,CBIN1,CBIN1,CTTXT07,GSWBIN1 GET TYPE«, t00=0x0017, t01=0x007e}
0x249e…24bc              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD3,GSWSTR2 «, t00=0x0017, t01=0x00b8}
0x24bc…24de              Head {h00=0x001e, h01=0x0050, text=» CBE GSWBCD3,=D'0',A077 OK«, t00=0x0017, t01=0x00d6}
0x24de…250a              Head {h00=0x0028, h01=0x0050, text=» CBL GTREGF(CBIN2),=D'10000000',A072«, t00=0x0017, t01=0x00f8}
0x250a…253c              Head {h00=0x002e, h01=0x0050, text=» CBE GSWBCD3,=D'1',A077 CPR - BKO ALLOWED «, t00=0x0017, t01=0x0124}
0x253c…254c              Head {h00=0x000c, h01=0x0050, text=» B A076 «, t00=0x0017, t01=0x0156}
0x254c…2558              Head {h00=0x0008, h01=0x0050, text=»A072«, t00=0x0017, t01=0x0166}
0x2558…258a              Head {h00=0x002e, h01=0x0050, text=» CBE GSWBCD3,=D'2',A077 CIR - BKO ALLOWED «, t00=0x0017, t01=0x0172}
0x258a…259a              Head {h00=0x000c, h01=0x0050, text=» B A076 «, t00=0x0018, t01=0x0014}
0x259a…25a6              Head {h00=0x0008, h01=0x0050, text=»A075«, t00=0x0018, t01=0x0024}
0x25a6…25c0              Head {h00=0x0016, h01=0x0050, text=» TBT CBKOFLG,A077 «, t00=0x0018, t01=0x0030}
0x25c0…25cc              Head {h00=0x0008, h01=0x0050, text=»A076«, t00=0x0018, t01=0x004a}
0x25cc…25e8              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN11«, t00=0x0018, t01=0x0056}
0x25e8…25f6              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0018, t01=0x0072}
0x25f6…2602              Head {h00=0x0008, h01=0x0050, text=»A077«, t00=0x0018, t01=0x0080}
0x2602…2616              Head {h00=0x0010, h01=0x0050, text=» PERF TESTAD«, t00=0x0018, t01=0x008c}
0x2616…2624              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x0018, t01=0x00a0}
0x2624…2636              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0018, t01=0x00ae}
0x2636…265e              Head {h00=0x0024, h01=0x0050, text=»A11   CHECK VAL DATE NOT GREATER«, t00=0x0018, t01=0x00c0}
0x265e…2678              Head {h00=0x0016, h01=0x0050, text=»   THAN POST DATE «, t00=0x0018, t01=0x00e8}
0x2678…26a2              Head {h00=0x0026, h01=0x0050, text=» CBE GTREGDEX,CBIN3,A0110 TRANS 3 «, t00=0x0018, t01=0x0102}
0x26a2…26cc              Head {h00=0x0026, h01=0x0050, text=» CBE GTREGDEX,CBIN4,A0110 TRANS 4 «, t00=0x0018, t01=0x012c}
0x26cc…26e0              Head {h00=0x0010, h01=0x0050, text=» PERF TESTAD«, t00=0x0018, t01=0x0156}
0x26e0…26ee              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x0018, t01=0x016a}
0x26ee…26fc              Head {h00=0x000a, h01=0x0050, text=»A0110 «, t00=0x0018, t01=0x0178}
0x26fc…2724              Head {h00=0x0024, h01=0x0050, text=»*     GET AND CHANGE VALOERDATE «, t00=0x0018, t01=0x0186}
0x2724…2742              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD6,SPINPUT «, t00=0x0019, t01=0x001e}
0x2742…2772              Head {h00=0x002c, h01=0x0050, text=» COPY GSWBCD3,CBIN4,CBIN2,GSWBCD6,CBIN12«, t00=0x0019, t01=0x003c}
0x2772…27a2              Head {h00=0x002c, h01=0x0050, text=» COPY GSWBCD6,CBIN12,CBIN2,GSWBCD6,CBIN8«, t00=0x0019, t01=0x006c}
0x27a2…27d2              Head {h00=0x002c, h01=0x0050, text=» COPY GSWBCD6,CBIN8,CBIN2,GSWBCD3,CBIN4 «, t00=0x0019, t01=0x009c}
0x27d2…27f8              Head {h00=0x0022, h01=0x0050, text=»*     GET AND CHANGE POSTDATE «, t00=0x0019, t01=0x00cc}
0x27f8…2814              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD1,GTDATO«, t00=0x0019, t01=0x00f2}
0x2814…2844              Head {h00=0x002c, h01=0x0050, text=» COPY GSWBCD3,CBIN4,CBIN2,GSWBCD1,CBIN12«, t00=0x0019, t01=0x010e}
0x2844…2874              Head {h00=0x002c, h01=0x0050, text=» COPY GSWBCD1,CBIN12,CBIN2,GSWBCD1,CBIN8«, t00=0x0019, t01=0x013e}
0x2874…28a4              Head {h00=0x002c, h01=0x0050, text=» COPY GSWBCD1,CBIN8,CBIN2,GSWBCD3,CBIN4 «, t00=0x0019, t01=0x016e}
0x28a4…28ba              Head {h00=0x0012, h01=0x0050, text=»*     COMPARE «, t00=0x001a, t01=0x000e}
0x28ba…28d6              Head {h00=0x0018, h01=0x0050, text=» CMP GSWBCD6,GSWBCD1«, t00=0x001a, t01=0x0024}
0x28d6…28e6              Head {h00=0x000c, h01=0x0050, text=» BNG APK«, t00=0x001a, t01=0x0040}
0x28e6…2902              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN7 «, t00=0x001a, t01=0x0050}
0x2902…2910              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x001a, t01=0x006c}
0x2910…2922              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001a, t01=0x007a}
0x2922…292e              Head {h00=0x0008, h01=0x0050, text=»A12 «, t00=0x001a, t01=0x008c}
0x292e…293a              Head {h00=0x0008, h01=0x0050, text=»A22 «, t00=0x001a, t01=0x0098}
0x293a…2946              Head {h00=0x0008, h01=0x0050, text=»A23 «, t00=0x001a, t01=0x00a4}
0x2946…2952              Head {h00=0x0008, h01=0x0050, text=»A24 «, t00=0x001a, t01=0x00b0}
0x2952…295e              Head {h00=0x0008, h01=0x0050, text=»A25 «, t00=0x001a, t01=0x00bc}
0x295e…296a              Head {h00=0x0008, h01=0x0050, text=»A26 «, t00=0x001a, t01=0x00c8}
0x296a…2976              Head {h00=0x0008, h01=0x0050, text=»A27 «, t00=0x001a, t01=0x00d4}
0x2976…2982              Head {h00=0x0008, h01=0x0050, text=»A37 «, t00=0x001a, t01=0x00e0}
0x2982…298e              Head {h00=0x0008, h01=0x0050, text=»A38 «, t00=0x001a, t01=0x00ec}
0x298e…299a              Head {h00=0x0008, h01=0x0050, text=»A46 «, t00=0x001a, t01=0x00f8}
0x299a…29ae              Head {h00=0x0010, h01=0x0050, text=» PERF TESTAD«, t00=0x001a, t01=0x0104}
0x29ae…29bc              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x001a, t01=0x0118}
0x29bc…29ce              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001a, t01=0x0126}
0x29ce…29f4              Head {h00=0x0022, h01=0x0050, text=»A17   CHECK 'FORFALDSAAR' FAAR«, t00=0x001a, t01=0x0138}
0x29f4…2a0a              Head {h00=0x0012, h01=0x0050, text=»   FAAR >= 70 «, t00=0x001a, t01=0x015e}
0x2a0a…2a22              Head {h00=0x0014, h01=0x0050, text=»   FAAR <= YY+2 «, t00=0x001a, t01=0x0174}
0x2a22…2a48              Head {h00=0x0022, h01=0x0050, text=» MOVE GSWBCD6,SPINPUT GET FAAR«, t00=0x001a, t01=0x018c}
0x2a48…2a7e              Head {h00=0x0032, h01=0x0050, text=» CBL GSWBCD6,=D'70',A17ERR LESS THAN 70: ERROR«, t00=0x001b, t01=0x0022}
0x2a7e…2aa8              Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBCD1,GTDATO GET POSTDATO «, t00=0x001b, t01=0x0058}
0x2aa8…2ac4              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD3,=D'2' «, t00=0x001b, t01=0x0082}
0x2ac4…2afe              Head {h00=0x0036, h01=0x0050, text=» COPY GSWBCD3,CBIN4,CBIN2,GSWBCD1,CBIN12 GET YEAR «, t00=0x001b, t01=0x009e}
0x2afe…2b1e              Head {h00=0x001c, h01=0x0050, text=» ADD GSWBCD3,=D'2' ADD 2«, t00=0x001b, t01=0x00d8}
0x2b1e…2b50              Head {h00=0x002e, h01=0x0050, text=» CBG GSWBCD6,GSWBCD3,A17ERR MORE THAN YY+2«, t00=0x001b, t01=0x00f8}
0x2b50…2b5e              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x001b, t01=0x012a}
0x2b5e…2b6c              Head {h00=0x000a, h01=0x0050, text=»A17ERR«, t00=0x001b, t01=0x0138}
0x2b6c…2b98              Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW4,CBIN11 INVALID NUMBER «, t00=0x001b, t01=0x0146}
0x2b98…2ba6              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x001b, t01=0x0172}
0x2ba6…2bb8              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001b, t01=0x0180}
0x2bb8…2be0 (28, 0, 400) Head {h00=0x0024, h01=0x0050, text=»A54   FIELD 54 HAS BEEN ENTERED «, t00=0x001c, t01=0x0004}
0x2be0…2c1c              Head {h00=0x0038, h01=0x0050, text=» MOVE GSSWITCH(CBIN2),CBIN1 AND SHOULD BE AUTODUPPED«, t00=0x001c, t01=0x002c}
0x2c1c…2c2a              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x001c, t01=0x0068}
0x2c2a…2c3c              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001c, t01=0x0076}
0x2c3c…2c48              Head {h00=0x0008, h01=0x0050, text=»A64 «, t00=0x001c, t01=0x0088}
0x2c48…2c80              Head {h00=0x0034, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT GET 'PRISREGULERINGSKODE' «, t00=0x001c, t01=0x0094}
0x2c80…2ca0              Head {h00=0x001c, h01=0x0050, text=» CBG GSWBCD3,=D'5',A649 «, t00=0x001c, t01=0x00cc}
0x2ca0…2cc0              Head {h00=0x001c, h01=0x0050, text=» CBL GSWBCD3,=D'0',A649 «, t00=0x001c, t01=0x00ec}
0x2cc0…2ce8              Head {h00=0x0024, h01=0x0050, text=»   FIELD 64 HAS BEEN ENTERED AND«, t00=0x001c, t01=0x010c}
0x2ce8…2d22              Head {h00=0x0036, h01=0x0050, text=» MOVE GSSWITCH(CBIN12),CBIN1 SHOULD BE GTAUTODPPED«, t00=0x001c, t01=0x0134}
0x2d22…2d30              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x001c, t01=0x016e}
0x2d30…2d3c              Head {h00=0x0008, h01=0x0050, text=»A649«, t00=0x001c, t01=0x017c}
0x2d3c…2d58              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN10«, t00=0x001c, t01=0x0188}
0x2d58…2d66              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x001d, t01=0x0014}
0x2d66…2d78              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001d, t01=0x0022}
0x2d78…2d9c              Head {h00=0x0020, h01=0x0050, text=»A65   CHECK VALUE 1000-3999 «, t00=0x001d, t01=0x0034}
0x2d9c…2dc4              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBCD4,SPINPUT GET VALUE «, t00=0x001d, t01=0x0058}
0x2dc4…2de6              Head {h00=0x001e, h01=0x0050, text=» CBG GSWBCD4,=D'3999',A659«, t00=0x001d, t01=0x0080}
0x2de6…2e08              Head {h00=0x001e, h01=0x0050, text=» CBL GSWBCD4,=D'1000',A659«, t00=0x001d, t01=0x00a2}
0x2e08…2e16              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x001d, t01=0x00c4}
0x2e16…2e22              Head {h00=0x0008, h01=0x0050, text=»A659«, t00=0x001d, t01=0x00d2}
0x2e22…2e3e              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN11«, t00=0x001d, t01=0x00de}
0x2e3e…2e4c              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x001d, t01=0x00fa}
0x2e4c…2e5e              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001d, t01=0x0108}
0x2e5e…2e82              Head {h00=0x0020, h01=0x0050, text=»A70   KONTONR WITHOUT CHECK «, t00=0x001d, t01=0x011a}
0x2e82…2e9e              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN5 «, t00=0x001d, t01=0x013e}
0x2e9e…2eb8              Head {h00=0x0016, h01=0x0050, text=» CMP SPBINW1,CBIN3«, t00=0x001d, t01=0x015a}
0x2eb8…2ed6              Head {h00=0x001a, h01=0x0050, text=» BL A065 IF LENGTH < 3«, t00=0x001d, t01=0x0174}
0x2ed6…2ef2 (30, 0, 400) Head {h00=0x0018, h01=0x0050, text=» B APK NEW TRANSTYPE«, t00=0x001e, t01=0x0004}
0x2ef2…2f04              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001e, t01=0x0020}
0x2f04…2f10              Head {h00=0x0008, h01=0x0050, text=»A71 «, t00=0x001e, t01=0x0032}
0x2f10…2f40              Head {h00=0x002c, h01=0x0050, text=» MOVE GSSWITCH(CBIN1),CBIN1 SET AUTODUP «, t00=0x001e, t01=0x003e}
0x2f40…2f5c              Head {h00=0x0018, h01=0x0050, text=» MOVE GTSUM,SPINPUT «, t00=0x001e, t01=0x006e}
0x2f5c…2f86              Head {h00=0x0026, h01=0x0050, text=» SUB GTSUM,=D'1' SUB 1 FROM ANTAL «, t00=0x001e, t01=0x008a}
0x2f86…2fa2              Head {h00=0x0018, h01=0x0050, text=» MOVE SPINPUT,GTSUM «, t00=0x001e, t01=0x00b4}
0x2fa2…2fc0              Head {h00=0x001a, h01=0x0050, text=» CBL GTSUM,=D'0',A715 «, t00=0x001e, t01=0x00d0}
0x2fc0…2fe2              Head {h00=0x001e, h01=0x0050, text=» CMP GTSUM,=D'12' IF > 12 «, t00=0x001e, t01=0x00ee}
0x2fe2…2ff2              Head {h00=0x000c, h01=0x0050, text=» BL ART «, t00=0x001e, t01=0x0110}
0x2ff2…2ffe              Head {h00=0x0008, h01=0x0050, text=»A715«, t00=0x001e, t01=0x0120}
0x2ffe…3028              Head {h00=0x0026, h01=0x0050, text=» MOVE SPINPUT,=C'51' SIMULATE NEW «, t00=0x001e, t01=0x012c}
0x3028…304e              Head {h00=0x0022, h01=0x0050, text=» MOVE SPBINW2,CBIN3 TRANSTYPE «, t00=0x001e, t01=0x0156}
0x304e…3080              Head {h00=0x002e, h01=0x0050, text=» MOVE GSSWITCH(CBIN1),CBIN0 DELETE AUTODUP«, t00=0x001e, t01=0x017c}
0x3080…3090              Head {h00=0x000c, h01=0x0050, text=» B A065 «, t00=0x001f, t01=0x001e}
0x3090…30a2              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001f, t01=0x002e}
0x30a2…30c4              Head {h00=0x001e, h01=0x0050, text=»A76   COUNTER NO, TRANS 12«, t00=0x001f, t01=0x0040}
0x30c4…30de              Head {h00=0x0016, h01=0x0050, text=» CMP SPBINW1,CBIN3«, t00=0x001f, t01=0x0062}
0x30de…3102              Head {h00=0x0020, h01=0x0050, text=» BL A065 TRANSTYPE HANDLING «, t00=0x001f, t01=0x007c}
0x3102…312a              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT GET VALUE «, t00=0x001f, t01=0x00a0}
0x312a…3148              Head {h00=0x001a, h01=0x0050, text=» MOVE TTCNTNR,SPINPUT «, t00=0x001f, t01=0x00c8}
0x3148…316e              Head {h00=0x0022, h01=0x0050, text=» SUB GSWBCD3,=D'100' GET INDEX«, t00=0x001f, t01=0x00e6}
0x316e…318c              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD3 «, t00=0x001f, t01=0x010c}
0x318c…31ba              Head {h00=0x002a, h01=0x0050, text=» CBG GSWBIN1,CTR12(GTUWB,CBIN2),A76NOK«, t00=0x001f, t01=0x012a}
0x31ba…31ea              Head {h00=0x002c, h01=0x0050, text=» CBL GSWBCD3,=D'1',A76NOK MIN COUNTER NO«, t00=0x001f, t01=0x0158}
0x31ea…3212              Head {h00=0x0024, h01=0x0050, text=» ADD GSWBIN1,CTR12(GTUWB,CBIN1) «, t00=0x001f, t01=0x0188}
0x3212…323c              Head {h00=0x0026, h01=0x0050, text=» CBE CTR12NR(GSWBIN1),=D'0',A76NOK«, t00=0x0020, t01=0x0020}
0x323c…3252              Head {h00=0x0012, h01=0x0050, text=»   MUST BE > 0«, t00=0x0020, t01=0x004a}
0x3252…3274              Head {h00=0x001e, h01=0x0050, text=» B ART TO WRITE ON SCREEN «, t00=0x0020, t01=0x0060}
0x3274…3282              Head {h00=0x000a, h01=0x0050, text=»A76NOK«, t00=0x0020, t01=0x0082}
0x3282…329e              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN18«, t00=0x0020, t01=0x0090}
0x329e…32ac              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0020, t01=0x00ac}
0x32ac…32be              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0020, t01=0x00ba}
0x32be…32e0              Head {h00=0x001e, h01=0x0050, text=»A77   INSERT 51,52 IN TR 4«, t00=0x0020, t01=0x00cc}
0x32e0…3304              Head {h00=0x0020, h01=0x0050, text=» MOVE SPBINW3,CBIN7 FIELD 7 «, t00=0x0020, t01=0x00ee}
0x3304…3326              Head {h00=0x001e, h01=0x0050, text=» MOVE SPBINW1,CBIN2 LENGTH«, t00=0x0020, t01=0x0112}
0x3326…333c              Head {h00=0x0012, h01=0x0050, text=» TBT BCPR,A775«, t00=0x0020, t01=0x0134}
0x333c…3368              Head {h00=0x0028, h01=0x0050, text=» MOVE SPINPUT,=X'35310000' 51 IF CIR«, t00=0x0020, t01=0x014a}
0x3368…3376              Head {h00=0x000a, h01=0x0050, text=» B A07«, t00=0x0020, t01=0x0176}
0x3376…3382              Head {h00=0x0008, h01=0x0050, text=»A775«, t00=0x0020, t01=0x0184}
0x3382…33ae              Head {h00=0x0028, h01=0x0050, text=» MOVE SPINPUT,=X'35320000' 52 IF CPR«, t00=0x0020, t01=0x0190}
0x33ae…33bc              Head {h00=0x000a, h01=0x0050, text=» B A07«, t00=0x0021, t01=0x002c}
0x33bc…33ce              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0021, t01=0x003a}
0x33ce…33ee              Head {h00=0x001c, h01=0x0050, text=»A78   INSERT ACCOUNT NO «, t00=0x0021, t01=0x004c}
0x33ee…33fe              Head {h00=0x000c, h01=0x0050, text=»   11-15«, t00=0x0021, t01=0x006c}
0x33fe…342a              Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW3,CBIN5 SIMULATE FIELD 5«, t00=0x0021, t01=0x007c}
0x342a…3438              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x0021, t01=0x00a8}
0x3438…3448              Head {h00=0x000c, h01=0x0050, text=»********«, t00=0x0021, t01=0x00b6}
0x3448…3468              Head {h00=0x001c, h01=0x0050, text=»A79   AUTODUP ACCOUNT NO«, t00=0x0021, t01=0x00c6}
0x3468…348e              Head {h00=0x0022, h01=0x0050, text=» MOVE SPBINW3,CBIN5 IN FIELD 5«, t00=0x0021, t01=0x00e6}
0x348e…34ba              Head {h00=0x0028, h01=0x0050, text=» MOVE GSWBIN1,TTCNTNR GET COUNTER NO«, t00=0x0021, t01=0x010c}
0x34ba…34d6              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN1,=W'100'«, t00=0x0021, t01=0x0138}
0x34d6…34fe              Head {h00=0x0024, h01=0x0050, text=» ADD GSWBIN1,CTR12(GTUWB,CBIN1) «, t00=0x0021, t01=0x0154}
0x34fe…3524              Head {h00=0x0022, h01=0x0050, text=» MOVE SPINPUT,CTR12NR(GSWBIN1)«, t00=0x0021, t01=0x017c}
0x3524…3548              Head {h00=0x0020, h01=0x0050, text=» MOVE SPBINW1,CBIN10 LENGTH «, t00=0x0022, t01=0x0012}
0x3548…3556              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x0022, t01=0x0036}
0x3556…3568              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0022, t01=0x0044}
0x3568…358e              Head {h00=0x0022, h01=0x0050, text=»A80   CHECK HOVEDBOG, KONTONR «, t00=0x0022, t01=0x0056}
0x358e…35b2              Head {h00=0x0020, h01=0x0050, text=» MOVE SPBINW3,CBIN5 FIELD 5 «, t00=0x0022, t01=0x007c}
0x35b2…35e2              Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW5,CBIN2 MIGHT BE TRANSTYPE 2«, t00=0x0022, t01=0x00a0}
0x35e2…360e              Head {h00=0x0028, h01=0x0050, text=» CBL SPBINW1,CBIN3,A805 CHECK LENGTH«, t00=0x0022, t01=0x00d0}
0x360e…363a              Head {h00=0x0028, h01=0x0050, text=» CBE SPBINW1,CBIN10,A801 MUST BE 10 «, t00=0x0022, t01=0x00fc}
0x363a…3662              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,CBIN3 ERROR LENGTH«, t00=0x0022, t01=0x0128}
0x3662…3670              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0022, t01=0x0150}
0x3670…367c              Head {h00=0x0008, h01=0x0050, text=»A801«, t00=0x0022, t01=0x015e}
0x367c…369a              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD1,SPINPUT «, t00=0x0022, t01=0x016a}
0x369a…36be              Head {h00=0x0020, h01=0x0050, text=» PERF KTPLAN,GSWBCD1,GTKTTYP«, t00=0x0022, t01=0x0188}
0x36be…36e0              Head {h00=0x001e, h01=0x0050, text=» PERF SELTR TRANS SELECTED«, t00=0x0023, t01=0x001c}
0x36e0…36fe              Head {h00=0x001a, h01=0x0050, text=» BNOK ART INVALID KEY «, t00=0x0023, t01=0x003e}
0x36fe…3710              Head {h00=0x000e, h01=0x0050, text=» B APK OK «, t00=0x0023, t01=0x005c}
0x3710…3732              Head {h00=0x001e, h01=0x0050, text=»A805   CHECK FUNCTION KEYS«, t00=0x0023, t01=0x006e}
0x3732…374e              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN0 «, t00=0x0023, t01=0x0090}
0x374e…3772              Head {h00=0x0020, h01=0x0050, text=» CMP SPBINW2,=W'30' ADM KEY «, t00=0x0023, t01=0x00ac}
0x3772…3782              Head {h00=0x000c, h01=0x0050, text=» BE ART «, t00=0x0023, t01=0x00d0}
0x3782…37a8              Head {h00=0x0022, h01=0x0050, text=» CMP SPBINW2,=W'31' CYCLE KEY «, t00=0x0023, t01=0x00e0}
0x37a8…37b8              Head {h00=0x000c, h01=0x0050, text=» BE ART «, t00=0x0023, t01=0x0106}
0x37b8…37e0              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,CBIN4 INVALID KEY «, t00=0x0023, t01=0x0116}
0x37e0…37ee              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0023, t01=0x013e}
0x37ee…3800              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0023, t01=0x014c}
0x3800…3828              Head {h00=0x0024, h01=0x0050, text=»A81   CHECK HOVEDBOG, CPR/CIR/NR«, t00=0x0023, t01=0x015e}
0x3828…384c              Head {h00=0x0020, h01=0x0050, text=» MOVE SPBINW3,CBIN6 FIELD 6 «, t00=0x0023, t01=0x0186}
0x384c…387e              Head {h00=0x002e, h01=0x0050, text=» MOVE SPBINW5,CBIN1 MIGHT BE TRANS TYPE 1 «, t00=0x0024, t01=0x001a}
0x387e…38aa              Head {h00=0x0028, h01=0x0050, text=» CBG SPBINW1,CBIN2,A811 CHECK LENGTH«, t00=0x0024, t01=0x004c}
0x38aa…38d2              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,CBIN3 ERROR LENGTH«, t00=0x0024, t01=0x0078}
0x38d2…38e0              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0024, t01=0x00a0}
0x38e0…38fc              Head {h00=0x0018, h01=0x0050, text=»A811   CPR OR CIR ? «, t00=0x0024, t01=0x00ae}
0x38fc…3918              Head {h00=0x0018, h01=0x0050, text=» SET BCPR SET CPR NO«, t00=0x0024, t01=0x00ca}
0x3918…3936              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD1,SPINPUT «, t00=0x0024, t01=0x00e6}
0x3936…395c              Head {h00=0x0022, h01=0x0050, text=» CBL GSWBCD1,=D'10000000',A814«, t00=0x0024, t01=0x0104}
0x395c…396e              Head {h00=0x000e, h01=0x0050, text=» SET BLEV «, t00=0x0024, t01=0x012a}
0x396e…3996              Head {h00=0x0024, h01=0x0050, text=» CBG GSWBCD1,=D'3200000000',A812«, t00=0x0024, t01=0x013c}
0x3996…39aa              Head {h00=0x0010, h01=0x0050, text=» CLEAR BLEV «, t00=0x0024, t01=0x0164}
0x39aa…39ba              Head {h00=0x000c, h01=0x0050, text=» B A812 «, t00=0x0024, t01=0x0178}
0x39ba…39c6              Head {h00=0x0008, h01=0x0050, text=»A814«, t00=0x0024, t01=0x0188}
0x39c6…39e4 (37, 0, 400) Head {h00=0x001a, h01=0x0050, text=» CLEAR BCPR SET CIR NO«, t00=0x0025, t01=0x0004}
0x39e4…39f0              Head {h00=0x0008, h01=0x0050, text=»A812«, t00=0x0025, t01=0x0022}
0x39f0…3a12              Head {h00=0x001e, h01=0x0050, text=» PERF SELTR TRANS SELECTED«, t00=0x0025, t01=0x002e}
0x3a12…3a30              Head {h00=0x001a, h01=0x0050, text=» BNOK ART INVALID KEY «, t00=0x0025, t01=0x0050}
0x3a30…3a42              Head {h00=0x000e, h01=0x0050, text=» B APK OK «, t00=0x0025, t01=0x006e}
0x3a42…3a54              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0025, t01=0x0080}
0x3a54…3a7a              Head {h00=0x0022, h01=0x0050, text=»A82   CHECK HOVEDBOG, YD.MODT.«, t00=0x0025, t01=0x0092}
0x3a7a…3aa0              Head {h00=0x0022, h01=0x0050, text=» MOVE SPBINW3,CBIN21 FIELD 21 «, t00=0x0025, t01=0x00b8}
0x3aa0…3ad0              Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW5,CBIN6 MIGHT BE TRANSTYPE 6«, t00=0x0025, t01=0x00de}
0x3ad0…3adc              Head {h00=0x0008, h01=0x0050, text=»A821«, t00=0x0025, t01=0x010e}
0x3adc…3b0a              Head {h00=0x002a, h01=0x0050, text=» CBNE SPBINW2,CBIN3,A822 IF ENTER KEY,«, t00=0x0025, t01=0x011a}
0x3b0a…3b3a              Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW2,CBIN17 SIMULATE DEBET KEY «, t00=0x0025, t01=0x0148}
0x3b3a…3b46              Head {h00=0x0008, h01=0x0050, text=»A822«, t00=0x0025, t01=0x0178}
0x3b46…3b68              Head {h00=0x001e, h01=0x0050, text=» PERF SELTR TRANS SELECTED«, t00=0x0025, t01=0x0184}
0x3b68…3b86              Head {h00=0x001a, h01=0x0050, text=» BNOK ART INVALID KEY «, t00=0x0026, t01=0x0016}
0x3b86…3b98              Head {h00=0x000e, h01=0x0050, text=» B APK OK «, t00=0x0026, t01=0x0034}
0x3b98…3baa              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0026, t01=0x0046}
0x3baa…3bd2              Head {h00=0x0024, h01=0x0050, text=»A83   CHECK DEBITOR, DEBITOR NR «, t00=0x0026, t01=0x0058}
0x3bd2…3bf6              Head {h00=0x0020, h01=0x0050, text=» MOVE SPBINW3,CBIN6 FIELD 6 «, t00=0x0026, t01=0x0080}
0x3bf6…3c20              Head {h00=0x0026, h01=0x0050, text=» CBL SPBINW1,CBIN3,A805 FUNCTION? «, t00=0x0026, t01=0x00a4}
0x3c20…3c40              Head {h00=0x001c, h01=0x0050, text=» CBL SPBINW1,CBIN7,A833 «, t00=0x0026, t01=0x00ce}
0x3c40…3c70              Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW5,CBIN4 MIGHT BE TRANSTYPE 4«, t00=0x0026, t01=0x00ee}
0x3c70…3c8a              Head {h00=0x0016, h01=0x0050, text=» SET BCPR SET CPR «, t00=0x0026, t01=0x011e}
0x3c8a…3ca8              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD1,SPINPUT «, t00=0x0026, t01=0x0138}
0x3ca8…3cce              Head {h00=0x0022, h01=0x0050, text=» CBL GSWBCD1,=D'10000000',A831«, t00=0x0026, t01=0x0156}
0x3cce…3ce0              Head {h00=0x000e, h01=0x0050, text=» SET BLEV «, t00=0x0026, t01=0x017c}
0x3ce0…3d08              Head {h00=0x0024, h01=0x0050, text=» CBG GSWBCD1,=D'3200000000',A832«, t00=0x0026, t01=0x018e}
0x3d08…3d1c              Head {h00=0x0010, h01=0x0050, text=» CLEAR BLEV «, t00=0x0027, t01=0x0026}
0x3d1c…3d2c              Head {h00=0x000c, h01=0x0050, text=» B A832 «, t00=0x0027, t01=0x003a}
0x3d2c…3d38              Head {h00=0x0008, h01=0x0050, text=»A831«, t00=0x0027, t01=0x004a}
0x3d38…3d54              Head {h00=0x0018, h01=0x0050, text=» CLEAR BCPR SET CIR «, t00=0x0027, t01=0x0056}
0x3d54…3d60              Head {h00=0x0008, h01=0x0050, text=»A832«, t00=0x0027, t01=0x0072}
0x3d60…3d74              Head {h00=0x0010, h01=0x0050, text=» PERF SELTR «, t00=0x0027, t01=0x007e}
0x3d74…3d86              Head {h00=0x000e, h01=0x0050, text=» BNOK ART «, t00=0x0027, t01=0x0092}
0x3d86…3da2              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,CBIN3 «, t00=0x0027, t01=0x00a4}
0x3da2…3db0              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x0027, t01=0x00c0}
0x3db0…3dbc              Head {h00=0x0008, h01=0x0050, text=»A833«, t00=0x0027, t01=0x00ce}
0x3dbc…3de4              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,CBIN3 ERROR LENGTH«, t00=0x0027, t01=0x00da}
0x3de4…3df2              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0027, t01=0x0102}
0x3df2…3e04              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0027, t01=0x0110}
0x3e04…3e24              Head {h00=0x001c, h01=0x0050, text=»A84   CHECK DEBITOR, BKO«, t00=0x0027, t01=0x0122}
0x3e24…3e48              Head {h00=0x0020, h01=0x0050, text=» MOVE SPBINW3,CBIN7 FIELD 7 «, t00=0x0027, t01=0x0142}
0x3e48…3e78              Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW5,CBIN3 MIGHT BE TRANSTYPE 3«, t00=0x0027, t01=0x0166}
0x3e78…3e98              Head {h00=0x001c, h01=0x0050, text=» CBNE SPBINW2,CBIN3,A842«, t00=0x0028, t01=0x0008}
0x3e98…3eb4              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,CBIN17«, t00=0x0028, t01=0x0028}
0x3eb4…3ec0              Head {h00=0x0008, h01=0x0050, text=»A842«, t00=0x0028, t01=0x0044}
0x3ec0…3ede              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD1,SPINPUT «, t00=0x0028, t01=0x0050}
0x3ede…3f00              Head {h00=0x001e, h01=0x0050, text=» CBE GSWBCD1,=D'+51',A845 «, t00=0x0028, t01=0x006e}
0x3f00…3f22              Head {h00=0x001e, h01=0x0050, text=» CBE GSWBCD1,=D'+52',A845 «, t00=0x0028, t01=0x0090}
0x3f22…3f2e              Head {h00=0x0008, h01=0x0050, text=»A843«, t00=0x0028, t01=0x00b2}
0x3f2e…3f42              Head {h00=0x0010, h01=0x0050, text=» PERF SELTR «, t00=0x0028, t01=0x00be}
0x3f42…3f54              Head {h00=0x000e, h01=0x0050, text=» BNOK ART «, t00=0x0028, t01=0x00d2}
0x3f54…3f62              Head {h00=0x000a, h01=0x0050, text=» B A07«, t00=0x0028, t01=0x00e4}
0x3f62…3f6e              Head {h00=0x0008, h01=0x0050, text=»A845«, t00=0x0028, t01=0x00f2}
0x3f6e…3f8a              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW5,CBIN4 «, t00=0x0028, t01=0x00fe}
0x3f8a…3f9a              Head {h00=0x000c, h01=0x0050, text=» B A843 «, t00=0x0028, t01=0x011a}
0x3f9a…3fac              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0028, t01=0x012a}
0x3fac…3fd4              Head {h00=0x0024, h01=0x0050, text=»A85   CHECK REMITTERING, KONTONR«, t00=0x0028, t01=0x013c}
0x3fd4…3ff8              Head {h00=0x0020, h01=0x0050, text=» MOVE SPBINW3,CBIN5 FIELD 5 «, t00=0x0028, t01=0x0164}
0x3ff8…4024              Head {h00=0x0028, h01=0x0050, text=» CBL SPBINW1,CBIN3,A805 CHECK LENGTH«, t00=0x0028, t01=0x0188}
0x4024…4050              Head {h00=0x0028, h01=0x0050, text=» CBE SPBINW1,CBIN10,A850 MUST BE 10 «, t00=0x0029, t01=0x0024}
0x4050…4078              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,CBIN3 ERROR LENGTH«, t00=0x0029, t01=0x0050}
0x4078…4086              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0029, t01=0x0078}
0x4086…4092              Head {h00=0x0008, h01=0x0050, text=»A850«, t00=0x0029, t01=0x0086}
0x4092…40c6              Head {h00=0x0030, h01=0x0050, text=»  CMP SPBINW2,CBIN3   ONLY ENTER-KEY ALLOWED«, t00=0x0029, t01=0x0092}
0x40c6…40d8              Head {h00=0x000e, h01=0x0050, text=» BNE A855 «, t00=0x0029, t01=0x00c6}
0x40d8…40f6              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD1,SPINPUT «, t00=0x0029, t01=0x00d8}
0x40f6…411a              Head {h00=0x0020, h01=0x0050, text=» PERF KTPLAN,GSWBCD1,GTKTTYP«, t00=0x0029, t01=0x00f6}
0x411a…4128              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x0029, t01=0x011a}
0x4128…4134              Head {h00=0x0008, h01=0x0050, text=»A855«, t00=0x0029, t01=0x0128}
0x4134…415c              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,CBIN4 INVALID KEY «, t00=0x0029, t01=0x0134}
0x415c…416a              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0029, t01=0x015c}
0x416a…417c              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0029, t01=0x016a}
0x417c…41a4              Head {h00=0x0024, h01=0x0050, text=»A86   CHECK REMITTERING, LEV.NR.«, t00=0x0029, t01=0x017c}
0x41a4…41c8              Head {h00=0x0020, h01=0x0050, text=» MOVE SPBINW3,CBIN6 FIELD 6 «, t00=0x002a, t01=0x0014}
0x41c8…41f8              Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW5,CBIN8 MIGHT BE TRANSTYPE 8«, t00=0x002a, t01=0x0038}
0x41f8…422e              Head {h00=0x0032, h01=0x0050, text=» CBG SPBINW1,CBIN2,A811 CHECK LENGTH + CPR/CIR«, t00=0x002a, t01=0x0068}
0x422e…4256              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,CBIN3 ERROR LENGTH«, t00=0x002a, t01=0x009e}
0x4256…4264              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x002a, t01=0x00c6}
0x4264…4276              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002a, t01=0x00d4}
0x4276…42a0              Head {h00=0x0026, h01=0x0050, text=»A87   CHECK REMITTERING, YD.MODT. «, t00=0x002a, t01=0x00e6}
0x42a0…42c6              Head {h00=0x0022, h01=0x0050, text=» MOVE SPBINW3,CBIN21 FIELD 21 «, t00=0x002a, t01=0x0110}
0x42c6…42f6              Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW5,CBIN9 MIGHT BE TRANSTYPE 9«, t00=0x002a, t01=0x0136}
0x42f6…431c              Head {h00=0x0022, h01=0x0050, text=» B A821 CHECK FOR INVALID KEY «, t00=0x002a, t01=0x0166}
0x431c…432e              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002a, t01=0x018c}
0x432e…433a              Head {h00=0x0008, h01=0x0050, text=»A88 «, t00=0x002b, t01=0x000e}
0x433a…435e              Head {h00=0x0020, h01=0x0050, text=» MOVE SPBINW3,CBIN7 FIELD 7 «, t00=0x002b, t01=0x001a}
0x435e…437a              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,=W'36'«, t00=0x002b, t01=0x003e}
0x437a…4394              Head {h00=0x0016, h01=0x0050, text=» MOVE SPBINW1,='2'«, t00=0x002b, t01=0x005a}
0x4394…43aa              Head {h00=0x0012, h01=0x0050, text=» TBT BCPR,A885«, t00=0x002b, t01=0x0074}
0x43aa…43d6              Head {h00=0x0028, h01=0x0050, text=» MOVE SPINPUT,=X'35310000' 51 IF CIR«, t00=0x002b, t01=0x008a}
0x43d6…43e4              Head {h00=0x000a, h01=0x0050, text=» B A07«, t00=0x002b, t01=0x00b6}
0x43e4…43f0              Head {h00=0x0008, h01=0x0050, text=»A885«, t00=0x002b, t01=0x00c4}
0x43f0…441c              Head {h00=0x0028, h01=0x0050, text=» MOVE SPINPUT,=X'35320000' 52 IF CPR«, t00=0x002b, t01=0x00d0}
0x441c…442a              Head {h00=0x000a, h01=0x0050, text=» B A07«, t00=0x002b, t01=0x00fc}
0x442a…443c              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002b, t01=0x010a}
0x443c…4448              Head {h00=0x0008, h01=0x0050, text=»A89 «, t00=0x002b, t01=0x011c}
0x4448…4474              Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW3,CBIN6 STORE IN FIELD 6«, t00=0x002b, t01=0x0128}
0x4474…4482              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x002b, t01=0x0154}
0x4482…4494              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002b, t01=0x0162}
0x4494…44a0              Head {h00=0x0008, h01=0x0050, text=»A90 «, t00=0x002b, t01=0x0174}
0x44a0…44b4              Head {h00=0x0010, h01=0x0050, text=» PERF SPACES«, t00=0x002b, t01=0x0180}
0x44b4…44da (44, 0, 400) Head {h00=0x0022, h01=0x0050, text=» MOVE GTFELT90(CBIN1),SPINPUT «, t00=0x002c, t01=0x0004}
0x44da…44ee              Head {h00=0x0010, h01=0x0050, text=» PERF TESTAD«, t00=0x002c, t01=0x002a}
0x44ee…44fc              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x002c, t01=0x003e}
0x44fc…4508              Head {h00=0x0008, h01=0x0050, text=»*** «, t00=0x002c, t01=0x004c}
0x4508…4514              Head {h00=0x0008, h01=0x0050, text=»A91 «, t00=0x002c, t01=0x0058}
0x4514…4528              Head {h00=0x0010, h01=0x0050, text=» PERF SPACES«, t00=0x002c, t01=0x0064}
0x4528…454e              Head {h00=0x0022, h01=0x0050, text=» MOVE GTFELT90(CBIN2),SPINPUT «, t00=0x002c, t01=0x0078}
0x454e…4562              Head {h00=0x0010, h01=0x0050, text=» PERF TESTAD«, t00=0x002c, t01=0x009e}
0x4562…4570              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x002c, t01=0x00b2}
0x4570…457c              Head {h00=0x0008, h01=0x0050, text=»*** «, t00=0x002c, t01=0x00c0}
0x457c…4588              Head {h00=0x0008, h01=0x0050, text=»A92 «, t00=0x002c, t01=0x00cc}
0x4588…459c              Head {h00=0x0010, h01=0x0050, text=» PERF SPACES«, t00=0x002c, t01=0x00d8}
0x459c…45c2              Head {h00=0x0022, h01=0x0050, text=» MOVE GTFELT90(CBIN3),SPINPUT «, t00=0x002c, t01=0x00ec}
0x45c2…45d6              Head {h00=0x0010, h01=0x0050, text=» PERF TESTAD«, t00=0x002c, t01=0x0112}
0x45d6…45e4              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x002c, t01=0x0126}
0x45e4…45f0              Head {h00=0x0008, h01=0x0050, text=»*** «, t00=0x002c, t01=0x0134}
0x45f0…45fc              Head {h00=0x0008, h01=0x0050, text=»A93 «, t00=0x002c, t01=0x0140}
0x45fc…4610              Head {h00=0x0010, h01=0x0050, text=» PERF SPACES«, t00=0x002c, t01=0x014c}
0x4610…4636              Head {h00=0x0022, h01=0x0050, text=» MOVE GTFELT90(CBIN4),SPINPUT «, t00=0x002c, t01=0x0160}
0x4636…464a              Head {h00=0x0010, h01=0x0050, text=» PERF TESTAD«, t00=0x002c, t01=0x0186}
0x464a…4658              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x002d, t01=0x000a}
0x4658…4664              Head {h00=0x0008, h01=0x0050, text=»*** «, t00=0x002d, t01=0x0018}
0x4664…4670              Head {h00=0x0008, h01=0x0050, text=»A94 «, t00=0x002d, t01=0x0024}
0x4670…4684              Head {h00=0x0010, h01=0x0050, text=» PERF SPACES«, t00=0x002d, t01=0x0030}
0x4684…46aa              Head {h00=0x0022, h01=0x0050, text=» MOVE GTFELT90(CBIN5),SPINPUT «, t00=0x002d, t01=0x0044}
0x46aa…46be              Head {h00=0x0010, h01=0x0050, text=» PERF TESTAD«, t00=0x002d, t01=0x006a}
0x46be…46cc              Head {h00=0x000a, h01=0x0050, text=» B APK«, t00=0x002d, t01=0x007e}
0x46cc…46de              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002d, t01=0x008c}
0x46de…4702              Head {h00=0x0020, h01=0x0050, text=»A100   CHECK TR 12 COUNTERS «, t00=0x002d, t01=0x009e}
0x4702…4720              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD1,SPINPUT «, t00=0x002d, t01=0x00c2}
0x4720…473c              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBCD1,=D'100'«, t00=0x002d, t01=0x00e0}
0x473c…475a              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN6,GSWBCD1 «, t00=0x002d, t01=0x00fc}
0x475a…4784              Head {h00=0x0026, h01=0x0050, text=» CBL GSWBIN6,CBIN1,A1009 TOO SMALL«, t00=0x002d, t01=0x011a}
0x4784…47ba              Head {h00=0x0032, h01=0x0050, text=» CBG GSWBIN6,CTR12(GTUWB,CBIN2),A1009 TOO HIGH«, t00=0x002d, t01=0x0144}
0x47ba…47e2              Head {h00=0x0024, h01=0x0050, text=» ADD GSWBIN6,CTR12(GTUWB,CBIN1) «, t00=0x002d, t01=0x017a}
0x47e2…47f0              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x002e, t01=0x0012}
0x47f0…47fe              Head {h00=0x000a, h01=0x0050, text=»A1009 «, t00=0x002e, t01=0x0020}
0x47fe…481a              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN11«, t00=0x002e, t01=0x002e}
0x481a…4828              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x002e, t01=0x004a}
0x4828…483a              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002e, t01=0x0058}
0x483a…485e              Head {h00=0x0020, h01=0x0050, text=»A101   CHECK BEHL. COUNTERS «, t00=0x002e, t01=0x006a}
0x485e…487c              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD1,SPINPUT «, t00=0x002e, t01=0x008e}
0x487c…489e              Head {h00=0x001e, h01=0x0050, text=» CBL GSWBCD1,=D'1',A101ER «, t00=0x002e, t01=0x00ac}
0x489e…48bc              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN6,GSWBCD1 «, t00=0x002e, t01=0x00ce}
0x48bc…48ea              Head {h00=0x002a, h01=0x0050, text=» CBG GSWBIN6,CBEH(GTUWB,CBIN2),A101ER «, t00=0x002e, t01=0x00ec}
0x48ea…4910              Head {h00=0x0022, h01=0x0050, text=» ADD GSWBIN6,CBEH(GTUWB,CBIN1)«, t00=0x002e, t01=0x011a}
0x4910…491e              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x002e, t01=0x0140}
0x491e…492c              Head {h00=0x000a, h01=0x0050, text=»A101ER«, t00=0x002e, t01=0x014e}
0x492c…4948              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN11«, t00=0x002e, t01=0x015c}
0x4948…4956              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x002e, t01=0x0178}
0x4956…4968              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002e, t01=0x0186}
0x4968…498a              Head {h00=0x001e, h01=0x0050, text=»A102   CHECK RELATIVE DAY «, t00=0x002f, t01=0x0008}
0x498a…49a8              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD7,CMASKDAT«, t00=0x002f, t01=0x002a}
0x49a8…49b6              Head {h00=0x000a, h01=0x0050, text=»A102A «, t00=0x002f, t01=0x0048}
0x49b6…49e6              Head {h00=0x002c, h01=0x0050, text=» MOVE GSWBCD5,=D'2' INITIATE REL DAY NO.«, t00=0x002f, t01=0x0056}
0x49e6…4a10              Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBCD3,=D'1' BLANK GSWBCD3 «, t00=0x002f, t01=0x0086}
0x4a10…4a3e              Head {h00=0x002a, h01=0x0050, text=» MOVE GSWBIN2,CBIN8 SET POINTER TO DAY«, t00=0x002f, t01=0x00b0}
0x4a3e…4a78              Head {h00=0x0036, h01=0x0050, text=» COPY GSWBCD3,CBIN4,CBIN2,GSWBCD7,GSWBIN2 GET DAY «, t00=0x002f, t01=0x00de}
0x4a78…4aa8              Head {h00=0x002c, h01=0x0050, text=» ADD GSWBCD5,GSWBCD3 ADD DAY TO REL. DAY«, t00=0x002f, t01=0x0118}
0x4aa8…4ad8              Head {h00=0x002c, h01=0x0050, text=» ADD GSWBIN2,CBIN2 SET POINTER TO MONTH «, t00=0x002f, t01=0x0148}
0x4ad8…4b14              Head {h00=0x0038, h01=0x0050, text=» COPY GSWBCD3,CBIN4,CBIN2,GSWBCD7,GSWBIN2 GET MONTH «, t00=0x002f, t01=0x0178}
0x4b14…4b46              Head {h00=0x002e, h01=0x0050, text=» SUB GSWBCD3,=D'1' GET WHOLE NO. OF MONTHS«, t00=0x0030, t01=0x0024}
0x4b46…4b70              Head {h00=0x0026, h01=0x0050, text=» MUL GSWBCD3,=D'30' EQUAL IN DAYS «, t00=0x0030, t01=0x0056}
0x4b70…4b8c              Head {h00=0x0018, h01=0x0050, text=» ADD GSWBCD5,GSWBCD3«, t00=0x0030, t01=0x0080}
0x4b8c…4bbc              Head {h00=0x002c, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT GET KEYED REL. DAY«, t00=0x0030, t01=0x009c}
0x4bbc…4bd6              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBCD5,=D'5'«, t00=0x0030, t01=0x00cc}
0x4bd6…4c04              Head {h00=0x002a, h01=0x0050, text=» CBL GSWBCD3,GSWBCD5,A102ER TOO SMALL «, t00=0x0030, t01=0x00e6}
0x4c04…4c20              Head {h00=0x0018, h01=0x0050, text=» ADD GSWBCD5,=D'10' «, t00=0x0030, t01=0x0114}
0x4c20…4c4e              Head {h00=0x002a, h01=0x0050, text=» CBG GSWBCD3,GSWBCD5,A102ER TOO LARGE «, t00=0x0030, t01=0x0130}
0x4c4e…4c60              Head {h00=0x000e, h01=0x0050, text=» B A102END«, t00=0x0030, t01=0x015e}
0x4c60…4c6e              Head {h00=0x000a, h01=0x0050, text=»A102ER«, t00=0x0030, t01=0x0170}
0x4c6e…4c98              Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW4,CBIN11 INVALID VALUE«, t00=0x0030, t01=0x017e}
0x4c98…4ca8              Head {h00=0x000c, h01=0x0050, text=»A102END «, t00=0x0031, t01=0x0018}
0x4ca8…4cc4              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD3,=X'FF'«, t00=0x0031, t01=0x0028}
0x4cc4…4cd2              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0031, t01=0x0044}
0x4cd2…4ce4              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0031, t01=0x0052}
0x4ce4…4d06              Head {h00=0x001e, h01=0x0050, text=»A103   SET BEHL. COUNTERS «, t00=0x0031, t01=0x0064}
0x4d06…4d24              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT «, t00=0x0031, t01=0x0086}
0x4d24…4d42              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN6,GSWBCD3 «, t00=0x0031, t01=0x00a4}
0x4d42…4d6a              Head {h00=0x0024, h01=0x0050, text=» ADD GSWBIN6,CBEH(GSWBIN1,CBIN1)«, t00=0x0031, t01=0x00c2}
0x4d6a…4d96              Head {h00=0x0028, h01=0x0050, text=» CBG GSWBIN6,=W'60',A103ER TOO MANY «, t00=0x0031, t01=0x00ea}
0x4d96…4db8              Head {h00=0x001e, h01=0x0050, text=» CBE GSWBIN1,CBIN12,A1035 «, t00=0x0031, t01=0x0116}
0x4db8…4dd2              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x0031, t01=0x0138}
0x4dd2…4dfc              Head {h00=0x0026, h01=0x0050, text=» MOVE CBEH(GSWBIN1,CBIN1),GSWBIN6 «, t00=0x0031, t01=0x0152}
0x4dfc…4e16              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN1,CBIN1«, t00=0x0031, t01=0x017c}
0x4e16…4e24              Head {h00=0x000a, h01=0x0050, text=»A1035 «, t00=0x0032, t01=0x0008}
0x4e24…4e42              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN6,GSWBCD3 «, t00=0x0032, t01=0x0016}
0x4e42…4e6c              Head {h00=0x0026, h01=0x0050, text=» MOVE CBEH(GSWBIN1,CBIN2),GSWBIN6 «, t00=0x0032, t01=0x0034}
0x4e6c…4e7a              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0032, t01=0x005e}
0x4e7a…4e88              Head {h00=0x000a, h01=0x0050, text=»A103ER«, t00=0x0032, t01=0x006c}
0x4e88…4ea4              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN11«, t00=0x0032, t01=0x007a}
0x4ea4…4eb2              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0032, t01=0x0096}
0x4eb2…4ec4              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0032, t01=0x00a4}
0x4ec4…4ee6              Head {h00=0x001e, h01=0x0050, text=»A104   SET TR 12 COUNTERS «, t00=0x0032, t01=0x00b6}
0x4ee6…4f04              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD4,SPINPUT «, t00=0x0032, t01=0x00d8}
0x4f04…4f22              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN6,GSWBCD4 «, t00=0x0032, t01=0x00f6}
0x4f22…4f4c              Head {h00=0x0026, h01=0x0050, text=» ADD GSWBIN6,CTR12(GSWBIN1,CBIN1) «, t00=0x0032, t01=0x0114}
0x4f4c…4f78              Head {h00=0x0028, h01=0x0050, text=» CBG GSWBIN6,=W'60',A104ER TOO MANY «, t00=0x0032, t01=0x013e}
0x4f78…4f9a              Head {h00=0x001e, h01=0x0050, text=» CBE GSWBIN1,CBIN12,A1045 «, t00=0x0032, t01=0x016a}
0x4f9a…4fb4              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x0032, t01=0x018c}
0x4fb4…4fde              Head {h00=0x0026, h01=0x0050, text=» MOVE CTR12(GSWBIN1,CBIN1),GSWBIN6«, t00=0x0033, t01=0x0016}
0x4fde…4ff8              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN1,CBIN1«, t00=0x0033, t01=0x0040}
0x4ff8…5006              Head {h00=0x000a, h01=0x0050, text=»A1045 «, t00=0x0033, t01=0x005a}
0x5006…5024              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN6,GSWBCD4 «, t00=0x0033, t01=0x0068}
0x5024…504e              Head {h00=0x0026, h01=0x0050, text=» MOVE CTR12(GSWBIN1,CBIN2),GSWBIN6«, t00=0x0033, t01=0x0086}
0x504e…505c              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0033, t01=0x00b0}
0x505c…506a              Head {h00=0x000a, h01=0x0050, text=»A104ER«, t00=0x0033, t01=0x00be}
0x506a…5086              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN11«, t00=0x0033, t01=0x00cc}
0x5086…5094              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0033, t01=0x00e8}
0x5094…50a6              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0033, t01=0x00f6}
0x50a6…50c8              Head {h00=0x001e, h01=0x0050, text=»A105    CONRTL.DIGITCALC. «, t00=0x0033, t01=0x0108}
0x50c8…50e6              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD6,SPINPUT «, t00=0x0033, t01=0x012a}
0x50e6…5108              Head {h00=0x001e, h01=0x0050, text=» CBE SPBINW2,CBIN3,CALCD01«, t00=0x0033, t01=0x0148}
0x5108…5124              Head {h00=0x0018, h01=0x0050, text=» CMP SPBINW2,CBIN17 «, t00=0x0033, t01=0x016a}
0x5124…5134              Head {h00=0x000c, h01=0x0050, text=» BNE ART«, t00=0x0033, t01=0x0186}
0x5134…5144              Head {h00=0x000c, h01=0x0050, text=»CALCD01 «, t00=0x0034, t01=0x0008}
0x5144…516e              Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBIN1,SPBINW1   GET LENGTH«, t00=0x0034, t01=0x0018}
0x516e…518a              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN13«, t00=0x0034, t01=0x0042}
0x518a…51a6              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD5,=D'0' «, t00=0x0034, t01=0x005e}
0x51a6…51b6              Head {h00=0x000c, h01=0x0050, text=»CALCD02 «, t00=0x0034, t01=0x007a}
0x51b6…51d4              Head {h00=0x001a, h01=0x0050, text=»  MOVE  GSWBCD3,=D'0' «, t00=0x0034, t01=0x008a}
0x51d4…5216              Head {h00=0x003e, h01=0x0050, text=» COPY GSWBCD3,CBIN5,CBIN1,GSWBCD6,GSWBIN2  GET NEXT DIGIT «, t00=0x0034, t01=0x00a8}
0x5216…524e              Head {h00=0x0034, h01=0x0050, text=» MUL GSWBCD3,WEIGTH(GSWBIN2)  MULTIPLY BY WEIGHT«, t00=0x0034, t01=0x00ea}
0x524e…527c              Head {h00=0x002a, h01=0x0050, text=» ADD GSWBCD5,GSWBCD3   ADD TO OLD SUM «, t00=0x0034, t01=0x0122}
0x527c…52a6              Head {h00=0x0026, h01=0x0050, text=»  SUB GSWBIN1,CBIN1  ADJUST LENGTH«, t00=0x0034, t01=0x0150}
0x52a6…52d6              Head {h00=0x002c, h01=0x0050, text=» SUB GSWBIN2,CBIN1   ADJUST WEIGHT-INDEX«, t00=0x0034, t01=0x017a}
0x52d6…52f8              Head {h00=0x001e, h01=0x0050, text=» CBG GSWBIN1,=W'0',CALCD02«, t00=0x0035, t01=0x001a}
0x52f8…5316              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD4,GSWBCD5 «, t00=0x0035, t01=0x003c}
0x5316…5332              Head {h00=0x0018, h01=0x0050, text=» DIV GSWBCD5,=D'11' «, t00=0x0035, t01=0x005a}
0x5332…534e              Head {h00=0x0018, h01=0x0050, text=» MUL GSWBCD5,=D'11' «, t00=0x0035, t01=0x0076}
0x534e…538a              Head {h00=0x0038, h01=0x0050, text=» SUB GSWBCD4,GSWBCD5           GET REMAINDER MOD 11 «, t00=0x0035, t01=0x0092}
0x538a…53ae              Head {h00=0x0020, h01=0x0050, text=» CBNE GSWBCD4,=D'0',CALCD05 «, t00=0x0035, t01=0x00ce}
0x53ae…53ca              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD4,=D'11'«, t00=0x0035, t01=0x00f2}
0x53ca…53da              Head {h00=0x000c, h01=0x0050, text=»CALCD05 «, t00=0x0035, t01=0x010e}
0x53da…53f6              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD5,=D'11'«, t00=0x0035, t01=0x011e}
0x53f6…542c              Head {h00=0x0032, h01=0x0050, text=» SUB GSWBCD5,GSWBCD4   CALCULATE CONTROLDIGIT «, t00=0x0035, t01=0x013a}
0x542c…543c              Head {h00=0x000c, h01=0x0050, text=»  B ART «, t00=0x0035, t01=0x0170}
0x543c…544e              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0035, t01=0x0180}
0x544e…546c (54, 0, 400) Head {h00=0x001a, h01=0x0050, text=»A106   CHECK VALUE 0-3«, t00=0x0036, t01=0x0004}
0x546c…5494              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT GET VALUE «, t00=0x0036, t01=0x0022}
0x5494…54b6              Head {h00=0x001e, h01=0x0050, text=» CBNL GSWBCD3,=D'6',A106A «, t00=0x0036, t01=0x004a}
0x54b6…54c4              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0036, t01=0x006c}
0x54c4…54d2              Head {h00=0x000a, h01=0x0050, text=»A106A «, t00=0x0036, t01=0x007a}
0x54d2…5504              Head {h00=0x002e, h01=0x0050, text=» MOVE SPBINW4,CBIN11 ERROR 'OUT OF RANGE' «, t00=0x0036, t01=0x0088}
0x5504…5512              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0036, t01=0x00ba}
0x5512…5524              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0036, t01=0x00c8}
0x5524…554c              Head {h00=0x0024, h01=0x0050, text=»A107   REL DAY, 'POSTERINGSDATO'«, t00=0x0036, t01=0x00da}
0x554c…5568              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD7,GTDATO«, t00=0x0036, t01=0x0102}
0x5568…5578              Head {h00=0x000c, h01=0x0050, text=» B A102A«, t00=0x0036, t01=0x011e}
0x5578…558a              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0036, t01=0x012e}
0x558a…55a8              Head {h00=0x001a, h01=0x0050, text=»A108   SPG-REGKONTONR «, t00=0x0036, t01=0x0140}
0x55a8…55c4              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD6,=D'5' «, t00=0x0036, t01=0x015e}
0x55c4…55d2              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0036, t01=0x017a}
0x55d2…55e4              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0036, t01=0x0188}
0x55e4…5602              Head {h00=0x001a, h01=0x0050, text=»A109   SPG-CPR/CIR/NR «, t00=0x0037, t01=0x000a}
0x5602…561e              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD6,=D'6' «, t00=0x0037, t01=0x0028}
0x561e…562c              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0037, t01=0x0044}
0x562c…563e              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0037, t01=0x0052}
0x563e…5656              Head {h00=0x0014, h01=0x0050, text=»A110   SPG-BELOB«, t00=0x0037, t01=0x0064}
0x5656…5672              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD6,=D'8' «, t00=0x0037, t01=0x007c}
0x5672…5680              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0037, t01=0x0098}
0x5680…5692              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0037, t01=0x00a6}
0x5692…56b0              Head {h00=0x001a, h01=0x0050, text=»A111   SPG-OTHER FIELD«, t00=0x0037, t01=0x00b8}
0x56b0…56ce              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD6,SPINPUT «, t00=0x0037, t01=0x00d6}
0x56ce…56f2              Head {h00=0x0020, h01=0x0050, text=» CBG GSWBCD6,=D'90',A111ERR «, t00=0x0037, t01=0x00f4}
0x56f2…570e              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD7,=D'0' «, t00=0x0037, t01=0x0118}
0x570e…571c              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0037, t01=0x0134}
0x571c…572c              Head {h00=0x000c, h01=0x0050, text=»A111ERR «, t00=0x0037, t01=0x0142}
0x572c…5748              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN11«, t00=0x0037, t01=0x0152}
0x5748…5756              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0037, t01=0x016e}
0x5756…5768              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0037, t01=0x017c}
0x5768…5774              Head {h00=0x0008, h01=0x0050, text=»A112«, t00=0x0037, t01=0x018e}
0x5774…579a              Head {h00=0x0022, h01=0x0050, text=»* CHECK TASKNR IN SYSTEMSTART «, t00=0x0038, t01=0x000a}
0x579a…57b8              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD6,SPINPUT «, t00=0x0038, t01=0x0030}
0x57b8…57d6              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBCD6 «, t00=0x0038, t01=0x004e}
0x57d6…57fc              Head {h00=0x0022, h01=0x0050, text=» CBG GSWBIN2,CMAXTASK,A112ERR «, t00=0x0038, t01=0x006c}
0x57fc…581e              Head {h00=0x001e, h01=0x0050, text=» CBL GSWBIN2,CBIN1,A112ERR«, t00=0x0038, t01=0x0092}
0x581e…5840              Head {h00=0x001e, h01=0x0050, text=» CBNE GSWBCD5,=D'1',A112OK«, t00=0x0038, t01=0x00b4}
0x5840…5864              Head {h00=0x0020, h01=0x0050, text=» CBNE GSWBCD6,=D'1',A112ERR «, t00=0x0038, t01=0x00d6}
0x5864…5872              Head {h00=0x000a, h01=0x0050, text=»A112OK«, t00=0x0038, t01=0x00fa}
0x5872…5880              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0038, t01=0x0108}
0x5880…5890              Head {h00=0x000c, h01=0x0050, text=»A112ERR «, t00=0x0038, t01=0x0116}
0x5890…58ac              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN11«, t00=0x0038, t01=0x0126}
0x58ac…58ba              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0038, t01=0x0142}
0x58ba…58cc              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0038, t01=0x0150}
0x58cc…58ec              Head {h00=0x001c, h01=0x0050, text=»A121   SIMULATE SLUT KEY«, t00=0x0038, t01=0x0162}
0x58ec…5904              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSLUTFL «, t00=0x0038, t01=0x0182}
0x5904…591c              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTADUPFL «, t00=0x0039, t01=0x000a}
0x591c…5942              Head {h00=0x0022, h01=0x0050, text=» MOVE SPBINW2,CBIN17 SLUT KEY «, t00=0x0039, t01=0x0022}
0x5942…596a              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW1,=W'0' LENGTH ZERO «, t00=0x0039, t01=0x0048}
0x596a…5978              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0039, t01=0x0070}
0x5978…598a              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0039, t01=0x007e}
0x598a…59aa              Head {h00=0x001c, h01=0x0050, text=»A122   ENTER TO SLUT KEY«, t00=0x0039, t01=0x0090}
0x59aa…59c4              Head {h00=0x0016, h01=0x0050, text=» CMP SPBINW2,CBIN3«, t00=0x0039, t01=0x00b0}
0x59c4…59d4              Head {h00=0x000c, h01=0x0050, text=» BNE ART«, t00=0x0039, t01=0x00ca}
0x59d4…59f2              Head {h00=0x001a, h01=0x0050, text=»  MOVE SPBINW2,CBIN17 «, t00=0x0039, t01=0x00da}
0x59f2…5a02              Head {h00=0x000c, h01=0x0050, text=»  B ART «, t00=0x0039, t01=0x00f8}
0x5a02…5a14              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0039, t01=0x0108}
0x5a14…5a20              Head {h00=0x0008, h01=0x0050, text=»A130«, t00=0x0039, t01=0x011a}
0x5a20…5a3e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT «, t00=0x0039, t01=0x0126}
0x5a3e…5a5c              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD3 «, t00=0x0039, t01=0x0144}
0x5a5c…5a82              Head {h00=0x0022, h01=0x0050, text=» IB GSWBIN1,A1301,A1302,A1303 «, t00=0x0039, t01=0x0162}
0x5a82…5a9e              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN11«, t00=0x0039, t01=0x0188}
0x5a9e…5aac              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x003a, t01=0x0014}
0x5aac…5aba              Head {h00=0x000a, h01=0x0050, text=»A1301 «, t00=0x003a, t01=0x0022}
0x5aba…5ade              Head {h00=0x0020, h01=0x0050, text=» MOVE GTSTRFMT,=C'SYSSTART '«, t00=0x003a, t01=0x0030}
0x5ade…5aee              Head {h00=0x000c, h01=0x0050, text=» B A1305«, t00=0x003a, t01=0x0054}
0x5aee…5afc              Head {h00=0x000a, h01=0x0050, text=»A1302 «, t00=0x003a, t01=0x0064}
0x5afc…5b20              Head {h00=0x0020, h01=0x0050, text=» MOVE GTSTRFMT,=C' RESTART '«, t00=0x003a, t01=0x0072}
0x5b20…5b30              Head {h00=0x000c, h01=0x0050, text=» B A1305«, t00=0x003a, t01=0x0096}
0x5b30…5b3e              Head {h00=0x000a, h01=0x0050, text=»A1303 «, t00=0x003a, t01=0x00a6}
0x5b3e…5b62              Head {h00=0x0020, h01=0x0050, text=» MOVE GTSTRFMT,=C' RESTORE '«, t00=0x003a, t01=0x00b4}
0x5b62…5b70              Head {h00=0x000a, h01=0x0050, text=»A1305 «, t00=0x003a, t01=0x00d8}
0x5b70…5b8e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=X'0516'«, t00=0x003a, t01=0x00e6}
0x5b8e…5bae              Head {h00=0x001c, h01=0x0050, text=» DSC1 SCREEN,POS,GSWBIN1«, t00=0x003a, t01=0x0104}
0x5bae…5bcc              Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,STRTFRM «, t00=0x003a, t01=0x0124}
0x5bcc…5bda              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x003a, t01=0x0142}
0x5bda…5bec              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x003a, t01=0x0150}
0x5bec…5bf8              Head {h00=0x0008, h01=0x0050, text=»A131«, t00=0x003a, t01=0x0162}
0x5bf8…5c16              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT «, t00=0x003a, t01=0x016e}
0x5c16…5c34              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD3 «, t00=0x003a, t01=0x018c}
0x5c34…5c5a              Head {h00=0x0022, h01=0x0050, text=» IB GSWBIN1,A1311,A1312,A1313 «, t00=0x003b, t01=0x001a}
0x5c5a…5c76              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN11«, t00=0x003b, t01=0x0040}
0x5c76…5c84              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x003b, t01=0x005c}
0x5c84…5c92              Head {h00=0x000a, h01=0x0050, text=»A1311 «, t00=0x003b, t01=0x006a}
0x5c92…5cb4              Head {h00=0x001e, h01=0x0050, text=» MOVE GTSTRFMT,=C'SYSVOL '«, t00=0x003b, t01=0x0078}
0x5cb4…5cc4              Head {h00=0x000c, h01=0x0050, text=» B A1315«, t00=0x003b, t01=0x009a}
0x5cc4…5cd2              Head {h00=0x000a, h01=0x0050, text=»A1312 «, t00=0x003b, t01=0x00aa}
0x5cd2…5cf4              Head {h00=0x001e, h01=0x0050, text=» MOVE GTSTRFMT,=C'REGVOL '«, t00=0x003b, t01=0x00b8}
0x5cf4…5d04              Head {h00=0x000c, h01=0x0050, text=» B A1315«, t00=0x003b, t01=0x00da}
0x5d04…5d12              Head {h00=0x000a, h01=0x0050, text=»A1313 «, t00=0x003b, t01=0x00ea}
0x5d12…5d34              Head {h00=0x001e, h01=0x0050, text=» MOVE GTSTRFMT,=C'AFBRYD '«, t00=0x003b, t01=0x00f8}
0x5d34…5d42              Head {h00=0x000a, h01=0x0050, text=»A1315 «, t00=0x003b, t01=0x011a}
0x5d42…5d60              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=X'0711'«, t00=0x003b, t01=0x0128}
0x5d60…5d80              Head {h00=0x001c, h01=0x0050, text=» DSC1 SCREEN,POS,GSWBIN1«, t00=0x003b, t01=0x0146}
0x5d80…5d9e              Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,STRTFRM «, t00=0x003b, t01=0x0166}
0x5d9e…5dac              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x003b, t01=0x0184}
0x5dac…5dbe (60, 0, 400) Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x003c, t01=0x0004}
0x5dbe…5dd2              Head {h00=0x0010, h01=0x0050, text=»STRTFRM FRMT«, t00=0x003c, t01=0x0016}
0x5dd2…5de6              Head {h00=0x0010, h01=0x0050, text=» FILLR '+',2«, t00=0x003c, t01=0x002a}
0x5de6…5dfe              Head {h00=0x0014, h01=0x0050, text=» FCOPY GTSTRFMT «, t00=0x003c, t01=0x003e}
0x5dfe…5e0c              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003c, t01=0x0056}
0x5e0c…5e1e              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x003c, t01=0x0064}
0x5e1e…5e2a              Head {h00=0x0008, h01=0x0050, text=»A132«, t00=0x003c, t01=0x0076}
0x5e2a…5e48              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD1,SPINPUT «, t00=0x003c, t01=0x0082}
0x5e48…5e66              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=X'0301'«, t00=0x003c, t01=0x00a0}
0x5e66…5e86              Head {h00=0x001c, h01=0x0050, text=» DSC1 SCREEN,POS,GSWBIN1«, t00=0x003c, t01=0x00be}
0x5e86…5ea8              Head {h00=0x001e, h01=0x0050, text=» EDIT CVOL(CBIN2),A132FMT2«, t00=0x003c, t01=0x00de}
0x5ea8…5eca              Head {h00=0x001e, h01=0x0050, text=» EDIT CVOL(CBIN3),A132FMT3«, t00=0x003c, t01=0x0100}
0x5eca…5eec              Head {h00=0x001e, h01=0x0050, text=» EDIT CVOL(CBIN4),A132FMT4«, t00=0x003c, t01=0x0122}
0x5eec…5f0a              Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,A132FMT1«, t00=0x003c, t01=0x0144}
0x5f0a…5f18              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x003c, t01=0x0162}
0x5f18…5f20              Head {h00=0x0004, h01=0x0050, t00=0x003c, t01=0x0170}
0x5f20…5f36              Head {h00=0x0012, h01=0x0050, text=»A132FMT1 FRMT «, t00=0x003c, t01=0x0178}
0x5f36…5f4a              Head {h00=0x0010, h01=0x0050, text=» FILLR '+',2«, t00=0x003c, t01=0x018e}
0x5f4a…5f64              Head {h00=0x0016, h01=0x0050, text=» FCOPY CVOL(CBIN2)«, t00=0x003d, t01=0x0012}
0x5f64…5f78              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x003d, t01=0x002c}
0x5f78…5f92              Head {h00=0x0016, h01=0x0050, text=» FCOPY CVOL(CBIN3)«, t00=0x003d, t01=0x0040}
0x5f92…5fa6              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x003d, t01=0x005a}
0x5fa6…5fc0              Head {h00=0x0016, h01=0x0050, text=» FCOPY CVOL(CBIN4)«, t00=0x003d, t01=0x006e}
0x5fc0…5fce              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003d, t01=0x0088}
0x5fce…5fd6              Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x0096}
0x5fd6…5fec              Head {h00=0x0012, h01=0x0050, text=»A132FMT2 FRMT «, t00=0x003d, t01=0x009e}
0x5fec…6008              Head {h00=0x0018, h01=0x0050, text=» FMEL '999',GSWBCD1 «, t00=0x003d, t01=0x00b4}
0x6008…601c              Head {h00=0x0010, h01=0x0050, text=» FTEXT '002'«, t00=0x003d, t01=0x00d0}
0x601c…602a              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003d, t01=0x00e4}
0x602a…6032              Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x00f2}
0x6032…6048              Head {h00=0x0012, h01=0x0050, text=»A132FMT3 FRMT «, t00=0x003d, t01=0x00fa}
0x6048…6064              Head {h00=0x0018, h01=0x0050, text=» FMEL '999',GSWBCD1 «, t00=0x003d, t01=0x0110}
0x6064…6078              Head {h00=0x0010, h01=0x0050, text=» FTEXT '003'«, t00=0x003d, t01=0x012c}
0x6078…6086              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003d, t01=0x0140}
0x6086…608e              Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x014e}
0x608e…60a4              Head {h00=0x0012, h01=0x0050, text=»A132FMT4 FRMT «, t00=0x003d, t01=0x0156}
0x60a4…60c0              Head {h00=0x0018, h01=0x0050, text=» FMEL '999',GSWBCD1 «, t00=0x003d, t01=0x016c}
0x60c0…60d4              Head {h00=0x0010, h01=0x0050, text=» FTEXT '004'«, t00=0x003d, t01=0x0188}
0x60d4…60e2              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003e, t01=0x000c}
0x60e2…60f4              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x003e, t01=0x001a}
0x60f4…6100              Head {h00=0x0008, h01=0x0050, text=»A133«, t00=0x003e, t01=0x002c}
0x6100…611c              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'40'«, t00=0x003e, t01=0x0038}
0x611c…6140              Head {h00=0x0020, h01=0x0050, text=» PERF REPL00,SPINPUT,GSWBIN1«, t00=0x003e, t01=0x0054}
0x6140…6174              Head {h00=0x0030, h01=0x0050, text=» PERF XCOP,CDUM0,=W'0',=W'40',SPINPUT,=W'0' «, t00=0x003e, t01=0x0078}
0x6174…6182              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x003e, t01=0x00ac}
0x6182…618e              Head {h00=0x0008, h01=0x0050, text=»A134«, t00=0x003e, t01=0x00ba}
0x618e…61aa              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'40'«, t00=0x003e, t01=0x00c6}
0x61aa…61ce              Head {h00=0x0020, h01=0x0050, text=» PERF REPL00,SPINPUT,GSWBIN1«, t00=0x003e, t01=0x00e2}
0x61ce…6202              Head {h00=0x0030, h01=0x0050, text=» PERF XCOP,CDUM0,=W'40',=W'40',SPINPUT,=W'0'«, t00=0x003e, t01=0x0106}
0x6202…6210              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x003e, t01=0x013a}
0x6210…621c              Head {h00=0x0008, h01=0x0050, text=»A135«, t00=0x003e, t01=0x0148}
0x621c…6238              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'40'«, t00=0x003e, t01=0x0154}
0x6238…625c              Head {h00=0x0020, h01=0x0050, text=» PERF REPL00,SPINPUT,GSWBIN1«, t00=0x003e, t01=0x0170}
0x625c…6290 (63, 0, 398) Head {h00=0x0030, h01=0x0050, text=» PERF XCOP,CDUM0,=W'80',=W'40',SPINPUT,=W'0'«, t00=0x003f, t01=0x0004}
0x6290…629e              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x003f, t01=0x0038}
0x629e…62aa              Head {h00=0x0008, h01=0x0050, text=»A136«, t00=0x003f, t01=0x0046}
0x62aa…62c6              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'40'«, t00=0x003f, t01=0x0052}
0x62c6…62ea              Head {h00=0x0020, h01=0x0050, text=» PERF REPL00,SPINPUT,GSWBIN1«, t00=0x003f, t01=0x006e}
0x62ea…6320              Head {h00=0x0032, h01=0x0050, text=» PERF XCOP,CDUM0,=W'120',=W'40',SPINPUT,=W'0' «, t00=0x003f, t01=0x0092}
0x6320…632e              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x003f, t01=0x00c8}
0x632e…633a              Head {h00=0x0008, h01=0x0050, text=»A137«, t00=0x003f, t01=0x00d6}
0x633a…6356              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'40'«, t00=0x003f, t01=0x00e2}
0x6356…637a              Head {h00=0x0020, h01=0x0050, text=» PERF REPL00,SPINPUT,GSWBIN1«, t00=0x003f, t01=0x00fe}
0x637a…63b0              Head {h00=0x0032, h01=0x0050, text=» PERF XCOP,CDUM0,=W'160',=W'40',SPINPUT,=W'0' «, t00=0x003f, t01=0x0122}
0x63b0…63be              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x003f, t01=0x0158}
0x63be…63cc              Head {h00=0x000a, h01=0x0050, text=»***** «, t00=0x003f, t01=0x0166}
0x63cc…63ea              Head {h00=0x001a, h01=0x0050, text=»A138   DEFAULT DAYNBR «, t00=0x003f, t01=0x0174}
0x63ea…640e (64, 0, 400) Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBCD6,SPINPUT DDMM]]«, t00=0x0040, t01=0x0004}
0x640e…6432              Head {h00=0x0020, h01=0x0050, text=» DIV GSWBCD6,=D'100'   DDMM «, t00=0x0040, t01=0x0028}
0x6432…6456              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBCD7,GSWBCD6   DDMM«, t00=0x0040, t01=0x004c}
0x6456…647a              Head {h00=0x0020, h01=0x0050, text=» DIV GSWBCD7,=D'100'     DD «, t00=0x0040, t01=0x0070}
0x647a…649e              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBCD1,GSWBCD7     DD«, t00=0x0040, t01=0x0094}
0x649e…64c2              Head {h00=0x0020, h01=0x0050, text=» MUL GSWBCD7,=D'100'   DD00 «, t00=0x0040, t01=0x00b8}
0x64c2…64e6              Head {h00=0x0020, h01=0x0050, text=» SUB GSWBCD6,GSWBCD7     MM «, t00=0x0040, t01=0x00dc}
0x64e6…650a              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD6     MM«, t00=0x0040, t01=0x0100}
0x650a…653e              Head {h00=0x0030, h01=0x0050, text=» IB GSWBIN1,A13801,A13802,A13803,A13804,  C «, t00=0x0040, t01=0x0124}
0x653e…6568              Head {h00=0x0026, h01=0x0050, text=»  A13805,A13806,A13807,A13808,  C «, t00=0x0040, t01=0x0158}
0x6568…658e              Head {h00=0x0022, h01=0x0050, text=»  A13809,A13810,A13811,A13812 «, t00=0x0040, t01=0x0182}
0x658e…65b0              Head {h00=0x001e, h01=0x0050, text=»A13812 ADD GSWBCD1,=D'30' «, t00=0x0041, t01=0x0018}
0x65b0…65d2              Head {h00=0x001e, h01=0x0050, text=»A13811 ADD GSWBCD1,=D'31' «, t00=0x0041, t01=0x003a}
0x65d2…65f4              Head {h00=0x001e, h01=0x0050, text=»A13810 ADD GSWBCD1,=D'30' «, t00=0x0041, t01=0x005c}
0x65f4…6616              Head {h00=0x001e, h01=0x0050, text=»A13809 ADD GSWBCD1,=D'31' «, t00=0x0041, t01=0x007e}
0x6616…6638              Head {h00=0x001e, h01=0x0050, text=»A13808 ADD GSWBCD1,=D'31' «, t00=0x0041, t01=0x00a0}
0x6638…665a              Head {h00=0x001e, h01=0x0050, text=»A13807 ADD GSWBCD1,=D'30' «, t00=0x0041, t01=0x00c2}
0x665a…667c              Head {h00=0x001e, h01=0x0050, text=»A13806 ADD GSWBCD1,=D'31' «, t00=0x0041, t01=0x00e4}
0x667c…669e              Head {h00=0x001e, h01=0x0050, text=»A13805 ADD GSWBCD1,=D'30' «, t00=0x0041, t01=0x0106}
0x669e…66c0              Head {h00=0x001e, h01=0x0050, text=»A13804 ADD GSWBCD1,=D'31' «, t00=0x0041, t01=0x0128}
0x66c0…66e2              Head {h00=0x001e, h01=0x0050, text=»A13803 ADD GSWBCD1,=D'28' «, t00=0x0041, t01=0x014a}
0x66e2…6704              Head {h00=0x001e, h01=0x0050, text=»A13802 ADD GSWBCD1,=D'31' «, t00=0x0041, t01=0x016c}
0x6704…6712              Head {h00=0x000a, h01=0x0050, text=»A13801«, t00=0x0041, t01=0x018e}
0x6712…6720              Head {h00=0x000a, h01=0x0050, text=»A13813«, t00=0x0042, t01=0x000c}
0x6720…6744              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBCD6,SPINPUT DDMM]]«, t00=0x0042, t01=0x001a}
0x6744…6768              Head {h00=0x0020, h01=0x0050, text=» DIV GSWBCD6,=D'100'    DDMM«, t00=0x0042, t01=0x003e}
0x6768…678c              Head {h00=0x0020, h01=0x0050, text=» MUL GSWBCD6,=D'100' DDMM]] «, t00=0x0042, t01=0x0062}
0x678c…67b0              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBCD7,SPINPUT DDMM]]«, t00=0x0042, t01=0x0086}
0x67b0…67d4              Head {h00=0x0020, h01=0x0050, text=» SUB GSWBCD7,GSWBCD6     AA «, t00=0x0042, t01=0x00aa}
0x67d4…67f8              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBCD6,GSWBCD7     ]]«, t00=0x0042, t01=0x00ce}
0x67f8…681c              Head {h00=0x0020, h01=0x0050, text=» DIV GSWBCD6,=D'4'     ]]//4«, t00=0x0042, t01=0x00f2}
0x681c…6848              Head {h00=0x0028, h01=0x0050, text=» MUL GSWBCD6,=D'4'     ]]-(]] MOD 4)«, t00=0x0042, t01=0x0116}
0x6848…687a              Head {h00=0x002e, h01=0x0050, text=» CBNE GSWBCD6,GSWBCD7,A13814 NOT LEAPYEAR «, t00=0x0042, t01=0x0142}
0x687a…689c              Head {h00=0x001e, h01=0x0050, text=» CBL GSWBIN1,CBIN3,A13814 «, t00=0x0042, t01=0x0174}
0x689c…68b6              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBCD1,=D'1'«, t00=0x0043, t01=0x0008}
0x68b6…68c4              Head {h00=0x000a, h01=0x0050, text=»A13814«, t00=0x0043, t01=0x0022}
0x68c4…68e2              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=X'040D'«, t00=0x0043, t01=0x0030}
0x68e2…6902              Head {h00=0x001c, h01=0x0050, text=» DSC1 SCREEN,POS,GSWBIN1«, t00=0x0043, t01=0x004e}
0x6902…6920              Head {h00=0x001a, h01=0x0050, text=» MOVE CRELDAY,GSWBCD1 «, t00=0x0043, t01=0x006e}
0x6920…693c              Head {h00=0x0018, h01=0x0050, text=» EDWRT SCREEN,DAYFRM«, t00=0x0043, t01=0x008c}
0x693c…694a              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0043, t01=0x00a8}
0x694a…6952              Head {h00=0x0004, h01=0x0050, t00=0x0043, t01=0x00b6}
0x6952…6966              Head {h00=0x0010, h01=0x0050, text=»DAYFRM FRMT «, t00=0x0043, t01=0x00be}
0x6966…697a              Head {h00=0x0010, h01=0x0050, text=» FILLR '+',2«, t00=0x0043, t01=0x00d2}
0x697a…6996              Head {h00=0x0018, h01=0x0050, text=» FMEL '999',CRELDAY «, t00=0x0043, t01=0x00e6}
0x6996…69a4              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0043, t01=0x0102}
0x69a4…69b6              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0043, t01=0x0110}
0x69b6…69d4              Head {h00=0x001a, h01=0x0050, text=»APK   KEEP INFORMATION«, t00=0x0043, t01=0x0122}
0x69d4…69fc              Head {h00=0x0024, h01=0x0050, text=» TBF TTEORFLG,APK00 FIRST FIELD?«, t00=0x0043, t01=0x0140}
0x69fc…6a1c              Head {h00=0x001c, h01=0x0050, text=» CBE SPBINW3,CBIN5,APK10«, t00=0x0043, t01=0x0168}
0x6a1c…6a44              Head {h00=0x0024, h01=0x0050, text=» MOVE GTKTTYP,=D'0' NOT KONTONR.«, t00=0x0043, t01=0x0188}
0x6a44…6a52              Head {h00=0x000a, h01=0x0050, text=»APK10 «, t00=0x0044, t01=0x0020}
0x6a52…6a78              Head {h00=0x0022, h01=0x0050, text=» PERF PACKCL YES, CLEAR GTUSED«, t00=0x0044, t01=0x002e}
0x6a78…6a9e              Head {h00=0x0022, h01=0x0050, text=» SET SPME CHECK FOR ME FIELDS «, t00=0x0044, t01=0x0054}
0x6a9e…6ab8              Head {h00=0x0016, h01=0x0050, text=» TBF TSPOOL,APK20 «, t00=0x0044, t01=0x007a}
0x6ab8…6ad2              Head {h00=0x0016, h01=0x0050, text=» TBT CSPOOL,APK00 «, t00=0x0044, t01=0x0094}
0x6ad2…6ae0              Head {h00=0x000a, h01=0x0050, text=»APK20 «, t00=0x0044, t01=0x00ae}
0x6ae0…6af2              Head {h00=0x000e, h01=0x0050, text=» PERF CRKJ«, t00=0x0044, t01=0x00bc}
0x6af2…6b00              Head {h00=0x000a, h01=0x0050, text=»APK00 «, t00=0x0044, t01=0x00ce}
0x6b00…6b3a              Head {h00=0x0036, h01=0x0050, text=» MOVE GSWBIN1,CFLTDEX(SPBINW3) GET INDEX OF FIELD «, t00=0x0044, t01=0x00dc}
0x6b3a…6b72              Head {h00=0x0034, h01=0x0050, text=» MOVE GTUSED(GSWBIN1),SPBINW3 STORE FIELDNUMBER «, t00=0x0044, t01=0x0116}
0x6b72…6b80              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0044, t01=0x014e}
0x6b80…6b92              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0044, t01=0x015c}
0x6b92…6b9e              Head {h00=0x0008, h01=0x0050, text=»APF «, t00=0x0044, t01=0x016e}
0x6b9e…6bc6              Head {h00=0x0024, h01=0x0050, text=» TBF TTEORFLG,APF00 FIRST FIELD?«, t00=0x0044, t01=0x017a}
0x6bc6…6be2              Head {h00=0x0018, h01=0x0050, text=» MOVE GTKTTYP,=D'0' «, t00=0x0045, t01=0x0012}
0x6be2…6c08              Head {h00=0x0022, h01=0x0050, text=» PERF PACKCL YES, CLEAR GTUSED«, t00=0x0045, t01=0x002e}
0x6c08…6c2e              Head {h00=0x0022, h01=0x0050, text=» SET SPME CHECK FOR ME FIELDS «, t00=0x0045, t01=0x0054}
0x6c2e…6c48              Head {h00=0x0016, h01=0x0050, text=» TBF TSPOOL,APF20 «, t00=0x0045, t01=0x007a}
0x6c48…6c62              Head {h00=0x0016, h01=0x0050, text=» TBT CSPOOL,APF00 «, t00=0x0045, t01=0x0094}
0x6c62…6c70              Head {h00=0x000a, h01=0x0050, text=»APF20 «, t00=0x0045, t01=0x00ae}
0x6c70…6c82              Head {h00=0x000e, h01=0x0050, text=» PERF CRKJ«, t00=0x0045, t01=0x00bc}
0x6c82…6c90              Head {h00=0x000a, h01=0x0050, text=»APF00 «, t00=0x0045, t01=0x00ce}
0x6c90…6caa              Head {h00=0x0016, h01=0x0050, text=» TBT SPDUPL,APF10 «, t00=0x0045, t01=0x00dc}
0x6caa…6cd2              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBCD6,SPINPUT GET VALUE «, t00=0x0045, t01=0x00f6}
0x6cd2…6cee              Head {h00=0x0018, h01=0x0050, text=» MUL GSWBCD6,GTDBKRS«, t00=0x0045, t01=0x011e}
0x6cee…6d0c              Head {h00=0x001a, h01=0x0050, text=» MOVE SPINPUT,GSWBCD6 «, t00=0x0045, t01=0x013a}
0x6d0c…6d1a              Head {h00=0x000a, h01=0x0050, text=»APF10 «, t00=0x0045, t01=0x0158}
0x6d1a…6d5c              Head {h00=0x003e, h01=0x0050, text=» MOVE GSWBIN1,CFLTDEX(SPBINW3) GET INDEX OF CURRENT FIELD «, t00=0x0045, t01=0x0166}
0x6d5c…6d8a              Head {h00=0x002a, h01=0x0050, text=»*          MULTIPLY WITH -1 IF KREDIT «, t00=0x0046, t01=0x0018}
0x6d8a…6dcc              Head {h00=0x003e, h01=0x0050, text=»*          STORE NEGATIVE FIELD NUMBER (NUMBER WITH SIGN) «, t00=0x0046, t01=0x0046}
0x6dcc…6df2              Head {h00=0x0022, h01=0x0050, text=» MOVE GTUSED(GSWBIN1),SPBINW3 «, t00=0x0046, t01=0x0088}
0x6df2…6e16              Head {h00=0x0020, h01=0x0050, text=» MUL GTUSED(GSWBIN1),=W'-1' «, t00=0x0046, t01=0x00ae}
0x6e16…6e24              Head {h00=0x000a, h01=0x0050, text=» B ART«, t00=0x0046, t01=0x00d2}
0x6e24…6e36              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0046, t01=0x00e0}
0x6e36…6e42              Head {h00=0x0008, h01=0x0050, text=»ART «, t00=0x0046, t01=0x00f2}
0x6e42…6e5e              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0046, t01=0x00fe}
0x6e5e…6e7e              Head {h00=0x001c, h01=0x0050, text=» CBL SPBINW4,CBIN3,ARET «, t00=0x0046, t01=0x011a}
0x6e7e…6e9a              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN3 «, t00=0x0046, t01=0x013a}
0x6e9a…6ea6              Head {h00=0x0008, h01=0x0050, text=»ARET«, t00=0x0046, t01=0x0156}
0x6ea6…6eb2              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0046, t01=0x0162}
0x6eb2…6ec0              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0046, t01=0x016e}
0x6ec0…6ec8              Head {h00=0x0004, h01=0x0050, t00=0x0046, t01=0x017c}
0x6ec8…6ed0              Head {h00=0x0004, h01=0x0050, t00=0x0046, t01=0x0184}
0x6ed0…6ee4              Head {h00=0x0010, h01=0x0050, text=»SPACES PROC «, t00=0x0046, t01=0x018c}
0x6ee4…6f00              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'41'«, t00=0x0047, t01=0x0010}
0x6f00…6f24              Head {h00=0x0020, h01=0x0050, text=» PERF REPL00,SPINPUT,GSWBIN1«, t00=0x0047, t01=0x002c}
0x6f24…6f30              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0047, t01=0x0050}
0x6f30…6f3e              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0047, t01=0x005c}
0x6f3e…6f4c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x006a}
0x6f4c…6f60              Head {h00=0x0010, h01=0x0050, text=»SETKRE PROC «, t00=0x0047, t01=0x0078}
0x6f60…6f7c              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0047, t01=0x008c}
0x6f7c…6f86              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00a8}
0x6f86…6fba              Head {h00=0x0030, h01=0x0050, text=»*          SETKRE - SET  KREDIT INFORMATION «, t00=0x0047, t01=0x00b2}
0x6fba…6fc4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00e6}
0x6fc4…6fe0              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0047, t01=0x00f0}
0x6fe0…6ffe              Head {h00=0x001a, h01=0x0050, text=» MOVE GTDBKRC,=C' KRE'«, t00=0x0047, t01=0x010c}
0x6ffe…701a              Head {h00=0x0018, h01=0x0050, text=» MOVE GTDBKRS,=D'-1'«, t00=0x0047, t01=0x012a}
0x701a…7036              Head {h00=0x0018, h01=0x0050, text=» MOVE TTDKBCD,=D'1' «, t00=0x0047, t01=0x0146}
0x7036…7052              Head {h00=0x0018, h01=0x0050, text=» MOVE TTDKDEX,CBIN1 «, t00=0x0047, t01=0x0162}
0x7052…705e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0047, t01=0x017e}
0x705e…706c              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0047, t01=0x018a}
0x706c…7076              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0008}
0x7076…708a              Head {h00=0x0010, h01=0x0050, text=»SETDEB PROC «, t00=0x0048, t01=0x0012}
0x708a…70a6              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0048, t01=0x0026}
0x70a6…70b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0042}
0x70b0…70e2              Head {h00=0x002e, h01=0x0050, text=»*          SETDEB - SET DEBET INFORMATION «, t00=0x0048, t01=0x004c}
0x70e2…70ec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x007e}
0x70ec…7108              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0048, t01=0x0088}
0x7108…7126              Head {h00=0x001a, h01=0x0050, text=» MOVE GTDBKRC,=C' DEB'«, t00=0x0048, t01=0x00a4}
0x7126…7142              Head {h00=0x0018, h01=0x0050, text=» MOVE GTDBKRS,=D'+1'«, t00=0x0048, t01=0x00c2}
0x7142…715e              Head {h00=0x0018, h01=0x0050, text=» MOVE TTDKBCD,=D'2' «, t00=0x0048, t01=0x00de}
0x715e…717a              Head {h00=0x0018, h01=0x0050, text=» MOVE TTDKDEX,CBIN2 «, t00=0x0048, t01=0x00fa}
0x717a…7186              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0048, t01=0x0116}
0x7186…7194              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0048, t01=0x0122}
0x7194…719e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0130}
0x719e…71b0              Head {h00=0x000e, h01=0x0050, text=»CLRSW PROC«, t00=0x0048, t01=0x013a}
0x71b0…71cc              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0048, t01=0x014c}
0x71cc…71d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0168}
0x71d6…7208              Head {h00=0x002e, h01=0x0050, text=»*          CLRSW - CLEAR ALL AUTODUP FLAGS«, t00=0x0048, t01=0x0172}
0x7208…7212              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0014}
0x7212…722e              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0049, t01=0x001e}
0x722e…724a              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x0049, t01=0x003a}
0x724a…7258              Head {h00=0x000a, h01=0x0050, text=»CLRSW1«, t00=0x0049, t01=0x0056}
0x7258…727e              Head {h00=0x0022, h01=0x0050, text=» MOVE GSSWITCH(GSWBIN1),CBIN0 «, t00=0x0049, t01=0x0064}
0x727e…7298              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x0049, t01=0x008a}
0x7298…72bc              Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN1,CBINMAX,CLRSW1 «, t00=0x0049, t01=0x00a4}
0x72bc…72c8              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0049, t01=0x00c8}
0x72c8…72d6              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0049, t01=0x00d4}
0x72d6…72e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00e2}
0x72e0…72f2              Head {h00=0x000e, h01=0x0050, text=»SELTR PROC«, t00=0x0049, t01=0x00ec}
0x72f2…730e              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0049, t01=0x00fe}
0x730e…7318              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x011a}
0x7318…735a              Head {h00=0x003e, h01=0x0050, text=»*          SELTR - PROCEDURE TO SEE IF TRANSTYPE HAS BEEN «, t00=0x0049, t01=0x0124}
0x735a…7376              Head {h00=0x0018, h01=0x0050, text=»*          SELECTED.«, t00=0x0049, t01=0x0166}
0x7376…73aa              Head {h00=0x0030, h01=0x0050, text=»*          SELECTED TRANSTYPE IS IN SPBINW5 «, t00=0x0049, t01=0x0182}
0x73aa…73b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0026}
0x73b4…73d0              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x004a, t01=0x0030}
0x73d0…73fa              Head {h00=0x0026, h01=0x0050, text=» CBE SPBINW2,CBIN3,SELOK ENTER KEY«, t00=0x004a, t01=0x004c}
0x73fa…7426              Head {h00=0x0028, h01=0x0050, text=» CBE SPBINW2,CBIN18,SEL10 KREDIT KEY«, t00=0x004a, t01=0x0076}
0x7426…7452              Head {h00=0x0028, h01=0x0050, text=» CBE SPBINW2,CBIN17,SEL20 DEBET KEY «, t00=0x004a, t01=0x00a2}
0x7452…747a              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,CBIN4 INVALID KEY «, t00=0x004a, t01=0x00ce}
0x747a…74a2              Head {h00=0x0024, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK, SET CR<>0 «, t00=0x004a, t01=0x00f6}
0x74a2…74ae              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x004a, t01=0x011e}
0x74ae…74c4              Head {h00=0x0012, h01=0x0050, text=»SEL10   KREDIT«, t00=0x004a, t01=0x012a}
0x74c4…74d8              Head {h00=0x0010, h01=0x0050, text=» PERF SETKRE«, t00=0x004a, t01=0x0140}
0x74d8…74e8              Head {h00=0x000c, h01=0x0050, text=» B SEL30«, t00=0x004a, t01=0x0154}
0x74e8…74fe              Head {h00=0x0012, h01=0x0050, text=»SEL20   DEBET «, t00=0x004a, t01=0x0164}
0x74fe…7512              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x004a, t01=0x017a}
0x7512…7534              Head {h00=0x001e, h01=0x0050, text=»SEL30   TRANSTYPE SELECTED«, t00=0x004a, t01=0x018e}
0x7534…7552              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GTKTTYP «, t00=0x004b, t01=0x0020}
0x7552…756a              Head {h00=0x0014, h01=0x0050, text=» IB GSWBIN1,  C «, t00=0x004b, t01=0x003e}
0x756a…7592              Head {h00=0x0024, h01=0x0050, text=»  SEL40,SEL40,SEL90,SEL40,SEL40 «, t00=0x004b, t01=0x0056}
0x7592…75a2              Head {h00=0x000c, h01=0x0050, text=» B SEL90«, t00=0x004b, t01=0x007e}
0x75a2…75b0              Head {h00=0x000a, h01=0x0050, text=»SEL40 «, t00=0x004b, t01=0x008e}
0x75b0…75c8              Head {h00=0x0014, h01=0x0050, text=» IB SPBINW5,  C «, t00=0x004b, t01=0x009c}
0x75c8…7608              Head {h00=0x003c, h01=0x0050, text=»  SEL90,SEL45,SEL90,SEL90,SEL90,SEL90,SEL90,SEL45,SEL90 «, t00=0x004b, t01=0x00b4}
0x7608…7616              Head {h00=0x000a, h01=0x0050, text=»SEL45 «, t00=0x004b, t01=0x00f4}
0x7616…7636              Head {h00=0x001c, h01=0x0050, text=» CBL GSWBIN1,CBIN3,SEL50«, t00=0x004b, t01=0x0102}
0x7636…7654              Head {h00=0x001a, h01=0x0050, text=» SET SPWARNFL WARNING «, t00=0x004b, t01=0x0122}
0x7654…7664              Head {h00=0x000c, h01=0x0050, text=» B SEL90«, t00=0x004b, t01=0x0140}
0x7664…7672              Head {h00=0x000a, h01=0x0050, text=»SEL50 «, t00=0x004b, t01=0x0150}
0x7672…7694              Head {h00=0x001e, h01=0x0050, text=» MOVE SPBINW4,CBIN19 ERROR«, t00=0x004b, t01=0x015e}
0x7694…76ac              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x004b, t01=0x0180}
0x76ac…76b8              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x004c, t01=0x0008}
0x76b8…76c6              Head {h00=0x000a, h01=0x0050, text=»SEL90 «, t00=0x004c, t01=0x0014}
0x76c6…76e8              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGNR,SPBINW5 TYPE«, t00=0x004c, t01=0x0022}
0x76e8…771e              Head {h00=0x0032, h01=0x0050, text=» MOVE GTREGDEX,SPBINW5 TYPE INDEX. OK FOR <11 «, t00=0x004c, t01=0x0044}
0x771e…7752              Head {h00=0x0030, h01=0x0050, text=» MOVE SPBINW2,=W'36' SIMULATE TRANS SELECTED«, t00=0x004c, t01=0x007a}
0x7752…7766              Head {h00=0x0010, h01=0x0050, text=» SET GTTRSEL«, t00=0x004c, t01=0x00ae}
0x7766…7774              Head {h00=0x000a, h01=0x0050, text=»SELOK «, t00=0x004c, t01=0x00c2}
0x7774…779a              Head {h00=0x0022, h01=0x0050, text=» CMP CBIN0,CBIN0 OK, SET CR=0 «, t00=0x004c, t01=0x00d0}
0x779a…77a6              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x004c, t01=0x00f6}
0x77a6…77b4              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x004c, t01=0x0102}
0x77b4…77be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0110}
0x77be…77d4              Head {h00=0x0012, h01=0x0050, text=»YYMMDD PROC P «, t00=0x004c, t01=0x011a}
0x77d4…77e6              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x004c, t01=0x0130}
0x77e6…7824              Head {h00=0x003a, h01=0x0050, text=»* YYMMDD CHECKS THAT THE DATE IS IN FOR FORMAT YYMMDD.«, t00=0x004c, t01=0x0142}
0x7824…784a              Head {h00=0x0022, h01=0x0050, text=»* IF NOT, IT WILL BE INVERTED «, t00=0x004c, t01=0x0180}
0x784a…7866              Head {h00=0x0018, h01=0x0050, text=»* OUTPUT IN GSWBCD7 «, t00=0x004d, t01=0x0016}
0x7866…7878              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x004d, t01=0x0032}
0x7878…7890              Head {h00=0x0014, h01=0x0050, text=» MOVE GSWBCD7,P «, t00=0x004d, t01=0x0044}
0x7890…78b0              Head {h00=0x001c, h01=0x0050, text=» CBG P,=D'800000',YYMM90«, t00=0x004d, t01=0x005c}
0x78b0…78c8              Head {h00=0x0014, h01=0x0050, text=» MOVE GSWBCD6,P «, t00=0x004d, t01=0x007c}
0x78c8…78f8              Head {h00=0x002c, h01=0x0050, text=» XCOPY GSWBCD7,CBIN6,CBIN1,GSWBCD6,CBIN4«, t00=0x004d, t01=0x0094}
0x78f8…7928              Head {h00=0x002c, h01=0x0050, text=» XCOPY GSWBCD7,CBIN4,CBIN1,GSWBCD6,CBIN6«, t00=0x004d, t01=0x00c4}
0x7928…7936              Head {h00=0x000a, h01=0x0050, text=»YYMM90«, t00=0x004d, t01=0x00f4}
0x7936…7942              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x004d, t01=0x0102}
0x7942…7950              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x004d, t01=0x010e}
0x7950…7958              Head {h00=0x0004, h01=0x0050, t00=0x004d, t01=0x011c}
0x7958…796c              Head {h00=0x0010, h01=0x0050, text=»CHDATO PROC «, t00=0x004d, t01=0x0124}
0x796c…797e              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x004d, t01=0x0138}
0x797e…79a8              Head {h00=0x0026, h01=0x0050, text=»*     CHANGES GSWBCD6  (DDMMYY) TO«, t00=0x004d, t01=0x014a}
0x79a8…79c8              Head {h00=0x001c, h01=0x0050, text=»*     GSWBCD7  (YYMMDD) «, t00=0x004d, t01=0x0174}
0x79c8…79da (78, 0, 400) Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x004e, t01=0x0004}
0x79da…79f8              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD7,GSWBCD6 «, t00=0x004e, t01=0x0016}
0x79f8…7a28              Head {h00=0x002c, h01=0x0050, text=» XCOPY GSWBCD7,CBIN6,CBIN1,GSWBCD6,CBIN4«, t00=0x004e, t01=0x0034}
0x7a28…7a58              Head {h00=0x002c, h01=0x0050, text=» XCOPY GSWBCD7,CBIN4,CBIN1,GSWBCD6,CBIN6«, t00=0x004e, t01=0x0064}
0x7a58…7a64              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x004e, t01=0x0094}
0x7a64…7a72              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x004e, t01=0x00a0}
0x7a72…7a7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00ae}
0x7a7c…7aac              Head {h00=0x002c, h01=0x0050, text=»XCOP PROC TO,$TOPNT,$SIZE,FROM,$FROMPNT «, t00=0x004e, t01=0x00b8}
0x7aac…7ac0              Head {h00=0x0010, h01=0x0050, text=» PLIT $TOPNT«, t00=0x004e, t01=0x00e8}
0x7ac0…7ad4              Head {h00=0x0010, h01=0x0050, text=» PLIT $SIZE «, t00=0x004e, t01=0x00fc}
0x7ad4…7aea              Head {h00=0x0012, h01=0x0050, text=» PLIT $FROMPNT«, t00=0x004e, t01=0x0110}
0x7aea…7b20              Head {h00=0x0032, h01=0x0050, text=» MOVE GSWBIN1,$TOPNT START OF RECEIVING FIELD «, t00=0x004e, t01=0x0126}
0x7b20…7b42              Head {h00=0x001e, h01=0x0050, text=» MOVE GSWBIN4,$SIZE LENGTH«, t00=0x004e, t01=0x015c}
0x7b42…7b78              Head {h00=0x0032, h01=0x0050, text=» MOVE GSWBIN5,$FROMPNT START OF SENDING FIELD «, t00=0x004e, t01=0x017e}
0x7b78…7ba6              Head {h00=0x002a, h01=0x0050, text=» XCOPY TO,GSWBIN1,GSWBIN4,FROM,GSWBIN5«, t00=0x004f, t01=0x0024}
0x7ba6…7bb2              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x004f, t01=0x0052}
0x7bb2…7bc0              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x004f, t01=0x005e}
0x7bc0…7bca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x006c}
0x7bca…7be6              Head {h00=0x0018, h01=0x0050, text=»REPL00 PROC STRG,LEN«, t00=0x004f, t01=0x0076}
0x7be6…7c00              Head {h00=0x0016, h01=0x0050, text=» MOVE GSWBIN7,LEN «, t00=0x004f, t01=0x0092}
0x7c00…7c1c              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x004f, t01=0x00ac}
0x7c1c…7c38              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR1,=X'00'«, t00=0x004f, t01=0x00c8}
0x7c38…7c70              Head {h00=0x0034, h01=0x0050, text=» MATCH STRG,GSWBIN1,GSWBIN7,GSWSTR1,CBIN0,CBIN1 «, t00=0x004f, t01=0x00e4}
0x7c70…7c84              Head {h00=0x0010, h01=0x0050, text=» BNE REPL10 «, t00=0x004f, t01=0x011c}
0x7c84…7ca0              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN7,GSWBIN1«, t00=0x004f, t01=0x0130}
0x7ca0…7cc4              Head {h00=0x0020, h01=0x0050, text=» DLETE STRG,GSWBIN1,GSWBIN7 «, t00=0x004f, t01=0x014c}
0x7cc4…7cdc              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x004f, t01=0x0170}
0x7cdc…7ce8              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x004f, t01=0x0188}
0x7ce8…7cf6 (80, 2, 332) Head {h00=0x000a, h01=0x0050, text=»REPL10«, t00=0x0050, t01=0x0004}
0x7cf6…7d0e              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0050, t01=0x0012}
0x7d0e…7d1a              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0050, t01=0x002a}
0x7d1a…7d28              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0050, t01=0x0036}
0x7d28…7d30              Head {h00=0x0004, h01=0x0050, t00=0x0050, t01=0x0044}
0x7d30…7d38              Head {h00=0x0004, h01=0x0050, t00=0x0050, t01=0x004c}
0x7d38…7d4c              Head {h00=0x0010, h01=0x0050, text=»TESTAD PROC «, t00=0x0050, t01=0x0054}
0x7d4c…7d78              Head {h00=0x0028, h01=0x0050, text=»* TEST FOR AUTODUP FIELDS (TANS 8/9)«, t00=0x0050, t01=0x0068}
0x7d78…7da8              Head {h00=0x002c, h01=0x0050, text=» TBF TTCY5FLG,TESTAD1 CYK 5 IN PROGRESS?«, t00=0x0050, t01=0x0094}
0x7da8…7dce              Head {h00=0x0022, h01=0x0050, text=» MOVE GSWBIN1,CFLTDEX(SPBINW3)«, t00=0x0050, t01=0x00c4}
0x7dce…7df6              Head {h00=0x0024, h01=0x0050, text=» MOVE GSSWITCH(GSWBIN1),SPBINW3 «, t00=0x0050, t01=0x00ea}
0x7df6…7e06              Head {h00=0x000c, h01=0x0050, text=»TESTAD1 «, t00=0x0050, t01=0x0112}
0x7e06…7e12              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0050, t01=0x0122}
0x7e12…7e20              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0050, t01=0x012e}
0x7e20…7e2c              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0050, t01=0x013c}
0x7e2c…7e30              Head {h00=0x4004, h01=0x0000}
0x7e30…7e34              00 50 01 48                                                                                                                                                                                                                                       ┆ P H┆
0x7e34…7e3c (81, 1, 8)   20 04 00 00 00 51 00 04                                                                                                                                                                                                                           ┆     Q  ┆
0x7e3c…7e8c (82, 0, 400) 20 44 53 43 30 20 4b 56 4f 55 43 48 2c 52 4c 45 41 53 00 19 01 90 00 0e 00 50 5c 42 5c 57 4f 42 49 4c 41 47 00 1a 00 1a 00 18 00 50 57 4f 39 32 5c 5c 5c 53 48 4f 52 54 20 27 42 49 4c 41 47 27 00 1a 00 2c 00 1c 00 50 20 50 45 52 46 20 53 50   ┆ DSC0 KVOUCH,RLEAS       P B WOBILAG       PWO92   SHORT 'BILAG'   ,   P PERF SP┆
0x7e8c…7edc              4c 49 4e 38 2c 43 42 49 4e 32 2c 43 42 49 4e 30 00 1a 00 48 00 10 00 50 20 50 45 52 46 20 47 52 41 53 50 56 00 1a 00 68 00 12 00 50 20 53 45 54 20 47 54 53 57 46 4c 41 47 20 00 1a 00 7c 00 10 00 50 20 50 45 52 46 20 4c 49 4e 4f 50 54 00 1a   ┆LIN8,CBIN2,CBIN0   H   P PERF GRASPV   h   P SET GTSWFLAG    |   P PERF LINOPT  ┆
0x7edc…7f2c              00 92 00 0e 00 50 20 42 4e 4f 4b 20 57 4f 39 32 00 1a 00 a6 00 1c 00 50 20 43 42 47 20 47 53 57 42 49 4e 31 2c 3d 57 27 39 30 27 2c 57 4f 39 32 00 1a 00 b8 00 1a 00 50 20 4d 4f 56 45 20 47 53 57 42 49 4e 31 2c 54 54 4c 49 4e 4e 52 20 00 1a   ┆     P BNOK WO92       P CBG GSWBIN1,=W'90',WO92       P MOVE GSWBIN1,TTLINNR   ┆
0x7f2c…7f7c              00 d8 00 14 00 50 20 43 4c 45 41 52 20 47 54 53 57 46 4c 41 47 20 00 1a 00 f6 00 18 00 50 5c 50 45 52 46 20 46 52 4d 58 56 4f 2c 43 42 49 4e 31 39 20 00 1a 01 0e 00 0c 00 50 20 42 20 57 4f 31 30 30 00 1a 01 2a 00 08 00 50 57 4f 39 31 00 1a   ┆     P CLEAR GTSWFLAG        P PERF FRMXVO,CBIN19        P B WO100   *   PWO91  ┆
0x7f7c…7fcc              01 3a 00 2a 00 50 5c 4d 4f 56 45 5c 47 54 52 45 54 55 52 2c 43 42 49 4e 33 5c 49 4e 44 49 43 41 54 45 20 4b 4f 4e 54 4f 4b 4f 52 54 00 1a 01 46 00 08 00 50 5c 52 45 54 00 1a 01 74 00 06 00 50 2a 20 00 1a 01 80 00 0a 00 50 57 4f 31 30 30 20   ┆ : * P MOVE GTRETUR,CBIN3 INDICATE KONTOKORT   F   P RET   t   P*        PWO100 ┆
0x7fcc…801c (83, 0, 400) 00 1a 01 8a 00 2e 00 50 5c 44 53 43 31 5c 4b 56 4f 55 43 48 2c 50 4f 53 2c 47 53 57 42 49 4e 31 5c 50 4f 53 49 54 49 4f 4e 20 56 4f 55 43 48 45 52 20 00 1b 00 08 00 34 00 50 5c 45 44 57 52 54 5c 4b 56 4f 55 43 48 2c 47 54 53 54 52 46 4d 54   ┆     . P DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER      4 P EDWRT KVOUCH,GTSTRFMT┆
0x801c…806c              5c 45 44 57 52 54 20 57 49 54 48 20 43 55 52 52 45 4e 54 20 46 4f 52 4d 41 54 00 1b 00 3a 00 0e 00 50 5c 50 45 52 46 5c 43 52 56 4f 00 1b 00 72 00 10 00 50 20 50 45 52 46 20 54 53 54 4d 55 4c 00 1b 00 84 00 10 00 50 20 42 4e 4f 4b 20 57 4f   ┆ EDWRT WITH CURRENT FORMAT   :   P PERF CRVO   r   P PERF TSTMUL       P BNOK WO┆
0x806c…80bc              31 31 30 20 00 1b 00 98 00 10 00 50 20 50 45 52 46 20 4d 55 4c 4c 49 4e 00 1b 00 ac 00 10 00 50 20 50 45 52 46 20 4d 55 4c 4c 49 4e 00 1b 00 c0 00 10 00 50 20 50 45 52 46 20 4d 55 4c 4c 49 4e 00 1b 00 d4 00 10 00 50 20 50 45 52 46 20 4d 55   ┆110        P PERF MULLIN       P PERF MULLIN       P PERF MULLIN       P PERF MU┆
0x80bc…810c              4c 4c 49 4e 00 1b 00 e8 00 0a 00 50 57 4f 31 31 30 20 00 1b 00 fc 00 44 00 50 20 20 20 20 20 20 20 20 20 44 53 43 30 20 20 20 20 2e 4e 57 2c 4b 56 4f 55 43 48 2c 52 4c 45 41 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 45 41   ┆LLIN       PWO110      D P         DSC0    .NW,KVOUCH,RLEAS                RELEA┆
0x810c…815c              53 45 20 56 4f 55 43 48 45 52 00 1b 01 0a 00 10 00 50 20 20 20 20 20 20 20 20 20 52 45 54 00 1b 01 52 00 0e 00 50 2a 20 49 4e 20 43 59 43 4c 45 00 1b 01 66 00 0c 00 50 43 59 56 4f 55 43 48 20 00 1b 01 78 00 28 00 50 20 53 45 54 20 54 54 43   ┆SE VOUCHER       P         RET   R   P* IN CYCLE   f   PCYVOUCH    x ( P SET TTC┆
0x815c…81ac (84, 0, 400) 59 54 52 46 4c 20 41 46 54 45 52 20 41 20 43 4f 52 52 45 43 54 20 54 52 41 4e 53 20 00 1b 01 88 00 16 00 50 20 54 42 54 20 47 54 43 59 57 52 54 46 2c 57 4f 35 20 00 1c 00 24 00 18 00 50 20 4d 4f 56 45 20 47 54 42 53 55 4d 31 2c 3d 44 27 30   ┆YTRFL AFTER A CORRECT TRANS        P TBT GTCYWRTF,WO5    $   P MOVE GTBSUM1,=D'0┆
0x81ac…81fc              27 20 00 1c 00 3e 00 10 00 50 20 50 45 52 46 20 43 59 57 52 54 53 00 1c 00 5a 00 0e 00 50 20 42 4e 4f 4b 20 57 4f 35 20 00 1c 00 6e 00 08 00 50 20 52 45 54 00 1c 00 80 00 06 00 50 2a 20 00 1c 00 8c 00 08 00 50 57 4f 35 20 00 1c 00 96 00 22   ┆'    >   P PERF CYWRTS   Z   P BNOK WO5    n   P RET       P*        PWO5      "┆
0x81fc…824c              00 50 20 20 20 20 20 20 20 20 20 54 42 54 20 20 20 20 20 54 54 54 53 54 46 4c 47 2c 57 4f 31 30 00 1c 00 a2 00 1e 00 50 20 20 20 20 20 20 20 20 20 53 45 54 20 20 20 20 20 54 54 54 53 54 46 4c 47 20 00 1c 00 c8 00 2a 00 50 20 50 45 52 46 20   ┆ P         TBT     TTTSTFLG,WO10       P         SET     TTTSTFLG      * P PERF ┆
0x824c…829c              53 50 4c 49 4e 38 2c 43 42 49 4e 35 2c 43 42 49 4e 32 20 57 52 49 54 45 20 27 42 49 4c 41 47 27 00 1c 00 ea 00 1c 00 50 20 20 20 20 20 20 20 20 20 50 45 52 46 20 20 20 20 47 52 41 53 50 56 20 00 1c 01 18 00 10 00 50 5c 50 45 52 46 5c 43 4c   ┆SPLIN8,CBIN5,CBIN2 WRITE 'BILAG'       P         PERF    GRASPV        P PERF CL┆
0x829c…82ec              45 41 52 38 00 1c 01 38 00 08 00 50 57 4f 31 30 00 1c 01 4c 00 1a 00 50 5c 4d 4f 56 45 5c 47 53 57 42 49 4e 31 2c 54 54 4c 49 4e 4e 52 20 00 1c 01 58 00 2e 00 50 5c 44 53 43 31 5c 4b 56 4f 55 43 48 2c 50 4f 53 2c 47 53 57 42 49 4e 31 5c 50   ┆EAR8   8   PWO10   L   P MOVE GSWBIN1,TTLINNR    X . P DSC1 KVOUCH,POS,GSWBIN1 P┆
DataMuseum.dk

Philips Data Systems

⟦d9d898e60⟧

Derivation

PTS(SC)

HexDump

Reduced view
