Google
 

Trailing-Edge - PDP-10 Archives - decuslib10-10 - 43,50517/bob.rpg
There is 1 other file named bob.rpg in the archive. Click here to see a list.
01010H                                                                    BOB   
01020FTAB1    IT  F      80           EDISK   BOB1                        BOB   
01030F                                              KASCII                BOB   
01031FTAB2    IT  F    0080           EDISK   BOB2                        BOB   
01032F                                              KASCII                BOB   
01033FTAB3    IT  F    0080           EDISK   BOB3                        BOB   
01034F                                              KASCII                BOB   
01035FTAB4    IT  F    0080           EDISK   BOB4                        BOB   
01036F                                              KASCII                BOB   
01040FCARDSIN IP  F      80            DISK   BOBDAT                      BOB   
01050F                                              KASCII                BOB   
01060FREPORT  O   F     132     OV     PRINTER                            BOB   
02010E    TAB1            TABNO1  5   5  5 0A                             BOB   
02020E    TAB2            TABDES  4   5 20                                BOB   
02030E    TAB3            TABNO2  4   4  5 0A                             BOB   
02040E    TAB4            TABPRC  4   4  4 2                              BOB   
03010ICARDSIN AA  01                                                      BOB   
03020I                                        1   50PRODNO                BOB   
03030I                                        6   80QTY                   BOB   
04010C   01      PRODNO    LOKUPTABNO1    TABDES         25               BOB   
04020C   01      PRODNO    LOKUPTABNO2    TABPRC         50               BOB   
04030C   50                MOVE TABPRC    PRICE   42                      BOB   
04040C   50      QTY       MULT PRICE     AMOUNT  72                      BOB   
05010OREPORT  H 2      1P                                                 BOB   
05020O       OR        OV                                                 BOB   
05030O                         UDATE      8 '  -  -  '                    BOB   
05040O                                   37 'INVENTORY PARTS LIST'        BOB   
05050O                                   50 'PAGE'                        BOB   
05060O                         PAGE      55 '  0 '                        BOB   
05070O        H 2      1P                                                 BOB   
05080O       OR        OV                                                 BOB   
05090O                                    7 'PRODUCT'                     BOB   
05100O                                   22 'PRODUCT'                     BOB   
05110O                                   43 'UNIT'                        BOB   
05120O        H 11     1P                                                 BOB   
05130O       OR        OV                                                 BOB   
05140O                                    7 'NUMBER'                      BOB   
05150O                                   24 'DESCRIPTION'                 BOB   
05160O                                   35 'QTY'                         BOB   
05170O                                   43 'PRICE'                       BOB   
05180O                                   54 'AMOUNT'                      BOB   
05190O        D 1      01                                                 BOB   
05200O                         PRODNO     6 '   0 '                       BOB   
05210O                 25      TABDES    29                               BOB   
05220O                N25                29 '***NO DESCRIPTION***'        BOB   
05230O                         QTY       35 ' 0 '                         BOB   
05240O                 50      PRICE     43 '  .  '                       BOB   
05250O                N50                43 '*NONE'                       BOB   
05260O                 50      AMOUNT    55 '  ,  0.  '                   BOB   
05270O        D 2      LR                                                 BOB   
05280O                                   17 'END OF PRICE LIST'           BOB