User Tools

Site Tools


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

Deck MST

21 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.mst     +++|          IDENT  MST,FET
00002  M01S00002.mst     +++|          ABS
Line S00003 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00003  M02S00003.ns22000 ---|          SST    DCH,FL,POS
00004  M01S00001.ns22000 +++|          SST    FL
Line S00004 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00005  M02S00004.mst4    ---|          ENTRY  MSADR
00006  M01S00005.mst     +++|          ENTRY  MST
00007  M01S00006.mst     +++|          ENTRY  MFL=
00008  M01S00001.252l678 +++|          ENTRY  SSJ=
00009  M01S00007.mst     +++|          SYSCOM B1
00010  M01S00008.mst     +++|*COMMENT  MST - MASS STORAGE TEST.
Line S00009 Modification History
M01 (Added by) mst
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00011  M02S00009.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1970.
00012  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00013  M01S00010.mst     +++|          TITLE  MST - MASS STORAGE TEST.
00014  M01S00011.mst     +++|          SPACE  4
00015  M01S00012.mst     +++|***       MST - MASS STORAGE TEST.
00016  M01S00013.mst     +++|*         G. R. MANSFIELD.  70/12/06.
00017  M01S00014.mst     +++|*         MODIFIED BY W. E. GOEBEL.  74/01/21.
00018  M01S00015.mst     +++|          SPACE  4
00019  M01S00016.mst     +++|***       MST IS A CENTRAL PROCESSOR DRIVEN MASS STORAGE TEST.  IT
00020  M01S00017.mst     +++|*         PERFORMS SEQUENTIAL WRITES, READS AND POSITIONS ALONG WITH
00021  M01S00018.mst     +++|*         RANDOM READS AND WRITES ON A SELECTED MASS STORAGE DEVICE.
Line S00019 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00022  M02S00019.mst4    ---|*         MST ALSO CONTAINS THE ENTRY POINT MSADR WHICH CONVERTS
Line S00020 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00023  M02S00020.mst4    ---|*         LOGICAL DISK ADDRESSES TO PHYSICAL ADDRESSES.
00024  M01S00021.mst     +++|*
00025  M01S00022.mst     +++|*         OPERATING INSTRUCTIONS.
00026  M01S00023.mst     +++|*         WHEN CALLED, MST WILL REQUEST ASSIGNMENT OF THE FILE *DISK1*.
00027  M01S00024.mst     +++|*
00028  M01S00025.mst     +++|*         SEQUENTIAL WRITE.
00029  M01S00026.mst     +++|*         RANDOM DATA IS WRITTEN SEQUENTIALLY ON THE FILE IN THIS
Line S00027 Modification History
M01 (Added by) mst
M02 (Updated by) mst9
Seq #  *Modification Id* Act 
----------------------------+
00030  M02S00027.mst9    ---|*         FORMAT -           1 WORD CONTAINING THE SECTOR NUMBER
00031  M01S00001.mst9    +++|*         FORMAT -           1 WORD CONTAINING JSN, MFID AND PRU NUMBER
00032  M01S00028.mst     +++|*                            1 WORD CONTAINING RANDOM DATA SEED
00033  M01S00029.mst     +++|*                            61 WORDS OF RANDOM DATA
00034  M01S00030.mst     +++|*                            1 WORD CHECKSUM OF ABOVE DATA
00035  M01S00031.mst     +++|*
00036  M01S00032.mst     +++|*         SEQUENTIAL READ.
00037  M01S00033.mst     +++|*         FILE IS REWOUND AND DATA IS READ BACK CHECKING SECTOR NUMBER
00038  M01S00034.mst     +++|*         AND CHECKSUM OF RANDOM DATA.
00039  M01S00035.mst     +++|*
00040  M01S00036.mst     +++|*         SEQUENTIAL POSITIONING.
00041  M01S00037.mst     +++|*         FILE IS POSITIONED ALTERNATELY TO SUCCESSIVE SECTORS
00042  M01S00038.mst     +++|*         FROM BEGINING TO END.
00043  M01S00039.mst     +++|*
00044  M01S00040.mst     +++|*         RANDOM READ.
00045  M01S00041.mst     +++|*         RANDOM SECTOR NUMBERS ARE PICKED AND THE SECTORS READ.
00046  M01S00042.mst     +++|*         THE SECTOR NUMBER IS CHECKED AND THE DATA CHECKSUM VERIFIED.
00047  M01S00043.mst     +++|*
00048  M01S00044.mst     +++|*         RANDOM WRITE.
00049  M01S00045.mst     +++|*         RANDOM SECTOR NUMBERS ARE PICKED AND THE SECTORS ARE WRITTEN.
00050  M01S00046.mst     +++|*         A SEQUENTIAL READ IS PERFORMED TO VERIFY THE WRITTEN DATA.
00051  M01S00001.mst1    +++|*
00052  M01S00002.mst1    +++|*         FOR BUFFERED DISKS THERE IS A THREE SECOND PAUSE FOLLOWING
00053  M01S00003.mst1    +++|*         EACH SECTION TO ALLOW I/O ACTIVITY TO COMPLETE ON THE
00054  M01S00004.mst1    +++|*         DISK BEFORE CONTINUING TO THE NEXT SECTION.
00055  M01S00047.mst     +++|          SPACE  4
00056  M01S00048.mst     +++|***       ARGUMENT PARAMETERS.
00057  M01S00002.ns22000 +++|*
00058  M01S00049.mst     +++|*         T      TEST SECTION (CAN BE EQUATED).
00059  M01S00050.mst     +++|*                 T=0 OR T OR OMISSION OF THIS PARAMETER WILL RUN ALL
00060  M01S00051.mst     +++|*                     SECTIONS.
00061  M01S00052.mst     +++|*                 T=1 WRITE SEQUENTIAL.
00062  M01S00053.mst     +++|*                 T=2 READ SEQUENTIAL.
00063  M01S00054.mst     +++|*                 T=3 POSITION SEQUENTIAL.
00064  M01S00055.mst     +++|*                 T=4 RANDOM READ.
00065  M01S00056.mst     +++|*                 T=5 RANDOM WRITE.
00066  M01S00003.ns22000 +++|*
00067  M01S00057.mst     +++|*         P      TEST PATTERN (CAN BE EQUATED).
00068  M01S00058.mst     +++|*                 P=0 ALL ZEROS PATTERN.
00069  M01S00059.mst     +++|*                 P=1 ALL ONES PATTERN.
00070  M01S00060.mst     +++|*                 P=2 25252525252525252525B PATTERN.
00071  M01S00061.mst     +++|*                 P=3 52525252525252525252B PATTERN.
Line S00062 Modification History
M01 (Added by) mst
M02 (Updated by) mst1
Seq #  *Modification Id* Act 
----------------------------+
00072  M02S00062.mst1    ---|*                 P=4 OR P OR OMISSION OF THIS PARAMETER WILL ENABLE
Line S00005 Modification History
M01 (Added by) mst1
M02 (Updated by) mst9
Seq #  *Modification Id* Act 
----------------------------+
00073  M02S00005.mst9    ---|*                 P=4 DO NOT GENERATE OR CHECK DATA.  SECTOR NUMBERS
Line S00006 Modification History
M01 (Added by) mst1
M02 (Updated by) mst9
Seq #  *Modification Id* Act 
----------------------------+
00074  M02S00006.mst9    ---|*                     ARE GENERATED AND CHECKED.
00075  M01S00002.mst9    +++|*                 P=4 DO NOT GENERATE OR CHECK DATA.  THE SECTOR
00076  M01S00003.mst9    +++|*                     NUMBER, JSN AND MFID IS GENERATED AND CHECKED
00077  M01S00004.mst9    +++|*                     FOR EACH SECTOR.
00078  M01S00007.mst1    +++|*                 P=5 OR P OR OMISSION OF THIS PARAMETER WILL ENABLE
00079  M01S00063.mst     +++|*                     RANDOM PATTERN.
00080  M01S00001.273l780 +++|*                 P=6 DO NOT GENERATE OR CHECK DATA.  DO NOT COPY DATA
00081  M01S00002.273l780 +++|*                     BETWEEN THE CIO BUFFER AND THE WORKING BUFFER.
Line S00003 Modification History
M01 (Added by) 273l780
M02 (Updated by) mst9
Seq #  *Modification Id* Act 
----------------------------+
00082  M02S00003.mst9    ---|*                     SECTOR NUMBERS ARE GENERATED AND CHECKED.
00083  M01S00005.mst9    +++|*                     THE SECTOR NUMBER, JSN AND MFID IS GENERATED AND
00084  M01S00006.mst9    +++|*                     CHECKED FOR EACH SECTOR.
00085  M01S00004.ns22000 +++|*
00086  M01S00064.mst     +++|*         N      NUMBER OF SECTORS (CAN BE EQUATED).
00087  M01S00065.mst     +++|*                 N=0 GIVES ARGUMENT ERROR MESSAGE AND PROGRAM ABORT.
Line S00066 Modification History
M01 (Added by) mst
M02 (Updated by) mst6
Seq #  *Modification Id* Act 
----------------------------+
00088  M02S00066.mst6    ---|*                 N=XXXX WILL ENABLE THE TEST TO BE RUN ON XXXX SECTORS.
Line S00067 Modification History
M01 (Added by) mst
M02 (Updated by) mst6
Seq #  *Modification Id* Act 
----------------------------+
00089  M02S00067.mst6    ---|*                     (BE CAREFUL THAT TRACK LIMIT IS NOT EXCEEDED)
Line S00068 Modification History
M01 (Added by) mst
M02 (Updated by) mst6
Seq #  *Modification Id* Act 
----------------------------+
00090  M02S00068.mst6    ---|*                 N   GIVES DEFAULT VALUE (SEE TABLE PRSA).
00091  M01S00001.mst6    +++|*                 N=XXXXXXX WILL RUN THE TEST ON XXXXXXX SECTORS.
00092  M01S00002.mst6    +++|*                   IF TOO LARGE A VALUE OF XXXXXXX IS SPECIFIED,
00093  M01S00003.mst6    +++|*                   A TRACK LIMIT WILL RESULT.
00094  M01S00004.mst6    +++|*                 N=* WILL TEST ALL AVAILABLE SECTORS.
00095  M01S00005.mst6    +++|*                   IF SPECIFIED ON A DEVICE WITH OTHER ACTIVITY,
00096  M01S00006.mst6    +++|*                   A TRACK LIMIT MAY RESULT.
00097  M01S00005.ns22000 +++|*
00098  M01S00069.mst     +++|*         NW     NO WRITE PERFORMED AT BEGINING OF TEST.
00099  M01S00001.mst4    +++|*
00100  M01S00002.mst4    +++|*         TL     TRANSFER LENGTH IN SECTORS FOR RANDOM I/O.
00101  M01S00003.mst4    +++|*                DEFAULT IS 10B SECTORS.
00102  M01S00004.mst4    +++|*
00103  M01S00005.mst4    +++|*         NV     IF SPECIFIED, DO NOT PERFORM SEQUENTIAL READ AFTER
00104  M01S00006.mst4    +++|*                RANDOM WRITE.
00105  M01S00007.mst4    +++|*
00106  M01S00008.mst4    +++|*         RO     IF SPECIFIED, SIMULATE ROLLIN/ROLLOUT I/O ON BUFFERED
00107  M01S00009.mst4    +++|*                DEVICES.
00108  M01S00010.mst4    +++|*
00109  M01S00011.mst4    +++|*         IO     IF SPECIFIED, GIVES THE NUMBER OF I/O-S TO BE
00110  M01S00012.mst4    +++|*                PERFORMED ON THE DEVICE.  IF *IO* IS NOT SPECIFIED,
00111  M01S00013.mst4    +++|*                THE VALUE FOR NUMBER OF I/O-S IS COMPUTED FROM THE
00112  M01S00014.mst4    +++|*                TRANSFER LENGTH.
00113  M01S00070.mst     +++|*
00114  M01S00071.mst     +++|*         NOTE:
00115  M01S00072.mst     +++|*                SENSE SWITCH 2 - IF SET WILL ABORT ON ERRORS.
00116  M01S00073.mst     +++|*                SENSE SWITCH 3 - IF SET WILL CONTINUE AT END OF TEST.
00117  M01S00074.mst     +++|*                SENSE SWITCH 4 - IF SET WILL REPEAT CURRENT SECTION.
00118  M01S00075.mst     +++|*
00119  M01S00076.mst     +++|*                ISSUING A CALL OF MST FROM THE CONSOLE WILL
00120  M01S00077.mst     +++|*                SELECT ALL SECTIONS, RANDOM PATTERN, DEFAULT SECTOR
00121  M01S00078.mst     +++|*                VALUE, PAUSE ON ERROR AND STOP AT END OF TEST.
00122  M01S00079.mst     +++|*                TO CONTINUE ON ERRORS TYPE *GO.*.
00123  M01S00080.mst     +++|*
00124  M01S00081.mst     +++| MST      SPACE  4
00125  M01S00082.mst     +++|***       DAYFILE MESSAGES.
00126  M01S00083.mst     +++|*
00127  M01S00084.mst     +++|*         * ARGUMENT ERROR.* = ONE OF PARAMETERS IS IN ERROR.
00128  M01S00085.mst     +++|*
00129  M01S00086.mst     +++|*         * ILLEGAL EQUIPMENT.* = THE EQUIPMENT WHICH WAS ASSIGNED IN
00130  M01S00087.mst     +++|*                            RESPONSE TO THE DISPLAY REQUEST IS NOT
00131  M01S00088.mst     +++|*                            RECOGNIZED AS BEING A DEVICE UPON WHICH
00132  M01S00089.mst     +++|*                            THE TEST MAY BE RUN.
00133  M01S00090.mst     +++|*
00134  M01S00091.mst     +++|*         * SEQUENTIAL WRITE.* = THIS TEST SECTION IS BEING EXECUTED.
00135  M01S00092.mst     +++|*
00136  M01S00093.mst     +++|*         * SEQUENTIAL READ.* = THIS TEST SECTION IS BEING EXECUTED.
00137  M01S00094.mst     +++|*
00138  M01S00095.mst     +++|*         * SEQUENTIAL POSITIONING.* = THIS SECTION IS BEING EXECUTED.
00139  M01S00096.mst     +++|*
00140  M01S00097.mst     +++|*         * RANDOM READ.* =  THIS TEST SECTION IS BEING EXECUTED.
00141  M01S00098.mst     +++|*
00142  M01S00099.mst     +++|*         * RANDOM WRITE.* = THIS TEST SECTION IS BEING EXECUTED.
00143  M01S00100.mst     +++|*
Line S00101 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00144  M02S00101.ns22000 ---|*         * MST TRANSFER RATE = XXXXX.XXXX KC.* = THE DISK TRANSFER
00145  M01S00006.ns22000 +++|*         *MST TRANSFER RATE = XXXXXX.XXX KC.* = THE DISK TRANSFER
00146  M01S00102.mst     +++|*                            RATE FOR THE PREVIOUS SECTION WAS
Line S00103 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00147  M02S00103.ns22000 ---|*                            XXXXX.XXXX KILO CHARACTERS PER SECOND.
00148  M01S00007.ns22000 +++|*                            XXXXXX.XXX KILO-CHARACTERS PER SECOND.
00149  M01S00104.mst     +++|*
00150  M01S00015.mst4    +++|*         *  NUMBER OF I/O-S = XXXXXXXXXX.* = THE NUMBER OF IO PAIRS
00151  M01S00016.mst4    +++|*                            SPECIFIED WITH THE *IO* PARAMETER OR
00152  M01S00017.mst4    +++|*                            COMPUTED FROM THE *NL* PARAMETER.
00153  M01S00018.mst4    +++|*
00154  M01S00019.mst4    +++|*         *    IO PER SECONDS = XXXXXX.XXX.* = NUMBER OF IO-S PERFORMED
00155  M01S00020.mst4    +++|*                            PER SECOND.
00156  M01S00021.mst4    +++|*
00157  M01S00022.mst4    +++|*         *      FILE SIZE = XXXXXXXXXX SECTORS.* = SIZE OF THE DATA
00158  M01S00023.mst4    +++|*                            FILE IN SECTORS.*
00159  M01S00024.mst4    +++|*
00160  M01S00105.mst     +++|*         * ILLEGAL EOF DETECTED.* = AN EOF WAS DETECTED BEFORE THE
00161  M01S00106.mst     +++|*                            LAST SECTOR ON THE FILE.
00162  M01S00107.mst     +++|*
00163  M01S00108.mst     +++|*         * NO EOF DETECTED ON LAST READ.* = NO EOF ON THE LAST SECTOR.
00164  M01S00109.mst     +++|*
00165  M01S00110.mst     +++|*         * JOB ABORTED.* = ABNORMAL TERMINATION OF MST.
00166  M01S00111.mst     +++|*
Line S00112 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00167  M02S00112.ns22000 ---|*         * EQXX DATA ERROR AT -PHYSICAL POSITION.-*
Line S00113 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00168  M02S00113.ns22000 ---|*         * EQXX RXXXXXXX,TYYYY,SZZZZ.*
00169  M01S00008.ns22000 +++|*         *EQXXX,DATA ERROR AT -PHYSICAL POSITION-.*
00170  M01S00009.ns22000 +++|*         *EQXXX,RXXXXXXX,TYYYY,SZZZZ.*
00171  M01S00114.mst     +++|*                            DATA ERRORS HAVE BEEN DETECTED ON A
00172  M01S00115.mst     +++|*                            SECTOR WHICH WAS READ.
00173  M01S00116.mst     +++|*
Line S00117 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00174  M02S00117.ns22000 ---|*         * EQXX POS. ERROR AT -PHYSICAL POSITION.-*
Line S00118 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00175  M02S00118.ns22000 ---|*         * EQXX RXXXXXXX,TYYYY,SZZZZ.*
00176  M01S00010.ns22000 +++|*         *EQXXX,POS. ERROR AT -PHYSICAL POSITION-.*
00177  M01S00011.ns22000 +++|*         *EQXXX,RXXXXXXX,TYYYY,SZZZZ.*
00178  M01S00119.mst     +++|*                            THE SECTOR WHICH WAS READ WAS NOT
00179  M01S00120.mst     +++|*                            THE CORRECT SECTOR.  THE POSITION GIVEN
00180  M01S00121.mst     +++|*                            IS THE POSITION OF THE SECTOR READ.
00181  M01S00122.mst     +++|*
Line S00123 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00182  M02S00123.ns22000 ---|*         * EQXX DEV.-TYPE ERR--PHYSICAL POSITION.-*
Line S00124 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00183  M02S00124.ns22000 ---|*         * EQXX RXXXXXXX,TYYYY,SZZZZ.*
00184  M01S00012.ns22000 +++|*         *EQXXX,DEV.-TYPE ERR--PHYSICAL POSITION-.*
00185  M01S00013.ns22000 +++|*         *EQXXX,RXXXXXXX,TYYYY,SZZZZ.*
00186  M01S00125.mst     +++|*                            CIO HAS DETECTED ONE OF THE FOLLOWING
00187  M01S00126.mst     +++|*                            ERRORS WHICH APPEAR IN THE -TYPE ERR-
00188  M01S00127.mst     +++|*                            POSITION.
00189  M01S00128.mst     +++|*                    -TYPE ERR- = PARITY ER.  -- PARITY ERROR
00190  M01S00129.mst     +++|*                                 ADDR. ERR.  -- ADDRESS ERROR
00191  M01S00130.mst     +++|*                                 STATUS ER.  -- DEVICE STATUS ERROR
00192  M01S00131.mst     +++|*                                 81 FNC REJ  -- 6681 FUNCTION REJECT
00193  M01S00132.mst     +++|*                                 RESERVED    -- DEVICE RESERVED
00194  M01S00133.mst     +++|*                                 NOT READY   -- DEVICE NOT READY
00195  M01S00134.mst     +++|*
Line S00135 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00196  M02S00135.ns22000 ---|*         * EQXX EXP  POSITION -PHYSICAL POSITION.-*
Line S00136 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00197  M02S00136.ns22000 ---|*         * EQXX RXXXXXXX,TYYYY,SZZZZ.*
00198  M01S00014.ns22000 +++|*         *EQXXX,EXP. POSITION -PHYSICAL POSITION-.*
00199  M01S00015.ns22000 +++|*         *EQXXX,RXXXXXXX,TYYYY,SZZZZ.*
00200  M01S00137.mst     +++|*                            WHEN A POSITION OR DEVICE ADDRESS ERROR
00201  M01S00138.mst     +++|*                            OCCURES THE EXPECTED POSITION IS GIVEN
00202  M01S00139.mst     +++|*                            BY THIS MESSAGE.
00203  M01S00140.mst     +++|*
Line S00141 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00204  M02S00141.ns22000 ---|*         * EQXX DATA EXP  WWW,EEEEEEEEEEEEEEEEEEEE*
Line S00142 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00205  M02S00142.ns22000 ---|*         * EQXX DATA READ WWW,RRRRRRRRRRRRRRRRRRRR*
Line S00143 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00206  M02S00143.ns22000 ---|*         * EQXX DATA DIFF WWW,DDDDDDDDDDDDDDDDDDDD*
Line S00144 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00207  M02S00144.ns22000 ---|*         * DATA OK.*
00208  M01S00016.ns22000 +++|*         *EQXXX,DATA EXP  WWW,EEEEEEEEEEEEEEEEEEEE*
00209  M01S00017.ns22000 +++|*         *EQXXX,DATA READ WWW,RRRRRRRRRRRRRRRRRRRR*
00210  M01S00018.ns22000 +++|*         *EQXXX,DATA DIFF WWW,DDDDDDDDDDDDDDDDDDDD*
00211  M01S00019.ns22000 +++|*         *DATA OK.*  (OPTIONAL - SEE BELOW)
00212  M01S00145.mst     +++|*                            WHEN A DATA ERROR OR DEVICE PARITY ERROR IS
00213  M01S00146.mst     +++|*                            DETECTED THE DATA ON THE SECTOR IS CHECKED
00214  M01S00147.mst     +++|*                            AND THE ERRORS REPORTED.  IF NO ERRORS ARE
Line S00148 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00215  M02S00148.ns22000 ---|*                            FOUND THE MESSAGE * DATA OK.* IS ISSUED.
00216  M01S00020.ns22000 +++|*                            FOUND THE MESSAGE *DATA OK.* IS ISSUED.
00217  M01S00149.mst     +++|*                                 WWW IS THE WORD NUMBER IN THE SECTOR.
00218  M01S00150.mst     +++|*                                 EE-----E IS THE EXPECTED DATA.
00219  M01S00151.mst     +++|*                                 RR-----R IS THE DATA READ.
00220  M01S00152.mst     +++|*                                 DD-----D IS THE DIFFERNCE.
00221  M01S00153.mst     +++|*
Line S00154 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00222  M02S00154.ns22000 ---|*         * MST ERROR - ENTER GO OR DROP.* = MST HAS DETECTED AN
00223  M01S00021.ns22000 +++|*         * MST ERROR - GO / DROP.* = *MST* HAS DETECTED AN
00224  M01S00155.mst     +++|*                            IRRECOVERABLE READ ERROR.
00225  M01S00156.mst     +++|*
00226  M01S00157.mst     +++|*         * END MASS STORAGE TEST.* = END OF TEST.
00227  M01S00158.mst     +++|          SPACE  4
00228  M01S00022.ns22000 +++|**        COMMON DECKS.
00229  M01S00023.ns22000 +++|
00230  M01S00024.ns22000 +++|
00231  M01S00159.mst     +++|*CALL     COMCMAC
00232  M01S00160.mst     +++|*CALL     COMCCMD
00233  M01S00007.mst6    +++|*CALL     COMSCIO
00234  M01S00161.mst     +++|*CALL     COMSMSP
00235  M01S00162.mst     +++|          SPACE  4
00236  M01S00163.mst     +++|****      ASSEMBLY CONSTANTS.
00237  M01S00164.mst     +++|
00238  M01S00165.mst     +++|
00239  M01S00166.mst     +++| DBUFL    EQU    4001B
00240  M01S00167.mst     +++|****
00241  M01S00168.mst     +++|          TITLE  DATA.
00242  M01S00169.mst     +++| FET      SPACE  4
00243  M01S00170.mst     +++|*         FILE FET.
00244  M01S00171.mst     +++|
00245  M01S00172.mst     +++|
00246  M01S00173.mst     +++|          ORG    110B
00247  M01S00174.mst     +++| FET      BSS    0
00248  M01S00175.mst     +++| D        BSS    0
00249  M01S00176.mst     +++| DISK1    RFILEB DBUF,DBUFL,(FET=8),(DTY=2RMS)
00250  M01S00025.ns22000 +++|
00251  M01S00177.mst     +++|*         DATA STORAGE.
00252  M01S00178.mst     +++|
00253  M01S00179.mst     +++|
00254  M01S00180.mst     +++| FL       CON    0           ORIGINAL FIELD LENGTH
00255  M01S00181.mst     +++| NS       CON    10000B      NUMBER OF SECTORS
00256  M01S00182.mst     +++| SM       CON    7777B       SECTOR MASK
Line S00183 Modification History
M01 (Added by) mst
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00257  M02S00183.241l630 ---| NW       CON    0           NO SEQUENTIAL WRITE AT BEGINING OF TEST
00258  M01S00001.241l630 +++| NW       CON    0           NO SEQUENTIAL WRITE AT BEGINNING OF TEST
00259  M01S00184.mst     +++| TS       CON    0L0         TEST SECTION TO BE EXECUTED
Line S00185 Modification History
M01 (Added by) mst
M02 (Updated by) mst1
Seq #  *Modification Id* Act 
----------------------------+
00260  M02S00185.mst1    ---| TP       CON    0L4         TEST PATTERN TO BE USED
00261  M01S00008.mst1    +++| TP       CON    0L5         DEFAULT TEST PATTERN
00262  M01S00186.mst     +++| ST       CON    0           START TIME
00263  M01S00187.mst     +++| ET       CON    0           ENDING TIME
00264  M01S00009.mst1    +++| BD       CON    0           BUFFERED DEVICE FLAG
00265  M01S00010.mst1    +++| ND       CON    0           NULL DATA FLAG
00266  M01S00004.273l780 +++| NT       CON    1           NO DATA TRANSFER FLAG
Line S00025 Modification History
M01 (Added by) mst4
M02 (Updated by) mst8
Seq #  *Modification Id* Act 
----------------------------+
00267  M02S00025.mst8    ---| TL       CON    0L1         TRANSFER LENGTH
00268  M01S00001.mst8    +++| TL       CON    0L10B       TRANSFER LENGTH
00269  M01S00026.mst4    +++| NV       CON    0           NO VERIFICATION AFTER RANDOM WRITE FLAG
00270  M01S00027.mst4    +++| RO       CON    0           ROLLOUT SIMULATION FLAG
00271  M01S00028.mst4    +++| IO       CON    0           NUMBER OF I/O-S
00272  M01S00007.mst9    +++| JN       CON    0           24/JSN, 12/MAINFRAME ID, 24/0
00273  M01S00002.252l678 +++| EMTS     VFD    1/1,59/0    EXTENDED MEMORY TRACK SHIFT
00274  M01S00003.252l678 +++|
00275  M01S00004.252l678 +++|*         SPECIAL ENTRY POINTS.
00276  M01S00005.252l678 +++|
00277  M01S00006.252l678 +++| SSJ=     EQU    0
Line S00188 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00278  M02S00188.mst4    ---|          TITLE  MSADR.
Line S00189 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00279  M02S00189.mst4    ---|***       MSADR  (EQ=AA,T=YYYY,S=ZZZZ).
Line S00190 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00280  M02S00190.mst4    ---|*                CONVERTS A LOGICAL TRACK AND SECTOR ADDRESS ON
Line S00191 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00281  M02S00191.mst4    ---|*         DEVICE TYPE *AA* TO A PHYSICAL ADDRESS.
Line S00192 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00282  M02S00192.mst4    ---|
Line S00193 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00283  M02S00193.mst4    ---|
Line S00194 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00284  M02S00194.mst4    ---| MSADR    SB1    1
Line S00195 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00285  M02S00195.mst4    ---|          SB7    1
Line S00196 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00286  M02S00196.mst4    ---|          RJ     PRS
Line S00197 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00287  M02S00197.mst4    ---|          SB6    MSAB
Line S00198 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00288  M02S00198.mst4    ---|          RJ     CVA         CONVERT ADDRESS
Line S00199 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00289  M02S00199.mst4    ---|          MESSAGE  MSAA
Line S00200 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00290  M02S00200.mst4    ---|          ENDRUN
Line S00201 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00291  M02S00201.mst4    ---|
Line S00202 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00292  M02S00202.mst4    ---|
Line S00203 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00293  M02S00203.mst4    ---| MSAA     DATA   10H CONVERTED
Line S00204 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00294  M02S00204.mst4    ---|          DATA   10H ADDRESS
Line S00205 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00295  M02S00205.mst4    ---| MSAB     CON    0,0,0
00296  M01S00206.mst     +++|          TITLE  MAIN PROGRAM.
00297  M01S00207.mst     +++| MST      SPACE  4
00298  M01S00208.mst     +++|**        MST - MAIN PROGRAM.
00299  M01S00209.mst     +++|
00300  M01S00210.mst     +++|
00301  M01S00211.mst     +++| MST      SB1    1           (B1) = 1
00302  M01S00212.mst     +++|          SB7    B0
00303  M01S00213.mst     +++|          SX6    A0
00304  M01S00214.mst     +++|          SA6    FL
00305  M01S00215.mst     +++|          RJ     PRS         PRESET
00306  M01S00216.mst     +++| MST1     SA1    NW
00307  M01S00217.mst     +++|          NZ     X1,MST2     IF NO WRITE
00308  M01S00218.mst     +++|          RJ     WSQ         WRITE SEQUENTIAL
00309  M01S00011.mst1    +++|          RJ     WIC         WAIT I/O COMPLETE
00310  M01S00219.mst     +++| MST2     SA1    TS
00311  M01S00220.mst     +++|          ZR     X1,MST3     IF ALL SECTIONS SELECTED
00312  M01S00221.mst     +++|          SB5    X1-1
00313  M01S00222.mst     +++|          ZR     B5,MST7
00314  M01S00223.mst     +++|          SB2    3
00315  M01S00224.mst     +++|          GT     B5,B2,MST6
00316  M01S00225.mst     +++|          EQ     B5,B2,MST5
00317  M01S00226.mst     +++|          GT     B5,B1,MST4
00318  M01S00227.mst     +++| MST3     RJ     RSQ         READ SEQUENTIAL
00319  M01S00012.mst1    +++|          RJ     WIC         WAIT I/O COMPLETE
00320  M01S00228.mst     +++|          SA1    TS
00321  M01S00229.mst     +++|          NZ     X1,MST7
00322  M01S00230.mst     +++| MST4     RJ     POS         POSITION SEQUENTIAL
00323  M01S00013.mst1    +++|          RJ     WIC         WAIT I/O COMPLETE
00324  M01S00231.mst     +++|          SA1    TS
00325  M01S00232.mst     +++|          NZ     X1,MST7
00326  M01S00233.mst     +++| MST5     RJ     RRD         READ RANDOM
00327  M01S00014.mst1    +++|          RJ     WIC         WAIT I/O COMPLETE
00328  M01S00234.mst     +++|          SA1    TS
00329  M01S00235.mst     +++|          NZ     X1,MST7
00330  M01S00236.mst     +++| MST6     RJ     WRD         WRITE RANDOM
00331  M01S00015.mst1    +++|          RJ     WIC         WAIT I/O COMPLETE
00332  M01S00029.mst4    +++|          SA1    NV
00333  M01S00030.mst4    +++|          NZ     X1,MST7     IF NO VERIFICATION REQUIRED
00334  M01S00237.mst     +++|          RJ     RSQ         READ SEQUENTIAL
00335  M01S00238.mst     +++| MST7     SA1    B0
00336  M01S00239.mst     +++|          LX1    59-8
Line S00240 Modification History
M01 (Added by) mst
M02 (Updated by) mst1
Seq #  *Modification Id* Act 
----------------------------+
00337  M02S00240.mst1    ---|          NG     X1,MST1     IF TEST TO CONTINUE
Line S00241 Modification History
M01 (Added by) mst
M02 (Updated by) mst1
Seq #  *Modification Id* Act 
----------------------------+
00338  M02S00241.mst1    ---|          MESSAGE (=C* END MASS STORAGE TEST.*)
00339  M01S00016.mst1    +++|          PL     X1,MST8     IF REPEAT TEST NOT SET
00340  M01S00017.mst1    +++|          RJ     WIC         WAIT I/O COMPLETE
00341  M01S00018.mst1    +++|          EQ     MST1        CONTINUE
00342  M01S00019.mst1    +++|
00343  M01S00020.mst1    +++| MST8     MESSAGE (=C* END MASS STORAGE TEST.*)
00344  M01S00242.mst     +++|          ENDRUN
00345  M01S00243.mst     +++|
00346  M01S00244.mst     +++| MSTA     CON    0           TEMPORARY USED BY RSQ AND RRD
00347  M01S00245.mst     +++|          TITLE  TEST SECTIONS.
Line S00246 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00348  M02S00246.mst4    ---| WSQ      SPACE  4
00349  M01S00031.mst4    +++| WSQ      SPACE  4,15
00350  M01S00247.mst     +++|**        WSQ - WRITE SEQUENTIAL.
00351  M01S00248.mst     +++|*
Line S00249 Modification History
M01 (Added by) mst
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00352  M02S00249.273l780 ---|*         ENTRY  NONE.
00353  M01S00005.273l780 +++|*         USES   X - 0, 1, 2, 4, 5, 6, 7.
00354  M01S00006.273l780 +++|*                A - 1, 5, 6, 7.
00355  M01S00250.mst     +++|*
Line S00251 Modification History
M01 (Added by) mst
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00356  M02S00251.273l780 ---|*         EXIT   NONE.
Line S00252 Modification History
M01 (Added by) mst
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00357  M02S00252.273l780 ---|*
Line S00253 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
M03 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00358  M03S00253.273l780 ---|*         CALLS  GDB, MEM, MES, WTW=, CIO=.
Line S00032 Modification History
M01 (Added by) mst4
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00359  M02S00032.273l780 ---|*         USES   X - 0, 1, 4, 5, 6, 7.
Line S00033 Modification History
M01 (Added by) mst4
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00360  M02S00033.273l780 ---|*                A - 1, 5, 6, 7.
Line S00034 Modification History
M01 (Added by) mst4
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00361  M02S00034.273l780 ---|*                B - NONE.
Line S00035 Modification History
M01 (Added by) mst4
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00362  M02S00035.273l780 ---|*                                                                                                                                  *
Line S00036 Modification History
M01 (Added by) mst4
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00363  M02S00036.273l780 ---|*         CALLS  CKS, CTR, GDB, MEM, MES.
00364  M01S00007.273l780 +++|*         CALLS  AIP, CKS, CTR, GDB, MEM, MES.
00365  M01S00037.mst4    +++|*
00366  M01S00038.mst4    +++|*         MACROS REWIND, RTIME, WRITEF, WRITEW.
00367  M01S00254.mst     +++|
00368  M01S00255.mst     +++|
00369  M01S00256.mst     +++| WSQ      SUBR               ENTRY/EXIT
00370  M01S00039.mst4    +++|          SX6    1           SET SECTORS TO CHECK
00371  M01S00040.mst4    +++|          SA6    CKSI
00372  M01S00257.mst     +++|          SA1    FL
00373  M01S00258.mst     +++|          RJ     MEM         REQUEST MEMORY
00374  M01S00259.mst     +++| WSQ1     REWIND D,R
00375  M01S00260.mst     +++|          SX1    =C* SEQUENTIAL WRITE.*
00376  M01S00261.mst     +++|          RJ     MES         SEND MESSAGE
00377  M01S00262.mst     +++|          SA5    NS          NUMBER OF SECTORS TO WRITE
00378  M01S00263.mst     +++|          BX0    X5
00379  M01S00021.mst1    +++|          BX6    X5          SAVE SECTOR COUNT
00380  M01S00022.mst1    +++|          SA6    CTRB
00381  M01S00264.mst     +++|          SX5    B1
00382  M01S00265.mst     +++|          RTIME  ST
Line S00266 Modification History
M01 (Added by) mst
M02 (Updated by) mst9
Seq #  *Modification Id* Act 
----------------------------+
00383  M02S00266.mst9    ---| WSQ2     SA1    TP          GENERATE SECTOR TO WRITE
Line S00267 Modification History
M01 (Added by) mst
M02 (Updated by) mst9
Seq #  *Modification Id* Act 
----------------------------+
00384  M02S00267.mst9    ---|          BX7    X5
00385  M01S00008.mst9    +++| WSQ2     SA2    JN          JSN AND MFID
00386  M01S00009.mst9    +++|          SA1    TP          GENERATE SECTOR TO WRITE
00387  M01S00010.mst9    +++|          BX7    X2+X5
00388  M01S00268.mst     +++|          BX6    X1
00389  M01S00269.mst     +++|          SA7    SBUF
00390  M01S00270.mst     +++|          SA6    SBUF+1
00391  M01S00271.mst     +++|          RJ     GDB         GENERATE DATA BUFFER
00392  M01S00272.mst     +++|          SA7    TP
Line S00273 Modification History
M01 (Added by) mst
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00393  M02S00273.273l780 ---|          WRITEW D,SBUF,100B
Line S00274 Modification History
M01 (Added by) mst
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00394  M02S00274.273l780 ---|          SX4    B0
Line S00275 Modification History
M01 (Added by) mst
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00395  M02S00275.273l780 ---|          RJ     CKS         CKECK FOR CIO ERROR
00396  M01S00008.273l780 +++|          SX2    D           SET FET ADDRESS
00397  M01S00009.273l780 +++|          SA1    NT
00398  M01S00010.273l780 +++|          ZR     X1,WQS3     IF NO DATA TRANSFER
00399  M01S00011.273l780 +++|          WRITEW X2,SBUF,100B
00400  M01S00012.273l780 +++|          EQ     WQS4        CHECK FOR CIO ERROR
00401  M01S00013.273l780 +++|
00402  M01S00014.273l780 +++| WQS3     RJ     AIP         ADVANCE *IN* POINTER
00403  M01S00015.273l780 +++| WQS4     SX4    B0
00404  M01S00016.273l780 +++|          RJ     CKS         CHECK FOR CIO ERROR
00405  M01S00276.mst     +++|          SX6    B1+
00406  M01S00277.mst     +++|          IX5    X5+X6       ADVANCE SECTOR COUNTER
00407  M01S00278.mst     +++|          IX0    X0-X6
00408  M01S00279.mst     +++|          NZ     X0,WSQ2     IF MORE SECTORS TO WRITE
00409  M01S00280.mst     +++|          WRITEF D,R
00410  M01S00281.mst     +++|          RJ     CTR         COMPUTE TRANSFER RATE
00411  M01S00282.mst     +++|          SA1    B0
00412  M01S00283.mst     +++|          LX1    59-9
00413  M01S00284.mst     +++|          NG     X1,WSQ1     IF REPEAT SECTION SET
00414  M01S00285.mst     +++|          EQ     WSQX        RETURN
Line S00286 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00415  M02S00286.mst4    ---| RSQ      SPACE  4
00416  M01S00041.mst4    +++| RSQ      SPACE  4,15
Line S00287 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00417  M02S00287.ns22000 ---|**        RSQ    READ SEQUENTIAL.
00418  M01S00026.ns22000 +++|**        RSQ - READ SEQUENTIAL.
00419  M01S00288.mst     +++|*
Line S00289 Modification History
M01 (Added by) mst
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00420  M02S00289.273l780 ---|*         ENTRY  NONE.
00421  M01S00017.273l780 +++|*         USES   X - 0, 1, 2, 4, 5, 6, 7.
00422  M01S00018.273l780 +++|*                A - 1, 5, 6, 7.
00423  M01S00290.mst     +++|*
Line S00291 Modification History
M01 (Added by) mst
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00424  M02S00291.273l780 ---|*         EXIT   NONE.
Line S00292 Modification History
M01 (Added by) mst
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00425  M02S00292.273l780 ---|*
Line S00293 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
M03 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00426  M03S00293.273l780 ---|*         CALLS  ABT, CIO=, CKS, MEM, MES, MSG=, RDW=.
Line S00042 Modification History
M01 (Added by) mst4
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00427  M02S00042.273l780 ---|*         USES   X - 0, 1, 2, 4, 5, 6, 7.
Line S00043 Modification History
M01 (Added by) mst4
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00428  M02S00043.273l780 ---|*                A - 1, 5, 6, 7.
Line S00044 Modification History
M01 (Added by) mst4
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00429  M02S00044.273l780 ---|*                B - NONE.
Line S00045 Modification History
M01 (Added by) mst4
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00430  M02S00045.273l780 ---|*
Line S00046 Modification History
M01 (Added by) mst4
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00431  M02S00046.273l780 ---|*         CALLS  ABT, CKS, CTR, MEM, MES.
00432  M01S00019.273l780 +++|*         CALLS  ABT, AOP, CKS, CTR, MEM, MES.
00433  M01S00047.mst4    +++|*
00434  M01S00048.mst4    +++|*         MACROS MESSAGE, READ, READW, REWIND, RTIME.
00435  M01S00294.mst     +++|
00436  M01S00295.mst     +++|
00437  M01S00296.mst     +++| RSQ      SUBR               ENTRY/EXIT
00438  M01S00049.mst4    +++|          SX6    1           SET SECTORS TO CHECK
00439  M01S00050.mst4    +++|          SA6    CKSI
00440  M01S00297.mst     +++|          SA1    FL
00441  M01S00298.mst     +++|          RJ     MEM         REQUEST MEMORY
00442  M01S00299.mst     +++| RSQ1     REWIND D,R
00443  M01S00300.mst     +++|          SX1    =C* SEQUENTIAL READ.*
00444  M01S00301.mst     +++|          RJ     MES         SEND MESSAGE
00445  M01S00302.mst     +++|          SA5    NS          NUMBER OF SECTORS
00446  M01S00303.mst     +++|          BX0    X5
00447  M01S00023.mst1    +++|          BX6    X5          SAVE SECTOR COUNT
00448  M01S00024.mst1    +++|          SA6    CTRB
00449  M01S00304.mst     +++|          SX5    B0
00450  M01S00305.mst     +++|          RTIME  ST
00451  M01S00306.mst     +++| RSQ2     READ   D
Line S00307 Modification History
M01 (Added by) mst
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00452  M02S00307.273l780 ---| RSQ3     READW  D,SBUF,100B
Line S00308 Modification History
M01 (Added by) mst
M02 (Updated by) mst3
M03 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00453  M03S00308.273l780 ---|          NZ     X1,RSQ5     IF EOF DETECTED
Line S00309 Modification History
M01 (Added by) mst
M02 (Updated by) mst3
M03 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00454  M03S00309.273l780 ---|          ZR     X0,RSQ4     IF EOF EXPECTED
Line S00001 Modification History
M01 (Added by) mst3
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00455  M02S00001.273l780 ---|          ZR     X1,RSQ3.1   IF NO EOR/EOF DETECTED
00456  M01S00020.273l780 +++| RSQ3     SX2    D           SET FET ADDRESS
00457  M01S00021.273l780 +++|          SA1    NT
00458  M01S00022.273l780 +++|          ZR     X1,RSQ3.1   IF NO DATA TRANSFER
00459  M01S00023.273l780 +++|          READW  X2,SBUF,100B
00460  M01S00024.273l780 +++|          EQ     RSQ3.2      CHECK FOR EOR/EOF
00461  M01S00025.273l780 +++|
00462  M01S00026.273l780 +++| RSQ3.1   RJ     AOP         ADVANCE *OUT* POINTER
00463  M01S00027.273l780 +++| RSQ3.2   ZR     X1,RSQ3.3   IF NO EOR/EOF DETECTED
00464  M01S00002.mst3    +++|          SX1    X1+3        CHECK FOR *CIO* ERROR
00465  M01S00003.mst3    +++|          NZ     X1,RSQ5     IF NO *CIO* ERROR
Line S00004 Modification History
M01 (Added by) mst3
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00466  M02S00004.273l780 ---| RSQ3.1   ZR     X0,RSQ4     IF EOF EXPECTED
00467  M01S00028.273l780 +++| RSQ3.3   ZR     X0,RSQ4     IF EOF EXPECTED
00468  M01S00310.mst     +++|          SX2    B1
00469  M01S00311.mst     +++|          IX4    X5+X2       ADVANCE EXPECTED SECTOR
00470  M01S00312.mst     +++|          SA5    SBUF
00471  M01S00313.mst     +++|          BX6    X4
00472  M01S00314.mst     +++|          SA6    MSTA        SAVE RANDOM ADDRESS
00473  M01S00315.mst     +++|          IX0    X0-X2       DECREMENT SECTOR COUNTER
00474  M01S00316.mst     +++|          RJ     CKS         CHECK SECTOR
00475  M01S00317.mst     +++|          SA5    MSTA
00476  M01S00318.mst     +++|          ZR     X4,RSQ3     IF NO ERROR DETECTED
00477  M01S00319.mst     +++|          SA1    D+1         RESTART READ ON ERROR
00478  M01S00320.mst     +++|          SX2    B1
00479  M01S00321.mst     +++|          IX7    X5+X2       SET RANDOM ADDRESS TO NEXT SECTOR
00480  M01S00322.mst     +++|          SX6    X1
00481  M01S00323.mst     +++|          SA6    A1+B1
00482  M01S00324.mst     +++|          SA7    D+6
00483  M01S00325.mst     +++|          SA6    A6+B1
00484  M01S00326.mst     +++|          EQ     RSQ2
00485  M01S00327.mst     +++|
00486  M01S00328.mst     +++| RSQ4     MESSAGE (=C* NO EOF ON LAST READ.*)
00487  M01S00329.mst     +++|          EQ     RSQ6
00488  M01S00330.mst     +++|
00489  M01S00331.mst     +++| RSQ5     ZR     X0,RSQ7     IF EOF EXPECTED
00490  M01S00332.mst     +++|          MESSAGE  (=C* ILLEGAL EOF DETECTED.*)
00491  M01S00333.mst     +++| RSQ6     RJ     ABT         CHECK FOR ABORT ON ERRORS
00492  M01S00334.mst     +++| RSQ7     RJ     CTR         COMPUTE TRANSFER RATE
00493  M01S00335.mst     +++|          SA1    B0
00494  M01S00336.mst     +++|          LX1    59-9
00495  M01S00337.mst     +++|          NG     X1,RSQ1     IF REPEAT SECTION
00496  M01S00338.mst     +++|          EQ     RSQX        RETURN
Line S00339 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00497  M02S00339.mst4    ---| POS      SPACE  4
00498  M01S00051.mst4    +++| POS      SPACE  4,15
00499  M01S00340.mst     +++|**        POS - SEQUENTIAL POSITIONING.
00500  M01S00341.mst     +++|*
00501  M01S00342.mst     +++|*         ENTRY  NONE.
00502  M01S00343.mst     +++|*
00503  M01S00344.mst     +++|*         EXIT   NONE.
00504  M01S00345.mst     +++|*
Line S00346 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00505  M02S00346.mst4    ---|*         CALLS  CKS, MES, CIO=.
00506  M01S00052.mst4    +++|*         USES   X - ALL.
00507  M01S00053.mst4    +++|*                A - 1, 2, 3, 4, 5, 6, 7.
00508  M01S00054.mst4    +++|*                B - 2.
00509  M01S00055.mst4    +++|*
00510  M01S00056.mst4    +++|*         CALLS  CKS, CTR, MES, MTR.
00511  M01S00057.mst4    +++|*
00512  M01S00058.mst4    +++|*         MACROS READW, REWIND, RPHRLS, RTIME.
00513  M01S00347.mst     +++|
00514  M01S00348.mst     +++|
Line S00349 Modification History
M01 (Added by) mst
M02 (Updated by) mst1
Seq #  *Modification Id* Act 
----------------------------+
00515  M02S00349.mst1    ---| POS7     SA1    B0
00516  M01S00025.mst1    +++| POS7     RJ     CTR         COMPUTE TRANSFER RATE
00517  M01S00026.mst1    +++|          SA1    B0
00518  M01S00350.mst     +++|          LX1    59-9
00519  M01S00351.mst     +++|          NG     X1,POS1     IF REPEAT SECTION SET
00520  M01S00352.mst     +++|
00521  M01S00353.mst     +++| POS      SUBR               ENTRY/EXIT
00522  M01S00354.mst     +++|          REWIND D,R
00523  M01S00355.mst     +++|          SX1    MFL=-200000B
00524  M01S00356.mst     +++|          RJ     MEM         REQUEST MEMORY
00525  M01S00357.mst     +++| POS1     SX1    =C* SEQUENTIAL POSITIONING.*
00526  M01S00358.mst     +++|          RJ     MES         SEND MESSAGE
00527  M01S00027.mst1    +++|          BX6    X6-X6       CLEAR SECTOR COUNT
00528  M01S00028.mst1    +++|          SA6    CTRB
00529  M01S00029.mst1    +++|          RTIME  ST
00530  M01S00359.mst     +++|          SA1    NS
00531  M01S00360.mst     +++|          SX7    B1
00532  M01S00361.mst     +++|          BX0    X0-X0
00533  M01S00362.mst     +++|          LX6    X1
00534  M01S00363.mst     +++|          EQ     POS3
00535  M01S00364.mst     +++|
00536  M01S00365.mst     +++| POS2     SX0    X0-40B
00537  M01S00366.mst     +++|          NZ     X0,POS7     IF LAST READ ENCOUNTERED - RETURN
00538  M01S00367.mst     +++|          SA2    A4-B1
00539  M01S00368.mst     +++|          SA1    A2-B1
00540  M01S00369.mst     +++|          BX7    X2
00541  M01S00370.mst     +++|          LX6    X1
00542  M01S00371.mst     +++| POS3     SA3    POSA
00543  M01S00372.mst     +++|          SA7    TRRD-1
00544  M01S00373.mst     +++| POS4     IX6    X6-X3       GENERATE LIST OF SECTORS
00545  M01S00374.mst     +++|          IX7    X7+X3
00546  M01S00375.mst     +++|          NG     X6,POS5     IF END OF SECTORS TO READ
00547  M01S00376.mst     +++|          SA6    A7+1
00548  M01S00377.mst     +++|          SA7    A7+2
00549  M01S00378.mst     +++|          SB2    A6-TRRD-36B
00550  M01S00379.mst     +++|          NZ     B2,POS4     IF LIST NOT FULL
00551  M01S00380.mst     +++| POS5     MX7    0           SET END OF LIST FLAG
00552  M01S00381.mst     +++|          SB2    B1+B1
00553  M01S00382.mst     +++|          SX2    D
00554  M01S00383.mst     +++|          SX6    DBUF        IN = OUT = FIRST
00555  M01S00384.mst     +++|          SA7    A7+B1
00556  M01S00385.mst     +++|          SA6    X2+B2
00557  M01S00386.mst     +++|          SX7    TRRD
00558  M01S00387.mst     +++|          SA6    A6+B1
00559  M01S00388.mst     +++|          SA7    A6+B2       SET LIST ADDRESS
00560  M01S00389.mst     +++|          RPHRLS X2
00561  M01S00390.mst     +++| POS6     READW  D,SBUF,100B GET SECTOR TO CHECK
00562  M01S00391.mst     +++|          SA4    TRRD+X0
00563  M01S00392.mst     +++|          SA5    SBUF
00564  M01S00393.mst     +++|          ZR     X4,POS2     IF END OF LIST
00565  M01S00394.mst     +++|          RJ     CKS         CHECK SECTOR
00566  M01S00395.mst     +++|          SX0    X0+B1
00567  M01S00030.mst1    +++|          SA1    CTRB        COUNT SECTORS
00568  M01S00031.mst1    +++|          SX2    B1
00569  M01S00032.mst1    +++|          IX6    X1+X2
00570  M01S00033.mst1    +++|          SA6    A1
00571  M01S00396.mst     +++|          EQ     POS6        NEXT SECTOR
00572  M01S00397.mst     +++|
00573  M01S00398.mst     +++| POSA     CON    0           INCREMENT (SET BY PRESET)
Line S00399 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00574  M02S00399.mst4    ---| RRD      SPACE  4
00575  M01S00059.mst4    +++| RRD      SPACE  4,15
00576  M01S00400.mst     +++|**        RRD - RANDOM READ.
00577  M01S00401.mst     +++|*
00578  M01S00402.mst     +++|*         ENTRY  NONE.
00579  M01S00403.mst     +++|*
00580  M01S00404.mst     +++|*         EXIT   NONE.
00581  M01S00405.mst     +++|*
Line S00406 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00582  M02S00406.mst4    ---|*         CALLS  CKS, MES, RNO, CIO=.
00583  M01S00060.mst4    +++|*         USES   X - 0, 1, 4, 5, 6, 7.
00584  M01S00061.mst4    +++|*                A - 1, 4, 5, 6, 7.
00585  M01S00062.mst4    +++|*                B - NONE.
00586  M01S00063.mst4    +++|*
00587  M01S00064.mst4    +++|*         CALLS  CIO, CKS, CTR, MES, RNO.
00588  M01S00065.mst4    +++|*
00589  M01S00066.mst4    +++|*         MACROS READ, RTIME.
00590  M01S00407.mst     +++|
00591  M01S00408.mst     +++|
Line S00409 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00592  M02S00409.mst4    ---| RRD5     SA1    MSTA
Line S00410 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00593  M02S00410.mst4    ---|          SX2    40B
Line S00411 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00594  M02S00411.mst4    ---|          IX6    X1-X2       DECREMENT SECTOR COUNT
Line S00412 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00595  M02S00412.mst4    ---|          SA6    A1
Line S00413 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00596  M02S00413.mst4    ---|          PL     X6,RRD2     IF MORE SECTORS TO READ
Line S00034 Modification History
M01 (Added by) mst1
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00597  M02S00034.mst4    ---|          RJ     CTR         COMPUTE TRANSFER RATE
Line S00414 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00598  M02S00414.mst4    ---|          SA1    B0
Line S00415 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00599  M02S00415.mst4    ---|          LX1    59-9
Line S00416 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00600  M02S00416.mst4    ---|          NG     X1,RRD1     IF REPEAT SECTION SET
Line S00417 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00601  M02S00417.mst4    ---|
Line S00418 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00602  M02S00418.mst4    ---| RRD      SUBR               ENTRY/EXIT
Line S00419 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00603  M02S00419.mst4    ---|          SX1    MFL=-200000B
Line S00420 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00604  M02S00420.mst4    ---|          RJ     MEM         REQUEST MEMORY
Line S00421 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00605  M02S00421.mst4    ---|          REWIND D,R
Line S00422 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00606  M02S00422.mst4    ---| RRD1     SX1    =C* RANDOM READ.*
Line S00423 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00607  M02S00423.mst4    ---|          RJ     MES         SEND MESSAGE
Line S00424 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00608  M02S00424.mst4    ---|          SA3    NS          SET NUMBER OF SECTORS TO READ
Line S00425 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00609  M02S00425.mst4    ---|          SX2    B1+
Line S00426 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00610  M02S00426.mst4    ---|          AX3    6
Line S00427 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00611  M02S00427.mst4    ---|          IX6    X3+X2
Line S00428 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00612  M02S00428.mst4    ---|          SA6    MSTA        SAVE NUMBER OF SECTORS TO READ
Line S00035 Modification History
M01 (Added by) mst1
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00613  M02S00035.mst4    ---|          SA6    CTRB
Line S00036 Modification History
M01 (Added by) mst1
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00614  M02S00036.mst4    ---|          RTIME  ST
Line S00429 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00615  M02S00429.mst4    ---| RRD2     SB5    -B1
Line S00430 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00616  M02S00430.mst4    ---|          MX0    0
Line S00431 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00617  M02S00431.mst4    ---|          SB6    37B
Line S00432 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00618  M02S00432.mst4    ---| RRD3     SB5    B5+B1       GENERATE LIST OF SECTORS
Line S00433 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00619  M02S00433.mst4    ---|          SB2    B1+B1
Line S00434 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00620  M02S00434.mst4    ---|          RJ     RNO         GENERATE RANDOM SECTOR NUMBER
Line S00435 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00621  M02S00435.mst4    ---|          SA6    TRRD+B5
Line S00436 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00622  M02S00436.mst4    ---|          LT     B5,B6,RRD3  IF MORE ROOM IN LIST
Line S00437 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00623  M02S00437.mst4    ---|          MX6    0           END OF LIST FLAG
Line S00438 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00624  M02S00438.mst4    ---|          SA6    A6+B1
Line S00439 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00625  M02S00439.mst4    ---|          SX2    D
Line S00440 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00626  M02S00440.mst4    ---|          SX6    DBUF
Line S00441 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00627  M02S00441.mst4    ---|          SX7    TRRD
Line S00442 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00628  M02S00442.mst4    ---|          SA6    X2+B2
Line S00443 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00629  M02S00443.mst4    ---|          SA6    A6+B1       IN = OUT = FIRST
Line S00444 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00630  M02S00444.mst4    ---|          SA7    D+5
Line S00445 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00631  M02S00445.mst4    ---|          RPHRLS X2          READ SECTORS
Line S00446 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00632  M02S00446.mst4    ---| RRD4     READW  D,SBUF,100B GET SECTOR TO CHECK
Line S00447 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00633  M02S00447.mst4    ---|          SA4    TRRD+X0
Line S00448 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00634  M02S00448.mst4    ---|          SA5    SBUF
Line S00449 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00635  M02S00449.mst4    ---|          ZR     X4,RRD5     IF END OF LIST OF SECTORS
Line S00450 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00636  M02S00450.mst4    ---|          RJ     CKS         CHECK SECTOR
Line S00451 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00637  M02S00451.mst4    ---|          SX0    X0+B1
Line S00452 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00638  M02S00452.mst4    ---|          EQ     RRD4        NEXT SECTOR
00639  M01S00067.mst4    +++| RRD      SUBR               ENTRY/EXIT
00640  M01S00068.mst4    +++|          SA1    TL          REQUEST MEMORY
00641  M01S00069.mst4    +++|          BX6    X1
00642  M01S00070.mst4    +++|          LX1    6
00643  M01S00071.mst4    +++|          SA6    CKSI        SET SECTORS TO READ
00644  M01S00072.mst4    +++|          SX1    X1+DBUF+11B
00645  M01S00073.mst4    +++|          BX6    X1
00646  M01S00074.mst4    +++|          SA6    D+4
00647  M01S00075.mst4    +++|          RJ     MEM
00648  M01S00076.mst4    +++| RRD1     SX1    =C* RANDOM READ.*
00649  M01S00077.mst4    +++|          RJ     MES         ISSUE MESSAGE
00650  M01S00078.mst4    +++|          SA1    TL
00651  M01S00079.mst4    +++|          SA5    IO          GET NUMBER OF I/O-S
00652  M01S00080.mst4    +++|          BX0    -X5
00653  M01S00081.mst4    +++|          SA5    NS          SET NUMBER OF SECTORS TRANSFERED
00654  M01S00082.mst4    +++|          AX5    7
00655  M01S00083.mst4    +++|          IX6    X1*X5
00656  M01S00084.mst4    +++|          SA6    CTRB
00657  M01S00085.mst4    +++|          RTIME  ST
00658  M01S00086.mst4    +++| RRD2     SX7    B1          SET RANDOM ADDRESS IN FET
00659  M01S00087.mst4    +++|          LX7    29-0
00660  M01S00088.mst4    +++|          RJ     RNO         GET RANDOM NUMBER
00661  M01S00089.mst4    +++|          SA6    RRDA
00662  M01S00090.mst4    +++|          BX7    X6+X7
00663  M01S00091.mst4    +++|          SA7    D+6
00664  M01S00092.mst4    +++|          SX6    DBUF        SET IN = OUT = FIRST
00665  M01S00093.mst4    +++|          SA6    D+2
00666  M01S00094.mst4    +++|          SA6    A6+B1
00667  M01S00095.mst4    +++|          READ   D,R
00668  M01S00096.mst4    +++|          SA5    DBUF        SET ACTUAL RANDOM ADDRESS
00669  M01S00097.mst4    +++|          SA4    RRDA        SET EXPECTED RANDOM ADDRESS
00670  M01S00098.mst4    +++|          RJ     CKS         CHECK DATA
00671  M01S00099.mst4    +++|          SX0    X0+B1       INCREMENT I/O COUNT
00672  M01S00100.mst4    +++|          NG     X0,RRD2     IF MORE I/O-S REQUIRED
00673  M01S00101.mst4    +++|          RJ     CTR         COMPUTE TRANSFER RATE
00674  M01S00102.mst4    +++|          RJ     CIO         COMPUTE I/O RATE
00675  M01S00103.mst4    +++|          SA1    B0
00676  M01S00104.mst4    +++|          LX1    59-9
00677  M01S00105.mst4    +++|          NG     X1,RRD1     IF NOT DONE
00678  M01S00106.mst4    +++|          EQ     RRDX        RETURN
00679  M01S00107.mst4    +++|
00680  M01S00108.mst4    +++| RRDA     CON    0           EXPECTED RANDOM ADDRESS
Line S00453 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00681  M02S00453.mst4    ---| WRD      SPACE  4
00682  M01S00109.mst4    +++| WRD      SPACE  4,15
00683  M01S00454.mst     +++|**        WRD - RANDOM WRITE.
00684  M01S00455.mst     +++|*
00685  M01S00456.mst     +++|*         ENTRY  NONE.
00686  M01S00457.mst     +++|*
00687  M01S00458.mst     +++|*         EXIT   NONE.
00688  M01S00459.mst     +++|*
Line S00460 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00689  M02S00460.mst4    ---|*         CALLS  CIO=, GDB, MEM, MES, RNO.
00690  M01S00110.mst4    +++|*         USES   X - 0, 1, 5, 6, 7.
00691  M01S00111.mst4    +++|*                A - 1, 5, 6, 7.
00692  M01S00112.mst4    +++|*                B - 4, 5.
00693  M01S00113.mst4    +++|*
00694  M01S00114.mst4    +++|*         CALLS  CIO, CTR, GDB, MEM, MES, RNO.
00695  M01S00115.mst4    +++|*
00696  M01S00116.mst4    +++|*         MACROS RTIME, WRITE.
00697  M01S00461.mst     +++|
00698  M01S00462.mst     +++|
00699  M01S00463.mst     +++| WRD      SUBR               ENTRY/EXIT
00700  M01S00464.mst     +++|          SA1    D+1         CLEAR EPR BIT
00701  M01S00465.mst     +++|          SX6    B1
00702  M01S00466.mst     +++|          LX6    44
00703  M01S00467.mst     +++|          BX6    -X6*X1
00704  M01S00468.mst     +++|          SA6    A1
Line S00469 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00705  M02S00469.mst4    ---|          SX1    DBUF+101B+10B
Line S00470 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00706  M02S00470.mst4    ---|          RJ     MEM         REQUEST MEMORY REDUCTION
00707  M01S00117.mst4    +++|          SA1    TL
00708  M01S00118.mst4    +++|          BX6    X1
00709  M01S00119.mst4    +++|          SA6    CKSI        SET SECTORS TO CHECK
00710  M01S00120.mst4    +++|          LX1    6
00711  M01S00121.mst4    +++|          SX1    X1+DBUF+11B
00712  M01S00122.mst4    +++|          RJ     MEM
00713  M01S00471.mst     +++| WRD1     SX1    =C* RANDOM WRITE.*
00714  M01S00472.mst     +++|          RJ     MES         SEND MESSAGE
00715  M01S00473.mst     +++|          SA5    NS
00716  M01S00123.mst4    +++|          SA1    TL          REQUEST MEMORY
00717  M01S00474.mst     +++|          AX5    7
00718  M01S00475.mst     +++|          BX0    -X5
Line S00037 Modification History
M01 (Added by) mst1
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00719  M02S00037.mst4    ---|          BX6    X5          SAVE SECTOR COUNT
00720  M01S00124.mst4    +++|          IX6    X1*X5
00721  M01S00038.mst1    +++|          SA6    CTRB
00722  M01S00039.mst1    +++|          RTIME  ST
00723  M01S00125.mst4    +++| WRD1.1   SA1    TL
00724  M01S00126.mst4    +++|          SB4    B0
00725  M01S00127.mst4    +++|          SB5    X1
Line S00476 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00726  M02S00476.mst4    ---| WRD2     SX7    B1
00727  M01S00128.mst4    +++|          SX7    B1
00728  M01S00477.mst     +++|          LX7    29
00729  M01S00478.mst     +++|          RJ     RNO         GET RANDOM NUMBER
00730  M01S00011.mst9    +++|          SA2    JN          JSN AND MFID
Line S00479 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00731  M02S00479.mst4    ---|          SA6    DBUF
00732  M01S00129.mst4    +++|          BX7    X6+X7       SET RANDOM BIT
00733  M01S00130.mst4    +++|          SA7    D+6
00734  M01S00012.mst9    +++|          BX6    X2+X6       ADD JSN AND MFID TO SECTOR NUMBER
00735  M01S00131.mst4    +++| WRD2     SA6    B4+DBUF
00736  M01S00480.mst     +++|          SA1    TP
Line S00481 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00737  M02S00481.mst4    ---|          BX7    X7+X6       SET RANDOM BIT
Line S00482 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00738  M02S00482.mst4    ---|          SA7    D+6         STORE RANDOM ADDRESS IN FET
00739  M01S00483.mst     +++|          BX6    X1
Line S00484 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00740  M02S00484.mst4    ---|          SA6    DBUF+1      STORE RANDOM NUMBER IN BUFFER
00741  M01S00132.mst4    +++|          SA6    B4+DBUF+1   STORE RANDOM ADDRESS IN FET
00742  M01S00485.mst     +++|          RJ     GDB         GENERATE DATA BUFFER
00743  M01S00486.mst     +++|          SA7    TP
00744  M01S00133.mst4    +++|          SA1    B4+DBUF
00745  M01S00134.mst4    +++|          SX6    1
00746  M01S00135.mst4    +++|          IX6    X1+X6
00747  M01S00136.mst4    +++|          SB5    B5-B1
00748  M01S00137.mst4    +++|          SB4    B4+100B
00749  M01S00138.mst4    +++|          NE     B5,WRD2     IF MORE SECTORS TO GENERATE
00750  M01S00139.mst4    +++|          SA1    TL
00751  M01S00140.mst4    +++|          LX1    6
00752  M01S00487.mst     +++|          SX6    DBUF
Line S00488 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00753  M02S00488.mst4    ---|          SX7    X6+100B
00754  M01S00141.mst4    +++|          IX7    X6+X1
00755  M01S00489.mst     +++|          SA6    D+3         OUT = FIRST
00756  M01S00490.mst     +++|          SA7    D+2         IN = FIRST + 64
Line S00491 Modification History
M01 (Added by) mst
M02 (Updated by) mst1
Seq #  *Modification Id* Act 
----------------------------+
00757  M02S00491.mst1    ---|          WPHR   D,R
00758  M01S00040.mst1    +++|          WRITE  D,R
00759  M01S00492.mst     +++|          SX6    B1
00760  M01S00493.mst     +++|          IX0    X0+X6       COUNT SECTOR
Line S00494 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00761  M02S00494.mst4    ---|          NG     X0,WRD2     IF MORE SECTORS TO WRITE
00762  M01S00142.mst4    +++|          NG     X0,WRD1.1   IF MORE SECTORS TO TRANSFER
00763  M01S00041.mst1    +++|          RJ     CTR         COMPUTE TRANSFER RATE
00764  M01S00143.mst4    +++|          RJ     CIO         COMPUTE I/O RATE
00765  M01S00495.mst     +++|          SA1    B0
00766  M01S00496.mst     +++|          LX1    59-9
00767  M01S00497.mst     +++|          NG     X1,WRD1     IF REPEAT SECTION SET
00768  M01S00498.mst     +++|          SA1    D+1         SET EPR BIT
00769  M01S00499.mst     +++|          SX6    B1
00770  M01S00500.mst     +++|          LX6    44
00771  M01S00501.mst     +++|          BX6    X6+X1
00772  M01S00502.mst     +++|          SA6    A1
00773  M01S00503.mst     +++|          EQ     WRDX        RETURN
00774  M01S00029.273l780 +++|          TITLE  SUBROUTINES.
Line S00504 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00775  M02S00504.mst4    ---|          TITLE  SUBROUTINES.
00776  M01S00144.mst4    +++| ABT      SPACE  4,15
00777  M01S00505.mst     +++|**        ABT - ABORT JOB.
00778  M01S00506.mst     +++|*
00779  M01S00507.mst     +++|*         ABORTS JOB IF PAUSE ON ERROR NOT SELECTED.
00780  M01S00508.mst     +++|*
00781  M01S00509.mst     +++|*         EXIT   (X4) = 1.
00782  M01S00145.mst4    +++|*
00783  M01S00146.mst4    +++|*         USES   X - 1, 4, 7.
00784  M01S00147.mst4    +++|*                A - 1, 7.
00785  M01S00148.mst4    +++|*                B - NONE.
00786  M01S00149.mst4    +++|*
00787  M01S00150.mst4    +++|*         MACROS ABORT, MESSAGE, RECALL.
00788  M01S00510.mst     +++|
00789  M01S00511.mst     +++|
00790  M01S00512.mst     +++| ABT      SUBR               ENTRY/EXIT
00791  M01S00513.mst     +++|          SA1    B0
00792  M01S00514.mst     +++|          LX1    59-7
00793  M01S00515.mst     +++|          NG     X1,ABT2     IF ABORT ON ERROR
00794  M01S00516.mst     +++|          SX7    B1+         SET PAUSE BIT
00795  M01S00517.mst     +++|          LX1    7-59
00796  M01S00518.mst     +++|          LX7    12
00797  M01S00519.mst     +++|          BX7    X7+X1
00798  M01S00520.mst     +++|          SA7    A1
00799  M01S00521.mst     +++|          MESSAGE  ABTA,2,R  ISSUE MESSAGE TO SECOND LINE
00800  M01S00522.mst     +++| ABT1     RECALL
00801  M01S00523.mst     +++|          SA1    B0
00802  M01S00524.mst     +++|          LX1    59-12
00803  M01S00525.mst     +++|          NG     X1,ABT1     IF PAUSE BIT SET
00804  M01S00526.mst     +++|          SX4    B1
00805  M01S00527.mst     +++|          EQ     ABTX        RETURN
00806  M01S00528.mst     +++|
00807  M01S00529.mst     +++| ABT2     MESSAGE  (=C* JOB ABORTED.*)
00808  M01S00530.mst     +++| ABT3     ABORT              ABORT JOB
00809  M01S00531.mst     +++|
Line S00532 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00810  M02S00532.ns22000 ---| ABTA     DATA   C*$MST ERROR - ENTER GO OR DROP.*
00811  M01S00027.ns22000 +++| ABTA     DATA   C*$MST ERROR - GO / DROP.*
00812  M01S00030.273l780 +++| AIP      SPACE  4,20
00813  M01S00031.273l780 +++|**        AIP - ADVANCE *IN* POINTER.
00814  M01S00032.273l780 +++|*
00815  M01S00033.273l780 +++|*         ADVANCE THE *IN* POINTER BY 100B (AS IF A *WRITEW* OF 100B
00816  M01S00034.273l780 +++|*         WORDS HAD BEEN PERFORMED), BUT DO NOT TRANSFER THE DATA.
00817  M01S00035.273l780 +++|*         COPY ONLY THE FIRST WORD OF THE BLOCK FROM BUFFER *SBUF*
00818  M01S00036.273l780 +++|*         TO THE CIO BUFFER.
00819  M01S00037.273l780 +++|*
00820  M01S00038.273l780 +++|*         ENTRY  (X2) = ADDRESS OF FET FOR FILE.
00821  M01S00039.273l780 +++|*
00822  M01S00040.273l780 +++|*         EXIT   VIA *WTX=*.
00823  M01S00041.273l780 +++|*                (X2) = ADDRESS OF FET FOR FILE.
00824  M01S00042.273l780 +++|*
00825  M01S00043.273l780 +++|*         USES   X - 1, 2, 3, 4, 6, 7.
00826  M01S00044.273l780 +++|*                A - 1, 2, 3, 4, 6.
00827  M01S00045.273l780 +++|*                B - 2, 3, 4, 5, 6, 7.
00828  M01S00046.273l780 +++|*
00829  M01S00047.273l780 +++|*         CALLS  DCB=, WTX=.
00830  M01S00048.273l780 +++|
00831  M01S00049.273l780 +++|
00832  M01S00050.273l780 +++| +        EQ     AIP1        (REENTRY ADDRESS FROM *DCB=*)
00833  M01S00051.273l780 +++|
00834  M01S00052.273l780 +++| AIP      SUBR               ENTRY/EXIT
00835  M01S00053.273l780 +++|          SA4    *-1         SET REENTRY/RETURN ADDRESS
00836  M01S00054.273l780 +++|          SA1    X2+4        (B5) = LIMIT
00837  M01S00055.273l780 +++|          SA3    X2+B1       (X3) = FIRST
00838  M01S00056.273l780 +++|          SB5    X1
00839  M01S00057.273l780 +++|
00840  M01S00058.273l780 +++|*         REENTER HERE FROM *DCB=*.
00841  M01S00059.273l780 +++|
00842  M01S00060.273l780 +++| AIP1     SA2    X2          (B2) = FET STATUS
00843  M01S00061.273l780 +++|          SA1    A3+2        (B4) = OUT
00844  M01S00062.273l780 +++|          SB2    X2
00845  M01S00063.273l780 +++|          SA2    A3+B1       (X2) = IN
00846  M01S00064.273l780 +++|          SB4    X1
00847  M01S00065.273l780 +++|          SB3    X2+B1       (B3) = IN+1
00848  M01S00066.273l780 +++|          LE     B3,B4,AIP3  IF IN .LT. OUT
00849  M01S00067.273l780 +++|
00850  M01S00068.273l780 +++|*         CALCULATE SPACE LEFT IN BUFFER (IN .GE. OUT).
00851  M01S00069.273l780 +++|
Line S00070 Modification History
M01 (Added by) 273l780
M02 (Updated by) mst7
Seq #  *Modification Id* Act 
----------------------------+
00852  M02S00070.mst7    ---|          SX6    B5
Line S00071 Modification History
M01 (Added by) 273l780
M02 (Updated by) mst7
Seq #  *Modification Id* Act 
----------------------------+
00853  M02S00071.mst7    ---|          IX6    X6-X3       (LIMIT-FIRST)
00854  M01S00001.mst7    +++|          SB7    X3
00855  M01S00002.mst7    +++|          SX6    B5-B7       (LIMIT-FIRST)
00856  M01S00072.273l780 +++|          SX7    B3-B4       (IN+1-OUT)
00857  M01S00073.273l780 +++|          IX6    X6-X7       AVAILABLE SPACE IN BUFFER
00858  M01S00074.273l780 +++|          SX7    X6-100B
00859  M01S00075.273l780 +++|          NG     X7,DCB=     IF NOT ENOUGH SPACE
00860  M01S00076.273l780 +++|
00861  M01S00077.273l780 +++|*         UPDATE BUFFER POINTER (IN .GE. OUT).
00862  M01S00078.273l780 +++|
00863  M01S00079.273l780 +++|          SB6    X2+100B     NEW VALUE OF IN
00864  M01S00080.273l780 +++|          LT     B6,B5,AIP2  IF NO BUFFER WRAPAROUND
Line S00081 Modification History
M01 (Added by) 273l780
M02 (Updated by) mst7
Seq #  *Modification Id* Act 
----------------------------+
00865  M02S00081.mst7    ---|          SB7    X3
00866  M01S00082.273l780 +++|          SB7    B5-B7       (LIMIT-FIRST)
00867  M01S00083.273l780 +++|          SB6    B6-B7       NEW VALUE OF IN
00868  M01S00084.273l780 +++| AIP2     SA1    SBUF        COPY FIRST WORD OF BLOCK TO (IN)
00869  M01S00085.273l780 +++|          BX6    X1
00870  M01S00086.273l780 +++|          SA6    X2
00871  M01S00087.273l780 +++|          SX2    B6          SET NEW VALUE OF IN
00872  M01S00088.273l780 +++|          EQ     WTX=        EXIT
00873  M01S00089.273l780 +++|
00874  M01S00090.273l780 +++|*         CALCULATE SPACE LEFT IN BUFFER (IN .LT. OUT).
00875  M01S00091.273l780 +++|
00876  M01S00092.273l780 +++| AIP3     SX6    B4-B3       AVAILABLE SPACE IN BUFFER
00877  M01S00093.273l780 +++|          SX7    X6-100B
00878  M01S00094.273l780 +++|          NG     X7,DCB=     IF NOT ENOUGH SPACE IN BUFFER
00879  M01S00095.273l780 +++|
00880  M01S00096.273l780 +++|*         UPDATE BUFFER POINTER (IN .LT. OUT).
00881  M01S00097.273l780 +++|
00882  M01S00098.273l780 +++|          SB6    X2+100B     NEW VALUE OF IN
00883  M01S00099.273l780 +++|          EQ     AIP2        EXIT
00884  M01S00100.273l780 +++| AOP      SPACE  4,20
00885  M01S00101.273l780 +++|***       AOP - ADVANCE *OUT* POINTER.
00886  M01S00102.273l780 +++|*
00887  M01S00103.273l780 +++|*         ADVANCE THE *OUT* POINTER BY 100B (AS IF A *READW* OF 100B
00888  M01S00104.273l780 +++|*         WORDS HAD BEEN PERFORMED), BUT DO NOT TRANSFER THE DATA.
00889  M01S00105.273l780 +++|*         COPY ONLY THE FIRST WORD OF THE BLOCK FROM THE CIO BUFFER
00890  M01S00106.273l780 +++|*         TO BUFFER *SBUF*.
00891  M01S00107.273l780 +++|*
00892  M01S00108.273l780 +++|*         ENTRY  (X2) = ADDRESS OF FET FOR FILE.
00893  M01S00109.273l780 +++|*
00894  M01S00110.273l780 +++|*         EXIT   VIA *RDX=*.
00895  M01S00111.273l780 +++|*                (X1) = 0 FOR TRANSFER COMPLETE.
00896  M01S00112.273l780 +++|*                (X1) = -1 IF EOF DETECTED ON FILE.
00897  M01S00113.273l780 +++|*                (X1) = -2 IF EOI DETECTED ON FILE.
00898  M01S00114.273l780 +++|*                (X2) = ADDRESS OF FET FOR FILE.
00899  M01S00115.273l780 +++|*
00900  M01S00116.273l780 +++|*         USES   X - 1, 2, 3, 4, 6, 7.
00901  M01S00117.273l780 +++|*                A - 1, 2, 3, 4, 7.
00902  M01S00118.273l780 +++|*                B - 3, 4, 5, 6, 7.
00903  M01S00119.273l780 +++|*
00904  M01S00120.273l780 +++|*         CALLS  LCB=, RDX=.
00905  M01S00121.273l780 +++|
00906  M01S00122.273l780 +++|
00907  M01S00123.273l780 +++| +        EQ     AOP1        (REENTRY ADDRESS FOR *LCB=*)
00908  M01S00124.273l780 +++|
00909  M01S00125.273l780 +++| AOP      SUBR               ENTRY/EXIT
00910  M01S00126.273l780 +++|          SA4    *-1         SET REENTRY/RETURN ADDRESS
00911  M01S00127.273l780 +++|          SA1    X2+4        (B5) = LIMIT
00912  M01S00128.273l780 +++|          SA3    X2+B1       (X3) = FIRST
00913  M01S00129.273l780 +++|          SB5    X1
00914  M01S00130.273l780 +++|
00915  M01S00131.273l780 +++|*         REENTER HERE FROM *LCB=*.
00916  M01S00132.273l780 +++|
00917  M01S00133.273l780 +++| AOP1     SA1    A3+B1       (B3) = IN
00918  M01S00134.273l780 +++|          SA2    A1+B1       (B4) = OUT
00919  M01S00135.273l780 +++|          SB3    X1
00920  M01S00136.273l780 +++|          SB4    X2
00921  M01S00137.273l780 +++|          LT     B3,B4,AOP3  IF IN .LT. OUT
00922  M01S00138.273l780 +++|
00923  M01S00139.273l780 +++|*         CALCULATE DATA AVAILABLE IN BUFFER (IN .GE. OUT).
00924  M01S00140.273l780 +++|
00925  M01S00141.273l780 +++|          SX6    B3-B4       AVAILABLE DATA IN BUFFER
00926  M01S00142.273l780 +++|          SX7    X6-100B
00927  M01S00143.273l780 +++|          NG     X7,LCB=     IF NOT ENOUGH DATA IN BUFFER
00928  M01S00144.273l780 +++|
00929  M01S00145.273l780 +++|*         UPDATE BUFFER POINTER (IN .GE. OUT).
00930  M01S00146.273l780 +++|
00931  M01S00147.273l780 +++|          SB6    B4+100B     NEW VALUE OF OUT
00932  M01S00148.273l780 +++| AOP2     SA1    B4          COPY FIRST WORD OF BLOCK FROM (OUT)
00933  M01S00149.273l780 +++|          BX7    X1
00934  M01S00150.273l780 +++|          SA7    SBUF
00935  M01S00151.273l780 +++|          SB4    B6          SET NEW VALUE OF OUT
00936  M01S00152.273l780 +++|          EQ     RDX=        EXIT
00937  M01S00153.273l780 +++|
00938  M01S00154.273l780 +++|*         CALCULATE DATA AVAILABLE IN BUFFER (IN .LT. OUT)
00939  M01S00155.273l780 +++|
Line S00156 Modification History
M01 (Added by) 273l780
M02 (Updated by) mst7
Seq #  *Modification Id* Act 
----------------------------+
00940  M02S00156.mst7    ---| AOP3     SX6    B5
Line S00157 Modification History
M01 (Added by) 273l780
M02 (Updated by) mst7
Seq #  *Modification Id* Act 
----------------------------+
00941  M02S00157.mst7    ---|          IX6    X6-X3       (LIMIT-FIRST)
00942  M01S00003.mst7    +++| AOP3     SB7    X3
00943  M01S00004.mst7    +++|          SX6    B5-B7       (LIMIT-FIRST)
00944  M01S00158.273l780 +++|          SX7    B4-B3       (OUT-IN)
00945  M01S00159.273l780 +++|          IX6    X6-X7       AVAILABLE DATA IN BUFFER
00946  M01S00160.273l780 +++|          SX7    X6-100B
00947  M01S00161.273l780 +++|          NG     X7,LCB=     IF NOT ENOUGH DATA IN BUFFER
00948  M01S00162.273l780 +++|
00949  M01S00163.273l780 +++|*         UPDATE BUFFER POINTER (IN .LT. OUT).
00950  M01S00164.273l780 +++|
00951  M01S00165.273l780 +++|          SB6    B4+100B     NEW VALUE OF OUT
00952  M01S00166.273l780 +++|          LT     B6,B5,AOP2  IF NO BUFFER WRAPAROUND
Line S00167 Modification History
M01 (Added by) 273l780
M02 (Updated by) mst7
Seq #  *Modification Id* Act 
----------------------------+
00953  M02S00167.mst7    ---|          SB7    X3
00954  M01S00168.273l780 +++|          SB7    B5-B7       (LIMIT-FIRST)
00955  M01S00169.273l780 +++|          SB6    B6-B7       NEW VALUE OF OUT
00956  M01S00170.273l780 +++|          EQ     AOP2        EXIT
Line S00533 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00957  M02S00533.mst4    ---| CKS      SPACE  4
Line S00534 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00958  M02S00534.mst4    ---| CKS      SPACE  4
00959  M01S00151.mst4    +++| CKS      SPACE  4,20
00960  M01S00535.mst     +++|**        CKS - CHECK SECTOR.
00961  M01S00536.mst     +++|*
Line S00537 Modification History
M01 (Added by) mst
M02 (Updated by) mst9
Seq #  *Modification Id* Act 
----------------------------+
00962  M02S00537.mst9    ---|*         ENTRY  (X5) = SECTOR NUMBER READ.
00963  M01S00013.mst9    +++|*         ENTRY  (X5) = SECTOR NUMBER, JSN AND MFID READ.
00964  M01S00538.mst     +++|*                (X4) = SECTOR NUMBER EXPECTED.
00965  M01S00539.mst     +++|*                (A5) = ADDRESS OF SECTOR TO BE CHECKED.
00966  M01S00042.mst1    +++|*                ND .NE. 0 IF DATA IS TO BE CHECKED.
00967  M01S00540.mst     +++|*
00968  M01S00541.mst     +++|*         EXIT   (X4) = 0 IF NO ERROR DETECTED.
00969  M01S00542.mst     +++|*
Line S00543 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00970  M02S00543.mst4    ---|*         USES   X - 1, 2, 3, 4, 5, 6, 7.
Line S00544 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00971  M02S00544.mst4    ---|*                B - 2, 3.
Line S00545 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00972  M02S00545.mst4    ---|*                A - 1, 2, 3, 4, 5, 6, 7.
00973  M01S00152.mst4    +++|*         USES   X - ALL.
00974  M01S00153.mst4    +++|*                A - 1, 2, 3, 4, 5, 6, 7.
00975  M01S00154.mst4    +++|*                B - 2.
00976  M01S00546.mst     +++|*
00977  M01S00547.mst     +++|*         RESTORES  X5, D+2, D+3, X0, D+6 WHEN RETURNING FROM ERROR.
00978  M01S00548.mst     +++|*
Line S00549 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00979  M02S00549.mst4    ---|*         CALLS  ABT, COD, DCH, ERR.
00980  M01S00155.mst4    +++|*         CALLS  ABT, DCH, ERR.
00981  M01S00550.mst     +++|
00982  M01S00551.mst     +++|
00983  M01S00552.mst     +++| CKS      SUBR               ENTRY/EXIT
00984  M01S00553.mst     +++|          SA3    D+6         CHECK FOR CIO ERROR
00985  M01S00554.mst     +++|          MX2    -3
00986  M01S00555.mst     +++|          BX2    -X2*X3
00987  M01S00556.mst     +++|          NZ     X2,CKS2     IF CIO ERROR
00988  M01S00557.mst     +++|          ZR     X4,CKSX     IF CHECKING ON WRITE - RETURN
Line S00558 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
00989  M02S00558.mst4    ---|          BX6    X4-X5
Line S00156 Modification History
M01 (Added by) mst4
M02 (Updated by) mst9
Seq #  *Modification Id* Act 
----------------------------+
00990  M02S00156.mst9    ---| CKS0     BX6    X4-X5
00991  M01S00014.mst9    +++| CKS0     SA2    JN          GET JSN AND MFID
00992  M01S00015.mst9    +++|          BX2    X2+X4       MERGE WITH SECTOR NUMBER
00993  M01S00016.mst9    +++|          BX6    X2-X5
00994  M01S00559.mst     +++|          NZ     X6,CKS3     IF POSITION ERROR
Line S00157 Modification History
M01 (Added by) mst4
M02 (Updated by) mst8
Seq #  *Modification Id* Act 
----------------------------+
00995  M02S00157.mst8    ---|          SX6    X4+B1       INCREMENT RANDOM ADDRESS FOR NEXT SECTOR
00996  M01S00002.mst8    +++|          SX6    B1
00997  M01S00003.mst8    +++|          IX6    X4+X6       INCREMENT RANDOM ADDRESS FOR NEXT SECTOR
00998  M01S00158.mst4    +++|          SA6    CKSJ
00999  M01S00043.mst1    +++|          SA4    ND
01000  M01S00044.mst1    +++|          ZR     X4,CKSX     IF DATA NOT TO BE CHECKED
01001  M01S00560.mst     +++|          SX4    B0
01002  M01S00561.mst     +++|          SB2    76B
01003  M01S00562.mst     +++|          SA2    A5+77B      LOAD CHECKSUM
01004  M01S00563.mst     +++| CKS1     SA1    A5+B2       VALIDATE CHECKSUM
01005  M01S00564.mst     +++|          IX2    X2-X1
01006  M01S00565.mst     +++|          SB2    B2-1
01007  M01S00566.mst     +++|          GT     B2,B1,CKS1  IF MORE DATA
Line S00567 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01008  M02S00567.mst4    ---|          ZR     X2,CKSX     IF NO CHECKSUM ERROR - RETURN
Line S00568 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01009  M02S00568.mst4    ---|
Line S00569 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01010  M02S00569.mst4    ---|          SA1    CKSA        DATA ERROR PROCESSING
01011  M01S00159.mst4    +++|          NZ     X2,CKS1.1   IF CHECKSUM ERROR
01012  M01S00160.mst4    +++|          SA3    CKSI        CHECK SECTOR COUNT
01013  M01S00161.mst4    +++|          SX6    X3-1
01014  M01S00162.mst4    +++|          ZR     X6,CKSX     IF END OF TRANSFER
01015  M01S00163.mst4    +++|          SA6    A3+
01016  M01S00164.mst4    +++|          SA5    A5+100B     SET ACTUAL RANDOM ADDRESS
01017  M01S00165.mst4    +++|          SA4    CKSJ        SET EXPECTED RANDOM ADDRESS
01018  M01S00166.mst4    +++|          EQ     CKS0        NEXT SECTOR
01019  M01S00167.mst4    +++|
01020  M01S00168.mst4    +++| CKS1.1   SA1    CKSA        DATA ERROR PROCESSING
01021  M01S00570.mst     +++|          SA2    CKSE
01022  M01S00571.mst     +++|          RJ     ERR         DATA ERROR MESSAGE
01023  M01S00572.mst     +++|          RJ     DCH         DATA CHECK
01024  M01S00573.mst     +++|          EQ     CKS6
01025  M01S00574.mst     +++|
01026  M01S00575.mst     +++| CKS2     SA1    CKSB        CIO ERROR PROCESSING
01027  M01S00576.mst     +++|          SX6    X2-2
01028  M01S00577.mst     +++|          SA2    X2+TCIO-1
01029  M01S00578.mst     +++|          SA6    CKSG
01030  M01S00579.mst     +++|          LX7    X4
01031  M01S00580.mst     +++|          SX4    B0
01032  M01S00581.mst     +++|          SA7    CKSH
01033  M01S00582.mst     +++|          RJ     ERR         CIO ERROR MESSAGE
01034  M01S00583.mst     +++|          SA1    CKSG
01035  M01S00584.mst     +++|          NG     X1,CKS5     IF PARITY ERROR
01036  M01S00585.mst     +++|          ZR     X1,CKS4     IF ADDRESS ERROR
01037  M01S00586.mst     +++|          EQ     CKS6
01038  M01S00587.mst     +++|
01039  M01S00588.mst     +++| CKS3     SA1    CKSC        POSITION ERROR PROCESSING
01040  M01S00589.mst     +++|          SA2    CKSE
01041  M01S00590.mst     +++|          BX6    X4
01042  M01S00591.mst     +++|          SX4    B0
01043  M01S00592.mst     +++|          SA6    CKSH
01044  M01S00593.mst     +++|          RJ     ERR         POSITION ERROR MESSAGE
01045  M01S00594.mst     +++| CKS4     SA4    CKSH        SECTOR EXPECTED
01046  M01S00595.mst     +++|          SA1    CKSD
01047  M01S00596.mst     +++|          SA2    CKSF
01048  M01S00597.mst     +++|          BX5    X4
01049  M01S00598.mst     +++|          SX4    B1
01050  M01S00599.mst     +++|          ZR     X5,CKS6     IF ADDRESS ERROR ON SEQUENTIAL WRITE
01051  M01S00600.mst     +++|          RJ     ERR         EXPECTED ERROR MESSAGE
01052  M01S00601.mst     +++| CKS5     RJ     DCH         DATA CHECK
01053  M01S00602.mst     +++| CKS6     RJ     ABT         CHECK FOR ABORT ON ERRORS
01054  M01S00603.mst     +++| CKS7     SA5    ERRA        RESTORE REGISTERS
01055  M01S00604.mst     +++|          SA2    A5+B1
01056  M01S00605.mst     +++|          SA3    A2+B1
01057  M01S00606.mst     +++|          SA1    A3+B1
01058  M01S00607.mst     +++|          BX6    X2
01059  M01S00608.mst     +++|          LX7    X3
01060  M01S00609.mst     +++|          SA2    A1+B1
01061  M01S00610.mst     +++|          SA6    D+2
01062  M01S00611.mst     +++|          SA7    D+3
01063  M01S00612.mst     +++|          LX6    X2
01064  M01S00613.mst     +++|          BX0    X1
01065  M01S00614.mst     +++|          SA6    D+6
01066  M01S00615.mst     +++|          EQ     CKSX        RETURN
01067  M01S00616.mst     +++|
01068  M01S00617.mst     +++|
Line S00618 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01069  M02S00618.ns22000 ---| CKSA     CON    10H EQXX DATA
Line S00619 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01070  M02S00619.ns22000 ---| CKSB     CON    10H EQXX DEV.
Line S00620 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01071  M02S00620.ns22000 ---| CKSC     CON    10H EQXX POS.
Line S00621 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01072  M02S00621.ns22000 ---| CKSD     CON    10H EQXX EXP.
01073  M01S00028.ns22000 +++| CKSA     DATA   10HEQXXX,DATA
Line S00029 Modification History
M01 (Added by) ns22000
M02 (Updated by) mst2
Seq #  *Modification Id* Act 
----------------------------+
01074  M02S00029.mst2    ---| CKSB     DATA   10HEQXXX,POS.
Line S00030 Modification History
M01 (Added by) ns22000
M02 (Updated by) mst2
Seq #  *Modification Id* Act 
----------------------------+
01075  M02S00030.mst2    ---| CKSC     DATA   10HEQXXX,DEV.
01076  M01S00001.mst2    +++| CKSB     DATA   10HEQXXX,DEV.
01077  M01S00002.mst2    +++| CKSC     DATA   10HEQXXX,POS.
01078  M01S00031.ns22000 +++| CKSD     DATA   10HEQXXX,EXP.
01079  M01S00622.mst     +++| CKSE     CON    10H ERROR AT
01080  M01S00623.mst     +++| CKSF     CON    10H POSITION
01081  M01S00624.mst     +++| CKSG     CON    0           TEMPORARY
01082  M01S00625.mst     +++| CKSH     CON    0           TEMPORARY
01083  M01S00169.mst4    +++| CKSI     CON    0           NUMBER OF SECTORS REMAINING TO CHECK
01084  M01S00170.mst4    +++| CKSJ     CON    0           EXPECTED RANDOM ADDRESS OF NEXT SECTOR
01085  M01S00626.mst     +++|
01086  M01S00627.mst     +++| TCIO     CON    10LPARITY ER.      PARITY ERROR
01087  M01S00628.mst     +++|          CON    10LADDR. ERR.      ADDRESS ERROR
01088  M01S00629.mst     +++|          CON    10LSTATUS ER.      DEVICE STATUS ERROR
01089  M01S00630.mst     +++|          CON    10L81 FNC REJ      6681 FUNCTION REJECT
01090  M01S00631.mst     +++|          CON    10LRESERVED        DEVICE RESERVED
01091  M01S00632.mst     +++|          CON    10LNOT READY       DEVICE NOT READY
01092  M01S00171.mst4    +++| CIO      SPACE 4,10
01093  M01S00172.mst4    +++|**        CIO - COMPUTE I/O RATE.
01094  M01S00173.mst4    +++|*
01095  M01S00174.mst4    +++|*         USES   X - 1, 2, 5, 6.
01096  M01S00175.mst4    +++|*                A - 1, 2, 5, 6.
01097  M01S00176.mst4    +++|*                B - NONE.
01098  M01S00177.mst4    +++|*
01099  M01S00178.mst4    +++|*         CALLS  CDD, CFD, MES.
01100  M01S00179.mst4    +++|
01101  M01S00180.mst4    +++|
01102  M01S00181.mst4    +++| CIO      SUBR               ENTRY/EXIT
01103  M01S00182.mst4    +++|          SA1    CIOA        GET ELAPSED TIME
01104  M01S00183.mst4    +++|          SA5    NS          SET NUMBER OF I/O-S
01105  M01S00184.mst4    +++|          AX5    7
01106  M01S00185.mst4    +++|          SA2    CIOD
01107  M01S00186.mst4    +++|          IX5    X2*X5
01108  M01S00187.mst4    +++|          IX1    X5/X1
01109  M01S00188.mst4    +++|          RJ     CFD         CONVERT TO FLOATING POINT
01110  M01S00189.mst4    +++|          SA6    CIOB+2
01111  M01S00190.mst4    +++|          SA1    IO
01112  M01S00191.mst4    +++|          RJ     CDD         CONVERT TO DISPLAY
01113  M01S00192.mst4    +++|          SA6    CIOC+2
01114  M01S00193.mst4    +++|          SX1    CIOB
01115  M01S00194.mst4    +++|          RJ     MES         SEND I/O-S PER SECOND MESSAGE
01116  M01S00195.mst4    +++|          SX1    CIOC
01117  M01S00196.mst4    +++|          RJ     MES
01118  M01S00197.mst4    +++|          EQ     CIOX        RETURN
01119  M01S00198.mst4    +++|
01120  M01S00199.mst4    +++| CIOA     CON    0           ELAPSED TIME
01121  M01S00200.mst4    +++| CIOB     DATA   C*    IO PER SECOND = XXXXXX.XXX.*
01122  M01S00201.mst4    +++| CIOC     DATA   C*  NUMBER OF I/O-S = XXXXXXXXXX.*
01123  M01S00202.mst4    +++| CIOD     CON    1000D*1000D
Line S00633 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01124  M02S00633.mst4    ---| CTR      SPACE  4,10
01125  M01S00203.mst4    +++| CTR      SPACE  4,15
01126  M01S00634.mst     +++|**        CTR - COMPUTE TRANSFER RATE.
01127  M01S00635.mst     +++|*
Line S00636 Modification History
M01 (Added by) mst
M02 (Updated by) mst1
Seq #  *Modification Id* Act 
----------------------------+
01128  M02S00636.mst1    ---|*         ENTRY  (NS) = NUMBER OF SECTORS TRANSFERED.
01129  M01S00045.mst1    +++|*         ENTRY  (CTRB) = NUMBER OF SECTORS TRANSFERRED.
01130  M01S00637.mst     +++|*                (ST) = START TIME.
01131  M01S00638.mst     +++|*
01132  M01S00639.mst     +++|*         EXIT   TRANSFER RATE MESSAGE ISSUED TO DAYFILE.
01133  M01S00204.mst4    +++|*
01134  M01S00205.mst4    +++|*         USES   X - 0, 1, 2, 3, 6.
01135  M01S00206.mst4    +++|*                A - 1, 2, 6.
01136  M01S00207.mst4    +++|*                B - NONE.
01137  M01S00208.mst4    +++|*
01138  M01S00209.mst4    +++|*         CALLS  CFD, MES.
01139  M01S00210.mst4    +++|*
01140  M01S00211.mst4    +++|*         MACROS RTIME.
01141  M01S00640.mst     +++|
01142  M01S00641.mst     +++|
01143  M01S00642.mst     +++| CTR      SUBR               ENTRY/EXIT
01144  M01S00643.mst     +++|          RTIME  ET          GET ENDING TIME
Line S00644 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01145  M02S00644.ns22000 ---|          SA1    ST          COMPUTE ELAPSED TIME.
01146  M01S00032.ns22000 +++|          SA1    ST          COMPUTE ELAPSED TIME
01147  M01S00645.mst     +++|          SA2    ET
01148  M01S00646.mst     +++|          MX0    -36
01149  M01S00647.mst     +++|          BX1    -X0*X1
01150  M01S00648.mst     +++|          BX2    -X0*X2
01151  M01S00649.mst     +++|          IX2    X2-X1
01152  M01S00212.mst4    +++|          BX6    X2
01153  M01S00213.mst4    +++|          SA6    CIOA
Line S00650 Modification History
M01 (Added by) mst
M02 (Updated by) mst1
Seq #  *Modification Id* Act 
----------------------------+
01154  M02S00650.mst1    ---|          SA1    NS
01155  M01S00046.mst1    +++|          SA1    CTRB
01156  M01S00651.mst     +++|          SX3    640*1000/64
01157  M01S00652.mst     +++|          LX3    6
01158  M01S00653.mst     +++|          IX3    X1*X3       CHAR
01159  M01S00654.mst     +++|          IX1    X3/X2
01160  M01S00655.mst     +++|          RJ     CFD         CONVERT TO DISPLAY CODE
01161  M01S00656.mst     +++|          SA6    CTRA+2
01162  M01S00657.mst     +++|          SX1    CTRA        SEND TRANSFER RATE MESSAGE
01163  M01S00658.mst     +++|          RJ     MES
01164  M01S00659.mst     +++|          EQ     CTRX        RETURN
01165  M01S00660.mst     +++|
Line S00661 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01166  M02S00661.ns22000 ---| CTRA     DATA   C*MST TRANSFER RATE = 00000.0000 KC.*
01167  M01S00033.ns22000 +++| CTRA     DATA   C*MST TRANSFER RATE = XXXXXX.XXX KC.*
01168  M01S00047.mst1    +++| CTRB     CON    0           SECTORS TRANSFERRED
Line S00662 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01169  M02S00662.mst4    ---|          SPACE  4
Line S00663 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01170  M02S00663.mst4    ---|*         THE FOLLOWING SUBROUTINE PERFORMS THE CONVERSION OF
Line S00664 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01171  M02S00664.mst4    ---|*         LOGICAL TO PHYSICAL DISK ADDRESS.  IT IS OVERLAYED BY
Line S00665 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01172  M02S00665.mst4    ---|*         THE CONVERSION ROUTINE FOR THE SPECIFIED EQUIPMENT.
Line S00666 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01173  M02S00666.mst4    ---| CVA      SPACE  4
01174  M01S00214.mst4    +++| CVA      SPACE  4,15
01175  M01S00667.mst     +++|**        CVA - CONVERT ADDRESS.
01176  M01S00668.mst     +++|*
01177  M01S00215.mst4    +++|*         THIS SUBROUTINE PERFORMS THE CONVERSION OF LOGICAL
01178  M01S00216.mst4    +++|*         TO PHYSICAL DISK ADDRESS.  IT IS OVERLAYED BY THE
01179  M01S00217.mst4    +++|*         THE CONVERSION ROUTINE FOR THE SPECIFIED EQUIPMENT.
01180  M01S00218.mst4    +++|*
01181  M01S00669.mst     +++|*         ENTRY  (B6) = MESSAGE ADDRESS.
01182  M01S00670.mst     +++|*
01183  M01S00671.mst     +++|*         EXIT   NONE.
01184  M01S00672.mst     +++|*
Line S00673 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01185  M02S00673.mst4    ---|*         USES   X - ALL.
Line S00674 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01186  M02S00674.mst4    ---|*                B - NONE.
Line S00675 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01187  M02S00675.mst4    ---|*                A - 1, 2, 3, 6.
01188  M01S00219.mst4    +++|*         USES   X - 0, 1, 2, 6, 7.
01189  M01S00220.mst4    +++|*                A - 1, 2, 6, 7.
01190  M01S00221.mst4    +++|*                B - NONE.
01191  M01S00676.mst     +++|*
01192  M01S00677.mst     +++|*         CALLS  WOD.
01193  M01S00678.mst     +++|
01194  M01S00001.284l847 +++|*         WILL NEED WORK HERE FOR MULTI-PARTITION DEVICES.
01195  M01S00002.284l847 +++|
01196  M01S00679.mst     +++|
01197  M01S00680.mst     +++| CVA      PS                 ENTRY/EXIT
01198  M01S00681.mst     +++|          SA2    D+6         PLACE TRACK AND SECTOR
01199  M01S00682.mst     +++|          MX0    -12
01200  M01S00683.mst     +++|          AX2    12
01201  M01S00684.mst     +++|          BX6    -X0*X2
01202  M01S00685.mst     +++|          AX2    12
01203  M01S00686.mst     +++|          BX7    -X0*X2
01204  M01S00687.mst     +++|          LX7    15*3
Line S00688 Modification History
M01 (Added by) mst
M02 (Updated by) mst8
Seq #  *Modification Id* Act 
----------------------------+
01205  M02S00688.mst8    ---|          LX6    10*3
01206  M01S00004.mst8    +++|          LX6    9*3
01207  M01S00689.mst     +++|          BX1    X7+X6
01208  M01S00690.mst     +++|          RJ     WOD
01209  M01S00691.mst     +++|          SA1    CVAA
01210  M01S00692.mst     +++|          SA2    A1+B1
01211  M01S00693.mst     +++|          IX6    X1+X6
01212  M01S00694.mst     +++|          IX7    X2+X7
01213  M01S00695.mst     +++|          SA6    B6
01214  M01S00696.mst     +++|          SA7    B6+B1
01215  M01S00697.mst     +++|          EQ     CVA         RETURN
01216  M01S00698.mst     +++|
01217  M01S00699.mst     +++| CVAA     CON    10HT0000 S000-10H0000000000
Line S00700 Modification History
M01 (Added by) mst
M02 (Updated by) mst8
Seq #  *Modification Id* Act 
----------------------------+
01218  M02S00700.mst8    ---|          CON    10H.         -10H0000000000
01219  M01S00005.mst8    +++|          CON    10H0.        -10H0000000000
01220  M01S00701.mst     +++|          BSS    10
01221  M01S00702.mst     +++| CVAE     BSS    0
Line S00703 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01222  M02S00703.mst4    ---| DCH      SPACE  4
01223  M01S00222.mst4    +++| DCH      SPACE  4,15
01224  M01S00704.mst     +++|**        DCH - DATA CHECK.
01225  M01S00705.mst     +++|*
01226  M01S00706.mst     +++|*         ENTRY  (SBUF - SBUF+77B) = SECTOR TO BE CHECKED.
01227  M01S00707.mst     +++|*
01228  M01S00708.mst     +++|*         USES   X - 0, 1, 2, 6, 7.
01229  M01S00223.mst4    +++|*                A - 1, 2, 6, 7.
01230  M01S00709.mst     +++|*                B - 2, 5, 6, 7.
Line S00710 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01231  M02S00710.mst4    ---|*                A - 1, 2, 6, 7.
Line S00711 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01232  M02S00711.mst4    ---|*
Line S00712 Modification History
M01 (Added by) mst
M02 (Updated by) mst4
Seq #  *Modification Id* Act 
----------------------------+
01233  M02S00712.mst4    ---|*         CALLS  COD, GDB, MSG=, WOD.
01234  M01S00224.mst4    +++|*
01235  M01S00225.mst4    +++|*         CALLS  COD, GDB, WOD.
01236  M01S00226.mst4    +++|*
01237  M01S00227.mst4    +++|*         MACROS MESSAGE.
01238  M01S00713.mst     +++|
01239  M01S00714.mst     +++|
01240  M01S00715.mst     +++| DCH4     NZ     B7,DCHX     IF ERRORS FOUND RETURN
Line S00716 Modification History
M01 (Added by) mst
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01241  M02S00716.ns22000 ---|          MESSAGE  (=C* DATA OK.*)
01242  M01S00034.ns22000 +++|          MESSAGE  (=C*DATA OK.*)
01243  M01S00717.mst     +++|
01244  M01S00718.mst     +++| DCH      SUBR               ENTRY/EXIT
01245  M01S00048.mst1    +++|          SA1    ND
01246  M01S00049.mst1    +++|          ZR     X1,DCHX     IF NO DATA GENERATED
01247  M01S00719.mst     +++|          SA1    SBUF+1
01248  M01S00720.mst     +++|          SB5    B1
01249  M01S00721.mst     +++|          BX6    X1
01250  M01S00722.mst     +++|          SA6    TBUF+1
01251  M01S00723.mst     +++|          SB7    B0+
01252  M01S00724.mst     +++|          RJ     GDB         REGENERATE DATA
01253  M01S00725.mst     +++| DCH1     SB6    77B
01254  M01S00726.mst     +++| DCH2     SA1    TBUF+B5
01255  M01S00727.mst     +++|          SA2    SBUF+B5
01256  M01S00728.mst     +++|          SB5    B5+B1
01257  M01S00729.mst     +++|          BX7    X2-X1
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/mst.txt · Last modified: by 127.0.0.1