|
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 B D I J K P Q S V X q r Ö
Length: 139413 (0x22095) Description: Bits:30008571 DDMQ1-0006_Div_konverteringspgm_LMC Types: 8" Floppy Disk
flag | nrec | reclen | rec_trk | t0 | tn | name | artifact |
---|---|---|---|---|---|---|---|
0 | 37 | 79 | 41 | 39 | 40 | BRORCON1 | ⟦6a993f0ad⟧ Q1_Text, reclen=79, q1file |
0 | 9 | 255 | 15 | 1 | 1 | DISK | ⟦98fb93e76⟧ Q1_HexDump, reclen=255, q1file |
0 | 20 | 40 | 50 | 0 | 0 | INDEX | ⟦12ba4c0be⟧ Q1_HexDump, reclen=40, q1file |
0 | 5 | 40 | 64 | 24 | 25 | JAN | ⟦203ebf978⟧ Q1_HexDump, reclen=40, q1file |
0 | 206 | 55 | 53 | 26 | 30 | KTOTX | ⟦a9390f48f⟧ Q1_HexDump, reclen=55, q1file |
0 | 3 | 255 | 15 | 2 | 2 | ⟦e120d8c13⟧ Q1_HexDump, reclen=255, q1file | |
0 | 4 | 150 | 24 | 31 | 35 | SAMFIL | ⟦a333046af⟧ Q1_HexDump, reclen=150, q1file |
0 | 3 | 255 | 15 | 5 | 5 | SAMKONV | ⟦58376183e⟧ Q1_HexDump, reclen=255, q1file |
0 | 41 | 79 | 41 | 3 | 4 | SAMKONV1 | ⟦f7d7b2d49⟧ Q1_Text, reclen=79, q1file |
0 | 4 | 255 | 15 | 43 | 43 | SANDCON | ⟦6128e9b3c⟧ Q1_HexDump, reclen=255, q1file |
0 | 37 | 79 | 41 | 41 | 42 | SANDCON1 | ⟦7153472c9⟧ Q1_Text, reclen=79, q1file |
0 | 4 | 255 | 15 | 8 | 8 | VERKONV | ⟦cb7a2e543⟧ Q1_HexDump, reclen=255, q1file |
0 | 57 | 79 | 41 | 6 | 7 | VERKONV1 | ⟦177b54ca2⟧ Q1_Text, reclen=79, q1file |
0 | 5 | 79 | 41 | 9 | 10 | X1 | ⟦4b7ba4a9d⟧ Q1_Text, reclen=79, q1file |
0 | 15 | 79 | 41 | 11 | 12 | X2 | ⟦74ef93f22⟧ Q1_Text, reclen=79, q1file |
0 | 28 | 79 | 41 | 13 | 14 | X3 | ⟦9dd4a9a32⟧ Q1_Text, reclen=79, q1file |
0 | 3 | 255 | 15 | 38 | 38 | Ö | ⟦ca4757e86⟧ Q1_HexDump, reclen=255, q1file |
0 | 15 | 79 | 41 | 36 | 37 | Ö1 | ⟦76acb7db7⟧ Q1_Text, reclen=79, q1file |
0x00000…00028 (0, 0, 0) Catalog {f0=0x0000, name=»INDEX «, nrec=0x0014, reclen=0x0028, rectrack=0x0032, track0=0x0000, trackn=0x0000} 0x00028…00050 (0, 0, 1) Catalog {f0=0x0000, name=»DISK «, nrec=0x0009, reclen=0x00ff, rectrack=0x000f, track0=0x0001, trackn=0x0001} 0x00050…00078 (0, 0, 2) Catalog {f0=0x0000, name=»PRINT «, nrec=0x0003, reclen=0x00ff, rectrack=0x000f, track0=0x0002, trackn=0x0002} 0x00078…000a0 (0, 0, 3) Catalog {f0=0x0000, name=»SAMKONV1«, nrec=0x0029, reclen=0x004f, rectrack=0x0029, track0=0x0003, trackn=0x0004} 0x000a0…000c8 (0, 0, 4) Catalog {f0=0x0000, name=»SAMKONV «, nrec=0x0003, reclen=0x00ff, rectrack=0x000f, track0=0x0005, trackn=0x0005} 0x000c8…000f0 (0, 0, 5) Catalog {f0=0x0000, name=»VERKONV1«, nrec=0x0039, reclen=0x004f, rectrack=0x0029, track0=0x0006, trackn=0x0007} 0x000f0…00118 (0, 0, 6) Catalog {f0=0x0000, name=»VERKONV «, nrec=0x0004, reclen=0x00ff, rectrack=0x000f, track0=0x0008, trackn=0x0008} 0x00118…00140 (0, 0, 7) Catalog {f0=0x0000, name=»X1 «, nrec=0x0005, reclen=0x004f, rectrack=0x0029, track0=0x0009, trackn=0x000a} 0x00140…00168 (0, 0, 8) Catalog {f0=0x0000, name=»X2 «, nrec=0x000f, reclen=0x004f, rectrack=0x0029, track0=0x000b, trackn=0x000c} 0x00168…00190 (0, 0, 9) Catalog {f0=0x0000, name=»X3 «, nrec=0x001c, reclen=0x004f, rectrack=0x0029, track0=0x000d, trackn=0x000e} 0x00190…001b8 (0, 0, 10) Catalog {f0=0x0000, name=»XKTOTX «, nrec=0x0000, reclen=0x0025, rectrack=0x0043, track0=0x000f, trackn=0x0012} 0x001b8…001e0 (0, 0, 11) Catalog {f0=0x0000, name=»XSAMFIL «, nrec=0x0000, reclen=0x0012, rectrack=0x005f, track0=0x0013, trackn=0x0017} 0x001e0…00208 (0, 0, 12) Catalog {f0=0x0000, name=»JAN «, nrec=0x0005, reclen=0x0028, rectrack=0x0040, track0=0x0018, trackn=0x0019} 0x00208…00230 (0, 0, 13) Catalog {f0=0x0000, name=»KTOTX «, nrec=0x00ce, reclen=0x0037, rectrack=0x0035, track0=0x001a, trackn=0x001e} 0x00230…00258 (0, 0, 14) Catalog {f0=0x0000, name=»SAMFIL «, nrec=0x0004, reclen=0x0096, rectrack=0x0018, track0=0x001f, trackn=0x0023} 0x00258…00280 (0, 0, 15) Catalog {f0=0x0000, name=»Ö1 «, nrec=0x000f, reclen=0x004f, rectrack=0x0029, track0=0x0024, trackn=0x0025} 0x00280…002a8 (0, 0, 16) Catalog {f0=0x0000, name=»Ö «, nrec=0x0003, reclen=0x00ff, rectrack=0x000f, track0=0x0026, trackn=0x0026} 0x002a8…002d0 (0, 0, 17) Catalog {f0=0x0000, name=»BRORCON1«, nrec=0x0025, reclen=0x004f, rectrack=0x0029, track0=0x0027, trackn=0x0028} 0x002d0…002f8 (0, 0, 18) Catalog {f0=0x0000, name=»SANDCON1«, nrec=0x0025, reclen=0x004f, rectrack=0x0029, track0=0x0029, trackn=0x002a} 0x002f8…00320 (0, 0, 19) Catalog {f0=0x0000, name=»SANDCON «, nrec=0x0004, reclen=0x00ff, rectrack=0x000f, track0=0x002b, trackn=0x002b} 0x00320…00340 (0, 0, 20) 09 00 01 20 20 20 20 20 20 20 09 00 ff 00 0f 01 ff 00 ff 00 00 00 08 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00340…00348 00 00 00 00 00 00 00 00 ┆ ┆ 0x00348…00368 (0, 0, 21) 09 00 01 20 20 20 20 20 20 20 09 00 ff 00 0f 01 ff 00 ff 00 00 00 08 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00368…00370 00 00 00 00 00 00 00 00 ┆ ┆ 0x00370…00390 (0, 0, 22) 53 14 00 00 00 af 53 1b c0 53 46 49 4c 45 20 4e 41 4d 45 3a 20 20 00 00 00 00 00 00 00 00 00 00 ┆S S SFILE NAME: ┆ 0x00390…00398 00 00 00 00 00 00 00 00 ┆ ┆ 0x00398…003b8 (0, 0, 23) ff 00 00 54 0a 00 4e 4f 54 20 46 4f 55 4e 44 0f 00 15 00 19 00 17 00 00 00 00 00 00 00 00 00 00 ┆ T NOT FOUND ┆ 0x003b8…003c0 00 00 00 00 00 00 00 00 ┆ ┆ 0x003c0…003e0 (0, 0, 24) 00 44 00 49 56 45 20 23 20 3a 20 7d 55 13 00 20 20 20 20 44 49 53 00 00 00 00 00 00 00 00 00 00 ┆ D IVE # : åU DIS ┆ 0x003e0…003e8 00 00 00 00 00 00 00 00 ┆ ┆ 0x003e8…00408 (0, 0, 25) 50 4c 00 59 20 49 4e 44 45 58 20 32 2f 31 34 2f 37 38 20 20 20 20 00 00 00 00 00 00 00 00 00 00 ┆PL Y INDEX 2/14/78 ┆ 0x00408…00410 00 00 00 00 00 00 00 00 ┆ ┆ 0x00410…00430 (0, 0, 26) 20 20 00 20 25 00 46 31 20 2d 20 52 65 61 64 20 49 4e 44 45 58 20 00 00 00 00 00 00 00 00 00 00 ┆ % F1 - Read INDEX ┆ 0x00430…00438 00 00 00 00 00 00 00 00 ┆ ┆ 0x00438…00458 (0, 0, 27) 6f 6e 00 53 65 6c 65 63 74 65 64 20 44 72 69 76 65 46 32 20 2d 20 00 00 00 00 00 00 00 00 00 00 ┆on Selected DriveF2 - ┆ 0x00458…00460 00 00 00 00 00 00 00 00 ┆ ┆ 0x00460…00480 (0, 0, 28) 43 68 00 6f 73 65 20 4e 65 77 20 44 72 69 76 65 46 33 20 2d 20 44 00 00 00 00 00 00 00 00 00 00 ┆Ch ose New DriveF3 - D ┆ 0x00480…00488 00 00 00 00 00 00 00 00 ┆ ┆ 0x00488…004a8 (0, 0, 29) 49 4e 00 45 58 20 4f 70 74 69 6f 6e 73 46 34 20 2d 20 53 65 61 72 00 00 00 00 00 00 00 00 00 00 ┆IN EX OptionsF4 - Sear ┆ 0x004a8…004b0 00 00 00 00 00 00 00 00 ┆ ┆ 0x004b0…004d0 (0, 0, 30) 63 68 00 66 6f 72 20 46 69 6c 65 20 4e 61 6d 65 46 35 20 2d 20 50 00 00 00 00 00 00 00 00 00 00 ┆ch for File NameF5 - P ┆ 0x004d0…004d8 00 00 00 00 00 00 00 00 ┆ ┆ 0x004d8…004f8 (0, 0, 31) 72 69 00 74 20 49 6e 64 65 78 20 6f 6e 20 53 65 6c 65 63 74 65 64 00 00 00 00 00 00 00 00 00 00 ┆ri t Index on Selected ┆ 0x004f8…00500 00 00 00 00 00 00 00 00 ┆ ┆ 0x00500…00520 (0, 0, 32) 20 44 00 69 76 65 46 36 20 2d 20 56 69 65 77 20 50 72 65 76 69 6f 00 00 00 00 00 00 00 00 00 00 ┆ D iveF6 - View Previo ┆ 0x00520…00528 00 00 00 00 00 00 00 00 ┆ ┆ 0x00528…00548 (0, 0, 33) 75 73 00 52 65 63 6f 72 64 46 37 20 2d 20 54 65 72 6d 69 6e 61 74 00 00 00 00 00 00 00 00 00 00 ┆us RecordF7 - Terminat ┆ 0x00548…00550 00 00 00 00 00 00 00 00 ┆ ┆ 0x00550…00570 (0, 0, 34) 65 20 00 49 4e 44 45 58 24 00 46 38 20 2d 20 44 69 73 70 6c 61 79 00 00 00 00 00 00 00 00 00 00 ┆e INDEX$ F8 - Display ┆ 0x00570…00578 00 00 00 00 00 00 00 00 ┆ ┆ 0x00578…00598 (0, 0, 35) 20 46 00 72 73 74 20 52 65 63 6f 72 64 20 2d 20 49 4e 44 45 58 46 00 00 00 00 00 00 00 00 00 00 ┆ F rst Record - INDEXF ┆ 0x00598…005a0 00 00 00 00 00 00 00 00 ┆ ┆ 0x005a0…005c0 (0, 0, 36) 39 20 00 20 44 69 73 70 6c 61 79 20 4c 69 73 74 20 6f 66 20 46 69 00 00 00 00 00 00 00 00 00 00 ┆9 Display List of Fi ┆ 0x005c0…005c8 00 00 00 00 00 00 00 00 ┆ ┆ 0x005c8…005e8 (0, 0, 37) 6c 65 00 4e 61 6d 65 73 52 45 54 55 52 4e 20 2d 20 44 69 73 70 6c 00 00 00 00 00 00 00 00 00 00 ┆le NamesRETURN - Displ ┆ 0x005e8…005f0 00 00 00 00 00 00 00 00 ┆ ┆ 0x005f0…00610 (0, 0, 38) 61 79 00 4e 65 78 74 20 52 65 63 6f 72 64 20 0c 56 0d ff ff ff ff 00 00 00 00 00 00 00 00 00 00 ┆ay Next Record V ┆ 0x00610…00618 00 00 00 00 00 00 00 00 ┆ ┆ 0x00618…00638 (0, 0, 39) ff 00 00 00 4b 88 03 1f 00 00 00 00 00 00 00 00 4b 8a 03 4a ea 33 00 00 00 00 00 00 00 00 00 00 ┆ K K J 3 ┆ 0x00638…00640 00 00 00 00 00 00 00 00 ┆ ┆ 0x00640…00660 (0, 0, 40) 00 00 00 8a 00 0a 4b 8c 00 32 02 0e 0a 00 03 1f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ K 2 ┆ 0x00660…00668 00 00 00 00 00 00 00 00 ┆ ┆ 0x00668…00688 (0, 0, 41) 00 00 00 8e 03 4a 5d 32 05 4b 90 32 05 06 4a 70 32 04 4b 95 32 04 00 00 00 00 00 00 00 00 00 00 ┆ JÅ2 K 2 Jp2 K 2 ┆ 0x00688…00690 00 00 00 00 00 00 00 00 ┆ ┆ 0x00690…006b0 (0, 0, 42) 06 4a 00 32 05 4b 90 32 05 06 4a 95 32 04 4b 95 32 04 06 4a a7 32 00 00 00 00 00 00 00 00 00 00 ┆ J 2 K 2 J 2 K 2 J 2 ┆ 0x006b0…006b8 00 00 00 00 00 00 00 00 ┆ ┆ 0x006b8…006d8 (0, 0, 43) 05 4b 00 32 05 06 4a ba 32 04 4b 95 32 04 06 46 e8 32 14 42 ec 33 00 00 00 00 00 00 00 00 00 00 ┆ K 2 J 2 K 2 F 2 B 3 ┆ 0x006d8…006e0 00 00 00 00 00 00 00 00 ┆ ┆ 0x006e0…00700 (0, 0, 44) 00 00 00 8e 00 0a 00 32 14 0e 0a 32 14 06 4a 12 32 08 46 ea 32 08 00 00 00 00 00 00 00 00 00 00 ┆ 2 2 J 2 F 2 ┆ 0x00700…00708 00 00 00 00 00 00 00 00 ┆ ┆ 0x00708…00728 (0, 0, 45) 06 4a 00 32 08 46 f4 00 19 06 4b 99 4a e0 32 08 30 03 4a 5d 32 01 00 00 00 00 00 00 00 00 00 00 ┆ J 2 F K J 2 0 JÅ2 ┆ 0x00728…00730 00 00 00 00 00 00 00 00 ┆ ┆ 0x00730…00750 (0, 0, 46) 0c 0a 00 9b 00 0a 4b 99 00 4a e0 32 08 06 4a e0 32 08 46 f2 00 19 00 00 00 00 00 00 00 00 00 00 ┆ K J 2 J 2 F ┆ 0x00750…00758 00 00 00 00 00 00 00 00 ┆ ┆ 0x00758…00778 (0, 0, 47) 06 4b 00 4a e0 32 08 30 03 4a 70 32 01 0c 0a 4b 9b 00 0a 4b 99 00 00 00 00 00 00 00 00 00 00 00 ┆ K J 2 0 Jp2 K K ┆ 0x00778…00780 00 00 00 00 00 00 00 00 ┆ ┆ 0x00780…007a0 (0, 0, 48) 4a e0 00 08 06 4a e0 32 08 46 f6 00 19 06 4b 99 4a e0 32 08 30 03 00 00 00 00 00 00 00 00 00 00 ┆J J 2 F K J 2 0 ┆ 0x007a0…007a8 00 00 00 00 00 00 00 00 ┆ ┆ 0x007a8…007c8 (0, 0, 49) 4a 82 00 01 0c 0a 4b 9b 00 0a 4b 99 00 4a e0 32 08 06 46 fa 00 4b 00 00 00 00 00 00 00 00 00 00 ┆J K K J 2 F K ┆ 0x007c8…007d0 00 00 00 00 00 00 00 00 ┆ ┆ 0x007d0…008cf (1, 0, 0) DataSector[0xff] […0x8…] 0x010c7…011c6 (1, 0, 9) 0x00[0xff] […0x5…] 0x016c1…017c0 (2, 0, 0) DataSector[0xff] […0x2…] 0x019be…01abd (2, 0, 3) 0x00[0xff] […0xb…] 0x025b2…02601 (3, 0, 0) DataSector[0x4f] […0x28…] 0x03259…03279 (4, 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; ┆ 0x03279…03299 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03299…032a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x032a8…032c8 (4, 0, 1) 42 55 44 52 45 47 3a 55 4e 53 50 45 43 28 4e 59 4b 54 4f 54 58 29 3d 30 3b 43 41 4c 4c 20 53 45 ┆BUDREG:UNSPEC(NYKTOTX)=0;CALL SE┆ 0x032c8…032e8 4f 46 28 4e 59 4b 54 4f 54 58 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OF(NYKTOTX); ┆ 0x032e8…032f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x032f7…03317 (4, 0, 2) 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 20 20 20 20 20 20 20 ┆CALL OUTPUT(1,6); ┆ 0x03317…03337 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03337…03346 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03346…03366 (4, 0, 3) 57 52 49 54 45 20 46 49 4c 45 28 4e 59 4b 54 4f 54 58 29 46 52 4f 4d 28 4b 42 55 29 3b 20 20 20 ┆WRITE FILE(NYKTOTX)FROM(KBU); ┆ 0x03366…03386 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03386…03395 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03395…033b5 (4, 0, 4) 43 4c 4f 53 45 20 4e 59 4b 54 4f 54 58 3b 4f 50 45 4e 20 4e 59 4b 54 4f 54 58 3b 20 20 20 20 20 ┆CLOSE NYKTOTX;OPEN NYKTOTX; ┆ 0x033b5…033d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x033d5…033e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x033e4…03404 (4, 0, 5) 49 46 20 58 4b 54 4f 3d 2d 39 39 39 39 20 54 48 45 4e 20 47 4f 54 4f 20 53 4c 55 54 3b 20 20 20 ┆IF XKTO=-9999 THEN GOTO SLUT; ┆ 0x03404…03424 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03424…03433 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03433…03453 (4, 0, 6) 49 46 20 58 42 55 44 3d 27 42 27 20 54 48 45 4e 20 47 4f 54 4f 20 41 33 3b 45 4c 53 45 20 47 4f ┆IF XBUD='B' THEN GOTO A3;ELSE GO┆ 0x03453…03473 20 54 4f 20 41 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 ┆ TO A5; ┆ 0x03473…03482 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03482…034a2 (4, 0, 7) 53 4c 55 54 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 20 ┆SLUT:END; ┆ 0x034a2…034c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x034c2…034d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x034d1…03520 (4, 0, 8) 0x20[0x4f] 0x03520…03540 (4, 0, 9) 44 43 4c 20 31 20 4b 42 55 2c 32 20 42 4b 4f 20 46 49 58 45 44 28 34 29 2c 32 20 58 5a 20 43 48 ┆DCL 1 KBU,2 BKO FIXED(4),2 XZ CH┆ 0x03540…03560 41 52 28 31 29 2c 32 20 42 41 56 44 20 46 49 58 45 44 28 32 29 2c 32 20 42 55 44 28 31 32 29 20 ┆AR(1),2 BAVD FIXED(2),2 BUD(12) ┆ 0x03560…0356f 46 49 58 45 44 28 37 29 3b 20 20 20 20 20 20 ┆FIXED(7); ┆ 0x0356f…035be (4, 0, 10) 0x20[0x4f] 0x035be…035de (4, 0, 11) 44 43 4c 20 4e 59 53 41 4d 46 49 4c 20 46 49 4c 45 2c 58 53 41 4d 46 49 4c 20 46 49 4c 45 2c 4e ┆DCL NYSAMFIL FILE,XSAMFIL FILE,N┆ 0x035de…035fe 59 4b 54 4f 54 58 20 46 49 4c 45 2c 58 4b 54 4f 54 58 20 46 49 4c 45 2c 20 20 20 20 20 20 20 20 ┆YKTOTX FILE,XKTOTX FILE, ┆ 0x035fe…0360d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0360d…0362d (4, 0, 12) 58 4b 4f 20 46 49 58 45 44 28 34 29 2c 52 45 43 4e 52 20 42 49 4e 41 52 59 3b 20 20 20 20 20 20 ┆XKO FIXED(4),RECNR BINARY; ┆ 0x0362d…0364d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0364d…0365c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0365c…0367c (4, 0, 13) 52 45 43 4e 52 3d 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 ┆RECNR=0; ┆ 0x0367c…0369c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0369c…036ab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x036ab…036cb (4, 0, 14) 4f 50 45 4e 20 4e 59 53 41 4d 46 49 4c 3b 4f 50 45 4e 20 58 53 41 4d 46 49 4c 3b 4f 50 45 4e 20 ┆OPEN NYSAMFIL;OPEN XSAMFIL;OPEN ┆ 0x036cb…036eb 4e 59 4b 54 4f 54 58 3b 4f 50 45 4e 20 58 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆NYKTOTX;OPEN XKTOTX; ┆ 0x036eb…036fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x036fa…0371a (4, 0, 15) 41 31 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 54 4f 20 41 32 3b 20 20 20 20 20 20 20 20 20 20 ┆A1:ON ENDFILE GOTO A2; ┆ 0x0371a…0373a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0373a…03749 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03749…03769 (4, 0, 16) 52 45 41 44 20 46 49 4c 45 28 58 4b 54 4f 54 58 29 49 4e 54 4f 28 4b 54 4f 29 3b 20 20 20 20 20 ┆READ FILE(XKTOTX)INTO(KTO); ┆ 0x03769…03789 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03789…03798 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03798…037b8 (4, 0, 17) 4b 4f 4e 54 4f 3d 58 4b 4f 4e 54 4f 3b 5a 3d 27 41 27 3b 4b 3d 4b 4f 4e 54 4f 20 43 41 54 20 27 ┆KONTO=XKONTO;Z='A';K=KONTO CAT '┆ 0x037b8…037d8 20 20 20 20 27 3b 54 45 58 54 3d 58 54 45 58 54 3b 49 42 3d 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ ';TEXT=XTEXT;IB=0; ┆ 0x037d8…037e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x037e7…03807 (4, 0, 18) 57 52 49 54 45 20 46 49 4c 45 28 4e 59 4b 54 4f 54 58 29 46 52 4f 4d 28 4b 54 58 29 3b 20 20 20 ┆WRITE FILE(NYKTOTX)FROM(KTX); ┆ 0x03807…03827 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03827…03836 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03836…03856 (4, 0, 19) 47 4f 54 4f 20 41 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 ┆GOTO A1; ┆ 0x03856…03876 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03876…03885 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03885…038d4 (4, 0, 20) 0x20[0x4f] 0x038d4…038f4 (4, 0, 21) 41 32 3a 43 4c 4f 53 45 20 4e 59 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A2:CLOSE NYKTOTX; ┆ 0x038f4…03914 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03914…03923 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03923…03943 (4, 0, 22) 4f 50 45 4e 20 4e 59 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OPEN NYKTOTX; ┆ 0x03943…03963 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03963…03972 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03972…03992 (4, 0, 23) 41 35 3a 4f 4e 20 45 52 52 4f 52 20 47 4f 54 4f 20 53 4c 55 54 3b 52 45 41 44 20 4b 45 59 28 27 ┆A5:ON ERROR GOTO SLUT;READ KEY('┆ 0x03992…039b2 42 27 29 46 49 4c 45 28 58 53 41 4d 46 49 4c 29 49 4e 54 4f 28 58 53 41 4d 29 4b 45 59 54 4f 28 ┆B')FILE(XSAMFIL)INTO(XSAM)KEYTO(┆ 0x039b2…039c1 58 42 55 44 29 3b 20 20 20 20 20 20 20 20 20 ┆XBUD); ┆ 0x039c1…039e1 (4, 0, 24) 49 46 20 55 4e 53 50 45 43 28 58 53 41 4d 46 49 4c 29 3c 3d 52 45 43 4e 52 20 54 48 45 4e 20 47 ┆IF UNSPEC(XSAMFIL)<=RECNR THEN G┆ 0x039e1…03a01 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; ┆ 0x03a01…03a10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03a10…03a30 (4, 0, 25) 52 45 43 4e 52 3d 55 4e 53 50 45 43 28 58 53 41 4d 46 49 4c 29 3b 20 20 20 20 20 20 20 20 20 20 ┆RECNR=UNSPEC(XSAMFIL); ┆ 0x03a30…03a50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03a50…03a5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03a5f…03a7f (4, 0, 26) 41 33 3a 42 4b 4f 3d 58 4b 54 4f 3b 58 5a 3d 27 42 27 3b 42 41 56 44 3d 58 41 56 44 3b 20 20 20 ┆A3:BKO=XKTO;XZ='B';BAVD=XAVD; ┆ 0x03a7f…03a9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03a9f…03aae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03aae…03ace (4, 0, 27) 44 4f 20 49 3d 31 20 54 4f 20 31 32 3b 42 55 44 28 49 29 3d 30 3b 45 4e 44 3b 20 20 20 20 20 20 ┆DO I=1 TO 12;BUD(I)=0;END; ┆ 0x03ace…03aee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03aee…03afd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03afd…03b1d (4, 0, 28) 4f 50 45 4e 20 58 53 41 4d 46 49 4c 3b 4f 50 45 4e 20 4e 59 4b 54 4f 54 58 3b 4f 50 45 4e 20 58 ┆OPEN XSAMFIL;OPEN NYKTOTX;OPEN X┆ 0x03b1d…03b3d 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KTOTX; ┆ 0x03b3d…03b4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03b4c…03b6c (4, 0, 29) 41 31 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 ┆A1:ON ENDFILE GOTO SLUT; ┆ 0x03b6c…03b8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03b8c…03b9b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03b9b…03bbb (4, 0, 30) 52 45 41 44 20 46 49 4c 45 28 58 4b 54 4f 54 58 29 49 4e 54 4f 28 4b 54 4f 29 3b 20 20 20 20 20 ┆READ FILE(XKTOTX)INTO(KTO); ┆ 0x03bbb…03bdb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03bdb…03bea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03bea…03c0a (4, 0, 31) 4b 4f 4e 54 4f 3d 58 4b 4f 4e 54 4f 3b 5a 3d 27 41 27 3b 4b 3d 4b 4f 4e 54 4f 20 43 41 54 20 27 ┆KONTO=XKONTO;Z='A';K=KONTO CAT '┆ 0x03c0a…03c2a 20 20 20 20 27 3b 54 45 58 54 3d 58 54 45 58 54 3b 49 42 3d 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ ';TEXT=XTEXT;IB=0; ┆ 0x03c2a…03c39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03c39…03c59 (4, 0, 32) 58 4b 54 4f 3d 58 4b 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 ┆XKTO=XKONTO; ┆ 0x03c59…03c79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03c79…03c88 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03c88…03ca8 (4, 0, 33) 58 4d 4e 52 3d 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 ┆XMNR=0; ┆ 0x03ca8…03cc8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03cc8…03cd7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03cd7…03cf7 (4, 0, 34) 4f 4e 20 45 52 52 4f 52 20 47 4f 54 4f 20 57 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ON ERROR GOTO WR; ┆ 0x03cf7…03d17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03d17…03d26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03d26…03d46 (4, 0, 35) 52 45 41 44 20 4b 45 59 28 53 54 52 29 46 49 4c 45 28 58 53 41 4d 46 49 4c 29 49 4e 54 4f 28 58 ┆READ KEY(STR)FILE(XSAMFIL)INTO(X┆ 0x03d46…03d66 53 41 4d 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 ┆SAM); ┆ 0x03d66…03d75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03d75…03d95 (4, 0, 36) 49 42 3d 58 41 44 2d 58 41 4b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IB=XAD-XAK; ┆ 0x03d95…03db5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03db5…03dc4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03dc4…03de4 (4, 0, 37) 57 52 3a 57 52 49 54 45 20 46 49 4c 45 28 4e 59 4b 54 4f 54 58 29 46 52 4f 4d 28 4b 54 58 29 3b ┆WR:WRITE FILE(NYKTOTX)FROM(KTX);┆ 0x03de4…03e04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03e04…03e13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03e13…03e33 (4, 0, 38) 47 4f 54 4f 20 41 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 ┆GOTO A1; ┆ 0x03e33…03e53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03e53…03e62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03e62…03e82 (4, 0, 39) 53 4c 55 54 3a 43 4c 4f 53 45 20 4e 59 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT:CLOSE NYKTOTX; ┆ 0x03e82…03ea2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03ea2…03eb1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03eb1…03ed1 (4, 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; ┆ 0x03ed1…03ef1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03ef1…03f00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x03f00…03fff (5, 0, 0) DataSector[0xff] […0x2…] 0x041fd…0421d (5, 0, 3) 20 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 43 4c 20 31 20 4b ┆ DCL 1 K┆ 0x0421d…0423d 54 4f 2c 32 20 58 4b 4f 4e 54 4f 20 46 49 58 45 44 28 34 29 2c 32 20 58 54 45 58 54 20 43 48 41 ┆TO,2 XKONTO FIXED(4),2 XTEXT CHA┆ 0x0423d…0425d 52 28 33 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 ┆R(34); ┆ 0x0425d…0427d 20 20 20 20 20 20 20 20 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…] 0x0429d…042bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 43 4c 20 31 20 4b 54 58 ┆ DCL 1 KTX┆ 0x042bd…042dd 2c 32 20 4b 4f 4e 54 4f 20 46 49 58 45 44 28 34 29 2c 32 20 5a 20 43 48 41 52 28 31 29 2c 32 20 ┆,2 KONTO FIXED(4),2 Z CHAR(1),2 ┆ 0x042dd…042fc 4b 20 43 48 41 52 28 34 29 2c 32 20 54 45 58 54 20 43 48 41 52 28 33 34 29 2c 20 20 20 20 20 ┆K CHAR(4),2 TEXT CHAR(34), ┆ 0x042fc…0431c (5, 0, 4) 20 20 20 20 20 20 20 32 20 49 42 20 46 49 58 45 44 28 31 33 2c 32 29 3b 20 20 20 20 20 20 20 20 ┆ 2 IB FIXED(13,2); ┆ 0x0431c…0433c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ […0x3…] 0x0439c…043bc 20 20 20 20 20 44 43 4c 20 31 20 4b 42 55 2c 32 20 42 4b 4f 20 46 49 58 45 44 28 34 29 2c 32 20 ┆ DCL 1 KBU,2 BKO FIXED(4),2 ┆ 0x043bc…043dc 58 5a 20 43 48 41 52 28 31 29 2c 32 20 42 41 56 44 20 46 49 58 45 44 28 32 29 2c 32 20 42 55 44 ┆XZ CHAR(1),2 BAVD FIXED(2),2 BUD┆ 0x043dc…043fb 28 31 32 29 20 46 49 58 45 44 28 37 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(12) FIXED(7); ┆ 0x043fb…0441b (5, 0, 5) 20 20 20 20 20 20 20 20 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…] 0x0443b…0445b 20 20 20 20 44 43 4c 20 4e 59 53 41 4d 46 49 4c 20 46 49 4c 45 2c 58 53 41 4d 46 49 4c 20 46 49 ┆ DCL NYSAMFIL FILE,XSAMFIL FI┆ 0x0445b…0447b 4c 45 2c 4e 59 4b 54 4f 54 58 20 46 49 4c 45 2c 58 4b 54 4f 54 58 20 46 49 4c 45 2c 20 20 20 20 ┆LE,NYKTOTX FILE,XKTOTX FILE, ┆ 0x0447b…0449b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 58 4b 4f 20 46 49 58 45 44 28 34 29 2c ┆ XKO FIXED(4),┆ 0x0449b…044bb 52 45 43 4e 52 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 ┆RECNR BINARY; ┆ 0x044bb…044db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x044db…044fa 20 20 52 45 43 4e 52 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RECNR=0; ┆ 0x044fa…0451a (5, 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 ┆ ┆ 0x0451a…0453a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4e 59 53 41 4d 46 49 4c 3b ┆ OPEN NYSAMFIL;┆ 0x0453a…0455a 4f 50 45 4e 20 58 53 41 4d 46 49 4c 3b 4f 50 45 4e 20 4e 59 4b 54 4f 54 58 3b 4f 50 45 4e 20 58 ┆OPEN XSAMFIL;OPEN NYKTOTX;OPEN X┆ 0x0455a…0457a 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KTOTX; ┆ 0x0457a…0459a 20 41 31 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 54 4f 20 41 32 3b 20 20 20 20 20 20 20 20 20 ┆ A1:ON ENDFILE GOTO A2; ┆ 0x0459a…045ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x045ba…045da 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 58 4b 54 4f 54 58 ┆ READ FILE(XKTOTX┆ 0x045da…045f9 29 49 4e 54 4f 28 4b 54 4f 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)INTO(KTO); ┆ 0x045f9…04619 (5, 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 ┆ ┆ 0x04619…04639 4b 4f 4e 54 4f 3d 58 4b 4f 4e 54 4f 3b 5a 3d 27 41 27 3b 4b 3d 4b 4f 4e 54 4f 20 43 41 54 20 27 ┆KONTO=XKONTO;Z='A';K=KONTO CAT '┆ 0x04639…04659 20 20 20 20 27 3b 54 45 58 54 3d 58 54 45 58 54 3b 49 42 3d 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ ';TEXT=XTEXT;IB=0; ┆ 0x04659…04679 20 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 4e 59 4b 54 4f 54 ┆ WRITE FILE(NYKTOT┆ 0x04679…04699 58 29 46 52 4f 4d 28 4b 54 58 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆X)FROM(KTX); ┆ 0x04699…046b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f ┆ GO┆ 0x046b9…046d9 54 4f 20 41 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 ┆TO A1; ┆ 0x046d9…046f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x046f8…04718 (5, 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 ┆ ┆ […0x1…] 0x04738…04758 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 32 3a ┆ A2:┆ 0x04758…04778 43 4c 4f 53 45 20 4e 59 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CLOSE NYKTOTX; ┆ 0x04778…04798 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x04798…047b8 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4e 59 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 ┆ OPEN NYKTOTX; ┆ 0x047b8…047d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x047d8…047f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 35 3a 4f ┆ A5:O┆ 0x047f7…04817 (5, 0, 9) 4e 20 45 52 52 4f 52 20 47 4f 54 4f 20 53 4c 55 54 3b 52 45 41 44 20 4b 45 59 28 27 42 27 29 46 ┆N ERROR GOTO SLUT;READ KEY('B')F┆ 0x04817…04837 49 4c 45 28 58 53 41 4d 46 49 4c 29 49 4e 54 4f 28 58 53 41 4d 29 4b 45 59 54 4f 28 58 42 55 44 ┆ILE(XSAMFIL)INTO(XSAM)KEYTO(XBUD┆ 0x04837…04857 29 3b 20 20 20 20 20 20 20 20 20 49 46 20 55 4e 53 50 45 43 28 58 53 41 4d 46 49 4c 29 3c 3d 52 ┆); IF UNSPEC(XSAMFIL)<=R┆ 0x04857…04877 45 43 4e 52 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ECNR THEN GO TO SLUT; ┆ 0x04877…04897 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 43 4e 52 3d ┆ RECNR=┆ 0x04897…048b7 55 4e 53 50 45 43 28 58 53 41 4d 46 49 4c 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UNSPEC(XSAMFIL); ┆ 0x048b7…048d7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x048d7…048f6 20 20 20 20 20 20 20 20 20 41 33 3a 42 4b 4f 3d 58 4b 54 4f 3b 58 5a 3d 27 42 27 3b 42 41 56 ┆ A3:BKO=XKTO;XZ='B';BAV┆ 0x048f6…04916 (5, 0, 10) 44 3d 58 41 56 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 ┆D=XAVD; ┆ 0x04916…04936 20 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 4f 20 49 3d 31 20 ┆ DO I=1 ┆ 0x04936…04956 54 4f 20 31 32 3b 42 55 44 28 49 29 3d 30 3b 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO 12;BUD(I)=0;END; ┆ 0x04956…04976 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x04976…04996 20 20 20 20 20 20 20 20 41 34 3a 49 3d 58 4d 4e 52 3b 42 55 44 28 49 29 3d 28 58 41 44 2d 58 41 ┆ A4:I=XMNR;BUD(I)=(XAD-XA┆ 0x04996…049b6 4b 29 2f 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 ┆K)/100; ┆ 0x049b6…049d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 58 4b 54 4f 3d 2d 39 39 39 ┆ XKTO=-999┆ 0x049d6…049f5 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 20 20 ┆9; ┆ 0x049f5…04a15 (5, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x04a15…04a35 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 54 4f 20 42 55 44 52 45 47 3b 52 45 ┆ ON ENDFILE GOTO BUDREG;RE┆ 0x04a35…04a55 41 44 20 46 49 4c 45 28 58 53 41 4d 46 49 4c 29 49 4e 54 4f 28 58 53 41 4d 29 3b 20 20 20 20 20 ┆AD FILE(XSAMFIL)INTO(XSAM); ┆ 0x04a55…04a75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 43 4e 52 3d 55 4e 53 50 ┆ RECNR=UNSP┆ 0x04a75…04a95 45 43 28 58 53 41 4d 46 49 4c 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EC(XSAMFIL); ┆ 0x04a95…04ab5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x04ab5…04ad5 20 20 20 20 20 49 46 20 58 4b 54 4f 7f 3d 42 4b 4f 20 7c 20 58 41 56 44 7f 3d 42 41 56 44 20 7c ┆ IF XKTO =BKO ö XAVD =BAVD ö┆ 0x04ad5…04af4 20 58 42 55 44 7f 3d 27 42 27 20 54 48 45 4e 20 47 4f 54 4f 20 42 55 44 52 45 47 3b 20 20 20 ┆ XBUD ='B' THEN GOTO BUDREG; ┆ 0x04af4…04b14 (5, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 54 4f 20 41 34 3b 20 20 20 ┆ GOTO A4; ┆ 0x04b14…04b34 20 20 20 20 20 20 20 20 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…] 0x04b54…04b74 20 20 20 20 42 55 44 52 45 47 3a 55 4e 53 50 45 43 28 4e 59 4b 54 4f 54 58 29 3d 30 3b 43 41 4c ┆ BUDREG:UNSPEC(NYKTOTX)=0;CAL┆ 0x04b74…04b94 4c 20 53 45 4f 46 28 4e 59 4b 54 4f 54 58 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L SEOF(NYKTOTX); ┆ 0x04b94…04bb4 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 28 31 ┆ CALL OUTPUT(1┆ 0x04bb4…04bd4 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 20 20 ┆,6); ┆ 0x04bd4…04bf3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x04bf3…04c13 (5, 0, 13) 20 20 20 57 52 49 54 45 20 46 49 4c 45 28 4e 59 4b 54 4f 54 58 29 46 52 4f 4d 28 4b 42 55 29 3b ┆ WRITE FILE(NYKTOTX)FROM(KBU);┆ 0x04c13…04c33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x04c33…04c53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 4e 59 4b 54 4f 54 58 3b ┆ CLOSE NYKTOTX;┆ 0x04c53…04c73 4f 50 45 4e 20 4e 59 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OPEN NYKTOTX; ┆ 0x04c73…04c93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x04c93…04cb3 20 49 46 20 58 4b 54 4f 3d 2d 39 39 39 39 20 54 48 45 4e 20 47 4f 54 4f 20 53 4c 55 54 3b 20 20 ┆ IF XKTO=-9999 THEN GOTO SLUT; ┆ 0x04cb3…04cd3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x04cd3…04cf2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 58 42 55 44 3d 27 42 27 20 54 48 45 ┆ IF XBUD='B' THE┆ 0x04cf2…04d12 (5, 0, 14) 4e 20 47 4f 54 4f 20 41 33 3b 45 4c 53 45 20 47 4f 20 54 4f 20 41 35 3b 20 20 20 20 20 20 20 20 ┆N GOTO A3;ELSE GO TO A5; ┆ 0x04d12…04d32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x04d32…04d52 53 4c 55 54 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 20 ┆SLUT:END; ┆ 0x04d52…04d72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x04d72…04d92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 aa 4e 33 42 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 ┆ N3B:ON ENDFILE G┆ 0x04d92…04db2 4f 20 54 4f 20 55 54 3b 52 45 41 44 20 46 49 4c 45 28 4b 54 4f 54 58 29 49 4e 54 4f 28 44 55 4d ┆O TO UT;READ FILE(KTOTX)INTO(DUM┆ 0x04db2…04dd2 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 aa 41 ┆3); A┆ 0x04dd2…04df1 4c 4c 20 53 48 49 46 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆LL SHIFT; ┆ 0x04df1…04e40 (6, 0, 0) DataSector[0x4f] […0x38…] 0x05f88…05fa8 (7, 0, 16) 50 55 54 20 46 49 4c 45 28 44 29 53 4b 49 50 20 45 44 49 54 28 27 4d 5d 4e 41 44 3a 27 29 28 41 ┆PUT FILE(D)SKIP EDIT('MÅNAD:')(A┆ 0x05fa8…05fc8 29 3b 43 41 4c 4c 20 4b 46 49 4c 45 28 56 45 52 46 49 4c 29 3b 50 55 54 20 46 49 4c 45 28 44 29 ┆);CALL KFILE(VERFIL);PUT FILE(D)┆ 0x05fc8…05fd7 53 4b 49 50 3b 20 20 20 20 20 20 20 20 20 20 ┆SKIP; ┆ 0x05fd7…05ff7 (7, 0, 17) 52 45 43 4e 52 3d 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 ┆RECNR=0; ┆ 0x05ff7…06017 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06017…06026 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06026…06046 (7, 0, 18) 49 4e 31 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 49 4e 32 3b 52 45 41 44 20 46 49 ┆IN1:ON ENDFILE GO TO IN2;READ FI┆ 0x06046…06066 4c 45 28 56 45 52 46 49 4c 29 49 4e 54 4f 28 58 56 45 52 31 29 3b 52 45 43 4e 52 3d 55 4e 53 50 ┆LE(VERFIL)INTO(XVER1);RECNR=UNSP┆ 0x06066…06075 45 43 28 56 45 52 46 49 4c 29 3b 20 20 20 20 ┆EC(VERFIL); ┆ 0x06075…06095 (7, 0, 19) 44 4f 20 49 3d 31 20 54 4f 20 31 36 30 3b 58 56 45 52 33 3d 58 56 45 52 31 28 49 29 3b 20 20 20 ┆DO I=1 TO 160;XVER3=XVER1(I); ┆ 0x06095…060b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x060b5…060c4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x060c4…060e4 (7, 0, 20) 43 41 4c 4c 20 53 48 49 46 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL SHIFT; ┆ 0x060e4…06104 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06104…06113 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06113…06133 (7, 0, 21) 56 45 52 31 28 49 29 3d 56 45 52 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VER1(I)=VER3; ┆ 0x06133…06153 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06153…06162 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06162…06182 (7, 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; ┆ 0x06182…061a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x061a2…061b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x061b1…061d1 (7, 0, 23) 52 45 57 52 49 54 45 20 46 49 4c 45 28 56 45 52 46 49 4c 29 46 52 4f 4d 28 56 45 52 31 29 3b 20 ┆REWRITE FILE(VERFIL)FROM(VER1); ┆ 0x061d1…061f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x061f1…06200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06200…06220 (7, 0, 24) 47 4f 20 54 4f 20 49 4e 31 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 IN1; ┆ 0x06220…06240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06240…0624f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0624f…0629e (7, 0, 25) 0x20[0x4f] 0x0629e…062be (7, 0, 26) 49 4e 32 3a 55 4e 53 50 45 43 28 56 45 52 46 49 4c 29 3d 52 45 43 4e 52 3b 20 20 20 20 20 20 20 ┆IN2:UNSPEC(VERFIL)=RECNR; ┆ 0x062be…062de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x062de…062ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x062ed…0630d (7, 0, 27) 49 4e 32 42 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 49 4e 33 3b 52 45 41 44 20 46 ┆IN2B:ON ENDFILE GO TO IN3;READ F┆ 0x0630d…0632d 49 4c 45 28 56 45 52 46 49 4c 29 49 4e 54 4f 28 58 56 45 52 32 29 3b 52 45 43 4e 52 3d 55 4e 53 ┆ILE(VERFIL)INTO(XVER2);RECNR=UNS┆ 0x0632d…0633c 50 45 43 28 56 45 52 46 49 4c 29 3b 20 20 20 ┆PEC(VERFIL); ┆ 0x0633c…0635c (7, 0, 28) 44 4f 20 49 3d 31 20 54 4f 20 31 32 3b 58 56 45 52 33 3d 58 56 45 52 32 28 49 29 3b 20 20 20 20 ┆DO I=1 TO 12;XVER3=XVER2(I); ┆ 0x0635c…0637c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0637c…0638b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0638b…063ab (7, 0, 29) 43 41 4c 4c 20 53 48 49 46 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL SHIFT; ┆ 0x063ab…063cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x063cb…063da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x063da…063fa (7, 0, 30) 56 45 52 32 28 49 29 3d 56 45 52 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VER2(I)=VER3; ┆ 0x063fa…0641a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0641a…06429 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06429…06449 (7, 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; ┆ 0x06449…06469 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06469…06478 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06478…06498 (7, 0, 32) 52 45 57 52 49 54 45 20 46 49 4c 45 28 56 45 52 46 49 4c 29 46 52 4f 4d 28 56 45 52 32 29 3b 20 ┆REWRITE FILE(VERFIL)FROM(VER2); ┆ 0x06498…064b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x064b8…064c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x064c7…064e7 (7, 0, 33) 47 4f 20 54 4f 20 49 4e 32 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GO TO IN2B; ┆ 0x064e7…06507 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06507…06516 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06516…06565 (7, 0, 34) 0x20[0x4f] 0x06565…06585 (7, 0, 35) 49 4e 33 3a 55 4e 53 50 45 43 28 56 45 52 46 49 4c 29 3d 52 45 43 4e 52 3b 20 20 20 20 20 20 20 ┆IN3:UNSPEC(VERFIL)=RECNR; ┆ 0x06585…065a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x065a5…065b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x065b4…065d4 (7, 0, 36) 49 4e 33 42 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 55 54 3b 52 45 41 44 20 46 49 ┆IN3B:ON ENDFILE GO TO UT;READ FI┆ 0x065d4…065f4 4c 45 28 56 45 52 46 49 4c 29 49 4e 54 4f 28 58 56 45 52 33 29 3b 20 20 20 20 20 20 20 20 20 20 ┆LE(VERFIL)INTO(XVER3); ┆ 0x065f4…06603 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06603…06623 (7, 0, 37) 43 41 4c 4c 20 53 48 49 46 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL SHIFT; ┆ 0x06623…06643 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06643…06652 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06652…06672 (7, 0, 38) 52 45 57 52 49 54 45 20 46 49 4c 45 28 56 45 52 46 49 4c 29 46 52 4f 4d 28 56 45 52 33 29 3b 20 ┆REWRITE FILE(VERFIL)FROM(VER3); ┆ 0x06672…06692 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06692…066a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x066a1…066c1 (7, 0, 39) 47 4f 20 54 4f 20 49 4e 33 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GO TO IN3B; ┆ 0x066c1…066e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x066e1…066f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x066f0…06710 (7, 0, 40) 55 54 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 20 20 20 ┆UT:END; ┆ 0x06710…06730 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06730…0673f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0673f…0683e (8, 0, 0) DataSector[0xff] […0x3…] 0x06b3b…06b5b (8, 0, 4) 20 20 20 20 20 20 20 32 20 49 42 20 46 49 58 45 44 28 31 33 2c 32 29 3b 20 20 20 20 20 20 20 20 ┆ 2 IB FIXED(13,2); ┆ 0x06b5b…06b7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ […0x3…] 0x06bdb…06bfb 20 20 20 20 20 44 43 4c 20 31 20 4b 42 55 2c 32 20 42 4b 4f 20 46 49 58 45 44 28 34 29 2c 32 20 ┆ DCL 1 KBU,2 BKO FIXED(4),2 ┆ 0x06bfb…06c1b 58 5a 20 43 48 41 52 28 31 29 2c 32 20 42 41 56 44 20 46 49 58 45 44 28 32 29 2c 32 20 42 55 44 ┆XZ CHAR(1),2 BAVD FIXED(2),2 BUD┆ 0x06c1b…06c3a 28 31 32 29 20 46 49 58 45 44 28 37 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(12) FIXED(7); ┆ 0x06c3a…06c5a (8, 0, 5) 20 20 20 20 20 20 20 20 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…] 0x06c7a…06c9a 20 20 20 20 44 43 4c 20 4e 59 53 41 4d 46 49 4c 20 46 49 4c 45 2c 58 53 41 4d 46 49 4c 20 46 49 ┆ DCL NYSAMFIL FILE,XSAMFIL FI┆ 0x06c9a…06cba 4c 45 2c 4e 59 4b 54 4f 54 58 20 46 49 4c 45 2c 58 4b 54 4f 54 58 20 46 49 4c 45 2c 20 20 20 20 ┆LE,NYKTOTX FILE,XKTOTX FILE, ┆ 0x06cba…06cda 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 58 4b 4f 20 46 49 58 45 44 28 34 29 2c ┆ XKO FIXED(4),┆ 0x06cda…06cfa 52 45 43 4e 52 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 ┆RECNR BINARY; ┆ 0x06cfa…06d1a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06d1a…06d39 20 20 52 45 43 4e 52 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RECNR=0; ┆ 0x06d39…06d59 (8, 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 ┆ ┆ 0x06d59…06d79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4e 59 53 41 4d 46 49 4c 3b ┆ OPEN NYSAMFIL;┆ 0x06d79…06d99 4f 50 45 4e 20 58 53 41 4d 46 49 4c 3b 4f 50 45 4e 20 4e 59 4b 54 4f 54 58 3b 4f 50 45 4e 20 58 ┆OPEN XSAMFIL;OPEN NYKTOTX;OPEN X┆ 0x06d99…06db9 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KTOTX; ┆ 0x06db9…06dd9 20 41 31 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 54 4f 20 41 32 3b 20 20 20 20 20 20 20 20 20 ┆ A1:ON ENDFILE GOTO A2; ┆ 0x06dd9…06df9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06df9…06e19 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 58 4b 54 4f 54 58 ┆ READ FILE(XKTOTX┆ 0x06e19…06e38 29 49 4e 54 4f 28 4b 54 4f 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)INTO(KTO); ┆ 0x06e38…06e58 (8, 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 ┆ ┆ 0x06e58…06e78 4b 4f 4e 54 4f 3d 58 4b 4f 4e 54 4f 3b 5a 3d 27 41 27 3b 4b 3d 4b 4f 4e 54 4f 20 43 41 54 20 27 ┆KONTO=XKONTO;Z='A';K=KONTO CAT '┆ 0x06e78…06e98 20 20 20 20 27 3b 54 45 58 54 3d 58 54 45 58 54 3b 49 42 3d 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ ';TEXT=XTEXT;IB=0; ┆ 0x06e98…06eb8 20 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 4e 59 4b 54 4f 54 ┆ WRITE FILE(NYKTOT┆ 0x06eb8…06ed8 58 29 46 52 4f 4d 28 4b 54 58 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆X)FROM(KTX); ┆ 0x06ed8…06ef8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f ┆ GO┆ 0x06ef8…06f18 54 4f 20 41 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 ┆TO A1; ┆ 0x06f18…06f37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06f37…06f57 (8, 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 ┆ ┆ […0x1…] 0x06f77…06f97 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 32 3a ┆ A2:┆ 0x06f97…06fb7 43 4c 4f 53 45 20 4e 59 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CLOSE NYKTOTX; ┆ 0x06fb7…06fd7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x06fd7…06ff7 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 4e 59 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 ┆ OPEN NYKTOTX; ┆ 0x06ff7…07017 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x07017…07036 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 35 3a 4f ┆ A5:O┆ 0x07036…07056 (8, 0, 9) 4e 20 45 52 52 4f 52 20 47 4f 54 4f 20 53 4c 55 54 3b 52 45 41 44 20 4b 45 59 28 27 42 27 29 46 ┆N ERROR GOTO SLUT;READ KEY('B')F┆ 0x07056…07076 49 4c 45 28 58 53 41 4d 46 49 4c 29 49 4e 54 4f 28 58 53 41 4d 29 4b 45 59 54 4f 28 58 42 55 44 ┆ILE(XSAMFIL)INTO(XSAM)KEYTO(XBUD┆ 0x07076…07096 29 3b 20 20 20 20 20 20 20 20 20 49 46 20 55 4e 53 50 45 43 28 58 53 41 4d 46 49 4c 29 3c 3d 52 ┆); IF UNSPEC(XSAMFIL)<=R┆ 0x07096…070b6 45 43 4e 52 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ECNR THEN GO TO SLUT; ┆ 0x070b6…070d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 43 4e 52 3d ┆ RECNR=┆ 0x070d6…070f6 55 4e 53 50 45 43 28 58 53 41 4d 46 49 4c 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UNSPEC(XSAMFIL); ┆ 0x070f6…07116 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x07116…07135 20 20 20 20 20 20 20 20 20 41 33 3a 42 4b 4f 3d 58 4b 54 4f 3b 58 5a 3d 27 42 27 3b 42 41 56 ┆ A3:BKO=XKTO;XZ='B';BAV┆ 0x07135…07155 (8, 0, 10) 44 3d 58 41 56 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 ┆D=XAVD; ┆ 0x07155…07175 20 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 4f 20 49 3d 31 20 ┆ DO I=1 ┆ 0x07175…07195 54 4f 20 31 32 3b 42 55 44 28 49 29 3d 30 3b 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO 12;BUD(I)=0;END; ┆ 0x07195…071b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x071b5…071d5 20 20 20 20 20 20 20 20 41 34 3a 49 3d 58 4d 4e 52 3b 42 55 44 28 49 29 3d 28 58 41 44 2d 58 41 ┆ A4:I=XMNR;BUD(I)=(XAD-XA┆ 0x071d5…071f5 4b 29 2f 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 ┆K)/100; ┆ 0x071f5…07215 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 58 4b 54 4f 3d 2d 39 39 39 ┆ XKTO=-999┆ 0x07215…07234 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 20 20 ┆9; ┆ 0x07234…07254 (8, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x07254…07274 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 54 4f 20 42 55 44 52 45 47 3b 52 45 ┆ ON ENDFILE GOTO BUDREG;RE┆ 0x07274…07294 41 44 20 46 49 4c 45 28 58 53 41 4d 46 49 4c 29 49 4e 54 4f 28 58 53 41 4d 29 3b 20 20 20 20 20 ┆AD FILE(XSAMFIL)INTO(XSAM); ┆ 0x07294…072b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 43 4e 52 3d 55 4e 53 50 ┆ RECNR=UNSP┆ 0x072b4…072d4 45 43 28 58 53 41 4d 46 49 4c 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EC(XSAMFIL); ┆ 0x072d4…072f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x072f4…07314 20 20 20 20 20 49 46 20 58 4b 54 4f 7f 3d 42 4b 4f 20 7c 20 58 41 56 44 7f 3d 42 41 56 44 20 7c ┆ IF XKTO =BKO ö XAVD =BAVD ö┆ 0x07314…07333 20 58 42 55 44 7f 3d 27 42 27 20 54 48 45 4e 20 47 4f 54 4f 20 42 55 44 52 45 47 3b 20 20 20 ┆ XBUD ='B' THEN GOTO BUDREG; ┆ 0x07333…07353 (8, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 54 4f 20 41 34 3b 20 20 20 ┆ GOTO A4; ┆ 0x07353…07373 20 20 20 20 20 20 20 20 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…] 0x07393…073b3 20 20 20 20 42 55 44 52 45 47 3a 55 4e 53 50 45 43 28 4e 59 4b 54 4f 54 58 29 3d 30 3b 43 41 4c ┆ BUDREG:UNSPEC(NYKTOTX)=0;CAL┆ 0x073b3…073d3 4c 20 53 45 4f 46 28 4e 59 4b 54 4f 54 58 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L SEOF(NYKTOTX); ┆ 0x073d3…073f3 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 28 31 ┆ CALL OUTPUT(1┆ 0x073f3…07413 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 20 20 ┆,6); ┆ 0x07413…07432 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x07432…07452 (8, 0, 13) 20 20 20 57 52 49 54 45 20 46 49 4c 45 28 4e 59 4b 54 4f 54 58 29 46 52 4f 4d 28 4b 42 55 29 3b ┆ WRITE FILE(NYKTOTX)FROM(KBU);┆ 0x07452…07472 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x07472…07492 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 4e 59 4b 54 4f 54 58 3b ┆ CLOSE NYKTOTX;┆ 0x07492…074b2 4f 50 45 4e 20 4e 59 4b 54 4f 54 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OPEN NYKTOTX; ┆ 0x074b2…074d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x074d2…074f2 20 49 46 20 58 4b 54 4f 3d 2d 39 39 39 39 20 54 48 45 4e 20 47 4f 54 4f 20 53 4c 55 54 3b 20 20 ┆ IF XKTO=-9999 THEN GOTO SLUT; ┆ 0x074f2…07512 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x07512…07531 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 58 42 55 44 3d 27 42 27 20 54 48 45 ┆ IF XBUD='B' THE┆ 0x07531…07551 (8, 0, 14) 4e 20 47 4f 54 4f 20 41 33 3b 45 4c 53 45 20 47 4f 20 54 4f 20 41 35 3b 20 20 20 20 20 20 20 20 ┆N GOTO A3;ELSE GO TO A5; ┆ 0x07551…07571 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x07571…07591 53 4c 55 54 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 20 ┆SLUT:END; ┆ 0x07591…075b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x075b1…075d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 aa 4e 33 42 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 ┆ N3B:ON ENDFILE G┆ 0x075d1…075f1 4f 20 54 4f 20 55 54 3b 52 45 41 44 20 46 49 4c 45 28 4b 54 4f 54 58 29 49 4e 54 4f 28 44 55 4d ┆O TO UT;READ FILE(KTOTX)INTO(DUM┆ 0x075f1…07611 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 aa 41 ┆3); A┆ 0x07611…07630 4c 4c 20 53 48 49 46 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆LL SHIFT; ┆ 0x07630…0767f (9, 0, 0) DataSector[0x4f] […0x4…] 0x077bb…0780a (9, 0, 5) 0x00[0x4f] […0x4c…] 0x08f7e…08fcd (11, 0, 0) DataSector[0x4f] […0xe…] 0x0941f…0946e (11, 0, 15) 0x20[0x4f] 0x0946e…0948e (11, 0, 16) 32 20 56 45 52 4e 52 31 20 46 49 58 45 44 28 37 29 2c 32 20 56 54 58 54 31 20 43 48 41 52 28 32 ┆2 VERNR1 FIXED(7),2 VTXT1 CHAR(2┆ 0x0948e…094ae 30 29 2c 32 20 56 42 45 4c 31 20 46 49 58 45 44 28 31 31 2c 32 29 2c 32 20 56 4b 4f 44 31 20 43 ┆0),2 VBEL1 FIXED(11,2),2 VKOD1 C┆ 0x094ae…094bd 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 20 ┆HAR(1); ┆ 0x094bd…094dd (11, 0, 17) 44 43 4c 20 31 20 58 56 45 52 31 28 34 30 29 2c 32 20 58 4b 4f 31 20 43 48 41 52 28 34 29 2c 32 ┆DCL 1 XVER1(40),2 XKO1 CHAR(4),2┆ 0x094dd…094fd 20 58 41 56 44 31 20 43 48 41 52 28 32 29 2c 32 20 58 44 41 54 31 20 43 48 41 52 28 34 29 2c 20 ┆ XAVD1 CHAR(2),2 XDAT1 CHAR(4), ┆ 0x094fd…0950c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0950c…0952c (11, 0, 18) 32 20 58 56 45 52 4e 52 31 20 46 49 58 45 44 28 35 29 2c 32 20 58 54 58 54 20 43 48 41 52 28 32 ┆2 XVERNR1 FIXED(5),2 XTXT CHAR(2┆ 0x0952c…0954c 30 29 2c 32 20 58 42 45 4c 31 20 46 49 58 45 44 28 31 31 2c 32 29 2c 32 20 58 4b 4f 44 31 20 43 ┆0),2 XBEL1 FIXED(11,2),2 XKOD1 C┆ 0x0954c…0955b 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 20 ┆HAR(1); ┆ 0x0955b…095aa (11, 0, 19) 0x20[0x4f] 0x095aa…095f9 (11, 0, 20) 0x00[0x4f] […0x3d…] 0x0a8cc…0a91b (13, 0, 0) DataSector[0x4f] […0x1b…] 0x0b170…0b1bf (13, 0, 28) 0x00[0x4f] […0x35…] 0x0c21a…0c23a (15, 0, 0) 00 00 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0c23a…0c23f 20 20 20 20 20 ┆ ┆ 0x0c23f…0c25f (15, 0, 1) 00 00 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0c25f…0c264 20 20 20 20 20 ┆ ┆ 0x0c264…0c284 (15, 0, 2) 00 00 00 56 5b 4e 54 41 44 45 20 46 41 4b 54 55 52 4f 52 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ VÄNTADE FAKTUROR ┆ 0x0c284…0c289 20 20 20 20 20 ┆ ┆ 0x0c289…0c2a9 (15, 0, 3) 00 00 01 54 49 4c 4c 47 5d 4e 47 41 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TILLGÅNGAR ┆ 0x0c2a9…0c2ae 20 20 20 20 20 ┆ ┆ 0x0c2ae…0c2ce (15, 0, 4) 00 00 02 53 4b 55 4c 44 45 52 20 4f 43 48 20 45 47 45 54 20 4b 41 50 49 54 41 4c 20 20 20 20 20 ┆ SKULDER OCH EGET KAPITAL ┆ 0x0c2ce…0c2d3 20 20 20 20 20 ┆ ┆ 0x0c2d3…0c2f3 (15, 0, 5) 00 00 03 52 5c 52 45 4c 53 45 4e 53 20 49 4e 54 5b 4b 54 45 52 20 20 20 20 20 20 20 20 20 20 20 ┆ RÖRELSENS INTÄKTER ┆ 0x0c2f3…0c2f8 20 20 20 20 20 ┆ ┆ 0x0c2f8…0c318 (15, 0, 6) 00 00 04 4b 4f 53 54 4e 20 46 5c 52 20 4d 41 54 2e 20 56 41 52 4f 52 20 26 20 46 52 5b 4d 4d 2e ┆ KOSTN FÖR MAT. VAROR & FRÄMM.┆ 0x0c318…0c31d 20 41 52 42 20 ┆ ARB ┆ 0x0c31d…0c33d (15, 0, 7) 00 00 05 4b 4f 53 54 4e 41 44 45 52 20 46 5c 52 20 41 52 42 45 54 53 4b 52 41 46 54 20 20 20 20 ┆ KOSTNADER FÖR ARBETSKRAFT ┆ 0x0c33d…0c342 20 20 20 20 20 ┆ ┆ 0x0c342…0c362 (15, 0, 8) 00 00 06 5c 56 52 49 47 41 20 4b 4f 53 54 4e 41 44 45 52 20 36 20 20 20 20 20 20 20 20 20 20 20 ┆ ÖVRIGA KOSTNADER 6 ┆ 0x0c362…0c367 20 20 20 20 20 ┆ ┆ 0x0c367…0c387 (15, 0, 9) 00 00 07 5c 56 52 49 47 41 20 4b 4f 53 54 4e 41 44 45 52 20 37 20 20 20 20 20 20 20 20 20 20 20 ┆ ÖVRIGA KOSTNADER 7 ┆ 0x0c387…0c38c 20 20 20 20 20 ┆ ┆ 0x0c38c…0c3ac (15, 0, 10) 00 00 08 49 4e 54 2e 4b 4f 53 54 4e 2e 55 54 41 4e 46 2e 52 5c 52 20 52 45 53 2e 45 46 54 45 52 ┆ INT.KOSTN.UTANF.RÖR RES.EFTER┆ 0x0c3ac…0c3b1 20 41 53 4b 52 ┆ ASKR┆ 0x0c3b1…0c3d1 (15, 0, 11) 00 00 10 4b 41 53 53 41 2c 50 47 2c 42 41 4e 4b 2c 56 5b 52 44 45 50 41 50 50 45 52 20 20 20 20 ┆ KASSA,PG,BANK,VÄRDEPAPPER ┆ 0x0c3d1…0c3d6 20 20 20 20 20 ┆ ┆ 0x0c3d6…0c3f6 (15, 0, 12) 00 00 12 4b 55 4e 44 46 4f 52 44 52 49 4e 47 41 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KUNDFORDRINGAR ┆ 0x0c3f6…0c3fb 20 20 20 20 20 ┆ ┆ 0x0c3fb…0c41b (15, 0, 13) 00 00 13 46 5c 52 55 54 42 45 54 2e 20 4b 4f 53 54 4e 2e 26 20 55 50 50 4c 55 50 4e 41 20 49 4e ┆ FÖRUTBET. KOSTN.& UPPLUPNA IN┆ 0x0c41b…0c420 54 5b 4b 54 2e ┆TÄKT.┆ 0x0c420…0c440 (15, 0, 14) 00 00 14 44 49 56 45 52 53 45 20 4b 4f 52 54 46 52 49 53 54 49 47 41 20 46 4f 52 44 52 49 4e 47 ┆ DIVERSE KORTFRISTIGA FORDRING┆ 0x0c440…0c445 41 52 20 20 20 ┆AR ┆ 0x0c445…0c465 (15, 0, 15) 00 00 15 4c 41 47 45 52 2c 20 50 52 4f 44 2e 20 49 20 41 52 42 2e 2c 20 46 5c 52 53 4b 4f 54 54 ┆ LAGER, PROD. I ARB., FÖRSKOTT┆ 0x0c465…0c46a 20 4c 45 56 2e ┆ LEV.┆ 0x0c46a…0c48a (15, 0, 16) 00 00 16 53 50 5b 52 52 4b 54 4f 20 52 49 4b 53 42 2c 56 5b 52 44 45 50 2c 4c 5d 4e 47 46 2e 20 ┆ SPÄRRKTO RIKSB,VÄRDEP,LÅNGF. ┆ 0x0c48a…0c48f 46 4f 52 44 52 ┆FORDR┆ 0x0c48f…0c4af (15, 0, 17) 00 00 18 4d 41 53 4b 49 4e 45 52 20 4f 43 48 20 49 4e 56 45 4e 54 41 52 49 45 52 20 20 20 20 20 ┆ MASKINER OCH INVENTARIER ┆ 0x0c4af…0c4b4 20 20 20 20 20 ┆ ┆ 0x0c4b4…0c4d4 (15, 0, 18) 00 00 21 4c 45 56 45 52 41 4e 54 5c 52 53 53 4b 55 4c 44 45 52 20 20 20 20 20 20 20 20 20 20 20 ┆ !LEVERANTÖRSSKULDER ┆ 0x0c4d4…0c4d9 20 20 20 20 20 ┆ ┆ 0x0c4d9…0c4f9 (15, 0, 19) 00 00 22 53 4b 41 54 54 45 53 4b 55 4c 44 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ "SKATTESKULDER ┆ 0x0c4f9…0c4fe 20 20 20 20 20 ┆ ┆ 0x0c4fe…0c51e (15, 0, 20) 00 00 23 55 50 50 4c 55 50 4e 41 20 4b 4f 53 54 4e 2c 46 5c 52 55 54 42 45 54 2e 20 49 4e 54 5b ┆ #UPPLUPNA KOSTN,FÖRUTBET. INTÄ┆ 0x0c51e…0c523 4b 54 45 52 20 ┆KTER ┆ 0x0c523…0c543 (15, 0, 21) 00 00 24 4d 45 52 56 5b 52 44 45 53 4b 41 54 54 2e 53 5b 52 53 4b 2e 20 56 41 52 55 53 4b 41 54 ┆ $MERVÄRDESKATT.SÄRSK. VARUSKAT┆ 0x0c543…0c548 54 45 52 20 20 ┆TER ┆ 0x0c548…0c568 (15, 0, 22) 00 00 25 50 45 52 53 2e 20 4b 5b 4c 4c 53 4b 41 54 54 2c 20 44 49 56 20 4c 5c 4e 45 41 56 44 52 ┆ %PERS. KÄLLSKATT, DIV LÖNEAVDR┆ 0x0c568…0c56d 2e 4b 54 4f 4e ┆.KTON┆ 0x0c56d…0c58d (15, 0, 23) 00 00 26 44 49 56 20 4b 4f 52 54 46 52 49 53 54 49 47 41 20 53 4b 55 4c 44 45 52 20 20 20 20 20 ┆ &DIV KORTFRISTIGA SKULDER ┆ 0x0c58d…0c592 20 20 20 20 20 ┆ ┆ 0x0c592…0c5b2 (15, 0, 24) 00 00 27 4c 5d 4e 47 46 52 49 53 54 49 47 41 20 53 4b 55 4c 44 45 52 20 20 20 20 20 20 20 20 20 ┆ 'LÅNGFRISTIGA SKULDER ┆ 0x0c5b2…0c5b7 20 20 20 20 20 ┆ ┆ 0x0c5b7…0c5d7 (15, 0, 25) 00 00 28 4f 42 45 53 4b 41 54 54 41 44 45 20 52 45 53 45 52 56 45 52 20 20 20 20 20 20 20 20 20 ┆ (OBESKATTADE RESERVER ┆ 0x0c5d7…0c5dc 20 20 20 20 20 ┆ ┆ 0x0c5dc…0c5fc (15, 0, 26) 00 00 29 53 55 4d 4d 41 20 45 47 45 54 20 4b 41 50 49 54 41 4c 20 20 20 20 20 20 20 20 20 20 20 ┆ )SUMMA EGET KAPITAL ┆ 0x0c5fc…0c601 20 20 20 20 20 ┆ ┆ 0x0c601…0c621 (15, 0, 27) 00 00 30 46 5c 52 53 5b 4c 4a 4e 49 4e 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 0FÖRSÄLJNING ┆ 0x0c621…0c626 20 20 20 20 20 ┆ ┆ 0x0c626…0c646 (15, 0, 28) 00 00 34 53 5b 52 53 4b 49 4c 44 41 20 52 5c 52 45 4c 53 45 49 4e 54 5b 4b 54 45 52 20 20 20 20 ┆ 4SÄRSKILDA RÖRELSEINTÄKTER ┆ 0x0c646…0c64b 20 20 20 20 20 ┆ ┆ 0x0c64b…0c66b (15, 0, 29) 00 00 39 5c 56 52 49 47 41 20 49 4e 54 5b 4b 54 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 9ÖVRIGA INTÄKTER ┆ 0x0c66b…0c670 20 20 20 20 20 ┆ ┆ 0x0c670…0c690 (15, 0, 30) 00 00 40 4d 41 54 45 52 49 41 4c 20 45 4c 4c 45 52 20 56 41 52 4f 52 20 20 20 20 20 20 20 20 20 ┆ @MATERIAL ELLER VAROR ┆ 0x0c690…0c695 20 20 20 20 20 ┆ ┆ 0x0c695…0c6b5 (15, 0, 31) 00 00 44 45 4d 42 41 4c 4c 41 47 45 4d 41 54 45 52 49 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DEMBALLAGEMATERIAL ┆ 0x0c6b5…0c6ba 20 20 20 20 20 ┆ ┆ 0x0c6ba…0c6da (15, 0, 32) 00 00 52 4c 5c 4e 45 52 20 46 5c 52 45 54 41 47 53 4c 45 44 41 52 45 20 4f 20 54 4a 5b 4e 53 54 ┆ RLÖNER FÖRETAGSLEDARE O TJÄNST┆ 0x0c6da…0c6df 45 4d 5b 4e 20 ┆EMÄN ┆ 0x0c6df…0c6ff (15, 0, 33) 00 00 53 4b 4f 4e 54 41 4e 54 41 20 45 58 54 52 41 45 52 53 5b 54 54 4e 49 4e 47 41 52 20 20 20 ┆ SKONTANTA EXTRAERSÄTTNINGAR ┆ 0x0c6ff…0c704 20 20 20 20 20 ┆ ┆ 0x0c704…0c724 (15, 0, 34) 00 00 54 4e 41 54 55 52 41 46 5c 52 4d 5d 4e 45 52 20 54 49 4c 4c 20 41 4e 53 54 5b 4c 4c 44 41 ┆ TNATURAFÖRMÅNER TILL ANSTÄLLDA┆ 0x0c724…0c729 20 20 20 20 20 ┆ ┆ 0x0c729…0c749 (15, 0, 35) 00 00 55 4b 4f 53 54 4e 41 44 53 45 52 53 5b 54 54 4e 49 4e 47 41 52 20 20 20 20 20 20 20 20 20 ┆ UKOSTNADSERSÄTTNINGAR ┆ 0x0c749…0c74e 20 20 20 20 20 ┆ ┆ 0x0c74e…0c76e (15, 0, 36) 00 00 56 4c 41 47 53 54 41 44 47 41 44 45 20 41 52 42 45 54 53 47 49 56 41 52 41 56 47 49 46 54 ┆ VLAGSTADGADE ARBETSGIVARAVGIFT┆ 0x0c76e…0c773 45 52 20 20 20 ┆ER ┆ 0x0c773…0c793 (15, 0, 37) 00 00 57 5c 56 52 49 47 41 20 4b 4f 4c 4c 45 4b 54 49 56 41 20 41 56 47 49 46 54 45 52 20 20 20 ┆ WÖVRIGA KOLLEKTIVA AVGIFTER ┆ 0x0c793…0c798 20 20 20 20 20 ┆ ┆ 0x0c798…0c7b8 (15, 0, 38) 00 00 58 55 54 42 49 4c 44 4e 2c 53 4a 55 4b 20 26 20 48 5b 4c 53 4f 56 2c 5c 56 52 20 50 45 52 ┆ XUTBILDN,SJUK & HÄLSOV,ÖVR PER┆ 0x0c7b8…0c7bd 53 2e 53 4f 43 ┆S.SOC┆ 0x0c7bd…0c7dd (15, 0, 39) 00 00 59 53 5b 52 53 4b 20 4b 4f 53 54 4e 41 44 45 52 2c 20 53 41 4d 4d 41 4e 48 20 4d 45 44 20 ┆ YSÄRSK KOSTNADER, SAMMANH MED ┆ 0x0c7dd…0c7e2 41 52 42 4b 52 ┆ARBKR┆ 0x0c7e2…0c802 (15, 0, 40) 00 00 60 4c 4f 4b 41 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 ┆ `LOKAL ┆ 0x0c802…0c807 20 20 20 20 20 ┆ ┆ 0x0c807…0c827 (15, 0, 41) 00 00 61 48 59 52 41 20 46 5c 52 20 4d 41 53 4b 49 4e 45 52 20 4f 43 48 20 49 4e 56 45 4e 54 41 ┆ aHYRA FÖR MASKINER OCH INVENTA┆ 0x0c827…0c82c 52 49 45 52 20 ┆RIER ┆ 0x0c82c…0c84c (15, 0, 42) 00 00 64 46 5c 52 42 52 2e 49 4e 56 2c 46 5c 52 42 52 2e 4d 41 54 2c 45 4a 20 46 5c 52 20 54 49 ┆ dFÖRBR.INV,FÖRBR.MAT,EJ FÖR TI┆ 0x0c84c…0c851 4c 4c 56 2e 20 ┆LLV. ┆ 0x0c851…0c871 (15, 0, 43) 00 00 65 4b 4f 4e 54 4f 52 53 4d 41 54 45 52 49 45 4c 20 4f 43 48 20 54 52 59 43 4b 53 41 4b 45 ┆ eKONTORSMATERIEL OCH TRYCKSAKE┆ 0x0c871…0c876 52 20 20 20 20 ┆R ┆ 0x0c876…0c896 (15, 0, 44) 00 00 66 52 45 50 41 52 41 54 49 4f 4e 20 4f 43 48 20 55 4e 44 45 52 48 5d 4c 4c 20 20 20 20 20 ┆ fREPARATION OCH UNDERHÅLL ┆ 0x0c896…0c89b 20 20 20 20 20 ┆ ┆ 0x0c89b…0c8bb (15, 0, 45) 00 00 67 44 49 56 45 52 53 45 20 46 52 5b 4d 4d 41 4e 44 45 20 54 4a 5b 4e 53 54 45 52 20 20 20 ┆ gDIVERSE FRÄMMANDE TJÄNSTER ┆ 0x0c8bb…0c8c0 20 20 20 20 20 ┆ ┆ 0x0c8c0…0c8e0 (15, 0, 46) 00 00 68 54 45 4c 45 4b 4f 4d 4d 2e 20 4f 43 48 20 50 4f 53 54 42 45 46 4f 52 44 52 41 4e 20 20 ┆ hTELEKOMM. OCH POSTBEFORDRAN ┆ 0x0c8e0…0c8e5 20 20 20 20 20 ┆ ┆ 0x0c8e5…0c905 (15, 0, 47) 00 00 69 4b 4f 53 54 4e 41 44 45 52 20 46 5c 52 20 45 47 4e 41 20 54 52 41 4e 53 50 2e 4d 45 44 ┆ iKOSTNADER FÖR EGNA TRANSP.MED┆ 0x0c905…0c90a 45 4c 20 20 20 ┆EL ┆ 0x0c90a…0c92a (15, 0, 48) 00 00 70 46 52 41 4b 54 45 52 20 4f 43 48 20 54 52 41 4e 53 50 4f 52 54 45 52 20 20 20 20 20 20 ┆ pFRAKTER OCH TRANSPORTER ┆ 0x0c92a…0c92f 20 20 20 20 20 ┆ ┆ 0x0c92f…0c94f (15, 0, 49) 00 00 71 53 50 45 43 49 45 4c 4c 41 20 46 5c 52 53 5b 4c 4a 4e 49 4e 47 53 4b 4f 53 54 4e 41 44 ┆ qSPECIELLA FÖRSÄLJNINGSKOSTNAD┆ 0x0c94f…0c954 45 52 20 20 20 ┆ER ┆ 0x0c954…0c974 (15, 0, 50) 00 00 72 52 45 4b 4c 41 4d 20 4f 43 48 20 50 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ rREKLAM OCH PR ┆ 0x0c974…0c979 20 20 20 20 20 ┆ ┆ 0x0c979…0c999 (15, 0, 51) 00 00 73 46 5c 52 53 5b 4b 52 49 4e 47 53 50 52 45 4d 49 45 52 2c 20 52 49 53 4b 4b 4f 53 54 4e ┆ sFÖRSÄKRINGSPREMIER, RISKKOSTN┆ 0x0c999…0c99e 41 44 45 52 20 ┆ADER ┆ 0x0c99e…0c9be (15, 0, 52) 00 00 74 53 50 45 43 49 45 4c 4c 41 20 46 5c 52 56 41 4c 54 4e 49 4e 47 53 4b 4f 53 54 4e 41 44 ┆ tSPECIELLA FÖRVALTNINGSKOSTNAD┆ 0x0c9be…0c9c3 45 52 20 20 20 ┆ER ┆ 0x0c9c3…0c9e3 (15, 0, 53) 00 00 76 44 49 56 45 52 53 45 20 4b 4f 53 54 4e 41 44 45 52 20 20 20 20 20 20 20 20 20 20 20 20 ┆ vDIVERSE KOSTNADER ┆ 0x0c9e3…0c9e8 20 20 20 20 20 ┆ ┆ 0x0c9e8…0ca08 (15, 0, 54) 00 00 79 41 56 53 4b 52 49 56 4e 49 4e 47 41 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ yAVSKRIVNINGAR ┆ 0x0ca08…0ca0d 20 20 20 20 20 ┆ ┆ 0x0ca0d…0ca2d (15, 0, 55) 00 00 80 46 49 4e 41 4e 53 49 45 4c 4c 41 20 49 4e 54 5b 4b 54 45 52 20 20 20 20 20 20 20 20 20 ┆ FINANSIELLA INTÄKTER ┆ 0x0ca2d…0ca32 20 20 20 20 20 ┆ ┆ 0x0ca32…0ca52 (15, 0, 56) 00 00 81 46 49 4e 41 4e 53 49 45 4c 4c 41 20 4b 4f 53 54 4e 41 44 45 52 20 20 20 20 20 20 20 20 ┆ FINANSIELLA KOSTNADER ┆ 0x0ca52…0ca57 20 20 20 20 20 ┆ ┆ 0x0ca57…0ca77 (15, 0, 57) 00 00 84 44 49 56 2e 20 45 58 54 52 41 4f 52 44 49 4e 5b 52 41 20 49 4e 54 5b 4b 54 45 52 20 20 ┆ DIV. EXTRAORDINÄRA INTÄKTER ┆ 0x0ca77…0ca7c 20 20 20 20 20 ┆ ┆ 0x0ca7c…0ca9c (15, 0, 58) 00 00 86 4c 5b 4d 4e 41 44 45 20 42 49 44 52 41 47 2c 53 55 42 56 45 4e 54 49 4f 4e 45 52 2c 47 ┆ LÄMNADE BIDRAG,SUBVENTIONER,G┆ 0x0ca9c…0caa1 5d 56 4f 52 20 ┆ÅVOR ┆ 0x0caa1…0cac1 (15, 0, 59) 00 00 87 44 49 56 2e 20 45 58 54 52 41 4f 52 44 49 4e 5b 52 41 20 4b 4f 53 54 4e 41 44 45 52 20 ┆ DIV. EXTRAORDINÄRA KOSTNADER ┆ 0x0cac1…0cac6 20 20 20 20 20 ┆ ┆ 0x0cac6…0cae6 (15, 0, 60) 00 00 88 42 4f 4b 53 4c 55 54 53 44 49 53 50 4f 53 49 54 49 4f 4e 45 52 20 20 20 20 20 20 20 20 ┆ BOKSLUTSDISPOSITIONER ┆ 0x0cae6…0caeb 20 20 20 20 20 ┆ ┆ 0x0caeb…0cb0b (15, 0, 61) 00 00 89 53 4b 41 54 54 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SKATTER ┆ 0x0cb0b…0cb10 20 20 20 20 20 ┆ ┆ 0x0cb10…0cb30 (15, 0, 62) 00 01 01 4b 41 53 53 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 ┆ KASSA ┆ 0x0cb30…0cb35 20 20 20 20 20 ┆ ┆ 0x0cb35…0cb55 (15, 0, 63) 00 01 41 46 4f 52 44 52 49 4e 47 41 52 20 48 4f 53 20 41 4e 53 54 5b 4c 4c 44 41 20 20 20 20 20 ┆ AFORDRINGAR HOS ANSTÄLLDA ┆ 0x0cb55…0cb5a 20 20 20 20 20 ┆ ┆ 0x0cb5a…0cb7a (15, 0, 64) 00 01 82 49 4e 56 45 4e 54 41 52 49 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ INVENTARIER ┆ 0x0cb7a…0cb7f 20 20 20 20 20 ┆ ┆ 0x0cb7f…0cb9f (15, 0, 65) 00 01 84 42 49 4c 41 52 20 4f 43 48 20 41 4e 44 52 41 20 54 52 41 4e 53 50 4f 52 54 4d 45 44 45 ┆ BILAR OCH ANDRA TRANSPORTMEDE┆ 0x0cb9f…0cba4 4c 20 20 20 20 ┆L ┆ 0x0cba4…0cbc4 (15, 0, 66) 00 02 99 45 47 45 54 20 4b 41 50 49 54 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ EGET KAPITAL ┆ 0x0cbc4…0cbc9 20 20 20 20 20 ┆ ┆ 0x0cbc9…0cbe9 (16, 0, 0) 00 03 01 46 5c 52 53 5b 4c 4a 4e 49 4e 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FÖRSÄLJNING ┆ 0x0cbe9…0cbee 20 20 20 20 20 ┆ ┆ 0x0cbee…0cc0e (16, 0, 1) 00 03 99 44 49 56 45 52 53 45 20 5c 56 52 49 47 41 20 49 4e 54 5b 4b 54 45 52 20 20 20 20 20 20 ┆ DIVERSE ÖVRIGA INTÄKTER ┆ 0x0cc0e…0cc13 20 20 20 20 20 ┆ ┆ 0x0cc13…0cc33 (16, 0, 2) 00 04 08 49 4e 4b 5c 50 53 50 52 49 53 52 45 44 55 4b 54 49 4f 4e 45 52 20 20 20 20 20 20 20 20 ┆ INKÖPSPRISREDUKTIONER ┆ 0x0cc33…0cc38 20 20 20 20 20 ┆ ┆ 0x0cc38…0cc58 (16, 0, 3) 00 05 50 53 55 4d 4d 41 20 4b 4f 53 54 4e 41 44 53 45 52 53 5b 54 54 4e 49 4e 47 41 52 20 47 52 ┆ PSUMMA KOSTNADSERSÄTTNINGAR GR┆ 0x0cc58…0cc5d 50 20 20 20 20 ┆P ┆ 0x0cc5d…0cc7d (16, 0, 4) 00 05 80 53 55 4d 4d 41 20 55 54 42 2c 53 4a 20 26 20 48 5b 4c 53 4f 56 2c 50 45 52 53 2e 53 4f ┆ SUMMA UTB,SJ & HÄLSOV,PERS.SO┆ 0x0cc7d…0cc82 43 20 20 20 20 ┆C ┆ 0x0cc82…0cca2 (16, 0, 5) 00 06 50 53 55 4d 4d 41 20 4b 4f 4e 54 4f 52 53 4d 41 54 2e 26 20 54 52 59 43 4b 53 2e 20 47 52 ┆ PSUMMA KONTORSMAT.& TRYCKS. GR┆ 0x0cca2…0cca7 50 20 20 20 20 ┆P ┆ 0x0cca7…0ccc7 (16, 0, 6) 00 06 60 53 55 4d 4d 41 20 52 45 50 2e 20 4f 43 48 20 55 4e 44 45 52 48 5d 4c 4c 20 47 52 50 20 ┆ `SUMMA REP. OCH UNDERHÅLL GRP ┆ 0x0ccc7…0cccc 20 20 20 20 20 ┆ ┆ 0x0cccc…0ccec (16, 0, 7) 00 07 00 53 55 4d 4d 41 20 46 52 41 4b 54 45 52 20 26 20 54 52 41 4e 53 50 2e 20 47 52 50 20 20 ┆ SUMMA FRAKTER & TRANSP. GRP ┆ 0x0ccec…0ccf1 20 20 20 20 20 ┆ ┆ 0x0ccf1…0cd11 (16, 0, 8) 00 07 17 52 45 50 52 45 53 45 4e 54 41 54 49 4f 4e 53 4b 4f 53 54 4e 41 44 45 52 20 20 20 20 20 ┆ REPRESENTATIONSKOSTNADER ┆ 0x0cd11…0cd16 20 20 20 20 20 ┆ ┆ 0x0cd16…0cd36 (16, 0, 9) 00 07 20 53 55 4d 4d 41 20 52 45 4b 4c 41 4d 20 4f 43 48 20 50 52 20 20 47 52 50 20 20 20 20 20 ┆ SUMMA REKLAM OCH PR GRP ┆ 0x0cd36…0cd3b 20 20 20 20 20 ┆ ┆ 0x0cd3b…0cd5b (16, 0, 10) 00 07 40 53 55 4d 4d 41 20 53 50 45 43 20 46 5c 52 56 41 4c 54 4e 2e 4b 4f 53 54 4e 2e 20 47 52 ┆ @SUMMA SPEC FÖRVALTN.KOSTN. GR┆ 0x0cd5b…0cd60 50 20 20 20 20 ┆P ┆ 0x0cd60…0cd80 (16, 0, 11) 00 07 68 46 5c 52 45 4e 49 4e 47 53 41 56 47 49 46 54 45 52 20 20 20 20 20 20 20 20 20 20 20 20 ┆ hFÖRENINGSAVGIFTER ┆ 0x0cd80…0cd85 20 20 20 20 20 ┆ ┆ 0x0cd85…0cda5 (16, 0, 12) 00 07 91 41 56 53 4b 52 49 56 4e 49 4e 47 20 50 5d 20 4d 41 53 4b 2c 20 4f 43 48 20 49 4e 56 45 ┆ AVSKRIVNING PÅ MASK, OCH INVE┆ 0x0cda5…0cdaa 4e 54 2e 20 20 ┆NT. ┆ 0x0cdaa…0cdca (16, 0, 13) 00 10 11 56 5b 58 45 4c 4b 41 53 53 41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ VÄXELKASSA ┆ 0x0cdca…0cdcf 20 20 20 20 20 ┆ ┆ 0x0cdcf…0cdef (16, 0, 14) 00 10 20 50 4f 53 54 47 49 52 4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ POSTGIRO ┆ 0x0cdef…0cdf4 20 20 20 20 20 ┆ ┆ 0x0cdf4…0ce14 (16, 0, 15) 00 10 40 43 48 45 43 4b 4b 4f 4e 54 4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ @CHECKKONTO ┆ 0x0ce14…0ce19 20 20 20 20 20 ┆ ┆ 0x0ce19…0ce39 (16, 0, 16) 00 12 10 4b 55 4e 44 46 4f 52 44 52 49 4e 47 41 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KUNDFORDRINGAR ┆ 0x0ce39…0ce3e 20 20 20 20 20 ┆ ┆ 0x0ce3e…0ce5e (16, 0, 17) 00 12 20 46 41 43 54 4f 52 49 4e 47 46 4f 52 44 52 49 4e 47 41 52 20 20 20 20 20 20 20 20 20 20 ┆ FACTORINGFORDRINGAR ┆ 0x0ce5e…0ce63 20 20 20 20 20 ┆ ┆ 0x0ce63…0ce83 (16, 0, 18) 00 12 50 50 52 4f 56 49 53 49 4f 4e 53 46 4f 52 44 52 49 4e 47 41 52 20 20 20 20 20 20 20 20 20 ┆ PPROVISIONSFORDRINGAR ┆ 0x0ce83…0ce88 20 20 20 20 20 ┆ ┆ 0x0ce88…0cea8 (16, 0, 19) 00 12 99 52 45 53 45 52 56 20 4f 53 5b 4b 52 41 20 4b 55 4e 44 46 4f 52 44 52 49 4e 47 41 52 20 ┆ RESERV OSÄKRA KUNDFORDRINGAR ┆ 0x0cea8…0cead 20 20 20 20 20 ┆ ┆ 0x0cead…0cecd (16, 0, 20) 00 13 00 49 4e 54 45 52 49 4d 53 46 4f 52 44 52 49 4e 47 41 52 20 20 20 20 20 20 20 20 20 20 20 ┆ INTERIMSFORDRINGAR ┆ 0x0cecd…0ced2 20 20 20 20 20 ┆ ┆ 0x0ced2…0cef2 (16, 0, 21) 00 13 30 46 5c 52 55 54 42 45 54 41 4c 44 41 20 41 52 42 45 54 53 47 49 56 41 52 41 56 47 49 46 ┆ 0FÖRUTBETALDA ARBETSGIVARAVGIF┆ 0x0cef2…0cef7 54 45 52 20 20 ┆TER ┆ 0x0cef7…0cf17 (16, 0, 22) 00 14 10 46 4f 52 44 52 49 4e 47 41 52 20 48 4f 53 20 41 4e 53 54 5b 4c 4c 44 41 20 20 20 20 20 ┆ FORDRINGAR HOS ANSTÄLLDA ┆ 0x0cf17…0cf1c 20 20 20 20 20 ┆ ┆ 0x0cf1c…0cf3c (16, 0, 23) 00 14 30 46 4f 52 44 52 49 4e 47 41 52 20 48 4f 53 20 4c 45 56 45 52 41 4e 54 5c 52 20 20 20 20 ┆ 0FORDRINGAR HOS LEVERANTÖR ┆ 0x0cf3c…0cf41 20 20 20 20 20 ┆ ┆ 0x0cf41…0cf61 (16, 0, 24) 00 14 70 49 4e 47 5d 45 4e 44 45 20 4d 4f 4d 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ pINGÅENDE MOMS ┆ 0x0cf61…0cf66 20 20 20 20 20 ┆ ┆ 0x0cf66…0cf86 (16, 0, 25) 00 14 90 5c 56 52 49 47 41 20 4b 4f 52 54 46 52 49 53 54 49 47 41 20 46 4f 52 44 52 49 4e 47 41 ┆ ÖVRIGA KORTFRISTIGA FORDRINGA┆ 0x0cf86…0cf8b 52 20 20 20 20 ┆R ┆ 0x0cf8b…0cfab (16, 0, 26) 00 15 10 4c 41 47 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ LAGER ┆ 0x0cfab…0cfb0 20 20 20 20 20 ┆ ┆ 0x0cfb0…0cfd0 (16, 0, 27) 00 15 80 46 5c 52 53 4b 4f 54 54 20 54 49 4c 4c 20 4c 45 56 45 52 41 4e 54 5c 52 20 20 20 20 20 ┆ FÖRSKOTT TILL LEVERANTÖR ┆ 0x0cfd0…0cfd5 20 20 20 20 20 ┆ ┆ 0x0cfd5…0cff5 (16, 0, 28) 00 16 50 52 45 56 45 52 53 46 4f 52 44 52 49 4e 47 41 52 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PREVERSFORDRINGAR ┆ 0x0cff5…0cffa 20 20 20 20 20 ┆ ┆ 0x0cffa…0d01a (16, 0, 29) 00 16 70 44 45 50 4f 53 49 54 49 4f 4e 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ pDEPOSITIONER ┆ 0x0d01a…0d01f 20 20 20 20 20 ┆ ┆ 0x0d01f…0d03f (16, 0, 30) 00 18 21 49 4e 56 45 4e 54 41 52 49 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ !INVENTARIER ┆ 0x0d03f…0d044 20 20 20 20 20 ┆ ┆ 0x0d044…0d064 (16, 0, 31) 00 18 29 56 5b 52 44 45 4d 49 4e 53 4b 4e 49 4e 47 2c 20 49 4e 56 45 4e 54 41 52 49 45 52 20 20 ┆ )VÄRDEMINSKNING, INVENTARIER ┆ 0x0d064…0d069 20 20 20 20 20 ┆ ┆ 0x0d069…0d089 (16, 0, 32) 00 18 41 42 49 4c 41 52 20 4f 43 48 20 41 4e 44 52 41 20 54 52 41 4e 53 50 4f 52 54 4d 45 44 45 ┆ ABILAR OCH ANDRA TRANSPORTMEDE┆ 0x0d089…0d08e 4c 20 20 20 20 ┆L ┆ 0x0d08e…0d0ae (16, 0, 33) 00 18 49 56 5b 52 44 45 4d 49 4e 53 4b 4e 49 4e 47 2c 20 42 49 4c 41 52 20 20 20 20 20 20 20 20 ┆ IVÄRDEMINSKNING, BILAR ┆ 0x0d0ae…0d0b3 20 20 20 20 20 ┆ ┆ 0x0d0b3…0d0d3 (16, 0, 34) 00 21 10 4c 45 56 45 52 41 4e 54 5c 52 53 4b 55 4c 44 45 52 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ! LEVERANTÖRSKULDER ┆ 0x0d0d3…0d0d8 20 20 20 20 20 ┆ ┆ 0x0d0d8…0d0f8 (16, 0, 35) 00 21 19 56 5b 4e 54 41 44 45 20 46 41 4b 54 55 52 4f 52 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ! VÄNTADE FAKTUROR ┆ 0x0d0f8…0d0fd 20 20 20 20 20 ┆ ┆ 0x0d0fd…0d11d (16, 0, 36) 00 22 10 53 4b 41 54 54 45 53 4b 55 4c 44 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ " SKATTESKULDER ┆ 0x0d11d…0d122 20 20 20 20 20 ┆ ┆ 0x0d122…0d142 (16, 0, 37) 00 23 20 55 50 50 4c 55 50 4e 41 20 53 45 4d 45 53 54 45 52 4c 5c 4e 45 52 20 20 20 20 20 20 20 ┆ # UPPLUPNA SEMESTERLÖNER ┆ 0x0d142…0d147 20 20 20 20 20 ┆ ┆ 0x0d147…0d167 (16, 0, 38) 00 23 30 55 50 50 4c 55 50 4e 41 20 41 52 42 45 54 53 47 49 56 41 52 41 56 47 49 46 54 45 52 20 ┆ #0UPPLUPNA ARBETSGIVARAVGIFTER ┆ 0x0d167…0d16c 20 20 20 20 20 ┆ ┆ 0x0d16c…0d18c (16, 0, 39) 00 23 90 5c 56 52 49 47 41 20 49 4e 54 45 52 49 4d 53 4b 55 4c 44 45 52 20 20 20 20 20 20 20 20 ┆ # ÖVRIGA INTERIMSKULDER ┆ 0x0d18c…0d191 20 20 20 20 20 ┆ ┆ 0x0d191…0d1b1 (16, 0, 40) 00 24 40 46 41 4b 54 55 52 45 52 41 44 20 55 54 47 5d 45 4e 44 45 20 4d 4f 4d 53 20 31 20 20 20 ┆ $@FAKTURERAD UTGÅENDE MOMS 1 ┆ 0x0d1b1…0d1b6 20 20 20 20 20 ┆ ┆ 0x0d1b6…0d1d6 (16, 0, 41) 00 24 80 4d 4f 4d 53 2c 20 52 45 44 4f 56 49 53 4e 49 4e 47 53 4b 4f 4e 54 4f 20 20 20 20 20 20 ┆ $ MOMS, REDOVISNINGSKONTO ┆ 0x0d1d6…0d1db 20 20 20 20 20 ┆ ┆ 0x0d1db…0d1fb (16, 0, 42) 00 25 10 50 45 52 53 4f 4e 41 4c 45 4e 53 20 4b 5b 4c 4c 53 4b 41 54 54 20 20 20 20 20 20 20 20 ┆ % PERSONALENS KÄLLSKATT ┆ 0x0d1fb…0d200 20 20 20 20 20 ┆ ┆ 0x0d200…0d220 (16, 0, 43) 00 25 30 50 45 52 53 4f 4e 41 4c 45 4e 53 20 49 4e 54 52 45 53 53 45 4b 4f 4e 54 4f 20 20 20 20 ┆ %0PERSONALENS INTRESSEKONTO ┆ 0x0d220…0d225 20 20 20 20 20 ┆ ┆ 0x0d225…0d245 (16, 0, 44) 00 26 10 46 5c 52 53 4b 4f 54 54 20 46 52 5d 4e 20 4b 55 4e 44 45 52 20 20 20 20 20 20 20 20 20 ┆ & FÖRSKOTT FRÅN KUNDER ┆ 0x0d245…0d24a 20 20 20 20 20 ┆ ┆ 0x0d24a…0d26a (16, 0, 45) 00 26 50 47 41 52 41 4e 54 49 53 4b 55 4c 44 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ &PGARANTISKULDER ┆ 0x0d26a…0d26f 20 20 20 20 20 ┆ ┆ 0x0d26f…0d28f (16, 0, 46) 00 26 70 4c 5d 4e 45 53 4b 55 4c 44 45 52 20 28 4b 4f 52 54 46 52 49 53 54 49 47 41 29 20 20 20 ┆ &pLÅNESKULDER (KORTFRISTIGA) ┆ 0x0d28f…0d294 20 20 20 20 20 ┆ ┆ 0x0d294…0d2b4 (16, 0, 47) 00 26 90 5c 56 52 49 47 41 20 4b 4f 52 54 46 52 49 53 54 49 47 41 20 53 4b 55 4c 44 45 52 20 20 ┆ & ÖVRIGA KORTFRISTIGA SKULDER ┆ 0x0d2b4…0d2b9 20 20 20 20 20 ┆ ┆ 0x0d2b9…0d2d9 (16, 0, 48) 00 27 20 43 48 45 43 4b 4b 52 45 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ' CHECKKREDIT ┆ 0x0d2d9…0d2de 20 20 20 20 20 ┆ ┆ 0x0d2de…0d2fe (16, 0, 49) 00 27 90 5c 56 52 49 47 41 20 4c 5d 4e 47 46 52 49 53 54 49 47 41 20 53 4b 55 4c 44 45 52 20 20 ┆ ' ÖVRIGA LÅNGFRISTIGA SKULDER ┆ 0x0d2fe…0d303 20 20 20 20 20 ┆ ┆ 0x0d303…0d323 (16, 0, 50) 00 28 10 4c 41 47 45 52 52 45 53 45 52 56 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ( LAGERRESERV ┆ 0x0d323…0d328 20 20 20 20 20 ┆ ┆ 0x0d328…0d348 (16, 0, 51) 00 29 91 41 4b 54 49 45 4b 41 50 49 54 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ) AKTIEKAPITAL ┆ 0x0d348…0d34d 20 20 20 20 20 ┆ ┆ 0x0d34d…0d36d (16, 0, 52) 00 29 92 52 45 53 45 52 56 46 4f 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ) RESERVFOND ┆ 0x0d36d…0d372 20 20 20 20 20 ┆ ┆ 0x0d372…0d392 (16, 0, 53) 00 29 97 42 41 4c 41 4e 53 45 52 41 44 20 56 49 4e 53 54 2c 46 5c 52 4c 55 53 54 20 46 5c 52 45 ┆ ) BALANSERAD VINST,FÖRLUST FÖRE┆ 0x0d392…0d397 47 20 5d 52 20 ┆G ÅR ┆ 0x0d397…0d3b7 (16, 0, 54) 00 29 98 42 41 4c 41 4e 53 45 52 41 44 20 56 49 4e 53 54 20 45 4c 4c 45 52 20 46 5c 52 4c 55 53 ┆ ) BALANSERAD VINST ELLER FÖRLUS┆ 0x0d3b7…0d3bc 54 20 20 20 20 ┆T ┆ 0x0d3bc…0d3dc (16, 0, 55) 00 30 11 46 5c 52 53 5b 4c 4a 4e 49 4e 47 2c 20 4d 4f 4d 53 20 31 30 30 20 25 20 20 20 20 20 20 ┆ 0 FÖRSÄLJNING, MOMS 100 % ┆ 0x0d3dc…0d3e1 20 20 20 20 20 ┆ ┆ 0x0d3e1…0d401 (16, 0, 56) 00 30 14 46 5c 52 53 5b 4c 4a 4e 49 4e 47 2c 20 4d 4f 4d 53 46 52 49 20 20 20 20 20 20 20 20 20 ┆ 0 FÖRSÄLJNING, MOMSFRI ┆ 0x0d401…0d406 20 20 20 20 20 ┆ ┆ 0x0d406…0d426 (16, 0, 57) 00 30 80 49 4e 54 5b 4b 54 53 52 45 44 55 4b 54 49 4f 4e 45 52 20 20 20 20 20 20 20 20 20 20 20 ┆ 0 INTÄKTSREDUKTIONER ┆ 0x0d426…0d42b 20 20 20 20 20 ┆ ┆ 0x0d42b…0d44b (16, 0, 58) 00 34 10 50 52 4f 56 49 53 49 4f 4e 53 49 4e 54 5b 4b 54 45 52 20 20 20 20 20 20 20 20 20 20 20 ┆ 4 PROVISIONSINTÄKTER ┆ 0x0d44b…0d450 20 20 20 20 20 ┆ ┆ 0x0d450…0d470 (16, 0, 59) 00 34 50 46 5c 52 53 5b 4b 52 49 4e 47 53 45 52 53 5b 54 54 4e 49 4e 47 20 20 20 20 20 20 20 20 ┆ 4PFÖRSÄKRINGSERSÄTTNING ┆ 0x0d470…0d475 20 20 20 20 20 ┆ ┆ 0x0d475…0d495 (16, 0, 60) 00 39 91 4b 41 53 53 41 52 41 42 41 54 54 45 52 20 56 49 44 20 49 4e 4b 5c 50 20 20 20 20 20 20 ┆ 9 KASSARABATTER VID INKÖP ┆ 0x0d495…0d49a 20 20 20 20 20 ┆ ┆ 0x0d49a…0d4ba (16, 0, 61) 00 40 10 4d 41 54 45 52 49 41 4c 20 45 4c 4c 45 52 20 56 41 52 4f 52 20 20 20 20 20 20 20 20 20 ┆ @ MATERIAL ELLER VAROR ┆ 0x0d4ba…0d4bf 20 20 20 20 20 ┆ ┆ 0x0d4bf…0d4df (16, 0, 62) 00 40 81 45 52 48 5d 4c 4c 4e 41 20 4b 41 53 53 41 52 41 42 41 54 54 45 52 20 20 20 20 20 20 20 ┆ @ ERHÅLLNA KASSARABATTER ┆ 0x0d4df…0d4e4 20 20 20 20 20 ┆ ┆ 0x0d4e4…0d504 (16, 0, 63) 00 40 90 5c 4b 4e 49 4e 47 20 45 4c 4c 45 52 20 4d 49 4e 53 4b 4e 49 4e 47 20 41 56 20 4c 41 47 ┆ @ ÖKNING ELLER MINSKNING AV LAG┆ 0x0d504…0d509 45 52 20 20 20 ┆ER ┆ 0x0d509…0d529 (16, 0, 64) 00 44 10 45 4d 42 41 4c 4c 41 47 45 4d 41 54 45 52 49 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D EMBALLAGEMATERIAL ┆ 0x0d529…0d52e 20 20 20 20 20 ┆ ┆ 0x0d52e…0d54e (16, 0, 65) 00 52 10 4c 5c 4e 45 52 20 54 49 4c 4c 20 46 5c 52 45 54 41 47 53 4c 45 44 41 52 45 20 20 20 20 ┆ R LÖNER TILL FÖRETAGSLEDARE ┆ 0x0d54e…0d553 20 20 20 20 20 ┆ ┆ 0x0d553…0d573 (16, 0, 66) 00 52 90 4c 5c 4e 45 52 20 54 49 4c 4c 20 5c 56 52 49 47 41 20 54 4a 5b 4e 53 54 45 4d 5b 4e 20 ┆ R LÖNER TILL ÖVRIGA TJÄNSTEMÄN ┆ 0x0d573…0d578 20 20 20 20 20 ┆ ┆ 0x0d578…0d598 (17, 0, 0) 00 53 40 45 52 53 5b 54 54 4e 49 4e 47 20 46 5c 52 20 4d 5d 4c 54 49 44 53 4b 4f 53 54 4e 41 44 ┆ S@ERSÄTTNING FÖR MÅLTIDSKOSTNAD┆ 0x0d598…0d59d 45 52 20 20 20 ┆ER ┆ 0x0d59d…0d5bd (17, 0, 1) 00 54 20 4b 4f 53 54 4e 20 46 52 49 41 2c 45 4c 20 53 55 42 56 45 4e 54 49 4f 4e 2e 4d 5d 4c 54 ┆ T KOSTN FRIA,EL SUBVENTION.MÅLT┆ 0x0d5bd…0d5c2 49 44 45 52 20 ┆IDER ┆ 0x0d5c2…0d5e2 (17, 0, 2) 00 54 90 5c 56 52 49 47 41 20 4b 4f 53 54 4e 41 44 45 52 20 46 5c 52 20 4e 41 54 55 52 41 46 5c ┆ T ÖVRIGA KOSTNADER FÖR NATURAFÖ┆ 0x0d5e2…0d5e7 52 4d 2e 20 20 ┆RM. ┆ 0x0d5e7…0d607 (17, 0, 3) 00 55 10 45 52 53 5b 54 54 4e 49 4e 47 20 46 5c 52 20 46 41 4b 54 49 53 4b 41 20 4b 4f 53 54 4e ┆ U ERSÄTTNING FÖR FAKTISKA KOSTN┆ 0x0d607…0d60c 41 44 45 52 20 ┆ADER ┆ 0x0d60c…0d62c (17, 0, 4) 00 55 20 54 52 41 4b 54 41 4d 45 4e 54 45 4e 20 56 49 44 20 54 4a 5b 4e 53 54 45 52 45 53 41 20 ┆ U TRAKTAMENTEN VID TJÄNSTERESA ┆ 0x0d62c…0d631 20 20 20 20 20 ┆ ┆ 0x0d631…0d651 (17, 0, 5) 00 55 30 52 45 53 45 4b 4f 53 54 4e 41 44 53 45 52 53 5b 54 54 4e 49 4e 47 41 52 20 20 20 20 20 ┆ U0RESEKOSTNADSERSÄTTNINGAR ┆ 0x0d651…0d656 20 20 20 20 20 ┆ ┆ 0x0d656…0d676 (17, 0, 6) 00 55 40 42 49 4c 45 52 53 5b 54 54 4e 49 4e 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ U@BILERSÄTTNING ┆ 0x0d676…0d67b 20 20 20 20 20 ┆ ┆ 0x0d67b…0d69b (17, 0, 7) 00 55 80 42 49 4c 45 52 53 5b 54 54 4e 49 4e 47 41 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ U BILERSÄTTNINGAR ┆ 0x0d69b…0d6a0 20 20 20 20 20 ┆ ┆ 0x0d6a0…0d6c0 (17, 0, 8) 00 55 90 5c 56 52 49 47 41 20 4b 4f 53 54 4e 41 44 53 45 52 53 5b 54 54 4e 49 4e 47 41 52 20 20 ┆ U ÖVRIGA KOSTNADSERSÄTTNINGAR ┆ 0x0d6c0…0d6c5 20 20 20 20 20 ┆ ┆ 0x0d6c5…0d6e5 (17, 0, 9) 00 56 10 4c 41 47 53 54 41 44 47 41 44 45 41 52 42 45 54 53 47 49 56 41 52 41 56 47 49 46 54 45 ┆ V LAGSTADGADEARBETSGIVARAVGIFTE┆ 0x0d6e5…0d6ea 52 20 52 46 56 ┆R RFV┆ 0x0d6ea…0d70a (17, 0, 10) 00 57 10 50 45 4e 53 49 4f 4e 53 46 5c 52 53 5b 4b 52 49 4e 47 53 41 56 47 49 46 54 45 52 20 20 ┆ W PENSIONSFÖRSÄKRINGSAVGIFTER ┆ 0x0d70a…0d70f 20 20 20 20 20 ┆ ┆ 0x0d70f…0d72f (17, 0, 11) 00 57 60 41 4e 44 52 41 20 4b 4f 4c 4c 45 4b 54 49 56 41 20 41 56 47 49 46 54 45 52 20 41 46 41 ┆ W`ANDRA KOLLEKTIVA AVGIFTER AFA┆ 0x0d72f…0d734 20 41 4d 46 20 ┆ AMF ┆ 0x0d734…0d754 (17, 0, 12) 00 58 10 55 54 42 49 4c 44 4e 49 4e 47 20 53 4a 55 4b 2d 4f 43 48 20 48 5b 4c 53 4f 56 5d 52 44 ┆ X UTBILDNING SJUK-OCH HÄLSOVÅRD┆ 0x0d754…0d759 20 20 20 20 20 ┆ ┆ 0x0d759…0d779 (17, 0, 13) 00 58 90 5c 56 52 20 50 45 52 53 4f 4e 41 4c 53 4f 43 49 41 4c 20 56 45 52 4b 53 41 4d 48 45 54 ┆ X ÖVR PERSONALSOCIAL VERKSAMHET┆ 0x0d779…0d77e 20 20 20 20 20 ┆ ┆ 0x0d77e…0d79e (17, 0, 14) 00 59 10 4b 4f 53 54 4e 41 44 45 52 20 46 5c 52 20 50 45 52 53 4f 4e 41 4c 52 45 4b 52 59 54 45 ┆ Y KOSTNADER FÖR PERSONALREKRYTE┆ 0x0d79e…0d7a3 52 49 4e 47 20 ┆RING ┆ 0x0d7a3…0d7c3 (17, 0, 15) 00 60 10 4c 4f 4b 41 4c 48 59 52 41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ` LOKALHYRA ┆ 0x0d7c3…0d7c8 20 20 20 20 20 ┆ ┆ 0x0d7c8…0d7e8 (17, 0, 16) 00 60 50 45 4c 45 4b 54 52 49 43 49 54 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ `PELEKTRICITET ┆ 0x0d7e8…0d7ed 20 20 20 20 20 ┆ ┆ 0x0d7ed…0d80d (17, 0, 17) 00 60 70 53 54 5b 44 4e 49 4e 47 20 41 56 20 4c 4f 4b 41 4c 45 52 20 20 20 20 20 20 20 20 20 20 ┆ `pSTÄDNING AV LOKALER ┆ 0x0d80d…0d812 20 20 20 20 20 ┆ ┆ 0x0d812…0d832 (17, 0, 18) 00 60 80 52 45 50 41 52 41 54 49 4f 4e 20 41 56 20 4c 4f 4b 41 4c 45 52 20 20 20 20 20 20 20 20 ┆ ` REPARATION AV LOKALER ┆ 0x0d832…0d837 20 20 20 20 20 ┆ ┆ 0x0d837…0d857 (17, 0, 19) 00 60 90 5c 56 52 49 47 41 20 4c 4f 4b 41 4c 4b 4f 53 54 4e 41 44 45 52 20 20 20 20 20 20 20 20 ┆ ` ÖVRIGA LOKALKOSTNADER ┆ 0x0d857…0d85c 20 20 20 20 20 ┆ ┆ 0x0d85c…0d87c (17, 0, 20) 00 61 20 48 59 52 41 20 46 5c 52 20 49 4e 56 45 4e 54 41 52 49 45 52 20 20 20 20 20 20 20 20 20 ┆ a HYRA FÖR INVENTARIER ┆ 0x0d87c…0d881 20 20 20 20 20 ┆ ┆ 0x0d881…0d8a1 (17, 0, 21) 00 61 40 48 59 52 41 20 46 5c 52 20 5c 56 52 49 47 41 20 4b 4f 4e 54 4f 52 53 4d 41 53 4b 49 4e ┆ a@HYRA FÖR ÖVRIGA KONTORSMASKIN┆ 0x0d8a1…0d8a6 45 52 20 20 20 ┆ER ┆ 0x0d8a6…0d8c6 (17, 0, 22) 00 61 50 48 59 52 41 20 46 5c 52 20 54 52 41 4e 53 50 4f 52 54 4d 45 44 45 4c 20 20 20 20 20 20 ┆ aPHYRA FÖR TRANSPORTMEDEL ┆ 0x0d8c6…0d8cb 20 20 20 20 20 ┆ ┆ 0x0d8cb…0d8eb (17, 0, 23) 00 64 10 46 5c 52 42 52 55 4b 4e 49 4e 47 53 49 4e 56 45 4e 54 41 52 49 45 52 20 20 20 20 20 20 ┆ d FÖRBRUKNINGSINVENTARIER ┆ 0x0d8eb…0d8f0 20 20 20 20 20 ┆ ┆ 0x0d8f0…0d910 (17, 0, 24) 00 64 40 46 5c 52 42 52 55 4b 4e 49 4e 47 53 45 4d 42 41 4c 4c 41 47 45 20 20 20 20 20 20 20 20 ┆ d@FÖRBRUKNINGSEMBALLAGE ┆ 0x0d910…0d915 20 20 20 20 20 ┆ ┆ 0x0d915…0d935 (17, 0, 25) 00 64 60 46 5c 52 42 52 55 4b 4e 49 4e 47 53 4d 41 54 45 52 49 41 4c 20 20 20 20 20 20 20 20 20 ┆ d`FÖRBRUKNINGSMATERIAL ┆ 0x0d935…0d93a 20 20 20 20 20 ┆ ┆ 0x0d93a…0d95a (17, 0, 26) 00 64 90 5c 56 52 49 47 41 20 46 5c 52 42 52 55 4b 4e 49 4e 47 53 49 4e 56 45 4e 54 41 52 49 45 ┆ d ÖVRIGA FÖRBRUKNINGSINVENTARIE┆ 0x0d95a…0d95f 52 20 20 20 20 ┆R ┆ 0x0d95f…0d97f (17, 0, 27) 00 65 10 4b 4f 4e 54 4f 52 53 4d 41 54 45 52 49 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ e KONTORSMATERIAL ┆ 0x0d97f…0d984 20 20 20 20 20 ┆ ┆ 0x0d984…0d9a4 (17, 0, 28) 00 65 50 54 52 59 43 4b 53 41 4b 45 52 20 46 5c 52 20 4b 4f 4e 54 4f 52 53 42 52 55 4b 20 20 20 ┆ ePTRYCKSAKER FÖR KONTORSBRUK ┆ 0x0d9a4…0d9a9 20 20 20 20 20 ┆ ┆ 0x0d9a9…0d9c9 (17, 0, 29) 00 66 90 52 45 50 41 52 41 54 49 4f 4e 20 4f 43 48 20 55 4e 44 45 52 48 5d 4c 4c 20 20 20 20 20 ┆ f REPARATION OCH UNDERHÅLL ┆ 0x0d9c9…0d9ce 20 20 20 20 20 ┆ ┆ 0x0d9ce…0d9ee (17, 0, 30) 00 67 30 42 4f 4b 46 5c 52 49 4e 47 53 4b 4f 53 54 4e 41 44 45 52 20 20 20 20 20 20 20 20 20 20 ┆ g0BOKFÖRINGSKOSTNADER ┆ 0x0d9ee…0d9f3 20 20 20 20 20 ┆ ┆ 0x0d9f3…0da13 (17, 0, 31) 00 67 60 53 45 52 56 49 43 45 45 52 53 5b 54 54 4e 2e 42 52 41 4e 53 43 48 4f 52 47 41 4e 49 53 ┆ g`SERVICEERSÄTTN.BRANSCHORGANIS┆ 0x0da13…0da18 41 54 49 4f 4e ┆ATION┆ 0x0da18…0da38 (17, 0, 32) 00 67 90 5c 56 52 49 47 41 20 46 52 5b 4d 4d 41 4e 44 45 20 54 4a 5b 4e 53 54 45 52 20 20 20 20 ┆ g ÖVRIGA FRÄMMANDE TJÄNSTER ┆ 0x0da38…0da3d 20 20 20 20 20 ┆ ┆ 0x0da3d…0da5d (17, 0, 33) 00 68 10 4b 4f 53 54 4e 41 44 45 52 20 46 5c 52 20 54 45 4c 45 46 4f 4e 20 26 20 54 45 4c 45 47 ┆ h KOSTNADER FÖR TELEFON & TELEG┆ 0x0da5d…0da62 52 41 4d 20 20 ┆RAM ┆ 0x0da62…0da82 (17, 0, 34) 00 68 20 4b 4f 53 54 4e 41 44 45 52 20 46 5c 52 20 54 45 4c 45 58 20 20 20 20 20 20 20 20 20 20 ┆ h KOSTNADER FÖR TELEX ┆ 0x0da82…0da87 20 20 20 20 20 ┆ ┆ 0x0da87…0daa7 (17, 0, 35) 00 68 50 50 4f 52 54 4f 4b 4f 53 54 4e 41 44 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ hPPORTOKOSTNADER ┆ 0x0daa7…0daac 20 20 20 20 20 ┆ ┆ 0x0daac…0dacc (17, 0, 36) 00 69 10 52 45 53 45 4b 4f 53 54 4e 2c 20 46 5c 52 45 54 41 47 53 4c 45 44 2c 4e 5b 52 53 54 5d ┆ i RESEKOSTN, FÖRETAGSLED,NÄRSTÅ┆ 0x0dacc…0dad1 45 4e 44 45 20 ┆ENDE ┆ 0x0dad1…0daf1 (17, 0, 37) 00 69 20 52 45 53 45 4b 4f 53 54 4e 41 44 45 52 2c 20 5c 56 52 49 47 41 20 20 20 20 20 20 20 20 ┆ i RESEKOSTNADER, ÖVRIGA ┆ 0x0daf1…0daf6 20 20 20 20 20 ┆ ┆ 0x0daf6…0db16 (17, 0, 38) 00 69 40 42 49 4c 4f 4d 4b 4f 53 54 4e 41 44 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ i@BILOMKOSTNADER ┆ 0x0db16…0db1b 20 20 20 20 20 ┆ ┆ 0x0db1b…0db3b (17, 0, 39) 00 70 10 46 52 41 4b 54 45 52 20 4f 43 48 20 54 52 41 4e 53 50 4f 52 54 45 52 20 20 20 20 20 20 ┆ p FRAKTER OCH TRANSPORTER ┆ 0x0db3b…0db40 20 20 20 20 20 ┆ ┆ 0x0db40…0db60 (17, 0, 40) 00 71 60 4b 52 45 44 49 54 46 5c 52 53 5b 4c 4a 4e 49 4e 47 53 4b 4f 53 54 4e 41 44 2e 20 20 20 ┆ q`KREDITFÖRSÄLJNINGSKOSTNAD. ┆ 0x0db60…0db65 20 20 20 20 20 ┆ ┆ 0x0db65…0db85 (17, 0, 41) 00 71 71 52 45 50 52 45 53 45 4e 54 41 54 49 4f 4e 53 4b 4f 53 54 4e 41 44 2c 41 56 44 52 41 47 ┆ qqREPRESENTATIONSKOSTNAD,AVDRAG┆ 0x0db85…0db8a 53 47 49 4c 4c ┆SGILL┆ 0x0db8a…0dbaa (17, 0, 42) 00 71 72 52 45 50 52 45 53 45 4e 54 41 54 49 4f 4e 53 4b 4f 53 54 4e 2e 45 4a 20 41 56 44 52 2d ┆ qrREPRESENTATIONSKOSTN.EJ AVDR-┆ 0x0dbaa…0dbaf 47 49 4c 4c 20 ┆GILL ┆ 0x0dbaf…0dbcf (17, 0, 43) 00 71 90 5c 56 52 49 47 41 20 46 5c 52 53 5b 4c 4a 4e 49 4e 47 53 4b 4f 53 54 4e 41 44 45 52 20 ┆ q ÖVRIGA FÖRSÄLJNINGSKOSTNADER ┆ 0x0dbcf…0dbd4 20 20 20 20 20 ┆ ┆ 0x0dbd4…0dbf4 (17, 0, 44) 00 72 10 41 4e 4e 4f 4e 53 45 52 49 4e 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ r ANNONSERING ┆ 0x0dbf4…0dbf9 20 20 20 20 20 ┆ ┆ 0x0dbf9…0dc19 (17, 0, 45) 00 72 30 52 45 4b 4c 41 4d 54 52 59 43 4b 53 41 4b 45 52 20 26 20 44 49 52 45 4b 54 52 45 4b 4c ┆ r0REKLAMTRYCKSAKER & DIREKTREKL┆ 0x0dc19…0dc1e 41 4d 20 20 20 ┆AM ┆ 0x0dc1e…0dc3e (17, 0, 46) 00 72 40 55 54 53 54 5b 4c 4c 4e 49 4e 47 41 52 20 4f 43 48 20 4d 5b 53 53 4f 52 20 20 20 20 20 ┆ r@UTSTÄLLNINGAR OCH MÄSSOR ┆ 0x0dc3e…0dc43 20 20 20 20 20 ┆ ┆ 0x0dc43…0dc63 (17, 0, 47) 00 72 60 56 41 52 55 50 52 4f 56 45 52 2c 47 5d 56 4f 52 2c 50 52 45 53 45 4e 54 52 45 4b 4c 41 ┆ r`VARUPROVER,GÅVOR,PRESENTREKLA┆ 0x0dc63…0dc68 4d 20 20 20 20 ┆M ┆ 0x0dc68…0dc88 (17, 0, 48) 00 72 90 5c 56 52 49 47 20 52 45 4b 4c 41 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ r ÖVRIG REKLAM ┆ 0x0dc88…0dc8d 20 20 20 20 20 ┆ ┆ 0x0dc8d…0dcad (17, 0, 49) 00 73 10 46 5c 52 53 5b 4b 52 49 4e 47 53 50 52 45 4d 49 45 52 20 20 20 20 20 20 20 20 20 20 20 ┆ s FÖRSÄKRINGSPREMIER ┆ 0x0dcad…0dcb2 20 20 20 20 20 ┆ ┆ 0x0dcb2…0dcd2 (17, 0, 50) 00 73 50 4b 55 4e 44 46 5c 52 4c 55 53 54 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ sPKUNDFÖRLUSTER ┆ 0x0dcd2…0dcd7 20 20 20 20 20 ┆ ┆ 0x0dcd7…0dcf7 (17, 0, 51) 00 74 10 53 54 59 52 45 4c 53 45 41 52 56 4f 44 45 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ t STYRELSEARVODEN ┆ 0x0dcf7…0dcfc 20 20 20 20 20 ┆ ┆ 0x0dcfc…0dd1c (17, 0, 52) 00 74 20 52 45 56 49 53 49 4f 4e 53 41 52 56 4f 44 45 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ t REVISIONSARVODEN ┆ 0x0dd1c…0dd21 20 20 20 20 20 ┆ ┆ 0x0dd21…0dd41 (17, 0, 53) 00 74 90 5c 56 52 49 47 41 20 46 5c 52 56 41 4c 54 4e 49 4e 47 53 4b 4f 53 54 4e 41 44 45 52 20 ┆ t ÖVRIGA FÖRVALTNINGSKOSTNADER ┆ 0x0dd41…0dd46 20 20 20 20 20 ┆ ┆ 0x0dd46…0dd66 (17, 0, 54) 00 76 70 54 49 44 4e 49 4e 47 41 52 2c 54 49 44 53 4b 52 49 46 54 2c 46 41 43 4b 4c 49 54 54 45 ┆ vpTIDNINGAR,TIDSKRIFT,FACKLITTE┆ 0x0dd66…0dd6b 52 41 54 55 52 ┆RATUR┆ 0x0dd6b…0dd8b (17, 0, 55) 00 76 81 46 5c 52 45 4e 49 4e 47 53 41 56 47 49 46 54 45 52 2c 41 56 44 52 41 47 53 47 49 4c 4c ┆ v FÖRENINGSAVGIFTER,AVDRAGSGILL┆ 0x0dd8b…0dd90 41 20 20 20 20 ┆A ┆ 0x0dd90…0ddb0 (17, 0, 56) 00 76 82 46 5c 52 45 4e 49 4e 47 53 41 56 47 49 46 54 2e 45 4a 20 41 56 44 52 41 47 53 47 49 4c ┆ v FÖRENINGSAVGIFT.EJ AVDRAGSGIL┆ 0x0ddb0…0ddb5 4c 41 20 20 20 ┆LA ┆ 0x0ddb5…0ddd5 (17, 0, 57) 00 76 90 44 49 56 45 52 53 45 20 5c 56 52 49 47 41 20 4b 4f 53 54 4e 41 44 45 52 20 20 20 20 20 ┆ v DIVERSE ÖVRIGA KOSTNADER ┆ 0x0ddd5…0ddda 20 20 20 20 20 ┆ ┆ 0x0ddda…0ddfa (17, 0, 58) 00 79 14 41 56 53 4b 52 49 56 4e 49 4e 47 20 50 5d 20 42 49 4c 41 52 20 20 20 20 20 20 20 20 20 ┆ y AVSKRIVNING PÅ BILAR ┆ 0x0ddfa…0ddff 20 20 20 20 20 ┆ ┆ 0x0ddff…0de1f (17, 0, 59) 00 80 20 52 5b 4e 54 45 49 4e 54 5b 4b 54 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RÄNTEINTÄKTER ┆ 0x0de1f…0de24 20 20 20 20 20 ┆ ┆ 0x0de24…0de44 (17, 0, 60) 00 80 50 52 5b 4e 54 45 49 4e 54 5b 4b 54 45 52 20 50 5d 20 4b 55 4e 44 46 4f 52 44 52 49 4e 47 ┆ PRÄNTEINTÄKTER PÅ KUNDFORDRING┆ 0x0de44…0de49 41 52 20 20 20 ┆AR ┆ 0x0de49…0de69 (17, 0, 61) 00 80 80 4b 55 52 53 56 49 4e 53 54 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KURSVINSTER ┆ 0x0de69…0de6e 20 20 20 20 20 ┆ ┆ 0x0de6e…0de8e (17, 0, 62) 00 81 20 52 5b 4e 54 45 4b 4f 53 54 4e 41 44 45 52 20 4f 26 57 20 20 20 20 20 20 20 20 20 20 20 ┆ RÄNTEKOSTNADER O&W ┆ 0x0de8e…0de93 20 20 20 20 20 ┆ ┆ 0x0de93…0deb3 (17, 0, 63) 00 81 50 52 5b 4e 54 45 4b 4f 53 54 4e 41 44 45 52 2c 4c 45 56 45 52 41 4e 54 5c 52 53 53 4b 55 ┆ PRÄNTEKOSTNADER,LEVERANTÖRSSKU┆ 0x0deb3…0deb8 4c 44 45 52 20 ┆LDER ┆ 0x0deb8…0ded8 (17, 0, 64) 00 81 80 4b 55 52 53 46 5c 52 4c 55 53 54 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ KURSFÖRLUSTER ┆ 0x0ded8…0dedd 20 20 20 20 20 ┆ ┆ 0x0dedd…0defd (17, 0, 65) 00 81 90 5c 56 52 49 47 41 20 46 49 4e 41 4e 53 49 45 4c 4c 41 20 4b 4f 53 54 4e 41 44 45 52 20 ┆ ÖVRIGA FINANSIELLA KOSTNADER ┆ 0x0defd…0df02 20 20 20 20 20 ┆ ┆ 0x0df02…0df22 (17, 0, 66) 00 84 10 49 4e 46 4c 55 54 4e 41 20 41 56 53 4b 52 49 56 4e 41 20 46 4f 52 44 52 49 4e 47 41 52 ┆ INFLUTNA AVSKRIVNA FORDRINGAR┆ 0x0df22…0df27 20 20 20 20 20 ┆ ┆ 0x0df27…0df47 (18, 0, 0) 00 86 50 4c 5b 4d 4e 41 44 45 20 47 5d 56 4f 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PLÄMNADE GÅVOR ┆ 0x0df47…0df4c 20 20 20 20 20 ┆ ┆ 0x0df4c…0df6c (18, 0, 1) 00 87 10 53 54 52 41 46 46 41 56 47 49 46 54 45 52 2c 20 53 4b 41 54 54 45 52 20 4d 20 4d 20 20 ┆ STRAFFAVGIFTER, SKATTER M M ┆ 0x0df6c…0df71 20 20 20 20 20 ┆ ┆ 0x0df71…0df91 (18, 0, 2) 00 87 90 5c 56 52 49 47 41 20 45 58 54 52 41 4f 52 44 49 4e 5b 52 41 20 4b 4f 53 54 4e 41 44 45 ┆ ÖVRIGA EXTRAORDINÄRA KOSTNADE┆ 0x0df91…0df96 52 20 20 20 20 ┆R ┆ 0x0df96…0dfb6 (18, 0, 3) 00 88 10 46 5c 52 5b 4e 44 52 49 4e 47 20 41 56 20 4c 41 47 45 52 52 45 53 45 52 56 20 20 20 20 ┆ FÖRÄNDRING AV LAGERRESERV ┆ 0x0dfb6…0dfbb 20 20 20 20 20 ┆ ┆ 0x0dfbb…0dfdb (18, 0, 4) 00 89 10 53 4b 41 54 54 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SKATTER ┆ 0x0dfdb…0dfe0 20 20 20 20 20 ┆ ┆ 0x0dfe0…0e005 (18, 0, 5) 0x00[0x25] […0x3d…] 0x0e8d6…0e8e8 (19, 0, 0) 00 10 11 00 00 00 00 00 02 50 00 00 00 00 00 00 00 20 ┆ P ┆ 0x0e8e8…0e8fa (19, 0, 1) 00 10 11 00 01 00 00 00 02 87 60 00 00 00 02 87 60 20 ┆ ` ` ┆ 0x0e8fa…0e90c (19, 0, 2) 00 10 20 00 00 00 00 00 00 00 00 00 00 00 00 89 00 20 ┆ ┆ 0x0e90c…0e91e (19, 0, 3) 00 10 20 00 01 00 00 00 00 00 00 00 00 00 30 00 00 20 ┆ 0 ┆ 0x0e91e…0e930 (19, 0, 4) 00 10 40 00 00 00 00 00 00 60 00 00 00 00 00 00 00 20 ┆ @ ` ┆ 0x0e930…0e942 (19, 0, 5) 00 10 40 00 01 00 00 00 00 00 00 00 00 00 80 00 00 20 ┆ @ ┆ 0x0e942…0e954 (19, 0, 6) 00 12 10 00 00 00 00 00 00 00 00 00 00 00 05 60 00 20 ┆ ` ┆ 0x0e954…0e966 (19, 0, 7) 00 12 10 00 01 00 00 00 00 78 40 00 00 90 50 40 05 20 ┆ x@ P@ ┆ 0x0e966…0e978 (19, 0, 8) 00 12 20 00 00 00 00 00 00 80 00 00 00 00 00 00 00 20 ┆ ┆ 0x0e978…0e98a (19, 0, 9) 00 12 50 00 00 00 00 00 56 00 00 00 00 00 00 00 00 20 ┆ P V ┆ 0x0e98a…0e99c (19, 0, 10) 00 12 99 00 00 00 00 09 85 20 00 00 00 00 00 00 00 20 ┆ ┆ 0x0e99c…0e9ae (19, 0, 11) 00 14 10 00 01 00 00 00 20 00 00 00 00 00 00 00 00 20 ┆ ┆ 0x0e9ae…0e9c0 (19, 0, 12) 00 14 70 00 01 00 00 00 20 19 35 00 00 00 00 00 00 20 ┆ p 5 ┆ 0x0e9c0…0e9d2 (19, 0, 13) 00 15 80 00 01 00 00 02 09 21 55 00 00 07 01 36 00 20 ┆ !U 6 ┆ 0x0e9d2…0e9e4 (19, 0, 14) 00 18 21 00 01 00 00 00 24 91 97 00 00 00 00 00 00 20 ┆ ! $ ┆ 0x0e9e4…0e9f6 (19, 0, 15) 00 21 10 00 01 00 00 30 09 60 20 00 00 00 00 00 00 20 ┆ ! 0 ` ┆ 0x0e9f6…0ea08 (19, 0, 16) 00 21 19 00 01 00 00 00 45 29 65 00 00 00 00 00 00 20 ┆ ! E)e ┆ 0x0ea08…0ea1a (19, 0, 17) 00 22 10 00 01 00 00 00 15 77 00 00 00 00 00 00 00 20 ┆ " w ┆ 0x0ea1a…0ea2c (19, 0, 18) 00 23 90 00 01 00 00 00 27 25 35 00 00 00 00 00 00 20 ┆ # '%5 ┆ 0x0ea2c…0ea3e (19, 0, 19) 00 25 10 00 01 00 00 09 15 68 00 00 00 04 91 51 00 20 ┆ % h Q ┆ 0x0ea3e…0ea50 (19, 0, 20) 00 30 80 00 01 00 00 00 00 02 35 00 00 00 00 00 70 20 ┆ 0 5 p ┆ 0x0ea50…0ea62 (19, 0, 21) 00 40 10 00 01 00 00 00 20 00 00 00 00 00 00 00 00 20 ┆ @ ┆ 0x0ea62…0ea74 (19, 0, 22) 00 40 90 00 01 00 00 00 90 00 00 00 00 00 00 00 00 20 ┆ @ ┆ 0x0ea74…0ea86 (19, 0, 23) 00 52 10 00 01 00 00 02 68 06 00 00 00 00 00 00 00 20 ┆ R h ┆ 0x0ea86…0ea98 (19, 0, 24) 00 52 90 00 01 00 00 10 06 98 00 00 00 00 00 00 00 20 ┆ R ┆ 0x0ea98…0eaaa (19, 0, 25) 00 54 90 00 01 00 00 00 03 46 98 00 00 00 00 00 00 20 ┆ T F ┆ 0x0eaaa…0eabc (19, 0, 26) 00 55 10 00 01 00 00 00 01 12 20 00 00 00 00 00 00 20 ┆ U ┆ 0x0eabc…0eace (19, 0, 27) 00 55 20 00 01 00 00 00 03 65 00 00 00 00 00 01 00 20 ┆ U e ┆ 0x0eace…0eae0 (19, 0, 28) 00 55 30 00 01 00 00 00 00 79 00 00 00 00 00 00 00 20 ┆ U0 y ┆ 0x0eae0…0eaf2 (19, 0, 29) 00 55 80 00 01 00 00 00 04 78 80 00 00 00 00 00 00 20 ┆ U x ┆ 0x0eaf2…0eb04 (19, 0, 30) 00 58 10 00 01 00 00 00 00 77 35 00 00 00 00 00 00 20 ┆ X w5 ┆ 0x0eb04…0eb16 (19, 0, 31) 00 60 70 00 01 00 00 00 00 34 36 00 00 00 00 00 00 20 ┆ `p 46 ┆ 0x0eb16…0eb28 (19, 0, 32) 00 60 90 00 01 00 00 00 01 19 00 00 00 00 00 00 00 20 ┆ ` ┆ 0x0eb28…0eb3a (19, 0, 33) 00 64 10 00 01 00 00 00 09 96 33 00 00 00 00 00 00 20 ┆ d 3 ┆ 0x0eb3a…0eb4c (19, 0, 34) 00 64 60 00 01 00 00 00 00 16 73 00 00 00 00 00 00 20 ┆ d` s ┆ 0x0eb4c…0eb5e (19, 0, 35) 00 65 10 00 01 00 00 00 00 49 80 00 00 00 00 00 00 20 ┆ e I ┆ 0x0eb5e…0eb70 (19, 0, 36) 00 68 10 00 01 00 00 00 01 89 75 00 00 00 00 00 00 20 ┆ h u ┆ 0x0eb70…0eb82 (19, 0, 37) 00 68 50 00 01 00 00 00 00 30 50 00 00 00 00 81 82 20 ┆ hP 0P ┆ 0x0eb82…0eb94 (19, 0, 38) 00 69 10 00 01 00 00 00 27 19 00 00 00 00 00 00 00 20 ┆ i ' ┆ 0x0eb94…0eba6 (19, 0, 39) 00 69 40 00 01 00 00 00 09 72 15 00 00 00 12 63 00 20 ┆ i@ r c ┆ 0x0eba6…0ebb8 (19, 0, 40) 00 71 71 00 01 00 00 00 00 40 95 00 00 00 00 00 00 20 ┆ qq @ ┆ 0x0ebb8…0ebca (19, 0, 41) 00 71 90 00 01 00 00 00 01 16 40 00 00 00 00 00 00 20 ┆ q @ ┆ 0x0ebca…0ebdc (19, 0, 42) 00 76 70 00 01 00 00 00 00 36 90 00 00 00 00 00 00 20 ┆ vp 6 ┆ 0x0ebdc…0ebee (19, 0, 43) 00 76 90 00 01 00 00 00 01 27 00 00 00 00 00 00 00 20 ┆ v ' ┆ 0x0ebee…0ec00 (19, 0, 44) 00 81 80 00 01 00 00 00 88 68 10 00 00 00 00 00 00 20 ┆ h ┆ 0x0ec00…0ec12 (19, 0, 45) 0x00[0x12] […0x1ad…] 0x10a3c…10a64 (24, 0, 0) DataSector[0x28] […0x4…] 0x10b04…10b2c (24, 0, 5) 0x00[0x28] […0x7a…] 0x11e3c…11e73 (26, 0, 0) DataSector[0x37] […0xcd…] 0x14a7e…14ab5 (29, 0, 47) 0x00[0x37] […0x3a…] 0x1572b…157c1 (31, 0, 0) DataSector[0x96] […0x3…] 0x15983…15a19 (31, 0, 4) 0x00[0x96] […0x73…] 0x19d7b…19dca (36, 0, 0) DataSector[0x4f] […0xe…] 0x1a21c…1a26b (36, 0, 15) 0x00[0x4f] […0x3c…] 0x1b4ef…1b50f (37, 0, 35) 50 55 54 20 53 4b 49 50 20 4c 49 53 54 28 27 4c 5b 53 46 45 4c 20 54 59 50 27 2c 4f 4e 43 4f 44 ┆PUT SKIP LIST('LÄSFEL TYP',ONCOD┆ 0x1b50f…1b52f 45 2c 27 20 20 49 20 49 4e 46 49 4c 45 4e 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆E,' I INFILEN'); ┆ 0x1b52f…1b53e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b53e…1b55e (37, 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; ┆ 0x1b55e…1b57e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b57e…1b58d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b58d…1b5ad (37, 0, 37) 49 46 20 54 52 59 3e 34 20 54 48 45 4e 20 54 52 59 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆IF TRY>4 THEN TRY=0; ┆ 0x1b5ad…1b5cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b5cd…1b5dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b5dc…1b5fc (37, 0, 38) 47 4f 54 4f 20 53 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 ┆GOTO ST; ┆ 0x1b5fc…1b61c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b61c…1b62b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b62b…1b64b (37, 0, 39) 53 4c 55 54 3a 43 4c 4f 53 45 20 55 54 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT:CLOSE UTFIL; ┆ 0x1b64b…1b66b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b66b…1b67a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b67a…1b69a (37, 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; ┆ 0x1b69a…1b6ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b6ba…1b6c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b6c9…1b7c8 (38, 0, 0) DataSector[0xff] […0x2…] 0x1b9c6…1bac5 (38, 0, 3) 0x00[0xff] […0xb…] 0x1c5ba…1c609 (39, 0, 0) DataSector[0x4f] […0x24…] 0x1d125…1d174 (39, 0, 37) 0x00[0x4f] […0x16…] 0x1d83e…1d85e (40, 0, 19) 28 27 53 5b 54 54 20 44 5b 52 45 46 54 45 52 20 49 4e 20 44 49 53 4b 45 54 54 45 52 20 4d 45 44 ┆('SÄTT DÄREFTER IN DISKETTER MED┆ 0x1d85e…1d87e 20 46 5c 4c 4a 41 4e 44 45 20 46 49 4c 45 52 3a 27 29 28 41 28 34 37 29 29 20 20 20 20 20 20 20 ┆ FÖLJANDE FILER:')(A(47)) ┆ 0x1d87e…1d88d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d88d…1d8ad (40, 0, 20) 28 27 4b 50 4c 41 4e 27 29 28 41 28 34 37 29 29 28 27 4b 50 4c 41 4e 42 27 29 28 41 28 34 37 29 ┆('KPLAN')(A(47))('KPLANB')(A(47)┆ 0x1d8ad…1d8cd 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 20 20 ┆) ┆ 0x1d8cd…1d8dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d8dc…1d8fc (40, 0, 21) 28 27 4b 54 4f 54 58 27 29 28 41 28 34 37 29 29 28 27 53 41 4d 46 49 4c 27 29 28 41 28 39 34 29 ┆('KTOTX')(A(47))('SAMFIL')(A(94)┆ 0x1d8fc…1d91c 29 28 27 54 52 59 43 4b 20 53 45 44 41 4e 20 50 5d 20 52 45 54 55 52 4e 2e 27 29 28 41 28 34 36 ┆)('TRYCK SEDAN PÅ RETURN.')(A(46┆ 0x1d91c…1d92b 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆)); ┆ 0x1d92b…1d94b (40, 0, 22) 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 58 58 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GET SKIP LIST(XX); ┆ 0x1d94b…1d96b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d96b…1d97a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d97a…1d99a (40, 0, 23) 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PUT FILE(D) SKIP; ┆ 0x1d99a…1d9ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d9ba…1d9c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d9c9…1da18 (40, 0, 24) 0x20[0x4f] 0x1da18…1da38 (40, 0, 25) 4f 50 45 4e 20 4b 54 4f 54 58 3b 4f 50 45 4e 20 53 41 4d 46 49 4c 3b 4f 50 45 4e 20 4b 50 4c 41 ┆OPEN KTOTX;OPEN SAMFIL;OPEN KPLA┆ 0x1da38…1da58 4e 3b 4f 50 45 4e 20 4b 50 4c 41 4e 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆N;OPEN KPLANB; ┆ 0x1da58…1da67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1da67…1da87 (40, 0, 26) 41 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 54 4f 20 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆A:ON ENDFILE GOTO B; ┆ 0x1da87…1daa7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1daa7…1dab6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dab6…1dad6 (40, 0, 27) 52 45 41 44 20 46 49 4c 45 28 4b 50 4c 41 4e 29 49 4e 54 4f 28 4b 50 4c 29 3b 20 20 20 20 20 20 ┆READ FILE(KPLAN)INTO(KPL); ┆ 0x1dad6…1daf6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1daf6…1db05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1db05…1db25 (40, 0, 28) 4b 4f 4e 54 4f 3d 4b 54 4f 3b 5a 3d 27 41 27 3b 4b 3d 4b 54 4f 20 43 41 54 20 27 20 20 20 20 27 ┆KONTO=KTO;Z='A';K=KTO CAT ' '┆ 0x1db25…1db45 3b 54 45 58 54 3d 42 45 4e 3b 49 42 3d 49 4e 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆;TEXT=BEN;IB=INB; ┆ 0x1db45…1db54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1db54…1db74 (40, 0, 29) 4a 3d 30 3b 53 4b 4f 3d 4b 4f 4e 54 4f 3b 53 41 56 44 3d 27 20 20 20 27 3b 44 4f 20 49 3d 31 20 ┆J=0;SKO=KONTO;SAVD=' ';DO I=1 ┆ 0x1db74…1db94 54 4f 20 31 32 3b 53 41 44 28 49 29 3d 41 43 44 28 49 29 3b 53 41 4b 28 49 29 3d 41 43 4b 28 49 ┆TO 12;SAD(I)=ACD(I);SAK(I)=ACK(I┆ 0x1db94…1dba3 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆ 0x1dba3…1dbc3 (40, 0, 30) 49 46 20 53 41 44 28 49 29 7f 3d 30 7c 53 41 4b 28 49 29 7f 3d 30 20 54 48 45 4e 20 4a 3d 31 3b ┆IF SAD(I) =0öSAK(I) =0 THEN J=1;┆ 0x1dbc3…1dbe3 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; ┆ 0x1dbe3…1dbf2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dbf2…1dc12 (40, 0, 31) 57 52 49 54 45 20 46 49 4c 45 28 4b 54 4f 54 58 29 46 52 4f 4d 28 4b 54 58 29 3b 20 20 20 20 20 ┆WRITE FILE(KTOTX)FROM(KTX); ┆ 0x1dc12…1dc32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dc32…1dc41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dc41…1dc61 (40, 0, 32) 49 46 20 4a 3d 31 20 54 48 45 4e 20 57 52 49 54 45 20 46 49 4c 45 28 53 41 4d 46 49 4c 29 46 52 ┆IF J=1 THEN WRITE FILE(SAMFIL)FR┆ 0x1dc61…1dc81 4f 4d 28 53 41 4d 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 ┆OM(SAM); ┆ 0x1dc81…1dc90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dc90…1dcb0 (40, 0, 33) 47 4f 54 4f 20 41 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GOTO A; ┆ 0x1dcb0…1dcd0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dcd0…1dcdf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dcdf…1dcff (40, 0, 34) 42 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 ┆B:ON ENDFILE GOTO SLUT; ┆ 0x1dcff…1dd1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dd1f…1dd2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dd2e…1dd4e (40, 0, 35) 52 45 41 44 20 46 49 4c 45 28 4b 50 4c 41 4e 42 29 49 4e 54 4f 28 4b 50 4c 42 29 3b 20 20 20 20 ┆READ FILE(KPLANB)INTO(KPLB); ┆ 0x1dd4e…1dd6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dd6e…1dd7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dd7d…1dd9d (40, 0, 36) 4b 4f 4e 54 4f 3d 4b 54 4f 42 3b 5a 3d 27 41 27 3b 4b 3d 4b 54 4f 42 20 43 41 54 20 27 20 20 20 ┆KONTO=KTOB;Z='A';K=KTOB CAT ' ┆ 0x1dd9d…1ddbd 20 27 3b 54 45 58 54 3d 42 45 4e 41 3b 49 42 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ';TEXT=BENA;IB=0; ┆ 0x1ddbd…1ddcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1ddcc…1ddec (40, 0, 37) 57 52 49 54 45 20 46 49 4c 45 28 4b 54 4f 54 58 29 46 52 4f 4d 28 4b 54 58 29 3b 20 20 20 20 20 ┆WRITE FILE(KTOTX)FROM(KTX); ┆ 0x1ddec…1de0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1de0c…1de1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1de1b…1de3b (40, 0, 38) 47 4f 54 4f 20 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 ┆GOTO B; ┆ 0x1de3b…1de5b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1de5b…1de6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1de6a…1de8a (40, 0, 39) 53 4c 55 54 3a 43 4c 4f 53 45 20 4b 54 4f 54 58 3b 43 4c 4f 53 45 20 53 41 4d 46 49 4c 3b 20 20 ┆SLUT:CLOSE KTOTX;CLOSE SAMFIL; ┆ 0x1de8a…1deaa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1deaa…1deb9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1deb9…1ded9 (40, 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; ┆ 0x1ded9…1def9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1def9…1df08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1df08…1df57 (41, 0, 0) DataSector[0x4f] […0x24…] 0x1ea73…1eac2 (41, 0, 37) 0x00[0x4f] […0x2c…] 0x1f856…1f955 (43, 0, 0) DataSector[0xff] […0x3…] 0x1fc52…1fd51 (43, 0, 4) 0x00[0xff] […0xa…] 0x20747…20767 (44, 0, 0) 2f 2a 46 5c 52 53 54 41 20 52 41 44 45 4e 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆/*FÖRSTA RADEN*/ ┆ 0x20767…20787 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20787…20796 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20796…207b6 (44, 0, 1) 2f 2a 56 41 4e 44 43 4f 4e 20 41 4e 44 20 53 4d 49 54 48 2c 20 42 59 54 45 52 20 55 54 53 45 45 ┆/*VANDCON AND SMITH, BYTER UTSEE┆ 0x207b6…207d6 4e 44 45 54 20 49 20 44 45 4e 20 47 41 4d 4c 41 20 56 45 52 53 2e 20 41 56 20 56 45 52 46 49 4c ┆NDET I DEN GAMLA VERS. AV VERFIL┆ 0x207d6…207e5 20 28 4a 41 4e 2d 44 45 43 29 20 20 20 20 20 ┆ (JAN-DEC) ┆ 0x207e5…20805 (44, 0, 2) 54 49 4c 4c 20 44 45 4e 20 4e 59 41 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TILL DEN NYA. ┆ 0x20805…20825 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20825…20834 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20834…20854 (44, 0, 3) 4b 4c 41 52 54 3a 20 37 38 31 31 33 30 20 20 50 52 4f 47 52 3a 54 44 20 2a 2f 20 20 20 20 20 20 ┆KLART: 781130 PROGR:TD */ ┆ 0x20854…20874 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20874…20883 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20883…208d2 (44, 0, 4) 0x20[0x4f] 0x208d2…208f2 (44, 0, 5) 44 43 4c 20 31 20 56 45 52 31 28 31 36 30 29 2c 32 20 56 4b 4f 31 20 46 49 58 45 44 28 34 29 2c ┆DCL 1 VER1(160),2 VKO1 FIXED(4),┆ 0x208f2…20912 32 20 56 41 56 44 31 20 43 48 41 52 28 33 29 2c 32 20 56 44 41 54 31 20 46 49 58 45 44 28 34 29 ┆2 VAVD1 CHAR(3),2 VDAT1 FIXED(4)┆ 0x20912…20921 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆, ┆ 0x20921…20941 (44, 0, 6) 32 20 56 45 52 4e 52 31 20 46 49 58 45 44 28 37 29 2c 32 20 56 54 58 54 31 20 43 48 41 52 28 32 ┆2 VERNR1 FIXED(7),2 VTXT1 CHAR(2┆ 0x20941…20961 30 29 2c 32 20 56 42 45 4c 31 20 46 49 58 45 44 28 31 31 2c 32 29 2c 32 20 56 4b 4f 44 31 20 43 ┆0),2 VBEL1 FIXED(11,2),2 VKOD1 C┆ 0x20961…20970 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 20 ┆HAR(1); ┆ 0x20970…20990 (44, 0, 7) 44 43 4c 20 31 20 58 56 45 52 31 28 31 36 30 29 2c 32 20 58 4b 4f 31 20 43 48 41 52 28 34 29 2c ┆DCL 1 XVER1(160),2 XKO1 CHAR(4),┆ 0x20990…209b0 32 20 58 41 56 44 31 20 43 48 41 52 28 32 29 2c 32 20 58 44 41 54 31 20 43 48 41 52 28 34 29 2c ┆2 XAVD1 CHAR(2),2 XDAT1 CHAR(4),┆ 0x209b0…209bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x209bf…209df (44, 0, 8) 32 20 58 56 45 52 4e 52 31 20 46 49 58 45 44 28 35 29 2c 32 20 58 54 58 54 31 20 43 48 41 52 28 ┆2 XVERNR1 FIXED(5),2 XTXT1 CHAR(┆ 0x209df…209ff 32 30 29 2c 32 20 58 42 45 4c 31 20 46 49 58 45 44 28 31 31 2c 32 29 2c 32 20 58 4b 4f 44 31 20 ┆20),2 XBEL1 FIXED(11,2),2 XKOD1 ┆ 0x209ff…20a0e 43 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 ┆CHAR(1); ┆ 0x20a0e…20a5d (44, 0, 9) 0x20[0x4f] 0x20a5d…20a7d (44, 0, 10) 44 43 4c 20 31 20 56 45 52 32 28 31 32 29 2c 32 20 56 4b 4f 32 20 46 49 58 45 44 28 34 29 2c 32 ┆DCL 1 VER2(12),2 VKO2 FIXED(4),2┆ 0x20a7d…20a9d 20 56 41 56 44 32 20 43 48 41 52 28 33 29 2c 32 20 56 44 41 54 32 20 46 49 58 45 44 28 34 29 2c ┆ VAVD2 CHAR(3),2 VDAT2 FIXED(4),┆ 0x20a9d…20aac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20aac…20acc (44, 0, 11) 32 20 56 45 52 4e 52 32 20 46 49 58 45 44 28 37 29 2c 32 20 56 54 58 54 32 20 43 48 41 52 28 32 ┆2 VERNR2 FIXED(7),2 VTXT2 CHAR(2┆ 0x20acc…20aec 30 29 2c 32 20 56 42 45 4c 32 20 46 49 58 45 44 28 31 31 2c 32 29 2c 32 20 56 4b 4f 44 32 20 43 ┆0),2 VBEL2 FIXED(11,2),2 VKOD2 C┆ 0x20aec…20afb 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 20 ┆HAR(1); ┆ 0x20afb…20b1b (44, 0, 12) 44 43 4c 20 31 20 58 56 45 52 32 28 31 32 29 2c 32 20 58 4b 4f 32 20 43 48 41 52 28 34 29 2c 32 ┆DCL 1 XVER2(12),2 XKO2 CHAR(4),2┆ 0x20b1b…20b3b 20 58 41 56 44 32 20 43 48 41 52 28 32 29 2c 32 20 58 44 41 54 32 20 43 48 41 52 28 34 29 2c 20 ┆ XAVD2 CHAR(2),2 XDAT2 CHAR(4), ┆ 0x20b3b…20b4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20b4a…20b6a (44, 0, 13) 32 20 58 56 45 52 4e 52 32 20 46 49 58 45 44 28 35 29 2c 32 20 58 54 58 54 32 20 43 48 41 52 28 ┆2 XVERNR2 FIXED(5),2 XTXT2 CHAR(┆ 0x20b6a…20b8a 32 30 29 2c 32 20 58 42 45 4c 32 20 46 49 58 45 44 28 31 31 2c 32 29 2c 32 20 58 4b 4f 44 32 20 ┆20),2 XBEL2 FIXED(11,2),2 XKOD2 ┆ 0x20b8a…20b99 43 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 ┆CHAR(1); ┆ 0x20b99…20be8 (44, 0, 14) 0x20[0x4f] 0x20be8…20c08 (44, 0, 15) 44 43 4c 20 31 20 56 45 52 33 2c 32 20 56 4b 4f 33 20 46 49 58 45 44 28 34 29 2c 32 20 56 41 56 ┆DCL 1 VER3,2 VKO3 FIXED(4),2 VAV┆ 0x20c08…20c28 44 33 20 43 48 41 52 28 33 29 2c 32 20 56 44 41 54 33 20 46 49 58 45 44 28 34 29 2c 20 20 20 20 ┆D3 CHAR(3),2 VDAT3 FIXED(4), ┆ 0x20c28…20c37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20c37…20c57 (44, 0, 16) 32 20 56 45 52 4e 52 33 20 46 49 58 45 44 28 37 29 2c 32 20 56 54 58 54 33 20 43 48 41 52 28 32 ┆2 VERNR3 FIXED(7),2 VTXT3 CHAR(2┆ 0x20c57…20c77 30 29 2c 32 20 56 42 45 4c 33 20 46 49 58 45 44 28 31 31 2c 32 29 2c 32 20 56 4b 4f 44 33 20 43 ┆0),2 VBEL3 FIXED(11,2),2 VKOD3 C┆ 0x20c77…20c86 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 20 ┆HAR(1); ┆ 0x20c86…20ca6 (44, 0, 17) 44 43 4c 20 31 20 58 56 45 52 33 2c 32 20 58 4b 4f 33 20 43 48 41 52 28 34 29 2c 32 20 58 41 56 ┆DCL 1 XVER3,2 XKO3 CHAR(4),2 XAV┆ 0x20ca6…20cc6 44 33 20 43 48 41 52 28 32 29 2c 32 20 58 44 41 54 33 20 43 48 41 52 28 34 29 2c 20 20 20 20 20 ┆D3 CHAR(2),2 XDAT3 CHAR(4), ┆ 0x20cc6…20cd5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20cd5…20cf5 (44, 0, 18) 32 20 58 56 45 52 4e 52 33 20 46 49 58 45 44 28 35 29 2c 32 20 58 54 58 54 33 20 43 48 41 52 28 ┆2 XVERNR3 FIXED(5),2 XTXT3 CHAR(┆ 0x20cf5…20d15 32 30 29 2c 32 20 58 42 45 4c 33 20 46 49 58 45 44 28 31 31 2c 32 29 2c 32 20 58 4b 4f 44 33 20 ┆20),2 XBEL3 FIXED(11,2),2 XKOD3 ┆ 0x20d15…20d24 43 48 41 52 28 31 29 3b 20 20 20 20 20 20 20 ┆CHAR(1); ┆ 0x20d24…20d73 (44, 0, 19) 0x20[0x4f] 0x20d73…20d93 (44, 0, 20) 44 43 4c 20 56 45 52 46 49 4c 20 46 49 4c 45 2c 52 45 43 4e 52 20 42 49 4e 41 52 59 2c 53 20 43 ┆DCL VERFIL FILE,RECNR BINARY,S C┆ 0x20d93…20db3 48 41 52 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 ┆HAR(1); ┆ 0x20db3…20dc2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20dc2…20e11 (44, 0, 21) 0x20[0x4f] 0x20e11…20e31 (44, 0, 22) 53 48 49 46 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 ┆SHIFT:PROC; ┆ 0x20e31…20e51 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20e51…20e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20e60…20e80 (44, 0, 23) 56 4b 4f 33 3d 58 4b 4f 33 3b 56 41 56 44 33 3d 58 41 56 44 33 20 43 41 54 20 27 20 27 3b 56 44 ┆VKO3=XKO3;VAVD3=XAVD3 CAT ' ';VD┆ 0x20e80…20ea0 41 54 33 3d 58 44 41 54 33 3b 56 45 52 4e 52 33 3d 58 56 45 52 4e 52 33 3b 56 54 58 54 33 3d 58 ┆AT3=XDAT3;VERNR3=XVERNR3;VTXT3=X┆ 0x20ea0…20eaf 54 58 54 33 3b 20 20 20 20 20 20 20 20 20 20 ┆TXT3; ┆ 0x20eaf…20ecf (44, 0, 24) 56 42 45 4c 33 3d 58 42 45 4c 33 3b 56 4b 4f 44 33 3d 58 4b 4f 44 33 3b 20 20 20 20 20 20 20 20 ┆VBEL3=XBEL3;VKOD3=XKOD3; ┆ 0x20ecf…20eef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20eef…20efe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20efe…20f1e (44, 0, 25) 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 20 20 20 ┆RETURN; ┆ 0x20f1e…20f3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20f3e…20f4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20f4d…20f6d (44, 0, 26) 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; ┆ 0x20f6d…20f8d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20f8d…20f9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20f9c…20feb (44, 0, 27) 0x20[0x4f] 0x20feb…2100b (44, 0, 28) 50 55 54 20 46 49 4c 45 28 44 29 53 4b 49 50 20 45 44 49 54 28 27 4b 4f 4e 56 45 52 54 45 52 49 ┆PUT FILE(D)SKIP EDIT('KONVERTERI┆ 0x2100b…2102b 4e 47 53 50 52 4f 47 52 41 4d 27 29 28 41 28 33 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NGSPROGRAM')(A(37)) ┆ 0x2102b…2103a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2103a…2105a (44, 0, 29) 28 27 53 5b 54 54 20 49 4e 20 45 4e 20 44 49 53 4b 45 54 54 20 4d 45 44 20 56 45 52 49 46 2e 54 ┆('SÄTT IN EN DISKETT MED VERIF.T┆ 0x2105a…2107a 52 41 4e 53 41 52 27 29 28 41 28 33 37 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RANSAR')(A(37)) ┆ 0x2107a…21089 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21089…210a9 (44, 0, 30) 28 27 53 41 4d 54 20 41 4e 47 45 20 56 49 4c 4b 45 4e 20 4d 5d 4e 41 44 20 44 45 54 20 5b 52 27 ┆('SAMT ANGE VILKEN MÅNAD DET ÄR'┆ 0x210a9…210c9 29 28 41 28 33 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 ┆)(A(37)) ┆ 0x210c9…210d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x210d8…210f8 (44, 0, 31) 28 27 28 4a 41 4e 2d 44 45 43 29 27 29 28 41 28 37 34 29 29 28 27 4d 5d 4e 41 44 3a 27 29 28 41 ┆('(JAN-DEC)')(A(74))('MÅNAD:')(A┆ 0x210f8…21118 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 ┆); ┆ 0x21118…21127 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21127…21147 (44, 0, 32) 43 41 4c 4c 20 4b 46 49 4c 45 28 56 45 52 46 49 4c 29 3b 50 55 54 20 46 49 4c 45 28 44 29 53 4b ┆CALL KFILE(VERFIL);PUT FILE(D)SK┆ 0x21147…21167 49 50 3b 4f 50 45 4e 20 56 45 52 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IP;OPEN VERFIL; ┆ 0x21167…21176 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21176…21196 (44, 0, 33) 52 45 43 4e 52 3d 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 ┆RECNR=0; ┆ 0x21196…211b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x211b6…211c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x211c5…211e5 (44, 0, 34) 49 4e 31 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 49 4e 32 3b 52 45 41 44 20 46 49 ┆IN1:ON ENDFILE GO TO IN2;READ FI┆ 0x211e5…21205 4c 45 28 56 45 52 46 49 4c 29 49 4e 54 4f 28 58 56 45 52 31 29 3b 52 45 43 4e 52 3d 55 4e 53 50 ┆LE(VERFIL)INTO(XVER1);RECNR=UNSP┆ 0x21205…21214 45 43 28 56 45 52 46 49 4c 29 3b 20 20 20 20 ┆EC(VERFIL); ┆ 0x21214…21234 (44, 0, 35) 44 4f 20 49 3d 31 20 54 4f 20 31 36 30 3b 58 56 45 52 33 3d 58 56 45 52 31 28 49 29 3b 20 20 20 ┆DO I=1 TO 160;XVER3=XVER1(I); ┆ 0x21234…21254 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21254…21263 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21263…21283 (44, 0, 36) 43 41 4c 4c 20 53 48 49 46 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL SHIFT; ┆ 0x21283…212a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x212a3…212b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x212b2…212d2 (44, 0, 37) 56 45 52 31 28 49 29 3d 56 45 52 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VER1(I)=VER3; ┆ 0x212d2…212f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x212f2…21301 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21301…21321 (44, 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; ┆ 0x21321…21341 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21341…21350 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21350…21370 (44, 0, 39) 52 45 57 52 49 54 45 20 46 49 4c 45 28 56 45 52 46 49 4c 29 46 52 4f 4d 28 56 45 52 31 29 3b 20 ┆REWRITE FILE(VERFIL)FROM(VER1); ┆ 0x21370…21390 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21390…2139f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2139f…213bf (44, 0, 40) 47 4f 20 54 4f 20 49 4e 31 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 IN1; ┆ 0x213bf…213df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x213df…213ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x213ee…2143d (45, 0, 0) 0x20[0x4f] 0x2143d…2145d (45, 0, 1) 49 4e 32 3a 55 4e 53 50 45 43 28 56 45 52 46 49 4c 29 3d 52 45 43 4e 52 3b 20 20 20 20 20 20 20 ┆IN2:UNSPEC(VERFIL)=RECNR; ┆ 0x2145d…2147d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2147d…2148c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2148c…214ac (45, 0, 2) 49 4e 32 42 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 49 4e 33 3b 52 45 41 44 20 46 ┆IN2B:ON ENDFILE GO TO IN3;READ F┆ 0x214ac…214cc 49 4c 45 28 56 45 52 46 49 4c 29 49 4e 54 4f 28 58 56 45 52 32 29 3b 52 45 43 4e 52 3d 55 4e 53 ┆ILE(VERFIL)INTO(XVER2);RECNR=UNS┆ 0x214cc…214db 50 45 43 28 56 45 52 46 49 4c 29 3b 20 20 20 ┆PEC(VERFIL); ┆ 0x214db…214fb (45, 0, 3) 44 4f 20 49 3d 31 20 54 4f 20 31 32 3b 58 56 45 52 33 3d 58 56 45 52 32 28 49 29 3b 20 20 20 20 ┆DO I=1 TO 12;XVER3=XVER2(I); ┆ 0x214fb…2151b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2151b…2152a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2152a…2154a (45, 0, 4) 43 41 4c 4c 20 53 48 49 46 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL SHIFT; ┆ 0x2154a…2156a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2156a…21579 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21579…21599 (45, 0, 5) 56 45 52 32 28 49 29 3d 56 45 52 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VER2(I)=VER3; ┆ 0x21599…215b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x215b9…215c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x215c8…215e8 (45, 0, 6) 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; ┆ 0x215e8…21608 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21608…21617 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21617…21637 (45, 0, 7) 52 45 57 52 49 54 45 20 46 49 4c 45 28 56 45 52 46 49 4c 29 46 52 4f 4d 28 56 45 52 32 29 3b 20 ┆REWRITE FILE(VERFIL)FROM(VER2); ┆ 0x21637…21657 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21657…21666 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21666…21686 (45, 0, 8) 47 4f 20 54 4f 20 49 4e 32 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GO TO IN2B; ┆ 0x21686…216a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x216a6…216b5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x216b5…21704 (45, 0, 9) 0x20[0x4f] 0x21704…21724 (45, 0, 10) 49 4e 33 3a 55 4e 53 50 45 43 28 56 45 52 46 49 4c 29 3d 52 45 43 4e 52 3b 20 20 20 20 20 20 20 ┆IN3:UNSPEC(VERFIL)=RECNR; ┆ 0x21724…21744 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21744…21753 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21753…21773 (45, 0, 11) 49 4e 33 42 3a 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 55 54 3b 52 45 41 44 20 46 49 ┆IN3B:ON ENDFILE GO TO UT;READ FI┆ 0x21773…21793 4c 45 28 56 45 52 46 49 4c 29 49 4e 54 4f 28 58 56 45 52 33 29 3b 20 20 20 20 20 20 20 20 20 20 ┆LE(VERFIL)INTO(XVER3); ┆ 0x21793…217a2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x217a2…217c2 (45, 0, 12) 43 41 4c 4c 20 53 48 49 46 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL SHIFT; ┆ 0x217c2…217e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x217e2…217f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x217f1…21811 (45, 0, 13) 52 45 57 52 49 54 45 20 46 49 4c 45 28 56 45 52 46 49 4c 29 46 52 4f 4d 28 56 45 52 33 29 3b 20 ┆REWRITE FILE(VERFIL)FROM(VER3); ┆ 0x21811…21831 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21831…21840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21840…21860 (45, 0, 14) 47 4f 20 54 4f 20 49 4e 33 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GO TO IN3B; ┆ 0x21860…21880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21880…2188f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2188f…218af (45, 0, 15) 55 54 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 20 20 20 ┆UT:END; ┆ 0x218af…218cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x218cf…218de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x218de…218fe (45, 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…] 0x2191e…2192d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x2192d…2194d (45, 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…] 0x2196d…2197c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x2197c…2199c (45, 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…] 0x219bc…219cb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x219cb…219eb (45, 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…] 0x21a0b…21a1a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21a1a…21a3a (45, 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…] 0x21a5a…21a69 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21a69…21a89 (45, 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…] 0x21aa9…21ab8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21ab8…21ad8 (45, 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…] 0x21af8…21b07 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21b07…21b27 (45, 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…] 0x21b47…21b56 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21b56…21b76 (45, 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…] 0x21b96…21ba5 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21ba5…21bc5 (45, 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…] 0x21be5…21bf4 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21bf4…21c14 (45, 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…] 0x21c34…21c43 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21c43…21c63 (45, 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…] 0x21c83…21c92 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21c92…21cb2 (45, 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…] 0x21cd2…21ce1 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21ce1…21d01 (45, 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…] 0x21d21…21d30 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21d30…21d50 (45, 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…] 0x21d70…21d7f 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21d7f…21d9f (45, 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…] 0x21dbf…21dce 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21dce…21dee (45, 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…] 0x21e0e…21e1d 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21e1d…21e3d (45, 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…] 0x21e5d…21e6c 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21e6c…21e8c (45, 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…] 0x21eac…21ebb 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21ebb…21edb (45, 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…] 0x21efb…21f0a 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21f0a…21f2a (45, 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…] 0x21f4a…21f59 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21f59…21f79 (45, 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…] 0x21f99…21fa8 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21fa8…21fc8 (45, 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…] 0x21fe8…21ff7 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x21ff7…22017 (45, 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…] 0x22037…22046 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆ 0x22046…22066 (45, 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…] 0x22086…22095 5f 55 4e 52 45 41 44 5f 5f 55 4e 52 45 41 44 ┆_UNREAD__UNREAD┆