User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:1mt.006

Deck 1MT Part 006

92 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
05277  M01S03416.1mt     +++|          RJM    CCT         CONVERT CONVERSION TABLE
05278  M01S03417.1mt     +++|          LDC    BFMS        SET BUFFER ADDRESS
05279  M01S03418.1mt     +++|          STM    LCAA
05280  M01S03419.1mt     +++|          LDN    57          LOAD READ CONVERSION TABLE
05281  M01S03420.1mt     +++| LCA3     ADD    EQ
05282  M01S03421.1mt     +++|          RJM    ICF         ISSUE FUNCTION
05283  M01S03422.1mt     +++| LCA4     ZJN    LCA7        IF LOAD ERRORS
05284  M01S03423.1mt     +++|          ACN    CH
05285  M01S03424.1mt     +++|          LDD    T1
05286  M01S03425.1mt     +++|          LMN    3
05287  M01S03426.1mt     +++|          ZJN    LCA5        IF BCD LOAD
05288  M01S03427.1mt     +++|          LDC    171D-128D
05289  M01S03428.1mt     +++| LCA5     ADC    128D
05290  M01S03429.1mt     +++|          OAM    *,CH        OUTPUT CONVERSION TABLE
05291  M01S03430.1mt     +++| LCAA     EQU    *-1
05292  M01S03431.1mt     +++|          FJM    *,CH
05293  M01S03432.1mt     +++|          DCN    CH+40
05294  M01S03433.1mt     +++| LCA6     NJN    LCA9        IF NOT ALL DATA TAKEN
05295  M01S03434.1mt     +++|          LDD    EQ          GET STATUS
05296  M01S03435.1mt     +++|          ADN    12
05297  M01S03436.1mt     +++|          RJM    ICF         ISSUE FUNCTION
05298  M01S03437.1mt     +++| LCA7     ZJN    LCA9        IF LOAD ERRORS
05299  M01S03438.1mt     +++|          ACN    CH
05300  M01S03439.1mt     +++|          IAN    CH+40
05301  M01S03440.1mt     +++|          DCN    CH+40
05302  M01S03441.1mt     +++|          SHN    21-13
05303  M01S03442.1mt     +++|          MJN    LCA9        IF ALERT SET
05304  M01S03443.1mt     +++|          LDM    LCAA
05305  M01S03444.1mt     +++|          LMC    BFMS
05306  M01S03445.1mt     +++|          NJN    LCA8        IF WRITE TABLE LOADED
05307  M01S03446.1mt     +++|          LDM    LCAE-1,T1   SET TO LOAD WRITE TABLE
05308  M01S03447.1mt     +++|          STM    LCAA
05309  M01S03448.1mt     +++|          LDC    257         ISSUE LOAD WRITE RAM FUNCTION
05310  M01S03449.1mt     +++|          LJM    LCA3        ISSUE FUNCTION
05311  M01S03450.1mt     +++|
05312  M01S03451.1mt     +++| LCA8     LJM    LCA1        INCREMENT TO NEXT TABLE
05313  M01S03452.1mt     +++|
05314  M01S03453.1mt     +++| LCA9     LDC    2R A        CHANGE MTS TO ATS IN MESSAGE
Line S03454 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns2466
Seq #  *Modification Id* Act 
----------------------------+
05315  M02S03454.ns2466  ---|*         LDC    2R F        (CHANGE MTS TO FSC IN MESSAGE)
Line S03455 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns2466
Seq #  *Modification Id* Act 
----------------------------+
05316  M02S03455.ns2466  ---| LCAB     EQU    *-1
05317  M01S03456.1mt     +++|          STM    LCMC+4
05318  M01S03457.1mt     +++|          LDD    T1          SET TABLE IN ERROR
05319  M01S03458.1mt     +++|          RAM    LCMC+3
05320  M01S03459.1mt     +++|          LDC    LCMC        SET MESSAGE ADDRESS
05321  M01S03460.1mt     +++|          LJM    ADC         ABORT ATS CONVERSION TABLE LOAD
05322  M01S03461.1mt     +++|
05323  M01S03462.1mt     +++|
05324  M01S03463.1mt     +++| LCAC     CON    0,0         UNIT FORMAT PARAMETERS
05325  M01S03464.1mt     +++| LCAD     VFD    1/1,3/0,1/1,2/0,5/0  WORD 1 SKELETON
05326  M01S03465.1mt     +++|
05327  M01S03466.1mt     +++|*         ATS WRITE TABLE ADDRESSES.
05328  M01S03467.1mt     +++|
05329  M01S03468.1mt     +++| LCAE     CON    ATANS       TABLE 1 - ANSII
05330  M01S03469.1mt     +++|          CON    ATEBC       TABLE 2 - EBCDIC
05331  M01S03470.1mt     +++|          CON    ATBCD       TABLE 3 - EXTERNAL BCD
05332  M01S03471.1mt     +++| LCM      SPACE  4,15
Line S03472 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05333  M02S03472.ns22000 ---|**        LCM - LOAD MTS CONVERSION MEMORYS.
05334  M01S00097.ns22000 +++|**        LCM - LOAD MTS CONVERSION MEMORIES.
05335  M01S03473.1mt     +++|*
05336  M01S03474.1mt     +++|*         ENTRY  CHANNEL RESERVED.
05337  M01S03475.1mt     +++|*                (EQ) = EQUIPMENT NUMBER.
05338  M01S03476.1mt     +++|*
05339  M01S03477.1mt     +++|*         EXIT   CONVERSION TABLES LOADED.
05340  M01S03478.1mt     +++|*
05341  M01S03479.1mt     +++|*         ERROR  EXIT TO *ADC* IF LOAD ERRORS.
05342  M01S03480.1mt     +++|*
05343  M01S03481.1mt     +++|*         USES   T1.
05344  M01S03482.1mt     +++|*
05345  M01S03483.1mt     +++|*         CALLS  ICF.
05346  M01S03484.1mt     +++|
05347  M01S03485.1mt     +++|
05348  M01S03486.1mt     +++| LCM      SUBR               ENTRY/EXIT
05349  M01S03487.1mt     +++|          LDN    0
05350  M01S03488.1mt     +++|          STD    T1
05351  M01S03489.1mt     +++| LCM1     AOD    T1
05352  M01S03490.1mt     +++|          LMN    4
05353  M01S03491.1mt     +++|          ZJN    LCMX        IF END OF MTS CONVERSION TABLES
05354  M01S03492.1mt     +++|          LDM    TMTC,T1     GET TABLE ADDRESS
05355  M01S03493.1mt     +++|          STM    LCMA
05356  M01S03494.1mt     +++|          LDD    T1
05357  M01S03495.1mt     +++|          SHN    6
05358  M01S03496.1mt     +++|          ADN    31
05359  M01S03497.1mt     +++|          ADD    EQ          ADD EQUIPMENT NUMBER
05360  M01S03498.1mt     +++|          RJM    ICF
05361  M01S03499.1mt     +++|          ZJN    LCM3        IF LOAD ERRORS
05362  M01S03500.1mt     +++|          ACN    CH
05363  M01S03501.1mt     +++|          LDD    T1
05364  M01S03502.1mt     +++|          LMN    3
05365  M01S03503.1mt     +++|          ZJN    LCM2        IF BCD LOAD
05366  M01S03504.1mt     +++|          LDC    256D-64D
05367  M01S03505.1mt     +++| LCM2     ADC    64D
05368  M01S03506.1mt     +++|          OAM    *,CH
05369  M01S03507.1mt     +++| LCMA     EQU    *-1
05370  M01S03508.1mt     +++|          FJM    *,CH
05371  M01S03509.1mt     +++|          DCN    CH+40
05372  M01S03510.1mt     +++|          NJN    LCM3        IF DATA NOT TAKEN
05373  M01S03511.1mt     +++|          LDC    200000      DELAY FOR MTS TABLE SORT
05374  M01S03512.1mt     +++|*         LDC    400000      (2X PPU SPEED)
05375  M01S03513.1mt     +++|*         LCN    0           (4X PPU SPEED)
Line S03514 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05376  M02S03514.ns22000 ---|*         PSN                (4X PPU SPEED)
05377  M01S03515.1mt     +++| LCMB     EQU    *-2
05378  M01S03516.1mt     +++|          SBN    1
05379  M01S03517.1mt     +++|          NJN    *-1
05380  M01S03518.1mt     +++|          LDN    12
05381  M01S03519.1mt     +++|          ADD    EQ          ADD EQUIPMENT NUMBER
05382  M01S03520.1mt     +++|          RJM    ICF
05383  M01S03521.1mt     +++|          ZJN    LCM3        IF LOAD ERRORS
05384  M01S03522.1mt     +++|          ACN    CH
05385  M01S03523.1mt     +++|          IAN    CH+40
05386  M01S03524.1mt     +++|          DCN    CH+40
05387  M01S03525.1mt     +++|          SHN    21-13
05388  M01S03526.1mt     +++|          MJN    LCM3        IF LOAD ERRORS
05389  M01S03527.1mt     +++|          LJM    LCM1        LOOP FOR ALL MTS CONVERSION TABLES
05390  M01S03528.1mt     +++|
05391  M01S03529.1mt     +++| LCM3     LDD    T1          SET TABLE IN ERROR
05392  M01S03530.1mt     +++|          RAM    LCMC+3
05393  M01S03531.1mt     +++|          LDC    LCMC
05394  M01S03532.1mt     +++|          LJM    ADC         ABORT MTS LOAD
05395  M01S03533.1mt     +++|
05396  M01S03534.1mt     +++|
05397  M01S03535.1mt     +++| LCMC     DATA   C* C00, T0 MTS CONVERSION TABLE LOAD ERRORS.*
05398  M01S03536.1mt     +++|
05399  M01S03537.1mt     +++|
05400  M01S03538.1mt     +++|*         TMTC - ADDRESS TABLE FOR MTS CONVERSION TABLES.
05401  M01S03539.1mt     +++|
05402  M01S03540.1mt     +++|
05403  M01S03541.1mt     +++| TMTC     BSS    1
05404  M01S03542.1mt     +++|          LOC    1
05405  M01S03543.1mt     +++|          CON    MTANS       TABLE 1 - ANSII
05406  M01S03544.1mt     +++|          CON    MTEBC       TABLE 2 - EBCDIC
05407  M01S03545.1mt     +++|          CON    MTBCD       TABLE 3 - EXTERNAL BCD
05408  M01S03546.1mt     +++|          LOC    *O
Line S03547 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05409  M02S03547.282l826 ---| SPF      SPACE  4,10
Line S03548 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05410  M02S03548.282l826 ---|**        SPF - SET PROCESSOR FLAG.
Line S03549 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05411  M02S03549.282l826 ---|*
Line S03550 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05412  M02S03550.282l826 ---|*         ENTRY  (A) = CHANNEL NUMBER.
Line S03551 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05413  M02S03551.282l826 ---|*                (CM - CM+4) = UST1 WORD.
Line S03552 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05414  M02S03552.282l826 ---|*
Line S03553 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05415  M02S03553.282l826 ---|*         EXIT   (CM) = UPDATED WITH PROCESSOR FLAG SET.
Line S00016 Modification History
M01 (Added by) ns2755
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05416  M02S00016.282l826 ---|*                (T6) = PROCESSOR FLAG MASK SHIFTED LEFT 4 BITS.
Line S03554 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05417  M02S03554.282l826 ---|*
Line S03555 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05418  M02S03555.282l826 ---|*         USES   T3, T4, T6.
Line S03556 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05419  M02S03556.282l826 ---|
Line S03557 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05420  M02S03557.282l826 ---|
Line S03558 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05421  M02S03558.282l826 ---| SPF      SUBR               ENTRY/EXIT
Line S03559 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05422  M02S03559.282l826 ---|          LPN    37
Line S03560 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05423  M02S03560.282l826 ---|          STD    T3
Line S03561 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05424  M02S03561.282l826 ---|          LCN    0           SEARCH CHANNEL TABLE
Line S03562 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05425  M02S03562.282l826 ---|          STD    T4
Line S03563 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05426  M02S03563.282l826 ---|          LDN    10
Line S03564 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05427  M02S03564.282l826 ---|          STD    T6
Line S03565 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05428  M02S03565.282l826 ---| SPF1     LDD    T6          MOVE PROCESSOR FLAG
Line S03566 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05429  M02S03566.282l826 ---|          SHN    1
Line S03567 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05430  M02S03567.282l826 ---|          STD    T6
Line S03568 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05431  M02S03568.282l826 ---|          AOD    T4
Line S03569 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05432  M02S03569.282l826 ---|          LDM    CHLI,T4
Line S03570 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05433  M02S03570.282l826 ---|          LMD    T3
Line S03571 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05434  M02S03571.282l826 ---|          LPN    37
Line S03572 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05435  M02S03572.282l826 ---|          NJN    SPF1        IF WRONG CHANNEL
Line S03573 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05436  M02S03573.282l826 ---|          LDD    T6          SET PROCESSOR FLAG
Line S03574 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05437  M02S03574.282l826 ---|          RAD    CM
Line S03575 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05438  M02S03575.282l826 ---|          UJN    SPFX        RETURN
05439  M01S03576.1mt     +++| BUF      SPACE  4,10
05440  M01S03577.1mt     +++| CTAB     CHTB               CHANNEL TABLE
05441  M01S00640.274l797 +++|          SPACE  4,10
05442  M01S03578.1mt     +++|          USE    BUFFER
05443  M01S03579.1mt     +++|
05444  M01S03580.1mt     +++|          ERRNG  BFMS-*      OVERFLOW TEST
05445  M01S00641.274l797 +++|          ERRNG  ERLA-*      CODE OVERFLOWS *0CT*
05446  M01S00642.274l797 +++|          ERRPL  ERLA+5+ZCTL-ERLB  *0CT* OVERFLOWS INTO BUFFER
05447  M01S03581.1mt     +++| PRS      TITLE  PRESET OVERLAY.
05448  M01S03582.1mt     +++| PRS      SPACE  4,10
05449  M01S03583.1mt     +++|**        PRS - INITIALIZE TAPE EXECUTIVE PRESET.
05450  M01S03584.1mt     +++|*
05451  M01S03585.1mt     +++|*         EXIT   TO *ITE* IF *MAGNET* INITIALIZATION.
05452  M01S03586.1mt     +++|*                TO *REC* IF LEVEL 3 RECOVERY.
05453  M01S03587.1mt     +++|*
05454  M01S03588.1mt     +++|*         CALLS  LFT, SCS.
05455  M01S03589.1mt     +++|
05456  M01S03590.1mt     +++|
05457  M01S03591.1mt     +++| PRS      BSS    0
05458  M01S03592.1mt     +++|          RJM    LFT         LOAD FUNCTION TABLE
Line S03593 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05459  M02S03593.282l826 ---|          LDD    IR+4        CHECK FOR LEVEL 3 RECOVERY
05460  M01S00396.282l826 +++|          LDD    IR+3
05461  M01S00397.282l826 +++|          SHN    6
05462  M01S00398.282l826 +++|          ADD    RA
05463  M01S00399.282l826 +++|          SHN    6
05464  M01S00400.282l826 +++|          ADD    IR+4        CHECK FOR LEVEL 3 RECOVERY
05465  M01S00401.282l826 +++|          CRD    CM
05466  M01S00402.282l826 +++|          LDD    CM+4
05467  M01S03594.1mt     +++|          LMN    1
05468  M01S03595.1mt     +++|          ZJN    PRS1        IF *MAGNET* INITIALIZATION
05469  M01S03596.1mt     +++|          LJM    REC         RECOVER
05470  M01S03597.1mt     +++|
05471  M01S03598.1mt     +++| PRS1     RJM    SCS         SET CHARACTER SET TABLES
05472  M01S03599.1mt     +++|          LJM    ITE         INITIALIZE TAPE EQUIPMENT
05473  M01S03600.1mt     +++|          TITLE  PRESET SUBROUTINES.
05474  M01S03601.1mt     +++| CCH      SPACE  4,10
05475  M01S03602.1mt     +++|**        CCH - CHECK CHANNEL.
05476  M01S03603.1mt     +++|*
Line S03604 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05477  M02S03604.282l826 ---|*         ENTRY  (A) = CHANNEL TO ENTER INTO TABLE.
Line S03605 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05478  M03S03605.282l826 ---|*                (((T1)+4), 10-7) = MTS/ATS FLAGS.
Line S00098 Modification History
M01 (Added by) ns22000
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05479  M02S00098.282l826 ---|*                (CM - CM+4) = EST ENTRY.
05480  M01S00403.282l826 +++|*         ENTRY  (A) = EST CHANNEL BYTE.
05481  M01S00404.282l826 +++|*                (CM - CM+4) = EST ENTRY *EQDE* WORD.
05482  M01S03606.1mt     +++|*
05483  M01S03607.1mt     +++|*         EXIT   CHANNEL ENTERED INTO TABLE IF NOT ALREADY THERE.
05484  M01S03608.1mt     +++|*
05485  M01S03609.1mt     +++|*         ERROR  EXIT TO *ABT* IF ERROR.
05486  M01S03610.1mt     +++|*
05487  M01S03611.1mt     +++|*         USES   T2, T3, T4.
05488  M01S03612.1mt     +++|
05489  M01S03613.1mt     +++|
Line S03614 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05490  M02S03614.ns22000 ---| CCH6     LDM    4,T1        CHECK FOR MTS/ATS CHANNEL
05491  M01S00099.ns22000 +++| CCH6     LDD    CM          CHECK FOR MTS/ATS CHANNEL
Line S03615 Modification History
M01 (Added by) 1mt
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
05492  M02S03615.v23l617 ---|          LPC    700         AND FSC ADAPTOR
Line S03616 Modification History
M01 (Added by) 1mt
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
05493  M02S03616.v23l617 ---|          SHN    -1          SET MTS/ATS FLAG
Line S00125 Modification History
M01 (Added by) v23l617
M02 (Updated by) ns2466
Seq #  *Modification Id* Act 
----------------------------+
05494  M02S00125.ns2466  ---|          LPC    710
Line S00126 Modification History
M01 (Added by) v23l617
M02 (Updated by) ns2466
Seq #  *Modification Id* Act 
----------------------------+
05495  M02S00126.ns2466  ---|          SHN    21-3
Line S00127 Modification History
M01 (Added by) v23l617
M02 (Updated by) ns2466
Seq #  *Modification Id* Act 
----------------------------+
05496  M02S00127.ns2466  ---|          PJN    CCH7        IF NOT ISMT UNIT
Line S00128 Modification History
M01 (Added by) v23l617
M02 (Updated by) ns2466
Seq #  *Modification Id* Act 
----------------------------+
05497  M02S00128.ns2466  ---|          LDN    4
Line S00129 Modification History
M01 (Added by) v23l617
M02 (Updated by) ns2466
Seq #  *Modification Id* Act 
----------------------------+
05498  M02S00129.ns2466  ---| CCH7     SHN    3
05499  M01S00165.ns2466  +++|          LPN    14
05500  M01S00166.ns2466  +++|          NJN    CCH7        IF ISMT/CMTS CHANNEL
05501  M01S00167.ns2466  +++|          LDD    CM
05502  M01S00168.ns2466  +++|          SHN    -3
05503  M01S00169.ns2466  +++|          LPN    70
05504  M01S00170.ns2466  +++| CCH7     SHN    -3
05505  M01S00171.ns2466  +++|          SHN    5
05506  M01S03617.1mt     +++|          STD    T2
05507  M01S03618.1mt     +++|          LDM    CHLI,T3
05508  M01S03619.1mt     +++|          LPC    437
05509  M01S03620.1mt     +++|          LMD    T2
05510  M01S03621.1mt     +++|          STM    CHLI,T3
Line S03622 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05511  M02S03622.ns22000 ---|          LDM    4,T1        SET EQUIPMENT NUMBER
Line S00100 Modification History
M01 (Added by) ns22000
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05512  M02S00100.274l797 ---|          LDD    CM+4        SET CONTROLLER NUMBER
05513  M01S00643.274l797 +++|          LDD    CM+3
05514  M01S00644.274l797 +++|          SHN    21-10
05515  M01S00645.274l797 +++|          MJN    CCH8        IF NOT CTS
05516  M01S00646.274l797 +++|          LDC    340
05517  M01S00647.274l797 +++|          RAM    CHLI,T3     SET CTS CONTROLLER TYPE
05518  M01S00648.274l797 +++| CCH8     LDD    CM+4        SET CONTROLLER NUMBER
05519  M01S03623.1mt     +++|          LPC    7000
05520  M01S03624.1mt     +++|          RAM    CHLI,T3
Line S03625 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
05521  M02S03625.ns21000 ---| CCH7     SHN    21-7
Line S03626 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
05522  M02S03626.ns21000 ---|          PJN    CCHX        IF NOT MTS CONTROLLER
Line S03627 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
05523  M02S03627.ns21000 ---|          LDM    4,T1        CHECK IF BLOCK ID DISABLED
Line S03628 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
05524  M02S03628.ns21000 ---|          SHN    21-5
Line S03629 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
05525  M02S03629.ns21000 ---|          PJN    CCHX        IF BLOCK ID NOT DISABLED
Line S03630 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
05526  M02S03630.ns21000 ---|          LDM    CHLI,T3     SET NO BLOCK ID ON CHANNEL
Line S03631 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
05527  M02S03631.ns21000 ---|          LPC    7677
Line S03632 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
05528  M02S03632.ns21000 ---|          LMD    HN
Line S03633 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
05529  M02S03633.ns21000 ---|          STM    CHLI,T3
05530  M01S03634.1mt     +++|
05531  M01S03635.1mt     +++| CCH      SUBR               ENTRY/EXIT
Line S03636 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05532  M02S03636.282l826 ---|          STD    T4          SET UP DIRECTS
Line S03637 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05533  M02S03637.282l826 ---|          LCN    0
05534  M01S00405.282l826 +++|          LPN    37          SET CHANNEL NUMBER
05535  M01S00406.282l826 +++|          STD    T4
05536  M01S00407.282l826 +++|          LCN    0           INITIALIZE CHANNEL COUNT
05537  M01S03638.1mt     +++|          STD    T3
05538  M01S03639.1mt     +++| CCH1     AOD    T3          INCREMENT CHANNEL COUNT
Line S03640 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05539  M02S03640.252l678 ---|          LMN    4
Line S00157 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05540  M02S00157.282l826 ---|          LMN    4
05541  M01S00408.282l826 +++|          LMN    /MTX/MCHAN
05542  M01S03641.1mt     +++|          NJN    CCH2        IF NOT TOO MANY TAPE CHANNELS
Line S03642 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05543  M02S03642.252l678 ---|          LDC    =C* MORE THAN 4 CHANNELS.*
Line S00158 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05544  M02S00158.282l826 ---|          LDC    =C* MORE THAN 4 TAPE CHANNELS.*
05545  M01S00409.282l826 +++|          LDC    =C* MORE THAN 8 TAPE CHANNELS.*
05546  M01S03643.1mt     +++|          LJM    ABT         ABORT
05547  M01S03644.1mt     +++|
05548  M01S03645.1mt     +++| CCH2     LDD    T3
05549  M01S03646.1mt     +++|          LMM    CHCN
Line S03647 Modification History
M01 (Added by) 1mt
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05550  M02S03647.274l797 ---|          ZJN    CCH4        IF END OF CHANNEL LIST
05551  M01S00649.274l797 +++|          ZJP    CCH4        IF END OF CHANNEL LIST
05552  M01S03648.1mt     +++|          LDM    CHLI,T3
05553  M01S03649.1mt     +++|          LMD    T4
05554  M01S03650.1mt     +++|          LPN    37
05555  M01S03651.1mt     +++|          NJN    CCH1        IF NO CHANNEL MATCH
05556  M01S03652.1mt     +++|
05557  M01S03653.1mt     +++|*         COMPARE CONTROLLER TYPES.
05558  M01S03654.1mt     +++|
05559  M01S00650.274l797 +++|          LDD    CM+3
05560  M01S00651.274l797 +++|          SHN    21-10
05561  M01S00652.274l797 +++|          MJN    CCH2.0      IF NOT CTS
05562  M01S00653.274l797 +++|          LDM    CHLI,T3
05563  M01S00654.274l797 +++|          SHN    -5
05564  M01S00655.274l797 +++|          LPN    7
05565  M01S00656.274l797 +++|          LMN    7
05566  M01S00657.274l797 +++|          UJN    CCH3.1      COMPARE CONTROLLER TYPES
Line S03655 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns2466
Seq #  *Modification Id* Act 
----------------------------+
05567  M02S03655.ns2466  ---|          LDM    CHLI,T3
05568  M01S00172.ns2466  +++|
05569  M01S00173.ns2466  +++|*         THE FOLLOWING SIX LINES CLEAR THE ATS BIT IN 1MT-S COPY OF
05570  M01S00174.ns2466  +++|*         THE EST ENTRY IF THE EST CONTROLLER TYPE IS CMTS.  THIS
05571  M01S00175.ns2466  +++|*         ALLOWS THE COMPARISON OF THE *CHLI* CONTROLLER TYPE AND THE
05572  M01S00176.ns2466  +++|*         EST CONTROLLER TYPE TO WORK CORRECTLY FOR CMTS.
05573  M01S00177.ns2466  +++|
Line S00178 Modification History
M01 (Added by) ns2466
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05574  M02S00178.274l797 ---|          LDD    CM
05575  M01S00658.274l797 +++| CCH2.0   LDD    CM
05576  M01S00179.ns2466  +++|          SHN    21-2
05577  M01S00180.ns2466  +++|          PJN    CCH2.1      IF NOT CMTS
05578  M01S00181.ns2466  +++|          SCN    20          CLEAR ATS BIT
05579  M01S00182.ns2466  +++|          SHN    3
05580  M01S00183.ns2466  +++|          STD    CM
05581  M01S00184.ns2466  +++| CCH2.1   LDM    CHLI,T3
05582  M01S03656.1mt     +++|          SHN    21-7
05583  M01S03657.1mt     +++|          PJN    CCH3        IF MTS STATUS NOT SET IN TABLE
05584  M01S03658.1mt     +++|          LPC    577777      CLEAR BLOCK - ID DISABLE BIT
05585  M01S03659.1mt     +++| CCH3     SHN    11
Line S03660 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05586  M02S03660.ns22000 ---|          LMM    4,T1
05587  M01S00101.ns22000 +++|          LMD    CM
05588  M01S03661.1mt     +++|          LPC    700
Line S03662 Modification History
M01 (Added by) 1mt
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05589  M02S03662.274l797 ---|          NJN    CCH5        IF NOT SAME CONTROLLER TYPE
Line S00659 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05590  M02S00659.282l826 ---| CCH3.1   NJN    CCH5        IF NOT SAME CONTROLLER TYPE
05591  M01S00410.282l826 +++| CCH3.1   NJN    CCH5        IF CONTROLLER TYPE MISMATCH
05592  M01S00411.282l826 +++|          LDM    CHLI,T3
05593  M01S00412.282l826 +++|          LMD    CM+4
05594  M01S00413.282l826 +++|          SHN    -11
05595  M01S00414.282l826 +++|          NJN    CCH5        IF EQUIPMENT MISMATCH
05596  M01S03663.1mt     +++|          LDM    CHLI,T3
Line S03664 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
05597  M02S03664.ns21000 ---|          LJM    CCH7        CHECK IF BLOCK ID DISABLED
05598  M01S00014.ns21000 +++|          LJM    CCHX        EXIT
05599  M01S03665.1mt     +++|
05600  M01S03666.1mt     +++| CCH4     LDD    T4          SAVE CHANNEL IN TABLE
Line S03667 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05601  M02S03667.252l678 ---|          LPN    40
Line S03668 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05602  M02S03668.252l678 ---|          SHN    10-5
Line S03669 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05603  M02S03669.252l678 ---|          LMD    T4
Line S03670 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05604  M02S03670.252l678 ---|          SCN    40
Line S00159 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05605  M02S00159.282l826 ---|          LPN    37
Line S00160 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05606  M02S00160.282l826 ---|          STD    T2
Line S00161 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05607  M02S00161.282l826 ---|          LDD    T4
Line S00162 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05608  M02S00162.282l826 ---|          LPC    2000
Line S00163 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05609  M02S00163.282l826 ---|          SHN    10-12
Line S00164 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05610  M02S00164.282l826 ---|          LMD    T2
05611  M01S03671.1mt     +++|          STM    CHLI,T3
05612  M01S03672.1mt     +++|          AOM    CHCN        INCREMENT CHANNEL COUNT
05613  M01S03673.1mt     +++|          LJM    CCH6        SET CONTROLLER TYPE
05614  M01S03674.1mt     +++|
Line S03675 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05615  M02S03675.282l826 ---| CCH5     LDC    =C* TWO CONTROLLER TYPES ON SAME CHANNEL.*
05616  M01S00415.282l826 +++| CCH5     LDC    =C* CONTROLLER TYPE/EQUIPMENT MISMATCH ON CHANNEL.*
05617  M01S03676.1mt     +++|          LJM    ABT         ABORT
Line S03677 Modification History
M01 (Added by) 1mt
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05618  M02S03677.274l797 ---| EST      SPACE  4,10
Line S00660 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05619  M02S00660.282l826 ---| EST      SPACE  4,15
05620  M01S00416.282l826 +++| EST      SPACE  4,10
05621  M01S03678.1mt     +++|**        EST - EST PRE-PROCESSOR.
05622  M01S03679.1mt     +++|*
Line S03680 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05623  M02S03680.282l826 ---|*         EXIT   TABLE BUILT OF ALL TAPE CHANNELS.
05624  M01S00417.282l826 +++|*         EXIT   *CHLI* TABLE BUILT.
05625  M01S00418.282l826 +++|*                TO *ABT* IF NO TAPE EQUIPMENT FOUND.
05626  M01S03681.1mt     +++|*
Line S03682 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05627  M02S03682.282l826 ---|*         ERROR  EXIT TO *ABT* IF ERROR.
05628  M01S00419.282l826 +++|*         USES   SC, T5, CM - CM+4.
05629  M01S03683.1mt     +++|*
Line S03684 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05630  M02S03684.ns22000 ---|*         USES   CM - CM+4, T1, T7.
Line S00102 Modification History
M01 (Added by) ns22000
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05631  M02S00102.282l826 ---|*         USES   T1, CM - CM+4.
Line S03685 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05632  M02S03685.282l826 ---|*
Line S03686 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05633  M02S03686.282l826 ---|*         CALLS  CCH.
05634  M01S00420.282l826 +++|*         CALLS  CCH, CTE.
05635  M01S00103.ns22000 +++|*
05636  M01S00104.ns22000 +++|*         MACROS SFA.
05637  M01S03687.1mt     +++|
05638  M01S03688.1mt     +++|
Line S03689 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05639  M02S03689.282l826 ---|*         SET CHANNEL STATUS WORD. (NUMBER OF BITS=NUMBER OF CHANNELS.)
Line S03690 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05640  M02S03690.282l826 ---|
Line S03691 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05641  M02S03691.282l826 ---| EST5     SBN    1           NUMBER OF CHANNELS - 1
Line S03692 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05642  M02S03692.282l826 ---|          STD    T1
Line S03693 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05643  M02S03693.282l826 ---|          LDN    ZERL
Line S03694 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05644  M02S03694.282l826 ---|          CRD    CM
Line S03695 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05645  M02S03695.282l826 ---|          LDM    ESTA,T1     SET NUMBER OF BITS
Line S03696 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05646  M02S03696.282l826 ---|          STD    CM+4
Line S03697 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05647  M02S03697.282l826 ---|          LDD    RA          WRITE CHANNEL STATUS WORD TO *MAGNET* FL
Line S03698 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05648  M02S03698.282l826 ---|          SHN    6
Line S03699 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05649  M02S03699.282l826 ---|          ADN    /MTX/CHAN
Line S03700 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05650  M02S03700.282l826 ---|          CWD    CM
Line S03701 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05651  M02S03701.282l826 ---|
05652  M01S03702.1mt     +++| EST      SUBR               ENTRY/EXIT
Line S03703 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05653  M02S03703.ns22000 ---|          LDM    ESTS        READ EST
Line S03704 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05654  M02S03704.ns22000 ---|          CRM    BFMS,HN
Line S00105 Modification History
M01 (Added by) ns22000
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05655  M02S00105.282l826 ---|          LDN    ESTP        READ EST POINTER
05656  M01S00421.282l826 +++|          LDK    ESTP        READ EST POINTER
05657  M01S00106.ns22000 +++|          CRD    CM
05658  M01S00107.ns22000 +++|          LDD    CM+2        SET LAST EST ORDINAL + 1
05659  M01S00108.ns22000 +++|          STD    SC
05660  M01S03705.1mt     +++|
05661  M01S03706.1mt     +++|*         FIND MAXIMUM NUMBER OF TAPE CHANNELS.
05662  M01S03707.1mt     +++|
Line S03708 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05663  M02S03708.ns22000 ---|          LDC    BFMS
05664  M01S00109.ns22000 +++|          LDN    NOPE-1      INITIALIZE EST ORDINAL FOR SEARCH
Line S03709 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05665  M02S03709.282l826 ---|          STD    T1
Line S03710 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05666  M03S03710.282l826 ---|          LDN    0
Line S03711 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05667  M03S03711.282l826 ---|          STD    T7
Line S03712 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05668  M03S03712.282l826 ---| EST1     AOD    T7          SEARCH EST
Line S03713 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05669  M03S03713.282l826 ---|          LDN    5
Line S03714 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05670  M03S03714.282l826 ---|          RAD    T1
Line S03715 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05671  M03S03715.282l826 ---|          LMC    BFMS+500
Line S00110 Modification History
M01 (Added by) ns22000
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05672  M02S00110.282l826 ---| EST1     AOD    T1          ADVANCE EST ORDINAL
05673  M01S00422.282l826 +++|          STD    T5
05674  M01S00423.282l826 +++| EST1     AOD    T5          ADVANCE EST ORDINAL
05675  M01S00111.ns22000 +++|          LMD    SC
05676  M01S03716.1mt     +++|          NJN    EST2        IF NOT END OF EST
05677  M01S03717.1mt     +++|          LDM    CHCN
Line S03718 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05678  M02S03718.282l826 ---|          NJN    EST5        IF TAPES FOUND
05679  M01S00424.282l826 +++|          NJN    ESTX        IF TAPES FOUND
05680  M01S03719.1mt     +++|          LDC    =C* NO TAPE EQUIPMENT.*
05681  M01S03720.1mt     +++|          LJM    ABT         ABORT
05682  M01S03721.1mt     +++|
Line S03722 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05683  M02S03722.ns22000 ---| EST2     LDM    3,T1        DISCARD ON/OFF INDICATION
Line S00112 Modification History
M01 (Added by) ns22000
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05684  M02S00112.282l826 ---| EST2     SFA    EST,T1      READ EST ENTRY
05685  M01S00425.282l826 +++| EST2     SFA    EST,T5      READ EST ENTRY
05686  M01S00113.ns22000 +++|          ADK    EQDE
05687  M01S00114.ns22000 +++|          CRD    CM
Line S00115 Modification History
M01 (Added by) ns22000
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05688  M02S00115.252l678 ---|          LDD    CM+3        DISCARD ON/OFF INDICATION
Line S03723 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05689  M02S03723.252l678 ---|          LPC    3777
05690  M01S00165.252l678 +++|          LDD    CM+3
Line S03724 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05691  M02S03724.282l826 ---|          LMC    2RMT
Line S03725 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05692  M02S03725.282l826 ---|          ZJN    EST3        IF *MT*
Line S03726 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05693  M02S03726.282l826 ---|          LMC    2RMT&2RNT
Line S03727 Modification History
M01 (Added by) 1mt
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05694  M03S03727.282l826 ---|          NJN    EST1        IF NOT *NT*
Line S00661 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05695  M02S00661.282l826 ---|          ZJN    EST3        IF *NT*
Line S00662 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05696  M02S00662.282l826 ---|          LMC    2RCT&2RNT
Line S00663 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05697  M02S00663.282l826 ---|          ZJN    EST3        IF *CT*
Line S00664 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05698  M02S00664.282l826 ---|          LMC    2RAT&2RCT
Line S00665 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05699  M02S00665.282l826 ---|          NJN    EST1        IF NOT *AT*
05700  M01S00426.282l826 +++|          RJM    CTE         CHECK FOR TAPE EQUIPMENT
05701  M01S00427.282l826 +++|          MJN    EST1        IF NOT TAPE EQUIPMENT
05702  M01S03728.1mt     +++|
05703  M01S03729.1mt     +++|*         COUNT NUMBER OF CHANNELS.
05704  M01S03730.1mt     +++|
Line S03731 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05705  M02S03731.ns22000 ---| EST3     LDM    1,T1        CHECK FIRST CHANNEL
Line S00116 Modification History
M01 (Added by) ns22000
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05706  M02S00116.282l826 ---| EST3     LDD    CM+1        CHECK FIRST CHANNEL
05707  M01S00428.282l826 +++|          LDD    CM+1        CHECK FIRST CHANNEL
Line S03732 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05708  M02S03732.252l678 ---|          LPN    77
05709  M01S03733.1mt     +++|          RJM    CCH         CHECK CHANNEL
Line S03734 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05710  M02S03734.ns22000 ---|          LDM    1,T1
Line S00117 Modification History
M01 (Added by) ns22000
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05711  M02S00117.252l678 ---|          LDD    CM+1
Line S03735 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05712  M02S03735.252l678 ---|          SHN    -6
Line S03736 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05713  M02S03736.252l678 ---|          ZJN    EST4        IF 1 CHANNEL
Line S03737 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05714  M02S03737.252l678 ---|          RJM    CCH         CHECK CHANNEL
Line S03738 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
M03 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05715  M03S03738.252l678 ---|          LDM    2,T1
Line S00118 Modification History
M01 (Added by) ns22000
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05716  M02S00118.252l678 ---|          LDD    CM+2
Line S03739 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05717  M02S03739.252l678 ---|          LPN    77
Line S03740 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05718  M02S03740.252l678 ---|          ZJN    EST4        IF 2 CHANNELS
Line S03741 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05719  M02S03741.252l678 ---|          RJM    CCH         CHECK CHANNEL
Line S03742 Modification History
M01 (Added by) 1mt
M02 (Updated by) ns22000
M03 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05720  M03S03742.252l678 ---|          LDM    2,T1
Line S00119 Modification History
M01 (Added by) ns22000
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05721  M02S00119.252l678 ---|          LDD    CM+2
Line S03743 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05722  M02S03743.252l678 ---|          SHN    -6
Line S03744 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05723  M02S03744.252l678 ---|          ZJN    EST4        IF 3 CHANNELS
Line S03745 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05724  M02S03745.252l678 ---|          RJM    CCH         CHECK CHANNEL
05725  M01S00166.252l678 +++|          LDD    CM+2
Line S00167 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05726  M02S00167.282l826 ---|          ZJN    EST4        IF 1 CHANNEL
05727  M01S00429.282l826 +++|          ZJN    EST1        IF NO SECONDARY CHANNEL
05728  M01S00168.252l678 +++|          RJM    CCH         CHECK CHANNEL
Line S03746 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05729  M02S03746.282l826 ---| EST4     LJM    EST1        LOOP FOR ALL EQUIPMENT
05730  M01S00430.282l826 +++|          UJN    EST1        CHECK NEXT EQUIPMENT
05731  M01S03747.1mt     +++|
Line S03748 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05732  M02S03748.282l826 ---|
Line S03749 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05733  M02S03749.282l826 ---| ESTA     BSS    0
Line S03750 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05734  M02S03750.282l826 ---|          LOC    0
Line S03751 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05735  M02S03751.282l826 ---|          CON    1           1 CHANNEL
Line S03752 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05736  M02S03752.282l826 ---|          CON    3           2 CHANNELS
Line S00169 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05737  M02S00169.282l826 ---|          CON    7           3 CHANNELS
Line S00170 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05738  M02S00170.282l826 ---|          CON    17          4 CHANNELS
Line S03753 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05739  M03S03753.282l826 ---|          CON    7           3 CHANNELS
Line S03754 Modification History
M01 (Added by) 1mt
M02 (Updated by) 252l678
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05740  M03S03754.282l826 ---|          CON    17          4 CHANNELS
Line S03755 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05741  M02S03755.282l826 ---|          LOC    *O
05742  M01S03756.1mt     +++|
05743  M01S03757.1mt     +++|          ERRNG  BFMS-*      OVERFLOW TEST
05744  M01S03758.1mt     +++| LFT      SPACE  4,10
05745  M01S03759.1mt     +++|**        LFT - LOAD 1MT FUNCTION TABLE INTO MAGNET FL.
Line S03760 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05746  M02S03760.282l826 ---|*         ALSO LOAD *DSD* ERROR MESSAGES TO *MAGNET* FL.
05747  M01S03761.1mt     +++|*
Line S03762 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05748  M02S03762.282l826 ---|*         USES   T1, T2.
05749  M01S00431.282l826 +++|*         USES   T1.
05750  M01S03763.1mt     +++|
05751  M01S03764.1mt     +++|
05752  M01S03765.1mt     +++| LFT      SUBR               ENTRY/EXIT
05753  M01S03766.1mt     +++|          LDN    TFUNC       SET FUNCTION TABLE LENGTH
05754  M01S03767.1mt     +++|          STD    T1
Line S03768 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05755  M02S03768.282l826 ---|          LDN    MTBLL       SET ERROR MESSAGE LENGTH
Line S03769 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05756  M02S03769.282l826 ---|          STD    T2
05757  M01S03770.1mt     +++|          LDD    RA
05758  M01S03771.1mt     +++|          SHN    6
Line S03772 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05759  M02S03772.282l826 ---|          ADN    /MTX/TFUN
05760  M01S00432.282l826 +++|          ADN    /MTX/TFUN   WRITE FUNCTION TABLE
05761  M01S03773.1mt     +++|          CWM    TFUN,T1
Line S03774 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05762  M02S03774.282l826 ---|          ADN    /MTX/DMBF-/MTX/TFUN-TFUNC
Line S03775 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05763  M02S03775.282l826 ---|          CWM    MTBL,T2     WRITE ERROR MESSAGE TABLE
05764  M01S03776.1mt     +++|          UJN    LFTX        RETURN
05765  M01S03777.1mt     +++| REC      SPACE  4,10
05766  M01S03778.1mt     +++|**        REC - RECOVER MAGNET.
05767  M01S03779.1mt     +++|*
05768  M01S03780.1mt     +++|*         EXIT   TO *ITE1* TO SET COMPLETION RESPONSE.
05769  M01S03781.1mt     +++|*
05770  M01S03782.1mt     +++|*         MACROS NFA.
05771  M01S03783.1mt     +++|
05772  M01S03784.1mt     +++|
05773  M01S03785.1mt     +++| REC      LDD    CP          CHECK IDLEDOWN BIT IN CPA
05774  M01S03786.1mt     +++|          ADN    SNSW
05775  M01S03787.1mt     +++|          CRD    CM
05776  M01S03788.1mt     +++|          LDD    CM+3
05777  M01S03789.1mt     +++|          LPN    4
05778  M01S03790.1mt     +++|          ZJN    REC1        IF IDLEDOWN NOT SET
05779  M01S03791.1mt     +++|          LDD    RA          RESET IDLEDOWN IN RA+0
05780  M01S03792.1mt     +++|          SHN    6
05781  M01S03793.1mt     +++|          CRD    CM
05782  M01S03794.1mt     +++|          LDD    CM+3
05783  M01S03795.1mt     +++|          SCN    2
05784  M01S03796.1mt     +++|          LMN    2
05785  M01S03797.1mt     +++|          STD    CM+3
05786  M01S03798.1mt     +++|          LDD    RA          REWRITE RA+0
05787  M01S03799.1mt     +++|          SHN    6
05788  M01S03800.1mt     +++|          CWD    CM
Line S03801 Modification History
M01 (Added by) 1mt
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
05789  M02S03801.v23l617 ---| REC1     LDD    CP          RESET CONTROL STATEMENTS FOR RECOVERY
05790  M01S00130.v23l617 +++| REC1     LDD    CP          RESET COMMANDS FOR RECOVERY
05791  M01S03802.1mt     +++|          ADN    CSPW
05792  M01S03803.1mt     +++|          CRD    CM
Line S03804 Modification History
M01 (Added by) 1mt
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
05793  M02S03804.v23l617 ---|          LDD    CM+3        BACKUP STATEMENT POINTER
Line S00131 Modification History
M01 (Added by) v23l617
M02 (Updated by) 1mt35
Seq #  *Modification Id* Act 
----------------------------+
05794  M02S00131.1mt35   ---|          LDD    CM+3        BACKUP COMMAND POINTER
Line S03805 Modification History
M01 (Added by) 1mt
M02 (Updated by) 1mt35
Seq #  *Modification Id* Act 
----------------------------+
05795  M02S03805.1mt35   ---|          ADN    TCML
Line S03806 Modification History
M01 (Added by) 1mt
M02 (Updated by) 1mt35
Seq #  *Modification Id* Act 
----------------------------+
05796  M02S03806.1mt35   ---|          STD    CM+3
Line S03807 Modification History
M01 (Added by) 1mt
M02 (Updated by) 1mt35
Seq #  *Modification Id* Act 
----------------------------+
05797  M02S03807.1mt35   ---|          ADC    -CSBN-1
Line S03808 Modification History
M01 (Added by) 1mt
M02 (Updated by) 1mt35
Seq #  *Modification Id* Act 
----------------------------+
05798  M02S03808.1mt35   ---|          MJN    REC2        IF NEW POINTER IN RANGE
05799  M01S03809.1mt     +++|          LDC    CSBN        RESET TO BEGINNING OF BUFFER
05800  M01S03810.1mt     +++|          STD    CM+3
Line S03811 Modification History
M01 (Added by) 1mt
M02 (Updated by) 1mt35
Seq #  *Modification Id* Act 
----------------------------+
05801  M02S03811.1mt35   ---|          SBD    CM+4        CHECK LIMIT POINTER
Line S03812 Modification History
M01 (Added by) 1mt
M02 (Updated by) 1mt35
Seq #  *Modification Id* Act 
----------------------------+
05802  M02S03812.1mt35   ---|          SBN    TCML
Line S03813 Modification History
M01 (Added by) 1mt
M02 (Updated by) 1mt35
Seq #  *Modification Id* Act 
----------------------------+
05803  M02S03813.1mt35   ---|          PJN    REC2        IF LIMIT POINTER SUFFICIENT
Line S03814 Modification History
M01 (Added by) 1mt
M02 (Updated by) 1mt35
Seq #  *Modification Id* Act 
----------------------------+
05804  M02S03814.1mt35   ---|          RAD    CM+4        ADVANCE LIMIT POINTER
Line S03815 Modification History
M01 (Added by) 1mt
M02 (Updated by) 1mt35
Seq #  *Modification Id* Act 
----------------------------+
05805  M02S03815.1mt35   ---| REC2     LDN    TCML
05806  M01S00001.1mt35   +++|          SBN    TCML+1      SET LIMIT POINTER
05807  M01S00002.1mt35   +++|          STD    CM+4
05808  M01S00003.1mt35   +++|          LDN    TCML
05809  M01S03816.1mt     +++|          STD    T1
05810  M01S03817.1mt     +++|          NFA    CM+3,R
Line S03818 Modification History
M01 (Added by) 1mt
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
05811  M02S03818.v23l617 ---|          CWM    TCCB,T1     WRITE RECOVERY CONTROL STATEMENTS
05812  M01S00132.v23l617 +++|          CWM    TCCB,T1     WRITE RECOVERY COMMANDS
05813  M01S00004.1mt35   +++|          LDD    CP          UPDATE COMMAND POINTER
05814  M01S00005.1mt35   +++|          ADN    CSPW
05815  M01S00006.1mt35   +++|          CWD    CM
05816  M01S03819.1mt     +++|          LJM    ITE1        SEND RESPONSE TO *MAGNET*
05817  M01S03820.1mt     +++|
05818  M01S03821.1mt     +++|
Line S03822 Modification History
M01 (Added by) 1mt
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
05819  M02S03822.v23l617 ---|*         TABLE OF CONTROL CARDS.
05820  M01S00133.v23l617 +++|*         TABLE OF COMMANDS.
05821  M01S03823.1mt     +++|
05822  M01S03824.1mt     +++| TCCB     BSS    0
05823  M01S03825.1mt     +++|          VFD    60/8LMAGNET1.
Line S03826 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05824  M02S03826.282l826 ---|          VFD    60/6LEXIT.
05825  M01S00433.282l826 +++|          VFD    60/6L$EXIT.
05826  M01S03827.1mt     +++|          VFD    60/8LMAGNET1.
05827  M01S00007.1mt35   +++|          VFD    60/8L$REVERT.
05828  M01S00008.1mt35   +++|          VFD    60/6L$EXIT.
05829  M01S00009.1mt35   +++|          VFD    60/10H$REVERT,AB
05830  M01S00010.1mt35   +++|          VFD    60/4LORT.
05831  M01S03828.1mt     +++| TCCBL    EQU    *-TCCB
05832  M01S03829.1mt     +++| TCML     EQU    TCCBL/5     TABLE LENGTH IN CM WORDS
05833  M01S03830.1mt     +++| SCS      SPACE  4,20
05834  M01S03831.1mt     +++|**        SCS - SET 63 CHARACTER SET OPTION IF SELECTED.
05835  M01S03832.1mt     +++|*
05836  M01S03833.1mt     +++|*         ENTRY  (IPRL, 24) = 0 IF 63 CHARACTER SET.
05837  M01S03834.1mt     +++|*                           = 1 IF 64 CHARACTER SET.
05838  M01S03835.1mt     +++|*
05839  M01S03836.1mt     +++|*         *CSET* TABLE FORMAT -
05840  M01S03837.1mt     +++|*         CON    LOC,CONT
05841  M01S03838.1mt     +++|*                LOC = LOCATION OF CHANGE.
05842  M01S03839.1mt     +++|*                CONT = CONTENTS OF CHANGE.
05843  M01S03840.1mt     +++|*         0 IN LOC FIELD = END OF TABLE.
05844  M01S03841.1mt     +++|*
05845  M01S03842.1mt     +++|*         *CSETP* TABLE FORMAT - (USED FOR ATS 9 TRACK TABLES
05846  M01S03843.1mt     +++|*                WHERE 3 FRAMES ARE PACKED INTO 2 PP BYTES)
05847  M01S03844.1mt     +++|*         CON    LOC,CONT1,CONT2
05848  M01S03845.1mt     +++|*                LOC = LOCATION OF CHANGE.
05849  M01S03846.1mt     +++|*                CONT1 = CONTENTS OF *LOC*
05850  M01S03847.1mt     +++|*                CONT2 = CONTENTS OF *LOC*+1
05851  M01S03848.1mt     +++|*         0 IN LOC FIELD = END OF TABLE.
05852  M01S03849.1mt     +++|*
05853  M01S03850.1mt     +++|*         EXIT   CHARACTER TABLES MODIFIED IF 63 CHARACTER SET.
05854  M01S03851.1mt     +++|
05855  M01S03852.1mt     +++|
05856  M01S03853.1mt     +++| SCS      SUBR               ENTRY/EXIT
05857  M01S03854.1mt     +++|          LDN    IPRL        CHECK CONVERSION MODE
05858  M01S03855.1mt     +++|          CRD    CM
05859  M01S03856.1mt     +++|          LDD    CM+2
05860  M01S03857.1mt     +++|          LPN    1
05861  M01S03858.1mt     +++|          NJN    SCSX        IF 64 CHARACTER SET
05862  M01S03859.1mt     +++|          LDC    CSET        MODIFY TABLES
05863  M01S03860.1mt     +++| SCS1     STD    T1
05864  M01S03861.1mt     +++|          LDI    T1
05865  M01S03862.1mt     +++| SCS2     STD    T2
05866  M01S03863.1mt     +++|          LDM    1,T1
05867  M01S03864.1mt     +++|          STI    T2
05868  M01S03865.1mt     +++| SCSA     UJN    SCS3        FOR C63 TABLE
05869  M01S03866.1mt     +++|*         AOD    T1          (C63P TABLE)
05870  M01S03867.1mt     +++|          AOD    T2
05871  M01S03868.1mt     +++|          LDM    1,T1
05872  M01S03869.1mt     +++|          STI    T2
05873  M01S03870.1mt     +++| SCS3     LDN    2
05874  M01S03871.1mt     +++|          RAD    T1
05875  M01S03872.1mt     +++|          LDI    T1
05876  M01S03873.1mt     +++|          NJN    SCS2        IF MORE INSTRUCTIONS TO MODIFY
05877  M01S03874.1mt     +++| SCSB     LDN    0
05878  M01S03875.1mt     +++|          NJN    SCSX        IF BOTH TABLES PROCESSED
05879  M01S03876.1mt     +++|          AOM    SCSB        SET EXIT
05880  M01S03877.1mt     +++|          LDC    AODI+T1     MODIFY INSTRUCTION
05881  M01S03878.1mt     +++|          STM    SCSA
05882  M01S03879.1mt     +++|          LDC    CSETP       PROCESS C63P TABLE
05883  M01S03880.1mt     +++|          UJN    SCS1        MODIFY INSTRUCTIONS FOR THIS TABLE
05884  M01S03881.1mt     +++|
05885  M01S03882.1mt     +++|
05886  M01S03883.1mt     +++|*         CONVERSION INFORMATION FOR 64 TO 63 CHARACTER SET.
05887  M01S03884.1mt     +++|
05888  M01S03885.1mt     +++| CSET     BSS    0
05889  M01S03886.1mt     +++| C63      HERE
05890  M01S03887.1mt     +++|          CON    0           END OF TABLE
05891  M01S03888.1mt     +++|
05892  M01S03889.1mt     +++| CSETP    BSS    0
05893  M01S03890.1mt     +++| C63P     HERE
05894  M01S03891.1mt     +++|          CON    0           END OF TABLE
05895  M01S03892.1mt     +++| FUN      SPACE  4,15
05896  M01S03893.1mt     +++|**        FUN - DEFINE FUNCTION PROCESSOR.
05897  M01S03894.1mt     +++|*
05898  M01S03895.1mt     +++|*
05899  M01S03896.1mt     +++|*TNAM     FUN    TYPE,NAME,SNAME,RNB,UCP
05900  M01S03897.1mt     +++|*         ENTRY  *TNAM* = FWA OF TABLE IS SET TO TNAM.
05901  M01S03898.1mt     +++|*                *TYPE* = FUNCTION NUMBER.
05902  M01S03899.1mt     +++|*                *NAME* = NAME OF FUNCTION PROCESSOR.
Line S03900 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05903  M02S03900.282l826 ---|*                *SNAME* = NAME OF ADDITIONAL OVERLAY TO BE LOADED
Line S03901 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05904  M02S03901.282l826 ---|*                          FIRST.
05905  M01S00434.282l826 +++|*                *SNAME* = NAME OF ADDITIONAL OVERLAY TO BE LOADED.
05906  M01S03902.1mt     +++|*                *RNB* = FUNCTION REQUIRES READY AND NOT BUSY.
05907  M01S03903.1mt     +++|*                *UCP* = FUNCTION TO BE DONE AT USERS CONTROL POINT.
05908  M01S03904.1mt     +++|
05909  M01S03905.1mt     +++|
05910  M01S03906.1mt     +++|          MACRO  FUN,A,B,C,D,E,F
05911  M01S03907.1mt     +++| .F1      IFC    NE,*A**
05912  M01S03908.1mt     +++| A        BSS    0
05913  M01S03909.1mt     +++| .2       SET    A
05914  M01S03910.1mt     +++| .F1      ELSE
05915  M01S03911.1mt     +++|          ORG    .2+5*B-5
05916  M01S03912.1mt     +++| .F2      IFC    NE,*C**
05917  M01S03913.1mt     +++|          LOC    B
05918  M01S03914.1mt     +++| .1       SET    0
05919  M01S03915.1mt     +++|          IFC    NE,*E**,1
05920  M01S03916.1mt     +++| .1       SET    .1+40
05921  M01S03917.1mt     +++|          IFC    NE,*F**,1
05922  M01S03918.1mt     +++| .1       SET    .1+20
05923  M01S03919.1mt     +++| .F3      IFC    NE,*D**
Line S03920 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05924  M02S03920.282l826 ---|          CON    D/10000*200+.1+C/10000-D/10000,C-C/10000*10000
05925  M01S00435.282l826 +++|          CON    D/10000*100+.1+C/10000-D/10000,C-C/10000*10000
05926  M01S03921.1mt     +++| .F3      ELSE
Line S03922 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05927  M02S03922.282l826 ---|          CON    C/10000*200+.1,C-C/10000*10000
05928  M01S00436.282l826 +++|          CON    C/10000*100+.1,C-C/10000*10000
05929  M01S03923.1mt     +++| .F3      ENDIF
05930  M01S03924.1mt     +++| .F2      ENDIF
05931  M01S03925.1mt     +++|          BSS    0
05932  M01S03926.1mt     +++| .F1      ENDIF
05933  M01S03927.1mt     +++|          ENDM
05934  M01S03928.1mt     +++| TFUN     SPACE  4,15
05935  M01S03929.1mt     +++|**        TFUN - TABLE OF FUNCTION CODE PROCESSORS.
05936  M01S03930.1mt     +++|*         ENTRY = 2 WORDS.
05937  M01S03931.1mt     +++|*
Line S03932 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05938  M02S03932.282l826 ---|*T,       5/ OV,1/0,1/B,1/U,4/ AO,12/ ADDR
Figure

