User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:mst.001

Deck MST Part 001

21 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
01337  M00S00799.mst     +++|          SA6    ERRA
01338  M00S00800.mst     +++|          LX6    X3
01339  M00S00801.mst     +++|          SA7    A6+B1
01340  M00S00802.mst     +++|          BX7    X0
01341  M00S00803.mst     +++|          SA6    A7+B1
01342  M00S00804.mst     +++|          LX6    X2
01343  M00S00805.mst     +++|          SA7    A6+B1
01344  M00S00806.mst     +++|          SA6    A6+2
01345  M00S00807.mst     +++| ERR1     SA2    ERRH        POSITION TO ERROR
01346  M00S00808.mst     +++|          SA1    D+1
01347  M00S00809.mst     +++|          BX6    X2
01348  M00S00810.mst     +++|          SX7    X1
01349  M00S00811.mst     +++|          SA6    D+6
01350  M00S00812.mst     +++|          SX6    X1+B1
01351  M00S00813.mst     +++|          SA7    A1+B1
01352  M00S00814.mst     +++|          SA6    A7+B1
01353  M00S00815.mst     +++|          RPHR   D,R
01354  M00S00816.mst     +++|          STATUS X2,P
01355  M00S00817.mst     +++|          SA1    ERRH        MERGE RANDOM ADDRESS TRACK AND SECTOR
01356  M00S00818.mst     +++|          SA2    D+6
01357  M00S00819.mst     +++|          MX0    30
01358  M00S00820.mst     +++|          LX2    18
01359  M00S00821.mst     +++|          BX1    -X0*X1
01360  M00S00822.mst     +++|          BX2    X0*X2
01361  M00S00823.mst     +++|          BX1    X1+X2
01362  M00S00824.mst     +++|          RJ     WOD         CONVERT RANDOM ADDRESS TRACK AND SECTOR
01363  M00S00825.mst     +++|          SA1    ERRE
01364  M00S00826.mst     +++|          MX0    -18
01365  M00S00827.mst     +++|          SA2    A1+B1
01366  M00S00828.mst     +++|          BX1    X0*X1
01367  M00S00829.mst     +++|          LX7    -24
01368  M00S00830.mst     +++|          MX4    24
01369  M00S00831.mst     +++|          BX3    -X0*X7
01370  M00S00832.mst     +++|          BX2    -X4*X2
01371  M00S00833.mst     +++|          BX4    X4*X7
01372  M00S00834.mst     +++|          BX7    X1+X3       MERGE RANDOM ADDRESS IN MESSAGE
01373  M00S00835.mst     +++|          SA3    A2+B1
01374  M00S00836.mst     +++|          BX2    X4+X2
01375  M00S00837.mst     +++|          SA7    A1
01376  M00S00838.mst     +++|          MX4    -24
01377  M00S00839.mst     +++|          BX7    -X4*X6
01378  M00S00840.mst     +++|          AX6    24
01379  M00S00841.mst     +++|          BX2    X4*X2       CLEAR TRACK
01380  M00S00842.mst     +++|          BX6    -X4*X6
01381  M00S00843.mst     +++|          LX4    24
01382  M00S00844.mst     +++|          BX3    X4*X3       CLEAR SECTOR
01383  M00S00845.mst     +++|          BX6    X6+X2       MERGE TRACK IN MESSAGE
01384  M00S00846.mst     +++|          LX7    24
01385  M00S00847.mst     +++|          SA6    A2
01386  M00S00848.mst     +++|          BX7    X7+X3       MERGE SECTOR IN MESSAGE
01387  M00S00849.mst     +++|          SA7    A3
01388  M00S00850.mst     +++|          SB6    ERRD
01389  M00S00851.mst     +++|          RJ     CVA         CONVERT ADDRESS
01390  M00S00852.mst     +++|          MESSAGE  ERRB,,R
01391  M00S00853.mst     +++|          MESSAGE  ERRE,,R
01392  M00S00854.mst     +++|          EQ     ERRX        RETURN
01393  M00S00855.mst     +++|
01394  M00S00856.mst     +++| ERRA     BSS    5
Line S00857 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01395  M01S00857.ns22000 ---| ERRB     CON    10H EQXX ZZZZ
Line S00036 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01396  M01S00036.ns22000 +++| ERRB     DATA   10HEQXXX,ZZZZ
01397  M00S00858.mst     +++| ERRC     CON    10H ERROR AT
01398  M00S00859.mst     +++| ERRD     CON    0,0
01399  M00S00860.mst     +++|          CON    0           END OF LINE FOR FIRST MESSAGE
Line S00861 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01400  M01S00861.ns22000 ---| ERRE     CON    10H EQXX R000
Line S00037 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01401  M01S00037.ns22000 +++| ERRE     DATA   10HEQXXX,R000
01402  M00S00862.mst     +++| ERRF     CON    10H0000,T0000
01403  M00S00863.mst     +++| ERRG     CON    7L,S0000.
01404  M00S00864.mst     +++| ERRH     CON    0           RANDOM ADDRESS TEMPORARY
Line S00865 Modification History
M01 (Removed by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01405  M01S00865.mst4    ---| GDB      SPACE  4
Line S00234 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01406  M01S00234.mst4    +++| GDB      SPACE  4,15
01407  M00S00866.mst     +++|**        GDB - GENERATE DATA BUFFER.
01408  M00S00867.mst     +++|*
01409  M00S00868.mst     +++|*         ENTRY (X6) = RANDOM NUMBER WHICH WILL GENERATE BUFFER.
01410  M00S00869.mst     +++|*               (A6) = ADDRESS OF RANDOM NUMBER IN BUFFER.
01411  M00S00870.mst     +++|*
01412  M00S00871.mst     +++|*         EXIT  (X6) = CHECKSUM OF BUFFER.
01413  M00S00872.mst     +++|*               (X7) = LAST DATA WORD STORED IN BUFFER.
01414  M00S00873.mst     +++|*               (B2) = (B3) = NUMBER OF DATA WORDS GENERATED.
01415  M00S00874.mst     +++|*               (A6) = ADDRESS OF LAST WORD IN BUFFER.
01416  M00S00875.mst     +++|*
01417  M00S00876.mst     +++|*         USES   X - 2, 6, 7.
Line S00877 Modification History
M01 (Removed by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01418  M01S00877.mst4    ---|*                B - 2, 3.
Line S00878 Modification History
M01 (Removed by) mst1
M02 (Removed by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01419  M02S00878.mst4    ---|*                A - 6, 7.
Line S00050 Modification History
M01 (Added by) mst1
M02 (Removed by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01420  M02S00050.mst4    ---|*                A - 2, 6, 7.
Line S00879 Modification History
M01 (Removed by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01421  M01S00879.mst4    ---|*
01422  M01S00880.mst4    ---|*         CALLS  NONE
Line S00235 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01423  M01S00235.mst4    +++|*                A - 2, 6, 7.
01424  M01S00236.mst4    +++|*                B - 2, 3.
01425  M00S00881.mst     +++|
01426  M00S00882.mst     +++|
01427  M00S00883.mst     +++| GDB      SUBR               ENTRY/EXIT
Line S00051 Modification History
M01 (Added by) mst1
Seq #  *Modification Id* Act 
----------------------------+
01428  M01S00051.mst1    +++|          SA2    ND
01429  M01S00052.mst1    +++|          ZR     X2,GDBX     IF NO DATA GENERATION
01430  M00S00884.mst     +++|          SB3    75B
01431  M00S00885.mst     +++|          SB2    B0+
01432  M00S00886.mst     +++| GDBA     BX7    X6
01433  M00S00887.mst     +++|          SA7    A6
01434  M00S00888.mst     +++|
01435  M00S00889.mst     +++|*         THIS INSTRUCTION IS MODIFIED BY PRESET
01436  M00S00890.mst     +++|*         EQ     GDB2        IF NON-RANDOM PATTERN
01437  M00S00891.mst     +++|
01438  M00S00892.mst     +++|          SX6    B0+         IF RANDOM PATTERN - CLEAR CHECKSUM
01439  M00S00893.mst     +++|
01440  M00S00894.mst     +++| GDB1     PX2    X7
01441  M00S00895.mst     +++|          DX7    X2*X2
01442  M00S00896.mst     +++|          IX7    X7+X2
01443  M00S00897.mst     +++|          SB2    B2+B1
01444  M00S00898.mst     +++|          LX2    15
01445  M00S00899.mst     +++|          IX7    X7+X2
01446  M00S00900.mst     +++|          LX2    19
01447  M00S00901.mst     +++|          IX7    X2+X7
01448  M00S00902.mst     +++|          SA7    A7+B1
01449  M00S00903.mst     +++|          IX6    X6+X7       ADVANCE CHECKSUM
01450  M00S00904.mst     +++|          NE     B2,B3,GDB1  IF MORE DATA TO GENERATE
01451  M00S00905.mst     +++|          SA6    A7+B1       CHECKSUM IN LAST LOCATION OF BUFFER
01452  M00S00906.mst     +++|          EQ     GDBX
01453  M00S00907.mst     +++|
01454  M00S00908.mst     +++| GDB2     SB2    B2+B1
01455  M00S00909.mst     +++|          SA7    A7+B1
01456  M00S00910.mst     +++|          NE     B2,B3,GDB2  IF BUFFER NOT FULL
01457  M00S00911.mst     +++|          SA6    A7+B1
01458  M00S00912.mst     +++|          EQ     GDBX
Line S00913 Modification History
M01 (Removed by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01459  M01S00913.mst4    ---| MEM      SPACE  4
Line S00237 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01460  M01S00237.mst4    +++| MEM      SPACE  4,15
01461  M00S00914.mst     +++|**        MEM - REQUEST MEMORY.
01462  M00S00915.mst     +++|*
01463  M00S00916.mst     +++|*         ENTRY  (X1) = REQUESTED MEMORY.
01464  M00S00917.mst     +++|*
01465  M00S00918.mst     +++|*         EXIT   (IN) = (OUT) = (FIRST).
01466  M00S00919.mst     +++|*                (LIMIT) = REQUESTED FIELD LENGTH.
Line S00238 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
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  M00S00920.mst     +++|
01474  M00S00921.mst     +++|
01475  M00S00922.mst     +++| MEM      SUBR               ENTRY/EXIT
01476  M00S00923.mst     +++|          SA2    D+1
01477  M00S00924.mst     +++|          SX7    X1-10B
01478  M00S00925.mst     +++|          SX6    X2
01479  M00S00926.mst     +++|          SA7    D+4         LIMIT
01480  M00S00927.mst     +++|          SA6    A7-B1       OUT
01481  M00S00928.mst     +++|          SA6    A6-B1       IN
01482  M00S00929.mst     +++|          MEMORY ,,R,X1      REQUEST MEMORY
01483  M00S00930.mst     +++|          EQ     MEMX        RETURN
Line S00931 Modification History
M01 (Removed by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01484  M01S00931.mst4    ---| MES      SPACE  4
Line S00244 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01485  M01S00244.mst4    +++| MES      SPACE  4,15
01486  M00S00932.mst     +++|**        MES - SEND MESSAGE.
01487  M00S00933.mst     +++|*
01488  M00S00934.mst     +++|*         ENTRY  (X1) = MESSAGE ADDRESS.
01489  M00S00935.mst     +++|*
01490  M00S00936.mst     +++|*         EXIT   MESSAGE SENT TO CONTROL POINT AND JOB DAYFILE.
Line S00245 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
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  M00S00937.mst     +++|
01498  M00S00938.mst     +++|
01499  M00S00939.mst     +++| MES      SUBR               ENTRY/EXIT
01500  M00S00940.mst     +++|          SX0    X1+
01501  M00S00941.mst     +++|          MESSAGE X1,1,R
01502  M00S00942.mst     +++|          MESSAGE X0,3,R
01503  M00S00943.mst     +++|          EQ     MESX        RETURN
01504  M00S00944.mst     +++| RNO      SPACE  4
01505  M00S00945.mst     +++|**        RNO - GENERATE RANDOM SECTOR NUMBER.
01506  M00S00946.mst     +++|*
01507  M00S00947.mst     +++|*         ENTRY  NONE.
01508  M00S00948.mst     +++|*
01509  M00S00949.mst     +++|*         EXIT   (X6) = RANDOM SECTOR NUMBER IN FILE.
01510  M00S00950.mst     +++|*
01511  M00S00951.mst     +++|*         USES   X - 1, 3, 5, 6.
Line S00251 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01512  M01S00251.mst4    +++|*                A - 1, 3, 5, 6.
01513  M00S00952.mst     +++|*                B - NONE.
Line S00953 Modification History
M01 (Removed by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01514  M01S00953.mst4    ---|*                A - 1, 3, 5, 6.
01515  M00S00954.mst     +++|
01516  M00S00955.mst     +++|
01517  M00S00956.mst     +++| RNO      SUBR               ENTRY/EXIT
01518  M00S00957.mst     +++| RNO1     SA1    RNOA        LAST NUMBER
01519  M00S00958.mst     +++|          SA3    SM          SECTOR MASK
01520  M00S00959.mst     +++|          SA5    NS          NUMBER OF SECTORS
01521  M00S00960.mst     +++|          PX1    X1
01522  M00S00961.mst     +++|          DX6    X1*X1
01523  M00S00962.mst     +++|          IX6    X1+X6
01524  M00S00963.mst     +++|          LX1    15
01525  M00S00964.mst     +++|          IX6    X1+X6
01526  M00S00965.mst     +++|          LX1    19
01527  M00S00966.mst     +++|          IX6    X1+X6
01528  M00S00967.mst     +++|          SA6    A1          SAVE NEW NUMBER
Line S00252 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01529  M01S00252.mst4    +++|          SA1    TL
01530  M01S00253.mst4    +++|          IX5    X5-X1
01531  M00S00968.mst     +++|          BX6    -X3*X6
Line S00254 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
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  M00S00969.mst     +++|          IX3    X5-X6
01539  M00S00970.mst     +++|          ZR     X6,RNO1     IF SECTOR NUMBER = 0
01540  M00S00971.mst     +++|          NG     X3,RNO1     IF SECTOR NOT IN FILE
01541  M00S00972.mst     +++|          EQ     RNOX        RETURN
01542  M00S00973.mst     +++|
01543  M00S00974.mst     +++| RNOA     DATA   13576420735162531625B
Line S00053 Modification History
M01 (Added by) mst1
Seq #  *Modification Id* Act 
----------------------------+
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 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01547  M02S00056.241l630 ---|*         ENTRY  BD = 2 IF DEVICE IS BUFFERED IN ESM/LCM.
Line S00002 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
01548  M01S00002.241l630 +++|*         ENTRY  (BD) = 2 IF DEVICE IS BUFFERED.
Line S00057 Modification History
M01 (Added by) mst1
Seq #  *Modification Id* Act 
----------------------------+
01549  M01S00057.mst1    +++|*
Line S00058 Modification History
M01 (Added by) mst1
M02 (Removed by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01550  M02S00058.mst4    ---|*         USES   A - 1.
01551  M02S00059.mst4    ---|*                B - NONE.
01552  M02S00060.mst4    ---|*                X - 1, 2, 3.
01553  M02S00061.mst4    ---|*
01554  M02S00062.mst4    ---|*         CALLS  SYS=.
Line S00260 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
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.
Line S00063 Modification History
M01 (Added by) mst1
Seq #  *Modification Id* Act 
----------------------------+
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  M00S00975.mst     +++|          SPACE  4
Line S00976 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01582  M01S00976.ns22000 ---|*         COMMON DECKS.
Line S00038 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01583  M01S00038.ns22000 +++|**        COMMON DECKS.
01584  M00S00977.mst     +++|
01585  M00S00978.mst     +++|
01586  M00S00979.mst     +++| ERP1$    EQU    1           ENABLE I/O ERROR PROCESSING
Line S00265 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01587  M01S00265.mst4    +++|*CALL     COMCCDD
01588  M00S00980.mst     +++|*CALL     COMCCOD
01589  M00S00981.mst     +++|*CALL     COMCCIO
01590  M00S00982.mst     +++|*CALL     COMCCFD
01591  M00S00983.mst     +++|*CALL     COMCLFM
01592  M00S00984.mst     +++|*CALL     COMCRDW
01593  M00S00985.mst     +++|*CALL     COMCSYS
01594  M00S00986.mst     +++|*CALL     COMCWOD
01595  M00S00987.mst     +++|*CALL     COMCWTW
01596  M00S00988.mst     +++| BUFFERS  SPACE  4
01597  M00S00989.mst     +++|          TITLE  BUFFERS.
01598  M00S00990.mst     +++|          USE    //
01599  M00S00991.mst     +++|          SEG
01600  M00S00992.mst     +++| BUFS     BSS    0
01601  M00S00993.mst     +++|
01602  M00S00994.mst     +++| TRRD     EQU    BUFS+1      TABLE OF SECTORS FOR RANDOM READ WITH LIST
01603  M00S00995.mst     +++| TBUF     EQU    TRRD+41     TEST BUFFER FOR PATTERN REGENERATION
01604  M00S00996.mst     +++| SBUF     EQU    TBUF+100B
01605  M00S00997.mst     +++| DBUF     EQU    SBUF+100B
01606  M00S00998.mst     +++| MFL=     EQU    DBUF+DBUFL+10B+200000B
01607  M00S00999.mst     +++|
01608  M00S01000.mst     +++|
01609  M00S01001.mst     +++|          TITLE  PRESET.
01610  M00S01002.mst     +++|          ORG    BUFS
01611  M00S01003.mst     +++|
01612  M00S01004.mst     +++|
01613  M00S01005.mst     +++|**        THE FOLLOWING CODE IS OVERLAYED BY BUFFERS.
01614  M00S01006.mst     +++|
01615  M00S01007.mst     +++|
01616  M00S01008.mst     +++|*         COMMON DECKS
01617  M00S01009.mst     +++|
01618  M00S01010.mst     +++|*CALL     COMCARG
01619  M00S01011.mst     +++|*CALL     COMCCPM
01620  M00S01012.mst     +++|*CALL     COMCDXB
01621  M00S01013.mst     +++|*CALL     COMCMVE
01622  M00S01014.mst     +++| PRS      SPACE  4
01623  M00S01015.mst     +++|**        PRS - PRESET PROGRAM.
01624  M00S01016.mst     +++|*
01625  M00S01017.mst     +++|*         ENTRY  (B7) = 1 IF ADDRESS CONVERSION PRESET.
01626  M00S01018.mst     +++|
01627  M00S01019.mst     +++|
01628  M00S01020.mst     +++| PRS      SUBR               ENTRY/EXIT
Line S00007 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
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  M00S01021.mst     +++|          EQ     B7,B1,PRS5  IF ADDRESS CONVERSION PRESET
Line S01022 Modification History
M01 (Removed by) mst1
Seq #  *Modification Id* Act 
----------------------------+
01636  M01S01022.mst1    ---|          SETPR  2
01637  M00S01023.mst     +++|          MODE   1
Line S00020 Modification History
M01 (Added by) mst9
Seq #  *Modification Id* Act 
----------------------------+
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  M00S01024.mst     +++|          REQUEST D
01646  M00S01025.mst     +++|          STATUS X2,P
01647  M00S01026.mst     +++|          SA1    D+6
Line S00008 Modification History
M01 (Added by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01648  M01S00008.mst6    +++|          BX6    X1
01649  M01S00009.mst6    +++|          AX6    48
01650  M01S00010.mst6    +++|          SA6    PRSG        SAVE EST ORDINAL
Line S01027 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01651  M01S01027.ns22000 ---|          RJ     WOD         CONVERT EQUIPMENT NUMBER
Line S00039 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01652  M01S00039.ns22000 +++|          RJ     WOD         CONVERT EST ORDINAL
01653  M00S01028.mst     +++|          SA1    D+1
Line S00040 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01654  M01S00040.ns22000 +++|          AX6    6           POSITION EST ORDINAL
01655  M00S01029.mst     +++|          MX0    12
01656  M00S01030.mst     +++|          BX1    X0*X1
Line S00041 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01657  M01S00041.ns22000 +++|          MX0    18
01658  M00S01031.mst     +++|          LX0    -12
01659  M00S01032.mst     +++|          BX6    X0*X6
Line S01033 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01660  M01S01033.ns22000 ---|          SX2    1R
01661  M01S01034.ns22000 ---|          BX6    X6+X1       MERGE EQUIPMENT NUMBER AND TYPE
Line S00042 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01662  M01S00042.ns22000 +++|          BX6    X6+X1       MERGE EST ORDINAL AND TYPE
Line S01035 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01663  M01S01035.ns22000 ---|          BX6    X6+X2
01664  M01S01036.ns22000 ---|          LX2    30
01665  M01S01037.ns22000 ---|          BX6    X6+X2
01666  M01S01038.ns22000 ---|          LX6    -6
01667  M01S01039.ns22000 ---|          MX0    -24
Line S00043 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01668  M01S00043.ns22000 +++|          MX0    -30
01669  M00S01040.mst     +++|          SA1    DCHC        SET EQUIPMENT IN MESSAGES
01670  M00S01041.mst     +++|          BX1    -X0*X1
01671  M00S01042.mst     +++|          BX7    X6+X1
01672  M00S01043.mst     +++|          SA7    DCHC
01673  M00S01044.mst     +++|          SA1    ERRE
01674  M00S01045.mst     +++|          BX1    -X0*X1
01675  M00S01046.mst     +++|          BX7    X6+X1
01676  M00S01047.mst     +++|          SA7    ERRE
01677  M00S01048.mst     +++|          SA1    CKSA-1
01678  M00S01049.mst     +++|          SB2    B0+
01679  M00S01050.mst     +++|          SB3    4
01680  M00S01051.mst     +++| PRS1     SA1    A1+B1
01681  M00S01052.mst     +++|          BX1    -X0*X1
01682  M00S01053.mst     +++|          SB2    B2+1
01683  M00S01054.mst     +++|          BX7    X6+X1
01684  M00S01055.mst     +++|          SA7    A1
01685  M00S01056.mst     +++|          LT     B2,B3,PRS1  IF MORE MESSAGES
01686  M00S01057.mst     +++|          MX6    0
01687  M00S01058.mst     +++|          SA6    D+5
01688  M00S01059.mst     +++|          SA6    A6+B1
01689  M00S01060.mst     +++|
01690  M00S01061.mst     +++|*         IDENTIFY ASSIGNED EQUIPMENT.
01691  M00S01062.mst     +++|
01692  M00S01063.mst     +++|          SA2    TEQP
Line S01064 Modification History
M01 (Removed by) mst3
Seq #  *Modification Id* Act 
----------------------------+
01693  M01S01064.mst3    ---|          SA1    D+1
Line S00005 Modification History
M01 (Added by) mst3
Seq #  *Modification Id* Act 
----------------------------+
01694  M01S00005.mst3    +++|          SA1    D+B1
01695  M01S00006.mst3    +++|          MX0    -24
01696  M00S01065.mst     +++|          MX5    1           SET EP BIT IN FET
01697  M00S01066.mst     +++|          MX4    12
01698  M00S01067.mst     +++|          LX5    44-59
01699  M00S01068.mst     +++|          SX7    B1
01700  M00S01069.mst     +++| PRS2     ZR     X2,PRS8     IF END OF TABLE
01701  M00S01070.mst     +++|          BX3    X2-X1
01702  M00S01071.mst     +++|          BX6    X4*X3
01703  M00S01072.mst     +++|          LX3    X2
01704  M00S01073.mst     +++|          SA2    A2+B1
01705  M00S01074.mst     +++|          NZ     X6,PRS2     IF NO EQUIPMENT MATCH
01706  M00S01075.mst     +++|          BX6    X1+X5
01707  M00S01076.mst     +++|          SA6    A1          SET EPR BIT IN FET
01708  M00S01077.mst     +++|          BX6    -X0*X3
01709  M00S01078.mst     +++|          IX6    X6-X7
01710  M00S01079.mst     +++|          SA6    NS
01711  M00S01080.mst     +++|          MX7    12          SET SECTOR MASK
01712  M00S01081.mst     +++|          NX6    X6,B2
01713  M00S01082.mst     +++|          AX7    X7,B2
Line S01083 Modification History
M01 (Removed by) mst1
Seq #  *Modification Id* Act 
----------------------------+
01714  M01S01083.mst1    ---|          AX3    30
Line S00084 Modification History
M01 (Added by) mst1
Seq #  *Modification Id* Act 
----------------------------+
01715  M01S00084.mst1    +++|          AX3    24
01716  M00S01084.mst     +++|          SA7    A6+B1
Line S00085 Modification History
M01 (Added by) mst1
Seq #  *Modification Id* Act 
----------------------------+
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  M00S01085.mst     +++|          SX2    X3
01722  M00S01086.mst     +++|          ZR     X2,PRS8     IF ILLEGAL EQUIPMENT
01723  M00S01087.mst     +++|          MOVE   CVAE-CVA,X2,CVA
01724  M00S01088.mst     +++|
01725  M00S01089.mst     +++|*         RETRIEVE ARGUMENTS.
01726  M00S01090.mst     +++|
01727  M00S01091.mst     +++|          SA1    ACTR        ARGUMENT COUNT
01728  M00S01092.mst     +++|          SB7    B0
01729  M00S01093.mst     +++|          SB4    X1
01730  M00S01094.mst     +++|          SA4    ARGR        FIRST ARGUMENT
01731  M00S01095.mst     +++|          SB5    TARG        ARGUMENT TABLE
01732  M00S01096.mst     +++|          RJ     ARG         PROCESS ARGUMENTS
01733  M00S01097.mst     +++|          NZ     X1,PRS7     IF ARGUMENT ERROR
Line S00011 Modification History
M01 (Added by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01734  M01S00011.mst6    +++|
01735  M01S00012.mst6    +++|*         PROCESS *N* PARAMETER (NUMBER OF SECTORS).
01736  M01S00013.mst6    +++|
01737  M00S01098.mst     +++|          SA5    NS          NUMBER OF SECTORS
01738  M00S01099.mst     +++|          MX2    14B
01739  M00S01100.mst     +++|          BX3    X2*X5
01740  M00S01101.mst     +++|          ZR     X3,PRS3     IF ARGUMENT OMITTED
Line S01102 Modification History
M01 (Removed by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01741  M01S01102.mst6    ---|          RJ     DXB         CONVERT ARGUMENT TO OCTAL
Line S00014 Modification History
M01 (Added by) mst6
Seq #  *Modification Id* Act 
----------------------------+
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  M00S01103.mst     +++|          SX1    B1
01751  M00S01104.mst     +++|          IX6    X6-X1
01752  M00S01105.mst     +++|          ZR     X6,PRS7     IF ARGUMENT ERROR
Line S01106 Modification History
M01 (Removed by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01753  M01S01106.mst6    ---|          SA6    NS
Line S00022 Modification History
M01 (Added by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01754  M01S00022.mst6    +++| PRS2.2   SA6    NS
01755  M00S01107.mst     +++|          MX7    12          SET SECTOR MASK
01756  M00S01108.mst     +++|          NX6    X6,B2
01757  M00S01109.mst     +++|          AX7    X7,B2
01758  M00S01110.mst     +++|          SA7    SM
Line S01111 Modification History
M01 (Removed by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01759  M01S01111.mst6    ---|
Line S00266 Modification History
M01 (Added by) mst4
M02 (Removed by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01760  M02S00266.mst6    ---|          SA1    NS          SET SECTOR SIZE
Line S00023 Modification History
M01 (Added by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01761  M01S00023.mst6    +++| PRS3     SA1    NS          SET SECTOR SIZE
Line S00267 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
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 (Removed by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01766  M02S00271.mst6    ---| PRS3     SA5    IO          SET NUMBER OF I/O-S
Line S00024 Modification History
M01 (Added by) mst6
Seq #  *Modification Id* Act 
----------------------------+
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
Line S00272 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
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
Line S00028 Modification History
M01 (Added by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01780  M01S00028.mst6    +++|
01781  M01S00029.mst6    +++|*         PROCESS *TL* PARAMETER (TRANSFER LENGTH).
01782  M01S00030.mst6    +++|
Line S00281 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01783  M01S00281.mst4    +++|          SA5    TL          SET TRANSFER LENGTH
Line S00282 Modification History
M01 (Added by) mst4
M02 (Removed by) mst8
Seq #  *Modification Id* Act 
----------------------------+
01784  M02S00282.mst8    ---|          ZR     X5,PRS3.3   IF PARAMETER OMITTED
Line S00283 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01785  M01S00283.mst4    +++|          RJ     DXB
01786  M01S00284.mst4    +++|          NZ     X4,PRS7     IF ERROR IN CONVERSION
Line S00285 Modification History
M01 (Added by) mst4
M02 (Removed by) mst8
Seq #  *Modification Id* Act 
----------------------------+
01787  M02S00285.mst8    ---|          ZR     X6,PRS7     IF INVALID SECTOR SIZE
Line S00006 Modification History
M01 (Added by) mst8
Seq #  *Modification Id* Act 
----------------------------+
01788  M01S00006.mst8    +++|          ZR     X6,PRS7     IF INVALID TRANSFER LENGTH
Line S00286 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
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 (Removed by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01794  M01S01112.mst6    ---|*         PATTERN SELECTION.
Line S00031 Modification History
M01 (Added by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01795  M01S00031.mst6    +++|*         PROCESS *P* PARAMETER (SELECT TEST PATTERN).
01796  M00S01113.mst     +++|
Line S01114 Modification History
M01 (Removed by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01797  M01S01114.mst4    ---| PRS3     SA5    TP
Line S00291 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01798  M01S00291.mst4    +++| PRS3.3   SA5    TP
01799  M00S01115.mst     +++|          RJ     DXB
01800  M00S01116.mst     +++|          NZ     X4,PRS7     IF ARGUMENT ERROR
01801  M00S01117.mst     +++|          SB5    X6-TPATL+1
Line S00089 Modification History
M01 (Added by) mst1
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
01802  M02S00089.273l780 ---|          SX7    B5+B1
01803  M02S00090.273l780 ---|          SA7    ND          SET NO DATA FLAG
Line S00171 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
01804  M01S00171.273l780 +++|          BX5    X6
01805  M00S01118.mst     +++|          GT     B5,B0,PRS7  IF ARGUMENT ERROR
01806  M00S01119.mst     +++|          SA1    X6+TPAT
01807  M00S01120.mst     +++|          SA2    PRSA
01808  M00S01121.mst     +++|          BX6    X1
01809  M00S01122.mst     +++|          LX7    X2
Line S01123 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
01810  M01S01123.273l780 ---|          ZR     B5,PRS4     IF RANDOM PATTERN
Line S00172 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
01811  M01S00172.273l780 +++|          SB5    X5-5
01812  M01S00173.273l780 +++|          ZR     B5,PRS4     IF P=5 (RANDOM PATTERN)
01813  M00S01124.mst     +++|          SA7    GDBA        SETS AN INSTRUCTION IN GDB
01814  M00S01125.mst     +++| PRS4     SA6    TP
Line S01126 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
01815  M01S01126.273l780 ---|          SA1    NS          SET INCREMENT FOR POSITION TEST
Line S00174 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
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  M00S01127.mst     +++|          SX2    B1+
01825  M00S01128.mst     +++|          AX1    6
01826  M00S01129.mst     +++|          IX7    X1+X2
01827  M00S01130.mst     +++|          SA7    POSA
01828  M00S01131.mst     +++|
Line S01132 Modification History
M01 (Removed by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01829  M01S01132.mst6    ---|*         TEST SELECTION
Line S00032 Modification History
M01 (Added by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01830  M01S00032.mst6    +++|*         PROCESS *T* PARAMETER (SELECT TEST SECTION).
01831  M00S01133.mst     +++|
01832  M00S01134.mst     +++|          SA5    TS
01833  M00S01135.mst     +++|          RJ     DXB
01834  M00S01136.mst     +++|          NZ     X4,PRS7     IF ARGUMENT ERROR
01835  M00S01137.mst     +++|          SX3    X6-6
01836  M00S01138.mst     +++|          PL     X3,PRS7     IF ARGUMENT ERROR
01837  M00S01139.mst     +++|          SA6    TS
01838  M00S01140.mst     +++|          EQ     PRSX        RETURN
01839  M00S01141.mst     +++|
01840  M00S01142.mst     +++|*         PRESET FOR ADDRESS CONVERSION.
01841  M00S01143.mst     +++|
01842  M00S01144.mst     +++| PRS5     SA1    ACTR
01843  M00S01145.mst     +++|          SA4    ARGR
01844  M00S01146.mst     +++|          SB5    TART
01845  M00S01147.mst     +++|          SB4    X1+
01846  M00S01148.mst     +++|          RJ     ARG         PROCESS ARGUMENTS
01847  M00S01149.mst     +++|          NZ     X1,PRS7     IF ARGUMENT ERROR
01848  M00S01150.mst     +++|          SA1    PRSB
01849  M00S01151.mst     +++|          SA5    PRSC        ADDRESS
01850  M00S01152.mst     +++|          SA2    TEQP-1
01851  M00S01153.mst     +++| PRS6     SA2    A2+B1
01852  M00S01154.mst     +++|          ZR     X2,PRS8     IF EQUIPMENT NOT FOUND
01853  M00S01155.mst     +++|          BX3    X2-X1
01854  M00S01156.mst     +++|          AX3    48
01855  M00S01157.mst     +++|          NZ     X3,PRS6     IF NO MATCH
01856  M00S01158.mst     +++|          BX6    X2
01857  M00S01159.mst     +++|          LX2    30
01858  M00S01160.mst     +++|          SA6    A1
01859  M00S01161.mst     +++|          SB6    X2
01860  M00S01162.mst     +++|          SB7    B0
01861  M00S01163.mst     +++|          RJ     DXB
01862  M00S01164.mst     +++|          NZ     X4,PRS7     IF ARGUMENT ERROR
01863  M00S01165.mst     +++|          SA6    PRSC
01864  M00S01166.mst     +++|          SA5    PRSD
01865  M00S01167.mst     +++|          RJ     DXB         CONVERT SECTOR
01866  M00S01168.mst     +++|          NZ     X4,PRS7     IF ARGUMENT ERROR
01867  M00S01169.mst     +++|          MX0    -12
01868  M00S01170.mst     +++|          BX5    X0*X6
01869  M00S01171.mst     +++|          SA1    PRSC
01870  M00S01172.mst     +++|          NZ     X5,PRS7     IF TRACK ERROR
01871  M00S01173.mst     +++|          BX5    X0*X1
01872  M00S01174.mst     +++|          LX1    12
01873  M00S01175.mst     +++|          NZ     X5,PRS7     IF SECTOR ERROR
01874  M00S01176.mst     +++|          BX6    X6+X1
01875  M00S01177.mst     +++|          LX6    12
01876  M00S01178.mst     +++|          SA6    D+6
01877  M00S01179.mst     +++|          SB4    CVA
01878  M00S01180.mst     +++|          EQ     B4,B5,PRSX  IF TRACK AND SECTOR ADDRESS
01879  M00S01181.mst     +++|          MOVE   CVAE-CVA,B6,B4
01880  M00S01182.mst     +++|          EQ     PRSX        RETURN
01881  M00S01183.mst     +++|
01882  M00S01184.mst     +++| PRS7     MESSAGE  (=C* ARGUMENT ERROR.*)
01883  M00S01185.mst     +++|          EQ     ABT3        ABORT
01884  M00S01186.mst     +++|
01885  M00S01187.mst     +++| PRS8     MESSAGE  (=C* ILLEGAL EQUIPMENT.*)
01886  M00S01188.mst     +++|          EQ     ABT3        ABORT
01887  M00S01189.mst     +++|
01888  M00S01190.mst     +++| PRSA     BX7    X6
01889  M00S01191.mst     +++|          SA7    A6
01890  M00S01192.mst     +++|          EQ     GDB2
01891  M00S01193.mst     +++|
01892  M00S01194.mst     +++| PRSB     CON    0           DEVICE TYPE - NO DEFAULT
01893  M00S01195.mst     +++| PRSC     DATA   0L0         TRACK
01894  M00S01196.mst     +++| PRSD     CON    0           SECTOR
Line S00292 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01895  M01S00292.mst4    +++| PRSE     DATA   C*        FILE SIZE = XXXXXXXXXX SECTORS.*
Line S00013 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
01896  M01S00013.252l678 +++| PRSF     VFD    24/1,18/MEFL,18/EMTS
Line S00033 Modification History
M01 (Added by) mst6
Seq #  *Modification Id* Act 
----------------------------+
01897  M01S00033.mst6    +++| PRSG     DATA   0           EST ORDINAL
Line S00027 Modification History
M01 (Added by) mst9
Seq #  *Modification Id* Act 
----------------------------+
01898  M01S00027.mst9    +++| PRSH     CON    0           MAINFRAME ID
Line S00034 Modification History
M01 (Added by) mst6
Seq #  *Modification Id* Act 
----------------------------+
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  M00S01197.mst     +++|
01984  M00S01198.mst     +++| TARG     BSS    0           MST ARGUMENT TABLE
01985  M00S01199.mst     +++| T        ARG    DZRO,TS,400B
01986  M00S01200.mst     +++| P        ARG    TP,TP,400B
01987  M00S01201.mst     +++| N        ARG    DZRO,NS,400B
01988  M00S01202.mst     +++| NW       ARG    -ONE,NW
Line S00293 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
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  M00S01203.mst     +++|          ARG
01994  M00S01204.mst     +++|
01995  M00S01205.mst     +++| TART     BSS    0           ARGUMENT TABLE FOR ADDRESS CONVERSION
01996  M00S01206.mst     +++| EQ       ARG    TEQP+1,PRSB,400B
01997  M00S01207.mst     +++| T        ARG    DZRO,PRSC,400B
01998  M00S01208.mst     +++| S        ARG    DZRO,PRSD,400B
01999  M00S01209.mst     +++|          ARG
02000  M00S01210.mst     +++|
02001  M00S01211.mst     +++|
02002  M00S01212.mst     +++| DZRO     DATA   1L0         DISPLAY CODE ZERO
02003  M00S01213.mst     +++| ONE      DATA   1           CONSTANT 1
Line S00297 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
02004  M01S00297.mst4    +++| T32      DATA   32          CONSTANT 32
02005  M00S01214.mst     +++|          SPACE  4
02006  M00S01215.mst     +++| CDV      EQU    CVA         819 SINGLE DENSITY
02007  M00S01216.mst     +++| CDW      EQU    CVA         819 DOUBLE DENSITY
Line S00001 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
02008  M01S00001.ns21000 +++| CDB      EQU    CVA         PFMD - DEMA ACCESS
Line S00002 Modification History
M01 (Added by) ns21000
M02 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02009  M02S00002.241l630 ---| CDC      EQU    CVA         PFMD - AFMD ACCESS
Line S00003 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
02010  M01S00003.241l630 +++| CDC      EQU    CVA         895
Line S00001 Modification History
M01 (Added by) 251l670
Seq #  *Modification Id* Act 
----------------------------+
02011  M01S00001.251l670 +++| CDF      EQU    CVA         887 (4KB SECTOR)
02012  M01S00002.251l670 +++| CDH      EQU    CVA         887 (16KB SECTOR)
Line S00001 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02013  M01S00001.271l716 +++| CDN      EQU    CVA         9853
Line S00001 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
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)
Line S00001 Modification History
M01 (Added by) ns2768
Seq #  *Modification Id* Act 
----------------------------+
02020  M01S00001.ns2768  +++| CEG      EQU    CVA         5838 (1X ELITE)
02021  M01S00002.ns2768  +++| CEH      EQU    CVA         5838 (1XP ELITE)
Line S00003 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
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  M00S01217.mst     +++|          SPACE  4
02035  M00S01218.mst     +++|**        TBLM - GENERATE TABLE VIA *TBL* MACRO.
02036  M00S01219.mst     +++|
02037  M00S01220.mst     +++|
02038  M00S01221.mst     +++|          PURGMAC TBLM
02039  M00S01222.mst     +++| TBLM     MACRO  EQ
Line S00001 Modification History
M01 (Added by) mst5
M02 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
02040  M02S00001.272l774 ---|          IFC    NE,*"DR_EQ"*DI*
02041  M02S00002.272l774 ---|          IFC    NE,*"DR_EQ"*DJ*
Line S00007 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
02042  M01S00007.272l774 +++|          IFC    NE,*"DRN_EQ"*DI*
02043  M01S00008.272l774 +++|          IFC    NE,*"DRN_EQ"*DJ*
Line S00003 Modification History
M01 (Added by) mst5
Seq #  *Modification Id* Act 
----------------------------+
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  M00S01223.mst     +++|          IFNE   NT_EQ,0
Line S01224 Modification History
M01 (Removed by) mst5
Seq #  *Modification Id* Act 
----------------------------+
02048  M01S01224.mst5    ---| .1       SET    NT_EQ*SL_EQ/2
Line S00006 Modification History
M01 (Added by) mst5
Seq #  *Modification Id* Act 
----------------------------+
02049  M01S00006.mst5    +++|          VFD    24/NT_EQ*SL_EQ/2
02050  M00S01225.mst     +++|          ELSE   1
Line S01226 Modification History
M01 (Removed by) mst5
Seq #  *Modification Id* Act 
----------------------------+
02051  M01S01226.mst5    ---| .1       SET    3400B
02052  M01S01227.mst5    ---|          IFC    NE,*"DR_EQ"*DI*
Line S00001 Modification History
M01 (Added by) ns2328
M02 (Removed by) mst5
Seq #  *Modification Id* Act 
----------------------------+
02053  M02S00001.mst5    ---|          IFC    NE,*"DR_EQ"*DJ*
Line S01228 Modification History
M01 (Removed by) mst1
M02 (Removed by) mst5
Seq #  *Modification Id* Act 
----------------------------+
02054  M02S01228.mst5    ---|          VFD    12/2R_EQ,18/C_EQ,30/.1
Line S00091 Modification History
M01 (Added by) mst1
M02 (Removed 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 (Removed by) mst5
Seq #  *Modification Id* Act 
----------------------------+
02056  M01S01229.mst5    ---|          ELSE   1
Line S01230 Modification History
M01 (Removed by) mst1
M02 (Removed by) mst5
Seq #  *Modification Id* Act 
----------------------------+
02057  M02S01230.mst5    ---|          VFD    12/2R_EQ,18/CVA,30/.1
Line S00092 Modification History
M01 (Added by) mst1
M02 (Removed by) mst5
Seq #  *Modification Id* Act 
----------------------------+
02058  M02S00092.mst5    ---|          VFD    12/2R_EQ,18/CVA,6/BF_EQ,24/.1
Line S00007 Modification History
M01 (Added by) mst5
Seq #  *Modification Id* Act 
----------------------------+
02059  M01S00007.mst5    +++|          VFD    24/3400B
02060  M00S01231.mst     +++|          ENDM
02061  M00S01232.mst     +++|
02062  M00S01233.mst     +++|
02063  M00S01234.mst     +++| TEQP     BSS    0           TABLE OF EQUIPMENTS
02064  M00S01235.mst     +++|          LIST   G
02065  M00S01236.mst     +++|          TBL    "MSEQ"
02066  M00S01237.mst     +++|          LIST   -G
02067  M00S01238.mst     +++|          CON    0           END OF TABLE
02068  M00S01239.mst     +++|
Line S01240 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02069  M01S01240.273l780 ---|*         NOTE - RANDOM PATTERN MUST BE LAST IN TABLE.
Line S00093 Modification History
M01 (Added by) mst1
M02 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02070  M02S00093.273l780 ---|*                NEXT TO LAST MUST IS RESERVED FOR NULL DATA.
Line S01241 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02071  M01S01241.273l780 ---|
02072  M00S01242.mst     +++| TPAT     BSS    0           TABLE OF PATTERNS.
02073  M00S01243.mst     +++|          DATA   0
02074  M00S01244.mst     +++|          DATA   -0
02075  M00S01245.mst     +++|          DATA   25252525252525252525B
02076  M00S01246.mst     +++|          DATA   52525252525252525252B
Line S00094 Modification History
M01 (Added by) mst1
Seq #  *Modification Id* Act 
----------------------------+
02077  M01S00094.mst1    +++|          DATA   0
02078  M00S01247.mst     +++|          DATA   13576420735162531625B
Line S00182 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02079  M01S00182.273l780 +++|          DATA   0
02080  M00S01248.mst     +++| TPATL    EQU    *-TPAT
02081  M00S01249.mst     +++|
02082  M00S01250.mst     +++| PRS      SPACE  4
02083  M00S01251.mst     +++|          TITLE  ADDRESS CONVERSION ROUTINES.
02084  M00S01252.mst     +++| CDE      SPACE  4
Line S01253 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02085  M01S01253.ns22000 ---|**        CDE    CONVERT EQUIPMENT *DE*, *DP* (ECS).
Line S00044 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02086  M01S00044.ns22000 +++|**        CDE - CONVERT *DE* ADDRESS.
02087  M00S01254.mst     +++|
02088  M00S01255.mst     +++|
02089  M00S01256.mst     +++| CDE      BSS    0
Line S00045 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02090  M01S00045.ns22000 +++| CDP      SPACE  4,10
02091  M01S00046.ns22000 +++|**        CDP - CONVERT *DP* ADDRESS.
Line S00298 Modification History
M01 (Added by) mst4
Seq #  *Modification Id* Act 
----------------------------+
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.
Line S00047 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
02098  M01S00047.ns22000 +++|
02099  M01S00048.ns22000 +++|
02100  M00S01257.mst     +++| CDP      BSS    0
02101  M00S01258.mst     +++|          LOC    CVA
02102  M00S01259.mst     +++| CVA      PS                 ENTRY/EXIT
Line S00014 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
02103  M01S00014.252l678 +++|          SA1    EMTS        GET EM TRACK SHIFT
02104  M01S00015.252l678 +++|          SB2    X1+10
02105  M01S00016.252l678 +++|          SB3    X1+4
02106  M00S01260.mst     +++|          MX6    -12
02107  M00S01261.mst     +++|          SA1    D+6         READ POSITION
02108  M00S01262.mst     +++|          AX1    12          EXTRACT SECTOR
02109  M00S01263.mst     +++|          BX7    -X6*X1
02110  M00S01264.mst     +++|          SX4    3777B
02111  M00S01265.mst     +++|          LX7    6           SECTOR * 101B
02112  M00S01266.mst     +++|          BX6    -X6*X1
02113  M00S01267.mst     +++|          IX3    X7+X6
02114  M00S01268.mst     +++|          AX1    12          EXTRACT TRACK
Line S01269 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
02115  M01S01269.252l678 ---|          BX2    X4*X1       TRACK * 2020B
02116  M01S01270.252l678 ---|          LX2    10
Line S00017 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
02117  M01S00017.252l678 +++|          BX2    X4*X1       TRACK * 101 * SECTOR LIMIT
02118  M01S00018.252l678 +++|          LX2    B2
02119  M00S01271.mst     +++|          BX7    X4*X1
Line S01272 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
02120  M01S01272.252l678 ---|          LX7    4
Line S00019 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
02121  M01S00019.252l678 +++|          LX7    B3
02122  M00S01273.mst     +++|          IX2    X7+X2
02123  M00S01274.mst     +++|          IX1    X2+X3
02124  M00S01275.mst     +++|          LX1    12*3        POSITION DATA
02125  M00S01276.mst     +++|          RJ     WOD         CONVERT DATA
02126  M00S01277.mst     +++|          SA1    CDEA
02127  M00S01278.mst     +++|          SA2    A1+B1
02128  M00S01279.mst     +++|          IX6    X1+X6
02129  M00S01280.mst     +++|          IX7    X2+X7
02130  M00S01281.mst     +++|          SA6    B6
02131  M00S01282.mst     +++|          SA7    B6+B1
02132  M00S01283.mst     +++|          EQ     CVA         RETURN
02133  M00S01284.mst     +++|
02134  M00S01285.mst     +++| CDEA     CON    10HA0000000. -10H0000000000
02135  M00S01286.mst     +++|          CON    10H          -10H0000000000
02136  M00S01287.mst     +++|
02137  M00S01288.mst     +++|          ERRNG  CVAE-*
02138  M00S01289.mst     +++|          LOC    *O
02139  M00S01290.mst     +++|          SPACE  4
02140  M00S01291.mst     +++|          END
cdc/nos2.source/opl.opl871/deck/mst.001.txt ยท Last modified: by 127.0.0.1