|
DataMuseum.dkPresents historical artifacts from the history of: Q1 computer |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Q1 computer Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: 8
Length: 470412 (0x72d8c)
Description: Bits:30008771 50001601
Types: 8" Floppy Disk
0x00000…00020 (0, 0, 1) 00 00 50 52 49 4e 54 20 20 20 03 00 ff 00 1e 00 01 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ PRINT ┆
0x00020…00028 00 00 00 00 00 00 00 00 ┆ ┆
0x00028…00048 (0, 0, 2) 00 00 44 49 4e 44 45 58 20 20 11 00 ff 00 1e 00 02 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ DINDEX ┆
0x00048…00050 00 00 00 00 00 00 00 00 ┆ ┆
0x00050…00070 (0, 0, 3) 00 00 43 4f 50 59 20 20 20 20 0f 00 ff 00 1e 00 03 00 03 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ COPY ┆
0x00070…00078 00 00 00 00 00 00 00 00 ┆ ┆
0x00078…00098 (0, 0, 5) 00 00 44 49 53 4b 20 20 20 20 21 00 ff 00 1e 00 05 00 06 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ DISK ! ┆
0x00098…000a0 00 00 00 00 00 00 00 00 ┆ ┆
0x000a0…000c0 (0, 0, 6) 00 00 51 31 20 20 20 20 20 20 d4 01 4f 00 52 00 07 00 0c 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ Q1 O R ┆
0x000c0…000c8 00 00 00 00 00 00 00 00 ┆ ┆
0x000c8…000e8 (0, 0, 7) 00 00 56 31 31 20 20 20 20 20 93 00 4f 00 52 00 0d 00 0e 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ V11 O R ┆
0x000e8…000f0 00 00 00 00 00 00 00 00 ┆ ┆
0x000f0…00110 (0, 0, 8) 00 00 56 33 31 20 20 20 20 20 16 01 4f 00 52 00 0f 00 12 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ V31 O R ┆
0x00110…00118 00 00 00 00 00 00 00 00 ┆ ┆
0x00118…00138 (0, 0, 10) 00 00 56 35 31 20 20 20 20 20 66 01 4f 00 52 00 16 00 1a 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ V51 f O R ┆
0x00138…00140 00 00 00 00 00 00 00 00 ┆ ┆
0x00140…00160 (0, 0, 11) 00 00 56 36 31 20 20 20 20 20 3b 01 4f 00 52 00 1b 00 1e 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ V61 ; O R ┆
0x00160…00168 00 00 00 00 00 00 00 00 ┆ ┆
0x00168…00188 (0, 0, 13) 00 00 56 38 31 20 20 20 20 20 b0 00 4f 00 52 00 24 00 26 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ V81 O R $ & ┆
0x00188…00190 00 00 00 00 00 00 00 00 ┆ ┆
0x00190…001b0 (0, 0, 14) 00 00 56 39 31 20 20 20 20 20 9b 00 4f 00 52 00 27 00 28 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ V91 O R ' ( ┆
0x001b0…001b8 00 00 00 00 00 00 00 00 ┆ ┆
0x001b8…001d8 (0, 0, 16) 00 00 56 31 32 31 20 20 20 20 20 01 4f 00 52 00 31 00 34 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ V121 O R 1 4 ┆
0x001d8…001e0 00 00 00 00 00 00 00 00 ┆ ┆
0x001e0…00200 (0, 0, 17) 00 00 56 31 33 31 20 20 20 20 9f 00 4f 00 52 00 35 00 36 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ V131 O R 5 6 ┆
0x00200…00208 00 00 00 00 00 00 00 00 ┆ ┆
0x00208…00228 (0, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00228…00230 00 00 00 00 00 00 00 00 ┆ ┆
0x00230…00250 (0, 0, 23) 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 20 28 33 29 00 00 00 00 00 00 00 00 ┆ CALL CHOOSE (3) ┆
0x00250…00258 00 00 00 00 00 00 00 00 ┆ ┆
0x00258…00278 (0, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 00 00 00 00 00 00 00 00 ┆ ON ERROR ┆
0x00278…00280 00 00 00 00 00 00 00 00 ┆ ┆
0x00280…002a0 (0, 0, 27) 20 47 4f 20 54 4f 20 46 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ GO TO FEL; ┆
0x002a0…002a8 00 00 00 00 00 00 00 00 ┆ ┆
0x002a8…002c8 (0, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x002c8…002d0 00 00 00 00 00 00 00 00 ┆ ┆
0x002d0…002f0 (0, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 00 00 00 00 00 00 00 00 ┆ O ┆
0x002f0…002f8 00 00 00 00 00 00 00 00 ┆ ┆
0x002f8…00318 (0, 0, 30) 50 45 4e 20 4b 36 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆PEN K61; ┆
0x00318…00320 00 00 00 00 00 00 00 00 ┆ ┆
0x00320…00340 (0, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00340…00348 00 00 00 00 00 00 00 00 ┆ ┆
0x00348…00368 (0, 0, 33) 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 37 35 3b 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ GO TO L75; ┆
0x00368…00370 00 00 00 00 00 00 00 00 ┆ ┆
0x00370…00390 (0, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00390…00398 00 00 00 00 00 00 00 00 ┆ ┆
0x00398…003b8 (0, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x003b8…003c0 00 00 00 00 00 00 00 00 ┆ ┆
0x003c0…003e0 (0, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x003e0…003e8 00 00 00 00 00 00 00 00 ┆ ┆
0x003e8…00408 (0, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00408…00410 00 00 00 00 00 00 00 00 ┆ ┆
0x00410…00430 (0, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00430…00438 00 00 00 00 00 00 00 00 ┆ ┆
0x00438…00458 (0, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00458…00460 00 00 00 00 00 00 00 00 ┆ ┆
0x00460…00480 (0, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00480…00488 00 00 00 00 00 00 00 00 ┆ ┆
0x00488…004a8 (0, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x004a8…004b0 00 00 00 00 00 00 00 00 ┆ ┆
0x004b0…004d0 (0, 0, 43) 20 49 20 3d 20 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ I = 1; ┆
0x004d0…004d8 00 00 00 00 00 00 00 00 ┆ ┆
0x004d8…004f8 (0, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x004f8…00500 00 00 00 00 00 00 00 00 ┆ ┆
0x00500…00520 (0, 0, 46) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 20 28 32 29 3b 00 00 00 00 00 00 00 00 ┆ CALL CHOOSE (2); ┆
0x00520…00528 00 00 00 00 00 00 00 00 ┆ ┆
0x00528…00548 (0, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00548…00550 00 00 00 00 00 00 00 00 ┆ ┆
0x00550…00570 (0, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00570…00578 00 00 00 00 00 00 00 00 ┆ ┆
0x00578…00598 (0, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 00 00 00 00 00 00 00 00 ┆ ON ERROR ┆
0x00598…005a0 00 00 00 00 00 00 00 00 ┆ ┆
0x005a0…005c0 (0, 0, 50) 47 4f 20 54 4f 20 46 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆GO TO FEL; ┆
0x005c0…005c8 00 00 00 00 00 00 00 00 ┆ ┆
0x005c8…005e8 (0, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 00 00 00 00 00 00 00 00 ┆ OP ┆
0x005e8…005f0 00 00 00 00 00 00 00 00 ┆ ┆
0x005f0…00610 (0, 0, 53) 45 4e 20 4b 37 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆EN K70; ┆
0x00610…00618 00 00 00 00 00 00 00 00 ┆ ┆
0x00618…00638 (0, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00638…00640 00 00 00 00 00 00 00 00 ┆ ┆
0x00640…00660 (0, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00660…00668 00 00 00 00 00 00 00 00 ┆ ┆
0x00668…00688 (0, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00688…00690 00 00 00 00 00 00 00 00 ┆ ┆
0x00690…006b0 (0, 0, 60) 28 33 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆(3); ┆
0x006b0…006b8 00 00 00 00 00 00 00 00 ┆ ┆
0x006b8…006d8 (0, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x006d8…006e0 00 00 00 00 00 00 00 00 ┆ ┆
0x006e0…00700 (0, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 00 00 00 00 00 00 00 00 ┆ ON ER ┆
0x00700…00708 00 00 00 00 00 00 00 00 ┆ ┆
0x00708…00728 (0, 0, 63) 52 4f 52 20 47 4f 20 54 4f 20 46 45 4c 3b 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ROR GO TO FEL; ┆
0x00728…00730 00 00 00 00 00 00 00 00 ┆ ┆
0x00730…00750 (0, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00750…00758 00 00 00 00 00 00 00 00 ┆ ┆
0x00758…00778 (0, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00778…00780 00 00 00 00 00 00 00 00 ┆ ┆
0x00780…007a0 (0, 0, 66) 20 20 4f 50 45 4e 20 4b 37 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ OPEN K71; ┆
0x007a0…007a8 00 00 00 00 00 00 00 00 ┆ ┆
0x007a8…007c8 (0, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x007c8…007d0 00 00 00 00 00 00 00 00 ┆ ┆
0x007d0…007f0 (0, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x007f0…007f8 00 00 00 00 00 00 00 00 ┆ ┆
0x007f8…00818 (0, 0, 69) 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 37 35 3b 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ GO TO L75; ┆
0x00818…00820 00 00 00 00 00 00 00 00 ┆ ┆
0x00820…00840 (0, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00840…00848 00 00 00 00 00 00 00 00 ┆ ┆
0x00848…00868 (0, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00868…00870 00 00 00 00 00 00 00 00 ┆ ┆
0x00870…00890 (0, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00890…00898 00 00 00 00 00 00 00 00 ┆ ┆
0x00898…008b8 (0, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x008b8…008c0 00 00 00 00 00 00 00 00 ┆ ┆
0x008c0…008e0 (0, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 00 00 00 00 00 00 00 00 ┆ C ┆
0x008e0…008e8 00 00 00 00 00 00 00 00 ┆ ┆
0x008e8…00908 (0, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00908…00910 00 00 00 00 00 00 00 00 ┆ ┆
0x00910…00930 (0, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00930…00938 00 00 00 00 00 00 00 00 ┆ ┆
0x00938…00958 (0, 0, 79) 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 46 45 4c 00 00 00 00 00 00 00 00 ┆ ON ERROR GO TO FEL ┆
0x00958…00960 00 00 00 00 00 00 00 00 ┆ ┆
0x00960…00980 (0, 0, 80) 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆; ┆
0x00980…00988 00 00 00 00 00 00 00 00 ┆ ┆
0x00988…009a8 (0, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x009a8…009b0 00 00 00 00 00 00 00 00 ┆ ┆
0x009b0…009d0 (0, 0, 82) 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 38 30 3b 20 20 00 00 00 00 00 00 00 00 ┆ OPEN K80; ┆
0x009d0…009d8 00 00 00 00 00 00 00 00 ┆ ┆
0x009d8…009f8 (0, 0, 84) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x009f8…00a00 00 00 00 00 00 00 00 00 ┆ ┆
0x00a00…00a20 (0, 0, 85) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 3d 32 3b 00 00 00 00 00 00 00 00 ┆ I=2; ┆
0x00a20…00a28 00 00 00 00 00 00 00 00 ┆ ┆
0x00a28…00a48 (0, 0, 86) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00a48…00a50 00 00 00 00 00 00 00 00 ┆ ┆
0x00a50…00a70 (0, 0, 87) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00a70…00a78 00 00 00 00 00 00 00 00 ┆ ┆
0x00a78…00a98 (0, 0, 88) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00a98…00aa0 00 00 00 00 00 00 00 00 ┆ ┆
0x00aa0…00ac0 (0, 0, 89) 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 33 29 3b 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ CALL CHOOSE(3); ┆
0x00ac0…00ac8 00 00 00 00 00 00 00 00 ┆ ┆
0x00ac8…00ae8 (0, 0, 91) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00ae8…00af0 00 00 00 00 00 00 00 00 ┆ ┆
0x00af0…00b10 (0, 0, 92) 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 00 00 00 00 00 00 00 00 ┆ ON ERROR GO TO ┆
0x00b10…00b18 00 00 00 00 00 00 00 00 ┆ ┆
0x00b18…00b38 (0, 0, 95) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 38 00 00 00 00 00 00 00 00 ┆ OPEN K8 ┆
0x00b38…00b40 00 00 00 00 00 00 00 00 ┆ ┆
0x00b40…00b60 (0, 0, 96) 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆1; ┆
0x00b60…00b68 00 00 00 00 00 00 00 00 ┆ ┆
0x00b68…00b88 (0, 0, 97) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00b88…00b90 00 00 00 00 00 00 00 00 ┆ ┆
0x00b90…00bb0 (0, 0, 98) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00bb0…00bb8 00 00 00 00 00 00 00 00 ┆ ┆
0x00bb8…00bd8 (0, 0, 99) 47 4f 20 54 4f 20 4c 37 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆GO TO L75; ┆
0x00bd8…00be0 00 00 00 00 00 00 00 00 ┆ ┆
0x00be0…00c00 (0, 0, 100) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00c00…00c08 00 00 00 00 00 00 00 00 ┆ ┆
0x00c08…00c28 (0, 0, 103) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00c28…00c30 00 00 00 00 00 00 00 00 ┆ ┆
0x00c30…00c50 (0, 0, 104) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00c50…00c58 00 00 00 00 00 00 00 00 ┆ ┆
0x00c58…00c78 (0, 0, 105) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 00 00 00 00 00 00 00 00 ┆ CALL CHOOS ┆
0x00c78…00c80 00 00 00 00 00 00 00 00 ┆ ┆
0x00c80…00ca0 (0, 0, 106) 45 28 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆E(2); ┆
0x00ca0…00ca8 00 00 00 00 00 00 00 00 ┆ ┆
0x00ca8…00cc8 (0, 0, 107) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00cc8…00cd0 00 00 00 00 00 00 00 00 ┆ ┆
0x00cd0…00cf0 (0, 0, 109) 45 52 52 4f 52 20 47 4f 20 54 4f 20 46 45 4c 3b 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ERROR GO TO FEL; ┆
0x00cf0…00cf8 00 00 00 00 00 00 00 00 ┆ ┆
0x00cf8…00d18 (0, 0, 111) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00d18…00d20 00 00 00 00 00 00 00 00 ┆ ┆
0x00d20…00d40 (0, 0, 112) 20 20 20 20 4f 50 45 4e 20 4b 39 30 3b 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ OPEN K90; ┆
0x00d40…00d48 00 00 00 00 00 00 00 00 ┆ ┆
0x00d48…00d68 (0, 0, 113) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00d68…00d70 00 00 00 00 00 00 00 00 ┆ ┆
0x00d70…00d90 (0, 0, 115) 20 20 20 20 20 20 20 20 20 20 20 49 3d 34 3b 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ I=4; ┆
0x00d90…00d98 00 00 00 00 00 00 00 00 ┆ ┆
0x00d98…00db8 (0, 0, 118) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 00 00 00 00 00 00 00 00 ┆ CALL C ┆
0x00db8…00dc0 00 00 00 00 00 00 00 00 ┆ ┆
0x00dc0…00de0 (0, 0, 120) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00de0…00de8 00 00 00 00 00 00 00 00 ┆ ┆
0x00de8…00e08 (0, 0, 121) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00e08…00e10 00 00 00 00 00 00 00 00 ┆ ┆
0x00e10…00e30 (0, 0, 122) 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 46 45 4c 3b 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ON ERROR GO TO FEL; ┆
0x00e30…00e38 00 00 00 00 00 00 00 00 ┆ ┆
0x00e38…00e58 (0, 0, 123) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00e58…00e60 00 00 00 00 00 00 00 00 ┆ ┆
0x00e60…00e80 (0, 0, 125) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 39 31 3b 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ OPEN K91; ┆
0x00e80…00e88 00 00 00 00 00 00 00 00 ┆ ┆
0x00e88…00ea8 (0, 0, 126) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆ ┆
0x00ea8…00eb0 00 00 00 00 00 00 00 00 ┆ ┆
0x00eb0…00ed0 (0, 0, 129) 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ┆; ┆
0x00ed0…00ed8 00 00 00 00 00 00 00 00 ┆ ┆
0x00ed8…00ef8 (1, 0, 0) 0c b2 43 0a 00 00 52 45 4e 41 4d 45 20 20 0c cc 43 41 01 00 20 02 00 61 00 49 4e 44 45 58 20 20 ┆ C RENAME CA a INDEX ┆
0x00ef8…00f18 20 4e 41 4d 45 20 20 20 20 52 45 43 4f 52 44 53 20 4c 45 4e 47 54 48 20 20 4d 41 58 52 45 43 53 ┆ NAME RECORDS LENGTH MAXRECS┆
0x00f18…00f38 20 46 49 52 53 54 20 26 20 4c 41 53 54 20 54 52 41 43 4b 0c 0f 44 04 08 00 ff 0f 0c 19 44 0b 06 ┆ FIRST & LAST TRACK D D ┆
0x00f38…00f58 00 07 00 20 20 20 20 20 20 20 0b 26 44 05 43 00 32 9e 25 0a ca 43 02 2b 44 0b 2b 44 13 43 00 32 ┆ &D C 2 % C +D +D C 2┆
0x00f58…00f78 01 0c 0a 43 cc 00 0a 43 cc 00 43 ce 32 01 09 02 0b 40 44 17 1d 43 00 32 9e 43 00 32 01 0c 0a 43 ┆ C C C 2 @D C 2 C 2 C┆
0x00f78…00f98 cf 00 0a 43 d1 00 06 43 ca 00 1c 0b 3e 44 02 44 57 0b 57 44 2c 43 a0 32 08 43 00 32 9e 06 43 b2 ┆ C C >D DW WD,C 2 C 2 C ┆
0x00f98…00fb8 33 00 18 43 9e 33 00 14 06 43 b2 22 43 9e 33 00 14 43 b2 33 00 18 06 43 a0 32 08 43 d3 32 08 09 ┆3 C 3 C "C 3 C 3 C 2 C 2 ┆
0x00fb8…00fd7 02 0b 85 44 13 1d 15 00 2a 32 0d 32 01 2a 43 db 32 32 26 32 0d 32 01 2a 0a 0d 44 02 98 44 00 ┆ D *2 2 *C 22&2 2 * D D ┆
0x00fd7…00ff7 (1, 0, 1) 0a 0f 44 00 0b 98 44 59 40 f9 44 24 00 03 43 b2 33 00 14 43 9e 2b 01 15 00 2a 32 0d 32 01 2a 43 ┆ D DY@ D$ C 3 C + *2 2 *C┆
0x00ff7…01017 a0 32 08 26 43 a8 00 19 44 0f 00 28 43 aa 00 19 44 0f 00 28 43 ac 00 43 b0 00 43 ae 00 0c 0a 43 ┆ 2 &C D (C D (C C C C┆
0x01017…01037 cc 00 0a 0e 19 44 0f 00 28 43 ae 00 19 44 0f 00 28 43 b0 00 44 11 00 12 19 44 0f 00 28 44 0d 00 ┆ D (C D (C D D (D ┆
0x01037…01057 1c 0b 83 44 02 44 f4 0b f4 44 10 44 13 43 cc 00 03 44 13 00 43 a8 00 0c 0a 32 01 0b 08 45 1c 20 ┆ D D D D C D C 2 E ┆
0x01057…01077 44 13 44 13 00 32 01 0a 03 44 fa 1c 43 b2 33 00 9e 43 00 2b 01 44 15 43 aa 00 03 0a 17 44 02 24 ┆D D 2 D C 3 C + D C D $┆
0x01077…01097 45 0b 24 45 21 43 00 32 01 0c 0a 44 15 00 44 19 00 0c 0a 0a 44 1b 00 44 1d 32 07 09 02 44 15 00 ┆E $E!C 2 D D D D 2 D ┆
0x01097…010b7 44 19 00 07 04 12 0b 47 45 10 1d 44 15 44 15 00 44 1b 00 0c 0a 03 44 17 00 1c 0b 45 45 02 45 57 ┆D GE D D D D EE EW┆
0x010b7…010d6 0b 57 45 19 15 00 2a 32 0d 32 01 2a 43 00 32 01 0c 0a 43 cc 00 0a 44 15 00 26 45 09 1c 00 00 ┆ WE *2 2 *C 2 C D &E ┆
0x010d6…010f6 (1, 0, 2) 0b 04 45 04 45 70 45 15 0b f1 44 03 45 70 1c 0a 24 44 02 70 45 0b 70 45 09 15 00 2a 32 0d 32 01 ┆ E EpE D Ep $D pE pE *2 2 ┆
0x010f6…01116 2a 1b 0b fe 40 02 26 44 0b 81 40 02 09 18 00 19 44 0f 00 28 43 ac 00 43 b0 00 43 ae 00 0c 0a 43 ┆* @ &D @ D (C C C C┆
0x01116…01136 cc 00 0a 0e 19 44 0f 00 28 43 ae 00 19 44 0f 00 28 43 b0 00 44 11 00 12 19 44 0f 00 28 44 0d 00 ┆ D (C D (C D D (D ┆
0x01136…01156 1c 0b 83 44 02 44 f4 0b f4 44 10 44 13 43 cc 00 03 44 13 00 43 a8 00 0c 0a 32 01 0b 08 45 1c 20 ┆ D D D D C D C 2 E ┆
0x01156…01176 44 13 44 13 00 32 01 0a 03 44 fa 1c 43 b2 33 00 9e 43 00 2b 01 44 15 43 aa 00 03 0a 17 44 02 24 ┆D D 2 D C 3 C + D C D $┆
0x01176…01196 45 0b 24 45 21 43 00 32 01 0c 0a 44 15 00 44 19 00 0c 0a 0a 44 1b 00 44 1d 32 07 09 02 44 15 00 ┆E $E!C 2 D D D D 2 D ┆
0x01196…011b6 44 19 00 07 04 12 0b 47 45 10 1d 44 15 44 15 00 44 1b 00 0c 0a 03 44 17 00 1c 0b 45 45 02 45 57 ┆D GE D D D D EE EW┆
0x011b6…011d5 0b 57 45 19 15 00 2a 32 0d 32 01 2a 43 00 32 01 0c 0a 43 cc 00 0a 44 15 00 26 45 09 1c 00 00 ┆ WE *2 2 *C 2 C D &E ┆
0x011d5…012d4 (1, 0, 3) 0x00[0xff]
[…0x15…]
0x027bf…027df (1, 0, 25) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x0289f…028be 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x028be…028de (1, 0, 26) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x0299e…029bd 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x029bd…029dd (1, 0, 27) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x02a9d…02abc 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x02abc…02adc (1, 0, 28) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x02b9c…02bbb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x02bbb…02bdb (1, 0, 29) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x02c9b…02cba 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x02cba…02cda (2, 0, 0) 0c 00 57 10 00 00 46 49 4c 45 4e 41 4d 45 00 00 00 00 00 00 0c 18 57 0a 20 20 49 4e 44 45 58 20 ┆ W FILENAME W INDEX ┆
0x02cda…02cfa 20 20 0c 30 57 02 00 00 0c 32 57 02 00 00 0c 34 57 06 00 00 00 00 00 00 0c 3a 57 0b 75 6e 70 72 ┆ 0W 2W 4W :W unpr┆
0x02cfa…02d1a 6f 74 65 63 74 65 64 0c 47 57 01 20 0c 56 57 21 00 00 01 00 08 00 4e 4f 20 53 55 43 48 20 44 52 ┆otected GW VW! NO SUCH DR┆
0x02d1a…02d3a 49 56 45 2c 20 54 52 59 20 41 47 41 49 4e 20 3a 20 0c 79 57 02 0a 00 0c 7d 57 02 18 00 0c 85 57 ┆IVE, TRY AGAIN : yW åW W┆
0x02d3a…02d5a 0c 10 20 2f 00 04 00 07 00 06 00 17 00 0c 97 57 02 11 00 0c 9b 57 0b 12 00 44 52 49 56 45 20 23 ┆ / W W DRIVE #┆
0x02d5a…02d7a 3a 20 0c a8 57 58 13 00 20 44 49 4e 44 45 58 20 20 20 20 20 20 20 20 20 20 56 32 2e 32 20 20 20 ┆: WX DINDEX V2.2 ┆
0x02d7a…02d9a 20 20 20 20 20 20 20 31 32 2f 30 37 2f 37 38 20 46 31 20 2d 20 52 65 61 64 20 49 4e 44 45 58 20 ┆ 12/07/78 F1 - Read INDEX ┆
0x02d9a…02db9 6f 6e 20 73 65 6c 65 63 74 65 64 20 64 72 69 76 65 20 46 32 20 2d 20 43 68 6f 6f 73 65 20 00 ┆on selected drive F2 - Choose ┆
0x02db9…02dd9 (2, 0, 1) 0c 00 58 66 61 20 6e 65 77 20 64 72 69 76 65 20 46 33 20 2d 20 44 49 4e 44 45 58 20 6d 65 6e 75 ┆ Xfa new drive F3 - DINDEX menu┆
0x02dd9…02df9 20 6f 66 20 6f 70 74 69 6f 6e 73 20 46 34 20 2d 20 53 65 61 72 63 68 20 66 6f 72 20 66 69 6c 65 ┆ of options F4 - Search for file┆
0x02df9…02e19 20 6e 61 6d 65 20 46 35 20 2d 20 50 72 69 6e 74 20 69 6e 64 65 78 20 6f 6e 20 73 65 6c 65 63 74 ┆ name F5 - Print index on select┆
0x02e19…02e39 65 64 20 64 72 69 76 65 0c 00 0c 68 58 8a 20 46 36 20 2d 20 44 69 73 70 6c 61 79 20 70 72 65 76 ┆ed drive hX F6 - Display prev┆
0x02e39…02e59 69 6f 75 73 20 72 65 63 6f 72 64 20 46 37 20 2d 20 54 65 72 6d 69 6e 61 74 65 20 44 49 4e 44 45 ┆ious record F7 - Terminate DINDE┆
0x02e59…02e79 58 20 46 38 20 2d 20 44 69 73 70 6c 61 79 20 66 69 72 73 74 20 72 65 63 6f 72 64 20 46 39 20 2d ┆X F8 - Display first record F9 -┆
0x02e79…02e99 20 44 69 73 70 6c 61 79 20 6c 69 73 74 20 6f 66 20 66 69 6c 65 20 6e 61 6d 65 73 20 52 45 54 55 ┆ Display list of file names RETU┆
0x02e99…02eb8 52 4e 20 2d 20 44 69 73 70 6c 61 79 20 6e 65 78 74 20 72 65 63 6f 72 64 0c f4 58 02 14 00 00 ┆RN - Display next record X ┆
0x02eb8…02ed8 (2, 0, 2) 0c f6 58 00 0c f8 58 2d 53 45 41 52 43 48 20 46 4f 52 20 46 49 4c 45 20 3a 20 03 00 46 49 4c 45 ┆ X X-SEARCH FOR FILE : FILE┆
0x02ed8…02ef8 20 05 00 20 49 53 20 4e 4f 54 20 4f 4e 20 49 4e 44 45 58 0d 00 0c 27 59 3c 15 00 4d 61 78 69 6d ┆ IS NOT ON INDEX 'Y< Maxim┆
0x02ef8…02f18 75 6d 1b 00 46 69 72 73 74 02 00 4c 61 73 74 52 65 63 6f 72 64 73 2f 4e 61 6d 65 52 65 63 6f 72 ┆um First LastRecords/NameRecor┆
0x02f18…02f38 64 73 4c 65 6e 67 74 68 54 72 61 63 6b 54 72 61 63 6b 73 ff 7f 0c 65 59 0f 5a 5a 5a 5a 39 5a 5a ┆dsLengthTrackTracks eY ZZZZ9ZZ┆
0x02f38…02f58 50 5a 5a 5a 39 5a 5a 39 0c 76 59 02 16 00 0c 7e 59 02 19 00 0c 82 59 22 20 44 49 4e 44 45 58 20 ┆PZZZ9ZZ9 vY ~Y Y" DINDEX ┆
0x02f58…02f78 20 20 20 20 20 20 20 20 20 56 32 2e 32 31 31 32 2f 30 37 2f 37 38 0b 00 20 00 0c a6 59 40 20 46 ┆ V2.2112/07/78 Y@ F┆
0x02f78…02f98 49 4c 45 20 4e 41 4d 45 20 3a 20 44 52 49 56 45 27 00 00 80 20 20 70 72 6f 74 65 63 74 65 64 1d ┆ILE NAME : DRIVE' protected ┆
0x02f98…02fb7 00 75 6e 70 72 6f 74 65 63 74 65 64 52 45 43 2e 20 4c 45 4e 47 54 48 3a 23 20 4f 46 20 52 00 ┆ unprotectedREC. LENGTH:# OF R ┆
0x02fb7…02fd7 (2, 0, 3) 0c e6 59 5d 45 43 53 2e 20 3a 21 00 52 45 43 53 2e 2f 54 52 41 43 4b 3a 4d 41 58 20 52 45 43 53 ┆ YÅECS. :! RECS./TRACK:MAX RECS┆
0x02fd7…02ff7 2e 20 20 3a 46 49 52 53 54 20 54 52 41 43 4b 3a 4c 41 53 54 20 54 52 41 43 4b 20 3a 20 20 20 2a ┆. :FIRST TRACK:LAST TRACK : *┆
0x02ff7…03017 20 44 45 50 52 45 53 53 20 46 33 20 46 4f 52 20 4c 49 53 54 20 4f 46 20 4f 50 54 49 4f 4e 53 20 ┆ DEPRESS F3 FOR LIST OF OPTIONS ┆
0x03017…03037 2a 0a 52 57 02 45 5a 0b 45 5a 0b 32 00 57 24 57 26 57 28 61 e6 1e 0a 54 57 02 50 5a 0b 50 5a 26 ┆* RW EZ EZ 2 W$W&W(a TW PZ PZ&┆
0x03037…03057 57 22 24 1a 16 03 57 32 57 56 00 03 57 00 32 18 57 18 32 0a 06 57 22 00 57 58 00 07 01 57 22 00 ┆W"$ W2WV W 2 W 2 W" WX W" ┆
0x03057…03077 57 5a 00 07 04 13 0b 78 5a 12 1d 15 00 27 32 0d 32 01 2a 57 5c 32 1b 26 57 54 00 1c 0b 76 5a 02 ┆WZ xZ '2 2 *WÖ2 &WT vZ ┆
0x03077…03097 5a 8a 0b 8a 5a 07 32 00 57 22 61 cc 1e 0a 77 57 02 91 5a 0b 91 5a 1a 57 00 22 57 2a 57 00 57 79 ┆Z Z 2 W"a wW Z Z W "W*W Wy┆
0x03097…030b6 00 0a 03 40 f9 57 7b 00 03 57 00 32 14 43 00 2b ff 0a 7b 57 02 ab 5a 0b ab 5a 02 57 2c 00 00 ┆ @ Wä W 2 C + äW Z Z W, ┆
0x030b6…030d6 (2, 0, 4) 0b ad 5a 2d 57 58 00 03 57 2e 57 7d 00 03 57 48 57 56 00 03 57 30 57 56 00 03 57 34 57 56 00 19 ┆ Z-WX W.Wå WHWV W0WV W4WV ┆
0x030d6…030f6 17 04 06 57 7f 57 56 00 03 15 00 27 32 0d 32 01 2a 0a 81 57 02 da 5a 0b da 5a 10 57 83 57 2c 00 ┆ W WV '2 2 * W Z Z W W, ┆
0x030f6…03116 03 57 83 00 57 2e 00 0c 0a 32 01 0b ee 5a 2f 20 57 83 57 83 00 32 01 0a 03 5a e0 1c 57 7f 57 7f ┆ W W. 2 Z/ W W 2 Z W W ┆
0x03116…03136 00 57 58 00 0a 03 56 ec 32 14 42 ec 57 83 00 32 14 0e 0a 32 14 06 56 f6 00 57 56 00 07 02 0b 1f ┆ WX V 2 B W 2 2 V WV ┆
0x03136…03156 5b 0a 1d 57 47 32 01 57 85 32 01 06 0b 1d 5b 02 5b 2c 0b 2c 5b 09 57 47 32 01 57 86 32 01 06 0b ┆Ä WG2 W 2 Ä Ä, ,Ä WG2 W 2 ┆
0x03156…03176 29 5b 03 5b 35 1c 0b 35 5b 2a 15 00 27 57 47 32 01 32 20 57 58 00 2a 57 58 00 28 56 ee 32 08 57 ┆)Ä Ä5 5Ä* 'WG2 2 WX *WX (V 2 W┆
0x03176…03196 5a 00 28 57 28 00 57 87 00 07 02 57 7f 00 57 89 00 07 02 12 0b 61 5b 12 1d 15 00 27 57 86 32 01 ┆Z (W( W W W aÄ 'W 2 ┆
0x03196…031b5 57 8b 00 28 57 7f 57 56 00 03 0b 5f 5b 02 5b 73 0b 73 5b 08 57 83 00 33 00 00 57 2a 00 00 00 ┆W (W WV _Ä Äs sÄ W 3 W* ┆
0x031b5…031d5 (2, 0, 5) 0b 7b 5b 05 00 0a 00 07 06 0b 82 5b 0b 1d 57 30 57 58 00 03 57 91 00 1c 0b 80 5b 02 5b 8d 0b 8d ┆ äÄ Ä W0WX W Ä Ä ┆
0x031d5…031f5 5b 03 5a ef 1c 0b ea 5a 04 5b 90 5a fb 0b 90 5b 08 57 26 00 57 8d 00 07 02 0b 9a 5b 05 1d 57 91 ┆Ä Z Z Ä Z Ä W& W Ä W ┆
0x031f5…03215 00 1c 0b 98 5b 02 5b 9f 0b 9f 5b 20 57 2c 57 83 00 03 57 2e 57 83 00 57 8f 00 0a 03 57 83 57 2c ┆ Ä Ä Ä W,W W.W W W W,┆
0x03215…03235 00 03 57 83 00 57 2e 00 0c 0a 32 01 0b c3 5b 2f 20 57 83 57 83 00 32 01 0a 03 5b b5 1c 57 7f 57 ┆ W W. 2 Ä/ W W 2 Ä W W┆
0x03235…03255 7f 00 57 58 00 0a 03 56 ec 32 14 42 ec 57 83 00 32 14 0e 0a 32 14 06 56 f6 00 57 56 00 07 02 0b ┆ WX V 2 B W 2 2 V WV ┆
0x03255…03275 f4 5b 0a 1d 57 47 32 01 57 85 32 01 06 0b f2 5b 02 5c 01 0b 01 5c 09 57 47 32 01 57 86 32 01 06 ┆ Ä WG2 W 2 Ä Ö Ö WG2 W 2 ┆
0x03275…03295 0b fe 5b 03 5c 0a 1c 0b 0a 5c 2a 15 00 27 57 47 32 01 32 20 57 58 00 2a 57 58 00 28 56 ee 32 08 ┆ Ä Ö Ö* 'WG2 2 WX *WX (V 2 ┆
0x03295…032b4 57 5a 00 28 57 28 00 57 87 00 07 02 57 7f 00 57 89 00 07 02 12 0b 36 5c 03 1d 57 7f 00 00 00 ┆WZ (W( W W W 6Ö W ┆
0x032b4…032d4 (2, 0, 6) 0b 39 5c 0f 57 56 00 03 15 00 27 57 86 32 01 57 8b 00 28 0b 34 5c 02 5c 48 0b 48 5c 0d 57 83 00 ┆ 9Ö WV 'W 2 W ( 4Ö ÖH HÖ W ┆
0x032d4…032f4 33 00 00 57 2a 00 0a 00 07 06 0b 57 5c 0b 1d 57 30 57 58 00 03 57 91 00 1c 0b 55 5c 02 5c 62 0b ┆3 W* WÖ W0WX W UÖ Öb ┆
0x032f4…03314 62 5c 03 5b c4 1c 0b bf 5b 04 5c 65 5b d0 0a 91 57 02 65 5c 0b 65 5c 0c 57 86 32 01 25 32 00 57 ┆bÖ Ä Ä ÖeÄ W eÖ eÖ W 2 %2 W┆
0x03314…03334 93 62 1d 1e 0a 95 57 02 71 5c 0b 71 5c 08 57 93 00 57 97 00 07 02 0b 7b 5c 05 1d 57 77 00 1c 0b ┆ b W qÖ qÖ W W äÖ Ww ┆
0x03334…03354 79 5c 02 5c 80 0a 99 57 02 80 5c 0b 80 5c 08 57 93 00 57 9b 00 07 02 0b 8a 5c 12 1d 15 00 27 32 ┆yÖ Ö W Ö Ö W W Ö '2┆
0x03354…03374 0d 32 01 2a 57 9d 32 09 26 57 54 00 1c 0b 88 5c 02 5c 9c 0a a6 57 02 9c 5c 0b 9c 5c 08 57 93 00 ┆ 2 *W 2 &WT Ö Ö W Ö Ö W ┆
0x03374…03394 57 a8 00 07 02 0b a6 5c 33 1d 15 00 27 32 0d 32 01 2a 57 aa 32 27 57 28 00 28 57 d1 32 22 57 28 ┆W Ö3 '2 2 *W 2'W( (W 2"W(┆
0x03394…033b3 00 28 57 f3 32 18 57 28 00 28 58 0b 32 1c 57 28 00 28 58 27 32 1a 57 28 00 28 58 41 00 00 00 ┆ (W 2 W( (X 2 W( (X'2 W( (XA ┆
0x033b3…033d3 (2, 0, 7) 0b d9 5c 0e 32 23 57 28 00 28 57 26 00 58 64 00 07 02 0b e9 5c 05 1d 58 66 00 1c 0b e7 5c 02 5c ┆ Ö 2#W( (W& Xd Ö Xf Ö Ö┆
0x033d3…033f3 ee 0b ee 5c 0d 57 34 57 58 00 19 17 04 06 57 91 00 1c 0a 66 58 02 fb 5c 0b fb 5c 38 15 00 27 58 ┆ Ö W4WX W fX Ö Ö8 'X┆
0x033f3…03413 68 32 1d 57 28 00 28 58 85 32 16 57 28 00 28 58 9b 32 1a 57 28 00 28 58 b5 32 20 57 28 00 28 58 ┆h2 W( (X 2 W( (X 2 W( (X 2 W( (X┆
0x03413…03433 d5 32 1d 57 28 00 28 57 34 57 56 00 19 17 04 06 57 91 00 1c 0b a4 5c 02 5d 33 0a f2 58 02 33 5d ┆ 2 W( (W4WV W Ö Å3 X 3Å┆
0x03433…03453 0b 33 5d 08 57 93 00 58 f4 00 07 02 0b 3d 5d 09 1d 15 00 27 32 0d 32 01 2a 0a f6 58 02 46 5d 0b ┆ 3Å W X =Å '2 2 * X FÅ ┆
0x03453…03473 46 5d 1a 15 00 27 58 f8 32 12 26 57 48 57 48 00 57 58 00 0a 03 57 48 00 59 0a 00 07 02 0b 62 5d ┆FÅ 'X 2 &WHWH WX WH Y bÅ┆
0x03473…03493 05 1d 57 7b 00 1c 0b 60 5d 02 5d 67 0b 67 5d 1a 57 4a 32 08 25 57 83 57 58 00 03 57 83 00 33 00 ┆ Wä `Å Åg gÅ WJ2 %W WX W 3 ┆
0x03493…034b2 00 57 2a 00 0a 00 0c 0a 32 01 0b 85 5d 0d 20 57 83 57 83 00 32 01 0a 03 5d 72 1c 00 00 00 00 ┆ W* 2 Å W W 2 År ┆
0x034b2…034d2 (2, 0, 8) 0b 92 5d 1a 56 ec 32 14 42 ec 57 83 00 32 14 0e 0a 32 14 06 57 4a 32 08 56 ee 32 08 09 02 0b ae ┆ Å V 2 B W 2 2 WJ2 V 2 ┆
0x034d2…034f2 5d 0b 1d 57 32 57 83 00 03 59 a4 00 1c 0b ac 5d 02 5d b9 0b b9 5d 03 5d 86 1c 0b 81 5d 04 5d bc ┆Å W2W Y Å Å Å Å Å Å ┆
0x034f2…03512 5d 92 0b bc 5d 29 15 00 27 32 0d 32 01 2a 59 0c 32 05 59 11 00 28 57 4a 32 08 57 5a 00 28 59 13 ┆Å Å) '2 2 *Y 2 Y (WJ2 WZ (Y ┆
0x03512…03532 32 10 57 28 00 59 23 00 0c 0a 28 58 f6 00 1c 0b 3b 5d 02 5d e5 0a 25 59 02 e5 5d 0b e5 5d 08 57 ┆2 W( Y# (X ;Å Å %Y Å Å W┆
0x03532…03552 93 00 59 27 00 07 02 0b ef 5d 73 1d 15 00 2a 32 0d 32 01 2a 59 29 32 07 32 20 59 30 00 2a 57 8b ┆ Y' Ås *2 2 *Y)2 2 Y0 *W ┆
0x03552…03572 00 28 59 32 32 05 32 20 59 37 00 2a 59 11 00 28 59 39 32 04 32 20 59 37 00 2a 57 89 00 28 59 3d ┆ (Y22 2 Y7 *Y (Y92 2 Y7 *W (Y=┆
0x03572…03592 32 08 32 20 57 79 00 2a 57 5a 00 28 15 00 2a 32 0d 32 01 2a 59 45 32 04 57 89 00 28 32 20 59 11 ┆2 2 Wy *WZ ( *2 2 *YE2 W (2 Y ┆
0x03592…035b1 00 2a 59 49 32 07 57 8b 00 28 32 20 59 0a 00 2a 59 50 32 06 57 8d 00 28 32 20 59 37 00 2a 00 ┆ *YI2 W (2 Y *YP2 W (2 Y7 * ┆
0x035b1…035d1 (2, 0, 9) 0b 62 5e 5d 59 49 32 07 57 8b 00 28 32 20 59 37 00 2a 59 56 32 05 59 11 00 28 32 20 59 37 00 2a ┆ b^ÅYI2 W (2 Y7 *YV2 Y (2 Y7 *┆
0x035d1…035f1 59 56 32 05 59 11 00 28 32 20 59 37 00 2a 59 5b 32 06 57 8d 00 28 32 20 59 37 00 2a 59 56 32 05 ┆YV2 Y (2 Y7 *YÄ2 W (2 Y7 *YV2 ┆
0x035f1…03611 59 11 00 28 15 00 2a 32 0d 32 01 2a 57 83 57 58 00 03 57 83 00 33 00 00 57 2a 00 0a 00 0c 0a 32 ┆Y ( *2 2 *W WX W 3 W* 2┆
0x03611…03631 01 0b c3 5e 96 20 57 83 57 83 00 32 01 0a 03 5e b0 1c 56 ec 32 14 42 ec 57 83 00 32 14 0e 0a 32 ┆ ^ W W 2 ^ V 2 B W 2 2┆
0x03631…03651 14 06 56 fe 56 fe 00 59 61 00 12 03 59 63 56 fe 00 56 fc 00 0c 0a 57 58 00 0a 03 57 45 56 fa 00 ┆ V V Ya YcV V WX WEV ┆
0x03651…03671 59 63 00 0e 03 15 00 2a 32 0d 32 01 2a 56 ee 32 08 57 5a 00 28 32 20 57 58 00 2a 56 f6 00 19 59 ┆Yc *2 2 *V 2 WZ (2 WX *V Y┆
0x03671…03691 65 32 05 29 32 20 57 8d 00 2a 56 f8 00 19 59 6a 32 03 29 32 20 57 89 00 2a 57 45 00 19 59 65 32 ┆e2 )2 W *V Yj2 )2 W *WE Ye2┆
0x03691…036b0 05 29 32 20 59 0a 00 2a 56 fc 00 19 59 6d 32 04 29 32 20 59 0a 00 2a 56 fe 00 19 00 00 2a 00 ┆ )2 Y *V Ym2 )2 Y *V * ┆
0x036b0…036d0 (2, 0, 10) 0b 59 5f 26 59 6d 32 04 29 32 20 59 0a 00 2a 59 63 00 19 59 6d 32 04 29 32 20 59 11 00 2a 56 fa ┆ Y_&Ym2 )2 Y *Yc Ym2 )2 Y *V ┆
0x036d0…036f0 00 19 59 71 32 03 29 5e c4 1c 0b bf 5e 04 5f 7f 5e d0 0b 7f 5f 0d 15 00 2a 32 0d 59 37 00 2a 57 ┆ Yq2 )^ ^ _ ^ _ *2 Y7 *W┆
0x036f0…03710 91 00 1c 0b ed 5d 02 5f 8c 0a 74 59 02 8c 5f 0b 8c 5f 08 57 93 00 59 76 00 07 02 0b 96 5f 14 1d ┆ Å _ tY _ _ W Yv _ ┆
0x03710…03730 57 32 57 32 00 57 58 00 0c 0a 03 57 32 00 57 56 00 07 03 0b ac 5f 0c 1d 57 32 33 00 00 57 2a 00 ┆W2W2 WX W2 WV _ W23 W* ┆
0x03730…03750 0a 00 03 0b aa 5f 02 5f b8 0b b8 5f 13 57 30 57 58 00 03 57 34 57 56 00 19 17 04 06 59 a4 00 1c ┆ _ _ _ W0WX W4WV Y ┆
0x03750…03770 0b 94 5f 02 5f cb 0a 78 59 02 cb 5f 0b cb 5f 08 57 93 00 57 8f 00 07 02 0b d5 5f 05 1d 5a 43 00 ┆ _ _ xY _ _ W W _ ZC ┆
0x03770…03790 1c 0b d3 5f 02 5f da 0a 7a 59 02 da 5f 0b da 5f 08 57 93 00 57 7d 00 07 02 0b e4 5f 1a 1d 57 32 ┆ _ _ zY _ _ W Wå _ W2┆
0x03790…037af 57 58 00 03 57 30 57 58 00 03 57 34 57 56 00 19 17 04 06 59 a4 00 1c 0b e2 5f 02 5f fe 00 00 ┆WX W0WX W4WV Y _ _ ┆
0x037af…037cf (2, 0, 11) 0a 7c 59 02 fe 5f 0b fe 5f 08 57 93 00 59 7e 00 07 02 0b 08 60 05 1d 57 7b 00 1c 0b 06 60 02 60 ┆ öY _ _ W Y~ ` Wä ` `┆
0x037cf…037ef 0d 0a 80 59 02 0d 60 0b 0d 60 08 57 93 00 59 23 00 07 02 0b 17 60 09 1d 57 30 00 57 56 00 07 02 ┆ Y ` ` W Y# ` W0 WV ┆
0x037ef…0380f 0b 22 60 21 1d 57 2c 57 83 00 57 58 00 0a 03 57 2e 57 83 00 57 7d 00 0a 03 15 00 27 32 0d 32 01 ┆ "`! W,W WX W.W Wå '2 2 ┆
0x0380f…0382f 2a 57 81 00 1c 0b 20 60 02 60 43 0b 43 60 0b 57 34 01 06 57 58 00 19 17 08 02 0b 50 60 28 1d 15 ┆*W ` `C C` W4 WX P`( ┆
0x0382f…0384f 00 27 32 0d 32 01 2a 59 82 32 16 59 27 00 28 59 98 32 08 32 20 59 a0 00 2a 57 28 00 59 a2 00 0c ┆ '2 2 *Y 2 Y' (Y 2 2 Y *W( Y ┆
0x0384f…0386f 0a 28 58 66 00 1c 0b 4e 60 02 60 78 0b 78 60 17 57 32 57 32 00 57 58 00 0a 03 57 32 00 33 00 00 ┆ (Xf N` `x x` W2W2 WX W2 3 ┆
0x0386f…0388f 57 2a 00 0a 00 07 04 0b 91 60 07 1d 57 32 57 58 00 03 0b 8f 60 02 60 98 0a a4 59 02 98 60 0b 98 ┆W* ` W2WX ` ` Y ` ┆
0x0388f…038ae 60 1a 56 ec 32 14 42 ec 57 32 00 32 14 0e 0a 32 14 06 15 00 27 32 0d 32 01 2a 59 a6 00 00 00 ┆` V 2 B W2 2 2 '2 2 *Y ┆
0x038ae…038ce (2, 0, 12) 0b b2 60 3d 32 0d 58 64 00 28 56 ee 32 08 57 5a 00 28 57 86 32 01 59 23 00 28 59 b3 32 05 57 8d ┆ `=2 Xd (V 2 WZ (W 2 Y# (Y 2 W ┆
0x038ce…038ee 00 28 57 22 00 19 57 28 00 59 b8 00 0c 0a 28 57 7f 56 fe 00 59 ba 00 12 03 57 7f 00 57 56 00 07 ┆ (W" W( Y (W V Y W WV ┆
0x038ee…0390e 05 0b f1 60 0a 1d 57 3a 32 0b 59 bc 32 0b 06 0b ef 60 02 60 fb 0b fb 60 a3 15 00 27 57 86 32 01 ┆ ` W:2 Y 2 ` ` ` 'W 2 ┆
0x0390e…0392e 59 c7 00 28 57 3a 32 0b 57 28 00 59 c7 00 0c 0a 28 57 3a 32 0b 59 c9 32 0b 06 15 00 27 59 d4 32 ┆Y (W:2 W( Y (W:2 Y 2 'Y 2┆
0x0392e…0394e 0c 59 23 00 28 56 f8 00 19 57 8b 00 28 59 e0 32 0c 59 23 00 28 56 f6 00 19 57 28 00 59 ec 00 0c ┆ Y# (V W (Y 2 Y# (V W( Y ┆
0x0394e…0396e 0a 28 56 fe 56 fe 00 59 61 00 12 03 57 45 56 fa 00 56 fe 00 56 fc 00 0c 0a 57 58 00 0a 0e 03 15 ┆ (V V Ya WEV V V WX ┆
0x0396e…0398e 00 27 59 ee 32 0c 59 23 00 28 56 fa 00 19 57 8b 00 28 59 fa 32 0c 59 23 00 28 57 45 00 19 57 28 ┆ 'Y 2 Y# (V W (Y 2 Y# (WE W(┆
0x0398e…039ad 00 59 ec 00 0c 0a 28 15 00 27 5a 06 32 0c 59 23 00 28 56 fc 00 19 57 8b 00 28 5a 12 00 00 00 ┆ Y ( 'Z 2 Y# (V W (Z ┆
0x039ad…039cd (2, 0, 13) 0b 9e 61 22 32 0c 59 23 00 28 56 fe 00 19 57 28 00 59 ec 00 0c 0a 28 15 00 27 5a 1e 32 25 57 28 ┆ a"2 Y# (V W( Y ( 'Z 2%W(┆
0x039cd…039ed 00 28 57 91 00 1c 0b 15 60 02 61 c0 0b c0 61 04 57 91 00 1c 0a 43 5a 02 c4 61 0b c4 61 08 32 00 ┆ (W ` a a W CZ a a 2 ┆
0x039ed…03a0d 57 56 61 cc 1e 1b 0b fe 40 02 45 5a 0b 81 40 02 09 18 00 60 fb 0b fb 60 a3 15 00 27 57 86 32 01 ┆WVa @ EZ @ ` ` 'W 2 ┆
0x03a0d…03a2d 59 c7 00 28 57 3a 32 0b 57 28 00 59 c7 00 0c 0a 28 57 3a 32 0b 59 c9 32 0b 06 15 00 27 59 d4 32 ┆Y (W:2 W( Y (W:2 Y 2 'Y 2┆
0x03a2d…03a4d 0c 59 23 00 28 56 f8 00 19 57 8b 00 28 59 e0 32 0c 59 23 00 28 56 f6 00 19 57 28 00 59 ec 00 0c ┆ Y# (V W (Y 2 Y# (V W( Y ┆
0x03a4d…03a6d 0a 28 56 fe 56 fe 00 59 61 00 12 03 57 45 56 fa 00 56 fe 00 56 fc 00 0c 0a 57 58 00 0a 0e 03 15 ┆ (V V Ya WEV V V WX ┆
0x03a6d…03a8d 00 27 59 ee 32 0c 59 23 00 28 56 fa 00 19 57 8b 00 28 59 fa 32 0c 59 23 00 28 57 45 00 19 57 28 ┆ 'Y 2 Y# (V W (Y 2 Y# (WE W(┆
0x03a8d…03aac 00 59 ec 00 0c 0a 28 15 00 27 5a 06 32 0c 59 23 00 28 56 fc 00 19 57 8b 00 28 5a 12 00 00 00 ┆ Y ( 'Z 2 Y# (V W (Z ┆
0x03aac…03acc (2, 0, 14) 0d cc 61 1a 42 10 00 2a 10 42 6e 3e 7f 2d fa e1 61 07 c2 d5 61 32 a5 40 c9 3e 00 c3 dd 61 00 02 ┆ a B * Bn> - a a2 @ > a ┆
0x03acc…03aec 00 02 00 0c 43 4c 50 4f 4e 20 20 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ CLPON CLPOFF ┆
0x03aec…03b0c 43 43 4c 45 45 52 20 20 20 04 00 04 00 00 43 42 53 58 20 20 20 20 20 05 00 0f 00 00 43 41 54 4f ┆CCLEER CBSX CATO┆
0x03b0c…03b2c 45 20 20 20 20 0f 00 10 00 10 43 45 54 4f 41 20 20 20 20 0f 00 10 00 00 43 42 53 43 20 20 20 20 ┆E CETOA CBSC ┆
0x03b2c…03b4c 20 11 00 1a 00 00 43 4b 45 59 46 55 4e 20 20 1b 00 1b 00 1a 43 53 45 4f 46 20 20 20 20 1b 00 1b ┆ CKEYFUN CSEOF ┆
0x03b4c…03b6c 00 7f 43 4d 55 4c 54 49 20 20 20 1c 00 1c 00 09 43 55 4e 4d 55 4c 54 49 20 1c 00 1c 00 77 43 00 ┆ CMULTI CUNMULTI wC ┆
0x03b6c…03b8c 00 00 00 00 00 00 00 c9 ff c9 ff 00 00 00 00 00 00 00 00 00 00 d3 ff d3 ff 00 00 00 00 00 00 00 ┆ ┆
0x03b8c…03bab 00 00 00 dd ff dd ff 00 00 00 00 00 00 00 00 00 00 dd ff dd ff 00 00 00 00 00 00 1d 14 10 02 ┆ ┆
0x03bab…03bcb (2, 0, 15) 0d e6 61 37 42 10 42 12 42 14 00 06 0c 0e 2f 16 01 db 04 cb 67 28 02 0e 28 cb 6f 20 02 16 00 cb ┆ a7B B B / g( ( o ┆
0x03bcb…03beb 77 28 02 06 06 2a 10 42 72 23 36 00 2a 12 42 70 23 36 00 2a 14 42 71 23 36 00 c9 00 00 03 00 1f ┆w( * Br#6 * Bp#6 * Bq#6 ┆
0x03beb…03c0b 43 42 53 58 20 20 20 20 20 04 00 0e 00 00 43 41 54 4f 45 20 20 20 20 0e 00 0f 00 10 43 45 54 4f ┆CBSX CATOE CETO┆
0x03c0b…03c2b 41 20 20 20 20 0e 00 0f 00 00 43 4b 45 59 46 55 4e 20 20 10 00 10 00 1a 43 53 45 4f 46 20 20 20 ┆A CKEYFUN CSEOF ┆
0x03c2b…03c4b 20 10 00 10 00 7f 43 43 48 4f 4f 53 45 20 20 11 00 11 00 00 43 4f 55 54 50 55 54 20 20 12 00 12 ┆ CCHOOSE COUTPUT ┆
0x03c4b…03c6b 00 00 43 4b 46 49 4c 45 20 20 20 13 00 13 00 00 43 43 4c 45 45 52 20 20 20 14 00 14 00 00 43 54 ┆ CKFILE CCLEER CT┆
0x03c6b…03c8b 59 50 49 53 54 20 20 15 00 15 00 00 43 45 58 50 20 20 20 20 20 16 00 19 00 9c 44 4c 4e 20 20 20 ┆YPIST CEXP DLN ┆
0x03c8b…03caa 20 20 20 1a 00 1d 00 ab 45 4c 4f 47 20 20 20 20 20 1a 00 1d 00 ae 43 41 54 41 4e 20 20 00 02 ┆ ELOG CATAN ┆
0x03caa…03cca (2, 0, 16) 0d 1d 62 13 42 10 00 f3 3a 91 40 2a 10 42 77 23 97 77 32 91 40 fb c9 00 42 53 20 20 20 20 20 02 ┆ b B : @* Bw# w2 @ BS ┆
0x03cca…03cea 00 02 00 0c 43 4c 50 4f 4e 20 20 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ CLPON CLPOFF ┆
0x03cea…03d0a 43 41 54 4f 45 20 20 20 20 03 00 04 00 10 43 45 54 4f 41 20 20 20 20 03 00 04 00 00 43 53 45 4f ┆CATOE CETOA CSEO┆
0x03d0a…03d2a 46 20 20 20 20 05 00 05 00 7f 43 43 48 4f 4f 53 45 20 20 06 00 06 00 00 43 4f 55 54 50 55 54 20 ┆F CCHOOSE COUTPUT ┆
0x03d2a…03d4a 20 07 00 07 00 00 43 4b 46 49 4c 45 20 20 20 08 00 08 00 00 43 43 4c 45 45 52 20 20 20 09 00 09 ┆ CKFILE CCLEER ┆
0x03d4a…03d6a 00 00 43 54 59 50 49 53 54 20 20 0a 00 0a 00 00 43 45 58 50 20 20 20 20 20 0b 00 0e 00 9c 44 4c ┆ CTYPIST CEXP DL┆
0x03d6a…03d8a 4e 20 20 20 20 20 20 0f 00 12 00 ab 45 4c 4f 47 20 20 20 20 20 0f 00 12 00 ae 43 41 54 41 4e 20 ┆N ELOG CATAN ┆
0x03d8a…03da9 20 20 20 13 00 17 00 5d 45 43 4f 53 20 20 20 20 20 13 00 17 00 ec 44 53 49 4e 20 20 20 00 02 ┆ ÅECOS DSIN ┆
0x03da9…03ea8 (2, 0, 17) 0x00[0xff]
[…0x7…]
0x045a1…045c1 (2, 0, 25) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x04681…046a0 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x046a0…046c0 (2, 0, 26) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x04780…0479f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x0479f…047bf (2, 0, 27) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x0487f…0489e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x0489e…048be (2, 0, 28) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x0497e…0499d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x0499d…049bd (2, 0, 29) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x04a7d…04a9c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x04a9c…04abc (3, 0, 0) 0c 00 43 08 00 00 00 00 00 00 00 00 0c 0a 43 08 00 00 00 00 00 00 00 00 0c 18 43 02 19 00 0c 01 ┆ C C C ┆
0x04abc…04adc 75 10 00 00 49 4e 46 20 20 20 20 20 00 00 00 00 00 00 0c 19 75 10 00 00 49 4e 58 20 20 20 20 20 ┆u INF u INX ┆
0x04adc…04afc 00 00 00 00 00 00 0c 31 75 10 00 00 4f 55 54 46 20 20 20 20 00 00 00 00 00 00 0c 49 75 10 00 00 ┆ 1u OUTF Iu ┆
0x04afc…04b1c 4f 55 54 58 20 20 20 20 00 00 00 00 00 00 0c 76 75 02 00 00 0c 80 75 05 01 00 20 80 00 0c 87 75 ┆OUTX vu u u┆
0x04b1c…04b3c 08 20 20 20 20 20 20 20 20 0c 8f 75 07 ff 00 00 00 00 02 00 0c 98 75 66 54 68 65 20 4e 75 6d 62 ┆ u ufThe Numb┆
0x04b3c…04b5c 65 72 20 4f 66 20 52 65 63 6f 72 64 73 20 49 6e 20 46 69 6c 65 20 20 45 78 63 65 65 64 73 20 54 ┆er Of Records In File Exceeds T┆
0x04b5c…04b7c 68 65 20 4d 61 78 69 6d 75 6d 20 4e 75 6d 62 65 72 20 4f 66 20 52 65 63 6f 72 64 73 20 54 68 61 ┆he Maximum Number Of Records Tha┆
0x04b7c…04b9b 74 20 46 69 6c 65 20 20 43 61 6e 20 43 6f 6e 74 61 69 6e 2e 20 20 20 20 20 20 20 20 20 20 00 ┆t File Can Contain. ┆
0x04b9b…04bbb (3, 0, 1) 0c fe 75 62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 73 20 49 74 ┆ ub Is It┆
0x04bbb…04bdb 20 50 65 72 6d 69 73 73 61 62 6c 65 20 54 6f 20 43 6f 70 79 20 54 68 65 20 4d 61 78 69 6d 75 6d ┆ Permissable To Copy The Maximum┆
0x04bdb…04bfb 20 4e 75 6d 62 65 72 20 4f 66 20 52 65 63 6f 72 64 73 20 46 69 6c 65 20 20 57 69 6c 6c 20 48 6f ┆ Number Of Records File Will Ho┆
0x04bfb…04c1b 6c 64 20 3f 20 59 0c 6c 76 0c 49 4e 44 45 58 20 20 20 82 00 28 00 0c 7a 76 47 43 4f 50 59 20 56 ┆ld ? Y lv INDEX ( zvGCOPY V┆
0x04c1b…04c3b 65 72 73 69 6f 6e 20 32 2e 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 34 2f ┆ersion 2.3 04/┆
0x04c3b…04c5b 30 36 2f 37 38 20 20 20 20 49 6e 70 75 74 20 46 69 6c 65 20 20 4f 75 74 70 75 74 20 46 69 6c 65 ┆06/78 Input File Output File┆
0x04c5b…04c7b 20 0c c3 76 0e 46 72 6f 6d 20 20 44 72 69 76 65 20 08 00 0c d3 76 0d 54 6f 20 20 44 72 69 76 65 ┆ v From Drive v To Drive┆
0x04c7b…04c9a 20 20 20 0d 0c e2 76 0d 20 4e 6f 74 20 4f 6e 20 49 6e 64 65 78 0c f3 76 05 46 69 6c 65 73 00 ┆ v Not On Index v Files ┆
0x04c9a…04cba (3, 0, 2) 0c f8 76 09 20 43 6f 70 69 65 64 20 3a 0c 09 77 02 04 00 0c 0d 77 29 20 46 6f 72 6d 61 74 20 52 ┆ v Copied : w w) Format R┆
0x04cba…04cda 65 61 64 03 00 20 57 72 69 74 65 05 00 20 44 69 73 6b 20 4d 69 73 73 69 6e 67 20 45 72 72 6f 72 ┆ead Write Disk Missing Error┆
0x04cda…04cfa 0b 40 77 05 75 78 75 7a 03 0a 7c 75 02 45 77 0b 45 77 21 45 18 32 01 33 00 00 43 14 00 0a 32 01 ┆ @w uxuz öu Ew Ew!E 2 3 C 2 ┆
0x04cfa…04d1a 0c 0a 75 7e 00 0a 75 80 00 06 45 18 32 01 75 82 32 01 09 05 0b 68 77 19 1d 33 00 00 75 7a 00 0a ┆ u~ u E 2 u 2 hw 3 uz ┆
0x04d1a…04d3a 32 08 33 00 00 75 7a 00 0a 32 08 31 45 18 32 01 06 0b 66 77 02 77 84 0b 84 77 0f 33 00 00 75 7a ┆2 3 uz 2 1E 2 fw w w 3 uz┆
0x04d3a…04d5a 00 0a 32 08 75 83 32 00 09 05 0b 95 77 05 1d 75 85 00 1c 0b 93 77 02 77 9a 0b 81 77 03 77 9a 1c ┆ 2 u 2 w u w w w w ┆
0x04d5a…04d7a 0b 9a 77 12 75 7e 75 7e 00 75 80 00 0a 03 75 7e 00 75 83 00 07 04 0b ae 77 23 1d 15 00 27 32 0d ┆ w u~u~ u u~ u w# '2 ┆
0x04d7a…04d99 32 01 2a 33 00 00 75 78 00 0a 32 0c 26 33 00 00 43 14 00 0a 32 80 25 75 7e 75 80 00 03 00 00 ┆2 *3 ux 2 &3 C 2 %u~u ┆
0x04d99…04db9 (3, 0, 3) 0b ac 77 00 0b ac 77 02 77 d1 0b d1 77 04 75 7c 00 1c 0a 85 75 02 d5 77 0b d5 77 1a 33 00 00 75 ┆ w w w w uö u w w 3 u┆
0x04db9…04dd9 7a 00 0a 32 08 33 00 00 75 7a 00 0a 32 08 31 75 87 32 08 06 1f 1f 0b f7 77 11 03 75 7e 75 80 00 ┆z 2 3 uz 2 1u 2 w u~u ┆
0x04dd9…04df9 03 75 7e 00 75 8f 00 0c 0a 32 01 0b 0c 78 1d 20 75 7e 75 7e 00 32 01 0a 03 77 fe 1c 43 18 75 7e ┆ u~ u 2 x u~u~ 2 w C u~┆
0x04df9…04e19 00 32 02 0e 0a 75 91 00 03 78 0d 1c 0b 08 78 04 78 29 78 19 0b 29 78 19 45 18 32 01 75 93 32 01 ┆ 2 u x x x)x )x E 2 u 2 ┆
0x04e19…04e39 06 75 7e 75 94 00 03 75 7e 00 43 18 00 0c 0a 32 01 0b 46 78 2b 20 75 7e 75 7e 00 32 01 0a 03 78 ┆ u~u u~ C 2 Fx+ u~u~ 2 x┆
0x04e39…04e59 38 1c 41 1b 75 7e 00 33 01 ff 0e 0a 33 01 ff 41 1b 75 80 00 33 01 ff 0e 0a 33 01 ff 06 78 47 1c ┆8 A u~ 3 3 A u 3 3 xG ┆
0x04e59…04e79 0b 42 78 04 78 71 78 53 0b 71 78 01 1f 0b 7a 78 2a 03 32 00 77 f7 1e 75 61 32 14 75 31 32 18 06 ┆ Bx xqxS qx zx* 2 w ua2 u12 ┆
0x04e79…04e98 75 96 75 6f 00 75 8f 00 12 75 73 00 75 71 00 0c 0a 75 80 00 0a 0e 03 75 61 32 14 00 03 00 00 ┆u uo u us uq u ua2 ┆
0x04e98…04eb8 (3, 0, 4) 0b a4 78 0d 75 01 32 18 06 75 6b 00 75 96 00 07 04 0b b3 78 49 1d 15 00 27 32 0d 32 01 2a 75 98 ┆ x u 2 uk u xI '2 2 *u ┆
0x04eb8…04ed8 32 1e 26 43 00 32 08 26 75 b6 32 31 26 43 0a 32 08 26 75 e7 32 0d 26 15 00 27 75 f4 32 3a 26 76 ┆2 &C 2 &u 21&C 2 &u 2 & 'u 2:&v┆
0x04ed8…04ef8 2e 32 24 26 43 0a 32 08 26 76 52 32 0d 26 23 75 75 32 01 25 75 75 32 01 76 5f 32 01 09 05 0b fe ┆.2$&C 2 &vR2 &#uu2 %uu2 v_2 ┆
0x04ef8…04f18 78 05 1d 76 68 00 1c 0b fc 78 02 79 03 0b 03 79 06 75 76 75 80 00 03 0b b1 78 02 79 09 0b 09 79 ┆x vh x y y uvu x y y┆
0x04f18…04f38 08 75 96 00 75 6b 00 07 01 0b 13 79 07 1d 75 6b 75 96 00 03 0b 11 79 02 79 1a 0b 1a 79 08 75 6b ┆ u uk y uku y y y uk┆
0x04f38…04f58 00 75 91 00 07 02 0b 24 79 05 1d 76 66 00 1c 0b 22 79 02 79 29 0a 60 76 02 29 79 0b 29 79 0f 40 ┆ u $y vf "y y) `v )y )y @┆
0x04f58…04f78 f9 76 62 00 03 75 01 33 01 ff 43 1a 2b 19 0a 62 76 02 38 79 0b 38 79 0f 40 f9 76 64 00 03 75 31 ┆ vb u 3 C + bv 8y 8y @ vd u1┆
0x04f78…04f97 33 01 ff 43 1a 2c 19 0a 64 76 02 47 79 0b 47 79 08 75 31 00 75 6b 00 07 01 0b 51 79 01 1d 00 ┆3 C , dv Gy Gy u1 uk Qy ┆
0x04f97…04fb7 (3, 0, 5) 0b 52 79 04 76 60 00 1c 0b 4f 79 02 79 56 0a 66 76 02 56 79 0b 56 79 03 75 76 00 0b 5b 79 07 1d ┆ Ry v` Oy yV fv Vy Vy uv Äy ┆
0x04fb7…04fd7 75 31 75 96 00 03 0b 59 79 02 79 65 0b 65 79 06 75 31 75 6b 00 03 0b 62 79 03 79 6b 1c 0b 6b 79 ┆u1u Yy ye ey u1uk by yk ky┆
0x04fd7…04ff7 03 75 31 2f 0a 68 76 02 6e 79 0b 6e 79 02 1f 1f 0b 78 79 3d 76 6a 03 75 61 75 91 00 03 75 63 32 ┆ u1/ hv ny ny xy=vj uau uc2┆
0x04ff7…05017 08 76 6c 32 08 06 75 6b 76 74 00 03 75 6d 76 76 00 03 75 6f 76 74 00 03 75 70 33 00 00 76 6a 00 ┆ vl2 ukvt umvv uovt up3 vj ┆
0x05017…05037 0a 00 03 75 71 75 91 00 03 75 73 75 91 00 03 1f 1f 0a 78 76 02 b5 79 0b b5 79 4b 15 00 27 32 0d ┆ uqu usu xv y yK '2 ┆
0x05037…05057 32 01 2a 76 7a 32 2f 26 76 a9 32 0c 26 43 14 43 18 75 80 00 32 02 0e 0a 03 43 16 43 14 00 76 74 ┆2 *vz2/&v 2 &C C u 2 C C vt┆
0x05057…05077 00 0a 03 33 00 00 43 14 00 0a 32 80 25 75 7e 75 80 00 03 32 00 76 a9 43 00 77 40 1e 43 00 32 08 ┆ 3 C 2 %u~u 2 v C w@ C 2 ┆
0x05077…05096 76 6c 32 08 09 05 0b 02 7a 0a 1d 32 00 76 b5 43 0a 77 40 1e 0b 00 7a 02 7a 0f 00 79 01 00 00 ┆vl2 z 2 v C w@ z z y ┆
0x05096…050b6 (3, 0, 6) 0b 0f 7a 09 43 0a 32 08 43 00 32 08 06 0b 0c 7a 03 7a 18 1c 0a c1 76 02 18 7a 0b 18 7a 2b 75 63 ┆ z C 2 C 2 z z v z z+uc┆
0x050b6…050d6 32 08 75 83 32 00 06 32 00 76 c3 75 63 77 40 1e 43 08 75 63 32 08 16 03 43 08 00 76 cf 00 07 04 ┆2 u 2 2 v ucw@ C uc2 C v ┆
0x050d6…050f6 43 08 00 75 91 00 07 01 13 0b 45 7a 05 1d 76 c1 00 1c 0b 43 7a 02 7a 4a 0a d1 76 02 4a 7a 0b 4a ┆C u Ez v Cz zJ v Jz J┆
0x050f6…05116 7a 2b 75 63 32 08 75 83 32 00 06 32 00 76 d3 75 63 77 40 1e 43 12 75 63 32 08 16 03 43 12 00 76 ┆z+uc2 u 2 2 v ucw@ C uc2 C v┆
0x05116…05136 cf 00 07 04 43 12 00 75 91 00 07 01 13 0b 77 7a 05 1d 76 d1 00 1c 0b 75 7a 02 7a 7c 0b 7c 7a 5b ┆ C u wz v uz zö özÄ┆
0x05136…05156 15 00 27 32 0d 32 01 2a 33 00 00 43 16 00 0a 32 80 33 00 00 43 14 00 0a 32 01 0c 0a 75 7e 00 75 ┆ '2 2 *3 C 2 3 C 2 u~ u┆
0x05156…05176 80 00 0a 0a 75 83 00 75 7e 00 0c 0a 06 75 7e 75 83 00 75 7e 00 0c 0a 03 33 00 00 43 16 00 0a 32 ┆ u u~ u~u u~ 3 C 2┆
0x05176…05195 01 0c 0a 75 80 00 0a 33 00 00 43 16 00 0a 32 80 30 75 82 32 01 34 75 91 00 07 02 00 01 00 00 ┆ u 3 C 2 0u 2 4u ┆
0x05195…051b5 (3, 0, 7) 0b d9 7a 18 1d 32 00 33 00 00 43 16 00 0a 75 7e 7e 7c 1e 32 00 76 df 75 80 7e 7c 1e 0b d7 7a 02 ┆ z 2 3 C u~~ö 2 v u ~ö z ┆
0x051b5…051d5 7a f1 0b f1 7a 08 43 08 00 75 91 00 07 05 0b fb 7a 14 1d 43 00 32 08 43 0a 32 08 09 02 43 08 00 ┆z z C u z C 2 C 2 C ┆
0x051d5…051f5 43 12 00 07 02 12 0b 11 7b 02 1d 1b 0b 0f 7b 02 7b 13 0b f9 7a 02 7b 13 0b 13 7b 0e 75 61 75 91 ┆C ä ä ä z ä ä uau ┆
0x051f5…05215 00 03 43 08 00 75 91 00 07 02 0b 23 7b 33 1d 75 63 32 08 43 00 32 08 06 75 01 32 18 75 61 32 14 ┆ C u #ä3 uc2 C 2 u 2 ua2 ┆
0x05215…05235 06 75 01 22 75 61 32 14 75 01 32 18 06 43 08 75 70 00 75 8f 00 12 03 43 00 32 08 76 6c 32 08 09 ┆ u "ua2 u 2 C up u C 2 vl2 ┆
0x05235…05255 02 0b 58 7b 0a 1d 75 19 32 18 75 01 32 18 06 0b 56 7b 02 7b 62 0b 21 7b 02 7b 65 0b 65 7b 3f 32 ┆ Xä u 2 u 2 Vä äb !ä äe eä?2┆
0x05255…05275 00 43 08 79 78 1e 75 19 32 18 75 61 32 14 06 40 f7 77 03 00 03 32 08 43 00 75 19 32 14 75 61 33 ┆ C yx u 2 ua2 @ w 2 C u 2 ua3┆
0x05275…05294 00 02 2e 01 75 7e 75 71 00 03 75 70 43 08 00 03 75 71 75 7e 00 03 75 01 32 18 75 61 32 14 00 ┆ . u~uq upC uqu~ u 2 ua2 ┆
0x05294…052b4 (3, 0, 8) 0b a4 7b 01 06 0b 62 7b 03 7b a5 1c 0b a5 7b 08 43 12 00 75 91 00 07 02 0b af 7b 0b 1d 43 00 32 ┆ ä bä ä ä C u ä C 2┆
0x052b4…052d4 08 43 0a 32 08 09 02 0b bc 7b 18 1d 32 00 75 91 79 78 1e 75 7e 75 80 00 03 75 7e 00 76 cf 00 0c ┆ C 2 ä 2 u yx u~u u~ v ┆
0x052d4…052f4 0a 32 01 0b d8 7b 15 20 75 7e 75 7e 00 32 01 0a 03 7b ca 1c 75 7e 00 43 08 00 07 02 0b ef 7b 05 ┆ 2 ä u~u~ 2 ä u~ C ä ┆
0x052f4…05314 1d 76 e0 00 1c 0b ed 7b 02 7b f4 0b f4 7b 2f 75 70 75 7e 00 03 75 49 32 18 75 61 32 14 06 40 f7 ┆ v ä ä ä/upu~ uI2 ua2 @ ┆
0x05314…05334 76 e0 00 03 32 08 43 0a 75 49 32 14 75 61 33 00 02 2e 01 32 00 75 7e 7e 59 1e 76 ef 00 1c 0a e0 ┆v 2 C uI2 ua3 . 2 u~~Y v ┆
0x05334…05354 76 02 23 7c 0b 23 7c 03 7b d9 1c 0b d4 7b 04 7c 26 7b e5 0b 26 7c 19 15 00 27 32 0d 32 01 2a 43 ┆v #ö #ö ä ä ö&ä &ö '2 2 *C┆
0x05354…05374 0a 32 08 26 76 e2 32 0d 26 32 00 75 91 7e 73 1e 0b ba 7b 02 7c 42 0a ef 76 02 42 7c 0b 42 7c 1b ┆ 2 &v 2 &2 u ~s ä öB v Bö Bö ┆
0x05374…05393 75 63 32 08 43 0a 32 08 06 75 61 75 91 00 03 75 31 32 18 75 61 32 14 06 75 31 22 00 32 14 00 ┆uc2 C 2 uau u12 ua2 u1" 2 ┆
0x05393…053b3 (3, 0, 9) 0b 5d 7c 1d 75 61 32 14 75 31 32 18 06 43 12 75 70 00 75 8f 00 12 03 43 00 32 08 76 6c 32 08 09 ┆ Åö ua2 u12 C up u C 2 vl2 ┆
0x053b3…053d3 02 0b 7c 7c 05 1d 76 f1 00 1c 0b 7a 7c 02 7c 81 0b 3f 7c 03 7c 81 1c 0b ad 7b 02 7c 84 0b 84 7c ┆ öö v zö ö ?ö ö ä ö ö┆
0x053d3…053f3 1a 32 00 43 12 79 78 1e 75 49 32 18 75 61 32 14 06 43 00 32 08 76 6c 32 08 09 02 0b a0 7c 05 1d ┆ 2 C yx uI2 ua2 C 2 vl2 ö ┆
0x053f3…05413 76 f1 00 1c 0b 9e 7c 02 7c a5 0b a5 7c 30 40 f7 77 05 00 03 32 08 43 0a 75 49 32 14 75 61 33 00 ┆v ö ö ö0@ w 2 C uI2 ua3 ┆
0x05413…05433 02 2e 01 75 7e 75 71 00 03 75 70 43 12 00 03 75 71 75 7e 00 03 75 31 32 18 75 61 32 14 06 0b 81 ┆ . u~uq upC uqu~ u12 ua2 ┆
0x05433…05453 7c 03 7c d5 1c 0b d5 7c 0d 32 00 78 7a 1e 32 00 75 91 7e 59 1e 1b 0a f1 76 02 e2 7c 0b e2 7c 30 ┆ö ö ö 2 xz 2 u ~Y v ö ö0┆
0x05453…05473 75 19 75 91 00 03 75 19 32 14 75 61 2b 01 75 70 43 08 00 03 75 19 32 18 75 61 32 14 06 75 19 75 ┆u u u 2 ua+ upC u 2 ua2 u u┆
0x05473…05492 80 00 03 15 00 27 32 0d 32 01 2a 76 f3 32 0e 26 0a 01 77 02 12 7d 0b 12 7d 02 40 f9 00 14 00 ┆ '2 2 *v 2 & w å å @ ┆
0x05492…054b2 (3, 0, 10) 0b 14 7d 14 77 36 00 03 75 19 32 14 75 61 2b 01 75 6b 00 75 91 00 07 02 0b 2a 7d 05 1d 77 01 00 ┆ å w6 u 2 ua+ uk u *å w ┆
0x054b2…054d2 1c 0b 28 7d 02 7d 2f 0b 2f 7d 6a 75 7e 75 71 00 03 75 70 43 08 00 03 75 71 75 7e 00 03 75 01 32 ┆ (å å/ /åju~uq upC uqu~ u 2┆
0x054d2…054f2 18 75 61 32 14 06 43 00 32 08 75 63 32 08 06 40 f7 77 07 00 03 32 08 43 00 75 49 32 14 75 61 33 ┆ ua2 C 2 uc2 @ w 2 C uI2 ua3┆
0x054f2…05512 00 02 2e 01 75 7e 75 71 00 03 75 70 43 12 00 03 75 71 75 7e 00 03 75 31 32 18 75 61 32 14 06 15 ┆ . u~uq upC uqu~ u12 ua2 ┆
0x05512…05532 00 27 75 63 32 08 26 75 82 32 01 26 32 00 78 7a 1e 77 01 00 1c 0a 03 77 02 99 7d 0b 99 7d 11 15 ┆ 'uc2 &u 2 &2 xz w w å å ┆
0x05532…05552 00 27 32 0d 32 01 2a 43 00 32 08 26 77 0b 00 1c 0a 05 77 02 aa 7d 0b aa 7d 11 15 00 27 32 0d 32 ┆ '2 2 *C 2 &w w å å '2 2┆
0x05552…05572 01 2a 43 0a 32 08 26 77 0b 00 1c 0a 07 77 02 bb 7d 0b bb 7d 08 40 f5 00 77 09 00 07 02 0b c5 7d ┆ *C 2 &w w å å @ w å┆
0x05572…05591 05 1d 77 01 00 1c 0b c3 7d 02 7d ca 0b ca 7d 0d 15 00 27 32 0d 32 01 2a 75 63 32 08 26 00 00 ┆ w å å å '2 2 *uc2 & ┆
0x05591…055b1 (3, 0, 11) 0a 0b 77 02 d7 7d 0b d7 7d 08 40 f5 00 75 80 00 07 02 0b e1 7d 09 1d 15 00 27 77 0d 32 07 26 0b ┆ w å å @ u å 'w 2 & ┆
0x055b1…055d1 df 7d 02 7d ea 0b ea 7d 08 40 f5 00 75 94 00 07 02 0b f4 7d 09 1d 15 00 27 77 14 32 05 26 0b f2 ┆ å å å @ u å 'w 2 & ┆
0x055d1…055f1 7d 02 7d fd 0b fd 7d 08 40 f5 00 77 19 00 07 02 0b 07 7e 09 1d 15 00 27 77 1b 32 06 26 0b 05 7e ┆å å å @ w ~ 'w 2 & ~┆
0x055f1…05611 02 7e 10 0b 10 7e 08 40 f5 00 77 09 00 07 02 0b 1a 7e 09 1d 15 00 27 76 e2 32 0d 26 0b 18 7e 02 ┆ ~ ~ @ w ~ 'v 2 & ~ ┆
0x05611…05631 7e 23 0b 23 7e 08 40 f5 00 77 21 00 07 02 0b 2d 7e 09 1d 15 00 27 77 23 32 0d 26 0b 2b 7e 02 7e ┆~# #~ @ w! -~ 'w#2 & +~ ~┆
0x05631…05651 36 0b 36 7e 08 40 f5 00 77 09 00 07 01 0b 40 7e 09 1d 15 00 27 77 30 32 06 26 0b 3e 7e 02 7e 49 ┆6 6~ @ w @~ 'w02 & >~ ~I┆
0x05651…05671 0b 49 7e 07 32 00 75 91 7e 73 1e 0a 36 77 02 50 7e 0b 50 7e 09 32 00 75 91 7e 59 1e 1b 1b 0b fe ┆ I~ 2 u ~s 6w P~ P~ 2 u ~Y ┆
0x05671…05690 40 02 b5 79 0b 81 40 02 09 18 00 ca 0b ca 7d 0d 15 00 27 32 0d 32 01 2a 75 63 32 08 26 00 00 ┆@ y @ å '2 2 *uc2 & ┆
0x05690…056b0 (3, 0, 12) 0d 59 7e 1a 42 10 00 2a 10 42 6e 3e 7f 2d fa 6e 7e 07 c2 62 7e 32 a5 40 c9 3e 00 c3 6a 7e 00 02 ┆ Y~ B * Bn> - n~ b~2 @ > j~ ┆
0x056b0…056d0 00 02 00 0c 43 4c 50 4f 4e 20 20 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ CLPON CLPOFF ┆
0x056d0…056f0 43 43 4c 45 45 52 20 20 20 04 00 04 00 00 43 42 53 58 20 20 20 20 20 05 00 0f 00 00 43 41 54 4f ┆CCLEER CBSX CATO┆
0x056f0…05710 45 20 20 20 20 0f 00 10 00 10 43 45 54 4f 41 20 20 20 20 0f 00 10 00 00 43 42 53 43 20 20 20 20 ┆E CETOA CBSC ┆
0x05710…05730 20 11 00 1a 00 00 43 4b 45 59 46 55 4e 20 20 1b 00 1b 00 1a 43 53 45 4f 46 20 20 20 20 1b 00 1b ┆ CKEYFUN CSEOF ┆
0x05730…05750 00 7f 43 4d 55 4c 54 49 20 20 20 1c 00 1c 00 09 43 55 4e 4d 55 4c 54 49 20 1c 00 1c 00 77 43 00 ┆ CMULTI CUNMULTI wC ┆
0x05750…05770 00 00 00 00 00 00 00 c9 ff c9 ff 00 00 00 00 00 00 00 00 00 00 d3 ff d3 ff 00 00 00 00 00 00 00 ┆ ┆
0x05770…0578f 00 00 00 dd ff dd ff 00 00 00 00 00 00 00 00 00 00 dd ff dd ff 00 00 00 00 00 00 1d 14 10 02 ┆ ┆
0x0578f…057af (3, 0, 13) 0d 73 7e 09 42 10 00 cd 30 00 c3 18 00 00 01 2b 00 2b 00 00 00 0a 00 20 20 45 58 49 54 20 20 20 ┆ s~ B 0 + + EXIT ┆
0x057af…057cf 20 20 20 20 20 20 20 20 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END ┆
0x057cf…057ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x057ef…0580f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x1…]
0x0582f…0584f 30 31 32 33 34 35 36 37 38 39 41 42 43 44 45 46 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 ┆0123456789ABCDEF ┆
0x0584f…0586f 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 00 00 ┆ ┆
0x0586f…0588e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 ┆ ┆
0x0588e…058ae (3, 0, 14) 0d 7c 7e 1e 42 10 42 12 00 2a 10 42 eb 2a 12 42 4e eb f3 7e 23 c5 e5 cd 33 00 e1 c1 0d c2 8b 7e ┆ ö~ B B * B * BN ~# 3 ~┆
0x058ae…058ce fb c9 00 0c 43 4c 50 4f 4e 20 20 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ CLPON CLPOFF ┆
0x058ce…058ee 43 43 4c 45 45 52 20 20 20 04 00 04 00 00 43 42 53 58 20 20 20 20 20 05 00 0f 00 00 43 41 54 4f ┆CCLEER CBSX CATO┆
0x058ee…0590e 45 20 20 20 20 0f 00 10 00 10 43 45 54 4f 41 20 20 20 20 0f 00 10 00 00 43 42 53 43 20 20 20 20 ┆E CETOA CBSC ┆
0x0590e…0592e 20 11 00 1a 00 00 43 4b 45 59 46 55 4e 20 20 1b 00 1b 00 1a 43 53 45 4f 46 20 20 20 20 1b 00 1b ┆ CKEYFUN CSEOF ┆
0x0592e…0594e 00 7f 43 4d 55 4c 54 49 20 20 20 1c 00 1c 00 09 43 55 4e 4d 55 4c 54 49 20 1c 00 1c 00 77 43 43 ┆ CMULTI CUNMULTI wCC┆
0x0594e…0596e 48 4f 4f 53 45 20 20 1d 00 1d 00 00 43 4f 55 54 50 55 54 20 20 1e 00 1e 00 00 43 4b 46 49 4c 45 ┆HOOSE COUTPUT CKFILE┆
0x0596e…0598d 20 20 20 1f 00 1f 00 00 43 43 4c 45 45 52 20 20 20 20 00 20 00 00 43 00 00 00 00 00 00 1f 02 ┆ CCLEER C ┆
0x0598d…05a8c (3, 0, 15) 0x00[0xff]
[…0x9…]
0x06383…063a3 (3, 0, 25) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x06463…06482 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x06482…064a2 (3, 0, 26) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x06562…06581 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x06581…065a1 (3, 0, 27) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x06661…06680 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x06680…066a0 (3, 0, 28) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x06760…0677f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x0677f…0679f (3, 0, 29) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x0685f…0687e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x0687e…0689e (4, 0, 0) 0c 00 43 10 00 00 57 46 49 4c 45 20 20 20 00 00 00 00 00 00 0c 22 43 1e 00 00 00 00 00 00 00 00 ┆ C WFILE "C ┆
0x0689e…068be 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0c 68 44 05 01 00 20 80 00 0c ┆ hD ┆
0x068be…068de 6f 44 07 20 20 20 20 20 20 20 0c 78 44 4b 41 4c 54 45 52 20 76 65 72 73 69 6f 6e 20 32 2e 30 20 ┆oD xDKALTER version 2.0 ┆
0x068de…068fe 20 20 20 20 20 20 20 20 20 31 32 2f 30 39 2f 37 37 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 54 ┆ 12/09/77 ENT┆
0x068fe…0691e 45 52 20 52 65 6e 61 6d 65 2c 20 50 72 6f 74 65 63 74 2c 20 46 72 65 65 20 0c c5 44 0f 46 55 4e ┆ER Rename, Protect, Free D FUN┆
0x0691e…0693e 43 54 49 4f 4e 3a 20 50 46 52 00 00 0c d6 44 0c 44 52 49 56 45 20 4e 4f 2e 20 08 00 0c e4 44 1b ┆CTION: PFR D DRIVE NO. D ┆
0x0693e…0695e 46 49 4c 45 20 4e 41 4d 45 20 49 4e 44 45 58 20 20 20 ff 00 50 00 80 46 ff 7f 52 0c 01 45 1a 43 ┆FILE NAME INDEX P F R E C┆
0x0695e…0697d 48 41 4e 47 45 20 54 4f 20 20 41 4c 52 45 41 44 59 20 4f 4e 20 44 49 53 4b 0c 1d 45 01 0d 00 ┆HANGE TO ALREADY ON DISK E ┆
0x0697d…0699d (4, 0, 1) 0c 1e 45 00 0b 26 45 05 44 5f 44 61 03 0a 64 44 02 2b 45 0b 2b 45 1c 44 63 32 01 43 41 32 01 0c ┆ E &E D_Da dD +E +E Dc2 CA2 ┆
0x0699d…069bd 0a 44 66 00 0a 44 68 00 06 44 63 32 01 44 6a 32 01 09 05 0b 49 45 19 1d 33 00 00 44 5f 00 0a 32 ┆ Df Dh Dc2 Dj2 IE 3 D_ 2┆
0x069bd…069dd 08 33 00 00 44 5f 00 0a 32 08 31 44 63 32 01 06 0b 47 45 02 45 65 0b 65 45 0f 33 00 00 44 5f 00 ┆ 3 D_ 2 1Dc2 GE Ee eE 3 D_ ┆
0x069dd…069fd 0a 32 08 44 6b 32 00 09 05 0b 76 45 05 1d 44 6d 00 1c 0b 74 45 02 45 7b 0b 62 45 03 45 7b 1c 0b ┆ 2 Dk2 vE Dm tE Eä bE Eä ┆
0x069fd…06a1d 7b 45 12 44 66 44 66 00 44 68 00 0a 03 44 66 00 44 6b 00 07 04 0b 8f 45 1e 1d 15 00 27 32 0d 32 ┆äE DfDf Dh Df Dk E '2 2┆
0x06a1d…06a3d 01 2a 33 00 00 44 61 00 0a 32 0a 26 43 41 32 80 25 44 66 44 68 00 03 0b 8d 45 02 45 ad 0b ad 45 ┆ *3 Da 2 &CA2 %DfDh E E E┆
0x06a3d…06a5d 04 44 64 00 1c 0a 6d 44 02 b1 45 0b b1 45 1a 33 00 00 44 5f 00 0a 32 08 33 00 00 44 5f 00 0a 32 ┆ Dd mD E E 3 D_ 2 3 D_ 2┆
0x06a5d…06a7c 08 31 44 6f 32 07 06 1f 1f 0a 76 44 02 cb 45 0b cb 45 09 44 66 44 68 00 03 15 00 27 00 0d 00 ┆ 1Do2 vD E E DfDh ' ┆
0x06a7c…06a9c (4, 0, 2) 0b d4 45 17 32 0d 32 01 2a 44 78 32 2f 26 15 00 27 44 a7 32 1c 26 43 41 32 80 25 0a c3 44 02 eb ┆ E 2 2 *Dx2/& 'D 2 &CA2 % D ┆
0x06a9c…06abc 45 0b eb 45 29 44 57 32 08 44 6b 32 00 06 32 00 44 57 44 c5 45 26 1e 43 40 32 01 44 57 32 08 06 ┆E E)DW2 Dk2 2 DWD E& C@2 DW2 ┆
0x06abc…06adc 44 cf 32 03 43 40 32 01 35 44 d2 00 07 02 0b 16 46 05 1d 44 c3 00 1c 0b 14 46 02 46 1b 0a d4 44 ┆D 2 C@2 5D F D F F D┆
0x06adc…06afc 02 1b 46 0b 1b 46 2b 44 57 32 08 44 6b 32 00 06 32 00 44 57 44 d6 45 26 1e 44 41 44 57 32 08 16 ┆ F F+DW2 Dk2 2 DWD E& DADW2 ┆
0x06afc…06b1c 03 44 41 00 44 d2 00 07 01 44 41 00 44 e0 00 07 04 13 0b 48 46 05 1d 44 d4 00 1c 0b 46 46 02 46 ┆ DA D DA D HF D FF F┆
0x06b1c…06b3c 4d 0a e2 44 02 4d 46 0b 4d 46 50 44 57 32 08 44 6b 32 00 06 32 00 44 57 44 e4 45 26 1e 43 18 44 ┆M D MF MFPDW2 Dk2 2 DWD E& C D┆
0x06b3c…06b5c d2 00 03 43 1a 32 08 44 57 32 08 06 43 00 32 18 43 18 32 28 06 32 00 44 41 47 b0 1e 43 00 22 44 ┆ C 2 DW2 C 2 C 2( 2 DAG C "D┆
0x06b5c…06b7b 43 32 14 43 00 32 18 06 43 1a 32 08 44 ee 32 08 06 44 41 44 52 00 44 f6 00 12 03 00 00 0d 00 ┆C2 C 2 C 2 D 2 DADR D ┆
0x06b7b…06b9b (4, 0, 3) 0b 9d 46 2c 32 00 44 41 47 b0 1e 43 00 32 18 43 18 32 28 06 43 00 22 32 08 44 57 43 00 32 14 44 ┆ F,2 DAG C 2 C 2( C "2 DWC 2 D┆
0x06b9b…06bbb 43 33 00 02 2e 01 43 40 32 01 44 f8 32 01 09 02 0b cb 46 0c 1d 44 55 44 55 00 44 f9 00 0c 13 03 ┆C3 . C@2 D 2 F DUDU D ┆
0x06bbb…06bdb 0b c9 46 02 46 d7 0b d7 46 0a 43 40 32 01 44 fb 32 01 09 02 0b e3 46 0b 1d 44 55 44 55 00 44 fc ┆ F F F C@2 D 2 F DUDU D ┆
0x06bdb…06bfb 00 12 03 0b e1 46 02 46 ee 0b ee 46 0a 43 40 32 01 44 fe 32 01 09 02 0b fa 46 01 1d 0a ff 44 02 ┆ F F F C@2 D 2 F D ┆
0x06bfb…06c1b fb 46 0b fb 46 47 44 57 32 08 44 6b 32 00 06 32 00 44 57 45 01 45 26 1e 40 f7 45 1b 00 03 32 08 ┆ F FGDW2 Dk2 2 DWE E& @ E 2 ┆
0x06c1b…06c3b 44 57 43 00 32 14 44 43 33 00 02 2e 01 15 00 2a 32 0d 32 01 2a 44 57 32 08 26 45 0b 32 10 26 23 ┆DWC 2 DC3 . *2 2 *DW2 &E 2 &#┆
0x06c3b…06c5b 44 6b 32 00 25 32 00 44 d2 47 b0 1e 1b 0a 1b 45 02 42 47 0b 42 47 09 44 45 32 08 44 57 32 08 06 ┆Dk2 %2 D G E BG BG DE2 DW2 ┆
0x06c5b…06c7a 0b f8 46 02 47 4b 0b 4b 47 11 43 00 32 14 44 43 2d 01 32 00 44 d2 47 b0 1e 43 c1 00 00 0d 00 ┆ F GK KG C 2 DC- 2 D G C ┆
0x06c7a…06c9a (4, 0, 4) 0b 5c 47 3d 32 80 43 41 32 01 0c 0a 44 66 00 44 68 00 0a 0a 44 6b 00 44 66 00 0c 0a 06 44 66 44 ┆ ÖG=2 CA2 Df Dh Dk Df DfD┆
0x06c9a…06cba 6b 00 44 66 00 0c 0a 03 43 c1 32 01 0c 0a 44 68 00 0a 43 c1 32 80 30 44 6a 32 01 34 44 d2 00 07 ┆k Df C 2 Dh C 2 0Dj2 4D ┆
0x06cba…06cda 02 0b 9b 47 13 1d 32 00 43 c1 44 66 47 ca 1e 32 00 45 1d 44 68 47 ca 1e 0b 99 47 02 47 ae 0b ae ┆ G 2 C DfG 2 E DhG G G ┆
0x06cda…06cfa 47 02 1b 1b 0b fe 40 02 cb 45 0b 81 40 02 09 18 00 44 fe 32 01 09 02 0b fa 46 01 1d 0a ff 44 02 ┆G @ E @ D 2 F D ┆
0x06cfa…06d1a fb 46 0b fb 46 47 44 57 32 08 44 6b 32 00 06 32 00 44 57 45 01 45 26 1e 40 f7 45 1b 00 03 32 08 ┆ F FGDW2 Dk2 2 DWE E& @ E 2 ┆
0x06d1a…06d3a 44 57 43 00 32 14 44 43 33 00 02 2e 01 15 00 2a 32 0d 32 01 2a 44 57 32 08 26 45 0b 32 10 26 23 ┆DWC 2 DC3 . *2 2 *DW2 &E 2 &#┆
0x06d3a…06d5a 44 6b 32 00 25 32 00 44 d2 ff ff 1e 1b 0a 1b 45 02 42 47 0b 42 47 09 44 45 32 08 44 57 32 08 06 ┆Dk2 %2 D E BG BG DE2 DW2 ┆
0x06d5a…06d79 0b f8 46 02 47 4b 0b 4b 47 11 43 00 32 14 44 43 2d 01 32 00 44 d2 ff ff 1e 43 c1 00 00 0d 00 ┆ F GK KG C 2 DC- 2 D C ┆
0x06d79…06d99 (4, 0, 5) 0d b0 47 1a 42 10 00 2a 10 42 6e 3e 7f 2d fa c5 47 07 c2 b9 47 32 a5 40 c9 3e 00 c3 c1 47 00 02 ┆ G B * Bn> - G G2 @ > G ┆
0x06d99…06db9 00 02 00 0c 43 4c 50 4f 4e 20 20 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ CLPON CLPOFF ┆
0x06db9…06dd9 43 43 4c 45 45 52 20 20 20 04 00 04 00 00 43 42 53 58 20 20 20 20 20 05 00 0f 00 00 43 41 54 4f ┆CCLEER CBSX CATO┆
0x06dd9…06df9 45 20 20 20 20 0f 00 10 00 10 43 45 54 4f 41 20 20 20 20 0f 00 10 00 00 43 42 53 43 20 20 20 20 ┆E CETOA CBSC ┆
0x06df9…06e19 20 11 00 1a 00 00 43 4b 45 59 46 55 4e 20 20 1b 00 1b 00 1a 43 53 45 4f 46 20 20 20 20 1b 00 1b ┆ CKEYFUN CSEOF ┆
0x06e19…06e39 00 7f 43 4d 55 4c 54 49 20 20 20 1c 00 1c 00 09 43 55 4e 4d 55 4c 54 49 20 1c 00 1c 00 77 43 00 ┆ CMULTI CUNMULTI wC ┆
0x06e39…06e59 00 00 00 00 00 00 00 c9 ff c9 ff 00 00 00 00 00 00 00 00 00 00 d3 ff d3 ff 00 00 00 00 00 00 00 ┆ ┆
0x06e59…06e78 00 00 00 dd ff dd ff 00 00 00 00 00 00 00 00 00 00 dd ff dd ff 00 00 00 00 00 00 1d 14 10 02 ┆ ┆
0x06e78…06e98 (4, 0, 6) 0d ca 47 1e 42 10 42 12 00 2a 10 42 eb 2a 12 42 4e eb f3 7e 23 c5 e5 cd 33 00 e1 c1 0d c2 d9 47 ┆ G B B * B * BN ~# 3 G┆
0x06e98…06eb8 fb c9 00 0c 43 4c 50 4f 4e 20 20 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ CLPON CLPOFF ┆
0x06eb8…06ed8 43 43 4c 45 45 52 20 20 20 04 00 04 00 00 43 42 53 58 20 20 20 20 20 05 00 0f 00 00 43 41 54 4f ┆CCLEER CBSX CATO┆
0x06ed8…06ef8 45 20 20 20 20 0f 00 10 00 10 43 45 54 4f 41 20 20 20 20 0f 00 10 00 00 43 42 53 43 20 20 20 20 ┆E CETOA CBSC ┆
0x06ef8…06f18 20 11 00 1a 00 00 43 4b 45 59 46 55 4e 20 20 1b 00 1b 00 1a 43 53 45 4f 46 20 20 20 20 1b 00 1b ┆ CKEYFUN CSEOF ┆
0x06f18…06f38 00 7f 43 4d 55 4c 54 49 20 20 20 1c 00 1c 00 09 43 55 4e 4d 55 4c 54 49 20 1c 00 1c 00 77 43 43 ┆ CMULTI CUNMULTI wCC┆
0x06f38…06f58 48 4f 4f 53 45 20 20 1d 00 1d 00 00 43 4f 55 54 50 55 54 20 20 1e 00 1e 00 00 43 4b 46 49 4c 45 ┆HOOSE COUTPUT CKFILE┆
0x06f58…06f77 20 20 20 1f 00 1f 00 00 43 43 4c 45 45 52 20 20 20 20 00 20 00 00 43 00 00 00 00 00 00 1f 02 ┆ CCLEER C ┆
0x06f77…07076 (4, 0, 7) 0x00[0xff]
[…0x11…]
0x08165…08185 (4, 0, 25) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x08245…08264 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x08264…08284 (4, 0, 26) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x08344…08363 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x08363…08383 (4, 0, 27) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x08443…08462 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x08462…08482 (4, 0, 28) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x08542…08561 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x08561…08581 (4, 0, 29) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x08641…08660 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x08660…08680 (5, 0, 0) 0c 19 43 02 06 00 0c 1b 4f 02 00 00 0c 23 4f 02 00 00 0c 29 4f 02 82 00 0c 2b 4f 02 98 00 0c 38 ┆ C O #O )O +O 8┆
0x08680…086a0 4f 03 06 55 35 0c 9b 67 10 00 00 57 46 49 4c 45 20 20 20 00 00 00 00 00 00 0c b3 67 10 00 00 4e ┆O U5 g WFILE g N┆
0x086a0…086c0 46 49 4c 45 20 20 20 00 00 00 00 00 00 0c cb 67 10 00 00 4f 46 49 4c 45 20 20 20 00 00 00 00 00 ┆FILE g OFILE ┆
0x086c0…086e0 00 0c 0f 68 02 01 00 0c 17 68 02 ff 00 0c 1f 68 03 20 80 00 0c 24 68 07 20 20 20 20 20 20 20 0c ┆ h h h $h ┆
0x086e0…08700 2b 68 12 54 4f 4f 20 4d 41 4e 59 20 52 45 43 4f 52 44 53 00 00 0c 3d 68 01 0d 0c 40 68 0b 30 31 ┆+h TOO MANY RECORDS =h @h 01┆
0x08700…08720 32 33 34 35 36 37 38 39 20 0c 4d 68 51 44 49 53 4b 20 56 65 72 73 69 6f 6e 20 32 2e 33 20 20 20 ┆23456789 MhQDISK Version 2.3 ┆
0x08720…08740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 37 2f 31 38 2f 37 38 20 20 20 20 20 20 45 6e 74 65 ┆ 07/18/78 Ente┆
0x08740…0875f 72 20 41 6c 6c 6f 2c 20 49 6e 69 74 2c 20 6f 72 20 4e 65 77 20 0a 00 82 00 1a 00 14 00 00 00 ┆r Allo, Init, or New ┆
0x0875f…0877f (5, 0, 1) 0c 9e 68 17 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0c b7 68 11 41 ┆ h h A┆
0x0877f…0879f 6c 6c 6f 2f 49 6e 69 74 2f 4e 65 77 20 41 49 4e 0c ca 68 28 55 73 69 6e 67 20 44 72 69 76 65 20 ┆llo/Init/New AIN h(Using Drive ┆
0x0879f…087bf 23 20 44 72 69 76 65 20 4e 75 6d 62 65 72 20 20 04 00 49 4e 44 45 58 20 20 20 28 00 0c f4 68 28 ┆# Drive Number INDEX ( h(┆
0x087bf…087df 4f 4b 20 54 6f 20 49 6e 69 74 20 3f 20 59 49 6e 69 74 69 61 6c 69 7a 69 6e 67 20 44 72 69 76 65 ┆OK To Init ? YInitializing Drive┆
0x087df…087ff 20 23 20 15 00 39 02 00 0c 20 69 10 49 6e 69 74 20 44 72 69 76 65 20 23 20 20 e8 03 0c 32 69 20 ┆ # 9 i Init Drive # 2i ┆
0x087ff…0881f 44 65 66 65 63 74 69 76 65 20 44 69 73 6b 65 74 74 65 20 49 6e 20 44 72 69 76 65 20 23 20 1e 00 ┆Defective Diskette In Drive # ┆
0x0881f…0883f 0c 5a 69 0e 4e 6f 2e 20 4f 66 20 54 72 61 63 6b 73 20 0c 6a 69 0e 46 69 6c 65 20 4e 61 6d 65 20 ┆ Zi No. Of Tracks ji File Name ┆
0x0883f…0885e 20 20 20 20 0c 7c 69 16 46 69 6c 65 20 05 00 08 00 20 43 61 6e 6e 6f 74 20 42 65 20 46 6f 00 ┆ öi File Cannot Be Fo ┆
0x0885e…0887e (5, 0, 2) 0c 92 69 31 75 6e 64 20 49 6e 20 44 72 69 76 65 19 00 20 23 20 03 00 54 68 65 72 65 20 49 73 20 ┆ i1und In Drive # There Is ┆
0x0887e…0889e 4e 6f 74 20 45 6e 6f 75 67 68 20 53 70 61 63 65 20 4c 65 66 74 0c c5 69 1a 52 65 63 6f 72 64 20 ┆Not Enough Space Left i Record ┆
0x0889e…088be 4c 65 6e 67 74 68 20 ff 01 10 00 20 00 46 23 18 00 fe 00 0c e1 69 16 20 49 73 20 41 6c 72 65 61 ┆Length F# i Is Alrea┆
0x088be…088de 64 79 20 54 68 61 74 20 53 69 7a 65 20 0c ff 69 15 4f 6b 20 54 6f 20 4c 6f 73 65 20 52 65 63 6f ┆dy That Size i Ok To Lose Reco┆
0x088de…088fe 72 64 73 20 3f 20 0b 1e 6a 27 03 43 15 4f 1d 00 68 0b 00 68 0d 00 0c 0a 0e 03 43 17 43 15 00 4f ┆rds ? j' C O h h C C O┆
0x088fe…0891e 1d 00 0a 68 0f 00 0c 0a 03 43 15 00 67 ed 00 07 01 0b 47 6a 09 1d 67 ed 00 43 17 00 07 03 0b 52 ┆ h C g Gj g C R┆
0x0891e…0893e 6a 0c 1d 43 17 67 ed 00 68 0f 00 0c 0a 03 0b 50 6a 02 6a 5e 0b 5e 6a 22 67 cb 43 15 00 03 67 b3 ┆j C g h Pj j^ ^j"g C g ┆
0x0893e…0895d 43 15 00 03 68 11 43 15 00 03 68 11 00 43 17 00 43 19 00 0c 0a 0c 0a 43 19 00 00 20 46 00 00 ┆C h C h C C C F ┆
0x0895d…0897d (5, 0, 3) 0b 84 6a 23 20 68 11 68 11 00 43 19 00 0a 03 6a 70 1c 67 cb 33 01 ff 43 1b 2b 06 67 b3 33 01 ff ┆ j# h h C jp g 3 C + g 3 ┆
0x0897d…0899d 43 1b 2c 06 6a 85 1c 0b 80 6a 04 6a a7 6a 92 0b a7 6a 0d 68 11 00 68 0f 00 0c 0a 43 17 00 07 05 ┆C , j j j j j h h C ┆
0x0899d…089bd 0b b6 6a 16 1d 43 15 68 11 00 03 40 f9 68 13 00 03 67 cb 33 01 ff 43 1b 2b 06 0a 13 68 02 cc 6a ┆ j C h @ h g 3 C + h j┆
0x089bd…089dd 0b cc 6a 10 68 11 43 15 00 03 68 11 00 43 17 00 0c 0a 32 01 0b e0 6a 2a 20 68 11 68 11 00 32 01 ┆ j h C h C 2 j* h h 2 ┆
0x089dd…089fd 0a 03 6a d2 1c 67 b3 33 01 ff 41 1c 68 11 00 43 15 00 0c 0a 68 0f 00 0a 33 01 ff 0e 0a 2c 01 6a ┆ j g 3 A h C h 3 , j┆
0x089fd…08a1d e1 1c 0b dc 6a 04 6b 0a 6a ed 0b b4 6a 02 6b 0a 0b 45 6a 02 6b 0a 0b 0a 6b 01 1f 0b 13 6b 3c 03 ┆ j k j j k Ej k k k< ┆
0x08a1d…08a3d 67 e3 32 28 4f 23 68 15 00 32 18 0e 0a 32 18 06 68 11 67 f3 00 03 67 f2 4f 25 00 03 67 f3 68 11 ┆g 2(O#h 2 2 h g g O% g h ┆
0x08a3d…08a5c 00 03 67 cb 32 18 67 e3 32 28 06 67 e3 32 28 5b 53 68 15 00 32 18 0e 0a 32 18 06 00 46 00 00 ┆ g 2 g 2( g 2(ÄSh 2 2 F ┆
0x08a5c…08a7c (5, 0, 4) 0b 4f 6b 26 68 11 67 f3 00 03 67 f2 4f 25 00 03 67 f3 68 11 00 03 4f 1d 67 f1 00 68 17 00 12 03 ┆ Ok&h g g O% g h O g h ┆
0x08a7c…08a9c 67 b3 32 18 67 e3 32 28 06 1f 0b 7d 6b 05 68 19 68 1b 03 0a 1d 68 02 82 6b 0b 82 6b 21 43 1b 32 ┆g 2 g 2( åk h h h k k!C 2┆
0x08a9c…08abc 01 33 00 00 43 0b 00 0a 32 01 0c 0a 68 15 00 0a 68 0f 00 06 43 1b 32 01 68 1f 32 01 09 05 0b a5 ┆ 3 C 2 h h C 2 h 2 ┆
0x08abc…08adc 6b 19 1d 33 00 00 68 1b 00 0a 32 08 33 00 00 68 1b 00 0a 32 08 31 43 1b 32 01 06 0b a3 6b 02 6b ┆k 3 h 2 3 h 2 1C 2 k k┆
0x08adc…08afc c1 0b c1 6b 0f 33 00 00 68 1b 00 0a 32 08 68 20 32 00 09 05 0b d2 6b 05 1d 68 22 00 1c 0b d0 6b ┆ k 3 h 2 h 2 k h" k┆
0x08afc…08b1c 02 6b d7 0b be 6b 03 6b d7 1c 0b d7 6b 12 68 15 68 15 00 68 0f 00 0a 03 68 15 00 68 20 00 07 04 ┆ k k k k h h h h h ┆
0x08b1c…08b3c 0b eb 6b 23 1d 15 00 27 32 0d 32 01 2a 33 00 00 68 19 00 0a 32 0e 26 33 00 00 43 0b 00 0a 32 80 ┆ k# '2 2 *3 h 2 &3 C 2 ┆
0x08b3c…08b5b 25 68 15 68 0f 00 03 0b e9 6b 02 6c 0e 0b 0e 6c 04 68 1d 00 1c 0a 22 68 02 12 6c 00 46 00 00 ┆%h h k l l h "h l F ┆
0x08b5b…08b7b (5, 0, 5) 0b 12 6c 1a 33 00 00 68 1b 00 0a 32 08 33 00 00 68 1b 00 0a 32 08 31 68 24 32 07 06 1f 1f 0b 34 ┆ l 3 h 2 3 h 2 1h$2 4┆
0x08b7b…08b9b 6c 3b 03 4f 36 4f 1d 00 19 17 05 02 42 4f 33 43 13 00 19 17 05 03 43 4f 2f 4f 36 02 02 42 4f 33 ┆l; O6O BO3C CO/O6 BO3┆
0x08b9b…08bbb 02 03 43 0f 05 04 44 4f 2d 4f 2f 02 04 44 1a 16 03 4f 2f 02 04 44 4f 38 02 03 43 08 04 0b 71 6c ┆ C DO-O/ D O/ DO8 C ql┆
0x08bbb…08bdb 15 1d 15 00 27 32 0d 32 01 2a 68 2b 32 10 26 32 00 68 3b 7c 66 1e 0b 6f 6c 02 6c 86 0b 86 6c 01 ┆ '2 2 *h+2 &2 h;öf ol l l ┆
0x08bdb…08bfb 1f 0b 8f 6c 54 03 33 00 00 43 11 00 0a 32 80 33 00 00 43 0b 00 0a 32 01 0c 0a 68 15 00 68 0f 00 ┆ lT 3 C 2 3 C 2 h h ┆
0x08bfb…08c1b 0a 0a 68 20 00 68 15 00 0c 0a 06 68 15 68 20 00 68 15 00 0c 0a 03 33 00 00 43 11 00 0a 32 01 0c ┆ h h h h h 3 C 2 ┆
0x08c1b…08c3b 0a 68 0f 00 0a 33 00 00 43 11 00 0a 32 80 30 68 1f 32 01 34 68 3b 00 07 02 0b e5 6c 18 1d 32 00 ┆ h 3 C 2 0h 2 4h; l 2 ┆
0x08c3b…08c5a 33 00 00 43 11 00 0a 68 15 7f 72 1e 32 00 68 3d 68 0f 7f 72 1e 0b e3 6c 02 6c fd 00 46 00 00 ┆3 C h r 2 h=h r l l F ┆
0x08c5a…08c7a (5, 0, 6) 0b fd 6c 01 1f 0b 06 6d 16 68 3e 03 33 00 00 43 09 00 0a 32 08 68 40 32 0b 34 68 3b 00 07 02 0b ┆ l m h> 3 C 2 h@2 4h; ┆
0x08c7a…08c9a 1e 6d 0b 1d 6c fe 68 0f 00 19 17 04 08 1f 0b 1c 6d 02 6d 2c 0b 2c 6d 0a 6c fe 68 3b 00 19 17 04 ┆ m l h m m, ,m l h; ┆
0x08c9a…08cba 08 1f 0b 29 6d 03 6d 36 1c 0b 36 6d 01 1f 0a 4b 68 02 37 6d 0b 37 6d 67 15 00 27 32 0d 32 01 2a ┆ )m m6 6m Kh 7m 7mg '2 2 *┆
0x08cba…08cda 68 4d 32 48 26 43 09 43 1a 68 0f 00 32 02 0e 0a 03 43 0b 43 09 00 68 95 00 0a 03 43 0d 43 0b 00 ┆hM2H&C C h 2 C C h C C ┆
0x08cda…08cfa 68 97 00 0a 03 43 0f 43 0d 00 68 99 00 0a 03 43 11 43 0f 00 68 9b 00 0a 03 33 00 00 43 0d 00 0a ┆h C C h C C h 3 C ┆
0x08cfa…08d1a 32 18 68 9d 32 18 06 68 15 68 0f 00 03 33 00 00 43 0b 00 0a 32 80 25 15 00 27 32 0d 32 01 2a 0a ┆2 h 2 h h 3 C 2 % '2 2 * ┆
0x08d1a…08d3a b5 68 02 9e 6d 0b 9e 6d 34 33 00 00 43 09 00 0a 32 08 68 20 32 00 06 32 00 68 b7 33 00 00 43 09 ┆ h m m43 C 2 h 2 2 h 3 C ┆
0x08d3a…08d59 00 0a 6b 7d 1e 43 00 32 01 33 00 00 43 09 00 0a 32 08 06 43 00 32 01 68 c5 32 01 09 05 00 00 ┆ kå C 2 3 C 2 C 2 h 2 ┆
0x08d59…08d79 (5, 0, 7) 0b d2 6d 16 43 00 32 01 68 c6 32 01 09 05 12 43 00 32 01 68 c7 32 01 09 05 12 0b ea 6d 05 1d 68 ┆ m C 2 h 2 C 2 h 2 m h┆
0x08d79…08d99 b5 00 1c 0b e8 6d 02 6d ef 0a c8 68 02 ef 6d 0b ef 6d 18 33 00 00 43 09 00 0a 32 08 68 20 32 00 ┆ m m h m m 3 C 2 h 2 ┆
0x08d99…08db9 06 43 00 32 01 68 c6 32 01 09 02 0b 09 6e 0f 1d 33 00 00 43 0f 00 0a 32 0e 68 ca 32 0e 06 0b 07 ┆ C 2 h 2 n 3 C 2 h 2 ┆
0x08db9…08dd9 6e 02 6e 1b 0b 1b 6e 0e 33 00 00 43 0f 00 0a 32 0e 68 d8 32 0e 06 0b 18 6e 03 6e 29 1c 0b 29 6e ┆n n n 3 C 2 h 2 n n) )n┆
0x08dd9…08df9 2e 32 00 33 00 00 43 0f 00 0a 33 00 00 43 09 00 0a 6b 7d 1e 6c fe 32 00 6c fe 6c fe 4f 25 00 19 ┆.2 3 C 3 C kå l 2 l l O% ┆
0x08df9…08e19 17 04 08 6d 06 1e 01 08 68 0f 00 19 17 08 02 0b 59 6e 05 1d 68 c8 00 1c 0b 57 6e 02 6e 5e 0b 5e ┆ m h Yn h Wn n^ ^┆
0x08e19…08e39 6e 24 4f 25 33 00 00 43 09 00 0a 32 08 16 03 4f 27 4f 25 00 03 4f 25 00 68 3b 00 07 01 4f 25 00 ┆n$O%3 C 2 O'O% O% h; O% ┆
0x08e39…08e58 68 e6 00 07 04 13 0b 84 6e 05 1d 68 c8 00 1c 0b 82 6e 02 6e 89 0b 89 6e 05 67 e3 32 28 33 00 ┆h n h n n n g 2(3 ┆
0x08e58…08e78 (5, 0, 8) 0b 8e 6e 1a 00 00 43 0d 00 0a 32 18 06 67 e5 32 08 68 e8 32 08 06 4f 25 00 68 3b 00 07 02 0b aa ┆ n C 2 g 2 h 2 O% h; ┆
0x08e78…08e98 6e 20 1d 67 9b 32 18 67 e3 32 28 06 67 9b 22 67 e3 32 28 67 9b 32 18 06 4f 25 67 f2 00 68 17 00 ┆n g 2 g 2( g "g 2(g 2 O%g h ┆
0x08e98…08eb8 12 03 0b a8 6e 02 6e ca 0b ca 6e 34 67 ef 68 f0 00 03 67 ed 4f 29 00 03 67 f1 4f 29 00 03 67 f2 ┆ n n n4g h g O) g O) g ┆
0x08eb8…08ed8 4f 25 00 03 67 f3 68 3b 00 03 67 f5 68 3b 00 03 67 e3 68 17 00 03 43 00 32 01 68 c6 32 01 09 05 ┆O% g h; g h; g h C 2 h 2 ┆
0x08ed8…08ef8 0b 00 6f 0a 1d 32 00 67 e3 4f 2b 7c 8d 1e 0b fe 6e 02 6f 0a 0b 0a 6f 0a 43 00 32 01 68 c6 32 01 ┆ o 2 g O+ö n o o C 2 h 2 ┆
0x08ef8…08f18 09 02 0b 16 6f 05 1d 69 1c 00 1c 0b 14 6f 02 6f 1b 0b 1b 6f 19 67 e3 68 3b 00 03 67 9b 32 18 67 ┆ o i o o o g h; g 2 g┆
0x08f18…08f38 e3 32 28 06 43 00 32 01 68 c5 32 01 09 02 0b 36 6f 05 1d 69 56 00 1c 0b 34 6f 02 6f 3b 0a f2 68 ┆ 2( C 2 h 2 6o iV 4o o; h┆
0x08f38…08f57 02 3b 6f 0b 3b 6f 15 67 f5 4f 2b 00 68 0f 00 0a 03 33 00 00 43 0f 00 0a 32 0e 68 f4 00 33 00 ┆ ;o ;o g O+ h 3 C 2 h 3 ┆
0x08f57…08f77 (5, 0, 9) 0b 50 6f 4b 32 0b 31 4f 25 00 19 31 68 ff 32 02 06 33 00 00 43 09 00 0a 32 08 68 20 32 00 06 32 ┆ PoK2 1O% 1h 2 3 C 2 h 2 2┆
0x08f77…08f97 00 33 00 00 43 0f 00 0a 33 00 00 43 09 00 0a 6b 7d 1e 32 00 6c 8f 1e 33 00 00 43 09 00 0a 32 01 ┆ 3 C 3 C kå 2 l 3 C 2 ┆
0x08f97…08fb7 0c 0a 68 0f 00 0a 68 0f 00 69 01 32 01 09 05 0b 9d 6f 02 1d 1b 0b 9b 6f 02 6f 9f 0b 9f 6f 2d 15 ┆ h h i 2 o o o o- ┆
0x08fb7…08fd7 00 27 32 0d 32 01 2a 69 02 32 15 69 17 00 28 4f 25 00 19 69 19 32 01 29 68 1f 32 01 68 0f 00 28 ┆ '2 2 *i 2 i (O% i 2 )h 2 h (┆
0x08fd7…08ff7 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b ce 6f 05 1d 69 30 00 1c 0b cc 6f 02 6f d3 0b d3 6f 10 68 ┆2 g O ö O o i0 o o o h┆
0x08ff7…09017 15 69 1a 00 03 68 15 00 4f 29 00 0c 0a 32 01 0b e7 6f 25 20 68 15 68 15 00 32 01 0a 03 6f d9 1c ┆ i h O) 2 o% h h 2 o ┆
0x09017…09037 4f 23 68 15 00 32 18 0e 0a 32 18 33 00 00 43 0d 00 0a 32 18 06 6f e8 1c 0b e3 6f 04 70 0c 6f f4 ┆O#h 2 2 3 C 2 o o p o ┆
0x09037…09056 0b 0c 70 19 67 f2 68 3b 00 03 67 ed 68 0f 00 03 67 f5 68 3b 00 03 4f 23 68 0f 00 32 18 00 00 ┆ p g h; g h g h; O#h 2 ┆
0x09056…09076 (5, 0, 10) 0b 25 70 27 0e 0a 32 18 67 e3 32 28 06 67 f2 4f 25 00 03 67 f3 68 3b 00 03 67 9b 32 18 67 e3 32 ┆ %p' 2 g 2( g O% g h; g 2 g 2┆
0x09076…09096 28 06 67 9b 32 18 4f 3b 2c 82 1b 0a 1c 69 02 4c 70 0b 4c 70 06 4f 27 4f 25 00 03 0a 1e 69 02 52 ┆( g 2 O;, i Lp Lp O'O% i R┆
0x09096…090b6 70 0b 52 70 37 33 00 00 43 09 00 0a 32 08 68 20 32 00 06 32 00 69 20 33 00 00 43 09 00 0a 6b 7d ┆p Rp73 C 2 h 2 2 i 3 C kå┆
0x090b6…090d6 1e 6c fe 32 00 6c fe 6c fe 4f 25 00 19 17 04 08 6d 06 1e 01 08 68 0f 00 19 17 08 02 0b 8b 70 05 ┆ l 2 l l O% m h p ┆
0x090d6…090f6 1d 69 1e 00 1c 0b 89 70 02 70 90 0b 90 70 1e 4f 25 33 00 00 43 09 00 0a 32 08 16 03 4f 25 00 68 ┆ i p p p O%3 C 2 O% h┆
0x090f6…09116 3b 00 07 01 4f 25 00 68 e6 00 07 04 13 0b b0 70 05 1d 69 1e 00 1c 0b ae 70 02 70 b5 0b b5 70 08 ┆; O% h p i p p p ┆
0x09116…09136 4f 25 00 68 3b 00 07 02 0b bf 70 0f 1d 4f 25 68 0f 00 03 4f 27 00 68 0f 00 07 02 0b d0 70 07 1d ┆O% h; p O%h O' h p ┆
0x09136…09155 4f 25 69 1a 00 03 0b ce 70 02 70 d7 0b bd 70 02 70 d7 0b d7 70 06 67 f2 4f 25 00 03 00 00 00 ┆O%i p p p p p g O% ┆
0x09155…09175 (5, 0, 11) 0b dd 70 98 32 00 67 e3 4f 2b 7c 8d 1e 67 e3 68 3b 00 03 67 f2 4f 27 00 03 67 f3 68 3b 00 03 67 ┆ p 2 g O+ö g h; g O' g h; g┆
0x09175…09195 9b 32 18 67 e3 32 28 06 67 9b 32 18 4f 3b 2b 82 67 e3 32 28 4f 23 68 0f 00 32 18 0e 0a 32 18 06 ┆ 2 g 2( g 2 O;+ g 2(O#h 2 2 ┆
0x09195…091b5 68 0d 67 ed 00 03 33 00 00 43 0f 00 0a 32 0e 68 f4 32 0b 31 4f 25 00 19 31 68 ff 32 02 06 33 00 ┆h g 3 C 2 h 2 1O% 1h 2 3 ┆
0x091b5…091d5 00 43 09 00 0a 32 08 68 20 32 00 06 32 00 33 00 00 43 0f 00 0a 33 00 00 43 09 00 0a 6b 7d 1e 32 ┆ C 2 h 2 2 3 C 3 C kå 2┆
0x091d5…091f5 00 6c 8f 1e 33 00 00 43 09 00 0a 32 01 0c 0a 68 0f 00 0a 68 0f 00 69 01 32 01 09 05 0b 77 71 02 ┆ l 3 C 2 h h i 2 wq ┆
0x091f5…09215 1d 1b 0b 75 71 02 71 79 0b 79 71 31 15 00 27 32 0d 32 01 2a 69 02 32 15 69 17 00 28 4f 25 00 19 ┆ uq qy yq1 '2 2 *i 2 i (O% ┆
0x09215…09235 69 19 32 01 29 68 1f 32 01 68 0f 00 28 68 15 68 0f 00 03 68 15 00 68 0d 00 0c 0a 32 01 0b ae 71 ┆i 2 )h 2 h (h h h h 2 q┆
0x09235…09254 1d 20 68 15 68 15 00 32 01 0a 03 71 a0 1c 67 e3 32 28 4f 23 68 15 00 32 18 0e 0a 32 18 06 00 ┆ h h 2 q g 2(O#h 2 2 ┆
0x09254…09274 (5, 0, 12) 0b cb 71 08 67 f5 00 4f 2b 00 07 04 0b d5 71 13 1d 67 f5 4f 2b 00 03 68 0d 68 15 00 03 68 15 69 ┆ q g O+ q g O+ h h h i┆
0x09274…09294 2e 00 03 0b d3 71 02 71 e8 0b e8 71 08 67 f3 00 4f 2b 00 07 04 0b f2 71 10 1d 68 0d 68 0d 00 68 ┆. q q q g O+ q h h h┆
0x09294…092b4 0f 00 0c 0a 03 69 54 00 1c 0b f0 71 02 72 02 0b 02 72 1e 4f 19 67 f3 00 03 67 f2 4f 25 00 03 67 ┆ iT q r r O g g O% g┆
0x092b4…092d4 f3 4f 19 00 03 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b 22 72 05 1d 69 30 00 1c 0b 20 72 02 72 2a ┆ O 2 g O ö O "r i0 r r*┆
0x092d4…092f4 0b 2a 72 04 69 52 00 1c 0b 27 72 03 72 2e 1c 0a 30 69 02 2e 72 0b 2e 72 28 15 00 27 32 0d 32 01 ┆ *r iR 'r r. 0i .r .r( '2 2 ┆
0x092f4…09314 2a 69 32 32 1e 69 50 00 28 4f 25 00 19 69 19 32 01 29 68 1f 32 01 68 0f 00 28 32 00 68 3b 7c 66 ┆*i22 iP (O% i 2 )h 2 h (2 h;öf┆
0x09314…09334 1e 0a 52 69 02 56 72 0b 56 72 08 68 15 00 68 0f 00 07 05 0b 60 72 07 1d 67 ed 68 3b 00 03 0b 5e ┆ Ri Vr Vr h h `r g h; ^┆
0x09334…09353 72 02 72 67 0b 67 72 13 67 f2 68 3b 00 03 67 f3 4f 19 00 03 4f 23 68 15 00 32 18 00 18 06 00 ┆r rg gr g h; g O O#h 2 ┆
0x09353…09373 (5, 0, 13) 0b 7a 72 0c 0e 0a 32 18 67 e3 32 28 06 71 af 1c 0b aa 71 04 72 86 71 bb 0b 86 72 08 67 f5 00 4f ┆ zr 2 g 2( q q r q r g O┆
0x09373…09393 2b 00 07 01 0b 90 72 1f 1d 67 f2 4f 25 00 03 67 f3 67 f5 00 03 67 f5 4f 2b 00 03 32 00 67 e3 4f ┆+ r g O% g g g O+ 2 g O┆
0x09393…093b3 1b 7c 8d 1e 4f 1b 00 0b b1 72 05 1d 69 30 00 1c 0b af 72 02 72 b6 0b 8e 72 02 72 b6 0a 54 69 02 ┆ ö O r i0 r r r r Ti ┆
0x093b3…093d3 b6 72 0b b6 72 30 67 e3 32 28 4f 23 68 0f 00 32 18 0e 0a 32 18 06 67 f2 4f 25 00 03 67 ed 68 0d ┆ r r0g 2(O#h 2 2 g O% g h ┆
0x093d3…093f3 00 03 68 15 68 0d 00 68 0f 00 0a 03 68 15 00 4f 29 00 0c 0a 32 01 0b ea 72 25 20 68 15 68 15 00 ┆ h h h h O) 2 r% h h ┆
0x093f3…09413 32 01 0a 03 72 dc 1c 4f 23 68 15 00 32 18 0e 0a 32 18 33 00 00 43 0d 00 0a 32 18 06 72 eb 1c 0b ┆2 r O#h 2 2 3 C 2 r ┆
0x09413…09433 e6 72 04 73 0f 72 f7 0b 0f 73 1e 67 f3 68 3b 00 03 67 9b 32 18 67 e3 32 28 06 67 9b 68 3b 00 03 ┆ r s r s g h; g 2 g 2( g h; ┆
0x09433…09452 67 9b 32 18 4f 3b 2c 82 1b 0a 56 69 02 2d 73 0b 2d 73 08 67 9b 32 18 4f 3b 2b 82 00 18 00 00 ┆g 2 O;, Vi -s -s g 2 O;+ ┆
0x09452…09472 (5, 0, 14) 0a 58 69 02 35 73 0b 35 73 37 33 00 00 43 09 00 0a 32 08 68 20 32 00 06 32 00 69 5a 33 00 00 43 ┆ Xi 5s 5s73 C 2 h 2 2 iZ3 C┆
0x09472…09492 09 00 0a 6b 7d 1e 6c fe 32 00 6c fe 6c fe 43 13 00 19 17 04 08 6d 06 1e 01 08 68 0f 00 19 17 08 ┆ kå l 2 l l C m h ┆
0x09492…094b2 02 0b 6e 73 05 1d 69 58 00 1c 0b 6c 73 02 73 73 0b 73 73 1e 43 13 33 00 00 43 09 00 0a 32 08 16 ┆ ns iX ls ss ss C 3 C 2 ┆
0x094b2…094d2 03 43 13 00 68 3b 00 07 01 43 13 00 4f 2b 00 07 04 13 0b 93 73 05 1d 69 58 00 1c 0b 91 73 02 73 ┆ C h; C O+ s iX s s┆
0x094d2…094f2 98 0a 68 69 02 98 73 0b 98 73 1a 43 01 32 08 68 20 32 00 06 32 00 69 6a 43 01 6b 7d 1e 4f 27 00 ┆ hi s s C 2 h 2 2 ijC kå O' ┆
0x094f2…09512 68 3b 00 07 02 0b b4 73 43 1d 67 e3 32 28 33 00 00 43 0d 00 0a 32 18 06 67 e5 32 08 43 01 32 08 ┆h; sC g 2(3 C 2 g 2 C 2 ┆
0x09512…09532 06 67 b3 32 18 67 e3 32 28 06 40 f7 69 78 00 03 67 b3 22 67 e3 32 28 67 b3 32 18 06 4f 25 67 f2 ┆ g 2 g 2( @ ix g "g 2(g 2 O%g ┆
0x09532…09551 00 68 17 00 12 03 4f 27 4f 25 00 03 0a 78 69 02 f7 73 0b f7 73 06 67 e5 32 08 68 e8 00 00 00 ┆ h O'O% xi s s g 2 h ┆
0x09551…09571 (5, 0, 15) 0b fd 73 52 32 08 06 67 e3 68 3b 00 03 32 00 4f 27 7c 4c 1e 67 9b 32 18 67 e3 32 28 06 67 9b 22 ┆ sR2 g h; 2 O'öL g 2 g 2( g "┆
0x09571…09591 32 00 68 3b 7c 4c 1e 67 e3 32 28 67 9b 32 18 06 67 ed 4f 29 00 03 67 9b 32 18 67 e3 32 28 06 67 ┆2 h;öL g 2(g 2 g O) g 2 g 2( g┆
0x09591…095b1 e3 68 17 00 03 32 00 67 e3 4f 2b 7c 8d 1e 67 9b 32 18 4f 3b 2b 82 0b b2 73 02 74 4f 0b 4f 74 1e ┆ h 2 g O+ö g 2 O;+ s tO Ot ┆
0x095b1…095d1 67 e3 32 28 4f 23 68 0f 00 32 18 0e 0a 32 18 06 4f 21 67 ed 00 03 67 ed 00 68 0f 00 07 02 0b 6f ┆g 2(O#h 2 2 O!g g h o┆
0x095d1…095f1 74 05 1d 69 7a 00 1c 0b 6d 74 02 74 74 0b 74 74 10 68 0b 69 1a 00 03 68 0b 00 4f 21 00 0c 0a 32 ┆t iz mt tt tt h i h O! 2┆
0x095f1…09611 01 0b 88 74 27 20 68 0b 68 0b 00 32 01 0a 03 74 7a 1c 67 e3 32 28 4f 23 68 0b 00 32 18 0e 0a 32 ┆ t' h h 2 tz g 2(O#h 2 2┆
0x09611…09631 18 06 67 e5 32 08 43 01 32 08 09 02 0b b1 74 11 1d 4f 23 68 0b 00 03 68 0b 4f 21 00 68 0f 00 0a ┆ g 2 C 2 t O#h h O! h ┆
0x09631…09650 03 0b af 74 02 74 c2 0b c2 74 03 74 89 1c 0b 84 74 04 74 c5 74 95 0b c5 74 03 4f 23 00 00 00 ┆ t t t t t t t t O# ┆
0x09650…09670 (5, 0, 16) 0b c8 74 05 68 3b 00 07 04 0b cf 74 05 1d 69 df 00 1c 0b cd 74 02 74 d4 0a 7a 69 02 d4 74 0b d4 ┆ t h; t i t t zi t ┆
0x09670…09690 74 08 43 13 00 68 3b 00 07 02 0b de 74 3c 1d 15 00 27 32 0d 32 01 2a 15 00 27 69 7c 32 05 69 81 ┆t C h; t< '2 2 * 'iö2 i ┆
0x09690…096b0 00 28 43 01 32 08 69 83 00 28 69 85 32 19 69 9e 00 28 69 a0 32 03 69 a3 00 28 4f 25 00 19 69 19 ┆ (C 2 i (i 2 i (i 2 i (O% i ┆
0x096b0…096d0 32 01 29 32 00 68 3b 7c 66 1e 0b dc 74 02 75 1a 0b 1a 75 22 67 e3 32 28 4f 23 4f 21 00 32 18 0e ┆2 )2 h;öf t u u"g 2(O#O! 2 ┆
0x096d0…096f0 0a 32 18 06 4f 1f 67 f5 00 03 4f 1f 00 43 13 00 0a 4f 2b 00 07 04 0b 3e 75 15 1d 15 00 27 32 0d ┆ 2 O g O C O+ >u '2 ┆
0x096f0…09710 32 01 2a 69 a5 32 1e 26 32 00 68 3b 7c 66 1e 0b 3c 75 02 75 53 0a c3 69 02 53 75 0b 53 75 3a 33 ┆2 *i 2 &2 h;öf <u uS i Su Su:3┆
0x09710…09730 00 00 43 09 00 0a 32 08 68 20 32 00 06 32 00 69 c5 33 00 00 43 09 00 0a 6b 7d 1e 4f 19 33 00 00 ┆ C 2 h 2 2 i 3 C kå O 3 ┆
0x09730…0974f 43 09 00 0a 32 08 16 03 4f 19 00 69 83 00 07 01 4f 19 00 69 d3 00 07 04 13 0b 8f 75 01 1d 00 ┆C 2 O i O i u ┆
0x0974f…0976f (5, 0, 17) 0b 90 75 04 69 c3 00 1c 0b 8d 75 02 75 94 0b 94 75 1f 32 00 6c 8f 1e 68 15 4f 19 00 69 d5 00 10 ┆ u i u u u 2 l h O i ┆
0x0976f…0978f 4f 19 00 69 d7 00 10 0a 03 68 15 00 68 e6 00 07 01 0b b5 75 07 1d 68 15 69 a3 00 03 0b b3 75 02 ┆O i h h u h i u ┆
0x0978f…097af 75 bc 0b bc 75 1a 4f 1d 69 d9 00 4f 19 00 68 15 00 0a 69 db 00 0a 10 03 4f 1d 00 69 dd 00 07 04 ┆u u O i O h i O i ┆
0x097af…097cf 0b d8 75 07 1d 4f 1d 69 dd 00 03 0b d6 75 02 75 df 0b df 75 60 32 00 6c 34 1e 4f 2d 4f 1d 00 43 ┆ u O i u u u`2 l4 O-O C┆
0x097cf…097ef 13 00 0e 03 68 15 4f 1f 00 68 0f 00 0a 03 67 e3 68 3b 00 03 67 e5 32 08 43 01 32 08 06 67 ed 68 ┆ h O h g h; g 2 C 2 g h┆
0x097ef…0980f 3b 00 03 67 f1 4f 1d 00 03 67 f2 4f 25 00 03 67 f3 4f 1f 00 68 0f 00 0a 03 67 f5 4f 1f 00 43 13 ┆; g O g O% g O h g O C ┆
0x0980f…0982f 00 0a 03 67 ef 4f 19 00 03 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b 41 76 05 1d 69 30 00 1c 0b 3f ┆ g O 2 g O ö O Av i0 ?┆
0x0982f…0984e 76 02 76 46 0b 46 76 14 68 15 67 f3 00 03 67 f2 68 3b 00 03 67 f3 68 15 00 03 4f 23 00 1d 00 ┆v vF Fv h g g h; g h O# ┆
0x0984e…0986e (5, 0, 18) 0b 5a 76 60 4f 21 00 68 0f 00 0a 32 18 0e 0a 32 18 67 e3 32 28 06 67 e3 32 28 4f 23 68 0f 00 32 ┆ Zv`O! h 2 2 g 2( g 2(O#h 2┆
0x0986e…0988e 18 0e 0a 32 18 06 67 ed 67 ed 00 68 0f 00 0a 03 4f 23 68 0f 00 32 18 0e 0a 32 18 67 e3 32 28 06 ┆ 2 g g h O#h 2 2 g 2( ┆
0x0988e…098ae 4f 19 67 f3 00 03 67 f2 4f 25 00 03 67 f3 4f 19 00 03 67 9b 32 18 67 e3 32 28 06 67 9b 32 18 4f ┆O g g O% g O g 2 g 2( g 2 O┆
0x098ae…098ce 3b 2c 82 1b 0a df 69 02 ba 76 0b ba 76 27 32 00 6c 8f 1e 4f 15 67 f5 00 67 f3 00 0c 0a 68 0f 00 ┆;, i v v'2 l O g g h ┆
0x098ce…098ee 0a 03 4f 17 43 13 00 4f 15 00 0c 0a 03 43 13 00 68 3b 00 07 02 0b e3 76 05 1d 69 f7 00 1c 0b e1 ┆ O C O C h; v i ┆
0x098ee…0990e 76 02 76 e8 0b e8 76 08 4f 17 00 68 3b 00 07 04 0b f2 76 05 1d 69 fb 00 1c 0b f0 76 02 76 f7 0b ┆v v v O h; v i v v ┆
0x0990e…0992e f7 76 08 4f 17 00 68 3b 00 07 01 0b 01 77 05 1d 69 fd 00 1c 0b ff 76 02 77 06 0b 06 77 1b 15 00 ┆ v O h; w i v w w ┆
0x0992e…0994d 27 32 0d 32 01 2a 69 7c 32 05 26 43 01 32 08 26 69 e1 32 16 26 32 00 68 3b 00 4f 23 00 1d 00 ┆'2 2 *iö2 &C 2 &i 2 &2 h; O# ┆
0x0994d…0996d (5, 0, 19) 0b 21 77 03 7c 66 1e 0a f7 69 02 24 77 0b 24 77 40 67 e3 32 28 4f 23 68 0f 00 32 18 0e 0a 32 18 ┆ !w öf i $w $w@g 2(O#h 2 2 ┆
0x0996d…0998d 06 67 ed 67 ed 00 68 0f 00 0c 0a 03 5b 53 68 0f 00 32 18 0e 0a 32 18 67 e3 32 28 06 68 15 69 1a ┆ g g h ÄSh 2 2 g 2( h i ┆
0x0998d…099ad 00 03 68 15 00 4f 23 00 68 0f 00 0c 0a 0c 0a 32 01 0b 68 77 27 20 68 15 68 15 00 32 01 0a 03 77 ┆ h O# h 2 hw' h h 2 w┆
0x099ad…099cd 55 1c 5b 53 68 15 00 32 18 0e 0a 32 18 4f 23 68 15 00 32 18 0e 0a 32 18 06 77 69 1c 0b 64 77 04 ┆U ÄSh 2 2 O#h 2 2 wi dw ┆
0x099cd…099ed 77 8f 77 75 0b 8f 77 15 68 15 4f 23 00 03 68 15 00 4f 21 00 68 0f 00 0c 0a 0c 0a 32 01 0b a8 77 ┆w wu w h O# h O! h 2 w┆
0x099ed…09a0d 5b 20 68 15 68 15 00 32 01 0a 03 77 95 1c 67 e3 32 28 4f 23 68 15 00 68 0f 00 0a 32 18 0e 0a 32 ┆Ä h h 2 w g 2(O#h h 2 2┆
0x09a0d…09a2d 18 06 4f 23 68 15 00 32 18 0e 0a 32 18 4f 23 68 15 00 68 0f 00 0a 32 18 0e 0a 32 18 06 67 f3 67 ┆ O#h 2 2 O#h h 2 2 g g┆
0x09a2d…09a4c f3 00 4f 17 00 0a 03 67 f5 67 f5 00 4f 17 00 0a 03 5b 53 68 15 00 32 18 0e 0a 32 18 00 1d 00 ┆ O g g O ÄSh 2 2 ┆
0x09a4c…09a6c (5, 0, 20) 0b 03 78 08 67 e3 32 28 06 77 a9 1c 0b a4 77 04 78 0b 77 b5 0b 0b 78 15 68 15 4f 23 00 03 68 15 ┆ x g 2( w w x w x h O# h ┆
0x09a6c…09a8c 00 4f 21 00 68 0f 00 0c 0a 0c 0a 32 01 0b 24 78 2e 20 68 15 68 15 00 32 01 0a 03 78 11 1c 32 00 ┆ O! h 2 $x. h h 2 x 2 ┆
0x09a8c…09aac 6b 13 1e 68 0d 67 f3 00 03 69 f9 67 f5 00 03 68 0b 68 0d 00 03 68 0b 00 69 f9 00 0c 0a 32 01 0b ┆k h g i g h h h i 2 ┆
0x09aac…09acc 56 78 25 20 68 0b 68 0b 00 32 01 0a 03 78 48 1c 67 f3 68 0b 00 03 67 f5 68 0b 00 03 32 00 67 e3 ┆Vx% h h 2 xH g h g h 2 g ┆
0x09acc…09aec 4f 1b 7c 8d 1e 4f 1b 00 0b 7d 78 05 1d 69 30 00 1c 0b 7b 78 02 78 82 0b 82 78 08 32 00 6a 1e 1e ┆O ö O åx i0 äx x x 2 j ┆
0x09aec…09b0c 78 57 1c 0b 52 78 04 78 8a 78 63 0b 8a 78 03 78 25 1c 0b 20 78 04 78 8d 78 31 0b 8d 78 04 6a 14 ┆xW Rx x xc x x% x x x1 x j ┆
0x09b0c…09b2c 00 1c 0a fb 69 02 91 78 0b 91 78 20 67 e3 32 28 4f 23 4f 21 00 32 18 0e 0a 32 18 06 67 f5 00 4f ┆ i x x g 2(O#O! 2 2 g O┆
0x09b2c…09b4b 17 00 0a 4f 2b 00 68 0f 00 0a 07 04 0b b3 78 0b 1d 15 00 27 32 0d 32 01 2a 69 a5 00 00 1d 00 ┆ O+ h x '2 2 *i ┆
0x09b4b…09b6b (5, 0, 21) 0b be 78 0a 32 1e 26 32 00 68 3b 7c 66 1e 0b b1 78 02 78 c8 0b c8 78 34 67 e3 32 28 4f 23 4f 23 ┆ x 2 &2 h;öf x x x4g 2(O#O#┆
0x09b6b…09b8b 00 32 18 0e 0a 32 18 06 4f 1d 67 f1 00 68 17 00 12 03 32 00 6c 34 1e 68 15 68 0f 00 03 68 15 00 ┆ 2 2 O g h 2 l4 h h h ┆
0x09b8b…09bab 4f 23 00 68 0f 00 0c 0a 0c 0a 32 01 0b 00 79 27 20 68 15 68 15 00 32 01 0a 03 78 ed 1c 5b 53 68 ┆O# h 2 y' h h 2 x ÄSh┆
0x09bab…09bcb 15 00 32 18 0e 0a 32 18 4f 23 68 15 00 32 18 0e 0a 32 18 06 79 01 1c 0b fc 78 04 79 27 79 0d 0b ┆ 2 2 O#h 2 2 y x y'y ┆
0x09bcb…09beb 27 79 3e 67 e3 32 28 4f 23 4f 23 00 32 18 0e 0a 32 18 06 67 f5 67 f5 00 4f 17 00 0a 03 5b 53 4f ┆'y>g 2(O#O# 2 2 g g O ÄSO┆
0x09beb…09c0b 23 00 32 18 0e 0a 32 18 67 e3 32 28 06 68 15 4f 23 00 68 0f 00 0a 03 68 15 00 4f 21 00 0c 0a 32 ┆# 2 2 g 2( h O# h h O! 2┆
0x09c0b…09c2b 01 0b 69 79 38 20 68 15 68 15 00 32 01 0a 03 79 5b 1c 67 e3 32 28 4f 23 68 15 00 32 18 0e 0a 32 ┆ iy8 h h 2 yÄ g 2(O#h 2 2┆
0x09c2b…09c4a 18 06 67 f3 67 f3 00 4f 17 00 0a 03 67 f5 67 f5 00 4f 17 00 0a 03 5b 53 68 15 00 32 18 00 00 ┆ g g O g g O ÄSh 2 ┆
0x09c4a…09c6a (5, 0, 22) 0b a1 79 0c 0e 0a 32 18 67 e3 32 28 06 79 6a 1c 0b 65 79 04 79 ad 79 76 0b ad 79 16 68 15 4f 21 ┆ y 2 g 2( yj ey y yv y h O!┆
0x09c6a…09c8a 00 03 68 15 00 4f 23 00 68 0f 00 0a 0c 0a 68 0f 00 0c 0b c7 79 32 20 68 15 68 15 00 68 0f 00 0c ┆ h O# h h y2 h h h ┆
0x09c8a…09caa 0a 03 79 b3 1c 32 00 6b 13 1e 69 f9 67 f5 00 03 68 0d 67 f3 00 03 68 0b 69 f9 00 03 68 0b 00 68 ┆ y 2 k i g h g h i h h┆
0x09caa…09cca 0d 00 0c 0a 68 0f 00 0c 0b fd 79 27 20 68 0b 68 0b 00 68 0f 00 0c 0a 03 79 ed 1c 67 f5 68 0b 00 ┆ h y' h h h y g h ┆
0x09cca…09cea 03 67 f3 68 0b 00 03 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b 26 7a 05 1d 69 30 00 1c 0b 24 7a 02 ┆ g h 2 g O ö O &z i0 $z ┆
0x09cea…09d0a 7a 2b 0b 2b 7a 08 32 00 6a 1e 1e 79 fe 1c 0b f9 79 04 7a 33 7a 0c 0b 33 7a 03 79 c8 1c 0b c3 79 ┆z+ +z 2 j y y z3z 3z y y┆
0x09d0a…09d2a 04 7a 36 79 d6 0b 36 7a 32 67 e3 32 28 4f 23 4f 23 00 32 18 0e 0a 32 18 06 67 f2 32 01 4f 25 00 ┆ z6y 6z2g 2(O#O# 2 2 g 2 O% ┆
0x09d2a…09d49 19 06 67 f3 67 f5 00 68 0f 00 0a 03 67 f5 67 f3 00 4f 17 00 0a 68 0f 00 0c 0a 03 00 18 00 00 ┆ g g h g g O h ┆
0x09d49…09d69 (5, 0, 23) 0b 68 7a 0c 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b 76 7a 05 1d 69 30 00 1c 0b 74 7a 02 7a 7b 0b ┆ hz 2 g O ö O vz i0 tz zä ┆
0x09d69…09d89 7b 7a 04 6a 14 00 1c 0a fd 69 02 7f 7a 0b 7f 7a 23 4f 1d 67 f1 00 68 17 00 12 03 4f 38 4f 1d 00 ┆äz j i z z#O g h O8O ┆
0x09d89…09da9 43 13 00 0e 19 17 05 03 43 67 ed 00 4f 38 02 03 43 18 08 04 0b a4 7a 14 1d 15 00 27 32 0d 32 01 ┆C Cg O8 C z '2 2 ┆
0x09da9…09dc9 2a 69 ff 32 15 26 23 43 00 32 01 25 0b a2 7a 02 7a b8 0b b8 7a 15 68 15 68 0f 00 03 68 15 00 4f ┆*i 2 &#C 2 % z z z h h h O┆
0x09dc9…09de9 23 00 68 0f 00 0c 0a 0c 0a 32 01 0b d1 7a 27 20 68 15 68 15 00 32 01 0a 03 7a be 1c 5b 53 68 15 ┆# h 2 z' h h 2 z ÄSh ┆
0x09de9…09e09 00 32 18 0e 0a 32 18 4f 23 68 15 00 32 18 0e 0a 32 18 06 7a d2 1c 0b cd 7a 04 7a f8 7a de 0b f8 ┆ 2 2 O#h 2 2 z z z z ┆
0x09e09…09e29 7a 25 67 e3 32 28 4f 23 4f 23 00 32 18 0e 0a 32 18 06 67 f5 67 f5 00 4f 17 00 0a 03 67 ed 00 4f ┆z%g 2(O#O# 2 2 g g O g O┆
0x09e29…09e48 38 02 03 43 18 08 04 0b 1f 7b 0b 1d 67 ed 4f 38 02 03 43 1a 16 03 0b 1d 7b 02 7b 2a 00 00 00 ┆8 C ä g O8 C ä ä* ┆
0x09e48…09e68 (5, 0, 24) 0b 2a 7b 00 0b 2a 7b 24 5b 53 4f 23 00 32 18 0e 0a 32 18 67 e3 32 28 06 68 15 4f 23 00 68 0f 00 ┆ *ä *ä$ÄSO# 2 2 g 2( h O# h ┆
0x09e68…09e88 0a 03 68 15 00 4f 21 00 0c 0a 32 01 0b 52 7b 44 20 68 15 68 15 00 32 01 0a 03 7b 44 1c 67 e3 32 ┆ h O! 2 RäD h h 2 äD g 2┆
0x09e88…09ea8 28 4f 23 68 15 00 32 18 0e 0a 32 18 06 67 f3 67 f3 00 4f 17 00 0a 03 67 f5 67 f5 00 4f 17 00 0a ┆(O#h 2 2 g g O g g O ┆
0x09ea8…09ec8 03 5b 53 68 15 00 32 18 0e 0a 32 18 67 e3 32 28 06 7b 53 1c 0b 4e 7b 04 7b 96 7b 5f 0b 96 7b 14 ┆ ÄSh 2 2 g 2( äS Nä ä ä_ ä ┆
0x09ec8…09ee8 68 15 4f 23 00 68 0f 00 0a 03 68 15 00 4f 21 00 0c 0a 32 01 0b ae 7b 2e 20 68 15 68 15 00 32 01 ┆h O# h h O! 2 ä. h h 2 ┆
0x09ee8…09f08 0a 03 7b a0 1c 32 00 6b 13 1e 68 0d 67 f3 00 03 69 f9 67 f5 00 03 68 0b 68 0d 00 03 68 0b 00 69 ┆ ä 2 k h g i g h h h i┆
0x09f08…09f28 f9 00 0c 0a 32 01 0b e0 7b 25 20 68 0b 68 0b 00 32 01 0a 03 7b d2 1c 67 f3 68 0b 00 03 67 f5 68 ┆ 2 ä% h h 2 ä g h g h┆
0x09f28…09f47 0b 00 03 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b 07 7c 05 1d 69 30 00 1c 0b 05 7c 02 7c 0c 00 ┆ 2 g O ö O ö i0 ö ö ┆
0x09f47…09f67 (5, 0, 25) 0b 07 7c 00 0b 0c 7c 08 32 00 6a 1e 1e 7b e1 1c 0b dc 7b 04 7c 14 7b ed 0b 14 7c 03 7b af 1c 0b ┆ ö ö 2 j ä ä ö ä ö ä ┆
0x09f67…09f87 aa 7b 04 7c 17 7b bb 0a 14 6a 02 17 7c 0b 17 7c 35 67 e3 32 28 5b 53 68 0f 00 32 18 0e 0a 32 18 ┆ ä ö ä j ö ö5g 2(ÄSh 2 2 ┆
0x09f87…09fa7 06 68 11 67 f3 00 03 67 f2 4f 25 00 03 67 f3 68 11 00 03 67 9b 32 18 67 e3 32 28 06 67 9b 32 18 ┆ h g g O% g h g 2 g 2( g 2 ┆
0x09fa7…09fc7 5b 6b 2c 82 1b 1b 0b fe 40 02 37 6d 0b 81 40 02 09 18 00 1c 0b 4e 7b 04 7b 96 7b 5f 0b 96 7b 14 ┆Äk, @ 7m @ Nä ä ä_ ä ┆
0x09fc7…09fe7 68 15 4f 23 00 68 0f 00 0a 03 68 15 00 4f 21 00 0c 0a 32 01 0b ae 7b 2e 20 68 15 68 15 00 32 01 ┆h O# h h O! 2 ä. h h 2 ┆
0x09fe7…0a007 0a 03 7b a0 1c 32 00 6b 13 1e 68 0d 67 f3 00 03 69 f9 67 f5 00 03 68 0b 68 0d 00 03 68 0b 00 69 ┆ ä 2 k h g i g h h h i┆
0x0a007…0a027 f9 00 0c 0a 32 01 0b e0 7b 25 20 68 0b 68 0b 00 32 01 0a 03 7b d2 1c 67 f3 68 0b 00 03 67 f5 68 ┆ 2 ä% h h 2 ä g h g h┆
0x0a027…0a046 0b 00 03 32 00 67 e3 4f 1b ff ff 1e 4f 1b 00 0b 07 7c 05 1d 69 30 00 1c 0b 05 7c 02 7c 0c 00 ┆ 2 g O O ö i0 ö ö ┆
0x0a046…0a066 (5, 0, 26) 0d 4c 7c 1a 42 10 00 2a 10 42 6e 3e 7f 2d fa 61 7c 07 c2 55 7c 32 a5 40 c9 3e 00 c3 5d 7c 00 02 ┆ Lö B * Bn> - aö Uö2 @ > Åö ┆
0x0a066…0a086 00 02 00 0c 43 4c 50 4f 4e 20 20 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ CLPON CLPOFF ┆
0x0a086…0a0a6 43 43 4c 45 45 52 20 20 20 04 00 04 00 00 43 42 53 58 20 20 20 20 20 05 00 0f 00 00 43 41 54 4f ┆CCLEER CBSX CATO┆
0x0a0a6…0a0c6 45 20 20 20 20 0f 00 10 00 10 43 45 54 4f 41 20 20 20 20 0f 00 10 00 00 43 42 53 43 20 20 20 20 ┆E CETOA CBSC ┆
0x0a0c6…0a0e6 20 11 00 1a 00 00 43 4b 45 59 46 55 4e 20 20 1b 00 1b 00 1a 43 53 45 4f 46 20 20 20 20 1b 00 1b ┆ CKEYFUN CSEOF ┆
0x0a0e6…0a106 00 7f 43 4d 55 4c 54 49 20 20 20 1c 00 1c 00 09 43 55 4e 4d 55 4c 54 49 20 1c 00 1c 00 77 43 00 ┆ CMULTI CUNMULTI wC ┆
0x0a106…0a126 00 00 00 00 00 00 00 c9 ff c9 ff 00 00 00 00 00 00 00 00 00 00 d3 ff d3 ff 00 00 00 00 00 00 00 ┆ ┆
0x0a126…0a145 00 00 00 dd ff dd ff 00 00 00 00 00 00 00 00 00 00 dd ff dd ff 00 00 00 00 00 00 1d 14 10 02 ┆ ┆
0x0a145…0a165 (5, 0, 27) 0d 66 7c 09 42 10 00 cd 30 00 c3 18 00 00 01 1e 00 20 00 00 00 00 00 43 48 4f 4f 53 45 20 20 02 ┆ fö B 0 CHOOSE ┆
0x0a165…0a185 00 02 00 00 43 4f 55 54 50 55 54 20 20 03 00 03 00 00 43 4b 46 49 4c 45 20 20 20 04 00 04 00 00 ┆ COUTPUT CKFILE ┆
0x0a185…0a1a5 43 43 4c 45 45 52 20 20 20 05 00 05 00 00 43 54 59 50 49 53 54 20 20 06 00 06 00 00 43 45 58 50 ┆CCLEER CTYPIST CEXP┆
0x0a1a5…0a1c5 20 20 20 20 20 07 00 0a 00 9c 44 4c 4e 20 20 20 20 20 20 0b 00 0e 00 ab 45 4c 4f 47 20 20 20 20 ┆ DLN ELOG ┆
0x0a1c5…0a1e5 20 0b 00 0e 00 ae 43 41 54 41 4e 20 20 20 20 0f 00 13 00 5d 45 43 4f 53 20 20 20 20 20 0f 00 13 ┆ CATAN ÅECOS ┆
0x0a1e5…0a205 00 ec 44 53 49 4e 20 20 20 20 20 0f 00 13 00 86 43 54 41 4e 20 20 20 20 20 0f 00 13 00 1b 45 41 ┆ DSIN CTAN EA┆
0x0a205…0a225 53 49 4e 20 20 20 20 14 00 18 00 3f 46 53 51 52 54 20 20 20 20 19 00 1a 00 33 43 42 53 43 20 20 ┆SIN ?FSQRT 3CBSC ┆
0x0a225…0a244 20 20 20 1b 00 24 00 00 43 4d 55 4c 54 49 20 20 20 25 00 27 00 09 43 55 4e 4d 55 4c 54 00 02 ┆ $ CMULTI % ' CUNMULT ┆
0x0a244…0a264 (5, 0, 28) 0d 6f 7c df 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ oö ┆
0x0a264…0a284 00 00 42 10 42 12 00 2a 12 42 22 73 7c 97 77 23 77 2a 10 42 cd d1 7e 11 75 7c 01 16 00 ed b0 3a ┆ B B * B"sö w#w* B ~ uö :┆
0x0a284…0a2a4 84 7c 5f 3e 80 07 1d c2 b0 7c 57 d3 0a db 0a 0f da aa 7c 7a d3 0a 3a 84 7c 32 a0 40 97 32 a1 40 ┆ ö_> öW öz : ö2 @ 2 @┆
0x0a2a4…0a2c4 2e ff cd c4 7e 21 00 04 db 09 2b 7d b4 c2 d3 7c db 0a e6 10 20 0a 3e 20 d3 0b 97 d3 0b c3 d0 7c ┆. ~! +å ö > ö┆
0x0a2c4…0a2e4 21 8b 7c db 0a e6 02 c2 f9 7c 36 4c 18 02 36 99 3a 87 7c be da 06 7d 7e 32 87 7c 3a 75 7c 3c c2 ┆! ö ö6L 6 : ö å~2 ö:uö< ┆
0x0a2e4…0a304 17 7d 2a 73 7c 3a 8b 7c 77 c3 c0 7e 3a 85 7c 57 21 a1 40 7e 72 fe fe d2 8c 7d 47 21 00 4d bc da ┆ å*sö: öw ~: öW! @~r åG! M ┆
0x0a304…0a324 33 7d ed 44 c6 99 47 2c 7a bc da 3f 7d ed 44 c6 99 57 cb fd 7d b7 ca 5d 7d fe 81 ca 5d 7d 3a a0 ┆3å D G,z ?å D W å Åå Åå: ┆
0x0a324…0a343 40 67 3e 00 dd d8 cc c1 b9 ae ab a7 a4 a1 9d 9a 96 92 89 82 7f 6f 64 58 52 49 41 39 36 2c 02 ┆@g> odXRIA96, ┆
0x0a343…0a363 (5, 0, 29) 0d 4e 7d e2 80 07 25 20 fc cb 85 b5 d3 0a 2e 05 cd c4 7e 78 92 47 ca 8c 7d 26 a0 0e 00 30 05 0e ┆ Nå % . ~x G å& 0 ┆
0x0a363…0a383 40 ed 44 47 79 b7 c2 7a 7d db 0a e6 10 c2 93 7d 3e 20 b1 d3 0b 79 d3 0b 2e ff cd c4 7e 05 c2 6e ┆@ DGy zå å> y . ~ n┆
0x0a383…0a3a3 7d 04 21 a1 40 56 c3 be 7d 01 40 03 c3 7a 7d 2a 75 7c e5 21 00 00 22 75 7c dd 21 75 7c cd 1e 08 ┆å ! @V å @ zå*uö ! "uö !uö ┆
0x0a3a3…0a3c3 dd 36 00 01 c4 1e 08 e1 22 75 7c 01 75 7c c2 69 7f c3 be 7d 21 8c 7c 36 07 dd 21 75 7c 21 8c 7c ┆ 6 "uö uö i å! ö6 !uö! ö┆
0x0a3c3…0a3e3 35 fa 69 7f db 0a e6 20 28 fa 2a 71 7c 7c b7 20 22 21 02 00 3e 80 d3 0b db 09 23 db 0a e6 20 db ┆5 i ( *qöö "! > # ┆
0x0a3e3…0a403 09 23 28 f4 7c fe 22 db 09 23 38 ec 11 6a ff 19 22 71 7c dd 5e 0e 16 00 cd 0f 00 21 eb ff 19 22 ┆ #( ö " #8 j "qö ^ ! "┆
0x0a403…0a423 6f 7c f3 3e 80 d3 0b dd 7e 10 47 16 00 d9 e6 03 07 07 3c 07 57 97 5f d3 09 1d 20 fb 15 f2 21 7e ┆oö > ~ G < W _ !~┆
0x0a423…0a442 d3 09 0e 0b 2e 80 00 df c1 b2 8c 83 7f 7c 76 73 70 6d 6a 5c 58 51 4e 48 40 3c 2f 28 18 12 02 ┆ . övspmjÖXQNH@</( ┆
0x0a442…0a462 (7, 0, 0) 44 43 4c 20 20 20 20 20 56 45 52 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL VERS ┆
0x0a462…0a482 20 46 49 58 45 44 20 28 38 29 20 49 4e 49 54 20 28 31 34 38 33 31 30 31 31 29 3b 20 20 20 20 20 ┆ FIXED (8) INIT (14831011); ┆
0x0a482…0a491 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0a491…0a4b1 (7, 0, 1) 2f 2a 20 20 20 20 20 20 50 52 4f 47 52 41 4d 2d 49 44 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆/* PROGRAM-ID. ┆
0x0a4b1…0a4d1 20 51 31 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ Q1. ┆
0x0a4d1…0a4e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0a4e0…0a500 (7, 0, 2) 20 20 20 20 20 20 20 20 44 41 54 45 2d 57 52 49 54 54 45 4e 2e 20 20 20 20 20 20 20 20 20 20 20 ┆ DATE-WRITTEN. ┆
0x0a500…0a520 20 37 38 2d 30 34 2d 30 35 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 78-04-05. ┆
0x0a520…0a52f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0a52f…0a54f (7, 0, 3) 20 20 20 20 20 20 20 20 53 59 53 54 45 4d 2d 44 45 53 49 47 4e 2e 20 20 20 20 20 20 20 20 20 20 ┆ SYSTEM-DESIGN. ┆
0x0a54f…0a56f 20 4f 4c 4c 45 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OLLE. ┆
0x0a56f…0a57e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0a57e…0a59e (7, 0, 4) 20 20 20 20 20 20 20 20 50 52 4f 47 52 41 4d 4d 45 52 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PROGRAMMER. ┆
0x0a59e…0a5be 20 4a 20 5d 53 54 52 41 4e 44 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J ÅSTRAND. ┆
0x0a5be…0a5cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0a5cd…0a5ed (7, 0, 5) 20 20 20 20 20 20 20 20 52 45 4d 41 52 4b 53 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ REMARKS. ┆
0x0a5ed…0a60d 20 50 52 4f 47 52 41 4d 4d 45 54 20 54 41 47 45 52 20 49 4e 20 52 55 42 52 49 4b 20 4f 43 48 20 ┆ PROGRAMMET TAGER IN RUBRIK OCH ┆
0x0a60d…0a61c 42 4f 4b 46 5c 52 49 4e 47 53 44 41 54 55 4d ┆BOKFÖRINGSDATUM┆
0x0a61c…0a63c (7, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0a63c…0a65c 20 52 55 54 49 4e 56 41 4c 20 53 4b 45 52 20 49 20 54 56 5d 20 53 54 45 47 2c 20 48 55 56 55 44 ┆ RUTINVAL SKER I TVÅ STEG, HUVUD┆
0x0a65c…0a66b 2d 20 4f 43 48 20 55 4e 44 45 52 20 20 20 20 ┆- OCH UNDER ┆
0x0a66b…0a68b (7, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0a68b…0a6ab 20 4d 45 4e 59 2e 20 55 54 48 4f 50 50 20 53 4b 45 52 20 54 49 4c 4c 20 56 41 4c 54 20 52 55 54 ┆ MENY. UTHOPP SKER TILL VALT RUT┆
0x0a6ab…0a6ba 49 4e 50 52 4f 47 52 41 4d 2e 20 20 20 20 20 ┆INPROGRAM. ┆
0x0a6ba…0a6da (7, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0a6da…0a6fa 20 46 5c 52 45 54 41 47 53 2d 20 4f 43 48 20 4f 50 45 52 41 54 5c 52 53 4b 4f 44 45 52 20 47 49 ┆ FÖRETAGS- OCH OPERATÖRSKODER GI┆
0x0a6fa…0a709 56 45 53 20 48 5b 52 20 4f 43 48 20 20 20 20 ┆VES HÄR OCH ┆
0x0a709…0a729 (7, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0a729…0a749 20 4c 41 47 52 41 53 20 52 45 53 49 44 45 4e 54 20 49 20 4d 49 4e 4e 45 54 20 46 5c 52 20 54 45 ┆ LAGRAS RESIDENT I MINNET FÖR TE┆
0x0a749…0a758 53 54 20 49 20 56 41 52 4a 45 20 20 20 20 20 ┆ST I VARJE ┆
0x0a758…0a778 (7, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0a778…0a798 20 44 45 4c 50 52 4f 47 52 41 4d 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DELPROGRAM. ┆
0x0a798…0a7a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0a7a7…0a7f6 (7, 0, 11) 0x20[0x4f]
[…0x6…]
0x0a9d0…0a9f0 (7, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
[…0x1…]
0x0aa10…0aa1f 20 20 20 20 20 20 20 20 20 20 2a 2f 20 20 20 ┆ */ ┆
0x0aa1f…0aa6e (7, 0, 19) 0x20[0x4f]
0x0aa6e…0aa8e (7, 0, 20) 44 43 4c 20 31 20 20 20 48 4a 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 HJSTR, ┆
0x0aa8e…0aaae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0aaae…0aabd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0aabd…0aadd (7, 0, 21) 20 20 20 20 20 20 20 20 32 20 20 20 56 4e 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 VNR ┆
0x0aadd…0aafd 20 46 49 58 45 44 28 37 29 2c 20 20 20 2f 2a 20 53 49 53 54 41 20 46 41 4b 54 55 52 41 4e 52 20 ┆ FIXED(7), /* SISTA FAKTURANR ┆
0x0aafd…0ab0c 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆*/ ┆
0x0ab0c…0ab2c (7, 0, 22) 20 20 20 20 20 20 20 20 32 20 20 20 56 56 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 VVR ┆
0x0ab2c…0ab4c 20 46 49 58 45 44 28 37 29 2c 20 20 20 2f 2a 20 53 49 53 54 41 20 4f 52 44 45 52 4e 52 20 2a 2f ┆ FIXED(7), /* SISTA ORDERNR */┆
0x0ab4c…0ab5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ab5b…0ab7b (7, 0, 23) 20 20 20 20 20 20 20 20 32 20 20 20 4c 55 46 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 LUFT ┆
0x0ab7b…0ab9b 20 43 48 41 52 28 35 32 29 3b 20 20 2f 2a 20 45 4a 20 41 4e 56 5b 4e 44 20 41 52 45 41 20 2a 2f ┆ CHAR(52); /* EJ ANVÄND AREA */┆
0x0ab9b…0abaa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0abaa…0abf9 (7, 0, 24) 0x20[0x4f]
0x0abf9…0ac19 (7, 0, 25) 20 20 20 20 2f 2a 20 20 36 30 20 42 59 54 45 53 20 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 60 BYTES */ ┆
0x0ac19…0ac39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ac39…0ac48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ac48…0ac97 (7, 0, 26) 0x20[0x4f]
0x0ac97…0acb7 (7, 0, 27) 44 43 4c 20 31 20 20 20 4b 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 KSTR, ┆
0x0acb7…0acd7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0acd7…0ace6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ace6…0ad06 (7, 0, 28) 20 20 20 20 20 20 20 20 32 20 20 20 47 45 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 GEN ┆
0x0ad06…0ad26 20 43 48 41 52 28 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR(4), ┆
0x0ad26…0ad35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ad35…0ad55 (7, 0, 29) 20 20 20 20 20 20 20 20 32 20 20 20 54 56 45 43 4b 54 4f 52 20 28 31 32 29 20 20 20 20 20 20 20 ┆ 2 TVECKTOR (12) ┆
0x0ad55…0ad75 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY, ┆
0x0ad75…0ad84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ad84…0ada4 (7, 0, 30) 20 20 20 20 20 20 20 20 32 20 20 20 41 4e 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 ANM ┆
0x0ada4…0adc4 20 43 48 41 52 28 33 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR(32); ┆
0x0adc4…0add3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0add3…0ae22 (7, 0, 31) 0x20[0x4f]
0x0ae22…0ae42 (7, 0, 32) 20 20 20 20 2f 2a 20 20 36 30 20 42 59 54 45 53 20 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 60 BYTES */ ┆
0x0ae42…0ae62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ae62…0ae71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ae71…0aec0 (7, 0, 33) 0x20[0x4f]
[…0x1…]
0x0af0f…0af2f (7, 0, 35) 2f 2a 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆/*++++++++++++++++++++++++++++++┆
0x0af2f…0af4f 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆++++++++++++++++++++++++++++++++┆
0x0af4f…0af5e 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆+++++++++++++++┆
0x0af5e…0af7e (7, 0, 36) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x0af7e…0af9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0af9e…0afad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0afad…0afcd (7, 0, 37) 2b 20 20 20 20 20 20 20 4f 42 53 45 52 56 45 52 41 20 41 54 54 20 58 2d 20 4f 43 48 20 59 2d 4b ┆+ OBSERVERA ATT X- OCH Y-K┆
0x0afcd…0afed 4f 4f 52 44 49 4e 41 54 45 52 4e 41 20 48 41 52 20 4f 4d 56 5b 4e 44 41 20 42 45 54 59 44 45 4c ┆OORDINATERNA HAR OMVÄNDA BETYDEL┆
0x0afed…0affc 53 45 52 20 4a 5b 4d 46 5c 52 54 20 20 20 20 ┆SER JÄMFÖRT ┆
0x0affc…0b01c (7, 0, 38) 2b 20 20 20 20 20 20 20 4d 45 44 20 56 45 44 45 52 54 41 47 4e 41 20 4b 4f 4f 52 44 49 4e 41 54 ┆+ MED VEDERTAGNA KOORDINAT┆
0x0b01c…0b03c 53 59 53 54 45 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SYSTEM ┆
0x0b03c…0b04b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b04b…0b06b (7, 0, 39) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x0b06b…0b08b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b08b…0b09a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b09a…0b0ba (7, 0, 40) 2b 20 20 20 20 20 20 20 50 72 69 6e 63 69 70 65 6e 20 66 7c 72 20 4d 54 41 42 20 6f 63 68 20 4c ┆+ Principen för MTAB och L┆
0x0b0ba…0b0da 54 41 42 20 7b 72 20 66 7c 6c 6a 61 6e 64 65 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TAB är följande: ┆
0x0b0da…0b0e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b0e9…0b109 (7, 0, 41) 2b 20 20 20 20 20 20 20 4d 54 41 42 20 68 61 72 20 31 32 20 2a 20 31 33 20 6b 6f 6f 72 64 69 6e ┆+ MTAB har 12 * 13 koordin┆
0x0b109…0b129 61 74 65 72 20 6d 65 64 61 6e 20 4c 54 41 42 20 68 61 72 20 31 32 20 2a 20 31 32 2e 20 49 20 4d ┆ater medan LTAB har 12 * 12. I M┆
0x0b129…0b138 54 41 42 20 7b 72 20 64 65 6e 20 20 20 20 20 ┆TAB är den ┆
0x0b138…0b158 (7, 0, 42) 2b 20 20 20 20 20 20 20 66 7c 72 73 74 61 20 68 6f 72 69 73 6f 6e 74 65 6c 6c 61 20 72 61 64 65 ┆+ första horisontella rade┆
0x0b158…0b178 6e 2c 20 58 20 3d 20 30 20 6f 63 68 20 59 20 3d 20 31 20 2d 20 31 32 2e 20 48 7b 72 20 66 69 6e ┆n, X = 0 och Y = 1 - 12. Här fin┆
0x0b178…0b187 6e 73 20 73 69 66 66 72 6f 72 20 20 20 20 20 ┆ns siffror ┆
0x0b187…0b1a7 (7, 0, 43) 2b 20 20 20 20 20 20 20 69 6e 66 7c 72 64 61 20 73 6f 6d 20 6d 6f 74 73 76 61 72 61 72 20 64 65 ┆+ införda som motsvarar de┆
0x0b1a7…0b1c7 20 74 65 78 74 65 72 20 73 6f 6d 20 66 69 6e 6e 73 20 69 20 68 75 76 75 64 6d 65 6e 79 6e 2e 20 ┆ texter som finns i huvudmenyn. ┆
0x0b1c7…0b1d6 54 65 78 74 65 6e 20 68 69 74 74 61 73 20 20 ┆Texten hittas ┆
0x0b1d6…0b1f6 (7, 0, 44) 2b 20 20 20 20 20 20 20 69 20 74 61 62 65 6c 6c 65 6e 20 4d 54 45 58 20 64 7b 72 20 73 69 66 66 ┆+ i tabellen MTEX där siff┆
0x0b1f6…0b216 72 6f 72 6e 61 20 69 20 4d 54 41 42 20 75 74 67 7c 72 20 69 6e 64 65 78 20 74 69 6c 6c 20 74 61 ┆rorna i MTAB utgör index till ta┆
0x0b216…0b225 62 65 6c 6c 73 74 65 67 65 6e 20 20 20 20 20 ┆bellstegen ┆
0x0b225…0b245 (7, 0, 45) 2b 20 20 20 20 20 20 20 69 20 4d 54 45 58 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ i MTEX. ┆
0x0b245…0b265 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b265…0b274 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b274…0b294 (7, 0, 46) 2b 20 20 20 20 20 20 20 4f 6d 20 75 6e 64 65 72 6d 65 6e 79 20 66 69 6e 6e 73 20 7d 74 65 72 66 ┆+ Om undermeny finns återf┆
0x0b294…0b2b4 69 6e 6e 73 20 6f 63 6b 73 7d 20 64 65 72 61 73 20 69 6e 64 65 78 73 69 66 66 72 6f 72 20 69 20 ┆inns också deras indexsiffror i ┆
0x0b2b4…0b2c3 4d 54 41 42 2e 20 56 61 72 6a 65 20 20 20 20 ┆MTAB. Varje ┆
0x0b2c3…0b2e3 (7, 0, 47) 2b 20 20 20 20 20 20 20 59 2d 6b 6f 6f 72 64 69 6e 61 74 20 69 20 58 20 3d 20 30 2d 72 61 64 65 ┆+ Y-koordinat i X = 0-rade┆
0x0b2e3…0b303 6e 20 68 61 72 20 73 69 6e 20 65 67 65 6e 20 72 61 64 20 6d 65 64 20 69 6e 64 65 78 73 69 66 66 ┆n har sin egen rad med indexsiff┆
0x0b303…0b312 72 6f 72 20 66 7c 72 20 20 20 20 20 20 20 20 ┆ror för ┆
0x0b312…0b332 (7, 0, 48) 2b 20 20 20 20 20 20 20 75 6e 64 65 72 6d 65 6e 79 74 65 78 74 65 72 6e 61 20 69 20 64 65 20 75 ┆+ undermenytexterna i de u┆
0x0b332…0b352 6e 64 65 72 6c 69 67 67 61 6e 64 65 20 59 2d 72 61 64 65 72 6e 61 2e 20 53 7d 20 6f 6d 20 74 2e ┆nderliggande Y-raderna. Så om t.┆
0x0b352…0b361 20 65 78 2e 20 6b 6f 6f 72 64 69 6e 61 2d 20 ┆ ex. koordina- ┆
0x0b361…0b381 (7, 0, 49) 2b 20 20 20 20 20 20 20 74 65 6e 20 30 2c 35 20 68 61 72 20 75 6e 64 65 72 6d 65 6e 79 20 7d 74 ┆+ ten 0,5 har undermeny åt┆
0x0b381…0b3a1 65 72 66 69 6e 6e 73 20 75 6e 64 65 72 6d 65 6e 79 6e 73 20 69 6e 64 65 78 73 69 66 66 72 6f 72 ┆erfinns undermenyns indexsiffror┆
0x0b3a1…0b3b0 20 69 20 6b 6f 6f 72 64 69 6e 61 74 65 72 6e ┆ i koordinatern┆
0x0b3b0…0b3d0 (7, 0, 50) 2b 20 20 20 20 20 20 20 35 2c 31 20 35 2c 32 20 35 2c 33 20 6f 73 76 2e 20 20 20 20 20 20 20 20 ┆+ 5,1 5,2 5,3 osv. ┆
0x0b3d0…0b3f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b3f0…0b3ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b3ff…0b41f (7, 0, 51) 2b 20 20 20 20 20 20 20 50 7d 20 73 61 6d 6d 61 20 73 7b 74 74 20 68 61 72 20 4c 54 41 42 20 73 ┆+ På samma sätt har LTAB s┆
0x0b41f…0b43f 69 6e 61 20 58 2d 20 6f 63 68 20 59 2d 6b 6f 6f 72 64 69 6e 61 74 65 72 20 6f 72 64 6e 61 64 65 ┆ina X- och Y-koordinater ordnade┆
0x0b43f…0b44e 20 75 74 6f 6d 20 61 74 74 20 20 20 20 20 20 ┆ utom att ┆
0x0b44e…0b46e (7, 0, 52) 2b 20 20 20 20 20 20 20 72 61 64 65 6e 20 58 20 3d 20 30 20 73 61 6b 6e 61 73 2e 20 20 20 20 20 ┆+ raden X = 0 saknas. ┆
0x0b46e…0b48e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b48e…0b49d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b49d…0b4bd (7, 0, 53) 2b 20 20 20 20 20 20 20 50 7d 20 64 65 74 74 61 20 73 7b 74 74 20 6b 61 6e 20 65 6e 20 6b 6f 6f ┆+ På detta sätt kan en koo┆
0x0b4bd…0b4dd 72 64 69 6e 61 74 20 69 20 4d 54 41 42 20 6d 6f 74 73 76 61 72 61 73 20 61 76 20 73 61 6d 6d 61 ┆rdinat i MTAB motsvaras av samma┆
0x0b4dd…0b4ec 20 6b 6f 6f 72 64 69 6e 61 74 20 69 20 20 20 ┆ koordinat i ┆
0x0b4ec…0b50c (7, 0, 54) 2b 20 20 20 20 20 20 20 4c 54 41 42 2e 20 49 20 4c 54 41 42 20 73 74 7d 72 20 64 65 74 20 69 6e ┆+ LTAB. I LTAB står det in┆
0x0b50c…0b52c 64 65 78 20 73 6f 6d 20 70 61 73 73 61 72 20 74 69 6c 6c 20 74 61 62 65 6c 6c 65 6e 20 4c 54 45 ┆dex som passar till tabellen LTE┆
0x0b52c…0b53b 58 2e 20 44 65 74 74 61 20 69 6e 64 65 78 20 ┆X. Detta index ┆
0x0b53b…0b55b (7, 0, 55) 2b 20 20 20 20 20 20 20 70 65 6b 61 72 20 75 74 20 64 65 74 20 70 72 6f 67 72 61 6d 20 73 6f 6d ┆+ pekar ut det program som┆
0x0b55b…0b57b 20 73 6b 61 6c 6c 20 6c 61 64 64 61 73 20 6d 65 64 20 68 7b 6e 73 79 6e 20 74 69 6c 6c 20 64 65 ┆ skall laddas med hänsyn till de┆
0x0b57b…0b58a 74 20 76 61 6c 20 73 6f 6d 20 20 20 20 20 20 ┆t val som ┆
0x0b58a…0b5aa (7, 0, 56) 2b 20 20 20 20 20 20 20 67 6a 6f 72 74 73 20 69 20 6d 65 6e 79 65 72 6e 61 2e 20 4f 6d 20 69 6e ┆+ gjorts i menyerna. Om in┆
0x0b5aa…0b5ca 74 65 20 64 65 74 74 61 20 62 65 67 72 65 70 70 20 7b 72 20 38 20 70 6f 73 20 6c 7d 6e 67 74 20 ┆te detta begrepp är 8 pos långt ┆
0x0b5ca…0b5d9 6c 61 64 64 61 73 20 20 20 20 20 20 20 20 20 ┆laddas ┆
0x0b5d9…0b5f9 (7, 0, 57) 2b 20 20 20 20 20 20 20 69 73 74 7b 6c 6c 65 74 20 65 6e 20 73 74 72 7b 6e 67 20 6f 6d 20 32 35 ┆+ istället en sträng om 25┆
0x0b5f9…0b619 20 70 6f 73 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ pos. ┆
0x0b619…0b628 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b628…0b648 (7, 0, 58) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x0b648…0b668 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b668…0b677 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b677…0b697 (7, 0, 59) 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆++++++++++++++++++++++++++++++++┆
[…0x1…]
0x0b6b7…0b6c6 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2a 2f ┆+++++++++++++*/┆
0x0b6c6…0b715 (7, 0, 60) 0x20[0x4f]
[…0x1…]
0x0b764…0b784 (7, 0, 62) 44 43 4c 20 20 20 20 20 4d 54 45 58 20 28 33 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL MTEX (30) ┆
0x0b784…0b7a4 20 43 48 41 52 28 34 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 45 58 54 45 52 20 49 ┆ CHAR(45), /* TEXTER I┆
0x0b7a4…0b7b3 20 4d 45 4e 59 45 52 4e 41 20 2a 2f 20 20 20 ┆ MENYERNA */ ┆
0x0b7b3…0b802 (7, 0, 63) 0x20[0x4f]
[…0x1…]
0x0b851…0b871 (7, 0, 65) 20 20 20 20 20 20 20 20 4d 54 41 42 20 28 30 3a 31 32 2c 31 32 29 20 20 20 20 20 20 20 20 20 20 ┆ MTAB (0:12,12) ┆
0x0b871…0b891 20 42 49 4e 41 52 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4d 45 4e 59 54 ┆ BINARY /* MENYT┆
0x0b891…0b8a0 45 58 54 20 50 45 4b 41 52 45 20 2a 2f 20 20 ┆EXT PEKARE */ ┆
0x0b8a0…0b8c0 (7, 0, 66) 20 20 20 20 49 4e 49 54 28 20 33 2c 20 34 2c 31 32 2c 32 32 2c 20 38 2c 20 31 2c 20 32 2c 20 30 ┆ INIT( 3, 4,12,22, 8, 1, 2, 0┆
0x0b8c0…0b8e0 2c 20 30 2c 20 31 2c 20 30 2c 20 30 2c 20 20 2f 2a 20 56 5b 52 44 45 54 20 50 45 4b 41 52 20 50 ┆, 0, 1, 0, 0, /* VÄRDET PEKAR P┆
0x0b8e0…0b8ef 5d 20 54 41 42 45 4c 4c 2d 20 20 20 20 2a 2f ┆Å TABELL- */┆
0x0b8ef…0b90f (7, 0, 67) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0b90f…0b92f 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 2f 2a 20 53 54 45 47 45 54 20 50 5d 20 53 49 44 20 ┆, 0, 0, 0, 0, /* STEGET PÅ SID ┆
0x0b92f…0b93e 34 2e 20 20 20 20 20 20 20 20 20 20 20 2a 2f ┆4. */┆
0x0b93e…0b95e (7, 0, 68) 20 20 20 20 20 20 20 20 20 20 35 2c 20 36 2c 20 37 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 5, 6, 7, 0, 0, 0, 0, 0┆
0x0b95e…0b97e 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0b97e…0b98d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b98d…0b9ad (7, 0, 69) 20 20 20 20 20 20 20 20 20 31 33 2c 31 34 2c 31 35 2c 31 36 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 13,14,15,16, 0, 0, 0, 0┆
0x0b9ad…0b9cd 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0b9cd…0b9dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0b9dc…0b9fc (7, 0, 70) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0b9fc…0ba1c 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0ba1c…0ba2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ba2b…0ba4b (7, 0, 71) 20 20 20 20 20 20 20 20 20 20 39 2c 31 30 2c 31 31 2c 31 37 2c 31 38 2c 31 39 2c 32 30 2c 32 31 ┆ 9,10,11,17,18,19,20,21┆
0x0ba4b…0ba6b 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0ba6b…0ba7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ba7a…0ba9a (7, 0, 72) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0ba9a…0baba 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0baba…0bac9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0bac9…0bae9 (7, 0, 73) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0bae9…0bb09 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0bb09…0bb18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0bb18…0bb38 (7, 0, 74) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0bb38…0bb58 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0bb58…0bb67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0bb67…0bb87 (7, 0, 75) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0bb87…0bba7 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0bba7…0bbb6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0bbb6…0bbd6 (7, 0, 76) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0bbd6…0bbf6 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0bbf6…0bc05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0bc05…0bc25 (7, 0, 77) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0bc25…0bc45 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0bc45…0bc54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0bc54…0bc74 (7, 0, 78) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0bc74…0bc94 2c 20 30 2c 20 30 2c 20 30 2c 20 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0), ┆
0x0bc94…0bca3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0bca3…0bcf2 (7, 0, 79) 0x20[0x4f]
[…0x1…]
0x0bd41…0bd61 (7, 0, 81) 20 20 20 20 20 20 20 20 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ S ┆
0x0bd61…0bd81 20 43 48 41 52 28 31 29 2c 20 2f 2a 20 53 4f 52 54 46 4c 41 47 47 41 20 4e 20 3d 20 49 4e 47 45 ┆ CHAR(1), /* SORTFLAGGA N = INGE┆
0x0bd81…0bd90 4e 20 53 4f 52 54 45 52 49 4e 47 2a 2f 20 20 ┆N SORTERING*/ ┆
0x0bd90…0bdb0 (8, 0, 0) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 31 35 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ LTEX (15) ┆
0x0bdb0…0bdd0 20 43 48 41 52 28 32 35 29 2c 20 2f 2a 20 54 45 58 54 53 54 52 5b 4e 47 20 49 20 43 41 4c 4c 20 ┆ CHAR(25), /* TEXTSTRÄNG I CALL ┆
0x0bdd0…0bddf 4c 4f 41 44 20 53 54 59 52 20 20 20 20 20 20 ┆LOAD STYR ┆
0x0bddf…0bdff (8, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0bdff…0be1f 53 4f 52 54 20 4f 43 48 20 48 4f 50 50 20 54 49 4c 4c 20 4c 5b 4d 50 4c 49 47 54 20 50 52 4f 47 ┆SORT OCH HOPP TILL LÄMPLIGT PROG┆
0x0be1f…0be2e 52 41 4d 20 2a 2f 20 20 20 20 20 20 20 20 20 ┆RAM */ ┆
0x0be2e…0be4e (8, 0, 2) 20 20 20 20 20 20 20 20 4c 54 41 42 20 28 31 32 2c 31 32 29 20 20 20 20 20 20 20 20 20 20 20 20 ┆ LTAB (12,12) ┆
0x0be4e…0be6e 20 42 49 4e 41 52 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 4f 41 44 54 45 ┆ BINARY /* LOADTE┆
0x0be6e…0be7d 58 54 20 50 45 4b 41 52 45 20 2a 2f 20 20 20 ┆XT PEKARE */ ┆
0x0be7d…0be9d (8, 0, 3) 20 20 20 20 49 4e 49 54 28 20 32 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ INIT( 2, 0, 0, 0, 0, 0, 0, 0┆
0x0be9d…0bebd 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 2f 2a 20 56 5b 52 44 45 54 20 50 45 4b 41 52 20 50 ┆, 0, 0, 0, 0, /* VÄRDET PEKAR P┆
0x0bebd…0becc 5d 20 44 45 54 20 54 41 42 45 4c 4c 2d 2a 2f ┆Å DET TABELL-*/┆
0x0becc…0beec (8, 0, 4) 20 20 20 20 20 20 20 20 20 20 33 2c 20 33 2c 20 33 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 3, 3, 3, 0, 0, 0, 0, 0┆
0x0beec…0bf0c 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 2f 2a 20 53 54 45 47 20 49 20 56 49 4c 4b 45 54 20 ┆, 0, 0, 0, 0, /* STEG I VILKET ┆
0x0bf0c…0bf1b 50 52 4f 47 52 41 4d 4d 45 54 20 2a 2f 20 20 ┆PROGRAMMET */ ┆
0x0bf1b…0bf3b (8, 0, 5) 20 20 20 20 20 20 20 20 20 20 35 2c 20 36 2c 20 37 2c 20 35 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 5, 6, 7, 5, 0, 0, 0, 0┆
0x0bf3b…0bf5b 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 2f 2a 20 46 49 4e 4e 53 20 50 5d 20 44 45 54 20 50 ┆, 0, 0, 0, 0, /* FINNS PÅ DET P┆
0x0bf5b…0bf6a 52 4f 47 52 41 4d 20 53 4f 4d 20 2a 2f 20 20 ┆ROGRAM SOM */ ┆
0x0bf6a…0bf8a (8, 0, 6) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0bf8a…0bfaa 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 2f 2a 20 53 4b 41 4c 4c 20 4c 41 44 44 41 53 20 20 ┆, 0, 0, 0, 0, /* SKALL LADDAS ┆
0x0bfaa…0bfb9 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2f ┆ */┆
0x0bfb9…0bfd9 (8, 0, 7) 20 20 20 20 20 20 20 20 20 20 34 2c 20 34 2c 20 34 2c 31 31 2c 20 38 2c 20 39 2c 31 30 2c 31 30 ┆ 4, 4, 4,11, 8, 9,10,10┆
0x0bfd9…0bff9 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0bff9…0c008 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c008…0c028 (8, 0, 8) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0c028…0c048 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0c048…0c057 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c057…0c077 (8, 0, 9) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0c077…0c097 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0c097…0c0a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c0a6…0c0c6 (8, 0, 10) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0c0c6…0c0e6 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0c0e6…0c0f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c0f5…0c115 (8, 0, 11) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0c115…0c135 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0c135…0c144 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c144…0c164 (8, 0, 12) 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 1, 0, 0, 0, 0, 0, 0, 0┆
0x0c164…0c184 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0c184…0c193 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c193…0c1b3 (8, 0, 13) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0c1b3…0c1d3 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0, ┆
0x0c1d3…0c1e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c1e2…0c202 (8, 0, 14) 20 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 ┆ 0, 0, 0, 0, 0, 0, 0, 0┆
0x0c202…0c222 2c 20 30 2c 20 30 2c 20 30 2c 20 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, 0, 0, 0, 0), ┆
0x0c222…0c231 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c231…0c280 (8, 0, 15) 0x20[0x4f]
[…0x1…]
0x0c2cf…0c2ef (8, 0, 17) 20 20 20 20 20 20 20 20 58 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ XX ┆
0x0c2ef…0c30f 20 43 48 41 52 28 32 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 4f ┆ CHAR(25), /* TO┆
0x0c30f…0c31e 4d 20 53 54 52 5b 4e 47 20 2a 2f 20 20 20 20 ┆M STRÄNG */ ┆
0x0c31e…0c33e (8, 0, 18) 20 20 20 20 20 20 20 20 49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I ┆
0x0c33e…0c35e 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 49 ┆ BINARY, /* I┆
0x0c35e…0c36d 4e 44 45 58 52 45 47 20 2a 2f 20 20 20 20 20 ┆NDEXREG */ ┆
0x0c36d…0c38d (8, 0, 19) 20 20 20 20 20 20 20 20 53 56 41 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SVAR ┆
0x0c38d…0c3ad 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 53 56 41 52 53 ┆ CHAR(1), /* SVARS┆
0x0c3ad…0c3bc 56 41 52 49 41 42 45 4c 20 2a 2f 20 20 20 20 ┆VARIABEL */ ┆
0x0c3bc…0c3dc (8, 0, 20) 20 20 20 20 20 20 20 20 54 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T1 ┆
0x0c3dc…0c3fc 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR(1), ┆
0x0c3fc…0c40b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c40b…0c42b (8, 0, 21) 20 20 20 20 20 20 20 20 54 38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T8 ┆
0x0c42b…0c44b 20 43 48 41 52 20 28 38 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (8), ┆
0x0c44b…0c45a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c45a…0c47a (8, 0, 22) 20 20 20 20 20 20 20 20 4b 46 49 4c 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KFIL FILE, ┆
0x0c47a…0c49a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c49a…0c4a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c4a9…0c4c9 (8, 0, 23) 20 20 20 20 20 20 20 20 4b 36 30 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K60 FILE, ┆
0x0c4c9…0c4e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c4e9…0c4f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c4f8…0c518 (8, 0, 24) 20 20 20 20 20 20 20 20 4b 36 31 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K61 FILE, ┆
0x0c518…0c538 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c538…0c547 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c547…0c567 (8, 0, 25) 20 20 20 20 20 20 20 20 4b 37 30 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K70 FILE, ┆
0x0c567…0c587 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c587…0c596 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c596…0c5b6 (8, 0, 26) 20 20 20 20 20 20 20 20 4b 37 31 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K71 FILE, ┆
0x0c5b6…0c5d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c5d6…0c5e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c5e5…0c605 (8, 0, 27) 20 20 20 20 20 20 20 20 4b 38 30 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K80 FILE, ┆
0x0c605…0c625 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c625…0c634 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c634…0c654 (8, 0, 28) 20 20 20 20 20 20 20 20 4b 38 31 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K81 FILE, ┆
0x0c654…0c674 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c674…0c683 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c683…0c6a3 (8, 0, 29) 20 20 20 20 20 20 20 20 4b 39 30 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K90 FILE, ┆
0x0c6a3…0c6c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c6c3…0c6d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c6d2…0c6f2 (8, 0, 30) 20 20 20 20 20 20 20 20 4b 39 31 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K91 FILE, ┆
0x0c6f2…0c712 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c712…0c721 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c721…0c741 (8, 0, 31) 20 20 20 20 20 20 20 20 4f 4e 52 43 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ONRCH ┆
0x0c741…0c761 20 43 48 41 52 20 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (6), ┆
0x0c761…0c770 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c770…0c790 (8, 0, 32) 20 20 20 20 20 20 20 20 52 4e 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RNR ┆
0x0c790…0c7b0 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY, ┆
0x0c7b0…0c7bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c7bf…0c7df (8, 0, 33) 20 20 20 20 20 20 20 20 4f 4e 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ONR ┆
0x0c7df…0c7ff 20 43 48 41 52 20 28 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (4), ┆
0x0c7ff…0c80e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c80e…0c82e (8, 0, 34) 20 20 20 20 20 20 20 20 44 41 54 55 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM ┆
0x0c82e…0c84e 20 43 48 41 52 20 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (6), ┆
0x0c84e…0c85d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c85d…0c87d (8, 0, 35) 20 20 20 20 20 20 20 20 52 41 44 41 4e 54 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RADANTX ┆
0x0c87d…0c89d 20 43 48 41 52 20 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (2), ┆
0x0c89d…0c8ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c8ac…0c8cc (8, 0, 36) 20 20 20 20 20 20 20 20 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ P POINTER, ┆
0x0c8cc…0c8ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c8ec…0c8fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c8fb…0c91b (8, 0, 37) 20 20 20 20 20 20 20 20 44 20 42 41 53 45 44 20 28 50 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D BASED (P) ┆
0x0c91b…0c93b 20 43 48 41 52 20 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (6), ┆
0x0c93b…0c94a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c94a…0c96a (8, 0, 38) 20 20 20 20 20 20 20 20 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PP POINTER, ┆
0x0c96a…0c98a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c98a…0c999 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c999…0c9b9 (8, 0, 39) 20 20 20 20 20 20 20 20 31 20 20 20 53 54 52 20 42 41 53 45 44 20 28 50 50 29 2c 20 20 20 20 20 ┆ 1 STR BASED (PP), ┆
0x0c9b9…0c9d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c9d9…0c9e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0c9e8…0ca08 (8, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 20 32 20 20 20 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 X ┆
0x0ca08…0ca28 20 43 48 41 52 20 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (2), ┆
0x0ca28…0ca37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ca37…0ca57 (8, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 20 32 20 20 20 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 Y ┆
0x0ca57…0ca77 20 43 48 41 52 20 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (2), ┆
0x0ca77…0ca86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ca86…0caa6 (8, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 20 32 20 20 20 46 49 52 4d 41 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIRMA ┆
0x0caa6…0cac6 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR(1), ┆
0x0cac6…0cad5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cad5…0caf5 (8, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 20 32 20 20 20 4f 50 5f 4b 4f 44 20 20 20 20 20 20 20 20 20 20 ┆ 2 OP_KOD ┆
0x0caf5…0cb15 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY, ┆
0x0cb15…0cb24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cb24…0cb44 (8, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 20 32 20 20 20 52 41 44 41 4e 54 20 20 20 20 20 20 20 20 20 20 ┆ 2 RADANT ┆
0x0cb44…0cb64 20 42 49 4e 41 52 59 20 49 4e 49 54 20 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY INIT (1), ┆
0x0cb64…0cb73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cb73…0cb93 (8, 0, 45) 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 27 20 20 51 31 20 ┆ VERSION CHAR(47) INIT(' Q1 ┆
0x0cb93…0cbb3 56 65 72 73 69 6f 6e 20 31 2e 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆Version 1.5 ┆
0x0cbb3…0cbc2 20 20 20 20 38 34 31 31 30 32 27 29 3b 20 20 ┆ 841102'); ┆
0x0cbc2…0cc11 (8, 0, 46) 0x20[0x4f]
[…0x1…]
0x0cc60…0cc80 (8, 0, 48) 54 45 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TEST:PROC; ┆
0x0cc80…0cca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cca0…0ccaf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ccaf…0cccf (8, 0, 49) 44 43 4c 20 20 20 20 20 50 54 45 53 54 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 ┆DCL PTEST POINTER, ┆
0x0cccf…0ccef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ccef…0ccfe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ccfe…0cd1e (8, 0, 50) 20 20 20 20 20 20 20 20 43 48 20 42 41 53 45 44 20 28 50 54 45 53 54 29 20 20 20 20 20 20 20 20 ┆ CH BASED (PTEST) ┆
0x0cd1e…0cd3e 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR(1), ┆
0x0cd3e…0cd4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cd4d…0cd6d (8, 0, 51) 20 20 20 20 20 20 20 20 50 54 41 4e 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ PTAN POINTER, ┆
0x0cd6d…0cd8d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cd8d…0cd9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cd9c…0cdbc (8, 0, 52) 20 20 20 20 20 20 20 20 43 48 31 20 42 41 53 45 44 20 28 50 54 41 4e 29 20 20 20 20 20 20 20 20 ┆ CH1 BASED (PTAN) ┆
0x0cdbc…0cddc 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR(1), ┆
0x0cddc…0cdeb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cdeb…0ce0b (8, 0, 53) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTAL ┆
0x0ce0b…0ce2b 20 42 49 4e 41 52 59 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY; ┆
0x0ce2b…0ce3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ce3a…0ce89 (8, 0, 54) 0x20[0x4f]
0x0ce89…0cea9 (8, 0, 55) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTAL = 0; ┆
0x0cea9…0cec9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cec9…0ced8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ced8…0cef8 (8, 0, 56) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 20 28 50 54 45 53 54 29 20 3d 20 31 36 35 33 33 3b 20 ┆ UNSPEC (PTEST) = 16533; ┆
0x0cef8…0cf18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cf18…0cf27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cf27…0cf47 (8, 0, 57) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 20 28 50 54 41 4e 29 20 3d 20 31 36 35 33 36 3b 20 20 ┆ UNSPEC (PTAN) = 16536; ┆
0x0cf47…0cf67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cf67…0cf76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cf76…0cf96 (8, 0, 58) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 3b 20 20 20 20 20 20 ┆ PUT FILE (D) SKIP; ┆
0x0cf96…0cfb6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cfb6…0cfc5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0cfc5…0cfe5 (8, 0, 59) 52 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R10: ┆
0x0cfe5…0d005 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d005…0d014 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d014…0d034 (8, 0, 60) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 20 20 56 45 4d 20 ┆ PUT FILE(D) EDIT(' VEM ┆
0x0d034…0d054 5b 52 20 4f 50 45 52 41 54 5c 52 3a 27 29 28 41 28 34 31 29 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ÄR OPERATÖR:')(A(41)); ┆
0x0d054…0d063 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d063…0d083 (8, 0, 61) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x0d083…0d0a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d0a3…0d0b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d0b2…0d0d2 (8, 0, 62) 20 20 20 20 20 20 20 20 49 20 3d 20 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = 1; ┆
0x0d0d2…0d0f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d0f2…0d101 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d101…0d121 (8, 0, 63) 52 32 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R20: ┆
0x0d121…0d141 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d141…0d150 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d150…0d170 (8, 0, 64) 20 20 20 20 20 20 20 20 49 46 20 43 48 20 7f 3d 27 00 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF CH =' ' THEN DO; ┆
0x0d170…0d190 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d190…0d19f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d19f…0d1bf (8, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 43 48 31 20 7f 3d 27 00 27 20 54 48 45 4e 20 44 4f ┆ IF CH1 =' ' THEN DO┆
0x0d1bf…0d1df 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x0d1df…0d1ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d1ee…0d20e (8, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 ┆ CALL OUTPUT(1,6)┆
0x0d20e…0d22e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x0d22e…0d23d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d23d…0d25d (8, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 20 28 4f ┆ GET SKIP LIST (O┆
0x0d25d…0d27d 4e 52 43 48 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NRCH); ┆
0x0d27d…0d28c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d28c…0d2ac (8, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 ┆ PUT FILE(D) SKIP┆
0x0d2ac…0d2cc 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x0d2cc…0d2db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d2db…0d2fb (8, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 52 31 30 3b 20 20 20 20 20 20 ┆ GO TO R10; ┆
0x0d2fb…0d31b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d31b…0d32a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d32a…0d34a (8, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x0d34a…0d36a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d36a…0d379 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d379…0d399 (8, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 20 28 27 0d 27 2c 31 29 3b ┆ CALL TYPIST (' ',1);┆
0x0d399…0d3b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d3b9…0d3c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d3c8…0d3e8 (8, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 52 33 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ GO TO R30; ┆
0x0d3e8…0d408 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d408…0d417 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d417…0d437 (8, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x0d437…0d457 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d457…0d466 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d466…0d486 (8, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x0d486…0d4a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d4a6…0d4b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d4b5…0d4d5 (8, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4c 45 45 52 20 28 31 29 3b 20 ┆ CALL CLEER (1); ┆
0x0d4d5…0d4f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d4f5…0d504 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d504…0d524 (8, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x0d524…0d544 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d544…0d553 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d553…0d573 (8, 0, 77) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 52 32 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO R20; ┆
0x0d573…0d593 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d593…0d5a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d5a2…0d5c2 (8, 0, 78) 52 33 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R30: ┆
0x0d5c2…0d5e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d5e2…0d5f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d5f1…0d611 (8, 0, 79) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 20 28 53 55 42 53 54 52 20 28 4f ┆ GET SKIP LIST (SUBSTR (O┆
0x0d611…0d631 4e 52 43 48 2c 49 2c 31 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NRCH,I,1)); ┆
0x0d631…0d640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d640…0d660 (8, 0, 80) 20 20 20 20 20 20 20 20 49 20 3d 20 49 20 2b 20 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = I + 1; ┆
0x0d660…0d680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d680…0d68f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d68f…0d6af (8, 0, 81) 20 20 20 20 20 20 20 20 49 46 20 49 20 3c 20 37 20 54 48 45 4e 20 47 4f 20 54 4f 20 52 32 30 3b ┆ IF I < 7 THEN GO TO R20;┆
0x0d6af…0d6cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d6cf…0d6de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d6de…0d72d (9, 0, 0) 0x20[0x4f]
0x0d72d…0d74d (9, 0, 1) 20 20 20 20 20 20 20 20 4f 4e 52 20 3d 20 53 55 42 53 54 52 20 28 4f 4e 52 43 48 2c 33 2c 34 29 ┆ ONR = SUBSTR (ONRCH,3,4)┆
0x0d74d…0d76d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x0d76d…0d77c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d77c…0d79c (9, 0, 2) 20 20 20 20 20 20 20 20 52 4e 52 20 3d 20 53 55 42 53 54 52 20 28 4f 4e 52 43 48 2c 31 2c 32 29 ┆ RNR = SUBSTR (ONRCH,1,2)┆
0x0d79c…0d7bc 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x0d7bc…0d7cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d7cb…0d7eb (9, 0, 3) 20 20 20 20 20 20 20 20 49 46 20 52 4e 52 20 3e 20 35 30 20 7c 20 52 4e 52 20 3c 20 31 20 54 48 ┆ IF RNR > 50 ö RNR < 1 TH┆
0x0d7eb…0d80b 45 4e 20 47 4f 20 54 4f 20 52 46 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO RFEL; ┆
0x0d80b…0d81a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d81a…0d83a (9, 0, 4) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN KFIL; ┆
0x0d83a…0d85a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d85a…0d869 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d869…0d889 (9, 0, 5) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 20 28 4b 46 49 4c 29 20 3d 20 52 4e 52 3b 20 20 20 20 ┆ UNSPEC (KFIL) = RNR; ┆
0x0d889…0d8a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d8a9…0d8b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d8b8…0d8d8 (9, 0, 6) 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 20 28 4b 46 49 4c 29 20 49 4e 54 4f 20 28 4b ┆ READ FILE (KFIL) INTO (K┆
0x0d8d8…0d8f8 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STR); ┆
0x0d8f8…0d907 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d907…0d927 (9, 0, 7) 20 20 20 20 20 20 20 20 49 46 20 4f 4e 52 20 7f 3d 20 47 45 4e 20 54 48 45 4e 20 47 4f 20 54 4f ┆ IF ONR = GEN THEN GO TO┆
0x0d927…0d947 20 52 46 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RFEL; ┆
0x0d947…0d956 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d956…0d976 (9, 0, 8) 52 39 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R90: ┆
0x0d976…0d996 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d996…0d9a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d9a5…0d9c5 (9, 0, 9) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x0d9c5…0d9e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d9e5…0d9f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0d9f4…0da43 (9, 0, 10) 0x20[0x4f]
0x0da43…0da63 (9, 0, 11) 52 46 45 4c 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RFEL: ┆
0x0da63…0da83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0da83…0da92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0da92…0dab2 (9, 0, 12) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 4f 4e 52 43 48 29 28 ┆ PUT FILE(D) EDIT(ONRCH)(┆
0x0dab2…0dad2 41 28 36 29 29 28 27 20 20 4f 50 45 52 41 54 5c 52 53 4b 4f 44 45 4e 20 5b 52 20 49 4e 54 45 20 ┆A(6))(' OPERATÖRSKODEN ÄR INTE ┆
0x0dad2…0dae1 47 4f 44 4b 5b 4e 44 27 29 20 20 20 20 20 20 ┆GODKÄND') ┆
0x0dae1…0db01 (9, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 34 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ (A(47)) ┆
0x0db01…0db21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0db21…0db30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0db30…0db50 (9, 0, 14) 20 20 20 20 20 20 20 20 28 27 20 20 56 41 52 20 47 4f 44 20 52 45 47 49 53 54 52 45 52 41 20 4e ┆ (' VAR GOD REGISTRERA N┆
0x0db50…0db70 59 20 4b 4f 44 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆Y KOD')(A); ┆
0x0db70…0db7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0db7f…0db9f (9, 0, 15) 20 20 20 20 20 20 20 20 4a 4a 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JJ = 0; ┆
0x0db9f…0dbbf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dbbf…0dbce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dbce…0dbee (9, 0, 16) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 4a 29 3b 20 20 20 20 20 ┆ CALL MOVEBUFF (JJ); ┆
0x0dbee…0dc0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dc0e…0dc1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dc1d…0dc3d (9, 0, 17) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 20 3d 20 41 4e 54 41 4c 20 2b 20 31 3b 20 20 20 20 20 20 ┆ ANTAL = ANTAL + 1; ┆
0x0dc3d…0dc5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dc5d…0dc6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dc6c…0dc8c (9, 0, 18) 20 20 20 20 20 20 20 20 49 46 20 41 4e 54 41 4c 20 3d 20 33 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆ IF ANTAL = 3 THEN DO; ┆
0x0dc8c…0dcac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dcac…0dcbb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dcbb…0dcdb (9, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x0dcdb…0dcfb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dcfb…0dd0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dd0a…0dd2a (9, 0, 20) 52 39 35 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R95: ┆
0x0dd2a…0dd4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dd4a…0dd59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dd59…0dd79 (9, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 20 28 31 2c 36 29 3b 20 20 ┆ CALL OUTPUT (1,6); ┆
0x0dd79…0dd99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dd99…0dda8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dda8…0ddc8 (9, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 49 20 3d 20 31 20 54 4f 20 33 30 30 3b 20 20 20 20 ┆ DO I = 1 TO 300; ┆
0x0ddc8…0dde8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dde8…0ddf7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ddf7…0de17 (9, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x0de17…0de37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0de37…0de46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0de46…0de66 (9, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 52 39 35 3b 20 20 20 20 20 20 20 20 20 20 ┆ GO TO R95; ┆
0x0de66…0de86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0de86…0de95 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0de95…0deb5 (9, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x0deb5…0ded5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ded5…0dee4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dee4…0df04 (9, 0, 26) 20 20 20 20 20 20 20 20 4f 4e 52 43 48 20 3d 20 27 20 20 20 20 20 20 27 3b 20 20 20 20 20 20 20 ┆ ONRCH = ' '; ┆
0x0df04…0df24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0df24…0df33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0df33…0df53 (9, 0, 27) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 52 31 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO R10; ┆
0x0df53…0df73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0df73…0df82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0df82…0dfa2 (9, 0, 28) 52 39 39 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R99: ┆
0x0dfa2…0dfc2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dfc2…0dfd1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0dfd1…0dff1 (9, 0, 29) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x0dff1…0e011 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e011…0e020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e020…0e06f (9, 0, 30) 0x20[0x4f]
[…0x2…]
0x0e10d…0e12d (9, 0, 33) 20 20 20 20 20 20 20 20 58 58 20 3d 20 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ XX = ' ┆
0x0e12d…0e14d 20 20 20 20 20 20 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ '; ┆
0x0e14d…0e15c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e15c…0e17c (9, 0, 34) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 31 29 20 20 3d 20 27 31 30 20 3d 20 4f 50 45 52 41 54 ┆ MTEX (1) = '10 = OPERAT┆
0x0e17c…0e19c 5c 52 53 2d 49 44 20 50 41 52 41 4d 45 54 52 41 52 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ÖRS-ID PARAMETRAR'; ┆
0x0e19c…0e1ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e1ab…0e1cb (9, 0, 35) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 32 29 20 20 3d 20 27 53 20 20 3d 20 53 4c 55 54 27 3b ┆ MTEX (2) = 'S = SLUT';┆
0x0e1cb…0e1eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e1eb…0e1fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e1fa…0e21a (9, 0, 36) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 33 29 20 20 3d 20 27 31 20 20 3d 20 56 45 52 49 46 49 ┆ MTEX (3) = '1 = VERIFI┆
0x0e21a…0e23a 4b 41 54 49 4f 4e 53 52 45 47 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KATIONSREG'; ┆
0x0e23a…0e249 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e249…0e269 (9, 0, 37) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 34 29 20 20 3d 20 27 32 20 20 3d 20 5b 4e 44 52 49 4e ┆ MTEX (4) = '2 = ÄNDRIN┆
0x0e269…0e289 47 20 4b 4f 4e 54 4f 54 41 42 45 4c 4c 45 52 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆G KONTOTABELLER'; ┆
0x0e289…0e298 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e298…0e2b8 (9, 0, 38) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 35 29 20 20 3d 20 27 31 20 3d 20 4b 4f 4e 54 4f 54 41 ┆ MTEX (5) = '1 = KONTOTA┆
0x0e2b8…0e2d8 42 45 4c 4c 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆BELL'; ┆
0x0e2d8…0e2e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e2e7…0e307 (9, 0, 39) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 36 29 20 20 3d 20 27 32 20 3d 20 55 4e 44 45 52 4b 4f ┆ MTEX (6) = '2 = UNDERKO┆
0x0e307…0e327 4e 54 4f 54 41 42 45 4c 4c 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NTOTABELL'; ┆
0x0e327…0e336 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e336…0e356 (9, 0, 40) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 37 29 20 20 3d 20 27 33 20 3d 20 49 2d 4b 2d 53 4c 41 ┆ MTEX (7) = '3 = I-K-SLA┆
0x0e356…0e376 47 53 54 41 42 45 4c 4c 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GSTABELL'; ┆
0x0e376…0e385 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e385…0e3a5 (9, 0, 41) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 38 29 20 20 3d 20 27 35 20 20 3d 20 42 45 53 54 5b 4c ┆ MTEX (8) = '5 = BESTÄL┆
0x0e3a5…0e3c5 4c 4e 49 4e 47 2d 42 45 41 52 42 45 54 4e 49 4e 47 20 4c 49 53 54 4f 52 27 3b 20 20 20 20 20 20 ┆LNING-BEARBETNING LISTOR'; ┆
0x0e3c5…0e3d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e3d4…0e3f4 (9, 0, 42) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 39 29 20 20 3d 20 27 31 20 3d 20 4b 4f 4e 54 4f 50 4c ┆ MTEX (9) = '1 = KONTOPL┆
0x0e3f4…0e414 41 4e 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AN'; ┆
0x0e414…0e423 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e423…0e443 (9, 0, 43) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 31 30 29 20 3d 20 27 32 20 3d 20 55 2d 4b 4f 4e 54 4f ┆ MTEX (10) = '2 = U-KONTO┆
0x0e443…0e463 54 41 42 45 4c 4c 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TABELL'; ┆
0x0e463…0e472 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e472…0e492 (9, 0, 44) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 31 31 29 20 3d 20 27 33 20 3d 20 49 2d 4b 2d 53 4c 41 ┆ MTEX (11) = '3 = I-K-SLA┆
0x0e492…0e4b2 47 53 54 41 42 45 4c 4c 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GSTABELL'; ┆
0x0e4b2…0e4c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e4c1…0e4e1 (9, 0, 45) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 31 32 29 20 3d 20 27 33 20 20 3d 20 44 41 47 4c 49 47 ┆ MTEX (12) = '3 = DAGLIG┆
0x0e4e1…0e501 20 42 45 41 52 42 45 54 4e 49 4e 47 20 42 41 54 43 48 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BEARBETNING BATCH'; ┆
0x0e501…0e510 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e510…0e530 (9, 0, 46) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 31 33 29 20 3d 20 27 31 20 3d 20 55 50 50 44 41 54 20 ┆ MTEX (13) = '1 = UPPDAT ┆
0x0e530…0e550 41 56 20 52 45 47 49 53 54 45 52 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AV REGISTER'; ┆
0x0e550…0e55f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e55f…0e57f (9, 0, 47) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 31 34 29 20 3d 20 27 32 20 3d 20 56 45 52 49 46 49 4b ┆ MTEX (14) = '2 = VERIFIK┆
0x0e57f…0e59f 41 54 49 4f 4e 53 46 5c 52 54 2e 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ATIONSFÖRT.'; ┆
0x0e59f…0e5ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e5ae…0e5ce (9, 0, 48) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 31 35 29 20 3d 20 27 33 20 3d 20 41 56 53 54 5b 4d 4e ┆ MTEX (15) = '3 = AVSTÄMN┆
0x0e5ce…0e5ee 49 4e 47 53 4c 49 53 54 20 46 5c 52 20 56 45 52 2e 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆INGSLIST FÖR VER.'; ┆
0x0e5ee…0e5fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e5fd…0e61d (9, 0, 49) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 31 36 29 20 3d 20 27 34 20 3d 20 4b 4f 4e 54 4f 4b 4f ┆ MTEX (16) = '4 = KONTOKO┆
0x0e61d…0e63d 4e 54 52 4f 4c 4c 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NTROLL'; ┆
0x0e63d…0e64c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e64c…0e66c (9, 0, 50) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 31 37 29 20 3d 20 27 34 20 3d 20 4b 4f 4e 54 4f 55 54 ┆ MTEX (17) = '4 = KONTOUT┆
0x0e66c…0e68c 44 52 41 47 20 66 2e 20 73 70 65 63 2e 20 55 2d 4b 54 4f 27 3b 20 20 20 20 20 20 20 20 20 20 20 ┆DRAG f. spec. U-KTO'; ┆
0x0e68c…0e69b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e69b…0e6bb (9, 0, 51) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 31 38 29 20 3d 20 27 35 20 3d 20 53 41 4c 44 4f 4c 49 ┆ MTEX (18) = '5 = SALDOLI┆
0x0e6bb…0e6db 53 54 41 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STA'; ┆
0x0e6db…0e6ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e6ea…0e70a (9, 0, 52) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 31 39 29 20 3d 20 27 36 20 3d 20 4b 4f 4e 54 4f 55 54 ┆ MTEX (19) = '6 = KONTOUT┆
0x0e70a…0e72a 44 52 41 47 20 6d 2e 20 7d 74 65 72 73 74 61 72 74 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DRAG m. återstart'; ┆
0x0e72a…0e739 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e739…0e759 (9, 0, 53) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 32 30 29 20 3d 20 27 37 20 3d 20 4b 4f 4e 54 4f 55 54 ┆ MTEX (20) = '7 = KONTOUT┆
0x0e759…0e779 44 52 41 47 20 6d 2e 64 61 67 6c 20 73 61 6c 64 6f 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DRAG m.dagl saldo'; ┆
0x0e779…0e788 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e788…0e7a8 (9, 0, 54) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 32 31 29 20 3d 20 27 38 20 3d 20 53 41 4c 44 4f 4c 49 ┆ MTEX (21) = '8 = SALDOLI┆
0x0e7a8…0e7c8 53 54 41 20 6d 2e 20 64 61 67 6c 20 73 61 6c 64 6f 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STA m. dagl saldo'; ┆
0x0e7c8…0e7d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e7d7…0e7f7 (9, 0, 55) 20 20 20 20 20 20 20 20 4d 54 45 58 20 28 32 32 29 20 3d 20 27 34 20 20 3d 20 52 65 73 65 72 76 ┆ MTEX (22) = '4 = Reserv┆
0x0e7f7…0e817 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x0e817…0e826 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e826…0e875 (9, 0, 56) 0x20[0x4f]
[…0x1…]
0x0e8c4…0e8e4 (9, 0, 58) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 31 29 20 20 3d 20 27 56 31 20 20 20 20 20 20 27 3b 20 ┆ LTEX (1) = 'V1 '; ┆
0x0e8e4…0e904 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e904…0e913 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e913…0e933 (9, 0, 59) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 32 29 20 20 3d 20 27 56 32 20 20 20 20 20 20 27 3b 20 ┆ LTEX (2) = 'V2 '; ┆
0x0e933…0e953 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e953…0e962 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e962…0e982 (9, 0, 60) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 33 29 20 20 3d 20 27 56 33 20 20 20 20 20 20 27 3b 20 ┆ LTEX (3) = 'V3 '; ┆
0x0e982…0e9a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e9a2…0e9b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e9b1…0e9d1 (9, 0, 61) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 34 29 20 20 3d 20 27 56 34 20 20 20 20 20 20 27 3b 20 ┆ LTEX (4) = 'V4 '; ┆
0x0e9d1…0e9f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0e9f1…0ea00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ea00…0ea20 (9, 0, 62) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 35 29 20 20 3d 20 27 56 35 20 20 20 20 20 20 27 3b 20 ┆ LTEX (5) = 'V5 '; ┆
0x0ea20…0ea40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ea40…0ea4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ea4f…0ea6f (9, 0, 63) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 36 29 20 20 3d 20 27 56 38 20 20 20 20 20 20 27 3b 20 ┆ LTEX (6) = 'V8 '; ┆
0x0ea6f…0ea8f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ea8f…0ea9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ea9e…0eabe (9, 0, 64) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 37 29 20 20 3d 20 27 56 39 20 20 20 20 20 20 27 3b 20 ┆ LTEX (7) = 'V9 '; ┆
0x0eabe…0eade 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0eade…0eaed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0eaed…0eb0d (9, 0, 65) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 38 29 20 20 3d 20 27 56 31 30 20 20 20 20 20 27 3b 20 ┆ LTEX (8) = 'V10 '; ┆
0x0eb0d…0eb2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0eb2d…0eb3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0eb3c…0eb5c (9, 0, 66) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 39 29 20 20 3d 20 27 56 31 30 42 20 20 20 20 27 3b 20 ┆ LTEX (9) = 'V10B '; ┆
0x0eb5c…0eb7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0eb7c…0eb8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0eb8b…0ebab (9, 0, 67) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 31 30 29 20 3d 20 27 56 31 30 31 4c 49 4b 20 27 3b 20 ┆ LTEX (10) = 'V101LIK '; ┆
0x0ebab…0ebcb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ebcb…0ebda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ebda…0ebfa (9, 0, 68) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 31 31 29 20 3d 20 27 56 31 30 55 4b 54 4f 20 27 3b 20 ┆ LTEX (11) = 'V10UKTO '; ┆
0x0ebfa…0ec1a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ec1a…0ec29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ec29…0ec49 (9, 0, 69) 20 20 20 20 20 20 20 20 4c 54 45 58 20 28 31 32 29 20 3d 20 27 0d 27 3b 20 20 20 20 20 20 20 20 ┆ LTEX (12) = ' '; ┆
0x0ec49…0ec69 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ec69…0ec78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ec78…0ecc7 (9, 0, 70) 0x20[0x4f]
[…0x5…]
0x0ee52…0ee72 (9, 0, 76) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x0ee72…0ee92 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x0ee92…0eea1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0eea1…0eef0 (9, 0, 77) 0x20[0x4f]
[…0x1…]
0x0ef3f…0ef5f (9, 0, 79) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x0ef5f…0ef7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ef7f…0ef8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ef8e…0efae (9, 0, 80) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x0efae…0efce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0efce…0efdd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0efdd…0effd (9, 0, 81) 20 20 20 20 20 20 20 20 53 20 3d 20 27 4e 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ S = 'N'; ┆
0x0effd…0f01d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f01d…0f02c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f02c…0f04c (10, 0, 0) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x0f04c…0f06c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f06c…0f07b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f07b…0f09b (10, 0, 1) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x0f09b…0f0bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f0bb…0f0ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f0ca…0f0ea (10, 0, 2) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 20 3d 20 27 30 20 20 20 20 20 27 20 54 48 45 4e ┆ IF DATUM = '0 ' THEN┆
0x0f0ea…0f10a 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x0f10a…0f119 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f119…0f139 (10, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 3b 20 20 20 ┆ PUT FILE(D) SKIP; ┆
0x0f139…0f159 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f159…0f168 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f168…0f188 (10, 0, 4) 4c 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L10: ┆
0x0f188…0f1a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f1a8…0f1b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f1b7…0f1d7 (10, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 20 20 ┆ PUT FILE(D) EDIT(' ┆
0x0f1d7…0f1f7 20 20 20 20 20 20 20 20 20 20 51 31 2f 4c 49 54 45 20 61 74 20 79 6f 75 72 20 73 65 72 76 69 63 ┆ Q1/LITE at your servic┆
0x0f1f7…0f206 65 27 29 28 41 28 38 32 29 29 20 20 20 20 20 ┆e')(A(82)) ┆
0x0f206…0f226 (10, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 20 28 27 64 61 74 75 6d 3a 27 29 20 28 41 28 36 29 29 3b 20 20 ┆ ('datum:') (A(6)); ┆
0x0f226…0f246 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f246…0f255 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f255…0f275 (10, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 29 3b 20 20 20 ┆ GET SKIP LIST(D); ┆
0x0f275…0f295 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f295…0f2a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f2a4…0f2c4 (10, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 20 3d 20 27 20 20 20 20 20 20 27 20 54 48 45 4e ┆ IF D = ' ' THEN┆
0x0f2c4…0f2e4 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT; ┆
0x0f2e4…0f2f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f2f3…0f313 (10, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 20 28 44 41 54 55 4d ┆ CALL DATCHECK (DATUM┆
0x0f313…0f333 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x0f333…0f342 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f342…0f362 (10, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 20 3d 20 27 30 20 20 20 20 20 27 20 ┆ IF DATUM = '0 ' ┆
0x0f362…0f382 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN DO; ┆
0x0f382…0f391 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f391…0f3b1 (10, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 ┆ PUT FILE (D) EDI┆
0x0f3b1…0f3d1 54 20 28 27 20 20 20 20 20 20 20 20 41 4e 47 49 56 45 54 20 44 41 54 55 4d 20 27 29 20 28 41 29 ┆T (' ANGIVET DATUM ') (A)┆
0x0f3d1…0f3e0 20 28 44 29 20 28 41 28 37 29 29 20 20 20 20 ┆ (D) (A(7)) ┆
0x0f3e0…0f400 (10, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 46 45 4c 20 44 41 54 55 4d 2e 27 29 28 41 ┆ ('FEL DATUM.')(A┆
0x0f400…0f420 28 32 34 29 29 28 27 20 20 56 41 52 20 47 4f 44 20 52 45 47 49 53 54 52 45 52 41 20 4e 59 54 54 ┆(24))(' VAR GOD REGISTRERA NYTT┆
0x0f420…0f42f 20 44 41 54 55 4d 2e 27 29 20 20 20 20 20 20 ┆ DATUM.') ┆
0x0f42f…0f44f (10, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 31 32 30 29 29 20 20 20 20 ┆ (A(120)) ┆
0x0f44f…0f46f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f46f…0f47e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f47e…0f49e (10, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 58 58 29 20 28 41 28 31 32 30 29 29 20 28 58 ┆ (XX) (A(120)) (X┆
0x0f49e…0f4be 58 29 20 28 41 28 31 31 35 29 29 20 28 58 58 29 20 28 41 28 36 38 29 29 3b 20 20 20 20 20 20 20 ┆X) (A(115)) (XX) (A(68)); ┆
0x0f4be…0f4cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f4cd…0f4ed (10, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 30 3b 20 20 20 20 20 20 ┆ GO TO L10; ┆
0x0f4ed…0f50d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f50d…0f51c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f51c…0f53c (10, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x0f53c…0f55c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f55c…0f56b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f56b…0f58b (10, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 ┆ PUT FILE(D) SKIP EDI┆
0x0f58b…0f5ab 54 28 56 45 52 53 49 4f 4e 29 28 41 28 39 36 29 29 28 27 5b 52 20 44 41 54 55 4d 27 29 28 41 28 ┆T(VERSION)(A(96))('ÄR DATUM')(A(┆
0x0f5ab…0f5ba 39 29 29 28 44 41 54 55 4d 29 20 20 20 20 20 ┆9))(DATUM) ┆
0x0f5ba…0f5da (10, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 37 29 29 20 20 20 20 20 20 20 20 20 20 ┆ (A(7)) ┆
0x0f5da…0f5fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f5fa…0f609 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f609…0f629 (10, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 20 28 27 52 5b 54 54 20 55 50 50 46 41 54 54 41 54 3f 20 22 4a ┆ ('RÄTT UPPFATTAT? "J┆
0x0f629…0f649 22 20 45 4c 4c 45 52 20 22 4e 22 27 29 28 41 28 37 38 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆" ELLER "N"')(A(78)); ┆
0x0f649…0f658 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f658…0f678 (10, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 53 56 41 52 29 3b ┆ GET SKIP LIST(SVAR);┆
0x0f678…0f698 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f698…0f6a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f6a7…0f6c7 (10, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 56 41 52 20 7f 3d 20 27 4a 27 20 54 48 45 4e 20 ┆ IF SVAR = 'J' THEN ┆
0x0f6c7…0f6e7 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DO; ┆
0x0f6e7…0f6f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f6f6…0f716 (10, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 20 3d 20 38 38 3b 20 20 20 20 20 20 20 20 20 ┆ J = 88; ┆
0x0f716…0f736 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f736…0f745 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f745…0f765 (10, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 ┆ CALL MOVEBUFF(J)┆
0x0f765…0f785 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x0f785…0f794 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f794…0f7b4 (10, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 ┆ PUT FILE(D) EDIT┆
0x0f7b4…0f7d4 28 27 20 20 20 20 20 20 20 20 56 41 52 20 47 4f 44 20 52 45 47 49 53 54 52 45 52 41 20 4e 59 54 ┆(' VAR GOD REGISTRERA NYT┆
0x0f7d4…0f7e3 54 20 44 41 54 55 4d 2e 27 29 20 20 20 20 20 ┆T DATUM.') ┆
0x0f7e3…0f803 (10, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 31 32 30 29 29 20 20 20 20 ┆ (A(120)) ┆
0x0f803…0f823 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f823…0f832 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f832…0f852 (10, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 58 58 29 20 28 41 28 31 32 30 29 29 20 28 58 ┆ (XX) (A(120)) (X┆
0x0f852…0f872 58 29 20 28 41 28 31 31 35 29 29 20 28 58 58 29 20 28 41 28 31 32 31 29 29 3b 20 20 20 20 20 20 ┆X) (A(115)) (XX) (A(121)); ┆
0x0f872…0f881 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f881…0f8a1 (10, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 30 3b 20 20 20 20 20 20 ┆ GO TO L10; ┆
0x0f8a1…0f8c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f8c1…0f8d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f8d0…0f8f0 (10, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x0f8f0…0f910 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f910…0f91f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f91f…0f93f (10, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 45 53 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL TEST; ┆
0x0f93f…0f95f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f95f…0f96e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f96e…0f98e (10, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 5f 4b 4f 44 20 3d 20 52 4e 52 3b 20 20 20 20 20 20 20 ┆ OP_KOD = RNR; ┆
0x0f98e…0f9ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f9ae…0f9bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0f9bd…0f9dd (10, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 45 44 ┆ PUT FILE (D) SKIP ED┆
0x0f9dd…0f9fd 49 54 20 56 45 52 53 49 4f 4e 20 28 41 28 34 39 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT VERSION (A(49)) ┆
0x0f9fd…0fa0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fa0c…0fa2c (10, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 4f 6d 20 72 61 64 61 6e 74 61 6c 20 3d 20 ┆ ('Om radantal = ┆
0x0fa2c…0fa4c 35 31 20 74 72 79 63 6b 20 52 45 54 55 52 4e 2e 27 29 20 28 41 28 34 33 29 29 3b 20 20 20 20 20 ┆51 tryck RETURN.') (A(43)); ┆
0x0fa4c…0fa5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fa5b…0fa7b (10, 0, 33) 4c 32 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L20: ┆
0x0fa7b…0fa9b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fa9b…0faaa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0faaa…0faca (10, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 20 28 52 41 ┆ GET SKIP LIST (RA┆
0x0faca…0faea 44 41 4e 54 58 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DANTX); ┆
0x0faea…0faf9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0faf9…0fb19 (10, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 41 44 41 4e 54 20 3d 20 52 41 44 41 4e 54 58 3b ┆ RADANT = RADANTX;┆
0x0fb19…0fb39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fb39…0fb48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fb48…0fb68 (10, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 41 44 41 4e 54 58 20 3d 20 27 20 20 27 20 54 ┆ IF RADANTX = ' ' T┆
0x0fb68…0fb88 48 45 4e 20 52 41 44 41 4e 54 20 3d 20 35 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆HEN RADANT = 51; ┆
0x0fb88…0fb97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fb97…0fbb7 (10, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 41 44 41 4e 54 20 3c 20 33 30 20 7c 20 52 41 44 ┆ IF RADANT < 30 ö RAD┆
0x0fbb7…0fbd7 41 4e 54 20 3e 20 38 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 32 30 3b 20 20 20 20 20 20 20 20 ┆ANT > 80 THEN GO TO L20; ┆
0x0fbd7…0fbe6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fbe6…0fc06 (10, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x0fc06…0fc26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fc26…0fc35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fc35…0fc55 (10, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x0fc55…0fc75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fc75…0fc84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fc84…0fca4 (10, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 46 49 4c 3b 20 20 20 20 20 20 ┆ OPEN KFIL; ┆
0x0fca4…0fcc4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fcc4…0fcd3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fcd3…0fcf3 (10, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 20 28 4b 46 49 4c 29 20 3d 20 ┆ UNSPEC (KFIL) = ┆
0x0fcf3…0fd13 4f 50 5f 4b 4f 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OP_KOD; ┆
0x0fd13…0fd22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fd22…0fd42 (10, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c ┆ ON ERROR GO TO L┆
0x0fd42…0fd62 33 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆30; ┆
0x0fd62…0fd71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fd71…0fd91 (10, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 20 28 4b 46 49 4c 29 ┆ READ FILE (KFIL)┆
0x0fd91…0fdb1 20 49 4e 54 4f 20 28 4b 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ INTO (KSTR); ┆
0x0fdb1…0fdc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fdc0…0fde0 (10, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 34 30 3b 20 20 20 20 20 20 ┆ GO TO L40; ┆
0x0fde0…0fe00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fe00…0fe0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fe0f…0fe2f (10, 0, 45) 4c 33 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L30: ┆
0x0fe2f…0fe4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fe4f…0fe5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fe5e…0fe7e (10, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 45 53 54 3b 20 20 20 20 20 20 ┆ CALL TEST; ┆
0x0fe7e…0fe9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fe9e…0fead 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fead…0fecd (10, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 5f 4b 4f 44 20 3d 20 52 4e 52 3b 20 20 20 ┆ OP_KOD = RNR; ┆
0x0fecd…0feed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0feed…0fefc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0fefc…0ff1c (10, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x0ff1c…0ff3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ff3c…0ff4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ff4b…0ff6b (10, 0, 49) 4c 34 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L40: ┆
0x0ff6b…0ff8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ff8b…0ff9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ff9a…0ffba (10, 0, 50) 20 20 20 20 20 20 20 20 44 20 3d 20 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D = '0'; ┆
0x0ffba…0ffda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ffda…0ffe9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x0ffe9…10009 (10, 0, 51) 4c 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L50: ┆
0x10009…10029 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10029…10038 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10038…10087 (10, 0, 52) 0x20[0x4f]
0x10087…100a7 (10, 0, 53) 20 20 20 20 20 20 20 20 58 20 3d 20 27 30 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ X = '0 '; ┆
0x100a7…100c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 20 20 20 20 20 20 48 55 56 55 44 4d 45 4e ┆ /* HUVUDMEN┆
0x100c7…100d6 59 52 41 44 45 4e 20 20 20 20 20 20 2a 2f 20 ┆YRADEN */ ┆
0x100d6…100f6 (10, 0, 54) 4c 36 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L60: ┆
0x100f6…10116 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10116…10125 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10125…10145 (10, 0, 55) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 3b 20 20 20 20 20 20 20 ┆ PUT FILE(D) SKIP; ┆
0x10145…10165 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10165…10174 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10174…101c3 (10, 0, 56) 0x20[0x4f]
0x101c3…101e3 (10, 0, 57) 2f 2a 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆/*++++++++++++++++++++++++++++++┆
0x101e3…10203 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆++++++++++++++++++++++++++++++++┆
0x10203…10212 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆+++++++++++++++┆
0x10212…10232 (10, 0, 58) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x10232…10252 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10252…10261 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10261…10281 (10, 0, 59) 2b 20 20 20 20 20 20 20 55 74 6c 7b 67 67 6e 69 6e 67 20 61 76 20 6d 65 6e 79 62 69 6c 64 2e 20 ┆+ Utläggning av menybild. ┆
0x10281…102a1 54 65 78 74 65 72 6e 61 20 68 7b 6d 74 61 73 20 66 72 7d 6e 20 4d 54 45 58 20 65 66 74 65 72 20 ┆Texterna hämtas från MTEX efter ┆
0x102a1…102b0 64 65 20 59 2d 76 7b 72 64 65 6e 20 20 20 20 ┆de Y-värden ┆
0x102b0…102d0 (10, 0, 60) 2b 20 20 20 20 20 20 20 73 6f 6d 20 73 74 7d 72 20 69 20 58 2d 72 61 64 65 6e 20 3d 20 30 20 64 ┆+ som står i X-raden = 0 d┆
0x102d0…102f0 76 73 20 65 78 2e 20 33 2c 20 34 2c 20 31 32 2c 20 6f 73 76 2e 20 20 20 20 20 20 20 20 20 20 20 ┆vs ex. 3, 4, 12, osv. ┆
0x102f0…102ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x102ff…1031f (10, 0, 61) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x1031f…1033f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1033f…1034e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1034e…1036e (10, 0, 62) 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆++++++++++++++++++++++++++++++++┆
[…0x1…]
0x1038e…1039d 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2a 2f ┆+++++++++++++*/┆
0x1039d…103ec (10, 0, 63) 0x20[0x4f]
0x103ec…1040c (10, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 49 20 3d 20 31 20 54 4f 20 31 32 3b 20 20 20 20 20 ┆ DO I = 1 TO 12; ┆
0x1040c…1042c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1042c…1043b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1043b…1045b (10, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4d 54 41 42 20 28 58 2c 49 29 20 3d 20 30 20 54 48 ┆ IF MTAB (X,I) = 0 TH┆
0x1045b…1047b 45 4e 20 47 4f 20 54 4f 20 4c 37 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO L70; ┆
0x1047b…1048a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1048a…104aa (10, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 4d ┆ PUT FILE (D) EDIT (M┆
0x104aa…104ca 54 45 58 20 28 4d 54 41 42 20 28 58 2c 49 29 29 29 20 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 ┆TEX (MTAB (X,I))) (A(47)); ┆
0x104ca…104d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x104d9…104f9 (10, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x104f9…10519 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10519…10528 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10528…10577 (10, 0, 68) 0x20[0x4f]
[…0x2…]
0x10615…10635 (10, 0, 71) 2f 2a 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆/*++++++++++++++++++++++++++++++┆
0x10635…10655 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆++++++++++++++++++++++++++++++++┆
0x10655…10664 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆+++++++++++++++┆
0x10664…10684 (10, 0, 72) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x10684…106a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x106a4…106b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x106b3…106d3 (10, 0, 73) 2b 20 20 20 20 20 20 20 48 7b 72 20 67 69 76 65 73 20 76 61 6c 20 61 76 20 61 6c 74 65 72 6e 61 ┆+ Här gives val av alterna┆
0x106d3…106f3 74 69 76 20 69 20 6d 65 6e 79 65 72 6e 61 2e 20 46 7c 72 73 74 61 20 67 7d 6e 67 65 6e 20 66 7c ┆tiv i menyerna. Första gången fö┆
0x106f3…10702 72 20 68 75 76 75 64 6d 65 6e 79 6e 20 20 20 ┆r huvudmenyn ┆
0x10702…10722 (10, 0, 74) 2b 20 20 20 20 20 20 20 6f 63 68 20 64 65 6e 20 61 6e 64 72 61 20 66 7c 72 20 75 6e 64 65 72 6d ┆+ och den andra för underm┆
0x10722…10742 65 6e 79 6e 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆enyn. ┆
0x10742…10751 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10751…10771 (10, 0, 75) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x10771…10791 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10791…107a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x107a0…107c0 (10, 0, 76) 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆++++++++++++++++++++++++++++++++┆
[…0x1…]
0x107e0…107ef 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2a 2f ┆+++++++++++++*/┆
0x107ef…1083e (10, 0, 77) 0x20[0x4f]
0x1083e…1085e (10, 0, 78) 4c 37 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L70: ┆
0x1085e…1087e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1087e…1088d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1088d…108ad (10, 0, 79) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 20 28 59 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST (Y); ┆
0x108ad…108cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x108cd…108dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x108dc…108fc (10, 0, 80) 20 20 20 20 20 20 20 20 49 46 20 59 20 3d 20 27 53 20 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 ┆ IF Y = 'S ' THEN GO TO S┆
0x108fc…1091c 54 41 52 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TART; ┆
0x1091c…1092b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1092b…1097a (10, 0, 81) 0x20[0x4f]
[…0x2…]
0x10a18…10a38 (11, 0, 2) 2f 2a 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆/*++++++++++++++++++++++++++++++┆
0x10a38…10a58 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆++++++++++++++++++++++++++++++++┆
0x10a58…10a67 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆+++++++++++++++┆
0x10a67…10a87 (11, 0, 3) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x10a87…10aa7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10aa7…10ab6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10ab6…10ad6 (11, 0, 4) 2b 20 20 20 20 20 20 20 54 65 73 74 20 6f 6d 20 59 2d 73 76 61 72 65 74 20 7b 72 20 67 6f 64 6b ┆+ Test om Y-svaret är godk┆
0x10ad6…10af6 7b 6e 74 20 64 76 73 20 6e 7d 67 6f 74 20 61 76 20 76 7b 72 64 65 6e 61 20 31 2d 31 32 2e 20 20 ┆änt dvs något av värdena 1-12. ┆
0x10af6…10b05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10b05…10b25 (11, 0, 5) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x10b25…10b45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10b45…10b54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10b54…10b74 (11, 0, 6) 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆++++++++++++++++++++++++++++++++┆
[…0x1…]
0x10b94…10ba3 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2a 2f ┆+++++++++++++*/┆
0x10ba3…10bf2 (11, 0, 7) 0x20[0x4f]
0x10bf2…10c12 (11, 0, 8) 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 20 28 27 31 20 3b 32 20 3b 33 20 3b 34 20 3b 35 ┆ IF INDEX ('1 ;2 ;3 ;4 ;5┆
0x10c12…10c32 20 3b 36 20 3b 37 20 3b 38 20 3b 39 20 3b 31 30 3b 31 31 3b 31 32 27 2c 59 29 20 3d 20 30 20 54 ┆ ;6 ;7 ;8 ;9 ;10;11;12',Y) = 0 T┆
0x10c32…10c41 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 ┆HEN DO; ┆
0x10c41…10c61 (11, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 58 20 3d 20 27 30 20 27 20 54 48 45 4e 20 47 4f 20 ┆ IF X = '0 ' THEN GO ┆
0x10c61…10c81 54 4f 20 4c 37 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO L70; ┆
0x10c81…10c90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10c90…10cb0 (11, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 35 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L50; ┆
0x10cb0…10cd0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10cd0…10cdf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10cdf…10cff (11, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x10cff…10d1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10d1f…10d2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10d2e…10d7d (11, 0, 12) 0x20[0x4f]
[…0x2…]
0x10e1b…10e3b (11, 0, 15) 2f 2a 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆/*++++++++++++++++++++++++++++++┆
0x10e3b…10e5b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆++++++++++++++++++++++++++++++++┆
0x10e5b…10e6a 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆+++++++++++++++┆
0x10e6a…10e8a (11, 0, 16) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x10e8a…10eaa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10eaa…10eb9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10eb9…10ed9 (11, 0, 17) 2b 20 20 20 20 20 20 20 54 65 73 74 20 6f 6d 20 64 65 74 20 61 6c 74 65 72 6e 61 74 69 76 20 73 ┆+ Test om det alternativ s┆
0x10ed9…10ef9 6f 6d 20 76 61 6c 74 73 20 68 61 72 20 6d 6f 74 73 76 61 72 69 67 68 65 74 20 69 20 4d 54 41 42 ┆om valts har motsvarighet i MTAB┆
0x10ef9…10f08 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆. ┆
0x10f08…10f28 (11, 0, 18) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x10f28…10f48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10f48…10f57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10f57…10f77 (11, 0, 19) 2b 20 20 20 20 20 20 20 44 65 6e 20 73 69 66 66 72 61 20 73 6f 6d 20 73 74 7d 72 20 66 7c 72 20 ┆+ Den siffra som står för ┆
0x10f77…10f97 64 65 74 20 61 6c 74 65 72 6e 61 74 69 76 20 73 6f 6d 20 68 61 72 20 76 61 6c 74 73 20 69 20 68 ┆det alternativ som har valts i h┆
0x10f97…10fa6 75 76 75 64 6d 65 6e 79 6e 20 20 20 20 20 20 ┆uvudmenyn ┆
0x10fa6…10fc6 (11, 0, 20) 2b 20 20 20 20 20 20 20 67 69 76 65 73 20 6f 63 6b 73 7d 20 58 2d 6b 6f 6f 72 64 69 6e 61 74 65 ┆+ gives också X-koordinate┆
0x10fc6…10fe6 6e 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆n. ┆
0x10fe6…10ff5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x10ff5…11015 (11, 0, 21) 2b 20 20 20 20 20 20 20 53 65 64 61 6e 20 74 65 73 74 61 73 20 6f 6d 20 6b 6f 6f 72 64 69 6e 61 ┆+ Sedan testas om koordina┆
0x11015…11035 74 65 6e 20 58 2c 59 20 3d 20 30 2e 20 4f 6d 20 73 7d 20 7b 72 20 66 61 6c 6c 65 74 20 73 61 6b ┆ten X,Y = 0. Om så är fallet sak┆
0x11035…11044 61 6e 73 20 74 65 78 74 65 72 20 20 20 20 20 ┆ans texter ┆
0x11044…11064 (11, 0, 22) 2b 20 20 20 20 20 20 20 74 69 6c 6c 20 75 6e 64 65 72 6d 65 6e 79 20 66 7c 72 20 67 6a 6f 72 74 ┆+ till undermeny för gjort┆
0x11064…11084 20 76 61 6c 20 69 20 68 75 76 75 64 6d 65 6e 79 6e 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ val i huvudmenyn. ┆
0x11084…11093 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11093…110b3 (11, 0, 23) 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ ┆
0x110b3…110d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x110d3…110e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x110e2…11102 (11, 0, 24) 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b ┆++++++++++++++++++++++++++++++++┆
[…0x1…]
0x11122…11131 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2b 2a 2f ┆+++++++++++++*/┆
0x11131…11180 (11, 0, 25) 0x20[0x4f]
0x11180…111a0 (11, 0, 26) 20 20 20 20 20 20 20 20 49 46 20 58 20 3d 20 27 30 20 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF X = '0 ' THEN DO; ┆
0x111a0…111c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x111c0…111cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x111cf…111ef (11, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4d 54 41 42 20 28 30 2c 59 29 20 3d 20 30 20 54 48 ┆ IF MTAB (0,Y) = 0 TH┆
0x111ef…1120f 45 4e 20 47 4f 20 54 4f 20 4c 37 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO L70; ┆
0x1120f…1121e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1121e…1123e (11, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 58 20 3d 20 59 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ X = Y; ┆
0x1123e…1125e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1125e…1126d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1126d…1128d (11, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4d 54 41 42 20 28 58 2c 31 29 20 3d 20 30 20 54 48 ┆ IF MTAB (X,1) = 0 TH┆
0x1128d…112ad 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN DO; ┆
0x112ad…112bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x112bc…112dc (11, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 59 20 3d 20 27 31 20 27 3b 20 20 20 20 20 20 20 ┆ Y = '1 '; ┆
0x112dc…112fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x112fc…1130b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1130b…1132b (11, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 38 30 3b 20 20 20 20 20 20 ┆ GO TO L80; ┆
0x1132b…1134b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1134b…1135a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1135a…1137a (11, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1137a…1139a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1139a…113a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x113a9…113c9 (11, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 36 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L60; ┆
0x113c9…113e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x113e9…113f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x113f8…11418 (11, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x11418…11438 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11438…11447 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11447…11467 (11, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x11467…11487 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11487…11496 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11496…114b6 (11, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4d 54 41 42 20 28 58 2c 59 29 20 3d 20 ┆ IF MTAB (X,Y) = ┆
0x114b6…114d6 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 35 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆0 THEN GO TO L50; ┆
0x114d6…114e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x114e5…11505 (11, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x11505…11525 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11525…11534 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11534…11554 (11, 0, 38) 4c 38 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L80: ┆
0x11554…11574 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11574…11583 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11583…115a3 (11, 0, 39) 20 20 20 20 20 20 20 20 4a 20 3d 20 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 1; ┆
0x115a3…115c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x115c3…115d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x115d2…115f2 (11, 0, 40) 20 20 20 20 20 20 20 20 44 4f 20 49 20 3d 20 32 20 54 4f 20 59 3b 20 20 20 20 20 20 20 20 20 20 ┆ DO I = 2 TO Y; ┆
0x115f2…11612 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11612…11621 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11621…11641 (11, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 20 4a 20 3d 20 4a 20 2a 20 32 3b 20 20 20 20 20 20 20 20 20 20 ┆ J = J * 2; ┆
0x11641…11661 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11661…11670 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11670…11690 (11, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x11690…116b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x116b0…116bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x116bf…1170e (11, 0, 43) 0x20[0x4f]
0x1170e…1172e (11, 0, 44) 20 20 20 20 20 20 20 20 49 46 20 28 54 56 45 43 4b 54 4f 52 20 28 58 29 20 26 20 4a 29 20 3d 20 ┆ IF (TVECKTOR (X) & J) = ┆
0x1172e…1174e 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆0 THEN DO; ┆
0x1174e…1175d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1175d…1177d (11, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 ┆ PUT FILE(D) SKIP EDI┆
0x1177d…1179d 54 20 28 27 20 20 4f 50 45 52 41 54 5c 52 45 4e 20 4f 42 45 48 5c 52 49 47 27 29 20 28 41 28 34 ┆T (' OPERATÖREN OBEHÖRIG') (A(4┆
0x1179d…117ac 39 29 29 20 20 20 20 20 20 20 20 20 20 20 20 ┆9)) ┆
0x117ac…117cc (11, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 20 28 27 54 52 59 43 4b 20 22 52 45 54 55 52 4e 22 20 46 5c 52 ┆ ('TRYCK "RETURN" FÖR┆
0x117cc…117ec 20 4e 59 54 54 20 52 55 54 49 4e 56 41 4c 27 29 20 28 41 28 34 35 29 29 3b 20 20 20 20 20 20 20 ┆ NYTT RUTINVAL') (A(45)); ┆
0x117ec…117fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x117fb…1181b (11, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 20 28 53 56 41 52 29 ┆ GET SKIP LIST (SVAR)┆
0x1181b…1183b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x1183b…1184a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1184a…1186a (11, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 35 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L50; ┆
0x1186a…1188a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1188a…11899 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11899…118b9 (11, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x118b9…118d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x118d9…118e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x118e8…11908 (11, 0, 50) 20 20 20 20 20 20 20 20 49 46 20 58 20 7f 3d 20 27 31 30 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆ IF X = '10' THEN DO; ┆
0x11908…11928 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11928…11937 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11937…11957 (11, 0, 51) 4c 39 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L90: ┆
0x11957…11977 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11977…11986 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11986…119a6 (11, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 ┆ PUT FILE(D) SKIP EDI┆
0x119a6…119c6 54 20 28 27 20 20 56 49 4c 4b 45 54 20 46 5c 52 45 54 41 47 20 53 4b 41 4c 4c 20 42 45 41 52 42 ┆T (' VILKET FÖRETAG SKALL BEARB┆
0x119c6…119d5 45 54 41 53 27 29 20 28 41 28 34 39 29 29 20 ┆ETAS') (A(49)) ┆
0x119d5…119f5 (11, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 36 20 3d 20 4b 4f 4c 41 56 52 5b 4b 4e 49 ┆ ('6 = KOLAVRÄKNI┆
0x119f5…11a15 4e 47 20 27 29 20 28 41 28 34 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NG ') (A(47)) ┆
0x11a15…11a24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11a24…11a44 (11, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 37 20 3d 20 4d 45 4c 4c 41 4e 4b 52 41 46 ┆ ('7 = MELLANKRAF┆
0x11a44…11a64 54 27 29 20 28 41 28 34 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T') (A(47)) ┆
0x11a64…11a73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11a73…11a93 (11, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 38 20 3d 20 4b 56 56 20 2c 20 4b 57 41 52 ┆ ('8 = KVV , KWAR┆
0x11a93…11ab3 4f 53 27 29 28 41 28 34 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OS')(A(47)) ┆
0x11ab3…11ac2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11ac2…11ae2 (11, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 39 20 3d 20 41 52 4f 53 4b 52 41 46 54 27 ┆ ('9 = AROSKRAFT'┆
0x11ae2…11b02 29 20 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) (A(47)); ┆
0x11b02…11b11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11b11…11b31 (11, 0, 57) 4c 31 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L100: ┆
0x11b31…11b51 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11b51…11b60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11b60…11b80 (11, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 46 49 52 4d 41 29 ┆ GET SKIP LIST(FIRMA)┆
0x11b80…11ba0 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x11ba0…11baf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11baf…11bcf (11, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 46 49 52 4d 41 20 7f 3d 20 27 36 27 29 20 26 20 ┆ IF (FIRMA = '6') & ┆
0x11bcf…11bef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11bef…11bfe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11bfe…11c1e (11, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 46 49 52 4d 41 20 7f 3d 20 27 37 27 29 20 26 ┆ (FIRMA = '7') &┆
0x11c1e…11c3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11c3e…11c4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11c4d…11c6d (11, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 46 49 52 4d 41 20 7f 3d 20 27 38 27 29 20 26 ┆ (FIRMA = '8') &┆
0x11c6d…11c8d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11c8d…11c9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11c9c…11cbc (11, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 46 49 52 4d 41 20 7f 3d 20 27 39 27 29 20 54 ┆ (FIRMA = '9') T┆
0x11cbc…11cdc 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆HEN DO; ┆
0x11cdc…11ceb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11ceb…11d0b (11, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 20 ┆ CALL OUTPUT ┆
0x11d0b…11d2b 28 31 2c 36 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(1,6); ┆
0x11d2b…11d3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11d3a…11d5a (11, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 20 3d 20 44 41 54 55 4d 3b 20 20 ┆ D = DATUM; ┆
0x11d5a…11d7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11d7a…11d89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11d89…11da9 (11, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 ┆ CALL CHOOSE(┆
0x11da9…11dc9 30 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆0); ┆
0x11dc9…11dd8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11dd8…11df8 (11, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 20 28 ┆ CALL PLOAD (┆
0x11df8…11e18 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'Q '); ┆
0x11e18…11e27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11e27…11e47 (11, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 ┆ END; ┆
0x11e47…11e67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11e67…11e76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11e76…11e96 (11, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 49 52 4d 41 20 3d 20 27 36 27 20 54 48 45 4e 20 ┆ IF FIRMA = '6' THEN ┆
0x11e96…11eb6 47 4f 20 54 4f 20 4c 31 31 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GO TO L110; ┆
0x11eb6…11ec5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11ec5…11ee5 (11, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 49 52 4d 41 20 3d 20 27 37 27 20 54 48 45 4e 20 ┆ IF FIRMA = '7' THEN ┆
0x11ee5…11f05 47 4f 20 54 4f 20 4c 31 32 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GO TO L120; ┆
0x11f05…11f14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11f14…11f34 (11, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 49 52 4d 41 20 3d 20 27 38 27 20 54 48 45 4e 20 ┆ IF FIRMA = '8' THEN ┆
0x11f34…11f54 47 4f 20 54 4f 20 4c 31 33 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GO TO L130; ┆
0x11f54…11f63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11f63…11f83 (11, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 49 52 4d 41 20 3d 20 27 39 27 20 54 48 45 4e 20 ┆ IF FIRMA = '9' THEN ┆
0x11f83…11fa3 47 4f 20 54 4f 20 4c 31 34 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GO TO L140; ┆
0x11fa3…11fb2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x11fb2…11fd2 (11, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 27 ┆ PUT FILE (D) EDIT ('┆
0x11fd2…11ff2 46 5c 52 45 54 41 47 53 4b 4f 44 45 4e 20 45 4a 20 47 4f 44 4b 5b 4e 44 27 29 20 28 41 28 34 37 ┆FÖRETAGSKODEN EJ GODKÄND') (A(47┆
0x11ff2…12001 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆)); ┆
0x12001…12021 (11, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 30 30 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO L100; ┆
0x12021…12041 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12041…12050 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12050…1209f (11, 0, 74) 0x20[0x4f]
0x1209f…120bf (11, 0, 75) 4c 31 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L110: ┆
0x120bf…120df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x120df…120ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x120ee…1210e (11, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 49 20 3d 20 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = 1; ┆
0x1210e…1212e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1212e…1213d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1213d…1215d (11, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 20 28 32 29 3b 20 20 20 20 ┆ CALL CHOOSE (2); ┆
0x1215d…1217d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1217d…1218c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1218c…121ac (11, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c 46 45 4c 3b ┆ ON ERROR GO TO LFEL;┆
0x121ac…121cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x121cc…121db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x121db…121fb (11, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 36 30 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN K60; ┆
0x121fb…1221b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1221b…1222a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1222a…1224a (11, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 20 49 20 3d 20 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = 2; ┆
0x1224a…1226a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1226a…12279 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12279…12299 (11, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 20 28 33 29 3b 20 20 20 20 ┆ CALL CHOOSE (3); ┆
0x12299…122b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x122b9…122c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x122c8…122e8 (12, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c 46 45 4c 3b ┆ ON ERROR GO TO LFEL;┆
0x122e8…12308 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12308…12317 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12317…12337 (12, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 36 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN K61; ┆
0x12337…12357 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12357…12366 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12366…12386 (12, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 35 30 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO L150; ┆
0x12386…123a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x123a6…123b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x123b5…12404 (12, 0, 3) 0x20[0x4f]
0x12404…12424 (12, 0, 4) 4c 31 32 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L120: ┆
0x12424…12444 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12444…12453 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12453…12473 (12, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 20 49 20 3d 20 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = 1; ┆
0x12473…12493 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12493…124a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x124a2…124c2 (12, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 20 28 32 29 3b 20 20 20 20 ┆ CALL CHOOSE (2); ┆
0x124c2…124e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x124e2…124f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x124f1…12511 (12, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c 46 45 4c 3b ┆ ON ERROR GO TO LFEL;┆
0x12511…12531 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12531…12540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12540…12560 (12, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 37 30 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN K70; ┆
0x12560…12580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12580…1258f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1258f…125af (12, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 20 49 20 3d 20 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = 2; ┆
0x125af…125cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x125cf…125de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x125de…125fe (12, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 20 28 33 29 3b 20 20 20 20 ┆ CALL CHOOSE (3); ┆
0x125fe…1261e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1261e…1262d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1262d…1264d (12, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c 46 45 4c 3b ┆ ON ERROR GO TO LFEL;┆
0x1264d…1266d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1266d…1267c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1267c…1269c (12, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 37 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN K71; ┆
0x1269c…126bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x126bc…126cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x126cb…126eb (12, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 35 30 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO L150; ┆
0x126eb…1270b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1270b…1271a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1271a…1273a (12, 0, 14) 4c 31 33 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L130: ┆
0x1273a…1275a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1275a…12769 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12769…12789 (12, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 20 49 20 3d 20 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = 1; ┆
0x12789…127a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x127a9…127b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x127b8…127d8 (12, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 20 28 32 29 3b 20 20 20 20 ┆ CALL CHOOSE (2); ┆
0x127d8…127f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x127f8…12807 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12807…12827 (12, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c 46 45 4c 3b ┆ ON ERROR GO TO LFEL;┆
0x12827…12847 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12847…12856 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12856…12876 (12, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 38 30 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN K80; ┆
0x12876…12896 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12896…128a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x128a5…128c5 (12, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 20 49 20 3d 20 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = 2; ┆
0x128c5…128e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x128e5…128f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x128f4…12914 (12, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 20 28 33 29 3b 20 20 20 20 ┆ CALL CHOOSE (3); ┆
0x12914…12934 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12934…12943 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12943…12963 (12, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c 46 45 4c 3b ┆ ON ERROR GO TO LFEL;┆
0x12963…12983 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12983…12992 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12992…129b2 (12, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 38 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN K81; ┆
0x129b2…129d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x129d2…129e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x129e1…12a01 (12, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 35 30 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO L150; ┆
0x12a01…12a21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12a21…12a30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12a30…12a50 (12, 0, 24) 4c 31 34 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L140: ┆
0x12a50…12a70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12a70…12a7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12a7f…12a9f (12, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 20 49 20 3d 20 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = 3; ┆
0x12a9f…12abf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12abf…12ace 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12ace…12aee (12, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 20 28 32 29 3b 20 20 20 20 ┆ CALL CHOOSE (2); ┆
0x12aee…12b0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12b0e…12b1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12b1d…12b3d (12, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c 46 45 4c 3b ┆ ON ERROR GO TO LFEL;┆
0x12b3d…12b5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12b5d…12b6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12b6c…12b8c (12, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 39 30 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN K90; ┆
0x12b8c…12bac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12bac…12bbb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12bbb…12bdb (12, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 49 20 3d 20 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = 4; ┆
0x12bdb…12bfb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12bfb…12c0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12c0a…12c2a (12, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 33 29 3b 20 20 20 20 20 ┆ CALL CHOOSE(3); ┆
0x12c2a…12c4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12c4a…12c59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12c59…12c79 (12, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c 46 45 4c 3b ┆ ON ERROR GO TO LFEL;┆
0x12c79…12c99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12c99…12ca8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12ca8…12cc8 (12, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 39 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN K91; ┆
0x12cc8…12ce8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12ce8…12cf7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12cf7…12d17 (12, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 35 30 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO L150; ┆
0x12d17…12d37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12d37…12d46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12d46…12d66 (12, 0, 34) 4c 46 45 4c 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆LFEL: ┆
0x12d66…12d86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12d86…12d95 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12d95…12db5 (12, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 20 3d 20 31 20 7c 20 49 20 3d 20 33 20 54 48 45 ┆ IF I = 1 ö I = 3 THE┆
0x12db5…12dd5 4e 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 45 44 49 54 20 20 20 20 20 20 20 20 ┆N PUT FILE (D) SKIP EDIT ┆
0x12dd5…12de4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12de4…12e04 (12, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 44 49 53 4b 45 54 54 20 4d 45 44 20 22 56 ┆ ('DISKETT MED "V┆
0x12e04…12e24 45 52 54 45 58 54 22 20 46 49 4e 4e 53 20 49 4e 54 45 20 49 20 44 52 49 56 45 20 32 27 29 28 41 ┆ERTEXT" FINNS INTE I DRIVE 2')(A┆
0x12e24…12e33 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 ┆(47)); ┆
0x12e33…12e53 (12, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 46 49 4c 45 20 28 44 ┆ ELSE PUT FILE (D┆
0x12e53…12e73 29 20 53 4b 49 50 20 45 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) SKIP EDIT ┆
0x12e73…12e82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12e82…12ea2 (12, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 44 49 53 4b 45 54 54 20 4d 45 44 20 22 56 ┆ ('DISKETT MED "V┆
0x12ea2…12ec2 45 52 42 45 4c 4f 50 22 20 46 49 4e 4e 53 20 49 4e 54 45 20 49 20 44 52 49 56 45 20 33 27 29 20 ┆ERBELOP" FINNS INTE I DRIVE 3') ┆
0x12ec2…12ed1 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 ┆(A(47)); ┆
0x12ed1…12ef1 (12, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 ┆ PUT FILE(D) EDIT┆
0x12ef1…12f11 28 27 53 5b 54 54 20 49 4e 20 52 5b 54 54 20 44 49 53 4b 45 54 54 20 4f 43 48 20 41 4e 47 45 20 ┆('SÄTT IN RÄTT DISKETT OCH ANGE ┆
0x12f11…12f20 46 5c 52 45 54 41 47 27 29 20 20 20 20 20 20 ┆FÖRETAG') ┆
0x12f20…12f40 (12, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 34 37 29 29 20 20 20 20 20 ┆ (A(47)) ┆
0x12f40…12f60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12f60…12f6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12f6f…12f8f (12, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 36 20 3d 20 4b 4f 4c 41 56 52 5b 4b 4e 49 ┆ ('6 = KOLAVRÄKNI┆
0x12f8f…12faf 4e 47 20 27 29 20 28 41 28 34 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NG ') (A(47)) ┆
0x12faf…12fbe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12fbe…12fde (12, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 37 20 3d 20 4d 45 4c 4c 41 4e 4b 52 41 46 ┆ ('7 = MELLANKRAF┆
0x12fde…12ffe 54 27 29 20 28 41 28 34 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T') (A(47)) ┆
0x12ffe…1300d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1300d…1302d (12, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 38 20 3d 20 4b 56 56 20 2c 20 4b 57 41 52 ┆ ('8 = KVV , KWAR┆
0x1302d…1304d 4f 53 27 29 28 41 28 34 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OS')(A(47)) ┆
0x1304d…1305c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1305c…1307c (12, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 39 20 3d 20 41 52 4f 53 4b 52 41 46 54 27 ┆ ('9 = AROSKRAFT'┆
0x1307c…1309c 29 20 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) (A(47)); ┆
0x1309c…130ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x130ab…130cb (12, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 30 30 3b 20 20 20 20 20 ┆ GO TO L100; ┆
0x130cb…130eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x130eb…130fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x130fa…1311a (12, 0, 46) 4c 31 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L150: ┆
0x1311a…1313a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1313a…13149 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13149…13169 (12, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 30 29 3b 20 ┆ CALL CHOOSE(0); ┆
0x13169…13189 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13189…13198 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13198…131b8 (12, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x131b8…131d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x131d8…131e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x131e7…13207 (12, 0, 49) 20 20 20 20 20 20 20 20 44 20 3d 20 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D = DATUM; ┆
0x13207…13227 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13227…13236 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13236…13285 (12, 0, 50) 0x20[0x4f]
0x13285…132a5 (12, 0, 51) 20 20 20 20 20 20 20 20 49 46 20 4c 45 4e 47 54 48 20 28 4c 54 45 58 28 4c 54 41 42 20 28 58 2c ┆ IF LENGTH (LTEX(LTAB (X,┆
0x132a5…132c5 59 29 29 29 20 3d 20 38 20 54 48 45 4e 20 44 4f 3b 20 20 20 2f 2a 20 4f 4d 20 49 4e 44 45 58 56 ┆Y))) = 8 THEN DO; /* OM INDEXV┆
0x132c5…132d4 5b 52 44 45 54 20 49 20 54 41 42 20 2a 2f 20 ┆ÄRDET I TAB */ ┆
0x132d4…132f4 (12, 0, 52) 20 20 20 20 20 20 20 20 54 38 20 3d 20 4c 54 45 58 20 28 4c 54 41 42 20 28 58 2c 59 29 29 3b 20 ┆ T8 = LTEX (LTAB (X,Y)); ┆
0x132f4…13314 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 54 45 58 20 50 45 4b 41 52 ┆ /* LTEX PEKAR┆
0x13314…13323 20 50 5d 20 45 54 54 20 50 52 4f 2d 20 2a 2f ┆ PÅ ETT PRO- */┆
0x13323…13343 (12, 0, 53) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 20 28 54 38 29 3b 20 20 20 20 20 20 20 20 ┆ CALL PLOAD (T8); ┆
0x13343…13363 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 47 52 41 4d 4e 41 4d 4e 20 53 4f ┆ /* GRAMNAMN SO┆
0x13363…13372 4d 20 5b 52 20 38 20 50 4f 53 20 2a 2f 20 20 ┆M ÄR 8 POS */ ┆
0x13372…13392 (12, 0, 54) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x13392…133b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 5d 4e 47 54 20 4c 41 44 44 41 ┆ /* LÅNGT LADDA┆
0x133b2…133c1 53 20 44 45 54 20 50 52 4f 47 2e 20 2a 2f 20 ┆S DET PROG. */ ┆
0x133c1…133e1 (12, 0, 55) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4c 4f 41 44 20 28 4c 54 45 58 20 28 4c 54 41 42 20 28 58 ┆ CALL LOAD (LTEX (LTAB (X┆
0x133e1…13401 2c 59 29 29 2c 32 35 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,Y)),25); ┆
0x13401…13410 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13410…13430 (12, 0, 56) 53 4c 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: ┆
0x13430…13450 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13450…1345f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1345f…1347f (12, 0, 57) 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1347f…1349f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1349f…134ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x134ae…134ce (12, 0, 58) 4c 46 45 4c 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆LFEL: ┆
0x134ce…134ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x134ee…134fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x134fd…1351d (12, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 20 3d 20 31 20 7c 20 49 20 3d 20 33 20 54 48 45 ┆ IF I = 1 ö I = 3 THE┆
0x1351d…1353d 4e 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 45 44 49 54 20 20 20 20 20 20 20 20 ┆N PUT FILE (D) SKIP EDIT ┆
0x1353d…1354c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1354c…1356c (12, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 44 49 53 4b 45 54 54 20 4d 45 44 20 22 56 ┆ ('DISKETT MED "V┆
0x1356c…1358c 45 52 54 45 58 54 22 20 46 49 4e 4e 53 20 49 4e 54 45 20 49 20 44 52 49 56 45 20 32 27 29 28 41 ┆ERTEXT" FINNS INTE I DRIVE 2')(A┆
0x1358c…1359b 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 ┆(47)); ┆
0x1359b…135bb (12, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 46 49 4c 45 20 28 44 ┆ ELSE PUT FILE (D┆
0x135bb…135db 29 20 53 4b 49 50 20 45 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) SKIP EDIT ┆
0x135db…135ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x135ea…1360a (12, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 44 49 53 4b 45 54 54 20 4d 45 44 20 22 56 ┆ ('DISKETT MED "V┆
0x1360a…1362a 45 52 42 45 4c 4f 50 22 20 46 49 4e 4e 53 20 49 4e 54 45 20 49 20 44 52 49 56 45 20 33 27 29 20 ┆ERBELOP" FINNS INTE I DRIVE 3') ┆
0x1362a…13639 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 ┆(A(47)); ┆
0x13639…13659 (12, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 ┆ PUT FILE(D) EDIT┆
0x13659…13679 28 27 53 5b 54 54 20 49 4e 20 52 5b 54 54 20 44 49 53 4b 45 54 54 20 4f 43 48 20 41 4e 47 45 20 ┆('SÄTT IN RÄTT DISKETT OCH ANGE ┆
0x13679…13688 46 5c 52 45 54 41 47 27 29 20 20 20 20 20 20 ┆FÖRETAG') ┆
0x13688…136a8 (12, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 34 37 29 29 20 20 20 20 20 ┆ (A(47)) ┆
0x136a8…136c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x136c8…136d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x136d7…136f7 (12, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 36 20 3d 20 4b 4f 4c 41 56 52 5b 4b 4e 49 ┆ ('6 = KOLAVRÄKNI┆
0x136f7…13717 4e 47 20 27 29 20 28 41 28 34 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NG ') (A(47)) ┆
0x13717…13726 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13726…13746 (12, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 37 20 3d 20 4d 45 4c 4c 41 4e 4b 52 41 46 ┆ ('7 = MELLANKRAF┆
0x13746…13766 54 27 29 20 28 41 28 34 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T') (A(47)) ┆
0x13766…13775 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13775…13795 (12, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 38 20 3d 20 4b 56 56 20 2c 20 4b 57 41 52 ┆ ('8 = KVV , KWAR┆
0x13795…137b5 4f 53 27 29 28 41 28 34 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OS')(A(47)) ┆
0x137b5…137c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x137c4…137e4 (12, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 39 20 3d 20 41 52 4f 53 4b 52 41 46 54 27 ┆ ('9 = AROSKRAFT'┆
0x137e4…13804 29 20 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) (A(47)); ┆
0x13804…13813 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13813…13833 (12, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 30 30 3b 20 20 20 20 20 ┆ GO TO L100; ┆
0x13833…13853 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13853…13862 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13862…13882 (12, 0, 70) 4c 31 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L150: ┆
0x13882…138a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x138a2…138b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x138b1…138d1 (12, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 30 29 3b 20 ┆ CALL CHOOSE(0); ┆
0x138d1…138f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x138f1…13900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13900…13920 (12, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x13920…13940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13940…1394f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1394f…1396f (12, 0, 73) 20 20 20 20 20 20 20 20 44 20 3d 20 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D = DATUM; ┆
0x1396f…1398f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1398f…1399e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1399e…139ed (12, 0, 74) 0x20[0x4f]
0x139ed…13a0d (12, 0, 75) 20 20 20 20 20 20 20 20 49 46 20 4c 45 4e 47 54 48 20 28 4c 54 45 58 28 4c 54 41 42 20 28 58 2c ┆ IF LENGTH (LTEX(LTAB (X,┆
0x13a0d…13a2d 59 29 29 29 20 3d 20 38 20 54 48 45 4e 20 44 4f 3b 20 20 20 2f 2a 20 4f 4d 20 49 4e 44 45 58 56 ┆Y))) = 8 THEN DO; /* OM INDEXV┆
0x13a2d…13a3c 5b 52 44 45 54 20 49 20 54 41 42 20 2a 2f 20 ┆ÄRDET I TAB */ ┆
0x13a3c…13a5c (12, 0, 76) 20 20 20 20 20 20 20 20 54 38 20 3d 20 4c 54 45 58 20 28 4c 54 41 42 20 28 58 2c 59 29 29 3b 20 ┆ T8 = LTEX (LTAB (X,Y)); ┆
0x13a5c…13a7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 54 45 58 20 50 45 4b 41 52 ┆ /* LTEX PEKAR┆
0x13a7c…13a8b 20 50 5d 20 45 54 54 20 50 52 4f 2d 20 2a 2f ┆ PÅ ETT PRO- */┆
0x13a8b…13aab (12, 0, 77) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 20 28 54 38 29 3b 20 20 20 20 20 20 20 20 ┆ CALL PLOAD (T8); ┆
0x13aab…13acb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 47 52 41 4d 4e 41 4d 4e 20 53 4f ┆ /* GRAMNAMN SO┆
0x13acb…13ada 4d 20 5b 52 20 38 20 50 4f 53 20 2a 2f 20 20 ┆M ÄR 8 POS */ ┆
0x13ada…13afa (12, 0, 78) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x13afa…13b1a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 5d 4e 47 54 20 4c 41 44 44 41 ┆ /* LÅNGT LADDA┆
0x13b1a…13b29 53 20 44 45 54 20 50 52 4f 47 2e 20 2a 2f 20 ┆S DET PROG. */ ┆
0x13b29…13b49 (12, 0, 79) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4c 4f 41 44 20 28 4c 54 45 58 20 28 4c 54 41 42 20 28 58 ┆ CALL LOAD (LTEX (LTAB (X┆
0x13b49…13b69 2c 59 29 29 2c 32 35 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,Y)),25); ┆
0x13b69…13b78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13b78…13b98 (12, 0, 80) 53 4c 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: ┆
0x13b98…13bb8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13bb8…13bc7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13bc7…13be7 (12, 0, 81) 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x13be7…13c07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13c07…13c16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13c16…13c36 (13, 0, 0) 2f 2a 20 56 31 20 4c 5b 47 45 52 20 55 50 50 20 4f 43 48 20 5b 4e 44 52 41 52 20 4f 50 2d 54 49 ┆/* V1 LÄGER UPP OCH ÄNDRAR OP-TI┆
0x13c36…13c56 4c 4c 54 52 5b 44 45 20 54 49 4c 4c 20 52 55 54 49 4e 45 52 4e 41 20 20 20 20 20 20 20 20 20 20 ┆LLTRÄDE TILL RUTINERNA ┆
0x13c56…13c65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13c65…13c85 (13, 0, 1) 56 20 31 3a 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆V 1:0 ┆
0x13c85…13ca5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13ca5…13cb4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13cb4…13cd4 (13, 0, 2) 20 52 47 20 4a 5d 20 37 38 30 38 31 38 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RG JÅ 780818 */ ┆
0x13cd4…13cf4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13cf4…13d03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13d03…13d52 (13, 0, 3) 0x20[0x4f]
0x13d52…13d72 (13, 0, 4) 44 43 4c 20 31 20 4b 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 KSTR, ┆
0x13d72…13d92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13d92…13da1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13da1…13dc1 (13, 0, 5) 20 20 20 20 20 20 32 20 47 45 4e 20 43 48 41 52 28 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 GEN CHAR(4), ┆
0x13dc1…13de1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13de1…13df0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13df0…13e10 (13, 0, 6) 20 20 20 20 20 20 32 20 54 56 45 4b 54 4f 52 28 31 32 29 20 42 49 4e 41 52 59 2c 20 20 20 20 20 ┆ 2 TVEKTOR(12) BINARY, ┆
0x13e10…13e30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13e30…13e3f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13e3f…13e5f (13, 0, 7) 20 20 20 20 20 20 32 20 41 4e 4d 20 43 48 41 52 28 33 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 ANM CHAR(32); ┆
0x13e5f…13e7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13e7f…13e8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13e8e…13edd (13, 0, 8) 0x20[0x4f]
0x13edd…13efd (13, 0, 9) 20 20 20 20 20 20 2f 2a 20 36 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 60 BYTES */ ┆
0x13efd…13f1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13f1d…13f2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13f2c…13f7b (13, 0, 10) 0x20[0x4f]
0x13f7b…13f9b (13, 0, 11) 44 43 4c 20 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL P POINTER, ┆
0x13f9b…13fbb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13fbb…13fca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13fca…13fea (13, 0, 12) 20 20 20 20 44 20 42 41 53 45 44 28 50 29 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 ┆ D BASED(P) CHAR(6), ┆
0x13fea…1400a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1400a…14019 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14019…14039 (13, 0, 13) 20 20 20 20 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PP POINTER, ┆
0x14039…14059 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14059…14068 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14068…14088 (13, 0, 14) 20 20 20 20 31 20 53 54 52 20 42 41 53 45 44 28 50 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 STR BASED(PP), ┆
0x14088…140a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x140a8…140b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x140b7…140d7 (13, 0, 15) 20 20 20 20 20 20 32 20 58 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 X CHAR(2), ┆
0x140d7…140f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x140f7…14106 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14106…14126 (13, 0, 16) 20 20 20 20 20 20 32 20 59 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 Y CHAR(2), ┆
0x14126…14146 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14146…14155 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14155…14175 (13, 0, 17) 20 20 20 20 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM CHAR(6), ┆
0x14175…14195 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14195…141a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x141a4…141c4 (13, 0, 18) 20 20 20 20 54 41 42 28 31 32 29 20 43 48 41 52 28 31 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ TAB(12) CHAR(12), ┆
0x141c4…141e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x141e4…141f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x141f3…14213 (13, 0, 19) 20 20 20 20 54 33 20 43 48 41 52 28 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T3 CHAR(3), ┆
0x14213…14233 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14233…14242 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14242…14262 (13, 0, 20) 20 20 20 20 54 34 20 43 48 41 52 28 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T4 CHAR(4), ┆
0x14262…14282 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14282…14291 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14291…142b1 (13, 0, 21) 20 20 20 20 54 31 32 20 43 48 41 52 28 31 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T12 CHAR(12), ┆
0x142b1…142d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x142d1…142e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x142e0…14300 (13, 0, 22) 20 20 20 20 54 33 32 20 43 48 41 52 28 33 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T32 CHAR(32), ┆
0x14300…14320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14320…1432f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1432f…1434f (13, 0, 23) 20 20 20 20 53 56 41 52 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SVAR CHAR(1), ┆
0x1434f…1436f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1436f…1437e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1437e…1439e (13, 0, 24) 20 20 20 20 46 4c 41 47 47 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FLAGG BINARY, ┆
0x1439e…143be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x143be…143cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x143cd…143ed (13, 0, 25) 20 20 20 20 4b 46 49 4c 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KFIL FILE; ┆
0x143ed…1440d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1440d…1441c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1441c…1446b (13, 0, 26) 0x20[0x4f]
0x1446b…1448b (13, 0, 27) 54 41 42 47 45 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TABGEN:PROC; ┆
0x1448b…144ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x144ab…144ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x144ba…144da (13, 0, 28) 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 31 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 12; ┆
0x144da…144fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x144fa…14509 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14509…14529 (13, 0, 29) 20 20 20 20 20 20 20 20 20 4b 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=1; ┆
0x14529…14549 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14549…14558 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14558…14578 (13, 0, 30) 20 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 31 32 3b 20 20 20 20 20 20 20 20 20 20 ┆ DO J=1 TO 12; ┆
0x14578…14598 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14598…145a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x145a7…145c7 (13, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 54 56 45 4b 54 4f 52 28 49 29 20 26 20 4b 29 20 ┆ IF (TVEKTOR(I) & K) ┆
0x145c7…145e7 3d 20 4b 20 54 48 45 4e 20 53 55 42 53 54 52 28 54 41 42 28 49 29 2c 4a 2c 31 29 3d 27 31 27 3b ┆= K THEN SUBSTR(TAB(I),J,1)='1';┆
0x145e7…145f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x145f6…14616 (13, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 53 55 42 53 54 52 28 54 41 42 28 49 29 2c 4a ┆ ELSE SUBSTR(TAB(I),J┆
0x14616…14636 2c 31 29 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,1)='0'; ┆
0x14636…14645 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14645…14665 (13, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 4b 3d 4b 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=K*2; ┆
0x14665…14685 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14685…14694 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14694…146b4 (13, 0, 34) 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x146b4…146d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x146d4…146e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x146e3…14703 (13, 0, 35) 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x14703…14723 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14723…14732 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14732…14752 (13, 0, 36) 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x14752…14772 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14772…14781 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14781…147a1 (13, 0, 37) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x147a1…147c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x147c1…147d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x147d0…1481f (13, 0, 38) 0x20[0x4f]
[…0x1…]
0x1486e…1488e (13, 0, 40) 56 45 43 4b 47 45 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VECKGEN:PROC; ┆
0x1488e…148ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x148ae…148bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x148bd…148dd (13, 0, 41) 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 31 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 12; ┆
0x148dd…148fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x148fd…1490c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1490c…1492c (13, 0, 42) 20 20 20 20 20 20 20 20 20 4b 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=1; ┆
0x1492c…1494c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1494c…1495b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1495b…1497b (13, 0, 43) 20 20 20 20 20 20 20 20 20 4c 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ L=0; ┆
0x1497b…1499b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1499b…149aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x149aa…149ca (13, 0, 44) 20 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 31 32 3b 20 20 20 20 20 20 20 20 20 20 ┆ DO J=1 TO 12; ┆
0x149ca…149ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x149ea…149f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x149f9…14a19 (13, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 54 41 42 28 49 29 2c 4a 2c 31 ┆ IF SUBSTR(TAB(I),J,1┆
0x14a19…14a39 29 3d 27 31 27 20 54 48 45 4e 20 4c 3d 4c 2b 4b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)='1' THEN L=L+K; ┆
0x14a39…14a48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14a48…14a68 (13, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 20 4b 3d 4b 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=K*2; ┆
0x14a68…14a88 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14a88…14a97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14a97…14ab7 (13, 0, 47) 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x14ab7…14ad7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14ad7…14ae6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14ae6…14b06 (13, 0, 48) 20 20 20 20 20 20 20 20 20 54 56 45 4b 54 4f 52 28 49 29 3d 4c 3b 20 20 20 20 20 20 20 20 20 20 ┆ TVEKTOR(I)=L; ┆
0x14b06…14b26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14b26…14b35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14b35…14b55 (13, 0, 49) 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x14b55…14b75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14b75…14b84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14b84…14ba4 (13, 0, 50) 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x14ba4…14bc4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14bc4…14bd3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14bd3…14bf3 (13, 0, 51) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x14bf3…14c13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14c13…14c22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14c22…14c71 (13, 0, 52) 0x20[0x4f]
[…0x1…]
0x14cc0…14ce0 (13, 0, 54) 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L0; ┆
0x14ce0…14d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14d00…14d0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14d0f…14d5e (13, 0, 55) 0x20[0x4f]
0x14d5e…14d7e (13, 0, 56) 53 31 3a 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 4f 50 45 ┆S1: PUT FILE(D) SKIP EDIT('OPE┆
0x14d7e…14d9e 52 41 54 5c 52 53 4e 55 4d 4d 45 52 3a 27 29 28 41 28 34 34 29 29 28 54 33 29 28 41 28 33 29 29 ┆RATÖRSNUMMER:')(A(44))(T3)(A(3))┆
0x14d9e…14dad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14dad…14dcd (13, 0, 57) 20 20 20 20 20 20 28 27 4f 50 45 52 41 54 5c 52 53 4b 4f 44 3a 27 29 28 41 28 31 34 29 29 3b 20 ┆ ('OPERATÖRSKOD:')(A(14)); ┆
0x14dcd…14ded 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14ded…14dfc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14dfc…14e1c (13, 0, 58) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 47 45 4e 2c 34 29 3b 20 20 20 20 20 ┆ CALL TYPIST(GEN,4); ┆
0x14e1c…14e3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14e3c…14e4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14e4b…14e6b (13, 0, 59) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 27 10 27 2c 31 29 3b 20 20 20 20 20 ┆ CALL TYPIST(' ',1); ┆
0x14e6b…14e8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14e8b…14e9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14e9a…14eba (13, 0, 60) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x14eba…14eda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14eda…14ee9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14ee9…14f09 (13, 0, 61) 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 54 34 29 3b 20 20 20 20 20 20 20 20 ┆ GET SKIP LIST(T4); ┆
0x14f09…14f29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14f29…14f38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14f38…14f58 (13, 0, 62) 20 20 20 20 20 20 49 46 20 54 34 7f 3d 47 45 4e 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆ IF T4 =GEN THEN DO; ┆
0x14f58…14f78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14f78…14f87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14f87…14fa7 (13, 0, 63) 20 20 20 20 20 20 20 20 20 47 45 4e 3d 54 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GEN=T4; ┆
0x14fa7…14fc7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14fc7…14fd6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14fd6…14ff6 (13, 0, 64) 20 20 20 20 20 20 20 20 20 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FLAGG=1; ┆
0x14ff6…15016 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15016…15025 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15025…15045 (13, 0, 65) 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x15045…15065 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15065…15074 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15074…15094 (13, 0, 66) 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 4f 50 45 ┆ PUT FILE(D) SKIP EDIT('OPE┆
0x15094…150b4 52 41 54 5c 52 53 4e 55 4d 4d 45 52 3a 27 29 28 41 28 34 34 29 29 28 54 33 29 28 41 28 33 29 29 ┆RATÖRSNUMMER:')(A(44))(T3)(A(3))┆
0x150b4…150c3 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x150c3…150e3 (13, 0, 67) 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L2; ┆
0x150e3…15103 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15103…15112 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15112…15161 (13, 0, 68) 0x20[0x4f]
0x15161…15181 (13, 0, 69) 53 32 3a 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 31 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆S2: DO I=1 TO 12; ┆
0x15181…151a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x151a1…151b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x151b0…151d0 (13, 0, 70) 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 ┆ PUT FILE(D) SKIP EDIT('┆
0x151d0…151f0 4f 50 45 52 41 54 5c 52 53 4e 55 4d 4d 45 52 3a 27 29 28 41 28 34 34 29 29 28 54 33 29 28 41 28 ┆OPERATÖRSNUMMER:')(A(44))(T3)(A(┆
0x151f0…151ff 33 29 29 20 20 20 20 20 20 20 20 20 20 20 20 ┆3)) ┆
0x151ff…1521f (13, 0, 71) 20 20 20 20 20 20 20 20 20 28 27 54 49 4c 4c 54 52 5b 44 45 20 54 49 4c 4c 20 48 55 56 55 44 52 ┆ ('TILLTRÄDE TILL HUVUDR┆
0x1521f…1523f 55 54 49 4e 20 4e 55 4d 4d 45 52 27 29 28 41 28 34 33 29 29 28 49 29 28 41 28 34 29 29 20 20 20 ┆UTIN NUMMER')(A(43))(I)(A(4)) ┆
0x1523f…1524e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1524e…1526e (13, 0, 72) 20 20 20 20 20 20 20 20 20 28 27 55 4e 44 45 52 52 55 54 49 4e 20 4e 52 20 20 20 31 20 33 20 35 ┆ ('UNDERRUTIN NR 1 3 5┆
0x1526e…1528e 20 37 20 39 31 31 31 27 29 28 41 28 36 34 29 29 28 27 32 20 34 20 36 20 38 20 30 31 32 27 29 28 ┆ 7 9111')(A(64))('2 4 6 8 012')(┆
0x1528e…1529d 41 28 34 36 29 29 3b 20 20 20 20 20 20 20 20 ┆A(46)); ┆
0x1529d…152bd (13, 0, 73) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 54 41 42 28 49 29 2c 31 32 29 3b 20 ┆ CALL TYPIST(TAB(I),12); ┆
0x152bd…152dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x152dd…152ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x152ec…1530c (13, 0, 74) 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 27 10 27 2c 31 29 3b 20 20 20 20 ┆ CALL TYPIST(' ',1); ┆
0x1530c…1532c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1532c…1533b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1533b…1535b (13, 0, 75) 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x1535b…1537b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1537b…1538a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1538a…153aa (13, 0, 76) 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 54 31 32 29 3b 20 20 20 20 ┆ GET SKIP LIST(T12); ┆
0x153aa…153ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x153ca…153d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x153d9…153f9 (13, 0, 77) 20 20 20 20 20 20 20 20 20 49 46 20 54 31 32 7f 3d 54 41 42 28 49 29 20 54 48 45 4e 20 44 4f 3b ┆ IF T12 =TAB(I) THEN DO;┆
0x153f9…15419 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15419…15428 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15428…15448 (13, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 54 41 42 28 49 29 3d 54 31 32 3b 20 20 20 20 20 20 20 20 20 ┆ TAB(I)=T12; ┆
0x15448…15468 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15468…15477 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15477…15497 (13, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FLAGG=1; ┆
0x15497…154b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x154b7…154c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x154c6…154e6 (13, 0, 80) 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x154e6…15506 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15506…15515 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15515…15535 (13, 0, 81) 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x15535…15555 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15555…15564 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15564…15584 (14, 0, 0) 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 4f 50 45 ┆ PUT FILE(D) SKIP EDIT('OPE┆
0x15584…155a4 52 41 54 5c 52 53 4e 55 4d 4d 45 52 3a 27 29 28 41 28 34 34 29 29 28 54 33 29 28 41 28 33 29 29 ┆RATÖRSNUMMER:')(A(44))(T3)(A(3))┆
0x155a4…155b3 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x155b3…155d3 (14, 0, 1) 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L2; ┆
0x155d3…155f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x155f3…15602 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15602…15651 (14, 0, 2) 0x20[0x4f]
[…0x1…]
0x156a0…156c0 (14, 0, 4) 53 33 3a 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 4f 50 45 ┆S3: PUT FILE(D) SKIP EDIT('OPE┆
0x156c0…156e0 52 41 54 5c 52 53 4e 55 4d 4d 45 52 3a 27 29 28 41 28 34 34 29 29 28 54 33 29 28 41 28 34 29 29 ┆RATÖRSNUMMER:')(A(44))(T3)(A(4))┆
0x156e0…156ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x156ef…1570f (14, 0, 5) 20 20 20 20 20 20 28 27 41 4e 4d 5b 52 4b 4e 49 4e 47 3a 27 29 28 41 28 31 35 29 29 3b 20 20 20 ┆ ('ANMÄRKNING:')(A(15)); ┆
0x1570f…1572f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1572f…1573e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1573e…1575e (14, 0, 6) 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 41 4e 4d 2c 33 32 29 3b 20 20 20 20 20 20 ┆ CALL TYPIST(ANM,32); ┆
0x1575e…1577e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1577e…1578d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1578d…157ad (14, 0, 7) 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 27 10 27 2c 31 29 3b 20 20 20 20 20 20 20 ┆ CALL TYPIST(' ',1); ┆
0x157ad…157cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x157cd…157dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x157dc…157fc (14, 0, 8) 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x157fc…1581c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1581c…1582b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1582b…1584b (14, 0, 9) 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 54 33 32 29 3b 20 20 20 20 20 20 20 ┆ GET SKIP LIST(T32); ┆
0x1584b…1586b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1586b…1587a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1587a…1589a (14, 0, 10) 20 20 20 20 20 20 49 46 20 54 33 32 7f 3d 41 4e 4d 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 ┆ IF T32 =ANM THEN DO; ┆
0x1589a…158ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x158ba…158c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x158c9…158e9 (14, 0, 11) 20 20 20 20 20 20 20 20 20 41 4e 4d 3d 54 33 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ANM=T32; ┆
0x158e9…15909 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15909…15918 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15918…15938 (14, 0, 12) 20 20 20 20 20 20 20 20 20 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FLAGG=1; ┆
0x15938…15958 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15958…15967 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15967…15987 (14, 0, 13) 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x15987…159a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x159a7…159b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x159b6…159d6 (14, 0, 14) 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 4f 50 45 ┆ PUT FILE(D) SKIP EDIT('OPE┆
0x159d6…159f6 52 41 54 5c 52 53 4e 55 4d 4d 45 52 3a 27 29 28 41 28 34 34 29 29 28 54 33 29 28 41 28 33 29 29 ┆RATÖRSNUMMER:')(A(44))(T3)(A(3))┆
0x159f6…15a05 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x15a05…15a25 (14, 0, 15) 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L2; ┆
0x15a25…15a45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15a45…15a54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15a54…15aa3 (14, 0, 16) 0x20[0x4f]
[…0x1…]
0x15af2…15b12 (14, 0, 18) 53 34 3a 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 4f 50 45 ┆S4: PUT FILE(D) SKIP EDIT('OPE┆
0x15b12…15b32 52 41 54 5c 52 53 4e 55 4d 4d 45 52 3a 27 29 28 41 28 34 34 29 29 3b 20 20 20 20 20 20 20 20 20 ┆RATÖRSNUMMER:')(A(44)); ┆
0x15b32…15b41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15b41…15b61 (14, 0, 19) 20 20 20 20 20 20 49 46 20 46 4c 41 47 47 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆ IF FLAGG=1 THEN DO; ┆
0x15b61…15b81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15b81…15b90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15b90…15bb0 (14, 0, 20) 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 56 45 43 4b 47 45 4e 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL VECKGEN; ┆
0x15bb0…15bd0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15bd0…15bdf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15bdf…15bff (14, 0, 21) 20 20 20 20 20 20 20 20 20 52 45 57 52 49 54 45 20 46 49 4c 45 28 4b 46 49 4c 29 20 46 52 4f 4d ┆ REWRITE FILE(KFIL) FROM┆
0x15bff…15c1f 28 4b 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(KSTR); ┆
0x15c1f…15c2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15c2e…15c4e (14, 0, 22) 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x15c4e…15c6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15c6e…15c7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15c7d…15c9d (14, 0, 23) 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x15c9d…15cbd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15cbd…15ccc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15ccc…15d1b (14, 0, 24) 0x20[0x4f]
[…0x1…]
0x15d6a…15d8a (14, 0, 26) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x15d8a…15daa 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 20 20 ┆U D P R O G R A M E T */ ┆
0x15daa…15db9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15db9…15e08 (14, 0, 27) 0x20[0x4f]
0x15e08…15e28 (14, 0, 28) 4c 30 3a 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 20 20 ┆L0: UNSPEC(P)=16570; ┆
0x15e28…15e48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15e48…15e57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15e57…15e77 (14, 0, 29) 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x15e77…15e97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15e97…15ea6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15ea6…15ec6 (14, 0, 30) 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x15ec6…15ee6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15ee6…15ef5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15ef5…15f15 (14, 0, 31) 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 47 4f 20 ┆ IF DATUM='0 ' THEN GO ┆
0x15f15…15f35 54 4f 20 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO UT; ┆
0x15f35…15f44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15f44…15f64 (14, 0, 32) 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x15f64…15f84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15f84…15f93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15f93…15fe2 (14, 0, 33) 0x20[0x4f]
0x15fe2…16002 (14, 0, 34) 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 4f 50 45 ┆ PUT FILE(D) SKIP EDIT('OPE┆
0x16002…16022 52 41 54 5c 52 53 4e 55 4d 4d 45 52 3a 27 29 28 41 28 34 34 29 29 3b 20 20 20 20 20 20 20 20 20 ┆RATÖRSNUMMER:')(A(44)); ┆
0x16022…16031 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16031…16051 (14, 0, 35) 20 20 20 20 20 20 4f 50 45 4e 20 4b 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN KFIL; ┆
0x16051…16071 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16071…16080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16080…160a0 (14, 0, 36) 4c 31 3a 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 54 33 29 3b 20 20 20 20 20 20 20 20 ┆L1: GET SKIP LIST(T3); ┆
0x160a0…160c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x160c0…160cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x160cf…160ef (14, 0, 37) 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 54 33 29 28 41 28 33 29 29 ┆ PUT FILE(D) EDIT(T3)(A(3))┆
0x160ef…1610f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x1610f…1611e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1611e…1613e (14, 0, 38) 20 20 20 20 20 20 49 3d 54 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=T3; ┆
0x1613e…1615e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1615e…1616d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1616d…1618d (14, 0, 39) 20 20 20 20 20 20 49 46 20 49 3c 31 20 7c 20 49 3e 31 30 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 ┆ IF I<1 ö I>100 THEN GO TO ┆
0x1618d…161ad 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UT; ┆
0x161ad…161bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x161bc…161dc (14, 0, 40) 20 20 20 20 20 20 55 4e 53 50 45 43 28 4b 46 49 4c 29 3d 49 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ UNSPEC(KFIL)=I; ┆
0x161dc…161fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x161fc…1620b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1620b…1622b (14, 0, 41) 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 4b 46 49 4c 29 20 49 4e 54 4f 28 4b 53 54 52 29 ┆ READ FILE(KFIL) INTO(KSTR)┆
0x1622b…1624b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x1624b…1625a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1625a…1627a (14, 0, 42) 20 20 20 20 20 20 43 41 4c 4c 20 54 41 42 47 45 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL TABGEN; ┆
0x1627a…1629a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1629a…162a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x162a9…162c9 (14, 0, 43) 20 20 20 20 20 20 46 4c 41 47 47 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FLAGG=0; ┆
0x162c9…162e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x162e9…162f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x162f8…16318 (14, 0, 44) 4c 32 3a 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 56 41 44 20 53 4b 41 4c ┆L2: PUT FILE(D) EDIT('VAD SKAL┆
0x16318…16338 4c 20 5b 4e 44 52 41 53 27 29 28 41 28 34 37 29 29 28 27 31 20 3d 20 4f 50 45 52 41 54 5c 52 53 ┆L ÄNDRAS')(A(47))('1 = OPERATÖRS┆
0x16338…16347 4b 4f 44 27 29 28 41 28 34 37 29 29 20 20 20 ┆KOD')(A(47)) ┆
0x16347…16367 (14, 0, 45) 20 20 20 20 20 20 28 27 32 20 3d 20 54 49 4c 4c 54 52 5b 44 45 27 29 28 41 28 34 37 29 29 20 20 ┆ ('2 = TILLTRÄDE')(A(47)) ┆
0x16367…16387 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16387…16396 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16396…163b6 (14, 0, 46) 20 20 20 20 20 20 28 27 33 20 3d 20 41 4e 4d 5b 52 4b 4e 49 4e 47 27 29 28 41 28 34 37 29 29 20 ┆ ('3 = ANMÄRKNING')(A(47)) ┆
0x163b6…163d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x163d6…163e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x163e5…16405 (14, 0, 47) 20 20 20 20 20 20 28 27 4e 20 3d 20 41 4e 4e 41 4e 20 4f 50 45 52 41 54 5c 52 27 29 28 41 28 34 ┆ ('N = ANNAN OPERATÖR')(A(4┆
0x16405…16425 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆7)) ┆
0x16425…16434 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16434…16454 (14, 0, 48) 20 20 20 20 20 20 28 27 53 20 3d 20 41 56 53 4c 55 54 4e 49 4e 47 20 41 56 20 52 55 54 49 4e 45 ┆ ('S = AVSLUTNING AV RUTINE┆
0x16454…16474 4e 27 29 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆N')(A(47)); ┆
0x16474…16483 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16483…164a3 (14, 0, 49) 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 53 56 41 52 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(SVAR); ┆
0x164a3…164c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x164c3…164d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x164d2…16521 (14, 0, 50) 0x20[0x4f]
0x16521…16541 (14, 0, 51) 20 20 20 20 20 20 49 46 20 53 56 41 52 3d 27 31 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 31 3b ┆ IF SVAR='1' THEN GO TO S1;┆
0x16541…16561 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16561…16570 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16570…16590 (14, 0, 52) 20 20 20 20 20 20 49 46 20 53 56 41 52 3d 27 32 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 32 3b ┆ IF SVAR='2' THEN GO TO S2;┆
0x16590…165b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x165b0…165bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x165bf…165df (14, 0, 53) 20 20 20 20 20 20 49 46 20 53 56 41 52 3d 27 33 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 33 3b ┆ IF SVAR='3' THEN GO TO S3;┆
0x165df…165ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x165ff…1660e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1660e…1662e (14, 0, 54) 20 20 20 20 20 20 49 46 20 53 56 41 52 3d 27 4e 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 34 3b ┆ IF SVAR='N' THEN GO TO S4;┆
0x1662e…1664e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1664e…1665d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1665d…166ac (14, 0, 55) 0x20[0x4f]
0x166ac…166cc (14, 0, 56) 55 54 3a 20 20 20 49 46 20 46 4c 41 47 47 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆UT: IF FLAGG=1 THEN DO; ┆
0x166cc…166ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x166ec…166fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x166fb…1671b (14, 0, 57) 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 56 45 43 4b 47 45 4e 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL VECKGEN; ┆
0x1671b…1673b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1673b…1674a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1674a…1676a (14, 0, 58) 20 20 20 20 20 20 20 20 20 52 45 57 52 49 54 45 20 46 49 4c 45 28 4b 46 49 4c 29 20 46 52 4f 4d ┆ REWRITE FILE(KFIL) FROM┆
0x1676a…1678a 28 4b 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(KSTR); ┆
0x1678a…16799 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16799…167b9 (14, 0, 59) 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x167b9…167d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x167d9…167e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x167e8…16837 (14, 0, 60) 0x20[0x4f]
0x16837…16857 (14, 0, 61) 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x16857…16877 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16877…16886 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16886…168a6 (14, 0, 62) 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 ┆ CALL PLOAD('Q '); ┆
0x168a6…168c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x168c6…168d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x168d5…16924 (14, 0, 63) 0x20[0x4f]
0x16924…16944 (14, 0, 64) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x16944…16964 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16964…16973 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16973…16993 (14, 0, 65) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x169b3…169c2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x169c2…169e2 (14, 0, 66) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16a02…16a11 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16a11…16a31 (14, 0, 67) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16a51…16a60 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16a60…16a80 (14, 0, 68) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16aa0…16aaf 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16aaf…16acf (14, 0, 69) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16aef…16afe 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16afe…16b1e (14, 0, 70) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16b3e…16b4d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16b4d…16b6d (14, 0, 71) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16b8d…16b9c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16b9c…16bbc (14, 0, 72) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16bdc…16beb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16beb…16c0b (14, 0, 73) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16c2b…16c3a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16c3a…16c5a (14, 0, 74) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16c7a…16c89 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16c89…16ca9 (14, 0, 75) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16cc9…16cd8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16cd8…16cf8 (14, 0, 76) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16d18…16d27 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16d27…16d47 (14, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16d67…16d76 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16d76…16d96 (14, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16db6…16dc5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16dc5…16de5 (14, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16e05…16e14 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16e14…16e34 (14, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16e54…16e63 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16e63…16e83 (14, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x16ea3…16eb2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x16eb2…16ed2 (15, 0, 0) 2f 2a 20 56 33 20 5b 52 20 45 54 54 20 50 52 4f 47 52 41 4d 20 46 5c 52 20 5b 4e 44 52 49 4e 47 ┆/* V3 ÄR ETT PROGRAM FÖR ÄNDRING┆
0x16ed2…16ef2 20 4f 43 48 20 55 50 50 4c 5b 47 47 4e 49 4e 47 20 41 56 20 4b 4f 4e 54 4f 2c 55 4b 4f 4e 54 55 ┆ OCH UPPLÄGGNING AV KONTO,UKONTU┆
0x16ef2…16f01 20 26 20 53 4b 4b 4f 4e 54 4f 20 20 20 20 20 ┆ & SKKONTO ┆
0x16f01…16f21 (15, 0, 1) 20 20 20 22 46 32 22 20 52 45 47 49 53 54 52 45 52 41 52 20 50 4f 53 54 45 4e 20 20 20 20 20 20 ┆ "F2" REGISTRERAR POSTEN ┆
0x16f21…16f41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16f41…16f50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16f50…16f70 (15, 0, 2) 20 20 20 22 46 34 22 20 53 5c 4b 45 52 20 4e 59 20 50 4f 53 54 20 20 20 20 20 20 20 20 20 20 20 ┆ "F4" SÖKER NY POST ┆
0x16f70…16f90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16f90…16f9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16f9f…16fbf (15, 0, 3) 20 20 20 52 55 54 49 4e 45 4e 20 4b 4f 4e 54 52 4f 4c 45 52 41 52 20 46 5c 52 53 54 41 20 53 49 ┆ RUTINEN KONTROLERAR FÖRSTA SI┆
0x16fbf…16fdf 46 46 52 41 4e 20 49 20 4b 4f 4e 54 4f 4e 55 4d 4d 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FFRAN I KONTONUMMER ┆
0x16fdf…16fee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x16fee…1700e (15, 0, 4) 20 20 20 56 20 30 3a 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ V 0:1 ┆
0x1700e…1702e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1702e…1703d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1703d…1705d (15, 0, 5) 20 20 20 50 52 47 20 4a 5d 20 37 38 30 39 30 36 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PRG JÅ 780906 */ ┆
0x1705d…1707d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1707d…1708c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1708c…170db (15, 0, 6) 0x20[0x4f]
[…0x1…]
0x1712a…1714a (15, 0, 8) 2f 2a 44 43 4c 20 44 55 4d 4d 28 33 30 29 20 43 48 41 52 28 31 32 30 29 3b 20 20 20 20 20 20 20 ┆/*DCL DUMM(30) CHAR(120); ┆
0x1714a…1716a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ */ ┆
0x1716a…17179 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17179…171c8 (15, 0, 9) 0x20[0x4f]
[…0x1…]
0x17217…17237 (15, 0, 11) 44 43 4c 20 31 20 4b 4f 4e 54 4f 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 KONTOSTR, ┆
0x17237…17257 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17257…17266 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17266…17286 (15, 0, 12) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 35 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 KONTO5 CHAR(5), ┆
0x17286…172a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x172a6…172b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x172b5…172d5 (15, 0, 13) 20 20 20 20 20 20 32 20 53 44 41 54 55 4d 35 20 46 49 58 45 44 28 36 29 2c 20 20 20 20 20 20 20 ┆ 2 SDATUM5 FIXED(6), ┆
0x172d5…172f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x172f5…17304 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17304…17324 (15, 0, 14) 20 20 20 20 20 20 32 20 54 45 58 54 35 20 43 48 41 52 28 33 32 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT5 CHAR(32), ┆
0x17324…17344 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17344…17353 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17353…17373 (15, 0, 15) 20 20 20 20 20 20 32 20 55 48 4d 41 52 4b 35 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 ┆ 2 UHMARK5 CHAR(1), ┆
0x17373…17393 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17393…173a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x173a2…173c2 (15, 0, 16) 20 20 20 20 20 20 32 20 4c 49 53 54 42 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 LISTB BINARY, ┆
0x173c2…173e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x173e2…173f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x173f1…17411 (15, 0, 17) 20 20 20 20 20 20 32 20 49 4b 42 20 42 49 4e 41 52 59 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 IKB BINARY; ┆
0x17411…17431 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17431…17440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17440…17460 (15, 0, 18) 20 20 20 20 20 20 2f 2a 20 34 36 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 46 BYTES */ ┆
0x17460…17480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17480…1748f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1748f…174de (15, 0, 19) 0x20[0x4f]
[…0x1…]
0x1752d…1754d (15, 0, 21) 44 43 4c 20 31 20 55 4b 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 UKSTR, ┆
0x1754d…1756d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1756d…1757c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1757c…1759c (15, 0, 22) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 33 20 43 48 41 52 28 33 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 KONTO3 CHAR(3), ┆
0x1759c…175bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x175bc…175cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x175cb…175eb (15, 0, 23) 20 20 20 20 20 20 32 20 53 44 41 54 55 4d 33 20 46 49 58 45 44 28 36 29 2c 20 20 20 20 20 20 20 ┆ 2 SDATUM3 FIXED(6), ┆
0x175eb…1760b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1760b…1761a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1761a…1763a (15, 0, 24) 20 20 20 20 20 20 32 20 54 45 58 54 20 43 48 41 52 28 33 32 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT CHAR(32), ┆
0x1763a…1765a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1765a…17669 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17669…17689 (15, 0, 25) 20 20 20 20 20 20 32 20 55 48 4d 41 52 4b 20 43 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 20 20 ┆ 2 UHMARK CHAR(1); ┆
0x17689…176a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x176a9…176b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x176b8…176d8 (15, 0, 26) 20 20 20 20 20 20 2f 2a 20 34 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 40 BYTES */ ┆
0x176d8…176f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x176f8…17707 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17707…17756 (15, 0, 27) 0x20[0x4f]
[…0x1…]
0x177a5…177c5 (15, 0, 29) 44 43 4c 20 31 20 46 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 FSTR, ┆
0x177c5…177e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x177e5…177f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x177f4…17814 (15, 0, 30) 20 20 20 20 20 20 32 20 46 49 4c 31 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIL1 FILE; ┆
0x17814…17834 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17834…17843 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17843…17892 (15, 0, 31) 0x20[0x4f]
0x17892…178b2 (15, 0, 32) 44 43 4c 20 31 20 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 STR, ┆
0x178b2…178d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x178d2…178e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x178e1…17901 (15, 0, 33) 20 20 20 20 20 20 32 20 58 4e 20 43 48 41 52 28 32 34 29 20 49 4e 49 54 28 27 20 20 4b 4f 4e 54 ┆ 2 XN CHAR(24) INIT(' KONT┆
0x17901…17921 4f 50 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OP '); ┆
0x17921…17930 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17930…1797f (15, 0, 34) 0x20[0x4f]
0x1797f…1799f (15, 0, 35) 44 43 4c 20 53 46 4c 41 47 47 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 ┆DCL SFLAGG BINARY INIT(0), ┆
0x1799f…179bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x179bf…179ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x179ce…179ee (15, 0, 36) 20 20 20 20 52 46 4c 41 47 47 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RFLAGG BINARY, ┆
0x179ee…17a0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17a0e…17a1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17a1d…17a3d (15, 0, 37) 20 20 20 20 54 33 20 43 48 41 52 28 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T3 CHAR(3), ┆
0x17a3d…17a5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17a5d…17a6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17a6c…17a8c (15, 0, 38) 20 20 20 20 54 35 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T5 CHAR(5), ┆
0x17a8c…17aac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17aac…17abb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17abb…17adb (15, 0, 39) 20 20 20 20 54 38 20 43 48 41 52 28 38 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T8 CHAR(8), ┆
0x17adb…17afb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17afb…17b0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17b0a…17b2a (15, 0, 40) 20 20 20 20 54 32 31 20 43 48 41 52 28 32 31 29 20 49 4e 49 54 28 27 31 32 33 34 35 20 20 20 20 ┆ T21 CHAR(21) INIT('12345 ┆
0x17b2a…17b4a 20 20 30 31 32 33 34 35 36 37 38 39 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 0123456789'), ┆
0x17b4a…17b59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17b59…17b79 (15, 0, 41) 20 20 20 20 54 32 37 20 43 48 41 52 28 32 37 29 20 49 4e 49 54 28 27 53 4f 52 54 20 4b 4f 4e 54 ┆ T27 CHAR(27) INIT('SORT KONT┆
0x17b79…17b99 4f 50 20 20 20 53 4f 52 54 46 49 4c 20 35 20 30 20 51 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆OP SORTFIL 5 0 Q'), ┆
0x17b99…17ba8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17ba8…17bc8 (15, 0, 42) 20 20 20 20 54 32 39 20 43 48 41 52 28 32 39 29 20 49 4e 49 54 28 27 53 44 41 54 55 4d 20 20 55 ┆ T29 CHAR(29) INIT('SDATUM U┆
0x17bc8…17be8 4d 20 4c 49 53 54 4d 20 20 55 4b 20 20 49 4b 2d 53 4c 41 47 27 29 2c 20 20 20 20 20 20 20 20 20 ┆M LISTM UK IK-SLAG'), ┆
0x17be8…17bf7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17bf7…17c17 (15, 0, 43) 20 20 20 20 4c 49 53 54 4d 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ LISTM CHAR(5), ┆
0x17c17…17c37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17c37…17c46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17c46…17c66 (15, 0, 44) 20 20 20 20 55 4b 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UK CHAR(1), ┆
0x17c66…17c86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17c86…17c95 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17c95…17cb5 (15, 0, 45) 20 20 20 20 49 4b 53 4c 41 47 20 43 48 41 52 28 31 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IKSLAG CHAR(10), ┆
0x17cb5…17cd5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17cd5…17ce4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17ce4…17d04 (15, 0, 46) 20 20 20 20 53 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SDATUM CHAR(6), ┆
0x17d04…17d24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17d24…17d33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17d33…17d53 (15, 0, 47) 20 20 20 20 42 55 46 46 20 43 48 41 52 28 33 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BUFF CHAR(32), ┆
0x17d53…17d73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17d73…17d82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17d82…17da2 (15, 0, 48) 20 20 20 20 54 4f 4d 20 43 48 41 52 28 33 32 29 20 49 4e 49 54 28 27 20 20 20 20 20 20 20 20 20 ┆ TOM CHAR(32) INIT(' ┆
0x17da2…17dc2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 29 2c 20 20 20 20 20 20 ┆ '), ┆
0x17dc2…17dd1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17dd1…17df1 (15, 0, 49) 20 20 20 20 55 4b 54 4f 4c 45 44 54 45 58 54 20 20 20 20 20 20 20 43 48 41 52 20 28 33 32 29 20 ┆ UKTOLEDTEXT CHAR (32) ┆
0x17df1…17e11 49 4e 49 54 20 28 27 41 2d 43 2d 45 2d 47 2d 49 2d 4b 2d 4d 2d 4f 2d 51 2d 53 2d 55 2d 58 2d 5a ┆INIT ('A-C-E-G-I-K-M-O-Q-S-U-X-Z┆
0x17e11…17e20 31 2d 33 2d 35 2d 37 27 29 2c 20 20 20 20 20 ┆1-3-5-7'), ┆
0x17e20…17e40 (15, 0, 50) 20 20 20 20 46 49 4c 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FIL BINARY, ┆
0x17e40…17e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17e60…17e6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17e6f…17e8f (15, 0, 51) 20 20 20 20 46 52 54 59 50 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FRTYP BINARY, ┆
0x17e8f…17eaf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17eaf…17ebe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17ebe…17ede (15, 0, 52) 20 20 20 20 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM CHAR(6), ┆
0x17ede…17efe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17efe…17f0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17f0d…17f2d (15, 0, 53) 20 20 20 20 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ P POINTER, ┆
0x17f2d…17f4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17f4d…17f5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17f5c…17f7c (15, 0, 54) 20 20 20 20 44 20 42 41 53 45 44 28 50 29 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 ┆ D BASED(P) CHAR(6), ┆
0x17f7c…17f9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17f9c…17fab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17fab…17fcb (15, 0, 55) 20 20 20 20 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PP POINTER, ┆
0x17fcb…17feb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17feb…17ffa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x17ffa…1801a (15, 0, 56) 20 20 20 20 31 20 53 54 52 58 20 42 41 53 45 44 28 50 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 STRX BASED(PP), ┆
0x1801a…1803a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1803a…18049 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18049…18069 (15, 0, 57) 20 20 20 20 20 20 32 20 58 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 X CHAR(2), ┆
0x18069…18089 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18089…18098 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18098…180b8 (15, 0, 58) 20 20 20 20 20 20 32 20 59 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 Y CHAR(2), ┆
0x180b8…180d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x180d8…180e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x180e7…18107 (15, 0, 59) 20 20 20 20 20 20 32 20 46 49 52 4d 41 20 43 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIRMA CHAR(1); ┆
0x18107…18127 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18127…18136 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18136…18185 (15, 0, 60) 0x20[0x4f]
[…0x2…]
0x18223…18243 (15, 0, 63) 46 49 4c 47 45 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FILGEN:PROC; ┆
0x18243…18263 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18263…18272 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18272…18292 (15, 0, 64) 20 20 20 20 20 20 20 20 4c 49 53 54 42 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ LISTB=0; ┆
0x18292…182b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x182b2…182c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x182c1…182e1 (15, 0, 65) 20 20 20 20 20 20 20 20 49 4b 42 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IKB=0; ┆
0x182e1…18301 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18301…18310 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18310…18330 (15, 0, 66) 20 20 20 20 20 20 20 20 4a 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=1; ┆
0x18330…18350 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18350…1835f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1835f…1837f (15, 0, 67) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 5; ┆
0x1837f…1839f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1839f…183ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x183ae…183ce (15, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 4c 49 53 54 4d 2c 49 2c 31 29 3d ┆ IF SUBSTR(LISTM,I,1)=┆
0x183ce…183ee 27 31 27 20 54 48 45 4e 20 4c 49 53 54 42 3d 4c 49 53 54 42 2b 4a 3b 20 20 20 20 20 20 20 20 20 ┆'1' THEN LISTB=LISTB+J; ┆
0x183ee…183fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x183fd…1841d (15, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 4a 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J*2; ┆
0x1841d…1843d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1843d…1844c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1844c…1846c (15, 0, 70) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1846c…1848c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1848c…1849b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1849b…184bb (15, 0, 71) 20 20 20 20 20 20 20 20 4a 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=1; ┆
0x184bb…184db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x184db…184ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x184ea…1850a (15, 0, 72) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 31 30 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 10; ┆
0x1850a…1852a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1852a…18539 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18539…18559 (15, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 49 4b 53 4c 41 47 2c 49 2c 31 29 ┆ IF SUBSTR(IKSLAG,I,1)┆
0x18559…18579 7f 3d 27 20 27 20 54 48 45 4e 20 49 4b 42 3d 49 4b 42 2b 4a 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ =' ' THEN IKB=IKB+J; ┆
0x18579…18588 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18588…185a8 (15, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 4a 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J*2; ┆
0x185a8…185c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x185c8…185d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x185d7…185f7 (15, 0, 75) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x185f7…18617 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18617…18626 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18626…18646 (15, 0, 76) 20 20 20 20 20 20 20 20 49 46 20 55 4b 3d 27 31 27 20 54 48 45 4e 20 49 4b 42 3d 49 4b 42 2b 4a ┆ IF UK='1' THEN IKB=IKB+J┆
0x18646…18666 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x18666…18675 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18675…18695 (15, 0, 77) 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 35 3d 54 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTO5=T5; ┆
0x18695…186b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x186b5…186c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x186c4…186e4 (15, 0, 78) 20 20 20 20 20 20 20 20 53 44 41 54 55 4d 35 3d 53 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 ┆ SDATUM5=SDATUM; ┆
0x186e4…18704 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18704…18713 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18713…18733 (15, 0, 79) 20 20 20 20 20 20 20 20 54 45 58 54 35 3d 54 45 58 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TEXT5=TEXT; ┆
0x18733…18753 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18753…18762 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18762…18782 (15, 0, 80) 20 20 20 20 20 20 20 20 55 48 4d 41 52 4b 35 3d 55 48 4d 41 52 4b 3b 20 20 20 20 20 20 20 20 20 ┆ UHMARK5=UHMARK; ┆
0x18782…187a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x187a2…187b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x187b1…187d1 (15, 0, 81) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x187d1…187f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x187f1…18800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18800…18820 (16, 0, 0) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x18820…18840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18840…1884f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1884f…1889e (16, 0, 1) 0x20[0x4f]
0x1889e…188be (16, 0, 2) 53 54 52 47 45 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STRGEN:PROC; ┆
0x188be…188de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x188de…188ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x188ed…1890d (16, 0, 3) 20 20 20 20 20 20 20 20 4c 49 53 54 4d 3d 54 4f 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ LISTM=TOM; ┆
0x1890d…1892d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1892d…1893c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1893c…1895c (16, 0, 4) 20 20 20 20 20 20 20 20 49 4b 53 4c 41 47 3d 54 4f 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IKSLAG=TOM; ┆
0x1895c…1897c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1897c…1898b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1898b…189ab (16, 0, 5) 20 20 20 20 20 20 20 20 4a 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=1; ┆
0x189ab…189cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x189cb…189da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x189da…189fa (16, 0, 6) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 5; ┆
0x189fa…18a1a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18a1a…18a29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18a29…18a49 (16, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4a 26 4c 49 53 54 42 29 3d 4a 20 54 48 45 4e 20 53 ┆ IF (J&LISTB)=J THEN S┆
0x18a49…18a69 55 42 53 54 52 28 4c 49 53 54 4d 2c 49 2c 31 29 3d 27 31 27 3b 20 20 20 20 20 20 20 20 20 20 20 ┆UBSTR(LISTM,I,1)='1'; ┆
0x18a69…18a78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18a78…18a98 (16, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 4a 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J*2; ┆
0x18a98…18ab8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18ab8…18ac7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18ac7…18ae7 (16, 0, 9) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x18ae7…18b07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18b07…18b16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18b16…18b36 (16, 0, 10) 20 20 20 20 20 20 20 20 4a 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=1; ┆
0x18b36…18b56 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18b56…18b65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18b65…18b85 (16, 0, 11) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 30 20 54 4f 20 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=0 TO 9; ┆
0x18b85…18ba5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18ba5…18bb4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18bb4…18bd4 (16, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 55 4b 3d 49 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UK=I; ┆
0x18bd4…18bf4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18bf4…18c03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18c03…18c23 (16, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4a 26 49 4b 42 29 3d 4a 20 54 48 45 4e 20 53 55 42 ┆ IF (J&IKB)=J THEN SUB┆
0x18c23…18c43 53 54 52 28 49 4b 53 4c 41 47 2c 49 2b 31 2c 31 29 3d 55 4b 3b 20 20 20 20 20 20 20 20 20 20 20 ┆STR(IKSLAG,I+1,1)=UK; ┆
0x18c43…18c52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18c52…18c72 (16, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 4a 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J*2; ┆
0x18c72…18c92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18c92…18ca1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18ca1…18cc1 (16, 0, 15) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x18cc1…18ce1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18ce1…18cf0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18cf0…18d10 (16, 0, 16) 20 20 20 20 20 20 20 20 55 4b 3d 27 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UK=' '; ┆
0x18d10…18d30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18d30…18d3f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18d3f…18d5f (16, 0, 17) 20 20 20 20 20 20 20 20 49 46 20 28 4a 20 26 20 49 4b 42 29 20 3d 20 4a 20 54 48 45 4e 20 55 4b ┆ IF (J & IKB) = J THEN UK┆
0x18d5f…18d7f 3d 27 31 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆='1'; ┆
0x18d7f…18d8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18d8e…18dae (16, 0, 18) 20 20 20 20 20 20 20 20 53 44 41 54 55 4d 3d 53 44 41 54 55 4d 35 3b 20 20 20 20 20 20 20 20 20 ┆ SDATUM=SDATUM5; ┆
0x18dae…18dce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18dce…18ddd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18ddd…18dfd (16, 0, 19) 20 20 20 20 20 20 20 20 54 45 58 54 3d 54 45 58 54 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TEXT=TEXT5; ┆
0x18dfd…18e1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18e1d…18e2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18e2c…18e4c (16, 0, 20) 20 20 20 20 20 20 20 20 55 48 4d 41 52 4b 3d 55 48 4d 41 52 4b 35 3b 20 20 20 20 20 20 20 20 20 ┆ UHMARK=UHMARK5; ┆
0x18e4c…18e6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18e6c…18e7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18e7b…18e9b (16, 0, 21) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x18e9b…18ebb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18ebb…18eca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18eca…18eea (16, 0, 22) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x18eea…18f0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18f0a…18f19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18f19…18f68 (16, 0, 23) 0x20[0x4f]
0x18f68…18f88 (16, 0, 24) 4b 4f 4e 54 4f 49 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTOIN:PROC; ┆
0x18f88…18fa8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18fa8…18fb7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x18fb7…18fd7 (16, 0, 25) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 20 ┆ PUT FILE(D) SKIP EDIT(' ┆
0x18fd7…18ff7 20 4b 4f 4e 54 4f 27 29 28 41 28 39 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTO')(A(96)); ┆
0x18ff7…19006 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19006…19026 (16, 0, 26) 4b 31 3a 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 54 35 29 3b 20 20 20 20 20 20 ┆K1: GET SKIP LIST(T5); ┆
0x19026…19046 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19046…19055 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19055…19075 (16, 0, 27) 20 20 20 20 20 20 20 20 49 46 20 54 35 3d 27 20 20 20 20 20 27 20 54 48 45 4e 20 47 4f 20 54 4f ┆ IF T5=' ' THEN GO TO┆
0x19075…19095 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SLUT; ┆
0x19095…190a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x190a4…190c4 (16, 0, 28) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 7f 3d 31 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 32 3b ┆ IF FIL =1 THEN GO TO K2;┆
0x190c4…190e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x190e4…190f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x190f3…19113 (16, 0, 29) 20 20 20 20 20 20 20 20 49 46 20 28 46 49 4c 3d 31 29 20 26 20 28 53 55 42 53 54 52 28 54 35 2c ┆ IF (FIL=1) & (SUBSTR(T5,┆
0x19113…19133 31 2c 31 29 20 3d 20 27 38 27 29 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 32 3b 20 20 20 20 20 20 ┆1,1) = '8') THEN GO TO K2; ┆
0x19133…19142 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19142…19162 (16, 0, 30) 20 20 20 20 20 20 20 20 49 46 20 28 46 49 4c 3d 31 29 20 26 20 28 53 55 42 53 54 52 28 54 35 2c ┆ IF (FIL=1) & (SUBSTR(T5,┆
0x19162…19182 31 2c 31 29 20 3d 20 27 39 27 29 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 32 3b 20 20 20 20 20 20 ┆1,1) = '9') THEN GO TO K2; ┆
0x19182…19191 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19191…191b1 (16, 0, 31) 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x191b1…191d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x191d1…191e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x191e0…19200 (16, 0, 32) 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO K1; ┆
0x19200…19220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19220…1922f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1922f…1924f (16, 0, 33) 4b 32 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆K2: ┆
0x1924f…1926f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1926f…1927e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1927e…1929e (16, 0, 34) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆ IF FIL=1 THEN DO; ┆
0x1929e…192be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x192be…192cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x192cd…192ed (16, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 54 35 29 28 ┆ PUT FILE(D) EDIT(T5)(┆
0x192ed…1930d 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A); ┆
0x1930d…1931c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1931c…1933c (16, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 46 45 4c 3b 20 20 ┆ ON ERROR GO TO FEL; ┆
0x1933c…1935c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1935c…1936b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1936b…1938b (16, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 54 35 29 20 46 49 4c 45 28 46 49 4c ┆ READ KEY(T5) FILE(FIL┆
0x1938b…193ab 31 29 20 49 4e 54 4f 28 4b 4f 4e 54 4f 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1) INTO(KONTOSTR); ┆
0x193ab…193ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x193ba…193da (16, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 52 47 45 4e 3b 20 20 20 20 20 20 20 20 20 ┆ CALL STRGEN; ┆
0x193da…193fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x193fa…19409 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19409…19429 (16, 0, 39) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x19429…19449 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19449…19458 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19458…19478 (16, 0, 40) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x19478…19498 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19498…194a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x194a7…194c7 (16, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 54 33 3d 54 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T3=T5; ┆
0x194c7…194e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x194e7…194f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x194f6…19516 (16, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 54 33 29 28 ┆ PUT FILE(D) EDIT(T3)(┆
0x19516…19536 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A); ┆
0x19536…19545 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19545…19565 (16, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 46 45 4c 3b 20 20 ┆ ON ERROR GO TO FEL; ┆
0x19565…19585 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19585…19594 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19594…195b4 (16, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 54 33 29 20 46 49 4c 45 28 46 49 4c ┆ READ KEY(T3) FILE(FIL┆
0x195b4…195d4 31 29 20 49 4e 54 4f 28 55 4b 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1) INTO(UKSTR); ┆
0x195d4…195e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x195e3…19603 (16, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 53 44 41 54 55 4d 3d 53 44 41 54 55 4d 33 3b 20 20 20 20 20 20 ┆ SDATUM=SDATUM3; ┆
0x19603…19623 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19623…19632 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19632…19652 (16, 0, 46) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x19652…19672 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19672…19681 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19681…196a1 (16, 0, 47) 20 20 20 20 20 20 20 20 52 46 4c 41 47 47 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RFLAGG=0; ┆
0x196a1…196c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x196c1…196d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x196d0…196f0 (16, 0, 48) 20 20 20 20 20 20 20 20 49 46 20 53 44 41 54 55 4d 3d 27 30 27 20 54 48 45 4e 20 53 44 41 54 55 ┆ IF SDATUM='0' THEN SDATU┆
0x196f0…19710 4d 3d 27 20 20 20 20 20 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆M=' '; ┆
0x19710…1971f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1971f…1973f (16, 0, 49) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x1973f…1975f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1975f…1976e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1976e…197bd (16, 0, 50) 0x20[0x4f]
0x197bd…197dd (16, 0, 51) 46 45 4c 3a 20 20 20 20 52 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FEL: RFLAGG=1; ┆
0x197dd…197fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x197fd…1980c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1980c…1982c (16, 0, 52) 20 20 20 20 20 20 20 20 54 45 58 54 3d 54 4f 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TEXT=TOM; ┆
0x1982c…1984c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1984c…1985b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1985b…1987b (16, 0, 53) 20 20 20 20 20 20 20 20 53 44 41 54 55 4d 3d 54 4f 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SDATUM=TOM; ┆
0x1987b…1989b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1989b…198aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x198aa…198ca (16, 0, 54) 20 20 20 20 20 20 20 20 55 48 4d 41 52 4b 3d 54 4f 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UHMARK=TOM; ┆
0x198ca…198ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x198ea…198f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x198f9…19919 (16, 0, 55) 20 20 20 20 20 20 20 20 4c 49 53 54 4d 3d 54 4f 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ LISTM=TOM; ┆
0x19919…19939 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19939…19948 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19948…19968 (16, 0, 56) 20 20 20 20 20 20 20 20 55 4b 3d 54 4f 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UK=TOM; ┆
0x19968…19988 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19988…19997 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19997…199b7 (16, 0, 57) 20 20 20 20 20 20 20 20 49 4b 53 4c 41 47 3d 54 4f 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IKSLAG=TOM; ┆
0x199b7…199d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x199d7…199e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x199e6…19a06 (16, 0, 58) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x19a06…19a26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19a26…19a35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19a35…19a55 (16, 0, 59) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x19a55…19a75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19a75…19a84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19a84…19ad3 (16, 0, 60) 0x20[0x4f]
0x19ad3…19af3 (16, 0, 61) 44 49 53 50 50 55 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DISPPUT:PROC; ┆
0x19af3…19b13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19b13…19b22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19b22…19b42 (16, 0, 62) 20 20 20 20 20 20 20 20 4a 3d 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=9; ┆
0x19b42…19b62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19b62…19b71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19b71…19b91 (16, 0, 63) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x19b91…19bb1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19bb1…19bc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19bc0…19be0 (16, 0, 64) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 31 20 54 48 45 4e 20 50 55 54 20 46 49 4c 45 28 44 ┆ IF FIL=1 THEN PUT FILE(D┆
0x19be0…19c00 29 20 45 44 49 54 28 54 32 39 29 28 41 28 35 38 29 29 28 54 32 31 29 28 41 29 3b 20 20 20 20 20 ┆) EDIT(T29)(A(58))(T21)(A); ┆
0x19c00…19c0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19c0f…19c2f (16, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 ┆ ELSE PUT FILE(D) EDI┆
0x19c2f…19c4f 54 28 54 32 39 29 28 41 28 31 30 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T(T29)(A(10)); ┆
0x19c4f…19c5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19c5e…19c7e (16, 0, 66) 20 20 20 20 20 20 20 20 4a 3d 31 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=111; ┆
0x19c7e…19c9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19c9e…19cad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19cad…19ccd (16, 0, 67) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x19ccd…19ced 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19ced…19cfc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19cfc…19d1c (16, 0, 68) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 55 48 4d 41 52 4b 29 ┆ PUT FILE(D) EDIT(UHMARK)┆
0x19d1c…19d3c 28 41 28 33 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(A(3)); ┆
0x19d3c…19d4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19d4b…19d6b (16, 0, 69) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆ IF FIL=1 THEN DO; ┆
0x19d6b…19d8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19d8b…19d9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19d9a…19dba (16, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 4c 49 53 54 ┆ PUT FILE(D) EDIT(LIST┆
0x19dba…19dda 4d 29 28 41 28 37 29 29 28 55 4b 29 28 41 28 34 29 29 28 49 4b 53 4c 41 47 29 28 41 29 3b 20 20 ┆M)(A(7))(UK)(A(4))(IKSLAG)(A); ┆
0x19dda…19de9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19de9…19e09 (16, 0, 71) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x19e09…19e29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19e29…19e38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19e38…19e58 (16, 0, 72) 20 20 20 20 20 20 20 20 4a 3d 32 33 37 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=237; ┆
0x19e58…19e78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19e78…19e87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19e87…19ea7 (16, 0, 73) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x19ea7…19ec7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19ec7…19ed6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19ed6…19ef6 (16, 0, 74) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 54 45 58 54 27 29 ┆ PUT FILE(D) EDIT('TEXT')┆
0x19ef6…19f16 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(A); ┆
0x19f16…19f25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19f25…19f45 (16, 0, 75) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 20 3d 20 32 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF FIL = 2 THEN DO; ┆
0x19f45…19f65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19f65…19f74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19f74…19f94 (16, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 4a 20 3d 20 32 38 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 284; ┆
0x19f94…19fb4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19fb4…19fc3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x19fc3…19fe3 (16, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 ┆ CALL MOVEBUFF (J); ┆
0x19fe3…1a003 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a003…1a012 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a012…1a032 (16, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 55 ┆ PUT FILE (D) EDIT (U┆
0x1a032…1a052 4b 54 4f 4c 45 44 54 45 58 54 29 20 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KTOLEDTEXT) (A); ┆
0x1a052…1a061 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a061…1a081 (16, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1a081…1a0a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a0a1…1a0b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a0b0…1a0d0 (16, 0, 80) 20 20 20 20 20 20 20 20 4a 3d 33 33 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=331; ┆
0x1a0d0…1a0f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a0f0…1a0ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a0ff…1a11f (16, 0, 81) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x1a11f…1a13f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a13f…1a14e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a14e…1a16e (17, 0, 0) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 54 45 58 54 29 28 41 ┆ PUT FILE(D) EDIT(TEXT)(A┆
0x1a16e…1a18e 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x1a18e…1a19d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a19d…1a1bd (17, 0, 1) 20 20 20 20 20 20 20 20 4a 3d 31 30 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=103; ┆
0x1a1bd…1a1dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a1dd…1a1ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a1ec…1a20c (17, 0, 2) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x1a20c…1a22c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a22c…1a23b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a23b…1a25b (17, 0, 3) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 53 44 41 54 55 4d 2c 36 29 3b 20 20 ┆ CALL TYPIST(SDATUM,6); ┆
0x1a25b…1a27b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a27b…1a28a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a28a…1a2aa (17, 0, 4) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 27 10 27 2c 31 29 3b 20 20 20 20 20 ┆ CALL TYPIST(' ',1); ┆
0x1a2aa…1a2ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a2ca…1a2d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a2d9…1a2f9 (17, 0, 5) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x1a2f9…1a319 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a319…1a328 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a328…1a348 (17, 0, 6) 20 20 20 20 20 20 20 20 46 52 54 59 50 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FRTYP=1; ┆
0x1a348…1a368 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a368…1a377 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a377…1a397 (17, 0, 7) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x1a397…1a3b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a3b7…1a3c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a3c6…1a3e6 (17, 0, 8) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x1a3e6…1a406 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a406…1a415 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a415…1a464 (17, 0, 9) 0x20[0x4f]
0x1a464…1a484 (17, 0, 10) 46 52 41 45 47 41 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FRAEGA:PROC; ┆
0x1a484…1a4a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a4a4…1a4b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a4b3…1a4d3 (17, 0, 11) 44 43 4c 20 4a 4a 28 36 29 20 42 49 4e 41 52 59 20 49 4e 49 54 28 31 30 33 2c 31 31 31 2c 31 31 ┆DCL JJ(6) BINARY INIT(103,111,11┆
0x1a4d3…1a4f3 34 2c 31 32 31 2c 31 32 35 2c 33 33 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆4,121,125,331); ┆
0x1a4f3…1a502 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a502…1a522 (17, 0, 12) 20 20 20 20 20 20 20 20 4a 3d 4a 4a 28 46 52 54 59 50 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=JJ(FRTYP); ┆
0x1a522…1a542 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a542…1a551 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a551…1a571 (17, 0, 13) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x1a571…1a591 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a591…1a5a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a5a0…1a5c0 (17, 0, 14) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 31 20 54 48 45 4e 20 43 41 4c 4c 20 54 59 50 ┆ IF FRTYP=1 THEN CALL TYP┆
0x1a5c0…1a5e0 49 53 54 28 53 44 41 54 55 4d 2c 36 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IST(SDATUM,6); ┆
0x1a5e0…1a5ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a5ef…1a60f (17, 0, 15) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 32 20 54 48 45 4e 20 43 41 4c 4c 20 54 59 50 ┆ IF FRTYP=2 THEN CALL TYP┆
0x1a60f…1a62f 49 53 54 28 55 48 4d 41 52 4b 2c 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IST(UHMARK,1); ┆
0x1a62f…1a63e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a63e…1a65e (17, 0, 16) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 33 20 54 48 45 4e 20 43 41 4c 4c 20 54 59 50 ┆ IF FRTYP=3 THEN CALL TYP┆
0x1a65e…1a67e 49 53 54 28 4c 49 53 54 4d 2c 35 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IST(LISTM,5); ┆
0x1a67e…1a68d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a68d…1a6ad (17, 0, 17) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 34 20 54 48 45 4e 20 43 41 4c 4c 20 54 59 50 ┆ IF FRTYP=4 THEN CALL TYP┆
0x1a6ad…1a6cd 49 53 54 28 55 4b 2c 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IST(UK,1); ┆
0x1a6cd…1a6dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a6dc…1a6fc (17, 0, 18) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 35 20 54 48 45 4e 20 43 41 4c 4c 20 54 59 50 ┆ IF FRTYP=5 THEN CALL TYP┆
0x1a6fc…1a71c 49 53 54 28 49 4b 53 4c 41 47 2c 31 30 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IST(IKSLAG,10); ┆
0x1a71c…1a72b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a72b…1a74b (17, 0, 19) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 36 20 54 48 45 4e 20 43 41 4c 4c 20 54 59 50 ┆ IF FRTYP=6 THEN CALL TYP┆
0x1a74b…1a76b 49 53 54 28 54 45 58 54 2c 33 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IST(TEXT,32); ┆
0x1a76b…1a77a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a77a…1a79a (17, 0, 20) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 27 10 27 2c 31 29 3b 20 20 20 20 20 ┆ CALL TYPIST(' ',1); ┆
0x1a79a…1a7ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a7ba…1a7c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a7c9…1a7e9 (17, 0, 21) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x1a7e9…1a809 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a809…1a818 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a818…1a838 (17, 0, 22) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x1a838…1a858 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a858…1a867 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a867…1a8b6 (17, 0, 23) 0x20[0x4f]
0x1a8b6…1a8d6 (17, 0, 24) 53 56 41 52 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SVAR:PROC; ┆
0x1a8d6…1a8f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a8f6…1a905 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a905…1a925 (17, 0, 25) 44 43 4c 20 4a 4a 4a 28 36 29 20 42 49 4e 41 52 59 20 49 4e 49 54 28 36 2c 31 2c 35 2c 31 2c 31 ┆DCL JJJ(6) BINARY INIT(6,1,5,1,1┆
0x1a925…1a945 30 2c 33 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆0,32); ┆
0x1a945…1a954 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a954…1a974 (17, 0, 26) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 31 20 54 48 45 4e 20 53 44 41 54 55 4d 3d 42 ┆ IF FRTYP=1 THEN SDATUM=B┆
0x1a974…1a994 55 46 46 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UFF; ┆
0x1a994…1a9a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1a9a3…1a9c3 (17, 0, 27) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1a9e3…1a9f2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1a9f2…1aa12 (17, 0, 28) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 33 20 54 48 45 4e 20 4c 49 53 54 4d 3d 42 55 ┆ IF FRTYP=3 THEN LISTM=BU┆
0x1aa12…1aa32 46 46 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FF; ┆
0x1aa32…1aa41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1aa41…1aa61 (17, 0, 29) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 34 20 54 48 45 4e 20 55 4b 3d 42 55 46 46 3b ┆ IF FRTYP=4 THEN UK=BUFF;┆
0x1aa61…1aa81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1aa81…1aa90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1aa90…1aab0 (17, 0, 30) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 35 20 54 48 45 4e 20 49 4b 53 4c 41 47 3d 42 ┆ IF FRTYP=5 THEN IKSLAG=B┆
0x1aab0…1aad0 55 46 46 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UFF; ┆
0x1aad0…1aadf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1aadf…1aaff (17, 0, 31) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 36 20 54 48 45 4e 20 54 45 58 54 3d 42 55 46 ┆ IF FRTYP=6 THEN TEXT=BUF┆
0x1aaff…1ab1f 46 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆F; ┆
0x1ab1f…1ab2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ab2e…1ab4e (17, 0, 32) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 42 55 46 46 29 28 41 ┆ PUT FILE(D) EDIT(BUFF)(A┆
0x1ab4e…1ab6e 28 4a 4a 4a 28 46 52 54 59 50 29 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(JJJ(FRTYP))); ┆
0x1ab6e…1ab7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ab7d…1ab9d (17, 0, 33) 20 20 20 20 20 20 20 20 46 52 54 59 50 3d 46 52 54 59 50 2b 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ FRTYP=FRTYP+1; ┆
0x1ab9d…1abbd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1abbd…1abcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1abcc…1abec (17, 0, 34) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 33 20 26 20 46 49 4c 7f 3d 31 20 54 48 45 4e ┆ IF FRTYP=3 & FIL =1 THEN┆
0x1abec…1ac0c 20 46 52 54 59 50 3d 36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FRTYP=6; ┆
0x1ac0c…1ac1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ac1b…1ac3b (17, 0, 35) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 37 20 54 48 45 4e 20 46 52 54 59 50 3d 31 3b ┆ IF FRTYP=7 THEN FRTYP=1;┆
0x1ac3b…1ac5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ac5b…1ac6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ac6a…1ac8a (17, 0, 36) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x1ac8a…1acaa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1acaa…1acb9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1acb9…1acd9 (17, 0, 37) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x1acd9…1acf9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1acf9…1ad08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ad08…1ad57 (17, 0, 38) 0x20[0x4f]
0x1ad57…1ad77 (17, 0, 39) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 54 41 52 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO START; ┆
0x1ad77…1ad97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ad97…1ada6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ada6…1adf5 (17, 0, 40) 0x20[0x4f]
0x1adf5…1ae15 (17, 0, 41) 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UT: ┆
0x1ae15…1ae35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ae35…1ae44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ae44…1ae64 (17, 0, 42) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 56 41 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL SVAR; ┆
0x1ae64…1ae84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ae84…1ae93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ae93…1aeb3 (17, 0, 43) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆ IF FIL=1 THEN DO; ┆
0x1aeb3…1aed3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1aed3…1aee2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1aee2…1af02 (17, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 46 49 4c 47 45 4e 3b 20 20 20 20 20 20 20 20 20 ┆ CALL FILGEN; ┆
0x1af02…1af22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1af22…1af31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1af31…1af51 (17, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 46 4c 41 47 47 3d 31 20 54 48 45 4e 20 44 4f 3b 20 ┆ IF RFLAGG=1 THEN DO; ┆
0x1af51…1af71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1af71…1af80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1af80…1afa0 (17, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 46 49 4c 31 29 3b 20 20 ┆ CALL SEOF(FIL1); ┆
0x1afa0…1afc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1afc0…1afcf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1afcf…1afef (17, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 55 4e 53 50 45 43 28 46 49 4c 31 29 3d 30 20 ┆ IF UNSPEC(FIL1)=0 ┆
0x1afef…1b00f 54 48 45 4e 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN OPEN FIL1; ┆
0x1b00f…1b01e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b01e…1b03e (17, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 52 49 54 45 20 46 49 4c 45 28 46 49 4c 31 29 20 46 ┆ WRITE FILE(FIL1) F┆
0x1b03e…1b05e 52 4f 4d 28 4b 4f 4e 54 4f 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ROM(KONTOSTR); ┆
0x1b05e…1b06d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b06d…1b08d (17, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 46 49 4c 31 3b 20 20 20 20 20 20 20 ┆ CLOSE FIL1; ┆
0x1b08d…1b0ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b0ad…1b0bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b0bc…1b0dc (17, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 ┆ OPEN FIL1; ┆
0x1b0dc…1b0fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b0fc…1b10b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b10b…1b12b (17, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 ┆ SFLAGG=1; ┆
0x1b12b…1b14b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b14b…1b15a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b15a…1b17a (17, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1b17a…1b19a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b19a…1b1a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b1a9…1b1c9 (17, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x1b1c9…1b1e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b1e9…1b1f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b1f8…1b218 (17, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 57 52 49 54 45 20 46 49 4c 45 28 46 49 4c 31 29 ┆ REWRITE FILE(FIL1)┆
0x1b218…1b238 20 46 52 4f 4d 28 4b 4f 4e 54 4f 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FROM(KONTOSTR); ┆
0x1b238…1b247 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b247…1b267 (17, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1b267…1b287 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b287…1b296 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b296…1b2b6 (17, 0, 56) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1b2b6…1b2d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b2d6…1b2e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b2e5…1b305 (17, 0, 57) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x1b305…1b325 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b325…1b334 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b334…1b354 (17, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 53 44 41 54 55 4d 33 3d 53 44 41 54 55 4d 3b 20 20 20 20 20 20 ┆ SDATUM3=SDATUM; ┆
0x1b354…1b374 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b374…1b383 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b383…1b3a3 (17, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 33 3d 54 33 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTO3=T3; ┆
0x1b3a3…1b3c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b3c3…1b3d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b3d2…1b3f2 (17, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 46 4c 41 47 47 3d 31 20 54 48 45 4e 20 44 4f 3b 20 ┆ IF RFLAGG=1 THEN DO; ┆
0x1b3f2…1b412 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b412…1b421 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b421…1b441 (17, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 46 49 4c 31 29 3b 20 20 ┆ CALL SEOF(FIL1); ┆
0x1b441…1b461 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b461…1b470 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b470…1b490 (17, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 55 4e 53 50 45 43 28 46 49 4c 31 29 3d 30 20 ┆ IF UNSPEC(FIL1)=0 ┆
0x1b490…1b4b0 54 48 45 4e 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN OPEN FIL1; ┆
0x1b4b0…1b4bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b4bf…1b4df (17, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 52 49 54 45 20 46 49 4c 45 28 46 49 4c 31 29 20 46 ┆ WRITE FILE(FIL1) F┆
0x1b4df…1b4ff 52 4f 4d 28 55 4b 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ROM(UKSTR); ┆
0x1b4ff…1b50e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b50e…1b52e (17, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 46 49 4c 31 3b 20 20 20 20 20 20 20 ┆ CLOSE FIL1; ┆
0x1b52e…1b54e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b54e…1b55d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b55d…1b57d (17, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 ┆ OPEN FIL1; ┆
0x1b57d…1b59d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b59d…1b5ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b5ac…1b5cc (17, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 ┆ SFLAGG=1; ┆
0x1b5cc…1b5ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b5ec…1b5fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b5fb…1b61b (17, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1b61b…1b63b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b63b…1b64a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b64a…1b66a (17, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x1b66a…1b68a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b68a…1b699 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b699…1b6b9 (17, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 57 52 49 54 45 20 46 49 4c 45 28 46 49 4c 31 29 ┆ REWRITE FILE(FIL1)┆
0x1b6b9…1b6d9 20 46 52 4f 4d 28 55 4b 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FROM(UKSTR); ┆
0x1b6d9…1b6e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b6e8…1b708 (17, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1b708…1b728 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b728…1b737 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b737…1b757 (17, 0, 71) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1b757…1b777 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b777…1b786 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b786…1b7a6 (17, 0, 72) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x1b7a6…1b7c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b7c6…1b7d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b7d5…1b824 (17, 0, 73) 0x20[0x4f]
0x1b824…1b844 (17, 0, 74) 2f 2a 20 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 ┆/* H Ä R B Ö R J A R H U V┆
0x1b844…1b864 20 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 20 2a 2f 20 20 20 ┆ U D P R O G R A M M E T */ ┆
0x1b864…1b873 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b873…1b8c2 (17, 0, 75) 0x20[0x4f]
[…0x1…]
0x1b911…1b931 (17, 0, 77) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x1b931…1b951 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b951…1b960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b960…1b980 (17, 0, 78) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x1b980…1b9a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b9a0…1b9af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b9af…1b9cf (17, 0, 79) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x1b9cf…1b9ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b9ef…1b9fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b9fe…1ba1e (17, 0, 80) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x1ba1e…1ba3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ba3e…1ba4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ba4d…1ba6d (17, 0, 81) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 47 ┆ IF DATUM='0 ' THEN G┆
0x1ba6d…1ba8d 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O TO SLUT; ┆
0x1ba8d…1ba9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ba9c…1babc (18, 0, 0) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x1babc…1badc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1badc…1baeb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1baeb…1bb3a (18, 0, 1) 0x20[0x4f]
0x1bb3a…1bb5a (18, 0, 2) 20 20 20 20 20 20 20 20 46 49 4c 3d 59 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FIL=Y; ┆
0x1bb5a…1bb7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bb7a…1bb89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bb89…1bba9 (18, 0, 3) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 32 20 54 48 45 4e 20 58 4e 3d 27 20 20 55 4b 4f 4e ┆ IF FIL=2 THEN XN=' UKON┆
0x1bba9…1bbc9 54 4f 50 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TOP '; ┆
0x1bbc9…1bbd8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bbd8…1bbf8 (18, 0, 4) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 33 20 54 48 45 4e 20 58 4e 3d 27 20 20 4b 53 4b 4f ┆ IF FIL=3 THEN XN=' KSKO┆
0x1bbf8…1bc18 4e 54 4f 50 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NTOP'; ┆
0x1bc18…1bc27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bc27…1bc47 (18, 0, 5) 20 20 20 20 20 20 20 20 46 53 54 52 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR=STR; ┆
0x1bc47…1bc67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bc67…1bc76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bc76…1bc96 (18, 0, 6) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN FIL1; ┆
0x1bc96…1bcb6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bcb6…1bcc5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bcc5…1bd14 (18, 0, 7) 0x20[0x4f]
0x1bd14…1bd34 (18, 0, 8) 4c 31 3a 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 49 4e 3b 20 20 20 20 20 20 20 20 20 20 20 ┆L1: CALL KONTOIN; ┆
0x1bd34…1bd54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bd54…1bd63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bd63…1bd83 (18, 0, 9) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 49 53 50 50 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL DISPPUT; ┆
0x1bd83…1bda3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bda3…1bdb2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bdb2…1bdd2 (18, 0, 10) 4c 33 3a 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 42 55 46 46 29 3b 20 20 20 20 ┆L3: GET SKIP LIST(BUFF); ┆
0x1bdd2…1bdf2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bdf2…1be01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1be01…1be21 (18, 0, 11) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 45 59 46 55 4e 28 4b 45 59 54 29 3b 20 20 20 20 20 20 ┆ CALL KEYFUN(KEYT); ┆
0x1be21…1be41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1be41…1be50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1be50…1be70 (18, 0, 12) 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 32 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 31 ┆ IF KEYT=20 THEN GO TO L1┆
0x1be70…1be90 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x1be90…1be9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1be9f…1bebf (18, 0, 13) 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 31 38 20 54 48 45 4e 20 47 4f 20 54 4f 20 55 54 ┆ IF KEYT=18 THEN GO TO UT┆
0x1bebf…1bedf 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x1bedf…1beee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1beee…1bf0e (18, 0, 14) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 56 41 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL SVAR; ┆
0x1bf0e…1bf2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bf2e…1bf3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bf3d…1bf5d (18, 0, 15) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 46 52 41 45 47 41 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL FRAEGA; ┆
0x1bf5d…1bf7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bf7d…1bf8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bf8c…1bfac (18, 0, 16) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L3; ┆
0x1bfac…1bfcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bfcc…1bfdb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bfdb…1c02a (18, 0, 17) 0x20[0x4f]
[…0x1…]
0x1c079…1c099 (18, 0, 19) 53 4c 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: ┆
0x1c099…1c0b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c0b9…1c0c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c0c8…1c0e8 (18, 0, 20) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x1c0e8…1c108 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c108…1c117 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c117…1c137 (18, 0, 21) 20 20 20 20 20 20 20 20 49 46 20 53 46 4c 41 47 47 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF SFLAGG=0 THEN DO; ┆
0x1c137…1c157 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c157…1c166 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c166…1c186 (18, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 ┆ CALL PLOAD('Q '┆
0x1c186…1c1a6 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x1c1a6…1c1b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c1b5…1c1d5 (18, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 31 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT1; ┆
0x1c1d5…1c1f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c1f5…1c204 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c204…1c224 (18, 0, 24) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1c224…1c244 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c244…1c253 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c253…1c273 (18, 0, 25) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 7f 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 ┆ IF FIL =1 THEN DO; ┆
0x1c273…1c293 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c293…1c2a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c2a2…1c2c2 (18, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 54 38 3d 53 55 42 53 54 52 28 58 4e 2c 33 2c 38 29 3b 20 20 20 ┆ T8=SUBSTR(XN,3,8); ┆
0x1c2c2…1c2e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c2e2…1c2f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c2f1…1c311 (18, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 32 37 2c 36 2c 38 29 3d 54 38 3b 20 20 ┆ SUBSTR(T27,6,8)=T8; ┆
0x1c311…1c331 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c331…1c340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c340…1c360 (18, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 32 37 2c 32 33 2c 31 29 3d 27 33 27 3b ┆ SUBSTR(T27,23,1)='3';┆
0x1c360…1c380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c380…1c38f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c38f…1c3af (18, 0, 29) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1c3af…1c3cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c3cf…1c3de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c3de…1c3fe (18, 0, 30) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4c 4f 41 44 28 54 32 37 2c 32 37 29 3b 20 20 20 20 20 20 ┆ CALL LOAD(T27,27); ┆
0x1c3fe…1c41e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c41e…1c42d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c42d…1c44d (18, 0, 31) 53 4c 55 54 31 3a 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT1:END; ┆
0x1c44d…1c46d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c46d…1c47c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c47c…1c49c (18, 0, 32) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c4bc…1c4cb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c4cb…1c4eb (18, 0, 33) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c50b…1c51a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c51a…1c53a (18, 0, 34) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c55a…1c569 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c569…1c589 (18, 0, 35) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c5a9…1c5b8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c5b8…1c5d8 (18, 0, 36) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c5f8…1c607 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c607…1c627 (18, 0, 37) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c647…1c656 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c656…1c676 (18, 0, 38) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c696…1c6a5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c6a5…1c6c5 (18, 0, 39) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c6e5…1c6f4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c6f4…1c714 (18, 0, 40) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c734…1c743 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c743…1c763 (18, 0, 41) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c783…1c792 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c792…1c7b2 (18, 0, 42) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c7d2…1c7e1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c7e1…1c801 (18, 0, 43) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c821…1c830 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c830…1c850 (18, 0, 44) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c870…1c87f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c87f…1c89f (18, 0, 45) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c8bf…1c8ce 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c8ce…1c8ee (18, 0, 46) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c90e…1c91d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c91d…1c93d (18, 0, 47) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c95d…1c96c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c96c…1c98c (18, 0, 48) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c9ac…1c9bb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1c9bb…1c9db (18, 0, 49) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1c9fb…1ca0a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1ca0a…1ca2a (18, 0, 50) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1ca4a…1ca59 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1ca59…1ca79 (18, 0, 51) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1ca99…1caa8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1caa8…1cac8 (18, 0, 52) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cae8…1caf7 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1caf7…1cb17 (18, 0, 53) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cb37…1cb46 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cb46…1cb66 (18, 0, 54) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cb86…1cb95 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cb95…1cbb5 (18, 0, 55) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cbd5…1cbe4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cbe4…1cc04 (18, 0, 56) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cc24…1cc33 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cc33…1cc53 (18, 0, 57) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cc73…1cc82 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cc82…1cca2 (18, 0, 58) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1ccc2…1ccd1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1ccd1…1ccf1 (18, 0, 59) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cd11…1cd20 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cd20…1cd40 (18, 0, 60) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cd60…1cd6f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cd6f…1cd8f (18, 0, 61) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cdaf…1cdbe 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cdbe…1cdde (18, 0, 62) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cdfe…1ce0d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1ce0d…1ce2d (18, 0, 63) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1ce4d…1ce5c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1ce5c…1ce7c (18, 0, 64) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1ce9c…1ceab 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1ceab…1cecb (18, 0, 65) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1ceeb…1cefa 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cefa…1cf1a (18, 0, 66) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cf3a…1cf49 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cf49…1cf69 (18, 0, 67) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cf89…1cf98 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cf98…1cfb8 (18, 0, 68) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1cfd8…1cfe7 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1cfe7…1d007 (18, 0, 69) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d027…1d036 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d036…1d056 (18, 0, 70) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d076…1d085 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d085…1d0a5 (18, 0, 71) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d0c5…1d0d4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d0d4…1d0f4 (18, 0, 72) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d114…1d123 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d123…1d143 (18, 0, 73) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d163…1d172 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d172…1d192 (18, 0, 74) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d1b2…1d1c1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d1c1…1d1e1 (18, 0, 75) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d201…1d210 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d210…1d230 (18, 0, 76) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d250…1d25f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d25f…1d27f (18, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d29f…1d2ae 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d2ae…1d2ce (18, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d2ee…1d2fd 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d2fd…1d31d (18, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d33d…1d34c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d34c…1d36c (18, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d38c…1d39b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d39b…1d3bb (18, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x1d3db…1d3ea 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x1d3ea…1d40a (19, 0, 0) 2f 2a 20 56 34 20 5b 52 20 45 54 54 20 50 52 4f 47 52 41 4d 20 46 5c 52 20 55 54 53 4b 52 49 46 ┆/* V4 ÄR ETT PROGRAM FÖR UTSKRIF┆
0x1d40a…1d42a 54 20 41 56 20 4b 4f 4e 54 4f 2c 55 4b 4f 4e 54 4f 20 26 20 49 4b 2d 53 4c 41 47 2e 20 20 20 20 ┆T AV KONTO,UKONTO & IK-SLAG. ┆
0x1d42a…1d439 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d439…1d459 (19, 0, 1) 20 20 20 56 20 30 3a 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ V 0:1 ┆
0x1d459…1d479 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d479…1d488 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d488…1d4a8 (19, 0, 2) 20 20 20 50 52 47 20 4a 5d 20 37 38 30 39 30 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PRG JÅ 780907 ┆
0x1d4a8…1d4c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d4c8…1d4d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d4d7…1d4f7 (19, 0, 3) 20 20 20 5b 6e 64 72 69 6e 67 20 38 30 30 33 31 32 20 72 7b 74 74 65 6c 73 65 20 61 76 20 70 67 ┆ Ändring 800312 rättelse av pg┆
0x1d4f7…1d517 6d 66 65 6c 2e 20 44 65 74 20 67 69 63 6b 20 69 6e 74 65 20 61 74 74 20 76 7b 6c 6a 61 20 75 74 ┆mfel. Det gick inte att välja ut┆
0x1d517…1d526 73 6b 72 69 66 74 20 70 7d 20 20 20 20 20 20 ┆skrift på ┆
0x1d526…1d546 (19, 0, 4) 20 20 20 61 6e 74 69 6e 67 65 6e 20 27 41 4c 4c 41 27 20 65 6c 6c 65 72 20 27 35 2d 73 69 66 66 ┆ antingen 'ALLA' eller '5-siff┆
0x1d546…1d566 72 69 67 61 27 2e 20 41 6c 6c 61 20 62 6c 65 76 20 61 6c 6c 74 69 64 20 75 74 73 6b 72 69 76 6e ┆riga'. Alla blev alltid utskrivn┆
0x1d566…1d575 61 2e 20 4f 42 67 2e 20 20 2a 2f 20 20 20 20 ┆a. OBg. */ ┆
0x1d575…1d5c4 (19, 0, 5) 0x20[0x4f]
[…0x2…]
0x1d662…1d682 (19, 0, 8) 44 43 4c 20 31 20 4b 4f 4e 54 4f 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 KONTOSTR, ┆
0x1d682…1d6a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d6a2…1d6b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d6b1…1d6d1 (19, 0, 9) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 35 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 KONTO5 CHAR(5), ┆
0x1d6d1…1d6f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d6f1…1d700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d700…1d720 (19, 0, 10) 20 20 20 20 20 20 32 20 53 44 41 54 55 4d 35 20 46 49 58 45 44 28 36 29 2c 20 20 20 20 20 20 20 ┆ 2 SDATUM5 FIXED(6), ┆
0x1d720…1d740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d740…1d74f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d74f…1d76f (19, 0, 11) 20 20 20 20 20 20 32 20 54 45 58 54 35 20 43 48 41 52 28 33 32 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT5 CHAR(32), ┆
0x1d76f…1d78f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d78f…1d79e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d79e…1d7be (19, 0, 12) 20 20 20 20 20 20 32 20 55 48 4d 41 52 4b 35 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 ┆ 2 UHMARK5 CHAR(1), ┆
0x1d7be…1d7de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d7de…1d7ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d7ed…1d80d (19, 0, 13) 20 20 20 20 20 20 32 20 4c 49 53 54 42 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 LISTB BINARY, ┆
0x1d80d…1d82d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d82d…1d83c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d83c…1d85c (19, 0, 14) 20 20 20 20 20 20 32 20 49 4b 42 20 42 49 4e 41 52 59 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 IKB BINARY; ┆
0x1d85c…1d87c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d87c…1d88b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d88b…1d8ab (19, 0, 15) 20 20 20 20 20 20 2f 2a 20 34 36 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 46 BYTES */ ┆
0x1d8ab…1d8cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d8cb…1d8da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d8da…1d929 (19, 0, 16) 0x20[0x4f]
[…0x1…]
0x1d978…1d998 (19, 0, 18) 44 43 4c 20 31 20 55 4b 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 UKSTR, ┆
0x1d998…1d9b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d9b8…1d9c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1d9c7…1d9e7 (19, 0, 19) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 33 20 43 48 41 52 28 33 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 KONTO3 CHAR(3), ┆
0x1d9e7…1da07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1da07…1da16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1da16…1da36 (19, 0, 20) 20 20 20 20 20 20 32 20 53 44 41 54 55 4d 33 20 46 49 58 45 44 28 36 29 2c 20 20 20 20 20 20 20 ┆ 2 SDATUM3 FIXED(6), ┆
0x1da36…1da56 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1da56…1da65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1da65…1da85 (19, 0, 21) 20 20 20 20 20 20 32 20 54 45 58 54 20 43 48 41 52 28 33 32 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT CHAR(32), ┆
0x1da85…1daa5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1daa5…1dab4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1dab4…1dad4 (19, 0, 22) 20 20 20 20 20 20 32 20 55 48 4d 41 52 4b 20 43 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 20 20 ┆ 2 UHMARK CHAR(1); ┆
0x1dad4…1daf4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1daf4…1db03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1db03…1db23 (19, 0, 23) 20 20 20 20 20 20 2f 2a 20 34 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 40 BYTES */ ┆
0x1db23…1db43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1db43…1db52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1db52…1dba1 (19, 0, 24) 0x20[0x4f]
[…0x1…]
0x1dbf0…1dc10 (19, 0, 26) 44 43 4c 20 31 20 46 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 FSTR, ┆
0x1dc10…1dc30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1dc30…1dc3f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1dc3f…1dc5f (19, 0, 27) 20 20 20 20 20 20 32 20 46 49 4c 31 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIL1 FILE; ┆
0x1dc5f…1dc7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1dc7f…1dc8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1dc8e…1dcdd (19, 0, 28) 0x20[0x4f]
0x1dcdd…1dcfd (19, 0, 29) 44 43 4c 20 31 20 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 STR, ┆
0x1dcfd…1dd1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1dd1d…1dd2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1dd2c…1dd4c (19, 0, 30) 20 20 20 20 20 20 32 20 58 4e 20 43 48 41 52 28 32 34 29 20 49 4e 49 54 28 27 20 20 4b 4f 4e 54 ┆ 2 XN CHAR(24) INIT(' KONT┆
0x1dd4c…1dd6c 4f 50 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OP '); ┆
0x1dd6c…1dd7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1dd7b…1ddca (19, 0, 31) 0x20[0x4f]
0x1ddca…1ddea (19, 0, 32) 44 43 4c 20 54 37 30 20 43 48 41 52 28 37 30 29 20 49 4e 49 54 20 20 20 20 20 20 20 20 20 20 20 ┆DCL T70 CHAR(70) INIT ┆
0x1ddea…1de0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1de0a…1de19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1de19…1de39 (19, 0, 33) 28 27 4b 4f 4e 54 4f 20 20 54 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆('KONTO TEXT ┆
0x1de39…1de59 20 20 20 20 20 20 20 20 20 20 20 53 44 41 54 55 4d 20 20 55 4d 20 20 4c 49 53 54 4d 20 20 55 4b ┆ SDATUM UM LISTM UK┆
0x1de59…1de68 20 20 49 4b 53 4c 41 47 27 29 2c 20 20 20 20 ┆ IKSLAG'), ┆
0x1de68…1de88 (19, 0, 34) 20 20 20 20 54 37 34 20 43 48 41 52 28 37 34 29 20 49 4e 49 54 20 20 20 20 20 20 20 20 20 20 20 ┆ T74 CHAR(74) INIT ┆
0x1de88…1dea8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1dea8…1deb7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1deb7…1ded7 (19, 0, 35) 28 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(' ┆
0x1ded7…1def7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 32 33 34 35 20 20 20 20 ┆ 12345 ┆
0x1def7…1df06 20 20 30 31 32 33 34 35 36 37 38 39 27 29 2c ┆ 0123456789'),┆
0x1df06…1df26 (19, 0, 36) 20 20 20 20 54 41 42 28 35 29 20 43 48 41 52 28 32 35 29 20 49 4e 49 54 28 27 4b 4f 4e 54 4f 50 ┆ TAB(5) CHAR(25) INIT('KONTOP┆
0x1df26…1df46 4c 41 4e 20 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆LAN ', ┆
0x1df46…1df55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1df55…1df75 (19, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 55 2d 4b 4f 4e ┆ 'U-KON┆
0x1df75…1df95 54 4f 54 41 42 45 4c 4c 20 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TOTABELL ', ┆
0x1df95…1dfa4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1dfa4…1dfc4 (19, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 4b 2d 53 4c 41 ┆ 'K-SLA┆
0x1dfc4…1dfe4 47 53 54 41 42 45 4c 4c 20 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GSTABELL ', ┆
0x1dfe4…1dff3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1dff3…1e013 (19, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 41 4c 4c 41 20 ┆ 'ALLA ┆
0x1e013…1e033 4b 4f 4e 54 4f 4e 20 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTON ', ┆
0x1e033…1e042 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e042…1e062 (19, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 45 4e 44 41 53 ┆ 'ENDAS┆
0x1e062…1e082 54 20 35 2d 53 49 46 46 52 49 47 41 20 4b 4f 4e 54 4f 4e 20 27 29 2c 20 20 20 20 20 20 20 20 20 ┆T 5-SIFFRIGA KONTON '), ┆
0x1e082…1e091 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e091…1e0b1 (19, 0, 41) 20 20 20 20 4c 49 53 54 4d 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ LISTM CHAR(5), ┆
0x1e0b1…1e0d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e0d1…1e0e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e0e0…1e100 (19, 0, 42) 20 20 20 20 55 4b 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UK CHAR(1), ┆
0x1e100…1e120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e120…1e12f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e12f…1e14f (19, 0, 43) 20 20 20 20 49 4b 53 4c 41 47 20 43 48 41 52 28 31 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IKSLAG CHAR(10), ┆
0x1e14f…1e16f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e16f…1e17e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e17e…1e19e (19, 0, 44) 20 20 20 20 54 4f 4d 20 43 48 41 52 28 31 30 29 20 49 4e 49 54 28 27 20 20 20 20 20 20 20 20 20 ┆ TOM CHAR(10) INIT(' ┆
0x1e19e…1e1be 20 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ '), ┆
0x1e1be…1e1cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e1cd…1e1ed (19, 0, 45) 20 20 20 20 4e 41 4d 4e 28 32 29 20 43 48 41 52 28 31 30 29 20 49 4e 49 54 28 27 4b 56 56 2f 4b ┆ NAMN(2) CHAR(10) INIT('KVV/K┆
0x1e1ed…1e20d 57 41 52 4f 53 27 2c 27 41 52 4f 53 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆WAROS','AROS'), ┆
0x1e20d…1e21c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e21c…1e23c (19, 0, 46) 20 20 20 20 53 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SDATUM CHAR(6), ┆
0x1e23c…1e25c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e25c…1e26b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e26b…1e28b (19, 0, 47) 20 20 20 20 4b 4f 4e 54 4f 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTO CHAR(5), ┆
0x1e28b…1e2ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e2ab…1e2ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e2ba…1e2da (19, 0, 48) 20 20 20 20 46 49 4c 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FIL BINARY, ┆
0x1e2da…1e2fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e2fa…1e309 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e309…1e329 (19, 0, 49) 20 20 20 20 53 49 44 41 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 ┆ SIDA BINARY INIT(0), ┆
0x1e329…1e349 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e349…1e358 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e358…1e378 (19, 0, 50) 20 20 20 20 52 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ R BINARY INIT(0), ┆
0x1e378…1e398 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e398…1e3a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e3a7…1e3c7 (19, 0, 51) 20 20 20 20 53 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ S CHAR(1), ┆
0x1e3c7…1e3e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e3e7…1e3f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e3f6…1e416 (19, 0, 52) 20 20 20 20 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM CHAR(6), ┆
0x1e416…1e436 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e436…1e445 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e445…1e465 (19, 0, 53) 20 20 20 20 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ P POINTER, ┆
0x1e465…1e485 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e485…1e494 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e494…1e4b4 (19, 0, 54) 20 20 20 20 44 20 42 41 53 45 44 28 50 29 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 ┆ D BASED(P) CHAR(6), ┆
0x1e4b4…1e4d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e4d4…1e4e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e4e3…1e503 (19, 0, 55) 20 20 20 20 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PP POINTER, ┆
0x1e503…1e523 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e523…1e532 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e532…1e552 (19, 0, 56) 20 20 20 20 31 20 53 54 52 58 20 42 41 53 45 44 28 50 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 STRX BASED(PP), ┆
0x1e552…1e572 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e572…1e581 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e581…1e5a1 (19, 0, 57) 20 20 20 20 20 20 32 20 58 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 X CHAR(2), ┆
0x1e5a1…1e5c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e5c1…1e5d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e5d0…1e5f0 (19, 0, 58) 20 20 20 20 20 20 32 20 59 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 Y CHAR(2), ┆
0x1e5f0…1e610 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e610…1e61f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e61f…1e63f (19, 0, 59) 20 20 20 20 20 20 32 20 46 49 52 4d 41 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIRMA CHAR(1), ┆
0x1e63f…1e65f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e65f…1e66e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e66e…1e68e (19, 0, 60) 20 20 20 20 20 20 20 20 32 20 20 4f 50 5f 4b 4f 44 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 ┆ 2 OP_KOD BINARY, ┆
0x1e68e…1e6ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e6ae…1e6bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e6bd…1e6dd (19, 0, 61) 20 20 20 20 20 20 20 20 32 20 20 52 41 44 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 ┆ 2 RADANT BINARY, ┆
0x1e6dd…1e6fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e6fd…1e70c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e70c…1e72c (19, 0, 62) 20 20 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 20 28 34 37 29 20 49 4e 49 54 20 28 27 20 ┆ VERSION CHAR (47) INIT (' ┆
0x1e72c…1e74c 20 56 34 31 20 56 65 72 73 69 6f 6e 20 31 2e 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ V41 Version 1.3 ┆
0x1e74c…1e75b 20 20 20 20 20 20 38 30 30 33 31 32 27 29 3b ┆ 800312');┆
0x1e75b…1e7aa (19, 0, 63) 0x20[0x4f]
[…0x1…]
0x1e7f9…1e819 (19, 0, 65) 53 54 52 47 45 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STRGEN:PROC; ┆
0x1e819…1e839 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e839…1e848 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e848…1e868 (19, 0, 66) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆ IF FIL=1 THEN DO; ┆
0x1e868…1e888 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e888…1e897 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e897…1e8b7 (19, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 4c 49 53 54 4d 3d 54 4f 4d 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ LISTM=TOM; ┆
0x1e8b7…1e8d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e8d7…1e8e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e8e6…1e906 (19, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 49 4b 53 4c 41 47 3d 54 4f 4d 3b 20 20 20 20 20 20 20 20 20 20 ┆ IKSLAG=TOM; ┆
0x1e906…1e926 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e926…1e935 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e935…1e955 (19, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=1; ┆
0x1e955…1e975 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e975…1e984 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e984…1e9a4 (19, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 35 3b 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 5; ┆
0x1e9a4…1e9c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e9c4…1e9d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1e9d3…1e9f3 (19, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4a 26 4c 49 53 54 42 29 3d 4a 20 54 48 45 ┆ IF (J&LISTB)=J THE┆
0x1e9f3…1ea13 4e 20 53 55 42 53 54 52 28 4c 49 53 54 4d 2c 49 2c 31 29 3d 27 31 27 3b 20 20 20 20 20 20 20 20 ┆N SUBSTR(LISTM,I,1)='1'; ┆
0x1ea13…1ea22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ea22…1ea42 (19, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 3d 4a 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J*2; ┆
0x1ea42…1ea62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ea62…1ea71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ea71…1ea91 (19, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1ea91…1eab1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1eab1…1eac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1eac0…1eae0 (19, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=1; ┆
0x1eae0…1eb00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1eb00…1eb0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1eb0f…1eb2f (19, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 49 3d 30 20 54 4f 20 39 3b 20 20 20 20 20 20 20 20 20 ┆ DO I=0 TO 9; ┆
0x1eb2f…1eb4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1eb4f…1eb5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1eb5e…1eb7e (19, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4b 3d 49 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UK=I; ┆
0x1eb7e…1eb9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1eb9e…1ebad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ebad…1ebcd (19, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4a 26 49 4b 42 29 3d 4a 20 54 48 45 4e 20 ┆ IF (J&IKB)=J THEN ┆
0x1ebcd…1ebed 53 55 42 53 54 52 28 49 4b 53 4c 41 47 2c 49 2b 31 2c 31 29 3d 55 4b 3b 20 20 20 20 20 20 20 20 ┆SUBSTR(IKSLAG,I+1,1)=UK; ┆
0x1ebed…1ebfc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ebfc…1ec1c (19, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 3d 4a 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J*2; ┆
0x1ec1c…1ec3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ec3c…1ec4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ec4b…1ec6b (19, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1ec6b…1ec8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ec8b…1ec9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ec9a…1ecba (19, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 55 4b 3d 27 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UK=' '; ┆
0x1ecba…1ecda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ecda…1ece9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ece9…1ed09 (19, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4a 20 26 20 49 4b 42 29 20 3d 20 4a 20 54 48 45 4e ┆ IF (J & IKB) = J THEN┆
0x1ed09…1ed29 20 55 4b 3d 27 31 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UK='1'; ┆
0x1ed29…1ed38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ed38…1ed58 (20, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 53 44 41 54 55 4d 3d 53 44 41 54 55 4d 35 3b 20 20 20 20 20 20 ┆ SDATUM=SDATUM5; ┆
0x1ed58…1ed78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ed78…1ed87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ed87…1eda7 (20, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 54 45 58 54 3d 54 45 58 54 35 3b 20 20 20 20 20 20 20 20 20 20 ┆ TEXT=TEXT5; ┆
0x1eda7…1edc7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1edc7…1edd6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1edd6…1edf6 (20, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 55 48 4d 41 52 4b 3d 55 48 4d 41 52 4b 35 3b 20 20 20 20 20 20 ┆ UHMARK=UHMARK5; ┆
0x1edf6…1ee16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ee16…1ee25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ee25…1ee45 (20, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 4a 20 3d 20 4b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = K; ┆
0x1ee45…1ee65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ee65…1ee74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ee74…1ee94 (20, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x1ee94…1eeb4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1eeb4…1eec3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1eec3…1eee3 (20, 0, 5) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1eee3…1ef03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ef03…1ef12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ef12…1ef32 (20, 0, 6) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x1ef32…1ef52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ef52…1ef61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ef61…1ef81 (20, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 53 44 41 54 55 4d 3d 53 44 41 54 55 4d 33 3b 20 20 20 20 20 20 ┆ SDATUM=SDATUM3; ┆
0x1ef81…1efa1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1efa1…1efb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1efb0…1efd0 (20, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 4a 20 3d 20 4b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = K; ┆
0x1efd0…1eff0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1eff0…1efff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1efff…1f01f (20, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x1f01f…1f03f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f03f…1f04e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f04e…1f06e (20, 0, 10) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1f06e…1f08e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f08e…1f09d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f09d…1f0bd (20, 0, 11) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x1f0bd…1f0dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f0dd…1f0ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f0ec…1f13b (20, 0, 12) 0x20[0x4f]
0x1f13b…1f15b (20, 0, 13) 52 55 42 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RUB:PROC; ┆
0x1f15b…1f17b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f17b…1f18a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f18a…1f1aa (20, 0, 14) 20 20 20 20 20 20 20 20 53 49 44 41 3d 53 49 44 41 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SIDA=SIDA+1; ┆
0x1f1aa…1f1ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f1ca…1f1d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f1d9…1f1f9 (20, 0, 15) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 2b 34 29 20 45 44 49 54 28 4e 41 4d 4e 28 ┆ PUT SKIP(R+4) EDIT(NAMN(┆
0x1f1f9…1f219 46 49 52 4d 41 2d 37 29 29 28 41 28 31 39 29 29 28 54 41 42 28 46 49 4c 29 29 28 41 29 28 54 41 ┆FIRMA-7))(A(19))(TAB(FIL))(A)(TA┆
0x1f219…1f228 42 28 53 2b 33 29 29 28 41 29 20 20 20 20 20 ┆B(S+3))(A) ┆
0x1f228…1f248 (20, 0, 16) 20 20 20 20 20 20 20 20 28 27 20 27 29 28 41 28 36 29 29 28 27 31 39 27 29 28 41 29 28 44 41 54 ┆ (' ')(A(6))('19')(A)(DAT┆
0x1f248…1f268 55 4d 29 28 41 28 32 29 29 28 27 2d 27 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 33 ┆UM)(A(2))('-')(A)(SUBSTR(DATUM,3┆
0x1f268…1f277 2c 32 29 29 28 41 28 32 29 29 20 20 20 20 20 ┆,2))(A(2)) ┆
0x1f277…1f297 (20, 0, 17) 20 20 20 20 20 20 20 20 28 27 2d 27 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 35 2c ┆ ('-')(A)(SUBSTR(DATUM,5,┆
0x1f297…1f2b7 32 29 29 28 41 28 35 29 29 28 27 53 49 44 27 29 28 41 28 34 29 29 28 53 49 44 41 29 28 41 29 20 ┆2))(A(5))('SID')(A(4))(SIDA)(A) ┆
0x1f2b7…1f2c6 53 4b 49 50 28 32 29 3b 20 20 20 20 20 20 20 ┆SKIP(2); ┆
0x1f2c6…1f2e6 (20, 0, 18) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 31 20 54 48 45 4e 20 50 55 54 20 45 44 49 54 28 54 ┆ IF FIL=1 THEN PUT EDIT(T┆
0x1f2e6…1f306 37 30 29 28 41 29 53 4b 49 50 20 45 44 49 54 28 54 37 34 29 28 41 29 53 4b 49 50 3b 20 20 20 20 ┆70)(A)SKIP EDIT(T74)(A)SKIP; ┆
0x1f306…1f315 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f315…1f335 (20, 0, 19) 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 45 44 49 54 28 54 37 30 29 28 41 28 35 31 29 ┆ ELSE PUT EDIT(T70)(A(51)┆
0x1f335…1f355 29 53 4b 49 50 28 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)SKIP(2); ┆
0x1f355…1f364 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f364…1f384 (20, 0, 20) 20 20 20 20 20 20 20 20 52 3d 20 52 41 44 41 4e 54 20 2d 20 38 3b 20 20 20 20 20 20 20 20 20 20 ┆ R= RADANT - 8; ┆
0x1f384…1f3a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f3a4…1f3b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f3b3…1f3d3 (20, 0, 21) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x1f3d3…1f3f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f3f3…1f402 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f402…1f422 (20, 0, 22) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x1f422…1f442 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f442…1f451 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f451…1f4a0 (20, 0, 23) 0x20[0x4f]
0x1f4a0…1f4c0 (20, 0, 24) 53 4b 52 49 56 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV:PROC; ┆
0x1f4c0…1f4e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f4e0…1f4ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f4ef…1f50f (20, 0, 25) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 4b 4f 4e 54 4f 29 28 41 28 37 ┆ PUT SKIP EDIT(KONTO)(A(7┆
0x1f50f…1f52f 29 29 28 54 45 58 54 29 28 41 28 33 34 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆))(TEXT)(A(34)); ┆
0x1f52f…1f53e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f53e…1f55e (20, 0, 26) 20 20 20 20 20 20 20 20 49 46 20 53 44 41 54 55 4d 3d 30 20 54 48 45 4e 20 50 55 54 20 45 44 49 ┆ IF SDATUM=0 THEN PUT EDI┆
0x1f55e…1f57e 54 28 54 4f 4d 29 28 41 28 38 29 29 28 55 48 4d 41 52 4b 29 28 41 28 34 29 29 3b 20 20 20 20 20 ┆T(TOM)(A(8))(UHMARK)(A(4)); ┆
0x1f57e…1f58d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f58d…1f5ad (20, 0, 27) 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 45 44 49 54 28 53 44 41 54 55 4d 29 28 41 28 ┆ ELSE PUT EDIT(SDATUM)(A(┆
0x1f5ad…1f5cd 38 29 29 28 55 48 4d 41 52 4b 29 28 41 28 34 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆8))(UHMARK)(A(4)); ┆
0x1f5cd…1f5dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f5dc…1f5fc (20, 0, 28) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 31 20 54 48 45 4e 20 50 55 54 20 45 44 49 54 28 4c ┆ IF FIL=1 THEN PUT EDIT(L┆
0x1f5fc…1f61c 49 53 54 4d 29 28 41 28 37 29 29 28 55 4b 29 28 41 28 34 29 29 28 49 4b 53 4c 41 47 29 28 41 29 ┆ISTM)(A(7))(UK)(A(4))(IKSLAG)(A)┆
0x1f61c…1f62b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x1f62b…1f64b (20, 0, 29) 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x1f64b…1f66b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f66b…1f67a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f67a…1f69a (20, 0, 30) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x1f69a…1f6ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f6ba…1f6c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f6c9…1f6e9 (20, 0, 31) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x1f6e9…1f709 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f709…1f718 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f718…1f767 (20, 0, 32) 0x20[0x4f]
0x1f767…1f787 (20, 0, 33) 46 52 41 45 47 41 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FRAEGA:PROC; ┆
0x1f787…1f7a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f7a7…1f7b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f7b6…1f7d6 (20, 0, 34) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 53 ┆ PUT FILE(D) SKIP EDIT('S┆
0x1f7d6…1f7f6 4b 41 20 41 4c 4c 41 20 4b 4f 4e 54 4f 4e 20 53 4b 52 49 56 41 53 20 55 54 2c 20 45 4c 4c 45 52 ┆KA ALLA KONTON SKRIVAS UT, ELLER┆
0x1f7f6…1f805 27 29 28 41 28 34 37 29 29 20 20 20 20 20 20 ┆')(A(47)) ┆
0x1f805…1f825 (20, 0, 35) 20 20 20 20 20 20 20 20 28 27 42 41 52 41 20 44 45 27 29 28 41 28 38 29 29 28 4a 29 28 41 29 28 ┆ ('BARA DE')(A(8))(J)(A)(┆
0x1f825…1f845 27 2d 53 49 46 46 52 49 47 41 27 29 28 41 28 33 38 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'-SIFFRIGA')(A(38)) ┆
0x1f845…1f854 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f854…1f874 (20, 0, 36) 20 20 20 20 20 20 20 20 28 27 44 56 53 20 44 45 20 53 4f 4d 20 5b 52 20 41 4b 54 55 45 4c 4c 41 ┆ ('DVS DE SOM ÄR AKTUELLA┆
0x1f874…1f894 20 56 49 44 20 4b 4f 4e 54 45 52 49 4e 47 27 29 20 28 41 28 34 37 29 29 20 20 20 20 20 20 20 20 ┆ VID KONTERING') (A(47)) ┆
0x1f894…1f8a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f8a3…1f8c3 (20, 0, 37) 20 20 20 20 20 20 20 20 28 27 31 20 3d 20 41 4c 4c 41 27 29 28 41 28 34 37 29 29 28 27 32 20 3d ┆ ('1 = ALLA')(A(47))('2 =┆
0x1f8c3…1f8e3 20 45 4e 44 41 53 54 27 29 28 41 28 31 31 29 29 28 4a 29 28 41 29 28 27 2d 53 49 46 46 52 49 47 ┆ ENDAST')(A(11))(J)(A)('-SIFFRIG┆
0x1f8e3…1f8f2 41 27 29 28 41 28 33 35 29 29 3b 20 20 20 20 ┆A')(A(35)); ┆
0x1f8f2…1f912 (20, 0, 38) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 53 29 3b 20 20 20 20 20 20 20 ┆ GET SKIP LIST(S); ┆
0x1f912…1f932 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f932…1f941 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f941…1f961 (20, 0, 39) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 49 46 59 28 53 2c 27 31 32 27 29 3d 30 20 54 48 45 4e ┆ IF VERIFY(S,'12')=0 THEN┆
0x1f961…1f981 20 47 4f 20 54 4f 20 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO UT; ┆
0x1f981…1f990 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f990…1f9b0 (20, 0, 40) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x1f9b0…1f9d0 52 53 49 4f 4e 29 28 41 28 31 30 35 29 29 28 27 2a 2a 2a 20 55 54 53 4b 52 49 46 54 20 50 5d 47 ┆RSION)(A(105))('*** UTSKRIFT PÅG┆
0x1f9d0…1f9df 5d 52 20 2a 2a 2a 27 29 20 20 20 20 20 20 20 ┆ÅR ***') ┆
0x1f9df…1f9ff (20, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1f9ff…1fa1f 28 41 28 33 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(A(36)); ┆
0x1fa1f…1fa2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fa2e…1fa4e (20, 0, 42) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x1fa4e…1fa6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fa6e…1fa7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fa7d…1fa9d (20, 0, 43) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x1fa9d…1fabd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fabd…1facc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1facc…1faec (20, 0, 44) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x1faec…1fb0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fb0c…1fb1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fb1b…1fb6a (20, 0, 45) 0x20[0x4f]
[…0x1…]
0x1fbb9…1fbd9 (20, 0, 47) 2f 2a 20 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 ┆/* H Ä R B Ö R J A R H U V┆
0x1fbd9…1fbf9 20 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 20 2a 2f 20 20 20 ┆ U D P R O G R A M M E T */ ┆
0x1fbf9…1fc08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fc08…1fc57 (20, 0, 48) 0x20[0x4f]
[…0x1…]
0x1fca6…1fcc6 (20, 0, 50) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x1fcc6…1fce6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fce6…1fcf5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fcf5…1fd15 (20, 0, 51) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x1fd15…1fd35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fd35…1fd44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fd44…1fd64 (20, 0, 52) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x1fd64…1fd84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fd84…1fd93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fd93…1fdb3 (20, 0, 53) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x1fdb3…1fdd3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fdd3…1fde2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fde2…1fe02 (20, 0, 54) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 47 ┆ IF DATUM='0 ' THEN G┆
0x1fe02…1fe22 4f 20 54 4f 20 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O TO UT; ┆
0x1fe22…1fe31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fe31…1fe51 (20, 0, 55) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x1fe51…1fe71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fe71…1fe80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1fe80…1fecf (20, 0, 56) 0x20[0x4f]
0x1fecf…1feef (20, 0, 57) 20 20 20 20 20 20 20 20 4a 3d 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=5; ┆
0x1feef…1ff0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ff0f…1ff1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ff1e…1ff3e (20, 0, 58) 20 20 20 20 20 20 20 20 46 49 4c 3d 59 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 20 56 41 ┆ FIL=Y; /* VA┆
0x1ff3e…1ff5e 4c 20 49 20 55 4e 44 45 52 4d 45 4e 59 4e 20 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L I UNDERMENYN */ ┆
0x1ff5e…1ff6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ff6d…1ff8d (20, 0, 59) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 7f 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 ┆ IF FIL =1 THEN DO; ┆
0x1ff8d…1ffad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ffad…1ffbc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ffbc…1ffdc (20, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 41 42 28 35 29 2c 38 2c 31 29 3d 27 33 ┆ SUBSTR(TAB(5),8,1)='3┆
0x1ffdc…1fffc 27 3b 20 20 2f 2a 20 5b 4e 44 52 41 52 20 52 55 42 52 49 4b 54 45 58 54 20 35 2d 20 54 49 4c 4c ┆'; /* ÄNDRAR RUBRIKTEXT 5- TILL┆
0x1fffc…2000b 20 33 2d 53 49 46 46 52 20 2a 2f 20 20 20 20 ┆ 3-SIFFR */ ┆
0x2000b…2002b (20, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=3; ┆
0x2002b…2004b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2004b…2005a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2005a…2007a (20, 0, 62) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2007a…2009a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2009a…200a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x200a9…200c9 (20, 0, 63) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 32 20 54 48 45 4e 20 58 4e 3d 27 20 20 55 4b 4f 4e ┆ IF FIL=2 THEN XN=' UKON┆
0x200c9…200e9 54 4f 50 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TOP '; ┆
0x200e9…200f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x200f8…20118 (20, 0, 64) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 33 20 54 48 45 4e 20 58 4e 3d 27 20 20 4b 53 4b 4f ┆ IF FIL=3 THEN XN=' KSKO┆
0x20118…20138 4e 54 4f 50 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NTOP'; ┆
0x20138…20147 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20147…20167 (20, 0, 65) 20 20 20 20 20 20 20 20 46 53 54 52 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR=STR; ┆
0x20167…20187 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20187…20196 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20196…201b6 (20, 0, 66) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN FIL1; ┆
0x201b6…201d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x201d6…201e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x201e5…20234 (20, 0, 67) 0x20[0x4f]
0x20234…20254 (20, 0, 68) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 46 52 41 45 47 41 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL FRAEGA; ┆
0x20254…20274 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20274…20283 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20283…202a3 (20, 0, 69) 4c 30 3a 20 20 20 20 20 49 46 20 52 3c 35 20 54 48 45 4e 20 43 41 4c 4c 20 52 55 42 3b 20 20 20 ┆L0: IF R<5 THEN CALL RUB; ┆
0x202a3…202c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x202c3…202d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x202d2…202f2 (20, 0, 70) 4c 31 3a 20 20 20 20 20 49 46 20 46 49 4c 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆L1: IF FIL=1 THEN DO; ┆
0x202f2…20312 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20312…20321 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20321…20341 (20, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 55 54 3b 20 ┆ ON ENDFILE GO TO UT; ┆
0x20341…20361 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20361…20370 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20370…20390 (20, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 46 49 4c 31 29 20 49 4e 54 4f 28 ┆ READ FILE(FIL1) INTO(┆
0x20390…203b0 4b 4f 4e 54 4f 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTOSTR); ┆
0x203b0…203bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x203bf…203df (20, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 4b 4f 4e 54 4f 35 3b 20 20 20 20 20 20 20 20 ┆ KONTO=KONTO5; ┆
0x203df…203ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x203ff…2040e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2040e…2042e (20, 0, 74) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2042e…2044e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2044e…2045d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2045d…2047d (20, 0, 75) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x2047d…2049d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2049d…204ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x204ac…204cc (20, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 55 54 3b 20 ┆ ON ENDFILE GO TO UT; ┆
0x204cc…204ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x204ec…204fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x204fb…2051b (20, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 46 49 4c 31 29 20 49 4e 54 4f 28 ┆ READ FILE(FIL1) INTO(┆
0x2051b…2053b 55 4b 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UKSTR); ┆
0x2053b…2054a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2054a…2056a (20, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 4b 4f 4e 54 4f 33 3b 20 20 20 20 20 20 20 20 ┆ KONTO=KONTO3; ┆
0x2056a…2058a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2058a…20599 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20599…205b9 (20, 0, 79) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x205b9…205d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x205d9…205e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x205e8…20608 (20, 0, 80) 20 20 20 20 20 20 20 20 49 46 20 28 53 55 42 53 54 52 28 4b 4f 4e 54 4f 2c 4a 2c 31 29 3d 27 20 ┆ IF (SUBSTR(KONTO,J,1)=' ┆
0x20608…20628 27 29 20 26 20 28 53 3d 27 32 27 29 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 ┆') & (S='2') THEN GO TO L1; ┆
0x20628…20637 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20637…20657 (20, 0, 81) 20 20 20 20 20 20 20 20 4b 20 3d 20 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K = J; ┆
0x20657…20677 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20677…20686 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20686…206a6 (21, 0, 0) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 52 47 45 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL STRGEN; ┆
0x206a6…206c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x206c6…206d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x206d5…206f5 (21, 0, 1) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL SKRIV; ┆
0x206f5…20715 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20715…20724 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20724…20744 (21, 0, 2) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L0; ┆
0x20744…20764 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20764…20773 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20773…207c2 (21, 0, 3) 0x20[0x4f]
0x207c2…207e2 (21, 0, 4) 55 54 3a 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UT: D=DATUM; ┆
0x207e2…20802 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20802…20811 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20811…20831 (21, 0, 5) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP(R); ┆
0x20831…20851 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20851…20860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x20860…20880 (21, 0, 6) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x20880…208a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x208a0…208af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x208af…208fe (21, 0, 7) 0x20[0x4f]
0x208fe…2091e (21, 0, 8) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x2091e…2093e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2093e…2094d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2094d…2096d (21, 0, 9) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2098d…2099c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2099c…209bc (21, 0, 10) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x209dc…209eb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x209eb…20a0b (21, 0, 11) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20a2b…20a3a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20a3a…20a5a (21, 0, 12) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20a7a…20a89 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20a89…20aa9 (21, 0, 13) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20ac9…20ad8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20ad8…20af8 (21, 0, 14) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20b18…20b27 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20b27…20b47 (21, 0, 15) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20b67…20b76 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20b76…20b96 (21, 0, 16) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20bb6…20bc5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20bc5…20be5 (21, 0, 17) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20c05…20c14 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20c14…20c34 (21, 0, 18) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20c54…20c63 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20c63…20c83 (21, 0, 19) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20ca3…20cb2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20cb2…20cd2 (21, 0, 20) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20cf2…20d01 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20d01…20d21 (21, 0, 21) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20d41…20d50 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20d50…20d70 (21, 0, 22) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20d90…20d9f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20d9f…20dbf (21, 0, 23) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20ddf…20dee 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20dee…20e0e (21, 0, 24) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20e2e…20e3d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20e3d…20e5d (21, 0, 25) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20e7d…20e8c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20e8c…20eac (21, 0, 26) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20ecc…20edb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20edb…20efb (21, 0, 27) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20f1b…20f2a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20f2a…20f4a (21, 0, 28) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20f6a…20f79 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20f79…20f99 (21, 0, 29) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x20fb9…20fc8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x20fc8…20fe8 (21, 0, 30) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21008…21017 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21017…21037 (21, 0, 31) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21057…21066 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21066…21086 (21, 0, 32) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x210a6…210b5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x210b5…210d5 (21, 0, 33) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x210f5…21104 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21104…21124 (21, 0, 34) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21144…21153 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21153…21173 (21, 0, 35) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21193…211a2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x211a2…211c2 (21, 0, 36) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x211e2…211f1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x211f1…21211 (21, 0, 37) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21231…21240 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21240…21260 (21, 0, 38) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21280…2128f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2128f…212af (21, 0, 39) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x212cf…212de 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x212de…212fe (21, 0, 40) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2131e…2132d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2132d…2134d (21, 0, 41) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2136d…2137c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2137c…2139c (21, 0, 42) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x213bc…213cb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x213cb…213eb (21, 0, 43) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2140b…2141a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2141a…2143a (21, 0, 44) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2145a…21469 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21469…21489 (21, 0, 45) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x214a9…214b8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x214b8…214d8 (21, 0, 46) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x214f8…21507 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21507…21527 (21, 0, 47) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21547…21556 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21556…21576 (21, 0, 48) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21596…215a5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x215a5…215c5 (21, 0, 49) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x215e5…215f4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x215f4…21614 (21, 0, 50) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21634…21643 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21643…21663 (21, 0, 51) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21683…21692 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21692…216b2 (21, 0, 52) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x216d2…216e1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x216e1…21701 (21, 0, 53) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21721…21730 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21730…21750 (21, 0, 54) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21770…2177f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2177f…2179f (21, 0, 55) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x217bf…217ce 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x217ce…217ee (21, 0, 56) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2180e…2181d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2181d…2183d (21, 0, 57) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2185d…2186c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2186c…2188c (21, 0, 58) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x218ac…218bb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x218bb…218db (21, 0, 59) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x218fb…2190a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2190a…2192a (21, 0, 60) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2194a…21959 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21959…21979 (21, 0, 61) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21999…219a8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x219a8…219c8 (21, 0, 62) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x219e8…219f7 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x219f7…21a17 (21, 0, 63) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21a37…21a46 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21a46…21a66 (21, 0, 64) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21a86…21a95 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21a95…21ab5 (21, 0, 65) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21ad5…21ae4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21ae4…21b04 (21, 0, 66) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21b24…21b33 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21b33…21b53 (21, 0, 67) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21b73…21b82 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21b82…21ba2 (21, 0, 68) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21bc2…21bd1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21bd1…21bf1 (21, 0, 69) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21c11…21c20 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21c20…21c40 (21, 0, 70) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21c60…21c6f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21c6f…21c8f (21, 0, 71) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21caf…21cbe 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21cbe…21cde (21, 0, 72) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21cfe…21d0d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21d0d…21d2d (21, 0, 73) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21d4d…21d5c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21d5c…21d7c (21, 0, 74) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21d9c…21dab 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21dab…21dcb (21, 0, 75) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21deb…21dfa 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21dfa…21e1a (21, 0, 76) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21e3a…21e49 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21e49…21e69 (21, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21e89…21e98 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21e98…21eb8 (21, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21ed8…21ee7 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21ee7…21f07 (21, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21f27…21f36 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21f36…21f56 (21, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21f76…21f85 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21f85…21fa5 (21, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x21fc5…21fd4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x21fd4…21ff4 (22, 0, 0) 2f 2a 20 56 35 31 20 4b 4f 4e 54 52 4f 4c 4c 45 52 41 52 20 4b 4f 4e 54 45 52 49 4e 47 41 52 4e ┆/* V51 KONTROLLERAR KONTERINGARN┆
0x21ff4…22014 41 20 4d 45 44 20 41 56 53 45 45 4e 44 45 20 50 5d 20 41 54 54 20 4b 4f 4e 54 4f 2c 55 4b 4f 4e ┆A MED AVSEENDE PÅ ATT KONTO,UKON┆
0x22014…22023 54 55 20 26 20 49 4b 2d 53 4c 41 47 20 20 20 ┆TU & IK-SLAG ┆
0x22023…22043 (22, 0, 1) 20 20 20 46 49 4e 4e 53 20 49 20 52 45 53 50 20 4b 4f 4e 54 4f 54 41 42 45 4c 4c 2c 20 41 54 54 ┆ FINNS I RESP KONTOTABELL, ATT┆
0x22043…22063 20 53 50 5b 52 52 44 41 54 55 4d 20 49 4e 54 45 20 5c 56 45 52 53 4b 52 49 44 49 54 53 2c 20 20 ┆ SPÄRRDATUM INTE ÖVERSKRIDITS, ┆
0x22063…22072 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22072…22092 (22, 0, 2) 20 20 20 4f 43 48 20 41 54 54 20 49 4e 54 45 20 46 45 4c 41 4b 54 49 47 54 20 4b 53 4b 4f 4e 54 ┆ OCH ATT INTE FELAKTIGT KSKONT┆
0x22092…220b2 4f 20 41 4e 56 5b 4e 44 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O ANVÄNDS ┆
0x220b2…220c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x220c1…220e1 (22, 0, 3) 20 20 20 4b 4f 4e 54 4f 54 41 42 45 4c 4c 45 52 4e 41 20 53 54 41 43 4b 41 53 20 49 20 4d 49 4e ┆ KONTOTABELLERNA STACKAS I MIN┆
0x220e1…22101 4e 54 20 56 41 52 45 46 54 45 52 20 53 41 4d 54 4c 49 47 41 20 4b 4f 4e 54 45 52 49 4e 47 41 52 ┆NT VAREFTER SAMTLIGA KONTERINGAR┆
0x22101…22110 20 4b 4f 4e 54 52 4f 4c 4c 45 52 41 53 20 20 ┆ KONTROLLERAS ┆
0x22110…22130 (22, 0, 4) 20 20 20 45 56 20 46 45 4c 20 53 54 41 43 4b 41 53 20 49 20 45 4e 20 46 45 4c 53 54 41 43 4b 20 ┆ EV FEL STACKAS I EN FELSTACK ┆
0x22130…22150 4d 45 44 20 46 45 4c 4b 4f 44 20 26 20 52 45 43 4e 55 4d 4d 45 52 20 20 20 20 20 20 20 20 20 20 ┆MED FELKOD & RECNUMMER ┆
0x22150…2215f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2215f…2217f (22, 0, 5) 20 20 20 4d 45 44 20 48 4a 5b 4c 50 20 41 56 20 46 45 4c 53 54 41 43 4b 45 4e 20 53 4b 52 49 56 ┆ MED HJÄLP AV FELSTACKEN SKRIV┆
0x2217f…2219f 53 20 53 45 44 41 4e 20 46 45 4c 4c 49 53 54 4f 52 20 55 54 20 20 20 20 20 20 20 20 20 20 20 20 ┆S SEDAN FELLISTOR UT ┆
0x2219f…221ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x221ae…221ce (22, 0, 6) 20 20 20 4f 4d 20 49 4e 54 45 20 4e 5d 47 4f 54 20 46 45 4c 20 49 4e 44 49 4b 45 52 41 54 53 20 ┆ OM INTE NÅGOT FEL INDIKERATS ┆
0x221ce…221ee 48 4f 50 50 41 52 20 52 55 54 49 4e 45 4e 20 54 49 4c 4c 20 4e 5b 53 54 41 20 46 41 53 20 49 20 ┆HOPPAR RUTINEN TILL NÄSTA FAS I ┆
0x221ee…221fd 42 41 54 43 48 45 4e 20 20 20 20 20 20 20 20 ┆BATCHEN ┆
0x221fd…2221d (22, 0, 7) 20 20 20 41 4e 4e 41 52 53 20 53 4b 45 52 20 48 4f 50 50 20 54 49 4c 4c 20 51 20 20 20 20 20 20 ┆ ANNARS SKER HOPP TILL Q ┆
0x2221d…2223d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2223d…2224c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2224c…2226c (22, 0, 8) 20 20 20 56 45 52 53 49 4f 4e 20 31 3a 33 20 55 4b 54 4f 2d 74 65 78 74 66 7b 6c 74 65 74 20 61 ┆ VERSION 1:3 UKTO-textfältet a┆
0x2226c…2228c 6e 67 65 72 20 69 20 76 69 6c 6b 61 20 75 6b 74 6f 2d 74 61 62 65 6c 6c 65 72 20 76 69 73 73 74 ┆nger i vilka ukto-tabeller visst┆
0x2228c…2229b 20 55 4b 54 4f 20 68 61 72 20 20 20 20 20 20 ┆ UKTO har ┆
0x2229b…222bb (22, 0, 9) 20 20 20 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 2e 20 38 30 30 37 30 31 2e 20 20 20 20 20 ┆ representation. 800701. ┆
0x222bb…222db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x222db…222ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x222ea…2230a (22, 0, 10) 20 20 20 20 50 52 47 20 4a 5d 20 37 38 30 39 31 31 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PRG JÅ 780911 */ ┆
0x2230a…2232a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2232a…22339 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22339…22388 (22, 0, 11) 0x20[0x4f]
0x22388…223a8 (22, 0, 12) 44 43 4c 20 41 52 45 41 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL AREAP POINTER, ┆
0x223a8…223c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x223c8…223d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x223d7…223f7 (22, 0, 13) 20 20 20 20 31 20 4b 4f 4e 54 4f 53 54 52 20 42 41 53 45 44 28 41 52 45 41 50 29 2c 20 20 20 20 ┆ 1 KONTOSTR BASED(AREAP), ┆
0x223f7…22417 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22417…22426 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22426…22446 (22, 0, 14) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 35 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 KONTO5 CHAR(5), ┆
0x22446…22466 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22466…22475 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22475…22495 (22, 0, 15) 20 20 20 20 20 20 32 20 53 44 41 54 55 4d 35 20 46 49 58 45 44 28 36 29 2c 20 20 20 20 20 20 20 ┆ 2 SDATUM5 FIXED(6), ┆
0x22495…224b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x224b5…224c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x224c4…224e4 (22, 0, 16) 20 20 20 20 20 20 32 20 54 45 58 54 35 20 43 48 41 52 28 33 32 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT5 CHAR(32), ┆
0x224e4…22504 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22504…22513 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22513…22533 (22, 0, 17) 20 20 20 20 20 20 32 20 55 48 4d 41 52 4b 20 43 48 41 52 28 31 29 2c 20 2f 2a 20 41 6e 76 7b 6e ┆ 2 UHMARK CHAR(1), /* Använ┆
0x22533…22553 64 73 20 6e 75 6d 65 72 20 66 7c 72 20 61 6e 67 69 76 61 6e 64 65 20 61 76 20 55 4b 54 4f 2d 74 ┆ds numer för angivande av UKTO-t┆
0x22553…22562 61 62 2e 74 69 6c 6c 2e 2a 2f 20 20 20 20 20 ┆ab.till.*/ ┆
0x22562…22582 (22, 0, 18) 20 20 20 20 20 20 32 20 4c 49 53 54 42 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 LISTB BINARY, ┆
0x22582…225a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x225a2…225b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x225b1…225d1 (22, 0, 19) 20 20 20 20 20 20 32 20 49 4b 42 20 42 49 4e 41 52 59 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 IKB BINARY; ┆
0x225d1…225f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x225f1…22600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22600…22620 (22, 0, 20) 20 20 20 20 20 20 2f 2a 20 34 36 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 46 BYTES */ ┆
0x22620…22640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22640…2264f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2264f…2269e (22, 0, 21) 0x20[0x4f]
0x2269e…226be (22, 0, 22) 44 43 4c 20 31 20 55 4b 53 54 52 20 42 41 53 45 44 28 41 52 45 41 50 29 2c 20 20 20 20 20 20 20 ┆DCL 1 UKSTR BASED(AREAP), ┆
0x226be…226de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x226de…226ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x226ed…2270d (22, 0, 23) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 33 20 43 48 41 52 28 33 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 KONTO3 CHAR(3), ┆
0x2270d…2272d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2272d…2273c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2273c…2275c (22, 0, 24) 20 20 20 20 20 20 32 20 53 44 41 54 55 4d 33 20 46 49 58 45 44 28 36 29 2c 20 20 20 20 20 20 20 ┆ 2 SDATUM3 FIXED(6), ┆
0x2275c…2277c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2277c…2278b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2278b…227ab (22, 0, 25) 20 20 20 20 20 20 32 20 54 45 58 54 33 20 43 48 41 52 28 33 32 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT3 CHAR(32), ┆
0x227ab…227cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x227cb…227da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x227da…227fa (22, 0, 26) 20 20 20 20 20 20 32 20 55 48 4d 41 52 4b 33 20 43 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 20 ┆ 2 UHMARK3 CHAR(1); ┆
0x227fa…2281a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2281a…22829 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22829…22849 (22, 0, 27) 20 20 20 20 20 20 2f 2a 20 34 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 40 BYTES */ ┆
0x22849…22869 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22869…22878 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22878…228c7 (22, 0, 28) 0x20[0x4f]
0x228c7…228e7 (22, 0, 29) 44 43 4c 20 53 50 4b 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL SPK POINTER, ┆
0x228e7…22907 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22907…22916 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22916…22936 (22, 0, 30) 20 20 20 20 31 20 53 54 41 43 4b 53 54 31 20 42 41 53 45 44 28 53 50 4b 29 2c 20 20 20 20 20 20 ┆ 1 STACKST1 BASED(SPK), ┆
0x22936…22956 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22956…22965 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22965…22985 (22, 0, 31) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 35 53 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 KONTO5S CHAR(5), ┆
0x22985…229a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x229a5…229b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x229b4…229d4 (22, 0, 32) 20 20 20 20 20 20 32 20 53 44 41 54 55 4d 35 53 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 ┆ 2 SDATUM5S FIXED(5), ┆
0x229d4…229f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x229f4…22a03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22a03…22a23 (22, 0, 33) 20 20 20 20 20 20 32 20 4b 4f 50 50 4c 49 4e 47 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 ┆ 2 KOPPLING BINARY, ┆
0x22a23…22a43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22a43…22a52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22a52…22a72 (22, 0, 34) 20 20 20 20 20 20 32 20 53 50 4b 55 4b 54 4f 54 41 42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 SPKUKTOTAB ┆
0x22a72…22a92 20 43 48 41 52 20 28 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (1); ┆
0x22a92…22aa1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22aa1…22ac1 (22, 0, 35) 20 20 20 20 20 20 2f 2a 20 31 31 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 11 BYTES */ ┆
0x22ac1…22ae1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22ae1…22af0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22af0…22b3f (22, 0, 36) 0x20[0x4f]
0x22b3f…22b5f (22, 0, 37) 44 43 4c 20 31 20 53 54 41 43 4b 53 54 32 20 42 41 53 45 44 28 53 50 4b 29 2c 20 20 20 20 20 20 ┆DCL 1 STACKST2 BASED(SPK), ┆
0x22b5f…22b7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22b7f…22b8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22b8e…22bae (22, 0, 38) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 33 53 20 43 48 41 52 28 33 29 2c 20 20 20 20 20 20 20 20 ┆ 2 KONTO3S CHAR(3), ┆
0x22bae…22bce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22bce…22bdd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22bdd…22bfd (22, 0, 39) 20 20 20 20 20 20 32 20 53 44 41 54 55 4d 33 53 20 46 49 58 45 44 28 35 29 3b 20 20 20 20 20 20 ┆ 2 SDATUM3S FIXED(5); ┆
0x22bfd…22c1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22c1d…22c2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22c2c…22c4c (22, 0, 40) 20 20 20 20 20 20 2f 2a 20 36 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 6 BYTES */ ┆
0x22c4c…22c6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22c6c…22c7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22c7b…22cca (22, 0, 41) 0x20[0x4f]
0x22cca…22cea (22, 0, 42) 44 43 4c 20 53 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL SP POINTER, ┆
0x22cea…22d0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22d0a…22d19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22d19…22d39 (22, 0, 43) 20 20 20 20 31 20 46 45 4c 53 54 52 20 42 41 53 45 44 28 53 50 29 2c 20 20 20 20 20 20 20 20 20 ┆ 1 FELSTR BASED(SP), ┆
0x22d39…22d59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22d59…22d68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22d68…22d88 (22, 0, 44) 20 20 20 20 20 20 32 20 52 45 43 4e 52 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 RECNR BINARY, ┆
0x22d88…22da8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22da8…22db7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22db7…22dd7 (22, 0, 45) 20 20 20 20 20 20 32 20 46 45 4c 54 59 50 20 42 49 4e 41 52 59 3b 20 20 20 20 20 20 20 20 20 20 ┆ 2 FELTYP BINARY; ┆
0x22dd7…22df7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22df7…22e06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22e06…22e26 (22, 0, 46) 20 20 20 20 20 20 2f 2a 20 34 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 4 BYTES */ ┆
0x22e26…22e46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22e46…22e55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22e55…22ea4 (22, 0, 47) 0x20[0x4f]
0x22ea4…22ec4 (22, 0, 48) 44 43 4c 20 31 20 56 45 52 53 54 52 20 42 41 53 45 44 28 41 52 45 41 50 29 2c 20 20 20 20 20 20 ┆DCL 1 VERSTR BASED(AREAP), ┆
0x22ec4…22ee4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22ee4…22ef3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22ef3…22f13 (22, 0, 49) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 46 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 20 ┆ 2 KONTOF FIXED(11), ┆
0x22f13…22f33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22f33…22f42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22f42…22f62 (22, 0, 50) 20 20 20 20 20 20 32 20 56 45 52 4e 52 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 VERNR FIXED(5), ┆
0x22f62…22f82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22f82…22f91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22f91…22fb1 (22, 0, 51) 20 20 20 20 20 20 32 20 42 44 41 54 55 4d 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 BDATUM FIXED(5), ┆
0x22fb1…22fd1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22fd1…22fe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22fe0…23000 (22, 0, 52) 20 20 20 20 20 20 32 20 50 44 41 54 55 4d 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 PDATUM FIXED(5), ┆
0x23000…23020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23020…2302f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2302f…2304f (22, 0, 53) 20 20 20 20 20 20 32 20 42 45 4c 4f 50 50 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 20 ┆ 2 BELOPP FIXED(11), ┆
0x2304f…2306f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2306f…2307e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2307e…2309e (22, 0, 54) 20 20 20 20 20 20 32 20 54 45 58 54 46 20 43 48 41 52 28 31 33 29 3b 20 20 20 20 20 20 20 20 20 ┆ 2 TEXTF CHAR(13); ┆
0x2309e…230be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x230be…230cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x230cd…230ed (22, 0, 55) 20 20 20 20 20 20 2f 2a 20 33 34 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 34 BYTES */ ┆
0x230ed…2310d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2310d…2311c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2311c…2316b (22, 0, 56) 0x20[0x4f]
0x2316b…2318b (22, 0, 57) 44 43 4c 20 31 20 41 52 45 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 AREA, ┆
0x2318b…231ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x231ab…231ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x231ba…231da (22, 0, 58) 20 20 20 20 20 20 32 20 43 48 28 31 30 30 29 20 43 48 41 52 28 35 30 29 3b 20 20 20 20 20 20 20 ┆ 2 CH(100) CHAR(50); ┆
0x231da…231fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x231fa…23209 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23209…23229 (22, 0, 59) 20 20 20 20 20 20 2f 2a 20 35 30 30 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 ┆ /* 5000 BYTES */ ┆
0x23229…23249 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23249…23258 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23258…232a7 (22, 0, 60) 0x20[0x4f]
0x232a7…232c7 (22, 0, 61) 44 43 4c 20 31 20 20 20 55 4b 54 4f 54 41 42 50 4f 53 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 UKTOTABPOST, ┆
0x232c7…232e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x232e7…232f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x232f6…23316 (22, 0, 62) 20 20 20 20 20 20 20 20 32 20 20 20 55 54 41 42 4b 4f 4e 54 4f 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 UTABKONTO ┆
0x23316…23336 20 43 48 41 52 20 28 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (3), ┆
0x23336…23345 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23345…23365 (22, 0, 63) 20 20 20 20 20 20 20 20 32 20 20 20 55 54 41 42 44 41 54 55 4d 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 UTABDATUM ┆
0x23365…23385 20 46 49 58 45 44 20 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FIXED (6), ┆
0x23385…23394 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23394…233b4 (22, 0, 64) 20 20 20 20 20 20 20 20 32 20 20 20 55 54 41 42 54 41 42 45 4c 4c 20 20 20 20 20 20 20 20 20 20 ┆ 2 UTABTABELL ┆
0x233b4…233d4 20 43 48 41 52 20 28 33 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (32), ┆
0x233d4…233e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x233e3…23403 (22, 0, 65) 20 20 20 20 20 20 20 20 32 20 20 20 55 54 41 42 55 48 4d 41 52 4b 20 20 20 20 20 20 20 20 20 20 ┆ 2 UTABUHMARK ┆
0x23403…23423 20 43 48 41 52 20 28 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (1); ┆
0x23423…23432 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23432…23481 (22, 0, 66) 0x20[0x4f]
0x23481…234a1 (22, 0, 67) 44 43 4c 20 55 4b 4f 4e 54 4f 50 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL UKONTOP FILE; ┆
0x234a1…234c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x234c1…234d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x234d0…2351f (22, 0, 68) 0x20[0x4f]
0x2351f…2353f (22, 0, 69) 44 43 4c 20 31 20 46 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 FSTR, ┆
0x2353f…2355f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2355f…2356e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2356e…2358e (22, 0, 70) 20 20 20 20 20 20 32 20 46 49 4c 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIL FILE; ┆
0x2358e…235ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x235ae…235bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x235bd…2360c (22, 0, 71) 0x20[0x4f]
0x2360c…2362c (22, 0, 72) 44 43 4c 20 31 20 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 STR, ┆
0x2362c…2364c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2364c…2365b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2365b…2367b (22, 0, 73) 20 20 20 20 20 20 32 20 58 4e 20 43 48 41 52 28 32 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 XN CHAR(24); ┆
0x2367b…2369b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2369b…236aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x236aa…236f9 (22, 0, 74) 0x20[0x4f]
0x236f9…23719 (22, 0, 75) 44 43 4c 20 4b 4f 4e 54 4f 41 44 52 28 33 29 20 42 49 4e 41 52 59 2c 20 2f 2a 20 4c 41 47 52 41 ┆DCL KONTOADR(3) BINARY, /* LAGRA┆
0x23719…23739 52 20 53 54 41 52 54 50 4f 53 54 20 46 5c 52 20 56 41 52 20 4f 43 48 20 45 4e 20 41 56 20 4b 4f ┆R STARTPOST FÖR VAR OCH EN AV KO┆
0x23739…23748 4e 54 4f 54 41 42 45 4c 4c 45 52 4e 41 20 20 ┆NTOTABELLERNA ┆
0x23748…23768 (22, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 32 2c 33 20 49 20 ┆ 1,2,3 I ┆
0x23768…23788 4d 49 4e 4e 45 54 20 45 46 54 45 52 20 49 4e 4c 5b 53 4e 49 4e 47 45 4e 20 2a 2f 20 20 20 20 20 ┆MINNET EFTER INLÄSNINGEN */ ┆
0x23788…23797 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23797…237b7 (22, 0, 77) 20 20 20 20 4d 49 4e 4e 45 20 46 49 58 45 44 28 35 29 20 49 4e 49 54 28 34 39 31 30 30 29 2c 20 ┆ MINNE FIXED(5) INIT(49100), ┆
0x237b7…237d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x237d7…237e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x237e6…23806 (22, 0, 78) 20 20 20 20 46 49 4c 54 41 42 28 34 29 20 43 48 41 52 28 32 34 29 20 49 4e 49 54 28 27 20 20 4b ┆ FILTAB(4) CHAR(24) INIT(' K┆
0x23806…23826 4f 4e 54 4f 50 20 20 27 2c 27 20 20 55 4b 4f 4e 54 4f 50 20 27 2c 27 20 20 4b 53 4b 4f 4e 54 4f ┆ONTOP ',' UKONTOP ',' KSKONTO┆
0x23826…23835 50 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆P', ┆
0x23835…23855 (22, 0, 79) 20 20 20 20 27 20 20 54 52 41 4e 53 46 49 4c 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ' TRANSFIL'), ┆
0x23855…23875 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23875…23884 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23884…238a4 (22, 0, 80) 20 20 20 20 52 4c 45 4e 47 44 28 34 29 20 42 49 4e 41 52 59 20 49 4e 49 54 28 34 36 2c 34 30 2c ┆ RLENGD(4) BINARY INIT(46,40,┆
0x238a4…238c4 34 30 2c 33 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆40,34), ┆
0x238c4…238d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x238d3…238f3 (22, 0, 81) 20 20 20 20 4d 41 58 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX BINARY, ┆
0x238f3…23913 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23913…23922 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23922…23942 (23, 0, 0) 20 20 20 20 4b 4f 4e 54 31 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONT1 CHAR(5), ┆
0x23942…23962 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23962…23971 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23971…23991 (23, 0, 1) 20 20 20 20 4b 4f 4e 54 32 20 43 48 41 52 28 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONT2 CHAR(3), ┆
0x23991…239b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x239b1…239c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x239c0…239e0 (23, 0, 2) 20 20 20 20 4b 4f 4e 54 33 20 43 48 41 52 28 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONT3 CHAR(3), ┆
0x239e0…23a00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23a00…23a0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23a0f…23a2f (23, 0, 3) 20 20 20 20 50 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PPP POINTER, ┆
0x23a2f…23a4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23a4f…23a5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23a5e…23a7e (23, 0, 4) 20 20 20 20 4b 4f 4e 54 4f 20 42 41 53 45 44 28 50 50 50 29 20 43 48 41 52 28 31 31 29 2c 20 20 ┆ KONTO BASED(PPP) CHAR(11), ┆
0x23a7e…23a9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23a9e…23aad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23aad…23acd (23, 0, 5) 20 20 20 20 54 31 34 20 43 48 41 52 28 31 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T14 CHAR(14), ┆
0x23acd…23aed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23aed…23afc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23afc…23b1c (23, 0, 6) 20 20 20 20 54 31 33 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T13 CHAR(13), ┆
0x23b1c…23b3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23b3c…23b4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23b4b…23b6b (23, 0, 7) 20 20 20 20 55 4b 54 4f 4d 41 52 4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UKTOMARK ┆
0x23b6b…23b8b 20 43 48 41 52 20 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (1), ┆
0x23b8b…23b9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23b9a…23bba (23, 0, 8) 20 20 20 20 53 54 41 43 4b 44 4a 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ STACKDJ BINARY, ┆
0x23bba…23bda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23bda…23be9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23be9…23c09 (23, 0, 9) 20 20 20 20 53 49 44 41 20 42 49 4e 41 52 59 20 49 4e 49 54 28 31 29 2c 20 20 20 20 20 20 20 20 ┆ SIDA BINARY INIT(1), ┆
0x23c09…23c29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23c29…23c38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23c38…23c58 (23, 0, 10) 20 20 20 20 52 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R BINARY, ┆
0x23c58…23c78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23c78…23c87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23c87…23ca7 (23, 0, 11) 20 20 20 20 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM CHAR(6), ┆
0x23ca7…23cc7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23cc7…23cd6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23cd6…23cf6 (23, 0, 12) 20 20 20 20 46 45 4c 53 54 41 43 4b 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FELSTACK BINARY, ┆
0x23cf6…23d16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23d16…23d25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23d25…23d45 (23, 0, 13) 20 20 20 20 55 54 41 42 49 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UTABIND ┆
0x23d45…23d65 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY, ┆
0x23d65…23d74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23d74…23d94 (23, 0, 14) 20 20 20 20 52 43 4f 44 45 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 ┆ RCODE BINARY INIT(0), ┆
0x23d94…23db4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23db4…23dc3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23dc3…23de3 (23, 0, 15) 20 20 20 20 4e 41 4d 4e 20 28 33 29 20 43 48 41 52 28 31 30 29 20 49 4e 49 54 28 27 4d 45 4c 4c ┆ NAMN (3) CHAR(10) INIT('MELL┆
0x23de3…23e03 41 4e 4b 52 27 2c 27 4b 56 56 2f 4b 57 41 52 4f 53 27 2c 27 41 52 4f 53 27 29 2c 20 20 20 20 20 ┆ANKR','KVV/KWAROS','AROS'), ┆
0x23e03…23e12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23e12…23e32 (23, 0, 16) 20 20 20 20 54 45 58 54 28 35 29 20 43 48 41 52 28 34 30 29 20 49 4e 49 54 28 20 20 20 20 20 20 ┆ TEXT(5) CHAR(40) INIT( ┆
0x23e32…23e52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23e52…23e61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23e61…23e81 (23, 0, 17) 20 20 20 20 27 56 45 52 2e 20 20 20 20 20 4b 4f 4e 54 4f 20 20 20 20 20 20 20 42 45 4c 4f 50 50 ┆ 'VER. KONTO BELOPP┆
0x23e81…23ea1 20 20 20 53 50 5b 52 52 44 41 54 55 4d 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SPÄRRDATUM', ┆
0x23ea1…23eb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23eb0…23ed0 (23, 0, 18) 20 20 20 20 27 56 45 52 2e 20 20 20 20 20 55 2e 4b 54 4f 20 20 20 20 20 20 20 42 45 4c 4f 50 50 ┆ 'VER. U.KTO BELOPP┆
0x23ed0…23ef0 20 20 20 53 50 5b 52 52 44 41 54 55 4d 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SPÄRRDATUM', ┆
0x23ef0…23eff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23eff…23f1f (23, 0, 19) 20 20 20 20 27 56 45 52 2e 20 20 20 20 20 49 4b 20 20 20 20 20 20 20 20 20 20 42 45 4c 4f 50 50 ┆ 'VER. IK BELOPP┆
0x23f1f…23f3f 20 20 20 53 50 5b 52 52 44 41 54 55 4d 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SPÄRRDATUM', ┆
0x23f3f…23f4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23f4e…23f6e (23, 0, 20) 20 20 20 20 27 56 45 52 2e 20 20 20 20 20 4b 4f 4e 54 4f 20 20 20 20 20 20 49 4b 20 20 20 20 20 ┆ 'VER. KONTO IK ┆
0x23f6e…23f8e 20 20 20 20 20 42 45 4c 4f 50 50 27 2c 27 20 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BELOPP',' '), ┆
0x23f8e…23f9d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23f9d…23fbd (23, 0, 21) 20 20 20 20 42 54 28 30 3a 39 29 20 42 49 4e 41 52 59 20 49 4e 49 54 28 31 2c 32 2c 34 2c 38 2c ┆ BT(0:9) BINARY INIT(1,2,4,8,┆
0x23fbd…23fdd 31 36 2c 33 32 2c 36 34 2c 31 32 38 2c 32 35 36 2c 35 31 32 29 2c 20 20 20 20 20 20 20 20 20 20 ┆16,32,64,128,256,512), ┆
0x23fdd…23fec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x23fec…2400c (23, 0, 22) 20 20 20 20 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ P POINTER, ┆
0x2400c…2402c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2402c…2403b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2403b…2405b (23, 0, 23) 20 20 20 20 44 20 42 41 53 45 44 28 50 29 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 ┆ D BASED(P) CHAR(6), ┆
0x2405b…2407b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2407b…2408a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2408a…240aa (23, 0, 24) 20 20 20 20 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PP POINTER, ┆
0x240aa…240ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x240ca…240d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x240d9…240f9 (23, 0, 25) 20 20 20 20 31 20 53 54 52 58 20 42 41 53 45 44 28 50 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 STRX BASED(PP), ┆
0x240f9…24119 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24119…24128 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24128…24148 (23, 0, 26) 20 20 20 20 20 20 32 20 58 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 X CHAR(2), ┆
0x24148…24168 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24168…24177 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24177…24197 (23, 0, 27) 20 20 20 20 20 20 32 20 59 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 Y CHAR(2), ┆
0x24197…241b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x241b7…241c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x241c6…241e6 (23, 0, 28) 20 20 20 20 20 20 32 20 46 49 52 4d 41 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIRMA CHAR(1), ┆
0x241e6…24206 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24206…24215 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24215…24235 (23, 0, 29) 20 20 20 20 20 20 20 20 20 20 32 20 20 4f 50 5f 4b 4f 44 20 42 49 4e 41 52 59 2c 20 20 20 20 20 ┆ 2 OP_KOD BINARY, ┆
0x24235…24255 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24255…24264 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24264…24284 (23, 0, 30) 20 20 20 20 20 20 20 20 20 20 32 20 20 52 41 44 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 ┆ 2 RADANT BINARY, ┆
0x24284…242a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x242a4…242b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x242b3…242d3 (23, 0, 31) 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 27 20 20 56 35 20 ┆ VERSION CHAR(47) INIT(' V5 ┆
0x242d3…242f3 56 65 72 73 69 6f 6e 20 31 2e 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆Version 1.3 ┆
0x242f3…24302 20 20 20 20 38 30 30 37 30 31 27 29 3b 20 20 ┆ 800701'); ┆
0x24302…24351 (23, 0, 32) 0x20[0x4f]
0x24351…24371 (23, 0, 33) 20 20 20 20 2f 2a 20 20 4b 4f 4e 54 4f 47 45 4e 20 4c 5b 53 45 52 20 49 4e 20 41 4c 4c 41 20 4b ┆ /* KONTOGEN LÄSER IN ALLA K┆
0x24371…24391 4f 4e 54 4f 54 41 42 45 4c 4c 45 52 4e 41 2c 20 49 20 46 5c 52 4b 4f 52 54 41 44 45 20 52 45 43 ┆ONTOTABELLERNA, I FÖRKORTADE REC┆
0x24391…243a0 4f 52 44 53 2c 20 49 20 20 20 20 20 20 20 20 ┆ORDS, I ┆
0x243a0…243c0 (23, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 4d 49 4e 4e 45 54 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MINNET. ┆
0x243c0…243e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x243e0…243ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x243ef…2440f (23, 0, 35) 20 20 20 4b 4f 4e 54 4f 47 45 4e 20 42 59 47 47 45 52 20 55 50 50 20 45 4e 20 53 54 41 43 4b 20 ┆ KONTOGEN BYGGER UPP EN STACK ┆
0x2440f…2442f 4d 45 44 20 4b 4f 4e 54 4f 4e 55 4d 4d 45 52 20 2c 53 50 5b 52 52 44 41 54 55 4d 20 26 20 4b 4f ┆MED KONTONUMMER ,SPÄRRDATUM & KO┆
0x2442f…2443e 4e 54 4f 53 50 5b 52 52 20 20 20 20 20 20 20 ┆NTOSPÄRR ┆
0x2443e…2445e (23, 0, 36) 20 20 20 49 4e 4c 5b 53 4e 49 4e 47 45 4e 20 53 4b 45 52 20 49 20 42 4c 4f 43 4b 20 2a 2f 20 20 ┆ INLÄSNINGEN SKER I BLOCK */ ┆
0x2445e…2447e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2447e…2448d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2448d…244dc (23, 0, 37) 0x20[0x4f]
0x244dc…244fc (23, 0, 38) 4b 4f 4e 54 4f 47 45 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTOGEN:PROC; ┆
0x244fc…2451c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2451c…2452b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2452b…2454b (23, 0, 39) 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 32 37 30 30 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(SPK)=27000; ┆
0x2454b…2456b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2456b…2457a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2457a…2459a (23, 0, 40) 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 33 3b 20 2f 2a 20 31 20 3d 20 4b 54 4f 54 41 42 ┆ DO I=1 TO 3; /* 1 = KTOTAB┆
0x2459a…245ba 2c 20 32 20 3d 20 55 4b 54 4f 54 41 42 2c 20 33 20 3d 20 4b 53 4b 54 4f 54 41 42 20 2a 2f 20 20 ┆, 2 = UKTOTAB, 3 = KSKTOTAB */ ┆
0x245ba…245c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x245c9…245e9 (23, 0, 41) 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 41 44 52 28 49 29 3d 55 4e 53 50 45 43 28 53 50 4b 29 3b ┆ KONTOADR(I)=UNSPEC(SPK);┆
0x245e9…24609 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24609…24618 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24618…24638 (23, 0, 42) 20 20 20 20 20 20 20 20 58 4e 3d 46 49 4c 54 41 42 28 49 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ XN=FILTAB(I); ┆
0x24638…24658 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24658…24667 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24667…24687 (23, 0, 43) 20 20 20 20 20 20 20 20 46 53 54 52 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR=STR; ┆
0x24687…246a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x246a7…246b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x246b6…246d6 (23, 0, 44) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 3b 20 20 20 20 20 2f 2a 20 5c 50 50 4e 41 52 20 ┆ OPEN FIL; /* ÖPPNAR ┆
0x246d6…246f6 41 4c 4c 41 20 46 49 4c 45 52 4e 41 20 42 45 52 2e 20 50 5d 20 22 58 4e 22 20 4f 43 48 20 22 49 ┆ALLA FILERNA BER. PÅ "XN" OCH "I┆
0x246f6…24705 22 20 20 2a 2f 20 20 20 20 20 20 20 20 20 20 ┆" */ ┆
0x24705…24725 (23, 0, 45) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 46 49 4c 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL SEOF(FIL); ┆
0x24725…24745 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24745…24754 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24754…24774 (23, 0, 46) 20 20 20 20 20 20 20 20 4d 41 58 3d 55 4e 53 50 45 43 28 46 49 4c 29 3b 20 20 20 20 20 20 20 20 ┆ MAX=UNSPEC(FIL); ┆
0x24774…24794 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24794…247a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x247a3…247c3 (23, 0, 47) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 46 49 4c 29 3d 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ UNSPEC(FIL)=0; ┆
0x247c3…247e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x247e3…247f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x247f2…24812 (23, 0, 48) 20 20 20 20 20 20 20 20 4a 3d 35 30 30 30 2f 52 4c 45 4e 47 44 28 49 29 3b 20 20 20 20 20 20 20 ┆ J=5000/RLENGD(I); ┆
0x24812…24832 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24832…24841 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24841…24861 (23, 0, 49) 4b 31 3a 20 20 20 20 20 49 46 20 4a 3e 4d 41 58 20 54 48 45 4e 20 4a 3d 4d 41 58 3b 20 20 20 20 ┆K1: IF J>MAX THEN J=MAX; ┆
0x24861…24881 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24881…24890 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24890…248b0 (23, 0, 50) 20 20 20 20 20 20 20 20 4d 41 58 3d 4d 41 58 2d 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX=MAX-J; ┆
0x248b0…248d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x248d0…248df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x248df…248ff (23, 0, 51) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 46 49 4c 2c 41 52 45 41 2c 4a 2c 52 43 4f 44 45 ┆ CALL RD(FIL,AREA,J,RCODE┆
0x248ff…2491f 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x2491f…2492e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2492e…2494e (23, 0, 52) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 ┆ IF RCODE =0 THEN PUT SKI┆
0x2494e…2496e 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 27 2c 46 49 4c 54 41 42 28 49 29 2c 52 43 4f 44 ┆P LIST('LÄSFEL I',FILTAB(I),RCOD┆
0x2496e…2497d 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆E); ┆
0x2497d…2499d (23, 0, 53) 20 20 20 20 20 20 20 20 41 52 45 41 50 3d 41 44 44 52 28 41 52 45 41 29 3b 20 2f 2a 20 50 4f 49 ┆ AREAP=ADDR(AREA); /* POI┆
0x2499d…249bd 4e 54 45 52 4e 20 46 5c 52 20 41 4c 54 2e 20 50 4f 53 54 53 50 45 43 45 4e 20 46 5d 52 20 53 54 ┆NTERN FÖR ALT. POSTSPECEN FÅR ST┆
0x249bd…249cc 41 52 54 41 44 52 20 46 5c 52 20 20 20 20 20 ┆ARTADR FÖR ┆
0x249cc…249ec (23, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 45 54 ┆ DET┆
0x249ec…24a0c 20 49 4e 4c 5b 53 54 41 20 50 41 43 4b 41 44 45 20 42 4c 4f 43 4b 45 54 20 20 2a 2f 20 20 20 20 ┆ INLÄSTA PACKADE BLOCKET */ ┆
0x24a0c…24a1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24a1b…24a3b (23, 0, 55) 20 20 20 20 20 20 20 20 44 4f 20 4b 3d 31 20 54 4f 20 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO K=1 TO J; ┆
0x24a3b…24a5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24a5b…24a6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24a6a…24a8a (23, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 ┆ IF I=1 THEN DO; ┆
0x24a8a…24aaa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24aaa…24ab9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24ab9…24ad9 (23, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 35 53 3d 4b 4f 4e 54 4f 35 3b 20 20 20 ┆ KONTO5S=KONTO5; ┆
0x24ad9…24af9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24af9…24b08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24b08…24b28 (23, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 44 41 54 55 4d 35 7f 3d 30 20 54 48 45 4e ┆ IF SDATUM5 =0 THEN┆
0x24b28…24b48 20 53 44 41 54 55 4d 35 53 3d 53 44 41 54 55 4d 35 2d 37 38 30 30 30 30 3b 20 20 20 20 20 20 20 ┆ SDATUM5S=SDATUM5-780000; ┆
0x24b48…24b57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24b57…24b77 (23, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 53 44 41 54 55 4d 35 53 3d 30 3b 20 20 ┆ ELSE SDATUM5S=0; ┆
0x24b77…24b97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24b97…24ba6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24ba6…24bc6 (23, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 50 50 4c 49 4e 47 3d 49 4b 42 3b 20 20 20 20 20 ┆ KOPPLING=IKB; ┆
0x24bc6…24be6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24be6…24bf5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24bf5…24c15 (23, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 50 4b 55 4b 54 4f 54 41 42 20 3d 20 55 48 4d 41 52 ┆ SPKUKTOTAB = UHMAR┆
0x24c15…24c35 4b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆K; ┆
0x24c35…24c44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24c44…24c64 (23, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 55 4e 53 50 45 43 ┆ UNSPEC(SPK)=UNSPEC┆
0x24c64…24c84 28 53 50 4b 29 2b 31 31 3b 20 2f 2a 20 4b 54 4f 54 41 42 42 45 4e 53 20 4b 4f 4e 54 52 2e 52 45 ┆(SPK)+11; /* KTOTABBENS KONTR.RE┆
0x24c84…24c93 43 2e 20 3d 20 31 31 20 50 4f 53 20 2a 2f 20 ┆C. = 11 POS */ ┆
0x24c93…24cb3 (23, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x24cb3…24cd3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24cd3…24ce2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24ce2…24d02 (23, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x24d02…24d22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24d22…24d31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24d31…24d51 (23, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 33 53 3d 4b 4f 4e 54 4f 33 3b 20 20 20 ┆ KONTO3S=KONTO3; ┆
0x24d51…24d71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24d71…24d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24d80…24da0 (23, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 44 41 54 55 4d 33 7f 3d 30 20 54 48 45 4e ┆ IF SDATUM3 =0 THEN┆
0x24da0…24dc0 20 53 44 41 54 55 4d 33 53 3d 53 44 41 54 55 4d 33 2d 37 38 30 30 30 30 3b 20 20 20 20 20 20 20 ┆ SDATUM3S=SDATUM3-780000; ┆
0x24dc0…24dcf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24dcf…24def (23, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 53 44 41 54 55 4d 33 53 3d 30 3b 20 20 ┆ ELSE SDATUM3S=0; ┆
0x24def…24e0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24e0f…24e1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24e1e…24e3e (23, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 55 4e 53 50 45 43 ┆ UNSPEC(SPK)=UNSPEC┆
0x24e3e…24e5e 28 53 50 4b 29 2b 36 3b 20 2f 2a 20 49 4b 54 41 42 42 45 4e 53 20 4b 4f 4e 54 52 2e 20 52 45 43 ┆(SPK)+6; /* IKTABBENS KONTR. REC┆
0x24e5e…24e6d 2e 20 3d 20 36 20 50 4f 53 20 2a 2f 20 20 20 ┆. = 6 POS */ ┆
0x24e6d…24e8d (23, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x24e8d…24ead 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24ead…24ebc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24ebc…24edc (23, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 41 52 45 41 50 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(AREAP)=UNSPEC(┆
0x24edc…24efc 41 52 45 41 50 29 2b 52 4c 45 4e 47 44 28 49 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AREAP)+RLENGD(I); ┆
0x24efc…24f0b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24f0b…24f2b (23, 0, 71) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x24f2b…24f4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24f4b…24f5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24f5a…24f7a (23, 0, 72) 20 20 20 20 20 20 20 20 49 46 20 4d 41 58 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 31 3b ┆ IF MAX =0 THEN GO TO K1;┆
0x24f7a…24f9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24f9a…24fa9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24fa9…24fc9 (23, 0, 73) 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x24fc9…24fe9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24fe9…24ff8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x24ff8…25018 (23, 0, 74) 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x25018…25038 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25038…25047 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25047…25067 (23, 0, 75) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x25067…25087 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25087…25096 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25096…250e5 (23, 0, 76) 0x20[0x4f]
0x250e5…25105 (23, 0, 77) 53 54 41 43 4b 41 46 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STACKAF:PROC; ┆
0x25105…25125 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25125…25134 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25134…25154 (23, 0, 78) 20 20 20 20 20 20 20 20 52 45 43 4e 52 3d 55 4e 53 50 45 43 28 46 49 4c 29 2d 4a 2b 4b 2d 31 3b ┆ RECNR=UNSPEC(FIL)-J+K-1;┆
0x25154…25174 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25174…25183 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25183…251a3 (23, 0, 79) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 29 3d 55 4e 53 50 45 43 28 53 50 29 2b 34 3b ┆ UNSPEC(SP)=UNSPEC(SP)+4;┆
0x251a3…251c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x251c3…251d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x251d2…251f2 (23, 0, 80) 20 20 20 20 20 20 20 20 53 54 41 43 4b 44 4a 3d 53 54 41 43 4b 44 4a 2b 31 3b 20 20 20 20 20 20 ┆ STACKDJ=STACKDJ+1; ┆
0x251f2…25212 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25212…25221 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25221…25241 (23, 0, 81) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x25241…25261 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25261…25270 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25270…25290 (24, 0, 0) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x25290…252b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x252b0…252bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x252bf…2530e (24, 0, 1) 0x20[0x4f]
[…0x1…]
0x2535d…2537d (24, 0, 3) 55 4b 54 4f 54 41 42 54 45 53 54 3a 20 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UKTOTABTEST: PROC; ┆
0x2537d…2539d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2539d…253ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x253ac…253fb (24, 0, 4) 0x20[0x4f]
0x253fb…2541b (24, 0, 5) 55 4b 54 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UKT10: ┆
0x2541b…2543b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2543b…2544a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2544a…2546a (24, 0, 6) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 55 4b 4f 4e 54 4f 50 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN UKONTOP; ┆
0x2546a…2548a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2548a…25499 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25499…254b9 (24, 0, 7) 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 20 28 4b 4f 4e 54 32 29 20 46 49 4c 45 20 28 55 ┆ READ KEY (KONT2) FILE (U┆
0x254b9…254d9 4b 4f 4e 54 4f 50 29 20 49 4e 54 4f 20 28 55 4b 54 4f 54 41 42 50 4f 53 54 29 3b 20 20 20 20 20 ┆KONTOP) INTO (UKTOTABPOST); ┆
0x254d9…254e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x254e8…25508 (24, 0, 8) 55 4b 54 32 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UKT20: ┆
0x25508…25528 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25528…25537 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25537…25557 (24, 0, 9) 20 20 20 20 20 20 20 20 49 46 20 55 4b 54 4f 4d 41 52 4b 20 3d 20 27 20 27 20 54 48 45 4e 20 47 ┆ IF UKTOMARK = ' ' THEN G┆
0x25557…25577 4f 20 54 4f 20 55 4b 54 39 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O TO UKT99; ┆
0x25577…25586 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25586…255a6 (24, 0, 10) 20 20 20 20 20 20 20 20 44 4f 20 55 54 41 42 49 4e 44 20 3d 20 31 20 54 4f 20 33 32 3b 20 20 20 ┆ DO UTABIND = 1 TO 32; ┆
0x255a6…255c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x255c6…255d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x255d5…255f5 (24, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 55 54 41 42 54 41 42 45 4c ┆ IF SUBSTR (UTABTABEL┆
0x255f5…25615 4c 2c 20 55 54 41 42 49 4e 44 2c 31 29 20 3d 20 55 4b 54 4f 4d 41 52 4b 20 54 48 45 4e 20 47 4f ┆L, UTABIND,1) = UKTOMARK THEN GO┆
0x25615…25624 20 54 4f 20 55 4b 54 39 39 3b 20 20 20 20 20 ┆ TO UKT99; ┆
0x25624…25644 (24, 0, 12) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x25644…25664 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25664…25673 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25673…25693 (24, 0, 13) 55 4b 54 33 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UKT30: ┆
0x25693…256b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x256b3…256c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x256c2…256e2 (24, 0, 14) 20 20 20 20 20 20 20 20 46 45 4c 54 59 50 20 3d 20 38 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FELTYP = 8; ┆
0x256e2…25702 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25702…25711 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25711…25731 (24, 0, 15) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 41 46 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL STACKAF; ┆
0x25731…25751 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25751…25760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25760…25780 (24, 0, 16) 55 4b 54 39 39 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UKT99: ┆
0x25780…257a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x257a0…257af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x257af…257cf (24, 0, 17) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x257cf…257ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x257ef…257fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x257fe…2581e (24, 0, 18) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2581e…2583e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2583e…2584d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2584d…2589c (24, 0, 19) 0x20[0x4f]
[…0x1…]
0x258eb…2590b (24, 0, 21) 2f 2a 20 54 45 53 54 20 54 45 53 54 41 52 20 4b 4f 4e 54 45 52 49 4e 47 41 52 4e 41 20 4f 43 48 ┆/* TEST TESTAR KONTERINGARNA OCH┆
0x2590b…2592b 20 53 5b 54 54 45 52 20 46 45 4c 4b 4f 44 20 56 49 44 20 46 45 4c 20 20 20 20 20 20 20 20 20 20 ┆ SÄTTER FELKOD VID FEL ┆
0x2592b…2593a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2593a…2595a (24, 0, 22) 20 20 20 20 20 20 31 20 46 45 4c 20 4b 4f 4e 54 4f 20 20 20 32 20 46 45 4c 20 50 45 52 44 41 47 ┆ 1 FEL KONTO 2 FEL PERDAG┆
0x2595a…2597a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2597a…25989 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25989…259a9 (24, 0, 23) 20 20 20 20 20 20 33 20 46 45 4c 20 55 4b 4f 4e 54 4f 20 20 34 20 46 45 4c 20 50 45 52 44 41 47 ┆ 3 FEL UKONTO 4 FEL PERDAG┆
0x259a9…259c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x259c9…259d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x259d8…259f8 (24, 0, 24) 20 20 20 20 20 20 35 20 46 45 4c 20 4b 53 4b 4f 4e 54 4f 20 36 20 46 45 4c 20 50 45 52 44 41 47 ┆ 5 FEL KSKONTO 6 FEL PERDAG┆
0x259f8…25a18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25a18…25a27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25a27…25a47 (24, 0, 25) 20 20 20 20 20 20 37 20 26 20 38 20 46 45 4c 20 4b 4f 4e 54 4f 53 50 5b 52 20 20 20 20 20 20 20 ┆ 7 & 8 FEL KONTOSPÄR ┆
0x25a47…25a67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25a67…25a76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25a76…25a96 (24, 0, 26) 20 20 20 52 45 43 4e 55 4d 4d 45 52 20 26 20 46 45 4c 4b 4f 44 20 53 54 41 43 4b 41 53 20 49 20 ┆ RECNUMMER & FELKOD STACKAS I ┆
0x25a96…25ab6 45 4e 20 46 45 4c 53 54 41 43 4b 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN FELSTACK */ ┆
0x25ab6…25ac5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25ac5…25b14 (24, 0, 27) 0x20[0x4f]
0x25b14…25b34 (24, 0, 28) 54 45 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TEST:PROC; ┆
0x25b34…25b54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25b54…25b63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25b63…25b83 (24, 0, 29) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 4b 4f 4e 54 4f 41 44 52 28 31 29 3b ┆ UNSPEC(SPK)=KONTOADR(1);┆
0x25b83…25ba3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25ba3…25bb2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25bb2…25bd2 (24, 0, 30) 54 31 3a 20 20 20 20 20 49 46 20 4b 4f 4e 54 31 3d 4b 4f 4e 54 4f 35 53 20 54 48 45 4e 20 44 4f ┆T1: IF KONT1=KONTO5S THEN DO┆
0x25bd2…25bf2 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x25bf2…25c01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25c01…25c21 (24, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 55 4b 54 4f 4d 41 52 4b 20 3d 20 53 50 4b 55 4b 54 4f 54 41 ┆ UKTOMARK = SPKUKTOTA┆
0x25c21…25c41 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆B; ┆
0x25c41…25c50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25c50…25c70 (24, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4b 4f 4e 54 33 7f 3d 27 30 30 30 27 29 20 26 20 ┆ IF (KONT3 ='000') & ┆
0x25c70…25c90 28 4b 4f 50 50 4c 49 4e 47 20 26 20 42 54 28 53 55 42 53 54 52 28 4b 4f 4e 54 33 2c 31 2c 31 29 ┆(KOPPLING & BT(SUBSTR(KONT3,1,1)┆
0x25c90…25c9f 29 3d 30 29 20 54 48 45 4e 20 44 4f 3b 20 20 ┆)=0) THEN DO; ┆
0x25c9f…25cbf (24, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 45 4c 54 59 50 3d 37 3b 20 20 20 20 20 20 20 20 ┆ FELTYP=7; ┆
0x25cbf…25cdf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25cdf…25cee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25cee…25d0e (24, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 41 46 3b 20 20 20 20 ┆ CALL STACKAF; ┆
0x25d0e…25d2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25d2e…25d3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25d3d…25d5d (24, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x25d5d…25d7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25d7d…25d8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25d8c…25dac (24, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4b 4f 4e 54 32 7f 3d 27 30 30 30 27 29 20 26 20 ┆ IF (KONT2 ='000') & ┆
0x25dac…25dcc 28 28 4b 4f 50 50 4c 49 4e 47 20 26 20 31 30 32 34 29 3d 30 29 20 54 48 45 4e 20 44 4f 3b 20 20 ┆((KOPPLING & 1024)=0) THEN DO; ┆
0x25dcc…25ddb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25ddb…25dfb (24, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 45 4c 54 59 50 3d 38 3b 20 20 20 20 20 20 20 20 ┆ FELTYP=8; ┆
0x25dfb…25e1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25e1b…25e2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25e2a…25e4a (24, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 41 46 3b 20 20 20 20 ┆ CALL STACKAF; ┆
0x25e4a…25e6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25e6a…25e79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25e79…25e99 (24, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x25e99…25eb9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25eb9…25ec8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25ec8…25ee8 (24, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 53 44 41 54 55 4d 35 53 7f 3d 30 29 20 26 20 28 ┆ IF (SDATUM5S =0) & (┆
0x25ee8…25f08 53 44 41 54 55 4d 35 53 3c 50 44 41 54 55 4d 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆SDATUM5S<PDATUM) THEN DO; ┆
0x25f08…25f17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25f17…25f37 (24, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 45 4c 54 59 50 3d 32 3b 20 20 20 20 20 20 20 20 ┆ FELTYP=2; ┆
0x25f37…25f57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25f57…25f66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25f66…25f86 (24, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 41 46 3b 20 20 20 20 ┆ CALL STACKAF; ┆
0x25f86…25fa6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25fa6…25fb5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25fb5…25fd5 (24, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x25fd5…25ff5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x25ff5…26004 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26004…26024 (24, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 54 32 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO T2; ┆
0x26024…26044 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26044…26053 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26053…26073 (24, 0, 45) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x26073…26093 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26093…260a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x260a2…260c2 (24, 0, 46) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 55 4e 53 50 45 43 28 53 50 4b 29 2b ┆ UNSPEC(SPK)=UNSPEC(SPK)+┆
0x260c2…260e2 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆11; ┆
0x260e2…260f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x260f1…26111 (24, 0, 47) 20 20 20 20 20 20 20 20 49 46 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 4b 4f 4e 54 4f 41 44 52 28 ┆ IF UNSPEC(SPK)=KONTOADR(┆
0x26111…26131 32 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2) THEN DO; ┆
0x26131…26140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26140…26160 (24, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 20 46 45 4c 54 59 50 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ FELTYP=1; ┆
0x26160…26180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26180…2618f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2618f…261af (24, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 41 46 3b 20 20 20 20 20 20 20 ┆ CALL STACKAF; ┆
0x261af…261cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x261cf…261de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x261de…261fe (24, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 54 32 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO T2; ┆
0x261fe…2621e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2621e…2622d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2622d…2624d (24, 0, 51) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2624d…2626d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2626d…2627c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2627c…2629c (24, 0, 52) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO T1; ┆
0x2629c…262bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x262bc…262cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x262cb…2631a (24, 0, 53) 0x20[0x4f]
0x2631a…2633a (24, 0, 54) 54 32 3a 20 20 20 20 20 49 46 20 4b 4f 4e 54 32 3d 27 30 30 30 27 20 54 48 45 4e 20 47 4f 20 54 ┆T2: IF KONT2='000' THEN GO T┆
0x2633a…2635a 4f 20 54 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O T3; ┆
0x2635a…26369 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26369…26389 (24, 0, 55) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 4b 4f 4e 54 4f 41 44 52 28 32 29 3b ┆ UNSPEC(SPK)=KONTOADR(2);┆
0x26389…263a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x263a9…263b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x263b8…263d8 (24, 0, 56) 54 32 32 3a 20 20 20 20 49 46 20 4b 4f 4e 54 32 3d 4b 4f 4e 54 4f 33 53 20 54 48 45 4e 20 44 4f ┆T22: IF KONT2=KONTO3S THEN DO┆
0x263d8…263f8 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x263f8…26407 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26407…26427 (24, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 53 44 41 54 55 4d 33 53 7f 3d 30 29 20 26 20 28 ┆ IF (SDATUM3S =0) & (┆
0x26427…26447 53 44 41 54 55 4d 33 53 3c 50 44 41 54 55 4d 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆SDATUM3S<PDATUM) THEN DO; ┆
0x26447…26456 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26456…26476 (24, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 45 4c 54 59 50 3d 34 3b 20 20 20 20 20 20 20 20 ┆ FELTYP=4; ┆
0x26476…26496 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26496…264a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x264a5…264c5 (24, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 41 46 3b 20 20 20 20 ┆ CALL STACKAF; ┆
0x264c5…264e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x264e5…264f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x264f4…26514 (24, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x26514…26534 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26534…26543 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26543…26563 (24, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 55 4b 54 4f 54 41 42 54 45 53 54 3b 20 20 20 ┆ CALL UKTOTABTEST; ┆
0x26563…26583 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26583…26592 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26592…265b2 (24, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 54 33 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO T3; ┆
0x265b2…265d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x265d2…265e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x265e1…26601 (24, 0, 63) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x26601…26621 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26621…26630 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26630…26650 (24, 0, 64) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 55 4e 53 50 45 43 28 53 50 4b 29 2b ┆ UNSPEC(SPK)=UNSPEC(SPK)+┆
0x26650…26670 36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆6; ┆
0x26670…2667f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2667f…2669f (24, 0, 65) 20 20 20 20 20 20 20 20 49 46 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 4b 4f 4e 54 4f 41 44 52 28 ┆ IF UNSPEC(SPK)=KONTOADR(┆
0x2669f…266bf 33 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆3) THEN DO; ┆
0x266bf…266ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x266ce…266ee (24, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 46 45 4c 54 59 50 3d 33 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ FELTYP=3; ┆
0x266ee…2670e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2670e…2671d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2671d…2673d (24, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 41 46 3b 20 20 20 20 20 20 20 ┆ CALL STACKAF; ┆
0x2673d…2675d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2675d…2676c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2676c…2678c (24, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 54 33 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO T3; ┆
0x2678c…267ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x267ac…267bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x267bb…267db (24, 0, 69) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x267db…267fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x267fb…2680a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2680a…2682a (24, 0, 70) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 54 32 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO T22; ┆
0x2682a…2684a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2684a…26859 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26859…268a8 (24, 0, 71) 0x20[0x4f]
0x268a8…268c8 (24, 0, 72) 54 33 3a 20 20 20 20 20 49 46 20 4b 4f 4e 54 33 3d 27 30 30 30 27 20 54 48 45 4e 20 47 4f 20 54 ┆T3: IF KONT3='000' THEN GO T┆
0x268c8…268e8 4f 20 54 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O T4; ┆
0x268e8…268f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x268f7…26917 (24, 0, 73) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 4b 4f 4e 54 4f 41 44 52 28 33 29 3b ┆ UNSPEC(SPK)=KONTOADR(3);┆
0x26917…26937 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26937…26946 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26946…26966 (24, 0, 74) 54 33 33 3a 20 20 20 20 49 46 20 4b 4f 4e 54 33 3d 4b 4f 4e 54 4f 33 53 20 54 48 45 4e 20 44 4f ┆T33: IF KONT3=KONTO3S THEN DO┆
0x26966…26986 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x26986…26995 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26995…269b5 (24, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 53 44 41 54 55 4d 33 53 7f 3d 30 29 20 26 20 28 ┆ IF (SDATUM3S =0) & (┆
0x269b5…269d5 53 44 41 54 55 4d 33 53 3c 50 44 41 54 55 4d 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆SDATUM3S<PDATUM) THEN DO; ┆
0x269d5…269e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x269e4…26a04 (24, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 45 4c 54 59 50 3d 36 3b 20 20 20 20 20 20 20 20 ┆ FELTYP=6; ┆
0x26a04…26a24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26a24…26a33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26a33…26a53 (24, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 41 46 3b 20 20 20 20 ┆ CALL STACKAF; ┆
0x26a53…26a73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26a73…26a82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26a82…26aa2 (24, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x26aa2…26ac2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26ac2…26ad1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26ad1…26af1 (24, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 54 34 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO T4; ┆
0x26af1…26b11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26b11…26b20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26b20…26b40 (24, 0, 80) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x26b40…26b60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26b60…26b6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26b6f…26b8f (24, 0, 81) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 55 4e 53 50 45 43 28 53 50 4b 29 2b ┆ UNSPEC(SPK)=UNSPEC(SPK)+┆
0x26b8f…26baf 36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆6; ┆
0x26baf…26bbe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26bbe…26bde (25, 0, 0) 20 20 20 20 20 20 20 20 49 46 20 55 4e 53 50 45 43 28 53 50 4b 29 3d 46 45 4c 53 54 41 43 4b 20 ┆ IF UNSPEC(SPK)=FELSTACK ┆
0x26bde…26bfe 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN DO; ┆
0x26bfe…26c0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26c0d…26c2d (25, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 46 45 4c 54 59 50 3d 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FELTYP=5; ┆
0x26c2d…26c4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26c4d…26c5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26c5c…26c7c (25, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 41 46 3b 20 20 20 20 20 20 20 20 ┆ CALL STACKAF; ┆
0x26c7c…26c9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26c9c…26cab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26cab…26ccb (25, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 54 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO T4; ┆
0x26ccb…26ceb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26ceb…26cfa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26cfa…26d1a (25, 0, 4) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x26d1a…26d3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26d3a…26d49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26d49…26d69 (25, 0, 5) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 54 33 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO T33; ┆
0x26d69…26d89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26d89…26d98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26d98…26db8 (25, 0, 6) 54 34 3a 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T4: RETURN; ┆
0x26db8…26dd8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26dd8…26de7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26de7…26e07 (25, 0, 7) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x26e07…26e27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26e27…26e36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26e36…26e85 (25, 0, 8) 0x20[0x4f]
0x26e85…26ea5 (25, 0, 9) 52 55 42 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RUB:PROC; ┆
0x26ea5…26ec5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26ec5…26ed4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x26ed4…26ef4 (25, 0, 10) 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 2b 34 29 20 45 44 49 54 28 4e 41 4d 4e 28 46 49 52 4d ┆ PUT SKIP(R+4) EDIT(NAMN(FIRM┆
0x26ef4…26f14 41 2d 27 36 27 29 29 28 41 28 32 30 29 29 28 27 49 46 52 5d 47 41 53 41 54 54 41 20 4b 4f 4e 54 ┆A-'6'))(A(20))('IFRÅGASATTA KONT┆
0x26f14…26f23 45 52 49 4e 47 41 52 20 20 31 39 27 29 20 20 ┆ERINGAR 19') ┆
0x26f23…26f43 (25, 0, 11) 20 20 20 20 20 20 20 20 28 41 28 32 37 29 29 28 44 41 54 55 4d 29 28 41 28 32 29 29 28 27 2d 27 ┆ (A(27))(DATUM)(A(2))('-'┆
0x26f43…26f63 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 33 2c 32 29 29 28 41 28 32 29 29 28 27 2d ┆)(A)(SUBSTR(DATUM,3,2))(A(2))('-┆
0x26f63…26f72 27 29 28 41 29 20 20 20 20 20 20 20 20 20 20 ┆')(A) ┆
0x26f72…26f92 (25, 0, 12) 20 20 20 20 20 20 20 20 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 35 2c 32 29 29 28 41 28 35 29 ┆ (SUBSTR(DATUM,5,2))(A(5)┆
0x26f92…26fb2 29 28 27 53 49 44 27 29 28 41 28 34 29 29 28 53 49 44 41 29 28 41 28 34 29 29 20 53 4b 49 50 28 ┆)('SID')(A(4))(SIDA)(A(4)) SKIP(┆
0x26fb2…26fc1 32 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2) ┆
0x26fc1…26fe1 (25, 0, 13) 20 20 20 20 20 20 20 20 45 44 49 54 28 27 20 27 29 28 41 28 31 29 29 28 54 45 58 54 28 49 29 29 ┆ EDIT(' ')(A(1))(TEXT(I))┆
0x26fe1…27001 28 41 29 20 53 4b 49 50 20 28 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(A) SKIP (1); ┆
0x27001…27010 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27010…27030 (25, 0, 14) 20 20 20 20 20 20 20 20 52 20 3d 20 52 41 44 41 4e 54 20 2d 20 38 3b 20 20 20 20 20 20 20 20 20 ┆ R = RADANT - 8; ┆
0x27030…27050 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27050…2705f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2705f…2707f (25, 0, 15) 20 20 20 20 20 20 20 20 53 49 44 41 3d 53 49 44 41 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SIDA=SIDA+1; ┆
0x2707f…2709f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2709f…270ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x270ae…270ce (25, 0, 16) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x270ce…270ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x270ee…270fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x270fd…2711d (25, 0, 17) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x2711d…2713d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2713d…2714c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2714c…2719b (25, 0, 18) 0x20[0x4f]
[…0x2…]
0x27239…27259 (25, 0, 21) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x27259…27279 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x27279…27288 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27288…272d7 (25, 0, 22) 0x20[0x4f]
0x272d7…272f7 (25, 0, 23) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x272f7…27317 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27317…27326 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27326…27346 (25, 0, 24) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x27346…27366 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27366…27375 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27375…27395 (25, 0, 25) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x27395…273b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x273b5…273c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x273c4…273e4 (25, 0, 26) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x273e4…27404 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27404…27413 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27413…27433 (25, 0, 27) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 47 ┆ IF DATUM='0 ' THEN G┆
0x27433…27453 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O TO SLUT; ┆
0x27453…27462 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27462…27482 (25, 0, 28) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x27482…274a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x274a2…274b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x274b1…274d1 (25, 0, 29) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x274d1…274f1 52 53 49 4f 4e 29 28 41 28 39 36 29 29 28 27 4b 4f 4e 54 52 4f 4c 4c 20 41 56 20 4b 4f 4e 54 45 ┆RSION)(A(96))('KONTROLL AV KONTE┆
0x274f1…27500 52 49 4e 47 41 52 20 50 5d 47 5d 52 27 29 20 ┆RINGAR PÅGÅR') ┆
0x27500…27520 (25, 0, 30) 20 20 20 20 20 20 20 20 28 41 28 34 35 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ (A(45)); ┆
0x27520…27540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27540…2754f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2754f…2756f (25, 0, 31) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x2756f…2758f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2758f…2759e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2759e…275ed (25, 0, 32) 0x20[0x4f]
0x275ed…2760d (25, 0, 33) 20 20 20 20 20 20 20 20 50 50 50 3d 41 44 44 52 28 4b 4f 4e 54 31 29 3b 20 20 20 20 20 20 20 20 ┆ PPP=ADDR(KONT1); ┆
0x2760d…2762d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2762d…2763c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2763c…2765c (25, 0, 34) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 47 45 4e 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL KONTOGEN; ┆
0x2765c…2767c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2767c…2768b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2768b…276ab (25, 0, 35) 20 20 20 20 20 20 20 20 46 45 4c 53 54 41 43 4b 3d 55 4e 53 50 45 43 28 53 50 4b 29 3b 20 20 20 ┆ FELSTACK=UNSPEC(SPK); ┆
0x276ab…276cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x276cb…276da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x276da…276fa (25, 0, 36) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 29 3d 55 4e 53 50 45 43 28 53 50 4b 29 3b 20 ┆ UNSPEC(SP)=UNSPEC(SPK); ┆
0x276fa…2771a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2771a…27729 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27729…27749 (25, 0, 37) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 55 4b 4f 4e 54 4f 50 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN UKONTOP; ┆
0x27749…27769 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27769…27778 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27778…27798 (25, 0, 38) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 20 28 53 50 29 20 3d 20 55 4e 53 50 45 43 20 28 53 50 ┆ UNSPEC (SP) = UNSPEC (SP┆
0x27798…277b8 4b 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆K); ┆
0x277b8…277c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x277c7…277e7 (25, 0, 39) 20 20 20 20 20 20 20 20 53 54 41 43 4b 44 4a 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ STACKDJ=0; ┆
0x277e7…27807 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27807…27816 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27816…27836 (25, 0, 40) 20 20 20 20 20 20 20 20 58 4e 3d 46 49 4c 54 41 42 28 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ XN=FILTAB(4); ┆
0x27836…27856 20 2f 2a 20 49 20 3d 20 34 20 47 45 52 20 54 52 41 4e 53 46 49 4c 20 20 2a 2f 20 20 20 20 20 20 ┆ /* I = 4 GER TRANSFIL */ ┆
0x27856…27865 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27865…27885 (25, 0, 41) 20 20 20 20 20 20 20 20 46 53 54 52 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR=STR; ┆
0x27885…278a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x278a5…278b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x278b4…278d4 (25, 0, 42) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN FIL; ┆
0x278d4…278f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x278f4…27903 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27903…27923 (25, 0, 43) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 46 49 4c 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL SEOF(FIL); ┆
0x27923…27943 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27943…27952 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27952…27972 (25, 0, 44) 20 20 20 20 20 20 20 20 4d 41 58 3d 55 4e 53 50 45 43 28 46 49 4c 29 3b 20 20 20 20 20 20 20 20 ┆ MAX=UNSPEC(FIL); ┆
0x27972…27992 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27992…279a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x279a1…279c1 (25, 0, 45) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 46 49 4c 29 3d 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ UNSPEC(FIL)=0; ┆
0x279c1…279e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x279e1…279f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x279f0…27a10 (25, 0, 46) 20 20 20 20 20 20 20 20 4a 3d 35 30 30 30 2f 52 4c 45 4e 47 44 28 34 29 3b 20 20 20 20 20 20 20 ┆ J=5000/RLENGD(4); ┆
0x27a10…27a30 20 2f 2a 20 42 4c 4f 43 4b 20 4f 4d 20 31 34 37 20 52 45 43 4f 52 44 53 20 2a 2f 20 20 20 20 20 ┆ /* BLOCK OM 147 RECORDS */ ┆
0x27a30…27a3f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27a3f…27a5f (25, 0, 47) 4c 31 3a 20 20 20 20 20 49 46 20 4d 41 58 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4b 52 49 ┆L1: IF MAX=0 THEN GO TO SKRI┆
0x27a5f…27a7f 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆V; ┆
0x27a7f…27a8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27a8e…27aae (25, 0, 48) 20 20 20 20 20 20 20 20 49 46 20 4a 3e 4d 41 58 20 54 48 45 4e 20 4a 3d 4d 41 58 3b 20 20 20 20 ┆ IF J>MAX THEN J=MAX; ┆
0x27aae…27ace 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27ace…27add 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27add…27afd (25, 0, 49) 20 20 20 20 20 20 20 20 4d 41 58 3d 4d 41 58 2d 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX=MAX-J; ┆
0x27afd…27b1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27b1d…27b2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27b2c…27b4c (25, 0, 50) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 46 49 4c 2c 41 52 45 41 2c 4a 2c 52 43 4f 44 45 ┆ CALL RD(FIL,AREA,J,RCODE┆
0x27b4c…27b6c 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x27b6c…27b7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27b7b…27b9b (25, 0, 51) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 ┆ IF RCODE =0 THEN PUT SKI┆
0x27b9b…27bbb 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 27 2c 46 49 4c 54 41 42 28 34 29 2c 52 43 4f 44 ┆P LIST('LÄSFEL I',FILTAB(4),RCOD┆
0x27bbb…27bca 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆E); ┆
0x27bca…27bea (25, 0, 52) 20 20 20 20 20 20 20 20 41 52 45 41 50 3d 41 44 44 52 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 ┆ AREAP=ADDR(AREA); ┆
0x27bea…27c0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27c0a…27c19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27c19…27c39 (25, 0, 53) 20 20 20 20 20 20 20 20 44 4f 20 4b 3d 31 20 54 4f 20 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO K=1 TO J; ┆
0x27c39…27c59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27c59…27c68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27c68…27c88 (25, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 4b 4f 4e 54 4f 46 3b 20 20 20 20 20 20 20 20 ┆ KONTO=KONTOF; ┆
0x27c88…27ca8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27ca8…27cb7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27cb7…27cd7 (25, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 45 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL TEST; ┆
0x27cd7…27cf7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27cf7…27d06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27d06…27d26 (25, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 55 4e 53 50 45 43 28 53 50 29 3e 4d 49 4e 4e 45 20 54 ┆ IF UNSPEC(SP)>MINNE T┆
0x27d26…27d46 48 45 4e 20 47 4f 20 54 4f 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆HEN GO TO SKRIV; ┆
0x27d46…27d55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27d55…27d75 (25, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 41 52 45 41 50 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(AREAP)=UNSPEC(┆
0x27d75…27d95 41 52 45 41 50 29 2b 52 4c 45 4e 47 44 28 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AREAP)+RLENGD(4); ┆
0x27d95…27da4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27da4…27dc4 (25, 0, 58) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x27dc4…27de4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27de4…27df3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27df3…27e13 (25, 0, 59) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x27e13…27e33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27e33…27e42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27e42…27e91 (25, 0, 60) 0x20[0x4f]
0x27e91…27eb1 (25, 0, 61) 53 4b 52 49 56 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV: ┆
0x27eb1…27ed1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27ed1…27ee0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27ee0…27f00 (25, 0, 62) 20 20 20 20 20 20 20 20 4b 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=1; ┆
0x27f00…27f20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27f20…27f2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27f2f…27f4f (25, 0, 63) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN FIL; ┆
0x27f4f…27f6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27f6f…27f7e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27f7e…27f9e (25, 0, 64) 20 20 20 20 20 20 20 20 4a 3d 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=5; ┆
0x27f9e…27fbe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27fbe…27fcd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x27fcd…27fed (25, 0, 65) 20 20 20 20 20 20 20 20 4c 3d 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ L=5; ┆
0x27fed…2800d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2800d…2801c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2801c…2803c (25, 0, 66) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 4; ┆
0x2803c…2805c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2805c…2806b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2806b…2808b (25, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 3d 32 20 54 48 45 4e 20 4b 3d 36 3b 20 20 20 20 20 ┆ IF I=2 THEN K=6; ┆
0x2808b…280ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x280ab…280ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x280ba…280da (25, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 3d 33 20 54 48 45 4e 20 4b 3d 39 3b 20 20 20 20 20 ┆ IF I=3 THEN K=9; ┆
0x280da…280fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x280fa…28109 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28109…28129 (25, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 7f 3d 31 20 54 48 45 4e 20 4c 3d 33 3b 20 20 20 20 ┆ IF I =1 THEN L=3; ┆
0x28129…28149 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28149…28158 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28158…28178 (25, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 52 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=0; ┆
0x28178…28198 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28198…281a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x281a7…281c7 (25, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 4d 3d 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ M=-1; ┆
0x281c7…281e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x281e7…281f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x281f6…28216 (25, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 53 54 41 43 4b 44 4a 3b 20 20 20 ┆ DO J=1 TO STACKDJ; ┆
0x28216…28236 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28236…28245 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28245…28265 (25, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 29 3d 46 45 4c 53 54 41 43 ┆ UNSPEC(SP)=FELSTAC┆
0x28265…28285 4b 2b 34 2a 28 4a 2d 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆K+4*(J-1); ┆
0x28285…28294 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28294…282b4 (25, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 46 45 4c 54 59 50 3d 49 2a 32 2d 31 29 20 ┆ IF (FELTYP=I*2-1) ┆
0x282b4…282d4 7c 20 28 46 45 4c 54 59 50 3d 49 2a 32 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ö (FELTYP=I*2) THEN DO; ┆
0x282d4…282e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x282e3…28303 (25, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 3c 36 20 54 48 45 4e 20 43 41 4c ┆ IF R<6 THEN CAL┆
0x28303…28323 4c 20 52 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L RUB; ┆
0x28323…28332 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28332…28352 (25, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4d 7f 3d 52 45 43 4e 52 20 54 48 45 ┆ IF M =RECNR THE┆
0x28352…28372 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆N DO; ┆
0x28372…28381 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28381…283a1 (25, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 46 49 4c 29 3d ┆ UNSPEC(FIL)=┆
0x283a1…283c1 52 45 43 4e 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RECNR; ┆
0x283c1…283d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x283d0…283f0 (25, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 ┆ ON ERROR GO ┆
0x283f0…28410 54 4f 20 46 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO FEL; ┆
0x28410…2841f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2841f…2843f (25, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 46 49 ┆ READ FILE(FI┆
0x2843f…2845f 4c 29 20 49 4e 54 4f 28 56 45 52 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L) INTO(VERSTR); ┆
0x2845f…2846e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2846e…2848e (25, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 4b 4f 4e 54 4f 46 ┆ KONTO=KONTOF┆
0x2848e…284ae 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x284ae…284bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x284bd…284dd (25, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 ┆ CALL BELRED(┆
0x284dd…284fd 42 45 4c 4f 50 50 2c 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆BELOPP,T14); ┆
0x284fd…2850c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2850c…2852c (26, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 3d 52 45 43 4e 52 3b 20 20 20 20 ┆ M=RECNR; ┆
0x2852c…2854c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2854c…2855b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2855b…2857b (26, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2857b…2859b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2859b…285aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x285aa…285ca (26, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 3c 34 20 54 48 45 4e 20 44 4f 3b ┆ IF I<4 THEN DO;┆
0x285ca…285ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x285ea…285f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x285f9…28619 (26, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 ┆ PUT SKIP EDI┆
0x28619…28639 54 28 56 45 52 4e 52 29 28 50 27 5a 5a 5a 5a 39 27 2c 58 28 35 29 29 28 53 55 42 53 54 52 28 4b ┆T(VERNR)(P'ZZZZ9',X(5))(SUBSTR(K┆
0x28639…28648 4f 4e 54 4f 2c 4b 2c 4c 29 29 20 20 20 20 20 ┆ONTO,K,L)) ┆
0x28648…28668 (26, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 36 29 29 28 54 31 34 29 28 ┆ (A(6))(T14)(┆
0x28668…28688 41 28 31 39 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A(19)); ┆
0x28688…28697 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28697…286b7 (26, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 45 4c 54 59 50 3d 49 2a ┆ IF FELTYP=I*┆
0x286b7…286d7 32 20 54 48 45 4e 20 50 55 54 20 45 44 49 54 28 50 44 41 54 55 4d 2b 37 38 30 30 30 30 29 28 41 ┆2 THEN PUT EDIT(PDATUM+780000)(A┆
0x286d7…286e6 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x286e6…28706 (26, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x28706…28726 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28726…28735 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28735…28755 (26, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x28755…28775 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28775…28784 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28784…287a4 (26, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 45 4c 54 59 50 3d 49 2a ┆ IF FELTYP=I*┆
0x287a4…287c4 32 20 54 48 45 4e 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 56 45 52 4e 52 29 28 50 27 5a 5a ┆2 THEN PUT SKIP EDIT(VERNR)(P'ZZ┆
0x287c4…287d3 5a 5a 39 27 2c 58 28 35 29 29 20 20 20 20 20 ┆ZZ9',X(5)) ┆
0x287d3…287f3 (26, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 4b 4f 4e 54 31 29 28 41 28 35 29 ┆ (KONT1)(A(5)┆
0x287f3…28813 29 28 27 2e 27 29 28 41 29 28 4b 4f 4e 54 32 29 28 41 28 33 29 29 28 27 2e 78 78 78 27 29 28 41 ┆)('.')(A)(KONT2)(A(3))('.xxx')(A┆
0x28813…28822 28 38 29 29 28 54 31 34 29 28 41 29 3b 20 20 ┆(8))(T14)(A); ┆
0x28822…28842 (26, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 53 4b 49 ┆ ELSE PUT SKI┆
0x28842…28862 50 20 45 44 49 54 28 56 45 52 4e 52 29 28 50 27 5a 5a 5a 5a 39 27 2c 58 28 35 29 29 28 4b 4f 4e ┆P EDIT(VERNR)(P'ZZZZ9',X(5))(KON┆
0x28862…28871 54 31 29 20 20 20 20 20 20 20 20 20 20 20 20 ┆T1) ┆
0x28871…28891 (26, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 35 29 29 28 27 2e 78 78 78 ┆ (A(5))('.xxx┆
0x28891…288b1 2e 27 29 28 41 28 35 29 29 28 4b 4f 4e 54 33 29 28 41 28 37 29 29 28 54 31 34 29 28 41 29 3b 20 ┆.')(A(5))(KONT3)(A(7))(T14)(A); ┆
0x288b1…288c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x288c0…288e0 (26, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x288e0…28900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28900…2890f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2890f…2892f (26, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x2892f…2894f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2894f…2895e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2895e…2897e (26, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2897e…2899e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2899e…289ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x289ad…289cd (26, 0, 15) 46 45 4c 3a 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FEL: END; ┆
0x289cd…289ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x289ed…289fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x289fc…28a1c (26, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 29 3b 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP(R); ┆
0x28a1c…28a3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28a3c…28a4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28a4b…28a6b (26, 0, 17) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x28a6b…28a8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28a8b…28a9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28a9a…28ae9 (26, 0, 18) 0x20[0x4f]
0x28ae9…28b09 (26, 0, 19) 53 4c 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: ┆
0x28b09…28b29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28b29…28b38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28b38…28b58 (26, 0, 20) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x28b58…28b78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28b78…28b87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28b87…28ba7 (26, 0, 21) 20 20 20 20 20 20 20 20 49 46 20 28 53 49 44 41 7f 3d 31 29 20 7c 20 28 59 7f 3d 27 31 20 27 29 ┆ IF (SIDA =1) ö (Y ='1 ')┆
0x28ba7…28bc7 20 54 48 45 4e 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 ┆ THEN CALL PLOAD('Q '); ┆
0x28bc7…28bd6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28bd6…28bf6 (26, 0, 22) 20 20 20 20 20 20 20 20 49 20 3d 20 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = 5; ┆
0x28bf6…28c16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28c16…28c25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28c25…28c45 (26, 0, 23) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL RUB; ┆
0x28c45…28c65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28c65…28c74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28c74…28c94 (26, 0, 24) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 20 20 20 20 20 20 ┆ PUT SKIP(2) EDIT(' ┆
0x28c94…28cb4 20 2a 2a 2a 2a 20 20 49 4e 47 41 20 49 46 52 5d 47 41 53 41 54 54 41 20 4b 4f 4e 54 45 52 49 4e ┆ **** INGA IFRÅGASATTA KONTERIN┆
0x28cb4…28cc3 47 41 52 20 20 2a 2a 2a 2a 27 29 28 41 29 3b ┆GAR ****')(A);┆
0x28cc3…28ce3 (26, 0, 25) 20 20 20 20 20 20 20 20 52 20 3d 20 52 20 2d 20 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R = R - 2; ┆
0x28ce3…28d03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28d03…28d12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28d12…28d32 (26, 0, 26) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 28 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP (R); ┆
0x28d32…28d52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28d52…28d61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28d61…28d81 (26, 0, 27) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 56 38 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('V8 '); ┆
0x28d81…28da1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28da1…28db0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28db0…28dff (26, 0, 28) 0x20[0x4f]
0x28dff…28e1f (26, 0, 29) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x28e1f…28e3f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28e3f…28e4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x28e4e…28e6e (26, 0, 30) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x28e8e…28e9d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x28e9d…28ebd (26, 0, 31) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x28edd…28eec 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x28eec…28f0c (26, 0, 32) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x28f2c…28f3b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x28f3b…28f5b (26, 0, 33) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x28f7b…28f8a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x28f8a…28faa (26, 0, 34) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x28fca…28fd9 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x28fd9…28ff9 (26, 0, 35) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29019…29028 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29028…29048 (26, 0, 36) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29068…29077 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29077…29097 (26, 0, 37) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x290b7…290c6 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x290c6…290e6 (26, 0, 38) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29106…29115 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29115…29135 (26, 0, 39) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29155…29164 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29164…29184 (26, 0, 40) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x291a4…291b3 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x291b3…291d3 (26, 0, 41) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x291f3…29202 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29202…29222 (26, 0, 42) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29242…29251 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29251…29271 (26, 0, 43) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29291…292a0 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x292a0…292c0 (26, 0, 44) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x292e0…292ef 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x292ef…2930f (26, 0, 45) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2932f…2933e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2933e…2935e (26, 0, 46) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2937e…2938d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2938d…293ad (26, 0, 47) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x293cd…293dc 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x293dc…293fc (26, 0, 48) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2941c…2942b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2942b…2944b (26, 0, 49) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2946b…2947a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2947a…2949a (26, 0, 50) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x294ba…294c9 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x294c9…294e9 (26, 0, 51) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29509…29518 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29518…29538 (26, 0, 52) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29558…29567 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29567…29587 (26, 0, 53) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x295a7…295b6 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x295b6…295d6 (26, 0, 54) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x295f6…29605 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29605…29625 (26, 0, 55) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29645…29654 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29654…29674 (26, 0, 56) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29694…296a3 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x296a3…296c3 (26, 0, 57) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x296e3…296f2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x296f2…29712 (26, 0, 58) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29732…29741 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29741…29761 (26, 0, 59) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29781…29790 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29790…297b0 (26, 0, 60) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x297d0…297df 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x297df…297ff (26, 0, 61) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2981f…2982e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2982e…2984e (26, 0, 62) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2986e…2987d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2987d…2989d (26, 0, 63) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x298bd…298cc 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x298cc…298ec (26, 0, 64) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2990c…2991b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2991b…2993b (26, 0, 65) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2995b…2996a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2996a…2998a (26, 0, 66) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x299aa…299b9 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x299b9…299d9 (26, 0, 67) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x299f9…29a08 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29a08…29a28 (26, 0, 68) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29a48…29a57 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29a57…29a77 (26, 0, 69) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29a97…29aa6 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29aa6…29ac6 (26, 0, 70) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29ae6…29af5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29af5…29b15 (26, 0, 71) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29b35…29b44 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29b44…29b64 (26, 0, 72) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29b84…29b93 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29b93…29bb3 (26, 0, 73) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29bd3…29be2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29be2…29c02 (26, 0, 74) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29c22…29c31 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29c31…29c51 (26, 0, 75) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29c71…29c80 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29c80…29ca0 (26, 0, 76) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29cc0…29ccf 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29ccf…29cef (26, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29d0f…29d1e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29d1e…29d3e (26, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29d5e…29d6d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29d6d…29d8d (26, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29dad…29dbc 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29dbc…29ddc (26, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29dfc…29e0b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29e0b…29e2b (26, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x29e4b…29e5a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x29e5a…29e7a (27, 0, 0) 2f 2a 20 56 36 31 20 46 4c 59 54 54 41 52 20 5c 56 45 52 20 5d 52 45 54 53 20 41 43 4b 2e 20 56 ┆/* V61 FLYTTAR ÖVER ÅRETS ACK. V┆
0x29e7a…29e9a 45 52 54 45 58 54 45 52 20 50 5d 20 45 4e 20 4e 59 20 44 49 53 4b 45 54 54 20 20 20 20 20 20 20 ┆ERTEXTER PÅ EN NY DISKETT ┆
0x29e9a…29ea9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29ea9…29ec9 (27, 0, 1) 20 20 20 4c 5b 47 47 45 52 20 53 45 41 44 20 4e 59 53 4b 41 50 41 44 45 20 50 4f 53 54 45 52 20 ┆ LÄGGER SEAD NYSKAPADE POSTER ┆
0x29ec9…29ee9 46 52 5d 4e 20 54 52 41 4e 53 46 49 4c 20 50 5d 20 44 45 4e 20 4e 59 41 20 55 50 50 4c 41 47 41 ┆FRÅN TRANSFIL PÅ DEN NYA UPPLAGA┆
0x29ee9…29ef8 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆N ┆
0x29ef8…29f18 (27, 0, 2) 20 20 20 4f 4d 20 4e 5d 47 4f 4e 20 54 59 50 20 41 56 20 4c 5b 53 20 45 4c 4c 45 52 20 53 4b 52 ┆ OM NÅGON TYP AV LÄS ELLER SKR┆
0x29f18…29f38 49 56 46 45 4c 20 55 50 50 4b 4f 4d 4d 45 52 20 4c 5b 4d 4e 41 53 20 46 45 4c 4d 45 44 44 45 4c ┆IVFEL UPPKOMMER LÄMNAS FELMEDDEL┆
0x29f38…29f47 41 4e 44 45 20 50 5d 20 44 49 53 50 4c 41 59 ┆ANDE PÅ DISPLAY┆
0x29f47…29f67 (27, 0, 3) 20 20 20 26 20 52 55 54 49 4e 45 4e 20 5d 54 45 52 47 5d 52 20 54 49 4c 4c 20 4d 45 4e 59 4e 20 ┆ & RUTINEN ÅTERGÅR TILL MENYN ┆
0x29f67…29f87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29f87…29f96 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29f96…29fb6 (27, 0, 4) 20 20 20 56 65 72 2e 20 31 2e 34 2e 20 53 65 6b 76 65 6e 73 74 65 73 74 20 70 7d 20 56 45 52 54 ┆ Ver. 1.4. Sekvenstest på VERT┆
0x29fb6…29fd6 45 58 54 20 68 61 72 20 69 6e 66 7c 72 74 73 20 73 6f 6d 20 43 41 4c 4c 20 53 4f 52 54 54 45 53 ┆EXT har införts som CALL SORTTES┆
0x29fd6…29fe5 54 2e 20 38 30 30 36 32 34 2e 20 20 20 20 20 ┆T. 800624. ┆
0x29fe5…2a005 (27, 0, 5) 20 20 20 50 52 47 20 4a 5d 20 37 38 30 39 31 33 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PRG JÅ 780913 */ ┆
0x2a005…2a025 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a025…2a034 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a034…2a083 (27, 0, 6) 0x20[0x4f]
[…0x2…]
0x2a121…2a141 (27, 0, 9) 44 43 4c 20 55 54 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL UTP POINTER, ┆
0x2a141…2a161 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a161…2a170 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a170…2a190 (27, 0, 10) 20 20 20 20 31 20 56 45 52 55 54 53 54 52 20 42 41 53 45 44 28 55 54 50 29 2c 20 20 20 20 20 20 ┆ 1 VERUTSTR BASED(UTP), ┆
0x2a190…2a1b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a1b0…2a1bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a1bf…2a1df (27, 0, 11) 20 20 20 20 20 20 32 20 56 45 52 4e 52 55 54 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 ┆ 2 VERNRUT FIXED(5), ┆
0x2a1df…2a1ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a1ff…2a20e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a20e…2a22e (27, 0, 12) 20 20 20 20 20 20 32 20 44 41 54 55 4d 55 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 ┆ 2 DATUMUT BINARY, ┆
0x2a22e…2a24e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a24e…2a25d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a25d…2a27d (27, 0, 13) 20 20 20 20 20 20 32 20 54 45 58 54 55 54 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 ┆ 2 TEXTUT CHAR(13), ┆
0x2a27d…2a29d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a29d…2a2ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a2ac…2a2cc (27, 0, 14) 20 20 20 20 20 20 32 20 41 4e 54 41 4c 55 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 ┆ 2 ANTALUT BINARY, ┆
0x2a2cc…2a2ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a2ec…2a2fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a2fb…2a31b (27, 0, 15) 20 20 20 20 56 45 52 4c 20 42 49 4e 41 52 59 20 49 4e 49 54 28 32 30 29 3b 20 20 20 20 20 20 20 ┆ VERL BINARY INIT(20); ┆
0x2a31b…2a33b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a33b…2a34a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a34a…2a36a (27, 0, 16) 20 20 20 20 2f 2a 20 32 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 20 BYTES */ ┆
0x2a36a…2a38a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a38a…2a399 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a399…2a3e8 (27, 0, 17) 0x20[0x4f]
0x2a3e8…2a408 (27, 0, 18) 44 43 4c 20 54 52 41 4e 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL TRANP POINTER, ┆
0x2a408…2a428 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a428…2a437 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a437…2a457 (27, 0, 19) 20 20 20 20 31 20 54 52 41 4e 53 54 52 20 42 41 53 45 44 28 54 52 41 4e 50 29 2c 20 20 20 20 20 ┆ 1 TRANSTR BASED(TRANP), ┆
0x2a457…2a477 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a477…2a486 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a486…2a4a6 (27, 0, 20) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 20 20 ┆ 2 KONTO FIXED(11), ┆
0x2a4a6…2a4c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a4c6…2a4d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a4d5…2a4f5 (27, 0, 21) 20 20 20 20 20 20 32 20 56 45 52 4e 52 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 VERNR FIXED(5), ┆
0x2a4f5…2a515 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a515…2a524 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a524…2a544 (27, 0, 22) 20 20 20 20 20 20 32 20 42 44 41 54 55 4d 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 BDATUM FIXED(5), ┆
0x2a544…2a564 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a564…2a573 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a573…2a593 (27, 0, 23) 20 20 20 20 20 20 32 20 50 44 41 54 55 4d 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 PDATUM FIXED(5), ┆
0x2a593…2a5b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a5b3…2a5c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a5c2…2a5e2 (27, 0, 24) 20 20 20 20 20 20 32 20 42 45 4c 4f 50 50 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 20 ┆ 2 BELOPP FIXED(11), ┆
0x2a5e2…2a602 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a602…2a611 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a611…2a631 (27, 0, 25) 20 20 20 20 20 20 32 20 54 45 58 54 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT CHAR(13), ┆
0x2a631…2a651 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a651…2a660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a660…2a680 (27, 0, 26) 20 20 20 20 54 52 41 4e 4c 20 42 49 4e 41 52 59 20 49 4e 49 54 28 33 34 29 3b 20 20 20 20 20 20 ┆ TRANL BINARY INIT(34); ┆
0x2a680…2a6a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a6a0…2a6af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a6af…2a6cf (27, 0, 27) 20 20 20 20 2f 2a 20 33 34 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 34 BYTES */ ┆
0x2a6cf…2a6ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a6ef…2a6fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a6fe…2a74d (27, 0, 28) 0x20[0x4f]
0x2a74d…2a76d (27, 0, 29) 44 43 4c 20 31 20 4b 4f 4e 54 52 4f 4c 31 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 KONTROL1, ┆
0x2a76d…2a78d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a78d…2a79c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a79c…2a7bc (27, 0, 30) 20 20 20 20 20 20 32 20 41 4e 54 41 4c 50 31 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 ┆ 2 ANTALP1 BINARY, ┆
0x2a7bc…2a7dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a7dc…2a7eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a7eb…2a80b (27, 0, 31) 20 20 20 20 20 20 32 20 44 41 54 55 4d 31 20 43 48 41 52 28 36 29 3b 20 20 20 20 20 20 20 20 20 ┆ 2 DATUM1 CHAR(6); ┆
0x2a80b…2a82b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a82b…2a83a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a83a…2a85a (27, 0, 32) 20 20 20 20 2f 2a 20 38 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 8 BYTES */ ┆
0x2a85a…2a87a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a87a…2a889 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a889…2a8d8 (27, 0, 33) 0x20[0x4f]
0x2a8d8…2a8f8 (27, 0, 34) 44 43 4c 20 31 20 4b 4f 4e 54 52 4f 4c 32 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 KONTROL2, ┆
0x2a8f8…2a918 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a918…2a927 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a927…2a947 (27, 0, 35) 20 20 20 20 20 20 32 20 41 4e 54 41 4c 50 32 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 ┆ 2 ANTALP2 BINARY, ┆
0x2a947…2a967 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a967…2a976 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a976…2a996 (27, 0, 36) 20 20 20 20 20 20 32 20 44 41 54 55 4d 32 20 43 48 41 52 28 36 29 3b 20 20 20 20 20 20 20 20 20 ┆ 2 DATUM2 CHAR(6); ┆
0x2a996…2a9b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a9b6…2a9c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a9c5…2a9e5 (27, 0, 37) 20 20 20 20 2f 2a 20 38 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 8 BYTES */ ┆
0x2a9e5…2aa05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2aa05…2aa14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2aa14…2aa63 (27, 0, 38) 0x20[0x4f]
0x2aa63…2aa83 (27, 0, 39) 44 43 4c 20 31 20 46 53 54 52 31 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 FSTR1, ┆
0x2aa83…2aaa3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2aaa3…2aab2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2aab2…2aad2 (27, 0, 40) 20 20 20 20 20 20 32 20 56 45 52 49 4e 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 VERIN FILE; ┆
0x2aad2…2aaf2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2aaf2…2ab01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ab01…2ab50 (27, 0, 41) 0x20[0x4f]
0x2ab50…2ab70 (27, 0, 42) 44 43 4c 20 31 20 46 53 54 52 32 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 FSTR2, ┆
0x2ab70…2ab90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ab90…2ab9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ab9f…2abbf (27, 0, 43) 20 20 20 20 20 20 32 20 56 45 52 55 54 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 VERUT FILE; ┆
0x2abbf…2abdf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2abdf…2abee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2abee…2ac3d (27, 0, 44) 0x20[0x4f]
0x2ac3d…2ac5d (27, 0, 45) 44 43 4c 20 31 20 46 53 54 52 33 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 FSTR3, ┆
0x2ac5d…2ac7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ac7d…2ac8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ac8c…2acac (27, 0, 46) 20 20 20 20 20 20 32 20 4b 4f 4e 54 52 4f 4c 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 KONTROL FILE; ┆
0x2acac…2accc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2accc…2acdb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2acdb…2ad2a (27, 0, 47) 0x20[0x4f]
0x2ad2a…2ad4a (27, 0, 48) 44 43 4c 20 31 20 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 STR, ┆
0x2ad4a…2ad6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ad6a…2ad79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ad79…2ad99 (27, 0, 49) 20 20 20 20 20 20 32 20 58 4e 20 43 48 41 52 28 32 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 XN CHAR(24); ┆
0x2ad99…2adb9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2adb9…2adc8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2adc8…2ae17 (27, 0, 50) 0x20[0x4f]
0x2ae17…2ae37 (27, 0, 51) 44 43 4c 20 31 20 41 52 45 41 49 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 AREAIN, ┆
0x2ae37…2ae57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ae57…2ae66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ae66…2ae86 (27, 0, 52) 20 20 20 20 20 20 32 20 43 48 49 4e 28 31 30 30 29 20 43 48 41 52 28 31 30 30 29 3b 20 20 20 20 ┆ 2 CHIN(100) CHAR(100); ┆
0x2ae86…2aea6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2aea6…2aeb5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2aeb5…2aed5 (27, 0, 53) 20 20 20 20 2f 2a 20 31 30 20 30 30 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 ┆ /* 10 000 BYTES */ ┆
0x2aed5…2aef5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2aef5…2af04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2af04…2af53 (27, 0, 54) 0x20[0x4f]
0x2af53…2af73 (27, 0, 55) 44 43 4c 20 31 20 41 52 45 41 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 AREAUT, ┆
0x2af73…2af93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2af93…2afa2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2afa2…2afc2 (27, 0, 56) 20 20 20 20 20 20 32 20 43 48 32 28 36 30 29 20 43 48 41 52 28 31 30 30 29 3b 20 20 20 20 20 20 ┆ 2 CH2(60) CHAR(100); ┆
0x2afc2…2afe2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2afe2…2aff1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2aff1…2b011 (27, 0, 57) 20 20 20 20 2f 2a 20 36 20 30 30 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 6 000 BYTES */ ┆
0x2b011…2b031 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b031…2b040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b040…2b08f (27, 0, 58) 0x20[0x4f]
0x2b08f…2b0af (27, 0, 59) 44 43 4c 20 4c 4f 41 44 50 41 52 41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL LOADPARA ┆
0x2b0af…2b0cf 20 20 20 43 48 41 52 20 28 38 39 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (89); ┆
0x2b0cf…2b0de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b0de…2b12d (27, 0, 60) 0x20[0x4f]
0x2b12d…2b14d (27, 0, 61) 44 43 4c 20 4e 52 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 ┆DCL NR BINARY INIT(0), ┆
0x2b14d…2b16d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b16d…2b17c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b17c…2b19c (27, 0, 62) 20 20 20 20 56 45 52 4d 41 58 20 46 49 58 45 44 28 35 29 20 49 4e 49 54 28 30 29 2c 20 20 20 20 ┆ VERMAX FIXED(5) INIT(0), ┆
0x2b19c…2b1bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b1bc…2b1cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b1cb…2b1eb (27, 0, 63) 20 20 20 20 56 45 52 4d 49 4e 20 46 49 58 45 44 28 35 29 20 49 4e 49 54 28 39 39 39 39 39 29 2c ┆ VERMIN FIXED(5) INIT(99999),┆
0x2b1eb…2b20b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b20b…2b21a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b21a…2b23a (27, 0, 64) 20 20 20 20 50 31 20 43 48 41 52 28 38 29 20 49 4e 49 54 28 27 2d 2d 2d 2d 2d 2d 2d 39 27 29 2c ┆ P1 CHAR(8) INIT('-------9'),┆
0x2b23a…2b25a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b25a…2b269 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b269…2b289 (27, 0, 65) 20 20 20 20 4e 41 4d 4e 28 33 29 20 43 48 41 52 28 31 31 29 20 49 4e 49 54 28 27 4d 45 4c 4c 41 ┆ NAMN(3) CHAR(11) INIT('MELLA┆
0x2b289…2b2a9 4e 4b 52 41 46 54 27 2c 27 4b 56 56 2f 4b 57 41 52 4f 53 27 2c 27 41 52 4f 53 27 29 2c 20 20 20 ┆NKRAFT','KVV/KWAROS','AROS'), ┆
0x2b2a9…2b2b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b2b8…2b2d8 (27, 0, 66) 20 20 20 20 54 50 4f 53 54 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TPOSTANT BINARY, ┆
0x2b2d8…2b2f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b2f8…2b307 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b307…2b327 (27, 0, 67) 20 20 20 20 54 31 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T1 CHAR(1), ┆
0x2b327…2b347 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b347…2b356 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b356…2b376 (27, 0, 68) 20 20 20 20 54 36 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T6 CHAR(6), ┆
0x2b376…2b396 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b396…2b3a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b3a5…2b3c5 (27, 0, 69) 46 49 4c 54 41 42 20 28 34 29 20 43 48 41 52 20 28 31 30 29 20 49 4e 49 54 28 27 20 20 4b 37 30 ┆FILTAB (4) CHAR (10) INIT(' K70┆
0x2b3c5…2b3e5 20 20 20 20 20 27 2c 27 20 20 4b 38 30 20 20 20 20 20 27 2c 27 20 20 4b 39 30 20 20 20 20 20 27 ┆ ',' K80 ',' K90 '┆
0x2b3e5…2b3f4 2c 27 20 20 56 45 52 54 45 58 54 20 27 29 2c ┆,' VERTEXT '),┆
0x2b3f4…2b414 (27, 0, 70) 20 20 20 20 4d 41 58 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX BINARY, ┆
0x2b414…2b434 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b434…2b443 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b443…2b463 (27, 0, 71) 20 20 20 20 52 43 4f 44 45 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 ┆ RCODE BINARY INIT(0), ┆
0x2b463…2b483 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b483…2b492 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b492…2b4b2 (27, 0, 72) 20 20 20 20 54 52 41 4e 53 46 49 4c 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TRANSFIL FILE, ┆
0x2b4b2…2b4d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b4d2…2b4e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b4e1…2b501 (27, 0, 73) 20 20 20 20 41 4e 54 41 4c 50 49 4e 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTALPIN BINARY, ┆
0x2b501…2b521 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b521…2b530 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b530…2b550 (27, 0, 74) 20 20 20 20 41 4e 54 41 4c 50 55 54 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 ┆ ANTALPUT BINARY INIT(0), ┆
0x2b550…2b570 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b570…2b57f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b57f…2b59f (27, 0, 75) 20 20 20 20 46 45 4c 54 41 42 28 31 30 29 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 20 20 20 ┆ FELTAB(10) CHAR(47) INIT( ┆
0x2b59f…2b5bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b5bf…2b5ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b5ce…2b5ee (27, 0, 76) 20 20 20 20 27 53 45 4b 54 4f 52 20 48 45 41 44 45 52 20 4e 4f 54 20 46 4f 55 4e 44 27 2c 20 20 ┆ 'SEKTOR HEADER NOT FOUND', ┆
0x2b5ee…2b60e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b60e…2b61d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b61d…2b63d (27, 0, 77) 20 20 20 20 27 52 45 41 44 20 45 52 52 4f 52 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'READ ERROR', ┆
0x2b63d…2b65d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b65d…2b66c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b66c…2b68c (27, 0, 78) 20 20 20 20 27 57 52 49 54 45 20 45 52 52 4f 52 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'WRITE ERROR', ┆
0x2b68c…2b6ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b6ac…2b6bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b6bb…2b6db (27, 0, 79) 20 20 20 20 27 4b 45 59 20 4e 4f 54 20 46 4f 55 4e 44 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'KEY NOT FOUND', ┆
0x2b6db…2b6fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b6fb…2b70a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b70a…2b72a (27, 0, 80) 20 20 20 20 27 4e 5d 47 4f 4e 20 44 49 53 4b 45 54 54 20 48 41 52 20 46 4c 59 54 54 41 54 53 27 ┆ 'NÅGON DISKETT HAR FLYTTATS'┆
0x2b72a…2b74a 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, ┆
0x2b74a…2b759 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b759…2b779 (27, 0, 81) 20 20 20 20 27 45 4e 20 41 56 20 46 49 4c 45 52 4e 41 20 5b 52 20 46 5c 52 20 4c 49 54 45 4e 27 ┆ 'EN AV FILERNA ÄR FÖR LITEN'┆
0x2b779…2b799 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, ┆
0x2b799…2b7a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b7a8…2b7c8 (28, 0, 0) 20 20 20 20 27 45 4e 20 41 56 20 46 49 4c 45 52 4e 41 20 5b 52 20 53 4b 52 49 56 53 4b 59 44 44 ┆ 'EN AV FILERNA ÄR SKRIVSKYDD┆
0x2b7c8…2b7e8 41 44 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AD'), ┆
0x2b7e8…2b7f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b7f7…2b817 (28, 0, 1) 20 20 20 20 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ P POINTER, ┆
0x2b817…2b837 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b837…2b846 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b846…2b866 (28, 0, 2) 20 20 20 20 44 20 42 41 53 45 44 28 50 29 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 ┆ D BASED(P) CHAR(6), ┆
0x2b866…2b886 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b886…2b895 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b895…2b8b5 (28, 0, 3) 20 20 20 20 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM CHAR(6), ┆
0x2b8b5…2b8d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b8d5…2b8e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b8e4…2b904 (28, 0, 4) 20 20 20 20 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PP POINTER, ┆
0x2b904…2b924 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b924…2b933 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b933…2b953 (28, 0, 5) 20 20 20 20 31 20 53 54 52 58 20 42 41 53 45 44 28 50 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 STRX BASED(PP), ┆
0x2b953…2b973 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b973…2b982 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b982…2b9a2 (28, 0, 6) 20 20 20 20 20 20 32 20 58 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 X CHAR(2), ┆
0x2b9a2…2b9c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b9c2…2b9d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2b9d1…2b9f1 (28, 0, 7) 20 20 20 20 20 20 32 20 59 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 Y CHAR(2), ┆
0x2b9f1…2ba11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ba11…2ba20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ba20…2ba40 (28, 0, 8) 20 20 20 20 20 20 32 20 46 49 52 4d 41 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIRMA CHAR(1), ┆
0x2ba40…2ba60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ba60…2ba6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ba6f…2ba8f (28, 0, 9) 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 27 20 20 56 36 20 ┆ VERSION CHAR(47) INIT(' V6 ┆
0x2ba8f…2baaf 56 65 72 73 69 6f 6e 20 31 2e 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆Version 1.4 ┆
0x2baaf…2babe 20 20 20 20 38 30 30 36 32 34 27 29 3b 20 20 ┆ 800624'); ┆
0x2babe…2bade (28, 0, 10) 44 43 4c 20 52 45 41 44 59 54 52 41 43 45 20 42 49 4e 41 52 59 20 49 4e 49 54 20 28 30 29 3b 20 ┆DCL READYTRACE BINARY INIT (0); ┆
0x2bade…2bafe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bafe…2bb0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bb0d…2bb5c (28, 0, 11) 0x20[0x4f]
[…0x1…]
0x2bbab…2bbcb (28, 0, 13) 44 49 53 4b 45 54 54 4b 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DISKETTK:PROC; ┆
0x2bbcb…2bbeb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bbeb…2bbfa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bbfa…2bc1a (28, 0, 14) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2bc1a…2bc3a 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 44 49 53 4b 45 54 54 4b 20 50 52 4f 43 27 29 ┆ PUT SKIP LIST ('DISKETTK PROC')┆
0x2bc3a…2bc49 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x2bc49…2bc69 (28, 0, 15) 20 20 20 20 20 20 20 20 58 4e 3d 46 49 4c 54 41 42 28 46 49 52 4d 41 2d 27 36 27 29 3b 20 20 20 ┆ XN=FILTAB(FIRMA-'6'); ┆
0x2bc69…2bc89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bc89…2bc98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bc98…2bcb8 (28, 0, 16) 44 30 3a 20 20 20 20 20 46 53 54 52 33 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆D0: FSTR3=STR; ┆
0x2bcb8…2bcd8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bcd8…2bce7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bce7…2bd07 (28, 0, 17) 20 20 20 20 20 20 20 20 49 3d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=2; ┆
0x2bd07…2bd27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bd27…2bd36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bd36…2bd56 (28, 0, 18) 44 31 3a 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 49 29 3b 20 20 20 20 20 20 20 20 20 ┆D1: CALL CHOOSE(I); ┆
0x2bd56…2bd76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bd76…2bd85 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bd85…2bda5 (28, 0, 19) 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 46 45 4c 31 3b 20 20 20 20 ┆ ON ERROR GO TO FEL1; ┆
0x2bda5…2bdc5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bdc5…2bdd4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bdd4…2bdf4 (28, 0, 20) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 4f 4e 54 52 4f 4c 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN KONTROL; ┆
0x2bdf4…2be14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2be14…2be23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2be23…2be43 (28, 0, 21) 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 46 45 4c 32 3b 20 20 ┆ ON ENDFILE GO TO FEL2; ┆
0x2be43…2be63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2be63…2be72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2be72…2be92 (28, 0, 22) 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 4b 4f 4e 54 52 4f 4c 29 20 49 4e 54 4f 28 ┆ READ FILE(KONTROL) INTO(┆
0x2be92…2beb2 4b 4f 4e 54 52 4f 4c 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTROL2); ┆
0x2beb2…2bec1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bec1…2bee1 (28, 0, 23) 44 32 3a 20 20 20 20 20 49 46 20 49 3d 34 20 54 48 45 4e 20 47 4f 20 54 4f 20 44 33 3b 20 20 20 ┆D2: IF I=4 THEN GO TO D3; ┆
0x2bee1…2bf01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bf01…2bf10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bf10…2bf30 (28, 0, 24) 20 20 20 20 20 20 20 20 49 3d 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=4; ┆
0x2bf30…2bf50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bf50…2bf5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bf5f…2bf7f (28, 0, 25) 20 20 20 20 20 20 20 20 4b 4f 4e 54 52 4f 4c 31 3d 4b 4f 4e 54 52 4f 4c 32 3b 20 20 20 20 20 20 ┆ KONTROL1=KONTROL2; ┆
0x2bf7f…2bf9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bf9f…2bfae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bfae…2bfce (28, 0, 26) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 44 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO D1; ┆
0x2bfce…2bfee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bfee…2bffd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2bffd…2c04c (28, 0, 27) 0x20[0x4f]
0x2c04c…2c06c (28, 0, 28) 46 45 4c 31 3a 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆FEL1: PUT FILE(D) SKIP EDIT(VE┆
0x2c06c…2c08c 52 53 49 4f 4e 29 28 41 28 39 36 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RSION)(A(96)) ┆
0x2c08c…2c09b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c09b…2c0bb (28, 0, 29) 20 20 20 20 20 20 20 20 28 27 44 69 73 6b 65 74 74 20 6d 65 64 20 22 56 45 52 54 45 58 54 22 20 ┆ ('Diskett med "VERTEXT" ┆
0x2c0bb…2c0db 66 69 6e 6e 73 20 69 6e 74 65 20 69 20 64 72 69 76 65 27 29 28 41 28 34 30 29 29 20 20 20 20 20 ┆finns inte i drive')(A(40)) ┆
0x2c0db…2c0ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c0ea…2c10a (28, 0, 30) 20 20 20 20 20 20 20 20 28 49 29 28 41 28 37 29 29 28 27 53 7b 74 74 20 69 6e 20 72 7b 74 74 20 ┆ (I)(A(7))('Sätt in rätt ┆
0x2c10a…2c12a 64 69 73 6b 65 74 74 20 6f 63 68 20 74 72 79 63 6b 20 22 52 45 54 55 52 4e 22 27 29 28 41 28 34 ┆diskett och tryck "RETURN"')(A(4┆
0x2c12a…2c139 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆7)); ┆
0x2c139…2c159 (28, 0, 31) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x2c159…2c179 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c179…2c188 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c188…2c1a8 (28, 0, 32) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(''); ┆
0x2c1a8…2c1c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c1c8…2c1d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c1d7…2c1f7 (28, 0, 33) 20 20 20 20 20 20 20 20 49 3d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=2; ┆
0x2c1f7…2c217 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c217…2c226 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c226…2c246 (28, 0, 34) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 44 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO D1; ┆
0x2c246…2c266 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c266…2c275 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c275…2c2c4 (28, 0, 35) 0x20[0x4f]
0x2c2c4…2c2e4 (28, 0, 36) 46 45 4c 32 3a 20 20 20 41 4e 54 41 4c 50 32 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FEL2: ANTALP2=0; ┆
0x2c2e4…2c304 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c304…2c313 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c313…2c333 (28, 0, 37) 20 20 20 20 20 20 20 20 44 41 54 55 4d 32 3d 27 2a 2a 2a 2a 2a 2a 27 3b 20 20 20 20 20 20 20 20 ┆ DATUM2='******'; ┆
0x2c333…2c353 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c353…2c362 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c362…2c382 (28, 0, 38) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 44 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO D2; ┆
0x2c382…2c3a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c3a2…2c3b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c3b1…2c400 (28, 0, 39) 0x20[0x4f]
0x2c400…2c420 (28, 0, 40) 44 33 3a 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆D3: PUT FILE(D) SKIP EDIT(VE┆
0x2c420…2c440 52 53 49 4f 4e 29 28 41 28 39 36 29 29 28 27 53 45 4e 41 53 54 45 20 42 41 54 43 48 44 41 54 55 ┆RSION)(A(96))('SENASTE BATCHDATU┆
0x2c440…2c44f 4d 27 29 28 41 28 34 37 29 29 20 20 20 20 20 ┆M')(A(47)) ┆
0x2c44f…2c46f (28, 0, 41) 20 20 20 20 20 20 20 20 28 27 49 4e 44 49 53 4b 45 54 54 27 29 28 41 28 31 30 29 29 28 44 41 54 ┆ ('INDISKETT')(A(10))(DAT┆
0x2c46f…2c48f 55 4d 31 29 28 41 28 33 37 29 29 28 27 55 54 44 49 53 4b 45 54 54 27 29 28 41 28 31 30 29 29 28 ┆UM1)(A(37))('UTDISKETT')(A(10))(┆
0x2c48f…2c49e 44 41 54 55 4d 32 29 28 41 28 33 37 29 29 20 ┆DATUM2)(A(37)) ┆
0x2c49e…2c4be (28, 0, 42) 20 20 20 20 20 20 20 20 28 27 4f 4d 20 4f 4b 20 53 56 41 52 41 20 22 4a 22 27 29 28 41 28 34 37 ┆ ('OM OK SVARA "J"')(A(47┆
0x2c4be…2c4de 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)); ┆
0x2c4de…2c4ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c4ed…2c50d (28, 0, 43) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x2c50d…2c52d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c52d…2c53c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c53c…2c55c (28, 0, 44) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 54 31 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(T1); ┆
0x2c55c…2c57c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c57c…2c58b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c58b…2c5ab (28, 0, 45) 20 20 20 20 20 20 20 20 49 46 20 54 31 7f 3d 27 4a 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 44 30 ┆ IF T1 ='J' THEN GO TO D0┆
0x2c5ab…2c5cb 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x2c5cb…2c5da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c5da…2c5fa (28, 0, 46) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 50 32 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTALP2=0; ┆
0x2c5fa…2c61a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c61a…2c629 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c629…2c649 (28, 0, 47) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2c649…2c669 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 53 4c 55 54 20 44 49 53 4b 45 54 54 4b 27 ┆ PUT SKIP LIST ('SLUT DISKETTK'┆
0x2c669…2c678 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x2c678…2c698 (28, 0, 48) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x2c698…2c6b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c6b8…2c6c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c6c7…2c6e7 (28, 0, 49) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x2c6e7…2c707 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c707…2c716 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c716…2c765 (28, 0, 50) 0x20[0x4f]
0x2c765…2c785 (28, 0, 51) 42 55 46 46 4d 4f 56 45 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆BUFFMOVE:PROC; ┆
0x2c785…2c7a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c7a5…2c7b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c7b4…2c7d4 (28, 0, 52) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2c7d4…2c7f4 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 42 55 46 46 4d 4f 56 45 27 29 3b 20 20 20 ┆ PUT SKIP LIST ('BUFFMOVE'); ┆
0x2c7f4…2c803 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c803…2c823 (28, 0, 53) 20 20 20 20 20 20 20 20 58 4e 3d 46 49 4c 54 41 42 20 28 34 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ XN=FILTAB (4); ┆
0x2c823…2c843 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c843…2c852 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c852…2c872 (28, 0, 54) 20 20 20 20 20 20 20 20 46 53 54 52 31 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR1=STR; ┆
0x2c872…2c892 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c892…2c8a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c8a1…2c8c1 (28, 0, 55) 20 20 20 20 20 20 20 20 49 3d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=2; ┆
0x2c8c1…2c8e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c8e1…2c8f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c8f0…2c910 (28, 0, 56) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 49 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(I); ┆
0x2c910…2c930 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c930…2c93f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c93f…2c95f (28, 0, 57) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 56 45 52 49 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN VERIN; ┆
0x2c95f…2c97f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c97f…2c98e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c98e…2c9ae (28, 0, 58) 20 20 20 20 20 20 20 20 46 53 54 52 32 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR2=STR; ┆
0x2c9ae…2c9ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c9ce…2c9dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2c9dd…2c9fd (28, 0, 59) 20 20 20 20 20 20 20 20 49 3d 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=4; ┆
0x2c9fd…2ca1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ca1d…2ca2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ca2c…2ca4c (28, 0, 60) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 49 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(I); ┆
0x2ca4c…2ca6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ca6c…2ca7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ca7b…2ca9b (28, 0, 61) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 56 45 52 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN VERUT; ┆
0x2ca9b…2cabb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cabb…2caca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2caca…2caea (28, 0, 62) 20 20 20 20 20 20 20 20 49 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=0; ┆
0x2caea…2cb0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cb0a…2cb19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cb19…2cb39 (28, 0, 63) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 49 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(I); ┆
0x2cb39…2cb59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cb59…2cb68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cb68…2cb88 (28, 0, 64) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 56 45 52 49 4e 29 3b 20 20 20 20 20 20 20 ┆ CALL SEOF(VERIN); ┆
0x2cb88…2cba8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cba8…2cbb7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cbb7…2cbd7 (28, 0, 65) 20 20 20 20 20 20 20 20 4d 41 58 3d 55 4e 53 50 45 43 28 56 45 52 49 4e 29 3b 20 20 20 20 20 20 ┆ MAX=UNSPEC(VERIN); ┆
0x2cbd7…2cbf7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cbf7…2cc06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cc06…2cc26 (28, 0, 66) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 49 4e 29 3d 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(VERIN)=0; ┆
0x2cc26…2cc46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cc46…2cc55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cc55…2cc75 (28, 0, 67) 20 20 20 20 20 20 20 20 4a 3d 32 35 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=255; ┆
0x2cc75…2cc95 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cc95…2cca4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cca4…2ccc4 (28, 0, 68) 42 31 3a 20 20 20 20 20 49 46 20 4d 41 58 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆B1: IF MAX=0 THEN DO; ┆
0x2ccc4…2cce4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cce4…2ccf3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ccf3…2cd13 (28, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 56 45 52 49 4e 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN VERIN; ┆
0x2cd13…2cd33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cd33…2cd42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cd42…2cd62 (28, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 42 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO B9; ┆
0x2cd62…2cd82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cd82…2cd91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cd91…2cdb1 (28, 0, 71) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2cdb1…2cdd1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cdd1…2cde0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cde0…2ce00 (28, 0, 72) 20 20 20 20 20 20 20 20 49 46 20 4a 3e 4d 41 58 20 54 48 45 4e 20 4a 3d 4d 41 58 3b 20 20 20 20 ┆ IF J>MAX THEN J=MAX; ┆
0x2ce00…2ce20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ce20…2ce2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ce2f…2ce4f (28, 0, 73) 20 20 20 20 20 20 20 20 4d 41 58 3d 4d 41 58 2d 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX=MAX-J; ┆
0x2ce4f…2ce6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ce6f…2ce7e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ce7e…2ce9e (28, 0, 74) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 56 45 52 49 4e 2c 41 52 45 41 49 4e 2c 4a 2c 52 ┆ CALL RD(VERIN,AREAIN,J,R┆
0x2ce9e…2cebe 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CODE); ┆
0x2cebe…2cecd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cecd…2ceed (28, 0, 75) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 ┆ IF RCODE =0 THEN PUT SKI┆
0x2ceed…2cf0d 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 56 45 52 49 4e 20 27 2c 52 43 4f 44 45 29 3b ┆P LIST('LÄSFEL I VERIN ',RCODE);┆
0x2cf0d…2cf1c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cf1c…2cf3c (28, 0, 76) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 57 52 28 56 45 52 55 54 2c 41 52 45 41 49 4e 2c 4a 2c 52 ┆ CALL WR(VERUT,AREAIN,J,R┆
0x2cf3c…2cf5c 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CODE); ┆
0x2cf5c…2cf6b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cf6b…2cf8b (28, 0, 77) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 ┆ IF RCODE =0 THEN PUT SKI┆
0x2cf8b…2cfab 50 20 4c 49 53 54 28 27 53 4b 52 49 56 46 45 4c 20 49 20 56 45 52 55 54 20 27 2c 52 43 4f 44 45 ┆P LIST('SKRIVFEL I VERUT ',RCODE┆
0x2cfab…2cfba 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x2cfba…2cfda (28, 0, 78) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 50 32 3d 41 4e 54 41 4c 50 32 2b 4a 3b 20 20 20 20 20 20 ┆ ANTALP2=ANTALP2+J; ┆
0x2cfda…2cffa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2cffa…2d009 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d009…2d029 (28, 0, 79) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 42 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO B1; ┆
0x2d029…2d049 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d049…2d058 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d058…2d078 (28, 0, 80) 42 39 3a 20 20 20 20 20 55 54 50 3d 41 44 44 52 28 41 52 45 41 55 54 29 3b 20 20 20 20 20 20 20 ┆B9: UTP=ADDR(AREAUT); ┆
0x2d078…2d098 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d098…2d0a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d0a7…2d0c7 (28, 0, 81) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2d0c7…2d0e7 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 53 4c 55 54 20 42 55 46 46 4d 4f 56 45 27 29 ┆ PUT SKIP LIST ('SLUT BUFFMOVE')┆
0x2d0e7…2d0f6 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x2d0f6…2d116 (29, 0, 0) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x2d116…2d136 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d136…2d145 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d145…2d165 (29, 0, 1) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x2d165…2d185 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d185…2d194 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d194…2d1e3 (29, 0, 2) 0x20[0x4f]
0x2d1e3…2d203 (29, 0, 3) 4f 50 45 4e 54 52 41 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OPENTRAN:PROC; ┆
0x2d203…2d223 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d223…2d232 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d232…2d252 (29, 0, 4) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2d252…2d272 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 4f 50 45 4e 54 52 41 4e 27 29 3b 20 20 20 20 ┆ PUT SKIP LIST ('OPENTRAN'); ┆
0x2d272…2d281 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d281…2d2a1 (29, 0, 5) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN TRANSFIL; ┆
0x2d2a1…2d2c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d2c1…2d2d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d2d0…2d2f0 (29, 0, 6) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 54 52 41 4e 53 46 49 4c 29 3b 20 20 20 20 ┆ CALL SEOF(TRANSFIL); ┆
0x2d2f0…2d310 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d310…2d31f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d31f…2d33f (29, 0, 7) 20 20 20 20 20 20 20 20 4d 41 58 3d 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3b 20 20 20 ┆ MAX=UNSPEC(TRANSFIL); ┆
0x2d33f…2d35f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d35f…2d36e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d36e…2d38e (29, 0, 8) 20 20 20 20 20 20 20 20 54 50 4f 53 54 41 4e 54 3d 4d 41 58 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ TPOSTANT=MAX; ┆
0x2d38e…2d3ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d3ae…2d3bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d3bd…2d3dd (29, 0, 9) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3d 30 3b 20 20 20 20 20 ┆ UNSPEC(TRANSFIL)=0; ┆
0x2d3dd…2d3fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d3fd…2d40c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d40c…2d42c (29, 0, 10) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 50 49 4e 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTALPIN=0; ┆
0x2d42c…2d44c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d44c…2d45b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d45b…2d47b (29, 0, 11) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2d47b…2d49b 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 53 4c 55 54 20 4f 50 45 4e 54 52 41 4e 27 29 ┆ PUT SKIP LIST ('SLUT OPENTRAN')┆
0x2d49b…2d4aa 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x2d4aa…2d4ca (29, 0, 12) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x2d4ca…2d4ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d4ea…2d4f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d4f9…2d519 (29, 0, 13) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x2d519…2d539 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d539…2d548 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d548…2d597 (29, 0, 14) 0x20[0x4f]
0x2d597…2d5b7 (29, 0, 15) 50 4f 53 54 49 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆POSTIN:PROC; ┆
0x2d5b7…2d5d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d5d7…2d5e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d5e6…2d606 (29, 0, 16) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2d606…2d626 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 50 4f 53 54 49 4e 27 29 3b 20 20 20 20 20 20 ┆ PUT SKIP LIST ('POSTIN'); ┆
0x2d626…2d635 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d635…2d655 (29, 0, 17) 20 20 20 20 20 20 20 20 49 46 20 41 4e 54 41 4c 50 49 4e 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 ┆ IF ANTALPIN=0 THEN DO; ┆
0x2d655…2d675 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d675…2d684 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d684…2d6a4 (29, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4d 41 58 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF MAX=0 THEN DO; ┆
0x2d6a4…2d6c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d6c4…2d6d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d6d3…2d6f3 (29, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 31 30 3b 20 20 20 20 20 20 20 20 20 ┆ RCODE=10; ┆
0x2d6f3…2d713 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d713…2d722 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d722…2d742 (29, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x2d742…2d762 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d762…2d771 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d771…2d791 (29, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2d791…2d7b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d7b1…2d7c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d7c0…2d7e0 (29, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 32 35 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=255; ┆
0x2d7e0…2d800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d800…2d80f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d80f…2d82f (29, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 3e 4d 41 58 20 54 48 45 4e 20 4a 3d 4d 41 58 3b 20 ┆ IF J>MAX THEN J=MAX; ┆
0x2d82f…2d84f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d84f…2d85e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d85e…2d87e (29, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 4d 41 58 3d 4d 41 58 2d 4a 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX=MAX-J; ┆
0x2d87e…2d89e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d89e…2d8ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d8ad…2d8cd (29, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 54 52 41 4e 53 46 49 4c 2c 41 52 45 41 ┆ CALL RD(TRANSFIL,AREA┆
0x2d8cd…2d8ed 49 4e 2c 4a 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IN,J,RCODE); ┆
0x2d8ed…2d8fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d8fc…2d91c (29, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 ┆ IF RCODE =0 THEN PUT ┆
0x2d91c…2d93c 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 54 52 41 4e 53 46 49 4c 27 2c 52 43 ┆SKIP LIST('LÄSFEL I TRANSFIL',RC┆
0x2d93c…2d94b 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ODE); ┆
0x2d94b…2d96b (29, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 50 49 4e 3d 4a 2d 31 3b 20 20 20 20 20 20 20 20 ┆ ANTALPIN=J-1; ┆
0x2d96b…2d98b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d98b…2d99a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d99a…2d9ba (29, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 54 52 41 4e 50 3d 41 44 44 52 28 41 52 45 41 49 4e 29 3b 20 20 ┆ TRANP=ADDR(AREAIN); ┆
0x2d9ba…2d9da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d9da…2d9e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2d9e9…2da09 (29, 0, 29) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2da09…2da29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2da29…2da38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2da38…2da58 (29, 0, 30) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x2da58…2da78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2da78…2da87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2da87…2daa7 (29, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 50 49 4e 3d 41 4e 54 41 4c 50 49 4e 2d 31 3b 20 ┆ ANTALPIN=ANTALPIN-1; ┆
0x2daa7…2dac7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dac7…2dad6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dad6…2daf6 (29, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 54 52 41 4e 50 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(TRANP)=UNSPEC(┆
0x2daf6…2db16 54 52 41 4e 50 29 2b 54 52 41 4e 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TRANP)+TRANL; ┆
0x2db16…2db25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2db25…2db45 (29, 0, 33) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2db45…2db65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2db65…2db74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2db74…2db94 (29, 0, 34) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2db94…2dbb4 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 53 4c 55 54 20 50 4f 53 54 49 4e 27 29 3b 20 ┆ PUT SKIP LIST ('SLUT POSTIN'); ┆
0x2dbb4…2dbc3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dbc3…2dbe3 (29, 0, 35) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x2dbe3…2dc03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dc03…2dc12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dc12…2dc32 (29, 0, 36) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x2dc32…2dc52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dc52…2dc61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dc61…2dcb0 (29, 0, 37) 0x20[0x4f]
0x2dcb0…2dcd0 (29, 0, 38) 50 4f 53 54 55 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆POSTUT:PROC; ┆
0x2dcd0…2dcf0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dcf0…2dcff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dcff…2dd1f (29, 0, 39) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2dd1f…2dd3f 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 50 4f 53 54 55 54 27 29 3b 20 20 20 20 20 ┆ PUT SKIP LIST ('POSTUT'); ┆
0x2dd3f…2dd4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dd4e…2dd6e (29, 0, 40) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 50 32 3d 41 4e 54 41 4c 50 32 2b 31 3b 20 20 20 20 20 20 ┆ ANTALP2=ANTALP2+1; ┆
0x2dd6e…2dd8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dd8e…2dd9d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dd9d…2ddbd (29, 0, 41) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 50 55 54 3d 41 4e 54 41 4c 50 55 54 2b 31 3b 20 20 20 20 ┆ ANTALPUT=ANTALPUT+1; ┆
0x2ddbd…2dddd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dddd…2ddec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ddec…2de0c (29, 0, 42) 20 20 20 20 20 20 20 20 49 46 20 28 41 4e 54 41 4c 50 55 54 3d 32 35 35 29 20 7c 20 28 28 41 4e ┆ IF (ANTALPUT=255) ö ((AN┆
0x2de0c…2de2c 54 41 4c 50 49 4e 3d 30 29 20 26 20 28 4d 41 58 3d 30 29 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆TALPIN=0) & (MAX=0)) THEN DO; ┆
0x2de2c…2de3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2de3b…2de5b (29, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 57 52 28 56 45 52 55 54 2c 41 52 45 41 55 54 2c ┆ CALL WR(VERUT,AREAUT,┆
0x2de5b…2de7b 41 4e 54 41 4c 50 55 54 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ANTALPUT,RCODE); ┆
0x2de7b…2de8a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2de8a…2deaa (29, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 ┆ IF RCODE =0 THEN PUT ┆
0x2deaa…2deca 53 4b 49 50 20 4c 49 53 54 28 27 53 4b 52 49 56 46 45 4c 20 49 20 54 52 41 4e 53 46 49 4c 27 29 ┆SKIP LIST('SKRIVFEL I TRANSFIL')┆
0x2deca…2ded9 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x2ded9…2def9 (29, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 55 54 50 3d 41 44 44 52 28 41 52 45 41 55 54 29 3b 20 20 20 20 ┆ UTP=ADDR(AREAUT); ┆
0x2def9…2df19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2df19…2df28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2df28…2df48 (29, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 50 55 54 3d 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ ANTALPUT=0; ┆
0x2df48…2df68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2df68…2df77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2df77…2df97 (29, 0, 47) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2df97…2dfb7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dfb7…2dfc6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2dfc6…2dfe6 (29, 0, 48) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x2dfe6…2e006 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e006…2e015 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e015…2e035 (29, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 55 54 50 29 3d 55 4e 53 50 45 43 28 55 54 ┆ UNSPEC(UTP)=UNSPEC(UT┆
0x2e035…2e055 50 29 2b 56 45 52 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P)+VERL; ┆
0x2e055…2e064 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e064…2e084 (29, 0, 50) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2e084…2e0a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e0a4…2e0b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e0b3…2e0d3 (29, 0, 51) 20 20 20 20 20 20 20 20 56 45 52 4e 52 55 54 3d 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 ┆ VERNRUT=VERNR; ┆
0x2e0d3…2e0f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e0f3…2e102 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e102…2e122 (29, 0, 52) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 46 58 54 4f 42 49 4e 28 42 44 41 54 55 4d 2c 44 41 54 55 ┆ CALL FXTOBIN(BDATUM,DATU┆
0x2e122…2e142 4d 55 54 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MUT); ┆
0x2e142…2e151 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e151…2e171 (29, 0, 53) 20 20 20 20 20 20 20 20 54 45 58 54 55 54 3d 54 45 58 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TEXTUT=TEXT; ┆
0x2e171…2e191 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e191…2e1a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e1a0…2e1c0 (29, 0, 54) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2e1c0…2e1e0 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 53 4c 55 54 20 50 4f 53 54 55 54 27 29 3b 20 ┆ PUT SKIP LIST ('SLUT POSTUT'); ┆
0x2e1e0…2e1ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e1ef…2e20f (29, 0, 55) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x2e20f…2e22f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e22f…2e23e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e23e…2e25e (29, 0, 56) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x2e25e…2e27e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e27e…2e28d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e28d…2e2dc (29, 0, 57) 0x20[0x4f]
0x2e2dc…2e2fc (29, 0, 58) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x2e2fc…2e31c 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x2e31c…2e32b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e32b…2e37a (29, 0, 59) 0x20[0x4f]
0x2e37a…2e39a (29, 0, 60) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x2e39a…2e3ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e3ba…2e3c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e3c9…2e3e9 (29, 0, 61) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2e3e9…2e409 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 53 54 41 52 54 27 29 3b 20 20 20 20 20 20 20 ┆ PUT SKIP LIST ('START'); ┆
0x2e409…2e418 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e418…2e438 (29, 0, 62) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x2e438…2e458 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e458…2e467 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e467…2e487 (29, 0, 63) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 47 ┆ IF DATUM='0 ' THEN G┆
0x2e487…2e4a7 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O TO SLUT; ┆
0x2e4a7…2e4b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e4b6…2e4d6 (29, 0, 64) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x2e4d6…2e4f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e4f6…2e505 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e505…2e525 (29, 0, 65) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x2e525…2e545 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e545…2e554 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e554…2e574 (29, 0, 66) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x2e574…2e594 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e594…2e5a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e5a3…2e5f2 (29, 0, 67) 0x20[0x4f]
0x2e5f2…2e612 (29, 0, 68) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 49 53 4b 45 54 54 4b 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL DISKETTK; ┆
0x2e612…2e632 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e632…2e641 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e641…2e661 (29, 0, 69) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x2e661…2e681 52 53 49 4f 4e 29 28 41 28 39 36 29 29 28 27 47 65 6e 65 72 65 72 69 6e 67 20 61 76 20 22 56 45 ┆RSION)(A(96))('Generering av "VE┆
0x2e681…2e690 52 54 45 58 54 22 20 70 7d 67 7d 72 27 29 20 ┆RTEXT" pågår') ┆
0x2e690…2e6b0 (29, 0, 70) 20 20 20 20 20 20 20 20 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ (A); ┆
0x2e6b0…2e6d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e6d0…2e6df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e6df…2e6ff (29, 0, 71) 20 20 20 20 20 20 20 20 4c 4f 41 44 50 41 52 41 20 3d 20 27 53 4f 52 54 54 45 53 54 20 56 45 52 ┆ LOADPARA = 'SORTTEST VER┆
0x2e6ff…2e71f 54 45 58 54 20 34 20 33 20 30 20 43 4f 50 59 20 54 52 41 4e 53 46 49 4c 20 4b 4f 50 49 41 20 32 ┆TEXT 4 3 0 COPY TRANSFIL KOPIA 2┆
0x2e71f…2e72e 20 31 20 27 20 43 41 54 20 20 20 20 20 20 20 ┆ 1 ' CAT ┆
0x2e72e…2e74e (29, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 53 20 4b 4f 50 49 41 20 53 4f 52 54 ┆ 'S KOPIA SORT┆
0x2e74e…2e76e 46 49 4c 20 53 4f 52 54 54 45 53 54 20 4b 4f 50 49 41 20 31 20 36 20 30 20 56 31 33 27 3b 20 20 ┆FIL SORTTEST KOPIA 1 6 0 V13'; ┆
0x2e76e…2e77d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e77d…2e79d (29, 0, 73) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 55 46 46 4d 4f 56 45 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL BUFFMOVE; ┆
0x2e79d…2e7bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e7bd…2e7cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e7cc…2e7ec (29, 0, 74) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 ┆ IF RCODE =0 THEN GO TO F┆
0x2e7ec…2e80c 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EL; ┆
0x2e80c…2e81b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e81b…2e83b (29, 0, 75) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 50 45 4e 54 52 41 4e 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL OPENTRAN; ┆
0x2e83b…2e85b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e85b…2e86a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e86a…2e88a (29, 0, 76) 20 20 20 20 20 20 20 20 49 46 20 4d 41 58 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 33 3b 20 ┆ IF MAX=0 THEN GO TO L3; ┆
0x2e88a…2e8aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e8aa…2e8b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e8b9…2e8d9 (29, 0, 77) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 49 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL POSTIN; ┆
0x2e8d9…2e8f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e8f9…2e908 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e908…2e928 (29, 0, 78) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 ┆ IF RCODE =0 THEN GO TO F┆
0x2e928…2e948 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EL; ┆
0x2e948…2e957 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e957…2e977 (29, 0, 79) 20 20 20 20 20 20 20 20 4e 52 3d 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ NR=VERNR; ┆
0x2e977…2e997 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e997…2e9a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e9a6…2e9c6 (29, 0, 80) 20 20 20 20 20 20 20 20 56 45 52 4e 52 55 54 3d 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 ┆ VERNRUT=VERNR; ┆
0x2e9c6…2e9e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e9e6…2e9f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2e9f5…2ea15 (29, 0, 81) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 46 58 54 4f 42 49 4e 28 42 44 41 54 55 4d 2c 44 41 54 55 ┆ CALL FXTOBIN(BDATUM,DATU┆
0x2ea15…2ea35 4d 55 54 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MUT); ┆
0x2ea35…2ea44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ea44…2ea64 (30, 0, 0) 20 20 20 20 20 20 20 20 54 45 58 54 55 54 3d 54 45 58 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TEXTUT=TEXT; ┆
0x2ea64…2ea84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ea84…2ea93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ea93…2eab3 (30, 0, 1) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 55 54 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTALUT=1; ┆
0x2eab3…2ead3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ead3…2eae2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2eae2…2eb02 (30, 0, 2) 4c 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L1: ┆
0x2eb02…2eb22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2eb22…2eb31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2eb31…2eb51 (30, 0, 3) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2eb51…2eb71 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 4c 31 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP LIST ('L1'); ┆
0x2eb71…2eb80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2eb80…2eba0 (30, 0, 4) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 49 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL POSTIN; ┆
0x2eba0…2ebc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ebc0…2ebcf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ebcf…2ebef (30, 0, 5) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 ┆ IF RCODE =0 THEN GO TO F┆
0x2ebef…2ec0f 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EL; ┆
0x2ec0f…2ec1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ec1e…2ec3e (30, 0, 6) 20 20 20 20 20 20 20 20 49 46 20 4e 52 3e 56 45 52 4e 52 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF NR>VERNR THEN DO; ┆
0x2ec3e…2ec5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ec5e…2ec6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ec6d…2ec8d (30, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 ┆ PUT FILE(D) SKIP EDIT┆
0x2ec8d…2ecad 28 27 56 45 52 4e 55 4d 4d 45 52 20 5b 52 20 49 20 4f 4f 52 44 4e 49 4e 47 27 29 28 41 29 3b 20 ┆('VERNUMMER ÄR I OORDNING')(A); ┆
0x2ecad…2ecbc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ecbc…2ecdc (30, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 ┆ GET SKIP LIST(''); ┆
0x2ecdc…2ecfc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ecfc…2ed0b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ed0b…2ed2b (30, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT; ┆
0x2ed2b…2ed4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ed4b…2ed5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ed5a…2ed7a (30, 0, 10) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2ed7a…2ed9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ed9a…2eda9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2eda9…2edc9 (30, 0, 11) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4d 41 58 3c 56 45 52 4e 52 20 54 48 45 4e 20 56 45 52 ┆ IF VERMAX<VERNR THEN VER┆
0x2edc9…2ede9 4d 41 58 3d 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MAX=VERNR; ┆
0x2ede9…2edf8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2edf8…2ee18 (30, 0, 12) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4d 49 4e 3e 56 45 52 4e 52 20 54 48 45 4e 20 56 45 52 ┆ IF VERMIN>VERNR THEN VER┆
0x2ee18…2ee38 4d 49 4e 3d 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MIN=VERNR; ┆
0x2ee38…2ee47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ee47…2ee67 (30, 0, 13) 20 20 20 20 20 20 20 20 49 46 20 4e 52 7f 3d 56 45 52 4e 52 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆ IF NR =VERNR THEN DO; ┆
0x2ee67…2ee87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ee87…2ee96 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ee96…2eeb6 (30, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 55 54 3b 20 20 20 20 20 20 20 20 20 ┆ CALL POSTUT; ┆
0x2eeb6…2eed6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2eed6…2eee5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2eee5…2ef05 (30, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 ┆ IF RCODE =0 THEN GO T┆
0x2ef05…2ef25 4f 20 46 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O FEL; ┆
0x2ef25…2ef34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ef34…2ef54 (30, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 55 54 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTALUT=1; ┆
0x2ef54…2ef74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ef74…2ef83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ef83…2efa3 (30, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 4e 52 3d 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ NR=VERNR; ┆
0x2efa3…2efc3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2efc3…2efd2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2efd2…2eff2 (30, 0, 18) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2eff2…2f012 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f012…2f021 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f021…2f041 (30, 0, 19) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x2f041…2f061 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f061…2f070 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f070…2f090 (30, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 55 54 3d 41 4e 54 41 4c 55 54 2b 31 3b 20 20 20 ┆ ANTALUT=ANTALUT+1; ┆
0x2f090…2f0b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f0b0…2f0bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f0bf…2f0df (30, 0, 21) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2f0df…2f0ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f0ff…2f10e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f10e…2f12e (30, 0, 22) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x2f12e…2f14e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f14e…2f15d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f15d…2f17d (30, 0, 23) 4c 32 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L2: ┆
0x2f17d…2f19d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f19d…2f1ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f1ac…2f1cc (30, 0, 24) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2f1cc…2f1ec 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 4c 32 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP LIST ('L2'); ┆
0x2f1ec…2f1fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f1fb…2f21b (30, 0, 25) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL POSTUT; ┆
0x2f21b…2f23b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f23b…2f24a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f24a…2f26a (30, 0, 26) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 ┆ IF RCODE =0 THEN GO TO F┆
0x2f26a…2f28a 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EL; ┆
0x2f28a…2f299 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f299…2f2b9 (30, 0, 27) 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 56 45 52 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CLOSE VERUT; ┆
0x2f2b9…2f2d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f2d9…2f2e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f2e8…2f308 (30, 0, 28) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 34 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(4); ┆
0x2f308…2f328 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f328…2f337 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f337…2f357 (30, 0, 29) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN TRANSFIL; ┆
0x2f357…2f377 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f377…2f386 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f386…2f3a6 (30, 0, 30) 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 20 20 ┆ CLOSE TRANSFIL; ┆
0x2f3a6…2f3c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f3c6…2f3d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f3d5…2f3f5 (30, 0, 31) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 30 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(0); ┆
0x2f3f5…2f415 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f415…2f424 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f424…2f444 (30, 0, 32) 20 20 20 20 20 20 20 20 44 41 54 55 4d 32 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM2=DATUM; ┆
0x2f444…2f464 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f464…2f473 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f473…2f493 (30, 0, 33) 20 20 20 20 20 20 20 20 54 50 4f 53 54 41 4e 54 3d 56 45 52 4d 41 58 2d 56 45 52 4d 49 4e 2b 31 ┆ TPOSTANT=VERMAX-VERMIN+1┆
0x2f493…2f4b3 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x2f4b3…2f4c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f4c2…2f4e2 (30, 0, 34) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 34 29 20 45 44 49 54 28 4e 41 4d 4e 28 46 49 ┆ PUT SKIP(4) EDIT(NAMN(FI┆
0x2f4e2…2f502 52 4d 41 2d 36 29 29 28 41 28 31 39 29 29 28 27 42 41 54 43 48 52 41 50 50 4f 52 54 27 29 28 41 ┆RMA-6))(A(19))('BATCHRAPPORT')(A┆
0x2f502…2f511 28 32 35 29 29 20 20 20 20 20 20 20 20 20 20 ┆(25)) ┆
0x2f511…2f531 (30, 0, 35) 20 20 20 20 20 20 20 20 28 27 31 39 27 29 28 41 28 32 29 29 28 53 55 42 53 54 52 28 44 41 54 55 ┆ ('19')(A(2))(SUBSTR(DATU┆
0x2f531…2f551 4d 2c 31 2c 32 29 29 28 41 29 28 27 2d 27 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c ┆M,1,2))(A)('-')(A)(SUBSTR(DATUM,┆
0x2f551…2f560 33 2c 32 29 29 28 41 29 20 20 20 20 20 20 20 ┆3,2))(A) ┆
0x2f560…2f580 (30, 0, 36) 20 20 20 20 20 20 20 20 28 27 2d 27 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 35 2c ┆ ('-')(A)(SUBSTR(DATUM,5,┆
0x2f580…2f5a0 32 29 29 28 41 28 36 29 29 28 27 53 49 44 20 31 27 29 28 41 29 20 53 4b 49 50 28 32 29 20 45 44 ┆2))(A(6))('SID 1')(A) SKIP(2) ED┆
0x2f5a0…2f5af 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆
0x2f5af…2f5cf (30, 0, 37) 20 20 20 20 20 20 20 20 28 27 20 27 29 28 41 28 33 35 29 29 28 27 41 4e 54 41 4c 20 50 4f 53 54 ┆ (' ')(A(35))('ANTAL POST┆
0x2f5cf…2f5ef 45 52 27 29 28 41 29 20 53 4b 49 50 20 45 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ER')(A) SKIP EDIT ┆
0x2f5ef…2f5fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f5fe…2f61e (30, 0, 38) 20 20 20 20 20 20 20 20 28 27 42 41 54 43 48 46 41 53 20 20 20 49 4e 44 41 54 55 4d 20 20 20 55 ┆ ('BATCHFAS INDATUM U┆
0x2f61e…2f63e 54 44 41 54 55 4d 20 20 20 54 52 41 4e 53 20 20 20 56 45 52 49 4e 20 20 20 56 45 52 55 54 20 20 ┆TDATUM TRANS VERIN VERUT ┆
0x2f63e…2f64d 20 20 20 44 49 46 46 27 29 28 41 29 20 20 20 ┆ DIFF')(A) ┆
0x2f64d…2f66d (30, 0, 39) 20 20 20 20 20 20 20 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 20 20 20 20 31 27 29 28 41 28 ┆ SKIP(2) EDIT(' 1')(A(┆
0x2f66d…2f68d 31 31 29 29 28 44 41 54 55 4d 31 29 28 41 28 31 30 29 29 28 44 41 54 55 4d 32 29 28 41 28 37 29 ┆11))(DATUM1)(A(10))(DATUM2)(A(7)┆
0x2f68d…2f69c 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) ┆
0x2f69c…2f6bc (30, 0, 40) 20 20 20 20 20 20 20 20 28 54 50 4f 53 54 41 4e 54 29 28 50 50 31 29 28 41 4e 54 41 4c 50 31 29 ┆ (TPOSTANT)(PP1)(ANTALP1)┆
0x2f6bc…2f6dc 28 50 50 31 29 28 41 4e 54 41 4c 50 32 29 28 50 50 31 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(PP1)(ANTALP2)(PP1) ┆
0x2f6dc…2f6eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f6eb…2f70b (30, 0, 41) 20 20 20 20 20 20 20 20 28 54 50 4f 53 54 41 4e 54 2b 41 4e 54 41 4c 50 31 2d 41 4e 54 41 4c 50 ┆ (TPOSTANT+ANTALP1-ANTALP┆
0x2f70b…2f72b 32 29 28 50 50 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2)(PP1); ┆
0x2f72b…2f73a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f73a…2f75a (30, 0, 42) 20 20 20 20 20 20 20 20 52 45 57 52 49 54 45 20 46 49 4c 45 28 4b 4f 4e 54 52 4f 4c 29 20 46 52 ┆ REWRITE FILE(KONTROL) FR┆
0x2f75a…2f77a 4f 4d 28 4b 4f 4e 54 52 4f 4c 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OM(KONTROL2); ┆
0x2f77a…2f789 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f789…2f7a9 (30, 0, 43) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT1; ┆
0x2f7a9…2f7c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f7c9…2f7d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f7d8…2f7f8 (30, 0, 44) 4c 33 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L3: ┆
0x2f7f8…2f818 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f818…2f827 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f827…2f847 (30, 0, 45) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2f847…2f867 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 4c 33 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP LIST ('L3'); ┆
0x2f867…2f876 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f876…2f896 (30, 0, 46) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x2f896…2f8b6 52 53 49 4f 4e 29 28 41 28 39 36 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RSION)(A(96)) ┆
0x2f8b6…2f8c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f8c5…2f8e5 (30, 0, 47) 20 20 20 20 20 20 20 20 28 27 49 4e 47 41 20 4b 4f 4e 54 45 52 49 4e 41 52 20 48 41 52 20 47 4a ┆ ('INGA KONTERINAR HAR GJ┆
0x2f8e5…2f905 4f 52 54 53 20 53 45 44 41 4e 20 53 45 4e 41 53 54 45 20 42 41 54 43 48 27 29 28 41 28 34 37 29 ┆ORTS SEDAN SENASTE BATCH')(A(47)┆
0x2f905…2f914 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x2f914…2f934 (30, 0, 48) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x2f934…2f954 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f954…2f963 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f963…2f983 (30, 0, 49) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(''); ┆
0x2f983…2f9a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f9a3…2f9b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f9b2…2f9d2 (30, 0, 50) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT; ┆
0x2f9d2…2f9f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2f9f2…2fa01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fa01…2fa21 (30, 0, 51) 46 45 4c 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FEL: ┆
0x2fa21…2fa41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fa41…2fa50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fa50…2fa70 (30, 0, 52) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2fa70…2fa90 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 46 45 4c 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP LIST ('FEL'); ┆
0x2fa90…2fa9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fa9f…2fabf (30, 0, 53) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 3d 31 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c ┆ IF RCODE=10 THEN GO TO L┆
0x2fabf…2fadf 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2; ┆
0x2fadf…2faee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2faee…2fb0e (30, 0, 54) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x2fb0e…2fb2e 52 53 49 4f 4e 29 28 41 28 39 36 29 29 28 46 45 4c 54 41 42 28 52 43 4f 44 45 29 29 28 41 28 34 ┆RSION)(A(96))(FELTAB(RCODE))(A(4┆
0x2fb2e…2fb3d 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆7)); ┆
0x2fb3d…2fb5d (30, 0, 55) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x2fb5d…2fb7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fb7d…2fb8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fb8c…2fbac (30, 0, 56) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(''); ┆
0x2fbac…2fbcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fbcc…2fbdb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fbdb…2fbfb (30, 0, 57) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT; ┆
0x2fbfb…2fc1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fc1b…2fc2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fc2a…2fc4a (30, 0, 58) 53 4c 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: ┆
0x2fc4a…2fc6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fc6a…2fc79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fc79…2fc99 (30, 0, 59) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2fc99…2fcb9 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 53 4c 55 54 27 29 3b 20 20 20 20 20 20 20 20 ┆ PUT SKIP LIST ('SLUT'); ┆
0x2fcb9…2fcc8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fcc8…2fce8 (30, 0, 60) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x2fce8…2fd08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fd08…2fd17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fd17…2fd37 (30, 0, 61) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x2fd37…2fd57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fd57…2fd66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fd66…2fd86 (30, 0, 62) 53 4c 55 54 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT1: ┆
0x2fd86…2fda6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fda6…2fdb5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fdb5…2fdd5 (30, 0, 63) 20 20 20 20 20 20 20 20 20 20 49 46 20 52 45 41 44 59 54 52 41 43 45 20 3d 20 31 20 54 48 45 4e ┆ IF READYTRACE = 1 THEN┆
0x2fdd5…2fdf5 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 53 4c 55 54 31 27 29 3b 20 20 20 20 20 20 ┆ PUT SKIP LIST ('SLUT1'); ┆
0x2fdf5…2fe04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fe04…2fe24 (30, 0, 64) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x2fe24…2fe44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fe44…2fe53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fe53…2fe73 (30, 0, 65) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4c 4f 41 44 20 28 4c 4f 41 44 50 41 52 41 2c 38 39 29 3b ┆ CALL LOAD (LOADPARA,89);┆
0x2fe73…2fe93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fe93…2fea2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2fea2…2fef1 (30, 0, 66) 0x20[0x4f]
[…0x1…]
0x2ff40…2ff60 (30, 0, 68) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x2ff60…2ff80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ff80…2ff8f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2ff8f…2ffaf (30, 0, 69) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x2ffcf…2ffde 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x2ffde…2fffe (30, 0, 70) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3001e…3002d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3002d…3004d (30, 0, 71) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3006d…3007c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3007c…3009c (30, 0, 72) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x300bc…300cb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x300cb…300eb (30, 0, 73) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3010b…3011a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3011a…3013a (30, 0, 74) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3015a…30169 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x30169…30189 (30, 0, 75) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x301a9…301b8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x301b8…301d8 (30, 0, 76) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x301f8…30207 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x30207…30227 (30, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x30247…30256 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x30256…30276 (30, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x30296…302a5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x302a5…302c5 (30, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x302e5…302f4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x302f4…30314 (30, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x30334…30343 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x30343…30363 (30, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x30383…30392 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x30392…303b2 (31, 0, 0) 2f 2a 20 56 37 31 20 46 4c 59 54 54 41 52 20 5c 56 45 52 20 5d 52 45 54 53 20 41 43 4b 2e 20 56 ┆/* V71 FLYTTAR ÖVER ÅRETS ACK. V┆
0x303b2…303d2 45 52 42 45 4c 4f 50 50 20 50 5d 20 45 4e 20 4e 59 20 44 49 53 4b 45 54 54 20 20 20 20 20 20 20 ┆ERBELOPP PÅ EN NY DISKETT ┆
0x303d2…303e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x303e1…30401 (31, 0, 1) 20 20 20 4c 5b 47 47 45 52 20 53 45 44 41 4e 20 4e 59 53 4b 41 50 41 44 45 20 50 4f 53 54 45 52 ┆ LÄGGER SEDAN NYSKAPADE POSTER┆
0x30401…30421 20 46 52 5d 4e 20 54 52 41 4e 53 46 49 4c 20 50 5d 20 44 45 4e 20 4e 59 41 20 55 50 50 4c 41 47 ┆ FRÅN TRANSFIL PÅ DEN NYA UPPLAG┆
0x30421…30430 41 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AN ┆
0x30430…30450 (31, 0, 2) 20 20 20 4f 4d 20 4e 5d 47 4f 4e 20 54 59 50 20 41 56 20 4c 5b 53 20 45 4c 4c 45 52 20 53 4b 52 ┆ OM NÅGON TYP AV LÄS ELLER SKR┆
0x30450…30470 49 56 46 45 4c 20 55 50 50 4b 4f 4d 4d 45 52 20 4c 5b 4d 4e 41 53 20 46 45 4c 4d 45 44 44 45 4c ┆IVFEL UPPKOMMER LÄMNAS FELMEDDEL┆
0x30470…3047f 41 4e 44 45 20 50 5d 20 44 49 53 50 4c 41 59 ┆ANDE PÅ DISPLAY┆
0x3047f…3049f (31, 0, 3) 20 20 20 26 20 52 55 54 49 4e 45 4e 20 5d 54 45 52 47 5d 52 20 54 49 4c 4c 20 4d 45 4e 59 4e 20 ┆ & RUTINEN ÅTERGÅR TILL MENYN ┆
0x3049f…304bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x304bf…304ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x304ce…304ee (31, 0, 4) 20 20 20 56 20 30 3a 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ V 0:1 ┆
0x304ee…3050e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3050e…3051d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3051d…3053d (31, 0, 5) 20 20 20 50 52 47 20 4a 5d 20 37 38 30 39 32 30 20 20 20 56 65 72 73 69 6f 6e 20 6d 65 64 20 64 ┆ PRG JÅ 780920 Version med d┆
0x3053d…3055d 61 74 75 6d 20 7d 74 65 72 66 69 6e 6e 73 20 69 20 73 69 73 74 61 20 44 43 4c 2d 72 61 64 65 6e ┆atum återfinns i sista DCL-raden┆
0x3055d…3056c 20 66 7c 72 65 20 50 52 4f 43 20 2a 2f 20 20 ┆ före PROC */ ┆
0x3056c…305bb (31, 0, 6) 0x20[0x4f]
[…0x2…]
0x30659…30679 (31, 0, 9) 44 43 4c 20 49 4e 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL INP POINTER, ┆
0x30679…30699 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30699…306a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x306a8…306c8 (31, 0, 10) 20 20 20 20 31 20 54 52 41 4e 53 54 52 20 42 41 53 45 44 28 49 4e 50 29 2c 20 20 20 20 20 20 20 ┆ 1 TRANSTR BASED(INP), ┆
0x306c8…306e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x306e8…306f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x306f7…30717 (31, 0, 11) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 54 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 20 ┆ 2 KONTOT FIXED(11), ┆
0x30717…30737 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30737…30746 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30746…30766 (31, 0, 12) 20 20 20 20 20 20 32 20 56 45 52 4e 52 54 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 VERNRT FIXED(5), ┆
0x30766…30786 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30786…30795 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30795…307b5 (31, 0, 13) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x307d5…307e4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x307e4…30804 (31, 0, 14) 20 20 20 20 20 20 32 20 50 44 41 54 55 4d 54 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 ┆ 2 PDATUMT FIXED(5), ┆
0x30804…30824 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30824…30833 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30833…30853 (31, 0, 15) 20 20 20 20 20 20 32 20 42 45 4c 4f 50 50 54 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 ┆ 2 BELOPPT FIXED(11), ┆
0x30853…30873 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30873…30882 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30882…308a2 (31, 0, 16) 20 20 20 20 20 20 32 20 54 45 58 54 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT CHAR(13), ┆
0x308a2…308c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x308c2…308d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x308d1…308f1 (31, 0, 17) 20 20 20 20 54 52 41 4e 4c 20 42 49 4e 41 52 59 20 49 4e 49 54 28 33 34 29 3b 20 20 20 20 20 20 ┆ TRANL BINARY INIT(34); ┆
0x308f1…30911 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30911…30920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30920…30940 (31, 0, 18) 20 20 20 20 2f 2a 20 33 34 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 34 BYTES */ ┆
0x30940…30960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30960…3096f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3096f…309be (31, 0, 19) 0x20[0x4f]
0x309be…309de (31, 0, 20) 44 43 4c 20 53 54 41 43 4b 50 54 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 2f 2a 20 54 4f ┆DCL STACKPT POINTER, /* TO┆
0x309de…309fe 50 50 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PP */ ┆
0x309fe…30a0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30a0d…30a2d (31, 0, 21) 20 20 20 20 4b 4f 4e 54 4f 4e 52 56 20 42 41 53 45 44 28 53 54 41 43 4b 50 54 29 20 43 48 41 52 ┆ KONTONRV BASED(STACKPT) CHAR┆
0x30a2d…30a4d 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(11), ┆
0x30a4d…30a5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30a5c…30a7c (31, 0, 22) 20 20 20 20 54 20 42 41 53 45 44 28 53 54 41 43 4b 50 54 29 20 43 48 41 52 28 31 29 3b 20 20 20 ┆ T BASED(STACKPT) CHAR(1); ┆
0x30a7c…30a9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30a9c…30aab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30aab…30afa (31, 0, 23) 0x20[0x4f]
0x30afa…30b1a (31, 0, 24) 44 43 4c 20 53 54 41 43 4b 50 42 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 2f 2a 20 42 4f 54 54 ┆DCL STACKPB POINTER, /* BOTT┆
0x30b1a…30b3a 45 4e 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN */ ┆
0x30b3a…30b49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30b49…30b69 (31, 0, 25) 20 20 20 20 4b 4f 4e 54 4f 4e 52 42 20 42 41 53 45 44 28 53 54 41 43 4b 50 42 29 20 43 48 41 52 ┆ KONTONRB BASED(STACKPB) CHAR┆
0x30b69…30b89 28 31 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(11); ┆
0x30b89…30b98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30b98…30be7 (31, 0, 26) 0x20[0x4f]
0x30be7…30c07 (31, 0, 27) 44 43 4c 20 48 41 45 4c 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 2f 2a 20 48 4a 5b 4c 50 53 ┆DCL HAELP POINTER, /* HJÄLPS┆
0x30c07…30c27 54 52 20 46 5c 52 20 49 4e 53 45 52 54 20 41 56 20 4e 59 54 54 20 35 2d 52 45 43 4f 52 44 20 2a ┆TR FÖR INSERT AV NYTT 5-RECORD *┆
0x30c27…30c36 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆/ ┆
0x30c36…30c56 (31, 0, 28) 20 20 20 20 31 20 55 54 53 54 52 20 42 41 53 45 44 28 48 41 45 4c 50 29 2c 20 20 20 20 20 20 20 ┆ 1 UTSTR BASED(HAELP), ┆
0x30c56…30c76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30c76…30c85 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30c85…30ca5 (31, 0, 29) 20 20 20 20 20 20 32 20 56 45 52 4e 52 56 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 VERNRV BINARY, ┆
0x30ca5…30cc5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30cc5…30cd4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30cd4…30cf4 (31, 0, 30) 20 20 20 20 20 20 32 20 50 44 41 54 55 4d 56 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 ┆ 2 PDATUMV BINARY, ┆
0x30cf4…30d14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30d14…30d23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30d23…30d43 (31, 0, 31) 20 20 20 20 20 20 32 20 42 45 4c 4f 50 50 56 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 ┆ 2 BELOPPV FIXED(11), ┆
0x30d43…30d63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30d63…30d72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30d72…30d92 (31, 0, 32) 20 20 20 20 48 41 45 4c 4c 20 42 49 4e 41 52 59 20 49 4e 49 54 28 31 30 29 3b 20 20 20 20 20 20 ┆ HAELL BINARY INIT(10); ┆
0x30d92…30db2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30db2…30dc1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30dc1…30de1 (31, 0, 33) 20 20 20 20 2f 2a 20 31 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 10 BYTES */ ┆
0x30de1…30e01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30e01…30e10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30e10…30e5f (31, 0, 34) 0x20[0x4f]
0x30e5f…30e7f (31, 0, 35) 44 43 4c 20 31 20 4b 4f 4e 54 52 4f 4c 31 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 KONTROL1, ┆
0x30e7f…30e9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30e9f…30eae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30eae…30ece (31, 0, 36) 20 20 20 20 20 20 32 20 41 4e 54 41 4c 50 31 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 ┆ 2 ANTALP1 BINARY, ┆
0x30ece…30eee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30eee…30efd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30efd…30f1d (31, 0, 37) 20 20 20 20 20 20 32 20 44 41 54 55 4d 31 20 43 48 41 52 28 36 29 3b 20 20 20 20 20 20 20 20 20 ┆ 2 DATUM1 CHAR(6); ┆
0x30f1d…30f3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30f3d…30f4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30f4c…30f6c (31, 0, 38) 20 20 20 20 2f 2a 20 38 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 8 BYTES */ ┆
0x30f6c…30f8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30f8c…30f9b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x30f9b…30fea (31, 0, 39) 0x20[0x4f]
0x30fea…3100a (31, 0, 40) 44 43 4c 20 31 20 4b 4f 4e 54 52 4f 4c 32 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 KONTROL2, ┆
0x3100a…3102a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3102a…31039 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31039…31059 (31, 0, 41) 20 20 20 20 20 20 32 20 41 4e 54 41 4c 50 32 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 ┆ 2 ANTALP2 BINARY, ┆
0x31059…31079 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31079…31088 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31088…310a8 (31, 0, 42) 20 20 20 20 20 20 32 20 44 41 54 55 4d 32 20 43 48 41 52 28 36 29 3b 20 20 20 20 20 20 20 20 20 ┆ 2 DATUM2 CHAR(6); ┆
0x310a8…310c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x310c8…310d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x310d7…310f7 (31, 0, 43) 20 20 20 20 2f 2a 20 38 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 8 BYTES */ ┆
0x310f7…31117 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31117…31126 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31126…31175 (31, 0, 44) 0x20[0x4f]
0x31175…31195 (31, 0, 45) 44 43 4c 20 31 20 46 53 54 52 31 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 FSTR1, ┆
0x31195…311b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x311b5…311c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x311c4…311e4 (31, 0, 46) 20 20 20 20 20 20 32 20 56 45 52 49 4e 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 VERIN FILE; ┆
0x311e4…31204 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31204…31213 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31213…31262 (31, 0, 47) 0x20[0x4f]
0x31262…31282 (31, 0, 48) 44 43 4c 20 31 20 46 53 54 52 32 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 FSTR2, ┆
0x31282…312a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x312a2…312b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x312b1…312d1 (31, 0, 49) 20 20 20 20 20 20 32 20 56 45 52 55 54 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 VERUT FILE; ┆
0x312d1…312f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x312f1…31300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31300…3134f (31, 0, 50) 0x20[0x4f]
0x3134f…3136f (31, 0, 51) 44 43 4c 20 31 20 46 53 54 52 33 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 FSTR3, ┆
0x3136f…3138f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3138f…3139e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3139e…313be (31, 0, 52) 20 20 20 20 20 20 32 20 4b 4f 4e 54 52 4f 4c 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 KONTROL FILE; ┆
0x313be…313de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x313de…313ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x313ed…3143c (31, 0, 53) 0x20[0x4f]
0x3143c…3145c (31, 0, 54) 44 43 4c 20 31 20 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 STR, ┆
0x3145c…3147c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3147c…3148b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3148b…314ab (31, 0, 55) 20 20 20 20 20 20 32 20 58 4e 20 43 48 41 52 28 32 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 XN CHAR(24); ┆
0x314ab…314cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x314cb…314da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x314da…31529 (31, 0, 56) 0x20[0x4f]
0x31529…31549 (31, 0, 57) 44 43 4c 20 31 20 41 52 45 41 49 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 AREAIN, ┆
0x31549…31569 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31569…31578 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31578…31598 (31, 0, 58) 20 20 20 20 20 20 32 20 43 48 49 4e 28 32 35 35 29 20 43 48 41 52 28 33 34 29 3b 20 20 20 20 20 ┆ 2 CHIN(255) CHAR(34); ┆
0x31598…315b8 2f 2a 20 49 4e 4c 5b 53 4e 49 4e 47 53 41 52 45 41 20 46 5c 52 20 4b 4f 50 49 41 20 2a 2f 20 20 ┆/* INLÄSNINGSAREA FÖR KOPIA */ ┆
0x315b8…315c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x315c7…315e7 (31, 0, 59) 20 20 20 20 2f 2a 20 38 20 36 37 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 8 670 BYTES */ ┆
0x315e7…31607 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31607…31616 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31616…31665 (31, 0, 60) 0x20[0x4f]
0x31665…31685 (31, 0, 61) 44 43 4c 20 31 20 54 4f 50 41 52 45 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 TOPAREA, ┆
0x31685…316a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x316a5…316b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x316b4…316d4 (31, 0, 62) 20 20 20 20 20 20 32 20 43 48 31 28 39 30 29 20 43 48 41 52 28 36 31 29 3b 20 20 20 20 2f 2a 20 ┆ 2 CH1(90) CHAR(61); /* ┆
0x316d4…316f4 39 30 20 47 47 52 20 35 20 3d 20 34 35 30 20 41 52 42 45 54 53 41 52 45 41 20 46 5c 52 20 53 45 ┆90 GGR 5 = 450 ARBETSAREA FÖR SE┆
0x316f4…31703 4b 56 45 4e 53 45 52 20 2a 2f 20 20 20 20 20 ┆KVENSER */ ┆
0x31703…31723 (31, 0, 63) 20 20 20 20 2f 2a 20 35 20 34 39 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 5 490 BYTES */ ┆
0x31723…31743 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31743…31752 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31752…317a1 (31, 0, 64) 0x20[0x4f]
0x317a1…317c1 (31, 0, 65) 44 43 4c 20 31 20 41 52 45 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 AREA, ┆
0x317c1…317e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x317e1…317f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x317f0…31810 (31, 0, 66) 20 20 20 20 20 20 32 20 43 48 32 28 32 30 35 29 20 43 48 41 52 28 36 31 29 2c 20 20 20 20 20 2f ┆ 2 CH2(205) CHAR(61), /┆
0x31810…31830 2a 20 49 4e 4c 5b 53 4e 49 4e 47 20 56 45 52 42 45 4c 4f 50 20 2a 2f 20 20 20 20 20 20 20 20 20 ┆* INLÄSNING VERBELOP */ ┆
0x31830…3183f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3183f…3185f (31, 0, 67) 20 20 20 20 56 45 52 4c 20 42 49 4e 41 52 59 20 49 4e 49 54 28 36 31 29 3b 20 20 20 20 20 20 20 ┆ VERL BINARY INIT(61); ┆
0x3185f…3187f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3187f…3188e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3188e…318ae (31, 0, 68) 20 20 20 20 2f 2a 20 31 32 20 35 30 35 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 ┆ /* 12 505 BYTES */ ┆
0x318ae…318ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x318ce…318dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x318dd…3192c (31, 0, 69) 0x20[0x4f]
0x3192c…3194c (31, 0, 70) 44 43 4c 20 4e 52 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL NR BINARY, ┆
0x3194c…3196c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3196c…3197b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3197b…3199b (31, 0, 71) 20 20 20 20 54 31 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T1 CHAR(1), ┆
0x3199b…319bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x319bb…319ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x319ca…319ea (31, 0, 72) 20 20 20 20 54 36 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T6 CHAR(6), ┆
0x319ea…31a0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31a0a…31a19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31a19…31a39 (31, 0, 73) 20 20 20 20 54 31 31 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T11 CHAR(11), ┆
0x31a39…31a59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31a59…31a68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31a68…31a88 (31, 0, 74) 20 20 20 20 46 58 35 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FX5 FIXED(5), ┆
0x31a88…31aa8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31aa8…31ab7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31ab7…31ad7 (31, 0, 75) 20 20 20 20 50 31 20 43 48 41 52 28 38 29 20 49 4e 49 54 28 27 2d 2d 2d 2d 2d 2d 2d 39 27 29 2c ┆ P1 CHAR(8) INIT('-------9'),┆
0x31ad7…31af7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31af7…31b06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31b06…31b26 (31, 0, 76) 20 20 20 20 46 49 4c 54 41 42 28 34 29 20 43 48 41 52 28 31 30 29 20 49 4e 49 54 28 27 20 20 4b ┆ FILTAB(4) CHAR(10) INIT(' K┆
0x31b26…31b46 37 31 20 20 20 20 20 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆71 ', ┆
0x31b46…31b55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31b55…31b75 (31, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 20 20 4b ┆ ' K┆
0x31b75…31b95 38 31 20 20 20 20 20 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆81 ', ┆
0x31b95…31ba4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31ba4…31bc4 (31, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 20 20 4b ┆ ' K┆
0x31bc4…31be4 39 31 20 20 20 20 20 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆91 ', ┆
0x31be4…31bf3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31bf3…31c13 (31, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 20 20 56 ┆ ' V┆
0x31c13…31c33 45 52 42 45 4c 4f 50 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ERBELOP'), ┆
0x31c33…31c42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31c42…31c62 (31, 0, 80) 20 20 20 20 4d 41 58 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 45 ┆ MAXT BINARY, /* NE┆
0x31c62…31c82 44 52 5b 4b 4e 49 4e 47 20 41 56 20 52 45 53 54 2e 20 41 4e 54 41 4c 20 52 45 43 4f 52 44 53 20 ┆DRÄKNING AV REST. ANTAL RECORDS ┆
0x31c82…31c91 49 20 4b 4f 50 49 41 20 2a 2f 20 20 20 20 20 ┆I KOPIA */ ┆
0x31c91…31cb1 (31, 0, 81) 20 20 20 20 4d 41 58 56 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MAXV BINARY, ┆
0x31cb1…31cd1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31cd1…31ce0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31ce0…31d00 (32, 0, 0) 20 20 20 20 52 43 4f 44 45 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE BINARY, ┆
0x31d00…31d20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31d20…31d2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31d2f…31d4f (32, 0, 1) 20 20 20 20 46 41 53 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 2f 2a 20 30 20 3d 20 ┆ FAS BINARY INIT(0), /* 0 = ┆
0x31d4f…31d6f 53 54 41 52 54 2c 20 31 20 3d 20 54 52 20 3c 20 52 45 47 2c 20 32 20 3d 20 54 52 20 3d 20 52 45 ┆START, 1 = TR < REG, 2 = TR = RE┆
0x31d6f…31d7e 47 2c 20 33 20 3d 20 54 52 3e 52 45 47 2a 2f ┆G, 3 = TR>REG*/┆
0x31d7e…31d9e (32, 0, 2) 20 20 20 20 4b 4f 50 49 41 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KOPIA FILE, ┆
0x31d9e…31dbe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31dbe…31dcd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31dcd…31ded (32, 0, 3) 20 20 20 20 41 4e 54 41 4c 42 50 20 42 49 4e 41 52 59 20 49 4e 49 54 28 2d 31 29 2c 20 20 20 20 ┆ ANTALBP BINARY INIT(-1), ┆
0x31ded…31e0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31e0d…31e1c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31e1c…31e3c (32, 0, 4) 20 20 20 20 41 4e 54 41 4c 54 50 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 ┆ ANTALTP BINARY INIT(0), ┆
0x31e3c…31e5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31e5c…31e6b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31e6b…31e8b (32, 0, 5) 20 20 20 20 41 4e 54 41 4c 54 4f 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTALTOT BINARY, ┆
0x31e8b…31eab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31eab…31eba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31eba…31eda (32, 0, 6) 20 20 20 20 4a 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 45 44 52 ┆ JT BINARY, /* NEDR┆
0x31eda…31efa 5b 4b 4e 49 4f 4e 47 20 41 56 20 41 4e 54 41 4c 20 4c 45 44 49 47 41 20 52 45 43 4f 52 44 53 20 ┆ÄKNIONG AV ANTAL LEDIGA RECORDS ┆
0x31efa…31f09 49 20 41 52 45 41 49 4e 20 2a 2f 20 20 20 20 ┆I AREAIN */ ┆
0x31f09…31f29 (32, 0, 7) 20 20 20 20 4a 56 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ JV BINARY INIT(0), ┆
0x31f29…31f49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31f49…31f58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31f58…31f78 (32, 0, 8) 20 20 20 20 48 41 45 4c 4e 52 20 42 49 4e 41 52 59 20 49 4e 49 54 28 35 29 2c 20 20 20 20 20 20 ┆ HAELNR BINARY INIT(5), ┆
0x31f78…31f98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31f98…31fa7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31fa7…31fc7 (32, 0, 9) 20 20 20 20 48 41 45 4c 4e 52 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ HAELNRT BINARY, ┆
0x31fc7…31fe7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31fe7…31ff6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x31ff6…32016 (32, 0, 10) 20 20 20 20 54 50 4f 53 54 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 2f 2a 20 55 52 ┆ TPOSTANT BINARY, /* UR┆
0x32016…32036 53 50 52 55 4e 47 4c 49 47 54 20 41 4e 54 41 4c 20 52 45 43 4f 52 44 20 49 20 4b 4f 50 49 41 20 ┆SPRUNGLIGT ANTAL RECORD I KOPIA ┆
0x32036…32045 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆*/ ┆
0x32045…32065 (32, 0, 11) 20 20 20 20 4c 4f 41 44 54 45 58 54 20 43 48 41 52 28 31 30 30 29 2c 20 20 20 20 20 20 20 20 20 ┆ LOADTEXT CHAR(100), ┆
0x32065…32085 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32085…32094 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32094…320b4 (32, 0, 12) 20 20 20 20 46 45 4c 54 41 42 28 31 30 29 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 20 20 20 ┆ FELTAB(10) CHAR(47) INIT( ┆
0x320b4…320d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x320d4…320e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x320e3…32103 (32, 0, 13) 20 20 20 20 27 53 45 4b 54 4f 52 20 48 45 41 44 45 52 20 4e 4f 54 20 46 4f 55 4e 44 27 2c 20 20 ┆ 'SEKTOR HEADER NOT FOUND', ┆
0x32103…32123 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32123…32132 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32132…32152 (32, 0, 14) 20 20 20 20 27 52 45 41 44 20 45 52 52 4f 52 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'READ ERROR', ┆
0x32152…32172 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32172…32181 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32181…321a1 (32, 0, 15) 20 20 20 20 27 57 52 49 54 45 20 45 52 52 4f 52 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'WRITE ERROR', ┆
0x321a1…321c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x321c1…321d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x321d0…321f0 (32, 0, 16) 20 20 20 20 27 4b 45 59 20 4e 4f 54 20 46 4f 55 4e 44 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'KEY NOT FOUND', ┆
0x321f0…32210 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32210…3221f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3221f…3223f (32, 0, 17) 20 20 20 20 27 4e 5d 47 4f 4e 20 44 49 53 4b 45 54 54 20 48 41 52 20 46 4c 59 54 54 41 54 53 27 ┆ 'NÅGON DISKETT HAR FLYTTATS'┆
0x3223f…3225f 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, ┆
0x3225f…3226e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3226e…3228e (32, 0, 18) 20 20 20 20 27 45 4e 20 41 56 20 46 49 4c 45 52 4e 41 20 5b 52 20 46 5c 52 20 4c 49 54 45 4e 27 ┆ 'EN AV FILERNA ÄR FÖR LITEN'┆
0x3228e…322ae 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, ┆
0x322ae…322bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x322bd…322dd (32, 0, 19) 20 20 20 20 27 45 4e 20 41 56 20 46 49 4c 45 52 4e 41 20 5b 52 20 53 4b 52 49 56 53 4b 59 44 44 ┆ 'EN AV FILERNA ÄR SKRIVSKYDD┆
0x322dd…322fd 41 44 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AD'), ┆
0x322fd…3230c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3230c…3232c (32, 0, 20) 20 20 20 20 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ P POINTER, ┆
0x3232c…3234c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3234c…3235b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3235b…3237b (32, 0, 21) 20 20 20 20 44 20 42 41 53 45 44 28 50 29 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 ┆ D BASED(P) CHAR(6), ┆
0x3237b…3239b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3239b…323aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x323aa…323ca (32, 0, 22) 20 20 20 20 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM CHAR(6), ┆
0x323ca…323ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x323ea…323f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x323f9…32419 (32, 0, 23) 20 20 20 20 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PP POINTER, ┆
0x32419…32439 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32439…32448 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32448…32468 (32, 0, 24) 20 20 20 20 31 20 53 54 52 58 20 42 41 53 45 44 28 50 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 STRX BASED(PP), ┆
0x32468…32488 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32488…32497 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32497…324b7 (32, 0, 25) 20 20 20 20 20 20 32 20 58 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 X CHAR(2), ┆
0x324b7…324d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x324d7…324e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x324e6…32506 (32, 0, 26) 20 20 20 20 20 20 32 20 59 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 Y CHAR(2), ┆
0x32506…32526 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32526…32535 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32535…32555 (32, 0, 27) 20 20 20 20 20 20 32 20 46 49 52 4d 41 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIRMA CHAR(1), ┆
0x32555…32575 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32575…32584 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32584…325a4 (32, 0, 28) 20 20 20 20 20 20 20 20 32 20 20 4f 50 5f 4b 4f 44 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 ┆ 2 OP_KOD BINARY, ┆
0x325a4…325c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x325c4…325d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x325d3…325f3 (32, 0, 29) 20 20 20 20 20 20 20 20 32 20 20 52 41 44 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 ┆ 2 RADANT BINARY, ┆
0x325f3…32613 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32613…32622 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32622…32642 (32, 0, 30) 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 27 20 20 56 37 20 ┆ VERSION CHAR(47) INIT(' V7 ┆
0x32642…32662 56 65 72 73 69 6f 6e 20 31 2e 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆Version 1.6 ┆
0x32662…32671 20 20 20 20 38 33 31 30 31 31 27 29 3b 20 20 ┆ 831011'); ┆
0x32671…326c0 (32, 0, 31) 0x20[0x4f]
[…0x2…]
0x3275e…3277e (32, 0, 34) 44 49 53 4b 45 54 54 4b 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DISKETTK:PROC; ┆
0x3277e…3279e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3279e…327ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x327ad…327cd (32, 0, 35) 20 20 20 20 20 20 20 20 58 4e 3d 46 49 4c 54 41 42 28 46 49 52 4d 41 2d 27 36 27 29 3b 20 20 20 ┆ XN=FILTAB(FIRMA-'6'); ┆
0x327cd…327ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x327ed…327fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x327fc…3281c (32, 0, 36) 44 30 3a 20 20 20 20 20 46 53 54 52 33 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆D0: FSTR3=STR; ┆
0x3281c…3283c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3283c…3284b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3284b…3286b (32, 0, 37) 20 20 20 20 20 20 20 20 49 3d 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=3; ┆
0x3286b…3288b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3288b…3289a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3289a…328ba (32, 0, 38) 44 31 3a 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 49 29 3b 20 20 20 20 20 20 20 20 20 ┆D1: CALL CHOOSE(I); ┆
0x328ba…328da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x328da…328e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x328e9…32909 (32, 0, 39) 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 46 45 4c 31 3b 20 20 20 20 ┆ ON ERROR GO TO FEL1; ┆
0x32909…32929 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32929…32938 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32938…32958 (32, 0, 40) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 4f 4e 54 52 4f 4c 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN KONTROL; ┆
0x32958…32978 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32978…32987 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32987…329a7 (32, 0, 41) 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 46 45 4c 32 3b 20 20 ┆ ON ENDFILE GO TO FEL2; ┆
0x329a7…329c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x329c7…329d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x329d6…329f6 (32, 0, 42) 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 4b 4f 4e 54 52 4f 4c 29 20 49 4e 54 4f 28 ┆ READ FILE(KONTROL) INTO(┆
0x329f6…32a16 4b 4f 4e 54 52 4f 4c 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTROL2); ┆
0x32a16…32a25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32a25…32a45 (32, 0, 43) 44 32 3a 20 20 20 20 20 49 46 20 49 3d 34 20 54 48 45 4e 20 47 4f 20 54 4f 20 44 33 3b 20 20 20 ┆D2: IF I=4 THEN GO TO D3; ┆
0x32a45…32a65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32a65…32a74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32a74…32a94 (32, 0, 44) 20 20 20 20 20 20 20 20 49 3d 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=4; ┆
0x32a94…32ab4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32ab4…32ac3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32ac3…32ae3 (32, 0, 45) 20 20 20 20 20 20 20 20 4b 4f 4e 54 52 4f 4c 31 3d 4b 4f 4e 54 52 4f 4c 32 3b 20 20 20 20 20 20 ┆ KONTROL1=KONTROL2; ┆
0x32ae3…32b03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32b03…32b12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32b12…32b32 (32, 0, 46) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 44 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO D1; ┆
0x32b32…32b52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32b52…32b61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32b61…32b81 (32, 0, 47) 46 45 4c 31 3a 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆FEL1: PUT FILE(D) SKIP EDIT(VE┆
0x32b81…32ba1 52 53 49 4f 4e 29 28 41 28 39 36 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RSION)(A(96)) ┆
0x32ba1…32bb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32bb0…32bd0 (32, 0, 48) 20 20 20 20 20 20 20 20 28 27 44 69 73 6b 65 74 74 20 6d 65 64 20 56 45 52 42 45 4c 4f 50 20 66 ┆ ('Diskett med VERBELOP f┆
0x32bd0…32bf0 69 6e 6e 73 20 69 6e 74 65 20 69 20 64 72 69 76 65 27 29 28 41 28 34 30 29 29 20 20 20 20 20 20 ┆inns inte i drive')(A(40)) ┆
0x32bf0…32bff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32bff…32c1f (32, 0, 49) 20 20 20 20 20 20 20 20 28 49 29 28 41 28 37 29 29 28 27 53 7b 74 74 20 69 6e 20 72 7b 74 74 20 ┆ (I)(A(7))('Sätt in rätt ┆
0x32c1f…32c3f 64 69 73 6b 65 74 74 2c 20 74 72 79 63 6b 20 20 22 52 45 54 55 52 4e 22 27 29 28 41 28 34 37 29 ┆diskett, tryck "RETURN"')(A(47)┆
0x32c3f…32c4e 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x32c4e…32c6e (32, 0, 50) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x32c6e…32c8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32c8e…32c9d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32c9d…32cbd (32, 0, 51) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(''); ┆
0x32cbd…32cdd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32cdd…32cec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32cec…32d0c (32, 0, 52) 20 20 20 20 20 20 20 20 49 3d 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=3; ┆
0x32d0c…32d2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32d2c…32d3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32d3b…32d5b (32, 0, 53) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 44 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO D1; ┆
0x32d5b…32d7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32d7b…32d8a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32d8a…32dd9 (32, 0, 54) 0x20[0x4f]
0x32dd9…32df9 (32, 0, 55) 46 45 4c 32 3a 20 20 20 41 4e 54 41 4c 50 32 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FEL2: ANTALP2=0; ┆
0x32df9…32e19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32e19…32e28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32e28…32e48 (32, 0, 56) 20 20 20 20 20 20 20 20 44 41 54 55 4d 32 3d 27 2a 2a 2a 2a 2a 2a 27 3b 20 20 20 20 20 20 20 20 ┆ DATUM2='******'; ┆
0x32e48…32e68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32e68…32e77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32e77…32e97 (32, 0, 57) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 44 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO D2; ┆
0x32e97…32eb7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32eb7…32ec6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x32ec6…32f15 (32, 0, 58) 0x20[0x4f]
0x32f15…32f35 (32, 0, 59) 44 33 3a 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆D3: PUT FILE(D) SKIP EDIT(VE┆
0x32f35…32f55 52 53 49 4f 4e 29 28 41 28 39 36 29 29 28 27 53 45 4e 41 53 54 45 20 42 41 54 43 48 44 41 54 55 ┆RSION)(A(96))('SENASTE BATCHDATU┆
0x32f55…32f64 4d 27 29 28 41 28 34 37 29 29 20 20 20 20 20 ┆M')(A(47)) ┆
0x32f64…32f84 (32, 0, 60) 20 20 20 20 20 20 20 20 28 27 49 4e 44 49 53 4b 45 54 54 27 29 28 41 28 31 30 29 29 28 44 41 54 ┆ ('INDISKETT')(A(10))(DAT┆
0x32f84…32fa4 55 4d 31 29 28 41 28 33 37 29 29 28 27 55 54 44 49 53 4b 45 54 54 27 29 28 41 28 31 30 29 29 28 ┆UM1)(A(37))('UTDISKETT')(A(10))(┆
0x32fa4…32fb3 44 41 54 55 4d 32 29 28 41 28 33 37 29 29 20 ┆DATUM2)(A(37)) ┆
0x32fb3…32fd3 (32, 0, 61) 20 20 20 20 20 20 20 20 28 27 4f 4d 20 4f 4b 20 53 56 41 52 41 20 22 4a 22 27 29 28 41 28 34 37 ┆ ('OM OK SVARA "J"')(A(47┆
0x32fd3…32ff3 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)); ┆
0x32ff3…33002 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33002…33022 (32, 0, 62) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x33022…33042 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33042…33051 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33051…33071 (32, 0, 63) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 54 31 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(T1); ┆
0x33071…33091 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33091…330a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x330a0…330c0 (32, 0, 64) 20 20 20 20 20 20 20 20 49 46 20 54 31 7f 3d 27 4a 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 44 30 ┆ IF T1 ='J' THEN GO TO D0┆
0x330c0…330e0 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x330e0…330ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x330ef…3310f (32, 0, 65) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 50 32 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTALP2=0; ┆
0x3310f…3312f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3312f…3313e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3313e…3315e (32, 0, 66) 20 20 20 20 20 20 20 20 58 4e 3d 46 49 4c 54 41 42 20 28 34 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ XN=FILTAB (4); ┆
0x3315e…3317e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3317e…3318d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3318d…331ad (32, 0, 67) 20 20 20 20 20 20 20 20 46 53 54 52 31 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR1=STR; ┆
0x331ad…331cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x331cd…331dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x331dc…331fc (32, 0, 68) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3321c…3322b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3322b…3324b (32, 0, 69) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 49 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(I); ┆
0x3324b…3326b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3326b…3327a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3327a…3329a (32, 0, 70) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 56 45 52 49 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN VERIN; ┆
0x3329a…332ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x332ba…332c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x332c9…332e9 (32, 0, 71) 20 20 20 20 20 20 20 20 46 53 54 52 32 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR2=STR; ┆
0x332e9…33309 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33309…33318 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33318…33338 (32, 0, 72) 20 20 20 20 20 20 20 20 49 3d 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=4; ┆
0x33338…33358 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33358…33367 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33367…33387 (32, 0, 73) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 49 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(I); ┆
0x33387…333a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x333a7…333b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x333b6…333d6 (32, 0, 74) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 56 45 52 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN VERUT; ┆
0x333d6…333f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x333f6…33405 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33405…33425 (32, 0, 75) 20 20 20 20 20 20 20 20 49 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=0; ┆
0x33425…33445 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33445…33454 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33454…33474 (32, 0, 76) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 49 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(I); ┆
0x33474…33494 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33494…334a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x334a3…334c3 (32, 0, 77) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 56 45 52 49 4e 29 3b 20 20 20 20 20 20 20 ┆ CALL SEOF(VERIN); ┆
0x334c3…334e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x334e3…334f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x334f2…33512 (32, 0, 78) 20 20 20 20 20 20 20 20 4d 41 58 56 3d 55 4e 53 50 45 43 28 56 45 52 49 4e 29 3b 20 20 20 20 20 ┆ MAXV=UNSPEC(VERIN); ┆
0x33512…33532 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33532…33541 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33541…33561 (32, 0, 79) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 49 4e 29 3d 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(VERIN)=0; ┆
0x33561…33581 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33581…33590 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33590…335b0 (32, 0, 80) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x335b0…335d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x335d0…335df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x335df…335ff (32, 0, 81) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x335ff…3361f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3361f…3362e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3362e…3367d (33, 0, 0) 0x20[0x4f]
0x3367d…3369d (33, 0, 1) 4f 50 45 4e 54 52 41 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OPENTRAN:PROC; ┆
0x3369d…336bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x336bd…336cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x336cc…336ec (33, 0, 2) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 4f 50 49 41 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN KOPIA; ┆
0x336ec…3370c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3370c…3371b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3371b…3373b (33, 0, 3) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 4b 4f 50 49 41 29 3b 20 20 20 20 20 20 20 ┆ CALL SEOF(KOPIA); ┆
0x3373b…3375b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3375b…3376a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3376a…3378a (33, 0, 4) 20 20 20 20 20 20 20 20 4d 41 58 54 3d 55 4e 53 50 45 43 28 4b 4f 50 49 41 29 3b 20 20 20 20 20 ┆ MAXT=UNSPEC(KOPIA); ┆
0x3378a…337aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x337aa…337b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x337b9…337d9 (33, 0, 5) 20 20 20 20 20 20 20 20 54 50 4f 53 54 41 4e 54 3d 4d 41 58 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ TPOSTANT=MAXT; ┆
0x337d9…337f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x337f9…33808 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33808…33828 (33, 0, 6) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 4b 4f 50 49 41 29 3d 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(KOPIA)=0; ┆
0x33828…33848 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33848…33857 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33857…33877 (33, 0, 7) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x33877…33897 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33897…338a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x338a6…338c6 (33, 0, 8) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x338c6…338e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x338e6…338f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x338f5…33944 (33, 0, 9) 0x20[0x4f]
0x33944…33964 (33, 0, 10) 54 52 41 4e 53 50 4f 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TRANSPOST:PROC; ┆
0x33964…33984 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33984…33993 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33993…339b3 (33, 0, 11) 44 43 4c 20 41 4e 54 41 4c 49 4e 50 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 3b 20 20 20 20 ┆DCL ANTALINP BINARY INIT(0); ┆
0x339b3…339d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x339d3…339e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x339e2…33a02 (33, 0, 12) 20 20 20 20 20 20 20 20 49 46 20 28 4d 41 58 54 3e 30 29 20 7c 20 28 41 4e 54 41 4c 49 4e 50 3e ┆ IF (MAXT>0) ö (ANTALINP>┆
0x33a02…33a22 30 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆0) THEN DO; ┆
0x33a22…33a31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33a31…33a51 (33, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 4e 54 41 4c 49 4e 50 3d 30 20 54 48 45 4e 20 44 4f ┆ IF ANTALINP=0 THEN DO┆
0x33a51…33a71 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x33a71…33a80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33a80…33aa0 (33, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 54 3d 32 35 35 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ JT=255; ┆
0x33aa0…33ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33ac0…33acf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33acf…33aef (33, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 54 3e 4d 41 58 54 20 54 48 45 4e 20 4a 54 ┆ IF JT>MAXT THEN JT┆
0x33aef…33b0f 3d 4d 41 58 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=MAXT; ┆
0x33b0f…33b1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33b1e…33b3e (33, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 41 58 54 3d 4d 41 58 54 2d 4a 54 3b 20 20 20 20 20 ┆ MAXT=MAXT-JT; ┆
0x33b3e…33b5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33b5e…33b6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33b6d…33b8d (33, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 4b 4f 50 49 41 2c 41 52 45 41 ┆ CALL RD(KOPIA,AREA┆
0x33b8d…33bad 49 4e 2c 4a 54 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IN,JT,RCODE); ┆
0x33bad…33bbc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33bbc…33bdc (33, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 ┆ IF RCODE =0 THEN P┆
0x33bdc…33bfc 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 4b 4f 50 49 41 27 2c 52 43 ┆UT SKIP LIST('LÄSFEL I KOPIA',RC┆
0x33bfc…33c0b 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ODE); ┆
0x33c0b…33c2b (33, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 49 4e 50 3d 4a 54 2d 31 3b 20 20 20 20 ┆ ANTALINP=JT-1; ┆
0x33c2b…33c4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33c4b…33c5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33c5a…33c7a (33, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 54 3c 32 35 35 20 54 48 45 4e 20 44 4f 3b ┆ IF JT<255 THEN DO;┆
0x33c7a…33c9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33c9a…33ca9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33ca9…33cc9 (33, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 49 4e 50 29 3d 41 44 44 ┆ UNSPEC(INP)=ADD┆
0x33cc9…33ce9 52 28 41 52 45 41 49 4e 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R(AREAIN); ┆
0x33ce9…33cf8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33cf8…33d18 (33, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 49 4e 50 29 3d 55 4e 53 ┆ UNSPEC(INP)=UNS┆
0x33d18…33d38 50 45 43 28 49 4e 50 29 2b 4a 54 2a 54 52 41 4e 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PEC(INP)+JT*TRANL; ┆
0x33d38…33d47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33d47…33d67 (33, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 54 3d 27 39 39 39 39 39 39 39 ┆ KONTOT='9999999┆
0x33d67…33d87 39 39 39 39 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆9999'; ┆
0x33d87…33d96 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33d96…33db6 (33, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x33db6…33dd6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33dd6…33de5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33de5…33e05 (33, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 4e 50 3d 41 44 44 52 28 41 52 45 41 49 4e 29 3b 20 ┆ INP=ADDR(AREAIN); ┆
0x33e05…33e25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33e25…33e34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33e34…33e54 (33, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x33e54…33e74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33e74…33e83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33e83…33ea3 (33, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x33ea3…33ec3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33ec3…33ed2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33ed2…33ef2 (33, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 49 4e 50 3d 41 4e 54 41 4c 49 4e 50 2d ┆ ANTALINP=ANTALINP-┆
0x33ef2…33f12 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x33f12…33f21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33f21…33f41 (33, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 49 4e 50 29 3d 55 4e 53 50 45 43 ┆ UNSPEC(INP)=UNSPEC┆
0x33f41…33f61 28 49 4e 50 29 2b 54 52 41 4e 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(INP)+TRANL; ┆
0x33f61…33f70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33f70…33f90 (33, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x33f90…33fb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33fb0…33fbf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33fbf…33fdf (33, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 54 31 31 3d 4b 4f 4e 54 4f 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ T11=KONTOT; ┆
0x33fdf…33fff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x33fff…3400e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3400e…3402e (33, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x3402e…3404e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3404e…3405d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3405d…3407d (33, 0, 33) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3407d…3409d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3409d…340ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x340ac…340cc (33, 0, 34) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x340cc…340ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x340ec…340fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x340fb…3411b (33, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 54 31 31 3d 27 39 39 39 39 39 39 39 39 39 39 39 27 3b 20 20 20 ┆ T11='99999999999'; ┆
0x3411b…3413b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3413b…3414a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3414a…3416a (33, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x3416a…3418a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3418a…34199 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34199…341b9 (33, 0, 37) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x341b9…341d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x341d9…341e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x341e8…34208 (33, 0, 38) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x34208…34228 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34228…34237 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34237…34286 (33, 0, 39) 0x20[0x4f]
0x34286…342a6 (33, 0, 40) 53 54 41 43 4b 42 59 47 47 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STACKBYGG:PROC; ┆
0x342a6…342c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x342c6…342d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x342d5…34324 (33, 0, 41) 0x20[0x4f]
0x34324…34344 (33, 0, 42) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 50 32 3d 41 4e 54 41 4c 50 32 2b 31 3b 20 20 20 20 20 20 ┆ ANTALP2=ANTALP2+1; ┆
0x34344…34364 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34364…34373 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34373…34393 (33, 0, 43) 20 20 20 20 20 20 20 20 49 46 20 48 41 45 4c 4e 52 54 3e 35 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆ IF HAELNRT>5 THEN DO; ┆
0x34393…343b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x343b3…343c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x343c2…343e2 (33, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 54 41 43 4b 50 54 29 3d 55 4e 53 50 45 ┆ UNSPEC(STACKPT)=UNSPE┆
0x343e2…34402 43 28 53 54 41 43 4b 50 54 29 2d 56 45 52 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆C(STACKPT)-VERL; ┆
0x34402…34411 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34411…34431 (33, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 48 41 45 4c 4e 52 54 3d 36 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ HAELNRT=6; ┆
0x34431…34451 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34451…34460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34460…34480 (33, 0, 46) 53 54 31 3a 20 20 20 20 20 20 20 48 41 45 4c 4e 52 54 3d 48 41 45 4c 4e 52 54 2d 31 3b 20 20 20 ┆ST1: HAELNRT=HAELNRT-1; ┆
0x34480…344a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x344a0…344af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x344af…344cf (33, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 48 41 45 4c 50 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(HAELP)=UNSPEC(┆
0x344cf…344ef 53 54 41 43 4b 50 54 29 2b 56 45 52 4c 2d 48 41 45 4c 4e 52 54 2a 48 41 45 4c 4c 3b 20 20 20 20 ┆STACKPT)+VERL-HAELNRT*HAELL; ┆
0x344ef…344fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x344fe…3451e (33, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 48 41 45 4c 4e 52 54 3d 31 20 54 48 45 4e 20 47 4f 20 ┆ IF HAELNRT=1 THEN GO ┆
0x3451e…3453e 54 4f 20 53 54 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO ST2; ┆
0x3453e…3454d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3454d…3456d (33, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 50 44 41 54 55 4d 56 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ PDATUMV=0; ┆
0x3456d…3458d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3458d…3459c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3459c…345bc (33, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 56 45 52 4e 52 56 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ VERNRV=0; ┆
0x345bc…345dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x345dc…345eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x345eb…3460b (33, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 42 45 4c 4f 50 50 56 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ BELOPPV=0; ┆
0x3460b…3462b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3462b…3463a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3463a…3465a (33, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO ST1; ┆
0x3465a…3467a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3467a…34689 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34689…346a9 (33, 0, 53) 53 54 32 3a 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 56 3d 54 31 31 3b 20 20 20 20 20 20 20 20 ┆ST2: KONTONRV=T11; ┆
0x346a9…346c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x346c9…346d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x346d8…346f8 (33, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 54 50 3d 41 4e 54 41 4c 54 50 2b 31 3b 20 20 20 ┆ ANTALTP=ANTALTP+1; ┆
0x346f8…34718 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34718…34727 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34727…34747 (33, 0, 55) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x34747…34767 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34767…34776 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34776…34796 (33, 0, 56) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x34796…347b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x347b6…347c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x347c5…347e5 (33, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 48 41 45 4c 50 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(HAELP)=UNSPEC(┆
0x347e5…34805 53 54 41 43 4b 50 54 29 2b 56 45 52 4c 2d 48 41 45 4c 4e 52 54 2a 48 41 45 4c 4c 3b 20 20 20 20 ┆STACKPT)+VERL-HAELNRT*HAELL; ┆
0x34805…34814 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34814…34834 (33, 0, 58) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x34834…34854 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34854…34863 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34863…34883 (33, 0, 59) 20 20 20 20 20 20 20 20 56 45 52 4e 52 56 3d 56 45 52 4e 52 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ VERNRV=VERNRT; ┆
0x34883…348a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x348a3…348b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x348b2…348d2 (33, 0, 60) 20 20 20 20 20 20 20 20 46 58 35 3d 50 44 41 54 55 4d 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FX5=PDATUMT; ┆
0x348d2…348f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x348f2…34901 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34901…34921 (33, 0, 61) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 46 58 54 4f 42 49 4e 28 46 58 35 2c 50 44 41 54 55 4d 56 ┆ CALL FXTOBIN(FX5,PDATUMV┆
0x34921…34941 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x34941…34950 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34950…34970 (33, 0, 62) 20 20 20 20 20 20 20 20 49 46 20 42 44 41 54 55 4d 54 7f 3d 50 44 41 54 55 4d 54 20 54 48 45 4e ┆ IF BDATUMT =PDATUMT THEN┆
0x34970…34990 20 50 44 41 54 55 4d 56 3d 2d 50 44 41 54 55 4d 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PDATUMV=-PDATUMV; ┆
0x34990…3499f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3499f…349bf (33, 0, 63) 20 20 20 20 20 20 20 20 42 45 4c 4f 50 50 56 3d 42 45 4c 4f 50 50 54 3b 20 20 20 20 20 20 20 20 ┆ BELOPPV=BELOPPT; ┆
0x349bf…349df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x349df…349ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x349ee…34a0e (33, 0, 64) 20 20 20 20 20 20 20 20 48 41 45 4c 4e 52 54 3d 48 41 45 4c 4e 52 54 2b 31 3b 20 20 20 20 20 20 ┆ HAELNRT=HAELNRT+1; ┆
0x34a0e…34a2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34a2e…34a3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34a3d…34a5d (33, 0, 65) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x34a5d…34a7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34a7d…34a8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34a8c…34aac (33, 0, 66) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x34aac…34acc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34acc…34adb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34adb…34b2a (33, 0, 67) 0x20[0x4f]
0x34b2a…34b4a (33, 0, 68) 53 4b 52 49 56 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV:PROC; ┆
0x34b4a…34b6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34b6a…34b79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34b79…34b99 (33, 0, 69) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 54 4f 54 3d 41 4e 54 41 4c 54 50 2b 41 4e 54 41 4c 42 50 ┆ ANTALTOT=ANTALTP+ANTALBP┆
0x34b99…34bb9 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x34bb9…34bc8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34bc8…34be8 (33, 0, 70) 20 20 20 20 20 20 20 20 49 46 20 41 4e 54 41 4c 54 4f 54 3d 30 20 54 48 45 4e 20 52 45 54 55 52 ┆ IF ANTALTOT=0 THEN RETUR┆
0x34be8…34c08 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆N; ┆
0x34c08…34c17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34c17…34c37 (33, 0, 71) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 57 52 28 56 45 52 55 54 2c 54 2c 41 4e 54 41 4c 54 4f 54 ┆ CALL WR(VERUT,T,ANTALTOT┆
0x34c37…34c57 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,RCODE); ┆
0x34c57…34c66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34c66…34c86 (33, 0, 72) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 ┆ IF RCODE =0 THEN PUT SKI┆
0x34c86…34ca6 50 20 4c 49 53 54 28 27 53 4b 52 49 56 46 45 4c 20 49 20 55 54 46 49 4c 45 4e 27 2c 52 43 4f 44 ┆P LIST('SKRIVFEL I UTFILEN',RCOD┆
0x34ca6…34cb5 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆E); ┆
0x34cb5…34cd5 (33, 0, 73) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 54 50 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTALTP=0; ┆
0x34cd5…34cf5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34cf5…34d04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34d04…34d24 (33, 0, 74) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 42 50 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTALBP=0; ┆
0x34d24…34d44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34d44…34d53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34d53…34d73 (33, 0, 75) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 54 41 43 4b 50 54 29 3d 55 4e 53 50 45 43 28 53 ┆ UNSPEC(STACKPT)=UNSPEC(S┆
0x34d73…34d93 54 41 43 4b 50 42 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TACKPB); ┆
0x34d93…34da2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34da2…34dc2 (33, 0, 76) 20 20 20 20 20 20 20 20 48 41 45 4c 4e 52 54 20 3d 20 48 41 45 4c 4e 52 3b 20 20 20 20 20 20 20 ┆ HAELNRT = HAELNR; ┆
0x34dc2…34de2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34de2…34df1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34df1…34e11 (33, 0, 77) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x34e11…34e31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34e31…34e40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34e40…34e60 (33, 0, 78) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x34e60…34e80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34e80…34e8f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34e8f…34ede (33, 0, 79) 0x20[0x4f]
0x34ede…34efe (33, 0, 80) 56 45 52 50 4f 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VERPOST:PROC; ┆
0x34efe…34f1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34f1e…34f2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34f2d…34f4d (33, 0, 81) 20 20 20 20 20 20 20 20 49 46 20 28 4d 41 58 56 3e 30 29 20 7c 20 28 4a 56 3e 30 29 20 54 48 45 ┆ IF (MAXV>0) ö (JV>0) THE┆
0x34f4d…34f6d 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆N DO; ┆
0x34f6d…34f7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34f7c…34f9c (34, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 56 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF JV=0 THEN DO; ┆
0x34f9c…34fbc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34fbc…34fcb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x34fcb…34feb (34, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 42 50 20 3d 20 41 4e 54 41 4c 42 50 20 ┆ ANTALBP = ANTALBP ┆
0x34feb…3500b 2b 20 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ 1; ┆
0x3500b…3501a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3501a…3503a (34, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 ┆ CALL SKRIV; ┆
0x3503a…3505a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3505a…35069 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35069…35089 (34, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 56 3d 32 30 30 3b 20 20 20 20 20 20 20 20 ┆ JV=200; ┆
0x35089…350a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x350a9…350b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x350b8…350d8 (34, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 56 3e 4d 41 58 56 20 54 48 45 4e ┆ IF JV>MAXV THEN┆
0x350d8…350f8 20 4a 56 3d 4d 41 58 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JV=MAXV; ┆
0x350f8…35107 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35107…35127 (34, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 41 58 56 3d 4d 41 58 56 2d 4a 56 3b 20 20 ┆ MAXV=MAXV-JV; ┆
0x35127…35147 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35147…35156 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35156…35176 (34, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 56 45 52 49 4e 2c 41 ┆ CALL RD(VERIN,A┆
0x35176…35196 52 45 41 2c 4a 56 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆REA,JV,RCODE); ┆
0x35196…351a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x351a5…351c5 (34, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 ┆ IF RCODE =0 THE┆
0x351c5…351e5 4e 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 49 4e 46 49 4c 27 ┆N PUT SKIP LIST('LÄSFEL I INFIL'┆
0x351e5…351f4 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 ┆,RCODE); ┆
0x351f4…35214 (34, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 56 3c 32 30 30 20 54 48 45 4e 20 ┆ IF JV<200 THEN ┆
0x35214…35234 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DO; ┆
0x35234…35243 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35243…35263 (34, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 43 4b 50 42 3d 41 44 44 52 ┆ STACKPB=ADDR┆
0x35263…35283 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(AREA); ┆
0x35283…35292 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35292…352b2 (34, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 54 41 43 4b ┆ UNSPEC(STACK┆
0x352b2…352d2 50 42 29 3d 55 4e 53 50 45 43 28 53 54 41 43 4b 50 42 29 2b 4a 56 2a 56 45 52 4c 3b 20 20 20 20 ┆PB)=UNSPEC(STACKPB)+JV*VERL; ┆
0x352d2…352e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x352e1…35301 (34, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 42 3d 27 39 39 ┆ KONTONRB='99┆
0x35301…35321 39 39 39 39 39 39 39 39 39 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆999999999'; ┆
0x35321…35330 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35330…35350 (34, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x35350…35370 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35370…3537f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3537f…3539f (34, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 4a 56 20 3d 20 31 39 39 3b 20 20 ┆ ELSE DO; JV = 199; ┆
0x3539f…353bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x353bf…353ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x353ce…353ee (34, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x353ee…3540e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3540e…3541d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3541d…3543d (34, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 43 4b 50 42 3d 41 44 44 52 28 41 52 ┆ STACKPB=ADDR(AR┆
0x3543d…3545d 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EA); ┆
0x3545d…3546c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3546c…3548c (34, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 43 4b 50 54 3d 41 44 44 52 28 41 52 ┆ STACKPT=ADDR(AR┆
0x3548c…354ac 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EA); ┆
0x354ac…354bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x354bb…354db (34, 0, 17) 56 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆V0: ┆
0x354db…354fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x354fb…3550a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3550a…3552a (34, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3552a…3554a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3554a…35559 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35559…35579 (34, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x35579…35599 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35599…355a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x355a8…355c8 (34, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 54 41 43 4b 50 42 29 3d 55 4e ┆ UNSPEC(STACKPB)=UN┆
0x355c8…355e8 53 50 45 43 28 53 54 41 43 4b 50 42 29 2b 56 45 52 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SPEC(STACKPB)+VERL; ┆
0x355e8…355f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x355f7…35617 (34, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 42 50 3d 41 4e 54 41 4c 42 50 2b 31 3b ┆ ANTALBP=ANTALBP+1;┆
0x35617…35637 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35637…35646 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35646…35666 (34, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 56 3d 4a 56 2d 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ JV=JV-1; ┆
0x35666…35686 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35686…35695 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35695…356b5 (34, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x356b5…356d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x356d5…356e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x356e4…35704 (34, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 42 20 7f 3d 20 27 39 39 39 39 39 ┆ IF KONTONRB = '99999┆
0x35704…35724 39 39 39 39 39 39 27 20 54 48 45 4e 20 44 4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆999999' THEN DO ┆
0x35724…35733 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35733…35753 (34, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 41 45 4c 4e 52 3d 31 20 54 4f 20 35 3b 20 ┆ HAELNR=1 TO 5; ┆
0x35753…35773 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35773…35782 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35782…357a2 (34, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 48 41 45 4c 50 29 3d 55 ┆ UNSPEC(HAELP)=U┆
0x357a2…357c2 4e 53 50 45 43 28 53 54 41 43 4b 50 42 29 2b 56 45 52 4c 2d 48 41 45 4c 4e 52 2a 48 41 45 4c 4c ┆NSPEC(STACKPB)+VERL-HAELNR*HAELL┆
0x357c2…357d1 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x357d1…357f1 (34, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 50 44 41 54 55 4d 56 3d 30 20 54 48 ┆ IF PDATUMV=0 TH┆
0x357f1…35811 45 4e 20 47 4f 20 54 4f 20 56 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO V1; ┆
0x35811…35820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35820…35840 (34, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 50 32 3d 41 4e 54 41 4c 50 32 ┆ ANTALP2=ANTALP2┆
0x35840…35860 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+1; ┆
0x35860…3586f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3586f…3588f (34, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3588f…358af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x358af…358be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x358be…358de (34, 0, 30) 56 31 3a 20 20 20 20 20 20 20 20 48 41 45 4c 4e 52 54 20 3d 20 48 41 45 4c 4e 52 3b 20 20 20 20 ┆V1: HAELNRT = HAELNR; ┆
0x358de…358fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x358fe…3590d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3590d…3592d (34, 0, 31) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3592d…3594d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3594d…3595c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3595c…3597c (34, 0, 32) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x3597c…3599c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3599c…359ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x359ab…359cb (34, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 42 3d 27 39 39 39 39 39 39 39 39 39 39 39 ┆ KONTONRB='99999999999┆
0x359cb…359eb 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x359eb…359fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x359fa…35a1a (34, 0, 34) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x35a1a…35a3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35a3a…35a49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35a49…35a69 (34, 0, 35) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x35a69…35a89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35a89…35a98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35a98…35ab8 (34, 0, 36) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x35ab8…35ad8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35ad8…35ae7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35ae7…35b36 (34, 0, 37) 0x20[0x4f]
0x35b36…35b56 (34, 0, 38) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x35b56…35b76 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x35b76…35b85 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35b85…35bd4 (34, 0, 39) 0x20[0x4f]
[…0x1…]
0x35c23…35c43 (34, 0, 41) 53 54 41 52 54 3a 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆START: CALL DATCHECK(DATUM); ┆
0x35c43…35c63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35c63…35c72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35c72…35c92 (34, 0, 42) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 43 ┆ IF DATUM='0 ' THEN C┆
0x35c92…35cb2 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ALL PLOAD('Q '); ┆
0x35cb2…35cc1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35cc1…35ce1 (34, 0, 43) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x35ce1…35d01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35d01…35d10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35d10…35d30 (34, 0, 44) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x35d30…35d50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35d50…35d5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35d5f…35d7f (34, 0, 45) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x35d7f…35d9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35d9f…35dae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35dae…35dfd (34, 0, 46) 0x20[0x4f]
0x35dfd…35e1d (34, 0, 47) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 49 53 4b 45 54 54 4b 3b 20 20 2f 2a 20 4b 4f 4c 4c 41 ┆ CALL DISKETTK; /* KOLLA┆
0x35e1d…35e3d 52 20 44 49 53 4b 45 54 54 45 52 20 5c 50 50 4e 41 52 20 42 45 48 5c 56 4c 49 47 41 20 46 49 4c ┆R DISKETTER ÖPPNAR BEHÖVLIGA FIL┆
0x35e3d…35e4c 45 52 20 2a 2f 20 20 20 20 20 20 20 20 20 20 ┆ER */ ┆
0x35e4c…35e6c (34, 0, 48) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x35e6c…35e8c 52 53 49 4f 4e 29 28 41 28 39 36 29 29 28 27 47 65 6e 65 72 65 72 69 6e 67 20 61 76 20 22 56 45 ┆RSION)(A(96))('Generering av "VE┆
0x35e8c…35e9b 52 42 45 4c 4f 50 22 20 70 7d 67 7d 72 27 29 ┆RBELOP" pågår')┆
0x35e9b…35ebb (34, 0, 49) 20 20 20 20 20 20 20 20 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ (A(47)); ┆
0x35ebb…35edb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35edb…35eea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35eea…35f0a (34, 0, 50) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 2f 2a 20 ┆ CALL CORED(0); /* ┆
0x35f0a…35f2a 53 4c 5b 43 4b 45 52 20 43 4f 52 53 4f 52 4e 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLÄCKER CORSORN */ ┆
0x35f2a…35f39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35f39…35f59 (34, 0, 51) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 50 45 4e 54 52 41 4e 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL OPENTRAN; ┆
0x35f59…35f79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35f79…35f88 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35f88…35fa8 (34, 0, 52) 20 20 20 20 20 20 20 20 49 46 20 4d 41 58 54 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 32 3b ┆ IF MAXT=0 THEN GO TO L2;┆
0x35fa8…35fc8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35fc8…35fd7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x35fd7…36026 (34, 0, 53) 0x20[0x4f]
0x36026…36046 (34, 0, 54) 20 20 20 20 20 20 20 20 53 54 41 43 4b 50 54 3d 41 44 44 52 28 41 52 45 41 29 3b 20 20 20 20 20 ┆ STACKPT=ADDR(AREA); ┆
0x36046…36066 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36066…36075 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36075…36095 (34, 0, 55) 20 20 20 20 20 20 20 20 53 54 41 43 4b 50 42 3d 41 44 44 52 28 41 52 45 41 29 3b 20 20 20 20 20 ┆ STACKPB=ADDR(AREA); ┆
0x36095…360b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x360b5…360c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x360c4…360e4 (34, 0, 56) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 56 45 52 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL VERPOST; ┆
0x360e4…36104 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36104…36113 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36113…36133 (34, 0, 57) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 52 41 4e 53 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 ┆ CALL TRANSPOST; ┆
0x36133…36153 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36153…36162 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36162…36182 (34, 0, 58) 4c 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L1: ┆
0x36182…361a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x361a2…361b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x361b1…361d1 (34, 0, 59) 20 20 20 20 2f 2a 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 54 31 31 2c 20 27 20 27 2c 20 ┆ /* PUT SKIP LIST (T11, ' ', ┆
0x361d1…361f1 4b 4f 4e 54 4f 4e 52 42 2c 20 46 41 53 29 3b 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTONRB, FAS); */ ┆
0x361f1…36200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36200…36220 (34, 0, 60) 20 20 20 20 20 20 20 20 49 46 20 54 31 31 3c 4b 4f 4e 54 4f 4e 52 42 20 54 48 45 4e 20 44 4f 3b ┆ IF T11<KONTONRB THEN DO;┆
0x36220…36240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36240…3624f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3624f…3626f (34, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 54 31 31 3e 4b 4f 4e 54 4f 4e 52 56 20 54 48 45 4e 20 ┆ IF T11>KONTONRV THEN ┆
0x3626f…3628f 46 41 53 3d 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FAS=3; ┆
0x3628f…3629e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3629e…362be (34, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 41 53 3d 30 20 54 48 45 4e 20 48 41 45 4c 4e 52 54 ┆ IF FAS=0 THEN HAELNRT┆
0x362be…362de 3d 36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=6; ┆
0x362de…362ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x362ed…3630d (34, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 41 53 3d 32 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 ┆ IF FAS=2 THEN GO TO F┆
0x3630d…3632d 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EL; ┆
0x3632d…3633c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3633c…3635c (34, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 41 53 3d 33 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF FAS=3 THEN DO; ┆
0x3635c…3637c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3637c…3638b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3638b…363ab (34, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 ┆ CALL SKRIV; ┆
0x363ab…363cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x363cb…363da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x363da…363fa (34, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 41 45 4c 4e 52 54 3d 36 3b 20 20 20 20 20 20 20 20 ┆ HAELNRT=6; ┆
0x363fa…3641a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3641a…36429 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36429…36449 (34, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x36449…36469 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36469…36478 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36478…36498 (34, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 46 41 53 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FAS=1; ┆
0x36498…364b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x364b8…364c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x364c7…364e7 (34, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 42 59 47 47 3b 20 20 20 20 20 20 ┆ CALL STACKBYGG; ┆
0x364e7…36507 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36507…36516 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36516…36536 (34, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 52 41 4e 53 50 4f 53 54 3b 20 20 20 20 20 20 ┆ CALL TRANSPOST; ┆
0x36536…36556 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36556…36565 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36565…36585 (34, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x36585…365a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x365a5…365b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x365b4…365d4 (34, 0, 72) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x365d4…365f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x365f4…36603 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36603…36623 (34, 0, 73) 20 20 20 20 20 20 20 20 49 46 20 54 31 31 3d 4b 4f 4e 54 4f 4e 52 42 20 54 48 45 4e 20 44 4f 3b ┆ IF T11=KONTONRB THEN DO;┆
0x36623…36643 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36643…36652 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36652…36672 (34, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 54 31 31 3d 27 39 39 39 39 39 39 39 39 39 39 39 27 20 ┆ IF T11='99999999999' ┆
0x36672…36692 54 48 45 4e 20 47 4f 20 54 4f 20 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN GO TO UT; ┆
0x36692…366a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x366a1…366c1 (34, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 46 41 53 3d 31 29 20 7c 20 28 46 41 53 3d 33 29 20 ┆ IF (FAS=1) ö (FAS=3) ┆
0x366c1…366e1 54 48 45 4e 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN CALL SKRIV; ┆
0x366e1…366f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x366f0…36710 (34, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 46 41 53 3d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FAS=2; ┆
0x36710…36730 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36730…3673f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3673f…3675f (34, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 42 59 47 47 3b 20 20 20 20 20 20 ┆ CALL STACKBYGG; ┆
0x3675f…3677f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3677f…3678e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3678e…367ae (34, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 52 41 4e 53 50 4f 53 54 3b 20 20 20 20 20 20 ┆ CALL TRANSPOST; ┆
0x367ae…367ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x367ce…367dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x367dd…367fd (34, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x367fd…3681d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3681d…3682c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3682c…3684c (34, 0, 80) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3684c…3686c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3686c…3687b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3687b…3689b (34, 0, 81) 20 20 20 20 20 20 20 20 49 46 20 54 31 31 3e 4b 4f 4e 54 4f 4e 52 42 20 54 48 45 4e 20 44 4f 3b ┆ IF T11>KONTONRB THEN DO;┆
0x3689b…368bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x368bb…368ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x368ca…368ea (35, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 46 41 53 3d 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FAS=3; ┆
0x368ea…3690a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3690a…36919 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36919…36939 (35, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 56 45 52 50 4f 53 54 3b 20 20 20 20 20 20 20 20 ┆ CALL VERPOST; ┆
0x36939…36959 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36959…36968 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36968…36988 (35, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x36988…369a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x369a8…369b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x369b7…369d7 (35, 0, 3) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x369d7…369f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x369f7…36a06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36a06…36a55 (35, 0, 4) 0x20[0x4f]
0x36a55…36a75 (35, 0, 5) 4c 32 3a 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆L2: PUT FILE(D) SKIP EDIT(VE┆
0x36a75…36a95 52 53 49 4f 4e 29 28 41 28 39 36 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RSION)(A(96)) ┆
0x36a95…36aa4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36aa4…36ac4 (35, 0, 6) 20 20 20 20 20 20 20 20 28 27 49 4e 47 41 20 4b 4f 4e 54 45 52 49 4e 47 41 52 20 48 41 52 20 47 ┆ ('INGA KONTERINGAR HAR G┆
0x36ac4…36ae4 4a 4f 52 54 53 20 53 45 44 41 4e 20 53 45 4e 41 53 54 45 20 42 41 54 43 48 27 29 28 41 28 34 37 ┆JORTS SEDAN SENASTE BATCH')(A(47┆
0x36ae4…36af3 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆)); ┆
0x36af3…36b13 (35, 0, 7) 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x36b13…36b33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36b33…36b42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36b42…36b62 (35, 0, 8) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(''); ┆
0x36b62…36b82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36b82…36b91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36b91…36bb1 (35, 0, 9) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT; ┆
0x36bb1…36bd1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36bd1…36be0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36be0…36c2f (35, 0, 10) 0x20[0x4f]
0x36c2f…36c4f (35, 0, 11) 55 54 3a 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UT: CALL SKRIV; ┆
0x36c4f…36c6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36c6f…36c7e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36c7e…36c9e (35, 0, 12) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 ┆ IF RCODE =0 THEN GO TO F┆
0x36c9e…36cbe 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EL; ┆
0x36cbe…36ccd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36ccd…36ced (35, 0, 13) 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 56 45 52 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CLOSE VERUT; ┆
0x36ced…36d0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36d0d…36d1c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36d1c…36d3c (35, 0, 14) 20 20 20 20 20 20 20 20 44 41 54 55 4d 32 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM2=DATUM; ┆
0x36d3c…36d5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36d5c…36d6b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36d6b…36d8b (35, 0, 15) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 20 20 20 20 32 27 ┆ PUT SKIP(2) EDIT(' 2'┆
0x36d8b…36dab 29 28 41 28 31 31 29 29 28 44 41 54 55 4d 31 29 28 41 28 31 30 29 29 28 44 41 54 55 4d 32 29 28 ┆)(A(11))(DATUM1)(A(10))(DATUM2)(┆
0x36dab…36dba 41 28 37 29 29 20 20 20 20 20 20 20 20 20 20 ┆A(7)) ┆
0x36dba…36dda (35, 0, 16) 20 20 20 20 20 20 20 20 28 54 50 4f 53 54 41 4e 54 29 28 50 50 31 29 28 41 4e 54 41 4c 50 31 29 ┆ (TPOSTANT)(PP1)(ANTALP1)┆
0x36dda…36dfa 28 50 50 31 29 28 41 4e 54 41 4c 50 32 29 28 50 50 31 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(PP1)(ANTALP2)(PP1) ┆
0x36dfa…36e09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36e09…36e29 (35, 0, 17) 20 20 20 20 20 20 20 20 28 54 50 4f 53 54 41 4e 54 2b 41 4e 54 41 4c 50 31 2d 41 4e 54 41 4c 50 ┆ (TPOSTANT+ANTALP1-ANTALP┆
0x36e29…36e49 32 29 28 50 50 31 29 20 53 4b 49 50 28 52 41 44 41 4e 54 20 2d 20 31 31 29 3b 20 20 20 20 20 20 ┆2)(PP1) SKIP(RADANT - 11); ┆
0x36e49…36e58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36e58…36e78 (35, 0, 18) 20 20 20 20 20 20 20 20 52 45 57 52 49 54 45 20 46 49 4c 45 28 4b 4f 4e 54 52 4f 4c 29 20 46 52 ┆ REWRITE FILE(KONTROL) FR┆
0x36e78…36e98 4f 4d 28 4b 4f 4e 54 52 4f 4c 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OM(KONTROL2); ┆
0x36e98…36ea7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36ea7…36ec7 (35, 0, 19) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT1; ┆
0x36ec7…36ee7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36ee7…36ef6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x36ef6…36f45 (35, 0, 20) 0x20[0x4f]
[…0x1…]
0x36f94…36fb4 (35, 0, 22) 46 45 4c 3a 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 46 49 4c ┆FEL: IF RCODE =0 THEN PUT FIL┆
0x36fb4…36fd4 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 46 45 4c 54 41 42 28 52 43 4f 44 45 29 29 28 41 28 ┆E(D) SKIP EDIT(FELTAB(RCODE))(A(┆
0x36fd4…36fe3 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 ┆47)); ┆
0x36fe3…37003 (35, 0, 23) 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 45 44 49 54 28 27 46 41 53 20 3d 20 27 29 28 ┆ ELSE PUT EDIT('FAS = ')(┆
0x37003…37023 41 28 36 29 29 28 46 41 53 29 28 41 28 34 31 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A(6))(FAS)(A(41)); ┆
0x37023…37032 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37032…37052 (35, 0, 24) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(''); ┆
0x37052…37072 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37072…37081 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37081…370a1 (35, 0, 25) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT; ┆
0x370a1…370c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x370c1…370d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x370d0…3711f (35, 0, 26) 0x20[0x4f]
0x3711f…3713f (35, 0, 27) 53 4c 55 54 3a 53 4c 55 54 31 3a 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT:SLUT1:D=DATUM; ┆
0x3713f…3715f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3715f…3716e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3716e…3718e (35, 0, 28) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4c 4f 41 44 28 27 53 4f 52 54 54 45 53 54 20 56 45 52 42 ┆ CALL LOAD('SORTTEST VERB┆
0x3718e…371ae 45 4c 4f 50 20 34 20 31 31 20 30 20 51 27 2c 32 36 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ELOP 4 11 0 Q',26); ┆
0x371ae…371bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x371bd…3720c (35, 0, 29) 0x20[0x4f]
0x3720c…3722c (35, 0, 30) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3722c…3724c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3724c…3725b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3725b…3727b (35, 0, 31) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3729b…372aa 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x372aa…372ca (35, 0, 32) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x372ea…372f9 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x372f9…37319 (35, 0, 33) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37339…37348 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37348…37368 (35, 0, 34) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37388…37397 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37397…373b7 (35, 0, 35) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x373d7…373e6 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x373e6…37406 (35, 0, 36) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37426…37435 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37435…37455 (35, 0, 37) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37475…37484 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37484…374a4 (35, 0, 38) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x374c4…374d3 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x374d3…374f3 (35, 0, 39) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37513…37522 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37522…37542 (35, 0, 40) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37562…37571 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37571…37591 (35, 0, 41) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x375b1…375c0 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x375c0…375e0 (35, 0, 42) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37600…3760f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3760f…3762f (35, 0, 43) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3764f…3765e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3765e…3767e (35, 0, 44) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3769e…376ad 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x376ad…376cd (35, 0, 45) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x376ed…376fc 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x376fc…3771c (35, 0, 46) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3773c…3774b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3774b…3776b (35, 0, 47) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3778b…3779a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3779a…377ba (35, 0, 48) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x377da…377e9 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x377e9…37809 (35, 0, 49) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37829…37838 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37838…37858 (35, 0, 50) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37878…37887 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37887…378a7 (35, 0, 51) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x378c7…378d6 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x378d6…378f6 (35, 0, 52) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37916…37925 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37925…37945 (35, 0, 53) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37965…37974 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37974…37994 (35, 0, 54) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x379b4…379c3 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x379c3…379e3 (35, 0, 55) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37a03…37a12 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37a12…37a32 (35, 0, 56) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37a52…37a61 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37a61…37a81 (35, 0, 57) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37aa1…37ab0 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37ab0…37ad0 (35, 0, 58) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37af0…37aff 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37aff…37b1f (35, 0, 59) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37b3f…37b4e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37b4e…37b6e (35, 0, 60) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37b8e…37b9d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37b9d…37bbd (35, 0, 61) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37bdd…37bec 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37bec…37c0c (35, 0, 62) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37c2c…37c3b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37c3b…37c5b (35, 0, 63) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37c7b…37c8a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37c8a…37caa (35, 0, 64) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37cca…37cd9 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37cd9…37cf9 (35, 0, 65) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37d19…37d28 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37d28…37d48 (35, 0, 66) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37d68…37d77 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37d77…37d97 (35, 0, 67) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37db7…37dc6 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37dc6…37de6 (35, 0, 68) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37e06…37e15 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37e15…37e35 (35, 0, 69) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37e55…37e64 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37e64…37e84 (35, 0, 70) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37ea4…37eb3 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37eb3…37ed3 (35, 0, 71) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37ef3…37f02 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37f02…37f22 (35, 0, 72) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37f42…37f51 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37f51…37f71 (35, 0, 73) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37f91…37fa0 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37fa0…37fc0 (35, 0, 74) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x37fe0…37fef 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x37fef…3800f (35, 0, 75) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3802f…3803e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3803e…3805e (35, 0, 76) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3807e…3808d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3808d…380ad (35, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x380cd…380dc 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x380dc…380fc (35, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3811c…3812b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3812b…3814b (35, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3816b…3817a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3817a…3819a (35, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x381ba…381c9 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x381c9…381e9 (35, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x38209…38218 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x38218…38238 (36, 0, 0) 2f 2a 20 56 38 31 20 53 4b 52 49 56 45 52 20 55 54 20 45 4e 20 56 45 52 49 46 49 4b 41 54 49 4f ┆/* V81 SKRIVER UT EN VERIFIKATIO┆
0x38238…38258 4e 53 46 5c 52 54 45 4b 4e 49 4e 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NSFÖRTEKNING ┆
0x38258…38267 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38267…38287 (36, 0, 1) 20 20 20 5c 56 45 52 20 53 41 4d 54 4c 49 47 41 20 4b 4f 4e 54 45 52 49 4e 47 41 52 20 49 20 54 ┆ ÖVER SAMTLIGA KONTERINGAR I T┆
0x38287…382a7 52 41 4e 53 46 49 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RANSFIL ┆
0x382a7…382b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x382b6…382d6 (36, 0, 2) 20 20 20 56 20 30 3a 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ V 0:1 ┆
0x382d6…382f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x382f6…38305 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38305…38325 (36, 0, 3) 20 20 20 50 52 47 20 4a 5d 20 37 38 30 39 31 35 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PRG JÅ 780915 */ ┆
0x38325…38345 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38345…38354 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38354…383a3 (36, 0, 4) 0x20[0x4f]
[…0x2…]
0x38441…38461 (36, 0, 7) 44 43 4c 20 41 52 45 41 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL AREAP POINTER, ┆
0x38461…38481 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38481…38490 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38490…384b0 (36, 0, 8) 20 20 20 20 31 20 56 45 52 53 54 52 20 42 41 53 45 44 28 41 52 45 41 50 29 2c 20 20 20 20 20 20 ┆ 1 VERSTR BASED(AREAP), ┆
0x384b0…384d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x384d0…384df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x384df…384ff (36, 0, 9) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 20 20 ┆ 2 KONTO FIXED(11), ┆
0x384ff…3851f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3851f…3852e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3852e…3854e (36, 0, 10) 20 20 20 20 20 20 32 20 56 45 52 4e 52 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 VERNR FIXED(5), ┆
0x3854e…3856e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3856e…3857d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3857d…3859d (36, 0, 11) 20 20 20 20 20 20 32 20 42 4f 4b 44 41 47 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 BOKDAG FIXED(5), ┆
0x3859d…385bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x385bd…385cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x385cc…385ec (36, 0, 12) 20 20 20 20 20 20 32 20 50 45 52 44 41 47 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 PERDAG FIXED(5), ┆
0x385ec…3860c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3860c…3861b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3861b…3863b (36, 0, 13) 20 20 20 20 20 20 32 20 42 45 4c 4f 50 50 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 20 ┆ 2 BELOPP FIXED(11), ┆
0x3863b…3865b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3865b…3866a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3866a…3868a (36, 0, 14) 20 20 20 20 20 20 32 20 54 45 58 54 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT CHAR(13), ┆
0x3868a…386aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x386aa…386b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x386b9…386d9 (36, 0, 15) 20 20 20 20 54 52 41 4e 53 4c 20 42 49 4e 41 52 59 20 49 4e 49 54 28 33 34 29 3b 20 20 20 20 20 ┆ TRANSL BINARY INIT(34); ┆
0x386d9…386f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x386f9…38708 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38708…38728 (36, 0, 16) 20 20 20 20 2f 2a 20 33 34 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 34 BYTES */ ┆
0x38728…38748 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38748…38757 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38757…387a6 (36, 0, 17) 0x20[0x4f]
0x387a6…387c6 (36, 0, 18) 44 43 4c 20 31 20 41 52 45 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 AREA, ┆
0x387c6…387e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x387e6…387f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x387f5…38815 (36, 0, 19) 20 20 20 20 20 20 32 20 43 48 28 31 30 30 29 20 43 48 41 52 28 31 30 30 29 3b 20 20 20 20 20 20 ┆ 2 CH(100) CHAR(100); ┆
0x38815…38835 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38835…38844 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38844…38864 (36, 0, 20) 20 20 20 20 2f 2a 20 31 30 20 30 30 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 ┆ /* 10 000 BYTES */ ┆
0x38864…38884 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38884…38893 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38893…388e2 (36, 0, 21) 0x20[0x4f]
0x388e2…38902 (36, 0, 22) 44 43 4c 20 4e 52 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL NR BINARY, ┆
0x38902…38922 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38922…38931 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38931…38951 (36, 0, 23) 20 20 20 20 54 35 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T5 CHAR(5), ┆
0x38951…38971 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38971…38980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38980…389a0 (36, 0, 24) 20 20 20 20 4d 41 58 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX BINARY, ┆
0x389a0…389c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x389c0…389cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x389cf…389ef (36, 0, 25) 20 20 20 20 52 43 4f 44 45 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE BINARY, ┆
0x389ef…38a0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38a0f…38a1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38a1e…38a3e (36, 0, 26) 20 20 20 20 54 52 41 4e 53 46 49 4c 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TRANSFIL FILE, ┆
0x38a3e…38a5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38a5e…38a6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38a6d…38a8d (36, 0, 27) 20 20 20 20 54 31 33 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T13 CHAR(13), ┆
0x38a8d…38aad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38aad…38abc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38abc…38adc (36, 0, 28) 20 20 20 20 4b 4f 4e 54 4f 52 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTOR CHAR(13), ┆
0x38adc…38afc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38afc…38b0b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38b0b…38b2b (36, 0, 29) 20 20 20 20 46 45 4c 54 41 42 28 31 30 29 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 20 20 20 ┆ FELTAB(10) CHAR(47) INIT( ┆
0x38b2b…38b4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38b4b…38b5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38b5a…38b7a (36, 0, 30) 20 20 20 20 27 53 45 4b 54 4f 52 20 48 45 41 44 45 52 20 4e 4f 54 20 46 4f 55 4e 44 27 2c 20 20 ┆ 'SEKTOR HEADER NOT FOUND', ┆
0x38b7a…38b9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38b9a…38ba9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38ba9…38bc9 (36, 0, 31) 20 20 20 20 27 52 45 41 44 20 45 52 52 4f 52 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'READ ERROR', ┆
0x38bc9…38be9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38be9…38bf8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38bf8…38c18 (36, 0, 32) 20 20 20 20 27 57 52 49 54 45 20 45 52 52 4f 52 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'WRITE ERROR', ┆
0x38c18…38c38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38c38…38c47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38c47…38c67 (36, 0, 33) 20 20 20 20 27 4b 45 59 20 4e 4f 54 20 46 4f 55 4e 44 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'KEY NOT FOUND', ┆
0x38c67…38c87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38c87…38c96 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38c96…38cb6 (36, 0, 34) 20 20 20 20 27 4e 5d 47 4f 4e 20 44 49 53 4b 45 54 54 20 48 41 52 20 46 4c 59 54 54 41 54 53 27 ┆ 'NÅGON DISKETT HAR FLYTTATS'┆
0x38cb6…38cd6 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, ┆
0x38cd6…38ce5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38ce5…38d05 (36, 0, 35) 20 20 20 20 27 45 4e 20 41 56 20 46 49 4c 45 52 4e 41 20 5b 52 20 46 5c 52 20 4c 49 54 45 4e 27 ┆ 'EN AV FILERNA ÄR FÖR LITEN'┆
0x38d05…38d25 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, ┆
0x38d25…38d34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38d34…38d54 (36, 0, 36) 20 20 20 20 27 45 4e 20 41 56 20 46 49 4c 45 52 4e 41 20 5b 52 20 53 4b 52 49 56 53 4b 59 44 44 ┆ 'EN AV FILERNA ÄR SKRIVSKYDD┆
0x38d54…38d74 41 44 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AD'), ┆
0x38d74…38d83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38d83…38da3 (36, 0, 37) 20 20 20 20 52 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ R BINARY INIT(0), ┆
0x38da3…38dc3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38dc3…38dd2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38dd2…38df2 (36, 0, 38) 20 20 20 20 53 49 44 41 20 42 49 4e 41 52 59 20 49 4e 49 54 28 31 29 2c 20 20 20 20 20 20 20 20 ┆ SIDA BINARY INIT(1), ┆
0x38df2…38e12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38e12…38e21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38e21…38e41 (36, 0, 39) 20 20 20 20 54 31 34 20 43 48 41 52 28 31 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T14 CHAR(14), ┆
0x38e41…38e61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38e61…38e70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38e70…38e90 (36, 0, 40) 20 20 20 20 41 4e 54 5f 4b 4f 4e 54 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 ┆ ANT_KONT BINARY INIT(0), ┆
0x38e90…38eb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38eb0…38ebf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38ebf…38edf (36, 0, 41) 20 20 20 20 4e 41 4d 4e 28 33 29 20 43 48 41 52 28 31 31 29 20 49 4e 49 54 28 27 4d 45 4c 4c 41 ┆ NAMN(3) CHAR(11) INIT('MELLA┆
0x38edf…38eff 4e 4b 52 41 46 54 27 2c 27 4b 56 56 2f 4b 57 41 52 4f 53 27 2c 27 41 52 4f 53 27 29 2c 20 20 20 ┆NKRAFT','KVV/KWAROS','AROS'), ┆
0x38eff…38f0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38f0e…38f2e (36, 0, 42) 20 20 20 20 54 32 35 20 43 48 41 52 28 32 35 29 20 49 4e 49 54 28 27 56 45 52 49 46 49 4b 41 54 ┆ T25 CHAR(25) INIT('VERIFIKAT┆
0x38f2e…38f4e 49 4f 4e 53 46 5c 52 54 45 43 4b 4e 49 4e 47 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IONSFÖRTECKNING'), ┆
0x38f4e…38f5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38f5d…38f7d (36, 0, 43) 20 20 20 20 54 36 30 20 43 48 41 52 28 36 32 29 20 49 4e 49 54 28 20 20 20 20 20 20 20 20 20 20 ┆ T60 CHAR(62) INIT( ┆
0x38f7d…38f9d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38f9d…38fac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38fac…38fcc (36, 0, 44) 20 20 20 20 27 42 4f 4b 44 41 47 20 20 50 45 52 44 41 47 20 20 56 45 52 2e 20 20 20 4b 4f 4e 54 ┆ 'BOKDAG PERDAG VER. KONT┆
0x38fcc…38fec 4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 45 4c 4f 50 50 20 20 20 20 20 20 54 45 58 ┆O BELOPP TEX┆
0x38fec…38ffb 54 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆T'), ┆
0x38ffb…3901b (36, 0, 45) 20 20 20 20 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ P POINTER, ┆
0x3901b…3903b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3903b…3904a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3904a…3906a (36, 0, 46) 20 20 20 20 44 20 42 41 53 45 44 28 50 29 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 ┆ D BASED(P) CHAR(6), ┆
0x3906a…3908a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3908a…39099 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39099…390b9 (36, 0, 47) 20 20 20 20 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM CHAR(6), ┆
0x390b9…390d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x390d9…390e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x390e8…39108 (36, 0, 48) 20 20 20 20 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PP POINTER, ┆
0x39108…39128 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39128…39137 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39137…39157 (36, 0, 49) 20 20 20 20 31 20 53 54 52 58 20 42 41 53 45 44 28 50 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 STRX BASED(PP), ┆
0x39157…39177 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39177…39186 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39186…391a6 (36, 0, 50) 20 20 20 20 20 20 32 20 58 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 X CHAR(2), ┆
0x391a6…391c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x391c6…391d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x391d5…391f5 (36, 0, 51) 20 20 20 20 20 20 32 20 59 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 Y CHAR(2), ┆
0x391f5…39215 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39215…39224 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39224…39244 (36, 0, 52) 20 20 20 20 20 20 32 20 46 49 52 4d 41 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIRMA CHAR(1), ┆
0x39244…39264 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39264…39273 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39273…39293 (36, 0, 53) 20 20 20 20 20 20 20 20 32 20 20 4f 50 5f 4b 4f 44 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 ┆ 2 OP_KOD BINARY, ┆
0x39293…392b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x392b3…392c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x392c2…392e2 (36, 0, 54) 20 20 20 20 20 20 20 20 32 20 20 52 41 44 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 ┆ 2 RADANT BINARY, ┆
0x392e2…39302 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39302…39311 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39311…39331 (36, 0, 55) 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 27 20 20 56 38 20 ┆ VERSION CHAR(47) INIT(' V8 ┆
0x39331…39351 56 65 72 73 69 6f 6e 20 31 2e 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆Version 1.3 ┆
0x39351…39360 20 20 20 38 33 31 30 31 31 27 29 3b 20 20 20 ┆ 831011'); ┆
0x39360…393af (36, 0, 56) 0x20[0x4f]
[…0x1…]
0x393fe…3941e (36, 0, 58) 46 49 4c 4f 50 45 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FILOPEN:PROC; ┆
0x3941e…3943e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3943e…3944d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3944d…3946d (36, 0, 59) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN TRANSFIL; ┆
0x3946d…3948d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3948d…3949c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3949c…394bc (36, 0, 60) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 54 52 41 4e 53 46 49 4c 29 3b 20 20 20 20 ┆ CALL SEOF(TRANSFIL); ┆
0x394bc…394dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x394dc…394eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x394eb…3950b (36, 0, 61) 20 20 20 20 20 20 20 20 4d 41 58 3d 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3b 20 20 20 ┆ MAX=UNSPEC(TRANSFIL); ┆
0x3950b…3952b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3952b…3953a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3953a…3955a (36, 0, 62) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3d 30 3b 20 20 20 20 20 ┆ UNSPEC(TRANSFIL)=0; ┆
0x3955a…3957a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3957a…39589 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39589…395a9 (36, 0, 63) 20 20 20 20 20 20 20 20 49 4e 50 4f 53 54 45 52 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ INPOSTER=0; ┆
0x395a9…395c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x395c9…395d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x395d8…395f8 (36, 0, 64) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x395f8…39618 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39618…39627 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39627…39647 (36, 0, 65) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x39647…39667 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39667…39676 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39676…396c5 (36, 0, 66) 0x20[0x4f]
0x396c5…396e5 (36, 0, 67) 50 4f 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆POST:PROC; ┆
0x396e5…39705 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39705…39714 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39714…39734 (36, 0, 68) 20 20 20 20 20 20 20 20 49 46 20 49 4e 50 4f 53 54 45 52 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 ┆ IF INPOSTER=0 THEN DO; ┆
0x39734…39754 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39754…39763 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39763…39783 (36, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4d 41 58 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF MAX=0 THEN DO; ┆
0x39783…397a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x397a3…397b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x397b2…397d2 (36, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 31 30 3b 20 20 20 20 20 20 20 20 20 ┆ RCODE=10; ┆
0x397d2…397f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x397f2…39801 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39801…39821 (36, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x39821…39841 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39841…39850 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39850…39870 (36, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x39870…39890 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39890…3989f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3989f…398bf (36, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 32 35 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=255; ┆
0x398bf…398df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x398df…398ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x398ee…3990e (36, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 3e 4d 41 58 20 54 48 45 4e 20 4a 3d 4d 41 58 3b 20 ┆ IF J>MAX THEN J=MAX; ┆
0x3990e…3992e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3992e…3993d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3993d…3995d (36, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 4d 41 58 3d 4d 41 58 2d 4a 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX=MAX-J; ┆
0x3995d…3997d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3997d…3998c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3998c…399ac (36, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 54 52 41 4e 53 46 49 4c 2c 41 52 45 41 ┆ CALL RD(TRANSFIL,AREA┆
0x399ac…399cc 2c 4a 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,J,RCODE); ┆
0x399cc…399db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x399db…399fb (36, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 ┆ IF RCODE =0 THEN PUT ┆
0x399fb…39a1b 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 54 52 41 4e 53 46 49 4c 27 2c 52 43 ┆SKIP LIST('LÄSFEL I TRANSFIL',RC┆
0x39a1b…39a2a 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ODE); ┆
0x39a2a…39a4a (36, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 49 4e 50 4f 53 54 45 52 3d 4a 2d 31 3b 20 20 20 20 20 20 20 20 ┆ INPOSTER=J-1; ┆
0x39a4a…39a6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39a6a…39a79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39a79…39a99 (36, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 41 52 45 41 50 3d 41 44 44 52 28 41 52 45 41 29 3b 20 20 20 20 ┆ AREAP=ADDR(AREA); ┆
0x39a99…39ab9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39ab9…39ac8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39ac8…39ae8 (36, 0, 80) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x39ae8…39b08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39b08…39b17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39b17…39b37 (36, 0, 81) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x39b37…39b57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39b57…39b66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39b66…39b86 (37, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 49 4e 50 4f 53 54 45 52 3d 49 4e 50 4f 53 54 45 52 2d 31 3b 20 ┆ INPOSTER=INPOSTER-1; ┆
0x39b86…39ba6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39ba6…39bb5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39bb5…39bd5 (37, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 41 52 45 41 50 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(AREAP)=UNSPEC(┆
0x39bd5…39bf5 41 52 45 41 50 29 2b 54 52 41 4e 53 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AREAP)+TRANSL; ┆
0x39bf5…39c04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39c04…39c24 (37, 0, 2) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x39c24…39c44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39c44…39c53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39c53…39c73 (37, 0, 3) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x39c73…39c93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39c93…39ca2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39ca2…39cc2 (37, 0, 4) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x39cc2…39ce2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39ce2…39cf1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39cf1…39d40 (37, 0, 5) 0x20[0x4f]
0x39d40…39d60 (37, 0, 6) 4b 4f 4e 54 4f 52 45 44 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTORED:PROC; ┆
0x39d60…39d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39d80…39d8f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39d8f…39daf (37, 0, 7) 20 20 20 20 20 20 20 20 54 31 33 3d 4b 4f 4e 54 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T13=KONTO; ┆
0x39daf…39dcf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39dcf…39dde 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39dde…39dfe (37, 0, 8) 20 20 20 20 20 20 20 20 54 35 3d 53 55 42 53 54 52 28 54 31 33 2c 31 2c 35 29 3b 20 20 20 20 20 ┆ T5=SUBSTR(T13,1,5); ┆
0x39dfe…39e1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39e1e…39e2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39e2d…39e4d (37, 0, 9) 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 54 31 33 2c 39 2c 33 29 7f 3d 27 30 30 30 ┆ IF SUBSTR(T13,9,3) ='000┆
0x39e4d…39e6d 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆' THEN DO; ┆
0x39e6d…39e7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39e7c…39e9c (37, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 52 3d 54 35 20 43 41 54 20 27 2e 2d 2d 2d 2e 27 ┆ KONTOR=T5 CAT '.---.'┆
0x39e9c…39ebc 20 43 41 54 20 53 55 42 53 54 52 28 54 31 33 2c 39 2c 33 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CAT SUBSTR(T13,9,3); ┆
0x39ebc…39ecb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39ecb…39eeb (37, 0, 11) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x39eeb…39f0b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39f0b…39f1a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39f1a…39f3a (37, 0, 12) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x39f3a…39f5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39f5a…39f69 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39f69…39f89 (37, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 52 3d 54 35 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTOR=T5; ┆
0x39f89…39fa9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39fa9…39fb8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39fb8…39fd8 (37, 0, 14) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x39fd8…39ff8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x39ff8…3a007 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a007…3a027 (37, 0, 15) 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 54 31 33 2c 36 2c 33 29 7f 3d 27 30 30 30 ┆ IF SUBSTR(T13,6,3) ='000┆
0x3a027…3a047 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆' THEN DO; ┆
0x3a047…3a056 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a056…3a076 (37, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 52 2c 36 2c 34 29 3d 27 2e ┆ SUBSTR(KONTOR,6,4)='.┆
0x3a076…3a096 27 20 43 41 54 20 53 55 42 53 54 52 28 54 31 33 2c 36 2c 33 29 3b 20 20 20 20 20 20 20 20 20 20 ┆' CAT SUBSTR(T13,6,3); ┆
0x3a096…3a0a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a0a5…3a0c5 (37, 0, 17) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3a0c5…3a0e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a0e5…3a0f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a0f4…3a114 (37, 0, 18) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x3a114…3a134 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a134…3a143 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a143…3a163 (37, 0, 19) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3a163…3a183 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a183…3a192 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a192…3a1e1 (37, 0, 20) 0x20[0x4f]
0x3a1e1…3a201 (37, 0, 21) 52 55 42 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RUB:PROC; ┆
0x3a201…3a221 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a221…3a230 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a230…3a250 (37, 0, 22) 20 20 20 20 20 20 20 20 49 46 20 28 56 45 52 4e 52 3d 4e 52 29 20 26 20 28 52 7f 3d 30 29 20 54 ┆ IF (VERNR=NR) & (R =0) T┆
0x3a250…3a270 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆HEN DO; ┆
0x3a270…3a27f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a27f…3a29f (37, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 2a 2a 2a 20 20 46 ┆ PUT SKIP LIST('*** F┆
0x3a29f…3a2bf 4f 52 54 53 5b 54 54 45 52 20 50 5d 20 4e 5b 53 54 41 20 53 49 44 41 20 2a 2a 2a 27 29 3b 20 20 ┆ORTSÄTTER PÅ NÄSTA SIDA ***'); ┆
0x3a2bf…3a2ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a2ce…3a2ee (37, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x3a2ee…3a30e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a30e…3a31d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a31d…3a33d (37, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 4e 52 3d 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ NR=-1; ┆
0x3a33d…3a35d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a35d…3a36c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a36c…3a38c (37, 0, 26) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3a38c…3a3ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a3ac…3a3bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a3bb…3a3db (37, 0, 27) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 2b 33 29 20 45 44 49 54 28 4e 41 4d 4e 28 ┆ PUT SKIP(R+3) EDIT(NAMN(┆
0x3a3db…3a3fb 46 49 52 4d 41 2d 27 36 27 29 29 28 41 28 32 30 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FIRMA-'6'))(A(20)); ┆
0x3a3fb…3a40a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a40a…3a42a (37, 0, 28) 20 20 20 20 20 20 20 20 49 46 20 59 3d 27 32 20 27 20 54 48 45 4e 20 50 55 54 20 45 44 49 54 28 ┆ IF Y='2 ' THEN PUT EDIT(┆
0x3a42a…3a44a 27 50 52 45 4c 49 4d 49 4e 5b 52 27 29 28 41 28 31 31 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆'PRELIMINÄR')(A(11)); ┆
0x3a44a…3a459 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a459…3a479 (37, 0, 29) 20 20 20 20 20 20 20 20 50 55 54 20 45 44 49 54 28 54 32 35 29 28 41 28 33 35 29 29 28 27 31 39 ┆ PUT EDIT(T25)(A(35))('19┆
0x3a479…3a499 27 29 28 41 29 28 44 41 54 55 4d 29 28 41 28 32 29 29 28 27 2d 27 29 28 41 29 28 53 55 42 53 54 ┆')(A)(DATUM)(A(2))('-')(A)(SUBST┆
0x3a499…3a4a8 52 28 44 41 54 55 4d 2c 33 2c 32 29 29 20 20 ┆R(DATUM,3,2)) ┆
0x3a4a8…3a4c8 (37, 0, 30) 20 20 20 20 20 20 20 20 28 41 29 28 27 2d 27 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d ┆ (A)('-')(A)(SUBSTR(DATUM┆
0x3a4c8…3a4e8 2c 35 2c 32 29 29 28 41 28 34 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,5,2))(A(4)) ┆
0x3a4e8…3a4f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a4f7…3a517 (37, 0, 31) 20 20 20 20 20 20 20 20 28 27 53 49 44 27 29 28 41 28 34 29 29 28 53 49 44 41 29 28 41 29 20 53 ┆ ('SID')(A(4))(SIDA)(A) S┆
0x3a517…3a537 4b 49 50 28 32 29 20 45 44 49 54 28 54 36 30 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆KIP(2) EDIT(T60)(A); ┆
0x3a537…3a546 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a546…3a566 (37, 0, 32) 20 20 20 20 20 20 20 20 52 3d 20 52 41 44 41 4e 54 20 2d 20 35 3b 20 20 20 20 20 20 20 20 20 20 ┆ R= RADANT - 5; ┆
0x3a566…3a586 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a586…3a595 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a595…3a5b5 (37, 0, 33) 20 20 20 20 20 20 20 20 53 49 44 41 3d 53 49 44 41 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SIDA=SIDA+1; ┆
0x3a5b5…3a5d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a5d5…3a5e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a5e4…3a604 (37, 0, 34) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x3a604…3a624 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a624…3a633 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a633…3a653 (37, 0, 35) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3a653…3a673 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a673…3a682 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a682…3a6d1 (37, 0, 36) 0x20[0x4f]
0x3a6d1…3a6f1 (37, 0, 37) 53 4b 52 49 56 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV:PROC; ┆
0x3a6f1…3a711 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a711…3a720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a720…3a740 (37, 0, 38) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP; ┆
0x3a740…3a760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a760…3a76f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a76f…3a78f (37, 0, 39) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 4e 52 20 54 48 45 4e 20 50 55 54 20 53 4b ┆ IF VERNR =NR THEN PUT SK┆
0x3a78f…3a7af 49 50 20 45 44 49 54 28 42 4f 4b 44 41 47 2b 37 38 30 30 30 30 29 28 41 28 38 29 29 3b 20 20 20 ┆IP EDIT(BOKDAG+780000)(A(8)); ┆
0x3a7af…3a7be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a7be…3a7de (37, 0, 40) 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 45 44 49 54 28 27 20 27 29 28 41 28 38 29 29 ┆ ELSE PUT EDIT(' ')(A(8))┆
0x3a7de…3a7fe 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x3a7fe…3a80d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a80d…3a82d (37, 0, 41) 20 20 20 20 20 20 20 20 49 46 20 42 4f 4b 44 41 47 7f 3d 50 45 52 44 41 47 20 54 48 45 4e 20 50 ┆ IF BOKDAG =PERDAG THEN P┆
0x3a82d…3a84d 55 54 20 45 44 49 54 28 50 45 52 44 41 47 2b 37 38 30 30 30 30 29 28 41 28 38 29 29 3b 20 20 20 ┆UT EDIT(PERDAG+780000)(A(8)); ┆
0x3a84d…3a85c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a85c…3a87c (37, 0, 42) 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 45 44 49 54 28 27 20 27 29 28 41 28 38 29 29 ┆ ELSE PUT EDIT(' ')(A(8))┆
0x3a87c…3a89c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x3a89c…3a8ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a8ab…3a8cb (37, 0, 43) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 4e 52 20 54 48 45 4e 20 50 55 54 20 45 44 ┆ IF VERNR =NR THEN PUT ED┆
0x3a8cb…3a8eb 49 54 28 56 45 52 4e 52 29 28 50 27 5a 5a 5a 39 27 2c 58 28 33 29 29 3b 20 20 20 20 20 20 20 20 ┆IT(VERNR)(P'ZZZ9',X(3)); ┆
0x3a8eb…3a8fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a8fa…3a91a (37, 0, 44) 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 45 44 49 54 28 27 20 27 29 28 41 28 37 29 29 ┆ ELSE PUT EDIT(' ')(A(7))┆
0x3a91a…3a93a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x3a93a…3a949 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a949…3a969 (37, 0, 45) 20 20 20 20 20 20 20 20 50 55 54 20 45 44 49 54 28 4b 4f 4e 54 4f 52 29 28 41 28 31 33 29 29 28 ┆ PUT EDIT(KONTOR)(A(13))(┆
0x3a969…3a989 54 31 34 29 28 41 28 31 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T14)(A(16)); ┆
0x3a989…3a998 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a998…3a9b8 (37, 0, 46) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 4e 52 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆ IF VERNR =NR THEN DO; ┆
0x3a9b8…3a9d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a9d8…3a9e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3a9e7…3aa07 (37, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 45 44 49 54 28 54 45 58 54 29 28 41 29 3b 20 20 20 ┆ PUT EDIT(TEXT)(A); ┆
0x3aa07…3aa27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3aa27…3aa36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3aa36…3aa56 (37, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x3aa56…3aa76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3aa76…3aa85 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3aa85…3aaa5 (37, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 4e 52 3d 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ NR=VERNR; ┆
0x3aaa5…3aac5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3aac5…3aad4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3aad4…3aaf4 (37, 0, 50) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3aaf4…3ab14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ab14…3ab23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ab23…3ab43 (37, 0, 51) 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x3ab43…3ab63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ab63…3ab72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ab72…3ab92 (37, 0, 52) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x3ab92…3abb2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3abb2…3abc1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3abc1…3abe1 (37, 0, 53) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3abe1…3ac01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ac01…3ac10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ac10…3ac5f (37, 0, 54) 0x20[0x4f]
[…0x1…]
0x3acae…3acce (37, 0, 56) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x3acce…3acee 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x3acee…3acfd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3acfd…3ad4c (37, 0, 57) 0x20[0x4f]
[…0x1…]
0x3ad9b…3adbb (37, 0, 59) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3addb…3adea 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3adea…3ae0a (37, 0, 60) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 43 ┆ IF DATUM='0 ' THEN C┆
0x3ae0a…3ae2a 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ALL PLOAD('Q '); ┆
0x3ae2a…3ae39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ae39…3ae59 (37, 0, 61) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x3ae59…3ae79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ae79…3ae88 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ae88…3aea8 (37, 0, 62) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x3aea8…3aec8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3aec8…3aed7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3aed7…3aef7 (37, 0, 63) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x3aef7…3af17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3af17…3af26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3af26…3af75 (37, 0, 64) 0x20[0x4f]
0x3af75…3af95 (37, 0, 65) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x3af95…3afb5 52 53 49 4f 4e 29 28 41 28 39 36 29 29 28 27 55 54 53 4b 52 49 46 54 20 41 56 20 56 45 52 2e 46 ┆RSION)(A(96))('UTSKRIFT AV VER.F┆
0x3afb5…3afc4 5c 52 54 45 43 4b 4e 49 4e 47 27 29 20 20 20 ┆ÖRTECKNING') ┆
0x3afc4…3afe4 (37, 0, 66) 20 20 20 20 20 20 20 20 28 41 28 34 35 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ (A(45)); ┆
0x3afe4…3b004 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b004…3b013 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b013…3b033 (37, 0, 67) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x3b033…3b053 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b053…3b062 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b062…3b082 (37, 0, 68) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 46 49 4c 4f 50 45 4e 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL FILOPEN; ┆
0x3b082…3b0a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b0a2…3b0b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b0b1…3b0d1 (37, 0, 69) 20 20 20 20 20 20 20 20 49 46 20 4d 41 58 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4c 55 54 ┆ IF MAX=0 THEN GO TO SLUT┆
0x3b0d1…3b0f1 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x3b0f1…3b100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b100…3b120 (37, 0, 70) 4c 31 3a 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L1: CALL POST; ┆
0x3b120…3b140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b140…3b14f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b14f…3b16f (37, 0, 71) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 ┆ IF RCODE =0 THEN GO TO F┆
0x3b16f…3b18f 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EL; ┆
0x3b18f…3b19e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b19e…3b1be (37, 0, 72) 20 20 20 20 20 20 20 20 41 4e 54 5f 4b 4f 4e 54 3d 41 4e 54 5f 4b 4f 4e 54 2b 31 3b 20 20 20 20 ┆ ANT_KONT=ANT_KONT+1; ┆
0x3b1be…3b1de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b1de…3b1ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b1ed…3b20d (37, 0, 73) 20 20 20 20 20 20 20 20 49 46 20 52 3c 38 20 26 20 56 45 52 4e 52 7f 3d 4e 52 20 54 48 45 4e 20 ┆ IF R<8 & VERNR =NR THEN ┆
0x3b20d…3b22d 43 41 4c 4c 20 52 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL RUB; ┆
0x3b22d…3b23c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b23c…3b25c (37, 0, 74) 20 20 20 20 20 20 20 20 49 46 20 52 3c 35 20 54 48 45 4e 20 43 41 4c 4c 20 52 55 42 3b 20 20 20 ┆ IF R<5 THEN CALL RUB; ┆
0x3b25c…3b27c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b27c…3b28b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b28b…3b2ab (37, 0, 75) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 52 45 44 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL KONTORED; ┆
0x3b2ab…3b2cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b2cb…3b2da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b2da…3b2fa (37, 0, 76) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 42 45 4c 4f 50 50 2c 54 31 34 29 3b ┆ CALL BELRED(BELOPP,T14);┆
0x3b2fa…3b31a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b31a…3b329 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b329…3b349 (37, 0, 77) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL SKRIV; ┆
0x3b349…3b369 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b369…3b378 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b378…3b398 (37, 0, 78) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x3b398…3b3b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b3b8…3b3c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b3c7…3b416 (37, 0, 79) 0x20[0x4f]
0x3b416…3b436 (37, 0, 80) 46 45 4c 3a 20 20 20 20 49 46 20 52 43 4f 44 45 3d 31 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆FEL: IF RCODE=10 THEN DO; ┆
0x3b436…3b456 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b456…3b465 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b465…3b485 (37, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 7f 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF R =0 THEN DO; ┆
0x3b485…3b4a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b4a5…3b4b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b4b4…3b4d4 (38, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 41 4e 54 ┆ PUT SKIP(2) EDIT('ANT┆
0x3b4d4…3b4f4 41 4c 20 4b 4f 4e 54 45 52 49 4e 47 41 52 3a 27 29 28 41 28 31 39 29 29 28 41 4e 54 5f 4b 4f 4e ┆AL KONTERINGAR:')(A(19))(ANT_KON┆
0x3b4f4…3b503 54 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆T)(A); ┆
0x3b503…3b523 (38, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 2d 32 29 3b 20 20 20 20 ┆ PUT SKIP(R-2); ┆
0x3b523…3b543 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b543…3b552 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b552…3b572 (38, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3b572…3b592 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b592…3b5a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b5a1…3b5c1 (38, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT; ┆
0x3b5c1…3b5e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b5e1…3b5f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b5f0…3b610 (38, 0, 4) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3b610…3b630 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b630…3b63f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b63f…3b65f (38, 0, 5) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 33 29 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c ┆ PUT SKIP(3) LIST('LÄSFEL┆
0x3b65f…3b67f 20 49 20 54 52 41 4e 53 46 49 4c 27 2c 46 45 4c 54 41 42 28 52 43 4f 44 45 29 29 20 53 4b 49 50 ┆ I TRANSFIL',FELTAB(RCODE)) SKIP┆
0x3b67f…3b68e 28 52 2d 33 29 3b 20 20 20 20 20 20 20 20 20 ┆(R-3); ┆
0x3b68e…3b6dd (38, 0, 6) 0x20[0x4f]
0x3b6dd…3b6fd (38, 0, 7) 53 4c 55 54 3a 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: D=DATUM; ┆
0x3b6fd…3b71d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b71d…3b72c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b72c…3b74c (38, 0, 8) 20 20 20 20 20 20 20 20 49 46 20 59 7f 3d 27 32 20 27 20 54 48 45 4e 20 43 41 4c 4c 20 50 4c 4f ┆ IF Y ='2 ' THEN CALL PLO┆
0x3b74c…3b76c 41 44 28 27 56 39 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AD('V9 '); ┆
0x3b76c…3b77b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b77b…3b79b (38, 0, 9) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x3b79b…3b7bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b7bb…3b7ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b7ca…3b819 (38, 0, 10) 0x20[0x4f]
0x3b819…3b839 (38, 0, 11) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3b839…3b859 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b859…3b868 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b868…3b888 (38, 0, 12) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3b888…3b8a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b8a8…3b8b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b8b7…3b8d7 (38, 0, 13) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3b8f7…3b906 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3b906…3b926 (38, 0, 14) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3b946…3b955 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3b955…3b975 (38, 0, 15) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3b995…3b9a4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3b9a4…3b9c4 (38, 0, 16) 20 20 20 20 20 20 20 20 49 46 20 59 3d 27 32 20 27 20 54 48 45 4e 20 50 55 54 20 45 44 49 54 28 ┆ IF Y='2 ' THEN PUT EDIT(┆
0x3b9c4…3b9e4 27 50 52 45 4c 49 4d 49 4e 5b 52 27 29 28 41 28 31 31 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆'PRELIMINÄR')(A(11)); ┆
0x3b9e4…3b9f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3b9f3…3ba13 (38, 0, 17) 20 20 20 20 20 20 20 20 50 55 54 20 45 44 49 54 28 54 32 35 29 28 41 28 33 35 29 29 28 27 31 39 ┆ PUT EDIT(T25)(A(35))('19┆
0x3ba13…3ba33 27 29 28 41 29 28 44 41 54 55 4d 29 28 41 28 32 29 29 28 27 2d 27 29 28 41 29 28 53 55 42 53 54 ┆')(A)(DATUM)(A(2))('-')(A)(SUBST┆
0x3ba33…3ba42 52 28 44 41 54 55 4d 2c 33 2c 32 29 29 20 20 ┆R(DATUM,3,2)) ┆
0x3ba42…3ba62 (38, 0, 18) 20 20 20 20 20 20 20 20 28 41 29 28 27 2d 27 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d ┆ (A)('-')(A)(SUBSTR(DATUM┆
0x3ba62…3ba82 2c 35 2c 32 29 29 28 41 28 34 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,5,2))(A(4)) ┆
0x3ba82…3ba91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ba91…3bab1 (38, 0, 19) 20 20 20 20 20 20 20 20 28 27 53 49 44 27 29 28 41 28 34 29 29 28 53 49 44 41 29 28 41 29 20 53 ┆ ('SID')(A(4))(SIDA)(A) S┆
0x3bab1…3bad1 4b 49 50 28 32 29 20 45 44 49 54 28 54 36 30 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆KIP(2) EDIT(T60)(A); ┆
0x3bad1…3bae0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bae0…3bb00 (38, 0, 20) 20 20 20 20 20 20 20 20 52 3d 20 52 41 44 41 4e 54 20 2d 20 35 3b 20 20 20 20 20 20 20 20 20 20 ┆ R= RADANT - 5; ┆
0x3bb00…3bb20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bb20…3bb2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bb2f…3bb4f (38, 0, 21) 20 20 20 20 20 20 20 20 53 49 44 41 3d 53 49 44 41 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SIDA=SIDA+1; ┆
0x3bb4f…3bb6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bb6f…3bb7e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bb7e…3bb9e (38, 0, 22) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x3bb9e…3bbbe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bbbe…3bbcd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bbcd…3bbed (38, 0, 23) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3bbed…3bc0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bc0d…3bc1c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bc1c…3bc6b (38, 0, 24) 0x20[0x4f]
0x3bc6b…3bc8b (38, 0, 25) 53 4b 52 49 56 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV:PROC; ┆
0x3bc8b…3bcab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bcab…3bcba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bcba…3bcda (38, 0, 26) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP; ┆
0x3bcda…3bcfa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bcfa…3bd09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bd09…3bd29 (38, 0, 27) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 4e 52 20 54 48 45 4e 20 50 55 54 20 53 4b ┆ IF VERNR =NR THEN PUT SK┆
0x3bd29…3bd49 49 50 20 45 44 49 54 28 42 4f 4b 44 41 47 2b 37 38 30 30 30 30 29 28 41 28 38 29 29 3b 20 20 20 ┆IP EDIT(BOKDAG+780000)(A(8)); ┆
0x3bd49…3bd58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bd58…3bd78 (38, 0, 28) 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 45 44 49 54 28 27 20 27 29 28 41 28 38 29 29 ┆ ELSE PUT EDIT(' ')(A(8))┆
0x3bd78…3bd98 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x3bd98…3bda7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bda7…3bdc7 (38, 0, 29) 20 20 20 20 20 20 20 20 49 46 20 42 4f 4b 44 41 47 7f 3d 50 45 52 44 41 47 20 54 48 45 4e 20 50 ┆ IF BOKDAG =PERDAG THEN P┆
0x3bdc7…3bde7 55 54 20 45 44 49 54 28 50 45 52 44 41 47 2b 37 38 30 30 30 30 29 28 41 28 38 29 29 3b 20 20 20 ┆UT EDIT(PERDAG+780000)(A(8)); ┆
0x3bde7…3bdf6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bdf6…3be16 (38, 0, 30) 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 45 44 49 54 28 27 20 27 29 28 41 28 38 29 29 ┆ ELSE PUT EDIT(' ')(A(8))┆
0x3be16…3be36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x3be36…3be45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3be45…3be65 (38, 0, 31) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 4e 52 20 54 48 45 4e 20 50 55 54 20 45 44 ┆ IF VERNR =NR THEN PUT ED┆
0x3be65…3be85 49 54 28 56 45 52 4e 52 29 28 50 27 5a 5a 5a 39 27 2c 58 28 33 29 29 3b 20 20 20 20 20 20 20 20 ┆IT(VERNR)(P'ZZZ9',X(3)); ┆
0x3be85…3be94 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3be94…3beb4 (38, 0, 32) 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 45 44 49 54 28 27 20 27 29 28 41 28 37 29 29 ┆ ELSE PUT EDIT(' ')(A(7))┆
0x3beb4…3bed4 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x3bed4…3bee3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bee3…3bf03 (38, 0, 33) 20 20 20 20 20 20 20 20 50 55 54 20 45 44 49 54 28 4b 4f 4e 54 4f 52 29 28 41 28 31 33 29 29 28 ┆ PUT EDIT(KONTOR)(A(13))(┆
0x3bf03…3bf23 54 31 34 29 28 41 28 31 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T14)(A(16)); ┆
0x3bf23…3bf32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bf32…3bf52 (38, 0, 34) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 4e 52 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆ IF VERNR =NR THEN DO; ┆
0x3bf52…3bf72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bf72…3bf81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bf81…3bfa1 (38, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 45 44 49 54 28 54 45 58 54 29 28 41 29 3b 20 20 20 ┆ PUT EDIT(TEXT)(A); ┆
0x3bfa1…3bfc1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bfc1…3bfd0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3bfd0…3bff0 (38, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x3bff0…3c010 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c010…3c01f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c01f…3c03f (38, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 4e 52 3d 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ NR=VERNR; ┆
0x3c03f…3c05f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c05f…3c06e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c06e…3c08e (38, 0, 38) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3c08e…3c0ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c0ae…3c0bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c0bd…3c0dd (38, 0, 39) 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x3c0dd…3c0fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c0fd…3c10c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c10c…3c12c (38, 0, 40) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x3c12c…3c14c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c14c…3c15b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c15b…3c17b (38, 0, 41) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3c17b…3c19b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c19b…3c1aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c1aa…3c1f9 (38, 0, 42) 0x20[0x4f]
[…0x1…]
0x3c248…3c268 (38, 0, 44) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x3c268…3c288 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x3c288…3c297 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c297…3c2e6 (38, 0, 45) 0x20[0x4f]
[…0x1…]
0x3c335…3c355 (38, 0, 47) 53 54 41 52 54 3a 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆START: CALL DATCHECK(DATUM); ┆
0x3c355…3c375 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c375…3c384 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c384…3c3a4 (38, 0, 48) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 43 ┆ IF DATUM='0 ' THEN C┆
0x3c3a4…3c3c4 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ALL PLOAD('Q '); ┆
0x3c3c4…3c3d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c3d3…3c3f3 (38, 0, 49) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x3c3f3…3c413 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c413…3c422 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c422…3c442 (38, 0, 50) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x3c442…3c462 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c462…3c471 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c471…3c491 (38, 0, 51) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x3c491…3c4b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c4b1…3c4c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c4c0…3c50f (38, 0, 52) 0x20[0x4f]
0x3c50f…3c52f (38, 0, 53) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x3c52f…3c54f 52 53 49 4f 4e 29 28 41 28 39 36 29 29 28 27 55 54 53 4b 52 49 46 54 20 41 56 20 56 45 52 2e 46 ┆RSION)(A(96))('UTSKRIFT AV VER.F┆
0x3c54f…3c55e 5c 52 54 45 43 4b 4e 49 4e 47 27 29 20 20 20 ┆ÖRTECKNING') ┆
0x3c55e…3c57e (38, 0, 54) 20 20 20 20 20 20 20 20 28 41 28 34 35 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ (A(45)); ┆
0x3c57e…3c59e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c59e…3c5ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c5ad…3c5cd (38, 0, 55) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x3c5cd…3c5ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c5ed…3c5fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c5fc…3c61c (38, 0, 56) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 46 49 4c 4f 50 45 4e 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL FILOPEN; ┆
0x3c61c…3c63c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c63c…3c64b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c64b…3c66b (38, 0, 57) 20 20 20 20 20 20 20 20 49 46 20 4d 41 58 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4c 55 54 ┆ IF MAX=0 THEN GO TO SLUT┆
0x3c66b…3c68b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x3c68b…3c69a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c69a…3c6ba (38, 0, 58) 4c 31 3a 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L1: CALL POST; ┆
0x3c6ba…3c6da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c6da…3c6e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c6e9…3c709 (38, 0, 59) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 ┆ IF RCODE =0 THEN GO TO F┆
0x3c709…3c729 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EL; ┆
0x3c729…3c738 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c738…3c758 (38, 0, 60) 20 20 20 20 20 20 20 20 41 4e 54 5f 4b 4f 4e 54 3d 41 4e 54 5f 4b 4f 4e 54 2b 31 3b 20 20 20 20 ┆ ANT_KONT=ANT_KONT+1; ┆
0x3c758…3c778 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c778…3c787 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c787…3c7a7 (38, 0, 61) 20 20 20 20 20 20 20 20 49 46 20 52 3c 38 20 26 20 56 45 52 4e 52 7f 3d 4e 52 20 54 48 45 4e 20 ┆ IF R<8 & VERNR =NR THEN ┆
0x3c7a7…3c7c7 43 41 4c 4c 20 52 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL RUB; ┆
0x3c7c7…3c7d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c7d6…3c7f6 (38, 0, 62) 20 20 20 20 20 20 20 20 49 46 20 52 3c 35 20 54 48 45 4e 20 43 41 4c 4c 20 52 55 42 3b 20 20 20 ┆ IF R<5 THEN CALL RUB; ┆
0x3c7f6…3c816 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c816…3c825 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c825…3c845 (38, 0, 63) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 52 45 44 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL KONTORED; ┆
0x3c845…3c865 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c865…3c874 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c874…3c894 (38, 0, 64) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 42 45 4c 4f 50 50 2c 54 31 34 29 3b ┆ CALL BELRED(BELOPP,T14);┆
0x3c894…3c8b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c8b4…3c8c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c8c3…3c8e3 (38, 0, 65) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL SKRIV; ┆
0x3c8e3…3c903 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c903…3c912 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c912…3c932 (38, 0, 66) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x3c932…3c952 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c952…3c961 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c961…3c9b0 (38, 0, 67) 0x20[0x4f]
0x3c9b0…3c9d0 (38, 0, 68) 46 45 4c 3a 20 20 20 20 49 46 20 52 43 4f 44 45 3d 31 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆FEL: IF RCODE=10 THEN DO; ┆
0x3c9d0…3c9f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c9f0…3c9ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3c9ff…3ca1f (38, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 7f 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF R =0 THEN DO; ┆
0x3ca1f…3ca3f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ca3f…3ca4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ca4e…3ca6e (38, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 41 4e 54 ┆ PUT SKIP(2) EDIT('ANT┆
0x3ca6e…3ca8e 41 4c 20 4b 4f 4e 54 45 52 49 4e 47 41 52 3a 27 29 28 41 28 31 39 29 29 28 41 4e 54 5f 4b 4f 4e ┆AL KONTERINGAR:')(A(19))(ANT_KON┆
0x3ca8e…3ca9d 54 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆T)(A); ┆
0x3ca9d…3cabd (38, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 2d 32 29 3b 20 20 20 20 ┆ PUT SKIP(R-2); ┆
0x3cabd…3cadd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cadd…3caec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3caec…3cb0c (38, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3cb0c…3cb2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cb2c…3cb3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cb3b…3cb5b (38, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT; ┆
0x3cb5b…3cb7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cb7b…3cb8a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cb8a…3cbaa (38, 0, 74) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3cbaa…3cbca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cbca…3cbd9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cbd9…3cbf9 (38, 0, 75) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 33 29 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c ┆ PUT SKIP(3) LIST('LÄSFEL┆
0x3cbf9…3cc19 20 49 20 54 52 41 4e 53 46 49 4c 27 2c 46 45 4c 54 41 42 28 52 43 4f 44 45 29 29 20 53 4b 49 50 ┆ I TRANSFIL',FELTAB(RCODE)) SKIP┆
0x3cc19…3cc28 28 52 2d 33 29 3b 20 20 20 20 20 20 20 20 20 ┆(R-3); ┆
0x3cc28…3cc77 (38, 0, 76) 0x20[0x4f]
0x3cc77…3cc97 (38, 0, 77) 53 4c 55 54 3a 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: D=DATUM; ┆
0x3cc97…3ccb7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ccb7…3ccc6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ccc6…3cce6 (38, 0, 78) 20 20 20 20 20 20 20 20 49 46 20 59 7f 3d 27 32 20 27 20 54 48 45 4e 20 43 41 4c 4c 20 50 4c 4f ┆ IF Y ='2 ' THEN CALL PLO┆
0x3cce6…3cd06 41 44 28 27 56 39 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AD('V9 '); ┆
0x3cd06…3cd15 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cd15…3cd35 (38, 0, 79) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x3cd35…3cd55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cd55…3cd64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cd64…3cdb3 (38, 0, 80) 0x20[0x4f]
0x3cdb3…3cdd3 (38, 0, 81) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3cdd3…3cdf3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cdf3…3ce02 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ce02…3ce22 (39, 0, 0) 2f 2a 20 56 39 31 20 53 4b 52 49 56 45 52 20 55 54 20 45 4e 20 41 56 53 54 5b 4d 4e 49 4e 47 53 ┆/* V91 SKRIVER UT EN AVSTÄMNINGS┆
0x3ce22…3ce42 4c 49 53 54 20 5c 56 45 52 20 53 41 4d 54 4c 49 47 41 20 56 45 52 49 46 49 4b 41 54 49 4f 4e 45 ┆LIST ÖVER SAMTLIGA VERIFIKATIONE┆
0x3ce42…3ce51 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R ┆
0x3ce51…3ce71 (39, 0, 1) 20 20 20 49 20 54 52 41 4e 53 46 49 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I TRANSFIL ┆
0x3ce71…3ce91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ce91…3cea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cea0…3cec0 (39, 0, 2) 20 20 20 44 56 53 20 53 55 4d 4d 45 52 41 52 20 53 41 4d 4d 41 4e 20 4b 4f 4e 54 45 52 49 4e 47 ┆ DVS SUMMERAR SAMMAN KONTERING┆
0x3cec0…3cee0 41 52 20 4d 45 44 20 53 41 4d 4d 41 20 41 4e 44 52 41 53 49 46 46 52 41 20 49 20 4b 4f 4e 54 4f ┆AR MED SAMMA ANDRASIFFRA I KONTO┆
0x3cee0…3ceef 4e 55 4d 4d 4d 52 45 54 20 20 20 20 20 20 20 ┆NUMMMRET ┆
0x3ceef…3cf0f (39, 0, 3) 20 20 20 53 41 4d 54 20 45 54 54 20 54 4f 54 41 4c 54 20 53 41 4c 44 4f 20 4c 49 53 54 41 4e 20 ┆ SAMT ETT TOTALT SALDO LISTAN ┆
0x3cf0f…3cf2f 4f 4d 46 41 54 54 41 52 20 5b 56 45 4e 20 55 50 50 47 49 46 54 20 4f 4d 20 4f 4d 20 49 4e 47 5d ┆OMFATTAR ÄVEN UPPGIFT OM OM INGÅ┆
0x3cf2f…3cf3e 45 4e 44 45 20 56 45 52 4e 52 20 20 20 20 20 ┆ENDE VERNR ┆
0x3cf3e…3cf5e (39, 0, 4) 20 20 20 56 20 30 3a 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ V 0:1 ┆
0x3cf5e…3cf7e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cf7e…3cf8d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cf8d…3cfad (39, 0, 5) 20 20 20 50 52 47 20 4a 5d 20 37 38 30 39 31 35 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PRG JÅ 780915 */ ┆
0x3cfad…3cfcd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cfcd…3cfdc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3cfdc…3d02b (39, 0, 6) 0x20[0x4f]
[…0x2…]
0x3d0c9…3d0e9 (39, 0, 9) 44 43 4c 20 41 52 45 41 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL AREAP POINTER, ┆
0x3d0e9…3d109 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d109…3d118 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d118…3d138 (39, 0, 10) 20 20 20 20 31 20 56 45 52 53 54 52 20 42 41 53 45 44 28 41 52 45 41 50 29 2c 20 20 20 20 20 20 ┆ 1 VERSTR BASED(AREAP), ┆
0x3d138…3d158 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d158…3d167 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d167…3d187 (39, 0, 11) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 20 20 ┆ 2 KONTO FIXED(11), ┆
0x3d187…3d1a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d1a7…3d1b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d1b6…3d1d6 (39, 0, 12) 20 20 20 20 20 20 32 20 56 45 52 4e 52 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 VERNR FIXED(5), ┆
0x3d1d6…3d1f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d1f6…3d205 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d205…3d225 (39, 0, 13) 20 20 20 20 20 20 32 20 42 4f 4b 44 41 47 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 BOKDAG FIXED(5), ┆
0x3d225…3d245 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d245…3d254 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d254…3d274 (39, 0, 14) 20 20 20 20 20 20 32 20 50 45 52 44 41 47 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 PERDAG FIXED(5), ┆
0x3d274…3d294 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d294…3d2a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d2a3…3d2c3 (39, 0, 15) 20 20 20 20 20 20 32 20 42 45 4c 4f 50 50 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 20 ┆ 2 BELOPP FIXED(11), ┆
0x3d2c3…3d2e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d2e3…3d2f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d2f2…3d312 (39, 0, 16) 20 20 20 20 20 20 32 20 54 45 58 54 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT CHAR(13), ┆
0x3d312…3d332 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d332…3d341 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d341…3d361 (39, 0, 17) 20 20 20 20 54 52 41 4e 53 4c 20 42 49 4e 41 52 59 20 49 4e 49 54 28 33 34 29 3b 20 20 20 20 20 ┆ TRANSL BINARY INIT(34); ┆
0x3d361…3d381 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d381…3d390 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d390…3d3b0 (39, 0, 18) 20 20 20 20 2f 2a 20 33 34 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 34 BYTES */ ┆
0x3d3b0…3d3d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d3d0…3d3df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d3df…3d42e (39, 0, 19) 0x20[0x4f]
0x3d42e…3d44e (39, 0, 20) 44 43 4c 20 31 20 41 52 45 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 AREA, ┆
0x3d44e…3d46e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d46e…3d47d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d47d…3d49d (39, 0, 21) 20 20 20 20 20 20 32 20 43 48 28 31 30 30 29 20 43 48 41 52 28 31 30 30 29 3b 20 20 20 20 20 20 ┆ 2 CH(100) CHAR(100); ┆
0x3d49d…3d4bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d4bd…3d4cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d4cc…3d4ec (39, 0, 22) 20 20 20 20 2f 2a 20 31 30 20 30 30 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 ┆ /* 10 000 BYTES */ ┆
0x3d4ec…3d50c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d50c…3d51b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d51b…3d56a (39, 0, 23) 0x20[0x4f]
0x3d56a…3d58a (39, 0, 24) 44 43 4c 20 4e 52 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL NR BINARY, ┆
0x3d58a…3d5aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d5aa…3d5b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d5b9…3d5d9 (39, 0, 25) 20 20 20 20 54 31 31 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T11 CHAR(11), ┆
0x3d5d9…3d5f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d5f9…3d608 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d608…3d628 (39, 0, 26) 20 20 20 20 53 41 4c 44 4f 20 46 49 58 45 44 28 31 31 29 20 49 4e 49 54 28 30 29 2c 20 20 20 20 ┆ SALDO FIXED(11) INIT(0), ┆
0x3d628…3d648 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d648…3d657 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d657…3d677 (39, 0, 27) 20 20 20 20 4d 41 58 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX BINARY, ┆
0x3d677…3d697 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d697…3d6a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d6a6…3d6c6 (39, 0, 28) 20 20 20 20 52 43 4f 44 45 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE BINARY, ┆
0x3d6c6…3d6e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d6e6…3d6f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d6f5…3d715 (39, 0, 29) 20 20 20 20 54 52 41 4e 53 46 49 4c 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TRANSFIL FILE, ┆
0x3d715…3d735 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d735…3d744 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d744…3d764 (39, 0, 30) 20 20 20 20 53 55 4d 4d 41 28 30 3a 39 29 20 46 49 58 45 44 28 31 31 29 20 49 4e 49 54 28 28 31 ┆ SUMMA(0:9) FIXED(11) INIT((1┆
0x3d764…3d784 30 29 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆0)0), ┆
0x3d784…3d793 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d793…3d7b3 (39, 0, 31) 20 20 20 20 54 34 30 20 43 48 41 52 28 34 30 29 20 49 4e 49 54 28 27 41 56 53 54 5b 4d 4e 49 4e ┆ T40 CHAR(40) INIT('AVSTÄMNIN┆
0x3d7b3…3d7d3 47 53 4c 49 53 54 41 2c 56 45 52 49 46 49 4b 41 54 49 4f 4e 45 52 27 29 2c 20 20 20 20 20 20 20 ┆GSLISTA,VERIFIKATIONER'), ┆
0x3d7d3…3d7e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d7e2…3d802 (39, 0, 32) 20 20 20 20 46 45 4c 54 41 42 28 31 30 29 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 20 20 20 ┆ FELTAB(10) CHAR(47) INIT( ┆
0x3d802…3d822 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d822…3d831 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d831…3d851 (39, 0, 33) 20 20 20 20 27 53 45 4b 54 4f 52 20 48 45 41 44 45 52 20 4e 4f 54 20 46 4f 55 4e 44 27 2c 20 20 ┆ 'SEKTOR HEADER NOT FOUND', ┆
0x3d851…3d871 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d871…3d880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d880…3d8a0 (39, 0, 34) 20 20 20 20 27 52 45 41 44 20 45 52 52 4f 52 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'READ ERROR', ┆
0x3d8a0…3d8c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d8c0…3d8cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d8cf…3d8ef (39, 0, 35) 20 20 20 20 27 57 52 49 54 45 20 45 52 52 4f 52 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'WRITE ERROR', ┆
0x3d8ef…3d90f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d90f…3d91e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d91e…3d93e (39, 0, 36) 20 20 20 20 27 4b 45 59 20 4e 4f 54 20 46 4f 55 4e 44 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'KEY NOT FOUND', ┆
0x3d93e…3d95e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d95e…3d96d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d96d…3d98d (39, 0, 37) 20 20 20 20 27 4e 5d 47 4f 4e 20 44 49 53 4b 45 54 54 20 48 41 52 20 46 4c 59 54 54 41 54 53 27 ┆ 'NÅGON DISKETT HAR FLYTTATS'┆
0x3d98d…3d9ad 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, ┆
0x3d9ad…3d9bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3d9bc…3d9dc (39, 0, 38) 20 20 20 20 27 45 4e 20 41 56 20 46 49 4c 45 52 4e 41 20 5b 52 20 46 5c 52 20 4c 49 54 45 4e 27 ┆ 'EN AV FILERNA ÄR FÖR LITEN'┆
0x3d9dc…3d9fc 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, ┆
0x3d9fc…3da0b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3da0b…3da2b (39, 0, 39) 20 20 20 20 27 45 4e 20 41 56 20 46 49 4c 45 52 4e 41 20 5b 52 20 53 4b 52 49 56 53 4b 59 44 44 ┆ 'EN AV FILERNA ÄR SKRIVSKYDD┆
0x3da2b…3da4b 41 44 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AD'), ┆
0x3da4b…3da5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3da5a…3da7a (39, 0, 40) 20 20 20 20 54 31 34 20 43 48 41 52 28 31 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T14 CHAR(14), ┆
0x3da7a…3da9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3da9a…3daa9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3daa9…3dac9 (39, 0, 41) 20 20 20 20 4d 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ M BINARY INIT(0), ┆
0x3dac9…3dae9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dae9…3daf8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3daf8…3db18 (39, 0, 42) 20 20 20 20 4e 41 4d 4e 28 33 29 20 43 48 41 52 28 31 31 29 20 49 4e 49 54 28 27 4d 45 4c 4c 41 ┆ NAMN(3) CHAR(11) INIT('MELLA┆
0x3db18…3db38 4e 4b 52 41 46 54 27 2c 27 4b 56 56 2f 4b 57 41 52 4f 53 27 2c 27 41 52 4f 53 27 29 2c 20 20 20 ┆NKRAFT','KVV/KWAROS','AROS'), ┆
0x3db38…3db47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3db47…3db67 (39, 0, 43) 20 20 20 20 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ P POINTER, ┆
0x3db67…3db87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3db87…3db96 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3db96…3dbb6 (39, 0, 44) 20 20 20 20 44 20 42 41 53 45 44 28 50 29 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 ┆ D BASED(P) CHAR(6), ┆
0x3dbb6…3dbd6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dbd6…3dbe5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dbe5…3dc05 (39, 0, 45) 20 20 20 20 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM CHAR(6), ┆
0x3dc05…3dc25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dc25…3dc34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dc34…3dc54 (39, 0, 46) 20 20 20 20 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PP POINTER, ┆
0x3dc54…3dc74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dc74…3dc83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dc83…3dca3 (39, 0, 47) 20 20 20 20 31 20 53 54 52 58 20 42 41 53 45 44 28 50 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 STRX BASED(PP), ┆
0x3dca3…3dcc3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dcc3…3dcd2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dcd2…3dcf2 (39, 0, 48) 20 20 20 20 20 20 32 20 58 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 X CHAR(2), ┆
0x3dcf2…3dd12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dd12…3dd21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dd21…3dd41 (39, 0, 49) 20 20 20 20 20 20 32 20 59 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 Y CHAR(2), ┆
0x3dd41…3dd61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dd61…3dd70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3dd70…3dd90 (39, 0, 50) 20 20 20 20 20 20 32 20 46 49 52 4d 41 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIRMA CHAR(1), ┆
0x3dd90…3ddb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ddb0…3ddbf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ddbf…3dddf (39, 0, 51) 20 20 20 20 20 20 20 20 32 20 20 4f 50 5f 4b 4f 44 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 ┆ 2 OP_KOD BINARY, ┆
0x3dddf…3ddff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ddff…3de0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3de0e…3de2e (39, 0, 52) 20 20 20 20 20 20 20 20 32 20 20 52 41 44 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 ┆ 2 RADANT BINARY, ┆
0x3de2e…3de4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3de4e…3de5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3de5d…3de7d (39, 0, 53) 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 27 20 20 56 39 20 ┆ VERSION CHAR(47) INIT(' V9 ┆
0x3de7d…3de9d 56 65 72 73 69 6f 6e 20 31 2e 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆Version 1.3 ┆
0x3de9d…3deac 20 20 20 20 38 33 31 30 31 31 27 29 3b 20 20 ┆ 831011'); ┆
0x3deac…3defb (39, 0, 54) 0x20[0x4f]
[…0x3…]
0x3dfe8…3e008 (39, 0, 58) 46 49 4c 4f 50 45 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FILOPEN:PROC; ┆
0x3e008…3e028 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e028…3e037 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e037…3e057 (39, 0, 59) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN TRANSFIL; ┆
0x3e057…3e077 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e077…3e086 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e086…3e0a6 (39, 0, 60) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 54 52 41 4e 53 46 49 4c 29 3b 20 20 20 20 ┆ CALL SEOF(TRANSFIL); ┆
0x3e0a6…3e0c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e0c6…3e0d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e0d5…3e0f5 (39, 0, 61) 20 20 20 20 20 20 20 20 4d 41 58 3d 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3b 20 20 20 ┆ MAX=UNSPEC(TRANSFIL); ┆
0x3e0f5…3e115 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e115…3e124 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e124…3e144 (39, 0, 62) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3d 30 3b 20 20 20 20 20 ┆ UNSPEC(TRANSFIL)=0; ┆
0x3e144…3e164 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e164…3e173 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e173…3e193 (39, 0, 63) 20 20 20 20 20 20 20 20 49 4e 50 4f 53 54 45 52 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ INPOSTER=0; ┆
0x3e193…3e1b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e1b3…3e1c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e1c2…3e1e2 (39, 0, 64) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x3e1e2…3e202 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e202…3e211 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e211…3e231 (39, 0, 65) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3e231…3e251 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e251…3e260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e260…3e2af (39, 0, 66) 0x20[0x4f]
0x3e2af…3e2cf (39, 0, 67) 50 4f 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆POST:PROC; ┆
0x3e2cf…3e2ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e2ef…3e2fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e2fe…3e31e (39, 0, 68) 20 20 20 20 20 20 20 20 49 46 20 49 4e 50 4f 53 54 45 52 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 ┆ IF INPOSTER=0 THEN DO; ┆
0x3e31e…3e33e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e33e…3e34d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e34d…3e36d (39, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4d 41 58 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF MAX=0 THEN DO; ┆
0x3e36d…3e38d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e38d…3e39c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e39c…3e3bc (39, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 31 30 3b 20 20 20 20 20 20 20 20 20 ┆ RCODE=10; ┆
0x3e3bc…3e3dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e3dc…3e3eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e3eb…3e40b (39, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x3e40b…3e42b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e42b…3e43a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e43a…3e45a (39, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3e45a…3e47a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e47a…3e489 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e489…3e4a9 (39, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 32 35 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=255; ┆
0x3e4a9…3e4c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e4c9…3e4d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e4d8…3e4f8 (39, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 3e 4d 41 58 20 54 48 45 4e 20 4a 3d 4d 41 58 3b 20 ┆ IF J>MAX THEN J=MAX; ┆
0x3e4f8…3e518 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e518…3e527 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e527…3e547 (39, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 4d 41 58 3d 4d 41 58 2d 4a 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX=MAX-J; ┆
0x3e547…3e567 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e567…3e576 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e576…3e596 (39, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 54 52 41 4e 53 46 49 4c 2c 41 52 45 41 ┆ CALL RD(TRANSFIL,AREA┆
0x3e596…3e5b6 2c 4a 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,J,RCODE); ┆
0x3e5b6…3e5c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e5c5…3e5e5 (39, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 ┆ IF RCODE =0 THEN PUT ┆
0x3e5e5…3e605 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 54 52 41 4e 53 46 49 4c 27 2c 52 43 ┆SKIP LIST('LÄSFEL I TRANSFIL',RC┆
0x3e605…3e614 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ODE); ┆
0x3e614…3e634 (39, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 49 4e 50 4f 53 54 45 52 3d 4a 2d 31 3b 20 20 20 20 20 20 20 20 ┆ INPOSTER=J-1; ┆
0x3e634…3e654 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e654…3e663 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e663…3e683 (39, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 41 52 45 41 50 3d 41 44 44 52 28 41 52 45 41 29 3b 20 20 20 20 ┆ AREAP=ADDR(AREA); ┆
0x3e683…3e6a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e6a3…3e6b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e6b2…3e6d2 (39, 0, 80) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3e6d2…3e6f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e6f2…3e701 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e701…3e721 (39, 0, 81) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x3e721…3e741 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e741…3e750 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e750…3e770 (40, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 49 4e 50 4f 53 54 45 52 3d 49 4e 50 4f 53 54 45 52 2d 31 3b 20 ┆ INPOSTER=INPOSTER-1; ┆
0x3e770…3e790 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e790…3e79f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e79f…3e7bf (40, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 41 52 45 41 50 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(AREAP)=UNSPEC(┆
0x3e7bf…3e7df 41 52 45 41 50 29 2b 54 52 41 4e 53 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AREAP)+TRANSL; ┆
0x3e7df…3e7ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e7ee…3e80e (40, 0, 2) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3e80e…3e82e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e82e…3e83d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e83d…3e85d (40, 0, 3) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x3e85d…3e87d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e87d…3e88c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e88c…3e8ac (40, 0, 4) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3e8ac…3e8cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e8cc…3e8db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e8db…3e92a (40, 0, 5) 0x20[0x4f]
0x3e92a…3e94a (40, 0, 6) 53 4b 52 49 56 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV:PROC; ┆
0x3e94a…3e96a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e96a…3e979 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e979…3e999 (40, 0, 7) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 33 29 20 45 44 49 54 28 4e 41 4d 4e 28 46 49 ┆ PUT SKIP(3) EDIT(NAMN(FI┆
0x3e999…3e9b9 52 4d 41 2d 27 36 27 29 29 28 41 28 32 30 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RMA-'6'))(A(20)); ┆
0x3e9b9…3e9c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3e9c8…3e9e8 (40, 0, 8) 20 20 20 20 20 20 20 20 49 46 20 59 3d 27 33 20 27 20 54 48 45 4e 20 50 55 54 20 45 44 49 54 28 ┆ IF Y='3 ' THEN PUT EDIT(┆
0x3e9e8…3ea08 27 50 52 45 4c 49 4d 49 4e 5b 52 27 29 28 41 28 31 31 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆'PRELIMINÄR')(A(11)); ┆
0x3ea08…3ea17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ea17…3ea37 (40, 0, 9) 20 20 20 20 20 20 20 20 50 55 54 20 45 44 49 54 28 54 34 30 29 28 41 28 33 35 29 29 28 27 31 39 ┆ PUT EDIT(T40)(A(35))('19┆
0x3ea37…3ea57 27 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 31 2c 32 29 29 28 41 29 28 27 2d 27 29 ┆')(A)(SUBSTR(DATUM,1,2))(A)('-')┆
0x3ea57…3ea66 28 41 29 20 20 20 20 20 20 20 20 20 20 20 20 ┆(A) ┆
0x3ea66…3ea86 (40, 0, 10) 20 20 20 20 20 20 20 20 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 33 2c 32 29 29 28 41 29 28 27 ┆ (SUBSTR(DATUM,3,2))(A)('┆
0x3ea86…3eaa6 2d 27 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 35 2c 32 29 29 28 41 28 35 29 29 20 ┆-')(A)(SUBSTR(DATUM,5,2))(A(5)) ┆
0x3eaa6…3eab5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3eab5…3ead5 (40, 0, 11) 20 20 20 20 20 20 20 20 28 27 53 49 44 27 29 28 41 28 34 29 29 28 27 31 27 29 28 41 29 20 53 4b ┆ ('SID')(A(4))('1')(A) SK┆
0x3ead5…3eaf5 49 50 28 33 29 20 45 44 49 54 28 27 20 27 29 28 41 28 32 30 29 29 28 27 56 65 72 2e 6e 72 27 29 ┆IP(3) EDIT(' ')(A(20))('Ver.nr')┆
0x3eaf5…3eb04 28 41 28 38 29 29 20 20 20 20 20 20 20 20 20 ┆(A(8)) ┆
0x3eb04…3eb24 (40, 0, 12) 20 20 20 20 20 20 20 20 28 4e 52 29 28 41 29 28 27 20 2d 20 27 29 28 41 29 28 56 45 52 4e 52 29 ┆ (NR)(A)(' - ')(A)(VERNR)┆
0x3eb24…3eb44 28 41 29 20 53 4b 49 50 28 33 29 20 45 44 49 54 28 27 20 27 29 28 41 28 32 30 29 29 20 20 20 20 ┆(A) SKIP(3) EDIT(' ')(A(20)) ┆
0x3eb44…3eb53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3eb53…3eb73 (40, 0, 13) 20 20 20 20 20 20 20 20 28 27 4b 4f 4e 54 4f 20 20 20 2b 2f 2d 20 20 20 20 20 20 20 42 45 4c 4f ┆ ('KONTO +/- BELO┆
0x3eb73…3eb93 50 50 27 29 28 41 29 20 53 4b 49 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PP')(A) SKIP; ┆
0x3eb93…3eba2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3eba2…3ebc2 (40, 0, 14) 20 20 20 20 20 20 20 20 44 4f 20 49 20 3d 20 30 20 54 4f 20 39 3b 20 20 20 20 20 20 20 20 20 20 ┆ DO I = 0 TO 9; ┆
0x3ebc2…3ebe2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ebe2…3ebf1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ebf1…3ec11 (40, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 27 20 27 29 28 41 28 ┆ PUT SKIP EDIT(' ')(A(┆
0x3ec11…3ec31 32 30 29 29 28 46 49 52 4d 41 29 28 41 29 28 49 29 28 41 29 28 27 78 78 78 27 29 28 41 28 37 29 ┆20))(FIRMA)(A)(I)(A)('xxx')(A(7)┆
0x3ec31…3ec40 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x3ec40…3ec60 (40, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 4d 4d 41 28 49 29 3e 30 20 54 48 45 4e 20 50 55 ┆ IF SUMMA(I)>0 THEN PU┆
0x3ec60…3ec80 54 20 45 44 49 54 28 27 2b 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T EDIT('+')(A); ┆
0x3ec80…3ec8f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ec8f…3ecaf (40, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 4d 4d 41 28 49 29 3c 30 20 54 48 45 4e 20 50 55 ┆ IF SUMMA(I)<0 THEN PU┆
0x3ecaf…3eccf 54 20 45 44 49 54 28 27 2d 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T EDIT('-')(A); ┆
0x3eccf…3ecde 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ecde…3ecfe (40, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 4d 4d 41 28 49 29 3d 30 20 54 48 45 4e 20 50 55 ┆ IF SUMMA(I)=0 THEN PU┆
0x3ecfe…3ed1e 54 20 45 44 49 54 28 27 20 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T EDIT(' ')(A); ┆
0x3ed1e…3ed2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ed2d…3ed4d (40, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 53 41 4c 44 4f 3d 53 41 4c 44 4f 2b 53 55 4d 4d 41 28 49 29 3b ┆ SALDO=SALDO+SUMMA(I);┆
0x3ed4d…3ed6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ed6d…3ed7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ed7c…3ed9c (40, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 4d 4d 41 28 49 29 3c 30 20 54 48 45 4e 20 53 55 ┆ IF SUMMA(I)<0 THEN SU┆
0x3ed9c…3edbc 4d 4d 41 28 49 29 3d 2d 53 55 4d 4d 41 28 49 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MMA(I)=-SUMMA(I); ┆
0x3edbc…3edcb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3edcb…3edeb (40, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 53 55 4d 4d 41 28 49 29 2c ┆ CALL BELRED(SUMMA(I),┆
0x3edeb…3ee0b 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T14); ┆
0x3ee0b…3ee1a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ee1a…3ee3a (40, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 45 44 49 54 28 54 31 34 29 28 41 29 3b 20 20 20 20 ┆ PUT EDIT(T14)(A); ┆
0x3ee3a…3ee5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ee5a…3ee69 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ee69…3ee89 (40, 0, 23) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3ee89…3eea9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3eea9…3eeb8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3eeb8…3eed8 (40, 0, 24) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 53 41 4c 44 4f 2c 54 31 34 29 3b 20 ┆ CALL BELRED(SALDO,T14); ┆
0x3eed8…3eef8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3eef8…3ef07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ef07…3ef27 (40, 0, 25) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 20 27 29 28 41 28 ┆ PUT SKIP(2) EDIT(' ')(A(┆
0x3ef27…3ef47 32 30 29 29 28 27 53 41 4c 44 4f 27 29 28 41 28 31 30 29 29 28 54 31 34 29 28 41 29 20 53 4b 49 ┆20))('SALDO')(A(10))(T14)(A) SKI┆
0x3ef47…3ef56 50 28 52 41 44 41 4e 54 20 2d 20 32 31 29 3b ┆P(RADANT - 21);┆
0x3ef56…3ef76 (40, 0, 26) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x3ef76…3ef96 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3ef96…3efa5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3efa5…3efc5 (40, 0, 27) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3efc5…3efe5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3efe5…3eff4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3eff4…3f043 (40, 0, 28) 0x20[0x4f]
[…0x1…]
0x3f092…3f0b2 (40, 0, 30) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x3f0b2…3f0d2 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x3f0d2…3f0e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f0e1…3f130 (40, 0, 31) 0x20[0x4f]
[…0x1…]
0x3f17f…3f19f (40, 0, 33) 53 54 41 52 54 3a 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆START: CALL DATCHECK(DATUM); ┆
0x3f19f…3f1bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f1bf…3f1ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f1ce…3f1ee (40, 0, 34) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 47 ┆ IF DATUM='0 ' THEN G┆
0x3f1ee…3f20e 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O TO SLUT; ┆
0x3f20e…3f21d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f21d…3f23d (40, 0, 35) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x3f23d…3f25d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f25d…3f26c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f26c…3f28c (40, 0, 36) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x3f28c…3f2ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f2ac…3f2bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f2bb…3f2db (40, 0, 37) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x3f2db…3f2fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f2fb…3f30a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f30a…3f359 (40, 0, 38) 0x20[0x4f]
0x3f359…3f379 (40, 0, 39) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x3f379…3f399 52 53 49 4f 4e 29 28 41 28 39 36 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RSION)(A(96)) ┆
0x3f399…3f3a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f3a8…3f3c8 (40, 0, 40) 20 20 20 20 20 20 20 20 28 27 55 54 53 4b 52 49 46 54 20 41 56 20 41 56 53 54 5b 4d 4e 49 4e 47 ┆ ('UTSKRIFT AV AVSTÄMNING┆
0x3f3c8…3f3e8 53 4c 49 53 54 41 27 29 28 41 28 34 35 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLISTA')(A(45)); ┆
0x3f3e8…3f3f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f3f7…3f417 (40, 0, 41) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x3f417…3f437 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f437…3f446 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f446…3f466 (40, 0, 42) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 46 49 4c 4f 50 45 4e 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL FILOPEN; ┆
0x3f466…3f486 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f486…3f495 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f495…3f4b5 (40, 0, 43) 20 20 20 20 20 20 20 20 49 46 20 4d 41 58 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4c 55 54 ┆ IF MAX=0 THEN GO TO SLUT┆
0x3f4b5…3f4d5 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x3f4d5…3f4e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f4e4…3f504 (40, 0, 44) 4c 31 3a 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L1: CALL POST; ┆
0x3f504…3f524 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f524…3f533 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f533…3f553 (40, 0, 45) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 ┆ IF RCODE =0 THEN GO TO F┆
0x3f553…3f573 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EL; ┆
0x3f573…3f582 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f582…3f5a2 (40, 0, 46) 20 20 20 20 20 20 20 20 49 46 20 4d 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF M=0 THEN DO; ┆
0x3f5a2…3f5c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f5c2…3f5d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f5d1…3f5f1 (40, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 4e 52 3d 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ NR=VERNR; ┆
0x3f5f1…3f611 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f611…3f620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f620…3f640 (40, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 4d 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ M=1; ┆
0x3f640…3f660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f660…3f66f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f66f…3f68f (40, 0, 49) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3f68f…3f6af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f6af…3f6be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f6be…3f6de (40, 0, 50) 20 20 20 20 20 20 20 20 54 31 31 3d 4b 4f 4e 54 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T11=KONTO; ┆
0x3f6de…3f6fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f6fe…3f70d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f70d…3f72d (40, 0, 51) 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 54 31 31 2c 31 2c 31 29 7f 3d 46 49 52 4d ┆ IF SUBSTR(T11,1,1) =FIRM┆
0x3f72d…3f74d 41 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A THEN DO; ┆
0x3f74d…3f75c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f75c…3f77c (40, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 35 29 20 45 44 49 54 28 54 34 30 29 ┆ PUT SKIP(5) EDIT(T40)┆
0x3f77c…3f79c 28 41 29 20 53 4b 49 50 28 35 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(A) SKIP(5) ┆
0x3f79c…3f7ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f7ab…3f7cb (40, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 45 44 49 54 28 27 46 52 5b 4d 41 4e 44 45 20 50 4f 53 54 45 52 ┆ EDIT('FRÄMANDE POSTER┆
0x3f7cb…3f7eb 20 49 20 54 52 41 4e 53 46 49 4c 45 4e 20 2a 2a 2a 2a 2a 2a 27 29 28 41 29 20 53 4b 49 50 28 33 ┆ I TRANSFILEN ******')(A) SKIP(3┆
0x3f7eb…3f7fa 38 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆8); ┆
0x3f7fa…3f81a (40, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x3f81a…3f83a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f83a…3f849 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f849…3f869 (40, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x3f869…3f889 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f889…3f898 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f898…3f8b8 (40, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 ┆ CALL PLOAD('Q '┆
0x3f8b8…3f8d8 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x3f8d8…3f8e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f8e7…3f907 (40, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3f907…3f927 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f927…3f936 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f936…3f956 (40, 0, 58) 20 20 20 20 20 20 20 20 4b 3d 53 55 42 53 54 52 28 54 31 31 2c 32 2c 31 29 3b 20 20 20 20 20 20 ┆ K=SUBSTR(T11,2,1); ┆
0x3f956…3f976 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f976…3f985 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f985…3f9a5 (40, 0, 59) 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 4b 29 3d 53 55 4d 4d 41 28 4b 29 2b 42 45 4c 4f 50 50 ┆ SUMMA(K)=SUMMA(K)+BELOPP┆
0x3f9a5…3f9c5 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x3f9c5…3f9d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3f9d4…3f9f4 (40, 0, 60) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x3f9f4…3fa14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fa14…3fa23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fa23…3fa72 (40, 0, 61) 0x20[0x4f]
0x3fa72…3fa92 (40, 0, 62) 46 45 4c 3a 20 20 20 20 49 46 20 52 43 4f 44 45 3d 31 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆FEL: IF RCODE=10 THEN DO; ┆
0x3fa92…3fab2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fab2…3fac1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fac1…3fae1 (40, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL SKRIV; ┆
0x3fae1…3fb01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fb01…3fb10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fb10…3fb30 (40, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT; ┆
0x3fb30…3fb50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fb50…3fb5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fb5f…3fb7f (40, 0, 65) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x3fb7f…3fb9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fb9f…3fbae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fbae…3fbce (40, 0, 66) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 33 29 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c ┆ PUT SKIP(3) LIST('LÄSFEL┆
0x3fbce…3fbee 20 49 20 54 52 41 4e 53 46 49 4c 27 2c 46 45 4c 54 41 42 28 52 43 4f 44 45 29 29 20 53 4b 49 50 ┆ I TRANSFIL',FELTAB(RCODE)) SKIP┆
0x3fbee…3fbfd 28 34 35 29 3b 20 20 20 20 20 20 20 20 20 20 ┆(45); ┆
0x3fbfd…3fc4c (40, 0, 67) 0x20[0x4f]
0x3fc4c…3fc6c (40, 0, 68) 53 4c 55 54 3a 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: D=DATUM; ┆
0x3fc6c…3fc8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fc8c…3fc9b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fc9b…3fcbb (40, 0, 69) 20 20 20 20 20 20 20 20 49 46 20 59 7f 3d 27 33 20 27 20 26 20 53 41 4c 44 4f 3d 30 20 54 48 45 ┆ IF Y ='3 ' & SALDO=0 THE┆
0x3fcbb…3fcdb 4e 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 56 36 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 ┆N CALL PLOAD('V6 '); ┆
0x3fcdb…3fcea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fcea…3fd0a (40, 0, 70) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x3fd0a…3fd2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fd2a…3fd39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fd39…3fd88 (40, 0, 71) 0x20[0x4f]
0x3fd88…3fda8 (40, 0, 72) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x3fda8…3fdc8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fdc8…3fdd7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3fdd7…3fdf7 (40, 0, 73) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3fe17…3fe26 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3fe26…3fe46 (40, 0, 74) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3fe66…3fe75 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3fe75…3fe95 (40, 0, 75) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3feb5…3fec4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3fec4…3fee4 (40, 0, 76) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3ff04…3ff13 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3ff13…3ff33 (40, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3ff53…3ff62 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3ff62…3ff82 (40, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3ffa2…3ffb1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x3ffb1…3ffd1 (40, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x3fff1…40000 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x40000…40020 (40, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x40040…4004f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4004f…4006f (40, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4008f…4009e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4009e…400be (41, 0, 0) 2f 2a 20 56 31 30 20 53 4b 52 49 56 45 52 20 55 54 20 4b 4f 4e 54 4f 55 54 44 52 41 47 20 26 20 ┆/* V10 SKRIVER UT KONTOUTDRAG & ┆
0x400be…400de 53 41 4c 44 4f 4c 49 53 54 4f 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SALDOLISTOR ┆
0x400de…400ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x400ed…4010d (41, 0, 1) 20 20 20 4c 49 53 54 41 4e 53 20 4f 4d 46 41 54 54 4e 49 4e 47 20 42 45 47 52 5b 4e 53 41 53 20 ┆ LISTANS OMFATTNING BEGRÄNSAS ┆
0x4010d…4012d 41 56 20 32 20 4b 4f 4e 54 4f 4e 55 4d 4d 45 52 20 26 20 32 20 44 41 54 55 4d 20 20 20 20 20 20 ┆AV 2 KONTONUMMER & 2 DATUM ┆
0x4012d…4013c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4013c…4015c (41, 0, 2) 20 20 20 56 20 30 3a 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ V 0:1 ┆
0x4015c…4017c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4017c…4018b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4018b…401ab (41, 0, 3) 20 20 20 37 38 30 39 32 37 20 4a 5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 780927 JÅ ┆
0x401ab…401cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x401cb…401da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x401da…401fa (41, 0, 4) 20 20 20 5b 6e 64 72 61 64 20 38 30 30 31 32 39 20 4f 42 67 2e 20 4b 6f 6e 74 6f 74 65 78 74 20 ┆ Ändrad 800129 OBg. Kontotext ┆
0x401fa…4021a 70 7d 20 73 61 6c 64 6f 6c 69 73 74 61 6e 20 69 6e 6c 61 67 64 2e 20 56 65 72 73 69 6f 6e 20 31 ┆på saldolistan inlagd. Version 1┆
0x4021a…40229 2e 33 2e 20 20 20 20 20 20 20 20 20 20 20 20 ┆.3. ┆
0x40229…40249 (41, 0, 5) 20 20 20 52 7b 74 74 61 64 20 6d 2e 61 2e 70 2e 20 66 7c 72 65 67 2e 20 7b 6e 64 72 2e 20 73 61 ┆ Rättad m.a.p. föreg. ändr. sa┆
0x40249…40269 6d 74 20 76 69 73 73 61 20 6e 7c 74 74 65 72 20 74 69 6c 6c 66 2e 20 56 65 72 20 31 2e 34 20 38 ┆mt vissa nötter tillf. Ver 1.4 8┆
0x40269…40278 30 30 33 33 31 2e 20 20 20 20 20 20 20 20 20 ┆00331. ┆
0x40278…40298 (41, 0, 6) 20 20 20 52 7b 74 74 65 6c 73 65 20 61 76 20 73 74 6f 70 70 6b 74 6f 20 39 39 39 39 39 39 39 39 ┆ Rättelse av stoppkto 99999999┆
0x40298…402b8 39 39 39 20 74 69 6c 6c 20 53 4c 55 54 39 39 39 39 39 39 39 39 39 39 39 20 66 7c 72 20 61 74 74 ┆999 till SLUT99999999999 för att┆
0x402b8…402c7 20 73 75 6d 6d 65 72 69 6e 67 20 20 20 20 20 ┆ summering ┆
0x402c7…402e7 (41, 0, 7) 20 20 20 61 76 20 41 52 4f 53 4b 52 41 46 54 20 70 7d 20 66 7c 72 65 74 61 67 73 6b 6f 64 20 73 ┆ av AROSKRAFT på företagskod s┆
0x402e7…40307 6b 75 6c 6c 65 20 62 6c 69 20 6d 7c 6a 6c 69 67 38 30 30 39 31 36 2e 20 56 65 72 73 69 6f 6e 20 ┆kulle bli möjlig800916. Version ┆
0x40307…40316 31 2e 35 2e 20 20 20 20 20 20 20 20 20 20 20 ┆1.5. ┆
0x40316…40336 (41, 0, 8) 20 20 20 50 75 6e 6b 74 65 72 20 69 20 62 65 6c 6f 70 70 73 66 7b 6c 74 65 74 20 6d 65 6c 6c 61 ┆ Punkter i beloppsfältet mella┆
0x40336…40356 6e 20 68 75 6e 64 72 61 20 6f 63 68 20 74 75 73 65 6e 74 61 6c 20 6f 63 6b 20 6d 65 6c 6c 61 6e ┆n hundra och tusental ock mellan┆
0x40356…40365 20 74 75 73 65 6e 20 6f 63 68 20 20 20 20 20 ┆ tusen och ┆
0x40365…40385 (41, 0, 9) 20 20 20 6d 69 6c 6c 69 6f 6e 74 61 6c 2e 20 54 69 6c 6c 7b 6d 70 61 73 20 66 7c 72 73 74 20 65 ┆ milliontal. Tillämpas först e┆
0x40385…403a5 66 74 65 72 20 62 6f 6b 73 6c 2e 20 37 39 2f 38 30 2e 20 56 65 72 73 69 6f 6e 20 31 2e 36 20 38 ┆fter boksl. 79/80. Version 1.6 8┆
0x403a5…403b4 30 30 39 31 37 2e 20 20 20 20 20 20 20 20 20 ┆00917. ┆
0x403b4…403d4 (41, 0, 10) 20 20 4b 6f 6d 70 6c 65 74 74 65 72 61 73 20 6d 65 64 20 4d 65 6c 6c 61 6e 6b 72 61 66 74 20 38 ┆ Kompletteras med Mellankraft 8┆
0x403d4…403f4 34 30 31 31 30 2e 20 56 65 72 73 69 6f 6e 20 31 2e 36 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 ┆40110. Version 1.6 */ ┆
0x403f4…40403 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40403…40452 (41, 0, 11) 0x20[0x4f]
[…0x5…]
0x405dd…405fd (41, 0, 17) 44 43 4c 20 4b 4f 4e 54 4f 31 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL KONTO1 CHAR(11), ┆
0x405fd…4061d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4061d…4062c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4062c…4064c (41, 0, 18) 20 20 20 20 4b 4f 4e 54 4f 32 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTO2 CHAR(11), ┆
0x4064c…4066c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4066c…4067b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4067b…4069b (41, 0, 19) 20 20 20 20 52 4b 4f 4e 54 4f 31 20 43 48 41 52 28 31 33 29 20 49 4e 49 54 28 27 2d 2d 2d 2d 2d ┆ RKONTO1 CHAR(13) INIT('-----┆
0x4069b…406bb 2e 2d 2d 2d 2e 2d 2d 2d 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆.---.---'), ┆
0x406bb…406ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x406ca…406ea (41, 0, 20) 20 20 20 20 52 4b 4f 4e 54 4f 32 20 43 48 41 52 28 31 33 29 20 49 4e 49 54 28 27 2d 2d 2d 2d 2d ┆ RKONTO2 CHAR(13) INIT('-----┆
0x406ea…4070a 2e 2d 2d 2d 2e 2d 2d 2d 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆.---.---'), ┆
0x4070a…40719 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40719…40739 (41, 0, 21) 20 20 20 20 44 41 54 55 4d 31 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM1 CHAR(6), ┆
0x40739…40759 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40759…40768 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40768…40788 (41, 0, 22) 20 20 20 20 44 41 54 55 4d 32 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM2 CHAR(6), ┆
0x40788…407a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x407a8…407b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x407b7…407d7 (41, 0, 23) 20 20 20 20 44 41 54 31 42 49 4e 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DAT1BIN BINARY, ┆
0x407d7…407f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x407f7…40806 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40806…40826 (41, 0, 24) 20 20 20 20 44 41 54 32 42 49 4e 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DAT2BIN BINARY, ┆
0x40826…40846 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40846…40855 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40855…40875 (41, 0, 25) 20 20 20 20 53 50 54 59 50 20 42 49 4e 41 52 59 2c 20 20 20 20 20 2f 2a 20 20 20 20 20 20 20 20 ┆ SPTYP BINARY, /* ┆
0x40875…40895 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 20 3d 20 50 45 52 44 41 47 20 32 20 3d 20 42 4f ┆ 1 = PERDAG 2 = BO┆
0x40895…408a4 4b 44 41 47 20 2a 2f 20 20 20 20 20 20 20 20 ┆KDAG */ ┆
0x408a4…408c4 (41, 0, 26) 20 20 20 20 53 54 41 42 28 31 31 29 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ STAB(11) BINARY, ┆
0x408c4…408e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x408e4…408f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x408f3…40913 (41, 0, 27) 20 20 20 20 53 5f 4d 41 52 4b 20 43 48 41 52 28 31 33 29 20 49 4e 49 54 28 27 20 20 20 20 20 2e ┆ S_MARK CHAR(13) INIT(' .┆
0x40913…40933 20 20 20 2e 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ . '); ┆
0x40933…40942 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40942…40991 (41, 0, 28) 0x20[0x4f]
0x40991…409b1 (41, 0, 29) 44 43 4c 20 31 20 54 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 TSTR, ┆
0x409b1…409d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x409d1…409e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x409e0…40a00 (41, 0, 30) 20 20 20 20 20 20 32 20 56 45 52 4e 52 54 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 VERNRT FIXED(5), ┆
0x40a00…40a20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40a20…40a2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40a2f…40a4f (41, 0, 31) 20 20 20 20 20 20 32 20 44 41 54 55 4d 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 DATUMT BINARY, ┆
0x40a4f…40a6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40a6f…40a7e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40a7e…40a9e (41, 0, 32) 20 20 20 20 20 20 32 20 54 45 58 54 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT CHAR(13), ┆
0x40a9e…40abe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40abe…40acd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40acd…40aed (41, 0, 33) 20 20 20 20 20 20 32 20 41 4e 54 56 45 52 50 20 42 49 4e 41 52 59 3b 20 20 20 20 20 20 20 20 20 ┆ 2 ANTVERP BINARY; ┆
0x40aed…40b0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40b0d…40b1c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40b1c…40b3c (41, 0, 34) 44 43 4c 20 50 4b 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL PK POINTER, ┆
0x40b3c…40b5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40b5c…40b6b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40b6b…40b8b (41, 0, 35) 20 20 20 20 31 20 42 53 54 52 20 42 41 53 45 44 28 50 4b 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 BSTR BASED(PK), ┆
0x40b8b…40bab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40bab…40bba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40bba…40bda (41, 0, 36) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 4e 52 20 43 48 41 52 28 31 31 29 3b 20 20 20 20 20 20 20 ┆ 2 KONTONR CHAR(11); ┆
0x40bda…40bfa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40bfa…40c09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40c09…40c58 (41, 0, 37) 0x20[0x4f]
0x40c58…40c78 (41, 0, 38) 44 43 4c 20 50 42 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL PB POINTER, ┆
0x40c78…40c98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40c98…40ca7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40ca7…40cc7 (41, 0, 39) 20 20 20 20 31 20 42 45 4c 53 54 52 20 42 41 53 45 44 28 50 42 29 2c 20 20 20 20 20 20 20 20 20 ┆ 1 BELSTR BASED(PB), ┆
0x40cc7…40ce7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40ce7…40cf6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40cf6…40d16 (41, 0, 40) 20 20 20 20 20 20 32 20 56 45 52 4e 52 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 VERNR BINARY, ┆
0x40d16…40d36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40d36…40d45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40d45…40d65 (41, 0, 41) 20 20 20 20 20 20 32 20 50 44 41 54 55 4d 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 PDATUM BINARY, ┆
0x40d65…40d85 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40d85…40d94 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40d94…40db4 (41, 0, 42) 20 20 20 20 20 20 32 20 42 45 4c 4f 50 50 20 46 49 58 45 44 28 31 31 29 3b 20 20 20 20 20 20 20 ┆ 2 BELOPP FIXED(11); ┆
0x40db4…40dd4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40dd4…40de3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40de3…40e03 (41, 0, 43) 44 43 4c 20 31 20 41 52 45 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 AREA, ┆
0x40e03…40e23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40e23…40e32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40e32…40e52 (41, 0, 44) 20 20 20 20 20 20 32 20 43 48 28 32 35 35 29 20 43 48 41 52 28 36 31 29 3b 20 20 20 20 20 20 20 ┆ 2 CH(255) CHAR(61); ┆
0x40e52…40e72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40e72…40e81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40e81…40ea1 (41, 0, 45) 20 20 20 20 20 20 2f 2a 20 31 35 20 35 35 35 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 ┆ /* 15 555 BYTES */ ┆
0x40ea1…40ec1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40ec1…40ed0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40ed0…40f1f (41, 0, 46) 0x20[0x4f]
0x40f1f…40f3f (41, 0, 47) 44 43 4c 20 31 20 20 20 4b 4f 4e 54 4f 50 4f 53 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 KONTOPOST, ┆
0x40f3f…40f5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40f5f…40f6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40f6e…40f8e (41, 0, 48) 20 20 20 20 20 20 20 20 32 20 20 20 54 41 42 53 50 41 52 52 44 41 54 20 20 20 20 20 20 20 20 20 ┆ 2 TABSPARRDAT ┆
0x40f8e…40fae 20 20 20 46 49 58 45 44 20 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FIXED (6), ┆
0x40fae…40fbd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x40fbd…40fdd (41, 0, 49) 20 20 20 20 20 20 20 20 32 20 20 20 54 41 42 55 50 50 48 4d 41 52 4b 20 20 20 20 20 20 20 20 20 ┆ 2 TABUPPHMARK ┆
0x40fdd…40ffd 20 20 20 43 48 41 52 20 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (1), ┆
0x40ffd…4100c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4100c…4102c (41, 0, 50) 20 20 20 20 20 20 20 20 32 20 20 20 54 41 42 4c 49 53 54 4d 41 52 4b 20 20 20 20 20 20 20 20 20 ┆ 2 TABLISTMARK ┆
0x4102c…4104c 20 20 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY, ┆
0x4104c…4105b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4105b…4107b (41, 0, 51) 20 20 20 20 20 20 20 20 32 20 20 20 54 41 42 49 4b 4b 4f 52 53 4e 20 20 20 20 20 20 20 20 20 20 ┆ 2 TABIKKORSN ┆
0x4107b…4109b 20 20 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY, ┆
0x4109b…410aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x410aa…410ca (41, 0, 52) 20 20 20 20 20 20 20 20 32 20 20 20 54 41 42 54 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 TABTEXT ┆
0x410ca…410ea 20 20 20 43 48 41 52 20 28 33 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (32); ┆
0x410ea…410f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x410f9…41148 (41, 0, 53) 0x20[0x4f]
[…0x1…]
0x41197…411b7 (41, 0, 55) 44 43 4c 20 31 20 20 20 4c 49 4b 56 49 44 50 4f 53 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 LIKVIDPOST, ┆
0x411b7…411d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x411d7…411e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x411e6…41206 (41, 0, 56) 20 20 20 20 20 20 20 20 32 20 20 20 4c 4b 54 4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 LKTO ┆
0x41206…41226 20 20 20 46 49 58 45 44 20 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FIXED (5), ┆
0x41226…41235 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41235…41255 (41, 0, 57) 20 20 20 20 20 20 20 20 32 20 20 20 4c 44 41 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 LDAT ┆
0x41255…41275 20 20 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY, ┆
0x41275…41284 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41284…412a4 (41, 0, 58) 20 20 20 20 20 20 20 20 32 20 20 20 4c 42 45 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 LBEL ┆
0x412a4…412c4 20 20 20 46 49 58 45 44 20 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FIXED (11), ┆
0x412c4…412d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x412d3…412f3 (41, 0, 59) 20 20 20 20 20 20 20 20 32 20 20 20 46 49 4c 4c 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 FILLER ┆
0x412f3…41313 20 20 20 43 48 41 52 20 28 39 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (9); ┆
0x41313…41322 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41322…41371 (41, 0, 60) 0x20[0x4f]
0x41371…41391 (41, 0, 61) 44 43 4c 20 56 45 52 54 45 58 54 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL VERTEXT FILE, ┆
0x41391…413b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x413b1…413c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x413c0…413e0 (41, 0, 62) 20 20 20 20 56 45 52 42 45 4c 4f 50 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ VERBELOP FILE, ┆
0x413e0…41400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41400…4140f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4140f…4142f (41, 0, 63) 20 20 20 20 4b 4f 4e 54 4f 50 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTOP FILE, ┆
0x4142f…4144f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4144f…4145e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4145e…4147e (41, 0, 64) 20 20 20 20 4c 49 4b 56 49 44 20 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ LIKVID FILE, ┆
0x4147e…4149e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4149e…414ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x414ad…414cd (41, 0, 65) 20 20 20 20 42 53 54 52 4c 20 42 49 4e 41 52 59 20 49 4e 49 54 28 36 31 29 2c 20 20 20 20 20 20 ┆ BSTRL BINARY INIT(61), ┆
0x414cd…414ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x414ed…414fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x414fc…4151c (41, 0, 66) 20 20 20 20 4d 41 58 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX BINARY, ┆
0x4151c…4153c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4153c…4154b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4154b…4156b (41, 0, 67) 20 20 20 20 42 4c 4f 43 4b 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BLOCKANT BINARY, ┆
0x4156b…4158b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4158b…4159a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4159a…415ba (41, 0, 68) 20 20 20 20 4a 4b 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JK BINARY, ┆
0x415ba…415da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x415da…415e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x415e9…41609 (41, 0, 69) 20 20 20 20 4a 4a 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JJ BINARY, ┆
0x41609…41629 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41629…41638 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41638…41658 (41, 0, 70) 20 20 20 20 4c 49 53 54 54 59 50 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 2f ┆ LISTTYP BINARY, /┆
0x41658…41678 2a 20 31 20 3d 20 4b 4f 4e 54 4f 55 54 44 52 41 47 2c 20 20 20 32 20 3d 20 53 41 4c 44 4f 42 45 ┆* 1 = KONTOUTDRAG, 2 = SALDOBE┆
0x41678…41687 53 4b 45 44 20 2a 2f 20 20 20 20 20 20 20 20 ┆SKED */ ┆
0x41687…416a7 (41, 0, 71) 20 20 20 20 52 43 4f 44 45 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE BINARY, ┆
0x416a7…416c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x416c7…416d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x416d6…416f6 (41, 0, 72) 20 20 20 20 4b 4f 4e 54 4f 47 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTOG CHAR(11), ┆
0x416f6…41716 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41716…41725 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41725…41745 (41, 0, 73) 20 20 20 20 53 49 44 41 20 42 49 4e 41 52 59 20 49 4e 49 54 28 31 29 2c 20 20 20 20 20 20 20 20 ┆ SIDA BINARY INIT(1), ┆
0x41745…41765 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41765…41774 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41774…41794 (41, 0, 74) 20 20 20 20 52 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ R BINARY INIT(0), ┆
0x41794…417b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x417b4…417c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x417c3…417e3 (41, 0, 75) 20 20 20 20 4e 41 4d 4e 20 28 33 29 20 43 48 41 52 28 31 31 29 20 49 4e 49 54 28 27 4d 45 4c 4c ┆ NAMN (3) CHAR(11) INIT('MELL┆
0x417e3…41803 41 4e 4b 52 41 46 54 27 2c 27 4b 56 56 2f 4b 57 41 52 4f 53 27 2c 27 41 52 4f 53 27 29 2c 20 20 ┆ANKRAFT','KVV/KWAROS','AROS'), ┆
0x41803…41812 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41812…41832 (41, 0, 76) 20 20 20 20 52 54 45 58 54 28 38 29 20 43 48 41 52 28 32 32 29 20 49 4e 49 54 28 20 20 20 20 20 ┆ RTEXT(8) CHAR(22) INIT( ┆
0x41832…41852 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41852…41861 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41861…41881 (41, 0, 77) 20 20 20 20 27 4b 4f 4e 54 4f 55 54 44 52 41 47 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'KONTOUTDRAG', ┆
0x41881…418a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x418a1…418b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x418b0…418d0 (41, 0, 78) 20 20 20 20 27 53 41 4c 44 4f 42 45 53 4b 45 44 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'SALDOBESKED', ┆
0x418d0…418f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x418f0…418ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x418ff…4191f (41, 0, 79) 20 20 20 20 27 50 45 52 44 41 47 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'PERDAG', ┆
0x4191f…4193f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4193f…4194e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4194e…4196e (41, 0, 80) 20 20 20 20 27 42 4f 4b 44 41 47 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'BOKDAG', ┆
0x4196e…4198e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4198e…4199d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4199d…419bd (41, 0, 81) 20 20 20 20 27 42 4f 4b 44 41 47 20 20 50 45 52 44 41 47 20 20 20 20 56 45 52 2e 27 2c 20 20 20 ┆ 'BOKDAG PERDAG VER.', ┆
0x419bd…419dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x419dd…419ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x419ec…41a0c (42, 0, 0) 20 20 20 20 27 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ '', ┆
0x41a0c…41a2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41a2c…41a3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41a3b…41a5b (42, 0, 1) 20 20 20 20 27 54 45 58 54 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'TEXT', ┆
0x41a5b…41a7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41a7b…41a8a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41a8a…41aaa (42, 0, 2) 20 20 20 20 27 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ''), ┆
0x41aaa…41aca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41aca…41ad9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41ad9…41af9 (42, 0, 3) 20 20 20 20 52 4b 4f 4e 54 4f 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RKONTO CHAR(13), ┆
0x41af9…41b19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41b19…41b28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41b28…41b48 (42, 0, 4) 20 20 20 20 4b 4f 4e 54 4f 4e 52 47 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ KONTONRG CHAR(11), ┆
0x41b48…41b68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41b68…41b77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41b77…41b97 (42, 0, 5) 20 20 20 20 4b 4f 4e 54 4f 35 46 4f 52 45 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTO5FOREG ┆
0x41b97…41bb7 20 20 20 43 48 41 52 20 28 35 29 20 49 4e 49 54 20 28 27 30 30 30 30 30 27 29 2c 20 20 20 20 20 ┆ CHAR (5) INIT ('00000'), ┆
0x41bb7…41bc6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41bc6…41be6 (42, 0, 6) 20 20 20 20 54 45 58 54 4b 54 4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TEXTKTO ┆
0x41be6…41c06 20 20 20 43 48 41 52 20 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (5), ┆
0x41c06…41c15 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41c15…41c35 (42, 0, 7) 20 20 20 20 4b 54 4f 54 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KTOTEXT ┆
0x41c35…41c55 20 20 20 43 48 41 52 20 28 33 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (32), ┆
0x41c55…41c64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41c64…41c84 (42, 0, 8) 20 20 20 20 54 31 35 42 45 4c 52 45 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T15BELRED ┆
0x41c84…41ca4 20 20 20 43 48 41 52 20 28 31 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (15), ┆
0x41ca4…41cb3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41cb3…41cd3 (42, 0, 9) 20 20 20 20 4b 4f 4e 53 54 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONSTANT BINARY, ┆
0x41cd3…41cf3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41cf3…41d02 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41d02…41d22 (42, 0, 10) 20 20 20 20 42 55 46 46 20 43 48 41 52 28 32 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BUFF CHAR(20), ┆
0x41d22…41d42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41d42…41d51 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41d51…41d71 (42, 0, 11) 20 20 20 20 54 31 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T1 CHAR(1), ┆
0x41d71…41d91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41d91…41da0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41da0…41dc0 (42, 0, 12) 20 20 20 20 54 36 31 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T61 CHAR(6), ┆
0x41dc0…41de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41de0…41def 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41def…41e0f (42, 0, 13) 20 20 20 20 54 36 32 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T62 CHAR(6), ┆
0x41e0f…41e2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41e2f…41e3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41e3e…41e5e (42, 0, 14) 20 20 20 20 54 31 31 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T11 CHAR(11), ┆
0x41e5e…41e7e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41e7e…41e8d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41e8d…41ead (42, 0, 15) 20 20 20 20 54 31 33 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T13 CHAR(13), ┆
0x41ead…41ecd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41ecd…41edc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41edc…41efc (42, 0, 16) 20 20 20 20 54 31 34 20 43 48 41 52 28 31 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T14 CHAR(14), ┆
0x41efc…41f1c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41f1c…41f2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41f2b…41f4b (42, 0, 17) 20 20 20 20 54 31 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T15 ┆
0x41f4b…41f6b 20 20 20 43 48 41 52 20 28 31 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (15), ┆
0x41f6b…41f7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41f7a…41f9a (42, 0, 18) 20 20 20 20 4b 54 31 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT1 CHAR(1), ┆
0x41f9a…41fba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41fba…41fc9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x41fc9…41fe9 (42, 0, 19) 20 20 20 20 4b 54 32 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT2 CHAR(2), ┆
0x41fe9…42009 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42009…42018 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42018…42038 (42, 0, 20) 20 20 20 20 4b 54 33 20 43 48 41 52 28 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT3 CHAR(3), ┆
0x42038…42058 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42058…42067 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42067…42087 (42, 0, 21) 20 20 20 20 4b 54 34 20 43 48 41 52 28 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT4 CHAR(4), ┆
0x42087…420a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x420a7…420b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x420b6…420d6 (42, 0, 22) 20 20 20 20 4b 54 35 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT5 CHAR(5), ┆
0x420d6…420f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x420f6…42105 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42105…42125 (42, 0, 23) 20 20 20 20 4b 54 36 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT6 CHAR(6), ┆
0x42125…42145 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42145…42154 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42154…42174 (42, 0, 24) 20 20 20 20 4b 54 37 20 43 48 41 52 28 37 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT7 CHAR(7), ┆
0x42174…42194 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42194…421a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x421a3…421c3 (42, 0, 25) 20 20 20 20 4b 54 38 20 43 48 41 52 28 38 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT8 CHAR(8), ┆
0x421c3…421e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x421e3…421f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x421f2…42212 (42, 0, 26) 20 20 20 20 4b 54 39 20 43 48 41 52 28 39 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT9 CHAR(9), ┆
0x42212…42232 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42232…42241 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42241…42261 (42, 0, 27) 20 20 20 20 4b 54 31 30 20 43 48 41 52 28 31 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT10 CHAR(10), ┆
0x42261…42281 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42281…42290 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42290…422b0 (42, 0, 28) 20 20 20 20 4b 54 31 31 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT11 CHAR(11), ┆
0x422b0…422d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x422d0…422df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x422df…422ff (42, 0, 29) 20 20 20 20 46 58 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 49 58 45 44 28 36 29 2c ┆ FX6 FIXED(6),┆
0x422ff…4231f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4231f…4232e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4232e…4234e (42, 0, 30) 20 20 20 20 54 59 50 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 20 20 49 ┆ TYP1 BINARY I┆
0x4234e…4236e 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NIT(0), ┆
0x4236e…4237d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4237d…4239d (42, 0, 31) 20 20 20 20 54 59 50 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 20 49 4e ┆ TYP2 BINARY IN┆
0x4239d…423bd 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT(0), ┆
0x423bd…423cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x423cc…423ec (42, 0, 32) 20 20 20 20 4f 46 46 53 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 20 49 4e ┆ OFFSET BINARY IN┆
0x423ec…4240c 49 54 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT(1), ┆
0x4240c…4241b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4241b…4243b (42, 0, 33) 20 20 20 20 4c 45 4e 47 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 20 49 4e ┆ LENGD BINARY IN┆
0x4243b…4245b 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT(0), ┆
0x4245b…4246a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4246a…4248a (42, 0, 34) 20 20 20 20 53 55 4d 4d 41 28 31 31 29 20 20 20 20 20 20 20 20 20 20 46 49 58 45 44 28 31 31 29 ┆ SUMMA(11) FIXED(11)┆
0x4248a…424aa 20 49 4e 49 54 28 28 31 31 29 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ INIT((11)0), ┆
0x424aa…424b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x424b9…424d9 (42, 0, 35) 20 20 20 20 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 4f 49 4e 54 45 52 2c 20 ┆ P POINTER, ┆
0x424d9…424f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x424f9…42508 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42508…42528 (42, 0, 36) 20 20 20 20 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 41 52 28 36 29 20 42 ┆ D CHAR(6) B┆
0x42528…42548 41 53 45 44 28 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ASED(P), ┆
0x42548…42557 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42557…42577 (42, 0, 37) 20 20 20 20 44 41 54 55 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 41 52 28 36 29 2c 20 ┆ DATUM CHAR(6), ┆
0x42577…42597 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42597…425a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x425a6…425c6 (42, 0, 38) 20 20 20 20 42 52 59 54 44 41 54 20 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 2c 20 20 ┆ BRYTDAT BINARY, ┆
0x425c6…425e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x425e6…425f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x425f5…42615 (42, 0, 39) 20 20 20 20 44 41 54 53 57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 20 49 4e ┆ DATSW BINARY IN┆
0x42615…42635 49 54 20 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT (0), ┆
0x42635…42644 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42644…42664 (42, 0, 40) 20 20 20 20 50 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 4f 49 4e 54 45 52 2c 20 ┆ PP POINTER, ┆
0x42664…42684 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42684…42693 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42693…426b3 (42, 0, 41) 20 20 20 20 31 20 53 54 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 41 53 45 44 28 50 50 29 ┆ 1 STR BASED(PP)┆
0x426b3…426d3 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, ┆
0x426d3…426e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x426e2…42702 (42, 0, 42) 20 20 20 20 20 20 32 20 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 41 52 28 32 29 2c 20 ┆ 2 X CHAR(2), ┆
0x42702…42722 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42722…42731 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42731…42751 (42, 0, 43) 20 20 20 20 20 20 32 20 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 41 52 28 32 29 2c 20 ┆ 2 Y CHAR(2), ┆
0x42751…42771 20 20 20 20 20 2f 2a 20 36 20 3d 20 55 4b 54 4f 2c 20 20 37 20 3d 20 49 4b 53 4c 41 47 20 20 20 ┆ /* 6 = UKTO, 7 = IKSLAG ┆
0x42771…42780 20 20 20 20 20 2a 2f 20 20 20 20 20 20 20 20 ┆ */ ┆
0x42780…427a0 (42, 0, 44) 20 20 20 20 20 20 32 20 46 49 52 4d 41 20 20 20 20 20 20 20 20 20 20 43 48 41 52 20 28 31 29 2c ┆ 2 FIRMA CHAR (1),┆
0x427a0…427c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x427c0…427cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x427cf…427ef (42, 0, 45) 20 20 20 20 20 20 32 20 20 20 4f 50 5f 4b 4f 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 OP_KOD ┆
0x427ef…4280f 20 20 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY, ┆
0x4280f…4281e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4281e…4283e (42, 0, 46) 20 20 20 20 20 20 32 20 20 20 52 41 44 41 4e 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 RADANT ┆
0x4283e…4285e 20 20 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY, ┆
0x4285e…4286d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4286d…4288d (42, 0, 47) 20 20 20 20 54 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 41 52 28 34 29 2c 20 ┆ T4 CHAR(4), ┆
0x4288d…428ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x428ad…428bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x428bc…428dc (42, 0, 48) 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 20 49 4e ┆ ANTAL_KONT BINARY IN┆
0x428dc…428fc 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT(0), ┆
0x428fc…4290b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4290b…4292b (42, 0, 49) 20 20 20 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 20 20 20 20 20 42 49 4e 41 52 59 20 49 4e ┆ TOT_ANTAL_KONT BINARY IN┆
0x4292b…4294b 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT(0), ┆
0x4294b…4295a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4295a…4297a (42, 0, 50) 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 27 20 20 56 31 30 ┆ VERSION CHAR(47) INIT(' V10┆
0x4297a…4299a 20 56 65 72 73 69 6f 6e 20 31 2e 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ Version 1.6 ┆
0x4299a…429a9 20 20 20 20 38 34 30 31 31 30 27 29 3b 20 20 ┆ 840110'); ┆
0x429a9…429f8 (42, 0, 51) 0x20[0x4f]
[…0x2…]
0x42a96…42ab6 (42, 0, 54) 4b 4f 4e 54 4f 52 45 44 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTORED:PROC; ┆
0x42ab6…42ad6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42ad6…42ae5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42ae5…42b05 (42, 0, 55) 44 43 4c 20 4b 46 4c 41 47 47 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 3b 20 20 20 20 20 20 ┆DCL KFLAGG BINARY INIT(0); ┆
0x42b05…42b25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42b25…42b34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42b34…42b83 (42, 0, 56) 0x20[0x4f]
[…0x1…]
0x42bd2…42bf2 (42, 0, 58) 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 32 3d 27 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 27 3b 20 20 20 ┆ KONTO2='-----------'; ┆
0x42bf2…42c12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42c12…42c21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42c21…42c41 (42, 0, 59) 20 20 20 20 20 20 20 20 52 4b 4f 4e 54 4f 3d 27 2d 2d 2d 2d 2d 2e 2d 2d 2d 2e 2d 2d 2d 27 3b 20 ┆ RKONTO='-----.---.---'; ┆
0x42c41…42c61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42c61…42c70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42c70…42c90 (42, 0, 60) 20 20 20 20 20 20 20 20 54 31 3d 53 55 42 53 54 52 28 42 55 46 46 2c 31 2c 31 29 3b 20 20 20 20 ┆ T1=SUBSTR(BUFF,1,1); ┆
0x42c90…42cb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42cb0…42cbf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42cbf…42cdf (42, 0, 61) 20 20 20 20 20 20 20 20 49 46 20 54 31 20 7f 3d 20 27 37 27 20 26 20 54 31 7f 3d 27 38 27 20 26 ┆ IF T1 = '7' & T1 ='8' &┆
0x42cdf…42cff 20 54 31 7f 3d 27 39 27 20 26 20 59 3d 27 35 20 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 ┆ T1 ='9' & Y='5 ' THEN DO; ┆
0x42cff…42d0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42d0e…42d2e (42, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 54 31 3d 53 55 42 53 54 52 28 42 55 46 46 2c 37 2c 31 29 3b 20 ┆ T1=SUBSTR(BUFF,7,1); ┆
0x42d2e…42d4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42d4e…42d5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42d5d…42d7d (42, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 49 3d 36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=6; ┆
0x42d7d…42d9d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42d9d…42dac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42dac…42dcc (42, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 37 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=7; ┆
0x42dcc…42dec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42dec…42dfb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42dfb…42e1b (42, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 54 59 50 32 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TYP2=1; ┆
0x42e1b…42e3b 20 20 20 2f 2a 20 44 45 54 20 46 49 4e 4e 53 20 55 2d 4b 54 4f 20 41 4e 47 49 56 45 54 20 20 20 ┆ /* DET FINNS U-KTO ANGIVET ┆
0x42e3b…42e4a 20 20 20 20 20 2a 2f 20 20 20 20 20 20 20 20 ┆ */ ┆
0x42e4a…42e6a (42, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 38 39 27 ┆ IF INDEX('0123456789'┆
0x42e6a…42e8a 2c 54 31 29 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 31 3b 20 20 20 20 20 20 20 20 20 20 ┆,T1) =0 THEN GO TO K1; ┆
0x42e8a…42e99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42e99…42eb9 (42, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 54 31 3d 53 55 42 53 54 52 28 42 55 46 46 2c 31 31 2c 31 29 3b ┆ T1=SUBSTR(BUFF,11,1);┆
0x42eb9…42ed9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42ed9…42ee8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42ee8…42f08 (42, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 49 3d 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=9; ┆
0x42f08…42f28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42f28…42f37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42f37…42f57 (42, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=11; ┆
0x42f57…42f77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42f77…42f86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x42f86…42fa6 (42, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 54 59 50 32 3d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TYP2=2; ┆
0x42fa6…42fc6 20 20 20 2f 2a 20 44 45 54 20 46 49 4e 4e 53 20 49 4b 2d 53 4c 41 47 20 41 4e 47 49 56 45 54 20 ┆ /* DET FINNS IK-SLAG ANGIVET ┆
0x42fc6…42fd5 20 20 20 20 20 2a 2f 20 20 20 20 20 20 20 20 ┆ */ ┆
0x42fd5…42ff5 (42, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 38 39 27 ┆ IF INDEX('0123456789'┆
0x42ff5…43015 2c 54 31 29 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 55 54 3b 20 20 20 20 20 20 20 20 20 20 ┆,T1)=0 THEN GO TO KUT; ┆
0x43015…43024 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43024…43073 (42, 0, 72) 0x20[0x4f]
[…0x1…]
0x430c2…430e2 (42, 0, 74) 4b 31 3a 20 20 20 20 20 20 20 20 44 4f 20 4b 3d 31 20 54 4f 20 33 3b 20 20 20 20 20 20 20 20 20 ┆K1: DO K=1 TO 3; ┆
0x430e2…43102 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43102…43111 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43111…43131 (42, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 32 2c 49 2c 31 29 ┆ SUBSTR(KONTO2,I,1)┆
0x43131…43151 3d 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=T1; ┆
0x43151…43160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43160…43180 (42, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 52 4b 4f 4e 54 4f 2c 4a 2c 31 29 ┆ SUBSTR(RKONTO,J,1)┆
0x43180…431a0 3d 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=T1; ┆
0x431a0…431af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x431af…431cf (42, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 31 3d 53 55 42 53 54 52 28 42 55 46 46 2c 4a 2b 31 ┆ T1=SUBSTR(BUFF,J+1┆
0x431cf…431ef 2c 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,1); ┆
0x431ef…431fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x431fe…4321e (42, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 ┆ IF INDEX('01234567┆
0x4321e…4323e 38 39 27 2c 54 31 29 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 55 54 3b 20 20 20 20 20 20 20 ┆89',T1)=0 THEN GO TO KUT; ┆
0x4323e…4324d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4324d…4326d (42, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 3d 4a 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J+1; ┆
0x4326d…4328d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4328d…4329c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4329c…432bc (42, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 3d 49 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=I+1; ┆
0x432bc…432dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x432dc…432eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x432eb…4330b (42, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4330b…4332b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4332b…4333a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4333a…4335a (43, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4b 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO KUT; ┆
0x4335a…4337a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4337a…43389 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43389…433a9 (43, 0, 1) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x433a9…433c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x433c9…433d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x433d8…433f8 (43, 0, 2) 20 20 20 20 20 20 20 20 4a 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=0; ┆
0x433f8…43418 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43418…43427 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43427…43447 (43, 0, 3) 20 20 20 20 20 20 20 20 54 59 50 32 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TYP2=0; ┆
0x43447…43467 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43467…43476 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43476…43496 (43, 0, 4) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 11; ┆
0x43496…434b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x434b6…434c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x434c5…434e5 (43, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 3d 36 20 7c 20 49 3d 39 20 54 48 45 4e 20 4a 3d 4a ┆ IF I=6 ö I=9 THEN J=J┆
0x434e5…43505 2b 32 3b 20 20 20 20 20 2f 2a 20 41 44 44 45 52 49 4e 47 20 46 5c 52 42 49 20 50 55 4e 4b 54 45 ┆+2; /* ADDERING FÖRBI PUNKTE┆
0x43505…43514 52 4e 41 20 20 2a 2f 20 20 20 20 20 20 20 20 ┆RNA */ ┆
0x43514…43534 (43, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 4a 3d 4a 2b 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ ELSE J=J+1; ┆
0x43534…43554 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43554…43563 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43563…43583 (43, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 54 31 3d 53 55 42 53 54 52 28 42 55 46 46 2c 4a 2c 31 29 3b 20 ┆ T1=SUBSTR(BUFF,J,1); ┆
0x43583…435a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x435a3…435b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x435b2…435d2 (43, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 38 39 27 ┆ IF INDEX('0123456789'┆
0x435d2…435f2 2c 54 31 29 3d 30 20 26 20 4c 45 4e 47 44 3e 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 55 54 3b ┆,T1)=0 & LENGD>0 THEN GO TO KUT;┆
0x435f2…43601 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43601…43621 (43, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 38 39 27 ┆ IF INDEX('0123456789'┆
0x43621…43641 2c 54 31 29 7f 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,T1) =0 THEN DO; ┆
0x43641…43650 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43650…43670 (43, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 32 2c 49 2c 31 29 ┆ SUBSTR(KONTO2,I,1)┆
0x43670…43690 3d 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=T1; ┆
0x43690…4369f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4369f…436bf (43, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 52 4b 4f 4e 54 4f 2c 4a 2c 31 29 ┆ SUBSTR(RKONTO,J,1)┆
0x436bf…436df 3d 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=T1; ┆
0x436df…436ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x436ee…4370e (43, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 45 4e 47 44 3d 4c 45 4e 47 44 2b 31 3b 20 20 20 20 ┆ LENGD=LENGD+1; ┆
0x4370e…4372e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4372e…4373d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4373d…4375d (43, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4375d…4377d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4377d…4378c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4378c…437ac (43, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x437ac…437cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x437cc…437db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x437db…437fb (43, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 46 46 53 45 54 3d 4f 46 46 53 45 54 2b 31 3b 20 20 ┆ OFFSET=OFFSET+1; ┆
0x437fb…4381b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4381b…4382a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4382a…4384a (43, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 32 2c 49 2c 31 29 ┆ SUBSTR(KONTO2,I,1)┆
0x4384a…4386a 3d 27 2d 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆='-'; ┆
0x4386a…43879 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43879…43899 (43, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 52 4b 4f 4e 54 4f 2c 4a 2c 31 29 ┆ SUBSTR(RKONTO,J,1)┆
0x43899…438b9 3d 27 2d 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆='-'; ┆
0x438b9…438c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x438c8…438e8 (43, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x438e8…43908 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43908…43917 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43917…43937 (43, 0, 19) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x43937…43957 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43957…43966 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43966…439b5 (43, 0, 20) 0x20[0x4f]
0x439b5…439d5 (43, 0, 21) 4b 55 54 3a 20 20 20 20 49 46 20 4b 46 4c 41 47 47 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆KUT: IF KFLAGG=0 THEN DO; ┆
0x439d5…439f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x439f5…43a04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43a04…43a24 (43, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 31 3d 4b 4f 4e 54 4f 32 3b 20 20 20 20 20 20 20 ┆ KONTO1=KONTO2; ┆
0x43a24…43a44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43a44…43a53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43a53…43a73 (43, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 4b 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KFLAGG=1; ┆
0x43a73…43a93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43a93…43aa2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43aa2…43ac2 (43, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 54 59 50 31 3d 54 59 50 32 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ TYP1=TYP2; ┆
0x43ac2…43ae2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43ae2…43af1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43af1…43b11 (43, 0, 25) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x43b11…43b31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43b31…43b40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43b40…43b8f (43, 0, 26) 0x20[0x4f]
0x43b8f…43baf (43, 0, 27) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x43baf…43bcf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43bcf…43bde 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43bde…43bfe (43, 0, 28) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x43bfe…43c1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43c1e…43c2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43c2d…43c7c (43, 0, 29) 0x20[0x4f]
0x43c7c…43c9c (43, 0, 30) 53 52 45 44 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SRED:PROC; ┆
0x43c9c…43cbc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43cbc…43ccb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43ccb…43ceb (43, 0, 31) 20 20 20 20 20 20 20 20 4a 3d 31 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=14; ┆
0x43ceb…43d0b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43d0b…43d1a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43d1a…43d69 (43, 0, 32) 0x20[0x4f]
0x43d69…43d89 (43, 0, 33) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 31 20 54 4f 20 31 20 42 59 20 2d 31 3b 20 20 20 20 20 ┆ DO I=11 TO 1 BY -1; ┆
0x43d89…43da9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43da9…43db8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43db8…43dd8 (43, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 49 3d 35 29 20 7c 20 28 49 3d 38 29 20 54 48 45 4e ┆ IF (I=5) ö (I=8) THEN┆
0x43dd8…43df8 20 4a 3d 4a 2d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J-2; ┆
0x43df8…43e07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43e07…43e27 (43, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 4a 3d 4a 2d 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ ELSE J=J-1; ┆
0x43e27…43e47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43e47…43e56 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43e56…43e76 (43, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 42 55 46 46 2c 4a 2c 31 29 3d 27 ┆ IF SUBSTR(BUFF,J,1)='┆
0x43e76…43e96 53 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆S' THEN DO; ┆
0x43e96…43ea5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43ea5…43ec5 (43, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 42 28 49 29 3d 31 3b 20 20 20 20 20 20 20 20 ┆ STAB(I)=1; ┆
0x43ec5…43ee5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43ee5…43ef4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43ef4…43f14 (43, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 53 5f 4d 41 52 4b 2c 4a 2c 31 29 ┆ SUBSTR(S_MARK,J,1)┆
0x43f14…43f34 3d 27 53 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆='S'; ┆
0x43f34…43f43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43f43…43f63 (43, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x43f63…43f83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43f83…43f92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43f92…43fb2 (43, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x43fb2…43fd2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43fd2…43fe1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x43fe1…44001 (43, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 42 28 49 29 3d 30 3b 20 20 20 20 20 20 20 20 ┆ STAB(I)=0; ┆
0x44001…44021 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44021…44030 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44030…44050 (43, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x44050…44070 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44070…4407f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4407f…4409f (43, 0, 43) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4409f…440bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x440bf…440ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x440ce…440ee (43, 0, 44) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x440ee…4410e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4410e…4411d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4411d…4413d (43, 0, 45) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x4413d…4415d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4415d…4416c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4416c…441bb (43, 0, 46) 0x20[0x4f]
0x441bb…441db (43, 0, 47) 52 55 42 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RUB:PROC; ┆
0x441db…441fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x441fb…4420a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4420a…4422a (43, 0, 48) 20 20 20 20 20 20 20 20 49 5f 52 3d 4c 49 53 54 54 59 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I_R=LISTTYP; ┆
0x4422a…4424a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4424a…44259 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44259…44279 (43, 0, 49) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 2b 33 29 20 45 44 49 54 28 4e 41 4d 4e 28 ┆ PUT SKIP(R+3) EDIT(NAMN(┆
0x44279…44299 46 49 52 4d 41 2d 27 36 27 29 29 28 41 28 32 30 29 29 28 52 54 45 58 54 28 49 5f 52 29 29 28 41 ┆FIRMA-'6'))(A(20))(RTEXT(I_R))(A┆
0x44299…442a8 28 33 35 29 29 28 27 31 39 27 29 20 28 41 29 ┆(35))('19') (A)┆
0x442a8…442c8 (43, 0, 50) 20 20 20 20 20 20 20 20 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 31 2c 32 29 29 28 41 29 28 27 ┆ (SUBSTR(DATUM,1,2))(A)('┆
0x442c8…442e8 2d 27 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 33 2c 32 29 29 28 41 29 28 27 2d 27 ┆-')(A)(SUBSTR(DATUM,3,2))(A)('-'┆
0x442e8…442f7 29 28 41 29 20 20 20 20 20 20 20 20 20 20 20 ┆)(A) ┆
0x442f7…44317 (43, 0, 51) 20 20 20 20 20 20 20 20 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 35 2c 32 29 29 28 41 28 35 29 ┆ (SUBSTR(DATUM,5,2))(A(5)┆
0x44317…44337 29 28 27 53 49 44 27 29 28 41 28 34 29 29 28 53 49 44 41 29 28 41 29 20 53 4b 49 50 20 45 44 49 ┆)('SID')(A(4))(SIDA)(A) SKIP EDI┆
0x44337…44346 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T ┆
0x44346…44366 (43, 0, 52) 20 20 20 20 20 20 20 20 28 27 46 72 2e 6f 2e 6d 20 6b 6f 6e 74 6f 27 29 28 41 28 31 33 29 29 28 ┆ ('Fr.o.m konto')(A(13))(┆
0x44366…44386 52 4b 4f 4e 54 4f 31 29 28 41 29 28 27 2c 20 74 69 6c 6c 20 6b 6f 6e 74 6f 27 29 28 41 28 31 33 ┆RKONTO1)(A)(', till konto')(A(13┆
0x44386…44395 29 29 28 52 4b 4f 4e 54 4f 32 29 20 20 20 20 ┆))(RKONTO2) ┆
0x44395…443b5 (43, 0, 53) 20 20 20 20 20 20 20 20 28 41 29 20 53 4b 49 50 20 45 44 49 54 28 27 20 27 29 28 41 28 31 33 29 ┆ (A) SKIP EDIT(' ')(A(13)┆
0x443b5…443d5 29 28 53 5f 4d 41 52 4b 29 28 41 29 20 53 4b 49 50 20 45 44 49 54 28 27 46 72 2e 6f 2e 6d 20 64 ┆)(S_MARK)(A) SKIP EDIT('Fr.o.m d┆
0x443d5…443e4 61 74 75 6d 27 29 28 41 28 31 33 29 29 20 20 ┆atum')(A(13)) ┆
0x443e4…44404 (43, 0, 54) 20 20 20 20 20 20 20 20 28 44 41 54 55 4d 31 29 28 41 28 37 29 29 28 27 74 69 6c 6c 20 64 61 74 ┆ (DATUM1)(A(7))('till dat┆
0x44404…44424 75 6d 27 29 28 41 28 31 31 29 29 28 44 41 54 55 4d 32 29 28 41 28 37 29 29 28 27 6d 2e 61 2e 70 ┆um')(A(11))(DATUM2)(A(7))('m.a.p┆
0x44424…44433 27 29 28 41 28 36 29 29 20 20 20 20 20 20 20 ┆')(A(6)) ┆
0x44433…44453 (43, 0, 55) 20 20 20 20 20 20 20 20 28 52 54 45 58 54 28 53 50 54 59 50 2b 32 29 29 28 41 29 20 53 4b 49 50 ┆ (RTEXT(SPTYP+2))(A) SKIP┆
0x44453…44473 20 45 44 49 54 28 27 20 27 29 28 41 28 31 32 29 29 28 27 4b 4f 4e 54 4f 27 29 28 41 28 31 38 29 ┆ EDIT(' ')(A(12))('KONTO')(A(18)┆
0x44473…44482 29 28 52 54 45 58 54 28 49 5f 52 2b 34 29 29 ┆)(RTEXT(I_R+4))┆
0x44482…444a2 (43, 0, 56) 20 20 20 20 20 20 20 20 28 41 29 28 27 20 27 29 28 41 28 36 29 29 28 27 42 45 4c 4f 50 50 27 29 ┆ (A)(' ')(A(6))('BELOPP')┆
0x444a2…444c2 28 41 28 31 33 29 29 28 52 54 45 58 54 28 49 5f 52 2b 36 29 29 28 41 29 20 53 4b 49 50 3b 20 20 ┆(A(13))(RTEXT(I_R+6))(A) SKIP; ┆
0x444c2…444d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x444d1…444f1 (43, 0, 57) 20 20 20 20 20 20 20 20 53 49 44 41 3d 53 49 44 41 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SIDA=SIDA+1; ┆
0x444f1…44511 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44511…44520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44520…44540 (43, 0, 58) 20 20 20 20 20 20 20 20 52 20 3d 20 52 41 44 41 4e 54 20 2d 20 38 3b 20 20 20 20 20 20 20 20 20 ┆ R = RADANT - 8; ┆
0x44540…44560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44560…4456f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4456f…4458f (43, 0, 59) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x4458f…445af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x445af…445be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x445be…445de (43, 0, 60) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x445de…445fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x445fe…4460d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4460d…4465c (43, 0, 61) 0x20[0x4f]
0x4465c…4467c (43, 0, 62) 53 54 59 52 44 41 54 41 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STYRDATA:PROC; ┆
0x4467c…4469c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4469c…446ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x446ab…446cb (43, 0, 63) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x446cb…446eb 52 53 49 4f 4e 29 28 41 28 34 39 29 29 28 52 54 45 58 54 28 59 2d 33 29 29 28 41 28 34 37 29 29 ┆RSION)(A(49))(RTEXT(Y-3))(A(47))┆
0x446eb…446fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x446fa…4471a (43, 0, 64) 20 20 20 20 20 20 20 20 28 27 46 72 2e 6f 2e 6d 2e 20 4b 4f 4e 54 4f 27 29 28 41 28 34 37 29 29 ┆ ('Fr.o.m. KONTO')(A(47))┆
0x4471a…4473a 28 27 54 69 6c 6c 20 4b 4f 4e 54 4f 27 29 28 41 28 34 37 29 29 28 27 53 55 4d 4d 45 52 49 4e 47 ┆('Till KONTO')(A(47))('SUMMERING┆
0x4473a…44749 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆')(A); ┆
0x44749…44798 (43, 0, 65) 0x20[0x4f]
0x44798…447b8 (43, 0, 66) 20 20 20 20 20 20 20 20 4a 3d 31 32 38 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=128; ┆
0x447b8…447d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x447d8…447e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x447e7…44807 (43, 0, 67) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x44807…44827 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44827…44836 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44836…44856 (43, 0, 68) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 52 4b 4f 4e 54 4f 31 2c 31 33 29 3b ┆ CALL TYPIST(RKONTO1,13);┆
0x44856…44876 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44876…44885 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44885…448a5 (43, 0, 69) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 27 10 27 2c 31 29 3b 20 20 20 20 20 ┆ CALL TYPIST(' ',1); ┆
0x448a5…448c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x448c5…448d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x448d4…448f4 (43, 0, 70) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 42 55 46 46 29 3b 20 20 20 20 ┆ GET SKIP LIST(BUFF); ┆
0x448f4…44914 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44914…44923 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44923…44943 (43, 0, 71) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 52 45 44 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL KONTORED; ┆
0x44943…44963 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44963…44972 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44972…44992 (43, 0, 72) 20 20 20 20 20 20 20 20 52 4b 4f 4e 54 4f 31 3d 52 4b 4f 4e 54 4f 3b 20 20 20 20 20 20 20 20 20 ┆ RKONTO1=RKONTO; ┆
0x44992…449b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x449b2…449c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x449c1…449e1 (43, 0, 73) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 52 4b 4f 4e 54 4f 31 ┆ PUT FILE(D) EDIT(RKONTO1┆
0x449e1…44a01 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)(A); ┆
0x44a01…44a10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44a10…44a30 (43, 0, 74) 20 20 20 20 20 20 20 20 4a 3d 31 37 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=175; ┆
0x44a30…44a50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44a50…44a5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44a5f…44a7f (43, 0, 75) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x44a7f…44a9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44a9f…44aae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44aae…44ace (43, 0, 76) 20 20 20 20 20 20 20 20 49 46 20 4f 46 46 53 45 54 3e 31 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 ┆ IF OFFSET>1 THEN GO TO S┆
0x44ace…44aee 31 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆15; ┆
0x44aee…44afd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44afd…44b1d (43, 0, 77) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 52 4b 4f 4e 54 4f 32 2c 31 33 29 3b ┆ CALL TYPIST(RKONTO2,13);┆
0x44b1d…44b3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44b3d…44b4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44b4c…44b6c (43, 0, 78) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 27 10 27 2c 31 29 3b 20 20 20 20 20 ┆ CALL TYPIST(' ',1); ┆
0x44b6c…44b8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44b8c…44b9b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44b9b…44bbb (43, 0, 79) 53 31 3a 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 42 55 46 46 29 3b 20 20 20 20 ┆S1: GET SKIP LIST(BUFF); ┆
0x44bbb…44bdb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44bdb…44bea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44bea…44c0a (43, 0, 80) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 52 45 44 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL KONTORED; ┆
0x44c0a…44c2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44c2a…44c39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44c39…44c59 (43, 0, 81) 53 31 35 3a 20 20 20 20 52 4b 4f 4e 54 4f 32 3d 52 4b 4f 4e 54 4f 3b 20 20 20 20 20 20 20 20 20 ┆S15: RKONTO2=RKONTO; ┆
0x44c59…44c79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44c79…44c88 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44c88…44ca8 (44, 0, 0) 20 20 20 20 20 20 20 20 49 46 20 28 4b 4f 4e 54 4f 31 3e 4b 4f 4e 54 4f 32 29 20 7c 20 28 54 59 ┆ IF (KONTO1>KONTO2) ö (TY┆
0x44ca8…44cc8 50 31 7f 3d 54 59 50 32 29 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 31 3b 20 2f 2a 4b 4c 41 52 20 ┆P1 =TYP2) THEN GO TO S1; /*KLAR ┆
0x44cc8…44cd7 49 20 4b 4f 4e 54 4f 52 45 44 2a 2f 20 20 20 ┆I KONTORED*/ ┆
0x44cd7…44cf7 (44, 0, 1) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 52 4b 4f 4e 54 4f 32 ┆ PUT FILE(D) EDIT(RKONTO2┆
0x44cf7…44d17 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)(A); ┆
0x44d17…44d26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44d26…44d46 (44, 0, 2) 20 20 20 20 20 20 20 20 4a 3d 32 32 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=222; ┆
0x44d46…44d66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44d66…44d75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44d75…44d95 (44, 0, 3) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x44d95…44db5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44db5…44dc4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44dc4…44de4 (44, 0, 4) 20 20 20 20 20 20 20 20 49 46 20 4f 46 46 53 45 54 3e 31 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 ┆ IF OFFSET>1 THEN GO TO S┆
0x44de4…44e04 31 37 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆17; ┆
0x44e04…44e13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44e13…44e33 (44, 0, 5) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 53 5f 4d 41 52 4b 2c 31 33 29 3b 20 ┆ CALL TYPIST(S_MARK,13); ┆
0x44e33…44e53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44e53…44e62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44e62…44e82 (44, 0, 6) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 27 10 27 2c 31 29 3b 20 20 20 20 20 ┆ CALL TYPIST(' ',1); ┆
0x44e82…44ea2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44ea2…44eb1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44eb1…44ed1 (44, 0, 7) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 42 55 46 46 29 3b 20 20 20 20 ┆ GET SKIP LIST(BUFF); ┆
0x44ed1…44ef1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44ef1…44f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44f00…44f20 (44, 0, 8) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 52 45 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL SRED; ┆
0x44f20…44f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44f40…44f4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44f4f…44f6f (44, 0, 9) 53 31 37 3a 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 53 5f 4d 41 52 4b 29 ┆S17: PUT FILE(D) EDIT(S_MARK)┆
0x44f6f…44f8f 28 41 28 31 35 29 29 28 27 44 41 54 55 4d 53 50 5b 52 52 27 29 28 41 28 34 37 29 29 20 20 20 20 ┆(A(15))('DATUMSPÄRR')(A(47)) ┆
0x44f8f…44f9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44f9e…44fbe (44, 0, 10) 20 20 20 20 20 20 20 20 28 27 31 20 3d 20 50 45 52 44 41 54 55 4d 27 29 28 41 28 34 37 29 29 28 ┆ ('1 = PERDATUM')(A(47))(┆
0x44fbe…44fde 27 32 20 3d 20 42 4f 4b 44 41 54 55 4d 27 29 28 41 28 34 34 29 29 3b 20 20 20 20 20 20 20 20 20 ┆'2 = BOKDATUM')(A(44)); ┆
0x44fde…44fed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x44fed…4500d (44, 0, 11) 53 34 3a 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 53 50 54 59 50 29 3b 20 20 20 ┆S4: GET SKIP LIST(SPTYP); ┆
0x4500d…4502d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4502d…4503c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4503c…4505c (44, 0, 12) 20 20 20 20 20 20 20 20 49 46 20 53 50 54 59 50 3c 31 20 7c 20 53 50 54 59 50 3e 32 20 54 48 45 ┆ IF SPTYP<1 ö SPTYP>2 THE┆
0x4505c…4507c 4e 20 47 4f 20 54 4f 20 53 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆N GO TO S4; ┆
0x4507c…4508b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4508b…450ab (44, 0, 13) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 53 50 54 59 50 29 28 ┆ PUT FILE(D) EDIT(SPTYP)(┆
0x450ab…450cb 41 28 33 29 29 28 27 46 72 2e 6f 2e 6d 20 44 41 54 55 4d 27 29 28 41 28 34 37 29 29 20 20 20 20 ┆A(3))('Fr.o.m DATUM')(A(47)) ┆
0x450cb…450da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x450da…450fa (44, 0, 14) 20 20 20 20 20 20 20 20 28 27 54 69 6c 6c 20 44 41 54 55 4d 27 29 28 41 29 3b 20 20 20 20 20 20 ┆ ('Till DATUM')(A); ┆
0x450fa…4511a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4511a…45129 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45129…45149 (44, 0, 15) 20 20 20 20 20 20 20 20 4a 3d 34 31 37 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=417; ┆
0x45149…45169 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45169…45178 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45178…45198 (44, 0, 16) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x45198…451b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x451b8…451c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x451c7…451e7 (44, 0, 17) 53 33 3a 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 29 3b 20 20 20 20 20 20 20 ┆S3: GET SKIP LIST(D); ┆
0x451e7…45207 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45207…45216 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45216…45236 (44, 0, 18) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 31 29 3b 20 20 ┆ CALL DATCHECK(DATUM1); ┆
0x45236…45256 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45256…45265 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45265…45285 (44, 0, 19) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 31 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 ┆ IF DATUM1='0 ' THEN ┆
0x45285…452a5 47 4f 20 54 4f 20 53 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GO TO S3; ┆
0x452a5…452b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x452b4…452d4 (44, 0, 20) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 44 41 54 55 4d 31 29 ┆ PUT FILE(D) EDIT(DATUM1)┆
0x452d4…452f4 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(A); ┆
0x452f4…45303 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45303…45323 (44, 0, 21) 20 20 20 20 20 20 20 20 4a 3d 34 36 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=464; ┆
0x45323…45343 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45343…45352 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45352…45372 (44, 0, 22) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x45372…45392 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45392…453a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x453a1…453c1 (44, 0, 23) 53 32 3a 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 29 3b 20 20 20 20 20 20 20 ┆S2: GET SKIP LIST(D); ┆
0x453c1…453e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x453e1…453f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x453f0…45410 (44, 0, 24) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 32 29 3b 20 20 ┆ CALL DATCHECK(DATUM2); ┆
0x45410…45430 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45430…4543f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4543f…4545f (44, 0, 25) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 31 3e 3d 44 41 54 55 4d 32 20 20 54 48 45 4e 20 ┆ IF DATUM1>=DATUM2 THEN ┆
0x4545f…4547f 47 4f 20 54 4f 20 53 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GO TO S2; ┆
0x4547f…4548e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4548e…454ae (44, 0, 26) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x454ae…454ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x454ce…454dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x454dd…454fd (44, 0, 27) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 44 41 54 55 4d 32 29 ┆ PUT FILE(D) EDIT(DATUM2)┆
0x454fd…4551d 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(A); ┆
0x4551d…4552c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4552c…4554c (44, 0, 28) 20 20 20 20 20 20 20 20 49 46 20 54 59 50 31 3d 31 20 54 48 45 4e 20 59 3d 27 36 20 27 3b 20 20 ┆ IF TYP1=1 THEN Y='6 '; ┆
0x4554c…4556c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4556c…4557b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4557b…4559b (44, 0, 29) 20 20 20 20 20 20 20 20 49 46 20 54 59 50 31 3d 32 20 54 48 45 4e 20 59 3d 27 37 20 27 3b 20 20 ┆ IF TYP1=2 THEN Y='7 '; ┆
0x4559b…455bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x455bb…455ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x455ca…455ea (44, 0, 30) 20 20 20 20 20 20 20 20 49 46 20 59 3d 27 34 20 27 20 54 48 45 4e 20 4c 49 53 54 54 59 50 3d 31 ┆ IF Y='4 ' THEN LISTTYP=1┆
0x455ea…4560a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x4560a…45619 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45619…45639 (44, 0, 31) 20 20 20 20 20 20 20 20 45 4c 53 45 20 4c 49 53 54 54 59 50 3d 32 3b 20 20 20 20 20 20 20 20 20 ┆ ELSE LISTTYP=2; ┆
0x45639…45659 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45659…45668 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45668…45688 (44, 0, 32) 20 20 20 20 20 20 20 20 44 41 54 31 42 49 4e 3d 33 37 32 2a 28 53 55 42 53 54 52 28 44 41 54 55 ┆ DAT1BIN=372*(SUBSTR(DATU┆
0x45688…456a8 4d 31 2c 31 2c 32 29 2d 37 38 29 2b 33 31 2a 28 53 55 42 53 54 52 28 44 41 54 55 4d 31 2c 33 2c ┆M1,1,2)-78)+31*(SUBSTR(DATUM1,3,┆
0x456a8…456b7 32 29 2d 31 29 2b 20 20 20 20 20 20 20 20 20 ┆2)-1)+ ┆
0x456b7…456d7 (44, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 44 41 54 55 4d 31 2c 35 2c 32 29 2d 31 3b ┆ SUBSTR(DATUM1,5,2)-1;┆
0x456d7…456f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x456f7…45706 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45706…45726 (44, 0, 34) 20 20 20 20 20 20 20 20 44 41 54 32 42 49 4e 3d 33 37 32 2a 28 53 55 42 53 54 52 28 44 41 54 55 ┆ DAT2BIN=372*(SUBSTR(DATU┆
0x45726…45746 4d 32 2c 31 2c 32 29 2d 37 38 29 2b 33 31 2a 28 53 55 42 53 54 52 28 44 41 54 55 4d 32 2c 33 2c ┆M2,1,2)-78)+31*(SUBSTR(DATUM2,3,┆
0x45746…45755 32 29 2d 31 29 2b 20 20 20 20 20 20 20 20 20 ┆2)-1)+ ┆
0x45755…45775 (44, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 44 41 54 55 4d 32 2c 35 2c 32 29 2d 31 3b ┆ SUBSTR(DATUM2,5,2)-1;┆
0x45775…45795 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45795…457a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x457a4…457c4 (44, 0, 36) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x457c4…457e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x457e4…457f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x457f3…45813 (44, 0, 37) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x45813…45833 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45833…45842 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45842…45891 (44, 0, 38) 0x20[0x4f]
0x45891…458b1 (44, 0, 39) 53 54 41 52 54 50 4f 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STARTPOST:PROC; ┆
0x458b1…458d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x458d1…458e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x458e0…45900 (44, 0, 40) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=0; ┆
0x45900…45920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45920…4592f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4592f…4594f (44, 0, 41) 20 20 20 20 20 20 20 20 50 4b 3d 41 44 44 52 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ PK=ADDR(AREA); ┆
0x4594f…4596f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4596f…4597e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4597e…4599e (44, 0, 42) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 56 45 52 42 45 4c 4f 50 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN VERBELOP; ┆
0x4599e…459be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x459be…459cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x459cd…459ed (44, 0, 43) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 56 45 52 42 45 4c 4f 50 29 3b 20 20 20 20 ┆ CALL SEOF(VERBELOP); ┆
0x459ed…45a0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45a0d…45a1c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45a1c…45a3c (44, 0, 44) 20 20 20 20 20 20 20 20 4d 41 58 3d 55 4e 53 50 45 43 28 56 45 52 42 45 4c 4f 50 29 3b 20 20 20 ┆ MAX=UNSPEC(VERBELOP); ┆
0x45a3c…45a5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45a5c…45a6b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45a6b…45a8b (44, 0, 45) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 42 45 4c 4f 50 29 3d 30 3b 20 20 20 20 20 ┆ UNSPEC(VERBELOP)=0; ┆
0x45a8b…45aab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45aab…45aba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45aba…45ada (44, 0, 46) 20 20 20 20 20 20 20 20 49 46 20 4f 46 46 53 45 54 3e 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF OFFSET>1 THEN DO; ┆
0x45ada…45afa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45afa…45b09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45b09…45b29 (44, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 42 45 4c 4f 50 29 20 49 ┆ READ FILE(VERBELOP) I┆
0x45b29…45b49 4e 54 4f 28 42 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NTO(BSTR); ┆
0x45b49…45b58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45b58…45b78 (44, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 54 32 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO ST2; ┆
0x45b78…45b98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45b98…45ba7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45ba7…45bc7 (44, 0, 49) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x45bc7…45be7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45be7…45bf6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45bf6…45c16 (44, 0, 50) 20 20 20 20 20 20 20 20 4a 3d 49 4e 44 45 58 28 4b 4f 4e 54 4f 31 2c 27 2d 27 29 2d 31 3b 20 20 ┆ J=INDEX(KONTO1,'-')-1; ┆
0x45c16…45c36 20 2f 2a 20 46 41 53 54 53 54 5b 4c 4c 45 52 20 4c 5b 4e 47 44 20 50 5d 20 41 4e 47 49 56 45 54 ┆ /* FASTSTÄLLER LÄNGD PÅ ANGIVET┆
0x45c36…45c45 20 4b 4f 4e 54 4f 42 45 47 52 45 50 50 2a 2f ┆ KONTOBEGREPP*/┆
0x45c45…45c65 (44, 0, 51) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=1 THEN DO; ┆
0x45c65…45c85 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45c85…45c94 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45c94…45cb4 (44, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 4b 54 31 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT1=KONTO1; ┆
0x45cb4…45cd4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45cd4…45ce3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45ce3…45d03 (44, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x45d03…45d23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45d23…45d32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45d32…45d52 (44, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 31 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT1) FILE(VE┆
0x45d52…45d72 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x45d72…45d81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45d81…45da1 (44, 0, 55) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x45da1…45dc1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45dc1…45dd0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45dd0…45df0 (44, 0, 56) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 32 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=2 THEN DO; ┆
0x45df0…45e10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45e10…45e1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45e1f…45e3f (44, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 4b 54 32 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT2=KONTO1; ┆
0x45e3f…45e5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45e5f…45e6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45e6e…45e8e (44, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x45e8e…45eae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45eae…45ebd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45ebd…45edd (44, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 32 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT2) FILE(VE┆
0x45edd…45efd 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x45efd…45f0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45f0c…45f2c (44, 0, 60) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x45f2c…45f4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45f4c…45f5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45f5b…45f7b (44, 0, 61) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 33 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=3 THEN DO; ┆
0x45f7b…45f9b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45f9b…45faa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45faa…45fca (44, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 4b 54 33 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT3=KONTO1; ┆
0x45fca…45fea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45fea…45ff9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x45ff9…46019 (44, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x46019…46039 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46039…46048 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46048…46068 (44, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 33 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT3) FILE(VE┆
0x46068…46088 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x46088…46097 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46097…460b7 (44, 0, 65) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x460b7…460d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x460d7…460e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x460e6…46106 (44, 0, 66) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 34 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=4 THEN DO; ┆
0x46106…46126 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46126…46135 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46135…46155 (44, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 4b 54 34 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT4=KONTO1; ┆
0x46155…46175 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46175…46184 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46184…461a4 (44, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x461a4…461c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x461c4…461d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x461d3…461f3 (44, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 34 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT4) FILE(VE┆
0x461f3…46213 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x46213…46222 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46222…46242 (44, 0, 70) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x46242…46262 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46262…46271 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46271…46291 (44, 0, 71) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 35 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=5 THEN DO; ┆
0x46291…462b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x462b1…462c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x462c0…462e0 (44, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 4b 54 35 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT5=KONTO1; ┆
0x462e0…46300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46300…4630f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4630f…4632f (44, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x4632f…4634f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4634f…4635e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4635e…4637e (44, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 35 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT5) FILE(VE┆
0x4637e…4639e 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x4639e…463ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x463ad…463cd (44, 0, 75) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x463cd…463ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x463ed…463fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x463fc…4641c (44, 0, 76) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 36 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=6 THEN DO; ┆
0x4641c…4643c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4643c…4644b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4644b…4646b (44, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 4b 54 36 3d 20 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 ┆ KT6= KONTO1; ┆
0x4646b…4648b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4648b…4649a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4649a…464ba (44, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x464ba…464da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x464da…464e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x464e9…46509 (44, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 36 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT6) FILE(VE┆
0x46509…46529 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x46529…46538 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46538…46558 (44, 0, 80) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x46558…46578 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46578…46587 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46587…465a7 (44, 0, 81) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 37 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=7 THEN DO; ┆
0x465a7…465c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x465c7…465d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x465d6…465f6 (45, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 4b 54 37 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT7=KONTO1; ┆
0x465f6…46616 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46616…46625 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46625…46645 (45, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x46645…46665 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46665…46674 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46674…46694 (45, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 37 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT7) FILE(VE┆
0x46694…466b4 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x466b4…466c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x466c3…466e3 (45, 0, 3) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x466e3…46703 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46703…46712 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46712…46732 (45, 0, 4) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 38 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=8 THEN DO; ┆
0x46732…46752 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46752…46761 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46761…46781 (45, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 4b 54 38 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT8=KONTO1; ┆
0x46781…467a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x467a1…467b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x467b0…467d0 (45, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x467d0…467f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x467f0…467ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x467ff…4681f (45, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 38 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT8) FILE(VE┆
0x4681f…4683f 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x4683f…4684e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4684e…4686e (45, 0, 8) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4686e…4688e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4688e…4689d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4689d…468bd (45, 0, 9) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 39 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=9 THEN DO; ┆
0x468bd…468dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x468dd…468ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x468ec…4690c (45, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 4b 54 39 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT9=KONTO1; ┆
0x4690c…4692c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4692c…4693b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4693b…4695b (45, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x4695b…4697b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4697b…4698a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4698a…469aa (45, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 39 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT9) FILE(VE┆
0x469aa…469ca 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x469ca…469d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x469d9…469f9 (45, 0, 13) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x469f9…46a19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46a19…46a28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46a28…46a48 (45, 0, 14) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 31 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 ┆ IF J=10 THEN DO; ┆
0x46a48…46a68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46a68…46a77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46a77…46a97 (45, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 4b 54 31 30 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 ┆ KT10=KONTO1; ┆
0x46a97…46ab7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46ab7…46ac6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46ac6…46ae6 (45, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x46ae6…46b06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46b06…46b15 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46b15…46b35 (45, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 31 30 29 20 46 49 4c 45 28 56 ┆ READ KEY(KT10) FILE(V┆
0x46b35…46b55 45 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ERBELOP) INTO(AREA); ┆
0x46b55…46b64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46b64…46b84 (45, 0, 18) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x46b84…46ba4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46ba4…46bb3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46bb3…46bd3 (45, 0, 19) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 2d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 ┆ IF J=-1 THEN DO; ┆
0x46bd3…46bf3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46bf3…46c02 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46c02…46c22 (45, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 4b 54 31 31 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 ┆ KT11=KONTO1; ┆
0x46c22…46c42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46c42…46c51 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46c51…46c71 (45, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x46c71…46c91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46c91…46ca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46ca0…46cc0 (45, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 31 31 29 20 46 49 4c 45 28 56 ┆ READ KEY(KT11) FILE(V┆
0x46cc0…46ce0 45 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ERBELOP) INTO(AREA); ┆
0x46ce0…46cef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46cef…46d0f (45, 0, 23) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x46d0f…46d2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46d2f…46d3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46d3e…46d5e (45, 0, 24) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 54 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO ST2; ┆
0x46d5e…46d7e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46d7e…46d8d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46d8d…46dad (45, 0, 25) 53 54 31 3a 20 20 20 20 49 46 20 4f 4e 43 4f 44 45 7f 3d 34 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆ST1: IF ONCODE =4 THEN DO; ┆
0x46dad…46dcd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46dcd…46ddc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46ddc…46dfc (45, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c ┆ PUT SKIP LIST('LÄSFEL┆
0x46dfc…46e1c 20 49 20 56 45 52 42 45 4c 4f 50 20 49 20 50 4f 53 54 3a 20 50 52 4f 43 20 27 2c 52 43 4f 44 45 ┆ I VERBELOP I POST: PROC ',RCODE┆
0x46e1c…46e2b 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x46e2b…46e4b (45, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x46e4b…46e6b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46e6b…46e7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46e7a…46e9a (45, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 ┆ CALL PLOAD('Q '┆
0x46e9a…46eba 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x46eba…46ec9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46ec9…46ee9 (45, 0, 29) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x46ee9…46f09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46f09…46f18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46f18…46f38 (45, 0, 30) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=1; ┆
0x46f38…46f58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46f58…46f67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46f67…46f87 (45, 0, 31) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x46f87…46fa7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46fa7…46fb6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46fb6…46fd6 (45, 0, 32) 53 54 32 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ST2: ┆
0x46fd6…46ff6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x46ff6…47005 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47005…47025 (45, 0, 33) 20 20 20 20 20 20 20 20 54 45 58 54 4b 54 4f 20 3d 20 53 55 42 53 54 52 20 28 4b 4f 4e 54 4f 4e ┆ TEXTKTO = SUBSTR (KONTON┆
0x47025…47045 52 2c 31 2c 35 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R,1,5); ┆
0x47045…47054 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47054…47074 (45, 0, 34) 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 47 3d 4b 4f 4e 54 4f 4e 52 3b 20 20 20 20 20 20 20 ┆ KONTONRG=KONTONR; ┆
0x47074…47094 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47094…470a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x470a3…470c3 (45, 0, 35) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 42 45 4c 4f 50 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(VERBELOP)=UNSPEC(┆
0x470c3…470e3 56 45 52 42 45 4c 4f 50 29 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VERBELOP)-1; ┆
0x470e3…470f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x470f2…47112 (45, 0, 36) 20 20 20 20 20 20 20 20 42 4c 4f 43 4b 41 4e 54 3d 4d 41 58 2d 55 4e 53 50 45 43 28 56 45 52 42 ┆ BLOCKANT=MAX-UNSPEC(VERB┆
0x47112…47132 45 4c 4f 50 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ELOP); ┆
0x47132…47141 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47141…47161 (45, 0, 37) 20 20 20 20 20 20 20 20 4a 4a 3d 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JJ=5; ┆
0x47161…47181 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47181…47190 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47190…471b0 (45, 0, 38) 20 20 20 20 20 20 20 20 4a 4b 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JK=0; ┆
0x471b0…471d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x471d0…471df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x471df…471ff (45, 0, 39) 20 20 20 20 20 20 20 20 49 46 20 28 4c 49 53 54 54 59 50 3d 31 29 20 7c 20 28 53 50 54 59 50 3d ┆ IF (LISTTYP=1) ö (SPTYP=┆
0x471ff…4721f 32 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2) THEN DO; ┆
0x4721f…4722e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4722e…4724e (45, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 56 45 52 54 45 58 54 3b 20 20 20 20 20 20 20 20 ┆ OPEN VERTEXT; ┆
0x4724e…4726e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4726e…4727d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4727d…4729d (45, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 54 45 58 54 29 20 49 4e ┆ READ FILE(VERTEXT) IN┆
0x4729d…472bd 54 4f 28 54 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO(TSTR); ┆
0x472bd…472cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x472cc…472ec (45, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 53 54 41 4e 54 3d 56 45 52 4e 52 54 3b 20 20 20 20 20 ┆ KONSTANT=VERNRT; ┆
0x472ec…4730c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4730c…4731b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4731b…4733b (45, 0, 43) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4733b…4735b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4735b…4736a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4736a…4738a (45, 0, 44) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x4738a…473aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x473aa…473b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x473b9…473d9 (45, 0, 45) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x473d9…473f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x473f9…47408 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47408…47457 (45, 0, 46) 0x20[0x4f]
0x47457…47477 (45, 0, 47) 50 4f 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆POST:PROC; ┆
0x47477…47497 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47497…474a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x474a6…474c6 (45, 0, 48) 50 31 3a 20 20 20 20 20 4a 4a 3d 4a 4a 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P1: JJ=JJ+1; ┆
0x474c6…474e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x474e6…474f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x474f5…47515 (45, 0, 49) 20 20 20 20 20 20 20 20 49 46 20 4a 4a 3e 35 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 ┆ IF JJ>5 THEN DO; ┆
0x47515…47535 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47535…47544 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47544…47564 (45, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 4b 3c 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF JK<1 THEN DO; ┆
0x47564…47584 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47584…47593 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47593…475b3 (45, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 42 4c 4f 43 4b 41 4e 54 3e 30 20 54 48 45 4e ┆ IF BLOCKANT>0 THEN┆
0x475b3…475d3 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x475d3…475e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x475e2…47602 (45, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 4b 3d 32 35 35 3b 20 20 20 20 20 20 20 20 ┆ JK=255; ┆
0x47602…47622 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47622…47631 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47631…47651 (45, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 4b 3e 42 4c 4f 43 4b 41 4e 54 20 ┆ IF JK>BLOCKANT ┆
0x47651…47671 54 48 45 4e 20 4a 4b 3d 42 4c 4f 43 4b 41 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN JK=BLOCKANT; ┆
0x47671…47680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47680…476a0 (45, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 4c 4f 43 4b 41 4e 54 3d 42 4c 4f 43 4b 41 ┆ BLOCKANT=BLOCKA┆
0x476a0…476c0 4e 54 2d 4a 4b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NT-JK; ┆
0x476c0…476cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x476cf…476ef (45, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 56 45 52 42 45 4c 4f ┆ CALL RD(VERBELO┆
0x476ef…4770f 50 2c 41 52 45 41 2c 4a 4b 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P,AREA,JK,RCODE); ┆
0x4770f…4771e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4771e…4773e (45, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 ┆ IF RCODE =0 THE┆
0x4773e…4775e 4e 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 56 45 52 42 45 4c ┆N PUT SKIP LIST('LÄSFEL I VERBEL┆
0x4775e…4776d 4f 50 27 2c 52 43 4f 44 45 29 3b 20 20 20 20 ┆OP',RCODE); ┆
0x4776d…4778d (45, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 4b 3d 41 44 44 52 28 41 52 45 41 29 3b 20 ┆ PK=ADDR(AREA); ┆
0x4778d…477ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x477ad…477bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x477bc…477dc (45, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x477dc…477fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x477fc…4780b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4780b…4782b (45, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x4782b…4784b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4784b…4785a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4785a…4787a (45, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 3d 27 53 4c 55 54 39 39 ┆ KONTONR='SLUT99┆
0x4787a…4789a 39 39 39 39 39 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆99999'; ┆
0x4789a…478a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x478a9…478c9 (45, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 44 41 54 55 4d 3d 44 41 54 31 42 49 4e 3b ┆ PDATUM=DAT1BIN;┆
0x478c9…478e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x478e9…478f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x478f8…47918 (45, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 55 4d 54 3d 44 41 54 31 42 49 4e 3b ┆ DATUMT=DAT1BIN;┆
0x47918…47938 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47938…47947 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47947…47967 (45, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x47967…47987 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47987…47996 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47996…479b6 (45, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x479b6…479d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x479d6…479e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x479e5…47a05 (45, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x47a05…47a25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47a25…47a34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47a34…47a54 (45, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x47a54…47a74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47a74…47a83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47a83…47aa3 (45, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 4b 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(PK)=UNSPEC(┆
0x47aa3…47ac3 50 4b 29 2b 42 53 54 52 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PK)+BSTRL; ┆
0x47ac3…47ad2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47ad2…47af2 (45, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x47af2…47b12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47b12…47b21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47b21…47b41 (45, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 4a 4b 3d 4a 4b 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JK=JK-1; ┆
0x47b41…47b61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47b61…47b70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47b70…47b90 (45, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 4a 4a 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JJ=1; ┆
0x47b90…47bb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47bb0…47bbf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47bbf…47bdf (45, 0, 71) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x47bdf…47bff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47bff…47c0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47c0e…47c2e (45, 0, 72) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 42 29 3d 55 4e 53 50 45 43 28 50 4b 29 2b 4a 4a ┆ UNSPEC(PB)=UNSPEC(PK)+JJ┆
0x47c2e…47c4e 2a 31 30 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆*10+1; ┆
0x47c4e…47c5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47c5d…47c7d (45, 0, 73) 20 20 20 20 20 20 20 20 49 46 20 50 44 41 54 55 4d 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 50 ┆ IF PDATUM=0 THEN GO TO P┆
0x47c7d…47c9d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x47c9d…47cac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47cac…47ccc (45, 0, 74) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x47ccc…47cec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47cec…47cfb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47cfb…47d1b (45, 0, 75) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x47d1b…47d3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47d3b…47d4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47d4a…47d99 (45, 0, 76) 0x20[0x4f]
0x47d99…47db9 (45, 0, 77) 44 41 54 54 45 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DATTEST:PROC; ┆
0x47db9…47dd9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47dd9…47de8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47de8…47e08 (45, 0, 78) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=0; ┆
0x47e08…47e28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47e28…47e37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47e37…47e57 (45, 0, 79) 20 20 20 20 20 20 20 20 49 46 20 28 53 50 54 59 50 3d 32 29 20 26 20 28 50 44 41 54 55 4d 3c 30 ┆ IF (SPTYP=2) & (PDATUM<0┆
0x47e57…47e77 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) THEN DO; ┆
0x47e77…47e86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47e86…47ea6 (45, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 56 45 52 4e 52 54 20 54 48 45 4e ┆ IF VERNR =VERNRT THEN┆
0x47ea6…47ec6 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x47ec6…47ed5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47ed5…47ef5 (45, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 54 45 58 54 29 3d 56 45 ┆ UNSPEC(VERTEXT)=VE┆
0x47ef5…47f15 52 4e 52 2d 4b 4f 4e 53 54 41 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RNR-KONSTANT; ┆
0x47f15…47f24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47f24…47f44 (46, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 44 31 3b ┆ ON ERROR GO TO D1;┆
0x47f44…47f64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47f64…47f73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47f73…47f93 (46, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 44 ┆ ON ENDFILE GO TO D┆
0x47f93…47fb3 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x47fb3…47fc2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x47fc2…47fe2 (46, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 54 45 58 54 29 ┆ READ FILE(VERTEXT)┆
0x47fe2…48002 20 49 4e 54 4f 28 54 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ INTO(TSTR); ┆
0x48002…48011 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48011…48031 (46, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x48031…48051 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48051…48060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48060…48080 (46, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 44 41 54 31 42 49 4e 3e 44 41 54 55 4d 54 29 20 7c ┆ IF (DAT1BIN>DATUMT) ö┆
0x48080…480a0 20 28 44 41 54 32 42 49 4e 3c 3d 44 41 54 55 4d 54 29 20 54 48 45 4e 20 52 43 4f 44 45 3d 31 3b ┆ (DAT2BIN<=DATUMT) THEN RCODE=1;┆
0x480a0…480af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x480af…480cf (46, 0, 5) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x480cf…480ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x480ef…480fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x480fe…4811e (46, 0, 6) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x4811e…4813e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4813e…4814d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4814d…4816d (46, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 50 44 41 54 55 4d 3c 30 20 54 48 45 4e 20 50 44 41 54 ┆ IF PDATUM<0 THEN PDAT┆
0x4816d…4818d 55 4d 3d 2d 50 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UM=-PDATUM; ┆
0x4818d…4819c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4819c…481bc (46, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 44 41 54 31 42 49 4e 3e 50 44 41 54 55 4d 29 20 7c ┆ IF (DAT1BIN>PDATUM) ö┆
0x481bc…481dc 20 28 44 41 54 32 42 49 4e 3c 3d 50 44 41 54 55 4d 29 20 54 48 45 4e 20 52 43 4f 44 45 3d 31 3b ┆ (DAT2BIN<=PDATUM) THEN RCODE=1;┆
0x481dc…481eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x481eb…4820b (46, 0, 9) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4820b…4822b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4822b…4823a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4823a…4825a (46, 0, 10) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x4825a…4827a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4827a…48289 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48289…482d8 (46, 0, 11) 0x20[0x4f]
0x482d8…482f8 (46, 0, 12) 44 31 3a 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 ┆D1: PUT SKIP LIST('LÄSFEL I ┆
0x482f8…48318 56 45 52 54 45 58 54 20 55 4e 44 45 52 20 4c 41 42 45 4c 20 44 31 20 27 2c 4f 4e 43 4f 44 45 29 ┆VERTEXT UNDER LABEL D1 ',ONCODE)┆
0x48318…48327 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x48327…48347 (46, 0, 13) 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x48347…48367 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48367…48376 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48376…48396 (46, 0, 14) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=1; ┆
0x48396…483b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x483b6…483c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x483c5…483e5 (46, 0, 15) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x483e5…48405 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48405…48414 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48414…48434 (46, 0, 16) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x48434…48454 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48454…48463 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48463…484b2 (46, 0, 17) 0x20[0x4f]
[…0x1…]
0x48501…48521 (46, 0, 19) 4b 4f 4e 54 4f 54 45 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTOTEST:PROC; ┆
0x48521…48541 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48541…48550 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48550…48570 (46, 0, 20) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=0; ┆
0x48570…48590 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48590…4859f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4859f…485bf (46, 0, 21) 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 2c 4f 46 46 53 45 54 2c ┆ IF SUBSTR(KONTONR,OFFSET,┆
0x485bf…485df 4c 45 4e 47 44 29 3d 53 55 42 53 54 52 28 4b 4f 4e 54 4f 32 2c 4f 46 46 53 45 54 2c 4c 45 4e 47 ┆LENGD)=SUBSTR(KONTO2,OFFSET,LENG┆
0x485df…485ee 44 29 20 54 48 45 4e 20 52 45 54 55 52 4e 3b ┆D) THEN RETURN;┆
0x485ee…4863d (46, 0, 22) 0x20[0x4f]
0x4863d…4865d (46, 0, 23) 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 7f 3d 27 53 4c 55 54 39 39 39 39 39 39 39 ┆ IF KONTONR ='SLUT9999999┆
0x4865d…4867d 27 20 54 48 45 4e 20 52 43 4f 44 45 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆' THEN RCODE=1; ┆
0x4867d…4868c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4868c…486ac (46, 0, 24) 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x486ac…486cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x486cc…486db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x486db…486fb (46, 0, 25) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x486fb…4871b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4871b…4872a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4872a…48779 (46, 0, 26) 0x20[0x4f]
[…0x1…]
0x487c8…487e8 (46, 0, 28) 4b 4f 4e 54 4f 54 45 58 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTOTEXT:PROC; ┆
0x487e8…48808 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48808…48817 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48817…48837 (46, 0, 29) 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 52 4b 4f 4e 54 4f 31 2c 31 2c 35 29 20 ┆ IF SUBSTR (RKONTO1,1,5) ┆
0x48837…48857 3d 20 53 55 42 53 54 52 20 28 52 4b 4f 4e 54 4f 32 2c 31 2c 35 29 20 54 48 45 4e 20 47 4f 20 54 ┆= SUBSTR (RKONTO2,1,5) THEN GO T┆
0x48857…48866 4f 20 4b 37 37 3b 20 20 20 20 20 20 20 20 20 ┆O K77; ┆
0x48866…488b5 (46, 0, 30) 0x20[0x4f]
0x488b5…488d5 (46, 0, 31) 20 20 20 20 20 20 20 20 54 45 58 54 4b 54 4f 20 3d 20 53 55 42 53 54 52 20 28 4b 4f 4e 54 4f 4e ┆ TEXTKTO = SUBSTR (KONTON┆
0x488d5…488f5 52 47 2c 31 2c 35 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RG,1,5); ┆
0x488f5…48904 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48904…48953 (46, 0, 32) 0x20[0x4f]
0x48953…48973 (46, 0, 33) 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 4b 4f 4e 54 4f 4e 52 47 2c 31 2c 35 29 ┆ IF SUBSTR (KONTONRG,1,5)┆
0x48973…48993 20 3d 20 4b 4f 4e 54 4f 35 46 4f 52 45 47 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 38 38 3b 20 20 ┆ = KONTO5FOREG THEN GO TO K88; ┆
0x48993…489a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x489a2…489c2 (46, 0, 34) 20 20 20 20 20 20 20 20 49 46 20 54 45 58 54 4b 54 4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IF TEXTKTO ┆
0x489c2…489e2 3d 20 27 53 4c 55 54 39 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 38 38 3b 20 20 20 20 20 20 20 ┆= 'SLUT9' THEN GO TO K88; ┆
0x489e2…489f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x489f1…48a11 (46, 0, 35) 4b 37 37 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆K77: ┆
0x48a11…48a31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48a31…48a40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48a40…48a60 (46, 0, 36) 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 35 46 4f 52 45 47 20 3d 20 53 55 42 53 54 52 20 ┆ IF KONTO5FOREG = SUBSTR ┆
0x48a60…48a80 28 4b 4f 4e 54 4f 4e 52 47 2c 31 2c 35 29 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 38 38 3b 20 20 ┆(KONTONRG,1,5) THEN GO TO K88; ┆
0x48a80…48a8f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48a8f…48aaf (46, 0, 37) 20 20 20 20 20 20 20 20 49 46 20 4f 4e 43 4f 44 45 20 3d 20 34 20 54 48 45 4e 20 47 4f 20 54 4f ┆ IF ONCODE = 4 THEN GO TO┆
0x48aaf…48acf 20 4b 39 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K99; ┆
0x48acf…48ade 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48ade…48afe (46, 0, 38) 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 20 28 54 45 58 54 4b 54 4f 29 20 20 20 20 20 20 ┆ READ KEY (TEXTKTO) ┆
0x48afe…48b1e 20 20 20 20 20 20 20 20 20 46 49 4c 45 20 28 4b 4f 4e 54 4f 50 29 20 49 4e 54 4f 20 28 4b 4f 4e ┆ FILE (KONTOP) INTO (KON┆
0x48b1e…48b2d 54 4f 50 4f 53 54 29 3b 20 20 20 20 20 20 20 ┆TOPOST); ┆
0x48b2d…48b4d (46, 0, 39) 20 20 20 20 20 20 20 20 4b 54 4f 54 45 58 54 20 3d 20 54 41 42 54 45 58 54 3b 20 20 20 20 20 20 ┆ KTOTEXT = TABTEXT; ┆
0x48b4d…48b6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48b6d…48b7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48b7c…48b9c (46, 0, 40) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4b 39 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO K99; ┆
0x48b9c…48bbc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48bbc…48bcb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48bcb…48beb (46, 0, 41) 4b 38 38 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆K88: ┆
0x48beb…48c0b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48c0b…48c1a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48c1a…48c3a (46, 0, 42) 20 20 20 20 20 20 20 20 4b 54 4f 54 45 58 54 20 3d 20 28 27 20 20 20 20 20 27 29 3b 20 20 20 20 ┆ KTOTEXT = (' '); ┆
0x48c3a…48c5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48c5a…48c69 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48c69…48c89 (46, 0, 43) 4b 39 39 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆K99: ┆
0x48c89…48ca9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48ca9…48cb8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48cb8…48cd8 (46, 0, 44) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x48cd8…48cf8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48cf8…48d07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48d07…48d27 (46, 0, 45) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x48d27…48d47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48d47…48d56 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48d56…48da5 (46, 0, 46) 0x20[0x4f]
[…0x2…]
0x48e43…48e63 (46, 0, 49) 53 4b 52 49 56 5f 53 55 4d 4d 41 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV_SUMMA:PROC; ┆
0x48e63…48e83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48e83…48e92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48e92…48eb2 (46, 0, 50) 20 20 20 20 20 20 20 20 54 31 33 3d 27 20 20 20 20 20 20 20 20 20 20 20 20 20 27 3b 20 20 20 20 ┆ T13=' '; ┆
0x48eb2…48ed2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48ed2…48ee1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48ee1…48f01 (46, 0, 51) 20 20 20 20 20 20 20 20 54 31 31 3d 54 31 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T11=T13; ┆
0x48f01…48f21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48f21…48f30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48f30…48f50 (46, 0, 52) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 32 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=2 TO 11; ┆
0x48f50…48f70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48f70…48f7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48f7f…48f9f (46, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 49 29 3d 53 55 4d 4d 41 28 49 29 2b 53 55 4d ┆ SUMMA(I)=SUMMA(I)+SUM┆
0x48f9f…48fbf 4d 41 28 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MA(1); ┆
0x48fbf…48fce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x48fce…48fee (46, 0, 54) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x48fee…4900e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4900e…4901d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4901d…4903d (46, 0, 55) 20 20 20 20 20 20 20 20 54 34 3d 41 4e 54 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ T4=ANTAL_KONT; ┆
0x4903d…4905d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4905d…4906c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4906c…4908c (46, 0, 56) 20 20 20 20 20 20 20 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 54 4f 54 5f 41 4e 54 41 4c ┆ TOT_ANTAL_KONT=TOT_ANTAL┆
0x4908c…490ac 5f 4b 4f 4e 54 2b 41 4e 54 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆_KONT+ANTAL_KONT; ┆
0x490ac…490bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x490bb…4910a (46, 0, 57) 0x20[0x4f]
[…0x2…]
0x491a8…491c8 (46, 0, 60) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 11; ┆
0x491c8…491e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x491e8…491f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x491f7…49217 (46, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 47 2c 49 2c ┆ IF SUBSTR(KONTONRG,I,┆
0x49217…49237 31 29 7f 3d 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 2c 49 2c 31 29 20 54 48 45 4e 20 47 4f 20 ┆1) =SUBSTR(KONTONR,I,1) THEN GO ┆
0x49237…49246 54 4f 20 53 4b 52 31 3b 20 20 20 20 20 20 20 ┆TO SKR1; ┆
0x49246…49266 (46, 0, 62) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x49266…49286 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49286…49295 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49295…492b5 (46, 0, 63) 53 4b 52 31 3a 20 20 20 44 4f 20 4e 3d 31 31 20 54 4f 20 31 20 42 59 2d 31 3b 20 20 20 20 20 20 ┆SKR1: DO N=11 TO 1 BY-1; ┆
0x492b5…492d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x492d5…492e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x492e4…49304 (46, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 47 2c 4e 2c ┆ IF SUBSTR(KONTONRG,N,┆
0x49304…49324 31 29 7f 3d 27 30 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4b 52 32 3b 20 20 20 20 20 20 20 20 ┆1) ='0' THEN GO TO SKR2; ┆
0x49324…49333 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49333…49353 (46, 0, 65) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x49353…49373 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49373…49382 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49382…493a2 (46, 0, 66) 53 4b 52 32 3a 20 20 20 49 46 20 52 3c 38 20 54 48 45 4e 20 43 41 4c 4c 20 52 55 42 3b 20 20 20 ┆SKR2: IF R<8 THEN CALL RUB; ┆
0x493a2…493c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x493c2…493d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x493d1…493f1 (46, 0, 67) 20 20 20 20 20 20 20 20 4b 3d 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=11; ┆
0x493f1…49411 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49411…49420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49420…49440 (46, 0, 68) 53 4b 52 33 3a 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 31 32 2d 49 3b 20 20 20 20 20 20 20 20 20 ┆SKR3: DO J=1 TO 12-I; ┆
0x49440…49460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49460…4946f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4946f…4948f (46, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 54 41 42 28 31 32 2d 4a 29 3d 31 20 54 48 45 4e 20 ┆ IF STAB(12-J)=1 THEN ┆
0x4948f…494af 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DO; ┆
0x494af…494be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x494be…494de (46, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 3c 32 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF R<2 THEN CALL R┆
0x494de…494fe 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UB; ┆
0x494fe…4950d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4950d…4952d (46, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 31 2c 4b 2c 31 29 3d 27 2a ┆ SUBSTR(T11,K,1)='*┆
0x4952d…4954d 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x4954d…4955c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4955c…4957c (46, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 3d 4b 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=K-1; ┆
0x4957c…4959c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4959c…495ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x495ab…495cb (46, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 53 55 4d 4d 41 28 ┆ CALL BELRED(SUMMA(┆
0x495cb…495eb 4a 29 2c 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆J),T14); ┆
0x495eb…495fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x495fa…4961a (46, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ M=0; ┆
0x4961a…4963a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4963a…49649 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49649…49669 (46, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 31 33 3d 27 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T13=' ┆
0x49669…49689 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x49689…49698 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49698…496b8 (46, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 4c 3d 31 20 54 4f 20 31 32 2d 4a 3b 20 20 20 ┆ DO L=1 TO 12-J; ┆
0x496b8…496d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x496d8…496e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x496e7…49707 (46, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 3d 4d 2b 31 3b 20 20 20 20 20 20 20 20 20 ┆ M=M+1; ┆
0x49707…49727 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49727…49736 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49736…49756 (46, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4c 3d 36 29 20 7c 20 28 4c 3d 39 ┆ IF (L=6) ö (L=9┆
0x49756…49776 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) THEN DO; ┆
0x49776…49785 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49785…497a5 (46, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 4d ┆ SUBSTR(T13,M┆
0x497a5…497c5 2c 31 29 3d 27 2e 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,1)='.'; ┆
0x497c5…497d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x497d4…497f4 (46, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 3d 4d 2b 31 3b 20 20 20 20 20 20 ┆ M=M+1; ┆
0x497f4…49814 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49814…49823 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49823…49843 (46, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x49843…49863 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49863…49872 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49872…49892 (47, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 4d 2c 31 29 ┆ SUBSTR(T13,M,1)┆
0x49892…498b2 3d 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 47 2c 4c 2c 31 29 3b 20 20 20 20 20 20 20 20 20 20 ┆=SUBSTR(KONTONRG,L,1); ┆
0x498b2…498c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x498c1…498e1 (47, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x498e1…49901 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49901…49910 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49910…49930 (47, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4c 49 53 54 54 59 50 3d 31 20 54 48 45 4e 20 ┆ IF LISTTYP=1 THEN ┆
0x49930…49950 4d 3d 32 38 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆M=28; ┆
0x49950…4995f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4995f…4997f (47, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 4d 3d 32 3b 20 20 20 20 20 20 20 20 20 ┆ ELSE M=2; ┆
0x4997f…4999f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4999f…499ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x499ae…499ce (47, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 31 35 42 45 4c 52 45 44 20 3d 20 27 20 20 20 20 20 ┆ T15BELRED = ' ┆
0x499ce…499ee 20 20 20 20 20 20 20 20 20 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ '; ┆
0x499ee…499fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x499fd…49a1d (47, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 54 31 34 2c 31 2c 35 ┆ IF SUBSTR (T14,1,5┆
0x49a1d…49a3d 29 20 3d 20 27 20 20 20 20 20 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4b 52 34 3b 20 20 20 20 ┆) = ' ' THEN GO TO SKR4; ┆
0x49a3d…49a4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49a4c…49a6c (47, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 54 31 34 2c 31 2c 35 ┆ IF SUBSTR (T14,1,5┆
0x49a6c…49a8c 29 20 3d 20 27 20 20 20 20 2d 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆) = ' -' THEN DO; ┆
0x49a8c…49a9b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49a9b…49abb (47, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 20 28 54 31 35 42 45 4c ┆ SUBSTR (T15BEL┆
0x49abb…49adb 52 45 44 2c 35 2c 31 29 20 3d 20 27 2d 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RED,5,1) = '-'; ┆
0x49adb…49aea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49aea…49b0a (47, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4b 52 34 33 3b 20 20 ┆ GO TO SKR43; ┆
0x49b0a…49b2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49b2a…49b39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49b39…49b59 (47, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x49b59…49b79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49b79…49b88 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49b88…49ba8 (47, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 20 28 54 31 35 42 45 4c 52 45 44 2c ┆ SUBSTR (T15BELRED,┆
0x49ba8…49bc8 31 2c 34 29 20 3d 20 53 55 42 53 54 52 20 28 54 31 34 2c 32 2c 34 29 3b 20 20 20 20 20 20 20 20 ┆1,4) = SUBSTR (T14,2,4); ┆
0x49bc8…49bd7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49bd7…49bf7 (47, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 20 28 54 31 35 42 45 4c 52 45 44 2c ┆ SUBSTR (T15BELRED,┆
0x49bf7…49c17 35 2c 31 29 20 3d 20 27 2e 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆5,1) = '.'; ┆
0x49c17…49c26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49c26…49c46 (47, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4b 52 34 33 3b 20 20 20 20 20 20 ┆ GO TO SKR43; ┆
0x49c46…49c66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49c66…49c75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49c75…49c95 (47, 0, 13) 53 4b 52 34 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKR4: ┆
0x49c95…49cb5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49cb5…49cc4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49cc4…49ce4 (47, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 54 31 34 2c 36 2c 33 ┆ IF SUBSTR (T14,6,3┆
0x49ce4…49d04 29 20 3d 20 27 20 20 20 27 20 7c 20 53 55 42 53 54 52 20 28 54 31 34 2c 36 2c 33 29 20 3d 20 27 ┆) = ' ' ö SUBSTR (T14,6,3) = '┆
0x49d04…49d13 20 20 2d 27 20 20 20 20 20 20 20 20 20 20 20 ┆ -' ┆
0x49d13…49d33 (47, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4b 52 ┆ THEN GO TO SKR┆
0x49d33…49d53 34 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆45; ┆
0x49d53…49d62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49d62…49d82 (47, 0, 16) 53 4b 52 34 33 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKR43: ┆
0x49d82…49da2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49da2…49db1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49db1…49dd1 (47, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 20 28 54 31 35 42 45 4c 52 45 44 2c ┆ SUBSTR (T15BELRED,┆
0x49dd1…49df1 36 2c 33 29 20 3d 20 53 55 42 53 54 52 20 28 54 31 34 2c 36 2c 33 29 3b 20 20 20 20 20 20 20 20 ┆6,3) = SUBSTR (T14,6,3); ┆
0x49df1…49e00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49e00…49e20 (47, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 20 28 54 31 35 42 45 4c 52 45 44 2c ┆ SUBSTR (T15BELRED,┆
0x49e20…49e40 39 2c 31 29 20 3d 20 27 2e 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆9,1) = '.'; ┆
0x49e40…49e4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49e4f…49e6f (47, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 20 28 54 31 35 42 45 4c 52 45 44 2c ┆ SUBSTR (T15BELRED,┆
0x49e6f…49e8f 31 30 2c 36 29 20 3d 20 53 55 42 53 54 52 20 28 54 31 34 2c 39 2c 36 29 3b 20 20 20 20 20 20 20 ┆10,6) = SUBSTR (T14,9,6); ┆
0x49e8f…49e9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49e9e…49ebe (47, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 31 35 20 3d 20 54 31 35 42 45 4c 52 45 44 3b 20 20 ┆ T15 = T15BELRED; ┆
0x49ebe…49ede 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49ede…49eed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49eed…49f0d (47, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4b 52 34 37 3b 20 20 20 20 20 20 ┆ GO TO SKR47; ┆
0x49f0d…49f2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49f2d…49f3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49f3c…49f5c (47, 0, 22) 53 4b 52 34 35 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKR45: ┆
0x49f5c…49f7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49f7c…49f8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49f8b…49fab (47, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 20 28 54 31 35 42 45 4c 52 45 44 2c ┆ SUBSTR (T15BELRED,┆
0x49fab…49fcb 32 2c 31 34 29 20 3d 20 54 31 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2,14) = T14; ┆
0x49fcb…49fda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x49fda…49ffa (47, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 31 35 20 3d 20 54 31 35 42 45 4c 52 45 44 3b 20 20 ┆ T15 = T15BELRED; ┆
0x49ffa…4a01a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a01a…4a029 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a029…4a049 (47, 0, 25) 53 4b 52 34 37 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKR47: ┆
0x4a049…4a069 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a069…4a078 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a078…4a098 (47, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 54 31 31 29 ┆ PUT SKIP EDIT(T11)┆
0x4a098…4a0b8 28 41 28 31 32 29 29 28 54 31 33 29 28 41 29 28 27 20 27 29 28 41 28 4d 29 29 28 54 31 35 29 28 ┆(A(12))(T13)(A)(' ')(A(M))(T15)(┆
0x4a0b8…4a0c7 41 28 33 33 29 29 20 20 20 20 20 20 20 20 20 ┆A(33)) ┆
0x4a0c7…4a0e7 (47, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 54 34 29 20 28 41 28 34 29 29 3b 20 20 ┆ (T4) (A(4)); ┆
0x4a0e7…4a107 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a107…4a116 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a116…4a136 (47, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 54 31 33 2c 35 2c 31 ┆ IF SUBSTR (T13,5,1┆
0x4a136…4a156 29 20 3d 20 27 20 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4b 52 35 3b 20 20 20 20 20 20 20 20 ┆) = ' ' THEN GO TO SKR5; ┆
0x4a156…4a165 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a165…4a185 (47, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 4b 4f 4e 54 4f 4e 52 ┆ IF SUBSTR (KONTONR┆
0x4a185…4a1a5 47 2c 31 2c 35 29 20 3e 20 27 37 30 30 30 31 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆G,1,5) > '70001' THEN DO; ┆
0x4a1a5…4a1b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a1b4…4a1d4 (47, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 54 45 58 54 3b 20 20 20 ┆ CALL KONTOTEXT; ┆
0x4a1d4…4a1f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a1f4…4a203 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a203…4a223 (47, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 45 44 49 54 20 28 27 20 20 20 27 29 20 28 ┆ PUT EDIT (' ') (┆
0x4a223…4a243 41 29 20 28 4b 54 4f 54 45 58 54 29 20 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A) (KTOTEXT) (A); ┆
0x4a243…4a252 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a252…4a272 (47, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 35 46 4f 52 45 47 20 3d 20 53 55 42 53 ┆ KONTO5FOREG = SUBS┆
0x4a272…4a292 54 52 20 28 4b 4f 4e 54 4f 4e 52 47 2c 31 2c 35 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TR (KONTONRG,1,5); ┆
0x4a292…4a2a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a2a1…4a2c1 (47, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4a2c1…4a2e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a2e1…4a2f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a2f0…4a310 (47, 0, 34) 53 4b 52 35 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKR5: ┆
0x4a310…4a330 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a330…4a33f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a33f…4a35f (47, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 34 3d 27 20 20 20 20 27 3b 20 20 20 20 20 20 20 20 ┆ T4=' '; ┆
0x4a35f…4a37f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a37f…4a38e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a38e…4a3ae (47, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x4a3ae…4a3ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a3ce…4a3dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a3dd…4a3fd (47, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4a3fd…4a41d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a41d…4a42c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a42c…4a44c (47, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 4a 29 3d 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ SUMMA(J)=0; ┆
0x4a44c…4a46c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a46c…4a47b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a47b…4a49b (47, 0, 39) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4a49b…4a4bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a4bb…4a4ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a4ca…4a4ea (47, 0, 40) 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 47 3d 4b 4f 4e 54 4f 4e 52 3b 20 20 20 20 20 20 20 ┆ KONTONRG=KONTONR; ┆
0x4a4ea…4a50a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a50a…4a519 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a519…4a539 (47, 0, 41) 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 31 29 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SUMMA(1)=0; ┆
0x4a539…4a559 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a559…4a568 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a568…4a588 (47, 0, 42) 20 20 20 20 20 20 20 20 49 46 20 4b 7f 3d 31 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆ IF K =11 THEN DO; ┆
0x4a588…4a5a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a5a8…4a5b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a5b7…4a5d7 (47, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP; ┆
0x4a5d7…4a5f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a5f7…4a606 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a606…4a626 (47, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x4a626…4a646 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a646…4a655 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a655…4a675 (47, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 30 3b 20 20 20 20 20 20 20 20 ┆ ANTAL_KONT=0; ┆
0x4a675…4a695 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a695…4a6a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a6a4…4a6c4 (47, 0, 46) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4a6c4…4a6e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a6e4…4a6f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a6f3…4a713 (47, 0, 47) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x4a713…4a733 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a733…4a742 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a742…4a762 (47, 0, 48) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x4a762…4a782 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a782…4a791 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a791…4a7e0 (47, 0, 49) 0x20[0x4f]
[…0x2…]
0x4a87e…4a89e (47, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 20 20 20 55 54 53 4b 52 49 ┆ /* UTSKRI┆
0x4a89e…4a8be 46 54 20 41 56 20 4c 49 53 54 52 41 44 20 46 5c 52 20 4b 4f 4e 54 4f 55 54 44 52 41 47 20 20 20 ┆FT AV LISTRAD FÖR KONTOUTDRAG ┆
0x4a8be…4a8cd 20 20 20 20 20 2a 2f 20 20 20 20 20 20 20 20 ┆ */ ┆
0x4a8cd…4a91c (47, 0, 53) 0x20[0x4f]
0x4a91c…4a93c (47, 0, 54) 50 4f 53 54 53 4b 52 49 56 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆POSTSKRIV:PROC; ┆
0x4a93c…4a95c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a95c…4a96b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a96b…4a98b (47, 0, 55) 20 20 20 20 20 20 20 20 49 46 20 52 3c 38 20 54 48 45 4e 20 43 41 4c 4c 20 52 55 42 3b 20 20 20 ┆ IF R<8 THEN CALL RUB; ┆
0x4a98b…4a9ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a9ab…4a9ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4a9ba…4a9da (47, 0, 56) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 56 45 52 4e 52 54 20 54 48 45 4e 20 44 4f ┆ IF VERNR =VERNRT THEN DO┆
0x4a9da…4a9fa 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x4a9fa…4aa09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4aa09…4aa29 (47, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 54 45 58 54 29 3d 56 45 52 4e 52 ┆ UNSPEC(VERTEXT)=VERNR┆
0x4aa29…4aa49 2d 4b 4f 4e 53 54 41 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆-KONSTANT; ┆
0x4aa49…4aa58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4aa58…4aa78 (47, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 50 33 3b 20 20 20 ┆ ON ERROR GO TO P3; ┆
0x4aa78…4aa98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4aa98…4aaa7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4aaa7…4aac7 (47, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 44 31 3b 20 ┆ ON ENDFILE GO TO D1; ┆
0x4aac7…4aae7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4aae7…4aaf6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4aaf6…4ab16 (47, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 54 45 58 54 29 20 49 4e ┆ READ FILE(VERTEXT) IN┆
0x4ab16…4ab36 54 4f 28 54 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO(TSTR); ┆
0x4ab36…4ab45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ab45…4ab65 (47, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 50 32 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO P2; ┆
0x4ab65…4ab85 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ab85…4ab94 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ab94…4abb4 (47, 0, 62) 50 33 3a 20 20 20 20 20 20 20 20 54 45 58 54 3d 27 2a 2a 2a 2a 20 46 49 4e 4e 53 20 45 4a 27 3b ┆P3: TEXT='**** FINNS EJ';┆
0x4abb4…4abd4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4abd4…4abe3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4abe3…4ac03 (47, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 44 41 54 55 4d 54 3d 50 44 41 54 55 4d 3b 20 20 20 20 20 20 20 ┆ DATUMT=PDATUM; ┆
0x4ac03…4ac23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ac23…4ac32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ac32…4ac52 (47, 0, 64) 50 32 3a 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P2: END; ┆
0x4ac52…4ac72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ac72…4ac81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ac81…4aca1 (47, 0, 65) 20 20 20 20 20 20 20 20 49 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=0; ┆
0x4aca1…4acc1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4acc1…4acd0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4acd0…4acf0 (47, 0, 66) 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO J=1 TO 11; ┆
0x4acf0…4ad10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ad10…4ad1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ad1f…4ad3f (47, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4a 3d 36 29 20 7c 20 28 4a 3d 39 29 20 54 48 45 4e ┆ IF (J=6) ö (J=9) THEN┆
0x4ad3f…4ad5f 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x4ad5f…4ad6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ad6e…4ad8e (47, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 3d 49 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=I+1; ┆
0x4ad8e…4adae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4adae…4adbd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4adbd…4addd (47, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 49 2c 31 29 3d 27 2e ┆ SUBSTR(T13,I,1)='.┆
0x4addd…4adfd 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x4adfd…4ae0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ae0c…4ae2c (47, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4ae2c…4ae4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ae4c…4ae5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ae5b…4ae7b (47, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 49 3d 49 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=I+1; ┆
0x4ae7b…4ae9b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ae9b…4aeaa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4aeaa…4aeca (47, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 49 2c 31 29 3d 53 55 42 53 54 ┆ SUBSTR(T13,I,1)=SUBST┆
0x4aeca…4aeea 52 28 4b 4f 4e 54 4f 4e 52 2c 4a 2c 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R(KONTONR,J,1); ┆
0x4aeea…4aef9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4aef9…4af19 (47, 0, 73) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4af19…4af39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4af39…4af48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4af48…4af68 (47, 0, 74) 20 20 20 20 20 20 20 20 49 46 20 50 44 41 54 55 4d 3c 30 20 54 48 45 4e 20 50 44 41 54 55 4d 3d ┆ IF PDATUM<0 THEN PDATUM=┆
0x4af68…4af88 2d 50 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆-PDATUM; ┆
0x4af88…4af97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4af97…4afb7 (47, 0, 75) 20 20 20 20 20 20 20 20 49 49 49 49 3d 44 41 54 55 4d 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IIII=DATUMT; ┆
0x4afb7…4afd7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4afd7…4afe6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4afe6…4b006 (47, 0, 76) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 49 4e 54 4f 43 48 28 49 49 49 49 2c 54 36 31 29 3b 20 ┆ CALL BINTOCH(IIII,T61); ┆
0x4b006…4b026 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b026…4b035 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b035…4b055 (47, 0, 77) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 49 4e 54 4f 43 48 28 50 44 41 54 55 4d 2c 54 36 32 29 ┆ CALL BINTOCH(PDATUM,T62)┆
0x4b055…4b075 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x4b075…4b084 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b084…4b0a4 (47, 0, 78) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 42 45 4c 4f 50 50 2c 54 31 34 29 3b ┆ CALL BELRED(BELOPP,T14);┆
0x4b0a4…4b0c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b0c4…4b0d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b0d3…4b0f3 (47, 0, 79) 20 20 20 20 20 20 20 20 49 46 20 54 36 31 3d 54 36 32 20 54 48 45 4e 20 54 36 32 3d 27 20 20 20 ┆ IF T61=T62 THEN T62=' ┆
0x4b0f3…4b113 20 20 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ '; ┆
0x4b113…4b122 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b122…4b142 (47, 0, 80) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 27 20 27 29 28 41 28 31 32 29 ┆ PUT SKIP EDIT(' ')(A(12)┆
0x4b142…4b162 29 28 54 31 33 29 28 41 28 31 38 29 29 28 54 36 31 29 28 41 28 38 29 29 28 54 36 32 29 28 41 28 ┆)(T13)(A(18))(T61)(A(8))(T62)(A(┆
0x4b162…4b171 38 29 29 20 20 20 20 20 20 20 20 20 20 20 20 ┆8)) ┆
0x4b171…4b191 (47, 0, 81) 20 20 20 20 20 20 20 20 28 56 45 52 4e 52 29 28 50 27 2d 2d 2d 2d 2d 39 27 2c 58 28 31 29 29 28 ┆ (VERNR)(P'-----9',X(1))(┆
0x4b191…4b1b1 54 31 34 29 28 41 28 31 38 29 29 28 54 45 58 54 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆T14)(A(18))(TEXT)(A); ┆
0x4b1b1…4b1c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b1c0…4b1e0 (48, 0, 0) 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x4b1e0…4b200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b200…4b20f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b20f…4b22f (48, 0, 1) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x4b22f…4b24f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b24f…4b25e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b25e…4b27e (48, 0, 2) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x4b27e…4b29e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b29e…4b2ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b2ad…4b2fc (48, 0, 3) 0x20[0x4f]
0x4b2fc…4b31c (48, 0, 4) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x4b31c…4b33c 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x4b33c…4b34b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b34b…4b39a (48, 0, 5) 0x20[0x4f]
[…0x1…]
0x4b3e9…4b409 (48, 0, 7) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x4b409…4b429 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b429…4b438 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b438…4b458 (48, 0, 8) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x4b458…4b478 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b478…4b487 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b487…4b4a7 (48, 0, 9) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 43 ┆ IF DATUM='0 ' THEN C┆
0x4b4a7…4b4c7 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ALL PLOAD('Q '); ┆
0x4b4c7…4b4d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b4d6…4b4f6 (48, 0, 10) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x4b4f6…4b516 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b516…4b525 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b525…4b545 (48, 0, 11) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x4b545…4b565 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b565…4b574 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b574…4b594 (48, 0, 12) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x4b594…4b5b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b5b4…4b5c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b5c3…4b5e3 (48, 0, 13) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 4f 4e 54 4f 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN KONTOP; ┆
0x4b5e3…4b603 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b603…4b612 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b612…4b632 (48, 0, 14) 4c 30 3a 20 20 20 20 20 43 41 4c 4c 20 53 54 59 52 44 41 54 41 3b 20 20 20 20 20 20 20 20 20 20 ┆L0: CALL STYRDATA; ┆
0x4b632…4b652 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b652…4b661 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b661…4b681 (48, 0, 15) 20 20 20 20 20 20 20 20 49 46 20 59 3d 27 36 20 27 20 7c 20 59 3d 27 37 20 27 20 54 48 45 4e 20 ┆ IF Y='6 ' ö Y='7 ' THEN ┆
0x4b681…4b6a1 44 4f 3b 20 20 20 20 20 20 20 20 2f 2a 20 20 55 2d 4b 4f 4e 54 4f 20 20 45 4c 4c 45 52 20 49 4b ┆DO; /* U-KONTO ELLER IK┆
0x4b6a1…4b6b0 2d 53 4c 41 47 2a 2f 20 20 20 20 20 20 20 20 ┆-SLAG*/ ┆
0x4b6b0…4b6d0 (48, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x4b6d0…4b6f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b6f0…4b6ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b6ff…4b71f (48, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 56 31 32 20 20 20 20 20 27 ┆ CALL PLOAD('V12 '┆
0x4b71f…4b73f 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x4b73f…4b74e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b74e…4b76e (48, 0, 18) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4b76e…4b78e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b78e…4b79d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b79d…4b7bd (48, 0, 19) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 52 54 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 ┆ CALL STARTPOST; ┆
0x4b7bd…4b7dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b7dd…4b7ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b7ec…4b80c (48, 0, 20) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 3d 31 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 30 ┆ IF RCODE=1 THEN GO TO L0┆
0x4b80c…4b82c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x4b82c…4b83b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b83b…4b85b (48, 0, 21) 4c 31 3a 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L1: CALL POST; ┆
0x4b85b…4b87b 20 20 20 20 2f 2a 20 49 4e 4c 5b 53 4e 2e 20 41 56 20 32 35 35 20 52 45 43 2e 20 46 52 5d 4e 20 ┆ /* INLÄSN. AV 255 REC. FRÅN ┆
0x4b87b…4b88a 56 45 52 42 45 4c 4f 50 20 2a 2f 20 20 20 20 ┆VERBELOP */ ┆
0x4b88a…4b8aa (48, 0, 22) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 54 45 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL DATTEST; ┆
0x4b8aa…4b8ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b8ca…4b8d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b8d9…4b8f9 (48, 0, 23) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c ┆ IF RCODE =0 THEN GO TO L┆
0x4b8f9…4b919 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x4b919…4b928 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b928…4b948 (48, 0, 24) 20 20 20 20 20 20 20 20 49 46 20 4f 46 46 53 45 54 3e 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF OFFSET>1 THEN DO; ┆
0x4b948…4b968 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b968…4b977 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b977…4b997 (48, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 54 45 53 54 3b 20 20 20 20 20 20 ┆ CALL KONTOTEST; ┆
0x4b997…4b9b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b9b7…4b9c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4b9c6…4b9e6 (48, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 ┆ IF RCODE =0 THEN GO T┆
0x4b9e6…4ba06 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O L1; ┆
0x4ba06…4ba15 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ba15…4ba35 (48, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3d 27 53 4c 55 54 39 39 39 39 39 ┆ IF KONTONR='SLUT99999┆
0x4ba35…4ba55 39 39 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆99' THEN DO; ┆
0x4ba55…4ba64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ba64…4ba84 (48, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 3c 33 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF R<3 THEN CALL R┆
0x4ba84…4baa4 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UB; ┆
0x4baa4…4bab3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bab3…4bad3 (48, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 53 55 4d 4d 41 28 ┆ CALL BELRED(SUMMA(┆
0x4bad3…4baf3 31 29 2c 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1),T14); ┆
0x4baf3…4bb02 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bb02…4bb22 (48, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 34 3d 41 4e 54 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 ┆ T4=ANTAL_KONT; ┆
0x4bb22…4bb42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bb42…4bb51 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bb51…4bb71 (48, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 41 4e 54 ┆ TOT_ANTAL_KONT=ANT┆
0x4bb71…4bb91 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AL_KONT; ┆
0x4bb91…4bba0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bba0…4bbc0 (48, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 52 4b 4f 4e ┆ PUT SKIP EDIT(RKON┆
0x4bbc0…4bbe0 54 4f 31 29 28 58 28 31 32 29 2c 41 28 34 31 29 29 28 54 31 34 29 28 41 28 33 33 29 29 28 54 34 ┆TO1)(X(12),A(41))(T14)(A(33))(T4┆
0x4bbe0…4bbef 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 ┆)(A); ┆
0x4bbef…4bc0f (48, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x4bc0f…4bc2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bc2f…4bc3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bc3e…4bc5e (48, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4bc5e…4bc7e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bc7e…4bc8d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bc8d…4bcad (48, 0, 35) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4bcad…4bccd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bccd…4bcdc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bcdc…4bcfc (48, 0, 36) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x4bcfc…4bd1c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bd1c…4bd2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bd2b…4bd4b (48, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3e 3d 4b 4f 4e 54 4f 32 20 54 48 ┆ IF KONTONR>=KONTO2 TH┆
0x4bd4b…4bd6b 45 4e 20 4b 4f 4e 54 4f 4e 52 3d 27 53 4c 55 54 39 39 39 39 39 39 39 27 3b 20 20 20 20 20 20 20 ┆EN KONTONR='SLUT9999999'; ┆
0x4bd6b…4bd7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bd7a…4bd9a (48, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 7f 3d 4b 4f 4e 54 4f 4e 52 47 20 ┆ IF KONTONR =KONTONRG ┆
0x4bd9a…4bdba 54 48 45 4e 20 43 41 4c 4c 20 53 4b 52 49 56 5f 53 55 4d 4d 41 3b 20 20 20 20 20 20 20 20 20 20 ┆THEN CALL SKRIV_SUMMA; ┆
0x4bdba…4bdc9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bdc9…4bde9 (48, 0, 39) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4bde9…4be09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4be09…4be18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4be18…4be38 (48, 0, 40) 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3d 27 53 4c 55 54 39 39 39 39 39 39 39 27 ┆ IF KONTONR='SLUT9999999'┆
0x4be38…4be58 20 54 48 45 4e 20 47 4f 20 54 4f 20 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ THEN GO TO UT; ┆
0x4be58…4be67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4be67…4be87 (48, 0, 41) 20 20 20 20 20 20 20 20 49 46 20 4c 49 53 54 54 59 50 3d 31 20 54 48 45 4e 20 43 41 4c 4c 20 50 ┆ IF LISTTYP=1 THEN CALL P┆
0x4be87…4bea7 4f 53 54 53 4b 52 49 56 3b 20 20 20 20 20 20 2f 2a 20 20 20 20 20 20 20 4b 4f 4e 54 4f 55 54 44 ┆OSTSKRIV; /* KONTOUTD┆
0x4bea7…4beb6 52 41 47 20 20 2a 2f 20 20 20 20 20 20 20 20 ┆RAG */ ┆
0x4beb6…4bed6 (48, 0, 42) 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 31 29 3d 53 55 4d 4d 41 28 31 29 2b 42 45 4c 4f 50 50 ┆ SUMMA(1)=SUMMA(1)+BELOPP┆
0x4bed6…4bef6 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x4bef6…4bf05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bf05…4bf25 (48, 0, 43) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 41 4e 54 41 4c 5f 4b 4f 4e 54 2b 31 3b ┆ ANTAL_KONT=ANTAL_KONT+1;┆
0x4bf25…4bf45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bf45…4bf54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bf54…4bf74 (48, 0, 44) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x4bf74…4bf94 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bf94…4bfa3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4bfa3…4bff2 (48, 0, 45) 0x20[0x4f]
0x4bff2…4c012 (48, 0, 46) 55 54 3a 20 20 20 20 20 49 46 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 30 20 54 48 45 4e ┆UT: IF TOT_ANTAL_KONT=0 THEN┆
0x4c012…4c032 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x4c032…4c041 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c041…4c061 (48, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x4c061…4c081 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c081…4c090 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c090…4c0b0 (48, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 2a 2a 2a ┆ PUT SKIP(2) EDIT('***┆
0x4c0b0…4c0d0 2a 20 20 49 4e 47 45 4e 20 4b 4f 4e 54 45 52 49 4e 47 20 49 4e 4f 4d 20 42 45 47 5b 52 54 20 4f ┆* INGEN KONTERING INOM BEGÄRT O┆
0x4c0d0…4c0df 4d 52 5d 44 45 27 29 28 41 29 3b 20 20 20 20 ┆MRÅDE')(A); ┆
0x4c0df…4c0ff (48, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-2; ┆
0x4c0ff…4c11f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c11f…4c12e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c12e…4c14e (48, 0, 50) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4c14e…4c16e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c16e…4c17d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c17d…4c19d (48, 0, 51) 20 20 20 20 20 20 20 20 49 46 20 52 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 50 28 52 29 ┆ IF R =0 THEN PUT SKIP(R)┆
0x4c19d…4c1bd 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x4c1bd…4c1cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c1cc…4c21b (48, 0, 52) 0x20[0x4f]
0x4c21b…4c23b (48, 0, 53) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x4c23b…4c25b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c25b…4c26a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c26a…4c28a (48, 0, 54) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x4c28a…4c2aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c2aa…4c2b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c2b9…4c308 (48, 0, 55) 0x20[0x4f]
0x4c308…4c328 (48, 0, 56) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x4c328…4c348 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c348…4c357 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4c357…4c377 (48, 0, 57) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c397…4c3a6 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c3a6…4c3c6 (48, 0, 58) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c3e6…4c3f5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c3f5…4c415 (48, 0, 59) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c435…4c444 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c444…4c464 (48, 0, 60) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c484…4c493 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c493…4c4b3 (48, 0, 61) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c4d3…4c4e2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c4e2…4c502 (48, 0, 62) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c522…4c531 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c531…4c551 (48, 0, 63) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c571…4c580 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c580…4c5a0 (48, 0, 64) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c5c0…4c5cf 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c5cf…4c5ef (48, 0, 65) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c60f…4c61e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c61e…4c63e (48, 0, 66) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c65e…4c66d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c66d…4c68d (48, 0, 67) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c6ad…4c6bc 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c6bc…4c6dc (48, 0, 68) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c6fc…4c70b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c70b…4c72b (48, 0, 69) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c74b…4c75a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c75a…4c77a (48, 0, 70) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c79a…4c7a9 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c7a9…4c7c9 (48, 0, 71) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c7e9…4c7f8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c7f8…4c818 (48, 0, 72) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c838…4c847 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c847…4c867 (48, 0, 73) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c887…4c896 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c896…4c8b6 (48, 0, 74) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c8d6…4c8e5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c8e5…4c905 (48, 0, 75) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c925…4c934 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c934…4c954 (48, 0, 76) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c974…4c983 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c983…4c9a3 (48, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4c9c3…4c9d2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4c9d2…4c9f2 (48, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4ca12…4ca21 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4ca21…4ca41 (48, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4ca61…4ca70 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4ca70…4ca90 (48, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4cab0…4cabf 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4cabf…4cadf (48, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x4caff…4cb0e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x4cb0e…4cb2e (49, 0, 0) 2f 2a 20 56 31 32 20 53 4b 52 49 56 45 52 20 55 54 20 53 41 4c 44 4f 4c 49 53 54 4f 52 20 46 5c ┆/* V12 SKRIVER UT SALDOLISTOR FÖ┆
0x4cb2e…4cb4e 52 20 55 4b 4f 4e 54 4f 20 49 4b 4b 4f 4e 54 4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R UKONTO IKKONTO ┆
0x4cb4e…4cb5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cb5d…4cb7d (49, 0, 1) 20 20 20 4c 49 53 54 41 4e 53 20 4f 4d 46 41 54 54 4e 49 4e 47 20 42 45 47 52 5b 4e 53 41 53 20 ┆ LISTANS OMFATTNING BEGRÄNSAS ┆
0x4cb7d…4cb9d 41 56 20 32 20 4b 4f 4e 54 4f 4e 55 4d 4d 45 52 20 26 20 32 20 44 41 54 55 4d 20 20 20 20 20 20 ┆AV 2 KONTONUMMER & 2 DATUM ┆
0x4cb9d…4cbac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cbac…4cbcc (49, 0, 2) 20 20 20 56 20 30 3a 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ V 0:1 ┆
0x4cbcc…4cbec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cbec…4cbfb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cbfb…4cc1b (49, 0, 3) 20 20 20 37 38 30 39 32 37 20 4a 5d 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 780927 JÅ */ ┆
0x4cc1b…4cc3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cc3b…4cc4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cc4a…4cc99 (49, 0, 4) 0x20[0x4f]
0x4cc99…4ccb9 (49, 0, 5) 44 43 4c 20 4b 4f 4e 54 4f 31 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL KONTO1 CHAR(11), ┆
0x4ccb9…4ccd9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ccd9…4cce8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cce8…4cd08 (49, 0, 6) 20 20 20 20 4b 4f 4e 54 4f 32 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTO2 CHAR(11), ┆
0x4cd08…4cd28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cd28…4cd37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cd37…4cd57 (49, 0, 7) 20 20 20 20 52 4b 4f 4e 54 4f 31 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ RKONTO1 CHAR(13), ┆
0x4cd57…4cd77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cd77…4cd86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cd86…4cda6 (49, 0, 8) 20 20 20 20 52 4b 4f 4e 54 4f 32 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ RKONTO2 CHAR(13), ┆
0x4cda6…4cdc6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cdc6…4cdd5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cdd5…4cdf5 (49, 0, 9) 20 20 20 20 44 41 54 55 4d 31 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM1 CHAR(6), ┆
0x4cdf5…4ce15 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ce15…4ce24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ce24…4ce44 (49, 0, 10) 20 20 20 20 44 41 54 55 4d 32 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM2 CHAR(6), ┆
0x4ce44…4ce64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ce64…4ce73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ce73…4ce93 (49, 0, 11) 20 20 20 20 44 41 54 31 42 49 4e 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DAT1BIN BINARY, ┆
0x4ce93…4ceb3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ceb3…4cec2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cec2…4cee2 (49, 0, 12) 20 20 20 20 44 41 54 32 42 49 4e 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DAT2BIN BINARY, ┆
0x4cee2…4cf02 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cf02…4cf11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cf11…4cf31 (49, 0, 13) 20 20 20 20 53 50 54 59 50 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SPTYP BINARY, ┆
0x4cf31…4cf51 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cf51…4cf60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cf60…4cf80 (49, 0, 14) 20 20 20 20 53 54 41 42 28 31 31 29 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ STAB(11) BINARY, ┆
0x4cf80…4cfa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cfa0…4cfaf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cfaf…4cfcf (49, 0, 15) 20 20 20 20 53 5f 4d 41 52 4b 20 43 48 41 52 28 31 33 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ S_MARK CHAR(13); ┆
0x4cfcf…4cfef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cfef…4cffe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cffe…4d04d (49, 0, 16) 0x20[0x4f]
0x4d04d…4d06d (49, 0, 17) 44 43 4c 20 31 20 54 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 TSTR, ┆
0x4d06d…4d08d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d08d…4d09c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d09c…4d0bc (49, 0, 18) 20 20 20 20 20 20 32 20 56 45 52 4e 52 54 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 VERNRT FIXED(5), ┆
0x4d0bc…4d0dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d0dc…4d0eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d0eb…4d10b (49, 0, 19) 20 20 20 20 20 20 32 20 44 41 54 55 4d 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 DATUMT BINARY, ┆
0x4d10b…4d12b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d12b…4d13a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d13a…4d15a (49, 0, 20) 20 20 20 20 20 20 32 20 54 45 58 54 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT CHAR(13), ┆
0x4d15a…4d17a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d17a…4d189 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d189…4d1a9 (49, 0, 21) 20 20 20 20 20 20 32 20 41 4e 54 56 45 52 50 20 42 49 4e 41 52 59 3b 20 20 20 20 20 20 20 20 20 ┆ 2 ANTVERP BINARY; ┆
0x4d1a9…4d1c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d1c9…4d1d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d1d8…4d227 (49, 0, 22) 0x20[0x4f]
0x4d227…4d247 (49, 0, 23) 44 43 4c 20 50 4b 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL PK POINTER, ┆
0x4d247…4d267 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d267…4d276 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d276…4d296 (49, 0, 24) 20 20 20 20 31 20 42 53 54 52 20 42 41 53 45 44 28 50 4b 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 BSTR BASED(PK), ┆
0x4d296…4d2b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d2b6…4d2c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d2c5…4d2e5 (49, 0, 25) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 4e 52 20 43 48 41 52 28 31 31 29 3b 20 20 20 20 20 20 20 ┆ 2 KONTONR CHAR(11); ┆
0x4d2e5…4d305 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d305…4d314 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d314…4d363 (49, 0, 26) 0x20[0x4f]
0x4d363…4d383 (49, 0, 27) 44 43 4c 20 50 42 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL PB POINTER, ┆
0x4d383…4d3a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d3a3…4d3b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d3b2…4d3d2 (49, 0, 28) 20 20 20 20 31 20 42 45 4c 53 54 52 20 42 41 53 45 44 28 50 42 29 2c 20 20 20 20 20 20 20 20 20 ┆ 1 BELSTR BASED(PB), ┆
0x4d3d2…4d3f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d3f2…4d401 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d401…4d421 (49, 0, 29) 20 20 20 20 20 20 32 20 56 45 52 4e 52 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 VERNR BINARY, ┆
0x4d421…4d441 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d441…4d450 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d450…4d470 (49, 0, 30) 20 20 20 20 20 20 32 20 50 44 41 54 55 4d 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 PDATUM BINARY, ┆
0x4d470…4d490 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d490…4d49f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d49f…4d4bf (49, 0, 31) 20 20 20 20 20 20 32 20 42 45 4c 4f 50 50 20 46 49 58 45 44 28 31 31 29 3b 20 20 20 20 20 20 20 ┆ 2 BELOPP FIXED(11); ┆
0x4d4bf…4d4df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d4df…4d4ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d4ee…4d53d (49, 0, 32) 0x20[0x4f]
0x4d53d…4d55d (49, 0, 33) 44 43 4c 20 31 20 41 52 45 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 AREA, ┆
0x4d55d…4d57d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d57d…4d58c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d58c…4d5ac (49, 0, 34) 20 20 20 20 20 20 32 20 43 48 28 32 35 35 29 20 43 48 41 52 28 36 31 29 3b 20 20 20 20 20 20 20 ┆ 2 CH(255) CHAR(61); ┆
0x4d5ac…4d5cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d5cc…4d5db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d5db…4d5fb (49, 0, 35) 20 20 20 20 20 20 2f 2a 20 31 36 20 35 35 35 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 ┆ /* 16 555 BYTES */ ┆
0x4d5fb…4d61b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d61b…4d62a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d62a…4d679 (49, 0, 36) 0x20[0x4f]
0x4d679…4d699 (49, 0, 37) 44 43 4c 20 56 45 52 54 45 58 54 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL VERTEXT FILE, ┆
0x4d699…4d6b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d6b9…4d6c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d6c8…4d6e8 (49, 0, 38) 20 20 20 20 56 45 52 42 45 4c 4f 50 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ VERBELOP FILE, ┆
0x4d6e8…4d708 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d708…4d717 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d717…4d737 (49, 0, 39) 20 20 20 20 42 53 54 52 4c 20 42 49 4e 41 52 59 20 49 4e 49 54 28 36 31 29 2c 20 20 20 20 20 20 ┆ BSTRL BINARY INIT(61), ┆
0x4d737…4d757 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d757…4d766 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d766…4d786 (49, 0, 40) 20 20 20 20 42 4c 4f 43 4b 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BLOCKANT BINARY, ┆
0x4d786…4d7a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d7a6…4d7b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d7b5…4d7d5 (49, 0, 41) 20 20 20 20 4a 4b 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JK BINARY, ┆
0x4d7d5…4d7f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d7f5…4d804 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d804…4d824 (49, 0, 42) 20 20 20 20 4a 4a 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JJ BINARY, ┆
0x4d824…4d844 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d844…4d853 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d853…4d873 (49, 0, 43) 20 20 20 20 4c 49 53 54 54 59 50 20 42 49 4e 41 52 59 20 49 4e 49 54 28 32 29 2c 20 20 20 20 20 ┆ LISTTYP BINARY INIT(2), ┆
0x4d873…4d893 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d893…4d8a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d8a2…4d8c2 (49, 0, 44) 20 20 20 20 52 43 4f 44 45 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE BINARY, ┆
0x4d8c2…4d8e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d8e2…4d8f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d8f1…4d911 (49, 0, 45) 20 20 20 20 4b 4f 4e 54 4f 47 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTOG CHAR(11), ┆
0x4d911…4d931 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d931…4d940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d940…4d960 (49, 0, 46) 20 20 20 20 53 49 44 41 20 42 49 4e 41 52 59 20 49 4e 49 54 28 31 29 2c 20 20 20 20 20 20 20 20 ┆ SIDA BINARY INIT(1), ┆
0x4d960…4d980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d980…4d98f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d98f…4d9af (49, 0, 47) 20 20 20 20 52 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ R BINARY INIT(0), ┆
0x4d9af…4d9cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d9cf…4d9de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d9de…4d9fe (49, 0, 48) 20 20 20 20 4e 41 4d 4e 28 33 29 20 43 48 41 52 28 31 31 29 20 49 4e 49 54 28 27 4d 45 4c 4c 41 ┆ NAMN(3) CHAR(11) INIT('MELLA┆
0x4d9fe…4da1e 4e 4b 52 41 46 54 27 2c 27 4b 56 56 2f 4b 57 41 52 4f 53 27 2c 27 41 52 4f 53 27 29 2c 20 20 20 ┆NKRAFT','KVV/KWAROS','AROS'), ┆
0x4da1e…4da2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4da2d…4da4d (49, 0, 49) 20 20 20 20 52 54 45 58 54 28 38 29 20 43 48 41 52 28 32 32 29 20 49 4e 49 54 28 20 20 20 20 20 ┆ RTEXT(8) CHAR(22) INIT( ┆
0x4da4d…4da6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4da6d…4da7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4da7c…4da9c (49, 0, 50) 20 20 20 20 27 4b 4f 4e 54 4f 55 54 44 52 41 47 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'KONTOUTDRAG', ┆
0x4da9c…4dabc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dabc…4dacb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dacb…4daeb (49, 0, 51) 20 20 20 20 27 53 41 4c 44 4f 42 45 53 4b 45 44 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'SALDOBESKED', ┆
0x4daeb…4db0b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4db0b…4db1a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4db1a…4db3a (49, 0, 52) 20 20 20 20 27 50 45 52 44 41 47 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'PERDAG', ┆
0x4db3a…4db5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4db5a…4db69 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4db69…4db89 (49, 0, 53) 20 20 20 20 27 42 4f 4b 44 41 47 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'BOKDAG', ┆
0x4db89…4dba9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dba9…4dbb8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dbb8…4dbd8 (49, 0, 54) 20 20 20 20 27 42 4f 4b 44 41 47 20 20 50 45 52 44 41 47 20 20 20 20 56 45 52 2e 27 2c 20 20 20 ┆ 'BOKDAG PERDAG VER.', ┆
0x4dbd8…4dbf8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dbf8…4dc07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dc07…4dc27 (49, 0, 55) 20 20 20 20 27 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ '', ┆
0x4dc27…4dc47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dc47…4dc56 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dc56…4dc76 (49, 0, 56) 20 20 20 20 27 54 45 58 54 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'TEXT', ┆
0x4dc76…4dc96 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dc96…4dca5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dca5…4dcc5 (49, 0, 57) 20 20 20 20 27 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ''), ┆
0x4dcc5…4dce5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dce5…4dcf4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dcf4…4dd14 (49, 0, 58) 20 20 20 20 52 4b 4f 4e 54 4f 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RKONTO CHAR(13), ┆
0x4dd14…4dd34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dd34…4dd43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dd43…4dd63 (49, 0, 59) 20 20 20 20 4b 4f 4e 54 4f 4e 52 47 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ KONTONRG CHAR(11), ┆
0x4dd63…4dd83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dd83…4dd92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dd92…4ddb2 (49, 0, 60) 20 20 20 20 4b 4f 4e 53 54 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONSTANT BINARY, ┆
0x4ddb2…4ddd2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ddd2…4dde1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dde1…4de01 (49, 0, 61) 20 20 20 20 53 4b 46 4c 41 47 47 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 ┆ SKFLAGG BINARY INIT(0), ┆
0x4de01…4de21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4de21…4de30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4de30…4de50 (49, 0, 62) 20 20 20 20 46 4c 41 47 47 31 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 ┆ FLAGG1 BINARY INIT(0), ┆
0x4de50…4de70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4de70…4de7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4de7f…4de9f (49, 0, 63) 20 20 20 20 46 4c 41 47 47 32 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 ┆ FLAGG2 BINARY INIT(0), ┆
0x4de9f…4debf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4debf…4dece 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dece…4deee (49, 0, 64) 20 20 20 20 46 4c 41 47 47 33 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 ┆ FLAGG3 BINARY INIT(0), ┆
0x4deee…4df0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4df0e…4df1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4df1d…4df3d (49, 0, 65) 20 20 20 20 53 55 4d 4d 41 31 20 46 49 58 45 44 28 31 31 29 20 49 4e 49 54 28 30 29 2c 20 20 20 ┆ SUMMA1 FIXED(11) INIT(0), ┆
0x4df3d…4df5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4df5d…4df6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4df6c…4df8c (49, 0, 66) 20 20 20 20 53 55 4d 4d 41 32 20 46 49 58 45 44 28 31 31 29 20 49 4e 49 54 28 30 29 2c 20 20 20 ┆ SUMMA2 FIXED(11) INIT(0), ┆
0x4df8c…4dfac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dfac…4dfbb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dfbb…4dfdb (49, 0, 67) 20 20 20 20 53 55 4d 4d 41 33 20 46 49 58 45 44 28 31 31 29 20 49 4e 49 54 28 30 29 2c 20 20 20 ┆ SUMMA3 FIXED(11) INIT(0), ┆
0x4dfdb…4dffb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4dffb…4e00a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e00a…4e02a (49, 0, 68) 20 20 20 20 54 34 20 43 48 41 52 28 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T4 CHAR(4), ┆
0x4e02a…4e04a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e04a…4e059 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e059…4e079 (49, 0, 69) 20 20 20 20 54 36 31 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T61 CHAR(6), ┆
0x4e079…4e099 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e099…4e0a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e0a8…4e0c8 (49, 0, 70) 20 20 20 20 54 36 32 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T62 CHAR(6), ┆
0x4e0c8…4e0e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e0e8…4e0f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e0f7…4e117 (49, 0, 71) 20 20 20 20 54 31 31 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T11 CHAR(11), ┆
0x4e117…4e137 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e137…4e146 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e146…4e166 (49, 0, 72) 20 20 20 20 54 31 33 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T13 CHAR(13), ┆
0x4e166…4e186 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e186…4e195 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e195…4e1b5 (49, 0, 73) 20 20 20 20 54 31 34 20 43 48 41 52 28 31 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T14 CHAR(14), ┆
0x4e1b5…4e1d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e1d5…4e1e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e1e4…4e204 (49, 0, 74) 20 20 20 20 46 58 36 20 46 49 58 45 44 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FX6 FIXED(6), ┆
0x4e204…4e224 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e224…4e233 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e233…4e253 (49, 0, 75) 20 20 20 20 4b 4f 4e 54 4f 53 55 4d 28 30 3a 39 39 39 29 20 46 49 58 45 44 28 31 31 29 20 49 4e ┆ KONTOSUM(0:999) FIXED(11) IN┆
0x4e253…4e273 49 54 28 28 32 35 30 29 30 2c 28 32 35 30 29 30 2c 28 32 35 30 29 30 2c 28 32 35 30 29 30 29 2c ┆IT((250)0,(250)0,(250)0,(250)0),┆
0x4e273…4e282 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e282…4e2a2 (49, 0, 76) 20 20 20 20 4b 4f 4e 54 4f 41 4e 54 28 30 3a 39 39 39 29 20 42 49 4e 41 52 59 20 49 4e 49 54 28 ┆ KONTOANT(0:999) BINARY INIT(┆
0x4e2a2…4e2c2 28 32 35 30 29 30 2c 28 32 35 30 29 30 2c 28 32 35 30 29 30 2c 28 32 35 30 29 30 29 2c 20 20 20 ┆(250)0,(250)0,(250)0,(250)0), ┆
0x4e2c2…4e2d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e2d1…4e2f1 (49, 0, 77) 20 20 20 20 4f 46 46 53 45 54 20 42 49 4e 41 52 59 20 49 4e 49 54 28 36 29 2c 20 20 20 20 20 20 ┆ OFFSET BINARY INIT(6), ┆
0x4e2f1…4e311 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e311…4e320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e320…4e340 (49, 0, 78) 20 20 20 20 4f 46 46 31 20 42 49 4e 41 52 59 20 49 4e 49 54 28 37 29 2c 20 20 20 20 20 20 20 20 ┆ OFF1 BINARY INIT(7), ┆
0x4e340…4e360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e360…4e36f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e36f…4e38f (49, 0, 79) 20 20 20 20 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ P POINTER, ┆
0x4e38f…4e3af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e3af…4e3be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e3be…4e3de (49, 0, 80) 20 20 20 20 44 20 42 41 53 45 44 28 50 29 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 ┆ D BASED(P) CHAR(6), ┆
0x4e3de…4e3fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e3fe…4e40d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e40d…4e42d (49, 0, 81) 20 20 20 20 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM CHAR(6), ┆
0x4e42d…4e44d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e44d…4e45c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e45c…4e47c (50, 0, 0) 20 20 20 20 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PP POINTER, ┆
0x4e47c…4e49c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e49c…4e4ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e4ab…4e4cb (50, 0, 1) 20 20 20 20 31 20 53 54 52 20 42 41 53 45 44 28 50 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 STR BASED(PP), ┆
0x4e4cb…4e4eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e4eb…4e4fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e4fa…4e51a (50, 0, 2) 20 20 20 20 20 20 32 20 58 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 X CHAR(2), ┆
0x4e51a…4e53a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e53a…4e549 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e549…4e569 (50, 0, 3) 20 20 20 20 20 20 32 20 59 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 Y CHAR(2), ┆
0x4e569…4e589 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e589…4e598 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e598…4e5b8 (50, 0, 4) 20 20 20 20 20 20 32 20 46 49 52 4d 41 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIRMA CHAR(1), ┆
0x4e5b8…4e5d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e5d8…4e5e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e5e7…4e607 (50, 0, 5) 20 20 20 20 20 20 32 20 20 20 4f 50 5f 4b 4f 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 OP_KOD ┆
0x4e607…4e627 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆BINARY, ┆
0x4e627…4e636 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e636…4e656 (50, 0, 6) 20 20 20 20 20 20 32 20 20 20 52 41 44 41 4e 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 RADANT ┆
0x4e656…4e676 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆BINARY, ┆
0x4e676…4e685 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e685…4e6a5 (50, 0, 7) 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 27 20 20 56 31 32 ┆ VERSION CHAR(47) INIT(' V12┆
0x4e6a5…4e6c5 20 56 65 72 73 69 6f 6e 20 31 2e 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ Version 1.2 ┆
0x4e6c5…4e6d4 20 20 20 20 38 30 30 33 33 31 27 29 3b 20 20 ┆ 800331'); ┆
0x4e6d4…4e723 (50, 0, 8) 0x20[0x4f]
[…0x2…]
0x4e7c1…4e7e1 (50, 0, 11) 52 55 42 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RUB:PROC; ┆
0x4e7e1…4e801 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e801…4e810 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e810…4e830 (50, 0, 12) 20 20 20 20 20 20 20 20 49 5f 52 3d 4c 49 53 54 54 59 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I_R=LISTTYP; ┆
0x4e830…4e850 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e850…4e85f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4e85f…4e87f (50, 0, 13) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 2b 34 29 20 45 44 49 54 28 4e 41 4d 4e 28 ┆ PUT SKIP(R+4) EDIT(NAMN(┆
0x4e87f…4e89f 46 49 52 4d 41 2d 27 36 27 29 29 28 41 28 32 30 29 29 28 52 54 45 58 54 28 49 5f 52 29 29 28 41 ┆FIRMA-'6'))(A(20))(RTEXT(I_R))(A┆
0x4e89f…4e8ae 28 33 35 29 29 28 27 31 39 27 29 28 41 29 20 ┆(35))('19')(A) ┆
0x4e8ae…4e8ce (50, 0, 14) 20 20 20 20 20 20 20 20 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 31 2c 32 29 29 28 41 29 28 27 ┆ (SUBSTR(DATUM,1,2))(A)('┆
0x4e8ce…4e8ee 2d 27 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 33 2c 32 29 29 28 41 29 28 27 2d 27 ┆-')(A)(SUBSTR(DATUM,3,2))(A)('-'┆
0x4e8ee…4e8fd 29 28 41 29 20 20 20 20 20 20 20 20 20 20 20 ┆)(A) ┆
0x4e8fd…4e91d (50, 0, 15) 20 20 20 20 20 20 20 20 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 35 2c 32 29 29 28 41 28 35 29 ┆ (SUBSTR(DATUM,5,2))(A(5)┆
0x4e91d…4e93d 29 28 27 53 49 44 27 29 28 41 28 34 29 29 28 53 49 44 41 29 28 41 29 20 53 4b 49 50 20 45 44 49 ┆)('SID')(A(4))(SIDA)(A) SKIP EDI┆
0x4e93d…4e94c 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T ┆
0x4e94c…4e96c (50, 0, 16) 20 20 20 20 20 20 20 20 28 27 46 72 2e 6f 2e 6d 20 6b 6f 6e 74 6f 27 29 28 41 28 31 33 29 29 28 ┆ ('Fr.o.m konto')(A(13))(┆
0x4e96c…4e98c 52 4b 4f 4e 54 4f 31 29 28 41 29 28 27 2c 20 74 69 6c 6c 20 6b 6f 6e 74 6f 27 29 28 41 28 31 33 ┆RKONTO1)(A)(', till konto')(A(13┆
0x4e98c…4e99b 29 29 28 52 4b 4f 4e 54 4f 32 29 20 20 20 20 ┆))(RKONTO2) ┆
0x4e99b…4e9bb (50, 0, 17) 20 20 20 20 20 20 20 20 28 41 29 20 53 4b 49 50 20 45 44 49 54 28 27 20 27 29 28 41 28 31 33 29 ┆ (A) SKIP EDIT(' ')(A(13)┆
0x4e9bb…4e9db 29 28 53 5f 4d 41 52 4b 29 28 41 29 20 53 4b 49 50 20 45 44 49 54 28 27 46 72 2e 6f 2e 6d 20 64 ┆)(S_MARK)(A) SKIP EDIT('Fr.o.m d┆
0x4e9db…4e9ea 61 74 75 6d 27 29 28 41 28 31 33 29 29 20 20 ┆atum')(A(13)) ┆
0x4e9ea…4ea0a (50, 0, 18) 20 20 20 20 20 20 20 20 28 44 41 54 55 4d 31 29 28 41 28 37 29 29 28 27 74 69 6c 6c 20 64 61 74 ┆ (DATUM1)(A(7))('till dat┆
0x4ea0a…4ea2a 75 6d 27 29 28 41 28 31 31 29 29 28 44 41 54 55 4d 32 29 28 41 28 37 29 29 28 27 6d 2e 61 2e 70 ┆um')(A(11))(DATUM2)(A(7))('m.a.p┆
0x4ea2a…4ea39 27 29 28 41 28 36 29 29 20 20 20 20 20 20 20 ┆')(A(6)) ┆
0x4ea39…4ea59 (50, 0, 19) 20 20 20 20 20 20 20 20 28 52 54 45 58 54 28 53 50 54 59 50 2b 32 29 29 28 41 29 20 53 4b 49 50 ┆ (RTEXT(SPTYP+2))(A) SKIP┆
0x4ea59…4ea79 20 45 44 49 54 28 27 20 27 29 28 41 28 31 32 29 29 28 27 4b 4f 4e 54 4f 27 29 28 41 28 32 35 29 ┆ EDIT(' ')(A(12))('KONTO')(A(25)┆
0x4ea79…4ea88 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) ┆
0x4ea88…4eaa8 (50, 0, 20) 20 20 20 20 20 20 20 20 28 27 42 45 4c 4f 50 50 27 29 28 41 28 31 30 29 29 20 53 4b 49 50 3b 20 ┆ ('BELOPP')(A(10)) SKIP; ┆
0x4eaa8…4eac8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4eac8…4ead7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ead7…4eaf7 (50, 0, 21) 20 20 20 20 20 20 20 20 53 49 44 41 3d 53 49 44 41 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SIDA=SIDA+1; ┆
0x4eaf7…4eb17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4eb17…4eb26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4eb26…4eb46 (50, 0, 22) 20 20 20 20 20 20 20 20 52 20 3d 20 52 41 44 41 4e 54 20 2d 20 37 3b 20 20 20 20 20 20 20 20 20 ┆ R = RADANT - 7; ┆
0x4eb46…4eb66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4eb66…4eb75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4eb75…4eb95 (50, 0, 23) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x4eb95…4ebb5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ebb5…4ebc4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ebc4…4ebe4 (50, 0, 24) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x4ebe4…4ec04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ec04…4ec13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ec13…4ec62 (50, 0, 25) 0x20[0x4f]
0x4ec62…4ec82 (50, 0, 26) 53 54 41 52 54 50 4f 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STARTPOST:PROC; ┆
0x4ec82…4eca2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4eca2…4ecb1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ecb1…4ecd1 (50, 0, 27) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 56 45 52 42 45 4c 4f 50 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN VERBELOP; ┆
0x4ecd1…4ecf1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ecf1…4ed00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ed00…4ed20 (50, 0, 28) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 56 45 52 42 45 4c 4f 50 29 3b 20 20 20 20 ┆ CALL SEOF(VERBELOP); ┆
0x4ed20…4ed40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ed40…4ed4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ed4f…4ed6f (50, 0, 29) 20 20 20 20 20 20 20 20 4d 41 58 3d 55 4e 53 50 45 43 28 56 45 52 42 45 4c 4f 50 29 3b 20 20 20 ┆ MAX=UNSPEC(VERBELOP); ┆
0x4ed6f…4ed8f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ed8f…4ed9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ed9e…4edbe (50, 0, 30) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 42 45 4c 4f 50 29 3d 30 3b 20 20 20 20 20 ┆ UNSPEC(VERBELOP)=0; ┆
0x4edbe…4edde 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4edde…4eded 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4eded…4ee0d (50, 0, 31) 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 42 45 4c 4f 50 29 20 49 4e 54 4f ┆ READ FILE(VERBELOP) INTO┆
0x4ee0d…4ee2d 28 42 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(BSTR); ┆
0x4ee2d…4ee3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ee3c…4ee5c (50, 0, 32) 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 47 3d 4b 4f 4e 54 4f 4e 52 3b 20 20 20 20 20 20 20 ┆ KONTONRG=KONTONR; ┆
0x4ee5c…4ee7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ee7c…4ee8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ee8b…4eeab (50, 0, 33) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 42 45 4c 4f 50 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(VERBELOP)=UNSPEC(┆
0x4eeab…4eecb 56 45 52 42 45 4c 4f 50 29 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VERBELOP)-1; ┆
0x4eecb…4eeda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4eeda…4eefa (50, 0, 34) 20 20 20 20 20 20 20 20 42 4c 4f 43 4b 41 4e 54 3d 4d 41 58 2d 55 4e 53 50 45 43 28 56 45 52 42 ┆ BLOCKANT=MAX-UNSPEC(VERB┆
0x4eefa…4ef1a 45 4c 4f 50 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ELOP); ┆
0x4ef1a…4ef29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ef29…4ef49 (50, 0, 35) 20 20 20 20 20 20 20 20 4a 4a 3d 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JJ=5; ┆
0x4ef49…4ef69 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ef69…4ef78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ef78…4ef98 (50, 0, 36) 20 20 20 20 20 20 20 20 4a 4b 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JK=0; ┆
0x4ef98…4efb8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4efb8…4efc7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4efc7…4efe7 (50, 0, 37) 20 20 20 20 20 20 20 20 49 46 20 28 4c 49 53 54 54 59 50 3d 31 29 20 7c 20 28 53 50 54 59 50 3d ┆ IF (LISTTYP=1) ö (SPTYP=┆
0x4efe7…4f007 32 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2) THEN DO; ┆
0x4f007…4f016 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f016…4f036 (50, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 56 45 52 54 45 58 54 3b 20 20 20 20 20 20 20 20 ┆ OPEN VERTEXT; ┆
0x4f036…4f056 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f056…4f065 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f065…4f085 (50, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 54 45 58 54 29 20 49 4e ┆ READ FILE(VERTEXT) IN┆
0x4f085…4f0a5 54 4f 28 54 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO(TSTR); ┆
0x4f0a5…4f0b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f0b4…4f0d4 (50, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 53 54 41 4e 54 3d 56 45 52 4e 52 54 3b 20 20 20 20 20 ┆ KONSTANT=VERNRT; ┆
0x4f0d4…4f0f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f0f4…4f103 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f103…4f123 (50, 0, 41) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4f123…4f143 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f143…4f152 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f152…4f172 (50, 0, 42) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x4f172…4f192 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f192…4f1a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f1a1…4f1c1 (50, 0, 43) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x4f1c1…4f1e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f1e1…4f1f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f1f0…4f23f (50, 0, 44) 0x20[0x4f]
0x4f23f…4f25f (50, 0, 45) 50 4f 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆POST:PROC; ┆
0x4f25f…4f27f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f27f…4f28e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f28e…4f2ae (50, 0, 46) 50 31 3a 20 20 20 20 20 4a 4a 3d 4a 4a 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P1: JJ=JJ+1; ┆
0x4f2ae…4f2ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f2ce…4f2dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f2dd…4f2fd (50, 0, 47) 20 20 20 20 20 20 20 20 49 46 20 4a 4a 3e 35 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 ┆ IF JJ>5 THEN DO; ┆
0x4f2fd…4f31d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f31d…4f32c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f32c…4f34c (50, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 4b 3c 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF JK<1 THEN DO; ┆
0x4f34c…4f36c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f36c…4f37b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f37b…4f39b (50, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 42 4c 4f 43 4b 41 4e 54 3e 30 20 54 48 45 4e ┆ IF BLOCKANT>0 THEN┆
0x4f39b…4f3bb 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x4f3bb…4f3ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f3ca…4f3ea (50, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 4b 3d 32 35 35 3b 20 20 20 20 20 20 20 20 ┆ JK=255; ┆
0x4f3ea…4f40a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f40a…4f419 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f419…4f439 (50, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 4b 3e 42 4c 4f 43 4b 41 4e 54 20 ┆ IF JK>BLOCKANT ┆
0x4f439…4f459 54 48 45 4e 20 4a 4b 3d 42 4c 4f 43 4b 41 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN JK=BLOCKANT; ┆
0x4f459…4f468 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f468…4f488 (50, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 4c 4f 43 4b 41 4e 54 3d 42 4c 4f 43 4b 41 ┆ BLOCKANT=BLOCKA┆
0x4f488…4f4a8 4e 54 2d 4a 4b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NT-JK; ┆
0x4f4a8…4f4b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f4b7…4f4d7 (50, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 56 45 52 42 45 4c 4f ┆ CALL RD(VERBELO┆
0x4f4d7…4f4f7 50 2c 41 52 45 41 2c 4a 4b 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P,AREA,JK,RCODE); ┆
0x4f4f7…4f506 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f506…4f526 (50, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 ┆ IF RCODE =0 THE┆
0x4f526…4f546 4e 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 56 45 52 42 45 4c ┆N PUT SKIP LIST('LÄSFEL I VERBEL┆
0x4f546…4f555 4f 50 27 2c 52 43 4f 44 45 29 3b 20 20 20 20 ┆OP',RCODE); ┆
0x4f555…4f575 (50, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 4b 3d 41 44 44 52 28 41 52 45 41 29 3b 20 ┆ PK=ADDR(AREA); ┆
0x4f575…4f595 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f595…4f5a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f5a4…4f5c4 (50, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4f5c4…4f5e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f5e4…4f5f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f5f3…4f613 (50, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x4f613…4f633 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f633…4f642 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f642…4f662 (50, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 3d 27 39 39 39 39 39 39 ┆ KONTONR='999999┆
0x4f662…4f682 39 39 39 39 39 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆99999'; ┆
0x4f682…4f691 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f691…4f6b1 (50, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 44 41 54 55 4d 3d 44 41 54 31 42 49 4e 3b ┆ PDATUM=DAT1BIN;┆
0x4f6b1…4f6d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f6d1…4f6e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f6e0…4f700 (50, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 55 4d 54 3d 44 41 54 32 42 49 4e 3b ┆ DATUMT=DAT2BIN;┆
0x4f700…4f720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f720…4f72f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f72f…4f74f (50, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x4f74f…4f76f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f76f…4f77e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f77e…4f79e (50, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4f79e…4f7be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f7be…4f7cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f7cd…4f7ed (50, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4f7ed…4f80d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f80d…4f81c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f81c…4f83c (50, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x4f83c…4f85c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f85c…4f86b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f86b…4f88b (50, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 4b 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(PK)=UNSPEC(┆
0x4f88b…4f8ab 50 4b 29 2b 42 53 54 52 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PK)+BSTRL; ┆
0x4f8ab…4f8ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f8ba…4f8da (50, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4f8da…4f8fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f8fa…4f909 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f909…4f929 (50, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 4a 4b 3d 4a 4b 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JK=JK-1; ┆
0x4f929…4f949 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f949…4f958 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f958…4f978 (50, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 4a 4a 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JJ=1; ┆
0x4f978…4f998 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f998…4f9a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f9a7…4f9c7 (50, 0, 69) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4f9c7…4f9e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f9e7…4f9f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f9f6…4fa16 (50, 0, 70) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 42 29 3d 55 4e 53 50 45 43 28 50 4b 29 2b 4a 4a ┆ UNSPEC(PB)=UNSPEC(PK)+JJ┆
0x4fa16…4fa36 2a 31 30 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆*10+1; ┆
0x4fa36…4fa45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fa45…4fa65 (50, 0, 71) 20 20 20 20 20 20 20 20 49 46 20 50 44 41 54 55 4d 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 50 ┆ IF PDATUM=0 THEN GO TO P┆
0x4fa65…4fa85 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x4fa85…4fa94 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fa94…4fab4 (50, 0, 72) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x4fab4…4fad4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fad4…4fae3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fae3…4fb03 (50, 0, 73) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x4fb03…4fb23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fb23…4fb32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fb32…4fb81 (50, 0, 74) 0x20[0x4f]
0x4fb81…4fba1 (50, 0, 75) 44 41 54 54 45 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DATTEST:PROC; ┆
0x4fba1…4fbc1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fbc1…4fbd0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fbd0…4fbf0 (50, 0, 76) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=0; ┆
0x4fbf0…4fc10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fc10…4fc1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fc1f…4fc3f (50, 0, 77) 20 20 20 20 20 20 20 20 49 46 20 28 53 50 54 59 50 3d 32 29 20 26 20 28 50 44 41 54 55 4d 3c 30 ┆ IF (SPTYP=2) & (PDATUM<0┆
0x4fc3f…4fc5f 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) THEN DO; ┆
0x4fc5f…4fc6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fc6e…4fc8e (50, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 56 45 52 4e 52 54 20 54 48 45 4e ┆ IF VERNR =VERNRT THEN┆
0x4fc8e…4fcae 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x4fcae…4fcbd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fcbd…4fcdd (50, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 54 45 58 54 29 3d 56 45 ┆ UNSPEC(VERTEXT)=VE┆
0x4fcdd…4fcfd 52 4e 52 2d 4b 4f 4e 53 54 41 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RNR-KONSTANT; ┆
0x4fcfd…4fd0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fd0c…4fd2c (50, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 44 31 3b ┆ ON ERROR GO TO D1;┆
0x4fd2c…4fd4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fd4c…4fd5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fd5b…4fd7b (50, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 44 ┆ ON ENDFILE GO TO D┆
0x4fd7b…4fd9b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x4fd9b…4fdaa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fdaa…4fdca (51, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 54 45 58 54 29 ┆ READ FILE(VERTEXT)┆
0x4fdca…4fdea 20 49 4e 54 4f 28 54 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ INTO(TSTR); ┆
0x4fdea…4fdf9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fdf9…4fe19 (51, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4fe19…4fe39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fe39…4fe48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fe48…4fe68 (51, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 44 41 54 31 42 49 4e 3e 44 41 54 55 4d 54 29 20 7c ┆ IF (DAT1BIN>DATUMT) ö┆
0x4fe68…4fe88 20 28 44 41 54 32 42 49 4e 3c 3d 44 41 54 55 4d 54 29 20 54 48 45 4e 20 52 43 4f 44 45 3d 31 3b ┆ (DAT2BIN<=DATUMT) THEN RCODE=1;┆
0x4fe88…4fe97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fe97…4feb7 (51, 0, 3) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4feb7…4fed7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fed7…4fee6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4fee6…4ff06 (51, 0, 4) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x4ff06…4ff26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ff26…4ff35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ff35…4ff55 (51, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 50 44 41 54 55 4d 3c 30 20 54 48 45 4e 20 50 44 41 54 ┆ IF PDATUM<0 THEN PDAT┆
0x4ff55…4ff75 55 4d 3d 2d 50 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UM=-PDATUM; ┆
0x4ff75…4ff84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ff84…4ffa4 (51, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 44 41 54 31 42 49 4e 3e 50 44 41 54 55 4d 29 20 7c ┆ IF (DAT1BIN>PDATUM) ö┆
0x4ffa4…4ffc4 20 28 44 41 54 32 42 49 4e 3c 3d 50 44 41 54 55 4d 29 20 54 48 45 4e 20 52 43 4f 44 45 3d 31 3b ┆ (DAT2BIN<=PDATUM) THEN RCODE=1;┆
0x4ffc4…4ffd3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ffd3…4fff3 (51, 0, 7) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4fff3…50013 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50013…50022 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50022…50042 (51, 0, 8) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x50042…50062 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50062…50071 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50071…500c0 (51, 0, 9) 0x20[0x4f]
0x500c0…500e0 (51, 0, 10) 44 31 3a 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 ┆D1: PUT SKIP LIST('LÄSFEL I ┆
0x500e0…50100 56 45 52 54 45 58 54 27 2c 4f 4e 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VERTEXT',ONCODE); ┆
0x50100…5010f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5010f…5012f (51, 0, 11) 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x5012f…5014f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5014f…5015e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5015e…5017e (51, 0, 12) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=1; ┆
0x5017e…5019e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5019e…501ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x501ad…501cd (51, 0, 13) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x501cd…501ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x501ed…501fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x501fc…5021c (51, 0, 14) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x5021c…5023c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5023c…5024b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5024b…5029a (51, 0, 15) 0x20[0x4f]
0x5029a…502ba (51, 0, 16) 53 4b 52 49 56 5f 53 55 4d 4d 41 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV_SUMMA:PROC; ┆
0x502ba…502da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x502da…502e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x502e9…50338 (51, 0, 17) 0x20[0x4f]
0x50338…50358 (51, 0, 18) 44 43 4c 20 41 4e 54 41 4c 5f 4b 4f 4e 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 ┆DCL ANTAL_KONT BINA┆
0x50358…50378 52 59 20 20 20 20 20 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RY INIT(0), ┆
0x50378…50387 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50387…503a7 (51, 0, 19) 20 20 20 20 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 41 52 ┆ C CHAR┆
0x503a7…503c7 28 31 30 29 20 20 20 20 49 4e 49 54 28 27 2d 2d 2d 2d 2d 2d 2d 2d 2d 39 27 29 3b 20 20 20 20 20 ┆(10) INIT('---------9'); ┆
0x503c7…503d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x503d6…50425 (51, 0, 20) 0x20[0x4f]
0x50425…50445 (51, 0, 21) 20 20 20 20 20 20 20 20 54 31 33 3d 27 2d 2d 2d 2d 2d 2e 2d 2d 2d 2e 2d 2d 2d 27 3b 20 20 20 20 ┆ T13='-----.---.---'; ┆
0x50445…50465 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50465…50474 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50474…50494 (51, 0, 22) 20 20 20 20 20 20 20 20 44 4f 20 49 49 49 3d 30 20 54 4f 20 39 30 30 20 42 59 20 31 30 30 3b 20 ┆ DO III=0 TO 900 BY 100; ┆
0x50494…504b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x504b4…504c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x504c3…504e3 (51, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 30 20 54 4f 20 39 30 20 42 59 20 31 30 3b 20 20 ┆ DO J=0 TO 90 BY 10; ┆
0x504e3…50503 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50503…50512 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50512…50532 (51, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 4b 3d 30 20 54 4f 20 39 3b 20 20 20 20 20 20 ┆ DO K=0 TO 9; ┆
0x50532…50552 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50552…50561 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50561…50581 (51, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 3d 49 49 49 2b 4a 2b 4b 3b 20 20 20 20 20 ┆ L=III+J+K; ┆
0x50581…505a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x505a1…505b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x505b0…505d0 (51, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 41 4e 54 28 4c 29 3e ┆ IF KONTOANT(L)>┆
0x505d0…505f0 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆0 THEN DO; ┆
0x505f0…505ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x505ff…5061f (51, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 3c 38 20 54 48 45 4e 20 ┆ IF R<8 THEN ┆
0x5061f…5063f 43 41 4c 4c 20 52 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL RUB; ┆
0x5063f…5064e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5064e…5066e (51, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 4b 46 4c 41 47 47 3d 31 ┆ IF SKFLAGG=1┆
0x5066e…5068e 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ THEN DO; ┆
0x5068e…5069d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5069d…506bd (51, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 4b 46 4c 41 47 47 3d 30 ┆ SKFLAGG=0┆
0x506bd…506dd 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x506dd…506ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x506ec…5070c (51, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 3b ┆ PUT SKIP;┆
0x5070c…5072c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5072c…5073b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5073b…5075b (51, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 ┆ R=R-1; ┆
0x5075b…5077b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5077b…5078a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5078a…507aa (51, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 ┆ END; ┆
0x507aa…507ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x507ca…507d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x507d9…507f9 (51, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 34 3d 4c 2b 31 30 30 30 3b 20 20 ┆ T4=L+1000; ┆
0x507f9…50819 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50819…50828 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50828…50848 (51, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 4f ┆ SUBSTR(T13,O┆
0x50848…50868 46 46 31 2c 33 29 3d 53 55 42 53 54 52 28 54 34 2c 32 2c 33 29 3b 20 20 20 20 20 20 20 20 20 20 ┆FF1,3)=SUBSTR(T4,2,3); ┆
0x50868…50877 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50877…50897 (51, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 ┆ CALL BELRED(┆
0x50897…508b7 4b 4f 4e 54 4f 53 55 4d 28 4c 29 2c 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTOSUM(L),T14); ┆
0x508b7…508c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x508c6…508e6 (51, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 ┆ PUT SKIP EDI┆
0x508e6…50906 54 28 54 31 33 29 28 58 28 31 32 29 2c 41 28 32 30 29 29 28 54 31 34 29 28 41 29 28 4b 4f 4e 54 ┆T(T13)(X(12),A(20))(T14)(A)(KONT┆
0x50906…50915 4f 41 4e 54 28 4c 29 29 28 50 43 29 3b 3b 20 ┆OANT(L))(PC);; ┆
0x50915…50935 (51, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 ┆ R=R-1; ┆
0x50935…50955 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50955…50964 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50964…50984 (51, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 4d 4d 41 33 3d 53 55 4d 4d 41 ┆ SUMMA3=SUMMA┆
0x50984…509a4 33 2b 4b 4f 4e 54 4f 53 55 4d 28 4c 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆3+KONTOSUM(L); ┆
0x509a4…509b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x509b3…509d3 (51, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 4c 41 47 47 31 3d 31 3b 20 20 20 ┆ FLAGG1=1; ┆
0x509d3…509f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x509f3…50a02 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50a02…50a22 (51, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 4c 41 47 47 32 3d 31 3b 20 20 20 ┆ FLAGG2=1; ┆
0x50a22…50a42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50a42…50a51 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50a51…50a71 (51, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 4c 41 47 47 33 3d 31 3b 20 20 20 ┆ FLAGG3=1; ┆
0x50a71…50a91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50a91…50aa0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50aa0…50ac0 (51, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 41 ┆ ANTAL_KONT=A┆
0x50ac0…50ae0 4e 54 41 4c 5f 4b 4f 4e 54 2b 4b 4f 4e 54 4f 41 4e 54 28 4c 29 3b 20 20 20 20 20 20 20 20 20 20 ┆NTAL_KONT+KONTOANT(L); ┆
0x50ae0…50aef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50aef…50b0f (51, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x50b0f…50b2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50b2f…50b3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50b3e…50b5e (51, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x50b5e…50b7e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50b7e…50b8d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50b8d…50bad (51, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 46 4c 41 47 47 33 3d 31 29 20 26 20 28 53 ┆ IF (FLAGG3=1) & (S┆
0x50bad…50bcd 54 41 42 28 4f 46 46 53 45 54 2b 32 29 3d 31 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆TAB(OFFSET+2)=1) THEN DO; ┆
0x50bcd…50bdc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50bdc…50bfc (51, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 4f 46 46 31 ┆ SUBSTR(T13,OFF1┆
0x50bfc…50c1c 2b 32 2c 31 29 3d 27 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+2,1)=' '; ┆
0x50c1c…50c2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50c2b…50c4b (51, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 53 55 4d ┆ CALL BELRED(SUM┆
0x50c4b…50c6b 4d 41 33 2c 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MA3,T14); ┆
0x50c6b…50c7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50c7a…50c9a (51, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 27 ┆ PUT SKIP EDIT('┆
0x50c9a…50cba 20 20 20 20 20 20 20 20 20 20 2a 27 29 28 41 28 31 32 29 29 28 54 31 33 29 28 41 28 32 30 29 29 ┆ *')(A(12))(T13)(A(20))┆
0x50cba…50cc9 28 54 31 34 29 28 41 29 3b 20 20 20 20 20 20 ┆(T14)(A); ┆
0x50cc9…50ce9 (51, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3e 30 ┆ IF ANTAL_KONT>0┆
0x50ce9…50d09 20 54 48 45 4e 20 50 55 54 20 45 44 49 54 28 41 4e 54 41 4c 5f 4b 4f 4e 54 29 28 50 43 29 3b 20 ┆ THEN PUT EDIT(ANTAL_KONT)(PC); ┆
0x50d09…50d18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50d18…50d38 (51, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 30 3b 20 20 ┆ ANTAL_KONT=0; ┆
0x50d38…50d58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50d58…50d67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50d67…50d87 (51, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x50d87…50da7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50da7…50db6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50db6…50dd6 (51, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 4b 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 ┆ SKFLAGG=1; ┆
0x50dd6…50df6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50df6…50e05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50e05…50e25 (51, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x50e25…50e45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50e45…50e54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50e54…50e74 (51, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 4d 4d 41 32 3d 53 55 4d 4d 41 32 2b 53 55 4d 4d ┆ SUMMA2=SUMMA2+SUMM┆
0x50e74…50e94 41 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A3; ┆
0x50e94…50ea3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50ea3…50ec3 (51, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 4d 4d 41 33 3d 30 3b 20 20 20 20 20 20 20 20 20 ┆ SUMMA3=0; ┆
0x50ec3…50ee3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50ee3…50ef2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50ef2…50f12 (51, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 4c 41 47 47 33 3d 30 3b 20 20 20 20 20 20 20 20 20 ┆ FLAGG3=0; ┆
0x50f12…50f32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50f32…50f41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50f41…50f61 (51, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x50f61…50f81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50f81…50f90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50f90…50fb0 (51, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 46 4c 41 47 47 32 3d 31 29 20 26 20 53 54 41 42 28 ┆ IF (FLAGG2=1) & STAB(┆
0x50fb0…50fd0 4f 46 46 53 45 54 2b 31 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OFFSET+1) THEN DO; ┆
0x50fd0…50fdf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x50fdf…50fff (51, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 4f 46 46 31 2b 31 2c ┆ SUBSTR(T13,OFF1+1,┆
0x50fff…5101f 32 29 3d 27 20 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2)=' '; ┆
0x5101f…5102e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5102e…5104e (51, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 53 55 4d 4d 41 32 ┆ CALL BELRED(SUMMA2┆
0x5104e…5106e 2c 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,T14); ┆
0x5106e…5107d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5107d…5109d (51, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 27 20 20 20 ┆ PUT SKIP EDIT(' ┆
0x5109d…510bd 20 20 20 20 20 20 2a 2a 27 29 28 41 28 31 32 29 29 28 54 31 33 29 28 41 28 32 30 29 29 28 54 31 ┆ **')(A(12))(T13)(A(20))(T1┆
0x510bd…510cc 34 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆4)(A); ┆
0x510cc…510ec (51, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3e 30 20 54 48 ┆ IF ANTAL_KONT>0 TH┆
0x510ec…5110c 45 4e 20 50 55 54 20 45 44 49 54 28 41 4e 54 41 4c 5f 4b 4f 4e 54 29 28 50 43 29 3b 20 20 20 20 ┆EN PUT EDIT(ANTAL_KONT)(PC); ┆
0x5110c…5111b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5111b…5113b (51, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 30 3b 20 20 20 20 20 ┆ ANTAL_KONT=0; ┆
0x5113b…5115b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5115b…5116a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5116a…5118a (51, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x5118a…511aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x511aa…511b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x511b9…511d9 (51, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 4b 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 ┆ SKFLAGG=1; ┆
0x511d9…511f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x511f9…51208 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51208…51228 (51, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x51228…51248 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51248…51257 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51257…51277 (51, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 53 55 4d 4d 41 31 3d 53 55 4d 4d 41 31 2b 53 55 4d 4d 41 32 3b ┆ SUMMA1=SUMMA1+SUMMA2;┆
0x51277…51297 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51297…512a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x512a6…512c6 (51, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 53 55 4d 4d 41 32 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SUMMA2=0; ┆
0x512c6…512e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x512e6…512f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x512f5…51315 (51, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 46 4c 41 47 47 32 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FLAGG2=0; ┆
0x51315…51335 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51335…51344 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51344…51364 (51, 0, 70) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x51364…51384 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51384…51393 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51393…513b3 (51, 0, 71) 20 20 20 20 20 20 20 20 49 46 20 28 46 4c 41 47 47 31 3d 31 29 20 26 20 28 53 54 41 42 28 4f 46 ┆ IF (FLAGG1=1) & (STAB(OF┆
0x513b3…513d3 46 53 45 54 29 3d 31 29 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FSET)=1)THEN DO; ┆
0x513d3…513e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x513e2…51402 (51, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 4f 46 46 31 2c 33 29 3d 27 20 ┆ SUBSTR(T13,OFF1,3)=' ┆
0x51402…51422 20 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ '; ┆
0x51422…51431 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51431…51451 (51, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 53 55 4d 4d 41 31 2c 54 31 ┆ CALL BELRED(SUMMA1,T1┆
0x51451…51471 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆4); ┆
0x51471…51480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51480…514a0 (51, 0, 74) 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 27 20 20 20 20 20 20 20 ┆ PUT SKIP EDIT(' ┆
0x514a0…514c0 20 2a 2a 2a 27 29 28 41 28 31 32 29 29 28 54 31 33 29 28 41 28 32 30 29 29 28 54 31 34 29 28 41 ┆ ***')(A(12))(T13)(A(20))(T14)(A┆
0x514c0…514cf 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x514cf…514ef (51, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3e 30 20 54 48 45 4e 20 ┆ IF ANTAL_KONT>0 THEN ┆
0x514ef…5150f 50 55 54 20 45 44 49 54 28 41 4e 54 41 4c 5f 4b 4f 4e 54 29 28 50 43 29 3b 20 20 20 20 20 20 20 ┆PUT EDIT(ANTAL_KONT)(PC); ┆
0x5150f…5151e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5151e…5153e (51, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP; ┆
0x5153e…5155e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5155e…5156d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5156d…5158d (51, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-2; ┆
0x5158d…515ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x515ad…515bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x515bc…515dc (51, 0, 78) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x515dc…515fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x515fc…5160b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5160b…5162b (51, 0, 79) 20 20 20 20 20 20 20 20 49 46 20 52 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 50 28 52 29 ┆ IF R =0 THEN PUT SKIP(R)┆
0x5162b…5164b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x5164b…5165a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5165a…5167a (51, 0, 80) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5167a…5169a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5169a…516a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x516a9…516c9 (51, 0, 81) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x516c9…516e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x516e9…516f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x516f8…51747 (52, 0, 0) 0x20[0x4f]
[…0x4…]
0x51883…518a3 (52, 0, 5) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x518a3…518c3 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x518c3…518d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x518d2…51921 (52, 0, 6) 0x20[0x4f]
[…0x1…]
0x51970…51990 (52, 0, 8) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x51990…519b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x519b0…519bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x519bf…519df (52, 0, 9) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x519df…519ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x519ff…51a0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51a0e…51a2e (52, 0, 10) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 43 ┆ IF DATUM='0 ' THEN C┆
0x51a2e…51a4e 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ALL PLOAD('Q '); ┆
0x51a4e…51a5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51a5d…51a7d (52, 0, 11) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x51a7d…51a9d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51a9d…51aac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51aac…51acc (52, 0, 12) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x51acc…51aec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51aec…51afb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51afb…51b1b (52, 0, 13) 20 20 20 20 20 20 20 20 4a 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=0; ┆
0x51b1b…51b3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51b3b…51b4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51b4a…51b6a (52, 0, 14) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x51b6a…51b8a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51b8a…51b99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51b99…51bb9 (52, 0, 15) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 56 45 52 53 49 4f 4e ┆ PUT FILE(D) EDIT(VERSION┆
0x51bb9…51bd9 29 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)(A(47)); ┆
0x51bd9…51be8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51be8…51c08 (52, 0, 16) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x51c08…51c28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51c28…51c37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51c37…51c57 (52, 0, 17) 20 20 20 20 20 20 20 20 50 4b 3d 41 44 44 52 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ PK=ADDR(AREA); ┆
0x51c57…51c77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51c77…51c86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51c86…51ca6 (52, 0, 18) 20 20 20 20 20 20 20 20 49 46 20 59 3d 27 37 20 27 20 54 48 45 4e 20 4f 46 46 53 45 54 3d 39 3b ┆ IF Y='7 ' THEN OFFSET=9;┆
0x51ca6…51cc6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51cc6…51cd5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51cd5…51cf5 (52, 0, 19) 20 20 20 20 20 20 20 20 49 46 20 59 3d 27 37 20 27 20 54 48 45 4e 20 4f 46 46 31 3d 31 31 3b 20 ┆ IF Y='7 ' THEN OFF1=11; ┆
0x51cf5…51d15 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51d15…51d24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51d24…51d44 (52, 0, 20) 20 20 20 20 20 20 20 20 49 53 54 41 52 54 3d 53 55 42 53 54 52 28 4b 4f 4e 54 4f 31 2c 4f 46 46 ┆ ISTART=SUBSTR(KONTO1,OFF┆
0x51d44…51d64 53 45 54 2c 33 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SET,3); ┆
0x51d64…51d73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51d73…51d93 (52, 0, 21) 20 20 20 20 20 20 20 20 49 53 54 4f 50 50 3d 53 55 42 53 54 52 28 4b 4f 4e 54 4f 32 2c 4f 46 46 ┆ ISTOPP=SUBSTR(KONTO2,OFF┆
0x51d93…51db3 53 45 54 2c 33 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SET,3); ┆
0x51db3…51dc2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51dc2…51de2 (52, 0, 22) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 52 54 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 ┆ CALL STARTPOST; ┆
0x51de2…51e02 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51e02…51e11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51e11…51e60 (52, 0, 23) 0x20[0x4f]
0x51e60…51e80 (52, 0, 24) 4c 31 3a 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L1: CALL POST; ┆
0x51e80…51ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51ea0…51eaf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51eaf…51ecf (52, 0, 25) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 54 45 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL DATTEST; ┆
0x51ecf…51eef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51eef…51efe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51efe…51f1e (52, 0, 26) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c ┆ IF RCODE =0 THEN GO TO L┆
0x51f1e…51f3e 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x51f3e…51f4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51f4d…51f6d (52, 0, 27) 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3d 27 39 39 39 39 39 39 39 39 39 39 39 27 ┆ IF KONTONR='99999999999'┆
0x51f6d…51f8d 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ THEN GO TO L2; ┆
0x51f8d…51f9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51f9c…51fbc (52, 0, 28) 20 20 20 20 20 20 20 20 49 3d 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 2c 4f 46 46 53 45 54 2c ┆ I=SUBSTR(KONTONR,OFFSET,┆
0x51fbc…51fdc 33 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆3); ┆
0x51fdc…51feb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x51feb…5200b (52, 0, 29) 20 20 20 20 20 20 20 20 49 46 20 49 3e 3d 49 53 54 41 52 54 20 26 20 49 3c 49 53 54 4f 50 50 20 ┆ IF I>=ISTART & I<ISTOPP ┆
0x5200b…5202b 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN DO; ┆
0x5202b…5203a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5203a…5205a (52, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 53 55 4d 28 49 29 3d 4b 4f 4e 54 4f 53 55 4d 28 ┆ KONTOSUM(I)=KONTOSUM(┆
0x5205a…5207a 49 29 2b 42 45 4c 4f 50 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆I)+BELOPP; ┆
0x5207a…52089 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x52089…520a9 (52, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 41 4e 54 28 49 29 3d 4b 4f 4e 54 4f 41 4e 54 28 ┆ KONTOANT(I)=KONTOANT(┆
0x520a9…520c9 49 29 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆I)+1; ┆
0x520c9…520d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x520d8…520f8 (52, 0, 32) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x520f8…52118 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x52118…52127 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x52127…52147 (52, 0, 33) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x52147…52167 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x52167…52176 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x52176…521c5 (52, 0, 34) 0x20[0x4f]
[…0x1…]
0x52214…52234 (52, 0, 36) 4c 32 3a 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 5f 53 55 4d 4d 41 3b 20 20 20 20 20 20 20 ┆L2: CALL SKRIV_SUMMA; ┆
0x52234…52254 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x52254…52263 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x52263…522b2 (52, 0, 37) 0x20[0x4f]
0x522b2…522d2 (52, 0, 38) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x522d2…522f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x522f2…52301 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x52301…52321 (52, 0, 39) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x52321…52341 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x52341…52350 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x52350…5239f (52, 0, 40) 0x20[0x4f]
0x5239f…523bf (52, 0, 41) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x523bf…523df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x523df…523ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x523ee…5240e (52, 0, 42) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x5242e…5243d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x5243d…5245d (52, 0, 43) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x5247d…5248c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x5248c…524ac (52, 0, 44) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x524cc…524db 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x524db…524fb (52, 0, 45) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x5251b…5252a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x5252a…5254a (52, 0, 46) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x5256a…52579 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52579…52599 (52, 0, 47) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x525b9…525c8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x525c8…525e8 (52, 0, 48) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52608…52617 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52617…52637 (52, 0, 49) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52657…52666 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52666…52686 (52, 0, 50) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x526a6…526b5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x526b5…526d5 (52, 0, 51) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x526f5…52704 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52704…52724 (52, 0, 52) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52744…52753 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52753…52773 (52, 0, 53) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52793…527a2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x527a2…527c2 (52, 0, 54) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x527e2…527f1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x527f1…52811 (52, 0, 55) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52831…52840 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52840…52860 (52, 0, 56) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52880…5288f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x5288f…528af (52, 0, 57) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x528cf…528de 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x528de…528fe (52, 0, 58) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x5291e…5292d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x5292d…5294d (52, 0, 59) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x5296d…5297c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x5297c…5299c (52, 0, 60) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x529bc…529cb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x529cb…529eb (52, 0, 61) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52a0b…52a1a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52a1a…52a3a (52, 0, 62) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52a5a…52a69 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52a69…52a89 (52, 0, 63) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52aa9…52ab8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52ab8…52ad8 (52, 0, 64) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52af8…52b07 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52b07…52b27 (52, 0, 65) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52b47…52b56 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52b56…52b76 (52, 0, 66) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52b96…52ba5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52ba5…52bc5 (52, 0, 67) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52be5…52bf4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52bf4…52c14 (52, 0, 68) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52c34…52c43 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52c43…52c63 (52, 0, 69) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52c83…52c92 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52c92…52cb2 (52, 0, 70) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52cd2…52ce1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52ce1…52d01 (52, 0, 71) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52d21…52d30 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52d30…52d50 (52, 0, 72) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52d70…52d7f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52d7f…52d9f (52, 0, 73) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52dbf…52dce 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52dce…52dee (52, 0, 74) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52e0e…52e1d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52e1d…52e3d (52, 0, 75) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52e5d…52e6c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52e6c…52e8c (52, 0, 76) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52eac…52ebb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52ebb…52edb (52, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52efb…52f0a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52f0a…52f2a (52, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52f4a…52f59 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52f59…52f79 (52, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52f99…52fa8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52fa8…52fc8 (52, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x52fe8…52ff7 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x52ff7…53017 (52, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x53037…53046 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x53046…53066 (53, 0, 0) 2f 2a 20 56 31 33 20 4b 4f 50 49 45 52 41 52 20 45 54 54 20 41 4e 54 41 4c 20 46 49 4c 45 52 20 ┆/* V13 KOPIERAR ETT ANTAL FILER ┆
0x53066…53086 46 52 5d 4e 20 44 52 49 56 45 20 32 20 54 49 4c 4c 20 44 52 49 56 20 34 20 20 20 20 20 20 20 20 ┆FRÅN DRIVE 2 TILL DRIV 4 ┆
0x53086…53095 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53095…530e4 (53, 0, 1) 0x20[0x4f]
[…0x1…]
0x53133…53153 (53, 0, 3) 20 20 20 50 52 47 20 4a 5d 20 37 38 31 30 30 34 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PRG JÅ 781004 */ ┆
0x53153…53173 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53173…53182 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53182…531d1 (53, 0, 4) 0x20[0x4f]
0x531d1…531f1 (53, 0, 5) 44 43 4c 20 31 20 46 53 54 52 31 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 FSTR1, ┆
0x531f1…53211 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53211…53220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53220…53240 (53, 0, 6) 20 20 20 20 20 20 32 20 49 4e 46 49 4c 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 INFIL FILE; ┆
0x53240…53260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53260…5326f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5326f…532be (53, 0, 7) 0x20[0x4f]
0x532be…532de (53, 0, 8) 44 43 4c 20 31 20 46 53 54 52 32 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 FSTR2, ┆
0x532de…532fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x532fe…5330d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5330d…5332d (53, 0, 9) 20 20 20 20 20 20 32 20 55 54 46 49 4c 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 UTFIL FILE; ┆
0x5332d…5334d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5334d…5335c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5335c…533ab (53, 0, 10) 0x20[0x4f]
0x533ab…533cb (53, 0, 11) 44 43 4c 20 31 20 4b 41 54 41 4c 4f 47 5f 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 KATALOG_STR, ┆
0x533cb…533eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x533eb…533fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x533fa…5341a (53, 0, 12) 20 20 20 20 20 20 32 20 4b 41 54 41 4c 4f 47 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 KATALOG FILE; ┆
0x5341a…5343a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5343a…53449 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53449…53498 (53, 0, 13) 0x20[0x4f]
0x53498…534b8 (53, 0, 14) 44 43 4c 20 31 20 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 STR, ┆
0x534b8…534d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x534d8…534e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x534e7…53507 (53, 0, 15) 20 20 20 20 20 20 32 20 58 4e 20 43 48 41 52 28 32 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 XN CHAR(24); ┆
0x53507…53527 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53527…53536 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53536…53585 (53, 0, 16) 0x20[0x4f]
0x53585…535a5 (53, 0, 17) 44 43 4c 20 31 20 49 4e 44 45 58 5f 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 INDEX_STR, ┆
0x535a5…535c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x535c5…535d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x535d4…535f4 (53, 0, 18) 20 20 20 20 20 20 32 20 54 41 4c 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 2c 20 20 20 ┆ 2 TAL BINARY, ┆
0x535f4…53614 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53614…53623 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53623…53643 (53, 0, 19) 20 20 20 20 20 20 32 20 49 4e 44 45 58 5f 58 4e 20 20 20 20 20 20 43 48 41 52 28 38 29 2c 20 20 ┆ 2 INDEX_XN CHAR(8), ┆
0x53643…53663 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53663…53672 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53672…53692 (53, 0, 20) 20 20 20 20 20 20 32 20 52 45 43 5f 41 4e 54 20 20 20 20 20 20 20 42 49 4e 41 52 59 2c 20 20 20 ┆ 2 REC_ANT BINARY, ┆
0x53692…536b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x536b2…536c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x536c1…536e1 (53, 0, 21) 20 20 20 20 20 20 32 20 4c 45 4e 47 44 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 2c 20 20 20 ┆ 2 LENGD BINARY, ┆
0x536e1…53701 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53701…53710 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53710…53730 (53, 0, 22) 20 20 20 20 20 20 32 20 44 49 56 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 2c 20 20 20 ┆ 2 DIV BINARY, ┆
0x53730…53750 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53750…5375f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5375f…5377f (53, 0, 23) 20 20 20 20 20 20 32 20 46 5f 54 52 41 43 4b 20 20 20 20 20 20 20 42 49 4e 41 52 59 2c 20 20 20 ┆ 2 F_TRACK BINARY, ┆
0x5377f…5379f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5379f…537ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x537ae…537ce (53, 0, 24) 20 20 20 20 20 20 32 20 4c 5f 54 52 41 43 4b 20 20 20 20 20 20 20 42 49 4e 41 52 59 2c 20 20 20 ┆ 2 L_TRACK BINARY, ┆
0x537ce…537ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x537ee…537fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x537fd…5381d (53, 0, 25) 20 20 20 20 20 20 32 20 55 4e 55 53 45 44 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 2c 20 20 20 ┆ 2 UNUSED BINARY, ┆
0x5381d…5383d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5383d…5384c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5384c…5386c (53, 0, 26) 20 20 20 20 20 20 32 20 52 45 43 23 5f 42 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 3b 20 20 20 ┆ 2 REC#_B BINARY; ┆
0x5386c…5388c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5388c…5389b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5389b…538ea (53, 0, 27) 0x20[0x4f]
0x538ea…5390a (53, 0, 28) 44 43 4c 20 31 20 4b 5f 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 K_STR, ┆
0x5390a…5392a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5392a…53939 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53939…53959 (53, 0, 29) 20 20 20 20 20 20 32 20 4c 5f 56 45 52 4e 52 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 ┆ 2 L_VERNR FIXED(5), ┆
0x53959…53979 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53979…53988 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53988…539a8 (53, 0, 30) 20 20 20 20 20 20 32 20 48 5f 56 45 52 4e 52 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 ┆ 2 H_VERNR FIXED(5), ┆
0x539a8…539c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x539c8…539d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x539d7…539f7 (53, 0, 31) 20 20 20 20 20 20 32 20 44 41 54 55 4d 20 43 48 41 52 28 36 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ 2 DATUM CHAR(6); ┆
0x539f7…53a17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53a17…53a26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53a26…53a46 (53, 0, 32) 20 20 20 20 20 20 2f 2a 20 31 34 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 14 BYTES */ ┆
0x53a46…53a66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53a66…53a75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53a75…53ac4 (53, 0, 33) 0x20[0x4f]
0x53ac4…53ae4 (53, 0, 34) 44 43 4c 20 31 20 54 52 41 4e 53 5f 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 TRANS_STR, ┆
0x53ae4…53b04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53b04…53b13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53b13…53b33 (53, 0, 35) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 4e 52 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 ┆ 2 KONTONR FIXED(11), ┆
0x53b33…53b53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53b53…53b62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53b62…53b82 (53, 0, 36) 20 20 20 20 20 20 32 20 56 45 52 4e 52 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 VERNR FIXED(5), ┆
0x53b82…53ba2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53ba2…53bb1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53bb1…53bd1 (53, 0, 37) 20 20 20 20 20 20 32 20 52 45 53 54 20 43 48 41 52 28 32 35 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ 2 REST CHAR(25); ┆
0x53bd1…53bf1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53bf1…53c00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53c00…53c4f (53, 0, 38) 0x20[0x4f]
[…0x1…]
0x53c9e…53cbe (53, 0, 40) 44 43 4c 20 31 20 41 52 45 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 AREA, ┆
0x53cbe…53cde 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53cde…53ced 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53ced…53d0d (53, 0, 41) 20 20 20 20 20 20 32 20 43 48 28 32 35 35 29 20 43 48 41 52 28 31 30 30 29 3b 20 20 20 20 20 20 ┆ 2 CH(255) CHAR(100); ┆
0x53d0d…53d2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53d2d…53d3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53d3c…53d8b (53, 0, 42) 0x20[0x4f]
0x53d8b…53dab (53, 0, 43) 44 43 4c 20 53 56 41 52 20 20 20 20 20 20 20 43 48 41 52 28 32 35 29 2c 20 20 20 20 20 20 20 20 ┆DCL SVAR CHAR(25), ┆
0x53dab…53dcb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53dcb…53dda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53dda…53dfa (53, 0, 44) 20 20 20 20 54 31 20 20 20 20 20 20 20 20 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 ┆ T1 CHAR(1), ┆
0x53dfa…53e1a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53e1a…53e29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53e29…53e49 (53, 0, 45) 20 20 20 20 54 38 20 20 20 20 20 20 20 20 20 43 48 41 52 28 38 29 2c 20 20 20 20 20 20 20 20 20 ┆ T8 CHAR(8), ┆
0x53e49…53e69 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53e69…53e78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53e78…53e98 (53, 0, 46) 20 20 20 20 4d 41 58 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 ┆ MAX BINARY, ┆
0x53e98…53eb8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53eb8…53ec7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53ec7…53ee7 (53, 0, 47) 20 20 20 20 53 50 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 ┆ SP BINARY, ┆
0x53ee7…53f07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53f07…53f16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x53f16…53f36 (53, 0, 48) 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 27 20 20 56 31 33 ┆ VERSION CHAR(47) INIT(' V13┆
0x53f36…53f56 20 56 65 72 73 69 6f 6e 20 31 2e 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ Version 1.2 ┆
0x53f56…53f65 20 20 20 20 37 39 30 33 32 33 27 29 2c 20 20 ┆ 790323'), ┆
0x53f65…53f85 (53, 0, 49) 20 20 20 20 54 45 58 54 20 43 48 41 52 28 35 32 29 20 49 4e 49 54 28 27 44 49 53 4b 20 41 20 34 ┆ TEXT CHAR(52) INIT('DISK A 4┆
0x53f85…53fa5 20 37 20 58 58 58 58 58 58 5f 59 20 33 34 20 43 4f 50 59 20 54 52 41 4e 53 46 49 4c 20 58 58 58 ┆ 7 XXXXXX_Y 34 COPY TRANSFIL XXX┆
0x53fa5…53fb4 58 58 58 5f 59 20 32 20 34 20 56 37 27 29 3b ┆XXX_Y 2 4 V7');┆
0x53fb4…54003 (53, 0, 50) 0x20[0x4f]
[…0x2…]
0x540a1…540c1 (53, 0, 53) 4d 4f 56 45 42 55 46 46 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MOVEBUFF:PROC; ┆
0x540c1…540e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x540e1…540f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x540f0…54110 (53, 0, 54) 20 20 20 20 20 20 20 20 46 53 54 52 31 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR1=STR; ┆
0x54110…54130 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54130…5413f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5413f…5415f (53, 0, 55) 20 20 20 20 20 20 20 20 46 53 54 52 32 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR2=STR; ┆
0x5415f…5417f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5417f…5418e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5418e…541ae (53, 0, 56) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 32 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(2); ┆
0x541ae…541ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x541ce…541dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x541dd…541fd (53, 0, 57) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 49 4e 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN INFIL; ┆
0x541fd…5421d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5421d…5422c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5422c…5424c (53, 0, 58) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 34 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(4); ┆
0x5424c…5426c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5426c…5427b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5427b…5429b (53, 0, 59) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 55 54 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN UTFIL; ┆
0x5429b…542bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x542bb…542ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x542ca…542ea (53, 0, 60) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 49 4e 46 49 4c 29 3b 20 20 20 20 20 20 20 ┆ CALL SEOF(INFIL); ┆
0x542ea…5430a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5430a…54319 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54319…54339 (53, 0, 61) 20 20 20 20 20 20 20 20 49 3d 55 4e 53 50 45 43 28 49 4e 46 49 4c 29 3b 20 20 20 20 20 20 20 20 ┆ I=UNSPEC(INFIL); ┆
0x54339…54359 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54359…54368 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54368…54388 (53, 0, 62) 20 20 20 20 20 20 20 20 49 46 20 49 3d 30 20 54 48 45 4e 20 52 45 54 55 52 4e 3b 20 20 20 20 20 ┆ IF I=0 THEN RETURN; ┆
0x54388…543a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x543a8…543b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x543b7…543d7 (53, 0, 63) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 49 4e 46 49 4c 29 3d 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(INFIL)=0; ┆
0x543d7…543f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x543f7…54406 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54406…54426 (53, 0, 64) 20 20 20 20 20 20 20 20 4a 3d 32 35 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=255; ┆
0x54426…54446 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54446…54455 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54455…54475 (53, 0, 65) 42 31 3a 20 20 20 20 20 49 46 20 4a 3e 49 20 54 48 45 4e 20 4a 3d 49 3b 20 20 20 20 20 20 20 20 ┆B1: IF J>I THEN J=I; ┆
0x54475…54495 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54495…544a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x544a4…544c4 (53, 0, 66) 20 20 20 20 20 20 20 20 49 3d 49 2d 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=I-J; ┆
0x544c4…544e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x544e4…544f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x544f3…54513 (53, 0, 67) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 49 4e 46 49 4c 2c 41 52 45 41 2c 4a 2c 4b 29 3b ┆ CALL RD(INFIL,AREA,J,K);┆
0x54513…54533 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54533…54542 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54542…54562 (53, 0, 68) 20 20 20 20 20 20 20 20 49 46 20 4b 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 50 20 4c 49 ┆ IF K =0 THEN PUT SKIP LI┆
0x54562…54582 53 54 28 27 4c 5b 53 46 45 4c 20 49 27 2c 58 4e 2c 4b 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ST('LÄSFEL I',XN,K); ┆
0x54582…54591 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54591…545b1 (53, 0, 69) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 57 52 28 55 54 46 49 4c 2c 41 52 45 41 2c 4a 2c 4b 29 3b ┆ CALL WR(UTFIL,AREA,J,K);┆
0x545b1…545d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x545d1…545e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x545e0…54600 (53, 0, 70) 20 20 20 20 20 20 20 20 49 46 20 4b 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 50 20 4c 49 ┆ IF K =0 THEN PUT SKIP LI┆
0x54600…54620 53 54 28 27 53 4b 52 49 56 46 45 4c 20 49 27 2c 58 4e 2c 4b 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ST('SKRIVFEL I',XN,K); ┆
0x54620…5462f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5462f…5464f (53, 0, 71) 20 20 20 20 20 20 20 20 49 46 20 49 3e 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 42 31 3b 20 20 20 ┆ IF I>0 THEN GO TO B1; ┆
0x5464f…5466f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5466f…5467e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5467e…5469e (53, 0, 72) 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 55 54 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CLOSE UTFIL; ┆
0x5469e…546be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x546be…546cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x546cd…546ed (53, 0, 73) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x546ed…5470d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5470d…5471c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5471c…5473c (53, 0, 74) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x5473c…5475c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5475c…5476b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5476b…547ba (53, 0, 75) 0x20[0x4f]
[…0x1…]
0x54809…54829 (53, 0, 77) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x54829…54849 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x54849…54858 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54858…548a7 (53, 0, 78) 0x20[0x4f]
0x548a7…548c7 (53, 0, 79) 53 54 41 52 54 3a 20 20 43 41 4c 4c 20 4c 4f 41 44 28 27 0d 27 2c 31 29 3b 20 20 20 20 20 20 20 ┆START: CALL LOAD(' ',1); ┆
0x548c7…548e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x548e7…548f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x548f6…54916 (53, 0, 80) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 53 56 41 52 29 3b 20 20 20 20 ┆ GET SKIP LIST(SVAR); ┆
0x54916…54936 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54936…54945 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54945…54965 (53, 0, 81) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x54965…54985 52 53 49 4f 4e 29 28 41 28 39 34 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RSION)(A(94)); ┆
0x54985…54994 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54994…549b4 (54, 0, 0) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x549b4…549d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x549d4…549e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x549e3…54a32 (54, 0, 1) 0x20[0x4f]
0x54a32…54a52 (54, 0, 2) 20 20 20 20 20 20 20 20 58 4e 3d 27 20 20 4b 4f 4e 54 4f 50 20 20 27 3b 20 20 20 20 20 20 20 20 ┆ XN=' KONTOP '; ┆
0x54a52…54a72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54a72…54a81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54a81…54aa1 (54, 0, 3) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 58 4e 29 28 41 28 34 ┆ PUT FILE(D) EDIT(XN)(A(4┆
0x54aa1…54ac1 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆7)); ┆
0x54ac1…54ad0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54ad0…54af0 (54, 0, 4) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF; ┆
0x54af0…54b10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54b10…54b1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54b1f…54b3f (54, 0, 5) 20 20 20 20 20 20 20 20 58 4e 3d 27 20 20 55 4b 4f 4e 54 4f 50 20 27 3b 20 20 20 20 20 20 20 20 ┆ XN=' UKONTOP '; ┆
0x54b3f…54b5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54b5f…54b6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54b6e…54b8e (54, 0, 6) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x54b8e…54bae 52 53 49 4f 4e 29 28 41 28 39 34 29 29 28 58 4e 29 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 ┆RSION)(A(94))(XN)(A(47)); ┆
0x54bae…54bbd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54bbd…54bdd (54, 0, 7) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF; ┆
0x54bdd…54bfd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54bfd…54c0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54c0c…54c2c (54, 0, 8) 20 20 20 20 20 20 20 20 58 4e 3d 27 20 20 4b 53 4b 4f 4e 54 4f 50 27 3b 20 20 20 20 20 20 20 20 ┆ XN=' KSKONTOP'; ┆
0x54c2c…54c4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54c4c…54c5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54c5b…54c7b (54, 0, 9) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x54c7b…54c9b 52 53 49 4f 4e 29 28 41 28 39 34 29 29 28 58 4e 29 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 ┆RSION)(A(94))(XN)(A(47)); ┆
0x54c9b…54caa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54caa…54cca (54, 0, 10) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF; ┆
0x54cca…54cea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54cea…54cf9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54cf9…54d19 (54, 0, 11) 20 20 20 20 20 20 20 20 58 4e 3d 27 20 20 54 52 41 4e 53 46 49 4c 27 3b 20 20 20 20 20 20 20 20 ┆ XN=' TRANSFIL'; ┆
0x54d19…54d39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54d39…54d48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54d48…54d68 (54, 0, 12) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x54d68…54d88 52 53 49 4f 4e 29 28 41 28 39 34 29 29 28 58 4e 29 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 ┆RSION)(A(94))(XN)(A(47)); ┆
0x54d88…54d97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54d97…54db7 (54, 0, 13) 20 20 20 20 20 20 20 20 46 53 54 52 31 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR1=STR; ┆
0x54db7…54dd7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54dd7…54de6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54de6…54e06 (54, 0, 14) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 49 4e 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN INFIL; ┆
0x54e06…54e26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54e26…54e35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54e35…54e55 (54, 0, 15) 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 49 4e 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CLOSE INFIL; ┆
0x54e55…54e75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54e75…54e84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54e84…54ea4 (54, 0, 16) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 30 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(0); ┆
0x54ea4…54ec4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54ec4…54ed3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54ed3…54ef3 (54, 0, 17) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 49 4e 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN INFIL; ┆
0x54ef3…54f13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54f13…54f22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54f22…54f42 (54, 0, 18) 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 ┆ ON ERROR GO TO L1; ┆
0x54f42…54f62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54f62…54f71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54f71…54f91 (54, 0, 19) 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 49 4e 46 49 4c 29 20 49 4e 54 4f 28 54 52 ┆ READ FILE(INFIL) INTO(TR┆
0x54f91…54fb1 41 4e 53 5f 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ANS_STR); ┆
0x54fb1…54fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x54fc0…54fe0 (54, 0, 20) 20 20 20 20 20 20 20 20 4c 5f 56 45 52 4e 52 3d 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 ┆ L_VERNR=VERNR; ┆
0x54fe0…55000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55000…5500f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5500f…5502f (54, 0, 21) 4c 31 3a 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 49 4e 46 49 4c 29 3b 20 20 20 20 20 20 20 ┆L1: CALL SEOF(INFIL); ┆
0x5502f…5504f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5504f…5505e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5505e…5507e (54, 0, 22) 20 20 20 20 20 20 20 20 4d 41 58 3d 55 4e 53 50 45 43 28 49 4e 46 49 4c 29 3b 20 20 20 20 20 20 ┆ MAX=UNSPEC(INFIL); ┆
0x5507e…5509e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5509e…550ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x550ad…550cd (54, 0, 23) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 49 4e 46 49 4c 29 3d 4d 41 58 2d 31 3b 20 20 20 20 ┆ UNSPEC(INFIL)=MAX-1; ┆
0x550cd…550ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x550ed…550fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x550fc…5511c (54, 0, 24) 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c 32 3b 20 20 20 20 20 20 ┆ ON ERROR GO TO L2; ┆
0x5511c…5513c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5513c…5514b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5514b…5516b (54, 0, 25) 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 49 4e 46 49 4c 29 20 49 4e 54 4f 28 54 52 ┆ READ FILE(INFIL) INTO(TR┆
0x5516b…5518b 41 4e 53 5f 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ANS_STR); ┆
0x5518b…5519a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5519a…551ba (54, 0, 26) 20 20 20 20 20 20 20 20 48 5f 56 45 52 4e 52 3d 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 ┆ H_VERNR=VERNR; ┆
0x551ba…551da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x551da…551e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x551e9…55209 (54, 0, 27) 4c 32 3a 20 20 20 20 20 53 50 3d 28 4d 41 58 2b 31 34 37 29 2f 31 34 38 3b 20 20 20 20 20 20 20 ┆L2: SP=(MAX+147)/148; ┆
0x55209…55229 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55229…55238 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55238…55258 (54, 0, 28) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 34 29 3b 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(4); ┆
0x55258…55278 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55278…55287 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55287…552a7 (54, 0, 29) 49 31 3a 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆I1: PUT FILE(D) SKIP EDIT(VE┆
0x552a7…552c7 52 53 49 4f 4e 29 28 41 28 39 34 29 29 28 27 20 20 4b 41 54 41 4c 4f 47 27 29 28 41 28 34 37 29 ┆RSION)(A(94))(' KATALOG')(A(47)┆
0x552c7…552d6 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x552d6…552f6 (54, 0, 30) 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 4c 33 3b 20 20 20 20 20 20 ┆ ON ERROR GO TO L3; ┆
0x552f6…55316 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55316…55325 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55325…55345 (54, 0, 31) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 41 54 41 4c 4f 47 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN KATALOG; ┆
0x55345…55365 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55365…55374 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55374…55394 (54, 0, 32) 20 20 20 20 20 20 20 20 49 4e 44 45 58 5f 53 54 52 3d 4b 41 54 41 4c 4f 47 5f 53 54 52 3b 20 20 ┆ INDEX_STR=KATALOG_STR; ┆
0x55394…553b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x553b4…553c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x553c3…553e3 (54, 0, 33) 20 20 20 20 20 20 20 20 49 46 20 46 5f 54 52 41 43 4b 3d 32 20 54 48 45 4e 20 47 4f 20 54 4f 20 ┆ IF F_TRACK=2 THEN GO TO ┆
0x553e3…55403 4c 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L4; ┆
0x55403…55412 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55412…55432 (54, 0, 34) 4c 33 3a 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆L3: PUT FILE(D) SKIP EDIT(VE┆
0x55432…55452 52 53 49 4f 4e 29 28 41 28 39 36 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RSION)(A(96)) ┆
0x55452…55461 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55461…55481 (54, 0, 35) 20 20 20 20 20 20 20 20 28 27 46 45 4c 20 44 49 53 4b 45 54 20 49 20 44 52 49 56 45 23 20 34 27 ┆ ('FEL DISKET I DRIVE# 4'┆
0x55481…554a1 29 28 41 28 34 37 29 29 28 27 53 5b 54 54 20 49 4e 20 41 52 4b 49 56 44 49 53 4b 45 54 27 29 28 ┆)(A(47))('SÄTT IN ARKIVDISKET')(┆
0x554a1…554b0 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 ┆A(47)); ┆
0x554b0…554d0 (54, 0, 36) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x554d0…554f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x554f0…554ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x554ff…5551f (54, 0, 37) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(''); ┆
0x5551f…5553f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5553f…5554e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5554e…5556e (54, 0, 38) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 49 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO I1; ┆
0x5556e…5558e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5558e…5559d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5559d…555bd (54, 0, 39) 4c 34 3a 20 20 20 20 20 58 4e 3d 27 20 20 49 4e 44 45 58 20 20 20 27 3b 20 20 20 20 20 20 20 20 ┆L4: XN=' INDEX '; ┆
0x555bd…555dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x555dd…555ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x555ec…5560c (54, 0, 40) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x5560c…5562c 52 53 49 4f 4e 29 28 41 28 39 34 29 29 28 58 4e 29 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 ┆RSION)(A(94))(XN)(A(47)); ┆
0x5562c…5563b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5563b…5565b (54, 0, 41) 20 20 20 20 20 20 20 20 46 53 54 52 31 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR1=STR; ┆
0x5565b…5567b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5567b…5568a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5568a…556aa (54, 0, 42) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 49 4e 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN INFIL; ┆
0x556aa…556ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x556ca…556d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x556d9…556f9 (54, 0, 43) 20 20 20 20 20 20 20 20 49 4e 44 45 58 5f 53 54 52 3d 46 53 54 52 31 3b 20 20 20 20 20 20 20 20 ┆ INDEX_STR=FSTR1; ┆
0x556f9…55719 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55719…55728 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55728…55748 (54, 0, 44) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 49 4e 46 49 4c 29 3d 52 45 43 5f 41 4e 54 2d 31 3b ┆ UNSPEC(INFIL)=REC_ANT-1;┆
0x55748…55768 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55768…55777 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55777…55797 (54, 0, 45) 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 49 4e 46 49 4c 29 20 49 4e 54 4f 28 49 4e ┆ READ FILE(INFIL) INTO(IN┆
0x55797…557b7 44 45 58 5f 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DEX_STR); ┆
0x557b7…557c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x557c6…557e6 (54, 0, 46) 20 20 20 20 20 20 20 20 49 46 20 37 36 20 3c 20 4c 5f 54 52 41 43 4b 2b 53 50 20 54 48 45 4e 20 ┆ IF 76 < L_TRACK+SP THEN ┆
0x557e6…55806 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DO; ┆
0x55806…55815 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55815…55835 (54, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 ┆ PUT FILE(D) SKIP EDIT┆
0x55835…55855 28 56 45 52 53 49 4f 4e 29 28 41 28 39 36 29 29 28 27 41 52 4b 49 56 44 49 53 4b 45 54 54 45 4e ┆(VERSION)(A(96))('ARKIVDISKETTEN┆
0x55855…55864 20 5b 52 20 46 55 4c 4c 27 29 20 20 20 20 20 ┆ ÄR FULL') ┆
0x55864…55884 (54, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 28 41 28 34 37 29 29 28 27 42 59 54 20 44 49 53 4b 45 54 54 27 ┆ (A(47))('BYT DISKETT'┆
0x55884…558a4 29 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)(A(47)); ┆
0x558a4…558b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x558b3…558d3 (54, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x558d3…558f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x558f3…55902 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55902…55922 (54, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 ┆ GET SKIP LIST(''); ┆
0x55922…55942 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55942…55951 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55951…55971 (54, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 49 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO I1; ┆
0x55971…55991 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55991…559a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x559a0…559c0 (54, 0, 52) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x559c0…559e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x559e0…559ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x559ef…55a0f (54, 0, 53) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 4b 41 54 41 4c 4f 47 29 3b 20 20 20 20 20 ┆ CALL SEOF(KATALOG); ┆
0x55a0f…55a2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55a2f…55a3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55a3e…55a5e (54, 0, 54) 20 20 20 20 20 20 20 20 57 52 49 54 45 20 46 49 4c 45 28 4b 41 54 41 4c 4f 47 29 20 46 52 4f 4d ┆ WRITE FILE(KATALOG) FROM┆
0x55a5e…55a7e 28 4b 5f 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(K_STR); ┆
0x55a7e…55a8d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55a8d…55aad (54, 0, 55) 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 4b 41 54 41 4c 4f 47 3b 20 20 20 20 20 20 20 20 20 20 ┆ CLOSE KATALOG; ┆
0x55aad…55acd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55acd…55adc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55adc…55b2b (54, 0, 56) 0x20[0x4f]
0x55b2b…55b4b (54, 0, 57) 20 20 20 20 20 20 20 20 54 31 3d 27 31 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T1='1'; ┆
0x55b4b…55b6b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55b6b…55b7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55b7a…55b9a (54, 0, 58) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 49 4e 46 49 4c 29 3d 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(INFIL)=0; ┆
0x55b9a…55bba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55bba…55bc9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55bc9…55be9 (54, 0, 59) 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 49 32 3b 20 20 20 20 20 20 ┆ ON ERROR GO TO I2; ┆
0x55be9…55c09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55c09…55c18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55c18…55c38 (54, 0, 60) 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 44 41 54 55 4d 29 20 46 49 4c 45 28 49 4e 46 ┆ READ KEY(DATUM) FILE(INF┆
0x55c38…55c58 49 4c 29 20 49 4e 54 4f 28 49 4e 44 45 58 5f 53 54 52 29 20 4b 45 59 54 4f 28 49 4e 44 45 58 5f ┆IL) INTO(INDEX_STR) KEYTO(INDEX_┆
0x55c58…55c67 58 4e 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆XN); ┆
0x55c67…55c87 (54, 0, 61) 4c 35 3a 20 20 20 20 20 54 31 3d 53 55 42 53 54 52 28 49 4e 44 45 58 5f 58 4e 2c 38 2c 31 29 2b ┆L5: T1=SUBSTR(INDEX_XN,8,1)+┆
0x55c87…55ca7 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x55ca7…55cb6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55cb6…55cd6 (54, 0, 62) 20 20 20 20 20 20 20 20 54 38 3d 44 41 54 55 4d 20 43 41 54 20 27 5f 27 20 43 41 54 20 54 31 3b ┆ T8=DATUM CAT '_' CAT T1;┆
0x55cd6…55cf6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55cf6…55d05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55d05…55d25 (54, 0, 63) 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 49 33 3b 20 20 20 20 20 20 ┆ ON ERROR GO TO I3; ┆
0x55d25…55d45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55d45…55d54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55d54…55d74 (54, 0, 64) 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 54 38 29 20 46 49 4c 45 28 49 4e 46 49 4c 29 ┆ READ KEY(T8) FILE(INFIL)┆
0x55d74…55d94 20 49 4e 54 4f 28 49 4e 44 45 58 5f 53 54 52 29 20 4b 45 59 54 4f 28 49 4e 44 45 58 5f 58 4e 29 ┆ INTO(INDEX_STR) KEYTO(INDEX_XN)┆
0x55d94…55da3 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x55da3…55dc3 (54, 0, 65) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L5; ┆
0x55dc3…55de3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55de3…55df2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55df2…55e41 (54, 0, 66) 0x20[0x4f]
0x55e41…55e61 (54, 0, 67) 49 32 3a 20 20 20 20 20 54 38 3d 44 41 54 55 4d 20 43 41 54 20 27 5f 27 20 43 41 54 20 54 31 3b ┆I2: T8=DATUM CAT '_' CAT T1;┆
0x55e61…55e81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55e81…55e90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55e90…55eb0 (54, 0, 68) 49 33 3a 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 30 29 3b 20 20 20 20 20 20 20 20 20 ┆I3: CALL CHOOSE(0); ┆
0x55eb0…55ed0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55ed0…55edf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55edf…55eff (54, 0, 69) 20 20 20 20 20 20 20 20 54 31 3d 53 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T1=SP; ┆
0x55eff…55f1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55f1f…55f2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55f2e…55f4e (54, 0, 70) 20 20 20 20 20 20 20 20 49 46 20 53 50 3e 30 20 54 48 45 4e 20 53 55 42 53 54 52 28 54 45 58 54 ┆ IF SP>0 THEN SUBSTR(TEXT┆
0x55f4e…55f6e 2c 31 30 2c 31 29 3d 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,10,1)=T1; ┆
0x55f6e…55f7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55f7d…55f9d (54, 0, 71) 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 45 58 54 2c 31 32 2c 38 29 3d 54 38 3b 20 20 20 ┆ SUBSTR(TEXT,12,8)=T8; ┆
0x55f9d…55fbd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55fbd…55fcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x55fcc…55fec (54, 0, 72) 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 45 58 54 2c 33 38 2c 38 29 3d 54 38 3b 20 20 20 ┆ SUBSTR(TEXT,38,8)=T8; ┆
0x55fec…5600c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5600c…5601b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5601b…5606a (54, 0, 73) 0x20[0x4f]
[…0x1…]
0x560b9…560d9 (54, 0, 75) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4c 4f 41 44 28 54 45 58 54 2c 35 32 29 3b 20 20 20 20 20 ┆ CALL LOAD(TEXT,52); ┆
0x560d9…560f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x560f9…56108 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56108…56128 (54, 0, 76) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x56128…56148 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56148…56157 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56157…56177 (54, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x56197…561a6 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x561a6…561c6 (54, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x561e6…561f5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x561f5…56215 (54, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x56235…56244 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x56244…56264 (54, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x56284…56293 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x56293…562b3 (54, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x562d3…562e2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x562e2…56302 (55, 0, 0) 44 43 4c 20 20 20 20 20 56 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL VER ┆
0x56302…56322 20 46 49 58 45 44 20 28 38 29 20 49 4e 49 54 20 28 31 32 38 32 31 31 31 39 29 3b 20 20 20 20 20 ┆ FIXED (8) INIT (12821119); ┆
0x56322…56331 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56331…56351 (55, 0, 1) 2f 2a 20 20 20 20 20 20 50 52 4f 47 52 41 4d 20 46 5c 52 20 49 4e 52 41 50 50 4f 53 54 45 52 49 ┆/* PROGRAM FÖR INRAPPOSTERI┆
0x56351…56371 4e 47 20 41 56 20 56 45 52 49 46 49 4b 41 54 49 4f 4e 45 52 2e 20 56 45 52 53 49 4f 4e 20 31 2e ┆NG AV VERIFIKATIONER. VERSION 1.┆
0x56371…56380 32 20 48 41 4e 54 45 52 41 52 20 20 20 20 20 ┆2 HANTERAR ┆
0x56380…563a0 (55, 0, 2) 20 20 20 20 20 20 20 20 54 49 4c 4c 5b 47 47 2c 20 5b 4e 44 52 49 4e 47 20 4f 43 48 20 42 4f 52 ┆ TILLÄGG, ÄNDRING OCH BOR┆
0x563a0…563c0 54 54 41 47 20 50 5d 20 52 5b 54 54 20 53 5b 54 54 2c 20 45 54 54 20 46 45 4c 20 53 4f 4d 20 46 ┆TTAG PÅ RÄTT SÄTT, ETT FEL SOM F┆
0x563c0…563cf 55 4e 4e 49 54 53 20 53 45 44 41 4e 20 20 20 ┆UNNITS SEDAN ┆
0x563cf…563ef (55, 0, 3) 20 20 20 20 20 20 20 20 42 45 47 59 4e 4e 45 4c 53 45 4e 2e 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BEGYNNELSEN. ┆
0x563ef…5640f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5640f…5641e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5641e…5646d (55, 0, 4) 0x20[0x4f]
[…0x1…]
0x564bc…564dc (55, 0, 6) 20 20 20 20 20 20 20 20 4f 42 67 20 38 32 31 31 31 39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OBg 821119 ┆
0x564dc…564fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x564fc…5650b 20 20 20 20 20 20 20 20 20 20 20 2a 2f 20 20 ┆ */ ┆
0x5650b…5655a (55, 0, 7) 0x20[0x4f]
[…0x1…]
0x565a9…565c9 (55, 0, 9) 44 43 4c 20 31 20 48 4a 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 HJSTR, ┆
0x565c9…565e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x565e9…565f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x565f8…56618 (55, 0, 10) 20 20 20 20 20 20 32 20 56 45 52 4e 52 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 VERNR BINARY, ┆
0x56618…56638 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56638…56647 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56647…56667 (55, 0, 11) 20 20 20 20 20 20 32 20 4c 55 46 54 20 43 48 41 52 28 35 38 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ 2 LUFT CHAR(58); ┆
0x56667…56687 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56687…56696 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56696…566b6 (55, 0, 12) 20 20 20 20 20 20 2f 2a 20 36 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 60 BYTES */ ┆
0x566b6…566d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x566d6…566e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x566e5…56734 (55, 0, 13) 0x20[0x4f]
0x56734…56754 (55, 0, 14) 44 43 4c 20 31 20 41 52 45 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 41 ┆DCL 1 AREA, /* A┆
0x56754…56774 52 42 45 54 53 41 52 45 41 20 46 5c 52 20 4b 4f 4e 54 4f 4e 20 2a 2f 20 20 20 20 20 20 20 20 20 ┆RBETSAREA FÖR KONTON */ ┆
0x56774…56783 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56783…567a3 (55, 0, 15) 20 20 20 20 20 20 32 20 50 4f 53 54 33 28 31 31 30 29 20 43 48 41 52 28 33 34 29 3b 20 20 20 20 ┆ 2 POST3(110) CHAR(34); ┆
0x567a3…567c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x567c3…567d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x567d2…567f2 (55, 0, 16) 20 20 20 20 20 20 2f 2a 20 33 37 34 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 ┆ /* 3740 BYTES */ ┆
0x567f2…56812 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56812…56821 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56821…56870 (55, 0, 17) 0x20[0x4f]
0x56870…56890 (55, 0, 18) 44 43 4c 20 50 46 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL PF POINTER, ┆
0x56890…568b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x568b0…568bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x568bf…568df (55, 0, 19) 20 20 20 20 31 20 46 53 54 52 20 42 41 53 45 44 28 50 46 29 2c 20 20 20 20 20 20 20 2f 2a 20 4b ┆ 1 FSTR BASED(PF), /* K┆
0x568df…568ff 4f 4e 54 4f 50 4f 53 54 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ONTOPOST */ ┆
0x568ff…5690e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5690e…5692e (55, 0, 20) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 46 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 2f 2a 20 4b ┆ 2 KONTOF FIXED(11), /* K┆
0x5692e…5694e 4f 4e 54 4f 4e 55 4d 4d 45 52 20 31 31 20 53 49 46 52 49 47 54 20 2a 2f 20 20 20 20 20 20 20 20 ┆ONTONUMMER 11 SIFRIGT */ ┆
0x5694e…5695d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5695d…5697d (55, 0, 21) 20 20 20 20 20 20 32 20 56 45 52 4e 52 46 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 2f 2a 20 56 ┆ 2 VERNRF FIXED(5), /* V┆
0x5697d…5699d 45 52 4e 55 4d 4d 45 52 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ERNUMMER */ ┆
0x5699d…569ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x569ac…569cc (55, 0, 22) 20 20 20 20 20 20 32 20 44 41 54 55 4d 46 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 2f 2a 20 42 ┆ 2 DATUMF FIXED(5), /* B┆
0x569cc…569ec 4f 4b 46 5c 52 49 4e 47 53 44 41 54 55 4d 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OKFÖRINGSDATUM */ ┆
0x569ec…569fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x569fb…56a1b (55, 0, 23) 20 20 20 20 20 20 32 20 50 44 41 54 55 4d 46 20 46 49 58 45 44 28 35 29 2c 20 20 20 2f 2a 20 50 ┆ 2 PDATUMF FIXED(5), /* P┆
0x56a1b…56a3b 45 52 44 41 54 55 4d 20 42 41 53 5d 52 20 37 38 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ERDATUM BASÅR 78 */ ┆
0x56a3b…56a4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56a4a…56a6a (55, 0, 24) 20 20 20 20 20 20 32 20 42 45 4c 4f 50 50 46 20 46 49 58 45 44 28 31 31 29 2c 20 20 2f 2a 20 42 ┆ 2 BELOPPF FIXED(11), /* B┆
0x56a6a…56a8a 45 4c 4f 50 50 20 49 20 5c 52 45 4e 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ELOPP I ÖREN */ ┆
0x56a8a…56a99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56a99…56ab9 (55, 0, 25) 20 20 20 20 20 20 32 20 54 45 58 54 46 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 2f 2a 20 54 ┆ 2 TEXTF CHAR(13), /* T┆
0x56ab9…56ad9 45 58 54 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EXT */ ┆
0x56ad9…56ae8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56ae8…56b08 (55, 0, 26) 20 20 20 20 52 45 43 4c 4e 20 42 49 4e 41 52 59 20 49 4e 49 54 28 33 34 29 3b 20 20 2f 2a 20 46 ┆ RECLN BINARY INIT(34); /* F┆
0x56b08…56b28 53 54 52 27 73 20 52 45 4b 4f 44 4c 5b 4e 47 44 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STR's REKODLÄNGD */ ┆
0x56b28…56b37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56b37…56b57 (55, 0, 27) 20 20 20 20 20 20 2f 2a 20 33 34 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 34 BYTES */ ┆
0x56b57…56b77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56b77…56b86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56b86…56bd5 (55, 0, 28) 0x20[0x4f]
0x56bd5…56bf5 (55, 0, 29) 44 43 4c 20 50 44 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL PD POINTER, ┆
0x56bf5…56c15 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56c15…56c24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56c24…56c44 (55, 0, 30) 20 20 20 20 31 20 44 41 52 45 41 20 42 41 53 45 44 28 50 44 29 2c 20 20 20 20 20 20 2f 2a 20 50 ┆ 1 DAREA BASED(PD), /* P┆
0x56c44…56c64 41 4b 4e 49 4e 47 53 53 54 52 55 4b 54 55 52 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AKNINGSSTRUKTUR */ ┆
0x56c64…56c73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56c73…56c93 (55, 0, 31) 20 20 20 20 20 20 32 20 50 4f 53 54 31 20 43 48 41 52 28 33 34 29 2c 20 20 20 20 20 20 20 20 20 ┆ 2 POST1 CHAR(34), ┆
0x56c93…56cb3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56cb3…56cc2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56cc2…56ce2 (55, 0, 32) 20 20 20 20 20 20 32 20 50 4f 53 54 32 20 43 48 41 52 28 33 34 29 3b 20 20 20 20 20 20 20 20 20 ┆ 2 POST2 CHAR(34); ┆
0x56ce2…56d02 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56d02…56d11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56d11…56d31 (55, 0, 33) 20 20 20 20 20 20 2f 2a 20 36 38 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* 68 BYTES */ ┆
0x56d31…56d51 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56d51…56d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56d60…56daf (55, 0, 34) 0x20[0x4f]
0x56daf…56dcf (55, 0, 35) 44 43 4c 20 31 20 44 55 4d 4d 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 49 ┆DCL 1 DUMMY, /* I┆
0x56dcf…56def 4e 53 45 52 54 20 26 20 44 45 4c 49 54 20 41 52 45 41 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 ┆NSERT & DELIT AREA */ ┆
0x56def…56dfe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56dfe…56e1e (55, 0, 36) 20 20 20 20 20 20 32 20 50 4f 53 54 34 28 31 30 30 29 20 43 48 41 52 28 33 34 29 3b 20 20 20 20 ┆ 2 POST4(100) CHAR(34); ┆
0x56e1e…56e3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56e3e…56e4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56e4d…56e6d (55, 0, 37) 20 20 20 20 20 20 2f 2a 20 33 34 30 30 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 20 20 ┆ /* 3400 BYTES */ ┆
0x56e6d…56e8d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56e8d…56e9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56e9c…56eeb (55, 0, 38) 0x20[0x4f]
0x56eeb…56f0b (55, 0, 39) 44 43 4c 20 4b 46 49 4c 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 48 ┆DCL KFIL FILE, /* H┆
0x56f0b…56f2b 4a 5b 4c 50 46 49 4c 20 49 4e 45 48 5d 4c 4c 45 52 20 56 45 52 4e 52 20 2a 2f 20 20 20 20 20 20 ┆JÄLPFIL INEHÅLLER VERNR */ ┆
0x56f2b…56f3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x56f3a…56f5a (55, 0, 40) 20 20 20 20 54 52 41 4e 53 46 49 4c 20 46 49 4c 45 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 ┆ TRANSFIL FILE; /* T┆
0x56f5a…56f7a 52 41 4e 41 4b 54 49 4f 4e 53 46 49 4c 20 49 4e 45 48 5d 4c 4c 45 52 20 4b 4f 4e 54 45 52 49 4e ┆RANAKTIONSFIL INEHÅLLER KONTERIN┆
0x56f7a…56f89 47 41 52 20 2a 2f 20 20 20 20 20 20 20 20 20 ┆GAR */ ┆
0x56f89…56fd8 (55, 0, 41) 0x20[0x4f]
0x56fd8…56ff8 (55, 0, 42) 44 43 4c 20 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL P POINTER, ┆
0x56ff8…57018 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57018…57027 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57027…57047 (55, 0, 43) 20 20 20 20 44 20 42 41 53 45 44 28 50 29 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 2f 2a 20 41 ┆ D BASED(P) CHAR(6), /* A┆
0x57047…57067 4e 56 5b 4e 44 45 53 20 41 56 20 44 41 54 43 48 45 43 4b 20 2a 2f 20 20 20 20 20 20 20 20 20 20 ┆NVÄNDES AV DATCHECK */ ┆
0x57067…57076 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57076…57096 (55, 0, 44) 20 20 20 20 44 41 54 55 4d 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 2f 2a 20 44 ┆ DATUM CHAR(6), /* D┆
0x57096…570b6 41 47 45 4e 53 44 41 54 55 4d 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AGENSDATUM */ ┆
0x570b6…570c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x570c5…570e5 (55, 0, 45) 20 20 20 20 41 4e 54 4b 4f 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 2f 2a 20 41 ┆ ANTKONT BINARY, /* A┆
0x570e5…57105 4e 54 41 4c 20 4b 4f 4e 54 20 50 5d 20 41 56 45 52 4e 52 20 2a 2f 20 20 20 20 20 20 20 20 20 20 ┆NTAL KONT PÅ AVERNR */ ┆
0x57105…57114 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57114…57134 (55, 0, 46) 20 20 20 20 57 41 4e 54 4b 4f 4e 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ WANTKONT ┆
0x57134…57154 20 42 49 4e 41 52 59 2c 20 2f 2a 20 55 52 53 50 52 20 41 4e 54 20 4b 4f 4e 54 20 50 5d 20 56 45 ┆ BINARY, /* URSPR ANT KONT PÅ VE┆
0x57154…57163 52 20 46 5c 52 45 20 5b 4e 44 52 2a 2f 20 20 ┆R FÖRE ÄNDR*/ ┆
0x57163…57183 (55, 0, 47) 20 20 20 20 41 4b 54 4b 4f 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 2f 2a 20 4b ┆ AKTKONT BINARY, /* K┆
0x57183…571a3 4f 4e 54 45 52 49 4e 47 20 53 4f 4d 20 42 45 48 41 4e 44 4c 41 53 20 4e 55 4d 4d 45 52 20 49 20 ┆ONTERING SOM BEHANDLAS NUMMER I ┆
0x571a3…571b2 41 52 45 41 20 2a 2f 20 20 20 20 20 20 20 20 ┆AREA */ ┆
0x571b2…571d2 (55, 0, 48) 20 20 20 20 50 41 52 45 41 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 41 ┆ PAREA BINARY, /* A┆
0x571d2…571f2 44 52 45 53 53 45 4e 20 46 5c 52 20 41 52 45 41 20 50 52 4f 47 52 41 4d 4b 4f 4e 53 54 41 4e 54 ┆DRESSEN FÖR AREA PROGRAMKONSTANT┆
0x571f2…57201 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 ┆ */ ┆
0x57201…57221 (55, 0, 49) 20 20 20 20 57 46 4c 41 47 47 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 2f 2a 20 57 ┆ WFLAGG BINARY, /* W┆
0x57221…57241 52 49 54 45 2d 46 4c 41 47 47 41 20 31 20 4f 4d 20 53 4b 52 49 56 4e 49 4e 47 20 2a 2f 20 20 20 ┆RITE-FLAGGA 1 OM SKRIVNING */ ┆
0x57241…57250 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57250…57270 (55, 0, 50) 20 20 20 20 41 44 44 4b 4f 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 2f 2a 20 41 ┆ ADDKONT BINARY, /* A┆
0x57270…57290 4e 54 41 4c 20 4e 59 41 20 4b 4f 4e 54 45 52 49 4e 47 41 52 20 50 5d 20 41 56 45 52 4e 52 20 2a ┆NTAL NYA KONTERINGAR PÅ AVERNR *┆
0x57290…5729f 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆/ ┆
0x5729f…572bf (55, 0, 51) 20 20 20 20 52 45 4b 54 4f 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 2f 2a 20 41 ┆ REKTOT BINARY, /* A┆
0x572bf…572df 4e 54 41 4c 20 52 45 4b 4f 44 53 20 49 20 54 52 41 4e 53 46 49 4c 20 2a 2f 20 20 20 20 20 20 20 ┆NTAL REKODS I TRANSFIL */ ┆
0x572df…572ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x572ee…5730e (55, 0, 52) 20 20 20 20 41 56 45 52 4e 52 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 2f 2a 20 41 ┆ AVERNR FIXED(5), /* A┆
0x5730e…5732e 4b 54 55 45 4c 54 20 56 45 52 4e 55 4d 4d 45 52 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KTUELT VERNUMMER */ ┆
0x5732e…5733d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5733d…5735d (55, 0, 53) 20 20 20 20 41 52 45 43 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 46 ┆ AREC BINARY, /* F┆
0x5735d…5737d 5c 52 53 54 41 20 4b 4f 4e 54 45 52 49 4e 47 27 73 20 28 4d 45 44 20 41 56 45 52 4e 52 29 20 52 ┆ÖRSTA KONTERING's (MED AVERNR) R┆
0x5737d…5738c 45 43 4e 55 4d 4d 45 52 20 2a 2f 20 20 20 20 ┆ECNUMMER */ ┆
0x5738c…573ac (55, 0, 54) 20 20 20 20 52 43 4f 44 45 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 52 ┆ RCODE BINARY, /* R┆
0x573ac…573cc 45 54 55 52 4b 4f 44 20 46 52 5d 4e 20 52 45 20 57 52 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 ┆ETURKOD FRÅN RE WR */ ┆
0x573cc…573db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x573db…573fb (55, 0, 55) 20 20 20 20 44 52 41 44 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 41 ┆ DRAD BINARY, /* A┆
0x573fb…5741b 4b 54 55 45 4c 20 52 41 44 20 50 5d 20 44 49 53 50 4c 41 59 2d 32 20 2a 2f 20 20 20 20 20 20 20 ┆KTUEL RAD PÅ DISPLAY-2 */ ┆
0x5741b…5742a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5742a…5744a (55, 0, 56) 20 20 20 20 46 52 54 59 50 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 46 ┆ FRTYP BINARY, /* F┆
0x5744a…5746a 52 5d 47 41 20 4e 55 4d 4d 45 52 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RÅGA NUMMER */ ┆
0x5746a…57479 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57479…57499 (55, 0, 57) 20 20 20 20 4b 45 59 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 53 ┆ KEYT BINARY, /* S┆
0x57499…574b9 45 4e 41 53 54 20 52 45 47 2e 20 46 55 4e 4b 54 49 4f 4e 53 54 41 4e 47 47 45 4e 54 20 2a 2f 20 ┆ENAST REG. FUNKTIONSTANGGENT */ ┆
0x574b9…574c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x574c8…574e8 (55, 0, 58) 20 20 20 20 52 42 45 4c 4f 50 50 20 43 48 41 52 28 31 35 29 2c 20 20 20 20 20 20 20 2f 2a 20 52 ┆ RBELOPP CHAR(15), /* R┆
0x574e8…57508 45 44 49 47 45 52 41 54 20 42 45 4c 4f 50 50 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EDIGERAT BELOPP */ ┆
0x57508…57517 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57517…57537 (55, 0, 59) 20 20 20 20 52 4b 4f 4e 54 4f 20 43 48 41 52 28 31 35 29 2c 20 20 20 20 20 20 20 20 2f 2a 20 52 ┆ RKONTO CHAR(15), /* R┆
0x57537…57557 45 44 49 47 45 52 41 54 20 4b 4f 4e 54 4f 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EDIGERAT KONTO */ ┆
0x57557…57566 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57566…57586 (55, 0, 60) 20 20 20 20 4b 4f 4e 54 4f 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTO FIXED(11), ┆
0x57586…575a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x575a6…575b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x575b5…575d5 (55, 0, 61) 20 20 20 20 42 45 4c 4f 50 50 20 46 49 58 45 44 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ BELOPP FIXED(11), ┆
0x575d5…575f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x575f5…57604 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57604…57624 (55, 0, 62) 20 20 20 20 50 45 52 44 41 47 20 46 49 58 45 44 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PERDAG FIXED(6), ┆
0x57624…57644 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57644…57653 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57653…57673 (55, 0, 63) 20 20 20 20 42 55 46 46 20 43 48 41 52 28 32 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BUFF CHAR(25), ┆
0x57673…57693 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57693…576a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x576a2…576c2 (55, 0, 64) 20 20 20 20 41 43 4b 31 20 46 49 58 45 44 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ACK1 FIXED(13), ┆
0x576c2…576e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x576e2…576f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x576f1…57711 (55, 0, 65) 20 20 20 20 41 43 4b 32 20 46 49 58 45 44 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ACK2 FIXED(13), ┆
0x57711…57731 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57731…57740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57740…57760 (55, 0, 66) 20 20 20 20 42 41 53 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BAS BINARY, ┆
0x57760…57780 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57780…5778f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5778f…577af (55, 0, 67) 20 20 20 20 50 44 41 54 55 4d 20 46 49 58 45 44 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PDATUM FIXED(6), ┆
0x577af…577cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x577cf…577de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x577de…577fe (55, 0, 68) 20 20 20 20 46 58 35 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 44 ┆ FX5 FIXED(5), /* D┆
0x577fe…5781e 41 47 45 4e 53 20 44 41 54 55 4d 20 4d 45 44 20 37 38 20 53 4f 4d 20 42 41 53 5d 52 20 46 5c 52 ┆AGENS DATUM MED 78 SOM BASÅR FÖR┆
0x5781e…5782d 20 50 45 52 44 41 47 49 4e 49 54 20 2a 2f 20 ┆ PERDAGINIT */ ┆
0x5782d…5784d (55, 0, 69) 20 20 20 20 46 58 36 20 46 49 58 45 44 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FX6 FIXED(6), ┆
0x5784d…5786d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5786d…5787c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5787c…5789c (55, 0, 70) 20 20 20 20 46 58 31 33 20 46 49 58 45 44 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FX13 FIXED(13), ┆
0x5789c…578bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x578bc…578cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x578cb…578eb (55, 0, 71) 20 20 20 20 50 31 20 43 48 41 52 28 38 29 20 49 4e 49 54 28 27 20 20 39 39 39 39 39 39 27 29 2c ┆ P1 CHAR(8) INIT(' 999999'),┆
0x578eb…5790b 2f 2a 20 50 49 4b 54 55 52 45 20 46 5c 52 20 50 45 52 44 41 47 20 2a 2f 20 20 20 20 20 20 20 20 ┆/* PIKTURE FÖR PERDAG */ ┆
0x5790b…5791a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5791a…5793a (55, 0, 72) 20 20 20 20 50 32 20 43 48 41 52 28 31 34 29 20 49 4e 49 54 28 27 2d 2d 2d 2d 2d 2d 2d 2d 2d 39 ┆ P2 CHAR(14) INIT('---------9┆
0x5793a…5795a 2e 39 39 56 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆.99V'), ┆
0x5795a…57969 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57969…57989 (55, 0, 73) 20 20 20 20 50 33 20 43 48 41 52 28 31 35 29 20 49 4e 49 54 28 27 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆ P3 CHAR(15) INIT('----------┆
0x57989…579a9 2d 2d 2d 39 56 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆---9V'), ┆
0x579a9…579b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x579b8…579d8 (55, 0, 74) 20 20 20 20 54 32 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T2 CHAR(2), ┆
0x579d8…579f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x579f8…57a07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57a07…57a27 (55, 0, 75) 20 20 20 20 54 33 20 43 48 41 52 28 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T3 CHAR(3), ┆
0x57a27…57a47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57a47…57a56 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57a56…57a76 (55, 0, 76) 20 20 20 20 54 35 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T5 CHAR(5), ┆
0x57a76…57a96 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57a96…57aa5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57aa5…57ac5 (55, 0, 77) 20 20 20 20 54 39 20 43 48 41 52 28 39 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T9 CHAR(9), ┆
0x57ac5…57ae5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57ae5…57af4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57af4…57b14 (55, 0, 78) 20 20 20 20 54 31 30 20 43 48 41 52 28 31 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T10 CHAR(10), ┆
0x57b14…57b34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57b34…57b43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57b43…57b63 (55, 0, 79) 20 20 20 20 54 54 31 31 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TT11 CHAR(11), ┆
0x57b63…57b83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57b83…57b92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57b92…57bb2 (55, 0, 80) 20 20 20 20 54 31 33 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T13 CHAR(13), ┆
0x57bb2…57bd2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57bd2…57be1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57be1…57c01 (55, 0, 81) 20 20 20 20 54 31 36 20 43 48 41 52 28 31 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T16 CHAR(16), ┆
0x57c01…57c21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57c21…57c30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57c30…57c50 (56, 0, 0) 20 20 20 20 54 32 35 20 43 48 41 52 28 32 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T25 CHAR(25), ┆
0x57c50…57c70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57c70…57c7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57c7f…57c9f (56, 0, 1) 20 20 20 20 50 45 52 41 52 4d 41 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PERARMAX ┆
0x57c9f…57cbf 20 20 20 20 43 48 41 52 20 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (2), ┆
0x57cbf…57cce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57cce…57cee (56, 0, 2) 20 20 20 20 50 45 52 41 52 4d 49 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PERARMIN ┆
0x57cee…57d0e 20 20 20 20 43 48 41 52 20 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CHAR (2), ┆
0x57d0e…57d1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57d1d…57d3d (56, 0, 3) 20 20 20 20 44 41 54 4b 4f 4c 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATKOLL ┆
0x57d3d…57d5d 20 20 20 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BINARY, ┆
0x57d5d…57d6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57d6c…57d8c (56, 0, 4) 20 20 20 20 50 50 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PP POINTER, ┆
0x57d8c…57dac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57dac…57dbb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57dbb…57ddb (56, 0, 5) 20 20 20 20 31 20 53 54 52 20 42 41 53 45 44 28 50 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 STR BASED(PP), ┆
0x57ddb…57dfb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57dfb…57e0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57e0a…57e2a (56, 0, 6) 20 20 20 20 20 20 32 20 58 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 X CHAR(2), ┆
0x57e2a…57e4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57e4a…57e59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57e59…57e79 (56, 0, 7) 20 20 20 20 20 20 32 20 59 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 Y CHAR(2), ┆
0x57e79…57e99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57e99…57ea8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57ea8…57ec8 (56, 0, 8) 20 20 20 20 20 20 32 20 46 49 52 4d 41 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 FIRMA CHAR(1), ┆
0x57ec8…57ee8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57ee8…57ef7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57ef7…57f17 (56, 0, 9) 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 27 20 20 56 32 31 ┆ VERSION CHAR(47) INIT(' V21┆
0x57f17…57f37 20 56 65 72 73 69 6f 6e 20 31 2e 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ Version 1.4 ┆
0x57f37…57f46 20 20 20 20 37 39 31 30 33 30 27 29 3b 20 20 ┆ 791030'); ┆
0x57f46…57f95 (56, 0, 10) 0x20[0x4f]
0x57f95…57fb5 (56, 0, 11) 42 45 4c 52 45 44 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆BELRED:PROC; ┆
0x57fb5…57fd5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57fd5…57fe4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x57fe4…58004 (56, 0, 12) 20 20 20 20 20 20 20 20 49 46 20 42 45 4c 4f 50 50 46 3e 3d 31 30 30 20 7c 20 42 45 4c 4f 50 50 ┆ IF BELOPPF>=100 ö BELOPP┆
0x58004…58024 46 3c 3d 2d 31 30 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆F<=-100 THEN DO; ┆
0x58024…58033 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58033…58053 (56, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 54 31 33 3d 42 45 4c 4f 50 50 46 3b 20 20 20 20 20 20 20 20 20 ┆ T13=BELOPPF; ┆
0x58053…58073 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58073…58082 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58082…580a2 (56, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 4a 4a 3d 4c 45 4e 47 54 48 28 54 31 33 29 3b 20 20 20 20 20 20 ┆ JJ=LENGTH(T13); ┆
0x580a2…580c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x580c2…580d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x580d1…580f1 (56, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 52 42 45 4c 4f 50 50 3d 27 20 20 20 20 20 20 20 20 20 20 20 3a ┆ RBELOPP=' :┆
0x580f1…58111 2d 2d 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆-- '; ┆
0x58111…58120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58120…58140 (56, 0, 16) 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 54 31 33 2c 4a 4a 2d 31 2c 32 29 7f 3d 27 30 30 ┆ IF SUBSTR(T13,JJ-1,2) ='00┆
0x58140…58160 27 20 54 48 45 4e 20 53 55 42 53 54 52 28 52 42 45 4c 4f 50 50 2c 31 33 2c 32 29 3d 53 55 42 53 ┆' THEN SUBSTR(RBELOPP,13,2)=SUBS┆
0x58160…5816f 54 52 28 54 31 33 2c 4a 4a 2d 31 2c 32 29 3b ┆TR(T13,JJ-1,2);┆
0x5816f…5818f (56, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 52 42 45 4c 4f 50 50 2c 31 34 2d 4a 4a 2c ┆ SUBSTR(RBELOPP,14-JJ,┆
0x5818f…581af 4a 4a 2d 32 29 3d 53 55 42 53 54 52 28 54 31 33 2c 31 2c 4a 4a 2d 32 29 3b 20 20 20 20 20 20 20 ┆JJ-2)=SUBSTR(T13,1,JJ-2); ┆
0x581af…581be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x581be…581de (56, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x581de…581fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x581fe…5820d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5820d…5822d (56, 0, 19) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5822d…5824d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5824d…5825c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5825c…5827c (56, 0, 20) 20 20 20 20 20 20 20 20 49 46 20 42 45 4c 4f 50 50 46 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆ IF BELOPPF=0 THEN DO; ┆
0x5827c…5829c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5829c…582ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x582ab…582cb (56, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 52 42 45 4c 4f 50 50 3d 27 20 20 20 20 20 20 20 20 20 20 30 3a ┆ RBELOPP=' 0:┆
0x582cb…582eb 2d 2d 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆-- '; ┆
0x582eb…582fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x582fa…5831a (56, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5831a…5833a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5833a…58349 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58349…58369 (56, 0, 23) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x58369…58389 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58389…58398 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58398…583b8 (56, 0, 24) 20 20 20 20 20 20 20 20 54 31 33 3d 42 45 4c 4f 50 50 46 2f 31 30 30 3b 20 20 20 20 20 20 20 20 ┆ T13=BELOPPF/100; ┆
0x583b8…583d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x583d8…583e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x583e7…58407 (56, 0, 25) 20 20 20 20 20 20 20 20 4a 4a 3d 4c 45 4e 47 54 48 28 54 31 33 29 3b 20 20 20 20 20 20 20 20 20 ┆ JJ=LENGTH(T13); ┆
0x58407…58427 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58427…58436 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58436…58456 (56, 0, 26) 20 20 20 20 20 20 20 20 4a 4a 4a 3d 49 4e 44 45 58 28 54 31 33 2c 27 2e 27 29 3b 20 20 20 20 20 ┆ JJJ=INDEX(T13,'.'); ┆
0x58456…58476 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58476…58485 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58485…584a5 (56, 0, 27) 20 20 20 20 20 20 20 20 52 42 45 4c 4f 50 50 3d 27 20 20 20 20 20 20 20 20 20 20 20 3a 30 30 20 ┆ RBELOPP=' :00 ┆
0x584a5…584c5 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x584c5…584d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x584d4…584f4 (56, 0, 28) 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 52 42 45 4c 4f 50 50 2c 31 33 2c 4a 4a 2d 4a 4a 4a ┆ SUBSTR(RBELOPP,13,JJ-JJJ┆
0x584f4…58514 29 3d 53 55 42 53 54 52 28 54 31 33 2c 4a 4a 4a 2b 31 2c 4a 4a 2d 4a 4a 4a 29 3b 20 20 20 20 20 ┆)=SUBSTR(T13,JJJ+1,JJ-JJJ); ┆
0x58514…58523 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58523…58543 (56, 0, 29) 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 52 42 45 4c 4f 50 50 2c 31 33 2d 4a 4a 4a 2c 4a 4a ┆ SUBSTR(RBELOPP,13-JJJ,JJ┆
0x58543…58563 4a 2d 31 29 3d 53 55 42 53 54 52 28 54 31 33 2c 31 2c 4a 4a 4a 2d 31 29 3b 20 20 20 20 20 20 20 ┆J-1)=SUBSTR(T13,1,JJJ-1); ┆
0x58563…58572 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58572…58592 (56, 0, 30) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x58592…585b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x585b2…585c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x585c1…585e1 (56, 0, 31) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x585e1…58601 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58601…58610 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58610…5865f (56, 0, 32) 0x20[0x4f]
0x5865f…5867f (56, 0, 33) 4b 4f 4e 54 4f 52 45 44 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTORED:PROC; ┆
0x5867f…5869f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5869f…586ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x586ae…586ce (56, 0, 34) 44 43 4c 20 54 31 31 20 43 48 41 52 28 31 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL T11 CHAR(11); ┆
0x586ce…586ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x586ee…586fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x586fd…5871d (56, 0, 35) 20 20 20 20 20 20 20 20 54 31 31 3d 4b 4f 4e 54 4f 46 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T11=KONTOF; ┆
0x5871d…5873d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5873d…5874c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5874c…5876c (56, 0, 36) 20 20 20 20 20 20 20 20 52 4b 4f 4e 54 4f 3d 27 20 20 27 20 43 41 54 20 53 55 42 53 54 52 28 54 ┆ RKONTO=' ' CAT SUBSTR(T┆
0x5876c…5878c 31 31 2c 31 2c 35 29 20 43 41 54 20 27 2e 2d 2d 2d 2e 2d 2d 2d 27 3b 20 20 20 20 20 20 20 20 20 ┆11,1,5) CAT '.---.---'; ┆
0x5878c…5879b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5879b…587bb (56, 0, 37) 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 54 31 31 2c 36 2c 33 29 7f 3d 27 30 30 30 ┆ IF SUBSTR(T11,6,3) ='000┆
0x587bb…587db 27 20 54 48 45 4e 20 53 55 42 53 54 52 28 52 4b 4f 4e 54 4f 2c 39 2c 33 29 3d 53 55 42 53 54 52 ┆' THEN SUBSTR(RKONTO,9,3)=SUBSTR┆
0x587db…587ea 28 54 31 31 2c 36 2c 33 29 3b 20 20 20 20 20 ┆(T11,6,3); ┆
0x587ea…5880a (56, 0, 38) 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 54 31 31 2c 39 2c 33 29 7f 3d 27 30 30 30 ┆ IF SUBSTR(T11,9,3) ='000┆
0x5880a…5882a 27 20 54 48 45 4e 20 53 55 42 53 54 52 28 52 4b 4f 4e 54 4f 2c 31 33 2c 33 29 3d 53 55 42 53 54 ┆' THEN SUBSTR(RKONTO,13,3)=SUBST┆
0x5882a…58839 52 28 54 31 31 2c 39 2c 33 29 3b 20 20 20 20 ┆R(T11,9,3); ┆
0x58839…58859 (56, 0, 39) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x58859…58879 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58879…58888 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58888…588a8 (56, 0, 40) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x588a8…588c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x588c8…588d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x588d7…58926 (56, 0, 41) 0x20[0x4f]
0x58926…58946 (56, 0, 42) 44 45 4c 49 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DELIT:PROC; ┆
0x58946…58966 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58966…58975 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58975…58995 (56, 0, 43) 20 20 20 20 20 20 20 20 49 46 20 41 4e 54 4b 4f 4e 54 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆ IF ANTKONT=1 THEN DO; ┆
0x58995…589b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x589b5…589c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x589c4…589e4 (56, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x589e4…58a04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58a04…58a13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58a13…58a33 (56, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x58a33…58a53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58a53…58a62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58a62…58a82 (56, 0, 46) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x58a82…58aa2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58aa2…58ab1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58ab1…58ad1 (56, 0, 47) 20 20 20 20 20 20 49 46 20 41 4b 54 4b 4f 4e 54 20 3e 20 41 4e 54 4b 4f 4e 54 20 54 48 45 4e 20 ┆ IF AKTKONT > ANTKONT THEN ┆
0x58ad1…58af1 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DO; ┆
0x58af1…58b00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58b00…58b20 (56, 0, 48) 20 20 20 20 20 20 20 20 20 20 41 4b 54 4b 4f 4e 54 20 3d 20 41 4e 54 4b 4f 4e 54 3b 20 20 20 20 ┆ AKTKONT = ANTKONT; ┆
0x58b20…58b40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58b40…58b4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58b4f…58b6f (56, 0, 49) 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 20 28 50 46 29 20 3d 20 50 41 52 45 41 20 2b 20 ┆ UNSPEC (PF) = PAREA + ┆
0x58b6f…58b8f 28 41 4e 54 4b 4f 4e 54 20 2d 20 31 29 20 2a 20 52 45 43 4c 4e 3b 20 20 20 20 20 20 20 20 20 20 ┆(ANTKONT - 1) * RECLN; ┆
0x58b8f…58b9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58b9e…58bbe (56, 0, 50) 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x58bbe…58bde 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58bde…58bed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58bed…58c0d (56, 0, 51) 20 20 20 20 20 20 20 20 41 43 4b 31 3d 41 43 4b 31 2d 42 45 4c 4f 50 50 46 3b 20 20 20 20 20 20 ┆ ACK1=ACK1-BELOPPF; ┆
0x58c0d…58c2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58c2d…58c3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58c3c…58c5c (56, 0, 52) 20 20 20 20 20 20 20 20 41 43 4b 32 3d 41 43 4b 32 2d 4b 4f 4e 54 4f 46 3b 20 20 20 20 20 20 20 ┆ ACK2=ACK2-KONTOF; ┆
0x58c5c…58c7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58c7c…58c8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58c8b…58cab (56, 0, 53) 20 20 20 20 20 20 20 20 41 4e 54 4b 4f 4e 54 3d 41 4e 54 4b 4f 4e 54 2d 31 3b 20 20 20 20 20 20 ┆ ANTKONT=ANTKONT-1; ┆
0x58cab…58ccb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58ccb…58cda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58cda…58cfa (56, 0, 54) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 41 4b 54 4b 4f 4e 54 2d 31 20 54 4f 20 41 4e 54 4b 4f 4e ┆ DO I=AKTKONT-1 TO ANTKON┆
0x58cfa…58d1a 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T; ┆
0x58d1a…58d29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58d29…58d49 (56, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 44 29 3d 50 41 52 45 41 2b 49 2a 52 45 ┆ UNSPEC(PD)=PAREA+I*RE┆
0x58d49…58d69 43 4c 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CLN; ┆
0x58d69…58d78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58d78…58d98 (56, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 50 4f 53 54 31 3d 50 4f 53 54 32 3b 20 20 20 20 20 20 20 20 20 ┆ POST1=POST2; ┆
0x58d98…58db8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58db8…58dc7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58dc7…58de7 (56, 0, 57) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x58de7…58e07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58e07…58e16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58e16…58e36 (56, 0, 58) 20 20 20 20 20 20 20 20 57 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ WFLAGG=1; ┆
0x58e36…58e56 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58e56…58e65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58e65…58e85 (56, 0, 59) 20 20 20 20 20 20 20 20 41 44 44 4b 4f 4e 54 3d 41 44 44 4b 4f 4e 54 2d 31 3b 20 20 20 20 20 20 ┆ ADDKONT=ADDKONT-1; ┆
0x58e85…58ea5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58ea5…58eb4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58eb4…58ed4 (56, 0, 60) 20 20 20 20 20 20 20 20 4a 3d 33 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=34; ┆
0x58ed4…58ef4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58ef4…58f03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58f03…58f23 (56, 0, 61) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x58f23…58f43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58f43…58f52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58f52…58f72 (56, 0, 62) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 41 43 4b 31 29 28 50 ┆ PUT FILE(D) EDIT(ACK1)(P┆
0x58f72…58f92 50 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P2); ┆
0x58f92…58fa1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58fa1…58fc1 (56, 0, 63) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x58fc1…58fe1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58fe1…58ff0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x58ff0…59010 (56, 0, 64) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x59010…59030 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59030…5903f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5903f…5908e (56, 0, 65) 0x20[0x4f]
0x5908e…590ae (56, 0, 66) 44 41 47 54 45 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DAGTEST:PROC; ┆
0x590ae…590ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x590ce…590dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x590dd…590fd (56, 0, 67) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x590fd…5911d 52 53 49 4f 4e 29 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RSION)(A(47)); ┆
0x5911d…5912c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5912c…5914c (56, 0, 68) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN TRANSFIL; ┆
0x5914c…5916c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5916c…5917b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5917b…5919b (56, 0, 69) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 54 52 41 4e 53 46 49 4c 29 3b 20 20 20 20 ┆ CALL SEOF(TRANSFIL); ┆
0x5919b…591bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x591bb…591ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x591ca…591ea (56, 0, 70) 20 20 20 20 20 20 20 20 52 45 4b 54 4f 54 3d 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3b ┆ REKTOT=UNSPEC(TRANSFIL);┆
0x591ea…5920a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5920a…59219 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59219…59239 (56, 0, 71) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN TRANSFIL; ┆
0x59239…59259 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59259…59268 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59268…59288 (56, 0, 72) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 20 20 54 52 41 4e ┆ PUT FILE(D) EDIT(' TRAN┆
0x59288…592a8 53 41 4b 54 49 4f 4e 45 52 4e 41 20 4b 4f 4d 4d 45 52 20 41 54 54 20 44 41 54 45 52 41 53 27 29 ┆SAKTIONERNA KOMMER ATT DATERAS')┆
0x592a8…592b7 28 41 28 33 37 29 29 20 20 20 20 20 20 20 20 ┆(A(37)) ┆
0x592b7…592d7 (56, 0, 73) 20 20 20 20 20 20 20 20 28 44 41 54 55 4d 29 28 41 28 31 32 29 29 28 27 54 52 41 4e 53 41 4b 54 ┆ (DATUM)(A(12))('TRANSAKT┆
0x592d7…592f7 49 4f 4e 53 46 49 4c 45 4e 20 49 4e 4e 45 48 5d 4c 4c 45 52 27 29 28 41 28 32 39 29 29 20 20 20 ┆IONSFILEN INNEHÅLLER')(A(29)) ┆
0x592f7…59306 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59306…59326 (56, 0, 74) 20 20 20 20 20 20 20 20 28 52 45 4b 54 4f 54 29 28 50 27 2d 2d 2d 2d 39 27 29 28 27 20 50 4f 53 ┆ (REKTOT)(P'----9')(' POS┆
0x59326…59346 54 45 52 27 29 28 41 28 31 33 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TER')(A(13)) ┆
0x59346…59355 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59355…59375 (56, 0, 75) 20 20 20 20 20 20 20 20 28 27 5b 52 20 4f 56 41 4e 53 54 5d 45 4e 44 45 20 4b 4f 52 52 45 4b 54 ┆ ('ÄR OVANSTÅENDE KORREKT┆
0x59375…59395 3f 20 22 4a 22 20 45 4c 4c 45 52 20 22 4e 22 27 29 28 41 28 34 34 29 29 3b 20 20 20 20 20 20 20 ┆? "J" ELLER "N"')(A(44)); ┆
0x59395…593a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x593a4…593c4 (56, 0, 76) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 54 32 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(T2); ┆
0x593c4…593e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x593e4…593f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x593f3…59413 (56, 0, 77) 20 20 20 20 20 20 20 20 49 46 20 54 32 7f 3d 27 4a 20 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF T2 ='J ' THEN DO; ┆
0x59413…59433 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59433…59442 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59442…59462 (56, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x59462…59482 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59482…59491 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59491…594b1 (56, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 ┆ CALL PLOAD('Q '┆
0x594b1…594d1 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x594d1…594e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x594e0…59500 (56, 0, 80) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x59500…59520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59520…5952f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5952f…5954f (56, 0, 81) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4b 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN KFIL; ┆
0x5954f…5956f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5956f…5957e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5957e…5959e (57, 0, 0) 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 4b 46 49 4c 29 20 49 4e 54 4f 28 48 4a 53 ┆ READ FILE(KFIL) INTO(HJS┆
0x5959e…595be 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TR); ┆
0x595be…595cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x595cd…595ed (57, 0, 1) 20 20 20 20 20 20 20 20 46 58 35 3d 44 41 54 55 4d 2d 37 38 30 30 30 30 3b 20 20 20 20 20 20 20 ┆ FX5=DATUM-780000; ┆
0x595ed…5960d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5960d…5961c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5961c…5963c (57, 0, 2) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5963c…5965c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5965c…5966b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5966b…5968b (57, 0, 3) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x5968b…596ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x596ab…596ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x596ba…59709 (57, 0, 4) 0x20[0x4f]
0x59709…59729 (57, 0, 5) 48 4f 50 50 41 5f 54 49 4c 4c 5f 51 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆HOPPA_TILL_Q:PROC; ┆
0x59729…59749 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59749…59758 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59758…59778 (57, 0, 6) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x59778…59798 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59798…597a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x597a7…597c7 (57, 0, 7) 20 20 20 20 20 20 20 20 52 45 57 52 49 54 45 20 46 49 4c 45 28 4b 46 49 4c 29 20 46 52 4f 4d 28 ┆ REWRITE FILE(KFIL) FROM(┆
0x597c7…597e7 48 4a 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆HJSTR); ┆
0x597e7…597f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x597f6…59816 (57, 0, 8) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x59816…59836 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59836…59845 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59845…59865 (57, 0, 9) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x59865…59885 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59885…59894 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59894…598b4 (57, 0, 10) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x598b4…598d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x598d4…598e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x598e3…59932 (57, 0, 11) 0x20[0x4f]
0x59932…59952 (57, 0, 12) 56 45 52 49 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VERIN:PROC; ┆
0x59952…59972 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59972…59981 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59981…599a1 (57, 0, 13) 20 20 20 20 20 20 41 56 45 52 4e 52 20 3d 20 56 45 52 4e 52 20 2b 20 31 3b 20 20 20 20 20 20 20 ┆ AVERNR = VERNR + 1; ┆
0x599a1…599c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x599c1…599d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x599d0…599f0 (57, 0, 14) 20 20 20 20 20 20 44 4f 20 49 20 3d 20 30 20 54 4f 20 31 30 35 3b 20 20 20 20 20 20 20 20 20 20 ┆ DO I = 0 TO 105; ┆
0x599f0…59a10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59a10…59a1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59a1f…59a3f (57, 0, 15) 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 20 28 50 46 29 20 3d 20 50 41 52 45 41 20 2b 20 ┆ UNSPEC (PF) = PAREA + ┆
0x59a3f…59a5f 49 20 2a 20 33 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆I * 34; ┆
0x59a5f…59a6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59a6e…59a8e (57, 0, 16) 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 46 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTOF = 0; ┆
0x59a8e…59aae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59aae…59abd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59abd…59add (57, 0, 17) 20 20 20 20 20 20 20 56 45 52 4e 52 46 20 3d 20 41 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 ┆ VERNRF = AVERNR; ┆
0x59add…59afd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59afd…59b0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59b0c…59b2c (57, 0, 18) 20 20 20 20 20 20 20 44 41 54 55 4d 46 20 3d 20 46 58 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUMF = FX5; ┆
0x59b2c…59b4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59b4c…59b5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59b5b…59b7b (57, 0, 19) 20 20 20 20 20 20 20 50 44 41 54 55 4d 46 20 3d 20 46 58 35 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ PDATUMF = FX5; ┆
0x59b7b…59b9b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59b9b…59baa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59baa…59bca (57, 0, 20) 20 20 20 20 20 20 20 42 45 4c 4f 50 50 46 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BELOPPF = 0; ┆
0x59bca…59bea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59bea…59bf9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59bf9…59c19 (57, 0, 21) 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x59c19…59c39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59c39…59c48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59c48…59c68 (57, 0, 22) 56 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆V1: ┆
0x59c68…59c88 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59c88…59c97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59c97…59cb7 (57, 0, 23) 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 45 44 49 54 20 28 27 20 20 ┆ PUT FILE (D) SKIP EDIT (' ┆
0x59cb7…59cd7 56 45 52 2e 4e 52 3a 27 29 20 28 41 28 31 30 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VER.NR:') (A(10)); ┆
0x59cd7…59ce6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59ce6…59d06 (57, 0, 24) 20 20 20 20 20 49 46 20 52 45 4b 54 4f 54 20 3e 20 39 38 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆ IF REKTOT > 980 THEN DO; ┆
0x59d06…59d26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59d26…59d35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59d35…59d55 (57, 0, 25) 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 20 28 31 2c 36 29 3b 20 20 20 20 20 20 20 ┆ CALL OUTPUT (1,6); ┆
0x59d55…59d75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59d75…59d84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59d84…59da4 (57, 0, 26) 20 20 20 20 20 20 20 49 46 20 52 45 43 54 4f 54 20 3e 20 31 30 32 30 20 54 48 45 4e 20 44 4f 3b ┆ IF RECTOT > 1020 THEN DO;┆
0x59da4…59dc4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59dc4…59dd3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59dd3…59df3 (57, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 33 30 30 3b 45 4e 44 3b ┆ DO J=1 TO 300;END;┆
0x59df3…59e13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59e13…59e22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59e22…59e42 (57, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 ┆ CALL OUTPUT(1,6); ┆
0x59e42…59e62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59e62…59e71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59e71…59e91 (57, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 33 30 30 3b 45 4e 44 3b ┆ DO J=1 TO 300;END;┆
0x59e91…59eb1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59eb1…59ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59ec0…59ee0 (57, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 ┆ CALL OUTPUT(1,6); ┆
0x59ee0…59f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59f00…59f0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59f0f…59f2f (57, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x59f2f…59f4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59f4f…59f5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59f5e…59f7e (57, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 41 4e 54 ┆ PUT FILE(D) EDIT('ANT┆
0x59f7e…59f9e 41 4c 20 4b 4f 4e 54 45 52 49 4e 47 41 52 20 49 20 54 52 41 4e 53 46 49 4c 3a 27 29 28 58 28 33 ┆AL KONTERINGAR I TRANSFIL:')(X(3┆
0x59f9e…59fad 37 29 2c 41 28 34 33 29 29 20 20 20 20 20 20 ┆7),A(43)) ┆
0x59fad…59fcd (57, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 28 52 45 4b 54 4f 54 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆ (REKTOT)(A); ┆
0x59fcd…59fed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59fed…59ffc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x59ffc…5a01c (57, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 31 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=10; ┆
0x5a01c…5a03c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a03c…5a04b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a04b…5a06b (57, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x5a06b…5a08b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a08b…5a09a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a09a…5a0ba (57, 0, 36) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5a0ba…5a0da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a0da…5a0e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a0e9…5a109 (57, 0, 37) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 54 35 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(T5); ┆
0x5a109…5a129 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a129…5a138 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a138…5a158 (57, 0, 38) 20 20 20 20 20 20 20 20 49 46 20 54 35 3d 27 20 20 20 20 20 27 20 54 48 45 4e 20 43 41 4c 4c 20 ┆ IF T5=' ' THEN CALL ┆
0x5a158…5a178 48 4f 50 50 41 5f 54 49 4c 4c 5f 51 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆HOPPA_TILL_Q; ┆
0x5a178…5a187 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a187…5a1a7 (57, 0, 39) 20 20 20 20 20 20 20 20 41 56 45 52 4e 52 3d 54 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ AVERNR=T5; ┆
0x5a1a7…5a1c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 20 20 49 4e 4b 4e 41 50 50 41 54 20 56 45 ┆ /* INKNAPPAT VE┆
0x5a1c7…5a1d6 52 2e 4e 52 20 20 20 20 20 2a 2f 20 20 20 20 ┆R.NR */ ┆
0x5a1d6…5a1f6 (57, 0, 40) 20 20 20 20 20 20 20 20 41 43 4b 31 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ACK1=0; ┆
0x5a1f6…5a216 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a216…5a225 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a225…5a245 (57, 0, 41) 20 20 20 20 20 20 20 20 41 43 4b 32 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ACK2=0; ┆
0x5a245…5a265 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a265…5a274 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a274…5a294 (57, 0, 42) 20 20 20 20 20 20 20 20 49 46 20 41 56 45 52 4e 52 3e 56 45 52 4e 52 2b 31 20 54 48 45 4e 20 44 ┆ IF AVERNR>VERNR+1 THEN D┆
0x5a294…5a2b4 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O; ┆
0x5a2b4…5a2c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a2c3…5a2e3 (57, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 ┆ PUT FILE(D) SKIP EDIT┆
0x5a2e3…5a303 28 27 20 20 56 45 52 49 46 49 4b 41 54 49 4f 4e 53 4e 55 4d 52 45 54 27 29 28 41 28 32 32 29 29 ┆(' VERIFIKATIONSNUMRET')(A(22))┆
0x5a303…5a312 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a312…5a332 (57, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 28 41 56 45 52 4e 52 29 28 50 27 2d 2d 2d 2d 39 27 29 28 27 20 ┆ (AVERNR)(P'----9')(' ┆
0x5a332…5a352 47 4f 44 4b 5b 4e 4e 45 53 20 45 4a 27 29 28 41 28 32 32 29 29 20 20 20 20 20 20 20 20 20 20 20 ┆GODKÄNNES EJ')(A(22)) ┆
0x5a352…5a361 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a361…5a381 (57, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 28 27 53 45 4e 41 53 54 45 20 49 4e 52 41 50 50 4f 52 54 45 52 ┆ ('SENASTE INRAPPORTER┆
0x5a381…5a3a1 41 44 45 20 56 45 52 2e 4e 52 3a 27 29 28 41 28 33 30 29 29 28 56 45 52 4e 52 29 28 50 27 2d 2d ┆ADE VER.NR:')(A(30))(VERNR)(P'--┆
0x5a3a1…5a3b0 2d 2d 39 27 29 3b 20 20 20 3b 20 20 20 20 20 ┆--9'); ; ┆
0x5a3b0…5a3d0 (57, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 ┆ GET SKIP LIST(''); ┆
0x5a3d0…5a3f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a3f0…5a3ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a3ff…5a41f (57, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 56 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO V1; ┆
0x5a41f…5a43f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a43f…5a44e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a44e…5a46e (57, 0, 48) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5a46e…5a48e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a48e…5a49d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a49d…5a4bd (57, 0, 49) 20 20 20 20 20 20 20 20 49 46 20 41 56 45 52 4e 52 3d 56 45 52 4e 52 2b 31 20 54 48 45 4e 20 44 ┆ IF AVERNR=VERNR+1 THEN D┆
0x5a4bd…5a4dd 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 20 20 4e 59 20 56 45 52 2e 20 20 20 20 20 ┆O; /* NY VER. ┆
0x5a4dd…5a4ec 20 20 20 20 20 20 20 20 20 2a 2f 20 20 20 20 ┆ */ ┆
0x5a4ec…5a50c (57, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 4b 4f 4e 54 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ ANTKONT=0; ┆
0x5a50c…5a52c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a52c…5a53b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a53b…5a55b (57, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 41 52 45 43 3d 52 45 4b 54 4f 54 3b 20 20 20 20 20 20 20 20 20 ┆ AREC=REKTOT; ┆
0x5a55b…5a57b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a57b…5a58a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a58a…5a5aa (57, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 56 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO V3; ┆
0x5a5aa…5a5ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a5ca…5a5d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a5d9…5a5f9 (57, 0, 53) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5a5f9…5a619 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a619…5a628 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a628…5a648 (57, 0, 54) 20 20 20 20 20 20 20 20 49 46 20 52 45 4b 54 4f 54 3c 31 20 54 48 45 4e 20 47 4f 20 54 4f 20 56 ┆ IF REKTOT<1 THEN GO TO V┆
0x5a648…5a668 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x5a668…5a677 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a677…5a697 (57, 0, 55) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN TRANSFIL; ┆
0x5a697…5a6b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a6b7…5a6c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a6c6…5a6e6 (57, 0, 56) 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 56 31 3b 20 20 20 20 20 20 ┆ ON ERROR GO TO V1; ┆
0x5a6e6…5a706 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a706…5a715 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a715…5a735 (57, 0, 57) 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 41 56 45 52 4e 52 29 20 46 49 4c 45 28 54 52 ┆ READ KEY(AVERNR) FILE(TR┆
0x5a735…5a755 41 4e 53 46 49 4c 29 20 49 4e 54 4f 28 46 53 54 52 29 20 4b 45 59 54 4f 28 56 45 52 4e 52 46 29 ┆ANSFIL) INTO(FSTR) KEYTO(VERNRF)┆
0x5a755…5a764 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x5a764…5a784 (57, 0, 58) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(TRANSFIL)=UNSPEC(┆
0x5a784…5a7a4 54 52 41 4e 53 46 49 4c 29 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TRANSFIL)-1; ┆
0x5a7a4…5a7b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a7b3…5a7d3 (57, 0, 59) 20 20 20 20 20 20 20 20 41 52 45 43 3d 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3b 20 20 ┆ AREC=UNSPEC(TRANSFIL); ┆
0x5a7d3…5a7f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a7f3…5a802 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a802…5a822 (57, 0, 60) 20 20 20 20 20 20 20 20 49 3d 52 45 4b 54 4f 54 2d 41 52 45 43 3b 20 20 20 20 20 20 20 20 20 20 ┆ I=REKTOT-AREC; ┆
0x5a822…5a842 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a842…5a851 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a851…5a871 (57, 0, 61) 20 20 20 20 20 20 20 20 49 46 20 49 3e 31 30 30 20 54 48 45 4e 20 49 3d 31 30 30 3b 20 20 20 20 ┆ IF I>100 THEN I=100; ┆
0x5a871…5a891 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a891…5a8a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a8a0…5a8c0 (57, 0, 62) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 54 52 41 4e 53 46 49 4c 2c 41 52 45 41 2c 49 2c ┆ CALL RD(TRANSFIL,AREA,I,┆
0x5a8c0…5a8e0 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RCODE); ┆
0x5a8e0…5a8ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a8ef…5a90f (57, 0, 63) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 ┆ IF RCODE =0 THEN PUT SKI┆
0x5a90f…5a92f 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 27 2c 4f 4e 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 ┆P LIST('LÄSFEL',ONCODE); ┆
0x5a92f…5a93e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a93e…5a95e (57, 0, 64) 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 30 20 54 4f 20 49 2d 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ DO J=0 TO I-1; ┆
0x5a95e…5a97e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a97e…5a98d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a98d…5a9ad (57, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 46 29 3d 50 41 52 45 41 2b 4a 2a 52 45 ┆ UNSPEC(PF)=PAREA+J*RE┆
0x5a9ad…5a9cd 43 4c 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CLN; ┆
0x5a9cd…5a9dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5a9dc…5a9fc (57, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 46 7f 3d 41 56 45 52 4e 52 20 54 48 45 ┆ IF VERNRF =AVERNR THE┆
0x5a9fc…5aa1c 4e 20 47 4f 20 54 4f 20 56 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆N GO TO V2; ┆
0x5aa1c…5aa2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5aa2b…5aa4b (57, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 41 43 4b 31 3d 41 43 4b 31 2b 42 45 4c 4f 50 50 46 3b 20 20 20 ┆ ACK1=ACK1+BELOPPF; ┆
0x5aa4b…5aa6b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5aa6b…5aa7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5aa7a…5aa9a (57, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 41 43 4b 32 3d 41 43 4b 32 2b 4b 4f 4e 54 4f 46 3b 20 20 20 20 ┆ ACK2=ACK2+KONTOF; ┆
0x5aa9a…5aaba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5aaba…5aac9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5aac9…5aae9 (57, 0, 69) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5aae9…5ab09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ab09…5ab18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ab18…5ab38 (57, 0, 70) 56 32 3a 20 20 20 20 20 41 4e 54 4b 4f 4e 54 3d 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆V2: ANTKONT=J; ┆
0x5ab38…5ab58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ab58…5ab67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ab67…5ab87 (57, 0, 71) 20 20 20 20 20 20 20 20 57 41 4e 54 4b 4f 4e 54 20 3d 20 41 4e 54 4b 4f 4e 54 3b 20 20 20 20 20 ┆ WANTKONT = ANTKONT; ┆
0x5ab87…5aba7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5aba7…5abb6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5abb6…5abd6 (57, 0, 72) 20 20 20 20 20 20 20 20 44 4f 20 49 20 3d 20 41 4e 54 4b 4f 4e 54 20 54 4f 20 31 30 35 3b 20 20 ┆ DO I = ANTKONT TO 105; ┆
0x5abd6…5abf6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5abf6…5ac05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ac05…5ac25 (57, 0, 73) 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 20 28 50 46 29 20 3d 20 50 41 52 45 41 20 2b 20 ┆ UNSPEC (PF) = PAREA + ┆
0x5ac25…5ac45 49 20 2a 20 33 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆I * 34; ┆
0x5ac45…5ac54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ac54…5ac74 (57, 0, 74) 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 46 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTOF = 0; ┆
0x5ac74…5ac94 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ac94…5aca3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5aca3…5acc3 (57, 0, 75) 20 20 20 20 20 20 20 20 20 20 56 45 52 4e 52 46 20 3d 20 41 56 45 52 4e 52 3b 20 20 20 20 20 20 ┆ VERNRF = AVERNR; ┆
0x5acc3…5ace3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ace3…5acf2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5acf2…5ad12 (57, 0, 76) 20 20 20 20 20 20 20 20 20 20 44 41 54 55 4d 46 20 3d 20 46 58 35 3b 20 20 20 20 20 20 20 20 20 ┆ DATUMF = FX5; ┆
0x5ad12…5ad32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ad32…5ad41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ad41…5ad61 (57, 0, 77) 20 20 20 20 20 20 20 20 20 20 50 44 41 54 55 4d 46 20 3d 20 46 58 35 3b 20 20 20 20 20 20 20 20 ┆ PDATUMF = FX5; ┆
0x5ad61…5ad81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ad81…5ad90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ad90…5adb0 (57, 0, 78) 20 20 20 20 20 20 20 20 20 20 42 45 4c 4f 50 50 46 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ BELOPPF = 0; ┆
0x5adb0…5add0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5add0…5addf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5addf…5adff (57, 0, 79) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5adff…5ae1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ae1f…5ae2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ae2e…5ae4e (57, 0, 80) 56 33 3a 20 20 20 20 20 41 4b 54 4b 4f 4e 54 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆V3: AKTKONT=1; ┆
0x5ae4e…5ae6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ae6e…5ae7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ae7d…5ae9d (57, 0, 81) 20 20 20 20 20 20 20 20 41 44 44 4b 4f 4e 54 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ADDKONT=0; ┆
0x5ae9d…5aebd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5aebd…5aecc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5aecc…5aeec (58, 0, 0) 20 20 20 20 20 20 20 20 57 46 4c 41 47 47 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ WFLAGG=0; ┆
0x5aeec…5af0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5af0c…5af1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5af1b…5af3b (58, 0, 1) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 41 56 45 52 4e 52 29 ┆ PUT FILE(D) EDIT(AVERNR)┆
0x5af3b…5af5b 28 41 28 39 29 29 28 27 53 49 44 3a 20 20 20 20 20 20 53 41 4c 44 4f 3a 27 29 28 41 28 32 38 29 ┆(A(9))('SID: SALDO:')(A(28)┆
0x5af5b…5af6a 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) ┆
0x5af6a…5af8a (58, 0, 2) 20 20 20 20 20 20 20 20 28 27 20 20 4b 4f 4e 54 4f 20 55 4b 54 4f 20 4b 53 20 20 50 45 52 44 41 ┆ (' KONTO UKTO KS PERDA┆
0x5af8a…5afaa 47 20 20 20 20 20 42 45 4c 4f 50 50 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆G BELOPP')(A); ┆
0x5afaa…5afb9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5afb9…5afd9 (58, 0, 3) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5afd9…5aff9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5aff9…5b008 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b008…5b028 (58, 0, 4) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x5b028…5b048 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b048…5b057 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b057…5b0a6 (58, 0, 5) 0x20[0x4f]
0x5b0a6…5b0c6 (58, 0, 6) 44 49 53 50 50 55 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DISPPUT:PROC; ┆
0x5b0c6…5b0e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b0e6…5b0f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b0f5…5b115 (58, 0, 7) 44 31 3a 20 20 20 20 20 49 3d 28 41 4b 54 4b 4f 4e 54 2d 31 29 2f 31 30 3b 20 20 20 20 20 20 20 ┆D1: I=(AKTKONT-1)/10; ┆
0x5b115…5b135 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b135…5b144 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b144…5b164 (58, 0, 8) 20 20 20 20 20 20 20 20 49 46 20 49 3e 3d 39 20 54 48 45 4e 20 43 41 4c 4c 20 4f 55 54 50 55 54 ┆ IF I>=9 THEN CALL OUTPUT┆
0x5b164…5b184 28 31 2c 36 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(1,6); ┆
0x5b184…5b193 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b193…5b1b3 (58, 0, 9) 20 20 20 20 20 20 20 20 49 46 20 49 3d 31 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 ┆ IF I=10 THEN DO; ┆
0x5b1b3…5b1d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b1d3…5b1e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b1e2…5b202 (58, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 32 32 20 54 48 45 4e 20 41 4b 54 4b 4f ┆ IF KEYT=22 THEN AKTKO┆
0x5b202…5b222 4e 54 3d 31 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NT=100; ┆
0x5b222…5b231 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b231…5b251 (58, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 41 4b 54 4b 4f 4e 54 3d 31 3b 20 20 20 20 20 20 ┆ ELSE AKTKONT=1; ┆
0x5b251…5b271 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b271…5b280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b280…5b2a0 (58, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 34 30 30 3b 45 4e 44 3b 20 20 20 ┆ DO J=1 TO 400;END; ┆
0x5b2a0…5b2c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b2c0…5b2cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b2cf…5b2ef (58, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x5b2ef…5b30f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b30f…5b31e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b31e…5b33e (58, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 44 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO D1; ┆
0x5b33e…5b35e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b35e…5b36d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b36d…5b38d (58, 0, 15) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5b38d…5b3ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b3ad…5b3bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b3bc…5b3dc (58, 0, 16) 20 20 20 20 20 20 20 20 4a 3d 32 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=24; ┆
0x5b3dc…5b3fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b3fc…5b40b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b40b…5b42b (58, 0, 17) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x5b42b…5b44b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b44b…5b45a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b45a…5b47a (58, 0, 18) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 49 2b 31 29 28 41 29 ┆ PUT FILE(D) EDIT(I+1)(A)┆
0x5b47a…5b49a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x5b49a…5b4a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b4a9…5b4c9 (58, 0, 19) 20 20 20 20 20 20 20 20 49 49 3d 41 4e 54 4b 4f 4e 54 2d 31 30 2a 49 3b 20 20 20 20 20 20 20 20 ┆ II=ANTKONT-10*I; ┆
0x5b4c9…5b4e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b4e9…5b4f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b4f8…5b518 (58, 0, 20) 20 20 20 20 20 20 20 20 49 46 20 49 49 3e 39 20 54 48 45 4e 20 49 49 3d 31 30 3b 20 20 20 20 20 ┆ IF II>9 THEN II=10; ┆
0x5b518…5b538 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b538…5b547 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b547…5b567 (58, 0, 21) 20 20 20 20 20 20 20 20 4a 3d 39 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=94; ┆
0x5b567…5b587 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b587…5b596 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b596…5b5b6 (58, 0, 22) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x5b5b6…5b5d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b5d6…5b5e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b5e5…5b605 (58, 0, 23) 20 20 20 20 20 20 20 20 4c 3d 31 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ L=10; ┆
0x5b605…5b625 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b625…5b634 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b634…5b654 (58, 0, 24) 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 49 2a 31 30 20 54 4f 20 49 2a 31 30 2b 49 49 2d 31 3b 20 ┆ DO J=I*10 TO I*10+II-1; ┆
0x5b654…5b674 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b674…5b683 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b683…5b6a3 (58, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 46 29 3d 50 41 52 45 41 2b 4a 2a 52 45 ┆ UNSPEC(PF)=PAREA+J*RE┆
0x5b6a3…5b6c3 43 4c 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CLN; ┆
0x5b6c3…5b6d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b6d2…5b6f2 (58, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 52 45 44 3b 20 20 20 20 20 20 20 ┆ CALL KONTORED; ┆
0x5b6f2…5b712 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b712…5b721 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b721…5b741 (58, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 3b 20 20 20 20 20 20 20 20 20 ┆ CALL BELRED; ┆
0x5b741…5b761 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b761…5b770 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b770…5b790 (58, 0, 28) 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 52 4b 4f 4e 54 ┆ PUT FILE(D) EDIT(RKONT┆
0x5b790…5b7b0 4f 29 28 41 28 31 35 29 29 28 50 44 41 54 55 4d 46 2b 37 38 30 30 30 30 29 28 50 50 31 29 28 52 ┆O)(A(15))(PDATUMF+780000)(PP1)(R┆
0x5b7b0…5b7bf 42 45 4c 4f 50 50 29 28 41 28 32 34 29 29 3b ┆BELOPP)(A(24));┆
0x5b7bf…5b7df (58, 0, 29) 20 20 20 20 20 20 20 20 4c 3d 4c 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ L=L-1; ┆
0x5b7df…5b7ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b7ff…5b80e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b80e…5b82e (58, 0, 30) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5b82e…5b84e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b84e…5b85d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b85d…5b87d (58, 0, 31) 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO J=1 TO L; ┆
0x5b87d…5b89d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b89d…5b8ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b8ac…5b8cc (58, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 20 27 29 ┆ PUT FILE(D) EDIT(' ')┆
0x5b8cc…5b8ec 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(A(47)); ┆
0x5b8ec…5b8fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b8fb…5b91b (58, 0, 33) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5b91b…5b93b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b93b…5b94a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b94a…5b96a (58, 0, 34) 20 20 20 20 20 20 20 20 44 52 41 44 3d 28 41 4b 54 4b 4f 4e 54 2d 31 29 2f 31 30 3b 20 20 20 20 ┆ DRAD=(AKTKONT-1)/10; ┆
0x5b96a…5b98a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b98a…5b999 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b999…5b9b9 (58, 0, 35) 20 20 20 20 20 20 20 20 44 52 41 44 3d 41 4b 54 4b 4f 4e 54 2d 31 30 2a 44 52 41 44 3b 20 20 20 ┆ DRAD=AKTKONT-10*DRAD; ┆
0x5b9b9…5b9d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b9d9…5b9e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5b9e8…5ba08 (58, 0, 36) 20 20 20 20 20 20 20 20 46 52 54 59 50 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FRTYP=1; ┆
0x5ba08…5ba28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ba28…5ba37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ba37…5ba57 (58, 0, 37) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5ba57…5ba77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ba77…5ba86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ba86…5baa6 (58, 0, 38) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x5baa6…5bac6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bac6…5bad5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bad5…5bb24 (58, 0, 39) 0x20[0x4f]
0x5bb24…5bb44 (58, 0, 40) 46 52 41 45 47 41 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FRAEGA:PROC; ┆
0x5bb44…5bb64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bb64…5bb73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bb73…5bb93 (58, 0, 41) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF FRTYP=1 THEN DO; ┆
0x5bb93…5bbb3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bbb3…5bbc2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bbc2…5bbe2 (58, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 46 29 3d 50 41 52 45 41 2b 28 41 4b 54 ┆ UNSPEC(PF)=PAREA+(AKT┆
0x5bbe2…5bc02 4b 4f 4e 54 2d 31 29 2a 52 45 43 4c 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONT-1)*RECLN; ┆
0x5bc02…5bc11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bc11…5bc31 (58, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 28 44 52 41 44 2b 31 29 2a 34 37 3b 20 20 20 20 20 20 20 ┆ J=(DRAD+1)*47; ┆
0x5bc31…5bc51 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bc51…5bc60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bc60…5bc80 (58, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x5bc80…5bca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bca0…5bcaf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bcaf…5bccf (58, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 4b 54 4b 4f 4e 54 3e 41 4e 54 4b 4f 4e 54 20 54 48 ┆ IF AKTKONT>ANTKONT TH┆
0x5bccf…5bcef 45 4e 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN RETURN; ┆
0x5bcef…5bcfe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bcfe…5bd1e (58, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 52 45 44 3b 20 20 20 20 20 20 20 ┆ CALL KONTORED; ┆
0x5bd1e…5bd3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bd3e…5bd4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bd4d…5bd6d (58, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 52 4b 4f 4e 54 4f 2c 31 35 ┆ CALL TYPIST(RKONTO,15┆
0x5bd6d…5bd8d 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x5bd8d…5bd9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bd9c…5bdbc (58, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 27 10 27 2c 31 29 3b 20 20 ┆ CALL TYPIST(' ',1); ┆
0x5bdbc…5bddc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bddc…5bdeb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bdeb…5be0b (58, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5be0b…5be2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5be2b…5be3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5be3a…5be5a (58, 0, 50) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5be5a…5be7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5be7a…5be89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5be89…5bea9 (58, 0, 51) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 32 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF FRTYP=2 THEN DO; ┆
0x5bea9…5bec9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bec9…5bed8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bed8…5bef8 (58, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 54 39 3d 27 20 20 20 20 20 20 20 20 10 27 3b 20 20 20 20 20 20 ┆ T9=' '; ┆
0x5bef8…5bf18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bf18…5bf27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bf27…5bf47 (58, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 39 2c 33 2c 36 29 3d 50 44 41 54 55 4d ┆ SUBSTR(T9,3,6)=PDATUM┆
0x5bf47…5bf67 46 2b 37 38 30 30 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆F+780000; ┆
0x5bf67…5bf76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bf76…5bf96 (58, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 54 39 2c 39 29 3b 20 20 20 ┆ CALL TYPIST(T9,9); ┆
0x5bf96…5bfb6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bfb6…5bfc5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5bfc5…5bfe5 (58, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5bfe5…5c005 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c005…5c014 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c014…5c034 (58, 0, 56) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5c034…5c054 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c054…5c063 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c063…5c083 (58, 0, 57) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 33 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF FRTYP=3 THEN DO; ┆
0x5c083…5c0a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c0a3…5c0b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c0b2…5c0d2 (58, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 4b 54 4b 4f 4e 54 3e 41 4e 54 4b 4f 4e 54 20 54 48 ┆ IF AKTKONT>ANTKONT TH┆
0x5c0d2…5c0f2 45 4e 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN RETURN; ┆
0x5c0f2…5c101 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c101…5c121 (58, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 3b 20 20 20 20 20 20 20 20 20 ┆ CALL BELRED; ┆
0x5c121…5c141 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c141…5c150 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c150…5c170 (58, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 54 31 36 3d 52 42 45 4c 4f 50 50 20 43 41 54 20 27 10 27 3b 20 ┆ T16=RBELOPP CAT ' '; ┆
0x5c170…5c190 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c190…5c19f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c19f…5c1bf (58, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 54 31 36 2c 31 36 29 3b 20 ┆ CALL TYPIST(T16,16); ┆
0x5c1bf…5c1df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c1df…5c1ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c1ee…5c20e (58, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5c20e…5c22e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c22e…5c23d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c23d…5c25d (58, 0, 63) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5c25d…5c27d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c27d…5c28c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c28c…5c2ac (58, 0, 64) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 46 45 4c 20 46 52 54 59 50 ┆ PUT SKIP LIST('FEL FRTYP┆
0x5c2ac…5c2cc 27 2c 46 52 54 59 50 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆',FRTYP); ┆
0x5c2cc…5c2db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c2db…5c2fb (58, 0, 65) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5c2fb…5c31b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c31b…5c32a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c32a…5c34a (58, 0, 66) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x5c34a…5c36a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c36a…5c379 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c379…5c3c8 (58, 0, 67) 0x20[0x4f]
0x5c3c8…5c3e8 (58, 0, 68) 50 4f 53 54 46 4c 59 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆POSTFLYT:PROC; ┆
0x5c3e8…5c408 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c408…5c417 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c417…5c437 (58, 0, 69) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3d 42 41 53 3b 20 20 20 ┆ UNSPEC(TRANSFIL)=BAS; ┆
0x5c437…5c457 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c457…5c466 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c466…5c486 (58, 0, 70) 20 20 20 20 20 20 20 20 4a 3d 4a 2d 49 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J-I; ┆
0x5c486…5c4a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c4a6…5c4b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c4b5…5c4d5 (58, 0, 71) 20 20 20 20 20 20 20 20 49 46 20 4c 20 3d 20 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 50 46 55 54 ┆ IF L = 0 THEN GO TO PFUT┆
0x5c4d5…5c4f5 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x5c4f5…5c504 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c504…5c524 (58, 0, 72) 20 20 20 20 20 20 20 20 49 46 20 52 45 4b 54 4f 54 20 2d 20 41 52 45 43 20 3d 20 57 41 4e 54 4b ┆ IF REKTOT - AREC = WANTK┆
0x5c524…5c544 4f 4e 54 20 54 48 45 4e 20 47 4f 20 54 4f 20 50 46 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ONT THEN GO TO PFUT; ┆
0x5c544…5c553 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c553…5c573 (58, 0, 73) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 54 52 41 4e 53 46 49 4c 2c 44 55 4d 4d 59 2c 49 ┆ CALL RD(TRANSFIL,DUMMY,I┆
0x5c573…5c593 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,RCODE); ┆
0x5c593…5c5a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c5a2…5c5c2 (58, 0, 74) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 ┆ IF RCODE =0 THEN PUT SKI┆
0x5c5c2…5c5e2 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 50 4f 53 54 46 4c 59 54 2d 49 4e 27 2c 4f 4e ┆P LIST('LÄSFEL I POSTFLYT-IN',ON┆
0x5c5e2…5c5f1 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 ┆CODE); ┆
0x5c5f1…5c611 (58, 0, 75) 50 46 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PFUT: ┆
0x5c611…5c631 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c631…5c640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c640…5c660 (58, 0, 76) 20 20 20 20 20 20 20 20 49 46 20 52 45 4b 54 4f 54 20 2d 20 41 52 45 43 20 3d 20 57 41 4e 54 4b ┆ IF REKTOT - AREC = WANTK┆
0x5c660…5c680 4f 4e 54 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ONT THEN DO; ┆
0x5c680…5c68f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c68f…5c6af (58, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 42 41 53 20 3d 20 41 52 45 43 3b 20 20 20 20 20 20 20 20 20 ┆ BAS = AREC; ┆
0x5c6af…5c6cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c6cf…5c6de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c6de…5c6fe (58, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 41 44 44 4b 4f 4e 54 20 3d 20 30 3b 20 20 20 20 20 20 20 20 ┆ ADDKONT = 0; ┆
0x5c6fe…5c71e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c71e…5c72d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c72d…5c74d (58, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 49 20 3d 20 41 4e 54 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 ┆ I = ANTKONT; ┆
0x5c74d…5c76d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c76d…5c77c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c77c…5c79c (58, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5c79c…5c7bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c7bc…5c7cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c7cb…5c7eb (58, 0, 81) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3d 42 41 53 2b 41 44 44 ┆ UNSPEC(TRANSFIL)=BAS+ADD┆
0x5c7eb…5c80b 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONT; ┆
0x5c80b…5c81a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c81a…5c83a (59, 0, 0) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 57 52 28 54 52 41 4e 53 46 49 4c 2c 44 55 4d 4d 59 2c 49 ┆ CALL WR(TRANSFIL,DUMMY,I┆
0x5c83a…5c85a 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,RCODE); ┆
0x5c85a…5c869 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c869…5c889 (59, 0, 1) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 ┆ IF RCODE =0 THEN PUT SKI┆
0x5c889…5c8a9 50 20 4c 49 53 54 28 27 53 4b 52 49 56 46 45 4c 20 49 20 50 4f 53 54 46 4c 59 54 2d 55 54 27 2c ┆P LIST('SKRIVFEL I POSTFLYT-UT',┆
0x5c8a9…5c8b8 4f 4e 43 4f 44 45 29 3b 20 20 20 20 20 20 20 ┆ONCODE); ┆
0x5c8b8…5c8d8 (59, 0, 2) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5c8d8…5c8f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c8f8…5c907 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c907…5c927 (59, 0, 3) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x5c927…5c947 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c947…5c956 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c956…5c9a5 (59, 0, 4) 0x20[0x4f]
0x5c9a5…5c9c5 (59, 0, 5) 46 49 4c 49 4e 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FILIN:PROC; ┆
0x5c9c5…5c9e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c9e5…5c9f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5c9f4…5ca14 (59, 0, 6) 20 20 20 20 20 20 20 20 4a 3d 52 45 4b 54 4f 54 2d 41 52 45 43 2d 41 4e 54 4b 4f 4e 54 2b 41 44 ┆ J=REKTOT-AREC-ANTKONT+AD┆
0x5ca14…5ca34 44 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DKONT; ┆
0x5ca34…5ca43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ca43…5ca63 (59, 0, 7) 20 20 20 20 20 20 20 20 4c 20 3d 20 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ L = J; ┆
0x5ca63…5ca83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ca83…5ca92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ca92…5cab2 (59, 0, 8) 20 20 20 20 20 20 20 20 49 46 20 4c 20 3d 20 30 20 54 48 45 4e 20 4a 20 3d 20 41 44 44 4b 4f 4e ┆ IF L = 0 THEN J = ADDKON┆
0x5cab2…5cad2 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T; ┆
0x5cad2…5cae1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cae1…5cb01 (59, 0, 9) 20 20 20 20 20 20 20 20 4b 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=0; ┆
0x5cb01…5cb21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cb21…5cb30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cb30…5cb50 (59, 0, 10) 20 20 20 20 20 20 20 20 42 41 53 3d 52 45 4b 54 4f 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BAS=REKTOT; ┆
0x5cb50…5cb70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cb70…5cb7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cb7f…5cb9f (59, 0, 11) 46 31 3a 20 20 20 20 20 49 3d 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆F1: I=J; ┆
0x5cb9f…5cbbf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cbbf…5cbce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cbce…5cbee (59, 0, 12) 20 20 20 20 20 20 20 20 49 46 20 49 3e 31 30 30 20 54 48 45 4e 20 49 3d 31 30 30 3b 20 20 20 20 ┆ IF I>100 THEN I=100; ┆
0x5cbee…5cc0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cc0e…5cc1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cc1d…5cc3d (59, 0, 13) 20 20 20 20 20 20 20 20 42 41 53 3d 42 41 53 2d 49 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BAS=BAS-I; ┆
0x5cc3d…5cc5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cc5d…5cc6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cc6c…5cc8c (59, 0, 14) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 46 4c 59 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL POSTFLYT; ┆
0x5cc8c…5ccac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ccac…5ccbb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ccbb…5ccdb (59, 0, 15) 20 20 20 20 20 20 20 20 49 46 20 4b 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF K=0 THEN DO; ┆
0x5ccdb…5ccfb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ccfb…5cd0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cd0a…5cd2a (59, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 ┆ CLOSE TRANSFIL; ┆
0x5cd2a…5cd4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cd4a…5cd59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cd59…5cd79 (59, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 ┆ OPEN TRANSFIL; ┆
0x5cd79…5cd99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cd99…5cda8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cda8…5cdc8 (59, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 4b 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=1; ┆
0x5cdc8…5cde8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cde8…5cdf7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cdf7…5ce17 (59, 0, 19) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5ce17…5ce37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ce37…5ce46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ce46…5ce66 (59, 0, 20) 20 20 20 20 20 20 20 20 49 46 20 4a 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 31 3b 20 20 ┆ IF J =0 THEN GO TO F1; ┆
0x5ce66…5ce86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ce86…5ce95 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ce95…5ceb5 (59, 0, 21) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN TRANSFIL; ┆
0x5ceb5…5ced5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ced5…5cee4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cee4…5cf04 (59, 0, 22) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 54 52 41 4e 53 46 49 4c 29 3b 20 20 20 20 ┆ CALL SEOF(TRANSFIL); ┆
0x5cf04…5cf24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cf24…5cf33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cf33…5cf53 (59, 0, 23) 20 20 20 20 20 20 20 20 52 45 4b 54 4f 54 3d 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3b ┆ REKTOT=UNSPEC(TRANSFIL);┆
0x5cf53…5cf73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cf73…5cf82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cf82…5cfa2 (59, 0, 24) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5cfa2…5cfc2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cfc2…5cfd1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5cfd1…5cff1 (59, 0, 25) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x5cff1…5d011 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d011…5d020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d020…5d06f (59, 0, 26) 0x20[0x4f]
0x5d06f…5d08f (59, 0, 27) 46 49 4c 55 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FILUT:PROC; ┆
0x5d08f…5d0af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d0af…5d0be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d0be…5d0de (59, 0, 28) 20 20 20 20 20 20 20 20 42 41 53 3d 41 52 45 43 2b 41 4e 54 4b 4f 4e 54 2d 41 44 44 4b 4f 4e 54 ┆ BAS=AREC+ANTKONT-ADDKONT┆
0x5d0de…5d0fe 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x5d0fe…5d10d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d10d…5d12d (59, 0, 29) 20 20 20 20 20 20 20 20 4a 3d 52 45 4b 54 4f 54 2d 42 41 53 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ J=REKTOT-BAS; ┆
0x5d12d…5d14d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d14d…5d15c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d15c…5d17c (59, 0, 30) 20 20 20 20 20 20 20 20 4b 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=1; ┆
0x5d17c…5d19c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d19c…5d1ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d1ab…5d1cb (59, 0, 31) 46 32 3a 20 20 20 20 20 49 3d 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆F2: I=J; ┆
0x5d1cb…5d1eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d1eb…5d1fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d1fa…5d21a (59, 0, 32) 20 20 20 20 20 20 20 20 49 46 20 49 3e 31 30 30 20 54 48 45 4e 20 49 3d 31 30 30 3b 20 20 20 20 ┆ IF I>100 THEN I=100; ┆
0x5d21a…5d23a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d23a…5d249 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d249…5d269 (59, 0, 33) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 46 4c 59 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL POSTFLYT; ┆
0x5d269…5d289 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d289…5d298 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d298…5d2b8 (59, 0, 34) 20 20 20 20 20 20 20 20 42 41 53 3d 42 41 53 2b 49 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BAS=BAS+I; ┆
0x5d2b8…5d2d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d2d8…5d2e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d2e7…5d307 (59, 0, 35) 20 20 20 20 20 20 20 20 49 46 20 20 4a 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 32 3b 20 ┆ IF J =0 THEN GO TO F2; ┆
0x5d307…5d327 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d327…5d336 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d336…5d356 (59, 0, 36) 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 20 20 ┆ CLOSE TRANSFIL; ┆
0x5d356…5d376 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d376…5d385 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d385…5d3a5 (59, 0, 37) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN TRANSFIL; ┆
0x5d3a5…5d3c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d3c5…5d3d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d3d4…5d3f4 (59, 0, 38) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 54 52 41 4e 53 46 49 4c 29 3b 20 20 20 20 ┆ CALL SEOF(TRANSFIL); ┆
0x5d3f4…5d414 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d414…5d423 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d423…5d443 (59, 0, 39) 20 20 20 20 20 20 20 20 52 45 4b 54 4f 54 3d 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3b ┆ REKTOT=UNSPEC(TRANSFIL);┆
0x5d443…5d463 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d463…5d472 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d472…5d492 (59, 0, 40) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x5d492…5d4b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d4b2…5d4c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d4c1…5d4e1 (59, 0, 41) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x5d4e1…5d501 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d501…5d510 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d510…5d55f (59, 0, 42) 0x20[0x4f]
0x5d55f…5d57f (59, 0, 43) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 54 41 52 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO START; ┆
0x5d57f…5d59f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d59f…5d5ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d5ae…5d5fd (59, 0, 44) 0x20[0x4f]
0x5d5fd…5d61d (59, 0, 45) 53 56 41 52 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SVAR: ┆
0x5d61d…5d63d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d63d…5d64c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d64c…5d66c (59, 0, 46) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF FRTYP=1 THEN DO; ┆
0x5d66c…5d68c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d68c…5d69b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d69b…5d6bb (59, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 35 20 54 48 45 4e 20 4b 4f 4e 54 4f 3d ┆ IF KEYT=5 THEN KONTO=┆
0x5d6bb…5d6db 46 49 52 4d 41 2a 31 30 30 30 30 30 30 30 30 30 30 2b 30 33 31 31 30 30 30 30 30 30 3b 20 20 20 ┆FIRMA*10000000000+0311000000; ┆
0x5d6db…5d6ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d6ea…5d70a (59, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 36 20 54 48 45 4e 20 4b 4f 4e 54 4f 3d ┆ IF KEYT=6 THEN KONTO=┆
0x5d70a…5d72a 46 49 52 4d 41 2a 31 30 30 30 30 30 30 30 30 30 30 2b 30 30 31 31 30 30 30 30 30 30 3b 20 20 20 ┆FIRMA*10000000000+0011000000; ┆
0x5d72a…5d739 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d739…5d759 (59, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4b 45 59 54 3d 35 29 20 7c 20 28 4b 45 59 54 3d 36 ┆ IF (KEYT=5) ö (KEYT=6┆
0x5d759…5d779 29 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) THEN GO TO S1; ┆
0x5d779…5d788 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d788…5d7a8 (59, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=1; ┆
0x5d7a8…5d7c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d7c8…5d7d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d7d7…5d7f7 (59, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 42 55 46 46 2c 31 2c 32 29 3d 27 ┆ IF SUBSTR(BUFF,1,2)='┆
0x5d7f7…5d817 20 20 27 20 54 48 45 4e 20 4a 3d 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ' THEN J=3; ┆
0x5d817…5d826 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d826…5d846 (59, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 53 55 42 53 54 52 28 42 55 46 46 2c 4a 2c 35 ┆ KONTO=SUBSTR(BUFF,J,5┆
0x5d846…5d866 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x5d866…5d875 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d875…5d895 (59, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 4b 4f 4e 54 4f 2a 31 30 30 30 3b 20 20 20 20 ┆ KONTO=KONTO*1000; ┆
0x5d895…5d8b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d8b5…5d8c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d8c4…5d8e4 (59, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 38 39 27 ┆ IF INDEX('0123456789'┆
0x5d8e4…5d904 2c 53 55 42 53 54 52 28 42 55 46 46 2c 4a 2b 36 2c 31 29 29 7f 3d 30 20 54 48 45 4e 20 44 4f 3b ┆,SUBSTR(BUFF,J+6,1)) =0 THEN DO;┆
0x5d904…5d913 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d913…5d933 (59, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 4b 4f 4e 54 4f 2b 53 55 42 53 54 52 ┆ KONTO=KONTO+SUBSTR┆
0x5d933…5d953 28 42 55 46 46 2c 4a 2b 36 2c 33 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(BUFF,J+6,3); ┆
0x5d953…5d962 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d962…5d982 (59, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 3d 4a 2b 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J+3; ┆
0x5d982…5d9a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d9a2…5d9b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d9b1…5d9d1 (59, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5d9d1…5d9f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5d9f1…5da00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5da00…5da20 (59, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 42 55 46 46 2c 4a 2b 36 2c 31 29 ┆ IF SUBSTR(BUFF,J+6,1)┆
0x5da20…5da40 3d 27 2d 27 20 54 48 45 4e 20 4a 3d 4a 2b 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆='-' THEN J=J+3; ┆
0x5da40…5da4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5da4f…5da6f (59, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 4b 4f 4e 54 4f 2a 31 30 30 30 3b 20 20 20 20 ┆ KONTO=KONTO*1000; ┆
0x5da6f…5da8f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5da8f…5da9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5da9e…5dabe (59, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 38 39 27 ┆ IF INDEX('0123456789'┆
0x5dabe…5dade 2c 53 55 42 53 54 52 28 42 55 46 46 2c 4a 2b 37 2c 31 29 29 7f 3d 30 20 54 48 45 4e 20 44 4f 3b ┆,SUBSTR(BUFF,J+7,1)) =0 THEN DO;┆
0x5dade…5daed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5daed…5db0d (59, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 4b 4f 4e 54 4f 2b 53 55 42 53 54 52 ┆ KONTO=KONTO+SUBSTR┆
0x5db0d…5db2d 28 42 55 46 46 2c 4a 2b 37 2c 33 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(BUFF,J+7,3); ┆
0x5db2d…5db3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5db3c…5db5c (59, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5db5c…5db7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5db7c…5db8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5db8b…5dbab (59, 0, 63) 53 31 3a 20 20 20 20 20 20 20 20 54 54 31 31 3d 4b 4f 4e 54 4f 3b 20 20 20 20 20 20 20 20 20 20 ┆S1: TT11=KONTO; ┆
0x5dbab…5dbcb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dbcb…5dbda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dbda…5dbfa (59, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 54 54 31 31 2c 31 2c 31 29 7f 3d ┆ IF SUBSTR(TT11,1,1) =┆
0x5dbfa…5dc1a 46 49 52 4d 41 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆FIRMA THEN GO TO L3; ┆
0x5dc1a…5dc29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dc29…5dc49 (59, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 46 7f 3d 4b 4f 4e 54 4f 20 54 48 45 4e ┆ IF KONTOF =KONTO THEN┆
0x5dc49…5dc69 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x5dc69…5dc78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dc78…5dc98 (59, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 43 4b 32 3d 41 43 4b 32 2d 4b 4f 4e 54 4f 46 2b 4b ┆ ACK2=ACK2-KONTOF+K┆
0x5dc98…5dcb8 4f 4e 54 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ONTO; ┆
0x5dcb8…5dcc7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dcc7…5dce7 (59, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 46 3d 4b 4f 4e 54 4f 3b 20 20 20 20 20 ┆ KONTOF=KONTO; ┆
0x5dce7…5dd07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dd07…5dd16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dd16…5dd36 (59, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 ┆ WFLAGG=1; ┆
0x5dd36…5dd56 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dd56…5dd65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dd65…5dd85 (59, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5dd85…5dda5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dda5…5ddb4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ddb4…5ddd4 (59, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 52 45 44 3b 20 20 20 20 20 20 20 ┆ CALL KONTORED; ┆
0x5ddd4…5ddf4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ddf4…5de03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5de03…5de23 (59, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 52 4b 4f 4e ┆ PUT FILE(D) EDIT(RKON┆
0x5de23…5de43 54 4f 29 28 41 28 31 35 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO)(A(15)); ┆
0x5de43…5de52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5de52…5de72 (59, 0, 72) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5de72…5de92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5de92…5dea1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dea1…5dec1 (59, 0, 73) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 32 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF FRTYP=2 THEN DO; ┆
0x5dec1…5dee1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dee1…5def0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5def0…5df10 (59, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 42 55 46 46 2c 31 2c 32 29 7f 3d ┆ IF SUBSTR(BUFF,1,2) =┆
0x5df10…5df30 27 20 20 27 20 54 48 45 4e 20 4a 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆' ' THEN J=1; ┆
0x5df30…5df3f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5df3f…5df5f (59, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 4a 3d 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE J=3; ┆
0x5df5f…5df7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5df7f…5df8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5df8e…5dfae (59, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 46 58 36 3d 53 55 42 53 54 52 28 42 55 46 46 2c 4a 2c 36 29 3b ┆ FX6=SUBSTR(BUFF,J,6);┆
0x5dfae…5dfce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dfce…5dfdd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5dfdd…5dffd (59, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 58 36 3c 37 30 30 30 30 30 20 7c 20 46 58 36 3e 39 ┆ IF FX6<700000 ö FX6>9┆
0x5dffd…5e01d 39 30 30 30 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆90000 THEN GO TO S3; ┆
0x5e01d…5e02c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e02c…5e04c (59, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 44 41 54 4b 4f 4c 4c 20 3d 20 4a 3b 20 20 20 20 20 20 20 20 20 ┆ DATKOLL = J; ┆
0x5e04c…5e06c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e06c…5e07b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e07b…5e09b (59, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 42 55 46 46 2c 44 41 54 4b 4f ┆ IF SUBSTR (BUFF,DATKO┆
0x5e09b…5e0bb 4c 4c 2c 32 29 20 3e 20 50 45 52 41 52 4d 41 58 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 33 3b 20 ┆LL,2) > PERARMAX THEN GO TO S3; ┆
0x5e0bb…5e0ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e0ca…5e0ea (59, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 42 55 46 46 2c 44 41 54 4b 4f ┆ IF SUBSTR (BUFF,DATKO┆
0x5e0ea…5e10a 4c 4c 2c 32 29 20 3c 20 50 45 52 41 52 4d 49 4e 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 33 3b 20 ┆LL,2) < PERARMIN THEN GO TO S3; ┆
0x5e10a…5e119 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e119…5e139 (59, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 42 55 46 46 2c 44 41 54 4b 4f ┆ IF SUBSTR (BUFF,DATKO┆
0x5e139…5e159 4c 4c 2b 32 2c 32 29 20 3e 20 27 31 32 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 33 3b 20 20 20 ┆LL+2,2) > '12' THEN GO TO S3; ┆
0x5e159…5e168 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e168…5e188 (60, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 42 55 46 46 2c 44 41 54 4b 4f ┆ IF SUBSTR (BUFF,DATKO┆
0x5e188…5e1a8 4c 4c 2b 32 2c 32 29 20 3c 20 27 30 31 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 33 3b 20 20 20 ┆LL+2,2) < '01' THEN GO TO S3; ┆
0x5e1a8…5e1b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e1b7…5e1d7 (60, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 42 55 46 46 2c 44 41 54 4b 4f ┆ IF SUBSTR (BUFF,DATKO┆
0x5e1d7…5e1f7 4c 4c 2b 34 2c 32 29 20 3e 20 27 33 31 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 33 3b 20 20 20 ┆LL+4,2) > '31' THEN GO TO S3; ┆
0x5e1f7…5e206 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e206…5e226 (60, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 20 28 42 55 46 46 2c 44 41 54 4b 4f ┆ IF SUBSTR (BUFF,DATKO┆
0x5e226…5e246 4c 4c 2b 34 2c 32 29 20 3c 20 27 30 31 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 33 3b 20 20 20 ┆LL+4,2) < '01' THEN GO TO S3; ┆
0x5e246…5e255 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e255…5e275 (60, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 46 58 36 29 ┆ PUT FILE(D) EDIT(FX6)┆
0x5e275…5e295 28 50 50 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(PP1); ┆
0x5e295…5e2a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e2a4…5e2c4 (60, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 50 44 41 54 55 4d 3d 46 58 36 2d 37 38 30 30 30 30 3b 20 20 20 ┆ PDATUM=FX6-780000; ┆
0x5e2c4…5e2e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e2e4…5e2f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e2f3…5e313 (60, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 50 44 41 54 55 4d 7f 3d 50 44 41 54 55 4d 46 20 54 48 ┆ IF PDATUM =PDATUMF TH┆
0x5e313…5e333 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN DO; ┆
0x5e333…5e342 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e342…5e362 (60, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 44 41 54 55 4d 46 3d 50 44 41 54 55 4d 3b 20 20 20 ┆ PDATUMF=PDATUM; ┆
0x5e362…5e382 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e382…5e391 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e391…5e3b1 (60, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 ┆ WFLAGG=1; ┆
0x5e3b1…5e3d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e3d1…5e3e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e3e0…5e400 (60, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5e400…5e420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e420…5e42f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e42f…5e44f (60, 0, 9) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5e44f…5e46f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e46f…5e47e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e47e…5e49e (60, 0, 10) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 33 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF FRTYP=3 THEN DO; ┆
0x5e49e…5e4be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e4be…5e4cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e4cd…5e4ed (60, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 7f 3d 31 33 38 20 26 20 4b 45 59 54 7f 3d ┆ IF KEYT =138 & KEYT =┆
0x5e4ed…5e50d 31 33 39 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆139 THEN DO; ┆
0x5e50d…5e51c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e51c…5e53c (60, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 45 4c 4f 50 50 3d 42 45 4c 4f 50 50 46 3b 20 20 20 ┆ BELOPP=BELOPPF; ┆
0x5e53c…5e55c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e55c…5e56b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e56b…5e58b (60, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 32 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO S2; ┆
0x5e58b…5e5ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e5ab…5e5ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e5ba…5e5da (60, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5e5da…5e5fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e5fa…5e609 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e609…5e629 (60, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 42 55 46 46 2c 31 32 2c 31 29 3d ┆ IF SUBSTR(BUFF,12,1)=┆
0x5e629…5e649 27 3a 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆':' THEN DO; ┆
0x5e649…5e658 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e658…5e678 (60, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 42 55 46 46 2c 31 33 2c ┆ IF SUBSTR(BUFF,13,┆
0x5e678…5e698 31 29 3d 27 2d 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1)='-' THEN DO; ┆
0x5e698…5e6a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e6a7…5e6c7 (60, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 42 55 46 46 2c 31 32 2c ┆ SUBSTR(BUFF,12,┆
0x5e6c7…5e6e7 32 29 3d 27 30 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2)='00'; ┆
0x5e6e7…5e6f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e6f6…5e716 (60, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5e716…5e736 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e736…5e745 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e745…5e765 (60, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x5e765…5e785 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e785…5e794 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e794…5e7b4 (60, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 32 3d 53 55 42 53 54 52 28 42 55 46 46 2c ┆ T2=SUBSTR(BUFF,┆
0x5e7b4…5e7d4 31 33 2c 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆13,2); ┆
0x5e7d4…5e7e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e7e3…5e803 (60, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 42 55 46 46 2c 31 32 2c ┆ SUBSTR(BUFF,12,┆
0x5e803…5e823 32 29 3d 54 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2)=T2; ┆
0x5e823…5e832 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e832…5e852 (60, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 42 55 46 46 2c 31 34 2c ┆ SUBSTR(BUFF,14,┆
0x5e852…5e872 32 29 3d 27 20 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2)=' '; ┆
0x5e872…5e881 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e881…5e8a1 (60, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5e8a1…5e8c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e8c1…5e8d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e8d0…5e8f0 (60, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5e8f0…5e910 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e910…5e91f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e91f…5e93f (60, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 42 45 4c 4f 50 50 3d 42 55 46 46 3b 20 20 20 20 20 20 20 20 20 ┆ BELOPP=BUFF; ┆
0x5e93f…5e95f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e95f…5e96e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e96e…5e98e (60, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 31 33 38 20 26 20 42 45 4c 4f 50 50 3e ┆ IF KEYT=138 & BELOPP>┆
0x5e98e…5e9ae 30 20 54 48 45 4e 20 42 45 4c 4f 50 50 3d 2d 42 45 4c 4f 50 50 3b 20 20 20 20 20 20 20 20 20 20 ┆0 THEN BELOPP=-BELOPP; ┆
0x5e9ae…5e9bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5e9bd…5e9dd (60, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 31 33 39 20 26 20 42 45 4c 4f 50 50 3c ┆ IF KEYT=139 & BELOPP<┆
0x5e9dd…5e9fd 30 20 54 48 45 4e 20 42 45 4c 4f 50 50 3d 2d 42 45 4c 4f 50 50 3b 20 20 20 20 20 20 20 20 20 20 ┆0 THEN BELOPP=-BELOPP; ┆
0x5e9fd…5ea0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ea0c…5ea2c (60, 0, 28) 53 32 3a 20 20 20 20 20 20 20 20 49 46 20 42 45 4c 4f 50 50 7f 3d 42 45 4c 4f 50 50 46 20 54 48 ┆S2: IF BELOPP =BELOPPF TH┆
0x5ea2c…5ea4c 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN DO; ┆
0x5ea4c…5ea5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ea5b…5ea7b (60, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 43 4b 31 3d 41 43 4b 31 2d 42 45 4c 4f 50 50 46 2b ┆ ACK1=ACK1-BELOPPF+┆
0x5ea7b…5ea9b 42 45 4c 4f 50 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆BELOPP; ┆
0x5ea9b…5eaaa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5eaaa…5eaca (60, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 3d 33 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=34; ┆
0x5eaca…5eaea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5eaea…5eaf9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5eaf9…5eb19 (60, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 ┆ CALL MOVEBUFF(J); ┆
0x5eb19…5eb39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5eb39…5eb48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5eb48…5eb68 (60, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 41 ┆ PUT FILE(D) EDIT(A┆
0x5eb68…5eb88 43 4b 31 29 28 50 50 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CK1)(PP2); ┆
0x5eb88…5eb97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5eb97…5ebb7 (60, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 ┆ CALL MOVEBUFF(J); ┆
0x5ebb7…5ebd7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ebd7…5ebe6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ebe6…5ec06 (60, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 45 4c 4f 50 50 46 3d 42 45 4c 4f 50 50 3b 20 20 20 ┆ BELOPPF=BELOPP; ┆
0x5ec06…5ec26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ec26…5ec35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ec35…5ec55 (60, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 ┆ WFLAGG=1; ┆
0x5ec55…5ec75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ec75…5ec84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ec84…5eca4 (60, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5eca4…5ecc4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ecc4…5ecd3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ecd3…5ecf3 (60, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 3b 20 20 20 20 20 20 20 20 20 ┆ CALL BELRED; ┆
0x5ecf3…5ed13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ed13…5ed22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ed22…5ed42 (60, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 52 42 45 4c ┆ PUT FILE(D) EDIT(RBEL┆
0x5ed42…5ed62 4f 50 50 29 28 41 28 32 34 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OPP)(A(24)); ┆
0x5ed62…5ed71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ed71…5ed91 (60, 0, 39) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5ed91…5edb1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5edb1…5edc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5edc0…5ede0 (60, 0, 40) 20 20 20 20 20 20 20 20 46 52 54 59 50 3d 46 52 54 59 50 2b 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ FRTYP=FRTYP+1; ┆
0x5ede0…5ee00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ee00…5ee0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ee0f…5ee2f (60, 0, 41) 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 34 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF FRTYP=4 THEN DO; ┆
0x5ee2f…5ee4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ee4f…5ee5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ee5e…5ee7e (60, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 41 4b 54 4b 4f 4e 54 3d 41 4b 54 4b 4f 4e 54 2b 31 3b 20 20 20 ┆ AKTKONT=AKTKONT+1; ┆
0x5ee7e…5ee9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ee9e…5eead 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5eead…5eecd (60, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 4b 54 4b 4f 4e 54 3e 41 4e 54 4b 4f 4e 54 2b 31 20 ┆ IF AKTKONT>ANTKONT+1 ┆
0x5eecd…5eeed 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN DO; ┆
0x5eeed…5eefc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5eefc…5ef1c (60, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 4b 4f 4e 54 3d 41 4e 54 4b 4f 4e 54 2b 31 3b ┆ ANTKONT=ANTKONT+1;┆
0x5ef1c…5ef3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ef3c…5ef4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ef4b…5ef6b (60, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 44 44 4b 4f 4e 54 3d 41 44 44 4b 4f 4e 54 2b 31 3b ┆ ADDKONT=ADDKONT+1;┆
0x5ef6b…5ef8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ef8b…5ef9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ef9a…5efba (60, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5efba…5efda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5efda…5efe9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5efe9…5f009 (60, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 44 52 41 44 3d 44 52 41 44 2b 31 3b 20 20 20 20 20 20 20 20 20 ┆ DRAD=DRAD+1; ┆
0x5f009…5f029 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f029…5f038 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f038…5f058 (60, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 52 41 44 3d 31 31 20 54 48 45 4e 20 44 4f 3b 20 20 ┆ IF DRAD=11 THEN DO; ┆
0x5f058…5f078 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f078…5f087 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f087…5f0a7 (60, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 49 53 50 50 55 54 3b 20 20 20 20 20 ┆ CALL DISPPUT; ┆
0x5f0a7…5f0c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f0c7…5f0d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f0d6…5f0f6 (60, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5f0f6…5f116 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f116…5f125 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f125…5f145 (60, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 46 52 54 59 50 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FRTYP=1; ┆
0x5f145…5f165 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f165…5f174 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f174…5f194 (60, 0, 52) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5f194…5f1b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f1b4…5f1c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f1c3…5f1e3 (60, 0, 53) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L3; ┆
0x5f1e3…5f203 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f203…5f212 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f212…5f232 (60, 0, 54) 53 33 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆S3: ┆
0x5f232…5f252 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f252…5f261 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f261…5f281 (60, 0, 55) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 20 28 31 2c 36 29 3b 20 20 20 20 20 20 ┆ CALL OUTPUT (1,6); ┆
0x5f281…5f2a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f2a1…5f2b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f2b0…5f2d0 (60, 0, 56) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L3; ┆
0x5f2d0…5f2f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f2f0…5f2ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f2ff…5f31f (60, 0, 57) 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UT: ┆
0x5f31f…5f33f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f33f…5f34e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f34e…5f36e (60, 0, 58) 20 20 20 20 20 20 20 20 49 46 20 41 4e 54 4b 4f 4e 54 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 ┆ IF ANTKONT=0 THEN GO TO ┆
0x5f36e…5f38e 4c 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L3; ┆
0x5f38e…5f39d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f39d…5f3bd (60, 0, 59) 20 20 20 20 20 20 20 20 4a 3d 34 37 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=47; ┆
0x5f3bd…5f3dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f3dd…5f3ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f3ec…5f40c (60, 0, 60) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x5f40c…5f42c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f42c…5f43b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f43b…5f45b (60, 0, 61) 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO J=1 TO 11; ┆
0x5f45b…5f47b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f47b…5f48a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f48a…5f4aa (60, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 20 27 29 ┆ PUT FILE(D) EDIT(' ')┆
0x5f4aa…5f4ca 28 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(A(47)); ┆
0x5f4ca…5f4d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f4d9…5f4f9 (60, 0, 63) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5f4f9…5f519 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f519…5f528 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f528…5f548 (60, 0, 64) 20 20 20 20 20 20 20 20 49 46 20 57 46 4c 41 47 47 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 55 ┆ IF WFLAGG=0 THEN GO TO U┆
0x5f548…5f568 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆0; ┆
0x5f568…5f577 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f577…5f597 (60, 0, 65) 20 20 20 20 20 20 20 20 4a 3d 39 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=94; ┆
0x5f597…5f5b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f5b7…5f5c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f5c6…5f5e6 (60, 0, 66) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x5f5e6…5f606 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f606…5f615 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f615…5f635 (60, 0, 67) 20 20 20 20 20 20 20 20 49 46 20 41 43 4b 31 7f 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF ACK1 =0 THEN DO; ┆
0x5f635…5f655 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f655…5f664 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f664…5f684 (60, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 20 20 44 ┆ PUT FILE(D) EDIT(' D┆
0x5f684…5f6a4 49 46 46 45 52 45 4e 53 27 29 28 41 28 32 33 29 29 28 41 43 4b 31 29 28 50 50 32 29 3b 20 20 20 ┆IFFERENS')(A(23))(ACK1)(PP2); ┆
0x5f6a4…5f6b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f6b3…5f6d3 (60, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x5f6d3…5f6f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f6f3…5f702 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f702…5f722 (60, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 ┆ GET SKIP LIST(''); ┆
0x5f722…5f742 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f742…5f751 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f751…5f771 (60, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 41 4b 54 4b 4f 4e 54 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ AKTKONT=1; ┆
0x5f771…5f791 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f791…5f7a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f7a0…5f7c0 (60, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 34 37 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=47; ┆
0x5f7c0…5f7e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f7e0…5f7ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f7ef…5f80f (60, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x5f80f…5f82f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f82f…5f83e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f83e…5f85e (60, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 20 20 4b ┆ PUT FILE(D) EDIT(' K┆
0x5f85e…5f87e 4f 4e 54 4f 20 55 4b 54 4f 20 4b 53 20 20 50 45 52 44 41 47 20 20 20 20 20 42 45 4c 4f 50 50 27 ┆ONTO UKTO KS PERDAG BELOPP'┆
0x5f87e…5f88d 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 ┆)(A); ┆
0x5f88d…5f8ad (60, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L2; ┆
0x5f8ad…5f8cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f8cd…5f8dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f8dc…5f8fc (60, 0, 76) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5f8fc…5f91c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f91c…5f92b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f92b…5f94b (60, 0, 77) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 20 20 4b 4f 4e 54 ┆ PUT FILE(D) EDIT(' KONT┆
0x5f94b…5f96b 4f 4e 55 4d 4d 45 52 53 55 4d 4d 41 27 29 28 41 28 32 33 29 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ONUMMERSUMMA')(A(23)); ┆
0x5f96b…5f97a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f97a…5f99a (60, 0, 78) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 46 58 31 33 29 3b 20 20 20 20 ┆ GET SKIP LIST(FX13); ┆
0x5f99a…5f9ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f9ba…5f9c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5f9c9…5f9e9 (60, 0, 79) 20 20 20 20 20 20 20 20 49 46 20 28 46 58 31 33 7f 3d 41 43 4b 32 29 20 26 20 28 46 58 31 33 7f ┆ IF (FX13 =ACK2) & (FX13 ┆
0x5f9e9…5fa09 3d 41 43 4b 32 2f 31 30 30 30 30 30 30 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆=ACK2/1000000) THEN DO; ┆
0x5fa09…5fa18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fa18…5fa38 (60, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 39 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=94; ┆
0x5fa38…5fa58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fa58…5fa67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fa67…5fa87 (60, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x5fa87…5faa7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5faa7…5fab6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fab6…5fad6 (61, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 20 20 4b ┆ PUT FILE(D) EDIT(' K┆
0x5fad6…5faf6 4f 4e 4f 54 4f 4e 55 4d 4d 45 52 53 55 4d 4d 45 52 49 4e 47 45 4e 20 53 54 5b 4d 4d 45 52 20 45 ┆ONOTONUMMERSUMMERINGEN STÄMMER E┆
0x5faf6…5fb05 4a 27 29 28 41 28 34 39 29 29 20 20 20 20 20 ┆J')(A(49)) ┆
0x5fb05…5fb25 (61, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 28 27 44 49 46 46 45 52 41 4e 53 3a 27 29 28 41 28 32 33 29 29 ┆ ('DIFFERANS:')(A(23))┆
0x5fb25…5fb45 28 46 58 31 33 2d 41 43 4b 32 29 28 50 50 33 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(FX13-ACK2)(PP3); ┆
0x5fb45…5fb54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fb54…5fb74 (61, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x5fb74…5fb94 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fb94…5fba3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fba3…5fbc3 (61, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 54 32 35 29 3b 20 20 ┆ GET SKIP LIST(T25); ┆
0x5fbc3…5fbe3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fbe3…5fbf2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fbf2…5fc12 (61, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 41 4b 54 4b 4f 4e 54 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ AKTKONT=1; ┆
0x5fc12…5fc32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fc32…5fc41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fc41…5fc61 (61, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 34 37 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=47; ┆
0x5fc61…5fc81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fc81…5fc90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fc90…5fcb0 (61, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x5fcb0…5fcd0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fcd0…5fcdf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fcdf…5fcff (61, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 20 20 4b ┆ PUT FILE(D) EDIT(' K┆
0x5fcff…5fd1f 4f 4e 54 4f 20 55 4b 54 4f 20 4b 53 20 20 50 45 52 44 41 42 20 20 20 20 20 42 45 4c 4f 50 50 27 ┆ONTO UKTO KS PERDAB BELOPP'┆
0x5fd1f…5fd2e 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 ┆)(A); ┆
0x5fd2e…5fd4e (61, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L2; ┆
0x5fd4e…5fd6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fd6e…5fd7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fd7d…5fd9d (61, 0, 9) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x5fd9d…5fdbd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fdbd…5fdcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fdcc…5fdec (61, 0, 10) 55 30 3a 20 20 20 20 20 4a 3d 36 38 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆U0: J=68; ┆
0x5fdec…5fe0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fe0c…5fe1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fe1b…5fe3b (61, 0, 11) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 28 4a 29 3b 20 20 20 20 20 20 20 ┆ CALL MOVEBUFF(J); ┆
0x5fe3b…5fe5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fe5b…5fe6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fe6a…5fe8a (61, 0, 12) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 27 0e 27 29 28 41 28 ┆ PUT FILE(D) EDIT(' ')(A(┆
0x5fe8a…5feaa 32 36 29 29 28 27 20 20 54 45 58 54 2e 27 29 28 41 28 39 29 29 3b 20 20 20 20 20 20 20 20 20 20 ┆26))(' TEXT.')(A(9)); ┆
0x5feaa…5feb9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5feb9…5fed9 (61, 0, 13) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 46 29 3d 50 41 52 45 41 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PF)=PAREA; ┆
0x5fed9…5fef9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fef9…5ff08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ff08…5ff28 (61, 0, 14) 20 20 20 20 20 20 20 20 49 46 20 41 52 45 43 3d 52 45 4b 54 4f 54 20 54 48 45 4e 20 54 45 58 54 ┆ IF AREC=REKTOT THEN TEXT┆
0x5ff28…5ff48 46 3d 27 20 20 20 20 20 20 20 20 20 20 20 20 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆F=' '; ┆
0x5ff48…5ff57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ff57…5ff77 (61, 0, 15) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 54 45 58 54 46 2c 31 33 29 3b 20 20 ┆ CALL TYPIST(TEXTF,13); ┆
0x5ff77…5ff97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ff97…5ffa6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ffa6…5ffc6 (61, 0, 16) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 27 10 27 2c 31 29 3b 20 20 20 20 20 ┆ CALL TYPIST(' ',1); ┆
0x5ffc6…5ffe6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5ffe6…5fff5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x5fff5…60015 (61, 0, 17) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 43 4f 52 45 44 28 30 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL CORED(0); ┆
0x60015…60035 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60035…60044 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60044…60064 (61, 0, 18) 55 31 3a 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 54 32 35 29 3b 20 20 20 20 20 ┆U1: GET SKIP LIST(T25); ┆
0x60064…60084 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60084…60093 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60093…600b3 (61, 0, 19) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 32 35 20 54 4f 20 31 34 20 42 59 20 2d 31 3b 20 20 20 20 ┆ DO I=25 TO 14 BY -1; ┆
0x600b3…600d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x600d3…600e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x600e2…60102 (61, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 54 32 35 2c 49 2c 31 29 7f 3d 27 ┆ IF SUBSTR(T25,I,1) ='┆
0x60102…60122 20 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ' THEN DO; ┆
0x60122…60131 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60131…60151 (61, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 54 32 35 2c 32 35 ┆ CALL TYPIST(T25,25┆
0x60151…60171 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x60171…60180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60180…601a0 (61, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 59 50 49 53 54 28 27 10 27 2c 31 29 ┆ CALL TYPIST(' ',1)┆
0x601a0…601c0 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x601c0…601cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x601cf…601ef (61, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 ┆ CALL OUTPUT(1,6); ┆
0x601ef…6020f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6020f…6021e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6021e…6023e (61, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 55 31 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO U1; ┆
0x6023e…6025e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6025e…6026d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6026d…6028d (61, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6028d…602ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x602ad…602bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x602bc…602dc (61, 0, 26) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x602dc…602fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x602fc…6030b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6030b…6032b (61, 0, 27) 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 54 32 35 2c 31 2c 31 33 29 3d 27 20 20 20 ┆ IF SUBSTR(T25,1,13)=' ┆
0x6032b…6034b 20 20 20 20 20 20 20 20 20 20 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ' THEN DO; ┆
0x6034b…6035a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6035a…6037a (61, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x6037a…6039a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6039a…603a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x603a9…603c9 (61, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 55 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO U1; ┆
0x603c9…603e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x603e9…603f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x603f8…60418 (61, 0, 30) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x60418…60438 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60438…60447 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60447…60467 (61, 0, 31) 20 20 20 20 20 20 20 20 49 46 20 28 53 55 42 53 54 52 28 54 32 35 2c 31 2c 31 33 29 3d 54 45 58 ┆ IF (SUBSTR(T25,1,13)=TEX┆
0x60467…60487 54 46 29 20 26 20 28 57 46 4c 41 47 47 3d 30 29 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 31 3b 20 ┆TF) & (WFLAGG=0) THEN GO TO L1; ┆
0x60487…60496 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60496…604b6 (61, 0, 32) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 41 4e 54 4b 4f 4e 54 3b 20 20 20 20 20 20 ┆ DO I=1 TO ANTKONT; ┆
0x604b6…604d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x604d6…604e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x604e5…60505 (61, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 46 29 3d 50 41 52 45 41 2b 28 49 2d 31 ┆ UNSPEC(PF)=PAREA+(I-1┆
0x60505…60525 29 2a 52 45 43 4c 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)*RECLN; ┆
0x60525…60534 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60534…60554 (61, 0, 34) 20 20 20 20 20 20 20 20 20 20 54 45 58 54 46 3d 53 55 42 53 54 52 28 54 32 35 2c 31 2c 31 33 29 ┆ TEXTF=SUBSTR(T25,1,13)┆
0x60554…60574 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x60574…60583 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60583…605a3 (61, 0, 35) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x605a3…605c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x605c3…605d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x605d2…605f2 (61, 0, 36) 20 20 20 20 20 20 20 20 49 46 20 41 52 45 43 3c 52 45 4b 54 4f 54 20 54 48 45 4e 20 44 4f 3b 20 ┆ IF AREC<REKTOT THEN DO; ┆
0x605f2…60612 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60612…60621 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60621…60641 (61, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 44 44 4b 4f 4e 54 3e 30 20 54 48 45 4e 20 43 41 4c ┆ IF ADDKONT>0 THEN CAL┆
0x60641…60661 4c 20 46 49 4c 49 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L FILIN; ┆
0x60661…60670 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60670…60690 (61, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 44 44 4b 4f 4e 54 3c 30 20 54 48 45 4e 20 43 41 4c ┆ IF ADDKONT<0 THEN CAL┆
0x60690…606b0 4c 20 46 49 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L FILUT; ┆
0x606b0…606bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x606bf…606df (61, 0, 39) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x606df…606ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x606ff…6070e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6070e…6072e (61, 0, 40) 20 20 20 20 20 20 20 20 49 46 20 52 45 4b 54 4f 54 3e 30 20 54 48 45 4e 20 55 4e 53 50 45 43 28 ┆ IF REKTOT>0 THEN UNSPEC(┆
0x6072e…6074e 54 52 41 4e 53 46 49 4c 29 3d 41 52 45 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TRANSFIL)=AREC; ┆
0x6074e…6075d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6075d…6077d (61, 0, 41) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 57 52 28 54 52 41 4e 53 46 49 4c 2c 41 52 45 41 2c 41 4e ┆ CALL WR(TRANSFIL,AREA,AN┆
0x6077d…6079d 54 4b 4f 4e 54 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TKONT,RCODE); ┆
0x6079d…607ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x607ac…607cc (61, 0, 42) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 ┆ IF RCODE =0 THEN PUT SKI┆
0x607cc…607ec 50 20 4c 49 53 54 28 27 53 4b 52 49 56 46 45 4c 20 49 20 55 54 27 2c 4f 4e 43 4f 44 45 29 3b 20 ┆P LIST('SKRIVFEL I UT',ONCODE); ┆
0x607ec…607fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x607fb…6081b (61, 0, 43) 20 20 20 20 20 20 20 20 49 46 20 41 52 45 43 3d 52 45 4b 54 4f 54 20 54 48 45 4e 20 44 4f 3b 20 ┆ IF AREC=REKTOT THEN DO; ┆
0x6081b…6083b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6083b…6084a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6084a…6086a (61, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 ┆ CLOSE TRANSFIL; ┆
0x6086a…6088a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6088a…60899 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60899…608b9 (61, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 54 52 41 4e 53 46 49 4c 3b 20 20 20 20 20 20 20 ┆ OPEN TRANSFIL; ┆
0x608b9…608d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x608d9…608e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x608e8…60908 (61, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 54 52 41 4e 53 46 49 4c 29 3b 20 ┆ CALL SEOF(TRANSFIL); ┆
0x60908…60928 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60928…60937 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60937…60957 (61, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 52 45 4b 54 4f 54 3d 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 ┆ REKTOT=UNSPEC(TRANSFI┆
0x60957…60977 4c 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L); ┆
0x60977…60986 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60986…609a6 (61, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 54 52 41 4e 53 46 49 4c 29 3d 30 3b 20 20 ┆ UNSPEC(TRANSFIL)=0; ┆
0x609a6…609c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x609c6…609d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x609d5…609f5 (61, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 56 45 52 4e 52 3d 56 45 52 4e 52 2b 31 20 54 48 45 ┆ IF AVERNR=VERNR+1 THE┆
0x609f5…60a15 4e 20 56 45 52 4e 52 3d 41 56 45 52 4e 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆N VERNR=AVERNR; ┆
0x60a15…60a24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60a24…60a44 (61, 0, 50) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x60a44…60a64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60a64…60a73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60a73…60a93 (61, 0, 51) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x60a93…60ab3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60ab3…60ac2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60ac2…60b11 (61, 0, 52) 0x20[0x4f]
[…0x2…]
0x60baf…60bcf (61, 0, 55) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x60bcf…60bef 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x60bef…60bfe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60bfe…60c4d (61, 0, 56) 0x20[0x4f]
0x60c4d…60c6d (61, 0, 57) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x60c6d…60c8d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60c8d…60c9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60c9c…60cbc (61, 0, 58) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x60cbc…60cdc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60cdc…60ceb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60ceb…60d0b (61, 0, 59) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 43 ┆ IF DATUM='0 ' THEN C┆
0x60d0b…60d2b 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ALL PLOAD('Q '); ┆
0x60d2b…60d3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60d3a…60d5a (61, 0, 60) 20 20 20 20 20 20 20 20 50 45 52 41 52 4d 41 58 20 3d 20 53 55 42 53 54 52 20 28 44 41 54 55 4d ┆ PERARMAX = SUBSTR (DATUM┆
0x60d5a…60d7a 2c 31 2c 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,1,2); ┆
0x60d7a…60d89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60d89…60da9 (61, 0, 61) 20 20 20 20 20 20 20 20 50 45 52 41 52 4d 41 58 20 3d 20 50 45 52 41 52 4d 41 58 20 2b 20 31 3b ┆ PERARMAX = PERARMAX + 1;┆
0x60da9…60dc9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60dc9…60dd8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60dd8…60df8 (61, 0, 62) 20 20 20 20 20 20 20 20 50 45 52 41 52 4d 49 4e 20 3d 20 53 55 42 53 54 52 20 28 44 41 54 55 4d ┆ PERARMIN = SUBSTR (DATUM┆
0x60df8…60e18 2c 31 2c 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,1,2); ┆
0x60e18…60e27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60e27…60e47 (61, 0, 63) 20 20 20 20 20 20 20 20 50 45 52 41 52 4d 49 4e 20 3d 20 50 45 52 41 52 4d 49 4e 20 2d 20 31 3b ┆ PERARMIN = PERARMIN - 1;┆
0x60e47…60e67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60e67…60e76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60e76…60e96 (61, 0, 64) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x60e96…60eb6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60eb6…60ec5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60ec5…60ee5 (61, 0, 65) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x60ee5…60f05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60f05…60f14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60f14…60f34 (61, 0, 66) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x60f34…60f54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60f54…60f63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60f63…60f83 (61, 0, 67) 20 20 20 20 20 20 20 20 50 46 3d 41 44 44 52 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ PF=ADDR(AREA); ┆
0x60f83…60fa3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60fa3…60fb2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60fb2…60fd2 (61, 0, 68) 20 20 20 20 20 20 20 20 50 41 52 45 41 3d 55 4e 53 50 45 43 28 50 46 29 3b 20 20 20 20 20 20 20 ┆ PAREA=UNSPEC(PF); ┆
0x60fd2…60ff2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x60ff2…61001 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61001…61021 (61, 0, 69) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 47 54 45 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL DAGTEST; ┆
0x61021…61041 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61041…61050 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61050…61070 (61, 0, 70) 4c 31 3a 20 20 20 20 20 43 41 4c 4c 20 56 45 52 49 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L1: CALL VERIN; ┆
0x61070…61090 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61090…6109f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6109f…610bf (61, 0, 71) 4c 32 3a 20 20 20 20 20 43 41 4c 4c 20 44 49 53 50 50 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆L2: CALL DISPPUT; ┆
0x610bf…610df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x610df…610ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x610ee…6110e (61, 0, 72) 4c 33 3a 20 20 20 20 20 43 41 4c 4c 20 46 52 41 45 47 41 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆L3: CALL FRAEGA; ┆
0x6110e…6112e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6112e…6113d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6113d…6115d (61, 0, 73) 4c 34 3a 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 42 55 46 46 29 3b 20 20 20 20 ┆L4: GET SKIP LIST(BUFF); ┆
0x6115d…6117d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6117d…6118c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6118c…611ac (61, 0, 74) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 45 59 46 55 4e 28 4b 45 59 54 29 3b 20 20 20 20 20 20 ┆ CALL KEYFUN(KEYT); ┆
0x611ac…611cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x611cc…611db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x611db…611fb (61, 0, 75) 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 32 32 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF KEYT=22 THEN DO; ┆
0x611fb…6121b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 42 41 43 4b 41 52 20 45 4e 20 4b 4f 4e 54 ┆ /* BACKAR EN KONT┆
0x6121b…6122a 45 52 49 4e 47 20 2a 2f 20 20 20 20 20 20 20 ┆ERING */ ┆
0x6122a…6124a (61, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 41 4b 54 4b 4f 4e 54 3d 41 4b 54 4b 4f 4e 54 2d 31 3b 20 20 20 ┆ AKTKONT=AKTKONT-1; ┆
0x6124a…6126a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6126a…61279 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61279…61299 (61, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 4b 54 4b 4f 4e 54 3c 31 20 54 48 45 4e 20 44 4f 3b ┆ IF AKTKONT<1 THEN DO;┆
0x61299…612b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x612b9…612c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x612c8…612e8 (61, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4b 54 4b 4f 4e 54 3d 41 4e 54 4b 4f 4e 54 2b 31 3b ┆ AKTKONT=ANTKONT+1;┆
0x612e8…61308 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61308…61317 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61317…61337 (61, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 32 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO L2; ┆
0x61337…61357 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61357…61366 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61366…61386 (61, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x61386…613a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x613a6…613b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x613b5…613d5 (61, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x613d5…613f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x613f5…61404 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61404…61424 (62, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 52 41 44 3d 44 52 41 44 2d 31 3b 20 20 20 20 20 20 ┆ DRAD=DRAD-1; ┆
0x61424…61444 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61444…61453 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61453…61473 (62, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 52 41 44 3c 31 20 54 48 45 4e 20 47 4f 20 ┆ IF DRAD<1 THEN GO ┆
0x61473…61493 54 4f 20 4c 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO L2; ┆
0x61493…614a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x614a2…614c2 (62, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x614c2…614e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x614e2…614f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x614f1…61511 (62, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 4d 3d 31 36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ M=16; ┆
0x61511…61531 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61531…61540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61540…61560 (62, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 32 20 54 48 45 4e 20 4d 3d 38 3b 20 ┆ IF FRTYP=2 THEN M=8; ┆
0x61560…61580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61580…6158f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6158f…615af (62, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 53 55 42 53 ┆ PUT FILE(D) EDIT(SUBS┆
0x615af…615cf 54 52 28 42 55 46 46 2c 31 2c 4d 29 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TR(BUFF,1,M))(A); ┆
0x615cf…615de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x615de…615fe (62, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 46 52 54 59 50 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FRTYP=1; ┆
0x615fe…6161e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6161e…6162d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6162d…6164d (62, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L3; ┆
0x6164d…6166d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6166d…6167c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6167c…6169c (62, 0, 8) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6169c…616bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x616bc…616cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x616cb…616eb (62, 0, 9) 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 32 33 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF KEYT=23 THEN DO; ┆
0x616eb…6170b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 46 52 41 4d 20 45 4e 20 52 41 44 20 2a 2f ┆ /* FRAM EN RAD */┆
0x6170b…6171a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6171a…6173a (62, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 41 4b 54 4b 4f 4e 54 3d 41 4b 54 4b 4f 4e 54 2b 31 3b 20 20 20 ┆ AKTKONT=AKTKONT+1; ┆
0x6173a…6175a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6175a…61769 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61769…61789 (62, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 4b 54 4b 4f 4e 54 3e 41 4e 54 4b 4f 4e 54 2b 31 20 ┆ IF AKTKONT>ANTKONT+1 ┆
0x61789…617a9 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN DO; ┆
0x617a9…617b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x617b8…617d8 (62, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4b 54 4b 4f 4e 54 3d 31 3b 20 20 20 20 20 20 20 20 ┆ AKTKONT=1; ┆
0x617d8…617f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x617f8…61807 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61807…61827 (62, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 32 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO L2; ┆
0x61827…61847 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61847…61856 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61856…61876 (62, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x61876…61896 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61896…618a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x618a5…618c5 (62, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x618c5…618e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x618e5…618f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x618f4…61914 (62, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 52 41 44 3d 44 52 41 44 2b 31 3b 20 20 20 20 20 20 ┆ DRAD=DRAD+1; ┆
0x61914…61934 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61934…61943 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61943…61963 (62, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 52 41 44 3e 31 30 20 54 48 45 4e 20 47 4f ┆ IF DRAD>10 THEN GO┆
0x61963…61983 20 54 4f 20 4c 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TO L2; ┆
0x61983…61992 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61992…619b2 (62, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x619b2…619d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x619d2…619e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x619e1…61a01 (62, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 4d 3d 31 36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ M=16; ┆
0x61a01…61a21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61a21…61a30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61a30…61a50 (62, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 52 54 59 50 3d 32 20 54 48 45 4e 20 4d 3d 38 3b 20 ┆ IF FRTYP=2 THEN M=8; ┆
0x61a50…61a70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61a70…61a7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61a7f…61a9f (62, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 46 52 54 59 50 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FRTYP=1; ┆
0x61a9f…61abf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61abf…61ace 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61ace…61aee (62, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 28 53 55 42 53 ┆ PUT FILE(D) EDIT(SUBS┆
0x61aee…61b0e 54 52 28 42 55 46 46 2c 31 2c 4d 29 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TR(BUFF,1,M))(A); ┆
0x61b0e…61b1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61b1d…61b3d (62, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L3; ┆
0x61b3d…61b5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61b5d…61b6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61b6c…61b8c (62, 0, 24) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x61b8c…61bac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61bac…61bbb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61bbb…61bdb (62, 0, 25) 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 31 34 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 55 ┆ IF KEYT=140 THEN GO TO U┆
0x61bdb…61bfb 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 41 56 53 54 5b 4d 4e 49 4e 47 20 41 56 20 ┆T; /* AVSTÄMNING AV ┆
0x61bfb…61c0a 56 45 52 49 46 49 4b 41 54 49 4f 4e 20 2a 2f ┆VERIFIKATION */┆
0x61c0a…61c2a (62, 0, 26) 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 31 37 20 54 48 45 4e 20 43 41 4c 4c 20 48 4f 50 ┆ IF KEYT=17 THEN CALL HOP┆
0x61c2a…61c4a 50 41 5f 54 49 4c 4c 5f 51 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PA_TILL_Q; ┆
0x61c4a…61c59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61c59…61c79 (62, 0, 27) 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 31 39 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF KEYT=19 THEN DO; ┆
0x61c79…61c99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 41 52 20 42 4f 52 54 20 4b 4f 4e 54 45 ┆ /* TAR BORT KONTE┆
0x61c99…61ca8 52 49 4e 47 20 2a 2f 20 20 20 20 20 20 20 20 ┆RING */ ┆
0x61ca8…61cc8 (62, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 45 4c 49 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL DELIT; ┆
0x61cc8…61ce8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61ce8…61cf7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61cf7…61d17 (62, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L2; ┆
0x61d17…61d37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61d37…61d46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61d46…61d66 (62, 0, 30) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x61d66…61d86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61d86…61d95 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61d95…61db5 (62, 0, 31) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 56 41 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SVAR; ┆
0x61db5…61dd5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61dd5…61de4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61de4…61e33 (62, 0, 32) 0x20[0x4f]
0x61e33…61e53 (62, 0, 33) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x61e53…61e73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61e73…61e82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x61e82…61ea2 (62, 0, 34) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x61ec2…61ed1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x61ed1…61ef1 (62, 0, 35) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x61f11…61f20 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x61f20…61f40 (62, 0, 36) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x61f60…61f6f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x61f6f…61f8f (62, 0, 37) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x61faf…61fbe 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x61fbe…61fde (62, 0, 38) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x61ffe…6200d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x6200d…6202d (62, 0, 39) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x6204d…6205c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x6205c…6207c (62, 0, 40) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x6209c…620ab 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x620ab…620cb (62, 0, 41) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x620eb…620fa 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x620fa…6211a (62, 0, 42) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x6213a…62149 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62149…62169 (62, 0, 43) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62189…62198 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62198…621b8 (62, 0, 44) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x621d8…621e7 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x621e7…62207 (62, 0, 45) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62227…62236 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62236…62256 (62, 0, 46) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62276…62285 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62285…622a5 (62, 0, 47) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x622c5…622d4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x622d4…622f4 (62, 0, 48) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62314…62323 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62323…62343 (62, 0, 49) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62363…62372 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62372…62392 (62, 0, 50) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x623b2…623c1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x623c1…623e1 (62, 0, 51) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62401…62410 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62410…62430 (62, 0, 52) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62450…6245f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x6245f…6247f (62, 0, 53) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x6249f…624ae 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x624ae…624ce (62, 0, 54) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x624ee…624fd 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x624fd…6251d (62, 0, 55) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x6253d…6254c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x6254c…6256c (62, 0, 56) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x6258c…6259b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x6259b…625bb (62, 0, 57) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x625db…625ea 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x625ea…6260a (62, 0, 58) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x6262a…62639 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62639…62659 (62, 0, 59) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62679…62688 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62688…626a8 (62, 0, 60) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x626c8…626d7 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x626d7…626f7 (62, 0, 61) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62717…62726 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62726…62746 (62, 0, 62) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62766…62775 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62775…62795 (62, 0, 63) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x627b5…627c4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x627c4…627e4 (62, 0, 64) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62804…62813 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62813…62833 (62, 0, 65) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62853…62862 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62862…62882 (62, 0, 66) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x628a2…628b1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x628b1…628d1 (62, 0, 67) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x628f1…62900 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62900…62920 (62, 0, 68) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62940…6294f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x6294f…6296f (62, 0, 69) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x6298f…6299e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x6299e…629be (62, 0, 70) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x629de…629ed 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x629ed…62a0d (62, 0, 71) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62a2d…62a3c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62a3c…62a5c (62, 0, 72) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62a7c…62a8b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62a8b…62aab (62, 0, 73) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62acb…62ada 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62ada…62afa (62, 0, 74) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62b1a…62b29 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62b29…62b49 (62, 0, 75) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62b69…62b78 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62b78…62b98 (62, 0, 76) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62bb8…62bc7 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62bc7…62be7 (62, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62c07…62c16 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62c16…62c36 (62, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62c56…62c65 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62c65…62c85 (62, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62ca5…62cb4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62cb4…62cd4 (62, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62cf4…62d03 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62d03…62d23 (62, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x62d43…62d52 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x62d52…62d72 (63, 0, 0) 43 48 4f 4f 53 45 20 20 02 00 02 00 00 43 4f 55 54 50 55 54 20 20 03 00 03 00 00 43 4b 46 49 4c ┆CHOOSE COUTPUT CKFIL┆
0x62d72…62d92 45 20 20 20 04 00 04 00 00 43 43 4c 45 45 52 20 20 20 05 00 05 00 00 43 54 59 50 49 53 54 20 20 ┆E CCLEER CTYPIST ┆
0x62d92…62db2 06 00 06 00 00 43 53 51 52 54 20 20 20 20 07 00 08 00 33 43 4d 55 4c 54 49 20 20 20 09 00 0b 00 ┆ CSQRT 3CMULTI ┆
0x62db2…62dd2 09 43 55 4e 4d 55 4c 54 49 20 09 00 0b 00 77 43 46 45 54 43 48 20 20 20 0c 00 0d 00 0d 43 53 45 ┆ CUNMULTI wCFETCH CSE┆
0x62dd2…62df2 4c 45 43 54 53 20 0e 00 0e 00 2e 43 4b 45 59 46 55 4e 20 20 0f 00 0f 00 00 43 43 48 41 49 4e 20 ┆LECTS .CKEYFUN CCHAIN ┆
0x62df2…62e12 20 20 10 00 10 00 00 43 41 42 53 20 20 20 20 20 11 00 11 00 0c 43 53 45 4f 46 20 20 20 20 12 00 ┆ CABS CSEOF ┆
0x62e12…62e32 12 00 7f 43 4c 4f 41 44 20 20 20 20 13 00 13 00 00 43 50 4c 4f 54 20 20 20 20 14 00 14 00 00 43 ┆ CLOAD CPLOT C┆
0x62e32…62e51 43 4f 4c 4f 52 20 20 20 15 00 15 00 00 43 52 44 20 20 20 20 20 20 17 00 17 00 00 43 00 00 00 ┆COLOR CRD C ┆
0x62e51…62e71 (63, 0, 1) 57 52 20 20 20 20 20 20 17 00 17 00 12 43 52 45 57 20 20 20 20 20 17 00 17 00 24 43 43 4f 52 45 ┆WR CREW $CCORE┆
0x62e71…62e91 44 20 20 20 19 00 19 00 00 43 48 45 58 20 20 20 20 20 1a 00 1b 00 33 43 4d 4f 56 45 42 55 46 46 ┆D CHEX 3CMOVEBUFF┆
0x62e91…62eb1 1c 00 1c 00 00 43 54 49 4d 45 4f 4e 20 20 1d 00 1d 00 00 43 54 49 4d 45 4f 46 46 20 1d 00 1d 00 ┆ CTIMEON CTIMEOFF ┆
0x62eb1…62ed1 1d 43 54 49 4d 45 20 20 20 20 1d 00 1d 00 30 43 50 4c 4f 41 44 20 20 20 1e 00 1e 00 00 43 42 45 ┆ CTIME 0CPLOAD CBE┆
0x62ed1…62ef1 4c 52 45 44 20 20 1f 00 20 00 56 43 4c 45 54 41 20 20 20 20 21 00 21 00 00 43 44 41 54 43 48 45 ┆LRED VCLETA ! ! CDATCHE┆
0x62ef1…62f11 43 4b 22 00 23 00 4c 43 46 58 54 4f 42 49 4e 20 24 00 25 00 2c 43 42 49 4e 54 4f 43 48 20 24 00 ┆CK" # LCFXTOBIN $ % ,CBINTOCH $ ┆
0x62f11…62f31 25 00 f4 43 00 00 00 00 00 00 00 00 f3 ff f3 ff 00 00 00 00 00 00 00 00 00 00 f5 ff f5 ff 00 00 ┆% C ┆
0x62f31…62f50 00 00 00 00 00 00 00 00 f5 ff f5 ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x62f50…62f70 (63, 0, 2) 0d 00 43 1a 42 10 00 2a 10 42 6e 3e 7f 2d fa 15 43 07 c2 09 43 32 a5 40 c9 3e 00 c3 11 43 00 02 ┆ C B * Bn> - C C2 @ > C ┆
0x62f70…62f90 00 02 00 0c 43 4c 50 4f 4e 20 20 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ CLPON CLPOFF ┆
0x62f90…62fb0 43 43 4c 45 45 52 20 20 20 04 00 04 00 00 43 42 53 58 20 20 20 20 20 05 00 0f 00 00 43 41 54 4f ┆CCLEER CBSX CATO┆
0x62fb0…62fd0 45 20 20 20 20 0f 00 10 00 10 43 45 54 4f 41 20 20 20 20 0f 00 10 00 00 43 42 53 43 20 20 20 20 ┆E CETOA CBSC ┆
0x62fd0…62ff0 20 11 00 1a 00 00 43 4b 45 59 46 55 4e 20 20 1b 00 1b 00 1a 43 53 45 4f 46 20 20 20 20 1b 00 1b ┆ CKEYFUN CSEOF ┆
0x62ff0…63010 00 7f 43 4d 55 4c 54 49 20 20 20 1c 00 1c 00 09 43 55 4e 4d 55 4c 54 49 20 1c 00 1c 00 77 43 00 ┆ CMULTI CUNMULTI wC ┆
0x63010…63030 00 00 00 00 00 00 00 c9 ff c9 ff 00 00 00 00 00 00 00 00 00 00 d3 ff d3 ff 00 00 00 00 00 00 00 ┆ ┆
0x63030…6304f 00 00 00 dd ff dd ff 00 00 00 00 00 00 00 00 00 00 dd ff dd ff 00 00 00 00 00 00 1d 14 10 02 ┆ ┆
0x6304f…6306f (63, 0, 3) 0d 00 43 13 42 10 42 12 00 2a 10 42 7e 32 11 43 2a 12 42 7e d3 00 c9 00 42 53 20 20 20 20 20 02 ┆ C B B * B~2 C* B~ BS ┆
0x6306f…6308f 00 02 00 0c 43 4c 50 4f 4e 20 20 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ CLPON CLPOFF ┆
0x6308f…630af 43 43 4c 45 45 52 20 20 20 04 00 04 00 00 43 42 53 58 20 20 20 20 20 05 00 0f 00 00 43 41 54 4f ┆CCLEER CBSX CATO┆
0x630af…630cf 45 20 20 20 20 0f 00 10 00 10 43 45 54 4f 41 20 20 20 20 0f 00 10 00 00 43 42 53 43 20 20 20 20 ┆E CETOA CBSC ┆
0x630cf…630ef 20 11 00 1a 00 00 43 4b 45 59 46 55 4e 20 20 1b 00 1b 00 1a 43 53 45 4f 46 20 20 20 20 1b 00 1b ┆ CKEYFUN CSEOF ┆
0x630ef…6310f 00 7f 43 4d 55 4c 54 49 20 20 20 1c 00 1c 00 09 43 55 4e 4d 55 4c 54 49 20 1c 00 1c 00 77 43 43 ┆ CMULTI CUNMULTI wCC┆
0x6310f…6312f 48 4f 4f 53 45 20 20 1d 00 1d 00 00 43 00 00 00 00 00 00 00 00 d3 ff d3 ff 00 00 00 00 00 00 00 ┆HOOSE C ┆
0x6312f…6314e 00 00 00 dd ff dd ff 00 00 00 00 00 00 00 00 00 00 dd ff dd ff 00 00 00 00 00 00 00 00 0f 02 ┆ ┆
0x6314e…6316e (63, 0, 4) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x6322e…6324d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x6324d…6326d (63, 0, 5) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x6332d…6334c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x6334c…6336c (63, 0, 6) 0d 00 43 1e 42 10 42 12 00 2a 10 42 eb 2a 12 42 4e eb f3 7e 23 c5 e5 cd 33 00 e1 c1 0d c2 0f 43 ┆ C B B * B * BN ~# 3 C┆
0x6336c…6338c fb c9 00 0c 43 4c 50 4f 4e 20 20 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ CLPON CLPOFF ┆
0x6338c…633ac 43 43 4c 45 45 52 20 20 20 04 00 04 00 00 43 42 53 58 20 20 20 20 20 05 00 0f 00 00 43 41 54 4f ┆CCLEER CBSX CATO┆
0x633ac…633cc 45 20 20 20 20 0f 00 10 00 10 43 45 54 4f 41 20 20 20 20 0f 00 10 00 00 43 42 53 43 20 20 20 20 ┆E CETOA CBSC ┆
0x633cc…633ec 20 11 00 1a 00 00 43 4b 45 59 46 55 4e 20 20 1b 00 1b 00 1a 43 53 45 4f 46 20 20 20 20 1b 00 1b ┆ CKEYFUN CSEOF ┆
0x633ec…6340c 00 7f 43 4d 55 4c 54 49 20 20 20 1c 00 1c 00 09 43 55 4e 4d 55 4c 54 49 20 1c 00 1c 00 77 43 43 ┆ CMULTI CUNMULTI wCC┆
0x6340c…6342c 48 4f 4f 53 45 20 20 1d 00 1d 00 00 43 4f 55 54 50 55 54 20 20 1e 00 1e 00 00 43 4b 46 49 4c 45 ┆HOOSE COUTPUT CKFILE┆
0x6342c…6344b 20 20 20 1f 00 1f 00 00 43 43 4c 45 45 52 20 20 20 20 00 20 00 00 43 00 00 00 00 00 00 1f 02 ┆ CCLEER C ┆
0x6344b…6346b (63, 0, 7) 0c 11 43 04 7f 00 00 00 0c 17 43 12 00 10 10 00 00 0f d6 06 00 02 03 00 01 00 02 00 20 00 0b 33 ┆ C C 3┆
0x6346b…6348b 43 2f 43 00 03 43 02 33 00 00 43 00 00 0a 01 06 04 03 43 09 33 00 00 43 00 00 0a 01 06 04 06 43 ┆C/C C 3 C C 3 C C┆
0x6348b…634ab 0f 43 02 00 43 11 00 12 03 43 0f 00 43 13 00 07 02 0b 64 43 05 1d 43 29 00 1c 0b 62 43 02 43 69 ┆ C C C C dC C) bC Ci┆
0x634ab…634cb 0b 69 43 13 43 15 43 02 00 43 0f 00 0c 0a 03 43 15 00 43 17 00 0c 12 0b 7e 43 17 1d 43 15 43 15 ┆ iC C C C C C ~C C C ┆
0x634cb…634eb 00 43 19 00 10 43 1b 00 12 03 43 15 00 43 1d 00 07 01 0b 97 43 0b 1d 43 15 43 15 00 43 1f 00 0a ┆ C C C C C C C C ┆
0x634eb…6350b 03 0b 95 43 02 43 a2 0b 7c 43 02 43 a5 0b a5 43 12 43 15 43 15 00 43 1f 00 0a 43 21 00 10 43 1b ┆ C C öC C C C C C C! C ┆
0x6350b…6352b 00 12 03 0b a2 43 03 43 b7 1c 0b b7 43 0c 43 0f 00 43 23 00 12 43 13 00 07 02 0b c5 43 0b 1d 43 ┆ C C C C C# C C C┆
0x6352b…6354a 15 43 19 00 43 15 00 0e 03 0b c3 43 02 43 d0 0b d0 43 09 43 02 43 0f 00 43 23 00 0a 00 0d ca ┆ C C C C C C C C# ┆
0x6354a…6356a (64, 0, 0) 0d 00 43 e7 00 00 01 7c 40 00 00 00 00 42 10 00 f3 c5 3a 02 43 b7 ca 25 43 97 32 02 43 2a 87 40 ┆ C ö@ B : C %C 2 C* @┆
0x6356a…6358a 22 00 43 21 0c 43 22 87 40 21 8a 44 0e 80 11 00 40 1a 46 77 78 12 13 23 0d c2 2d 43 2a 07 43 eb ┆" C! C" @! D @ Fwx # -C* C ┆
0x6358a…635aa 2a fc 40 22 07 43 eb 22 fc 40 21 8a 43 11 00 42 46 1a 77 78 12 23 1c c2 4c 43 2a fe 40 eb 2a 05 ┆* @" C " @! C BF wx # LC* @ * ┆
0x635aa…635ca 43 22 fe 40 eb 22 05 43 21 00 00 39 eb 2a 03 43 f9 eb 22 03 43 cd 15 08 c1 fb c9 42 10 00 f3 c5 ┆C" @ " C! 9 * C " C B ┆
0x635ca…635ea 3e 01 32 02 43 2a 00 43 22 87 40 c3 25 43 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆> 2 C* C" @ %C ┆
0x635ea…6360a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x1…]
0x6362a…63649 00 00 00 00 00 00 00 00 00 00 00 00 8d 87 84 74 6f 67 60 59 4c 45 3e 3b 2b 25 22 1c 18 14 02 ┆ tog`YLE>;+%" ┆
0x63649…63669 (64, 0, 1) 0d e7 43 f9 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ C ┆
0x63669…63689 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x3…]
0x636e9…63709 00 00 00 00 00 00 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 ┆ ┆
0x63709…63729 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 ┆ ┆
0x63729…63748 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 00 02 ┆ ┆
0x63748…63768 (64, 0, 2) 0d e0 44 2a 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 ┆ D* ┆
0x63768…63788 18 00 18 00 18 00 18 00 18 00 18 00 18 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x63788…637a8 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x2…]
0x637e8…63808 00 00 00 00 00 00 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 ┆ ┆
0x63808…63828 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 ┆ ┆
0x63828…63847 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 00 02 ┆ ┆
0x63847…63867 (64, 0, 3) 0d 00 43 d6 00 00 00 00 00 00 00 00 00 00 00 00 00 42 10 42 12 42 14 42 16 00 2a 10 42 22 04 43 ┆ C B B B B * B" C┆
0x63867…63887 2a 12 42 22 06 43 2a 14 42 22 08 43 3e 30 32 0a 43 cd 98 43 ed 4b 04 43 3e 01 11 04 00 21 00 43 ┆* B" C* B" C>02 C C K C> ! C┆
0x63887…638a7 cd 00 08 c2 7f 43 3a 00 43 b7 3e 09 c2 7f 43 ed 4b 04 43 0a 3d 02 fe ff c2 5c 43 03 0a 3d 02 0b ┆ C: C > C K C = ÖC = ┆
0x638a7…638c7 3e 01 ed 5b 08 43 2a 06 43 c5 d5 e5 cd 00 08 c2 7f 43 e1 36 01 d1 c1 3e 01 e5 cd 06 08 e1 36 00 ┆> Ä C* C C 6 > 6 ┆
0x638c7…638e7 ca 84 43 c6 30 32 0a 43 cd 0b 44 3a 0a 43 2a 16 42 77 c9 1a 47 3c 12 1a 3d b8 12 c9 22 49 44 e1 ┆ C 02 C D: C* Bw G< = "ID ┆
0x638e7…63907 22 41 44 eb 22 47 44 c5 e1 22 45 44 f5 e1 22 43 44 21 3b 44 11 fa 0b cd 30 44 c2 f5 43 2a 0b 43 ┆"AD "GD "ED "CD!;D 0D C* C┆
0x63907…63927 7c b5 c2 df 43 21 00 3d 11 00 80 cd 8f 43 c2 dc 43 21 00 7d 11 00 c0 cd 8f 43 00 00 00 00 d9 d0 ┆ö C! = C C! å C ┆
0x63927…63946 cd c4 bf bc b9 b3 b0 ab a6 a2 9e 8d 8a 87 82 71 68 65 5a 52 4e 48 45 3f 37 33 30 2b 25 1f 02 ┆ qheZRNHE?730+% ┆
0x63946…63966 (64, 0, 4) 0d d6 43 80 c2 dc 43 21 00 bd 22 0b 43 ed 5b 0b 43 21 00 43 01 4b 44 3e 01 cd fd 0b 01 4d 44 b7 ┆ C C! " C Ä C! C KD> MD ┆
0x63966…63986 c4 18 08 2a 43 44 e5 f1 2a 45 44 e5 c1 2a 47 44 eb 2a 41 44 e5 2a 49 44 c9 22 49 44 e1 22 41 44 ┆ *CD *ED *GD *AD *ID "ID "AD┆
0x63986…639a6 eb 22 47 44 c5 e1 22 45 44 f5 e1 22 43 44 21 3e 44 11 fa 17 cd 30 44 c2 f5 43 97 c3 fd 17 06 03 ┆ "GD "ED "CD!>D 0D C ┆
0x639a6…639c6 1a be c0 23 13 10 f9 97 c9 49 57 53 4d 55 58 00 00 00 00 00 00 00 00 00 00 f5 43 20 50 47 4d 2e ┆ # IWSMUX C PGM.┆
0x639c6…639e6 58 46 45 52 00 32 0a 43 cd 0b 44 3a 0a 43 2a 16 42 77 c9 1a 47 3c 12 1a 3d b8 12 c9 22 49 44 e1 ┆XFER 2 C D: C* Bw G< = "ID ┆
0x639e6…63a06 22 41 44 eb 22 47 44 c5 e1 22 45 44 f5 e1 22 43 44 21 3b 44 11 fa 0b cd 30 44 c2 f5 43 2a 0b 43 ┆"AD "GD "ED "CD!;D 0D C* C┆
0x63a06…63a26 7c b5 c2 df 43 21 00 3d 11 00 80 cd 8f 43 c2 dc 43 21 00 7d 11 00 c0 cd 8f 43 00 00 00 00 d9 d0 ┆ö C! = C C! å C ┆
0x63a26…63a45 cd c4 bf bc b9 b3 b0 ab a6 a2 00 7a 59 56 50 4d 48 43 3f 3b 37 33 2f 2a 25 1e 16 10 0c 06 02 ┆ zYVPMHC?;73/*% ┆
0x63a45…63a65 (64, 0, 5) 0c 14 43 12 a6 40 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 0b 2e 43 af 43 04 43 06 43 08 ┆ C @ @ .C C C C ┆
0x63a65…63a85 43 0a 43 0c 43 0e 43 10 43 12 03 43 00 43 14 00 03 43 02 33 00 00 43 00 00 0a 00 03 43 00 43 00 ┆C C C C C C C C 3 C C C ┆
0x63a85…63aa5 00 43 16 00 0c 0a 03 33 00 00 43 00 00 0a 33 00 00 43 04 00 0a 00 33 00 00 43 06 00 0a 00 43 18 ┆ C 3 C 3 C 3 C C ┆
0x63aa5…63ac5 00 0e 0a 33 00 00 43 08 00 0a 00 43 1a 00 0e 0a 33 00 00 43 0a 00 0a 00 43 1c 00 0e 0a 33 00 00 ┆ 3 C C 3 C C 3 ┆
0x63ac5…63ae5 43 0c 00 0a 00 43 1e 00 0e 0a 33 00 00 43 0e 00 0a 00 43 20 00 0e 0a 33 00 00 43 10 00 0a 00 43 ┆C C 3 C C 3 C C┆
0x63ae5…63b05 22 00 0e 0a 33 00 00 43 12 00 0a 00 43 24 00 0e 0a 03 43 00 43 00 00 43 16 00 0a 03 33 00 00 43 ┆" 3 C C$ C C C 3 C┆
0x63b05…63b25 00 00 0a 43 02 00 03 1f 1b 0b fe 40 02 dc 43 0b 81 40 02 09 18 00 00 28 43 ae 00 19 44 0f 00 28 ┆ C @ C @ (C D (┆
0x63b25…63b44 43 b0 00 44 11 00 12 19 44 0f 00 28 44 0d 00 1c 45 70 1c 44 13 43 cc 00 03 44 13 00 43 a8 00 ┆C D D (D Ep D C D C ┆
0x63b44…63b64 (64, 0, 6) 0d 00 43 13 42 10 00 f3 3a 91 40 2a 10 42 77 23 97 77 32 91 40 fb c9 00 42 53 20 20 20 20 20 02 ┆ C B : @* Bw# w2 @ BS ┆
0x63b64…63b84 00 02 00 0c 43 4c 50 4f 4e 20 20 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ CLPON CLPOFF ┆
0x63b84…63ba4 43 41 54 4f 45 20 20 20 20 03 00 04 00 10 43 45 54 4f 41 20 20 20 20 03 00 04 00 00 43 53 45 4f ┆CATOE CETOA CSEO┆
0x63ba4…63bc4 46 20 20 20 20 05 00 05 00 7f 43 43 48 4f 4f 53 45 20 20 06 00 06 00 00 43 4f 55 54 50 55 54 20 ┆F CCHOOSE COUTPUT ┆
0x63bc4…63be4 20 07 00 07 00 00 43 4b 46 49 4c 45 20 20 20 08 00 08 00 00 43 43 4c 45 45 52 20 20 20 09 00 09 ┆ CKFILE CCLEER ┆
0x63be4…63c04 00 00 43 54 59 50 49 53 54 20 20 0a 00 0a 00 00 43 45 58 50 20 20 20 20 20 0b 00 0e 00 9c 44 4c ┆ CTYPIST CEXP DL┆
0x63c04…63c24 4e 20 20 20 20 20 20 0f 00 12 00 ab 45 4c 4f 47 20 20 20 20 20 0f 00 12 00 ae 43 41 54 41 4e 20 ┆N ELOG CATAN ┆
0x63c24…63c43 20 20 20 13 00 17 00 5d 45 43 4f 53 20 20 20 20 20 13 00 17 00 ec 44 53 49 4e 20 20 20 00 02 ┆ ÅECOS DSIN ┆
0x63c43…63c63 (64, 0, 7) 0d 00 43 26 42 10 00 2a 10 42 11 d2 40 0e 08 7e 12 23 13 0d c2 0b 43 21 d0 40 cd 0f 08 c2 1f 43 ┆ C&B * B @ ~ # C! @ C┆
0x63c63…63c83 c3 80 40 cd 18 08 cd 18 00 c9 00 20 20 03 00 03 00 00 43 4c 50 4f 46 46 20 20 20 03 00 03 00 1f ┆ @ CLPOFF ┆
0x63c83…63ca3 43 41 54 4f 45 20 20 20 20 03 00 04 00 10 43 45 54 4f 41 20 20 20 20 03 00 04 00 00 43 53 45 4f ┆CATOE CETOA CSEO┆
0x63ca3…63cc3 46 20 20 20 20 05 00 05 00 7f 43 43 48 4f 4f 53 45 20 20 06 00 06 00 00 43 4f 55 54 50 55 54 20 ┆F CCHOOSE COUTPUT ┆
0x63cc3…63ce3 20 07 00 07 00 00 43 4b 46 49 4c 45 20 20 20 08 00 08 00 00 43 43 4c 45 45 52 20 20 20 09 00 09 ┆ CKFILE CCLEER ┆
0x63ce3…63d03 00 00 43 54 59 50 49 53 54 20 20 0a 00 0a 00 00 43 45 58 50 20 20 20 20 20 0b 00 0e 00 9c 44 4c ┆ CTYPIST CEXP DL┆
0x63d03…63d23 4e 20 20 20 20 20 20 0f 00 12 00 ab 45 4c 4f 47 20 20 20 20 20 0f 00 12 00 ae 43 41 54 41 4e 20 ┆N ELOG CATAN ┆
0x63d23…63d42 20 20 20 13 00 17 00 5d 45 43 4f 53 20 20 20 20 20 13 00 17 00 ec 44 53 49 4e 20 00 1f 16 02 ┆ ÅECOS DSIN ┆
0x63d42…63d62 (63, 0, 9) 0c 02 43 02 00 00 0b 0c 43 13 43 00 03 33 00 00 43 00 00 0a 01 06 43 02 00 19 17 08 01 0b 21 43 ┆ C C C 3 C C !C┆
0x63d62…63d82 10 1d 43 04 33 00 00 43 00 00 0a 01 06 0d 04 08 1f 0b 1f 43 02 43 34 0b 34 43 0e 43 04 33 00 00 ┆ C 3 C C C4 4C C 3 ┆
0x63d82…63da2 43 00 00 0a 01 06 04 08 1f 0b 31 43 03 43 42 1c 0b 42 43 02 1f 1b 0b fe 40 02 43 43 0b 81 40 02 ┆C 1C CB BC @ CC @ ┆
0x63da2…63dc2 09 18 00 50 cd 1e 00 cd e5 46 c3 00 44 0d 53 45 41 52 43 48 3a 97 32 81 43 2a 80 42 22 d6 42 21 ┆ P F D SEARCH: 2 C* B" B!┆
0x63dc2…63de2 6e 44 0e 08 cd 27 00 0e 00 cd 1e 00 3a 95 40 32 c9 44 21 80 50 0e 80 cd 1e 00 0e 01 21 6e 44 cd ┆nD ' : @2 D! P !nD ┆
0x63de2…63e02 27 00 01 d0 40 21 00 43 3e 01 11 80 00 cd 00 08 fe 06 ca 06 45 b7 c4 18 08 21 00 43 0e 80 11 00 ┆' @! C> E ! C ┆
0x63e02…63e22 50 cd 61 47 21 00 43 06 00 11 80 50 0e 80 cd 39 00 7c b5 c2 47 44 2a 80 42 23 cd 15 00 eb 2a d6 ┆P aG! C P 9 ö GD* B# * ┆
0x63e22…63e41 42 19 7d b4 ca 44 44 cd e5 46 db 01 3d fe 1e 3c d2 f7 44 32 91 40 3a 91 40 fe 0d ca a3 44 97 ┆B å DD F = < D2 @: @ D ┆
0x63e41…63e61 (63, 0, 10) 0c 06 43 04 00 00 91 40 0c 0c 43 02 ff 00 0c 10 43 02 05 00 0b 1a 43 5d 43 00 03 43 04 43 00 43 ┆ C @ C C CÅC C C C┆
0x63e61…63e81 06 00 33 00 02 0e 0a 00 03 43 00 43 06 00 33 00 02 0e 0a 43 08 00 03 43 0a 33 00 00 43 00 00 0a ┆ 3 C C 3 C C 3 C ┆
0x63e81…63ea1 00 43 0c 00 12 03 33 00 00 43 00 00 0a 33 00 00 43 00 00 0a 00 43 0a 00 0c 0a 03 43 00 43 06 00 ┆ C 3 C 3 C C C C ┆
0x63ea1…63ec1 33 00 02 0e 0a 43 04 00 03 33 00 00 43 00 00 0a 43 0a 00 03 1f 0b 7f 43 25 43 0e 03 33 00 00 43 ┆3 C 3 C C C%C 3 C┆
0x63ec1…63ee1 0e 00 0a 43 06 00 33 00 02 0e 0a 33 00 00 43 0e 00 0a 43 10 00 33 00 02 0e 0a 00 03 1f 1b 0b fe ┆ C 3 3 C C 3 ┆
0x63ee1…63f01 40 02 a3 43 0b 81 40 02 09 18 00 80 00 cd 00 08 fe 06 ca 06 45 b7 c4 18 08 21 00 43 0e 80 11 00 ┆@ C @ E ! C ┆
0x63f01…63f21 50 cd 61 47 21 00 43 06 00 11 80 50 0e 80 cd 39 00 7c b5 c2 47 44 2a 80 42 23 cd 15 00 eb 2a d6 ┆P aG! C P 9 ö GD* B# * ┆
0x63f21…63f40 42 19 7d b4 ca 44 44 cd e5 46 db 01 3d fe 1e 3c d2 f7 44 32 91 40 3a 91 40 fe 0d ca a3 44 97 ┆B å DD F = < D2 @: @ D ┆
0x63f40…63f60 (63, 0, 11) 0d 00 43 43 42 10 42 12 00 f3 3a 98 40 b7 ca 18 43 21 00 00 1e 01 cd 1e 00 cd 24 00 3e 1b cd 33 ┆ CCB B : @ C! $ > 3┆
0x63f60…63f80 00 2a 12 42 5e 23 56 2a 10 42 7b b2 ca 3c 43 7e b7 ca 3c 43 d5 e5 cd 33 00 e1 d1 23 1b c3 26 43 ┆ * B^#V* Bä <C~ <C 3 # &C┆
0x63f80…63fa0 3e 0d cd 33 00 fb c9 00 20 05 00 05 00 00 43 54 59 50 49 53 54 20 20 06 00 06 00 00 43 45 58 50 ┆> 3 CTYPIST CEXP┆
0x63fa0…63fc0 20 20 20 20 20 07 00 0a 00 9c 44 4c 4e 20 20 20 20 20 20 0b 00 0e 00 ab 45 4c 4f 47 20 20 20 20 ┆ DLN ELOG ┆
0x63fc0…63fe0 20 0b 00 0e 00 ae 43 41 54 41 4e 20 20 20 20 0f 00 13 00 5d 45 43 4f 53 20 20 20 20 20 0f 00 13 ┆ CATAN ÅECOS ┆
0x63fe0…64000 00 ec 44 53 49 4e 20 20 20 20 20 0f 00 13 00 86 43 54 41 4e 20 20 20 20 20 0f 00 13 00 1b 45 41 ┆ DSIN CTAN EA┆
0x64000…64020 53 49 4e 20 20 20 20 14 00 18 00 3f 46 53 51 52 54 20 20 20 20 19 00 1a 00 33 43 42 53 43 20 20 ┆SIN ?FSQRT 3CBSC ┆
0x64020…6403f 20 20 20 1b 00 24 00 00 43 4d 55 4c 54 49 20 20 20 25 00 27 00 09 43 55 4e 00 3f 33 2e 10 02 ┆ $ CMULTI % ' CUN ?3. ┆
0x6403f…6405f (63, 0, 12) 0d 00 43 91 42 10 42 12 42 14 00 21 89 40 7e 23 96 c2 07 43 db 05 b7 c2 10 43 2a 14 42 7e fe 5a ┆ C B B B ! @~# C C* B~ Z┆
0x6405f…6407f c2 36 43 2a 10 42 4e 23 46 60 69 22 fc 7f 2a 12 42 5e 23 56 62 6b 22 fe 7f c9 2a 10 42 4e 23 46 ┆ 6C* BN#F`i" * B^#Vbk" * BN#F┆
0x6407f…6409f 2a fc 7f cd 15 00 09 24 25 f2 50 43 cd 15 00 3e 04 c3 52 43 3e 00 84 d3 07 7d d3 06 60 69 22 fc ┆* $% PC > RC> å `i" ┆
0x6409f…640bf 7f 2a 12 42 5e 23 56 2a fe 7f cd 15 00 19 24 25 fa 74 43 3e 0c c3 79 43 cd 15 00 3e 08 84 d3 07 ┆ * B^#V* $% tC> yC > ┆
0x640bf…640df 7d d3 06 62 6b 22 fe 7f db 05 b7 c2 84 43 2a 14 42 7e d3 05 c9 00 4f 53 20 20 20 20 20 0f 00 13 ┆å bk" C* B~ OS ┆
0x640df…640ff 00 ec 44 53 49 4e 20 20 20 20 20 0f 00 13 00 86 43 54 41 4e 20 20 20 20 20 0f 00 13 00 1b 45 41 ┆ DSIN CTAN EA┆
0x640ff…6411f 53 49 4e 20 20 20 20 14 00 18 00 3f 46 53 51 52 54 20 20 20 20 19 00 1a 00 33 43 42 53 43 20 20 ┆SIN ?FSQRT 3CBSC ┆
0x6411f…6413e 20 20 20 1b 00 24 00 00 43 4d 55 4c 54 49 20 20 20 25 00 27 00 00 8d 77 72 53 4b 22 19 13 02 ┆ $ CMULTI % ' wrSK" ┆
0x6413e…6415e (63, 0, 13) 0d 00 43 25 42 10 00 21 89 40 7e 23 96 c2 03 43 db 05 b7 c2 0c 43 2a 10 42 7e fe 52 c2 20 43 3e ┆ C%B ! @~# C C* B~ R C>┆
0x6415e…6417e 10 c3 22 43 3e 20 d3 07 c9 00 54 20 20 03 00 03 00 00 43 4b 46 49 4c 45 20 20 20 04 00 04 00 00 ┆ "C> T CKFILE ┆
0x6417e…6419e 43 43 4c 45 45 52 20 20 20 05 00 05 00 00 43 54 59 50 49 53 54 20 20 06 00 06 00 00 43 45 58 50 ┆CCLEER CTYPIST CEXP┆
0x6419e…641be 20 20 20 20 20 07 00 0a 00 9c 44 4c 4e 20 20 20 20 20 20 0b 00 0e 00 ab 45 4c 4f 47 20 20 20 20 ┆ DLN ELOG ┆
0x641be…641de 20 0b 00 0e 00 ae 43 41 54 41 4e 20 20 20 20 0f 00 13 00 5d 45 43 4f 53 20 20 20 20 20 0f 00 13 ┆ CATAN ÅECOS ┆
0x641de…641fe 00 ec 44 53 49 4e 20 20 20 20 20 0f 00 13 00 86 43 54 41 4e 20 20 20 20 20 0f 00 13 00 1b 45 41 ┆ DSIN CTAN EA┆
0x641fe…6421e 53 49 4e 20 20 20 20 14 00 18 00 3f 46 53 51 52 54 20 20 20 20 19 00 1a 00 33 43 42 53 43 20 20 ┆SIN ?FSQRT 3CBSC ┆
0x6421e…6423d 20 20 20 1b 00 24 00 00 43 4d 55 4c 54 49 20 20 20 25 00 27 00 09 43 55 4e 00 23 1e 15 0f 02 ┆ $ CMULTI % ' CUN # ┆
0x6423d…6425d (63, 0, 14) 0d 00 43 58 18 42 09 00 42 10 42 12 42 14 42 16 00 cd 3a 43 cd 00 08 c3 4f 43 42 10 42 12 42 14 ┆ CX B B B B B :C OCB B B ┆
0x6425d…6427d 42 16 00 cd 3a 43 cd 03 08 c3 4f 43 42 10 42 12 42 14 42 16 00 cd 3a 43 cd 06 08 c3 4f 43 2a 10 ┆B :C OCB B B B :C OC* ┆
0x6427d…6429d 42 44 4d 1e 0c 16 00 19 5e 23 56 2a 14 42 7e 2a 12 42 c9 2a 16 42 77 23 3e 00 77 c9 00 db 09 23 ┆BDM ^#V* B~* B * Bw#> w #┆
0x6429d…642bd 28 f4 7c fe 22 db 09 23 38 ec 11 6a ff 19 22 02 43 dd 5e 0e 16 00 cd 0f 00 21 eb ff 19 22 00 43 ┆( ö " #8 j " C ^ ! " C┆
0x642bd…642dd f3 3e 80 d3 0b dd 7e 10 47 16 00 d9 e6 03 07 07 3c 07 57 97 5f d3 09 1d 20 fb 15 f2 96 43 d3 09 ┆ > ~ G < W _ C ┆
0x642dd…642fd 0e 0b 2e 80 d3 09 d3 0b ed 69 db 09 0e 05 0d db 09 c2 af 43 3e 9e d3 09 d9 78 d3 09 7a d3 09 80 ┆ . i C> x z ┆
0x642fd…6431d 14 d3 09 3e 10 d3 09 97 0e 0b d3 09 2e 80 d3 09 d3 0b ed 69 db 09 db 09 7a d9 dd be 0e db 09 00 ┆ > . i z ┆
0x6431d…6433c db 09 3e 9b d3 09 2a 00 43 3e 00 d3 09 eb c2 96 43 d9 d3 09 d3 0b 0e 00 3d 37 2b 25 19 13 02 ┆ > * C> C =7+% ┆
0x6433c…6435c (63, 0, 15) 0d 00 43 54 42 10 42 12 42 14 42 16 00 cd 36 43 cd 00 08 c3 4b 43 42 10 42 12 42 14 42 16 00 cd ┆ CTB B B B 6C KCB B B B ┆
0x6435c…6437c 36 43 cd 03 08 c3 4b 43 42 10 42 12 42 14 42 16 00 cd 36 43 cd 06 08 c3 4b 43 2a 10 42 44 4d 1e ┆6C KCB B B B 6C KC* BDM ┆
0x6437c…6439c 0c 16 00 19 5e 23 56 2a 14 42 7e 2a 12 42 c9 2a 16 42 77 23 3e 00 77 c9 00 db 0a e6 20 db 09 23 ┆ ^#V* B~* B * Bw#> w #┆
0x6439c…643bc 28 f4 7c fe 22 db 09 23 38 ec 11 6a ff 19 22 02 43 dd 5e 0e 16 00 cd 0f 00 21 eb ff 19 22 00 43 ┆( ö " #8 j " C ^ ! " C┆
0x643bc…643dc f3 3e 80 d3 0b dd 7e 10 47 16 00 d9 e6 03 07 07 3c 07 57 97 5f d3 09 1d 20 fb 15 f2 96 43 d3 09 ┆ > ~ G < W _ C ┆
0x643dc…643fc 0e 0b 2e 80 d3 09 d3 0b ed 69 db 09 0e 05 0d db 09 c2 af 43 3e 9e d3 09 d9 78 d3 09 7a d3 09 80 ┆ . i C> x z ┆
0x643fc…6441c 14 d3 09 3e 10 d3 09 97 0e 0b d3 09 2e 80 d3 09 d3 0b ed 69 db 09 db 09 7a d9 dd be 0e db 09 00 ┆ > . i z ┆
0x6441c…6443b db 09 3e 9b d3 09 2a 00 43 3e 00 d3 09 eb c2 96 43 d9 d3 09 d3 0b 0e 00 39 33 27 21 15 0f 02 ┆ > * C> C 93'! ┆
0x6443b…6445b (63, 0, 16) 0d 00 43 4c 42 10 42 12 42 14 00 f3 3a 98 40 b7 ca 1a 43 21 00 00 1e 01 cd 1e 00 cd 24 00 3e 1b ┆ CLB B B : @ C! $ > ┆
0x6445b…6447b cd 33 00 2a 12 42 5e 23 56 2a 10 42 fb 3a 94 40 b7 ca 29 43 fe 30 fa 45 43 fe 3a f2 45 43 77 23 ┆ 3 * B^#V* B : @ )C 0 EC : ECw#┆
0x6447b…6449b 1b 1c 1d ca 4b 43 c3 29 43 2a 14 42 3e 01 77 c9 00 50 49 53 54 20 20 06 00 06 00 00 43 45 58 50 ┆ KC )C* B> w PIST CEXP┆
0x6449b…644bb 20 20 20 20 20 07 00 0a 00 9c 44 4c 4e 20 20 20 20 20 20 0b 00 0e 00 ab 45 4c 4f 47 20 20 20 00 ┆ DLN ELOG ┆
0x644bb…644db 00 21 00 43 0e 01 cd 1e 00 3a 00 43 fe 2c c2 d6 43 32 80 43 32 81 43 21 00 43 0e 01 cd 1e 00 cd ┆ ! C : C , C2 C2 C! C ┆
0x644db…644fb 1b 00 21 d0 40 cd 0c 08 21 00 00 22 da 40 ca ea 43 cd 18 08 c3 18 00 0d 59 4f 55 52 20 46 49 4c ┆ ! @ ! " @ C YOUR FIL┆
0x644fb…6451b 45 20 49 53 20 45 4d 50 54 59 21 b8 43 0e 13 cd 27 00 c3 d3 43 cd 1b 00 21 d0 40 cd 0c 08 c2 b2 ┆E IS EMPTY! C ' C ! @ ┆
0x6451b…6453a 43 2a da 40 7c b5 ca cb 43 cd 24 00 21 d0 40 0e 16 11 c0 42 cd 64 47 00 48 45 3d 38 33 12 02 ┆C* @ö C $ ! @ B dG HE=83 ┆
0x6453a…6455a (63, 0, 17) 0d 00 43 13 42 10 00 f3 21 93 40 46 23 7e 26 41 68 77 cd 09 00 fb c9 00 20 20 20 20 20 20 20 20 ┆ C B ! @F#~&Ahw ┆
0x6455a…6457a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 52 ┆ KR┆
0x6457a…6459a 49 56 31 20 20 3b 00 4f 00 52 00 03 00 03 00 00 00 50 41 43 4b 41 31 20 20 37 00 4f 00 52 00 04 ┆IV1 ; O R PACKA1 7 O R ┆
0x6459a…645ba 00 04 00 00 00 53 4c 55 4d 50 31 20 20 1b 00 4f 00 52 00 05 00 05 00 00 00 4d 41 53 54 4d 49 00 ┆ SLUMP1 O R MASTMI ┆
0x645ba…645da 00 21 00 43 0e 01 cd 1e 00 3a 00 43 fe 2c c2 d6 43 32 80 43 32 81 43 21 00 43 0e 01 cd 1e 00 cd ┆ ! C : C , C2 C2 C! C ┆
0x645da…645fa 1b 00 21 d0 40 cd 0c 08 21 00 00 22 da 40 ca ea 43 cd 18 08 c3 18 00 0d 59 4f 55 52 20 46 49 4c ┆ ! @ ! " @ C YOUR FIL┆
0x645fa…6461a 45 20 49 53 20 45 4d 50 54 59 21 b8 43 0e 13 cd 27 00 c3 d3 43 cd 1b 00 21 d0 40 cd 0c 08 c2 b2 ┆E IS EMPTY! C ' C ! @ ┆
0x6461a…64639 43 2a da 40 7c b5 ca cb 43 cd 24 00 21 d0 40 0e 16 11 c0 42 cd 64 47 21 d0 40 11 80 42 00 02 ┆C* @ö C $ ! @ B dG! @ B ┆
0x64639…64659 (63, 0, 18) 0b 81 40 00 0b 81 40 02 09 18 00 37 38 39 41 42 43 44 45 46 0c 14 43 17 01 00 ff 00 10 00 02 00 ┆ @ @ 789ABCDEF C ┆
0x64659…64679 0f 00 03 00 20 04 00 00 10 05 00 ff 0f 00 01 0b 33 43 c3 43 00 43 02 03 33 00 00 43 02 00 0a 32 ┆ 3C C C 3 C 2┆
0x64679…64699 01 0c 0a 43 14 00 0a 43 14 00 43 04 33 00 00 43 00 00 0a 00 43 16 00 12 43 18 00 10 32 01 0e 0a ┆ C C C 3 C C C 2 ┆
0x64699…646b9 32 01 06 33 00 00 43 02 00 0a 32 01 0c 0a 43 1a 00 0a 43 14 00 43 04 33 00 00 43 00 00 0a 00 43 ┆2 3 C 2 C C C 3 C C┆
0x646b9…646d9 1c 00 12 32 01 0e 0a 32 01 06 33 00 00 43 02 00 0a 32 01 0c 0a 43 1e 00 0a 43 14 00 43 20 32 01 ┆ 2 2 3 C 2 C C C 2 ┆
0x646d9…646f9 06 33 00 00 43 02 00 0a 32 01 0c 0a 43 21 00 0a 43 14 00 43 04 33 00 00 43 00 00 0a 00 43 23 00 ┆ 3 C 2 C! C C 3 C C# ┆
0x646f9…64719 10 32 01 0e 0a 32 01 06 33 00 00 43 02 00 0a 32 01 0c 0a 43 25 00 0a 43 14 00 43 04 33 00 00 43 ┆ 2 2 3 C 2 C% C C 3 C┆
0x64719…64738 00 00 0a 00 43 27 00 12 43 29 00 10 32 01 0e 0a 32 01 06 1f 1f 1b 0b fe 40 02 f5 43 00 fe ff ┆ C' C) 2 2 @ C ┆
0x64738…64758 (63, 0, 19) 0d 00 43 40 42 10 00 f3 21 94 40 7e 2b 6e 26 41 77 cd 09 00 cd 15 08 21 93 40 46 0e 00 71 26 41 ┆ C@B ! @~+n&Aw ! @F q&A┆
0x64758…64778 68 3e 20 77 2d c2 1f 43 3e 00 77 2a 10 42 46 23 4e 21 96 40 56 70 23 5e 71 2a 10 42 72 23 73 cd ┆h> w- C> w* BF#N! @Vp#^q* Br#s ┆
0x64778…64798 09 00 fb c9 00 52 20 20 20 05 00 05 00 00 43 54 59 50 49 53 54 20 20 06 00 06 00 00 43 53 51 52 ┆ R CTYPIST CSQR┆
0x64798…647b8 54 20 20 20 20 07 00 08 00 33 43 4d 55 4c 54 49 20 20 20 09 00 0b 00 09 43 55 4e 4d 55 4c 54 49 ┆T 3CMULTI CUNMULTI┆
0x647b8…647d8 20 09 00 0b 00 77 43 46 45 54 43 48 20 20 20 0c 00 0d 00 0d 43 53 45 4c 45 43 54 53 20 0e 00 0e ┆ wCFETCH CSELECTS ┆
0x647d8…647f8 00 2e 43 4b 45 59 46 55 4e 20 20 0f 00 0f 00 00 43 43 48 41 49 4e 20 20 20 10 00 10 00 00 43 41 ┆ .CKEYFUN CCHAIN CA┆
0x647f8…64818 42 53 20 20 20 20 20 11 00 11 00 0c 43 53 45 4f 46 20 20 20 20 12 00 12 00 7f 43 4c 4f 41 44 20 ┆BS CSEOF CLOAD ┆
0x64818…64837 20 20 20 13 00 13 00 00 43 50 4c 4f 54 20 20 20 20 14 00 14 00 00 43 43 4f 4c 4f 52 00 27 02 ┆ CPLOT CCOLOR ' ┆
0x64837…64857 (63, 0, 20) 0d 00 43 33 42 10 00 11 d2 40 2a 10 42 0e 08 7e 12 23 13 0d c2 0b 43 cd 15 08 d1 d1 21 27 43 11 ┆ C3B @* B ~ # C !'C ┆
0x64857…64877 50 41 06 00 0e 0f ed b0 c3 50 41 cd 0f 08 ca 80 40 cd 18 08 c3 18 00 00 20 20 20 20 20 20 20 20 ┆PA PA @ ┆
0x64877…64897 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x64897…648b7 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x648b7…648d7 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 50 ┆ P┆
0x648d7…648f7 4c 4f 41 44 41 20 20 1c 00 3f 00 63 01 2d 00 2d 00 1c 00 50 4c 4f 41 44 41 20 20 1c 00 3f 00 63 ┆LOADA ? c - - PLOADA ? c┆
0x648f7…64917 01 2d 00 2d 00 00 00 1b 00 2b 44 01 00 20 02 00 61 00 49 4e 44 45 58 20 20 20 4e 41 4d 45 20 20 ┆ - - +D a INDEX NAME ┆
0x64917…64936 20 20 52 45 43 4f 52 44 53 20 4c 45 4e 47 54 48 20 20 4d 41 58 52 45 43 53 20 46 00 1e 16 02 ┆ RECORDS LENGTH MAXRECS F ┆
0x64936…64956 (63, 0, 21) 0c 15 43 39 00 00 20 20 20 20 20 20 20 20 20 20 30 3a 2d 2d 64 00 20 20 20 20 20 20 20 20 20 20 ┆ C9 0:--d ┆
0x64956…64976 20 3a 2d 2d 01 00 02 00 30 30 0d 00 0e 00 2e 20 20 20 20 20 20 20 20 20 20 20 3a 30 30 0b 56 43 ┆ :-- 00 . :00 VC┆
0x64976…64996 16 43 00 43 02 03 33 00 00 43 00 00 0a 02 06 46 43 15 00 19 17 08 02 0b 6e 43 10 1d 33 00 00 43 ┆ C C 3 C FC nC 3 C┆
0x64996…649b6 02 00 0a 32 0e 43 17 32 0e 06 1f 0b 6c 43 02 43 7e 0b 7e 43 24 33 00 00 43 00 00 0a 02 06 46 43 ┆ 2 C 2 lC C~ ~C$3 C FC┆
0x649b6…649d6 25 00 19 17 08 06 33 00 00 43 00 00 0a 02 06 46 43 25 00 0c 19 17 08 03 13 0b a4 43 3f 1d 43 04 ┆% 3 C FC% C? C ┆
0x649d6…649f6 32 0d 33 00 00 43 00 00 0a 02 06 46 1a 06 43 11 43 04 32 0d 30 03 33 00 00 43 02 00 0a 32 0e 43 ┆2 3 C F C C 2 0 3 C 2 C┆
0x649f6…64a16 27 32 0e 06 43 04 32 01 0c 0a 43 11 00 43 35 00 0c 0a 0a 43 37 00 43 39 32 02 09 05 0b e5 43 1c ┆'2 C 2 C C5 C7 C92 C ┆
0x64a16…64a35 1d 33 00 00 43 02 00 0a 32 01 0c 0a 43 3b 00 0a 43 37 00 43 04 32 01 0c 0a 43 11 00 00 0d ca ┆ 3 C 2 C; C7 C 2 C ┆
0x64a35…64a55 (63, 0, 22) 0b 01 44 0a 43 35 00 0c 0a 0a 43 37 00 06 0b e3 43 02 44 0b 0b 0b 44 30 33 00 00 43 02 00 0a 32 ┆ D C5 C7 C D D03 C 2┆
0x64a55…64a75 01 0c 0a 43 3d 00 43 11 00 0c 0a 0a 43 11 00 43 37 00 0c 0a 43 04 32 01 0c 0a 43 35 00 0a 43 11 ┆ C= C C C7 C 2 C5 C ┆
0x64a75…64a95 00 43 37 00 0c 0a 06 1f 0b a2 43 02 44 3b 0b 3b 44 98 43 04 32 0d 33 00 00 43 00 00 0a 02 06 46 ┆ C7 C D; ;D C 2 3 C F┆
0x64a95…64ab5 43 25 00 19 17 11 1a 06 43 11 43 04 32 0d 30 03 43 13 43 04 32 0d 43 3f 32 01 35 03 33 00 00 43 ┆C% C C 2 0 C C 2 C?2 5 3 C┆
0x64ab5…64ad5 02 00 0a 32 0e 43 40 32 0e 06 33 00 00 43 02 00 0a 32 01 0c 0a 43 3b 00 0a 43 11 00 43 13 00 0c ┆ 2 C@2 3 C 2 C; C C ┆
0x64ad5…64af5 0a 43 04 32 01 0c 0a 43 13 00 43 35 00 0a 0a 43 11 00 43 13 00 0c 0a 06 33 00 00 43 02 00 0a 32 ┆ C 2 C C5 C C 3 C 2┆
0x64af5…64b15 01 0c 0a 43 3b 00 43 13 00 0c 0a 0a 43 13 00 43 35 00 0c 0a 43 04 32 01 0c 0a 43 35 00 0a 43 13 ┆ C; C C C5 C 2 C5 C ┆
0x64b15…64b34 00 43 35 00 0c 0a 06 1f 1f 1b 0b fe 40 02 d2 44 0b 81 40 02 09 18 00 0c 0a 43 11 00 00 0d ca ┆ C5 @ D @ C ┆
0x64b34…64b54 (63, 0, 23) 0d 00 43 28 42 10 42 12 42 14 42 16 42 18 00 2a 10 42 44 4d 2a 14 42 7e 2a 16 42 54 5d 2a 12 42 ┆ C(B B B B B * BDM* B~* BTÅ* B┆
0x64b54…64b74 cd 09 08 2a 18 42 77 23 3e 00 77 c9 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 ┆ * Bw#> w ┆
0x64b74…64b94 43 43 4c 45 45 52 20 20 20 05 00 05 00 00 43 54 59 50 49 53 54 20 20 06 00 06 00 00 43 53 51 75 ┆CCLEER CTYPIST CSQu┆
0x64b94…64bb4 43 2f 00 02 00 00 00 0b 00 33 43 55 4e 53 50 45 43 43 0b 22 23 43 00 32 0b 25 15 00 27 32 0d 11 ┆C/ 3CUNSPECC "#C 2 % '2 ┆
0x64bb4…64bd4 00 21 00 43 0e 01 cd 1e 00 3a 00 43 fe 2c c2 d6 43 32 80 43 32 81 43 21 00 43 0e 01 cd 1e 00 cd ┆ ! C : C , C2 C2 C! C ┆
0x64bd4…64bf4 1b 00 21 d0 40 cd 0c 08 21 00 00 22 da 40 ca ea 43 cd 18 08 c3 18 00 0d 59 4f 55 52 20 46 49 4c ┆ ! @ ! " @ C YOUR FIL┆
0x64bf4…64c14 45 20 49 53 20 45 4d 50 54 59 21 b8 43 0e 13 cd 27 00 c3 d3 43 cd 1b 00 21 d0 40 cd 0c 08 c2 b2 ┆E IS EMPTY! C ' C ! @ ┆
0x64c14…64c33 43 2a da 40 7c b5 ca cb 43 cd 24 00 21 d0 40 0e 16 11 c0 42 cd 64 47 21 d0 40 11 80 42 00 02 ┆C* @ö C $ ! @ B dG! @ B ┆
0x64c33…64c53 (63, 0, 24) 0c 04 43 18 1f 00 1d 00 1f 00 1e 00 1f 00 1e 00 1f 00 1f 00 1e 00 1f 00 1e 00 1f 00 0c 1c 43 02 ┆ C C ┆
0x64c53…64c73 ba 40 0c 20 43 18 01 00 06 00 31 32 33 34 35 36 37 38 39 30 00 00 02 00 4b 00 03 00 0c 00 0c 3a ┆ @ C 1234567890 K :┆
0x64c73…64c93 43 02 05 00 0c 3e 43 06 30 20 20 20 20 20 0b 4c 43 19 43 00 03 43 02 43 1c 00 03 43 1e 43 20 00 ┆C >C 0 LC C C C C C ┆
0x64c93…64cb3 03 43 1e 00 43 22 00 0c 0a 32 01 0b 69 43 29 20 43 1e 43 1e 00 32 01 0a 03 43 5b 1c 43 24 32 0a ┆ C C" 2 iC) C C 2 CÄ C$2 ┆
0x64cb3…64cd3 33 00 00 43 02 00 0a 32 01 0c 0a 43 1e 00 0a 43 20 00 35 43 2e 00 07 02 0b 94 43 05 1d 43 3c 00 ┆3 C 2 C C 5C. C C< ┆
0x64cd3…64cf3 1c 0b 92 43 02 43 99 0b 99 43 03 43 6a 1c 0b 65 43 04 43 9c 43 76 0b 9c 43 18 33 00 00 43 02 00 ┆ C C C Cj eC C Cv C 3 C ┆
0x64cf3…64d13 0a 32 01 0c 0a 43 20 00 0a 43 30 00 43 32 00 19 09 01 0b b6 43 05 1d 43 3c 00 1c 0b b4 43 02 43 ┆ 2 C C0 C2 C C< C C┆
0x64d13…64d32 bb 0b bb 43 16 43 1e 33 00 00 43 02 00 0a 32 01 0c 0a 43 34 00 0a 43 30 00 16 03 00 fe 0d ca ┆ C C 3 C 2 C4 C0 ┆
0x64d32…64d52 (63, 0, 25) 0b d1 43 11 43 1e 00 43 20 00 07 01 43 1e 00 43 36 00 07 04 13 0b e4 43 05 1d 43 3c 00 1c 0b e2 ┆ C C C C C6 C C< ┆
0x64d52…64d72 43 02 43 e9 0b e9 43 2e 43 38 33 00 00 43 02 00 0a 32 01 0c 0a 43 3a 00 0a 43 30 00 16 03 43 38 ┆C C C.C83 C 2 C: C0 C8┆
0x64d72…64d92 00 43 20 00 07 01 43 38 00 43 02 43 1e 00 32 02 0e 0a 00 07 04 13 0b 19 44 05 1d 43 3c 00 1c 0b ┆ C C8 C C 2 D C< ┆
0x64d92…64db2 17 44 02 44 1e 0b 1e 44 14 33 00 00 43 00 00 0a 32 06 33 00 00 43 02 00 0a 32 06 06 1f 0a 3c 43 ┆ D D D 3 C 2 3 C 2 <C┆
0x64db2…64dd2 02 32 44 0b 32 44 11 33 00 00 43 00 00 0a 32 06 43 3e 32 06 06 1f 1f 1b 0b fe 40 02 42 44 0b 81 ┆ 2D 2D 3 C 2 C>2 @ BD ┆
0x64dd2…64df2 40 02 09 18 00 43 99 0b 99 43 03 43 6a 1c 0b 65 43 04 43 9c 43 76 0b 9c 43 18 33 00 00 43 02 00 ┆@ C C Cj eC C Cv C 3 C ┆
0x64df2…64e12 0a 32 01 0c 0a 43 20 00 0a 43 30 00 43 32 00 19 09 01 0b b6 43 05 1d 43 3c 00 1c 0b b4 43 02 43 ┆ 2 C C0 C2 C C< C C┆
0x64e12…64e31 bb 0b bb 43 16 43 1e 33 00 00 43 02 00 0a 32 01 0c 0a 43 34 00 0a 43 30 00 16 03 00 fe 0d ca ┆ C C 3 C 2 C4 C0 ┆
0x64e31…64e51 (64, 0, 9) 0c 07 43 0a 10 27 74 01 64 00 01 00 1f 00 0c 1c 43 08 4e 00 03 00 04 00 02 00 0b 2c 43 c0 43 00 ┆ C 't d C N ,C C ┆
0x64e51…64e71 43 02 03 43 04 33 00 00 43 00 00 0a 02 03 43 43 07 00 19 17 11 05 03 43 33 00 00 43 00 00 0a 33 ┆C C 3 C CC C3 C 3┆
0x64e71…64e91 00 00 43 00 00 0a 02 03 43 43 04 02 03 43 43 07 00 19 17 0f 0d 0b 05 03 43 33 00 00 43 02 00 0a ┆ C CC CC C3 C ┆
0x64e91…64eb1 43 04 02 03 43 43 09 00 19 17 0f 1a 16 03 43 04 33 00 00 43 00 00 0a 02 03 43 43 0b 00 19 17 11 ┆C CC C 3 C CC ┆
0x64eb1…64ed1 05 03 43 33 00 00 43 00 00 0a 33 00 00 43 00 00 0a 02 03 43 43 04 02 03 43 43 0b 00 19 17 0f 0d ┆ C3 C 3 C CC CC ┆
0x64ed1…64ef1 0b 05 03 43 33 00 00 43 02 00 0a 33 00 00 43 02 00 0a 00 43 04 02 03 43 43 0d 00 19 17 0d 0b 43 ┆ C3 C 3 C C CC C┆
0x64ef1…64f11 0f 00 19 17 0f 18 0b 33 00 00 43 00 00 0a 02 03 43 0b 43 0d 00 19 17 0d 0b 1a 16 03 1f 1f 0b f4 ┆ 3 C C C ┆
0x64f11…64f30 43 19 43 11 43 13 03 43 15 33 00 00 43 11 00 0a 00 43 09 00 10 03 33 00 00 43 11 00 43 a8 00 ┆C C C C 3 C C 3 C C ┆
0x64f30…64f50 (64, 0, 10) 0b 0d 44 93 00 0a 33 00 00 43 11 00 0a 00 43 15 00 43 09 00 0e 0c 0a 03 33 00 00 43 13 00 0a 32 ┆ D 3 C C C 3 C 2┆
0x64f50…64f70 06 43 15 00 43 1c 00 0a 19 06 43 15 33 00 00 43 11 00 0a 00 43 0f 00 10 03 33 00 00 43 11 00 0a ┆ C C C 3 C C 3 C ┆
0x64f70…64f90 33 00 00 43 11 00 0a 00 43 15 00 43 0f 00 0e 0c 0a 03 43 17 32 05 43 07 00 43 15 00 43 0d 00 0a ┆3 C C C C 2 C C C ┆
0x64f90…64fb0 43 0b 00 0e 0a 33 00 00 43 11 00 0a 00 0a 43 0d 00 0a 19 06 33 00 00 43 13 00 0a 32 01 0c 0a 43 ┆C 3 C C 3 C 2 C┆
0x64fb0…64fd0 1e 00 0a 43 20 00 43 17 32 01 0c 0a 43 22 00 0a 43 20 00 06 1f 1f 1b 0b fe 40 02 9f 44 0b 81 40 ┆ C C 2 C" C @ D @┆
0x64fd0…64ff0 02 09 18 00 33 00 00 43 02 00 0a 33 00 00 43 02 00 0a 00 43 04 02 03 43 43 0d 00 19 17 0d 0b 43 ┆ 3 C 3 C C CC C┆
0x64ff0…65010 0f 00 19 17 0f 18 0b 33 00 00 43 00 00 0a 02 03 43 0b 43 0d 00 19 17 0d 0b 1a 16 03 1f 1f 0b f4 ┆ 3 C C C ┆
0x65010…6502f 43 19 43 11 43 13 03 43 15 33 00 00 43 11 00 0a 00 43 09 00 10 03 33 00 00 43 11 00 43 a8 00 ┆C C C C 3 C C 3 C C ┆
0x6502f…6504f (64, 0, 11) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x6510f…6512e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x6512e…6514e (64, 0, 12) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x6520e…6522d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x6522d…6524d (64, 0, 13) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x6530d…6532c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x6532c…6534c (64, 0, 14) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x6540c…6542b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x6542b…6544b (64, 0, 15) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x6550b…6552a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x6552a…6554a (64, 0, 16) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x6560a…65629 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x65629…65649 (64, 0, 17) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x65709…65728 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x65728…65748 (64, 0, 18) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x65808…65827 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x65827…65847 (64, 0, 19) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x65907…65926 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x65926…65946 (64, 0, 20) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x65a06…65a25 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x65a25…65a45 (64, 0, 21) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x65b05…65b24 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x65b24…65b44 (64, 0, 22) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x65c04…65c23 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x65c23…65c43 (64, 0, 23) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x65d03…65d22 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x65d22…65d42 (64, 0, 24) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x65e02…65e21 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x65e21…65e41 (64, 0, 25) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x65f01…65f20 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x65f20…65f40 (63, 0, 27) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x66000…6601f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x6601f…6603f (63, 0, 28) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x660ff…6611e 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x6611e…6613e (64, 0, 27) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x661fe…6621d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x6621d…6623d (64, 0, 28) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x6…]
0x662fd…6631c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD__UNREAD__UNREAD┆
0x6631c…6633c (66, 0, 0) 2f 2a 20 56 31 31 20 53 4b 52 49 56 45 52 20 55 54 20 4b 4f 4e 54 4f 55 54 44 52 41 47 20 26 20 ┆/* V11 SKRIVER UT KONTOUTDRAG & ┆
0x6633c…6635c 53 41 4c 44 4f 4c 49 53 54 4f 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SALDOLISTOR ┆
0x6635c…6636b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6636b…6638b (66, 0, 1) 20 20 20 46 52 5d 4e 20 53 50 45 43 49 45 4c 4c 20 50 41 52 41 4d 45 54 45 52 46 49 4c 20 49 4e ┆ FRÅN SPECIELL PARAMETERFIL IN┆
0x6638b…663ab 4e 45 48 5d 4c 4c 41 4e 44 45 20 4b 4f 4e 54 4f 49 4e 54 45 52 56 41 4c 4c 20 46 5c 52 20 42 4f ┆NEHÅLLANDE KONTOINTERVALL FÖR BO┆
0x663ab…663ba 4b 53 4c 55 54 20 20 20 20 20 20 20 20 20 20 ┆KSLUT ┆
0x663ba…663da (66, 0, 2) 20 20 20 56 20 30 3a 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ V 0:1 ┆
0x663da…663fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x663fa…66409 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66409…66429 (66, 0, 3) 20 20 20 37 39 30 35 31 35 20 4f 4c 4c 45 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 790515 OLLE */ ┆
0x66429…66449 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66449…66458 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66458…664a7 (66, 0, 4) 0x20[0x4f]
0x664a7…664c7 (66, 0, 5) 44 43 4c 20 4b 4f 4e 54 4f 31 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL KONTO1 CHAR(11), ┆
0x664c7…664e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x664e7…664f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x664f6…66516 (66, 0, 6) 20 20 20 20 4b 4f 4e 54 4f 32 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTO2 CHAR(11), ┆
0x66516…66536 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66536…66545 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66545…66565 (66, 0, 7) 20 20 20 20 52 4b 4f 4e 54 4f 31 20 43 48 41 52 28 31 33 29 20 49 4e 49 54 28 27 2d 2d 2d 2d 2d ┆ RKONTO1 CHAR(13) INIT('-----┆
0x66565…66585 2e 2d 2d 2d 2e 2d 2d 2d 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆.---.---'), ┆
0x66585…66594 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66594…665b4 (66, 0, 8) 20 20 20 20 52 4b 4f 4e 54 4f 32 20 43 48 41 52 28 31 33 29 20 49 4e 49 54 28 27 2d 2d 2d 2d 2d ┆ RKONTO2 CHAR(13) INIT('-----┆
0x665b4…665d4 2e 2d 2d 2d 2e 2d 2d 2d 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆.---.---'), ┆
0x665d4…665e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x665e3…66603 (66, 0, 9) 20 20 20 20 44 41 54 55 4d 31 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM1 CHAR(6), ┆
0x66603…66623 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66623…66632 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66632…66652 (66, 0, 10) 20 20 20 20 44 41 54 55 4d 32 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM2 CHAR(6), ┆
0x66652…66672 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66672…66681 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66681…666a1 (66, 0, 11) 20 20 20 20 44 41 54 31 42 49 4e 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DAT1BIN BINARY, ┆
0x666a1…666c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x666c1…666d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x666d0…666f0 (66, 0, 12) 20 20 20 20 44 41 54 32 42 49 4e 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DAT2BIN BINARY, ┆
0x666f0…66710 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66710…6671f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6671f…6673f (66, 0, 13) 20 20 20 20 53 50 54 59 50 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SPTYP BINARY, ┆
0x6673f…6675f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6675f…6676e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6676e…6678e (66, 0, 14) 20 20 20 20 53 54 41 42 28 31 31 29 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ STAB(11) BINARY, ┆
0x6678e…667ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x667ae…667bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x667bd…667dd (66, 0, 15) 20 20 20 20 53 5f 4d 41 52 4b 20 43 48 41 52 28 31 33 29 20 49 4e 49 54 28 27 20 20 20 20 20 2e ┆ S_MARK CHAR(13) INIT(' .┆
0x667dd…667fd 20 20 20 2e 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ . '); ┆
0x667fd…6680c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6680c…6685b (66, 0, 16) 0x20[0x4f]
0x6685b…6687b (66, 0, 17) 20 20 20 44 43 4c 20 31 20 20 50 41 52 41 50 4f 53 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DCL 1 PARAPOST, ┆
0x6687b…6689b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6689b…668aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x668aa…668ca (66, 0, 18) 20 20 20 20 20 20 20 20 20 20 32 20 20 50 4b 4f 4e 54 4f 31 20 20 20 20 20 43 48 41 52 20 28 31 ┆ 2 PKONTO1 CHAR (1┆
0x668ca…668ea 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆3), ┆
0x668ea…668f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x668f9…66919 (66, 0, 19) 20 20 20 20 20 20 20 20 20 20 32 20 20 50 4b 4f 4e 54 4f 32 20 20 20 20 20 43 48 41 52 20 28 31 ┆ 2 PKONTO2 CHAR (1┆
0x66919…66939 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆3), ┆
0x66939…66948 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66948…66968 (66, 0, 20) 20 20 20 20 20 20 20 20 20 20 32 20 20 50 44 41 47 20 20 20 20 20 20 20 20 43 48 41 52 20 28 31 ┆ 2 PDAG CHAR (1┆
0x66968…66988 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆), ┆
0x66988…66997 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66997…669b7 (66, 0, 21) 20 20 20 20 20 20 20 20 20 20 32 20 20 50 53 55 4d 20 20 20 20 20 20 20 20 43 48 41 52 20 28 31 ┆ 2 PSUM CHAR (1┆
0x669b7…669d7 33 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆3); ┆
0x669d7…669e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x669e6…66a35 (66, 0, 22) 0x20[0x4f]
0x66a35…66a55 (66, 0, 23) 44 43 4c 20 31 20 54 53 54 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 TSTR, ┆
0x66a55…66a75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66a75…66a84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66a84…66aa4 (66, 0, 24) 20 20 20 20 20 20 32 20 56 45 52 4e 52 54 20 46 49 58 45 44 28 35 29 2c 20 20 20 20 20 20 20 20 ┆ 2 VERNRT FIXED(5), ┆
0x66aa4…66ac4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66ac4…66ad3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66ad3…66af3 (66, 0, 25) 20 20 20 20 20 20 32 20 44 41 54 55 4d 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 DATUMT BINARY, ┆
0x66af3…66b13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66b13…66b22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66b22…66b42 (66, 0, 26) 20 20 20 20 20 20 32 20 54 45 58 54 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 TEXT CHAR(13), ┆
0x66b42…66b62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66b62…66b71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66b71…66b91 (66, 0, 27) 20 20 20 20 20 20 32 20 41 4e 54 56 45 52 50 20 42 49 4e 41 52 59 3b 20 20 20 20 20 20 20 20 20 ┆ 2 ANTVERP BINARY; ┆
0x66b91…66bb1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66bb1…66bc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66bc0…66c0f (66, 0, 28) 0x20[0x4f]
0x66c0f…66c2f (66, 0, 29) 44 43 4c 20 50 4b 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL PK POINTER, ┆
0x66c2f…66c4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66c4f…66c5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66c5e…66c7e (66, 0, 30) 20 20 20 20 31 20 42 53 54 52 20 42 41 53 45 44 28 50 4b 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 1 BSTR BASED(PK), ┆
0x66c7e…66c9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66c9e…66cad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66cad…66ccd (66, 0, 31) 20 20 20 20 20 20 32 20 4b 4f 4e 54 4f 4e 52 20 43 48 41 52 28 31 31 29 3b 20 20 20 20 20 20 20 ┆ 2 KONTONR CHAR(11); ┆
0x66ccd…66ced 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66ced…66cfc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66cfc…66d4b (66, 0, 32) 0x20[0x4f]
0x66d4b…66d6b (66, 0, 33) 44 43 4c 20 50 42 20 50 4f 49 4e 54 45 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL PB POINTER, ┆
0x66d6b…66d8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66d8b…66d9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66d9a…66dba (66, 0, 34) 20 20 20 20 31 20 42 45 4c 53 54 52 20 42 41 53 45 44 28 50 42 29 2c 20 20 20 20 20 20 20 20 20 ┆ 1 BELSTR BASED(PB), ┆
0x66dba…66dda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66dda…66de9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66de9…66e09 (66, 0, 35) 20 20 20 20 20 20 32 20 56 45 52 4e 52 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 VERNR BINARY, ┆
0x66e09…66e29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66e29…66e38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66e38…66e58 (66, 0, 36) 20 20 20 20 20 20 32 20 50 44 41 54 55 4d 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 ┆ 2 PDATUM BINARY, ┆
0x66e58…66e78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66e78…66e87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66e87…66ea7 (66, 0, 37) 20 20 20 20 20 20 32 20 42 45 4c 4f 50 50 20 46 49 58 45 44 28 31 31 29 3b 20 20 20 20 20 20 20 ┆ 2 BELOPP FIXED(11); ┆
0x66ea7…66ec7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66ec7…66ed6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66ed6…66f25 (66, 0, 38) 0x20[0x4f]
0x66f25…66f45 (66, 0, 39) 44 43 4c 20 31 20 41 52 45 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL 1 AREA, ┆
0x66f45…66f65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66f65…66f74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66f74…66f94 (66, 0, 40) 20 20 20 20 20 20 32 20 43 48 28 32 35 35 29 20 43 48 41 52 28 36 31 29 3b 20 20 20 20 20 20 20 ┆ 2 CH(255) CHAR(61); ┆
0x66f94…66fb4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66fb4…66fc3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x66fc3…66fe3 (66, 0, 41) 20 20 20 20 20 20 2f 2a 20 31 35 20 35 35 35 20 42 59 54 45 53 20 2a 2f 20 20 20 20 20 20 20 20 ┆ /* 15 555 BYTES */ ┆
0x66fe3…67003 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67003…67012 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67012…67061 (66, 0, 42) 0x20[0x4f]
0x67061…67081 (66, 0, 43) 44 43 4c 20 52 54 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL RTP ┆
0x67081…670a1 20 20 43 48 41 52 20 28 38 29 20 20 20 20 20 49 4e 49 54 20 28 27 30 30 30 30 30 30 30 30 27 29 ┆ CHAR (8) INIT ('00000000')┆
0x670a1…670b0 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x670b0…670ff (66, 0, 44) 0x20[0x4f]
0x670ff…6711f (66, 0, 45) 44 43 4c 20 56 45 52 54 45 58 54 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DCL VERTEXT FILE, ┆
0x6711f…6713f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6713f…6714e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6714e…6716e (66, 0, 46) 20 20 20 20 56 45 52 42 45 4c 4f 50 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ VERBELOP FILE, ┆
0x6716e…6718e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6718e…6719d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6719d…671bd (66, 0, 47) 20 20 20 20 50 41 52 41 4d 45 54 52 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PARAMETR FILE, ┆
0x671bd…671dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x671dd…671ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x671ec…6720c (66, 0, 48) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x6722c…6723b 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x6723b…6725b (66, 0, 49) 20 20 20 20 42 53 54 52 4c 20 42 49 4e 41 52 59 20 49 4e 49 54 28 36 31 29 2c 20 20 20 20 20 20 ┆ BSTRL BINARY INIT(61), ┆
0x6725b…6727b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6727b…6728a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6728a…672aa (66, 0, 50) 20 20 20 20 4d 41 58 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MAX BINARY, ┆
0x672aa…672ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x672ca…672d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x672d9…672f9 (66, 0, 51) 20 20 20 20 42 4c 4f 43 4b 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BLOCKANT BINARY, ┆
0x672f9…67319 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67319…67328 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67328…67348 (66, 0, 52) 20 20 20 20 4a 4b 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JK BINARY, ┆
0x67348…67368 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67368…67377 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67377…67397 (66, 0, 53) 20 20 20 20 4a 4a 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JJ BINARY, ┆
0x67397…673b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x673b7…673c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x673c6…673e6 (66, 0, 54) 20 20 20 20 4c 49 53 54 54 59 50 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ LISTTYP BINARY, ┆
0x673e6…67406 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67406…67415 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67415…67435 (66, 0, 55) 20 20 20 20 52 43 4f 44 45 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE BINARY, ┆
0x67435…67455 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67455…67464 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67464…67484 (66, 0, 56) 20 20 20 20 4b 4f 4e 54 4f 47 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTOG CHAR(11), ┆
0x67484…674a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x674a4…674b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x674b3…674d3 (66, 0, 57) 20 20 20 20 53 49 44 41 20 42 49 4e 41 52 59 20 49 4e 49 54 28 31 29 2c 20 20 20 20 20 20 20 20 ┆ SIDA BINARY INIT(1), ┆
0x674d3…674f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x674f3…67502 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67502…67522 (66, 0, 58) 20 20 20 20 52 20 42 49 4e 41 52 59 20 49 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ R BINARY INIT(0), ┆
0x67522…67542 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67542…67551 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67551…67571 (66, 0, 59) 20 20 20 20 52 41 44 41 4e 54 20 42 49 4e 41 52 59 20 49 4e 49 54 20 28 30 29 2c 20 20 20 20 20 ┆ RADANT BINARY INIT (0), ┆
0x67571…67591 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67591…675a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x675a0…675c0 (66, 0, 60) 20 20 20 20 4e 41 4d 4e 28 32 29 20 43 48 41 52 28 31 30 29 20 49 4e 49 54 28 27 4b 56 56 2f 4b ┆ NAMN(2) CHAR(10) INIT('KVV/K┆
0x675c0…675e0 57 41 52 4f 53 27 2c 27 41 52 4f 53 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆WAROS','AROS'), ┆
0x675e0…675ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x675ef…6760f (66, 0, 61) 20 20 20 20 52 54 45 58 54 28 38 29 20 43 48 41 52 28 32 32 29 20 49 4e 49 54 28 20 20 20 20 20 ┆ RTEXT(8) CHAR(22) INIT( ┆
0x6760f…6762f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6762f…6763e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6763e…6765e (66, 0, 62) 20 20 20 20 27 4b 4f 4e 54 4f 55 54 44 52 41 47 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'KONTOUTDRAG', ┆
0x6765e…6767e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6767e…6768d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6768d…676ad (66, 0, 63) 20 20 20 20 27 53 41 4c 44 4f 42 45 53 4b 45 44 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'SALDOBESKED', ┆
0x676ad…676cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x676cd…676dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x676dc…676fc (66, 0, 64) 20 20 20 20 27 50 45 52 44 41 47 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'PERDAG', ┆
0x676fc…6771c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6771c…6772b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6772b…6774b (66, 0, 65) 20 20 20 20 27 42 4f 4b 44 41 47 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'BOKDAG', ┆
0x6774b…6776b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6776b…6777a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6777a…6779a (66, 0, 66) 20 20 20 20 27 42 4f 4b 44 41 47 20 20 50 45 52 44 41 47 20 20 20 20 56 45 52 2e 27 2c 20 20 20 ┆ 'BOKDAG PERDAG VER.', ┆
0x6779a…677ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x677ba…677c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x677c9…677e9 (66, 0, 67) 20 20 20 20 27 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ '', ┆
0x677e9…67809 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67809…67818 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67818…67838 (66, 0, 68) 20 20 20 20 27 54 45 58 54 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 'TEXT', ┆
0x67838…67858 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67858…67867 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67867…67887 (66, 0, 69) 20 20 20 20 27 27 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ''), ┆
0x67887…678a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x678a7…678b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x678b6…678d6 (66, 0, 70) 20 20 20 20 52 4b 4f 4e 54 4f 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RKONTO CHAR(13), ┆
0x678d6…678f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x678f6…67905 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67905…67925 (66, 0, 71) 20 20 20 20 4b 4f 4e 54 4f 4e 52 47 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 ┆ KONTONRG CHAR(11), ┆
0x67925…67945 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67945…67954 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67954…67974 (66, 0, 72) 20 20 20 20 4b 4f 4e 53 54 41 4e 54 20 42 49 4e 41 52 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONSTANT BINARY, ┆
0x67974…67994 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67994…679a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x679a3…679c3 (66, 0, 73) 20 20 20 20 42 55 46 46 20 43 48 41 52 28 32 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BUFF CHAR(20), ┆
0x679c3…679e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x679e3…679f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x679f2…67a12 (66, 0, 74) 20 20 20 20 54 31 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T1 CHAR(1), ┆
0x67a12…67a32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67a32…67a41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67a41…67a61 (66, 0, 75) 20 20 20 20 54 36 31 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T61 CHAR(6), ┆
0x67a61…67a81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67a81…67a90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67a90…67ab0 (66, 0, 76) 20 20 20 20 54 36 32 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T62 CHAR(6), ┆
0x67ab0…67ad0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67ad0…67adf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67adf…67aff (66, 0, 77) 20 20 20 20 54 31 31 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T11 CHAR(11), ┆
0x67aff…67b1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67b1f…67b2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67b2e…67b4e (66, 0, 78) 20 20 20 20 54 31 33 20 43 48 41 52 28 31 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T13 CHAR(13), ┆
0x67b4e…67b6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67b6e…67b7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67b7d…67b9d (66, 0, 79) 20 20 20 20 54 31 34 20 43 48 41 52 28 31 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T14 CHAR(14), ┆
0x67b9d…67bbd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67bbd…67bcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67bcc…67bec (66, 0, 80) 20 20 20 20 4b 54 31 20 43 48 41 52 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT1 CHAR(1), ┆
0x67bec…67c0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67c0c…67c1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67c1b…67c3b (66, 0, 81) 20 20 20 20 4b 54 32 20 43 48 41 52 28 32 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT2 CHAR(2), ┆
0x67c3b…67c5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67c5b…67c6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67c6a…67c8a (67, 0, 0) 20 20 20 20 4b 54 33 20 43 48 41 52 28 33 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT3 CHAR(3), ┆
0x67c8a…67caa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67caa…67cb9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67cb9…67cd9 (67, 0, 1) 20 20 20 20 4b 54 34 20 43 48 41 52 28 34 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT4 CHAR(4), ┆
0x67cd9…67cf9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67cf9…67d08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67d08…67d28 (67, 0, 2) 20 20 20 20 4b 54 35 20 43 48 41 52 28 35 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT5 CHAR(5), ┆
0x67d28…67d48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67d48…67d57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67d57…67d77 (67, 0, 3) 20 20 20 20 4b 54 36 20 43 48 41 52 28 36 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT6 CHAR(6), ┆
0x67d77…67d97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67d97…67da6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67da6…67dc6 (67, 0, 4) 20 20 20 20 4b 54 37 20 43 48 41 52 28 37 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT7 CHAR(7), ┆
0x67dc6…67de6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67de6…67df5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67df5…67e15 (67, 0, 5) 20 20 20 20 4b 54 38 20 43 48 41 52 28 38 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT8 CHAR(8), ┆
0x67e15…67e35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67e35…67e44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67e44…67e64 (67, 0, 6) 20 20 20 20 4b 54 39 20 43 48 41 52 28 39 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT9 CHAR(9), ┆
0x67e64…67e84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67e84…67e93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67e93…67eb3 (67, 0, 7) 20 20 20 20 4b 54 31 30 20 43 48 41 52 28 31 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT10 CHAR(10), ┆
0x67eb3…67ed3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67ed3…67ee2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67ee2…67f02 (67, 0, 8) 20 20 20 20 4b 54 31 31 20 43 48 41 52 28 31 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KT11 CHAR(11), ┆
0x67f02…67f22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67f22…67f31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67f31…67f51 (67, 0, 9) 20 20 20 20 46 58 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 49 58 45 44 28 36 29 2c ┆ FX6 FIXED(6),┆
0x67f51…67f71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67f71…67f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67f80…67fa0 (67, 0, 10) 20 20 20 20 54 59 50 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 20 20 49 ┆ TYP1 BINARY I┆
0x67fa0…67fc0 4e 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NIT(0), ┆
0x67fc0…67fcf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x67fcf…67fef (67, 0, 11) 20 20 20 20 54 59 50 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 20 49 4e ┆ TYP2 BINARY IN┆
0x67fef…6800f 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT(0), ┆
0x6800f…6801e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6801e…6803e (67, 0, 12) 20 20 20 20 4f 46 46 53 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 20 49 4e ┆ OFFSET BINARY IN┆
0x6803e…6805e 49 54 28 31 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT(1), ┆
0x6805e…6806d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6806d…6808d (67, 0, 13) 20 20 20 20 4c 45 4e 47 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 20 49 4e ┆ LENGD BINARY IN┆
0x6808d…680ad 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT(0), ┆
0x680ad…680bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x680bc…680dc (67, 0, 14) 20 20 20 20 53 55 4d 4d 41 28 31 31 29 20 20 20 20 20 20 20 20 20 20 46 49 58 45 44 28 31 31 29 ┆ SUMMA(11) FIXED(11)┆
0x680dc…680fc 20 49 4e 49 54 28 28 31 31 29 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ INIT((11)0), ┆
0x680fc…6810b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6810b…6812b (67, 0, 15) 20 20 20 20 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 4f 49 4e 54 45 52 2c 20 ┆ P POINTER, ┆
0x6812b…6814b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6814b…6815a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6815a…6817a (67, 0, 16) 20 20 20 20 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 41 52 28 36 29 20 42 ┆ D CHAR(6) B┆
0x6817a…6819a 41 53 45 44 28 50 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ASED(P), ┆
0x6819a…681a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x681a9…681c9 (67, 0, 17) 20 20 20 20 44 41 54 55 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 41 52 28 36 29 2c 20 ┆ DATUM CHAR(6), ┆
0x681c9…681e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x681e9…681f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x681f8…68218 (67, 0, 18) 20 20 20 20 50 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 4f 49 4e 54 45 52 2c 20 ┆ PP POINTER, ┆
0x68218…68238 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68238…68247 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68247…68267 (67, 0, 19) 20 20 20 20 31 20 53 54 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 41 53 45 44 28 50 50 29 ┆ 1 STR BASED(PP)┆
0x68267…68287 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, ┆
0x68287…68296 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68296…682b6 (67, 0, 20) 20 20 20 20 20 20 32 20 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 41 52 28 32 29 2c 20 ┆ 2 X CHAR(2), ┆
0x682b6…682d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x682d6…682e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x682e5…68305 (67, 0, 21) 20 20 20 20 20 20 32 20 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 41 52 28 32 29 2c 20 ┆ 2 Y CHAR(2), ┆
0x68305…68325 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68325…68334 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68334…68354 (67, 0, 22) 20 20 20 20 20 20 32 20 46 49 52 4d 41 20 20 20 20 20 20 20 20 20 20 43 48 41 52 28 31 29 2c 20 ┆ 2 FIRMA CHAR(1), ┆
0x68354…68374 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68374…68383 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68383…683a3 (67, 0, 23) 20 20 20 20 54 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 41 52 28 34 29 2c 20 ┆ T4 CHAR(4), ┆
0x683a3…683c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x683c3…683d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x683d2…683f2 (67, 0, 24) 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 20 20 20 20 20 20 20 20 20 42 49 4e 41 52 59 20 49 4e ┆ ANTAL_KONT BINARY IN┆
0x683f2…68412 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT(0), ┆
0x68412…68421 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68421…68441 (67, 0, 25) 20 20 20 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 20 20 20 20 20 42 49 4e 41 52 59 20 49 4e ┆ TOT_ANTAL_KONT BINARY IN┆
0x68441…68461 49 54 28 30 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT(0), ┆
0x68461…68470 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68470…68490 (67, 0, 26) 20 20 20 20 56 45 52 53 49 4f 4e 20 43 48 41 52 28 34 37 29 20 49 4e 49 54 28 27 20 20 56 31 30 ┆ VERSION CHAR(47) INIT(' V10┆
0x68490…684b0 20 56 65 72 73 69 6f 6e 20 31 2e 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ Version 1.2 ┆
0x684b0…684bf 20 20 20 20 37 39 30 33 32 33 27 29 2c 20 20 ┆ 790323'), ┆
0x684bf…684df (67, 0, 27) 20 20 20 20 52 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RT ┆
0x684df…684ff 43 48 41 52 20 28 31 29 20 20 20 20 20 20 20 49 4e 49 54 20 28 27 31 27 29 3b 20 20 20 20 20 20 ┆CHAR (1) INIT ('1'); ┆
0x684ff…6850e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6850e…6852e (67, 0, 28) 20 20 20 20 44 43 4c 20 20 4b 46 4c 41 47 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DCL KFLAGG ┆
0x6852e…6854e 42 49 4e 41 52 59 20 20 20 20 20 20 20 20 20 49 4e 49 54 20 28 30 29 3b 20 20 20 20 20 20 20 20 ┆BINARY INIT (0); ┆
0x6854e…6855d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6855d…6857d (67, 0, 29) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x6859d…685ac 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x685ac…685cc (67, 0, 30) 52 54 53 4b 52 49 56 3a 20 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RTSKRIV: PROC; ┆
0x685cc…685ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x685ec…685fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x685fb…6861b (67, 0, 31) 20 20 20 20 20 20 20 20 57 52 49 54 45 20 46 49 4c 45 20 28 52 45 44 54 52 41 43 45 29 20 46 52 ┆ WRITE FILE (REDTRACE) FR┆
0x6861b…6863b 4f 4d 20 28 52 54 50 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OM (RTP); ┆
0x6863b…6864a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6864a…6866a (67, 0, 32) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x6866a…6868a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6868a…68699 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68699…686b9 (67, 0, 33) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x686b9…686d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x686d9…686e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x686e8…68708 (67, 0, 34) 4b 4f 4e 54 4f 52 45 44 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTORED:PROC; ┆
0x68708…68728 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68728…68737 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68737…68757 (67, 0, 35) 4b 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆K0: ┆
0x68757…68777 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68777…68786 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68786…687a6 (67, 0, 36) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 4b 30 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('K0'); ┆
0x687a6…687c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x687c6…687d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x687d5…687f5 (67, 0, 37) 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 54 ┆ IF RT = '1' THEN CALL RT┆
0x687f5…68815 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV; ┆
0x68815…68824 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68824…68844 (67, 0, 38) 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 32 3d 27 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 27 3b 20 20 20 ┆ KONTO2='-----------'; ┆
0x68844…68864 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68864…68873 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68873…68893 (67, 0, 39) 20 20 20 20 20 20 20 20 52 4b 4f 4e 54 4f 3d 27 2d 2d 2d 2d 2d 2e 2d 2d 2d 2e 2d 2d 2d 27 3b 20 ┆ RKONTO='-----.---.---'; ┆
0x68893…688b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x688b3…688c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x688c2…688e2 (67, 0, 40) 20 20 20 20 20 20 20 20 54 31 3d 53 55 42 53 54 52 28 42 55 46 46 2c 31 2c 31 29 3b 20 20 20 20 ┆ T1=SUBSTR(BUFF,1,1); ┆
0x688e2…68902 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68902…68911 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68911…68931 (67, 0, 41) 20 20 20 20 20 20 20 20 49 46 20 54 31 7f 3d 27 38 27 20 26 20 54 31 7f 3d 27 39 27 20 26 20 59 ┆ IF T1 ='8' & T1 ='9' & Y┆
0x68931…68951 3d 27 35 20 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆='5 ' THEN DO; ┆
0x68951…68960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68960…68980 (67, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 54 31 3d 53 55 42 53 54 52 28 42 55 46 46 2c 37 2c 31 29 3b 20 ┆ T1=SUBSTR(BUFF,7,1); ┆
0x68980…689a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x689a0…689af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x689af…689cf (67, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 49 3d 36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=6; ┆
0x689cf…689ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x689ef…689fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x689fe…68a1e (67, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 37 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=7; ┆
0x68a1e…68a3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68a3e…68a4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68a4d…68a6d (67, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 54 59 50 32 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TYP2=1; ┆
0x68a6d…68a8d 20 20 2f 2a 20 20 55 4e 44 45 52 4b 4f 4e 54 4f 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ /* UNDERKONTO */ ┆
0x68a8d…68a9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68a9c…68abc (67, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 38 39 27 ┆ IF INDEX('0123456789'┆
0x68abc…68adc 2c 54 31 29 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 31 3b 20 20 20 20 20 20 20 20 20 20 ┆,T1) =0 THEN GO TO K1; ┆
0x68adc…68aeb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68aeb…68b0b (67, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 54 31 3d 53 55 42 53 54 52 28 42 55 46 46 2c 31 31 2c 31 29 3b ┆ T1=SUBSTR(BUFF,11,1);┆
0x68b0b…68b2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68b2b…68b3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68b3a…68b5a (67, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 49 3d 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=9; ┆
0x68b5a…68b7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68b7a…68b89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68b89…68ba9 (67, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=11; ┆
0x68ba9…68bc9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68bc9…68bd8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68bd8…68bf8 (67, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 54 59 50 32 3d 32 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 20 ┆ TYP2=2; /* ┆
0x68bf8…68c18 49 4b 2d 53 4c 41 47 20 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IK-SLAG */ ┆
0x68c18…68c27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68c27…68c47 (67, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 38 39 27 ┆ IF INDEX('0123456789'┆
0x68c47…68c67 2c 54 31 29 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 55 54 3b 20 20 20 20 20 20 20 20 20 20 ┆,T1)=0 THEN GO TO KUT; ┆
0x68c67…68c76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68c76…68c96 (67, 0, 52) 4b 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆K1: ┆
0x68c96…68cb6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68cb6…68cc5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68cc5…68ce5 (67, 0, 53) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 4b 31 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('K1'); ┆
0x68ce5…68d05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68d05…68d14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68d14…68d34 (67, 0, 54) 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 54 53 4b 52 49 ┆ IF RT = '1' THEN CALL RTSKRI┆
0x68d34…68d54 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆V; ┆
0x68d54…68d63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68d63…68d83 (67, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 4b 3d 31 20 54 4f 20 33 3b 20 20 20 20 20 20 20 20 20 ┆ DO K=1 TO 3; ┆
0x68d83…68da3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68da3…68db2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68db2…68dd2 (67, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 32 2c 49 2c 31 29 ┆ SUBSTR(KONTO2,I,1)┆
0x68dd2…68df2 3d 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=T1; ┆
0x68df2…68e01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68e01…68e21 (67, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 52 4b 4f 4e 54 4f 2c 4a 2c 31 29 ┆ SUBSTR(RKONTO,J,1)┆
0x68e21…68e41 3d 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=T1; ┆
0x68e41…68e50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68e50…68e70 (67, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 31 3d 53 55 42 53 54 52 28 42 55 46 46 2c 4a 2b 31 ┆ T1=SUBSTR(BUFF,J+1┆
0x68e70…68e90 2c 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,1); ┆
0x68e90…68e9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68e9f…68ebf (67, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 ┆ IF INDEX('01234567┆
0x68ebf…68edf 38 39 27 2c 54 31 29 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 55 54 3b 20 20 20 20 20 20 20 ┆89',T1)=0 THEN GO TO KUT; ┆
0x68edf…68eee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68eee…68f0e (67, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 3d 4a 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J+1; ┆
0x68f0e…68f2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68f2e…68f3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68f3d…68f5d (67, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 3d 49 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=I+1; ┆
0x68f5d…68f7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68f7d…68f8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68f8c…68fac (67, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x68fac…68fcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68fcc…68fdb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x68fdb…68ffb (67, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4b 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO KUT; ┆
0x68ffb…6901b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6901b…6902a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6902a…6904a (67, 0, 64) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6904a…6906a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6906a…69079 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69079…69099 (67, 0, 65) 20 20 20 20 20 20 20 20 4a 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=0; ┆
0x69099…690b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x690b9…690c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x690c8…690e8 (67, 0, 66) 20 20 20 20 20 20 20 20 54 59 50 32 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TYP2=0; ┆
0x690e8…69108 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69108…69117 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69117…69137 (67, 0, 67) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 11; ┆
0x69137…69157 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69157…69166 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69166…69186 (67, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 3d 36 20 7c 20 49 3d 39 20 54 48 45 4e 20 4a 3d 4a ┆ IF I=6 ö I=9 THEN J=J┆
0x69186…691a6 2b 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆+2; ┆
0x691a6…691b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x691b5…691d5 (67, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 4a 3d 4a 2b 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ ELSE J=J+1; ┆
0x691d5…691f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x691f5…69204 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69204…69224 (67, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 54 31 3d 53 55 42 53 54 52 28 42 55 46 46 2c 4a 2c 31 29 3b 20 ┆ T1=SUBSTR(BUFF,J,1); ┆
0x69224…69244 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69244…69253 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69253…69273 (67, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 38 39 27 ┆ IF INDEX('0123456789'┆
0x69273…69293 2c 54 31 29 3d 30 20 26 20 4c 45 4e 47 44 3e 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4b 55 54 3b ┆,T1)=0 & LENGD>0 THEN GO TO KUT;┆
0x69293…692a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x692a2…692c2 (67, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 4e 44 45 58 28 27 30 31 32 33 34 35 36 37 38 39 27 ┆ IF INDEX('0123456789'┆
0x692c2…692e2 2c 54 31 29 7f 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,T1) =0 THEN DO; ┆
0x692e2…692f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x692f1…69311 (67, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 32 2c 49 2c 31 29 ┆ SUBSTR(KONTO2,I,1)┆
0x69311…69331 3d 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=T1; ┆
0x69331…69340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69340…69360 (67, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 52 4b 4f 4e 54 4f 2c 4a 2c 31 29 ┆ SUBSTR(RKONTO,J,1)┆
0x69360…69380 3d 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=T1; ┆
0x69380…6938f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6938f…693af (67, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 45 4e 47 44 3d 4c 45 4e 47 44 2b 31 3b 20 20 20 20 ┆ LENGD=LENGD+1; ┆
0x693af…693cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x693cf…693de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x693de…693fe (67, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x693fe…6941e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6941e…6942d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6942d…6944d (67, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x6944d…6946d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6946d…6947c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6947c…6949c (67, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 46 46 53 45 54 3d 4f 46 46 53 45 54 2b 31 3b 20 20 ┆ OFFSET=OFFSET+1; ┆
0x6949c…694bc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x694bc…694cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x694cb…694eb (67, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 32 2c 49 2c 31 29 ┆ SUBSTR(KONTO2,I,1)┆
0x694eb…6950b 3d 27 2d 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆='-'; ┆
0x6950b…6951a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6951a…6953a (67, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 52 4b 4f 4e 54 4f 2c 4a 2c 31 29 ┆ SUBSTR(RKONTO,J,1)┆
0x6953a…6955a 3d 27 2d 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆='-'; ┆
0x6955a…69569 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69569…69589 (67, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x69589…695a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x695a9…695b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x695b8…695d8 (68, 0, 0) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x695d8…695f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x695f8…69607 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69607…69627 (68, 0, 1) 4b 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KUT: ┆
0x69627…69647 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69647…69656 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69656…69676 (68, 0, 2) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 4b 55 54 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('KUT'); ┆
0x69676…69696 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69696…696a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x696a5…696c5 (68, 0, 3) 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 54 ┆ IF RT = '1' THEN CALL RT┆
0x696c5…696e5 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV; ┆
0x696e5…696f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x696f4…69714 (68, 0, 4) 20 20 20 20 20 20 20 20 49 46 20 4b 46 4c 41 47 47 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF KFLAGG=0 THEN DO; ┆
0x69714…69734 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69734…69743 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69743…69763 (68, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 31 3d 4b 4f 4e 54 4f 32 3b 20 20 20 20 20 20 20 ┆ KONTO1=KONTO2; ┆
0x69763…69783 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69783…69792 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69792…697b2 (68, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 4b 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KFLAGG=1; ┆
0x697b2…697d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x697d2…697e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x697e1…69801 (68, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 54 59 50 31 3d 54 59 50 32 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ TYP1=TYP2; ┆
0x69801…69821 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69821…69830 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69830…69850 (68, 0, 8) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x69850…69870 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69870…6987f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6987f…698ce (68, 0, 9) 0x20[0x4f]
0x698ce…698ee (68, 0, 10) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x698ee…6990e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6990e…6991d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6991d…6993d (68, 0, 11) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x6993d…6995d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6995d…6996c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6996c…699bb (68, 0, 12) 0x20[0x4f]
0x699bb…699db (68, 0, 13) 53 52 45 44 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SRED:PROC; ┆
0x699db…699fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x699fb…69a0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69a0a…69a2a (68, 0, 14) 53 52 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SR10: ┆
0x69a2a…69a4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69a4a…69a59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69a59…69a79 (68, 0, 15) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 52 31 30 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ RTP = ('SR10'); ┆
0x69a79…69a99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69a99…69aa8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69aa8…69ac8 (68, 0, 16) 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 54 ┆ IF RT = '1' THEN CALL RT┆
0x69ac8…69ae8 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV; ┆
0x69ae8…69af7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69af7…69b17 (68, 0, 17) 20 20 20 20 20 20 20 20 4a 3d 31 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=14; ┆
0x69b17…69b37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69b37…69b46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69b46…69b95 (68, 0, 18) 0x20[0x4f]
0x69b95…69bb5 (68, 0, 19) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 31 20 54 4f 20 31 20 42 59 20 2d 31 3b 20 20 20 20 20 ┆ DO I=11 TO 1 BY -1; ┆
0x69bb5…69bd5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69bd5…69be4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69be4…69c04 (68, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 49 3d 35 29 20 7c 20 28 49 3d 38 29 20 54 48 45 4e ┆ IF (I=5) ö (I=8) THEN┆
0x69c04…69c24 20 4a 3d 4a 2d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=J-2; ┆
0x69c24…69c33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69c33…69c53 (68, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 4a 3d 4a 2d 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ ELSE J=J-1; ┆
0x69c53…69c73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69c73…69c82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69c82…69ca2 (68, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 42 55 46 46 2c 4a 2c 31 29 3d 27 ┆ IF SUBSTR(BUFF,J,1)='┆
0x69ca2…69cc2 53 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆S' THEN DO; ┆
0x69cc2…69cd1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69cd1…69cf1 (68, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 42 28 49 29 3d 31 3b 20 20 20 20 20 20 20 20 ┆ STAB(I)=1; ┆
0x69cf1…69d11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69d11…69d20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69d20…69d40 (68, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 53 5f 4d 41 52 4b 2c 4a 2c 31 29 ┆ SUBSTR(S_MARK,J,1)┆
0x69d40…69d60 3d 27 53 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆='S'; ┆
0x69d60…69d6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69d6f…69d8f (68, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x69d8f…69daf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69daf…69dbe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69dbe…69dde (68, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x69dde…69dfe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69dfe…69e0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69e0d…69e2d (68, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 42 28 49 29 3d 30 3b 20 20 20 20 20 20 20 20 ┆ STAB(I)=0; ┆
0x69e2d…69e4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69e4d…69e5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69e5c…69e7c (68, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x69e7c…69e9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69e9c…69eab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69eab…69ecb (68, 0, 29) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x69ecb…69eeb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69eeb…69efa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69efa…69f1a (68, 0, 30) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x69f1a…69f3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69f3a…69f49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69f49…69f69 (68, 0, 31) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x69f69…69f89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69f89…69f98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x69f98…69fe7 (68, 0, 32) 0x20[0x4f]
0x69fe7…6a007 (68, 0, 33) 52 55 42 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RUB:PROC; ┆
0x6a007…6a027 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a027…6a036 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a036…6a056 (68, 0, 34) 52 55 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RU10: ┆
0x6a056…6a076 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a076…6a085 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a085…6a0a5 (68, 0, 35) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 52 55 31 30 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ RTP = ('RU10'); ┆
0x6a0a5…6a0c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a0c5…6a0d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a0d4…6a0f4 (68, 0, 36) 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 54 ┆ IF RT = '1' THEN CALL RT┆
0x6a0f4…6a114 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV; ┆
0x6a114…6a123 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a123…6a143 (68, 0, 37) 20 20 20 20 20 20 20 20 49 5f 52 3d 4c 49 53 54 54 59 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I_R=LISTTYP; ┆
0x6a143…6a163 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a163…6a172 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a172…6a192 (68, 0, 38) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 2b 33 29 20 45 44 49 54 28 4e 41 4d 4e 28 ┆ PUT SKIP(R+3) EDIT(NAMN(┆
0x6a192…6a1b2 46 49 52 4d 41 2d 37 29 29 28 41 28 32 30 29 29 28 52 54 45 58 54 28 49 5f 52 29 29 28 41 28 33 ┆FIRMA-7))(A(20))(RTEXT(I_R))(A(3┆
0x6a1b2…6a1c1 35 29 29 28 27 31 39 27 29 28 41 29 20 20 20 ┆5))('19')(A) ┆
0x6a1c1…6a1e1 (68, 0, 39) 20 20 20 20 20 20 20 20 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 31 2c 32 29 29 28 41 29 28 27 ┆ (SUBSTR(DATUM,1,2))(A)('┆
0x6a1e1…6a201 2d 27 29 28 41 29 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 33 2c 32 29 29 28 41 29 28 27 2d 27 ┆-')(A)(SUBSTR(DATUM,3,2))(A)('-'┆
0x6a201…6a210 29 28 41 29 20 20 20 20 20 20 20 20 20 20 20 ┆)(A) ┆
0x6a210…6a230 (68, 0, 40) 20 20 20 20 20 20 20 20 28 53 55 42 53 54 52 28 44 41 54 55 4d 2c 35 2c 32 29 29 28 41 28 35 29 ┆ (SUBSTR(DATUM,5,2))(A(5)┆
0x6a230…6a250 29 28 27 53 49 44 27 29 28 41 28 34 29 29 28 53 49 44 41 29 28 41 29 20 53 4b 49 50 20 45 44 49 ┆)('SID')(A(4))(SIDA)(A) SKIP EDI┆
0x6a250…6a25f 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T ┆
0x6a25f…6a27f (68, 0, 41) 20 20 20 20 20 20 20 20 28 27 46 72 2e 6f 2e 6d 20 6b 6f 6e 74 6f 27 29 28 41 28 31 33 29 29 28 ┆ ('Fr.o.m konto')(A(13))(┆
0x6a27f…6a29f 52 4b 4f 4e 54 4f 31 29 28 41 29 28 27 2c 20 74 69 6c 6c 20 6b 6f 6e 74 6f 27 29 28 41 28 31 33 ┆RKONTO1)(A)(', till konto')(A(13┆
0x6a29f…6a2ae 29 29 28 52 4b 4f 4e 54 4f 32 29 20 20 20 20 ┆))(RKONTO2) ┆
0x6a2ae…6a2ce (68, 0, 42) 20 20 20 20 20 20 20 20 28 41 29 20 53 4b 49 50 20 45 44 49 54 28 27 20 27 29 28 41 28 31 33 29 ┆ (A) SKIP EDIT(' ')(A(13)┆
0x6a2ce…6a2ee 29 28 53 5f 4d 41 52 4b 29 28 41 29 20 53 4b 49 50 20 45 44 49 54 28 27 46 72 2e 6f 2e 6d 20 64 ┆)(S_MARK)(A) SKIP EDIT('Fr.o.m d┆
0x6a2ee…6a2fd 61 74 75 6d 27 29 28 41 28 31 33 29 29 20 20 ┆atum')(A(13)) ┆
0x6a2fd…6a31d (68, 0, 43) 20 20 20 20 20 20 20 20 28 44 41 54 55 4d 31 29 28 41 28 37 29 29 28 27 74 69 6c 6c 20 64 61 74 ┆ (DATUM1)(A(7))('till dat┆
0x6a31d…6a33d 75 6d 27 29 28 41 28 31 31 29 29 28 44 41 54 55 4d 32 29 28 41 28 37 29 29 28 27 6d 2e 61 2e 70 ┆um')(A(11))(DATUM2)(A(7))('m.a.p┆
0x6a33d…6a34c 27 29 28 41 28 36 29 29 20 20 20 20 20 20 20 ┆')(A(6)) ┆
0x6a34c…6a36c (68, 0, 44) 20 20 20 20 20 20 20 20 28 52 54 45 58 54 28 53 50 54 59 50 2b 32 29 29 28 41 29 20 53 4b 49 50 ┆ (RTEXT(SPTYP+2))(A) SKIP┆
0x6a36c…6a38c 20 45 44 49 54 28 27 20 27 29 28 41 28 31 32 29 29 28 27 4b 4f 4e 54 4f 27 29 28 41 28 31 38 29 ┆ EDIT(' ')(A(12))('KONTO')(A(18)┆
0x6a38c…6a39b 29 28 52 54 45 58 54 28 49 5f 52 2b 34 29 29 ┆)(RTEXT(I_R+4))┆
0x6a39b…6a3bb (68, 0, 45) 20 20 20 20 20 20 20 20 28 41 29 28 27 20 27 29 28 41 28 36 29 29 28 27 42 45 4c 4f 50 50 27 29 ┆ (A)(' ')(A(6))('BELOPP')┆
0x6a3bb…6a3db 28 41 28 31 33 29 29 28 52 54 45 58 54 28 49 5f 52 2b 36 29 29 28 41 29 20 53 4b 49 50 3b 20 20 ┆(A(13))(RTEXT(I_R+6))(A) SKIP; ┆
0x6a3db…6a3ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a3ea…6a40a (68, 0, 46) 20 20 20 20 20 20 20 20 53 49 44 41 3d 53 49 44 41 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SIDA=SIDA+1; ┆
0x6a40a…6a42a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a42a…6a439 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a439…6a459 (68, 0, 47) 20 20 20 20 20 20 20 20 52 20 3d 20 52 41 44 41 4e 54 20 2d 20 38 3b 20 20 20 20 20 20 20 20 20 ┆ R = RADANT - 8; ┆
0x6a459…6a479 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a479…6a488 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a488…6a4a8 (68, 0, 48) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x6a4a8…6a4c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a4c8…6a4d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a4d7…6a4f7 (68, 0, 49) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x6a4f7…6a517 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a517…6a526 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a526…6a575 (68, 0, 50) 0x20[0x4f]
0x6a575…6a595 (68, 0, 51) 53 54 59 52 44 41 54 41 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STYRDATA:PROC; ┆
0x6a595…6a5b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a5b5…6a5c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a5c4…6a5e4 (68, 0, 52) 53 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆S0: ┆
0x6a5e4…6a604 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a604…6a613 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a613…6a633 (68, 0, 53) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 30 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('S0'); ┆
0x6a633…6a653 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a653…6a662 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a662…6a682 (68, 0, 54) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6a682…6a6a2 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6a6a2…6a6b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a6b1…6a6d1 (68, 0, 55) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆ PUT FILE(D) SKIP EDIT(VE┆
0x6a6d1…6a6f1 52 53 49 4f 4e 29 28 41 28 34 39 29 29 28 27 20 20 20 20 20 20 20 20 27 29 28 41 28 34 37 29 29 ┆RSION)(A(49))(' ')(A(47))┆
0x6a6f1…6a700 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x6a700…6a720 (68, 0, 56) 20 20 20 20 20 20 20 20 4a 20 3d 20 39 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 94; ┆
0x6a720…6a740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a740…6a74f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a74f…6a76f (68, 0, 57) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6a76f…6a78f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a78f…6a79e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a79e…6a7be (68, 0, 58) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 27 46 72 2e 6f ┆ PUT FILE (D) EDIT ('Fr.o┆
0x6a7be…6a7de 2e 6d 2e 20 64 61 74 75 6d 3a 27 29 20 28 41 28 34 31 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆.m. datum:') (A(41)); ┆
0x6a7de…6a7ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a7ed…6a80d (68, 0, 59) 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 44 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GET LIST (D); ┆
0x6a80d…6a82d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a82d…6a83c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a83c…6a85c (68, 0, 60) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 20 28 44 41 54 55 4d 31 29 3b 20 ┆ CALL DATCHECK (DATUM1); ┆
0x6a85c…6a87c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a87c…6a88b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a88b…6a8ab (68, 0, 61) 20 20 20 20 20 20 20 20 4a 20 3d 20 31 33 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 135; ┆
0x6a8ab…6a8cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a8cb…6a8da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a8da…6a8fa (68, 0, 62) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6a8fa…6a91a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a91a…6a929 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a929…6a949 (68, 0, 63) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 44 41 54 55 4d ┆ PUT FILE (D) EDIT (DATUM┆
0x6a949…6a969 31 29 20 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1) (A); ┆
0x6a969…6a978 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a978…6a998 (68, 0, 64) 20 20 20 20 20 20 20 20 4a 20 3d 20 31 34 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 141; ┆
0x6a998…6a9b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a9b8…6a9c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6a9c7…6a9e7 (68, 0, 65) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6a9e7…6aa07 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6aa07…6aa16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6aa16…6aa36 (68, 0, 66) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 27 54 69 6c 6c ┆ PUT FILE (D) EDIT ('Till┆
0x6aa36…6aa56 20 64 61 74 75 6d 3a 27 29 20 28 41 28 34 31 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ datum:') (A(41)); ┆
0x6aa56…6aa65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6aa65…6aa85 (68, 0, 67) 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 44 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GET LIST (D); ┆
0x6aa85…6aaa5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6aaa5…6aab4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6aab4…6aad4 (68, 0, 68) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 20 28 44 41 54 55 4d 32 29 3b 20 ┆ CALL DATCHECK (DATUM2); ┆
0x6aad4…6aaf4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6aaf4…6ab03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ab03…6ab23 (68, 0, 69) 20 20 20 20 20 20 20 20 4a 20 3d 20 31 38 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 182; ┆
0x6ab23…6ab43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ab43…6ab52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ab52…6ab72 (68, 0, 70) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6ab72…6ab92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ab92…6aba1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6aba1…6abc1 (68, 0, 71) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 44 41 54 55 4d ┆ PUT FILE (D) EDIT (DATUM┆
0x6abc1…6abe1 32 29 20 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2) (A); ┆
0x6abe1…6abf0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6abf0…6ac10 (68, 0, 72) 20 20 20 20 20 20 20 20 49 46 20 20 44 41 54 55 4d 31 20 20 3e 3d 20 20 20 44 41 54 55 4d 32 20 ┆ IF DATUM1 >= DATUM2 ┆
0x6ac10…6ac30 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ THEN GO TO S0; ┆
0x6ac30…6ac3f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ac3f…6ac5f (68, 0, 73) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x6ac5f…6ac7f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ac7f…6ac8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ac8e…6acae (68, 0, 74) 20 20 20 20 20 20 20 20 49 46 20 54 59 50 31 3d 31 20 54 48 45 4e 20 59 3d 27 36 20 27 3b 20 20 ┆ IF TYP1=1 THEN Y='6 '; ┆
0x6acae…6acce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6acce…6acdd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6acdd…6acfd (68, 0, 75) 20 20 20 20 20 20 20 20 49 46 20 54 59 50 31 3d 32 20 54 48 45 4e 20 59 3d 27 37 20 27 3b 20 20 ┆ IF TYP1=2 THEN Y='7 '; ┆
0x6acfd…6ad1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ad1d…6ad2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ad2c…6ad4c (68, 0, 76) 20 20 20 20 20 20 20 20 49 46 20 59 3d 27 34 20 27 20 54 48 45 4e 20 4c 49 53 54 54 59 50 3d 31 ┆ IF Y='4 ' THEN LISTTYP=1┆
0x6ad4c…6ad6c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x6ad6c…6ad7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ad7b…6ad9b (68, 0, 77) 20 20 20 20 20 20 20 20 45 4c 53 45 20 4c 49 53 54 54 59 50 3d 32 3b 20 20 20 20 20 20 20 20 20 ┆ ELSE LISTTYP=2; ┆
0x6ad9b…6adbb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6adbb…6adca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6adca…6adea (68, 0, 78) 20 20 20 20 20 20 20 20 44 41 54 31 42 49 4e 3d 33 37 32 2a 28 53 55 42 53 54 52 28 44 41 54 55 ┆ DAT1BIN=372*(SUBSTR(DATU┆
0x6adea…6ae0a 4d 31 2c 31 2c 32 29 2d 37 38 29 2b 33 31 2a 28 53 55 42 53 54 52 28 44 41 54 55 4d 31 2c 33 2c ┆M1,1,2)-78)+31*(SUBSTR(DATUM1,3,┆
0x6ae0a…6ae19 32 29 2d 31 29 2b 20 20 20 20 20 20 20 20 20 ┆2)-1)+ ┆
0x6ae19…6ae39 (68, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 44 41 54 55 4d 31 2c 35 2c 32 29 2d 31 3b ┆ SUBSTR(DATUM1,5,2)-1;┆
0x6ae39…6ae59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ae59…6ae68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ae68…6ae88 (68, 0, 80) 20 20 20 20 20 20 20 20 44 41 54 32 42 49 4e 3d 33 37 32 2a 28 53 55 42 53 54 52 28 44 41 54 55 ┆ DAT2BIN=372*(SUBSTR(DATU┆
0x6ae88…6aea8 4d 32 2c 31 2c 32 29 2d 37 38 29 2b 33 31 2a 28 53 55 42 53 54 52 28 44 41 54 55 4d 32 2c 33 2c ┆M2,1,2)-78)+31*(SUBSTR(DATUM2,3,┆
0x6aea8…6aeb7 32 29 2d 31 29 2b 20 20 20 20 20 20 20 20 20 ┆2)-1)+ ┆
0x6aeb7…6aed7 (68, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 44 41 54 55 4d 32 2c 35 2c 32 29 2d 31 3b ┆ SUBSTR(DATUM2,5,2)-1;┆
0x6aed7…6aef7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6aef7…6af06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6af06…6af26 (69, 0, 0) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x6af26…6af46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6af46…6af55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6af55…6af75 (69, 0, 1) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x6af75…6af95 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6af95…6afa4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6afa4…6aff3 (69, 0, 2) 0x20[0x4f]
0x6aff3…6b013 (69, 0, 3) 50 41 52 41 4c 41 45 53 3a 20 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PARALAES: PROC; ┆
0x6b013…6b033 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b033…6b042 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b042…6b062 (69, 0, 4) 50 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P10: ┆
0x6b062…6b082 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b082…6b091 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b091…6b0b1 (69, 0, 5) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 50 31 30 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('P10'); ┆
0x6b0b1…6b0d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b0d1…6b0e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b0e0…6b100 (69, 0, 6) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6b100…6b120 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6b120…6b12f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b12f…6b14f (69, 0, 7) 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 50 38 30 3b 20 20 20 20 20 ┆ ON ERROR GO TO P80; ┆
0x6b14f…6b16f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b16f…6b17e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b17e…6b19e (69, 0, 8) 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 ┆ ON ENDFILE GO TO SLUT; ┆
0x6b19e…6b1be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b1be…6b1cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b1cd…6b1ed (69, 0, 9) 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 20 28 50 41 52 41 4d 45 54 52 29 20 49 4e 54 ┆ READ FILE (PARAMETR) INT┆
0x6b1ed…6b20d 4f 20 28 50 41 52 41 50 4f 53 54 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O (PARAPOST); ┆
0x6b20d…6b21c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b21c…6b23c (69, 0, 10) 20 20 20 20 20 20 20 20 4a 20 3d 20 32 33 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 235; ┆
0x6b23c…6b25c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b25c…6b26b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b26b…6b28b (69, 0, 11) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6b28b…6b2ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b2ab…6b2ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b2ba…6b2da (69, 0, 12) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 27 46 72 2e 6f ┆ PUT FILE (D) EDIT ('Fr.o┆
0x6b2da…6b2fa 2e 6d 20 4b 4f 4e 54 4f 3a 27 29 20 28 41 28 33 34 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆.m KONTO:') (A(34)); ┆
0x6b2fa…6b309 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b309…6b329 (69, 0, 13) 20 20 20 20 20 20 20 20 4a 20 3d 20 32 36 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 269; ┆
0x6b329…6b349 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b349…6b358 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b358…6b378 (69, 0, 14) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6b378…6b398 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b398…6b3a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b3a7…6b3c7 (69, 0, 15) 20 20 20 20 20 20 20 20 42 55 46 46 20 20 20 20 3d 20 20 50 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 ┆ BUFF = PKONTO1; ┆
0x6b3c7…6b3e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b3e7…6b3f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b3f6…6b416 (69, 0, 16) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 52 45 44 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL KONTORED; ┆
0x6b416…6b436 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b436…6b445 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b445…6b465 (69, 0, 17) 20 20 20 20 20 20 20 20 52 4b 4f 4e 54 4f 31 20 3d 20 52 4b 4f 4e 54 4f 3b 20 20 20 20 20 20 20 ┆ RKONTO1 = RKONTO; ┆
0x6b465…6b485 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b485…6b494 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b494…6b4b4 (69, 0, 18) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 52 4b 4f 4e 54 ┆ PUT FILE (D) EDIT (RKONT┆
0x6b4b4…6b4d4 4f 31 29 20 28 41 28 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O1) (A(6)); ┆
0x6b4d4…6b4e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b4e3…6b503 (69, 0, 19) 20 20 20 20 20 20 20 20 4a 20 3d 20 32 38 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 282; ┆
0x6b503…6b523 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b523…6b532 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b532…6b552 (69, 0, 20) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6b552…6b572 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b572…6b581 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b581…6b5a1 (69, 0, 21) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 27 54 69 6c 6c ┆ PUT FILE (D) EDIT ('Till┆
0x6b5a1…6b5c1 20 4b 4f 4e 54 4f 3a 27 29 20 28 41 28 33 34 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KONTO:') (A(34)); ┆
0x6b5c1…6b5d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b5d0…6b5f0 (69, 0, 22) 20 20 20 20 20 20 20 20 4a 20 3d 20 33 31 36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 316; ┆
0x6b5f0…6b610 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b610…6b61f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b61f…6b63f (69, 0, 23) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6b63f…6b65f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b65f…6b66e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b66e…6b68e (69, 0, 24) 20 20 20 20 20 20 20 20 42 55 46 46 20 20 20 20 3d 20 50 4b 4f 4e 54 4f 32 3b 20 20 20 20 20 20 ┆ BUFF = PKONTO2; ┆
0x6b68e…6b6ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b6ae…6b6bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b6bd…6b6dd (69, 0, 25) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 52 45 44 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL KONTORED; ┆
0x6b6dd…6b6fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b6fd…6b70c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b70c…6b72c (69, 0, 26) 20 20 20 20 20 20 20 20 52 4b 4f 4e 54 4f 32 20 3d 20 52 4b 4f 4e 54 4f 3b 20 20 20 20 20 20 20 ┆ RKONTO2 = RKONTO; ┆
0x6b72c…6b74c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b74c…6b75b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b75b…6b77b (69, 0, 27) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 52 4b 4f 4e 54 ┆ PUT FILE (D) EDIT (RKONT┆
0x6b77b…6b79b 4f 32 29 20 28 41 28 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O2) (A(6)); ┆
0x6b79b…6b7aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b7aa…6b7ca (69, 0, 28) 20 20 20 20 20 20 20 20 4a 20 3d 20 33 32 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 329; ┆
0x6b7ca…6b7ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b7ea…6b7f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b7f9…6b819 (69, 0, 29) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6b819…6b839 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b839…6b848 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b848…6b868 (69, 0, 30) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 27 53 75 6d 6d ┆ PUT FILE (D) EDIT ('Summ┆
0x6b868…6b888 65 72 69 6e 67 3a 27 29 20 28 41 28 33 34 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ering:') (A(34)); ┆
0x6b888…6b897 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b897…6b8b7 (69, 0, 31) 20 20 20 20 20 20 20 20 4a 20 3d 20 33 36 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 363; ┆
0x6b8b7…6b8d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b8d7…6b8e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b8e6…6b906 (69, 0, 32) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6b906…6b926 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b926…6b935 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b935…6b955 (69, 0, 33) 20 20 20 20 20 20 20 20 53 5f 4d 41 52 4b 20 3d 20 50 53 55 4d 3b 20 20 20 20 20 20 20 20 20 20 ┆ S_MARK = PSUM; ┆
0x6b955…6b975 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b975…6b984 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b984…6b9a4 (69, 0, 34) 20 20 20 20 20 20 20 20 53 5f 4d 41 52 4b 20 3d 20 28 27 53 53 53 20 20 2e 20 20 20 2e 20 20 20 ┆ S_MARK = ('SSS . . ┆
0x6b9a4…6b9c4 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'); ┆
0x6b9c4…6b9d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6b9d3…6b9f3 (69, 0, 35) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 52 45 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL SRED; ┆
0x6b9f3…6ba13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ba13…6ba22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ba22…6ba42 (69, 0, 36) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 53 5f 4d 41 52 ┆ PUT FILE (D) EDIT (S_MAR┆
0x6ba42…6ba62 4b 29 20 28 41 28 31 33 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆K) (A(13)); ┆
0x6ba62…6ba71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ba71…6ba91 (69, 0, 37) 20 20 20 20 20 20 20 20 4a 20 3d 20 33 37 36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 376; ┆
0x6ba91…6bab1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bab1…6bac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bac0…6bae0 (69, 0, 38) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6bae0…6bb00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bb00…6bb0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bb0f…6bb2f (69, 0, 39) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 28 27 44 61 74 75 ┆ PUT FILE (D) EDIT ('Datu┆
0x6bb2f…6bb4f 6d 74 79 70 3a 27 29 20 28 41 28 34 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆mtyp:') (A(46)); ┆
0x6bb4f…6bb5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bb5e…6bb7e (69, 0, 40) 20 20 20 20 20 20 20 20 4a 20 3d 20 34 32 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J = 422; ┆
0x6bb7e…6bb9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bb9e…6bbad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bbad…6bbcd (69, 0, 41) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4d 4f 56 45 42 55 46 46 20 28 4a 29 3b 20 20 20 20 20 20 ┆ CALL MOVEBUFF (J); ┆
0x6bbcd…6bbed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bbed…6bbfc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bbfc…6bc1c (69, 0, 42) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 50 44 41 47 20 28 ┆ PUT FILE (D) EDIT PDAG (┆
0x6bc1c…6bc3c 41 28 31 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A(1)); ┆
0x6bc3c…6bc4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bc4b…6bc6b (69, 0, 43) 20 20 20 20 20 20 20 20 53 50 54 59 50 20 3d 20 50 44 41 47 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ SPTYP = PDAG; ┆
0x6bc6b…6bc8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bc8b…6bc9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bc9a…6bcba (69, 0, 44) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 50 39 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO P99; ┆
0x6bcba…6bcda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bcda…6bce9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bce9…6bd09 (69, 0, 45) 50 38 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P80: ┆
0x6bd09…6bd29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bd29…6bd38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bd38…6bd58 (69, 0, 46) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 4c 5b 53 46 45 4c 20 49 ┆ PUT SKIP LIST ('LÄSFEL I┆
0x6bd58…6bd78 20 50 41 52 41 4d 45 54 45 52 46 49 4c 45 4e 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PARAMETERFILEN'); ┆
0x6bd78…6bd87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bd87…6bda7 (69, 0, 47) 50 39 39 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P99: ┆
0x6bda7…6bdc7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bdc7…6bdd6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bdd6…6bdf6 (69, 0, 48) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x6bdf6…6be16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6be16…6be25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6be25…6be45 (69, 0, 49) 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6be45…6be65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6be65…6be74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6be74…6be94 (69, 0, 50) 53 54 41 52 54 50 4f 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STARTPOST:PROC; ┆
0x6be94…6beb4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6beb4…6bec3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bec3…6bee3 (69, 0, 51) 53 54 41 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆STA0: ┆
0x6bee3…6bf03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bf03…6bf12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bf12…6bf32 (69, 0, 52) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 54 41 30 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ RTP = ('STA0'); ┆
0x6bf32…6bf52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bf52…6bf61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bf61…6bf81 (69, 0, 53) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6bf81…6bfa1 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6bfa1…6bfb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bfb0…6bfd0 (69, 0, 54) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=0; ┆
0x6bfd0…6bff0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bff0…6bfff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6bfff…6c01f (69, 0, 55) 20 20 20 20 20 20 20 20 50 4b 3d 41 44 44 52 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ PK=ADDR(AREA); ┆
0x6c01f…6c03f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c03f…6c04e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c04e…6c06e (69, 0, 56) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 56 45 52 42 45 4c 4f 50 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN VERBELOP; ┆
0x6c06e…6c08e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c08e…6c09d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c09d…6c0bd (69, 0, 57) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 45 4f 46 28 56 45 52 42 45 4c 4f 50 29 3b 20 20 20 20 ┆ CALL SEOF(VERBELOP); ┆
0x6c0bd…6c0dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c0dd…6c0ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c0ec…6c10c (69, 0, 58) 20 20 20 20 20 20 20 20 4d 41 58 3d 55 4e 53 50 45 43 28 56 45 52 42 45 4c 4f 50 29 3b 20 20 20 ┆ MAX=UNSPEC(VERBELOP); ┆
0x6c10c…6c12c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c12c…6c13b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c13b…6c15b (69, 0, 59) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 42 45 4c 4f 50 29 3d 30 3b 20 20 20 20 20 ┆ UNSPEC(VERBELOP)=0; ┆
0x6c15b…6c17b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c17b…6c18a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c18a…6c1aa (69, 0, 60) 20 20 20 20 20 20 20 20 49 46 20 4f 46 46 53 45 54 3e 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF OFFSET>1 THEN DO; ┆
0x6c1aa…6c1ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c1ca…6c1d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c1d9…6c1f9 (69, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 42 45 4c 4f 50 29 20 49 ┆ READ FILE(VERBELOP) I┆
0x6c1f9…6c219 4e 54 4f 28 42 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NTO(BSTR); ┆
0x6c219…6c228 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c228…6c248 (69, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 54 32 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO ST2; ┆
0x6c248…6c268 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c268…6c277 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c277…6c297 (69, 0, 63) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6c297…6c2b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c2b7…6c2c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c2c6…6c2e6 (69, 0, 64) 20 20 20 20 20 20 20 20 4a 3d 49 4e 44 45 58 28 4b 4f 4e 54 4f 31 2c 27 2d 27 29 2d 31 3b 20 20 ┆ J=INDEX(KONTO1,'-')-1; ┆
0x6c2e6…6c306 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c306…6c315 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c315…6c335 (69, 0, 65) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=1 THEN DO; ┆
0x6c335…6c355 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c355…6c364 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c364…6c384 (69, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 4b 54 31 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT1=KONTO1; ┆
0x6c384…6c3a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c3a4…6c3b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c3b3…6c3d3 (69, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x6c3d3…6c3f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c3f3…6c402 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c402…6c422 (69, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 31 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT1) FILE(VE┆
0x6c422…6c442 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x6c442…6c451 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c451…6c471 (69, 0, 69) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6c471…6c491 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c491…6c4a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c4a0…6c4c0 (69, 0, 70) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 32 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=2 THEN DO; ┆
0x6c4c0…6c4e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c4e0…6c4ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c4ef…6c50f (69, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 4b 54 32 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT2=KONTO1; ┆
0x6c50f…6c52f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c52f…6c53e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c53e…6c55e (69, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x6c55e…6c57e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c57e…6c58d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c58d…6c5ad (69, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 32 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT2) FILE(VE┆
0x6c5ad…6c5cd 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x6c5cd…6c5dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c5dc…6c5fc (69, 0, 74) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6c5fc…6c61c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c61c…6c62b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c62b…6c64b (69, 0, 75) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 33 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=3 THEN DO; ┆
0x6c64b…6c66b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c66b…6c67a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c67a…6c69a (69, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 4b 54 33 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT3=KONTO1; ┆
0x6c69a…6c6ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c6ba…6c6c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c6c9…6c6e9 (69, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x6c6e9…6c709 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c709…6c718 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c718…6c738 (69, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 33 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT3) FILE(VE┆
0x6c738…6c758 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x6c758…6c767 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c767…6c787 (69, 0, 79) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6c787…6c7a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c7a7…6c7b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c7b6…6c7d6 (69, 0, 80) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 34 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=4 THEN DO; ┆
0x6c7d6…6c7f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c7f6…6c805 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c805…6c825 (69, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 4b 54 34 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT4=KONTO1; ┆
0x6c825…6c845 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c845…6c854 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c854…6c874 (70, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x6c874…6c894 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c894…6c8a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c8a3…6c8c3 (70, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 34 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT4) FILE(VE┆
0x6c8c3…6c8e3 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x6c8e3…6c8f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c8f2…6c912 (70, 0, 2) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6c912…6c932 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c932…6c941 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c941…6c961 (70, 0, 3) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 35 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=5 THEN DO; ┆
0x6c961…6c981 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c981…6c990 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c990…6c9b0 (70, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 4b 54 35 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT5=KONTO1; ┆
0x6c9b0…6c9d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c9d0…6c9df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6c9df…6c9ff (70, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x6c9ff…6ca1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ca1f…6ca2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ca2e…6ca4e (70, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 35 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT5) FILE(VE┆
0x6ca4e…6ca6e 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x6ca6e…6ca7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ca7d…6ca9d (70, 0, 7) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6ca9d…6cabd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cabd…6cacc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cacc…6caec (70, 0, 8) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 36 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=6 THEN DO; ┆
0x6caec…6cb0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cb0c…6cb1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cb1b…6cb3b (70, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 4b 54 36 3d 20 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 ┆ KT6= KONTO1; ┆
0x6cb3b…6cb5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cb5b…6cb6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cb6a…6cb8a (70, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x6cb8a…6cbaa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cbaa…6cbb9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cbb9…6cbd9 (70, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 36 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT6) FILE(VE┆
0x6cbd9…6cbf9 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x6cbf9…6cc08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cc08…6cc28 (70, 0, 12) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6cc28…6cc48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cc48…6cc57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cc57…6cc77 (70, 0, 13) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 37 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=7 THEN DO; ┆
0x6cc77…6cc97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cc97…6cca6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cca6…6ccc6 (70, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 4b 54 37 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT7=KONTO1; ┆
0x6ccc6…6cce6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cce6…6ccf5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ccf5…6cd15 (70, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x6cd15…6cd35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cd35…6cd44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cd44…6cd64 (70, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 37 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT7) FILE(VE┆
0x6cd64…6cd84 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x6cd84…6cd93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cd93…6cdb3 (70, 0, 17) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6cdb3…6cdd3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cdd3…6cde2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cde2…6ce02 (70, 0, 18) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 38 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=8 THEN DO; ┆
0x6ce02…6ce22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ce22…6ce31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ce31…6ce51 (70, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 4b 54 38 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT8=KONTO1; ┆
0x6ce51…6ce71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ce71…6ce80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ce80…6cea0 (70, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x6cea0…6cec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cec0…6cecf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cecf…6ceef (70, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 38 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT8) FILE(VE┆
0x6ceef…6cf0f 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x6cf0f…6cf1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cf1e…6cf3e (70, 0, 22) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6cf3e…6cf5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cf5e…6cf6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cf6d…6cf8d (70, 0, 23) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 39 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ IF J=9 THEN DO; ┆
0x6cf8d…6cfad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cfad…6cfbc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cfbc…6cfdc (70, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 4b 54 39 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ KT9=KONTO1; ┆
0x6cfdc…6cffc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6cffc…6d00b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d00b…6d02b (70, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x6d02b…6d04b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d04b…6d05a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d05a…6d07a (70, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 39 29 20 46 49 4c 45 28 56 45 ┆ READ KEY(KT9) FILE(VE┆
0x6d07a…6d09a 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RBELOP) INTO(AREA); ┆
0x6d09a…6d0a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d0a9…6d0c9 (70, 0, 27) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6d0c9…6d0e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d0e9…6d0f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d0f8…6d118 (70, 0, 28) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 31 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 ┆ IF J=10 THEN DO; ┆
0x6d118…6d138 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d138…6d147 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d147…6d167 (70, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 4b 54 31 30 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 ┆ KT10=KONTO1; ┆
0x6d167…6d187 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d187…6d196 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d196…6d1b6 (70, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x6d1b6…6d1d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d1d6…6d1e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d1e5…6d205 (70, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 31 30 29 20 46 49 4c 45 28 56 ┆ READ KEY(KT10) FILE(V┆
0x6d205…6d225 45 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ERBELOP) INTO(AREA); ┆
0x6d225…6d234 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d234…6d254 (70, 0, 32) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6d254…6d274 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d274…6d283 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d283…6d2a3 (70, 0, 33) 20 20 20 20 20 20 20 20 49 46 20 4a 3d 2d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 ┆ IF J=-1 THEN DO; ┆
0x6d2a3…6d2c3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d2c3…6d2d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d2d2…6d2f2 (70, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 4b 54 31 31 3d 4b 4f 4e 54 4f 31 3b 20 20 20 20 20 20 20 20 20 ┆ KT11=KONTO1; ┆
0x6d2f2…6d312 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d312…6d321 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d321…6d341 (70, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 53 54 31 3b 20 20 ┆ ON ERROR GO TO ST1; ┆
0x6d341…6d361 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d361…6d370 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d370…6d390 (70, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 4b 45 59 28 4b 54 31 31 29 20 46 49 4c 45 28 56 ┆ READ KEY(KT11) FILE(V┆
0x6d390…6d3b0 45 52 42 45 4c 4f 50 29 20 49 4e 54 4f 28 41 52 45 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ERBELOP) INTO(AREA); ┆
0x6d3b0…6d3bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d3bf…6d3df (70, 0, 37) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6d3df…6d3ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d3ff…6d40e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d40e…6d42e (70, 0, 38) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 54 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO ST2; ┆
0x6d42e…6d44e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d44e…6d45d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d45d…6d47d (70, 0, 39) 53 54 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ST1: ┆
0x6d47d…6d49d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d49d…6d4ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d4ac…6d4cc (70, 0, 40) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 54 31 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('ST1'); ┆
0x6d4cc…6d4ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d4ec…6d4fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d4fb…6d51b (70, 0, 41) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6d51b…6d53b 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6d53b…6d54a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d54a…6d56a (70, 0, 42) 20 20 20 20 20 20 20 20 49 46 20 4f 4e 43 4f 44 45 7f 3d 34 20 54 48 45 4e 20 44 4f 3b 20 20 20 ┆ IF ONCODE =4 THEN DO; ┆
0x6d56a…6d58a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d58a…6d599 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d599…6d5b9 (70, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c ┆ PUT SKIP LIST('LÄSFEL┆
0x6d5b9…6d5d9 20 49 20 56 45 52 42 45 4c 4f 50 27 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I VERBELOP',RCODE); ┆
0x6d5d9…6d5e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d5e8…6d608 (70, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x6d608…6d628 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d628…6d637 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d637…6d657 (70, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 ┆ CALL PLOAD('Q '┆
0x6d657…6d677 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x6d677…6d686 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d686…6d6a6 (70, 0, 46) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6d6a6…6d6c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d6c6…6d6d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d6d5…6d6f5 (70, 0, 47) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=1; ┆
0x6d6f5…6d715 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d715…6d724 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d724…6d744 (70, 0, 48) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x6d744…6d764 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d764…6d773 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d773…6d793 (70, 0, 49) 53 54 32 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ST2: ┆
0x6d793…6d7b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d7b3…6d7c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d7c2…6d7e2 (70, 0, 50) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 54 32 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('ST2'); ┆
0x6d7e2…6d802 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d802…6d811 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d811…6d831 (70, 0, 51) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6d831…6d851 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6d851…6d860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d860…6d880 (70, 0, 52) 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 47 3d 4b 4f 4e 54 4f 4e 52 3b 20 20 20 20 20 20 20 ┆ KONTONRG=KONTONR; ┆
0x6d880…6d8a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d8a0…6d8af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d8af…6d8cf (70, 0, 53) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 42 45 4c 4f 50 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(VERBELOP)=UNSPEC(┆
0x6d8cf…6d8ef 56 45 52 42 45 4c 4f 50 29 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VERBELOP)-1; ┆
0x6d8ef…6d8fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d8fe…6d91e (70, 0, 54) 20 20 20 20 20 20 20 20 42 4c 4f 43 4b 41 4e 54 3d 4d 41 58 2d 55 4e 53 50 45 43 28 56 45 52 42 ┆ BLOCKANT=MAX-UNSPEC(VERB┆
0x6d91e…6d93e 45 4c 4f 50 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ELOP); ┆
0x6d93e…6d94d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d94d…6d96d (70, 0, 55) 20 20 20 20 20 20 20 20 4a 4a 3d 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JJ=5; ┆
0x6d96d…6d98d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d98d…6d99c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d99c…6d9bc (70, 0, 56) 20 20 20 20 20 20 20 20 4a 4b 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JK=0; ┆
0x6d9bc…6d9dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d9dc…6d9eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6d9eb…6da0b (70, 0, 57) 20 20 20 20 20 20 20 20 49 46 20 28 4c 49 53 54 54 59 50 3d 31 29 20 7c 20 28 53 50 54 59 50 3d ┆ IF (LISTTYP=1) ö (SPTYP=┆
0x6da0b…6da2b 32 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2) THEN DO; ┆
0x6da2b…6da3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6da3a…6da5a (70, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 56 45 52 54 45 58 54 3b 20 20 20 20 20 20 20 20 ┆ OPEN VERTEXT; ┆
0x6da5a…6da7a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6da7a…6da89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6da89…6daa9 (70, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 54 45 58 54 29 20 49 4e ┆ READ FILE(VERTEXT) IN┆
0x6daa9…6dac9 54 4f 28 54 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO(TSTR); ┆
0x6dac9…6dad8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dad8…6daf8 (70, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 53 54 41 4e 54 3d 56 45 52 4e 52 54 3b 20 20 20 20 20 ┆ KONSTANT=VERNRT; ┆
0x6daf8…6db18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6db18…6db27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6db27…6db47 (70, 0, 61) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6db47…6db67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6db67…6db76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6db76…6db96 (70, 0, 62) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x6db96…6dbb6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dbb6…6dbc5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dbc5…6dbe5 (70, 0, 63) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x6dbe5…6dc05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dc05…6dc14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dc14…6dc63 (70, 0, 64) 0x20[0x4f]
0x6dc63…6dc83 (70, 0, 65) 50 4f 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆POST:PROC; ┆
0x6dc83…6dca3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dca3…6dcb2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dcb2…6dcd2 (70, 0, 66) 50 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P1: ┆
0x6dcd2…6dcf2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dcf2…6dd01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dd01…6dd21 (70, 0, 67) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 50 31 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('P1'); ┆
0x6dd21…6dd41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dd41…6dd50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dd50…6dd70 (70, 0, 68) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6dd70…6dd90 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6dd90…6dd9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dd9f…6ddbf (70, 0, 69) 20 20 20 20 20 20 20 20 4a 4a 3d 4a 4a 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JJ=JJ+1; ┆
0x6ddbf…6dddf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dddf…6ddee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ddee…6de0e (70, 0, 70) 20 20 20 20 20 20 20 20 49 46 20 4a 4a 3e 35 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 ┆ IF JJ>5 THEN DO; ┆
0x6de0e…6de2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6de2e…6de3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6de3d…6de5d (70, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 4b 3c 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF JK<1 THEN DO; ┆
0x6de5d…6de7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6de7d…6de8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6de8c…6deac (70, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 42 4c 4f 43 4b 41 4e 54 3e 30 20 54 48 45 4e ┆ IF BLOCKANT>0 THEN┆
0x6deac…6decc 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x6decc…6dedb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dedb…6defb (70, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4a 4b 3d 32 35 35 3b 20 20 20 20 20 20 20 20 ┆ JK=255; ┆
0x6defb…6df1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6df1b…6df2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6df2a…6df4a (70, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4a 4b 3e 42 4c 4f 43 4b 41 4e 54 20 ┆ IF JK>BLOCKANT ┆
0x6df4a…6df6a 54 48 45 4e 20 4a 4b 3d 42 4c 4f 43 4b 41 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN JK=BLOCKANT; ┆
0x6df6a…6df79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6df79…6df99 (70, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 4c 4f 43 4b 41 4e 54 3d 42 4c 4f 43 4b 41 ┆ BLOCKANT=BLOCKA┆
0x6df99…6dfb9 4e 54 2d 4a 4b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NT-JK; ┆
0x6dfb9…6dfc8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6dfc8…6dfe8 (70, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 44 28 56 45 52 42 45 4c 4f ┆ CALL RD(VERBELO┆
0x6dfe8…6e008 50 2c 41 52 45 41 2c 4a 4b 2c 52 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P,AREA,JK,RCODE); ┆
0x6e008…6e017 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e017…6e037 (70, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 ┆ IF RCODE =0 THE┆
0x6e037…6e057 4e 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 56 45 52 42 45 4c ┆N PUT SKIP LIST('LÄSFEL I VERBEL┆
0x6e057…6e066 4f 50 27 2c 52 43 4f 44 45 29 3b 20 20 20 20 ┆OP',RCODE); ┆
0x6e066…6e086 (70, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 4b 3d 41 44 44 52 28 41 52 45 41 29 3b 20 ┆ PK=ADDR(AREA); ┆
0x6e086…6e0a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e0a6…6e0b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e0b5…6e0d5 (70, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6e0d5…6e0f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e0f5…6e104 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e104…6e124 (70, 0, 80) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x6e124…6e144 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e144…6e153 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e153…6e173 (70, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 3d 27 39 39 39 39 39 39 ┆ KONTONR='999999┆
0x6e173…6e193 39 39 39 39 39 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆99999'; ┆
0x6e193…6e1a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e1a2…6e1c2 (71, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 44 41 54 55 4d 3d 44 41 54 31 42 49 4e 3b ┆ PDATUM=DAT1BIN;┆
0x6e1c2…6e1e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e1e2…6e1f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e1f1…6e211 (71, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 55 4d 54 3d 44 41 54 31 42 49 4e 3b ┆ DATUMT=DAT1BIN;┆
0x6e211…6e231 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e231…6e240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e240…6e260 (71, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x6e260…6e280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e280…6e28f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e28f…6e2af (71, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6e2af…6e2cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e2cf…6e2de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e2de…6e2fe (71, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6e2fe…6e31e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e31e…6e32d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e32d…6e34d (71, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x6e34d…6e36d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e36d…6e37c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e37c…6e39c (71, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 4b 29 3d 55 4e 53 50 45 43 28 ┆ UNSPEC(PK)=UNSPEC(┆
0x6e39c…6e3bc 50 4b 29 2b 42 53 54 52 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PK)+BSTRL; ┆
0x6e3bc…6e3cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e3cb…6e3eb (71, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6e3eb…6e40b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e40b…6e41a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e41a…6e43a (71, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 4a 4b 3d 4a 4b 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JK=JK-1; ┆
0x6e43a…6e45a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e45a…6e469 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e469…6e489 (71, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 4a 4a 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ JJ=1; ┆
0x6e489…6e4a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e4a9…6e4b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e4b8…6e4d8 (71, 0, 10) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6e4d8…6e4f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e4f8…6e507 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e507…6e527 (71, 0, 11) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 42 29 3d 55 4e 53 50 45 43 28 50 4b 29 2b 4a 4a ┆ UNSPEC(PB)=UNSPEC(PK)+JJ┆
0x6e527…6e547 2a 31 30 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆*10+1; ┆
0x6e547…6e556 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e556…6e576 (71, 0, 12) 20 20 20 20 20 20 20 20 49 46 20 50 44 41 54 55 4d 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 50 ┆ IF PDATUM=0 THEN GO TO P┆
0x6e576…6e596 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x6e596…6e5a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e5a5…6e5c5 (71, 0, 13) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x6e5c5…6e5e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e5e5…6e5f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e5f4…6e614 (71, 0, 14) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x6e614…6e634 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e634…6e643 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e643…6e692 (71, 0, 15) 0x20[0x4f]
0x6e692…6e6b2 (71, 0, 16) 44 41 54 54 45 53 54 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DATTEST:PROC; ┆
0x6e6b2…6e6d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e6d2…6e6e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e6e1…6e701 (71, 0, 17) 44 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆D0: ┆
0x6e701…6e721 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e721…6e730 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e730…6e750 (71, 0, 18) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 44 30 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('D0'); ┆
0x6e750…6e770 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e770…6e77f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e77f…6e79f (71, 0, 19) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6e79f…6e7bf 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6e7bf…6e7ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e7ce…6e7ee (71, 0, 20) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=0; ┆
0x6e7ee…6e80e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e80e…6e81d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e81d…6e83d (71, 0, 21) 20 20 20 20 20 20 20 20 49 46 20 28 53 50 54 59 50 3d 32 29 20 26 20 28 50 44 41 54 55 4d 3c 30 ┆ IF (SPTYP=2) & (PDATUM<0┆
0x6e83d…6e85d 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) THEN DO; ┆
0x6e85d…6e86c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e86c…6e88c (71, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 56 45 52 4e 52 54 20 54 48 45 4e ┆ IF VERNR =VERNRT THEN┆
0x6e88c…6e8ac 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x6e8ac…6e8bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e8bb…6e8db (71, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 54 45 58 54 29 3d 56 45 ┆ UNSPEC(VERTEXT)=VE┆
0x6e8db…6e8fb 52 4e 52 2d 4b 4f 4e 53 54 41 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RNR-KONSTANT; ┆
0x6e8fb…6e90a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e90a…6e92a (71, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 44 31 3b ┆ ON ERROR GO TO D1;┆
0x6e92a…6e94a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e94a…6e959 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e959…6e979 (71, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 44 ┆ ON ENDFILE GO TO D┆
0x6e979…6e999 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x6e999…6e9a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e9a8…6e9c8 (71, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 54 45 58 54 29 ┆ READ FILE(VERTEXT)┆
0x6e9c8…6e9e8 20 49 4e 54 4f 28 54 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ INTO(TSTR); ┆
0x6e9e8…6e9f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6e9f7…6ea17 (71, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6ea17…6ea37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ea37…6ea46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ea46…6ea66 (71, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 44 41 54 31 42 49 4e 3e 44 41 54 55 4d 54 29 20 7c ┆ IF (DAT1BIN>DATUMT) ö┆
0x6ea66…6ea86 20 28 44 41 54 32 42 49 4e 3c 3d 44 41 54 55 4d 54 29 20 54 48 45 4e 20 52 43 4f 44 45 3d 31 3b ┆ (DAT2BIN<=DATUMT) THEN RCODE=1;┆
0x6ea86…6ea95 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ea95…6eab5 (71, 0, 29) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6eab5…6ead5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ead5…6eae4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6eae4…6eb04 (71, 0, 30) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x6eb04…6eb24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6eb24…6eb33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6eb33…6eb53 (71, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 50 44 41 54 55 4d 3c 30 20 54 48 45 4e 20 50 44 41 54 ┆ IF PDATUM<0 THEN PDAT┆
0x6eb53…6eb73 55 4d 3d 2d 50 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UM=-PDATUM; ┆
0x6eb73…6eb82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6eb82…6eba2 (71, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 44 41 54 31 42 49 4e 3e 50 44 41 54 55 4d 29 20 7c ┆ IF (DAT1BIN>PDATUM) ö┆
0x6eba2…6ebc2 20 28 44 41 54 32 42 49 4e 3c 3d 50 44 41 54 55 4d 29 20 54 48 45 4e 20 52 43 4f 44 45 3d 31 3b ┆ (DAT2BIN<=PDATUM) THEN RCODE=1;┆
0x6ebc2…6ebd1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ebd1…6ebf1 (71, 0, 33) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6ebf1…6ec11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ec11…6ec20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ec20…6ec40 (71, 0, 34) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x6ec40…6ec60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ec60…6ec6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ec6f…6ec8f (71, 0, 35) 44 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆D1: ┆
0x6ec8f…6ecaf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ecaf…6ecbe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ecbe…6ecde (71, 0, 36) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 44 31 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('D1'); ┆
0x6ecde…6ecfe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ecfe…6ed0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ed0d…6ed2d (71, 0, 37) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6ed2d…6ed4d 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6ed4d…6ed5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ed5c…6ed7c (71, 0, 38) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 49 20 ┆ PUT SKIP LIST('LÄSFEL I ┆
0x6ed7c…6ed9c 56 45 52 54 45 58 54 27 2c 4f 4e 43 4f 44 45 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VERTEXT',ONCODE); ┆
0x6ed9c…6edab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6edab…6edcb (71, 0, 39) 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x6edcb…6edeb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6edeb…6edfa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6edfa…6ee1a (71, 0, 40) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=1; ┆
0x6ee1a…6ee3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ee3a…6ee49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ee49…6ee69 (71, 0, 41) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x6ee69…6ee89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ee89…6ee98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ee98…6eeb8 (71, 0, 42) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x6eeb8…6eed8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6eed8…6eee7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6eee7…6ef07 (71, 0, 43) 4b 4f 4e 54 4f 54 45 53 54 3a 20 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTOTEST: PROC; ┆
0x6ef07…6ef27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ef27…6ef36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ef36…6ef56 (71, 0, 44) 4b 54 4f 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KTO10: ┆
0x6ef56…6ef76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ef76…6ef85 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ef85…6efa5 (71, 0, 45) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 4b 54 4f 31 30 27 29 3b 20 20 20 20 20 20 20 20 ┆ RTP = ('KTO10'); ┆
0x6efa5…6efc5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6efc5…6efd4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6efd4…6eff4 (71, 0, 46) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6eff4…6f014 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6f014…6f023 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f023…6f043 (71, 0, 47) 20 20 20 20 20 20 20 20 52 43 4f 44 45 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RCODE=0; ┆
0x6f043…6f063 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f063…6f072 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f072…6f092 (71, 0, 48) 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 2c 4f 46 46 53 45 54 2c ┆ IF SUBSTR(KONTONR,OFFSET,┆
0x6f092…6f0b2 4c 45 4e 47 44 29 3d 53 55 42 53 54 52 28 4b 4f 4e 54 4f 32 2c 4f 46 46 53 45 54 2c 4c 45 4e 47 ┆LENGD)=SUBSTR(KONTO2,OFFSET,LENG┆
0x6f0b2…6f0c1 44 29 20 54 48 45 4e 20 52 45 54 55 52 4e 3b ┆D) THEN RETURN;┆
0x6f0c1…6f110 (71, 0, 49) 0x20[0x4f]
0x6f110…6f130 (71, 0, 50) 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 7f 3d 27 39 39 39 39 39 39 39 39 39 39 39 ┆ IF KONTONR ='99999999999┆
0x6f130…6f150 27 20 54 48 45 4e 20 52 43 4f 44 45 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆' THEN RCODE=1; ┆
0x6f150…6f15f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f15f…6f17f (71, 0, 51) 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x6f17f…6f19f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f19f…6f1ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f1ae…6f1ce (71, 0, 52) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x6f1ce…6f1ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f1ee…6f1fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f1fd…6f21d (71, 0, 53) 53 4b 52 49 56 5f 53 55 4d 4d 41 3a 20 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV_SUMMA: PROC; ┆
0x6f21d…6f23d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f23d…6f24c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f24c…6f26c (71, 0, 54) 53 4b 52 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKR0: ┆
0x6f26c…6f28c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f28c…6f29b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f29b…6f2bb (71, 0, 55) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 4b 52 30 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ RTP = ('SKR0'); ┆
0x6f2bb…6f2db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f2db…6f2ea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f2ea…6f30a (71, 0, 56) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6f30a…6f32a 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6f32a…6f339 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f339…6f359 (71, 0, 57) 20 20 20 20 20 20 20 20 54 31 33 3d 27 20 20 20 20 20 20 20 20 20 20 20 20 20 27 3b 20 20 20 20 ┆ T13=' '; ┆
0x6f359…6f379 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f379…6f388 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f388…6f3a8 (71, 0, 58) 20 20 20 20 20 20 20 20 54 31 31 3d 54 31 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T11=T13; ┆
0x6f3a8…6f3c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f3c8…6f3d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f3d7…6f3f7 (71, 0, 59) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 32 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=2 TO 11; ┆
0x6f3f7…6f417 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f417…6f426 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f426…6f446 (71, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 49 29 3d 53 55 4d 4d 41 28 49 29 2b 53 55 4d ┆ SUMMA(I)=SUMMA(I)+SUM┆
0x6f446…6f466 4d 41 28 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MA(1); ┆
0x6f466…6f475 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f475…6f495 (71, 0, 61) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6f495…6f4b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f4b5…6f4c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f4c4…6f4e4 (71, 0, 62) 20 20 20 20 20 20 20 20 54 34 3d 41 4e 54 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ T4=ANTAL_KONT; ┆
0x6f4e4…6f504 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f504…6f513 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f513…6f533 (71, 0, 63) 20 20 20 20 20 20 20 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 54 4f 54 5f 41 4e 54 41 4c ┆ TOT_ANTAL_KONT=TOT_ANTAL┆
0x6f533…6f553 5f 4b 4f 4e 54 2b 41 4e 54 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆_KONT+ANTAL_KONT; ┆
0x6f553…6f562 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f562…6f5b1 (71, 0, 64) 0x20[0x4f]
[…0x2…]
0x6f64f…6f66f (71, 0, 67) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 11; ┆
0x6f66f…6f68f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f68f…6f69e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f69e…6f6be (71, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 47 2c 49 2c ┆ IF SUBSTR(KONTONRG,I,┆
0x6f6be…6f6de 31 29 7f 3d 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 2c 49 2c 31 29 20 54 48 45 4e 20 47 4f 20 ┆1) =SUBSTR(KONTONR,I,1) THEN GO ┆
0x6f6de…6f6ed 54 4f 20 53 4b 52 31 3b 20 20 20 20 20 20 20 ┆TO SKR1; ┆
0x6f6ed…6f70d (71, 0, 69) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6f70d…6f72d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f72d…6f73c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f73c…6f75c (71, 0, 70) 53 4b 52 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKR1: ┆
0x6f75c…6f77c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f77c…6f78b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f78b…6f7ab (71, 0, 71) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 4b 52 31 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ RTP = ('SKR1'); ┆
0x6f7ab…6f7cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f7cb…6f7da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f7da…6f7fa (71, 0, 72) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6f7fa…6f81a 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6f81a…6f829 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f829…6f849 (71, 0, 73) 20 20 20 20 20 20 20 20 44 4f 20 4e 3d 31 31 20 54 4f 20 31 20 42 59 2d 31 3b 20 20 20 20 20 20 ┆ DO N=11 TO 1 BY-1; ┆
0x6f849…6f869 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f869…6f878 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f878…6f898 (71, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 47 2c 4e 2c ┆ IF SUBSTR(KONTONRG,N,┆
0x6f898…6f8b8 31 29 7f 3d 27 30 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4b 52 32 3b 20 20 20 20 20 20 20 20 ┆1) ='0' THEN GO TO SKR2; ┆
0x6f8b8…6f8c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f8c7…6f8e7 (71, 0, 75) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6f8e7…6f907 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f907…6f916 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f916…6f936 (71, 0, 76) 53 4b 52 32 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKR2: ┆
0x6f936…6f956 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f956…6f965 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f965…6f985 (71, 0, 77) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 4b 52 32 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ RTP = ('SKR2'); ┆
0x6f985…6f9a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f9a5…6f9b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6f9b4…6f9d4 (71, 0, 78) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x6f9d4…6f9f4 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x6f9f4…6fa03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fa03…6fa23 (71, 0, 79) 20 20 20 20 20 20 20 20 49 46 20 52 3c 38 20 54 48 45 4e 20 43 41 4c 4c 20 52 55 42 3b 20 20 20 ┆ IF R<8 THEN CALL RUB; ┆
0x6fa23…6fa43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fa43…6fa52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fa52…6fa72 (71, 0, 80) 20 20 20 20 20 20 20 20 4b 3d 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=11; ┆
0x6fa72…6fa92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fa92…6faa1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6faa1…6fac1 (71, 0, 81) 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 31 32 2d 49 3b 20 20 20 20 20 20 20 20 20 ┆ DO J=1 TO 12-I; ┆
0x6fac1…6fae1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fae1…6faf0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6faf0…6fb10 (72, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 54 41 42 28 31 32 2d 4a 29 3d 31 20 54 48 45 4e 20 ┆ IF STAB(12-J)=1 THEN ┆
0x6fb10…6fb30 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DO; ┆
0x6fb30…6fb3f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fb3f…6fb5f (72, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 3c 32 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF R<2 THEN CALL R┆
0x6fb5f…6fb7f 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UB; ┆
0x6fb7f…6fb8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fb8e…6fbae (72, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 31 2c 4b 2c 31 29 3d 27 2a ┆ SUBSTR(T11,K,1)='*┆
0x6fbae…6fbce 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x6fbce…6fbdd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fbdd…6fbfd (72, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 3d 4b 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=K-1; ┆
0x6fbfd…6fc1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fc1d…6fc2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fc2c…6fc4c (72, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 53 55 4d 4d 41 28 ┆ CALL BELRED(SUMMA(┆
0x6fc4c…6fc6c 4a 29 2c 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆J),T14); ┆
0x6fc6c…6fc7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fc7b…6fc9b (72, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ M=0; ┆
0x6fc9b…6fcbb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fcbb…6fcca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fcca…6fcea (72, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 31 33 3d 27 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T13=' ┆
0x6fcea…6fd0a 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x6fd0a…6fd19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fd19…6fd39 (72, 0, 7) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 4c 3d 31 20 54 4f 20 31 32 2d 4a 3b 20 20 20 ┆ DO L=1 TO 12-J; ┆
0x6fd39…6fd59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fd59…6fd68 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fd68…6fd88 (72, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 3d 4d 2b 31 3b 20 20 20 20 20 20 20 20 20 ┆ M=M+1; ┆
0x6fd88…6fda8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fda8…6fdb7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fdb7…6fdd7 (72, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4c 3d 36 29 20 7c 20 28 4c 3d 39 ┆ IF (L=6) ö (L=9┆
0x6fdd7…6fdf7 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) THEN DO; ┆
0x6fdf7…6fe06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fe06…6fe26 (72, 0, 10) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 4d ┆ SUBSTR(T13,M┆
0x6fe26…6fe46 2c 31 29 3d 27 2e 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,1)='.'; ┆
0x6fe46…6fe55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fe55…6fe75 (72, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 3d 4d 2b 31 3b 20 20 20 20 20 20 ┆ M=M+1; ┆
0x6fe75…6fe95 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fe95…6fea4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fea4…6fec4 (72, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6fec4…6fee4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fee4…6fef3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6fef3…6ff13 (72, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 4d 2c 31 29 ┆ SUBSTR(T13,M,1)┆
0x6ff13…6ff33 3d 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 47 2c 4c 2c 31 29 3b 20 20 20 20 20 20 20 20 20 20 ┆=SUBSTR(KONTONRG,L,1); ┆
0x6ff33…6ff42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ff42…6ff62 (72, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x6ff62…6ff82 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ff82…6ff91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ff91…6ffb1 (72, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4c 49 53 54 54 59 50 3d 31 20 54 48 45 4e 20 ┆ IF LISTTYP=1 THEN ┆
0x6ffb1…6ffd1 4d 3d 32 38 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆M=28; ┆
0x6ffd1…6ffe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x6ffe0…70000 (72, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 4d 3d 32 3b 20 20 20 20 20 20 20 20 20 ┆ ELSE M=2; ┆
0x70000…70020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70020…7002f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7002f…7004f (72, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 54 31 31 29 ┆ PUT SKIP EDIT(T11)┆
0x7004f…7006f 28 41 28 31 32 29 29 28 54 31 33 29 28 41 29 28 27 20 27 29 28 41 28 4d 29 29 28 54 31 34 29 28 ┆(A(12))(T13)(A)(' ')(A(M))(T14)(┆
0x7006f…7007e 41 28 33 33 29 29 28 54 34 29 28 41 29 3b 20 ┆A(33))(T4)(A); ┆
0x7007e…7009e (72, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 34 3d 27 20 20 20 20 27 3b 20 20 20 20 20 20 20 20 ┆ T4=' '; ┆
0x7009e…700be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x700be…700cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x700cd…700ed (72, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x700ed…7010d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7010d…7011c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7011c…7013c (72, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x7013c…7015c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7015c…7016b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7016b…7018b (72, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 4a 29 3d 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ SUMMA(J)=0; ┆
0x7018b…701ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x701ab…701ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x701ba…701da (72, 0, 22) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x701da…701fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x701fa…70209 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70209…70229 (72, 0, 23) 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 47 3d 4b 4f 4e 54 4f 4e 52 3b 20 20 20 20 20 20 20 ┆ KONTONRG=KONTONR; ┆
0x70229…70249 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70249…70258 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70258…70278 (72, 0, 24) 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 31 29 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SUMMA(1)=0; ┆
0x70278…70298 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70298…702a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x702a7…702c7 (72, 0, 25) 20 20 20 20 20 20 20 20 49 46 20 4b 7f 3d 31 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆ IF K =11 THEN DO; ┆
0x702c7…702e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x702e7…702f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x702f6…70316 (72, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP; ┆
0x70316…70336 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70336…70345 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70345…70365 (72, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x70365…70385 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70385…70394 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70394…703b4 (72, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 30 3b 20 20 20 20 20 20 20 20 ┆ ANTAL_KONT=0; ┆
0x703b4…703d4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x703d4…703e3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x703e3…70403 (72, 0, 29) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x70403…70423 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70423…70432 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70432…70452 (72, 0, 30) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x70452…70472 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70472…70481 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70481…704a1 (72, 0, 31) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x704a1…704c1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x704c1…704d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x704d0…7051f (72, 0, 32) 0x20[0x4f]
0x7051f…7053f (72, 0, 33) 50 4f 53 54 53 4b 52 49 56 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆POSTSKRIV:PROC; ┆
0x7053f…7055f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7055f…7056e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7056e…7058e (72, 0, 34) 50 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P0: ┆
0x7058e…705ae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x705ae…705bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x705bd…705dd (72, 0, 35) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 50 30 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('P0'); ┆
0x705dd…705fd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x705fd…7060c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7060c…7062c (72, 0, 36) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x7062c…7064c 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x7064c…7065b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7065b…7067b (72, 0, 37) 20 20 20 20 20 20 20 20 49 46 20 52 3c 38 20 54 48 45 4e 20 43 41 4c 4c 20 52 55 42 3b 20 20 20 ┆ IF R<8 THEN CALL RUB; ┆
0x7067b…7069b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7069b…706aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x706aa…706ca (72, 0, 38) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 56 45 52 4e 52 54 20 54 48 45 4e 20 44 4f ┆ IF VERNR =VERNRT THEN DO┆
0x706ca…706ea 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x706ea…706f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x706f9…70719 (72, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 54 45 58 54 29 3d 56 45 52 4e 52 ┆ UNSPEC(VERTEXT)=VERNR┆
0x70719…70739 2d 4b 4f 4e 53 54 41 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆-KONSTANT; ┆
0x70739…70748 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70748…70768 (72, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 50 33 3b 20 20 20 ┆ ON ERROR GO TO P3; ┆
0x70768…70788 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70788…70797 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70797…707b7 (72, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 44 31 3b 20 ┆ ON ENDFILE GO TO D1; ┆
0x707b7…707d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x707d7…707e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x707e6…70806 (72, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 54 45 58 54 29 20 49 4e ┆ READ FILE(VERTEXT) IN┆
0x70806…70826 54 4f 28 54 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO(TSTR); ┆
0x70826…70835 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70835…70855 (72, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 50 32 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO P2; ┆
0x70855…70875 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70875…70884 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70884…708a4 (72, 0, 44) 50 33 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P3: ┆
0x708a4…708c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x708c4…708d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x708d3…708f3 (72, 0, 45) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 50 33 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('P3'); ┆
0x708f3…70913 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70913…70922 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70922…70942 (72, 0, 46) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x70942…70962 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x70962…70971 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70971…70991 (72, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 54 45 58 54 3d 27 2a 2a 2a 2a 20 46 49 4e 4e 53 20 45 4a 27 3b ┆ TEXT='**** FINNS EJ';┆
0x70991…709b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x709b1…709c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x709c0…709e0 (72, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 44 41 54 55 4d 54 3d 50 44 41 54 55 4d 3b 20 20 20 20 20 20 20 ┆ DATUMT=PDATUM; ┆
0x709e0…70a00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70a00…70a0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70a0f…70a2f (72, 0, 49) 50 32 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P2: ┆
0x70a2f…70a4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70a4f…70a5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70a5e…70a7e (72, 0, 50) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 50 32 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('P2'); ┆
0x70a7e…70a9e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70a9e…70aad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70aad…70acd (72, 0, 51) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x70acd…70aed 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x70aed…70afc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70afc…70b1c (72, 0, 52) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x70b1c…70b3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70b3c…70b4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70b4b…70b6b (72, 0, 53) 20 20 20 20 20 20 20 20 49 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=0; ┆
0x70b6b…70b8b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70b8b…70b9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70b9a…70bba (72, 0, 54) 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO J=1 TO 11; ┆
0x70bba…70bda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70bda…70be9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70be9…70c09 (72, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4a 3d 36 29 20 7c 20 28 4a 3d 39 29 20 54 48 45 4e ┆ IF (J=6) ö (J=9) THEN┆
0x70c09…70c29 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x70c29…70c38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70c38…70c58 (72, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 3d 49 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=I+1; ┆
0x70c58…70c78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70c78…70c87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70c87…70ca7 (72, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 49 2c 31 29 3d 27 2e ┆ SUBSTR(T13,I,1)='.┆
0x70ca7…70cc7 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x70cc7…70cd6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70cd6…70cf6 (72, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x70cf6…70d16 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70d16…70d25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70d25…70d45 (72, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 49 3d 49 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=I+1; ┆
0x70d45…70d65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70d65…70d74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70d74…70d94 (72, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 49 2c 31 29 3d 53 55 42 53 54 ┆ SUBSTR(T13,I,1)=SUBST┆
0x70d94…70db4 52 28 4b 4f 4e 54 4f 4e 52 2c 4a 2c 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R(KONTONR,J,1); ┆
0x70db4…70dc3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70dc3…70de3 (72, 0, 61) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x70de3…70e03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70e03…70e12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70e12…70e32 (72, 0, 62) 20 20 20 20 20 20 20 20 49 46 20 50 44 41 54 55 4d 3c 30 20 54 48 45 4e 20 50 44 41 54 55 4d 3d ┆ IF PDATUM<0 THEN PDATUM=┆
0x70e32…70e52 2d 50 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆-PDATUM; ┆
0x70e52…70e61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70e61…70e81 (72, 0, 63) 20 20 20 20 20 20 20 20 49 49 49 49 3d 44 41 54 55 4d 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IIII=DATUMT; ┆
0x70e81…70ea1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70ea1…70eb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70eb0…70ed0 (72, 0, 64) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 49 4e 54 4f 43 48 28 49 49 49 49 2c 54 36 31 29 3b 20 ┆ CALL BINTOCH(IIII,T61); ┆
0x70ed0…70ef0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70ef0…70eff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70eff…70f1f (72, 0, 65) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 49 4e 54 4f 43 48 28 50 44 41 54 55 4d 2c 54 36 32 29 ┆ CALL BINTOCH(PDATUM,T62)┆
0x70f1f…70f3f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x70f3f…70f4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70f4e…70f6e (72, 0, 66) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 42 45 4c 4f 50 50 2c 54 31 34 29 3b ┆ CALL BELRED(BELOPP,T14);┆
0x70f6e…70f8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70f8e…70f9d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70f9d…70fbd (72, 0, 67) 20 20 20 20 20 20 20 20 49 46 20 54 36 31 3d 54 36 32 20 54 48 45 4e 20 54 36 32 3d 27 20 20 20 ┆ IF T61=T62 THEN T62=' ┆
0x70fbd…70fdd 20 20 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ '; ┆
0x70fdd…70fec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x70fec…7100c (72, 0, 68) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 27 20 27 29 28 41 28 31 32 29 ┆ PUT SKIP EDIT(' ')(A(12)┆
0x7100c…7102c 29 28 54 31 33 29 28 41 28 31 38 29 29 28 54 36 31 29 28 41 28 38 29 29 28 54 36 32 29 28 41 28 ┆)(T13)(A(18))(T61)(A(8))(T62)(A(┆
0x7102c…7103b 38 29 29 20 20 20 20 20 20 20 20 20 20 20 20 ┆8)) ┆
0x7103b…7105b (72, 0, 69) 20 20 20 20 20 20 20 20 28 56 45 52 4e 52 29 28 50 27 2d 2d 2d 2d 2d 39 27 2c 58 28 31 29 29 28 ┆ (VERNR)(P'-----9',X(1))(┆
0x7105b…7107b 54 31 34 29 28 41 28 31 38 29 29 28 54 45 58 54 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆T14)(A(18))(TEXT)(A); ┆
0x7107b…7108a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7108a…710aa (72, 0, 70) 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x710aa…710ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x710ca…710d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x710d9…710f9 (72, 0, 71) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x710f9…71119 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71119…71128 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71128…71148 (72, 0, 72) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x71148…71168 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71168…71177 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71177…711c6 (72, 0, 73) 0x20[0x4f]
[…0x1…]
0x71215…71235 (72, 0, 75) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x71235…71255 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x71255…71264 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71264…712b3 (72, 0, 76) 0x20[0x4f]
[…0x1…]
0x71302…71322 (72, 0, 78) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x71322…71342 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71342…71351 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71351…71371 (72, 0, 79) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 45 44 49 54 20 28 ┆ PUT FILE (D) SKIP EDIT (┆
0x71371…71391 27 20 48 75 72 20 6d 7d 6e 67 61 20 72 61 64 65 72 20 68 61 72 20 62 6c 61 6e 6b 65 74 74 65 6e ┆' Hur många rader har blanketten┆
0x71391…713a0 3f 20 27 29 20 28 41 28 34 35 29 29 3b 20 20 ┆? ') (A(45)); ┆
0x713a0…713c0 (72, 0, 80) 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 52 41 44 41 4e 54 29 3b 20 20 20 20 20 20 ┆ GET LIST (RADANT); ┆
0x713c0…713e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x713e0…713ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x713ef…7140f (72, 0, 81) 20 20 20 20 20 20 20 20 49 46 20 52 41 44 41 4e 54 20 3c 20 33 30 20 7c 20 52 41 44 41 4e 54 20 ┆ IF RADANT < 30 ö RADANT ┆
0x7140f…7142f 3e 20 38 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 54 41 52 54 3b 20 20 20 20 20 20 20 20 20 20 ┆> 80 THEN GO TO START; ┆
0x7142f…7143e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7143e…7145e (73, 0, 0) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x7145e…7147e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7147e…7148d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7148d…714ad (73, 0, 1) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 43 ┆ IF DATUM='0 ' THEN C┆
0x714ad…714cd 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ALL PLOAD('Q '); ┆
0x714cd…714dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x714dc…714fc (73, 0, 2) 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 20 28 27 48 5b 52 27 29 20 28 41 29 3b 20 ┆ PUT SKIP EDIT ('HÄR') (A); ┆
0x714fc…7151c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7151c…7152b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7152b…7154b (73, 0, 3) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x7154b…7156b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7156b…7157a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7157a…7159a (73, 0, 4) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x7159a…715ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x715ba…715c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x715c9…715e9 (73, 0, 5) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x715e9…71609 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71609…71618 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71618…71638 (73, 0, 6) 20 20 20 20 20 20 20 4f 50 45 4e 20 52 45 44 54 52 41 43 45 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN REDTRACE; ┆
0x71638…71658 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71658…71667 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71667…71687 (73, 0, 7) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 50 41 52 41 4d 45 54 52 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN PARAMETR; ┆
0x71687…716a7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x716a7…716b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x716b6…716d6 (73, 0, 8) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 59 52 44 41 54 41 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL STYRDATA; ┆
0x716d6…716f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x716f6…71705 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71705…71725 (73, 0, 9) 4c 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L0: ┆
0x71725…71745 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71745…71754 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71754…71774 (73, 0, 10) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 4c 30 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('L0'); ┆
0x71774…71794 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71794…717a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x717a3…717c3 (73, 0, 11) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x717c3…717e3 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x717e3…717f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x717f2…71812 (73, 0, 12) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 41 52 41 4c 41 45 53 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL PARALAES; ┆
0x71812…71832 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71832…71841 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71841…71890 (73, 0, 13) 0x20[0x4f]
0x71890…718b0 (73, 0, 14) 20 20 20 20 20 20 20 20 49 46 20 59 3d 27 36 20 27 20 7c 20 59 3d 27 37 20 27 20 54 48 45 4e 20 ┆ IF Y='6 ' ö Y='7 ' THEN ┆
0x718b0…718d0 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DO; ┆
0x718d0…718df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x718df…718ff (73, 0, 15) 20 20 20 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x718ff…7191f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7191f…7192e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7192e…7194e (73, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 56 31 32 20 20 20 20 20 27 ┆ CALL PLOAD('V12 '┆
0x7194e…7196e 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x7196e…7197d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7197d…7199d (73, 0, 17) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x7199d…719bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x719bd…719cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x719cc…719ec (73, 0, 18) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 52 54 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 ┆ CALL STARTPOST; ┆
0x719ec…71a0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71a0c…71a1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71a1b…71a3b (73, 0, 19) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 3d 31 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 30 ┆ IF RCODE=1 THEN GO TO L0┆
0x71a3b…71a5b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x71a5b…71a6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71a6a…71a8a (73, 0, 20) 4c 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L1: ┆
0x71a8a…71aaa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71aaa…71ab9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71ab9…71ad9 (73, 0, 21) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 4c 31 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('L1'); ┆
0x71ad9…71af9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71af9…71b08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71b08…71b28 (73, 0, 22) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x71b28…71b48 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x71b48…71b57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71b57…71b77 (73, 0, 23) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL POST; ┆
0x71b77…71b97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71b97…71ba6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71ba6…71bc6 (73, 0, 24) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 54 45 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL DATTEST; ┆
0x71bc6…71be6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71be6…71bf5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71bf5…71c15 (73, 0, 25) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c ┆ IF RCODE =0 THEN GO TO L┆
0x71c15…71c35 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x71c35…71c44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71c44…71c64 (73, 0, 26) 20 20 20 20 20 20 20 20 49 46 20 4f 46 46 53 45 54 3e 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF OFFSET>1 THEN DO; ┆
0x71c64…71c84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71c84…71c93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71c93…71cb3 (73, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 54 45 53 54 3b 20 20 20 20 20 20 ┆ CALL KONTOTEST; ┆
0x71cb3…71cd3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71cd3…71ce2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71ce2…71d02 (73, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 ┆ IF RCODE =0 THEN GO T┆
0x71d02…71d22 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O L1; ┆
0x71d22…71d31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71d31…71d51 (73, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3d 27 39 39 39 39 39 39 39 39 39 ┆ IF KONTONR='999999999┆
0x71d51…71d71 39 39 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆99' THEN DO; ┆
0x71d71…71d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71d80…71da0 (73, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 3c 33 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF R<3 THEN CALL R┆
0x71da0…71dc0 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UB; ┆
0x71dc0…71dcf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71dcf…71def (73, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 53 55 4d 4d 41 28 ┆ CALL BELRED(SUMMA(┆
0x71def…71e0f 31 29 2c 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1),T14); ┆
0x71e0f…71e1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71e1e…71e3e (73, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 34 3d 41 4e 54 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 ┆ T4=ANTAL_KONT; ┆
0x71e3e…71e5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71e5e…71e6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71e6d…71e8d (73, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 41 4e 54 ┆ TOT_ANTAL_KONT=ANT┆
0x71e8d…71ead 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AL_KONT; ┆
0x71ead…71ebc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71ebc…71edc (73, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 52 4b 4f 4e ┆ PUT SKIP EDIT(RKON┆
0x71edc…71efc 54 4f 31 29 28 58 28 31 32 29 2c 41 28 34 31 29 29 28 54 31 34 29 28 41 28 33 33 29 29 28 54 34 ┆TO1)(X(12),A(41))(T14)(A(33))(T4┆
0x71efc…71f0b 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 ┆)(A); ┆
0x71f0b…71f2b (73, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x71f2b…71f4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71f4b…71f5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71f5a…71f7a (73, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x71f7a…71f9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71f9a…71fa9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71fa9…71fc9 (73, 0, 37) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x71fc9…71fe9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71fe9…71ff8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x71ff8…72018 (73, 0, 38) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x72018…72038 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72038…72047 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72047…72067 (73, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3e 3d 4b 4f 4e 54 4f 32 20 54 48 ┆ IF KONTONR>=KONTO2 TH┆
0x72067…72087 45 4e 20 4b 4f 4e 54 4f 4e 52 3d 27 39 39 39 39 39 39 39 39 39 39 39 27 3b 20 20 20 20 20 20 20 ┆EN KONTONR='99999999999'; ┆
0x72087…72096 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72096…720b6 (73, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 7f 3d 4b 4f 4e 54 4f 4e 52 47 20 ┆ IF KONTONR =KONTONRG ┆
0x720b6…720d6 54 48 45 4e 20 43 41 4c 4c 20 53 4b 52 49 56 5f 53 55 4d 4d 41 3b 20 20 20 20 20 20 20 20 20 20 ┆THEN CALL SKRIV_SUMMA; ┆
0x720d6…720e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x720e5…72105 (73, 0, 41) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x72105…72125 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72125…72134 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72134…72154 (73, 0, 42) 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3d 27 39 39 39 39 39 39 39 39 39 39 39 27 ┆ IF KONTONR='99999999999'┆
0x72154…72174 20 54 48 45 4e 20 47 4f 20 54 4f 20 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ THEN GO TO UT; ┆
0x72174…72183 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72183…721a3 (73, 0, 43) 20 20 20 20 20 20 20 20 49 46 20 4c 49 53 54 54 59 50 3d 31 20 54 48 45 4e 20 43 41 4c 4c 20 50 ┆ IF LISTTYP=1 THEN CALL P┆
0x721a3…721c3 4f 53 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OSTSKRIV; ┆
0x721c3…721d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x721d2…721f2 (73, 0, 44) 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 31 29 3d 53 55 4d 4d 41 28 31 29 2b 42 45 4c 4f 50 50 ┆ SUMMA(1)=SUMMA(1)+BELOPP┆
0x721f2…72212 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x72212…72221 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72221…72241 (73, 0, 45) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 41 4e 54 41 4c 5f 4b 4f 4e 54 2b 31 3b ┆ ANTAL_KONT=ANTAL_KONT+1;┆
0x72241…72261 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72261…72270 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72270…72290 (73, 0, 46) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x72290…722b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x722b0…722bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x722bf…722df (73, 0, 47) 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UT: ┆
0x722df…722ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x722ff…7230e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7230e…7232e (73, 0, 48) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 55 54 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('UT'); ┆
0x7232e…7234e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7234e…7235d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7235d…7237d (73, 0, 49) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x7237d…7239d 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x7239d…723ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x723ac…723cc (73, 0, 50) 20 20 20 20 20 20 20 20 49 46 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 30 20 54 48 45 4e ┆ IF TOT_ANTAL_KONT=0 THEN┆
0x723cc…723ec 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x723ec…723fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x723fb…7241b (73, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x7241b…7243b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7243b…7244a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7244a…7246a (73, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 2a 2a 2a ┆ PUT SKIP(2) EDIT('***┆
0x7246a…7248a 2a 20 20 49 4e 47 45 4e 20 4b 4f 4e 54 45 52 49 4e 47 20 49 4e 4f 4d 20 42 45 47 5b 52 54 20 4f ┆* INGEN KONTERING INOM BEGÄRT O┆
0x7248a…72499 4d 52 5d 44 45 27 29 28 41 29 3b 20 20 20 20 ┆MRÅDE')(A); ┆
0x72499…724b9 (73, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-2; ┆
0x724b9…724d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x724d9…724e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x724e8…72508 (73, 0, 54) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x72508…72528 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72528…72537 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72537…72557 (73, 0, 55) 20 20 20 20 20 20 20 20 49 46 20 52 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 50 28 52 29 ┆ IF R =0 THEN PUT SKIP(R)┆
0x72557…72577 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x72577…72586 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72586…725a6 (73, 0, 56) 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 56 45 52 42 45 4c 4f 50 3b 20 20 20 20 20 20 20 20 20 ┆ CLOSE VERBELOP; ┆
0x725a6…725c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x725c6…725d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x725d5…725f5 (73, 0, 57) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L0; ┆
0x725f5…72615 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72615…72624 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72624…72644 (73, 0, 58) 53 4c 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: ┆
0x72644…72664 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72664…72673 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72673…72693 (73, 0, 59) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 4c 55 54 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ RTP = ('SLUT'); ┆
0x72693…726b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x726b3…726c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x726c2…726e2 (73, 0, 60) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x726e2…72702 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x72702…72711 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72711…72731 (73, 0, 61) 20 20 20 20 20 20 20 43 4c 4f 53 45 20 52 45 44 54 52 41 43 45 3b 20 20 20 20 20 20 20 20 20 20 ┆ CLOSE REDTRACE; ┆
0x72731…72751 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72751…72760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x72760…72780 (73, 0, 62) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x72780…727a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x727a0…727af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x727af…727cf (73, 0, 63) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x727cf…727ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x727ef…727fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x727fe…7284d (73, 0, 64) 0x20[0x4f]
0x7284d…7286d (73, 0, 65) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x7286d…7288d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7288d…7289c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7289c…728bc (73, 0, 66) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x728dc…728eb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x728eb…7290b (73, 0, 67) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x7292b…7293a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x7293a…7295a (73, 0, 68) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x7297a…72989 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72989…729a9 (73, 0, 69) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x729c9…729d8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x729d8…729f8 (73, 0, 70) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72a18…72a27 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72a27…72a47 (73, 0, 71) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72a67…72a76 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72a76…72a96 (73, 0, 72) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72ab6…72ac5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72ac5…72ae5 (73, 0, 73) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72b05…72b14 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72b14…72b34 (73, 0, 74) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72b54…72b63 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72b63…72b83 (73, 0, 75) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72ba3…72bb2 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72bb2…72bd2 (73, 0, 76) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72bf2…72c01 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72c01…72c21 (73, 0, 77) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72c41…72c50 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72c50…72c70 (73, 0, 78) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72c90…72c9f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72c9f…72cbf (73, 0, 79) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72cdf…72cee 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72cee…72d0e (73, 0, 80) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72d2e…72d3d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆
0x72d3d…72d5d (73, 0, 81) 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 5f ┆_UNREAD__UNREAD__UNREAD__UNREAD_┆
[…0x1…]
0x72d7d…72d8c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