User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:pfm

Deck PFM

95 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.pfm     +++|          IDENT  PFM,PFM
00002  M01S00002.pfm     +++|          PERIPH
00003  M01S00003.pfm     +++|          BASE   MIXED
00004  M01S00004.pfm     +++|          SST
00005  M01S00005.pfm     +++| EOR$     SET    0           UNCONDITIONAL POSITIONING IN *COMPRNS*
00006  M01S00006.pfm     +++| EQV$     SET    0           DON-T VERIFY EST ORDINAL IN SYSTEM SECTOR
00007  M01S00007.pfm     +++| QUAL$    SET    0           DEFINE UNQUALIFIED COMMON DECKS
00008  M01S00008.pfm     +++| MSR$     SET    0           ERROR PROCESSING RNS MASS STORAGE READS
Line S00009 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00009  M02S00009.242l642 ---| WSS$     SET    0           ERROR PROCESSING WSS MASS STORAGE WRITES
00010  M01S00010.pfm     +++| IRA$     SET    0           EXTERNAL PRESET OF RANDOM ADDRESSING DECKS
00011  M01S00011.pfm     +++| SCA$     SET    0           SET NO REJECT ON *UNLOAD*
00012  M01S00012.pfm     +++|*COMMENT  PFM - PERMANENT FILE MANAGER.
Line S00013 Modification History
M01 (Added by) pfm
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00013  M02S00013.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1982.
00014  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00015  M01S00014.pfm     +++|          TITLE  PFM - PERMANENT FILE MANAGER.
00016  M01S00015.pfm     +++|          SPACE  4,10
00017  M01S00016.pfm     +++|***       PFM - PERMANENT FILE MANAGER.
00018  M01S00001.253l688 +++|*         R. A. LARSEN.      71/01/19.
00019  M01S00017.pfm     +++|*         J. L. WARDELL.     72/07/14.
00020  M01S00018.pfm     +++|*         S. L. BETH.        74/10/25.
00021  M01S00019.pfm     +++|*         S. L. KSANDER.     75/02/20.
00022  M01S00020.pfm     +++|*         W. B. CHAPIN.      79/04/27.
00023  M01S00021.pfm     +++|*         P. C. SMITH.       79/04/27.
00024  M01S00022.pfm     +++|*         M. D. LEMBCKE.     83/01/12.
00025  M01S00023.pfm     +++|*         P. C. SMITH.       83/12/07.
00026  M01S00001.242l642 +++|*         B. J. SALCEDO.     85/01/22.
00027  M01S00024.pfm     +++|          SPACE  4,15
00028  M01S00025.pfm     +++|***       *PFM* IS A PERMANENT FILE DRIVER CAPABLE OF CREATING
00029  M01S00026.pfm     +++|*         PERMANENT FILES ON ANY SYSTEM MASS STORAGE DEVICE.  FILES
00030  M01S00027.pfm     +++|*         MAY BE OF ANY LENGTH AND ARE ALLOCATED ON THE DEVICE
00031  M01S00028.pfm     +++|*         ACCORDING TO THEIR LENGTH.
00032  M01S00029.pfm     +++|*
00033  M01S00030.pfm     +++|*         *PFM* WILL PERFORM ALL THE NECESSARY TASKS TO COMPLETE THE
00034  M01S00031.pfm     +++|*         PERMANENT FILE REQUEST.  THESE TASKS ARE SEARCH, CREATE OR
00035  M01S00032.pfm     +++|*         MODIFY USERS FILE CATALOG AND TRANSFER FILE FROM MASS
00036  M01S00033.pfm     +++|*         STORAGE TO MASS STORAGE IF REQUIRED.
00037  M01S00034.pfm     +++|*
00038  M01S00035.pfm     +++|*         *PFM* MAY BE CALLED BY ANY ROUTINE THAT SETS UP THE PROPER
00039  M01S00036.pfm     +++|*         CALL BLOCK IN CENTRAL MEMORY.
00040  M01S00037.pfm     +++| QUAL     SPACE  4,10
00041  M01S00038.pfm     +++|*         DEFINE QUAL BLOCK ORDER.
00042  M01S00039.pfm     +++|
00043  M01S00040.pfm     +++|
00044  M01S00041.pfm     +++|          QUAL   PRS
00045  M01S00042.pfm     +++|          QUAL   3PA
00046  M01S00043.pfm     +++|          QUAL   3PB
00047  M01S00044.pfm     +++|          QUAL   3PC
00048  M01S00045.pfm     +++|          QUAL   3PD
00049  M01S00046.pfm     +++|          QUAL   3PE
00050  M01S00047.pfm     +++|          QUAL   3PF
00051  M01S00048.pfm     +++|          QUAL   3PG
00052  M01S00049.pfm     +++|          QUAL   3PH
00053  M01S00050.pfm     +++|          QUAL   3PI
00054  M01S00051.pfm     +++|          QUAL   3PJ
00055  M01S00052.pfm     +++|          QUAL   3PK
00056  M01S00053.pfm     +++|          QUAL   3PL
00057  M01S00054.pfm     +++|          QUAL   3PM
00058  M01S00055.pfm     +++|          QUAL   3PN
00059  M01S00056.pfm     +++|          QUAL   3PO
00060  M01S00057.pfm     +++|          QUAL   3PP
00061  M01S00058.pfm     +++|          QUAL   3PQ
00062  M01S00059.pfm     +++|          QUAL   3PR
00063  M01S00002.242l642 +++|          QUAL   3PS
00064  M01S00003.242l642 +++|          QUAL   3PT
00065  M01S00001.ns2414  +++|          QUAL   3PU
00066  M01S00060.pfm     +++|          QUAL
00067  M01S00061.pfm     +++| SPFM     SPACE  4,10
00068  M01S00062.pfm     +++|          LIST   F,X
00069  M01S00063.pfm     +++|*CALL     COMSPFM
00070  M01S00064.pfm     +++|          LIST   *
00071  M01S00065.pfm     +++|          SPACE  4,10
00072  M01S00066.pfm     +++|**        ROUTINES USED.
00073  M01S00067.pfm     +++|*
00074  M01S00068.pfm     +++|*         0AV - ACCOUNT VERIFICATION.
00075  M01S00069.pfm     +++|*         0BF - BEGIN FILE.
00076  M01S00070.pfm     +++|*         0DF - DROP FILES.
00077  M01S00071.pfm     +++|*         0RF - UPDATE RESOURCE FILE.
00078  M01S00072.pfm     +++|          TITLE  MACRO DEFINITIONS.
00079  M01S00073.pfm     +++|          SPACE  4,10
00080  M01S00074.pfm     +++|**        MACROS.
00081  M01S00075.pfm     +++| COMPARE  SPACE  4,15
00082  M01S00076.pfm     +++|**        COMPARE - COMPARE TWO 36 BIT FIELDS.
00083  M01S00077.pfm     +++|*
00084  M01S00078.pfm     +++|*         COMPARE X,Y
00085  M01S00079.pfm     +++|*
00086  M01S00080.pfm     +++|*         ENTRY  X = FIELD TO BE COMPARED WITH *PFC* ENTRY FIELD Y.
00087  M01S00081.pfm     +++|*                Y = FIELD IN *PFC* ENTRY TO BE COMPARED WITH X.
00088  M01S00082.pfm     +++|*                (CI) = *PFC* ENTRY BASE ADDRESS.
00089  M01S00083.pfm     +++|*
00090  M01S00084.pfm     +++|*         EXIT   (A) = ZERO IF FIELDS ARE IDENTICAL.
00091  M01S00085.pfm     +++|*
00092  M01S00086.pfm     +++|*         CALLS  COF.
00093  M01S00087.pfm     +++|*
00094  M01S00088.pfm     +++|*         USES   T1, T2, T3.
00095  M01S00089.pfm     +++|
00096  M01S00090.pfm     +++|
00097  M01S00091.pfm     +++| COMPARE  MACRO  X,Y
00098  M01S00092.pfm     +++|          MACREF COMPARE
00099  M01S00093.pfm     +++|   LDC X
00100  M01S00094.pfm     +++|   STD T1
Line S00095 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00101  M02S00095.253l688 ---|   LDN Y
00102  M01S00002.253l688 +++|   LDC Y
00103  M01S00096.pfm     +++|   RJM COF
00104  M01S00097.pfm     +++| COMPARE  ENDM
Line S00098 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00105  M02S00098.242l642 ---| ERROR    SPACE  4,10
00106  M01S00004.242l642 +++| ERROR    SPACE  4,25
00107  M01S00099.pfm     +++|**        ERROR - CALL ERROR PROCESSOR.
00108  M01S00100.pfm     +++|*
Line S00101 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00109  M02S00101.242l642 ---|*
Line S00102 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00110  M02S00102.242l642 ---|*         ERROR  MNE,CH,IW,EQ,EXC
00111  M01S00005.242l642 +++|*         ERROR  MNE,CH,IW,EQ,EXC,EI
00112  M01S00006.242l642 +++|*
Line S00103 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00113  M02S00103.ns2415  ---|*         ENTRY  MNE = ERROR MESSAGE MNEMONIC
Line S00104 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00114  M02S00104.ns2415  ---|*                CH = IF SET DONT RELEASE CHANNEL
Line S00105 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00115  M02S00105.ns2415  ---|*                IW = IF SET DONT CLEAR CATALOG INTERLOCK
Line S00007 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00116  M02S00007.ns2415  ---|*                     (DUMMY PARAMETER)
00117  M01S00001.ns2415  +++|*         ENTRY  MNE = ERROR MESSAGE MNEMONIC.
00118  M01S00002.ns2415  +++|*                CH = IF SET DO NOT RELEASE CHANNEL.
00119  M01S00003.ns2415  +++|*                IW = IF SET DO NOT CLEAR CATALOG INTERLOCK
00120  M01S00004.ns2415  +++|*                     (DUMMY PARAMETER).
00121  M01S00008.242l642 +++|*                EQ = IF SET, (EQ) = EST ORDINAL OF DEVICE FOR ERROR
00122  M01S00009.242l642 +++|*                                    PROCESSING.
00123  M01S00010.242l642 +++|*                     IF CLEAR, (A) = EST ORDINAL.
Line S00106 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00124  M02S00106.ns2415  ---|*                EXC = EXIT CASE FOR COMPLETION PROCESSING
Line S00107 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00125  M02S00107.ns2415  ---|*                  0   *EP* CONTROLLED FOR LOGICAL ERRORS
Line S00108 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00126  M02S00108.ns2415  ---|*                  1   *EP* AND *UP* CONTROLLED FOR TIME DEPENDENT EXIT
Line S00109 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00127  M02S00109.ns2415  ---|*                  2   *UP* OR *RT* CONTROLLED FOR STAGE PROCESSING
Line S00110 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00128  M02S00110.ns2415  ---|*                  3   UNCONDITIONAL ABORT EXIT PROCESSING
Line S00111 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00129  M02S00111.ns2415  ---|*                  4   *EP* AND *UP* CONTROLLED FOR PROCESS/TIME
Line S00112 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00130  M02S00112.ns2415  ---|*                      DEPENDENT EXIT
Line S00113 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00131  M02S00113.ns2415  ---|*                  5   SECURITY VIOLATION ERROR PROCESSING
Line S00011 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00132  M02S00011.ns2415  ---|*                  6   *RT* CONTROLLED FOR TIME DEPENDENT EXIT
00133  M01S00005.ns2415  +++|*                EXC = EXIT CASE FOR COMPLETION PROCESSING:
00134  M01S00006.ns2415  +++|*                  0   NORMAL ERROR PROCESSING (EP CONTROLLED).
00135  M01S00007.ns2415  +++|*                  1   TIME-DEPENDENT ROLLOUT (EP AND UP CONTROLLED).
00136  M01S00008.ns2415  +++|*                  2   PF-STAGE ROLLOUT (UP OR RT CONTROLLED).
00137  M01S00009.ns2415  +++|*                  3   UNCONDITIONAL ABORT.
00138  M01S00010.ns2415  +++|*                  4   TIME-DEPENDENT RECALL (EP AND UP CONTROLLED).
00139  M01S00011.ns2415  +++|*                  5   SECURITY VIOLATION ERROR PROCESSING.
00140  M01S00012.ns2415  +++|*                  6   TIME-DEPENDENT ROLLOUT (RT CONTROLLED).
00141  M01S00013.ns2415  +++|*                  7   ISSUE ERRLOG MESSAGE BUT DO NOT ABORT JOB.
00142  M01S00012.242l642 +++|*                EI = IF SET, SET ERROR IDLE ON DEVICE GIVEN IN *EQ*.
00143  M01S00013.242l642 +++|*
00144  M01S00014.242l642 +++|*         NOTES  IF MODIFYING THIS MACRO, CHECK ALL CALLS TO IT.
00145  M01S00114.pfm     +++|
00146  M01S00115.pfm     +++|
Line S00116 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00147  M02S00116.242l642 ---| ERROR    MACRO  MNE,CH,IW,EQ,EXC
00148  M01S00015.242l642 +++| ERROR    MACRO  MNE,CH,IW,EQ,EXC,EI
00149  M01S00117.pfm     +++|          MACREF ERROR
Line S00118 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00150  M02S00118.242l642 ---| AA IFC NE,$EQ$$
Line S00119 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00151  M02S00119.242l642 ---|    LDD EQ
Line S00120 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00152  M02S00120.242l642 ---| AA ENDIF
Line S00121 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00153  M02S00121.242l642 ---|    RJM ERR
Line S00122 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00154  M02S00122.242l642 ---| BB IFC NE,$CH$$
Line S00123 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00155  M02S00123.242l642 ---| B  IFC NE,$IW$$
Line S00124 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00156  M02S00124.242l642 ---|    VFD 3/EXC,7//ERRMSG/MNE,2/3
Line S00125 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00157  M02S00125.242l642 ---| B  ELSE
Line S00126 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00158  M02S00126.242l642 ---|    VFD 3/EXC,7//ERRMSG/MNE,2/1
Line S00127 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00159  M02S00127.242l642 ---| B  ENDIF
Line S00128 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00160  M02S00128.242l642 ---| BB ELSE
Line S00129 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00161  M02S00129.242l642 ---| BC IFC NE,$IW$$
Line S00130 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00162  M02S00130.242l642 ---|    VFD 3/EXC,7//ERRMSG/MNE,2/2
Line S00131 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00163  M02S00131.242l642 ---| BC ELSE
Line S00132 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00164  M02S00132.242l642 ---|    VFD 3/EXC,7//ERRMSG/MNE,2/0
Line S00133 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00165  M02S00133.242l642 ---|    ENDIF
Line S00134 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00166  M02S00134.242l642 ---|          ENDM
00167  M01S00016.242l642 +++| .A       IFC    NE,$EQ$$
00168  M01S00017.242l642 +++|          LDD    EQ
00169  M01S00018.242l642 +++| .A       ENDIF
00170  M01S00019.242l642 +++|
00171  M01S00020.242l642 +++|          RJM    ERR
Line S00021 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00172  M02S00021.ns2415  ---|          VFD    3/EXC,7//ERRMSG/MNE
Line S00022 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00173  M02S00022.ns2415  ---|
Line S00023 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00174  M02S00023.ns2415  ---| .B       IFC    NE,$EI$$
Line S00024 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00175  M02S00024.ns2415  ---|          VFD    1/1
Line S00025 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00176  M02S00025.ns2415  ---| .B       ELSE
Line S00026 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00177  M02S00026.ns2415  ---|          VFD    1/0
Line S00027 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00178  M02S00027.ns2415  ---| .B       ENDIF
Line S00028 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00179  M02S00028.ns2415  ---|
Line S00029 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00180  M02S00029.ns2415  ---| .C       IFC    NE,$CH$$
Line S00030 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00181  M02S00030.ns2415  ---|          VFD    1/0
Line S00031 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00182  M02S00031.ns2415  ---| .C       ELSE
Line S00032 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00183  M02S00032.ns2415  ---|          VFD    1/1
Line S00033 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00184  M02S00033.ns2415  ---| .C       ENDIF
00185  M01S00014.ns2415  +++|          VFD    3/EXC,7//ERRMSG/MNE,1/EI,1/CH
00186  M01S00034.242l642 +++| ERROR    ENDM
00187  M01S00135.pfm     +++| ERRMSG   SPACE  4,10
00188  M01S00136.pfm     +++|**        ERRMSG - SETUP ERROR MESSAGE CONSTANTS.
00189  M01S00137.pfm     +++|*
Line S00138 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2722
Seq #  *Modification Id* Act 
----------------------------+
00190  M02S00138.ns2722  ---|*NUM      ERRMSG CLASS,NSG
00191  M01S00001.ns2722  +++|*NUM      ERRMSG CLASS,MSG
00192  M01S00139.pfm     +++|*
00193  M01S00140.pfm     +++|*         ENTRY  *NUM* = ERROR CODE MNEMONIC.
00194  M01S00141.pfm     +++|*                *CLASS* = ERROR TYPE FOR MESSAGE PROCESSING.
00195  M01S00142.pfm     +++|*                *MSG* = ERROR MESSAGE INCLOSED IN PARENTHESIS.
00196  M01S00143.pfm     +++|
00197  M01S00144.pfm     +++|
00198  M01S00002.ns2722  +++|          NOREF  .LEN
00199  M01S00003.ns2722  +++|
00200  M01S00145.pfm     +++|          MACRO  ERRMSG,NUM,CLASS,MSG
00201  M01S00146.pfm     +++|          MACREF ERRMSG
00202  M01S00147.pfm     +++|          INDEX  /ERRMSG/NUM,CLASS
00203  M01S00148.pfm     +++| ERRMT    RMT
00204  M01S00149.pfm     +++|          INDEX  /ERRMSG/NUM,(=C*MSG*)
00205  M01S00150.pfm     +++| ERRMT    RMT
00206  M01S00004.ns2722  +++| .MSGM    MICRO  1,,*MSG*
00207  M01S00005.ns2722  +++| .LEN     MICCNT .MSGM
00208  M01S00006.ns2722  +++| .A       IFEQ   CLASS,0
00209  M01S00007.ns2722  +++|          ERRNG  29D-.LEN    MESSAGE TOO LONG
00210  M01S00008.ns2722  +++| .A       ELSE
00211  M01S00009.ns2722  +++|          ERRNG  38D-.LEN    MESSAGE TOO LONG
00212  M01S00010.ns2722  +++| .A       ENDIF
00213  M01S00151.pfm     +++|          ENDM
00214  M01S00152.pfm     +++| EXIT     SPACE  4,15
Line S00153 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00215  M02S00153.ns2415  ---|**        EXIT - CALL ERROR PROCESSING
00216  M01S00015.ns2415  +++|**        EXIT - CALL ERROR PROCESSING FOR SPECIAL (NON-ABORT) EXIT.
00217  M01S00154.pfm     +++|*
Line S00155 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00218  M02S00155.242l642 ---|*         EXIT   MNE,CH,IW,EQ,EXC
00219  M01S00035.242l642 +++|*         EXIT   MNE,CH,IW,EQ,EXC,EI
00220  M01S00036.242l642 +++|*
Line S00156 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00221  M02S00156.ns2415  ---|*         ENTRY  SEE ERROR PROCESSING MACR0.
00222  M01S00016.ns2415  +++|*         SEE *ERROR* MACRO FOR EXPLANATION OF PARAMETERS.
00223  M01S00157.pfm     +++|
Line S00158 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00224  M02S00158.242l642 ---| EXIT     MACRO  MNE,CH,IW,EQ,EXC
00225  M01S00037.242l642 +++| EXIT     MACRO  MNE,CH,IW,EQ,EXC,EI
00226  M01S00159.pfm     +++|          MACREF EXIT
Line S00160 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00227  M02S00160.242l642 ---| AA IFC NE,$EQ$$
Line S00161 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00228  M02S00161.242l642 ---|    LDD EQ
Line S00162 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00229  M02S00162.242l642 ---| AA ENDIF
Line S00163 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00230  M02S00163.242l642 ---|    RJM ERR
Line S00164 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00231  M02S00164.242l642 ---| BB IFC NE,$CH$$
Line S00165 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00232  M02S00165.242l642 ---| B  IFC NE,$IW$$
Line S00166 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00233  M02S00166.242l642 ---|    VFD 3/EXC,7//ERRMSG/MNE,2/3
Line S00167 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00234  M02S00167.242l642 ---| B  ELSE
Line S00168 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00235  M02S00168.242l642 ---|    VFD 3/EXC,7//ERRMSG/MNE,2/1
Line S00169 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00236  M02S00169.242l642 ---| B  ENDIF
Line S00170 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00237  M02S00170.242l642 ---| BB ELSE
Line S00171 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00238  M02S00171.242l642 ---| BC IFC NE,$IW$$
Line S00172 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00239  M02S00172.242l642 ---|    VFD 3/EXC,7//ERRMSG/MNE,2/2
Line S00173 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00240  M02S00173.242l642 ---| BC ELSE
Line S00174 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00241  M02S00174.242l642 ---|    VFD 3/EXC,7//ERRMSG/MNE,2/0
Line S00175 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00242  M02S00175.242l642 ---|    ENDIF
Line S00176 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00243  M02S00176.242l642 ---|    ENDM
00244  M01S00038.242l642 +++| .A       IFC    NE,$EQ$$
00245  M01S00039.242l642 +++|          LDD    EQ
00246  M01S00040.242l642 +++| .A       ENDIF
00247  M01S00041.242l642 +++|
00248  M01S00042.242l642 +++|          RJM    ERR
Line S00043 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00249  M02S00043.ns2415  ---|          VFD    3/EXC,7//ERRMSG/MNE
Line S00044 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00250  M02S00044.ns2415  ---|
Line S00045 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00251  M02S00045.ns2415  ---| .B       IFC    NE,$EI$$
Line S00046 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00252  M02S00046.ns2415  ---|          VFD    1/1
Line S00047 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00253  M02S00047.ns2415  ---| .B       ELSE
Line S00048 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00254  M02S00048.ns2415  ---|          VFD    1/0
Line S00049 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00255  M02S00049.ns2415  ---| .B       ENDIF
Line S00050 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00256  M02S00050.ns2415  ---|
Line S00051 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00257  M02S00051.ns2415  ---| .C       IFC    NE,$CH$$
Line S00052 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00258  M02S00052.ns2415  ---|          VFD    1/0
Line S00053 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00259  M02S00053.ns2415  ---| .C       ELSE
Line S00054 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00260  M02S00054.ns2415  ---|          VFD    1/1
Line S00055 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00261  M02S00055.ns2415  ---| .C       ENDIF
00262  M01S00017.ns2415  +++|          VFD    3/EXC,7//ERRMSG/MNE,1/EI,1/CH
00263  M01S00056.242l642 +++| EXIT     ENDM
00264  M01S00177.pfm     +++| OVERLAY  SPACE  4,10
00265  M01S00178.pfm     +++|**        OVERLAY CONTROL.
00266  M01S00179.pfm     +++|
00267  M01S00180.pfm     +++|
00268  M01S00181.pfm     +++| .N       SET    0
00269  M01S00182.pfm     +++| OVLB     MICRO  1,, 3P      BASE OVERLAY NAME
00270  M01S00183.pfm     +++| OVERLAY  SPACE  4,10
00271  M01S00184.pfm     +++|**        OVERLAY - GENERATE OVERLAY CONSTANTS.
00272  M01S00185.pfm     +++|*
00273  M01S00186.pfm     +++|*
00274  M01S00187.pfm     +++|*         OVERLAY (TEXT),LOAD,NQ
00275  M01S00188.pfm     +++|*         ENTRY  *TEXT* = TEXT OF SUBTITLE.
00276  M01S00189.pfm     +++|*                *LOAD* = IF DEFINED SPECIFIES ORGIN ADDRESS.
00277  M01S00190.pfm     +++|*                *NQ* IF SPECIFIED OVERLAY IS NOT QUALIFIED.
00278  M01S00191.pfm     +++|
00279  M01S00192.pfm     +++|
00280  M01S00193.pfm     +++|          PURGMAC OVERLAY
00281  M01S00194.pfm     +++|
00282  M01S00195.pfm     +++| OVERLAY  MACRO  TEXT,LOAD,NQ
00283  M01S00196.pfm     +++|          QUAL
00284  M01S00197.pfm     +++|          NOREF  .N
00285  M01S00198.pfm     +++| .N       SET    .N+1
00286  M01S00199.pfm     +++| .M       MICRO  .N,1, ABCDEFGHIJKLMNOPQRSTUVWXYZ
00287  M01S00200.pfm     +++| .O       MICRO  1,3, "OVLB"".M"
00288  M01S00201.pfm     +++| .P       MICRO  2,2, ".O"
00289  M01S00202.pfm     +++| .Q       MICRO  1,3, O".P"
00290  M01S00203.pfm     +++|          IFC    EQ,*NQ**,1
00291  M01S00204.pfm     +++|          QUAL   ".O"
00292  M01S00205.pfm     +++|          TTL    PFM/".O" - TEXT
00293  M01S00206.pfm     +++|          TITLE
00294  M01S00207.pfm     +++|          IDENT  ".O",".Q"X  TEXT
00295  M01S00208.pfm     +++|*COMMENT  PFM - TEXT
Line S00209 Modification History
M01 (Added by) pfm
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00296  M02S00209.281l803 ---|          COMMENT COPYRIGHT   CONTROL DATA CORP. 1972.
00297  M01S00002.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00298  M01S00210.pfm     +++|          ORG    LOAD OVLC
00299  M01S00211.pfm     +++| ".Q"     SUBR
00300  M01S00212.pfm     +++|          MACREF OVERLAY
00301  M01S00213.pfm     +++|          ENDM
00302  M01S00214.pfm     +++| CSR      SPACE  4,10
00303  M01S00215.pfm     +++|**        CSR - DEFINE 24 BIT QUANTITY FROM 18 BIT EQUATE.
00304  M01S00216.pfm     +++|*
00305  M01S00217.pfm     +++|*         CSR    R
00306  M01S00218.pfm     +++|*                *R* = VALUE TO BE EXPANDED TO 24 BITS.
00307  M01S00219.pfm     +++|
00308  M01S00220.pfm     +++|
00309  M01S00221.pfm     +++| CSR      MACRO  R
00310  M01S00222.pfm     +++|          LOCAL  N,O,P,Q
00311  M01S00223.pfm     +++|          MACREF CSR
00312  M01S00224.pfm     +++| N        SET    R
00313  M01S00225.pfm     +++| O        SET    R/100B
00314  M01S00226.pfm     +++| P        SET    O*100B
00315  M01S00227.pfm     +++| Q        SET    R-P
00316  M01S00228.pfm     +++|          CON    O,Q*100B
00317  M01S00229.pfm     +++|          ENDM
00318  M01S00230.pfm     +++|          TITLE  COMMON DECKS.
00319  M01S00231.pfm     +++|          SPACE  4,10
00320  M01S00232.pfm     +++|*CALL     COMPMAC
00321  M01S00233.pfm     +++|*CALL     COMSACC
00322  M01S00234.pfm     +++|*CALL     COMSCPS
00323  M01S00235.pfm     +++|*CALL     COMSEVT
00324  M01S00236.pfm     +++|*CALL     COMSLFD
00325  M01S00237.pfm     +++|*CALL     COMSLSD
00326  M01S00238.pfm     +++|*CALL     COMSMMF
00327  M01S00239.pfm     +++|*CALL     COMSMLS
00328  M01S00001.271l716 +++| MSP$     EQU    1
00329  M01S00240.pfm     +++|*CALL     COMSMSP
00330  M01S00241.pfm     +++|*CALL     COMSMST
00331  M01S00001.ns2773  +++|          QUAL   MTX
00332  M01S00002.ns2773  +++|*CALL     COMSMTX
00333  M01S00003.ns2773  +++|          QUAL   *
00334  M01S00242.pfm     +++|*CALL     COMSPIM
00335  M01S00243.pfm     +++|*CALL     COMSREM
00336  M01S00001.272l774 +++|          QUAL   RSX
00337  M01S00244.pfm     +++|*CALL     COMSRSX
00338  M01S00002.272l774 +++|          QUAL   *
00339  M01S00245.pfm     +++|*CALL     COMSSCD
00340  M01S00246.pfm     +++|*CALL     COMSSRU
00341  M01S00247.pfm     +++|*CALL     COMSSSD
00342  M01S00248.pfm     +++|*CALL     COMSSSJ
00343  M01S00249.pfm     +++|*CALL     COMSWEI
00344  M01S00250.pfm     +++|*CALL     COMSZOL
00345  M01S00251.pfm     +++|          SPACE  4,10
00346  M01S00252.pfm     +++|          TITLE  STORAGE ASSIGNMENTS AND ASSEMBLY CONSTANTS.
00347  M01S00253.pfm     +++|****      DIRECT LOCATION ASSIGNMENTS.
00348  M01S00254.pfm     +++|
00349  M01S00255.pfm     +++|
00350  M01S00256.pfm     +++| FS       EQU    20 - 24     FST ENTRY
00351  M01S00257.pfm     +++| UI       EQU    25 - 26     USER INDEX
00352  M01S00258.pfm     +++| LF       EQU    27 - 30     LENGTH OF FILE
00353  M01S00259.pfm     +++| CN       EQU    30 - 34     SCRATCH
00354  M01S00260.pfm     +++| P0       EQU    31          TEMPORARY LOCATIONS
00355  M01S00261.pfm     +++| P1       EQU    32
00356  M01S00262.pfm     +++| P2       EQU    33
00357  M01S00263.pfm     +++| P3       EQU    34
00358  M01S00264.pfm     +++| EB       EQU    35          END BUFFER
00359  M01S00265.pfm     +++| PI       EQU    36 - 37     PERMITTED USER INDEX
00360  M01S00266.pfm     +++| FN       EQU    40 - 44     FILE NAME
00361  M01S00267.pfm     +++| PB       EQU    45          POINTER TO PERMIT BUFFER
00362  M01S00268.pfm     +++| PP       EQU    46          INDEX IN PERMIT BUFFER
00363  M01S00269.pfm     +++| NF       EQU    45 - 46     NUMBER OF FILES IN CATALOG
00364  M01S00001.pfm39   +++| SA       EQU    45 - 46     SPACE AVAILABLE
00365  M01S00270.pfm     +++| HL       EQU    47          LENGTH OF HOLE
00366  M01S00271.pfm     +++| FA       EQU    57          LOCAL FNT ENTRY OFFSET
00367  M01S00272.pfm     +++| EQ       EQU    60          PERMANENT FILE EST ORDINAL
00368  M01S00273.pfm     +++| RI       EQU    61 - 62     PERMIT RANDOM INDEX
00369  M01S00274.pfm     +++| CS       EQU    61 - 62     CUMULATIVE SIZE OF FILES IN CATALOG
00370  M01S00275.pfm     +++| BB       EQU    63          BUFFER BASE ADDRESS
00371  M01S00276.pfm     +++|*         THE NEXT FIVE CELLS MUST BE CONTIGUOUS.
00372  M01S00277.pfm     +++| HB       EQU    63          POINTER TO HOLE BUFFER
00373  M01S00278.pfm     +++| HP       EQU    64          INDEX IN HOLE BUFFER
00374  M01S00279.pfm     +++| CB       EQU    65          POINTER TO FILE CATALOG BUFFER
00375  M01S00280.pfm     +++| RT       EQU    CB          *RT* BOOLEAN (1 = SET)
00376  M01S00281.pfm     +++| CI       EQU    66          INDEX IN FILE CATALOG BUFFER
00377  M01S00282.pfm     +++| UP       EQU    CI          *UP* BOOLEAN (1 = SET)
00378  M01S00283.pfm     +++| EP       EQU    67          END BUFFER POINTER
00379  M01S00284.pfm     +++|*EP       EQU    EP          *EP* BOOLEAN (1 = SET)
00380  M01S00285.pfm     +++|
00381  M01S00286.pfm     +++| CC       EQU    IR+2        COMMAND CODE
00382  M01S00287.pfm     +++|
00383  M01S00288.pfm     +++|****
00384  M01S00289.pfm     +++|          SPACE  4,10
00385  M01S00290.pfm     +++|*         ASSEMBLY CONSTANTS.
00386  M01S00291.pfm     +++|
00387  M01S00292.pfm     +++|
00388  M01S00293.pfm     +++| BUF1     EQU    BFMS-505    CATALOG BUFFER + TRACK AND SECTOR POINTERS
00389  M01S00294.pfm     +++| BUF2     EQU    BUF1-505    CATALOG BUFFER + TRACK AND SECTOR POINTERS
Line S00295 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00390  M02S00295.ns2415  ---|
Line S00296 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00391  M02S00296.ns2415  ---| EC0      EQU    0           NORMAL EXIT CASE
Line S00297 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00392  M02S00297.ns2415  ---| EC1      EQU    1           TIME DEPENDENT ROLLOUT EXIT CASE
Line S00298 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00393  M02S00298.ns2415  ---| EC2      EQU    2           TIME DEPENDENT PF-STAGE EXIT CASE
Line S00299 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00394  M02S00299.ns2415  ---| EC3      EQU    3           UNCONDITIONAL ABORT EXIT CASE
Line S00300 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00395  M02S00300.ns2415  ---| EC4      EQU    4           TIME DEPENDENT RECALL EXIT CASE
Line S00301 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00396  M02S00301.ns2415  ---| EC5      EQU    5           SECURITY VIOLATION EXIT CASE
Line S00302 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00397  M02S00302.ns2415  ---| SVE      EQU    EC5         SECURITY VIOLATION ERROR
Line S00057 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00398  M02S00057.ns2415  ---| EC6      EQU    6           TIME DEPENDENT ROLLOUT EXIT CASE
Line S00303 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00399  M02S00303.ns2415  ---|
00400  M01S00304.pfm     +++| MXRL     EQU    7           MAXIMUM TDAM RETRY COUNT
00401  M01S00305.pfm     +++| SSLE     EQU    10          LENGTH OF SYSTEM SECTOR DATA (CM WORDS)
00402  M01S00306.pfm     +++| UIRT     EQU    300         UTILITY INTERLOCK ROLLOUT TIME
00403  M01S00018.ns2415  +++|          SPACE  4,10
00404  M01S00019.ns2415  +++|*         *ERROR*/*EXIT* MACRO PARAMETER VALUES.
00405  M01S00020.ns2415  +++|
00406  M01S00021.ns2415  +++|
00407  M01S00022.ns2415  +++| EC0      EQU    0           NORMAL ERROR PROCESSING (EP CONTROLLED)
00408  M01S00023.ns2415  +++| EC1      EQU    1           TIME-DEPENDENT ROLLOUT (EP/UP CONTROLLED)
00409  M01S00024.ns2415  +++| EC2      EQU    2           PF-STAGE ROLLOUT (UP OR RT CONTROLLED)
00410  M01S00025.ns2415  +++| EC3      EQU    3           UNCONDITIONAL ABORT
00411  M01S00026.ns2415  +++| EC4      EQU    4           TIME-DEPENDENT RECALL (EP/UP CONTROLLED)
00412  M01S00027.ns2415  +++| EC5      EQU    5           SECURITY VIOLATION
00413  M01S00028.ns2415  +++| SVE      EQU    EC5         SECURITY VIOLATION
00414  M01S00029.ns2415  +++| EC6      EQU    6           TIME-DEPENDENT ROLLOUT (RT CONTROLLED)
00415  M01S00030.ns2415  +++| EC7      EQU    7           ISSUE ERRLOG MESSAGE BUT DO NOT ABORT JOB
00416  M01S00031.ns2415  +++|
00417  M01S00032.ns2415  +++| CH       EQU    1           CHANNEL NOT INTERLOCKED
00418  M01S00033.ns2415  +++| EI       EQU    1           SET ERROR IDLE
00419  M01S00034.ns2415  +++|
00420  M01S00307.pfm     +++|          TITLE  MEMORY ASSIGNMENTS.
00421  M01S00308.pfm     +++| PFM      SPACE  4,10
00422  M01S00309.pfm     +++|**        PFM - PERMANENT FILE MANAGER RESIDENT MEMORY LOCATIONS.
00423  M01S00310.pfm     +++|
00424  M01S00311.pfm     +++|
00425  M01S00312.pfm     +++|          ORG    PPFW
00426  M01S00313.pfm     +++|
00427  M01S00314.pfm     +++| PFM      LJM    /PRS/PRS
00428  M01S00315.pfm     +++| PFAC     EQU    *-2         ACCOUNTING WORD OF USER
00429  M01S00316.pfm     +++|          BSSZ   3
00430  M01S00317.pfm     +++| PFSN     BSSZ   5           SYSTEM FILE NAME
00431  M01S00318.pfm     +++|
00432  M01S00319.pfm     +++|
00433  M01S00320.pfm     +++|*         THE NEXT 5 BYTES MUST BE CONTIGUOUS.
00434  M01S00321.pfm     +++|
00435  M01S00322.pfm     +++| SVAL     CON    0           SECURITY VALIDATION BITS
00436  M01S00323.pfm     +++| PFAL     CON    0           JOB ACCESS LEVEL
00437  M01S00324.pfm     +++| PFFC     BSSZ   3           JOB ACCESS CATEGORIES
00438  M01S00325.pfm     +++|
00439  M01S00326.pfm     +++|
00440  M01S00327.pfm     +++|*         THE NEXT 8 CM WORDS MUST REMAIN IN THE SAME ORDER AS THE
00441  M01S00328.pfm     +++|*         CALL BLOCK (FET).
00442  M01S00329.pfm     +++|
00443  M01S00330.pfm     +++| TFET     EQU    *
00444  M01S00331.pfm     +++| PFFN     BSSZ   5           PERMANENT FILE NAME
00445  M01S00332.pfm     +++| PFSR     EQU    PFFN+3      SPECIAL REQUESTS
00446  M01S00333.pfm     +++| MODE     EQU    PFFN+4      MODE OF FILE PERMISSION
00447  M01S00334.pfm     +++| PFOU     BSSZ   5           USER NAME
00448  M01S00335.pfm     +++| CTDN     EQU    PFOU+3      DEVICE NUMBER FOR CATALOG LIST
00449  M01S00336.pfm     +++| PRU      EQU    PFOU+3      PRUS DESIRED FOR DEFINE
00450  M01S00337.pfm     +++| PFPW     BSSZ   3           PASSWORD
00451  M01S00338.pfm     +++| EMRA     BSSZ   2           ERROR MESSAGE RETURN ADDRESS
Line S00339 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2426
Seq #  *Modification Id* Act 
----------------------------+
00452  M02S00339.ns2426  ---| PUCW     BSSZ   5           USER CONTROL WORD
Line S00001 Modification History
M01 (Added by) ns2426
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00453  M02S00001.271l750 ---| PUCN     BSSZ   5           USER CONTROL WORD
00454  M01S00001.271l750 +++| PUCW     BSSZ   5           USER CONTROL WORD
00455  M01S00340.pfm     +++| PFPN     BSSZ   5           PF CONTROL WORD (42/ PN, 6/, 12/ FAM EQ)
00456  M01S00341.pfm     +++|*                            PN = PACK NAME.
00457  M01S00342.pfm     +++| PFNF     BSSZ   5           NEW FILE NAME
00458  M01S00343.pfm     +++| PFXT     EQU    PFNF+3      ACCESS EXPIRATION DATE/TERM
00459  M01S00344.pfm     +++|          BSSZ   5
00460  M01S00345.pfm     +++| PFRS     EQU    *           PREFERRED RESIDENCE *PR*
00461  M01S00346.pfm     +++| PFBR     EQU    *           BACKUP REQUIREMENT *BR*
00462  M01S00347.pfm     +++| PFSS     CON    0           SUBSYSTEM *SS* (3/PR,3/BR,6/SS)
00463  M01S00348.pfm     +++| PFAP     BSSZ   1           ALTERNATE CATLIST PERMISSION
00464  M01S00349.pfm     +++|          BSSZ   1           RESERVED
00465  M01S00350.pfm     +++| PFRB     BSSZ   2           (6/0,18/RB)
00466  M01S00351.pfm     +++|*                            RB = SPECIAL REQUEST BLOCK POINTER
00467  M01S00352.pfm     +++| TFETL    EQU    *-TFET      LENGTH OF FET PARAMETERS
00468  M01S00353.pfm     +++|
00469  M01S00354.pfm     +++|
00470  M01S00355.pfm     +++|*         THE NEXT 4 CM WORDS MUST REMAIN IN THE SAME ORDER AS THE
00471  M01S00356.pfm     +++|*         SPECIAL REQUEST BLOCK.
00472  M01S00357.pfm     +++|
00473  M01S00358.pfm     +++| PFSB     BSSZ   2           RESERVED
00474  M01S00359.pfm     +++| PFID     BSSZ   3           PERMANENT FILE CATALOG ADDRESS
Line S00360 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00475  M02S00360.253l688 ---| PFES     BSSZ   1           ERROR STATUS
Line S00361 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00476  M02S00361.253l688 ---| PFAT     BSSZ   1           ALTERNATE STORAGE TYPE
Line S00362 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00477  M02S00362.253l688 ---| PFAA     BSSZ   3           ALTERNATE STORAGE ADDRESS
00478  M01S00003.253l688 +++| PFES     BSSZ   1           ALTERNATE STORAGE ERROR STATUS
00479  M01S00004.253l688 +++| PFAT     BSSZ   1           CARTRIDGE ALTERNATE STORAGE TYPE
00480  M01S00005.253l688 +++| PFTS     EQU    PFAT        TAPE ALTERNATE STORAGE TAPE SEQUENCE NUMBER
00481  M01S00006.253l688 +++| PFAA     BSSZ   3           CARTRIDGE ALTERNATE STORAGE ADDRESS
00482  M01S00007.253l688 +++| PFTV     EQU    PFAA+1      TAPE ALTERNATE STORAGE TAPE VSN
Line S00363 Modification History
M01 (Added by) pfm
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
00483  M02S00363.274l797 ---|          BSSZ   2           RESERVED
00484  M01S00001.274l797 +++| PFOA     BSSZ   2           OPTICAL DISK ADDRESS
00485  M01S00364.pfm     +++| PFCD     BSSZ   3           CREATION DATE
00486  M01S00365.pfm     +++| PFFM     BSSZ   3           FAMILY AND USER INDEX
00487  M01S00366.pfm     +++| PFSU     BSSZ   2           USER INDEX
00488  M01S00367.pfm     +++|
00489  M01S00368.pfm     +++|
00490  M01S00369.pfm     +++|*         THE FOLLOWING THREE BYTES ARE USED FOR ONE PURPOSE
00491  M01S00370.pfm     +++|*         FOR DIRECT ACCESS FUNCTIONS, AND FOR A DIFFERENT PURPOSE
00492  M01S00371.pfm     +++|*         FOR INDIRECT ACCESS FUNCTIONS.
00493  M01S00372.pfm     +++|
00494  M01S00373.pfm     +++| FRSM     BSS    0           DEVICE ACCESS MASK FOR FILE RESIDENCY
00495  M01S00374.pfm     +++|*                            1/A,1/B,2/,8/DEVICE MASK
00496  M01S00375.pfm     +++|*                            A = SPECIAL USER INDEX PRESENT
00497  M01S00376.pfm     +++|*                            B = *LIFT* FILES ALLOWED.
00498  M01S00377.pfm     +++| MXFS     CON    0           MAXIMUM INDIRECT FILE SIZE ALLOWED
00499  M01S00378.pfm     +++| MXDS     BSS    0           MAXIMUM DIRECT ACCESS FILE SIZE (2 WORDS)
00500  M01S00379.pfm     +++| MXCS     CON    0,0         MAXIMUM CUMULATIVE INDIRECT FILE
00501  M01S00380.pfm     +++|*                            ALLOWED
00502  M01S00381.pfm     +++| MXNF     CON    0           MAXIMUM NUMBER OF FILES ALLOWED
00503  M01S00382.pfm     +++|
00504  M01S00383.pfm     +++|
00505  M01S00384.pfm     +++|*         THE NEXT TWO TERMS MUST BE CONTIGUOUS.
00506  M01S00385.pfm     +++|
00507  M01S00386.pfm     +++| ACNF     CON    0,0         ACTUAL NUMBER OF FILES
00508  M01S00387.pfm     +++| CIFS     CON    0,0         ACTUAL CUMULATIVE INDIRECT FILE SIZE
00509  M01S00388.pfm     +++|
00510  M01S00389.pfm     +++|
00511  M01S00390.pfm     +++|*         DEVICE TO DEVICE TRANSFER POINTERS
00512  M01S00391.pfm     +++|*         (CATALOG SEARCH POINTERS).
00513  M01S00392.pfm     +++|
00514  M01S00393.pfm     +++| SDAA     CON    0           EST ORDINAL
00515  M01S00394.pfm     +++| SDAB     CON    0           TRACK
00516  M01S00395.pfm     +++| SDAC     CON    0           SECTOR
00517  M01S00396.pfm     +++|
00518  M01S00397.pfm     +++|
00519  M01S00398.pfm     +++|*         *PFM* INTERNAL STATUS BITS.
00520  M01S00399.pfm     +++|
00521  M01S00400.pfm     +++| STAT     CON    0           *PFM* INTERNAL STATUS BITS
00522  M01S00401.pfm     +++|
00523  M01S00402.pfm     +++| STXD     EQU    1           PASSWORD EXPIRATION DATE SPECIFIED
00524  M01S00403.pfm     +++| STRX     EQU    2           RESEX INITIATED ON THIS REQUEST
00525  M01S00404.pfm     +++| STAB     EQU    4           ABORT AFTER PERMIT CHECK (*APPEND*)
Line S00405 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00526  M02S00405.253l688 ---| STSD     EQU    10          PF STAGING DISABLED
00527  M01S00008.253l688 +++| STTA     EQU    10          TAPE ALTERNATE STORAGE REQUEST
00528  M01S00406.pfm     +++| STPR     EQU    20          PERMITS HAVE BEEN READ
00529  M01S00407.pfm     +++| STBR     EQU    40          *BFMS* (*END* BUFFER) HAS BEEN REUSED
00530  M01S00408.pfm     +++| STAC     EQU    100         STATISTICAL ACCUMULATION ENABLED
00531  M01S00409.pfm     +++| STPD     EQU    200         PRIVATE DEVICE
00532  M01S00410.pfm     +++| STEC     EQU    400         APPEND TO END OF CHAIN
00533  M01S00411.pfm     +++| STBD     EQU    1000        MASTER DEVICE IS BUFFERED DEVICE
00534  M01S00058.242l642 +++| STNS     EQU    2000        NO JOB SUSPENSION WHEN DEVICE INACCESSIBLE
00535  M01S00001.pfm54   +++| STXC     EQU    4000        EXTENDING INDIRECT CHAIN
00536  M01S00412.pfm     +++|
00537  M01S00059.242l642 +++| STAU     CON    0           *PFM* INTERNAL STATUS BITS (PART 2)
00538  M01S00060.242l642 +++|
00539  M01S00061.242l642 +++| STAJ     BITSET 0           ABORT JOB
00540  M01S00062.242l642 +++| STDP     BITSET 1           DROP PP
00541  M01S00063.242l642 +++| STDS     BITSET 2           DROP PP WITH ERROR STATUS IN FET
00542  M01S00064.242l642 +++| STRP     BITSET 3           RECALL *PFM*
00543  M01S00065.242l642 +++|
00544  M01S00413.pfm     +++|
00545  M01S00066.242l642 +++|*         *PFM* RESTART FLAGS FOR RECALL.
00546  M01S00067.242l642 +++|
00547  M01S00068.242l642 +++| PWRF     BSS    1           RESTART FLAGS
00548  M01S00069.242l642 +++|
00549  M01S00070.242l642 +++| RFAM     BITSET 0           ACCOUNTING MESSAGES ISSUED FLAG
00550  M01S00071.242l642 +++| RFAC     BITSET 1           ACCESS COUNTS UPDATED FLAG
00551  M01S00072.242l642 +++| RFPC     BITSET 2           PERMIT COUNTS UPDATED FLAG
00552  M01S00073.242l642 +++| RFRR     BITSET 3           RETRY REQUEST FLAG
00553  M01S00074.242l642 +++|
00554  M01S00075.242l642 +++|
00555  M01S00414.pfm     +++|*         MISCELLANEOUS MEMORY LOCATIONS.
00556  M01S00415.pfm     +++|
00557  M01S00416.pfm     +++| ACCM     CON    0           ACTUAL ACCESS MODE (ON *GET*/*OLD*)
00558  M01S00417.pfm     +++| AILK     CON    0           TRACK FOR ALLOCATION INTERLOCK
00559  M01S00076.242l642 +++| AIPF     CON    0,0         ACCUMULATOR INCREMENT FOR PF ACCESS
00560  M01S00077.242l642 +++| AIPR     CON    0,0         ACCUMULATOR INCREMENT FOR PRU COUNT
00561  M01S00418.pfm     +++| APDK     BSSZ   5           DEFERRED DELINK REQUEST (*APPEND*)
00562  M01S00419.pfm     +++|*                            (SECOND BYTE NONZERO IF DELINK REQUESTED)
00563  M01S00420.pfm     +++| APLF     CON    0,0         LENGTH OF APPENDAGE
00564  M01S00421.pfm     +++| APSC     CON    0           FIRST SECTOR OF *APPEND* ORIGINAL FILE
00565  M01S00422.pfm     +++| APTK     CON    0           FIRST TRACK OF *APPEND* ORIGINAL FILE
00566  M01S00423.pfm     +++| CPTF     CON    0           CPU TRANSFER FLAG
00567  M01S00001.pfm40   +++| DAHP     CON    0           DIRECT ACCESS HOLE TRACK
00568  M01S00002.pfm40   +++|          CON    0           DIRECT ACCESS HOLE SECTOR
00569  M01S00003.pfm40   +++|          CON    0           DIRECT ACCESS HOLE OFFSET
00570  M01S00078.242l642 +++| DAIF     CON    0           DIRECT ACCESS FILE INTERLOCK FLAG
00571  M01S00424.pfm     +++| DTMD     CON    EPRW        DEVICE TRANSFER MODE (NONZERO = REWRITE)
00572  M01S00425.pfm     +++| DVLW     BSSZ   5           DEVICE LAYOUT WORD
00573  M01S00426.pfm     +++| EBSC     CON    0           END BUFFER SECTOR, IF END BUFFER IN *BFMS*
00574  M01S00427.pfm     +++| EBTK     CON    0           END BUFFER TRACK, IF END BUFFER IN *BFMS*
00575  M01S00079.242l642 +++| EPFA     CON    0           EST ORDINAL IF PF ACTIVITY COUNT SET
00576  M01S00001.ns2599  +++| EPOP     CON    0           ERROR OPTIONS (7/,1/SA,1/UP,1/EP,1/RT,1/IP)
00577  M01S00428.pfm     +++| EXPC     CON    0           EXPLICIT PERMIT COUNT
00578  M01S00080.242l642 +++| FERT     CON    0           NON-ZERO IF REAL-TIME BIT SET IN FET
00579  M01S00429.pfm     +++| FETL     CON    TFETL/5+10B MAXIMUM POSITION OF FET PF PARAMETERS
00580  M01S00430.pfm     +++| FNMD     CON    0           *FNT* STATUS MODE EQUIVALENCE
00581  M01S00431.pfm     +++| FNTA     CON    0           FNT ADDRESS FOR LOCAL FILE
00582  M01S00432.pfm     +++| FNTB     CON    0           FNT ADDRESS FOR /PFM*PFN/
00583  M01S00433.pfm     +++| FNTC     CON    0           FNT ADDRESS FOR /PFM*ILK/
00584  M01S00434.pfm     +++| FNTD     CON    0           FNT ADDRESS FOR /PFM*APF/
00585  M01S00435.pfm     +++| IACP     CON    100         INCREMENT ACCESS COUNT IN PERMIT
00586  M01S00436.pfm     +++| IAIF     CON    0           INDIRECT ALLOCATION INTERLOCK FLAG
00587  M01S00437.pfm     +++| JORG     CON    0           JOB ORIGIN TYPE
00588  M01S00438.pfm     +++| LFAL     CON    0           LOCAL FILE ACCESS LEVEL
00589  M01S00439.pfm     +++| LFEF     CON    0           LOCAL FILE EMPTY FLAG
00590  M01S00440.pfm     +++| MSTA     CON    0           ADDRESS OF MASTER DEVICE MST/10
00591  M01S00441.pfm     +++| NPHA     CON    0           NEXT PERMIT HOLE ADDRESS (FROM *SPI*)
00592  M01S00442.pfm     +++| PFCA     CON    0           ADDRESS OF PFC ENTRY (*SAVE*/*REPLACE*)
00593  M01S00443.pfm     +++| PFDN     CON    0           DEVICE NUMBER OF EXISTING FILE
00594  M01S00444.pfm     +++| PFEQ     CON    0           DIRECT ACCESS PERMANENT FILE EST ORDINAL
00595  M01S00445.pfm     +++| PFFT     CON    0           DIRECT ACCESS PERMANENT FILE FIRST TRACK
00596  M01S00446.pfm     +++| PFPT     CON    0077        MULTI-LEVEL PERMISSION FLAG
00597  M01S00447.pfm     +++| PFSP     CON    0           SECURITY PROCESSING BIT
00598  M01S00448.pfm     +++| PFUC     BSSZ   1           USER CONTROLS
00599  M01S00081.242l642 +++| PTKT     CON    0           PRESERVED TRACK
00600  M01S00082.242l642 +++| PWCC     CON    0           *PFM* COMMAND CODE FROM *RPFSTAT* REQUEST
00601  M01S00449.pfm     +++| PXDT     BSSZ   2           PASSWORD EXPIRATION DATE
00602  M01S00450.pfm     +++| RQDT     VFD    5/0,1/0,18/DFPT  REQUESTED DEVICE TYPE
Line S00451 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2350
Seq #  *Modification Id* Act 
----------------------------+
00603  M02S00451.ns2350  ---|*                            (BIT 18 SET IF SPECIFIED BY USER)
00604  M01S00001.ns2350  +++|*                (BIT 18 SET IF DEVICE TYPE SPECIFIED IN FET)
00605  M01S00002.ns2350  +++|*                (THE ACTUAL VALUE OF *DFPT* IS READ FROM *PFNL*)
00606  M01S00452.pfm     +++| RTKE     CON    0           RESERVED TRACK EST ORDINAL
00607  M01S00453.pfm     +++| RTKT     CON    0           RESERVED TRACK
00608  M01S00454.pfm     +++| SAPF     CON    20          SET ACCOUNTING PERMIT FLAG
00609  M01S00455.pfm     +++| SSID     CON    0           SUBSYSTEM ID
00610  M01S00456.pfm     +++| SSJS     CON    0           NONZERO IF CALLER IS *SSJ=* PROGRAM
00611  M01S00457.pfm     +++| SSOM     CON    0           OPERATING SYSTEM SECURITY MODE
00612  M01S00083.242l642 +++| SSYS     CON    0           NON-ZERO IF CALLER IS SUBSYSTEM
00613  M01S00458.pfm     +++|          TITLE  RESIDENT SUBROUTINES.
00614  M01S00459.pfm     +++| SFA      SPACE  4,10
00615  M01S00460.pfm     +++|**        SFA - SET FET ADDRESS.
00616  M01S00461.pfm     +++|*
00617  M01S00462.pfm     +++|*         ENTRY  (SFAA - SFAA+1) PRESET TO FET ADDRESS BY *PRS*.
00618  M01S00463.pfm     +++|*
00619  M01S00464.pfm     +++|*         EXIT   (A) = ABSOLUTE FET ADDRESS.
00620  M01S00465.pfm     +++|
00621  M01S00466.pfm     +++|
00622  M01S00467.pfm     +++| SFA      SUBR               ENTRY/EXIT
Line S00468 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm22
Seq #  *Modification Id* Act 
----------------------------+
00623  M02S00468.pfm22   ---|          LDD    RA
00624  M01S00001.pfm22   +++| SFAB     LDN    0
00625  M01S00002.pfm22   +++|*         LDD    RA          (FET ADDRESS VALIDATED)
00626  M01S00469.pfm     +++|          SHN    6
00627  M01S00470.pfm     +++| SFAA     ADC    0           PRESET FET ADDRESS
00628  M01S00471.pfm     +++|          UJN    SFAX        RETURN
00629  M01S00472.pfm     +++| CCI      SPACE  4,10
00630  M01S00473.pfm     +++|**        CCI - CLEAR CATALOG INTERLOCK.
00631  M01S00474.pfm     +++|*
00632  M01S00475.pfm     +++|*         ENTRY  (EQ) = MASTER DEVICE EST ORDINAL.
00633  M01S00476.pfm     +++|*                (CCIA) = CATALOG TRACK.
00634  M01S00477.pfm     +++|*                (CCIB) = NONZERO IF CATALOG TRACK INTERLOCK SET.
00635  M01S00009.253l688 +++|*
00636  M01S00010.253l688 +++|*         USES   CM - CM+4.
00637  M01S00011.253l688 +++|*
00638  M01S00012.253l688 +++|*         MACROS MONITOR.
00639  M01S00478.pfm     +++|
00640  M01S00479.pfm     +++|
00641  M01S00480.pfm     +++| CCI      SUBR               ENTRY
00642  M01S00481.pfm     +++| CCIB     LDN    0           (NONZERO IF INTERLOCK SET)
00643  M01S00482.pfm     +++|          ZJN    CCIX        IF CATALOG TRACK INTERLOCK NOT SET
00644  M01S00483.pfm     +++|          LDD    EQ
00645  M01S00484.pfm     +++|          STD    CM+1
00646  M01S00485.pfm     +++|          LDC    **          (CATALOG TRACK)
00647  M01S00486.pfm     +++| CCIA     EQU    *-1
00648  M01S00487.pfm     +++|          STD    CM+2
00649  M01S00488.pfm     +++|          LDN    CTIS        CLEAR TRACK INTERLOCK
00650  M01S00489.pfm     +++|          STD    CM+3
00651  M01S00490.pfm     +++|          MONITOR STBM
00652  M01S00084.242l642 +++|          SOM    CCIB        CLEAR *INTERLOCK SET* FLAG
00653  M01S00491.pfm     +++|          UJN    CCIX        RETURN
00654  M01S00492.pfm     +++| CTA      SPACE  4,10
00655  M01S00493.pfm     +++|**        CTA - CALCULATE TRT ADDRESS.
00656  M01S00494.pfm     +++|*
00657  M01S00495.pfm     +++|*         ENTRY  (A) = ADDRESS OF *TRLL* IN MST.
00658  M01S00496.pfm     +++|*
00659  M01S00497.pfm     +++|*         EXIT   (A) = FWA OF TRT.
00660  M01S00498.pfm     +++|*
00661  M01S00499.pfm     +++|*         USES   CM - CM+4.
00662  M01S00500.pfm     +++|
00663  M01S00501.pfm     +++|
00664  M01S00502.pfm     +++| CTA      SUBR               ENTRY/EXIT
00665  M01S00503.pfm     +++|          CRD    CM          GET FWA OF TRT
00666  M01S00504.pfm     +++|          LDD    CM+3
00667  M01S00505.pfm     +++|          LPN    77
00668  M01S00506.pfm     +++|          SHN    14
00669  M01S00507.pfm     +++|          LMD    CM+4
00670  M01S00508.pfm     +++|          UJN    CTAX        RETURN
Line S00003 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00671  M02S00003.242l642 ---| TRP      SPACE  4,15
Line S00004 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00672  M02S00004.242l642 ---|**        TRP - TERMINATE PROGRAM.
Line S00005 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00673  M02S00005.242l642 ---|*
Line S00006 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00674  M02S00006.242l642 ---|*         ENTRY  FILE ACTION COMPLETE.
Line S00007 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00675  M02S00007.242l642 ---|*                TO *TRPX* - TO CLEAR CATALOG INTERLOCK.
Line S00008 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00676  M02S00008.242l642 ---|*
Line S00009 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00677  M02S00009.242l642 ---|*         EXIT   FET SET COMPLETE.
Line S00010 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00678  M02S00010.242l642 ---|*                TO *DPP* TO DROP PP.
Line S00011 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00679  M02S00011.242l642 ---|*
Line S00012 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00680  M02S00012.242l642 ---|*         USES   CM - CM+4, FN - FN+4, FS - FS+4.
Line S00013 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00681  M02S00013.242l642 ---|*
Line S00014 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00682  M02S00014.242l642 ---|*         CALLS  CCI, SFA.
Line S00015 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00683  M02S00015.242l642 ---|
Line S00016 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00684  M02S00016.242l642 ---|
Line S00017 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00685  M02S00017.242l642 ---| TRPX     RJM    CCI         CLEAR CATALOG INTERLOCK
Line S00018 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00686  M02S00018.242l642 ---| TRP      RJM    SFA         SET FET ADDRESS
Line S00019 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00687  M02S00019.242l642 ---|          ZJN    DPP         IF NO FET ADDRESS
Line S00020 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00688  M02S00020.242l642 ---|          CRD    CM          READ FET STATUS WORD
Line S00021 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00689  M02S00021.242l642 ---|          ADN    1           RANDOM BIT
Line S00022 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00690  M02S00022.242l642 ---|          CRD    FN
Line S00023 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00691  M02S00023.242l642 ---|          LDD    CM+4        SET COMPLETION STATUS
Line S00024 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00692  M02S00024.242l642 ---|          LPC    1776
Line S00025 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00693  M02S00025.242l642 ---|          LMN    1
Line S00026 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00694  M02S00026.242l642 ---|          STD    CM+4
Line S00027 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00695  M02S00027.242l642 ---|          LDD    CM+3        CLEAR UPPER BITS OF ERROR STATUS
Line S00028 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00696  M02S00028.242l642 ---|          SCN    77
Line S00029 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00697  M02S00029.242l642 ---|          STD    CM+3
Line S00030 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00698  M02S00030.242l642 ---|
Line S00031 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00699  M02S00031.242l642 ---|*         ENTER HERE FROM ERROR PROCESSOR.
Line S00032 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00700  M02S00032.242l642 ---|*         (CM - CM+4) = UPDATED FET+0.
Line S00033 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00701  M02S00033.242l642 ---|*         (FN - FN+4) = FET+1.
Line S00034 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00702  M02S00034.242l642 ---|
Line S00035 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00703  M02S00035.242l642 ---| TRP1     LDN    ZERL
Line S00036 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00704  M02S00036.242l642 ---|          CRD    FS
Line S00037 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00705  M02S00037.242l642 ---|          LDD    HN          SET RANDOM INDEX REWOUND
Line S00038 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00706  M02S00038.242l642 ---|          STD    FS+2
Line S00039 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00707  M02S00039.242l642 ---|          LDD    FN+1        CHECK RANDOM BIT
Line S00040 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00708  M02S00040.242l642 ---|          SHN    21-13
Line S00041 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00709  M02S00041.242l642 ---| TRPA     PJN    TRP2        IF NOT RANDOM FET
Line S00042 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00710  M02S00042.242l642 ---|*         UJN    TRP2        (RANDOM INDEX NOT WITHIN FET)
Line S00043 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00711  M02S00043.242l642 ---|
Line S00044 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00712  M02S00044.242l642 ---|          RJM    SFA
Line S00045 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00713  M02S00045.242l642 ---|          ADN    CFCN
Line S00046 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00714  M02S00046.242l642 ---|          CWD    FS
Line S00047 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00715  M02S00047.242l642 ---| TRP2     RJM    SFA
Line S00048 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00716  M02S00048.242l642 ---|          CWD    CM
Line S00049 Modification History
M01 (Added by) pfm22
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00717  M02S00049.242l642 ---|*         LJM    DPP
Line S00509 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00718  M02S00509.242l642 ---| DPP      SPACE  4,10
Line S00510 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00719  M02S00510.242l642 ---|**        DPP - DROP PPU.
Line S00511 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00720  M02S00511.242l642 ---|*
Line S00512 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00721  M02S00512.242l642 ---|*         DECREMENT ACTIVITY COUNT AND DROP PP WITH
Line S00513 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00722  M02S00513.242l642 ---|*         PRU AND PF INCREMENT COUNTERS UPDATES.
Line S00514 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00723  M02S00514.242l642 ---|*
Line S00515 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00724  M02S00515.242l642 ---|*         ENTRY  (DPPA) PRESET IF *ABTM* TO BE ISSUED.
Line S00516 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00725  M02S00516.242l642 ---|*                (DPPG) PRESET IF PF ACTIVITY COUNT TO BE DECREMENTED.
Line S00517 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00726  M02S00517.242l642 ---|
Line S00518 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00727  M02S00518.242l642 ---|
Line S00519 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00728  M02S00519.242l642 ---| DPP      BSS    0           ENTRY
Line S00520 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00729  M02S00520.242l642 ---|
Line S00521 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00730  M02S00521.242l642 ---|*         DECREMENT PF ACTIVITY COUNT.
Line S00522 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00731  M02S00522.242l642 ---|
Line S00523 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00732  M02S00523.242l642 ---|          LDC    **          EST ORDINAL
Line S00524 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00733  M02S00524.242l642 ---| DPPG     EQU    *-1
Line S00525 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00734  M02S00525.242l642 ---|          ZJN    DPP1        IF ACTIVITY NOT SET
Line S00526 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00735  M02S00526.242l642 ---|          STD    CM+1
Line S00527 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00736  M02S00527.242l642 ---|          LDN    DPAS        DECREMENT PF ACTIVITY COUNT
Line S00528 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00737  M02S00528.242l642 ---|          STD    CM+3
Line S00529 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00738  M02S00529.242l642 ---|          MONITOR STBM
Line S00530 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00739  M02S00530.242l642 ---|
Line S00531 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00740  M02S00531.242l642 ---|*         SET LOCAL FILE FST COMPLETE.
Line S00532 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00741  M02S00532.242l642 ---|
Line S00533 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00742  M02S00533.242l642 ---| DPP1     LDM    FNTA
Line S00534 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00743  M02S00534.242l642 ---|          STD    FA
Line S00535 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00744  M02S00535.242l642 ---|          ZJN    DPP2        IF NO LOCAL FILE FNT
Line S00536 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00745  M02S00536.242l642 ---|          NFA    FA,R
Line S00537 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00746  M02S00537.242l642 ---|          ADN    FSTL
Line S00538 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00747  M02S00538.242l642 ---|          CRD    FS
Line S00539 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00748  M02S00539.242l642 ---|          AOD    FS+4        SET LOCAL FILE FST COMPLETE
Line S00540 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00749  M02S00540.242l642 ---|          NFA    FA,R
Line S00541 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00750  M02S00541.242l642 ---|          ADN    FSTL
Line S00542 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00751  M02S00542.242l642 ---|          CWD    FS
Line S00543 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00752  M02S00543.242l642 ---|
Line S00544 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00753  M02S00544.242l642 ---|*         UPDATE ACCOUNTING.
Line S00545 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00754  M02S00545.242l642 ---|
Line S00546 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00755  M02S00546.242l642 ---| DPP2     LDD    MA          TRANSMIT REQUEST TO MESSAGE BUFFER
Line S00547 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00756  M02S00547.242l642 ---|          CWM    DPPC,TR
Line S00548 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00757  M02S00548.242l642 ---|          LDN    2           SET NUMBER OF REQUESTS
Line S00549 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00758  M02S00549.242l642 ---|          STD    CM+1
Line S00550 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00759  M02S00550.242l642 ---| DPPA     LDN    0           SET TO DROP/NODROP STATUS
Line S00551 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00760  M02S00551.242l642 ---|*         LDN    1           PRESET IF NODROP NEEDED
Line S00552 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00761  M02S00552.242l642 ---|          STD    CM+2
Line S00553 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00762  M02S00553.242l642 ---|          MONITOR UADM       UPDATE ACCOUNTING AND (SOMETIMES) DROP PP
Line S00554 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00763  M02S00554.242l642 ---|
Line S00555 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00764  M02S00555.242l642 ---|*         ABORT JOB (IF NECESSARY).
Line S00556 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00765  M02S00556.242l642 ---|
Line S00557 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00766  M02S00557.242l642 ---| DPPB     UJN    DPP3        BYPASS *ABTM*
Line S00558 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00767  M02S00558.242l642 ---|*         PSN                (JOB TO BE ABORTED)
Line S00559 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00768  M02S00559.242l642 ---|          MONITOR ABTM
Line S00560 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00769  M02S00560.242l642 ---|
Line S00561 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00770  M02S00561.242l642 ---| DPP3     LJM    PPR         EXIT
Line S00562 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00771  M02S00562.242l642 ---|
Line S00563 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00772  M02S00563.242l642 ---|
Line S00564 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00773  M02S00564.242l642 ---| DPPC     BSS    0           REQUEST TO UPDATE MASS STORAGE ACCUM.
Line S00565 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00774  M02S00565.242l642 ---|          CON    CDCS        SUBFUNCTION CODE
Line S00566 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00775  M02S00566.242l642 ---|          CON    ACLW        ADDRESS OF CONTROL POINT WORD
Line S00567 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00776  M02S00567.242l642 ---|          CON    0*100+22    POSITION AND WIDTH OF FIELD
Line S00568 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00777  M02S00568.242l642 ---| DPPD     CON    0,0         VALUE OF INCREMENT
Line S00569 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00778  M02S00569.242l642 ---|
Line S00570 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00779  M02S00570.242l642 ---| DPPE     BSS    0           REQUEST TO UPDATE ACCOUNTING
Line S00571 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00780  M02S00571.242l642 ---|          CON    AISS        SUBFUNCTION CODE
Line S00572 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00781  M02S00572.242l642 ---|          CON    IOAW        ADDRESS OF CONTROL POINT WORD
Line S00573 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00782  M02S00573.242l642 ---|          CON    0*100+24    POSITION AND WIDTH OF FIELD
Line S00574 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00783  M02S00574.242l642 ---|          CON    0           VALUE OF INCREMENT
Line S00575 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00784  M02S00575.242l642 ---| DPPF     CON    0
Line S00576 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00785  M02S00576.242l642 ---| ERR      SPACE  4,20
00786  M01S00085.242l642 +++| ERR      SPACE  4,25
00787  M01S00577.pfm     +++|**        ERR - PROCESS ERROR.
00788  M01S00578.pfm     +++|*
00789  M01S00579.pfm     +++|*         ENTRY  (A) = EST ORDINAL IF REQUIRED FOR THE ERROR.
00790  M01S00580.pfm     +++|*                (T4) = CHANNEL TO BE RELEASED.
Line S00581 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00791  M02S00581.242l642 ---|*                ((ERR)) = VFD 3/EXC,7/MNE,2/EIC.
00792  M01S00086.242l642 +++|*                ((ERR)) = VFD 3/EXC,7/MNE,1/EIF,1/CIF.
00793  M01S00582.pfm     +++|*                (EXC) = EXIT CASE.
00794  M01S00583.pfm     +++|*                (MNE) = MESSAGE MNEUMONIC ERROR CODE VALUE.
Line S00584 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00795  M02S00584.242l642 ---|*                (EIC) = EXIT INTERLOCK CASE.
Line S00585 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00796  M02S00585.242l642 ---|*                THE *EIC* VALUE SPECIFIES THE EXIT INTERLOCK CASE.
Line S00586 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00797  M02S00586.242l642 ---|*                (EIC) = 0 IF THE CHANNEL AND CATALOG ARE INTERLOCKED.
Line S00587 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00798  M02S00587.242l642 ---|*                (EIC) = 1 IF THE CATALOG IS INTERLOCKED.
Line S00588 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00799  M02S00588.242l642 ---|*                (EIC) = 2 IF THE CHANNEL IS INTERLOCKED.
Line S00589 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00800  M02S00589.242l642 ---|*                (EIC) = 3 IF NEITHER ARE INTERLOCKED.
00801  M01S00087.242l642 +++|*                (EIF) = ERROR IDLE FLAG.
Line S00088 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00802  M02S00088.ns2415  ---|*                (CIF) = CHANNEL INTERLOCKED FLAG.
00803  M01S00035.ns2415  +++|*                (CIF) = CHANNEL NOT INTERLOCKED FLAG.
00804  M01S00590.pfm     +++|*                (CSWD - CSWD+4) = CATALOG STATUS INTERLOCK WORD.
00805  M01S00591.pfm     +++|*                (ERRB) = 0 IF PFM CREATED FNT/FST ENTRY.
00806  M01S00592.pfm     +++|*                (ERRC) = FOLDED EVENT FOR ROLLOUT.
00807  M01S00593.pfm     +++|*                (ERRD) = ROLLOUT TIME.
00808  M01S00594.pfm     +++|*                (ERRE) = EST ORDINAL FOR EVENT.
00809  M01S00595.pfm     +++|*
00810  M01S00596.pfm     +++|*         EXIT   (P1) = (ERR+0).
00811  M01S00597.pfm     +++|*                (P2) = EST ORDINAL.
00812  M01S00598.pfm     +++|*
Line S00599 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00813  M02S00599.242l642 ---|*         USES   P1, P2, T1, T2.
00814  M01S00089.242l642 +++|*         USES   P1, P2, T1.
00815  M01S00600.pfm     +++|*
00816  M01S00601.pfm     +++|*         CALLS  CCI.
00817  M01S00602.pfm     +++|*
00818  M01S00603.pfm     +++|*         MACROS ENDMS, EXECUTE.
00819  M01S00604.pfm     +++|
00820  M01S00605.pfm     +++|
00821  M01S00606.pfm     +++| ERR      CON    0           ENTRY, PARAMETER ADDRESS
00822  M01S00607.pfm     +++|          STD    P2          SAVE EST ORDINAL
00823  M01S00608.pfm     +++|          LDM    ERR         SAVE PARAMETERS *EXC*, *MNE*, *ERC*
00824  M01S00609.pfm     +++|          STD    T1
00825  M01S00610.pfm     +++|          LDI    T1
00826  M01S00611.pfm     +++|          STD    P1
Line S00612 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00827  M02S00612.242l642 ---|          LPN    3           DETERMINE EXIT CASE
Line S00613 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00828  M02S00613.242l642 ---|          STD    T2
Line S00614 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00829  M02S00614.242l642 ---|          LJM    ERRA,T2     PERFORM EXIT PROCESS AS CASE (EX) OF
Line S00615 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00830  M02S00615.242l642 ---| ERRA     UJN    ERR2        EX=0  RELEASE CHANNEL, CLEAR INTERLOCK
Line S00616 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00831  M02S00616.242l642 ---|          UJN    ERR2        EX=1  CLEAR INTERLOCK
Line S00617 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00832  M02S00617.242l642 ---|          UJN    ERR3        EX=2  RELEASE CHANNEL
Line S00618 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00833  M02S00618.242l642 ---| ERR1     EXECUTE  3PR       EX=3  ERROR PROCESSING ONLY
Line S00619 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00834  M02S00619.242l642 ---|
Line S00620 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00835  M02S00620.242l642 ---| ERR2     ENDMS
Line S00621 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00836  M02S00621.242l642 ---|          RJM    CCI         CLEAR CATALOG INTERLOCK
Line S00622 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00837  M02S00622.242l642 ---|          UJN    ERR1        PROCESS ERROR
Line S00623 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00838  M02S00623.242l642 ---|
Line S00624 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00839  M02S00624.242l642 ---| ERR3     ENDMS
Line S00625 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00840  M02S00625.242l642 ---|          UJN    ERR1        PROCESS ERROR
00841  M01S00090.242l642 +++|          LPN    1
Line S00091 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
00842  M02S00091.ns2415  ---|          ZJN    ERR1        IF CHANNEL NOT INTERLOCKED
00843  M01S00036.ns2415  +++|          NJN    ERR1        IF CHANNEL NOT INTERLOCKED
00844  M01S00092.242l642 +++|          ENDMS              RELEASE CHANNEL IF RESERVED
00845  M01S00093.242l642 +++| ERR1     RJM    CCI         CLEAR CATALOG INTERLOCK IF SET
Line S00094 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2414
Seq #  *Modification Id* Act 
----------------------------+
00846  M02S00094.ns2414  ---|          EXECUTE  3PS       PROCESS ERROR
00847  M01S00002.ns2414  +++|          EXECUTE  3PT       PROCESS ERROR
00848  M01S00626.pfm     +++|
00849  M01S00627.pfm     +++| ERRB     CON    0           FILE PRESENT BOOLEAN
00850  M01S00628.pfm     +++| ERRC     CON    0           FOLDED EVENT FOR ROLLOUT
00851  M01S00629.pfm     +++|*                            (TRACK FOR BAD CATALOG/PERMIT SECTOR)
00852  M01S00630.pfm     +++| ERRD     CON    0           ROLLOUT TIME
00853  M01S00631.pfm     +++|*                            (SECTOR FOR BAD CATALOG/PERMIT SECTOR)
00854  M01S00632.pfm     +++| ERRE     CON    0           EST ORDINAL FOR EVENT
00855  M01S00002.pfm54   +++| HNG      SPACE  4,10
00856  M01S00003.pfm54   +++|**        HNG - HANG PP.
00857  M01S00004.pfm54   +++|*
00858  M01S00005.pfm54   +++|*         MACROS MONITOR.
00859  M01S00006.pfm54   +++|
00860  M01S00007.pfm54   +++|
00861  M01S00008.pfm54   +++| HNG      CON    0           ENTRY (RETURN ADDRESS)
00862  M01S00009.pfm54   +++| HNG1     MONITOR  HNGM      HANG
00863  M01S00010.pfm54   +++|          UJN    HNG1        CONTINUE TO HANG
Line S00095 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
00864  M02S00095.ns2776  ---| PDV      SPACE  4,20
Line S00096 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
00865  M02S00096.ns2776  ---|**        PDV - PROCESS DEVICE STATUS.
00866  M01S00001.ns2776  +++| PDA      SPACE  4,20
00867  M01S00002.ns2776  +++|**        PDA - PROCESS DEVICE AVAILABILITY.
00868  M01S00097.242l642 +++|*
00869  M01S00098.242l642 +++|*         ENTRY  (A) = 0 IF DEVICE AVAILABLE.
00870  M01S00099.242l642 +++|*                (A) .NE. 0 IF DEVICE INACCESSIBLE.
00871  M01S00100.242l642 +++|*                (T4) = CHANNEL FOR DEVICE, IF RESERVED.
00872  M01S00101.242l642 +++|*                (T5) = EST ORDINAL OF DEVICE.
00873  M01S00102.242l642 +++|*                (FERT) = REAL-TIME PROCESSING FLAG.
00874  M01S00103.242l642 +++|*                (STAT) = *STNS* BIT SET FOR NO JOB SUSPENSION.
00875  M01S00104.242l642 +++|*                (SSYS) = SUBSYSTEM FLAG.
00876  M01S00105.242l642 +++|*                DRIVER SOFTWARE IS LOADED.
00877  M01S00106.242l642 +++|*
00878  M01S00107.242l642 +++|*         EXIT   RETURN IF PROCESSING IS TO CONTINUE.
00879  M01S00108.242l642 +++|*
00880  M01S00109.242l642 +++|*                TO *ERR* IF DEVICE IS INACCESSIBLE AND CALLER HAS
00881  M01S00110.242l642 +++|*                REAL-TIME PROCESSING SET IN FET OR IS NOT A SUBSYSTEM.
00882  M01S00111.242l642 +++|*
00883  M01S00112.242l642 +++|*         MACROS ERROR.
00884  M01S00113.242l642 +++|
00885  M01S00114.242l642 +++|
Line S00115 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
00886  M02S00115.ns2776  ---| PDV      SUBR               ENTRY/EXIT
Line S00116 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
00887  M02S00116.ns2776  ---|          ZJN    PDVX        IF DEVICE AVAILABLE, RETURN
00888  M01S00003.ns2776  +++| PDA      SUBR               ENTRY/EXIT
00889  M01S00004.ns2776  +++|          ZJN    PDAX        IF DEVICE AVAILABLE, RETURN
00890  M01S00117.242l642 +++|          LDM    STAT
00891  M01S00118.242l642 +++|          LPK    STNS
Line S00119 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
00892  M02S00119.ns2776  ---|          NJN    PDVX        IF PROCESSING TO CONTINUE, RETURN
00893  M01S00005.ns2776  +++|          NJN    PDAX        IF PROCESSING TO CONTINUE, RETURN
00894  M01S00120.242l642 +++|          LDM    FERT
Line S00121 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
00895  M02S00121.ns2776  ---|          NJN    PDV1        IF REAL-TIME PROCESSING SELECTED
00896  M01S00006.ns2776  +++|          NJN    PDA1        IF REAL-TIME PROCESSING SELECTED
00897  M01S00122.242l642 +++|          LDM    SSYS
Line S00123 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
00898  M02S00123.ns2776  ---|          NJN    PDVX        IF SUBSYSTEM, RETURN
Line S00124 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
00899  M02S00124.ns2776  ---| PDV1     ERROR  WID,,,T5,EC6  * WAITING - INACCESSIBLE DEVICE.*
00900  M01S00007.ns2776  +++|          NJN    PDAX        IF SUBSYSTEM, RETURN
00901  M01S00008.ns2776  +++| PDA1     ERROR  WID,,,T5,EC6  * WAITING - INACCESSIBLE DEVICE.*
00902  M01S00009.ns2776  +++| PDV      SPACE  4,20
00903  M01S00010.ns2776  +++|**        PDV - PROCESS DEVICE STATUS.
00904  M01S00011.ns2776  +++|*
00905  M01S00012.ns2776  +++|*         ENTRY  (T4) = CHANNEL FOR DEVICE, IF RESERVED.
00906  M01S00013.ns2776  +++|*                (T5) = EST ORDINAL OF DEVICE.
00907  M01S00014.ns2776  +++|*                (FERT) = REAL-TIME PROCESSING FLAG.
00908  M01S00015.ns2776  +++|*                (STAT) = *STNS* BIT SET FOR NO JOB SUSPENSION.
00909  M01S00016.ns2776  +++|*                (SSYS) = SUBSYSTEM FLAG.
00910  M01S00017.ns2776  +++|*                DRIVER SOFTWARE IS LOADED.
00911  M01S00018.ns2776  +++|*
00912  M01S00019.ns2776  +++|*         EXIT   RETURN IF PROCESSING IS TO CONTINUE.
00913  M01S00020.ns2776  +++|*
00914  M01S00021.ns2776  +++|*         CALLS  PDA.
00915  M01S00022.ns2776  +++|
00916  M01S00023.ns2776  +++|
00917  M01S00024.ns2776  +++| PDV      SUBR               ENTRY/EXIT
00918  M01S00025.ns2776  +++|          LDM    MSD         GET DEVICE STATUS
00919  M01S00026.ns2776  +++|          LPC    100
00920  M01S00027.ns2776  +++|          RJM    PDA         PROCESS DEVICE AVAILABILITY
00921  M01S00028.ns2776  +++|          UJN    PDVX        IF PROCESSING TO CONTINUE, RETURN
00922  M01S00125.242l642 +++| PES      SPACE  4,15
00923  M01S00126.242l642 +++|**        PES - PROCESS I/O ERROR STATUS.
00924  M01S00127.242l642 +++|*
00925  M01S00128.242l642 +++|*         ENTRY  (T4) = CHANNEL FOR DEVICE.
00926  M01S00129.242l642 +++|*                (T5) = EST ORDINAL OF DEVICE.
00927  M01S00130.242l642 +++|*                (RDCT) = DRIVER STATUS.
00928  M01S00131.242l642 +++|*                A MASS STORAGE DRIVER HAS ENCOUNTERED AN I/O ERROR.
00929  M01S00132.242l642 +++|*
00930  M01S00133.242l642 +++|*         EXIT   ERROR IS UNRECOVERABLE.
00931  M01S00134.242l642 +++|*                DEVICE IS INACCESSIBLE BUT CALLER IS ALLOWED
00932  M01S00135.242l642 +++|*                TO PROCEED.
00933  M01S00136.242l642 +++|*
Line S00137 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
00934  M02S00137.ns2776  ---|*         CALLS  PDV.
00935  M01S00029.ns2776  +++|*         CALLS  PDA.
00936  M01S00138.242l642 +++|
00937  M01S00139.242l642 +++|
00938  M01S00140.242l642 +++| PES      SUBR               ENTRY/EXIT
00939  M01S00141.242l642 +++|          LDM    RDCT        CHECK DRIVER STATUS
00940  M01S00142.242l642 +++|          SHN    21-12
00941  M01S00143.242l642 +++|          MJN    PESX        IF UNRECOVERABLE ERROR, RETURN
00942  M01S00144.242l642 +++|*         LDN    1           DEVICE INACCESSIBLE
Line S00145 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
00943  M02S00145.ns2776  ---|          RJM    PDV         PROCESS DEVICE STATUS
00944  M01S00030.ns2776  +++|          RJM    PDA         PROCESS DEVICE STATUS
00945  M01S00146.242l642 +++|          UJN    PESX        RETURN
00946  M01S00633.pfm     +++| SFN      SPACE  4,10
00947  M01S00634.pfm     +++|**        SFN - SET FILE NAME.
00948  M01S00635.pfm     +++|*
00949  M01S00636.pfm     +++|*         ENTRY  (A) = ADDRESS OF FILE NAME TO BE MOVED.
00950  M01S00637.pfm     +++|*
00951  M01S00638.pfm     +++|*         EXIT   (FN - FN+3) = FILE NAME.
00952  M01S00639.pfm     +++|*                (FN+4) = FNT STATUS FIELD.
00953  M01S00640.pfm     +++|*
00954  M01S00641.pfm     +++|*         USES   FN - FN+4.
00955  M01S00642.pfm     +++|
00956  M01S00643.pfm     +++|
00957  M01S00644.pfm     +++| SFN      SUBR               ENTRY/EXIT
00958  M01S00645.pfm     +++|          STM    SFNA
00959  M01S00646.pfm     +++|          LDD    MA
00960  M01S00647.pfm     +++|          CWM    *,ON
00961  M01S00648.pfm     +++| SFNA     EQU    *-1
00962  M01S00649.pfm     +++|          SBN    1
00963  M01S00650.pfm     +++|          CRD    FN
00964  M01S00651.pfm     +++|          LDD    FN+3
00965  M01S00652.pfm     +++|          SCN    77
00966  M01S00653.pfm     +++|          STD    FN+3
00967  M01S00654.pfm     +++| SFNB     LDN    0           SET FILE STATUS
00968  M01S00655.pfm     +++|*         LDN    ST          (FILE STATUS FIELD FOR FNT)
00969  M01S00656.pfm     +++|          STD    FN+4
00970  M01S00657.pfm     +++|          UJN    SFNX
Line S00658 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm22
Seq #  *Modification Id* Act 
----------------------------+
00971  M02S00658.pfm22   ---| TRP      SPACE  4,15
Line S00659 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm22
Seq #  *Modification Id* Act 
----------------------------+
00972  M02S00659.pfm22   ---|**        TRP - TERMINATE PROGRAM.
Line S00660 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm22
Seq #  *Modification Id* Act 
----------------------------+
00973  M02S00660.pfm22   ---|*
Line S00661 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm22
Seq #  *Modification Id* Act 
----------------------------+
00974  M02S00661.pfm22   ---|*         ENTRY  FILE ACTION COMPLETE.
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/pfm.txt · Last modified: by 127.0.0.1