Trailing-Edge
-
PDP-10 Archives
-
decuslib10-10
-
43,50517/p186.rpg
There is 1 other file named p186.rpg in the archive. Click here to see a list.
01010H P186
01020FSLSCARD IP F00800080 DISK DAT186 P186
01030F KASCII P186
01040FSLSREPT O F01320132 OF PRINTER P186
02010ISLSCARD NS 01 P186
02020I 000100020BRANCHL3 P186
02030I 000300040SLSMANL2 P186
02040I 000500090CUSTNOL1 P186
02050I 001000142SLSAMT P186
03010C 01 SLSAMT ADD CUSTOT CUSTOT0062 P186
03020CL1 CUSTOT ADD SMTOT SMTOT 0072 P186
03030CL2 SMTOT ADD BRTOT BRTOT 0072 P186
03040CL3 BRTOT ADD FINTOT FINTOT0082 P186
03050CL3 SETON OF P186
03060CLR SETON OF P186
04010OSLSREPT H 201 1P P186
04020O OR OF P186
04030O UDATE Y 0009 P186
04040O 0025 'SALES REPORT' P186
04050O 0038 'PAGE' P186
04060O PAGE 0043 P186
04070O H 1 1P P186
04080O OR OF P186
04090O 0006 'BRANCH' P186
04100O 0019 'SALESMAN' P186
04110O 0032 'CUSTOMER' P186
04120O 0043 'SALES' P186
04130O H 2 1P P186
04140O OR OF P186
04150O 0004 'NO' P186
04160O 0016 'NO' P186
04170O 0029 'NO' P186
04180O 0044 'AMOUNT' P186
04190O D 1 01 P186
04200O L3 BRANCHZ 0004 P186
04210O L2 SLSMANZ 0016 P186
04220O L1 CUSTNOZ 0030 P186
04230O OF BRANCHZ 0004 P186
04240O OF SLSMANZ 0016 P186
04250O OF CUSTNOZ 0030 P186
04260O SLSAMT1 0045 P186
04270O T 12 L1 P186
04280O CUSTOT1B0045 P186
04290O 0046 '*' P186
04300O T 2 L2 P186
04310O 0042 'TOTAL SALESMAN NC' P186
04320O SLSMANZ 0045 P186
04330O SMTOT 1B0054 P186
04340O 0056 '**' P186
04350O T 3 L3 P186
04360O 0046 'TOTAL BRANCH NO' P186
04370O BRANCHZ 0049 P186
04380O BRTOT 1B0061 P186
04390O 0065 '***' P186
04400O TF1 LR P186
04410O 0017 'FINAL TOTAL' P186
04420O FINTOT1 0030 '$' P186
04430O 0035 '****' P186