Trailing-Edge
-
PDP-10 Archives
-
decuslib10-10
-
43,50517/p212.rpg
There is 1 other file named p212.rpg in the archive. Click here to see a list.
01010H P212
01020FTIMECD IP F00450045 DISK DAT212 P212
01025F KASCII P212
01030FBILLRPT O F01320132 OF PRINTER P212
02010ITIMECD AA 010001 CC P212
02020I OR 020001 CK P212
02030I OR 030001NCC0001NCK P212
02040I 00020009 JOB P212
02041I 00100029 NAME P212
02050I 003000330MINUTE P212
02060I 003400392PACOST 01 P212
02070I 004000452STCOST 01 P212
02080I 003400382CDCOST 02 P212
03010C 01 MINUTE MULT 1.00 COST 0082 P212
03020C 01 PACOST ADD STCOST ADCOST0062 P212
03030C 01 ADCOST ADD COST CUCOST0082 P212
03040C 02 MINUTE MULT .15 COST P212
03050C 02 CDCOST ADD COST CUCOST P212
03060C N03 MINUTE DIV 60 HOURS 0030 P212
03070C N03 MVR MINS 0020 P212
03080C N03 CUCOST ADD TOTCST TOTCST0082 P212
04010OBILLRPT H 201 1P P212
04020O OR OF P212
04030O UDATE Y 0008 P212
04040O 0040 'B I L L I N G' P212
04050O 0054 'R E P O R T' P212
04060O 0077 'PAGE' P212
04070O PAGE 0081 P212
04080O H 1 1P P212
04090O OR OF P212
04100O 0056 'PROCESS' P212
04110O 0067 'OTHER' P212
04120O 0079 'TOTAL' P212
04130O H 2 1P P212
04140O OR OF P212
05010O 0007 'JOB NO.' P212
05020O 0021 'NAME' P212
05030O 0036 'HOURS' P212
05040O 0045 'MINUTES' P212
05050O 0054 'COST' P212
05060O 0067 'COSTS' P212
05070O 0078 'COST' P212
05080O D 1 01 P212
05090O OR 02 P212
05100O OR 03 P212
05110O JOB 0008 P212
05120O NAME 0030 P212
05130O N03 HOURS Z 0035 P212
05140O N03 MINS Z 0042 P212
05150O N03 COST 1 0057 P212
05160O 01 ADCOST1 0068 P212
05170O 02 CDCOST1 0068 P212
05180O N03 CUCOST1 0081 P212
05190O 03 0044 'INVALID TYPE' P212
06010O T 2 LR P212
06020O 0068 'TOTAL' P212
06030O TOTCST1 0081 '$' P212