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
0 17 18 29 I OVERLAY NAME 30 59 OVERLAY NAME
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