cdc:nos2.source:opl.opl871:deck:pfs.001
Deck PFS Part 001
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 ----------------------------+ 01353 M01S00302.286l859 +++| E UOPT (LD) 01354 M01S00303.286l859 +++| I UOPT (LD,DU,CA,AT,CO,RL,LI) 01355 M01S00304.286l859 +++| K UOPT (LD,DU,CA,AT,CO,RL,LI) 01356 M01S00305.286l859 +++| L UOPT (LD) 01357 M01S00306.286l859 +++| M UOPT (LD,DU,CA,AT,CO,RL,LI) 01358 M01S00307.286l859 +++| O UOPT (LD) 01359 M01S00308.286l859 +++| P UOPT (DU) 01360 M01S00309.286l859 +++| Q UOPT (CO) 01361 M01S00310.286l859 +++| R UOPT (LD) 01362 M01S00311.286l859 +++| S UOPT (DU) 01363 M01S00312.286l859 +++| T UOPT (LD,DU,CA,AT,CO,RL,LI) 01364 M01S00313.286l859 +++| V UOPT (LD) 01365 M01S00314.286l859 +++| Y UOPT (DU) 01366 M01S00315.286l859 +++| Z UOPT (LD,DU) 01367 M00S01024.pfs +++| END UOPT 01368 M00S01025.pfs +++| TITLE COMMAND ENTRY POINTS. 01369 M00S01026.pfs +++| SPACE 4,10 01370 M00S01027.pfs +++|* COMMAND ENTRY POINTS. 01371 M00S01028.pfs +++| PFATC SPACE 4,10 01372 M00S01029.pfs +++| PFATC BSS 0 ENTRY 01373 M00S01030.pfs +++| SX6 /COMSPFS/ATUT SET *PFATC* UTILITY 01374 M00S01031.pfs +++| PFA1 SA6 UTCF SET COMMAND CALL 01375 M00S01032.pfs +++| SA6 /COMSPFS/UTLC SET UTILITY CODE 01376 M00S01033.pfs +++| SA6 IPAF SET *I* PARAMETER ALLOWED 01377 M00S01034.pfs +++| EQ PFS ENTER MAIN PROGRAM 01378 M00S01035.pfs +++| PFCAT SPACE 4,10 01379 M00S01036.pfs +++| PFCAT BSS 0 ENTRY 01380 M00S01037.pfs +++| SX6 /COMSPFS/CAUT SET *PFCAT* UTILITY 01381 M00S01038.pfs +++| EQ PFA1 SET UTILITY CODE 01382 M00S01039.pfs +++| PFCOPY SPACE 4,10 01383 M00S01040.pfs +++| PFCOPY BSS 0 ENTRY 01384 M00S01041.pfs +++| SX6 /COMSPFS/COUT SET *PFCOPY* UTILITY 01385 M00S01042.pfs +++| EQ PFA1 SET UTILITY CODE 01386 M00S01043.pfs +++| PFDUMP SPACE 4,10 01387 M00S01044.pfs +++| PFDUMP BSS 0 ENTRY 01388 M00S01045.pfs +++| SX6 /COMSPFS/DUUT SET *PFDUMP* UTILITY 01389 M00S01046.pfs +++| EQ PFA1 SET UTILITY CODE 01390 M00S01047.pfs +++| PFLOAD SPACE 4,10 01391 M00S01048.pfs +++| PFLOAD BSS 0 ENTRY 01392 M00S01049.pfs +++| SX6 /COMSPFS/LDUT SET *PFLOAD* UTILITY 01393 M00S01050.pfs +++| EQ PFA1 SET UTILITY CODE 01394 M00S01051.pfs +++| PFREL SPACE 4,10 01395 M00S01052.pfs +++| PFREL BSS 0 ENTRY 01396 M00S01053.pfs +++| SX6 /COMSPFS/RLUT SET *PFREL* UTILITY 01397 M00S01054.pfs +++| EQ PFA1 SET UTILITY CODE
| Line S00316 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01398 M01S00316.286l859 +++| PFLIST SPACE 4,10 01399 M01S00317.286l859 +++| PFLIST BSS 0 ENTRY 01400 M01S00318.286l859 +++| SX6 /COMSPFS/LIUT SET *PFLIST* UTILITY 01401 M01S00319.286l859 +++| EQ PFA1 SET UTILITY CODE 01402 M00S01055.pfs +++| PFRES SPACE 4,10 01403 M00S01056.pfs +++| PFRES BSS 0 ENTRY 01404 M00S01057.pfs +++| SX6 /COMSPFS/RSUT SET *PFRES* UTILITY 01405 M00S01058.pfs +++| SA2 PGNR 01406 M00S01059.pfs +++| SX2 X2 GET ARGUMENT COUNT 01407 M00S01060.pfs +++| ZR X2,PFA1 IF NO PARAMETERS 01408 M00S01061.pfs +++| MESSAGE ERRG * ENTERED PARAMETER NOT VALID.* 01409 M00S01062.pfs +++| MESSAGE ERRT * PF UTILITY ABORTED.* 01410 M00S01063.pfs +++| ABORT 01411 M00S01064.pfs +++| TITLE PFS - MAIN PROGRAM. 01412 M00S01065.pfs +++| PFS SPACE 4,15 01413 M00S01066.pfs +++|** PFS - MAIN PROGRAM. 01414 M00S01067.pfs +++|* 01415 M00S01068.pfs +++|* EXIT TO *POC* TO LOAD OVERLAY. 01416 M00S01069.pfs +++|* ABORT IF CALLER DOES NOT HAVE REQUIRED PRIVILEGES. 01417 M00S01070.pfs +++|*
| Line S01071 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 01418 M01S01071.ns2628 ---|* USES A - 0, 1, 2, 3, 4, 6, 7. 01419 M01S01072.ns2628 ---|* B - 1, 2, 3, 4, 5. 01420 M01S01073.ns2628 ---|* X - ALL.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 01421 M01S00001.ns2628 +++|* USES X - 0, 1, 2, 3, 4, 5, 6. 01422 M01S00002.ns2628 +++|* A - 1, 2, 3, 4, 6. 01423 M01S00003.ns2628 +++|* B - 1, 2, 3, 4, 5, 6. 01424 M00S01074.pfs +++|*
| Line S01075 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 01425 M01S01075.ns2628 ---|* CALLS ARG, DUN, IIF, KIP, PAD, PBD, PDP, PFD, PFP, PLO, PNE,
| Line S01076 Modification History | |
|---|---|
M01 (Removed by) | ns2625 |
M02 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 01426 M02S01076.ns2628 ---|* PNP, POC, POP, PPC, PPF, PSP, PUO, PVP, SKD, VDI, WFS.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
M02 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 01427 M02S00004.ns2628 ---|* PNP, POC, POP, PPC, PPF, PSP, PUO, PVP, RSF, SKD, VDI, 01428 M02S00005.ns2628 ---|* WFS.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01429 M02S00004.286l859 ---|* CALLS AFS, ARG, DUN, IIF, KIP, PAD, PBD, PDP, PFD, PFP, PLO, 01430 M02S00005.286l859 ---|* PNE, PNP, POC, POP, PPC, PPF, PRK, PSD, PSP, PSS, PUO, 01431 M02S00006.286l859 ---|* PVP, RSF, SKD, VDI, WFS.
| Line S00320 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01432 M01S00320.286l859 +++|* CALLS AFS, ARM, DUN, IIF, KIP, PAD, PBD, PCS, PDP, PFD, PFP, 01433 M01S00321.286l859 +++|* PLO, PNE, PNP, POC, PPC, PPF, PPO, PSD, PSP, PSS, PUO, 01434 M01S00322.286l859 +++|* PVP, SKD, USB, VDI, WFS. 01435 M00S01077.pfs +++|*
| Line S01078 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01436 M01S01078.286l859 ---|* MACROS ABORT, CONSOLE, CSET, GETPP, GETSPS, MEMORY, MESSAGE,
| Line S01079 Modification History | |
|---|---|
M01 (Removed by) | ns2625 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01437 M02S01079.286l859 ---|* MOVE, RECALL, WRITEC, WRITER.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
M02 (Removed by) | ns2628 |
M03 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01438 M03S00006.286l859 ---|* MOVE, RECALL, RETURN, WRITEC, WRITER.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01439 M02S00007.286l859 ---|* MOVE, PDATE, RECALL, RETURN, WRITEC, WRITER.
| Line S00323 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01440 M01S00323.286l859 +++|* MACROS ABORT, CONSOLE, CSET, GETSPS, MEMORY, MESSAGE, MOVE, 01441 M01S00324.286l859 +++|* PDATE, RECALL, RETURN, WRITEC, WRITER. 01442 M00S01080.pfs +++| 01443 M00S01081.pfs +++| 01444 M00S01082.pfs +++| PFS BSS 0 ENTRY 01445 M00S01083.pfs +++| SB1 1 01446 M00S01084.pfs +++| 01447 M00S01085.pfs +++|* CHECK FOR PROPER USER VALIDATION. 01448 M00S01086.pfs +++|* (SYSTEM ORIGIN OR SYSTEM ORIGIN PRIVILEGES WITH *DEBUG* ON). 01449 M00S01087.pfs +++| 01450 M00S01088.pfs +++| GETSPS PFSA 01451 M00S01089.pfs +++| SA1 PFSA 01452 M00S01090.pfs +++| ZR X1,PFS1 IF USER VALID 01453 M00S01091.pfs +++| MESSAGE ERRH * USER ACCESS NOT VALID.* 01454 M00S01092.pfs +++| MESSAGE ERRT * PF UTILITY ABORTED.* 01455 M00S01093.pfs +++| ABORT 01456 M00S01094.pfs +++|
| Line S01095 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01457 M01S01095.286l859 ---| PFS1 GETPP PFS,PPPL,PPPD GET PAGE SIZE PARAMETERS 01458 M01S01096.286l859 ---| PDATE /COMSPFS/STDT SET START DATE AND TIME
| Line S00325 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01459 M01S00325.286l859 +++| PFS1 PDATE /COMSPFS/STDT SET START DATE AND TIME
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 01460 M01S00008.ns2628 +++| SA1 /COMSPFS/STDT 01461 M01S00009.ns2628 +++| BX6 X1 01462 M01S00010.ns2628 +++| SA6 VDTA SET *COMCVDT* BASE DATE AND TIME 01463 M00S01097.pfs +++| SX3 YTAB PRESET *K* DISPLAY COORDINATES 01464 M00S01098.pfs +++| RJ PRK 01465 M00S01099.pfs +++| SX6 B0+ TERMINATE FILE SELECTION BUFFER 01466 M00S01100.pfs +++| SA6 SBUF
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 01467 M01S00007.ns2625 +++| RJ RSF RETURN SCRATCH FILES 01468 M00S01101.pfs +++| SA1 UTCF 01469 M00S01102.pfs +++| ZR X1,PFS2 IF *PFS* ENTRY
| Line S01103 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01470 M01S01103.286l859 ---| SA1 PGNR MOVE COMMAND PARAMETERS 01471 M01S01104.286l859 ---| BX5 X1 01472 M01S01105.286l859 ---| MOVE X5,ARGR,PAR 01473 M00S01106.pfs +++| CONSOLE KDIS 01474 M00S01107.pfs +++| MESSAGE (=C**),2 CLEAR *REQUEST K-DISPLAY* MESSAGE 01475 M00S01108.pfs +++| RJ SKD SET INITIAL *K* DISPLAY
| Line S01109 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01476 M01S01109.286l859 ---| SA4 PGNR SET NUMBER OF PARAMETERS 01477 M01S01110.286l859 ---| SB6 X4
| Line S00326 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01478 M01S00326.286l859 +++| SB2 CCDR SET COMMAND ADDRESS 01479 M01S00327.286l859 +++| RJ USB UNPACK COMMAND PARAMETERS 01480 M01S00328.286l859 +++| RJ POP 01481 M01S00329.286l859 +++| NZ X6,PFS5 IF NO LEADING *$* OR */* 01482 M01S00330.286l859 +++| RJ POP SKIP COMMAND KEYWORD 01483 M00S01111.pfs +++| EQ PFS5 PROCESS COMMAND PARAMETERS 01484 M00S01112.pfs +++| 01485 M00S01113.pfs +++| PFS2 RJ DUN DETERMINE UTILITY NAME 01486 M00S01114.pfs +++| PFS3 SB2 PFS4 ARGUMENT PROCESSOR 01487 M00S01115.pfs +++| SB3 PFS14 FUNCTION PROCESSOR 01488 M00S01116.pfs +++| EQ KIP PROCESS KEYBOARD 01489 M00S01117.pfs +++| 01490 M00S01118.pfs +++| PFS4 RJ AFS ADVANCE FILE SELECTIONS DISPLAY
| Line S01119 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01491 M01S01119.286l859 ---| ZR B6,PFS9 IF NO PARAMETERS ENTERED 01492 M01S01120.286l859 ---| PFS5 SX6 B0+ CLEAR ERROR FLAG
| Line S00331 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01493 M01S00331.286l859 +++| ZR X2,PFS9 IF DISPLAY ADVANCE ENTRY PROCESSED 01494 M01S00332.286l859 +++| SX6 B0+ CLEAR ERROR FLAG 01495 M00S01121.pfs +++| SA6 ERFL 01496 M00S01122.pfs +++| MOVE 4,BLK,ERDS+1 CLEAR ERROR MESSAGE
| Line S01123 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01497 M01S01123.286l859 ---| SB5 TARG SET ENTRY TO ARGUMENT PROCESSOR 01498 M01S01124.286l859 ---| SA4 PAR 01499 M01S01125.286l859 ---| SB4 B6 01500 M01S01126.286l859 ---| RJ ARG PROCESS ENTERED ARGUMENTS
| Line S00333 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01501 M01S00333.286l859 +++| SB2 KBUF SET ENTERED PARRAMETERS ADDRESS 01502 M01S00334.286l859 +++| RJ USB UNPACK ENTERED PARAMETERS 01503 M01S00335.286l859 +++| PFS5 SB3 TARG SET ARGUMENT TABLE ADDRESS 01504 M01S00336.286l859 +++| RJ ARM PROCESS ENTERED ARGUMENTS 01505 M00S01127.pfs +++| ZR X1,PFS6 IF NO ERROR 01506 M00S01128.pfs +++| SX6 ERRG SET ERROR FLAG 01507 M00S01129.pfs +++| SA6 ERFL 01508 M00S01130.pfs +++| 01509 M00S01131.pfs +++|* PROCESS ARGUMENTS. 01510 M00S01132.pfs +++| 01511 M00S01133.pfs +++| PFS6 RJ PNP PROCESS NAME PARAMETERS 01512 M00S01134.pfs +++| RJ PLO PROCESS LIST OPTIONS 01513 M00S01135.pfs +++| RJ PUO PROCESS UTILITY OPTIONS
| Line S01136 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01514 M01S01136.286l859 ---| RJ POP PROCESS OCTAL PARAMETERS
| Line S00337 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01515 M01S00337.286l859 +++| RJ PPO PROCESS OCTAL PARAMETERS 01516 M00S01137.pfs +++| RJ PDP PROCESS DECIMAL PARAMETERS 01517 M00S01138.pfs +++| RJ PNE PROCESS NON-EQUIVALENCED PARAMETERS 01518 M00S01139.pfs +++| RJ PBD PROCESS BEFORE DATE AND TIME 01519 M00S01140.pfs +++| RJ PAD PROCESS AFTER DATE AND TIME 01520 M00S01141.pfs +++| RJ PFP PROCESS FAMILY, PACK, AND USER NAME 01521 M00S01142.pfs +++| NZ X6,PFS7 IF ERROR IN FAMILY, PACK, OR USER NAME 01522 M00S01143.pfs +++| RJ PPF PROCESS PERMANENT FILES 01523 M00S01144.pfs +++| RJ PFD PROCESS FILE SELECTION DELETIONS 01524 M00S01145.pfs +++| PFS7 RJ PSS PROCESS ALTERNATE STORAGE SELECTIONS
| Line S01146 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01525 M01S01146.286l859 ---| RJ PSD PROCESS ALTERNATE STORAGE SELECTIONS
| Line S00338 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01526 M01S00338.286l859 +++| RJ PSD PROCESS ALTERNATE STORAGE DELETIONS 01527 M01S00339.286l859 +++| RJ PCS PROCESS CHARGE AND PROJECT SELECTIONS 01528 M00S01147.pfs +++| RJ IIF INITIALIZE INPUT FILE 01529 M00S01148.pfs +++| 01530 M00S01149.pfs +++|* CLEAR PARAMETER ENTRY AREA. 01531 M00S01150.pfs +++| 01532 M00S01151.pfs +++| BX6 X6-X6 CLEAR DATE REQUIRED FLAG 01533 M00S01152.pfs +++| SA6 DTFL 01534 M00S01153.pfs +++| SB3 ENTPL SET PARAMETER ENTRY AREA LENGTH 01535 M00S01154.pfs +++| SB2 ENTP-1 01536 M00S01155.pfs +++| PFS8 SA6 B2+B3 01537 M00S01156.pfs +++| SB3 B3-B1 01538 M00S01157.pfs +++| NZ B3,PFS8 IF MORE TO CLEAR 01539 M00S01158.pfs +++| 01540 M00S01159.pfs +++|* CHECK FOR PARAMETER ERRORS. 01541 M00S01160.pfs +++| 01542 M00S01161.pfs +++| PFS9 SB2 NPFN SET ENTERED PF NAME TABLE LENGTH 01543 M00S01162.pfs +++| SA4 =2LPF 01544 M00S01163.pfs +++| MX0 12 01545 M00S01164.pfs +++| SA2 PFRG SET FWA OF PF NAME ARGUMENT TABLE 01546 M00S01165.pfs +++| SA3 EPFN SET FWA OF ENTERED PF NAME TABLE 01547 M00S01166.pfs +++| PFS10 BX2 -X0*X2 CHANGE BACK THE PF ENTRIES 01548 M00S01167.pfs +++| BX6 X2+X4 01549 M00S01168.pfs +++| SA6 A2 01550 M00S01169.pfs +++| BX6 X6-X6 CLEAR THE ENTERED PF NAME TABLE 01551 M00S01170.pfs +++| SA6 A3 01552 M00S01171.pfs +++| SB2 B2-B1 DECREMENT INDEX 01553 M00S01172.pfs +++| SA2 A2+B1 INCREMENT POINTER 01554 M00S01173.pfs +++| SA3 A3+B1 01555 M00S01174.pfs +++| GT B2,B0,PFS10 IF NOT END OF ENTERED PF NAME TABLE 01556 M00S01175.pfs +++| SA1 ERFL CHECK FOR ERROR 01557 M00S01176.pfs +++| SA3 X1 GET ERROR MESSAGE 01558 M00S01177.pfs +++| NZ X1,PFS11 IF ERROR 01559 M00S01178.pfs +++| SA1 KIFL 01560 M00S01179.pfs +++| NZ X1,PFS3 IF K-DISPLAY INPUT AFTER PARAMETER ERROR 01561 M00S01180.pfs +++| SA1 UTCF 01562 M00S01181.pfs +++| SA2 INFF 01563 M00S01182.pfs +++| ZR X1,PFS3 IF *PFS* ENTRY 01564 M00S01183.pfs +++| NZ X2,PFS3 IF READING FROM INPUT FILE 01565 M00S01184.pfs +++| EQ PFS14 PROCESS CALL TO UTILITY OVERLAY 01566 M00S01185.pfs +++| 01567 M00S01186.pfs +++|* PROCESS PARAMETER ERROR. 01568 M00S01187.pfs +++| 01569 M00S01188.pfs +++| PFS11 MOVE 3,A3,ERDS+1 DISPLAY MESSAGE 01570 M00S01189.pfs +++| MESSAGE A3 ISSUE MESSAGE TO DAYFILE 01571 M00S01190.pfs +++| SA1 UTCF 01572 M00S01191.pfs +++| SA2 TRIF 01573 M00S01192.pfs +++| ZR X1,PFS3 IF *PFS* ENTRY 01574 M00S01193.pfs +++| NZ X2,PFS12 IF TERMINAL INPUT FILE 01575 M00S01194.pfs +++| SA1 PARC+/COMSPFS/CPOP 01576 M00S01195.pfs +++| LX1 /COMSPFS/KUOP 01577 M00S01196.pfs +++| NG X1,PFS13 IF *OP=K* SPECIFIED 01578 M00S01197.pfs +++| MESSAGE ERRT * PF UTILITY ABORTED.* 01579 M00S01198.pfs +++| ABORT 01580 M00S01199.pfs +++| 01581 M00S01200.pfs +++|* PROCESS PARAMETER ERROR WITH TERMINAL INPUT FILE. 01582 M00S01201.pfs +++|
| Line S01202 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01583 M01S01202.286l859 ---| PFS12 WRITEC O,A3 ISSUE MESSAGE TO TERMINAL 01584 M01S01203.286l859 ---| WRITER O,R FLUSH BUFFER
| Line S00340 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01585 M01S00340.286l859 +++| PFS12 WRITEC T,A3 ISSUE MESSAGE TO TERMINAL 01586 M01S00341.286l859 +++| WRITER T,R FLUSH BUFFER 01587 M00S01204.pfs +++| EQ PFS3 RESUME INPUT 01588 M00S01205.pfs +++| 01589 M00S01206.pfs +++|* PROCESS PARAMETER ERROR WITH *OP=K* SPECIFIED. 01590 M00S01207.pfs +++| 01591 M00S01208.pfs +++| PFS13 SX6 B1+ SET K-DISPLAY INPUT FLAG 01592 M00S01209.pfs +++| SA6 KIFL 01593 M00S01210.pfs +++| EQ PFS3 GET OPERATOR INPUT 01594 M00S01211.pfs +++| 01595 M00S01212.pfs +++|* PROCESS CALL TO UTILITY OVERLAY. 01596 M00S01213.pfs +++| 01597 M00S01214.pfs +++| PFS14 SA1 INFF 01598 M00S01215.pfs +++| ZR X1,PFS15 IF NO DIRECTIVES FILE 01599 M00S01216.pfs +++| RECALL I 01600 M00S01217.pfs +++| PFS15 MOVE 5,BLK,INDS+1 CLEAR MESSAGE LINE 01601 M00S01218.pfs +++| RJ PSP PROCESS SECURITY PARAMETERS 01602 M00S01219.pfs +++| NZ X3,PFS11 IF ERROR 01603 M00S01220.pfs +++| RJ PVP PROCESS PREVIOUS VSN PARAMETER 01604 M00S01221.pfs +++| NZ X3,PFS11 IF ERROR 01605 M00S01222.pfs +++| RJ PPC PROCESS PARAMETER CONFLICTS 01606 M00S01223.pfs +++| NZ X3,PFS11 IF ERROR 01607 M00S01224.pfs +++| RJ VDI VALIDATE DESTINATION USER INDEX 01608 M00S01225.pfs +++| NZ X3,PFS11 IF ERROR
| Line S00342 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01609 M01S00342.286l859 +++| RJ VPS VALIDATE PROCESSING STATUS REGISTER 01610 M01S00343.286l859 +++| NZ X3,PFS11 IF ERROR 01611 M00S01226.pfs +++| SA1 ACSF 01612 M00S01227.pfs +++| ZR X1,PFS16 IF NOT TO RESET *ASCII* MODE 01613 M00S01228.pfs +++| CSET ASCII RESET *ASCII* MODE 01614 M00S01229.pfs +++| PFS16 SA1 /COMSPFS/UTLC GET UTILITY NAME 01615 M00S01230.pfs +++| SA1 TDUN-1+X1 01616 M00S01231.pfs +++| MX6 -36 01617 M00S01232.pfs +++| BX6 -X6*X1 01618 M00S01233.pfs +++| LX6 18 01619 M00S01234.pfs +++| SA6 PFSB+2 01620 M00S01235.pfs +++| MOVE PFSBL,PFSB,MSDS REPLACE *N/A* MESSAGE 01621 M00S01236.pfs +++| SA1 KDIS FORCE DISPLAY OF THE FIRST PAGE 01622 M00S01237.pfs +++| SX6 LPG1 01623 M00S01238.pfs +++| MX0 42 01624 M00S01239.pfs +++| BX1 X1*X0 01625 M00S01240.pfs +++| BX6 X1+X6 01626 M00S01241.pfs +++| SA6 A1 01627 M00S01242.pfs +++| CONSOLE KDIS 01628 M00S01243.pfs +++| RJ WFS WRITE FILE SELECTIONS
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
M02 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01629 M02S00008.286l859 ---| RETURN O,R RETURN OUTPUT SCRATCH FILE
| Line S00344 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01630 M01S00344.286l859 +++| RETURN T,R RETURN OUTPUT SCRATCH FILE 01631 M00S01244.pfs +++| MEMORY CM,,,45000B 01632 M00S01245.pfs +++| BX6 X6-X6 CLEAR INPUT 01633 M00S01246.pfs +++| SA6 KBUF 01634 M00S01247.pfs +++| SA6 INFF CLEAR INPUT FILE FLAG 01635 M00S01248.pfs +++| SA6 /COMSPFS/FISP CLEAR FILE SELECTION BUFFER POINTER
| Line S01249 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01636 M01S01249.286l859 ---| SA1 /COMSPFS/UTLC GET UTILITY CODE 01637 M01S01250.286l859 ---| SX2 X1-/COMSPFS/CAUT 01638 M01S01251.286l859 ---| NZ X2,PFS17 IF NOT *PFCAT* 01639 M01S01252.286l859 ---| SA2 PARC+/COMSPFS/CPSU 01640 M01S01253.286l859 ---| ZR X2,PFS17 IF NO SUMMARY FILE SELECTED 01641 M01S01254.286l859 ---| SX1 TFCNA-TFCN SET SPECIAL *PFCAT* ENTRY 01642 M01S01255.286l859 ---| PFS17 SA1 TFCN+X1 GET OVERLAY NAME
| Line S00345 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01643 M01S00345.286l859 +++| SA1 /COMSPFS/UTLC 01644 M01S00346.286l859 +++| SA1 TFCN+X1 GET OVERLAY NAME 01645 M00S01256.pfs +++| MX0 42 01646 M00S01257.pfs +++| SX6 X1 CHECK IF K-DISPLAY INPUT NECESSARY 01647 M00S01258.pfs +++| ZR X6,POC IF K-DISPLAY INPUT PROCESSING NEEDED 01648 M00S01259.pfs +++| BX5 X0*X1 01649 M00S01260.pfs +++| MX0 -36 CLEAR INPUT BUFFER ADDRESS 01650 M00S01261.pfs +++| SA2 KDIS 01651 M00S01262.pfs +++| BX6 -X0*X2 01652 M00S01263.pfs +++| SA6 A2 01653 M00S01264.pfs +++| CONSOLE KDIS 01654 M00S01265.pfs +++| MESSAGE (=C**),2 CLEAR *REQUEST K-DISPLAY* MESSAGE 01655 M00S01266.pfs +++| BX1 X5 01656 M00S01267.pfs +++| EQ POC PROCESS OVERLAY CALL 01657 M00S01268.pfs +++| 01658 M00S01269.pfs +++| 01659 M00S01270.pfs +++| PFSA CON 0 SYSTEM ORIGIN PRIVILEGES STATUS 01660 M00S01271.pfs +++| PFSB KDL 1,M-2,( INITIATING PFXXXX "30BLANKS") 01661 M00S01272.pfs +++| PFSBL EQU *-PFSB 01662 M00S01273.pfs +++| TFCN SPACE 4,10 01663 M00S01274.pfs +++|** TFCN - TABLE OF FUNCTION PROCESSORS. 01664 M00S01275.pfs +++|* 01665 M00S01276.pfs +++|*T, 42/ OVERLAY NAME,18/ I
Figure
01666 M00S01277.pfs +++|* 01667 M00S01278.pfs +++|* I = 0 IF K-DISPLAY INPUT TO BE ALLOWED. 01668 M00S01279.pfs +++|* .NE. 0 IF INPUT NOT ALLOWED AFTER OVERLAY LOADED. 01669 M00S01280.pfs +++| 01670 M00S01281.pfs +++| 01671 M00S01282.pfs +++| TFCN BSS 0 01672 M00S01283.pfs +++| LOC 0 01673 M00S01284.pfs +++| CON 0 01674 M00S01285.pfs +++| VFD 42/0LPFLOAD1,18/0 PFLOAD 01675 M00S01286.pfs +++| VFD 42/0LPFDUMP1,18/0 PFDUMP
| Line S01287 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01676 M01S01287.286l859 ---| VFD 42/0LPFCAT1,18/1 PFCAT (IF OUTPUT FILE)
| Line S00347 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01677 M01S00347.286l859 +++| VFD 42/0LPFDM1,18/1 PFCAT 01678 M00S01288.pfs +++| VFD 42/0LPFAM1,18/1 PFATC 01679 M00S01289.pfs +++| VFD 42/0LPFAM1,18/1 PFCOPY 01680 M00S01290.pfs +++| VFD 42/0LPFDM1,18/1 PFREL
| Line S00348 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01681 M01S00348.286l859 +++| VFD 42/0LPFLIST1,18/1 PFLIST 01682 M00S01291.pfs +++| VFD 42/0LPFAM1,18/1 PFRES 01683 M00S01292.pfs +++| TFCNL EQU * 01684 M00S01293.pfs +++| LOC *O
| Line S01294 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01685 M01S01294.286l859 ---| 01686 M01S01295.286l859 ---| TFCNA VFD 42/0LPFDM1,18/1 PFCAT (SUMMARY FILE SPECIFIED) 01687 M00S01296.pfs +++| TITLE RESERVED LOCATIONS. 01688 M00S01297.pfs +++|* RESERVED LOCATIONS. 01689 M00S01298.pfs +++| 01690 M00S01299.pfs +++| 01691 M00S01300.pfs +++| ACSF CON 0 *ASCII* CHARACTER SET FLAG 01692 M00S01301.pfs +++| ERFL CON 0 ERROR FLAG 01693 M00S01302.pfs +++| DFAD CON 0 DEFAULTED AFTER DATE/TIME FLAG 01694 M00S01303.pfs +++| DTFL CON 0 DATE AND TIME REQUIRED FLAG 01695 M00S01304.pfs +++| IPAF CON 0 *I* PARAMETER ALLOWED FLAG
| Line S01305 Modification History | |
|---|---|
M01 (Removed by) | pfs7 |
Seq # *Modification Id* Act ----------------------------+ 01696 M01S01305.pfs7 ---| KIFL CON 0 K-DISPLAY INPUT (.NZ. IF ERROR AND *OP=K*) 01697 M00S01306.pfs +++| NVSS CON 0 NUMBER OF VSN SELECTIONS (TA PARAMETER) 01698 M00S01307.pfs +++| PTEP CON 0 ADDRESS OF ENTERED PARAMETER 01699 M00S01308.pfs +++| PTNP CON 0 NUMBER OF PARAMETERS LEFT TO ROCESS 01700 M00S01309.pfs +++| PTCP CON 0 ADDRESS OF CONVERTED PARAMETERS 01701 M00S01310.pfs +++| PTMW CON 0 PARAMETER MASK WORD 01702 M00S01311.pfs +++| TRIF CON 0 TERMINAL INPUT FLAG 01703 M00S01312.pfs +++| UTCF CON 0 UTILITY COMMAND FLAG (0 IF *PFS.* CALL) 01704 M00S01313.pfs +++| SPACE 4,10 01705 M00S01314.pfs +++|* MESSAGES. 01706 M00S01315.pfs +++| 01707 M00S01316.pfs +++| 01708 M00S01317.pfs +++| ERRA DATA 30H BOTH FM AND PN SPECIFIED. 01709 M00S01318.pfs +++| CON 0 01710 M00S01319.pfs +++| ERRB DATA 30H FAMILY/PACK NOT FOUND. 01711 M00S01320.pfs +++| CON 0 01712 M00S01321.pfs +++| ERRC DATA 30H USER NAME INCORRECT. 01713 M00S01322.pfs +++| CON 0 01714 M00S01323.pfs +++| ERRD DATA 30H PF SPECIFIED BUT NOT UI/UN. 01715 M00S01324.pfs +++| CON 0 01716 M00S01325.pfs +++| ERRE DATA 30H RD AND UI/UN NOT ALLOWED. 01717 M00S01326.pfs +++| CON 0 01718 M00S01327.pfs +++| ERRF DATA 30H FILENAME CONFLICT - 01719 M00S01328.pfs +++| CON 0 01720 M00S01329.pfs +++| ERRG DATA 30H ENTERED PARAMETER NOT VALID. 01721 M00S01330.pfs +++| CON 0 01722 M00S01331.pfs +++| ERRH DATA 30H USER ACCESS NOT VALID. 01723 M00S01332.pfs +++| CON 0 01724 M00S01333.pfs +++| ERRI DATA 30H LA AND UA BOTH REQUIRED. 01725 M00S01334.pfs +++| CON 0 01726 M00S01335.pfs +++| ERRJ DATA 30H LA VALUE LARGER THAN UA. 01727 M00S01336.pfs +++| CON 0 01728 M00S01337.pfs +++| ERRK DATA 30H UNKNOWN ACCESS LEVEL NAME. 01729 M00S01338.pfs +++| CON 0 01730 M00S01339.pfs +++| ERRL DATA 30H ACCESS LEVEL OUT OF RANGE. 01731 M00S01340.pfs +++| CON 0 01732 M00S01341.pfs +++| ERRM DATA 30H VSN TOO LONG. 01733 M00S01342.pfs +++| CON 0 01734 M00S01343.pfs +++| ERRN DATA 30H USER INDEX OUT OF RANGE. 01735 M00S01344.pfs +++| CON 0 01736 M00S01345.pfs +++| ERRO DATA 30H DT AND OP=P CONFLICT. 01737 M00S01346.pfs +++| CON 0 01738 M00S01347.pfs +++| ERRP DATA 30H DT AND OP=Z CONFLICT. 01739 M00S01348.pfs +++| CON 0 01740 M00S01349.pfs +++| ERRQ DATA 30H LS VALUE LARGER THAN US. 01741 M00S01350.pfs +++| CON 0 01742 M00S01351.pfs +++| ERRR DATA 30H VSN SELECTIONS AT MAXIMUM. 01743 M00S01352.pfs +++| CON 0
| Line S01353 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01744 M01S01353.286l859 ---| ERRS DATA 30H PFCAT LO AND S CONFLICT.
| Line S00349 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01745 M01S00349.286l859 +++| ERRS DATA 30H CN, SPN ENTRIES AT MAXIMUM. 01746 M00S01354.pfs +++| CON 0 01747 M00S01355.pfs +++| ERRT DATA 30H PF UTILITY ABORTED. 01748 M00S01356.pfs +++| CON 0
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | pfs5 |
Seq # *Modification Id* Act ----------------------------+ 01749 M01S00005.pfs5 +++| ERRU DATA 30H PF UTILITY INPUT FILE EMPTY. 01750 M01S00006.pfs5 +++| CON 0
| Line S01357 Modification History | |
|---|---|
M01 (Removed by) | pfs6 |
Seq # *Modification Id* Act ----------------------------+ 01751 M01S01357.pfs6 ---| SPACE 4,10
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | pfs6 |
Seq # *Modification Id* Act ----------------------------+ 01752 M01S00004.pfs6 +++| ERRV DATA 30H DT AND PN CONFLICT. 01753 M01S00005.pfs6 +++| CON 0
| Line S00350 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01754 M01S00350.286l859 +++| ERRW DATA 30H SPN SPECIFIED BUT NOT CN. 01755 M01S00351.286l859 +++| CON 0 01756 M01S00352.286l859 +++| ERRX DATA 30H PS INCORRECT REGISTER NAME. 01757 M01S00353.286l859 +++| CON 0 01758 M01S00354.286l859 +++| ERRY DATA 30H TD AND DN CONFLICT. 01759 M01S00355.286l859 +++| CON 0 01760 M01S00356.286l859 +++| ERRZ DATA 30H TD AND DA CONFLICT. 01761 M01S00357.286l859 +++| CON 0
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | pfs6 |
Seq # *Modification Id* Act ----------------------------+ 01762 M01S00006.pfs6 +++| SPACE 4,10 01763 M00S01358.pfs +++|* COMMON DECKS. 01764 M00S01359.pfs +++| 01765 M00S01360.pfs +++|
| Line S01361 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01766 M01S01361.286l859 ---|*CALL COMCARG
| Line S00358 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01767 M01S00358.286l859 +++|*CALL COMCARM 01768 M00S01362.pfs +++|*CALL COMCCDD 01769 M00S01363.pfs +++|*CALL COMCCIO
| Line S00359 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01770 M01S00359.286l859 +++| LIST X 01771 M01S00360.286l859 +++|*CALL COMCCNS 01772 M01S00361.286l859 +++| LIST * 01773 M00S01364.pfs +++|*CALL COMCCOD
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 01774 M01S00011.ns2628 +++|*CALL COMCDTC 01775 M00S01365.pfs +++|*CALL COMCDXB 01776 M00S01366.pfs +++|*CALL COMCEDT
| Line S00362 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01777 M01S00362.286l859 +++|*CALL COMCJCR 01778 M00S01367.pfs +++|*CALL COMCLFM
| Line S00363 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01779 M01S00363.286l859 +++|*CALL COMCPOP 01780 M00S01368.pfs +++|*CALL COMCRDC 01781 M00S01369.pfs +++|*CALL COMCRDW 01782 M00S01370.pfs +++|*CALL COMCRSB
| Line S00364 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01783 M01S00364.286l859 +++|*CALL COMCSCB 01784 M00S01371.pfs +++|*CALL COMCSFN 01785 M00S01372.pfs +++|*CALL COMCSTF
| Line S00365 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01786 M01S00365.286l859 +++|*CALL COMCUSB
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 01787 M01S00012.ns2628 +++|*CALL COMCVDE 01788 M00S01373.pfs +++|*CALL COMCVDT 01789 M00S01374.pfs +++|*CALL COMCVLC 01790 M00S01375.pfs +++|*CALL COMCWTC 01791 M00S01376.pfs +++|*CALL COMCWTO 01792 M00S01377.pfs +++|*CALL COMCWTW
| Line S01378 Modification History | |
|---|---|
M01 (Removed by) | pfs5 |
Seq # *Modification Id* Act ----------------------------+ 01793 M01S01378.pfs5 ---| TITLE PFS - SUBROUTINES. 01794 M00S01379.pfs +++| TITLE SUBROUTINES. 01795 M00S01380.pfs +++| AFS SPACE 4,15 01796 M00S01381.pfs +++|** AFS - ADVANCE FILE SELECTIONS DISPLAY. 01797 M00S01382.pfs +++|*
| Line S01383 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01798 M01S01383.286l859 ---|* ENTRY (B6) = 0 IF NO PARAMETERS ENTERED. 01799 M01S01384.286l859 ---|* 01800 M01S01385.286l859 ---|* EXIT (B6) = 0 IF SPECIAL CHARACTER ENTERED.
| Line S00366 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01801 M01S00366.286l859 +++|* EXIT (X2) = 0 IF SPECIAL DISPLAY ADVANCE CHARACTER ENTERED. 01802 M00S01386.pfs +++|* FILE SELECTIONS DISPLAY ADVANCED IF SPECIAL CHARACTER 01803 M00S01387.pfs +++|* ENTERED. 01804 M00S01388.pfs +++|* 01805 M00S01389.pfs +++|* USES X - 1, 2, 6. 01806 M00S01390.pfs +++|* A - 1, 6. 01807 M00S01391.pfs +++|* 01808 M00S01392.pfs +++|* CALLS DFS. 01809 M00S01393.pfs +++| 01810 M00S01394.pfs +++| 01811 M00S01395.pfs +++| AFS SUBR ENTRY/EXIT 01812 M00S01396.pfs +++| SA1 /COMSPFS/KIN 01813 M00S01397.pfs +++| LX1 0-48
| Line S01398 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01814 M01S01398.286l859 ---| SX6 -PFDSL/2
| Line S00367 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01815 M01S00367.286l859 +++| SX6 -D.PFL/2 01816 M00S01399.pfs +++| SX2 X1-1R/*100B 01817 M00S01400.pfs +++| ZR X2,AFS1 IF MOVE BACKWARD, SCREEN 4 01818 M00S01401.pfs +++| SX2 X1-1R**100B 01819 M00S01402.pfs +++| NZ X2,AFSX IF NOT MOVE FORWARD, SCREEN 4
| Line S01403 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01820 M01S01403.286l859 ---| SX6 PFDSL/2
| Line S00368 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01821 M01S00368.286l859 +++| SX6 D.PFL/2 01822 M00S01404.pfs +++| AFS1 SA1 PFXD UPDATE DISPLAY INDEX 01823 M00S01405.pfs +++| IX6 X6+X1 01824 M00S01406.pfs +++| SA6 A1 01825 M00S01407.pfs +++| RJ DFS DISPLAY FILE SELECTIONS
| Line S01408 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01826 M01S01408.286l859 ---| SB6 B0 RESET NO ENTERED PARAMETERS
| Line S00369 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01827 M01S00369.286l859 +++| SX2 B0 SET SPECIAL ENTRY PROCESSED 01828 M00S01409.pfs +++| EQ AFSX RETURN 01829 M00S01410.pfs +++| CFC SPACE 4,10 01830 M00S01411.pfs +++|** CFC - CHECK FILE NAME CONFLICTS. 01831 M00S01412.pfs +++|* 01832 M00S01413.pfs +++|* EXIT (X1) = FILE NAME CAUSING CONFLICT. 01833 M00S01414.pfs +++|* (X1) = 0 IF NO CONFLICT. 01834 M00S01415.pfs +++|* 01835 M00S01416.pfs +++|* USES X - 1, 2, 3, 4, 6. 01836 M00S01417.pfs +++|* A - 1, 2, 3, 4. 01837 M00S01418.pfs +++| 01838 M00S01419.pfs +++| 01839 M00S01420.pfs +++| CFC SUBR ENTRY/EXIT 01840 M00S01421.pfs +++| SA2 CFCA-1 01841 M00S01422.pfs +++| SA1 INFF 01842 M00S01423.pfs +++| MX6 42 01843 M00S01424.pfs +++| NZ X1,CFC1 IF INPUT FILE SPECIFIED 01844 M00S01425.pfs +++| SA2 A2+B1 DO NOT CHECK INPUT FILE 01845 M00S01426.pfs +++| CFC1 SX1 A2-CFCA-CFCAL+2 01846 M00S01427.pfs +++| ZR X1,CFCX IF ALL FILE NAMES CHECKED 01847 M00S01428.pfs +++| SA2 A2+B1 READ FILE NAME ADDRESS 01848 M00S01429.pfs +++| SA1 X2 READ FILE NAME 01849 M00S01430.pfs +++| BX1 X6*X1 01850 M00S01431.pfs +++| ZR X1,CFC1 IF NO FILE NAME 01851 M00S01432.pfs +++| SA3 A2+ 01852 M00S01433.pfs +++| CFC2 SX4 A3-CFCA-CFCAL+1 01853 M00S01434.pfs +++| ZR X4,CFC1 IF END OF ENTRIES TO COMPARE 01854 M00S01435.pfs +++| SA3 A3+B1 READ NEXT FILE NAME ADDRESS FOR COMPARE 01855 M00S01436.pfs +++| SA4 X3 READ FILE NAME TO COMPARE 01856 M00S01437.pfs +++| BX4 X1-X4 01857 M00S01438.pfs +++| BX4 X6*X4 01858 M00S01439.pfs +++| NZ X4,CFC2 IF NO FILE NAME CONFLICT 01859 M00S01440.pfs +++| EQ CFCX RETURN WITH (X1) = FILE NAME 01860 M00S01441.pfs +++| 01861 M00S01442.pfs +++| 01862 M00S01443.pfs +++| CFCA BSS 0 TABLE OF FILE NAME ADDRESSES 01863 M00S01444.pfs +++| CON I INPUT FILE NAME 01864 M00S01445.pfs +++| CON PARC+/COMSPFS/CPTB ARCHIVE FILE NAME 01865 M00S01446.pfs +++| CON PARC+/COMSPFS/CPVF VERIFY FILE NAME 01866 M00S01447.pfs +++| CON PARC+/COMSPFS/CPLB OUTPUT FILE NAME 01867 M00S01448.pfs +++| CON PARC+/COMSPFS/CPMF MASTER FILE NAME 01868 M00S01449.pfs +++| CON PARC+/COMSPFS/CPRD RELEASE DATA FILE NAME
| Line S01450 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01869 M01S01450.286l859 ---| CON PARC+/COMSPFS/CPSU CATALOG ENRIES FILE NAME
| Line S00370 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01870 M01S00370.286l859 +++| CON PARC+/COMSPFS/CPSU SUMMARY FILE NAME 01871 M01S00371.286l859 +++| CON PARC+/COMSPFS/CPSI SUMMARY INPUT FILE NAME 01872 M00S01451.pfs +++| CFCAL EQU *-CFCA TABLE LENGTH
| Line S00372 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01873 M01S00372.286l859 +++| DCS SPACE 4,10 01874 M01S00373.286l859 +++|** DCS - DISPLAY CHARGE AND PROJECT NUMBER SELECTIONS. 01875 M01S00374.286l859 +++|* 01876 M01S00375.286l859 +++|* EXIT K DISPLAY UPDATED. 01877 M01S00376.286l859 +++|* 01878 M01S00377.286l859 +++|* USES X - 1, 2, 5, 6. 01879 M01S00378.286l859 +++|* A - 1, 2, 5. 01880 M01S00379.286l859 +++|* B - 3, 6, 7. 01881 M01S00380.286l859 +++|* 01882 M01S00381.286l859 +++|* CALLS SFN, SCB. 01883 M01S00382.286l859 +++| 01884 M01S00383.286l859 +++| 01885 M01S00384.286l859 +++| DCS SUBR ENTRY/EXIT 01886 M01S00385.286l859 +++| SB6 /COMSPFS/TCNS-3 INITIALIZE SELECTIONS TABLE ADDRESS 01887 M01S00386.286l859 +++| SA5 DCSA-1 01888 M01S00387.286l859 +++| DCS1 SA5 A5+1 GET LINE DESCRIPTORS ADDRESS 01889 M01S00388.286l859 +++| SB7 CNDS-CNDSS INITIALIZE K DISPLAY ADDRESS 01890 M01S00389.286l859 +++| ZR X5,DCSX IF DISPLAY COMPLETE 01891 M01S00390.286l859 +++| 01892 M01S00391.286l859 +++|* ADVANCE TO NEXT ENTRY. 01893 M01S00392.286l859 +++| 01894 M01S00393.286l859 +++| DCS2 SB7 B7+CNDSS ADVANCE K DISPLAY ADDRESS 01895 M01S00394.286l859 +++| SX1 B7-CNDS-CNDSL 01896 M01S00395.286l859 +++| ZR X1,DCS1 IF END OF PASS 01897 M01S00396.286l859 +++| SX1 B6-DCSF 01898 M01S00397.286l859 +++| ZR X1,DCS3 IF BLANK FILLING END OF DISPLAY 01899 M01S00398.286l859 +++| SB6 B6+3 ADVANCE SELECTION ADDRESS 01900 M01S00399.286l859 +++| DCS3 SA1 B6+ 01901 M01S00400.286l859 +++| NZ X1,DCS4 IF NOT END OF SELECTIONS TABLE ENTRIES 01902 M01S00401.286l859 +++| SB6 DCSF SET TO BLANK FILL REMAINDER OF DISPLAY 01903 M01S00402.286l859 +++| SA1 B6+ 01904 M01S00403.286l859 +++| 01905 M01S00404.286l859 +++|* SET CHARGE AND PROJECT FIELDS IN DISPLAY. 01906 M01S00405.286l859 +++| 01907 M01S00406.286l859 +++| DCS4 SX6 X1-1 01908 M01S00407.286l859 +++| NZ X6,DCS5 IF NOT NULL CHARGE NUMBER 01909 M01S00408.286l859 +++| SA1 DCSD 01910 M01S00409.286l859 +++| DCS5 RJ SFN SPACE FILL CHARGE NUMBER 01911 M01S00410.286l859 +++| SB3 X5 SET LINE DESCRIPTOR ADDRESS 01912 M01S00411.286l859 +++| RJ SCB SET CHARGE NUMBER 01913 M01S00412.286l859 +++| SA1 B6+B1 01914 M01S00413.286l859 +++| NZ X1,DCS6 IF PROJECT SELECTION PRESENT 01915 M01S00414.286l859 +++| SA2 B6 01916 M01S00415.286l859 +++| SX2 X2-1 01917 M01S00416.286l859 +++| ZR X2,DCS7 IF NULL CHARGE NUMBER 01918 M01S00417.286l859 +++| SA1 DCSE 01919 M01S00418.286l859 +++| EQ DCS7 SET PROJECT NUMBER 01920 M01S00419.286l859 +++| 01921 M01S00420.286l859 +++| DCS6 SX6 X1-1 01922 M01S00421.286l859 +++| NZ X6,DCS7 IF NOT NULL PROJECT SELECTION 01923 M01S00422.286l859 +++| SA1 DCSD 01924 M01S00423.286l859 +++| DCS7 RJ SFN SPACE FILL PROJECT NUMBER 01925 M01S00424.286l859 +++| SB3 X5+1 SET LINE DESCRIPTOR ADDRESS 01926 M01S00425.286l859 +++| RJ SCB SET PROJECT NUMBER FIRST WORD 01927 M01S00426.286l859 +++| SA1 B6+2 01928 M01S00427.286l859 +++| BX6 X1 01929 M01S00428.286l859 +++| RJ SFN SPACE FILL PROJECT NUMBER 01930 M01S00429.286l859 +++| SB3 X5+2 SET LINE DESCRIPTOR ADDRESS 01931 M01S00430.286l859 +++| RJ SCB SET PROJECT NUMBER SECOND WORD 01932 M01S00431.286l859 +++| EQ DCS2 PROCESS NEXT ENTRY 01933 M01S00432.286l859 +++| 01934 M01S00433.286l859 +++| 01935 M01S00434.286l859 +++| DCSA CON DCSB PASS 1 LINE DESCRIPTORS 01936 M01S00435.286l859 +++| CON DCSC PASS 2 LINE DESCRIPTORS 01937 M01S00436.286l859 +++| CON 0 01938 M01S00437.286l859 +++| 01939 M01S00438.286l859 +++| DCSB CFORM 5,10 CHARGE NUMBER 01940 M01S00439.286l859 +++| CFORM 16,10 PROJECT NUMBER WORD ONE 01941 M01S00440.286l859 +++| CFORM 26,10 PROJECT NUMBER WORD TWO 01942 M01S00441.286l859 +++| 01943 M01S00442.286l859 +++| DCSC CFORM 37,10 CHARGE NUMBER 01944 M01S00443.286l859 +++| CFORM 48,10 PROJECT NUMBER WORD ONE 01945 M01S00444.286l859 +++| CFORM 58,10 PROJECT NUMBER WORD TWO 01946 M01S00445.286l859 +++| 01947 M01S00446.286l859 +++| DCSD DATA 0LNULL. 01948 M01S00447.286l859 +++| DCSE DATA 0LALL. 01949 M01S00448.286l859 +++| 01950 M01S00449.286l859 +++| DCSF DATA 10H 01951 M01S00450.286l859 +++| DATA 10H 01952 M01S00451.286l859 +++| DATA 10H 01953 M00S01452.pfs +++| DFS SPACE 4,15 01954 M00S01453.pfs +++|** DFS - DISPLAY FILE SELECTIONS. 01955 M00S01454.pfs +++|* 01956 M00S01455.pfs +++|* ENTRY (/COMSPFS/NFIS) = NUMBER OF SELECTIONS. 01957 M00S01456.pfs +++|* (PFXD) = STARTING OFFSET. 01958 M00S01457.pfs +++|* 01959 M00S01458.pfs +++|* EXIT NEXT DISPLAY BUILT. 01960 M00S01459.pfs +++|* 01961 M00S01460.pfs +++|* USES X - 0, 1, 2, 3, 5, 6. 01962 M00S01461.pfs +++|* A - 1, 2, 5, 6. 01963 M00S01462.pfs +++|* B - 2, 3, 5, 6. 01964 M00S01463.pfs +++|* 01965 M00S01464.pfs +++|* CALLS COD, SFN. 01966 M00S01465.pfs +++| 01967 M00S01466.pfs +++| 01968 M00S01467.pfs +++| DFS SUBR ENTRY/EXIT 01969 M00S01468.pfs +++| SA1 =10H 01970 M00S01469.pfs +++| SA2 DFSA BLANK OUT EXISTING VALUES 01971 M00S01470.pfs +++| BX6 X1 01972 M00S01471.pfs +++| SA5 A2 HOLD FOR LATER USE 01973 M00S01472.pfs +++| DFS1 SA6 X2+ 01974 M00S01473.pfs +++| SA2 A2+B1 01975 M00S01474.pfs +++| NZ X2,DFS1 IF MORE TO BLANK 01976 M00S01475.pfs +++| SA1 /COMSPFS/NFIS 01977 M00S01476.pfs +++| SA2 PFXD 01978 M00S01477.pfs +++| IX3 X2-X1 01979 M00S01478.pfs +++| NG X2,DFS2 IF UNDERFLOW 01980 M00S01479.pfs +++| NG X3,DFS3 IF NO OVERFLOW 01981 M00S01480.pfs +++| DFS2 SX2 B0 RESET TO START 01982 M00S01481.pfs +++| SX6 B0+ 01983 M00S01482.pfs +++| SA6 A2 01984 M00S01483.pfs +++| DFS3 SB5 X2+ SET STARTING FILE 01985 M00S01484.pfs +++| SB6 X1 SET END OF TABLE 01986 M00S01485.pfs +++| MX0 1 SET PREVIOUS USER INDEX 01987 M00S01486.pfs +++| DFS4 GE B5,B6,DFSX IF ENTIRE TABLE PROCESSED 01988 M00S01487.pfs +++| SA2 SBUF+B5 GET ENTRY 01989 M00S01488.pfs +++| LX2 0-42 01990 M00S01489.pfs +++| SX1 X2 01991 M00S01490.pfs +++| BX3 X1-X0 01992 M00S01491.pfs +++| ZR X3,DFS5 IF INDICIES MATCH 01993 M00S01492.pfs +++| BX0 X1 UPDATE INDEX 01994 M00S01493.pfs +++| RJ COD 01995 M00S01494.pfs +++| SA2 SBUF+B5 01996 M00S01495.pfs +++| SX1 1R-&1R 01997 M00S01496.pfs +++| SB3 48 01998 M00S01497.pfs +++| BX6 X4-X1 01999 M00S01498.pfs +++| SB2 B3-B2 02000 M00S01499.pfs +++| LX6 -6 02001 M00S01500.pfs +++| LX1 B2 02002 M00S01501.pfs +++| BX6 X6-X1 02003 M00S01502.pfs +++| SA6 X5 PLACE INDEX 02004 M00S01503.pfs +++| SA5 A5+B1 02005 M00S01504.pfs +++| ZR X5,DFSX IF TABLE FULL 02006 M00S01505.pfs +++| LX2 0-42 02007 M00S01506.pfs +++| DFS5 MX1 7*6 02008 M00S01507.pfs +++| BX1 X1*X2 02009 M00S01508.pfs +++| ZR X1,DFS7 IF NO FILE NAME (GLOBAL) 02010 M00S01509.pfs +++| RJ SFN 02011 M00S01510.pfs +++| DFS6 LX6 -6 INDENT 02012 M00S01511.pfs +++| SA6 X5 02013 M00S01512.pfs +++| SA5 A5+B1 02014 M00S01513.pfs +++| ZR X5,DFSX IF TABLE FULL 02015 M00S01514.pfs +++| SB5 B5+B1 02016 M00S01515.pfs +++| EQ DFS4 GET NEXT ENTRY 02017 M00S01516.pfs +++| 02018 M00S01517.pfs +++| DFS7 SA1 =10HALL. 02019 M00S01518.pfs +++| BX6 X1 02020 M00S01519.pfs +++| EQ DFS6 INDENT 02021 M00S01520.pfs +++| 02022 M00S01521.pfs +++| 02023 M00S01522.pfs +++| DFSA BSS 0 LIST OF DISPLAY LOCATIONS
| Line S01523 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02024 M01S01523.286l859 ---| .A SET PFDSL/PFDSS NUMBER OF LINES 02025 M01S01524.286l859 ---| .C SET PFDS+1 02026 M01S01525.286l859 ---| OUTER DUP PFDSS-1
| Line S00452 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02027 M01S00452.286l859 +++| .A SET D.PFL/D.PFS NUMBER OF LINES 02028 M01S00453.286l859 +++| .C SET D.PF+1 02029 M01S00454.286l859 +++| OUTER DUP D.PFS-1 02030 M00S01526.pfs +++| .B SET .C 02031 M00S01527.pfs +++| .C SET .C+1 02032 M00S01528.pfs +++| INNER DUP .A 02033 M00S01529.pfs +++| CON .B
| Line S01530 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02034 M01S01530.286l859 ---| .B SET .B+PFDSS
| Line S00455 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02035 M01S00455.286l859 +++| .B SET .B+D.PFS 02036 M00S01531.pfs +++| INNER ENDD 02037 M00S01532.pfs +++| .B SET .C 02038 M00S01533.pfs +++| OUTER ENDD 02039 M00S01534.pfs +++| DATA 0 MARK END OF POINTERS
| Line S01535 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02040 M01S01535.286l859 ---| DSS SPACE 4,15 02041 M01S01536.286l859 ---|** DSS - DISPLAY ALTERNATE STORAGE SELECTIONS.
| Line S00456 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02042 M01S00456.286l859 +++| DNP SPACE 4,15 02043 M01S00457.286l859 +++|** DNP - DISPLAY NON-VALID PARAMETERS. 02044 M00S01537.pfs +++|*
| Line S01538 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02045 M01S01538.286l859 ---|* ENTRY (PARC+/COMSPFS/CPCA) = CARTRIDGE ALTERNATE STORAGE
| Line S00458 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02046 M01S00458.286l859 +++|* ENTRY (X1) = FIRST PARAMETER *TVUP* ENTRY. 02047 M01S00459.286l859 +++|* (X6) = *N/A* DISPLAY TEXT. 02048 M01S00460.286l859 +++|* (A1) = ADDRESS OF FIRST PARAMETER *TVUP* ENTRY. 02049 M01S00461.286l859 +++|* (B2) = NUMBER OF PARAMETERS TO PROCESS. 02050 M01S00462.286l859 +++|* (B5) = UTILITY CODE. 02051 M01S00463.286l859 +++|* 02052 M01S00464.286l859 +++|* EXIT *N/A* TEXT DISPLAYED FOR PARAMETERS NOT VALID FOR 02053 M01S00465.286l859 +++|* UTILITY. 02054 M01S00466.286l859 +++|* 02055 M01S00467.286l859 +++|* USES X - 1. 02056 M01S00468.286l859 +++|* A - 1, 6. 02057 M01S00469.286l859 +++|* B - 2, 3. 02058 M01S00470.286l859 +++| 02059 M01S00471.286l859 +++| 02060 M01S00472.286l859 +++| DNP SUBR ENTRY/EXIT 02061 M01S00473.286l859 +++| DNP1 SB3 X1+ SET DISPLAY ADDRESS 02062 M01S00474.286l859 +++| LX1 B5 02063 M01S00475.286l859 +++| SB2 B2-B1 DECREMENT PARAMETER COUNT 02064 M01S00476.286l859 +++| NG X1,DNP2 IF VALID OPTION 02065 M01S00477.286l859 +++| SA6 B3+1 SET *N/A* TEXT IN DISPLAY 02066 M01S00478.286l859 +++| DNP2 ZR B2,DNPX IF NO MORE PARAMETERS 02067 M01S00479.286l859 +++| SA1 A1+1 GET NEXT *TVUP* ENTRY 02068 M01S00480.286l859 +++| EQ DNP1 CHECK NEXT PARAMETER 02069 M01S00481.286l859 +++| DRS SPACE 4,15 02070 M01S00482.286l859 +++|** DRS - DISPLAY GENERAL RESIDENCY SELECTION. 02071 M01S00483.286l859 +++|* 02072 M01S00484.286l859 +++|* ENTRY (X1) = CONVERTED SELECTION PARAMETER. 02073 M01S00485.286l859 +++|* (B7) = DISPLAY ADDRESS. 02074 M01S00486.286l859 +++|* 02075 M01S00487.286l859 +++|* EXIT GENERAL RESIDENCY SELECTION DISPLAYED IF PRESENT. 02076 M01S00488.286l859 +++|* 02077 M01S00489.286l859 +++|* USES X - 1, 2, 6. 02078 M01S00490.286l859 +++|* A - 2. 02079 M01S00491.286l859 +++|* B - 3. 02080 M01S00492.286l859 +++|* 02081 M01S00493.286l859 +++|* CALLS SCB. 02082 M01S00494.286l859 +++| 02083 M01S00495.286l859 +++| 02084 M01S00496.286l859 +++| DRS SUBR ENTRY/EXIT 02085 M01S00497.286l859 +++| SA2 DRSA 02086 M01S00498.286l859 +++| ZR X1,DRS1 IF NO SELECTION 02087 M01S00499.286l859 +++| SX1 X1-1 02088 M01S00500.286l859 +++| SA2 DRSB 02089 M01S00501.286l859 +++| ZR X1,DRS1 IF RESIDENT SELECTION 02090 M01S00502.286l859 +++| SA2 DRSC 02091 M01S00503.286l859 +++| DRS1 SB3 DRSD 02092 M01S00504.286l859 +++| BX6 X2 02093 M01S00505.286l859 +++| RJ SCB SET MESSAGE FIRST WORD IN DISPLAY 02094 M01S00506.286l859 +++| SA2 A2+B1 02095 M01S00507.286l859 +++| SB3 DRSD+1 02096 M01S00508.286l859 +++| BX6 X2 02097 M01S00509.286l859 +++| RJ SCB SET MESSAGE SECOND WORD IN DISPLAY 02098 M01S00510.286l859 +++| EQ DRSX RETURN 02099 M01S00511.286l859 +++| 02100 M01S00512.286l859 +++| DRSA DATA 10H 02101 M01S00513.286l859 +++| DATA 10H 02102 M01S00514.286l859 +++| 02103 M01S00515.286l859 +++| DRSB DATA 10HRESIDENT 02104 M01S00516.286l859 +++| DATA 10H 02105 M01S00517.286l859 +++| 02106 M01S00518.286l859 +++| DRSC DATA 10HNON-RESIDE 02107 M01S00519.286l859 +++| DATA 10HNT 02108 M01S00520.286l859 +++| 02109 M01S00521.286l859 +++| DRSD CFORM 4,10 02110 M01S00522.286l859 +++| CFORM 14,10 02111 M01S00523.286l859 +++| DSS SPACE 4,20 02112 M01S00524.286l859 +++|** DSS - DISPLAY STORAGE MEDIA SELECTIONS. 02113 M01S00525.286l859 +++|* 02114 M01S00526.286l859 +++|* (PARC+/COMSPFS/CPDA) = DISK ALL RESIDENT OR ALL 02115 M01S00527.286l859 +++|* NON-RESIDENT SELECTION. 02116 M01S00528.286l859 +++|* (PARC+/COMSPFS/CPDA+1 - PARC+/COMSPFS/CPDA+1) = 02117 M01S00529.286l859 +++|* RESIDENCY DEVICE SELECTIONS. 02118 M01S00530.286l859 +++|* (PARC+/COMSPFS/CPCA) = CARTRIDGE ALTERNATE STORAGE 02119 M00S01539.pfs +++|* ALL RESIDENT OR ALL NON-RESIDENT SELECTION. 02120 M00S01540.pfs +++|* (PARC+/COMSPFS/CPTA) = TAPE ALTERNATE STORAGE 02121 M00S01541.pfs +++|* ALL RESIDENT OR ALL NON-RESIDENT SELECTION. 02122 M00S01542.pfs +++|* (PARC+/COMSPFS/CPTA+1 - PARC+/COMSPFS/CPTA+18) = 02123 M00S01543.pfs +++|* TAPE ALTERNATE STORAGE VSN LIST. 02124 M00S01544.pfs +++|* 02125 M00S01545.pfs +++|* EXIT ALTERNATE STORAGE DISPLAY UPDATED. 02126 M00S01546.pfs +++|*
| Line S01547 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02127 M01S01547.286l859 ---|* USES X - 0, 1, 2, 5, 6, 7. 02128 M01S01548.286l859 ---|* A - 1, 2, 5, 6, 7.
| Line S00531 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02129 M01S00531.286l859 +++|* USES X - 0, 1, 5, 6, 7. 02130 M01S00532.286l859 +++|* A - 1, 5. 02131 M01S00533.286l859 +++|* B - 5, 6, 7. 02132 M00S01549.pfs +++|*
| Line S01550 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02133 M01S01550.286l859 ---|* CALLS CDD.
| Line S00534 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02134 M01S00534.286l859 +++|* CALLS CDD, COD, DRS, SCB. 02135 M00S01551.pfs +++| 02136 M00S01552.pfs +++| 02137 M00S01553.pfs +++| DSS SUBR ENTRY/EXIT 02138 M00S01554.pfs +++|
| Line S01555 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02139 M01S01555.286l859 ---|* CLEAR CURRENT DISPLAY.
| Line S00535 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02140 M01S00535.286l859 +++|* DISPLAY DISK GENERAL RESIDENCY SELECTION. 02141 M00S01556.pfs +++|
| Line S01557 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02142 M01S01557.286l859 ---| SA1 =10H 02143 M01S01558.286l859 ---| SA2 DSSA 02144 M01S01559.286l859 ---| BX6 X1 02145 M01S01560.286l859 ---| DSS1 SA6 X2 BLANK OUT WORD 02146 M01S01561.286l859 ---| SA2 A2+B1 02147 M01S01562.286l859 ---| NZ X2,DSS1 IF NOT END OF DISPLAY
| Line S00536 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02148 M01S00536.286l859 +++| SA1 PARC+/COMSPFS/CPDA 02149 M01S00537.286l859 +++| SB7 D.DA SET DISPLAY ADDRESS 02150 M01S00538.286l859 +++| SX1 X1 02151 M01S00539.286l859 +++| RJ DRS DISPLAY RESIDENCY SELECTION 02152 M00S01563.pfs +++|
| Line S01564 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02153 M01S01564.286l859 ---|* DISPLAY GENERAL RESIDENT OR NON-RESIDENT SELECTIONS.
| Line S00540 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02154 M01S00540.286l859 +++|* DISPLAY RESIDENCY DEVICE NUMBERS. 02155 M00S01565.pfs +++|
| Line S00541 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02156 M01S00541.286l859 +++| SA5 PARC+/COMSPFS/CPDA GET FIRST 31 DEVICE SELECTIONS 02157 M01S00542.286l859 +++| SB7 D.DAD SET DEVICE DISPLAY BASE ADDRESS 02158 M01S00543.286l859 +++| SX0 B0+ INITIALIZE DEVICE NUMBER 02159 M01S00544.286l859 +++| SB6 B0+ INITIALIZE DISPLAY INDEX 02160 M01S00545.286l859 +++| DSS1 SX1 X0-63 02161 M01S00546.286l859 +++| ZR X1,DSS3 IF ALL DEVICES CHECKED 02162 M01S00547.286l859 +++| LX5 1 ADVANCE SELECTION MASK 02163 M01S00548.286l859 +++| SX1 X0-31 02164 M01S00549.286l859 +++| SX0 X0+B1 ADVANCE DEVICE NUMBER 02165 M01S00550.286l859 +++| NZ X1,DSS2 IF LAST DEVICE CHECKED NOT 31 02166 M01S00551.286l859 +++| SA5 PARC+/COMSPFS/CPDA+1 GET LAST 32 DEVICE SELECTIONS 02167 M01S00552.286l859 +++| DSS2 PL X5,DSS1 IF DEVICE NOT SELECTED 02168 M01S00553.286l859 +++| SX1 X0+ 02169 M01S00554.286l859 +++| RJ COD CONVERT DEVICE NUMBER 02170 M01S00555.286l859 +++| BX6 X4 02171 M01S00556.286l859 +++| EQ DSS4 SET DEVICE NUMBER IN DISPLAY 02172 M01S00557.286l859 +++| 02173 M01S00558.286l859 +++| DSS3 SX6 2R BLANK FILL DEVICE NUMBER 02174 M01S00559.286l859 +++| LX6 -12 02175 M01S00560.286l859 +++| DSS4 SB3 DSSA+B6 SET LINE DESCRIPTOR ADDRESS 02176 M01S00561.286l859 +++| RJ SCB SET DEVICE NUMBER IN DISPLAY 02177 M01S00562.286l859 +++| SX1 B6-63+1 02178 M01S00563.286l859 +++| SB6 B6+1 ADVANCE DISPLAY INDEX 02179 M01S00564.286l859 +++| NZ X1,DSS1 IF DISPLAY NOT COMPLETE 02180 M01S00565.286l859 +++| 02181 M01S00566.286l859 +++|* DISPLAY CARTRIDGE GENERAL RESIDENCY SELECTION. 02182 M01S00567.286l859 +++| 02183 M00S01566.pfs +++| SA1 PARC+/COMSPFS/CPCA
| Line S01567 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02184 M01S01567.286l859 ---| ZR X1,DSS3 IF NO CARTRIDGE SELECTION 02185 M01S01568.286l859 ---| SX1 X1-1 02186 M01S01569.286l859 ---| SA2 DSSC 02187 M01S01570.286l859 ---| ZR X1,DSS2 IF RESIDENT SELECTION 02188 M01S01571.286l859 ---| SA2 DSSD 02189 M01S01572.286l859 ---| DSS2 SA1 A2+1 02190 M01S01573.286l859 ---| BX6 X2 02191 M01S01574.286l859 ---| BX7 X1 02192 M01S01575.286l859 ---| SA6 CARD+1 SET SELECTION IN DISPLAY 02193 M01S01576.286l859 ---| SA7 CARD+2 02194 M01S01577.286l859 ---| DSS3 SA1 PARC+/COMSPFS/CPTA 02195 M01S01578.286l859 ---| ZR X1,DSS5 IF NO TAPE GENERAL SELECTION 02196 M01S01579.286l859 ---| SX1 X1-1 02197 M01S01580.286l859 ---| SA2 DSSC 02198 M01S01581.286l859 ---| ZR X1,DSS4 IF RESIDENT SELECTION 02199 M01S01582.286l859 ---| SA2 DSSD 02200 M01S01583.286l859 ---| DSS4 SA1 A2+1 02201 M01S01584.286l859 ---| BX6 X2 02202 M01S01585.286l859 ---| BX7 X1 02203 M01S01586.286l859 ---| SA6 TARD+1 SET SELECTION IN DISPLAY 02204 M01S01587.286l859 ---| SA7 TARD+2
| Line S00568 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02205 M01S00568.286l859 +++| SB7 D.CA SET DISPLAY ADDRESS 02206 M01S00569.286l859 +++| RJ DRS DISPLAY RESIDENCY SELECTION 02207 M00S01588.pfs +++|
| Line S01589 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02208 M01S01589.286l859 ---|* DISPLAY ALTERNATE STORAGE VSN-S.
| Line S00570 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02209 M01S00570.286l859 +++|* DISPLAY TAPE GENERAL RESIDENCY SELECTION. 02210 M00S01590.pfs +++|
| Line S01591 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02211 M01S01591.286l859 ---| DSS5 SA1 PARC+/COMSPFS/CPTA 02212 M01S01592.286l859 ---| SA5 DSSB-1 02213 M01S01593.286l859 ---| DSS6 SA1 A1+B1 READ VSN POINTER 02214 M01S01594.286l859 ---| SA5 A5+B1 READ DISPLAY ADDRESS 02215 M01S01595.286l859 ---| ZR X1,DSSX IF END OF VSN-S
| Line S00571 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02216 M01S00571.286l859 +++| SA1 PARC+/COMSPFS/CPTA 02217 M01S00572.286l859 +++| SB7 D.TA SET DISPLAY ADDRESS 02218 M01S00573.286l859 +++| RJ DRS DISPLAY RESIDENCY SELECTION 02219 M01S00574.286l859 +++| 02220 M01S00575.286l859 +++|* DISPLAY TAPE ALTERNATE STORAGE VSN-S. 02221 M01S00576.286l859 +++| 02222 M01S00577.286l859 +++| DSS5 SA5 PARC+/COMSPFS/CPTA+1 GET FIRST VSN 02223 M01S00578.286l859 +++| SB7 D.TAV SET VSN DISPLAY BASE ADDRESS 02224 M01S00579.286l859 +++| SB6 B0+ INITIALIZE DISPLAY INDEX 02225 M01S00580.286l859 +++| DSS6 ZR X5,DSS7 IF END OF VSN-S 02226 M00S01596.pfs +++| MX7 -12
| Line S01597 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02227 M01S01597.286l859 ---| BX0 X7*X1 VSN PREFIX 02228 M01S01598.286l859 ---| BX1 -X7*X1 VSN SEQUENCE NUMBER
| Line S00581 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02229 M01S00581.286l859 +++| BX0 X7*X5 VSN PREFIX 02230 M01S00582.286l859 +++| BX1 -X7*X5 VSN SEQUENCE NUMBER 02231 M00S01599.pfs +++| LX0 36 02232 M00S01600.pfs +++| SX1 X1+10000D BIAS SEQUENCE NUMBER FOR LEADING ZEROES 02233 M00S01601.pfs +++| RJ CDD CONVERT SEQUENCE NUMBER 02234 M00S01602.pfs +++| MX7 -24 02235 M00S01603.pfs +++| BX6 -X7*X6 REMOVE BIAS 02236 M00S01604.pfs +++| LX6 24 02237 M00S01605.pfs +++| BX6 X0+X6 MERGE PREFIX AND SEQUENCE NUMBER
| Line S01606 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02238 M01S01606.286l859 ---| SA6 X5 SET VSN IN DISPLAY
| Line S00583 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02239 M01S00583.286l859 +++| SA5 A5+B1 GET NEXT VSN 02240 M01S00584.286l859 +++| EQ DSS8 SET VSN IN DISPLAY 02241 M01S00585.286l859 +++| 02242 M01S00586.286l859 +++| DSS7 SA1 =10H 02243 M01S00587.286l859 +++| BX6 X1 BLANK FILL ENTRY 02244 M01S00588.286l859 +++| DSS8 SB3 DSSB+B6 SET LINE DESCRIPTOR ADDRESS 02245 M01S00589.286l859 +++| RJ SCB SET VSN IN DISPLAY 02246 M01S00590.286l859 +++| SX1 B6-/COMSPFS/MXVS 02247 M01S00591.286l859 +++| SB6 B6+1 ADVANCE DISPLAY INDEX 02248 M01S00592.286l859 +++| ZR X1,DSSX IF DISPLAY COMPLETE 02249 M00S01607.pfs +++| EQ DSS6 CHECK NEXT VSN 02250 M00S01608.pfs +++| 02251 M00S01609.pfs +++|
| Line S01610 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02252 M01S01610.286l859 ---| DSSA BSS 0 DISPLAY ADDRESS LIST 02253 M01S01611.286l859 ---| CON CARD+1 02254 M01S01612.286l859 ---| CON CARD+2 02255 M01S01613.286l859 ---| CON TARD+1 02256 M01S01614.286l859 ---| CON TARD+2 02257 M01S01615.286l859 ---| DSSB BSS 0 START OF VSN DISPLAY ADDRESSES 02258 M01S01616.286l859 ---| .A SET TAVDL/TAVDS NUMBER OF LINES 02259 M01S01617.286l859 ---| .C SET TAVD+1 02260 M01S01618.286l859 ---| OUTER DUP TAVDS-1 02261 M01S01619.286l859 ---| .B SET .C 02262 M01S01620.286l859 ---| .C SET .C+1 02263 M01S01621.286l859 ---| INNER DUP .A 02264 M01S01622.286l859 ---| CON .B 02265 M01S01623.286l859 ---| .B SET .B+TAVDS 02266 M01S01624.286l859 ---| INNER ENDD 02267 M01S01625.286l859 ---| .B SET .C 02268 M01S01626.286l859 ---| OUTER ENDD 02269 M01S01627.286l859 ---| CON 0 END OF DISPLAY ADDRESSES
| Line S00593 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02270 M01S00593.286l859 +++| DSSA BSS 0 DEVICE NUMBER DISPLAY LINE DESCRIPTORS 02271 M01S00594.286l859 +++| CFORM 4,2 02272 M01S00595.286l859 +++| CFORM 7,2 02273 M01S00596.286l859 +++| CFORM 10,2 02274 M01S00597.286l859 +++| CFORM 13,2 02275 M01S00598.286l859 +++| CFORM 16,2 02276 M01S00599.286l859 +++| CFORM 19,2 02277 M01S00600.286l859 +++| CFORM 22,2 02278 M01S00601.286l859 +++| CFORM 25,2 02279 M01S00602.286l859 +++| CFORM 28,2 02280 M01S00603.286l859 +++| CFORM 31,2 02281 M01S00604.286l859 +++| CFORM 34,2 02282 M01S00605.286l859 +++| CFORM 37,2 02283 M01S00606.286l859 +++| CFORM 40,2 02284 M01S00607.286l859 +++| CFORM 43,2 02285 M01S00608.286l859 +++| CFORM 46,2 02286 M01S00609.286l859 +++| CFORM 49,2 02287 M01S00610.286l859 +++| CFORM 52,2 02288 M01S00611.286l859 +++| CFORM 55,2 02289 M01S00612.286l859 +++| CFORM 58,2 02290 M01S00613.286l859 +++| CFORM 61,2 02291 M01S00614.286l859 +++| CFORM 64,2 02292 M01S00615.286l859 +++| CFORM 70+4,2 02293 M01S00616.286l859 +++| CFORM 70+7,2 02294 M01S00617.286l859 +++| CFORM 70+10,2 02295 M01S00618.286l859 +++| CFORM 70+13,2 02296 M01S00619.286l859 +++| CFORM 70+16,2 02297 M01S00620.286l859 +++| CFORM 70+19,2 02298 M01S00621.286l859 +++| CFORM 70+22,2 02299 M01S00622.286l859 +++| CFORM 70+25,2 02300 M01S00623.286l859 +++| CFORM 70+28,2 02301 M01S00624.286l859 +++| CFORM 70+31,2 02302 M01S00625.286l859 +++| CFORM 70+34,2 02303 M01S00626.286l859 +++| CFORM 70+37,2 02304 M01S00627.286l859 +++| CFORM 70+40,2 02305 M01S00628.286l859 +++| CFORM 70+43,2 02306 M01S00629.286l859 +++| CFORM 70+46,2 02307 M01S00630.286l859 +++| CFORM 70+49,2 02308 M01S00631.286l859 +++| CFORM 70+52,2 02309 M01S00632.286l859 +++| CFORM 70+55,2 02310 M01S00633.286l859 +++| CFORM 70+58,2 02311 M01S00634.286l859 +++| CFORM 70+61,2 02312 M01S00635.286l859 +++| CFORM 70+64,2 02313 M01S00636.286l859 +++| CFORM 140+4,2 02314 M01S00637.286l859 +++| CFORM 140+7,2 02315 M01S00638.286l859 +++| CFORM 140+10,2 02316 M01S00639.286l859 +++| CFORM 140+13,2 02317 M01S00640.286l859 +++| CFORM 140+16,2 02318 M01S00641.286l859 +++| CFORM 140+19,2 02319 M01S00642.286l859 +++| CFORM 140+22,2 02320 M01S00643.286l859 +++| CFORM 140+25,2 02321 M01S00644.286l859 +++| CFORM 140+28,2 02322 M01S00645.286l859 +++| CFORM 140+31,2 02323 M01S00646.286l859 +++| CFORM 140+34,2 02324 M01S00647.286l859 +++| CFORM 140+37,2 02325 M01S00648.286l859 +++| CFORM 140+40,2 02326 M01S00649.286l859 +++| CFORM 140+43,2 02327 M01S00650.286l859 +++| CFORM 140+46,2 02328 M01S00651.286l859 +++| CFORM 140+49,2 02329 M01S00652.286l859 +++| CFORM 140+52,2 02330 M01S00653.286l859 +++| CFORM 140+55,2 02331 M01S00654.286l859 +++| CFORM 140+58,2 02332 M01S00655.286l859 +++| CFORM 140+61,2 02333 M01S00656.286l859 +++| CFORM 140+64,2 02334 M00S01628.pfs +++|
| Line S01629 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02335 M01S01629.286l859 ---| DSSC DATA 10HRESIDENT 02336 M01S01630.286l859 ---| DATA 10H 02337 M01S01631.286l859 ---| DSSD DATA 10HNON-RESIDE 02338 M01S01632.286l859 ---| DATA 10HNT
| Line S00657 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02339 M01S00657.286l859 +++| DSSB BSS 0 VSN DISPLAY LINE DESCRIPTORS 02340 M01S00658.286l859 +++| CFORM 4,6 02341 M01S00659.286l859 +++| CFORM 11,6 02342 M01S00660.286l859 +++| CFORM 18,6 02343 M01S00661.286l859 +++| CFORM 25,6 02344 M01S00662.286l859 +++| CFORM 32,6 02345 M01S00663.286l859 +++| CFORM 39,6 02346 M01S00664.286l859 +++| CFORM 46,6 02347 M01S00665.286l859 +++| CFORM 53,6 02348 M01S00666.286l859 +++| CFORM 60,6 02349 M01S00667.286l859 +++| CFORM 70+4,6 02350 M01S00668.286l859 +++| CFORM 70+11,6 02351 M01S00669.286l859 +++| CFORM 70+18,6 02352 M01S00670.286l859 +++| CFORM 70+25,6 02353 M01S00671.286l859 +++| CFORM 70+32,6 02354 M01S00672.286l859 +++| CFORM 70+39,6 02355 M01S00673.286l859 +++| CFORM 70+46,6 02356 M01S00674.286l859 +++| CFORM 70+53,6 02357 M01S00675.286l859 +++| CFORM 70+60,6 02358 M00S01633.pfs +++| DUN SPACE 4,15 02359 M00S01634.pfs +++|** DUN - DETERMINE UTILITY NAME. 02360 M00S01635.pfs +++|*
| Line S00676 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02361 M01S00676.286l859 +++|* ENTRY (KBUF) = ENTERED UTILITY MNEMONIC. 02362 M01S00677.286l859 +++|* 02363 M00S01636.pfs +++|* EXIT (/COMSPFS/UTLC) = SELECTED UTILITY CODE. 02364 M00S01637.pfs +++|* INITIAL *K* DISPLAY SET UP. 02365 M00S01638.pfs +++|* 02366 M00S01639.pfs +++|* USES A - 4. 02367 M00S01640.pfs +++|* B - 2, 3, 4. 02368 M00S01641.pfs +++|* X - 4. 02369 M00S01642.pfs +++|*
| Line S01643 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02370 M01S01643.286l859 ---|* CALLS ARG, KIP, SKD.
| Line S00678 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02371 M01S00678.286l859 +++|* CALLS ARM, KIP, SKD, USB. 02372 M00S01644.pfs +++|* 02373 M00S01645.pfs +++|* MACROS MOVE. 02374 M00S01646.pfs +++| 02375 M00S01647.pfs +++| 02376 M00S01648.pfs +++| DUN SUBR ENTRY/EXIT 02377 M00S01649.pfs +++| DUN1 SB2 DUN2 SET RETURN ADDRESS 02378 M00S01650.pfs +++| SB3 DUN2 02379 M00S01651.pfs +++| EQ KIP GET OPERATOR INPUT 02380 M00S01652.pfs +++|
| Line S01653 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02381 M01S01653.286l859 ---| DUN2 SA4 PAR 02382 M01S01654.286l859 ---| ZR X4,DUN3 IF NO PARAMETER ENTERED 02383 M01S01655.286l859 ---| SB5 IARG CHECK PARAMETER 02384 M01S01656.286l859 ---| SB4 B6 02385 M01S01657.286l859 ---| RJ ARG
| Line S00679 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02386 M01S00679.286l859 +++| DUN2 SB2 KBUF SET ENTERED PARAMETERS ADDRESS 02387 M01S00680.286l859 +++| RJ USB UNPACK ENTERED PARAMETERS 02388 M01S00681.286l859 +++| SB3 IARG SET ARGUMENT TABLE ADDRESS 02389 M01S00682.286l859 +++| SB6 USBB SET STRING BUFFER ADDRESS 02390 M01S00683.286l859 +++| RJ ARM PROCESS ENTERED ARGUMENTS 02391 M00S01658.pfs +++| NZ X1,DUN3 IF ERROR IN ARGUMENT
| Line S00684 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02392 M01S00684.286l859 +++| SA1 /COMSPFS/UTLC 02393 M01S00685.286l859 +++| ZR X1,DUN3 IF NULL ENTRY 02394 M00S01659.pfs +++| RJ SKD SET INITIAL *K* DISPLAY 02395 M00S01660.pfs +++| MOVE 4,BLK,ERDS+1 CLEAR ERROR LINE 02396 M00S01661.pfs +++| MOVE 5,BLK,INDS+1 CLEAR INPUT LINE 02397 M00S01662.pfs +++| EQ DUNX RETURN 02398 M00S01663.pfs +++| 02399 M00S01664.pfs +++| DUN3 MOVE 3,ERRG,ERDS+1 SET ERROR MESSAGE 02400 M00S01665.pfs +++| EQ DUN1 GET OPERATOR INPUT 02401 M00S01666.pfs +++| IIF SPACE 4,20 02402 M00S01667.pfs +++|** IIF - INITIALIZE INPUT FILE. 02403 M00S01668.pfs +++|* 02404 M00S01669.pfs +++|* EXIT (IPAF) = 0. 02405 M00S01670.pfs +++|* INPUT FILE FET INITIALIZED IF INPUT FILE SPECIFIED. 02406 M00S01671.pfs +++|* (INFF) .NE. 0 IF INPUT FILE SPECIFIED. 02407 M00S01672.pfs +++|* INITIAL READ INITIATED IF NOT TERMINAL INPUT FILE. 02408 M00S01673.pfs +++|* (TRIF) .NE. 0 IF TERMINAL INPUT FILE. 02409 M00S01674.pfs +++|* (ACSF) .NE. 0 IF TERMINAL INPUT FILE AND *ASCII* MODE. 02410 M00S01675.pfs +++|* *ASCII* MODE CLEARED IF TERMINAL INPUT FILE. 02411 M00S01676.pfs +++|* (ERFL) = ERROR MESSAGE ADDRESS IF INPUT FILE PARAMETER 02412 M00S01677.pfs +++|* NOT ALLOWED. 02413 M00S01678.pfs +++|* 02414 M00S01679.pfs +++|* USES X - 1, 2, 3, 6, 7.
| Line S01680 Modification History | |
|---|---|
M01 (Removed by) | pfs5 |
Seq # *Modification Id* Act ----------------------------+ 02415 M01S01680.pfs5 ---|* A - 1, 3, 6, 7.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | pfs5 |
Seq # *Modification Id* Act ----------------------------+ 02416 M01S00007.pfs5 +++|* A - 1, 2, 3, 6, 7. 02417 M00S01681.pfs +++|* 02418 M00S01682.pfs +++|* CALLS STF. 02419 M00S01683.pfs +++|*
| Line S01684 Modification History | |
|---|---|
M01 (Removed by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 02420 M01S01684.ns2625 ---|* MACROS CSET, READ, REQUEST, RETURN, SETFS, TSTATUS.
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 02421 M01S00009.ns2625 +++|* MACROS CSET, READ, REQUEST, SETFS, TSTATUS. 02422 M00S01685.pfs +++| 02423 M00S01686.pfs +++| 02424 M00S01687.pfs +++| IIF2 SX7 ERRG SET PARAMETER ERROR 02425 M00S01688.pfs +++| SA7 ERFL 02426 M00S01689.pfs +++| 02427 M00S01690.pfs +++| IIF SUBR ENTRY/EXIT 02428 M00S01691.pfs +++| SA1 IPAF 02429 M00S01692.pfs +++| SA3 EPIF 02430 M00S01693.pfs +++| BX6 X6-X6 02431 M00S01694.pfs +++| SX7 B1 02432 M00S01695.pfs +++| SA6 IPAF DISALLOW *I* PARAMETER 02433 M00S01696.pfs +++| ZR X3,IIFX IF NO INPUT FILE SPECIFIED 02434 M00S01697.pfs +++| ZR X1,IIF2 IF *I* PARAMETER NOT ALLOWED 02435 M00S01698.pfs +++| SA7 INFF SET INPUT FILE FLAG 02436 M00S01699.pfs +++| SX2 I SET INPUT FILE FET ADDRESS 02437 M00S01700.pfs +++| BX7 X3+X7 02438 M00S01701.pfs +++| SA7 X2 02439 M00S01702.pfs +++| RJ STF CHECK FILE ASSIGNMENT 02440 M00S01703.pfs +++| NZ X6,IIF1 IF NOT TERMINAL FILE 02441 M00S01704.pfs +++| SX6 B1+ SET TERMINAL INPUT FLAG 02442 M00S01705.pfs +++| SA6 TRIF
| Line S01706 Modification History | |
|---|---|
M01 (Removed by) | ns2625 |
Seq # *Modification Id* Act ----------------------------+ 02443 M01S01706.ns2625 ---| RETURN O,R
| Line S01707 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02444 M01S01707.286l859 ---| REQUEST O,U,N ASSIGN TERMINAL OUTPUT FILE 02445 M01S01708.286l859 ---| SETFS O,SSST SET SSJ= FILE STATUS
| Line S00686 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02446 M01S00686.286l859 +++| REQUEST T,U,N ASSIGN TERMINAL OUTPUT FILE 02447 M01S00687.286l859 +++| SETFS T,SSST SET SSJ= FILE STATUS 02448 M00S01709.pfs +++| TSTATUS IIFA GET CHARACTER SET 02449 M00S01710.pfs +++| SA1 IIFA+B1 02450 M00S01711.pfs +++| SX6 B1 02451 M00S01712.pfs +++| LX1 59-2 02452 M00S01713.pfs +++| PL X1,IIFX IF NOT *ASCII* MODE 02453 M00S01714.pfs +++| SA7 ACSF SET *ASCII* MODE 02454 M00S01715.pfs +++| CSET NORMAL CLEAR *ASCII* MODE 02455 M00S01716.pfs +++| EQ IIFX RETURN 02456 M00S01717.pfs +++|
| Line S01718 Modification History | |
|---|---|
M01 (Removed by) | pfs5 |
Seq # *Modification Id* Act ----------------------------+ 02457 M01S01718.pfs5 ---| IIF1 READ I
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | pfs5 |
Seq # *Modification Id* Act ----------------------------+ 02458 M01S00008.pfs5 +++| IIF1 READ I,R 02459 M01S00009.pfs5 +++| SA1 I+2 CHECK FOR EMPTY/MISPOSITIONED INPUT FILE 02460 M01S00010.pfs5 +++| SA2 A1+B1 02461 M01S00011.pfs5 +++| BX6 X1-X2 02462 M01S00012.pfs5 +++| NZ X6,IIFX IF BUFFER NOT EMPTY 02463 M01S00013.pfs5 +++| SX7 ERRU * PF UTILITY INPUT FILE EMPTY.* 02464 M01S00014.pfs5 +++| SA7 ERFL 02465 M00S01719.pfs +++| EQ IIFX RETURN 02466 M00S01720.pfs +++| 02467 M00S01721.pfs +++| 02468 M00S01722.pfs +++| IIFA BSS 2 *TSTATUS* CALL BLOCK
| Line S01723 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02469 M01S01723.286l859 ---| OCK SPACE 4,20
| Line S00688 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02470 M01S00688.286l859 +++| OCK SPACE 4,15 02471 M00S01724.pfs +++|** OCK - OPTION CHECK. 02472 M00S01725.pfs +++|*
| Line S01726 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02473 M01S01726.286l859 ---|* ENTRY (B6) = NUMBER OF OPTIONS. 02474 M01S01727.286l859 ---|* (B7) = FWA CHARACTER TABLE. 02475 M01S01728.286l859 ---|* (X2) = ENTERED OPTIONS. 02476 M01S01729.286l859 ---|* (X0) = VALIDATION MASK.
| Line S00689 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02477 M01S00689.286l859 +++|* ENTRY (B7) = OPTION TABLE FWA. 02478 M01S00690.286l859 +++|* (B6) = LENGTH OF OPTION TABLE. 02479 M01S00691.286l859 +++|* (X2) = ENTERED OPTIONS LEFT JUSTIFIED. 02480 M00S01730.pfs +++|*
| Line S01731 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02481 M01S01731.286l859 ---|* EXIT (X1) = CONVERTED OPTION WORD. 02482 M01S01732.286l859 ---|* (X1) = 0 IF ERROR.
| Line S00692 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02483 M01S00692.286l859 +++|* EXIT (X6) = CONVERTED PARAMETER WORD IF NO ERROR. 02484 M01S00693.286l859 +++|* (X6) = 0 IF ERROR. 02485 M00S01733.pfs +++|*
| Line S01734 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02486 M01S01734.286l859 ---|* USES A - 2, 5, 6. 02487 M01S01735.286l859 ---|* B - 5, 6, 7. 02488 M01S01736.286l859 ---|* X - 0, 1, 2, 3, 4, 5, 6.
| Line S00694 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02489 M01S00694.286l859 +++|* USES A - 1. 02490 M01S00695.286l859 +++|* B - 2, 3, 4. 02491 M01S00696.286l859 +++|* X - 1, 2, 3, 4, 6, 7. 02492 M00S01737.pfs +++| 02493 M00S01738.pfs +++|
| Line S00697 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02494 M01S00697.286l859 +++| OCK3 SX6 B0+ SET ERROR IN ENTRY 02495 M01S00698.286l859 +++| 02496 M00S01739.pfs +++| OCK SUBR ENTRY/EXIT
| Line S01740 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02497 M01S01740.286l859 ---| BX1 X1-X1 02498 M01S01741.286l859 ---| SX6 B6 SAVE NUMBER OF OPTIONS 02499 M01S01742.286l859 ---| SA6 OCKA 02500 M01S01743.286l859 ---| SB6 59 02501 M01S01744.286l859 ---| MX3 -6 02502 M01S01745.286l859 ---| 02503 M01S01746.286l859 ---|* CHECK FOR VALID CHARACTER. 02504 M01S01747.286l859 ---|
| Line S00699 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02505 M01S00699.286l859 +++| SA1 /COMSPFS/UTLC 02506 M01S00700.286l859 +++| SB4 59 02507 M01S00701.286l859 +++| SB3 X1+ SET UTILITY CODE SHIFT COUNT 02508 M01S00702.286l859 +++| SX6 B0 INITIALIZE CONVERTED OPTIONS 02509 M01S00703.286l859 +++| MX7 -6 02510 M00S01748.pfs +++| OCK1 LX2 6
| Line S01749 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02511 M01S01749.286l859 ---| BX4 -X3*X2 02512 M01S01750.286l859 ---| ZR X4,OCK3 IF ALL CHARACTERS CRACKED 02513 M01S01751.286l859 ---| SB5 B0 02514 M01S01752.286l859 ---| OCK2 SA5 B7+B5 02515 M01S01753.286l859 ---| ZR X5,OCK5 IF INCORRECT OPTION 02516 M01S01754.286l859 ---| BX5 X5-X4 02517 M01S01755.286l859 ---| SB5 B5+B1 02518 M01S01756.286l859 ---| NZ X5,OCK2 IF NO COMPARE 02519 M01S01757.286l859 ---| 02520 M01S01758.286l859 ---|* SET APPROPRIATE BIT. 02521 M01S01759.286l859 ---| 02522 M01S01760.286l859 ---| SX5 B1 02523 M01S01761.286l859 ---| SB5 B6-B5 02524 M01S01762.286l859 ---| SB5 B5+B1 02525 M01S01763.286l859 ---| LX5 B5,X5 02526 M01S01764.286l859 ---| BX1 X5+X1 02527 M01S01765.286l859 ---| EQ OCK1 GET NEXT CHARACTER 02528 M01S01766.286l859 ---| 02529 M01S01767.286l859 ---|* CHECK OPTIONS ENTERED AGAINST VALID MASK. 02530 M01S01768.286l859 ---| 02531 M01S01769.286l859 ---| OCK3 BX4 X1 02532 M01S01770.286l859 ---| SA2 OCKA RETRIEVE NUMBER OF OPTIONS 02533 M01S01771.286l859 ---| SB7 X2 02534 M01S01772.286l859 ---| OCK4 PL X4,OCK6 IF NO ERROR 02535 M01S01773.286l859 ---| NG X0,OCK6 IF NO ERROR 02536 M01S01774.286l859 ---| OCK5 SX6 ERRG 02537 M01S01775.286l859 ---| SA6 ERFL SET ERROR 02538 M01S01776.286l859 ---| BX1 X1-X1 02539 M01S01777.286l859 ---| EQ OCKX EXIT 02540 M01S01778.286l859 ---| 02541 M01S01779.286l859 ---| OCK6 SB7 B7-B1 02542 M01S01780.286l859 ---| LX4 B1,X4 02543 M01S01781.286l859 ---| LX0 B1,X0 02544 M01S01782.286l859 ---| NZ B7,OCK4 IF ALL OPTIONS CHECKED 02545 M01S01783.286l859 ---| EQ OCKX 02546 M01S01784.286l859 ---| 02547 M01S01785.286l859 ---| 02548 M01S01786.286l859 ---| OCKA BSS 1 NUMBER OF OPTIONS HOLD AREA
| Line S00704 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02549 M01S00704.286l859 +++| BX3 -X7*X2 GET ENTERED OPTION 02550 M01S00705.286l859 +++| SB2 -1 INITIALIZE OPTION TABLE INDEX 02551 M01S00706.286l859 +++| ZR X3,OCKX IF ALL ENTERED OPTIONS PROCESSED 02552 M01S00707.286l859 +++| OCK2 SB2 B2+B1 ADVANCE TABLE INDEX 02553 M01S00708.286l859 +++| EQ B2,B6,OCK3 IF OPTION NOT FOUND IN TABLE 02554 M01S00709.286l859 +++| SA1 B7+B2 GET TABLE ENTRY 02555 M01S00710.286l859 +++| BX4 -X7*X1 02556 M01S00711.286l859 +++| BX4 X3-X4 02557 M01S00712.286l859 +++| NZ X4,OCK2 IF NO MATCH 02558 M01S00713.286l859 +++| LX1 B3 02559 M01S00714.286l859 +++| PL X1,OCK3 IF OPTION NOT VALID FOR UTILITY 02560 M01S00715.286l859 +++| SB2 B4-B2 02561 M01S00716.286l859 +++| SX1 1 02562 M01S00717.286l859 +++| LX1 B2 SET OPTION FLAG 02563 M01S00718.286l859 +++| BX6 X6+X1 02564 M01S00719.286l859 +++| EQ OCK1 CHECK NEXT CHARACTER 02565 M00S01787.pfs +++| OCP SPACE 4,10 02566 M00S01788.pfs +++|** OCP - OPTION COMBINATION PROCESSOR. 02567 M00S01789.pfs +++|*
| Line S01790 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02568 M01S01790.286l859 ---|* ENTRY (X1) = CONVERTED OPTION WORD.
| Line S00720 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02569 M01S00720.286l859 +++|* ENTRY (X6) = CONVERTED OPTION WORD. 02570 M00S01791.pfs +++|*
| Line S01792 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02571 M01S01792.286l859 ---|* EXIT (X1) = 0 IF CONFLICTS. 02572 M01S01793.286l859 ---|* (X1) = CONVERTED OPTION WORD IF NO CONFLICTS.
| Line S00721 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02573 M01S00721.286l859 +++|* EXIT (X6) = 0 IF CONFLICTS. 02574 M01S00722.286l859 +++|* (X6) = CONVERTED OPTION WORD IF NO CONFLICTS. 02575 M00S01794.pfs +++|*
| Line S01795 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02576 M01S01795.286l859 ---|* USES A - 6.
| Line S00723 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02577 M01S00723.286l859 +++|* USES X - 2, 3, 6, 7. 02578 M01S00724.286l859 +++|* A - 7. 02579 M00S01796.pfs +++|* B - 5.
| Line S01797 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02580 M01S01797.286l859 ---|* X - 1, 2, 3, 6. 02581 M00S01798.pfs +++| 02582 M00S01799.pfs +++| 02583 M00S01800.pfs +++| OCP SUBR ENTRY/EXIT
| Line S01801 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02584 M01S01801.286l859 ---| MX3 3 CHECK *CAM* OPTION CONFLICT 02585 M01S01802.286l859 ---| BX2 X3*X1
| Line S00725 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02586 M01S00725.286l859 +++| SX3 160001B CHECK *CAMT* OPTION CONFLICT 02587 M01S00726.286l859 +++| LX3 59-15 02588 M01S00727.286l859 +++| BX2 X3*X6 02589 M00S01803.pfs +++| CX2 X2 02590 M00S01804.pfs +++| SB5 X2 02591 M00S01805.pfs +++| LE B5,B1,OCP2 IF NO CREATE,ACCESS,MODIFY CONFLICT
| Line S01806 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02592 M01S01806.286l859 ---| OCP1 BX1 X1-X1 SET ERROR
| Line S00728 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02593 M01S00728.286l859 +++| OCP1 SX6 B0 SET ERROR 02594 M00S01807.pfs +++| EQ OCPX EXIT 02595 M00S01808.pfs +++|
| Line S01809 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02596 M01S01809.286l859 ---| OCP2 BX6 X2 SET DATE AND TIME FLAG 02597 M01S01810.286l859 ---| SA6 DTFL
| Line S00729 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02598 M01S00729.286l859 +++| OCP2 BX7 X2 SET DATE AND TIME FLAG 02599 M01S00730.286l859 +++| SA7 DTFL 02600 M00S01811.pfs +++| OCP3 SX3 3 CHECK ACCESS CONFLICT 02601 M00S01812.pfs +++| LX3 56-1
| Line S01813 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02602 M01S01813.286l859 ---| BX2 X3*X1
| Line S00731 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02603 M01S00731.286l859 +++| BX2 X3*X6 02604 M00S01814.pfs +++| CX2 X2 02605 M00S01815.pfs +++| SB5 X2 02606 M00S01816.pfs +++| LE B5,B1,OCP4 IF NO ACCESS CONFLICTS 02607 M00S01817.pfs +++| EQ OCP1 CONFLICT OF ACCESS 02608 M00S01818.pfs +++| 02609 M00S01819.pfs +++| OCP4 SX3 3 CHECK OMIT AND EXTRACT 02610 M00S01820.pfs +++| LX3 49-1
| Line S01821 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02611 M01S01821.286l859 ---| BX2 X3*X1
| Line S00732 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02612 M01S00732.286l859 +++| BX2 X3*X6 02613 M00S01822.pfs +++| CX2 X2 02614 M00S01823.pfs +++| SB5 X2 02615 M00S01824.pfs +++| LE B5,B1,OCP5 IF NO CONFLICTS
| Line S01825 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02616 M01S01825.286l859 ---| EQ OCP1 ERROR
| Line S00733 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02617 M01S00733.286l859 +++| EQ OCP1 SET ERROR 02618 M00S01826.pfs +++| 02619 M00S01827.pfs +++| OCP5 SX3 101B CHECK PURGE AND SUPPRESS CONFLICT 02620 M00S01828.pfs +++| LX3 53-6
| Line S01829 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02621 M01S01829.286l859 ---| BX2 X3*X1
| Line S00734 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02622 M01S00734.286l859 +++| BX2 X3*X6 02623 M00S01830.pfs +++| CX2 X2 02624 M00S01831.pfs +++| SB5 X2 02625 M00S01832.pfs +++| LE B5,B1,OCPX IF NO CONFLICTS 02626 M00S01833.pfs +++| EQ OCP1 ERROR 02627 M00S01834.pfs +++| PAD SPACE 4,25 02628 M00S01835.pfs +++|** PAD - PROCESS AFTER DATE AND TIME. 02629 M00S01836.pfs +++|* 02630 M00S01837.pfs +++|* ENTRY (/COMSPFS/UTLC) = SELECTED UTILITY CODE. 02631 M00S01838.pfs +++|* (DTFL) = DATE REQUIRED FLAG. 02632 M00S01839.pfs +++|* BEFORE DATE AND TIME PROCESSING COMPLETED. 02633 M00S01840.pfs +++|* 02634 M00S01841.pfs +++|* EXIT (ERFL) = ERROR MESSAGE ADDRESS IF ERROR. 02635 M00S01842.pfs +++|* VALID AFTER DATE AND TIME PARAMETERS POSTED IN 02636 M00S01843.pfs +++|* K-DISPLAY. 02637 M00S01844.pfs +++|* VALID AFTER DATE AND TIME PARAMETERS OR THEIR 02638 M00S01845.pfs +++|* CORRESPONDING DEFAULT VALUES (IF REQUIRED BUT NOT 02639 M00S01846.pfs +++|* ENTERED) CONVERTED FROM DISPLAY CODE TO BINARY AND 02640 M00S01847.pfs +++|* POSTED IN THE CONVERTED PARAMETER TABLE. 02641 M00S01848.pfs +++|* 02642 M00S01849.pfs +++|* USES A - 1, 2, 4, 6, 7.
| Line S01850 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02643 M01S01850.ns2628 ---|* B - 2, 4.
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02644 M01S00013.ns2628 +++|* B - 4. 02645 M00S01851.pfs +++|* X - 0, 1, 2, 4, 5, 6, 7. 02646 M00S01852.pfs +++|*
| Line S01853 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02647 M01S01853.ns2628 ---|* CALLS CDT.
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02648 M01S00014.ns2628 +++|* CALLS VDE. 02649 M00S01854.pfs +++|*
| Line S01855 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02650 M01S01855.ns2628 ---|* MACROS EDATE, ETIME, PDATE.
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02651 M01S00015.ns2628 +++|* MACROS EDATE, ETIME. 02652 M00S01856.pfs +++| 02653 M00S01857.pfs +++| 02654 M00S01858.pfs +++| PAD SUBR ENTRY/EXIT 02655 M00S01859.pfs +++| 02656 M00S01860.pfs +++|* PROCESS AFTER DATE. 02657 M00S01861.pfs +++| 02658 M00S01862.pfs +++| SA1 EPAD 02659 M00S01863.pfs +++| NZ X1,PAD2 IF DATE ENTERED 02660 M00S01864.pfs +++| SA1 PARC+/COMSPFS/CPAD 02661 M00S01865.pfs +++| NZ X1,PAD6 IF DATE PREVIOUSLY ENTERED 02662 M00S01866.pfs +++| SA1 EPAT 02663 M00S01867.pfs +++| NZ X1,PAD1 IF AFTER TIME ENTERED 02664 M00S01868.pfs +++| SA1 DTFL 02665 M00S01869.pfs +++| ZR X1,PAD6 IF DATE NOT REQUIRED 02666 M00S01870.pfs +++| SA1 PARC+/COMSPFS/CPBD 02667 M00S01871.pfs +++| NZ X1,PADX IF BEFORE DATE/TIME PRESENT 02668 M00S01872.pfs +++| PAD1 SA1 /COMSPFS/STDT SET DEFAULT DATE 02669 M00S01873.pfs +++| MX6 -18 02670 M00S01874.pfs +++| SX7 B1 02671 M00S01875.pfs +++| BX6 X6*X1 02672 M00S01876.pfs +++| SA7 DFAD SET DEFAULTED AFTER DATE/TIME FLAG 02673 M00S01877.pfs +++| EQ PAD5 POST DEFAULT DATE IN CONVERTED TABLE 02674 M00S01878.pfs +++| 02675 M00S01879.pfs +++| PAD2 SA2 /COMSPFS/UTLC CHECK ENTRY VALIDITY
| Line S01880 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02676 M01S01880.286l859 ---| SB4 EPAD-ENTP 02677 M01S01881.286l859 ---| SA2 TVUP+X2 02678 M01S01882.286l859 ---| LX0 B4,X2
| Line S00735 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02679 M01S00735.286l859 +++| SA4 TVUP+EPAD-ENTP 02680 M01S00736.286l859 +++| SB4 X2 02681 M01S00737.286l859 +++| LX0 B4,X4 02682 M00S01883.pfs +++| PL X0,PAD3 IF NOT VALID ENTRY 02683 M00S01884.pfs +++| SA4 EPAD CHECK FOR RESET TO ZERO 02684 M00S01885.pfs +++| SA2 =1L0 02685 M00S01886.pfs +++| BX6 X4-X2 02686 M00S01887.pfs +++| NZ X6,PAD2.1 IF ZERO NOT SPECIFIED FOR AFTER DATE 02687 M00S01888.pfs +++| SA6 PARC+/COMSPFS/CPAD RESET AFTER DATE/TIME TO ZERO 02688 M00S01889.pfs +++| SA4 PBDA POST ZEROES IN K-DISPLAY 02689 M00S01890.pfs +++| BX6 X4
| Line S01891 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02690 M01S01891.286l859 ---| SA6 ADDS+1 02691 M01S01892.286l859 ---| SA6 ATDS+1
| Line S00738 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02692 M01S00738.286l859 +++| SA6 D.AD+1 02693 M01S00739.286l859 +++| SA6 D.AT+1 02694 M00S01893.pfs +++| EQ PADX RETURN 02695 M00S01894.pfs +++| 02696 M00S01895.pfs +++| PAD2.1 SX2 B0+ SET CONVERSION MODE FOR DATE
| Line S01896 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02697 M01S01896.ns2628 ---| RJ VDT VALIDATE DATE
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02698 M01S00016.ns2628 +++| RJ VDE VALIDATE DATE 02699 M00S01897.pfs +++| PL X6,PAD4 IF NO ERROR 02700 M00S01898.pfs +++| PAD3 SX6 ERRG SET PARAMETER ERROR 02701 M00S01899.pfs +++| SA6 ERFL 02702 M00S01900.pfs +++| EQ PAD6 PROCESS TIME ENTRY 02703 M00S01901.pfs +++| 02704 M00S01902.pfs +++| PAD4 BX7 X7-X7 CLEAR DEFAULTED AFTER DATE/TIME FLAG 02705 M00S01903.pfs +++| SA7 DFAD 02706 M00S01904.pfs +++| LX6 18 POSITION CONVERTED DATE 02707 M00S01905.pfs +++| PAD5 SA1 PARC+/COMSPFS/CPAD COMBINE DATE WITH EXISTING TIME 02708 M00S01906.pfs +++| MX2 -18 02709 M00S01907.pfs +++| BX1 -X2*X1 02710 M00S01908.pfs +++| BX6 X6+X1 02711 M00S01909.pfs +++| SA6 A1 POST IN CONVERTED PARAMETER TABLE 02712 M00S01910.pfs +++| 02713 M00S01911.pfs +++|* PROCESS AFTER TIME. 02714 M00S01912.pfs +++| 02715 M00S01913.pfs +++| PAD6 SA1 EPAT 02716 M00S01914.pfs +++| NZ X1,PAD7 IF TIME ENTERED 02717 M00S01915.pfs +++| EQ PAD10 CHECK K-DISPLAY POSTING REQUIREMENT 02718 M00S01916.pfs +++| 02719 M00S01917.pfs +++| PAD7 SA2 /COMSPFS/UTLC CHECK ENTRY VALIDITY
| Line S01918 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02720 M01S01918.286l859 ---| SB4 EPAT-ENTP 02721 M01S01919.286l859 ---| SA2 TVUP+X2 02722 M01S01920.286l859 ---| LX0 B4,X2
| Line S00740 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02723 M01S00740.286l859 +++| SA4 TVUP+EPAT-ENTP 02724 M01S00741.286l859 +++| SB4 X2 02725 M01S00742.286l859 +++| LX0 B4,X4 02726 M00S01921.pfs +++| PL X0,PAD8 IF NOT VALID ENTRY 02727 M00S01922.pfs +++| SA4 EPAT CHECK FOR RESET TO ZERO 02728 M00S01923.pfs +++| SA2 =1L0 02729 M00S01924.pfs +++| BX6 X4-X2 02730 M00S01925.pfs +++| NZ X6,PAD7.1 IF ZERO NOT SPECIFIED FOR AFTER TIME 02731 M00S01926.pfs +++| SA2 PBDA POST ZEROES IN K-DISPLAY 02732 M00S01927.pfs +++| BX7 X2
| Line S01928 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02733 M01S01928.286l859 ---| SA7 ATDS+1
| Line S00743 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02734 M01S00743.286l859 +++| SA7 D.AT+1 02735 M00S01929.pfs +++| EQ PAD9 COMBINE TIME WITH EXISTING DATE 02736 M00S01930.pfs +++| 02737 M00S01931.pfs +++| PAD7.1 SX2 B1+ SET CONVERSION MODE FOR TIME
| Line S01932 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02738 M01S01932.ns2628 ---| RJ VDT VALIDATE TIME
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02739 M01S00017.ns2628 +++| RJ VDE VALIDATE TIME 02740 M00S01933.pfs +++| PL X6,PAD9 IF NO ERROR 02741 M00S01934.pfs +++| PAD8 SX6 ERRG SET ERROR FLAG 02742 M00S01935.pfs +++| SA6 ERFL 02743 M00S01936.pfs +++| EQ PADX RETURN 02744 M00S01937.pfs +++|
| Line S01938 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02745 M01S01938.ns2628 ---| PAD9 SA1 PARC+/COMSPFS/CPAD COMBINE TIME WITH EXISTING DATE
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02746 M01S00018.ns2628 +++| PAD9 SA1 PARC+/COMSPFS/CPAD 02747 M01S00019.ns2628 +++| NZ X2,PAD9.1 IF RELATIVE TIME ENTRY 02748 M00S01939.pfs +++| MX2 42 02749 M00S01940.pfs +++| BX1 X2*X1
| Line S01941 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02750 M01S01941.ns2628 ---| BX6 X6+X1 02751 M01S01942.ns2628 ---| BX7 X7-X7
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02752 M01S00020.ns2628 +++| BX6 X6+X1 MERGE ENTERED TIME WITH DATE 02753 M01S00021.ns2628 +++| PAD9.1 BX7 X7-X7 02754 M00S01943.pfs +++| SA6 A1 POST IN CONVERTED PARAMETER TABLE 02755 M00S01944.pfs +++| SA7 DFAD CLEAR DEFAULTED AFTER DATE/TIME FLAG 02756 M00S01945.pfs +++| PAD10 SA4 PARC+/COMSPFS/CPAD 02757 M00S01946.pfs +++| ZR X4,PADX IF NOTHING TO DISPLAY 02758 M00S01947.pfs +++| MX5 -18 SAVE TIME 02759 M00S01948.pfs +++| BX5 -X5*X4 02760 M00S01949.pfs +++| AX4 18 DISPLAY DATE 02761 M00S01950.pfs +++| EDATE X4
| Line S01951 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02762 M01S01951.286l859 ---| SA6 ADDS+1
| Line S00744 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02763 M01S00744.286l859 +++| SA6 D.AD+1 02764 M00S01952.pfs +++| ETIME X5 DISPLAY TIME
| Line S01953 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02765 M01S01953.286l859 ---| SA6 ATDS+1
| Line S00745 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02766 M01S00745.286l859 +++| SA6 D.AT+1 02767 M00S01954.pfs +++| EQ PADX RETURN 02768 M00S01955.pfs +++| PBD SPACE 4,30 02769 M00S01956.pfs +++|** PBD - PROCESS BEFORE DATE AND TIME. 02770 M00S01957.pfs +++|* 02771 M00S01958.pfs +++|* ENTRY (/COMSPFS/UTLC) = SELECTED UTILITY CODE. 02772 M00S01959.pfs +++|* (DTFL) = DATE REQUIRED FLAG. 02773 M00S01960.pfs +++|* 02774 M00S01961.pfs +++|* EXIT (ERFL) = ERROR MESSAGE ADDRESS IF ERROR. 02775 M00S01962.pfs +++|* VALID BEFORE DATE AND TIME PARAMETERS POSTED IN 02776 M00S01963.pfs +++|* K-DISPLAY. 02777 M00S01964.pfs +++|* VALID BEFORE DATE AND TIME PARAMETERS OR THEIR 02778 M00S01965.pfs +++|* CORRESPONDING DEFAULT VALUES (IF REQUIRED BUT NOT 02779 M00S01966.pfs +++|* ENTERED) CONVERTED FROM DISPLAY CODE TO BINARY AND 02780 M00S01967.pfs +++|* POSTED IN THE CONVERTED PARAMETER TABLE. 02781 M00S01968.pfs +++|* 02782 M00S01969.pfs +++|* USES A - 1, 2, 4, 6.
| Line S01970 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02783 M01S01970.ns2628 ---|* B - 2, 4.
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02784 M01S00022.ns2628 +++|* B - 4. 02785 M00S01971.pfs +++|* X - 0, 1, 2, 4, 5, 6. 02786 M00S01972.pfs +++|*
| Line S01973 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02787 M01S01973.ns2628 ---|* CALLS CDT.
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02788 M01S00023.ns2628 +++|* CALLS VDE. 02789 M00S01974.pfs +++|*
| Line S01975 Modification History | |
|---|---|
M01 (Removed by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02790 M01S01975.ns2628 ---|* MACROS EDATE, ETIME, PDATE.
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns2628 |
Seq # *Modification Id* Act ----------------------------+ 02791 M01S00024.ns2628 +++|* MACROS EDATE, ETIME. 02792 M00S01976.pfs +++| 02793 M00S01977.pfs +++| 02794 M00S01978.pfs +++| PBD SUBR ENTRY/EXIT 02795 M00S01979.pfs +++| 02796 M00S01980.pfs +++|* PROCESS BEFORE DATE. 02797 M00S01981.pfs +++| 02798 M00S01982.pfs +++| SA1 EPBD 02799 M00S01983.pfs +++| NZ X1,PBD1 IF DATE ENTERED 02800 M00S01984.pfs +++| SA1 PARC+/COMSPFS/CPBD 02801 M00S01985.pfs +++| NZ X1,PBD5 IF DATE PREVIOUSLY ENTERED 02802 M00S01986.pfs +++| SA1 EPBT 02803 M00S01987.pfs +++| ZR X1,PBDX IF BEFORE TIME NOT ENTERED 02804 M00S01988.pfs +++| SA1 /COMSPFS/STDT SET DEFAULT DATE 02805 M00S01989.pfs +++| MX6 -18 02806 M00S01990.pfs +++| BX6 X6*X1 02807 M00S01991.pfs +++| EQ PBD4 POST IN CONVERTED PARAMETER TABLE 02808 M00S01992.pfs +++| 02809 M00S01993.pfs +++| PBD1 SA2 /COMSPFS/UTLC CHECK ENTRY VALIDITY
| Line S01994 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02810 M01S01994.286l859 ---| SB4 EPBD-ENTP 02811 M01S01995.286l859 ---| SA2 TVUP+X2 02812 M01S01996.286l859 ---| LX0 B4,X2
| Line S00746 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02813 M01S00746.286l859 +++| SA4 TVUP+EPBD-ENTP 02814 M01S00747.286l859 +++| SB4 X2 02815 M01S00748.286l859 +++| LX0 B4,X4 02816 M00S01997.pfs +++| PL X0,PBD2 IF NOT VALID ENTRY 02817 M00S01998.pfs +++| SA4 EPBD CHECK FOR RESET TO ZERO 02818 M00S01999.pfs +++| SA2 =1L0 02819 M00S02000.pfs +++| BX6 X4-X2 02820 M00S02001.pfs +++| NZ X6,PBD1.1 IF ZERO NOT SPECIFIED FOR BEFORE DATE 02821 M00S02002.pfs +++| SA6 PARC+/COMSPFS/CPBD RESET BEFORE DATE/TIME TO ZERO 02822 M00S02003.pfs +++| SA4 PBDA POST ZEROES IN K-DISPLAY 02823 M00S02004.pfs +++| BX6 X4
| Line S02005 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 02824 M01S02005.286l859 ---| SA6 BDDS+1
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/pfs.001.txt · Last modified: by 127.0.0.1