User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:resex.008

Deck RESEX Part 008

65 Modifications

Source

Seq #  *Modification Id* Act 
----------------------------+
08742  M00S04476.resex   +++|**        GRI - GET RESOURCE INDEX.
08743  M00S04477.resex   +++|*
08744  M00S04478.resex   +++|*         ENTRY  (X1) = RESOURCE NAME PARAMETER.
08745  M00S04479.resex   +++|*
08746  M00S04480.resex   +++|*         EXIT   (B2) = RESOURCE DEMAND ENTRY PARAMETER INDEX.
08747  M00S04481.resex   +++|*                (B2) = 0 IF ENTRY NOT FOUND.
08748  M00S04482.resex   +++|*                (B7) = UNIT COUNT (1-8).
08749  M00S04483.resex   +++|*                (X6) = 51/0, 3/UNIT COUNT, 6/PARAMETER INDEX.
08750  M00S04484.resex   +++|*
08751  M00S04485.resex   +++|*         USES   A - 3.
08752  M00S04486.resex   +++|*                B - 2, 4, 7.
08753  M00S04487.resex   +++|*                X - 1, 2, 3, 6.
08754  M00S04488.resex   +++|
08755  M00S04489.resex   +++|
08756  M00S04490.resex   +++| GRI      SUBR               ENTRY/EXIT
08757  M00S04491.resex   +++|          MX3    12
08758  M00S04492.resex   +++|          BX2    -X3*X1      NUMBER OF UNITS
08759  M00S04493.resex   +++|          SB7    B1+
08760  M00S04494.resex   +++|          BX1    X3*X1       RESOURCE TYPE
08761  M00S04495.resex   +++|          LX2    18
08762  M00S04496.resex   +++|          NZ     X2,GRI2     IF NUMBER OF UNITS SPECIFIED
08763  M00S04497.resex   +++|          SB2    RMTP-1
08764  M00S04498.resex   +++|          SB4    RRPP
08765  M00S04499.resex   +++| GRI1     SB2    B2+B7
Line S04500 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
08766  M01S04500.ns21000 ---|          SA3    RSXB+B2
Line S00584 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
08767  M01S00584.ns21000 +++|          SA3    TRID-RMTP+B2  GET RESOURCE IDENTIFIER
08768  M00S04501.resex   +++|          BX6    X1-X3
08769  M00S04502.resex   +++|          EQ     B2,B4,GRI2  IF END OF TABLE
08770  M00S04503.resex   +++|          NZ     X6,GRI1     IF NO MATCH
Line S04504 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
08771  M01S04504.ns22000 ---|          SX6    100B+B2
Line S00418 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
08772  M01S00418.ns22000 +++|          SX6    B2
08773  M00S04505.resex   +++|          EQ     B7,B1,GRIX  IF TAPE ENTRY FOUND
08774  M00S04506.resex   +++|          SA3    A3+B1       GET MAXIMUM NUMBER OF UNITS
08775  M00S04507.resex   +++|          SB7    B1
Line S00419 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
08776  M01S00419.ns22000 +++|          SX6    B2+100B
08777  M00S04508.resex   +++|          ZR     X2,GRIX     IF NUMBER OF UNITS NOT SPECIFIED
08778  M00S04509.resex   +++|          SB7    X2-1R0
08779  M00S04510.resex   +++|          UX3    X3,B4
08780  M00S04511.resex   +++|          SX6    B7          MERGE PARAMETER INDEX AND UNIT COUNT
Line S04512 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
08781  M01S04512.v23l617 ---|          LE     B7,GRI3     IF ILLEGAL NUMBER OF UNITS
08782  M01S04513.v23l617 ---|          GT     B7,B4,GRI3  IF INVALID NUMBER OF UNITS
Line S00049 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
08783  M01S00049.v23l617 +++|          LE     B7,GRI3     IF INCORRECT NUMBER OF UNITS
08784  M01S00050.v23l617 +++|          GT     B7,B4,GRI3  IF INCORRECT NUMBER OF UNITS
08785  M00S04514.resex   +++|          LX6    6
08786  M00S04515.resex   +++|          SX6    X6+B2
08787  M00S04516.resex   +++|          EQ     GRIX        RETURN
08788  M00S04517.resex   +++|
08789  M00S04518.resex   +++|
Line S04519 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
08790  M01S04519.ns21000 ---| GRI2     SB4    RQPD        SET TO SEARCH REMOVABLE DEVICES
Line S00585 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
08791  M01S00585.ns21000 +++| GRI2     SB4    RRPP+RRPL   SET TO SEARCH REMOVABLE PACKS
08792  M00S04520.resex   +++|          SB2    RRPP-2
08793  M00S04521.resex   +++|          SX6    B7-B1
08794  M00S04522.resex   +++|          SB7    B7+B7
08795  M00S04523.resex   +++|          ZR     X6,GRI1     IF NOT END OF SEARCH
08796  M00S04524.resex   +++| GRI3     SB2    B0
08797  M00S04525.resex   +++|          EQ     GRIX        RETURN
08798  M00S04526.resex   +++| GRL      SPACE  4,15
08799  M00S04527.resex   +++|**        GRL - GET RESOURCE LIST INDEX.
08800  M00S04528.resex   +++|*
08801  M00S04529.resex   +++|*         ENTRY  (X7) = DEVICE TYPE, 2 CHARACTERS, RIGHT-JUSTIFIED.
08802  M00S04530.resex   +++|*                (B4) = LENGTH OF TABLE.
08803  M00S04531.resex   +++|*
08804  M00S04532.resex   +++|*         EXIT   (B4) .LT. 0, IF RESOURCE LIST NOT FOUND.
08805  M00S04533.resex   +++|*                (B4) = INDEX OF RESOURCE LIST IN TRSL TABLE.
08806  M00S04534.resex   +++|*
08807  M00S04535.resex   +++|*         USES   A - 3.
08808  M00S04536.resex   +++|*                B - 4.
08809  M00S04537.resex   +++|*                X - 2, 3, 6.
08810  M00S04538.resex   +++|
08811  M00S04539.resex   +++|
08812  M00S04540.resex   +++| GRL      SUBR               ENTRY/EXIT
08813  M00S04541.resex   +++|          MX2    -12
08814  M00S04542.resex   +++|          SA3    TRSL+B4
08815  M00S04543.resex   +++| GRL1     SB4    B4-B1
08816  M00S04544.resex   +++|          SA3    A3-B1
08817  M00S04545.resex   +++|          NG     B4,GRLX     IF RESOURCE NOT FOUND IN LIST
08818  M00S04546.resex   +++| GRL2     LX3    12
08819  M00S04547.resex   +++|          BX6    -X2*X3
08820  M00S04548.resex   +++|          ZR     X6,GRL1     IF END OF RESOURCES IN THIS LIST
08821  M00S04549.resex   +++|          BX6    X6-X7
08822  M00S04550.resex   +++|          NZ     X6,GRL2     IF NO MATCH
08823  M00S04551.resex   +++|          EQ     GRLX        RETURN
Line S01201 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08824  M01S01201.274l797 +++| GTM      SPACE  4,10
08825  M01S01202.274l797 +++|**        GTM - GET CURRENT TIME.
08826  M01S01203.274l797 +++|*
08827  M01S01204.274l797 +++|*         EXIT   (TM) = TIME IN ABSOLUTE SECONDS.
08828  M01S01205.274l797 +++|*
08829  M01S01206.274l797 +++|*         USES   X - 1.
08830  M01S01207.274l797 +++|*                A - 1, 6.
08831  M01S01208.274l797 +++|*
08832  M01S01209.274l797 +++|*         CALLS  PTE.
08833  M01S01210.274l797 +++|*
08834  M01S01211.274l797 +++|*         MACROS PDATE.
08835  M01S01212.274l797 +++|
08836  M01S01213.274l797 +++|
08837  M01S01214.274l797 +++| GTM      SUBR               ENTRY/EXIT
08838  M01S01215.274l797 +++|          PDATE  TM          GET PACKED DATE AND TIME
08839  M01S01216.274l797 +++|          SA1    TM
08840  M01S01217.274l797 +++|          RJ     PTE         SET ABSOLUTE SECONDS
08841  M01S01218.274l797 +++|          SA6    TM
08842  M01S01219.274l797 +++|          EQ     GTMX        RETURN
Line S01220 Modification History
M01 (Added by) 274l797
M02 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
08843  M02S01220.ns2770  ---| IAM      SPACE  4,15
08844  M02S01221.ns2770  ---|**        IAM - ISSUE TAPE ASSIGNMENT MESSAGE.
08845  M02S01222.ns2770  ---|*
08846  M02S01223.ns2770  ---|*         ENTRY  UDT ENTRY OF ASSIGNED UNIT IN *UDT*.
08847  M02S01224.ns2770  ---|*
08848  M02S01225.ns2770  ---|*         EXIT   TAPE ASSIGNMENT MESSAGE ISSUED TO DAYFILE.
08849  M02S01226.ns2770  ---|*
08850  M02S01227.ns2770  ---|*         USES   X - 1, 6, 7.
08851  M02S01228.ns2770  ---|*                A - 1.
08852  M02S01229.ns2770  ---|*                B - 2, 5.
08853  M02S01230.ns2770  ---|*
08854  M02S01231.ns2770  ---|*         CALLS  COD, SFN, SNM.
08855  M02S01232.ns2770  ---|*
Line S01233 Modification History
M01 (Added by) 274l797
M02 (Removed by) 282l826
M03 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
08856  M03S01233.ns2770  ---|*         MACROS MESSAGE.
Line S00721 Modification History
M01 (Added by) 282l826
M02 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
08857  M02S00721.ns2770  ---|*         MACROS FILINFO, MESSAGE.
Line S01234 Modification History
M01 (Added by) 274l797
M02 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
08858  M02S01234.ns2770  ---|
08859  M02S01235.ns2770  ---|
08860  M02S01236.ns2770  ---| IAM      SUBR               ENTRY/EXIT
Line S01237 Modification History
M01 (Added by) 274l797
M02 (Removed by) 282l826
M03 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
08861  M03S01237.ns2770  ---|          SA1    UDT+/COMSMTX/UST4  GET EST ORDINAL
Line S00722 Modification History
M01 (Added by) 282l826
M02 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
08862  M02S00722.ns2770  ---|          SA1    F           GET TAPE FILE NAME
08863  M02S00723.ns2770  ---|          SX7    50001B
08864  M02S00724.ns2770  ---|          MX6    42
08865  M02S00725.ns2770  ---|          BX6    X6*X1       FILE NAME
08866  M02S00726.ns2770  ---|          BX6    X6+X7
08867  M02S00727.ns2770  ---|          SA6    IAMB        SET FILE NAME AND BLOCK LENGTH
08868  M02S00728.ns2770  ---|          FILINFO  IAMB
08869  M02S00729.ns2770  ---|          SA1    IAMB+2      GET EST ORDINAL
Line S01238 Modification History
M01 (Added by) 274l797
M02 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
08870  M02S01238.ns2770  ---|          MX7    -12
Line S01239 Modification History
M01 (Added by) 274l797
M02 (Removed by) 282l826
M03 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
08871  M03S01239.ns2770  ---|          LX1    -24
Line S00730 Modification History
M01 (Added by) 282l826
M02 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
08872  M02S00730.ns2770  ---|          LX1    -48
Line S01240 Modification History
M01 (Added by) 274l797
M02 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
08873  M02S01240.ns2770  ---|          BX1    -X7*X1      EST ORDINAL
08874  M02S01241.ns2770  ---|          SX1    X1+10000B   FORCE LEADING ZEROES
08875  M02S01242.ns2770  ---|          RJ     COD         CONVERT EST ORDINAL
08876  M02S01243.ns2770  ---|          SA1    F+FTAP
08877  M02S01244.ns2770  ---|          MX7    -18
08878  M02S01245.ns2770  ---|          BX6    -X7*X6      CONVERTED EST ORDINAL
08879  M02S01246.ns2770  ---|          MX7    -2
08880  M02S01247.ns2770  ---|          LX1    -55
08881  M02S01248.ns2770  ---|          BX1    -X7*X1      DEVICE TYPE
08882  M02S01249.ns2770  ---|          SA1    TTDV+X1
08883  M02S01250.ns2770  ---|          SX1    X1          DEVICE MNEMONIC
08884  M02S01251.ns2770  ---|          LX1    18
08885  M02S01252.ns2770  ---|          BX1    X1+X6       DEVICE MNEMONIC AND EST ORDINAL
08886  M02S01253.ns2770  ---|          LX1    30
08887  M02S01254.ns2770  ---|          SB2    1R?
08888  M02S01255.ns2770  ---|          SB5    IAMA
08889  M02S01256.ns2770  ---|          RJ     SNM         SET DEVICE PARAMETERS IN MESSAGE
08890  M02S01257.ns2770  ---|          SA1    F
08891  M02S01258.ns2770  ---|          SB2    1R+
08892  M02S01259.ns2770  ---|          MX7    42
08893  M02S01260.ns2770  ---|          BX1    X7*X1       FILE NAME
08894  M02S01261.ns2770  ---|          RJ     SNM         SET FILENAME IN MESSGE
08895  M02S01262.ns2770  ---|          SA4    EVSN        EXTERNAL VSN
08896  M02S01263.ns2770  ---|          SA1    =6L
08897  M02S01264.ns2770  ---|          BX1    X4-X1       CONVERT TRAILING BLANKS TO ZEROS
08898  M02S01265.ns2770  ---|          RJ     SFN         COMPUTE MASK OF NONBLANK CHARACTERS
08899  M02S01266.ns2770  ---|          SB2    1R-
08900  M02S01267.ns2770  ---|          BX1    X7*X4       REMOVE TRAILING BLANKS FROM VSN
08901  M02S01268.ns2770  ---|          RJ     SNM         SET VSN IN MESSGE
08902  M02S01269.ns2770  ---|          MESSAGE  IAMA      ISSUE ASSIGNMENT MESSAGE
08903  M02S01270.ns2770  ---|          EQ     IAMX        RETURN
08904  M02S01271.ns2770  ---|
08905  M02S01272.ns2770  ---|
08906  M02S01273.ns2770  ---| IAMA     DATA   C* ????? ASSIGNED TO +++++++, VSN=------.*
Line S00731 Modification History
M01 (Added by) 282l826
M02 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
08907  M02S00731.ns2770  ---| IAMB     BSSZ   5           *FILINFO* BLOCK
08908  M00S04552.resex   +++| IDE      SPACE  4,15
08909  M00S04553.resex   +++|**        IDE - INITIALIZE DEMAND ENTRY.
08910  M00S04554.resex   +++|*
08911  M00S04555.resex   +++|*         EXIT   EJT ORDINAL, VALIDATION LIMITS, AND
08912  M00S04556.resex   +++|*                RESOURCE IDENTIFIERS ENTERED INTO RESB BUFFER.
08913  M00S04557.resex   +++|*                SHARE TABLE AREA OF RESB BUFFER CLEARED.
08914  M00S04558.resex   +++|*
08915  M00S04559.resex   +++|*         USES   A - 1, 2, 3, 6, 7.
08916  M00S04560.resex   +++|*                B - 2, 3.
08917  M00S04561.resex   +++|*                X - 1, 2, 3, 6, 7.
08918  M00S04562.resex   +++|*
08919  M00S04563.resex   +++|*         MACROS CLEAR, MOVE.
08920  M00S04564.resex   +++|
08921  M00S04565.resex   +++|
08922  M00S04566.resex   +++| IDE      SUBR               ENTRY/EXIT
08923  M00S04567.resex   +++|          SA2    JEEO        GET JOB EJT ORDINAL
08924  M00S04568.resex   +++|          SA3    SSJ=+/COMSSSJ/ALMS  SET VALIDATION LIMITS
08925  M00S04569.resex   +++|          BX6    X2
08926  M00S04570.resex   +++|          LX3    12
08927  M00S04571.resex   +++|          SA6    RESB+RJID
08928  M00S04572.resex   +++|          MX1    6
08929  M00S04573.resex   +++|          BX7    X1*X3
08930  M00S04574.resex   +++|          SA7    RESB+RVAL
Line S04575 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
08931  M01S04575.ns21000 ---|          MOVE   RMTL+RRPL,RSXB+RMTP,RESB+RMTP  RESOURCE IDENTIFIERS
08932  M01S04576.ns21000 ---|          CLEAR  RESB+RQPD,RDEL-RQPD  CLEAR PREVIEW DATA/SHARE TABLE
Line S00586 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
08933  M01S00586.ns21000 +++|          MOVE   RMTL+RRPL,TRID,RESB+RMTP  RESOURCE IDENTIFIERS
08934  M01S00587.ns21000 +++|          CLEAR  RESB+RRPP+RRPL,RDEL-RRPP-RRPL  CLEAR REMAINING ENTRY
08935  M00S04577.resex   +++|          EQ     IDEX        RETURN
08936  M00S04578.resex   +++| IRC      SPACE  4,25
08937  M00S04579.resex   +++|**        IRC - INCREMENT RESOURCE COUNT.
08938  M00S04580.resex   +++|*
08939  M00S04581.resex   +++|*         ENTRY  (RI) = REQUESTED RESOURCE INDEX AND BYTE POINTER.
08940  M00S04582.resex   +++|*                (B5) = -1, IF DECREMENT TOTAL AND RESOURCE
08941  M00S04583.resex   +++|*                     ASSIGN COUNTS.
08942  M00S04584.resex   +++|*                (B5) = 0, IF INCREMENT TOTAL AND RESOURCE ASSIGN
08943  M00S04585.resex   +++|*                     COUNTS.
08944  M00S04586.resex   +++|*                (B5) = 1, IF INCREMENT TOTAL AND RESOURCE DEMAND
08945  M00S04587.resex   +++|*                     COUNTS.
08946  M00S04588.resex   +++|*                (B5) = 2, IF DECREMENT TOTAL AND RESOURCE DEMAND
08947  M00S04589.resex   +++|*                     COUNTS.
08948  M00S04590.resex   +++|*
08949  M00S04591.resex   +++|*         EXIT   (B2) = RESOURCE INDEX INTO DEMAND ENTRY.
08950  M00S04592.resex   +++|*                TOTAL AND RESOURCE DEMAND OR ASSIGNED COUNTS
08951  M00S04593.resex   +++|*                FOR (RI) RESOURCE IN RESB BUFFER DECREMENTED
08952  M00S04594.resex   +++|*                OR INCREMENTED BY 1.
08953  M00S04595.resex   +++|*
08954  M00S04596.resex   +++|*         USES   A - 2, 3, 6, 7.
08955  M00S04597.resex   +++|*                X - 0, 1, 2, 3, 6, 7.
08956  M00S04598.resex   +++|*
08957  M00S04599.resex   +++|*         CALLS  CBP.
08958  M00S04600.resex   +++|
08959  M00S04601.resex   +++|
08960  M00S04602.resex   +++| IRC      SUBR               ENTRY/EXIT
08961  M00S04603.resex   +++|          SA2    RI          CALCULATE RESOURCE BYTE POSITION
08962  M00S04604.resex   +++|          RJ     CBP
08963  M00S04605.resex   +++|          SA2    RESB+RVAL   INCREMENT/DECREMENT TOTAL COUNT
08964  M00S04606.resex   +++|          SA3    B2+RESB     INCREMENT/DECREMENT RESOURCE COUNT
08965  M00S04607.resex   +++|          SX0    B1
08966  M00S04608.resex   +++|          LX1    X0,B4
08967  M00S04609.resex   +++|          GT     B5,IRC1     IF PROCESSING DEMAND COUNT
08968  M00S04610.resex   +++|          LX0    12
08969  M00S04611.resex   +++|          LX1    6
08970  M00S04612.resex   +++| IRC1     IX6    X2+X0
08971  M00S04613.resex   +++|          IX7    X3+X1
08972  M00S04614.resex   +++|          ZR     B5,IRC2     IF INCREMENTING ASSIGN COUNTS
08973  M00S04615.resex   +++|          EQ     B5,B1,IRC2  IF INCREMENTING DEMAND COUNTS
08974  M00S04616.resex   +++|          IX6    X2-X0       DECREMENT RESOURCE COUNTS
08975  M00S04617.resex   +++|          IX7    X3-X1
08976  M00S04618.resex   +++| IRC2     SA6    A2
08977  M00S04619.resex   +++|          SA7    A3
08978  M00S04620.resex   +++|          EQ     IRCX        RETURN
Line S01274 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
08979  M01S01274.274l797 +++| IUT      SPACE  4,10
08980  M01S01275.274l797 +++|**        IUT - INITIALIZE *UTMS*.
08981  M01S01276.274l797 +++|*
08982  M01S01277.274l797 +++|*         EXIT   (X7) = *UTMS*.
08983  M01S01278.274l797 +++|*
08984  M01S01279.274l797 +++|*         USES   X - 0, 2, 3, 7.
08985  M01S01280.274l797 +++|*                A - 2.
08986  M01S01281.274l797 +++|
08987  M01S01282.274l797 +++|
08988  M01S01283.274l797 +++| IUT      SUBR               ENTRY/EXIT
08989  M01S01284.274l797 +++|          SA2    TMPF
08990  M01S01285.274l797 +++|          MX0    1
08991  M01S01286.274l797 +++|          LX2    59-58
08992  M01S01287.274l797 +++|          BX7    X0*X2       SET TMS CONTROL
08993  M01S01288.274l797 +++|          LX7    12
08994  M01S01289.274l797 +++|          LX2    59-57-59+58
08995  M01S01290.274l797 +++|          BX3    X0*X2
08996  M01S01291.274l797 +++|          LX3    13
08997  M01S01292.274l797 +++|          BX7    X3+X7       SET BLANK LABEL FLAG
08998  M01S01293.274l797 +++|          LX2    59-56-59+57
08999  M01S01294.274l797 +++|          BX3    X0*X2
09000  M01S01295.274l797 +++|          LX3    14
09001  M01S01296.274l797 +++|          BX7    X3+X7       SET VERIFY FLAG
09002  M01S01297.274l797 +++|          LX2    59-55-59+56
09003  M01S01298.274l797 +++|          BX3    X0*X2
09004  M01S01299.274l797 +++|          LX3    10
09005  M01S01300.274l797 +++|          BX7    X3+X7       SET RESERVE SCRATCH FLAG
09006  M01S01301.274l797 +++|          LX2    59-54-59+55
09007  M01S01302.274l797 +++|          BX3    X0*X2
09008  M01S01303.274l797 +++|          LX3    9
09009  M01S01304.274l797 +++|          BX7    X3+X7       SET SYMBOLIC ACCESS FLAG
09010  M01S01305.274l797 +++|          LX2    59-52-59+54
09011  M01S01306.274l797 +++|          BX3    X0*X2
09012  M01S01307.274l797 +++|          LX3    11
09013  M01S01308.274l797 +++|          BX7    X3+X7       SET USER OWNED FLAG
09014  M01S01309.274l797 +++|          EQ     IUTX        RETURN
09015  M00S04621.resex   +++| IVE      SPACE  4,20
09016  M00S04622.resex   +++|**        IVE - INITIALIZE VSN ENTRY.
09017  M00S04623.resex   +++|*
09018  M00S04624.resex   +++|*         ENTRY  (X3) = FILE NAME IN UPPER 42 BITS.
09019  M00S04625.resex   +++|*                (B2) = 0, IF ONLY SET UP IDENTIFICATION IN VSN ENTRY,
09020  M00S04626.resex   +++|*                     OTHERWISE INITIALIZE ENTIRE ENTRY.
09021  M00S04627.resex   +++|*
09022  M00S04628.resex   +++|*         EXIT   DEMAND FILE RANDOM INDEX, JOB EJT ORDINAL,
09023  M00S04629.resex   +++|*                AND FILE NAME SET IN VSNE BUFFER.
09024  M00S04630.resex   +++|*                AREA FOR VSN ENTRIES IN VSNE BUFFER CLEARED FOR ENTRY
09025  M00S04631.resex   +++|*                CONDITION (B2) .NE. 0.
09026  M00S04632.resex   +++|*
Line S04633 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09027  M01S04633.282l826 ---|*         USES   A - 1, 2, 6, 7.
09028  M01S04634.282l826 ---|*                B - 2, 3.
09029  M01S04635.282l826 ---|*                X - 1, 2, 6, 7.
Line S00732 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09030  M01S00732.282l826 +++|*         USES   X - 1, 2, 4, 6, 7.
09031  M01S00733.282l826 +++|*                A - 1, 2, 6, 7.
09032  M00S04636.resex   +++|*
09033  M00S04637.resex   +++|*         MACROS CLEAR.
09034  M00S04638.resex   +++|
09035  M00S04639.resex   +++|
09036  M00S04640.resex   +++| IVE      SUBR               ENTRY/EXIT
09037  M00S04641.resex   +++|          SA2    JEEO        GET JOB EJT ORDINAL
09038  M00S04642.resex   +++|          SA1    /CPA/RFCW   GET DEMAND FILE RANDOM INDEX
09039  M00S04643.resex   +++|          MX4    42
Line S04644 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09040  M01S04644.282l826 ---|          BX6    X2
09041  M01S04645.282l826 ---|          SA6    VSNE+VJID
Line S00734 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09042  M01S00734.282l826 +++|          LX2    48
09043  M00S04646.resex   +++|          BX6    X4*X3       SET FILE NAME
09044  M00S04647.resex   +++|          BX7    -X4*X1
Line S00735 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09045  M01S00735.282l826 +++|          BX7    X7+X2
09046  M00S04648.resex   +++|          SA6    VSNE+VLFN
09047  M00S04649.resex   +++|          SA7    VSNE+VDFI
09048  M00S04650.resex   +++|          ZR     B2,IVEX     IF SET UP IDENTIFICATION ONLY
Line S04651 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09049  M01S04651.282l826 ---|          CLEAR  VSNE+VVSN,VSNL-VVSN  CLEAR VSN ENTRIES
Line S00736 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09050  M01S00736.282l826 +++|          CLEAR  VSNE+VRLC,VSNL-VRLC  CLEAR VSN AREA
09051  M00S04652.resex   +++|          EQ     IVEX        RETURN
09052  M00S04653.resex   +++| OPN      SPACE  4,25
09053  M00S04654.resex   +++|**        OPN - OPEN FILE.
09054  M00S04655.resex   +++|*
09055  M00S04656.resex   +++|*         ENTRY  (FET+10 - FET+13) = NOS LABEL FET PARAMETERS.
09056  M00S04657.resex   +++|*                (LABL) = NOS/BE LABEL PARAMETERS (STANDARD/EXTENDED).
09057  M00S04658.resex   +++|*                (OO) = OPEN OPTION.
09058  M00S04659.resex   +++|*                (RT) = REQUEST TYPE.
09059  M00S04660.resex   +++|*                (CF) = CALL FLAG.
09060  M00S04661.resex   +++|*
Line S04662 Modification History
M01 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
09061  M01S04662.ns2770  ---|*         EXIT   FILE OPEN IF LABELED REQUEST.
Line S00022 Modification History
M01 (Added by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
09062  M01S00022.ns2770  +++|*         EXIT   (X6) .NE. 0 IF FILE OPENED.
09063  M01S00023.ns2770  +++|*                (X6) = 0 IF FILE NOT OPENED.
Line S00006 Modification History
M01 (Added by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09064  M01S00006.resex27 +++|*                TO *PER* IF ERROR.
09065  M00S04663.resex   +++|*
09066  M00S04664.resex   +++|*         ON OPEN/WRITE CALLS, FIELDS WHICH ARE BINARY ZERO WILL CAUSE
09067  M00S04665.resex   +++|*         THE TAPE EXECUTIVE TO USE DEFAULT VALUES.
09068  M00S04666.resex   +++|*         ON ALL OTHER OPEN CALLS, BINARY ZERO FIELDS WILL CAUSE THE
09069  M00S04667.resex   +++|*         TAPE EXECUTIVE TO SKIP THE COMPARISON BETWEEN THE TAPE LABEL
09070  M00S04668.resex   +++|*         AND THE FIELD.
09071  M00S04669.resex   +++|*
Line S04670 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09072  M01S04670.282l826 ---|*         USES   A - 1, 2, 3, 5, 6, 7.
Line S00737 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09073  M01S00737.282l826 +++|*         USES   X - ALL.
09074  M01S00738.282l826 +++|*                A - 1, 2, 3, 5, 6, 7.
Line S04671 Modification History
M01 (Removed by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09075  M01S04671.resex27 ---|*                B - 6.
Line S00007 Modification History
M01 (Added by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09076  M01S00007.resex27 +++|*                B - 2, 3, 5, 6.
Line S04672 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09077  M01S04672.282l826 ---|*                X - ALL.
09078  M00S04673.resex   +++|*
Line S04674 Modification History
M01 (Removed by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09079  M01S04674.resex27 ---|*         CALLS  CDD.
Line S00008 Modification History
M01 (Added by) resex27
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09080  M02S00008.274l797 ---|*         CALLS  CDD, COD, SNM.
Line S01310 Modification History
M01 (Added by) 274l797
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09081  M02S01310.282l826 ---|*         CALLS  CDD.
Line S00739 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09082  M01S00739.282l826 +++|*         CALLS  CDD, CER.
09083  M00S04675.resex   +++|*
Line S04676 Modification History
M01 (Removed by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09084  M01S04676.resex27 ---|*         MACROS MOVE, OPEN, POSMF, SETRNR.
Line S00009 Modification History
M01 (Added by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09085  M01S00009.resex27 +++|*         MACROS MOVE, OPEN, POSMF, SETFET, SETRNR.
09086  M00S04677.resex   +++|
09087  M00S04678.resex   +++|
Line S04679 Modification History
M01 (Removed by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09088  M01S04679.resex27 ---| OPN11    SETRNR ROLL        ALLOW JOB ROLLOUT
09089  M01S04680.resex27 ---|          POSMF  F           POSITION MULTI-FILE SET TAPE
Line S00010 Modification History
M01 (Added by) resex27
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09090  M02S00010.282l826 ---| OPN13    SETFET F,ERP=0     CLEAR ERROR PROCESSING BIT
Line S04681 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09091  M01S04681.282l826 ---|
09092  M00S04682.resex   +++| OPN      SUBR               ENTRY/EXIT
Line S00011 Modification History
M01 (Added by) resex27
M02 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
09093  M02S00011.ns2770  ---|          SETFET F,ERP=E     SET ERROR PROCESSING BIT
09094  M00S04683.resex   +++|          SA3    F+FTAP      CHECK IF OPEN REQUIRED
Line S00024 Modification History
M01 (Added by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
09095  M01S00024.ns2770  +++|          SX6    B0+         SET FILE NOT OPENED
09096  M00S04684.resex   +++|          LX3    1
Line S04685 Modification History
M01 (Removed by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09097  M01S04685.resex27 ---|          PL     X3,OPNX     IF UNLABELED
Line S00012 Modification History
M01 (Added by) resex27
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09098  M02S00012.282l826 ---|          PL     X3,OPN13    IF UNLABELED
Line S00740 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09099  M01S00740.282l826 +++|          PL     X3,OPNX     IF UNLABELED
09100  M00S04686.resex   +++|          LX3    1
Line S00025 Modification History
M01 (Added by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
09101  M01S00025.ns2770  +++|          NG     X3,OPNX     IF NON-STANDARD LABELS
09102  M01S00026.ns2770  +++|          SETFET F,ERP=E     SET ERROR PROCESSING
09103  M00S04687.resex   +++|          SA2    OO
Line S04688 Modification History
M01 (Removed by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09104  M01S04688.resex27 ---|          NG     X3,OPNX     IF NON-STANDARD LABELS
Line S00013 Modification History
M01 (Added by) resex27
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09105  M02S00013.282l826 ---|          NG     X3,OPN13    IF NON-STANDARD LABELS
Line S00741 Modification History
M01 (Added by) 282l826
M02 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
09106  M02S00741.ns2770  ---|          NG     X3,OPNX     IF NON-STANDARD LABELS
Line S00027 Modification History
M01 (Added by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
09107  M01S00027.ns2770  +++|          SA1    F+FDTY
09108  M00S04689.resex   +++|          MX7    1
Line S04690 Modification History
M01 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
09109  M01S04690.ns2770  ---|          SA1    F+FDTY
09110  M00S04691.resex   +++|          LX7    -18
09111  M00S04692.resex   +++|          NG     X2,OPN7     IF STANDARD NOS/BE OPEN
09112  M00S04693.resex   +++|          BX7    X1+X7       SET XL BIT
09113  M00S04694.resex   +++|          SA7    A1
09114  M00S04695.resex   +++|          NZ     X2,OPN6     IF EXTENDED NOS/BE OPEN
09115  M00S04696.resex   +++|
09116  M00S04697.resex   +++|*         TRANSLATE NOS FET TO EXTENDED LABEL.
09117  M00S04698.resex   +++|
09118  M00S04699.resex   +++|          SA1    F+FID1      SHIFT FILE IDENTIFIER
09119  M00S04700.resex   +++|          MX0    36
09120  M00S04701.resex   +++|          SA5    OPNA
09121  M00S04702.resex   +++|          BX6    X0*X1
09122  M00S04703.resex   +++|          LX6    -24
09123  M00S04704.resex   +++|          BX7    X5+X6
09124  M00S04705.resex   +++|          SA7    LABL
09125  M00S04706.resex   +++|          SA3    F+FID2
09126  M00S04707.resex   +++|          BX6    X0*X3
09127  M00S04708.resex   +++|          BX1    -X0*X1
09128  M00S04709.resex   +++|          BX7    X6+X1
09129  M00S04710.resex   +++|          LX7    36
09130  M00S04711.resex   +++|          SA2    F+FMSI      SHIFT MULTI-SET IDENTIFIER
09131  M00S04712.resex   +++|          SA7    A7+B1
09132  M00S04713.resex   +++|          BX2    X0*X2
09133  M00S04714.resex   +++|          MX0    6
09134  M00S04715.resex   +++|          LX3    36
09135  M00S04716.resex   +++|          BX3    X0*X3
09136  M00S04717.resex   +++|          LX2    -6
09137  M00S04718.resex   +++|          BX7    X2+X3
09138  M00S04719.resex   +++|          SA7    A7+B1
09139  M00S04720.resex   +++|          MX0    30
09140  M00S04721.resex   +++|          SA2    F+FCRD      SHIFT CREATION/RETENTION DATES
09141  M00S04722.resex   +++|          BX7    -X0*X2
09142  M00S04723.resex   +++|          BX5    X0*X2
09143  M00S04724.resex   +++|          MX3    0
09144  M00S04725.resex   +++|          ZR     X2,OPN2     IF NO DATES
09145  M00S04726.resex   +++|          SA3    A5+B1       OPNB
09146  M00S04727.resex   +++|          NZ     X7,OPN1     IF CREATION DATE
09147  M00S04728.resex   +++|          BX3    -X0*X3
09148  M00S04729.resex   +++| OPN1     NZ     X5,OPN2     IF RETENTION DATE
09149  M00S04730.resex   +++|          BX3    X0*X3
09150  M00S04731.resex   +++| OPN2     MX0    12
09151  M00S04732.resex   +++|          LX7    18
09152  M00S04733.resex   +++|          BX5    X0*X2
09153  M00S04734.resex   +++|          SB6    B1+B1
09154  M00S04735.resex   +++|          LX5    12
09155  M00S04736.resex   +++|          BX7    X7+X5
09156  M00S04737.resex   +++|          MX0    18
09157  M00S04738.resex   +++|          BX7    X7+X3
09158  M00S04739.resex   +++|          LX2    12
09159  M00S04740.resex   +++|          SA7    A7+B6       LABL+4
09160  M00S04741.resex   +++|          BX2    X0*X2
09161  M00S04742.resex   +++|          MX0    6
09162  M00S04743.resex   +++|          SA1    F+FFAS      SHIFT FILE ACCESSIBILITY
09163  M00S04744.resex   +++|          LX1    36
09164  M00S04745.resex   +++|          BX1    X0*X1
09165  M00S04746.resex   +++|          LX1    -18
09166  M00S04747.resex   +++|          SA5    A5+B6       OPNC
09167  M00S04748.resex   +++|          BX7    X1+X2
09168  M00S04749.resex   +++|          BX6    X7+X5
09169  M00S04750.resex   +++|          MX7    0
09170  M00S04751.resex   +++|          SA6    A7+B1       LABL+5
09171  M00S04752.resex   +++|          SA7    A6+B1       LABL+6
09172  M00S04753.resex   +++|          SA7    A7+B1       LABL+7
09173  M00S04754.resex   +++|          MX0    -15
09174  M00S04755.resex   +++|          SA1    F+FSQN      SHIFT FILE SEQUENCE NUMBER
09175  M00S04756.resex   +++|          BX1    -X0*X1
09176  M00S04757.resex   +++|          ZR     X1,OPN3     IF NO FILE SEQUENCE NUMBER
09177  M00S04758.resex   +++|          RJ     CDD
09178  M00S04759.resex   +++|          MX0    -24
09179  M00S04760.resex   +++|          BX4    X0*X4
09180  M00S04761.resex   +++|          SA3    A5+B1       OPND
09181  M00S04762.resex   +++|          BX7    X3+X4
09182  M00S04763.resex   +++|          LX7    X7,B2
09183  M00S04764.resex   +++|          BX7    -X0*X7
09184  M00S04765.resex   +++|          LX7    30
09185  M00S04766.resex   +++|          MX0    -15
09186  M00S04767.resex   +++| OPN3     SA7    A6-B6       LABL+3
09187  M00S04768.resex   +++|          SA1    F+FGRN      SHIFT GENERATION NUMBER
09188  M00S04769.resex   +++|          BX1    -X0*X1
09189  M00S04770.resex   +++|          ZR     X1,OPN4     IF NO GENERATION NUMBER
09190  M00S04771.resex   +++|          RJ     CDD
09191  M00S04772.resex   +++|          MX0    -24
09192  M00S04773.resex   +++|          BX4    X0*X4
09193  M00S04774.resex   +++|          SA3    OPND
09194  M00S04775.resex   +++|          BX7    X3+X4
09195  M00S04776.resex   +++|          LX7    X7,B2
09196  M00S04777.resex   +++|          SA1    LABL+3
09197  M00S04778.resex   +++|          BX7    -X0*X7
09198  M00S04779.resex   +++|          LX7    6
09199  M00S04780.resex   +++|          BX7    X1+X7
09200  M00S04781.resex   +++|          SA7    A1
09201  M00S04782.resex   +++| OPN4     MX0    -15
09202  M00S04783.resex   +++|          SA1    F+FSTN      SHIFT FILE SECTION NUMBER
09203  M00S04784.resex   +++|          BX1    -X0*X1
09204  M00S04785.resex   +++|          ZR     X1,OPN5     IF NO FILE SECTION NUMBER
09205  M00S04786.resex   +++|          RJ     CDD
09206  M00S04787.resex   +++|          MX0    -24
09207  M00S04788.resex   +++|          BX4    X0*X4
09208  M00S04789.resex   +++|          SA3    OPND
09209  M00S04790.resex   +++|          BX7    X3+X4
09210  M00S04791.resex   +++|          LX7    X7,B2
09211  M00S04792.resex   +++|          BX7    -X0*X7
09212  M00S04793.resex   +++|          MX0    -18
09213  M00S04794.resex   +++|          SA1    LABL+2
09214  M00S04795.resex   +++|          LX7    -6
09215  M00S04796.resex   +++|          BX5    -X0*X7
09216  M00S04797.resex   +++|          BX6    X5+X1
09217  M00S04798.resex   +++|          SA6    A1
09218  M00S04799.resex   +++|          MX0    6
09219  M00S04800.resex   +++|          BX7    X0*X7
09220  M00S04801.resex   +++|          SA1    A1+1
09221  M00S04802.resex   +++|          BX7    X1+X7
09222  M00S04803.resex   +++|          SA7    A1
09223  M00S04804.resex   +++| OPN5     MX0    -9
09224  M00S04805.resex   +++|          SA1    F+FGVN      SHIFT GENERATION VERSION NUMBER
09225  M00S04806.resex   +++|          LX1    -15
09226  M00S04807.resex   +++|          BX1    -X0*X1
09227  M00S04808.resex   +++|          ZR     X1,OPN6     IF NO GENERATION VERSION NUMBER
09228  M00S04809.resex   +++|          RJ     CDD
09229  M00S04810.resex   +++|          MX0    -24
09230  M00S04811.resex   +++|          BX4    X0*X4
09231  M00S04812.resex   +++|          SA3    OPND
09232  M00S04813.resex   +++|          BX7    X3+X4
09233  M00S04814.resex   +++|          LX7    X7,B2
09234  M00S04815.resex   +++|          MX0    -12
09235  M00S04816.resex   +++|          BX7    -X0*X7
09236  M00S04817.resex   +++|          SA1    LABL+3
09237  M00S04818.resex   +++|          MX0    -6
09238  M00S04819.resex   +++|          LX7    -6
09239  M00S04820.resex   +++|          BX5    -X0*X7
09240  M00S04821.resex   +++|          BX6    X5+X1
09241  M00S04822.resex   +++|          SA6    A1
09242  M00S04823.resex   +++|          MX0    6
09243  M00S04824.resex   +++|          BX7    X0*X7
09244  M00S04825.resex   +++|          SA1    A1+B1
09245  M00S04826.resex   +++|          BX7    X1+X7
09246  M00S04827.resex   +++|          SA7    A1
09247  M00S04828.resex   +++| OPN6     SX7    BUFL        BUILD EXTENDED LABEL BUFFER
09248  M00S04829.resex   +++|          SX6    BUF
09249  M00S04830.resex   +++|          LX7    18
09250  M00S04831.resex   +++|          BX7    X6+X7
09251  M00S04832.resex   +++|          SA7    F+9         ENTER XL BUFFER POINTER
09252  M00S04833.resex   +++|          SX6    80
09253  M00S04834.resex   +++|          SA6    BUF         EXTENDED LABEL CONTROL WORD
09254  M00S04835.resex   +++|          MOVE   8,LABL,BUF+1  MOVE EXTENDED LABEL
09255  M00S04836.resex   +++|          SX7    B0+
09256  M00S04837.resex   +++|          SA7    BUF+9       TERMINAL CONTROL WORD
09257  M00S04838.resex   +++|          EQ     OPN8        CHECK TYPE OF OPEN
09258  M00S04839.resex   +++|
09259  M00S04840.resex   +++| OPN7     MOVE   4,LABL,F+11B  MOVE STANDARD LABEL PARAMETERS
09260  M00S04841.resex   +++| OPN8     SA2    F+FTAP      CHECK TYPE OF OPEN
09261  M00S04842.resex   +++|          SA1    MF          CHECK MULTI-FILE POSITIONING
09262  M00S04843.resex   +++|          SA3    FS
09263  M00S04844.resex   +++|          MX0    -3
09264  M00S04845.resex   +++|          BX6    -X0*X1
09265  M00S04846.resex   +++|          PL     X2,OPN9     IF NO LABEL WRITE REQUEST
Line S04847 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09266  M01S04847.282l826 ---|          SA4    BUF+1+5     SET FA PARAMETER TO BE WRITTEN
09267  M01S04848.282l826 ---|          SA5    OPNE
09268  M01S04849.282l826 ---|          BX7    X4-X5
09269  M01S04850.282l826 ---|          SA7    A4
09270  M00S04851.resex   +++|          NG     X3,OPN9     IF NOT FIRST OPEN
09271  M00S04852.resex   +++|          SX3    X1-10B
09272  M00S04853.resex   +++|          NG     X3,OPN10    IF SEQUENCE NUMBER .LE. 1
09273  M00S04854.resex   +++| OPN9     SX4    X6-4
09274  M00S04855.resex   +++|          PL     X4,OPN11    IF POSMF
09275  M00S04856.resex   +++|          NG     X2,OPN10    IF WRITE LABEL
Line S04857 Modification History
M01 (Removed by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09276  M01S04857.resex27 ---|          OPEN   F,ALTER
09277  M01S04858.resex27 ---|          EQ     OPNX        RETURN
Line S00014 Modification History
M01 (Added by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09278  M01S00014.resex27 +++|          OPEN   F,ALTER,R
09279  M01S00015.resex27 +++|          EQ     OPN12       CHECK FOR ERROR
09280  M00S04859.resex   +++|
Line S04860 Modification History
M01 (Removed by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09281  M01S04860.resex27 ---| OPN10    OPEN   F,WRITE
09282  M01S04861.resex27 ---|          EQ     OPNX        RETURN
Line S00016 Modification History
M01 (Added by) resex27
Seq #  *Modification Id* Act 
----------------------------+
09283  M01S00016.resex27 +++| OPN10    OPEN   F,WRITE,R
09284  M01S00017.resex27 +++|          EQ     OPN12       CHECK FOR ERROR
09285  M01S00018.resex27 +++|
09286  M01S00019.resex27 +++| OPN11    SETRNR ROLL        ALLOW JOB ROLLOUT
09287  M01S00020.resex27 +++|          POSMF  F,R         POSITION MULTI-FILE SET TAPE
Line S00021 Modification History
M01 (Added by) resex27
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09288  M02S00021.282l826 ---| OPN12    SA5    F           CHECK FOR *CIO* ERROR ON *OPEN*
09289  M02S00022.282l826 ---|          MX0    -5
09290  M02S00023.282l826 ---|          LX5    -9
09291  M02S00024.282l826 ---|          BX1    -X0*X5
09292  M02S00025.282l826 ---|          ZR     X1,OPN13    IF NO ERROR
Line S00026 Modification History
M01 (Added by) resex27
M02 (Removed by) 274l797
M03 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09293  M03S00026.282l826 ---|          RJ     COD         CONVERT OCTAL ERROR CODE TO DISPLAY CODE
09294  M03S00027.282l826 ---|          BX1    X4
09295  M03S00028.282l826 ---|          SB2    1RX         REPLACEMENT CHARACTER
09296  M03S00029.282l826 ---|          SB3    /PER/CEO    * CIO ERROR XX ON YYYYYYY.*
09297  M03S00030.282l826 ---|          SB5    -OPNF
09298  M03S00031.282l826 ---|          RJ     SNM         MOVE ERROR CODE TO MESSAGE
09299  M03S00032.282l826 ---|          LX5    9
09300  M03S00033.282l826 ---|          MX0    42
09301  M03S00034.282l826 ---|          BX1    X0*X5       GET FILE NAME
09302  M03S00035.282l826 ---|          SB2    1RY         REPLACEMENT CHARACTER
09303  M03S00036.282l826 ---|          SB5    /PER/CEO
09304  M03S00037.282l826 ---|          RJ     SNM         MOVE FILE NAME TO MESSAGE
09305  M03S00038.282l826 ---|          SB2    B5
Line S00039 Modification History
M01 (Added by) resex27
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09306  M02S00039.282l826 ---|          SETFET F,ERP=0     CLEAR ERROR PROCESSING BIT
Line S01311 Modification History
M01 (Added by) 274l797
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09307  M02S01311.282l826 ---|          SB2    B0          SET NO MESSAGE
Line S00040 Modification History
M01 (Added by) resex27
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09308  M02S00040.282l826 ---|          EQ     PER         PROCESS ERROR
Line S00742 Modification History
M01 (Added by) 282l826
M02 (Removed by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
09309  M02S00742.ns2770  ---| OPN12    RJ     CER         CHECK ERROR AND CLEAR ERROR PROCESSING
Line S00028 Modification History
M01 (Added by) ns2770
Seq #  *Modification Id* Act 
----------------------------+
09310  M01S00028.ns2770  +++| OPN12    RJ     CER         CHECK ERROR
09311  M01S00029.ns2770  +++|          SETFET F,ERP=0     CLEAR ERROR PROCESSING
09312  M01S00030.ns2770  +++|          SX6    B1          SET FILE OPENED
Line S00743 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09313  M01S00743.282l826 +++|          EQ     OPNX        RETURN
09314  M00S04862.resex   +++|
09315  M00S04863.resex   +++|
09316  M00S04864.resex   +++| OPNA     VFD    60/0LHDR1
09317  M00S04865.resex   +++| OPNB     VFD    6/0,6/1H ,30/0,6/1H ,12/0
09318  M00S04866.resex   +++| OPNC     VFD    24/0,36/6H000000
09319  M00S04867.resex   +++| OPND     VFD    36/0,24/4H0000
Line S04868 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09320  M01S04868.282l826 ---| OPNE     CON    0
09321  M00S04869.resex   +++|
09322  M00S04870.resex   +++| LABL     BSS    8           LABEL TEMPORARY
Line S00041 Modification History
M01 (Added by) resex27
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09323  M02S00041.274l797 ---|
09324  M02S00042.274l797 ---| OPNF     DATA   C* CIO ERROR XX ON YYYYYYY.*
Line S04871 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09325  M01S04871.274l797 ---| PER      SPACE  4,15
Line S01312 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09326  M01S01312.274l797 +++| PER      SPACE  4,20
09327  M00S04872.resex   +++|**        PER - PROCESS ERROR.
09328  M00S04873.resex   +++|*
Line S04874 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09329  M01S04874.274l797 ---|*         ENTRY  (B2) = MESSAGE ADDRESS.
Line S01313 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09330  M01S01313.274l797 +++|*         ENTRY  (B2) = ERROR MESSAGE ADDRESS.
09331  M01S01314.274l797 +++|*                (B2) = 0 IF ERROR MESSAGE ALREADY ISSUED.
09332  M00S04875.resex   +++|*
Line S04876 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09333  M01S04876.274l797 ---|*         EXIT   (SPPR) = RESPONSE STATUS, IF EXTERNAL CALL.
09334  M01S04877.274l797 ---|*                RESETS ERROR FLAG IF INTERRUPT OCCURRED, ELSE ABORTS
Line S04878 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09335  M02S04878.274l797 ---|*                IF CONTROL STATEMENT CALL, ENDRUNS IF EXTERNAL CALL.
Line S00051 Modification History
M01 (Added by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09336  M02S00051.274l797 ---|*                IF COMMAND CALL, ENDRUNS IF EXTERNAL CALL.
Line S01315 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09337  M01S01315.274l797 +++|*         EXIT   FATAL ERROR SET IN *SPPR* RESPONSE IF *DMP=* CALL.
09338  M01S01316.274l797 +++|*                ERROR FLAG RESET IF INTERRUPT OCCURRED.
09339  M01S01317.274l797 +++|*                JOB ABORTED IF COMMAND CALL.
09340  M01S01318.274l797 +++|*                *RESEX* TERMINATED WITH *ENDRUN* IF *DMP=* CALL.
09341  M00S04879.resex   +++|*
09342  M00S04880.resex   +++|*         USES   A - 1, 6, 7.
09343  M00S04881.resex   +++|*                X - 0, 1, 3, 5, 6, 7.
Line S00242 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
09344  M01S00242.252l678 +++|*
09345  M01S00243.252l678 +++|*         CALLS  TMA.
09346  M00S04882.resex   +++|*
09347  M00S04883.resex   +++|*         MACROS ABORT, INTRP, MESSAGE, RENSR, REPRIEVE, RETRF,
09348  M00S04884.resex   +++|*                UNLOAD.
09349  M00S04885.resex   +++|
09350  M00S04886.resex   +++|
09351  M00S04887.resex   +++| PER      BSS    0           ENTRY
09352  M00S04888.resex   +++|          SA1    D
09353  M00S04889.resex   +++|          AX1    18
09354  M00S04890.resex   +++|          SX1    X1
09355  M00S04891.resex   +++|          ZR     X1,PER1     IF RESOURCE FILE NAMES NOT SET
09356  M00S04892.resex   +++|          RETRF  D           RETURN DEMAND FILE
09357  M00S04893.resex   +++|          RETRF  V           RETURN VSN FILE
09358  M00S04894.resex   +++| PER1     SA1    F
09359  M00S04895.resex   +++|          AX1    18
09360  M00S04896.resex   +++|          ZR     X1,PER2     IF REQUESTED FILE NAME NOT SET
Line S00011 Modification History
M01 (Added by) resex1
Seq #  *Modification Id* Act 
----------------------------+
09361  M01S00011.resex1  +++|          SA1    FS          CHECK IF FILE PREVIOUSLY ASSIGNED
09362  M01S00012.resex1  +++|          NZ     X1,PER2     IF FILE NOT TO BE RETURNED
09363  M00S04897.resex   +++|          UNLOAD F
Line S04898 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09364  M01S04898.253l688 ---| PER2     SA1    B2          SET SPPR RETURN STATUS
Line S00498 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09365  M01S00498.253l688 +++| PER2     SA1    R-1
09366  M01S00499.253l688 +++|          NZ     X1,PER2.1   IF *PFM* REQUEST FILE NOT PRESENT
09367  M01S00500.253l688 +++|          UNLOAD R
Line S00501 Modification History
M01 (Added by) 253l688
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09368  M02S00501.274l797 ---| PER2.1   SA1    B2          SET *SPPR* RETURN STATUS
Line S04899 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09369  M01S04899.274l797 ---|          MX0    6
09370  M01S04900.274l797 ---|          SX5    1R
09371  M01S04901.274l797 ---|          BX3    X0*X1
09372  M01S04902.274l797 ---|          BX6    -X0*X1
09373  M01S04903.274l797 ---|          LX5    -6
09374  M01S04904.274l797 ---|          BX6    X6+X5
09375  M01S04905.274l797 ---|          SX7    /STATUS/FE
09376  M01S04906.274l797 ---|          LX3    12
09377  M01S04907.274l797 ---|          SA6    A1
09378  M01S04908.274l797 ---|          BX7    X7+X3
Line S01319 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09379  M01S01319.274l797 +++| PER2.1   SX7    /STATUS/FE  SET FATAL ERROR
09380  M00S04909.resex   +++|          LX7    24
Line S04910 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09381  M01S04910.274l797 ---|          SA7    SPPR
09382  M01S04911.274l797 ---|          MESSAGE A1
Line S01320 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09383  M01S01320.274l797 +++|          SA7    SPPR        SET *DMP=* RESPONSE
09384  M01S01321.274l797 +++|          RJ     TMA         PROCESS *TMS* ABORT
09385  M01S01322.274l797 +++|          ZR     B2,PER2.2   IF NO MESSAGE
09386  M01S01323.274l797 +++|          MESSAGE B2         ISSUE ERROR MESSAGE TO DAYFILE
Line S00244 Modification History
M01 (Added by) 252l678
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09387  M02S00244.253l688 ---|          RJ     TMA         PROCESS TMS ABORT
Line S00502 Modification History
M01 (Added by) 253l688
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09388  M02S00502.274l797 ---|          RJ     TMA         PROCESS *TMS* ABORT
Line S04912 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09389  M01S04912.274l797 ---|          RENSR  /COMSSRU/IARX  REENABLE ACCUMULATION WITH IARX CHARGE
Line S01324 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09390  M01S01324.274l797 +++| PER2.2   RENSR  /COMSSRU/IARX  REENABLE ACCUMULATION WITH IARX CHARGE
09391  M00S04913.resex   +++|          INTRP  PER3        RESET ERROR IF INTERRUPT OCCURRED
09392  M00S04914.resex   +++|          SA1    CF          CHECK CALL FLAG
Line S04915 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09393  M01S04915.274l797 ---|          NZ     X1,END      IF EXTERNAL CALL
Line S01325 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09394  M01S01325.274l797 +++|          NZ     X1,END      IF *DMP=* CALL
09395  M00S04916.resex   +++|          ABORT
09396  M00S04917.resex   +++|
09397  M00S04918.resex   +++| PER3     REPRIEVE  RPVB,RESET,0  RESET ERROR FLAG
09398  M00S04919.resex   +++| PMM      SPACE  4,10
09399  M00S04920.resex   +++|**        PMM - PROCESS *MAGNET* MISSING.
Line S04921 Modification History
M01 (Removed by) resex20
Seq #  *Modification Id* Act 
----------------------------+
09400  M01S04921.resex20 ---|*
09401  M01S04922.resex20 ---|*         EXIT   TO *ERR3* IF ON-LINE INTERACTIVE JOB.
09402  M00S04923.resex   +++|*
09403  M00S04924.resex   +++|*         USES   A - 1, 2.
09404  M00S04925.resex   +++|*                X - 1, 2, 5, 6.
09405  M00S04926.resex   +++|*
09406  M00S04927.resex   +++|*         CALLS  PRO.
09407  M00S04928.resex   +++|*
09408  M00S04929.resex   +++|*         MACROS RETRF.
09409  M00S04930.resex   +++|
09410  M00S04931.resex   +++|
09411  M00S04932.resex   +++| PMM      SUBR               ENTRY/EXIT
Line S04933 Modification History
M01 (Removed by) resex20
Seq #  *Modification Id* Act 
----------------------------+
09412  M01S04933.resex20 ---|          SA2    /EJT/JSNE   CHECK JOB CONNECTION STATUS
09413  M01S04934.resex20 ---|          MX6    -4
09414  M01S04935.resex20 ---|          LX2    0-7
09415  M01S04936.resex20 ---|          BX2    -X6*X2
09416  M01S04937.resex20 ---|          SX2    X2-/COMSEJT/OLCS
09417  M01S04938.resex20 ---|          ZR     X2,ERR3     IF ON-LINE INTERACTIVE JOB
09418  M00S04939.resex   +++|          RETRF  D           RETURN DEMAND FILE, RELEASE INTERLOCK
09419  M00S04940.resex   +++|          SX5    MSUB        SET MISSING SUBSYSTEM ROLLOUT DESCRIPTOR
09420  M00S04941.resex   +++|          SA1    MSUB+1      GET ROLLOUT MESSAGE ADDRESS
09421  M00S04942.resex   +++|          RJ     PRO         PROCESS TIMED EVENT ROLLOUT
09422  M00S04943.resex   +++|          EQ     PMMX        RETURN
09423  M00S04944.resex   +++| PNE      SPACE  4,10
09424  M00S04945.resex   +++|**        PNE - PROCESS NAMED ERROR.
09425  M00S04946.resex   +++|*
09426  M00S04947.resex   +++|*         ENTRY  (B2) = MESSAGE ADDRESS.
09427  M00S04948.resex   +++|*                (X1) = 48/,12/ JOB EJT ORDINAL.
09428  M00S04949.resex   +++|*
09429  M00S04950.resex   +++|*         EXITS  TO *PER*.
09430  M00S04951.resex   +++|
09431  M00S04952.resex   +++|
09432  M00S04953.resex   +++| PNE      BSS    0           ENTRY
09433  M00S04954.resex   +++|          SA2    /LWC/EJTP   GET FWA EJT
09434  M00S04955.resex   +++|          MX0    -12
09435  M00S04956.resex   +++|          BX1    -X0*X1
09436  M00S04957.resex   +++|          SX7    EJTE
09437  M00S04958.resex   +++|          IX7    X7*X1
09438  M00S04959.resex   +++|          AX2    36
09439  M00S04960.resex   +++|          IX7    X7+X2
09440  M00S04961.resex   +++|          RDSB   0,1,X7,PNEA GET JOB SEQUENCE NUMBER
09441  M00S04962.resex   +++|          SA1    PNEA
09442  M00S04963.resex   +++|          MX0    24          MERGE JOB SEQUENCE NUMBER INTO MESSAGE
09443  M00S04964.resex   +++|          SA2    B2
09444  M00S04965.resex   +++|          BX1    X0*X1
09445  M00S04966.resex   +++|          LX0    -6
09446  M00S04967.resex   +++|          BX2    -X0*X2
09447  M00S04968.resex   +++|          LX1    -6
09448  M00S04969.resex   +++|          BX6    X1+X2
09449  M00S04970.resex   +++|          SA6    A2
09450  M00S04971.resex   +++|          EQ     PER         PROCESS ERROR
09451  M00S04972.resex   +++|
09452  M00S04973.resex   +++|
09453  M00S04974.resex   +++| PNEA     VFD    1/1,59/0    JOB SEQUENCE NUMBER
09454  M00S04975.resex   +++|          SPACE  4,10
09455  M00S04976.resex   +++|**        FATAL ERROR MESSAGES.
09456  M00S04977.resex   +++|
09457  M00S04978.resex   +++|
09458  M00S04979.resex   +++|          QUAL   PER
09459  M00S04980.resex   +++|
Line S04981 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09460  M01S04981.274l797 ---| ARG      ERRMSG 1,(ARGUMENT ERROR.)
09461  M01S04982.274l797 ---| AXD      ERRMSG 11,(JSQN ASSIGNS EXCEED DEMANDS.)
09462  M01S04983.274l797 ---| CIO      ERRMSG 6,(CIO ERROR.)
Line S04984 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09463  M02S04984.274l797 ---| CCI      ERRMSG 23,(ILLEGAL CONTROL CARD.)
Line S00052 Modification History
M01 (Added by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09464  M02S00052.274l797 ---| CCI      ERRMSG 23,(INCORRECT COMMAND.)
Line S00043 Modification History
M01 (Added by) resex27
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09465  M02S00043.274l797 ---| CEO      ERRMSG 55,(CIO ERROR NN ON FILENAM.     )
Line S04985 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09466  M01S04985.274l797 ---| CRT      ERRMSG 32,(CONFLICTING RESOURCE TYPES.)
09467  M01S04986.274l797 ---| DEC      ERRMSG 33,(NT DENSITY CONFLICT.)
09468  M01S04987.274l797 ---| DEX      ERRMSG 2,(DEMAND EXCEEDED.)
09469  M01S04988.274l797 ---| DFE      ERRMSG 3,(DEMAND FILE ERROR.)
09470  M01S04989.274l797 ---| DRC      ERRMSG 34,(NT DRIVE CONFLICT.)
09471  M01S04990.274l797 ---| DVE      ERRMSG 5,(DEMAND VALIDATION ERROR.)
Line S04991 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09472  M02S04991.274l797 ---| IEQ      ERRMSG 37,(ILLEGAL EQUIPMENT.)
Line S00420 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
M03 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09473  M03S00420.274l797 ---| IAL      ERRMSG 53,(ILLEGAL ACCESS LEVEL FOR EQUIPMENT.)
Line S00053 Modification History
M01 (Added by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09474  M02S00053.274l797 ---| IEQ      ERRMSG 37,(INCORRECT EQUIPMENT.)
09475  M02S00054.274l797 ---| IAL      ERRMSG 53,(INCORRECT ACCESS LEVEL FOR EQUIPMENT.)
Line S04992 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09476  M01S04992.274l797 ---| ILF      ERRMSG 22,(FORMAT REQUIRES UNLABELED TAPE.)
09477  M01S04993.274l797 ---| IMA      ERRMSG 7,(IMPROPER ACCESSIBILITY.)
Line S04994 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09478  M02S04994.274l797 ---| IRC      ERRMSG 36,(ILLEGAL RESOURCE COUNT.)
Line S00055 Modification History
M01 (Added by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09479  M02S00055.274l797 ---| IRC      ERRMSG 36,(INCORRECT RESOURCE COUNT.)
Line S04995 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09480  M01S04995.274l797 ---| IRS      ERRMSG 4,(INSUFFICIENT RESOURCES ON SYSTEM.)
Line S04996 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09481  M02S04996.274l797 ---| IUA      ERRMSG 8,(ILLEGAL USER ACCESS.)
09482  M02S04997.274l797 ---| IXC      ERRMSG 9,(ILLEGAL EXTERNAL CALL.)
Line S00056 Modification History
M01 (Added by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09483  M02S00056.274l797 ---| IUA      ERRMSG 8,(USER ACCESS NOT VALID.)
09484  M02S00057.274l797 ---| IXC      ERRMSG 9,(INCORRECT EXTERNAL CALL.)
Line S04998 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09485  M01S04998.274l797 ---| RPO      ERRMSG 10,(REMOVABLE PACKS OVERCOMMITMENT.)
Line S04999 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09486  M02S04999.274l797 ---| MAG      ERRMSG 20,(MAGNET NOT ACTIVE.)
Line S00058 Modification History
M01 (Added by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09487  M02S00058.274l797 ---| MAG      ERRMSG 20,(MAGNETIC TAPE SUBSYSTEM NOT ACTIVE.)
Line S05000 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09488  M01S05000.274l797 ---| MAR      ERRMSG 28,(JSQN MISSING RESOURCE.)
09489  M01S05001.274l797 ---| MDE      ERRMSG 29,(MISSING DEMAND FILE ENTRY.)
09490  M01S05002.274l797 ---| MNC      ERRMSG 15,(MT/NT CONFLICT.)
09491  M01S05003.274l797 ---| MVE      ERRMSG 35,(MISSING VSN OR EQUIPMENT ASSIGNMENT.)
09492  M01S05004.274l797 ---| NSC      ERRMSG 25,(RESOURCE NEGATIVE SHARE COUNT.)
Line S00421 Modification History
M01 (Added by) ns22000
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09493  M02S00421.274l797 ---| NVA      ERRMSG 52,(NOT VALIDATED FOR REQUESTED ACCESS LEVEL.)
Line S00006 Modification History
M01 (Added by) resex38
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09494  M02S00006.274l797 ---| POC      ERRMSG 58,(PROCESSING OPTION CONFLICT.)
Line S05005 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09495  M01S05005.274l797 ---| PTL      ERRMSG 38,(PRIOR TAPE ASSIGNMENT LOST.)
09496  M01S05006.274l797 ---| RDE      ERRMSG 12,(RESOURCE DEMAND ERROR.)
09497  M01S05007.274l797 ---| REV      ERRMSG 13,(RESOURCE ENVIRONMENT ERROR.)
09498  M01S05008.274l797 ---| RFE      ERRMSG 14,(RESOURCE PF ERROR          .)
Line S00503 Modification History
M01 (Added by) 253l688
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09499  M02S00503.274l797 ---| RIE      ERRMSG 57,(RESEX ABORT - INTERNAL ERROR.)
Line S05009 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09500  M01S05009.274l797 ---| ROT      ERRMSG 39,(RESEX ABORT - OPERATOR TERMINATION.)
09501  M01S05010.274l797 ---| RRL      ERRMSG 40,(RESEX ABORT - SYSTEM RESOURCE LIMIT.)
09502  M01S05011.274l797 ---| RTE      ERRMSG 16,(RESOURCE TYPE ERROR.)
09503  M01S05012.274l797 ---| RTI      ERRMSG 41,(RESEX ABORT - TERMINAL INTERRUPT.)
Line S00245 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09504  M02S00245.274l797 ---| RTM      ERRMSG 42,(RESEX ABORT - TAPE MANAGER.)
Line S05013 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09505  M01S05013.274l797 ---| SCE      ERRMSG 17,(SYSTEM ERROR.)
09506  M01S05014.274l797 ---| SFE      ERRMSG 26,(RESOURCE SCRATCH FILE ERROR.)
Line S00504 Modification History
M01 (Added by) 253l688
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09507  M02S00504.274l797 ---| SRF      ERRMSG 56,(STAGE REQUEST FILE ERROR.)
Line S05015 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09508  M01S05015.274l797 ---| STE      ERRMSG 24,(SHARE TABLE ERROR.)
09509  M01S05016.274l797 ---| STM      ERRMSG 27,(JSQN SHARE TABLE MISMATCH.)
09510  M01S05017.274l797 ---| TAE      ERRMSG 31,(TOTAL ASSIGNED COUNT ERROR.)
09511  M01S05018.274l797 ---| TBE      ERRMSG 18,(TAPE BLOCK DEFINITION ERROR.)
09512  M01S05019.274l797 ---| TDE      ERRMSG 30,(TOTAL DEMAND COUNT ERROR.)
Line S00422 Modification History
M01 (Added by) ns22000
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09513  M02S00422.274l797 ---| UAL      ERRMSG 54,(UNKNOWN ACCESS LEVEL NAME.)
Line S05020 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09514  M01S05020.274l797 ---| VFE      ERRMSG 21,(VSN FILE ERROR.)
09515  M01S05021.274l797 ---| WEQ      ERRMSG 19,(EQUIPMENT NOT AVAILABLE.)
Line S00423 Modification History
M01 (Added by) ns22000
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09516  M02S00423.274l797 ---| WUT      ERRMSG 51,(NOT VALIDATED FOR WRITING UNLABELED TAPES.)
Line S05022 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09517  M01S05022.274l797 ---|
Line S01326 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09518  M01S01326.274l797 +++| ARG      DATA   C* ARGUMENT ERROR.*
09519  M01S01327.274l797 +++| AXD      DATA   C* JJJJ ASSIGNS EXCEED DEMANDS.*
09520  M01S01328.274l797 +++| CCI      DATA   C* INCORRECT COMMAND.*
09521  M01S01329.274l797 +++| CIO      DATA   C* CIO ERROR.*
09522  M01S01330.274l797 +++| CRT      DATA   C* CONFLICTING RESOURCE TYPES.*
09523  M01S01331.274l797 +++| DEC      DATA   C* NT DENSITY CONFLICT.*
09524  M01S01332.274l797 +++| DEX      DATA   C* DEMAND EXCEEDED.*
09525  M01S01333.274l797 +++| DFE      DATA   C* DEMAND FILE ERROR.*
09526  M01S01334.274l797 +++| DRC      DATA   C* NT DRIVE CONFLICT.*
09527  M01S01335.274l797 +++| DVE      DATA   C* DEMAND VALIDATION ERROR.*
09528  M01S01336.274l797 +++| EQN      DATA   C* EQUIPMENT NOT AVAILABLE.*
09529  M01S01337.274l797 +++| FCL      DATA   C* FRAME COUNT TOO LARGE.*
09530  M01S01338.274l797 +++| FCS      DATA   C* FRAME COUNT TOO SMALL.*
09531  M01S01339.274l797 +++| FRU      DATA   C* FORMAT REQUIRES UNLABELED TAPE.*
09532  M01S01340.274l797 +++| IAL      DATA   C* INCORRECT ACCESS LEVEL FOR EQUIPMENT.*
09533  M01S01341.274l797 +++| ICD      DATA   C* INCORRECT CONVERSION MODE FOR TAPE DEVICE TYPE.*
09534  M01S01342.274l797 +++| ICM      DATA   C* INCORRECT CONVERSION MODE.*
09535  M01S01343.274l797 +++| IDD      DATA   C* INCORRECT DENSITY FOR TAPE DEVICE TYPE.*
09536  M01S01344.274l797 +++| IDF      DATA   C* INCORRECT DENSITY FOR FORMAT.*
09537  M01S01345.274l797 +++| IDN      DATA   C* INCORRECT DENSITY.*
09538  M01S01346.274l797 +++| IEF      DATA   C* INCORRECT END OF TAPE OPTION FOR FORMAT.*
09539  M01S01347.274l797 +++| IEQ      DATA   C* INCORRECT EQUIPMENT.*
09540  M01S01348.274l797 +++| ILC      DATA   C* INCORRECT LFM CALL.*
Line S01349 Modification History
M01 (Added by) 274l797
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09541  M02S01349.282l826 ---| IMA      DATA   C* IMPROPER ACCESSIBILITY.*
Line S01350 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09542  M01S01350.274l797 +++| IRC      DATA   C* INCORRECT RESOURCE COUNT.*
09543  M01S01351.274l797 +++| IRT      DATA   C* INCORRECT RESOURCE TYPE.*
09544  M01S01352.274l797 +++| IRS      DATA   C* INSUFFICIENT RESOURCES ON SYSTEM.*
09545  M01S01353.274l797 +++| ITF      DATA   C* INCORRECT TAPE FORMAT.*
09546  M01S01354.274l797 +++| MAG      DATA   C* MAGNETIC TAPE SUBSYSTEM NOT ACTIVE.*
09547  M01S01355.274l797 +++| MAR      DATA   C* JJJJ MISSING RESOURCE.*
09548  M01S01356.274l797 +++| MDE      DATA   C* MISSING DEMAND FILE ENTRY.*
09549  M01S01357.274l797 +++| MET      DATA   C* MULIPLE END OF TAPE OPTIONS SELECTED.*
09550  M01S01358.274l797 +++| MVE      DATA   C* MISSING VSN OR EQUIPMENT ASSIGNMENT.*
Line S00744 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09551  M01S00744.282l826 +++| NAL      DATA   C* VSN ?????? NOT IN ACS LIBRARY.*
Line S01359 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09552  M01S01359.274l797 +++| NSL      DATA   C* NOISE SIZE TOO LARGE.*
Line S00745 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09553  M01S00745.282l826 +++| NRA      DATA   C* VSN ?????? NOT IN REQUESTED ACS.*
Line S01360 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09554  M01S01360.274l797 +++| NVA      DATA   C* NOT VALIDATED FOR REQUESTED ACCESS LEVEL.*
09555  M01S01361.274l797 +++| NVS      DATA   C* NO VSN SPECIFIED ON ACS TAPE REQUEST.*
09556  M01S01362.274l797 +++| NVU      DATA   C* NOT VALIDATED FOR WRITING UNLABELED TAPES.*
09557  M01S01363.274l797 +++| PTL      DATA   C* PRIOR TAPE ASSIGNMENT LOST.*
09558  M01S01364.274l797 +++| RDE      DATA   C* RESOURCE DEMAND ERROR.*
09559  M01S01365.274l797 +++| REV      DATA   C* RESOURCE ENVIRONMENT ERROR.*
09560  M01S01366.274l797 +++| RFE      DATA   C* RESOURCE PF ERROR NN FFFFFF.*
09561  M01S01367.274l797 +++| RIE      DATA   C* RESEX ABORT - INTERNAL ERROR.*
09562  M01S01368.274l797 +++| RNS      DATA   C* RESOURCE NEGATIVE SHARE COUNT.*
09563  M01S01369.274l797 +++| ROT      DATA   C* RESEX ABORT - OPERATOR TERMINATION.*
09564  M01S01370.274l797 +++| RPO      DATA   C* REMOVABLE PACKS OVERCOMMITMENT.*
09565  M01S01371.274l797 +++| RRL      DATA   C* RESEX ABORT - SYSTEM RESOURCE LIMIT.*
09566  M01S01372.274l797 +++| RSF      DATA   C* RESOURCE SCRATCH FILE ERROR.*
09567  M01S01373.274l797 +++| RTI      DATA   C* RESEX ABORT - TERMINAL INTERRUPT.*
09568  M01S01374.274l797 +++| RTM      DATA   C* RESEX ABORT - TAPE MANAGER.*
09569  M01S01375.274l797 +++| SCE      DATA   C* SYSTEM ERROR.*
09570  M01S01376.274l797 +++| SRF      DATA   C* STAGE REQUEST FILE ERROR.*
09571  M01S01377.274l797 +++| STE      DATA   C* SHARE TABLE ERROR.*
09572  M01S01378.274l797 +++| STM      DATA   C* JJJJ SHARE TABLE MISMATCH.*
09573  M01S01379.274l797 +++| TAE      DATA   C* TOTAL ASSIGNED COUNT ERROR.*
09574  M01S01380.274l797 +++| TDC      DATA   C* TAPE DEVICE TYPE CONFLICT.*
09575  M01S01381.274l797 +++| TDE      DATA   C* TOTAL DEMAND COUNT ERROR.*
09576  M01S01382.274l797 +++| UAL      DATA   C* UNKNOWN ACCESS LEVEL NAME.*
09577  M01S01383.274l797 +++| UAV      DATA   C* USER ACCESS NOT VALID.*
Line S00746 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09578  M01S00746.282l826 +++| UOL      DATA   C* VSN ?????? UNREADABLE OPTICAL LABEL.*
Line S01384 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09579  M01S01384.274l797 +++| VFE      DATA   C* VSN FILE ERROR.*
09580  M01S01385.274l797 +++| WED      DATA   C* WRITE ENABLE AND DISABLE OPTIONS BOTH SELECTED.*
09581  M00S05023.resex   +++|          QUAL   *
09582  M00S05024.resex   +++| PRO      SPACE  4,15
09583  M00S05025.resex   +++|**        PRO - PROCESS TIMED EVENT ROLLOUT.
09584  M00S05026.resex   +++|*
Line S05027 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09585  M01S05027.282l826 ---|*         ENTRY  (X1) = ROLLOUT MESSAGE ADDRESS.
09586  M01S05028.282l826 ---|*                     = VSN OR PACKNAME MASK AND COMPLEMENT OF
09587  M01S05029.282l826 ---|*                       MESSAGE ADDRESS IF VSN OR PACKNAME AND
09588  M01S05030.282l826 ---|*                       RESOURCE TYPE NEEDED IN MESSAGE.
Line S00747 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09589  M01S00747.282l826 +++|*         ENTRY  (X1) = ROLLOUT MESSAGE ADDRESS IF .GT. 0.
09590  M01S00748.282l826 +++|*                     = COMPLEMENT OF MESSAGE ADDRESS IF WAITING FOR
09591  M01S00749.282l826 +++|*                       PACK OR VSN MESSAGE.
09592  M00S05031.resex   +++|*                (X5) = TIMED/EVENT ROLLOUT DESCRIPTOR ADDRESS.
09593  M00S05032.resex   +++|*
09594  M00S05033.resex   +++|*         CALLS  BWM.
09595  M00S05034.resex   +++|*
09596  M00S05035.resex   +++|*         MACROS MESSAGE, REWIND, ROLLOUT.
09597  M00S05036.resex   +++|
09598  M00S05037.resex   +++|
09599  M00S05038.resex   +++| PRO      SUBR               ENTRY/EXIT
09600  M00S05039.resex   +++|          PL     X1,PRO1     IF NOT WAITING FOR TAPE/PACK MESSAGE
09601  M00S05040.resex   +++|          RJ     BWM         BUILD MESSAGE
09602  M00S05041.resex   +++| PRO1     MESSAGE X1,2,R     ISSUE ROLLOUT MESSAGE
09603  M00S05042.resex   +++|          ROLLOUT X5         PERFORM TIMED/EVENT ROLLOUT
09604  M00S05043.resex   +++|          REWIND S1,R        GUARANTEE ROLLOUT COMPLETE
09605  M00S05044.resex   +++|          MESSAGE PROA,2,R   CLEAR ROLLOUT MESSAGE
09606  M00S05045.resex   +++|          EQ     PROX        RETURN
09607  M00S05046.resex   +++|
09608  M00S05047.resex   +++|
09609  M00S05048.resex   +++| PROA     CON    0
Line S05049 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09610  M01S05049.282l826 ---| PTI      SPACE  4,15
Line S00750 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09611  M01S00750.282l826 +++| PIT      SPACE  4,15
09612  M00S05050.resex   +++|**        PIT - PROCESS INTERRUPT.
09613  M00S05051.resex   +++|*
09614  M00S05052.resex   +++|*         ENTRY  AT *PIT2*, IF ALL RETRIES OF DEMAND FILE ATTACH
09615  M00S05053.resex   +++|*                FAILED.
09616  M00S05054.resex   +++|*
09617  M00S05055.resex   +++|*         EXIT   TO *PER*.
09618  M00S05056.resex   +++|*
09619  M00S05057.resex   +++|*         USES   A - 1, 6.
09620  M00S05058.resex   +++|*                B - 2.
09621  M00S05059.resex   +++|*                X - 1, 5, 6.
09622  M00S05060.resex   +++|*
09623  M00S05061.resex   +++|*         CALLS  BPD, CUP, IDE, RDF, UDF.
09624  M00S05062.resex   +++|*
09625  M00S05063.resex   +++|*         MACROS INTRC, MOVE.
09626  M00S05064.resex   +++|
09627  M00S05065.resex   +++|
09628  M00S05066.resex   +++| PIT      BSS    0           ENTRY
09629  M00S05067.resex   +++|          INTRC  OFF         DISABLE INTERRUPT
09630  M00S05068.resex   +++|          SA1    UCRI        CHECK FOR DEMAND FILE CLEAN-UP REQUIRED
09631  M00S05069.resex   +++|          SX6    X1+B1
09632  M00S05070.resex   +++|          BX7    X7-X7
09633  M00S05071.resex   +++|          PL     X6,PIT1     IF NO DEMAND FILE CLEAN-UP REQUIRED
09634  M00S05072.resex   +++|
09635  M00S05073.resex   +++|*         CLEAR PREVIEW DATA AND DECREMENT ASSIGN COUNT.
09636  M00S05074.resex   +++|
Line S05075 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09637  M01S05075.282l826 ---|          SA7    RESB+RQPD   CLEAR PREVIEW DATA
Line S00751 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09638  M01S00751.282l826 +++|          SA7    RESB+RREQ   CLEAR MOUNT REQUEST
09639  M00S05076.resex   +++|          SA6    A1          INDICATE UPDATE IS REQUIRED
09640  M00S05077.resex   +++|          RJ     CUP         CLEAN-UP DEMAND FILE ENTRY
09641  M00S05078.resex   +++|          EQ     PIT2        PROCESS ERROR
09642  M00S05079.resex   +++|
09643  M00S05080.resex   +++| PIT1     SA1    PVDC        CHECK FOR PREVIEW DISPLAY CLEAN-UP
09644  M00S05081.resex   +++|          ZR     X1,PIT2     IF NO PREVIEW DATA
09645  M00S05082.resex   +++|
09646  M00S05083.resex   +++|*         CLEAR PREVIEW DATA IN DEMAND FILE AND REBUILD PREVIEW
09647  M00S05084.resex   +++|*         DISPLAY.
09648  M00S05085.resex   +++|
09649  M00S05086.resex   +++|          SX6    DFRC        SET RETRY COUNT FOR DEMAND FILE ATTACH
09650  M00S05087.resex   +++|          SA6    UCRI
09651  M00S05088.resex   +++|          RJ     IDE         INITIALIZE DEMAND ENTRY
09652  M00S05089.resex   +++|          RJ     RDF         READ DEMAND FILE
09653  M00S05090.resex   +++|          MOVE   RDEL,DBUF,RESB  COPY DEMAND FILE ENTRY
Line S05091 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09654  M01S05091.282l826 ---|          SX6    B0          CLEAR PREVIEW DATA
Line S00752 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09655  M01S00752.282l826 +++|          SX6    B0          CLEAR MOUNT REQUEST
09656  M00S05092.resex   +++|          BX5    X5-X5       SET NO DEMAND FILE RETURN
Line S05093 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09657  M01S05093.282l826 ---|          SA6    RESB+RQPD
Line S00753 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09658  M01S00753.282l826 +++|          SA6    RESB+RREQ
09659  M00S05094.resex   +++|          RJ     UDF         UPDATE DEMAND FILE
09660  M00S05095.resex   +++|          RJ     BPD         BUILD PREVIEW DISPLAY
09661  M00S05096.resex   +++| PIT2     SA1    RPVA        GET REPRIEVED ERROR MESSAGE ADDRESS
09662  M00S05097.resex   +++|          SB2    X1+
09663  M00S05098.resex   +++|          EQ     PER         PROCESS ERROR
09664  M00S05099.resex   +++| RPV      SPACE  4,15
09665  M00S05100.resex   +++|**        RPV - REPRIEVE PROCESSOR.
09666  M00S05101.resex   +++|*
09667  M00S05102.resex   +++|*         EXIT   RESUMES EXECUTION WHERE INTERRUPTED, IF TERMINAL
Line S05103 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09668  M01S05103.253l688 ---|*                USER BREAK 1.
Line S00001 Modification History
M01 (Added by) resex12
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09669  M02S00001.253l688 ---|*                RE-ENBLES SRU ACCUMULATION AND RESETS ERROR FLAG IF
09670  M02S00002.253l688 ---|*                PP ABORT.
Line S00505 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09671  M01S00505.253l688 +++|*                  USER BREAK ONE.
Line S00506 Modification History
M01 (Added by) 253l688
M02 (Removed by) resex32
Seq #  *Modification Id* Act 
----------------------------+
09672  M02S00506.resex32 ---|*                TO *PIT* TO PROCESS ERROR, IF *CPU ERROR EXIT*,
09673  M02S00507.resex32 ---|*                  *PP CALL ERROR*, OR *PP ABORT*.
Line S00001 Modification History
M01 (Added by) resex32
Seq #  *Modification Id* Act 
----------------------------+
09674  M01S00001.resex32 +++|*                TO *PIT* TO PROCESS ERROR, IF *CPU ERROR EXIT*
09675  M01S00002.resex32 +++|*                  OR *PP CALL ERROR*.
Line S00508 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09676  M01S00508.253l688 +++|*                TO *PIT* TO PROCESS INTERRUPT, IF INTERRUPT IS
09677  M01S00509.253l688 +++|*                  ENABLED.
Line S00003 Modification History
M01 (Added by) resex32
Seq #  *Modification Id* Act 
----------------------------+
09678  M01S00003.resex32 +++|*                RE-ENBLES SRU ACCUMULATION AND RESETS ERROR FLAG,
09679  M01S00004.resex32 +++|*                  IF *PP ABORT*.
09680  M00S05104.resex   +++|*                RESUMES PRIOR EXECUTION IN INTERRUPT HANDLER MODE,
Line S05105 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09681  M01S05105.253l688 ---|*                IF INTERRUPT PROCESSING IS DISABLED.
09682  M01S05106.253l688 ---|*                TO *PIT* FOR PROCESSING INTERRUPT, IF INTERRUPT IS
09683  M01S05107.253l688 ---|*                ENABLED.
Line S00510 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09684  M01S00510.253l688 +++|*                  IF INTERRUPT PROCESSING IS DISABLED.
09685  M00S05108.resex   +++|*
09686  M00S05109.resex   +++|*         USES   A - 1, 2, 6, 7.
09687  M00S05110.resex   +++|*                X - 1, 2, 6, 7.
09688  M00S05111.resex   +++|*
Line S05112 Modification History
M01 (Removed by) resex12
Seq #  *Modification Id* Act 
----------------------------+
09689  M01S05112.resex12 ---|*         MACROS REPRIEVE.
Line S00003 Modification History
M01 (Added by) resex12
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09690  M02S00003.253l688 ---|*         MACROS RENSR, REPRIEVE.
Line S00511 Modification History
M01 (Added by) 253l688
M02 (Removed by) resex32
Seq #  *Modification Id* Act 
----------------------------+
09691  M02S00511.resex32 ---|*         MACROS REPRIEVE.
Line S00005 Modification History
M01 (Added by) resex32
Seq #  *Modification Id* Act 
----------------------------+
09692  M01S00005.resex32 +++|*         MACROS RENSR, REPRIEVE.
09693  M00S05113.resex   +++|
09694  M00S05114.resex   +++|
09695  M00S05115.resex   +++| RPV      BSS    0           ENTRY
Line S00512 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09696  M01S00512.253l688 +++|
09697  M01S00513.253l688 +++|*         IGNORE USER BREAK ONE.
09698  M01S00514.253l688 +++|
09699  M00S05116.resex   +++|          SA1    RPVB+/COMSRPV/OSEF  CHECK ERROR FLAG
09700  M00S05117.resex   +++|          MX6    -12
09701  M00S05118.resex   +++|          BX1    -X6*X1
09702  M00S05119.resex   +++|          SX1    X1-TIET
09703  M00S05120.resex   +++|          NZ     X1,RPV1     IF NOT TERMINAL USER BREAK 1
Line S05121 Modification History
M01 (Removed by) resex12
Seq #  *Modification Id* Act 
----------------------------+
09704  M01S05121.resex12 ---|          REPRIEVE  RPVB,RESUME,214B  RESUME PRIOR EXECUTION
Line S00004 Modification History
M01 (Added by) resex12
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09705  M02S00004.253l688 ---|          REPRIEVE  RPVB,RESUME,234B  RESUME PRIOR EXECUTION
Line S00515 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09706  M01S00515.253l688 +++|          REPRIEVE  RPVB,RESUME,237B  RESUME PRIOR EXECUTION
09707  M01S00516.253l688 +++|
09708  M01S00517.253l688 +++|*         CHECK ERROR CLASS.
09709  M00S05122.resex   +++|
09710  M00S05123.resex   +++| RPV1     SA1    RPVB+/COMSRPV/ERCL  CHECK ERROR CLASS
09711  M00S05124.resex   +++|          SX6    /PER/RTI    SET TERMINAL INTERRUPT MESSAGE
09712  M00S05125.resex   +++|          LX1    59-19
09713  M00S05126.resex   +++|          MX7    18
09714  M00S05127.resex   +++|          NG     X1,RPV2     IF TERMINAL INTERRUPT
09715  M00S05128.resex   +++|          LX1    59-15-59+19
09716  M00S05129.resex   +++|          SX6    /PER/ROT    SET OPERATOR TERMINATION MESSAGE
09717  M00S05130.resex   +++|          NG     X1,RPV2     IF OPERATOR TERMINATION
09718  M00S05131.resex   +++|          SX6    /PER/RRL    SET RESOURCE LIMIT
Line S00005 Modification History
M01 (Added by) resex12
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09719  M02S00005.253l688 ---|          LX1    59-16-59+15
09720  M02S00006.253l688 ---|          PL     X1,RPV2     IF NOT PP ABORT
09721  M02S00007.253l688 ---|          RENSR  /COMSSRU/IARX  REENABLE SRU ACCUMULATION
09722  M02S00008.253l688 ---|          REPRIEVE  RPVB,RESET,0   RESET ERROR FLAG
Line S00518 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09723  M01S00518.253l688 +++|          LX1    59-14-59+15
09724  M01S00519.253l688 +++|          NG     X1,RPV2     IF RESOURCE LIMIT
Line S00006 Modification History
M01 (Added by) resex32
Seq #  *Modification Id* Act 
----------------------------+
09725  M01S00006.resex32 +++|          LX1    59-16-59+14
09726  M01S00007.resex32 +++|          PL     X1,RPV1.1   IF NOT PP ABORT
09727  M01S00008.resex32 +++|          RENSR  /COMSSRU/IARX  REENABLE SRU ACCUMULATION
09728  M01S00009.resex32 +++|          REPRIEVE  RPVB,RESET,0   RESET ERROR FLAG
Line S00520 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09729  M01S00520.253l688 +++|
Line S00521 Modification History
M01 (Added by) 253l688
M02 (Removed by) resex32
Seq #  *Modification Id* Act 
----------------------------+
09730  M02S00521.resex32 ---|*         PROCESS *CPU ERROR EXIT*, *PP ABORT*, AND *PP CALL ERROR*.
Line S00010 Modification History
M01 (Added by) resex32
Seq #  *Modification Id* Act 
----------------------------+
09731  M01S00010.resex32 +++|*         PROCESS *CPU ERROR EXIT* AND *PP CALL ERROR*.
Line S00522 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09732  M01S00522.253l688 +++|
Line S00523 Modification History
M01 (Added by) 253l688
M02 (Removed by) resex32
Seq #  *Modification Id* Act 
----------------------------+
09733  M02S00523.resex32 ---|          SX6    /PER/RIE    SET INTERNAL ERROR
Line S00011 Modification History
M01 (Added by) resex32
Seq #  *Modification Id* Act 
----------------------------+
09734  M01S00011.resex32 +++| RPV1.1   SX6    /PER/RIE    SET INTERNAL ERROR
Line S00524 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09735  M01S00524.253l688 +++|          SA6    RPVA
09736  M01S00525.253l688 +++|          EQ     RPV3        PROCESS ERROR
09737  M01S00526.253l688 +++|
09738  M01S00527.253l688 +++|*         PROCESS OPERATOR INTERRUPT / RESOURCE LIMIT.
Line S00009 Modification History
M01 (Added by) resex12
Seq #  *Modification Id* Act 
----------------------------+
09739  M01S00009.resex12 +++|
09740  M00S05132.resex   +++| RPV2     SA6    RPVA        SET INTERRUPT INDICATOR
09741  M00S05133.resex   +++|          SA1    RPVC        CHECK FOR INTERRUPT INHIBITED
09742  M00S05134.resex   +++|          ZR     X1,RPV3     IF CONTROL RETURN NOT REQUIRED
Line S05135 Modification History
M01 (Removed by) resex12
Seq #  *Modification Id* Act 
----------------------------+
09743  M01S05135.resex12 ---|          REPRIEVE  RPVB,IRESUME,214B  RESUME PRIOR EXECUTION
Line S00010 Modification History
M01 (Added by) resex12
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09744  M02S00010.253l688 ---|          REPRIEVE  RPVB,IRESUME,234B  RESUME PRIOR EXECUTION
Line S00528 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09745  M01S00528.253l688 +++|          REPRIEVE  RPVB,IRESUME,237B  RESUME PRIOR EXECUTION
09746  M00S05136.resex   +++|
Line S05137 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09747  M01S05137.253l688 ---| RPV3     SA1    F           GUARANTEE FETS COMPLETE
Line S00529 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09748  M01S00529.253l688 +++| RPV3     SA1    F           GUARANTEE ALL FETS COMPLETE
09749  M00S05138.resex   +++|          SX7    B1
09750  M00S05139.resex   +++|          BX6    X1+X7
09751  M00S05140.resex   +++|          SA2    D
09752  M00S05141.resex   +++|          SA6    A1
09753  M00S05142.resex   +++|          BX6    X2+X7
09754  M00S05143.resex   +++|          SA1    V
09755  M00S05144.resex   +++|          SA6    A2
Line S05145 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09756  M01S05145.253l688 ---|          BX7    X1+X7
09757  M01S05146.253l688 ---|          SA7    A1
Line S00530 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09758  M01S00530.253l688 +++|          BX6    X1+X7
09759  M01S00531.253l688 +++|          SA2    R
09760  M01S00532.253l688 +++|          SA6    A1
09761  M01S00533.253l688 +++|          BX7    X2+X7
09762  M01S00534.253l688 +++|          SA7    A2
09763  M00S05147.resex   +++|          EQ     PIT         PROCESS INTERRUPT
09764  M00S05148.resex   +++|
09765  M00S05149.resex   +++|
09766  M00S05150.resex   +++| RPVA     CON    0           INTERRUPT FLAG (ERROR MESSAGE ADDRESS)
09767  M00S05151.resex   +++|
09768  M00S05152.resex   +++| RPVB     BSS    0           REPRIEVE PROCESSING PARAMETER BLOCK
09769  M00S05153.resex   +++|          VFD    36/0,12/RPVBL,12/0
09770  M00S05154.resex   +++|          VFD    30/0,30/RPV
09771  M00S05155.resex   +++|          BSSZ   7
09772  M00S05156.resex   +++|          BSSZ   16          EXCHANGE PACKAGE
09773  M00S05157.resex   +++| RPVBL    EQU    *-RPVB
09774  M00S05158.resex   +++|
09775  M00S05159.resex   +++| RPVC     CON    0           CONTROL RETURN REQUIRED INDICATOR
09776  M00S05160.resex   +++| RSB      SPACE  4,15
09777  M00S05161.resex   +++|**        RSB - MAKE RSB REQUEST.
09778  M00S05162.resex   +++|*
09779  M00S05163.resex   +++|*         ENTRY  (X1) = SUBSYSTEM IDENTIFICATION.
09780  M00S05164.resex   +++|*                (X5) = WORD COUNT.
09781  M00S05165.resex   +++|*                (X6) = ADDRESS TO SEND TO.
09782  M00S05166.resex   +++|*                (X7) = ADDRESS FROM.
09783  M00S05167.resex   +++|*
09784  M00S05168.resex   +++|*         USES   A - 2, 7.
09785  M00S05169.resex   +++|*                X - 1, 2, 5, 6, 7.
09786  M00S05170.resex   +++|*
09787  M00S05171.resex   +++|*         CALLS  SYS=.
09788  M00S05172.resex   +++|
09789  M00S05173.resex   +++|
09790  M00S05174.resex   +++| RSB      SUBR               ENTRY/EXIT
09791  M00S05175.resex   +++|          SA2    RSBA
09792  M00S05176.resex   +++|          LX5    36
09793  M00S05177.resex   +++|          BX6    X6+X5
09794  M00S05178.resex   +++|          LX7    18
09795  M00S05179.resex   +++|          BX7    X7+X6
09796  M00S05180.resex   +++|          LX1    18
09797  M00S05181.resex   +++|          BX6    X1+X2
09798  M00S05182.resex   +++|          SA7    X6
09799  M00S05183.resex   +++|          RJ     =XSYS=
09800  M00S05184.resex   +++|          EQ     RSBX        RETURN
09801  M00S05185.resex   +++|
09802  M00S05186.resex   +++|
09803  M00S05187.resex   +++| RSBA     VFD    18/3LRSB,12/2000B,12/0,18/SS  RSB CALL SKELETON
Line S00754 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09804  M01S00754.282l826 +++| SPM      SPACE  4,10
09805  M01S00755.282l826 +++|**        SPM - SET PREVIEW DISPLAY MESSAGE.
09806  M01S00756.282l826 +++|*
09807  M01S00757.282l826 +++|*         ENTRY  (X6) = *COMSRSX* MESSAGE CODE.
09808  M01S00758.282l826 +++|*
09809  M01S00759.282l826 +++|*         EXIT   MESSAGE CODE SET IN PREVIEW DATA.
09810  M01S00760.282l826 +++|*
09811  M01S00761.282l826 +++|*         USES   X - 1, 6, 7.
09812  M01S00762.282l826 +++|*                A - 1, 6.
09813  M01S00763.282l826 +++|
09814  M01S00764.282l826 +++|
09815  M01S00765.282l826 +++| SPM      SUBR               ENTRY/EXIT
09816  M01S00766.282l826 +++|          SX7    X6-MXPN
09817  M01S00767.282l826 +++|          NG     X7,SPM1     IF NOT EST ORDINAL MESSAGE
09818  M01S00768.282l826 +++|          SA1    AV
09819  M01S00769.282l826 +++|          SA1    X1+         GET *EVSB* ENTRY
09820  M01S00770.282l826 +++|          MX7    9
09821  M01S00771.282l826 +++|          BX1    X7*X1       EST ORDINAL
09822  M01S00772.282l826 +++|          LX1    -3
09823  M01S00773.282l826 +++|          BX6    X6+X1       MERGE ERROR CODE AND EST ORDINAL
09824  M01S00774.282l826 +++| SPM1     SA1    RESB+RQPV+PFLG
09825  M01S00775.282l826 +++|          LX6    12
09826  M01S00776.282l826 +++|          MX7    42
09827  M01S00777.282l826 +++|          BX1    X7*X1
09828  M01S00778.282l826 +++|          BX6    X1+X6       SET ERROR AND PARAMETER
09829  M01S00779.282l826 +++|          SA6    A1+
09830  M01S00780.282l826 +++|          EQ     SPMX        RETURN
Line S00246 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
09831  M01S00246.252l678 +++| TMA      SPACE  4,10
Line S00247 Modification History
M01 (Added by) 252l678
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09832  M02S00247.253l688 ---|**        TMA - TMS ABORT PROCESSING.
Line S00535 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09833  M01S00535.253l688 +++|**        TMA - *TMS* ABORT PROCESSING.
Line S00248 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
09834  M01S00248.252l678 +++|*
Line S00249 Modification History
M01 (Added by) 252l678
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09835  M02S00249.253l688 ---|*         EXIT   CALL *TFM* IF TMS IS ENABLED TO CLEAN UP
Line S00536 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09836  M01S00536.253l688 +++|*         EXIT   CALL *TFM* IF *TMS* IS ENABLED TO CLEAN UP
Line S00250 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
09837  M01S00250.252l678 +++|*                THE TAPE CATALOG ON INTERRUPTS OR ABORTS.
09838  M01S00251.252l678 +++|*
09839  M01S00252.252l678 +++|*         USES   X - 1.
09840  M01S00253.252l678 +++|*                A - 1.
09841  M01S00254.252l678 +++|*
09842  M01S00255.252l678 +++|*         MACROS RECALL, TMS.
09843  M01S00256.252l678 +++|
09844  M01S00257.252l678 +++|
09845  M01S00258.252l678 +++| TMA      SUBR               ENTRY/EXIT
09846  M01S00259.252l678 +++|          SA1    TMPF
09847  M01S00260.252l678 +++|          LX1    59-58
Line S00261 Modification History
M01 (Added by) 252l678
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09848  M02S00261.253l688 ---|          PL     X1,TMAX     IF NOT TMS CONTROLLED FILE
Line S00537 Modification History
M01 (Added by) 253l688
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09849  M02S00537.274l797 ---|          PL     X1,TMAX     IF NOT *TMS* CONTROLLED FILE
Line S01386 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09850  M01S01386.274l797 +++|          PL     X1,TMAX     IF NOT *TMS* CONTROLLED REQUEST
Line S00004 Modification History
M01 (Added by) resex39
Seq #  *Modification Id* Act 
----------------------------+
09851  M01S00004.resex39 +++|          SA1    TA
09852  M01S00005.resex39 +++|          NZ     X1,TMAX     IF TAPE ASSIGNED TO *MAGNET*
Line S00262 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
09853  M01S00262.252l678 +++|          RECALL F           WAIT FOR UNLOAD TO COMPLETE
09854  M01S00263.252l678 +++|          TMS    T,RAPS      CALL TAPE MANAGER
09855  M01S00264.252l678 +++|          EQ     TMAX        RETURN
Line S00265 Modification History
M01 (Added by) 252l678
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09856  M02S00265.282l826 ---| WOA      SPACE  4,15
09857  M02S00266.282l826 ---|**        WOA - WAIT FOR OPERATOR ACTION.
09858  M02S00267.282l826 ---|*
09859  M02S00268.282l826 ---|*         ENTRY  (TMPF) = BLANK LABEL AND OPERATOR VERIFY FLAGS.
09860  M02S00269.282l826 ---|*
09861  M02S00270.282l826 ---|*         EXIT   OPERATOR ACTIONS COMPLETED.
09862  M02S00271.282l826 ---|*
Line S00272 Modification History
M01 (Added by) 252l678
M02 (Removed by) resex40
M03 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09863  M03S00272.282l826 ---|*         USES   X - 0, 1, 2, 5, 6, 7.
09864  M03S00273.282l826 ---|*                A - 1, 2, 6.
Line S00001 Modification History
M01 (Added by) resex40
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09865  M02S00001.282l826 ---|*         USES   X - 1, 2, 6, 7.
09866  M02S00002.282l826 ---|*                A - 1, 2.
Line S00274 Modification History
M01 (Added by) 252l678
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09867  M02S00274.282l826 ---|*
Line S00275 Modification History
M01 (Added by) 252l678
M02 (Removed by) resex40
M03 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09868  M03S00275.282l826 ---|*         CALLS  PRO.
Line S00003 Modification History
M01 (Added by) resex40
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09869  M02S00003.282l826 ---|*         CALLS  DLY.
Line S00276 Modification History
M01 (Added by) 252l678
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09870  M02S00276.282l826 ---|*
Line S00277 Modification History
M01 (Added by) 252l678
M02 (Removed by) resex40
M03 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09871  M03S00277.282l826 ---|*         MACROS RDSB.
Line S00004 Modification History
M01 (Added by) resex40
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09872  M02S00004.282l826 ---|*         MACROS RDSB, SETRNR.
Line S00278 Modification History
M01 (Added by) 252l678
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09873  M02S00278.282l826 ---|
09874  M02S00279.282l826 ---| WOA      SUBR               ENTRY/EXIT
09875  M02S00280.282l826 ---|          SA1    TMPF        CHECK FOR BLANK LABELS REQUIRED
09876  M02S00281.282l826 ---|          LX1    59-57
Line S00282 Modification History
M01 (Added by) 252l678
M02 (Removed by) resex40
M03 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09877  M03S00282.282l826 ---|          PL     X1,WOAX     IF NO SECURITY LABELS
Line S00005 Modification History
M01 (Added by) resex40
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09878  M02S00005.282l826 ---|          PL     X1,WOAX     IF NO SECURITY LABELS REQUIRED
09879  M02S00006.282l826 ---|          SETRNR ROLL        ALLOW ROLLOUT
Line S00283 Modification History
M01 (Added by) 252l678
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09880  M02S00283.282l826 ---| WOA1     SA1    AU          GET UDT ADDRESS
09881  M02S00284.282l826 ---|          SX7    X1
09882  M02S00285.282l826 ---|          RDSB   MTSI,/COMSMTX/UNITL,X7,UDT
09883  M02S00286.282l826 ---|          SA2    UDT+/COMSMTX/UTMS
09884  M02S00287.282l826 ---|          SX6    /TFM/WUBL*1S12
09885  M02S00288.282l826 ---|          BX6    X6*X2
Line S00289 Modification History
M01 (Added by) 252l678
M02 (Removed by) resex40
M03 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09886  M03S00289.282l826 ---|          ZR     X6,WOAX     IF SECURITY LABELS
09887  M03S00290.282l826 ---|          SX5    WFOA        WAIT FOR OPERATOR ACTION
09888  M03S00291.282l826 ---|          SA1    X5+         MERGE EQUIPMENT NUMBER INTO EVENT
09889  M03S00292.282l826 ---|          SA2    UDT+/COMSMTX/UST4
09890  M03S00293.282l826 ---|          MX6    48
09891  M03S00294.282l826 ---|          AX2    6
09892  M03S00295.282l826 ---|          LX6    29-11
09893  M03S00296.282l826 ---|          BX1    X6*X1       CLEAR EQUIPMENT NUMBER
09894  M03S00297.282l826 ---|          BX6    -X6*X2      GET EQUIPMENT NUMBER
09895  M03S00298.282l826 ---|          BX6    X6+X1
09896  M03S00299.282l826 ---|          SA6    A1
09897  M03S00300.282l826 ---|          SA1    WFOA+1
09898  M03S00301.282l826 ---|          RJ     PRO         PROCESS ROLLOUT
Line S00007 Modification History
M01 (Added by) resex40
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09899  M02S00007.282l826 ---|          ZR     X6,WOAX     IF SECURITY LABELS WRITTEN
09900  M02S00008.282l826 ---|          RJ     DLY         DELAY FOR TWO SECONDS
Line S00302 Modification History
M01 (Added by) 252l678
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09901  M02S00302.282l826 ---|          EQ     WOA1        CHECK FOR BLANK LABEL WRITTEN
09902  M00S05188.resex   +++| WSB      SPACE  4,10
09903  M00S05189.resex   +++|**        WSB - WRITE SUBSYSTEM BLOCK TO MAGNET.
09904  M00S05190.resex   +++|*
Line S05191 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09905  M01S05191.282l826 ---|*         ENTRY  (X5) = BLOCK ADDRESS.
09906  M01S05192.282l826 ---|*                (X7) = MAGNET BUFFER NUMBER TO SEND TO.
Line S00781 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09907  M01S00781.282l826 +++|*         ENTRY  (X6) = BUFFER ADDRESS.
09908  M01S00782.282l826 +++|*                (X7) = MAGNET BUFFER NUMBER.
09909  M00S05193.resex   +++|*
Line S05194 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09910  M01S05194.282l826 ---|*         USES   A - 1, 7.
09911  M01S05195.282l826 ---|*                X - 1, 5, 6, 7.
Line S00783 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09912  M01S00783.282l826 +++|*         USES   A - 1, 6.
09913  M01S00784.282l826 +++|*                X - 1, 6, 7.
09914  M00S05196.resex   +++|*
09915  M00S05197.resex   +++|*         CALLS  SYS=.
09916  M00S05198.resex   +++|
09917  M00S05199.resex   +++|
09918  M00S05200.resex   +++| WSB      SUBR               ENTRY/EXIT
Line S05201 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09919  M01S05201.282l826 ---|          LX5    18
09920  M00S05202.resex   +++|          SA1    WSBA
Line S05203 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09921  M01S05203.282l826 ---|          LX7    12
09922  M01S05204.282l826 ---|          SX6    MTSI        *MAGNET* SUBSYSTEM IDENTIFICATION
09923  M01S05205.282l826 ---|          BX7    X7+X6
09924  M01S05206.282l826 ---|          LX7    30
09925  M01S05207.282l826 ---|          SA7    X1
09926  M01S05208.282l826 ---|          BX6    X1+X5       MERGE ADDRESS WITH CALL
09927  M01S05209.282l826 ---|          RJ     =XSYS=
Line S00785 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
09928  M01S00785.282l826 +++|          LX6    18
09929  M01S00786.282l826 +++|          BX1    X1+X6       SET BUFFER ADDRESS IN CALL
09930  M01S00787.282l826 +++|          SX6    MTSI
09931  M01S00788.282l826 +++|          LX7    48
09932  M01S00789.282l826 +++|          LX6    30
09933  M01S00790.282l826 +++|          BX6    X7+X6       MERGE BUFFER NUMBER AND SUBSYSTEM ID
09934  M01S00791.282l826 +++|          SA6    X1+         INITIALIZE STATUS WORD
09935  M01S00792.282l826 +++|          BX6    X1
09936  M01S00793.282l826 +++|          RJ     SYS=        SEND BLOCK TO MAGNET
09937  M00S05210.resex   +++|          EQ     WSBX        RETURN
09938  M00S05211.resex   +++|
09939  M00S05212.resex   +++|
09940  M00S05213.resex   +++| WSBA     VFD    18/3RSIC,6/20B,18/0,18/SS  SIC CALL SKELETON
09941  M00S05214.resex   +++|          SPACE  4,10
09942  M00S05215.resex   +++|**        COMMON DECKS.
09943  M00S05216.resex   +++|
09944  M00S05217.resex   +++|
09945  M00S05218.resex   +++|*CALL     COMCCDD
09946  M00S05219.resex   +++|*CALL     COMCCIO
Line S00303 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
09947  M01S00303.252l678 +++|*CALL     COMCCOD
09948  M00S05220.resex   +++|*CALL     COMCCPM
Line S01387 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09949  M01S01387.274l797 +++|*CALL     COMCDTC
09950  M01S01388.274l797 +++|*CALL     COMCDXB
Line S00538 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09951  M01S00538.253l688 +++|          QUAL   COMSMTX
09952  M01S00539.253l688 +++| QUAL$    EQU    1
09953  M01S00540.253l688 +++|          LIST   X
09954  M01S00541.253l688 +++|*CALL     COMCSRI
09955  M01S00542.253l688 +++|          LIST   *
09956  M01S00543.253l688 +++|          QUAL   *
09957  M01S00544.253l688 +++| GSR      EQU    /COMSMTX/GSR
09958  M00S05221.resex   +++|*CALL     COMCLFM
09959  M00S05222.resex   +++|*CALL     COMCMVE
09960  M00S05223.resex   +++|*CALL     COMCPFM
09961  M00S05224.resex   +++|*CALL     COMCRDW
09962  M00S05225.resex   +++|*CALL     COMCSFN
09963  M00S05226.resex   +++|*CALL     COMCSNM
09964  M00S05227.resex   +++|*CALL     COMCSYS
09965  M00S05228.resex   +++|*CALL     COMCWTW
09966  M00S05229.resex   +++|          TITLE  BUFFERS.
09967  M00S05230.resex   +++|**        BUFFERS.
09968  M00S05231.resex   +++|
09969  M00S05232.resex   +++|
09970  M00S05233.resex   +++|          USE    //
Line S05234 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09971  M01S05234.274l797 ---|          SEG
Line S05235 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09972  M01S05235.253l688 ---|          LIST   G
09973  M00S05236.resex   +++|
Line S01389 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09974  M01S01389.274l797 +++| RESB     BSSZ   RDEL        DEMAND FILE ENTRY BUFFER
09975  M01S01390.274l797 +++| VSNE     BSSZ   VSNL        NEW VSN FILE ENTRY BUFFER
09976  M01S01391.274l797 +++| RDT      BSSZ   RDTL        RESOURCES DEMANDED TABLE
09977  M01S01392.274l797 +++| VBUF     EQU    *           VSN FILE (RSXVID) I/O BUFFER
09978  M01S01393.274l797 +++| DBUF     EQU    *           DEMAND FILE (RSXDID) I/O BUFFER
09979  M01S01394.274l797 +++| SBUF2L   MAX    IOBL,/COMSMTX/MUNIT*/COMSMTX/UNITL
09980  M01S01395.274l797 +++| SBUF2    BSSZ   SBUF2L      SCRATCH 2 I/O BUFFER
09981  M01S01396.274l797 +++| BUF      BSSZ   BUFL        SHORT SCRATCH BUFFER
09982  M01S01397.274l797 +++| RET      BSSZ   RETL        RESOURCE EQUIPMENT TABLE
09983  M01S01398.274l797 +++| EVSB     BSSZ   EVBL        ENVIRONMENT VSN BUFFER
09984  M01S01399.274l797 +++| BUF2     EQU    *           SHORT SCRATCH BUFFER
09985  M01S01400.274l797 +++|          ERRNG  VSNL-/COMSMTX/MUNIT*2  *BUF2* OVERFLOWS *VSNB*
09986  M01S01401.274l797 +++| VSNB     BSSZ   VSNL        VSN FILE ENTRY BUFFER
09987  M01S01402.274l797 +++| UDT      BSSZ   /COMSMTX/UNITL  MAGNET UNIT DESCRIPTOR TABLE ENTRY
09988  M00S05237.resex   +++|
Line S05238 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09989  M01S05238.274l797 ---|**        OVERLAY AREA 1 - BUFFERS NOT USED IN PRESET.
Line S01403 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09990  M01S01403.274l797 +++|*         BUFFERS OVERLAYING PRESET.
09991  M00S05239.resex   +++|
Line S05240 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09992  M01S05240.274l797 ---| OVL1     EQU    *           BEGINNING OF OVERLAY AREA 1
09993  M01S05241.274l797 ---|
Line S01404 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
09994  M01S01404.274l797 +++| SBUF1    BSSN   IOBL        SCRATCH 1 I/O BUFFER
Proceed to Part 9
cdc/nos2.source/opl.opl871/deck/resex.008.txt ยท Last modified: by 127.0.0.1