Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-06 - decus/20-153/csh102.rpg
There is 1 other file named csh102.rpg in the archive. Click here to see a list.
01010H                                                                    CSH102
01020FMSTRIN  IP AF      35            DISK   PRB101                      CSH102
01030F                                              KASCII                CSH102
01040FCARDSIN IS  F      80            DISK   CSH102                      CSH102
01050F                                              KASCII                CSH102
01060FPRINT   O   F     132     OF     PRINTER                            CSH102
01070FMSTROUT O   F      35            DISK   PRB102                      CSH102
01080F                                              KASCII                CSH102
02010IMSTRIN  AA  11                                                      CSH102
02090I                                        1   3 EMPNOM  M1            CSH102
02030I                                        1  35 MASREC                CSH102
02040ICARDSIN AA  12  80 C1                                               CSH102
02050I       OR   13  80 C2                                               CSH102
02060I       OR   14  80 C3                                               CSH102
02070I       OR   15  80 C4                                               CSH102
02080I       OR   16  80 C5                                               CSH102
02090I                                        1   3 EMPNOI  M1            CSH102
02100I                                        4  20 NAMEI                 CSH102
02110I                                       21  290SOCSEI                CSH102
02120I                                       30  322PAYRTI                CSH102
02130I                                       33  34 CLASSI                CSH102
02140I                                       35  35 SHIFTI                CSH102
03010OPRINT   H  2 1   1P                                                 CSH102
03020O       OR        OF                                                 CSH102
03030O                         UDATE Y   12                               CSH102
03040O                                   50 'EXCEPTION REPORT'            CSH102
03050O                                   70 'PAGE'                        CSH102
03060O                         PAGE  Z   75                               CSH102
03070O        H  1     1P                                                 CSH102
03080O       OR        OF                                                 CSH102
03100O                                    5 'EMP'                         CSH102
03110O                                   41 'TYPE OF'                     CSH102
03120O        H  2     1P                                                 CSH102
03130O       OR        OF                                                 CSH102
03140O                                    5 'NO'                          CSH102
03150O                                   18 'NAME'                        CSH102
03160O                                   43 'TRANSACTION'                 CSH102
03170O                                   66 'ERROR'                       CSH102
03180O        D  1    NMRN11N12                                           CSH102
03190O       AND      N1P                                                 CSH102
03200O       OR        MR 12                                              CSH102
03210O                         EMPNOI     5                               CSH102
03220O                 MR 12   NAMEI     25                               CSH102
03230O                 MR 12             37 'ADDITION'                    CSH102
03240O                NMR 13             37 'DELETION'                    CSH102
03250O                NMR 14             44 'PAY RATE CHANGE'             CSH102
03260O                NMR 15             45 'JOB CLASS CHANGE'            CSH102
03270O                NMR 16             46 'SHIFT CODE CHANGE'           CSH102
03280O                 MR 12             73 'ADDITION OF DUPLICATE'       CSH102
03290O                 MR 12             80 'RECORD'                      CSH102
03300O                NMR 13             70 'MASTER NOT ON FILE'          CSH102
03310O                NMR 14             70 'MASTER NOT ON FILE'          CSH102
     O                NMR 15             70 'MASTER NOT ON FILE'
03320O                NMR 16             70 'MASTER NOT ON FILE'          CSH102
03330OMSTROUT D       NMR 11                                              CSH102
03340O       OR        MR 12                                              CSH102
03350O                         MASREC    35                               CSH102
     O        D       NMR 12
     O                         EMPNOI     3
     O                         NAMEI     20
     O                         SOCSEI    29
     O                         PAYRTI    32
     O                         CLASSI    34
     O                         SHIFTI    35
     O        D        MR 14
03350O                         MASREC    35                               CSH102
     O                         PAYRTI    32
     O        D        MR 15
03350O                         MASREC    35                               CSH102
     O                         CLASSI    34
     O        D        MR 16
03350O                         MASREC    35                               CSH102
     O                         SHIFTI    35