Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-06 - decus/20-153/green.rpg
There is 1 other file named green.rpg in the archive. Click here to see a list.
01010H                                                                    GREEN 
01020FINPUT   IP  F      80            DISK   DATGRN                      GREEN 
01030F                                              KASCII                GREEN 
01040FOUTPUT  O         132     OF     PRINTER                            GREEN 
02010IINPUT   NS  01                                                      GREEN 
02020I                                        1  20 CUSTNA                GREEN 
02030I                                       21  272PREBAL                GREEN 
02040I                                       28  342PURCH                 GREEN 
02050I                                       35  412PAYMNT                GREEN 
02060I                                       42  482RETURN                GREEN 
03010C   01      PREBAL    ADD  PURCH     AMOUNT  72                      GREEN 
03020C   01      AMOUNT    SUB  PAYMNT    AMOUNT                          GREEN 
03030C   01      AMOUNT    SUB  RETURN    AMOUNT                          GREEN 
03040C   01      TRANS     ADD  1         TRANS   20                      GREEN 
03050C   01      BALTOT    ADD  PREBAL    BALTOT  82                      GREEN 
03060C   01      PURTOT    ADD  PURCH     PURTOT  82                      GREEN 
03070C   01      PAYTOT    ADD  PAYMNT    PAYTOT  82                      GREEN 
03080C   01      DUETOT    ADD  AMOUNT    DUETOT  82                      GREEN 
03090C   01      TOTRET    ADD  RETURN    TOTRET  82                      GREEN 
04010OOUTPUT  H  201   1P                                                 GREEN 
04020O       OR        OF                                                 GREEN 
04030O                         DATE  Y    8                               GREEN 
04040O                                   36 'ACCOUNTS'                    GREEN 
04050O                                   48 'RECEIVABLE'                  GREEN 
04060O                                   58 'REGISTER'                    GREEN 
04070O                                   82 'PAGE'                        GREEN 
04080O                         PAGE  Z   87                               GREEN 
04090O        H  2     1P                                                 GREEN 
04100O       OR        OF                                                 GREEN 
04110O                                   14 'CUSTOMER'                    GREEN 
04120O                                   33 'PREVIOUS'                    GREEN 
04130O                                   84 'AMOUNT'                      GREEN 
04140O        H  1     1P                                                 GREEN 
04150O       OR        OF                                                 GREEN 
04160O                                   12 'NAME'                        GREEN 
04170O                                   32 'BALANCE'                     GREEN 
04180O                                   46 'PURCHASES'                   GREEN 
04190O                                   59 'PAYMENTS'                    GREEN 
04200O                                   71 'RETURNS'                     GREEN 
04210O                                   82 'DUE'                         GREEN 
04220O        D  1     01                                                 GREEN 
04230O                         CUSTNA    20                               GREEN 
04240O                         PREBAL2   32                               GREEN 
04250O                         PURCH 2   46                               GREEN 
04260O                         PAYMNT2   59                               GREEN 
04270O                         RETURN2   72                               GREEN 
04280O                         AMOUNTB   85                               GREEN 
04290O        T  1     LR                                                 GREEN 
04300O                                   15 'GRAND---TOTALS'              GREEN 
04310O                         UDATE Y   23                               GREEN 
04320O        T  2     LR                                                 GREEN 
04330O                                   22 'TRANSACTIONS-PROCESSED'      GREEN 
04340O                         TRANS Z   26                               GREEN 
04350O        T  2     LR                                                 GREEN 
04360O                                   16 'PREVIOUS-BALANCE'            GREEN 
04370O                                   18 '$'                           GREEN 
04380O                         BALTOT2   29                               GREEN 
04390O        T  2     LR                                                 GREEN 
04400O                                    9 'PURCHASES'                   GREEN 
04410O                                   18 '$'                           GREEN 
04420O                         PURTOT2   29                               GREEN 
04430O        T  2     LR                                                 GREEN 
04440O                                    8 'PAYMENTS'                    GREEN 
04450O                                   18 '$'                           GREEN 
04460O                         PAYTOT2   29                               GREEN 
04470O        T  2     LR                                                 GREEN 
04480O                                    7 'RETURNS'                     GREEN 
04490O                                   18 '$'                           GREEN 
04500O                         TOTRET2   29                               GREEN 
04510O        T  2     LR                                                 GREEN 
04520O                                   10 'AMOUNT-DUE'                  GREEN 
04530O                                   18 '$'                           GREEN 
04540O                         DUETOT2   29                               GREEN