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