Deck RESEX Part 012

65 Modifications

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S02513 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13737  M01S02513.274l797 +++|*
13738  M01S02514.274l797 +++|*         NOTE - ALL PROCESSORS MUST PRESERVE THE VALUE OF B6.
13739  M01S02515.274l797 +++| CRD      SPACE  4,10
13740  M01S02516.274l797 +++|**        CRD - SET CREATION DATE (JULIAN FORMAT).
13741  M01S02517.274l797 +++|*
13742  M01S02518.274l797 +++|*         CR=YYDDD.
13743  M00S06694.resex   +++|
13744  M00S06695.resex   +++|
Line S06696 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
13745  M01S06696.v23l617 ---| SCD      ZR     X5,SCD1     IF *LABEL* CONTROL STATEMENT
Line S00108 Modification History
M01 (Added by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13746  M02S00108.274l797 ---| SCD      ZR     X5,SCD1     IF *LABEL* COMMAND
Line S06697 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13747  M01S06697.274l797 ---|          SA6    TAOK-1+/TAOK/FC  CLEAR FRAME COUNT PARAMETER
13748  M01S06698.274l797 ---|          EQ     SFS         PROCESS CHARACTER COUNT
13749  M01S06699.274l797 ---|
13750  M01S06700.274l797 ---| SCD1     SA6    TAOK-1+/TAOK/CR  CLEAR CREATION DATE PARAMETER
13751  M01S06701.274l797 ---| CRD      SPACE  4,10
13752  M01S06702.274l797 ---|**        SET CREATION DATE.
13753  M01S06703.274l797 ---|*                CR=YYDDD.     JULIAN
13754  M01S06704.274l797 ---|
13755  M01S06705.274l797 ---|
13756  M01S06706.274l797 ---| CRD      NZ     X5,ERR      IF NOT *LABEL* CALL
Line S02519 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13757  M01S02519.274l797 +++| CRD      BSS    0           ENTRY
13758  M01S02520.274l797 +++|          NZ     X5,ERR      IF NOT *LABEL* CALL
13759  M00S06707.resex   +++|          RJ     CLP         GET PARAMETER VALUE (NO LITERALS)
13760  M00S06708.resex   +++|          MX0    5*6
13761  M00S06709.resex   +++|          BX4    -X0*X5
13762  M00S06710.resex   +++|          SA2    F+FCRD      READ FET WORD
13763  M00S06711.resex   +++|          NZ     X4,ERR      IF PARAMETER TOO LONG
Line S06712 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13764  M01S06712.274l797 ---|          BX3    X0*X2
13765  M00S06713.resex   +++|          LX5    30
Line S06714 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13766  M01S06714.274l797 ---|          BX7    X3+X5
13767  M01S06715.274l797 ---|          SA7    A2
13768  M01S06716.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02521 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13769  M01S02521.274l797 +++|          BX7    X2+X5
13770  M01S02522.274l797 +++|          SA7    A2+
13771  M01S02523.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
13772  M00S06717.resex   +++| FID      SPACE  4,10
Line S06718 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13773  M01S06718.274l797 ---|**        SET FILE IDENTIFIER.
13774  M01S06719.274l797 ---|*                FI=AAAAAAAAAAAAAAAAA.
13775  M01S06720.274l797 ---|*                L=AAAAAAAAAAAAAAAAA.
Line S02524 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13776  M01S02524.274l797 +++|**        FID - SET FILE IDENTIFIER.
13777  M01S02525.274l797 +++|*
13778  M01S02526.274l797 +++|*         FI=AAAAAAAAAAAAAAAAA.
13779  M01S02527.274l797 +++|*         L=AAAAAAAAAAAAAAAAA.
13780  M00S06721.resex   +++|
13781  M00S06722.resex   +++|
Line S06723 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13782  M01S06723.274l797 ---| FID      NZ     X5,ERR      IF NOT *LABEL* CALL
Line S02528 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13783  M01S02528.274l797 +++| FID      BSS    0           ENTRY
13784  M01S02529.274l797 +++|          NZ     X5,ERR      IF NOT *LABEL* CALL
13785  M00S06724.resex   +++|          SX6    B1+         ENABLE LITERAL PROCESSING
13786  M00S06725.resex   +++|          SA6    LIT
13787  M00S06726.resex   +++|          RJ     POP         PICK OUT PARAMETER
13788  M00S06727.resex   +++|          NG     B5,ERR      IF ASSEMBLY ERROR
13789  M00S06728.resex   +++|          SA1    POPA+1
13790  M00S06729.resex   +++|          MX0    7*6
13791  M00S06730.resex   +++|          BX5    -X0*X1
13792  M00S06731.resex   +++|          NZ     X5,ERR      IF PARAMETER TOO LONG
13793  M00S06732.resex   +++|          RJ     SFN         SPACE FILL SECOND WORD OF FID
13794  M00S06733.resex   +++|          BX5    X6
13795  M00S06734.resex   +++|          SA1    A1-B1
13796  M00S06735.resex   +++|          RJ     SFN         SPACE FILL 1ST WORD OF FID
13797  M00S06736.resex   +++|          SA6    F+FID1      STORE FIRST WORD FID
13798  M00S06737.resex   +++|          MX0    -18
13799  M00S06738.resex   +++|          SA2    A6+B1       READ FET DATA TO BE MERGED
13800  M00S06739.resex   +++|          BX7    X0*X5
13801  M00S06740.resex   +++|          BX3    -X0*X2
13802  M00S06741.resex   +++|          SA1    MF          SET FI PROCESSED
13803  M00S06742.resex   +++|          BX7    X7+X3
13804  M00S06743.resex   +++|          SX6    X1+B1
13805  M00S06744.resex   +++|          SA7    A2
13806  M00S06745.resex   +++|          SA6    A1
Line S06746 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13807  M01S06746.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
13808  M01S06747.274l797 ---| NMD      SPACE  4,20
13809  M01S06748.274l797 ---|**        SET NUMERIC DATA FIELDS FOR LABEL.
13810  M01S06749.274l797 ---|*                SN=NNNN.    FILE SECTION NUMBER
13811  M01S06750.274l797 ---|*                V=NNNN.
13812  M01S06751.274l797 ---|*                QN=NNNN.    FILE SEQUENCE NUMBER
13813  M01S06752.274l797 ---|*                P=NNNN.
13814  M01S06753.274l797 ---|*                E=NN.       GENERATION VERSION NUMBER.
13815  M01S06754.274l797 ---|*                G=NNNN.     GENERATION NUMBER.
Line S02530 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13816  M01S02530.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
13817  M01S02531.274l797 +++| NMD      SPACE  4,10
13818  M01S02532.274l797 +++|**        NMD - SET NUMERIC DATA FIELDS FOR LABEL.
13819  M01S02533.274l797 +++|*
13820  M01S02534.274l797 +++|*         SN=NNNN.    FILE SECTION NUMBER
13821  M01S02535.274l797 +++|*         V=NNNN.
13822  M01S02536.274l797 +++|*         QN=NNNN.    FILE SEQUENCE NUMBER
13823  M01S02537.274l797 +++|*         P=NNNN.
13824  M01S02538.274l797 +++|*         E=NN.       GENERATION VERSION NUMBER.
13825  M01S02539.274l797 +++|*         G=NNNN.     GENERATION NUMBER.
13826  M00S06755.resex   +++|
13827  M00S06756.resex   +++|
Line S06757 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13828  M01S06757.274l797 ---| NMD      NZ     X5,ERR      IF NOT *LABEL* CALL
Line S02540 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13829  M01S02540.274l797 +++| NMD      BSS    0           ENTRY
13830  M01S02541.274l797 +++|          NZ     X5,ERR      IF NOT *LABEL* CALL
13831  M00S06758.resex   +++|          SA7    NMDA        SAVE PROCESSOR PARMETERS
13832  M00S06759.resex   +++|          RJ     CLP         GET PARAMETER VALUE (NO LITERALS)
13833  M00S06760.resex   +++|          SA4    NMDA
13834  M00S06761.resex   +++|          MX0    4*6
13835  M00S06762.resex   +++|          LX4    59-16
13836  M00S06763.resex   +++|          SB7    B1
13837  M00S06764.resex   +++|          PL     X4,NMD1     IF FOUR DIGIT PARAMETER
13838  M00S06765.resex   +++|          MX0    2*6
13839  M00S06766.resex   +++| NMD1     BX6    -X0*X5
13840  M00S06767.resex   +++|          NZ     X6,ERR      IF PARAMETER TOO LONG
13841  M00S06768.resex   +++|          RJ     DXB
13842  M00S06769.resex   +++|          NZ     X4,ERR      IF ASSEMBLY ERRORS
13843  M00S06770.resex   +++|          SA4    A4
13844  M00S06771.resex   +++|          LX4    59-15
13845  M00S06772.resex   +++|          PL     X4,NMD3     IF NOT SEQUENCE NUMBER
13846  M00S06773.resex   +++|          SA2    MF
13847  M00S06774.resex   +++|          SX3    X6-2
13848  M00S06775.resex   +++|          SX7    X2+2        SET QN .LT. 2
13849  M00S06776.resex   +++|          NG     X3,NMD2     IF QN .LT. 2
13850  M00S06777.resex   +++|          SX3    X6-9999
13851  M00S06778.resex   +++|          SX7    X2+12B      SET QN PROCESSED AND .GT. 1
13852  M00S06779.resex   +++|          NZ     X3,NMD2     IF QN .NE. 9999
13853  M00S06780.resex   +++|          SA2    F+FTAP      SET WRITE LABEL BIT
13854  M00S06781.resex   +++|          BX3    X7
13855  M00S06782.resex   +++|          MX7    1
Line S00001 Modification History
M01 (Added by) resex2
Seq #  *Modification Id* Act 
----------------------------+
13856  M01S00001.resex2  +++|          BX2    X2+X7
Line S00002 Modification History
M01 (Added by) resex2
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13857  M02S00002.274l797 ---|          LX7    40-59       SET RING IN REQUIRED FLAG
Line S02542 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13858  M01S02542.274l797 +++|          LX7    40-59       SET WRITE ENABLE REQUIRED FLAG
13859  M00S06783.resex   +++|          BX7    X7+X2
13860  M00S06784.resex   +++|          SA7    A2
13861  M00S06785.resex   +++|          BX7    X3
13862  M00S06786.resex   +++| NMD2     SA7    MF          SET MULTI-FILE POSITIONING
13863  M00S06787.resex   +++| NMD3     MX1    -6
13864  M00S06788.resex   +++|          SA4    A4
13865  M00S06789.resex   +++|          BX1    -X1*X4
13866  M00S06790.resex   +++|          AX4    17
13867  M00S06791.resex   +++|          SX1    F+X1        ADDRESS OF FET WORD
13868  M00S06792.resex   +++|          LX4    -1          SET FIELD POSITION
13869  M00S06793.resex   +++|          BX1    X1+X4
13870  M00S06794.resex   +++|          RJ     ENF         ENTER NUMERIC FIELD
Line S06795 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13871  M01S06795.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02543 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13872  M01S02543.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
13873  M00S06796.resex   +++|
13874  M00S06797.resex   +++|
13875  M00S06798.resex   +++| NMDA     CON    0           TEMPORARY FOR PROCESSOR PARAMETERS
13876  M00S06799.resex   +++| RTC      SPACE  4,10
Line S06800 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13877  M01S06800.274l797 ---|**        SET RETENTION CYCLE.
13878  M01S06801.274l797 ---|*                T=NNN.
Line S02544 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13879  M01S02544.274l797 +++|**        RTC - SET RETENTION CYCLE.
13880  M01S02545.274l797 +++|*
13881  M01S02546.274l797 +++|*         T=NNN.
13882  M00S06802.resex   +++|
13883  M00S06803.resex   +++|
Line S06804 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13884  M01S06804.274l797 ---| RTC      NZ     X5,ERR      IF NOT *LABEL* CALL
Line S02547 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13885  M01S02547.274l797 +++| RTC      BSS    0           ENTRY
13886  M01S02548.274l797 +++|          NZ     X5,ERR      IF NOT *LABEL* CALL
13887  M00S06805.resex   +++|          RJ     CLP         GET PARAMETER VALUE (NO LITERALS)
Line S06806 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13888  M01S06806.274l797 ---|          ZR     X5,AMO1     IF NO PARAMETER
Line S02549 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13889  M01S02549.274l797 +++|          ZR     X5,AFOR     IF NO PARAMETER
13890  M00S06807.resex   +++|          MX0    3*6
13891  M00S06808.resex   +++|          BX6    -X0*X5
13892  M00S06809.resex   +++|          NZ     X6,ERR      IF PARAMETER TOO LONG
13893  M00S06810.resex   +++|          BX7    X5
13894  M00S06811.resex   +++|          SA7    RC          SAVE RETENTION CYCLE
Line S06812 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13895  M01S06812.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02550 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13896  M01S02550.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
13897  M00S06813.resex   +++| RTD      SPACE  4,10
Line S06814 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13898  M01S06814.274l797 ---|**        SET RETENTION DATE.
13899  M01S06815.274l797 ---|*                RT=YYDDD.    JULIAN
Line S02551 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13900  M01S02551.274l797 +++|**        RTD - SET RETENTION DATE (JULIAN FORMAT).
13901  M01S02552.274l797 +++|*
13902  M01S02553.274l797 +++|*         RT=YYDDD.
13903  M00S06816.resex   +++|
13904  M00S06817.resex   +++|
Line S06818 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13905  M01S06818.274l797 ---| RTD      NZ     X5,ERR      IF NOT *LABEL* CALL
Line S02554 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13906  M01S02554.274l797 +++| RTD      BSS    0           ENTRY
13907  M01S02555.274l797 +++|          NZ     X5,ERR      IF NOT *LABEL* CALL
13908  M00S06819.resex   +++|          RJ     CLP         GET PARAMETER VALUE (NO LITERALS)
13909  M00S06820.resex   +++|          MX0    5*6
13910  M00S06821.resex   +++|          SA2    F+FRTD      READ FET WORD
13911  M00S06822.resex   +++|          BX6    -X0*X5
13912  M00S06823.resex   +++|          NZ     X6,ERR      IF PARAMETER TOO LONG
13913  M00S06824.resex   +++|          BX3    -X0*X2
13914  M00S06825.resex   +++|          BX7    X3+X5
13915  M00S06826.resex   +++|          SA7    A2
13916  M00S06827.resex   +++|          LX0    -24
13917  M00S06828.resex   +++|          BX0    X0*X5
13918  M00S06829.resex   +++|          SB7    B1          ASSUME DECIMAL BASE
13919  M00S06830.resex   +++|          ZR     X0,ERR      IF PARAMETER TOO SHORT
13920  M00S06831.resex   +++|          RJ     DXB         CONVERT RETENTION DATE TO NUMERIC
13921  M00S06832.resex   +++|          NZ     X4,ERR      IF NOT NUMERIC VALUE
13922  M00S06833.resex   +++|          SA2    A2          CONVERT DAY OF YEAR
13923  M00S06834.resex   +++|          MX0    18
13924  M00S06835.resex   +++|          LX2    12
13925  M00S06836.resex   +++|          BX5    X0*X2
13926  M00S06837.resex   +++|          RJ     DXB
Line S06838 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
13927  M01S06838.v23l617 ---|          ZR     X6,ERR      IF ILLEGAL DAY OF YEAR
Line S00109 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
13928  M01S00109.v23l617 +++|          ZR     X6,ERR      IF INCORRECT DAY OF YEAR
13929  M00S06839.resex   +++|          SX6    X6-367
Line S06840 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
13930  M01S06840.v23l617 ---|          PL     X6,ERR      IF ILLEGAL DAY OF YEAR
Line S00110 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
13931  M01S00110.v23l617 +++|          PL     X6,ERR      IF INCORRECT DAY OF YEAR
Line S06841 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13932  M01S06841.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02556 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13933  M01S02556.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
Line S00529 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
13934  M01S00529.ns22000 +++| SAL      SPACE  4,10
Line S00530 Modification History
M01 (Added by) ns22000
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13935  M02S00530.274l797 ---|**        SET ACCESS LEVEL.
13936  M02S00531.274l797 ---|*                AL = NNNNNNN.
Line S02557 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13937  M01S02557.274l797 +++|**        SAL - SET ACCESS LEVEL.
13938  M01S02558.274l797 +++|*
13939  M01S02559.274l797 +++|*         AL = NNNNNNN.
Line S00532 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
13940  M01S00532.ns22000 +++|
13941  M01S00533.ns22000 +++|
Line S00534 Modification History
M01 (Added by) ns22000
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13942  M02S00534.274l797 ---| SAL      ZR     B6,AMO6     IF ARGUMENTS EXHAUSTED
Line S02560 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13943  M01S02560.274l797 +++| SAL      BSS    0           ENTRY
13944  M01S02561.274l797 +++|          ZR     B6,AFOR     IF ARGUMENTS EXHAUSTED
Line S00535 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
13945  M01S00535.ns22000 +++|          SA1    AL          ACCESS LEVEL PERMISSION
13946  M01S00536.ns22000 +++|          ZR     X1,ERR      IF NOT ALLOWED ON THIS COMMAND
13947  M01S00537.ns22000 +++|          RJ     CLP         CALL PICK OUT PARAMETER
13948  M01S00538.ns22000 +++|          GE     B5,B1,ERR   IF PARAMETER/KEYWORD TOO LONG
13949  M01S00539.ns22000 +++|          BX1    X5
13950  M01S00540.ns22000 +++|          SB2    B0
13951  M01S00541.ns22000 +++|          SA5    SSMA        SYSTEM SECURITY MODE
13952  M01S00542.ns22000 +++|          RJ     VLC         VALIDATE ACCESS LEVEL
13953  M01S00543.ns22000 +++|          ZR     X5,SAL1     IF UNSECURED SYSTEM
13954  M01S00544.ns22000 +++|          SB2    /PER/UAL    * UNKNOWN ACCESS LEVEL NAME.*
13955  M01S00545.ns22000 +++|          NG     X2,PER      IF ACCESS LEVEL NOT FOUND
13956  M01S00546.ns22000 +++|          MX0    -8
13957  M01S00547.ns22000 +++|          SA1    JCWA        SECURITY CONTROL WORD
13958  M01S00548.ns22000 +++|          LX1    7-43
13959  M01S00549.ns22000 +++|          BX3    -X0*X1      VALID ACCESS LEVELS
13960  M01S00550.ns22000 +++|          MX0    -1
13961  M01S00551.ns22000 +++|          SB2    X2
13962  M01S00552.ns22000 +++|          LX0    B2
13963  M01S00553.ns22000 +++|          BX0    -X0*X3
13964  M01S00554.ns22000 +++|          SB2    /PER/NVA    NOT VALIDATED FOR ACCESS LEVEL
13965  M01S00555.ns22000 +++|          ZR     X0,PER      IF NOT VALIDATED FOR ACCESS LEVEL
13966  M01S00556.ns22000 +++|          BX6    X2
13967  M01S00557.ns22000 +++|          SA6    AL          SAVE REQUESTED ACCESS LEVEL
13968  M01S00558.ns22000 +++|          SX1    B1
13969  M01S00559.ns22000 +++|          LX1    39          POSITION BIT FOR *AL* INDICATION FIELD
13970  M01S00560.ns22000 +++|          SA3    F+1         SECOND WORD OF FET
13971  M01S00561.ns22000 +++|          BX6    X1+X3
13972  M01S00562.ns22000 +++|          SA6    A3          SET *AL* INDICATOR
13973  M01S00563.ns22000 +++|          SA3    VF+1
13974  M01S00564.ns22000 +++|          BX6    X1+X3
13975  M01S00565.ns22000 +++|          SA6    A3          SET *AL* INDICATOR IN VSN FET
13976  M01S00566.ns22000 +++|          LX2    36
13977  M01S00567.ns22000 +++|          SA3    F+/COMSPFM/CFAL
13978  M01S00568.ns22000 +++|          MX1    12
13979  M01S00569.ns22000 +++|          LX1    36-48
13980  M01S00570.ns22000 +++|          BX3    -X1*X3      CLEAR FILE ACCESS LEVEL
13981  M01S00571.ns22000 +++|          BX6    X2+X3
13982  M01S00572.ns22000 +++|          SA6    A3          SET ACCESS LEVEL IN FET
13983  M01S00573.ns22000 +++|          SA3    VF+/COMSPFM/CFAL
13984  M01S00574.ns22000 +++|          BX3    -X1*X3      CLEAR FILE ACCESS LEVEL IN VSN FET
13985  M01S00575.ns22000 +++|          BX6    X2+X3
13986  M01S00576.ns22000 +++|          SA6    A3          SET ACCESS LEVEL IN VSN FET
Line S00577 Modification History
M01 (Added by) ns22000
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13987  M02S00577.274l797 ---|          EQ     AMO1        PROCESS NEXT ENTRY
Line S02562 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13988  M01S02562.274l797 +++|          EQ     AFOR        PROCESS NEXT ENTRY
Line S00578 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
13989  M01S00578.ns22000 +++|
13990  M01S00579.ns22000 +++| SAL1     SX6    B0+
13991  M01S00580.ns22000 +++|          SA6    AL
Line S00581 Modification History
M01 (Added by) ns22000
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13992  M02S00581.274l797 ---|          EQ     AMO1        PROCESS NEXT ENTRY
Line S02563 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13993  M01S02563.274l797 +++|          EQ     AFOR        PROCESS NEXT ENTRY
13994  M01S02564.274l797 +++| SCD      SPACE  4,10
13995  M01S02565.274l797 +++|**        SCD - PROCESS *C* OPTION.
13996  M01S02566.274l797 +++|*
13997  M01S02567.274l797 +++|*                C=NNNNNN.   CHARACTER COUNT
13998  M01S02568.274l797 +++|*                C=YYDDD.    CREATION DATE (*LABEL* COMMAND ONLY)
13999  M01S02569.274l797 +++|
14000  M01S02570.274l797 +++|
14001  M01S02571.274l797 +++| SCD      BSS    0           ENTRY
14002  M01S02572.274l797 +++|          ZR     X5,SCD1     IF *LABEL* COMMAND
14003  M01S02573.274l797 +++|          SA6    TAOK-1+/TAOK/FC  CLEAR FRAME COUNT PARAMETER
14004  M01S02574.274l797 +++|          EQ     SFS         PROCESS CHARACTER COUNT
14005  M01S02575.274l797 +++|
14006  M01S02576.274l797 +++| SCD1     SA6    TAOK-1+/TAOK/CR  CLEAR CREATION DATE PARAMETER
14007  M01S02577.274l797 +++|          EQ     CRD         SET CREATION DATE
14008  M00S06842.resex   +++| SCI      SPACE  4,10
Line S06843 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14009  M01S06843.274l797 ---|**        SET CHECKPOINT DATA.
14010  M01S06844.274l797 ---|*                CB          CHECKPOINT AT BOI
14011  M01S06845.274l797 ---|*                CK          CHECKPOINT AT EOI
Line S02578 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14012  M01S02578.274l797 +++|**        SCI - SET CHECKPOINT DATA.
14013  M01S02579.274l797 +++|*
14014  M01S02580.274l797 +++|*         CB
14015  M01S02581.274l797 +++|*         CK
14016  M00S06846.resex   +++|
14017  M00S06847.resex   +++|
14018  M00S06848.resex   +++| SCI      SA7    CI          SET CHECKPOINT FILE ID
Line S06849 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14019  M01S06849.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02582 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14020  M01S02582.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14021  M00S06850.resex   +++| SCV      SPACE  4,10
Line S06851 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14022  M01S06851.274l797 ---|**        SET CONVERSION MODE.
14023  M01S06852.274l797 ---|*                CV=(AS,US,EB)
14024  M01S06853.274l797 ---|*                N=(AS,US,EB)
14025  M01S06854.274l797 ---|*         GUARANTEES NINE TRACK TAPE SELECTION.
Line S02583 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14026  M01S02583.274l797 +++|**        SCV - SET CONVERSION MODE.
14027  M01S02584.274l797 +++|*
14028  M01S02585.274l797 +++|*         CV=(AS,US,EB)
14029  M01S02586.274l797 +++|*         N=(AS,US,EB)
14030  M00S06855.resex   +++|
14031  M00S06856.resex   +++|
Line S06857 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14032  M01S06857.274l797 ---| SCV      SB3    SCVA        SET OPTION TABLE ADDRESS
Line S02587 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14033  M01S02587.274l797 +++| SCV      BSS    0           ENTRY
14034  M01S02588.274l797 +++|          SB3    SCVA        SET OPTION TABLE ADDRESS
14035  M00S06858.resex   +++|          RJ     AOP         ANALYZE CONVERSION OPTIONS (NO LITERALS)
Line S06859 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14036  M01S06859.274l797 ---|          SX6    B1          INDICATE CONVERSION MODE SELECTION
14037  M01S06860.274l797 ---|          SA6    CV
14038  M01S06861.274l797 ---|          MX0    3
14039  M00S06862.resex   +++|          SA2    F+FTAP
Line S06863 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14040  M01S06863.274l797 ---|          LX0    -9
14041  M01S06864.274l797 ---|          BX3    -X0*X2
14042  M01S06865.274l797 ---|          MX0    12
14043  M01S06866.274l797 ---|          LX7    59-11
14044  M01S06867.274l797 ---|          BX7    X0*X7
14045  M01S06868.274l797 ---|          BX7    X7+X3
Line S02589 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14046  M01S02589.274l797 +++|          LX7    48
14047  M01S02590.274l797 +++|          BX7    X7+X2       SET CONVERSION MODE
14048  M00S06869.resex   +++|          SA7    A2
Line S06870 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14049  M01S06870.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02591 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14050  M01S02591.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14051  M00S06871.resex   +++|
14052  M00S06872.resex   +++|
Line S06873 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14053  M01S06873.274l797 ---| SCVA     VFD    24/0LAS,36/401B     ASCII
14054  M01S06874.274l797 ---|          VFD    24/0LUS,36/401B     USASII
14055  M01S06875.274l797 ---|          VFD    24/0LEB,36/402B     EBCDIC
Line S02592 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14056  M01S02592.274l797 +++| SCVA     VFD    42/0LAS,18/1  ASCII
14057  M01S02593.274l797 +++|          VFD    42/0LUS,18/1  USASII
14058  M01S02594.274l797 +++|          VFD    42/0LEB,18/2  EBCDIC
14059  M00S06876.resex   +++|          CON    0
Line S01042 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
14060  M01S01042.282l826 +++|          CON    0
14061  M00S06877.resex   +++| SFA      SPACE  4,10
Line S06878 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14062  M01S06878.274l797 ---|**        SET FILE ACCESSIBILITY.
14063  M01S06879.274l797 ---|*                FA=A.
Line S02595 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14064  M01S02595.274l797 +++|**        SFA - SET FILE ACCESSIBILITY.
14065  M01S02596.274l797 +++|*
14066  M01S02597.274l797 +++|*         FA=A.
14067  M00S06880.resex   +++|
14068  M00S06881.resex   +++|
Line S06882 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14069  M01S06882.274l797 ---| SFA      NZ     X5,ERR      IF NOT *LABEL* CALL
Line S02598 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14070  M01S02598.274l797 +++| SFA      BSS    0           ENTRY
14071  M01S02599.274l797 +++|          NZ     X5,ERR      IF NOT *LABEL* CALL
14072  M00S06883.resex   +++|          SX6    B1+         ENABLE LITERAL PROCESSING
14073  M00S06884.resex   +++|          RJ     CLP         GET PARAMETER VALUE
14074  M00S06885.resex   +++|          MX0    6
14075  M00S06886.resex   +++|          BX6    -X0*X5
14076  M00S06887.resex   +++|          NZ     X6,ERR      IF PARAMETER TOO LONG
14077  M00S06888.resex   +++|          LX0    24
14078  M00S06889.resex   +++|          SA2    F+FFAS      READ FET WORD
14079  M00S06890.resex   +++|          LX5    24
14080  M00S06891.resex   +++|          BX3    -X0*X2
14081  M00S06892.resex   +++|          BX7    X3+X5
14082  M00S06893.resex   +++|          SA7    A2+
Line S06894 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14083  M01S06894.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
14084  M01S06895.274l797 ---| SFS      SPACE  4,10
14085  M01S06896.274l797 ---|**        SET FRAME SIZE MAXIMUM.
14086  M01S06897.274l797 ---|*                FC=NNNNNN.
Line S06898 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14087  M02S06898.274l797 ---|*                C=NNNNNN.   (EXCEPT ON *LABEL* CARD)
Line S00111 Modification History
M01 (Added by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14088  M02S00111.274l797 ---|*                C=NNNNNN.   (EXCEPT ON *LABEL* COMMAND)
Line S02600 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14089  M01S02600.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14090  M01S02601.274l797 +++| SFC      SPACE  4,10
14091  M01S02602.274l797 +++|**        SFC - SET MAXIMUM FRAME COUNT FOR TAPE BLOCK.
14092  M01S02603.274l797 +++|*
14093  M01S02604.274l797 +++|*         FC=NNNNNN.
14094  M01S02605.274l797 +++|*         C=NNNNNN.          (EXCEPT ON *LABEL* COMMAND)
14095  M00S06899.resex   +++|
14096  M00S06900.resex   +++|
Line S06901 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14097  M01S06901.274l797 ---| SFS      RJ     CLP         GET PARAMETER VALUE (NO LITERALS)
Line S02606 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14098  M01S02606.274l797 +++| SFS      BSS    0           ENTRY
14099  M01S02607.274l797 +++|          RJ     CLP         GET PARAMETER VALUE (NO LITERALS)
14100  M00S06902.resex   +++|          MX0    6*6
14101  M00S06903.resex   +++|          BX6    -X0*X5
14102  M00S06904.resex   +++|          NZ     X6,ERR      IF PARAMETER TOO LONG
14103  M00S06905.resex   +++|          SB7    B1          ASSUME DECIMAL
14104  M00S06906.resex   +++|          RJ     DXB
14105  M00S06907.resex   +++|          NZ     X4,ERR      IF ASSEMBLY ERROR
Line S06908 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14106  M01S06908.274l797 ---|          MX5    36
14107  M00S06909.resex   +++|          SA2    F+FTAP
Line S06910 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14108  M01S06910.274l797 ---|          MX7    1
14109  M01S06911.274l797 ---|          BX5    X5*X2
14110  M01S06912.274l797 ---|          SA7    FC          SET FRAME COUNT PROCESSED FLAG
14111  M01S06913.274l797 ---|          BX6    X6+X5
Line S02608 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14112  M01S02608.274l797 +++|          BX6    X2+X6       SET BLOCK SIZE IN FRAMES
14113  M00S06914.resex   +++|          SA6    A2
Line S06915 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14114  M01S06915.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02609 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14115  M01S02609.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14116  M00S06916.resex   +++| SID      SPACE  4,10
Line S06917 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14117  M01S06917.274l797 ---|**        SET MULTI-SET IDENTIFIER.
14118  M01S06918.274l797 ---|*                SI=AAAAAA.
14119  M01S06919.274l797 ---|*                M=AAAAAA.
Line S02610 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14120  M01S02610.274l797 +++|**        SID - SET MULTI-SET IDENTIFIER.
14121  M01S02611.274l797 +++|*
14122  M01S02612.274l797 +++|*         SI=AAAAAA.
14123  M01S02613.274l797 +++|*         M=AAAAAA.
14124  M00S06920.resex   +++|
14125  M00S06921.resex   +++|
Line S06922 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14126  M01S06922.274l797 ---| SID      NZ     X5,ERR      IF NOT *LABEL* CALL
Line S02614 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14127  M01S02614.274l797 +++| SID      BSS    0           ENTRY
14128  M01S02615.274l797 +++|          NZ     X5,ERR      IF NOT *LABEL* CALL
14129  M00S06923.resex   +++|          SX6    B1+         ENABLE LITERAL PROCESSING
14130  M00S06924.resex   +++|          RJ     CLP         GET PARAMETER VALUE
14131  M00S06925.resex   +++|          BX1    X5
14132  M00S06926.resex   +++|          MX0    6*6
14133  M00S06927.resex   +++|          BX5    -X0*X5
14134  M00S06928.resex   +++|          NZ     X5,ERR      IF PARAMETER TOO LONG
14135  M00S06929.resex   +++|          RJ     SFN
14136  M00S06930.resex   +++|          MX0    36
14137  M00S06931.resex   +++|          SA2    F+FMSI      READ FET WORD
14138  M00S06932.resex   +++|          BX7    X0*X6
14139  M00S06933.resex   +++|          SA1    MF
14140  M00S06934.resex   +++|          SX6    X1+4
14141  M00S06935.resex   +++|          BX3    -X0*X2
14142  M00S06936.resex   +++|          SA6    A1          SET MULTI-FILE POSITIONING
14143  M00S06937.resex   +++|          BX7    X7+X3
14144  M00S06938.resex   +++|          SA7    A2
Line S06939 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14145  M01S06939.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02616 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14146  M01S02616.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14147  M00S06940.resex   +++| SLT      SPACE  4,10
Line S06941 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14148  M01S06941.274l797 ---|**        SET LABEL TYPE.
14149  M01S06942.274l797 ---|*                LB=(KU,KL,NS)
Line S02617 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14150  M01S02617.274l797 +++|**        SLT - SET LABEL TYPE.
14151  M01S02618.274l797 +++|*
14152  M01S02619.274l797 +++|*         LB=(KU,KL,NS)
14153  M01S02620.274l797 +++|*
14154  M00S06943.resex   +++|*         TYPES ARE MUTUALLY EXCLUSIVE.
14155  M00S06944.resex   +++|
14156  M00S06945.resex   +++|
Line S06946 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14157  M01S06946.274l797 ---| SLT      SB3    SLTA        SET OPTION TABLE ADDRESS
Line S02621 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14158  M01S02621.274l797 +++| SLT      BSS    0           ENTRY
14159  M01S02622.274l797 +++|          SB3    SLTA        SET OPTION TABLE ADDRESS
14160  M00S06947.resex   +++|          RJ     AOP         ANALYZE LABEL OPTIONS (NO LITERALS)
Line S06948 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14161  M01S06948.274l797 ---|          MX0    2
14162  M00S06949.resex   +++|          SA2    F+FTAP
Line S06950 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14163  M01S06950.274l797 ---|          LX0    -1
14164  M01S06951.274l797 ---|          LX7    -3
14165  M01S06952.274l797 ---|          BX3    -X0*X2
14166  M01S06953.274l797 ---|          BX7    X0*X7
14167  M01S06954.274l797 ---|          SX6    B1          SET LB= PROCESSED
14168  M01S06955.274l797 ---|          BX7    X7+X3
14169  M01S06956.274l797 ---|          SA6    LB
Line S02623 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14170  M01S02623.274l797 +++|          SX6    B1
14171  M01S02624.274l797 +++|          LX7    57-0
14172  M01S02625.274l797 +++|          SA6    LT          SET LABEL TYPE SPECIFIED
14173  M01S02626.274l797 +++|          BX7    X2+X7       SET LABEL TYPE
14174  M00S06957.resex   +++|          SA7    A2
Line S06958 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14175  M01S06958.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02627 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14176  M01S02627.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14177  M00S06959.resex   +++|
14178  M00S06960.resex   +++|
Line S06961 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14179  M01S06961.274l797 ---| SLTA     VFD    24/0LKU,36/0     KRONOS UNLABELED
14180  M01S06962.274l797 ---|          VFD    24/0LKL,36/2     KRONOS LABELED
14181  M01S06963.274l797 ---|          VFD    24/0LNS,36/3     NON-STANDARD LABELED
Line S02628 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14182  M01S02628.274l797 +++| SLTA     VFD    42/0LKU,18/0     KRONOS UNLABELED
14183  M01S02629.274l797 +++|          VFD    42/0LKL,18/2     KRONOS LABELED
14184  M01S02630.274l797 +++|          VFD    42/0LNS,18/3     NON-STANDARD LABELED
14185  M00S06964.resex   +++|          CON    0
14186  M00S06965.resex   +++| SNS      SPACE  4,10
Line S06966 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14187  M01S06966.274l797 ---|**        SET NOISE SIZE.
14188  M01S06967.274l797 ---|*                NS=NN.     NN = NUMERIC LESS THAN 32.
Line S02631 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14189  M01S02631.274l797 +++|**        SNS - SET NOISE SIZE.
14190  M01S02632.274l797 +++|*
14191  M01S02633.274l797 +++|*         NS=NN.             NN = NUMERIC LESS THAN 32.
14192  M00S06968.resex   +++|
14193  M00S06969.resex   +++|
Line S06970 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14194  M01S06970.274l797 ---| SNS      RJ     CLP         GET PARAMETER VALUE (NO LITERALS)
Line S02634 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14195  M01S02634.274l797 +++| SNS      BSS    0           ENTRY
14196  M01S02635.274l797 +++|          RJ     CLP         GET PARAMETER VALUE (NO LITERALS)
14197  M00S06971.resex   +++|          MX0    2*6
14198  M00S06972.resex   +++|          BX6    -X0*X5
14199  M00S06973.resex   +++|          NZ     X6,ERR      IF PARAMETER TOO LONG
14200  M00S06974.resex   +++|          SB7    B1          ASSUME DECIMAL
14201  M00S06975.resex   +++|          RJ     DXB
14202  M00S06976.resex   +++|          NZ     X4,ERR      IF ASSEMBLY ERROR
14203  M00S06977.resex   +++|          SA2    F+FTAP
Line S06978 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14204  M01S06978.274l797 ---|          MX0    5
14205  M00S06979.resex   +++|          SX7    X6-32
Line S06980 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14206  M01S06980.274l797 ---|          LX0    29
14207  M00S06981.resex   +++|          PL     X7,ERR      IF NOISE SIZE TOO LARGE
14208  M00S06982.resex   +++|          LX6    24
Line S06983 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14209  M01S06983.274l797 ---|          BX2    -X0*X2
14210  M01S06984.274l797 ---|          BX6    X6+X2
14211  M01S06985.274l797 ---|          SA6    A2
14212  M01S06986.274l797 ---|          MX7    1
14213  M01S06987.274l797 ---|          SA7    NS          SET NS= PROCESSED
14214  M01S06988.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02636 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14215  M01S02636.274l797 +++|          BX6    X6+X2       SET NOISE SIZE
14216  M01S02637.274l797 +++|          SA6    A2+
14217  M01S02638.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14218  M00S06989.resex   +++| SPO      SPACE  4,10
Line S06990 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14219  M01S06990.274l797 ---|**        SET PROCESSING OPTIONS.
14220  M01S06991.274l797 ---|*                PO=(AEFGHILMNPRSUW)
Line S02639 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14221  M01S02639.274l797 +++|**        SPO - SET PROCESSING OPTIONS.
14222  M01S02640.274l797 +++|*
Line S02641 Modification History
M01 (Added by) 274l797
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
14223  M02S02641.282l826 ---|*         PO=(AEFGHILMNPRSUW)
Line S01043 Modification History
M01 (Added by) 282l826
M02 (Removed by) ns2794
Seq #  *Modification Id* Act 
----------------------------+
14224  M02S01043.ns2794  ---|*         PO=(AEFGHILMNPRSUWX)
Line S00001 Modification History
M01 (Added by) ns2794
Seq #  *Modification Id* Act 
----------------------------+
14225  M01S00001.ns2794  +++|*         PO=(ACEFGHILMNPRSUWX)
14226  M00S06992.resex   +++|
Line S06993 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14227  M01S06993.274l797 ---| SPO      RJ     CLP         GET PARAMETER VALUE (NO LITERALS)
Line S02642 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14228  M01S02642.274l797 +++| SPO      BSS    0           ENTRY
14229  M01S02643.274l797 +++|          RJ     CLP         GET PARAMETER VALUE (NO LITERALS)
14230  M00S06994.resex   +++|          MX0    -6
14231  M00S06995.resex   +++|          SB2    10
14232  M00S06996.resex   +++|          MX7    0
14233  M00S06997.resex   +++| SPO1     LX5    6
14234  M00S06998.resex   +++|          BX3    -X0*X5
14235  M00S06999.resex   +++|          ZR     X3,SPO2     IF END OF PARAMETERS
14236  M00S07000.resex   +++|          SB2    B2-B1
14237  M00S07001.resex   +++|          SA4    SPOA
14238  M00S07002.resex   +++|          SB3    X3
14239  M00S07003.resex   +++|          AX4    X4,B3
14240  M00S07004.resex   +++|          LX4    -1
14241  M00S07005.resex   +++|          PL     X4,ERR      IF NOT LEGAL OPTION
14242  M00S07006.resex   +++|          CX4    X4
14243  M00S07007.resex   +++|          SA3    X4+SPOA     READ OPTION BIT
14244  M00S07008.resex   +++|          BX7    X7+X3
14245  M00S07009.resex   +++|          NZ     B2,SPO1     IF MORE PARAMETERS IN WORD
14246  M00S07010.resex   +++|          EQ     B5,B1,ERR   IF IMPROPER TERMINATION
14247  M00S07011.resex   +++|          SA5    A5+B1       READ NEXT WORD OF PARAMETERS
14248  M00S07012.resex   +++|          SB5    B5-B1
14249  M00S07013.resex   +++|          SB2    10
14250  M00S07014.resex   +++|          EQ     SPO1
14251  M00S07015.resex   +++|
14252  M00S07016.resex   +++| SPO2     MX0    24          MERGE PROCESSING OPTIONS
14253  M00S07017.resex   +++|          SA2    F+FTAP
14254  M00S07018.resex   +++|          BX3    -X0*X7
14255  M00S07019.resex   +++|          BX7    X0*X7
14256  M00S07020.resex   +++|          LX3    36
14257  M00S07021.resex   +++|          BX7    X7+X2
14258  M00S07022.resex   +++|          BX7    -X3*X7
14259  M00S07023.resex   +++|          SA7    A2
Line S07024 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14260  M01S07024.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02644 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14261  M01S02644.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14262  M00S07025.resex   +++|
14263  M00S07026.resex   +++|
Line S07027 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
14264  M01S07027.282l826 ---| SPOA     DATA   53271742B   MASK BITS FOR OPTIONS (WUSRPNMLIHGFEA)
Line S01044 Modification History
M01 (Added by) 282l826
M02 (Removed by) ns2794
Seq #  *Modification Id* Act 
----------------------------+
14265  M02S01044.ns2794  ---| SPOA     DATA   153271742B  MASK BITS FOR OPTIONS (XWUSRPNMLIHGFEA)
Line S00002 Modification History
M01 (Added by) ns2794
Seq #  *Modification Id* Act 
----------------------------+
14266  M01S00002.ns2794  +++| SPOA     DATA   153271752B
Line S01045 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
14267  M01S01045.282l826 +++|          DATA   1BS44       X OPTION
14268  M00S07028.resex   +++|          DATA   1BS40       W OPTION
14269  M00S07029.resex   +++|          DATA   1BS41       U OPTION
14270  M00S07030.resex   +++|          DATA   1BS45       S OPTION
14271  M00S07031.resex   +++|          DATA   1BS39       R OPTION
14272  M00S07032.resex   +++|          DATA   1BS46       P OPTION
14273  M00S07033.resex   +++|          DATA   1BS37       N OPTION
14274  M00S07034.resex   +++|          DATA   1BS43       M OPTION
14275  M00S07035.resex   +++|          DATA   1BS7        L OPTION
14276  M00S07036.resex   +++|          DATA   1BS47       I OPTION
14277  M00S07037.resex   +++|          DATA   1BS6        H OPTION
14278  M00S07038.resex   +++|          DATA   1BS42       G OPTION
14279  M00S07039.resex   +++|          DATA   1BS5        F OPTION
14280  M00S07040.resex   +++|          DATA   1BS38       E OPTION
Line S00003 Modification History
M01 (Added by) ns2794
Seq #  *Modification Id* Act 
----------------------------+
14281  M01S00003.ns2794  +++|          DATA   1BS42       C OPTION
14282  M00S07041.resex   +++|          DATA   1BS36       A OPTION
14283  M00S07042.resex   +++| STD      SPACE  4,10
Line S07043 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14284  M01S07043.274l797 ---|**        SET TAPE DENSITY.
14285  M01S07044.274l797 ---|*                D=(LO,HI,HY,HD,PE,GE)
14286  M01S07045.274l797 ---|*                D=(200,556,800,1600,6250)
Line S02645 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14287  M01S02645.274l797 +++|**        STD - SET TAPE DENSITY.
14288  M00S07046.resex   +++|*
Line S07047 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14289  M01S07047.v23l617 ---|*                LO          ASSIGN OR REQUEST CARDS ONLY
Line S00112 Modification History
M01 (Added by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14290  M02S00112.274l797 ---|*                LO          ASSIGN OR REQUEST COMMANDS ONLY
Line S07048 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14291  M01S07048.274l797 ---|*                HI
14292  M01S07049.274l797 ---|*                HY
14293  M01S07050.274l797 ---|*                HD
14294  M01S07051.274l797 ---|*                PE
14295  M01S07052.274l797 ---|*                GE
Line S02646 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14296  M01S02646.274l797 +++|*         D=(LO,HI,HY,HD,PE,GE,CE,AE)
14297  M01S02647.274l797 +++|*         D=(200,556,800,1600,6250,38000)
14298  M01S02648.274l797 +++|*
14299  M01S02649.274l797 +++|*         THE FOLLOWING KEYWORDS ARE OBSOLETE AND ARE SUPPORTED BY THE
14300  M01S02650.274l797 +++|*         *ASSIGN* AND *REQUEST* COMMANDS FOR COMPATIBILITY ONLY -
14301  M01S02651.274l797 +++|*
14302  M01S02652.274l797 +++|*         LO
14303  M01S02653.274l797 +++|*         HI
14304  M01S02654.274l797 +++|*         HY
14305  M01S02655.274l797 +++|*         HD
14306  M01S02656.274l797 +++|*         PE
14307  M01S02657.274l797 +++|*         GE
14308  M00S07053.resex   +++|
14309  M00S07054.resex   +++|
Line S07055 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14310  M01S07055.274l797 ---| STD      SB3    TDEN        SET OPTION TABLE ADDRESS
Line S02658 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14311  M01S02658.274l797 +++| STD      BSS    0           ENTRY
14312  M01S02659.274l797 +++|          SB3    TDEN        SET OPTION TABLE ADDRESS
14313  M00S07056.resex   +++|          RJ     AOP         ANALYZE DENSITY OPTION (NO LITERALS)
Line S07057 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14314  M01S07057.274l797 ---| STD1     SX0    47B         DENSITY/TRACK MASK
14315  M01S07058.274l797 ---|          BX6    X7
14316  M01S07059.274l797 ---|          LX6    59-6
14317  M01S07060.274l797 ---|          NG     X6,STD2     IF TRACK SETTING REQUIRED
14318  M01S07061.274l797 ---|          SX0    7           DENSITY MASK
14319  M01S07062.274l797 ---| STD2     SA2    F+FTAP      GET FET WORD
14320  M01S07063.274l797 ---|          LX0    56-5
14321  M01S07064.274l797 ---|          BX3    -X0*X2      CLEAR OLD DENSITY
14322  M01S07065.274l797 ---|          LX7    56-5
14323  M01S07066.274l797 ---|          SA6    DN          SAVE DENSITY PROCESSED
14324  M01S07067.274l797 ---|          BX7    X0*X7
14325  M01S07068.274l797 ---|          BX7    X7+X3
14326  M01S07069.274l797 ---|          SA7    A2
14327  M01S07070.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02660 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14328  M01S02660.274l797 +++| STD1     SA2    F+FTAP
14329  M01S02661.274l797 +++|          MX0    -3
14330  M01S02662.274l797 +++|          BX6    -X0*X7      SPECIFIED DENSITY
14331  M01S02663.274l797 +++|          AX7    3
14332  M01S02664.274l797 +++|          LX6    51-0
14333  M01S02665.274l797 +++|          SA7    DM          SET DEVICE TYPE VALIDATION MASK
14334  M01S02666.274l797 +++|          BX6    X2+X6       SET DENSITY
14335  M01S02667.274l797 +++|          SA6    A2
14336  M01S02668.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14337  M00S07071.resex   +++|
Line S02669 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14338  M01S02669.274l797 +++|*         ENTRY FOR *LO*, *HI*, *HY*, *HD*, *PE*, AND *GE* KEYWORDS.
14339  M01S02670.274l797 +++|
14340  M00S07072.resex   +++| STD3     ZR     X5,ERR      IF *LABEL* CALL
14341  M00S07073.resex   +++|          SA1    TDEN+X7
14342  M00S07074.resex   +++|          BX7    X1
14343  M00S07075.resex   +++|          EQ     STD1        PROCESS DENSITY
14344  M00S07076.resex   +++| STF      SPACE  4,10
Line S07077 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14345  M01S07077.274l797 ---|**        SET FORMAT.
14346  M01S07078.274l797 ---|*                F=(I,SI,F,S,L)
Line S02671 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14347  M01S02671.274l797 +++|**        STF - SET FORMAT.
14348  M01S02672.274l797 +++|*
14349  M01S02673.274l797 +++|*         F=(I,SI,F,S,L,LI)
14350  M00S07079.resex   +++|
14351  M00S07080.resex   +++|
Line S07081 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14352  M01S07081.274l797 ---| STF      SA3    FC          READ CHARACTER COUNT ASSIGNMENT WORD
14353  M01S07082.274l797 ---|          SA4    =774077777777B
14354  M01S07083.274l797 ---|          ZR     X3,STF1     IF CHARACTER COUNT NOT ASSIGNED
14355  M01S07084.274l797 ---|          SA4    =177BS29
14356  M01S07085.274l797 ---| STF1     SB3    STFA        SET OPTION TABLE ADDRESS
Line S02674 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14357  M01S02674.274l797 +++| STF      BSS    0           ENTRY
14358  M01S02675.274l797 +++|          SB3    STFA        SET OPTION TABLE ADDRESS
14359  M00S07086.resex   +++|          SX6    B0+         DISABLE LITERAL PROCESSING
14360  M00S07087.resex   +++|          RJ     AOP         ANALYZE FORMAT OPTIONS
14361  M00S07088.resex   +++|          SA2    F+FTAP
Line S07089 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14362  M01S07089.274l797 ---|          BX2    -X4*X2
14363  M01S07090.274l797 ---|          BX1    X4*X7
14364  M01S07091.274l797 ---|          BX6    X1+X2
14365  M01S07092.274l797 ---|          SA6    A2
Line S02676 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14366  M01S02676.274l797 +++|          LX7    30
14367  M01S02677.274l797 +++|          BX7    X2+X7       SET FORMAT
14368  M01S02678.274l797 +++|          SA7    A2
14369  M01S02679.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14370  M01S02680.274l797 +++|
14371  M01S02681.274l797 +++|
14372  M01S02682.274l797 +++| STFA     VFD    42/0LI,18//COMSMTX/TFI    INTERNAL BINARY
14373  M01S02683.274l797 +++|          VFD    42/0LSI,18//COMSMTX/TFSI  SYSTEM INTERNAL
14374  M01S02684.274l797 +++|          VFD    42/0LF,18//COMSMTX/TFF    FOREIGN
14375  M01S02685.274l797 +++|          VFD    42/0LS,18//COMSMTX/TFS    STRANGER
14376  M01S02686.274l797 +++|          VFD    42/0LL,18//COMSMTX/TFL    LONG BLOCK STRANGER
14377  M01S02687.274l797 +++|          VFD    42/0LLI,18//COMSMTX/TFLI  LONG BLOCK INTERNAL
14378  M01S02688.274l797 +++|          CON    0
14379  M01S02689.274l797 +++| STT      SPACE  4,10
14380  M01S02690.274l797 +++|**        STT - SET TAPE DEVICE TYPE.
14381  M01S02691.274l797 +++|*
14382  M01S02692.274l797 +++|*         DT=(MT,NT,CT,AT)
14383  M01S02693.274l797 +++|*
14384  M01S02694.274l797 +++|*         THE FOLLOWING KEYWORDS ARE OBSOLETE AND ARE SUPPORTED FOR
14385  M01S02695.274l797 +++|*         COMPATIBILITY ONLY -
14386  M01S02696.274l797 +++|*
14387  M01S02697.274l797 +++|*         MT
14388  M01S02698.274l797 +++|*         NT
14389  M01S02699.274l797 +++|
14390  M01S02700.274l797 +++|
14391  M01S02701.274l797 +++| STT      BSS    0           ENTRY
14392  M01S02702.274l797 +++|          SB3    STTA        SET OPTION TABLE ADDRESS
14393  M01S02703.274l797 +++|          SX6    B0+         DISABLE LITERAL PROCESSING
14394  M01S02704.274l797 +++|          RJ     AOP         ANALYZE DEVICE TYPE OPTIONS
14395  M01S02705.274l797 +++|
14396  M01S02706.274l797 +++|*         ENTRY FOR *MT* AND *NT* KEYWORDS.
14397  M01S02707.274l797 +++|
14398  M01S02708.274l797 +++| STT1     SA1    F+FTAP
14399  M00S07093.resex   +++|          SX6    B1
Line S07094 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14400  M01S07094.274l797 ---|          SA6    FP          SET F= PROCESSED
14401  M01S07095.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02709 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14402  M01S02709.274l797 +++|          LX7    55-0
14403  M01S02710.274l797 +++|          SA6    TT          SET DEVICE TYPE SPECIFIED FLAG
14404  M01S02711.274l797 +++|          BX7    X1+X7       SET DEVICE TYPE
14405  M01S02712.274l797 +++|          SA7    A1
14406  M01S02713.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14407  M01S02714.274l797 +++|
14408  M01S02715.274l797 +++|
14409  M01S02716.274l797 +++| STTA     BSS    0
14410  M01S02717.274l797 +++|          VFD    42/0LMT,18//COMSMTX/DVMT
14411  M01S02718.274l797 +++|          VFD    42/0LNT,18//COMSMTX/DVNT
14412  M01S02719.274l797 +++|          VFD    42/0LCT,18//COMSMTX/DVCT
14413  M01S02720.274l797 +++|          VFD    42/0LAT,18//COMSMTX/DVAT
14414  M01S02721.274l797 +++|          CON    0
14415  M01S02722.274l797 +++| VSP      SPACE  4,10
14416  M01S02723.274l797 +++|**        VSP - SET VOLUME SERIAL NUMBERS.
14417  M01S02724.274l797 +++|*
14418  M01S02725.274l797 +++|*         VSN=NNNN/NNNN=NNNN/NNNN=...=NNNN/NNNN.
14419  M00S07096.resex   +++|
14420  M00S07097.resex   +++|
Line S07098 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14421  M01S07098.274l797 ---| STFA     VFD    24/0LI,6//COMSMTX/TFI,30/5120     INTERNAL BINARY
14422  M01S07099.274l797 ---|          VFD    24/0LSI,6//COMSMTX/TFSI,30/5120   SYSTEM INTERNAL
14423  M01S07100.274l797 ---|          VFD    24/0LF,6//COMSMTX/TFF,30/0        FOREIGN
14424  M01S07101.274l797 ---|          VFD    24/0LS,6//COMSMTX/TFS,30/0        STRANGER
14425  M01S07102.274l797 ---|          VFD    24/0LL,6//COMSMTX/TFL,30/0        LONG BLOCK STRANGER
14426  M01S07103.274l797 ---|          CON    0
14427  M01S07104.274l797 ---| STK      SPACE  4,10
14428  M01S07105.274l797 ---|**        SET SEVEN/NINE TRACK.
14429  M01S07106.274l797 ---|*                MT
14430  M01S07107.274l797 ---|*                NT
14431  M01S07108.274l797 ---|*         IF MT, CONVERSION MODE IS CLEARED.
14432  M01S07109.274l797 ---|
14433  M01S07110.274l797 ---|
14434  M01S07111.274l797 ---| STK      SX6    X7
14435  M01S07112.274l797 ---|          SX0    B1
14436  M01S07113.274l797 ---|          SA6    MN          SET MN = -1 IF *MT*, 1 IF *NT*
14437  M01S07114.274l797 ---|          SA2    F+FTAP
14438  M01S07115.274l797 ---|          BX7    X0*X7
14439  M01S07116.274l797 ---|          LX0    56-0
14440  M01S07117.274l797 ---|          BX2    -X0*X2
14441  M01S07118.274l797 ---|          LX7    56-0
14442  M01S07119.274l797 ---|          BX6    X7+X2       SET TRACK TYPE
14443  M01S07120.274l797 ---|          MX0    3
14444  M01S07121.274l797 ---|          SA6    A2
14445  M01S07122.274l797 ---|          NZ     X7,AMO1     IF *NT*
14446  M01S07123.274l797 ---|          LX0    -9
14447  M01S07124.274l797 ---|          BX6    -X0*X6      CLEAR CONVERSION MODE
14448  M01S07125.274l797 ---|          SA6    A2
14449  M01S07126.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
14450  M01S07127.274l797 ---| VSP      SPACE  4,10
14451  M01S07128.274l797 ---|**        SET VOLUME SERIAL NUMBER.
14452  M01S07129.274l797 ---|*                VSN=NNNN=NNNN=...=NNNN.
14453  M01S07130.274l797 ---|*                VSN=NNNN/NNNN/.../NNNN.
14454  M01S07131.274l797 ---|
14455  M01S07132.274l797 ---|
14456  M01S07133.274l797 ---| VSP      SA1    /CPA/RFCW   GET DEMAND FILE INDEX
Line S02726 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14457  M01S02726.274l797 +++| VSP      BSS    0           ENTRY
14458  M01S02727.274l797 +++|          SA1    /CPA/RFCW   GET DEMAND FILE INDEX
14459  M00S07134.resex   +++|          SX7    B1
14460  M00S07135.resex   +++|          SX1    X1
14461  M00S07136.resex   +++|          SA7    VP          SET VSN= PROCESSED
14462  M00S07137.resex   +++|          NZ     X1,VSP1     IF DEMAND ENTRY EXISTS
14463  M00S07138.resex   +++|          RJ     IDE         INITIALIZE DEMAND ENTRY
Line S07139 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
14464  M01S07139.282l826 ---| VSP1     SX4    B1          INDICATE *VSN* PARAMETER CALL
Line S01046 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
14465  M01S01046.282l826 +++| VSP1     SA3    F           SET FILE NAME
14466  M00S07140.resex   +++|          RJ     BVE         BUILD VSN ENTRY
Line S07141 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14467  M01S07141.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02728 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14468  M01S02728.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
14469  M00S07142.resex   +++| WRL      SPACE  4,10
Line S07143 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14470  M01S07143.274l797 ---|**        SET LABEL READ/WRITE.
14471  M01S07144.274l797 ---|*                R
14472  M01S07145.274l797 ---|*                W
14473  M01S07146.274l797 ---|*         FORCES RING IN IF *W*.
Line S02729 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14474  M01S02729.274l797 +++|**        WRL - SET LABEL READ/WRITE.
14475  M01S02730.274l797 +++|*
14476  M01S02731.274l797 +++|*         R
14477  M01S02732.274l797 +++|*         W
14478  M01S02733.274l797 +++|*
14479  M01S02734.274l797 +++|*         FORCES WRITE ENABLE REQUIRED IF *W*.
14480  M00S07147.resex   +++|
14481  M00S07148.resex   +++|
Line S07149 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14482  M01S07149.274l797 ---| WRL      NZ     X5,ERR      IF NOT *LABEL* CALL
14483  M01S07150.274l797 ---|          ZR     X7,AMO1     IF LABEL TO BE READ
Line S02735 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14484  M01S02735.274l797 +++| WRL      BSS    0           ENTRY
14485  M01S02736.274l797 +++|          NZ     X5,ERR      IF NOT *LABEL* CALL
14486  M01S02737.274l797 +++|          ZR     X7,AFOR     IF LABEL TO BE READ
14487  M00S07151.resex   +++|          SA2    F+FTAP      SET WRITE LABELS BIT
14488  M00S07152.resex   +++|          LX7    59-17
14489  M00S07153.resex   +++|          BX6    X2+X7
14490  M00S07154.resex   +++|          LX7    40-17-59+17
Line S07155 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14491  M01S07155.274l797 ---|          BX6    X6+X7       ENFORCE RING IN
Line S02738 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14492  M01S02738.274l797 +++|          BX6    X6+X7       SET WRITE ENABLE REQUIRED (PO = W)
14493  M00S07156.resex   +++|          SA6    A2+
Line S07157 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14494  M01S07157.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02739 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14495  M01S02739.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
Line S07158 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14496  M01S07158.v23l617 ---|          TITLE  CONTROL CARD PROCESSING SUBROUTINES.
Line S00113 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14497  M01S00113.v23l617 +++|          TITLE  COMMAND PROCESSING SUBROUTINES.
14498  M00S07159.resex   +++| AOP      SPACE  4,25
14499  M00S07160.resex   +++|**        AOP - ANALYZE OPTIONAL PARAMETERS.
14500  M00S07161.resex   +++|*
14501  M00S07162.resex   +++|*         ENTRY  (B6) = ADDRESS TO BEGIN PARAMETER ASSEMBLY
14502  M00S07163.resex   +++|*                (B3) = PARAMETER OPTION TABLE ADDRESS
14503  M00S07164.resex   +++|*                (X6) = 0, IF DISABLE LITERAL PROCESSING.
14504  M00S07165.resex   +++|*                       .NE. 0, IF ENABLE LITERAL PROCESSING.
14505  M00S07166.resex   +++|*
14506  M00S07167.resex   +++|*         EXIT   (X5) = SEPARATOR.
Line S07168 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14507  M01S07168.274l797 ---|*                (X7) = OPTION TABLE ENTRY.
14508  M01S07169.274l797 ---|*                (B2) = PARAMETER PROCESSOR ADDRESS
14509  M01S07170.274l797 ---|*                TO *AMO6*, IF ARGUMENTS EXHAUSTED.
Line S02740 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14510  M01S02740.274l797 +++|*                (X1) = OPTION TABLE ENTRY.
14511  M01S02741.274l797 +++|*                (X7) = LOWER 18 BITS OF ENTRY.
14512  M01S02742.274l797 +++|*                TO *AFOR*, IF ARGUMENTS EXHAUSTED.
14513  M00S07171.resex   +++|*
Line S07172 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14514  M01S07172.v23l617 ---|*         ERROR  TO *ERR*, IF CONTROL STATEMENT ERROR.
Line S00114 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14515  M01S00114.v23l617 +++|*         ERROR  TO *ERR*, IF COMMAND ERROR.
14516  M00S07173.resex   +++|*
Line S07174 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14517  M01S07174.274l797 ---|*         KEYWORDS MUST BE LESS THAN OR EQUAL TO FIVE CHARACTERS.
Line S02743 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14518  M01S02743.274l797 +++|*         KEYWORDS MUST BE LESS THAN OR EQUAL TO SEVEN CHARACTERS.
14519  M00S07175.resex   +++|*
14520  M00S07176.resex   +++|*         USES   A - 1, 5.
Line S07177 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14521  M01S07177.274l797 ---|*                B - 2, 7.
Line S02744 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14522  M01S02744.274l797 +++|*                B - 7.
14523  M00S07178.resex   +++|*                X - 0, 1, 5, 6, 7.
14524  M00S07179.resex   +++|*
14525  M00S07180.resex   +++|*         CALLS  CLP.
14526  M00S07181.resex   +++|
14527  M00S07182.resex   +++|
14528  M00S07183.resex   +++| AOP      SUBR               ENTRY/EXIT
Line S07184 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14529  M01S07184.274l797 ---|          ZR     B6,AMO6     IF ARGUMENTS EXHAUSTED
Line S02745 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14530  M01S02745.274l797 +++|          ZR     B6,AFOR     IF ARGUMENTS EXHAUSTED
14531  M00S07185.resex   +++|          RJ     CLP         CALL PICK OUT PARAMETER
14532  M00S07186.resex   +++|          GE     B5,B1,ERR   IF PARAMETER/KEYWORD TOO LONG
14533  M00S07187.resex   +++|          SB7    A1          RETAIN SEPARATOR ADDRESS
Line S07188 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14534  M01S07188.274l797 ---|          MX0    4*6
Line S02746 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14535  M01S02746.274l797 +++|          MX0    7*6
14536  M00S07189.resex   +++|          SA1    B3-1        READ OPTION TABLE
14537  M00S07190.resex   +++| AOP1     SA1    A1+B1
14538  M00S07191.resex   +++|          BX6    X0*X1       KEYWORD
14539  M00S07192.resex   +++|          ZR     X1,ERR      IF END OF OPTIONS
14540  M00S07193.resex   +++|          BX6    X6-X5
Line S07194 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14541  M01S07194.274l797 ---|          LX7    X1
Line S02747 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14542  M01S02747.274l797 +++|          BX7    -X0*X1      SET PARAMETERS
14543  M00S07195.resex   +++|          NZ     X6,AOP1     IF NO MATCH
Line S07196 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14544  M01S07196.274l797 ---|          SB2    X7
14545  M00S07197.resex   +++|          SA5    B7          READ SEPARATOR
14546  M00S07198.resex   +++|          EQ     AOPX
14547  M00S07199.resex   +++| CLP      SPACE  4,20
14548  M00S07200.resex   +++|**        CLP - CALL POP.
14549  M00S07201.resex   +++|*
14550  M00S07202.resex   +++|*         ENTRY  (B6) = ASSEMBLY POINTER.
14551  M00S07203.resex   +++|*                (X6) = 0, IF DISABLE LITERAL PROCESSING.
14552  M00S07204.resex   +++|*                       .NE. 0, IF ENABLE LITERAL PROCESSING.
14553  M00S07205.resex   +++|*
14554  M00S07206.resex   +++|*         EXIT   (B6) = NEXT ASSEMBLY POINTER.
14555  M00S07207.resex   +++|*                (X5) = FIRST PART OF PARAMETER.
Line S07208 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14556  M01S07208.274l797 ---|*                TO *AMO6*, IF ARGUMENTS EXHAUSTED.
Line S02748 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14557  M01S02748.274l797 +++|*                TO *AFOR*, IF ARGUMENTS EXHAUSTED.
14558  M00S07209.resex   +++|*
Line S07210 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14559  M01S07210.v23l617 ---|*         ERROR  TO *ERR*, IF CONTROL STATEMENT ERROR.
Line S00115 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14560  M01S00115.v23l617 +++|*         ERROR  TO *ERR*, IF COMMAND ERROR.
14561  M00S07211.resex   +++|*
14562  M00S07212.resex   +++|*         USES   A - 5, 6.
14563  M00S07213.resex   +++|*                X - 5.
14564  M00S07214.resex   +++|*
14565  M00S07215.resex   +++|*         CALLS  POP.
14566  M00S07216.resex   +++|
14567  M00S07217.resex   +++| CLP      SUBR               ENTRY/EXIT
Line S07218 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14568  M01S07218.v23l617 ---|          ZR     B6,AMO6     IF CONTROL CARD EXHAUSTED
Line S00116 Modification History
M01 (Added by) v23l617
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14569  M02S00116.274l797 ---|          ZR     B6,AMO6     IF COMMAND EXHAUSTED
Line S02749 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14570  M01S02749.274l797 +++|          ZR     B6,AFOR     IF COMMAND EXHAUSTED
14571  M00S07219.resex   +++|          SA6    LIT         SET PROPER OPTION FOR LITERAL PROCESSING
14572  M00S07220.resex   +++|          RJ     POP         PICK OUT PARAMETER
14573  M00S07221.resex   +++|          NG     B5,ERR      IF NO PARAMETER
Line S07222 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14574  M01S07222.v23l617 ---|          ZR     X2,ERR      IF ILLEGAL TERMINATION
Line S00117 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14575  M01S00117.v23l617 +++|          ZR     X2,ERR      IF INCORRECT TERMINATION
14576  M00S07223.resex   +++|          SA5    POPA        READ FIRST PART PARAMETER
14577  M00S07224.resex   +++|          EQ     CLPX        EXIT
14578  M00S07225.resex   +++| ENF      SPACE  4,15
14579  M00S07226.resex   +++|**        ENF - ENTER NUMERIC LABEL FIELD.
14580  M00S07227.resex   +++|*
14581  M00S07228.resex   +++|*         ENTRY  (X1) = FET WORD CONTROL
14582  M00S07229.resex   +++|*                            LOWER 18 BITS = FET WORD ADDRESS
14583  M00S07230.resex   +++|*                            SIGN BIT SET = FIELD BITS 23-15
14584  M00S07231.resex   +++|*                            SIGN BIT CLEAR = FIELD BITS 14-00
14585  M00S07232.resex   +++|*                (X6) = NUMBER IN OCTAL.
14586  M00S07233.resex   +++|*
14587  M00S07234.resex   +++|*         EXIT   FIELD ENTERED IN FET WORD.
14588  M00S07235.resex   +++|*
Line S07236 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14589  M01S07236.v23l617 ---|*         ERROR  TO *ERR*, IF CONTROL STATEMENT ERROR.
Line S00118 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14590  M01S00118.v23l617 +++|*         ERROR  TO *ERR*, IF COMMAND ERROR.
14591  M00S07237.resex   +++|*
14592  M00S07238.resex   +++|*         USES   A - 2, 6.
14593  M00S07239.resex   +++|*                X - 0, 1, 5, 6.
14594  M00S07240.resex   +++|
14595  M00S07241.resex   +++|
14596  M00S07242.resex   +++| ENF1     SX5    X6-100
14597  M00S07243.resex   +++|          PL     X5,ERR      IF VALUE TOO LARGE
14598  M00S07244.resex   +++|          MX0    -9
14599  M00S07245.resex   +++|          LX6    15
14600  M00S07246.resex   +++|          LX0    15
14601  M00S07247.resex   +++| ENF2     SA2    X1          ENTER VALUE IN FET WORD
14602  M00S07248.resex   +++|          BX2    X0*X2
14603  M00S07249.resex   +++|          BX6    X6+X2
14604  M00S07250.resex   +++|          SA6    A2
14605  M00S07251.resex   +++|
14606  M00S07252.resex   +++| ENF      SUBR               ENTRY/EXIT
14607  M00S07253.resex   +++|          MX0    -15
14608  M00S07254.resex   +++|          BX6    -X0*X6
14609  M00S07255.resex   +++|          NG     X1,ENF1     IF UPPER FIELD
Line S07256 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14610  M01S07256.v23l617 ---|          ZR     X6,ERR      IF ILLEGAL VALUE
Line S00119 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14611  M01S00119.v23l617 +++|          ZR     X6,ERR      IF INCORRECT VALUE
14612  M00S07257.resex   +++|          SX5    X6-10000
14613  M00S07258.resex   +++|          PL     X5,ERR      IF VALUE TOO LARGE
14614  M00S07259.resex   +++|          EQ     ENF2        ENTER VALUE IN FET WORD
14615  M00S07260.resex   +++| GRD      SPACE  4,15
14616  M00S07261.resex   +++|**        GRD - GENERATE RETENTION DATE.
14617  M00S07262.resex   +++|*
14618  M00S07263.resex   +++|*         ENTRY  (RC) = RETENTION CYCLE (LEFT-JUSTIFIED, DISPLAY CODE)
14619  M00S07264.resex   +++|*
14620  M00S07265.resex   +++|*         EXIT   RETENTION DATE SET IN FET+15B.
14621  M00S07266.resex   +++|*
Line S07267 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14622  M01S07267.v23l617 ---|*         ERROR  TO *ERR*, IF CONTROL STATEMENT ERROR.
Line S00120 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
14623  M01S00120.v23l617 +++|*         ERROR  TO *ERR*, IF COMMAND ERROR.
14624  M00S07268.resex   +++|*
14625  M00S07269.resex   +++|*         USES   A - 0, 1, 2, 4, 7.
14626  M00S07270.resex   +++|*                B - 2, 3, 4, 7.
14627  M00S07271.resex   +++|*                X - 0, 1, 2, 4, 5, 6, 7.
14628  M00S07272.resex   +++|*
14629  M00S07273.resex   +++|*         CALLS  CDD, DXB.
14630  M00S07274.resex   +++|*
14631  M00S07275.resex   +++|*         MACROS JDATE.
14632  M00S07276.resex   +++|
14633  M00S07277.resex   +++|
14634  M00S07278.resex   +++| GRD      SUBR               ENTRY/EXIT
14635  M00S07279.resex   +++|          JDATE  GRDA        SET CURRENT DATE
14636  M00S07280.resex   +++|          SA1    F+FCRD      CHECK CREATION DATE
14637  M00S07281.resex   +++|          ZR     X1,GRD1     IF NO CREATION DATE
14638  M00S07282.resex   +++|          BX7    X1
14639  M00S07283.resex   +++|          SA7    GRDA
14640  M00S07284.resex   +++| GRD1     SA1    RC          CHECK RETENTION CYCLE
14641  M00S07285.resex   +++|          ZR     X1,GRDX     IF NO RETENTION CYCLE
14642  M00S07286.resex   +++|          BX5    X1
14643  M00S07287.resex   +++|          SB7    B1
14644  M00S07288.resex   +++|          RJ     DXB
14645  M00S07289.resex   +++|          SX5    999         CHECK PARAMETER VALIDITY
14646  M00S07290.resex   +++|          NZ     X4,ERR      IF ASSEMBLY ERRORS
14647  M00S07291.resex   +++|          IX7    X5-X6
14648  M00S07292.resex   +++|          SA2    GRDA
14649  M00S07293.resex   +++|          MX0    18
14650  M00S07294.resex   +++|          SA4    =5L99999    SET UNLIMITED EXPIRATION DATE
14651  M00S07295.resex   +++|          ZR     X7,GRD4     IF INFINITE RETENTION CYCLE
14652  M00S07296.resex   +++|          SA0    X6          SAVE RETENTION DAYS
14653  M00S07297.resex   +++|          LX2    42
14654  M00S07298.resex   +++|          NG     X7,ERR      IF RETENTION CYCLE GREATER THAN 999
14655  M00S07299.resex   +++|          BX5    X0*X2
14656  M00S07300.resex   +++|          RJ     DXB         CONVERT CURRENT JULIAN DAYS
14657  M00S07301.resex   +++|          SA2    GRDA
14658  M00S07302.resex   +++|          NZ     X4,ERR      IF ASSEMBLY ERRORS
14659  M00S07303.resex   +++|          MX0    12
14660  M00S07304.resex   +++|          LX2    30
14661  M00S07305.resex   +++|          SB4    X6+
14662  M00S07306.resex   +++|          BX5    X0*X2
14663  M00S07307.resex   +++|          SA0    A0+B4       EXTEND DAYS TO END OF RETENTION CYCLE
14664  M00S07308.resex   +++|          RJ     DXB         CONVERT CURRENT JULIAN YEARS
14665  M00S07309.resex   +++|          SX0    3
14666  M00S07310.resex   +++|          NZ     X4,ERR      IF ASSEMBLY ERRORS
14667  M00S07311.resex   +++| GRD2     BX5    X0*X6
14668  M00S07312.resex   +++|          SX6    X6+B1
Line S07313 Modification History
M01 (Removed by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14669  M01S07313.ns2786  ---|          SB4    366
Line S00001 Modification History
M01 (Added by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14670  M01S00001.ns2786  +++|          SB7    366
14671  M00S07314.resex   +++|          ZR     X5,GRD3     IF LEAP YEAR
Line S07315 Modification History
M01 (Removed by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14672  M01S07315.ns2786  ---|          SB4    B4-1
14673  M01S07316.ns2786  ---| GRD3     SA0    A0-B4
Line S00002 Modification History
M01 (Added by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14674  M01S00002.ns2786  +++|          SB7    365
14675  M01S00003.ns2786  +++| GRD3     SA0    A0-B7
14676  M00S07317.resex   +++|          SB2    A0
Line S00004 Modification History
M01 (Added by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14677  M01S00004.ns2786  +++|          ZR     B2,GRD3.1   IF NO MORE DAYS
14678  M00S07318.resex   +++|          PL     B2,GRD2     IF MORE DAYS
Line S07319 Modification History
M01 (Removed by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14679  M01S07319.ns2786  ---|          SA0    A0+B4
14680  M01S07320.ns2786  ---|          SX1    X6-1
Line S00005 Modification History
M01 (Added by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14681  M01S00005.ns2786  +++| GRD3.1   SX1    X6+99       ADJUST AND BIAS TO ENSURE ENOUGH DIGITS
14682  M00S07321.resex   +++|          RJ     CDD         CONVERT NEW YEAR
Line S07322 Modification History
M01 (Removed by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14683  M01S07322.ns2786  ---|          BX5    X4          SAVE YEAR
14684  M01S07323.ns2786  ---|          SX1    A0
Line S00006 Modification History
M01 (Added by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14685  M01S00006.ns2786  +++|          MX7    -12
14686  M01S00007.ns2786  +++|          BX5    -X7*X6      ISOLATE AND SAVE YEAR
14687  M01S00008.ns2786  +++|          LX5    48          POSITION YEAR
14688  M01S00009.ns2786  +++|          SA0    A0+B7
14689  M01S00010.ns2786  +++|          SX1    A0+1000     BIAS DAYS TO ENSURE ENOUGH DIGITS
14690  M00S07324.resex   +++|          RJ     CDD         CONVERT NEW DAY
Line S07325 Modification History
M01 (Removed by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14691  M01S07325.ns2786  ---|          MX7    12
14692  M01S07326.ns2786  ---|          BX5    X7*X5
14693  M01S07327.ns2786  ---|          SB4    6*3
14694  M01S07328.ns2786  ---|          MX0    18
14695  M01S07329.ns2786  ---|          SX7    3R000
14696  M01S07330.ns2786  ---|          BX4    X0*X4
14697  M01S07331.ns2786  ---|          SB3    B4-B2
14698  M01S07332.ns2786  ---|          BX7    X7+X4
14699  M01S07333.ns2786  ---|          GT     B2,B4,ERR   IF TOO MANY DIGITS
14700  M01S07334.ns2786  ---|          SB4    60
14701  M01S07335.ns2786  ---|          SB3    B4-B3
14702  M01S07336.ns2786  ---|          LX7    X7,B3
14703  M01S07337.ns2786  ---|          BX7    X0*X7
Line S00011 Modification History
M01 (Added by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14704  M01S00011.ns2786  +++|          MX0    -18
Line S07338 Modification History
M01 (Removed by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14705  M01S07338.ns2786  ---|          LX7    -12
Line S00012 Modification History
M01 (Added by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
14706  M01S00012.ns2786  +++|          BX7    -X0*X6      ISOLATE DAY
14707  M01S00013.ns2786  +++|          LX7    30          POSITION DAY
14708  M00S07339.resex   +++|          BX4    X5+X7
14709  M00S07340.resex   +++| GRD4     SA2    F+FRTD      ENTER RETENTION DATE
14710  M00S07341.resex   +++|          MX0    30
14711  M00S07342.resex   +++|          BX2    -X0*X2
14712  M00S07343.resex   +++|          BX7    X2+X4
14713  M00S07344.resex   +++|          SA7    A2
14714  M00S07345.resex   +++|          EQ     GRDX        RETURN
14715  M00S07346.resex   +++|
14716  M00S07347.resex   +++|
14717  M00S07348.resex   +++| GRDA     CON    0           CREATION DATE TEMPORARY
Line S00880 Modification History
M01 (Added by) 252l678
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
14718  M02S00880.253l688 ---|          TITLE  TMS COMMAND PROCESSING.
Line S00667 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
14719  M01S00667.253l688 +++|          TITLE  *TMS* COMMAND PROCESSING.
Line S00881 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
14720  M01S00881.252l678 +++| TMS      SPACE  4
14721  M01S00882.252l678 +++|          QUAL   TFM
14722  M01S00883.252l678 +++| COMMON   SPACE  4,10
14723  M01S00884.252l678 +++|**        COMMON DECKS.
14724  M01S00885.252l678 +++|
14725  M01S00886.252l678 +++|
14726  M01S00887.252l678 +++|*CALL     COMSTCM
14727  M01S00888.252l678 +++| FETS     SPACE  4,10
14728  M01S00889.252l678 +++|**        PASSWORD FETS.
14729  M01S00890.252l678 +++|
14730  M01S00891.252l678 +++|
14731  M01S00892.252l678 +++| I        BSS    0           INPUT FILE FET
14732  M01S00893.252l678 +++| INPUT    FILEC  IBUF,BUFL,FET=6
14733  M01S00894.252l678 +++|
14734  M01S00895.252l678 +++| O        BSS    0           OUTPUT FILE FET
14735  M01S00896.252l678 +++| OUTPUT   FILEB  PMSG,PMSGL+1,FET=6
14736  M01S00897.252l678 +++| TMO      SPACE  4,15
14737  M01S00898.252l678 +++|**        TMO - TAPE MANAGER OPTIONS.
14738  M01S00899.252l678 +++|*
14739  M01S00900.252l678 +++|*         ENTRY  USBB HAS CONTROL CARD (1 CHARACTER PER WORD).
14740  M01S00901.252l678 +++|*                (X1) = PARAMETER.
14741  M01S00902.252l678 +++|*                (A1) = ADDRESS OF SEPARATOR.
14742  M01S00903.252l678 +++|*                (B6) = STRING BUFFER POINTER.
14743  M01S00904.252l678 +++|*
14744  M01S00905.252l678 +++|*         EXIT   TO KEYWORD PROCESSOR.
14745  M01S00906.252l678 +++|*                (X5) = REQUEST TYPE.
14746  M01S00907.252l678 +++|*                (X7) = PROCESSOR PARAMETERS.
14747  M01S00908.252l678 +++|*
14748  M01S00909.252l678 +++|*         USES   X - 0, 1, 3, 4, 5, 6, 7.
14749  M01S00910.252l678 +++|*                A - 3, 4, 5, 6.
14750  M01S00911.252l678 +++|*                B - 2, 3.
14751  M01S00912.252l678 +++|
14752  M01S00913.252l678 +++|
Line S00914 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14753  M02S00914.274l797 ---| TMO      SA3    TMPF        TAPE MANAGER OPTION PROCESSOR
Line S02750 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14754  M01S02750.274l797 +++| TMO      BSS    0           ENTRY
14755  M01S02751.274l797 +++|          SA3    TMPF        TAPE MANAGER OPTION PROCESSOR
Line S00915 Modification History
M01 (Added by) 252l678
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
14756  M02S00915.253l688 ---|          NG     X3,ERR      IF TMS DISABLED
Line S00668 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
14757  M01S00668.253l688 +++|          NG     X3,ERR      IF *TMS* DISABLED
Line S00916 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
14758  M01S00916.252l678 +++|          SX4    TMOA        PARAMETER KEYWORD TABLE ADDRESS
14759  M01S00917.252l678 +++|          MX0    18
14760  M01S00918.252l678 +++|          SB3    B0
14761  M01S00919.252l678 +++| TMO1     SA3    B3+X4
14762  M01S00920.252l678 +++|          BX7    X0*X3
14763  M01S00921.252l678 +++|          IX6    X1-X7
14764  M01S00922.252l678 +++|          SB3    B3+B1
14765  M01S00923.252l678 +++|          NG     X6,ERR      IF KEYWORD NOT FOUND
14766  M01S00924.252l678 +++|          NZ     X6,TMO1     IF NOT TO KEYWORD YET
14767  M01S00925.252l678 +++|          SA4    A1
14768  M01S00926.252l678 +++|          SB2    X3
14769  M01S00927.252l678 +++|          SA6    A3+         CLEAR KEYWORD ENTRY
14770  M01S00928.252l678 +++|          LX3    42
14771  M01S00929.252l678 +++|          MX0    -18         EXTRACT PROCESSOR PARAMETERS
14772  M01S00930.252l678 +++|          BX7    -X0*X3
14773  M01S00931.252l678 +++|          PL     B2,TMO2     IF KEYWORD VALUE NOT REQUIRED
14774  M01S00932.252l678 +++|          SX1    X4-1R=
14775  M01S00933.252l678 +++|          SB2    -B2
14776  M01S00934.252l678 +++|          NZ     X1,ERR      IF SEPARATOR NOT *=*
14777  M01S00935.252l678 +++| TMO2     SA5    RT          GET REQUEST TYPE
14778  M01S00936.252l678 +++|          JP     B2          EXECUTE KEYWORD PROCESSOR
14779  M01S00937.252l678 +++|
14780  M01S00938.252l678 +++| TMOA     BSS    0           TAPE MANAGER ASSEMBLY OPTIONS.
14781  M01S00939.252l678 +++|
14782  M01S00940.252l678 +++| AC       MKTE   -SAC        AUDIT ACCESSIBILITY
14783  M01S00941.252l678 +++| CT       MKTE   -SCT        CATEGORY TYPE
14784  M01S00942.252l678 +++| MD       MKTE   -SMD        FILE MODE
14785  M01S00943.252l678 +++| PW       MKTE   AUA,,(18/F+FPSW)  ALTERNATE USER PASSWORD
14786  M01S00944.252l678 +++| TO       MKTE   STO         TAPE MANAGER OPTIONS
14787  M01S00945.252l678 +++| UN       MKTE   AUA,,(18/F+FAUN)  ALTERNATE USERNAME
14788  M01S00946.252l678 +++|
14789  M01S00947.252l678 +++|          CON    37777777777777777777B
14790  M01S00948.252l678 +++|          EJECT
14791  M01S00949.252l678 +++| AUA      SPACE  4,10
14792  M01S00950.252l678 +++|**        AUA - ALTERNATE USER ACCESS.
14793  M01S00951.252l678 +++|*
14794  M01S00952.252l678 +++|*                PW.
14795  M01S00953.252l678 +++|*                PW=PASSWRD.
14796  M01S00954.252l678 +++|*                UN=USERNAM.
Line S00955 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14797  M02S00955.274l797 ---|          SPACE  2,10
14798  M02S00956.274l797 ---| AUA      SA7    AUAA        SAVE ARGUMENT ADDRESS
Line S02752 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14799  M01S02752.274l797 +++|
14800  M01S02753.274l797 +++|
14801  M01S02754.274l797 +++| AUA      BSS    0           ENTRY
14802  M01S02755.274l797 +++|          SA7    AUAA        SAVE ARGUMENT ADDRESS
Line S00957 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
14803  M01S00957.252l678 +++|          SX1    X4-1R=
14804  M01S00958.252l678 +++|          ZR     X1,AUA1     IF KEYWORD EQUATED
14805  M01S00959.252l678 +++|          ZR     B6,AUA2     IF CONTROL CARD EXHAUSTED
14806  M01S00960.252l678 +++|          SX1    X4-1R,
14807  M01S00961.252l678 +++|          ZR     X1,AUA2     IF NO ARGUMENT GIVEN
14808  M01S00962.252l678 +++| AUA1     SX6    B0+         DISABLE LITERAL PROCESSING
14809  M01S00963.252l678 +++|          RJ     CLP         CALL *POP*
14810  M01S00964.252l678 +++|          MX0    7*6
14811  M01S00965.252l678 +++|          BX4    -X0*X5
14812  M01S00966.252l678 +++|          NZ     X4,ERR      IF PARAMETER TOO LONG
14813  M01S00967.252l678 +++|          BX6    X0*X5
14814  M01S00968.252l678 +++|          EQ     AUA3        STORE ARGUMENT
14815  M01S00969.252l678 +++|
14816  M01S00970.252l678 +++| AUA2     SX7    B6          SAVE (B6)
14817  M01S00971.252l678 +++|          SA7    A7+B1
14818  M01S00972.252l678 +++|          RJ     ESP         ENTER SECURE PASSWORD
14819  M01S00973.252l678 +++|          SA1    AUAB
14820  M01S00974.252l678 +++|          SB6    X1+         RESTORE (B6)
14821  M01S00975.252l678 +++| AUA3     SA1    AUAA
14822  M01S00976.252l678 +++|          SA1    X1
14823  M01S00977.252l678 +++|          BX2    -X0*X1
14824  M01S00978.252l678 +++|          BX7    X2+X6
14825  M01S00979.252l678 +++|          SA7    A1
Line S00980 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14826  M02S00980.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02756 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14827  M01S02756.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
Line S00981 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
14828  M01S00981.252l678 +++|
14829  M01S00982.252l678 +++| AUAA     CON    0           TEMPORARY
14830  M01S00983.252l678 +++| AUAB     CON    0           TEMPORARY
14831  M01S00984.252l678 +++| ESP      SPACE  4,20
14832  M01S00985.252l678 +++|**        ESP - ENTER SECURE PASSWORD.
14833  M01S00986.252l678 +++|*
14834  M01S00987.252l678 +++|*         THIS SUBROUTINE PROCESSES SECURELY ENTERED PASSWORDS.
14835  M01S00988.252l678 +++|*         IF OUTPUT FILE IS ASSIGNED TO A TERMINAL THE MESSAGE
14836  M01S00989.252l678 +++|*         *PASSWORD:* ALONG WITH BLANK OUT CHARACTERS FOR SECURE
14837  M01S00990.252l678 +++|*         ENTRY OF PASSWORD WILL BE SENT TO THE TERMINAL.
14838  M01S00991.252l678 +++|*         FILE *INPUT* WILL THEN BE READ FOR THE PASSWORD.
14839  M01S00992.252l678 +++|*         FOR BATCH JOBS FILE *INPUT* IS READ FOR THE PASSWORD.
14840  M01S00993.252l678 +++|*
14841  M01S00994.252l678 +++|*         EXIT   (X6) = PASSWORD.
14842  M01S00995.252l678 +++|*                ABORT WITH *INCORRECT PASSWORD* IF INCORRECT PASSWORD
14843  M01S00996.252l678 +++|*                ENCOUNTERED.
14844  M01S00997.252l678 +++|*
14845  M01S00998.252l678 +++|*         USES   X - ALL.
14846  M01S00999.252l678 +++|*                A - 1, 2, 6, 7.
14847  M01S01000.252l678 +++|*                B - 2, 3, 4, 5, 6, 7.
14848  M01S01001.252l678 +++|*
14849  M01S01002.252l678 +++|*         CALLS  STF.
14850  M01S01003.252l678 +++|*
14851  M01S01004.252l678 +++|*         MACROS CSET, MESSAGE, READSKP, WRITE.
14852  M01S01005.252l678 +++|
14853  M01S01006.252l678 +++|
14854  M01S01007.252l678 +++| ESP      SUBR               ENTRY/EXIT
14855  M01S01008.252l678 +++|          SX2    O           SET ADDRESS OF FET
14856  M01S01009.252l678 +++|          RJ     STF         CHECK IF OUTPUT ASSIGNED TO TERMINAL
14857  M01S01010.252l678 +++|          NZ     X6,ESP1     IF OUTPUT NOT ASSIGNED TO TERMINAL
14858  M01S01011.252l678 +++|          SA1    X2+B1       SET BUFFER FULL
14859  M01S01012.252l678 +++|          SX7    X1
14860  M01S01013.252l678 +++|          SX6    X1+PMSGL
14861  M01S01014.252l678 +++|          SA6    A1+B1       SET IN BELOW DATA FOR MESSAGE
14862  M01S01015.252l678 +++|          SA7    A6+B1       SET OUT = FIRST
14863  M01S01016.252l678 +++|          WRITE  X2,*        FORCE WRITE BIT SET
14864  M01S01017.252l678 +++|          SA1    O
14865  M01S01018.252l678 +++|          MX0    42
14866  M01S01019.252l678 +++|          BX2    X0*X1       FILE NAME FOR OUTPUT POINTER
14867  M01S01020.252l678 +++|          SX1    A1          SET ADDRESS OF FET FOR POINTER
14868  M01S01021.252l678 +++|          BX6    X1+X2
14869  M01S01022.252l678 +++|          SA6    ARGR        FORCE WRITE BEFORE READ ON ROLLOUT
14870  M01S01023.252l678 +++| ESP1     SX2    I           SET ADDRESS OF FET
14871  M01S01024.252l678 +++|          RJ     STF         CHECK IF INPUT ASSIGNED TO TERMINAL
14872  M01S01025.252l678 +++|          NZ     X6,ESP2     IF INPUT NOT ASSIGNED TO TERMINAL
14873  M01S01026.252l678 +++|          CSET   NORMAL      ENSURE TERMINAL IN NORMAL MODE
14874  M01S01027.252l678 +++| ESP2     READSKP I,,R       READ INPUT FOR PASSWORD
14875  M01S01028.252l678 +++|          SA1    I+2         DETERMINE NUMBER OF WORDS READ
14876  M01S01029.252l678 +++|          SA2    A1+B1
14877  M01S01030.252l678 +++|          IX6    X1-X2
14878  M01S01031.252l678 +++|          ZR     X6,ESP10    IF NO DATA ENTERED (NULL PASSWORD)
14879  M01S01032.252l678 +++|          SB5    X6
14880  M01S01033.252l678 +++|          SB3    B0
14881  M01S01034.252l678 +++|          BX5    X5-X5
14882  M01S01035.252l678 +++|          MX6    0
14883  M01S01036.252l678 +++|          SB4    60
14884  M01S01037.252l678 +++|          SB7    B0
14885  M01S01038.252l678 +++|          MX0    -6
14886  M01S01039.252l678 +++| ESP3     SA2    IBUF+B3     PICK UP NEXT DATA WORD
14887  M01S01040.252l678 +++|          SB2    B0+
14888  M01S01041.252l678 +++| ESP4     LX2    6
14889  M01S01042.252l678 +++|          BX1    -X0*X2      PICK UP CHARACTER TO CHECK
14890  M01S01043.252l678 +++|          NZ     X1,ESP5     IF CHARACTER NOT ZERO
14891  M01S01044.252l678 +++|          NZ     X5,ESP10    IF 00 ENCOUNTERED
14892  M01S01045.252l678 +++|          SX5    B1+         SET FLAG TO INDICATE 0 ENCOUNTERED
14893  M01S01046.252l678 +++|          EQ     ESP9        GET NEXT CHARACTER
14894  M01S01047.252l678 +++|
14895  M01S01048.252l678 +++| ESP5     NZ     X5,ESP11    IF PREVIOUS CHARACTER = COLON
14896  M01S01049.252l678 +++| ESP6     SB6    X1-1R9
14897  M01S01050.252l678 +++|          GT     B6,ESP8     IF NOT ALPHANUMERIC CHARACTER
14898  M01S01051.252l678 +++| ESP7     SB4    B4-6
14899  M01S01052.252l678 +++|          LX7    X1,B4
14900  M01S01053.252l678 +++|          BX6    X7+X6
14901  M01S01054.252l678 +++|          SB7    B7+1
14902  M01S01055.252l678 +++|          SB6    B7-7
14903  M01S01056.252l678 +++|          GT     B6,ESP11    IF PASSWORD .GT. SEVEN CHARACTERS
14904  M01S01057.252l678 +++|          EQ     ESP9        GET NEXT CHARACTER
14905  M01S01058.252l678 +++|
14906  M01S01059.252l678 +++| ESP8     SX4    X1-1R*
14907  M01S01060.252l678 +++|          ZR     X4,ESP7     IF CHARACTER = *
14908  M01S01061.252l678 +++|          SX3    X1-1R
14909  M01S01062.252l678 +++|          NZ     X3,ESP11    IF CHARACTER NOT BLANK
14910  M01S01063.252l678 +++| ESP9     SB2    B2+B1
14911  M01S01064.252l678 +++|          SB6    B2-10
14912  M01S01065.252l678 +++|          LT     B6,ESP4     IF NOT END OF WORD
14913  M01S01066.252l678 +++|          SB3    B3+B1
14914  M01S01067.252l678 +++|          SB6    B5-B3
14915  M01S01068.252l678 +++|          EQ     B6,ESP11    IF TOO MUCH DATA ENTERED
14916  M01S01069.252l678 +++|          EQ     ESP3        CONTINUE PASSWORD CHECK
14917  M01S01070.252l678 +++|
14918  M01S01071.252l678 +++| ESP10    SA1    I+1
14919  M01S01072.252l678 +++|          BX7    X1
14920  M01S01073.252l678 +++|          SA7    A1+B1       SET IN = FIRST FOR INPUT BUFFER
14921  M01S01074.252l678 +++|          EQ     ESPX        RETURN
14922  M01S01075.252l678 +++|
14923  M01S01076.252l678 +++| ESP11    MESSAGE ESPA,3,R   *INCORRECT PASSWORD.*
14924  M01S01077.252l678 +++|          SB2    /PER/ARG    *ARGUMENT ERROR*
14925  M01S01078.252l678 +++|          EQ     PER         PROCESS ERROR
14926  M01S01079.252l678 +++|
14927  M01S01080.252l678 +++| ESPA     DATA   C* INCORRECT PASSWORD.*
14928  M01S01081.252l678 +++|
14929  M01S01082.252l678 +++|*         MESSAGE FOR SECURE ENTRY OF PASSWORD.
14930  M01S01083.252l678 +++|
14931  M01S01084.252l678 +++| PMSG     DATA   10H"EM"  PASSWO
14932  M01S01085.252l678 +++|          DATA   10HRD:"NL"  (((
14933  M01S01086.252l678 +++|          DATA   10H((((("CR"  )
14934  M01S01087.252l678 +++|          DATA   10H)))))))"CR"
14935  M01S01088.252l678 +++|          DATA   10H MMMMMMMM
14936  M01S01089.252l678 +++|          DATA   10H"CR"  QQQQQQ
14937  M01S01090.252l678 +++|          DATA   10HQQ"CR"  XXXX
14938  M01S01091.252l678 +++|          DATA   10HXXXX"CR""CB""EL"
14939  M01S01092.252l678 +++| PMSGL    EQU    *-PMSG
14940  M01S01093.252l678 +++| SAC      SPACE  4,10
14941  M01S01094.252l678 +++|**        SAC - SET AUDIT CHARACTERISTIC.
14942  M01S01095.252l678 +++|*
14943  M01S01096.252l678 +++|*         AC=ACCESSIBILITY.
14944  M01S01097.252l678 +++|
14945  M01S01098.252l678 +++|
Line S01099 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14946  M02S01099.274l797 ---| SAC      SB3    SACA        SET OPTION TABLE ADDRESS
Line S02757 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14947  M01S02757.274l797 +++| SAC      BSS    0           ENTRY
14948  M01S02758.274l797 +++|          SB3    SACA        SET OPTION TABLE ADDRESS
Line S01100 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
14949  M01S01100.252l678 +++|          RJ     AOP         ANALYZE OPTION PARAMETER
14950  M01S01101.252l678 +++|          SA1    F+FFAC
Line S01102 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14951  M02S01102.274l797 ---|          MX0    -6          SET OPTION
14952  M02S01103.274l797 ---|          LX0    17-5
14953  M02S01104.274l797 ---|          BX1    X0*X1
Line S01105 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
14954  M01S01105.252l678 +++|          LX7    17-5
Line S01106 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14955  M02S01106.274l797 ---|          BX2    -X0*X7
14956  M02S01107.274l797 ---|          BX6    X1+X2
14957  M02S01108.274l797 ---|          SA6    A1
14958  M02S01109.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02759 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14959  M01S02759.274l797 +++|          BX7    X1+X7
14960  M01S02760.274l797 +++|          SA7    A1
14961  M01S02761.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
Line S01110 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
14962  M01S01110.252l678 +++|
14963  M01S01111.252l678 +++|
14964  M01S01112.252l678 +++| SACA     BSS    0           AUDIT ACCESSIBILITY TABLE
Line S01113 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14965  M02S01113.274l797 ---|          VFD    24/0LN,24/0,12//TFM/FANO
14966  M02S01114.274l797 ---|          VFD    24/0LY,24/0,12//TFM/FAYS
Line S02762 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14967  M01S02762.274l797 +++|          VFD    42/0LN,18//TFM/FANO
14968  M01S02763.274l797 +++|          VFD    42/0LY,18//TFM/FAYS
Line S01115 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
14969  M01S01115.252l678 +++|          CON    0           END OF TABLE
14970  M01S01116.252l678 +++| SCT      SPACE  4,10
14971  M01S01117.252l678 +++|**        SCT - SET CATEGORY TYPE.
14972  M01S01118.252l678 +++|*
14973  M01S01119.252l678 +++|*         CT=TYPE.
14974  M01S01120.252l678 +++|
14975  M01S01121.252l678 +++|
Line S01122 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14976  M02S01122.274l797 ---| SCT      SB3    SCTA        SET OPTION TABLE ADDRESS
Line S02764 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14977  M01S02764.274l797 +++| SCT      BSS    0           ENTRY
14978  M01S02765.274l797 +++|          SB3    SCTA        SET OPTION TABLE ADDRESS
Line S01123 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
14979  M01S01123.252l678 +++|          RJ     AOP         ANALYZE OPTION PARAMETER
14980  M01S01124.252l678 +++|          SA1    F+FFCT
Line S01125 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14981  M02S01125.274l797 ---|          MX0    -6          SET OPTION
14982  M02S01126.274l797 ---|          LX0    11-5
14983  M02S01127.274l797 ---|          BX1    X0*X1
Line S01128 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
14984  M01S01128.252l678 +++|          LX7    11-5
Line S01129 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14985  M02S01129.274l797 ---|          BX2    -X0*X7
14986  M02S01130.274l797 ---|          BX6    X1+X2
14987  M02S01131.274l797 ---|          SA6    A1
14988  M02S01132.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02766 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14989  M01S02766.274l797 +++|          BX7    X1+X7
14990  M01S02767.274l797 +++|          SA7    A1
14991  M01S02768.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
Line S01133 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
14992  M01S01133.252l678 +++|
14993  M01S01134.252l678 +++|
14994  M01S01135.252l678 +++| SCTA     BSS    0           CATEGORY TYPE CONVERSION TABLE
Line S01136 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14995  M02S01136.274l797 ---|          VFD    24/0LP,24/0,12//TFM/FCPR
14996  M02S01137.274l797 ---|          VFD    24/0LPR,24/0,12//TFM/FCPR
14997  M02S01138.274l797 ---|          VFD    24/0LPU,24/0,12//TFM/FCPU
14998  M02S01139.274l797 ---|          VFD    24/0LS,24/0,12//TFM/FCSP
Line S02769 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
14999  M01S02769.274l797 +++|          VFD    42/0LP,18//TFM/FCPR
15000  M01S02770.274l797 +++|          VFD    42/0LPR,18//TFM/FCPR
15001  M01S02771.274l797 +++|          VFD    42/0LPU,18//TFM/FCPU
15002  M01S02772.274l797 +++|          VFD    42/0LS,18//TFM/FCSP
Line S01140 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
15003  M01S01140.252l678 +++|          CON    0           END OF TABLE
15004  M01S01141.252l678 +++| SMD      SPACE  4,10
15005  M01S01142.252l678 +++|**        SMD - SET FILE MODE.
15006  M01S01143.252l678 +++|*
15007  M01S01144.252l678 +++|*         MD=MODE.
15008  M01S01145.252l678 +++|
15009  M01S01146.252l678 +++|
Line S01147 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
15010  M02S01147.274l797 ---| SMD      SB3    SMDA        SET OPTION TABLE ADDRESS
Line S02773 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
15011  M01S02773.274l797 +++| SMD      BSS    0           ENTRY
15012  M01S02774.274l797 +++|          SB3    SMDA        SET OPTION TABLE ADDRESS
Line S01148 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
15013  M01S01148.252l678 +++|          RJ     AOP         ANALYZE OPTION PARAMETER
15014  M01S01149.252l678 +++|          SA1    F+FFMD
Line S01150 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
15015  M02S01150.274l797 ---|          MX0    -6          SET OPTION
15016  M02S01151.274l797 ---|          BX1    X0*X1
15017  M02S01152.274l797 ---|          BX2    -X0*X7
15018  M02S01153.274l797 ---|          BX6    X1+X2
15019  M02S01154.274l797 ---|          SA6    A1+
15020  M02S01155.274l797 ---|          EQ     AMO1        PROCESS NEXT ARGUMENT
Line S02775 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
15021  M01S02775.274l797 +++|          BX7    X1+X7
15022  M01S02776.274l797 +++|          SA7    A1
15023  M01S02777.274l797 +++|          EQ     AFOR        PROCESS NEXT ARGUMENT
Line S01156 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
15024  M01S01156.252l678 +++|
15025  M01S01157.252l678 +++|
15026  M01S01158.252l678 +++| SMDA     BSS    0           FILE MODE CONVERSION TABLE
Line S01159 Modification History
M01 (Added by) 252l678
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
15027  M02S01159.274l797 ---|          VFD    24/0LR,24/0,12//TFM/FMRE
15028  M02S01160.274l797 ---|          VFD    24/0LW,24/0,12//TFM/FMWR
Proceed to Part 13