cdc:nos2.source:opl.opl871:deck:pfs.003
Deck PFS Part 003
10 Modifications
Listing Sections
- Deck PFS Start
- Deck PFS Part 1 (Line 1353)
- Deck PFS Part 2 (Line 2825)
- Deck PFS Part 3 (Line 4271)
Source
Seq # *Modification Id* Act ----------------------------+
| Line S01170 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04271 M01S01170.286l859 +++|* EXIT (PARC+/COMSPFS/CPOP) = CONVERTED UTILITY OPTIONS IF NO 04272 M01S01171.286l859 +++|* ERROR. 04273 M01S01172.286l859 +++|* K-DISPLAY UPDATED WITH ENTERED UTILITY OPTIONS IF NO 04274 M01S01173.286l859 +++|* ERROR. 04275 M01S01174.286l859 +++|* (ERFL) = ERROR MESSAGE ADDRESS IF ERROR. 04276 M00S03022.pfs +++|*
| Line S03023 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04277 M01S03023.286l859 ---|* USES A - 1, 2, 6.
| Line S01175 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04278 M01S01175.286l859 +++|* USES X - 1, 2, 6. 04279 M01S01176.286l859 +++|* A - 1, 2, 6. 04280 M00S03024.pfs +++|* B - 6, 7.
| Line S03025 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04281 M01S03025.286l859 ---|* X - 0, 1, 2, 6. 04282 M00S03026.pfs +++|* 04283 M00S03027.pfs +++|* CALLS OCK, OCP. 04284 M00S03028.pfs +++| 04285 M00S03029.pfs +++| 04286 M00S03030.pfs +++| PUO SUBR ENTRY/EXIT 04287 M00S03031.pfs +++| SA2 EPOP 04288 M00S03032.pfs +++| ZR X2,PUOX IF OPTION NOT ENTERED 04289 M00S03033.pfs +++| SA1 =1L0 CHEK FOR RESET TO ZERO
| Line S03034 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04290 M01S03034.286l859 ---| BX1 X2-X1 04291 M01S03035.286l859 ---| ZR X1,PUO3 IF ZERO SPECIFIED FOR OPTION 04292 M01S03036.286l859 ---| SA1 /COMSPFS/UTLC INITIALIZE VALIDATION MASK 04293 M01S03037.286l859 ---| SA1 TVUO+X1 04294 M01S03038.286l859 ---| BX0 X1
| Line S01177 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04295 M01S01177.286l859 +++| BX6 X2-X1 04296 M01S01178.286l859 +++| ZR X6,PUO3 IF ZERO SPECIFIED FOR OPTION 04297 M00S03039.pfs +++| SB6 /COMSPFS/MXUO SET NUMBER OF UTILITY OPTIONS
| Line S03040 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04298 M01S03040.286l859 ---| SB7 OPTT SET ADDRESS OF UTILITY OPTION TABLE
| Line S01179 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04299 M01S01179.286l859 +++| SB7 TVUO SET UTILITY OPTION TABLE ADDRESS 04300 M00S03041.pfs +++| RJ OCK PERFORM OPTION CRACKING
| Line S03042 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04301 M01S03042.286l859 ---| NZ X1,PUO2 IF NO ERROR
| Line S01180 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04302 M01S01180.286l859 +++| NZ X6,PUO2 IF NO ERROR 04303 M00S03043.pfs +++| PUO1 SX6 ERRG SET ERROR FLAG 04304 M00S03044.pfs +++| SA6 ERFL 04305 M00S03045.pfs +++| EQ PUOX RETURN 04306 M00S03046.pfs +++| 04307 M00S03047.pfs +++| PUO2 RJ OCP PERFORM OPTION CONFLICT PROCESSING
| Line S03048 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04308 M01S03048.286l859 ---| ZR X1,PUO1 IF CONFLICT 04309 M01S03049.286l859 ---| PUO3 BX6 X1 POST CONVERTED OPTION WORD 04310 M01S03050.286l859 ---| SA6 PARC+/COMSPFS/CPOP
| Line S01181 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04311 M01S01181.286l859 +++| ZR X6,PUO1 IF CONFLICT 04312 M01S01182.286l859 +++| PUO3 SA6 PARC+/COMSPFS/CPOP 04313 M00S03051.pfs +++| SA2 EPOP POST ENTERED UTILITY OPTIONS IN K-DISPLAY 04314 M00S03052.pfs +++| BX6 X2
| Line S03053 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04315 M01S03053.286l859 ---| SA6 OPDS+1
| Line S01183 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04316 M01S01183.286l859 +++| SA6 D.OP+1 04317 M00S03054.pfs +++| EQ PUOX RETURN 04318 M00S03055.pfs +++| PVP SPACE 4,10 04319 M00S03056.pfs +++|** PVP - PROCESS PREVIOUS VSN. 04320 M00S03057.pfs +++|* 04321 M00S03058.pfs +++|* EXIT (X3) = 0 IF NO ERROR. 04322 M00S03059.pfs +++|* (X3) .NE. 0 IF ERROR. 04323 M00S03060.pfs +++|* (A3) = ADDRESS OF ERROR MESSAGE, IF ERROR. 04324 M00S03061.pfs +++|* 04325 M00S03062.pfs +++|* USES X - 0, 1. 04326 M00S03063.pfs +++|* A - 1, 3. 04327 M00S03064.pfs +++| 04328 M00S03065.pfs +++| 04329 M00S03066.pfs +++| PVP SUBR ENTRY/EXIT 04330 M00S03067.pfs +++| SA1 PARC+/COMSPFS/CPPV PREVIOUS ARCHIVE TAPE VSN 04331 M00S03068.pfs +++| MX0 36 04332 M00S03069.pfs +++| SA3 ERRM * VSN TOO LONG.* 04333 M00S03070.pfs +++| BX3 -X0*X1 NON-ZERO IF VSN OVER 6 CHARACTERS 04334 M00S03071.pfs +++| EQ PVPX RETURN 04335 M00S03072.pfs +++| RCM SPACE 4,15 04336 M00S03073.pfs +++|** RCM - READ CENTRAL MEMORY RESIDENT. 04337 M00S03074.pfs +++|* 04338 M00S03075.pfs +++|* ENTRY (X1) = WORD COUNT. 04339 M00S03076.pfs +++|* (X2) = CM ADDRESS TO READ FROM. 04340 M00S03077.pfs +++|* (X3) = BUFFER ADDRESS TO READ TO. 04341 M00S03078.pfs +++|* 04342 M00S03079.pfs +++|* EXIT WORDS READ TO BUFFER. 04343 M00S03080.pfs +++|* (X1) = FIRST WORD READ. 04344 M00S03081.pfs +++|* 04345 M00S03082.pfs +++|* USES A - 1, 6. 04346 M00S03083.pfs +++|* X - 1, 2, 6. 04347 M00S03084.pfs +++|* 04348 M00S03085.pfs +++|* MACROS SYSTEM. 04349 M00S03086.pfs +++| 04350 M00S03087.pfs +++| 04351 M00S03088.pfs +++| RCM SUBR ENTRY/EXIT 04352 M00S03089.pfs +++| MX6 42 04353 M00S03090.pfs +++| LX1 36 04354 M00S03091.pfs +++| SA6 X3 04355 M00S03092.pfs +++| LX2 18 04356 M00S03093.pfs +++| BX6 X1+X3 04357 M00S03094.pfs +++| BX6 X2+X6 04358 M00S03095.pfs +++| SA6 RCMA 04359 M00S03096.pfs +++| SYSTEM RSB,,A6 04360 M00S03097.pfs +++| SA1 X3 04361 M00S03098.pfs +++| EQ RCMX RETURN 04362 M00S03099.pfs +++| 04363 M00S03100.pfs +++| 04364 M00S03101.pfs +++| RCMA CON 0 *RSB* PARAMETER WORD 04365 M00S03102.pfs +++| RPT SPACE 4,20 04366 M00S03103.pfs +++|** RPT - RESTORE POINTERS. 04367 M00S03104.pfs +++|* 04368 M00S03105.pfs +++|* ENTRY (PTEP)= ENTERED PARAMETER ADDRESS. 04369 M00S03106.pfs +++|* (PTNP) = NUMBER OF PARAMETER TO PROCESS. 04370 M00S03107.pfs +++|* (PTCP) = CONVERTED PARAMETER ADDRESS. 04371 M00S03108.pfs +++|* (PTMW) = PARAMETER MASK WORD. 04372 M00S03109.pfs +++|* 04373 M00S03110.pfs +++|* EXIT (B2) = (PTEP). 04374 M00S03111.pfs +++|* (B3) = (PTNP). 04375 M00S03112.pfs +++|* (B4) = (PTCP). 04376 M00S03113.pfs +++|* (X0) = (PTMW). 04377 M00S03114.pfs +++|* 04378 M00S03115.pfs +++|* USES A - 1, 2. 04379 M00S03116.pfs +++|* B - 2, 3, 4. 04380 M00S03117.pfs +++|* X - 0, 1, 2. 04381 M00S03118.pfs +++| 04382 M00S03119.pfs +++| 04383 M00S03120.pfs +++| RPT SUBR ENTRY/EXIT 04384 M00S03121.pfs +++| SA1 PTEP 04385 M00S03122.pfs +++| SA2 PTNP 04386 M00S03123.pfs +++| SB2 X1 04387 M00S03124.pfs +++| SB3 X2 04388 M00S03125.pfs +++| SA1 PTCP 04389 M00S03126.pfs +++| SB4 X1 04390 M00S03127.pfs +++| SA1 PTMW 04391 M00S03128.pfs +++| BX0 X1 04392 M00S03129.pfs +++| EQ RPTX RETURN
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 04393 M01S00010.ns2625 +++| SPACE 4,10 04394 M01S00011.ns2625 +++|** RSF - RETURN SCRATCH FILES. 04395 M01S00012.ns2625 +++|*
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04396 M02S00013.286l859 ---|* EXIT ALL *ZZZZZGN* SCRATCH FILES RETURNED.
| Line S01184 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04397 M01S01184.286l859 +++|* EXIT SCRATCH FILES RETURNED.
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 04398 M01S00014.ns2625 +++|*
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04399 M02S00015.286l859 ---|* USES X - 3, 4, 6.
| Line S01185 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04400 M01S01185.286l859 +++|* USES X - 3, 4, 5, 6.
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 04401 M01S00016.ns2625 +++|* A - 3, 6.
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04402 M02S00017.286l859 ---|* B - 2.
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 04403 M01S00018.ns2625 +++|* 04404 M01S00019.ns2625 +++|* MACROS RETURN. 04405 M01S00020.ns2625 +++| 04406 M01S00021.ns2625 +++| 04407 M01S00022.ns2625 +++| RSF SUBR ENTRY/EXIT
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04408 M02S00023.286l859 ---| SA3 RSFA 04409 M02S00024.286l859 ---| SX4 1 04410 M02S00025.286l859 ---| SB2 9 NUMBER OF FILE NAMES
| Line S01186 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04411 M01S01186.286l859 +++| SA3 RSFA-1 04412 M01S01187.286l859 +++| SX4 B1
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 04413 M01S00026.ns2625 +++| LX4 18
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04414 M02S00027.286l859 ---| RSF1 BX6 X3
| Line S01188 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04415 M01S01188.286l859 +++| RSF1 SA3 A3+B1 04416 M01S01189.286l859 +++| ZR X3,RSFX IF ALL FILES RETURNED 04417 M01S01190.286l859 +++| SX5 X3 NUMBER OF FILE NAMES IN RANGE 04418 M01S01191.286l859 +++| IX3 X3-X5 SET FIRST FILE NAME 04419 M01S01192.286l859 +++| SX6 1 04420 M01S01193.286l859 +++| BX3 X3+X6 SET COMPLETE STATUS 04421 M01S01194.286l859 +++| RSF2 BX6 X3
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 04422 M01S00028.ns2625 +++| SA6 SCR 04423 M01S00029.ns2625 +++| RETURN SCR,R RETURN FILE 04424 M01S00030.ns2625 +++| IX3 X3+X4 ADVANCE FILE NAME
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04425 M02S00031.286l859 ---| SB2 B2-B1 04426 M02S00032.286l859 ---| PL B2,RSF1 IF ALL FILES NOT RETURNED 04427 M02S00033.286l859 ---| EQ RSFX RETURN
| Line S01195 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04428 M01S01195.286l859 +++| SX5 X5-1 04429 M01S01196.286l859 +++| NZ X5,RSF2 IF ALL FILES IN RANGE NOT RETURNED 04430 M01S01197.286l859 +++| EQ RSF1 CHECK NEXT RANGE OF FILE NAMES
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 04431 M01S00034.ns2625 +++| 04432 M01S00035.ns2625 +++|
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04433 M02S00036.286l859 ---| RSFA VFD 42/0LZZZZZG0,18/1
| Line S01198 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04434 M01S01198.286l859 +++| RSFA VFD 42/0LZZZZZG0,18/10 04435 M01S01199.286l859 +++| VFD 42/0LZZZZZGA,18/2 04436 M01S01200.286l859 +++| CON 0 END OF TABLE 04437 M00S03130.pfs +++| SDR SPACE 4,15 04438 M00S03131.pfs +++|** SDR - SET DEFAULT SUMMARY FILE RECORD NAME. 04439 M00S03132.pfs +++|*
| Line S03133 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04440 M01S03133.286l859 ---|* ENTRY (X5) = UTILITY CODE.
| Line S01201 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04441 M01S01201.286l859 +++|* ENTRY (B5) = UTILITY CODE. 04442 M00S03134.pfs +++|*
| Line S03135 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04443 M01S03135.286l859 ---|* EXIT (X5) = UTILITY CODE.
| Line S01202 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04444 M01S01202.286l859 +++|* EXIT (B5) = *TVUP* UTILITY CODE SHIFT COUNT. 04445 M00S03136.pfs +++|* SUMMARY FILE RECORD NAME SET TO CURRENT DATE 04446 M00S03137.pfs +++|* IF SUMMARY FILE VALID FOR UTILITY. 04447 M00S03138.pfs +++|* 04448 M00S03139.pfs +++|* USES X - 0, 1, 6, 7. 04449 M00S03140.pfs +++|* A - 1, 6, 7. 04450 M00S03141.pfs +++|* 04451 M00S03142.pfs +++|* CALLS SFN. 04452 M00S03143.pfs +++|* 04453 M00S03144.pfs +++|* MACROS EDATE. 04454 M00S03145.pfs +++| 04455 M00S03146.pfs +++| 04456 M00S03147.pfs +++| SDR SUBR ENTRY/EXIT
| Line S03148 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04457 M01S03148.286l859 ---| SA2 TVUP+X5
| Line S01203 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04458 M01S01203.286l859 +++| SA2 TVUP+EPS-ENTP 04459 M00S03149.pfs +++| SA1 /COMSPFS/STDT
| Line S03150 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04460 M01S03150.286l859 ---| LX2 59-59+EPS-ENTP
| Line S01204 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04461 M01S01204.286l859 +++| LX2 B5 04462 M00S03151.pfs +++| AX1 18 PACKED FORMAT START DATE 04463 M00S03152.pfs +++| PL X2,SDRX IF SUMMARY FILE NOT VALID 04464 M00S03153.pfs +++| EDATE X1 CONVERT START DATE 04465 M00S03154.pfs +++| MX0 12 04466 M00S03155.pfs +++| LX6 6 04467 M00S03156.pfs +++| BX7 X0*X6 SET YEAR 04468 M00S03157.pfs +++| LX6 6 04469 M00S03158.pfs +++| LX0 -12 04470 M00S03159.pfs +++| BX1 X0*X6 04471 M00S03160.pfs +++| BX7 X7+X1 MERGE MONTH 04472 M00S03161.pfs +++| LX6 6 04473 M00S03162.pfs +++| LX0 -12 04474 M00S03163.pfs +++| BX1 X0*X6 04475 M00S03164.pfs +++| BX7 X7+X1 MERGE DAY 04476 M00S03165.pfs +++| BX1 X7 04477 M00S03166.pfs +++| SA7 PARC+/COMSPFS/CPSR SET DEFAULT RECORD NAME 04478 M00S03167.pfs +++| SA7 DSRN 04479 M00S03168.pfs +++| RJ SFN SPACE FILL NAME FOR DISPLAY
| Line S03169 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04480 M01S03169.286l859 ---| SA6 SRDS+1
| Line S01205 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04481 M01S01205.286l859 +++| SA6 D.SR+1 04482 M00S03170.pfs +++| EQ SDRX RETURN 04483 M00S03171.pfs +++| SKD SPACE 4,15 04484 M00S03172.pfs +++|** SKD - SET INITIAL *K* DISPLAY. 04485 M00S03173.pfs +++|* 04486 M00S03174.pfs +++|* ENTRY (/COMSPFS/UTLC) = UTILITY CODE. 04487 M00S03175.pfs +++|* 04488 M00S03176.pfs +++|* EXIT INITIAL *K* DISPLAY FOR UTILITY SET UP. 04489 M00S03177.pfs +++|* 04490 M00S03178.pfs +++|* USES A - 1, 2, 6. 04491 M00S03179.pfs +++|* X - 1, 2, 6. 04492 M00S03180.pfs +++|* 04493 M00S03181.pfs +++|* CALLS SVO. 04494 M00S03182.pfs +++| 04495 M00S03183.pfs +++| 04496 M00S03184.pfs +++| SKD SUBR ENTRY/EXIT 04497 M00S03185.pfs +++| SA2 /COMSPFS/UTLC 04498 M00S03186.pfs +++| SA1 TDUN-1+X2 GET UTILITY NAME 04499 M00S03187.pfs +++| BX6 X1 04500 M00S03188.pfs +++| SA6 H1DS SET IN DISPLAY 04501 M00S03189.pfs +++| SX6 TPAG SELECT UTILITY DISPLAY PAGING TABLE 04502 M00S03190.pfs +++| SA6 CPAG 04503 M00S03191.pfs +++| SA1 SKDA SET *K* DISPLAY POINTER WORD 04504 M00S03192.pfs +++| BX6 X1 04505 M00S03193.pfs +++| SA6 KDIS 04506 M00S03194.pfs +++| RJ SVO SET VALID OPTIONS 04507 M00S03195.pfs +++| EQ SKDX RETURN 04508 M00S03196.pfs +++| 04509 M00S03197.pfs +++| 04510 M00S03198.pfs +++| SKDA VFD 24/KBUF,18/RGHT,18/LPG1 04511 M00S03199.pfs +++| 04512 M00S03200.pfs +++| TDUN BSS 0 TABLE OF DISPLAY UTILITY NAMES 04513 M00S03201.pfs +++| KDL 1,T,(PFLOAD) 04514 M00S03202.pfs +++| KDL 1,T,(PFDUMP) 04515 M00S03203.pfs +++| KDL 1,T,(PFCAT) 04516 M00S03204.pfs +++| KDL 1,T,(PFATC) 04517 M00S03205.pfs +++| KDL 1,T,(PFCOPY) 04518 M00S03206.pfs +++| KDL 1,T,(PFREL)
| Line S01206 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04519 M01S01206.286l859 +++| KDL 1,T,(PFLIST) 04520 M00S03207.pfs +++| SPT SPACE 4,20 04521 M00S03208.pfs +++|** SPT - SAVE POINTERS. 04522 M00S03209.pfs +++|* 04523 M00S03210.pfs +++|* ENTRY (B2) = ENTERED PARAMETER ADDRESS. 04524 M00S03211.pfs +++|* (B3) = NUMBER OF PARAMETERS LEFT TO PROCESS. 04525 M00S03212.pfs +++|* (B4) = CONVERTED PARAMETER ADDRESS. 04526 M00S03213.pfs +++|* (X0) = PARAMETER MASK WORD. 04527 M00S03214.pfs +++|* 04528 M00S03215.pfs +++|* EXIT (PTEP) = (B2). 04529 M00S03216.pfs +++|* (PTNP) = (B3). 04530 M00S03217.pfs +++|* (PTCP) = (B4). 04531 M00S03218.pfs +++|* (PTMW) = (X0). 04532 M00S03219.pfs +++|* 04533 M00S03220.pfs +++|* USES A - 6, 7. 04534 M00S03221.pfs +++|* X - 6, 7. 04535 M00S03222.pfs +++| 04536 M00S03223.pfs +++| 04537 M00S03224.pfs +++| SPT SUBR ENTRY/EXIT 04538 M00S03225.pfs +++| SX6 B2 04539 M00S03226.pfs +++| SX7 B3 04540 M00S03227.pfs +++| SA6 PTEP 04541 M00S03228.pfs +++| SA7 PTNP 04542 M00S03229.pfs +++| SX6 B4 04543 M00S03230.pfs +++| SA6 PTCP 04544 M00S03231.pfs +++| BX7 X0 04545 M00S03232.pfs +++| SA7 A6+B1 04546 M00S03233.pfs +++| EQ SPTX RETURN 04547 M00S03234.pfs +++| SVO SPACE 4,15 04548 M00S03235.pfs +++|** SVO - SET VALID OPTIONS. 04549 M00S03236.pfs +++|* 04550 M00S03237.pfs +++|* ENTRY (/COMSPFS/UTLC) = SELECTED UTILITY ORDINAL. 04551 M00S03238.pfs +++|*
| Line S03239 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04552 M01S03239.286l859 ---|* EXIT INCORRECT OPTIONS MARKED *N/A*.
| Line S01207 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04553 M01S01207.286l859 +++|* EXIT DEFAULT SUMMARY FILE RECORD NAME SET. 04554 M01S01208.286l859 +++|* UTILITY AND LIST OPTIONS VALID FOR UTILITY DISPLAYED. 04555 M01S01209.286l859 +++|* PARAMETERS NOT VALID FOR UTILITY MARKED *N/A*. 04556 M00S03240.pfs +++|*
| Line S03241 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04557 M01S03241.286l859 ---|* USES A - 1, 2, 5, 6, 7. 04558 M01S03242.286l859 ---|* B - 3, 4, 6. 04559 M01S03243.286l859 ---|* X - 0, 1, 2, 5, 6, 7.
| Line S01210 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04560 M01S01210.286l859 +++|* USES A - 1, 2, 6, 7. 04561 M01S01211.286l859 +++|* B - 3, 5. 04562 M01S01212.286l859 +++|* X - 1, 2, 6, 7. 04563 M00S03244.pfs +++|*
| Line S03245 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04564 M01S03245.286l859 ---|* CALLS SDR.
| Line S01213 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04565 M01S01213.286l859 +++|* CALLS DNP, SDR. 04566 M00S03246.pfs +++| 04567 M00S03247.pfs +++| 04568 M00S03248.pfs +++| SVO SUBR ENTRY/EXIT
| Line S03249 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04569 M01S03249.286l859 ---| SA5 /COMSPFS/UTLC GET UTILITY CODE 04570 M01S03250.286l859 ---| SA1 TUTN+X5 SET UTILITY NAME
| Line S01214 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04571 M01S01214.286l859 +++| SA2 /COMSPFS/UTLC GET UTILITY CODE 04572 M01S01215.286l859 +++| SA1 TUTN+X2 04573 M01S01216.286l859 +++| SB5 X2 SET UTILTY CODE 04574 M00S03251.pfs +++| BX6 X1 04575 M00S03252.pfs +++| SA6 /COMSPFS/UTLN 04576 M00S03253.pfs +++|
| Line S03254 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04577 M01S03254.286l859 ---|* CLEAR DEFAULT ARCHIVE FILE NAME IF NOT SUPPORTED BY UTILITY.
| Line S01217 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04578 M01S01217.286l859 +++|* CLEAR DEFAULT FILE NAMES WHEN NOT SUPPORTED BY UTILITY. 04579 M00S03255.pfs +++|
| Line S03256 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04580 M01S03256.286l859 ---| SA1 TVUP+X5 04581 M01S03257.286l859 ---| LX1 59-59+EPT-ENTP
| Line S01218 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04582 M01S01218.286l859 +++| SA1 TVUP+EPT-ENTP 04583 M01S01219.286l859 +++| SA2 TVUP+EPSI-ENTP 04584 M01S01220.286l859 +++| SX6 B0+ 04585 M01S01221.286l859 +++| LX1 B5 04586 M01S01222.286l859 +++| LX2 B5 04587 M00S03258.pfs +++| NG X1,SVO1 IF ARCHIVE FILE VALID FOR UTILITY
| Line S03259 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04588 M01S03259.286l859 ---| SX6 B0+ CLEAR DEFAULT ARCHIVE FILE NAME 04589 M01S03260.286l859 ---| SA6 PARC+/COMSPFS/CPTB 04590 M01S03261.286l859 ---| SVO1 RJ SDR SET DEFAULT SUMMARY FILE RECORD NAME
| Line S01223 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04591 M01S01223.286l859 +++| SA6 PARC+/COMSPFS/CPTB CLEAR ARCHIVE FILE NAME 04592 M01S01224.286l859 +++| SVO1 NG X2,SVO2 IF SUMMARY INPUT FILE VALID FOR UTILITY 04593 M01S01225.286l859 +++| SA6 PARC+/COMSPFS/CPSI CLEAR SUMMARY INPUT FILE NAME 04594 M01S01226.286l859 +++| SVO2 RJ SDR SET DEFAULT SUMMARY FILE RECORD NAME 04595 M00S03262.pfs +++| 04596 M00S03263.pfs +++|* SET VALID LIST AND UTILITY OPTIONS. 04597 M00S03264.pfs +++|
| Line S03265 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04598 M01S03265.286l859 ---| SA1 VLOT+X5 SET LO VALID OPTIONS 04599 M01S03266.286l859 ---| BX2 X5 MULTIPLY INDEX BY 2
| Line S01227 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04600 M01S01227.286l859 +++| SA1 VLOT+B5 SET LO VALID OPTIONS 04601 M01S01228.286l859 +++| SX2 B5 MULTIPLY INDEX BY 2 04602 M00S03267.pfs +++| LX2 1-0 04603 M00S03268.pfs +++| SA2 VUOT+X2 SET UTILITY VALID OPTIONS 04604 M00S03269.pfs +++| BX6 X1 04605 M00S03270.pfs +++| BX7 X2
| Line S03271 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04606 M01S03271.286l859 ---| SA6 VLOP 04607 M01S03272.286l859 ---| SA7 VUOP
| Line S01229 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04608 M01S01229.286l859 +++| SA6 D.VLO 04609 M01S01230.286l859 +++| SA7 D.VUO 04610 M00S03273.pfs +++| SA1 A2+B1 04611 M00S03274.pfs +++| BX7 X1
| Line S03275 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04612 M01S03275.286l859 ---| SA7 VUOP+1
| Line S01231 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04613 M01S01231.286l859 +++| SA7 D.VUO+1 04614 M00S03276.pfs +++|
| Line S03277 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04615 M01S03277.286l859 ---|* INITIALIZE FOR PARAMETER PROCESSING.
| Line S01232 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04616 M01S01232.286l859 +++|* DISPLAY PARAMETERS VALID FOR UTILITY. 04617 M00S03278.pfs +++|
| Line S03279 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04618 M01S03279.286l859 ---| SA1 TVUP+X5 GET MASK WORD 04619 M00S03280.pfs +++| SA2 CNAV SET *N/A* WORD
| Line S03281 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04620 M01S03281.286l859 ---| BX0 X1 04621 M00S03282.pfs +++| BX6 X2
| Line S03283 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04622 M01S03283.286l859 ---| SB4 DATB SET DISPLAY ADDRESS TABLE LOCATION 04623 M01S03284.286l859 ---| 04624 M01S03285.286l859 ---|* PROCESS NAME PARAMETERS. 04625 M01S03286.286l859 ---| 04626 M01S03287.286l859 ---| SB3 NNAM PROCESS NAMES 04627 M01S03288.286l859 ---| SVO2 NG X0,SVO3 IF VALID OPTION 04628 M01S03289.286l859 ---| SA1 B4 GET ADDRESS 04629 M01S03290.286l859 ---| SA6 X1 04630 M01S03291.286l859 ---| SVO3 LX0 B1,X0 UPDATE POINTERS 04631 M01S03292.286l859 ---| SB4 B4+B1 04632 M01S03293.286l859 ---| SB3 B3-B1 04633 M01S03294.286l859 ---| NZ B3,SVO2 PROCESS MORE NAMES 04634 M01S03295.286l859 ---| 04635 M01S03296.286l859 ---|* SKIP LIST AND UTILITY OPTION SETTINGS. 04636 M01S03297.286l859 ---| 04637 M01S03298.286l859 ---| LX0 2 04638 M01S03299.286l859 ---| SB4 B4+2 04639 M01S03300.286l859 ---| 04640 M01S03301.286l859 ---|* PROCESS OCTAL PARAMETERS. 04641 M01S03302.286l859 ---| 04642 M01S03303.286l859 ---| SB3 NOCT PROCESS OCTAL PARAMETERS 04643 M01S03304.286l859 ---| SVO4 NG X0,SVO5 IF VALID OPTION 04644 M01S03305.286l859 ---| SA1 B4 GET DISPLAY ADDRESS 04645 M01S03306.286l859 ---| SA6 X1 04646 M01S03307.286l859 ---| SVO5 LX0 B1,X0 04647 M01S03308.286l859 ---| SB4 B4+B1 04648 M01S03309.286l859 ---| SB3 B3-B1 04649 M01S03310.286l859 ---| NZ B3,SVO4 PROCESS MORE OCTAL PARAMETERS 04650 M01S03311.286l859 ---| 04651 M01S03312.286l859 ---|* PROCESS DECIMAL PARAMETERS. 04652 M01S03313.286l859 ---| 04653 M01S03314.286l859 ---| SB3 NDEC DECIMAL PARAMETERS 04654 M01S03315.286l859 ---| SVO6 NG X0,SVO7 IF VALID PARAMETER 04655 M01S03316.286l859 ---| SA1 B4 SET DISPLAY ADDRESS 04656 M01S03317.286l859 ---| SA6 X1 04657 M01S03318.286l859 ---| SVO7 LX0 B1,X0 UPDATE POINTERS 04658 M01S03319.286l859 ---| SB4 B4+B1 04659 M01S03320.286l859 ---| SB3 B3-B1 04660 M01S03321.286l859 ---| NZ B3,SVO6 PROCESS MORE DECIMAL PARAMETERS 04661 M01S03322.286l859 ---| 04662 M01S03323.286l859 ---|* PROCESS NON-EQUIVALENCED PARAMETERS. 04663 M01S03324.286l859 ---| 04664 M01S03325.286l859 ---| SB3 NNEQ SET PARAMETERS 04665 M01S03326.286l859 ---| SVO8 NG X0,SVO9 IF VALID OPTION 04666 M01S03327.286l859 ---| SA1 B4 SET DISPLAY ADDRESS 04667 M01S03328.286l859 ---| SA6 X1 04668 M01S03329.286l859 ---| SVO9 LX0 B1,X0 UPDATE POINTERS 04669 M01S03330.286l859 ---| SB4 B4+B1 04670 M01S03331.286l859 ---| SB3 B3-B1 04671 M01S03332.286l859 ---| NZ B3,SVO8 IF MORE SET PARAMETERS TO PROCESS
| Line S01233 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04672 M01S01233.286l859 +++| SA1 TVUP-ENTP+ENAM SET NAME PARAMETERS 04673 M01S01234.286l859 +++| SB2 NNAM SET PARAMETER COUNT 04674 M01S01235.286l859 +++| RJ DNP DISPLAY NON-VALID PARAMETERS 04675 M01S01236.286l859 +++| SA1 TVUP-ENTP+EOCT SET OCTAL PARAMETERS 04676 M01S01237.286l859 +++| SB2 NOCT SET PARAMETER COUNT 04677 M01S01238.286l859 +++| RJ DNP DISPLAY NON-VALID PARAMETERS 04678 M01S01239.286l859 +++| SA1 TVUP-ENTP+EDEC SET DECIMAL PARAMETERS 04679 M01S01240.286l859 +++| SB2 NDEC SET PARAMETER COUNT 04680 M01S01241.286l859 +++| RJ DNP DISPLAY NON-VALID PARAMETERS 04681 M01S01242.286l859 +++| SA1 TVUP-ENTP+ENEQ SET NON-EQUIVALENCED PARAMETERS 04682 M01S01243.286l859 +++| SB2 NNEQ SET PARAMETER COUNT 04683 M01S01244.286l859 +++| RJ DNP DISPLAY NON-VALID PARAMETERS 04684 M00S03333.pfs +++| EQ SVOX EXIT 04685 M00S03334.pfs +++| 04686 M00S03335.pfs +++| 04687 M00S03336.pfs +++| TUTN BSS 1 TABLE OF UTILITY NAMES 04688 M00S03337.pfs +++| DATA 0LPFLOAD 04689 M00S03338.pfs +++| DATA 0LPFDUMP 04690 M00S03339.pfs +++| DATA 0LPFCAT 04691 M00S03340.pfs +++| DATA 0LPFATC 04692 M00S03341.pfs +++| DATA 0LPFCOPY 04693 M00S03342.pfs +++| DATA 0LPFREL
| Line S01245 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04694 M01S01245.286l859 +++| DATA 0LPFLIST 04695 M00S03343.pfs +++| DATA 0LPFRES 04696 M00S03344.pfs +++| 04697 M00S03345.pfs +++| CNAV DATA H*-- N/A -- * 04698 M00S03346.pfs +++| 04699 M00S03347.pfs +++| VLOT BSS 1 VALID LIST OPTION TABLE
| Line S03348 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04700 M01S03348.286l859 ---| DATA H*ID - TCE * FOR PFLOAD 04701 M01S03349.286l859 ---| DATA H*ID - TCE * FOR PFDUMP 04702 M01S03350.286l859 ---| DATA H*ID - TES * FOR PFCAT 04703 M01S03351.286l859 ---| DATA H*ID - TCE * FOR PFATC 04704 M01S03352.286l859 ---| DATA H*ID - TE * FOR PFCOPY 04705 M01S03353.286l859 ---| DATA H*ID - TE * FOR PFREL 04706 M01S03354.286l859 ---| DATA H* * FOR PFRES
| Line S01246 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04707 M01S01246.286l859 +++| DATA H*ID - TCESMU * FOR PFLOAD 04708 M01S01247.286l859 +++| DATA H*ID - TCESMU * FOR PFDUMP 04709 M01S01248.286l859 +++| DATA H*ID - TESMU * FOR PFCAT 04710 M01S01249.286l859 +++| DATA H*ID - TCESMU * FOR PFATC 04711 M01S01250.286l859 +++| DATA H*ID - TESMU * FOR PFCOPY 04712 M01S01251.286l859 +++| DATA H*ID - TESMU * FOR PFREL 04713 M01S01252.286l859 +++| DATA H*ID - TCESMU * FOR PFLIST 04714 M01S01253.286l859 +++| DATA H* * FOR PFRES 04715 M00S03355.pfs +++| 04716 M00S03356.pfs +++| VUOT BSS 2 VALID UTILITY OPTION TABLE
| Line S03357 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04717 M01S03357.286l859 ---| DATA H*CAMIDTLREOZV * FOR PFLOAD 04718 M01S03358.286l859 ---| DATA H*CAMIDTPSYZ * FOR PFDUMP 04719 M01S03359.286l859 ---| DATA H*CAMTID * FOR PFCAT 04720 M01S03360.286l859 ---| DATA H*CAMTID * FOR PFATC 04721 M01S03361.286l859 ---| DATA H*CAMTIDQ * FOR PFCOPY 04722 M01S03362.286l859 ---| DATA H*CAMTID * FOR PFREL
| Line S01254 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04723 M01S01254.286l859 +++| DATA H*CAMIDTLREOZVK * FOR PFLOAD 04724 M01S01255.286l859 +++| DATA H*CAMIDTPSYZK * FOR PFDUMP 04725 M01S01256.286l859 +++| DATA H*CAMTIDK * FOR PFCAT 04726 M01S01257.286l859 +++| DATA H*CAMTIDK * FOR PFATC 04727 M01S01258.286l859 +++| DATA H*CAMTIDQK * FOR PFCOPY 04728 M01S01259.286l859 +++| DATA H*CAMTIDK * FOR PFREL 04729 M01S01260.286l859 +++| DATA H*CAMTIDK * FOR PFLIST 04730 M00S03363.pfs +++| DATA H* * FOR PFRES 04731 M00S03364.pfs +++|
| Line S03365 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04732 M01S03365.286l859 ---| SETT BSS 1 NON-EQUIVALENCED PARAMETER VALUE TABLE
| Line S01261 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04733 M01S01261.286l859 +++| SETT BSS 0 NON-EQUIVALENCED PARAMETER VALUE TABLE 04734 M00S03366.pfs +++| DATA H*INHIBIT * FOR *EO* PARAMETER 04735 M00S03367.pfs +++| DATA H*SET DATE * FOR *SD* PARAMETER 04736 M00S03368.pfs +++| DATA H*UPDATE * FOR *UD* PARAMETER 04737 M00S03369.pfs +++| DATA H*DESTAGE * FOR *DT* PARAMETER 04738 M00S03370.pfs +++| DATA H*INHIBIT * FOR *IP* PARAMETER 04739 M00S03371.pfs +++|
| Line S03372 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04740 M01S03372.286l859 ---| ERRNZ *-SETT-NNEQ-1 CHECK TABLE SYNCHRONIZATION
| Line S01262 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04741 M01S01262.286l859 +++| ERRNZ *-SETT-NNEQ 04742 M00S03373.pfs +++| VAV SPACE 4,15 04743 M00S03374.pfs +++|** VAV - VALIDATE TAPE ALTERNATE STORAGE VSN ENTRY. 04744 M00S03375.pfs +++|* 04745 M00S03376.pfs +++|* ENTRY (X1) = ENTRY TO VALIDATE. 04746 M00S03377.pfs +++|* 04747 M00S03378.pfs +++|* EXIT (X6) = 0 IF ERROR IN ENTRY. 04748 M00S03379.pfs +++|* (X6) = VSN POINTER IF NO ERROR. 04749 M00S03380.pfs +++|* 04750 M00S03381.pfs +++|* USES X - 0, 1, 2, 5, 6. 04751 M00S03382.pfs +++|* A - 1, 6. 04752 M00S03383.pfs +++|* B - 7. 04753 M00S03384.pfs +++|* 04754 M00S03385.pfs +++|* CALLS DXB. 04755 M00S03386.pfs +++| 04756 M00S03387.pfs +++| 04757 M00S03388.pfs +++| VAV1 SX6 B0+ SET ERROR IN VSN ENTRY 04758 M00S03389.pfs +++| 04759 M00S03390.pfs +++| VAV SUBR ENTRY/EXIT 04760 M00S03391.pfs +++| MX0 12 04761 M00S03392.pfs +++| BX6 X0*X1 SAVE VSN PREFIX 04762 M00S03393.pfs +++| SA6 VAVA 04763 M00S03394.pfs +++| BX1 -X0*X1
| Line S03395 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04764 M01S03395.286l859 ---| MX0 -6 04765 M00S03396.pfs +++| LX1 -24
| Line S03397 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04766 M01S03397.286l859 ---| BX6 -X0*X1
| Line S01263 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04767 M01S01263.286l859 +++| SX6 77B 04768 M01S01264.286l859 +++| BX0 X0*X1 04769 M01S01265.286l859 +++| BX6 X6*X1 04770 M01S01266.286l859 +++| NZ X0,VAV1 IF GREATER THAN SEVEN CHARACTERS ENTERED 04771 M00S03398.pfs +++| ZR X6,VAVX IF LESS THAN SIX CHARACTERS ENTERED 04772 M00S03399.pfs +++| SX6 X6-1RB 04773 M00S03400.pfs +++| ZR X6,VAVX IF *B* RADIX 04774 M00S03401.pfs +++| SX6 X6-1RD+1RB 04775 M00S03402.pfs +++| ZR X6,VAVX IF *D* RADIX 04776 M00S03403.pfs +++| MX5 24 04777 M00S03404.pfs +++| LX1 36 04778 M00S03405.pfs +++| BX6 -X5*X1 04779 M00S03406.pfs +++| BX5 X5*X1 04780 M00S03407.pfs +++| NZ X6,VAV1 IF MORE THAN SIX CHARACTERS ENTERED 04781 M00S03408.pfs +++| SB7 B1 SET DECIMAL CONVERSION 04782 M00S03409.pfs +++| RJ DXB CONVERT VSN SEQUENCE NUMBER 04783 M00S03410.pfs +++| SA1 VAVA 04784 M00S03411.pfs +++| NZ X4,VAV1 IF NOT VALID SEQUENCE NUMBER 04785 M00S03412.pfs +++| SX2 X6-4095-1 04786 M00S03413.pfs +++| PL X2,VAV1 IF SEQUENCE NUMBER .GT. 4095 04787 M00S03414.pfs +++| LX1 -36 04788 M00S03415.pfs +++| BX6 X1+X6 MERGE VSN PREFIX AND SEQUENCE NUMBER 04789 M00S03416.pfs +++| EQ VAVX RETURN 04790 M00S03417.pfs +++| 04791 M00S03418.pfs +++| 04792 M00S03419.pfs +++| VAVA CON 0 VSN PREFIX 04793 M00S03420.pfs +++| VDI SPACE 4,10 04794 M00S03421.pfs +++|** VDI - VALIDATE DESTINATION USER INDEX. 04795 M00S03422.pfs +++|* 04796 M00S03423.pfs +++|* EXIT (X3) = 0, IF NO ERROR. 04797 M00S03424.pfs +++|* (X3) .NE. 0, IF ERROR. 04798 M00S03425.pfs +++|* (A3) = ADDRESS OF MESSAGE, IF ERROR. 04799 M00S03426.pfs +++|* 04800 M00S03427.pfs +++|* USES X - 1, 3. 04801 M00S03428.pfs +++|* A - 1, 3. 04802 M00S03429.pfs +++| 04803 M00S03430.pfs +++| 04804 M00S03431.pfs +++| VDI SUBR ENTRY/EXIT 04805 M00S03432.pfs +++| SA1 PARC+/COMSPFS/CPDI CHECK *DI* PARAMETER 04806 M00S03433.pfs +++| BX3 X3-X3 SET NO ERROR 04807 M00S03434.pfs +++| AX1 17 04808 M00S03435.pfs +++| ZR X1,VDIX IF USER INDEX NOT TOO LARGE 04809 M00S03436.pfs +++| SA3 ERRN * USER INDEX OUT OF RANGE.* 04810 M00S03437.pfs +++| EQ VDIX RETURN
| Line S01267 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04811 M01S01267.286l859 +++| VPS SPACE 4,10 04812 M01S01268.286l859 +++|** VPS - VALIDATE PROCESSING STATUS REGISTER. 04813 M01S01269.286l859 +++|* 04814 M01S01270.286l859 +++|* EXIT (X3) = 0 IF NO ERROR. 04815 M01S01271.286l859 +++|* (X3) .NE. 0 IF ERROR. 04816 M01S01272.286l859 +++|* (A3) = ADDRESS OF ERROR MESSAGE IF ERROR. 04817 M01S01273.286l859 +++|* 04818 M01S01274.286l859 +++|* USES X - 1, 3. 04819 M01S01275.286l859 +++|* A - 1, 3. 04820 M01S01276.286l859 +++|* 04821 M01S01277.286l859 +++|* CALLS GWR. 04822 M01S01278.286l859 +++| 04823 M01S01279.286l859 +++| 04824 M01S01280.286l859 +++| VPS SUBR ENTRY/EXIT 04825 M01S01281.286l859 +++| SA1 PARC+/COMSPFS/CPPS 04826 M01S01282.286l859 +++| SX3 B0+ 04827 M01S01283.286l859 +++| ZR X1,VPSX IF NO STATUS REGISTER SPECIFIED 04828 M01S01284.286l859 +++| RJ GWR VALIDATE REGISTER NAME 04829 M01S01285.286l859 +++| SX3 X7-1 04830 M01S01286.286l859 +++| ZR X3,VPSX IF VALID REGISTER NAME 04831 M01S01287.286l859 +++| SA3 ERRX * PS INCORRECT REGISTER NAME.* 04832 M01S01288.286l859 +++| EQ VPSX RETURN WITH ERROR 04833 M00S03438.pfs +++| VRP SPACE 4,10 04834 M00S03439.pfs +++|** VRP - VALIDATE ALTERNATE STORAGE RESIDENCY PARAMETER. 04835 M00S03440.pfs +++|* 04836 M00S03441.pfs +++|* ENTRY (X1) = ENTERED PARAMETER. 04837 M00S03442.pfs +++|* 04838 M00S03443.pfs +++|* EXIT (X6) = 0 IF NEITHER *R* NOR *N* ENTERED. 04839 M00S03444.pfs +++|* (X6) = 1 IF *R* ENTERED. 04840 M00S03445.pfs +++|* (X6) = 2 IF *N* ENTERED. 04841 M00S03446.pfs +++|* 04842 M00S03447.pfs +++|* USES X - 3, 6, 7. 04843 M00S03448.pfs +++| 04844 M00S03449.pfs +++| 04845 M00S03450.pfs +++| VRP SUBR ENTRY/EXIT 04846 M00S03451.pfs +++| MX6 6 04847 M00S03452.pfs +++| BX3 X6*X1 04848 M00S03453.pfs +++| BX7 -X6*X1 04849 M00S03454.pfs +++| LX3 6 04850 M00S03455.pfs +++| NZ X7,VRP1 IF NOT *R* OR *N* ENTRY 04851 M00S03456.pfs +++| SX7 X3-1RR 04852 M00S03457.pfs +++| SX6 B1 04853 M00S03458.pfs +++| ZR X7,VRPX IF ALL RESIDENT SELECTION 04854 M00S03459.pfs +++| SX6 B1+B1 04855 M00S03460.pfs +++| SX7 X3-1RN 04856 M00S03461.pfs +++| ZR X7,VRPX IF ALL NON-RESIDENT SELECTION 04857 M00S03462.pfs +++| VRP1 SX6 B0+ SET NOT *R* OR *N* ENTRY 04858 M00S03463.pfs +++| EQ VRPX RETURN 04859 M00S03464.pfs +++| VRS SPACE 4,20 04860 M00S03465.pfs +++|** VRS - VALIDATE RESIDENCY SELECTION. 04861 M00S03466.pfs +++|* 04862 M00S03467.pfs +++|* ENTRY (X1) = ENTERED PARAMETER.
| Line S03468 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04863 M01S03468.286l859 ---|* (X2) = CURRENT VALUE OF CONVERTED RESIDENCY PARAMETER. 04864 M01S03469.286l859 ---|* (A2) = ADDRESS OF ENTERED PARAMETER.
| Line S01289 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04865 M01S01289.286l859 +++|* (A2) = ADDRESS OF CONVERTED PARAMETER. 04866 M01S01290.286l859 +++|* (X2 BITS 0 - 17) = CURRENT VALUE OF CONVERTED 04867 M01S01291.286l859 +++|* RESIDENCY PARAMETER. 04868 M00S03470.pfs +++|* 04869 M00S03471.pfs +++|* EXIT (X6) = 0 IF NEITHER *R* NOR *N* ENTERED. 04870 M00S03472.pfs +++|* (X6) = 1 IF *R* ENTERED. 04871 M00S03473.pfs +++|* (X6) = 2 IF *N* ENTERED. 04872 M00S03474.pfs +++|* CONVERTED RESIDENCY PARAMETER UPDATED IF *R* OR *N* 04873 M00S03475.pfs +++|* ENTRY. 04874 M00S03476.pfs +++|* 04875 M00S03477.pfs +++|* USES X - 3, 7. 04876 M00S03478.pfs +++|* A - 7. 04877 M00S03479.pfs +++|* 04878 M00S03480.pfs +++|* CALLS VRP. 04879 M00S03481.pfs +++| 04880 M00S03482.pfs +++| 04881 M00S03483.pfs +++| VRS SUBR ENTRY/EXIT 04882 M00S03484.pfs +++| RJ VRP VALIDATE RESIDENCY PARAMETER 04883 M00S03485.pfs +++| ZR X6,VRSX IF ENTRY NOT *R* OR *N*
| Line S03486 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04884 M01S03486.286l859 ---| BX7 X6 04885 M01S03487.286l859 ---| IX3 X2-X6 04886 M01S03488.286l859 ---| ZR X2,VRS1 IF NO CURRENT SELECTION 04887 M01S03489.286l859 ---| ZR X3,VRSX IF ENTRY SAME AS CURRENT SELECTION 04888 M01S03490.286l859 ---| SX7 B0+ SET NULL SELECTION CRITERIA
| Line S01292 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04889 M01S01292.286l859 +++| SX3 X2+ 04890 M01S01293.286l859 +++| BX7 X2+X6 04891 M01S01294.286l859 +++| ZR X3,VRS1 IF NO CURRENT SELECTION 04892 M01S01295.286l859 +++| BX7 X3-X6 04893 M01S01296.286l859 +++| ZR X7,VRSX IF ENTRY SAME AS CURRENT SELECTION 04894 M01S01297.286l859 +++| IX7 X2-X3 CLEAR CURRENT SELECTION 04895 M00S03491.pfs +++| VRS1 SA7 A2 SET RESIDENCY SELECTION 04896 M00S03492.pfs +++| EQ VRSX RETURN 04897 M00S03493.pfs +++| WFS SPACE 4,10 04898 M00S03494.pfs +++|** WFS - WRITE FILE SELECTIONS. 04899 M00S03495.pfs +++|* 04900 M00S03496.pfs +++|* EXIT FILE SELECTIONS WRITTEN TO SCRATCH FILE.
| Line S03497 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04901 M01S03497.286l859 ---|* (PARC+/COMSPFS/CPUI) = 0 IF SELECTIONS FOR MORE THAN 04902 M01S03498.286l859 ---|* ONE USER INDEX. 04903 M00S03499.pfs +++|*
| Line S03500 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04904 M01S03500.286l859 ---|* USES X - 0, 1, 4, 5, 6, 7.
| Line S01298 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04905 M01S01298.286l859 +++|* USES X - 1, 5, 6. 04906 M00S03501.pfs +++|* A - 1, 5. 04907 M00S03502.pfs +++|*
| Line S03503 Modification History | |
|---|---|
M01 (Removed by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 04908 M01S03503.ns2625 ---|* MACROS RETURN, WRITE, WRITEO, WRITER.
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 04909 M01S00037.ns2625 +++|* MACROS WRITE, WRITEO, WRITER. 04910 M00S03504.pfs +++| 04911 M00S03505.pfs +++| 04912 M00S03506.pfs +++| WFS SUBR ENTRY/EXIT
| Line S03507 Modification History | |
|---|---|
M01 (Removed by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 04913 M01S03507.ns2625 ---| RETURN S,R 04914 M01S03508.ns2625 ---| WRITE X2,*
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 04915 M01S00038.ns2625 +++| WRITE S,* 04916 M00S03509.pfs +++| SA1 /COMSPFS/NFIS 04917 M00S03510.pfs +++| ZR X1,WFSX IF NO SELECTIONS 04918 M00S03511.pfs +++| SA5 SBUF
| Line S03512 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04919 M01S03512.286l859 ---| BX0 X5 04920 M01S03513.286l859 ---| LX0 18-0 04921 M01S03514.286l859 ---| SX0 X0 SET FIRST USER INDEX 04922 M00S03515.pfs +++| WFS1 LX5 18-0 42/FILE NAME, 18/ USER INDEX
| Line S03516 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04923 M01S03516.286l859 ---| SX4 X5 ISOLATE USER INDEX 04924 M00S03517.pfs +++| BX6 X5
| Line S03518 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04925 M01S03518.286l859 ---| BX4 X4-X0 04926 M01S03519.286l859 ---| ZR X4,WFS2 IF NO CHANGE IN USER INDEX 04927 M01S03520.286l859 ---| SX0 B0+ FLAG MULTIPLE USER INDICES 04928 M01S03521.286l859 ---| WFS2 SA5 A5+B1
| Line S01299 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04929 M01S01299.286l859 +++| SA5 A5+1 04930 M00S03522.pfs +++| WRITEO X2 04931 M00S03523.pfs +++| NZ X5,WFS1 IF MORE TO WRITE
| Line S03524 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04932 M01S03524.286l859 ---| BX7 X0 04933 M00S03525.pfs +++| BX6 X6-X6
| Line S03526 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04934 M01S03526.286l859 ---| SA7 PARC+/COMSPFS/CPUI SET MULTIPLE USER INDEX FLAG 04935 M00S03527.pfs +++| WRITEO X2 WRITE TERMINATOR 04936 M00S03528.pfs +++| WRITER X2,R 04937 M00S03529.pfs +++| EQ WFSX RETURN 04938 M00S03530.pfs +++| MENU SPACE 4,20 04939 M00S03531.pfs +++|* LEFT SCREEN MENU DISPLAY. 04940 M00S03532.pfs +++| 04941 M00S03533.pfs +++| MENU VFD 12/0,36/0,12/0 DISPLAY CONTROL WORD 04942 M00S03534.pfs +++| 04943 M00S03535.pfs +++| KDL 18,T,(PERMANENT FILE UTILITY OPTIONS) 04944 M00S03536.pfs +++| K SET 6 04945 M00S03537.pfs +++| KDL 13,H,(ENTER K.UO.) 04946 M00S03538.pfs +++| KDL 13,,(UO) 04947 M00S03539.pfs +++| KDL 31,H,(DESCRIPTION) 04948 M00S03540.pfs +++| KDL 13,K,(AT PFATC (CATALOG TAPE)) 04949 M00S03541.pfs +++| KDL 13,K,(CA PFCAT (CATALOG PERMANENT FILES)) 04950 M00S03542.pfs +++| KDL 13,K,(CP PFCOPY (COPY TAPE)) 04951 M00S03543.pfs +++| KDL 13,K,(DU PFDUMP (DUMP PERMANENT FILES)) 04952 M00S03544.pfs +++| KDL 13,K,(LD PFLOAD (LOAD PERMANENT FILES)) 04953 M00S03545.pfs +++| KDL 13,K,(RL PFREL (RELEASE DISK SPACE))
| Line S01300 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04954 M01S01300.286l859 +++| KDL 13,K,(LI PFLIST (LIST SUMMARY FILE)) 04955 M00S03546.pfs +++| VFD 12/7777B,48/ERDS SWITCH TO COMMON BUFFER 04956 M00S03547.pfs +++| 04957 M00S03548.pfs +++| MPAG PAGT MENU,1 MENU PAGING TABLE 04958 M00S03549.pfs +++| PAGT 04959 M00S03550.pfs +++| PAGT * 04960 M00S03551.pfs +++| 04961 M00S03552.pfs +++| PRK HERE ASSEMBLE Y-COORDINATE PRESET CODE HERE 04962 M00S03553.pfs +++| 04963 M00S03554.pfs +++| YTAB KDL * Y-COORDINATE TABLE 04964 M00S03555.pfs +++| 04965 M00S03556.pfs +++| USE LITERALS 04966 M00S03557.pfs +++|
| Line S03558 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04967 M01S03558.286l859 ---| OBUF BSS OBUFL TERMINAL OUTPUT FILE BUFFER
| Line S01301 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 04968 M01S01301.286l859 +++| TBUF BSS TBUFL TERMINAL OUTPUT FILE BUFFER 04969 M00S03559.pfs +++| IBUF BSS 0 INPUT/SELECTIONS FILE BUFFER 04970 M00S03560.pfs +++| SBUF EQU IBUF+IBUFL SELECTIONS BUFFER 04971 M00S03561.pfs +++| RFL= EQU SBUF+30D 04972 M00S03562.pfs +++| SPACE 4,10 04973 M00S03563.pfs +++| END
cdc/nos2.source/opl.opl871/deck/pfs.003.txt · Last modified: by 127.0.0.1