01112151617181923 ADDR AOUB0 OV

05939  M01S00437.282l826 +++|*T,       6/ OV,1/B,1/U,4/ AO,12/ ADDR
Figure

011121516171823 ADDR AOUB OV


Line S03933 Modification History
M01 (Added by) 1mt
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05940  M02S03933.274l797 ---|*         OV     OVERLAY NAME.
05941  M01S00666.274l797 +++|*         OV     OVERLAY NAME THIRD CHARACTER.
05942  M01S03934.1mt     +++|*         B      FUNCTION REQUIRES NOT BUSY. (SEE NOTE)
05943  M01S03935.1mt     +++|*         U      FUNCTION TO BE DONE AT USER,S CONTROL POINT.
Line S03936 Modification History
M01 (Added by) 1mt
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05944  M02S03936.274l797 ---|*         AO     ADDITION OVERLAY REQUIRED.
Line S03937 Modification History
M01 (Added by) 1mt
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
05945  M02S03937.274l797 ---|*         ADDR   ADDRESS OF FUNCTION PROCESSOR.
05946  M01S00667.274l797 +++|*         AO     ADDITIONAL OVERLAY REQUIRED IF NONZERO.  OV PLUS
05947  M01S00668.274l797 +++|*                AO IS THE SECOND OVERLAY NAME THIRD CHARACTER.
05948  M01S00669.274l797 +++|*         ADDR   ADDRESS OF FUNCTION PROCESSOR.  *CPP* JUMPS TO
05949  M01S00670.274l797 +++|*                THIS ADDRESS.
05950  M01S03938.1mt     +++|*
05951  M01S03939.1mt     +++|*         NOTE   THIS FLAG ALSO INDICATES THAT THE FUNCTION REQUIRES
05952  M01S03940.1mt     +++|*                A FORMAT UNIT FUNCTION TO BE ISSUED FOR MTS AND ATS
05953  M01S03941.1mt     +++|*                UNITS. SEE ROUTINE *CCD* IN CONTROL POINT PRESET
05954  M01S03942.1mt     +++|*                OVERLAY.
05955  M01S03943.1mt     +++|
05956  M01S03944.1mt     +++|
05957  M01S03945.1mt     +++|          BSS    0
05958  M01S03946.1mt     +++| TFUN     FUN
05959  M01S03947.1mt     +++|          FUN    /MTX/SED,SED  SET EQUIPMENT DEFINITION
Line S03948 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05960  M02S03948.282l826 ---|          FUN    /MTX/CUF,CUF,,,UCP   COMPLETE USER FET
Line S03949 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05961  M02S03949.282l826 ---|          FUN    /MTX/MAB,MAB,,,UCP   ISSUE MESSAGE AND ABORT JOB
05962  M01S03950.1mt     +++|          FUN    /MTX/FNH,PFN   PROCESS FUNCTION
05963  M01S03951.1mt     +++|          FUN    /MTX/SKP,SKP,RDF,RNB    SKIP
05964  M01S03952.1mt     +++|          FUN    /MTX/OPF,OPF,,,UCP  OPEN
05965  M01S03953.1mt     +++|          FUN    /MTX/RDF,RDF,,RNB,UCP  READ
05966  M01S03954.1mt     +++|          FUN    /MTX/RLA,RLA,RDF,RNB  READ LABEL(S)
05967  M01S03955.1mt     +++|          FUN    /MTX/WTF,WTF,,RNB,UCP  WRITE
05968  M01S03956.1mt     +++|          FUN    /MTX/WLA,WLA,WTF,RNB  WRITE LABEL(S)
Line S03957 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05969  M02S03957.282l826 ---|          FUN    /MTX/MFUN
05970  M01S00438.282l826 +++|          FUN    /MTX/MDFN
05971  M01S03958.1mt     +++| TFUNL    EQU    *-TFUN
05972  M01S03959.1mt     +++| TFUNC    EQU    TFUNL/5     CM WORD LENGTH
Line S03960 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05973  M02S03960.282l826 ---|          ERRNZ  TFUNC-/MTX/MFUN+1  1MT COMSMTX OUT OF SYNC
Line S03961 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05974  M02S03961.282l826 ---| MTB      SPACE  4,10
Line S03962 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05975  M02S03962.282l826 ---|**        MTB - DEFINE *DSD* ERROR MESSAGE TABLE.
Line S03963 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05976  M02S03963.282l826 ---|*
Line S03964 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05977  M02S03964.282l826 ---|* TNAM    MTB    NUM,MESS
Line S03965 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05978  M02S03965.282l826 ---|*
Line S03966 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05979  M02S03966.282l826 ---|*                *TNAM* = FWA OF TABLE.
Line S03967 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05980  M02S03967.282l826 ---|*                *NUM* = MESSAGE NUMBER.
Line S03968 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05981  M02S03968.282l826 ---|*                *MESS* = CONTENTS OF MESSAGE.
Line S03969 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05982  M02S03969.282l826 ---|
Line S03970 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05983  M02S03970.282l826 ---|
Line S03971 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05984  M02S03971.282l826 ---|          MACRO  MTB,A,B,C
Line S03972 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05985  M02S03972.282l826 ---| .F1      IFC    NE,*A**
Line S03973 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05986  M02S03973.282l826 ---| .1       SET    0
Line S03974 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05987  M02S03974.282l826 ---| A        BSS    0
Line S03975 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05988  M02S03975.282l826 ---| .2       SET    A
Line S03976 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05989  M02S03976.282l826 ---| .F1      ELSE
Line S03977 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05990  M02S03977.282l826 ---| .1       SET    .1+1
Line S03978 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05991  M02S03978.282l826 ---|          ERRNZ  .1-B      IF MESSAGE OUT OF ORDER
Line S03979 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05992  M02S03979.282l826 ---|          ORG    .2+10D*B-10D
Line S03980 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05993  M02S03980.282l826 ---| .F2      IFC    NE,*C**
Line S03981 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05994  M02S03981.282l826 ---|          LOC    B
Line S03982 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05995  M02S03982.282l826 ---|          DATA   18C _C
Line S03983 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05996  M02S03983.282l826 ---| .F2      ENDIF
Line S03984 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05997  M02S03984.282l826 ---| .F1      ENDIF
Line S03985 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05998  M02S03985.282l826 ---|          ENDM
Line S03986 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
05999  M02S03986.282l826 ---| MTBL     SPACE  4,10
Line S03987 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06000  M02S03987.282l826 ---|**        MTBL - *DSD E,P* MESSAGE TABLE.
Line S03988 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06001  M02S03988.282l826 ---|*         EACH ENTRY IS 2 CM WORDS.
Line S03989 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06002  M02S03989.282l826 ---|
Line S03990 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06003  M02S03990.282l826 ---|
Line S03991 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06004  M02S03991.282l826 ---| MTBL     MTB
Line S03992 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06005  M02S03992.282l826 ---|          MTB    /MTX/NLB,(NEEDS LABEL)
Line S00120 Modification History
M01 (Added by) ns22000
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06006  M03S00120.282l826 ---|          MTB    /MTX/IAL,(ACCESS CONFLICT)
Line S03993 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06007  M02S03993.282l826 ---|          MTB    /MTX/CAD,(CAN,T ACCESS DATA)
Line S03994 Modification History
M01 (Added by) 1mt
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06008  M03S03994.282l826 ---|          MTB    /MTX/RCF,(RING CONFLICT)
Line S00671 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06009  M02S00671.282l826 ---|          MTB    /MTX/WRD,(WRITE DISABLED)
Line S03995 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06010  M02S03995.282l826 ---|          MTB    /MTX/WVS,(WRONG VSN)
Line S00672 Modification History
M01 (Added by) 274l797
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06011  M02S00672.282l826 ---|          MTB    /MTX/IAL,(ACCESS CONFLICT)
Line S03996 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06012  M02S03996.282l826 ---|          MTB    /MTX/DCF,(DRIVE CONFLICT)
Line S03997 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06013  M02S03997.282l826 ---|          MTB    /MTX/DMT,(DENSITY MISMATCH)
Line S00171 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06014  M02S00171.282l826 ---|          MTB    /MTX/FCT,(CLEANER FAULT)
Line S00172 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06015  M02S00172.282l826 ---|          MTB    /MTX/RFB,(READ ID BURST)
Line S00173 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06016  M02S00173.282l826 ---|          MTB    /MTX/WFB,(WRITE ID BURST)
Line S00174 Modification History
M01 (Added by) 252l678
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06017  M02S00174.282l826 ---|          MTB    /MTX/MNT,(MOUNT NEXT TAPE)
Line S00001 Modification History
M01 (Added by) ns2522
M02 (Updated by) 274l797
M03 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06018  M03S00001.282l826 ---|          MTB    /MTX/URE,(UNRECOVERED ERROR)
Line S00001 Modification History
M01 (Added by) ns2581
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06019  M02S00001.282l826 ---|          MTB    /MTX/CAM,(CHECK AND MOUNT)
Line S03998 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06020  M02S03998.282l826 ---|          MTB    /MTX/MDEC
Line S03999 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06021  M02S03999.282l826 ---| MTBLT    EQU    *-MTBL
Line S04000 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06022  M02S04000.282l826 ---| MTBLL    EQU    MTBLT/5
Line S04001 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06023  M02S04001.282l826 ---|          ERRNZ  MTBLL-/MTX/DMBFL      1MT/COMSMTX OUT OF SYNC
06024  M01S00439.282l826 +++|          ERRNZ  TFUNC-/MTX/MDFN+1  *1MT*/*COMSMTX* OUT OF SYNC
06025  M01S04002.1mt     +++|
Line S04003 Modification History
M01 (Added by) 1mt
M02 (Updated by) 1mt35
Seq #  *Modification Id* Act 
----------------------------+
06026  M02S04003.1mt35   ---|          OVERFLOW  PPFW+500B
06027  M01S00011.1mt35   +++|          OVERFLOW  PPFW,EPFW
06028  M01S04004.1mt     +++|          OVERLAY (FUNCTION REJECT PROCESSOR.),(ERLA+5),P
06029  M01S04005.1mt     +++| FRP      SPACE  4,10
06030  M01S04006.1mt     +++|**        FRP - FUNCTION REJECT PROCESSOR.
06031  M01S04007.1mt     +++|*
Line S04008 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06032  M02S04008.282l826 ---|*         ENTRY  (CN) = 0 IF PROCESS FUNCTION REJECT.
Line S04009 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06033  M02S04009.282l826 ---|*                (CN) = 1 IF CHANNEL ACTIVE ON ENTRY TO *1MT*.
Line S04010 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06034  M02S04010.282l826 ---|*                (CN) = 2 IF DOWN CHANNEL.
Line S04011 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06035  M02S04011.282l826 ---|*                CHANNEL NOT RESERVED FOR (CN) = 1 OR 2.
06036  M01S00440.282l826 +++|*         CALLS  CUI, DME, ERR, MCH, PCR, STC, STW.
06037  M01S04012.1mt     +++|*
Line S04013 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06038  M02S04013.282l826 ---|*         CALLS  CUI, DME, ERR, MCH, PCR, STC, STW.
Line S04014 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06039  M02S04014.282l826 ---|*
Line S04015 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06040  M02S04015.282l826 ---|*         MACROS CHTE, CMOT, RCHAN.
06041  M01S00441.282l826 +++|*         MACROS CHTE.
06042  M01S04016.1mt     +++|*
06043  M01S04017.1mt     +++|*         THE FOLLOWING ARE THE POSSIBLE ACTIONS TAKEN FOR
06044  M01S04018.1mt     +++|*         A FUNCTION REJECT ON AN MTS TAPE CONTROLLER -
06045  M01S04019.1mt     +++|*
06046  M01S04020.1mt     +++|*         1)     IF CHANNEL ACTIVE EXIT WITH CHANNEL MALFUNCTION.
06047  M01S04021.1mt     +++|*
06048  M01S04022.1mt     +++|*         2)     ESTABLISH MTS BUFFER CONTROLLER IS RUNNING.
06049  M01S04023.1mt     +++|*
06050  M01S04024.1mt     +++|*         3)     IF NOT RUNNING TRY TO RESTART OPERATION BY AUTO-LOAD.
06051  M01S04025.1mt     +++|*                THIS IS ATTEMPED TWICE TO COVER THE CASE WHERE THE
06052  M01S04026.1mt     +++|*                COUPLER LOCKS UP WITH DATA IN ITS INTERNAL BUFFER
06053  M01S04027.1mt     +++|*                AND TWO AUTO-LOADS ARE REQUIRED TO FREE THE COUPLER.
06054  M01S04028.1mt     +++|*
06055  M01S04029.1mt     +++|*         4)     IF NOT SUCCESSFUL EXIT WITH CHANNEL MALFUNCTION.
06056  M01S04030.1mt     +++|*
06057  M01S04031.1mt     +++|*         5)     SEE PRECEDING STEP 2.
06058  M01S04032.1mt     +++|*
06059  M01S04033.1mt     +++|*         6)     IF RELEASE FUNCTION EXIT.
06060  M01S04034.1mt     +++|*
06061  M01S04035.1mt     +++|*         7)     IF STOP TAPE MOTION FUNCTION, RECONNECT UNIT AND EXIT.
06062  M01S04036.1mt     +++|*
06063  M01S04037.1mt     +++|*         8)     GET GENERAL AND DETAILED STATUS.
06064  M01S04038.1mt     +++|*
06065  M01S04039.1mt     +++|*         9)     IF ALERT NOT SET, EXIT WITH CHANNEL MALFUNCTION.
06066  M01S04040.1mt     +++|*
06067  M01S04041.1mt     +++|*         10)    IF ERROR CODE NOT SET IN DETAILED STATUS, EXIT
06068  M01S04042.1mt     +++|*                WITH CHANNEL MALFUNCTION.
06069  M01S04043.1mt     +++|*
06070  M01S04044.1mt     +++|*         11)    IF ERROR CODE 4 SET, EXIT WITH READY DROP.
06071  M01S04045.1mt     +++|*
06072  M01S04046.1mt     +++|*         12)    IF ERROR CODE 54B OR 55B SET, EXIT
06073  M01S04047.1mt     +++|*                WITH CHANNEL MALFUNCTION.
06074  M01S04048.1mt     +++|*
06075  M01S04049.1mt     +++|*         13)    IF ANY OTHER ERROR CODE, EXIT WITH FUNCTION REJECT.
06076  M01S04050.1mt     +++|*
06077  M01S04051.1mt     +++|*         THE FOLLOWING ARE THE POSSIBLE ACTIONS TAKEN FOR
06078  M01S04052.1mt     +++|*         A FUNCTION REJECT ON AN ATS CONTROLLER.
06079  M01S04053.1mt     +++|*
06080  M01S04054.1mt     +++|*         1)     IF CHANNEL ACTIVE, EXIT WITH CHANNEL MALFUNCTION.
06081  M01S04055.1mt     +++|*
06082  M01S04056.1mt     +++|*         2)     IF NOT FIRST ERROR, EXIT WITH CHANNEL MALFUNCTION.
06083  M01S04057.1mt     +++|*
06084  M01S04058.1mt     +++|*         3)     GET GENERAL AND DETAILED STATUS.
06085  M01S04059.1mt     +++|*
06086  M01S04060.1mt     +++|*         4)     IF ALERT NOT SET, EXIT WITH CHANNEL MALFUNCTION.
06087  M01S04061.1mt     +++|*
06088  M01S04062.1mt     +++|*         5)     IF CHANNEL OR TCU PARITY ERROR, EXIT WITH
06089  M01S04063.1mt     +++|*                CHANNEL MALFUNCTION.
06090  M01S04064.1mt     +++|*
06091  M01S04065.1mt     +++|*         6)     IF ERROR CODE 4 SET IN DETAILED STATUS, EXIT
06092  M01S04066.1mt     +++|*                WITH READY DROP.
06093  M01S04067.1mt     +++|*
06094  M01S04068.1mt     +++|*         7)     EXIT WITH FUNCTION REJECT.
06095  M01S04069.1mt     +++|
06096  M01S04070.1mt     +++|
06097  M01S04071.1mt     +++| FRP      SUBR               ENTRY/EXIT
06098  M01S04072.1mt     +++|          LDC    FRPD        MODIFY CHANNELS
06099  M01S04073.1mt     +++|          RJM    MCH
Line S04074 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06100  M02S04074.282l826 ---|          SOD    CN
Line S04075 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06101  M02S04075.282l826 ---|          MJN    FRP2        IF FUNCTION REJECT
Line S04076 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06102  M02S04076.282l826 ---|          CHTE   *
Line S04077 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06103  M02S04077.282l826 ---|          LDN    CH          RESERVE CHANNEL
Line S04078 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06104  M02S04078.282l826 ---|          RCHAN
Line S04079 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06105  M02S04079.282l826 ---|          LDD    CN
Line S04080 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06106  M02S04080.282l826 ---|          NJN    FRP1        IF DOWN CHANNEL
Line S04081 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06107  M02S04081.282l826 ---|          LJM    ACT         PROCESS CHANNEL ACTIVE ERROR
Line S04082 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06108  M02S04082.282l826 ---|
Line S04083 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06109  M02S04083.282l826 ---| FRP1     LJM    DWN         DOWN CHANNEL
Line S04084 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06110  M02S04084.282l826 ---|
Line S04085 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06111  M02S04085.282l826 ---| FRP2     RJM    DME         DETERMINE IF MONITORING ENABLED
Line S04086 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06112  M02S04086.282l826 ---|          RJM    PCR         PROCESS CONNECT REJECT
06113  M01S00442.282l826 +++|          LDD    EC
06114  M01S00443.282l826 +++|          LMN    /MTX/CRJ
06115  M01S00444.282l826 +++|          ZJP    PCR         IF CONNECT REJECT
06116  M01S04087.1mt     +++|          LDM    //STCB      SAVE CHANNEL STATUS
06117  M01S04088.1mt     +++|          STM    //.OVLR+2
06118  M01S04089.1mt     +++|          LDC    LDNI+0      SET TO FORCE DROP OUT
06119  M01S04090.1mt     +++|          STM    //PNRC
Line S04091 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06120  M02S04091.282l826 ---|          LDN    4           SAVE PARAMETERS FOR LATER ERROR MESSAGE
Line S04092 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06121  M02S04092.282l826 ---|          STD    T1
06122  M01S04093.1mt     +++|          LDM    //FCND      SAVE FUNCTION REJECTED
06123  M01S04094.1mt     +++|          STM    //.OVLR
Line S04095 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06124  M02S04095.282l826 ---|          LDD    MA
Line S04096 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06125  M02S04096.282l826 ---|          CWM    ED,T1
Line S04097 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06126  M02S04097.282l826 ---|          CWD    RS
Line S04098 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06127  M02S04098.282l826 ---|          AOD    T1
Line S04099 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06128  M02S04099.282l826 ---|          LDD    MA
Line S04100 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06129  M02S04100.282l826 ---|          CRM    //.OVLR+3,T1
06130  M01S04101.1mt     +++|          LDM    //FCN       SAVE ADDRESS OF CALLER
06131  M01S04102.1mt     +++|          STM    //.OVLR+1
06132  M01S04103.1mt     +++|          LDC    //ERR       INSURE CORRECT EXIT SET IN *STW*
06133  M01S04104.1mt     +++|          STM    //STWC
06134  M01S04105.1mt     +++|          LDC    RJMI
06135  M01S04106.1mt     +++|          STM    //STWC-1
Line S04107 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06136  M02S04107.282l826 ---|          CMOT   *
06137  M01S04108.1mt     +++|          IJM    FRP4,CH     IF CHANNEL OK
06138  M01S04109.1mt     +++| FRP3     LJM    FRP12       GIVE FATAL ERROR
06139  M01S04110.1mt     +++|
06140  M01S04111.1mt     +++| FRP4     LDD    HP
Line S04112 Modification History
M01 (Added by) 1mt
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
06141  M02S04112.v23l617 ---|          LPC    140
Line S04113 Modification History
M01 (Added by) 1mt
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
06142  M02S04113.v23l617 ---|          NJN    FRP5        IF MTS OR FSC ADAPTOR
06143  M01S00134.v23l617 +++|          LPC    540
Line S00135 Modification History
M01 (Added by) v23l617
M02 (Updated by) ns2466
Seq #  *Modification Id* Act 
----------------------------+
06144  M02S00135.ns2466  ---|          NJN    FRP5        IF MTS OR FSC OR ISMT ADAPTOR
06145  M01S00185.ns2466  +++|          NJN    FRP5        IF MTS/FSC/CMTS/ISMT ADAPTOR
06146  M01S04114.1mt     +++|          LDM    FRPB
06147  M01S04115.1mt     +++|          STM    FRPA
06148  M01S04116.1mt     +++|          LJM    FRP10       PROCESS ATS CONTROLLER
06149  M01S04117.1mt     +++|
06150  M01S04118.1mt     +++| FRP5     LDN    0           SET ERROR ENCOUNTERED FLAG
06151  M01S04119.1mt     +++|          STM    //FCNC
Line S04120 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06152  M02S04120.282l826 ---|          CMOT   *
06153  M01S04121.1mt     +++|          FNC    0,CH        VERIFY B.C. RUNNING
06154  M01S04122.1mt     +++|          RJM    STC
06155  M01S04123.1mt     +++|          ZJN    FRP8        IF B.C. RUNNING
06156  M01S04124.1mt     +++|          LDN    2           NUMBER OF ATTEMPTS TO RESTART B.C.
06157  M01S04125.1mt     +++|          STD    T1
06158  M01S04126.1mt     +++|          LDN    0           CLEAR CONNECTED FLAG
06159  M01S04127.1mt     +++|          STM    //RELA
06160  M01S04128.1mt     +++| FRP6     SOD    T1
06161  M01S04129.1mt     +++| FRP7     MJN    FRP3        IF CANNOT RESTART B.C.
Line S04130 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06162  M02S04130.282l826 ---|          CMOT   *
06163  M01S04131.1mt     +++|          FNC    414,CH      RESTART B.C.
06164  M01S04132.1mt     +++|          RJM    STC         STATUS CHANNEL
06165  M01S04133.1mt     +++|          NJN    FRP6        IF CHANNEL ILL
06166  M01S04134.1mt     +++|          ACN    CH
06167  M01S04135.1mt     +++|          OAN    CH+40
06168  M01S04136.1mt     +++|          DCN    CH+40
Line S04137 Modification History
M01 (Added by) 1mt
M02 (Updated by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
06169  M02S04137.282l826 ---|          STM    //.OVLR+3
06170  M01S00445.282l826 +++|          STM    //.OVLR+3   INIDICATE B.C. RESTARTED
06171  M01S04138.1mt     +++| FRP8     LDD    T6
06172  M01S04139.1mt     +++|          SHN    21-13
06173  M01S04140.1mt     +++|          MJN    FRP7        IF OVERLAY NOT CM RESIDENT
06174  M01S04141.1mt     +++|          LDM    //FCND      CHECK FUNCTION
06175  M01S04142.1mt     +++|          LMN    1
06176  M01S04143.1mt     +++|          ZJN    FRP9        IF RELEASE FUNCTION
06177  M01S04144.1mt     +++|          LMN    11&1
06178  M01S04145.1mt     +++|          NJN    FRP10       IF NOT STOP TAPE MOTION
06179  M01S04146.1mt     +++|          LDM    //RELA
06180  M01S04147.1mt     +++|          NJN    FRP9        IF UNIT CONNECTED
06181  M01S04148.1mt     +++|          RJM    CUI         REFORMAT UNIT
06182  M01S04149.1mt     +++| FRP9     LDM    //.OVLR+1   RESET RETURN ADDRESS
06183  M01S04150.1mt     +++|          STM    //FCN
Proceed to Part 7
cdc/nos2.source/opl.opl871/deck/1mt.006.txt ยท Last modified: (external edit)