Deck 1AJ Part 008

214 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S00255 Modification History
M01 (Added by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
10420  M01S00255.ns2031  +++| CVD2     LDC    /ERR/EM09   * SECURE MEMORY, DUMP DISABLED.*
10421  M01S00256.ns2031  +++| CVDA     EQU    *-1
10422  M00S06459.1aj     +++|          UJN    ERR1        ISSUE ERROR MESSAGE
10423  M00S06460.1aj     +++|
10424  M00S06461.1aj     +++|          ERRNG  37+ISTB-IST4 IF JUMP OUT OF RANGE
10425  M00S06462.1aj     +++| ERR      SPACE  4,10
10426  M00S06463.1aj     +++|**        ERR - PROCESS ERROR.
10427  M00S06464.1aj     +++|*
Line S06465 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10428  M01S06465.v23l617 ---|*         ENTRY  AT *ERR* IF *FORMAT ERROR ON CONTROL CARD.*
Line S00642 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10429  M01S00642.v23l617 +++|*         ENTRY  AT *ERR* IF *FORMAT ERROR ON COMMAND.*
10430  M00S06466.1aj     +++|*                MESSAGE TO BE ISSUED.
10431  M00S06467.1aj     +++|*                AT *ERR1* IF (A) = ADDRESS OF ERROR MESSAGE.
10432  M00S06468.1aj     +++|*
Line S06469 Modification History
M01 (Removed by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
10433  M01S06469.ns2031  ---|*         EXIT   TO *DPP* OR *RCA8* IF NOT *SSJ=* REQUEST.
10434  M01S06470.ns2031  ---|*                TO */3AF/RFJ* IF TO RESTORE *SSJ=* JOB.
10435  M01S06471.ns2031  ---|*
10436  M01S06472.ns2031  ---|*         CALLS  AKW, CAT, DFM, IPL, RAS, *3AF*.
10437  M01S06473.ns2031  ---|*
10438  M01S06474.ns2031  ---|*         MACROS EXECUTE, MONITOR.
Line S00257 Modification History
M01 (Added by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
10439  M01S00257.ns2031  +++|*         USES   EF, EP.
10440  M01S00258.ns2031  +++|*
10441  M01S00259.ns2031  +++|*         CALLS  *3AM*.
10442  M01S00260.ns2031  +++|*
10443  M01S00261.ns2031  +++|*         MACROS EXECUTE.
10444  M00S06475.1aj     +++|
10445  M00S06476.1aj     +++|
Line S06477 Modification History
M01 (Removed by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
10446  M01S06477.ns2031  ---| ERR      LDC    =C* FORMAT ERROR ON CONTROL CARD.*
10447  M01S06478.ns2031  ---| ERR1     STM    ERRA        SET ERROR MESSAGE
10448  M01S06479.ns2031  ---|          STD    EF
Line S00262 Modification History
M01 (Added by) ns2031
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10449  M02S00262.v23l617 ---| ERR      LDC    /ERR/EM03   * FORMAT ERROR ON CONTROL CARD.*
Line S00643 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10450  M01S00643.v23l617 +++| ERR      LDC    /ERR/EM03   * FORMAT ERROR ON COMMAND.*
Line S00263 Modification History
M01 (Added by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
10451  M01S00263.ns2031  +++| ERR1     STD    EF
10452  M01S00264.ns2031  +++|          LDN    0           INDICATE *TCS* CALL
10453  M01S00265.ns2031  +++|          STD    EP
Line S06480 Modification History
M01 (Removed by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
10454  M01S06480.ns2031  ---|          RJM    IPL         CLEAR *EECW* AND *TIAW*
10455  M01S06481.ns2031  ---|          LDD    FL
10456  M01S06482.ns2031  ---|          ZJN    ERR2        IF NO FL
10457  M01S06483.ns2031  ---|          LDN    ZERL        CLEAR LIST OF FILES POINTER IN *ARGR*
10458  M01S06484.ns2031  ---|          CRD    CM
10459  M01S06485.ns2031  ---|          LDD    RA
10460  M01S06486.ns2031  ---|          SHN    6
10461  M01S06487.ns2031  ---|          ADN    ARGR
10462  M01S06488.ns2031  ---|          CWD    CM
10463  M01S06489.ns2031  ---| ERR2     RJM    CAT         CLEAR ADDRESS FOR *TCS* EXECUTE STATEMENT
10464  M01S06490.ns2031  ---|          ADN    SPCW-RFCW
10465  M01S06491.ns2031  ---|          CRD    CM
10466  M01S06492.ns2031  ---|          LDD    CM
10467  M01S06493.ns2031  ---|          ZJN    ERR3        IF NOT SPECIAL REQUEST
10468  M01S06494.ns2031  ---|          LDD    CP          UPDATE CONTROL STATEMENT POINTER
10469  M01S06495.ns2031  ---|          ADN    CSPW
10470  M01S06496.ns2031  ---|          CWD    SP
10471  M01S06497.ns2031  ---|          LDD    EF          ISSUE MESSAGE
10472  M01S06498.ns2031  ---|          RJM    DFM
10473  M01S06499.ns2031  ---|          LDN    PPET        SET ERROR FLAG
10474  M01S06500.ns2031  ---|          STD    CM+1
10475  M01S06501.ns2031  ---|          MONITOR  CEFM
10476  M01S06502.ns2031  ---|          RJM    RAS         RESET AFTER *SSJ=* JOB
10477  M01S06503.ns2031  ---|          EXECUTE  3AF
10478  M01S06504.ns2031  ---|          LJM    /3AF/RFJ    RESET FORMER JOB
10479  M01S06505.ns2031  ---|
10480  M01S06506.ns2031  ---| ERR3     LDM    CSEB
10481  M01S06507.ns2031  ---|          SHN    21-3
10482  M01S06508.ns2031  ---|          PJN    ERR4        IF SDM= NOT PRESENT
10483  M01S06509.ns2031  ---|          SHN    3+1
10484  M01S06510.ns2031  ---|          SCN    10          CLEAR SDM=
10485  M01S06511.ns2031  ---|          STM    CSEB
10486  M01S06512.ns2031  ---|          RJM    AKW         ASSEMBLE KEYWORD
10487  M01S06513.ns2031  ---|          LDN    0           CLEAR END OF PROGRAM NAME
10488  M01S06514.ns2031  ---|          STD    AB+4
10489  M01S06515.ns2031  ---|          LDD    MA
10490  M01S06516.ns2031  ---|          CWD    AB
10491  M01S06517.ns2031  ---|          CRM    STMT,ON
10492  M01S06518.ns2031  ---| ERR4     LDD    IR+2
10493  M01S06519.ns2031  ---|          SBN    4
10494  M01S06520.ns2031  ---|          ZJN    ERR6        IF CONTROL CARD READ
10495  M01S06521.ns2031  ---|          SBN    5-4
10496  M01S06522.ns2031  ---|          ZJN    ERR5        IF CONTROL CARD EXECUTE FROM CM
10497  M01S06523.ns2031  ---|          ADN    5-2
10498  M01S06524.ns2031  ---|          NJN    ERR5        IF NOT *DIS* CALL
10499  M01S06525.ns2031  ---|          LDD    IR+4        CHECK CALL
10500  M01S06526.ns2031  ---|          SHN    21-2
10501  M01S06527.ns2031  ---|          MJN    ERR7        IF *DIS* X. CALL
10502  M01S06528.ns2031  ---| ERR5     LJM    IST         ISSUE STATEMENT
10503  M01S06529.ns2031  ---| ERR6     LJM    RCA8        CLEAR STATEMENT BUFFER
10504  M01S06530.ns2031  ---|
10505  M01S06531.ns2031  ---| ERR7     LDN    MS2W-MS1W   STATEMENT TO MESSAGE AREA 1
10506  M01S06532.ns2031  ---|          STD    T1
10507  M01S06533.ns2031  ---|          LDD    CP
10508  M01S06534.ns2031  ---|          ADN    MS1W
10509  M01S06535.ns2031  ---|          CWM    STMT,T1
10510  M01S06536.ns2031  ---|          CWM    *,TR        STATUS MESSAGE TO MESSAGE AREA 2
10511  M01S06537.ns2031  ---| ERRA     EQU    *-1
10512  M01S06538.ns2031  ---|          LJM    DPP         DROP PP
10513  M01S06539.ns2031  ---|
10514  M01S06540.ns2031  ---| ERR8     LDC    4000        SET EOR
10515  M01S06541.ns2031  ---|          STD    SP+1
10516  M01S06542.ns2031  ---|          LDD    SP+4        SET BUFFER EMPTY
10517  M01S06543.ns2031  ---|          STD    SP+3
10518  M01S06544.ns2031  ---|          LDD    CP          STORE STATEMENT POINTER
10519  M01S06545.ns2031  ---|          ADN    CSPW
10520  M01S06546.ns2031  ---|          CWD    SP
10521  M01S06547.ns2031  ---|          LDC    =C* IMPROPER VALIDATION.*
10522  M01S06548.ns2031  ---|          LJM    ERR1        PROCESS ERROR
Line S00266 Modification History
M01 (Added by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
10523  M01S00266.ns2031  +++|          EXECUTE  3AM       EXECUTE ERROR PROCESSOR
10524  M00S06549.1aj     +++| IOC      SPACE  4,10
10525  M00S06550.1aj     +++|**        IOC - INTERROGATE ONE CHARACTER.
10526  M00S06551.1aj     +++|*
10527  M00S06552.1aj     +++|*         ENTRY  (CA) = ADDRESS OF CHARACTER STRING.
10528  M00S06553.1aj     +++|*
10529  M00S06554.1aj     +++|*         EXIT   A = 0 IF END OF PARAMETER.
10530  M00S06555.1aj     +++|*                  = NEXT CHARACTER OF PARAMETER.
10531  M00S06556.1aj     +++|*                (CA) = CA + 1.
10532  M00S06557.1aj     +++|
10533  M00S06558.1aj     +++|
10534  M00S06559.1aj     +++| IOC1     AOD    CA
10535  M00S06560.1aj     +++|          LDM    -1,CA
10536  M00S06561.1aj     +++|
10537  M00S06562.1aj     +++| IOC      SUBR
10538  M00S06563.1aj     +++|          LDI    CA
10539  M00S06564.1aj     +++|          ZJN    IOCX        IF END OF PARAMETERS
10540  M00S06565.1aj     +++|          SBN    1R9+1
10541  M00S06566.1aj     +++|          MJN    IOC1        IF NOT SEPARATOR
10542  M00S06567.1aj     +++|          SBN    1R*-1R9-1
10543  M00S06568.1aj     +++|          ZJN    IOC1        IF ASTERISK
10544  M00S06569.1aj     +++|          LDN    0
10545  M00S06570.1aj     +++|          UJN    IOCX        RETURN
10546  M00S06571.1aj     +++| IPL      SPACE  4,10
10547  M00S06572.1aj     +++|**        IPL - INITIALIZE PROGRAM LOAD.
Line S00013 Modification History
M01 (Added by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10548  M01S00013.ns2067  +++|*
10549  M01S00014.ns2067  +++|*         USES   T1, CM - CM+4, CN - CN+4, FS - FS+4.
10550  M00S06573.1aj     +++|*
Line S06574 Modification History
M01 (Removed by) ns2467
Seq #  *Modification Id* Act 
----------------------------+
10551  M01S06574.ns2467  ---|*         MACROS MONITOR.
Line S00034 Modification History
M01 (Added by) ns2467
M02 (Removed by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
10552  M02S00034.ns2748  ---|*         MACROS DELAY, MONITOR, PAUSE.
Line S00025 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
10553  M01S00025.ns2748  +++|*         CALLS  RRR, SRR.
10554  M01S00026.ns2748  +++|*
10555  M01S00027.ns2748  +++|*         MACROS DELAY, MONITOR, NFA, PAUSE.
10556  M00S06575.1aj     +++|
10557  M00S06576.1aj     +++|
10558  M00S06577.1aj     +++| IPL      SUBR               ENTRY/EXIT
10559  M00S06578.1aj     +++|          LDD    CP          READ SENSE SWITCH WORD
10560  M00S06579.1aj     +++|          ADN    SNSW
10561  M00S06580.1aj     +++|          CRD    CN
10562  M00S06581.1aj     +++|          ADN    EECW-SNSW   READ ENTRY/EXIT CONTROL
10563  M00S06582.1aj     +++|          CRD    CM
10564  M00S06583.1aj     +++|          ADN    TERW-EECW   CLEAR EVENT DESCRIPTOR
10565  M00S06584.1aj     +++|          CRD    FS
10566  M00S06585.1aj     +++|          LDD    FS+2
10567  M00S06586.1aj     +++|          SCN    77
10568  M00S06587.1aj     +++|          STD    FS+2
10569  M00S06588.1aj     +++|          LDN    0
10570  M00S06589.1aj     +++|          STD    FS+3
10571  M00S06590.1aj     +++|          STD    FS+4
10572  M00S06591.1aj     +++|          LDD    CP
10573  M00S06592.1aj     +++|          ADN    TERW
10574  M00S06593.1aj     +++|          CWD    FS
Line S06594 Modification History
M01 (Removed by) 1aj57
Seq #  *Modification Id* Act 
----------------------------+
10575  M01S06594.1aj57   ---|          LDD    CM          SAVE NO EXIT FLAG
10576  M01S06595.1aj57   ---|          LPC    4377
Line S00001 Modification History
M01 (Added by) 1aj57
Seq #  *Modification Id* Act 
----------------------------+
10577  M01S00001.1aj57   +++|          LDD    CM          SAVE NO EXIT FLAG, KILL REPRIEVED FLAG
10578  M01S00002.1aj57   +++|          LPC    4400
10579  M00S06596.1aj     +++|          STD    T1
10580  M00S06597.1aj     +++|          LDN    ZERL
10581  M00S06598.1aj     +++|          CRD    FS
10582  M00S06599.1aj     +++|          CRD    CM          PRESERVE NO EXIT FLAG
10583  M00S06600.1aj     +++|          LDD    T1
10584  M00S06601.1aj     +++|          STD    CM
10585  M00S06602.1aj     +++|          LDD    CN+3        CLEAR PAUSE BIT
10586  M00S06603.1aj     +++|          SCN    1
10587  M00S06604.1aj     +++|          STD    CN+3
10588  M00S06605.1aj     +++|          LDD    CN          CLEAR *OVERRIDE* REQUIRED
10589  M00S06606.1aj     +++|          LPC    6777
Line S00001 Modification History
M01 (Added by) 1aj9
Seq #  *Modification Id* Act 
----------------------------+
10590  M01S00001.1aj9    +++|*         LPC    7777        (DMP= LOAD)
10591  M01S00002.1aj9    +++| IPLC     EQU    *-1
10592  M00S06607.1aj     +++|          STD    CN
10593  M00S06608.1aj     +++|          LDD    CP          STORE SENSE SWITCH WORD
10594  M00S06609.1aj     +++|          ADN    SNSW
10595  M00S06610.1aj     +++|          CWD    CN
10596  M00S06611.1aj     +++|          ADN    MS2W-SNSW   CLEAR CONSOLE MESSAGE
10597  M00S06612.1aj     +++|          CWD    FS
10598  M00S06613.1aj     +++|          ADN    TIAW-MS2W   READ TERMINAL INTERRUPT ADDRESS WORD
10599  M00S06614.1aj     +++|          CRD    CN
10600  M00S06615.1aj     +++|          ADN    EECW-TIAW   STORE ENTRY/EXIT CONTROL
10601  M00S06616.1aj     +++|          CWD    CM
Line S06617 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10602  M01S06617.ns22000 ---|          ADN    LOFW-EECW   CLEAR LIST OF FILES WORD
10603  M01S06618.ns22000 ---|          CWD    FS
Line S00204 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10604  M01S00204.ns22000 +++|          ADN    LOFW-EECW   CLEAR LIST OF FILES ADDRESS
10605  M01S00205.ns22000 +++|          CRD    FS
10606  M01S00206.ns22000 +++|          STD    T0
10607  M01S00207.ns22000 +++|          LDN    0
10608  M01S00208.ns22000 +++|          STD    FS
10609  M01S00209.ns22000 +++|          STD    FS+1
10610  M01S00210.ns22000 +++|          STD    FS+2
10611  M01S00211.ns22000 +++|          LDD    T0
10612  M01S00212.ns22000 +++|          CWD    FS
10613  M00S06619.1aj     +++|          LDN    0           RESET TERMINAL INTERRUPT ADDRESS WORD
10614  M00S06620.1aj     +++|          STD    CN+2
10615  M00S06621.1aj     +++|          STD    CN+3
10616  M00S06622.1aj     +++|          STD    CN+4
10617  M00S06623.1aj     +++|          LDD    CP
10618  M00S06624.1aj     +++|          ADN    TIAW
10619  M00S06625.1aj     +++|          CWD    CN
10620  M00S06626.1aj     +++|          LDD    CP          READ FL CONTROL
10621  M00S06627.1aj     +++|          ADN    FLCW
10622  M00S06628.1aj     +++|          CRD    CM
10623  M00S06629.1aj     +++|          LDD    CM+1        SET LAST RFL
10624  M00S06630.1aj     +++|          NJN    IPL2        IF SET
10625  M00S06631.1aj     +++|          LDC    SYSDEF      NEW FL = MIN(DEFAULT FL, MFL)
10626  M00S06632.1aj     +++|          SBD    CM
10627  M00S06633.1aj     +++|          MJN    IPL1        IF MAX FL .GT. DEFAULT FL
10628  M00S06634.1aj     +++|          LDN    0           SET NEW FL = MFL
10629  M00S06635.1aj     +++| IPL1     ADD    CM          SET NEW FL = DEFAULT FL
10630  M00S06636.1aj     +++| IPL2     LPC    3777        SET STORAGE REQUEST
10631  M00S06637.1aj     +++|          STM    RQSD
Line S00028 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
10632  M01S00028.ns2748  +++|          LDN    **          INTERACTIVE INDICATOR
10633  M01S00029.ns2748  +++| IPLE     EQU    *-1
10634  M01S00030.ns2748  +++|          ZJP    IPL5.1      IF NOT ON-LINE INTERACTIVE JOB
10635  M01S00031.ns2748  +++|          RJM    SRR         SET R-REGISTER TO IAF RA
10636  M00S06638.1aj     +++|          LDC    **
10637  M00S06639.1aj     +++| IPLA     EQU    *-1         (TERMINAL TABLE ADDRESS)
Line S06640 Modification History
M01 (Removed by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10638  M01S06640.ns2067  ---|          ZJN    IPL4        IF NOT ON-LINE INTERACTIVE JOB
Line S00015 Modification History
M01 (Added by) ns2067
M02 (Removed by) ns2205
Seq #  *Modification Id* Act 
----------------------------+
10639  M02S00015.ns2205  ---|          ZJP    IPL6        IF NOT ON-LINE INTERACTIVE JOB
Line S00001 Modification History
M01 (Added by) ns2205
M02 (Removed by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
10640  M02S00001.ns2748  ---|          ZJP    IPL5.1      IF NOT ON-LINE INTERACTIVE JOB
10641  M00S06641.1aj     +++|          ADK    /REM/VSTT
10642  M00S06642.1aj     +++|          CRD    CN
Line S00032 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
10643  M01S00032.ns2748  +++|          RJM    RRR         RESTORE R-REGISTER
Line S00001 Modification History
M01 (Added by) 1aj68
Seq #  *Modification Id* Act 
----------------------------+
10644  M01S00001.1aj68   +++|          LDD    IR+4
10645  M01S00002.1aj68   +++|          LMN    1
10646  M01S00003.1aj68   +++|          ZJN    IPL4.1      IF *DMP=* JOB BEING EXECUTED
10647  M00S06643.1aj     +++|          LDD    CN          CHECK TERINAL INTERRUPT BIT
10648  M00S06644.1aj     +++|          SHN    21-13
Line S06645 Modification History
M01 (Removed by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10649  M01S06645.ns2067  ---|          PJN    IPL3        IF INTERRUPT NOT SELECTED
Line S00016 Modification History
M01 (Added by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10650  M01S00016.ns2067  +++|          MJN    IPL4        IF INTERRUPT SELECTED
Line S06646 Modification History
M01 (Removed by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10651  M01S06646.ns2067  ---|          LDD    MA          CLEAR INTERRUPT BIT
10652  M01S06647.ns2067  ---|          CWM    IPLB,ON
10653  M01S06648.ns2067  ---|          MONITOR  TSEM
10654  M00S06649.1aj     +++| IPL3     LDD    CN
10655  M00S06650.1aj     +++|          SHN    21-5
Line S06651 Modification History
M01 (Removed by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10656  M01S06651.ns2067  ---|          PJN    IPL4        IF PROMPT ALREADY ON
Line S00017 Modification History
M01 (Added by) ns2067
M02 (Removed by) ns2205
Seq #  *Modification Id* Act 
----------------------------+
10657  M02S00017.ns2205  ---|          PJN    IPL6        IF PROMPT ALREADY ON
Line S00002 Modification History
M01 (Added by) ns2205
Seq #  *Modification Id* Act 
----------------------------+
10658  M01S00002.ns2205  +++|          PJN    IPL4.1      IF PROMPT ALREADY ON
Line S00018 Modification History
M01 (Added by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10659  M01S00018.ns2067  +++|          LDD    CN
10660  M01S00019.ns2067  +++|          SCN    40          CLEAR BIT
10661  M01S00020.ns2067  +++|          STD    CN
10662  M00S06652.1aj     +++|          LDN    53D         SET BIT IN *VSTT* TO CLEAR
10663  M00S06653.1aj     +++|          STM    IPLB+3
Line S06654 Modification History
M01 (Removed by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10664  M01S06654.ns2067  ---|          LDD    MA
Line S00021 Modification History
M01 (Added by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10665  M01S00021.ns2067  +++| IPL4     LDD    MA
10666  M00S06655.1aj     +++|          CWM    IPLB,ON
Line S00018 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
10667  M01S00018.271l716 +++|          LDK    ZERL
10668  M01S00019.271l716 +++|          CRD    CM
Line S06656 Modification History
M01 (Removed by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10669  M01S06656.ns2067  ---|          MONITOR  TSEM
10670  M01S06657.ns2067  ---| IPL4     LDD    CP          CLEAR USER LIBRARY AND RELOCATABLE FLAGS
Line S00022 Modification History
M01 (Added by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10671  M01S00022.ns2067  +++|          MONITOR  TSEM
10672  M01S00023.ns2067  +++|          LDD    CM+1
Line S00024 Modification History
M01 (Added by) ns2067
M02 (Removed by) ns2205
Seq #  *Modification Id* Act 
----------------------------+
10673  M02S00024.ns2205  ---|          ZJN    IPL6        IF *IAF* INACCESSIBLE OR ERROR
10674  M02S00025.ns2205  ---|          LMC    7777
Line S00003 Modification History
M01 (Added by) ns2205
Seq #  *Modification Id* Act 
----------------------------+
10675  M01S00003.ns2205  +++|          NJN    IPL4.2      IF NOT IAF INACCESSABLE OR ERROR
10676  M01S00004.ns2205  +++| IPL4.1   LJM    IPL6        PROCESS ERROR
10677  M01S00005.ns2205  +++|
10678  M01S00006.ns2205  +++| IPL4.2   LMC    7777
Line S00026 Modification History
M01 (Added by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10679  M01S00026.ns2067  +++|          NJN    IPL3        IF REQUEST COMPLETE
Line S00035 Modification History
M01 (Added by) ns2467
Seq #  *Modification Id* Act 
----------------------------+
10680  M01S00035.ns2467  +++|          PAUSE  ST
Line S00027 Modification History
M01 (Added by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10681  M01S00027.ns2067  +++|          LDC    3600        *TSEM* QUEUE FULL - DELAY AND RETRY
10682  M01S00028.ns2067  +++|          STD    T1
10683  M01S00029.ns2067  +++| IPL5     DELAY
10684  M01S00030.ns2067  +++|          SOD    T1
10685  M01S00031.ns2067  +++|          ZJN    IPL4        IF TIME TO REISSUE REQUEST
10686  M01S00032.ns2067  +++|          UJN    IPL5        CONTINUE TO DELAY
10687  M01S00033.ns2067  +++|
Line S00007 Modification History
M01 (Added by) ns2205
Seq #  *Modification Id* Act 
----------------------------+
10688  M01S00007.ns2205  +++| IPL5.1   LDC    **
10689  M01S00008.ns2205  +++| IPLD     EQU    *-1         (CONNECTION STATUS)
10690  M01S00009.ns2205  +++|          LMK    DTCS
10691  M01S00010.ns2205  +++|          NJN    IPL6        IF NOT DETACHED JOB
10692  M01S00011.ns2205  +++|          NFA    RC1N        READ NFL RECOVERY WORD
10693  M01S00012.ns2205  +++|          CRD    CM
10694  M01S00013.ns2205  +++|          LDD    CM+4
10695  M01S00014.ns2205  +++|          LPC    7676        CLEAR TERMINAL INTERRUPT/PROMPT OFF
10696  M01S00015.ns2205  +++|          STD    CM+4
10697  M01S00016.ns2205  +++|          NFA    RC1N        REWRITE NFL RECOVERY WORD
10698  M01S00017.ns2205  +++|          CWD    CM
Line S00034 Modification History
M01 (Added by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10699  M01S00034.ns2067  +++| IPL6     LDD    CP          CLEAR USER LIBRARY AND RELOCATABLE FLAGS
10700  M00S06658.1aj     +++|          ADC    LB1W
10701  M00S06659.1aj     +++|          STD    T1          SAVE ADDRESS
10702  M00S06660.1aj     +++|          CRD    CM
10703  M00S06661.1aj     +++|          LDD    CM
10704  M00S06662.1aj     +++|          SCN    3
10705  M00S06663.1aj     +++|          STD    CM
10706  M00S06664.1aj     +++|          LDD    T1
10707  M00S06665.1aj     +++|          CWD    CM
10708  M00S06666.1aj     +++|          LDD    IR+4
10709  M00S06667.1aj     +++|          LMN    1
Line S06668 Modification History
M01 (Removed by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10710  M01S06668.ns2067  ---|          ZJN    IPL5        IF *DMP=* JOB BEING STARTED
Line S00035 Modification History
M01 (Added by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10711  M01S00035.ns2067  +++|          ZJN    IPL7        IF *DMP=* JOB BEING EXECUTED
10712  M00S06669.1aj     +++|          LDD    CP          CLEAR LAST FILE EXECUTED
10713  M00S06670.1aj     +++|          ADC    EOCW
10714  M00S06671.1aj     +++|          CRD    CM
10715  M00S06672.1aj     +++|          LDN    0
10716  M00S06673.1aj     +++|          STD    CM
10717  M00S06674.1aj     +++|          LDD    CP
10718  M00S06675.1aj     +++|          ADC    EOCW
10719  M00S06676.1aj     +++|          CWD    CM
Line S06677 Modification History
M01 (Removed by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10720  M01S06677.ns2067  ---| IPL5     LJM    IPLX        RETURN
Line S00036 Modification History
M01 (Added by) ns2067
Seq #  *Modification Id* Act 
----------------------------+
10721  M01S00036.ns2067  +++| IPL7     LJM    IPLX        RETURN
10722  M00S06678.1aj     +++|
10723  M00S06679.1aj     +++|
Line S06680 Modification History
M01 (Removed by) ns2004
Seq #  *Modification Id* Act 
----------------------------+
10724  M01S06680.ns2004  ---| IPLB     CON    2004        CLEAR TERMINAL INTERRUPT
Line S00001 Modification History
M01 (Added by) ns2004
Seq #  *Modification Id* Act 
----------------------------+
10725  M01S00001.ns2004  +++| IPLB     CON    /REM/VCDT   CLEAR TERMINAL INTERRUPT
10726  M00S06681.1aj     +++|          CON    0,/REM/VSTT WORD TO CLEAR
10727  M00S06682.1aj     +++|          CON    59D         BIT TO CLEAR
10728  M00S06683.1aj     +++|          CON    0           TERMINAL NUMBER
10729  M00S06684.1aj     +++| ISD      SPACE  4,15
Line S06685 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10730  M01S06685.v23l617 ---|**        ISD - ISSUE CONTROL STATEMENT TO DAYFILE.
Line S00644 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10731  M01S00644.v23l617 +++|**        ISD - ISSUE COMMAND TO DAYFILE.
10732  M00S06686.1aj     +++|*
Line S06687 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10733  M01S06687.v23l617 ---|*         ENTRY  (A) = ADDRESS OF ZERO FILLED CONTROL STATEMENT.
Line S00645 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10734  M01S00645.v23l617 +++|*         ENTRY  (A) = ADDRESS OF ZERO FILLED COMMAND.
10735  M00S06688.1aj     +++|*                (FL) = JOB FIELD LENGTH.
10736  M00S06689.1aj     +++|*                (EF) = ERROR STATUS.
10737  M00S06690.1aj     +++|*
Line S06691 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10738  M01S06691.v23l617 ---|*         EXIT   (A) = 0 IF STATEMENT ISSUED VIA *DFM* CALL.
Line S00646 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10739  M01S00646.v23l617 +++|*         EXIT   (A) = 0 IF COMMAND ISSUED VIA *DFM* CALL.
10740  M00S06692.1aj     +++|*
10741  M00S06693.1aj     +++|*         USES   T2, T3, T9.
10742  M00S06694.1aj     +++|*
10743  M00S06695.1aj     +++|*         CALLS  DFM.
10744  M00S06696.1aj     +++|
10745  M00S06697.1aj     +++|
10746  M00S06698.1aj     +++| ISD2     STM    ISDB+4      SET MESSAGE ADDRESS
10747  M00S06699.1aj     +++|          LDD    FL
10748  M00S06700.1aj     +++|          ZJN    ISD1        IF NO FIELD LENGTH
10749  M00S06701.1aj     +++|          LDD    EF
10750  M00S06702.1aj     +++|          NJN    ISD1        IF ERROR FLAG SET
10751  M00S06703.1aj     +++|          LDD    RA          STORE *MSG* REQUEST
10752  M00S06704.1aj     +++|          SHN    6
10753  M00S06705.1aj     +++|          ADN    1
10754  M00S06706.1aj     +++|          CWM    ISDB,ON
10755  M00S06707.1aj     +++|
10756  M00S06708.1aj     +++| ISD      SUBR               ENTRY/EXIT
Line S06709 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10757  M01S06709.v23l617 ---|          STD    T2          SET STATEMENT ADDRESS
Line S00647 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10758  M01S00647.v23l617 +++|          STD    T2          SET COMMAND ADDRESS
10759  M00S06710.1aj     +++|          ADN    5*5         SET END OF MESSAGE ADDRESS
10760  M00S06711.1aj     +++|          STD    T3
10761  M00S06712.1aj     +++|          LDC    0
10762  M00S06713.1aj     +++| ISDA     EQU    *-1
Line S06714 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10763  M01S06714.v23l617 ---|          NJN    ISD2        IF STATEMENT BEING ISSUED VIA *MSG* CALL
Line S00648 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10764  M01S00648.v23l617 +++|          NJN    ISD2        IF COMMAND BEING ISSUED VIA *MSG* CALL
10765  M00S06715.1aj     +++| ISD1     LDI    T3          SAVE END OF MESSAGE BYTE
10766  M00S06716.1aj     +++|          STD    T9
10767  M00S06717.1aj     +++|          LDN    0           ENSURE END OF MESSAGE
10768  M00S06718.1aj     +++|          STI    T3
Line S06719 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10769  M01S06719.v23l617 ---|          LDD    T2          ISSUE CONTROL STATEMENT TO DAYFILE
Line S00649 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10770  M01S00649.v23l617 +++|          LDD    T2          ISSUE COMMAND TO DAYFILE
10771  M00S06720.1aj     +++|          RJM    DFM
10772  M00S06721.1aj     +++|          LDD    T9
Line S06722 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10773  M01S06722.v23l617 ---|          ZJN    ISDX        IF CONTROL STATEMENT .LE. 50 CHARACTERS
Line S00650 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10774  M01S00650.v23l617 +++|          ZJN    ISDX        IF COMMAND .LE. 50 CHARACTERS
10775  M00S06723.1aj     +++|          STI    T3
Line S06724 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10776  M01S06724.v23l617 ---|          LDD    T3          ISSUE REMAINDER OF CONTROL STATEMENT
Line S00651 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10777  M01S00651.v23l617 +++|          LDD    T3          ISSUE REMAINDER OF COMMAND
10778  M00S06725.1aj     +++|          LMC    NMSN
10779  M00S06726.1aj     +++|          RJM    DFM
10780  M00S06727.1aj     +++|*         LDN    0
10781  M00S06728.1aj     +++|          UJN    ISDX        RETURN
10782  M00S06729.1aj     +++|
10783  M00S06730.1aj     +++|
10784  M00S06731.1aj     +++| ISDB     VFD    18/0LMSG,6/0,12/0,12/4000,12/0
Line S00375 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
10785  M01S00375.242l642 +++| MSR      SPACE  4,10
10786  M01S00376.242l642 +++|**        MSR - MASS STORAGE ERROR PROCESSING.
10787  M01S00377.242l642 +++|*
10788  M01S00378.242l642 +++|*         EXIT   TO *1RJ* IF JOB ROLLABLE AND RECOVERABLE ERROR.
10789  M01S00379.242l642 +++|*                TO CALLER IF JOB NOT ROLLABLE OR NONRECOVERABLE
10790  M01S00380.242l642 +++|*                ERROR.
10791  M01S00381.242l642 +++|
10792  M01S00382.242l642 +++| MSR      SUBR               ENTRY/EXIT
10793  M01S00383.242l642 +++|          ENDMS
10794  M01S00384.242l642 +++|          LDM    RDCT        CHECK NON-RECOVERABLE MASS STORAGE ERROR
10795  M01S00385.242l642 +++|          SHN    21-12
10796  M01S00386.242l642 +++|          MJN    MSRX        IF NON-RECOVERABLE
10797  M01S00387.242l642 +++|          LDM    MSD         CHECK FOR SUBSYSTEM
10798  M01S00388.242l642 +++|          SHN    21-13
10799  M01S00389.242l642 +++|          PJN    MSRX        IF A SUBSYSTEM, ABORT JOB
10800  M01S00390.242l642 +++|          LDD    T5          SET EQUIPMENT TO WAIT FOR
10801  M01S00391.242l642 +++|          STD    IR+4
Line S00392 Modification History
M01 (Added by) 242l642
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
10802  M02S00392.273l780 ---|          LDM    SPFB        CHECK FOR JOB ADVANCE SET
Line S00001 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
10803  M01S00001.273l780 +++| MSRA     LDN    0
10804  M01S00002.273l780 +++|*         LDN    1           (JOB ADVANCE NOT SET)
Line S00393 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
10805  M01S00393.242l642 +++|          NJN    MSR1        IF JOB ADVANCE NOT SET
10806  M01S00394.242l642 +++|          STD    CM+1        CLEAR JOB ADVANCE
10807  M01S00395.242l642 +++|          MONITOR  JACM
10808  M01S00396.242l642 +++| MSR1     EXECUTE  1RJ       ROLL JOB
10809  M01S00397.242l642 +++|*         LJM    PPR         DOES NOT RETURN
10810  M00S06732.1aj     +++| RAS      SPACE  4,10
10811  M00S06733.1aj     +++|**        RAS - RESET AFTER *SSJ=* JOB.
10812  M00S06734.1aj     +++|*
10813  M00S06735.1aj     +++|*         EXIT   IF *SSJ=* JOB, CONTROL POINT AREA RESTORED,
10814  M00S06736.1aj     +++|*                FILES WITH SPECIAL ID SET ARE DROPPED.
10815  M00S06737.1aj     +++|*
10816  M00S06738.1aj     +++|*         USES   CM - CM+4.
10817  M00S06739.1aj     +++|*
10818  M00S06740.1aj     +++|*         CALLS  /3AF/RCF, *3AF*.
10819  M00S06741.1aj     +++|*
10820  M00S06742.1aj     +++|*         MACROS EXECUTE.
10821  M00S06743.1aj     +++|
10822  M00S06744.1aj     +++|
10823  M00S06745.1aj     +++| RAS      SUBR               ENTRY/EXIT
10824  M00S06746.1aj     +++|          LDD    CP          CHECK FOR *SSJ=* STATUS
10825  M00S06747.1aj     +++|          ADC    SEPW
10826  M00S06748.1aj     +++|          CRD    CM
10827  M00S06749.1aj     +++|          LDD    CM
10828  M00S06750.1aj     +++|          SHN    21-2
10829  M00S06751.1aj     +++|          PJN    RASX        IF NOT *SSJ=* JOB
10830  M00S06752.1aj     +++|          EXECUTE  3AF
10831  M00S06753.1aj     +++|          LDN    1           JOB IS BOTH *SSJ=* AND *DMP=*
10832  M00S06754.1aj     +++|          RJM    /3AF/RCF    RESTORE CONTROL POINT FIELDS
10833  M00S06755.1aj     +++|          UJN    RASX        RETURN
10834  M00S06756.1aj     +++| RQC      SPACE  4,15
10835  M00S06757.1aj     +++|**        RQC - REQUEST CENTRAL MEMORY.
10836  M00S06758.1aj     +++|*
10837  M00S06759.1aj     +++|*         ENTRY  (A) = STORAGE REQUEST.
10838  M00S06760.1aj     +++|*
10839  M00S06761.1aj     +++|*         EXIT   (A) = 0 IF STORAGE ASSIGNED.
10840  M00S06762.1aj     +++|*                (A) .LT. 0 IF STORAGE NOT AVAILABLE.
10841  M00S06763.1aj     +++|*                (A) .GT. 0 IF STORAGE REQUEST PENDING.
10842  M00S06764.1aj     +++|*
10843  M00S06765.1aj     +++|*         USES   T1.
10844  M00S06766.1aj     +++|*
10845  M00S06767.1aj     +++|*         CALLS  RSI.
10846  M00S06768.1aj     +++|
10847  M00S06769.1aj     +++|
10848  M00S06770.1aj     +++| RQC      SUBR               ENTRY/EXIT
10849  M00S06771.1aj     +++|          NJN    RQC1        IF NOT 0 FL
10850  M00S06772.1aj     +++|          LDN    1
10851  M00S06773.1aj     +++| RQC1     STD    T1
10852  M00S06774.1aj     +++|          SBD    FL
10853  M00S06775.1aj     +++|          ZJN    RQCX        IF NO CHANGE
10854  M00S06776.1aj     +++|          MJN    RQC2        IF DECREASE
10855  M00S06777.1aj     +++|          LDN    PSNI        FORCE CLEAR OF MEMORY
10856  M00S06778.1aj     +++|          STM    BCPH
10857  M00S06779.1aj     +++| RQC2     LDD    T1          SET FL REQUIRED
10858  M00S06780.1aj     +++|          RJM    RSI         REQUEST STORAGE
10859  M00S06781.1aj     +++|          UJN    RQCX        RETURN
10860  M00S06782.1aj     +++| RQE      SPACE  4,15
10861  M00S06783.1aj     +++|**        RQE - REQUEST EXTENDED CORE STORAGE.
10862  M00S06784.1aj     +++|*
10863  M00S06785.1aj     +++|*         ENTRY  (A) = STORAGE REQUEST.
10864  M00S06786.1aj     +++|*                (RQSF) = ROLLOUT ALLOWED FLAG.
10865  M00S06787.1aj     +++|*
10866  M00S06788.1aj     +++|*         EXIT   (A) = 0 IF STORAGE ASSIGNED.
10867  M00S06789.1aj     +++|*                (A) .LT. 0 IF STORAGE UNAVAILABLE.
10868  M00S06790.1aj     +++|*                (A) .GT. 0 IF STORAGE REQUEST PENDING.
10869  M00S06791.1aj     +++|*
10870  M00S06792.1aj     +++|*         USES   T1, CM - CM+4.
10871  M00S06793.1aj     +++|*
10872  M00S06794.1aj     +++|*         CALLS  REI.
10873  M00S06795.1aj     +++|
10874  M00S06796.1aj     +++|
10875  M00S06797.1aj     +++| RQE      SUBR               ENTRY/EXIT
10876  M00S06798.1aj     +++|          STD    T1          SAVE REQUEST
10877  M00S06799.1aj     +++|          ZJN    RQE1        IF RELEASE OF STORAGE
10878  M00S06800.1aj     +++|          LDM    RQSF
10879  M00S06801.1aj     +++|          NJN    RQE1        IF JOB NOT ROLLABLE
Line S06802 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10880  M01S06802.v23l617 ---|          LDN    SSTL        CHECK ECS CONTROL
Line S00652 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10881  M01S00652.v23l617 +++|          LDN    SSTL        CHECK EXTENDED MEMORY CONTROL
10882  M00S06803.1aj     +++|          CRD    CM
10883  M00S06804.1aj     +++|          LDD    CM
10884  M00S06805.1aj     +++|          SHN    21-5
Line S06806 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10885  M01S06806.v23l617 ---|          MJN    RQEX        IF USER ECS DISABLED
10886  M01S06807.v23l617 ---| RQE1     LDD    CP          FETCH ECS STATUS WORD
Line S00653 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10887  M01S00653.v23l617 +++|          MJN    RQEX        IF USER EXTENDED MEMORY DISABLED
10888  M01S00654.v23l617 +++| RQE1     LDD    CP          FETCH EXTENDED MEMORY STATUS WORD
10889  M00S06808.1aj     +++|          ADN    ECSW
10890  M00S06809.1aj     +++|          CRD    CM
10891  M00S06810.1aj     +++|          LDD    T1
10892  M00S06811.1aj     +++|          SBD    CM+4
10893  M00S06812.1aj     +++|          ZJN    RQEX        IF NO CHANGE
10894  M00S06813.1aj     +++|          MJN    RQE2        IF DECREASE
10895  M00S06814.1aj     +++|          STM    CSTD        SET WORD COUNT FOR CLEAR
10896  M00S06815.1aj     +++|          LDD    CM+4
10897  M00S06816.1aj     +++|          STM    CSTC        SET FWA FOR CLEAR
10898  M00S06817.1aj     +++|          LDN    PSNI
Line S06818 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10899  M01S06818.v23l617 ---|          STM    CSTB        ENABLE CLEARING OF ECS
Line S00001 Modification History
M01 (Added by) 1aj53
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10900  M02S00001.v23l617 ---|          STM    BCPH
Line S06819 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10901  M01S06819.v23l617 ---| RQE2     LDD    T1          SET ECS FL REQUIRED
Line S00655 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10902  M01S00655.v23l617 +++|          STM    CSTB        ENABLE CLEARING OF EXTENDED MEMORY
Line S00002 Modification History
M01 (Added by) 1aj85
Seq #  *Modification Id* Act 
----------------------------+
10903  M01S00002.1aj85   +++|          STM    BCPH        FORCE MEMORY CLEARING
10904  M01S00003.1aj85   +++|          LDC    LPNI
10905  M01S00004.1aj85   +++|          STM    BCPN
Line S00656 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10906  M01S00656.v23l617 +++| RQE2     LDD    T1          SET EXTENDED MEMORY FL REQUIRED
10907  M00S06820.1aj     +++|          RJM    REI         REQUEST STORAGE
10908  M00S06821.1aj     +++|          LJM    RQEX        RETURN
10909  M00S06822.1aj     +++| RQS      SPACE  4,15
10910  M00S06823.1aj     +++|**        RQS - REQUEST STORAGE.
10911  M00S06824.1aj     +++|*
10912  M00S06825.1aj     +++|*         ENTRY  (RQSD) = STORAGE REQUEST.
Line S06826 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10913  M01S06826.v23l617 ---|*                (RQSE) = ECS REQUEST FOR *DMP=* ROLLIN.
Line S00657 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10914  M01S00657.v23l617 +++|*                (RQSE) = EXTENDED MEMORY REQUEST FOR *DMP=* ROLLIN.
10915  M00S06827.1aj     +++|*                (RQSF) = ROLLOUT ALLOWED FLAG.
10916  M00S06828.1aj     +++|*
10917  M00S06829.1aj     +++|*         EXIT   IF STORAGE ASSIGNED.
10918  M00S06830.1aj     +++|*                TO *DPP* IF REQUEST PENDING OF UNAVAILABLE.
10919  M00S06831.1aj     +++|*
10920  M00S06832.1aj     +++|*         USES   T1, CM - CM+4, CN - CN+4.
10921  M00S06833.1aj     +++|*
10922  M00S06834.1aj     +++|*         CALLS  RLS, RQC, RQE.
10923  M00S06835.1aj     +++|*
10924  M00S06836.1aj     +++|*         MACROS MONITOR.
10925  M00S06837.1aj     +++|
10926  M00S06838.1aj     +++|
10927  M00S06839.1aj     +++| RQS      SUBR               ENTRY/EXIT
10928  M00S06840.1aj     +++| RQSA     LDN    0
10929  M00S06841.1aj     +++|*         LDN    1           (*DMP=* PROCESSING)
10930  M00S06842.1aj     +++|          NJN    RQS4        IF *DMP=* ROLLIN
10931  M00S06843.1aj     +++|          LDD    CP          READ ECS STATUS AND CONTROL WORDS
10932  M00S06844.1aj     +++|          ADN    ECSW
10933  M00S06845.1aj     +++|          CRD    CM
10934  M00S06846.1aj     +++|          ADN    ELCW-ECSW
10935  M00S06847.1aj     +++|          CRD    CN
10936  M00S06848.1aj     +++|          LDD    CN+1
Line S06849 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10937  M01S06849.v23l617 ---| RQSB     NJN    RQS1        IF ECS REQUEST PRESENT
Line S00658 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10938  M01S00658.v23l617 +++| RQSB     NJN    RQS1        IF EXTENDED MEMORY REQUEST PRESENT
10939  M00S06850.1aj     +++|*         PSN                (*DMP=* PROGRAM LOAD)
10940  M00S06851.1aj     +++|          LDD    CM+4
Line S06852 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10941  M01S06852.v23l617 ---| RQSC     NJN    RQS2        IF ECS CURRENTLY ASSIGNED
Line S00659 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10942  M01S00659.v23l617 +++| RQSC     NJN    RQS2        IF EXTENDED MEMORY CURRENTLY ASSIGNED
10943  M00S06853.1aj     +++|*         UJN    RQS3        (*DMP=* PROGRAM LOAD)
Line S00001 Modification History
M01 (Added by) 1aj87
Seq #  *Modification Id* Act 
----------------------------+
10944  M01S00001.1aj87   +++|*         NJN    RQS0        (EXTENDED MEMORY PROTECT SELECTED)
10945  M00S06854.1aj     +++|          UJN    RQS4        PROCESS CENTRAL MEMORY REQUEST
10946  M00S06855.1aj     +++|
Line S00002 Modification History
M01 (Added by) 1aj87
Seq #  *Modification Id* Act 
----------------------------+
10947  M01S00002.1aj87   +++| RQS0     STD    CN+1        SET REQUESTED FLE TO CURRENT FLE
10948  M00S06856.1aj     +++| RQS1     LDC    MCMX/100
10949  M00S06857.1aj     +++|          SBM    RQSD
10950  M00S06858.1aj     +++|          MJN    RQS2        IF REQUEST .GE. MINIMUM CM WITH ECS
10951  M00S06859.1aj     +++|          LDC    MCMX/100
10952  M00S06860.1aj     +++|          STM    RQSD        FORCE FL UP TO MINIMUM
10953  M00S06861.1aj     +++| RQS2     LDD    CN+1
Line S06862 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10954  M01S06862.v23l617 ---| RQS3     STM    RQSE        SET ECS REQUEST
Line S00660 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10955  M01S00660.v23l617 +++| RQS3     STM    RQSE        SET EXTENDED MEMORY REQUEST
10956  M00S06863.1aj     +++| RQS4     LDC    **
10957  M00S06864.1aj     +++| RQSD     EQU    *-1
10958  M00S06865.1aj     +++|          RJM    RQC         REQUEST CENTRAL MEMORY
10959  M00S06866.1aj     +++|          NJN    RQS5        IF CM NOT ASSIGNED
10960  M00S06867.1aj     +++|          LDC    0
10961  M00S06868.1aj     +++| RQSE     EQU    *-1
Line S06869 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10962  M01S06869.v23l617 ---|          RJM    RQE         REQUEST ECS
10963  M01S06870.v23l617 ---|          NJN    RQS5        IF ECS NOT ASSIGNED
Line S00661 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10964  M01S00661.v23l617 +++|          RJM    RQE         REQUEST EXTENDED MEMORY
10965  M01S00662.v23l617 +++|          NJN    RQS5        IF EXTENDED MEMORY NOT ASSIGNED
10966  M00S06871.1aj     +++|          LJM    RQSX        RETURN WITH STORAGE ASSIGNED
10967  M00S06872.1aj     +++|
10968  M00S06873.1aj     +++| RQS5     SHN    -21
10969  M00S06874.1aj     +++|          STD    T1
10970  M00S06875.1aj     +++|          LDC    **
10971  M00S06876.1aj     +++| RQSF     EQU    *-1         (= 0 IF ROLLOUT ALLOWED)
10972  M00S06877.1aj     +++|          ZJN    RQS7        IF JOB ROLLABLE
10973  M00S06878.1aj     +++| RQS6     LJM    RQS10       RECALL *1AJ*
10974  M00S06879.1aj     +++|
10975  M00S06880.1aj     +++| RQS7     LDD    T1
10976  M00S06881.1aj     +++|          ZJN    RQS6        IF REQUEST PENDING
Line S06882 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
10977  M01S06882.242l642 ---|          LDN    0           CHECK IF *TCS* CALL
10978  M01S06883.242l642 ---|*         LDN    1           (*TCS* CALL)
10979  M01S06884.242l642 ---| RQSG     EQU    *-1
Line S00398 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
10980  M01S00398.242l642 +++|          LDN    0           IF NOT *TCS* CALL
10981  M01S00399.242l642 +++|*         LDN    1           IF *TCS* CALL
10982  M01S00400.242l642 +++| RQSG     EQU    *-1
10983  M00S06885.1aj     +++|          NJN    RQS9        IF *TCS* CALL, DO NOT RELEASE STORAGE
Line S06886 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10984  M01S06886.v23l617 ---|          LDD    CP          CHECK FOR PRESERVE ECS FL
Line S00663 Modification History
M01 (Added by) v23l617
M02 (Removed by) 1aj87
Seq #  *Modification Id* Act 
----------------------------+
10985  M02S00663.1aj87   ---|          LDD    CP          CHECK FOR PRESERVE EXTENDED MEMORY FL
Line S06887 Modification History
M01 (Removed by) 1aj87
Seq #  *Modification Id* Act 
----------------------------+
10986  M01S06887.1aj87   ---|          ADN    JCIW
10987  M01S06888.1aj87   ---|          CRD    CM
10988  M01S06889.1aj87   ---|          LDD    CM+3
10989  M01S06890.1aj87   ---|          SHN    21-6
Line S06891 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 1aj87
Seq #  *Modification Id* Act 
----------------------------+
10990  M02S06891.1aj87   ---|          MJN    RQS8        IF ECS FL PRESERVED
Line S00664 Modification History
M01 (Added by) v23l617
M02 (Removed by) 1aj87
Seq #  *Modification Id* Act 
----------------------------+
10991  M02S00664.1aj87   ---|          MJN    RQS8        IF EXTENDED MEMORY FL PRESERVED
Line S00003 Modification History
M01 (Added by) 1aj87
Seq #  *Modification Id* Act 
----------------------------+
10992  M01S00003.1aj87   +++| RQSJ     PSN
10993  M01S00004.1aj87   +++|*         UJN    RQS8        (EXTENDED MEMORY PROTECT SELECTED)
10994  M00S06892.1aj     +++|          RJM    RLS         RELEASE STORAGE
10995  M00S06893.1aj     +++|          UJN    RQS9        ROLLOUT JOB
10996  M00S06894.1aj     +++|
10997  M00S06895.1aj     +++| RQS8     LDC    MCMX/100    REDUCE TO MINIMUM CM
10998  M00S06896.1aj     +++|          RJM    RQC
10999  M00S06897.1aj     +++| RQS9     LDD    CP          SET ROLLIN FL
11000  M00S06898.1aj     +++|          ADN    FLSW
11001  M00S06899.1aj     +++|          CRD    CM
11002  M00S06900.1aj     +++|          ADN    FLIW-FLSW
11003  M00S06901.1aj     +++|          CRD    CN
11004  M00S06902.1aj     +++|          LDD    CM
11005  M00S06903.1aj     +++|          ADM    RQSD
11006  M00S06904.1aj     +++|          STD    CN+4
11007  M00S06905.1aj     +++|          LDM    RQSE
11008  M00S06906.1aj     +++|          STD    CN+3
11009  M00S06907.1aj     +++|          LDD    CP
11010  M00S06908.1aj     +++|          ADN    FLIW
11011  M00S06909.1aj     +++|          CWD    CN
11012  M00S06910.1aj     +++|          LDN    0           ROLLOUT CP
11013  M00S06911.1aj     +++|          STD    CM+1
11014  M00S06912.1aj     +++|          MONITOR  ROCM
11015  M00S06913.1aj     +++|
11016  M00S06914.1aj     +++|*         ENTER PP INTO RECALL.
11017  M00S06915.1aj     +++|
Line S06916 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11018  M01S06916.273l780 ---| RQS10    LDN    ZERL        CLEAR ZERO WORD
Line S00003 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11019  M01S00003.273l780 +++| RQS10    LDN    0           SET *JACM* OPTIONS
11020  M01S00004.273l780 +++|          STD    CM+1
11021  M01S00005.273l780 +++|          MONITOR  JACM      CLEAR JOB ADVANCE
11022  M01S00006.273l780 +++|          LDN    ZERL        CLEAR RECALL PARAMETERS
11023  M00S06917.1aj     +++|          CRD    CM
11024  M00S06918.1aj     +++|          LDN    CFIR        INDICATE STORAGE MOVE PENDING
11025  M00S06919.1aj     +++|          STD    CM
11026  M00S06920.1aj     +++|          LDD    MA          ENTER PP INTO RECALL
11027  M00S06921.1aj     +++|          CWD    IR
11028  M00S06922.1aj     +++|          ADN    1
11029  M00S06923.1aj     +++|          CWD    CM
Line S06924 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11030  M01S06924.273l780 ---| RQSH     LDN    RPRS        SET RECALL AND PP-DROP OPTION
Line S06925 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11031  M02S06925.273l780 ---|*         LDN    0           (TCS RA+1 CALL)
Line S00665 Modification History
M01 (Added by) v23l617
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11032  M02S00665.273l780 ---|*         LDN    0           (TCS SYSTEM REQUEST CALL)
Line S06926 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11033  M01S06926.273l780 ---|          STD    CM+1
11034  M01S06927.273l780 ---| RQSI     MONITOR  JACM      CLEAR JOB ADVANCE, AUTO RECALL
Line S06928 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11035  M02S06928.273l780 ---|*         MONITOR  RECM      (TCS RA+1 CALL - ENTER RECALL)
Line S00666 Modification History
M01 (Added by) v23l617
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11036  M02S00666.273l780 ---|*         MONITOR  RECM      (TCS SYSTEM REQUEST CALL - ENTER RECALL)
Line S00007 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11037  M01S00007.273l780 +++|          MONITOR  RECM      RECALL *1AJ*
11038  M00S06929.1aj     +++|          LJM    PPR         EXIT TO PP RESIDENT
11039  M00S06930.1aj     +++|
11040  M00S06931.1aj     +++|
11041  M00S06932.1aj     +++|          ERRNG  37+RQSC-RQS3 IF JUMP OUT OF RANGE
11042  M00S06933.1aj     +++| SSC      SPACE  4,15
11043  M00S06934.1aj     +++|**        SSC - SET SYSTEM CALL.
11044  M00S06935.1aj     +++|*
11045  M00S06936.1aj     +++|*         ENTRY  (A) = CALL INDEX.
11046  M00S06937.1aj     +++|*
11047  M00S06938.1aj     +++|*         ERROR  HANG IF PROGRAM NOT FOUND.
11048  M00S06939.1aj     +++|*
Line S06940 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
11049  M01S06940.241l630 ---|*         USES   AB - AB+4.
Line S00099 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
11050  M01S00099.241l630 +++|*         USES   AB - AB+4, CM+1, CM+2.
11051  M00S06941.1aj     +++|*
11052  M00S06942.1aj     +++|*         CALLS  SCL.
11053  M00S06943.1aj     +++|*
11054  M00S06944.1aj     +++|*         MACROS MONITOR.
11055  M00S06945.1aj     +++|
11056  M00S06946.1aj     +++|
11057  M00S06947.1aj     +++| SSC      ADC    SSCB        SET NAME ADDRESS
11058  M00S06948.1aj     +++|          STM    SSCA
Line S06949 Modification History
M01 (Removed by) 1aj93
Seq #  *Modification Id* Act 
----------------------------+
11059  M01S06949.1aj93   ---|          LDD    MA
Line S00001 Modification History
M01 (Added by) 1aj93
Seq #  *Modification Id* Act 
----------------------------+
11060  M01S00001.1aj93   +++|          LDC    /ERR/EM22   * UNIDENTIFIED PROGRAM FORMAT.*
11061  M01S00002.1aj93   +++| SSCC     LDD    MA
11062  M01S00003.1aj93   +++|*         UJN    SSC2        (SHELL LOAD IN PROGRESS)
11063  M00S06950.1aj     +++|          CWM    *,ON
11064  M00S06951.1aj     +++| SSCA     EQU    *-1
11065  M00S06952.1aj     +++|          SBN    1
11066  M00S06953.1aj     +++|          CRD    AB
11067  M00S06954.1aj     +++|          LDN    1           SET SYSTEM CALL FLAG
11068  M00S06955.1aj     +++|          STD    AB+4
11069  M00S06956.1aj     +++|          LDM    SSCA        CHECK PROGRAM TO BE LOADED
11070  M00S06957.1aj     +++|          ADC    -SSCB
11071  M00S06958.1aj     +++|          LMN    BEGI
11072  M00S06959.1aj     +++|          ZJN    SSC1        IF *BEGIN*
Line S06960 Modification History
M01 (Removed by) ns2050
Seq #  *Modification Id* Act 
----------------------------+
11073  M01S06960.ns2050  ---|          LMN    CALL&BEGI
11074  M01S06961.ns2050  ---|          ZJN    SSC1        IF *CALL*
11075  M00S06962.1aj     +++|          LDC    UJNI+CSTB-CSTA
11076  M00S06963.1aj     +++|          STM    CSTA
11077  M00S06964.1aj     +++| SSC1     RJM    SCL         SEARCH CENTRAL LIBRARY
Line S06965 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
11078  M01S06965.241l630 ---|          MONITOR  HNGM      HANG IF ROUTINE MISSING
11079  M01S06966.241l630 ---|          UJN    SSC1        RETRY SEARCH
Line S00100 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
11080  M01S00100.241l630 +++|          LDN    0
11081  M01S00101.241l630 +++|          STD    CM+2        SET NO ERROR FLAG
11082  M01S00102.241l630 +++|          LDC    *
11083  M01S00103.241l630 +++|          STD    CM+1        ADDRESS WHERE ERROR DETECTED
11084  M01S00104.241l630 +++|          MONITOR  CHGM      CONDITIONAL HANG
11085  M01S00105.241l630 +++|          LDC    /ERR/EM26   * SYSTEM ROUTINE MISSING - XXXXXXX    *
Line S00106 Modification History
M01 (Added by) 241l630
M02 (Removed by) 1aj93
Seq #  *Modification Id* Act 
----------------------------+
11086  M02S00106.1aj93   ---|          LJM    ERR1        ISSUE ERROR MESSAGE
Line S00004 Modification History
M01 (Added by) 1aj93
Seq #  *Modification Id* Act 
----------------------------+
11087  M01S00004.1aj93   +++| SSC2     LJM    ERR1        ISSUE ERROR MESSAGE
11088  M00S06967.1aj     +++|
11089  M00S06968.1aj     +++|          ERRNG  37+CSTA-CSTB IF JUMP OUT OF RANGE
11090  M00S06969.1aj     +++|
11091  M00S06970.1aj     +++|
11092  M00S06971.1aj     +++| SSCB     BSS    0
11093  M00S06972.1aj     +++|          LOC    0
11094  M00S06973.1aj     +++|
11095  M00S06974.1aj     +++| LDR=     VFD    48/0LLDR=
11096  M00S06975.1aj     +++| BEGI     VFD    48/0LBEGIN
11097  M00S06976.1aj     +++| SLDR     VFD    48/0LSLDR=
Line S06977 Modification History
M01 (Removed by) ns2050
Seq #  *Modification Id* Act 
----------------------------+
11098  M01S06977.ns2050  ---| CALL     VFD    48/0LCALL
11099  M00S06978.1aj     +++|
11100  M00S06979.1aj     +++|          LOC    *O
11101  M00S06980.1aj     +++| STK      SPACE  4,10
11102  M00S06981.1aj     +++|**        STK - SKIP TO KEYWORD.
11103  M00S06982.1aj     +++|*
11104  M00S06983.1aj     +++|*         ENTRY  (KA) = KEYWORD ADDRESS.
11105  M00S06984.1aj     +++|*
11106  M00S06985.1aj     +++|*         EXIT   (A) = AMOUNT TO INCREASE BUFFER ADDRESS BY IF BUFFER
11107  M00S06986.1aj     +++|*                REASSEMBLED.
Line S06987 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11108  M01S06987.v23l617 ---|*                (CBUF) = REASSEMBLED STATEMENT IF STATEMENT DOES NOT
Line S00667 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11109  M01S00667.v23l617 +++|*                (CBUF) = REASSEMBLED COMMAND IF COMMAND DOES NOT
11110  M00S06988.1aj     +++|*                BEGIN WITH KEYWORD.
11111  M00S06989.1aj     +++|*
11112  M00S06990.1aj     +++|*         USES   T0, T1, T3.
11113  M00S06991.1aj     +++|
11114  M00S06992.1aj     +++|
11115  M00S06993.1aj     +++| STK8     LDN    0           NO BUFFER ADDRESS INCREMENT
11116  M00S06994.1aj     +++|
11117  M00S06995.1aj     +++| STK      SUBR               ENTRY/EXIT
11118  M00S06996.1aj     +++|          LDM    CSEB
Line S06997 Modification History
M01 (Removed by) 1aj115
Seq #  *Modification Id* Act 
----------------------------+
11119  M01S06997.1aj115  ---|          LPN    50
11120  M01S06998.1aj115  ---|          NJN    STK8        IF *ARG=* OR *SDM=* PRESENT
Line S00001 Modification History
M01 (Added by) 1aj115
M02 (Removed by) 1aj115a
Seq #  *Modification Id* Act 
----------------------------+
11121  M02S00001.1aj115a ---|          LPN    40
11122  M02S00002.1aj115a ---|          NJN    STK8        IF *ARG=* PRESENT
Line S00001 Modification History
M01 (Added by) 1aj115a
Seq #  *Modification Id* Act 
----------------------------+
11123  M01S00001.1aj115a +++|          LPN    50
11124  M01S00002.1aj115a +++|          NJN    STK8        IF *ARG=* OR *SDM=* PRESENT
11125  M00S06999.1aj     +++|          LDC    CHAR-1
11126  M00S07000.1aj     +++|          STD    T3
11127  M00S07001.1aj     +++|          LDD    KA
11128  M00S07002.1aj     +++|          ADC    -CHAR
Line S07003 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11129  M01S07003.v23l617 ---|          ZJN    STKX        IF STATEMENT BEGINS WITH KEY WORD
Line S00668 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11130  M01S00668.v23l617 +++|          ZJN    STKX        IF COMMAND BEGINS WITH KEY WORD
11131  M00S07004.1aj     +++|          STD    T0          NUMBER OF CHARACTERS TO SKIP
11132  M00S07005.1aj     +++|          LDC    STMT-1
11133  M00S07006.1aj     +++|          STD    T1
11134  M00S07007.1aj     +++| STK1     AOD    T1          ADVANCE BYTE INDEX
11135  M00S07008.1aj     +++|          LDI    T1
11136  M00S07009.1aj     +++|          SHN    -6
11137  M00S07010.1aj     +++|          LMN    1R
11138  M00S07011.1aj     +++|          ZJN    STK2        IF UPPER CHARACTER IS A BLANK
11139  M00S07012.1aj     +++|          SOD    T0          DECREMENT SKIP COUNT
11140  M00S07013.1aj     +++|          ZJN    STK5        IF END OF SEQUENCE NUMBER
11141  M00S07014.1aj     +++| STK2     LDI    T1
11142  M00S07015.1aj     +++|          LPN    77
11143  M00S07016.1aj     +++|          LMN    1R
11144  M00S07017.1aj     +++|          ZJN    STK1        IF LOWER CHARACTER IS A BLANK
11145  M00S07018.1aj     +++|          SOD    T0          DECREMENT SKIP COUNT
11146  M00S07019.1aj     +++|          NJN    STK1        IF NOT END OF SEQUENCE NUMBER
11147  M00S07020.1aj     +++|
Line S07021 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11148  M01S07021.v23l617 ---|*         MOVE CONTROL CARD THAT STARTS WITH UPPER CHARACTER OF BYTE.
Line S00669 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11149  M01S00669.v23l617 +++|*         MOVE COMMAND THAT STARTS WITH UPPER CHARACTER OF BYTE.
11150  M00S07022.1aj     +++|
11151  M00S07023.1aj     +++| STK3     AOD    T3          ADVANCE BYTE ADDRESS
11152  M00S07024.1aj     +++|          AOD    T1
11153  M00S07025.1aj     +++|          LDI    T1
11154  M00S07026.1aj     +++|          STI    T3
Line S07027 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11155  M01S07027.v23l617 ---|          NJN    STK3        IF NOT END OF STATEMENT
Line S00670 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11156  M01S00670.v23l617 +++|          NJN    STK3        IF NOT END OF COMMAND
11157  M00S07028.1aj     +++|          UJN    STK6        ZERO FILL REMAINDER OF BUFFER
11158  M00S07029.1aj     +++|
Line S07030 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11159  M01S07030.v23l617 ---|*         MOVE CONTROL CARD THAT STARTS WITH LOWER CHARACTER OF BYTE.
Line S00671 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11160  M01S00671.v23l617 +++|*         MOVE COMMAND THAT STARTS WITH LOWER CHARACTER OF BYTE.
11161  M00S07031.1aj     +++|
11162  M00S07032.1aj     +++| STK4     AOD    T1
11163  M00S07033.1aj     +++| STK5     AOD    T3          ADVANCE BYTE ADDRESS
11164  M00S07034.1aj     +++|          LDM    1,T1
11165  M00S07035.1aj     +++|          SHN    6
11166  M00S07036.1aj     +++|          LMI    T1
11167  M00S07037.1aj     +++|          SHN    6
11168  M00S07038.1aj     +++|          STI    T3
11169  M00S07039.1aj     +++|          LDI    T1
11170  M00S07040.1aj     +++|          NJN    STK4        IF NOT END OF BUFFER
11171  M00S07041.1aj     +++|
Line S07042 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11172  M01S07042.v23l617 ---|*         ZERO FILL REMAINDER OF CONTROL CARD BUFFER.
Line S00672 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11173  M01S00672.v23l617 +++|*         ZERO FILL REMAINDER OF COMMAND BUFFER.
11174  M00S07043.1aj     +++|
11175  M00S07044.1aj     +++| STK6     AOD    T3
11176  M00S07045.1aj     +++|          LMC    CHAR+55*2
11177  M00S07046.1aj     +++|          ZJN    STK7        IF END OF BUFFER
11178  M00S07047.1aj     +++|          LDN    0           CLEAR BYTE
11179  M00S07048.1aj     +++|          STI    T3
11180  M00S07049.1aj     +++|          UJN    STK6        CLEAR NEXT BYTE
11181  M00S07050.1aj     +++|
11182  M00S07051.1aj     +++| STK7     LDN    CHAR-STMT   BUFFER ADDRESS INCREMENT
11183  M00S07052.1aj     +++|          LJM    STKX        RETURN
11184  M00S07053.1aj     +++| TSS      SPACE  4,10
11185  M00S07054.1aj     +++|**        TSS - TRANSLATE SCOPE PARAMETER.
11186  M00S07055.1aj     +++|*
11187  M00S07056.1aj     +++|*         ENTRY  (AB - AB+4) PARAMTER.
11188  M00S07057.1aj     +++|*                ((CA))      SEPARATOR.
11189  M00S07058.1aj     +++|*
11190  M00S07059.1aj     +++|*         EXIT   (A)         4 BIT SCOPE SEPARATOR CODE.
11191  M00S07060.1aj     +++|*
11192  M00S07061.1aj     +++|*         USES   T1.
11193  M00S07062.1aj     +++|
11194  M00S07063.1aj     +++|
11195  M00S07064.1aj     +++| TSS2     ADN    17
11196  M00S07065.1aj     +++|
11197  M00S07066.1aj     +++| TSS      SUBR               ENTRY/EXIT
11198  M00S07067.1aj     +++|          LDI    CA
11199  M00S07068.1aj     +++|          ZJN    TSS2        IF TERMINATOR
11200  M00S07069.1aj     +++|          LDN    TSSL        TABLE LIMIT
11201  M00S07070.1aj     +++|          STD    T1
11202  M00S07071.1aj     +++| TSS1     SOD    T1
11203  M00S07072.1aj     +++|          MJN    TSS2        IF END OF TABLE
11204  M00S07073.1aj     +++|          LDM    TSSA,T1     TABLE ENTRY
11205  M00S07074.1aj     +++|          LPN    77
11206  M00S07075.1aj     +++|          LMI    CA
11207  M00S07076.1aj     +++|          NJN    TSS1        IF NO MATCH
11208  M00S07077.1aj     +++|          LDM    TSSA,T1     SET CODE
11209  M00S07078.1aj     +++|          SHN    -6
11210  M00S07079.1aj     +++|          UJN    TSSX        RETURN
11211  M00S07080.1aj     +++|
11212  M00S07081.1aj     +++|
11213  M00S07082.1aj     +++|****      SCOPE SEPARATOR EQUIVALENCES.
11214  M00S07083.1aj     +++| TSSA     VFD    6/1,6/1R,
11215  M00S07084.1aj     +++|          VFD    6/2,6/1R=
11216  M00S07085.1aj     +++|          VFD    6/3,6/1R/
11217  M00S07086.1aj     +++|          VFD    6/4,6/1R(
11218  M00S07087.1aj     +++|          VFD    6/5,6/1R+
11219  M00S07088.1aj     +++|          VFD    6/6,6/1R-
11220  M00S07089.1aj     +++|          VFD    6/7,6/1R
11221  M00S07090.1aj     +++|          VFD    6/10B,6/1R;
11222  M00S07091.1aj     +++| TSSL     EQU    *-TSSA
11223  M00S07092.1aj     +++|****
11224  M00S07093.1aj     +++|          SPACE  4,15
11225  M00S07094.1aj     +++|**        RESIDENT COMMON DECKS.
11226  M00S07095.1aj     +++|
11227  M00S07096.1aj     +++|
11228  M00S07097.1aj     +++|*CALL     COMPCLX
Line S00033 Modification History
M01 (Added by) ns2748
Seq #  *Modification Id* Act 
----------------------------+
11229  M01S00033.ns2748  +++| PRR$     EQU    1           SELECT REMOTE ASSEMBLY OF *PRR* AND *PIR*
11230  M01S00034.ns2748  +++| PIR$     EQU    1           SELECT ASSEMBLY OF *PIR* FOR IAF R-REG
11231  M01S00035.ns2748  +++| SRR$     EQU    1           DISABLE SAVE AND RESTORE OF T1 AND T2
11232  M01S00036.ns2748  +++|*CALL     COMPSRR
Line S07098 Modification History
M01 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11233  M01S07098.1aj92   ---|*CALL     COMPCUA
11234  M00S07099.1aj     +++|*CALL     COMPREI
11235  M00S07100.1aj     +++|*CALL     COMPRLS
11236  M00S07101.1aj     +++|*CALL     COMPRSI
Line S07102 Modification History
M01 (Removed by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
11237  M01S07102.ns2578  ---|*CALL     COMPSAF
11238  M00S07103.1aj     +++|          SPACE  4,10
11239  M00S07104.1aj     +++|          QUAL
11240  M00S07105.1aj     +++|          USE    BUFFERS
11241  M00S07106.1aj     +++|
Line S07107 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11242  M01S07107.v23l617 ---| STMT     CON    0           CONTROL STATEMENT BUFFER
11243  M01S07108.v23l617 ---|*                            (STMT) = 0 IF NO CONTROL STATEMENT
Line S00673 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11244  M01S00673.v23l617 +++| STMT     CON    0           COMMAND BUFFER
11245  M01S00674.v23l617 +++|*                            (STMT) = 0 IF NO COMMAND
11246  M00S07109.1aj     +++|
Line S07110 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11247  M01S07110.v23l617 ---| CHAR     EQU    STMT+55     CONTROL STATEMENT STRING BUFFER
Line S00675 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11248  M01S00675.v23l617 +++| CHAR     EQU    STMT+55     COMMAND STRING BUFFER
Line S00001 Modification History
M01 (Added by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11249  M01S00001.1aj119  +++| CHARE    EQU    CHAR+55*2   END OF COMMAND STRING BUFFER
11250  M00S07111.1aj     +++|
Line S07112 Modification History
M01 (Removed by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11251  M01S07112.1aj119  ---| OVL      EQU    CHAR+55*2   OVERLAY LOAD ADDRESS
Line S00002 Modification History
M01 (Added by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11252  M01S00002.1aj119  +++| OVL      EQU    CHARE       OVERLAY LOAD ADDRESS
11253  M00S07113.1aj     +++|          ERRNG  EPFW-OVL-5-ZAUL CHECK LENGTH OF *0AU*
11254  M00S07114.1aj     +++|          QUAL   *
11255  M00S07115.1aj     +++|          TITLE  TCS PRESET ROUTINES.
Line S07116 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11256  M02S07116.242l642 ---| INT      SPACE  4,10
11257  M02S07117.242l642 ---|**        INT - INITIALIZE DIRECT CELLS.
11258  M02S07118.242l642 ---|*
11259  M02S07119.242l642 ---|*         EXIT   (JO) = JOB EJT ORDINAL.
11260  M02S07120.242l642 ---|*                (RQSF) = ROLLOUT ALLOWED FLAG.
11261  M02S07121.242l642 ---|*
11262  M02S07122.242l642 ---|*         CALLS  CAT, CES, CIJ, CSL, IAA, /3AF/IDP, IFP, RAS, RNC,
11263  M02S07123.242l642 ---|*                /3AF/RFJ, UPS.
11264  M02S07124.242l642 ---|*
11265  M02S07125.242l642 ---|*         MACROS EXECUTE, MONITOR, NFA, SFA.
11266  M02S07126.242l642 ---|
11267  M02S07127.242l642 ---|
11268  M02S07128.242l642 ---| INT      BSS    0           ENTRY
11269  M02S07129.242l642 ---|          RJM    IFP         INITIALIZE *COMPGFP*
Line S07130 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11270  M03S07130.242l642 ---|          LDD    CP          READ STATUS WORD
Line S00213 Modification History
M01 (Added by) ns22000
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11271  M03S00213.242l642 ---|          LDD    CP          READ STATUS WORD
Line S07131 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11272  M02S07131.242l642 ---|          ADN    STSW
11273  M02S07132.242l642 ---|          CRD    CN
11274  M02S07133.242l642 ---|          ADN    JCIW-STSW   READ JOB CONTROL INFORMATION
11275  M02S07134.242l642 ---|          CRD    AB
Line S07135 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11276  M03S07135.242l642 ---|          ADN    EOJW-JCIW   READ END OF JOB STATUS
11277  M03S07136.242l642 ---|          CRD    CM
11278  M03S07137.242l642 ---|          ADN    UIDW-EOJW   READ VALIDATION FLAG
Line S00214 Modification History
M01 (Added by) ns22000
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11279  M03S00214.242l642 ---|          ADN    UIDW-JCIW   READ VALIDATION FLAG
Line S07138 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11280  M02S07138.242l642 ---|          CRD    FS
11281  M02S07139.242l642 ---|          ADK    TFSW-UIDW   READ EJT ORDINAL WORD
11282  M02S07140.242l642 ---|          CRD    T1
Line S07141 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11283  M03S07141.242l642 ---|          ADK    CSPW-TFSW   READ CONTROL STATEMENT POINTER
Line S00676 Modification History
M01 (Added by) v23l617
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11284  M03S00676.242l642 ---|          ADK    CSPW-TFSW   READ COMMAND POINTER
Line S07142 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11285  M02S07142.242l642 ---|          CRD    SP
11286  M02S07143.242l642 ---|          ADN    SEPW-CSPW   READ SPECIAL ENTRY POINT WORD
11287  M02S07144.242l642 ---|          CRD    CW
11288  M02S07145.242l642 ---|          LDD    T1          SET EJT ORDINAL
11289  M02S07146.242l642 ---|          STD    JO
11290  M02S07147.242l642 ---|          LDD    FS+3        SET VALIDATION STATUS
11291  M02S07148.242l642 ---|          LPN    40
11292  M02S07149.242l642 ---|          STM    TCSA
Line S07150 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11293  M03S07150.242l642 ---|          LDD    CM          CHECK END OF JOB STATUS
11294  M03S07151.242l642 ---|          SHN    21-13
Line S00215 Modification History
M01 (Added by) ns22000
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11295  M03S00215.242l642 ---|          SFA    EJT,JO
11296  M03S00216.242l642 ---|          ADK    SCHE
11297  M03S00217.242l642 ---|          CRD    CM          READ END OF JOB STATUS
Line S00218 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1aj58
M03 (Removed by) 241l630
M04 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11298  M04S00218.242l642 ---|          ADK    SCLE-SCHE
Line S00002 Modification History
M01 (Added by) 1aj58
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11299  M03S00002.242l642 ---|          ADK    //SCLE-//SCHE  READ SERVICE CLASS WORD
Line S00219 Modification History
M01 (Added by) ns22000
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11300  M03S00219.242l642 ---|          CRD    T1          READ FORCED ROLLIN FLAG
11301  M03S00220.242l642 ---|          LDD    CM+2
11302  M03S00221.242l642 ---|          SHN    21-12
Line S07152 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11303  M02S07152.242l642 ---|          MJN    INT1        IF END OF JOB
11304  M02S07153.242l642 ---|          LDD    AB+2
11305  M02S07154.242l642 ---|          SBK    LSSI+1
11306  M02S07155.242l642 ---|          MJN    INT2        IF NOT A SUBSYSTEM
11307  M02S07156.242l642 ---| INT1     LDC    UJNI+BCP19-BCPG  BY PASS CLEAR OF MEMORY
11308  M02S07157.242l642 ---|          STM    BCPG
11309  M02S07158.242l642 ---| INT2     LDD    AB+2        SET/CLEAR ROLLOUT ALLOWED FLAG
11310  M02S07159.242l642 ---|          NJN    INT3        IF ROLLOUT NOT ALLOWED
11311  M02S07160.242l642 ---|          LDD    AB+3
11312  M02S07161.242l642 ---|          LPC    1000
11313  M02S07162.242l642 ---|          NJN    INT3        IF *DIS* ASSIGNED TO JOB
Line S07163 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11314  M03S07163.242l642 ---|          SFA    EJT,JO
11315  M03S07164.242l642 ---|          ADN    //SCLE
11316  M03S07165.242l642 ---|          CRD    CM
11317  M03S07166.242l642 ---|          LDD    CM
Line S00222 Modification History
M01 (Added by) ns22000
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11318  M03S00222.242l642 ---|          LDD    T1
Line S07167 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11319  M02S07167.242l642 ---|          LPN    20
11320  M02S07168.242l642 ---| INT3     STM    RQSF
11321  M02S07169.242l642 ---|          LDN    0
11322  M02S07170.242l642 ---|          STD    PF          CLEAR PROGRAM FORMAT
11323  M02S07171.242l642 ---|          STD    FA          CLEAR FNT ADDRESS
11324  M02S07172.242l642 ---|          STD    EF          CLEAR/SET ERROR FLAG
11325  M02S07173.242l642 ---|          STD    EP          CLEAR ENTRY POINT
11326  M02S07174.242l642 ---|          LDD    IR          CHECK FOR *TCS* CALL
11327  M02S07175.242l642 ---|          LMC    2RTC
11328  M02S07176.242l642 ---|          ZJN    INT5        IF *TCS* CALL
11329  M02S07177.242l642 ---|          LDD    CP          READ APPLICATION ACCOUNTING CONTROL WORD
11330  M02S07178.242l642 ---|          ADN    FPFW
11331  M02S07179.242l642 ---|          CRD    T3
11332  M02S07180.242l642 ---|          LDD    T3          CHECK FOR ACCOUNTING IN PROCESS
11333  M02S07181.242l642 ---|          LPC    1400
11334  M02S07182.242l642 ---|          ZJN    INT4        IF APPLICATION ACCOUNTING NOT SET
11335  M02S07183.242l642 ---|          RJM    IAA         ISSUE APPLICATION ACCOUNTING MESSAGE
11336  M02S07184.242l642 ---| INT4     LJM    INT7        DETERMINE ORIGIN TYPE
11337  M02S07185.242l642 ---|
11338  M02S07186.242l642 ---| INT5     AOM    RQSG        SET *TCS* FLAG
11339  M02S07187.242l642 ---|          LDC    LDNI+DPPM
11340  M02S07188.242l642 ---|          STM    DPPA
11341  M02S07189.242l642 ---|          SCN    77
11342  M02S07190.242l642 ---|          STM    RQSH
11343  M02S07191.242l642 ---|          ADK    RECM        PREVENT *JACM* FOR *TCS* RA+1 CALL
11344  M02S07192.242l642 ---|          STM    RQSI
11345  M02S07193.242l642 ---|          LDC    UJNI+77+IST3-ISTC
11346  M02S07194.242l642 ---|          STM    ISTC        DONT ADVANCE JOB IF RA+1 *TCS* REQUEST
Line S00483 Modification History
M01 (Added by) ns21000
M02 (Removed by) 1aj45
M03 (Removed by) 241l630
M04 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11347  M04S00483.242l642 ---|          NFA    SHCN        CLEAR *SHELL* EXECUTING FLAG
11348  M04S00484.242l642 ---|          CRD    CM
11349  M04S00485.242l642 ---|          LDD    CM+4
Line S00486 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns2114
M03 (Removed by) 1aj45
M04 (Removed by) 241l630
M05 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11350  M05S00486.242l642 ---|          LPC    177
Line S00006 Modification History
M01 (Added by) ns2114
M02 (Removed by) 1aj45
M03 (Removed by) 241l630
M04 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11351  M04S00006.242l642 ---|          LPC    3777
Line S00487 Modification History
M01 (Added by) ns21000
M02 (Removed by) 1aj45
M03 (Removed by) 241l630
M04 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11352  M04S00487.242l642 ---|          STD    CM+4
11353  M04S00488.242l642 ---|          NFA    SHCN
11354  M04S00489.242l642 ---|          CWD    CM
Line S07195 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11355  M02S07195.242l642 ---|          LDD    IR+2
11356  M02S07196.242l642 ---|          LMN    5
Line S07197 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11357  M03S07197.242l642 ---|          ZJN    INT6        IF EXECUTE CONTROL STATEMENT FROM CM
Line S00677 Modification History
M01 (Added by) v23l617
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11358  M03S00677.242l642 ---|          ZJN    INT6        IF EXECUTE COMMAND FROM CM
Line S07198 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11359  M02S07198.242l642 ---|          LJM    INT10       CHECK ERROR FLAG
11360  M02S07199.242l642 ---|
11361  M02S07200.242l642 ---|*         THE JOB ADVANCE FLAG IS SET FOR A *TCS* CALL (TO
Line S07201 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11362  M03S07201.242l642 ---|*         EXECUTE A CONTROL STATEMENT FROM CM) BY SAVING THE REQUEST,
Line S00678 Modification History
M01 (Added by) v23l617
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11363  M03S00678.242l642 ---|*         EXECUTE A COMMAND FROM CM) BY SAVING THE REQUEST,
Line S07202 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11364  M02S07202.242l642 ---|*         DROPPING THE CPU, AND WAITING FOR THE SYSTEM TO ADVANCE
11365  M02S07203.242l642 ---|*         THE JOB.  WHEN THE JOB IS ADVANCED, *1AJ* THEN ATTEMPTS TO
Line S07204 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11366  M03S07204.242l642 ---|*         START UP THE CONTROL STATEMENT FROM THE CM ADDRESS POINTED
Line S00679 Modification History
M01 (Added by) v23l617
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11367  M03S00679.242l642 ---|*         START UP THE COMMAND FROM THE CM ADDRESS POINTED
Line S07205 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11368  M02S07205.242l642 ---|*         TO BY THE ORIGINAL *TCS* REQUEST WITH JOB ADVANCE SET.
11369  M02S07206.242l642 ---|
Line S07207 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11370  M03S07207.242l642 ---| INT6     RJM    CAT         CLEAR ADDRESS FOR *TCS* EXECUTE STATEMENT
Line S00680 Modification History
M01 (Added by) v23l617
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11371  M03S00680.242l642 ---| INT6     RJM    CAT         CLEAR ADDRESS FOR *TCS* EXECUTE COMMAND
Line S00001 Modification History
M01 (Added by) 1aj10
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11372  M03S00001.242l642 ---|          RJM    CCF         CLEAR CONTROL FIELDS
Line S07208 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11373  M02S07208.242l642 ---|          LDD    IR+3        SAVE *TCS* REQUEST ADDRESS
11374  M02S07209.242l642 ---|          LPN    77
11375  M02S07210.242l642 ---|          SHN    14
11376  M02S07211.242l642 ---|          LMD    IR+4
11377  M02S07212.242l642 ---|          SHN    14
11378  M02S07213.242l642 ---|          STD    CM+2
11379  M02S07214.242l642 ---|          SHN    -6
11380  M02S07215.242l642 ---|          SCN    77
11381  M02S07216.242l642 ---|          RAD    CM+3
11382  M02S07217.242l642 ---|          LDD    T1
11383  M02S07218.242l642 ---|          CWD    CM
Line S00001 Modification History
M01 (Added by) ns2107
M02 (Removed by) 241l630
M03 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11384  M03S00001.242l642 ---|          LDN    1           SELECT CLEAR CPU STATUS
11385  M03S00002.242l642 ---|          STD    CM+1
Line S07219 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
11386  M02S07219.242l642 ---|          MONITOR  DCPM
11387  M02S07220.242l642 ---|          LJM    DPP         DROP PP
Line S00401 Modification History
M01 (Added by) 242l642
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11388  M02S00401.1aj92   ---| INT      SPACE  4,10
11389  M02S00402.1aj92   ---|**        INT - CONTINUATION OF INITIALIZATION ROUTINE.
11390  M02S00403.1aj92   ---|
Line S00107 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
11391  M01S00107.241l630 +++| INT      SPACE  4,10
11392  M01S00108.241l630 +++|**        INT - CONTINUATION OF INITIALIZATION ROUTINE.
11393  M01S00109.241l630 +++|
11394  M00S07221.1aj     +++|
Line S07222 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11395  M01S07222.v23l617 ---| INT7     RJM    CES         CHECK FOR *TCS* EXECUTE STATEMENT
11396  M01S07223.v23l617 ---|          ZJN    INT8        IF NOT EXECUTE CONTROL STATEMENT FROM FS
Line S00681 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11397  M01S00681.v23l617 +++| INT7     RJM    CES         CHECK FOR *TCS* EXECUTE COMMAND
11398  M01S00682.v23l617 +++|          ZJN    INT8        IF NOT EXECUTE COMMAND
11399  M00S07224.1aj     +++|          AOM    RQSG        SET *TCS* FLAG
11400  M00S07225.1aj     +++| INT8     RJM    CIJ         CHECK FOR INTERACTIVE JOB
Line S00490 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
11401  M01S00490.ns21000 +++|          RJM    CSC         CHECK *SHELL* CONTROL
Line S07226 Modification History
M01 (Removed by) 1aj10
Seq #  *Modification Id* Act 
----------------------------+
11402  M01S07226.1aj10   ---|          LDD    CP          CLEAR ERROR EXIT CONTROL WORD
11403  M01S07227.1aj10   ---|          ADN    EECW
11404  M01S07228.1aj10   ---|          CRD    FS
11405  M01S07229.1aj10   ---|          ADN    PPDW-EECW   CLEAR PP DUMP WORD
11406  M01S07230.1aj10   ---|          CRD    CN
11407  M01S07231.1aj10   ---|          LDD    FS+3
11408  M01S07232.1aj10   ---|          SCN    77
11409  M01S07233.1aj10   ---|          STD    FS+3
11410  M01S07234.1aj10   ---|          LDN    0
11411  M01S07235.1aj10   ---|          STD    FS+4
11412  M01S07236.1aj10   ---|          STD    FS+1        CLEAR REPRIEVE OPTIONS
11413  M01S07237.1aj10   ---|          STD    CN+3
11414  M01S07238.1aj10   ---|          STD    CN+4
11415  M01S07239.1aj10   ---|          LDD    FS          CLEAR EXTENDED REPRIEVE FLAGS
11416  M01S07240.1aj10   ---|          LPC    4777
11417  M01S07241.1aj10   ---|          STD    FS
11418  M01S07242.1aj10   ---|          LDD    CP          WRITE UPDATED EECW
11419  M01S07243.1aj10   ---|          ADN    EECW
11420  M01S07244.1aj10   ---|          CWD    FS
11421  M01S07245.1aj10   ---|          ADN    PPDW-EECW
11422  M01S07246.1aj10   ---|          CWD    CN
11423  M01S07247.1aj10   ---|          LDN    ZERL
11424  M01S07248.1aj10   ---|          CRD    CN
11425  M01S07249.1aj10   ---|          LDD    CP          READ K-DISPLAY WORD
11426  M01S07250.1aj10   ---|          ADC    DBAW
11427  M01S07251.1aj10   ---|          CRD    FS
11428  M01S07252.1aj10   ---|          LDD    FS          PRESERVE MEMORY FLAGS
11429  M01S07253.1aj10   ---|          SCN    77
11430  M01S07254.1aj10   ---|          STD    CN
11431  M01S07255.1aj10   ---|          LDD    CP          CLEAR K-DISPLAY INFORMATION
11432  M01S07256.1aj10   ---|          ADC    DBAW
11433  M01S07257.1aj10   ---|          CWD    CN
Line S00002 Modification History
M01 (Added by) 1aj10
Seq #  *Modification Id* Act 
----------------------------+
11434  M01S00002.1aj10   +++|          RJM    CCF         CLEAR CONTROL FIELDS
Line S07258 Modification History
M01 (Removed by) 1aj11
Seq #  *Modification Id* Act 
----------------------------+
11435  M01S07258.1aj11   ---|
11436  M01S07259.1aj11   ---|*         REWIND PRIMARY FILE.
11437  M01S07260.1aj11   ---|
11438  M01S07261.1aj11   ---|          LDD    CP          READ FNT ADDRESS FOR PRIMARY FILE
11439  M01S07262.1aj11   ---|          ADN    TFSW
11440  M01S07263.1aj11   ---|          CRD    FS
11441  M01S07264.1aj11   ---|          LDD    FS+1
11442  M01S07265.1aj11   ---|          ZJN    INT9        IF NO PRIMARY FILE
11443  M01S07266.1aj11   ---|          NFA    FS+1,R      READ FST ENTRY FOR PRIMARY FILE
11444  M01S07267.1aj11   ---|          ADN    FSTL
11445  M01S07268.1aj11   ---|          CRD    CN
11446  M01S07269.1aj11   ---|          LDD    CN+2
11447  M01S07270.1aj11   ---|          ZJN    INT9        IF NULL FILE
11448  M01S07271.1aj11   ---|          LDD    CN+1        REWIND FILE
11449  M01S07272.1aj11   ---|          STD    CN+2
11450  M01S07273.1aj11   ---|          LDN    FSMS
11451  M01S07274.1aj11   ---|          STD    CN+3
11452  M01S07275.1aj11   ---|          LDD    CN+4        RESET STATUS
11453  M01S07276.1aj11   ---|          SCN    77
11454  M01S07277.1aj11   ---|          LMN    5
11455  M01S07278.1aj11   ---|          STD    CN+4        SET FILE STATUS BYTE
11456  M01S07279.1aj11   ---|          NFA    FS+1,R      WRITE UPDATED FST ENTRY FOR PRIMARY FILE
11457  M01S07280.1aj11   ---|          ADN    FSTL
11458  M01S07281.1aj11   ---|          CWD    CN
11459  M01S07282.1aj11   ---| INT9     UJN    INT15       PROCESS *DMP=*
Line S00001 Modification History
M01 (Added by) 1aj11
M02 (Removed by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11460  M02S00001.1aj119  ---|          UJN    INT15       PROCESS *DMP=*
Line S00003 Modification History
M01 (Added by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11461  M01S00003.1aj119  +++| INT9     UJP    INT15       PROCESS *DMP=*
11462  M00S07283.1aj     +++|
11463  M00S07284.1aj     +++| INT10    LDD    CN+1        CHECK ERROR FLAG
11464  M00S07285.1aj     +++|          ZJN    INT11       IF NO ERROR FLAG
11465  M00S07286.1aj     +++|          LJM    DPP         DROP PPU
11466  M00S07287.1aj     +++|
11467  M00S07288.1aj     +++| INT11    LDD    CW          CHECK *DMP=* JOB
11468  M00S07289.1aj     +++|          SHN    21-4
11469  M00S07290.1aj     +++|          MJN    INT12       IF *DMP=* PRESENT
11470  M00S07291.1aj     +++|          LDD    IR+2
11471  M00S07292.1aj     +++|          LMN    4
11472  M00S07293.1aj     +++|          ZJN    INT13       IF READ FUNCTION
11473  M00S07294.1aj     +++|          LMN    5&4
Line S07295 Modification History
M01 (Removed by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11474  M01S07295.1aj119  ---|          ZJN    INT15       IF EXECUTE FUNCTION
Line S00004 Modification History
M01 (Added by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11475  M01S00004.1aj119  +++|          ZJN    INT9        IF EXECUTE FUNCTION
Line S07296 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11476  M01S07296.v23l617 ---| INT12    LDC    INTA        TCS ILLEGAL REQUEST
Line S00683 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11477  M01S00683.v23l617 +++| INT12    LDC    INTA        TCS INCORRECT REQUEST
Line S07297 Modification History
M01 (Removed by) 1aj12
Seq #  *Modification Id* Act 
----------------------------+
11478  M01S07297.1aj12   ---|          LJM    ERR1        PROCESS ERROR
Line S00001 Modification History
M01 (Added by) 1aj12
Seq #  *Modification Id* Act 
----------------------------+
11479  M01S00001.1aj12   +++|          RJM    DFM
11480  M01S00002.1aj12   +++|          MONITOR  ABTM      ABORT JOB
11481  M01S00003.1aj12   +++|          LJM    PPR
11482  M00S07298.1aj     +++|
Line S00005 Modification History
M01 (Added by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11483  M01S00005.1aj119  +++| INTA     DATA   C* TCS INCORRECT REQUEST.*
11484  M01S00006.1aj119  +++|
11485  M00S07299.1aj     +++| INT13    LDD    IR+3        CHECK ARGUMENT FORMAT
11486  M00S07300.1aj     +++|          SHN    21-13
11487  M00S07301.1aj     +++|          PJN    INT14       IF NOT SCOPE FORMAT
11488  M00S07302.1aj     +++|          LDC    -4000B      CLEAR SCOPE FLAG
11489  M00S07303.1aj     +++|          RAD    IR+3
11490  M00S07304.1aj     +++|          UJN    INT15       PROCESS *DMP=*
11491  M00S07305.1aj     +++|
11492  M00S07306.1aj     +++| INT14    AOM    ARGA        SET KRONOS ARGUMENT CRACKING
11493  M00S07307.1aj     +++|
11494  M00S07308.1aj     +++|*         *DMP=* PROCESSING.
11495  M00S07309.1aj     +++|
11496  M00S07310.1aj     +++| INT15    LDD    IR+2
11497  M00S07311.1aj     +++|          ZJN    INT18       IF MONITOR CALL
11498  M00S07312.1aj     +++|          LMN    2
11499  M00S07313.1aj     +++|          NJN    INT17       IF NOT *DIS* CALL
11500  M00S07314.1aj     +++| INT16    LDD    CW
11501  M00S07315.1aj     +++|          SHN    21-4
11502  M00S07316.1aj     +++|          PJN    INT17       IF NO *DMP=* PRESENT
11503  M00S07317.1aj     +++|          RJM    RAS         RESET AFTER *SSJ=* JOB
11504  M00S07318.1aj     +++|          EXECUTE  3AF
11505  M00S07319.1aj     +++|          LJM    /3AF/RFJ    RESET FORMER JOB
11506  M00S07320.1aj     +++|
Line S07321 Modification History
M01 (Removed by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11507  M01S07321.1aj119  ---| INT17    UJN    INT19       CONTINUE
Line S00007 Modification History
M01 (Added by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11508  M01S00007.1aj119  +++| INT17    UJP    INT21       CONTINUE
11509  M00S07322.1aj     +++|
11510  M00S07323.1aj     +++| INT18    LDD    CP
11511  M00S07324.1aj     +++|          ADC    SPCW        READ CALL WORD
11512  M00S07325.1aj     +++|          CRD    CN
11513  M00S07326.1aj     +++|          CRD    AB
11514  M00S07327.1aj     +++|          LDD    CN+1
11515  M00S07328.1aj     +++|          SHN    21-1
11516  M00S07329.1aj     +++|          PJN    INT16       IF NOT *1RO* COMPLETION
Line S07330 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11517  M01S07330.v23l617 ---|          LDN    0           DISABLE *RFL* ECS CONTROL
Line S00684 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11518  M01S00684.v23l617 +++|          LDN    0           DISABLE *RFL* EXTENDED MEMORY CONTROL
11519  M00S07331.1aj     +++|          STM    RQSB
11520  M00S07332.1aj     +++|          LDC    UJNI+RQS3-RQSC PRESERVE ECS FOR *DMP=* PROGRAM
11521  M00S07333.1aj     +++|          STM    RQSC
11522  M00S07334.1aj     +++|          LDD    CN
11523  M00S07335.1aj     +++|          LMN    77
Line S07336 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11524  M01S07336.v23l617 ---|          ZJN    INT20       IF CONTROL CARD CALL
Line S00685 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11525  M01S00685.v23l617 +++|          ZJN    INT20       IF COMMAND CALL
11526  M00S07337.1aj     +++|          EXECUTE  3AF
11527  M00S07338.1aj     +++|          LJM    /3AF/IDP    INITIALIZE *DMP=* PROGRAM LOAD
11528  M00S07339.1aj     +++|
Line S07340 Modification History
M01 (Removed by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11529  M01S07340.1aj119  ---| INT19    UJP    INT21       CONTINUE
11530  M01S07341.1aj119  ---|
11531  M00S07342.1aj     +++| INT20    LDC    UJNI+BCP19-BCPG
11532  M00S07343.1aj     +++|          STM    BCPG        BYPASS CLEAR OF MEMORY
11533  M00S07344.1aj     +++|          LDD    CP          RESET INPUT REGISTER
11534  M00S07345.1aj     +++|          ADC    SEPW
11535  M00S07346.1aj     +++|          CRD    IR
11536  M00S07347.1aj     +++|          LDD    IR+1
11537  M00S07348.1aj     +++|          SCN    77
11538  M00S07349.1aj     +++|          STD    IR+1
11539  M00S07350.1aj     +++|          LDD    CP
11540  M00S07351.1aj     +++|          SHN    -7
11541  M00S07352.1aj     +++|          RAD    IR+1
11542  M00S07353.1aj     +++|          LDC    BCP3
11543  M00S07354.1aj     +++|          STM    BCPA+1
Line S07355 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11544  M01S07355.273l780 ---|          LDD    IR          CHECK FOR *TCS* CALL
11545  M01S07356.273l780 ---|          LMC    2RTC
11546  M01S07357.273l780 ---|          NJN    INT21       IF NOT *TCS* CALL
11547  M01S07358.273l780 ---|          LDC    LDNI+DPPM
11548  M01S07359.273l780 ---|          STM    DPPA
11549  M01S07360.273l780 ---|          SCN    77
11550  M01S07361.273l780 ---|          STM    RQSH
11551  M01S07362.273l780 ---|          ADK    RECM        PREVENT *JACM* FOR *TCS* RA+1 CALL
11552  M01S07363.273l780 ---|          STM    RQSI
Line S00404 Modification History
M01 (Added by) 242l642
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
11553  M02S00404.273l780 ---|          AOM    SPFB        FLAG JOB ADVANCE NOT SET
11554  M00S07364.1aj     +++| INT21    LDD    IR+2
11555  M00S07365.1aj     +++|          LMN    4
Line S07366 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11556  M01S07366.v23l617 ---|          NJN    INT22       IF NOT CONTROL CARD READ
11557  M01S07367.v23l617 ---|          LJM    RCA         READ CONTROL STATEMENT TO ADDRESS
Line S00686 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11558  M01S00686.v23l617 +++|          NJN    INT22       IF NOT COMMAND READ
11559  M01S00687.v23l617 +++|          LJM    RCA         READ COMMAND TO ADDRESS
11560  M00S07368.1aj     +++|
Line S07369 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11561  M01S07369.v23l617 ---| INT22    RJM    RNC         READ NEXT STATEMENT
11562  M01S07370.v23l617 ---|          RJM    CSL         CHECK STATEMENT LIMIT
Line S00688 Modification History
M01 (Added by) v23l617
M02 (Removed by) 1aj84
Seq #  *Modification Id* Act 
----------------------------+
11563  M02S00688.1aj84   ---| INT22    RJM    RNC         READ NEXT COMMAND
Line S00001 Modification History
M01 (Added by) 1aj84
Seq #  *Modification Id* Act 
----------------------------+
11564  M01S00001.1aj84   +++| INT22    LDD    CP          READ APPLICATION ACCOUNTING CONTROL WORD
11565  M01S00002.1aj84   +++|          ADN    FPFW
11566  M01S00003.1aj84   +++|          CRD    T3
11567  M01S00004.1aj84   +++|          LDD    T3          CHECK FOR ACCOUNTING IN PROCESS
11568  M01S00005.1aj84   +++|          LPC    1400
11569  M01S00006.1aj84   +++|          ZJN    INT22.1     IF APPLICATION ACCOUNTING NOT SET
11570  M01S00007.1aj84   +++|          RJM    IAA         ISSUE APPLICATION ACCOUNTING MESSAGE
Line S00008 Modification History
M01 (Added by) 1aj119
Seq #  *Modification Id* Act 
----------------------------+
11571  M01S00008.1aj119  +++|
11572  M01S00009.1aj119  +++|*         THE CODE FOLLOWING THE *RJM RNC* AT *INT22.1* MUST NOT
11573  M01S00010.1aj119  +++|*         BE DESTROYED WHEN COMMANDS ARE READ.  THE FOLLOWING CODE
11574  M01S00011.1aj119  +++|*         PREVENTS OVERLAP OF THE COMMAND BUFFERS INTO THIS AREA.
11575  M01S00012.1aj119  +++|
11576  M01S00013.1aj119  +++|          IFMI   *-CHARE+2,2
11577  M01S00014.1aj119  +++|          UJN    INT22.1     READ NEXT COMMAND
11578  M01S00015.1aj119  +++|          ORG    CHARE-2     ALLOW ROOM FOR COMMAND BUFFERS
11579  M01S00016.1aj119  +++|
Line S00008 Modification History
M01 (Added by) 1aj84
Seq #  *Modification Id* Act 
----------------------------+
11580  M01S00008.1aj84   +++| INT22.1  RJM    RNC         READ NEXT COMMAND
Line S00689 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11581  M01S00689.v23l617 +++|          RJM    CSL         CHECK COMMAND LIMIT
11582  M00S07371.1aj     +++|          LDM    STMT
Line S07372 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11583  M01S07372.v23l617 ---|          NJN    INT23       IF NOT EMPTY STATEMENT BUFFER
Line S07373 Modification History
M01 (Removed by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11584  M02S07373.v23l617 ---|          RJM    CAT         CLEAR ADDRESS FOR *TCS* EXECUTE STATEMENT
Line S00491 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11585  M02S00491.v23l617 ---| INTB     RJM    CAT         CLEAR ADDRESS FOR *TCS* EXECUTE STATEMENT
11586  M02S00492.v23l617 ---|*         LJM    INT25       (TIMESHARING STATEMENTS MONITORED)
Line S00690 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11587  M01S00690.v23l617 +++|          NJN    INT23       IF NOT EMPTY COMMAND BUFFER
Line S00001 Modification History
M01 (Added by) 1aj99
Seq #  *Modification Id* Act 
----------------------------+
11588  M01S00001.1aj99   +++| INT22.2  BSS    0
Line S00691 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11589  M01S00691.v23l617 +++| INTB     RJM    CAT         CLEAR ADDRESS FOR *TCS* EXECUTE COMMAND
11590  M01S00692.v23l617 +++|*         LJM    INT25       (INTERACTIVE COMMANDS MONITORED)
11591  M00S07374.1aj     +++|          LJM    IST5        STORE POINTERS
11592  M00S07375.1aj     +++|
Line S00025 Modification History
M01 (Added by) ns2738
Seq #  *Modification Id* Act 
----------------------------+
11593  M01S00025.ns2738  +++|*         CLEAR *0ST* SCP FLAG IN EJT ENTRY.
11594  M01S00026.ns2738  +++|
11595  M01S00027.ns2738  +++| INT23    SFA    EJT,JO
11596  M01S00028.ns2738  +++|          ADK    JSNE
11597  M01S00029.ns2738  +++|          CRD    CM
11598  M01S00030.ns2738  +++|          LDD    CM+4
11599  M01S00031.ns2738  +++|          LPC    3777        CLEAR CHECK CONNECTIONS FLAG
11600  M01S00032.ns2738  +++|          STD    CM+4
11601  M01S00033.ns2738  +++|          SFA    EJT,JO
11602  M01S00034.ns2738  +++|          ADK    JSNE
11603  M01S00035.ns2738  +++|          CWD    CM
11604  M01S00036.ns2738  +++|
Line S07376 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
11605  M01S07376.v23l617 ---| INT23    LDN    5           WRITE STATEMENT TO CP BUFFER
Line S00693 Modification History
M01 (Added by) v23l617
M02 (Removed by) 1aj61
Seq #  *Modification Id* Act 
----------------------------+
11606  M02S00693.1aj61   ---| INT23    LDN    5           WRITE COMMAND TO CP BUFFER
Line S07377 Modification History
M01 (Removed by) 1aj61
Seq #  *Modification Id* Act 
----------------------------+
11607  M01S07377.1aj61   ---|          STD    T1
11608  M01S07378.1aj61   ---|          LDD    CP
11609  M01S07379.1aj61   ---|          ADN    MS1W
11610  M01S07380.1aj61   ---|          CWM    STMT,T1
Line S00002 Modification History
M01 (Added by) 1aj11
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
11611  M02S00002.1aj92   ---|
Line S00003 Modification History
M01 (Added by) 1aj11
Seq #  *Modification Id* Act 
----------------------------+
11612  M01S00003.1aj11   +++|*         REWIND PRIMARY FILE.
11613  M01S00004.1aj11   +++|
Line S00005 Modification History
M01 (Added by) 1aj11
M02 (Removed by) 1aj61
Seq #  *Modification Id* Act 
----------------------------+
11614  M02S00005.1aj61   ---|          LDD    CP          READ FST ADDRESS FOR PRIMARY FILE
Line S00008 Modification History
M01 (Added by) 1aj61
M02 (Removed by) ns2738
Seq #  *Modification Id* Act 
----------------------------+
11615  M02S00008.ns2738  ---| INT23    LDD    CP          READ FST ADDRESS FOR PRIMARY FILE
Line S00037 Modification History
M01 (Added by) ns2738
Seq #  *Modification Id* Act 
----------------------------+
11616  M01S00037.ns2738  +++|          LDD    CP          READ FST ADDRESS FOR PRIMARY FILE
Line S00006 Modification History
M01 (Added by) 1aj11
Seq #  *Modification Id* Act 
----------------------------+
11617  M01S00006.1aj11   +++|          ADN    TFSW
11618  M01S00007.1aj11   +++|          CRD    FS
11619  M01S00008.1aj11   +++|          LDD    FS+1
11620  M01S00009.1aj11   +++|          ZJN    INT23.1     IF NO PRIMARY FILE
11621  M01S00010.1aj11   +++|          NFA    FS+1,R      READ FST ENTRY FOR PRIMARY FILE
11622  M01S00011.1aj11   +++|          ADN    FSTL
11623  M01S00012.1aj11   +++|          CRD    CN
11624  M01S00013.1aj11   +++|          LDD    CN+2
11625  M01S00014.1aj11   +++|          ZJN    INT23.1     IF NULL FILE
11626  M01S00015.1aj11   +++|          LDD    CN+1        REWIND FILE
11627  M01S00016.1aj11   +++|          STD    CN+2
11628  M01S00017.1aj11   +++|          LDN    FSMS
11629  M01S00018.1aj11   +++|          STD    CN+3
11630  M01S00019.1aj11   +++|          LDD    CN+4        RESET STATUS
11631  M01S00020.1aj11   +++|          SCN    77
11632  M01S00021.1aj11   +++|          LMN    5
11633  M01S00022.1aj11   +++|          STD    CN+4        SET FILE STATUS BYTE
11634  M01S00023.1aj11   +++|          NFA    FS+1,R      WRITE UPDATED FST ENTRY FOR PRIMARY FILE
11635  M01S00024.1aj11   +++|          ADN    FSTL
11636  M01S00025.1aj11   +++|          CWD    CN
Line S00026 Modification History
M01 (Added by) 1aj11
M02 (Removed by) ns2463
Seq #  *Modification Id* Act 
----------------------------+
11637  M02S00026.ns2463  ---| INT23.1  BSS    0
Line S00040 Modification History
M01 (Added by) ns2463
Seq #  *Modification Id* Act 
----------------------------+
11638  M01S00040.ns2463  +++| INT23.1  LDD    CP          RESET ERROR PROCESSING LIMIT
11639  M01S00041.ns2463  +++|          ADK    ACLW
11640  M01S00042.ns2463  +++|          CRD    CM
11641  M01S00043.ns2463  +++|          LDK    EPRL
11642  M01S00044.ns2463  +++|          STD    CM
11643  M01S00045.ns2463  +++|          LDD    CP
11644  M01S00046.ns2463  +++|          ADK    ACLW
11645  M01S00047.ns2463  +++|          CWD    CM
Line S07381 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
11646  M01S07381.ns21000 ---|          RJM    UPS         UNPACK STATEMENT
Proceed to Part 9