cdc:nos2.source:opl.opl871:deck:catlist.002
Deck CATLIST Part 002
16 Modifications
Listing Sections
- Deck CATLIST Start
- Deck CATLIST Part 1 (Line 1067)
- Deck CATLIST Part 2 (Line 2213)
Source
Seq # *Modification Id* Act ----------------------------+ 02213 M02S00023.253l688 ---|* ENTRY (X6) = FILE NAME (SPACE FILLED). 02214 M02S00024.253l688 ---|* 02215 M02S00025.253l688 ---|* EXIT (X6) = FILE NAME WITH TRAILING *)*. 02216 M02S00026.253l688 ---|* 02217 M02S00027.253l688 ---|* USES X - 1, 2, 3, 6. 02218 M02S00028.253l688 ---|* A - 3. 02219 M02S00029.253l688 ---| 02220 M02S00030.253l688 ---| 02221 M02S00031.253l688 ---| MTP SUBR ENTRY/EXIT 02222 M02S00032.253l688 ---| BX3 X6 02223 M02S00033.253l688 ---| MX2 6 SET UP MASK 02224 M02S00034.253l688 ---| LX2 -6 02225 M02S00035.253l688 ---| LX3 12 02226 M02S00036.253l688 ---| MTP1 MX1 -6 CHECK NEXT CHARACTER 02227 M02S00037.253l688 ---| BX1 -X1*X3 02228 M02S00038.253l688 ---| SX1 X1-1R 02229 M02S00039.253l688 ---| ZR X1,MTP2 IF BLANK (END OF NAME) 02230 M02S00040.253l688 ---| LX2 -6 MOVE MASK 02231 M02S00041.253l688 ---| LX3 6 02232 M02S00042.253l688 ---| EQ MTP1 CHECK NEXT CHARACTER 02233 M02S00043.253l688 ---| 02234 M02S00044.253l688 ---| MTP2 SA3 MTPA )))))))))) 02235 M02S00045.253l688 ---| BX1 X2*X3 02236 M02S00046.253l688 ---| BX6 -X2*X6 02237 M02S00047.253l688 ---| BX6 X6+X1 INSERT PARENTHESIS 02238 M02S00048.253l688 ---| EQ MTPX RETURN 02239 M02S00049.253l688 ---| 02240 M02S00050.253l688 ---| MTPA DATA 10H))))))))))
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | catli6 |
Seq # *Modification Id* Act ----------------------------+ 02241 M01S00051.catli6 +++| NIP SPACE 4,10
| Line S00492 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02242 M01S00492.ns22000 +++|** NIP - NEXT INDEX PRESET (PRESET *GNI*). 02243 M01S00493.ns22000 +++|* 02244 M01S00494.ns22000 +++|* ENTRY (X1) = ENTRY COUNT. 02245 M01S00495.ns22000 +++|* 02246 M01S00496.ns22000 +++|* EXIT TEMPORARY CELLS PRESET FOR *GNI*. 02247 M01S00497.ns22000 +++|* 02248 M01S00498.ns22000 +++|* USES X - 1, 3, 6, 7. 02249 M01S00499.ns22000 +++|* A - 6, 7. 02250 M01S00500.ns22000 +++| 02251 M01S00501.ns22000 +++| 02252 M01S00502.ns22000 +++| NIP SUBR ENTRY/EXIT 02253 M01S00503.ns22000 +++| MX6 0 02254 M01S00504.ns22000 +++| SX3 7 LINE LENGTH 02255 M01S00505.ns22000 +++| SA6 GNIA 02256 M01S00506.ns22000 +++| SA6 GNIB 02257 M01S00507.ns22000 +++| SA6 GNIE 02258 M01S00508.ns22000 +++| NIP1 IX1 X1-X3 DIVIDE BY 7 02259 M01S00509.ns22000 +++| SX6 X6+B1 02260 M01S00510.ns22000 +++| PL X1,NIP1 IF NOT POSITION IN ROW 02261 M01S00511.ns22000 +++| IX7 X3+X1 02262 M01S00512.ns22000 +++| SA6 GNIC 02263 M01S00513.ns22000 +++| SA7 GNID
| Line S00514 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02264 M02S00514.253l688 ---| EQ NIP RETURN
| Line S00175 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02265 M01S00175.253l688 +++| EQ NIPX RETURN 02266 M00S01063.catlist +++| PAS SPACE 4,15
| Line S01064 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02267 M01S01064.253l688 ---|** PAS - PRINT ACCUMULATED FILE SIZE.
| Line S00176 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02268 M01S00176.253l688 +++|** PAS - PRINT ACCUMULATED STATISTICS. 02269 M00S01065.catlist +++|*
| Line S01066 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02270 M01S01066.253l688 ---|* ENTRY (FSI) = ACCUMULATED INDIRECT FILE SIZE. 02271 M01S01067.253l688 ---|* (FSD) = ACCUMULATED DIRECT ACCESS FILE SIZE. 02272 M01S01068.253l688 ---|* (FCI) = NUMBER OF INDIRECT ACCESS FILES.
| Line S00177 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02273 M02S00177.catli7 ---|* ENTRY (FCI, FSI) = INDIRECT ACCESS DISK FILE COUNT AND SIZE. 02274 M02S00178.catli7 ---|* (FCD, FSD) = DIRECT ACCESS DISK FILE COUNT AND SIZE. 02275 M02S00179.catli7 ---|* (FCC, FSC) = CARTRIDGE FILE COUNT AND SIZE. 02276 M02S00180.catli7 ---|* (FCT, FST) = TAPE FILE COUNT AND SIZE.
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02277 M01S00029.catli7 +++|* ENTRY (FCID, FSID) = INDIRECT ACCESS DISK FILE COUNT, SIZE. 02278 M01S00030.catli7 +++|* (FCDD, FSDD) = DIRECT ACCESS DISK FILE COUNT, SIZE. 02279 M01S00031.catli7 +++|* (FCIA, FSIS) = IAPF ON ALTERNATE STORAGE COUNT, SIZE. 02280 M01S00032.catli7 +++|* (FCDA, FSDA) = DAPF ON ALTERNATE STORAGE COUNT, SIZE.
| Line S01069 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02281 M01S01069.ns22000 ---|* (FSD) = ACCUMULATED DIRECT ACCESS FILE SIZE. 02282 M00S01070.catlist +++|*
| Line S01071 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02283 M01S01071.ns22000 ---|* USES X - 1, 6. 02284 M01S01072.ns22000 ---|* A - 1, 6. 02285 M01S01073.ns22000 ---|* B - 2.
| Line S00515 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02286 M02S00515.253l688 ---|* USES X - 1, 2, 6. 02287 M02S00516.253l688 ---|* A - 1, 2, 6. 02288 M02S00517.253l688 ---|* B - 2, 3.
| Line S00181 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02289 M01S00181.253l688 +++|* USES X - 1, 2. 02290 M01S00182.253l688 +++|* A - 1, 2. 02291 M01S00183.253l688 +++|* B - 2, 3, 5. 02292 M00S01074.catlist +++|*
| Line S01075 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02293 M01S01075.253l688 ---|* CALLS ALN, CDD.
| Line S00184 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02294 M01S00184.253l688 +++|* CALLS ALN, CDD, SNM. 02295 M00S01076.catlist +++|*
| Line S01077 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02296 M01S01077.253l688 ---|* MACROS WRITEC, WRITEH.
| Line S00185 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02297 M01S00185.253l688 +++|* MACROS WRITEC. 02298 M00S01078.catlist +++| 02299 M00S01079.catlist +++| 02300 M00S01080.catlist +++| PAS SUBR ENTRY/EXIT
| Line S01081 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02301 M01S01081.253l688 ---| SB2 3 ADVANCE LINE COUNT BY 3
| Line S00186 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02302 M01S00186.253l688 +++| SB2 5 ADVANCE LINE COUNT BY 5 02303 M00S01082.catlist +++| RJ ALN
| Line S01083 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02304 M01S01083.253l688 ---| SA1 FSI INDIRECT ACCESS FILE COUNT
| Line S00187 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02305 M01S00187.253l688 +++| 02306 M01S00188.253l688 +++|* PRINT STATISTICS FOR INDIRECT ACCESS FILES ON DISK. 02307 M01S00189.253l688 +++| 02308 M01S00190.253l688 +++| SB5 PASA SET MESSAGE TEMPLATE
| Line S00191 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02309 M02S00191.catli7 ---| SA1 FCI NUMBER OF INDIRECT ACCESS FILES ON DISK
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02310 M01S00033.catli7 +++| SA1 FCID NUMBER OF INDIRECT ACCESS FILES ON DISK
| Line S00192 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02311 M01S00192.253l688 +++| SB3 X1 02312 M01S00193.253l688 +++| ZR B3,PAS2 IF NO INDIRECT ACCESS FILES ON DISK 02313 M01S00194.253l688 +++| NE B3,B1,PAS1 IF MORE THAN ONE FILE 02314 M01S00195.253l688 +++| SB5 PASB USE ALTERNATE MESSAGE TEMPLATE 02315 M01S00196.253l688 +++| PAS1 RJ CDD CONVERT FILE COUNT TO DECIMAL 02316 M01S00197.253l688 +++| MX1 -54 CLEAR LEADING BLANK 02317 M01S00198.253l688 +++| BX1 -X1*X6 02318 M01S00199.253l688 +++| LX1 6 LEFT JUSTIFY NINE-DIGIT INTEGER 02319 M01S00200.253l688 +++| SB2 1R# 02320 M01S00201.253l688 +++| RJ SNM SET FILE COUNT INTO MESSAGE
| Line S00202 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02321 M02S00202.catli7 ---| SA1 FSI TOTAL SIZE OF INDIRECT ACCESS FILES
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02322 M01S00034.catli7 +++| SA1 FSID TOTAL SIZE OF INDIRECT ACCESS FILES 02323 M00S01084.catlist +++| RJ CDD CONVERT TO DECIMAL
| Line S01085 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02324 M01S01085.253l688 ---| SA6 PASA+5 02325 M01S01086.253l688 ---| SA1 FCI INDIRECT ACCESS FILE COUNT
| Line S00203 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02326 M01S00203.253l688 +++| MX1 -54 CLEAR LEADING BLANK 02327 M01S00204.253l688 +++| BX1 -X1*X6 02328 M01S00205.253l688 +++| LX1 6 LEFT JUSTIFY NINE-DIGIT INTEGER 02329 M01S00206.253l688 +++| SB2 1R$ 02330 M01S00207.253l688 +++| RJ SNM SET TOTAL FILE SIZE INTO MESSAGE 02331 M01S00208.253l688 +++| WRITEC O,B5 02332 M01S00209.253l688 +++| 02333 M01S00210.253l688 +++|* PRINT STATISTICS FOR DIRECT ACCESS FILES ON DISK. 02334 M01S00211.253l688 +++| 02335 M01S00212.253l688 +++| PAS2 SB5 PASC SET MESSAGE TEMPLATE
| Line S00213 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02336 M02S00213.catli7 ---| SA1 FCD NUMBER OF DIRECT ACCESS FILES ON DISK
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02337 M01S00035.catli7 +++| SA1 FCDD NUMBER OF DIRECT ACCESS FILES ON DISK
| Line S01087 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02338 M01S01087.ns22000 ---| RJ CDD CONVERT TO DECIMAL
| Line S00518 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02339 M01S00518.ns22000 +++| SB3 X1
| Line S00519 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02340 M02S00519.253l688 ---| NE B1,B3,PAS0 IF MORE THAN ONE FILE 02341 M02S00520.253l688 ---| SA2 PASC CHANGE OUTPUT MESSAGE SYNTAX 02342 M02S00521.253l688 ---| BX6 X2 02343 M02S00522.253l688 ---| SA6 PASA+3 02344 M02S00523.253l688 ---| PAS0 RJ CDD CONVERT TO DECIMAL
| Line S01088 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02345 M01S01088.253l688 ---| SA6 PASA 02346 M01S01089.253l688 ---| SA1 FSD DIRECT ACCESS FILE SIZE
| Line S00214 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02347 M01S00214.253l688 +++| ZR B3,PAS4 IF NO DIRECT ACCESS FILES ON DISK 02348 M01S00215.253l688 +++| NE B3,B1,PAS3 IF MORE THAN ONE FILE 02349 M01S00216.253l688 +++| SB5 PASD USE ALTERNATE MESSAGE TEMPLATE 02350 M01S00217.253l688 +++| PAS3 RJ CDD CONVERT FILE COUNT TO DECIMAL 02351 M01S00218.253l688 +++| MX1 -54 CLEAR LEADING BLANK 02352 M01S00219.253l688 +++| BX1 -X1*X6 02353 M01S00220.253l688 +++| LX1 6 LEFT JUSTIFY NINE-DIGIT INTEGER 02354 M01S00221.253l688 +++| SB2 1R# 02355 M01S00222.253l688 +++| RJ SNM SET FILE COUNT INTO MESSAGE
| Line S00223 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02356 M02S00223.catli7 ---| SA1 FSD TOTAL SIZE OF DIRECT ACCESS FILES
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02357 M01S00036.catli7 +++| SA1 FSDD TOTAL SIZE OF DIRECT ACCESS FILES 02358 M00S01090.catlist +++| RJ CDD CONVERT TO DECIMAL
| Line S01091 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02359 M01S01091.253l688 ---| SA6 PASB+5 02360 M01S01092.253l688 ---| SA1 FCD DIRECT ACCESS FILE COUNT
| Line S00224 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02361 M01S00224.253l688 +++| MX1 -54 CLEAR LEADING BLANK 02362 M01S00225.253l688 +++| BX1 -X1*X6 02363 M01S00226.253l688 +++| LX1 6 LEFT JUSTIFY NINE-DIGIT INTEGER 02364 M01S00227.253l688 +++| SB2 1R$ 02365 M01S00228.253l688 +++| RJ SNM SET TOTAL FILE SIZE INTO MESSAGE 02366 M01S00229.253l688 +++| WRITEC O,B5 02367 M01S00230.253l688 +++|
| Line S00231 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02368 M02S00231.catli7 ---|* PRINT STATISTICS FOR FILES ON CARTRIDGE.
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02369 M01S00037.catli7 +++|* PRINT STATISTICS FOR IAPF-S ON ALTERNATE STORAGE.
| Line S00232 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02370 M01S00232.253l688 +++| 02371 M01S00233.253l688 +++| PAS4 SB5 PASE SET MESSAGE TEMPLATE
| Line S00234 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02372 M02S00234.catli7 ---| SA1 FCC NUMBER OF FILES ON CARTRIDGE
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02373 M01S00038.catli7 +++| SA1 FCIA NUMBER OF IAPF-S ON ALTERNATE STORAGE
| Line S01093 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02374 M01S01093.ns22000 ---| RJ CDD CONVERT TO DECIMAL
| Line S00524 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02375 M01S00524.ns22000 +++| SB3 X1
| Line S00525 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02376 M02S00525.253l688 ---| NE B1,B3,PAS0.1 IF MORE THAN ONE FILE 02377 M02S00526.253l688 ---| SA2 PASD CHANGE OUTPUT MESSAGE SYNTAX 02378 M02S00527.253l688 ---| BX6 X2 02379 M02S00528.253l688 ---| SA6 PASB+2 02380 M02S00529.253l688 ---| SA2 A2+B1 02381 M02S00530.253l688 ---| BX6 X2 02382 M02S00531.253l688 ---| SA6 PASB+3 02383 M02S00532.253l688 ---| PAS0.1 RJ CDD CONVERT TO DECIMAL
| Line S01094 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02384 M01S01094.253l688 ---| SA6 PASB 02385 M01S01095.253l688 ---| SA1 FCI 02386 M01S01096.253l688 ---| ZR X1,PAS1 IF NO INDIRECT ACCESS FILES 02387 M01S01097.253l688 ---| WRITEH O,PASA,PASAL 02388 M01S01098.253l688 ---| PAS1 SA1 FCD 02389 M01S01099.253l688 ---| ZR X1,PAS2 IF NO DIRECT ACCESS FILES 02390 M01S01100.253l688 ---| WRITEH O,PASB,PASBL 02391 M01S01101.253l688 ---| PAS2 WRITEC O,BLK
| Line S00235 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02392 M02S00235.catli7 ---| ZR B3,PAS6 IF NO FILES ON CARTRIDGE
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02393 M01S00039.catli7 +++| ZR B3,PAS6 IF NO IAPF-S ON ALTERNATE STORAGE
| Line S00236 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02394 M01S00236.253l688 +++| NE B3,B1,PAS5 IF MORE THAN ONE FILE 02395 M01S00237.253l688 +++| SB5 PASF USE ALTERNATE MESSAGE TEMPLATE 02396 M01S00238.253l688 +++| PAS5 RJ CDD CONVERT FILE COUNT TO DECIMAL 02397 M01S00239.253l688 +++| MX1 -54 CLEAR LEADING BLANK 02398 M01S00240.253l688 +++| BX1 -X1*X6 02399 M01S00241.253l688 +++| LX1 6 LEFT JUSTIFY NINE-DIGIT INTEGER 02400 M01S00242.253l688 +++| SB2 1R# 02401 M01S00243.253l688 +++| RJ SNM SET FILE COUNT INTO MESSAGE
| Line S00244 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02402 M02S00244.catli7 ---| SA1 FSC TOTAL SIZE OF FILES ON CARTRIDGE
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02403 M01S00040.catli7 +++| SA1 FSIA TOTAL SIZE OF IAPF-S ON ALTERNATE STORAGE
| Line S00245 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02404 M01S00245.253l688 +++| RJ CDD CONVERT TO DECIMAL 02405 M01S00246.253l688 +++| MX1 -54 CLEAR LEADING BLANK 02406 M01S00247.253l688 +++| BX1 -X1*X6 02407 M01S00248.253l688 +++| LX1 6 LEFT JUSTIFY NINE-DIGIT INTEGER 02408 M01S00249.253l688 +++| SB2 1R$ 02409 M01S00250.253l688 +++| RJ SNM SET TOTAL FILE SIZE INTO MESSAGE 02410 M01S00251.253l688 +++| WRITEC O,B5 02411 M01S00252.253l688 +++|
| Line S00253 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02412 M02S00253.catli7 ---|* PRINT STATISTICS FOR FILES ON TAPE.
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02413 M01S00041.catli7 +++|* PRINT STATISTICS FOR DAPF-S ON ALTERNATE STORAGE.
| Line S00254 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02414 M01S00254.253l688 +++| 02415 M01S00255.253l688 +++| PAS6 SB5 PASG SET MESSAGE TEMPLATE
| Line S00256 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02416 M02S00256.catli7 ---| SA1 FCT NUMBER OF FILES ON TAPE
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02417 M01S00042.catli7 +++| SA1 FCDA NUMBER OF DAPF-S ON ALTERNATE STORAGE
| Line S00257 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02418 M01S00257.253l688 +++| SB3 X1
| Line S00258 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02419 M02S00258.catli7 ---| ZR B3,PAS8 IF NO FILES ON TAPE
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02420 M01S00043.catli7 +++| ZR B3,PAS8 IF NO DAPF-S ON ALTERNATE STORAGE
| Line S00259 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02421 M01S00259.253l688 +++| NE B3,B1,PAS7 IF MORE THAN ONE FILE 02422 M01S00260.253l688 +++| SB5 PASH USE ALTERNATE MESSAGE TEMPLATE 02423 M01S00261.253l688 +++| PAS7 RJ CDD CONVERT FILE COUNT TO DECIMAL 02424 M01S00262.253l688 +++| MX1 -54 CLEAR LEADING BLANK 02425 M01S00263.253l688 +++| BX1 -X1*X6 02426 M01S00264.253l688 +++| LX1 6 LEFT JUSTIFY NINE-DIGIT INTEGER 02427 M01S00265.253l688 +++| SB2 1R# 02428 M01S00266.253l688 +++| RJ SNM SET FILE COUNT INTO MESSAGE
| Line S00267 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02429 M02S00267.catli7 ---| SA1 FST TOTAL SIZE OF FILES ON TAPE
| Line S00044 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02430 M01S00044.catli7 +++| SA1 FSDA TOTAL SIZE OF DAPF-S ON ALTERNATE STORAGE
| Line S00268 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02431 M01S00268.253l688 +++| RJ CDD CONVERT TO DECIMAL 02432 M01S00269.253l688 +++| MX1 -54 CLEAR LEADING BLANK 02433 M01S00270.253l688 +++| BX1 -X1*X6 02434 M01S00271.253l688 +++| LX1 6 LEFT JUSTIFY NINE-DIGIT INTEGER 02435 M01S00272.253l688 +++| SB2 1R$ 02436 M01S00273.253l688 +++| RJ SNM SET TOTAL FILE SIZE INTO MESSAGE 02437 M01S00274.253l688 +++| WRITEC O,B5 02438 M01S00275.253l688 +++| PAS8 WRITEC O,BLK 02439 M00S01102.catlist +++| EQ PASX RETURN 02440 M00S01103.catlist +++| 02441 M00S01104.catlist +++|
| Line S01105 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02442 M01S01105.ns22000 ---| PASA DATA C* XXXXXXXXX INDIRECT ACCESS FILE(S), TOTAL PRUS = XX
| Line S00533 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02443 M02S00533.253l688 ---| PASA DATA C* XXXXXXXXX INDIRECT ACCESS FILES, TOTAL PRUS = XX
| Line S01106 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02444 M01S01106.253l688 ---|,XXXXXXX.* 02445 M01S01107.253l688 ---| PASAL EQU *-PASA
| Line S01108 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02446 M02S01108.253l688 ---| PASB DATA C* XXXXXXXXX DIRECT ACCESS FILE(S), TOTAL PRUS = XX
| Line S00534 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02447 M02S00534.253l688 ---| PASB DATA C* XXXXXXXXX DIRECT ACCESS FILES, TOTAL PRUS = XX
| Line S01109 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02448 M01S01109.253l688 ---|,XXXXXXX.* 02449 M01S01110.253l688 ---| PASBL EQU *-PASB
| Line S00535 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02450 M02S00535.253l688 ---| PASC DATA 10HE, TO 02451 M02S00536.253l688 ---| PASD DATA 20HCESS FILE, TO
| Line S00276 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02452 M01S00276.253l688 +++| PASA DATA C* ######### INDIRECT ACCESS FILES ON DISK. TOTAL PRUS 02453 M01S00277.253l688 +++|, = $$$$$$$$$.* 02454 M01S00278.253l688 +++| PASB DATA C* ######### INDIRECT ACCESS FILE ON DISK. TOTAL PRUS 02455 M01S00279.253l688 +++|, = $$$$$$$$$.* 02456 M01S00280.253l688 +++| 02457 M01S00281.253l688 +++| PASC DATA C* ######### DIRECT ACCESS FILES ON DISK. TOTAL PRUS 02458 M01S00282.253l688 +++|, = $$$$$$$$$.* 02459 M01S00283.253l688 +++| PASD DATA C* ######### DIRECT ACCESS FILE ON DISK. TOTAL PRUS 02460 M01S00284.253l688 +++|, = $$$$$$$$$.* 02461 M01S00285.253l688 +++|
| Line S00286 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02462 M02S00286.catli7 ---| PASE DATA C* ######### FILES ON CARTRIDGE. TOTAL PRUS
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02463 M01S00045.catli7 +++| PASE DATA C* ######### INDIRECTS ON ALTERNATE STORAGE. TOTAL PRUS
| Line S00287 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02464 M01S00287.253l688 +++|, = $$$$$$$$$.*
| Line S00288 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02465 M02S00288.catli7 ---| PASF DATA C* ######### FILE ON CARTRIDGE. TOTAL PRUS
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02466 M01S00046.catli7 +++| PASF DATA C* ######### INDIRECT ON ALTERNATE STORAGE. TOTAL PRUS
| Line S00289 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02467 M01S00289.253l688 +++|, = $$$$$$$$$.* 02468 M01S00290.253l688 +++|
| Line S00291 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02469 M02S00291.catli7 ---| PASG DATA C* ######### FILES ON TAPE. TOTAL PRUS
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02470 M01S00047.catli7 +++| PASG DATA C* ######### DIRECTS ON ALTERNATE STORAGE. TOTAL PRUS
| Line S00292 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02471 M01S00292.253l688 +++|, = $$$$$$$$$.*
| Line S00293 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02472 M02S00293.catli7 ---| PASH DATA C* ######### FILE ON TAPE. TOTAL PRUS
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | catli7 |
Seq # *Modification Id* Act ----------------------------+ 02473 M01S00048.catli7 +++| PASH DATA C* ######### DIRECT ON ALTERNATE STORAGE. TOTAL PRUS
| Line S00294 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02474 M01S00294.253l688 +++|, = $$$$$$$$$.*
| Line S01111 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02475 M01S01111.ns22000 ---| PTP SPACE 4
| Line S00537 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02476 M01S00537.ns22000 +++| PTP SPACE 4,10 02477 M00S01112.catlist +++|** PTP - PRINT TITLE PAGE. 02478 M00S01113.catlist +++|*
| Line S01114 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02479 M01S01114.ns22000 ---|* ENTRY (PG) = PAGE NUMBER
| Line S00538 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02480 M01S00538.ns22000 +++|* ENTRY (PG) = PAGE NUMBER. 02481 M00S01115.catlist +++|*
| Line S01116 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02482 M01S01116.ns22000 ---|* EXIT TITLE PAGE PRINTED
| Line S00539 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02483 M01S00539.ns22000 +++|* EXIT TITLE PAGE PRINTED. 02484 M00S01117.catlist +++|* (LN) RESET TO 2.
| Line S00540 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02485 M01S00540.ns22000 +++|* 02486 M00S01118.catlist +++|* CALLS CDD. 02487 M00S01119.catlist +++| 02488 M00S01120.catlist +++| 02489 M00S01121.catlist +++| PTP SUBR ENTRY/EXIT 02490 M00S01122.catlist +++| SA1 PG ADVANCE TO NEXT PAGE 02491 M00S01123.catlist +++| SX1 X1+B1 02492 M00S01124.catlist +++| BX6 X1 02493 M00S01125.catlist +++| SA6 A1 02494 M00S01126.catlist +++| RJ CDD CONVERT TO DECIMAL 02495 M00S01127.catlist +++| MX0 48 02496 M00S01128.catlist +++| BX6 -X0*X6 02497 M00S01129.catlist +++| SA1 PAGE 02498 M00S01130.catlist +++| BX1 X0*X1 02499 M00S01131.catlist +++| BX6 X1+X6 02500 M00S01132.catlist +++| SA6 PAGE 02501 M00S01133.catlist +++| 02502 M00S01134.catlist +++| DATE DATE 02503 M00S01135.catlist +++| CLOCK TIME 02504 M00S01136.catlist +++| SB2 6 FOR TELEX ORIGIN JOBS 02505 M00S01137.catlist +++| SA1 DT
| Line S00541 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02506 M01S00541.ns22000 +++| SX0 B0+ INITIALIZE LINE COUNTER 02507 M00S01138.catlist +++| ZR X1,PTP1 IF TERMINAL FILE
| Line S01139 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02508 M01S01139.ns22000 ---| WRITEH O,PTPA,B1
| Line S00542 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02509 M01S00542.ns22000 +++| 02510 M01S00543.ns22000 +++| SA1 PD 02511 M01S00544.ns22000 +++| ZR X1,PTP0 IF *PD* ALREADY PROCESSED 02512 M01S00545.ns22000 +++| WRITEC O,A1 02513 M01S00546.ns22000 +++| SX6 B0+ 02514 M01S00547.ns22000 +++| SA6 PD INDICATE *PD* PROCESSED 02515 M01S00548.ns22000 +++| PTP0 WRITEH O,PTPA,B1 02516 M00S01140.catlist +++| SB2 7 FOR NON-TELEX ORIGIN JOBS
| Line S00549 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02517 M01S00549.ns22000 +++| SX0 X0+B1 COUNT PAGE EJECT 02518 M00S01141.catlist +++| PTP1 WRITEH O,PTPB,B2+ WRITE TITLE LINE
| Line S00550 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02519 M01S00550.ns22000 +++| SX0 X0+B1 COUNT TITLE LINE 02520 M00S01142.catlist +++| SA1 PTPC WRITE SUB TITLE 02521 M00S01143.catlist +++| WRITEC O,X1
| Line S01144 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02522 M01S01144.ns22000 ---| SX6 3 RESET LINE NUMBER
| Line S00551 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02523 M01S00551.ns22000 +++| SX0 X0+B1 COUNT SUBTITLE LINE 02524 M01S00552.ns22000 +++| SA1 LN 02525 M01S00553.ns22000 +++| IX6 X1+X0 RESET LINE NUMBER 02526 M00S01145.catlist +++| SA6 LN 02527 M00S01146.catlist +++| EQ PTPX EXIT 02528 M00S01147.catlist +++| 02529 M00S01148.catlist +++| 02530 M00S01149.catlist +++| PTPA CON 1H1 02531 M00S01150.catlist +++| PTPB DATA 30H CATALOG OF 02532 M00S01151.catlist +++| PKNM CON 10H 02533 M00S01152.catlist +++| DATE CON 0 02534 M00S01153.catlist +++| TIME CON 0 02535 M00S01154.catlist +++| PAGE DATA 8L PAGE 02536 M00S01155.catlist +++| 02537 M00S01156.catlist +++| PTPC CON BLK SUBTITLE FLAG 02538 M00S01157.catlist +++| PTPD CON 1H 02539 M00S01158.catlist +++| CON 10HFILE NAME 02540 M00S01159.catlist +++| FILE CON 0 02541 M00S01160.catlist +++| 02542 M00S01161.catlist +++| PTPE CON 1H 02543 M00S01162.catlist +++| CON 10HALTERNATE 02544 M00S01163.catlist +++| CON 10HCATALOG 02545 M00S01164.catlist +++| AUSER CON 0 02546 M00S01165.catlist +++| 02547 M00S01166.catlist +++| RQS SPACE 4,15 02548 M00S01167.catlist +++|** RQS - REQUEST STORAGE. 02549 M00S01168.catlist +++|* 02550 M00S01169.catlist +++|* ENTRY (X1) = CURRENT BUFFER SIZE. 02551 M00S01170.catlist +++|* 02552 M00S01171.catlist +++|* EXIT (X1) = NEGATIVE IF NO MORE STORAGE AVAILABLE. 02553 M00S01172.catlist +++|* (CFL) = NEW CURRENT FL. 02554 M00S01173.catlist +++|* (CBS) = NEW CURRENT BUFFER SIZE. 02555 M00S01174.catlist +++|* 02556 M00S01175.catlist +++|* USES X - 1, 3, 6. 02557 M00S01176.catlist +++|* A - 1, 3, 6. 02558 M00S01177.catlist +++|* 02559 M00S01178.catlist +++|* MACROS MEMORY. 02560 M00S01179.catlist +++| 02561 M00S01180.catlist +++| 02562 M00S01181.catlist +++| RQS SUBR ENTRY/EXIT 02563 M00S01182.catlist +++| SA3 MBS GET MAXIMUM BUFFER SIZE 02564 M00S01183.catlist +++| SX6 X1+FLIN ADD POSSIBLE INCREMENT 02565 M00S01184.catlist +++| IX1 X3-X6 02566 M00S01185.catlist +++| NG X1,RQSX IF NO MORE SPACE 02567 M00S01186.catlist +++| SA3 CFL SET POSSIBLE NEW FL 02568 M00S01187.catlist +++| SX6 X3+FLIN 02569 M00S01188.catlist +++| SA6 A3 02570 M00S01189.catlist +++| LX6 30 02571 M00S01190.catlist +++| SA6 RQSA 02572 M00S01191.catlist +++| MEMORY CM,RQSA,R,,NA 02573 M00S01192.catlist +++| SA3 RQSA 02574 M00S01193.catlist +++| SA1 CFL 02575 M00S01194.catlist +++| AX3 30 02576 M00S01195.catlist +++| IX1 X3-X1 02577 M00S01196.catlist +++| NG X1,RQSX IF NO MORE ALLOCATED 02578 M00S01197.catlist +++| SA1 CBS UPDATE CURRENT SORT BUFFER SIZE 02579 M00S01198.catlist +++| SX6 X1+FLIN 02580 M00S01199.catlist +++| SA6 A1 02581 M00S01200.catlist +++| EQ RQSX RETURN 02582 M00S01201.catlist +++| 02583 M00S01202.catlist +++| 02584 M00S01203.catlist +++| RQSA CON 0 FL CONTROL WORD
| Line S00554 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02585 M01S00554.ns22000 +++| SNP SPACE 4,15 02586 M01S00555.ns22000 +++|** SNP - SET NEXT PAGE. 02587 M01S00556.ns22000 +++|* 02588 M01S00557.ns22000 +++|* ENTRY (X1) = TOTAL NUMBER OF FILES. 02589 M01S00558.ns22000 +++|* 02590 M01S00559.ns22000 +++|* EXIT (X1) = 0 IF NO MORE FILES TO PRINT. 02591 M01S00560.ns22000 +++|* (BO) = BUFFER OFFSET FOR THIS PAGE. 02592 M01S00561.ns22000 +++|* (BL) = BUFFER LENGTH FOR THIS PAGE. 02593 M01S00562.ns22000 +++|* 02594 M01S00563.ns22000 +++|* USES X - 1, 2, 3, 4, 6, 7. 02595 M01S00564.ns22000 +++|* A - 1, 2, 3, 4, 6, 7. 02596 M01S00565.ns22000 +++|* B - 2. 02597 M01S00566.ns22000 +++|* 02598 M01S00567.ns22000 +++|* CALLS ALN, NIP. 02599 M01S00568.ns22000 +++|* 02600 M01S00569.ns22000 +++| 02601 M01S00570.ns22000 +++| 02602 M01S00571.ns22000 +++| SNP4 MX6 0 02603 M01S00572.ns22000 +++| SA6 A2 CLEAR BUFFER OFFSET 02604 M01S00573.ns22000 +++| MX1 0 EXIT WITH NO MORE FILES 02605 M01S00574.ns22000 +++| SA6 A6-B1 02606 M01S00575.ns22000 +++| SNP5 SX7 8 RESET *GSL* LIST ROUTINE 02607 M01S00576.ns22000 +++| SA7 GSLA 02608 M01S00577.ns22000 +++| 02609 M01S00578.ns22000 +++| SNP SUBR ENTRY/EXIT 02610 M01S00579.ns22000 +++| SA2 BO+1 02611 M01S00580.ns22000 +++| IX3 X2-X1 02612 M01S00581.ns22000 +++| BX6 X2 02613 M01S00582.ns22000 +++| ZR X3,SNP4 IF NO MORE FILES TO LIST 02614 M01S00583.ns22000 +++| BX7 X1 02615 M01S00584.ns22000 +++| SA6 A2-B1 SET UP NEW OFFSET 02616 M01S00585.ns22000 +++| SA7 SNPA SAVE (X1) 02617 M01S00586.ns22000 +++| SNP1 SA3 LN 02618 M01S00587.ns22000 +++| SX6 7 LINE LENGTH 02619 M01S00588.ns22000 +++| SA4 LL 02620 M01S00589.ns22000 +++| IX7 X4-X3 02621 M01S00590.ns22000 +++| NG X7,SNP3 IF END OF PAGE 02622 M01S00591.ns22000 +++| ZR X7,SNP3 IF END OF PAGE 02623 M01S00592.ns22000 +++| IX6 X6*X7 02624 M01S00593.ns22000 +++| SA2 BO+1 02625 M01S00594.ns22000 +++| IX7 X6+X2 FORM NEW OFFSET 02626 M01S00595.ns22000 +++| SA1 SNPA 02627 M01S00596.ns22000 +++| IX4 X1-X7 02628 M01S00597.ns22000 +++| PL X4,SNP2 IF MORE THAN ONE PAGE 02629 M01S00598.ns22000 +++| IX7 X7+X4 02630 M01S00599.ns22000 +++| IX6 X6+X4 02631 M01S00600.ns22000 +++| SNP2 SA6 BL COUNT OF FILE NAMES ON PAGE 02632 M01S00601.ns22000 +++| SA7 BO+1 OFFSET FOR NEXT PASS 02633 M01S00602.ns22000 +++| BX1 X6 02634 M01S00603.ns22000 +++| RJ NIP PRESET *GNI* 02635 M01S00604.ns22000 +++| SA1 BL EXIT WITH FILE COUNT 02636 M01S00605.ns22000 +++| EQ SNP5 RETURN 02637 M01S00606.ns22000 +++| 02638 M01S00607.ns22000 +++| SNP3 SB2 B1 02639 M01S00608.ns22000 +++| RJ ALN ADVANCE LINE 02640 M01S00609.ns22000 +++| EQ SNP1 RETURN TO MAIN LINE 02641 M01S00610.ns22000 +++| 02642 M01S00611.ns22000 +++| SNPA CON 0 TEMPORARY STORAGE (TOTAL NUMBER OF FILES)
| Line S01204 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02643 M01S01204.ns22000 ---| SPACE 4
| Line S00612 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02644 M01S00612.ns22000 +++| SPACE 4,10 02645 M00S01205.catlist +++|** COMMON DECKS. 02646 M00S01206.catlist +++| 02647 M00S01207.catlist +++|
| Line S01208 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02648 M01S01208.ns22000 ---|*CALL,COMCCIO
| Line S00613 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02649 M01S00613.ns22000 +++|*CALL COMCCDD 02650 M01S00614.ns22000 +++|*CALL COMCCIO 02651 M01S00615.ns22000 +++|*CALL COMCCOD 02652 M01S00616.ns22000 +++|*CALL COMCCPM 02653 M01S00617.ns22000 +++|*CALL COMCDXB 02654 M01S00618.ns22000 +++|*CALL COMCEDT 02655 M01S00619.ns22000 +++|*CALL COMCLFM 02656 M01S00620.ns22000 +++|*CALL COMCPFM 02657 M01S00621.ns22000 +++|*CALL COMCRDW 02658 M01S00622.ns22000 +++|*CALL COMCSCB 02659 M01S00623.ns22000 +++|*CALL COMCSFN
| Line S00295 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02660 M01S00295.253l688 +++|*CALL COMCSNM 02661 M00S01209.catlist +++|*CALL COMCSST
| Line S01210 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02662 M01S01210.ns22000 ---|*CALL COMCDXB 02663 M01S01211.ns22000 ---|*CALL,COMCSYS 02664 M01S01212.ns22000 ---|*CALL,COMCCDD 02665 M01S01213.ns22000 ---|*CALL,COMCRDW 02666 M01S01214.ns22000 ---|*CALL,COMCWTC 02667 M01S01215.ns22000 ---|*CALL,COMCWTW 02668 M01S01216.ns22000 ---|*CALL,COMCWTH 02669 M01S01217.ns22000 ---|*CALL,COMCSFN 02670 M01S01218.ns22000 ---|*CALL,COMCPFM 02671 M01S01219.ns22000 ---|*CALL,COMCLFM 02672 M01S01220.ns22000 ---|*CALL COMCCPM 02673 M01S01221.ns22000 ---|*CALL,COMCEDT 02674 M01S01222.ns22000 ---|*CALL COMCCOD
| Line S00624 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02675 M01S00624.ns22000 +++|*CALL COMCSYS 02676 M01S00625.ns22000 +++|*CALL COMCWTC 02677 M01S00626.ns22000 +++|*CALL COMCWTH 02678 M01S00627.ns22000 +++|*CALL COMCWTW
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2636 |
Seq # *Modification Id* Act ----------------------------+ 02679 M01S00001.ns2636 +++|*CALL COMCZTB
| Line S00628 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02680 M01S00628.ns22000 +++| LIST X,F 02681 M00S01223.catlist +++|*CALL COMCFCE
| Line S00629 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02682 M01S00629.ns22000 +++| LIST *
| Line S01224 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02683 M01S01224.ns22000 ---|*CALL COMCSCB 02684 M00S01225.catlist +++| SPACE 4,10 02685 M00S01226.catlist +++|** EQUIVALENCES. 02686 M00S01227.catlist +++| 02687 M00S01228.catlist +++| 02688 M00S01229.catlist +++| FCELL EQU /COMCFCE/FCELL OUTPUT BUFFER LINE LENGTH
| Line S01230 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02689 M01S01230.v23l617 ---| FCELA EQU /COMCFCE/FCELA OUTPUT BUFFER LAST LINE LENGTH
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02690 M01S00026.v23l617 +++| FCELA EQU /COMCFCE/FCELA OUTPUT BUFFER THIRD LINE LENGTH 02691 M01S00027.v23l617 +++| FCELB EQU /COMCFCE/FCELB OUTPUT BUFFER FOURTH LINE LENGTH 02692 M00S01231.catlist +++| SPACE 4 02693 M00S01232.catlist +++|** BUFFERS. 02694 M00S01233.catlist +++| 02695 M00S01234.catlist +++| 02696 M00S01235.catlist +++| USE LITERALS 02697 M00S01236.catlist +++| LBUF EQU * OUTPUT LINE BUFFER 02698 M00S01237.catlist +++| CBUF EQU LBUF+/COMCFCE/CHDRN*FCELL CATALOG READ BUFFER 02699 M00S01238.catlist +++| IBUF EQU CBUF+NWCE INPUT BUFFER 02700 M00S01239.catlist +++| OBUF EQU IBUF+IBFL OUTPUT BUFFER 02701 M00S01240.catlist +++| SBUF EQU OBUF+OBFL CATALOG SORT BUFFER 02702 M00S01241.catlist +++| RFL= EQU SBUF+SBFL DEFAULT FL 02703 M00S01242.catlist +++| PRS TITLE PRESET. 02704 M00S01243.catlist +++|** PRS - PRESET ROUTINE. 02705 M00S01244.catlist +++|* 02706 M00S01245.catlist +++|* EXIT TO MAIN LOOP(CTL)
| Line S01246 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02707 M01S01246.v23l617 ---|* FETS AND BUFFERS SET UP AND CONTROL CARD
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02708 M01S00028.v23l617 +++|* FETS AND BUFFERS SET UP AND COMMAND 02709 M00S01247.catlist +++|* ARGUMENTS PROCESSED.
| Line S01248 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02710 M01S01248.ns22000 ---|* (MODE) = LIST OPTION 02711 M01S01249.ns22000 ---|* 0 = SHORT FILE LIST 02712 M01S01250.ns22000 ---|* 1 = FULL FILE LIST 02713 M01S01251.ns22000 ---|* 2 = SHORT ALTERNATE CATALOG LIST 02714 M01S01252.ns22000 ---|* 3 = FULL ALTERNATE CATALOG LIST 02715 M01S01253.ns22000 ---|* 4 = SHORT PERMIT DATA LIST 02716 M01S01254.ns22000 ---|* 5 = FULL PERMIT DATA LIST
| Line S00630 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02717 M01S00630.ns22000 +++|* (MODE) = LIST OPTION. 02718 M01S00631.ns22000 +++|* 0 = SHORT FILE LIST. 02719 M01S00632.ns22000 +++|* 1 = FULL FILE LIST. 02720 M01S00633.ns22000 +++|* 2 = FILE LIST AND CATEGORY SET. 02721 M01S00634.ns22000 +++|* 3 = SHORT ALTERNATE CATALOG LIST. 02722 M01S00635.ns22000 +++|* 4 = FULL ALTERNATE CATALOG LIST. 02723 M01S00636.ns22000 +++|* 5 = SHORT PERMIT DATA LIST. 02724 M01S00637.ns22000 +++|* 6 = FULL PERMIT DATA LIST. 02725 M00S01255.catlist +++|* B1 = 1. 02726 M00S01256.catlist +++|* DT = 0 IF OUTPUT TO TERMINAL FILE. 02727 M00S01257.catlist +++|* JT = 0 IF TERMINAL ORIGIN JOB. 02728 M00S01258.catlist +++|* TITLE LINES PRESET 02729 M00S01259.catlist +++|* PFM CALL FET PRESET. 02730 M00S01260.catlist +++|* (CTLA) SET IF SELECTED ENTRY DESIRED.
| Line S01261 Modification History | |
|---|---|
M01 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02731 M01S01261.ns2573 ---|* 02732 M01S01262.ns2573 ---|* (FNM) = FILE NAME MASK. 02733 M01S01263.ns2573 ---|* (FNS) = STRIPPED FILE NAME. 02734 M01S01264.ns2573 ---|* *FNM* AND *FNS* ARE ONLY SET IF A UNIVERSAL 02735 M01S01265.ns2573 ---|* CHARACTER IS SPECIFIED IN THE *FN* PARAMETER. 02736 M00S01266.catlist +++| 02737 M00S01267.catlist +++| 02738 M00S01268.catlist +++| CATLIST BSS 0 ENTRY POINT
| Line S01269 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02739 M01S01269.ns22000 ---| PRS SA4 ACTR
| Line S00638 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02740 M01S00638.ns22000 +++| PRS BSS 0 02741 M00S01270.catlist +++| SB1 1
| Line S00639 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02742 M01S00639.ns22000 +++| GETSSM SSM GET SYSTEM SECURITY MODE 02743 M01S00640.ns22000 +++| SA4 ACTR
| Line S01271 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02744 M01S01271.ns22000 ---| ZR X4,CTL IF NO ARGUMENTS
| Line S00641 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02745 M01S00641.ns22000 +++| ZR X4,PRS15 IF NO ARGUMENTS 02746 M00S01272.catlist +++| SB4 X4 SET ARGUMENT COUNT 02747 M00S01273.catlist +++| SA4 ARGR GET FIRST ARGUMENT 02748 M00S01274.catlist +++| SB5 TARG SET ARGUMENT TABLE ADDRESS 02749 M00S01275.catlist +++| RJ ARG PROCESS ARGUMENTS 02750 M00S01276.catlist +++| ZR X1,PRS2 IF NO ARGUMENT ERROR 02751 M00S01277.catlist +++|
| Line S01278 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02752 M01S01278.v23l617 ---| PRS1 MESSAGE (=C* ILLEGAL PARAMETER.*)
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02753 M01S00029.v23l617 +++| PRS1 MESSAGE (=C* INCORRECT PARAMETER.*) 02754 M00S01279.catlist +++| ABORT 02755 M00S01280.catlist +++|
| Line S01281 Modification History | |
|---|---|
M01 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02756 M01S01281.ns2573 ---|* CHECK FOR UNIVERSAL CHARACTER (*) IN FILE NAME.
| Line S00205 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02757 M01S00205.ns2573 +++|* PROCESS FILE NAME SELECTION PARAMETERS. 02758 M00S01282.catlist +++|
| Line S01283 Modification History | |
|---|---|
M01 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02759 M01S01283.ns2573 ---| PRS2 SA1 FILENAM
| Line S00206 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02760 M01S00206.ns2573 +++| PRS2 SA1 EFNM 02761 M01S00207.ns2573 +++| SX7 HDR72 SUBHEADER FOR MULTIPLE FILE NAME TEMPLATES 02762 M01S00208.ns2573 +++| NZ X1,PRS2.1 IF *EF* SPECIFIED 02763 M01S00209.ns2573 +++| SA1 FLNM+1 02764 M01S00210.ns2573 +++| NZ X1,PRS2.1 IF MORE THAN ONE FILE SPECIFIED FOR *FN* 02765 M01S00211.ns2573 +++| SA1 FLNM 02766 M00S01284.catlist +++| SA3 =7L*******
| Line S01285 Modification History | |
|---|---|
M01 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02767 M01S01285.ns2573 ---| ZR X1,PRS3 IF NO FILE NAME
| Line S00212 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02768 M01S00212.ns2573 +++| BX6 X1-X3 02769 M01S00213.ns2573 +++| ZR X6,PRS3 IF *FN* NOT SPECIFIED 02770 M00S01286.catlist +++| BX7 X3-X1 CLEAR * FROM NAME 02771 M00S01287.catlist +++| SA3 PRSA =37373737373737373737B 02772 M00S01288.catlist +++| BX6 X3*X7 02773 M00S01289.catlist +++| BX7 -X3*X7 02774 M00S01290.catlist +++| IX6 X6+X3 02775 M00S01291.catlist +++| BX6 X6+X7 02776 M00S01292.catlist +++| BX7 -X3*X6 02777 M00S01293.catlist +++| BX6 X7 02778 M00S01294.catlist +++| LX7 -5 02779 M00S01295.catlist +++| IX7 X6-X7 02780 M00S01296.catlist +++| BX7 X6+X7
| Line S01297 Modification History | |
|---|---|
M01 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02781 M01S01297.ns2573 ---| BX6 X7*X1 02782 M00S01298.catlist +++| SA3 =777777B 02783 M00S01299.catlist +++| IX4 X7+X3
| Line S01300 Modification History | |
|---|---|
M01 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02784 M01S01300.ns2573 ---| ZR X4,PRS3 IF NO MASK IN NAME 02785 M01S01301.ns2573 ---| SA7 FNM FILE NAME MASK 02786 M01S01302.ns2573 ---| SA6 FNS STRIPPED FILE NAME 02787 M01S01303.ns2573 ---| MX7 0
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | catli5 |
Seq # *Modification Id* Act ----------------------------+ 02788 M01S00035.catli5 +++| MX0 42
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | catli5 |
M02 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02789 M02S00036.ns2573 ---| BX6 X0*X1 SET FILE NAME IN HEADER 02790 M02S00037.ns2573 ---| SA6 HDR71+2
| Line S01304 Modification History | |
|---|---|
M01 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02791 M01S01304.ns2573 ---| SA7 FILENAM CLEAR FILE NAME
| Line S00214 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02792 M01S00214.ns2573 +++| BX6 X0*X1 02793 M01S00215.ns2573 +++| ZR X4,PRS2.2 IF NO ASTERISKS IN FILE NAME 02794 M01S00216.ns2573 +++| SA6 HDR71+2 SET FILE NAME IN HEADER 02795 M01S00217.ns2573 +++| SX7 HDR71 SUBHEADER FOR SINGLE FILE NAME TEMPLATE 02796 M01S00218.ns2573 +++| PRS2.1 SA7 HDRI SET SUBHEADER ADDRESS
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | catli5 |
Seq # *Modification Id* Act ----------------------------+ 02797 M01S00038.catli5 +++| SX6 CTLE SET ADDRESS FOR *NO FILES FOUND* MESSAGE 02798 M01S00039.catli5 +++| SA6 CTLB
| Line S00219 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02799 M01S00219.ns2573 +++| EQ PRS3 SET UP OUTPUT FET 02800 M01S00220.ns2573 +++| 02801 M01S00221.ns2573 +++| PRS2.2 SA6 FILENAM SET FILE NAME FOR PERMANENT FILE FET 02802 M01S00222.ns2573 +++| 02803 M01S00223.ns2573 +++|* SET UP OUTPUT FET. 02804 M01S00224.ns2573 +++| 02805 M00S01305.catlist +++| PRS3 SA1 O SET STATUS IN OUTPUT FET 02806 M00S01306.catlist +++| MX0 42 02807 M00S01307.catlist +++| SX6 B1 02808 M00S01308.catlist +++| BX2 X0*X1 02809 M00S01309.catlist +++| ZR X2,PRS1 IF NO FILE NAME 02810 M00S01310.catlist +++| IX6 X6+X2 02811 M00S01311.catlist +++| SA6 A1 02812 M00S01312.catlist +++| SX2 A1 CHECK FOR TERMINAL FILE 02813 M00S01313.catlist +++| RJ STF 02814 M00S01314.catlist +++| SA6 DT SET DEVICE TYPE FLAG (0 FOR TYPE *TT*) 02815 M00S01315.catlist +++| SA1 JOPR SET JOB ORIGIN 02816 M00S01316.catlist +++| MX0 -12 02817 M00S01317.catlist +++| LX1 36 02818 M00S01318.catlist +++| BX1 -X0*X1 02819 M00S01319.catlist +++| SX6 X1-TXOT 02820 M00S01320.catlist +++| SA6 JT
| Line S00225 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02821 M01S00225.ns2573 +++|
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | ns2740 |
Seq # *Modification Id* Act ----------------------------+ 02822 M01S00073.ns2740 +++|* PROCESS FILE RESIDENCE PARAMETER 02823 M01S00074.ns2740 +++| 02824 M01S00075.ns2740 +++| SA1 RS GET FILE RESIDENCE SELECTION PARAM 02825 M01S00076.ns2740 +++| NZ X1,PRS3.1 IF FILE RESIDENCE SELECTION NOT 0 02826 M01S00077.ns2740 +++| MX6 -3 SET PARAMETER SELECTION FOR 0 02827 M01S00078.ns2740 +++| BX6 -X6 02828 M01S00079.ns2740 +++| EQ PRS3.5 RESIDENCE SELECTION MASK SET 02829 M01S00080.ns2740 +++| PRS3.1 MX0 -6 02830 M01S00081.ns2740 +++| BX6 X6-X6 INITIALIZE RESIDENCE SELECTION MASK 02831 M01S00082.ns2740 +++| PRS3.2 LX1 6 GET NEXT RESIDENCE SELECTION PARAM 02832 M01S00083.ns2740 +++| BX2 -X0*X1 02833 M01S00084.ns2740 +++| ZR X2,PRS3.5 IF END OF SELECTIONS 02834 M01S00085.ns2740 +++| SA3 PRSE GET VALID RESIDENCE SELECTION OPTIONS 02835 M01S00086.ns2740 +++| MX7 1 02836 M01S00087.ns2740 +++| PRS3.3 LX3 6 GET NEXT RESIDENCE SELECTION OPTION 02837 M01S00088.ns2740 +++| BX4 -X0*X3 02838 M01S00089.ns2740 +++| BX5 X2-X4 COMPARE 02839 M01S00090.ns2740 +++| ZR X4,PRS3.4 IF END OF VALID OPTIONS 02840 M01S00091.ns2740 +++| LX7 1 02841 M01S00092.ns2740 +++| NZ X5,PRS3.3 IF NO MATCH 02842 M01S00093.ns2740 +++| BX6 X6+X7 ADD VALID SELECTION TO MASK 02843 M01S00094.ns2740 +++| EQ PRS3.2 GET NEXT SELECTION 02844 M01S00095.ns2740 +++| 02845 M01S00096.ns2740 +++| PRS3.4 MESSAGE (=C* ERROR IN FILE RESIDENCE SELECTION.*) 02846 M01S00097.ns2740 +++| ABORT 02847 M01S00098.ns2740 +++| PRS3.5 SA6 RSM SAVE RESIDENCE SELECTION MASK 02848 M01S00099.ns2740 +++|
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | catli8 |
Seq # *Modification Id* Act ----------------------------+ 02849 M01S00033.catli8 +++|* PROCESS FILE TYPE PARAMETER. 02850 M01S00034.catli8 +++| 02851 M01S00035.catli8 +++| SA1 TY GET FILE TYPE SELECTION PARAM 02852 M01S00036.catli8 +++| BX6 X6-X6 INITIALIZE FILE TYPE SELECTION 02853 M01S00037.catli8 +++| ZR X1,PRS3.9 IF NO FILE TYPE SELECTION 02854 M01S00038.catli8 +++| MX0 -6 02855 M01S00039.catli8 +++| PRS3.6 LX1 6 GET NEXT FILE TYPE SELECTION PARAM 02856 M01S00040.catli8 +++| BX2 -X0*X1 02857 M01S00041.catli8 +++| ZR X2,PRS3.9 IF END OF SELECTIONS 02858 M01S00042.catli8 +++| SA3 PRSF GET VALID FILE TYPE OPTIONS 02859 M01S00043.catli8 +++| BX7 X7-X7 02860 M01S00044.catli8 +++| PRS3.7 LX3 6 GET NEXT FILE TYPE OPTION 02861 M01S00045.catli8 +++| BX4 -X0*X3 02862 M01S00046.catli8 +++| BX5 X2-X4 COMPARE 02863 M01S00047.catli8 +++| ZR X4,PRS3.8 IF END OF VALID OPTIONS 02864 M01S00048.catli8 +++| SX7 X7+B1 02865 M01S00049.catli8 +++| NZ X5,PRS3.7 IF NO MATCH 02866 M01S00050.catli8 +++| BX6 X6+X7 ADD VALID SELECTION TO MASK 02867 M01S00051.catli8 +++| EQ PRS3.6 GET NEXT SELECTION 02868 M01S00052.catli8 +++| 02869 M01S00053.catli8 +++| PRS3.8 MESSAGE (=C* ERROR IN FILE TYPE SELECTION.*) 02870 M01S00054.catli8 +++| ABORT 02871 M01S00055.catli8 +++| 02872 M01S00056.catli8 +++| PRS3.9 SA6 TYM SAVE FILE TYPE SELECTION MASK
| Line S00100 Modification History | |
|---|---|
M01 (Added by) | ns2740 |
Seq # *Modification Id* Act ----------------------------+ 02873 M01S00100.ns2740 +++|
| Line S00226 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02874 M01S00226.ns2573 +++|* PROCESS LIST OPTION. 02875 M01S00227.ns2573 +++| 02876 M00S01321.catlist +++| MX0 59 SET OPTION 02877 M00S01322.catlist +++| SA2 LO 02878 M00S01323.catlist +++| SA1 LOPT 02879 M00S01324.catlist +++| SB2 B0 02880 M00S01325.catlist +++| SB3 LOPTL 02881 M00S01326.catlist +++| SX5 B0 02882 M00S01327.catlist +++| PRS4 BX4 -X0*X1 PICK SHORT LIST FLAG 02883 M00S01328.catlist +++| BX1 X0*X1 02884 M00S01329.catlist +++| IX6 X1-X2 02885 M00S01330.catlist +++| ZR X6,PRS5 IF OPTION FOUND 02886 M00S01331.catlist +++| SA1 A1+B1 02887 M00S01332.catlist +++| SB2 B2+B1 02888 M00S01333.catlist +++| LE B2,B3,PRS4 IF NOT END OF TABLE
| Line S01334 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02889 M01S01334.v23l617 ---| MESSAGE (=C* ILLEGAL LIST OPTION.*)
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02890 M01S00030.v23l617 +++| MESSAGE (=C* INCORRECT LIST OPTION.*) 02891 M00S01335.catlist +++| ABORT 02892 M00S01336.catlist +++|
| Line S00228 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02893 M01S00228.ns2573 +++|* CHECK FOR PARAMETER CONFLICT. 02894 M01S00229.ns2573 +++| 02895 M00S01337.catlist +++| PRS5 SA1 USERNUM 02896 M00S01338.catlist +++| SA2 FILENAM 02897 M00S01339.catlist +++| BX3 X2 SET SELECTED ENTRY FLAG 02898 M00S01340.catlist +++| SB3 PMTL SET PROPER MODE 02899 M00S01341.catlist +++| SX6 B0
| Line S01342 Modification History | |
|---|---|
M01 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02900 M01S01342.ns2573 ---| SX7 PTPE SET SUBTITLE FLAG
| Line S00230 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02901 M01S00230.ns2573 +++| SX7 PTPE SUBTITLE FOR ALTERNATE USER
| Line S01343 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02902 M01S01343.ns22000 ---| LT B2,B3,PRS6 IF NOT ACCESS DATA REQUEST
| Line S00642 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02903 M01S00642.ns22000 +++| LT B2,B3,PRS6 IF NOT PERMIT DATA REQUEST 02904 M00S01344.catlist +++| SX5 B1 SET PERMIT LIST FLAG
| Line S01345 Modification History | |
|---|---|
M01 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02905 M01S01345.ns2573 ---| SX7 PTPD SUBTITLE FLAG
| Line S00231 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02906 M01S00231.ns2573 +++| SX7 PTPD SUBTITLE FOR SPECIFIED FILE NAME 02907 M00S01346.catlist +++| BX3 X1 SET SELECTED ENTRY FLAG 02908 M00S01347.catlist +++| NZ X2,PRS7 IF FILE NAME SPECIFIED
| Line S01348 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02909 M01S01348.ns22000 ---| MESSAGE (=C* FILE NAME MISSING.*)
| Line S00643 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02910 M01S00643.ns22000 +++| PRS5.1 MESSAGE (=C* FILE NAME MISSING.*) 02911 M00S01349.catlist +++| ABORT 02912 M00S01350.catlist +++|
| Line S01351 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02913 M01S01351.ns22000 ---| PRS6 ZR X1,PRS8 IF USER NUMBER NOT SPECIFIED 02914 M01S01352.ns22000 ---| SX6 B1+B1 ADVANCE MODE
| Line S00644 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02915 M01S00644.ns22000 +++| PRS6 SB3 B2-MOLC 02916 M01S00645.ns22000 +++| NZ B3,PRS6.1 IF *LO=X* OPTION NOT SPECIFIED
| Line S00646 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02917 M02S00646.ns2573 ---| SA3 FNM
| Line S00232 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02918 M01S00232.ns2573 +++| SA3 HDRI
| Line S00647 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02919 M01S00647.ns22000 +++| NZ X1,PRS1 IF USER NAME SPECIFIED
| Line S00648 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02920 M02S00648.ns2573 ---| NZ X3,PRS1 IF ASTERISK SPECIFIED IN FILE NAME
| Line S00233 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02921 M01S00233.ns2573 +++| NZ X3,PRS1 IF MULTIPLE FILE NAMES SPECIFIED
| Line S00649 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02922 M01S00649.ns22000 +++| ZR X2,PRS5.1 IF FILE NAME NOT SPECIFIED 02923 M01S00650.ns22000 +++| PRS6.1 ZR X1,PRS8 IF USER NAME NOT SPECIFIED 02924 M01S00651.ns22000 +++| SX6 ALTC SET ALTERNATE CATALOG MODE 02925 M00S01353.catlist +++| PRS7 SA7 PTPC SET SUBTITLE FLAG 02926 M00S01354.catlist +++| PRS8 SX6 X6+B2 02927 M00S01355.catlist +++| SA6 MODE
| Line S01356 Modification History | |
|---|---|
M01 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 02928 M01S01356.ns2573 ---| 02929 M00S01357.catlist +++| MX0 42 02930 M00S01358.catlist +++| ZR X4,PRS9 IF NOT SHORT FILE LIST 02931 M00S01359.catlist +++| BX6 X0*X3 SET SELECTIVE ENTRY FLAG 02932 M00S01360.catlist +++| SA6 CTLA 02933 M00S01361.catlist +++| 02934 M00S01362.catlist +++|* SET *PFM* FET PARAMETERS. 02935 M00S01363.catlist +++| 02936 M00S01364.catlist +++| PRS9 BX6 X0*X2 02937 M00S01365.catlist +++| SA6 FILE SET FILE NAME IN SUBTITLE LINE 02938 M00S01366.catlist +++| BX6 X6+X5 02939 M00S01367.catlist +++| SA6 I+CFPN
| Line S01368 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02940 M01S01368.v23l617 ---| BX7 X0*X1 SET OPTIONAL USER NUMBER
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02941 M01S00031.v23l617 +++| BX7 X0*X1 SET USER NAME 02942 M00S01369.catlist +++| SA7 I+CFOU 02943 M00S01370.catlist +++| SA7 AUSER 02944 M00S01371.catlist +++| ZR X5,PRS10 IF NOT PERMIT DATA 02945 M00S01372.catlist +++| SX6 CTLD SET PERMIT MESSAGE ADDRESS 02946 M00S01373.catlist +++| SA6 CTLB 02947 M00S01374.catlist +++|
| Line S01375 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02948 M01S01375.v23l617 ---|* SET USER NUMBER OR USER INDEX IN TITLE LINE.
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02949 M01S00032.v23l617 +++|* SET USER NAME OR USER INDEX IN TITLE LINE. 02950 M00S01376.catlist +++| 02951 M00S01377.catlist +++| PRS10 GETPFP PRSB
| Line S01378 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02952 M01S01378.v23l617 ---| SA1 PRSB+2 SET USER NUMBER IN TITLE LINE
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02953 M01S00033.v23l617 +++| SA1 PRSB+2 SET USER NAME IN TITLE LINE 02954 M00S01379.catlist +++| BX6 X0*X1 02955 M00S01380.catlist +++| SA6 USER
| Line S01381 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02956 M01S01381.v23l617 ---| NZ X6,PRS10.1 IF USER NUMBER FOUND
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02957 M01S00034.v23l617 +++| NZ X6,PRS10.1 IF USER NAME FOUND 02958 M00S01382.catlist +++| RJ COD SET USER INDEX IN TITLE LINE 02959 M00S01383.catlist +++| MX7 42 02960 M00S01384.catlist +++| BX4 X7*X4 02961 M00S01385.catlist +++| SX6 3RUI/ 02962 M00S01386.catlist +++| BX6 X4+X6 02963 M00S01387.catlist +++| LX6 -18 02964 M00S01388.catlist +++| PRS10.1 BX1 X6 SPACE FILL NAME 02965 M00S01389.catlist +++| RJ SFN 02966 M00S01390.catlist +++| SB3 PRSC SET CHARACTERS IN BUFFER 02967 M00S01391.catlist +++| SB7 PTPB 02968 M00S01392.catlist +++| RJ SCB 02969 M00S01393.catlist +++| 02970 M00S01394.catlist +++|* SET PACKNAME OR FAMILY NAME IN TITLE LINE. 02971 M00S01395.catlist +++| 02972 M00S01396.catlist +++| SA1 PACK 02973 M00S01397.catlist +++| ZR X1,PRS11 IF NO PACKNAME SPECIFIED 02974 M00S01398.catlist +++| BX6 X1 02975 M00S01399.catlist +++| SA6 I+CFPK SET PACKNAME IN FET 02976 M00S01400.catlist +++| SX7 1R0 02977 M00S01401.catlist +++| LX7 54 02978 M00S01402.catlist +++| BX7 X6-X7 02979 M00S01403.catlist +++| ZR X7,PRS11.1 IF *PN=0* SPECIFIED 02980 M00S01404.catlist +++| PRS10.2 SX4 3RPN/ 02981 M00S01405.catlist +++| EQ PRS12 SET PACK NAME IN TITLE LINE 02982 M00S01406.catlist +++| 02983 M00S01407.catlist +++| PRS11 SA1 PRSB+1 02984 M00S01408.catlist +++| ZR X1,PRS11.1 IF NO PACKNAME SET IN CPA 02985 M00S01409.catlist +++| BX6 X0*X1 02986 M00S01410.catlist +++| EQ PRS10.2 SET PACKNAME IN TITLE LINE 02987 M00S01411.catlist +++| 02988 M00S01412.catlist +++| PRS11.1 SA1 PRSB SET FAMILY NAME IN TITLE LINE 02989 M00S01413.catlist +++| SX4 3RFM/ 02990 M00S01414.catlist +++| BX6 X1 02991 M00S01415.catlist +++| PRS12 BX1 X6+X4 MERGE FAMILY/PACK NAME WITH DESIGNATOR 02992 M00S01416.catlist +++| LX1 -18 02993 M00S01417.catlist +++| RJ SFN SPACE FILL NAME 02994 M00S01418.catlist +++| SA6 PKNM 02995 M00S01419.catlist +++| 02996 M00S01420.catlist +++|* PROCESS *NO ABORT* AND *WAIT BUSY* PARAMETERS. 02997 M00S01421.catlist +++| 02998 M00S01422.catlist +++| SA1 NABT CHECK NO ABORT OPTION 02999 M00S01423.catlist +++| SA2 WBSY 03000 M00S01424.catlist +++| IX1 X1+X2 03001 M00S01425.catlist +++| ZR X1,PRS13 IF NEITHER *NA* NOR *WB* SELECTED 03002 M00S01426.catlist +++| SX2 X1-2 03003 M00S01427.catlist +++| ZR X2,PRS1 IF BOTH *NA* AND *WB* SPECIFIED 03004 M00S01428.catlist +++| SA1 I+1 SET ERROR PROCESSING BIT 03005 M00S01429.catlist +++| SX6 B1 03006 M00S01430.catlist +++| LX6 44 03007 M00S01431.catlist +++| BX6 X1+X6 03008 M00S01432.catlist +++| SA6 A1 03009 M00S01433.catlist +++| 03010 M00S01434.catlist +++|* PROCESS RESIDENCE. 03011 M00S01435.catlist +++| 03012 M00S01436.catlist +++| PRS13 SA1 RES CHECK RESIDENCE OPTION 03013 M00S01437.catlist +++| ZR X1,PRS14 IF RESIDENCE NOT SET 03014 M00S01438.catlist +++| MX0 12 03015 M00S01439.catlist +++| BX6 X0*X1 SET DEVICE TYPE IN FET+1 03016 M00S01440.catlist +++| SA2 I+1 03017 M00S01441.catlist +++| BX5 -X0*X2 03018 M00S01442.catlist +++| BX6 X5+X6 03019 M00S01443.catlist +++| SA6 A2 03020 M00S01444.catlist +++| LX1 12 03021 M00S01445.catlist +++| BX5 X0*X1 03022 M00S01446.catlist +++| ZR X5,PRS14 IF NO UNIT NUMBER 03023 M00S01447.catlist +++| SB7 B1 03024 M00S01448.catlist +++| RJ DXB CONVERT TO OCTAL 03025 M00S01449.catlist +++| NZ X4,PRS1 IF ERROR 03026 M00S01450.catlist +++| SA2 I+CFPK SET UNIT COUNT IN FET+CFPK 03027 M00S01451.catlist +++| MX0 -12 03028 M00S01452.catlist +++| BX5 X0*X2 03029 M00S01453.catlist +++| BX6 X6+X5 03030 M00S01454.catlist +++| SA6 A2 03031 M00S01455.catlist +++| 03032 M00S01456.catlist +++|* PROCESS DEVICE NUMBER. 03033 M00S01457.catlist +++| 03034 M00S01458.catlist +++| PRS14 SA5 DN CHECK DEVICE NUMBER
| Line S01459 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03035 M01S01459.ns22000 ---| ZR X5,CTL IF NOT SET
| Line S00652 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03036 M01S00652.ns22000 +++| ZR X5,PRS15 IF NOT SET 03037 M00S01460.catlist +++| SB7 B0 03038 M00S01461.catlist +++| RJ DXB 03039 M00S01462.catlist +++| SX2 X6-100B 03040 M00S01463.catlist +++| NZ X4,PRS1 IF ERROR 03041 M00S01464.catlist +++| PL X2,PRS1 IF DEVICE NUMBER OUT OF RANGE 03042 M00S01465.catlist +++| SA5 I+CFOU
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | catli2 |
Seq # *Modification Id* Act ----------------------------+ 03043 M01S00001.catli2 +++| BX1 X6 03044 M00S01466.catlist +++| LX6 12 03045 M00S01467.catlist +++| BX6 X6+X5 03046 M00S01468.catlist +++| SA6 A5
| Line S01469 Modification History | |
|---|---|
M01 (Removed by) | catli2 |
Seq # *Modification Id* Act ----------------------------+ 03047 M01S01469.catli2 ---| SA3 DN SET DEVICE NUMBER IN TITLE LINE
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | catli2 |
Seq # *Modification Id* Act ----------------------------+ 03048 M01S00002.catli2 +++| RJ COD SET DEVICE NUMBER IN TITLE LINE 03049 M01S00003.catli2 +++| MX0 12 03050 M01S00004.catli2 +++| BX4 X0*X4 03051 M00S01470.catlist +++| SX6 3RDN/
| Line S01471 Modification History | |
|---|---|
M01 (Removed by) | catli2 |
Seq # *Modification Id* Act ----------------------------+ 03052 M01S01471.catli2 ---| BX1 X6+X3
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | catli2 |
Seq # *Modification Id* Act ----------------------------+ 03053 M01S00005.catli2 +++| BX1 X6+X4 03054 M00S01472.catlist +++| LX1 -18 03055 M00S01473.catlist +++| RJ SFN 03056 M00S01474.catlist +++| SB3 PRSD 03057 M00S01475.catlist +++| SB7 PTPB 03058 M00S01476.catlist +++| RJ SCB
| Line S00653 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03059 M01S00653.ns22000 +++| PRS15 RJ IPP INITIALIZE PAGE PARAMETERS 03060 M00S01477.catlist +++| JP CTL 03061 M00S01478.catlist +++| 03062 M00S01479.catlist +++| 03063 M00S01480.catlist +++| PRSA DATA 37373737373737373737B 03064 M00S01481.catlist +++| PRSB BSSZ 3 *GETPFP* PARAMETER BLOCK
| Line S01482 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03065 M01S01482.v23l617 ---| PRSC CFORM 13,9 FIELD IN TITLE FOR USER NUMBER/USER INDEX
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03066 M01S00035.v23l617 +++| PRSC CFORM 13,9 FIELD IN TITLE FOR USER NAME/USER INDEX 03067 M00S01483.catlist +++| PRSD CFORM 24,5 FIELD IN TITLE FOR DEVICE NUMBER
| Line S00101 Modification History | |
|---|---|
M01 (Added by) | ns2740 |
Seq # *Modification Id* Act ----------------------------+ 03068 M01S00101.ns2740 +++| PRSE CON 3LCTD VALID RESIDENCE SELECTION OPTIONS
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | catli8 |
Seq # *Modification Id* Act ----------------------------+ 03069 M01S00057.catli8 +++| PRSF CON 3LIDA VALID FILE TYPE SELECTION OPTIONS
| Line S01484 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03070 M01S01484.ns22000 ---| 03071 M01S01485.ns22000 ---| 03072 M01S01486.ns22000 ---|** LIST OPTIONS
| Line S00654 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03073 M01S00654.ns22000 +++| LOPT SPACE 4,10 03074 M01S00655.ns22000 +++|** LIST OPTIONS. 03075 M00S01487.catlist +++|* BIT 0 SET IF SHORT LIST OPTION.
| Line S00656 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03076 M01S00656.ns22000 +++|* 03077 M01S00657.ns22000 +++|* ANY CHANGES MADE TO THIS TABLE WILL AFFECT THE 03078 M01S00658.ns22000 +++|* DOCUMENTATION OF MODE VALUES IN THE *PRS* HEADER, 03079 M01S00659.ns22000 +++|* TABLE *TLOT* IN THE MAIN ROUTINE, AND THE PROCESSING 03080 M01S00660.ns22000 +++|* FOR HEADERS IN *HDR*. 03081 M00S01488.catlist +++| 03082 M00S01489.catlist +++| LOPT BSS 0 LIST OPTIONS
| Line S01490 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03083 M01S01490.ns22000 ---| LOC 0 03084 M01S01491.ns22000 ---| VFD 59/0,1/1 NORMAL CATALOGS 03085 M01S01492.ns22000 ---| CON 1LF 03086 M01S01493.ns22000 ---| CON 0 ALTERNATE CATALOGS 03087 M01S01494.ns22000 ---| CON 0 03088 M01S01495.ns22000 ---| 03089 M01S01496.ns22000 ---| PMTL EQU * LIMIT OF CATALOG OPTIONS 03090 M01S01497.ns22000 ---| 03091 M01S01498.ns22000 ---| VFD 6/0LP,54/1 PERMIT DATA 03092 M01S01499.ns22000 ---| CON 2LFP 03093 M01S01500.ns22000 ---| LOPTL EQU *
| Line S00661 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03094 M01S00661.ns22000 +++| 03095 M01S00662.ns22000 +++| LOC 0 CATALOG DATA LISTS 03096 M01S00663.ns22000 +++| MOSF VFD 59/0,1/1 SHORT FILE LIST 03097 M01S00664.ns22000 +++| MOFL CON 1LF FULL FILE LIST 03098 M01S00665.ns22000 +++| MOLC CON 1LX LIST FILE AND CATEGORY SET 03099 M01S00666.ns22000 +++| 03100 M01S00667.ns22000 +++| ALTC EQU * ALTERNATE CATALOG DATA LISTS 03101 M01S00668.ns22000 +++| MOSA CON 0 SHORT ALTERNATE FILE LIST 03102 M01S00669.ns22000 +++| MOFA CON 0 LONG ALTERNATE FILE LIST 03103 M01S00670.ns22000 +++| 03104 M01S00671.ns22000 +++| PMTL EQU * PERMIT DATA LISTS 03105 M01S00672.ns22000 +++| MOSP VFD 6/0LP,54/1 SHORT PERMIT LIST 03106 M01S00673.ns22000 +++| MOFP CON 0LFP FULL PERMIT LIST 03107 M01S00674.ns22000 +++| 03108 M01S00675.ns22000 +++| LOPTL EQU * TABLE LENGTH 03109 M00S01501.catlist +++| LOC *O 03110 M00S01502.catlist +++|
| Line S01503 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03111 M01S01503.ns22000 ---|* ARGUMENT TABLE
| Line S00676 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03112 M01S00676.ns22000 +++|* ARGUMENT TABLE. 03113 M00S01504.catlist +++| 03114 M00S01505.catlist +++| TARG BSS 0 03115 M00S01506.catlist +++| LO ARG =0,LO 03116 M00S01507.catlist +++| UN ARG =0,USERNUM,400B
| Line S01508 Modification History | |
|---|---|
M01 (Removed by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 03117 M01S01508.ns2573 ---| FN ARG =0,FILENAM,400B
| Line S00234 Modification History | |
|---|---|
M01 (Added by) | ns2573 |
Seq # *Modification Id* Act ----------------------------+ 03118 M01S00234.ns2573 +++| EF ARG EFNM,EFNM,200B 03119 M01S00235.ns2573 +++| FN ARG FLNM,FLNM,200B 03120 M00S01509.catlist +++| PN ARG =0,PACK,400B 03121 M00S01510.catlist +++| L ARG =0LOUTPUT,O,400B 03122 M00S01511.catlist +++| R ARG =0,RES 03123 M00S01512.catlist +++| NA ARG -NZ,NABT
| Line S00102 Modification History | |
|---|---|
M01 (Added by) | ns2740 |
Seq # *Modification Id* Act ----------------------------+ 03124 M01S00102.ns2740 +++| RS ARG =0,RS 03125 M00S01513.catlist +++| WB ARG -NZ,WBSY 03126 M00S01514.catlist +++| DN ARG =0,DN,400B
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | catli8 |
Seq # *Modification Id* Act ----------------------------+ 03127 M01S00058.catli8 +++| TY ARG =0,TY 03128 M00S01515.catlist +++| ARG
| Line S01516 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03129 M01S01516.ns22000 ---| SPACE 4
| Line S00677 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03130 M01S00677.ns22000 +++| IPP SPACE 4,15 03131 M01S00678.ns22000 +++|** IPP - INITIALIZE PAGE PARAMETERS. 03132 M01S00679.ns22000 +++|* 03133 M01S00680.ns22000 +++|* ENTRY NONE. 03134 M01S00681.ns22000 +++|* 03135 M01S00682.ns22000 +++|* EXIT JOB DEFAULT PAGE PARAMETERS SET. 03136 M01S00683.ns22000 +++|* 03137 M01S00684.ns22000 +++|* USES X - 0, 1, 2, 6, 7. 03138 M01S00685.ns22000 +++|* A - 1, 2, 6. 03139 M01S00686.ns22000 +++|* B - NONE.
| Line S00687 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03140 M02S00687.v23l617 ---|* 03141 M02S00688.v23l617 ---|* CALLS GTN.
| Line S00689 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03142 M01S00689.ns22000 +++|* 03143 M01S00690.ns22000 +++|* MACROS GETPP, SETSLM. 03144 M01S00691.ns22000 +++| 03145 M01S00692.ns22000 +++| 03146 M01S00693.ns22000 +++| IPP1 SETSLM IPPC GET CURRENT SCREEN DEFINITION 03147 M01S00694.ns22000 +++| SA1 IPPC 03148 M01S00695.ns22000 +++| MX0 -6 03149 M01S00696.ns22000 +++| BX2 -X0*X1 ISOLATE ORDINAL 03150 M01S00697.ns22000 +++| LX1 59-6 03151 M01S00698.ns22000 +++| SX6 LMDL ASSUME LINE MODE 03152 M01S00699.ns22000 +++| PL X1,IPP3 IF LINE MODE
| Line S00700 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03153 M02S00700.v23l617 ---| RJ GTN GET TERMINAL NAME 03154 M02S00701.v23l617 ---| MX0 42 03155 M02S00702.v23l617 ---| SA2 IPPB INITIALIZE SEARCH LOOP 03156 M02S00703.v23l617 ---| IPP2 BX7 X1-X2 03157 M02S00704.v23l617 ---| BX7 X0*X7 03158 M02S00705.v23l617 ---| SX6 X2-1 03159 M02S00706.v23l617 ---| ZR X7,IPP3 IF ENTRY FOUND 03160 M02S00707.v23l617 ---| SA2 A2+B1 NEXT ENTRY 03161 M02S00708.v23l617 ---| NZ X2,IPP2 IF NOT END OF TABLE 03162 M02S00709.v23l617 ---| SX6 SMDL-1 ASSUME DEFAULT SCREEN SIZE
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03163 M01S00036.v23l617 +++| SA2 IPPB+X2 COMPUTE TABLE OFFSET BY ORDINAL 03164 M01S00037.v23l617 +++| SX6 X2 GET LINE LIMIT
| Line S00710 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03165 M01S00710.ns22000 +++| IPP3 SA6 LL INITIALIZE LINE LIMIT 03166 M01S00711.ns22000 +++| 03167 M01S00712.ns22000 +++| IPP SUBR ENTRY/EXIT 03168 M01S00713.ns22000 +++| SA1 DT 03169 M01S00714.ns22000 +++| ZR X1,IPP1 IF TTY OUTPUT FILE 03170 M01S00715.ns22000 +++| GETPP IPPA,LL,PD GET PAGE PARAMETERS 03171 M01S00716.ns22000 +++| SA1 LL ADJUST LINE LIMIT 03172 M01S00717.ns22000 +++| SX6 X1-1 03173 M01S00718.ns22000 +++| EQ IPP3 RETURN 03174 M01S00719.ns22000 +++| 03175 M01S00720.ns22000 +++| IPPA BSSZ 2 *GETPP* REPLY BUFFER 03176 M01S00721.ns22000 +++| 03177 M01S00722.ns22000 +++|* SCREEN SIZE DEFINITIONS. 03178 M01S00723.ns22000 +++|* 03179 M01S00724.ns22000 +++|* THIS TABLE DEFINES THE NUMBER OF LINES TO OUTPUT TO 03180 M01S00725.ns22000 +++|* FILL A SCREEN, BASED ON THE SCREEN TYPE. THIS IS 03181 M01S00726.ns22000 +++|* USED IN TERMINAL MODE TO CONTROL OUTPUT OF THE SHORT 03182 M01S00727.ns22000 +++|* SORTED LIST, SUCH THAT FILES WILL APPEAR IN 03183 M01S00728.ns22000 +++|* ALPHABETICAL ORDER ON A FULL SCREEN. 03184 M01S00729.ns22000 +++|*
| Line S00730 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03185 M02S00730.v23l617 ---|* THIS TABLE PARALLELS A TABLE IN *COMCGTO*. 03186 M02S00731.v23l617 ---|* IF *COMCGTO* IS CHANGED, THIS TABLE MAY NEED ADJUSTMENT.
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03187 M01S00038.v23l617 +++|*T 60/LC
Figure
| Line S00732 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03188 M01S00732.ns22000 +++|*
| Line S00733 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03189 M02S00733.v23l617 ---|*T 42/ TN,18/ LC
Figure
03190 M02S00734.v23l617 ---|* 03191 M02S00735.v23l617 ---|* WHERE TN = TERMINAL NAME AS DEFINED IN *COMCGTO*. 03192 M02S00736.v23l617 ---|* LC = TERMINAL MODE SCREEN LINE COUNT.
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03193 M01S00039.v23l617 +++|* WHERE LC = TERMINAL MODE SCREEN LINE COUNT. 03194 M01S00040.v23l617 +++|* 03195 M01S00041.v23l617 +++|* NOTE : IF MORE RESIDENT TERMINAL TYPES ARE ADDED 03196 M01S00042.v23l617 +++|* TO *COMCGTO*, MORE ENTRIES SHOULD BE ADDED TO THIS 03197 M01S00043.v23l617 +++|* TABLE. 03198 M01S00044.v23l617 +++|*
| Line S00737 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03199 M01S00737.ns22000 +++|
| Line S00738 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03200 M02S00738.v23l617 ---| IPPB BSS 0 SCREEN SIZE DEFINITIONS 03201 M02S00739.v23l617 ---| CON 4LNONE+LMDL NO SCREEN DEFINED
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03202 M01S00045.v23l617 +++| IPPB BSS 0
| Line S00740 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03203 M02S00740.v23l617 ---| CON 4LUSER+SMDL 03204 M02S00741.v23l617 ---| CON 3L721+SMDL+6
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03205 M01S00046.v23l617 +++| VFD 60/LMDL NO SCREEN DEFINED 03206 M01S00047.v23l617 +++| VFD 60/SMDL USER DEFINED 03207 M01S00048.v23l617 +++| VFD 60/SMDL+6 RESIDENT *721* DEFINED
| Line S00742 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03208 M02S00742.v23l617 ---| CON 3L722+SMDL 03209 M02S00743.v23l617 ---| CON 5LVT100+SMDL 03210 M02S00744.v23l617 ---| CON 3LZ19+SMDL
| Line S00745 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03211 M01S00745.ns22000 +++| CON 0 END OF TABLE 03212 M01S00746.ns22000 +++| 03213 M01S00747.ns22000 +++| IPPC CON 0 SETSLM RESPONSE WORD
| Line S01517 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03214 M01S01517.ns22000 ---|*CALL,COMCARG 03215 M01S01518.ns22000 ---|*CALL,COMCSTF
| Line S00748 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03216 M01S00748.ns22000 +++| SPACE 4,10 03217 M01S00749.ns22000 +++|** PRESET COMMON DECKS. 03218 M01S00750.ns22000 +++| 03219 M01S00751.ns22000 +++| 03220 M01S00752.ns22000 +++|*CALL COMCARG
| Line S00753 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03221 M02S00753.v23l617 ---|*CALL COMCGTO
| Line S00754 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03222 M01S00754.ns22000 +++|*CALL COMCSTF 03223 M01S00755.ns22000 +++|*CALL COMCVLC 03224 M00S01519.catlist +++| SPACE 4 03225 M00S01520.catlist +++| END
cdc/nos2.source/opl.opl871/deck/catlist.002.txt · Last modified: by 127.0.0.1