TRANSACT
FILE INFORMATION
FILENAME(S): TRANSACT
FILE TYPE(S): PRG
FILE SIZE: 15.7K
FIRST SEEN: 2025-11-30 21:23:55
APPEARS ON: 1 disk(s)
FILE HASH
e1ff1b7ff8ea83435a717cd9ee9671fc55d0186fcd252518e9f1eac4849c1384
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 23 2 | TRANSACT | PRG | DuncanTwain | 5 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 48 08 00 00 9C 3A 8F 20 2A 2A 2A 2A 20 54 |..H....:. **** T|
00000010: 52 41 4E 53 41 43 54 20 36 34 20 2A 2A 2A 2A 20 |RANSACT 64 **** |
00000020: 28 43 29 20 44 49 41 4C 4F 47 20 53 4F 46 54 57 |(C) DIALOG SOFTW|
00000030: 41 52 45 20 20 4A 55 4C 59 20 31 39 38 33 20 2A |ARE JULY 1983 *|
00000040: 2A 2A 2A 20 31 37 30 39 00 82 08 01 00 97 35 33 |*** 1709......53|
00000050: 32 38 30 2C 32 3A 97 35 33 32 38 31 2C 32 3A 99 |280,2:.53281,2:.|
00000060: 22 9E 22 3A 8D 34 35 34 3A 41 46 24 B2 22 54 20 |".":.454:AF$."T |
00000070: 52 20 41 20 4E 20 53 20 41 20 43 20 54 22 3A 89 |R A N S A C T":.|
00000080: 31 30 00 C4 08 02 00 8D 34 33 30 3A 47 24 B2 22 |10......430:G$."|
00000090: 20 45 4E 44 20 50 52 4F 47 52 41 4D 20 22 3A 8B | END PROGRAM ":.|
000000A0: 47 B2 35 A7 47 24 B2 22 20 52 45 53 54 41 52 54 |G.5.G$." RESTART|
000000B0: 20 57 49 4C 4C 20 43 4C 45 41 52 20 4D 45 4D 4F | WILL CLEAR MEMO|
000000C0: 52 59 20 22 00 E5 08 03 00 99 22 12 22 47 24 22 |RY "......"."G$"|
000000D0: 92 22 3A 8B 28 46 B2 31 B0 54 52 24 28 31 29 B2 |.":.(F.1.TR$(1).|
000000E0: 22 22 29 A7 36 00 16 09 04 00 99 22 11 12 20 4E |"").6......".. N|
000000F0: 4F 54 45 20 92 20 20 20 54 52 41 4E 53 41 43 54 |OTE . TRANSACT|
00000100: 49 4F 4E 53 20 57 49 4C 4C 20 4E 4F 57 20 42 45 |IONS WILL NOW BE|
00000110: 20 4C 4F 53 54 22 00 44 09 05 00 99 22 41 4E 44 | LOST".D...."AND|
00000120: 20 41 43 43 4F 55 4E 54 53 20 46 49 4C 45 20 48 | ACCOUNTS FILE H|
00000130: 41 53 20 4E 4F 54 20 42 45 45 4E 20 55 50 44 41 |AS NOT BEEN UPDA|
00000140: 54 45 44 22 00 78 09 06 00 99 22 11 11 43 4F 4E |TED".x...."..CON|
00000150: 46 49 52 4D 20 41 43 54 49 4F 4E 20 3F 20 5B 12 |FIRM ACTION ? [.|
00000160: 59 92 2F 12 4E 92 5D 22 3A 8D 34 32 34 3A 8B 47 |Y./.N.]":.424:.G|
00000170: 24 B2 22 4E 22 A7 35 33 00 88 09 07 00 8B 47 B2 |$."N".53......G.|
00000180: 36 A7 8D 34 35 34 3A 80 00 A9 09 09 00 41 46 24 |6..454:......AF$|
00000190: B2 22 54 20 52 20 41 20 4E 20 53 20 41 20 43 20 |."T R A N S A C |
000001A0: 54 22 3A 8D 34 33 30 3A 9C 00 BB 09 0A 00 4D 41 |T":.430:......MA|
000001B0: B2 31 30 30 3A 4D 54 B2 31 35 30 00 DE 09 0B 00 |.100:MT.150.....|
000001C0: 86 41 43 24 28 4D 41 29 2C 41 43 28 4D 41 29 2C |.AC$(MA),AC(MA),|
000001D0: 54 52 24 28 4D 54 29 2C 54 52 28 4D 41 29 00 2D |TR$(MT),TR(MA).-|
000001E0: 0A 0C 00 43 42 24 B2 22 9D 9D 9D 9D 9D 9D 9D 9D |...CB$."........|
000001F0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3A |..............":|
00000200: 4C 4E 24 B2 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |LN$."...........|
00000210: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000220: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 7C 0A |............".|.|
00000230: 0D 00 43 44 24 B2 22 13 11 11 11 11 11 11 11 11 |..CD$.".........|
00000240: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3A 42 |.............":B|
00000250: 4C 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 |L$." |
00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000270: 20 20 20 20 20 20 20 20 20 20 20 22 00 9F 0A 0E | "....|
00000280: 00 43 52 24 B2 C7 28 31 33 29 3A 54 44 24 B2 22 |.CR$..(13):TD$."|
00000290: 22 3A 54 4E 24 B2 22 22 3A 54 46 24 B2 22 22 00 |":TN$."":TF$."".|
000002A0: DA 0A 10 00 99 43 44 24 22 52 45 50 4F 52 54 20 |.....CD$"REPORT |
000002B0: 44 41 54 45 20 5B 12 44 44 2F 4D 4D 2F 59 59 92 |DATE [.DD/MM/YY.|
000002C0: 5D 20 3A 20 22 3B 3A 4C 49 B2 38 3A 41 4E B2 31 |] : ";:LI.8:AN.1|
000002D0: 3A 8D 34 30 32 3A 41 4E B2 30 00 F0 0A 11 00 8B |:.402:AN.0......|
000002E0: 49 4E 24 B2 22 22 A7 99 22 91 91 22 3A 89 31 36 |IN$."".."..":.16|
000002F0: 00 0C 0B 12 00 44 41 24 B2 49 4E 24 AA C8 28 42 |.....DA$.IN$..(B|
00000300: 4C 24 2C 38 AB C3 28 49 4E 24 29 29 00 31 0B 14 |L$,8..(IN$)).1..|
00000310: 00 8D 34 33 30 3A 99 22 12 20 41 43 43 4F 55 4E |..430:.". ACCOUN|
00000320: 54 53 20 53 54 52 55 43 54 55 52 45 20 92 11 11 |TS STRUCTURE ...|
00000330: 22 00 66 0B 15 00 99 22 43 52 45 41 54 45 20 12 |".f...."CREATE .|
00000340: 4E 92 45 57 20 46 49 4C 45 20 3A 20 4C 4F 41 44 |N.EW FILE : LOAD|
00000350: 20 12 44 92 49 53 4B 20 2F 20 12 54 92 41 50 45 | .D.ISK / .T.APE|
00000360: 20 46 49 4C 45 22 00 79 0B 16 00 8D 34 32 36 3A | FILE".y....426:|
00000370: 8B 47 24 B2 43 52 24 A7 39 00 9D 0B 17 00 81 47 |.G$.CR$.9......G|
00000380: B2 31 A4 33 3A 8B 47 24 B3 B1 CA 28 22 4E 44 54 |.1.3:.G$...("NDT|
00000390: 22 2C 47 2C 31 29 A7 82 47 3A 89 32 32 00 D5 0B |",G,1)..G:.22...|
000003A0: 18 00 99 22 13 11 11 11 11 11 22 42 4C 24 3A 99 |..."......"BL$:.|
000003B0: 22 91 45 4E 54 45 52 20 46 49 4C 45 20 12 20 4E |".ENTER FILE . N|
000003C0: 41 4D 45 20 92 20 3A 20 22 3B 3A 4C 49 B2 31 34 |AME . : ";:LI.14|
000003D0: 3A 8D 34 30 32 00 E4 0B 19 00 8B 49 4E 24 B2 22 |:.402......IN$."|
000003E0: 22 A7 32 30 00 FA 0B 1A 00 41 46 24 B2 49 4E 24 |".20.....AF$.IN$|
000003F0: 3A 8B 47 B3 B1 31 A7 33 38 35 00 1A 0C 1C 00 8D |:.G..1.385......|
00000400: 34 33 30 3A 99 22 12 20 41 43 43 4F 55 4E 54 53 |430:.". ACCOUNTS|
00000410: 20 53 45 54 2D 55 50 20 92 22 00 41 0C 1D 00 99 | SET-UP .".A....|
00000420: 22 11 11 48 45 41 44 49 4E 47 53 20 46 4F 52 20 |"..HEADINGS FOR |
00000430: 53 45 43 54 49 4F 4E 3A 20 12 20 31 20 92 11 11 |SECTION: . 1 ...|
00000440: 22 00 53 0C 1E 00 81 49 B2 31 A4 35 3A 87 51 24 |".S....I.1.5:.Q$|
00000450: 3A 82 49 00 8A 0C 1F 00 81 49 B2 31 A4 31 30 3A |:.I......I.1.10:|
00000460: 87 41 43 24 28 49 29 3A 41 43 24 B2 41 43 24 28 |.AC$(I):AC$.AC$(|
00000470: 49 29 3A 49 24 B2 C4 28 49 29 3A 8B 49 B3 31 30 |I):I$..(I):.I.10|
00000480: A7 49 24 B2 22 20 22 AA 49 24 00 BC 0C 20 00 99 |.I$." ".I$... ..|
00000490: 22 41 2F 43 3A 20 20 12 22 49 24 22 20 92 20 20 |"A/C: ."I$" . |
000004A0: 5B 22 41 43 24 3B C8 28 42 4C 24 2C 32 30 AB C3 |["AC$;.(BL$,20..|
000004B0: 28 41 43 24 29 29 22 5D 22 3A 82 49 00 ED 0C 21 |(AC$))"]":.I...!|
000004C0: 00 99 22 11 11 50 52 45 53 53 20 5B 12 52 45 54 |.."..PRESS [.RET|
000004D0: 55 52 4E 92 5D 20 54 4F 20 53 45 54 2D 55 50 20 |URN.] TO SET-UP |
000004E0: 4E 45 57 20 41 43 43 4F 55 4E 54 53 22 00 02 0D |NEW ACCOUNTS"...|
000004F0: 22 00 8D 34 32 32 3A 8B 47 24 B3 B1 43 52 24 A7 |"..422:.G$..CR$.|
00000500: 33 34 00 0F 0D 24 00 58 B2 31 31 3A 53 B2 31 00 |34...$.X.11:S.1.|
00000510: 3C 0D 25 00 8D 34 33 30 3A 99 22 12 20 53 45 54 |<.%..430:.". SET|
00000520: 2D 55 50 20 41 43 43 4F 55 4E 54 53 20 92 22 3A |-UP ACCOUNTS .":|
00000530: 58 58 B2 58 AA 39 3A 53 B2 53 AA 31 00 77 0D 26 |XX.X.9:S.S.1.w.&|
00000540: 00 99 22 13 11 11 11 11 11 45 4E 54 45 52 20 48 |.."......ENTER H|
00000550: 45 41 44 49 4E 47 53 20 46 4F 52 20 53 45 43 54 |EADINGS FOR SECT|
00000560: 49 4F 4E 3A 20 12 20 22 CA 28 C4 28 53 29 2C 32 |ION: . ".(.(S),2|
00000570: 29 22 20 92 11 11 22 00 9C 0D 27 00 81 49 B2 58 |)" ..."...'..I.X|
00000580: A4 58 58 3A 49 24 B2 C4 28 49 29 3A 8B 49 B2 31 |.XX:I$..(I):.I.1|
00000590: 30 30 A7 49 24 B2 22 9D 22 AA 49 24 00 CB 0D 28 |00.I$.".".I$...(|
000005A0: 00 99 22 41 2F 43 3A 20 20 12 22 49 24 22 20 92 |.."A/C: ."I$" .|
000005B0: 20 20 22 3B 3A 4C 49 B2 32 30 3A 8D 34 30 32 3A | ";:LI.20:.402:|
000005C0: 8B 49 4E 24 B3 B1 22 22 A7 34 33 00 E9 0D 29 00 |.IN$.."".43...).|
000005D0: 8B 49 B1 58 A7 99 22 91 22 42 4C 24 22 91 91 22 |.I.X.."."BL$".."|
000005E0: 3A 49 B2 49 AB 32 3A 82 49 00 F7 0D 2A 00 99 22 |:I.I.2:.I...*.."|
000005F0: 91 22 3B 3A 89 33 39 00 14 0E 2B 00 8B 49 4E 24 |.";:.39...+..IN$|
00000600: B3 B1 22 5E 22 A7 41 43 24 28 49 29 B2 49 4E 24 |.."^".AC$(I).IN$|
00000610: 3A 89 34 37 00 21 0E 2C 00 8B 49 B2 31 31 A7 34 |:.47.!.,..I.11.4|
00000620: 32 00 3C 0E 2D 00 8B 49 B2 58 A7 53 B2 53 AB 31 |2.<.-..I.X.S.S.1|
00000630: 3A 49 B2 58 58 3A 82 49 3A 89 35 33 00 5B 0E 2E |:I.XX:.I:.53.[..|
00000640: 00 81 4A B2 49 A4 58 58 3A 41 43 24 28 4A 29 B2 |..J.I.XX:AC$(J).|
00000650: 22 5F 22 3A 82 4A 3A 49 B2 58 58 00 85 0E 2F 00 |"_":.J:I.XX.../.|
00000660: 82 49 3A 99 43 44 24 3B 22 41 43 43 45 50 54 20 |.I:.CD$;"ACCEPT |
00000670: 48 45 41 44 49 4E 47 53 20 3F 20 5B 12 59 92 2F |HEADINGS ? [.Y./|
00000680: 12 4E 92 5D 22 00 B0 0E 30 00 8D 34 32 34 3A 8B |.N.]"...0..424:.|
00000690: 47 24 B2 22 4E 22 A7 81 4B B2 31 A4 31 33 3A 99 |G$."N"..K.1.13:.|
000006A0: 22 91 22 42 4C 24 22 91 22 3A 82 4B 3A 89 33 38 |"."BL$".":.K:.38|
000006B0: 00 BE 0E 31 00 8B 58 58 B2 4D 41 A7 35 31 00 FC |...1..XX.MA.51..|
000006C0: 0E 32 00 99 22 91 41 4E 59 20 4D 4F 52 45 20 48 |.2..".ANY MORE H|
000006D0: 45 41 44 49 4E 47 53 20 3F 20 5B 12 59 92 2F 12 |EADINGS ? [.Y./.|
000006E0: 4E 92 5D 22 3A 8D 34 32 34 3A 8B 47 24 B2 22 59 |N.]":.424:.G$."Y|
000006F0: 22 A7 58 B2 58 58 AA 31 3A 89 33 37 00 06 0F 33 |".X.XX.1:.37...3|
00000700: 00 4E 41 B2 58 58 00 26 0F 35 00 8D 34 33 30 3A |.NA.XX.&.5..430:|
00000710: 99 22 12 20 54 20 52 20 41 20 4E 20 53 20 41 20 |.". T R A N S A |
00000720: 43 20 54 20 92 22 00 4E 0F 36 00 99 22 11 11 11 |C T .".N.6.."...|
00000730: 12 42 92 41 54 43 48 20 50 52 4F 43 45 53 53 22 |.B.ATCH PROCESS"|
00000740: 3A 8B 54 52 24 28 31 29 B2 22 22 A7 35 36 00 77 |:.TR$(1)."".56.w|
00000750: 0F 37 00 99 22 11 11 11 12 54 92 52 41 4E 53 41 |.7.."....T.RANSA|
00000760: 43 54 49 4F 4E 20 46 49 4C 45 20 48 41 4E 44 4C |CTION FILE HANDL|
00000770: 45 52 22 3A 89 35 37 00 99 0F 38 00 99 22 11 11 |ER":.57...8.."..|
00000780: 11 12 4C 92 4F 41 44 20 54 52 41 4E 53 41 43 54 |..L.OAD TRANSACT|
00000790: 49 4F 4E 20 46 49 4C 45 22 00 BB 0F 39 00 99 22 |ION FILE"...9.."|
000007A0: 11 11 11 12 41 92 43 43 4F 55 4E 54 53 20 46 49 |....A.CCOUNTS FI|
000007B0: 4C 45 20 48 41 4E 44 4C 45 52 22 00 E0 0F 3A 00 |LE HANDLER"...:.|
000007C0: 99 22 11 11 11 12 52 92 45 53 54 41 52 54 20 4F |."....R.ESTART O|
000007D0: 52 20 12 45 92 4E 44 20 50 52 4F 47 52 41 4D 22 |R .E.ND PROGRAM"|
000007E0: 00 0C 10 3B 00 8D 34 32 36 3A 81 47 B2 31 A4 36 |...;..426:.G.1.6|
000007F0: 3A 8B 47 24 B3 B1 CA 28 22 42 54 4C 41 52 45 22 |:.G$...("BTLARE"|
00000800: 2C 47 2C 31 29 A7 82 47 3A 89 35 39 00 35 10 3C |,G,1)..G:.59.5.<|
00000810: 00 8B 28 47 B2 32 AF 54 52 24 28 31 29 B2 22 22 |..(G.2.TR$(1).""|
00000820: 29 B0 28 47 B2 33 AF 54 52 24 28 31 29 B3 B1 22 |).(G.3.TR$(1).."|
00000830: 22 29 A7 35 39 00 4F 10 3D 00 91 47 89 36 38 2C |").59.O.=..G.68,|
00000840: 31 37 35 2C 32 34 38 2C 32 38 36 2C 32 2C 32 00 |175,248,286,2,2.|
00000850: 64 10 3F 00 8D 34 33 30 3A 99 22 12 20 56 41 54 |d.?..430:.". VAT|
00000860: 20 92 11 22 00 87 10 40 00 99 22 43 55 52 52 45 | .."...@.."CURRE|
00000870: 4E 54 20 52 41 54 45 20 53 45 54 2D 55 50 20 3D |NT RATE SET-UP =|
00000880: 22 56 22 25 11 11 22 00 C5 10 41 00 99 22 91 45 |"V"%.."...A..".E|
00000890: 4E 54 45 52 20 12 20 4E 45 57 20 92 20 25 20 46 |NTER . NEW . % F|
000008A0: 4F 52 20 41 55 54 4F 43 41 4C 43 20 3F 20 22 3B |OR AUTOCALC ? ";|
000008B0: 3A 4C 49 B2 32 3A 8D 34 30 32 3A 8B 49 4E 24 B2 |:LI.2:.402:.IN$.|
000008C0: 22 22 A7 36 38 00 DF 10 42 00 56 B2 C5 28 49 4E |"".68...B.V..(IN|
000008D0: 24 29 3A 8B 56 B3 31 B0 56 B1 39 39 A7 36 35 00 |$):.V.1.V.99.65.|
000008E0: F1 10 44 00 8B 46 B2 31 A7 8D 32 31 39 3A 46 B2 |..D..F.1..219:F.|
000008F0: 30 00 1F 11 45 00 51 24 B2 22 22 3A 8D 34 33 30 |0...E.Q$."":.430|
00000900: 3A 99 22 12 20 42 41 54 43 48 20 50 52 4F 43 45 |:.". BATCH PROCE|
00000910: 53 53 49 4E 47 20 92 11 11 22 3A 8D 34 37 30 00 |SSING ...":.470.|
00000920: 41 11 46 00 99 22 12 42 92 41 4E 4B 20 52 45 43 |A.F..".B.ANK REC|
00000930: 45 49 50 54 53 20 26 20 50 41 59 4D 45 4E 54 53 |EIPTS & PAYMENTS|
00000940: 22 00 64 11 47 00 99 22 11 12 43 92 41 53 48 20 |".d.G.."..C.ASH |
00000950: 52 45 43 45 49 50 54 53 20 26 20 50 41 59 4D 45 |RECEIPTS & PAYME|
00000960: 4E 54 53 22 00 8C 11 48 00 99 22 11 12 53 92 41 |NTS"...H.."..S.A|
00000970: 4C 45 53 20 49 4E 56 4F 49 43 45 53 20 26 20 43 |LES INVOICES & C|
00000980: 52 45 44 49 54 20 4E 4F 54 45 53 22 00 B7 11 49 |REDIT NOTES"...I|
00000990: 00 99 22 11 12 50 92 55 52 43 48 41 53 45 20 49 |.."..P.URCHASE I|
000009A0: 4E 56 4F 49 43 45 53 20 26 20 43 52 45 44 49 54 |NVOICES & CREDIT|
000009B0: 20 4E 4F 54 45 53 22 00 CA 11 4A 00 99 22 11 12 | NOTES"...J.."..|
000009C0: 4A 92 4F 55 52 4E 41 4C 53 22 00 EA 11 4B 00 99 |J.OURNALS"...K..|
000009D0: 22 11 11 12 56 92 41 54 3A 20 41 55 54 4F 43 41 |"...V.AT: AUTOCA|
000009E0: 4C 43 20 53 45 54 2D 55 50 22 00 0F 12 4C 00 99 |LC SET-UP"...L..|
000009F0: 22 11 11 5B 12 52 45 54 55 52 4E 92 5D 20 54 52 |"..[.RETURN.] TR|
00000A00: 41 4E 53 41 43 54 20 4F 50 54 49 4F 4E 53 22 00 |ANSACT OPTIONS".|
00000A10: 23 12 4D 00 8D 34 32 36 3A 8B 47 24 B2 43 52 24 |#.M..426:.G$.CR$|
00000A20: A7 35 33 00 4A 12 4E 00 81 47 B2 31 A4 36 3A 8B |.53.J.N..G.1.6:.|
00000A30: 47 24 B3 B1 CA 28 22 42 43 53 50 4A 56 22 2C 47 |G$...("BCSPJV",G|
00000A40: 2C 31 29 A7 82 47 3A 89 37 37 00 56 12 4F 00 8B |,1)..G:.77.V.O..|
00000A50: 47 B2 36 A7 36 33 00 97 12 50 00 51 31 24 B2 22 |G.6.63...P.Q1$."|
00000A60: 50 41 59 4D 45 4E 54 22 3A 51 32 24 B2 22 52 45 |PAYMENT":Q2$."RE|
00000A70: 43 45 49 50 54 22 3A 8B 47 B1 32 A7 51 31 24 B2 |CEIPT":.G.2.Q1$.|
00000A80: 22 49 4E 56 4F 49 43 45 22 3A 51 32 24 B2 22 43 |"INVOICE":Q2$."C|
00000A90: 52 2F 4E 4F 54 45 22 00 CC 12 51 00 51 33 24 B2 |R/NOTE"...Q.Q3$.|
00000AA0: C8 28 51 31 24 2C 31 29 3A 51 34 24 B2 C8 28 51 |.(Q1$,1):Q4$..(Q|
00000AB0: 32 24 2C 31 29 3A 8C 3A 81 49 B2 31 A4 47 3A 87 |2$,1):.:.I.1.G:.|
00000AC0: 48 24 3A 82 49 3A 54 54 24 B2 47 24 00 EF 12 52 |H$:.I:TT$.G$...R|
00000AD0: 00 41 B2 30 3A 42 B2 30 3A 43 B2 30 3A 54 B2 54 |.A.0:B.0:C.0:T.T|
00000AE0: AA 31 3A 54 24 B2 CA 28 C4 28 54 29 2C 32 29 00 |.1:T$..(.(T),2).|
00000AF0: 28 13 53 00 8D 34 33 30 3A 99 22 12 20 22 48 24 |(.S..430:.". "H$|
00000B00: 22 20 92 22 A6 32 35 AB C3 28 48 24 AA 54 24 29 |" .".25..(H$.T$)|
00000B10: 29 22 54 52 41 4E 53 41 43 54 3A 20 12 20 22 54 |)"TRANSACT: . "T|
00000B20: 24 22 20 92 11 11 11 22 00 4A 13 54 00 54 24 B2 |$" ....".J.T.T$.|
00000B30: 54 24 AA C8 28 42 4C 24 2C 34 AB C3 28 54 24 29 |T$..(BL$,4..(T$)|
00000B40: 29 3A 8B 47 B2 35 A7 31 35 34 00 59 13 55 00 8B |):.G.5.154.Y.U..|
00000B50: 51 24 B3 B1 22 22 A7 39 30 00 94 13 56 00 99 22 |Q$.."".90...V.."|
00000B60: 91 50 52 4F 43 45 53 53 20 12 22 51 33 24 22 92 |.PROCESS ."Q3$".|
00000B70: 22 CA 28 51 31 24 2C 32 29 22 20 4F 52 20 12 22 |".(Q1$,2)" OR ."|
00000B80: 51 34 24 22 92 22 CA 28 51 32 24 2C 32 29 22 20 |Q4$".".(Q2$,2)" |
00000B90: 3F 20 22 3B 00 BC 13 57 00 4C 49 B2 31 3A 8D 34 |? ";...W.LI.1:.4|
00000BA0: 30 32 3A 54 4D 24 B2 49 4E 24 3A 8B 54 4D 24 B2 |02:TM$.IN$:.TM$.|
00000BB0: 22 22 A7 54 B2 54 AB 31 3A 89 36 38 00 D6 13 58 |"".T.T.1:.68...X|
00000BC0: 00 8B 54 4D 24 B3 B1 51 33 24 AF 54 4D 24 B3 B1 |..TM$..Q3$.TM$..|
00000BD0: 51 34 24 A7 38 36 00 F1 13 59 00 51 24 B2 51 31 |Q4$.86...Y.Q$.Q1|
00000BE0: 24 3A 8B 54 4D 24 B2 51 34 24 A7 51 24 B2 51 32 |$:.TM$.Q4$.Q$.Q2|
00000BF0: 24 00 2A 14 5A 00 99 22 13 11 11 11 11 11 22 42 |$.*.Z.."......"B|
00000C00: 4C 24 3A 99 22 91 22 51 24 22 20 44 41 54 45 20 |L$:."."Q$" DATE |
00000C10: 20 20 20 22 3B 3A 4C 49 B2 38 3A 8D 34 30 32 3A | ";:LI.8:.402:|
00000C20: 8B 49 4E 24 B2 22 22 A7 39 30 00 43 14 5B 00 8B |.IN$."".90.C.[..|
00000C30: 49 4E 24 B2 22 5E 22 A7 99 22 91 22 42 4C 24 3A |IN$."^".."."BL$:|
00000C40: 89 38 36 00 68 14 5C 00 8B 49 4E 24 B3 B1 22 22 |.86.h.\..IN$..""|
00000C50: A7 54 44 24 B2 49 4E 24 AA C8 28 42 4C 24 2C 39 |.TD$.IN$..(BL$,9|
00000C60: AB C3 28 49 4E 24 29 29 00 85 14 5D 00 99 22 91 |..(IN$))...]..".|
00000C70: 22 51 24 22 20 44 41 54 45 20 20 3A 20 20 22 54 |"Q$" DATE : "T|
00000C80: 44 24 22 20 22 00 AE 14 5E 00 52 24 B2 22 20 54 |D$" "...^.R$." T|
00000C90: 4F 20 20 22 3A 8B 28 54 4D 24 B2 22 52 22 B0 47 |O ":.(TM$."R".G|
00000CA0: B2 34 29 A7 52 24 B2 22 20 46 52 4F 4D 22 00 DE |.4).R$." FROM"..|
00000CB0: 14 5F 00 99 22 13 11 11 11 11 11 11 22 51 24 52 |._.."......."Q$R|
00000CC0: 24 22 20 20 20 20 22 3B 3A 4C 49 B2 32 30 3A 8D |$" ";:LI.20:.|
00000CD0: 34 30 32 3A 8B 49 4E 24 B2 22 22 A7 39 35 00 F7 |402:.IN$."".95..|
00000CE0: 14 60 00 8B 49 4E 24 B2 22 5E 22 A7 99 22 91 22 |.`..IN$."^".."."|
00000CF0: 42 4C 24 3A 89 39 30 00 1D 15 61 00 8B 49 4E 24 |BL$:.90...a..IN$|
00000D00: B3 B1 22 22 A7 54 4E 24 B2 49 4E 24 AA C8 28 42 |.."".TN$.IN$..(B|
00000D10: 4C 24 2C 32 31 AB C3 28 49 4E 24 29 29 00 37 15 |L$,21..(IN$)).7.|
00000D20: 62 00 99 22 91 22 51 24 52 24 22 20 20 3A 20 20 |b.."."Q$R$" : |
00000D30: 22 54 4E 24 22 20 22 00 6A 15 63 00 99 22 13 11 |"TN$" ".j.c.."..|
00000D40: 11 11 11 11 11 11 22 51 24 22 20 46 4F 4C 49 4F |......"Q$" FOLIO|
00000D50: 20 20 20 22 3B 3A 4C 49 B2 38 3A 8D 34 30 32 3A | ";:LI.8:.402:|
00000D60: 8B 49 4E 24 B2 22 22 A7 39 39 00 83 15 64 00 8B |.IN$."".99...d..|
00000D70: 49 4E 24 B2 22 5E 22 A7 99 22 91 22 42 4C 24 3A |IN$."^".."."BL$:|
00000D80: 89 39 34 00 A8 15 65 00 8B 49 4E 24 B3 B1 22 22 |.94...e..IN$..""|
00000D90: A7 54 46 24 B2 49 4E 24 AA C8 28 42 4C 24 2C 39 |.TF$.IN$..(BL$,9|
00000DA0: AB C3 28 49 4E 24 29 29 00 C5 15 66 00 99 22 91 |..(IN$))...f..".|
00000DB0: 22 51 24 22 20 46 4F 4C 49 4F 20 3A 20 20 22 54 |"Q$" FOLIO : "T|
00000DC0: 46 24 22 20 22 00 DE 15 67 00 54 52 24 B2 54 44 |F$" "...g.TR$.TD|
00000DD0: 24 AA 54 4E 24 AA 54 46 24 3A 99 42 4C 24 00 17 |$.TN$.TF$:.BL$..|
00000DE0: 16 68 00 99 42 4C 24 22 91 22 3A 99 C8 28 42 4C |.h..BL$".":..(BL|
00000DF0: 24 2C 32 32 AB C3 28 41 43 24 28 47 29 29 29 3B |$,22..(AC$(G)));|
00000E00: 41 43 24 28 47 29 3B 3A 85 22 20 3A 20 20 20 5E |AC$(G);:." : ^|
00000E10: 9D 9D 9D 22 3B 41 24 00 2B 16 69 00 8B C8 28 41 |...";A$.+.i...(A|
00000E20: 24 2C 31 29 B2 22 5E 22 A7 39 39 00 67 16 6A 00 |$,1)."^".99.g.j.|
00000E30: 41 B2 B5 28 31 30 30 AC C5 28 41 24 29 AA 2E 35 |A..(100..(A$)..5|
00000E40: 29 AD 31 30 30 3A 8B 28 41 B3 2E 30 31 29 B0 28 |).100:.(A..01).(|
00000E50: 41 B1 39 39 39 39 39 39 2E 39 39 29 A7 99 22 91 |A.999999.99)..".|
00000E60: 91 22 3A 89 31 30 34 00 98 16 6B 00 5A 24 B2 CA |.":.104...k.Z$..|
00000E70: 28 C4 28 41 29 2C 32 29 3A 8D 34 33 37 3A 99 22 |(.(A),2):.437:."|
00000E80: 91 22 A3 32 35 29 C8 28 42 4C 24 2C 31 32 AB C3 |.".25).(BL$,12..|
00000E90: 28 5A 24 29 29 3B 5A 24 00 C9 16 6C 00 41 B2 AB |(Z$));Z$...l.A..|
00000EA0: 31 AC 41 3A 54 4D B2 41 3A 8D 31 35 31 3A 41 B2 |1.A:TM.A:.151:A.|
00000EB0: 54 4D 3A 4A B2 36 3A 8B 28 41 B1 30 AF 47 B3 33 |TM:J.6:.(A.0.G.3|
00000EC0: 29 B0 47 B2 33 A7 4A B2 35 00 02 17 6D 00 99 42 |).G.3.J.5...m..B|
00000ED0: 4C 24 22 91 22 3A 99 C8 28 42 4C 24 2C 32 32 AB |L$".":..(BL$,22.|
00000EE0: C3 28 41 43 24 28 4A 29 29 29 3B 41 43 24 28 4A |.(AC$(J)));AC$(J|
00000EF0: 29 3B 3A 85 22 20 3A 20 20 20 5E 9D 9D 9D 22 3B |);:." : ^...";|
00000F00: 42 24 00 2B 17 6E 00 8B 28 C8 28 42 24 2C 31 29 |B$.+.n..(.(B$,1)|
00000F10: B2 22 5E 22 29 B0 28 C5 28 42 24 29 B3 30 29 A7 |."^").(.(B$).0).|
00000F20: 99 22 91 91 91 22 3A 89 31 30 34 00 5D 17 6F 00 |."...":.104.].o.|
00000F30: 8B 42 24 B2 22 40 22 A7 42 B2 AB 31 AC B5 28 31 |.B$."@".B..1..(1|
00000F40: 30 30 AC 28 41 AD 28 31 30 30 AA 56 29 AC 56 29 |00.(A.(100.V).V)|
00000F50: AA 2E 35 29 AD 31 30 30 3A 89 31 31 35 00 86 17 |..5).100:.115...|
00000F60: 70 00 42 B2 B5 28 31 30 30 AC C5 28 42 24 29 AA |p.B..(100..(B$).|
00000F70: 2E 35 29 AD 31 30 30 3A 54 4D B2 42 3A 8D 31 35 |.5).100:TM.B:.15|
00000F80: 31 3A 42 B2 54 4D 00 A1 17 71 00 8B 42 B1 30 AF |1:B.TM...q..B.0.|
00000F90: 42 B1 AB 31 AC 41 A7 99 22 91 91 22 3A 89 31 30 |B..1.A.."..":.10|
00000FA0: 39 00 BC 17 72 00 8B 42 B3 30 AF 42 B3 AB 31 AC |9...r..B.0.B..1.|
00000FB0: 41 A7 99 22 91 91 22 3A 89 31 30 39 00 ED 17 73 |A.."..":.109...s|
00000FC0: 00 5A 24 B2 CA 28 C4 28 42 29 2C 32 29 3A 8D 34 |.Z$..(.(B),2):.4|
00000FD0: 33 37 3A 99 22 91 22 A3 32 35 29 C8 28 42 4C 24 |37:.".".25).(BL$|
00000FE0: 2C 31 32 AB C3 28 5A 24 29 29 3B 5A 24 00 12 18 |,12..(Z$));Z$...|
00000FF0: 74 00 99 3A 49 B2 32 3A 43 54 B2 30 3A 41 42 B2 |t..:I.2:CT.0:AB.|
00001000: 41 AA 42 3A 8B 41 42 B2 30 A7 49 B2 30 3A 89 31 |A.B:.AB.0.I.0:.1|
00001010: 33 31 00 28 18 75 00 8B 28 49 B1 4E 41 29 B0 28 |31.(.u..(I.NA).(|
00001020: 49 B3 32 29 A7 49 B2 32 00 41 18 76 00 8B 28 47 |I.2).I.2.A.v..(G|
00001030: B1 32 B0 49 B1 34 29 AF 49 B3 31 31 A7 49 B2 31 |.2.I.4).I.11.I.1|
00001040: 31 00 50 18 77 00 8B 49 B2 47 A7 49 B2 47 AA 31 |1.P.w..I.G.I.G.1|
00001050: 00 78 18 78 00 41 43 B2 C3 28 41 43 24 28 49 29 |.x.x.AC..(AC$(I)|
00001060: 29 3A 8B 41 43 24 28 49 29 B2 22 5F 22 A7 49 B2 |):.AC$(I)."_".I.|
00001070: 49 AA 31 3A 89 31 31 37 00 B5 18 79 00 99 22 91 |I.1:.117...y..".|
00001080: 22 42 4C 24 22 91 22 3A 99 C8 28 42 4C 24 2C 32 |"BL$".":..(BL$,2|
00001090: 30 AB 41 43 29 3B 22 12 20 22 41 43 24 28 49 29 |0.AC);". "AC$(I)|
000010A0: 22 20 92 20 3A 20 20 20 3E 22 3B 3A 85 22 9D 9D |" . : >";:."..|
000010B0: 9D 22 3B 43 24 00 CC 18 7A 00 8B 43 24 B2 22 3E |.";C$...z..C$.">|
000010C0: 22 A7 49 B2 49 AA 31 3A 89 31 31 37 00 F7 18 7B |".I.I.1:.117...{|
000010D0: 00 8B C8 28 43 24 2C 31 29 B2 22 3E 22 A7 49 B2 |...(C$,1).">".I.|
000010E0: B5 28 C5 28 CA 28 43 24 2C 32 29 29 29 AC 31 30 |.(.(.(C$,2))).10|
000010F0: AB 39 3A 89 31 31 37 00 1D 19 7C 00 8B C8 28 43 |.9:.117...|...(C|
00001100: 24 2C 31 29 B2 22 3D 22 A7 49 B2 B5 28 C5 28 CA |$,1)."=".I..(.(.|
00001110: 28 43 24 2C 32 29 29 29 3A 89 31 31 37 00 4B 19 |(C$,2))):.117.K.|
00001120: 7D 00 8B 43 24 B2 22 40 22 A7 43 B2 B5 28 31 30 |}..C$."@".C..(10|
00001130: 30 AC 28 AB 31 AC 28 41 42 AA 43 54 29 29 AA 2E |0.(.1.(AB.CT))..|
00001140: 35 29 AD 31 30 30 3A 89 31 33 30 00 68 19 7E 00 |5).100:.130.h.~.|
00001150: 8B 43 24 B2 22 5E 22 AF 43 54 B2 30 A7 99 22 91 |.C$."^".CT.0..".|
00001160: 91 91 22 3A 89 31 30 39 00 7A 19 7F 00 8B C5 28 |..":.109.z.....(|
00001170: 43 24 29 B3 B2 30 A7 31 32 31 00 A3 19 80 00 43 |C$)..0.121.....C|
00001180: B2 B5 28 31 30 30 AC C5 28 43 24 29 AA 2E 35 29 |..(100..(C$)..5)|
00001190: AD 31 30 30 3A 54 4D B2 43 3A 8D 31 35 31 3A 43 |.100:TM.C:.151:C|
000011A0: B2 54 4D 00 DD 19 81 00 52 54 B2 B5 28 31 30 30 |.TM.....RT..(100|
000011B0: AC 28 41 42 AA 43 54 AA 43 29 AA 2E 35 29 AD 31 |.(AB.CT.C)..5).1|
000011C0: 30 30 3A 8B 28 43 B3 30 AF 52 54 B3 30 29 B0 28 |00:.(C.0.RT.0).(|
000011D0: 43 B1 30 AF 52 54 B1 30 29 A7 31 32 31 00 0E 1A |C.0.RT.0).121...|
000011E0: 82 00 5A 24 B2 CA 28 C4 28 43 29 2C 32 29 3A 8D |..Z$..(.(C),2):.|
000011F0: 34 33 37 3A 99 22 91 22 A3 32 35 29 C8 28 42 4C |437:.".".25).(BL|
00001200: 24 2C 31 32 AB C3 28 5A 24 29 29 3B 5A 24 00 37 |$,12..(Z$));Z$.7|
00001210: 1A 83 00 99 22 11 41 43 43 45 50 54 20 41 4E 41 |....".ACCEPT ANA|
00001220: 4C 59 53 49 53 20 3F 20 5B 12 59 92 2F 12 4E 92 |LYSIS ? [.Y./.N.|
00001230: 5D 22 3A 8D 34 32 34 00 52 1A 84 00 99 22 91 22 |]":.424.R...."."|
00001240: 42 4C 24 22 91 22 3A 8B 47 24 B2 22 59 22 A7 31 |BL$".":.G$."Y".1|
00001250: 33 35 00 69 1A 85 00 8B 41 42 B2 30 A7 99 22 91 |35.i....AB.0..".|
00001260: 91 91 91 22 3A 89 31 30 39 00 78 1A 86 00 99 22 |...":.109.x...."|
00001270: 91 22 3B 3A 89 31 32 31 00 A8 1A 87 00 49 24 B2 |.";:.121.....I$.|
00001280: CA 28 C4 28 49 29 2C 32 29 3A 54 41 24 B2 22 20 |.(.(I),2):TA$." |
00001290: 20 22 AA 54 54 24 AA 49 24 AA C8 28 42 4C 24 2C | ".TT$.I$..(BL$,|
000012A0: 33 AB C3 28 49 24 29 29 00 DC 1A 88 00 41 B2 B5 |3..(I$)).....A..|
000012B0: 28 31 30 30 AC 41 AA 2E 35 29 AD 31 30 30 3A 54 |(100.A..5).100:T|
000012C0: 52 28 47 29 B2 B5 28 31 30 30 AC 28 54 52 28 47 |R(G)..(100.(TR(G|
000012D0: 29 AA 41 29 AA 2E 35 29 AD 31 30 30 00 10 1B 89 |).A)..5).100....|
000012E0: 00 42 B2 B5 28 31 30 30 AC 42 AA 2E 35 29 AD 31 |.B..(100.B..5).1|
000012F0: 30 30 3A 54 52 28 4A 29 B2 B5 28 31 30 30 AC 28 |00:TR(J)..(100.(|
00001300: 54 52 28 4A 29 AA 42 29 AA 2E 35 29 AD 31 30 30 |TR(J).B)..5).100|
00001310: 00 44 1B 8A 00 43 B2 B5 28 31 30 30 AC 43 AA 2E |.D...C..(100.C..|
00001320: 35 29 AD 31 30 30 3A 54 52 28 49 29 B2 B5 28 31 |5).100:TR(I)..(1|
00001330: 30 30 AC 28 54 52 28 49 29 AA 43 29 AA 2E 35 29 |00.(TR(I).C)..5)|
00001340: AD 31 30 30 00 60 1B 8B 00 43 54 B2 B5 28 31 30 |.100.`...CT..(10|
00001350: 30 AC 28 43 54 AA 43 29 AA 2E 35 29 AD 31 30 30 |0.(CT.C)..5).100|
00001360: 00 8D 1B 8C 00 41 24 B2 C4 28 41 29 3A 5A 24 B2 |.....A$..(A):Z$.|
00001370: 41 24 3A 8D 34 33 37 3A 41 24 B2 C8 28 42 4C 24 |A$:.437:A$..(BL$|
00001380: 2C 31 30 AB C3 28 5A 24 29 29 AA 5A 24 00 BA 1B |,10..(Z$)).Z$...|
00001390: 8D 00 42 24 B2 C4 28 42 29 3A 5A 24 B2 42 24 3A |..B$..(B):Z$.B$:|
000013A0: 8D 34 33 37 3A 42 24 B2 C8 28 42 4C 24 2C 31 30 |.437:B$..(BL$,10|
000013B0: AB C3 28 5A 24 29 29 AA 5A 24 00 E7 1B 8E 00 43 |..(Z$)).Z$.....C|
000013C0: 24 B2 C4 28 43 29 3A 5A 24 B2 43 24 3A 8D 34 33 |$..(C):Z$.C$:.43|
000013D0: 37 3A 43 24 B2 C8 28 42 4C 24 2C 31 30 AB C3 28 |7:C$..(BL$,10..(|
000013E0: 5A 24 29 29 AA 5A 24 00 19 1C 8F 00 99 22 44 45 |Z$)).Z$......"DE|
000013F0: 54 41 49 4C 53 3A 20 22 3B 3A 4C 49 B2 32 30 3A |TAILS: ";:LI.20:|
00001400: 8D 34 30 32 3A 44 24 B2 49 4E 24 3A 8B 44 24 B2 |.402:D$.IN$:.D$.|
00001410: 22 22 A7 44 24 B2 22 3C 22 00 4C 1C 90 00 99 22 |"".D$."<".L...."|
00001420: 91 22 42 4C 24 22 91 22 3A 4E B2 4E AA 31 3A 54 |."BL$".":N.N.1:T|
00001430: 52 24 28 4E 29 B2 54 24 AA 54 52 24 AA 41 24 AA |R$(N).T$.TR$.A$.|
00001440: 42 24 AA 43 24 AA 54 41 24 AA 44 24 00 84 1C 91 |B$.C$.TA$.D$....|
00001450: 00 8B B5 28 31 30 30 AC 28 41 42 AA 43 54 29 AA |...(100.(AB.CT).|
00001460: 2E 35 29 AD 31 30 30 B3 B1 30 A7 41 B2 30 3A 42 |.5).100..0.A.0:B|
00001470: B2 30 3A 54 52 24 B2 42 4C 24 3A 99 22 91 22 3A |.0:TR$.BL$:.".":|
00001480: 89 31 32 31 00 B1 1C 92 00 8D 34 37 30 3A 99 22 |.121......470:."|
00001490: 12 20 4F 4B 20 92 20 20 41 4E 4F 54 48 45 52 20 |. OK . ANOTHER |
000014A0: 22 51 24 22 20 3F 20 5B 12 59 92 2F 12 4E 92 5D |"Q$" ? [.Y./.N.]|
000014B0: 22 00 CA 1C 93 00 4B 24 B2 22 22 3A A1 4B 24 3A |".....K$."":.K$:|
000014C0: 8B 4B 24 B2 22 22 A7 31 34 37 00 D9 1C 94 00 8B |.K$."".147......|
000014D0: 4B 24 B2 22 59 22 A7 38 32 00 E1 1C 95 00 89 36 |K$."Y".82......6|
000014E0: 38 00 19 1D 97 00 8B 28 47 B3 33 AF 54 4D 24 B2 |8......(G.3.TM$.|
000014F0: 22 52 22 29 B0 28 47 B2 33 AF 54 4D 24 B2 22 49 |"R").(G.3.TM$."I|
00001500: 22 29 B0 28 47 B2 34 AF 54 4D 24 B2 22 43 22 29 |").(G.4.TM$."C")|
00001510: A7 54 4D B2 AB 31 AC 54 4D 00 1F 1D 98 00 8E 00 |.TM..1.TM.......|
00001520: 32 1D 9A 00 99 3A 49 B2 31 3A 4A B2 31 3A 43 54 |2....:I.1:J.1:CT|
00001530: B2 30 00 46 1D 9B 00 8B 28 49 B1 4E 41 B0 49 B3 |.0.F....(I.NA.I.|
00001540: 31 29 A7 49 B2 31 00 61 1D 9C 00 8B 41 43 24 28 |1).I.1.a....AC$(|
00001550: 49 29 B2 22 5F 22 A7 49 B2 49 AA 31 3A 89 31 35 |I)."_".I.I.1:.15|
00001560: 35 00 8F 1D 9D 00 99 22 91 22 42 4C 24 22 91 22 |5......"."BL$"."|
00001570: 3A 4A 24 B2 CA 28 C4 28 4A 29 2C 32 29 3A 99 4A |:J$..(.(J),2):.J|
00001580: 24 3B 3A 41 43 B2 C3 28 41 43 24 28 49 29 29 00 |$;:AC..(AC$(I)).|
00001590: C7 1D 9E 00 99 C8 28 42 4C 24 2C 32 33 AB 41 43 |......(BL$,23.AC|
000015A0: AB C3 28 4A 24 29 29 3B 22 12 20 22 41 43 24 28 |..(J$));". "AC$(|
000015B0: 49 29 22 20 92 22 3B 3A 85 22 20 3A 20 20 20 3E |I)" .";:." : >|
000015C0: 9D 9D 9D 22 3B 43 24 00 D8 1D 9F 00 8B 43 24 B3 |...";C$......C$.|
000015D0: B1 22 5E 22 A7 31 36 31 00 EC 1D A0 00 8B 43 54 |."^".161......CT|
000015E0: B2 30 A7 54 B2 54 AB 31 3A 89 36 38 00 03 1E A1 |.0.T.T.1:.68....|
000015F0: 00 8B 43 24 B2 22 3E 22 A7 49 B2 49 AA 31 3A 89 |..C$.">".I.I.1:.|
00001600: 31 35 35 00 2E 1E A2 00 8B C8 28 43 24 2C 31 29 |155.......(C$,1)|
00001610: B2 22 3E 22 A7 49 B2 B5 28 C5 28 CA 28 43 24 2C |.">".I..(.(.(C$,|
00001620: 32 29 29 29 AC 31 30 AB 39 3A 89 31 35 35 00 54 |2))).10.9:.155.T|
00001630: 1E A3 00 8B C8 28 43 24 2C 31 29 B2 22 3D 22 A7 |.....(C$,1)."=".|
00001640: 49 B2 B5 28 C5 28 CA 28 43 24 2C 32 29 29 29 3A |I..(.(.(C$,2))):|
00001650: 89 31 35 35 00 90 1E A4 00 43 B2 B5 28 31 30 30 |.155.....C..(100|
00001660: AC C5 28 43 24 29 AA 2E 35 29 AD 31 30 30 3A 8B |..(C$)..5).100:.|
00001670: 28 43 B2 30 B0 43 B3 AB 39 39 39 39 39 2E 39 39 |(C.0.C..99999.99|
00001680: B0 43 B1 39 39 39 39 39 2E 39 39 29 A7 31 35 37 |.C.99999.99).157|
00001690: 00 C6 1E A5 00 5A 24 B2 C4 28 43 29 3A 8D 34 33 |.....Z$..(C):.43|
000016A0: 37 3A 43 24 B2 C8 28 42 4C 24 2C 31 30 AB C3 28 |7:C$..(BL$,10..(|
000016B0: 5A 24 29 29 AA 5A 24 3A 99 22 91 22 A3 32 38 29 |Z$)).Z$:.".".28)|
000016C0: 22 20 22 3B 43 24 00 F3 1E A6 00 49 24 B2 CA 28 |" ";C$.....I$..(|
000016D0: C4 28 49 29 2C 32 29 3A 54 41 24 B2 22 20 20 4A |.(I),2):TA$." J|
000016E0: 22 AA 49 24 AA C8 28 42 4C 24 2C 33 AB C3 28 49 |".I$..(BL$,3..(I|
000016F0: 24 29 29 00 2D 1F A7 00 43 54 B2 B5 28 31 30 30 |$)).-...CT..(100|
00001700: AC 28 43 54 AA 43 29 AA 2E 35 29 AD 31 30 30 3A |.(CT.C)..5).100:|
00001710: 54 52 28 49 29 B2 B5 28 31 30 30 AC 28 54 52 28 |TR(I)..(100.(TR(|
00001720: 49 29 AA 43 29 AA 2E 35 29 AD 31 30 30 00 60 1F |I).C)..5).100.`.|
00001730: A8 00 99 22 11 44 45 54 41 49 4C 53 3A 20 22 3B |...".DETAILS: ";|
00001740: 3A 4C 49 B2 32 30 3A 8D 34 30 32 3A 44 24 B2 49 |:LI.20:.402:D$.I|
00001750: 4E 24 3A 8B 44 24 B2 22 22 A7 44 24 B2 22 3C 22 |N$:.D$."".D$."<"|
00001760: 00 A0 1F A9 00 99 22 91 22 42 4C 24 22 91 22 3A |......"."BL$".":|
00001770: 4E B2 4E AA 31 3A 54 52 24 28 4E 29 B2 54 24 AA |N.N.1:TR$(N).T$.|
00001780: 44 41 24 AA 22 20 4A 4F 55 52 4E 41 4C 20 20 20 |DA$." JOURNAL |
00001790: 20 22 AA 42 4C 24 AA 43 24 AA 54 41 24 AA 44 24 | ".BL$.C$.TA$.D$|
000017A0: 00 B6 1F AA 00 8B 43 54 B3 B1 30 A7 4A B2 4A AA |......CT..0.J.J.|
000017B0: 31 3A 89 31 35 37 00 ED 1F AB 00 99 22 45 4E 54 |1:.157......"ENT|
000017C0: 52 49 45 53 20 4E 4F 57 20 42 41 4C 41 4E 43 45 |RIES NOW BALANCE|
000017D0: 20 2D 20 43 4F 4E 54 49 4E 55 45 20 3F 20 5B 12 | - CONTINUE ? [.|
000017E0: 59 92 2F 12 4E 92 5D 22 3A 8D 34 32 34 00 0F 20 |Y./.N.]":.424.. |
000017F0: AC 00 8B 47 24 B2 22 59 22 A7 4A B2 4A AA 31 3A |...G$."Y".J.J.1:|
00001800: 99 22 91 22 42 4C 24 22 91 22 3A 89 31 35 37 00 |."."BL$".":.157.|
00001810: 17 20 AD 00 89 36 38 00 42 20 AF 00 8D 34 33 30 |. ...68.B ...430|
00001820: 3A 99 22 12 20 54 52 41 4E 53 41 43 54 49 4F 4E |:.". TRANSACTION|
00001830: 20 46 49 4C 45 20 92 20 20 22 46 24 22 9D 9D 20 | FILE . "F$".. |
00001840: 20 22 00 67 20 B0 00 99 22 11 11 52 45 43 4F 52 | ".g ..."..RECOR|
00001850: 44 53 20 20 20 3A 20 20 12 56 92 49 45 57 20 45 |DS : .V.IEW E|
00001860: 4E 54 52 49 45 53 22 00 8A 20 B1 00 99 22 11 20 |NTRIES".. ...". |
00001870: 20 20 20 20 20 20 20 20 20 3A 20 20 12 53 92 45 | : .S.E|
00001880: 41 52 43 48 20 4C 49 4E 45 22 00 AE 20 B2 00 99 |ARCH LINE".. ...|
00001890: 22 11 50 52 49 4E 54 20 20 20 20 20 3A 20 20 12 |".PRINT : .|
000018A0: 42 92 41 54 43 48 20 52 45 50 4F 52 54 22 00 D5 |B.ATCH REPORT"..|
000018B0: 20 B3 00 99 22 11 20 20 20 20 20 20 20 20 20 20 | ...". |
000018C0: 3A 20 20 12 50 92 4F 53 54 49 4E 47 20 44 45 54 |: .P.OSTING DET|
000018D0: 41 49 4C 53 22 00 FD 20 B4 00 99 22 11 20 20 20 |AILS".. ...". |
000018E0: 20 20 20 20 20 20 20 3A 20 20 12 41 92 4E 41 4C | : .A.NAL|
000018F0: 59 53 49 53 20 53 55 4D 4D 41 52 59 22 00 36 21 |YSIS SUMMARY".6!|
00001900: B5 00 99 22 11 53 41 56 45 20 54 4F 20 20 20 3A |...".SAVE TO :|
00001910: 20 20 12 44 92 49 53 4B 20 4F 52 20 12 54 92 41 | .D.ISK OR .T.A|
00001920: 50 45 22 3A 8B 46 B2 31 B0 54 52 24 28 31 29 B2 |PE":.F.1.TR$(1).|
00001930: 22 22 A7 31 38 33 00 65 21 B6 00 99 22 11 50 4F |"".183.e!...".PO|
00001940: 53 54 49 4E 47 53 20 20 3A 20 20 12 55 92 50 44 |STINGS : .U.PD|
00001950: 41 54 45 20 41 43 43 4F 55 4E 54 20 42 41 4C 41 |ATE ACCOUNT BALA|
00001960: 4E 43 45 53 22 00 8A 21 B7 00 99 22 11 11 5B 12 |NCES"..!..."..[.|
00001970: 52 45 54 55 52 4E 92 5D 20 54 52 41 4E 53 41 43 |RETURN.] TRANSAC|
00001980: 54 20 4F 50 54 49 4F 4E 53 22 00 9E 21 B8 00 8D |T OPTIONS"..!...|
00001990: 34 32 36 3A 8B 47 24 B2 43 52 24 A7 35 33 00 C8 |426:.G$.CR$.53..|
000019A0: 21 B9 00 81 47 B2 31 A4 38 3A 8B 47 24 B3 B1 CA |!...G.1.8:.G$...|
000019B0: 28 22 42 50 41 56 53 55 44 54 22 2C 47 2C 31 29 |("BPAVSUDT",G,1)|
000019C0: A7 82 47 3A 89 31 38 34 00 D6 21 BA 00 8B 47 B3 |..G:.184..!...G.|
000019D0: 34 A7 8D 34 34 33 00 F3 21 BB 00 8B 47 B2 36 AF |4..443..!...G.6.|
000019E0: 28 46 B2 31 B0 54 52 24 28 31 29 B2 22 22 29 A7 |(F.1.TR$(1)."").|
000019F0: 31 38 34 00 1A 22 BC 00 91 47 89 31 39 30 2C 31 |184.."...G.190,1|
00001A00: 39 36 2C 32 30 33 2C 32 32 31 2C 32 36 35 2C 32 |96,203,221,265,2|
00001A10: 31 30 2C 32 33 39 2C 32 33 39 00 58 22 BE 00 8D |10,239,239.X"...|
00001A20: 34 33 30 3A 99 22 12 20 54 52 41 4E 53 41 43 54 |430:.". TRANSACT|
00001A30: 49 4F 4E 20 52 45 50 4F 52 54 20 92 11 11 22 3A |ION REPORT ...":|
00001A40: 99 22 12 20 50 52 49 4E 54 20 92 20 49 4E 20 50 |.". PRINT . IN P|
00001A50: 52 4F 47 52 45 53 53 22 00 7D 22 BF 00 8D 33 33 |ROGRESS".}"...33|
00001A60: 35 3A 8D 34 33 33 3A 99 22 54 52 41 4E 53 41 43 |5:.433:."TRANSAC|
00001A70: 54 49 4F 4E 20 52 45 50 4F 52 54 22 3B 00 AF 22 |TION REPORT";.."|
00001A80: C0 00 99 A6 31 36 29 3B 22 46 4F 4C 49 4F 22 3B |....16);"FOLIO";|
00001A90: A6 39 29 3B 22 54 4F 54 41 4C 22 3B A6 37 29 3B |.9);"TOTAL";.7);|
00001AA0: 22 56 41 54 22 3B A6 37 29 3B 22 4E 45 54 22 00 |"VAT";.7);"NET".|
00001AB0: D2 22 C1 00 8D 34 33 34 3A 99 3A 81 49 B2 31 A4 |."...434:.:.I.1.|
00001AC0: 4E 3A 99 C8 28 54 52 24 28 49 29 2C 37 39 29 3A |N:..(TR$(I),79):|
00001AD0: 82 49 00 E8 22 C2 00 99 3A 8D 34 33 34 3A 98 34 |.I.."...:.434:.4|
00001AE0: 3A A0 34 3A 89 31 37 35 00 23 23 C4 00 8D 34 33 |:.4:.175.##...43|
00001AF0: 30 3A 99 22 12 20 50 4F 53 54 49 4E 47 20 44 45 |0:.". POSTING DE|
00001B00: 54 41 49 4C 53 20 92 11 11 22 3A 99 22 12 20 50 |TAILS ...":.". P|
00001B10: 52 49 4E 54 20 92 20 49 4E 20 50 52 4F 47 52 45 |RINT . IN PROGRE|
00001B20: 53 53 22 00 4C 23 C5 00 8D 33 33 35 3A 8D 34 33 |SS".L#...335:.43|
00001B30: 33 3A 99 22 54 52 4E 20 20 20 20 41 4D 4F 55 4E |3:."TRN AMOUN|
00001B40: 54 20 20 44 45 54 41 49 4C 53 22 3B 00 68 23 C6 |T DETAILS";.h#.|
00001B50: 00 99 A6 31 37 29 3B 22 50 4F 53 54 49 4E 47 53 |...17);"POSTINGS|
00001B60: 22 3A 8D 34 33 34 3A 99 00 9E 23 C7 00 81 49 B2 |":.434:...#...I.|
00001B70: 31 A4 4E 3A 99 C8 28 54 52 24 28 49 29 2C 34 29 |1.N:..(TR$(I),4)|
00001B80: 3B CA 28 54 52 24 28 49 29 2C 36 35 2C 31 31 29 |;.(TR$(I),65,11)|
00001B90: 3B CA 28 54 52 24 28 49 29 2C 38 30 29 3B 00 C9 |;.(TR$(I),80);..|
00001BA0: 23 C8 00 4B B2 C3 28 CA 28 54 52 24 28 49 29 2C |#..K..(.(TR$(I),|
00001BB0: 38 30 29 29 3A 99 C8 28 42 4C 24 2C 32 30 AB 4B |80)):..(BL$,20.K|
00001BC0: 29 3B 22 20 3A 20 20 22 3B 00 F8 23 C9 00 4A B2 |);" : ";..#..J.|
00001BD0: C5 28 CA 28 54 52 24 28 49 29 2C 37 37 2C 33 29 |.(.(TR$(I),77,3)|
00001BE0: 29 3A 99 41 43 24 28 4A 29 3B 22 20 41 2F 43 22 |):.AC$(J);" A/C"|
00001BF0: 3A 82 49 3A 89 31 39 34 00 34 24 CB 00 8D 34 33 |:.I:.194.4$...43|
00001C00: 30 3A 99 22 12 20 53 55 4D 4D 41 52 59 20 41 4E |0:.". SUMMARY AN|
00001C10: 41 4C 59 53 49 53 20 92 11 11 22 3A 99 22 12 20 |ALYSIS ...":.". |
00001C20: 50 52 49 4E 54 20 92 20 49 4E 20 50 52 4F 47 52 |PRINT . IN PROGR|
00001C30: 45 53 53 22 00 5F 24 CC 00 8D 33 33 35 3A 8D 34 |ESS"._$...335:.4|
00001C40: 33 32 3A 99 22 54 52 41 4E 53 41 43 54 49 4F 4E |32:."TRANSACTION|
00001C50: 20 41 4E 41 4C 59 53 49 53 22 3A 8D 34 33 35 00 | ANALYSIS":.435.|
00001C60: 7A 24 CD 00 99 3A 81 49 B2 31 A4 4E 41 3A 8B 54 |z$...:.I.1.NA:.T|
00001C70: 52 28 49 29 B2 30 A7 32 30 38 00 9B 24 CE 00 99 |R(I).0.208..$...|
00001C80: 41 43 24 28 49 29 3B C8 28 42 4C 24 2C 32 37 AB |AC$(I);.(BL$,27.|
00001C90: C3 28 41 43 24 28 49 29 29 29 3B 00 C4 24 CF 00 |.(AC$(I)));..$..|
00001CA0: 5A 24 B2 C4 28 54 52 28 49 29 29 3A 8D 34 33 37 |Z$..(TR(I)):.437|
00001CB0: 3A 99 C8 28 42 4C 24 2C 31 30 AB C3 28 5A 24 29 |:..(BL$,10..(Z$)|
00001CC0: 29 3B 5A 24 00 DD 24 D0 00 82 49 3A 99 3A 8D 34 |);Z$..$...I:.:.4|
00001CD0: 33 35 3A 98 34 3A A0 34 3A 89 31 37 35 00 FF 24 |35:.4:.4:.175..$|
00001CE0: D2 00 8D 34 33 30 3A 99 22 12 20 41 43 43 4F 55 |...430:.". ACCOU|
00001CF0: 4E 54 53 20 55 50 44 41 54 45 20 92 11 11 22 00 |NTS UPDATE ...".|
00001D00: 2D 25 D3 00 99 22 54 52 41 4E 53 41 43 54 49 4F |-%..."TRANSACTIO|
00001D10: 4E 20 46 49 4C 45 20 44 45 54 41 49 4C 53 20 57 |N FILE DETAILS W|
00001D20: 49 4C 4C 20 42 45 20 57 49 50 45 44 22 00 5A 25 |ILL BE WIPED".Z%|
00001D30: D4 00 99 22 20 20 20 41 46 54 45 52 20 12 20 50 |..." AFTER . P|
00001D40: 4F 53 54 49 4E 47 20 92 20 54 4F 20 41 43 43 4F |OSTING . TO ACCO|
00001D50: 55 4E 54 53 20 46 49 4C 45 22 00 88 25 D5 00 99 |UNTS FILE"..%...|
00001D60: 22 45 4E 53 55 52 45 20 41 4C 4C 20 52 45 50 4F |"ENSURE ALL REPO|
00001D70: 52 54 53 20 41 52 45 20 50 52 49 4E 54 45 44 20 |RTS ARE PRINTED |
00001D80: 41 4E 44 20 54 48 45 22 00 B6 25 D6 00 99 22 54 |AND THE"..%..."T|
00001D90: 52 41 4E 53 41 43 54 49 4F 4E 20 46 49 4C 45 20 |RANSACTION FILE |
00001DA0: 53 41 56 45 44 20 54 4F 20 44 49 53 4B 20 4F 52 |SAVED TO DISK OR|
00001DB0: 20 54 41 50 45 22 00 F2 25 D7 00 99 22 11 11 12 | TAPE"..%..."...|
00001DC0: 43 92 4F 4E 54 49 4E 55 45 20 4F 52 20 5B 12 52 |C.ONTINUE OR [.R|
00001DD0: 45 54 55 52 4E 92 5D 20 4F 50 54 49 4F 4E 53 22 |ETURN.] OPTIONS"|
00001DE0: 3A 8D 34 32 36 3A 8B 47 24 B3 B1 22 43 22 A7 31 |:.426:.G$.."C".1|
00001DF0: 37 35 00 23 26 D8 00 81 49 B2 31 A4 4E 41 3A 41 |75.#&...I.1.NA:A|
00001E00: 43 28 49 29 B2 B5 28 31 30 30 AC 28 41 43 28 49 |C(I)..(100.(AC(I|
00001E10: 29 AA 54 52 28 49 29 29 AA 2E 35 29 AD 31 30 30 |).TR(I))..5).100|
00001E20: 3A 82 49 00 35 26 D9 00 8D 32 31 39 3A 55 B2 31 |:.I.5&...219:U.1|
00001E30: 3A 89 32 38 36 00 70 26 DB 00 46 24 B2 22 22 3A |:.286.p&..F$."":|
00001E40: 81 49 B2 31 A4 4E 3A 54 52 24 28 49 29 B2 22 22 |.I.1.N:TR$(I).""|
00001E50: 3A 82 49 3A 81 49 B2 31 A4 4E 41 3A 54 52 28 49 |:.I:.I.1.NA:TR(I|
00001E60: 29 B2 30 3A 82 49 3A 4E B2 30 3A 54 B2 30 3A 8E |).0:.I:N.0:T.0:.|
00001E70: 00 95 26 DD 00 8D 34 33 30 3A 99 22 12 20 56 49 |..&...430:.". VI|
00001E80: 45 57 20 54 52 41 4E 53 41 43 54 49 4F 4E 53 20 |EW TRANSACTIONS |
00001E90: 92 11 11 11 22 00 D2 26 DE 00 99 22 91 53 54 41 |...."..&...".STA|
00001EA0: 52 54 20 56 49 45 57 20 46 52 4F 4D 20 12 20 4E |RT VIEW FROM . N|
00001EB0: 55 4D 42 45 52 20 92 20 3A 20 22 3B 3A 4C 49 B2 |UMBER . : ";:LI.|
00001EC0: 33 3A 8D 34 30 32 3A 8B 49 4E 24 B2 22 22 A7 31 |3:.402:.IN$."".1|
00001ED0: 37 35 00 06 27 DF 00 4B B2 B5 28 C5 28 49 4E 24 |75..'..K..(.(IN$|
00001EE0: 29 29 3A 81 49 B2 31 A4 4E 3A 8B 28 C5 28 C8 28 |)):.I.1.N:.(.(.(|
00001EF0: 54 52 24 28 49 29 2C 34 29 29 B3 B1 4B 29 A7 82 |TR$(I),4))..K)..|
00001F00: 49 3A 89 32 32 32 00 2A 27 E0 00 8D 34 33 30 3A |I:.222.*'...430:|
00001F10: 99 22 12 20 56 49 45 57 20 54 52 41 4E 53 41 43 |.". VIEW TRANSAC|
00001F20: 54 49 4F 4E 53 20 92 11 11 22 00 57 27 E1 00 8C |TIONS ...".W'...|
00001F30: 3A 81 4A B2 31 A4 35 3A 87 51 24 3A 8B C8 28 51 |:.J.1.5:.Q$:..(Q|
00001F40: 24 2C 31 29 B3 B1 CA 28 54 52 24 28 49 29 2C 37 |$,1)...(TR$(I),7|
00001F50: 36 2C 31 29 A7 82 4A 00 78 27 E2 00 99 22 20 20 |6,1)..J.x'..." |
00001F60: 12 20 4E 55 4D 42 45 52 20 92 20 20 22 C8 28 54 |. NUMBER . ".(T|
00001F70: 52 24 28 49 29 2C 34 29 00 9B 27 E3 00 99 22 20 |R$(I),4)..'..." |
00001F80: 20 12 20 44 41 54 45 20 20 20 92 20 20 22 CA 28 | . DATE . ".(|
00001F90: 54 52 24 28 49 29 2C 35 2C 38 29 00 C0 27 E4 00 |TR$(I),5,8)..'..|
00001FA0: 99 22 20 20 12 20 4E 41 4D 45 20 20 20 92 20 20 |." . NAME . |
00001FB0: 22 CA 28 54 52 24 28 49 29 2C 31 34 2C 32 30 29 |".(TR$(I),14,20)|
00001FC0: 00 E5 27 E5 00 8B CA 28 54 52 24 28 49 29 2C 31 |..'....(TR$(I),1|
00001FD0: 34 2C 37 29 B2 22 4A 4F 55 52 4E 41 4C 22 A7 99 |4,7)."JOURNAL"..|
00001FE0: 3A 89 32 33 33 00 0B 28 E6 00 99 22 20 20 12 20 |:.233..(..." . |
00001FF0: 46 4F 4C 49 4F 20 20 92 20 20 22 CA 28 54 52 24 |FOLIO . ".(TR$|
00002000: 28 49 29 2C 33 35 2C 38 29 3A 99 00 2C 28 E7 00 |(I),35,8):..,(..|
00002010: 99 CA 28 54 52 24 28 49 29 2C 34 34 2C 31 30 29 |..(TR$(I),44,10)|
00002020: 22 20 20 12 20 22 51 24 22 20 92 22 00 4C 28 E8 |" . "Q$" .".L(.|
00002030: 00 99 CA 28 54 52 24 28 49 29 2C 35 34 2C 31 30 |...(TR$(I),54,10|
00002040: 29 22 20 20 12 20 56 41 54 20 92 22 00 87 28 E9 |)" . VAT ."..(.|
00002050: 00 99 CA 28 54 52 24 28 49 29 2C 36 34 2C 31 30 |...(TR$(I),64,10|
00002060: 29 22 20 20 12 20 22 CA 28 54 52 24 28 49 29 2C |)" . ".(TR$(I),|
00002070: 38 30 29 22 20 92 20 3A 22 CA 28 54 52 24 28 49 |80)" . :".(TR$(I|
00002080: 29 2C 37 37 2C 33 29 00 AF 28 EA 00 8B 49 B3 4E |),77,3)..(...I.N|
00002090: A7 8B C5 28 C8 28 54 52 24 28 49 AA 31 29 2C 34 |...(.(TR$(I.1),4|
000020A0: 29 29 B2 4B A7 49 B2 49 AA 31 3A 89 32 33 33 00 |)).K.I.I.1:.233.|
000020B0: D7 28 EB 00 99 22 11 11 43 4F 4E 54 49 4E 55 45 |.(..."..CONTINUE|
000020C0: 20 56 49 45 57 20 3F 20 5B 12 59 92 2F 12 4E 92 | VIEW ? [.Y./.N.|
000020D0: 5D 22 3A 8D 34 32 34 00 FA 28 EC 00 8B 47 24 B2 |]":.424..(...G$.|
000020E0: 22 59 22 AF 49 B3 4E A7 49 B2 49 AA 31 3A 4B B2 |"Y".I.N.I.I.1:K.|
000020F0: 4B AA 31 3A 8C 3A 89 32 32 34 00 03 29 ED 00 89 |K.1:.:.224..)...|
00002100: 31 37 35 00 26 29 EF 00 8D 34 33 30 3A 99 22 12 |175.&)...430:.".|
00002110: 20 54 52 41 4E 53 41 43 54 49 4F 4E 20 46 49 4C | TRANSACTION FIL|
00002120: 45 20 92 11 11 22 00 5C 29 F0 00 99 22 45 4E 54 |E ...".\)..."ENT|
00002130: 45 52 20 46 49 4C 45 20 12 20 4E 41 4D 45 20 92 |ER FILE . NAME .|
00002140: 20 3A 20 22 3B 3A 4C 49 B2 31 34 3A 8D 34 30 32 | : ";:LI.14:.402|
00002150: 3A 8B 49 4E 24 B2 22 22 A7 31 37 35 00 83 29 F1 |:.IN$."".175..).|
00002160: 00 46 24 B2 49 4E 24 AA 22 2E 54 22 3A 8B 47 24 |.F$.IN$.".T":.G$|
00002170: B2 22 43 22 A7 9F 31 2C 31 2C 31 2C 46 24 3A 89 |."C"..1,1,1,F$:.|
00002180: 32 34 33 00 A3 29 F2 00 9F 31 2C 38 2C 31 2C 22 |243..)...1,8,1,"|
00002190: 30 3A 22 AA 46 24 AA 22 2C 53 45 51 2C 57 52 49 |0:".F$.",SEQ,WRI|
000021A0: 54 45 22 00 DA 29 F3 00 99 22 13 11 11 11 11 11 |TE"..)..."......|
000021B0: 22 42 4C 24 3A 99 22 91 53 41 56 49 4E 47 20 46 |"BL$:.".SAVING F|
000021C0: 49 4C 45 20 12 20 22 3B C8 28 46 24 2C C3 28 46 |ILE . ";.(F$,.(F|
000021D0: 24 29 AB 32 29 3B 22 20 92 22 00 FB 29 F4 00 98 |$).2);" ."..)...|
000021E0: 31 2C 44 41 24 3B 43 52 24 3B 3A 98 31 2C 4E 3B |1,DA$;CR$;:.1,N;|
000021F0: 43 52 24 3B 3A 81 4B B2 31 A4 4E 00 2C 2A F5 00 |CR$;:.K.1.N.,*..|
00002200: 98 31 2C C8 28 54 52 24 28 4B 29 2C 37 39 29 3B |.1,.(TR$(K),79);|
00002210: 43 52 24 3B 3A 98 31 2C CA 28 54 52 24 28 4B 29 |CR$;:.1,.(TR$(K)|
00002220: 2C 38 30 29 3B 43 52 24 3B 3A 82 4B 00 5C 2A F6 |,80);CR$;:.K.\*.|
00002230: 00 98 31 2C 4E 41 3B 43 52 24 3B 3A 81 4B B2 31 |..1,NA;CR$;:.K.1|
00002240: A4 4E 41 3A 98 31 2C 54 52 28 4B 29 3B 43 52 24 |.NA:.1,TR(K);CR$|
00002250: 3B 3A 82 4B 3A A0 31 3A 89 31 37 35 00 7F 2A F8 |;:.K:.1:.175..*.|
00002260: 00 8D 34 33 30 3A 99 22 12 20 54 52 41 4E 53 41 |..430:.". TRANSA|
00002270: 43 54 49 4F 4E 20 46 49 4C 45 20 92 11 11 22 00 |CTION FILE ...".|
00002280: A4 2A F9 00 99 22 4C 4F 41 44 20 46 52 4F 4D 20 |.*..."LOAD FROM |
00002290: 3A 20 20 12 44 92 49 53 4B 20 4F 52 20 12 54 92 |: .D.ISK OR .T.|
000022A0: 41 50 45 22 00 B8 2A FA 00 8D 34 32 36 3A 8B 47 |APE"..*...426:.G|
000022B0: 24 B2 43 52 24 A7 35 33 00 DC 2A FB 00 81 47 B2 |$.CR$.53..*...G.|
000022C0: 31 A4 32 3A 8B 47 24 B3 B1 CA 28 22 44 54 22 2C |1.2:.G$...("DT",|
000022D0: 47 2C 31 29 A7 82 47 3A 89 32 35 30 00 14 2B FC |G,1)..G:.250..+.|
000022E0: 00 99 22 13 11 11 11 11 11 22 42 4C 24 3A 99 22 |.."......"BL$:."|
000022F0: 91 45 4E 54 45 52 20 46 49 4C 45 20 12 20 4E 41 |.ENTER FILE . NA|
00002300: 4D 45 20 92 20 3A 20 22 3B 3A 4C 49 B2 31 34 3A |ME . : ";:LI.14:|
00002310: 8D 34 30 32 00 24 2B FD 00 8B 49 4E 24 B2 22 22 |.402.$+...IN$.""|
00002320: A7 32 34 38 00 59 2B FE 00 46 24 B2 49 4E 24 AA |.248.Y+..F$.IN$.|
00002330: 22 2E 54 22 3A 8B 47 B2 31 A7 9F 31 2C 38 2C 30 |".T":.G.1..1,8,0|
00002340: 2C 22 30 3A 22 AA 46 24 AA 22 2C 53 45 51 2C 52 |,"0:".F$.",SEQ,R|
00002350: 45 41 44 22 3A 89 32 35 36 00 71 2B FF 00 8D 34 |EAD":.256.q+...4|
00002360: 33 30 3A 9F 31 2C 31 2C 30 2C 46 24 3A 89 32 36 |30:.1,1,0,F$:.26|
00002370: 30 00 91 2B 00 01 9F 31 35 2C 38 2C 31 35 3A 84 |0..+...15,8,15:.|
00002380: 31 35 2C 45 2C 45 24 3A 8B 45 B3 31 39 A7 32 36 |15,E,E$:.E.19.26|
00002390: 30 00 C6 2B 01 01 A0 31 3A 99 22 13 11 11 11 11 |0..+...1:.".....|
000023A0: 11 22 42 4C 24 3A 99 22 91 22 3B 45 24 3B 22 3A |."BL$:.".";E$;":|
000023B0: 20 50 52 45 53 53 20 5B 12 52 45 54 55 52 4E 92 | PRESS [.RETURN.|
000023C0: 5D 22 3A A0 31 35 00 DC 2B 02 01 8D 34 32 32 3A |]":.15..+...422:|
000023D0: 8B 47 24 B3 B1 43 52 24 A7 32 35 38 00 E4 2B 03 |.G$..CR$.258..+.|
000023E0: 01 89 35 33 00 1D 2C 04 01 99 22 13 11 11 11 11 |..53..,...".....|
000023F0: 11 22 42 4C 24 3A 99 22 91 12 20 22 3B C8 28 46 |."BL$:.".. ";.(F|
00002400: 24 2C C3 28 46 24 29 AB 32 29 3B 22 20 92 20 46 |$,.(F$).2);" . F|
00002410: 49 4C 45 20 4C 4F 41 44 49 4E 47 22 3B 00 50 2C |ILE LOADING";.P,|
00002420: 05 01 84 31 2C 50 44 24 3A 84 31 2C 4E 3A 81 4B |...1,PD$:.1,N:.K|
00002430: B2 31 A4 4E 3A 84 31 2C 58 24 3A 84 31 2C 59 24 |.1.N:.1,X$:.1,Y$|
00002440: 3A 54 52 24 28 4B 29 B2 58 24 AA 59 24 3A 82 4B |:TR$(K).X$.Y$:.K|
00002450: 00 7D 2C 06 01 84 31 2C 4E 41 3A 81 4B B2 31 A4 |.},...1,NA:.K.1.|
00002460: 4E 41 3A 84 31 2C 54 52 28 4B 29 3A 82 4B 3A A0 |NA:.1,TR(K):.K:.|
00002470: 31 3A 8B 47 24 B2 22 44 22 A7 A0 31 35 00 B7 2C |1:.G$."D"..15..,|
00002480: 07 01 99 22 9D 9D 9D 45 44 20 22 3A 99 22 11 11 |..."...ED ":."..|
00002490: 42 41 54 43 48 20 50 52 4F 43 45 53 53 20 44 41 |BATCH PROCESS DA|
000024A0: 54 45 3A 20 22 3B 50 44 24 3B 22 11 11 22 3A 46 |TE: ";PD$;"..":F|
000024B0: B2 31 3A 89 34 37 32 00 DD 2C 09 01 8D 34 33 30 |.1:.472..,...430|
000024C0: 3A 99 22 12 20 53 45 41 52 43 48 20 54 52 41 4E |:.". SEARCH TRAN|
000024D0: 53 41 43 54 49 4F 4E 53 20 92 11 11 22 00 10 2D |SACTIONS ..."..-|
000024E0: 0A 01 99 22 44 45 54 41 49 4C 53 20 54 4F 20 46 |..."DETAILS TO F|
000024F0: 49 4E 44 20 3A 20 12 22 3B 3A 4C 49 B2 31 35 3A |IND : .";:LI.15:|
00002500: 8D 34 30 32 3A 8B 49 4E 24 B2 22 22 A7 31 37 35 |.402:.IN$."".175|
00002510: 00 33 2D 0B 01 81 49 B2 31 A4 4E 3A 81 4A B2 31 |.3-...I.1.N:.J.1|
00002520: A4 C3 28 54 52 24 28 49 29 29 AB C3 28 49 4E 24 |..(TR$(I))..(IN$|
00002530: 29 AA 31 00 58 2D 0C 01 8B CA 28 54 52 24 28 49 |).1.X-....(TR$(I|
00002540: 29 2C 4A 2C C3 28 49 4E 24 29 29 B3 B1 49 4E 24 |),J,.(IN$))..IN$|
00002550: A7 82 4A 3A 89 32 38 33 00 82 2D 0D 01 99 22 13 |..J:.283..-...".|
00002560: 11 11 11 11 11 11 11 11 12 20 20 4E 55 4D 42 45 |......... NUMBE|
00002570: 52 20 92 20 3A 20 22 C8 28 54 52 24 28 49 29 2C |R . : ".(TR$(I),|
00002580: 34 29 00 A6 2D 0E 01 99 22 11 12 20 20 20 20 44 |4)..-...".. D|
00002590: 41 54 45 20 92 20 3A 20 22 CA 28 54 52 24 28 49 |ATE . : ".(TR$(I|
000025A0: 29 2C 35 2C 38 29 00 CB 2D 0F 01 99 22 12 20 20 |),5,8)..-...". |
000025B0: 20 20 4E 41 4D 45 20 92 20 3A 20 22 CA 28 54 52 | NAME . : ".(TR|
000025C0: 24 28 49 29 2C 31 34 2C 32 30 29 00 EF 2D 10 01 |$(I),14,20)..-..|
000025D0: 99 22 12 20 20 20 46 4F 4C 49 4F 20 92 20 3A 20 |.". FOLIO . : |
000025E0: 22 CA 28 54 52 24 28 49 29 2C 33 35 2C 38 29 00 |".(TR$(I),35,8).|
000025F0: 14 2E 11 01 99 22 12 20 20 20 47 52 4F 53 53 20 |.....". GROSS |
00002600: 92 20 3A 20 22 CA 28 54 52 24 28 49 29 2C 34 34 |. : ".(TR$(I),44|
00002610: 2C 31 30 29 00 39 2E 12 01 99 22 12 20 20 20 20 |,10).9....". |
00002620: 20 56 41 54 20 92 20 3A 20 22 CA 28 54 52 24 28 | VAT . : ".(TR$(|
00002630: 49 29 2C 35 34 2C 31 30 29 00 5E 2E 13 01 99 22 |I),54,10).^...."|
00002640: 12 20 20 20 20 20 4E 45 54 20 92 20 3A 20 22 CA |. NET . : ".|
00002650: 28 54 52 24 28 49 29 2C 36 34 2C 31 30 29 00 82 |(TR$(I),64,10)..|
00002660: 2E 14 01 99 22 12 20 50 4F 53 54 49 4E 47 20 92 |....". POSTING .|
00002670: 20 3A 20 22 CA 28 54 52 24 28 49 29 2C 37 36 2C | : ".(TR$(I),76,|
00002680: 33 29 00 A5 2E 15 01 99 22 12 20 44 45 54 41 49 |3)......". DETAI|
00002690: 4C 53 20 92 20 3A 20 22 CA 28 54 52 24 28 49 29 |LS . : ".(TR$(I)|
000026A0: 2C 38 30 29 3B 00 C4 2E 16 01 99 C8 28 42 4C 24 |,80);.......(BL$|
000026B0: 2C 32 30 AB C3 28 CA 28 54 52 24 28 49 29 2C 38 |,20..(.(TR$(I),8|
000026C0: 30 29 29 29 00 E8 2E 17 01 8B C8 28 54 52 24 28 |0))).......(TR$(|
000026D0: 49 29 2C 34 29 B3 B1 C8 28 54 52 24 28 49 AA 31 |I),4)...(TR$(I.1|
000026E0: 29 2C 34 29 A7 32 38 32 00 21 2F 18 01 99 22 11 |),4).282.!/...".|
000026F0: 11 45 58 54 45 4E 44 20 41 4E 41 4C 59 53 49 53 |.EXTEND ANALYSIS|
00002700: 20 3F 20 5B 12 59 92 2F 12 4E 92 5D 91 91 91 22 | ? [.Y./.N.]..."|
00002710: 3A 8D 34 32 34 3A 8B 47 24 B2 22 4E 22 A7 32 38 |:.424:.G$."N".28|
00002720: 32 00 3B 2F 19 01 99 C8 28 43 44 24 2C 31 33 29 |2.;/....(CD$,13)|
00002730: 3A 49 B2 49 AA 31 3A 89 32 37 33 00 71 2F 1A 01 |:I.I.1:.273.q/..|
00002740: 99 22 11 11 43 4F 4E 54 49 4E 55 45 20 53 45 41 |."..CONTINUE SEA|
00002750: 52 43 48 20 3F 20 5B 12 59 92 2F 12 4E 92 5D 22 |RCH ? [.Y./.N.]"|
00002760: 3A 8D 34 32 34 3A 8B 47 24 B2 22 4E 22 A7 32 38 |:.424:.G$."N".28|
00002770: 34 00 89 2F 1B 01 8B 49 B3 B2 4E A7 99 43 44 24 |4../...I..N..CD$|
00002780: 22 91 22 42 4C 24 3A 82 49 00 92 2F 1C 01 89 31 |"."BL$:.I../...1|
00002790: 37 35 00 B9 2F 1E 01 8D 34 33 30 3A 99 22 12 20 |75../...430:.". |
000027A0: 41 43 43 4F 55 4E 54 53 20 46 49 4C 45 20 92 22 |ACCOUNTS FILE ."|
000027B0: 3A 8B 55 B2 30 A7 32 38 39 00 EF 2F 1F 01 55 B2 |:.U.0.289../..U.|
000027C0: 30 3A 99 22 11 11 12 20 50 4F 53 54 49 4E 47 20 |0:."... POSTING |
000027D0: 92 20 4F 46 20 54 52 41 4E 53 41 43 54 49 4F 4E |. OF TRANSACTION|
000027E0: 53 20 49 53 20 43 4F 4D 50 4C 45 54 45 44 22 00 |S IS COMPLETED".|
000027F0: 25 30 20 01 99 22 11 54 4F 20 50 52 4F 54 45 43 |%0 ..".TO PROTEC|
00002800: 54 20 54 48 45 20 4E 45 57 20 41 43 43 4F 55 4E |T THE NEW ACCOUN|
00002810: 54 53 20 42 41 4C 41 4E 43 45 53 20 2D 91 91 22 |TS BALANCES -.."|
00002820: 3A 89 32 39 34 00 58 30 21 01 99 22 11 11 48 45 |:.294.X0!.."..HE|
00002830: 41 44 49 4E 47 53 20 20 3A 20 20 22 3B 3A 8B 53 |ADINGS : ";:.S|
00002840: B2 31 30 A7 99 22 12 41 92 4D 45 4E 44 20 4F 4E |.10..".A.MEND ON|
00002850: 4C 59 22 3A 89 32 39 31 00 72 30 22 01 99 22 12 |LY":.291.r0"..".|
00002860: 45 92 4E 54 45 52 20 4F 52 20 12 41 92 4D 45 4E |E.NTER OR .A.MEN|
00002870: 44 22 00 97 30 23 01 99 22 11 20 20 20 20 20 20 |D"..0#..". |
00002880: 20 20 20 20 3A 20 20 12 53 92 4F 52 54 20 53 45 | : .S.ORT SE|
00002890: 43 54 49 4F 4E 53 22 00 BF 30 24 01 99 22 11 11 |CTIONS"..0$.."..|
000028A0: 44 45 54 41 49 4C 53 20 20 20 3A 20 20 12 56 92 |DETAILS : .V.|
000028B0: 49 45 57 20 4F 52 20 12 50 92 52 49 4E 54 22 00 |IEW OR .P.RINT".|
000028C0: DF 30 25 01 99 22 11 11 42 41 4C 41 4E 43 45 53 |.0%.."..BALANCES|
000028D0: 20 20 3A 20 20 12 5A 92 45 52 4F 49 53 45 22 00 | : .Z.EROISE".|
000028E0: 06 31 26 01 99 22 11 11 53 41 56 45 20 54 4F 20 |.1&.."..SAVE TO |
000028F0: 20 20 3A 20 20 12 44 92 49 53 4B 20 4F 52 20 12 | : .D.ISK OR .|
00002900: 54 92 41 50 45 22 00 2B 31 27 01 99 22 11 11 5B |T.APE".+1'.."..[|
00002910: 12 52 45 54 55 52 4E 92 5D 20 54 52 41 4E 53 41 |.RETURN.] TRANSA|
00002920: 43 54 20 4F 50 54 49 4F 4E 53 22 00 3F 31 28 01 |CT OPTIONS".?1(.|
00002930: 8D 34 32 36 3A 8B 47 24 B2 43 52 24 A7 35 33 00 |.426:.G$.CR$.53.|
00002940: 69 31 29 01 81 47 B2 31 A4 38 3A 8B 47 24 B3 B1 |i1)..G.1.8:.G$..|
00002950: CA 28 22 45 41 53 56 50 44 54 5A 22 2C 47 2C 31 |.("EASVPDTZ",G,1|
00002960: 29 A7 82 47 3A 89 32 39 36 00 90 31 2A 01 91 47 |)..G:.296..1*..G|
00002970: 89 33 33 37 2C 33 34 30 2C 33 35 33 2C 33 30 30 |.337,340,353,300|
00002980: 2C 33 30 31 2C 33 37 31 2C 33 37 32 2C 33 39 38 |,301,371,372,398|
00002990: 00 A6 31 2C 01 41 54 24 B2 22 20 56 49 45 57 20 |..1,.AT$." VIEW |
000029A0: 22 3A 89 33 30 32 00 B8 31 2D 01 41 54 24 B2 22 |":.302..1-.AT$."|
000029B0: 20 50 52 49 4E 54 20 22 00 D7 31 2E 01 8D 34 33 | PRINT "..1...43|
000029C0: 30 3A 99 22 12 22 41 54 24 22 41 43 43 4F 55 4E |0:."."AT$"ACCOUN|
000029D0: 54 53 20 92 11 11 22 00 FE 31 2F 01 99 22 4F 55 |TS ..."..1/.."OU|
000029E0: 54 50 55 54 20 12 48 92 45 41 44 49 4E 47 53 20 |TPUT .H.EADINGS |
000029F0: 4F 52 20 12 42 92 41 4C 41 4E 43 45 53 22 00 1C |OR .B.ALANCES"..|
00002A00: 32 30 01 8D 34 32 36 3A 8B 47 24 B3 B1 22 48 22 |20..426:.G$.."H"|
00002A10: AF 47 24 B3 B1 22 42 22 A7 33 30 34 00 2C 32 31 |.G$.."B".304.,21|
00002A20: 01 8B 47 24 B2 43 52 24 A7 32 38 36 00 64 32 32 |..G$.CR$.286.d22|
00002A30: 01 41 54 B2 30 3A 41 54 24 B2 22 20 48 45 41 44 |.AT.0:AT$." HEAD|
00002A40: 49 4E 47 53 20 22 3A 8B 47 24 B2 22 42 22 A7 41 |INGS ":.G$."B".A|
00002A50: 54 B2 31 3A 41 54 24 B2 22 20 42 41 4C 41 4E 43 |T.1:AT$." BALANC|
00002A60: 45 53 20 22 00 86 32 33 01 44 56 B2 33 3A 8B 47 |ES "..23.DV.3:.G|
00002A70: B2 35 A7 44 56 B2 34 3A 8D 34 34 33 3A 53 53 B2 |.5.DV.4:.443:SS.|
00002A80: 31 3A 89 33 31 32 00 9C 32 34 01 8D 34 33 30 3A |1:.312..24..430:|
00002A90: 99 22 12 22 41 54 24 22 92 11 11 22 00 C7 32 35 |."."AT$"..."..25|
00002AA0: 01 99 22 45 4E 54 45 52 20 53 45 43 54 49 4F 4E |.."ENTER SECTION|
00002AB0: 20 54 4F 20 44 49 53 50 4C 41 59 20 12 31 20 2D | TO DISPLAY .1 -|
00002AC0: 22 53 22 92 20 22 3B 00 E1 32 36 01 4C 49 B2 32 |"S". ";..26.LI.2|
00002AD0: 3A 8D 34 30 32 3A 8B 49 4E 24 B2 22 22 A7 33 30 |:.402:.IN$."".30|
00002AE0: 30 00 07 33 37 01 53 53 B2 C5 28 49 4E 24 29 3A |0..37.SS..(IN$):|
00002AF0: 8B 28 53 53 B3 31 B0 53 53 B1 53 29 A7 99 22 91 |.(SS.1.SS.S)..".|
00002B00: 91 22 3A 89 33 30 39 00 2D 33 38 01 8D 34 33 30 |.":.309.-38..430|
00002B10: 3A 99 22 12 20 41 43 43 4F 55 4E 54 22 41 54 24 |:.". ACCOUNT"AT$|
00002B20: 22 92 22 3A 8B 44 56 B2 33 A7 33 31 34 00 6B 33 |".":.DV.3.314.k3|
00002B30: 39 01 99 22 11 11 12 20 50 52 49 4E 54 20 92 20 |9.."... PRINT . |
00002B40: 49 4E 20 50 52 4F 47 52 45 53 53 22 3A 99 22 11 |IN PROGRESS":.".|
00002B50: 12 53 92 54 4F 50 20 2F 20 12 52 92 45 53 54 41 |.S.TOP / .R.ESTA|
00002B60: 52 54 20 2F 20 12 45 92 4E 44 22 00 9A 33 3A 01 |RT / .E.ND"..3:.|
00002B70: 58 58 B2 31 30 AC 28 53 53 AB 31 29 3A 9F 34 2C |XX.10.(SS.1):.4,|
00002B80: 44 56 3A 9D 34 3A 99 22 11 22 3A 81 49 B2 53 53 |DV:.4:.".":.I.SS|
00002B90: A4 53 3A 41 43 28 30 29 B2 30 00 C0 33 3B 01 8B |.S:AC(0).0..3;..|
00002BA0: 44 56 B2 34 A7 8D 34 33 32 3A 99 22 20 41 43 43 |DV.4..432:." ACC|
00002BB0: 4F 55 4E 54 22 3B 41 54 24 3A 8D 34 33 35 3A 99 |OUNT";AT$:.435:.|
00002BC0: 00 F1 33 3C 01 99 22 20 53 45 43 54 49 4F 4E 22 |..3<.." SECTION"|
00002BD0: 49 3A 99 3A 58 B2 58 58 AA 31 3A 58 58 B2 58 AA |I:.:X.XX.1:XX.X.|
00002BE0: 39 3A 81 4A B2 58 A4 58 58 3A 4A 24 B2 C4 28 4A |9:.J.X.XX:J$..(J|
00002BF0: 29 00 FF 33 3D 01 8B 41 54 B2 30 A7 33 32 31 00 |)..3=..AT.0.321.|
00002C00: 32 34 3E 01 99 4A 24 3B C8 28 42 4C 24 2C 35 AB |24>..J$;.(BL$,5.|
00002C10: C3 28 4A 24 29 29 3B C8 28 42 4C 24 2C 32 30 AB |.(J$));.(BL$,20.|
00002C20: C3 28 41 43 24 28 4A 29 29 29 3B 41 43 24 28 4A |.(AC$(J)));AC$(J|
00002C30: 29 3B 00 5B 34 3F 01 5A 24 B2 C4 28 41 43 28 4A |);.[4?.Z$..(AC(J|
00002C40: 29 29 3A 8D 34 33 37 3A 99 C8 28 42 4C 24 2C 31 |)):.437:..(BL$,1|
00002C50: 32 AB C3 28 5A 24 29 29 3B 5A 24 00 86 34 40 01 |2..(Z$));Z$..4@.|
00002C60: 41 43 28 30 29 B2 B5 28 31 30 30 AC 28 41 43 28 |AC(0)..(100.(AC(|
00002C70: 30 29 AA 41 43 28 4A 29 29 AA 2E 35 29 AD 31 30 |0).AC(J))..5).10|
00002C80: 30 3A 89 33 32 32 00 B8 34 41 01 99 4A 24 3B C8 |0:.322..4A..J$;.|
00002C90: 28 42 4C 24 2C 38 AB C3 28 4A 24 29 29 3B 41 43 |(BL$,8..(J$));AC|
00002CA0: 24 28 4A 29 3B C8 28 42 4C 24 2C 32 30 AB C3 28 |$(J);.(BL$,20..(|
00002CB0: 41 43 24 28 4A 29 29 29 00 C9 34 42 01 82 4A 3A |AC$(J)))..4B..J:|
00002CC0: 8B 41 54 B2 30 A7 33 32 35 00 F9 34 43 01 5A 24 |.AT.0.325..4C.Z$|
00002CD0: B2 C4 28 41 43 28 30 29 29 3A 8D 34 33 37 3A 4C |..(AC(0)):.437:L|
00002CE0: 24 B2 C8 28 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |$..("-----------|
00002CF0: 2D 22 2C C3 28 5A 24 29 29 00 25 35 44 01 42 24 |-",.(Z$)).%5D.B$|
00002D00: B2 C8 28 42 4C 24 2C 33 37 AB C3 28 5A 24 29 29 |..(BL$,37..(Z$))|
00002D10: 3A 99 42 24 3B 4C 24 3A 99 42 24 3B 5A 24 3A 99 |:.B$;L$:.B$;Z$:.|
00002D20: 42 24 3B 4C 24 00 39 35 45 01 8B 44 56 B2 34 A7 |B$;L$.95E..DV.4.|
00002D30: 8D 33 33 31 3A 89 33 32 39 00 6D 35 46 01 99 22 |.331:.329.m5F.."|
00002D40: 11 22 C8 28 4C 4E 24 2C 32 31 29 3A 99 22 43 4F |.".(LN$,21):."CO|
00002D50: 4E 54 49 4E 55 45 20 56 49 45 57 20 3F 20 5B 12 |NTINUE VIEW ? [.|
00002D60: 59 92 2F 12 4E 92 5D 22 3A 8D 34 32 34 00 7D 35 |Y./.N.]":.424.}5|
00002D70: 47 01 8B 47 24 B2 22 4E 22 A7 49 B2 53 00 9F 35 |G..G$."N".I.S..5|
00002D80: 48 01 8B 44 56 B2 33 A7 99 22 91 91 22 42 4C 24 |H..DV.3..".."BL$|
00002D90: 3A 99 42 4C 24 3A 99 22 13 11 11 11 11 11 22 00 |:.BL$:."......".|
00002DA0: B1 35 49 01 82 49 3A 98 34 3A A0 34 3A 89 32 38 |.5I..I:.4:.4:.28|
00002DB0: 36 00 C1 35 4B 01 50 24 B2 22 22 3A 98 34 3A A0 |6..5K.P$."":.4:.|
00002DC0: 34 00 DB 35 4C 01 A1 47 24 3A 8B 47 24 B2 22 22 |4..5L..G$:.G$.""|
00002DD0: AF 50 24 B2 22 53 22 A7 33 33 32 00 F1 35 4D 01 |.P$."S".332..5M.|
00002DE0: 50 24 B2 47 24 3A 8B 50 24 B2 22 53 22 A7 33 33 |P$.G$:.P$."S".33|
00002DF0: 32 00 06 36 4E 01 8B 50 24 B2 22 45 22 A7 49 B2 |2..6N..P$."E".I.|
00002E00: 53 3A 89 32 38 36 00 19 36 4F 01 9F 34 2C 34 3A |S:.286..6O..4,4:|
00002E10: 9D 34 3A 99 22 11 22 3A 8E 00 27 36 51 01 8B 53 |.4:.".":..'6Q..S|
00002E20: B2 31 30 A7 32 39 36 00 41 36 52 01 58 B2 B5 28 |.10.296.A6R.X..(|
00002E30: 31 30 AC 28 53 29 AA 31 29 3A 49 B2 30 3A 89 33 |10.(S).1):I.0:.3|
00002E40: 37 00 4E 36 54 01 58 B2 31 31 3A 59 B2 31 00 68 |7.N6T.X.11:Y.1.h|
00002E50: 36 55 01 58 58 B2 58 AA 39 3A 59 B2 59 AA 31 3A |6U.XX.X.9:Y.Y.1:|
00002E60: 8B 59 B1 53 A7 32 38 36 00 87 36 56 01 8D 34 33 |.Y.S.286..6V..43|
00002E70: 30 3A 99 22 12 20 41 4D 45 4E 44 20 41 43 43 4F |0:.". AMEND ACCO|
00002E80: 55 4E 54 53 20 92 22 00 AF 36 57 01 99 22 13 11 |UNTS ."..6W.."..|
00002E90: 11 11 11 11 53 45 43 54 49 4F 4E 3A 20 12 20 22 |....SECTION: . "|
00002EA0: CA 28 C4 28 59 29 2C 32 29 22 20 92 11 11 22 00 |.(.(Y),2)" ...".|
00002EB0: DF 36 58 01 81 49 B2 58 A4 58 58 3A 41 43 24 B2 |.6X..I.X.XX:AC$.|
00002EC0: 41 43 24 28 49 29 3A 49 24 B2 C4 28 49 29 3A 8B |AC$(I):I$..(I):.|
00002ED0: 49 B2 31 30 30 A7 49 24 B2 22 9D 22 AA 49 24 00 |I.100.I$.".".I$.|
00002EE0: 11 37 59 01 99 22 41 2F 43 3A 20 20 12 22 49 24 |.7Y.."A/C: ."I$|
00002EF0: 22 20 92 20 20 5B 22 41 43 24 3B C8 28 42 4C 24 |" . ["AC$;.(BL$|
00002F00: 2C 32 30 AB C3 28 41 43 24 29 29 22 5D 22 3A 82 |,20..(AC$))"]":.|
00002F10: 49 00 4A 37 5A 01 99 22 11 11 11 41 2F 43 3A 20 |I.J7Z.."...A/C: |
00002F20: 12 4E 4F 3A 92 20 54 4F 20 41 4D 45 4E 44 20 4F |.NO:. TO AMEND O|
00002F30: 52 20 12 43 92 4F 4E 54 49 4E 55 45 3A 20 22 3B |R .C.ONTINUE: ";|
00002F40: 3A 4C 49 B2 33 3A 8D 34 30 32 00 5A 37 5B 01 8B |:LI.3:.402.Z7[..|
00002F50: 49 4E 24 B2 22 22 A7 32 38 36 00 73 37 5C 01 8B |IN$."".286.s7\..|
00002F60: 49 4E 24 B2 22 43 22 A7 58 B2 58 58 AA 31 3A 89 |IN$."C".X.XX.1:.|
00002F70: 33 34 31 00 98 37 5D 01 47 B2 C5 28 49 4E 24 29 |341..7].G..(IN$)|
00002F80: 3A 8B 47 B3 58 B0 47 B1 58 58 A7 99 22 91 91 91 |:.G.X.G.XX.."...|
00002F90: 91 91 22 3A 89 33 34 36 00 D4 37 5E 01 99 22 91 |..":.346..7^..".|
00002FA0: 22 42 4C 24 22 91 22 3A 99 22 41 2F 43 3A 20 20 |"BL$".":."A/C: |
00002FB0: 12 20 22 49 4E 24 22 20 92 20 20 22 3B 3A 4C 49 |. "IN$" . ";:LI|
00002FC0: B2 32 30 3A 8D 34 30 32 3A 8B 49 4E 24 B2 22 22 |.20:.402:.IN$.""|
00002FD0: A7 33 34 33 00 E8 37 5F 01 41 43 24 28 47 29 B2 |.343..7_.AC$(G).|
00002FE0: 49 4E 24 3A 89 33 34 33 00 0C 38 61 01 8D 34 33 |IN$:.343..8a..43|
00002FF0: 30 3A 99 22 12 20 4F 52 47 41 4E 49 53 45 20 41 |0:.". ORGANISE A|
00003000: 43 43 4F 55 4E 54 53 20 92 11 11 22 00 4B 38 62 |CCOUNTS ...".K8b|
00003010: 01 99 22 45 4E 54 45 52 20 53 45 43 54 49 4F 4E |.."ENTER SECTION|
00003020: 20 54 4F 20 53 4F 52 54 3A 20 12 32 20 2D 22 53 | TO SORT: .2 -"S|
00003030: 22 92 22 3A 99 22 11 4F 52 20 12 41 92 4C 4C 20 |".":.".OR .A.LL |
00003040: 53 45 43 54 49 4F 4E 53 20 22 3B 00 65 38 63 01 |SECTIONS ";.e8c.|
00003050: 4C 49 B2 32 3A 8D 34 30 32 3A 8B 49 4E 24 B2 22 |LI.2:.402:.IN$."|
00003060: 22 A7 32 38 36 00 7C 38 64 01 8B 49 4E 24 B2 22 |".286.|8d..IN$."|
00003070: 41 22 A7 58 B2 31 31 3A 89 33 35 39 00 A4 38 65 |A".X.11:.359..8e|
00003080: 01 53 53 B2 C5 28 49 4E 24 29 3A 8B 28 53 53 B3 |.SS..(IN$):.(SS.|
00003090: 32 B0 53 53 B1 53 29 A7 99 22 91 91 91 91 22 3A |2.SS.S).."....":|
000030A0: 89 33 35 34 00 B2 38 66 01 58 B2 31 30 AC 53 53 |.354..8f.X.10.SS|
000030B0: AB 39 00 CC 38 67 01 58 58 B2 58 AA 39 3A 49 24 |.9..8g.XX.X.9:I$|
000030C0: B2 C4 28 B5 28 58 58 AD 31 30 29 29 00 05 39 68 |..(.(XX.10))..9h|
000030D0: 01 99 22 13 11 11 11 11 11 53 4F 52 54 49 4E 47 |.."......SORTING|
000030E0: 20 48 45 41 44 49 4E 47 53 20 46 4F 52 20 53 45 | HEADINGS FOR SE|
000030F0: 43 54 49 4F 4E 3A 20 12 22 49 24 22 20 92 11 22 |CTION: ."I$" .."|
00003100: 3A 99 42 4C 24 00 30 39 69 01 81 4A B2 58 A4 58 |:.BL$.09i..J.X.X|
00003110: 58 AB 31 3A 81 4B B2 4A AA 31 A4 58 58 3A 8B 41 |X.1:.K.J.1.XX:.A|
00003120: 43 24 28 4A 29 B1 41 43 24 28 4B 29 A7 33 36 36 |C$(J).AC$(K).366|
00003130: 00 5A 39 6A 01 82 4B 3A 8D 33 36 38 3A 82 4A 3A |.Z9j..K:.368:.J:|
00003140: 8B 49 4E 24 B2 22 41 22 AF 58 58 B3 4E 41 A7 58 |.IN$."A".XX.NA.X|
00003150: B2 58 58 AA 31 3A 89 33 35 39 00 85 39 6B 01 99 |.XX.1:.359..9k..|
00003160: 22 11 11 53 4F 52 54 20 43 4F 4D 50 4C 45 54 45 |"..SORT COMPLETE|
00003170: 44 20 2D 20 50 52 45 53 53 20 5B 12 52 45 54 55 |D - PRESS [.RETU|
00003180: 52 4E 92 5D 22 00 9A 39 6C 01 A1 47 24 3A 8B 47 |RN.]"..9l..G$:.G|
00003190: 24 B3 B1 43 52 24 A7 33 36 34 00 A3 39 6D 01 89 |$..CR$.364..9m..|
000031A0: 32 38 36 00 E5 39 6E 01 51 24 B2 41 43 24 28 4A |286..9n.Q$.AC$(J|
000031B0: 29 3A 51 B2 41 43 28 4A 29 3A 41 43 24 28 4A 29 |):Q.AC(J):AC$(J)|
000031C0: B2 41 43 24 28 4B 29 3A 41 43 28 4A 29 B2 41 43 |.AC$(K):AC(J).AC|
000031D0: 28 4B 29 3A 41 43 24 28 4B 29 B2 51 24 3A 41 43 |(K):AC$(K).Q$:AC|
000031E0: 28 4B 29 B2 51 00 EE 39 6F 01 89 33 36 32 00 1D |(K).Q..9o..362..|
000031F0: 3A 70 01 99 22 13 11 11 11 11 11 11 11 11 22 3B |:p..".........";|
00003200: 3A 81 49 B2 58 A4 58 58 3A 49 24 B2 CA 28 C4 28 |:.I.X.XX:I$..(.(|
00003210: 49 29 2C 32 29 3A 99 42 4C 24 22 91 22 00 41 3A |I),2):.BL$".".A:|
00003220: 71 01 99 49 24 3B C8 28 42 4C 24 2C 31 32 AB C3 |q..I$;.(BL$,12..|
00003230: 28 49 24 29 29 3B 41 43 24 28 49 29 3A 82 49 3A |(I$));AC$(I):.I:|
00003240: 8E 00 4E 3A 73 01 57 B2 30 3A 89 33 37 33 00 56 |..N:s.W.0:.373.V|
00003250: 3A 74 01 57 B2 31 00 7B 3A 75 01 8D 34 33 30 3A |:t.W.1.{:u..430:|
00003260: 99 22 12 20 53 41 56 45 20 41 43 43 4F 55 4E 54 |.". SAVE ACCOUNT|
00003270: 53 20 46 49 4C 45 20 92 11 11 22 00 A5 3A 76 01 |S FILE ..."..:v.|
00003280: 99 22 52 45 4E 41 4D 45 20 46 49 4C 45 20 46 4F |."RENAME FILE FO|
00003290: 52 20 55 50 44 41 54 45 20 3F 20 5B 12 59 92 2F |R UPDATE ? [.Y./|
000032A0: 12 4E 92 5D 22 00 C3 3A 77 01 8D 34 32 34 3A 8B |.N.]"..:w..424:.|
000032B0: 47 24 B2 22 4E 22 A7 46 46 24 B2 41 46 24 3A 89 |G$."N".FF$.AF$:.|
000032C0: 33 37 38 00 F8 3A 78 01 99 22 91 45 4E 54 45 52 |378..:x..".ENTER|
000032D0: 20 12 20 4E 45 57 20 92 20 4E 41 4D 45 3A 20 22 | . NEW . NAME: "|
000032E0: 3B 3A 4C 49 B2 31 34 3A 8D 34 30 32 3A 8B 49 4E |;:LI.14:.402:.IN|
000032F0: 24 B2 22 22 A7 33 37 33 00 04 3B 79 01 46 46 24 |$."".373..;y.FF$|
00003300: B2 49 4E 24 00 1D 3B 7A 01 8B 57 B2 31 A7 9F 31 |.IN$..;z..W.1..1|
00003310: 2C 31 2C 31 2C 46 46 24 3A 89 33 38 30 00 3B 3B |,1,1,FF$:.380.;;|
00003320: 7B 01 9F 31 2C 38 2C 31 2C 22 40 30 3A 22 AA 46 |{..1,8,1,"@0:".F|
00003330: 46 24 AA 22 2C 53 45 51 2C 57 22 00 74 3B 7C 01 |F$.",SEQ,W".t;|.|
00003340: 99 22 13 11 11 11 11 11 22 42 4C 24 3A 99 22 91 |."......"BL$:.".|
00003350: 53 41 56 49 4E 47 20 46 49 4C 45 20 12 20 22 3B |SAVING FILE . ";|
00003360: 46 46 24 3B 22 20 92 22 3A 98 31 2C 44 41 24 3B |FF$;" .":.1,DA$;|
00003370: 43 52 24 3B 00 97 3B 7D 01 98 31 2C 4E 41 3B 43 |CR$;..;}..1,NA;C|
00003380: 52 24 3B 3A 98 31 2C 53 3B 43 52 24 3B 3A 98 31 |R$;:.1,S;CR$;:.1|
00003390: 2C 56 3B 43 52 24 3B 00 B5 3B 7E 01 81 4B B2 31 |,V;CR$;..;~..K.1|
000033A0: A4 4E 41 3A 98 31 2C 41 43 24 28 4B 29 3B 43 52 |.NA:.1,AC$(K);CR|
000033B0: 24 3B 3A 82 4B 00 DA 3B 7F 01 81 4B B2 31 A4 4E |$;:.K..;...K.1.N|
000033C0: 41 3A 98 31 2C 41 43 28 4B 29 3B 43 52 24 3B 3A |A:.1,AC(K);CR$;:|
000033D0: 82 4B 3A A0 31 3A 89 32 38 36 00 04 3C 81 01 8B |.K:.1:.286..<...|
000033E0: 47 B2 32 A7 9F 31 2C 38 2C 30 2C 22 30 3A 22 AA |G.2..1,8,0,"0:".|
000033F0: 41 46 24 AA 22 2C 53 45 51 2C 52 45 41 44 22 3A |AF$.",SEQ,READ":|
00003400: 89 33 38 37 00 1D 3C 82 01 8D 34 33 30 3A 9F 31 |.387..<...430:.1|
00003410: 2C 31 2C 30 2C 41 46 24 3A 89 33 39 31 00 3D 3C |,1,0,AF$:.391.=<|
00003420: 83 01 9F 31 35 2C 38 2C 31 35 3A 84 31 35 2C 45 |...15,8,15:.15,E|
00003430: 2C 45 24 3A 8B 45 B3 31 39 A7 33 39 31 00 72 3C |,E$:.E.19.391.r<|
00003440: 84 01 A0 31 3A 99 22 13 11 11 11 11 11 22 42 4C |...1:."......"BL|
00003450: 24 3A 99 22 91 22 3B 45 24 3B 22 3A 20 50 52 45 |$:.".";E$;": PRE|
00003460: 53 53 20 5B 12 52 45 54 55 52 4E 92 5D 22 3A A0 |SS [.RETURN.]":.|
00003470: 31 35 00 88 3C 85 01 8D 34 32 32 3A 8B 47 24 B3 |15..<...422:.G$.|
00003480: B1 43 52 24 A7 33 38 39 00 90 3C 86 01 89 32 30 |.CR$.389..<...20|
00003490: 00 C6 3C 87 01 99 22 13 11 11 11 11 11 22 42 4C |..<..."......"BL|
000034A0: 24 3A 99 22 91 12 20 22 3B 41 46 24 3B 22 20 92 |$:.".. ";AF$;" .|
000034B0: 20 46 49 4C 45 20 4C 4F 41 44 49 4E 47 22 3B 3A | FILE LOADING";:|
000034C0: 84 31 2C 55 44 24 00 EF 3C 88 01 84 31 2C 4E 41 |.1,UD$..<...1,NA|
000034D0: 3A 84 31 2C 53 3A 84 31 2C 56 3A 81 4B B2 31 A4 |:.1,S:.1,V:.K.1.|
000034E0: 4E 41 3A 84 31 2C 41 43 24 28 4B 29 3A 82 4B 00 |NA:.1,AC$(K):.K.|
000034F0: 1A 3D 89 01 81 4B B2 31 A4 4E 41 3A 84 31 2C 41 |.=...K.1.NA:.1,A|
00003500: 43 28 4B 29 3A 82 4B 3A A0 31 3A A0 31 35 3A 99 |C(K):.K:.1:.15:.|
00003510: 22 9D 9D 9D 45 44 20 11 11 22 00 5D 3D 8A 01 99 |"...ED ..".]=...|
00003520: 22 46 49 4C 45 20 4C 41 53 54 20 55 50 44 41 54 |"FILE LAST UPDAT|
00003530: 45 44 20 4F 4E 20 22 3B 55 44 24 3A 99 22 11 11 |ED ON ";UD$:."..|
00003540: 50 52 45 53 53 20 5B 12 52 45 54 55 52 4E 92 5D |PRESS [.RETURN.]|
00003550: 20 46 4F 52 20 4F 50 54 49 4F 4E 53 22 00 72 3D | FOR OPTIONS".r=|
00003560: 8B 01 A1 47 24 3A 8B 47 24 B3 B1 43 52 24 A7 33 |...G$:.G$..CR$.3|
00003570: 39 35 00 7A 3D 8C 01 89 35 33 00 9D 3D 8E 01 8D |95.z=...53..=...|
00003580: 34 33 30 3A 99 22 12 20 5A 45 52 4F 49 53 45 20 |430:.". ZEROISE |
00003590: 41 43 43 4F 55 4E 54 53 20 92 11 11 22 00 CE 3D |ACCOUNTS ..."..=|
000035A0: 8F 01 99 22 41 52 45 20 59 4F 55 20 53 55 52 45 |..."ARE YOU SURE|
000035B0: 20 3F 20 5B 12 59 92 2F 12 4E 92 5D 22 3A 8D 34 | ? [.Y./.N.]":.4|
000035C0: 32 34 3A 8B 47 24 B2 22 4E 22 A7 32 38 36 00 EA |24:.G$."N".286..|
000035D0: 3D 90 01 81 49 B2 31 A4 4E 41 3A 41 43 28 49 29 |=...I.1.NA:AC(I)|
000035E0: B2 30 3A 82 49 3A 89 32 38 36 00 0E 3E 92 01 99 |.0:.I:.286..>...|
000035F0: 22 5B 22 3B C8 28 42 4C 24 2C 4C 49 29 3B 22 5D |"[";.(BL$,LI);"]|
00003600: 22 3B C8 28 43 42 24 2C 4C 49 AA 31 29 3B 00 25 |";.(CB$,LI.1);.%|
00003610: 3E 93 01 49 4E 24 B2 22 20 22 3A 49 54 B2 54 49 |>..IN$." ":IT.TI|
00003620: 3A 49 43 B2 32 00 3B 3E 94 01 A1 49 50 24 3A 8B |:IC.2.;>...IP$:.|
00003630: 49 50 24 B3 B1 22 22 A7 34 30 37 00 6B 3E 95 01 |IP$.."".407.k>..|
00003640: 8B 49 54 B3 B2 54 49 A7 99 CA 28 22 20 A2 22 2C |.IT..TI...(" .",|
00003650: 49 43 2C 31 29 3B 22 9D 22 3B 3A 49 43 B2 33 AB |IC,1);".";:IC.3.|
00003660: 49 43 3A 49 54 B2 54 49 AA 31 35 00 74 3E 96 01 |IC:IT.TI.15.t>..|
00003670: 89 34 30 34 00 9B 3E 97 01 41 B2 C6 28 49 50 24 |.404..>..A..(IP$|
00003680: 29 3A 49 4C B2 C3 28 49 4E 24 29 3A 8B 28 41 AF |):IL..(IN$):.(A.|
00003690: 31 32 37 29 B3 33 32 A7 34 31 33 00 C8 3E 98 01 |127).32.413..>..|
000036A0: 8B 28 41 B2 33 34 B0 41 B2 34 34 B0 41 B2 35 38 |.(A.34.A.44.A.58|
000036B0: 29 B0 28 41 4E B2 31 AF 28 41 B3 34 36 B0 41 B1 |).(AN.1.(A.46.A.|
000036C0: 35 37 29 29 A7 34 30 34 00 D9 3E 99 01 8B 49 4C |57)).404..>...IL|
000036D0: B3 4C 49 AA 31 A7 34 31 32 00 EE 3E 9A 01 A1 49 |.LI.1.412..>...I|
000036E0: 50 24 3A 8B 49 50 24 B2 22 22 A7 34 30 39 00 F7 |P$:.IP$."".409..|
000036F0: 3E 9B 01 89 34 30 37 00 2C 3F 9C 01 49 4E 24 B2 |>...407.,?..IN$.|
00003700: 49 4E 24 AA 49 50 24 3A 99 49 50 24 3B 3A 49 4C |IN$.IP$:.IP$;:IL|
00003710: B2 C3 28 49 4E 24 29 3A 8B 49 4C B2 4C 49 AA 31 |..(IN$):.IL.LI.1|
00003720: A7 99 22 5D 9D 22 3B 3A 89 34 31 30 00 4C 3F 9D |.."].";:.410.L?.|
00003730: 01 8B 41 B2 31 33 A7 8D 34 31 39 3A 49 4E 24 B2 |..A.13..419:IN$.|
00003740: CA 28 49 4E 24 2C 32 29 3A 99 3A 8E 00 70 3F 9E |.(IN$,2):.:..p?.|
00003750: 01 8B 41 B2 32 30 AF 49 4C B1 31 A7 49 4E 24 B2 |..A.20.IL.1.IN$.|
00003760: C8 28 49 4E 24 2C 49 4C AB 31 29 3A 89 34 31 37 |.(IN$,IL.1):.417|
00003770: 00 9D 3F 9F 01 8B 41 B2 31 34 31 AF 49 4C B1 31 |..?...A.141.IL.1|
00003780: A7 8D 34 31 39 3A 81 4B B2 32 A4 49 4C 3A 99 22 |..419:.K.2.IL:."|
00003790: 9D 20 9D 22 3B 3A 82 4B 3A 89 34 30 33 00 A6 3F |. .";:.K:.403..?|
000037A0: A0 01 89 34 30 34 00 C9 3F A1 01 42 55 24 B2 22 |...404..?..BU$."|
000037B0: 20 9D 9D 22 3A 8B C3 28 49 4E 24 29 B2 4C 49 A7 | ..":..(IN$).LI.|
000037C0: 42 55 24 B2 22 5D 9D 9D 22 00 D8 3F A2 01 99 42 |BU$."].."..?...B|
000037D0: 55 24 3B 3A 89 34 30 34 00 EC 3F A3 01 8B 49 4C |U$;:.404..?...IL|
000037E0: B3 4C 49 AA 31 A7 99 22 20 9D 22 3B 00 F2 3F A4 |.LI.1.." .";..?.|
000037F0: 01 8E 00 0B 40 A6 01 47 24 B2 22 22 3A A1 47 24 |....@..G$."":.G$|
00003800: 3A 8B 47 24 B2 22 22 A7 34 32 32 00 11 40 A7 01 |:.G$."".422..@..|
00003810: 8E 00 34 40 A8 01 47 24 B2 22 22 3A A1 47 24 3A |..4@..G$."":.G$:|
00003820: 8B 47 24 B3 B1 22 59 22 AF 47 24 B3 B1 22 4E 22 |.G$.."Y".G$.."N"|
00003830: A7 34 32 34 00 3A 40 A9 01 8E 00 62 40 AA 01 99 |.424.:@....b@...|
00003840: 43 44 24 C8 28 4C 4E 24 2C 31 37 29 3A 99 22 12 |CD$.(LN$,17):.".|
00003850: 20 53 45 4C 45 43 54 20 92 20 4C 45 54 54 45 52 | SELECT . LETTER|
00003860: 20 22 00 88 40 AB 01 47 24 B2 22 22 3A A1 47 24 | "..@..G$."":.G$|
00003870: 3A 8B 47 24 B3 B1 22 22 A7 99 22 91 91 22 42 4C |:.G$..""..".."BL|
00003880: 24 3A 99 42 4C 24 3A 8E 00 C0 40 AC 01 81 4B B2 |$:.BL$:...@...K.|
00003890: 31 A4 33 30 30 3A 82 4B 3A 99 22 91 20 53 45 4C |1.300:.K:.". SEL|
000038A0: 45 43 54 20 12 20 4C 45 54 54 45 52 20 92 22 3A |ECT . LETTER .":|
000038B0: 81 4B B2 31 A4 33 30 30 3A 82 4B 3A 89 34 32 36 |.K.1.300:.K:.426|
000038C0: 00 E4 40 AE 01 99 22 93 22 3B 41 46 24 3B A6 33 |..@...".";AF$;.3|
000038D0: 31 AB C3 28 41 46 24 29 29 3B 44 41 24 3A 99 4C |1..(AF$));DA$:.L|
000038E0: 4E 24 3A 8E 00 02 41 B0 01 99 41 46 24 3B A6 32 |N$:...A...AF$;.2|
000038F0: 39 AB C3 28 41 46 24 29 29 3B 44 41 24 3A 89 34 |9..(AF$));DA$:.4|
00003900: 33 35 00 1B 41 B1 01 99 41 46 24 3B A6 36 36 AB |35..A...AF$;.66.|
00003910: C3 28 41 46 24 29 29 3B 44 41 24 00 49 41 B2 01 |.(AF$));DA$.IA..|
00003920: 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |."--------------|
00003930: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003940: 2D 2D 2D 2D 2D 2D 2D 22 3B 00 78 41 B3 01 99 22 |-------";.xA..."|
00003950: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003960: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003970: 2D 2D 2D 2D 2D 22 3A 8E 00 9A 41 B5 01 81 5A B2 |-----":...A...Z.|
00003980: 31 A4 C3 28 5A 24 29 3A 8B CA 28 5A 24 2C 5A 2C |1..(Z$):..(Z$,Z,|
00003990: 31 29 B2 22 2E 22 A7 34 34 30 00 A1 41 B6 01 82 |1).".".440..A...|
000039A0: 5A 00 B6 41 B7 01 5A 24 B2 5A 24 AA 22 2E 30 30 |Z..A..Z$.Z$.".00|
000039B0: 22 3A 89 34 34 31 00 D3 41 B8 01 5A B2 C3 28 5A |":.441..A..Z..(Z|
000039C0: 24 29 AB 5A 3A 8B 5A B2 31 A7 5A 24 B2 5A 24 AA |$).Z:.Z.1.Z$.Z$.|
000039D0: 22 30 22 00 D9 41 B9 01 8E 00 E2 41 BB 01 8D 34 |"0"..A.....A...4|
000039E0: 33 30 00 15 42 BC 01 50 57 24 B2 22 20 45 4E 53 |30..B..PW$." ENS|
000039F0: 55 52 45 20 50 52 49 4E 54 45 52 20 4F 4E 20 26 |URE PRINTER ON &|
00003A00: 20 41 4C 49 47 4E 45 44 20 22 3A 99 22 12 22 50 | ALIGNED ":."."P|
00003A10: 57 24 22 92 22 00 48 42 BD 01 81 4B B2 31 A4 33 |W$".".HB...K.1.3|
00003A20: 30 30 3A 82 4B 3A 99 22 11 20 50 52 45 53 53 20 |00:.K:.". PRESS |
00003A30: 5B 12 52 45 54 55 52 4E 92 5D 20 57 48 45 4E 20 |[.RETURN.] WHEN |
00003A40: 52 45 41 44 59 2E 2E 22 00 7A 42 BE 01 A1 47 24 |READY..".zB...G$|
00003A50: 3A 8B 47 24 B3 B1 43 52 24 A7 99 22 91 91 91 22 |:.G$..CR$.."..."|
00003A60: 50 57 24 3A 81 4B B2 31 A4 35 30 30 3A 82 4B 3A |PW$:.K.1.500:.K:|
00003A70: 99 22 91 91 22 3A 89 34 34 34 00 80 42 BF 01 8E |."..":.444..B...|
00003A80: 00 B1 42 C1 01 83 22 42 41 4E 4B 22 2C 22 43 41 |..B..."BANK","CA|
00003A90: 53 48 22 2C 22 53 41 4C 45 53 22 2C 22 50 55 52 |SH","SALES","PUR|
00003AA0: 43 48 41 53 45 53 22 2C 22 4A 4F 55 52 4E 41 4C |CHASES","JOURNAL|
00003AB0: 22 00 F8 42 C2 01 83 22 42 41 4E 4B 20 43 4F 4E |"..B..."BANK CON|
00003AC0: 54 52 4F 4C 22 2C 22 43 41 53 48 20 43 4F 4E 54 |TROL","CASH CONT|
00003AD0: 52 4F 4C 22 2C 22 44 45 42 54 4F 52 20 43 4F 4E |ROL","DEBTOR CON|
00003AE0: 54 52 4F 4C 22 2C 22 43 52 45 44 49 54 4F 52 20 |TROL","CREDITOR |
00003AF0: 43 4F 4E 54 52 4F 4C 22 00 3C 43 C3 01 83 22 4F |CONTROL".<C..."O|
00003B00: 55 54 50 55 54 20 56 41 54 22 2C 22 49 4E 50 55 |UTPUT VAT","INPU|
00003B10: 54 20 56 41 54 22 2C 22 52 45 53 45 52 56 45 20 |T VAT","RESERVE |
00003B20: 44 45 42 54 4F 52 53 22 2C 22 52 45 53 45 52 56 |DEBTORS","RESERV|
00003B30: 45 20 43 52 45 44 49 54 4F 52 53 22 00 64 43 C4 |E CREDITORS".dC.|
00003B40: 01 83 22 50 52 4F 46 49 54 20 26 20 4C 4F 53 53 |.."PROFIT & LOSS|
00003B50: 22 2C 22 4A 4F 55 52 4E 41 4C 20 53 55 53 50 45 |","JOURNAL SUSPE|
00003B60: 4E 53 45 22 00 A6 43 C6 01 54 24 28 31 29 B2 22 |NSE"..C..T$(1)."|
00003B70: 20 20 20 20 12 20 20 20 92 20 12 20 20 20 92 20 | . . . . |
00003B80: 12 20 20 20 92 20 12 20 20 20 92 20 12 20 20 20 |. . . . . |
00003B90: 92 20 12 20 20 20 92 20 12 20 20 20 92 20 12 20 |. . . . . . |
00003BA0: 20 20 92 20 20 22 00 F1 43 C7 01 54 24 28 32 29 | . "..C..T$(2)|
00003BB0: B2 22 20 20 20 20 20 12 20 92 20 20 12 20 92 20 |." . . . . |
00003BC0: 12 20 92 20 12 20 92 20 12 20 92 20 12 20 92 20 |. . . . . . . . |
00003BD0: 12 20 92 20 12 20 92 20 20 20 12 20 92 20 12 20 |. . . . . . . |
00003BE0: 92 20 12 20 92 20 12 20 92 20 20 12 20 92 20 20 |. . . . . . . |
00003BF0: 22 00 35 44 C8 01 54 24 28 33 29 B2 22 20 20 20 |".5D..T$(3)." |
00003C00: 20 20 12 20 92 20 20 12 20 92 20 20 20 12 20 20 | . . . . . |
00003C10: 20 92 20 12 20 92 20 12 20 92 20 12 20 20 20 92 | . . . . . . .|
00003C20: 20 12 20 20 20 92 20 12 20 92 20 20 20 20 12 20 | . . . . . |
00003C30: 92 20 20 20 22 00 7E 44 C9 01 54 24 28 34 29 B2 |. ".~D..T$(4).|
00003C40: 22 20 20 20 20 20 12 20 92 20 20 12 20 92 20 20 |" . . . . |
00003C50: 20 12 20 92 20 12 20 92 20 12 20 92 20 12 20 92 | . . . . . . . .|
00003C60: 20 20 20 12 20 92 20 12 20 92 20 12 20 92 20 12 | . . . . . . .|
00003C70: 20 92 20 12 20 92 20 20 12 20 92 20 20 22 00 C5 | . . . . . "..|
00003C80: 44 CA 01 54 24 28 35 29 B2 22 20 20 20 20 20 12 |D..T$(5)." .|
00003C90: 20 92 20 20 12 20 92 20 20 20 12 20 92 20 12 20 | . . . . . . |
00003CA0: 92 20 12 20 92 20 12 20 92 20 12 20 20 20 92 20 |. . . . . . . |
00003CB0: 12 20 92 20 12 20 92 20 12 20 20 20 92 20 20 12 |. . . . . . .|
00003CC0: 20 92 20 20 22 00 F7 44 CB 01 54 24 B2 22 20 20 | . "..D..T$." |
00003CD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003CE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00003CF0: 3A 99 22 93 11 11 22 00 26 45 CC 01 81 49 B2 31 |:."...".&E...I.1|
00003D00: A4 31 36 3A 99 A3 33 29 22 12 22 54 24 22 92 22 |.16:..3)"."T$"."|
00003D10: 3A 82 49 3A 99 22 13 11 11 22 3A 81 49 B2 31 A4 |:.I:."...":.I.1.|
00003D20: 32 35 30 3A 82 49 00 57 45 CD 01 81 49 B2 31 A4 |250:.I.WE...I.1.|
00003D30: 35 3A 99 54 24 28 49 29 3A 81 4A B2 31 A4 35 30 |5:.T$(I):.J.1.50|
00003D40: 3A 82 4A 2C 49 3A 99 22 20 20 20 22 54 24 3A 99 |:.J,I:." "T$:.|
00003D50: 22 20 20 20 22 54 24 00 78 45 CE 01 99 A3 39 29 |" "T$.xE....9)|
00003D60: 22 91 20 42 4F 4F 4B 2D 4B 45 45 50 49 4E 47 20 |". BOOK-KEEPING |
00003D70: 53 59 53 54 45 4D 20 22 00 9A 45 CF 01 99 A6 33 |SYSTEM "..E....3|
00003D80: 29 3B 3A 81 49 B2 31 A4 31 36 3A 99 22 12 20 92 |);:.I.1.16:.". .|
00003D90: 20 22 3B 3A 82 49 3A 99 3A 99 00 BB 45 D0 01 99 | ";:.I:.:...E...|
00003DA0: A3 31 32 29 22 20 46 20 12 20 92 20 52 20 12 20 |.12)" F . . R . |
00003DB0: 92 20 4F 20 12 20 92 20 4D 20 22 00 E9 45 D1 01 |. O . . M "..E..|
00003DC0: 99 3A 99 A3 38 29 22 20 44 20 12 20 92 20 49 20 |.:..8)" D . . I |
00003DD0: 12 20 92 20 41 20 12 20 92 20 4C 20 12 20 92 20 |. . A . . L . . |
00003DE0: 4F 20 12 20 92 20 47 20 22 00 23 46 D2 01 99 3A |O . . G ".#F...:|
00003DF0: 99 A3 34 29 22 20 53 20 12 20 92 20 4F 20 12 20 |..4)" S . . O . |
00003E00: 92 20 46 20 12 20 92 20 54 20 12 20 92 20 57 20 |. F . . T . . W |
00003E10: 12 20 92 20 41 20 12 20 92 20 52 20 12 20 92 20 |. . A . . R . . |
00003E20: 45 20 22 00 43 46 D3 01 99 3A 99 A6 33 29 3B 3A |E ".CF...:..3);:|
00003E30: 81 49 B2 31 A4 31 36 3A 99 22 12 20 92 20 22 3B |.I.1.16:.". . ";|
00003E40: 3A 82 49 00 5D 46 D4 01 81 49 B2 31 A4 35 30 30 |:.I.]F...I.1.500|
00003E50: 3A 82 49 3A 99 22 11 11 11 11 22 3A 8E 00 6C 46 |:.I:."....":..lF|
00003E60: D6 01 8B 4E B3 4D 54 AB 31 30 A7 8E 00 99 46 D7 |...N.MT.10....F.|
00003E70: 01 99 22 50 52 45 53 45 4E 54 20 42 41 54 43 48 |.."PRESENT BATCH|
00003E80: 20 49 53 20 46 55 4C 4C 20 26 20 4E 45 45 44 53 | IS FULL & NEEDS|
00003E90: 20 50 4F 53 54 49 4E 47 22 00 C0 46 D8 01 99 22 | POSTING"..F..."|
00003EA0: 50 52 45 53 53 20 5B 12 52 45 54 55 52 4E 92 5D |PRESS [.RETURN.]|
00003EB0: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 2E 2E 22 | TO CONTINUE..."|
00003EC0: 00 D5 46 D9 01 A1 47 24 3A 8B 47 24 B3 B1 43 52 |..F...G$:.G$..CR|
00003ED0: 24 A7 34 37 33 00 DE 46 DA 01 89 31 37 35 00 00 |$.473..F...175..|
00003EE0: 31 FF 65 AA 28 |1.e.( |
..H....:. **** TRANSACT 64 **** (C) DIAL
OG SOFTWARE JULY 1983 **** 1709......53
280,2:.53281,2:.".":.454:AF$."T R A N S
A C T":.10.D....430:G$." END PROGRAM ":.
G.5.G$." RESTART WILL CLEAR MEMORY "....
.."."G$".":.(F.1.TR$(1)."").6......".. N
OTE . TRANSACTIONS WILL NOW BE LOST".D
...."AND ACCOUNTS FILE HAS NOT BEEN UPDA
TED".X...."..CONFIRM ACTION ? [.Y./.N.]"
:.424:.G$."N".53......G.6..454:......AF$
."T R A N S A C T":.430:......MA.100:MT.
150......AC$(MA),AC(MA),TR$(MT),TR(MA).-
...CB$."......................":LN$."...
....................................".|.
..CD$."......................":BL$."
"....
.CR$.G(13):TD$."":TN$."":TF$."".Z....CD$
"REPORT DATE [.DD/MM/YY.] : ";:LI.8:AN.1
:.402:AN.0......IN$."".."..":.16.....DA$
.IN$.H(BL$,8.C(IN$)).1....430:.". ACCOUN
TS STRUCTURE ...".F...."CREATE .N.EW FIL
E : LOAD .D.ISK / .T.APE FILE".Y....426:
.G$.CR$.9......G.1.3:.G$..J("NDT",G,1)..
G:.22.U...."......"BL$:.".ENTER FILE . N
AME . : ";:LI.14:.402......IN$."".20....
.AF$.IN$:.G..1.385......430:.". ACCOUNTS
SET-UP .".A...."..HEADINGS FOR SECTION:
. 1 ...".S....I.1.5:.Q$:.I......I.1.10:
.AC$(I):AC$.AC$(I):I$.D(I):.I.10.I$." ".
I$... .."A/C: ."I$" . ["AC$;H(BL$,20.C
(AC$))"]":.I...!.."..PRESS [.RETURN.] TO
SET-UP NEW ACCOUNTS"..."..422:.G$..CR$.
34...$.X.11:S.1.<.%..430:.". SET-UP ACCO
UNTS .":XX.X.9:S.S.1.W.&.."......ENTER H
EADINGS FOR SECTION: . "J(D(S),2)" ...".
..'..I.X.XX:I$.D(I):.I.100.I$.".".I$.K.(
.."A/C: ."I$" . ";:LI.20:.402:.IN$..""
.43...)..I.X.."."BL$"..":I.I.2:.I...*.."
.";:.39...+..IN$.."^".AC$(I).IN$:.47.!.,
..I.11.42.<.-..I.X.S.S.1:I.XX:.I:.53.[..
..J.I.XX:AC$(J)."_":.J:I.XX.../..I:.CD$;
"ACCEPT HEADINGS ? [.Y./.N.]"...0..424:.
G$."N"..K.1.13:."."BL$".":.K:.38...1..XX
.MA.51...2..".ANY MORE HEADINGS ? [.Y./.
N.]":.424:.G$."Y".X.XX.1:.37...3.NA.XX.&
.5..430:.". T R A N S A C T .".N.6.."...
.B.ATCH PROCESS":.TR$(1)."".56.W.7.."...
.T.RANSACTION FILE HANDLER":.57...8.."..
..L.OAD TRANSACTION FILE"...9.."....A.CC
OUNTS FILE HANDLER"...:.."....R.ESTART O
R .E.ND PROGRAM"...;..426:.G.1.6:.G$..J(
"BTLARE",G,1)..G:.59.5.<..(G.2.TR$(1).""
).(G.3.TR$(1).."").59.O.=..G.68,175,248,
286,2,2.D.?..430:.". VAT .."...@.."CURRE
NT RATE SET-UP ="V"%..".E.A..".ENTER . N
EW . % FOR AUTOCALC ? ";:LI.2:.402:.IN$.
"".68...B.V.E(IN$):.V.1.V.99.65...D..F.1
..219:F.0...E.Q$."":.430:.". BATCH PROCE
SSING ...":.470.A.F..".B.ANK RECEIPTS &
PAYMENTS".D.G.."..C.ASH RECEIPTS & PAYME
NTS"...H.."..S.ALES INVOICES & CREDIT NO
TES"...I.."..P.URCHASE INVOICES & CREDIT
NOTES".J.J.."..J.OURNALS"...K.."...V.AT
: AUTOCALC SET-UP"...L.."..[.RETURN.] TR
ANSACT OPTIONS".#.M..426:.G$.CR$.53.J.N.
.G.1.6:.G$..J("BCSPJV",G,1)..G:.77.V.O..
G.6.63...P.Q1$."PAYMENT":Q2$."RECEIPT":.
G.2.Q1$."INVOICE":Q2$."CR/NOTE".L.Q.Q3$.
H(Q1$,1):Q4$.H(Q2$,1):.:.I.1.G:.H$:.I:TT
$.G$...R.A.0:B.0:C.0:T.T.1:T$.J(D(T),2).
(.S..430:.". "H$" .".25.C(H$.T$))"TRANSA
CT: . "T$" ....".J.T.T$.T$.H(BL$,4.C(T$)
):.G.5.154.Y.U..Q$.."".90...V..".PROCESS
."Q3$"."J(Q1$,2)" OR ."Q4$"."J(Q2$,2)"
? ";...W.LI.1:.402:TM$.IN$:.TM$."".T.T.1
:.68.V.X..TM$..Q3$.TM$..Q4$.86...Y.Q$.Q1
$:.TM$.Q4$.Q$.Q2$.*.Z.."......"BL$:."."Q
$" DATE ";:LI.8:.402:.IN$."".90.C.[..
IN$."^".."."BL$:.86.H.\..IN$.."".TD$.IN$
.H(BL$,9.C(IN$))...].."."Q$" DATE : "T
D$" "...^.R$." TO ":.(TM$."R".G.4).R$."
FROM"..._.."......."Q$R$" ";:LI.20:.
402:.IN$."".95...`..IN$."^".."."BL$:.90.
..A..IN$.."".TN$.IN$.H(BL$,21.C(IN$)).7.
B.."."Q$R$" : "TN$" ".J.C.."........"Q
$" FOLIO ";:LI.8:.402:.IN$."".99...D..
IN$."^".."."BL$:.94...E..IN$.."".TF$.IN$
.H(BL$,9.C(IN$)).E.F.."."Q$" FOLIO : "T
F$" "...G.TR$.TD$.TN$.TF$:.BL$...H..BL$"
.":.H(BL$,22.C(AC$(G)));AC$(G);:." : ^
...";A$.+.I..H(A$,1)."^".99.G.J.A..(100.
E(A$)..5).100:.(A..01).(A.999999.99)..".
.":.104...K.Z$.J(D(A),2):.437:.".".25)H(
BL$,12.C(Z$));Z$.I.L.A..1.A:TM.A:.151:A.
TM:J.6:.(A.0.G.3).G.3.J.5...M..BL$".":.H
(BL$,22.C(AC$(J)));AC$(J);:." : ^...";
B$.+.N..(H(B$,1)."^").(E(B$).0).."...":.
104.].O..B$."@".B..1..(100.(A.(100.V).V)
..5).100:.115...P.B..(100.E(B$)..5).100:
TM.B:.151:B.TM...Q..B.0.B..1.A.."..":.10
9...R..B.0.B..1.A.."..":.109...S.Z$.J(D(
B),2):.437:.".".25)H(BL$,12.C(Z$));Z$...
T..:I.2:CT.0:AB.A.B:.AB.0.I.0:.131.(.U..
(I.NA).(I.2).I.2.A.V..(G.2.I.4).I.11.I.1
1.P.W..I.G.I.G.1.X.X.AC.C(AC$(I)):.AC$(I
)."_".I.I.1:.117...Y.."."BL$".":.H(BL$,2
0.AC);". "AC$(I)" . : >";:."...";C$.L.
Z..C$.">".I.I.1:.117...{..H(C$,1).">".I.
.(E(J(C$,2))).10.9:.117...|..H(C$,1)."="
.I..(E(J(C$,2))):.117.K.}..C$."@".C..(10
0.(.1.(AB.CT))..5).100:.130.H.~..C$."^".
CT.0.."...":.109.Z...E(C$)..0.121.....C
..(100.E(C$)..5).100:TM.C:.151:C.TM.....
RT..(100.(AB.CT.C)..5).100:.(C.0.RT.0).(
C.0.RT.0).121.....Z$.J(D(C),2):.437:."."
.25)H(BL$,12.C(Z$));Z$.7....".ACCEPT ANA
LYSIS ? [.Y./.N.]":.424.R...."."BL$".":.
G$."Y".135.I....AB.0.."....":.109.X...."
.";:.121.....I$.J(D(I),2):TA$." ".TT$.I
$.H(BL$,3.C(I$)).....A..(100.A..5).100:T
R(G)..(100.(TR(G).A)..5).100.....B..(100
.B..5).100:TR(J)..(100.(TR(J).B)..5).100
.D...C..(100.C..5).100:TR(I)..(100.(TR(I
).C)..5).100.`...CT..(100.(CT.C)..5).100
.....A$.D(A):Z$.A$:.437:A$.H(BL$,10.C(Z$
)).Z$.....B$.D(B):Z$.B$:.437:B$.H(BL$,10
.C(Z$)).Z$.....C$.D(C):Z$.C$:.437:C$.H(B
L$,10.C(Z$)).Z$......"DETAILS: ";:LI.20:
.402:D$.IN$:.D$."".D$."<".L...."."BL$"."
:N.N.1:TR$(N).T$.TR$.A$.B$.C$.TA$.D$....
...(100.(AB.CT)..5).100..0.A.0:B.0:TR$.B
L$:.".":.121......470:.". OK . ANOTHER
"Q$" ? [.Y./.N.]".J...K$."":.K$:.K$."".1
47.Y....K$."Y".82......68......(G.3.TM$.
"R").(G.3.TM$."I").(G.4.TM$."C").TM..1.T
M.......2....:I.1:J.1:CT.0.F....(I.NA.I.
1).I.1.A....AC$(I)."_".I.I.1:.155......"
."BL$".":J$.J(D(J),2):.J$;:AC.C(AC$(I)).
G....H(BL$,23.AC.C(J$));". "AC$(I)" .";:
." : >...";C$.X....C$.."^".161... ..CT
.0.T.T.1:.68......C$.">".I.I.1:.155.....
.H(C$,1).">".I..(E(J(C$,2))).10.9:.155.T
....H(C$,1)."=".I..(E(J(C$,2))):.155....
.C..(100.E(C$)..5).100:.(C.0.C..99999.99
.C.99999.99).157.F...Z$.D(C):.437:C$.H(B
L$,10.C(Z$)).Z$:.".".28)" ";C$.....I$.J(
D(I),2):TA$." J".I$.H(BL$,3.C(I$)).-...
CT..(100.(CT.C)..5).100:TR(I)..(100.(TR(
I).C)..5).100.`....".DETAILS: ";:LI.20:.
402:D$.IN$:.D$."".D$."<". ...."."BL$".":
N.N.1:TR$(N).T$.DA$." JOURNAL ".BL$.C
$.TA$.D$......CT..0.J.J.1:.157......"ENT
RIES NOW BALANCE - CONTINUE ? [.Y./.N.]"
:.424.. ...G$."Y".J.J.1:."."BL$".":.157.
. ...68.B ...430:.". TRANSACTION FILE .
"F$".. ".G ..."..RECORDS : .V.IEW E
NTRIES".. ...". : .S.EARCH LIN
E".. ...".PRINT : .B.ATCH REPORT".U
...". : .P.OSTING DETAILS"..
...". : .A.NALYSIS SUMMARY".6!
...".SAVE TO : .D.ISK OR .T.APE":.F.1
.TR$(1)."".183.E!...".POSTINGS : .U.PD
ATE ACCOUNT BALANCES"..!..."..[.RETURN.]
TRANSACT OPTIONS"..!...426:.G$.CR$.53.H
!...G.1.8:.G$..J("BPAVSUDT",G,1)..G:.184
.V!...G.4..443..!...G.6.(F.1.TR$(1)."").
184.."...G.190,196,203,221,265,210,239,2
39.X"...430:.". TRANSACTION REPORT ...":
.". PRINT . IN PROGRESS".}"...335:.433:.
"TRANSACTION REPORT";.."....16);"FOLIO";
.9);"TOTAL";.7);"VAT";.7);"NET".R"A..434
:.:.I.1.N:.H(TR$(I),79):.I.."B..:.434:.4
: 4:.175.##D..430:.". POSTING DETAILS ..
.":.". PRINT . IN PROGRESS".L#E..335:.43
3:."TRN AMOUNT DETAILS";.H#F...17);"
POSTINGS":.434:...#G..I.1.N:.H(TR$(I),4)
;J(TR$(I),65,11);J(TR$(I),80);.I#H.K.C(J
(TR$(I),80)):.H(BL$,20.K);" : ";..#I.J.
E(J(TR$(I),77,3)):.AC$(J);" A/C":.I:.194
.4$K..430:.". SUMMARY ANALYSIS ...":.".
PRINT . IN PROGRESS"._$L..335:.432:."TRA
NSACTION ANALYSIS":.435.Z$M..:.I.1.NA:.T
R(I).0.208..$N..AC$(I);H(BL$,27.C(AC$(I)
));.D$O.Z$.D(TR(I)):.437:.H(BL$,10.C(Z$)
);Z$..$P..I:.:.435:.4: 4:.175..$R..430:.
". ACCOUNTS UPDATE ...".-%S.."TRANSACTIO
N FILE DETAILS WILL BE WIPED".Z%T.." A
FTER . POSTING . TO ACCOUNTS FILE"..%U..
"ENSURE ALL REPORTS ARE PRINTED AND THE"
..%V.."TRANSACTION FILE SAVED TO DISK OR
TAPE"..%W.."...C.ONTINUE OR [.RETURN.]
OPTIONS":.426:.G$.."C".175.#&X..I.1.NA:A
C(I)..(100.(AC(I).TR(I))..5).100:.I.5&Y.
.219:U.1:.286.P&..F$."":.I.1.N:TR$(I).""
:.I:.I.1.NA:TR(I).0:.I:N.0:T.0:...&...43
0:.". VIEW TRANSACTIONS ....".R&...".STA
RT VIEW FROM . NUMBER . : ";:LI.3:.402:.
IN$."".175..'..K..(E(IN$)):.I.1.N:.(E(H(
TR$(I),4))..K)..I:.222.*'...430:.". VIEW
TRANSACTIONS ...".W'...:.J.1.5:.Q$:.H(Q
$,1)..J(TR$(I),76,1)..J.X'..." . NUMBER
. "H(TR$(I),4)..'..." . DATE . "J(
TR$(I),5,8)..'..." . NAME . "J(TR$(I
),14,20)..'...J(TR$(I),14,7)."JOURNAL"..
:.233..(..." . FOLIO . "J(TR$(I),35,8
):..,(...J(TR$(I),44,10)" . "Q$" .".L(.
..J(TR$(I),54,10)" . VAT ."..(...J(TR$(
I),64,10)" . "J(TR$(I),80)" . :"J(TR$(I
),77,3)..(...I.N..E(H(TR$(I.1),4)).K.I.I
.1:.233.W(..."..CONTINUE VIEW ? [.Y./.N.
]":.424..(...G$."Y".I.N.I.I.1:K.K.1:.:.2
24..)...175.&)...430:.". TRANSACTION FIL
E ...".\)..."ENTER FILE . NAME . : ";:LI
.14:.402:.IN$."".175..)..F$.IN$.".T":.G$
."C"..1,1,1,F$:.243..)...1,8,1,"0:".F$."
,SEQ,WRITE".Z)..."......"BL$:.".SAVING F
ILE . ";H(F$,C(F$).2);" ."..)...1,DA$;CR
$;:.1,N;CR$;:.K.1.N.,*...1,H(TR$(K),79);
CR$;:.1,J(TR$(K),80);CR$;:.K.\*...1,NA;C
R$;:.K.1.NA:.1,TR(K);CR$;:.K: 1:.175.*.
..430:.". TRANSACTION FILE ..."..*..."LO
AD FROM : .D.ISK OR .T.APE"..*...426:.G
$.CR$.53..*...G.1.2:.G$..J("DT",G,1)..G:
.250..+..."......"BL$:.".ENTER FILE . NA
ME . : ";:LI.14:.402.$+...IN$."".248.Y+.
.F$.IN$.".T":.G.1..1,8,0,"0:".F$.",SEQ,R
EAD":.256.Q+...430:.1,1,0,F$:.260..+...1
5,8,15:.15,E,E$:.E.19.260.F+.. 1:.".....
."BL$:.".";E$;": PRESS [.RETURN.]": 15..
+...422:.G$..CR$.258..+...53..,...".....
."BL$:.".. ";H(F$,C(F$).2);" . FILE LOAD
ING";.P,...1,PD$:.1,N:.K.1.N:.1,X$:.1,Y$
:TR$(K).X$.Y$:.K.},...1,NA:.K.1.NA:.1,TR
(K):.K: 1:.G$."D". 15..,..."...ED ":."..
BATCH PROCESS DATE: ";PD$;"..":F.1:.472.
.,...430:.". SEARCH TRANSACTIONS ..."..-
..."DETAILS TO FIND : .";:LI.15:.402:.IN
$."".175.3-...I.1.N:.J.1.C(TR$(I)).C(IN$
).1.X-...J(TR$(I),J,C(IN$))..IN$..J:.283
..-...".......... NUMBER . : "H(TR$(I),
4)..-...".. DATE . : "J(TR$(I),5,8).K
-...". NAME . : "J(TR$(I),14,20)..-..
.". FOLIO . : "J(TR$(I),35,8)......".
GROSS . : "J(TR$(I),44,10).9....".
VAT . : "J(TR$(I),54,10).^....". NE
T . : "J(TR$(I),64,10)......". POSTING .
: "J(TR$(I),76,3)......". DETAILS . : "
J(TR$(I),80);.D....H(BL$,20.C(J(TR$(I),8
0)))......H(TR$(I),4)..H(TR$(I.1),4).282
.!/..."..EXTEND ANALYSIS ? [.Y./.N.]..."
:.424:.G$."N".282.;/...H(CD$,13):I.I.1:.
273.Q/..."..CONTINUE SEARCH ? [.Y./.N.]"
:.424:.G$."N".284../...I..N..CD$"."BL$:.
I../...175../...430:.". ACCOUNTS FILE ."
:.U.0.289../..U.0:."... POSTING . OF TRA
NSACTIONS IS COMPLETED".%0 ..".TO PROTEC
T THE NEW ACCOUNTS BALANCES -..":.294.X0
!.."..HEADINGS : ";:.S.10..".A.MEND ON
LY":.291.R0"..".E.NTER OR .A.MEND"..0#..
". : .S.ORT SECTIONS"..0$.."..
DETAILS : .V.IEW OR .P.RINT"..0%.."..
BALANCES : .Z.EROISE"..1&.."..SAVE TO
: .D.ISK OR .T.APE".+1'.."..[.RETURN.
] TRANSACT OPTIONS".?1(..426:.G$.CR$.53.
I1)..G.1.8:.G$..J("EASVPDTZ",G,1)..G:.29
6..1*..G.337,340,353,300,301,371,372,398
..1,.AT$." VIEW ":.302..1-.AT$." PRINT "
.W1...430:."."AT$"ACCOUNTS ..."..1/.."OU
TPUT .H.EADINGS OR .B.ALANCES"..20..426:
.G$.."H".G$.."B".304.,21..G$.CR$.286.D22
.AT.0:AT$." HEADINGS ":.G$."B".AT.1:AT$.
" BALANCES "..23.DV.3:.G.5.DV.4:.443:SS.
1:.312..24..430:."."AT$"...".G25.."ENTER
SECTION TO DISPLAY .1 -"S". ";..26.LI.2
:.402:.IN$."".300..37.SS.E(IN$):.(SS.1.S
S.S).."..":.309.-38..430:.". ACCOUNT"AT$
".":.DV.3.314.K39.."... PRINT . IN PROGR
ESS":."..S.TOP / .R.ESTART / .E.ND"..3:.
XX.10.(SS.1):.4,DV:.4:.".":.I.SS.S:AC(0)
.0..3;..DV.4..432:." ACCOUNT";AT$:.435:.
..3<.." SECTION"I:.:X.XX.1:XX.X.9:.J.X.X
X:J$.D(J)..3=..AT.0.321.24>..J$;H(BL$,5.
C(J$));H(BL$,20.C(AC$(J)));AC$(J);.[4?.Z
$.D(AC(J)):.437:.H(BL$,12.C(Z$));Z$..4@.
AC(0)..(100.(AC(0).AC(J))..5).100:.322..
4A..J$;H(BL$,8.C(J$));AC$(J);H(BL$,20.C(
AC$(J))).I4B..J:.AT.0.325..4C.Z$.D(AC(0)
):.437:L$.H("------------",C(Z$)).%5D.B$
.H(BL$,37.C(Z$)):.B$;L$:.B$;Z$:.B$;L$.95
E..DV.4..331:.329.M5F.."."H(LN$,21):."CO
NTINUE VIEW ? [.Y./.N.]":.424.}5G..G$."N
".I.S..5H..DV.3..".."BL$:.BL$:."......".
.5I..I:.4: 4:.286.A5K.P$."":.4: 4..5L..G
$:.G$."".P$."S".332..5M.P$.G$:.P$."S".33
2..6N..P$."E".I.S:.286..6O..4,4:.4:.".":
..'6Q..S.10.296.A6R.X..(10.(S).1):I.0:.3
7.N6T.X.11:Y.1.H6U.XX.X.9:Y.Y.1:.Y.S.286
..6V..430:.". AMEND ACCOUNTS ."..6W.."..
....SECTION: . "J(D(Y),2)" ..."..6X..I.X
.XX:AC$.AC$(I):I$.D(I):.I.100.I$.".".I$.
.7Y.."A/C: ."I$" . ["AC$;H(BL$,20.C(AC
$))"]":.I.J7Z.."...A/C: .NO:. TO AMEND O
R .C.ONTINUE: ";:LI.3:.402.Z7[..IN$."".2
86.S7\..IN$."C".X.XX.1:.341..7].G.E(IN$)
:.G.X.G.XX..".....":.346.T7^.."."BL$".":
."A/C: . "IN$" . ";:LI.20:.402:.IN$.""
.343..7_.AC$(G).IN$:.343..8A..430:.". OR
GANISE ACCOUNTS ...".K8B.."ENTER SECTION
TO SORT: .2 -"S".":.".OR .A.LL SECTIONS
";.E8C.LI.2:.402:.IN$."".286.|8D..IN$."
A".X.11:.359..8E.SS.E(IN$):.(SS.2.SS.S).
."....":.354..8F.X.10.SS.9.L8G.XX.X.9:I$
.D(.(XX.10))..9H.."......SORTING HEADING
S FOR SECTION: ."I$" ..":.BL$.09I..J.X.X
X.1:.K.J.1.XX:.AC$(J).AC$(K).366.Z9J..K:
.368:.J:.IN$."A".XX.NA.X.XX.1:.359..9K..
"..SORT COMPLETED - PRESS [.RETURN.]"..9
L..G$:.G$..CR$.364..9M..286..9N.Q$.AC$(J
):Q.AC(J):AC$(J).AC$(K):AC(J).AC(K):AC$(
K).Q$:AC(K).Q..9O..362..:P..".........";
:.I.X.XX:I$.J(D(I),2):.BL$".".A:Q..I$;H(
BL$,12.C(I$));AC$(I):.I:..N:S.W.0:.373.V
:T.W.1.{:U..430:.". SAVE ACCOUNTS FILE .
.."..:V.."RENAME FILE FOR UPDATE ? [.Y./
.N.]".C:W..424:.G$."N".FF$.AF$:.378..:X.
.".ENTER . NEW . NAME: ";:LI.14:.402:.IN
$."".373..;Y.FF$.IN$..;Z..W.1..1,1,1,FF$
:.380.;;{..1,8,1,"@0:".FF$.",SEQ,W".T;|.
."......"BL$:.".SAVING FILE . ";FF$;" ."
:.1,DA$;CR$;..;}..1,NA;CR$;:.1,S;CR$;:.1
,V;CR$;..;~..K.1.NA:.1,AC$(K);CR$;:.K.Z;
..K.1.NA:.1,AC(K);CR$;:.K: 1:.286..<...
G.2..1,8,0,"0:".AF$.",SEQ,READ":.387..<.
..430:.1,1,0,AF$:.391.=<...15,8,15:.15,E
,E$:.E.19.391.R<.. 1:."......"BL$:.".";E
$;": PRESS [.RETURN.]": 15..<...422:.G$.
.CR$.389..<...20.F<..."......"BL$:.".. "
;AF$;" . FILE LOADING";:.1,UD$..<...1,NA
:.1,S:.1,V:.K.1.NA:.1,AC$(K):.K..=...K.1
.NA:.1,AC(K):.K: 1: 15:."...ED ..".]=...
"FILE LAST UPDATED ON ";UD$:."..PRESS [.
RETURN.] FOR OPTIONS".R=...G$:.G$..CR$.3
95.Z=...53..=...430:.". ZEROISE ACCOUNTS
...".N=..."ARE YOU SURE ? [.Y./.N.]":.4
24:.G$."N".286..=...I.1.NA:AC(I).0:.I:.2
86..>..."[";H(BL$,LI);"]";H(CB$,LI.1);.%
>..IN$." ":IT.TI:IC.2.;>...IP$:.IP$.."".
407.K>...IT..TI..J(" .",IC,1);".";:IC.3.
IC:IT.TI.15.T>...404..>..A.F(IP$):IL.C(I
N$):.(A.127).32.413.H>...(A.34.A.44.A.58
).(AN.1.(A.46.A.57)).404.Y>...IL.LI.1.41
2..>...IP$:.IP$."".409..>...407.,?..IN$.
IN$.IP$:.IP$;:IL.C(IN$):.IL.LI.1.."].";:
.410.L?...A.13..419:IN$.J(IN$,2):.:..P?.
..A.20.IL.1.IN$.H(IN$,IL.1):.417..?...A.
141.IL.1..419:.K.2.IL:.". .";:.K:.403..?
..404.I?..BU$." ..":.C(IN$).LI.BU$."]..
".X?...BU$;:.404..?...IL.LI.1.." .";..?.
....@..G$."":.G$:.G$."".422..@....4@..G$
."":.G$:.G$.."Y".G$.."N".424.:@....B@...
CD$H(LN$,17):.". SELECT . LETTER "..@..G
$."":.G$:.G$..""..".."BL$:.BL$:...@...K.
1.300:.K:.". SELECT . LETTER .":.K.1.300
:.K:.426..@...".";AF$;.31.C(AF$));DA$:.L
N$:...A...AF$;.29.C(AF$));DA$:.435..A...
AF$;.66.C(AF$));DA$.IA..."--------------
-----------------------";.XA..."--------
-----------------------------":...A...Z.
1.C(Z$):.J(Z$,Z,1).".".440..A...Z..A..Z$
.Z$.".00":.441.SA..Z.C(Z$).Z:.Z.1.Z$.Z$.
"0".YA.....A...430..B..PW$." ENSURE PRIN
TER ON & ALIGNED ":."."PW$".".HB...K.1.3
00:.K:.". PRESS [.RETURN.] WHEN READY.."
.ZB...G$:.G$..CR$.."..."PW$:.K.1.500:.K:
."..":.444..B.....BA.."BANK","CASH","SAL
ES","PURCHASES","JOURNAL"..BB.."BANK CON
TROL","CASH CONTROL","DEBTOR CONTROL","C
REDITOR CONTROL".<CC.."OUTPUT VAT","INPU
T VAT","RESERVE DEBTORS","RESERVE CREDIT
ORS".DCD.."PROFIT & LOSS","JOURNAL SUSPE
NSE"..CF.T$(1)." . . . . . . .
. . . . . . . . . "..CG.T$(2)
." . . . . . . . . . . . . . . . .
. . . . . . . . . . ".5DH.T$(3)."
. . . . . . . . . . . . . . .
. . . ".~DI.T$(4)." . . . .
. . . . . . . . . . . . . . . . . .
. . ".EDJ.T$(5)." . . . . . . .
. . . . . . . . . . . . . . . "..D
K.T$." "
:."...".&EL..I.1.16:..3)"."T$".":.I:."..
.":.I.1.250:.I.WEM..I.1.5:.T$(I):.J.1.50
:.J,I:." "T$:." "T$.XEN...9)". BOOK-
KEEPING SYSTEM "..EO...3);:.I.1.16:.". .
";:.I:.:...EP...12)" F . . R . . O . .
M "..EQ..:..8)" D . . I . . A . . L . .
O . . G ".#FR..:..4)" S . . O . . F . .
T . . W . . A . . R . . E ".CFS..:..3);:
.I.1.16:.". . ";:.I.]FT..I.1.500:.I:."..
..":..LFV..N.MT.10....FW.."PRESENT BATCH
IS FULL & NEEDS POSTING"..FX.."PRESS [.
RETURN.] TO CONTINUE...".UFY..G$:.G$..CR
$.473..FZ..175..1.E.(
> CLICK IMAGE PREVIEW FOR FULL MODAL