I󝛧FN2UU≒1≒E≦O―345612345℉6℉7℉8℉9╖9XEMP42―II4561OV5M34OY112677PDEEAFQA═2D℉653ど梦Z笴鞘C襃盦J盤J盝睺谹芓臦誕螶癏盭豀睺訟寥A袰蜟艭稨矵碒礖对T砊碩礪8へI@@@@ @@@@@@ !"#$%&'()*+,-./0123456789:@;<=@>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefg }'@'@@9 $!  幸锨伊蜖晌窒擅$ 敂;@P,;@,;A,;A,;@ ,9@ ,9@ ,9@ ,9@ ,;A,;A,;A,;A,敂;A,;A,;A,;A,9@P,9@P,9@P,9@P,9@P,;A,;A,;A,;A,敂;A,9@P,;A,;A,;A,;A,;A,;A,;A,;A,;A,;A,;A,(墘;A,;A,;A,;A,;A,;A,;A,;A,;A,;A,;A,;A,2墘;A,;A,;A,;A,;A,;A,;A,;A,9A,;A,;A,9@,7&&;A,;A,;A,9 APz-@v67$@P%@<+%@,$@P,.1 z dua6.W u67B:,%@,.e- 6.6.6.6.!6.'6.-6.uu6.k IN涰( %  INVOICING PROCEDURE ( X/ 'EACH INVOICE CAN HAVE AT MOST 10 LINES.X $INVOICE IS PRINTED ON SCREEN AND/OR U+ #PRINTER WHEN COMPLETE. AT MOST, 50U %INVOICES MAY BE PROCESSED IN ONE RUN. B-)  IS THE PRINTER BEING USED (Y/N) -%0Y*0N B% A@L= }4Y3 PREPARE INVOICE IN PRINTER. = BV }`[ A 2  ENTER NUMBER OF CUSTOMERS TO BE M INVOICED (-1 TO END) Q[ Bas)6. N6. s6. bk(6. k6.< e"6@AjP  CUSTOMER NAME :#P67$@0%@<+%@,$@0,.oY 2ND LINE NAME : Y67@$@0%@<+@%@,$@0,.tY STREET ADDRESS : Y67@$@0%@<+@%@,$@0,.y  CITY : z  STATE : {  ZIP : |--67B:,%@,.7@<@0&B:,,~<<67@$@0%@<+@%@,$@0,.<<67@$@0%@<+@%@,$@0,.<<67@$@0%@<+@%@,$@0,.F A  8 PRESS 1 TO INVOICE, 2 TO ABORT <F B-@*@# B- A "@A+6-+CG=# LINES PRINTED SO FAR }6-%@36-@3NUMBER OF LINES IN INVOICE SO FARO INPUT INVOICE NUMBER "O67$@0%@<+%@,$@0,.t* !INPUT DATE OF INVOICE (MM/DD/YY) .[67$@0%@<+%@,$@0,.jB:,@t B) 6.*, ( INPUT CUSTOMER ORDER NUMBER ,- SHIPPED VIA : .6. NET 10 DAYS/ TERMS : 0 2M *  ***********7 LINE I  ITEM NO. :M70067$@0%@<+%@,$@0,.<Z ITEM DESCRIPTION :L67$@0%@<+%@,$@0,.Z6-%@=z37$@0%@<+%@,$@0,4EKb67$@0%@<+%@,$@0,.0p6-%@z A0> APB6-%@F汮M QUANTITY ORDER :7 UNIT PRICE :;D68,-M68,-K }P++ !NUMBER OF LINES PRINTED SO FAR = U  Z68,-8,$8,a 6-d   A@n Bx; 4N  DO AGAIN# B16-&@; A0($ MORE ITEM ON INVOICE (Y/N) (%0Y*0N B% A4NAPF@2 INVOICE FULL. MACHINE TO TOTAL< BF AY6-%@ A0INVOICE COMPLETE洬8 } TAXABLE (Y/N) "80Y*0NAQE AR4Y) TAX RATE (%) -;6-'AE B" SHIPPING " }m 4Y }P INVOICE NUMBER 7$@0%@<+%@,$@0,m-@%F:@,&@:7 DATE :7$@0%@<+%@,$@0,:      4Y33!6-6-!6-@-@ A@&6-%8,16-%8,<6-%8,@ 00 (----------------------------------------8 4Y83(----------------------------------------1 6.=:,6-B:,6-% B+6.16-K TOTAL :.@@!&3 G@@5&K 6-4Y6-$J 4YJ3 TOTAL :7@<@ &,7@<@&,N 6- B6.6-6 SALES TAX :J@@5&N H 6- B6.0 SHIPPING :D@@5&H [ 4Y33 SALES TAX :7@<@#&,[3 SHIPPING :7@<@#&, 6-%%68@,-N 6- B6.6-6 PAY THIS AMOUNT :J@@5&N 7 4Y73PAY THIS AMOUNT:7@<@&,; 4Y;3(---------------------------------------- B0 4N& OLD INVOICE ELIMINATED0 ACOMPLETED INVOICE GOOD淂0YA3 663 7$@0%@<+%@,$@0,|=7@$@0%@<+@%@,$@0,0|3 7@$@0%@<+@%@,$@0,BB3 7@$@0%@<+@%@,$@0,"3 , , 'I 3 C7@$@0%@<+@%@,$@0,4I3 , 3 3 .儈3 7$@0%@<$@0%@,  =:,  7$@0%@<+%@,$@0,  /% 3 -@! AA% 3WW3O ---------------4 3 6[ 6- B6.[37@<@E,TOTAL :7@<@&,$:[ 6- B6.[37@<@E,SALES TAX :7@<@&,$<[ 6- B6.[37@<@E,SHIPPING :7@<@&,$>[ 6- B6.[37@<@E,PAY THIS AMT. :7@<@&,$?!-@@  ! @況ZZ6.P |6-%@68,-z67$@0%@<+%@,$@0,.7@$@0%@<+@%@,$@0,򌻑$@0%@<+%@,$@0,.7@1<@`,AA67$@0%@<+%@,$@0,.7@1<@`,eA67$@0%@<+%@,$@0,.7@1<@`,S68,-8@,e68,-8@, 68,-68,-68,- ZERO ALL INVOICE VARIABLES洰-@@E67$@0%@<+%@,$@0,.s67$@0%@<+%@,$@0,.ꐳ,-𔼄,-񃅖,-167$@0%@<+%@,$@0,._67$@0%@<+%@,$@0,.67$@0%@<+%@,$@0,.򖉥$@0%@<+%@,$@0,.  }-)  DO YOU WANT MORE INVOICES (Y/N) -%0Y*0N B% A0?"@P+ TRANSACTION MATRIX FULL5 B? A4YA }: }6 &PRESS 1 FOR TRANSACTION REPORT,ELSE 2 :%01*02 B% A42A8 4Y8 (PREPARE PRINTER FOR TRANSACTION ON FILE. B& 0Y } A5'-@  ( }+30 (牋牋牋牋牋砸廖恿迷上螤遗邢以牋牋牋牋牋牋3 ,/ 4Y,3 TRANSACTION REPORT/30   5 4Y33:-@6.=:8,,&6-B:,V6-B:7$@0%@<+%@,$@0,,6-B:7$@0%@<+%@,$@0,,;q36-B:7$@0%@<+%@,$@0,,<6-8,F BL6.R6-[6-8,e Bk6.q6-<@ =3 6.367B:,%@,.7@<@&B:,,>A@@A 7$@0%@<+%@,$@0,?<<67B:,%@,.7$@0%@<$@0%@,@^@@A 7$@0%@<+%@,$@0,^@F:@,&@A<<67B:,%@,.7$@0%@<$@0%@,B^@@ A 7$@0%@<+%@,$@0,^@F:@,&@C<<67B:,%@,.7$@0%@<$@0%@,D@@' E.67B:,%@,..67B:,%@,. F@@7&  G67B:,%@,.I 4Y3N36-6-'6-36-P-@R/6-%8,6-%8,$6-%8,/6-%8,S U// '---------------------------------------X 4Y3 Yc  6- B6."6-G EXTENDED PRICE TOTALS : [@@6&c $Z_ 6- B6.6-C TOTAL SHIPPING :W@@6&_ $[Y 6- B6.= TOTAL SALES TAX :Q@@5&Y $\| 6- B6.6-C TOTAL OF INVOICE AMOUNTS :W@@6&_ $|@F:@,&@^0YA_++3EXTENDED PRICE TOTALS :$`++3TOTAL SHIPPING :$a++3TOTAL SALES TAX :$b++3TOTAL OF INVOICE AMOUNTS :$gMM3INVOICE NUMBER 7@1<@6, DATE : 7@1<@`,h   lPRINT 1 LINE洝s6-@0?6-B:7$@0%@<+%@,$@0,,K6.=:8,,T6-B:,]6-8,g Bm6.s6-" 6-8, B6."6-6 @667B:,%@,.7@<@&,/ 7$@0%@<+%@,$@0,A@@k 7$@0%@<$@0%@,@@!& 0Y)0N A@摀37$@0%@<$@0%@,7$@0%@<$@0%@,7@<@&B:,, 7@<@&B:,, 4@@'& 0@@5&4 $&&PRINT LINE OF INVOICE ON PRINTER44LINE BELOW EXECUTED IF QUANTITY NOT AN INTEGER27$@0%@<+%@,$@0,40] 7$@0%@<+%@,$@0,37$@0%@<+%@,$@0, \B:, +%@,$@0K-B:,%@+%@,$@0%@X67<,. \ 07$@0%@<$@0%@,0 B@@m 7$@0%@<+%@,$@0,𩣛$@0%@<+%@,$@0,TB:, +%@,$@0C-B:,%@+%@,$@0P67<,. T 07$@0%@<$@0%@,0 B@@m 7$@0%@<+%@,$@0,𩣥$@0%@<+%@,$@0,TB:, +%@,$@0C-B:,%@+%@,$@0P67<,. T 07$@0%@<$@0%@,0 B@@m 7$@0%@<+%@,$@0,𩣯$@0%@<+%@,$@0,TB:, +%@,$@0C-B:,%@+%@,$@0P67<,. T 07$@0%@<$@0%@,0 B@@m 7$@0%@<+%@,$@0,𩣹$@0%@<+%@,$@0,TB:, +%@,$@0C-B:,%@+%@,$@0P67<,. T 07$@0%@<$@0%@,0 B@@m 7$@0%@<+%@,$@0,𩩫$@0%@<+%@,$@0,(#116.'RF ITM# DATE APPL TO AMT DISCOUNTS)#116.'__ ____ ____ ____ __ ___ _________F#116.'CST# DATE INV# TYPE AMT OTHERG#116.'---- ---- ---- ---- --- -----d#006.&ITM# DESCRIPTION QT# UNIT PR EXT PRe#006.&____ ___________ ___ _______ ______#$'INPUT ERROR SBR'8 INPUT ERROR! TRY AGAIN !4-@A8 $'$t':-@"3 PRESS ENTER TO CONTINUE 7:$'Y,N,A SBR涊' 6. '3/ &ENTER Y IF OK, N IF ERROR, A TO ABORT 3'+0Y*0N*0A! B+ B'$<( Y,N SBR汚( 6.F(+ ' ENTER Y IF OK, N IF ERROR +P(%0Y*0N B% BZ($(MORE ENTRY? SBR洢( 6.(.* !DO YOU DESIRE MORE ENTRIES (Y/N) .(%0Y*0N B% B($)ONLY Y/N SBR)0Y*0N B)$*''ELIMINATES TRAILING BLANKS OF Z8$+<7B:,P,$A,'A0N6-@2NE 6.=:,B:, @E67B:,%@,.7@<@&B:,,4N'6.7B:,&&@N47@<@,0.467B:,%@,..00HNH6- -@B:,-7<,0.;6-%@? H6-B:,IN6-'BRN$ D:INVOICE.BAS