User Tools

Site Tools


Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:resex.005

Deck RESEX Part 005

65 Modifications

Source

Seq #  *Modification Id* Act 
----------------------------+
04338  M01S00427.ns21000 +++|          BX7    -X7*X6
04339  M01S00428.ns21000 +++|          LX7    48
04340  M01S00429.ns21000 +++|          NZ     X4,DDS20    IF NOT FIRST ATTEMPT
04341  M01S00430.ns21000 +++|          BX7    X7+X3
04342  M01S00431.ns21000 +++|          SA7    A3
04343  M01S02590.resex   +++| DDS19    SX7    B0+         CLEAR STARTING POSITION
04344  M01S02591.resex   +++|          SB6    B6+2        ADVANCE POINTER
04345  M01S02592.resex   +++|          SA7    DDSA
04346  M01S02593.resex   +++|          EQ     DDS1        LOOP FOR ALL DEMANDED RESOURCES
04347  M01S02594.resex   +++|
04348  M01S02595.resex   +++| DDS20    BX5    X4-X7
04349  M01S02596.resex   +++|          NZ     X5,DDS19    IF NOT ORIGINAL EQUIPMENT
04350  M01S02597.resex   +++|
04351  M01S02598.resex   +++|
04352  M01S02599.resex   +++|*         ALGORITHM MAY HAVE SELECTED A FIRST EQUIPMENT THAT CAUSES
04353  M01S02600.resex   +++|*         UNSATISFACTION WHEN IN FACT SATISFACTION IS POSSIBLE.
04354  M01S02601.resex   +++|*
04355  M01S02602.resex   +++|*         BACKUP AND TRY ANOTHER CHAIN.
04356  M01S02603.resex   +++|
04357  M01S02604.resex   +++|
04358  M01S02605.resex   +++| DDS21    SB4    RDT
04359  M01S02606.resex   +++|          SA2    B6          READ CURRENT DEMANDED RESOURCE
Line S02607 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04360  M02S02607.ns21000 ---|          MX0    -6
04361  M01S00432.ns21000 +++|          MX0    -9
04362  M01S02608.resex   +++|          SB6    B6-2
04363  M01S02609.resex   +++|          LT     B6,B4,DDS24 IF FIRST RESOURCE (NO BACKUP POSSIBLE)
04364  M01S02610.resex   +++|          SA1    B6          CHECK IF SAME EQUIPMENT
04365  M01S02611.resex   +++|          BX5    X2-X1
04366  M01S02612.resex   +++|          AX5    48
Line S02613 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04367  M02S02613.ns21000 ---|          SA1    B6+B1       READ EQUIPMENTS
04368  M01S02614.resex   +++|          NZ     X5,DDS24    IF PREVIOUS RESOURCE NOT SAME TYPE
Line S02615 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04369  M02S02615.ns21000 ---|          LX1    6
Line S02616 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04370  M02S02616.ns21000 ---|          BX7    -X0*X1      FIRST EQUIPMENT
Line S02617 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04371  M02S02617.ns21000 ---| DDS22    BX6    -X0*X1      EQUIPMENT
Line S02618 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04372  M02S02618.ns21000 ---|          ZR     X6,DDS23    IF END OF EQUIPMENTS
Line S02619 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04373  M02S02619.ns21000 ---|          MX4    -1
Line S02620 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04374  M02S02620.ns21000 ---|          SA2    X6+RET      READ RESOURCE EQUIPMENT TABLE ENTRY
Line S02621 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04375  M02S02621.ns21000 ---|          LX1    6
04376  M01S00433.ns21000 +++|          MX4    59
04377  M01S00434.ns21000 +++|          MX3    24
04378  M01S00435.ns21000 +++|          BX6    X3*X1       CLEAR EQUIPMENTS
04379  M01S00436.ns21000 +++|          SA6    A1
04380  M01S00437.ns21000 +++|          SB4    4
04381  M01S00438.ns21000 +++|          LX1    -27
04382  M01S00439.ns21000 +++|          BX7    -X0*X1      FIRST EQUIPMENT INDEX
04383  M01S00440.ns21000 +++|          SA7    DDSA        SET STARTING POSITION
04384  M01S00441.ns21000 +++| DDS22    BX6    -X0*X1      EQUIPMENT INDEX
04385  M01S00442.ns21000 +++|          ZR     X6,DDS1     IF END OF EQUIPMENTS
04386  M01S00443.ns21000 +++|          SB4    B4-B1
04387  M01S00444.ns21000 +++|          SA2    RET+X6      GET RESOURCE EQUIPMENT TABLE ENTRY
04388  M01S00445.ns21000 +++|          LX1    9
04389  M01S02622.resex   +++|          BX6    X4*X2       CLEAR LOGICALLY ASSIGNED BIT
04390  M01S02623.resex   +++|          SA6    A2
04391  M01S00446.ns21000 +++|          NZ     B4,DDS22    IF MORE ENTRIES IN FIRST WORD
04392  M01S00447.ns21000 +++|          SA1    A1+B1
04393  M01S00448.ns21000 +++|          BX6    X3*X1       CLEAR EQUIPMENTS
04394  M01S00449.ns21000 +++|          BX1    -X3*X1
04395  M01S00450.ns21000 +++|          SA6    A1
04396  M01S00451.ns21000 +++|          LX1    -27
04397  M01S02624.resex   +++|          EQ     DDS22       LOOP FOR ALL CHAINED EQUIPMENTS
04398  M01S02625.resex   +++|
Line S02626 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04399  M02S02626.ns21000 ---| DDS23    SA6    A1+         CLEAR EQUIPMENT WORD
Line S02627 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04400  M02S02627.ns21000 ---|          SA7    DDSA        SET STARTING POSITION
Line S02628 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04401  M02S02628.ns21000 ---|          EQ     DDS1        RETRY
Line S02629 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04402  M02S02629.ns21000 ---|
Line S02630 Modification History
M01 (Added by) resex
M02 (Updated by) ns2529a
Seq #  *Modification Id* Act 
----------------------------+
04403  M02S02630.ns2529a ---| DDS24    SX2    B1          SET ERROR STATUS
Line S00004 Modification History
M01 (Added by) ns2529a
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04404  M02S00004.274l797 ---| DDS24    MX0    12
Line S00005 Modification History
M01 (Added by) ns2529a
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04405  M02S00005.274l797 ---|          BX2    X0*X2       UNSATISFIABLE RESOURCE TYPE
04406  M01S00446.274l797 +++| DDS24    SX2    B1          SET ERROR STATUS
04407  M01S02631.resex   +++|          EQ     DDSX        RETURN
04408  M01S02632.resex   +++|
04409  M01S02633.resex   +++| DDS25    SB2    /PER/REV    * RESOURCE ENVIRONMENT ERROR.*
04410  M01S02634.resex   +++|          EQ     PER         PROCESS ERROR
04411  M01S02635.resex   +++|
04412  M01S02636.resex   +++|
04413  M01S02637.resex   +++| DDSA     CON    0           STARTING POSITION
04414  M01S02638.resex   +++| DDSB     CON    0           LDAM CONTROL
04415  M01S02639.resex   +++| DLY      SPACE  4,10
04416  M01S02640.resex   +++|**        DLY - DELAY.
04417  M01S02641.resex   +++|*
04418  M01S02642.resex   +++|*         DLY DELAYS 2 SECONDS FOR MAGNET TO FINISH ACTIVE
04419  M01S02643.resex   +++|*         OPERATIONS BEFORE CONTINUING RESEX PROCESSING.
04420  M01S02644.resex   +++|*
04421  M01S02645.resex   +++|*         USES   A - 1, 2.
04422  M01S02646.resex   +++|*                X - 1, 2.
04423  M01S02647.resex   +++|*
04424  M01S02648.resex   +++|*         MACROS RECALL, RTIME.
04425  M01S02649.resex   +++|
04426  M01S02650.resex   +++|
04427  M01S02651.resex   +++| DLY      SUBR               ENTRY/EXIT
04428  M01S02652.resex   +++|          RTIME  DLYB        GET START TIME
04429  M01S02653.resex   +++| DLY1     RECALL
04430  M01S02654.resex   +++|          RTIME  DLYB+1      GET CURRENT TIME
04431  M01S02655.resex   +++|          SA1    DLYB        CHECK FOR DELAY COMPLETE
04432  M01S02656.resex   +++|          SA2    A1+B1
04433  M01S02657.resex   +++|          IX2    X2-X1       CALCULATE ELAPSED TIME IN MILLISECONDS
04434  M01S02658.resex   +++|          SX2    X2-2000
04435  M01S02659.resex   +++|          NG     X2,DLY1     IF NOT SUFFICIENT DELAY
04436  M01S02660.resex   +++|          JP     DLYX        RETURN
04437  M01S02661.resex   +++|
04438  M01S02662.resex   +++|
04439  M01S02663.resex   +++| DLYB     CON    0,0         TIME TEMPORARIES
04440  M01S02664.resex   +++| IAS      SPACE  4,15
04441  M01S02665.resex   +++|**        IAS - INITIALIZE ASSIGNMENTS.
04442  M01S02666.resex   +++|*
04443  M01S02667.resex   +++|*         ENTRY  (X3) = 0, IF ALL PHYSICALLY ASSIGNED EQUIPMENTS TO
04444  M01S02668.resex   +++|*                     BE LOGICALLY ASSIGNED.
04445  M01S02669.resex   +++|*                (X3) = JOB EJT ORDINAL, IF PHYSICALLY ASSIGNED.
04446  M01S02670.resex   +++|*                     EQUIPMENTS FOR THIS JOB TO BE LOGICALLY ASSIGNED.
04447  M01S02671.resex   +++|*
04448  M01S02672.resex   +++|*         EXIT   LOGICALLY ASSIGNED BITS SET FOR PHYSICALLY ASSIGNED
04449  M01S02673.resex   +++|*                EQUIPMENTS.
04450  M01S02674.resex   +++|*
04451  M01S02675.resex   +++|*         USES   A - 2, 5, 7.
Line S02676 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04452  M02S02676.ns21000 ---|*                B - 2, 3.
04453  M01S00452.ns21000 +++|*                B - 2, 3, 5.
04454  M01S02677.resex   +++|*                X - 0, 2, 4, 5, 7.
04455  M01S02678.resex   +++|*
04456  M01S02679.resex   +++|*         MACROS CLEAR.
04457  M01S02680.resex   +++|
04458  M01S02681.resex   +++|
04459  M01S02682.resex   +++| IAS      SUBR               ENTRY/EXIT
Line S02683 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04460  M02S02683.ns21000 ---|          CLEAR  RET,ESTL,-1 CLEAR LOGICALLY ASSIGNED BITS
Line S02684 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04461  M02S02684.ns21000 ---|          SB3    EVSB        SET LOGICALLY ASSIGNED EQUIPMENTS
Line S02685 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04462  M02S02685.ns21000 ---|          SB2    B1+B1
Line S02686 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04463  M02S02686.ns21000 ---|          SX4    B1
Line S02687 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04464  M02S02687.ns21000 ---| IAS1     SA2    B3+B1
Line S02688 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04465  M02S02688.ns21000 ---|          SB3    B3+B2
Line S02689 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04466  M02S02689.ns21000 ---|          ZR     X2,IASX     IF END OF EVSB
Line S02690 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04467  M02S02690.ns21000 ---|          LX2    6
Line S02691 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04468  M02S02691.ns21000 ---|          PL     X2,IAS1     IF NOT PHYSICALLY ASSIGNED
Line S02692 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04469  M02S02692.ns21000 ---|          MX5    12          GET USER COUNT
Line S02693 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04470  M02S02693.ns21000 ---|          LX5    -6
Line S02694 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04471  M02S02694.ns21000 ---|          BX5    X5*X2
04472  M01S00453.ns21000 +++|          CLEAR  RET,RETL,-1 CLEAR LOGICALLY ASSIGNED BITS
04473  M01S00454.ns21000 +++|          SA2    RETE        GET RET/EVSB ENDING INDEX
04474  M01S00455.ns21000 +++|          SB2    RET+X2
04475  M01S00456.ns21000 +++|          LX2    1
04476  M01S00457.ns21000 +++|          SX4    B1
04477  M01S00458.ns21000 +++|          SB3    EVSB
04478  M01S00459.ns21000 +++|          MX0    -12
04479  M01S00460.ns21000 +++|          SB5    B3+X2
04480  M01S00461.ns21000 +++| IAS1     SA2    B3+B1
04481  M01S00462.ns21000 +++|          EQ     B3,B5,IASX  IF END OF EVSB
04482  M01S00463.ns21000 +++|          LX2    59-35
04483  M01S00464.ns21000 +++|          SB3    B3+2
04484  M01S00465.ns21000 +++|          ZR     X2,IAS1     IF EMPTY ENTRY
04485  M01S00466.ns21000 +++|          PL     X2,IAS1     IF NOT PHYSICALLY ASSIGNED
04486  M01S00467.ns21000 +++|          BX5    -X0*X2      GET USER COUNT
04487  M01S00468.ns21000 +++|          LX2    12
04488  M01S02695.resex   +++|          ZR     X5,IAS1     IF NO USERS
04489  M01S02696.resex   +++|          ZR     X3,IAS2     IF JOB EJT ORDINAL MATCH NOT REQUIRED
Line S02697 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04490  M02S02697.ns21000 ---|          MX0    -12
04491  M01S02698.resex   +++|          SA5    A2
04492  M01S02699.resex   +++|          BX5    X5-X3
04493  M01S02700.resex   +++|          BX5    -X0*X5
04494  M01S02701.resex   +++|          NZ     X5,IAS1     IF NO MATCH
Line S02702 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04495  M02S02702.ns21000 ---| IAS2     MX0    -6          GET NEXT EQUIPMENT
Line S02703 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04496  M02S02703.ns21000 ---|          BX5    -X0*X2
Line S02704 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04497  M02S02704.ns21000 ---|          SA2    X5+RET
Line S02705 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04498  M02S02705.ns21000 ---|          BX7    X4+X2       MARK AS ASSIGNED
Line S02706 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04499  M02S02706.ns21000 ---|          ZR     X5,IAS1     IF NO EQUIPMENT
Line S02707 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04500  M02S02707.ns21000 ---|          SA7    A2
Line S02708 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04501  M02S02708.ns21000 ---|          LX2    -3
Line S02709 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04502  M02S02709.ns21000 ---|          NG     X2,IAS1     IF END OF CHAIN
Line S02710 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04503  M02S02710.ns21000 ---|          LX2    -21
04504  M01S00469.ns21000 +++| IAS2     LX2    -24
04505  M01S00470.ns21000 +++|          BX5    -X0*X2      NEXT EQUIPMENT
04506  M01S00471.ns21000 +++|          SA2    RET
04507  M01S00472.ns21000 +++| IAS3     SA2    A2+B1
04508  M01S00473.ns21000 +++|          SX7    A2-B2
04509  M01S00474.ns21000 +++|          ZR     X7,IAS1     IF EQUIPMENT NOT FOUND
04510  M01S00475.ns21000 +++|          LX2    -12
04511  M01S00476.ns21000 +++|          BX7    -X0*X2
04512  M01S00477.ns21000 +++|          BX7    X7-X5
04513  M01S00478.ns21000 +++|          NZ     X7,IAS3     IF NOT CORRECT ENTRY
04514  M01S00479.ns21000 +++|          LX2    12
04515  M01S00480.ns21000 +++|          BX7    X4+X2       MARK AS ASSIGNED
04516  M01S00481.ns21000 +++|          SA7    A2
04517  M01S00482.ns21000 +++|          LX7    59-2
04518  M01S00483.ns21000 +++|          NG     X7,IAS1     IF END OF CHAIN
04519  M01S02711.resex   +++|          EQ     IAS2        CONTINUE INITIALIZATION
Line S02712 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04520  M02S02712.282l826 ---| SDT      SPACE  4,15
04521  M01S00082.282l826 +++| SDT      SPACE  4,10
04522  M01S02713.resex   +++|**        SDT - SWITCH 9-TRACK DRIVE TYPE.
04523  M01S02714.resex   +++|*
04524  M01S02715.resex   +++|*         ENTRY  (X4) = PREVIOUS 9-TRACK DRIVE TYPE SELECTION IN
04525  M01S02716.resex   +++|*                     BITS 0 - 5.
04526  M01S02717.resex   +++|*
Line S02718 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04527  M02S02718.282l826 ---|*         EXIT   (NTRD) = DISPLAY CODE FOR NEW 9-TRACK DENSITY.
Line S02719 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04528  M02S02719.282l826 ---|*                (RESB+RQPD) = UPDATED REQUEST PREVIEW DATA.
Line S02720 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04529  M02S02720.282l826 ---|*                (X4) = NEW 9-TRACK DENSITY RESOURCE INDEX.
04530  M01S00083.282l826 +++|*         EXIT   (X4) = NEW 9-TRACK DENSITY RESOURCE INDEX.
04531  M01S02721.resex   +++|*                (X6) = DISPLAY CODE FOR NEW 9-TRACK DENSITY.
04532  M01S02722.resex   +++|*
Line S02723 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04533  M02S02723.282l826 ---|*         USES   A - 1, 6, 7.
Line S02724 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04534  M02S02724.282l826 ---|*                X - 0, 1, 4, 6, 7.
04535  M01S00084.282l826 +++|*         USES   X - 0, 1, 4, 6.
04536  M01S02725.resex   +++|
04537  M01S02726.resex   +++|
04538  M01S02727.resex   +++| SDT      SUBR               ENTRY/EXIT
04539  M01S02728.resex   +++|          MX0    -6
04540  M01S02729.resex   +++|          BX1    -X0*X4      GET PREVIOUS DRIVE TYPE
04541  M01S02730.resex   +++|          SX6    2RGE
04542  M01S02731.resex   +++|          SX1    X1-RHDP
Line S02732 Modification History
M01 (Added by) resex
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
04543  M02S02732.ns22000 ---|          SX4    RGEP+100B
04544  M01S00231.ns22000 +++|          SX4    RGEP
Line S02733 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04545  M02S02733.282l826 ---|          ZR     X1,SDT1     IF *HD* DRIVE PREVIOUSLY SELECTED
04546  M01S00085.282l826 +++|          ZR     X1,SDTX     IF *HD* DRIVE PREVIOUSLY SELECTED
04547  M01S02734.resex   +++|          SX6    2RHD
Line S02735 Modification History
M01 (Added by) resex
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
04548  M02S02735.ns22000 ---|          SX4    RHDP+100B
04549  M01S00232.ns22000 +++|          SX4    RHDP
Line S02736 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04550  M02S02736.282l826 ---| SDT1     SA6    DD          CHANGE 9-TRACK DENSITY DISPLAY
Line S02737 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04551  M02S02737.282l826 ---|          SA1    RESB+RQPD   UPDATE REQUEST PREVIEW DATA
Line S02738 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04552  M02S02738.282l826 ---|          MX0    42
Line S02739 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04553  M02S02739.282l826 ---|          BX7    X6
Line S02740 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04554  M02S02740.282l826 ---|          LX7    6
Line S02741 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04555  M02S02741.282l826 ---|          BX1    X0*X1
Line S02742 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04556  M02S02742.282l826 ---|          BX7    X1+X7
Line S02743 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04557  M02S02743.282l826 ---|          SA7    A1
04558  M01S02744.resex   +++|          EQ     SDTX        RETURN
04559  M01S00447.274l797 +++| SPI      SPACE  4,10
04560  M01S00448.274l797 +++|**        SPI - SET PREVIEW INFORMATION IN DEMAND FILE ENTRY.
04561  M01S00449.274l797 +++|*
04562  M01S00450.274l797 +++|*         ENTRY  DEMAND FILE ENTRY IN *RESB*.
04563  M01S00451.274l797 +++|*
04564  M01S00452.274l797 +++|*         EXIT   PREVIEW INFORMATION SET IN DEMAND FILE ENTRY.
04565  M01S00453.274l797 +++|*
Line S00454 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04566  M02S00454.282l826 ---|*         USES   X - ALL.
04567  M01S00086.282l826 +++|*         USES   X - 0, 1, 2, 3, 4, 6, 7.
04568  M01S00455.274l797 +++|*                A - 1, 2, 3, 4, 6.
04569  M01S00456.274l797 +++|*
Line S00457 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04570  M02S00457.282l826 ---|*         CALLS  GFO.
04571  M01S00087.282l826 +++|*         CALLS  SFN.
04572  M01S00458.274l797 +++|
04573  M01S00459.274l797 +++|
04574  M01S00460.274l797 +++| SPI      SUBR               ENTRY/EXIT
04575  M01S00461.274l797 +++|
04576  M01S00462.274l797 +++|*         SET TIME OF REQUEST AND CHECK REQUEST TYPE.
04577  M01S00463.274l797 +++|
04578  M01S00464.274l797 +++|          SA1    TM
04579  M01S00465.274l797 +++|          SA2    RQ
04580  M01S00466.274l797 +++|          SA3    RI
04581  M01S00467.274l797 +++|          MX0    -6
04582  M01S00468.274l797 +++|          BX6    X1
Line S00469 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04583  M02S00469.282l826 ---|          BX7    X2
04584  M01S00470.274l797 +++|          BX3    -X0*X3
04585  M01S00088.282l826 +++|          SA6    RESB+RREQ   SET REQUEST TIME
04586  M01S00471.274l797 +++|          SX3    X3-RRPP
Line S00472 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04587  M02S00472.282l826 ---|          SA6    RESB+RQPT   SET TIME OF REQUEST
04588  M01S00473.274l797 +++|          NG     X3,SPI1     IF TAPE REQUEST
04589  M01S00474.274l797 +++|
Line S00475 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04590  M02S00475.282l826 ---|*         SET PACKNAME AND PACK RESOURCE TYPE.
04591  M01S00089.282l826 +++|*         SET PACKNAME, PACK RESOURCE TYPE, AND UNIT COUNT.
04592  M01S00476.274l797 +++|
Line S00477 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04593  M02S00477.282l826 ---|          SA7    RESB+RQPD
Line S00478 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04594  M02S00478.282l826 ---|          EQ     SPI3        SET USER AND JOB IDENTIFICATION
04595  M01S00090.282l826 +++|          MX6    42
04596  M01S00091.282l826 +++|          MX7    -12
04597  M01S00092.282l826 +++|          BX6    X6*X2       PACK NAME
04598  M01S00093.282l826 +++|          LX7    6
04599  M01S00094.282l826 +++|          SA6    RESB+RQPV+PVSN  SET PACK NAME
04600  M01S00095.282l826 +++|          SA6    RESB+RQPV+PVSI
04601  M01S00096.282l826 +++|          BX0    -X0*X2      DISPLAY CODE UNIT COUNT
04602  M01S00097.282l826 +++|          BX7    -X7*X2      RESOURCE MNEMONIC
04603  M01S00098.282l826 +++|          SX0    X0-1R1      UNIT COUNT - 1
04604  M01S00099.282l826 +++|          LX7    6
04605  M01S00100.282l826 +++|          LX0    9
04606  M01S00101.282l826 +++|          SX6    20B
04607  M01S00102.282l826 +++|          BX7    X7+X0       MERGE RESOURCE TYPE AND UNIT COUNT
04608  M01S00103.282l826 +++|          BX7    X6+X7       SET UNIT COUNT FLAG
04609  M01S00104.282l826 +++|          SA7    RESB+RQPV+PRES
04610  M01S00105.282l826 +++|          SX6    B0+         CLEAR FLAGS
04611  M01S00106.282l826 +++|          SA6    RESB+RQPV+PFLG
04612  M01S00107.282l826 +++|          EQ     SPI4        SET USER AND JOB IDENTIFICATION
04613  M01S00479.274l797 +++|
Line S00480 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04614  M02S00480.282l826 ---|*         SET VSN AND TAPE RESOURCE TYPE.
04615  M01S00108.282l826 +++|*         SET EXTERNAL VSN, RESOURCE TYPE, AND ACCESS LEVEL.
04616  M01S00481.274l797 +++|
Line S00482 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04617  M02S00482.282l826 ---| SPI1     SA1    IVSN
Line S00483 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04618  M02S00483.282l826 ---|          SA3    DD
Line S00484 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04619  M02S00484.282l826 ---|          SA4    EV
Line S00485 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04620  M02S00485.282l826 ---|          MX7    -18
Line S00486 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04621  M02S00486.282l826 ---|          BX2    -X7*X2      RESOURCE TYPE
Line S00487 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04622  M02S00487.282l826 ---|          ZR     X3,SPI2     IF NOT 9-TRACK REQUEST
04623  M01S00109.282l826 +++| SPI1     SA1    EVSN
04624  M01S00110.282l826 +++|          SA2    RMN
04625  M01S00111.282l826 +++|          SA3    AL
04626  M01S00112.282l826 +++|          SA4    BLANK
04627  M01S00113.282l826 +++|          BX6    X1
04628  M01S00114.282l826 +++|          LX2    12
04629  M01S00115.282l826 +++|          SA6    RESB+RQPV+PVSN  SET VSN
04630  M01S00488.274l797 +++|          LX3    6
Line S00489 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04631  M02S00489.282l826 ---|          BX2    X3          USE DENSITY AS RESOURCE TYPE
Line S00490 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04632  M02S00490.282l826 ---| SPI2     BX6    X1+X2       MERGE VSN
Line S00491 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04633  M02S00491.282l826 ---|          BX6    X6+X4       MERGE EQUIVALENCED VSN STATUS
Line S00492 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04634  M02S00492.282l826 ---|          SA6    RESB+RQPD   SET VSN AND RESOURCE TYPE
04635  M01S00116.282l826 +++|          BX4    X1-X4
04636  M01S00117.282l826 +++|          SX3    X3+10B      SET ACCESS LEVEL AND FLAG
04637  M01S00118.282l826 +++|          NZ     X4,SPI2     IF NOT SCRATCH REQUEST
04638  M01S00119.282l826 +++|          SX3    X3+40B      SET SCRATCH VSN FLAG
04639  M01S00120.282l826 +++| SPI2     BX6    X2+X3       MERGE RESOURCE TYPE AND FLAGS
04640  M01S00121.282l826 +++|          SA6    RESB+RQPV+PRES
04641  M01S00493.274l797 +++|
Line S00494 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04642  M02S00494.282l826 ---|*         SET EXTERNAL VSN AND FLAGS.
04643  M01S00122.282l826 +++|*         SET INTERNAL VSN AND FLAGS.
04644  M01S00495.274l797 +++|
Line S00496 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04645  M02S00496.282l826 ---|          SA1    EVSN
Line S00497 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04646  M02S00497.282l826 ---|          SA2    AL
04647  M01S00123.282l826 +++|          MX0    1
04648  M01S00124.282l826 +++|          SA1    IVSN
04649  M01S00125.282l826 +++|          SA2    TMPF
04650  M01S00498.274l797 +++|          SA3    F+FTAP
Line S00499 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04651  M02S00499.282l826 ---|          SA4    TMPF
Line S00500 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04652  M02S00500.282l826 ---|          LX2    3
04653  M01S00126.282l826 +++|          BX7    X1
04654  M01S00127.282l826 +++|          LX2    59-58
04655  M01S00128.282l826 +++|          SA7    RESB+RQPV+PVSI  SET VSN
04656  M01S00501.274l797 +++|          LX3    59-58
Line S00502 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04657  M02S00502.282l826 ---|          LX4    59-56
Line S00503 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04658  M02S00503.282l826 ---|          MX0    1
Line S00504 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04659  M02S00504.282l826 ---|          BX6    X1+X2       MERGE EXTERNAL VSN AND ACCESS LEVEL
Line S00505 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04660  M02S00505.282l826 ---|          BX5    X0*X3       LABELED FLAG
Line S00506 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04661  M02S00506.282l826 ---|          BX4    X0*X4       VERIFY NON-TMS FLAG
Line S00507 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04662  M02S00507.282l826 ---|          LX5    2-59
Line S00508 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04663  M02S00508.282l826 ---|          LX4    23-59
Line S00509 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04664  M02S00509.282l826 ---|          BX6    X6+X5       MERGE LABELED FLAG
04665  M01S00129.282l826 +++|          BX2    X0*X2       TMS REQUEST FLAG
04666  M01S00130.282l826 +++|          BX4    X0*X3       LABELED FLAG
04667  M01S00131.282l826 +++|          LX2    21-59
04668  M01S00132.282l826 +++|          LX3    0-39-59+58
04669  M01S00510.274l797 +++|          MX0    -2
Line S00511 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04670  M02S00511.282l826 ---|          BX6    X6+X4       MERGE VERIFY FLAG
Line S00512 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04671  M02S00512.282l826 ---|          LX3    0-39-59+58
04672  M01S00133.282l826 +++|          LX4    20-59
04673  M01S00513.274l797 +++|          BX3    -X0*X3      PO = R, PO = W FLAGS
Line S00514 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04674  M02S00514.282l826 ---|          BX6    X6+X3       MERGE READ OR WRITE FLAG
Line S00515 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04675  M02S00515.282l826 ---|          SA6    RESB+RQPF   SET FLAGS AND EXTERNAL VSN
04676  M01S00134.282l826 +++|          LX3    18-0
04677  M01S00135.282l826 +++|          BX3    X2+X3       MERGE TMS AND READ/WRITE FLAGS
04678  M01S00136.282l826 +++|          BX6    X3+X4       MERGE LABELED FLAG
04679  M01S00137.282l826 +++|          SA6    RESB+RQPV+PFLG  SET FLAGS
04680  M01S00516.274l797 +++|
04681  M01S00517.274l797 +++|*         SET USER NAME, FAMILY ORDINAL, AND EJT ORDINAL.
04682  M01S00518.274l797 +++|
Line S00519 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04683  M02S00519.282l826 ---| SPI3     RJ     GFO         GET FAMILY ORDINAL
Line S00520 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04684  M02S00520.282l826 ---|          SA1    SSJ=+/COMSSSJ/UIDS
04685  M01S00138.282l826 +++| SPI4     SA1    SSJ=+/COMSSSJ/UIDS
04686  M01S00139.282l826 +++|          MX0    42
04687  M01S00140.282l826 +++|          BX1    X0*X1
04688  M01S00141.282l826 +++|          SA2    FAMO
04689  M01S00142.282l826 +++|          RJ     SFN         SPACE FILL USER NAME
04690  M01S00521.274l797 +++|          SA3    JEEO
Line S00522 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04691  M02S00522.282l826 ---|          MX0    42
Line S00523 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04692  M02S00523.282l826 ---|          LX7    12
Line S00524 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04693  M02S00524.282l826 ---|          BX1    X0*X1       USER NAME
Line S00525 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04694  M02S00525.282l826 ---|          BX6    X7+X1       MERGE USER NAME AND FAMILY ORDINAL
04695  M01S00143.282l826 +++|          BX1    X0*X6       USER NAME
04696  M01S00144.282l826 +++|          LX2    12
04697  M01S00145.282l826 +++|          BX6    X1+X2       MERGE USER NAME AND FAMILY ORDINAL
04698  M01S00526.274l797 +++|          BX6    X6+X3       MERGE EJT ORDINAL
Line S00527 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04699  M02S00527.282l826 ---|          SA6    RESB+RQPU   SET USER AND JOB INDENTIFICATION
04700  M01S00146.282l826 +++|          SA6    RESB+RQPV+PJID  SET USER AND JOB INDENTIFICATION
04701  M01S00528.274l797 +++|          EQ     SPIX        RETURN
04702  M01S02745.resex   +++|          TITLE  RESOURCE RESERVATION SUBROUTINES.
04703  M01S02746.resex   +++| RMT      SPACE  4,25
04704  M01S02747.resex   +++|**        RMT - REQUEST MAGNETIC TAPE.
04705  M01S02748.resex   +++|*
04706  M01S02749.resex   +++|*         ENTRY  (FET+10B) = TAPE DESCRIPTORS.
04707  M01S02750.resex   +++|*                (FET+11B - FET+15B) = LABEL DESCRIPTORS.
04708  M01S02751.resex   +++|*                (VA) = VSN ENTRY RANDOM ADDRESS, IF VSN ENTRY PRESENT.
04709  M01S02752.resex   +++|*                VSNB = VSN ENTRY FROM VSN FILE, IF (VA) .NE. 0.
Line S02753 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04710  M02S02753.282l826 ---|*                (VI) = VSN INDEX.
04711  M01S02754.resex   +++|*
04712  M01S02755.resex   +++|*         EXIT   TAPE ASSIGNED AND APPROPRIATELY OPENED.
Line S02756 Modification History
M01 (Added by) resex
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
04713  M02S02756.v23l617 ---|*                TO *END1*, IF LABEL CONTROL STATEMENT PROCESSING.
Line S02757 Modification History
M01 (Added by) resex
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
04714  M02S02757.v23l617 ---|*                TO *END2*, IF NOT LABEL CONTROL STATEMENT PROCESSING.
04715  M01S00035.v23l617 +++|*                TO *END1*, IF LABEL COMMAND PROCESSING.
04716  M01S00036.v23l617 +++|*                TO *END2*, IF NOT LABEL COMMAND PROCESSING.
04717  M01S02758.resex   +++|*                TO *PIT*, IF INTERRUPT DETECTED.
04718  M01S02759.resex   +++|*
04719  M01S02760.resex   +++|*         ERROR  TO *PER*, IF CONFLICTING RESOURCE TYPES.
04720  M01S02761.resex   +++|*
04721  M01S02762.resex   +++|*         USES   A - 1, 2, 3, 4, 5, 6, 7.
04722  M01S02763.resex   +++|*                B - 2.
04723  M01S02764.resex   +++|*                X - ALL.
04724  M01S02765.resex   +++|*
Line S02766 Modification History
M01 (Added by) resex
M02 (Updated by) ns2161
Seq #  *Modification Id* Act 
----------------------------+
04725  M02S02766.ns2161  ---|*         CALLS  BEV, BPD, COM, CUP, IDE, IVE, MVE, OPN, PRO, RDF,
Line S00070 Modification History
M01 (Added by) ns2161
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04726  M02S00070.274l797 ---|*         CALLS  BEV, BPD, COE, COM, CUP, IDE, IVE, MVE, OPN, PRO, RDF,
Line S02767 Modification History
M01 (Added by) resex
M02 (Updated by) 252l678
M03 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04727  M03S02767.274l797 ---|*                ROA, UDF, VUR.
Line S00111 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04728  M02S00111.274l797 ---|*                ROA, UDF, VUR, WOA.
Line S00529 Modification History
M01 (Added by) 274l797
M02 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
04729  M02S00529.ns2770  ---|*         CALLS  BEV, BPD, COE, COM, CUP, GTM, IAM, IDE, IVE, MVE, OPN,
Line S00530 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
M03 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
04730  M03S00530.ns2770  ---|*                PRO, RDF, UDF, VUR, WOA.
Line S00531 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
M03 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
04731  M03S00531.ns2770  ---|*                RDF, ROA, SDD, UDF, VUR, WOA.
Line S00147 Modification History
M01 (Added by) 282l826
M02 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
04732  M02S00147.ns2770  ---|*                PRO, RDF, SDD, UDF, VUR.
04733  M01S00002.ns2770  +++|*         CALLS  BEV, BPD, COE, COM, CUP, GTM, IDE, IVE, MVE, OPN, PRO,
04734  M01S00003.ns2770  +++|*                RDF, SDD, UDF, VUR.
04735  M01S02768.resex   +++|*
Line S02769 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04736  M02S02769.274l797 ---|*         MACROS INTRC, INTRP, MOVE, PDATE, RETRF.
Line S00532 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04737  M02S00532.282l826 ---|*         MACROS INTRC, INTRP, MOVE, RETRF.
04738  M01S00148.282l826 +++|*         MACROS MOVE, RETRF, REWIND, SETFET.
04739  M01S02770.resex   +++|
04740  M01S02771.resex   +++|
04741  M01S02772.resex   +++| RMT      BSS    0           ENTRY
04742  M01S00533.274l797 +++|          RJ     SDD         SET DEVICE TYPE AND DENSITY DISPLAY
04743  M01S02773.resex   +++|          RJ     IDE         INITIALIZE DEMAND ENTRY
04744  M01S02774.resex   +++|          RJ     RDF         READ DEMAND FILE ENTRY
04745  M01S02775.resex   +++|          SA1    /CPA/RFCW   GET DEMAND FILE RANDOM INDEX
04746  M01S02776.resex   +++|          SA5    DBUF+RNTP   GET *NT* RESOURCE DEMAND
04747  M01S02777.resex   +++|          MX3    -6
04748  M01S02778.resex   +++|          LX5    24
04749  M01S02779.resex   +++|          SX6    X1
04750  M01S02780.resex   +++|          BX5    -X3*X5
04751  M01S02781.resex   +++|          NZ     X6,RMT1     IF DEMAND ENTRY PRESENT
04752  M01S02782.resex   +++|          SX5    B0+         PREVENT RETURN OF DEMAND FILE
04753  M01S02783.resex   +++|          RJ     UDF         UPDATE DEMAND FILE
04754  M01S02784.resex   +++|          SX5    B0+         INDICATE NO *NT* DEMAND
04755  M01S02785.resex   +++| RMT1     RETRF  D           RETURN DEMAND FILE, RELEASE INTERLOCK
04756  M01S02786.resex   +++|          SA1    F+FTAP      BUILD RESOURCE TYPE AND INDEX
Line S02787 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04757  M02S02787.274l797 ---|          SX7    RMTP        INDICATE *MT* REQUEST
Line S02788 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04758  M02S02788.274l797 ---|          LX1    59-56
Line S02789 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04759  M02S02789.274l797 ---|          PL     X1,RMT3     IF *MT* REQUEST
Line S02790 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04760  M02S02790.274l797 ---|          LX1    0-51-59+56  GET DENSITY
04761  M01S00534.274l797 +++|          LX1    -55
04762  M01S00535.274l797 +++|          MX3    -2
04763  M01S00536.274l797 +++|          BX4    -X3*X1      DEVICE TYPE
04764  M01S00537.274l797 +++|          SA2    TTDV+X4
04765  M01S00538.274l797 +++|          SX3    X4-/COMSMTX/DVNT
04766  M01S00539.274l797 +++|          AX2    18
04767  M01S00540.274l797 +++|          SX7    X2          RESOURCE TYPE
04768  M01S00541.274l797 +++|          NZ     X3,RMT3     IF NOT *NT* REQUEST
04769  M01S00542.274l797 +++|          LX1    0-51+55     GET DENSITY
04770  M01S02791.resex   +++|          MX3    -3
04771  M01S02792.resex   +++|          BX3    -X3*X1
04772  M01S02793.resex   +++|          SX3    X3-/COMSMTX/D16
04773  M01S02794.resex   +++|          SX7    RHDP        INDICATE *HD* REQUEST
04774  M01S02795.resex   +++|          NG     X3,RMT2     IF *HD* REQUEST
04775  M01S02796.resex   +++|          SX7    RPEP        INDICATE *PE* REQUEST
04776  M01S02797.resex   +++|          ZR     X3,RMT2     IF *PE* REQUEST
04777  M01S02798.resex   +++|          SB2    /PER/CRT    * CONFLICTING RESOURCE TYPES.*
04778  M01S02799.resex   +++|          NZ     X5,PER      IF *GE* REQUEST WITH *NT* DEMANDS
04779  M01S02800.resex   +++|          SX7    RGEP        INDICATE *GE* REQUEST
04780  M01S02801.resex   +++| RMT2     SA7    OI          SAVE ORIGINAL NT TAPE DENSITY INDEX
04781  M01S02802.resex   +++|          ZR     X5,RMT3     IF NO *NT* DEMANDS
04782  M01S02803.resex   +++|          SX7    RNTP        INDICATE *NT* REQUEST
Line S02804 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04783  M02S02804.274l797 ---| RMT3     SA3    A1+B1       GET VSN
04784  M01S00543.274l797 +++| RMT3     SA3    IVSN        GET INTERNAL VSN
Line S02805 Modification History
M01 (Added by) resex
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
04785  M02S02805.ns21000 ---|          SA2    RSXB+X7     GET RESOURCE IDENTIFIER
04786  M01S00484.ns21000 +++|          SA2    TRID-RMTP+X7  GET RESOURCE INDEX
Line S02806 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04787  M02S02806.274l797 ---|          MX1    36
04788  M01S00544.274l797 +++|          SX4    X4-/COMSMTX/DVAT
04789  M01S00545.274l797 +++|          NZ     X4,RMT3.1   IF NOT *AT* REQUEST
04790  M01S00546.274l797 +++|          SA3    EVSN        USE EXTERNAL VSN FOR ACS REQUEST
04791  M01S00547.274l797 +++| RMT3.1   SA1    AL          REQUESTED ACCESS LEVEL
04792  M01S02807.resex   +++|          LX2    18
Line S02808 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04793  M02S02808.274l797 ---|          BX3    X1*X3
Line S02809 Modification History
M01 (Added by) resex
M02 (Updated by) ns22000
M03 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04794  M03S02809.274l797 ---|          SX7    X7+100B     SET RESOURCE BYTE POINTER
Line S00233 Modification History
M01 (Added by) ns22000
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04795  M02S00233.274l797 ---|          SA1    AL          REQUESTED ACCESS LEVEL
04796  M01S00234.ns22000 +++|          SX1    X1+B1
04797  M01S00235.ns22000 +++|          LX1    6           POSITION TAPE BYTE POINTER
04798  M01S00236.ns22000 +++|          BX7    X1+X7       ENTER RESOURCE INDEX (RI)
04799  M01S02810.resex   +++|          SA7    RI          ENTER RESOURCE INDEX (RI)
04800  M01S02811.resex   +++|          SA1    F           SET VSN CALL FET
04801  M01S02812.resex   +++|          BX6    X3+X2
04802  M01S02813.resex   +++|          SA6    RQ          ENTER USER REQUEST (RQ)
04803  M01S02814.resex   +++|          BX7    X1
04804  M01S02815.resex   +++|          SA7    VF
Line S02816 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04805  M02S02816.274l797 ---|          PDATE  TM
04806  M01S00548.274l797 +++|          RJ     GTM         GET CURRENT TIME
04807  M01S02817.resex   +++|
04808  M01S02818.resex   +++|*         GUARANTEE VSN ENTRY.
04809  M01S02819.resex   +++|
04810  M01S02820.resex   +++|          SA1    VA          CHECK ENTRY PRESENT
04811  M01S02821.resex   +++|          NZ     X1,RMT4     IF VSN ENTRY PRESENT
04812  M01S02822.resex   +++|          SA3    F
04813  M01S02823.resex   +++|          SB2    B1+
04814  M01S02824.resex   +++|          RJ     IVE         INITIALIZE VSN ENTRY
04815  M01S02825.resex   +++|          EQ     RMT5        UPDATE VSN FILE
04816  M01S02826.resex   +++|
04817  M01S02827.resex   +++| RMT4     MOVE   VSNL,VSNB,VSNE  MOVE VSN ENTRY TO WORKING BUFFER
04818  M01S02828.resex   +++| RMT5     SA1    RI          SET RESOURCE INDEX IN VSN ENTRY
04819  M01S02829.resex   +++|          SA2    VSNE+VDFI
04820  M01S02830.resex   +++|          LX1    24
04821  M01S02831.resex   +++|          BX6    X1+X2
04822  M01S02832.resex   +++|          SA6    A2+
04823  M01S02833.resex   +++|          RJ     MVE         CREATE OR REWRITE VSN ENTRY
Line S02834 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04824  M02S02834.282l826 ---|          SA1    VSNE+VVSN   CHECK FOR EQUIVALENCED VSN
Line S02835 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04825  M02S02835.282l826 ---|          MX6    -6
Line S02836 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04826  M02S02836.282l826 ---|          BX6    -X6*X1
Line S02837 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04827  M02S02837.282l826 ---|          SX1    X6-1R=
Line S02838 Modification History
M01 (Added by) resex
M02 (Updated by) 252l678
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04828  M03S02838.282l826 ---|          NZ     X1,RMT6     IF NOT EQUIVALENCED VSN
Line S00112 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04829  M02S00112.282l826 ---|          NZ     X1,RMT6.1   IF ONLY ONE VSN
Line S00001 Modification History
M01 (Added by) resex33
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04830  M02S00001.282l826 ---|          SA2    TMPF        CHECK FOR NON-*TMS* TAPE
Line S00002 Modification History
M01 (Added by) resex33
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04831  M02S00002.282l826 ---|          LX2    59-58
Line S02839 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04832  M02S02839.282l826 ---|          LX6    18          SET EQUIVALENCED VSN FLAG
Line S02840 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04833  M02S02840.282l826 ---|          SA6    EV
Line S00003 Modification History
M01 (Added by) resex33
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04834  M03S00003.282l826 ---|          PL     X2,RMT6.1   IF NOT A *TMS* CONTROLLED TAPE
Line S00549 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04835  M02S00549.282l826 ---|          PL     X2,RMT6.1   IF NOT A *TMS* CONTROLLED REQUEST
Line S00113 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04836  M02S00113.282l826 ---|          SA2    A1+B1       GET INTERNAL VSN
Line S00114 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04837  M02S00114.282l826 ---|          MX0    36
Line S00115 Modification History
M01 (Added by) 252l678
M02 (Updated by) resex33
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04838  M03S00115.282l826 ---|          BX2    X0*X2
Line S00116 Modification History
M01 (Added by) 252l678
M02 (Updated by) resex33
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04839  M03S00116.282l826 ---|          SA1    RQ
Line S00004 Modification History
M01 (Added by) resex33
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04840  M02S00004.282l826 ---|          SA1    RQ
Line S00005 Modification History
M01 (Added by) resex33
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04841  M02S00005.282l826 ---|          BX2    X0*X2
Line S00117 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04842  M02S00117.282l826 ---|          BX6    -X0*X1
Line S00118 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04843  M02S00118.282l826 ---|          BX6    X2+X6
Line S00119 Modification History
M01 (Added by) 252l678
M02 (Updated by) resex33
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04844  M03S00119.282l826 ---|          SA6    A1+         STORE INTERNAL VSN
Line S00006 Modification History
M01 (Added by) resex33
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04845  M02S00006.282l826 ---|          SA6    A1          STORE INTERNAL VSN
Line S00120 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04846  M02S00120.282l826 ---|          EQ     RMT6.1      SKIP UPDATE FROM DEMAND FILE
Line S00121 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04847  M02S00121.282l826 ---|
Line S00122 Modification History
M01 (Added by) 252l678
M02 (Updated by) 253l688
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04848  M03S00122.282l826 ---|*         CHECK FOR CHANGE OF SCRATCH TMS VSN.
Line S00039 Modification History
M01 (Added by) 253l688
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04849  M02S00039.282l826 ---|*         CHECK FOR CHANGE OF SCRATCH *TMS* VSN.
Line S00123 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04850  M02S00123.282l826 ---|
Line S00124 Modification History
M01 (Added by) 252l678
M02 (Updated by) 253l688
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04851  M03S00124.282l826 ---| RMT6     SA1    TMPF        CHECK FOR NON-TMS TAPE
Line S00040 Modification History
M01 (Added by) 253l688
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04852  M02S00040.282l826 ---| RMT6     SA1    TMPF        CHECK FOR NON-*TMS* TAPE
Line S00125 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04853  M02S00125.282l826 ---|          LX1    59-58
Line S00126 Modification History
M01 (Added by) 252l678
M02 (Updated by) 253l688
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04854  M03S00126.282l826 ---|          PL     X1,RMT6.1   IF NOT TMS CONTROLLED TAPE
Line S00041 Modification History
M01 (Added by) 253l688
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04855  M03S00041.282l826 ---|          PL     X1,RMT6.1   IF NOT *TMS* CONTROLLED TAPE
Line S00550 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04856  M02S00550.282l826 ---|          PL     X1,RMT6.1   IF NOT *TMS* CONTROLLED REQUEST
Line S00127 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04857  M02S00127.282l826 ---|          RJ     RDF         READ DEMAND FILE
Line S00128 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04858  M02S00128.282l826 ---|          SA1    DBUF+RQPD   GET INTERNAL VSN
Line S00129 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04859  M02S00129.282l826 ---|          MX0    6*6
Line S00130 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04860  M02S00130.282l826 ---|          BX7    X0*X1
Line S00131 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04861  M02S00131.282l826 ---|          ZR     X7,RMT6.1   IF NO CHANGE IN VSN
Line S00132 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04862  M03S00132.282l826 ---|          SA1    RQ          REPLACE INTERNAL *VSN*
Line S00133 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04863  M03S00133.282l826 ---|          BX1    -X0*X1
Line S00134 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04864  M03S00134.282l826 ---|          BX6    X1+X7
Line S00135 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04865  M03S00135.282l826 ---|          SA6    A1+
Line S00136 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04866  M03S00136.282l826 ---|          SA1    F+FVSN      REPLACE VSN
Line S00551 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04867  M02S00551.282l826 ---|          SA1    RQ          REPLACE INTERNAL VSN
Line S00552 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04868  M02S00552.282l826 ---|          SA7    IVSN
Line S00137 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04869  M02S00137.282l826 ---|          BX1    -X0*X1
Line S00138 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04870  M02S00138.282l826 ---|          BX6    X1+X7
Line S00139 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04871  M02S00139.282l826 ---|          SA6    A1
Line S00140 Modification History
M01 (Added by) 252l678
M02 (Updated by) 253l688
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04872  M03S00140.282l826 ---|          SA1    DBUF+RQCW   GET TMS VSN FROM PREVIEW BUFFER
Line S00042 Modification History
M01 (Added by) 253l688
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04873  M03S00042.282l826 ---|          SA1    DBUF+RQCW   GET *TMS* VSN FROM PREVIEW BUFFER
Line S00553 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04874  M02S00553.282l826 ---|          SA1    DBUF+RQPF   GET NEW EXTERNAL VSN
Line S00554 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04875  M02S00554.282l826 ---|          SA2    VSNE+VVSN   REPLACE VSN IN VSN ENTRY BUFFER
Line S00141 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04876  M02S00141.282l826 ---|          BX7    X0*X1
Line S00142 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04877  M03S00142.282l826 ---|          SA1    VSNE+VVSN   REPLACE VSN IN VSN ENTRY BUFFER
Line S00143 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04878  M03S00143.282l826 ---|          BX1    -X0*X1
Line S00144 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04879  M03S00144.282l826 ---|          BX6    X1+X7
Line S00145 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04880  M03S00145.282l826 ---|          SA6    A1
Line S00146 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04881  M03S00146.282l826 ---|          SA1    T+FESN      REPLACE EXTERNAL VSN
Line S00147 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04882  M03S00147.282l826 ---|          BX1    -X0*X1
Line S00148 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04883  M03S00148.282l826 ---|          BX6    X1+X7
Line S00149 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04884  M03S00149.282l826 ---|          SA6    A1
Line S00555 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04885  M02S00555.282l826 ---|          BX2    -X0*X2
Line S00556 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04886  M02S00556.282l826 ---|          SA7    EVSN        UPDATE EXTERNAL VSN
Line S00557 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04887  M02S00557.282l826 ---|          BX6    X2+X7
Line S00558 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04888  M02S00558.282l826 ---|          SA6    A2
04889  M01S02841.resex   +++|
04890  M01S02842.resex   +++|*         EXERCISE OVERCOMMITMENT ALGORITHM.
04891  M01S02843.resex   +++|
Line S02844 Modification History
M01 (Added by) resex
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
04892  M02S02844.252l678 ---| RMT6     RJ     COM         CHECK FOR OVERCOMMITMENT
Line S00150 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04893  M02S00150.282l826 ---| RMT6.1   RJ     COM         CHECK FOR OVERCOMMITMENT
Line S00071 Modification History
M01 (Added by) ns2161
M02 (Updated by) ns2529
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04894  M03S00071.282l826 ---|          RJ     COE         CHECK FOR OFF EQUIPMENT
Line S00134 Modification History
M01 (Added by) ns2529
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04895  M02S00134.282l826 ---|          RJ     COE         CHECK FOR *OFF*/*DOWN* EQUIPMENT
04896  M01S00149.282l826 +++| RMT6     RJ     COM         CHECK FOR OVERCOMMITMENT
04897  M01S02845.resex   +++|          SX5    X2-/STATUS/OK
04898  M01S02846.resex   +++|          ZR     X5,RMT12    IF PERMITTED TO ASSIGN AVAILABLE TAPE
04899  M01S02847.resex   +++|          SX5    /STATUS/OV
Line S02848 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04900  M02S02848.282l826 ---|          SA3    TEOV
04901  M01S02849.resex   +++|          BX5    X5*X2
04902  M01S02850.resex   +++|          NZ     X5,RMT9     IF OVERCOMMITMENT REJECTION
Line S02851 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04903  M02S02851.282l826 ---| RMT7     MX2    36
04904  M01S00150.282l826 +++|          RJ     COE         CHECK *OFF*/*DOWN* EQUIPMENT
04905  M01S00151.282l826 +++|          NZ     X6,RMT7     IF *OFF*/*DOWN* EQUIPMENT REQUIRED
04906  M01S00152.282l826 +++|          RJ     CVA         CHECK VSN AVAILABILITY
04907  M01S00153.282l826 +++|          ZR     X6,RMT8     IF NO PREVIEW DISPLAY MESSAGE
04908  M01S00154.282l826 +++| RMT7     RJ     SPM         SET PREVIEW DISPLAY MESSAGE
04909  M01S00155.282l826 +++|
04910  M01S00156.282l826 +++|*         PROCESS MISSING VSN.
04911  M01S00157.282l826 +++|
04912  M01S00158.282l826 +++| RMT8     MX2    36
Line S02852 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
04913  M02S02852.274l797 ---|          SA1    F+FVSN      BUILD MISSING VSN EVENT
04914  M01S00559.274l797 +++|          SA1    RQ          BUILD MISSING VSN EVENT
04915  M01S02853.resex   +++|          BX1    X2*X1
04916  M01S02854.resex   +++|          SA3    TEMV
04917  M01S02855.resex   +++|          RJ     BEV
04918  M01S02856.resex   +++|          EQ     RMT10       CLEAN UP AND ROLLOUT
04919  M01S02857.resex   +++|
Line S02858 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04920  M02S02858.282l826 ---| RMT8     SX7    /COMSMTX/DMT  DENSITY MISMATCH ERROR CODE
Line S02859 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04921  M02S02859.282l826 ---|          RJ     VUR         SEND DENSITY MISMATCH CALL BLOCK TO MAGNET
Line S02860 Modification History
M01 (Added by) resex
M02 (Updated by) resex4
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04922  M03S02860.282l826 ---|          SA3    DMVD        SET DENSITY MISMATCH EVENT DESCRIPTOR
Line S00026 Modification History
M01 (Added by) resex4
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04923  M02S00026.282l826 ---|          SA1    AA
Line S00027 Modification History
M01 (Added by) resex4
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04924  M02S00027.282l826 ---|          NG     X1,RMT7     IF AUTOMATIC ASSIGNMENT
Line S00028 Modification History
M01 (Added by) resex4
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04925  M02S00028.282l826 ---|          SB2    /PER/DEC    * NT DENSITY CONFLICT.*
Line S00029 Modification History
M01 (Added by) resex4
M02 (Updated by) ns22000
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04926  M03S00029.282l826 ---|          NZ     X1,PER      IF *ASSIGN* WITH UNIT NUMBER
Line S00237 Modification History
M01 (Added by) ns22000
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04927  M02S00237.282l826 ---|          NZ     X1,PER      IF *ASSIGN* WITH EST ORDINAL SPECIFIED
Line S00030 Modification History
M01 (Added by) resex4
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04928  M02S00030.282l826 ---|          EQ     RMT10.1     REQUEST OPERATOR ASSIGNMENT
04929  M01S00159.282l826 +++|*         PROCESS OVERCOMMITMENT REJECTION.
04930  M01S00031.resex4  +++|
Line S02861 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04931  M02S02861.282l826 ---| RMT9     BX7    X7-X7       CLEAR PREVIEW DATA
04932  M01S00160.282l826 +++| RMT9     SA3    TEOV
04933  M01S00161.282l826 +++|          BX7    X7-X7       CLEAR MOUNT REQUEST
04934  M01S02862.resex   +++|          LX6    X3
Line S02863 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04935  M02S02863.282l826 ---|          SA7    RESB+RQPD
04936  M01S00162.282l826 +++|          SA7    RESB+RREQ
04937  M01S00163.282l826 +++|
04938  M01S00164.282l826 +++|*         ROLL OUT ON MISSING VSN OR OVERCOMMITMENT.
04939  M01S00165.282l826 +++|
04940  M01S02864.resex   +++| RMT10    SA1    A3+B1       SAVE ROLLOUT MESSAGE ADDRESS
04941  M01S02865.resex   +++|          SA6    RE          SET ROLLOUT EVENT DESCRIPTOR
04942  M01S02866.resex   +++|          BX7    X1
04943  M01S02867.resex   +++|          SA7    RM
04944  M01S02868.resex   +++|          RJ     CUP         CLEAN UP REQUEST
04945  M01S02869.resex   +++|          SX5    RE          SET ROLLOUT DESCRIPTOR
04946  M01S02870.resex   +++|          SA1    RM          GET ROLLOUT MESSAGE ADDRESS
04947  M01S02871.resex   +++|          RJ     PRO         PROCESS TIMED EVENT ROLLOUT
04948  M01S00166.282l826 +++|
04949  M01S00167.282l826 +++|*         INITIALIZE TO RECHECK FOR OVERCOMMITMENT.
04950  M01S00168.282l826 +++|
Line S02872 Modification History
M01 (Added by) resex
M02 (Updated by) resex4
Seq #  *Modification Id* Act 
----------------------------+
04951  M02S02872.resex4  ---|          SA4    AA
Line S02873 Modification History
M01 (Added by) resex
M02 (Updated by) resex4
Seq #  *Modification Id* Act 
----------------------------+
04952  M02S02873.resex4  ---|          SX6    B0+
Line S02874 Modification History
M01 (Added by) resex
M02 (Updated by) resex4
Seq #  *Modification Id* Act 
----------------------------+
04953  M02S02874.resex4  ---|          PL     X4,RMT11    IF NOT AUTOMATIC ASSIGNMENT
04954  M01S00032.resex4  +++| RMT10.1  SA4    AA
04955  M01S00033.resex4  +++|          SB2    X4
04956  M01S00034.resex4  +++|          BX6    X6-X6
Line S00035 Modification History
M01 (Added by) resex4
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
04957  M02S00035.ns22000 ---|          GT     B2,RMT11    IF ASSIGN WITH UNIT NUMBER
04958  M01S00238.ns22000 +++|          GT     B2,RMT11    IF *ASSIGN* WITH EST ORDINAL SPECIFIED
04959  M01S02875.resex   +++|          SA6    EQ          CLEAR EQUIPMENT ASSIGNMENT
Line S02876 Modification History
M01 (Added by) resex
M02 (Updated by) resex4
Seq #  *Modification Id* Act 
----------------------------+
04960  M02S02876.resex4  ---| RMT11    NZ     X4,RMT6     IF NOT OPERATOR ASSIGNMENT
Line S02877 Modification History
M01 (Added by) resex
M02 (Updated by) resex4
Seq #  *Modification Id* Act 
----------------------------+
04961  M02S02877.resex4  ---|          RJ     ROA         RE-REQUEST OPERATOR ASSIGNMENT
Line S00036 Modification History
M01 (Added by) resex4
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04962  M02S00036.282l826 ---|          NG     B2,RMT6     IF AUTOMATIC ASSIGNMENT
04963  M01S00169.282l826 +++|          NG     B2,RMT11.1  IF AUTOMATIC ASSIGNMENT
04964  M01S00037.resex4  +++| RMT11    SA1    RQ          CLEAR VSN
04965  M01S00038.resex4  +++|          MX6    -24
04966  M01S00039.resex4  +++|          BX6    -X6*X1
04967  M01S00040.resex4  +++|          SA6    A1
04968  M01S00170.282l826 +++| RMT11.1  RJ     CCV         CHECK FOR CHANGE OF TMS REQUEST VSN
04969  M01S02878.resex   +++|          EQ     RMT6        CHECK FOR OVERCOMMITMENT
04970  M01S02879.resex   +++|
Line S02880 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04971  M02S02880.282l826 ---|*         VALIDATE UNIT REQUEST.
04972  M01S00171.282l826 +++|*         ASSIGN UNIT.
04973  M01S02881.resex   +++|
Line S02882 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04974  M02S02882.282l826 ---| RMT12    BX7    X7-X7       ASSIGN UNIT
Line S02883 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04975  M02S02883.282l826 ---|          RJ     VUR
Line S02884 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04976  M02S02884.282l826 ---|          ZR     X1,RMT13    IF ASSIGNMENT MADE
Line S02885 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04977  M02S02885.282l826 ---|          NG     X1,RMT8     IF DENSITY MISMATCH
Line S02886 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04978  M02S02886.282l826 ---|          SA2    AA
Line S02887 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04979  M02S02887.282l826 ---|          SA3    TEOV        SET OVERCOMMITMENT REJECTION
04980  M01S00172.282l826 +++| RMT12    RJ     VUR         VERIFY UNIT REQUEST
04981  M01S00173.282l826 +++|          ZR     X6,RMT13    IF UNIT ASSIGNED
04982  M01S02888.resex   +++|          ZR     X2,RMT9     IF OPERATOR ASSIGNMENT
Line S02889 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04983  M02S02889.282l826 ---|          EQ     RMT7        SET MISSING VSN EVENT
04984  M01S00174.282l826 +++|          EQ     RMT8        SET MISSING VSN EVENT
04985  M01S02890.resex   +++|
Line S02891 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04986  M02S02891.282l826 ---|*         UPDATE DEMAND FILE.
Line S02892 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04987  M02S02892.282l826 ---|
Line S02893 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04988  M02S02893.282l826 ---| RMT13    BX6    X6-X6       CLEAR PREVIEW DATA
Line S02894 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04989  M02S02894.282l826 ---|          MX5    0           SET NO RETURN OF DEMAND FILE
Line S02895 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04990  M02S02895.282l826 ---|          SA6    RESB+RQPD
Line S02896 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04991  M02S02896.282l826 ---|          RJ     UDF         UPDATE DEMAND FILE
Line S02897 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04992  M02S02897.282l826 ---|          INTRC  ON          REENABLE INTERRUPT
Line S02898 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04993  M02S02898.282l826 ---|          INTRP  PIT         PROCESS INTERRUPT
Line S02899 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04994  M02S02899.282l826 ---|          RJ     BPD         BUILD PREVIEW DISPLAY
Line S00151 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
04995  M02S00151.282l826 ---|          RJ     WOA         WAIT FOR OPERATOR ACTION
04996  M01S00175.282l826 +++| RMT13    RJ     BPD         BUILD PREVIEW DISPLAY
Line S00176 Modification History
M01 (Added by) 282l826
M02 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
04997  M02S00176.ns2770  ---|          SETFET F,ERP=E     SET ERROR PROCESSING
Line S00177 Modification History
M01 (Added by) 282l826
M02 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
04998  M02S00177.ns2770  ---|          REWIND F,R         REWIND TO INITIATE LABEL CHECK
Line S00178 Modification History
M01 (Added by) 282l826
M02 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
04999  M02S00178.ns2770  ---|          RJ     CER         CHECK ERROR AND CLEAR ERROR PROCESSING
Line S00152 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
M03 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
05000  M03S00152.ns2770  ---|          MESSAGE VURE       ISSUE *MTXXX ASSIGNED TO FILE, VSN=VVVVVV*
Line S00560 Modification History
M01 (Added by) 274l797
M02 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
05001  M02S00560.ns2770  ---|          RJ     IAM         ISSUE TAPE ASSIGNMENT MESSAGE
05002  M01S02900.resex   +++|
Line S02901 Modification History
M01 (Added by) resex
M02 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
05003  M02S02901.ns2770  ---|*         OPEN FILE.
05004  M01S00004.ns2770  +++|*         OPEN OR REWIND FILE.  MAGNET COMPLETES THE TAPE ASSIGNMENT ON
05005  M01S00005.ns2770  +++|*         RECEIPT OF THE FIRST *CIO* REQUEST.  IF AN UNLABELED TMS
05006  M01S00006.ns2770  +++|*         SCRATCH TAPE IS BEING ASSIGNED, AN EOF WILL BE WRITTEN TO
05007  M01S00007.ns2770  +++|*         PREVENT A READ OF PREVIOUSLY WRITTEN DATA.
05008  M01S02902.resex   +++|
Line S02903 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05009  M02S02903.274l797 ---|          SA2    CF          CHECK EXTERNAL CALL FLAG
05010  M01S00561.274l797 +++|          SA2    CF          CHECK CALL TYPE
Line S02904 Modification History
M01 (Added by) resex
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
05011  M02S02904.v23l617 ---|          SA1    RT          CHECK CONTROL CARD TYPE
05012  M01S00037.v23l617 +++|          SA1    RT          CHECK COMMAND TYPE
05013  M01S02905.resex   +++|          NZ     X2,RMT14    IF *LFM* OR *REQ* CALL
Line S02906 Modification History
M01 (Added by) resex
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
05014  M02S02906.v23l617 ---|          NZ     X1,END2     IF NOT *LABEL* CONTROL CARD
Line S00038 Modification History
M01 (Added by) v23l617
M02 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
05015  M02S00038.ns2770  ---|          NZ     X1,END2     IF NOT *LABEL* COMMAND
05016  M01S00008.ns2770  +++|          NZ     X1,RMT15    IF NOT *LABEL* COMMAND
05017  M01S02907.resex   +++| RMT14    RJ     OPN         OPEN FILE
Line S02908 Modification History
M01 (Added by) resex
M02 (Updated by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
05018  M02S02908.ns2770  ---|          EQ     END1        SET OK STATUS AND CHECKPOINT
05019  M01S00009.ns2770  +++|          NZ     X6,END1     IF FILE OPENED
05020  M01S00010.ns2770  +++| RMT15    SETFET F,ERP=E     SET ERROR PROCESSING
05021  M01S00011.ns2770  +++|          SA1    TMPF
05022  M01S00012.ns2770  +++|          LX1    59-57
05023  M01S00013.ns2770  +++|          PL     X1,RMT16    IF NOT TMS SCRATCH TAPE ASSIGNMENT
05024  M01S00014.ns2770  +++|          WRITEF F,R         INHIBIT READ OF UNLABELED TAPE
05025  M01S00015.ns2770  +++|          RJ     CER         CHECK ERROR
05026  M01S00016.ns2770  +++| RMT16    REWIND F,R         REWIND TO COMPLETE ASSIGNMENT
05027  M01S00017.ns2770  +++|          RJ     CER         CHECK ERROR
05028  M01S00018.ns2770  +++|          SETFET F,ERP=0     CLEAR ERROR PROCESSING
05029  M01S00019.ns2770  +++|          EQ     END1        PROCESS TERMINATION
05030  M01S02909.resex   +++| RRP      SPACE  4,20
05031  M01S02910.resex   +++|**        RRP - REQUEST REMOVABLE PACK.
05032  M01S02911.resex   +++|*
05033  M01S02912.resex   +++|*         ENTRY  USER RESOURCE REQUEST WORDS ARE BUILT (RQ - TM).
05034  M01S02913.resex   +++|*
05035  M01S02914.resex   +++|*         EXIT   PACK ASSIGNED.
05036  M01S02915.resex   +++|*                TO *END4*, IF NOT OVERCOMMITMENT.
05037  M01S02916.resex   +++|*                TO *PIT*, IF INTERRUPT DETECTED.
05038  M01S02917.resex   +++|*
05039  M01S02918.resex   +++|*         ERROR  TO *PER*, IF PACK OVERCOMMITMENT ERROR.
05040  M01S02919.resex   +++|*
05041  M01S02920.resex   +++|*         USES   A - 1, 3, 6, 7.
05042  M01S02921.resex   +++|*                B - 2.
05043  M01S02922.resex   +++|*                X - 0, 1, 3, 5, 6, 7.
05044  M01S02923.resex   +++|*
Line S02924 Modification History
M01 (Added by) resex
M02 (Updated by) ns2161
Seq #  *Modification Id* Act 
----------------------------+
05045  M02S02924.ns2161  ---|*         CALLS  BEV, COM, CUP, IDE, PRO, RDF, UDF.
Line S00072 Modification History
M01 (Added by) ns2161
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05046  M02S00072.282l826 ---|*         CALLS  BEV, COE, COM, CUP, IDE, PRO, RDF, UDF.
05047  M01S00179.282l826 +++|*         CALLS  BEV, COE, COM, CUP, IDE, PRO, RDF, SPM, UDF.
05048  M01S02925.resex   +++|*
05049  M01S02926.resex   +++|*         MACROS INTRC.
05050  M01S02927.resex   +++|
05051  M01S02928.resex   +++|
05052  M01S02929.resex   +++| RRP      BSS    0           ENTRY
05053  M01S02930.resex   +++|          SA1    /CPA/RFCW   CHECK FOR DEMAND FILE ENTRY
05054  M01S02931.resex   +++|          SX5    X1
05055  M01S02932.resex   +++|          NZ     X5,RRP1     IF DEMAND FILE PRESENT
05056  M01S02933.resex   +++|          RJ     IDE         INITIALIZE DEMAND ENTRY
05057  M01S02934.resex   +++|          RJ     RDF         READ DEMAND FILE
05058  M01S02935.resex   +++|          SX5    B1          SET RETURN DEMAND FILE FLAG
05059  M01S02936.resex   +++|          RJ     UDF         UPDATE DEMAND FILE ENTRY
05060  M01S02937.resex   +++|
05061  M01S02938.resex   +++|*         EXERCISE OVERCOMMITMENT ALGORITHM.
05062  M01S02939.resex   +++|
05063  M01S02940.resex   +++| RRP1     RJ     COM         CHECK FOR OVERCOMMITMENT
Line S00073 Modification History
M01 (Added by) ns2161
M02 (Updated by) ns2529
Seq #  *Modification Id* Act 
----------------------------+
05064  M02S00073.ns2529  ---|          RJ     COE         CHECK FOR OFF EQUIPMENT
Line S00135 Modification History
M01 (Added by) ns2529
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05065  M02S00135.282l826 ---|          RJ     COE         CHECK FOR *OFF*/*DOWN* EQUIPMENT
05066  M01S02941.resex   +++|          SA1    SFET+FDTY   READ FET DETAILS
05067  M01S02942.resex   +++|          SX5    X2-/STATUS/OK
05068  M01S02943.resex   +++|          SX4    /STATUS/OV
05069  M01S02944.resex   +++|          ZR     X5,RRP4     IF PERMITTED TO ACCESS AVAILABLE PACK
05070  M01S02945.resex   +++|          LX1    59-44
05071  M01S02946.resex   +++|          BX5    X4*X2
05072  M01S02947.resex   +++|          PL     X1,RRP4     IF EP BIT ZERO
05073  M01S02948.resex   +++|          SA3    PEOV
05074  M01S02949.resex   +++|          NZ     X5,RRP2     IF OVERCOMMITMENT REJECTION
Line S02950 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05075  M02S02950.282l826 ---|          SA3    PEMV        BUILD MISSING PACKNAME EVENT
05076  M01S00180.282l826 +++|          RJ     COE         CHECK FOR *OFF*/*DOWN* EQUIPMENT
05077  M01S00181.282l826 +++|          ZR     X6,RRP1.1   IF *OFF*/*DOWN* EQUIPMENT NOT REQUIRED
05078  M01S00182.282l826 +++|          RJ     SPM         SET PREVIEW DISPLAY MESSAGE
05079  M01S00183.282l826 +++| RRP1.1   SA3    PEMV        BUILD MISSING PACKNAME EVENT
05080  M01S02951.resex   +++|          SA1    RQ
05081  M01S02952.resex   +++|          MX0    42
05082  M01S02953.resex   +++|          BX1    X0*X1
05083  M01S02954.resex   +++|          RJ     BEV
05084  M01S02955.resex   +++|          EQ     RRP3        CLEAN UP AND ROLLOUT
05085  M01S02956.resex   +++|
Line S02957 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05086  M02S02957.282l826 ---| RRP2     BX7    X7-X7       CLEAR PREVIEW DATA
05087  M01S00184.282l826 +++| RRP2     BX7    X7-X7       CLEAR MOUNT REQUEST
05088  M01S02958.resex   +++|          LX6    X3
Line S02959 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05089  M02S02959.282l826 ---|          SA7    RESB+RQPD
05090  M01S00185.282l826 +++|          SA7    RESB+RREQ
05091  M01S02960.resex   +++| RRP3     SA1    A3+B1       SAVE ROLLOUT MESSAGE ADDRESS
05092  M01S02961.resex   +++|          SA6    RE          SET ROLLOUT EVENT DESCRIPTOR
05093  M01S02962.resex   +++|          BX7    X1
05094  M01S02963.resex   +++|          SA7    RM
05095  M01S02964.resex   +++|          RJ     CUP         CLEAN UP REQUEST
05096  M01S02965.resex   +++|          SX5    RE          SET ROLLOUT DESCRIPTOR
05097  M01S02966.resex   +++|          SA1    RM          GET ROLLOUT MESSAGE ADDRESS
05098  M01S02967.resex   +++|          RJ     PRO         PROCESS TIMED EVENT ROLLOUT
05099  M01S02968.resex   +++|          EQ     RRP1        REPEAT ALGORITHM
05100  M01S02969.resex   +++|
05101  M01S02970.resex   +++| RRP4     LX7    X2          SET RETURN STATUS
05102  M01S02971.resex   +++|          BX4    X4-X2
05103  M01S02972.resex   +++|          LX7    24
Line S02973 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05104  M02S02973.282l826 ---|          BX6    X6-X6       CLEAR PREVIEW DATA
05105  M01S00186.282l826 +++|          BX6    X6-X6       CLEAR MOUNT REQUEST
05106  M01S02974.resex   +++|          SA7    SPPR
Line S02975 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05107  M02S02975.282l826 ---|          SA6    RESB+RQPD
05108  M01S00187.282l826 +++|          SA6    RESB+RREQ
05109  M01S02976.resex   +++|          SX6    -2
05110  M01S02977.resex   +++|          NZ     X4,RRP5     IF NOT ONLY OVERCOMMITMENT
05111  M01S02978.resex   +++|          SB2    /PER/RPO    * REMOVABLE PACKS OVERCOMMITMENT.*
05112  M01S02979.resex   +++|          EQ     PER         PROCESS ERROR
05113  M01S02980.resex   +++|
05114  M01S02981.resex   +++| RRP5     INTRC  OFF         DISABLE INTERRUPT
05115  M01S02982.resex   +++|          SA6    UCRI        INDICATE CLEAN-UP REQUIRED IF INTERRUPT
05116  M01S02983.resex   +++|          EQ     END4        UPDATE DEMAND FILE
05117  M01S00562.274l797 +++| RRS      SPACE  4,10
05118  M01S00563.274l797 +++|**        RRS - REQUEST RESOURCES.
05119  M01S00564.274l797 +++|*
05120  M01S00565.274l797 +++|*         EXIT   TO *END4* IF NO ERROR.
05121  M01S00566.274l797 +++|*                TO *PER* IF ERROR.
05122  M01S00567.274l797 +++|*
05123  M01S00568.274l797 +++|*         USES   X - 1, 2.
05124  M01S00569.274l797 +++|*                A - 1.
05125  M01S00570.274l797 +++|*                B - 2.
05126  M01S00571.274l797 +++|*
05127  M01S00572.274l797 +++|*         CALLS  BRE, BSF, CIC, DEI, OCA, PMM.
05128  M01S00573.274l797 +++|
05129  M01S00574.274l797 +++|
05130  M01S00575.274l797 +++| RRS      BSS    0           ENTRY
05131  M01S00576.274l797 +++|          RJ     CRV         CHECK RESOURCE VALIDATION
05132  M01S00577.274l797 +++|          RJ     DEI         DEMAND EXCEEDS INSTALLATION CHECK
05133  M01S00578.274l797 +++|          SA1    RESB+RVAL   GET TOTAL ASSIGNED COUNT
05134  M01S00579.274l797 +++|          MX2    -12
05135  M01S00580.274l797 +++|          LX1    -12
05136  M01S00581.274l797 +++|          BX1    -X2*X1
05137  M01S00582.274l797 +++|          ZR     X1,END4     IF NO ASSIGNED UNITS
05138  M01S00583.274l797 +++|          RJ     CIC         CHECK FOR INTERNAL CONFLICT
05139  M01S00584.274l797 +++|          SB2    /PER/DRC    * NT DRIVE CONFLICT.*
05140  M01S00585.274l797 +++|          NZ     X2,PER      IF 9 TRACK DRIVE CONFLICT
05141  M01S00586.274l797 +++|          RJ     BSF         BUILD SCRATCH FILE
05142  M01S00587.274l797 +++|          RJ     OCA         CHECK FOR OVERCOMMITMENT
05143  M01S00588.274l797 +++|          NZ     X5,END4     IF NO OVERCOMMITMENT
05144  M01S00589.274l797 +++|          SB2    /PER/RDE    * RESOURCE DEMAND ERROR.*
05145  M01S00590.274l797 +++|          EQ     PER         PROCESS ERROR
Line S02984 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05146  M02S02984.274l797 ---| ROA      SPACE  4,25
05147  M01S00591.274l797 +++| ROA      SPACE  4,30
05148  M01S02985.resex   +++|**        ROA - REQUEST OPERATOR ASSIGNMENT.
05149  M01S02986.resex   +++|*
Line S02987 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05150  M02S02987.274l797 ---|*         ENTRY  (X4) = 0, IF REQUEST OPERATOR ASSIGNMENT OF EQUIPMENT.
Line S02988 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05151  M02S02988.274l797 ---|*                (X4) = 1, IF REQUEST OPERATOR SELECTION ON DUPLICATE
Line S02989 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05152  M02S02989.274l797 ---|*                     VSN.
Line S02990 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05153  M02S02990.274l797 ---|*                *MT* OR *NT* DEVICE TYPE IN FET+1 IF TAPE EQUIPMENT
Line S02991 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05154  M02S02991.274l797 ---|*                REQUIRED, OTHERWISE DEVICE TYPE ZERO.
05155  M01S00592.274l797 +++|*         ENTRY  (X4) = 0 IF REQUEST OPERATOR ASSIGNMENT OF EQUIPMENT.
05156  M01S00593.274l797 +++|*                (X4) = 1 IF REQUEST OPERATOR ASSIGNMENT ON DUPLICATE
05157  M01S00594.274l797 +++|*                         VSN OR VERIFICATION OF NON-TMS TAPE REQUEST.
05158  M01S00595.274l797 +++|*
05159  M01S00596.274l797 +++|*                TAPE DEVICE MNEMONIC IN FET+1 IF TAPE EQUIPMENT
05160  M01S00597.274l797 +++|*                  REQUIRED, OTHERWISE DEVICE TYPE ZERO.
05161  M01S02992.resex   +++|*
05162  M01S02993.resex   +++|*         EXIT   (X4) = DEVICE TYPE OF EQUIPMENT ASSIGNED.
Line S02994 Modification History
M01 (Added by) resex
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05163  M02S02994.ns22000 ---|*                (EQ) = OPERATOR ASSIGNED EQUIPMENT, IF *MT* OR *NT*.
Line S00239 Modification History
M01 (Added by) ns22000
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05164  M02S00239.274l797 ---|*                (EQ) = OPERATOR ASSIGNED EST ORDINAL, IF *MT*
Line S00240 Modification History
M01 (Added by) ns22000
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05165  M02S00240.274l797 ---|*                       OR *NT*.
05166  M01S00598.274l797 +++|*                (EQ) = OPERATOR ASSIGNED EST ORDINAL, IF TAPE DEVICE.
05167  M01S00599.274l797 +++|*                OPERATOR VERIFY FLAG CLEARED IN *TMPF*.
05168  M01S02995.resex   +++|*
Line S02996 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05169  M02S02996.274l797 ---|*         FOR OPERATOR SELECTION ON DUPLICATE VSN, THE REQUIRED VSN
Line S02997 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05170  M02S02997.274l797 ---|*         (FROM RQ) WILL BE SET IN FET+9.
05171  M01S02998.resex   +++|*         FOR *NT* REQUEST, DISPLAY CODE FOR DENSITY (*HD*, *PE*,
Line S02999 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05172  M02S02999.274l797 ---|*         OR *GE*) WILL BE SET IN FET+1 BITS 24-35.
05173  M01S00600.274l797 +++|*           OR *GE*) WILL BE SET IN FET+1 BITS 24-35.
05174  M01S03000.resex   +++|*         FET+7 BITS 54-59 IS THE CHECKPOINT ID FIELD FROM A
05175  M01S03001.resex   +++|*         *LABEL* MACRO CALL OR IS ZERO IN ALL OTHER CASES.
05176  M01S03002.resex   +++|*         DEVICE TYPE OF EQUIPMENT ASSIGNED IS RETURNED IN FET+1.
Line S03003 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05177  M02S03003.274l797 ---|*         FOR *MT* AND *NT* ASSIGNMENTS, EQUIPMENT EST ORDINAL IS
Line S03004 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05178  M02S03004.274l797 ---|*         RETURNED IN FET+1 BITS 24-29.
05179  M01S00601.274l797 +++|*         FOR TAPE EQUIPMENT ASSIGNMENTS, EQUIPMENT EST ORDINAL IS
05180  M01S00602.274l797 +++|*           RETURNED IN FET+1 BITS 24-29.
05181  M01S03005.resex   +++|*
Line S03006 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05182  M02S03006.282l826 ---|*         USES   A - 1, 2, 3, 6, 7.
Line S03007 Modification History
M01 (Added by) resex
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05183  M02S03007.282l826 ---|*                X - 1, 2, 3, 4, 6, 7.
05184  M01S00188.282l826 +++|*         USES   A - 1, 2, 7.
05185  M01S00189.282l826 +++|*                X - 1, 2, 4, 7.
05186  M01S00153.252l678 +++|*
Line S00154 Modification History
M01 (Added by) 252l678
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05187  M02S00154.274l797 ---|*         CALLS  CUC.
05188  M01S00603.274l797 +++|*         CALLS  COV, CUC.
05189  M01S03008.resex   +++|*
05190  M01S03009.resex   +++|*         MACROS ROAE, SETRNR.
05191  M01S03010.resex   +++|
05192  M01S03011.resex   +++|
05193  M01S03012.resex   +++| ROA      SUBR               ENTRY/EXIT
Line S03013 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05194  M02S03013.274l797 ---|          SA1    RQ          CLEAR VSN FROM USER REQUEST
Line S03014 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05195  M02S03014.274l797 ---|          MX2    -24
Line S03015 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05196  M02S03015.274l797 ---|          BX7    -X2*X1
Line S03016 Modification History
M01 (Added by) resex
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05197  M02S03016.274l797 ---|          ZR     X4,ROA1     IF OPERATOR ASSIGNMENT OF EQUIPMENT
Proceed to Part 6
cdc/nos2.source/opl.opl871/deck/resex.005.txt ยท Last modified: by 127.0.0.1