STOCK-CONT/CBM
FILE INFORMATION
FILENAME(S): STOCK-CONT/CBM
FILE TYPE(S): PRG
FILE SIZE: 11.2K
FIRST SEEN: 2025-11-30 21:23:21
APPEARS ON: 1 disk(s)
FILE HASH
df8a268b45de04d491f7d1ef200edea0b42e179f92efac785ac64d1602daeafc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 12 2 | STOCK-CONT/CBM | PRG | DuncanTwain | 26 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 00 00 8F 20 20 41 43 54 20 50 45 54 |....... ACT PET|
00000010: 53 4F 46 54 20 28 43 29 31 39 37 39 00 3B 08 01 |SOFT (C)1979.;..|
00000020: 00 8F 20 20 52 45 50 52 4F 44 55 43 54 49 4F 4E |.. REPRODUCTION|
00000030: 20 50 52 4F 48 49 42 49 54 45 44 00 46 08 02 00 | PROHIBITED.F...|
00000040: 8D 32 30 30 30 30 00 7E 08 E6 00 86 55 37 28 32 |.20000.~....U7(2|
00000050: 30 30 29 2C 55 38 28 32 30 30 29 2C 55 4E 28 32 |00),U8(200),UN(2|
00000060: 30 30 29 2C 55 34 28 32 30 30 29 2C 56 41 28 32 |00),U4(200),VA(2|
00000070: 30 30 29 3A 44 46 24 B2 22 30 30 30 30 22 00 B5 |00):DF$."0000"..|
00000080: 08 F0 00 86 55 31 24 28 32 30 30 29 2C 55 36 28 |....U1$(200),U6(|
00000090: 32 30 30 29 2C 55 32 28 32 30 30 29 2C 55 34 24 |200),U2(200),U4$|
000000A0: 28 32 30 30 29 2C 55 35 28 32 30 30 29 2C 4D 39 |(200),U5(200),M9|
000000B0: 28 32 30 30 29 00 DB 08 FA 00 81 58 B2 31 A4 32 |(200)......X.1.2|
000000C0: 30 30 3A 55 31 24 28 58 29 B2 22 20 22 3A 55 34 |00:U1$(X)." ":U4|
000000D0: 24 28 58 29 B2 22 20 22 3A 82 58 00 1B 09 FC 00 |$(X)." ":.X.....|
000000E0: 81 58 B2 31 A4 32 30 30 3A 55 32 28 58 29 B2 30 |.X.1.200:U2(X).0|
000000F0: 3A 55 34 28 58 29 B2 30 3A 55 35 28 58 29 B2 30 |:U4(X).0:U5(X).0|
00000100: 3A 55 36 28 58 29 B2 30 3A 55 37 28 58 29 B2 30 |:U6(X).0:U7(X).0|
00000110: 3A 55 38 28 58 29 B2 30 3A 82 58 00 43 09 02 01 |:U8(X).0:.X.C...|
00000120: 81 58 B2 31 A4 32 30 30 3A 55 4E 28 58 29 B2 30 |.X.1.200:UN(X).0|
00000130: 3A 4D 39 28 58 29 B2 30 3A 56 41 28 58 29 B2 30 |:M9(X).0:VA(X).0|
00000140: 3A 82 58 00 62 09 18 01 99 C7 28 31 34 37 29 3A |:.X.b.....(147):|
00000150: 99 3A 99 3A 99 3A 99 A3 31 39 29 22 B9 B9 B9 B9 |.:.:.:..19)"....|
00000160: B9 B9 00 75 09 1D 01 99 3A 99 A3 31 39 29 22 B8 |...u....:..19)".|
00000170: B8 B8 B8 B8 B8 00 9A 09 22 01 99 C7 28 31 39 29 |........"...(19)|
00000180: 3A 99 3A 99 3A 99 3A 99 3A 99 A3 37 29 22 44 41 |:.:.:.:.:..7)"DA|
00000190: 54 45 22 3B C7 28 31 34 35 29 00 B7 09 2C 01 4D |TE";.(145)...,.M|
000001A0: 4C B2 36 3A 53 50 B2 31 39 3A 8D 34 31 39 30 3A |L.6:SP.19:.4190:|
000001B0: 44 41 24 B2 49 4E 24 00 CA 09 36 01 8B C3 28 44 |DA$.IN$...6...(D|
000001C0: 41 24 29 B3 B1 36 A7 32 39 30 00 E2 09 40 01 8B |A$)..6.290...@..|
000001D0: C5 28 C8 28 44 41 24 2C 32 29 29 B1 33 31 A7 32 |.(.(DA$,2)).31.2|
000001E0: 39 30 00 FC 09 4A 01 8B C5 28 CA 28 44 41 24 2C |90...J...(.(DA$,|
000001F0: 33 2C 32 29 29 B1 31 32 A7 32 39 30 00 14 0A 54 |3,2)).12.290...T|
00000200: 01 8B C5 28 C9 28 44 41 24 2C 32 29 29 B3 37 39 |...(.(DA$,2)).79|
00000210: A7 32 39 30 00 2B 0A 59 01 44 41 24 B2 22 44 41 |.290.+.Y.DA$."DA|
00000220: 54 45 20 20 3A 20 22 AA 44 41 24 00 3D 0A 5E 01 |TE : ".DA$.=.^.|
00000230: 99 C7 28 31 34 37 29 3A 44 52 B2 33 35 00 60 0A |..(147):DR.35.`.|
00000240: 68 01 99 22 20 20 20 20 20 20 20 50 52 4F 44 55 |h.." PRODU|
00000250: 43 54 20 47 52 4F 55 50 20 3A 20 22 3B 44 46 24 |CT GROUP : ";DF$|
00000260: 00 93 0A 6D 01 99 3A 99 3A 99 22 A6 A6 A6 A6 A6 |...m..:.:.".....|
00000270: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000280: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000290: A6 A6 22 00 A5 0A 72 01 8D 32 35 30 30 30 3A 8D |.."...r..25000:.|
000002A0: 32 35 30 30 30 00 E0 0A 7C 01 99 22 A6 20 12 31 |25000...|..". .1|
000002B0: 92 22 A3 35 29 22 49 54 45 4D 20 43 52 45 41 54 |.".5)"ITEM CREAT|
000002C0: 45 22 A3 32 30 29 22 12 32 92 22 A3 32 33 29 22 |E".20)".2.".23)"|
000002D0: 49 54 45 4D 20 43 48 41 4E 47 45 20 20 20 20 A6 |ITEM CHANGE .|
000002E0: 00 EB 0A 81 01 8D 32 35 30 30 30 00 28 0B 86 01 |......25000.(...|
000002F0: 99 22 A6 20 12 33 92 22 A3 35 29 22 53 54 4F 43 |.". .3.".5)"STOC|
00000300: 4B 20 49 4E 51 55 49 52 59 22 A3 32 30 29 22 12 |K INQUIRY".20)".|
00000310: 34 92 22 A3 32 33 29 22 53 54 4F 43 4B 20 50 4F |4.".23)"STOCK PO|
00000320: 53 54 49 4E 47 20 A0 A6 00 33 0B 8B 01 8D 32 35 |STING ...3....25|
00000330: 30 30 30 00 6F 0B 90 01 99 22 A6 20 12 35 92 22 |000.o....". .5."|
00000340: A3 35 29 22 52 45 4F 52 44 45 52 20 4C 49 53 54 |.5)"REORDER LIST|
00000350: 22 A3 32 30 29 22 12 36 92 22 A3 32 33 29 22 53 |".20)".6.".23)"S|
00000360: 54 4F 43 4B 20 52 45 50 4F 52 54 20 20 20 A6 00 |TOCK REPORT ..|
00000370: 7A 0B 95 01 8D 32 35 30 30 30 00 B8 0B 9A 01 99 |z....25000......|
00000380: 22 A6 20 12 37 92 22 A3 35 29 22 52 45 41 44 20 |". .7.".5)"READ |
00000390: 46 52 4F 4D 20 44 49 53 4B 22 A3 32 30 29 22 12 |FROM DISK".20)".|
000003A0: 38 92 22 A3 32 33 29 22 53 54 4F 52 45 20 54 4F |8.".23)"STORE TO|
000003B0: 20 44 49 53 4B 20 20 A6 00 C3 0B 9F 01 8D 32 35 | DISK .......25|
000003C0: 30 30 30 00 ED 0B A4 01 99 22 A6 22 A3 39 29 22 |000......".".9)"|
000003D0: 12 39 92 20 20 20 52 45 54 55 52 4E 20 54 4F 20 |.9. RETURN TO |
000003E0: 42 41 53 49 43 22 A3 33 38 29 22 A6 22 00 F8 0B |BASIC".38)"."...|
000003F0: A9 01 8D 32 35 30 30 30 00 03 0C AA 01 8D 32 35 |...25000......25|
00000400: 30 30 30 00 31 0C AC 01 99 22 A6 A6 A6 A6 A6 A6 |000.1...."......|
00000410: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000420: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000430: A6 00 46 0C CC 01 A1 41 24 3A 8B 41 24 B2 22 37 |..F....A$:.A$."7|
00000440: 22 A7 33 31 35 30 00 68 0C D6 01 8B 41 24 B2 22 |".3150.h....A$."|
00000450: 33 22 A7 44 52 B2 33 35 3A 8D 35 39 30 3A 8D 31 |3".DR.35:.590:.1|
00000460: 33 36 30 3A 89 33 35 30 00 81 0C E0 01 8B 41 24 |360:.350......A$|
00000470: B2 22 39 22 A7 99 C7 28 31 34 37 29 3A 89 35 37 |."9"...(147):.57|
00000480: 30 00 A1 0C EA 01 8B 41 24 B2 22 31 22 A7 44 52 |0......A$."1".DR|
00000490: B2 30 3A 8D 35 39 30 3A 89 36 37 30 3A 89 33 35 |.0:.590:.670:.35|
000004A0: 30 00 B8 0C F4 01 8B 41 24 B2 22 35 22 A7 8D 32 |0......A$."5"..2|
000004B0: 36 31 30 3A 89 33 35 30 00 C9 0C FE 01 8B 41 24 |610:.350......A$|
000004C0: B2 22 36 22 A7 33 35 30 30 00 E0 0C 12 02 8B 41 |."6".3500......A|
000004D0: 24 B2 22 38 22 A7 8D 32 38 34 30 3A 89 33 35 30 |$."8"..2840:.350|
000004E0: 00 09 0D 1C 02 8B 41 24 B2 22 34 22 A7 44 52 B2 |......A$."4".DR.|
000004F0: 33 35 3A 8D 35 39 30 3A 8D 31 35 35 30 3A 8D 32 |35:.590:.1550:.2|
00000500: 30 33 30 3A 8D 32 35 39 30 00 25 0D 26 02 8B 41 |030:.2590.%.&..A|
00000510: 24 B2 22 32 22 A7 44 52 B2 39 39 3A 8D 35 39 30 |$."2".DR.99:.590|
00000520: 3A 89 36 37 30 00 2E 0D 30 02 89 34 36 30 00 5C |:.670...0..460.\|
00000530: 0D 3A 02 99 22 54 4F 20 52 45 54 55 52 4E 20 54 |.:.."TO RETURN T|
00000540: 4F 20 50 52 4F 47 2E 20 57 49 54 48 4F 55 54 20 |O PROG. WITHOUT |
00000550: 4C 4F 4F 53 49 4E 47 20 44 41 54 41 00 85 0D 44 |LOOSING DATA...D|
00000560: 02 99 22 54 59 50 45 20 27 47 4F 54 4F 33 35 30 |.."TYPE 'GOTO350|
00000570: 27 20 46 4F 4C 4C 4F 57 45 44 20 42 59 20 52 45 |' FOLLOWED BY RE|
00000580: 54 55 52 4E 2E 00 92 0D 46 02 8D 32 30 30 31 30 |TURN....F..20010|
00000590: 3A 80 00 B4 0D 4E 02 99 3A 99 3A 99 22 50 52 4F |:....N..:.:."PRO|
000005A0: 44 55 43 54 20 43 4F 44 45 20 4E 4F 22 3B C7 28 |DUCT CODE NO";.(|
000005B0: 31 34 35 29 00 D2 0D 58 02 53 50 B2 32 30 3A 4D |145)...X.SP.20:M|
000005C0: 4C B2 33 3A 8D 34 31 39 30 3A 58 B2 C5 28 49 4E |L.3:.4190:X..(IN|
000005D0: 24 29 00 F7 0D 62 02 8B 58 B1 32 30 30 B0 58 B3 |$)...b..X.200.X.|
000005E0: 31 A7 99 22 9D 9D 9D 20 20 20 22 3B C7 28 31 34 |1.."... ";.(14|
000005F0: 35 29 3A 89 36 30 30 00 05 0E 6C 02 8B 44 52 B2 |5):.600...l..DR.|
00000600: 30 A7 36 34 30 00 0B 0E 76 02 8E 00 3C 0E 80 02 |0.640...v...<...|
00000610: 8B 55 32 28 58 29 B1 30 B0 55 36 28 58 29 B1 30 |.U2(X).0.U6(X).0|
00000620: B0 55 37 28 58 29 B1 30 B0 4D 39 28 58 29 B1 30 |.U7(X).0.M9(X).0|
00000630: B0 55 38 28 58 29 B1 30 A7 36 36 30 00 58 0E 85 |.U8(X).0.660.X..|
00000640: 02 8B 55 31 24 28 58 29 B2 22 22 B0 55 31 24 28 |..U1$(X)."".U1$(|
00000650: 58 29 B2 22 20 22 A7 8E 00 5E 0E 8A 02 8E 00 79 |X)." "...^.....y|
00000660: 0E 94 02 99 3A 99 22 20 20 20 20 20 20 46 55 4C |....:." FUL|
00000670: 4C 91 91 22 3A 89 36 30 30 00 85 0E 9E 02 99 C7 |L..":.600.......|
00000680: 28 31 34 37 29 00 B0 0E A8 02 99 C7 28 31 34 35 |(147).......(145|
00000690: 29 22 20 20 12 20 20 43 4F 44 45 20 20 20 20 20 |)" . CODE |
000006A0: 20 20 20 20 92 22 A3 32 30 29 3B 44 46 24 3B 58 | .".20);DF$;X|
000006B0: 00 CA 0E B2 02 99 22 31 20 12 20 44 45 53 43 52 |......"1 . DESCR|
000006C0: 49 50 54 49 4F 4E 20 20 20 92 00 E9 0E BC 02 8B |IPTION .......|
000006D0: 44 52 B2 39 39 A7 99 C7 28 31 34 35 29 3B A3 32 |DR.99...(145);.2|
000006E0: 31 29 3B 55 31 24 28 58 29 00 05 0F C6 02 99 3A |1);U1$(X)......:|
000006F0: 99 22 32 20 12 20 49 4E 20 53 54 4F 43 4B 20 20 |."2 . IN STOCK |
00000700: 20 20 20 20 92 00 23 0F D0 02 8B 44 52 B2 39 39 | ..#....DR.99|
00000710: A7 99 C7 28 31 34 35 29 3B A3 32 30 29 3B 55 32 |...(145);.20);U2|
00000720: 28 58 29 00 3F 0F DA 02 99 3A 99 22 33 20 12 20 |(X).?....:."3 . |
00000730: 4F 4E 20 4F 52 44 45 52 20 20 20 20 20 20 92 00 |ON ORDER ..|
00000740: 5D 0F E4 02 8B 44 52 B2 39 39 A7 99 C7 28 31 34 |]....DR.99...(14|
00000750: 35 29 3B A3 32 30 29 3B 55 36 28 58 29 00 79 0F |5);.20);U6(X).y.|
00000760: EE 02 99 3A 99 22 34 20 12 20 4D 49 4E 2E 4C 45 |...:."4 . MIN.LE|
00000770: 56 45 4C 20 20 20 20 20 92 00 97 0F F8 02 8B 44 |VEL .......D|
00000780: 52 B2 39 39 A7 99 C7 28 31 34 35 29 3B A3 32 30 |R.99...(145);.20|
00000790: 29 3B 55 37 28 58 29 00 B3 0F 02 03 99 3A 99 22 |);U7(X)......:."|
000007A0: 35 20 12 20 4D 41 58 2E 4C 45 56 45 4C 20 20 20 |5 . MAX.LEVEL |
000007B0: 20 20 92 00 D1 0F 0C 03 8B 44 52 B2 39 39 A7 99 | .......DR.99..|
000007C0: C7 28 31 34 35 29 3B A3 32 30 29 3B 4D 39 28 58 |.(145);.20);M9(X|
000007D0: 29 00 ED 0F 16 03 99 3A 99 22 36 20 12 20 41 4C |)......:."6 . AL|
000007E0: 4C 4F 43 41 54 45 44 20 20 20 20 20 92 00 0B 10 |LOCATED ....|
000007F0: 20 03 8B 44 52 B2 39 39 A7 99 C7 28 31 34 35 29 | ..DR.99...(145)|
00000800: 3B A3 32 30 29 3B 55 38 28 58 29 00 27 10 2A 03 |;.20);U8(X).'.*.|
00000810: 99 3A 99 22 37 20 12 20 55 4E 49 54 20 4F 46 20 |.:."7 . UNIT OF |
00000820: 51 4E 54 59 20 20 92 00 45 10 34 03 8B 44 52 B2 |QNTY ..E.4..DR.|
00000830: 39 39 A7 99 C7 28 31 34 35 29 3B A3 32 30 29 3B |99...(145);.20);|
00000840: 55 4E 28 58 29 00 61 10 3E 03 99 3A 99 22 38 20 |UN(X).a.>..:."8 |
00000850: 12 20 56 41 54 20 28 25 29 20 20 20 20 20 20 20 |. VAT (%) |
00000860: 92 00 7F 10 48 03 8B 44 52 B2 39 39 A7 99 C7 28 |....H..DR.99...(|
00000870: 31 34 35 29 3B A3 32 30 29 3B 56 41 28 58 29 00 |145);.20);VA(X).|
00000880: 9B 10 52 03 99 3A 99 22 39 20 12 20 50 55 52 43 |..R..:."9 . PURC|
00000890: 48 2E 43 4F 53 54 20 20 20 20 92 00 B9 10 5C 03 |H.COST ....\.|
000008A0: 8B 44 52 B2 39 39 A7 99 C7 28 31 34 35 29 3B A3 |.DR.99...(145);.|
000008B0: 32 30 29 3B 55 35 28 58 29 00 D5 10 66 03 99 3A |20);U5(X)...f..:|
000008C0: 99 22 41 20 12 20 53 41 4C 45 20 43 4F 53 54 20 |."A . SALE COST |
000008D0: 20 20 20 20 92 00 F3 10 70 03 8B 44 52 B2 39 39 | ....p..DR.99|
000008E0: A7 99 C7 28 31 34 35 29 3B A3 32 30 29 3B 55 34 |...(145);.20);U4|
000008F0: 28 58 29 00 0F 11 7A 03 99 3A 99 22 42 20 12 20 |(X)...z..:."B . |
00000900: 53 55 50 50 4C 49 45 52 20 20 20 20 20 20 92 00 |SUPPLIER ..|
00000910: 34 11 84 03 8B 44 52 B2 39 39 A7 99 C7 28 31 34 |4....DR.99...(14|
00000920: 35 29 3B A3 32 31 29 3B 55 34 24 28 58 29 3A 89 |5);.21);U4$(X):.|
00000930: 31 31 38 30 00 48 11 8E 03 8B 44 52 B2 30 A7 50 |1180.H....DR.0.P|
00000940: 52 B2 31 3A 89 39 33 30 00 51 11 98 03 89 33 35 |R.1:.930.Q....35|
00000950: 30 00 79 11 A2 03 99 C7 28 31 39 29 3A 53 50 B2 |0.y.....(19):SP.|
00000960: 32 31 3A 4D 4C B2 31 36 3A 8D 34 31 39 30 3A 55 |21:ML.16:.4190:U|
00000970: 31 24 28 58 29 B2 49 4E 24 00 8E 11 AC 03 8B C3 |1$(X).IN$.......|
00000980: 28 55 31 24 28 58 29 29 B3 32 A7 39 33 30 00 9D |(U1$(X)).2.930..|
00000990: 11 B6 03 8B 50 52 B2 35 A7 31 31 38 30 00 B3 11 |....PR.5.1180...|
000009A0: C0 03 99 C7 28 31 39 29 3A 81 41 B2 31 A4 32 3A |....(19):.A.1.2:|
000009B0: 99 3A 82 00 E0 11 CA 03 53 50 B2 32 31 3A 4D 4C |.:......SP.21:ML|
000009C0: B2 37 3A 8D 34 31 39 30 3A 55 32 28 58 29 B2 C5 |.7:.4190:U2(X)..|
000009D0: 28 49 4E 24 29 3A 8B 50 52 B2 35 A7 31 31 38 30 |(IN$):.PR.5.1180|
000009E0: 00 F7 11 D4 03 99 C7 28 31 39 29 3A 81 41 B2 31 |.......(19):.A.1|
000009F0: A4 34 3A 99 3A 82 41 00 24 12 DE 03 53 50 B2 32 |.4:.:.A.$...SP.2|
00000A00: 31 3A 4D 4C B2 37 3A 8D 34 31 39 30 3A 55 36 28 |1:ML.7:.4190:U6(|
00000A10: 58 29 B2 C5 28 49 4E 24 29 3A 8B 50 52 B2 35 A7 |X)..(IN$):.PR.5.|
00000A20: 31 31 38 30 00 3C 12 E8 03 99 C7 28 31 39 29 3A |1180.<.....(19):|
00000A30: 81 41 B2 31 A4 36 20 3A 99 3A 82 41 00 69 12 F2 |.A.1.6 :.:.A.i..|
00000A40: 03 53 50 B2 32 31 3A 4D 4C B2 37 3A 8D 34 31 39 |.SP.21:ML.7:.419|
00000A50: 30 3A 55 37 28 58 29 B2 C5 28 49 4E 24 29 3A 8B |0:U7(X)..(IN$):.|
00000A60: 50 52 B2 35 A7 31 31 38 30 00 80 12 FC 03 99 C7 |PR.5.1180.......|
00000A70: 28 31 39 29 3A 81 41 B2 31 A4 38 3A 99 3A 82 41 |(19):.A.1.8:.:.A|
00000A80: 00 A7 12 06 04 4D 4C B2 37 3A 8D 34 31 39 30 3A |.....ML.7:.4190:|
00000A90: 4D 39 28 58 29 B2 C5 28 49 4E 24 29 3A 8B 50 52 |M9(X)..(IN$):.PR|
00000AA0: B2 35 A7 31 31 38 30 00 BF 12 10 04 99 C7 28 31 |.5.1180.......(1|
00000AB0: 39 29 3A 81 41 B2 31 A4 31 30 3A 99 3A 82 41 00 |9):.A.1.10:.:.A.|
00000AC0: DB 12 1A 04 4D 4C B2 37 3A 8D 34 31 39 30 3A 55 |....ML.7:.4190:U|
00000AD0: 38 28 58 29 B2 C5 28 49 4E 24 29 00 F1 12 24 04 |8(X)..(IN$)...$.|
00000AE0: 8B 55 38 28 58 29 B1 55 32 28 58 29 A7 31 30 34 |.U8(X).U2(X).104|
00000AF0: 30 00 00 13 2E 04 8B 50 52 B2 35 A7 31 31 38 30 |0......PR.5.1180|
00000B00: 00 18 13 38 04 99 C7 28 31 39 29 3A 81 41 B2 31 |...8...(19):.A.1|
00000B10: A4 31 32 3A 99 3A 82 41 00 3F 13 42 04 4D 4C B2 |.12:.:.A.?.B.ML.|
00000B20: 33 3A 8D 34 31 39 30 3A 55 4E 28 58 29 B2 C5 28 |3:.4190:UN(X)..(|
00000B30: 49 4E 24 29 3A 8B 50 52 B2 35 A7 31 31 38 30 00 |IN$):.PR.5.1180.|
00000B40: 57 13 4C 04 99 C7 28 31 39 29 3A 81 41 B2 31 A4 |W.L...(19):.A.1.|
00000B50: 31 34 3A 99 3A 82 41 00 7E 13 56 04 4D 4C B2 32 |14:.:.A.~.V.ML.2|
00000B60: 3A 8D 34 31 39 30 3A 56 41 28 58 29 B2 C5 28 49 |:.4190:VA(X)..(I|
00000B70: 4E 24 29 3A 8B 50 52 B2 35 A7 31 31 38 30 00 96 |N$):.PR.5.1180..|
00000B80: 13 60 04 99 C7 28 31 39 29 3A 81 41 B2 31 A4 31 |.`...(19):.A.1.1|
00000B90: 36 3A 99 3A 82 41 00 BD 13 6A 04 4D 4C B2 37 3A |6:.:.A...j.ML.7:|
00000BA0: 8D 34 31 39 30 3A 55 35 28 58 29 B2 C5 28 49 4E |.4190:U5(X)..(IN|
00000BB0: 24 29 3A 8B 50 52 B2 35 A7 31 31 38 30 00 D5 13 |$):.PR.5.1180...|
00000BC0: 74 04 99 C7 28 31 39 29 3A 81 41 B2 31 A4 31 38 |t...(19):.A.1.18|
00000BD0: 3A 99 3A 82 41 00 FC 13 7E 04 4D 4C B2 37 3A 8D |:.:.A...~.ML.7:.|
00000BE0: 34 31 39 30 3A 55 34 28 58 29 B2 C5 28 49 4E 24 |4190:U4(X)..(IN$|
00000BF0: 29 3A 8B 50 52 B2 35 A7 31 31 38 30 00 14 14 88 |):.PR.5.1180....|
00000C00: 04 99 C7 28 31 39 29 3A 81 41 B2 31 A4 32 30 3A |...(19):.A.1.20:|
00000C10: 99 3A 82 41 00 2F 14 92 04 4D 4C B2 31 36 3A 8D |.:.A./...ML.16:.|
00000C20: 34 31 39 30 3A 55 34 24 28 58 29 B2 49 4E 24 00 |4190:U4$(X).IN$.|
00000C30: 40 14 9C 04 99 C7 28 31 39 29 3A 53 50 B2 32 31 |@.....(19):SP.21|
00000C40: 00 7B 14 A6 04 81 41 B2 31 A4 32 32 3A 99 3A 82 |.{....A.1.22:.:.|
00000C50: 41 3A 99 22 50 52 45 53 53 20 12 4D 92 20 46 4F |A:."PRESS .M. FO|
00000C60: 52 20 4D 45 4E 55 20 41 4E 44 20 54 48 45 20 4E |R MENU AND THE N|
00000C70: 4F 2E 54 4F 20 43 48 41 4E 47 45 00 94 14 B0 04 |O.TO CHANGE.....|
00000C80: 50 52 B2 35 3A A1 41 24 3A 8B 41 24 B2 22 22 A7 |PR.5:.A$:.A$."".|
00000C90: 31 32 30 30 00 AA 14 BA 04 8B 41 24 B2 22 4D 22 |1200......A$."M"|
00000CA0: A7 50 52 B2 32 3A 89 33 35 30 00 BA 14 C4 04 8B |.PR.2:.350......|
00000CB0: 41 24 B2 22 31 22 A7 39 33 30 00 CA 14 CE 04 8B |A$."1".930......|
00000CC0: 41 24 B2 22 32 22 A7 39 36 30 00 DA 14 D8 04 8B |A$."2".960......|
00000CD0: 41 24 B2 22 33 22 A7 39 38 30 00 EB 14 E2 04 8B |A$."3".980......|
00000CE0: 41 24 B2 22 34 22 A7 31 30 30 30 00 FC 14 EC 04 |A$."4".1000.....|
00000CF0: 8B 41 24 B2 22 35 22 A7 31 30 32 30 00 0D 15 F6 |.A$."5".1020....|
00000D00: 04 8B 41 24 B2 22 36 22 A7 31 30 34 30 00 1E 15 |..A$."6".1040...|
00000D10: 00 05 8B 41 24 B2 22 37 22 A7 31 30 38 30 00 2F |...A$."7".1080./|
00000D20: 15 0A 05 8B 41 24 B2 22 38 22 A7 31 31 30 30 00 |....A$."8".1100.|
00000D30: 40 15 14 05 8B 41 24 B2 22 39 22 A7 31 31 32 30 |@....A$."9".1120|
00000D40: 00 51 15 1E 05 8B 41 24 B2 22 41 22 A7 31 31 34 |.Q....A$."A".114|
00000D50: 30 00 62 15 28 05 8B 41 24 B2 22 42 22 A7 31 31 |0.b.(..A$."B".11|
00000D60: 36 30 00 6C 15 32 05 89 31 31 38 30 00 72 15 3C |60.l.2..1180.r.<|
00000D70: 05 99 00 9C 15 46 05 81 48 B2 31 A4 33 32 3A 99 |.....F..H.1.32:.|
00000D80: C7 28 31 34 35 29 3B A3 48 29 22 20 22 3A 82 48 |.(145);.H)" ":.H|
00000D90: 3A 99 22 91 91 22 3A 89 31 31 38 30 00 AE 15 50 |:."..":.1180...P|
00000DA0: 05 99 C7 28 31 34 37 29 3A 8D 31 35 34 30 00 D7 |...(147):.1540..|
00000DB0: 15 5A 05 99 22 12 20 20 50 52 4F 44 55 43 54 20 |.Z..". PRODUCT |
00000DC0: 43 4F 44 45 20 92 22 A3 31 35 29 3B 44 46 24 3B |CODE .".15);DF$;|
00000DD0: 58 3A 8D 31 35 34 30 00 01 16 64 05 99 22 12 20 |X:.1540...d..". |
00000DE0: 20 44 45 53 43 52 49 50 54 49 4F 4E 20 20 92 22 | DESCRIPTION ."|
00000DF0: A3 31 36 29 3B 55 31 24 28 58 29 3A 8D 31 35 34 |.16);U1$(X):.154|
00000E00: 30 00 2A 16 6E 05 99 22 12 20 20 49 4E 20 53 54 |0.*.n..". IN ST|
00000E10: 4F 43 4B 20 20 20 20 20 92 22 A3 31 36 29 3B 55 |OCK .".16);U|
00000E20: 32 28 58 29 3A 8D 31 35 34 30 00 53 16 78 05 99 |2(X):.1540.S.x..|
00000E30: 22 12 20 20 4F 4E 20 4F 52 44 45 52 20 20 20 20 |". ON ORDER |
00000E40: 20 92 22 A3 31 36 29 3B 55 36 28 58 29 3A 8D 31 | .".16);U6(X):.1|
00000E50: 35 34 30 00 7D 16 82 05 99 22 12 20 20 53 55 50 |540.}....". SUP|
00000E60: 50 4C 49 45 52 20 20 20 20 20 92 22 A3 31 36 29 |PLIER .".16)|
00000E70: 3B 55 34 24 28 58 29 3A 8D 31 35 34 30 00 A6 16 |;U4$(X):.1540...|
00000E80: 8C 05 99 22 12 20 20 41 4C 4C 4F 43 41 54 45 44 |...". ALLOCATED|
00000E90: 20 20 20 20 92 22 A3 31 36 29 3B 55 38 28 58 29 | .".16);U8(X)|
00000EA0: 3A 8D 31 35 34 30 00 DB 16 96 05 99 22 12 20 20 |:.1540......". |
00000EB0: 46 52 45 45 53 54 4F 43 4B 20 20 20 20 92 22 A3 |FREESTOCK .".|
00000EC0: 31 36 29 3B 55 32 28 58 29 AB 55 38 28 58 29 AA |16);U2(X).U8(X).|
00000ED0: 55 36 28 58 29 3A 8D 31 35 34 30 00 0D 17 A0 05 |U6(X):.1540.....|
00000EE0: 99 22 12 20 20 4D 49 4E 2E 4C 45 56 45 4C 20 20 |.". MIN.LEVEL |
00000EF0: 92 22 3B 55 37 28 58 29 3B A3 32 30 29 22 12 20 |.";U7(X);.20)". |
00000F00: 4D 41 58 2E 20 92 22 3B 4D 39 28 58 29 00 17 17 |MAX. .";M9(X)...|
00000F10: AA 05 8D 31 35 34 30 00 4E 17 B4 05 99 22 12 20 |...1540.N....". |
00000F20: 20 55 4E 49 54 20 4F 46 20 51 4E 54 59 20 92 22 | UNIT OF QNTY ."|
00000F30: A3 31 34 29 3B 55 4E 28 58 29 3B A3 32 33 29 22 |.14);UN(X);.23)"|
00000F40: 12 20 56 41 54 20 92 22 3B 56 41 28 58 29 00 58 |. VAT .";VA(X).X|
00000F50: 17 BE 05 8D 31 35 34 30 00 8C 17 C8 05 99 22 12 |....1540......".|
00000F60: 20 20 53 41 4C 45 20 92 22 A3 37 29 3B 55 34 28 | SALE .".7);U4(|
00000F70: 58 29 3B A3 31 35 29 22 92 54 4F 54 41 4C 92 22 |X);.15)".TOTAL."|
00000F80: 3B 55 32 28 58 29 AC 55 34 28 58 29 00 96 17 D2 |;U2(X).U4(X)....|
00000F90: 05 8D 31 35 34 30 00 CA 17 DC 05 99 22 12 20 20 |..1540......". |
00000FA0: 50 55 52 43 48 92 22 A3 37 29 3B 55 35 28 58 29 |PURCH.".7);U5(X)|
00000FB0: 3B A3 31 35 29 22 12 54 4F 54 41 4C 92 22 3B 55 |;.15)".TOTAL.";U|
00000FC0: 32 28 58 29 AC 55 35 28 58 29 00 D4 17 E6 05 8D |2(X).U5(X)......|
00000FD0: 31 35 34 30 00 E8 17 F0 05 A1 41 24 3A 8B 41 24 |1540......A$:.A$|
00000FE0: B2 22 22 A7 31 35 32 30 00 EE 17 FA 05 8E 00 20 |."".1520....... |
00000FF0: 18 04 06 99 22 12 20 20 20 20 20 20 20 20 20 20 |....". |
00001000: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001010: 20 20 20 20 20 20 20 20 20 20 20 20 92 22 3A 8E | .":.|
00001020: 00 3D 18 0E 06 99 C7 28 31 34 37 29 3A 81 41 B2 |.=.....(147):.A.|
00001030: 31 A4 38 3A 99 3A 82 3A 89 31 35 37 30 00 53 18 |1.8:.:.:.1570.S.|
00001040: 18 06 99 C7 28 31 39 29 3A 81 41 B2 31 A4 38 3A |....(19):.A.1.8:|
00001050: 99 3A 82 00 5D 18 22 06 8D 31 35 34 30 00 80 18 |.:..]."..1540...|
00001060: 2C 06 99 22 12 20 50 52 4F 44 55 43 54 20 43 4F |,..". PRODUCT CO|
00001070: 44 45 20 20 92 22 A3 32 30 29 3B 44 46 24 3B 58 |DE .".20);DF$;X|
00001080: 00 8A 18 36 06 8D 31 35 34 30 00 AE 18 40 06 99 |...6..1540...@..|
00001090: 22 12 20 44 45 53 43 52 49 50 54 49 4F 4E 20 20 |". DESCRIPTION |
000010A0: 20 92 22 A3 32 31 29 3B 55 31 24 28 58 29 00 B8 | .".21);U1$(X)..|
000010B0: 18 4A 06 8D 31 35 34 30 00 D5 18 54 06 99 A3 32 |.J..1540...T...2|
000010C0: 30 29 22 20 20 20 20 20 20 20 20 20 20 22 3B C7 |0)" ";.|
000010D0: 28 31 34 35 29 00 F8 18 5E 06 99 22 12 20 49 4E |(145)...^..". IN|
000010E0: 20 53 54 4F 43 4B 20 20 20 20 20 20 92 22 A3 32 | STOCK .".2|
000010F0: 30 29 3B 55 32 28 58 29 00 02 19 68 06 8D 31 35 |0);U2(X)...h..15|
00001100: 34 30 00 1F 19 72 06 99 A3 32 30 29 22 20 20 20 |40...r...20)" |
00001110: 20 20 20 20 20 20 20 22 3B C7 28 31 34 35 29 00 | ";.(145).|
00001120: 42 19 7C 06 99 22 12 20 4F 4E 20 4F 52 44 45 52 |B.|..". ON ORDER|
00001130: 20 20 20 20 20 20 92 22 A3 32 30 29 3B 55 36 28 | .".20);U6(|
00001140: 58 29 00 4C 19 86 06 8D 31 35 34 30 00 69 19 90 |X).L....1540.i..|
00001150: 06 99 A3 32 30 29 22 20 20 20 20 20 20 20 20 20 |...20)" |
00001160: 20 22 3B C7 28 31 34 35 29 00 8C 19 9A 06 99 22 | ";.(145)......"|
00001170: 12 20 41 4C 4C 4F 43 41 54 45 44 20 20 20 20 20 |. ALLOCATED |
00001180: 92 22 A3 32 30 29 3B 55 38 28 58 29 00 96 19 A4 |.".20);U8(X)....|
00001190: 06 8D 31 35 34 30 00 B9 19 AE 06 99 22 12 20 4D |..1540......". M|
000011A0: 49 4E 20 4C 45 56 45 4C 20 20 20 20 20 92 22 A3 |IN LEVEL .".|
000011B0: 32 30 29 3B 55 37 28 58 29 00 C3 19 B8 06 8D 31 |20);U7(X)......1|
000011C0: 35 34 30 00 E0 19 C2 06 99 A3 32 30 29 22 20 20 |540.......20)" |
000011D0: 20 20 20 20 20 20 20 20 22 3B C7 28 31 34 35 29 | ";.(145)|
000011E0: 00 0F 1A CC 06 99 22 12 20 46 52 45 45 53 54 4F |......". FREESTO|
000011F0: 43 4B 20 20 20 20 20 92 22 A3 32 30 29 3B 55 32 |CK .".20);U2|
00001200: 28 58 29 AB 55 38 28 58 29 AA 55 36 28 58 29 00 |(X).U8(X).U6(X).|
00001210: 19 1A D6 06 8D 31 35 34 30 00 28 1A E0 06 8B 50 |.....1540.(....P|
00001220: 57 B1 30 A7 31 38 30 30 00 32 1A EA 06 50 57 B2 |W.0.1800.2...PW.|
00001230: 39 39 00 70 1A F4 06 9F 34 2C 34 3A 98 34 3A 98 |99.p....4,4:.4:.|
00001240: 34 2C 22 20 20 20 20 20 20 20 20 20 20 20 20 53 |4," S|
00001250: 54 4F 43 4B 20 55 50 44 41 54 45 53 2E 20 20 20 |TOCK UPDATES. |
00001260: 20 20 20 20 20 20 20 20 20 20 20 22 3B 44 41 24 | ";DA$|
00001270: 00 80 1A FE 06 98 34 3A 98 34 3A 98 34 3A A0 34 |......4:.4:.4:.4|
00001280: 00 8B 1A 08 07 99 C7 28 31 39 29 00 BF 1A 12 07 |.......(19).....|
00001290: 99 22 20 20 12 49 92 53 53 55 45 53 20 20 12 52 |." .I.SSUES .R|
000012A0: 92 45 43 45 49 50 54 53 20 20 12 41 92 4C 4C 4F |.ECEIPTS .A.LLO|
000012B0: 43 41 54 49 4F 4E 53 20 20 12 4D 92 45 4E 55 00 |CATIONS .M.ENU.|
000012C0: E0 1A 1C 07 99 22 20 20 20 20 20 20 20 20 20 20 |....." |
000012D0: 20 20 20 12 43 92 48 41 4E 47 45 20 43 4F 44 45 | .C.HANGE CODE|
000012E0: 00 F5 1A 26 07 A1 41 24 3A 8B 41 24 B2 22 49 22 |...&..A$:.A$."I"|
000012F0: A7 32 30 33 30 00 06 1B 3A 07 8B 41 24 B2 22 52 |.2030...:..A$."R|
00001300: 22 A7 32 33 35 30 00 17 1B 44 07 8B 41 24 B2 22 |".2350...D..A$."|
00001310: 41 22 A7 31 39 34 30 00 28 1B 4E 07 8B 41 24 B2 |A".1940.(.N..A$.|
00001320: 22 43 22 A7 31 39 30 30 00 3E 1B 58 07 8B 41 24 |"C".1900.>.X..A$|
00001330: B2 22 4D 22 A7 50 57 B2 30 3A 89 33 35 30 00 48 |."M".PW.0:.350.H|
00001340: 1B 62 07 89 31 38 33 30 00 6D 1B 6C 07 99 22 13 |.b..1830.m.l..".|
00001350: 11 11 11 20 50 52 4F 44 55 43 54 20 43 4F 44 45 |... PRODUCT CODE|
00001360: 20 4E 4F 20 3F 22 3B C7 28 31 34 35 29 00 8B 1B | NO ?";.(145)...|
00001370: 76 07 53 50 B2 32 30 3A 4D 4C B2 33 3A 8D 34 31 |v.SP.20:ML.3:.41|
00001380: 39 30 3A 58 B2 C5 28 49 4E 24 29 00 9F 1B 80 07 |90:X..(IN$).....|
00001390: 8B 58 B3 31 B0 58 B1 32 30 30 A7 31 39 30 30 00 |.X.1.X.200.1900.|
000013A0: A9 1B 8A 07 89 31 35 35 30 00 E7 1B 94 07 99 22 |.....1550......"|
000013B0: 13 11 11 11 20 51 4E 54 59 20 54 4F 20 42 45 20 |.... QNTY TO BE |
000013C0: 41 4C 4C 2E 22 3B C7 28 31 34 35 29 3A 53 50 B2 |ALL.";.(145):SP.|
000013D0: 32 30 3A 4D 4C B2 39 3A 8D 34 31 39 30 3A 47 47 |20:ML.9:.4190:GG|
000013E0: B2 C5 28 49 4E 24 29 00 FA 1B 9E 07 8B 47 47 B1 |..(IN$)......GG.|
000013F0: 55 32 28 58 29 A7 31 39 34 30 00 1C 1C A8 07 55 |U2(X).1940.....U|
00001400: 38 28 58 29 B2 55 38 28 58 29 AA 47 47 3A 55 32 |8(X).U8(X).GG:U2|
00001410: 28 58 29 B2 55 32 28 58 29 AB 47 47 00 28 1C B2 |(X).U2(X).GG.(..|
00001420: 07 9F 34 2C 34 3A 98 34 00 63 1C BC 07 98 34 2C |..4,4:.4.c....4,|
00001430: 22 20 20 20 20 20 50 52 4F 44 55 43 54 20 43 4F |" PRODUCT CO|
00001440: 44 45 3A 20 22 3B 44 46 24 3B 58 3B 22 20 20 20 |DE: ";DF$;X;" |
00001450: 20 20 41 4C 4C 4F 43 41 54 45 44 20 20 20 20 22 | ALLOCATED "|
00001460: 3B 47 47 00 81 1C C6 07 98 34 2C 22 20 20 20 20 |;GG......4," |
00001470: 20 49 4E 20 53 54 4F 43 4B 20 22 3B 55 32 28 58 | IN STOCK ";U2(X|
00001480: 29 00 8D 1C D0 07 A0 34 3A 47 47 B2 30 00 97 1C |)......4:GG.0...|
00001490: DA 07 8D 32 35 39 30 00 A1 1C E4 07 89 31 35 36 |...2590......156|
000014A0: 30 00 CC 1C EE 07 99 22 13 11 11 11 20 20 46 52 |0......".... FR|
000014B0: 4F 4D 20 12 41 92 4C 4C 4F 43 41 54 45 44 20 4F |OM .A.LLOCATED O|
000014C0: 52 20 12 49 92 4E 20 53 54 4B 20 3F 00 E1 1C 0C |R .I.N STK ?....|
000014D0: 08 A1 41 24 3A 8B 41 24 B2 22 41 22 A7 32 31 30 |..A$:.A$."A".210|
000014E0: 30 00 F2 1C 20 08 8B 41 24 B2 22 49 22 A7 32 32 |0... ..A$."I".22|
000014F0: 33 30 00 FC 1C 2A 08 89 32 30 36 30 00 02 1D 34 |30...*..2060...4|
00001500: 08 8F 00 0C 1D 3E 08 8D 32 35 39 30 00 2D 1D 48 |.....>..2590.-.H|
00001510: 08 99 22 13 11 11 11 20 20 51 4E 54 59 20 54 4F |..".... QNTY TO|
00001520: 20 42 45 20 49 53 53 55 45 44 20 3F 91 00 4C 1D | BE ISSUED ?..L.|
00001530: 52 08 53 50 B2 32 30 3A 4D 4C B2 39 3A 8D 34 31 |R.SP.20:ML.9:.41|
00001540: 39 30 3A 47 48 B2 C5 28 49 4E 24 29 00 5F 1D 5C |90:GH..(IN$)._.\|
00001550: 08 8B 47 48 B1 55 38 28 58 29 A7 32 31 32 30 00 |..GH.U8(X).2120.|
00001560: 81 1D 66 08 55 38 28 58 29 B2 55 38 28 58 29 AB |..f.U8(X).U8(X).|
00001570: 47 48 3A 55 32 28 58 29 B2 55 32 28 58 29 AB 47 |GH:U2(X).U2(X).G|
00001580: 48 00 8B 1D 70 08 8D 32 35 39 30 00 97 1D 7A 08 |H...p..2590...z.|
00001590: 9F 34 2C 34 3A 98 34 00 D8 1D 84 08 98 34 2C 22 |.4,4:.4......4,"|
000015A0: 20 20 20 20 20 50 52 4F 44 55 43 54 20 43 4F 44 | PRODUCT COD|
000015B0: 45 20 3A 22 3B 44 46 24 3B 58 3B 22 20 20 20 20 |E :";DF$;X;" |
000015C0: 20 49 53 53 55 45 53 20 46 52 4F 4D 20 41 4C 4C | ISSUES FROM ALL|
000015D0: 2E 53 54 4B 22 3B 47 48 00 FB 1D 8E 08 98 34 2C |.STK";GH......4,|
000015E0: 22 20 20 20 20 20 41 4C 4C 4F 43 41 54 45 44 20 |" ALLOCATED |
000015F0: 51 4E 54 59 22 3B 55 38 28 58 29 00 1E 1E 98 08 |QNTY";U8(X).....|
00001600: 98 34 2C 22 20 20 20 20 20 49 4E 20 53 54 4F 43 |.4," IN STOC|
00001610: 4B 20 20 20 20 20 20 22 3B 55 32 28 58 29 00 25 |K ";U2(X).%|
00001620: 1E A2 08 A0 34 00 2F 1E AC 08 89 31 35 36 30 00 |....4./....1560.|
00001630: 35 1E B6 08 8F 00 3F 1E C0 08 8D 32 35 39 30 00 |5.....?....2590.|
00001640: 60 1E CA 08 99 22 13 11 11 11 20 20 51 4E 54 59 |`....".... QNTY|
00001650: 20 54 4F 20 42 45 20 49 53 53 55 45 44 20 3F 91 | TO BE ISSUED ?.|
00001660: 00 7F 1E D4 08 53 50 B2 32 30 3A 4D 4C B2 39 3A |.....SP.20:ML.9:|
00001670: 8D 34 31 39 30 3A 47 4A B2 C5 28 49 4E 24 29 00 |.4190:GJ..(IN$).|
00001680: 92 1E DE 08 8B 47 4A B1 55 32 28 58 29 A7 32 32 |.....GJ.U2(X).22|
00001690: 35 30 00 A5 1E E8 08 55 32 28 58 29 B2 55 32 28 |50.....U2(X).U2(|
000016A0: 58 29 AB 47 4A 00 AF 1E F2 08 8D 32 35 39 30 00 |X).GJ......2590.|
000016B0: BB 1E FC 08 9F 34 2C 34 3A 98 34 00 FF 1E 06 09 |.....4,4:.4.....|
000016C0: 98 34 2C 22 20 20 20 20 20 50 52 4F 44 55 43 54 |.4," PRODUCT|
000016D0: 20 43 4F 44 45 20 22 3B 44 46 24 3B 58 3B 22 20 | CODE ";DF$;X;" |
000016E0: 20 20 20 20 20 49 53 53 55 45 44 20 46 52 4F 4D | ISSUED FROM|
000016F0: 20 49 4E 20 53 54 4F 43 4B 20 20 22 3B 47 4A 00 | IN STOCK ";GJ.|
00001700: 21 1F 10 09 98 34 2C 22 20 20 20 20 20 49 4E 20 |!....4," IN |
00001710: 53 54 4F 43 4B 20 20 20 20 20 22 3B 55 32 28 58 |STOCK ";U2(X|
00001720: 29 00 28 1F 1A 09 A0 34 00 32 1F 24 09 89 31 35 |).(....4.2.$..15|
00001730: 36 30 00 5F 1F 2E 09 99 22 13 11 11 11 20 20 50 |60._....".... P|
00001740: 4F 53 54 20 54 4F 20 12 49 92 4E 20 53 54 4B 20 |OST TO .I.N STK |
00001750: 4F 52 20 12 4F 92 4E 20 4F 52 44 45 52 20 3F 00 |OR .O.N ORDER ?.|
00001760: 74 1F 4C 09 A1 41 24 3A 8B 41 24 B2 22 4F 22 A7 |t.L..A$:.A$."O".|
00001770: 32 34 36 30 00 85 1F 60 09 8B 41 24 B2 22 49 22 |2460...`..A$."I"|
00001780: A7 32 34 32 30 00 8F 1F 6A 09 89 32 33 38 30 00 |.2420...j..2380.|
00001790: 99 1F 74 09 8D 32 35 39 30 00 B1 1F 7E 09 99 22 |..t..2590...~.."|
000017A0: 13 11 11 11 20 20 51 55 41 4E 54 49 54 59 20 3F |.... QUANTITY ?|
000017B0: 91 00 DF 1F 88 09 53 50 B2 32 30 3A 4D 4C B2 39 |......SP.20:ML.9|
000017C0: 3A 8D 34 31 39 30 3A 47 4C B2 C5 28 49 4E 24 29 |:.4190:GL..(IN$)|
000017D0: 3A 8B 47 4C B1 55 36 28 58 29 A7 32 34 32 30 00 |:.GL.U6(X).2420.|
000017E0: 13 20 92 09 55 36 28 58 29 B2 55 36 28 58 29 AB |. ..U6(X).U6(X).|
000017F0: 47 4C 3A 55 32 28 58 29 B2 55 32 28 58 29 AA 47 |GL:U2(X).U2(X).G|
00001800: 4C 3A 4A 4A B2 35 30 3A 8D 32 35 39 30 3A 89 32 |L:JJ.50:.2590:.2|
00001810: 35 31 30 00 1D 20 9C 09 8D 32 35 39 30 00 35 20 |510.. ...2590.5 |
00001820: A6 09 99 22 13 11 11 11 20 20 51 55 41 4E 54 49 |...".... QUANTI|
00001830: 54 59 20 3F 91 00 54 20 B0 09 53 50 B2 32 30 3A |TY ?..T ..SP.20:|
00001840: 4D 4C B2 39 3A 8D 34 31 39 30 3A 47 4C B2 C5 28 |ML.9:.4190:GL..(|
00001850: 49 4E 24 29 00 6D 20 BA 09 55 36 28 58 29 B2 55 |IN$).m ..U6(X).U|
00001860: 36 28 58 29 AA 47 4C 3A 4A 4A B2 32 31 00 77 20 |6(X).GL:JJ.21.w |
00001870: C4 09 8D 32 35 39 30 00 83 20 CE 09 9F 34 2C 34 |...2590.. ...4,4|
00001880: 3A 98 34 00 94 20 D8 09 8B 4A 4A B3 B1 35 30 A7 |:.4.. ...JJ..50.|
00001890: 32 35 34 30 00 D5 20 E2 09 98 34 2C 22 20 20 20 |2540.. ...4," |
000018A0: 20 20 50 52 4F 44 55 43 54 20 43 4F 44 45 3A 20 | PRODUCT CODE: |
000018B0: 22 3B 44 46 24 3B 58 3B 22 20 20 20 20 20 49 4E |";DF$;X;" IN|
000018C0: 20 53 54 4F 43 4B 20 20 52 45 43 45 49 50 54 3A | STOCK RECEIPT:|
000018D0: 20 22 3B 47 4C 00 DF 20 E7 09 89 32 35 35 30 00 | ";GL.. ...2550.|
000018E0: 20 21 EC 09 98 34 2C 22 20 20 20 20 20 50 52 4F | !...4," PRO|
000018F0: 44 55 43 54 20 43 4F 44 45 3A 20 22 3B 44 46 24 |DUCT CODE: ";DF$|
00001900: 3B 58 3B 22 20 20 20 20 20 4F 4E 20 4F 52 44 45 |;X;" ON ORDE|
00001910: 52 20 20 52 45 43 45 49 50 54 3A 20 22 3B 47 4C |R RECEIPT: ";GL|
00001920: 00 3E 21 F6 09 98 34 2C 22 20 20 20 20 20 49 4E |.>!...4," IN|
00001930: 20 53 54 4F 43 4B 20 22 3B 55 32 28 58 29 00 5C | STOCK ";U2(X).\|
00001940: 21 00 0A 98 34 2C 22 20 20 20 20 20 4F 4E 20 4F |!...4," ON O|
00001950: 52 44 45 52 20 22 3B 55 36 28 58 29 00 68 21 0A |RDER ";U6(X).h!.|
00001960: 0A A0 34 3A 4A 4A B2 30 00 72 21 14 0A 89 31 35 |..4:JJ.0.r!...15|
00001970: 36 30 00 A4 21 1E 0A 99 22 13 11 11 11 20 20 20 |60..!...".... |
00001980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000019A0: 20 22 3A 8E 00 B8 21 32 0A 99 C7 28 31 34 37 29 | ":...!2...(147)|
000019B0: 3A 99 3A 99 3A 99 3A 99 00 DC 21 3C 0A 99 A3 35 |:.:.:.:...!<...5|
000019C0: 29 22 44 4F 20 59 4F 55 20 52 45 51 55 49 52 45 |)"DO YOU REQUIRE|
000019D0: 20 41 20 50 52 49 4E 54 4F 55 54 22 00 F1 21 46 | A PRINTOUT"..!F|
000019E0: 0A A1 41 24 3A 8B 41 24 B2 22 4E 22 A7 32 36 37 |..A$:.A$."N".267|
000019F0: 30 00 05 22 5A 0A 8B 41 24 B2 22 59 22 A7 8D 33 |0.."Z..A$."Y"..3|
00001A00: 39 33 30 3A 8E 00 0F 22 64 0A 89 32 36 33 30 00 |930:..."d..2630.|
00001A10: 19 22 6E 0A 8D 33 34 36 30 00 21 22 78 0A 51 B2 |."n..3460.!"x.Q.|
00001A20: 31 00 2E 22 82 0A 81 58 B2 31 A4 32 30 30 00 47 |1.."...X.1.200.G|
00001A30: 22 8C 0A 54 59 B2 55 32 28 58 29 AB 55 38 28 58 |"..TY.U2(X).U8(X|
00001A40: 29 AA 55 36 28 58 29 00 71 22 96 0A 8B 55 32 28 |).U6(X).q"...U2(|
00001A50: 58 29 B2 30 AF 55 36 28 58 29 B2 30 AF 55 37 28 |X).0.U6(X).0.U7(|
00001A60: 58 29 B2 30 AF 55 38 28 58 29 B2 30 A7 32 37 35 |X).0.U8(X).0.275|
00001A70: 30 00 85 22 A0 0A 8B 55 37 28 58 29 B3 B2 54 59 |0.."...U7(X)..TY|
00001A80: A7 32 37 35 30 00 B8 22 AA 0A 99 58 3B A3 36 29 |.2750.."...X;.6)|
00001A90: 3B 55 32 28 58 29 3B A3 31 32 29 3B 55 36 28 58 |;U2(X);.12);U6(X|
00001AA0: 29 3B 20 A3 31 38 29 3B 55 38 28 58 29 3B A3 32 |); .18);U8(X);.2|
00001AB0: 35 29 3B 55 37 28 58 29 00 D8 22 B4 0A 99 C7 28 |5);U7(X).."....(|
00001AC0: 31 34 35 29 3B A3 33 32 29 3B 55 37 28 58 29 AB |145);.32);U7(X).|
00001AD0: 54 59 3A 51 B2 51 AA 31 00 F0 22 BE 0A 8B 51 AD |TY:Q.Q.1.."...Q.|
00001AE0: 31 35 B2 B5 28 51 AD 31 35 29 A7 8D 33 34 33 30 |15..(Q.15)..3430|
00001AF0: 00 F7 22 C8 0A 82 58 00 22 23 D2 0A 99 C7 28 31 |.."...X."#....(1|
00001B00: 39 29 3A 81 41 B2 31 A4 32 31 3A 99 3A 82 41 3A |9):.A.1.21:.:.A:|
00001B10: 99 A3 31 30 29 22 50 52 45 53 53 20 52 45 54 55 |..10)"PRESS RETU|
00001B20: 52 4E 00 3A 23 DC 0A A1 43 24 3A 8B 43 24 B3 B1 |RN.:#...C$:.C$..|
00001B30: C7 28 31 33 29 A7 32 37 38 30 00 40 23 E6 0A 8E |.(13).2780.@#...|
00001B40: 00 57 23 0E 0B 99 C7 28 31 34 35 29 3B A3 31 38 |.W#....(145);.18|
00001B50: 29 22 20 20 22 3A 8E 00 6D 23 18 0B 99 C7 28 31 |)" ":..m#....(1|
00001B60: 34 37 29 3A 99 3A 99 3A 99 3A 99 3A 99 00 91 23 |47):.:.:.:.:...#|
00001B70: 22 0B 99 A3 35 29 22 44 4F 20 59 4F 55 20 57 41 |"...5)"DO YOU WA|
00001B80: 4E 54 20 54 4F 20 53 54 4F 52 45 20 44 41 54 41 |NT TO STORE DATA|
00001B90: 22 00 A3 23 2C 0B A1 41 24 3A 8B 41 24 B2 22 4E |"..#,..A$:.A$."N|
00001BA0: 22 A7 8E 00 B4 23 40 0B 8B 41 24 B2 22 59 22 A7 |"....#@..A$."Y".|
00001BB0: 32 39 30 30 00 BE 23 4A 0B 89 32 38 36 30 00 E4 |2900..#J..2860..|
00001BC0: 23 54 0B 99 3A 99 A3 38 29 22 12 44 41 54 41 20 |#T..:..8)".DATA |
00001BD0: 44 49 53 4B 20 49 4E 20 44 52 49 56 45 20 30 22 |DISK IN DRIVE 0"|
00001BE0: 3A 99 3A 99 00 0C 24 5E 0B 99 3A 99 22 20 20 20 |:.:...$^..:." |
00001BF0: 20 20 4E 41 4D 45 20 4F 46 20 50 52 4F 44 55 43 | NAME OF PRODUC|
00001C00: 54 20 47 52 4F 55 50 22 3A 99 3A 99 00 29 24 68 |T GROUP":.:..)$h|
00001C10: 0B 53 50 B2 31 32 3A 4D 4C B2 34 3A 8D 34 31 39 |.SP.12:ML.4:.419|
00001C20: 30 3A 44 46 24 B2 49 4E 24 00 3A 24 72 0B 8B 44 |0:DF$.IN$.:$r..D|
00001C30: 46 24 B2 22 22 A7 32 39 31 30 00 4B 24 77 0B 9F |F$."".2910.K$w..|
00001C40: 31 2C 38 2C 31 35 2C 22 49 30 22 00 76 24 7C 0B |1,8,15,"I0".v$|.|
00001C50: 99 3A 99 3A 99 A3 35 29 22 49 53 20 54 48 49 53 |.:.:..5)"IS THIS|
00001C60: 20 41 20 4E 45 57 20 46 49 4C 45 20 43 52 45 41 | A NEW FILE CREA|
00001C70: 54 49 4F 4E 20 3F 00 8B 24 7D 0B A1 43 24 3A 8B |TION ?..$}..C$:.|
00001C80: 43 24 B2 22 4E 22 A7 32 39 34 35 00 9C 24 7E 0B |C$."N".2945..$~.|
00001C90: 8B 43 24 B2 22 59 22 A7 32 39 34 38 00 A6 24 7F |.C$."Y".2948..$.|
00001CA0: 0B 89 32 39 34 31 00 C2 24 81 0B 9F 32 2C 38 2C |..2941..$...2,8,|
00001CB0: 36 2C 22 40 30 3A 22 AA 44 46 24 AA 22 2C 53 2C |6,"@0:".DF$.",S,|
00001CC0: 57 22 00 CC 24 82 0B 89 32 39 35 30 00 E7 24 84 |W"..$...2950..$.|
00001CD0: 0B 9F 32 2C 38 2C 36 2C 22 30 3A 22 AA 44 46 24 |..2,8,6,"0:".DF$|
00001CE0: AA 22 2C 53 2C 57 22 00 F2 24 86 0B 8D 32 30 30 |.",S,W"..$...200|
00001CF0: 31 30 00 FF 24 90 0B 81 58 B2 31 A4 32 30 30 00 |10..$...X.1.200.|
00001D00: 14 25 9A 0B 98 32 2C 55 31 24 28 58 29 2C C7 28 |.%...2,U1$(X),.(|
00001D10: 31 33 29 3B 00 1E 25 9F 0B 8D 38 30 30 30 00 35 |13);..%...8000.5|
00001D20: 25 A4 0B 98 32 2C C4 28 55 32 28 58 29 29 2C C7 |%...2,.(U2(X)),.|
00001D30: 28 31 33 29 3B 00 3F 25 A9 0B 8D 38 30 30 30 00 |(13);.?%...8000.|
00001D40: 56 25 AE 0B 98 32 2C C4 28 55 4E 28 58 29 29 2C |V%...2,.(UN(X)),|
00001D50: C7 28 31 33 29 3B 00 60 25 B3 0B 8D 38 30 30 30 |.(13);.`%...8000|
00001D60: 00 75 25 B8 0B 98 32 2C 55 34 24 28 58 29 2C C7 |.u%...2,U4$(X),.|
00001D70: 28 31 33 29 3B 00 7F 25 BD 0B 8D 38 30 30 30 00 |(13);..%...8000.|
00001D80: 96 25 C2 0B 98 32 2C C4 28 55 35 28 58 29 29 2C |.%...2,.(U5(X)),|
00001D90: C7 28 31 33 29 3B 00 A0 25 C7 0B 8D 38 30 30 30 |.(13);..%...8000|
00001DA0: 00 B7 25 CC 0B 98 32 2C C4 28 55 36 28 58 29 29 |..%...2,.(U6(X))|
00001DB0: 2C C7 28 31 33 29 3B 00 C1 25 D1 0B 8D 38 30 30 |,.(13);..%...800|
00001DC0: 30 00 D8 25 D6 0B 98 32 2C C4 28 55 37 28 58 29 |0..%...2,.(U7(X)|
00001DD0: 29 2C C7 28 31 33 29 3B 00 E2 25 DB 0B 8D 38 30 |),.(13);..%...80|
00001DE0: 30 30 00 F9 25 E0 0B 98 32 2C C4 28 55 38 28 58 |00..%...2,.(U8(X|
00001DF0: 29 29 2C C7 28 31 33 29 3B 00 03 26 E5 0B 8D 38 |)),.(13);..&...8|
00001E00: 30 30 30 00 1A 26 EA 0B 98 32 2C C4 28 56 41 28 |000..&...2,.(VA(|
00001E10: 58 29 29 2C C7 28 31 33 29 3B 00 24 26 EF 0B 8D |X)),.(13);.$&...|
00001E20: 38 30 30 30 00 3B 26 F4 0B 98 32 2C C4 28 55 34 |8000.;&...2,.(U4|
00001E30: 28 58 29 29 2C C7 28 31 33 29 3B 00 45 26 F9 0B |(X)),.(13);.E&..|
00001E40: 8D 38 30 30 30 00 5C 26 FE 0B 98 32 2C C4 28 4D |.8000.\&...2,.(M|
00001E50: 39 28 58 29 29 2C C7 28 31 33 29 3B 00 66 26 03 |9(X)),.(13);.f&.|
00001E60: 0C 8D 38 30 30 30 00 6D 26 08 0C 82 58 00 77 26 |..8000.m&...X.w&|
00001E70: 12 0C A0 32 3A A0 31 00 A3 26 1C 0C 99 3A 99 3A |...2:.1..&...:.:|
00001E80: 99 A3 35 29 3B 22 53 45 43 55 52 49 54 59 20 43 |..5);"SECURITY C|
00001E90: 4F 50 59 20 52 45 51 55 49 52 45 44 20 28 59 2F |OPY REQUIRED (Y/|
00001EA0: 4E 29 3F 00 B8 26 26 0C A1 41 24 3A 8B 41 24 B2 |N)?..&&..A$:.A$.|
00001EB0: 22 4E 22 A7 33 31 34 35 00 E7 26 3A 0C 8B 41 24 |"N".3145..&:..A$|
00001EC0: B2 22 59 22 A7 99 3A 99 54 41 41 42 28 35 29 22 |."Y"..:.TAAB(5)"|
00001ED0: 43 48 41 4E 47 45 20 44 41 54 41 20 44 49 53 4B |CHANGE DATA DISK|
00001EE0: 22 3A 89 32 39 30 30 00 F1 26 44 0C 89 33 31 31 |":.2900..&D..311|
00001EF0: 30 00 01 27 49 0C 8D 32 30 30 30 30 3A 89 33 35 |0..'I..20000:.35|
00001F00: 30 00 15 27 4E 0C 99 C7 28 31 34 37 29 3A 99 3A |0..'N...(147):.:|
00001F10: 99 3A 99 3A 99 00 37 27 58 0C 99 A3 35 29 22 44 |.:.:..7'X...5)"D|
00001F20: 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 52 45 |O YOU WANT TO RE|
00001F30: 41 44 20 44 41 54 41 00 4B 27 62 0C A1 41 24 3A |AD DATA.K'b..A$:|
00001F40: 8B 41 24 B2 22 4E 22 A7 33 35 30 00 5C 27 76 0C |.A$."N".350.\'v.|
00001F50: 8B 41 24 B2 22 59 22 A7 33 32 31 30 00 66 27 80 |.A$."Y".3210.f'.|
00001F60: 0C 89 33 31 37 30 00 74 27 8A 0C 50 50 B2 30 3A |..3170.t'..PP.0:|
00001F70: 53 50 B2 30 00 9B 27 94 0C 99 3A 99 A3 35 29 22 |SP.0..'...:..5)"|
00001F80: 12 44 41 54 41 20 44 49 53 4B 20 49 4E 20 44 52 |.DATA DISK IN DR|
00001F90: 49 56 45 20 30 92 22 3A 99 3A 99 00 BF 27 9E 0C |IVE 0.":.:...'..|
00001FA0: 99 3A 99 A3 35 29 22 4E 41 4D 45 20 4F 46 20 44 |.:..5)"NAME OF D|
00001FB0: 41 54 41 20 46 49 4C 45 22 3A 99 3A 99 3A 99 00 |ATA FILE":.:.:..|
00001FC0: DC 27 A8 0C 53 50 B2 31 32 3A 4D 4C B2 34 3A 8D |.'..SP.12:ML.4:.|
00001FD0: 34 31 39 30 3A 44 46 24 B2 49 4E 24 00 ED 27 B2 |4190:DF$.IN$..'.|
00001FE0: 0C 8B 44 46 24 B2 22 22 A7 33 32 33 30 00 F8 27 |..DF$."".3230..'|
00001FF0: BC 0C 8D 32 30 30 31 30 00 09 28 C6 0C 9F 31 2C |...20010..(...1,|
00002000: 38 2C 31 35 2C 22 49 30 22 00 24 28 CB 0C 9F 32 |8,15,"I0".$(...2|
00002010: 2C 38 2C 36 2C 22 30 3A 22 AA 44 46 24 AA 22 2C |,8,6,"0:".DF$.",|
00002020: 53 2C 52 22 00 31 28 D0 0C 81 58 B2 31 A4 32 30 |S,R".1(...X.1.20|
00002030: 30 00 47 28 DA 0C 84 32 2C 4D 57 24 3A 55 31 24 |0.G(...2,MW$:U1$|
00002040: 28 58 29 B2 4D 57 24 00 5F 28 E4 0C 84 32 2C 4D |(X).MW$._(...2,M|
00002050: 57 24 3A 55 32 28 58 29 B2 C5 28 4D 57 24 29 00 |W$:U2(X)..(MW$).|
00002060: 77 28 EE 0C 84 32 2C 4D 57 24 3A 55 4E 28 58 29 |w(...2,MW$:UN(X)|
00002070: B2 C5 28 4D 57 24 29 00 8D 28 F8 0C 84 32 2C 4D |..(MW$)..(...2,M|
00002080: 57 24 3A 55 34 24 28 58 29 B2 4D 57 24 00 A5 28 |W$:U4$(X).MW$..(|
00002090: 02 0D 84 32 2C 4D 57 24 3A 55 35 28 58 29 B2 C5 |...2,MW$:U5(X)..|
000020A0: 28 4D 57 24 29 00 BD 28 0C 0D 84 32 2C 4D 57 24 |(MW$)..(...2,MW$|
000020B0: 3A 55 36 28 58 29 B2 C5 28 4D 57 24 29 00 D5 28 |:U6(X)..(MW$)..(|
000020C0: 16 0D 84 32 2C 4D 57 24 3A 55 37 28 58 29 B2 C5 |...2,MW$:U7(X)..|
000020D0: 28 4D 57 24 29 00 ED 28 20 0D 84 32 2C 4D 57 24 |(MW$)..( ..2,MW$|
000020E0: 3A 55 38 28 58 29 B2 C5 28 4D 57 24 29 00 05 29 |:U8(X)..(MW$)..)|
000020F0: 2A 0D 84 32 2C 4D 57 24 3A 56 41 28 58 29 B2 C5 |*..2,MW$:VA(X)..|
00002100: 28 4D 57 24 29 00 1D 29 34 0D 84 32 2C 4D 57 24 |(MW$)..)4..2,MW$|
00002110: 3A 55 34 28 58 29 B2 C5 28 4D 57 24 29 00 35 29 |:U4(X)..(MW$).5)|
00002120: 3E 0D 84 32 2C 4D 57 24 3A 4D 39 28 58 29 B2 C5 |>..2,MW$:M9(X)..|
00002130: 28 4D 57 24 29 00 3C 29 48 0D 82 58 00 46 29 52 |(MW$).<)H..X.F)R|
00002140: 0D A0 32 3A A0 31 00 50 29 5C 0D 89 33 31 34 35 |..2:.1.P)\..3145|
00002150: 00 68 29 66 0D 99 C7 28 31 39 29 3A 81 41 B2 31 |.h)f...(19):.A.1|
00002160: A4 32 31 3A 99 3A 82 41 00 87 29 70 0D 99 A3 35 |.21:.:.A..)p...5|
00002170: 29 22 50 52 45 53 53 20 52 45 54 55 52 4E 20 54 |)"PRESS RETURN T|
00002180: 4F 20 43 4F 4E 54 22 00 9F 29 7A 0D A1 41 24 3A |O CONT"..)z..A$:|
00002190: 8B 41 24 B3 B1 C7 28 31 33 29 A7 33 34 35 30 00 |.A$...(13).3450.|
000021A0: D1 29 84 0D 99 C7 28 31 34 37 29 3B 22 53 54 4B |.)....(147);"STK|
000021B0: 20 20 20 49 4E 20 20 20 20 20 4F 4E 20 20 20 20 | IN ON |
000021C0: 41 4C 4C 20 20 20 20 4D 49 4E 20 20 20 20 52 45 |ALL MIN RE|
000021D0: 51 00 E8 29 8E 0D 99 22 4E 4F 20 20 20 20 53 54 |Q..)..."NO ST|
000021E0: 4B 20 20 20 20 4F 52 44 00 17 2A 98 0D 99 22 B7 |K ORD..*...".|
000021F0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00002200: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00002210: B7 B7 B7 B7 B7 B7 B7 00 1D 2A A2 0D 8E 00 2F 2A |.........*..../*|
00002220: AC 0D 99 C7 28 31 34 37 29 3A 99 3A 99 3A 99 00 |....(147):.:.:..|
00002230: 4E 2A B6 0D 99 A3 37 29 22 49 53 20 59 4F 55 52 |N*....7)"IS YOUR|
00002240: 20 50 52 49 4E 54 45 52 20 4F 4E 20 3F 22 00 62 | PRINTER ON ?".b|
00002250: 2A C0 0D A1 41 24 3A 8B 41 24 B2 22 4E 22 A7 33 |*...A$:.A$."N".3|
00002260: 35 30 00 73 2A D4 0D 8B 41 24 B2 22 59 22 A7 33 |50.s*...A$."Y".3|
00002270: 35 36 30 00 7D 2A DE 0D 89 33 35 32 30 00 8C 2A |560.}*...3520..*|
00002280: E8 0D 9F 34 2C 34 3A 98 34 3A 98 34 00 CD 2A F2 |...4,4:.4:.4..*.|
00002290: 0D 98 34 2C 22 20 20 20 2A 2A 2A 2A 20 20 20 53 |..4," **** S|
000022A0: 54 4F 43 4B 20 52 45 50 4F 52 54 20 20 20 2A 2A |TOCK REPORT **|
000022B0: 2A 2A 20 20 47 52 4F 55 50 20 3A 20 22 3B 44 46 |** GROUP : ";DF|
000022C0: 24 3B 22 20 20 20 20 20 22 3B 44 41 24 00 DA 2A |$;" ";DA$..*|
000022D0: FC 0D 98 34 3A 98 34 3A 98 34 00 E5 2A FE 0D 8D |...4:.4:.4..*...|
000022E0: 31 35 30 30 30 00 22 2B 01 0E 48 24 B2 22 20 4E |15000."+..H$." N|
000022F0: 4F 2E 20 20 22 3A 48 31 24 B2 22 49 4E 20 20 20 |O. ":H1$."IN |
00002300: 20 20 20 20 22 3A 48 32 24 B2 22 55 4E 49 54 20 | ":H2$."UNIT |
00002310: 20 22 3A 48 33 24 B2 22 4F 4E 20 20 20 20 20 20 | ":H3$."ON |
00002320: 20 22 00 62 2B 03 0E 48 34 24 B2 22 41 4C 4C 4F | ".b+..H4$."ALLO|
00002330: 43 2E 20 20 20 22 3A 48 35 24 B2 22 4D 49 4E 2E |C. ":H5$."MIN.|
00002340: 20 20 20 20 20 22 3A 48 36 24 B2 22 4D 41 58 2E | ":H6$."MAX.|
00002350: 20 20 20 20 20 22 3A 48 37 24 B2 22 56 41 54 20 | ":H7$."VAT |
00002360: 20 22 00 84 2B 05 0E 48 38 24 B2 22 53 41 4C 45 | "..+..H8$."SALE|
00002370: 20 20 20 20 22 3A 48 39 24 B2 22 50 55 52 43 48 | ":H9$."PURCH|
00002380: 20 20 20 22 00 B2 2B 06 0E 98 34 2C 48 24 3B 48 | "..+...4,H$;H|
00002390: 31 24 3B 48 32 24 3B 48 33 24 3B 48 34 24 3B 48 |1$;H2$;H3$;H4$;H|
000023A0: 35 24 3B 48 36 24 3B 48 37 24 3B 48 38 24 3B 48 |5$;H6$;H7$;H8$;H|
000023B0: 39 24 00 EF 2B 08 0E 48 24 B2 22 20 20 20 20 20 |9$..+..H$." |
000023C0: 20 22 3A 48 31 24 B2 22 53 54 4F 43 4B 20 20 20 | ":H1$."STOCK |
000023D0: 20 22 3A 48 32 24 B2 22 51 4E 54 59 20 20 22 3A | ":H2$."QNTY ":|
000023E0: 48 33 24 B2 22 4F 52 44 45 52 20 20 20 20 22 00 |H3$."ORDER ".|
000023F0: 2F 2C 0A 0E 48 34 24 B2 22 51 4E 54 59 20 20 20 |/,..H4$."QNTY |
00002400: 20 20 22 3A 48 35 24 B2 22 4C 45 56 45 4C 20 20 | ":H5$."LEVEL |
00002410: 20 20 22 3A 48 36 24 B2 22 51 4E 54 59 20 20 20 | ":H6$."QNTY |
00002420: 20 20 22 3A 48 37 24 B2 22 52 41 54 45 20 22 00 | ":H7$."RATE ".|
00002430: 42 2C 0C 0E 48 38 24 B2 22 43 4F 53 54 20 20 20 |B,..H8$."COST |
00002440: 20 22 00 70 2C 0E 0E 98 34 2C 48 24 3B 48 31 24 | ".p,...4,H$;H1$|
00002450: 3B 48 32 24 3B 48 33 24 3B 48 34 24 3B 48 35 24 |;H2$;H3$;H4$;H5$|
00002460: 3B 48 36 24 3B 48 37 24 3B 48 38 24 3B 48 38 24 |;H6$;H7$;H8$;H8$|
00002470: 00 7B 2C 10 0E 8D 31 35 30 30 30 00 88 2C 24 0E |.{,...15000..,$.|
00002480: 81 58 B2 31 A4 32 30 30 00 BA 2C 2E 0E 8B 55 32 |.X.1.200..,...U2|
00002490: 28 58 29 B2 30 AF 55 36 28 58 29 B2 30 AF 55 37 |(X).0.U6(X).0.U7|
000024A0: 28 58 29 B2 30 AF 4D 39 28 58 29 B2 30 AF 55 38 |(X).0.M9(X).0.U8|
000024B0: 28 58 29 B2 30 A7 33 38 35 30 00 DB 2C 42 0E 5A |(X).0.3850..,B.Z|
000024C0: 56 B2 36 3A 49 4E 24 B2 C4 28 58 29 3A 8D 35 30 |V.6:IN$..(X):.50|
000024D0: 30 30 30 3A 55 58 24 B2 49 4E 24 00 00 2D 47 0E |000:UX$.IN$..-G.|
000024E0: 5A 56 B2 39 3A 49 4E 24 B2 C4 28 55 32 28 58 29 |ZV.9:IN$..(U2(X)|
000024F0: 29 3A 8D 35 30 30 30 30 3A 55 32 24 B2 49 4E 24 |):.50000:U2$.IN$|
00002500: 00 25 2D 4C 0E 5A 56 B2 35 3A 49 4E 24 B2 C4 28 |.%-L.ZV.5:IN$..(|
00002510: 55 4E 28 58 29 29 3A 8D 35 30 30 30 30 3A 55 4E |UN(X)):.50000:UN|
00002520: 24 B2 49 4E 24 00 4A 2D 51 0E 5A 56 B2 39 3A 49 |$.IN$.J-Q.ZV.9:I|
00002530: 4E 24 B2 C4 28 55 36 28 58 29 29 3A 8D 35 30 30 |N$..(U6(X)):.500|
00002540: 30 30 3A 55 36 24 B2 49 4E 24 00 6A 2D 56 0E 49 |00:U6$.IN$.j-V.I|
00002550: 4E 24 B2 C4 28 55 38 28 58 29 29 3A 8D 35 30 30 |N$..(U8(X)):.500|
00002560: 30 30 3A 55 38 24 B2 49 4E 24 00 8F 2D 57 0E 5A |00:U8$.IN$..-W.Z|
00002570: 56 B2 35 3A 49 4E 24 B2 C4 28 56 41 28 58 29 29 |V.5:IN$..(VA(X))|
00002580: 3A 8D 35 30 30 30 30 3A 56 41 24 B2 49 4E 24 00 |:.50000:VA$.IN$.|
00002590: B4 2D 5B 0E 5A 56 B2 39 3A 49 4E 24 B2 C4 28 55 |.-[.ZV.9:IN$..(U|
000025A0: 37 28 58 29 29 3A 8D 35 30 30 30 30 3A 55 37 24 |7(X)):.50000:U7$|
000025B0: B2 49 4E 24 00 D4 2D 60 0E 49 4E 24 B2 C4 28 4D |.IN$..-`.IN$..(M|
000025C0: 39 28 58 29 29 3A 8D 35 30 30 30 30 3A 4D 39 24 |9(X)):.50000:M9$|
000025D0: B2 49 4E 24 00 F4 2D 65 0E 49 4E 24 B2 C4 28 55 |.IN$..-e.IN$..(U|
000025E0: 34 28 58 29 29 3A 8D 35 30 30 30 30 3A 55 34 24 |4(X)):.50000:U4$|
000025F0: B2 49 4E 24 00 14 2E 6A 0E 49 4E 24 B2 C4 28 55 |.IN$...j.IN$..(U|
00002600: 35 28 58 29 29 3A 8D 35 30 30 30 30 3A 55 35 24 |5(X)):.50000:U5$|
00002610: B2 49 4E 24 00 43 2E 74 0E 98 34 2C 55 58 24 3B |.IN$.C.t..4,UX$;|
00002620: 55 32 24 3B 55 4E 24 3B 55 36 24 3B 55 38 24 3B |U2$;UN$;U6$;U8$;|
00002630: 55 37 24 3B 4D 39 24 3B 56 41 24 3B 55 34 24 3B |U7$;M9$;VA$;U4$;|
00002640: 55 35 24 00 59 2E F6 0E 50 50 B2 55 34 28 58 29 |U5$.Y...PP.U4(X)|
00002650: AC 55 32 28 58 29 AA 50 50 00 6F 2E 00 0F 54 50 |.U2(X).PP.o...TP|
00002660: B2 55 35 28 58 29 AC 55 32 28 58 29 AA 54 50 00 |.U5(X).U2(X).TP.|
00002670: 76 2E 0A 0F 82 58 00 86 2E 14 0F 98 34 3A 98 34 |v....X......4:.4|
00002680: 3A 98 34 3A 98 34 00 BD 2E 1E 0F 98 34 2C 22 54 |:.4:.4......4,"T|
00002690: 4F 54 41 4C 20 53 41 4C 45 20 56 41 4C 55 45 20 |OTAL SALE VALUE |
000026A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000026B0: 20 20 20 20 20 20 20 20 20 22 3B 50 50 00 F4 2E | ";PP...|
000026C0: 28 0F 98 34 2C 22 54 4F 54 41 4C 20 50 55 52 2E |(..4,"TOTAL PUR.|
000026D0: 20 56 41 4C 55 45 20 20 20 20 20 20 20 20 20 20 | VALUE |
000026E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000026F0: 22 3B 54 50 00 04 2F 32 0F 98 34 3A 98 34 3A 98 |";TP../2..4:.4:.|
00002700: 34 3A 98 34 00 12 2F 3C 0F 50 50 B2 30 3A 54 50 |4:.4../<.PP.0:TP|
00002710: B2 30 00 1E 2F 46 0F A0 34 3A 89 33 35 30 00 30 |.0../F..4:.350.0|
00002720: 2F 5A 0F 9F 34 2C 34 3A 98 34 3A 98 34 3A 98 34 |/Z..4,4:.4:.4:.4|
00002730: 00 75 2F 64 0F 98 34 2C 22 20 20 20 20 20 20 2A |.u/d..4," *|
00002740: 2A 2A 2A 20 20 20 52 45 4F 52 44 45 52 20 4C 49 |*** REORDER LI|
00002750: 53 54 20 20 20 2A 2A 2A 2A 20 20 47 52 4F 55 50 |ST **** GROUP|
00002760: 20 3A 20 22 3B 44 46 24 3B 22 20 20 20 20 20 20 | : ";DF$;" |
00002770: 22 3B 44 41 24 00 B6 2F 79 0F 57 31 24 B2 22 20 |";DA$../y.W1$." |
00002780: 43 4F 44 45 20 20 20 20 20 20 20 20 20 22 3A 57 |CODE ":W|
00002790: 32 24 B2 22 49 4E 20 20 20 20 20 20 20 20 20 20 |2$."IN |
000027A0: 20 22 3A 57 33 24 B2 22 4F 4E 20 20 20 20 20 20 | ":W3$."ON |
000027B0: 20 20 20 20 20 22 00 F4 2F 7A 0F 57 34 24 B2 22 | "../z.W4$."|
000027C0: 41 4C 4C 4F 43 41 54 45 44 20 20 20 20 22 3A 57 |ALLOCATED ":W|
000027D0: 35 24 B2 22 52 45 51 55 49 52 45 44 20 20 20 22 |5$."REQUIRED "|
000027E0: 3A 57 57 24 B2 22 4D 49 4E 49 4D 55 4D 20 20 20 |:WW$."MINIMUM |
000027F0: 20 20 20 22 00 35 30 7C 0F 57 36 24 B2 22 20 4E | ".50|.W6$." N|
00002800: 4F 20 20 20 20 20 20 20 20 20 20 20 22 3A 57 37 |O ":W7|
00002810: 24 B2 22 53 54 4F 43 4B 20 20 20 20 20 20 20 20 |$."STOCK |
00002820: 22 3A 57 38 24 B2 22 4F 52 44 45 52 20 20 20 20 |":W8$."ORDER |
00002830: 20 20 20 20 22 00 4C 30 7D 0F 57 24 B2 22 51 4E | ".L0}.W$."QN|
00002840: 54 59 20 20 20 20 20 20 20 20 20 22 00 60 30 82 |TY ".`0.|
00002850: 0F 98 34 3A 98 34 3A 98 34 3A 8D 31 35 30 30 30 |..4:.4:.4:.15000|
00002860: 00 7F 30 85 0F 98 34 2C 57 31 24 3B 57 32 24 3B |..0...4,W1$;W2$;|
00002870: 57 33 24 3B 57 34 24 3B 57 57 24 3B 57 35 24 00 |W3$;W4$;WW$;W5$.|
00002880: 9B 30 86 0F 98 34 2C 57 36 24 3B 57 37 24 3B 57 |.0...4,W6$;W7$;W|
00002890: 38 24 3B 57 24 3B 57 24 3B 57 24 00 B2 30 87 0F |8$;W$;W$;W$..0..|
000028A0: 8D 31 35 30 30 30 3A 98 34 3A 98 34 3A 5A 56 B2 |.15000:.4:.4:ZV.|
000028B0: 31 33 00 BF 30 8C 0F 81 58 B2 31 A4 32 30 30 00 |13..0...X.1.200.|
000028C0: E9 30 96 0F 8B 55 32 28 58 29 B2 30 AF 55 36 28 |.0...U2(X).0.U6(|
000028D0: 58 29 B2 30 AF 55 37 28 58 29 B2 30 AF 55 38 28 |X).0.U7(X).0.U8(|
000028E0: 58 29 B2 30 A7 34 31 33 30 00 02 31 A0 0F 54 59 |X).0.4130..1..TY|
000028F0: B2 55 32 28 58 29 AB 55 38 28 58 29 AA 55 36 28 |.U2(X).U8(X).U6(|
00002900: 58 29 00 16 31 AA 0F 8B 54 59 B1 B2 55 37 28 58 |X)..1...TY..U7(X|
00002910: 29 A7 34 31 33 30 00 26 31 B4 0F 54 52 B2 55 37 |).4130.&1..TR.U7|
00002920: 28 58 29 AB 54 59 00 4A 31 BE 0F 49 4E 24 B2 C4 |(X).TY.J1..IN$..|
00002930: 28 58 29 3A 8D 35 30 30 30 30 3A 55 58 24 B2 49 |(X):.50000:UX$.I|
00002940: 4E 24 3A 49 4E 24 B2 22 20 22 00 72 31 C3 0F 49 |N$:IN$." ".r1..I|
00002950: 4E 24 B2 C4 28 55 32 28 58 29 29 3A 8D 35 30 30 |N$..(U2(X)):.500|
00002960: 30 30 3A 55 32 24 B2 49 4E 24 3A 49 4E 24 B2 22 |00:U2$.IN$:IN$."|
00002970: 20 22 00 9A 31 C8 0F 49 4E 24 B2 C4 28 55 36 28 | "..1..IN$..(U6(|
00002980: 58 29 29 3A 8D 35 30 30 30 30 3A 55 36 24 B2 49 |X)):.50000:U6$.I|
00002990: 4E 24 3A 49 4E 24 B2 22 20 22 00 C2 31 CD 0F 49 |N$:IN$." "..1..I|
000029A0: 4E 24 B2 C4 28 55 37 28 58 29 29 3A 8D 35 30 30 |N$..(U7(X)):.500|
000029B0: 30 30 3A 55 37 24 B2 49 4E 24 3A 49 4E 24 B2 22 |00:U7$.IN$:IN$."|
000029C0: 20 22 00 E2 31 D0 0F 49 4E 24 B2 C4 28 55 38 28 | "..1..IN$..(U8(|
000029D0: 58 29 29 3A 8D 35 30 30 30 30 3A 55 38 24 B2 49 |X)):.50000:U8$.I|
000029E0: 4E 24 00 05 32 D2 0F 98 34 2C 55 58 24 3B 55 32 |N$..2...4,UX$;U2|
000029F0: 24 3B 55 36 24 3B 55 37 24 3B 55 38 24 3B 54 52 |$;U6$;U7$;U8$;TR|
00002A00: 3A 54 52 B2 30 00 0C 32 22 10 82 58 00 15 32 2C |:TR.0..2"..X..2,|
00002A10: 10 A0 34 3A 8E 00 2F 32 5E 10 81 55 B2 31 A4 31 |..4:../2^..U.1.1|
00002A20: 35 3A A1 43 24 3A 82 55 3A 8D 32 30 30 31 30 00 |5:.C$:.U:.20010.|
00002A30: 50 32 68 10 49 4E 24 B2 22 20 22 3A 5A 54 B2 54 |P2h.IN$." ":ZT.T|
00002A40: 49 3A 5A 43 B2 32 3A 5A 44 24 B2 C7 28 32 30 29 |I:ZC.2:ZD$..(20)|
00002A50: 00 65 32 72 10 A1 5A 24 3A 8B 5A 24 B3 B1 22 22 |.e2r..Z$:.Z$..""|
00002A60: A7 34 32 35 30 00 6F 32 7C 10 99 A3 53 50 29 00 |.4250.o2|...SP).|
00002A70: 9F 32 86 10 8B 5A 54 B3 B2 54 49 A7 99 CA 28 22 |.2...ZT..TI...("|
00002A80: 20 5F 22 2C 5A 43 2C 31 29 3B 22 9D 22 3B 3A 5A | _",ZC,1);".";:Z|
00002A90: 43 B2 33 AB 5A 43 3A 5A 54 B2 54 49 AA 31 35 00 |C.3.ZC:ZT.TI.15.|
00002AA0: A9 32 90 10 89 34 32 31 30 00 D8 32 9A 10 5A B2 |.2...4210..2..Z.|
00002AB0: C6 28 5A 24 29 3A 5A 4C B2 C3 28 49 4E 24 29 3A |.(Z$):ZL..(IN$):|
00002AC0: 8B 28 5A AF 31 32 37 29 B3 33 32 A7 99 22 20 9D |.(Z.127).32.." .|
00002AD0: 22 3B 3A 89 34 32 39 30 00 08 33 A4 10 8B 46 4C |";:.4290..3...FL|
00002AE0: AF 28 5A AF 31 32 37 29 B1 36 34 AF 28 5A AF 31 |.(Z.127).64.(Z.1|
00002AF0: 32 37 29 B3 39 31 A7 5A 24 B2 C7 28 28 5A AA 31 |27).91.Z$..((Z.1|
00002B00: 32 38 29 AF 32 35 35 29 00 18 33 AE 10 8B 5A 4C |28).255)..3...ZL|
00002B10: B1 4D 4C A7 34 32 31 30 00 33 33 B8 10 49 4E 24 |.ML.4210.33..IN$|
00002B20: B2 49 4E 24 AA 5A 24 3A 99 5A 24 3B 5A 44 24 3B |.IN$.Z$:.Z$;ZD$;|
00002B30: 5A 24 3B 00 59 33 C2 10 8B 5A B2 31 33 A7 49 4E |Z$;.Y3...Z.13.IN|
00002B40: 24 B2 CA 28 49 4E 24 2C 32 29 3A 99 43 52 24 3B |$..(IN$,2):.CR$;|
00002B50: 3A 8D 32 30 30 30 30 3A 8E 00 84 33 CC 10 8B 5A |:.20000:...3...Z|
00002B60: B2 32 30 AF 5A 4C B1 31 A7 49 4E 24 B2 C8 28 49 |.20.ZL.1.IN$..(I|
00002B70: 4E 24 2C 5A 4C AB 31 29 3A 99 22 9D 22 3B 3A 89 |N$,ZL.1):.".";:.|
00002B80: 34 32 31 30 00 B6 33 D6 10 8B 5A B2 31 34 31 A7 |4210..3...Z.141.|
00002B90: 5A 24 B2 C7 28 AB 32 30 AC 28 5A 4C B1 31 29 29 |Z$..(.20.(ZL.1))|
00002BA0: 3A 81 5A B2 32 A4 5A 4C 3A 99 5A 24 3B 3A 82 5A |:.Z.2.ZL:.Z$;:.Z|
00002BB0: 3A 89 34 31 39 30 00 C0 33 E0 10 89 34 32 31 30 |:.4190..3...4210|
00002BC0: 00 D3 33 40 1F 84 31 2C 41 24 2C 42 24 2C 43 24 |..3@..1,A$,B$,C$|
00002BD0: 2C 44 24 00 E2 33 4A 1F 8B 41 24 B2 22 30 30 22 |,D$..3J..A$."00"|
00002BE0: A7 8E 00 F9 33 4F 1F 99 41 24 22 3A 22 42 24 22 |....3O..A$":"B$"|
00002BF0: 3A 22 43 24 22 3A 22 44 24 00 05 34 54 1F A0 31 |:"C$":"D$..4T..1|
00002C00: 3A A0 32 3A 90 00 43 34 98 3A 48 55 24 B2 22 2D |:.2:..C4.:HU$."-|
00002C10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |---------------"|
00002C20: 3A 81 41 58 B2 31 A4 32 3A 98 34 2C 48 55 24 3B |:.AX.1.2:.4,HU$;|
00002C30: 48 55 24 3B 48 55 24 3B 48 55 24 3B 48 55 24 3A |HU$;HU$;HU$;HU$:|
00002C40: 82 41 58 00 49 34 99 3A 8E 00 64 34 20 4E 8B C2 |.AX.I4.:..d4 N..|
00002C50: 28 35 30 35 30 30 29 B2 30 A7 97 35 33 37 2C 31 |(50500).0..537,1|
00002C60: 33 36 3A 8E 00 72 34 21 4E 97 31 34 34 2C 34 39 |36:..r4!N.144,49|
00002C70: 3A 8E 00 8D 34 2A 4E 8B C2 28 35 30 35 30 30 29 |:...4*N..(50500)|
00002C80: B2 30 A7 97 35 33 37 2C 31 33 33 3A 8E 00 9B 34 |.0..537,133:...4|
00002C90: 2B 4E 97 31 34 34 2C 34 36 3A 8E 00 AD 34 A8 61 |+N.144,46:...4.a|
00002CA0: 99 22 A6 22 A3 33 38 29 22 A6 22 3A 8E 00 BB 34 |.".".38)".":...4|
00002CB0: 50 C3 5A 31 B2 C3 28 49 4E 24 29 00 E1 34 55 C3 |P.Z1..(IN$)..4U.|
00002CC0: 5A 32 B2 5A 56 AB 5A 31 3A 81 41 41 B2 31 A4 5A |Z2.ZV.Z1:.AA.1.Z|
00002CD0: 32 3A 49 4E 24 B2 49 4E 24 AA 22 20 22 3A 82 41 |2:IN$.IN$." ":.A|
00002CE0: 41 00 E7 34 5A C3 8E 00 00 00 00 |A..4Z...... |
....... ACT PETSOFT (C)1979.;.... REPR
ODUCTION PROHIBITED.F....20000.~....U7(2
00),U8(200),UN(200),U4(200),VA(200):DF$.
"0000"......U1$(200),U6(200),U2(200),U4$
(200),U5(200),M9(200)......X.1.200:U1$(X
)." ":U4$(X)." ":.X......X.1.200:U2(X).0
:U4(X).0:U5(X).0:U6(X).0:U7(X).0:U8(X).0
:.X.C....X.1.200:UN(X).0:M9(X).0:VA(X).0
:.X.B....G(147):.:.:.:..19)".......U....
:..19)"........."..G(19):.:.:.:.:..7)"DA
TE";G(145)...,.ML.6:SP.19:.4190:DA$.IN$.
J.6..C(DA$)..6.290...@..E(H(DA$,2)).31.2
90...J..E(J(DA$,3,2)).12.290...T..E(I(DA
$,2)).79.290.+.Y.DA$."DATE : ".DA$.=.^.
.G(147):DR.35.`.H.." PRODUCT GROUP
: ";DF$...M..:.:.".....................
.................."...R..25000:.25000...
|..". .1.".5)"ITEM CREATE".20)".2.".23)"
ITEM CHANGE .......25000.(....". .3."
.5)"STOCK INQUIRY".20)".4.".23)"STOCK PO
STING ..3....25000.O....". .5.".5)"REOR
DER LIST".20)".6.".23)"STOCK REPORT ..
Z....25000......". .7.".5)"READ FROM DIS
K".20)".8.".23)"STORE TO DISK ..C....25
000......".".9)".9. RETURN TO BASIC".3
8)"."......25000......25000.1...."......
..................................F.L..A
$:.A$."7".3150.H.V..A$."3".DR.35:.590:.1
360:.350......A$."9"..G(147):.570......A
$."1".DR.0:.590:.670:.350......A$."5"..2
610:.350.I....A$."6".3500......A$."8"..2
840:.350......A$."4".DR.35:.590:.1550:.2
030:.2590.%.&..A$."2".DR.99:.590:.670...
0..460.\.:.."TO RETURN TO PROG. WITHOUT
LOOSING DATA...D.."TYPE 'GOTO350' FOLLOW
ED BY RETURN....F..20010:....N..:.:."PRO
DUCT CODE NO";G(145).R.X.SP.20:ML.3:.419
0:X.E(IN$)...B..X.200.X.1.."... ";G(14
5):.600...L..DR.0.640...V...<....U2(X).0
.U6(X).0.U7(X).0.M9(X).0.U8(X).0.660.X..
..U1$(X)."".U1$(X)." "...^.....Y....:."
FULL..":.600......G(147)......G(145
)" . CODE .".20);DF$;X.J...."1
. DESCRIPTION .......DR.99..G(145);.2
1);U1$(X)...F..:."2 . IN STOCK ..#.
P..DR.99..G(145);.20);U2(X).?.Z..:."3 .
ON ORDER ..]....DR.99..G(145);.20);
U6(X).Y....:."4 . MIN.LEVEL .......D
R.99..G(145);.20);U7(X)......:."5 . MAX.
LEVEL ..Q....DR.99..G(145);.20);M9(X
)......:."6 . ALLOCATED .... ..DR.99
..G(145);.20);U8(X).'.*..:."7 . UNIT OF
QNTY ..E.4..DR.99..G(145);.20);UN(X).A.
>..:."8 . VAT (%) ...H..DR.99..G(
145);.20);VA(X)...R..:."9 . PURCH.COST
....\..DR.99..G(145);.20);U5(X).U.F..:
."A . SALE COST ....P..DR.99..G(145)
;.20);U4(X)...Z..:."B . SUPPLIER ..
4....DR.99..G(145);.21);U4$(X):.1180.H..
..DR.0.PR.1:.930.Q....350.Y....G(19):SP.
21:ML.16:.4190:U1$(X).IN$......C(U1$(X))
.2.930......PR.5.1180......G(19):.A.1.2:
.:....J.SP.21:ML.7:.4190:U2(X).E(IN$):.P
R.5.1180...T..G(19):.A.1.4:.:.A.$...SP.2
1:ML.7:.4190:U6(X).E(IN$):.PR.5.1180.<..
..G(19):.A.1.6 :.:.A.I...SP.21:ML.7:.419
0:U7(X).E(IN$):.PR.5.1180......G(19):.A.
1.8:.:.A.....ML.7:.4190:M9(X).E(IN$):.PR
.5.1180......G(19):.A.1.10:.:.A.....ML.7
:.4190:U8(X).E(IN$)...$..U8(X).U2(X).104
0......PR.5.1180...8..G(19):.A.1.12:.:.A
.?.B.ML.3:.4190:UN(X).E(IN$):.PR.5.1180.
W.L..G(19):.A.1.14:.:.A.~.V.ML.2:.4190:V
A(X).E(IN$):.PR.5.1180...`..G(19):.A.1.1
6:.:.A...J.ML.7:.4190:U5(X).E(IN$):.PR.5
.1180.U.T..G(19):.A.1.18:.:.A...~.ML.7:.
4190:U4(X).E(IN$):.PR.5.1180......G(19):
.A.1.20:.:.A./...ML.16:.4190:U4$(X).IN$.
@....G(19):SP.21.{....A.1.22:.:.A:."PRES
S .M. FOR MENU AND THE NO.TO CHANGE.....
PR.5:.A$:.A$."".1200......A$."M".PR.2:.3
50...D..A$."1".930.J.N..A$."2".960.Z.X..
A$."3".980......A$."4".1000......A$."5".
1020......A$."6".1040......A$."7".1080./
....A$."8".1100.@....A$."9".1120.Q....A$
."A".1140.B.(..A$."B".1160.L.2..1180.R.<
.....F..H.1.32:.G(145);.H)" ":.H:."..":.
1180...P..G(147):.1540.W.Z..". PRODUCT
CODE .".15);DF$;X:.1540...D..". DESCRIP
TION .".16);U1$(X):.1540.*.N..". IN ST
OCK .".16);U2(X):.1540.S.X..". ON O
RDER .".16);U6(X):.1540.}....". SUP
PLIER .".16);U4$(X):.1540......". A
LLOCATED .".16);U8(X):.1540......".
FREESTOCK .".16);U2(X).U8(X).U6(X):.1
540... ..". MIN.LEVEL .";U7(X);.20)".
MAX. .";M9(X)......1540.N....". UNIT OF
QNTY .".14);UN(X);.23)". VAT .";VA(X).X
....1540...H..". SALE .".7);U4(X);.15)"
.TOTAL.";U2(X).U4(X)...R..1540.J....".
PURCH.".7);U5(X);.15)".TOTAL.";U2(X).U5(
X).T....1540......A$:.A$."".1520.......
....".
.":..=....G(147):.A.1.8:.:.:.1570.S.
...G(19):.A.1.8:.:..]."..1540...,..". PR
ODUCT CODE .".20);DF$;X...6..1540...@..
". DESCRIPTION .".21);U1$(X)...J..1540
.U.T...20)" ";G(145)...^..". IN
STOCK .".20);U2(X)...H..1540...R..
.20)" ";G(145).B.|..". ON ORDER
.".20);U6(X).L....1540.I.....20)"
";G(145)......". ALLOCATED
.".20);U8(X)......1540......". MIN LEVEL
.".20);U7(X).C....1540...B...20)"
";G(145)...L..". FREESTOCK .
".20);U2(X).U8(X).U6(X)...V..1540.(....P
W.0.1800.2...PW.99.P....4,4:.4:.4,"
STOCK UPDATES. ";DA$
......4:.4:.4: 4......G(19)......" .I.S
SUES .R.ECEIPTS .A.LLOCATIONS .M.ENU.
....." .C.HANGE CODE...&..A$
:.A$."I".2030...:..A$."R".2350...D..A$."
A".1940.(.N..A$."C".1900.>.X..A$."M".PW.
0:.350.H.B..1830.M.L..".... PRODUCT CODE
NO ?";G(145)...V.SP.20:ML.3:.4190:X.E(I
N$)......X.1.X.200.1900......1550......"
.... QNTY TO BE ALL.";G(145):SP.20:ML.9:
.4190:GG.E(IN$)......GG.U2(X).1940.....U
8(X).U8(X).GG:U2(X).U2(X).GG.(....4,4:.4
.C....4," PRODUCT CODE: ";DF$;X;"
ALLOCATED ";GG...F..4," IN STOC
K ";U2(X)...P. 4:GG.0...Z..2590......156
0.L....".... FROM .A.LLOCATED OR .I.N S
TK ?......A$:.A$."A".2100... ..A$."I".22
30...*..2060...4.....>..2590.-.H.."....
QNTY TO BE ISSUED ?..L.R.SP.20:ML.9:.41
90:GH.E(IN$)._.\..GH.U8(X).2120...F.U8(X
).U8(X).GH:U2(X).U2(X).GH...P..2590...Z.
.4,4:.4.X....4," PRODUCT CODE :";DF$
;X;" ISSUES FROM ALL.STK";GH......4,
" ALLOCATED QNTY";U8(X)......4,"
IN STOCK ";U2(X).%... 4./....1560.
5.....?....2590.`.J..".... QNTY TO BE I
SSUED ?...T.SP.20:ML.9:.4190:GJ.E(IN$).
.....GJ.U2(X).2250.....U2(X).U2(X).GJ...
...2590......4,4:.4......4," PRODUCT
CODE ";DF$;X;" ISSUED FROM IN STOC
K ";GJ.!....4," IN STOCK ";U2(X
).(... 4.2.$..1560._....".... POST TO .
I.N STK OR .O.N ORDER ?.T.L..A$:.A$."O".
2460...`..A$."I".2420...J..2380...T..259
0...~..".... QUANTITY ?......SP.20:ML.9
:.4190:GL.E(IN$):.GL.U6(X).2420.. ..U6(X
).U6(X).GL:U2(X).U2(X).GL:JJ.50:.2590:.2
510.. ...2590.5 ...".... QUANTITY ?..T
..SP.20:ML.9:.4190:GL.E(IN$).M ..U6(X).U
6(X).GL:JJ.21.W D..2590.. N..4,4:.4.. X.
.JJ..50.2540.U ...4," PRODUCT CODE:
";DF$;X;" IN STOCK RECEIPT: ";GL..
...2550. !...4," PRODUCT CODE: ";DF$
;X;" ON ORDER RECEIPT: ";GL.>!...4,
" IN STOCK ";U2(X).\!...4," ON O
RDER ";U6(X).H!.. 4:JJ.0.R!...1560..!...
"....
":...!2..G(147):.:.:.:...!<...5)"DO YOU
REQUIRE A PRINTOUT"..!F..A$:.A$."N".267
0.."Z..A$."Y"..3930:..."D..2630.."N..346
0.!"X.Q.1.."...X.1.200.G"..TY.U2(X).U8(X
).U6(X).Q"...U2(X).0.U6(X).0.U7(X).0.U8(
X).0.2750.." ..U7(X)..TY.2750.."...X;.6)
;U2(X);.12);U6(X); .18);U8(X);.25);U7(X)
.X"...G(145);.32);U7(X).TY:Q.Q.1.."...Q.
15..(Q.15)..3430.."H..X."#R..G(19):.A.1.
21:.:.A:..10)"PRESS RETURN.:#...C$:.C$..
G(13).2780.@#....W#...G(145);.18)" ":..
M#...G(147):.:.:.:.:...#"...5)"DO YOU WA
NT TO STORE DATA"..#,..A$:.A$."N"....#@.
.A$."Y".2900..#J..2860..#T..:..8)".DATA
DISK IN DRIVE 0":.:...$^..:." NAME O
F PRODUCT GROUP":.:..)$H.SP.12:ML.4:.419
0:DF$.IN$.:$R..DF$."".2910.K$W..1,8,15,"
I0".V$|..:.:..5)"IS THIS A NEW FILE CREA
TION ?..$}..C$:.C$."N".2945..$~..C$."Y".
2948..$..2941.B$...2,8,6,"@0:".DF$.",S,
W".L$...2950..$...2,8,6,"0:".DF$.",S,W".
.$...20010..$...X.1.200..%...2,U1$(X),G(
13);..%...8000.5%...2,D(U2(X)),G(13);.?%
...8000.V%...2,D(UN(X)),G(13);.`%...8000
.U%...2,U4$(X),G(13);.%...8000..%B..2,D
(U5(X)),G(13);. %G..8000..%L..2,D(U6(X))
,G(13);.A%Q..8000.X%V..2,D(U7(X)),G(13);
..%...8000..%...2,D(U8(X)),G(13);..&...8
000..&...2,D(VA(X)),G(13);.$&...8000.;&.
..2,D(U4(X)),G(13);.E&...8000.\&...2,D(M
9(X)),G(13);.F&...8000.M&...X.W&.. 2: 1.
.&...:.:..5);"SECURITY COPY REQUIRED (Y/
N)?..&&..A$:.A$."N".3145..&:..A$."Y"..:.
TAAB(5)"CHANGE DATA DISK":.2900..&D..311
0..'I..20000:.350..'N..G(147):.:.:.:..7'
X...5)"DO YOU WANT TO READ DATA.K'B..A$:
.A$."N".350.\'V..A$."Y".3210.F'...3170.T
'..PP.0:SP.0..'...:..5)".DATA DISK IN DR
IVE 0.":.:...'...:..5)"NAME OF DATA FILE
":.:.:...'..SP.12:ML.4:.4190:DF$.IN$..'.
..DF$."".3230..'...20010..(F..1,8,15,"I0
".$(K..2,8,6,"0:".DF$.",S,R".1(P..X.1.20
0.G(Z..2,MW$:U1$(X).MW$._(...2,MW$:U2(X)
.E(MW$).W(...2,MW$:UN(X).E(MW$)..(...2,M
W$:U4$(X).MW$..(...2,MW$:U5(X).E(MW$)..(
...2,MW$:U6(X).E(MW$).U(...2,MW$:U7(X).E
(MW$)..( ..2,MW$:U8(X).E(MW$)..)*..2,MW$
:VA(X).E(MW$)..)4..2,MW$:U4(X).E(MW$).5)
>..2,MW$:M9(X).E(MW$).<)H..X.F)R. 2: 1.P
)\..3145.H)F..G(19):.A.1.21:.:.A..)P...5
)"PRESS RETURN TO CONT"..)Z..A$:.A$..G(1
3).3450.Q)...G(147);"STK IN ON
ALL MIN REQ..)..."NO STK ORD
..*...".................................
.........*..../*...G(147):.:.:..N*....7)
"IS YOUR PRINTER ON ?".B*...A$:.A$."N".3
50.S*T..A$."Y".3560.}*...3520..*...4,4:.
4:.4.M*...4," **** STOCK REPORT **
** GROUP : ";DF$;" ";DA$.Z*...4:.4:
.4..*...15000."+..H$." NO. ":H1$."IN
":H2$."UNIT ":H3$."ON ".B+..H
4$."ALLOC. ":H5$."MIN. ":H6$."MAX.
":H7$."VAT "..+..H8$."SALE ":H9
$."PURCH "..+...4,H$;H1$;H2$;H3$;H4$;H
5$;H6$;H7$;H8$;H9$..+..H$." ":H1$."
STOCK ":H2$."QNTY ":H3$."ORDER ".
/,..H4$."QNTY ":H5$."LEVEL ":H6$.
"QNTY ":H7$."RATE ".B,..H8$."COST
".P,...4,H$;H1$;H2$;H3$;H4$;H5$;H6$;H7$
;H8$;H8$.{,...15000..,$..X.1.200..,...U2
(X).0.U6(X).0.U7(X).0.M9(X).0.U8(X).0.38
50..,B.ZV.6:IN$.D(X):.50000:UX$.IN$..-G.
ZV.9:IN$.D(U2(X)):.50000:U2$.IN$.%-L.ZV.
5:IN$.D(UN(X)):.50000:UN$.IN$.J-Q.ZV.9:I
N$.D(U6(X)):.50000:U6$.IN$.J-V.IN$.D(U8(
X)):.50000:U8$.IN$..-W.ZV.5:IN$.D(VA(X))
:.50000:VA$.IN$..-[.ZV.9:IN$.D(U7(X)):.5
0000:U7$.IN$.T-`.IN$.D(M9(X)):.50000:M9$
.IN$..-E.IN$.D(U4(X)):.50000:U4$.IN$...J
.IN$.D(U5(X)):.50000:U5$.IN$.C.T..4,UX$;
U2$;UN$;U6$;U8$;U7$;M9$;VA$;U4$;U5$.Y...
PP.U4(X).U2(X).PP.O...TP.U5(X).U2(X).TP.
V....X......4:.4:.4:.4......4,"TOTAL SAL
E VALUE ";PP...
(..4,"TOTAL PUR. VALUE
";TP../2..4:.4:.4:.4../<.PP.0:TP
.0../F. 4:.350.0/Z..4,4:.4:.4:.4.U/D..4,
" **** REORDER LIST **** GROUP
: ";DF$;" ";DA$../Y.W1$." CODE
":W2$."IN ":W3$."ON
"../Z.W4$."ALLOCATED ":W5$."REQU
IRED ":WW$."MINIMUM ".50|.W6$." N
O ":W7$."STOCK ":W8$."O
RDER ".L0}.W$."QNTY ".`0.
..4:.4:.4:.15000.0...4,W1$;W2$;W3$;W4$;
WW$;W5$..0...4,W6$;W7$;W8$;W$;W$;W$..0..
.15000:.4:.4:ZV.13..0...X.1.200..0...U2(
X).0.U6(X).0.U7(X).0.U8(X).0.4130..1 .TY
.U2(X).U8(X).U6(X)..1...TY..U7(X).4130.&
1..TR.U7(X).TY.J1..IN$.D(X):.50000:UX$.I
N$:IN$." ".R1C.IN$.D(U2(X)):.50000:U2$.I
N$:IN$." "..1H.IN$.D(U6(X)):.50000:U6$.I
N$:IN$." ".B1M.IN$.D(U7(X)):.50000:U7$.I
N$:IN$." "..1P.IN$.D(U8(X)):.50000:U8$.I
N$..2R..4,UX$;U2$;U6$;U7$;U8$;TR:TR.0..2
"..X..2,. 4:../2^..U.1.15:.C$:.U:.20010.
P2H.IN$." ":ZT.TI:ZC.2:ZD$.G(20).E2R..Z$
:.Z$.."".4250.O2|...SP)..2...ZT..TI..J("
_",ZC,1);".";:ZC.3.ZC:ZT.TI.15..2...421
0.X2..Z.F(Z$):ZL.C(IN$):.(Z.127).32.." .
";:.4290..3...FL.(Z.127).64.(Z.127).91.Z
$.G((Z.128).255)..3...ZL.ML.4210.33..IN$
.IN$.Z$:.Z$;ZD$;Z$;.Y3B..Z.13.IN$.J(IN$,
2):.CR$;:.20000:...3L..Z.20.ZL.1.IN$.H(I
N$,ZL.1):.".";:.4210..3V..Z.141.Z$.G(.20
.(ZL.1)):.Z.2.ZL:.Z$;:.Z:.4190..3...4210
.S3@..1,A$,B$,C$,D$..3J..A$."00"....3O..
A$":"B$":"C$":"D$..4T. 1: 2:..C4.:HU$."-
---------------":.AX.1.2:.4,HU$;HU$;HU$;
HU$;HU$:.AX.I4.:..D4 N.B(50500).0..537,1
36:..R4!N.144,49:...4*N.B(50500).0..537,
133:...4+N.144,46:...4.A.".".38)".":...4
PCZ1.C(IN$)..4UCZ2.ZV.Z1:.AA.1.Z2:IN$.IN
$." ":.AA..4ZC.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL