Deck MST Part 001

21 Modifications

Listing Sections

Deck MST Start
Deck MST Part 1 (Line 1258)

Source

Seq #  *Modification Id* Act 
----------------------------+
01258  M01S00730.mst     +++|          GT     B5,B6,DCH4  IF END OF CHECK
01259  M01S00731.mst     +++|          ZR     X7,DCH2     IF DATA MATCHES
01260  M01S00732.mst     +++|          LX6    X2
01261  M01S00733.mst     +++|          SB7    B1          ERROR FLAG
01262  M01S00734.mst     +++|          SA6    DCHA
01263  M01S00735.mst     +++|          SA7    A6+B1
01264  M01S00736.mst     +++|          BX0    X1
01265  M01S00737.mst     +++|          SX1    B5
01266  M01S00738.mst     +++|          SB6    B0
01267  M01S00739.mst     +++|          RJ     COD         CONVERT WORD NUMBER
01268  M01S00740.mst     +++|          LX6    6
01269  M01S00741.mst     +++|          SX1    B1
01270  M01S00742.mst     +++|          IX6    X6+X1
01271  M01S00743.mst     +++|          BX1    X0
01272  M01S00744.mst     +++|          SA6    DCHD
01273  M01S00745.mst     +++| DCH3     RJ     WOD         CONVERT DATA
01274  M01S00746.mst     +++|          SA1    TMES+B6     MESSAGE TYPE
01275  M01S00747.mst     +++|          SA2    DCHD
01276  M01S00748.mst     +++|          SA6    DCHE
01277  M01S00749.mst     +++|          MX0    -24
01278  M01S00750.mst     +++|          SA7    A6+B1
01279  M01S00751.mst     +++|          BX2    -X0*X2      MERGE MESSAGE TYPE
01280  M01S00752.mst     +++|          BX1    X0*X1
01281  M01S00753.mst     +++|          BX6    X2+X1
01282  M01S00754.mst     +++|          SA6    A2
01283  M01S00755.mst     +++|          MESSAGE  DCHC,,R
01284  M01S00756.mst     +++|          SA1    DCHA+B6
01285  M01S00757.mst     +++|          SB2    B6-B1
01286  M01S00758.mst     +++|          SB6    B6+B1
01287  M01S00759.mst     +++|          NE     B2,B1,DCH3  IF MORE MESSAGES FOR THIS ERROR
01288  M01S00760.mst     +++|          EQ     DCH1
01289  M01S00761.mst     +++|
01290  M01S00762.mst     +++| DCHA     CON    0           TEMPORARY
01291  M01S00763.mst     +++| DCHB     CON    0           TEMPORARY

Line S00764 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01292  M02S00764.ns22000 ---| DCHC     CON    10H EQXX DATA
01293  M01S00035.ns22000 +++| DCHC     DATA   10HEQXXX,DATA
01294  M01S00765.mst     +++| DCHD     CON    10H .... 000,
01295  M01S00766.mst     +++| DCHE     CON    0,0,0
01296  M01S00767.mst     +++|
01297  M01S00768.mst     +++| TMES     CON    6L EXP      TABLE OF MESSAGES
01298  M01S00769.mst     +++|          CON    6L READ
01299  M01S00770.mst     +++|          CON    6L DIFF

Line S00771 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01300  M02S00771.mst4    ---| ERR      SPACE  4
01301  M01S00228.mst4    +++| ERR      SPACE  4,15
01302  M01S00772.mst     +++|**        ERR - SEND ERROR MESSAGE.
01303  M01S00773.mst     +++|*
01304  M01S00017.mst9    +++|*         ENTRY  (X5) = SECTOR NUMBER, JSN AND MFID READ.
01305  M01S00774.mst     +++|*                (X4) = 0 IF REGISTERS MUST BE SAVED.
01306  M01S00775.mst     +++|*                (X2) = SECOND WORD OF MESSAGE.
01307  M01S00776.mst     +++|*                (X1) = FIRST WORD OF MESSAGE.
01308  M01S00777.mst     +++|*
01309  M01S00778.mst     +++|*         USES   X - 0, 1, 2, 3, 4, 6, 7.
01310  M01S00229.mst4    +++|*                A - 1, 2, 3, 6, 7.
01311  M01S00779.mst     +++|*                B - 6

Line S00780 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01312  M02S00780.mst4    ---|*                A - 1, 2, 3, 6, 7.

Line S00781 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01313  M02S00781.mst4    ---|*

Line S00782 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01314  M02S00782.mst4    ---|*         CALLS  CIO=, CVA, LFM=, MSG=, WOD.
01315  M01S00230.mst4    +++|*
01316  M01S00231.mst4    +++|*         CALLS  CVA, WOD.
01317  M01S00232.mst4    +++|*
01318  M01S00233.mst4    +++|*         MACROS MESSAGE, RECALL, RPHR, STATUS.
01319  M01S00783.mst     +++|
01320  M01S00784.mst     +++|
01321  M01S00785.mst     +++| ERR      SUBR               ENTRY/EXIT
01322  M01S00786.mst     +++|          BX6    X1
01323  M01S00787.mst     +++|          LX7    X2
01324  M01S00788.mst     +++|          SA6    ERRB

Line S00789 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst9`

Seq #  *Modification Id* Act 
----------------------------+
01325  M02S00789.mst9    ---|          BX6    X5
01326  M01S00018.mst9    +++|          MX6    -24
01327  M01S00019.mst9    +++|          BX6    -X6*X5
01328  M01S00790.mst     +++|          SA7    A6+B1
01329  M01S00791.mst     +++|          SA6    ERRH
01330  M01S00792.mst     +++|          RECALL D
01331  M01S00793.mst     +++|          NZ     X4,ERR1     IF REGISTERS ALREADY SAVED
01332  M01S00794.mst     +++|          SA2    D+2
01333  M01S00795.mst     +++|          SA3    D+3
01334  M01S00796.mst     +++|          LX6    X5
01335  M01S00797.mst     +++|          BX7    X2
01336  M01S00798.mst     +++|          SA2    D+6
01337  M01S00799.mst     +++|          SA6    ERRA
01338  M01S00800.mst     +++|          LX6    X3
01339  M01S00801.mst     +++|          SA7    A6+B1
01340  M01S00802.mst     +++|          BX7    X0
01341  M01S00803.mst     +++|          SA6    A7+B1
01342  M01S00804.mst     +++|          LX6    X2
01343  M01S00805.mst     +++|          SA7    A6+B1
01344  M01S00806.mst     +++|          SA6    A6+2
01345  M01S00807.mst     +++| ERR1     SA2    ERRH        POSITION TO ERROR
01346  M01S00808.mst     +++|          SA1    D+1
01347  M01S00809.mst     +++|          BX6    X2
01348  M01S00810.mst     +++|          SX7    X1
01349  M01S00811.mst     +++|          SA6    D+6
01350  M01S00812.mst     +++|          SX6    X1+B1
01351  M01S00813.mst     +++|          SA7    A1+B1
01352  M01S00814.mst     +++|          SA6    A7+B1
01353  M01S00815.mst     +++|          RPHR   D,R
01354  M01S00816.mst     +++|          STATUS X2,P
01355  M01S00817.mst     +++|          SA1    ERRH        MERGE RANDOM ADDRESS TRACK AND SECTOR
01356  M01S00818.mst     +++|          SA2    D+6
01357  M01S00819.mst     +++|          MX0    30
01358  M01S00820.mst     +++|          LX2    18
01359  M01S00821.mst     +++|          BX1    -X0*X1
01360  M01S00822.mst     +++|          BX2    X0*X2
01361  M01S00823.mst     +++|          BX1    X1+X2
01362  M01S00824.mst     +++|          RJ     WOD         CONVERT RANDOM ADDRESS TRACK AND SECTOR
01363  M01S00825.mst     +++|          SA1    ERRE
01364  M01S00826.mst     +++|          MX0    -18
01365  M01S00827.mst     +++|          SA2    A1+B1
01366  M01S00828.mst     +++|          BX1    X0*X1
01367  M01S00829.mst     +++|          LX7    -24
01368  M01S00830.mst     +++|          MX4    24
01369  M01S00831.mst     +++|          BX3    -X0*X7
01370  M01S00832.mst     +++|          BX2    -X4*X2
01371  M01S00833.mst     +++|          BX4    X4*X7
01372  M01S00834.mst     +++|          BX7    X1+X3       MERGE RANDOM ADDRESS IN MESSAGE
01373  M01S00835.mst     +++|          SA3    A2+B1
01374  M01S00836.mst     +++|          BX2    X4+X2
01375  M01S00837.mst     +++|          SA7    A1
01376  M01S00838.mst     +++|          MX4    -24
01377  M01S00839.mst     +++|          BX7    -X4*X6
01378  M01S00840.mst     +++|          AX6    24
01379  M01S00841.mst     +++|          BX2    X4*X2       CLEAR TRACK
01380  M01S00842.mst     +++|          BX6    -X4*X6
01381  M01S00843.mst     +++|          LX4    24
01382  M01S00844.mst     +++|          BX3    X4*X3       CLEAR SECTOR
01383  M01S00845.mst     +++|          BX6    X6+X2       MERGE TRACK IN MESSAGE
01384  M01S00846.mst     +++|          LX7    24
01385  M01S00847.mst     +++|          SA6    A2
01386  M01S00848.mst     +++|          BX7    X7+X3       MERGE SECTOR IN MESSAGE
01387  M01S00849.mst     +++|          SA7    A3
01388  M01S00850.mst     +++|          SB6    ERRD
01389  M01S00851.mst     +++|          RJ     CVA         CONVERT ADDRESS
01390  M01S00852.mst     +++|          MESSAGE  ERRB,,R
01391  M01S00853.mst     +++|          MESSAGE  ERRE,,R
01392  M01S00854.mst     +++|          EQ     ERRX        RETURN
01393  M01S00855.mst     +++|
01394  M01S00856.mst     +++| ERRA     BSS    5

Line S00857 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01395  M02S00857.ns22000 ---| ERRB     CON    10H EQXX ZZZZ
01396  M01S00036.ns22000 +++| ERRB     DATA   10HEQXXX,ZZZZ
01397  M01S00858.mst     +++| ERRC     CON    10H ERROR AT
01398  M01S00859.mst     +++| ERRD     CON    0,0
01399  M01S00860.mst     +++|          CON    0           END OF LINE FOR FIRST MESSAGE

Line S00861 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01400  M02S00861.ns22000 ---| ERRE     CON    10H EQXX R000
01401  M01S00037.ns22000 +++| ERRE     DATA   10HEQXXX,R000
01402  M01S00862.mst     +++| ERRF     CON    10H0000,T0000
01403  M01S00863.mst     +++| ERRG     CON    7L,S0000.
01404  M01S00864.mst     +++| ERRH     CON    0           RANDOM ADDRESS TEMPORARY

Line S00865 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01405  M02S00865.mst4    ---| GDB      SPACE  4
01406  M01S00234.mst4    +++| GDB      SPACE  4,15
01407  M01S00866.mst     +++|**        GDB - GENERATE DATA BUFFER.
01408  M01S00867.mst     +++|*
01409  M01S00868.mst     +++|*         ENTRY (X6) = RANDOM NUMBER WHICH WILL GENERATE BUFFER.
01410  M01S00869.mst     +++|*               (A6) = ADDRESS OF RANDOM NUMBER IN BUFFER.
01411  M01S00870.mst     +++|*
01412  M01S00871.mst     +++|*         EXIT  (X6) = CHECKSUM OF BUFFER.
01413  M01S00872.mst     +++|*               (X7) = LAST DATA WORD STORED IN BUFFER.
01414  M01S00873.mst     +++|*               (B2) = (B3) = NUMBER OF DATA WORDS GENERATED.
01415  M01S00874.mst     +++|*               (A6) = ADDRESS OF LAST WORD IN BUFFER.
01416  M01S00875.mst     +++|*
01417  M01S00876.mst     +++|*         USES   X - 2, 6, 7.

Line S00877 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01418  M02S00877.mst4    ---|*                B - 2, 3.

Line S00878 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst1`
`M03` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01419  M03S00878.mst4    ---|*                A - 6, 7.

