Seq # *Modification Id* Act
----------------------------+
06159 M01S00054.t2807 +++| EQ PRS2.2 CHECK NEXT OPTION IN TABLE
06160 M01S00055.t2807 +++|
06161 M01S00056.t2807 +++| PRS2.3 LX2 18 GET SHIFT COUNT
06162 M01S00057.t2807 +++| SB2 X2
06163 M01S00058.t2807 +++| LX2 12 GET SET/CLEAR STATUS
06164 M01S00059.t2807 +++| BX2 -X0*X2
06165 M01S00060.t2807 +++| SX6 B1
06166 M01S00061.t2807 +++| LX2 B2 SET/CLEAR DEFAULT OPTION
06167 M01S00062.t2807 +++| LX6 B2
06168 M01S00063.t2807 +++| BX7 -X6*X7
06169 M01S00064.t2807 +++| BX7 X7+X2
06170 M01S00065.t2807 +++| SA1 A1+B1
06171 M01S00066.t2807 +++| EQ PRS2.1 CHECK NEXT OPTION ON COMMAND
06172 M01S00067.t2807 +++|
06173 M01S00068.t2807 +++| PRS2.4 SA7 A3 SET DEFAULT TAPE OPTION
06174 M01S00069.t2807 +++| EQ PRS3 CHECK *DEFTOS*
06175 M01S00070.t2807 +++|
06176 M01S00071.t2807 +++| PRS2.5 SA1 =0LDEFTO GET PARAMETER IMAGE
06177 M01S00072.t2807 +++| BX7 X1
06178 M01S00073.t2807 +++| SA1 DT
06179 M01S00074.t2807 +++| EQ PRS4 ISSUE ERROR MESSAGE
06180 M01S00075.t2807 +++|
06181 M00S05640.ldistap +++| PRS3 MX0 42 CHECK *DEFTOS*
06182 M00S05641.ldistap +++| SA1 DS
06183 M00S05642.ldistap +++| ZR X1,PRS5 IF *DEFTOS* NOT SPECIFIED
| Line S05643 Modification History |
M01 (Removed by) | t2807 |
Seq # *Modification Id* Act
----------------------------+
06184 M01S05643.t2807 ---| SRCHTAB X1,TDEF,0,1,TDEFL
06185 M01S05644.t2807 ---| SA1 =0LDEFTOS
06186 M01S05645.t2807 ---| BX7 X1
06187 M01S05646.t2807 ---| NZ X6,PRS4 IF VALUE NOT FOUND
06188 M01S05647.t2807 ---| BX6 -X0*X2 SAVE VALUE FOR *DEFTOS*
06189 M01S05648.t2807 ---| SA6 DFS
| Line S00076 Modification History |
M01 (Added by) | t2807 |
Seq # *Modification Id* Act
----------------------------+
06190 M01S00076.t2807 +++| SB2 DS
06191 M01S00077.t2807 +++| RJ USB UNPACK STRING BUFFER
06192 M01S00078.t2807 +++| SX6 B0 FLAG LAST OPTION
06193 M01S00079.t2807 +++| SA6 B7+B1
06194 M01S00080.t2807 +++| SA1 B6 GET FIRST COMMAND OPTION
06195 M01S00081.t2807 +++| MX0 -12
06196 M01S00082.t2807 +++| SA3 TMS GET DEFAULT OPTIONS
06197 M01S00083.t2807 +++| BX7 X3
06198 M01S00084.t2807 +++| PRS3.1 ZR X1,PRS3.4 IF NO MORE OPTIONS
06199 M01S00085.t2807 +++| SA2 TDES GET FIRST OPTION IN TABLE
06200 M01S00086.t2807 +++| PRS3.2 ZR X2,PRS3.5 IF UNKNOWN OPTION
06201 M01S00087.t2807 +++| BX6 -X0*X2
06202 M01S00088.t2807 +++| BX6 X6-X1
06203 M01S00089.t2807 +++| ZR X6,PRS3.3 IF OPTIONS MATCH
06204 M01S00090.t2807 +++| SA2 A2+B1
06205 M01S00091.t2807 +++| EQ PRS3.2 CHECK NEXT OPTION IN TABLE
06206 M01S00092.t2807 +++|
06207 M01S00093.t2807 +++| PRS3.3 LX2 18 GET SHIFT COUNT
06208 M01S00094.t2807 +++| SB2 X2
06209 M01S00095.t2807 +++| LX2 12 GET SET/CLEAR STATUS
06210 M01S00096.t2807 +++| BX2 -X0*X2
06211 M01S00097.t2807 +++| SX6 B1
06212 M01S00098.t2807 +++| LX2 B2 SET/CLEAR DEFAULT OPTION
06213 M01S00099.t2807 +++| LX6 B2
06214 M01S00100.t2807 +++| BX7 -X6*X7
06215 M01S00101.t2807 +++| BX7 X7+X2
06216 M01S00102.t2807 +++| SA1 A1+B1
06217 M01S00103.t2807 +++| EQ PRS3.1 CHECK NEXT OPTION ON COMMAND
06218 M01S00104.t2807 +++|
06219 M01S00105.t2807 +++| PRS3.4 SA7 A3 SET DEFAULT TAPE OPTION
06220 M00S05649.ldistap +++| EQ PRS5 CHECK *FM*
06221 M00S05650.ldistap +++|
| Line S00106 Modification History |
M01 (Added by) | t2807 |
Seq # *Modification Id* Act
----------------------------+
06222 M01S00106.t2807 +++| PRS3.5 SA1 =0LDEFTOS GET PARAMETER IMAGE
06223 M01S00107.t2807 +++| BX7 X1
06224 M01S00108.t2807 +++| SA1 DS
06225 M00S05651.ldistap +++| PRS4 SA7 PI SAVE PARAMETER IMAGE
06226 M00S05652.ldistap +++| SB2 1R$ SET VALUE IMAGE IN MESSAGE
06227 M00S05653.ldistap +++| SB3 DFIV
06228 M00S05654.ldistap +++| SB5 -B3
06229 M00S05655.ldistap +++| RJ SNM SET NAME IN MESSAGE
06230 M00S05656.ldistap +++| SA1 PI SET PARAMETER IMAGE IN MESSAGE
06231 M00S05657.ldistap +++| SB2 1R#
06232 M00S05658.ldistap +++| SB3 DFIV
06233 M00S05659.ldistap +++| SB5 -B3
06234 M00S05660.ldistap +++| RJ SNM SET NAME IN MESSAGE
06235 M00S05661.ldistap +++| SX5 DFIV *INCORRECT VALUE FOR PP PARAMETER - VVVV.*
06236 M00S05662.ldistap +++| EQ ABT ABORT PROGRAM
06237 M00S05663.ldistap +++|
06238 M00S05664.ldistap +++| PRS5 SA1 FM CHECK *FM*
06239 M00S05665.ldistap +++| SA2 =1L*
06240 M00S05666.ldistap +++| BX1 X1-X2
06241 M00S05667.ldistap +++| NZ X1,PRS6 IF NOT ALL FAMILIES
06242 M00S05668.ldistap +++| SX6 B1 FLAG ALL FAMILIES
06243 M00S05669.ldistap +++| SA6 A1
06244 M00S05670.ldistap +++| PRS6 RDMEM ABS,FOTP,1,FFO GET FAMILY ORDINAL TABLE ADDRESS
06245 M00S05671.ldistap +++| MX0 -24
06246 M00S05672.ldistap +++| LX2 24
06247 M00S05673.ldistap +++| BX6 -X0*X2
06248 M00S05674.ldistap +++| SA6 FFO
06249 M00S05675.ldistap +++| MX0 -12 GET MAXIMUM FOT ENTRIES
06250 M00S05676.ldistap +++| LX2 12
06251 M00S05677.ldistap +++| BX7 -X0*X2
06252 M00S05678.ldistap +++| SA7 MXF
06253 M00S05679.ldistap +++| RDMEM ABS,X6,X7,FBUF GET FAMILY ORDINAL TABLE
06254 M00S05680.ldistap +++| REPRIEVE RPVA,SET,237B SET EXTENDED REPRIEVE
06255 M00S05681.ldistap +++| EQ PRSX RETURN
06256 M00S05682.ldistap +++| RPV SPACE 4,15
06257 M00S05683.ldistap +++|** RPV - REPRIEVE PROCESSOR.
06258 M00S05684.ldistap +++|*
06259 M00S05685.ldistap +++|* ENTRY (PPC) = 0 IF ABORT ON PP ERROR.
06260 M00S05686.ldistap +++|* = FET ADDRESS IF DO NOT ABORT ON PP ERROR.
06261 M00S05687.ldistap +++|*
06262 M00S05688.ldistap +++|* EXIT (PPC) = 0.
06263 M00S05689.ldistap +++|* (PPS) .NE. IF PP ERROR.
06264 M00S05690.ldistap +++|* COMPLETION BIT SET IN PP ERROR FET.
06265 M00S05691.ldistap +++|*
06266 M00S05692.ldistap +++|* USES X - 0, 1, 5, 6.
06267 M00S05693.ldistap +++|* A - 1, 6.
06268 M00S05694.ldistap +++|*
06269 M00S05695.ldistap +++|* CALLS ABT.
06270 M00S05696.ldistap +++|*
06271 M00S05697.ldistap +++|* MACROS REPRIEVE.
06272 M00S05698.ldistap +++|
06273 M00S05699.ldistap +++|
06274 M00S05700.ldistap +++| RPV BSS 0 ENTRY/EXIT
06275 M00S05701.ldistap +++| MX0 -12 CHECK ERROR FLAG
06276 M00S05702.ldistap +++| SA1 RPVA+/COMSRPV/OSEF
06277 M00S05703.ldistap +++| BX1 -X0*X1
06278 M00S05704.ldistap +++| SX1 X1-PPET
06279 M00S05705.ldistap +++| SX5 B0
06280 M00S05706.ldistap +++| NZ X1,ABT IF NOT PP CALL ERROR
06281 M00S05707.ldistap +++| SA1 PPC
06282 M00S05708.ldistap +++| ZR X1,ABT IF NOT PP CHECK
06283 M00S05709.ldistap +++| SX6 B0 CLEAR PP CHECK FLAG
06284 M00S05710.ldistap +++| SA6 A1
06285 M00S05711.ldistap +++| SX6 B1 SET PP ERROR FLAG
06286 M00S05712.ldistap +++| SA6 PPS
06287 M00S05713.ldistap +++| MX0 42 SET COMPLETION BIT IN FET
06288 M00S05714.ldistap +++| SA1 X1
06289 M00S05715.ldistap +++| BX1 X0*X1
06290 M00S05716.ldistap +++| SX6 3
06291 M00S05717.ldistap +++| BX6 X1+X6
06292 M00S05718.ldistap +++| SA6 A1
06293 M00S05719.ldistap +++| REPRIEVE RPVA,RESUME,237B RESUME PROGRAM EXECUTION
06294 M00S05720.ldistap +++|
06295 M00S05721.ldistap +++| RPVA RPVBLK RPV REPRIEVE BLOCK
06296 M00S05722.ldistap +++| SPACE 4,10
06297 M00S05723.ldistap +++| QUAL *
06298 M00S05724.ldistap +++| TMSOFF EQU /TMSON/TMSOFF *TMSOFF* ENTRY POINT
06299 M00S05725.ldistap +++| TMSON EQU /TMSON/TMSON *TMSON* ENTRY POINT
06300 M00S05726.ldistap +++| TITLE FIELD LENGTH DEFINITIONS.
06301 M00S05727.ldistap +++| RFL SPACE 4,10
06302 M00S05728.ldistap +++|** FIELD LENTH DEFINITION.
06303 M00S05729.ldistap +++|
06304 M00S05730.ldistap +++|
06305 M00S05731.ldistap +++| RFL IFGT BUFF+BUFFL,*
06306 M00S05732.ldistap +++| RFL= EQU BUFF+BUFFL PROGRAM FIELD LENGTH
06307 M00S05733.ldistap +++| RFL ELSE
06308 M00S05734.ldistap +++| RFL= EQU * PROGRAM FIELD LENGTH
06309 M00S05735.ldistap +++| RFL ENDIF
06310 M00S05736.ldistap +++| SPACE 4
06311 M00S05737.ldistap +++| END