OMZETBEHEER
FILE INFORMATION
FILENAME(S): OMZETBEHEER
FILE TYPE(S): PRG
FILE SIZE: 8.1K
FIRST SEEN: 2025-11-30 21:10:50
APPEARS ON: 1 disk(s)
FILE HASH
5c75e11de647b09e7ccc6e6ebbae7e9c8cfecf80b266c16bf0aa08a4799a2d47
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HCCN | OMZETBEHEER | PRG | DuncanTwain | 25 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 00 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..(.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 01 00 8F 20 2A |********.O.... *|
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.|
00000050: 76 08 02 00 8F 20 2A 20 20 20 20 4F 4D 5A 45 54 |v.... * OMZET|
00000060: 20 56 45 52 47 45 4C 49 4A 4B 49 4E 47 45 4E 20 | VERGELIJKINGEN |
00000070: 20 20 20 20 20 2A 00 9D 08 03 00 8F 20 2A 20 20 | *...... * |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 C4 08 | *...|
000000A0: 04 00 8F 20 2A 20 20 20 20 56 4F 4F 52 20 46 41 |... * VOOR FA|
000000B0: 2E 20 43 2E 56 4C 41 41 4E 44 45 52 45 4E 20 20 |. C.VLAANDEREN |
000000C0: 20 20 20 2A 00 EB 08 05 00 8F 20 2A 20 20 20 20 | *...... * |
000000D0: 4D 45 49 44 4F 4F 52 4E 4C 41 41 4E 20 31 20 20 |MEIDOORNLAAN 1 |
000000E0: 20 20 20 20 20 20 20 20 20 20 2A 00 12 09 06 00 | *.....|
000000F0: 8F 20 2A 20 20 20 20 4E 45 44 45 52 48 4F 52 53 |. * NEDERHORS|
00000100: 54 20 44 45 4E 20 42 45 52 47 20 20 20 20 20 20 |T DEN BERG |
00000110: 20 2A 00 39 09 07 00 8F 20 2A 20 20 20 20 43 4F | *.9.... * CO|
00000120: 50 59 52 49 47 48 54 20 4A 2E 56 2E 44 2E 42 45 |PYRIGHT J.V.D.BE|
00000130: 52 47 20 20 20 20 20 20 2A 00 60 09 08 00 8F 20 |RG *.`.... |
00000140: 2A 20 20 20 20 55 49 54 56 4F 45 52 49 4E 47 20 |* UITVOERING |
00000150: 4D 45 54 20 43 41 53 2E 52 45 43 2E 20 20 20 2A |MET CAS.REC. *|
00000160: 00 87 09 09 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...... *********|
00000170: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000180: 2A 2A 2A 2A 2A 2A 2A 00 CD 09 0A 00 53 50 24 B2 |*******.....SP$.|
00000190: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000001A0: 22 3A 4E 55 24 B2 22 30 30 30 30 30 30 30 30 30 |":NU$."000000000|
000001B0: 30 22 3A 4E 57 B2 35 33 3A 4D 55 54 B2 30 3A 4A |0":NW.53:MUT.0:J|
000001C0: 4E B2 30 3A 4A 4F B2 30 3A 4A 53 B2 30 00 F7 09 |N.0:JO.0:JS.0...|
000001D0: 0B 00 43 44 24 B2 22 11 11 11 11 11 11 11 11 11 |..CD$.".........|
000001E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3A 43 |.............":C|
000001F0: 24 B2 C7 28 31 33 29 00 2A 0A 0C 00 43 52 24 B2 |$..(13).*...CR$.|
00000200: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00000210: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000220: 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 74 0A 0D 00 86 |.........".t....|
00000230: 20 4F 5A 28 32 2C 35 2C 4E 57 29 2C 4B 4C 25 28 | OZ(2,5,NW),KL%(|
00000240: 32 2C 35 2C 4E 57 29 2C 52 4F 28 32 2C 37 29 2C |2,5,NW),RO(2,7),|
00000250: 52 4B 28 32 2C 37 29 2C 50 28 37 29 2C 53 50 28 |RK(2,7),P(7),SP(|
00000260: 35 29 2C 4E 41 41 4D 24 28 37 29 2C 4B 4F 44 45 |5),NAAM$(7),KODE|
00000270: 24 28 33 29 00 7D 0A 0E 00 9F 31 2C 33 00 95 0A |$(3).}....1,3...|
00000280: 14 00 81 49 B2 31 A4 37 3A 87 4E 41 41 4D 24 28 |...I.1.7:.NAAM$(|
00000290: 49 29 3A 82 49 00 AD 0A 15 00 81 49 B2 31 A4 33 |I):.I......I.1.3|
000002A0: 3A 87 4B 4F 44 45 24 28 49 29 3A 82 49 00 B6 0A |:.KODE$(I):.I...|
000002B0: 63 00 57 4E B2 30 00 DF 0A 64 00 99 22 93 2A 2A |c.WN.0...d..".**|
000002C0: 2A 2A 20 4B 45 55 5A 45 20 4D 45 4E 55 20 4F 4D |** KEUZE MENU OM|
000002D0: 5A 45 54 42 45 48 45 45 52 20 2A 2A 2A 2A 22 00 |ZETBEHEER ****".|
000002E0: 00 0B 65 00 99 3A 99 22 31 2D 49 4E 56 4F 45 52 |..e..:."1-INVOER|
000002F0: 45 4E 20 57 45 45 4B 47 45 47 45 56 45 4E 53 22 |EN WEEKGEGEVENS"|
00000300: 00 1C 0B 66 00 99 22 32 2D 4F 4D 5A 45 54 20 56 |...f.."2-OMZET V|
00000310: 45 52 47 45 4C 49 4A 4B 49 4E 47 22 00 32 0B 67 |ERGELIJKING".2.g|
00000320: 00 99 22 33 2D 4A 41 41 52 20 4C 49 4A 53 54 45 |.."3-JAAR LIJSTE|
00000330: 4E 22 00 58 0B 6B 00 99 22 37 2D 49 4E 56 4F 45 |N".X.k.."7-INVOE|
00000340: 52 45 4E 20 53 54 59 47 49 4E 47 53 20 50 45 52 |REN STYGINGS PER|
00000350: 43 45 4E 54 41 47 45 22 00 7C 0B 6C 00 99 22 38 |CENTAGE".|.l.."8|
00000360: 2D 41 41 4E 4D 41 4B 45 4E 20 4E 49 45 55 57 20 |-AANMAKEN NIEUW |
00000370: 4A 41 41 52 42 45 53 54 41 4E 44 22 00 95 0B 6D |JAARBESTAND"...m|
00000380: 00 99 22 39 2D 45 49 4E 44 45 20 50 52 4F 47 52 |.."9-EINDE PROGR|
00000390: 41 4D 4D 41 22 00 C1 0B 6E 00 99 3A 99 22 47 45 |AMMA"...n..:."GE|
000003A0: 45 46 20 55 57 20 4B 45 55 5A 45 20 28 31 2D 39 |EF UW KEUZE (1-9|
000003B0: 29 22 3B 3A 85 20 49 3A 8B 49 B3 B1 31 89 31 32 |)";:. I:.I..1.12|
000003C0: 30 00 E4 0B 6F 00 8D 31 30 30 30 3A 8B 4A 4A B3 |0...o..1000:.JJ.|
000003D0: B1 4A 4E A7 4A 4E B2 4A 4A 3A 4A 41 B2 32 3A 8D |.JN.JN.JJ:JA.2:.|
000003E0: 31 30 31 30 00 F9 0B 70 00 8D 31 31 30 30 3A 8D |1010...p..1100:.|
000003F0: 31 32 30 30 3A 89 31 30 30 00 07 0C 78 00 8B 49 |1200:.100...x..I|
00000400: B3 B1 32 89 31 33 30 00 2A 0C 79 00 8D 31 30 30 |..2.130.*.y..100|
00000410: 30 3A 8B 4A 4E B3 B1 4A 4A A7 4A 4E B2 4A 4A 3A |0:.JN..JJ.JN.JJ:|
00000420: 4A 41 B2 32 3A 8D 31 30 31 30 00 42 0C 7A 00 8B |JA.2:.1010.B.z..|
00000430: 4A 53 B3 B1 4A 4A A7 4A 53 B2 4A 4A 3A 8D 31 30 |JS..JJ.JS.JJ:.10|
00000440: 34 30 00 69 0C 7B 00 8B 4A 4F B3 B1 4A 4A AB 31 |40.i.{..JO..JJ.1|
00000450: A7 4A 4F B2 4A 4A AB 31 3A 4A 4A B2 4A 4F 3A 4A |.JO.JJ.1:JJ.JO:J|
00000460: 41 B2 31 3A 8D 31 30 31 30 00 78 0C 7C 00 8D 34 |A.1:.1010.x.|..4|
00000470: 30 30 30 3A 89 31 30 30 00 86 0C 82 00 8B 49 B3 |000:.100......I.|
00000480: B1 33 89 31 34 30 00 A9 0C 83 00 8D 31 30 30 30 |.3.140......1000|
00000490: 3A 8B 4A 4E B3 B1 4A 4A A7 4A 4E B2 4A 4A 3A 4A |:.JN..JJ.JN.JJ:J|
000004A0: 41 B2 32 3A 8D 31 30 31 30 00 D0 0C 84 00 8B 4A |A.2:.1010......J|
000004B0: 4F B3 B1 4A 4A AB 31 A7 4A 4F B2 4A 4A AB 31 3A |O..JJ.1.JO.JJ.1:|
000004C0: 4A 4A B2 4A 4F 3A 4A 41 B2 31 3A 8D 31 30 31 30 |JJ.JO:JA.1:.1010|
000004D0: 00 DF 0C 85 00 8D 35 30 30 30 3A 89 31 30 30 00 |......5000:.100.|
000004E0: ED 0C 8C 00 8B 49 B3 B1 34 89 31 35 30 00 FB 0C |.....I..4.150...|
000004F0: 96 00 8B 49 B3 B1 35 89 31 36 30 00 09 0D A0 00 |...I..5.160.....|
00000500: 8B 49 B3 B1 36 89 31 37 30 00 17 0D AA 00 8B 49 |.I..6.170......I|
00000510: B3 B1 37 89 31 38 30 00 27 0D AB 00 8D 31 30 30 |..7.180.'....100|
00000520: 30 3A 4A 53 B2 4A 4A 00 36 0D AC 00 8D 31 35 30 |0:JS.JJ.6....150|
00000530: 30 3A 89 31 30 30 00 44 0D B4 00 8B 49 B3 B1 38 |0:.100.D....I..8|
00000540: 89 31 39 30 00 53 0D B5 00 8D 31 30 32 30 3A 89 |.190.S....1020:.|
00000550: 31 30 30 00 61 0D BE 00 8B 49 B3 B1 39 89 31 30 |100.a....I..9.10|
00000560: 30 00 67 0D E7 03 80 00 93 0D E8 03 8F 20 4F 50 |0.g.......... OP|
00000570: 56 52 41 47 45 4E 20 56 41 4E 20 48 45 54 20 54 |VRAGEN VAN HET T|
00000580: 45 20 56 45 52 57 45 52 4B 45 4E 20 4A 41 41 52 |E VERWERKEN JAAR|
00000590: 44 59 2E 00 D1 0D E9 03 99 22 93 47 45 45 46 20 |DY.......".GEEF |
000005A0: 48 45 54 20 54 45 20 56 45 52 57 45 52 4B 45 4E |HET TE VERWERKEN|
000005B0: 20 4A 41 41 52 3A 22 3A 85 4A 4A 3A 8B 4A 4A B1 | JAAR:":.JJ:.JJ.|
000005C0: 32 31 30 30 B0 4A 4A B3 31 39 30 30 A7 31 30 30 |2100.JJ.1900.100|
000005D0: 31 00 D7 0D EA 03 8E 00 F0 0D F2 03 8F 20 4C 41 |1............ LA|
000005E0: 44 45 4E 20 56 41 4E 20 45 45 4E 20 4A 41 41 52 |DEN VAN EEN JAAR|
000005F0: 00 2C 0E F3 03 99 22 50 4C 41 41 54 53 20 44 45 |.,...."PLAATS DE|
00000600: 20 43 41 53 53 45 54 54 45 20 4D 45 54 20 42 45 | CASSETTE MET BE|
00000610: 53 54 41 4E 44 22 3B 4A 4A 3B 43 24 3B 22 4B 4C |STAND";JJ;C$;"KL|
00000620: 41 41 52 20 3F 20 28 4A 2F 4E 29 22 00 42 0E F4 |AAR ? (J/N)".B..|
00000630: 03 85 58 24 3A 8B 58 24 B3 B1 22 4A 22 89 31 30 |..X$:.X$.."J".10|
00000640: 31 32 00 65 0E F5 03 9F 32 2C 31 2C 30 2C 22 4A |12.e....2,1,0,"J|
00000650: 41 41 52 42 45 53 54 2E 22 AA C9 28 C4 28 4A 4A |AARBEST."..(.(JJ|
00000660: 29 2C 34 29 3A 00 9F 0E F6 03 8B 28 53 54 41 54 |),4):......(STAT|
00000670: 55 53 B3 B1 30 29 A7 A0 32 3A 99 22 42 45 53 54 |US..0)..2:."BEST|
00000680: 41 4E 44 20 49 53 20 4E 49 45 54 20 47 45 56 4F |AND IS NIET GEVO|
00000690: 4E 44 45 4E 21 21 21 21 22 3A 89 31 30 31 31 00 |NDEN!!!!":.1011.|
000006A0: B5 0E F7 03 84 32 2C 57 4B 3A 8B 4A 41 B2 31 A7 |.....2,WK:.JA.1.|
000006B0: 57 4F B2 57 4B 00 C5 0E F8 03 8B 4A 41 B2 32 A7 |WO.WK......JA.2.|
000006C0: 57 4E B2 57 4B 00 F7 0E F9 03 81 49 B2 31 A4 57 |WN.WK......I.1.W|
000006D0: 4B 3A 81 4A B2 31 A4 35 3A 84 32 2C 4F 5A 28 4A |K:.J.1.5:.2,OZ(J|
000006E0: 41 2C 4A 2C 49 29 2C 4B 4C 25 28 4A 41 2C 4A 2C |A,J,I),KL%(JA,J,|
000006F0: 49 29 3A 82 4A 2C 49 00 07 0F FA 03 A0 32 3A 8B |I):.J,I......2:.|
00000700: 4E 57 B2 57 4B A7 8E 00 3F 0F FB 03 81 49 B2 57 |NW.WK...?....I.W|
00000710: 4B AA 31 A4 4E 57 3A 81 4A B2 31 A4 35 3A 4F 5A |K.1.NW:.J.1.5:OZ|
00000720: 28 4A 41 2C 4A 2C 49 29 B2 30 3A 4B 4C 25 28 4A |(JA,J,I).0:KL%(J|
00000730: 41 2C 4A 2C 49 29 B2 30 3A 82 4A 2C 49 3A 8E 00 |A,J,I).0:.J,I:..|
00000740: 58 0F FC 03 8F 20 4E 49 45 55 57 20 4A 41 41 52 |X.... NIEUW JAAR|
00000750: 20 43 52 45 45 52 45 4E 00 97 0F FD 03 99 22 93 | CREEREN......".|
00000760: 47 45 45 46 20 48 45 54 20 54 45 20 43 52 45 45 |GEEF HET TE CREE|
00000770: 52 45 4E 20 20 20 4A 41 41 52 3A 22 3A 85 20 4A |REN JAAR:":. J|
00000780: 4E 3A 8B 4A 4E B1 32 31 30 30 B0 4A 4E B3 31 39 |N:.JN.2100.JN.19|
00000790: 30 30 A7 31 30 32 31 00 D3 0F FE 03 4D 55 54 B2 |00.1021.....MUT.|
000007A0: 31 3A 57 4E B2 30 3A 81 49 B2 31 A4 4E 57 3A 81 |1:WN.0:.I.1.NW:.|
000007B0: 4A B2 31 A4 35 3A 4F 5A 28 32 2C 4A 2C 49 29 B2 |J.1.5:OZ(2,J,I).|
000007C0: 30 3A 4B 4C 25 28 32 2C 4A 2C 49 29 B2 30 3A 82 |0:KL%(2,J,I).0:.|
000007D0: 4A 2C 49 00 DD 0F FF 03 89 31 32 30 30 00 FD 0F |J,I......1200...|
000007E0: 06 04 8F 20 53 41 56 45 4E 20 56 41 4E 20 48 45 |... SAVEN VAN HE|
000007F0: 54 20 4E 49 45 55 57 45 20 4A 41 41 52 00 39 10 |T NIEUWE JAAR.9.|
00000800: 07 04 99 22 50 4C 41 41 54 53 20 44 45 20 43 41 |..."PLAATS DE CA|
00000810: 53 53 45 54 54 45 20 4D 45 54 20 42 45 53 54 41 |SSETTE MET BESTA|
00000820: 4E 44 22 3B 4A 4E 3B 43 24 3B 22 4B 4C 41 41 52 |ND";JN;C$;"KLAAR|
00000830: 20 3F 20 28 4A 2F 4E 29 22 00 4F 10 08 04 85 58 | ? (J/N)".O....X|
00000840: 24 3A 8B 58 24 B3 B1 22 4A 22 89 31 30 33 32 00 |$:.X$.."J".1032.|
00000850: 71 10 09 04 9F 32 2C 31 2C 32 2C 22 4A 41 41 52 |q....2,1,2,"JAAR|
00000860: 42 45 53 54 2E 22 AA C9 28 C4 28 4A 4A 29 2C 34 |BEST."..(.(JJ),4|
00000870: 29 00 AB 10 0A 04 8B 28 53 54 41 54 55 53 B3 B1 |)......(STATUS..|
00000880: 30 29 A7 A0 32 3A 99 22 42 45 53 54 41 4E 44 20 |0)..2:."BESTAND |
00000890: 49 53 20 4E 49 45 54 20 47 45 56 4F 4E 44 45 4E |IS NIET GEVONDEN|
000008A0: 21 21 21 21 22 3A 89 31 30 33 31 00 E3 10 0B 04 |!!!!":.1031.....|
000008B0: 98 32 2C 57 4E 3A 81 49 B2 31 A4 57 4E 3A 81 4A |.2,WN:.I.1.WN:.J|
000008C0: B2 31 A4 35 3A 98 32 2C 4F 5A 28 32 2C 4A 2C 49 |.1.5:.2,OZ(2,J,I|
000008D0: 29 3A 98 32 2C 4B 4C 25 28 32 2C 4A 2C 49 29 3A |):.2,KL%(2,J,I):|
000008E0: 82 4A 2C 00 EC 10 0C 04 A0 32 3A 8E 00 15 11 10 |.J,......2:.....|
000008F0: 04 8F 20 4C 41 44 45 4E 20 56 41 4E 20 44 45 20 |.. LADEN VAN DE |
00000900: 53 54 49 4A 47 49 4E 47 53 20 50 45 52 43 45 4E |STIJGINGS PERCEN|
00000910: 54 41 47 45 53 00 57 11 11 04 99 22 50 4C 41 41 |TAGES.W...."PLAA|
00000920: 54 53 20 44 45 20 43 41 53 53 45 54 54 45 20 4D |TS DE CASSETTE M|
00000930: 45 54 20 44 45 20 53 54 49 4A 47 49 4E 47 53 20 |ET DE STIJGINGS |
00000940: 20 20 20 20 50 45 52 43 45 4E 54 41 47 45 53 20 | PERCENTAGES |
00000950: 56 41 4E 22 3B 4A 4A 00 7E 11 12 04 99 22 4B 4C |VAN";JJ.~...."KL|
00000960: 41 41 52 20 3F 20 28 4A 2F 4E 29 22 3A 85 58 24 |AAR ? (J/N)":.X$|
00000970: 3A 8B 58 24 B3 B1 22 4A 22 89 31 30 34 32 00 A0 |:.X$.."J".1042..|
00000980: 11 13 04 9F 32 2C 31 2C 30 2C 22 53 54 49 4A 47 |....2,1,0,"STIJG|
00000990: 50 43 54 2E 22 AA C9 28 C4 28 4A 4A 29 2C 34 29 |PCT."..(.(JJ),4)|
000009A0: 00 DA 11 14 04 8B 28 53 54 41 54 55 53 B3 B1 30 |......(STATUS..0|
000009B0: 29 A7 A0 32 3A 99 22 42 45 53 54 41 4E 44 20 49 |)..2:."BESTAND I|
000009C0: 53 20 4E 49 45 54 20 47 45 56 4F 4E 44 45 4E 21 |S NIET GEVONDEN!|
000009D0: 21 21 21 22 3A 89 31 30 34 31 00 F5 11 15 04 81 |!!!":.1041......|
000009E0: 49 B2 31 A4 35 3A 84 32 2C 53 50 28 49 29 3A 82 |I.1.5:.2,SP(I):.|
000009F0: 3A A0 32 3A 8E 00 FB 11 19 04 8E 00 18 12 4C 04 |:.2:..........L.|
00000A00: 8F 20 49 4E 56 4F 45 52 45 4E 20 57 45 45 4B 20 |. INVOEREN WEEK |
00000A10: 47 45 47 45 56 45 4E 53 00 44 12 56 04 99 22 93 |GEGEVENS.D.V..".|
00000A20: 2A 2A 2A 2A 20 49 4E 56 4F 45 52 45 4E 20 57 45 |**** INVOEREN WE|
00000A30: 45 4B 20 47 45 47 45 56 45 4E 53 20 2A 2A 2A 2A |EK GEGEVENS ****|
00000A40: 22 3B 43 24 00 5B 12 57 04 99 22 54 4F 54 41 41 |";C$.[.W.."TOTAA|
00000A50: 4C 3A 20 22 3B 3A 8D 31 31 36 30 00 72 12 58 04 |L: ";:.1160.r.X.|
00000A60: 99 22 53 4C 41 47 45 52 3A 20 22 3B 3A 8D 31 31 |."SLAGER: ";:.11|
00000A70: 36 30 00 89 12 59 04 99 22 41 2E 47 2E 46 2E 3A |60...Y.."A.G.F.:|
00000A80: 20 22 3B 3A 8D 31 31 36 30 00 A0 12 5A 04 99 22 | ";:.1160...Z.."|
00000A90: 42 4F 55 54 49 45 4B 3A 22 3B 3A 8D 31 31 36 30 |BOUTIEK:";:.1160|
00000AA0: 00 B7 12 5B 04 99 22 20 20 20 4B 2E 57 2E 3A 22 |...[.." K.W.:"|
00000AB0: 3B 3A 8D 31 31 36 30 00 E8 12 65 04 99 22 4A 41 |;:.1160...e.."JA|
00000AC0: 41 52 3A 22 3B 4A 4E 3A 99 22 57 45 45 4B 3A 22 |AR:";JN:."WEEK:"|
00000AD0: 3A 52 B2 31 33 3A 4B B2 36 3A 4D B2 32 3A 8D 32 |:R.13:K.6:M.2:.2|
00000AE0: 32 30 30 3A 57 4B B2 58 00 19 13 66 04 8B 58 B2 |200:WK.X...f..X.|
00000AF0: 30 B0 58 B1 57 4E A7 57 4B B2 57 4E AA 31 3A 4E |0.X.WN.WK.WN.1:N|
00000B00: B2 30 3A 58 B2 57 4B 3A 8D 32 31 30 30 3A 8D 32 |.0:X.WK:.2100:.2|
00000B10: 30 30 30 3A 89 31 31 34 33 00 32 13 67 04 4E B2 |000:.1143.2.g.N.|
00000B20: 30 3A 58 B2 57 4B 3A 8D 32 31 30 30 3A 8D 32 30 |0:X.WK:.2100:.20|
00000B30: 30 30 00 69 13 68 04 81 49 B2 31 A4 35 3A 52 B2 |00.i.h..I.1.5:R.|
00000B40: 49 AC 32 3A 4B B2 31 34 3A 4D B2 39 3A 4E B2 32 |I.2:K.14:M.9:N.2|
00000B50: 3A 58 B2 4F 5A 28 32 2C 49 2C 57 4B 29 3A 8D 32 |:X.OZ(2,I,WK):.2|
00000B60: 31 30 30 3A 8D 32 30 30 30 00 97 13 69 04 4B B2 |100:.2000...i.K.|
00000B70: 33 32 3A 4D B2 35 3A 4E B2 30 3A 58 B2 4B 4C 25 |32:M.5:N.0:X.KL%|
00000B80: 28 32 2C 49 2C 57 4B 29 3A 8D 32 31 30 30 3A 8D |(2,I,WK):.2100:.|
00000B90: 32 30 30 30 3A 82 49 00 D1 13 74 04 99 22 13 22 |2000:.I...t.."."|
00000BA0: 3B C8 28 43 44 24 2C 31 36 29 3B 22 57 49 4C 54 |;.(CD$,16);"WILT|
00000BB0: 20 55 20 44 45 5A 45 20 47 45 47 45 56 45 4E 53 | U DEZE GEGEVENS|
00000BC0: 20 20 57 49 4A 5A 49 47 45 4E 28 4A 2F 4E 29 3F | WIJZIGEN(J/N)?|
00000BD0: 22 00 D9 13 75 04 85 58 24 00 EB 13 76 04 8B 58 |"...u..X$...v..X|
00000BE0: 24 B3 B1 22 4A 22 A7 31 31 34 38 00 F7 13 77 04 |$.."J".1148...w.|
00000BF0: 81 49 49 B2 31 A4 35 00 1F 14 78 04 52 B2 49 49 |.II.1.5...x.R.II|
00000C00: AC 32 3A 4B B2 31 34 3A 4D B2 39 3A 8D 32 32 30 |.2:K.14:M.9:.220|
00000C10: 30 3A 4F 5A 28 32 2C 49 49 2C 57 4B 29 B2 58 00 |0:OZ(2,II,WK).X.|
00000C20: 4B 14 79 04 4B B2 33 32 3A 4D B2 35 3A 8D 32 32 |K.y.K.32:M.5:.22|
00000C30: 30 30 3A 4B 4C 25 28 32 2C 49 49 2C 57 4B 29 B2 |00:KL%(2,II,WK).|
00000C40: B5 28 58 AA 2E 35 29 3A 82 49 49 00 5C 14 7A 04 |.(X..5):.II.\.z.|
00000C50: 8B 57 4B B1 57 4E A7 57 4E B2 57 4B 00 66 14 7B |.WK.WN.WN.WK.f.{|
00000C60: 04 89 31 31 32 38 00 92 14 7C 04 99 22 93 57 49 |..1128...|..".WI|
00000C70: 4C 54 20 55 20 4E 4F 47 20 45 45 4E 20 57 45 45 |LT U NOG EEN WEE|
00000C80: 4B 20 49 4E 56 4F 45 52 45 4E 20 28 4A 2F 4E 29 |K INVOEREN (J/N)|
00000C90: 3F 22 00 A8 14 7D 04 85 58 24 3A 8B 58 24 B3 B1 |?"...}..X$:.X$..|
00000CA0: 22 4E 22 89 31 31 30 30 00 AE 14 7E 04 8E 00 D3 |"N".1100...~....|
00000CB0: 14 88 04 99 22 4F 4D 5A 45 54 3A 20 20 20 20 20 |...."OMZET: |
00000CC0: 20 20 20 20 20 4B 4C 41 4E 54 45 4E 3A 22 3B 43 | KLANTEN:";C|
00000CD0: 24 3A 8E 00 ED 14 B0 04 8F 20 4F 50 42 45 52 47 |$:....... OPBERG|
00000CE0: 45 4E 20 4E 41 20 4D 55 54 45 52 45 4E 00 0E 15 |EN NA MUTEREN...|
00000CF0: B1 04 99 22 93 48 45 54 20 42 45 53 54 41 4E 44 |...".HET BESTAND|
00000D00: 20 49 53 20 56 45 52 41 4E 44 45 52 44 22 00 30 | IS VERANDERD".0|
00000D10: 15 B2 04 99 22 57 49 4C 54 20 55 20 48 45 54 20 |...."WILT U HET |
00000D20: 4F 50 42 45 52 47 45 4E 20 28 4A 2F 4E 29 3F 22 |OPBERGEN (J/N)?"|
00000D30: 00 47 15 B3 04 85 58 24 3A 8B 58 24 B3 B1 22 4E |.G....X$:.X$.."N|
00000D40: 22 A7 8D 31 30 33 30 00 4D 15 B4 04 8E 00 78 15 |"..1030.M.....x.|
00000D50: DC 05 8F 20 49 4E 56 4F 45 52 45 4E 20 56 41 4E |... INVOEREN VAN|
00000D60: 20 44 45 20 53 54 49 4A 47 49 4E 47 53 50 45 52 | DE STIJGINGSPER|
00000D70: 43 45 4E 54 41 47 45 53 00 AB 15 DD 05 99 22 93 |CENTAGES......".|
00000D80: 2A 2A 2A 2A 20 49 4E 56 4F 45 52 45 4E 20 53 54 |**** INVOEREN ST|
00000D90: 49 4A 47 49 4E 47 53 20 50 45 43 45 4E 54 41 47 |IJGINGS PECENTAG|
00000DA0: 45 53 20 2A 2A 2A 2A 22 3B 43 24 00 E2 15 DE 05 |ES ****";C$.....|
00000DB0: 99 4E 41 24 28 32 29 3B 43 24 3B 4E 41 24 28 33 |.NA$(2);C$;NA$(3|
00000DC0: 29 3B 43 24 3B 4E 41 24 28 34 29 3B 43 24 3B 4E |);C$;NA$(4);C$;N|
00000DD0: 41 24 28 35 29 3B 43 24 3B 4E 41 24 28 37 29 3B |A$(5);C$;NA$(7);|
00000DE0: 43 24 00 13 16 DF 05 81 49 49 B2 31 A4 35 3A 52 |C$......II.1.5:R|
00000DF0: B2 49 49 AA 31 3A 4B B2 31 32 3A 4D B2 34 3A 8D |.II.1:K.12:M.4:.|
00000E00: 32 32 30 30 3A 53 50 28 49 49 29 B2 58 AD 31 30 |2200:SP(II).X.10|
00000E10: 30 3A 82 00 49 16 E0 05 99 22 13 11 11 11 11 11 |0:..I...."......|
00000E20: 11 11 11 11 57 49 4C 54 20 55 20 44 45 5A 45 20 |....WILT U DEZE |
00000E30: 47 45 47 45 56 45 4E 53 20 4F 50 42 45 52 47 45 |GEGEVENS OPBERGE|
00000E40: 4E 3F 20 28 4A 2F 4E 29 22 00 5C 16 E1 05 85 58 |N? (J/N)".\....X|
00000E50: 24 3A 8B 58 24 B2 22 4E 22 A7 20 8E 00 9E 16 E2 |$:.X$."N". .....|
00000E60: 05 99 22 50 4C 41 41 54 53 20 44 45 20 43 41 53 |.."PLAATS DE CAS|
00000E70: 53 45 54 54 45 20 4D 45 54 20 44 45 20 53 54 49 |SETTE MET DE STI|
00000E80: 4A 47 49 4E 47 53 20 20 20 20 20 50 45 52 43 45 |JGINGS PERCE|
00000E90: 4E 54 41 47 45 53 20 56 41 4E 22 3B 4A 4A 00 C5 |NTAGES VAN";JJ..|
00000EA0: 16 E3 05 99 22 4B 4C 41 41 52 20 3F 20 28 4A 2F |...."KLAAR ? (J/|
00000EB0: 4E 29 22 3A 85 58 24 3A 8B 58 24 B3 B1 22 4A 22 |N)":.X$:.X$.."J"|
00000EC0: 89 31 35 30 37 00 E7 16 E4 05 9F 32 2C 31 2C 32 |.1507......2,1,2|
00000ED0: 2C 22 53 54 49 4A 47 50 43 54 2E 22 AA C9 28 C4 |,"STIJGPCT."..(.|
00000EE0: 28 4A 4A 29 2C 34 29 00 21 17 E5 05 8B 28 53 54 |(JJ),4).!....(ST|
00000EF0: 41 54 55 53 B3 B1 30 29 A7 A0 32 3A 99 22 42 45 |ATUS..0)..2:."BE|
00000F00: 53 54 41 4E 44 20 49 53 20 4E 49 45 54 20 47 45 |STAND IS NIET GE|
00000F10: 56 4F 4E 44 45 4E 21 21 21 21 22 3A 89 31 35 30 |VONDEN!!!!":.150|
00000F20: 36 00 3C 17 E6 05 81 49 B2 31 A4 35 3A 98 32 2C |6.<....I.1.5:.2,|
00000F30: 53 50 28 49 29 3A 82 3A A0 32 3A 8E 00 5F 17 D0 |SP(I):.:.2:.._..|
00000F40: 07 8F 20 50 52 49 4E 54 45 4E 20 56 41 4E 20 58 |.. PRINTEN VAN X|
00000F50: 20 49 4E 20 46 4F 52 4D 41 54 28 4D 2C 4E 29 00 | IN FORMAT(M,N).|
00000F60: 85 17 D1 07 8B 28 4E B3 B2 30 29 A7 98 31 2C C9 |.....(N..0)..1,.|
00000F70: 28 53 50 24 AA C4 28 B5 28 58 AA 2E 35 29 29 2C |(SP$..(.(X..5)),|
00000F80: 4D 29 3B 3A 8E 00 A5 17 D2 07 58 B2 B5 28 58 AC |M);:......X..(X.|
00000F90: B5 28 31 30 AE 4E 29 AA 30 2E 35 31 29 AD B5 28 |.(10.N).0.51)..(|
00000FA0: 31 30 AE 4E 29 00 C2 17 D3 07 98 31 2C C9 28 53 |10.N)......1,.(S|
00000FB0: 50 24 AA C4 28 B5 28 58 29 29 2C 4D AB 4E AB 31 |P$..(.(X)),M.N.1|
00000FC0: 29 3B 00 E5 17 D4 07 8B 28 58 AB B5 28 58 29 B2 |);......(X..(X).|
00000FD0: 30 29 A7 98 31 2C 22 2E 22 3B C8 28 4E 55 24 2C |0)..1,".";.(NU$,|
00000FE0: 4E 29 3B 3A 8E 00 06 18 D5 07 98 31 2C CA 28 C4 |N);:.......1,.(.|
00000FF0: 28 58 AB B5 28 58 29 29 AA 4E 55 24 2C 32 2C 4E |(X..(X)).NU$,2,N|
00001000: AA 31 29 3B 3A 8E 00 20 18 34 08 8F 20 53 45 54 |.1);:.. .4.. SET|
00001010: 20 43 55 52 53 4F 52 20 50 4F 53 49 45 54 49 45 | CURSOR POSIETIE|
00001020: 00 3E 18 35 08 99 22 13 22 3B C8 28 43 44 24 2C |.>.5..".";.(CD$,|
00001030: 52 29 3B C8 28 43 52 24 2C 4B 29 3B 3A 8E 00 59 |R);.(CR$,K);:..Y|
00001040: 18 98 08 8F 20 4F 50 48 41 4C 45 4E 20 52 55 42 |.... OPHALEN RUB|
00001050: 52 49 45 4B 20 56 45 4C 44 00 73 18 99 08 8D 32 |RIEK VELD.s....2|
00001060: 31 30 30 3A 81 49 B2 31 A4 4D 3A 99 22 2E 22 3B |100:.I.1.M:.".";|
00001070: 3A 82 49 00 91 18 9A 08 8D 32 31 30 30 3A 8D 33 |:.I......2100:.3|
00001080: 31 30 30 3A 58 58 24 B2 22 22 3A 81 49 B2 31 A4 |100:XX$."":.I.1.|
00001090: 4D 00 A5 18 9B 08 A1 58 24 3A 8B 58 24 B2 22 22 |M......X$:.X$.""|
000010A0: 89 32 32 30 33 00 B8 18 9C 08 8B 58 24 B2 C7 28 |.2203......X$..(|
000010B0: 31 33 29 89 32 32 30 39 00 CB 18 9D 08 8B 58 24 |13).2209......X$|
000010C0: B2 C7 28 32 30 29 89 32 32 30 30 00 E1 18 9E 08 |..(20).2200.....|
000010D0: 58 58 24 B2 58 58 24 AA 58 24 3A 99 58 24 3B 3A |XX$.XX$.X$:.X$;:|
000010E0: 82 00 F8 18 9F 08 A1 58 24 3A 8B 58 24 B2 C7 28 |.......X$:.X$..(|
000010F0: 32 30 29 89 32 32 30 30 00 0C 19 A0 08 8B 58 24 |20).2200......X$|
00001100: B3 B1 C7 28 31 33 29 89 32 32 30 37 00 1B 19 A1 |...(13).2207....|
00001110: 08 58 B2 C5 28 58 58 24 29 3A 8E 00 32 19 B8 0B |.X..(XX$):..2...|
00001120: 8F 20 57 41 43 48 54 45 4E 20 4F 50 20 54 4F 45 |. WACHTEN OP TOE|
00001130: 54 53 00 46 19 B9 0B A1 58 24 3A 8B 58 24 B2 22 |TS.F....X$:.X$."|
00001140: 22 89 33 30 30 31 00 4C 19 BA 0B 8E 00 6C 19 1C |".3001.L.....l..|
00001150: 0C 8F 20 4D 41 41 4B 20 4B 45 59 42 4F 41 52 44 |.. MAAK KEYBOARD|
00001160: 20 42 55 46 46 45 52 20 4C 45 45 47 00 81 19 1D | BUFFER LEEG....|
00001170: 0C A1 58 24 3A 8B 58 24 B3 B1 22 22 89 33 31 30 |..X$:.X$.."".310|
00001180: 31 00 87 19 1E 0C 8E 00 AA 19 A0 0F 8F 20 4F 56 |1............ OV|
00001190: 45 52 5A 49 43 48 54 20 42 45 44 52 49 4A 46 53 |ERZICHT BEDRIJFS|
000011A0: 20 52 45 53 55 4C 54 41 41 54 00 E2 19 A2 0F 99 | RESULTAAT......|
000011B0: 22 93 47 45 45 46 20 48 45 54 20 45 45 52 53 54 |".GEEF HET EERST|
000011C0: 45 20 45 4E 20 48 45 54 20 54 57 45 45 44 45 20 |E EN HET TWEEDE |
000011D0: 57 45 45 4B 4E 55 4D 4D 45 52 22 3A 85 57 31 2C |WEEKNUMMER":.W1,|
000011E0: 57 32 00 07 1A A3 0F 8B 28 57 31 B1 57 32 29 A7 |W2......(W1.W2).|
000011F0: 20 99 22 46 4F 55 54 45 20 49 4E 56 4F 45 52 22 | ."FOUTE INVOER"|
00001200: 3A 89 20 34 30 30 32 00 38 1A A4 0F 8B 28 57 32 |:. 4002.8....(W2|
00001210: B1 4E 57 29 A7 20 99 22 57 45 45 4B 4E 55 4D 4D |.NW). ."WEEKNUMM|
00001220: 45 52 20 4E 49 45 54 20 41 41 4E 57 45 5A 49 47 |ER NIET AANWEZIG|
00001230: 22 3A 89 20 34 30 30 32 00 4D 1A A6 0F A0 31 3A |":. 4002.M....1:|
00001240: 9F 31 2C 34 3A 98 31 2C C7 28 31 34 29 00 7D 1A |.1,4:.1,.(14).}.|
00001250: A8 0F 98 31 2C A6 36 29 22 4F 56 45 52 5A 49 43 |...1,.6)"OVERZIC|
00001260: 48 54 20 42 45 44 52 49 4A 46 53 20 52 45 53 55 |HT BEDRIJFS RESU|
00001270: 4C 54 41 54 45 4E 22 3B C7 28 31 35 29 00 9C 1A |LTATEN";.(15)...|
00001280: A9 0F 98 31 2C 43 24 2C 3B 22 57 45 45 4B 22 3B |...1,C$,;"WEEK";|
00001290: 57 31 3B 22 20 54 4F 54 22 3B 57 32 00 CB 1A AA |W1;" TOT";W2....|
000012A0: 0F 98 31 2C 2C 22 4F 55 44 45 20 4A 41 41 52 3A |..1,,"OUDE JAAR:|
000012B0: 22 3B 4A 4F 3B 22 20 20 4E 49 45 55 57 45 20 4A |";JO;" NIEUWE J|
000012C0: 41 41 52 3A 22 3B 4A 4E 3B 43 24 00 11 1B AC 0F |AAR:";JN;C$.....|
000012D0: 98 31 2C 2C 22 20 20 41 46 44 45 4C 49 4E 47 20 |.1,," AFDELING |
000012E0: 20 4B 4F 44 45 20 20 20 20 20 20 20 4F 4D 5A 45 | KODE OMZE|
000012F0: 54 20 20 25 54 4F 54 2E 20 4B 4C 41 4E 54 45 4E |T %TOT. KLANTEN|
00001300: 20 47 45 4D 2E 42 45 53 2E 20 20 53 54 59 47 2E | GEM.BES. STYG.|
00001310: 22 00 32 1B AD 0F 98 31 2C 2C 3B 3A 81 49 B2 31 |".2....1,,;:.I.1|
00001320: A4 37 30 3A 98 31 2C 22 AF 22 3B 3A 82 3A 98 31 |.70:.1,".";:.:.1|
00001330: 2C 3A 00 5D 1B AE 0F 81 49 B2 31 A4 32 3A 81 4A |,:.]....I.1.2:.J|
00001340: B2 31 A4 37 3A 52 4F 28 49 2C 4A 29 B2 30 3A 52 |.1.7:RO(I,J).0:R|
00001350: 4B 28 49 2C 4A 29 B2 30 3A 82 4A 2C 49 00 71 1B |K(I,J).0:.J,I.q.|
00001360: AF 0F 81 57 B2 57 31 A4 57 32 3A 81 49 B2 31 A4 |...W.W1.W2:.I.1.|
00001370: 32 00 AA 1B B0 0F 52 4F 28 49 2C 31 29 B2 52 4F |2.....RO(I,1).RO|
00001380: 28 49 2C 31 29 AA 4F 5A 28 49 2C 31 2C 57 29 3A |(I,1).OZ(I,1,W):|
00001390: 52 4B 28 49 2C 31 29 B2 52 4B 28 49 2C 31 29 AA |RK(I,1).RK(I,1).|
000013A0: 4B 4C 25 28 49 2C 31 2C 57 29 00 E3 1B B1 0F 52 |KL%(I,1,W).....R|
000013B0: 4F 28 49 2C 32 29 B2 52 4F 28 49 2C 32 29 AA 4F |O(I,2).RO(I,2).O|
000013C0: 5A 28 49 2C 32 2C 57 29 3A 52 4B 28 49 2C 32 29 |Z(I,2,W):RK(I,2)|
000013D0: B2 52 4B 28 49 2C 32 29 AA 4B 4C 25 28 49 2C 32 |.RK(I,2).KL%(I,2|
000013E0: 2C 57 29 00 1C 1C B2 0F 52 4F 28 49 2C 34 29 B2 |,W).....RO(I,4).|
000013F0: 52 4F 28 49 2C 34 29 AA 4F 5A 28 49 2C 33 2C 57 |RO(I,4).OZ(I,3,W|
00001400: 29 3A 52 4B 28 49 2C 34 29 B2 52 4B 28 49 2C 34 |):RK(I,4).RK(I,4|
00001410: 29 AA 4B 4C 25 28 49 2C 33 2C 57 29 00 55 1C B3 |).KL%(I,3,W).U..|
00001420: 0F 52 4F 28 49 2C 35 29 B2 52 4F 28 49 2C 35 29 |.RO(I,5).RO(I,5)|
00001430: AA 4F 5A 28 49 2C 34 2C 57 29 3A 52 4B 28 49 2C |.OZ(I,4,W):RK(I,|
00001440: 35 29 B2 52 4B 28 49 2C 35 29 AA 4B 4C 25 28 49 |5).RK(I,5).KL%(I|
00001450: 2C 34 2C 57 29 00 93 1C B4 0F 52 4F 28 49 2C 37 |,4,W).....RO(I,7|
00001460: 29 B2 52 4F 28 49 2C 37 29 AA 4F 5A 28 49 2C 35 |).RO(I,7).OZ(I,5|
00001470: 2C 57 29 3A 52 4B 28 49 2C 37 29 B2 52 4B 28 49 |,W):RK(I,7).RK(I|
00001480: 2C 37 29 AA 4B 4C 25 28 49 2C 35 2C 57 29 3A 82 |,7).KL%(I,5,W):.|
00001490: 49 2C 57 00 D6 1C B5 0F 81 49 B2 31 A4 32 3A 52 |I,W......I.1.2:R|
000014A0: 4F 28 49 2C 33 29 B2 52 4F 28 49 2C 31 29 AB 52 |O(I,3).RO(I,1).R|
000014B0: 4F 28 49 2C 32 29 3A 52 4F 28 49 2C 36 29 B2 52 |O(I,2):RO(I,6).R|
000014C0: 4F 28 49 2C 32 29 AA 52 4F 28 49 2C 34 29 AA 52 |O(I,2).RO(I,4).R|
000014D0: 4F 28 49 2C 35 29 00 12 1D B6 0F 52 4B 28 49 2C |O(I,5).....RK(I,|
000014E0: 33 29 B2 52 4B 28 49 2C 31 29 AB 52 4B 28 49 2C |3).RK(I,1).RK(I,|
000014F0: 32 29 3A 52 4B 28 49 2C 36 29 B2 52 4B 28 49 2C |2):RK(I,6).RK(I,|
00001500: 32 29 AA 52 4B 28 49 2C 34 29 AA 52 4B 28 49 2C |2).RK(I,4).RK(I,|
00001510: 35 29 00 19 1D B7 0F 82 49 00 28 1D B8 0F 50 28 |5)......I.(...P(|
00001520: 32 29 B2 53 50 28 31 29 00 37 1D B9 0F 50 28 33 |2).SP(1).7...P(3|
00001530: 29 B2 53 50 28 32 29 00 77 1D BA 0F 50 28 31 29 |).SP(2).w...P(1)|
00001540: B2 30 3A 8B 52 4F 28 31 2C 31 29 B3 B1 30 A7 50 |.0:.RO(1,1)..0.P|
00001550: 28 31 29 B2 28 50 28 32 29 AC 52 4F 28 31 2C 32 |(1).(P(2).RO(1,2|
00001560: 29 AA 50 28 33 29 AC 52 4F 28 31 2C 33 29 29 AD |).P(3).RO(1,3)).|
00001570: 52 4F 28 31 2C 31 29 00 98 1D BB 0F 50 28 34 29 |RO(1,1).....P(4)|
00001580: B2 53 50 28 33 29 3A 50 28 35 29 B2 53 50 28 34 |.SP(3):P(5).SP(4|
00001590: 29 3A 50 28 36 29 B2 30 00 DE 1D BC 0F 8B 52 4F |):P(6).0......RO|
000015A0: 28 31 2C 36 29 B3 B1 30 A7 50 28 36 29 B2 28 50 |(1,6)..0.P(6).(P|
000015B0: 28 32 29 AC 52 4F 28 31 2C 32 29 AA 50 28 34 29 |(2).RO(1,2).P(4)|
000015C0: AC 52 4F 28 31 2C 34 29 AA 50 28 35 29 AC 52 4F |.RO(1,4).P(5).RO|
000015D0: 28 31 2C 35 29 29 AD 52 4F 28 31 2C 36 29 00 ED |(1,5)).RO(1,6)..|
000015E0: 1D BD 0F 50 28 37 29 B2 53 50 28 35 29 00 FF 1D |...P(7).SP(5)...|
000015F0: BE 0F 81 49 B2 31 A4 37 3A 81 4A B2 31 A4 32 00 |...I.1.7:.J.1.2.|
00001600: 20 1E BF 0F 98 31 2C 43 24 2C 4E 41 24 28 49 29 | ....1,C$,NA$(I)|
00001610: 3B 4B 4F 24 28 28 4A AB 2E 35 29 AC 32 29 3B 3A |;KO$((J..5).2);:|
00001620: 00 4D 1E C0 0F 58 B2 52 4F 28 4A 2C 49 29 3A 4D |.M...X.RO(J,I):M|
00001630: B2 31 32 3A 4E B2 32 3A 8D 32 30 30 30 3A 8B 52 |.12:N.2:.2000:.R|
00001640: 4F 28 4A 2C 49 29 B2 30 A7 34 30 33 38 00 75 1E |O(J,I).0.4038.u.|
00001650: C1 0F 58 B2 52 4F 28 4A 2C 49 29 AD 52 4F 28 4A |..X.RO(J,I).RO(J|
00001660: 2C 31 29 AC 31 30 30 3A 4D B2 37 3A 4E B2 31 3A |,1).100:M.7:N.1:|
00001670: 8D 32 30 30 30 00 92 1E C2 0F 8B 49 B2 33 B0 49 |.2000......I.3.I|
00001680: B2 36 A7 20 98 31 2C A6 31 37 29 3B 3A 89 34 30 |.6. .1,.17);:.40|
00001690: 33 37 00 AE 1E C3 0F 58 B2 52 4B 28 4A 2C 49 29 |37.....X.RK(J,I)|
000016A0: 3A 4D B2 38 3A 4E B2 30 3A 8D 32 30 30 30 00 D2 |:M.8:N.0:.2000..|
000016B0: 1E C4 0F 58 B2 52 4F 28 4A 2C 49 29 AD 52 4B 28 |...X.RO(J,I).RK(|
000016C0: 4A 2C 49 29 3A 4D B2 39 3A 4E B2 32 3A 8D 32 30 |J,I):M.9:N.2:.20|
000016D0: 30 30 00 00 1F C5 0F 8F 20 20 20 49 46 4A 3D 31 |00...... IFJ=1|
000016E0: 54 48 45 4E 58 3D 50 28 49 29 2A 31 30 30 3A 4D |THENX=P(I)*100:M|
000016F0: 3D 37 3A 4E 3D 31 3A 47 4F 53 55 42 32 30 30 30 |=7:N=1:GOSUB2000|
00001700: 00 40 1F C6 0F 8B 28 4A B2 32 29 AF 28 52 4F 28 |.@....(J.2).(RO(|
00001710: 31 2C 49 29 B3 B1 30 29 A7 58 B2 28 52 4F 28 32 |1,I)..0).X.(RO(2|
00001720: 2C 49 29 AD 52 4F 28 31 2C 49 29 AB 31 29 AC 31 |,I).RO(1,I).1).1|
00001730: 30 30 3A 4D B2 37 3A 4E B2 31 3A 8D 32 30 30 30 |00:M.7:N.1:.2000|
00001740: 00 60 1F C7 0F 8B 4A B2 31 A7 20 98 31 2C 43 24 |.`....J.1. .1,C$|
00001750: 2C 4E 41 24 28 49 29 3B 4B 4F 24 28 32 29 3B 3A |,NA$(I);KO$(2);:|
00001760: 00 95 1F C8 0F 8B 4A B2 31 A7 20 58 B2 52 4F 28 |......J.1. X.RO(|
00001770: 31 2C 49 29 AC 28 50 28 49 29 AA 31 29 3A 4D B2 |1,I).(P(I).1):M.|
00001780: 31 32 3A 4E B2 32 3A 8D 32 30 30 30 3A 98 31 2C |12:N.2:.2000:.1,|
00001790: A6 32 34 29 3B 00 B9 1F C9 0F 8B 4A B3 B1 32 A7 |.24);......J..2.|
000017A0: 20 58 B2 50 28 49 29 AC 31 30 30 3A 4D B2 37 3A | X.P(I).100:M.7:|
000017B0: 4E B2 31 3A 8D 32 30 30 30 00 C9 1F CA 0F 82 4A |N.1:.2000......J|
000017C0: 3A 98 31 2C 43 24 3A 82 49 00 03 20 CB 0F 98 31 |:.1,C$:.I.. ...1|
000017D0: 2C 43 24 3B 43 24 2C 22 56 45 47 45 22 3B 43 24 |,C$;C$,"VEGE";C$|
000017E0: 2C 22 43 2E 56 4C 41 41 4E 44 45 52 45 4E 22 3B |,"C.VLAANDEREN";|
000017F0: 43 24 2C 22 4D 45 49 44 4F 4F 52 4E 4C 41 41 4E |C$,"MEIDOORNLAAN|
00001800: 20 31 22 00 21 20 CC 0F 98 31 2C 2C 22 4E 45 44 | 1".! ...1,,"NED|
00001810: 45 52 48 4F 52 53 54 20 44 45 4E 20 42 45 52 47 |ERHORST DEN BERG|
00001820: 22 00 3C 20 CD 0F 81 49 B2 31 A4 31 37 3A 98 31 |".< ...I.1.17:.1|
00001830: 2C 3A 82 49 3A A0 31 3A 9F 31 2C 33 00 42 20 CE |,:.I:.1:.1,3.B .|
00001840: 0F 8E 00 60 20 88 13 8F 20 55 49 54 50 52 49 4E |...` ... UITPRIN|
00001850: 54 45 4E 20 4A 41 41 52 47 45 47 45 56 45 4E 53 |TEN JAARGEGEVENS|
00001860: 00 6C 20 89 13 A0 31 3A 9F 31 2C 34 00 92 20 92 |.l ...1:.1,4.. .|
00001870: 13 81 49 49 B2 31 A4 37 3A 81 4A B2 31 A4 32 3A |..II.1.7:.J.1.2:|
00001880: 4F 54 28 4A 29 B2 30 3A 4B 54 28 4A 29 B2 30 3A |OT(J).0:KT(J).0:|
00001890: 82 4A 00 C4 20 93 13 98 31 2C C7 28 31 34 29 3B |.J.. ...1,.(14);|
000018A0: A6 35 29 3B 22 4A 41 41 52 4F 56 45 52 5A 49 43 |.5);"JAAROVERZIC|
000018B0: 48 54 22 3B 4A 4E 3B 4E 41 24 28 49 49 29 3B C7 |HT";JN;NA$(II);.|
000018C0: 28 31 35 29 00 F9 20 95 13 98 31 2C 43 24 2C A6 |(15).. ...1,C$,.|
000018D0: 31 33 29 3B 4A 4F 3B A6 36 29 3B 4A 4E 3B A6 32 |13);JO;.6);JN;.2|
000018E0: 29 3B 4A 4F 3B A6 32 29 3B 4A 4E 3B A6 33 29 3B |);JO;.2);JN;.3);|
000018F0: 4A 4F 3B A6 33 29 3B 4A 4E 00 44 21 96 13 98 31 |JO;.3);JN.D!...1|
00001900: 2C 2C 22 57 45 45 4B 20 3A 20 20 20 20 20 20 20 |,,"WEEK : |
00001910: 4F 4D 5A 45 54 20 20 20 20 20 20 20 4F 4D 5A 45 |OMZET OMZE|
00001920: 54 20 4B 4C 41 4E 54 45 4E 20 4B 4C 41 4E 54 45 |T KLANTEN KLANTE|
00001930: 4E 20 47 45 4D 2E 42 45 53 2E 20 47 45 4D 2E 42 |N GEM.BES. GEM.B|
00001940: 45 53 2E 22 00 63 21 97 13 98 31 2C 2C 3A 81 49 |ES.".c!...1,,:.I|
00001950: B2 31 A4 37 30 3A 98 31 2C 22 C0 22 3B 3A 82 3A |.1.70:.1,".";:.:|
00001960: 98 31 2C 00 6F 21 9C 13 81 57 B2 31 A4 4E 57 00 |.1,.o!...W.1.NW.|
00001970: 8B 21 9D 13 98 31 2C 2C C9 28 53 50 24 AA C4 28 |.!...1,,.(SP$..(|
00001980: 57 29 2C 34 29 3B 22 20 3A 22 3B 00 9F 21 9E 13 |W),4);" :";..!..|
00001990: 8B 49 49 B2 33 B0 49 49 B2 36 89 35 30 33 30 00 |.II.3.II.6.5030.|
000019A0: C0 21 9F 13 4C B2 49 49 3A 8B 49 49 B1 33 A7 4C |.!..L.II:.II.3.L|
000019B0: B2 4C AB 31 3A 8B 49 49 B2 37 A7 4C B2 4C AB 31 |.L.1:.II.7.L.L.1|
000019C0: 00 F7 21 A0 13 4D B2 31 32 3A 4E B2 32 3A 81 4A |..!..M.12:N.2:.J|
000019D0: B2 31 A4 32 3A 58 B2 4F 5A 28 4A 2C 4C 2C 57 29 |.1.2:X.OZ(J,L,W)|
000019E0: 3A 8D 32 30 30 30 3A 4F 54 28 4A 29 B2 4F 54 28 |:.2000:OT(J).OT(|
000019F0: 4A 29 AA 58 3A 82 4A 00 2E 22 A1 13 4D B2 38 3A |J).X:.J.."..M.8:|
00001A00: 4E B2 30 3A 81 4A B2 31 A4 32 3A 58 B2 4B 4C 25 |N.0:.J.1.2:X.KL%|
00001A10: 28 4A 2C 4C 2C 57 29 3A 8D 32 30 30 30 3A 4B 54 |(J,L,W):.2000:KT|
00001A20: 28 4A 29 B2 4B 54 28 4A 29 AA 58 3A 82 4A 00 6B |(J).KT(J).X:.J.k|
00001A30: 22 A2 13 4D B2 39 3A 4E B2 32 3A 81 4A B2 31 A4 |"..M.9:N.2:.J.1.|
00001A40: 32 3A 58 B2 30 3A 8B 4B 4C 25 28 4A 2C 4C 2C 57 |2:X.0:.KL%(J,L,W|
00001A50: 29 B3 B1 30 A7 58 B2 4F 5A 28 4A 2C 4C 2C 57 29 |)..0.X.OZ(J,L,W)|
00001A60: AD 4B 4C 25 28 4A 2C 4C 2C 57 29 00 7E 22 A3 13 |.KL%(J,L,W).~"..|
00001A70: 8D 32 30 30 30 3A 82 4A 3A 89 35 30 35 30 00 8D |.2000:.J:.5050..|
00001A80: 22 A6 13 8B 49 49 B2 36 A7 35 30 34 30 00 C6 22 |"...II.6.5040.."|
00001A90: A7 13 81 4A B2 31 A4 32 3A 58 B2 4F 5A 28 4A 2C |...J.1.2:X.OZ(J,|
00001AA0: 31 2C 57 29 AB 4F 5A 28 4A 2C 32 2C 57 29 3A 4D |1,W).OZ(J,2,W):M|
00001AB0: B2 31 32 3A 4E B2 32 3A 8D 32 30 30 30 3A 82 4A |.12:N.2:.2000:.J|
00001AC0: 3A 89 35 30 35 30 00 03 23 B0 13 81 4A B2 31 A4 |:.5050..#...J.1.|
00001AD0: 32 3A 58 B2 4F 5A 28 4A 2C 32 2C 57 29 AA 4F 5A |2:X.OZ(J,2,W).OZ|
00001AE0: 28 4A 2C 33 2C 57 29 AA 4F 5A 28 4A 2C 34 2C 57 |(J,3,W).OZ(J,4,W|
00001AF0: 29 3A 4D B2 31 32 3A 4E B2 32 3A 8D 32 30 30 30 |):M.12:N.2:.2000|
00001B00: 3A 82 4A 00 0E 23 BA 13 98 31 2C 3A 82 57 00 2F |:.J..#...1,:.W./|
00001B10: 23 BB 13 98 31 2C 2C 3B 3A 81 49 B2 31 A4 37 30 |#...1,,;:.I.1.70|
00001B20: 3A 98 31 2C 22 C0 22 3B 3A 82 3A 98 31 2C 3A 00 |:.1,".";:.:.1,:.|
00001B30: 62 23 BC 13 98 31 2C 2C 22 54 4F 54 2E 20 3A 22 |b#...1,,"TOT. :"|
00001B40: 3B 3A 4D B2 31 32 3A 4E B2 32 3A 81 4A B2 31 A4 |;:M.12:N.2:.J.1.|
00001B50: 32 3A 58 B2 4F 54 28 4A 29 3A 8D 32 30 30 30 3A |2:X.OT(J):.2000:|
00001B60: 82 4A 00 76 23 BD 13 8B 49 49 B2 33 B0 49 49 B2 |.J.v#...II.3.II.|
00001B70: 36 A7 35 30 35 37 00 9A 23 BE 13 4D B2 38 3A 4E |6.5057..#..M.8:N|
00001B80: B2 30 3A 81 4A B2 31 A4 32 3A 58 B2 4B 54 28 4A |.0:.J.1.2:X.KT(J|
00001B90: 29 3A 8D 32 30 30 30 3A 82 4A 00 C9 23 BF 13 4D |):.2000:.J..#..M|
00001BA0: B2 39 3A 4E B2 32 3A 81 4A B2 31 A4 32 3A 58 B2 |.9:N.2:.J.1.2:X.|
00001BB0: 30 3A 8B 4B 54 28 4A 29 B3 B1 30 A7 58 B2 4F 54 |0:.KT(J)..0.X.OT|
00001BC0: 28 4A 29 AD 4B 54 28 4A 29 00 D6 23 C0 13 8D 32 |(J).KT(J)..#...2|
00001BD0: 30 30 30 3A 82 4A 00 0C 24 C1 13 98 31 2C 43 24 |000:.J..$...1,C$|
00001BE0: 2C 43 24 2C 22 56 45 47 45 20 20 43 2E 56 4C 41 |,C$,"VEGE C.VLA|
00001BF0: 41 4E 44 45 52 45 4E 22 3B 43 24 2C 22 4D 45 49 |ANDEREN";C$,"MEI|
00001C00: 44 4F 4F 52 4E 4C 41 41 4E 20 31 22 00 2A 24 C2 |DOORNLAAN 1".*$.|
00001C10: 13 98 31 2C 2C 22 4E 45 44 45 52 48 4F 52 53 54 |..1,,"NEDERHORST|
00001C20: 20 44 45 4E 20 42 45 52 47 22 00 42 24 C3 13 81 | DEN BERG".B$...|
00001C30: 49 B2 31 A4 36 36 AB 4E 57 AB 31 31 3A 98 31 2C |I.1.66.NW.11:.1,|
00001C40: 3A 82 00 52 24 C4 13 82 49 49 3A A0 31 3A 9F 31 |:..R$...II:.1:.1|
00001C50: 2C 33 00 58 24 CE 13 8E 00 9E 24 28 23 83 22 20 |,3.X$.....$(#." |
00001C60: 20 20 20 54 4F 54 41 41 4C 22 2C 22 20 20 20 20 | TOTAAL"," |
00001C70: 53 4C 41 47 45 52 22 2C 22 20 45 58 2E 53 4C 41 |SLAGER"," EX.SLA|
00001C80: 47 45 52 22 2C 22 20 20 20 20 41 2E 47 2E 46 2E |GER"," A.G.F.|
00001C90: 22 2C 22 20 20 20 42 4F 55 54 49 45 4B 22 00 BD |"," BOUTIEK"..|
00001CA0: 24 29 23 83 22 20 54 4F 54 2E 20 56 45 52 53 22 |$)#." TOT. VERS"|
00001CB0: 2C 22 20 20 20 20 20 20 4B 2E 57 2E 22 00 DD 24 |," K.W."..$|
00001CC0: 2A 23 83 22 20 20 20 4F 55 44 22 2C 22 20 56 45 |*#." OUD"," VE|
00001CD0: 52 57 2E 22 2C 22 20 4E 49 45 55 57 22 00 00 00 |RW."," NIEUW"...|
00001CE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001CF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001D00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001D10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001D20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001D30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001D40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001D50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001D60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001D70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001D80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001D90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001DA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001DB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001DC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001DD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001DE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001DF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001E00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001E10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001E20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001E30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001E40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001E50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001E60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001E70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001E80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001E90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001EA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001EB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001EC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001ED0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001EE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001EF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001F00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001F10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001F20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001F30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001F40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001F50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001F60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001F70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001F80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001F90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001FA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001FB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001FC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001FD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001FE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001FF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00002000: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00002010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00002020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00002030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00002040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00002050: 00 00 00 00 00 00 |...... |
..(.... ********************************
.O.... * *.
V.... * OMZET VERGELIJKINGEN *..
.... * *.D.
... * VOOR FA. C.VLAANDEREN *....
.. * MEIDOORNLAAN 1 *.....
. * NEDERHORST DEN BERG *.9....
* COPYRIGHT J.V.D.BERG *.`....
* UITVOERING MET CAS.REC. *...... *
*******************************.M...SP$.
" ":NU$."0000000000":NW.53
:MUT.0:JN.0:JO.0:JS.0.....CD$.".........
.............":C$.G(13).*...CR$.".......
.................................".T....
OZ(2,5,NW),KL%(2,5,NW),RO(2,7),RK(2,7),
P(7),SP(5),NAAM$(7),KODE$(3).}....1,3...
...I.1.7:.NAAM$(I):.I......I.1.3:.KODE$(
I):.I...C.WN.0...D..".**** KEUZE MENU OM
ZETBEHEER ****"...E..:."1-INVOEREN WEEKG
EGEVENS"...F.."2-OMZET VERGELIJKING".2.G
.."3-JAAR LIJSTEN".X.K.."7-INVOEREN STYG
INGS PERCENTAGE".|.L.."8-AANMAKEN NIEUW
JAARBESTAND"...M.."9-EINDE PROGRAMMA".A.
N..:."GEEF UW KEUZE (1-9)";:. I:.I..1.12
0...O..1000:.JJ..JN.JN.JJ:JA.2:.1010...P
..1100:.1200:.100...X..I..2.130.*.Y..100
0:.JN..JJ.JN.JJ:JA.2:.1010.B.Z..JS..JJ.J
S.JJ:.1040.I.{..JO..JJ.1.JO.JJ.1:JJ.JO:J
A.1:.1010.X.|..4000:.100......I..3.140..
....1000:.JN..JJ.JN.JJ:JA.2:.1010.P....J
O..JJ.1.JO.JJ.1:JJ.JO:JA.1:.1010......50
00:.100......I..4.150......I..5.160... .
.I..6.170......I..7.180.'....1000:JS.JJ.
6....1500:.100.D....I..8.190.S....1020:.
100.A....I..9.100.G.......... OPVRAGEN V
AN HET TE VERWERKEN JAARDY..Q....".GEEF
HET TE VERWERKEN JAAR:":.JJ:.JJ.2100.JJ.
1900.1001.W.......... LADEN VAN EEN JAAR
.,...."PLAATS DE CASSETTE MET BESTAND";J
J;C$;"KLAAR ? (J/N)".B....X$:.X$.."J".10
12.E....2,1,0,"JAARBEST.".I(D(JJ),4):...
...(STATUS..0). 2:."BESTAND IS NIET GEVO
NDEN!!!!":.1011......2,WK:.JA.1.WO.WK.E.
...JA.2.WN.WK......I.1.WK:.J.1.5:.2,OZ(J
A,J,I),KL%(JA,J,I):.J,I..... 2:.NW.WK...
?....I.WK.1.NW:.J.1.5:OZ(JA,J,I).0:KL%(J
A,J,I).0:.J,I:..X.... NIEUW JAAR CREEREN
......".GEEF HET TE CREEREN JAAR:":. J
N:.JN.2100.JN.1900.1021.S...MUT.1:WN.0:.
I.1.NW:.J.1.5:OZ(2,J,I).0:KL%(2,J,I).0:.
J,I......1200...... SAVEN VAN HET NIEUWE
JAAR.9...."PLAATS DE CASSETTE MET BESTA
ND";JN;C$;"KLAAR ? (J/N)".O....X$:.X$.."
J".1032.Q....2,1,2,"JAARBEST.".I(D(JJ),4
)......(STATUS..0). 2:."BESTAND IS NIET
GEVONDEN!!!!":.1031......2,WN:.I.1.WN:.J
.1.5:.2,OZ(2,J,I):.2,KL%(2,J,I):.J,.....
2:....... LADEN VAN DE STIJGINGS PERCEN
TAGES.W...."PLAATS DE CASSETTE MET DE ST
IJGINGS PERCENTAGES VAN";JJ.~...."KL
AAR ? (J/N)":.X$:.X$.."J".1042. ....2,1,
0,"STIJGPCT.".I(D(JJ),4).Z....(STATUS..0
). 2:."BESTAND IS NIET GEVONDEN!!!!":.10
41......I.1.5:.2,SP(I):.: 2:..........L.
. INVOEREN WEEK GEGEVENS.D.V..".**** INV
OEREN WEEK GEGEVENS ****";C$.[.W.."TOTAA
L: ";:.1160.R.X.."SLAGER: ";:.1160...Y..
"A.G.F.: ";:.1160. .Z.."BOUTIEK:";:.1160
...[.." K.W.:";:.1160...E.."JAAR:";JN:
."WEEK:":R.13:K.6:M.2:.2200:WK.X...F..X.
0.X.WN.WK.WN.1:N.0:X.WK:.2100:.2000:.114
3.2.G.N.0:X.WK:.2100:.2000.I.H..I.1.5:R.
I.2:K.14:M.9:N.2:X.OZ(2,I,WK):.2100:.200
0...I.K.32:M.5:N.0:X.KL%(2,I,WK):.2100:.
2000:.I.Q.T..".";H(CD$,16);"WILT U DEZE
GEGEVENS WIJZIGEN(J/N)?".Y.U..X$...V..X
$.."J".1148...W..II.1.5...X.R.II.2:K.14:
M.9:.2200:OZ(2,II,WK).X.K.Y.K.32:M.5:.22
00:KL%(2,II,WK)..(X..5):.II.\.Z..WK.WN.W
N.WK.F.{..1128...|..".WILT U NOG EEN WEE
K INVOEREN (J/N)?"...}..X$:.X$.."N".1100
...~...S...."OMZET: KLANTEN:";C
$:....... OPBERGEN NA MUTEREN......".HET
BESTAND IS VERANDERD".0...."WILT U HET
OPBERGEN (J/N)?".G....X$:.X$.."N"..1030.
M.....X.... INVOEREN VAN DE STIJGINGSPER
CENTAGES......".**** INVOEREN STIJGINGS
PECENTAGES ****";C$......NA$(2);C$;NA$(3
);C$;NA$(4);C$;NA$(5);C$;NA$(7);C$......
II.1.5:R.II.1:K.12:M.4:.2200:SP(II).X.10
0:..I...."..........WILT U DEZE GEGEVENS
OPBERGEN? (J/N)".\....X$:.X$."N". .....
.."PLAATS DE CASSETTE MET DE STIJGINGS
PERCENTAGES VAN";JJ.E...."KLAAR ? (J/
N)":.X$:.X$.."J".1507......2,1,2,"STIJGP
CT.".I(D(JJ),4).!....(STATUS..0). 2:."BE
STAND IS NIET GEVONDEN!!!!":.1506.<....I
.1.5:.2,SP(I):.: 2:.._.P.. PRINTEN VAN X
IN FORMAT(M,N)...Q..(N..0)..1,I(SP$.D(.
(X..5)),M);:....R.X..(X..(10.N).0.51)..(
10.N).B.S..1,I(SP$.D(.(X)),M.N.1);...T..
(X..(X).0)..1,".";H(NU$,N);:....U..1,J(D
(X..(X)).NU$,2,N.1);:.. .4.. SET CURSOR
POSIETIE.>.5..".";H(CD$,R);H(CR$,K);:..Y
.... OPHALEN RUBRIEK VELD.S....2100:.I.1
.M:.".";:.I......2100:.3100:XX$."":.I.1.
M......X$:.X$."".2203......X$.G(13).2209
.K....X$.G(20).2200.....XX$.XX$.X$:.X$;:
.......X$:.X$.G(20).2200... ..X$..G(13).
2207.....X.E(XX$):..2.... WACHTEN OP TOE
TS.F....X$:.X$."".3001.L.....L.... MAAK
KEYBOARD BUFFER LEEG......X$:.X$.."".310
1......... .. OVERZICHT BEDRIJFS RESULTA
AT......".GEEF HET EERSTE EN HET TWEEDE
WEEKNUMMER":.W1,W2......(W1.W2). ."FOUTE
INVOER":. 4002.8....(W2.NW). ."WEEKNUMM
ER NIET AANWEZIG":. 4002.M... 1:.1,4:.1,
G(14).}....1,.6)"OVERZICHT BEDRIJFS RESU
LTATEN";G(15)......1,C$,;"WEEK";W1;" TOT
";W2.K....1,,"OUDE JAAR:";JO;" NIEUWE J
AAR:";JN;C$......1,," AFDELING KODE
OMZET %TOT. KLANTEN GEM.BES. STYG.
".2....1,,;:.I.1.70:.1,".";:.:.1,:.]....
I.1.2:.J.1.7:RO(I,J).0:RK(I,J).0:.J,I.Q.
...W.W1.W2:.I.1.2.....RO(I,1).RO(I,1).OZ
(I,1,W):RK(I,1).RK(I,1).KL%(I,1,W).....R
O(I,2).RO(I,2).OZ(I,2,W):RK(I,2).RK(I,2)
.KL%(I,2,W).....RO(I,4).RO(I,4).OZ(I,3,W
):RK(I,4).RK(I,4).KL%(I,3,W).U...RO(I,5)
.RO(I,5).OZ(I,4,W):RK(I,5).RK(I,5).KL%(I
,4,W).....RO(I,7).RO(I,7).OZ(I,5,W):RK(I
,7).RK(I,7).KL%(I,5,W):.I,W.V....I.1.2:R
O(I,3).RO(I,1).RO(I,2):RO(I,6).RO(I,2).R
O(I,4).RO(I,5).....RK(I,3).RK(I,1).RK(I,
2):RK(I,6).RK(I,2).RK(I,4).RK(I,5)......
I.(...P(2).SP(1).7...P(3).SP(2).W...P(1)
.0:.RO(1,1)..0.P(1).(P(2).RO(1,2).P(3).R
O(1,3)).RO(1,1).....P(4).SP(3):P(5).SP(4
):P(6).0......RO(1,6)..0.P(6).(P(2).RO(1
,2).P(4).RO(1,4).P(5).RO(1,5)).RO(1,6)..
...P(7).SP(5)......I.1.7:.J.1.2. ....1,C
$,NA$(I);KO$((J..5).2);:.M...X.RO(J,I):M
.12:N.2:.2000:.RO(J,I).0.4038.U.A.X.RO(J
,I).RO(J,1).100:M.7:N.1:.2000...B..I.3.I
.6. .1,.17);:.4037...C.X.RK(J,I):M.8:N.0
:.2000.R.D.X.RO(J,I).RK(J,I):M.9:N.2:.20
00...E.. IFJ=1THENX=P(I)*100:M=7:N=1:G
OSUB2000.@.F..(J.2).(RO(1,I)..0).X.(RO(2
,I).RO(1,I).1).100:M.7:N.1:.2000.`.G..J.
1. .1,C$,NA$(I);KO$(2);:...H..J.1. X.RO(
1,I).(P(I).1):M.12:N.2:.2000:.1,.24);...
I..J..2. X.P(I).100:M.7:N.1:.2000.I.J..J
:.1,C$:.I.. K..1,C$;C$,"VEGE";C$,"C.VLAA
NDEREN";C$,"MEIDOORNLAAN 1".! L..1,,"NED
ERHORST DEN BERG".< M..I.1.17:.1,:.I: 1:
.1,3.B N...` ... UITPRINTEN JAARGEGEVENS
.L .. 1:.1,4.. ...II.1.7:.J.1.2:OT(J).0:
KT(J).0:.J.D ...1,G(14);.5);"JAAROVERZIC
HT";JN;NA$(II);G(15).. ...1,C$,.13);JO;.
6);JN;.2);JO;.2);JN;.3);JO;.3);JN.D!...1
,,"WEEK : OMZET OMZET KLANTE
N KLANTEN GEM.BES. GEM.BES.".C!...1,,:.I
.1.70:.1,".";:.:.1,.O!...W.1.NW..!...1,,
I(SP$.D(W),4);" :";..!...II.3.II.6.5030.
.!..L.II:.II.3.L.L.1:.II.7.L.L.1..! .M.1
2:N.2:.J.1.2:X.OZ(J,L,W):.2000:OT(J).OT(
J).X:.J.."..M.8:N.0:.J.1.2:X.KL%(J,L,W):
.2000:KT(J).KT(J).X:.J.K"..M.9:N.2:.J.1.
2:X.0:.KL%(J,L,W)..0.X.OZ(J,L,W).KL%(J,L
,W).~"...2000:.J:.5050.."...II.6.5040.F"
...J.1.2:X.OZ(J,1,W).OZ(J,2,W):M.12:N.2:
.2000:.J:.5050..#...J.1.2:X.OZ(J,2,W).OZ
(J,3,W).OZ(J,4,W):M.12:N.2:.2000:.J..#..
.1,:.W./#...1,,;:.I.1.70:.1,".";:.:.1,:.
B#...1,,"TOT. :";:M.12:N.2:.J.1.2:X.OT(J
):.2000:.J.V#...II.3.II.6.5057..#..M.8:N
.0:.J.1.2:X.KT(J):.2000:.J.I#..M.9:N.2:.
J.1.2:X.0:.KT(J)..0.X.OT(J).KT(J).V#...2
000:.J..$A..1,C$,C$,"VEGE C.VLAANDEREN"
;C$,"MEIDOORNLAAN 1".*$B..1,,"NEDERHORST
DEN BERG".B$C..I.1.66.NW.11:.1,:..R$D..
II: 1:.1,3.X$N....$(#." TOTAAL","
SLAGER"," EX.SLAGER"," A.G.F."," BO
UTIEK"..$)#." TOT. VERS"," K.W."..$
*#." OUD"," VERW."," NIEUW"...........
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
......................................
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL