User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:1aj.012

Deck 1AJ Part 012

214 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S10294 Modification History
M01 (Removed by) ns2685
Seq #  *Modification Id* Act 
----------------------------+
15636  M01S10294.ns2685  ---|          ZJN    RCF14       IF ROLLOUT FILE
Line S00005 Modification History
M01 (Added by) ns2685
Seq #  *Modification Id* Act 
----------------------------+
15637  M01S00005.ns2685  +++|          NJN    RCF13.1     IF NOT ROLLOUT FILE
15638  M01S00006.ns2685  +++|          LDD    FS+3        CHECK WRITE LOCKOUT
15639  M01S00007.ns2685  +++|          LPN    1
15640  M01S00008.ns2685  +++|          UJN    RCF13.2     DROP FILE IF NOT WRITE LOCKOUT
15641  M01S00009.ns2685  +++|
15642  M01S00010.ns2685  +++| RCF13.1  LDD    FS+4        CHECK FILE STATUS
15643  M01S00011.ns2685  +++|          LPN    77
15644  M01S00012.ns2685  +++|          LMN    SSST
15645  M01S00013.ns2685  +++| RCF13.2  NJN    RCF14       IF NOT TO DROP FILE
Line S10295 Modification History
M01 (Removed by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
15646  M01S10295.ns2358  ---|          LDN    1           SET *UNLOAD* FILE FLAG FOR *0DF*
15647  M01S10296.ns2358  ---|          STM    ODFL-1
Line S00022 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
15648  M01S00022.ns2358  +++|          LDD    CN
15649  M01S00023.ns2358  +++|          STD    FA          SET RELATIVE FNT ADDRESS IN NFL
15650  M00S10297.1aj     +++|          EXECUTE  0DF,ODFL
15651  M00S10298.1aj     +++| RCF14    LDN    LENF        INCREMENT TO NEXT ENTRY
Line S10299 Modification History
M01 (Removed by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
15652  M01S10299.ns2358  ---|          RAD    FA
Line S00024 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
15653  M01S00024.ns2358  +++|          RAD    CN
15654  M00S10300.1aj     +++|          SBD    CW
15655  M00S10301.1aj     +++|          MJN    RCF13       IF NOT END OF LOCAL FILES
15656  M00S10302.1aj     +++| RCFA     LDN    0
15657  M00S10303.1aj     +++|*         LDN    1           (NOT *SSJ=* SPECIAL FILES OPTION)
15658  M00S10304.1aj     +++|          NJN    RCF15       IF NOT *SSJ=* SPECIAL FILES OPTION
15659  M00S10305.1aj     +++|          LDD    CP          RESTORE VALIDATION PARAMETERS
15660  M00S10306.1aj     +++|          ADN    ALMW
15661  M00S10307.1aj     +++|          CWM    RCFB+ALMS*5,TR
15662  M00S10308.1aj     +++| RCF15    UJN    RCFX        RETURN
15663  M00S10309.1aj     +++|
15664  M00S10310.1aj     +++| RCFB     BSS    SSJL*5+1*5  CONTROL POINT AREA BUFFER
Line S10311 Modification History
M01 (Removed by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
15665  M01S10311.ns2358  ---| ODFL     EQU    *+5         *0DF* LOAD ADDRESS
15666  M00S10312.1aj     +++|
15667  M00S10313.1aj     +++| RCF      SUBR               ENTRY/EXIT
15668  M00S10314.1aj     +++|          STD    T1          JOB IS BOTH *SSJ=* AND *DMP=* FLAG
15669  M00S10315.1aj     +++|          LDD    CP
Line S10316 Modification History
M01 (Removed by) ns2392
Seq #  *Modification Id* Act 
----------------------------+
15670  M01S10316.ns2392  ---|          ADC    SEPW        READ SPECIAL ENTRY POINT WORD
Line S00001 Modification History
M01 (Added by) ns2392
Seq #  *Modification Id* Act 
----------------------------+
15671  M01S00001.ns2392  +++|          ADK    SRUW        CLEAR IGNORE LIMITS FLAG
15672  M01S00002.ns2392  +++|          CRD    CW
15673  M01S00003.ns2392  +++|          ADK    SEPW-SRUW
15674  M00S10317.1aj     +++|          CRD    CM
15675  M00S10318.1aj     +++|          CRD    FS
Line S00004 Modification History
M01 (Added by) ns2392
Seq #  *Modification Id* Act 
----------------------------+
15676  M01S00004.ns2392  +++|          LDD    CW
15677  M01S00005.ns2392  +++|          SCN    40
15678  M01S00006.ns2392  +++|          STD    CW
15679  M01S00007.ns2392  +++|          LDD    CP
15680  M01S00008.ns2392  +++|          ADK    SRUW
15681  M01S00009.ns2392  +++|          CWD    CW
15682  M00S10319.1aj     +++|          LDD    FS          CLEAR *SSJ=* FLAG
15683  M00S10320.1aj     +++|          SCN    4
15684  M00S10321.1aj     +++|          STD    FS
15685  M00S10322.1aj     +++|          LDD    T1
15686  M00S10323.1aj     +++|          NJN    RCF1        IF JOB IS BOTH *SSJ=* AND *DMP=*
15687  M00S10324.1aj     +++|          LDN    ZERL        JOB IS ONLY *SSJ=*, CLEAR *SEPW*
15688  M00S10325.1aj     +++|          CRD    FS
15689  M00S10326.1aj     +++| RCF1     LDN    SSJL
15690  M00S10327.1aj     +++|          STD    T1
15691  M00S10328.1aj     +++|          LDD    CM+3+SSJP*  CHECK IF *SSJ=* BLOCK PRESENT
15692  M00S10329.1aj     +++|          LPN    37
15693  M00S10330.1aj     +++|          ADD    CM+4
15694  M00S10331.1aj     +++|          NJN    RCF2        IF *SSJ=* BLOCK PRESENT
15695  M00S10332.1aj     +++|          LJM    RCF9        NO *SSJ=* BLOCK PRESENT
15696  M00S10333.1aj     +++|
15697  M00S10334.1aj     +++| RCF2     LDD    CP
15698  M00S10335.1aj     +++|          ADC    SPCW
15699  M00S10336.1aj     +++|          CRD    CN
15700  M00S10337.1aj     +++|          LDD    CN+1
15701  M00S10338.1aj     +++|          SHN    21-0
15702  M00S10339.1aj     +++|          PJN    RCF3        IF NOT DMP=/SSJ= JOB CALLED BY SSJ= JOB
15703  M00S10340.1aj     +++|          NFA    SSDN        RESTORE *DMP=* PARAMETERS
15704  M00S10341.1aj     +++|          UJN    RCF4        RESTORE PARAMETERS
15705  M00S10342.1aj     +++|
15706  M00S10343.1aj     +++| RCF3     NFA    SSJN
15707  M00S10344.1aj     +++| RCF4     CRM    RCFB,T1
Line S10345 Modification History
M01 (Removed by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
15708  M01S10345.ns2323  ---|          LDD    CM          CHECK IF *VAL=* JOB
15709  M01S10346.ns2323  ---|          SHN    21-1
15710  M01S10347.ns2323  ---|          PJN    RCF6        IF NOT *VAL=* JOB
15711  M01S10348.ns2323  ---|          LDD    CM+3+SSJP*  READ *SSJ=* BLOCK FROM USER FL
15712  M01S10349.ns2323  ---|          LPN    37
15713  M01S10350.ns2323  ---|          SHN    14
15714  M01S10351.ns2323  ---|          ADD    CM+4
15715  M01S10352.ns2323  ---|          ADN    SSJL-1
15716  M01S10353.ns2323  ---|          SHN    -6
15717  M01S10354.ns2323  ---|          SBD    FL
15718  M01S10355.ns2323  ---|          MJN    RCF5        IF NOT BEYOND FL
15719  M01S10356.ns2323  ---|          LDN    SYET        SET SYSTEM ERROR
15720  M01S10357.ns2323  ---|          STD    CM+1
15721  M01S10358.ns2323  ---|          MONITOR  CEFM
15722  M01S10359.ns2323  ---|          UJN    RCF6        USE *SSJ=* BLOCK FROM NFL
15723  M01S10360.ns2323  ---|
15724  M01S10361.ns2323  ---| RCF5     LDA    CM+3,M      RESTORE PARAMETERS
15725  M01S10362.ns2323  ---|          CRM    RCFB,T1
15726  M01S10363.ns2323  ---| RCF6     LDD    CP
Line S00219 Modification History
M01 (Added by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
15727  M01S00219.ns2323  +++|          LDD    CP          READ USER IDENTIFICATION
15728  M00S10364.1aj     +++|          ADN    UIDW        USER IDENTIFICATION
15729  M00S10365.1aj     +++|          CWM    RCFB+UIDS*5,ON
15730  M00S10366.1aj     +++|          ADN    SEPW-UIDW-1 CLEAR SPECIAL ENTRY POINTS
15731  M00S10367.1aj     +++|          CWD    FS
Line S00242 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
15732  M02S00242.ns2323  ---|          ADK    CSPW-SEPW   SET PRIMARY USER / PRIMARY CHARGE FLAGS
15733  M02S00243.ns2323  ---|          CRD    CM
15734  M02S00244.ns2323  ---|          LDM    RCFB+SPPS*5+0
15735  M02S00245.ns2323  ---|          LMD    CM
15736  M02S00246.ns2323  ---|          LPN    6
15737  M02S00247.ns2323  ---|          LMD    CM
15738  M02S00248.ns2323  ---|          STD    CM
15739  M02S00249.ns2323  ---|          LDD    CP
15740  M02S00250.ns2323  ---|          ADK    CSPW
15741  M02S00251.ns2323  ---|          CWD    CM
15742  M00S10368.1aj     +++|          LDM    RCFB+4      CHECK SUBSYSTEM IDENTIFICATION
15743  M00S10369.1aj     +++|          SBK    LSSI+1
15744  M00S10370.1aj     +++|          PJN    RCF7        IF SUBSYSTEM
15745  M00S10371.1aj     +++|          LDN    0           SET END OF JOB STEP
15746  M00S10372.1aj     +++|          RJM    SPR         SET PRIORITIES
Line S10373 Modification History
M01 (Removed by) 1aj35
Seq #  *Modification Id* Act 
----------------------------+
15747  M01S10373.1aj35   ---|          LDD    CP          READ SPECIAL CALL WORD
Line S00001 Modification History
M01 (Added by) 1aj35
Seq #  *Modification Id* Act 
----------------------------+
15748  M01S00001.1aj35   +++| RCF7     LDD    CP          READ SPECIAL CALL WORD
15749  M00S10374.1aj     +++|          ADC    SPCW
15750  M00S10375.1aj     +++|          CRD    CM
15751  M00S10376.1aj     +++|          LDD    CM+1
15752  M00S10377.1aj     +++|          SHN    21-0
15753  M00S10378.1aj     +++|          MJN    RCF8        IF *DMP=*, *SSJ=* JOB CALLED BY *SSJ=* JOB
Line S10379 Modification History
M01 (Removed by) 1aj35
Seq #  *Modification Id* Act 
----------------------------+
15754  M01S10379.1aj35   ---| RCF7     LJM    RCF12       DROP ALL FILES WITH SPECIAL ID
Line S00002 Modification History
M01 (Added by) 1aj35
Seq #  *Modification Id* Act 
----------------------------+
15755  M01S00002.1aj35   +++|          LJM    RCF12       DROP ALL FILES WITH SPECIAL FILE STATUS
15756  M00S10380.1aj     +++|
15757  M00S10381.1aj     +++| RCF8     LJM    RCFX        RETURN
Line S10382 Modification History
M01 (Removed by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
15758  M01S10382.ns2358  ---|
Line S00025 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
15759  M01S00025.ns2358  +++|          SPACE  4,10
15760  M01S00026.ns2358  +++| ODFL     EQU    RCF+2       *0DF* LOAD ADDRESS
15761  M00S10383.1aj     +++|          ERRNG  BFMS-ODFL-ZDFL
15762  M00S10384.1aj     +++| PSR      SPACE  4,15
15763  M00S10385.1aj     +++|**        PSR - PROCESS SPECIAL PROCESSOR REQUEST.
15764  M00S10386.1aj     +++|*
15765  M00S10387.1aj     +++|*         PROCESSES *DMP=* REQUEST.
15766  M00S10388.1aj     +++|*
15767  M00S10389.1aj     +++|*         ENTRY  (AB - AB+1) = PST ADDRESS.
15768  M00S10390.1aj     +++|*
15769  M00S10391.1aj     +++|*         EXIT   TO *CSR10* IF *SPCW* CALL ERROR.
15770  M00S10392.1aj     +++|*                TO *DPP* IF ERROR FLAG SET.
15771  M00S10393.1aj     +++|*                TO *CPP* TO ROLLOUT JOB.
15772  M00S10394.1aj     +++|*
15773  M00S10395.1aj     +++|*         USES   AB - AB+4, CM - CM+4, CN - CN+4, FS - FS+4,
15774  M00S10396.1aj     +++|*                SP - SP+4, T1 - T6.
15775  M00S10397.1aj     +++|*
15776  M00S10398.1aj     +++|*         CALLS  *1RO*.
15777  M00S10399.1aj     +++|*
15778  M00S10400.1aj     +++|*         MACROS DELAY, EXECUTE, MONITOR, PAUSE.
15779  M00S10401.1aj     +++|
15780  M00S10402.1aj     +++|
15781  M00S10403.1aj     +++| PSR      BSS    0           ENTRY
15782  M00S10404.1aj     +++|          LDD    AB+1        SET PST ADDRESS
15783  M00S10405.1aj     +++|          SHN    14
15784  M00S10406.1aj     +++|          LMD    AB+2
15785  M00S10407.1aj     +++|          CRD    CM          READ LIBRARY CONTROL WORD
15786  M00S10408.1aj     +++|          ADN    1           READ SPECIAL ENTRY POINT WORD
15787  M00S10409.1aj     +++|          CRD    CN
15788  M00S10410.1aj     +++|          LDD    CM+1        CHECK CONTROL WORD FLAGS
15789  M00S10411.1aj     +++|          SHN    21-10
15790  M00S10412.1aj     +++|          PJN    PSR1        IF NO SPECIAL ENTRY POINTS
15791  M00S10413.1aj     +++|          LDD    CN          CHECK FOR *DMP=* ENTRY POINT
15792  M00S10414.1aj     +++|          SHN    21-4
15793  M00S10415.1aj     +++|          MJN    PSR3        IF *DMP=* PRESENT
15794  M00S10416.1aj     +++| PSR1     LJM    CSR10       ISSUE SPCW CALL ERROR
15795  M00S10417.1aj     +++|
15796  M00S10418.1aj     +++| PSR2     LDD    CP
15797  M00S10419.1aj     +++|          ADN    TERW
15798  M00S10420.1aj     +++|          CRD    CN
15799  M00S10421.1aj     +++|          CRD    AB
15800  M00S10422.1aj     +++|          LDN    0
15801  M00S10423.1aj     +++|          STD    AB+3
15802  M00S10424.1aj     +++|          STD    AB+4
15803  M00S10425.1aj     +++|          LDD    AB+2
15804  M00S10426.1aj     +++|          SCN    77
15805  M00S10427.1aj     +++|          STD    AB+2
15806  M00S10428.1aj     +++|          LDD    CP
15807  M00S10429.1aj     +++|          ADN    TERW
15808  M00S10430.1aj     +++|          CWD    AB
15809  M00S10431.1aj     +++|          LDD    CN+3        POSITION *DMP=* PARAMETER
15810  M00S10432.1aj     +++|          STD    CN+2
15811  M00S10433.1aj     +++|          LDD    CN+4
15812  M00S10434.1aj     +++|          STD    CN+3
Line S10435 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
15813  M01S10435.271l750 ---| PSR3     LDD    CP          SET SPECIAL PROCESSOR FIELD LENGTH
15814  M01S10436.271l750 ---|          ADN    JCIW
15815  M01S10437.271l750 ---|          CRD    SP
15816  M01S10438.271l750 ---|          ADN    FLSW-JCIW
Line S00104 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
15817  M01S00104.271l750 +++| PSR3     LDD    CP          READ FIELD LENGTH STATUS WORDS
15818  M01S00105.271l750 +++|          ADN    FLSW
15819  M00S10439.1aj     +++|          CRD    FS
15820  M00S10440.1aj     +++|          ADN    ECSW-FLSW
15821  M00S10441.1aj     +++|          CRD    T2
Line S10442 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
15822  M01S10442.271l750 ---|          ADN    SEPW-ECSW   READ SPECIAL ENTRY POINT WORDS
Line S00106 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
15823  M01S00106.271l750 +++|          ADN    JCIW-ECSW   READ JOB CONTROL WORD
15824  M01S00107.271l750 +++|          CRD    SP
15825  M01S00108.271l750 +++|          ADN    SEPW-JCIW   READ SPECIAL ENTRY POINT WORDS
15826  M00S10443.1aj     +++|          CRD    T1
Line S10444 Modification History
M01 (Removed by) ns2287
Seq #  *Modification Id* Act 
----------------------------+
15827  M01S10444.ns2287  ---|          ADN    SPCW-SEPW
15828  M01S10445.ns2287  ---|          CRD    CM
15829  M01S10446.ns2287  ---|          ADN    PPDW-SPCW   READ PPU DUMP WORD
Line S00001 Modification History
M01 (Added by) ns2287
Seq #  *Modification Id* Act 
----------------------------+
15830  M01S00001.ns2287  +++|          ADN    PPDW-SEPW   READ PP DUMP WORD
15831  M00S10447.1aj     +++|          CRD    AB
15832  M00S10448.1aj     +++|          LDD    T2+4
15833  M00S10449.1aj     +++|          STD    AB+1
15834  M00S10450.1aj     +++|
15835  M00S10451.1aj     +++|*         CHECK FOR SPECIAL CASE WHEN SUBSYSTEM REDUCES ITS FL BELOW
Line S10452 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
15836  M01S10452.v23l617 ---|*         *MCMX* AND ECS IS ASSIGNED.
Line S00804 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
15837  M01S00804.v23l617 +++|*         *MCMX* AND EXTENDED MEMORY IS ASSIGNED.
15838  M00S10453.1aj     +++|
15839  M00S10454.1aj     +++|          LDC    MCMX/100
15840  M00S10455.1aj     +++|          STD    T7
15841  M00S10456.1aj     +++|          LDD    SP+2        CHECK SSID
15842  M00S10457.1aj     +++|          SBK    LSSI+1
15843  M00S10458.1aj     +++|          MJN    PSR6        IF NOT SUBSYSTEM
15844  M00S10459.1aj     +++|          LDD    T2+4
Line S10460 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
15845  M01S10460.v23l617 ---|          ZJN    PSR6        IF NO ECS ASSIGNED
Line S00805 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
15846  M01S00805.v23l617 +++|          ZJN    PSR6        IF NO EXTENDED MEMORY ASSIGNED
15847  M00S10461.1aj     +++|          LDD    FS+4
15848  M00S10462.1aj     +++|          SBD    T7
15849  M00S10463.1aj     +++|          PJN    PSR6        IF ENOUGH FL
15850  M00S10464.1aj     +++| PSR4     DELAY
15851  M00S10465.1aj     +++|          PAUSE
15852  M00S10466.1aj     +++|          LDD    CM+1
15853  M00S10467.1aj     +++|          ZJN    PSR5        IF NO ERROR FLAG
15854  M00S10468.1aj     +++|          LJM    DPP         DROP PP
15855  M00S10469.1aj     +++|
15856  M00S10470.1aj     +++| PSR5     STD    CM+2        REQUEST FL
15857  M00S10471.1aj     +++|          LDD    T7
15858  M00S10472.1aj     +++|          STD    CM+1
15859  M00S10473.1aj     +++|          STD    FS+4
15860  M00S10474.1aj     +++|          MONITOR  RSTM
15861  M00S10475.1aj     +++|          LDD    CM+1
15862  M00S10476.1aj     +++|          NJN    PSR4        IF FL NOT AVAILABLE
Line S10477 Modification History
M01 (Removed by) ns2287
Seq #  *Modification Id* Act 
----------------------------+
15863  M01S10477.ns2287  ---| PSR6     LDD    FS+4
Line S00002 Modification History
M01 (Added by) ns2287
Seq #  *Modification Id* Act 
----------------------------+
15864  M01S00002.ns2287  +++| PSR6     LDD    CP
15865  M01S00003.ns2287  +++|          ADK    SPCW
15866  M01S00004.ns2287  +++|          CRD    CM
15867  M01S00005.ns2287  +++|          LDD    FS+4
15868  M00S10478.1aj     +++|          STD    AB+2
15869  M00S10479.1aj     +++|          LDD    CM+1        SET *DMP=* ACTIVE AND *1RO* CALLED
15870  M00S10480.1aj     +++|          SCN    43
15871  M00S10481.1aj     +++|          LMN    42
15872  M00S10482.1aj     +++|          STD    CM+1
15873  M00S10483.1aj     +++|          LDD    CM
15874  M00S10484.1aj     +++|          LMN    77
Line S10485 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
15875  M01S10485.v23l617 ---|          ZJN    PSR7        IF CONTROL STATEMENT *DMP=* CALL
Line S00806 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
15876  M01S00806.v23l617 +++|          ZJN    PSR7        IF COMMAND *DMP=* CALL
15877  M00S10486.1aj     +++|          LDD    T1
15878  M00S10487.1aj     +++|          SHN    21-2
15879  M00S10488.1aj     +++|          PJN    PSR7        IF NOT CALLED BY *SSJ=* JOB
15880  M00S10489.1aj     +++|          AOD    CM+1        SET CALLED BY *SSJ=* JOB FLAG
15881  M00S10490.1aj     +++| PSR7     LDD    CP          WRITE SPECIAL CALL WORD
15882  M00S10491.1aj     +++|          ADC    SPCW
15883  M00S10492.1aj     +++|          CWD    CM
15884  M00S10493.1aj     +++|          ADN    PPDW-SPCW   WRITE PPU DUMP WORD
15885  M00S10494.1aj     +++|          CWD    AB
15886  M00S10495.1aj     +++|          LDN    1           *DMP=* FUNCTION
15887  M00S10496.1aj     +++|          STD    IR+2
15888  M00S10497.1aj     +++|          LDD    CN+3        SET *DMP=* PARAMETER
15889  M00S10498.1aj     +++|          SCN    77
15890  M00S10499.1aj     +++|          SHN    6
15891  M00S10500.1aj     +++|          LMD    CN+2
15892  M00S10501.1aj     +++|          SHN    6
15893  M00S10502.1aj     +++|          STD    IR+4
15894  M00S10503.1aj     +++|          SHN    -14
15895  M00S10504.1aj     +++|          STD    IR+3
15896  M00S10505.1aj     +++|          MONITOR  DCPM
15897  M00S10506.1aj     +++|          LDD    CM+1
15898  M00S10507.1aj     +++|          ZJN    PSR8        IF NO CPU ACTIVITY
15899  M00S10508.1aj     +++|
15900  M00S10509.1aj     +++|*         THE FOLLOWING CODE IS NEEDED ONLY FOR CALLS FROM *DIS*
15901  M00S10510.1aj     +++|*         LIKE PROCESSORS.
15902  M00S10511.1aj     +++|
15903  M00S10512.1aj     +++|          LDN    1           SET CPU ACTIVITY
15904  M00S10513.1aj     +++|          STD    CM+1
15905  M00S10514.1aj     +++|          LDN    0
15906  M00S10515.1aj     +++|          STD    CM+2
15907  M00S10516.1aj     +++|          LDD    MA
15908  M00S10517.1aj     +++|          CWM    PSRA,ON
15909  M00S10518.1aj     +++|          MONITOR  UADM      UPDATE CONTROL POINT AREA WORD
15910  M00S10519.1aj     +++| PSR8     EXECUTE  1RO,*
15911  M00S10520.1aj     +++|          LJM    CPP         CALL *1RO*
15912  M00S10521.1aj     +++|
15913  M00S10522.1aj     +++|
15914  M00S10523.1aj     +++|*         *UADM* PARAMETERS.
15915  M00S10524.1aj     +++|
15916  M00S10525.1aj     +++| PSRA     CON    CSFS        SET CONTROL POINT AREA FIELD
15917  M00S10526.1aj     +++|          CON    STSW        WORD CONTAINING FIELD
Line S10527 Modification History
M01 (Removed by) 1aj71
Seq #  *Modification Id* Act 
----------------------------+
15918  M01S10527.1aj71   ---|          CON    25*100+1    POSITION AND WIDTH OF FIELD
Line S00002 Modification History
M01 (Added by) 1aj71
Seq #  *Modification Id* Act 
----------------------------+
15919  M01S00002.1aj71   +++|          CON    25D*100+1   POSITION AND WIDTH OF FIELD
15920  M00S10528.1aj     +++|          CON    0
15921  M00S10529.1aj     +++|          CON    1           SET FIELD TO 1
Line S10530 Modification History
M01 (Removed by) ns2738c
Seq #  *Modification Id* Act 
----------------------------+
15922  M01S10530.ns2738c ---| RFJ      SPACE  4,10
Line S00001 Modification History
M01 (Added by) ns2738c
Seq #  *Modification Id* Act 
----------------------------+
15923  M01S00001.ns2738c +++| RFJ      SPACE  4,12
15924  M00S10531.1aj     +++|**        RFJ - RESET FORMER JOB.
15925  M00S10532.1aj     +++|*
15926  M00S10533.1aj     +++|*         ENTRY  IF *DMP=* JOB TO BE RESTARTED.
15927  M00S10534.1aj     +++|*
15928  M00S10535.1aj     +++|*         EXIT   TO */TCS/CPP* TO CALL *1RI* FOR *DMP=* ROLLIN.
15929  M00S10536.1aj     +++|*                TO */TCS/DPP* TO DROP PP.
15930  M00S10537.1aj     +++|*
15931  M00S10538.1aj     +++|*         USES   T1, CM - CM+4, CN - CN+4, FN - FN+4, FS - FS+4.
15932  M00S10539.1aj     +++|*
Line S10540 Modification History
M01 (Removed by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
15933  M01S10540.ns2578  ---|*         CALLS  /TCS/RQS, /TCS/SAF, *1RI*.
Line S00011 Modification History
M01 (Added by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
15934  M01S00011.ns2578  +++|*         CALLS  /TCS/RQS, SAF, *1RI*.
15935  M00S10541.1aj     +++|*
Line S10542 Modification History
M01 (Removed by) ns2738c
Seq #  *Modification Id* Act 
----------------------------+
15936  M01S10542.ns2738c ---|*         MACROS EXECUTE, NFA.
Line S00002 Modification History
M01 (Added by) ns2738c
Seq #  *Modification Id* Act 
----------------------------+
15937  M01S00002.ns2738c +++|*         MACROS EXECUTE, NFA, SFA.
15938  M00S10543.1aj     +++|
15939  M00S10544.1aj     +++|
Line S10545 Modification History
M01 (Removed by) ns2738c
Seq #  *Modification Id* Act 
----------------------------+
15940  M01S10545.ns2738c ---| RFJ      BSS    0
Line S00003 Modification History
M01 (Added by) ns2738c
Seq #  *Modification Id* Act 
----------------------------+
15941  M01S00003.ns2738c +++| RFJ      BSS    0           ENTRY
15942  M00S10546.1aj     +++|          LDD    CP
15943  M00S10547.1aj     +++|          ADC    SPCW
15944  M00S10548.1aj     +++|          CRD    CN
15945  M00S10549.1aj     +++|          SBN    SPCW-SEPW
15946  M00S10550.1aj     +++|          CRD    CM
15947  M00S10551.1aj     +++|          LDD    CM+2        CHECK FOR RESTART
15948  M00S10552.1aj     +++|          SHN    21-13
15949  M00S10553.1aj     +++|          MJN    RFJ3        IF RESTART
15950  M00S10554.1aj     +++|          LDD    IR+3        CHECK PARAMETER BLOCK MOVED
15951  M00S10555.1aj     +++|          LMN    1
15952  M00S10556.1aj     +++|          ZJN    RFJ2        IF PARAMETER BLOCK MOVED
15953  M00S10557.1aj     +++|          LDD    FL
15954  M00S10558.1aj     +++|          ZJN    RFJ2        IF NO FL
15955  M00S10559.1aj     +++|          LDN    1
15956  M00S10560.1aj     +++|          STD    T1
15957  M00S10561.1aj     +++|          LDD    CN+1
15958  M00S10562.1aj     +++|          SHN    21-3
15959  M00S10563.1aj     +++|          MJN    RFJ1        IF NO PARAMETER BLOCK
15960  M00S10564.1aj     +++|          LDD    CN+3
15961  M00S10565.1aj     +++|          LPN    37
15962  M00S10566.1aj     +++|          ADD    CN+4
15963  M00S10567.1aj     +++|          ZJN    RFJ1        IF NO PARAMETER BLOCK ADDRESS
Line S10568 Modification History
M01 (Removed by) ns2334
Seq #  *Modification Id* Act 
----------------------------+
15964  M01S10568.ns2334  ---|          LDN    21          PROCESS *DMP=* COMPLETION
Line S00001 Modification History
M01 (Added by) ns2334
Seq #  *Modification Id* Act 
----------------------------+
15965  M01S00001.ns2334  +++|          LDN    DMPL        PROCESS *DMP=* COMPLETION
15966  M00S10569.1aj     +++|          STD    T1
15967  M00S10570.1aj     +++| RFJ1     BSS    0
15968  M00S10571.1aj     +++|          LDD    RA          MOVE PARAMETER BLOCK
15969  M00S10572.1aj     +++|          SHN    6
15970  M00S10573.1aj     +++|          ADN    SPPR
15971  M00S10574.1aj     +++|          CRM    BUF,T1
15972  M00S10575.1aj     +++|          NFA    DMPN        STORE PARAMETER BLOCK
15973  M00S10576.1aj     +++|          CWM    BUF,T1
15974  M00S10577.1aj     +++| RFJ2     LDD    CM+2
15975  M00S10578.1aj     +++|          SHN    21-13
15976  M00S10579.1aj     +++| RFJ3     MJN    RFJ4        IF RESTART
15977  M00S10580.1aj     +++|          LDD    CP
15978  M00S10581.1aj     +++|          ADC    PPDW        PPU DUMP WORD
15979  M00S10582.1aj     +++|          CRD    FN
15980  M00S10583.1aj     +++|          LDD    FN+2        SET FL
15981  M00S10584.1aj     +++|          STM    /TCS/RQSD
15982  M00S10585.1aj     +++|          LDD    FN+1        SET FLE
15983  M00S10586.1aj     +++|          STM    /TCS/RQSE
15984  M00S10587.1aj     +++|          AOM    /TCS/RQSA   FLAG *DMP=* PROCESSING
15985  M00S10588.1aj     +++|          LDN    1           FLAG PARAMETER BLOCK MOVED
15986  M00S10589.1aj     +++|          STD    IR+3
15987  M00S10590.1aj     +++|          RJM    /TCS/RQS    REQUEST STORAGE
15988  M00S10591.1aj     +++| RFJ4     LDN    ZERL
15989  M00S10592.1aj     +++|          CRD    FN
15990  M00S10593.1aj     +++|          LDC    3R*DM       FIND *DMP=* FILE
15991  M00S10594.1aj     +++|          STD    FN
15992  M00S10595.1aj     +++|          SHN    -6
15993  M00S10596.1aj     +++|          SCN    77
15994  M00S10597.1aj     +++|          STD    FN+1
Line S10598 Modification History
M01 (Removed by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
15995  M01S10598.ns2578  ---|          RJM    /TCS/SAF    SEARCH FOR ASSIGNED FILE
Line S00012 Modification History
M01 (Added by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
15996  M01S00012.ns2578  +++|          RJM    SAF         SEARCH FOR ASSIGNED FILE
15997  M00S10599.1aj     +++|          LDD    FA
15998  M00S10600.1aj     +++|          NJN    RFJ6        IF FILE FOUND
15999  M00S10601.1aj     +++| RFJ5     LDN    ZERL
16000  M00S10602.1aj     +++|          CRD    FS
16001  M00S10603.1aj     +++|          LDD    CP
16002  M00S10604.1aj     +++|          ADC    SEPW        CLEAR ENTRY POINTS
16003  M00S10605.1aj     +++|          CWD    FS
16004  M00S10606.1aj     +++|          ADN    SPCW-SEPW   CLEAR SPECIAL CALL
16005  M00S10607.1aj     +++|          CWD    FS
Line S00004 Modification History
M01 (Added by) ns2738c
Seq #  *Modification Id* Act 
----------------------------+
16006  M01S00004.ns2738c +++|          SFA    EJT,JO
16007  M01S00005.ns2738c +++|          ADK    SCHE
16008  M01S00006.ns2738c +++|          CRD    CM
16009  M01S00007.ns2738c +++|          LDD    CM+2
16010  M01S00008.ns2738c +++|          LPC    7377        CLEAR *DMP=* ROLLOUT COMPLETE
16011  M01S00009.ns2738c +++|          STD    CM+2
16012  M01S00010.ns2738c +++|          SFA    EJT,JO
16013  M01S00011.ns2738c +++|          ADK    SCHE
16014  M01S00012.ns2738c +++|          CWD    CM
16015  M00S10608.1aj     +++|          LJM    /TCS/DPP    DROP PPU
16016  M00S10609.1aj     +++|
16017  M00S10610.1aj     +++| RFJ6     STD    IR+4
16018  M00S10611.1aj     +++|          NFA    FA,R
16019  M00S10612.1aj     +++|          ADN    FSTL
16020  M00S10613.1aj     +++|          CRD    FN          CHECK FST ENTRY
16021  M00S10614.1aj     +++|          LDD    FN+2
16022  M00S10615.1aj     +++|          ZJN    RFJ5        IF FILE NOT USED
16023  M00S10616.1aj     +++|          LDN    1
16024  M00S10617.1aj     +++|          STD    IR+2
16025  M00S10618.1aj     +++|          EXECUTE  1RI,*
16026  M00S10619.1aj     +++|          LJM    /TCS/CPP    CALL *1RI*
16027  M00S10620.1aj     +++| SDP      SPACE  4,10
16028  M00S10621.1aj     +++|**        SDP - START-UP *DMP=* JOB.
16029  M00S10622.1aj     +++|*
16030  M00S10623.1aj     +++|*         ENTRY  UPON RETURN FROM *1RO* AT *DMP=* ROLLOUT COMPLETION.
16031  M00S10624.1aj     +++|*
16032  M00S10625.1aj     +++|*         USES   T1, T2, CN - CN+4.
16033  M00S10626.1aj     +++|*
16034  M00S10627.1aj     +++|*         CALLS  TCA.
16035  M00S10628.1aj     +++|*
16036  M00S10629.1aj     +++|*         MACROS MONITOR, NFA.
16037  M00S10630.1aj     +++|
16038  M00S10631.1aj     +++|
16039  M00S10632.1aj     +++| SDP      LDM    /TCS/CSEB
16040  M00S10633.1aj     +++|          SHN    21-2
16041  M00S10634.1aj     +++|          PJN    SDP1        IF NO *SSJ=*
16042  M00S10635.1aj     +++|          RJM    TCA         TRANSFER CONTROL POINT AREAS
Line S10636 Modification History
M01 (Removed by) ns2334
Seq #  *Modification Id* Act 
----------------------------+
16043  M01S10636.ns2334  ---| SDP1     LDN    20
Line S00002 Modification History
M01 (Added by) ns2334
Seq #  *Modification Id* Act 
----------------------------+
16044  M01S00002.ns2334  +++| SDP1     LDN    DMPL-1
16045  M00S10637.1aj     +++|          STD    T1
16046  M00S10638.1aj     +++|          LDD    CP
16047  M00S10639.1aj     +++|          ADC    SEPW        SET ENTRY POINTS
16048  M00S10640.1aj     +++|          CRD    CM          GET PREVIOUS PROGRAM SPECIAL ENTRY POINTS
16049  M00S10641.1aj     +++|          CWM    /TCS/CSEB,ON
16050  M00S10642.1aj     +++|          ADN    SPCW-SEPW-1 STORE CALL WORD
16051  M00S10643.1aj     +++|          STD    T2
16052  M00S10644.1aj     +++|          CRD    CN
16053  M00S10645.1aj     +++|          CRM    BUF,ON
16054  M00S10646.1aj     +++|          NFA    DMPN
16055  M00S10647.1aj     +++|          CRM    BUF+5,T1
16056  M00S10648.1aj     +++|          LDD    CN+1        CLEAR *1RO* CALLED
16057  M00S10649.1aj     +++|          SCN    2
16058  M00S10650.1aj     +++|          STD    CN+1
16059  M00S10651.1aj     +++|          LDN    0           CLEAR FIRST PARAMETER
16060  M00S10652.1aj     +++|          STD    CN+2
16061  M00S10653.1aj     +++|          LDD    CN+3
16062  M00S10654.1aj     +++|          LPN    77
16063  M00S10655.1aj     +++|          STD    CN+3
16064  M00S10656.1aj     +++|          LDD    T2
16065  M00S10657.1aj     +++|          CWD    CN
16066  M00S10658.1aj     +++|          LDN    ZERL
16067  M00S10659.1aj     +++|          CRD    CN
16068  M00S10660.1aj     +++|          LDM    BUF+1       CLEAR *SSJ=* PARAMETER BLOCK FLAG
16069  M00S10661.1aj     +++|          SCN    2
16070  M00S10662.1aj     +++|          STM    BUF+1
16071  M00S10663.1aj     +++|          LDD    CM+3        CHECK IF *SSJ=* BLOCK DEFINED
16072  M00S10664.1aj     +++|          LPN    37
16073  M00S10665.1aj     +++|          ADD    CM+4
16074  M00S10666.1aj     +++|          ZJN    SDP2        IF NO *SSJ=* PARAMETER BLOCK
16075  M00S10667.1aj     +++|          LDN    2           SET *SSJ=* PARAMETER BLOCK FLAG
16076  M00S10668.1aj     +++|          RAM    BUF+1
Line S10669 Modification History
M01 (Removed by) ns2266
Seq #  *Modification Id* Act 
----------------------------+
16077  M01S10669.ns2266  ---| SDP2     AOD    T1
Line S00020 Modification History
M01 (Added by) ns2266
Seq #  *Modification Id* Act 
----------------------------+
16078  M01S00020.ns2266  +++| SDP2     LDM    /TCS/CSEB+2 CHECK IF *OVERRIDE REQUIRED* BIT NEEDED
16079  M01S00021.ns2266  +++|          SHN    21-12
16080  M01S00022.ns2266  +++|          PJN    SDP3        IF *OVERRIDE REQUIRED* BIT NOT TO BE SET
16081  M01S00023.ns2266  +++|          LDD    CP          SET *OVERRIDE REQUIRED* BIT
16082  M01S00024.ns2266  +++|          ADN    SNSW
16083  M01S00025.ns2266  +++|          CRD    CM
16084  M01S00026.ns2266  +++|          LDD    CM
16085  M01S00027.ns2266  +++|          LPC    6777
16086  M01S00028.ns2266  +++|          LMD    TH
16087  M01S00029.ns2266  +++|          STD    CM
16088  M01S00030.ns2266  +++|          LDD    CP
16089  M01S00031.ns2266  +++|          ADN    SNSW
16090  M01S00032.ns2266  +++|          CWD    CM
Line S00033 Modification History
M01 (Added by) ns2266
M02 (Removed by) ns2392
Seq #  *Modification Id* Act 
----------------------------+
16091  M02S00033.ns2392  ---| SDP3     AOD    T1
Line S00010 Modification History
M01 (Added by) ns2392
Seq #  *Modification Id* Act 
----------------------------+
16092  M01S00010.ns2392  +++| SDP3     LDM    /TCS/CSEB+2 CHECK FOR IGNORE RESOURCE LIMIT LOAD
16093  M01S00011.ns2392  +++|          SHN    21-7
16094  M01S00012.ns2392  +++|          PJN    SDP4        IF RESOURCE LIMITS NOT TO BE IGNORED
16095  M01S00013.ns2392  +++|          LDD    CP          SET IGNORE RESOURCE LIMITS FLAG
16096  M01S00014.ns2392  +++|          ADK    SRUW
16097  M01S00015.ns2392  +++|          CRD    CM
16098  M01S00016.ns2392  +++|          LDD    CM
16099  M01S00017.ns2392  +++|          SCN    40
16100  M01S00018.ns2392  +++|          LMN    40
16101  M01S00019.ns2392  +++|          STD    CM
16102  M01S00020.ns2392  +++|          LDD    CP
16103  M01S00021.ns2392  +++|          ADK    SRUW
16104  M01S00022.ns2392  +++|          CWD    CM
16105  M01S00023.ns2392  +++| SDP4     AOD    T1
16106  M00S10670.1aj     +++|          LDD    RA
16107  M00S10671.1aj     +++|          SHN    6
Line S10672 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
16108  M01S10672.v23l617 ---|          ADN    1           CLEAR RA+1
Line S00807 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
16109  M01S00807.v23l617 +++|          ADN    1           CLEAR SYSTEM REQUEST
16110  M00S10673.1aj     +++|          CWD    CN
16111  M00S10674.1aj     +++|          ADN    SPPR-1      SET PARAMETER BLOCK
16112  M00S10675.1aj     +++|          CWM    BUF,T1
16113  M00S10676.1aj     +++|          MONITOR  RCPM      REQUEST CPU
16114  M00S10677.1aj     +++|          LJM    /TCS/DPP    DROP PP
16115  M00S10678.1aj     +++| SPR      SPACE  4,15
16116  M00S10679.1aj     +++|**        SPR - SET PRIORITIES.
16117  M00S10680.1aj     +++|*
16118  M00S10681.1aj     +++|*         ENTRY  (RCFB - RCFB+4) *SSJ=* PRIORITY VALUES.
16119  M00S10682.1aj     +++|*                (A) = 1, IF BEGINNING OF JOB STEP.
16120  M00S10683.1aj     +++|*                (A) = 0, IF END OF JOB STEP.
16121  M00S10684.1aj     +++|*
16122  M00S10685.1aj     +++|*         EXIT   PRIORITIES SET ACCORDING TO VALUES.
Line S10686 Modification History
M01 (Removed by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16123  M01S10686.ns2731a ---|*                IF VALUE = O, NO ACTION TAKEN.
16124  M00S10687.1aj     +++|*
Line S10688 Modification History
M01 (Removed by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16125  M01S10688.ns2731a ---|*         USES   CM - CM+4.
Line S00001 Modification History
M01 (Added by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16126  M01S00001.ns2731a +++|*         USES   T1, CM - CM+4.
16127  M00S10689.1aj     +++|*
16128  M00S10690.1aj     +++|*         MACROS MONITOR.
16129  M00S10691.1aj     +++|
16130  M00S10692.1aj     +++|
16131  M00S10693.1aj     +++| SPR      SUBR               ENTRY/EXIT
Line S00002 Modification History
M01 (Added by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16132  M01S00002.ns2731a +++|          STD    T1          SAVE BEGIN/END JOB STEP STATUS
16133  M01S00003.ns2731a +++|
16134  M01S00004.ns2731a +++|*         PROCESS SUBSYSTEM ID.
16135  M01S00005.ns2731a +++|
16136  M00S10694.1aj     +++|          NJN    SPR1        IF AT BEGINNING OF JOB STEP
Line S10695 Modification History
M01 (Removed by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16137  M01S10695.ns2731a ---|
16138  M01S10696.ns2731a ---|*         PROCESS END OF JOB STEP.
16139  M01S10697.ns2731a ---|
16140  M00S10698.1aj     +++|          LDM    RCFB+4      GET *SSID* FROM *SSJ=* BLOCK
16141  M00S10699.1aj     +++|          STD    CM+4
16142  M00S10700.1aj     +++|          SBN    IRSI+1
16143  M00S10701.1aj     +++|          MJN    SPR2        IF NOT *IRSI* OR *UJSI*
16144  M00S10702.1aj     +++|          LDN    IRSI        INHIBIT ROLLOUT
16145  M00S10703.1aj     +++|          STD    CM+4
Line S10704 Modification History
M01 (Removed by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16146  M01S10704.ns2731a ---|          UJN    SPR2        CONTINUE
16147  M01S10705.ns2731a ---|
16148  M01S10706.ns2731a ---|*         PROCESS BEGINNING OF JOB STEP.
Line S00006 Modification History
M01 (Added by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16149  M01S00006.ns2731a +++|          UJN    SPR2        CHANGE SUBSYSTEM ID
16150  M00S10707.1aj     +++|
16151  M00S10708.1aj     +++| SPR1     LDM    RCFB+4      GET *SSID* FROM *SSJ=* BLOCK
16152  M00S10709.1aj     +++|          ZJN    SPR3        IF NO *SSID* SPECIFIED
16153  M00S10710.1aj     +++|          STD    CM+4
16154  M00S10711.1aj     +++| SPR2     LDN    SSIS        FORM *SET SSID* REQUEST
16155  M00S10712.1aj     +++|          STD    CM+1
16156  M00S10713.1aj     +++|          MONITOR  SJCM      SET JOB CONTROL
Line S00007 Modification History
M01 (Added by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16157  M01S00007.ns2731a +++|
16158  M01S00008.ns2731a +++|*         PROCESS CPU PRIORITY.
16159  M01S00009.ns2731a +++|
16160  M00S10714.1aj     +++| SPR3     LDM    RCFB+3
Line S10715 Modification History
M01 (Removed by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16161  M01S10715.ns2731a ---|          ZJN    SPR4        IF NO CHANGE IN CPU PRIORITY
Line S00010 Modification History
M01 (Added by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16162  M01S00010.ns2731a +++|          NJN    SPR3.1      IF TO SET FIXED CPU PRIORITY
16163  M01S00011.ns2731a +++|          LDD    T1
16164  M01S00012.ns2731a +++|          NJN    SPR4        IF BEGINNING OF JOB STEP
16165  M01S00013.ns2731a +++|*         LDN    0           RESTORE SERVICE CLASS CPU PRIORITY
Line S10716 Modification History
M01 (Removed by) ns2731
Seq #  *Modification Id* Act 
----------------------------+
16166  M01S10716.ns2731  ---|          STD    CM+4        REQUEST CPU PRIORITY
16167  M01S10717.ns2731  ---|          LDN    CPRS
Line S00001 Modification History
M01 (Added by) ns2731
Seq #  *Modification Id* Act 
----------------------------+
16168  M01S00001.ns2731  +++| SPR3.1   STD    CM+4        SET NEW CPU PRIORITY
Line S00002 Modification History
M01 (Added by) ns2731
M02 (Removed by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16169  M02S00002.ns2731a ---|          SBN    1
16170  M02S00003.ns2731a ---|          ZJN    SPR3.1      IF SET PRIORITY TO SERVICE CLASS VALUE
Line S00004 Modification History
M01 (Added by) ns2731
Seq #  *Modification Id* Act 
----------------------------+
16171  M01S00004.ns2731  +++|          LDN    CPRS        CHANGE CPU PRIORITY
16172  M00S10718.1aj     +++|          STD    CM+1
16173  M00S10719.1aj     +++|          MONITOR  SJCM
Line S00014 Modification History
M01 (Added by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16174  M01S00014.ns2731a +++|
16175  M01S00015.ns2731a +++|*         PROCESS TIME LIMIT.
16176  M01S00016.ns2731a +++|
16177  M00S10720.1aj     +++| SPR4     LDM    RCFB+2      CHECKING TIME LIMIT = INFINITE
16178  M00S10721.1aj     +++|          STD    CM+4
16179  M00S10722.1aj     +++|          ADM    RCFB+1
16180  M00S10723.1aj     +++|          ZJN    SPR7        IF NO CHANGE IN TIME LIMIT
16181  M00S10724.1aj     +++|          LDM    RCFB+1
16182  M00S10725.1aj     +++|          STD    CM+3
16183  M00S10726.1aj     +++|          SBN    7           CHECK TIME LIMIT .GE. 70000B
16184  M00S10727.1aj     +++|          MJN    SPR6        IF TIME LIMIT .LT. 70000B
16185  M00S10728.1aj     +++|          NJN    SPR5        IF TIME LIMIT .GT. 77777B
16186  M00S10729.1aj     +++|          LDD    CM+4
16187  M00S10730.1aj     +++|          ADC    -7770
16188  M00S10731.1aj     +++|          MJN    SPR6        IF TIME LIMIT .LT. 77770B
16189  M00S10732.1aj     +++| SPR5     LCN    0           SET INFINITE TIME LIMIT
16190  M00S10733.1aj     +++|          STD    CM+3
16191  M00S10734.1aj     +++|          STD    CM+4
16192  M00S10735.1aj     +++| SPR6     LDN    RLTL        SET TIME LIMIT SUBFUNCTION
16193  M00S10736.1aj     +++|          STD    CM+1
16194  M00S10737.1aj     +++|          MONITOR  RLMM
16195  M00S10738.1aj     +++| SPR7     LJM    SPRX        RETURN
16196  M00S10739.1aj     +++| TCA      SPACE  4,10
16197  M00S10740.1aj     +++|**        TCA - TRANSFER CONTROL POINT AREA FIELDS (*SSJ=*).
16198  M00S10741.1aj     +++|*
16199  M00S10742.1aj     +++|*         ENTRY  (CSEB - CSEB+4)  SPECIAL ENTRY POINT WORD.
16200  M00S10743.1aj     +++|*
16201  M00S10744.1aj     +++|*         USES   T1, CM - CM+4, CN - CN+4.
16202  M00S10745.1aj     +++|*
16203  M00S10746.1aj     +++|*         CALLS  SPR.
16204  M00S10747.1aj     +++|*
16205  M00S10748.1aj     +++|*         MACROS NFA.
16206  M00S10749.1aj     +++|
16207  M00S10750.1aj     +++|
16208  M00S10751.1aj     +++| TCA      SUBR               ENTRY/EXIT
16209  M00S10752.1aj     +++|          LDM    /TCS/CSEB+3
16210  M00S10753.1aj     +++|          LPN    37
16211  M00S10754.1aj     +++|          ADM    /TCS/CSEB+4
16212  M00S10755.1aj     +++|          ZJN    TCAX        IF NO PARAMETER BLOCK
16213  M00S10756.1aj     +++|          LDN    SSJL
16214  M00S10757.1aj     +++|          STD    T1
16215  M00S10758.1aj     +++|          LDD    CP
Line S10759 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16216  M01S10759.ns22000 ---|          ADN    CPJW        JOB STEP TIME LIMIT
16217  M01S10760.ns22000 ---|          CRD    CM
16218  M01S10761.ns22000 ---|          SBN    CPJW-JCIW
Line S00252 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
16219  M02S00252.271l750 ---|          ADN    JCIW
Line S10762 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
16220  M01S10762.271l750 ---|          CRM    RCFB+SPPS*5+1*5+3,ON
Line S00109 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
16221  M01S00109.271l750 +++|          ADN    CWQW
16222  M01S00110.271l750 +++|          CRD    CN
16223  M01S00111.271l750 +++|          ADN    JCIW-CWQW
16224  M01S00112.271l750 +++|          CRM    RCFB+SPPS*5+1*5+2,ON
Line S00253 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16225  M01S00253.ns22000 +++|          ADN    CPJW-JCIW-1
16226  M01S00254.ns22000 +++|          CRD    CM
Line S00005 Modification History
M01 (Added by) ns2731
Seq #  *Modification Id* Act 
----------------------------+
16227  M01S00005.ns2731  +++|          LDD    CN+1
16228  M01S00006.ns2731  +++|          SHN    -11
16229  M01S00007.ns2731  +++|          LPN    1
Line S00008 Modification History
M01 (Added by) ns2731
M02 (Removed by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16230  M02S00008.ns2731a ---|          LMN    1
16231  M02S00009.ns2731a ---|          NJN    TCA0.1      IF CPU PRIORITY SET FROM SERVICE CLASS
Line S00017 Modification History
M01 (Added by) ns2731a
Seq #  *Modification Id* Act 
----------------------------+
16232  M01S00017.ns2731a +++|          ZJN    TCA0.1      IF CPU PRIORITY SET FROM SERVICE CLASS
Line S00255 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
16233  M02S00255.ns2323  ---|          ADN    CSPW-CPJW
16234  M02S00256.ns2323  ---|          CRD    CN
Line S10763 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
16235  M01S10763.271l750 ---|          LDM    RCFB+SPPS*5+1*5+3  POSITION CP PRIORITY
Line S00113 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
16236  M01S00113.271l750 +++|          LDD    CN          SET CPU PRIORITY
16237  M01S00114.271l750 +++|          SHN    -3
Line S10764 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
16238  M01S10764.271l716 ---|          SHN    -1
Line S00020 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
16239  M01S00020.271l716 +++|          LPC    177
Line S10765 Modification History
M01 (Removed by) ns2731
Seq #  *Modification Id* Act 
----------------------------+
16240  M01S10765.ns2731  ---|          STM    RCFB+SPPS*5+1*5+3
Line S00010 Modification History
M01 (Added by) ns2731
Seq #  *Modification Id* Act 
----------------------------+
16241  M01S00010.ns2731  +++| TCA0.1   STM    RCFB+SPPS*5+1*5+3
Line S10766 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
16242  M01S10766.271l750 ---|          LDM    RCFB+SPPS*5+1*5+5  MOVE SSID FIELD
16243  M01S10767.271l750 ---|          STM    RCFB+SPPS*5+1*5+4
Line S00257 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16244  M01S00257.ns22000 +++|          LDD    CM+2        MOVE JOB STEP TIME LIMIT
16245  M01S00258.ns22000 +++|          SCN    77
16246  M01S00259.ns22000 +++|          SHN    6
16247  M01S00260.ns22000 +++|          LMD    CM+1
16248  M01S00261.ns22000 +++|          SHN    6
16249  M01S00262.ns22000 +++|          STM    RCFB+SPPS*5+1*5+2
16250  M01S00263.ns22000 +++|          SHN    -14
16251  M01S00264.ns22000 +++|          STM    RCFB+SPPS*5+1*5+1
Line S00265 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2323
Seq #  *Modification Id* Act 
----------------------------+
16252  M02S00265.ns2323  ---|          LDD    CN          MOVE PRIMARY USER / PRIMARY CHARGE FLAGS
16253  M02S00266.ns2323  ---|          LPN    6
16254  M02S00267.ns2323  ---|          STM    RCFB+SPPS*5+1*5+0
16255  M00S10768.1aj     +++|          LDD    CP          READ USER IDENTIFICATION
16256  M00S10769.1aj     +++|          ADN    UIDW
16257  M00S10770.1aj     +++|          CRM    RCFB+UIDS*5+1*5,ON
16258  M00S10771.1aj     +++|          ADN    ALMW-UIDW-1
16259  M00S10772.1aj     +++|          CRM    RCFB+ALMS*5+5,TR VALIDATION PARAMETERS
16260  M00S10773.1aj     +++|          ADN    SPCW-ALMW-3
16261  M00S10774.1aj     +++|          CRD    CN
Line S10775 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16262  M01S10775.ns22000 ---|          LDD    CM+2
16263  M01S10776.ns22000 ---|          SCN    77
16264  M01S10777.ns22000 ---|          SHN    6
16265  M01S10778.ns22000 ---|          LMD    CM+1
16266  M01S10779.ns22000 ---|          SHN    6
16267  M01S10780.ns22000 ---|          STM    RCFB+SPPS*5+1*5+2
16268  M01S10781.ns22000 ---|          SHN    -14
16269  M01S10782.ns22000 ---|          STM    RCFB+SPPS*5+1*5+1
16270  M00S10783.1aj     +++| TCA1     LDM    /TCS/CSEB+3
16271  M00S10784.1aj     +++|          LPN    37
16272  M00S10785.1aj     +++|          SHN    6
16273  M00S10786.1aj     +++|          ADD    RA
16274  M00S10787.1aj     +++|          SHN    6
16275  M00S10788.1aj     +++|          ADM    /TCS/CSEB+4
16276  M00S10789.1aj     +++|          CRM    RCFB,ON     RETRIEVE PRIORITY PARAMETERS
16277  M00S10790.1aj     +++|          SBN    1
16278  M00S10791.1aj     +++|          CWM    RCFB+1*5,T1 STORE ACCOUNT PARAMETERS
16279  M00S10792.1aj     +++|          LDD    CN+1
16280  M00S10793.1aj     +++|          SHN    21-0
16281  M00S10794.1aj     +++|          MJN    TCA1.5      IF DMP=/SSJ= JOB CALLED BY SSJ= JOB
16282  M00S10795.1aj     +++|          NFA    SSJN
16283  M00S10796.1aj     +++|          UJN    TCA1.8      STORE PARAMETERS
16284  M00S10797.1aj     +++|
16285  M00S10798.1aj     +++| TCA1.5   NFA    SSDN
16286  M00S10799.1aj     +++| TCA1.8   CWM    RCFB+1*5,T1 STORE ACCOUNT PARAMETERS
16287  M00S10800.1aj     +++|          LDM    RCFB+ALMS*5+1*5+1
16288  M00S10801.1aj     +++|          LPN    7           RETAIN ORIGINAL INDEX VALUE
16289  M00S10802.1aj     +++|          RAM    TCAC+1
Line S00001 Modification History
M01 (Added by) 1aj41
Seq #  *Modification Id* Act 
----------------------------+
16290  M01S00001.1aj41   +++|          LDM    RCFB+ACLS*5+1*5+3  SAVE USER DETACH LIMIT
16291  M01S00002.1aj41   +++|          SCN    77
16292  M01S00003.1aj41   +++|          RAM    TCAD+3
16293  M00S10803.1aj     +++|          LDD    CP
16294  M00S10804.1aj     +++|          ADN    JCIW        GET SSID
16295  M00S10805.1aj     +++|          CRD    CN
16296  M00S10806.1aj     +++|          ADN    UIDW-JCIW
16297  M00S10807.1aj     +++|          CWM    TCAB,ON     SET USER INDEX TO 377777 (SYUI)
16298  M00S10808.1aj     +++|          ADN    ALMW-UIDW-1
16299  M00S10809.1aj     +++|          CWM    TCAC,ON     -0 TO ALL LIMITS EXCEPT LOCAL FILE LIMIT
Line S10810 Modification History
M01 (Removed by) 1aj41
Seq #  *Modification Id* Act 
----------------------------+
16300  M01S10810.1aj41   ---|          CWM    TCAA,ON     -0 TO ALL LIMITS
Line S00004 Modification History
M01 (Added by) 1aj41
Seq #  *Modification Id* Act 
----------------------------+
16301  M01S00004.1aj41   +++|          CWM    TCAD,ON     -0 TO ALL LIMITS EXCEPT USER DETACH LIMIT
16302  M00S10811.1aj     +++|          CWM    TCAA,ON
16303  M00S10812.1aj     +++|          LDD    CN+2
16304  M00S10813.1aj     +++|          SBK    LSSI+1
16305  M00S10814.1aj     +++|          PJN    TCA2        IF SUBSYSTEM
16306  M00S10815.1aj     +++|          LDN    1           SET BEGINNING OF JOB STEP
16307  M00S10816.1aj     +++|          RJM    SPR         SET PRIORITIES
16308  M00S10817.1aj     +++| TCA2     LJM    TCAX        RETURN
16309  M00S10818.1aj     +++|
16310  M00S10819.1aj     +++|
16311  M00S10820.1aj     +++| TCAA     VFD    60/-0
16312  M00S10821.1aj     +++| TCAB     VFD    42/0LSYSTEMX,18//PFM/SYUI
16313  M00S10822.1aj     +++| TCAC     VFD    21/-0,3/0,36/-0
Line S00005 Modification History
M01 (Added by) 1aj41
Seq #  *Modification Id* Act 
----------------------------+
16314  M01S00005.1aj41   +++| TCAD     VFD    36/-0,6/0,18/-0  *ACLW*
16315  M00S10823.1aj     +++| IDP      SPACE  4,10
Line S10824 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
16316  M01S10824.v23l617 ---|**        IDP - INITIALIZE *DMP=* PROGRAM LOAD ON RA+1 CALL.
Line S00808 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
16317  M01S00808.v23l617 +++|**        IDP - INITIALIZE *DMP=* PROGRAM LOAD ON SYSTEM REQUEST CALL.
16318  M00S10825.1aj     +++|*
16319  M00S10826.1aj     +++|*         ENTRY  IF *DMP=* CP PROGRAM TO BE LOADED.
16320  M00S10827.1aj     +++|*
Line S10828 Modification History
M01 (Removed by) ns2268a
Seq #  *Modification Id* Act 
----------------------------+
16321  M01S10828.ns2268a ---|*         EXIT   TO */TCS/TCS3* TO LOAD PROGRAM.
Line S00006 Modification History
M01 (Added by) ns2268a
Seq #  *Modification Id* Act 
----------------------------+
16322  M01S00006.ns2268a +++|*         EXIT   TO */TCS/TCS2* TO LOAD PROGRAM.
Line S00108 Modification History
M01 (Added by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
16323  M01S00108.1aj92   +++|*
16324  M01S00109.1aj92   +++|*         CALL   /TCS/IPL.
16325  M00S10829.1aj     +++|
16326  M00S10830.1aj     +++|
16327  M00S10831.1aj     +++| IDP      LDC    ZJNI+77+/TCS/SCL15-/TCS/SCLB
16328  M00S10832.1aj     +++|          STM    /TCS/SCLB
16329  M00S10833.1aj     +++|          LDC    LJMI
16330  M00S10834.1aj     +++|          STM    /TCS/BCPD
16331  M00S10835.1aj     +++|          LDC    /TCS/BCP22
16332  M00S10836.1aj     +++|          STM    /TCS/BCPD+1
16333  M00S10837.1aj     +++|          LDD    AB+1        SET PROGRAM NAME
16334  M00S10838.1aj     +++|          SCN    77
16335  M00S10839.1aj     +++|          STD    AB+1
16336  M00S10840.1aj     +++|          LDN    0
16337  M00S10841.1aj     +++|          STD    AB+2
16338  M00S10842.1aj     +++|          STD    AB+3
Line S00001 Modification History
M01 (Added by) 1aj86
Seq #  *Modification Id* Act 
----------------------------+
16339  M01S00001.1aj86   +++|          STM    /TCS/TCSA   ALLOW DMP= EVEN IF CHARGE REQUIRED
Line S00003 Modification History
M01 (Added by) 1aj9
Seq #  *Modification Id* Act 
----------------------------+
16340  M01S00003.1aj9    +++|          LCN    0           PRESERVE OVERRIDE-REQUIRED FLAG
16341  M01S00004.1aj9    +++|          STM    /TCS/IPLC
Line S00007 Modification History
M01 (Added by) ns2268a
M02 (Removed by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
16342  M02S00007.1aj92   ---|          ISTORE /TCS/TCSF,(UJN /TCS/TCS2.1) BYPASS GLOBAL LIBRARIES
Line S00110 Modification History
M01 (Added by) 1aj92
Seq #  *Modification Id* Act 
----------------------------+
16343  M01S00110.1aj92   +++|          RJM    /TCS/IPL    INITIALIZE PROGRAM LOAD
16344  M00S10843.1aj     +++|          LJM    /TCS/TCS2   LOAD PROGRAM
16345  M00S10844.1aj     +++|
16346  M00S10845.1aj     +++|
Line S00013 Modification History
M01 (Added by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
16347  M01S00013.ns2578  +++|*         COMMON DECKS.
16348  M01S00014.ns2578  +++|
16349  M01S00015.ns2578  +++|
Line S00002 Modification History
M01 (Added by) ns2738d
Seq #  *Modification Id* Act 
----------------------------+
16350  M01S00002.ns2738d +++| EJT$     EQU    1           ASSEMBLE EJT ADDRESSING
16351  M01S00003.ns2738d +++|*CALL     COMPGFP
Line S00016 Modification History
M01 (Added by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
16352  M01S00016.ns2578  +++|*CALL     COMPSAF
16353  M01S00017.ns2578  +++|
16354  M01S00018.ns2578  +++|
16355  M00S10846.1aj     +++| BUF      BSS    0           PARAMETER BLOCK BUFFER
Line S00004 Modification History
M01 (Added by) ns2738d
Seq #  *Modification Id* Act 
----------------------------+
16356  M01S00004.ns2738d +++|
16357  M01S00005.ns2738d +++| IFP      HERE               ASSEMBLE *COMPGFP* INITIALIZATION CODE
16358  M01S00006.ns2738d +++|
16359  M01S00007.ns2738d +++|          IFLT   *,BUF+DMPL*5,1
Line S10847 Modification History
M01 (Removed by) ns2334
Seq #  *Modification Id* Act 
----------------------------+
16360  M01S10847.ns2334  ---|          ORG    BUF+21*5    LWA OF OVERLAY
Line S00003 Modification History
M01 (Added by) ns2334
Seq #  *Modification Id* Act 
----------------------------+
16361  M01S00003.ns2334  +++|          ORG    BUF+DMPL*5  LWA OF OVERLAY
16362  M00S10848.1aj     +++|
16363  M00S10849.1aj     +++|
16364  M00S10850.1aj     +++|          OVERFLOW  /TCS/O3AF
Line S10851 Modification History
M01 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16365  M01S10851.ns2719  ---|          TTL    1AJ/3AG - RETURN SPECIAL USER FILES.
Line S00030 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16366  M01S00030.ns2719  +++|          TTL    1AJ/3AG - RETURN JOB STEP FILES.
Line S00268 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16367  M01S00268.ns22000 +++|          TITLE
16368  M00S10852.1aj     +++|          QUAL   3AG
Line S10853 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16369  M01S10853.ns22000 ---|          IDENT  3AG,UFPX    USER FILE PRIVACY
Line S00269 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16370  M02S00269.ns2719  ---|          IDENT  3AG,UFPX    RETURN SPECIAL USER FILES.
Line S10854 Modification History
M01 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16371  M01S10854.ns2719  ---|*COMMENT 1AJ - RETURN SPECIAL USER FILES.
Line S00031 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16372  M01S00031.ns2719  +++|          IDENT  3AG,RJFX    RETURN JOB STEP FILES.
16373  M01S00032.ns2719  +++|*COMMENT 1AJ - RETURN JOB STEP FILES.
Line S10855 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
16374  M01S10855.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1982.
Line S00012 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
16375  M01S00012.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
Line S00270 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16376  M01S00270.ns22000 +++|          SPACE  4,10
Line S00271 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16377  M02S00271.ns2719  ---|***       3AG - RETURN SPECIAL USER FILES.
Line S10856 Modification History
M01 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16378  M01S10856.ns2719  ---|          SPACE  4,10
16379  M01S10857.ns2719  ---|**        UFP - USER FILE PRIVACY.
Line S00033 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16380  M01S00033.ns2719  +++|***       3AG - RETURN JOB STEP FILES.
Line S00027 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16381  M01S00027.ns2358  +++|*
Line S00028 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16382  M02S00028.ns2719  ---|*         ENTRY  (CW - CW+4) = *JCIW* WORD.
Line S00034 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16383  M01S00034.ns2719  +++|*         *3AG* RETURNS ALL FILES WITH USER PRIVACY STATUS AND FILES
16384  M01S00035.ns2719  +++|*         WHICH HAVE BEEN PARTIALLY RETURNED BY *1AJ* OR ANOTHER PP.
16385  M01S00036.ns2719  +++|*         PARTIALLY RETURNED FILES ARE MASS STORAGE OR TAPE FILES FOR
16386  M01S00037.ns2719  +++|*         WHICH THE MASS STORAGE OR TAPE RESOURCE HAS BEEN RETURNED BUT
16387  M01S00038.ns2719  +++|*         FURTHER PROCESSING SUCH AS UPDATING THE RESOURCE DEMAND FILE
16388  M01S00039.ns2719  +++|*         COULD NOT BE COMPLETED BECAUSE OF A RECOVERABLE MASS STORAGE
16389  M01S00040.ns2719  +++|*         ERROR.  IF A DEVICE INACCESSIBLE ERROR IS RETURNED BY *0DF*,
16390  M01S00041.ns2719  +++|*         *1AJ* WILL GO INTO RECALL AND ADVANCEMENT TO THE NEXT JOB
16391  M01S00042.ns2719  +++|*         STEP WILL BE INHIBITED UNTIL ALL USER PRIVACY AND PARTIALLY
16392  M01S00043.ns2719  +++|*         RETURNED FILES HAVE BEEN RETURNED.
16393  M01S00044.ns2719  +++|          SPACE  4,15
16394  M01S00045.ns2719  +++|**        RJF - RETURN JOB STEP FILES.
16395  M00S10858.1aj     +++|*
Line S10859 Modification History
M01 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16396  M01S10859.ns2719  ---|*         USES   FA, CM - CM+4, CW - CW+4.
Line S00046 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16397  M01S00046.ns2719  +++|*         EXIT   TO CALLER IF NO REMAINING USER PRIVACY FILES OR
16398  M01S00047.ns2719  +++|*                  INCOMPLETELY RETURNED FILES REMAINING.
16399  M01S00048.ns2719  +++|*                TO *1RJ* TO RECALL *1AJ* IF INACCESSIBLE DEVICE ERROR
16400  M01S00049.ns2719  +++|*                  RETURNED BY *0DF*.
16401  M01S00050.ns2719  +++|*
16402  M01S00051.ns2719  +++|*         USES   FA, IR+4, CM - CM+4, CW - CW+4, FS - FS+4.
16403  M01S00052.ns2719  +++|*
16404  M01S00053.ns2719  +++|*         CALLS  CFS, *0DF*.
16405  M00S10860.1aj     +++|*
16406  M00S10861.1aj     +++|*         MACROS EXECUTE, MONITOR, NFA.
16407  M00S10862.1aj     +++|
16408  M00S10863.1aj     +++|
Line S10864 Modification History
M01 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16409  M01S10864.ns2719  ---|          ORG    /TCS/O3AF+5
Line S00054 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16410  M01S00054.ns2719  +++|          ORG    E1AJ
16411  M00S10865.1aj     +++|
Line S10866 Modification History
M01 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16412  M01S10866.ns2719  ---| UFP      SUBR               ENTRY/EXIT
Line S10867 Modification History
M01 (Removed by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16413  M02S10867.ns2719  ---|          LDN    SPMS+RPMS   CLEAR USER FILE PRIVACY FLAGS
Line S00029 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16414  M02S00029.ns2719  ---|          LDD    CW+3
16415  M02S00030.ns2719  ---|          SHN    -6          CHECK JOB CONTROL FLAGS
16416  M02S00031.ns2719  ---|          LPN    IJAS
16417  M02S00032.ns2719  ---|          ZJN    UFP1        IF NOT INHIBIT JOB ADVANCE CALL
16418  M02S00033.ns2719  ---|          LDN    CIR-CFS
16419  M02S00034.ns2719  ---|          RAM    UFPA        SET CHECK FOR INCOMPLETE FILE RETURN
16420  M02S00035.ns2719  ---|          LDN    IJAS&SPMS&RPMS
16421  M02S00036.ns2719  ---| UFP1     LMN    SPMS&RPMS   DEFINE FLAGS TO CLEAR
Line S10868 Modification History
M01 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16422  M01S10868.ns2719  ---|          STD    CM+4
16423  M01S10869.ns2719  ---|          LDN    CCTS
16424  M01S10870.ns2719  ---|          STD    CM+1
16425  M01S10871.ns2719  ---|          MONITOR  SJCM
16426  M01S10872.ns2719  ---|
16427  M01S10873.ns2719  ---|*         RETURN FILES WITH PRIVACY STATUS.
16428  M01S10874.ns2719  ---|
Line S00055 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16429  M01S00055.ns2719  +++| RJF      SUBR               ENTRY/EXIT
16430  M00S10875.1aj     +++|          LDD    CP          READ FIELD LENGTH STATUS WORD
16431  M00S10876.1aj     +++|          ADN    FLSW
16432  M00S10877.1aj     +++|          CRD    CW
16433  M00S10878.1aj     +++|          LDD    CW
16434  M00S10879.1aj     +++|          SHN    6
16435  M00S10880.1aj     +++|          ADN    1
16436  M00S10881.1aj     +++|          STD    CW          LAST WORD + 1 FOR FNT-S
16437  M00S10882.1aj     +++|          LDC    FNTN        START OF FNT-S
Line S10883 Modification History
M01 (Removed by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16438  M01S10883.ns2358  ---|          STD    FA
16439  M01S10884.ns2358  ---| UFP1     LDN    LENF        INCREMENT TO NEXT FILE
16440  M01S10885.ns2358  ---|          RAD    FA
16441  M01S10886.ns2358  ---|          SBD    CW
16442  M01S10887.ns2358  ---|          PJN    UFPX        IF END OF LOCAL FILES
16443  M01S10888.ns2358  ---|          NFA    FA,R        READ ENTRY
16444  M01S10889.ns2358  ---|          CRD    CM
16445  M01S10890.ns2358  ---|          LDD    CM
16446  M01S10891.ns2358  ---|          ZJN    UFP1        IF EMPTY ENTRY
16447  M01S10892.ns2358  ---|          LDD    CM+4
16448  M01S10893.ns2358  ---|          LPN    77
16449  M01S10894.ns2358  ---|          LMN    UPST
16450  M01S10895.ns2358  ---|          NJN    UFP1        IF NOT PRIVATE USER FILE
16451  M01S10896.ns2358  ---|          LDN    1           UNLOAD FILE
16452  M01S10897.ns2358  ---|          STM    ODFL-1
16453  M01S10898.ns2358  ---|          EXECUTE  0DF,ODFL
16454  M01S10899.ns2358  ---|          UJN    UFP1        LOOP FOR NEXT FILE
16455  M01S10900.ns2358  ---|
16456  M01S10901.ns2358  ---|
16457  M01S10902.ns2358  ---| ODFL     EQU    *+5
Line S00037 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16458  M01S00037.ns2358  +++|          STD    CW+1
Line S00056 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16459  M01S00056.ns2719  +++|          LDN    0           INITIALIZE INACCESSIBLE DEVICE FLAG
16460  M01S00057.ns2719  +++|          STD    CW+2
Line S00038 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16461  M01S00038.ns2358  +++|          LDN    1           SET *UNLOAD* OPTION FOR *0DF*
16462  M01S00039.ns2358  +++|          STM    ODFL-1
Line S00040 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16463  M02S00040.ns2719  ---| UFP2     LDN    LENF        ADVANCE RELATIVE ADDRESS
Line S00058 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16464  M01S00058.ns2719  +++| RJF2     LDN    LENF        ADVANCE RELATIVE ADDRESS
Line S00041 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16465  M01S00041.ns2358  +++|          RAD    CW+1
16466  M01S00042.ns2358  +++|          SBD    CW
Line S00043 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16467  M02S00043.ns2719  ---|          PJP    UFPX        IF END OF LOCAL FILE FNT
Line S00059 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16468  M01S00059.ns2719  +++|          PJN    RJF3        IF END OF LOCAL FILE FNT
Line S00044 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16469  M01S00044.ns2358  +++|          NFA    CW+1,R
Line S00045 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16470  M02S00045.ns2719  ---|          CRD    CM          READ FNT ENTRY
Line S00060 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16471  M01S00060.ns2719  +++|          ADK    FNTL        READ FILE NAME
16472  M01S00061.ns2719  +++|          CRD    CM
16473  M01S00062.ns2719  +++|          ADK    FSTL-FNTL   READ FILE STATUS
16474  M01S00063.ns2719  +++|          CRD    FS
Line S00046 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16475  M01S00046.ns2358  +++|          LDD    CM
Line S00047 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16476  M02S00047.ns2719  ---|          ZJN    UFP2        IF EMPTY ENTRY
16477  M02S00048.ns2719  ---|          RJM    CFS
16478  M02S00049.ns2719  ---|*         RJM    CIR         (CHECKING INCOMPLETE FILE RETURN)
16479  M02S00050.ns2719  ---| UFPA     EQU    *-1
16480  M02S00051.ns2719  ---|          NJN    UFP2        IF NOT FILE TO BE RETURNED
Line S00064 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16481  M01S00064.ns2719  +++|          ZJN    RJF2        IF EMPTY ENTRY
16482  M01S00065.ns2719  +++|          RJM    CFS         CHECK FILE STATUS
16483  M01S00066.ns2719  +++|          NJN    RJF2        IF NOT FILE TO BE RETURNED
Line S00052 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16484  M01S00052.ns2358  +++|          LDD    CW+1
16485  M01S00053.ns2358  +++|          STD    FA          SET RELATIVE FNT ADDRESS IN NFL
16486  M01S00054.ns2358  +++|          EXECUTE  0DF,ODFL
Line S00055 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16487  M02S00055.ns2719  ---|          ZJN    UFP2        IF FILE RETURNED
16488  M02S00056.ns2719  ---|          LDM    RDCT
16489  M02S00057.ns2719  ---|          SHN    21-12
16490  M02S00058.ns2719  ---|          MJN    UFP3        IF NON-RECOVERABLE MASS STORAGE ERROR
16491  M02S00059.ns2719  ---|          LDM    MSD
16492  M02S00060.ns2719  ---|          SHN    0-13
16493  M02S00061.ns2719  ---|          NJN    UFP4        IF NOT SUBSYSTEM
16494  M02S00062.ns2719  ---| UFP3     MONITOR  ABTM
16495  M02S00063.ns2719  ---|          LJM    PPR         EXIT TO PP RESIDENT
Line S00067 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16496  M01S00067.ns2719  +++|          ZJN    RJF2        IF FILE RETURNED
16497  M01S00068.ns2719  +++|          LDD    T5          SET INACCESSIBLE DEVICE EST ORDINAL
16498  M01S00069.ns2719  +++|          STD    CW+2
16499  M01S00070.ns2719  +++|          UJN    RJF2        CHECK NEXT FILE
Line S00064 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16500  M01S00064.ns2358  +++|
Line S00065 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16501  M02S00065.ns2719  ---| UFP4     LDD    T5          SET EQUIPMENT TO WAIT ON
16502  M02S00066.ns2719  ---|          STD    IR+4
Line S00071 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16503  M01S00071.ns2719  +++|*         CLEAR JOB STEP FILE CONTROL FLAGS IF ALL FILES RETURNED.
16504  M01S00072.ns2719  +++|
16505  M01S00073.ns2719  +++| RJF3     LDD    CW+2
16506  M01S00074.ns2719  +++|          NJN    RJF4        IF INACCESSIBLE DEVICE ERROR
16507  M01S00075.ns2719  +++|          LDN    SPMS+RPMS   SET JOB STEP PRIVATE FILES FLAGS
16508  M01S00076.ns2719  +++|          STD    CM+4
16509  M01S00077.ns2719  +++|          LDN    CCTS        SET TO CLEAR CONTROL FLAGS
16510  M01S00078.ns2719  +++|          STD    CM+1
16511  M01S00079.ns2719  +++|          MONITOR  SJCM      CLEAR CONTROL FLAGS
16512  M01S00080.ns2719  +++|          LJM    RJFX        RETURN
16513  M01S00081.ns2719  +++|
16514  M01S00082.ns2719  +++|*         RECALL *1AJ* ON INACCESSIBLE DEVICE ERROR.
16515  M01S00083.ns2719  +++|
16516  M01S00084.ns2719  +++| RJF4     STD    IR+4        SET EST ORDINAL OF INACCESSIBLE DEVICE
Line S00067 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16517  M01S00067.ns2358  +++|          LDN    0           CLEAR JOB ADVANCE
16518  M01S00068.ns2358  +++|          STD    CM+1
16519  M01S00069.ns2358  +++|          MONITOR  JACM
Line S00070 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16520  M02S00070.ns2719  ---|          EXECUTE  1RJ       ROLL JOB
16521  M02S00071.ns2719  ---|*         LJM    PPR
Line S00085 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16522  M01S00085.ns2719  +++|          EXECUTE  1RJ       RECALL *1AJ*
Line S00072 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16523  M01S00072.ns2358  +++| CFS      SPACE  4,10
16524  M01S00073.ns2358  +++|**        CFS - CHECK FILE STATUS.
16525  M01S00074.ns2358  +++|*
Line S00075 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16526  M02S00075.ns2719  ---|*         ENTRY  (CM - CM+4) = LOCAL FNT ENTRY.
Line S00086 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16527  M01S00086.ns2719  +++|*         ENTRY  (CM - CM+4) = LOCAL FNT ENTRY *FNTL* WORD.
16528  M01S00087.ns2719  +++|*                (FS - FS+4) = LOCAL FNT ENTRY *FSTL* WORD.
Line S00076 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16529  M01S00076.ns2358  +++|*
Line S00077 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16530  M02S00077.ns2719  ---|*         EXIT   (A) = 0 IF PRIVATE USER FILE.
Line S00088 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16531  M01S00088.ns2719  +++|*         EXIT   (A) = 0 IF FILE TO BE RETURNED.
16532  M01S00089.ns2719  +++|*
16533  M01S00090.ns2719  +++|*         USES   T3 - T3+4.
Line S00078 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16534  M01S00078.ns2358  +++|
Line S00091 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16535  M01S00091.ns2719  +++|
16536  M01S00092.ns2719  +++| CFS3     LDD    FS+1
16537  M01S00093.ns2719  +++|          ZJN    CFS1        IF NULL TRACK FIELD
16538  M01S00094.ns2719  +++|          SHN    0-13
Line S00079 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16539  M01S00079.ns2358  +++|
16540  M01S00080.ns2358  +++| CFS      SUBR               ENTRY/EXIT
16541  M01S00081.ns2358  +++|          LDD    CM+4
16542  M01S00082.ns2358  +++|          LPN    77          ISOLATE STATUS FIELD
16543  M01S00083.ns2358  +++|          LMN    UPST
Line S00084 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16544  M02S00084.ns2719  ---|          UJN    CFSX        RETURN
16545  M02S00085.ns2719  ---| CIR      SPACE  4,10
16546  M02S00086.ns2719  ---|**        CIR - CHECK INCOMPLETE FILE RETURN.
16547  M02S00087.ns2719  ---|*
16548  M02S00088.ns2719  ---|*         ENTRY  (CW+1) = RELATIVE FNT OFFSET IN NFL.
16549  M02S00089.ns2719  ---|*
16550  M02S00090.ns2719  ---|*         EXIT   (A) = 0 IF REATTEMPT TO RETURN FILE.
16551  M02S00091.ns2719  ---|*
16552  M02S00092.ns2719  ---|*         USES   FS - FS+4, T3 - T3+4.
16553  M02S00093.ns2719  ---|*
16554  M02S00094.ns2719  ---|*         MACROS NFA.
16555  M02S00095.ns2719  ---|
16556  M02S00096.ns2719  ---|
16557  M02S00097.ns2719  ---| CIR3     LDD    FS+1
16558  M02S00098.ns2719  ---|          ZJN    CIR1        IF NULL TRACK FIELD
16559  M02S00099.ns2719  ---|          SHN    0-13
16560  M02S00100.ns2719  ---|
16561  M02S00101.ns2719  ---| CIR      SUBR               ENTRY/EXIT
16562  M02S00102.ns2719  ---|          NFA    CW+1,R
16563  M02S00103.ns2719  ---|          ADN    FSTL        FETCH FST INFORMATION
16564  M02S00104.ns2719  ---|          CRD    FS
Line S00095 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16565  M01S00095.ns2719  +++|          ZJN    CFSX        IF USER PRIVACY STATUS
Line S00105 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16566  M01S00105.ns2358  +++|          SFA    EST,FS      READ EST ENTRY
16567  M01S00106.ns2358  +++|          ADK    EQDE
16568  M01S00107.ns2358  +++|          CRD    T3
16569  M01S00108.ns2358  +++|          LDD    T3          CHECK DEVICE TYPE
16570  M01S00109.ns2358  +++|          SHN    21-13
Line S00110 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16571  M02S00110.ns2719  ---|          MJN    CIR3        IF MASS STORAGE
Line S00096 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16572  M01S00096.ns2719  +++|          MJN    CFS3        IF MASS STORAGE
Line S00111 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16573  M01S00111.ns2358  +++|          LDD    T3+3
Line S00112 Modification History
M01 (Added by) ns2358
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
16574  M02S00112.252l678 ---|          LPC    3777
Line S00113 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16575  M01S00113.ns2358  +++|          LMC    2RNT
Line S00114 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16576  M02S00114.ns2719  ---|          ZJN    CIR2        IF *NT* (9 TRACK TAPE)
Line S00097 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16577  M01S00097.ns2719  +++|          ZJN    CFS2        IF *NT* (9 TRACK TAPE)
Line S00115 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16578  M01S00115.ns2358  +++|          LMC    2RMT&2RNT
Line S00116 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16579  M02S00116.ns2719  ---|          ZJN    CIR2        IF *MT* (7 TRACK TAPE)
16580  M02S00117.ns2719  ---| CIR1     LMC    2RTE&2RMT
16581  M02S00118.ns2719  ---|          NJN    CIRX        IF NOT *TE* (TAPE PSEUDO EQUIPMENT)
16582  M02S00119.ns2719  ---| CIR2     LDD    FS+4
Line S00098 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16583  M01S00098.ns2719  +++|          ZJN    CFS2        IF *MT* (7 TRACK TAPE)
Line S00099 Modification History
M01 (Added by) ns2719
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
16584  M02S00099.274l797 ---| CFS1     LMC    2RTE&2RMT
Line S00001 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
16585  M01S00001.274l797 +++|          LMC    2RCT&2RMT
16586  M01S00002.274l797 +++|          ZJN    CFS2        IF *CT* (CARTRIDGE TAPE)
16587  M01S00003.274l797 +++|          LMC    2RAT&2RCT
16588  M01S00004.274l797 +++|          ZJN    CFS2        IF *AT* (ACS CARTRIDGE TAPE)
16589  M01S00005.274l797 +++| CFS1     LMC    2RTE&2RAT
Line S00100 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16590  M01S00100.ns2719  +++|          NJN    CFSX        IF NOT *TE* (TAPE PSEUDO EQUIPMENT)
16591  M01S00101.ns2719  +++| CFS2     LDD    FS+4
Line S00120 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16592  M01S00120.ns2358  +++|          LPN    4           EXTRACT DEMAND FILE ERROR FLAG
16593  M01S00121.ns2358  +++|          LMN    4
Line S00122 Modification History
M01 (Added by) ns2358
M02 (Removed by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16594  M02S00122.ns2719  ---|          UJP    CIRX        RETURN
Line S00102 Modification History
M01 (Added by) ns2719
Seq #  *Modification Id* Act 
----------------------------+
16595  M01S00102.ns2719  +++|          UJP    CFSX        RETURN
Line S00123 Modification History
M01 (Added by) ns2358
Seq #  *Modification Id* Act 
----------------------------+
16596  M01S00123.ns2358  +++|          SPACE  4,10
16597  M01S00124.ns2358  +++| ODFL     EQU    *+1         *0DF* LOAD ADDRESS
16598  M00S10903.1aj     +++|          ERRNG  BFMS-ODFL-ZDFL  CHECK LENGTH OF *0DF*
16599  M00S10904.1aj     +++|          TTL    1AJ/3AH - *CLB=* SPECIAL ENTRY POINT PROCESSING.
Line S00272 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16600  M01S00272.ns22000 +++|          TITLE
16601  M00S10905.1aj     +++|          QUAL   3AH
Line S10906 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16602  M01S10906.ns22000 ---|          IDENT  3AH,PCLX    PROCESS COMMAND LINE
16603  M01S10907.ns22000 ---|*COMMENT  1AJ - *CLB=* PROCESSING.
Line S00273 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16604  M01S00273.ns22000 +++|          IDENT  3AH,PCLX    *CLB=* ENTRY POINT PROCESSING.
16605  M01S00274.ns22000 +++|*COMMENT  1AJ - *CLB=* ENTRY POINT PROCESSING.
Line S10908 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
16606  M01S10908.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1982.
Line S00013 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
16607  M01S00013.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
Line S10909 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16608  M01S10909.ns22000 ---|
Line S00275 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16609  M01S00275.ns22000 +++|          SPACE  4,10
16610  M01S00276.ns22000 +++|***       3AH - PROCESS *CLB=* ENTRY POINT.
16611  M01S00277.ns22000 +++|          SPACE  4,10
16612  M00S10910.1aj     +++|          ORG    /TCS/O3AF+5
16613  M00S10911.1aj     +++| PCL      SPACE  4,15
16614  M00S10912.1aj     +++|**        PCL - PROCESS COMMAND LINE.
16615  M00S10913.1aj     +++|*
16616  M00S10914.1aj     +++|*         ENTRY  (*TINW*, BITS 35-18) = RELATIVE ADDRESS OF *CLB=* FET.
16617  M00S10915.1aj     +++|*                (FL-100B) = WORD COUNT FOLLOWED BY
16618  M00S10916.1aj     +++|*                            COMMAND LINE TEXT.
16619  M00S10917.1aj     +++|*
16620  M00S10918.1aj     +++|*         EXIT   (TINW, BITS 35-18) = ZERO.
16621  M00S10919.1aj     +++|*                COMMAND LINE TEXT IN INPUT BUFFER.
16622  M00S10920.1aj     +++|*
16623  M00S10921.1aj     +++|*         USES   T1, T2, T3, T4, CM-CM+4, CN-CN+4.
16624  M00S10922.1aj     +++|*
16625  M00S10923.1aj     +++|*         MACROS MONTIOR.
16626  M00S10924.1aj     +++|
16627  M00S10925.1aj     +++|
16628  M00S10926.1aj     +++| PCL      SUBR               ENTRY/EXIT
16629  M00S10927.1aj     +++|          LDD    CP          GET ADDRESS OF FET
16630  M00S10928.1aj     +++|          ADN    TINW
16631  M00S10929.1aj     +++|          CRD    CN
16632  M00S10930.1aj     +++|          LDD    CN+2        SAVE FET ADDRESS
16633  M00S10931.1aj     +++|          SHN    14
16634  M00S10932.1aj     +++|          STD    T1
Line S10933 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
16635  M01S10933.271l716 ---|          STD    CM+1
Line S00021 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
16636  M01S00021.271l716 +++|          STD    CM+3
16637  M00S10934.1aj     +++|          LMD    CN+3
16638  M00S10935.1aj     +++|          SHN    -6
16639  M00S10936.1aj     +++|          STD    T2
Line S10937 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
16640  M01S10937.271l716 ---|          STD    CM+2
Line S00022 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
16641  M01S00022.271l716 +++|          STD    CM+4
16642  M00S10938.1aj     +++|          LDN    3           SET VALIDATION OPTION
Line S10939 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
16643  M01S10939.271l716 ---|          STD    CM+4
Line S00023 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
16644  M01S00023.271l716 +++|          STD    CM+1
16645  M00S10940.1aj     +++|          LDN    0           CLEAR BITS 30-18 IN TINW
16646  M00S10941.1aj     +++|          STD    CN+2
16647  M00S10942.1aj     +++|          LDD    CN+3
16648  M00S10943.1aj     +++|          LPN    77
16649  M00S10944.1aj     +++|          STD    CN+3
16650  M00S10945.1aj     +++|          LDD    CP
16651  M00S10946.1aj     +++|          ADN    TINW
16652  M00S10947.1aj     +++|          CWD    CN
16653  M00S10948.1aj     +++|          MONITOR  VFPM
16654  M00S10949.1aj     +++|          LDD    CM+1
16655  M00S10950.1aj     +++|          ZJN    PCL1        IF NO ERROR
Line S10951 Modification History
M01 (Removed by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
16656  M01S10951.ns2031  ---|          LDC    =C* IEDIT BUFFER ERROR.*
Line S00298 Modification History
M01 (Added by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
16657  M01S00298.ns2031  +++|          LDC    /ERR/EM13   * IEDIT BUFFER ERROR.*
16658  M00S10952.1aj     +++|          LJM    /TCS/ERR1   PROCESS ERROR
16659  M00S10953.1aj     +++|
16660  M00S10954.1aj     +++| PCL1     LDD    RA          GET WORD COUNT
16661  M00S10955.1aj     +++|          ADD    FL
16662  M00S10956.1aj     +++|          SBN    1
16663  M00S10957.1aj     +++|          SHN    6
16664  M00S10958.1aj     +++|          CRD    CM
16665  M00S10959.1aj     +++|          LDD    CM+4
16666  M00S10960.1aj     +++|          NJN    PCL3        IF WORDS TO TRANSFER
16667  M00S10961.1aj     +++| PCL2     LJM    PCLX        RETURN
16668  M00S10962.1aj     +++|
16669  M00S10963.1aj     +++| PCL3     STD    T3          STORE WORD COUNT
16670  M00S10964.1aj     +++|          SBN    77
Line S10965 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
16671  M01S10965.v23l617 ---|          PJN    PCL2        IF ILLEGAL WORD COUNT
Line S00809 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
16672  M01S00809.v23l617 +++|          PJN    PCL2        IF INCORRECT WORD COUNT
16673  M00S10966.1aj     +++|          LDD    MA          READ FET PARAMETERS
16674  M00S10967.1aj     +++|          ADN    2
16675  M00S10968.1aj     +++|          CRD    CM
16676  M00S10969.1aj     +++|          ADN    1
16677  M00S10970.1aj     +++|          CRD    CN
16678  M00S10971.1aj     +++|          LDD    CN+3
16679  M00S10972.1aj     +++|          SHN    14
16680  M00S10973.1aj     +++|          LMD    CN+4
16681  M00S10974.1aj     +++|          SBD    CM+2
16682  M00S10975.1aj     +++|          SHN    6
16683  M00S10976.1aj     +++|          SBD    CM+1
16684  M00S10977.1aj     +++|          SHN    14
16685  M00S10978.1aj     +++|          SBD    T3
16686  M00S10979.1aj     +++|          PJN    PCL4        IF ROOM IN BUFFER
16687  M00S10980.1aj     +++|          RAD    T3          TRUNCATE LINE
16688  M00S10981.1aj     +++| PCL4     LDD    RA          TRANSFER TO PP BUFFER
16689  M00S10982.1aj     +++|          ADD    FL
16690  M00S10983.1aj     +++|          SBN    1
16691  M00S10984.1aj     +++|          SHN    6
16692  M00S10985.1aj     +++|          ADN    1
16693  M00S10986.1aj     +++|          CRM    CLBF,T3
16694  M00S10987.1aj     +++|          LDD    CM+1
16695  M00S10988.1aj     +++|          SHN    6
16696  M00S10989.1aj     +++|          ADD    RA
16697  M00S10990.1aj     +++|          SHN    6
16698  M00S10991.1aj     +++|          ADD    CM+2
16699  M00S10992.1aj     +++|          CWM    CLBF,T3     TRANSFER WORDS TO INPUT BUFFER
16700  M00S10993.1aj     +++|          LDD    T3          UPDATE FET
16701  M00S10994.1aj     +++|          ADD    CM+2
16702  M00S10995.1aj     +++|          STD    CM+4
16703  M00S10996.1aj     +++|          SHN    -14
16704  M00S10997.1aj     +++|          ADD    CM+1
16705  M00S10998.1aj     +++|          STD    CM+3
16706  M00S10999.1aj     +++|          LDN    0
16707  M00S11000.1aj     +++|          STD    CM
16708  M00S11001.1aj     +++|          STD    CM+1
16709  M00S11002.1aj     +++|          STD    CM+2
16710  M00S11003.1aj     +++|          LDD    T1
16711  M00S11004.1aj     +++|          SHN    6
16712  M00S11005.1aj     +++|          ADD    RA
16713  M00S11006.1aj     +++|          SHN    6
16714  M00S11007.1aj     +++|          ADD    T2
16715  M00S11008.1aj     +++|          CRD    CN
16716  M00S11009.1aj     +++|          ADN    2
16717  M00S11010.1aj     +++|          CWD    CM
16718  M00S11011.1aj     +++|          LDD    CN+4
16719  M00S11012.1aj     +++|          LPC    7002
16720  M00S11013.1aj     +++|          LMN    21
16721  M00S11014.1aj     +++|          STD    CN+4
16722  M00S11015.1aj     +++|          LDD    T1
16723  M00S11016.1aj     +++|          SHN    6
16724  M00S11017.1aj     +++|          ADD    RA
16725  M00S11018.1aj     +++|          SHN    6
16726  M00S11019.1aj     +++|          ADD    T2
16727  M00S11020.1aj     +++|          CWD    CN
16728  M00S11021.1aj     +++|          LJM    PCLX        EXIT
16729  M00S11022.1aj     +++|
16730  M00S11023.1aj     +++|
16731  M00S11024.1aj     +++| CLBF     EQU    *
16732  M00S11025.1aj     +++|          ERRNG  BFMS-CLBF-100*5
16733  M00S11026.1aj     +++|          TTL    1AJ/3AI - SEARCH GLOBAL LIBRARY DIRECTORY.
16734  M00S11027.1aj     +++|          TITLE
16735  M00S11028.1aj     +++|          QUAL   3AI
16736  M00S11029.1aj     +++|          IDENT  3AI,SGDX    SEARCH GLOBAL LIBRARY DIRECTORY.
16737  M00S11030.1aj     +++|*COMMENT  1AJ - SEARCH GLOBAL LIBRARY DIRECTORY.
Line S11031 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
16738  M01S11031.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1982.
Line S00014 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
16739  M01S00014.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
16740  M00S11032.1aj     +++|          SPACE  4,10
16741  M00S11033.1aj     +++|***       3AI - SEARCH GLOBAL LIBRARY DIRECTORY.
16742  M00S11034.1aj     +++|*
16743  M00S11035.1aj     +++|*
16744  M00S11036.1aj     +++|*         *3AI* SEARCHES FOR A NAME IN THE GLOBAL LIBRARY
16745  M00S11037.1aj     +++|*         DIRECTORY FILE, *ZZZZZLD*.
16746  M00S11038.1aj     +++|*         THE FORMAT OF THE DIRECTORY FILE IS AS FOLLOWS.
16747  M00S11039.1aj     +++|*T        42/  ENTRY POINT NAME,12/  0,6/  RT
Figure

056171829 RT 0 ENTRY POINT NAME3059 ENTRY POINT NAME

16748  M00S11040.1aj     +++|*T,       24/  RANDOM ADDRESS,36/  0
Figure

029 030353659 0 RANDOM ADDRESS

16749  M00S11041.1aj     +++|*T,       42/  LIBRARY NAME,18/  0
Figure

0171829 0 LIBRARY NAME3059 LIBRARY NAME


Line S11042 Modification History
M01 (Removed by) ns2268
Seq #  *Modification Id* Act 
----------------------------+
16750  M01S11042.ns2268  ---|*T,       12/  FL,11/  0,1/N,36/  0
Figure

029 030353637474859 0N 0 FL


Line S00005 Modification History
M01 (Added by) ns2268
Seq #  *Modification Id* Act 
----------------------------+
16751  M01S00005.ns2268  +++|*T,       12/ FL, 11/ 0, 1/N, 12/ SEPF, 24/ 0
Figure

0232429 0 SEPF30353637474859 SEPFN 0 FL

16752  M00S11043.1aj     +++|*
16753  M00S11044.1aj     +++|*         RT = RECORD TYPE.
16754  M00S11045.1aj     +++|*         FL = FIELD LENGTH.
16755  M00S11046.1aj     +++|*         N = PARAMETER CRACKING FORMAT.
16756  M00S11047.1aj     +++|*             SET IF *NPC=* ENTRY POINT DEFINED.
Line S00006 Modification History
M01 (Added by) ns2268
Seq #  *Modification Id* Act 
----------------------------+
16757  M01S00006.ns2268  +++|*         SEPF = SPECIAL ENTRY POINT FLAGS
16758  M01S00007.ns2268  +++|*               (SEE BYTE 0 OF *SEPW* IN *PPCOM*).
16759  M00S11048.1aj     +++|          SPACE  4,10
16760  M00S11049.1aj     +++|***       DAYFILE MESSAGES.
16761  M00S11050.1aj     +++|*
16762  M00S11051.1aj     +++|*         * GLOBAL LIBRARY DIRECTORY DEFECTIVE.*
16763  M00S11052.1aj     +++|*         THE *ZZZZZLD* FILE IS NOT A GLOBAL LIBRARY DIRECTORY,
16764  M00S11053.1aj     +++|*         OR THE INFORMATION CONTAINED IN THE DIRECTORY IS
16765  M00S11054.1aj     +++|*         INCONSISTENT WITH THE CONTENTS OF THE GLOBAL LIBRARY SET.
16766  M00S11055.1aj     +++|*
16767  M00S11056.1aj     +++|*         * GLOBAL LIBRARY DIRECTORY NOT FOUND.*
16768  M00S11057.1aj     +++|*         THE GLOBAL LIBRARY BIT IN *LB1W* IS SET TO INDICATE
16769  M00S11058.1aj     +++|*         GLOBAL LIBRARY PROCESSING, BUT THE *ZZZZZLD* FILE
16770  M00S11059.1aj     +++|*         WAS NOT FOUND.
16771  M00S11060.1aj     +++|*
16772  M00S11061.1aj     +++|*         * I/O SEQUENCE ERROR.*
16773  M00S11062.1aj     +++|*         THE *ZZZZZLD* DIRECTORY FILE IS BUSY.
16774  M00S11063.1aj     +++|*
16775  M00S11064.1aj     +++|*         * USER LIBRARY NOT FOUND.*
16776  M00S11065.1aj     +++|*         THE ENTRY POINT WAS FOUND IN THE *ZZZZZLD* DIRECTORY
16777  M00S11066.1aj     +++|*         FILE, BUT THE USER LIBRARY IT RESIDES IN WAS NOT FOUND.
16778  M00S11067.1aj     +++|*
16779  M00S11068.1aj     +++|*         * USER LIBRARY NOT ON MASS STORAGE.*
16780  M00S11069.1aj     +++|*         THE ENTRY POINT WAS FOUND IN THE *ZZZZZLD* DIRECTORY
16781  M00S11070.1aj     +++|*         FILE, BUT THE USER LIBRARY IT RESIDES IN DOES NOT
16782  M00S11071.1aj     +++|*         RESIDE ON MASS STORAGE.
16783  M00S11072.1aj     +++|*
16784  M00S11073.1aj     +++|*         * ZZZZZLD NOT ON MASS STORAGE.*
16785  M00S11074.1aj     +++|*         THE DIRECTORY FILE DOES NOT RESIDE ON A MASS STORAGE DEVICE.
16786  M00S11075.1aj     +++|          SPACE  4,10
16787  M00S11076.1aj     +++|***       DIRECT LOCATION ASSIGNMENTS.
16788  M00S11077.1aj     +++|*
16789  M00S11078.1aj     +++|
16790  M00S11079.1aj     +++| RI       EQU    CW+3        RANDOM INDEX (2 LOCATIONS)
16791  M00S11080.1aj     +++| FN       EQU    AB          FILE NAME
16792  M00S11081.1aj     +++| SGD      SPACE  4,30
16793  M00S11082.1aj     +++|**        SGD - SEARCH GLOBAL LIBRARY DIRECTORY.
16794  M00S11083.1aj     +++|*
16795  M00S11084.1aj     +++|*         ENTRY  (AB - AB+3) = ASSEMBLED NAME LEFT JUSTIFIED.
16796  M00S11085.1aj     +++|*
16797  M00S11086.1aj     +++|*         EXIT   LJM IN *CGLB* SET TO -
16798  M00S11087.1aj     +++|*                  *SSC* IF PROGRAM RELOCATABLE OR *CCL* PROCEDURE,
16799  M00S11088.1aj     +++|*                  *SCL7* TO CHECK FIELD LENGTH IF PROGRAM ABSOLUTE,
16800  M00S11089.1aj     +++|*                  TO *TCS*, IF ENTRY NOT FOUND.
16801  M00S11090.1aj     +++|*                IF PROGRAM IS ABSOLUTE -
16802  M00S11091.1aj     +++|*                  (AB - AB+3) = USER LIBRARY WHERE ENTRY POINT IS
16803  M00S11092.1aj     +++|*                                FOUND.
16804  M00S11093.1aj     +++|*                  (FS - FS+3) = ENTRY POINT NAME.
16805  M00S11094.1aj     +++|*                  (FS+4) = TRACK.
16806  M00S11095.1aj     +++|*                  (CW) = REQUIRED FIELD LENGTH.
Line S11096 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16807  M01S11096.ns22000 ---|*                  (CW+1) = EQUIPMENT NUMBER THE LIBRARY RESIDES ON.
Line S00278 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16808  M01S00278.ns22000 +++|*                  (CW+1) = EST ORDINAL THE LIBRARY RESIDES ON.
16809  M00S11097.1aj     +++|*                  (CW+3) = TRACK.
16810  M00S11098.1aj     +++|*                  (CW+4) = SECTOR.
16811  M00S11099.1aj     +++|*
16812  M00S11100.1aj     +++|*         ERROR  TO */TCS/ERR1* IF ERROR IN DIRECTORY FILE OR
16813  M00S11101.1aj     +++|*                USER LIBRARY.
Line S00529 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
16814  M01S00529.242l642 +++|*                TO *MSR*, IF MASS STORAGE ERROR.
16815  M00S11102.1aj     +++|*
16816  M00S11103.1aj     +++|*         USES   FA, RI+1, AB - AB+4, CM - CM+4, CW - CW+4, FS - FS+4,
16817  M00S11104.1aj     +++|*                T1 - T3, T5 - T7.
16818  M00S11105.1aj     +++|*
16819  M00S11106.1aj     +++|*         CALLS  CRA, RNS, SAF, SFB.
16820  M00S11107.1aj     +++|*
Line S11108 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16821  M01S11108.ns22000 ---|*         MACROS ENDMS, MONITOR, NFA, SETMS.
Line S00279 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16822  M01S00279.ns22000 +++|*         MACROS ENDMS, MONITOR, NFA, SETMS, SFA.
16823  M00S11109.1aj     +++|
16824  M00S11110.1aj     +++|
16825  M00S11111.1aj     +++|          ORG    OVL+5
16826  M00S11112.1aj     +++|
16827  M00S11113.1aj     +++| SGD      SUBR               ENTRY/EXIT
16828  M00S11114.1aj     +++|          LDD    MA          PP MESSAGE BUFFER ADDRESS
16829  M00S11115.1aj     +++|          CWD    AB          SWAP NAME FROM (AB - AB+3) TO *SGDC*
16830  M00S11116.1aj     +++|          CRM    SGDC,ON
16831  M00S11117.1aj     +++|          SBN    1
16832  M00S11118.1aj     +++|          CWM    SGDB,ON     PUT *ZZZZZLD* INTO (AB - AB+3)
16833  M00S11119.1aj     +++|          SBN    1           RESET (A) TO BUFFER ADDRESS
16834  M00S11120.1aj     +++|          CRD    AB          (AB - AB+3) CONTAINS *ZZZZZLD*
16835  M00S11121.1aj     +++|          RJM    SAF         SEARCH FOR ASSIGNED FILE
16836  M00S11122.1aj     +++|          STD    T6          STORE FILE NOT FOUND FLAG
16837  M00S11123.1aj     +++|          LDD    MA          SWAP NAME BACK INTO (AB - AB+3)
16838  M00S11124.1aj     +++|          CWM    SGDC,ON
16839  M00S11125.1aj     +++|          SBN    1
16840  M00S11126.1aj     +++|          CRD    AB
16841  M00S11127.1aj     +++|          LDD    T6          CHECK FILE NOT FOUND FLAG
16842  M00S11128.1aj     +++|          ZJN    SGD2        IF DIRECTORY FILE MISSING
16843  M00S11129.1aj     +++|          RJM    SFB         SET FILE BUSY
16844  M00S11130.1aj     +++|          ZJN    SGD3        IF FILE SET BUSY
Line S11131 Modification History
M01 (Removed by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
16845  M01S11131.ns2031  ---|          LDC    SGDF
Line S00299 Modification History
M01 (Added by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
16846  M01S00299.ns2031  +++|          LDC    /ERR/EM15   * I/O SEQUENCE ERROR.*
16847  M00S11132.1aj     +++| SGD1     STM    SGDA        SET ERROR MESSAGE
16848  M00S11133.1aj     +++| SGD2     LDD    CP          CLEAR GLOBAL LIBRARY BITS
16849  M00S11134.1aj     +++|          ADC    LB1W
16850  M00S11135.1aj     +++|          STD    T1
16851  M00S11136.1aj     +++|          CRD    CM
16852  M00S11137.1aj     +++|          LDD    CM
16853  M00S11138.1aj     +++|          LPC    5774
16854  M00S11139.1aj     +++|          STD    CM
16855  M00S11140.1aj     +++|          LDD    T1
16856  M00S11141.1aj     +++|          CWD    CM
16857  M00S11142.1aj     +++|          LDN    0           CLEAR FNT ADDRESS
16858  M00S11143.1aj     +++|          STD    FA
Line S11144 Modification History
M01 (Removed by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
16859  M01S11144.ns2031  ---|          LDC    SGDE        * GLOBAL LIBRARY DIRECTORY NOT FOUND.*
16860  M01S11145.ns2031  ---|*         LDC    SGDF        (* I/O SEQUENCE ERROR.*)
16861  M01S11146.ns2031  ---|*         LDC    SGDG        (* ZZZZZLD NOT ON MASS STORAGE.*)
Line S00300 Modification History
M01 (Added by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
16862  M01S00300.ns2031  +++|          LDC    /ERR/EM14   * GLOBAL LIBRARY DIRECTORY NOT FOUND.*
16863  M01S00301.ns2031  +++|*         LDC    /ERR/EM15   (* I/O SEQUENCE ERROR.*)
16864  M01S00302.ns2031  +++|*         LDC    /ERR/EM16   (* ZZZZZLD NOT ON MASS STORAGE.*)
16865  M00S11147.1aj     +++| SGDA     EQU    *-1         (ERROR MESSAGE TO BE ISSUED)
16866  M00S11148.1aj     +++|          LJM    /TCS/ERR1   PROCESS ERROR
16867  M00S11149.1aj     +++|
Line S11150 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16868  M01S11150.ns22000 ---| SGD3     LDD    FS          SET EQUIPMENT NUMBER
Line S00280 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16869  M01S00280.ns22000 +++| SGD3     LDD    FS          SET EST ORDINAL
16870  M00S11151.1aj     +++|          LPC    777
16871  M00S11152.1aj     +++|          STD    T5
Line S11153 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16872  M01S11153.ns22000 ---|          ADM    ESTS        READ EST ENTRY
Line S00281 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
16873  M01S00281.ns22000 +++|          SFA    EST         READ EST ENTRY
16874  M01S00282.ns22000 +++|          ADK    EQDE
16875  M00S11154.1aj     +++|          CRD    CM
16876  M00S11155.1aj     +++|          LDD    CM
16877  M00S11156.1aj     +++|          SHN    21-13
16878  M00S11157.1aj     +++|          MJN    SGD4        IF MASS STORAGE
16879  M00S11158.1aj     +++|          AOD    FS+4        SET FILE NOT BUSY
16880  M00S11159.1aj     +++|          NFA    FA,R        STORE FST ENTRY
16881  M00S11160.1aj     +++|          ADN    FSTL
16882  M00S11161.1aj     +++|          CWD    FS
Line S11162 Modification History
M01 (Removed by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
16883  M01S11162.ns2031  ---|          LDC    SGDG
Line S00303 Modification History
M01 (Added by) ns2031
Seq #  *Modification Id* Act 
----------------------------+
16884  M01S00303.ns2031  +++|          LDC    /ERR/EM16   * ZZZZZLD NOT ON MASS STORAGE.*
16885  M00S11163.1aj     +++|          LJM    SGD1        PROCESS ERROR
16886  M00S11164.1aj     +++|
Line S11165 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
16887  M01S11165.242l642 ---| SGD4     SETMS  READ,NE     LOAD PROPER DRIVER
Line S00530 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
16888  M01S00530.242l642 +++| SGD4     SETMS  IO
16889  M00S11166.1aj     +++|          LDD    FS+1        SET TO FIRST TRACK AND SECTOR
16890  M00S11167.1aj     +++|          STD    T6          FIRST TRACK
16891  M00S11168.1aj     +++|          LDN    FSMS
16892  M00S11169.1aj     +++|          STD    T7          FIRST SECTOR(SKIP SYSTEM SECTOR)
16893  M00S11170.1aj     +++| SGD5     LDC    BFMS
16894  M00S11171.1aj     +++|          RJM    RNS         READ NEXT SECTOR
Line S00531 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
16895  M01S00531.242l642 +++|          MJP    MSR         IF MASS STORAGE ERROR
16896  M00S11172.1aj     +++|          NJN    SGD7        IF NOT EMPTY SECTOR
16897  M00S11173.1aj     +++|
16898  M00S11174.1aj     +++|*         NAME NOT FOUND IN DIRECTORY, SET FILE NOT BUSY AND RETURN.
16899  M00S11175.1aj     +++|
16900  M00S11176.1aj     +++| SGD6     ENDMS
16901  M00S11177.1aj     +++|          LDD    FS+4        SET OPERATION COMPLETE
16902  M00S11178.1aj     +++|          SCN    77
16903  M00S11179.1aj     +++|          LMN    5
16904  M00S11180.1aj     +++|          STD    FS+4
16905  M00S11181.1aj     +++|          NFA    FA,R        STORE FST ENTRY
16906  M00S11182.1aj     +++|          ADN    FSTL
16907  M00S11183.1aj     +++|          CWD    FS
16908  M00S11184.1aj     +++|          LJM    SGDX        RETURN
16909  M00S11185.1aj     +++|
16910  M00S11186.1aj     +++|*         SEARCH THROUGH DIRECTORY.
16911  M00S11187.1aj     +++|
16912  M00S11188.1aj     +++| SGD7     LDC    BFMS+2      INITIAL PP WORD IN BUFFER
16913  M00S11189.1aj     +++|          STD    T2
16914  M00S11190.1aj     +++|          LDN    1           INITIAL CM WORD IN BUFFER
16915  M00S11191.1aj     +++|          STD    T3
16916  M00S11192.1aj     +++| SGD8     LDD    T1          READ WORDS TRANSFERRED
16917  M00S11193.1aj     +++|          SBD    T3          CM WORD LOCATION IN BUFFER
16918  M00S11194.1aj     +++|          PJN    SGD9        IF MORE ENTRIES IN BUFFER
16919  M00S11195.1aj     +++|          LDD    T1          CHECK FOR SHORT SECTOR(EOR OR EOF)
16920  M00S11196.1aj     +++|          SHN    -6
16921  M00S11197.1aj     +++|          NJN    SGD5        IF FULL SECTOR WAS TRANSFERRED
16922  M00S11198.1aj     +++|          UJN    SGD6        EXIT, ENTRY NOT FOUND
16923  M00S11199.1aj     +++|
16924  M00S11200.1aj     +++| SGD9     LDI    T2          COMPARE ENTRY POINT NAME
16925  M00S11201.1aj     +++|          LMD    AB
16926  M00S11202.1aj     +++|          NJN    SGD10       IF NO MATCH
16927  M00S11203.1aj     +++|          LDM    1,T2
16928  M00S11204.1aj     +++|          LMD    AB+1
16929  M00S11205.1aj     +++|          NJN    SGD10       IF NO MATCH
16930  M00S11206.1aj     +++|          LDM    2,T2
16931  M00S11207.1aj     +++|          LMD    AB+2
16932  M00S11208.1aj     +++|          NJN    SGD10       IF NO MATCH
16933  M00S11209.1aj     +++|          LDM    3,T2
16934  M00S11210.1aj     +++|          LMD    AB+3
16935  M00S11211.1aj     +++|          SCN    77
16936  M00S11212.1aj     +++|          ZJN    SGD11       IF ENTRY POINT FOUND
16937  M00S11213.1aj     +++| SGD10    LDN    4           INCREMENT CM WORD COUNT
16938  M00S11214.1aj     +++|          RAD    T3
16939  M00S11215.1aj     +++|          LDN    20D         INCREMENT PP WORD COUNT
16940  M00S11216.1aj     +++|          RAD    T2
16941  M00S11217.1aj     +++|          UJN    SGD8        CHECK NEXT ENTRY
16942  M00S11218.1aj     +++|
16943  M00S11219.1aj     +++|*         ENTRY FOUND IN DIRECTORY, CHECK ITS TYPE.
16944  M00S11220.1aj     +++|
16945  M00S11221.1aj     +++| SGD11    ENDMS
16946  M00S11222.1aj     +++|          AOD    FS+4        SET FILE NOT BUSY
16947  M00S11223.1aj     +++|          NFA    FA,R
16948  M00S11224.1aj     +++|          ADN    FSTL
16949  M00S11225.1aj     +++|          CWD    FS
Line S00001 Modification History
M01 (Added by) 1aj22
Seq #  *Modification Id* Act 
----------------------------+
16950  M01S00001.1aj22   +++|          LDM    3*5+1,T2    SET PARAMETER CRACKING FORMAT
16951  M01S00002.1aj22   +++|          LPN    1
16952  M01S00003.1aj22   +++|          RAM    /TCS/ARGA
16953  M01S00004.1aj22   +++|          LDC    UJNI+/TCS/SCL5-/TCS/SCLD  DISABLE CHANGE IN CRACKING
16954  M01S00005.1aj22   +++|          STM    /TCS/SCLD
16955  M00S11226.1aj     +++|          LDM    4,T2        CHECK FOR VALID RECORD TYPES
16956  M00S11227.1aj     +++|          LMN    ABRT
16957  M00S11228.1aj     +++|          NJN    SGD12       IF NOT AN ABSOLUTE OVERLAY
Line S11229 Modification History
M01 (Removed by) ns2201
Seq #  *Modification Id* Act 
----------------------------+
16958  M01S11229.ns2201  ---|          LJM    SGD17       PROCESS ABSOLUTE OVERLAY
16959  M01S11230.ns2201  ---|
16960  M01S11231.ns2201  ---| SGD12    LMN    RLRT&ABRT
Line S00001 Modification History
M01 (Added by) ns2201
Seq #  *Modification Id* Act 
----------------------------+
16961  M01S00001.ns2201  +++| SGD11.1  LJM    SGD17       PROCESS *ABS* OR *OVL* LOAD
16962  M01S00002.ns2201  +++|
16963  M01S00003.ns2201  +++| SGD12    LMN    OVRT&ABRT
16964  M01S00004.ns2201  +++|          ZJN    SGD11.1     IF *OVL* LEVEL (0,0)
16965  M01S00005.ns2201  +++|          LMN    RLRT&OVRT
Proceed to Part 13
cdc/nos2.source/opl.opl871/deck/1aj.012.txt ยท Last modified: by 127.0.0.1