Deck DAYFILE Part 002

24 Modifications

Listing Sections

Deck DAYFILE Start
Deck DAYFILE Part 1 (Line 1399)
Deck DAYFILE Part 2 (Line 2980)

Source

Seq #  *Modification Id* Act 
----------------------------+
02980  M00S02255.dayfile +++|          SA0    =C* JOB FIELD DISALLOWED ON USER DAYFILE.*
02981  M00S02256.dayfile +++|          SX6    X1-1
02982  M00S02257.dayfile +++|          ZR     X6,ERR      IF USER DAYFILE
02983  M00S02258.dayfile +++|          SA6    A1+
02984  M00S02259.dayfile +++|
02985  M00S02260.dayfile +++| SDO4     SX5    B1+B1       SET PARTIAL DUMP
02986  M00S02261.dayfile +++|          EQ     SDOX        PROCESS M OPTION
02987  M00S02262.dayfile +++|

Line S02263 Modification History
`M01` (Removed by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
02988  M01S02263.v23l617 ---| SDO5     SA0    =C* FR INVALID FOR THIS OPTION.*  PROCESS I OPTION
02989  M01S02264.v23l617 ---|          NZ     X5,ERR      IF FR SPECIFIED

Line S00033 Modification History
`M01` (Added by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
02990  M01S00033.v23l617 +++| SDO5     SA0    =C/ *FR* INCORRECT FOR THIS OPTION./  PROCESS I OPTION
02991  M01S00034.v23l617 +++|          NZ     X5,ERR      IF *FR* SPECIFIED
02992  M00S02265.dayfile +++|          SX5    B1          SET INCREMENTAL DUMP
02993  M00S02266.dayfile +++|          EQ     SDOX
02994  M00S02267.dayfile +++|
02995  M00S02268.dayfile +++| SDO6     SA1    SEWI        PROCESS P OPTION
02996  M00S02269.dayfile +++|          SA0    =C* JOB FIELD DISALLOWED ON USER DAYFILE.*
02997  M00S02270.dayfile +++|          SX1    X1-1
02998  M00S02271.dayfile +++|          ZR     X1,ERR      IF USER DAYFILE
02999  M00S02272.dayfile +++|          GETJN  SEJN        SET JOBNAME
03000  M00S02273.dayfile +++|          SA1    SEJN        SET JOBNAME TO CORRECT FORMAT
03001  M00S02274.dayfile +++|          LX1    48
03002  M00S02275.dayfile +++|          BX6    X1
03003  M00S02276.dayfile +++|          SA6    SEJN

Line S02277 Modification History
`M01` (Removed by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03004  M01S02277.ns22000 ---|          SX6    1RI         SET TO INCREMENTAL DUMP

Line S00542 Modification History
`M01` (Added by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03005  M01S00542.ns22000 +++| SDO6.1   SX6    1RI         SET INCREMENTAL DUMP
03006  M00S02278.dayfile +++|          LX6    -6
03007  M00S02279.dayfile +++|          SA6    SFOP
03008  M00S02280.dayfile +++|          EQ     SDO5        PROCESS AS INCREMENTAL DUMP
03009  M00S02281.dayfile +++|

Line S02282 Modification History
`M01` (Removed by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
03010  M01S02282.v23l617 ---| SDO7     ZR     X5,SDOX     IF FR NOT SELECTED
03011  M01S02283.v23l617 ---|          SX6    1RM         SET DEFAULT OP OPTION

Line S00035 Modification History
`M01` (Added by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
03012  M01S00035.v23l617 +++| SDO7     ZR     X5,SDOX     IF *FR* NOT SELECTED
03013  M01S00036.v23l617 +++|          SX6    1RM         SET DEFAULT *OP* OPTION
03014  M00S02284.dayfile +++|          LX6    -6
03015  M00S02285.dayfile +++|          SA6    SFOP
03016  M00S02286.dayfile +++|          EQ     SDO4        SET PARTIAL DUMP OPTION
03017  M00S02287.dayfile +++|

Line S02288 Modification History
`M01` (Removed by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
03018  M01S02288.v23l617 ---| SDO8     SA0    =C/ OP OPTION ILLEGAL./

Line S00037 Modification History
`M01` (Added by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
03019  M01S00037.v23l617 +++| SDO8     SA0    =C/ *OP* OPTION INCORRECT./
03020  M00S02289.dayfile +++|          EQ     ERR         PROCESS ERROR
03021  M00S02290.dayfile +++|

Line S02291 Modification History
`M01` (Removed by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
03022  M01S02291.v23l617 ---| SDO9     ZR     X5,SDOX     IF FR NOT SELECTED
03023  M01S02292.v23l617 ---|          SA0    =C/ FR INVALID FOR THIS OPTION./

Line S00038 Modification History
`M01` (Added by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
03024  M01S00038.v23l617 +++| SDO9     ZR     X5,SDOX     IF *FR* NOT SELECTED
03025  M01S00039.v23l617 +++|          SA0    =C/ *FR* INCORRECT FOR THIS OPTION./
03026  M00S02293.dayfile +++|          EQ     ERR         PROCESS ERROR
03027  M00S02294.dayfile +++|
03028  M00S02295.dayfile +++|
03029  M00S02296.dayfile +++|
03030  M00S02297.dayfile +++|*         TABLE OF CODED FILE OPTION PROCESSORS.
03031  M00S02298.dayfile +++|
03032  M00S02299.dayfile +++|
03033  M00S02300.dayfile +++| SDOA     VFD    42/0LT,18/SDO2  T OPTION
03034  M00S02301.dayfile +++|          VFD    42/0LJ,18/SDO3  J OPTION
03035  M00S02302.dayfile +++|          VFD    42/0LM,18/SDO4  M OPTION
03036  M00S02303.dayfile +++|          VFD    42/0LI,18/SDO5  I OPTION
03037  M00S02304.dayfile +++|          VFD    42/0LP,18/SDO6  P OPTION
03038  M00S02305.dayfile +++|          VFD    42/0LF,18/SDO7  F OPTION
03039  M00S02306.dayfile +++|          CON    0
03040  M00S02307.dayfile +++|
03041  M00S02308.dayfile +++|*         TABLE OF BINARY FILE OPTION PROCESSORS.
03042  M00S02309.dayfile +++|
03043  M00S02310.dayfile +++| SDOB     VFD    42/0LT,18/SDO2  T OPTION
03044  M00S02311.dayfile +++|          VFD    42/0LJ,18/SDO3  J OPTION
03045  M00S02312.dayfile +++|          VFD    42/0LM,18/SDO8  M OPTION
03046  M00S02313.dayfile +++|          VFD    42/0LI,18/SDO5  I OPTION
03047  M00S02314.dayfile +++|          VFD    42/0LP,18/SDO6  P OPTION
03048  M00S02315.dayfile +++|          VFD    42/0LF,18/SDO9  F OPTION
03049  M00S02316.dayfile +++|          CON    0

Line S00543 Modification History
`M01` (Added by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03050  M01S00543.ns22000 +++|
03051  M01S00544.ns22000 +++|*         TABLE OF *GETLOG* FILE OPTION PROCESSORS.
03052  M01S00545.ns22000 +++|
03053  M01S00546.ns22000 +++| SDOC     VFD    42/0LF,18/SDO9    F OPTION
03054  M01S00547.ns22000 +++|          VFD    42/0LP,18/SDO6.1  P OPTION
03055  M01S00548.ns22000 +++|          CON    0
03056  M00S02317.dayfile +++| SSM      SPACE  4,20
03057  M00S02318.dayfile +++|**        SSM - SET SEARCH MASK.
03058  M00S02319.dayfile +++|*
03059  M00S02320.dayfile +++|*         ENTRY  (SEMS - SEMS+2) = SEARCH CHARACTERS.
03060  M00S02321.dayfile +++|*                (DFTY) = DAYFILE TYPE.
03061  M00S02322.dayfile +++|*                (SFOP) = DUMP OPTION (*OP=*).
03062  M00S02323.dayfile +++|*
03063  M00S02324.dayfile +++|*         EXIT   (SEMA - SEMA+2) = SEARCH MASK.
03064  M00S02325.dayfile +++|*
03065  M00S02326.dayfile +++|*         USES   X - 1, 2, 3, 6, 7.
03066  M00S02327.dayfile +++|*                A - 1, 2, 3, 6, 7.
03067  M00S02328.dayfile +++|*                B - 2.
03068  M00S02329.dayfile +++|*
03069  M00S02330.dayfile +++|*         CALLS  CDP, SFN.
03070  M00S02331.dayfile +++|
03071  M00S02332.dayfile +++|
03072  M00S02333.dayfile +++| SSM      SUBR               ENTRY/EXIT
03073  M00S02334.dayfile +++|          SA1    SEMS
03074  M00S02335.dayfile +++|          SA2    SFOP
03075  M00S02336.dayfile +++|          SA3    SSMA
03076  M00S02337.dayfile +++|          BX2    X2-X3
03077  M00S02338.dayfile +++|          ZR     X2,SSM3     IF OP=T OPTION
03078  M00S02339.dayfile +++| SSM1     RJ     SFN         FIND MASK
03079  M00S02340.dayfile +++|          SA7    A1+SEMA-SEMS  STORE MASK WORD
03080  M00S02341.dayfile +++|          SA1    A1+1        READ NEXT MESSAGE WORD
03081  M00S02342.dayfile +++|          NZ     X7,SSM2     IF END OF MESSAGE
03082  M00S02343.dayfile +++|          NG     X7,SSM1     IF NOT ZERO WORD
03083  M00S02344.dayfile +++|          EQ     SSMX        RETURN
03084  M00S02345.dayfile +++|
03085  M00S02346.dayfile +++| SSM2     BX6    X6-X6       TERMINATE MESSAGE
03086  M00S02347.dayfile +++|          SA6    A1
03087  M00S02348.dayfile +++|          EQ     SSMX        RETURN
03088  M00S02349.dayfile +++|
03089  M00S02350.dayfile +++| SSM3     SA2    DFTY
03090  M00S02351.dayfile +++|          SX2    X2-MLTY
03091  M00S02352.dayfile +++|          NZ     X2,SSM1     IF NOT DUMPING MAINTENANCE LOG
03092  M00S02353.dayfile +++|          RJ     CDP         CONVERT SEARCH DISPLAY TIME TO PACKED TIME
03093  M00S02354.dayfile +++|          SA1    SEMS        BUILD MASK FOR PACKED TIME
03094  M00S02355.dayfile +++|          SB2    6
03095  M00S02356.dayfile +++|          MX7    3
03096  M00S02357.dayfile +++| SSM4     LX7    3
03097  M00S02358.dayfile +++|          BX2    X7*X1
03098  M00S02359.dayfile +++|          SB2    B2-1
03099  M00S02360.dayfile +++|          ZR     B2,SSMX     IF PACKED TIME FIELD EXHAUSTED
03100  M00S02361.dayfile +++|          ZR     X2,SSM4     IF RIGHTMOST DIGIT NOT FOUND
03101  M00S02362.dayfile +++|          BX6    X6-X6
03102  M00S02363.dayfile +++| SSM5     BX6    X7+X6
03103  M00S02364.dayfile +++|          LX7    3
03104  M00S02365.dayfile +++|          SB2    B2-1
03105  M00S02366.dayfile +++|          NZ     B2,SSM5     IF PACKED TIME FIELD NOT EXHAUSTED
03106  M00S02367.dayfile +++|          SA6    SEMA
03107  M00S02368.dayfile +++|          EQ     SSMX        RETURN
03108  M00S02369.dayfile +++|
03109  M00S02370.dayfile +++| SSMA     DATA   1LT         OP=T TEST CHARACTER

Line S00549 Modification History
`M01` (Added by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03110  M01S00549.ns22000 +++| WEF      SPACE  4,10
03111  M01S00550.ns22000 +++|**        WEF - WRITE EST TO FILE.
03112  M01S00551.ns22000 +++|*
03113  M01S00552.ns22000 +++|*         ENTRY  FILENAME INSERTED IN FET.
03114  M01S00553.ns22000 +++|*
03115  M01S00554.ns22000 +++|*         EXIT   EST WRITTEN TO FILE.
03116  M01S00555.ns22000 +++|*
03117  M01S00556.ns22000 +++|*         CALLS  RSB=.
03118  M01S00557.ns22000 +++|*
03119  M01S00558.ns22000 +++|*         MACROS PDATE, SYSTEM, WRITER.
03120  M01S00559.ns22000 +++|
03121  M01S00560.ns22000 +++|
03122  M01S00561.ns22000 +++| WEF      SUBR
03123  M01S00562.ns22000 +++|          SA1    E
03124  M01S00563.ns22000 +++|          ZR     X1,WEFX     IF *E=0* SPECIFIED
03125  M01S00564.ns22000 +++|
03126  M01S00565.ns22000 +++|*         READ EST INTO *EBUF*.
03127  M01S00566.ns22000 +++|
03128  M01S00567.ns22000 +++|          SYSTEM RSB,R,WEFA  READ *ESTP*
03129  M01S00568.ns22000 +++|          SA2    WEFA+1      SET *COMCRSB* ENTRY CONDITIONS
03130  M01S00569.ns22000 +++|          MX3    -12
03131  M01S00570.ns22000 +++|          SX1    EBUF+11B    (X1) = ADDRESS TO TRANSFER TO
03132  M01S00571.ns22000 +++|          AX2    24
03133  M01S00572.ns22000 +++|          BX3    -X3*X2
03134  M01S00573.ns22000 +++|          SX7    X3
03135  M01S00574.ns22000 +++|          AX2    12          (X2) = ADDRESS TO TRANSFER FROM
03136  M01S00575.ns22000 +++|          SA7    WEFB        SAVE LAST EST ORDINAL + 1
03137  M01S00576.ns22000 +++|          R=     X6,ESTE
03138  M01S00577.ns22000 +++|          IX3    X3*X6       (X3) = WORD COUNT
03139  M01S00578.ns22000 +++|          SX4    B0          (X4) = SUBSYSTEM (= *CMR*)
03140  M01S00579.ns22000 +++|          MX6    1
03141  M01S00580.ns22000 +++|          SA6    X1
03142  M01S00581.ns22000 +++|          RJ     RSB=        READ EST
03143  M01S00582.ns22000 +++|
03144  M01S00583.ns22000 +++|*         SET HEADER INFORMATION.
03145  M01S00584.ns22000 +++|
03146  M01S00585.ns22000 +++|          SA1    WEFB        WORD 0 - EST LENGTH, ENTRY SIZE
03147  M01S00586.ns22000 +++|          R=     X6,ESTE
03148  M01S00587.ns22000 +++|          IX5    X1*X6       SAVE EST LENGTH (WORDS)
03149  M01S00588.ns22000 +++|          MX7    1
03150  M01S00589.ns22000 +++|          LX1    12
03151  M01S00590.ns22000 +++|          BX6    X6+X1
03152  M01S00591.ns22000 +++|          SA6    EBUF
03153  M01S00592.ns22000 +++|          PDATE  EBUF+2      WORD 2 - PACKED DATE/TIME
03154  M01S00593.ns22000 +++|          SA7    EBUF+3
03155  M01S00594.ns22000 +++|          SYSTEM RSB,R,WEFC  READ SYSTEM TITLE/VERSION INTO WORDS 3-10
03156  M01S00595.ns22000 +++|
03157  M01S00596.ns22000 +++|*         WRITE COMPLETED BUFFER TO *EST* FILE.
03158  M01S00597.ns22000 +++|
03159  M01S00598.ns22000 +++|          SX6    X5+11B+EBUF SET EFFECTIVE *IN* VALUE IN FET
03160  M01S00599.ns22000 +++|          SA6    E+2
03161  M01S00600.ns22000 +++|          WRITER E,R         WRITE *EST* FILE
03162  M01S00601.ns22000 +++|          EQ     WEFX        RETURN
03163  M01S00602.ns22000 +++|
03164  M01S00603.ns22000 +++| WEFA     VFD    12/0,12/1,18/ESTP,18/*+1     *RSB* FOR *ESTP*
03165  M01S00604.ns22000 +++|          VFD    1/1,59/     ESTP
03166  M01S00605.ns22000 +++| WEFB     BSS    1           NUMBER OF EST ENTRIES
03167  M01S00606.ns22000 +++| WEFC     VFD    12/0,12/6,18/SYTL,18/EBUF+3  *RSB* FOR TITLE/VERSION
03168  M00S02371.dayfile +++|          TITLE  PRESET COMMON DECKS.

Line S02372 Modification History
`M01` (Removed by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03169  M01S02372.ns22000 ---|*         PRESET COMMON DECKS.

Line S00607 Modification History
`M01` (Added by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03170  M01S00607.ns22000 +++|**        COMMON DECKS.
03171  M00S02373.dayfile +++|
03172  M00S02374.dayfile +++|

Line S02375 Modification History
`M01` (Removed by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
03173  M01S02375.v23l617 ---| LIT      CON    1           ALLOW LITERALS ON CONTROL CARD

Line S00040 Modification History
`M01` (Added by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
03174  M01S00040.v23l617 +++| LIT      CON    1           ALLOW LITERALS ON COMMAND
03175  M00S02376.dayfile +++| QUAL$    EQU    1           DO NOT QUAL COMMON DECKS
03176  M00S02377.dayfile +++|*CALL     COMCARM
03177  M00S02378.dayfile +++|*CALL     COMCCPA
03178  M00S02379.dayfile +++|*CALL     COMCCPM
03179  M00S02380.dayfile +++|*CALL     COMCDXB
03180  M00S02381.dayfile +++|*CALL     COMCPOP

Line S02382 Modification History
`M01` (Removed by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03181  M01S02382.ns22000 ---|*CALL     COMCSTF

Line S00608 Modification History
`M01` (Added by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03182  M01S00608.ns22000 +++|*CALL     COMCRSB
03183  M00S02383.dayfile +++|*CALL     COMCUSB
03184  M00S02384.dayfile +++|
03185  M00S02385.dayfile +++|
03186  M00S02386.dayfile +++|          ERRNG  CBUF-*-1    IF *PRESET* OVERLAYS *CM BUFFER*

Line S02387 Modification History
`M01` (Removed by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03187  M01S02387.ns22000 ---|          END

Line S00609 Modification History
`M01` (Added by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03188  M01S00609.ns22000 +++|          END    DAYFILE