Line S00050 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01420  M02S00050.mst4    ---|*                A - 2, 6, 7.

Line S00879 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01421  M02S00879.mst4    ---|*

Line S00880 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01422  M02S00880.mst4    ---|*         CALLS  NONE
01423  M01S00235.mst4    +++|*                A - 2, 6, 7.
01424  M01S00236.mst4    +++|*                B - 2, 3.
01425  M01S00881.mst     +++|
01426  M01S00882.mst     +++|
01427  M01S00883.mst     +++| GDB      SUBR               ENTRY/EXIT
01428  M01S00051.mst1    +++|          SA2    ND
01429  M01S00052.mst1    +++|          ZR     X2,GDBX     IF NO DATA GENERATION
01430  M01S00884.mst     +++|          SB3    75B
01431  M01S00885.mst     +++|          SB2    B0+
01432  M01S00886.mst     +++| GDBA     BX7    X6
01433  M01S00887.mst     +++|          SA7    A6
01434  M01S00888.mst     +++|
01435  M01S00889.mst     +++|*         THIS INSTRUCTION IS MODIFIED BY PRESET
01436  M01S00890.mst     +++|*         EQ     GDB2        IF NON-RANDOM PATTERN
01437  M01S00891.mst     +++|
01438  M01S00892.mst     +++|          SX6    B0+         IF RANDOM PATTERN - CLEAR CHECKSUM
01439  M01S00893.mst     +++|
01440  M01S00894.mst     +++| GDB1     PX2    X7
01441  M01S00895.mst     +++|          DX7    X2*X2
01442  M01S00896.mst     +++|          IX7    X7+X2
01443  M01S00897.mst     +++|          SB2    B2+B1
01444  M01S00898.mst     +++|          LX2    15
01445  M01S00899.mst     +++|          IX7    X7+X2
01446  M01S00900.mst     +++|          LX2    19
01447  M01S00901.mst     +++|          IX7    X2+X7
01448  M01S00902.mst     +++|          SA7    A7+B1
01449  M01S00903.mst     +++|          IX6    X6+X7       ADVANCE CHECKSUM
01450  M01S00904.mst     +++|          NE     B2,B3,GDB1  IF MORE DATA TO GENERATE
01451  M01S00905.mst     +++|          SA6    A7+B1       CHECKSUM IN LAST LOCATION OF BUFFER
01452  M01S00906.mst     +++|          EQ     GDBX
01453  M01S00907.mst     +++|
01454  M01S00908.mst     +++| GDB2     SB2    B2+B1
01455  M01S00909.mst     +++|          SA7    A7+B1
01456  M01S00910.mst     +++|          NE     B2,B3,GDB2  IF BUFFER NOT FULL
01457  M01S00911.mst     +++|          SA6    A7+B1
01458  M01S00912.mst     +++|          EQ     GDBX

Line S00913 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01459  M02S00913.mst4    ---| MEM      SPACE  4
01460  M01S00237.mst4    +++| MEM      SPACE  4,15
01461  M01S00914.mst     +++|**        MEM - REQUEST MEMORY.
01462  M01S00915.mst     +++|*
01463  M01S00916.mst     +++|*         ENTRY  (X1) = REQUESTED MEMORY.
01464  M01S00917.mst     +++|*
01465  M01S00918.mst     +++|*         EXIT   (IN) = (OUT) = (FIRST).
01466  M01S00919.mst     +++|*                (LIMIT) = REQUESTED FIELD LENGTH.
01467  M01S00238.mst4    +++|*
01468  M01S00239.mst4    +++|*         USES   X - 2, 6, 7.
01469  M01S00240.mst4    +++|*                A - 2, 6, 7.
01470  M01S00241.mst4    +++|*                B - NONE.
01471  M01S00242.mst4    +++|*
01472  M01S00243.mst4    +++|*         MACROS MEMORY.
01473  M01S00920.mst     +++|
01474  M01S00921.mst     +++|
01475  M01S00922.mst     +++| MEM      SUBR               ENTRY/EXIT
01476  M01S00923.mst     +++|          SA2    D+1
01477  M01S00924.mst     +++|          SX7    X1-10B
01478  M01S00925.mst     +++|          SX6    X2
01479  M01S00926.mst     +++|          SA7    D+4         LIMIT
01480  M01S00927.mst     +++|          SA6    A7-B1       OUT
01481  M01S00928.mst     +++|          SA6    A6-B1       IN
01482  M01S00929.mst     +++|          MEMORY ,,R,X1      REQUEST MEMORY
01483  M01S00930.mst     +++|          EQ     MEMX        RETURN

