COMTRAN Reconstruction

J28-6169 · January 1962

90.05 listing

PDF page 216 of 221. Download the scanned PDF

The page as scanned

The scan of PDF page 216 of J28-6169
Select the scan to open it at full size.

The text read off it

[90.05 sample-program listing, PDF p.216]

Sample-program compiler listing (PDF page 216) Compiler listing page, Appendix 90.05 (PDF p.216).

    DATE 10/18/61  TIME  2.45  ACCOUNT                     ID. CT PUBLICATIONS         PAGE  25


    01716  606060011100      10000        +18   OCT    606060011100
    01717  730000606060      10000        +19   OCT    730000606060
    01720  606060011101      10000        +20   OCT    606060011101
    01721  007777777777      10000        +21   OCT    007777777777
    01722  606060011104      10000        +22   OCT    606060011104
    01723  747474747474      10000        +23   OCT    747474747474
    01724  000003641100      10000        +24   OCT    000003641100
    01725  000077777777      10000        +25   OCT    000077777777
    01726  606060011111      10000        +26   OCT    606060011111
    01727  730104606060      10000        +27   OCT    730104606060
    01730  606263464760      10000        +28   OCT    606263464760
    01731  605164456060      10000        +29   OCT    605164456060
    01732  777700000000      10000        +30   OCT    777700000000
    01733  000000000144      10000        +31   OCT    000000000144
    01734  000000000764      10000        +32   OCT    000000000764
    01735  000000001750      10000        +33   OCT    000000001750
    01736  000000000062      10000        +34   OCT    000000000062
    01737  770000777777      10000        +35   OCT    770000777777
    01740  007777000000      10000        +36   OCT    007777000000
    01741  0 00000 0 00135   10001        +37   PZE    2)RATE+0
    01742  0 00000 0 00134   10001        +38   PZE    RETPREM-2
    01743  0 00000 0 00134   10001        +39   PZE    INSPREM-2
    01744  0 00000 0 00113   10001        +40   PZE    INTERNAL.TOTALS,,0
    01745  0 00000 0 00124   10001        +41   PZE    GRAND.TOTALS,,0
    01746  0 00001 0 00076   10001        +42   PZE    INFO,,1
    01747  0 00000 0 00000   10000        +43   PZE    1)DAT,,0
    01750  0 00000 0 00000   10000        +44   PZE    DETAIL,,0
    01751  0 00000 0 00000   10000        +45   PZE    1)EMPLOYEE.NUMBER,,0
    01752  0 00000 0 00000   10000        +46   PZE    2)EMPLOYEE.NUMBER,,0
    01753  0 00002 0 00021   10001        +47   PZE    3)NAME,,2
    01754  0 00003 0 00020   10001        +48   PZE    3)EMPLOYEE,,3
    01755  0 00000 0 00024   10001        +49   PZE    4)MONTH,,0
    01756  0 00003 0 00024   10001        +50   PZE    4)DAY,,3
    01757  0 00000 0 00025   10001        +51   PZE    4)YEAR,,0
    01760  0 00000 0 00002   10000        +52   PZE    1)HOURS,,0
    01761  0 00005 0 00025   10001        +53   PZE    HRS,,5
    01762  0 00000 0 00034   10001        +54   PZE    2)BONDEDUCTION,,0
    01763  0 00001 0 00042   10001        +55   PZE    2)BONDENOMINATION,,1
    01764  0 00000 0 00001   10000        +56   PZE    1)NAME,,0
    01765  0 00005 0 00007   10001        +57   PZE    2)NAME,,5
    01766  0 00002 0 00071   10001        +58   PZE    4)NAME,,2
    01767  0 00000 0 00074   10001        +59   PZE    3)BONDENOMINATION,,0
    01770  0 00003 0 00035   10001        +60   PZE    INS.PREM,,3
    01771  0 00000 0 00037   10001        +61   PZE    RET.PREM,,0
    00165   500000000165     01111               START  GN)000

    THE LAST LOADER CONTROL CARD PUNCHED IS
    *CTEND             DATE 101861 TIME   2.45      CT PUBLICATIONS         67
    DONE