User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:1sj.003

Deck 1SJ Part 003

101 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
03370  M00S02094.1sj     +++|          ENDMS
Line S02095 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03371  M01S02095.ns21000 ---|          LJM    SSS2        CONTINUE
Line S00007 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03372  M01S00007.ns21000 +++|          LDM    SISS
03373  M01S00008.ns21000 +++|          LMC    RDSI
Line S00009 Modification History
M01 (Added by) ns21000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03374  M02S00009.271l716 ---|          NJN    SSS0        IF NOT *RDF*
Line S00477 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03375  M01S00477.271l716 +++|          NJN    SSS1        IF NOT *RDF*
Line S00010 Modification History
M01 (Added by) ns21000
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03376  M02S00010.242l642 ---|          LDC    IFSI        TREAT AS *IAF*
Line S00061 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03377  M01S00061.242l642 +++|          LCN    7777-IFSI   TREAT AS *IAF*
Line S00011 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
03378  M01S00011.ns21000 +++|          STM    SISS
Line S00012 Modification History
M01 (Added by) ns21000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03379  M02S00012.271l716 ---| SSS0     LJM    SSS2        CONTINUE
Line S00478 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03380  M01S00478.271l716 +++| SSS1     LJM    SSS4        CONTINUE
03381  M00S02096.1sj     +++|
03382  M00S02097.1sj     +++|*         AN I/O ERROR OCCURRED WHILE READING THE SYSTEM SECTOR OR THE
03383  M00S02098.1sj     +++|*         SUBSYSTEM IS ALREADY ACTIVE OR THE REQUIRED CONTROL POINT IS
03384  M00S02099.1sj     +++|*         OCCUPIED BY ANOTHER SUBSYSTEM.  SET AN ERROR FLAG IN THE EJT
03385  M00S02100.1sj     +++|*         ENTRY AND CONTINUE.  THE JOB WILL BE ABORTED BY *1AJ*.
03386  M00S02101.1sj     +++|
Line S02102 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03387  M01S02102.271l716 ---| SSS1     LDD    EJ          SET *SSET* ERROR FLAG IN EJT
Line S00479 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03388  M01S00479.271l716 +++| SSS2     LDD    EJ          SET *SSET* ERROR FLAG IN EJT
03389  M00S02103.1sj     +++|          STD    CM+3
03390  M00S02104.1sj     +++|          LDD    EJ+1
03391  M00S02105.1sj     +++|          STD    CM+4
03392  M00S02106.1sj     +++|          LDD    EO
03393  M00S02107.1sj     +++|          STD    CM+2
03394  M00S02108.1sj     +++|          LDC    SSET+4000
03395  M00S02109.1sj     +++|          STD    CM+1
03396  M00S02110.1sj     +++|          MONITOR  CEFM
Line S02111 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03397  M01S02111.242l642 ---|*         LDN    0
03398  M01S02112.242l642 ---|          STD    JC          FORCE CONTROL POINT SELECTION
Line S00005 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03399  M02S00005.242l642 ---|          STD    T1
Line S02113 Modification History
M01 (Removed by) 1sj21
Seq #  *Modification Id* Act 
----------------------------+
03400  M01S02113.1sj21   ---|          LDN    BCSC        PREVENT *ASJ* FROM UPDATING SSAT
03401  M01S02114.1sj21   ---|          STD    SP
03402  M00S02115.1sj     +++|          LDN    1           SELECT NO QFT OPTION ON *RJSM*
03403  M00S02116.1sj     +++|          STD    CM+1
03404  M00S02117.1sj     +++|          MONITOR  RJSM      GET JSN
03405  M00S02118.1sj     +++|          LDD    CM+3
Line S02119 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03406  M01S02119.271l716 ---|          STM    SSSA+3
Line S00480 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03407  M01S00480.271l716 +++|          STM    SSSB+3
03408  M00S02120.1sj     +++|          LDD    CM+4
Line S02121 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03409  M01S02121.271l716 ---|          STM    SSSA+4
03410  M01S02122.271l716 ---|          LDC    SSSA+1*10000
Line S00481 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03411  M01S00481.271l716 +++|          STM    SSSB+4
03412  M01S00482.271l716 +++|          LDC    SSSB+1*10000
03413  M00S02123.1sj     +++|          RJM    IUT         ISSUE *UTEM*
Line S02124 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03414  M01S02124.ns22000 ---|          UJN    SSS4        CONTINUE SCHEDULING JOB
Line S00163 Modification History
M01 (Added by) ns22000
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03415  M02S00163.242l642 ---|          LJM    SSS4        CONTINUE SCHEDULING JOB
Line S00062 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03416  M01S00062.242l642 +++|          LDN    0
Line S00063 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03417  M02S00063.271l716 ---| SSS1.1   LJM    SSS4        CONTINUE SCHEDULING JOB
Line S00483 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03418  M01S00483.271l716 +++| SSS3     LJM    SSS8        CONTINUE SCHEDULING
03419  M00S02125.1sj     +++|
03420  M00S02126.1sj     +++|*         GET CP NUMBER (IF ANY) FROM SSCT AND CHECK SSAT TO SEE IF THE
03421  M00S02127.1sj     +++|*         SUBSYSTEM IS ALREADY ACTIVE.
Line S00164 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03422  M01S00164.ns22000 +++|*         FOR *DSP* INITIATED SUBSYSTEMS, CP NUMBER AND SSID ARE TAKEN
03423  M01S00165.ns22000 +++|*         FROM THE SYSTEM SECTOR.
03424  M00S02128.1sj     +++|
Line S02129 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03425  M01S02129.ns22000 ---| SSS2     LDD    EJ+4
Line S00166 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03426  M02S00166.1sj30a  ---| SSS2     LDM    CPSS
03427  M02S00167.1sj30a  ---|          ZJN    SSS2.2      IF NOT SPECIFIED IN SYSTEM SECTOR
03428  M02S00168.1sj30a  ---|          SBD    NC
Line S00169 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1sj27
M03 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03429  M03S00169.1sj30a  ---|          SBN    1
Line S00170 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03430  M02S00170.1sj30a  ---|          PJN    SSS2.1      IF ILLEGAL CP NUMBER
03431  M02S00171.1sj30a  ---|          LDM    CPSS
03432  M02S00172.1sj30a  ---|          LJM    SSS7        USE SPECIFIED CP NUMBER
03433  M02S00173.1sj30a  ---|
03434  M02S00174.1sj30a  ---| SSS2.1   LDN    0           CLEAR ILLEGAL CP NUMBER
Line S00004 Modification History
M01 (Added by) ns2232
M02 (Removed by) 1sj30
M03 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03435  M03S00004.1sj30a  ---|          STD    JC
Line S00175 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03436  M02S00175.1sj30a  ---|          STM    CPSS
Line S00176 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1sj30
M03 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03437  M03S00176.1sj30a  ---| SSS2.2   LDD    EJ+4
Line S02130 Modification History
M01 (Removed by) 1sj30
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03438  M02S02130.1sj30a  ---|          LPN    76
03439  M02S02131.1sj30a  ---|          LMK    PRJS*2
Line S00006 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03440  M02S00006.1sj30a  ---| SSS2.2   LDC    **          (JOB STATUS)
03441  M02S00007.1sj30a  ---| SSSD     EQU    *-1
Line S02132 Modification History
M01 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03442  M01S02132.1sj30a  ---|          NJN    SSS3        IF NOT PRE-INITIAL JOB STATE
Line S00177 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03443  M02S00177.1sj30a  ---|          LDM    SISS
Line S00042 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03444  M02S00042.271l716 ---| SSS2     LDM    SISS
Line S00484 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03445  M01S00484.271l716 +++| SSS4     LDM    SISS
Line S00178 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1sj26
Seq #  *Modification Id* Act 
----------------------------+
03446  M02S00178.1sj26   ---|          ADC    -LSSI
Line S00001 Modification History
M01 (Added by) 1sj26
M02 (Removed by) ns2181b
Seq #  *Modification Id* Act 
----------------------------+
03447  M02S00001.ns2181b ---|          SBK    LSSI+1
Line S00012 Modification History
M01 (Added by) ns2181b
Seq #  *Modification Id* Act 
----------------------------+
03448  M01S00012.ns2181b +++|          SBK    DSSI
Line S00013 Modification History
M01 (Added by) ns2181b
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03449  M02S00013.242l642 ---|          ZJP    SSS3.2      IF DEADSTART SEQUENCING JOB
Line S00064 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03450  M02S00064.271l716 ---|          ZJN    SSS1.1      IF DEADSTART SEQUENCING JOB
Line S00485 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03451  M01S00485.271l716 +++|          ZJN    SSS3        IF DEADSTART SEQUENCING JOB
Line S00014 Modification History
M01 (Added by) ns2181b
Seq #  *Modification Id* Act 
----------------------------+
03452  M01S00014.ns2181b +++|          SBK    LSSI+1-DSSI
Line S00179 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1sj30
Seq #  *Modification Id* Act 
----------------------------+
03453  M02S00179.1sj30   ---|          MJP    SSS4        IF SUBSYSTEM NOT IN *SSCT*
Line S00008 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03454  M02S00008.1sj30a  ---|          MJN    SSS3.0      IF SUBSYSTEM NOT IN SSCT
Line S00043 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03455  M02S00043.242l642 ---|          MJN    SSS2.2      IF SUBSYSTEM NOT IN SSCT
Line S00065 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03456  M02S00065.271l716 ---|          MJN    SSS3        IF SUBSYSTEM NOT IN SSCT
Line S00486 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03457  M01S00486.271l716 +++|          MJN    SSS6        IF SUBSYSTEM NOT IN SSCT
Line S00044 Modification History
M01 (Added by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03458  M01S00044.1sj30a  +++|          LDC    **          (JOB STATUS)
Line S00045 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03459  M02S00045.271l716 ---| SSSD     EQU    *-1
03460  M02S00046.271l716 ---|          NJN    SSS2.1      IF NOT PRE-INITIAL JOB STATE
Line S00487 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03461  M01S00487.271l716 +++| SSSA     EQU    *-1
03462  M01S00488.271l716 +++|          NJN    SSS5        IF NOT PRE-INITIAL JOB STATE
03463  M00S02133.1sj     +++|          LDC    FEAF*10000
03464  M00S02134.1sj     +++|          LMM    SISS
03465  M00S02135.1sj     +++|          RJM    AST         GET SSAT ENTRY
Line S02136 Modification History
M01 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03466  M01S02136.1sj30a  ---|          ZJN    SSS3        IF SUBSYSTEM IS INACTIVE
Line S00047 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03467  M02S00047.271l716 ---|          ZJN    SSS2.1      IF SUBSYSTEM IS INACTIVE
Line S00489 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03468  M01S00489.271l716 +++|          ZJN    SSS5        IF SUBSYSTEM IS INACTIVE
Line S00010 Modification History
M01 (Added by) ns2244
M02 (Removed by) ns2746
Seq #  *Modification Id* Act 
----------------------------+
03469  M02S00010.ns2746  ---|          LDC    PLSI        CHECK FOR PLATO
Line S00003 Modification History
M01 (Added by) ns2746
Seq #  *Modification Id* Act 
----------------------------+
03470  M01S00003.ns2746  +++|          LDC    PLSI        CHECK FOR CYBIS
Line S00011 Modification History
M01 (Added by) ns2244
Seq #  *Modification Id* Act 
----------------------------+
03471  M01S00011.ns2244  +++|          LMM    SISS
Line S00012 Modification History
M01 (Added by) ns2244
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03472  M02S00012.1sj30a  ---|          ZJN    SSS3.1      IF BUSY
Line S00048 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03473  M02S00048.271l716 ---|          ZJN    SSS2.1      IF INITIATING PLATO
Line S02137 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03474  M01S02137.271l716 ---|          LJM    SSS1        GO SET ERROR FLAG
03475  M01S02138.271l716 ---|
Line S02139 Modification History
M01 (Removed by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03476  M02S02139.271l716 ---| SSS3     LDM    SISS
Line S00002 Modification History
M01 (Added by) 1sj26
M02 (Removed by) 1sj30a
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03477  M03S00002.271l716 ---|          SBK    LSSI+1
Line S00003 Modification History
M01 (Added by) 1sj26
M02 (Removed by) 1sj30
M03 (Removed by) 1sj30a
M04 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03478  M04S00003.271l716 ---|          MJN    SSS4        IF SUBSYSTEM NOT IN THE *SSCT* TABLE
Line S00009 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 1sj30a
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03479  M03S00009.271l716 ---| SSS3.0   MJN    SSS3.1      IF SUBSYSTEM NOT IN SSCT
Line S00004 Modification History
M01 (Added by) 1sj26
M02 (Removed by) 1sj30a
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03480  M03S00004.271l716 ---|          LDM    SISS
Line S00049 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03481  M02S00049.271l716 ---| SSS2.1   LDM    SISS
Line S02140 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03482  M01S02140.271l716 ---|          LMK    FECF*10000
Line S00490 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2746
Seq #  *Modification Id* Act 
----------------------------+
03483  M02S00490.ns2746  ---|          ZJN    SSS5        IF INITIATING PLATO
Line S00004 Modification History
M01 (Added by) ns2746
Seq #  *Modification Id* Act 
----------------------------+
03484  M01S00004.ns2746  +++|          ZJN    SSS5        IF INITIATING CYBIS
Line S00491 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03485  M01S00491.271l716 +++|          LJM    SSS2        SET ERROR FLAG
03486  M01S00492.271l716 +++|
03487  M01S00493.271l716 +++| SSS5     LDM    SISS
03488  M01S00494.271l716 +++|*         LMK    FECF*10000
03489  M01S00495.271l716 +++|          ERRNZ  FECF        CODE DEPENDS ON VALUE
03490  M00S02141.1sj     +++|          RJM    AST         GET SSCT ENTRY
03491  M00S02142.1sj     +++|          LPN    37
Line S00010 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03492  M02S00010.1sj30a  ---|          NJN    SSS7        IF CONTROL POINT SPECIFIED IN SSCT
Line S02143 Modification History
M01 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03493  M01S02143.1sj30a  ---|
03494  M01S02144.1sj30a  ---|*         IF CONTROL POINT IS NOT SPECIFIED IN SSCT, SELECT ONE.
Line S00050 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03495  M02S00050.271l716 ---|          STD    JC
Line S00496 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03496  M01S00496.271l716 +++|          STD    TP
Line S00051 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03497  M02S00051.242l642 ---| SSS2.2   LDM    CPSS        CHECK SYSTEM SECTOR FOR CONTROL POINT
Line S00066 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03498  M02S00066.271l716 ---| SSS3     LDM    CPSS        CHECK SYSTEM SECTOR FOR CONTROL POINT
Line S00497 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03499  M01S00497.271l716 +++| SSS6     LDM    CPSS        CHECK SYSTEM SECTOR FOR CONTROL POINT
Line S00001 Modification History
M01 (Added by) ns2785
Seq #  *Modification Id* Act 
----------------------------+
03500  M01S00001.ns2785  +++|          ZJN    SSS7        IF CONTROL POINT NOT SPECIFIED
03501  M01S00002.ns2785  +++|          LMN    77
03502  M01S00003.ns2785  +++|          ZJN    SSS8        IF ANY AVAILABLE CONTROL POINT SELECTED
03503  M01S00004.ns2785  +++|          LMN    77
Line S00052 Modification History
M01 (Added by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03504  M01S00052.1sj30a  +++|          SBD    NC
Line S00053 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03505  M02S00053.242l642 ---|          PJN    SSS2.3      IF ILLEGAL CP NUMBER
Line S00067 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03506  M02S00067.271l716 ---|          PJN    SSS3.1      IF ILLEGAL CP NUMBER
Line S00498 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2785
Seq #  *Modification Id* Act 
----------------------------+
03507  M02S00498.ns2785  ---|          PJN    SSS7        IF INCORRECT CP NUMBER
Line S00054 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) ns2785
Seq #  *Modification Id* Act 
----------------------------+
03508  M02S00054.ns2785  ---|          ADD    NC
Line S00055 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 242l642
M03 (Removed by) ns2785
Seq #  *Modification Id* Act 
----------------------------+
03509  M03S00055.ns2785  ---|          NJN    SSS2.4      IF CONTROL POINT SPECIFIED
03510  M03S00056.ns2785  ---| SSS2.3   LDN    0           CLEAR ILLEGAL CP NUMBER
Line S00068 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
M03 (Removed by) ns2785
Seq #  *Modification Id* Act 
----------------------------+
03511  M03S00068.ns2785  ---|          NJN    SSS3.2      IF CONTROL POINT SPECIFIED
03512  M03S00069.ns2785  ---| SSS3.1   LDN    0           CLEAR ILLEGAL CP NUMBER
Line S00499 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2785
Seq #  *Modification Id* Act 
----------------------------+
03513  M02S00499.ns2785  ---|          NJN    SSS10       IF CONTROL POINT SPECIFIED
03514  M02S00500.ns2785  ---| SSS7     LDN    0           CLEAR INCORRECT CP NUMBER
Line S00005 Modification History
M01 (Added by) ns2785
Seq #  *Modification Id* Act 
----------------------------+
03515  M01S00005.ns2785  +++|          MJN    SSS10       IF CORRECT CONTROL POINT SPECIFIED
03516  M01S00006.ns2785  +++|          LDN    0           CLEAR INCORRECT CP NUMBER
Line S00057 Modification History
M01 (Added by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03517  M01S00057.1sj30a  +++|          STM    CPSS
Line S00058 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03518  M02S00058.271l716 ---|          LDD    JC
Line S00059 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03519  M03S00059.271l716 ---| SSS2.4   NJN    SSS7        IF CONTROL POINT SPECIFIED
Line S00070 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03520  M02S00070.271l716 ---| SSS3.2   NJN    SSS7        IF CONTROL POINT SPECIFIED
Line S02145 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03521  M01S02145.271l716 ---|
Line S02146 Modification History
M01 (Removed by) ns2244
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03522  M02S02146.271l716 ---|          NJN    SSS7        IF CONTROL POINT IS SPECIFIED IN SSCT
Line S00013 Modification History
M01 (Added by) ns2244
M02 (Removed by) 1sj30
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03523  M03S00013.271l716 ---|          NJP    SSS7        IF CONTROL POINT IS SPECIFIED IN SSCT
Line S00007 Modification History
M01 (Added by) 1sj16
M02 (Removed by) 1sj30a
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03524  M03S00007.271l716 ---|          LDD    SP          CHECK SERVICE CLASS
Line S00060 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03525  M02S00060.271l716 ---|*         IF CONTROL POINT IS NOT SPECIFIED, SELECT ONE.
03526  M02S00061.271l716 ---|
Line S00062 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03527  M03S00062.271l716 ---| SSS3     LDD    SP          CHECK SERVICE CLASS
Line S00071 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03528  M02S00071.271l716 ---|          LDD    SP          CHECK SERVICE CLASS
Line S00008 Modification History
M01 (Added by) 1sj16
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03529  M02S00008.271l716 ---|          LMN    DSSC
Line S00009 Modification History
M01 (Added by) 1sj16
M02 (Removed by) ns2181b
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03530  M03S00009.271l716 ---|          STD    T1
03531  M03S00010.271l716 ---|          ZJN    SSS4        IF DEADSTART SERVICE CLASS
Line S00015 Modification History
M01 (Added by) ns2181b
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03532  M03S00015.271l716 ---|          ZJN    SSS3.2      IF DEADSTART SERVICE CLASS
Line S00011 Modification History
M01 (Added by) 1sj16
M02 (Removed by) ns2244
M03 (Removed by) 242l642
M04 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03533  M04S00011.271l716 ---|          LDD    NC          COMPUTE ASSIGNMENT RANGE
Line S00014 Modification History
M01 (Added by) ns2244
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03534  M03S00014.271l716 ---| SSS3.1   LDD    NC          COMPUTE ASSIGNMENT RANGE
Line S00072 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03535  M02S00072.271l716 ---|          ZJN    SSS4        IF DEADSTART SERVICE CLASS
03536  M02S00073.271l716 ---|          LDD    NC          COMPUTE ASSIGNMENT RANGE
Line S00012 Modification History
M01 (Added by) 1sj16
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03537  M02S00012.271l716 ---|          SHN    -2
Line S00013 Modification History
M01 (Added by) 1sj16
M02 (Removed by) ns2181b
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03538  M03S00013.271l716 ---|          STD    T1
Line S00016 Modification History
M01 (Added by) ns2181b
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03539  M03S00016.271l716 ---| SSS3.2   STD    T1          SET BEGINNING CONTROL POINT
Line S00074 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03540  M02S00074.271l716 ---|          STD    T1          SET BEGINNING CONTROL POINT
Line S00014 Modification History
M01 (Added by) 1sj16
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03541  M02S00014.271l716 ---|          LDD    NC
03542  M02S00015.271l716 ---|          SBD    T1
03543  M02S00016.271l716 ---|          STD    NC
Line S02147 Modification History
M01 (Removed by) ns2244
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03544  M02S02147.271l716 ---| SSS4     RJM    SCP         SELECT A CONTROL POINT
Line S00015 Modification History
M01 (Added by) ns2244
M02 (Removed by) 1sj30
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03545  M03S00015.271l716 ---| SSS4     LDN    0           ENSURE CONTROL POINT SELECTION
03546  M03S00016.271l716 ---|          STD    JC
03547  M03S00017.271l716 ---|          RJM    SCP         SELECT CONTROL POINT
Line S00011 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03548  M03S00011.271l716 ---| SSS4     RJM    SCP         SELECT CONTROL POINT
Line S00075 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03549  M02S00075.271l716 ---|          RJM    SCP         SELECT CONTROL POINT
Line S00017 Modification History
M01 (Added by) 1sj16
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03550  M02S00017.271l716 ---|          LDC    **          RESET NUMBER OF CONTROL POINTS
03551  M02S00018.271l716 ---| SSSB     EQU    *-1
03552  M02S00019.271l716 ---|          STD    NC
Line S02148 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03553  M01S02148.271l716 ---|          LDD    JC
Line S02149 Modification History
M01 (Removed by) 1sj30
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03554  M02S02149.271l716 ---|          NJP    SSS9        IF CONTROL POINT AVAILABLE
Line S00012 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 1sj30a
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03555  M03S00012.271l716 ---|          NJN    SSS4.1      IF CONTROL POINT AVAILABLE
Line S00063 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03556  M02S00063.271l716 ---|          NJN    SSS5        IF CONTROL POINT AVAILABLE
Line S00020 Modification History
M01 (Added by) 1sj16
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03557  M03S00020.271l716 ---|          STD    T1          PERFORM UNRESTRICTED CONTROL POINT SEARCH
Line S00076 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03558  M02S00076.271l716 ---| SSS4     STD    JC          PERFORM UNRESTRICTED CONTROL POINT SEARCH
03559  M02S00077.271l716 ---|          STD    T1
Line S00021 Modification History
M01 (Added by) 1sj16
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03560  M02S00021.271l716 ---|          RJM    SCP
03561  M02S00022.271l716 ---|          LDD    JC
Line S00023 Modification History
M01 (Added by) 1sj16
M02 (Removed by) 1sj30
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03562  M03S00023.271l716 ---|          NJP    SSS9        IF CONTROL POINT AVAILABLE
Line S00013 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 1sj30a
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03563  M03S00013.271l716 ---| SSS4.1   NJP    SSS9        IF CONTROL POINT AVAILABLE
Line S02150 Modification History
M01 (Removed by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03564  M02S02150.271l716 ---| SSS5     LDN    1           INDICATE SUBSYSTEM NOT SCHEDULED
03565  M02S02151.271l716 ---| SSS6     LJM    SSSX        RETURN
Line S00064 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03566  M02S00064.271l716 ---| SSS5     NJP    SSS9        IF CONTROL POINT AVAILABLE
03567  M02S00065.271l716 ---| SSS6     LDN    1           INDICATE SUBSYSTEM NOT SCHEDULED
Line S00501 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2785
Seq #  *Modification Id* Act 
----------------------------+
03568  M02S00501.ns2785  ---|          LDD    TP
03569  M02S00502.ns2785  ---|          NJN    SSS10       IF CONTROL POINT SPECIFIED
Line S00007 Modification History
M01 (Added by) ns2785
Seq #  *Modification Id* Act 
----------------------------+
03570  M01S00007.ns2785  +++| SSS7     LDD    TP
03571  M01S00008.ns2785  +++|          NJN    SSS10.1     IF CONTROL POINT SPECIFIED IN SSCT
Line S00503 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03572  M01S00503.271l716 +++| SSS8     RJM    SCP         SELECT CONTROL POINT
03573  M01S00504.271l716 +++|          NJN    SSS11       IF CONTROL POINT AVAILABLE
Line S00505 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03574  M02S00505.ns2707  ---| SSS9     LDN    1           INDICATE SUBSYSTEM NOT SCHEDULED
Line S00005 Modification History
M01 (Added by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03575  M01S00005.ns2707  +++| SSS9     LDK    /CPS/CFIN   CLEAR EJT INTERLOCK
03576  M01S00006.ns2707  +++|          RJM    SCI
03577  M01S00007.ns2707  +++|          LDN    1           INDICATE SUBSYSTEM NOT SCHEDULED
Line S00066 Modification History
M01 (Added by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03578  M01S00066.1sj30a  +++|          LJM    SSSX        RETURN
03579  M00S02152.1sj     +++|
Line S00014 Modification History
M01 (Added by) 1sj30
Seq #  *Modification Id* Act 
----------------------------+
03580  M01S00014.1sj30   +++|*         SCHEDULE THE SUBSYSTEM TO THE SPECIFIED CONTROL POINT.
03581  M01S00015.1sj30   +++|*         IF IT IS OCCUPIED BY A ROLLABLE JOB WITH A LOWER PRIORITY,
Line S00016 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03582  M02S00016.1sj30a  ---|*         THAT JOB WILL BE ROLLED OUT; IF THE PRIORITY IS HIGHER, THE
03583  M02S00017.1sj30a  ---|*         SUBSYSTEM WILL NOT BE SCHEDULED.
03584  M02S00018.1sj30a  ---|*         IF THE SPECIFIED CONTROL POINT IS OCCUPIED BY A NON-ROLLABLE
03585  M02S00019.1sj30a  ---|*         JOB, THE SUBSYSTEM JOB WILL BE ABORTED UNLESS IT IS PLATO
03586  M02S00020.1sj30a  ---|*         OR IT IS NOT IN PRE-INITIAL JOB STATUS.  IN THESE CASES, THE
03587  M02S00021.1sj30a  ---|*         SUSBSYSTEM WILL BE SCHEDULED TO ANY AVAILABLE CONTROL POINT.
Line S00067 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03588  M02S00067.1sj30b  ---|*         THAT JOB WILL BE ROLLED OUT.  OTHERWISE, THE SUBSYSTEM WILL
03589  M02S00068.1sj30b  ---|*         NOT BE SCHEDULED, UNLESS IT IS PLATO IN WHICH CASE IT WILL
03590  M02S00069.1sj30b  ---|*         BE SCHEDULED TO ANY AVAILABLE CONTROL POINT.  SUBSYSTEMS THAT
03591  M02S00070.1sj30b  ---|*         ARE NOT SCHEDULED WILL BE LEFT IN THE EJT AND WILL BE
03592  M02S00071.1sj30b  ---|*         CONSIDERED THE NEXT TIME *1SJ* IS CALLED.
Line S00001 Modification History
M01 (Added by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03593  M01S00001.1sj30b  +++|*         THAT JOB WILL BE ROLLED OUT.  IF IT IS OCCUPIED BY A ROLLABLE
Line S00002 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03594  M02S00002.271l716 ---|*         JOB WITH A HIGHER PRIORITY, THE SUBSYSTEM WILL NOT BE
03595  M02S00003.271l716 ---|*         SCHEDULED.  IF IT IS OCCUPIED BY A NON-ROLLABLE JOB, THE
03596  M02S00004.271l716 ---|*         SUBSYSTEM WILL BE SCHEDULED TO ANY AVAILABLE CONTROL POINT
03597  M02S00005.271l716 ---|*         (EXCEPT FOR IAF).  SUBSYSTEMS IN PRE-INITIAL JOB STATUS WILL
Line S00006 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 1sj42
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03598  M03S00006.271l716 ---|*         NOT BE SCHEDULED (EXCEPT FOR PLATO).  SUBSYSTEMS THAT ARE NOT
Line S00003 Modification History
M01 (Added by) 1sj42
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03599  M02S00003.271l716 ---|*         NOT BE SCHEDULED (EXCEPT FOR PLATO OR SUBSYSTEMS WITH AN
03600  M02S00004.271l716 ---|*         ERROR FLAG SET IN THE EJT).  SUBSYSTEMS THAT ARE NOT
Line S00007 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03601  M02S00007.271l716 ---|*         SCHEDULED WILL BE LEFT IN THE EJT AND WILL BE CONSIDERED THE
03602  M02S00008.271l716 ---|*         NEXT TIME *1SJ* IS CALLED.
Line S00506 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03603  M02S00506.ns2707  ---|*         JOB WITH A HIGHER PRIORITY, THE SUBSYSTEM WILL BE
03604  M02S00507.ns2707  ---|*         SCHEDULED TO ANOTHER CP.  IF IT IS OCCUPIED BY A
03605  M02S00508.ns2707  ---|*         NON-ROLLABLE JOB, THE SUBSYSTEM WILL BE SCHEDULED
03606  M02S00509.ns2707  ---|*         TO ANY AVAILABLE CP (IAF WILL BE ABORTED INSTEAD).
Line S00008 Modification History
M01 (Added by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03607  M01S00008.ns2707  +++|*         JOB WITH A HIGHER PRIORITY OR BY A NON-ROLLABLE JOB, THE
03608  M01S00009.ns2707  +++|*         SUBSYSTEM JOB STATE WILL BE SET TO *PWJS*, WAITING ON EVENT
03609  M01S00010.ns2707  +++|*         *SSWE*.
Line S00022 Modification History
M01 (Added by) 1sj30
Seq #  *Modification Id* Act 
----------------------------+
03610  M01S00022.1sj30   +++|
Line S02153 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03611  M01S02153.271l716 ---| SSS7     STD    JC
Line S00510 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2785
Seq #  *Modification Id* Act 
----------------------------+
03612  M02S00510.ns2785  ---| SSS10    STD    JC
Line S00009 Modification History
M01 (Added by) ns2785
Seq #  *Modification Id* Act 
----------------------------+
03613  M01S00009.ns2785  +++| SSS10    ADD    NC
03614  M01S00010.ns2785  +++| SSS10.1  STD    JC
03615  M00S02154.1sj     +++|          SHN    7
03616  M00S02155.1sj     +++|          ADN    JCIW
03617  M00S02156.1sj     +++|          CRD    AA
03618  M00S02157.1sj     +++|          ADN    TFSW-JCIW
03619  M00S02158.1sj     +++|          CRD    CM
03620  M00S02159.1sj     +++|          LDD    CM
Line S02160 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03621  M01S02160.ns22000 ---|          ZJN    SSS9        IF CONTROL POINT IS NOT OCCUPIED
Line S00180 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03622  M02S00180.271l716 ---|          ZJP    SSS9        IF CONTROL POINT IS NOT OCCUPIED
Line S02161 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03623  M01S02161.271l716 ---|          STD    EO          STORE EJT ORDINAL FOR *EJA*
Line S00511 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03624  M01S00511.271l716 +++|          NJN    SSS12       IF CONTROL POINT IS OCCUPIED
03625  M01S00512.271l716 +++| SSS11    LJM    SSS18       SCHEDULE JOB
03626  M01S00513.271l716 +++|
03627  M01S00514.271l716 +++| SSS12    STD    EO          STORE EJT ORDINAL FOR *EJA*
03628  M00S02162.1sj     +++|          RJM    EJA         CALCULATE EJT ENTRY ADDRESS
03629  M00S02163.1sj     +++|          ADN    SCHE
03630  M00S02164.1sj     +++|          CRD    CM
03631  M00S02165.1sj     +++|          LDD    EP          RESTORE EJT ORDINAL
03632  M00S02166.1sj     +++|          STD    EO
Line S02167 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03633  M01S02167.ns22000 ---|          LDD    AA+2
Line S00181 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2244
Seq #  *Modification Id* Act 
----------------------------+
03634  M02S00181.ns2244  ---|          LDM    CPSS
03635  M02S00182.ns2244  ---|          ZJP    SSS7.1      IF CONTROL POINT NOT *DSP*-SPECIFIED
03636  M02S00183.ns2244  ---|          LJM    SSS2.1      CLEAR CPSS AND RESELECT CP
03637  M02S00184.ns2244  ---|
03638  M02S00185.ns2244  ---| SSS7.1   LDD    AA+2
Line S00018 Modification History
M01 (Added by) ns2244
Seq #  *Modification Id* Act 
----------------------------+
03639  M01S00018.ns2244  +++|          LDD    AA+2
Line S02168 Modification History
M01 (Removed by) 1sj23
Seq #  *Modification Id* Act 
----------------------------+
03640  M01S02168.1sj23   ---|          NJP    SSS1        IF JOB IS NON-ROLLABLE
03641  M01S02169.1sj23   ---|          LDD    JP
Line S00001 Modification History
M01 (Added by) 1sj23
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03642  M02S00001.242l642 ---|          ZJN    SSS7.2      IF ROLLOUT ALLOWED
Line S00078 Modification History
M01 (Added by) 242l642
M02 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03643  M02S00078.1sj30b  ---|          ZJN    SSS7.1      IF ROLLOUT ALLOWED
Line S00002 Modification History
M01 (Added by) 1sj23
M02 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03644  M02S00002.1sj30b  ---|          LMN    ORSI
Line S00003 Modification History
M01 (Added by) 1sj23
M02 (Removed by) 1sj30
M03 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03645  M03S00003.1sj30b  ---|          NJP    SSS1        IF ROLLOUT INHIBITED OR SUBSYSTEM
Line S00023 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 242l642
M03 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03646  M03S00023.1sj30b  ---|          ZJN    SSS7.2      IF ROLLOUT NOT INHIBITED
Line S00079 Modification History
M01 (Added by) 242l642
M02 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03647  M02S00079.1sj30b  ---|          ZJN    SSS7.1      IF ROLLOUT NOT INHIBITED
Line S00024 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03648  M02S00024.1sj30b  ---|          LDC    PLSI
03649  M02S00025.1sj30b  ---|          LMM    SISS
Line S00026 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 242l642
M03 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03650  M03S00026.1sj30b  ---|          NJN    SSS7.1      IF NOT PLATO
Line S00027 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 1sj30a
M03 (Removed by) 242l642
M04 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03651  M04S00027.1sj30b  ---| SSS7.0   STD    JC          INSURE CONTROL POINT SELECTION
Line S00072 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 242l642
M03 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03652  M03S00072.1sj30b  ---|          STD    JC          INSURE CONTROL POINT SELECTION
Line S00028 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 242l642
M03 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03653  M03S00028.1sj30b  ---|          LJM    SSS3.1      SELECT CONTROL POINT
Line S00080 Modification History
M01 (Added by) 242l642
M02 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03654  M02S00080.1sj30b  ---|          ZJP    SSS4        IF PLATO, SELECT ANY CONTROL POINT
Line S00009 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 1sj42
Seq #  *Modification Id* Act 
----------------------------+
03655  M02S00009.1sj42   ---|          ZJN    SSS7.2      IF ROLLOUT ALLOWED
Line S00005 Modification History
M01 (Added by) 1sj42
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03656  M02S00005.271l716 ---|          ZJN    SSS7.4      IF ROLLOUT ALLOWED
Line S00515 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03657  M01S00515.271l716 +++|          ZJN    SSS16       IF ROLLOUT ALLOWED
Line S00010 Modification History
M01 (Added by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03658  M01S00010.1sj30b  +++|          LMN    ORSI
Line S00011 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 1sj42
Seq #  *Modification Id* Act 
----------------------------+
03659  M02S00011.1sj42   ---|          ZJN    SSS7.2      IF ROLLOUT NOT INHIBITED
Line S00006 Modification History
M01 (Added by) 1sj42
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03660  M02S00006.271l716 ---|          ZJN    SSS7.4      IF ROLLOUT NOT INHIBITED
Line S00516 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03661  M01S00516.271l716 +++|          ZJN    SSS16       IF ROLLOUT NOT INHIBITED
Line S00012 Modification History
M01 (Added by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03662  M01S00012.1sj30b  +++|          LDM    SISS
Line S00013 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03663  M02S00013.271l716 ---|          LMC    PLSI
03664  M02S00014.271l716 ---| SSS7.0   ZJP    SSS4        IF PLATO, SELECT ANY CONTROL POINT
03665  M02S00015.271l716 ---|          LMK    IFSI&PLSI
Line S00517 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03666  M01S00517.271l716 +++|          LMC    IFSI
03667  M01S00518.271l716 +++|          ZJP    SSS2        IF IAF
Line S00519 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03668  M02S00519.ns2707  ---| SSS13    LDN    0           CLEAR CONTROL POINT SELECTION
03669  M02S00520.ns2707  ---|          STD    JC
03670  M02S00521.ns2707  ---|          LJM    SSS8        SELECT CONTROL POINT
Line S00011 Modification History
M01 (Added by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03671  M01S00011.ns2707  +++|          LDC    SSSD+SSSDL*10000
03672  M01S00012.ns2707  +++|          RJM    IUT         SET SUBSYSTEM TO *PWJS*
03673  M01S00013.ns2707  +++|          UJP    SSS9        TERMINATE
Line S00522 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03674  M01S00522.271l716 +++|
Line S00016 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 1sj42
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03675  M03S00016.271l716 ---|          ZJN    SSS7.1      IF IAF
Line S00007 Modification History
M01 (Added by) 1sj42
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03676  M02S00007.271l716 ---|          ZJN    SSS7.3      IF IAF
Line S00017 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03677  M02S00017.271l716 ---|          LDM    SSSD
Line S00018 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 1sj42
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03678  M03S00018.271l716 ---|          ZJN    SSS7.1      IF PRE-INITIAL JOB STATUS
03679  M03S00019.271l716 ---|          LDN    0
Line S00008 Modification History
M01 (Added by) 1sj42
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03680  M02S00008.271l716 ---|          ZJN    SSS7.2      IF PRE-INITIAL JOB STATUS
03681  M02S00009.271l716 ---| SSS7.1   LDN    0
Line S00020 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03682  M02S00020.271l716 ---|          UJN    SSS7.0      SELECT ANY CONTROL POINT
Line S00029 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03683  M02S00029.271l716 ---|
Line S00010 Modification History
M01 (Added by) 1sj42
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03684  M02S00010.271l716 ---| SSS7.2   LDD    BB+1
03685  M02S00011.271l716 ---|          NJN    SSS7.1      IF ERROR FLAG SET
03686  M02S00012.271l716 ---|
Line S00030 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 1sj30a
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03687  M03S00030.271l716 ---| SSS7.1   LDM    SSSD
03688  M03S00031.271l716 ---|          ZJP    SSS1        IF PRE-INITIAL JOB STATUS
03689  M03S00032.271l716 ---|          LDN    0
03690  M03S00033.271l716 ---|          UJN    SSS7.0      SELECT CONTROL POINT
Line S00073 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03691  M03S00073.271l716 ---| SSS7.1   LDM    SCJE        GET RECYCLE COUNT
Line S00081 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03692  M02S00081.271l716 ---|*         REJECT THE SUBSYSTEM AND RESCAN THE EJT.
03693  M02S00082.271l716 ---|
Line S00083 Modification History
M01 (Added by) 242l642
M02 (Removed by) 1sj30b
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03694  M03S00083.271l716 ---|          LDM    SCJE        GET RECYCLE COUNT
Line S00021 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 1sj42
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03695  M03S00021.271l716 ---| SSS7.1   LDM    SCJE        GET RECYCLE COUNT
Line S00013 Modification History
M01 (Added by) 1sj42
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03696  M02S00013.271l716 ---| SSS7.3   LDM    SCJE        GET RECYCLE COUNT
Line S00074 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03697  M02S00074.271l716 ---|          STD    T1
03698  M02S00075.271l716 ---|          LDD    EO          REJECT SUBSYSTEM
03699  M02S00076.271l716 ---|          STM    TPRS,T1
03700  M02S00077.271l716 ---|          LCN    1           SET RECYCLE FLAG
03701  M02S00078.271l716 ---|          UJN    SSS11       RETURN
Line S00034 Modification History
M01 (Added by) 1sj30
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03702  M02S00034.271l716 ---|
Line S00004 Modification History
M01 (Added by) 1sj23
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
03703  M02S00004.242l642 ---| SSS7.2   LDD    JP
Line S00084 Modification History
M01 (Added by) 242l642
M02 (Removed by) 1sj30b
Seq #  *Modification Id* Act 
----------------------------+
03704  M02S00084.1sj30b  ---| SSS7.1   LDD    JP
Line S00022 Modification History
M01 (Added by) 1sj30b
M02 (Removed by) 1sj42
Seq #  *Modification Id* Act 
----------------------------+
03705  M02S00022.1sj42   ---| SSS7.2   LDD    JP
Line S00014 Modification History
M01 (Added by) 1sj42
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03706  M02S00014.271l716 ---| SSS7.4   LDD    JP
Line S00523 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03707  M01S00523.271l716 +++| SSS16    LDD    JP
03708  M00S02170.1sj     +++|          SBD    CM+4
Line S02171 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03709  M01S02171.ns22000 ---|          MJN    SSS6        IF JOB AT CP HAS HIGHER PRIORITY
Line S00186 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03710  M02S00186.1sj30a  ---|          MJP    SSS6        IF JOB AT CP HAS HIGHER PRIORITY
Line S00079 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03711  M02S00079.271l716 ---|          MJN    SSS8        IF JOB AT CP HAS HIGHER PRIORITY
Line S00524 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03712  M01S00524.271l716 +++|          MJN    SSS17       IF JOB AT CP HAS HIGHER PRIORITY
03713  M00S02172.1sj     +++|          LDD    JC
03714  M00S02173.1sj     +++|          RJM    IRR         REQUEST ROLLOUT OF JOB
Line S02174 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03715  M01S02174.ns22000 ---| SSS8     UJN    SSS5        GO TERMINATE
Line S00187 Modification History
M01 (Added by) ns22000
M02 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03716  M02S00187.1sj30a  ---| SSS8     LJM    SSS5        GO TERMINATE
Line S00080 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03717  M02S00080.271l716 ---| SSS8     LJM    SSS6        GO TERMINATE
Line S00525 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03718  M01S00525.271l716 +++| SSS17    LJM    SSS9        TERMINATE
03719  M00S02175.1sj     +++|
Line S02176 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03720  M01S02176.ns22000 ---|*         CHECK FOR SUFFICIENT CM.  IF NECESSARY, CALL ROUTINE *CFL*
03721  M01S02177.ns22000 ---|*         TO ROLLOUT LOWER PRIORITY JOBS.
03722  M01S02178.ns22000 ---|
03723  M01S02179.ns22000 ---| SSS9     LDD    AM
03724  M01S02180.ns22000 ---|          SHN    14
03725  M01S02181.ns22000 ---|          LMD    AM+1
03726  M01S02182.ns22000 ---|          SBD    JM
03727  M01S02183.ns22000 ---|          PJN    SSS10       IF NO ROLLOUTS NECESSARY
03728  M01S02184.ns22000 ---|          RJM    CFL         REQUEST ROLLOUT OF LOWER PRIORITY JOBS
03729  M01S02185.ns22000 ---|          UJN    SSS8        RETURN AND TERMINATE
03730  M01S02186.ns22000 ---|
03731  M01S02187.ns22000 ---| SSS10    LDD    AM
Line S00188 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03732  M02S00188.271l716 ---| SSS9     RJM    CFL         COMMIT FIELD LENGTH.
Line S00526 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03733  M01S00526.271l716 +++| SSS18    RJM    CFL         COMMIT FIELD LENGTH
Line S00189 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
03734  M01S00189.ns22000 +++|
03735  M01S00190.ns22000 +++|*         ASSIGN JOB IF SUFFICIENT CM.
03736  M01S00191.ns22000 +++|
03737  M01S00192.ns22000 +++|          LDD    AM
03738  M00S02188.1sj     +++|          SBD    RM
03739  M00S02189.1sj     +++|          SHN    14
03740  M00S02190.1sj     +++|          LMD    AM+1
03741  M00S02191.1sj     +++|          SBD    RM+1
03742  M00S02192.1sj     +++|          SBD    JM
Line S02193 Modification History
M01 (Removed by) 1sj30a
Seq #  *Modification Id* Act 
----------------------------+
03743  M01S02193.1sj30a  ---|          MJN    SSS11       IF INSUFFICIENT AVAILABLE CM
Line S00081 Modification History
M01 (Added by) 1sj30a
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03744  M02S00081.271l716 ---|          MJN    SSS8        IF INSUFFICIENT AVAILABLE CM
Line S00527 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03745  M01S00527.271l716 +++|          MJN    SSS17       IF INSUFFICIENT AVAILABLE CM
Line S00014 Modification History
M01 (Added by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03746  M01S00014.ns2707  +++|          LDK    /CPS/CFIN   CLEAR EJT INTERLOCK
03747  M01S00015.ns2707  +++|          RJM    SCI
Line S02194 Modification History
M01 (Removed by) 1sj21
Seq #  *Modification Id* Act 
----------------------------+
03748  M01S02194.1sj21   ---|          RJM    ASJ         ASSIGN JOB TO CONTROL POINT
Line S00001 Modification History
M01 (Added by) 1sj21
Seq #  *Modification Id* Act 
----------------------------+
03749  M01S00001.1sj21   +++|          RJM    EJA         CHECK FOR AN ERROR FLAG IN THE EJT ENTRY
03750  M01S00002.1sj21   +++|          ADK    PRFE
03751  M01S00003.1sj21   +++|          CRD    CM
03752  M01S00004.1sj21   +++|          LDD    CM+1
03753  M01S00005.1sj21   +++|          LMN    SSET
Line S00006 Modification History
M01 (Added by) 1sj21
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03754  M02S00006.271l716 ---|          NJN    SSS10       IF NOT A SUBSYSTEM ABORT ERROR FLAG
Line S00528 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03755  M01S00528.271l716 +++|          NJN    SSS19       IF NOT A SUBSYSTEM ABORT ERROR FLAG
Line S00007 Modification History
M01 (Added by) 1sj21
Seq #  *Modification Id* Act 
----------------------------+
03756  M01S00007.1sj21   +++|          LDN    BCSC        PREVENT AN UPDATE OF THE *SSAT* TABLE
03757  M01S00008.1sj21   +++|          STD    SP
Line S00009 Modification History
M01 (Added by) 1sj21
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03758  M02S00009.271l716 ---| SSS10    RJM    ASJ         ASSIGN THE JOB TO A CONTROL POINT
Line S02195 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03759  M01S02195.271l716 ---| SSS11    LJM    SSSX        RETURN
Line S00529 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03760  M01S00529.271l716 +++| SSS19    RJM    ASJ         ASSIGN JOB TO CONTROL POINT
Line S00530 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03761  M02S00530.ns2707  ---| SSS20    LJM    SSSX        RETURN
Line S00016 Modification History
M01 (Added by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03762  M01S00016.ns2707  +++|          LJM    SSSX        RETURN
03763  M00S02196.1sj     +++|
03764  M00S02197.1sj     +++|*         *UTEM* PARAMETERS FOR JSN CHANGE.
03765  M00S02198.1sj     +++|
Line S02199 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03766  M01S02199.271l716 ---| SSSA     VFD    1/0,5/JSNE,6/24D
Line S00531 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03767  M01S00531.271l716 +++| SSSB     VFD    1/0,5/JSNE,6/24D
03768  M00S02200.1sj     +++|          VFD    6/36D,6/0
03769  M00S02201.1sj     +++|          CON    0
03770  M00S02202.1sj     +++|          CON    0
03771  M00S02203.1sj     +++|          CON    0
Line S00017 Modification History
M01 (Added by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03772  M01S00017.ns2707  +++|
03773  M01S00018.ns2707  +++|*         *UTEM* PARAMETERS TO SET *PWJS*.
03774  M01S00019.ns2707  +++|
03775  M01S00020.ns2707  +++| SSSD     VFD    1/0,5/SCHE,6/30D
03776  M01S00021.ns2707  +++|          VFD    6/0,6/0
03777  M01S00022.ns2707  +++|          VFD    6/0,6/0
03778  M01S00023.ns2707  +++|          VFD    3/5,9/0
03779  M01S00024.ns2707  +++|          CON    SSWE        SUBSYSTEM WAITING EVENT
03780  M01S00025.ns2707  +++|
03781  M01S00026.ns2707  +++|          VFD    1/0,5/JSNE,6/5
03782  M01S00027.ns2707  +++|          VFD    6/1,6/0
03783  M01S00028.ns2707  +++|          CON    0
03784  M01S00029.ns2707  +++|          CON    0
03785  M01S00030.ns2707  +++|          CON    PWJS
03786  M01S00031.ns2707  +++|
03787  M01S00032.ns2707  +++| SSSDL    EQU    */5-SSSD/5
03788  M01S00033.ns2707  +++| SCI      SPACE  4,11
03789  M01S00034.ns2707  +++|**        SCI - SET/CLEAR EJT INTERLOCK.
03790  M01S00035.ns2707  +++|*
03791  M01S00036.ns2707  +++|*         ENTRY  (A) = INTERLOCK FUNCTION.
03792  M01S00037.ns2707  +++|*
03793  M01S00038.ns2707  +++|*         EXIT   (A) = 0 IF SUCCESSFUL.
03794  M01S00039.ns2707  +++|*
03795  M01S00040.ns2707  +++|*         USES   T0, T1, T4.
03796  M01S00041.ns2707  +++|*
03797  M01S00042.ns2707  +++|*         CALLS  EJA, SFI.
03798  M01S00043.ns2707  +++|*
03799  M01S00044.ns2707  +++|*         MACROS DELAY, PAUSE.
03800  M01S00045.ns2707  +++|
03801  M01S00046.ns2707  +++|
03802  M01S00047.ns2707  +++| SCI3     SOD    T4
03803  M01S00048.ns2707  +++|          NJN    SCI1        IF NOT TIMEOUT
03804  M01S00049.ns2707  +++| SCI4     LDN    1           INDICATE FAILURE
03805  M01S00050.ns2707  +++|
03806  M01S00051.ns2707  +++| SCI      SUBR               ENTRY/EXIT
03807  M01S00052.ns2707  +++|          STD    T1          SAVE INTERLOCK FUNCTION
03808  M01S00053.ns2707  +++|          LDK    10D         SET RETRY COUNTER
03809  M01S00054.ns2707  +++|          STD    T4
03810  M01S00055.ns2707  +++| SCI1     RJM    EJA         GET EJT ADDRESS
03811  M01S00056.ns2707  +++|          RJM    SFI         SET/CLEAR INTERLOCK
03812  M01S00057.ns2707  +++|          ZJN    SCIX        IF REQUEST SUCCESSFUL
03813  M01S00058.ns2707  +++|          SBN    2
03814  M01S00059.ns2707  +++|          PJN    SCI4        IF ENTRY NOT IN USE
03815  M01S00060.ns2707  +++|          LDD    HN          DELAY FOR 128*64 MICROSECONDS
03816  M01S00061.ns2707  +++|          STD    T0
03817  M01S00062.ns2707  +++| SCI2     DELAY
03818  M01S00063.ns2707  +++|          PAUSE  NE
03819  M01S00064.ns2707  +++|          SOD    T0
03820  M01S00065.ns2707  +++|          PJN    SCI2        IF MORE DELAY
03821  M01S00066.ns2707  +++|          UJN    SCI3        CHECK FOR TIMEOUT
03822  M00S02204.1sj     +++|          SPACE  4,10
03823  M00S02205.1sj     +++|*         COMMON DECKS.
03824  M00S02206.1sj     +++|
03825  M00S02207.1sj     +++|
Line S00023 Modification History
M01 (Added by) v22l602
M02 (Removed by) ns2437
Seq #  *Modification Id* Act 
----------------------------+
03826  M02S00023.ns2437  ---|          LIST   -X
Line S00024 Modification History
M01 (Added by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03827  M01S00024.v22l602 +++| SUB$     EQU    1           ASSEMBLE *SUBSYST* MACRO CALLS
03828  M01S00025.v22l602 +++|*CALL     COMSSSD
03829  M00S02208.1sj     +++| AST$     SET    1           ASSEMBLE ALL FUNCTIONS OF *COMPAST*
03830  M00S02209.1sj     +++|          LIST   X
03831  M00S02210.1sj     +++|*CALL     COMPAST
Line S00532 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03832  M01S00532.271l716 +++|          LIST   *
03833  M00S02211.1sj     +++|*CALL     COMPRSS
Line S00067 Modification History
M01 (Added by) ns2707
Seq #  *Modification Id* Act 
----------------------------+
03834  M01S00067.ns2707  +++| SFI$     EQU    1           SELECT IMMEDIATE RETURN FROM *SFI*
03835  M01S00068.ns2707  +++|*CALL     COMPSFI
Line S02212 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03836  M01S02212.271l716 ---|          LIST   *
03837  M00S02213.1sj     +++|          SPACE  4,10
03838  M00S02214.1sj     +++|**        TSCI - SUBSYSTEM CPU PRIORITIES.
03839  M00S02215.1sj     +++|*         ENTRY = 1 WORD.
03840  M00S02216.1sj     +++|*         INDEXED BY SUBSYSTEM IDENTIFICATION NUMBER.
03841  M00S02217.1sj     +++|*
03842  M00S02218.1sj     +++|*T        12/  PR
Figure

011 PR

03843  M00S02219.1sj     +++|*         PR     CPU PRIORITY TO BE ASSIGNED TO SUBSYSTEM.
03844  M00S02220.1sj     +++|
03845  M00S02221.1sj     +++|
03846  M00S02222.1sj     +++| TSCI     INDEX
Line S02223 Modification History
M01 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03847  M01S02223.v22l602 ---|          INDEX  (MXSI-IFSI),IACS
03848  M01S02224.v22l602 ---|          INDEX  (MXSI-RFSI),RFCS
03849  M01S02225.v22l602 ---|          INDEX  (MXSI-TRSI),TACS
03850  M01S02226.v22l602 ---|          INDEX  (MXSI-MPSI),MPCS
03851  M01S02227.v22l602 ---|          INDEX  (MXSI-NMSI),NMCS
Line S00013 Modification History
M01 (Added by) ns21000
M02 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03852  M02S00013.v22l602 ---|          INDEX  (MXSI-NVSI),MLCS
Line S02228 Modification History
M01 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03853  M01S02228.v22l602 ---|          INDEX  (MXSI-RBSI),RBCS
03854  M01S02229.v22l602 ---|          INDEX  (MXSI-CDSI),CZCS
03855  M01S02230.v22l602 ---|          INDEX  (MXSI-MCSI),MCCS
03856  M01S02231.v22l602 ---|          INDEX  (MXSI-MFSI),MFCS
03857  M01S02232.v22l602 ---|          INDEX  (MXSI-BISI),BICS
03858  M01S02233.v22l602 ---|          INDEX  (MXSI-MTSI),MTCS
03859  M01S02234.v22l602 ---|          INDEX  (MXSI-STSI),TSCS
03860  M01S02235.v22l602 ---|          INDEX  (MXSI-MSSI),MSCS
Line S00014 Modification History
M01 (Added by) ns21000
M02 (Removed by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03861  M02S00014.v22l602 ---|          INDEX  (MXSI-SMSI),SMCS
03862  M02S00015.v22l602 ---|          INDEX  (MXSI-SSSI),SSCS
Line S00026 Modification History
M01 (Added by) v22l602
Seq #  *Modification Id* Act 
----------------------------+
03863  M01S00026.v22l602 +++|          LIST   D
03864  M01S00027.v22l602 +++| .SUB     HERE
03865  M01S00028.v22l602 +++|          LIST   *
03866  M00S02236.1sj     +++|          INDEX  MXSI-LSSI
03867  M00S02237.1sj     +++|          SPACE  4,10
03868  M00S02238.1sj     +++|*         OVERFLOW CHECKS.
03869  M00S02239.1sj     +++|
03870  M00S02240.1sj     +++|
03871  M00S02241.1sj     +++|          USE    OVERFLOW
03872  M00S02242.1sj     +++|          OVERFLOW O3SA,TJSC
03873  M00S02243.1sj     +++|          SPACE  4,10
03874  M00S02244.1sj     +++|          QUAL
Line S02245 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03875  M01S02245.271l716 ---|          TTL    1SJ/3SB - PERFORM PERIODIC FUNCTIONS.
03876  M01S02246.271l716 ---|          TITLE
03877  M01S02247.271l716 ---|          IDENT  3SB,O3SB   PERFORM PERIODIC FUNCTIONS.
03878  M01S02248.271l716 ---|          BASE   M
Line S02249 Modification History
M01 (Removed by) ns2437
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03879  M02S02249.271l716 ---|          LIST   F,X
Line S02250 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03880  M01S02250.271l716 ---|          SST
03881  M01S02251.271l716 ---|*COMMENT  1SJ - PERFORM PERIODIC FUNCTIONS.
03882  M01S02252.271l716 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1981.
03883  M01S02253.271l716 ---|          ORG    O3SB
03884  M01S02254.271l716 ---|          QUAL   3SB
03885  M01S02255.271l716 ---| QUAL$    SET    1
03886  M01S02256.271l716 ---| MACROS   SPACE  4,10
03887  M01S02257.271l716 ---|**        MACRO DEFINITIONS.
03888  M01S02258.271l716 ---|
03889  M01S02259.271l716 ---|
03890  M01S02260.271l716 ---|**        DFLIM - CONSTRUCT DAYFILE SIZE THRESHOLD PROCESSING ENTRY FOR
03891  M01S02261.271l716 ---|*                 *TDFP* TABLE.
03892  M01S02262.271l716 ---|*
03893  M01S02263.271l716 ---|*         DFLIM  A,B,C,D,E
03894  M01S02264.271l716 ---|*
03895  M01S02265.271l716 ---|*                A     TABLE NAME IF PRESENT.
03896  M01S02266.271l716 ---|*                B     DAYFILE IDENTIFIER/INDEX.
03897  M01S02267.271l716 ---|*                C     CM WORD OFFSET OF 3RD WORD OF DAYFILE BUFFER
03898  M01S02268.271l716 ---|*                      POINTER BLOCK RELATIVE TO FWA OF DAYFILE BUFFER
03899  M01S02269.271l716 ---|*                      POINTER BLOCKS.
03900  M01S02270.271l716 ---|*                D     THRESHOLD SIZE IN PRUS.
03901  M01S02271.271l716 ---|*                E     EVENT TO ISSUE IF THRESHOLD EXCEEDED.
03902  M01S02272.271l716 ---|
03903  M01S02273.271l716 ---|
03904  M01S02274.271l716 ---|          PURGMAC DFLIM
03905  M01S02275.271l716 ---|
03906  M01S02276.271l716 ---|          MACRO  DFLIM,A,B,C,D,E
03907  M01S02277.271l716 ---| .A       IFC    NE,$A$$
03908  M01S02278.271l716 ---| A        BSS    0
03909  M01S02279.271l716 ---| .1       SET    A
03910  M01S02280.271l716 ---| .A       ELSE
03911  M01S02281.271l716 ---|          ORG    .1+4*B
03912  M01S02282.271l716 ---| .B       IFC    NE,$C$$
03913  M01S02283.271l716 ---|          LOC    B
03914  M01S02284.271l716 ---|          CON    C
03915  M01S02285.271l716 ---|          VFD    24/D
03916  M01S02286.271l716 ---|          CON    E
03917  M01S02287.271l716 ---| .B       ELSE
03918  M01S02288.271l716 ---|          VFD    48/0
03919  M01S02289.271l716 ---| .B       ENDIF
03920  M01S02290.271l716 ---| .A       ENDIF
03921  M01S02291.271l716 ---|          ENDM
Line S00023 Modification History
M01 (Added by) v23l617
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03922  M03S00023.271l716 ---| TBLM     SPACE  4,10
03923  M03S00024.271l716 ---|**        TBLM - DEFINE UNRECOVERED AND RECOVERED ERROR THRESHOLDS
03924  M03S00025.271l716 ---|*                FOR MASS STORAGE DEVICES FOR *TURT* TABLE.
03925  M03S00026.271l716 ---|*
03926  M03S00027.271l716 ---|*         TBLM   TY
03927  M03S00028.271l716 ---|*
03928  M03S00029.271l716 ---|*                TY          MASS STORAGE DEVICE MNEMONIC.
03929  M03S00030.271l716 ---|
03930  M03S00031.271l716 ---|
03931  M03S00032.271l716 ---|          PURGMAC  TBLM
03932  M03S00033.271l716 ---|
03933  M03S00034.271l716 ---| TBLM     MACRO  TY
03934  M03S00035.271l716 ---| .NT      SET    .NT+1
03935  M03S00036.271l716 ---|          VFD    12/2R_TY
03936  M03S00037.271l716 ---|          CON    TY_UT
03937  M03S00038.271l716 ---|          CON    TY_RT
03938  M03S00039.271l716 ---|          ENDM
Line S02292 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03939  M01S02292.271l716 ---| 3SB      SPACE  4,20
03940  M01S02293.271l716 ---|**        PPF - PERFORM PERIODIC FUNCTIONS.
03941  M01S02294.271l716 ---|*
03942  M01S02295.271l716 ---|*         PERFORM THE FOLLOWING FUNCTIONS -
03943  M01S02296.271l716 ---|*
Line S02297 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03944  M02S02297.271l716 ---|*             1. PROCESS ACCUMULATOR OVERFLOW CONDITIONS.
03945  M02S02298.271l716 ---|*             2. CHECK FOR EXPIRED CM/CPU TIME SLICES.
03946  M02S02299.271l716 ---|*             3. CHECK FOR FILE SIZE LIMIT EXCEEDED FOR SYSTEM DAYFILE,
Line S00193 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03947  M02S00193.271l716 ---|*             1. CHECK FOR EXPIRED CM/CPU TIME SLICES.
03948  M02S00194.271l716 ---|*             2. CHECK FOR FILE SIZE LIMIT EXCEEDED FOR SYSTEM DAYFILE,
Line S02300 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03949  M01S02300.271l716 ---|*                ERROR LOG, ACCOUNT FILE AND BINARY MAINTENANCE LOG.
Line S02301 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03950  M02S02301.271l716 ---|*             4. PROCESS EVENT TABLE.
03951  M02S02302.271l716 ---|*             5. PROCESS MASS STORAGE CHECKPOINT/LABEL INITIALIZATION
Line S00195 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03952  M02S00195.271l716 ---|*             3. SCAN EJT, SEARCHING FOR JOBS WITH ACCESS LEVEL LIMITS
Line S00196 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2395
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03953  M03S00196.271l716 ---|*                OUTSIDE THEIR ORIGIN TYPE LIMITS, AND FOR TIMED/EVENT
03954  M03S00197.271l716 ---|*                ROLLOUT JOBS WHICH SHOULD BE ROLLED IN.
Line S00024 Modification History
M01 (Added by) ns2395
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03955  M02S00024.271l716 ---|*                OUTSIDE THEIR ORIGIN TYPE LIMITS,  FOR TIMED/EVENT
03956  M02S00025.271l716 ---|*                ROLLOUT JOBS WHICH SHOULD BE ROLLED IN, AND FOR
03957  M02S00026.271l716 ---|*                JOBS SUBJECT TO SERVICE LIMIT CHANGES.
Line S00198 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2153
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03958  M03S00198.271l716 ---|*             4. PROCESS MASS STORAGE CHECKPOINT/LABEL INITIALIZATION
Line S02303 Modification History
M01 (Removed by) ns2153
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03959  M02S02303.271l716 ---|*                REQUESTS.
Line S00199 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2153
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03960  M03S00199.271l716 ---|*             5. PROCESS ACCUMULATOR OVERFLOW CONDITIONS.
Line S02304 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03961  M01S02304.271l716 ---|*
03962  M01S02305.271l716 ---|*         ENTRY  (NC) = NUMBER OF CONTROL POINTS.
03963  M01S02306.271l716 ---|*                (TM - TM+1) = SECONDS PORTION OF REAL-TIME CLOCK.
03964  M01S02307.271l716 ---|*                *TEPB* TABLE IS PRESENT.
03965  M01S02308.271l716 ---|*
Line S02309 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03966  M02S02309.271l716 ---|*         CALLS  CFS, CMS, PCA, POF, PRS, PTE.
Line S00200 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03967  M03S00200.271l716 ---|*         CALLS  CFS, CMS, PCA, POF, PRS, SEJ.
Line S00040 Modification History
M01 (Added by) v23l617
M02 (Removed by) 241l630
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03968  M03S00040.271l716 ---|*         CALLS  CFS, OCA, PRS, SEJ.
Line S00018 Modification History
M01 (Added by) 241l630
M02 (Removed by) ns2395
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03969  M03S00018.271l716 ---|*         CALLS  CFS, COR, OCA, PRS, SEJ, *3SD*.
Line S00027 Modification History
M01 (Added by) ns2395
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03970  M02S00027.271l716 ---|*         CALLS  CFS, OCA, PRS, SEJ, *3SD*.
Line S02310 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03971  M01S02310.271l716 ---|
03972  M01S02311.271l716 ---|
03973  M01S02312.271l716 ---| PPF      SUBR               ENTRY/EXIT
03974  M01S02313.271l716 ---|          RJM    PRS         PRESET
03975  M01S02314.271l716 ---|          RJM    PCA         PROCESS CONTROL POINT AREAS
03976  M01S02315.271l716 ---|          RJM    CFS         CHECK FILE SIZES
Line S02316 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03977  M02S02316.271l716 ---|          RJM    PTE         PROCESS EVENT TABLE
Line S00201 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03978  M02S00201.271l716 ---|          RJM    SEJ         SCAN EJT
Line S00019 Modification History
M01 (Added by) 241l630
M02 (Removed by) ns2395
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03979  M03S00019.271l716 ---|          RJM    COR         CHECK IF OPERATOR ACTION IS REQUIRED
Line S02317 Modification History
M01 (Removed by) ns2153
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03980  M02S02317.271l716 ---|          RJM    CMS         CHECK MASS STORAGE DEVICES
03981  M02S02318.271l716 ---|
03982  M02S02319.271l716 ---|*         PROCESS OVERFLOW FLAGS.  OVERFLOW FLAG PROCESSING IS
03983  M02S02320.271l716 ---|*         PERFORMED AS THE LAST PERIODIC FUNCTION SO THAT *0AU* MAY
03984  M02S02321.271l716 ---|*         OVERLAY PREVIOUSLY EXECUTED CODE IN *3SB*.
03985  M02S02322.271l716 ---|
03986  M02S02323.271l716 ---|          RJM    POF         PROCESS OVERFLOW FLAGS
Line S00040 Modification History
M01 (Added by) ns2153
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03987  M02S00040.271l716 ---|          EXECUTE  3SD       EXECUTE EXTENSION OVERLAY
Line S02324 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03988  M01S02324.271l716 ---|          UJN    PPFX        RETURN
Line S02325 Modification History
M01 (Removed by) ns2153
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
03989  M02S02325.271l716 ---| POF      SPACE  4,15
03990  M02S02326.271l716 ---|**        POF - PROCESS OVERFLOW FLAGS.
03991  M02S02327.271l716 ---|*
03992  M02S02328.271l716 ---|*         CALL *0AU* FOR EACH CONTROL POINT HAVING ACCUMULATOR
03993  M02S02329.271l716 ---|*         OVERFLOW.
03994  M02S02330.271l716 ---|*
03995  M02S02331.271l716 ---|*         ENTRY  (NC) = SYSTEM CONTROL POINT NUMBER.
03996  M02S02332.271l716 ---|*                *TOVF* TABLE CONTAINS ACCUMULATOR OVERFLOW FLAGS.
03997  M02S02333.271l716 ---|*
03998  M02S02334.271l716 ---|*         USES   CP, EO, TP, CM - CM+4, (*0AU* USES CELLS 0 - 17B).
03999  M02S02335.271l716 ---|*
04000  M02S02336.271l716 ---|*         CALLS  EJA, 0AU.
04001  M02S02337.271l716 ---|*
04002  M02S02338.271l716 ---|*         MACROS MONITOR, EXECUTE.
04003  M02S02339.271l716 ---|
04004  M02S02340.271l716 ---|
04005  M02S02341.271l716 ---| POF      SUBR               ENTRY/EXIT
04006  M02S02342.271l716 ---|          LDD    NC          INITIALIZE CONTROL POINT NUMBER
04007  M02S02343.271l716 ---|          STD    TP
04008  M02S02344.271l716 ---| POF1     SOD    TP          DECREMENT CONTROL POINT NUMBER
04009  M02S02345.271l716 ---|          ZJN    POFX        IF ALL CONTROL POINTS HAVE BEEN PROCESSED
04010  M02S02346.271l716 ---|          LDM    TOVF-1,TP
04011  M02S02347.271l716 ---|          ZJN    POF1        IF NO ACCUMULATOR OVERFLOW AT THIS CP
04012  M02S02348.271l716 ---|          LDD    TP          SAVE CONTROL POINT NUMBER FOR *CCAM*
04013  M02S02349.271l716 ---|          STD    CM+1
04014  M02S02350.271l716 ---|          MONITOR  CCAM      CHANGE CONTROL POINT ASSIGNMENT
04015  M02S02351.271l716 ---|          LDD    CM+1
04016  M02S02352.271l716 ---|          NJN    POF1        IF FUNCTION REJECTED
04017  M02S02353.271l716 ---|
04018  M02S02354.271l716 ---|*         SET UP *0AU* PARAMETERS.
04019  M02S02355.271l716 ---|
04020  M02S02356.271l716 ---|          LDD    TP          PLACE *SRU* ACCUMULATOR IN PARAMETER BLOCK
04021  M02S02357.271l716 ---|          SHN    7
04022  M02S02358.271l716 ---|          STD    CP
04023  M02S02359.271l716 ---|          ADN    SRUW
04024  M02S02360.271l716 ---|          CRM    P0AU+5,ON
04025  M02S02361.271l716 ---|          ADN    FPFW-SRUW-1
04026  M02S02362.271l716 ---|          CRM    OVL0,ON
04027  M02S02363.271l716 ---|          ADN    TFSW-FPFW-1
04028  M02S02364.271l716 ---|          CRD    CM
04029  M02S02365.271l716 ---|          LDM    P0AU+6
04030  M02S02366.271l716 ---|          SCN    37
Line S00202 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2153
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04031  M03S00202.271l716 ---|          NJN    POF1.1      IF OVERFLOW
04032  M03S00203.271l716 ---|          LDM    P0AU+5
04033  M03S00204.271l716 ---|          LPN    1
Line S02367 Modification History
M01 (Removed by) ns2153
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04034  M02S02367.271l716 ---|          ZJN    POF2        IF NO OVERFLOW FLAGS SET
Line S02368 Modification History
M01 (Removed by) ns22000
M02 (Removed by) ns2153
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04035  M03S02368.271l716 ---|          LDD    CM          PLACE JSN IN PARAMETER BLOCK
Line S00205 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2153
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04036  M03S00205.271l716 ---| POF1.1   LDD    CM          PLACE JSN IN PARAMETER BLOCK
Line S02369 Modification History
M01 (Removed by) ns2153
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04037  M02S02369.271l716 ---|          STD    EO
04038  M02S02370.271l716 ---|          RJM    EJA         CALCULATE EJT ENTRY ADDRESS
04039  M02S02371.271l716 ---|          ADK    JSNE
04040  M02S02372.271l716 ---|          CRM    P0AU,ON
04041  M02S02373.271l716 ---|          ADK    SCLE-JSNE-1 SET SERVICE CLASS FOR *0AU*
04042  M02S02374.271l716 ---|          CRD    CM
04043  M02S02375.271l716 ---|          LDD    CM
04044  M02S02376.271l716 ---|          SCN    77
04045  M02S02377.271l716 ---|          STM    P0AU+4
04046  M02S02378.271l716 ---|          LDC    P0AU        SET PARAMETER BLOCK ADDRESS
04047  M02S02379.271l716 ---|          STM    OVL0+1
04048  M02S02380.271l716 ---|          LDM    OVL0        SET *0AU* FUNCTION CODE
04049  M02S02381.271l716 ---|          SCN    77
04050  M02S02382.271l716 ---|          ADN    1
04051  M02S02383.271l716 ---|          STM    OVL0
04052  M02S02384.271l716 ---|
04053  M02S02385.271l716 ---|*         EXECUTE *0AU*.  NOTE THAT *0AU* USES DIRECT CELLS 0 - 17B.
04054  M02S02386.271l716 ---|
04055  M02S02387.271l716 ---|          EXECUTE  0AU,OVL0+5
04056  M02S02388.271l716 ---| POF2     LDD    NC          SAVE SYSTEM CP NUMBER FOR *CCAM*
04057  M02S02389.271l716 ---|          STD    CM+1
04058  M02S02390.271l716 ---|          SHN    7
04059  M02S02391.271l716 ---|          STD    CP
04060  M02S02392.271l716 ---|          MONITOR  CCAM      CHANGE PP ASSIGNMENT TO SYSTEM CP
04061  M02S02393.271l716 ---|          LJM    POF1        CONTINUE
04062  M02S02394.271l716 ---|          SPACE  4,10
04063  M02S02395.271l716 ---| P0AU     EQU    *           *0AU* PARAMETER BLOCK
04064  M02S02396.271l716 ---|          SPACE  4,10
04065  M02S02397.271l716 ---| OVL0     EQU    P0AU+12+5   *0AU* ORIGIN
Line S00041 Modification History
M01 (Added by) ns2153
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04066  M02S00041.271l716 ---|
04067  M02S00042.271l716 ---| PPFA     CON    1           ZERO, IF DEADSTART SEQUENCING JOB ACTIVE
04068  M02S00043.271l716 ---|
04069  M02S00044.271l716 ---| O3SD     EQU    *+5         *3SD* LOAD ADDRESS
Line S00206 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04070  M02S00206.271l716 ---| CAL      SPACE  4,20
04071  M02S00207.271l716 ---|**        CAL - CHECK ACCESS LEVEL LIMITS.
04072  M02S00208.271l716 ---|*
04073  M02S00209.271l716 ---|*         CHECK IF THE JOB-S ACCESS LEVEL LIMITS ARE OUTSIDE THE
04074  M02S00210.271l716 ---|*         LIMITS FOR THE JOB-S ORIGIN TYPE.  IF SO, ABORT THE JOB
Line S00211 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2134
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04075  M03S00211.271l716 ---|*         WITH AN *SYET* ERROR.  SUBSYSTEMS WILL BE ABORTED WITH
04076  M03S00212.271l716 ---|*         AN *IDET* ERROR.  IGNORE ALL JOBS THAT ALREADY HAVE
04077  M03S00213.271l716 ---|*         *SYET*, *TJET* OR *IDET* ERRORS, AS WELL AS JOBS ALREADY
04078  M03S00214.271l716 ---|*         IN JOB TERMINATION.
Line S00003 Modification History
M01 (Added by) ns2134
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04079  M02S00003.271l716 ---|*         WITH AN *SYET* ERROR.  SUBSYSTEMS WILL NOT BE ABORTED.
04080  M02S00004.271l716 ---|*         IGNORE ALL JOBS THAT ALREADY HAVE *SYET* OR *TJET* ERROR
04081  M02S00005.271l716 ---|*         FLAGS, AS WELL AS JOBS ALREADY IN JOB TERMINATION.
Line S00215 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04082  M02S00215.271l716 ---|*
04083  M02S00216.271l716 ---|*         ENTRY  (EO) = EJT ORDINAL OF JOB.
04084  M02S00217.271l716 ---|*                (SC) = SERVICE CLASS OF JOB.
04085  M02S00218.271l716 ---|*                (EJ - EJ+4) = *JSNE* WORD OF EJT ENTRY.
04086  M02S00219.271l716 ---|*                (AA - AA+4) = *SCHE* WORD OF EJT ENTRY.
Line S00220 Modification History
M01 (Added by) ns22000
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04087  M03S00220.271l716 ---|*                (CM - CM+4) = *PRFE* WORD OF EJT ENTRY.
Line S00085 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04088  M02S00085.271l716 ---|*                (BB - BB+4) = *PRFE* WORD OF EJT ENTRY.
Line S00221 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04089  M02S00221.271l716 ---|*                (T0 - T0+4) = *SCLE* WORD OF EJT ENTRY.
04090  M02S00222.271l716 ---|*
04091  M02S00223.271l716 ---|*         EXIT   (A) .NE. 0 IF JOB ABORTED OR IN TERMINATION.
04092  M02S00224.271l716 ---|*
04093  M02S00225.271l716 ---|*         USES   CM - CM+4.
04094  M02S00226.271l716 ---|*
04095  M02S00227.271l716 ---|*         MACROS DELAY, MONITOR.
04096  M02S00228.271l716 ---|
04097  M02S00229.271l716 ---|
04098  M02S00230.271l716 ---| CAL3     LDN    1           SET ERROR RETURN STATUS
04099  M02S00231.271l716 ---|
04100  M02S00232.271l716 ---| CAL      SUBR               ENTRY/EXIT
04101  M02S00233.271l716 ---|          LDD    AA+2
04102  M02S00234.271l716 ---|          SHN    21-12
04103  M02S00235.271l716 ---|          MJN    CALX        IF JOB TERMINATION IN PROGRESS
Line S00236 Modification History
M01 (Added by) ns22000
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04104  M03S00236.271l716 ---|          LDD    CM+1
Line S00086 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04105  M02S00086.271l716 ---|          LDD    BB+1
Line S00237 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04106  M02S00237.271l716 ---|          LMK    SYET
04107  M02S00238.271l716 ---|          ZJN    CAL3        IF JOB ALREADY HAS *SYET* ERROR
Line S00239 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2197
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04108  M03S00239.271l716 ---|          LMK    TJET&SYET
04109  M03S00240.271l716 ---|          ZJN    CAL3        IF JOB ALREADY HAS *TJET* ERROR
Line S00241 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2134
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04110  M03S00241.271l716 ---|          LMK    IDET&TJET
04111  M03S00242.271l716 ---|          ZJN    CAL3        IF JOB ALREADY HAS *IDET* ERROR
04112  M03S00243.271l716 ---|          LDD    CM+2        SET UPPER ACCESS LEVEL LIMIT
04113  M03S00244.271l716 ---|          LPN    7
04114  M03S00245.271l716 ---|          STD    CM+3
04115  M03S00246.271l716 ---|          LDD    CM+2        SET LOWER ACCESS LEVEL LIMIT
04116  M03S00247.271l716 ---|          LPN    70
04117  M03S00248.271l716 ---|          SHN    -3
04118  M03S00249.271l716 ---|          STD    CM+4
Line S00006 Modification History
M01 (Added by) ns2134
M02 (Removed by) 242l642
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04119  M03S00006.271l716 ---|          LDD    CM+2
Line S00087 Modification History
M01 (Added by) 242l642
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04120  M02S00087.271l716 ---|          LDD    BB+2
Line S00007 Modification History
M01 (Added by) ns2134
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04121  M02S00007.271l716 ---|          LPN    77
04122  M02S00008.271l716 ---|          SHN    -3+22
04123  M02S00009.271l716 ---|          STD    CM+4        SET LOWER ACCESS LEVEL LIMIT
04124  M02S00010.271l716 ---|          SHN    -22+3
04125  M02S00011.271l716 ---|          STD    CM+3        SET UPPER ACCESS LEVEL LIMIT
Line S00250 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04126  M02S00250.271l716 ---|          LDD    T0          SET ORIGIN TYPE
04127  M02S00251.271l716 ---|          LPN    17
04128  M02S00252.271l716 ---|          STD    CM+2
04129  M02S00253.271l716 ---|          LDN    /CPS/VJLS   VALIDATE JOB LIMITS
04130  M02S00254.271l716 ---|          STD    CM+1
04131  M02S00255.271l716 ---|          MONITOR  VSAM
04132  M02S00256.271l716 ---|          LDD    CM+1
04133  M02S00257.271l716 ---|          ZJN    CALX        IF JOB LIMITS VALID
04134  M02S00258.271l716 ---|
04135  M02S00259.271l716 ---|*         SET *SYET* ERROR FLAG FOR ALL JOBS EXCEPT SUBSYSTEMS.
Line S00260 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2134
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04136  M03S00260.271l716 ---|*         SET *IDET* ERROR FLAG FOR SUBSYSTEMS.
Line S00261 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04137  M02S00261.271l716 ---|
Line S00262 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2134
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04138  M03S00262.271l716 ---| CAL1     LDD    SC
Line S00012 Modification History
M01 (Added by) ns2134
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04139  M02S00012.271l716 ---|          LDD    SC
Line S00263 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04140  M02S00263.271l716 ---|          LMK    SSSC
Line S00264 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2134
M03 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04141  M03S00264.271l716 ---|          ZJN    CAL2        IF JOB IS SUBSYSTEM
04142  M03S00265.271l716 ---|          LDK    SYET&IDET
04143  M03S00266.271l716 ---| CAL2     LMK    IDET+4000   SET ERROR FLAG
Line S00013 Modification History
M01 (Added by) ns2134
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04144  M02S00013.271l716 ---|          ZJN    CALX        IF JOB IS SUBSYSTEM
04145  M02S00014.271l716 ---| CAL1     LDC    SYET+4000   SET ERROR FLAG
Line S00267 Modification History
M01 (Added by) ns22000
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04146  M02S00267.271l716 ---|          STD    CM+1
04147  M02S00268.271l716 ---|          LDD    EO          SET EJT ORDINAL
04148  M02S00269.271l716 ---|          STD    CM+2
04149  M02S00270.271l716 ---|          LDD    EJ          SET JSN
04150  M02S00271.271l716 ---|          STD    CM+3
04151  M02S00272.271l716 ---|          LDD    EJ+1
04152  M02S00273.271l716 ---|          STD    CM+4
04153  M02S00274.271l716 ---|          MONITOR  CEFM
04154  M02S00275.271l716 ---|          LDD    CM+1
04155  M02S00276.271l716 ---|          ZJP    CAL3        IF ERROR FLAG SET
04156  M02S00277.271l716 ---|          DELAY
04157  M02S00278.271l716 ---|          UJN    CAL1        RETRY
Line S02398 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04158  M01S02398.271l716 ---| CCS      SPACE  4,10
04159  M01S02399.271l716 ---|**        CCS - CHECK CM SLICE.
04160  M01S02400.271l716 ---|*
04161  M01S02401.271l716 ---|*         CHECK FOR EXPIRED CM TIME SLICE.
04162  M01S02402.271l716 ---|*
04163  M01S02403.271l716 ---|*         ENTRY  (AA - AA+4) = WORD *TSCW* OF CONTROL POINT AREA.
04164  M01S02404.271l716 ---|*                (TM - TM+1) = SECONDS PORTION OF WORD *RTCL*.
04165  M01S02405.271l716 ---|*
04166  M01S02406.271l716 ---|*         EXIT   (A) .GE. 0  IF CM TIME SLICE EXPIRED.
04167  M01S02407.271l716 ---|
04168  M01S02408.271l716 ---|
04169  M01S02409.271l716 ---| CCS      SUBR               ENTRY/EXIT
04170  M01S02410.271l716 ---|          LDD    TM          CALCULATE REAL TIME - CM SLICE TIME
04171  M01S02411.271l716 ---|          SBD    AA
04172  M01S02412.271l716 ---|          NJN    CCSX        IF NO NEED TO CHECK LOWER BITS
04173  M01S02413.271l716 ---|          LDD    TM+1
04174  M01S02414.271l716 ---|          SBD    AA+1
04175  M01S02415.271l716 ---|          UJN    CCSX        RETURN
04176  M01S02416.271l716 ---| CFS      SPACE  4,10
04177  M01S02417.271l716 ---|**        CFS - CHECK FILE SIZES.
04178  M01S02418.271l716 ---|*
04179  M01S02419.271l716 ---|*         CHECK FOR FILE SIZE LIMIT EXCEEDED FOR SYSTEM DAYFILE, ERROR
04180  M01S02420.271l716 ---|*         LOG, ACCOUNT FILE AND BINARY MAINTENANCE LOG.
04181  M01S02421.271l716 ---|*
04182  M01S02422.271l716 ---|*         USES   T5 - CM+4, AA - AA+4.
04183  M01S02423.271l716 ---|*
04184  M01S02424.271l716 ---|*         CALLS  SEI.
04185  M01S02425.271l716 ---|*
04186  M01S02426.271l716 ---|*         MACROS MONITOR.
04187  M01S02427.271l716 ---|
04188  M01S02428.271l716 ---|
04189  M01S02429.271l716 ---| CFSA     MAX    MSDY,ACDY,ELDY,MLDY
04190  M01S02430.271l716 ---|
04191  M01S02431.271l716 ---| CFS      SUBR               ENTRY/EXIT
04192  M01S02432.271l716 ---|          LDN    DFPP        GET FWA OF BUFFER POINTER WORDS
04193  M01S02433.271l716 ---|          CRD    AA
04194  M01S02434.271l716 ---|          LDN    CFSA*TDFPE+TDFPE  INITIALIZE INDEX
Line S02435 Modification History
M01 (Removed by) 251l664
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
04195  M02S02435.271l716 ---|          STD    AA+1
Proceed to Part 4
cdc/nos2.source/opl.opl871/deck/1sj.003.txt ยท Last modified: (external edit)