Line S00931 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01484  M02S00931.mst4    ---| MES      SPACE  4
01485  M01S00244.mst4    +++| MES      SPACE  4,15
01486  M01S00932.mst     +++|**        MES - SEND MESSAGE.
01487  M01S00933.mst     +++|*
01488  M01S00934.mst     +++|*         ENTRY  (X1) = MESSAGE ADDRESS.
01489  M01S00935.mst     +++|*
01490  M01S00936.mst     +++|*         EXIT   MESSAGE SENT TO CONTROL POINT AND JOB DAYFILE.
01491  M01S00245.mst4    +++|*
01492  M01S00246.mst4    +++|*         USES   X - 0.
01493  M01S00247.mst4    +++|*                A - NONE.
01494  M01S00248.mst4    +++|*                B - NONE.
01495  M01S00249.mst4    +++|*
01496  M01S00250.mst4    +++|*         MACROS MESSAGE.
01497  M01S00937.mst     +++|
01498  M01S00938.mst     +++|
01499  M01S00939.mst     +++| MES      SUBR               ENTRY/EXIT
01500  M01S00940.mst     +++|          SX0    X1+
01501  M01S00941.mst     +++|          MESSAGE X1,1,R
01502  M01S00942.mst     +++|          MESSAGE X0,3,R
01503  M01S00943.mst     +++|          EQ     MESX        RETURN
01504  M01S00944.mst     +++| RNO      SPACE  4
01505  M01S00945.mst     +++|**        RNO - GENERATE RANDOM SECTOR NUMBER.
01506  M01S00946.mst     +++|*
01507  M01S00947.mst     +++|*         ENTRY  NONE.
01508  M01S00948.mst     +++|*
01509  M01S00949.mst     +++|*         EXIT   (X6) = RANDOM SECTOR NUMBER IN FILE.
01510  M01S00950.mst     +++|*
01511  M01S00951.mst     +++|*         USES   X - 1, 3, 5, 6.
01512  M01S00251.mst4    +++|*                A - 1, 3, 5, 6.
01513  M01S00952.mst     +++|*                B - NONE.

Line S00953 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01514  M02S00953.mst4    ---|*                A - 1, 3, 5, 6.
01515  M01S00954.mst     +++|
01516  M01S00955.mst     +++|
01517  M01S00956.mst     +++| RNO      SUBR               ENTRY/EXIT
01518  M01S00957.mst     +++| RNO1     SA1    RNOA        LAST NUMBER
01519  M01S00958.mst     +++|          SA3    SM          SECTOR MASK
01520  M01S00959.mst     +++|          SA5    NS          NUMBER OF SECTORS
01521  M01S00960.mst     +++|          PX1    X1
01522  M01S00961.mst     +++|          DX6    X1*X1
01523  M01S00962.mst     +++|          IX6    X1+X6
01524  M01S00963.mst     +++|          LX1    15
01525  M01S00964.mst     +++|          IX6    X1+X6
01526  M01S00965.mst     +++|          LX1    19
01527  M01S00966.mst     +++|          IX6    X1+X6
01528  M01S00967.mst     +++|          SA6    A1          SAVE NEW NUMBER
01529  M01S00252.mst4    +++|          SA1    TL
01530  M01S00253.mst4    +++|          IX5    X5-X1
01531  M01S00968.mst     +++|          BX6    -X3*X6
01532  M01S00254.mst4    +++|          SA1    RO          CHECK ROLLOUT SIMULATION REQUEST
01533  M01S00255.mst4    +++|          ZR     X1,RNO2     IF NO ROLLOUT SIMULATION
01534  M01S00256.mst4    +++|          IX6    X1+X6       ROUND SECTOR ADDRESS UP TO MULTIPLE OF 32
01535  M01S00257.mst4    +++|          AX6    5
01536  M01S00258.mst4    +++|          LX6    5
01537  M01S00259.mst4    +++| RNO2     BSS    0
01538  M01S00969.mst     +++|          IX3    X5-X6
01539  M01S00970.mst     +++|          ZR     X6,RNO1     IF SECTOR NUMBER = 0
01540  M01S00971.mst     +++|          NG     X3,RNO1     IF SECTOR NOT IN FILE
01541  M01S00972.mst     +++|          EQ     RNOX        RETURN
01542  M01S00973.mst     +++|
01543  M01S00974.mst     +++| RNOA     DATA   13576420735162531625B
01544  M01S00053.mst1    +++| WIC      SPACE  4,10
01545  M01S00054.mst1    +++|**        WIC - WAIT I/O COMPLETE.
01546  M01S00055.mst1    +++|*

Line S00056 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`241l630`

Seq #  *Modification Id* Act 
----------------------------+
01547  M02S00056.241l630 ---|*         ENTRY  BD = 2 IF DEVICE IS BUFFERED IN ESM/LCM.
01548  M01S00002.241l630 +++|*         ENTRY  (BD) = 2 IF DEVICE IS BUFFERED.
01549  M01S00057.mst1    +++|*

Line S00058 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01550  M02S00058.mst4    ---|*         USES   A - 1.

Line S00059 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01551  M02S00059.mst4    ---|*                B - NONE.

Line S00060 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01552  M02S00060.mst4    ---|*                X - 1, 2, 3.

Line S00061 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01553  M02S00061.mst4    ---|*

Line S00062 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01554  M02S00062.mst4    ---|*         CALLS  SYS=.
01555  M01S00260.mst4    +++|*         USES   X - 1, 2, 3.
01556  M01S00261.mst4    +++|*                A - 1.
01557  M01S00262.mst4    +++|*                B - NONE.
01558  M01S00263.mst4    +++|*
01559  M01S00264.mst4    +++|*         MACROS MESSAGE, RECALL, RTIME.
01560  M01S00063.mst1    +++|
01561  M01S00064.mst1    +++|
01562  M01S00065.mst1    +++| WIC      SUBR
01563  M01S00066.mst1    +++|          SA1    BD
01564  M01S00067.mst1    +++|          LX1    59-1
01565  M01S00068.mst1    +++|          PL     X1,WICX     IF DEVICE NOT BUFFERED
01566  M01S00069.mst1    +++|          MESSAGE  (=C* WAIT I/O COMPLETE.*),1,R
01567  M01S00070.mst1    +++|          RTIME  WICA        FETCH TIME
01568  M01S00071.mst1    +++|          SA1    WICA
01569  M01S00072.mst1    +++|          MX3    -36
01570  M01S00073.mst1    +++|          BX2    -X3*X1      SAVE START TIME
01571  M01S00074.mst1    +++| WIC1     RECALL             DELAY
01572  M01S00075.mst1    +++|          RTIME  WICA        CHECK TIME
01573  M01S00076.mst1    +++|          SA1    WICA
01574  M01S00077.mst1    +++|          BX1    -X3*X1
01575  M01S00078.mst1    +++|          IX1    X1-X2       TIME SINCE FIRST CALL
01576  M01S00079.mst1    +++|          SX1    X1-3000
01577  M01S00080.mst1    +++|          NG     X1,WIC1     IF 3 SECONDS NOT ELAPSED
01578  M01S00081.mst1    +++|          EQ     WICX        RETURN
01579  M01S00082.mst1    +++|
01580  M01S00083.mst1    +++| WICA     BSS    1
01581  M01S00975.mst     +++|          SPACE  4

Line S00976 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01582  M02S00976.ns22000 ---|*         COMMON DECKS.
01583  M01S00038.ns22000 +++|**        COMMON DECKS.
01584  M01S00977.mst     +++|
01585  M01S00978.mst     +++|
01586  M01S00979.mst     +++| ERP1$    EQU    1           ENABLE I/O ERROR PROCESSING
01587  M01S00265.mst4    +++|*CALL     COMCCDD
01588  M01S00980.mst     +++|*CALL     COMCCOD
01589  M01S00981.mst     +++|*CALL     COMCCIO
01590  M01S00982.mst     +++|*CALL     COMCCFD
01591  M01S00983.mst     +++|*CALL     COMCLFM
01592  M01S00984.mst     +++|*CALL     COMCRDW
01593  M01S00985.mst     +++|*CALL     COMCSYS
01594  M01S00986.mst     +++|*CALL     COMCWOD
01595  M01S00987.mst     +++|*CALL     COMCWTW
01596  M01S00988.mst     +++| BUFFERS  SPACE  4
01597  M01S00989.mst     +++|          TITLE  BUFFERS.
01598  M01S00990.mst     +++|          USE    //
01599  M01S00991.mst     +++|          SEG
01600  M01S00992.mst     +++| BUFS     BSS    0
01601  M01S00993.mst     +++|
01602  M01S00994.mst     +++| TRRD     EQU    BUFS+1      TABLE OF SECTORS FOR RANDOM READ WITH LIST
01603  M01S00995.mst     +++| TBUF     EQU    TRRD+41     TEST BUFFER FOR PATTERN REGENERATION
01604  M01S00996.mst     +++| SBUF     EQU    TBUF+100B
01605  M01S00997.mst     +++| DBUF     EQU    SBUF+100B
01606  M01S00998.mst     +++| MFL=     EQU    DBUF+DBUFL+10B+200000B
01607  M01S00999.mst     +++|
01608  M01S01000.mst     +++|
01609  M01S01001.mst     +++|          TITLE  PRESET.
01610  M01S01002.mst     +++|          ORG    BUFS
01611  M01S01003.mst     +++|
01612  M01S01004.mst     +++|
01613  M01S01005.mst     +++|**        THE FOLLOWING CODE IS OVERLAYED BY BUFFERS.
01614  M01S01006.mst     +++|
01615  M01S01007.mst     +++|
01616  M01S01008.mst     +++|*         COMMON DECKS
01617  M01S01009.mst     +++|
01618  M01S01010.mst     +++|*CALL     COMCARG
01619  M01S01011.mst     +++|*CALL     COMCCPM
01620  M01S01012.mst     +++|*CALL     COMCDXB
01621  M01S01013.mst     +++|*CALL     COMCMVE
01622  M01S01014.mst     +++| PRS      SPACE  4
01623  M01S01015.mst     +++|**        PRS - PRESET PROGRAM.
01624  M01S01016.mst     +++|*
01625  M01S01017.mst     +++|*         ENTRY  (B7) = 1 IF ADDRESS CONVERSION PRESET.
01626  M01S01018.mst     +++|
01627  M01S01019.mst     +++|
01628  M01S01020.mst     +++| PRS      SUBR               ENTRY/EXIT
01629  M01S00007.252l678 +++|          SYSTEM RSB,R,PRSF  SET EXTENDED MEMORY TRACK SHIFT
01630  M01S00008.252l678 +++|          SA1    EMTS
01631  M01S00009.252l678 +++|          MX0    -2
01632  M01S00010.252l678 +++|          LX1    0-29
01633  M01S00011.252l678 +++|          BX6    -X0*X1
01634  M01S00012.252l678 +++|          SA6    A1
01635  M01S01021.mst     +++|          EQ     B7,B1,PRS5  IF ADDRESS CONVERSION PRESET

Line S01022 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst1`

Seq #  *Modification Id* Act 
----------------------------+
01636  M02S01022.mst1    ---|          SETPR  2
01637  M01S01023.mst     +++|          MODE   1
01638  M01S00020.mst9    +++|          GETJN  JN          GET JSN
01639  M01S00021.mst9    +++|          MACHID PRSH        GET MAINFRAME ID
01640  M01S00022.mst9    +++|          SA1    PRSH        MERGE JSN AND MFID
01641  M01S00023.mst9    +++|          SA2    JN
01642  M01S00024.mst9    +++|          LX1    24
01643  M01S00025.mst9    +++|          BX6    X1+X2
01644  M01S00026.mst9    +++|          SA6    A2+
01645  M01S01024.mst     +++|          REQUEST D
01646  M01S01025.mst     +++|          STATUS X2,P
01647  M01S01026.mst     +++|          SA1    D+6
01648  M01S00008.mst6    +++|          BX6    X1
01649  M01S00009.mst6    +++|          AX6    48
01650  M01S00010.mst6    +++|          SA6    PRSG        SAVE EST ORDINAL

Line S01027 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01651  M02S01027.ns22000 ---|          RJ     WOD         CONVERT EQUIPMENT NUMBER
01652  M01S00039.ns22000 +++|          RJ     WOD         CONVERT EST ORDINAL
01653  M01S01028.mst     +++|          SA1    D+1
01654  M01S00040.ns22000 +++|          AX6    6           POSITION EST ORDINAL
01655  M01S01029.mst     +++|          MX0    12
01656  M01S01030.mst     +++|          BX1    X0*X1
01657  M01S00041.ns22000 +++|          MX0    18
01658  M01S01031.mst     +++|          LX0    -12
01659  M01S01032.mst     +++|          BX6    X0*X6

Line S01033 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01660  M02S01033.ns22000 ---|          SX2    1R

Line S01034 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01661  M02S01034.ns22000 ---|          BX6    X6+X1       MERGE EQUIPMENT NUMBER AND TYPE
01662  M01S00042.ns22000 +++|          BX6    X6+X1       MERGE EST ORDINAL AND TYPE

Line S01035 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01663  M02S01035.ns22000 ---|          BX6    X6+X2

Line S01036 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01664  M02S01036.ns22000 ---|          LX2    30

Line S01037 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01665  M02S01037.ns22000 ---|          BX6    X6+X2

Line S01038 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01666  M02S01038.ns22000 ---|          LX6    -6

Line S01039 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
01667  M02S01039.ns22000 ---|          MX0    -24
01668  M01S00043.ns22000 +++|          MX0    -30
01669  M01S01040.mst     +++|          SA1    DCHC        SET EQUIPMENT IN MESSAGES
01670  M01S01041.mst     +++|          BX1    -X0*X1
01671  M01S01042.mst     +++|          BX7    X6+X1
01672  M01S01043.mst     +++|          SA7    DCHC
01673  M01S01044.mst     +++|          SA1    ERRE
01674  M01S01045.mst     +++|          BX1    -X0*X1
01675  M01S01046.mst     +++|          BX7    X6+X1
01676  M01S01047.mst     +++|          SA7    ERRE
01677  M01S01048.mst     +++|          SA1    CKSA-1
01678  M01S01049.mst     +++|          SB2    B0+
01679  M01S01050.mst     +++|          SB3    4
01680  M01S01051.mst     +++| PRS1     SA1    A1+B1
01681  M01S01052.mst     +++|          BX1    -X0*X1
01682  M01S01053.mst     +++|          SB2    B2+1
01683  M01S01054.mst     +++|          BX7    X6+X1
01684  M01S01055.mst     +++|          SA7    A1
01685  M01S01056.mst     +++|          LT     B2,B3,PRS1  IF MORE MESSAGES
01686  M01S01057.mst     +++|          MX6    0
01687  M01S01058.mst     +++|          SA6    D+5
01688  M01S01059.mst     +++|          SA6    A6+B1
01689  M01S01060.mst     +++|
01690  M01S01061.mst     +++|*         IDENTIFY ASSIGNED EQUIPMENT.
01691  M01S01062.mst     +++|
01692  M01S01063.mst     +++|          SA2    TEQP

Line S01064 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst3`

Seq #  *Modification Id* Act 
----------------------------+
01693  M02S01064.mst3    ---|          SA1    D+1
01694  M01S00005.mst3    +++|          SA1    D+B1
01695  M01S00006.mst3    +++|          MX0    -24
01696  M01S01065.mst     +++|          MX5    1           SET EP BIT IN FET
01697  M01S01066.mst     +++|          MX4    12
01698  M01S01067.mst     +++|          LX5    44-59
01699  M01S01068.mst     +++|          SX7    B1
01700  M01S01069.mst     +++| PRS2     ZR     X2,PRS8     IF END OF TABLE
01701  M01S01070.mst     +++|          BX3    X2-X1
01702  M01S01071.mst     +++|          BX6    X4*X3
01703  M01S01072.mst     +++|          LX3    X2
01704  M01S01073.mst     +++|          SA2    A2+B1
01705  M01S01074.mst     +++|          NZ     X6,PRS2     IF NO EQUIPMENT MATCH
01706  M01S01075.mst     +++|          BX6    X1+X5
01707  M01S01076.mst     +++|          SA6    A1          SET EPR BIT IN FET
01708  M01S01077.mst     +++|          BX6    -X0*X3
01709  M01S01078.mst     +++|          IX6    X6-X7
01710  M01S01079.mst     +++|          SA6    NS
01711  M01S01080.mst     +++|          MX7    12          SET SECTOR MASK
01712  M01S01081.mst     +++|          NX6    X6,B2
01713  M01S01082.mst     +++|          AX7    X7,B2

Line S01083 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst1`

Seq #  *Modification Id* Act 
----------------------------+
01714  M02S01083.mst1    ---|          AX3    30
01715  M01S00084.mst1    +++|          AX3    24
01716  M01S01084.mst     +++|          SA7    A6+B1
01717  M01S00085.mst1    +++|          MX0    -6
01718  M01S00086.mst1    +++|          BX6    -X0*X3
01719  M01S00087.mst1    +++|          SA6    BD          SET BUFFERED DEVICE FLAG
01720  M01S00088.mst1    +++|          AX3    6
01721  M01S01085.mst     +++|          SX2    X3
01722  M01S01086.mst     +++|          ZR     X2,PRS8     IF ILLEGAL EQUIPMENT
01723  M01S01087.mst     +++|          MOVE   CVAE-CVA,X2,CVA
01724  M01S01088.mst     +++|
01725  M01S01089.mst     +++|*         RETRIEVE ARGUMENTS.
01726  M01S01090.mst     +++|
01727  M01S01091.mst     +++|          SA1    ACTR        ARGUMENT COUNT
01728  M01S01092.mst     +++|          SB7    B0
01729  M01S01093.mst     +++|          SB4    X1
01730  M01S01094.mst     +++|          SA4    ARGR        FIRST ARGUMENT
01731  M01S01095.mst     +++|          SB5    TARG        ARGUMENT TABLE
01732  M01S01096.mst     +++|          RJ     ARG         PROCESS ARGUMENTS
01733  M01S01097.mst     +++|          NZ     X1,PRS7     IF ARGUMENT ERROR
01734  M01S00011.mst6    +++|
01735  M01S00012.mst6    +++|*         PROCESS *N* PARAMETER (NUMBER OF SECTORS).
01736  M01S00013.mst6    +++|
01737  M01S01098.mst     +++|          SA5    NS          NUMBER OF SECTORS
01738  M01S01099.mst     +++|          MX2    14B
01739  M01S01100.mst     +++|          BX3    X2*X5
01740  M01S01101.mst     +++|          ZR     X3,PRS3     IF ARGUMENT OMITTED

Line S01102 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst6`

Seq #  *Modification Id* Act 
----------------------------+
01741  M02S01102.mst6    ---|          RJ     DXB         CONVERT ARGUMENT TO OCTAL
01742  M01S00014.mst6    +++|          SA3    =0L*
01743  M01S00015.mst6    +++|          BX3    X3-X5
01744  M01S00016.mst6    +++|          AX3    18
01745  M01S00017.mst6    +++|          NZ     X3,PRS2.1   IF NOT /*/
01746  M01S00018.mst6    +++|          RJ     CNS         CALCULATE NUMBER OF SECTORS
01747  M01S00019.mst6    +++|          EQ     PRS2.2      SET NUMBER OF SECTORS
01748  M01S00020.mst6    +++|
01749  M01S00021.mst6    +++| PRS2.1   RJ     DXB         CONVERT ARGUMENT
01750  M01S01103.mst     +++|          SX1    B1
01751  M01S01104.mst     +++|          IX6    X6-X1
01752  M01S01105.mst     +++|          ZR     X6,PRS7     IF ARGUMENT ERROR

Line S01106 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst6`

Seq #  *Modification Id* Act 
----------------------------+
01753  M02S01106.mst6    ---|          SA6    NS
01754  M01S00022.mst6    +++| PRS2.2   SA6    NS
01755  M01S01107.mst     +++|          MX7    12          SET SECTOR MASK
01756  M01S01108.mst     +++|          NX6    X6,B2
01757  M01S01109.mst     +++|          AX7    X7,B2
01758  M01S01110.mst     +++|          SA7    SM

Line S01111 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst6`

Seq #  *Modification Id* Act 
----------------------------+
01759  M02S01111.mst6    ---|

Line S00266 Modification History
`M01` (Added by)	`mst4`
`M02` (Updated by)	`mst6`

Seq #  *Modification Id* Act 
----------------------------+
01760  M02S00266.mst6    ---|          SA1    NS          SET SECTOR SIZE
01761  M01S00023.mst6    +++| PRS3     SA1    NS          SET SECTOR SIZE
01762  M01S00267.mst4    +++|          RJ     CDD         CONVERT TO DISPLAY
01763  M01S00268.mst4    +++|          SA6    PRSE+2
01764  M01S00269.mst4    +++|          SX1    PRSE
01765  M01S00270.mst4    +++|          RJ     MES         SEND FILE SIZE MESSAGE

Line S00271 Modification History
`M01` (Added by)	`mst4`
`M02` (Updated by)	`mst6`

Seq #  *Modification Id* Act 
----------------------------+
01766  M02S00271.mst6    ---| PRS3     SA5    IO          SET NUMBER OF I/O-S
01767  M01S00024.mst6    +++|
01768  M01S00025.mst6    +++|*         PROCESS *IO* PARAMETER (NUMBER OF I/O-S).
01769  M01S00026.mst6    +++|
01770  M01S00027.mst6    +++|          SA5    IO          SET NUMBER OF I/O-S
01771  M01S00272.mst4    +++|          ZR     X5,PRS3.1   IF NUMBER OF I/O-S NOT SPECIFIED
01772  M01S00273.mst4    +++|          RJ     DXB
01773  M01S00274.mst4    +++|          NZ     X4,PRS7     IF ERROR IN CONVERSION
01774  M01S00275.mst4    +++|          EQ     PRS3.2      SAVE NUMBER OF I/O-S
01775  M01S00276.mst4    +++|
01776  M01S00277.mst4    +++| PRS3.1   SA5    NS          BASE NUMBER OF I/O-S ON NUMBER OF SECTORS
01777  M01S00278.mst4    +++|          AX5    7
01778  M01S00279.mst4    +++|          BX6    X5
01779  M01S00280.mst4    +++| PRS3.2   SA6    IO
01780  M01S00028.mst6    +++|
01781  M01S00029.mst6    +++|*         PROCESS *TL* PARAMETER (TRANSFER LENGTH).
01782  M01S00030.mst6    +++|
01783  M01S00281.mst4    +++|          SA5    TL          SET TRANSFER LENGTH

Line S00282 Modification History
`M01` (Added by)	`mst4`
`M02` (Updated by)	`mst8`

Seq #  *Modification Id* Act 
----------------------------+
01784  M02S00282.mst8    ---|          ZR     X5,PRS3.3   IF PARAMETER OMITTED
01785  M01S00283.mst4    +++|          RJ     DXB
01786  M01S00284.mst4    +++|          NZ     X4,PRS7     IF ERROR IN CONVERSION

Line S00285 Modification History
`M01` (Added by)	`mst4`
`M02` (Updated by)	`mst8`

Seq #  *Modification Id* Act 
----------------------------+
01787  M02S00285.mst8    ---|          ZR     X6,PRS7     IF INVALID SECTOR SIZE
01788  M01S00006.mst8    +++|          ZR     X6,PRS7     IF INVALID TRANSFER LENGTH
01789  M01S00286.mst4    +++|          SA6    A5
01790  M01S00287.mst4    +++|          SA5    NS
01791  M01S00288.mst4    +++|          IX6    X5-X6
01792  M01S00289.mst4    +++|          NG     X6,PRS7     IF TRANSFER SIZE GREATER THAN FILE SIZE
01793  M01S00290.mst4    +++|

Line S01112 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst6`

Seq #  *Modification Id* Act 
----------------------------+
01794  M02S01112.mst6    ---|*         PATTERN SELECTION.
01795  M01S00031.mst6    +++|*         PROCESS *P* PARAMETER (SELECT TEST PATTERN).
01796  M01S01113.mst     +++|

Line S01114 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst4`

Seq #  *Modification Id* Act 
----------------------------+
01797  M02S01114.mst4    ---| PRS3     SA5    TP
01798  M01S00291.mst4    +++| PRS3.3   SA5    TP
01799  M01S01115.mst     +++|          RJ     DXB
01800  M01S01116.mst     +++|          NZ     X4,PRS7     IF ARGUMENT ERROR
01801  M01S01117.mst     +++|          SB5    X6-TPATL+1

Line S00089 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`273l780`

Seq #  *Modification Id* Act 
----------------------------+
01802  M02S00089.273l780 ---|          SX7    B5+B1

Line S00090 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`273l780`

Seq #  *Modification Id* Act 
----------------------------+
01803  M02S00090.273l780 ---|          SA7    ND          SET NO DATA FLAG
01804  M01S00171.273l780 +++|          BX5    X6
01805  M01S01118.mst     +++|          GT     B5,B0,PRS7  IF ARGUMENT ERROR
01806  M01S01119.mst     +++|          SA1    X6+TPAT
01807  M01S01120.mst     +++|          SA2    PRSA
01808  M01S01121.mst     +++|          BX6    X1
01809  M01S01122.mst     +++|          LX7    X2

Line S01123 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`273l780`

Seq #  *Modification Id* Act 
----------------------------+
01810  M02S01123.273l780 ---|          ZR     B5,PRS4     IF RANDOM PATTERN
01811  M01S00172.273l780 +++|          SB5    X5-5
01812  M01S00173.273l780 +++|          ZR     B5,PRS4     IF P=5 (RANDOM PATTERN)
01813  M01S01124.mst     +++|          SA7    GDBA        SETS AN INSTRUCTION IN GDB
01814  M01S01125.mst     +++| PRS4     SA6    TP

Line S01126 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`273l780`

Seq #  *Modification Id* Act 
----------------------------+
01815  M02S01126.273l780 ---|          SA1    NS          SET INCREMENT FOR POSITION TEST
01816  M01S00174.273l780 +++|          SX7    X5-4
01817  M01S00175.273l780 +++|          SA7    ND          SET NO DATA FLAG
01818  M01S00176.273l780 +++|          ZR     X7,PRS4.1   IF P=4
01819  M01S00177.273l780 +++|          SX7    X5-6
01820  M01S00178.273l780 +++|          NZ     X7,PRS4.1   IF NOT P=6
01821  M01S00179.273l780 +++|          SA7    ND          SET NO DATA FLAG
01822  M01S00180.273l780 +++|          SA7    NT          SET NO DATA TRANSFER FLAG
01823  M01S00181.273l780 +++| PRS4.1   SA1    NS          SET INCREMENT FOR POSITION TEST
01824  M01S01127.mst     +++|          SX2    B1+
01825  M01S01128.mst     +++|          AX1    6
01826  M01S01129.mst     +++|          IX7    X1+X2
01827  M01S01130.mst     +++|          SA7    POSA
01828  M01S01131.mst     +++|

Line S01132 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst6`

Seq #  *Modification Id* Act 
----------------------------+
01829  M02S01132.mst6    ---|*         TEST SELECTION
01830  M01S00032.mst6    +++|*         PROCESS *T* PARAMETER (SELECT TEST SECTION).
01831  M01S01133.mst     +++|
01832  M01S01134.mst     +++|          SA5    TS
01833  M01S01135.mst     +++|          RJ     DXB
01834  M01S01136.mst     +++|          NZ     X4,PRS7     IF ARGUMENT ERROR
01835  M01S01137.mst     +++|          SX3    X6-6
01836  M01S01138.mst     +++|          PL     X3,PRS7     IF ARGUMENT ERROR
01837  M01S01139.mst     +++|          SA6    TS
01838  M01S01140.mst     +++|          EQ     PRSX        RETURN
01839  M01S01141.mst     +++|
01840  M01S01142.mst     +++|*         PRESET FOR ADDRESS CONVERSION.
01841  M01S01143.mst     +++|
01842  M01S01144.mst     +++| PRS5     SA1    ACTR
01843  M01S01145.mst     +++|          SA4    ARGR
01844  M01S01146.mst     +++|          SB5    TART
01845  M01S01147.mst     +++|          SB4    X1+
01846  M01S01148.mst     +++|          RJ     ARG         PROCESS ARGUMENTS
01847  M01S01149.mst     +++|          NZ     X1,PRS7     IF ARGUMENT ERROR
01848  M01S01150.mst     +++|          SA1    PRSB
01849  M01S01151.mst     +++|          SA5    PRSC        ADDRESS
01850  M01S01152.mst     +++|          SA2    TEQP-1
01851  M01S01153.mst     +++| PRS6     SA2    A2+B1
01852  M01S01154.mst     +++|          ZR     X2,PRS8     IF EQUIPMENT NOT FOUND
01853  M01S01155.mst     +++|          BX3    X2-X1
01854  M01S01156.mst     +++|          AX3    48
01855  M01S01157.mst     +++|          NZ     X3,PRS6     IF NO MATCH
01856  M01S01158.mst     +++|          BX6    X2
01857  M01S01159.mst     +++|          LX2    30
01858  M01S01160.mst     +++|          SA6    A1
01859  M01S01161.mst     +++|          SB6    X2
01860  M01S01162.mst     +++|          SB7    B0
01861  M01S01163.mst     +++|          RJ     DXB
01862  M01S01164.mst     +++|          NZ     X4,PRS7     IF ARGUMENT ERROR
01863  M01S01165.mst     +++|          SA6    PRSC
01864  M01S01166.mst     +++|          SA5    PRSD
01865  M01S01167.mst     +++|          RJ     DXB         CONVERT SECTOR
01866  M01S01168.mst     +++|          NZ     X4,PRS7     IF ARGUMENT ERROR
01867  M01S01169.mst     +++|          MX0    -12
01868  M01S01170.mst     +++|          BX5    X0*X6
01869  M01S01171.mst     +++|          SA1    PRSC
01870  M01S01172.mst     +++|          NZ     X5,PRS7     IF TRACK ERROR
01871  M01S01173.mst     +++|          BX5    X0*X1
01872  M01S01174.mst     +++|          LX1    12
01873  M01S01175.mst     +++|          NZ     X5,PRS7     IF SECTOR ERROR
01874  M01S01176.mst     +++|          BX6    X6+X1
01875  M01S01177.mst     +++|          LX6    12
01876  M01S01178.mst     +++|          SA6    D+6
01877  M01S01179.mst     +++|          SB4    CVA
01878  M01S01180.mst     +++|          EQ     B4,B5,PRSX  IF TRACK AND SECTOR ADDRESS
01879  M01S01181.mst     +++|          MOVE   CVAE-CVA,B6,B4
01880  M01S01182.mst     +++|          EQ     PRSX        RETURN
01881  M01S01183.mst     +++|
01882  M01S01184.mst     +++| PRS7     MESSAGE  (=C* ARGUMENT ERROR.*)
01883  M01S01185.mst     +++|          EQ     ABT3        ABORT
01884  M01S01186.mst     +++|
01885  M01S01187.mst     +++| PRS8     MESSAGE  (=C* ILLEGAL EQUIPMENT.*)
01886  M01S01188.mst     +++|          EQ     ABT3        ABORT
01887  M01S01189.mst     +++|
01888  M01S01190.mst     +++| PRSA     BX7    X6
01889  M01S01191.mst     +++|          SA7    A6
01890  M01S01192.mst     +++|          EQ     GDB2
01891  M01S01193.mst     +++|
01892  M01S01194.mst     +++| PRSB     CON    0           DEVICE TYPE - NO DEFAULT
01893  M01S01195.mst     +++| PRSC     DATA   0L0         TRACK
01894  M01S01196.mst     +++| PRSD     CON    0           SECTOR
01895  M01S00292.mst4    +++| PRSE     DATA   C*        FILE SIZE = XXXXXXXXXX SECTORS.*
01896  M01S00013.252l678 +++| PRSF     VFD    24/1,18/MEFL,18/EMTS
01897  M01S00033.mst6    +++| PRSG     DATA   0           EST ORDINAL
01898  M01S00027.mst9    +++| PRSH     CON    0           MAINFRAME ID
01899  M01S00034.mst6    +++|          TITLE  PRESET SUBROUTINES.
01900  M01S00035.mst6    +++| CNS      SPACE  4,20
01901  M01S00036.mst6    +++|**        CNS - CALCULATE NUMBER OF SECTORS.
01902  M01S00037.mst6    +++|*
01903  M01S00038.mst6    +++|*         READS THE MST FOR THE SPECIFIED DEVICE AND COMPUTES
01904  M01S00039.mst6    +++|*         NS = (AVAILABLE TRACKS)*(SECTOR LIMIT) - 5.  THIS SIZE
01905  M01S00040.mst6    +++|*         ALLOWS FOR BOI, EOR, EOF, EOI, AND AN EXTRA SECTOR.
01906  M01S00041.mst6    +++|*         FOR *LDAM* DEVICES, DO NOT TEST THE LAST *RWPC* SECTORS,
01907  M01S00042.mst6    +++|*         TO AVOID A TRACK LIMIT CAUSED BY LOGIC IN *1MS*.
01908  M01S00043.mst6    +++|*
01909  M01S00044.mst6    +++|*         ENTRY  (PRSG) = EST ORDINAL.
01910  M01S00045.mst6    +++|*
01911  M01S00046.mst6    +++|*         EXIT   (X6) = NUMBER OF SECTORS.
01912  M01S00047.mst6    +++|*
01913  M01S00048.mst6    +++|*         USES   X -  1, 2, 3, 4, 6.
01914  M01S00049.mst6    +++|*                A -  1, 2.
01915  M01S00050.mst6    +++|*
01916  M01S00051.mst6    +++|*         CALLS  RSB=.
01917  M01S00052.mst6    +++|
01918  M01S00053.mst6    +++|
01919  M01S00054.mst6    +++| CNS      SUBR
01920  M01S00055.mst6    +++|          SX1    CNSA        READ EST POINTER
01921  M01S00056.mst6    +++|          SX2    ESTP
01922  M01S00057.mst6    +++|          SX3    B1
01923  M01S00058.mst6    +++|          SX4    B0
01924  M01S00059.mst6    +++|          RJ     RSB=        READ POINTER
01925  M01S00060.mst6    +++|
01926  M01S00061.mst6    +++|*         READ EST ENTRY FOR DEVICE.
01927  M01S00062.mst6    +++|
01928  M01S00063.mst6    +++|          SA1    PRSG
01929  M01S00064.mst6    +++|          SA2    CNSA
01930  M01S00065.mst6    +++|          SX3    ESTE
01931  M01S00066.mst6    +++|          AX2    36
01932  M01S00067.mst6    +++|          MX4    -24
01933  M01S00068.mst6    +++|          IX1    X1*X3
01934  M01S00069.mst6    +++|          BX2    -X4*X2      FWA EST
01935  M01S00070.mst6    +++|          SX3    EQDE
01936  M01S00071.mst6    +++|          IX2    X1+X2       EST ADDRESS FOR SPECIFIED DEVICE
01937  M01S00072.mst6    +++|          IX2    X2+X3
01938  M01S00073.mst6    +++|          SX1    CNSB        READ *EQDE* WORD OF EST ENTRY
01939  M01S00074.mst6    +++|          SX3    B1
01940  M01S00075.mst6    +++|          SX4    B0
01941  M01S00076.mst6    +++|          RJ     RSB=        READ EST
01942  M01S00077.mst6    +++|
01943  M01S00078.mst6    +++|*         READ MST FOR SPECIFIED DEVICE.
01944  M01S00079.mst6    +++|
01945  M01S00080.mst6    +++|          SA1    CNSB
01946  M01S00081.mst6    +++|          MX2    -12         GET MST ADDRESS
01947  M01S00082.mst6    +++|          BX2    -X2*X1
01948  M01S00083.mst6    +++|          LX2    3
01949  M01S00084.mst6    +++|          SX1    CNSC
01950  M01S00085.mst6    +++|          SX4    B0
01951  M01S00086.mst6    +++|          SX3    MSTL
01952  M01S00087.mst6    +++|          RJ     RSB=        READ MST
01953  M01S00088.mst6    +++|
01954  M01S00089.mst6    +++|*         CALCULATE NUMBER OF AVAILABLE SECTORS.
01955  M01S00090.mst6    +++|
01956  M01S00091.mst6    +++|          SA1    CNSC+TDGL
01957  M01S00092.mst6    +++|          SA2    CNSC+MDGL
01958  M01S00093.mst6    +++|          MX3    -12
01959  M01S00094.mst6    +++|          BX1    -X3*X1      NUMBER OF AVAILABLE TRACKS
01960  M01S00095.mst6    +++|          BX2    -X3*X2      SECTOR LIMIT
01961  M01S00096.mst6    +++|          SX1    X1+B1       ADD TRACK ALREADY ALLOCATED TO FILE
01962  M01S00097.mst6    +++|          IX1    X1*X2
01963  M01S00098.mst6    +++|          SX4    5
01964  M01S00099.mst6    +++|          IX6    X1-X4       SET TOTAL SECTOR COUNT
01965  M01S00100.mst6    +++|          SA1    CNSB
01966  M01S00101.mst6    +++|          LX1    59-55
01967  M01S00102.mst6    +++|          PL     X1,CNSX     IF NOT *LDAM* DEVICE
01968  M01S00103.mst6    +++|          SX1    RWPC        DO NOT TEST THE LAST *RWPC* SECTORS
01969  M01S00104.mst6    +++|          IX6    X6-X1
01970  M01S00105.mst6    +++|          EQ     CNSX        RETURN
01971  M01S00106.mst6    +++|
01972  M01S00107.mst6    +++|
01973  M01S00108.mst6    +++| CNSA     VFD    1/1,23/0,18/0,18/0
01974  M01S00109.mst6    +++| CNSB     VFD    1/1,23/0,18/0,18/0
01975  M01S00110.mst6    +++| CNSC     VFD    1/1,23/0,18/0,18/0
01976  M01S00111.mst6    +++|          BSS    MSTL-1
01977  M01S00112.mst6    +++|          SPACE  4,10
01978  M01S00113.mst6    +++|*         COMMON DECKS.
01979  M01S00114.mst6    +++|
01980  M01S00115.mst6    +++|
01981  M01S00116.mst6    +++|*CALL     COMCRSB
01982  M01S00117.mst6    +++|          TITLE  PRESET DATA.
01983  M01S01197.mst     +++|
01984  M01S01198.mst     +++| TARG     BSS    0           MST ARGUMENT TABLE
01985  M01S01199.mst     +++| T        ARG    DZRO,TS,400B
01986  M01S01200.mst     +++| P        ARG    TP,TP,400B
01987  M01S01201.mst     +++| N        ARG    DZRO,NS,400B
01988  M01S01202.mst     +++| NW       ARG    -ONE,NW
01989  M01S00293.mst4    +++| TL       ARG    TL,TL,400B
01990  M01S00294.mst4    +++| NV       ARG    -ONE,NV
01991  M01S00295.mst4    +++| RO       ARG    -T32,RO
01992  M01S00296.mst4    +++| IO       ARG    IO,IO,400B
01993  M01S01203.mst     +++|          ARG
01994  M01S01204.mst     +++|
01995  M01S01205.mst     +++| TART     BSS    0           ARGUMENT TABLE FOR ADDRESS CONVERSION
01996  M01S01206.mst     +++| EQ       ARG    TEQP+1,PRSB,400B
01997  M01S01207.mst     +++| T        ARG    DZRO,PRSC,400B
01998  M01S01208.mst     +++| S        ARG    DZRO,PRSD,400B
01999  M01S01209.mst     +++|          ARG
02000  M01S01210.mst     +++|
02001  M01S01211.mst     +++|
02002  M01S01212.mst     +++| DZRO     DATA   1L0         DISPLAY CODE ZERO
02003  M01S01213.mst     +++| ONE      DATA   1           CONSTANT 1
02004  M01S00297.mst4    +++| T32      DATA   32          CONSTANT 32
02005  M01S01214.mst     +++|          SPACE  4
02006  M01S01215.mst     +++| CDV      EQU    CVA         819 SINGLE DENSITY
02007  M01S01216.mst     +++| CDW      EQU    CVA         819 DOUBLE DENSITY
02008  M01S00001.ns21000 +++| CDB      EQU    CVA         PFMD - DEMA ACCESS

Line S00002 Modification History
`M01` (Added by)	`ns21000`
`M02` (Updated by)	`241l630`

Seq #  *Modification Id* Act 
----------------------------+
02009  M02S00002.241l630 ---| CDC      EQU    CVA         PFMD - AFMD ACCESS
02010  M01S00003.241l630 +++| CDC      EQU    CVA         895
02011  M01S00001.251l670 +++| CDF      EQU    CVA         887 (4KB SECTOR)
02012  M01S00002.251l670 +++| CDH      EQU    CVA         887 (16KB SECTOR)
02013  M01S00001.271l716 +++| CDN      EQU    CVA         9853
02014  M01S00001.272l774 +++| CEA      EQU    CVA         5832 (1X SSD)
02015  M01S00002.272l774 +++| CEB      EQU    CVA         5832 (2X SSD)
02016  M01S00003.272l774 +++| CEC      EQU    CVA         5833 (1X SABRE)
02017  M01S00004.272l774 +++| CED      EQU    CVA         5833 (1XP SABRE)
02018  M01S00005.272l774 +++| CEE      EQU    CVA         5833 (2X SABRE)
02019  M01S00006.272l774 +++| CEF      EQU    CVA         5833 (2XP SABRE)
02020  M01S00001.ns2768  +++| CEG      EQU    CVA         5838 (1X ELITE)
02021  M01S00002.ns2768  +++| CEH      EQU    CVA         5838 (1XP ELITE)
02022  M01S00003.284l847 +++| CEI      EQU    CVA         5838 (2X ELITE)
02023  M01S00004.284l847 +++| CEJ      EQU    CVA         5838 (2XP ELITE)
02024  M01S00005.284l847 +++| CEK      EQU    CVA         5838 (3XP ELITE)
02025  M01S00006.284l847 +++| CEL      EQU    CVA         5838 (4X ELITE)
02026  M01S00007.284l847 +++| CEM      EQU    CVA         5833 (3XP SABRE)
02027  M01S00008.284l847 +++| CEN      EQU    CVA         5833 (4X SABRE)
02028  M01S00009.284l847 +++| CEO      EQU    CVA         47444 (1X 3.5IN)
02029  M01S00010.284l847 +++| CEP      EQU    CVA         47444 (1XP 3.5IN)
02030  M01S00011.284l847 +++| CES      EQU    CVA         47444 (2X 3.5IN)
02031  M01S00012.284l847 +++| CEU      EQU    CVA         47444 (2XP 3.5IN)
02032  M01S00013.284l847 +++| CEV      EQU    CVA         47444 (3XP 3.5IN)
02033  M01S00014.284l847 +++| CEW      EQU    CVA         47444 (4X 3.5IN)
02034  M01S01217.mst     +++|          SPACE  4
02035  M01S01218.mst     +++|**        TBLM - GENERATE TABLE VIA *TBL* MACRO.
02036  M01S01219.mst     +++|
02037  M01S01220.mst     +++|
02038  M01S01221.mst     +++|          PURGMAC TBLM
02039  M01S01222.mst     +++| TBLM     MACRO  EQ

Line S00001 Modification History
`M01` (Added by)	`mst5`
`M02` (Updated by)	`272l774`

Seq #  *Modification Id* Act 
----------------------------+
02040  M02S00001.272l774 ---|          IFC    NE,*"DR_EQ"*DI*

Line S00002 Modification History
`M01` (Added by)	`mst5`
`M02` (Updated by)	`272l774`

Seq #  *Modification Id* Act 
----------------------------+
02041  M02S00002.272l774 ---|          IFC    NE,*"DR_EQ"*DJ*
02042  M01S00007.272l774 +++|          IFC    NE,*"DRN_EQ"*DI*
02043  M01S00008.272l774 +++|          IFC    NE,*"DRN_EQ"*DJ*
02044  M01S00003.mst5    +++|          VFD    12/2R_EQ,18/C_EQ,6/BF_EQ
02045  M01S00004.mst5    +++|          ELSE   1
02046  M01S00005.mst5    +++|          VFD    12/2R_EQ,18/CVA,6/BF_EQ
02047  M01S01223.mst     +++|          IFNE   NT_EQ,0

Line S01224 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst5`

Seq #  *Modification Id* Act 
----------------------------+
02048  M02S01224.mst5    ---| .1       SET    NT_EQ*SL_EQ/2
02049  M01S00006.mst5    +++|          VFD    24/NT_EQ*SL_EQ/2
02050  M01S01225.mst     +++|          ELSE   1

Line S01226 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst5`

Seq #  *Modification Id* Act 
----------------------------+
02051  M02S01226.mst5    ---| .1       SET    3400B

Line S01227 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst5`

Seq #  *Modification Id* Act 
----------------------------+
02052  M02S01227.mst5    ---|          IFC    NE,*"DR_EQ"*DI*

Line S00001 Modification History
`M01` (Added by)	`ns2328`
`M02` (Updated by)	`mst5`

Seq #  *Modification Id* Act 
----------------------------+
02053  M02S00001.mst5    ---|          IFC    NE,*"DR_EQ"*DJ*

Line S01228 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst1`
`M03` (Updated by)	`mst5`

Seq #  *Modification Id* Act 
----------------------------+
02054  M03S01228.mst5    ---|          VFD    12/2R_EQ,18/C_EQ,30/.1

Line S00091 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`mst5`

Seq #  *Modification Id* Act 
----------------------------+
02055  M02S00091.mst5    ---|          VFD    12/2R_EQ,18/C_EQ,6/BF_EQ,24/.1

Line S01229 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst5`

Seq #  *Modification Id* Act 
----------------------------+
02056  M02S01229.mst5    ---|          ELSE   1

Line S01230 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`mst1`
`M03` (Updated by)	`mst5`

Seq #  *Modification Id* Act 
----------------------------+
02057  M03S01230.mst5    ---|          VFD    12/2R_EQ,18/CVA,30/.1

Line S00092 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`mst5`

Seq #  *Modification Id* Act 
----------------------------+
02058  M02S00092.mst5    ---|          VFD    12/2R_EQ,18/CVA,6/BF_EQ,24/.1
02059  M01S00007.mst5    +++|          VFD    24/3400B
02060  M01S01231.mst     +++|          ENDM
02061  M01S01232.mst     +++|
02062  M01S01233.mst     +++|
02063  M01S01234.mst     +++| TEQP     BSS    0           TABLE OF EQUIPMENTS
02064  M01S01235.mst     +++|          LIST   G
02065  M01S01236.mst     +++|          TBL    "MSEQ"
02066  M01S01237.mst     +++|          LIST   -G
02067  M01S01238.mst     +++|          CON    0           END OF TABLE
02068  M01S01239.mst     +++|

Line S01240 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`273l780`

Seq #  *Modification Id* Act 
----------------------------+
02069  M02S01240.273l780 ---|*         NOTE - RANDOM PATTERN MUST BE LAST IN TABLE.

Line S00093 Modification History
`M01` (Added by)	`mst1`
`M02` (Updated by)	`273l780`

Seq #  *Modification Id* Act 
----------------------------+
02070  M02S00093.273l780 ---|*                NEXT TO LAST MUST IS RESERVED FOR NULL DATA.

Line S01241 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`273l780`

Seq #  *Modification Id* Act 
----------------------------+
02071  M02S01241.273l780 ---|
02072  M01S01242.mst     +++| TPAT     BSS    0           TABLE OF PATTERNS.
02073  M01S01243.mst     +++|          DATA   0
02074  M01S01244.mst     +++|          DATA   -0
02075  M01S01245.mst     +++|          DATA   25252525252525252525B
02076  M01S01246.mst     +++|          DATA   52525252525252525252B
02077  M01S00094.mst1    +++|          DATA   0
02078  M01S01247.mst     +++|          DATA   13576420735162531625B
02079  M01S00182.273l780 +++|          DATA   0
02080  M01S01248.mst     +++| TPATL    EQU    *-TPAT
02081  M01S01249.mst     +++|
02082  M01S01250.mst     +++| PRS      SPACE  4
02083  M01S01251.mst     +++|          TITLE  ADDRESS CONVERSION ROUTINES.
02084  M01S01252.mst     +++| CDE      SPACE  4

Line S01253 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
02085  M02S01253.ns22000 ---|**        CDE    CONVERT EQUIPMENT *DE*, *DP* (ECS).
02086  M01S00044.ns22000 +++|**        CDE - CONVERT *DE* ADDRESS.
02087  M01S01254.mst     +++|
02088  M01S01255.mst     +++|
02089  M01S01256.mst     +++| CDE      BSS    0
02090  M01S00045.ns22000 +++| CDP      SPACE  4,10
02091  M01S00046.ns22000 +++|**        CDP - CONVERT *DP* ADDRESS.
02092  M01S00298.mst4    +++|*
02093  M01S00299.mst4    +++|*         USES   X - 1, 2, 3, 4, 6, 7.
02094  M01S00300.mst4    +++|*                A - 1, 2, 6, 7.
02095  M01S00301.mst4    +++|*                B - NONE.
02096  M01S00302.mst4    +++|*
02097  M01S00303.mst4    +++|*         CALLS  WOD.
02098  M01S00047.ns22000 +++|
02099  M01S00048.ns22000 +++|
02100  M01S01257.mst     +++| CDP      BSS    0
02101  M01S01258.mst     +++|          LOC    CVA
02102  M01S01259.mst     +++| CVA      PS                 ENTRY/EXIT
02103  M01S00014.252l678 +++|          SA1    EMTS        GET EM TRACK SHIFT
02104  M01S00015.252l678 +++|          SB2    X1+10
02105  M01S00016.252l678 +++|          SB3    X1+4
02106  M01S01260.mst     +++|          MX6    -12
02107  M01S01261.mst     +++|          SA1    D+6         READ POSITION
02108  M01S01262.mst     +++|          AX1    12          EXTRACT SECTOR
02109  M01S01263.mst     +++|          BX7    -X6*X1
02110  M01S01264.mst     +++|          SX4    3777B
02111  M01S01265.mst     +++|          LX7    6           SECTOR * 101B
02112  M01S01266.mst     +++|          BX6    -X6*X1
02113  M01S01267.mst     +++|          IX3    X7+X6
02114  M01S01268.mst     +++|          AX1    12          EXTRACT TRACK

Line S01269 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
02115  M02S01269.252l678 ---|          BX2    X4*X1       TRACK * 2020B

Line S01270 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
02116  M02S01270.252l678 ---|          LX2    10
02117  M01S00017.252l678 +++|          BX2    X4*X1       TRACK * 101 * SECTOR LIMIT
02118  M01S00018.252l678 +++|          LX2    B2
02119  M01S01271.mst     +++|          BX7    X4*X1

Line S01272 Modification History
`M01` (Added by)	`mst`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
02120  M02S01272.252l678 ---|          LX7    4
02121  M01S00019.252l678 +++|          LX7    B3
02122  M01S01273.mst     +++|          IX2    X7+X2
02123  M01S01274.mst     +++|          IX1    X2+X3
02124  M01S01275.mst     +++|          LX1    12*3        POSITION DATA
02125  M01S01276.mst     +++|          RJ     WOD         CONVERT DATA
02126  M01S01277.mst     +++|          SA1    CDEA
02127  M01S01278.mst     +++|          SA2    A1+B1
02128  M01S01279.mst     +++|          IX6    X1+X6
02129  M01S01280.mst     +++|          IX7    X2+X7
02130  M01S01281.mst     +++|          SA6    B6
02131  M01S01282.mst     +++|          SA7    B6+B1
02132  M01S01283.mst     +++|          EQ     CVA         RETURN
02133  M01S01284.mst     +++|
02134  M01S01285.mst     +++| CDEA     CON    10HA0000000. -10H0000000000
02135  M01S01286.mst     +++|          CON    10H          -10H0000000000
02136  M01S01287.mst     +++|
02137  M01S01288.mst     +++|          ERRNG  CVAE-*
02138  M01S01289.mst     +++|          LOC    *O
02139  M01S01290.mst     +++|          SPACE  4
02140  M01S01291.mst     +++|          END