cdc:nos2.source:opl.opl871:deck:pfu
Deck PFU
Library Member Format: MODIFY
Listing Sections
- Deck PFU Start
- Deck PFU Part 1 (Line 1671)
- Deck PFU Part 2 (Line 2994)
- Deck PFU Part 3 (Line 4424)
- Deck PFU Part 4 (Line 6036)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.pfu +++| IDENT PFU,PFU 00002 M00S00002.pfu +++| PERIPH 00003 M00S00003.pfu +++| BASE MIXED 00004 M00S00004.pfu +++| SST 00005 M00S00005.pfu +++| TITLE PFU - PF UTILITY PROCESSOR. 00006 M00S00006.pfu +++| SPACE 4,10 00007 M00S00007.pfu +++|*COMMENT PFU - PERMANENT FILE UTILITY PROCESSOR.
| Line S00008 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00008 M01S00008.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1982.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00009 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00010 M00S00009.pfu +++| SPACE 4,10 00011 M00S00010.pfu +++|*** PF UTILITY PROCESSOR. 00012 M00S00011.pfu +++|* S. T. WORSTELL. 72/10/15. 00013 M00S00012.pfu +++|* R. J. THIELEN. 75/08/12. MODIFIED. 00014 M00S00013.pfu +++| SPACE 4,10 00015 M00S00014.pfu +++|*** PFU IS THE PERMANENT FILE UTILITY ROUTINE WHICH PERFORMS 00016 M00S00015.pfu +++|* VARIOUS UTILITY FUNCTIONS FOR THE PERMANENT FILE UTILITY 00017 M00S00016.pfu +++|* PROGRAMS. *CATS*, *PETS* AND *DATA* ARE THE FILES THE 00018 M00S00017.pfu +++|* UTILITY PROGRAMS USE IN PROCESSING A PERMANENT FILE 00019 M00S00018.pfu +++|* DEVICE. THEY CORRESPOND TO THE CATALOGS, PERMITS AND 00020 M00S00019.pfu +++|* DATA ON A DEVICE. THE PFU FUNCTIONS MANAGE THESE FILES 00021 M00S00020.pfu +++|* AND DATA TRANSFER BETWEEN THE PERMANENT FILE DEVICE AND 00022 M00S00021.pfu +++|* THE UTILITY PROGRAMS. 00023 M00S00022.pfu +++| SPACE 4,10 00024 M00S00023.pfu +++|*** CALL. 00025 M00S00024.pfu +++|* 00026 M00S00025.pfu +++|*T 18/*PFU*,6/ RCL,12/ FUNCTION,24/ ADDR
Figure
00027 M00S00026.pfu +++|* 00028 M00S00027.pfu +++|* WHERE ADDR = ADDRESS OF FET OR PARAMETER BLOCK. 00029 M00S00028.pfu +++| SPACE 4,10 00030 M00S00029.pfu +++|*** DAYFILE MESSAGES. 00031 M00S00030.pfu +++|* 00032 M00S00031.pfu +++|* * PFU - ALTERNATE DEVICE NOT FOUND.* = ALTERNATE DEVICE FOR 00033 M00S00032.pfu +++|* A DIRECT ACCESS FILE COULD NOT BE FOUND. 00034 M00S00033.pfu +++|* 00035 M00S00034.pfu +++|* * PFU - BUFFER ARGUMENT ERROR ON FILENAM AT XXXXXX.* = THE 00036 M00S00035.pfu +++|* CIRCULAR BUFFER POINTERS FOR FILE *FILENAM* DID NOT SATISFY 00037 M00S00036.pfu +++|* THE FOLLOWING CONDITIONS. *XXXXXX* IS THE FET ADDRESS. 00038 M00S00037.pfu +++|* FIRST .LE. IN .LT. LIMIT. 00039 M00S00038.pfu +++|* FIRST .LE. OUT .LT. LIMIT. 00040 M00S00039.pfu +++|* LIMIT .LE. FL. 00041 M00S00040.pfu +++|* 00042 M00S00041.pfu +++|* * PFU - BUFFER CONTROL WORD ERROR ON FILENAM AT XXXXXX.* = 00043 M00S00042.pfu +++|* THE WORD COUNT OF A SECTOR TO BE READ FROM THE CIRCULAR 00044 M00S00043.pfu +++|* BUFFER FOR FILE *FILENAM* EXCEEDED THE WORD COUNT LIMIT OF A 00045 M00S00044.pfu +++|* SECTOR (100B). *XXXXXX* IS THE FET ADDRESS. 00046 M00S00045.pfu +++|* 00047 M00S00046.pfu +++|* * PFU - CATALOG TRACK NOT FOUND.* = A CATALOG TRACK COULD NOT 00048 M00S00047.pfu +++|* BE FOUND FOR SOME USER INDEX. 00049 M00S00048.pfu +++|* 00050 M00S00049.pfu +++|* * PFU - CONTROL POINT ERROR FLAG DETECTED FFFF.* = FFFF IS 00051 M00S00050.pfu +++|* THE CONTENTS OF THE ERROR FLAG FIELD OF WORD *STSW* OF THE 00052 M00S00051.pfu +++|* CONTROL POINT. 00053 M00S00052.pfu +++|* 00054 M00S00053.pfu +++|* * PFU - DUPLICATE FILE, FILENAM AT XXXXXX.* = FILE *FILENAM* 00055 M00S00054.pfu +++|* WAS ALREADY PRESENT AT THE CONTROL POINT. *XXXXXX* IS THE 00056 M00S00055.pfu +++|* FET ADDRESS. 00057 M00S00056.pfu +++|* 00058 M00S00057.pfu +++|* * PFU - FILE NOT FOUND, FILENAM AT XXXXXX.* = NO FNT ENTRY 00059 M00S00058.pfu +++|* COULD BE FOUND FOR FILE *FILENAM*. *XXXXXX* IS THE FET 00060 M00S00059.pfu +++|* ADDRESS. 00061 M00S00060.pfu +++|* 00062 M00S00061.pfu +++|* * PFU - I/O SEQUENCE ERROR ON FILENAM AT XXXXXX.* = *PFU* 00063 M00S00062.pfu +++|* FOUND FILE *FILENAM* BUSY WHEN ATTEMPTING AN OPERATION ON IT. 00064 M00S00063.pfu +++|* *XXXXXX* IS THE FET ADDRESS. 00065 M00S00064.pfu +++|* 00066 M00S00065.pfu +++|* * PFU - NO DEVICE SPECIFIED.* = NO FAMILY DEVICE WAS 00067 M00S00066.pfu +++|* SPECIFIED WITH THE READ LIST FUNCTION. 00068 M00S00067.pfu +++|* 00069 M00S00068.pfu +++|* * PFU - NOT SPECIAL SYSTEM JOB.* = THE PROGRAM THAT CALLED 00070 M00S00069.pfu +++|* *PFU* DID NOT HAVE AN *SSJ=* SPECIAL ENTRY POINT DEFINED. 00071 M00S00070.pfu +++|* 00072 M00S00071.pfu +++|* * PFU - PARAMETER ERROR.* = A PARAMETER IN THE *PFU* CALL WAS 00073 M00S00072.pfu +++|* IN ERROR. 00074 M00S00073.pfu +++|*
| Line S00074 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00075 M01S00074.ns22000 ---|* * PFU - TRACK FLAWED,EQAA,TBBBB.* = TRACK *BBBB* FOR 00076 M01S00075.ns22000 ---|* EQUIPMENT *AA* WAS FLAWED.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00077 M02S00001.242l642 ---|* * PFU - TRACK FLAWED, EQXXX, TKYYYY.* = TRACK YYYY ON EST 00078 M02S00002.242l642 ---|* ORDINAL XXX WAS FLAWED.
| Line S00076 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00079 M01S00076.242l642 ---|* 00080 M00S00077.pfu ---|* * PFU - TRACK INTERLOCK ALREADY CLEAR ON FILENAM AT XXXXXX.* 00081 M00S00078.pfu ---|* = WHEN CALLED TO CLEAR THE TRACK INTERLOCK ON FILE *FILENAM*, 00082 M00S00079.pfu ---|* *PFU* FOUND THAT THE FST FOR THE FILE INDICATED THAT THE 00083 M00S00080.pfu ---|* INTERLOCK WAS ALREADY CLEAR. *XXXXXX* IS THE FET ADDRESS. 00084 M00S00081.pfu ---|* 00085 M00S00082.pfu ---|* * PFU - TRACK INTERLOCK ALREADY SET ON FILENAM AT XXXXXX.* = 00086 M00S00083.pfu ---|* WHEN CALLED TO SET THE TRACK INTERLOCK ON FILE *FILENAM*, 00087 M00S00084.pfu ---|* *PFU* FOUND THAT THE FST FOR THE FILE INDICATED THAT THE 00088 M00S00085.pfu ---|* INTERLOCK WAS ALREADY SET. *XXXXXX* IS THE FET ADDRESS. 00089 M00S00086.pfu ---| SPACE 4,10 00090 M00S00087.pfu ---|*** OPERATOR MESSAGES. 00091 M00S00088.pfu ---|*
| Line S00089 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00092 M01S00089.ns22000 ---|* * EQ XX TRACK LIMIT.* = NO TRACKS ARE AVAILABLE ON EQUIPMENT 00093 M01S00090.ns22000 ---|* *XX*. *PFU* WAITS UNTIL TRACKS BECOME AVAILABLE.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00094 M01S00003.ns22000 +++|* *EQXXX, TRACK LIMIT.* - NO TRACKS ARE AVAILABLE ON EST 00095 M01S00004.ns22000 +++|* ORDINAL XXX. *PFU* WILL WAIT FOR TRACKS TO BECOME AVAILABLE. 00096 M00S00091.pfu +++| TITLE COMMON DECKS. 00097 M00S00092.pfu +++|* COMMON DECKS. 00098 M00S00093.pfu +++| 00099 M00S00094.pfu +++| 00100 M00S00095.pfu +++|*CALL COMPMAC 00101 M00S00096.pfu +++|*CALL COMSCPS 00102 M00S00097.pfu +++|*CALL COMSEVT 00103 M00S00098.pfu +++|*CALL COMSLSD 00104 M00S00099.pfu +++| QUAL MSP 00105 M00S00100.pfu +++|*CALL COMSMSP 00106 M00S00101.pfu +++| QUAL *
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00107 M01S00001.242l642 +++| EPNR EQU /MSP/EPNR 00108 M00S00102.pfu +++| EPRW EQU /MSP/EPRW 00109 M01S00002.242l642 +++| PARE EQU /MSP/PARE 00110 M00S00103.pfu +++| RDCT EQU /MSP/RDCT 00111 M00S00104.pfu +++| UERR EQU /MSP/UERR 00112 M00S00105.pfu +++|*CALL COMSMST 00113 M00S00106.pfu +++|*CALL COMSPFM 00114 M00S00107.pfu +++|*CALL COMSPIM 00115 M00S00108.pfu +++|*CALL COMSSSD 00116 M00S00109.pfu +++|*CALL COMSSSJ 00117 M00S00110.pfu +++|*CALL COMSWEI 00118 M00S00111.pfu +++| QUAL ZOL 00119 M00S00112.pfu +++|*CALL COMSZOL 00120 M00S00113.pfu +++| QUAL * 00121 M00S00114.pfu +++| LIST X 00122 M00S00115.pfu +++|*CALL COMSPFU 00123 M00S00116.pfu +++| LIST -X 00124 M00S00117.pfu +++| TITLE MACROS. 00125 M00S00118.pfu +++|* MACROS. 00126 M00S00119.pfu +++| ERROR SPACE 4,10 00127 M00S00120.pfu +++|** ERROR - PROCESS ERROR. 00128 M00S00121.pfu +++|* 00129 M00S00122.pfu +++|* ERROR E 00130 M00S00123.pfu +++|* 00131 M00S00124.pfu +++|* ENTRY *E* = ERROR CODE. 00132 M00S00125.pfu +++|* 00133 M00S00126.pfu +++|* EXIT TO *ERR*. 00134 M00S00127.pfu +++|* 00135 M00S00128.pfu +++|* CALLS ERR. 00136 M00S00129.pfu +++| 00137 M00S00130.pfu +++| 00138 M00S00131.pfu +++| PURGMAC ERROR 00139 M00S00132.pfu +++| 00140 M00S00133.pfu +++| ERROR MACRO E 00141 M00S00134.pfu +++| MACREF ERROR 00142 M00S00135.pfu +++| LDN E 00143 M00S00136.pfu +++| RJM ERR 00144 M00S00137.pfu +++| ERROR ENDM 00145 M00S00138.pfu +++| FETA SPACE 4,10 00146 M00S00139.pfu +++|** FETA - COMPUTE FET ADDRESS. 00147 M00S00140.pfu +++|* 00148 M00S00141.pfu +++|* FETA W 00149 M00S00142.pfu +++|* 00150 M00S00143.pfu +++|* ENTRY *W* = FET WORD NUMBER. 00151 M00S00144.pfu +++|* 00152 M00S00145.pfu +++|* COMPUTES ABSOLUTE FET ADDRESS USING (IR+3 - IR+4). 00153 M00S00146.pfu +++|* 00154 M00S00147.pfu +++|* CALLS CFA. 00155 M00S00148.pfu +++| 00156 M00S00149.pfu +++| 00157 M00S00150.pfu +++| PURGMAC FETA 00158 M00S00151.pfu +++| 00159 M00S00152.pfu +++| FETA MACRO W 00160 M00S00153.pfu +++| MACREF FETA 00161 M00S00154.pfu +++| RJM CFA COMPUTE FET ADDRESS 00162 M00S00155.pfu +++| IFNE W,0,1 IF NOT FIRST WORD 00163 M00S00156.pfu +++| ADN W 00164 M00S00157.pfu +++| FETA ENDM 00165 M00S00158.pfu +++| FNCT SPACE 4,10 00166 M00S00159.pfu +++|** FNCT - DEFINE FUNCTION PROCESSOR. 00167 M00S00160.pfu +++|* 00168 M00S00161.pfu +++|*TAG FNCT FC,FP 00169 M00S00162.pfu +++|* 00170 M00S00163.pfu +++|* ENTRY *TAG* = SET TO FWA OF TABLE IF FIRST ENTRY FOR TABLE 00171 M00S00164.pfu +++|* AND TO THE LENGTH OF THE TABLE IF THE LAST 00172 M00S00165.pfu +++|* ENTRY. 00173 M00S00166.pfu +++|* 00174 M00S00167.pfu +++|* *FC* = FUNCTION CODE * 100B (ACTS AS INDEX INTO TABLE) 00175 M00S00168.pfu +++|* *FP* = FUNCTION PROCESSOR SYMBOL = ENTRY ADDRESS FOR 00176 M00S00169.pfu +++|* RESIDENT PROCESSORS OR THE LAST CHARACTER OF 00177 M00S00170.pfu +++|* THE OVERLAY NAME FOR OVERLAY PROCESSORS. 00178 M00S00171.pfu +++|* 00179 M00S00172.pfu +++|* EXIT TABLE ENTRY INDEXED BY THE FUNCTION CODE SET TO *FP*. 00180 M00S00173.pfu +++| 00181 M00S00174.pfu +++| 00182 M00S00175.pfu +++| NOREF .B,.M 00183 M00S00176.pfu +++| .B SET 0 00184 M00S00177.pfu +++| .M SET -2 00185 M00S00178.pfu +++| PURGMAC FNCT 00186 M00S00179.pfu +++| MACRO FNCT,TAG,FC,FP 00187 M00S00180.pfu +++| .TAGP IFC NE,$TAG$$ 00188 M00S00181.pfu +++| .MP IFLT .M,-1 00189 M00S00182.pfu +++| LOC *O 00190 M00S00183.pfu +++| .M SET -1 00191 M00S00184.pfu +++| .B SET * 00192 M00S00185.pfu +++| TAG BSS 0 00193 M00S00186.pfu +++| .MP ELSE 00194 M00S00187.pfu +++| LOC .M+1 00195 M00S00188.pfu +++| .M SET -2 00196 M00S00189.pfu +++| TAG BSS 0 00197 M00S00190.pfu +++| ORG .B+* 00198 M00S00191.pfu +++| .MP ENDIF 00199 M00S00192.pfu +++| .TAGP ELSE 00200 M00S00193.pfu +++| ORG .B+FC/100 00201 M00S00194.pfu +++| LOC FC/100 00202 M00S00195.pfu +++| CON FP 00203 M00S00196.pfu +++| .M MAX .M,FC/100 00204 M00S00197.pfu +++| .TAGP ENDIF 00205 M00S00198.pfu +++| FNCT ENDM 00206 M00S00199.pfu +++| SPACE 4,10 00207 M00S00200.pfu +++|* OVERLAY CONTROL. 00208 M00S00201.pfu +++| 00209 M00S00202.pfu +++| 00210 M00S00203.pfu +++| .N SET 0 00211 M00S00204.pfu +++| OVLB MICRO 1,, 3F BASE OVERLAY NAME 00212 M00S00205.pfu +++| OVERLAY SPACE 4,10 00213 M00S00206.pfu +++|** OVERLAY - GENERATE OVERLAY CONSTANTS. 00214 M00S00207.pfu +++|* 00215 M00S00208.pfu +++|*ENTR OVERLAY (TEXT),ORGA 00216 M00S00209.pfu +++|* 00217 M00S00210.pfu +++|* ENTRY *ENTR* = ENTRY POINT TAG FOR OVERLAY. 00218 M00S00211.pfu +++|* *ORGA* = ORIGIN ADDRESS OF OVERLAY. 00219 M00S00212.pfu +++|* 00220 M00S00213.pfu +++|* 00221 M00S00214.pfu +++|* EXIT *ENTR* = UNQUALIFIED ENTRY POINT SYMBOL = 18/ON. 00222 M00S00215.pfu +++|* ON = LAST CHARACTER OF OVERLAY NAME. 00223 M00S00216.pfu +++|* SYMBOL QUALIFIER SET TO OVERLAY NAME. 00224 M00S00217.pfu +++|* ENTRY/EXIT POINT SET WITH *SUBR* MACRO. 00225 M00S00218.pfu +++| 00226 M00S00219.pfu +++| 00227 M00S00220.pfu +++| PURGMAC OVERLAY 00228 M00S00221.pfu +++| 00229 M00S00222.pfu +++| MACRO OVERLAY,ENTR,TEXT,ORGA 00230 M00S00223.pfu +++| QUAL 00231 M00S00224.pfu +++| NOREF .N 00232 M00S00225.pfu +++| .N SET .N+1 00233 M00S00226.pfu +++| .M MICRO .N,1, ABCDEFGHIJKLMNOPQRSTUVWXYZ 00234 M00S00227.pfu +++| .O MICRO 1,3, "OVLB"".M" 00235 M00S00228.pfu +++| TTL PFU/".O" - TEXT 00236 M00S00229.pfu +++| ENTR TITLE 00237 M00S00230.pfu +++| IDENT ".O",ORGA TEXT 00238 M00S00231.pfu +++|*COMMENT PFU - TEXT
| Line S00232 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00239 M01S00232.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1982.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00240 M01S00002.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00241 M00S00233.pfu +++| ORG ORGA 00242 M00S00234.pfu +++| ENTR EQU 1R".M" 00243 M00S00235.pfu +++| QUAL ".O" 00244 M00S00236.pfu +++| ENTR SUBR 00245 M00S00237.pfu +++| OVERLAY ENDM 00246 M00S00238.pfu +++| VADDR SPACE 4,10 00247 M00S00239.pfu +++|** VADDR - VALIDATE ADDRESS. 00248 M00S00240.pfu +++|* 00249 M00S00241.pfu +++|* VADDR LOC,JST 00250 M00S00242.pfu +++|* 00251 M00S00243.pfu +++|* ENTRY *LOC* = PP MEMORY LOCATION OF HIGH ORDER BYTE OF 00252 M00S00244.pfu +++|* ADDRESS. 00253 M00S00245.pfu +++|* *JST* = NULL FOR A RIGHT JUSTIFIED ADDRESS. 00254 M00S00246.pfu +++|* = NON-NULL FOR A LEFT JUSTIFIED ADDRESS. 00255 M00S00247.pfu +++|* 00256 M00S00248.pfu +++|* EXIT (A) = (T1 - T2) = VALIDATED CENTRAL ADDRESS. 00257 M00S00249.pfu +++|* EXIT TO *ERR* WITH * PFU - PARAMETER ERROR.* IF 00258 M00S00250.pfu +++|* ADDRESS NOT VALID. 00259 M00S00251.pfu +++|* 00260 M00S00252.pfu +++|* CALLS CCA. 00261 M00S00253.pfu +++| 00262 M00S00254.pfu +++| 00263 M00S00255.pfu +++| PURGMAC VADDR 00264 M00S00256.pfu +++| 00265 M00S00257.pfu +++| VADDR MACRO LOC,JST 00266 M00S00258.pfu +++| MACREF VADDR 00267 M00S00259.pfu +++| .1 SET LOC 00268 M00S00260.pfu +++| .1 SET .1*2 00269 M00S00261.pfu +++| IFC EQ,$JST$$,1 00270 M00S00262.pfu +++| .1 SET .1+1 00271 M00S00263.pfu +++| .SIZE IFGE .1,100 00272 M00S00264.pfu +++| LDC .1 00273 M00S00265.pfu +++| .SIZE ELSE 00274 M00S00266.pfu +++| LDN .1 00275 M00S00267.pfu +++| .SIZE ENDIF 00276 M00S00268.pfu +++| RJM CCA CHECK CENTRAL ADDRESS 00277 M00S00269.pfu +++| VADDR ENDM 00278 M00S00270.pfu +++| TITLE DIRECT CELL DEFINITIONS. 00279 M00S00271.pfu +++|* DIRECT LOCATIONS. 00280 M00S00272.pfu +++| 00281 M00S00273.pfu +++| 00282 M00S00274.pfu +++| PR EQU 16 PREVIOUS RA 00283 M00S00275.pfu +++| DA EQU 17 DIRECT ACCESS FILE FLAG 00284 M00S00276.pfu +++| FS EQU 20 - 24 FST ENTRY 00285 M00S00277.pfu +++| DF EQU 25 - 26 *DATA* FET ADDRESS 00286 M00S00278.pfu +++| LL EQU 25 - 26 LENGTH LEFT 00287 M00S00279.pfu +++| PF EQU 27 - 30 *PETS* FET ADDRESS 00288 M00S00280.pfu +++| LF EQU 27 - 30 LENGTH OF FILE 00289 M00S00281.pfu +++| CA EQU 31 - 32 *CATS* FET ADDRESS 00290 M00S00282.pfu +++| UI EQU 33 - 34 USER INDEX 00291 M00S00283.pfu +++| RI EQU 33 - 34 RANDOM INDEX 00292 M00S00284.pfu +++| P1 EQU 33 TEMPORARY LOCATION 00293 M00S00285.pfu +++| P2 EQU 34 TEMPORARY LOCATION 00294 M00S00286.pfu +++| P3 EQU 35 TEMPORARY LOCATION 00295 M00S00287.pfu +++| P4 EQU 36 TEMPORARY LOCATION 00296 M00S00288.pfu +++| P5 EQU 37 TEMPORARY LOCATION 00297 M00S00289.pfu +++| FN EQU 40 - 44 FNT ENTRY 00298 M00S00290.pfu +++| CN EQU 40 - 44 CENTRAL MEMORY BUFFER 00299 M00S00291.pfu +++| TF EQU 45 TYPE FILE 00300 M00S00292.pfu +++| SC EQU 46 SECTOR COUNT TO WRITE 00301 M00S00293.pfu +++| DN EQU 47 DEVICE NUMBER 00302 M00S00294.pfu +++| FA EQU 57 FNT ADDRESS 00303 M00S00295.pfu +++| FT EQU 60 - 61 FIRST 00304 M00S00296.pfu +++| IN EQU 62 - 63 IN 00305 M00S00297.pfu +++| OT EQU 64 - 65 OUT 00306 M00S00298.pfu +++| LM EQU 66 - 67 LIMIT 00307 M00S00299.pfu +++| SPACE 4,10 00308 M00S00300.pfu +++|* ASSEMBLY CONSTANTS. 00309 M00S00301.pfu +++| 00310 M00S00302.pfu +++|
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00311 M01S00001.ns21000 +++| FADL EQU 4000D DELAY CYCLES WAITING FOR FAST ATTACH FILE 00312 M00S00303.pfu +++| FMRD EQU 1 READ MODE FOR FILE
| Line S00304 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00313 M01S00304.ns21000 ---| FMRM EQU 31 READ AND ALLOW MODIFY MODE FOR FILE
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00314 M01S00002.ns21000 +++| FMRU EQU 11 READ/ALLOW UPDATE MODE FOR FILE 00315 M00S00305.pfu +++| MSEO EQU 3 MASS STORAGE ERROR OPTION 00316 M00S00306.pfu +++| PFIDL EQU 5 *PFID* LIST LENGTH
| Line S00307 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00317 M01S00307.ns21000 ---| TDGE EQU 2 *TDAM* GET INTERLOCK FILE FUNCTION CODE
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00318 M01S00003.ns21000 +++| TDGE EQU 2 *TDAM* GET MSS INTERLOCK FUNCTION CODE 00319 M00S00308.pfu +++| TDNA EQU 4 *TDAM* SUBSYSTEM INACTIVE RESPONSE CODE
| Line S00309 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00320 M01S00309.ns21000 ---| TDRE EQU 3 *TDAM* *MSS* EXECUTIVE RESUME FUNCTION CODE 00321 M00S00310.pfu ---| TDRT EQU 10B *TDAM* RETRY LIMIT 00322 M00S00311.pfu ---| TDSR EQU 1 *TDAM* FILE STAGING REQUEST FUNCTION CODE 00323 M00S00312.pfu ---| TDWT EQU 1 *TDAM* WRITE CODE 00324 M00S00313.pfu ---| UUPL EQU 3 *UCDT* UPDATE PARAMETER LIST LENGTH 00325 M00S00314.pfu ---| UURE EQU 1 *UCDT* UPDATE READ ERROR RESPONSE CODE 00326 M00S00315.pfu ---| UUVE EQU 2 *UCDT* UPDATE VERIFY ERROR RESPONSE CODE 00327 M00S00316.pfu ---| UUWE EQU 3 *UCDT* UPDATE WRITE ERROR RESPONSE CODE
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00328 M01S00003.242l642 +++|* (DATA TRANSFERRED TO DEVICE) 00329 M01S00004.242l642 +++| UUWN EQU 4 *UCDT* UPDATE WRITE ERROR RESPONSE CODE 00330 M01S00005.242l642 +++|* (NO DATA TRANSFERRED TO DEVICE) 00331 M00S00317.pfu +++| SPACE 4,10 00332 M00S00318.pfu +++|* BUFFERS. 00333 M00S00319.pfu +++| 00334 M00S00320.pfu +++| 00335 M00S00321.pfu +++| CWBA EQU BFMS-3 CONTROL WORD BUFFER ADDRESS 00336 M00S00322.pfu +++| WEBA EQU CWBA-502 WRITE ERROR BUFFER ADDRESS 00337 M00S00323.pfu +++| TITLE MAIN LOOP. 00338 M00S00324.pfu +++|* MAIN LOOP. 00339 M00S00325.pfu +++| SPACE 4,10 00340 M00S00326.pfu +++| ORG PPFW 00341 M00S00327.pfu +++| 00342 M00S00328.pfu +++| PFU RJM PRS PRESET PROGRAM 00343 M00S00329.pfu +++| RJM 0,T1 CALL FUNCTION PROCESSOR 00344 M00S00330.pfu +++| RJM SFC SET FILE COMPLETE 00345 M00S00331.pfu +++| RJM CFS COMPLETE FET STATUS 00346 M00S00332.pfu +++| MONITOR DPPM DROP PP 00347 M00S00333.pfu +++| LJM PPR EXIT TO PP RESIDENT 00348 M01S00006.242l642 +++| SPACE 4,10 00349 M01S00007.242l642 +++|* GLOBAL MEMORY DEFINITIONS. 00350 M01S00008.242l642 +++| 00351 M01S00009.242l642 +++| 00352 M01S00010.242l642 +++| PFAF BSSZ 2 *PFU* ACTIVE FLAG ADDRESS 00353 M00S00334.pfu +++| ERR SPACE 4,25 00354 M00S00335.pfu +++|** ERR - *PFU* ERROR EXIT PROCESSOR. 00355 M00S00336.pfu +++|* 00356 M00S00337.pfu +++|* ENTRY (A) = ERROR CODE. 00357 M00S00338.pfu +++|* (FA) = FNT ADDRESS, IF FILE SET BUSY. 00358 M00S00339.pfu +++|* = 0 IF NO FILE SET BUSY. 00359 M00S00340.pfu +++|* (FS - FS+4) = FST ENTRY. 00360 M00S00341.pfu +++|* (FN - FN+3) = FILE NAME. 00361 M00S00342.pfu +++|* (IR+3 - IR+4) = FET ADDRESS. 00362 M00S00343.pfu +++|* (PFAF - PFAF+1) = *PFU* ACTIVE FLAG ADDRESS. 00363 M00S00344.pfu +++|* 00364 M00S00345.pfu +++|* EXIT CHANNEL DROPPED IF ASSIGNED. 00365 M00S00346.pfu +++|* ERROR MESSAGE PUT IN DAYFILE. 00366 M00S00347.pfu +++|* FILE SET COMPLETE. 00367 M00S00348.pfu +++|* FET SET COMPLETE. 00368 M00S00349.pfu +++|* *PFU* ACTIVE FLAG CLEARED IN CENTRAL PROGRAM IF SET. 00369 M00S00350.pfu +++|* PP DROPPED. 00370 M00S00351.pfu +++|* EXIT TO PP RESIDENT. 00371 M00S00352.pfu +++|* 00372 M00S00353.pfu +++|* CALLS ERP, EXR. 00373 M00S00354.pfu +++|* 00374 M00S00355.pfu +++|* MACROS ENDMS, MONITOR. 00375 M00S00356.pfu +++| 00376 M00S00357.pfu +++| 00377 M00S00358.pfu +++| ERR SUBR ENTRY
| Line S00359 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00378 M01S00359.ns22000 ---| STM ERRA SAVE ERROR CODE
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00379 M01S00005.ns22000 +++| STD P1 SAVE ERROR CODE FOR ERROR OVERLAY 00380 M00S00360.pfu +++| ENDMS 00381 M00S00361.pfu +++| LDC 2L"OVLB"+ERP EXECUTE ERROR PROCESSOR 00382 M00S00362.pfu +++| RJM EXR
| Line S00363 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00383 M01S00363.ns22000 ---| MONITOR DPPM DROP PP 00384 M01S00364.ns22000 ---| LJM PPR EXIT TO PP RESIDENT 00385 M01S00365.ns22000 ---| 00386 M01S00366.ns22000 ---| ERRA BSS 1 ERROR CODE
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00387 M01S00006.ns22000 +++|* MONITOR DPPM (PERFORMED IN ERROR OVERLAY) 00388 M01S00007.ns22000 +++|* LJM PPR EXIT TO PP RESIDENT 00389 M00S00367.pfu +++| TITLE COMMON SUBROUTINES. 00390 M00S00368.pfu +++| CAU SPACE 4,15 00391 M00S00369.pfu +++|** CAU - CLEAR *PFU* ACTIVE FLAG. 00392 M00S00370.pfu +++|* 00393 M00S00371.pfu +++|* ENTRY (PFAF) = ADDRESS IN CPU PROGRAM OF *PFU* ACTIVE FLAG. 00394 M00S00372.pfu +++|* = 0 IF *PFU* ACTIVE FLAG NOT SET. 00395 M00S00373.pfu +++|* 00396 M00S00374.pfu +++|* EXIT (PFAF) = 0. 00397 M00S00375.pfu +++|* *PFU* ACTIVE FLAG IN CPU PROGRAM CLEARED IF (PFAF) 00398 M00S00376.pfu +++|* NON-ZERO AND A VALID ADDRESS. 00399 M00S00377.pfu +++|* 00400 M00S00378.pfu +++|* USES CM - CM+4. 00401 M00S00379.pfu +++|* 00402 M00S00380.pfu +++|* CALLS VCA. 00403 M00S00381.pfu +++| 00404 M00S00382.pfu +++| 00405 M00S00383.pfu +++| CAU SUBR ENTRY/EXIT 00406 M00S00384.pfu +++| LDN ZERL READ ZERO WORD 00407 M00S00385.pfu +++| CRD CM 00408 M00S00386.pfu +++| LDM PFAF VALIDATE FLAG ADDRESS 00409 M00S00387.pfu +++| SHN 14 00410 M00S00388.pfu +++| LMM PFAF+1 00411 M00S00389.pfu +++| RJM VCA 00412 M00S00390.pfu +++| ZJN CAUX IF CLEAR OR INVALID 00413 M00S00391.pfu +++| SHN 14 FORM ABSOLUTE ADDRESS 00414 M00S00392.pfu +++| ADD RA 00415 M00S00393.pfu +++| SHN 6 00416 M00S00394.pfu +++| CWD CM CLEAR *PFU* ACTIVE FLAG 00417 M00S00395.pfu +++| LDN 0 CLEAR FLAG ADDRESS 00418 M00S00396.pfu +++| STM PFAF 00419 M00S00397.pfu +++| STM PFAF+1 00420 M00S00398.pfu +++| UJN CAUX RETURN 00421 M00S00399.pfu +++| CCA SPACE 4,15 00422 M00S00400.pfu +++|** CCA - CHECK CENTRAL ADDRESS. 00423 M00S00401.pfu +++|* 00424 M00S00402.pfu +++|* ENTRY (A) = 12/LH,1/JS. 00425 M00S00403.pfu +++|* LH = PP LOCATION OF HIGH ORDER BYTE OF ADDRESS. 00426 M00S00404.pfu +++|* JS = JUSTIFICATION FLAG. 00427 M00S00405.pfu +++|* 0 = LEFT JUSTIFIED. 00428 M00S00406.pfu +++|* 1 = RIGHT JUSTIFIED. 00429 M00S00407.pfu +++|* 00430 M00S00408.pfu +++|* EXIT (A) = (T1 - T2) = VALIDATED CENTRAL ADDRESS. 00431 M00S00409.pfu +++|* ERROR EXIT TAKEN IF ADDRESS IS INVALID. 00432 M00S00410.pfu +++|* 00433 M00S00411.pfu +++|* USES T1. 00434 M00S00412.pfu +++|* 00435 M00S00413.pfu +++|* CALLS VCA. 00436 M00S00414.pfu +++| 00437 M00S00415.pfu +++| 00438 M00S00416.pfu +++| CCA SUBR ENTRY/EXIT 00439 M00S00417.pfu +++| SHN 21 SAVE LOCATION OF HIGH ORDER BYTE 00440 M00S00418.pfu +++| STD T1 00441 M00S00419.pfu +++| MJN CCA2 IF ADDRESS RIGHT JUSTIFIED 00442 M00S00420.pfu +++| 00443 M00S00421.pfu +++|* GET LEFT JUSTIFIED ADDRESS. 00444 M00S00422.pfu +++| 00445 M00S00423.pfu +++| LDM 1,T1 GET LEFT JUSTIFIED ADDRESS 00446 M00S00424.pfu +++| SCN 77 00447 M00S00425.pfu +++| SHN 6 00448 M00S00426.pfu +++| LMI T1 00449 M00S00427.pfu +++| SHN 6 00450 M00S00428.pfu +++| 00451 M00S00429.pfu +++|* CHECK ADDRESS. 00452 M00S00430.pfu +++| 00453 M00S00431.pfu +++| CCA1 RJM VCA VALIDATE CENTRAL ADDRESS 00454 M00S00432.pfu +++| NJN CCAX IF A VALID ADDRESS 00455 M00S00433.pfu +++| ERROR ECPAR PROCESS PARAMETER ERROR 00456 M00S00434.pfu +++| 00457 M00S00435.pfu +++|* GET RIGHT JUSTIFIED ADDRESS. 00458 M00S00436.pfu +++| 00459 M00S00437.pfu +++| CCA2 LDI T1 GET RIGHT JUSTIFIED ADDRESS 00460 M00S00438.pfu +++| LPN 77 00461 M00S00439.pfu +++| SHN 14 00462 M00S00440.pfu +++| LMM 1,T1 00463 M00S00441.pfu +++| UJN CCA1 CHECK ADDRESS 00464 M00S00442.pfu +++| CFA SPACE 4,10 00465 M00S00443.pfu +++|** CFA - COMPUTE FET ADDRESS. 00466 M00S00444.pfu +++|* 00467 M00S00445.pfu +++|* ENTRY (IR+3 - IR+4) = RELATIVE FET ADDRESS. 00468 M00S00446.pfu +++|* (NO VALIDITY CHECK IS MADE.) 00469 M00S00447.pfu +++|* 00470 M00S00448.pfu +++|* EXIT (A) = ABSOLUTE FET ADDRESS. 00471 M00S00449.pfu +++| 00472 M00S00450.pfu +++| 00473 M00S00451.pfu +++| CFA SUBR ENTRY/EXIT 00474 M00S00452.pfu +++| LDD IR+3 FORM ABSOLUTE FET ADDRESS 00475 M00S00453.pfu +++| SHN 6 00476 M00S00454.pfu +++| ADD RA 00477 M00S00455.pfu +++| SHN 6 00478 M00S00456.pfu +++| ADD IR+4 00479 M00S00457.pfu +++| UJN CFAX RETURN 00480 M00S00458.pfu +++| CFS SPACE 4,10 00481 M00S00459.pfu +++|** CFS - COMPLETE FET STATUS. 00482 M00S00460.pfu +++|* 00483 M00S00461.pfu +++|* ENTRY (IR+3 - IR+4) = FET ADDRESS. 00484 M00S00462.pfu +++|* 00485 M00S00463.pfu +++|* EXIT FET STATUS SET COMPLETE IF FET ADDRESS VALID. 00486 M00S00464.pfu +++|* (IR+3 - IR+4) = 0 IF FET STATUS SET COMPLETE. 00487 M00S00465.pfu +++|* 00488 M00S00466.pfu +++|* USES CM - CM+4. 00489 M00S00467.pfu +++|* 00490 M00S00468.pfu +++|* CALLS VCA. 00491 M00S00469.pfu +++| 00492 M00S00470.pfu +++| 00493 M00S00471.pfu +++| CFS SUBR ENTRY/EXIT 00494 M00S00472.pfu +++| LDD IR+3 GET FET ADDRESS 00495 M00S00473.pfu +++| SHN 6 00496 M00S00474.pfu +++| ADD IR+4 00497 M00S00475.pfu +++| RJM VCA VALIDATE FET ADDRESS 00498 M00S00476.pfu +++| ZJN CFSX IF BAD FET ADDRESS 00499 M00S00477.pfu +++| FETA SET FET STATUS COMPLETE 00500 M00S00478.pfu +++| CRD CM 00501 M00S00479.pfu +++| AOD CM+4 00502 M00S00480.pfu +++| FETA 00503 M00S00481.pfu +++| CWD CM 00504 M00S00482.pfu +++| LDN 0 CLEAR FET ADDRESS 00505 M00S00483.pfu +++| STD IR+3 00506 M00S00484.pfu +++| STD IR+4 00507 M00S00485.pfu +++| UJN CFSX RETURN
| Line S00486 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00508 M01S00486.242l642 ---| FAR SPACE 4,10 00509 M01S00487.242l642 ---|** FAR - FORCE AUTO RECALL. 00510 M01S00488.242l642 ---|* 00511 M01S00489.242l642 ---|* EXIT ERROR EXIT TAKEN IF NOT CALLED WITH AUTO RECALL. 00512 M01S00490.242l642 ---|* 00513 M01S00491.242l642 ---|* CALLS CRS. 00514 M01S00492.242l642 ---| 00515 M01S00493.242l642 ---| 00516 M01S00494.242l642 ---| FAR SUBR ENTRY/EXIT 00517 M01S00495.242l642 ---| RJM CRS CHECK AUTO RECALL STATUS 00518 M01S00496.242l642 ---| NJN FARX IF CALLED WITH AUTO RECALL 00519 M01S00497.242l642 ---| ERROR ECPAR PROCESS PARAMETER ERROR 00520 M00S00498.pfu ---| FFE SPACE 4,20 00521 M00S00499.pfu ---|** FFE - FIND FNT ENTRY. 00522 M00S00500.pfu ---|* 00523 M00S00501.pfu ---|* ENTRY (A) = 16/,1/L,1/F. 00524 M00S00502.pfu ---|* L = 0 TO MAKE LIBRARY TYPE CHECK. 00525 M00S00503.pfu ---|* 1 TO SUPPRESS LIBRARY TYPE CHECK. 00526 M00S00504.pfu ---|* F = 0 TO ABORT IF FILE NOT FOUND. 00527 M00S00505.pfu ---|* 1 TO ADVANCE EXIT IF FILE NOT FOUND. 00528 M00S00506.pfu ---|* (IR+3 - IR+4) = VALIDATED FET ADDRESS. 00529 M00S00507.pfu ---|* 00530 M00S00508.pfu ---|* EXIT (FA) = FNT ADDRESS (0, IF NO FILE FOUND). 00531 M00S00509.pfu ---|* (FN - FN+4) = FNT ENTRY. 00532 M00S00510.pfu ---|* (FS - FS+4) = FST ENTRY. 00533 M00S00511.pfu ---|* FILE SET BUSY. 00534 M00S00512.pfu ---|* ERROR EXIT TAKEN IF I/O SEQUENCE ERROR OR IF FILE NOT 00535 M00S00513.pfu ---|* FOUND AND ABORT OPTION IS SELECTED. 00536 M00S00514.pfu ---|* 00537 M00S00515.pfu ---|* USES CM - CM+4, FA, FN - FN+4, FS - FS+4, T1. 00538 M00S00516.pfu ---|* 00539 M00S00517.pfu ---|* MACROS ERROR, FETA, NFA. 00540 M00S00518.pfu ---| 00541 M00S00519.pfu ---| 00542 M00S00520.pfu ---| FFE SUBR ENTRY/EXIT 00543 M00S00521.pfu ---| STD T1 SAVE PROCESSING OPTIONS 00544 M00S00522.pfu ---| FETA READ FILE NAME 00545 M00S00523.pfu ---| CRD FN 00546 M00S00524.pfu ---| 00547 M00S00525.pfu ---|* CHECK FNT ADDRESS IN FET. 00548 M00S00526.pfu ---| 00549 M00S00527.pfu ---| ADN FTLM READ FNT ADDRESS 00550 M00S00528.pfu ---| CRD CM 00551 M00S00529.pfu ---| LDD CP READ FL CONTROL WORD 00552 M00S00530.pfu ---| ADN FLSW 00553 M00S00531.pfu ---| CRD FS 00554 M00S00532.pfu ---| LDD FS SET NFL SIZE 00555 M00S00533.pfu ---| SHN 6 00556 M00S00534.pfu ---| ADN 1 00557 M00S00535.pfu ---| STD FS+1 00558 M00S00536.pfu ---| LDC FNTN 00559 M00S00537.pfu ---| STD FS 00560 M00S00538.pfu ---| STD FS+2 00561 M00S00539.pfu ---| SBD CM CHECK FNT ADDRESS IN FET 00562 M00S00540.pfu ---| PJN FFE2 IF BELOW FNT 00563 M00S00541.pfu ---| LDD CM 00564 M00S00542.pfu ---| SBD FS+1 00565 M00S00543.pfu ---| PJN FFE2 IF ABOVE FNT 00566 M00S00544.pfu ---| LDD CM SAVE FNT ADDRESS 00567 M00S00545.pfu ---| STD FA 00568 M00S00546.pfu ---| NFA FA,R 00569 M00S00547.pfu ---| CRD CM READ FNT ENTRY 00570 M00S00548.pfu ---| 00571 M00S00549.pfu ---|* COMPARE FILE NAMES. 00572 M00S00550.pfu ---| 00573 M00S00551.pfu ---| FFE1 LDD CM CHECK CHARACTERS 1 AND 2 00574 M00S00552.pfu ---| ZJN FFE2 IF NULL 00575 M00S00553.pfu ---| LMD FN 00576 M00S00554.pfu ---| NJN FFE2 IF NO MATCH 00577 M00S00555.pfu ---| LDD CM+1 CHECK CHARACTERS 3 AND 4 00578 M00S00556.pfu ---| LMD FN+1 00579 M00S00557.pfu ---| NJN FFE2 IF NO MATCH 00580 M00S00558.pfu ---| LDD CM+2 CHECK CHARACTERS 5 AND 6 00581 M00S00559.pfu ---| LMD FN+2 00582 M00S00560.pfu ---| NJN FFE2 IF NO MATCH 00583 M00S00561.pfu ---| LDD CM+3 CHECK CHARACTER 7 00584 M00S00562.pfu ---| LMD FN+3 00585 M00S00563.pfu ---| SCN 77 00586 M00S00564.pfu ---| ZJN FFE5 IF A MATCH 00587 M00S00565.pfu ---| 00588 M00S00566.pfu ---|* ADVANCE TO NEXT FNT ENTRY. 00589 M00S00567.pfu ---| 00590 M00S00568.pfu ---| FFE2 LDN LENF ADVANCE FNT ADDRESS 00591 M00S00569.pfu ---| RAD FS 00592 M00S00570.pfu ---| SBD FS+1 00593 M00S00571.pfu ---| PJN FFE3 IF END OF FNT 00594 M00S00572.pfu ---| NFA FS,R 00595 M00S00573.pfu ---| CRD CM 00596 M00S00574.pfu ---| UJN FFE1 LOOP ON SEARCH 00597 M00S00575.pfu ---| 00598 M00S00576.pfu ---| 00599 M00S00577.pfu ---|* PROCESS FILE NOT FOUND. 00600 M00S00578.pfu ---| 00601 M00S00579.pfu ---| FFE3 LDN 0 CLEAR BUSY FILE INDICATION 00602 M00S00580.pfu ---| STD FA 00603 M00S00581.pfu ---| LDD T1 CHECK FILE NOT FOUND PROCESSING 00604 M00S00582.pfu ---| SHN 21-0 00605 M00S00583.pfu ---| MJN FFE4 IF RETURN CONTROL REQUESTED 00606 M00S00584.pfu ---| ERROR ECFNF PROCESS FILE NOT FOUND ERROR 00607 M00S00585.pfu ---| 00608 M00S00586.pfu ---| FFE4 AOM FFE ADVANCE EXIT ADDRESS
| Line S00587 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00609 M01S00587.ns22000 ---| LJM FFEX RETURN
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2332 |
Seq # *Modification Id* Act ----------------------------+ 00610 M02S00008.ns2332 ---| UJP FFEX RETURN
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2332 |
Seq # *Modification Id* Act ----------------------------+ 00611 M01S00001.ns2332 +++| UJN FFE7.1 RETURN 00612 M00S00588.pfu +++| 00613 M00S00589.pfu +++|* PERFORM LIBRARY TYPE CHECK. 00614 M00S00590.pfu +++| 00615 M00S00591.pfu +++| FFE5 LDD T1 SEE IF CHECK FOR LIBRARY TYPE 00616 M00S00592.pfu +++| SHN 21-1 00617 M00S00593.pfu +++| MJN FFE6 IF LIBRARY TYPE CHECK SUPPRESSED 00618 M00S00594.pfu +++| LDD CM+4 CHECK FOR LIBRARY TYPE 00619 M00S00595.pfu +++| SHN -6 00620 M00S00596.pfu +++| LMN LIFT 00621 M00S00597.pfu +++| NJN FFE3 IF NOT LIBRARY TYPE 00622 M00S00598.pfu +++| 00623 M00S00599.pfu +++|* SET FNT ADDRESS IN FET. 00624 M00S00600.pfu +++| 00625 M00S00601.pfu +++| FFE6 FETA FTLM SET FNT ADDRESS IN LIMIT WORD OF FET 00626 M00S00602.pfu +++| CRD CM 00627 M00S00603.pfu +++| LDD FS 00628 M00S00604.pfu +++| LMD FS+2 00629 M00S00605.pfu +++| ZJN FFE7 IF FET FNT ADDRESS CORRECT 00630 M00S00606.pfu +++| LDD FS SET CORRECT FNT ADDRESS 00631 M00S00607.pfu +++| STD FA 00632 M00S00608.pfu +++| FFE7 LDD FA FNT ADDRESS 00633 M00S00609.pfu +++| STD CM 00634 M00S00610.pfu +++| NFA FA,R FETCH FNT ENTRY 00635 M00S00611.pfu +++| CRD FS 00636 M00S00612.pfu +++| CRD FN READ FNT ENTRY 00637 M00S00613.pfu +++| FETA FTLM WRITE FNT POINTER TO FET 00638 M00S00614.pfu +++| CWD CM 00639 M00S00615.pfu +++| RJM SFB SET FILE BUSY 00640 M00S00616.pfu +++| NJN FFE8 IF FILE NOT SET BUSY
| Line S00617 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00641 M01S00617.ns22000 ---| LJM FFEX RETURN
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2332 |
Seq # *Modification Id* Act ----------------------------+ 00642 M02S00009.ns2332 ---| UJP FFEX RETURN
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2332 |
Seq # *Modification Id* Act ----------------------------+ 00643 M01S00002.ns2332 +++| FFE7.1 LJM FFEX RETURN 00644 M00S00618.pfu +++| 00645 M00S00619.pfu +++|* PROCESS I/O SEQUENCE ERROR. 00646 M00S00620.pfu +++| 00647 M00S00621.pfu +++| FFE8 LDN 0 CLEAR BUSY FILE INDICATION 00648 M00S00622.pfu +++| STD FA 00649 M00S00623.pfu +++| ERROR ECIOS PROCESS I/O SEQUENCE ERROR 00650 M00S00624.pfu +++| LDB SPACE 4,35 00651 M00S00625.pfu +++|** LDB - LOAD BUFFER. 00652 M00S00626.pfu +++|* 00653 M00S00627.pfu +++|* ENTRY (T4) = CHANNEL.
| Line S00628 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00654 M01S00628.ns22000 ---|* (T5) = EQUIPMENT NUMBER.
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00655 M01S00010.ns22000 +++|* (T5) = EST ORDINAL. 00656 M00S00629.pfu +++|* (T6) = TRACK. 00657 M00S00630.pfu +++|* (T7) = SECTOR. 00658 M00S00631.pfu +++|* (LF) = FILE LENGTH 00659 M00S00632.pfu +++|* (SSPF) = SYSTEM SECTOR PROCESS FLAG. 00660 M00S00633.pfu +++|* = 0, IF NO SYSTEM SECTOR PROCESSING REQUIRED. 00661 M00S00634.pfu +++|* = 1, IF SYSTEM SECTOR PROCESSING REQUIRED. 00662 M00S00635.pfu +++|* 00663 M00S00636.pfu +++|* EXIT (T6) = UPDATED TRACK. 00664 M00S00637.pfu +++|* (T7) = UPDATED SECTOR. 00665 M00S00638.pfu +++|* (IN - IN+1) = UPDATED BUFFER IN POINTER. 00666 M00S00639.pfu +++|* (EOIF) = 0 IF EOI NOT WRITTEN TO BUFFER. 00667 M00S00640.pfu +++|* = NON-ZERO IF EOI WRITTEN TO BUFFER. 00668 M00S00641.pfu +++|* (SSPE) = SYSTEM SECTOR ERROR STATUS, IF PROCESSED. 00669 M00S00642.pfu +++|* = 0, IF SYSTEM SECTOR PROCESSED WITHOUT ERROR. 00670 M00S00643.pfu +++|* = NON-ZERO, IF SYSTEM SECTOR ERROR OCCURRED. 00671 M00S00644.pfu +++|* (SSPF) CLEARED WHEN SYSTEM SECTOR PROCESSING OCCURS. 00672 M00S00645.pfu +++|* 00673 M00S00646.pfu +++|* NOTE - *SSPF* MUST NOT BE SET WHEN THIS ROUTINE IS CALLED 00674 M00S00647.pfu +++|* FROM ANY OF THE OVERLAYS. IT IS THE SETTING OF 00675 M00S00648.pfu +++|* *SSPF* WHICH DETERMINES WHETHER THE SUB-ROUTINE 00676 M00S00649.pfu +++|* *CSS* IS CALLED TO CHECK A FILE-S SYSTEM SECTOR. 00677 M00S00650.pfu +++|* THIS SUB-ROUTINE RESIDES IN THE OVERLAY AREA AND, 00678 M00S00651.pfu +++|* THEREFORE, IS NOT AVAILABLE FOR CALLS WHEN AN 00679 M00S00652.pfu +++|* OVERLAY IS RESIDENT. 00680 M00S00653.pfu +++|* 00681 M00S00654.pfu +++|* 00682 M00S00655.pfu +++|* USES P5, CM - CM+4, FS+2 - FS+3, IN - IN+1, LF - LF+1, 00683 M00S00656.pfu +++|* OT - OT+1, T1 - T3, T6 - T7. 00684 M00S00657.pfu +++|* 00685 M00S00658.pfu +++|* CALLS CSS, RDS, SAR. 00686 M00S00659.pfu +++|* 00687 M00S00660.pfu +++|* MACROS ERROR. 00688 M00S00661.pfu +++| 00689 M00S00662.pfu +++| 00690 M00S00663.pfu +++| LDB SUBR ENTRY/EXIT 00691 M00S00664.pfu +++| RJM SAR SET ABSOLUTE READ BUFFER ADDRESSES 00692 M00S00665.pfu +++| LDN 0 00693 M00S00666.pfu +++| STD P5 00694 M00S00667.pfu +++| STM EOIF CLEAR EOI FLAG 00695 M00S00668.pfu +++|
| Line S00669 Modification History | |
|---|---|
M01 (Removed by) | ns2332 |
Seq # *Modification Id* Act ----------------------------+ 00696 M01S00669.ns2332 ---|* CHECK SIZE OF BUFFER
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2332 |
Seq # *Modification Id* Act ----------------------------+ 00697 M01S00003.ns2332 +++|* CHECK SIZE OF BUFFER. 00698 M00S00670.pfu +++| 00699 M00S00671.pfu +++| LDB1 STM CWBA CLEAR SECTOR ERROR FLAGS 00700 M00S00672.pfu +++| LDD OT LENGTH = OUT - IN+1 00701 M00S00673.pfu +++| SBD IN 00702 M00S00674.pfu +++| SHN 14 00703 M00S00675.pfu +++| ADD OT+1 00704 M00S00676.pfu +++| SBD IN+1 00705 M00S00677.pfu +++| SBN 1 00706 M00S00678.pfu +++| PJN LDB2 IF IN+1 .LT. OUT 00707 M00S00679.pfu +++| ADC * ADD BUFFER LENGTH 00708 M00S00680.pfu +++| LDBA EQU *-2 (LIMIT-FIRST) 00709 M00S00681.pfu +++| LDB2 ADC -101 00710 M00S00682.pfu +++| MJN LDBX IF 101B WORDS NOT AVAILABLE 00711 M00S00683.pfu +++| 00712 M00S00684.pfu +++|* DETERMINE IF SYSTEM SECTOR PROCESSED. 00713 M00S00685.pfu +++| 00714 M00S00686.pfu +++| STM LDBN+1 SAVE AVAILABLE CM BUFFER SPACE 00715 M00S00687.pfu +++| SHN -14 00716 M00S00688.pfu +++| STM LDBN 00717 M00S00689.pfu +++| LDM SSPF 00718 M00S00690.pfu +++| ZJN LDB5 IF SYSTEM SECTOR ALREADY PROCESSED 00719 M00S00691.pfu +++| 00720 M00S00692.pfu +++|* PROCESS SYSTEM SECTOR. 00721 M00S00693.pfu +++| 00722 M00S00694.pfu +++| LDM LDBN CHECK AVAILABLE CM BUFFER SPACE 00723 M00S00695.pfu +++| SHN 14 00724 M00S00696.pfu +++| ADM LDBN+1 00725 M00S00697.pfu +++| NJN LDB3 IF SPACE FOR FILE CONTROL WORD
| Line S00698 Modification History | |
|---|---|
M01 (Removed by) | ns2332 |
Seq # *Modification Id* Act ----------------------------+ 00726 M01S00698.ns2332 ---| LJM LDBX RETURN
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2332 |
Seq # *Modification Id* Act ----------------------------+ 00727 M01S00004.ns2332 +++| LDB2.1 LJM LDBX RETURN 00728 M00S00699.pfu +++| 00729 M00S00700.pfu +++| LDB3 LDN 0 CLEAR SYSTEM SECTOR PROCESS FLAG 00730 M00S00701.pfu +++| STM SSPF 00731 M00S00702.pfu +++| RJM CSS READ AND CHECK SYSTEM SECTOR 00732 M00S00703.pfu +++| ZJN LDB4 IF NO STATUS ERROR 00733 M00S00704.pfu +++| STM SSPE SAVE STATUS ERROR
| Line S00705 Modification History | |
|---|---|
M01 (Removed by) | ns2332 |
Seq # *Modification Id* Act ----------------------------+ 00734 M01S00705.ns2332 ---| LJM LDBX RETURN
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2332 |
Seq # *Modification Id* Act ----------------------------+ 00735 M01S00005.ns2332 +++| UJN LDB2.1 RETURN 00736 M00S00706.pfu +++| 00737 M00S00707.pfu +++| LDB4 AOM BFMS+1 ADJUST HEADER BYTE TO TRUE WORD COUNT 00738 M00S00708.pfu +++| LJM LDB12 WRITE SYSTEM SECTOR TO CM BUFFER 00739 M00S00709.pfu +++| 00740 M00S00710.pfu +++|* READ NEXT SECTOR. 00741 M00S00711.pfu +++| 00742 M00S00712.pfu +++| LDB5 LDC BFMS 00743 M00S00713.pfu +++| RJM RDS READ SECTOR 00744 M00S00714.pfu +++| PJN LDB6 IF NO MASS STORAGE ERROR
| Line S00715 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00745 M01S00715.242l642 ---| LDM RDCT SET FATAL ERROR STATUS 00746 M00S00716.pfu ---| SHN 0-13
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00747 M01S00011.242l642 +++| LPN 1 00748 M00S00717.pfu +++| LMN 2 SET MASS STORAGE ERROR CODE 00749 M00S00718.pfu +++| STM CWBA 00750 M00S00719.pfu +++| LMN 3 00751 M00S00720.pfu +++| NJN LDB6 IF NOT FATAL ERROR 00752 M00S00721.pfu +++| STM BFMS FORCE EOI SECTOR 00753 M00S00722.pfu +++| STM BFMS+1 00754 M00S00723.pfu +++| LDB6 LDD RA CHECK FOR STORAGE MOVE 00755 M00S00724.pfu +++| LMD PR 00756 M00S00725.pfu +++| ZJN LDB7 IF NOT STORAGE MOVED 00757 M00S00726.pfu +++| RJM SAR SET ABSOLUTE READ BUFFER ADDRESSES 00758 M00S00727.pfu +++| 00759 M00S00728.pfu +++|* CHECK IF NEW TRACK. 00760 M00S00729.pfu +++| 00761 M00S00730.pfu +++| LDB7 LDD T6 SET CURRENT TRACK IN CONTROL WORD 00762 M00S00731.pfu +++| STM CWBA+1 00763 M00S00732.pfu +++| LDD T7 SET CURRENT SECTOR IN CONTROL WORD 00764 M00S00733.pfu +++| STM CWBA+2 00765 M00S00734.pfu +++| LDM BFMS CHECK FIRST CONTROL BYTE 00766 M00S00735.pfu +++| NJN LDB8 IF NOT EOF OR EOI 00767 M00S00736.pfu +++| LDM BFMS+1 00768 M00S00737.pfu +++| NJN LDB8 IF EOF 00769 M00S00738.pfu +++| LDN 1 SET EOI FLAG 00770 M00S00739.pfu +++| STM EOIF 00771 M00S00740.pfu +++| LDN 0 00772 M00S00741.pfu +++| LJM LDB13 WRITE SECTOR TO CM BUFFER 00773 M00S00742.pfu +++| 00774 M00S00743.pfu +++| LDB8 STD T7 SET NEXT TRACK 00775 M00S00744.pfu +++| STD FS+3 00776 M00S00745.pfu +++| SHN 6 00777 M00S00746.pfu +++| PJN LDB9 IF NOT NEW TRACK 00778 M00S00747.pfu +++| SHN -6 00779 M00S00748.pfu +++| STD T6 SET NEW TRACK 00780 M00S00749.pfu +++| STD FS+2 00781 M00S00750.pfu +++| LDN 0 00782 M00S00751.pfu +++| STD T7 CLEAR SECTOR 00783 M00S00752.pfu +++| STD FS+3 00784 M00S00753.pfu +++| 00785 M00S00754.pfu +++|* CHECK LENGTH FOR DUMP FILES. 00786 M00S00755.pfu +++| 00787 M00S00756.pfu +++| LDB9 UJN *+1 PERFORM LENGTH CHECK 00788 M00S00757.pfu +++|* UJN LDB12 (LENGTH CHECK SUPPRESSED) 00789 M00S00758.pfu +++| LDBC EQU *-1 00790 M00S00759.pfu +++| SOD LF+1 DECREMENT FILE LENGTH 00791 M00S00760.pfu +++| PJN LDB10 IF NO BORROW 00792 M00S00761.pfu +++| SOD LF 00793 M00S00762.pfu +++| AOD LF+1 CANCEL END AROUND BORROW 00794 M00S00763.pfu +++| LDB10 ADD LF 00795 M00S00764.pfu +++| NJN LDB12 IF NOT END OF FILE 00796 M00S00765.pfu +++| LDD LL CHECK IF LENGTH LEFT 00797 M00S00766.pfu +++| ADD LL+1 00798 M00S00767.pfu +++| ZJN LDB11 IF NO MORE LENGTH LEFT 00799 M00S00768.pfu +++| AOD P5 SET RECALL EXIT FLAG 00800 M00S00769.pfu +++| UJN LDB12 WRITE SECTOR TO CM BUFFER 00801 M00S00770.pfu +++| 00802 M00S00771.pfu +++| LDB11 STM BFMS CLEAR LINKAGE BYTES 00803 M00S00772.pfu +++| STM BFMS+1 00804 M00S00773.pfu +++| AOM CWBA SET LENGTH ERROR FLAG 00805 M00S00774.pfu +++| STM EOIF SET EOI FLAG 00806 M00S00775.pfu +++| LDB12 LDM BFMS CHECK FOR EOF OR EOI 00807 M00S00776.pfu +++| ZJN LDB13 IF EOF OR EOI 00808 M00S00777.pfu +++| LDM BFMS+1 GET WORD COUNT 00809 M00S00778.pfu +++| LDB13 ADN 1 ADD 1 FOR CONTROL WORD 00810 M00S00779.pfu +++| STD T1 00811 M00S00780.pfu +++| 00812 M00S00781.pfu +++|* CHECK FOR LIMIT REACHED IN THIS SECTOR. 00813 M00S00782.pfu +++| 00814 M00S00783.pfu +++| LDD IN CHECK IN + WORD COUNT 00815 M00S00784.pfu +++| SHN 14 00816 M00S00785.pfu +++| ADD IN+1 00817 M00S00786.pfu +++| ADD T1 00818 M00S00787.pfu +++| ADC * SET SECOND PART WORD COUNT 00819 M00S00788.pfu +++| LDBD EQU *-2 (-LIMIT) 00820 M00S00789.pfu +++| STD T2 00821 M00S00790.pfu +++| PJN LDB14 IF WRAP AROUND SECTOR 00822 M00S00791.pfu +++| 00823 M00S00792.pfu +++|* PROCESS NORMAL SECTOR. 00824 M00S00793.pfu +++| 00825 M00S00794.pfu +++| LDD IN STORE BUFFER 00826 M00S00795.pfu +++| SHN 14 00827 M00S00796.pfu +++| ADD IN+1 00828 M00S00797.pfu +++| ADC * READ SECTOR 00829 M00S00798.pfu +++| LDBE EQU *-2 (RA) 00830 M00S00799.pfu +++| CWM CWBA,T1 00831 M00S00800.pfu +++| 00832 M00S00801.pfu +++|* ADVANCE IN POINTER. 00833 M00S00802.pfu +++| 00834 M00S00803.pfu +++| LDD T1 ADVANCE IN 00835 M00S00804.pfu +++| RAD IN+1 00836 M00S00805.pfu +++| SHN -14 00837 M00S00806.pfu +++| RAD IN 00838 M00S00807.pfu +++| UJN LDB17 CHECK OUT POINTER 00839 M00S00808.pfu +++| 00840 M00S00809.pfu +++|* PROCESS WRAP AROUND SECTOR. 00841 M00S00810.pfu +++| 00842 M00S00811.pfu +++| LDB14 LDD T1 SET FIRST PART WORD COUNT 00843 M00S00812.pfu +++| SBD T2 00844 M00S00813.pfu +++| STD T3 00845 M00S00814.pfu +++| ZJN LDB15 IF NO FIRST PART 00846 M00S00815.pfu +++| LDD IN STORE FIRST PART 00847 M00S00816.pfu +++| SHN 14 00848 M00S00817.pfu +++| ADD IN+1 00849 M00S00818.pfu +++| ADC * WRITE SECOND PART OF SECTOR 00850 M00S00819.pfu +++| LDBF EQU *-2 (RA) 00851 M00S00820.pfu +++| CWM CWBA,T3 00852 M00S00821.pfu +++| LDB15 LDD T2 CHECK SECOND PART LENGTH 00853 M00S00822.pfu +++| ZJN LDB16 IF NO SECOND PART 00854 M00S00823.pfu +++| LDD T3 SET PP BUFFER ADDRESS 00855 M00S00824.pfu +++| SHN 2 00856 M00S00825.pfu +++| ADD T3 00857 M00S00826.pfu +++| ADC CWBA 00858 M00S00827.pfu +++| STM LDBH 00859 M00S00828.pfu +++| LDC * WRITE SECOND PART OF SECTOR 00860 M00S00829.pfu +++| LDBG EQU *-2 (RA+FIRST) 00861 M00S00830.pfu +++| CWM CWBA,T2 00862 M00S00831.pfu +++| LDBH EQU *-1 (PP BUFFER ADDRESS) 00863 M00S00832.pfu +++| LDB16 LDD T2 SET NEW IN POINTER 00864 M00S00833.pfu +++| ADC * 00865 M00S00834.pfu +++| LDBI EQU *-2 (FIRST) 00866 M00S00835.pfu +++| STD IN+1 00867 M00S00836.pfu +++| SHN -14 00868 M00S00837.pfu +++| STD IN 00869 M00S00838.pfu +++| 00870 M00S00839.pfu +++|* CHECK FET OUT POINTER. 00871 M00S00840.pfu +++| 00872 M00S00841.pfu +++| LDB17 LDC * UPDATE OUT POINTER 00873 M00S00842.pfu +++| LDBJ EQU *-2 (RA + FET ADDRESS OF OUT POINTER) 00874 M00S00843.pfu +++| CRD CM 00875 M00S00844.pfu +++| LDD CM+3 00876 M00S00845.pfu +++| STD OT 00877 M00S00846.pfu +++| SHN 14 00878 M00S00847.pfu +++| LMD CM+4 00879 M00S00848.pfu +++| STD OT+1 00880 M00S00849.pfu +++| ADC * VALIDATE OUT POINTER 00881 M00S00850.pfu +++| LDBK EQU *-2 (-LIMIT) 00882 M00S00851.pfu +++| MJN LDB18 IF OUT .LT. LIMIT 00883 M00S00852.pfu +++| ERROR ECBAE PROCESS BUFFER ARGUMENT ERROR 00884 M00S00853.pfu +++| 00885 M00S00854.pfu +++|* WRITE UPDATED IN POINTER. 00886 M00S00855.pfu +++| 00887 M00S00856.pfu +++| LDB18 LDD IN SET IN POINTER 00888 M00S00857.pfu +++| STD CM+3 00889 M00S00858.pfu +++| LDD IN+1 00890 M00S00859.pfu +++| STD CM+4 00891 M00S00860.pfu +++| LDC * WRITE IN POINTER TO FET 00892 M00S00861.pfu +++| LDBL EQU *-2 (RA + FET ADDRESS OF IN POINTER) 00893 M00S00862.pfu +++| CWD CM 00894 M00S00863.pfu +++| 00895 M00S00864.pfu +++|* CHECK TERMINATIONS. 00896 M00S00865.pfu +++| 00897 M00S00866.pfu +++| LDM EOIF CHECK EOI FLAG 00898 M00S00867.pfu +++| ZJN LDB20 IF NOT EOI 00899 M00S00868.pfu +++| LDB19 LJM LDBX RETURN 00900 M00S00869.pfu +++| 00901 M00S00870.pfu +++| LDB20 LDD P5 CHECK IF RECALL FLAG SET 00902 M00S00871.pfu +++| NJN LDB19 IF RECALL FLAG SET 00903 M00S00872.pfu +++| LJM LDB1 LOOP FOR ANOTHER SECTOR 00904 M00S00873.pfu +++| 00905 M00S00874.pfu +++| 00906 M00S00875.pfu +++| EOIF BSSZ 1 EOI FLAG 00907 M00S00876.pfu +++| 00908 M00S00877.pfu +++| LDBM BSS 0 CODE TO DISABLE FILE LENGTH CHECK 00909 M00S00878.pfu +++| LOC LDBC 00910 M00S00879.pfu +++| UJN LDB12 SKIP FILE LENGTH CHECK 00911 M00S00880.pfu +++| LOC *O 00912 M00S00881.pfu +++| 00913 M00S00882.pfu +++| LDBN BSSZ 2 AVAILABLE CM BUFFER
| Line S00883 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 00914 M01S00883.286l859 ---| CFMT CON 0 CATALOG ENTRY FORMAT CODE 00915 M00S00884.pfu ---| SSPF CON 0 SYSTEM SECTOR PROCESS FLAG 00916 M00S00885.pfu ---| SSPE CON 0 SYSTEM SECTOR ERROR STATUS 00917 M00S00886.pfu ---| DLSA BSS 5 MASTER DEVICE STATUS 00918 M00S00887.pfu ---| BEGF BSS 3 BEGINNING FILE FLAGS 00919 M00S00888.pfu ---| PDA SPACE 4,15 00920 M00S00889.pfu ---|** PDA - PROCESS DIRECT ACCESS FILE. 00921 M00S00890.pfu ---|* 00922 M00S00891.pfu ---|* ENTRY (A) = RESIDENCY DEVICE NUMBER. 00923 M00S00892.pfu ---|* (DN) = MASTER DEVICE NUMBER. 00924 M00S00893.pfu ---|* (FS+2) = FIRST TRACK OF FILE. 00925 M00S00894.pfu ---|* 00926 M00S00895.pfu ---|* EXIT (T4 - T7) = MASS STORAGE PARAMETERS FOR FILE. 00927 M00S00896.pfu ---|* (DN) = RESIDENCY DEVICE NUMBER. 00928 M00S00897.pfu ---|* (DA) = NON-ZERO. 00929 M00S00898.pfu ---|* (DLSA) = MASTER DEVICE NUMBER. 00930 M00S00899.pfu ---|* ERROR EXIT TAKEN IF RESIDENCY DEVICE NOT FOUND. 00931 M00S00900.pfu ---|* 00932 M00S00901.pfu ---|* USES CM, DA, DN, P1, T6. 00933 M00S00902.pfu ---|* 00934 M00S00903.pfu ---|* CALLS IRA, SDN. 00935 M00S00904.pfu ---|* 00936 M00S00905.pfu ---|* MACROS ENDMS, ERROR. 00937 M00S00906.pfu ---| 00938 M00S00907.pfu ---| 00939 M00S00908.pfu ---| PDA SUBR ENTRY/EXIT 00940 M00S00909.pfu ---| STD P1 00941 M00S00910.pfu ---| LDD DN GET DEVICE NUMBER 00942 M00S00911.pfu ---| STM DLSA 00943 M00S00912.pfu ---| LMD P1 00944 M00S00913.pfu ---| ZJN PDA2 IF FILE RESIDES ON MASTER DEVICE 00945 M00S00914.pfu ---| 00946 M00S00915.pfu ---|* PROCESS ALTERNATE DEVICE. 00947 M00S00916.pfu ---| 00948 M00S00917.pfu ---| ENDMS 00949 M00S00918.pfu ---| LDD P1 SET UP DAF ORDINAL 00950 M00S00919.pfu ---| STD DN 00951 M00S00920.pfu ---| STD CM 00952 M00S00921.pfu ---| LDC **
| Line S00922 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00953 M01S00922.ns22000 ---| PDAA EQU *-1 (FAMILY EQUIPMENT)
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00954 M01S00011.ns22000 +++| PDAA EQU *-1 (FAMILY EST ORDINAL) 00955 M00S00923.pfu +++| RJM SDN SEARCH FOR DEVICE NUMBER 00956 M00S00924.pfu +++| PJN PDA1 IF DEVICE FOUND 00957 M00S00925.pfu +++| ERROR ECDNF PROCESS *DEVICE NOT FOUND* ERROR 00958 M00S00926.pfu +++| 00959 M00S00927.pfu +++| PDA1 RJM IRA INITIALIZE RANDOM ADDRESS PROCESSORS 00960 M00S00928.pfu +++| LDD FS+2 RESET TRACK 00961 M00S00929.pfu +++| STD T6 00962 M00S00930.pfu +++| 00963 M00S00931.pfu +++| PDA2 LDN 1 SET DIRECT ACCESS FILE FLAG 00964 M00S00932.pfu +++| STD DA
| Line S00933 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00965 M01S00933.ns22000 ---| LJM PDAX RETURN
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00966 M01S00012.ns22000 +++| UJN PDAX RETURN
| Line S00934 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00967 M01S00934.242l642 ---| RPP SPACE 4,20 00968 M01S00935.242l642 ---|** RPP - RECALL PP. 00969 M01S00936.242l642 ---|* 00970 M01S00937.242l642 ---|* ENTRY (IR - IR+4) = INPUT REGISTER. 00971 M01S00938.242l642 ---|* THIS ROUTINE IS ENTERED BY A JUMP RATHER THAN A RETURN 00972 M01S00939.242l642 ---|* JUMP AND EXITS TO PP RESIDENT. 00973 M01S00940.242l642 ---|* PP MUST HAVE BEEN CALLED WITH AUTO RECALL. 00974 M01S00941.242l642 ---|* 00975 M01S00942.242l642 ---|* EXIT TIMED RECALL REQUEST SET IN RECALL STACK. 00976 M01S00943.242l642 ---|* 00977 M01S00944.242l642 ---|* USES IR+1, CM - CM+4. 00978 M01S00945.242l642 ---|* 00979 M01S00946.242l642 ---|* MACROS MONITOR. 00980 M01S00947.242l642 ---| 00981 M01S00948.242l642 ---| 00982 M01S00949.242l642 ---| RPP LDD IR+1 SET AUTO RECALL FLAG 00983 M01S00950.242l642 ---| SCN 77 00984 M01S00951.242l642 ---| STD IR+1 00985 M01S00952.242l642 ---| LDN ZERL 00986 M01S00953.242l642 ---| CRD CM
| Line S00954 Modification History | |
|---|---|
M01 (Removed by) | pfu4 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00987 M02S00954.242l642 ---| LDN PTRF SET TIMED RECALL
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfu4 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00988 M02S00001.242l642 ---| LDN PTMF SET TIMED RECALL
| Line S00955 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00989 M01S00955.242l642 ---| STD CM+1 00990 M01S00956.242l642 ---| LDC 4*1000D SET TIME TO 4 SECONDS 00991 M01S00957.242l642 ---| STD CM+4 00992 M01S00958.242l642 ---| LDD MA 00993 M01S00959.242l642 ---| CWD IR 00994 M01S00960.242l642 ---| MONITOR RECM RECALL PP REQUEST 00995 M01S00961.242l642 ---| LJM PPR EXIT TO PP RESIDENT 00996 M00S00962.pfu ---| SAR SPACE 4,10 00997 M00S00963.pfu ---|** SAR - SET ABSOLUTE READ BUFFER ADDRESSES. 00998 M00S00964.pfu ---|* 00999 M00S00965.pfu ---|* ENTRY (RA) = CURRENT REFERENCE ADDRESS. 01000 M00S00966.pfu ---|* (FT - FT+1) = BUFFER FIRST. 01001 M00S00967.pfu ---|* (IR+3 - IR+4) = FET ADDRESS. 01002 M00S00968.pfu ---|* 01003 M00S00969.pfu ---|* EXIT (PR) = CURRENT REFERENCE ADDRESS. 01004 M00S00970.pfu ---|* ABSOLUTE READ BUFFER ADDRESSES SET. 01005 M00S00971.pfu ---|* 01006 M00S00972.pfu ---|* USES PR. 01007 M00S00973.pfu ---|* 01008 M00S00974.pfu ---|* MACROS FETA. 01009 M00S00975.pfu ---| 01010 M00S00976.pfu ---| 01011 M00S00977.pfu ---| SAR SUBR ENTRY/EXIT 01012 M00S00978.pfu ---| LDD RA SAVE CURRENT RA 01013 M00S00979.pfu ---| STD PR 01014 M00S00980.pfu ---| SHN 6 SET RA 01015 M00S00981.pfu ---| STM LDBE+1 01016 M00S00982.pfu ---| STM LDBF+1 01017 M00S00983.pfu ---| SHN -14 01018 M00S00984.pfu ---| LMC ADCI 01019 M00S00985.pfu ---| STM LDBE 01020 M00S00986.pfu ---| STM LDBF 01021 M00S00987.pfu ---| LDD FT SET RA+FIRST 01022 M00S00988.pfu ---| SHN 6 01023 M00S00989.pfu ---| ADD RA 01024 M00S00990.pfu ---| SHN 6 01025 M00S00991.pfu ---| ADD FT+1 01026 M00S00992.pfu ---| STM LDBG+1 01027 M00S00993.pfu ---| SHN -14 01028 M00S00994.pfu ---| LMC LDCI 01029 M00S00995.pfu ---| STM LDBG 01030 M00S00996.pfu ---| FETA FTIN SET RA+FET ADDRESS OF IN POINTER 01031 M00S00997.pfu ---| STM LDBL+1 01032 M00S00998.pfu ---| SHN -14 01033 M00S00999.pfu ---| LMC LDCI 01034 M00S01000.pfu ---| STM LDBL 01035 M00S01001.pfu ---| FETA FTOT SET RA+FET ADDRESS OF OUT POINTER 01036 M00S01002.pfu ---| STM LDBJ+1 01037 M00S01003.pfu ---| SHN -14 01038 M00S01004.pfu ---| LMC LDCI 01039 M00S01005.pfu ---| STM LDBJ 01040 M00S01006.pfu ---| LJM SARX RETURN 01041 M01S01007.242l642 ---| SAU SPACE 4,15 01042 M01S01008.242l642 ---|** SAU - SET *PFU* ACTIVE FLAG. 01043 M01S01009.242l642 ---|* 01044 M01S01010.242l642 ---|* ENTRY (P4 - P5) = *PFU* ACTIVE FLAG ADDRESS. 01045 M01S01011.242l642 ---|* 01046 M01S01012.242l642 ---|* EXIT (PFAF - PFAF+1) = *PFU* ACTIVE FLAG ADDRESS. 01047 M01S01013.242l642 ---|* *PFU* ACTIVE FLAG ADDRESS VALIDATED. 01048 M01S01014.242l642 ---|* *PFU* ACTIVE FLAG IN CENTRAL PROGRAM SET = 1. 01049 M01S01015.242l642 ---|* 01050 M01S01016.242l642 ---|* USES CM - CM+4. 01051 M01S01017.242l642 ---|* 01052 M01S01018.242l642 ---|* MACROS VADDR. 01053 M01S01019.242l642 ---| 01054 M01S01020.242l642 ---| 01055 M01S01021.242l642 ---| SAU SUBR ENTRY/EXIT 01056 M01S01022.242l642 ---| LDN ZERL SET FLAG WORD = 1 01057 M01S01023.242l642 ---| CRD CM 01058 M01S01024.242l642 ---| AOD CM+4 01059 M01S01025.242l642 ---| VADDR P4 VALIDATE FLAG ADDRESS 01060 M01S01026.242l642 ---| STM PFAF+1 SAVE FLAG ADDRESS 01061 M01S01027.242l642 ---| SHN -14 01062 M01S01028.242l642 ---| STM PFAF 01063 M01S01029.242l642 ---| SHN 6 FORM ABSOLUTE ADDRESS 01064 M01S01030.242l642 ---| ADD RA 01065 M01S01031.242l642 ---| SHN 6 01066 M01S01032.242l642 ---| ADD P5 01067 M01S01033.242l642 ---| CWD CM SET *PFU* ACTIVE FLAG 01068 M01S01034.242l642 ---| UJN SAUX RETURN 01069 M01S01035.242l642 ---| 01070 M01S01036.242l642 ---| PFAF BSSZ 2 *PFU* ACTIVE FLAG ADDRESS 01071 M00S01037.pfu ---| SBA SPACE 4,20 01072 M00S01038.pfu ---|** SBA - SET BUFFER ARGUMENTS. 01073 M00S01039.pfu ---|* 01074 M00S01040.pfu ---|* READ BUFFER POINTERS INTO DIRECT CELLS. 01075 M00S01041.pfu ---|* 01076 M00S01042.pfu ---|* ENTRY (IR+3 - IR+4) = FET ADDRESS. 01077 M00S01043.pfu ---|* 01078 M00S01044.pfu ---|* EXIT (FT - FT+1) = FIRST. 01079 M00S01045.pfu ---|* (IN - IN+1) = IN. 01080 M00S01046.pfu ---|* (OT - OT+1) = OUT. 01081 M00S01047.pfu ---|* (LM - LM+1) = LIMIT. 01082 M00S01048.pfu ---|* 01083 M00S01049.pfu ---|* USES CM - CM+4, FT - FT+1, IN - IN+1, LM - LM+1, OT - OT+1. 01084 M00S01050.pfu ---|* 01085 M00S01051.pfu ---|* MACROS FETA. 01086 M00S01052.pfu ---| 01087 M00S01053.pfu ---| 01088 M00S01054.pfu ---| SBA SUBR ENTRY/EXIT 01089 M00S01055.pfu ---| FETA FTLM READ LIMIT 01090 M00S01056.pfu ---| CRD LM-3 01091 M00S01057.pfu ---| SBN 1 READ OUT 01092 M00S01058.pfu ---| CRD OT-3 01093 M00S01059.pfu ---| SBN 1 READ IN 01094 M00S01060.pfu ---| CRD CM 01095 M00S01061.pfu ---| LDD CM+3 01096 M00S01062.pfu ---| STD IN 01097 M00S01063.pfu ---| LDD CM+4 01098 M00S01064.pfu ---| STD IN+1 01099 M00S01065.pfu ---| FETA FTFT READ FIRST 01100 M00S01066.pfu ---| CRD CM 01101 M00S01067.pfu ---| LDD CM+3 01102 M00S01068.pfu ---| LPN 77 01103 M00S01069.pfu ---| STD FT 01104 M00S01070.pfu ---| LDD CM+4 01105 M00S01071.pfu ---| STD FT+1 01106 M00S01072.pfu ---| UJN SBAX RETURN 01107 M00S01073.pfu ---| SCT SPACE 4,20 01108 M00S01074.pfu ---|** SCT - SET CATALOG TRACK. 01109 M00S01075.pfu ---|* 01110 M00S01076.pfu ---|* ENTRY (P1 - P5) = 24/,18/PFD,18/AUI. 01111 M00S01077.pfu ---|* PFD = ADDRESS OF PF DESCRIPTION WORD. 01112 M00S01078.pfu ---|* AUI = ADDRESS OF USER INDEX. 01113 M00S01079.pfu ---|*
| Line S01080 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01114 M01S01080.ns22000 ---|* EXIT (T5) = EQUIPMENT.
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01115 M01S00013.ns22000 +++|* EXIT (T5) = EST ORDINAL. 01116 M00S01081.pfu +++|* (T6) = TRACK. 01117 M00S01082.pfu +++|* (UI - UI+1) = USER INDEX. 01118 M00S01083.pfu +++|* ERROR EXIT TAKEN IF CATALOG TRACK NOT FOUND. 01119 M00S01084.pfu +++|* 01120 M00S01085.pfu +++|* USES CM - CM+4, UI - UI+1. 01121 M00S01086.pfu +++|* 01122 M00S01087.pfu +++|* CALLS SCA. 01123 M00S01088.pfu +++|* 01124 M00S01089.pfu +++|* MACROS ERROR, VADDR. 01125 M00S01090.pfu +++| 01126 M00S01091.pfu +++| 01127 M00S01092.pfu +++| SCT SUBR ENTRY/EXIT 01128 M00S01093.pfu +++| VADDR P3,LEFT GET ADDRESS OF PF DESCRIPTION 01129 M00S01094.pfu +++| SHN 14 FORM ABSOLUTE ADDRESS 01130 M00S01095.pfu +++| ADD RA 01131 M00S01096.pfu +++| SHN 6 01132 M00S01097.pfu +++| CRM SCTA,ON READ PF DESCRIPTION 01133 M00S01098.pfu +++| VADDR P4 GET ADDRESS OF USER INDEX 01134 M00S01099.pfu +++| SHN 14 FORM ABSOLUTE ADDRESS 01135 M00S01100.pfu +++| ADD RA 01136 M00S01101.pfu +++| SHN 6 01137 M00S01102.pfu +++| CRD CM READ USER INDEX 01138 M00S01103.pfu +++| LDD CM+3 01139 M00S01104.pfu +++| LPN 77 01140 M00S01105.pfu +++| STD UI 01141 M00S01106.pfu +++| LDD CM+4 01142 M00S01107.pfu +++| STD UI+1 01143 M00S01108.pfu +++| LDC SCTA SET CATALOG ADDRESS 01144 M00S01109.pfu +++| RJM SCA 01145 M00S01110.pfu +++| PJN SCTX IF CATALOG TRACK FOUND 01146 M00S01111.pfu +++| ERROR ECCNF PROCESS CATALOG NOT FOUND ERROR 01147 M00S01112.pfu +++| 01148 M00S01113.pfu +++| SCTA BSSZ 5 PF DESCRIPTION WORD STORAGE 01149 M00S01114.pfu +++| SFC SPACE 4,15 01150 M00S01115.pfu +++|** SFC - SET FILE COMPLETE. 01151 M00S01116.pfu +++|* 01152 M00S01117.pfu +++|* ENTRY (FS - FS+4) = FILE STATUS. 01153 M00S01118.pfu +++|* (FA) = FNT ADDRESS (0, IF FILE NOT SET BUSY). 01154 M00S01119.pfu +++|* 01155 M00S01120.pfu +++|* EXIT (FA) = 0. 01156 M00S01121.pfu +++|* (FS - FS+4) = COMPLETED FST ENTRY. 01157 M00S01122.pfu +++|* FILE STATUS SET COMPLETE AND WRITTEN TO CENTRAL. 01158 M00S01123.pfu +++|* 01159 M00S01124.pfu +++|* USES FA, FS+4. 01160 M00S01125.pfu +++|* 01161 M00S01126.pfu +++|* MACROS NFA. 01162 M00S01127.pfu +++| 01163 M00S01128.pfu +++| 01164 M00S01129.pfu +++| SFC SUBR ENTRY/EXIT 01165 M00S01130.pfu +++| AOD FS+4 SET STATUS COMPLETE 01166 M00S01131.pfu +++| LDD FA 01167 M00S01132.pfu +++| ZJN SFCX IF NO FST ADDRESS 01168 M00S01133.pfu +++| NFA FA,R WRITE FST 01169 M00S01134.pfu +++| ADN FSTL 01170 M00S01135.pfu +++| CWD FS 01171 M00S01136.pfu +++| LDN 0 CLEAR BUSY FILE INDICATION 01172 M00S01137.pfu +++| STD FA 01173 M00S01138.pfu +++| UJN SFCX RETURN 01174 M00S01139.pfu +++| SRR SPACE 4,10 01175 M00S01140.pfu +++|** SRR - SET RELATIVE READ BUFFER ADDRESSES. 01176 M00S01141.pfu +++|* 01177 M00S01142.pfu +++|* ENTRY (FT - FT+1) = BUFFER FIRST POINTER. 01178 M00S01143.pfu +++|* (LM - LM+1) = BUFFER LIMIT POINTER. 01179 M00S01144.pfu +++|* 01180 M00S01145.pfu +++|* EXIT RELATIVE READ BUFFER ADDRESSES SET. 01181 M00S01146.pfu +++| 01182 M00S01147.pfu +++| 01183 M00S01148.pfu +++| SRR SUBR ENTRY/EXIT 01184 M00S01149.pfu +++| LDD LM SET LIMIT-FIRST 01185 M00S01150.pfu +++| SBD FT 01186 M00S01151.pfu +++| SHN 14 01187 M00S01152.pfu +++| ADD LM+1 01188 M00S01153.pfu +++| SBD FT+1 01189 M00S01154.pfu +++| STM LDBA+1 01190 M00S01155.pfu +++| SHN -14 01191 M00S01156.pfu +++| LMC ADCI 01192 M00S01157.pfu +++| STM LDBA 01193 M00S01158.pfu +++| LDC ADCI+77 SET -LIMIT 01194 M00S01159.pfu +++| LMD LM 01195 M00S01160.pfu +++| STM LDBD 01196 M00S01161.pfu +++| STM LDBK 01197 M00S01162.pfu +++| LCN 0 01198 M00S01163.pfu +++| LMD LM+1 01199 M00S01164.pfu +++| STM LDBD+1 01200 M00S01165.pfu +++| STM LDBK+1 01201 M00S01166.pfu +++| LDD FT+1 SET FIRST 01202 M00S01167.pfu +++| STM LDBI+1 01203 M00S01168.pfu +++| LDD FT 01204 M00S01169.pfu +++| LMC ADCI 01205 M00S01170.pfu +++| STM LDBI 01206 M00S01171.pfu +++| LJM SRRX RETURN 01207 M00S01172.pfu +++| VCA SPACE 4,10 01208 M00S01173.pfu +++|** VCA - VALIDATE CENTRAL ADDRESS. 01209 M00S01174.pfu +++|* 01210 M00S01175.pfu +++|* ENTRY (A) = CENTRAL ADDRESS TO VALIDATE. 01211 M00S01176.pfu +++|* 01212 M00S01177.pfu +++|* EXIT (A) = 0 IF ADDR .LE. 1 OR ADDR .GE. FL (BAD ADDRESS). 01213 M00S01178.pfu +++|* (A) = CENTRAL ADDRESS IF VALID. 01214 M00S01179.pfu +++|* (T1 - T2) = CENTRAL ADDRESS (RIGHT JUSTIFIED). 01215 M00S01180.pfu +++|* 01216 M00S01181.pfu +++|* USES T1 - T2. 01217 M00S01182.pfu +++| 01218 M00S01183.pfu +++| 01219 M00S01184.pfu +++| VCA1 STD T1 CLEAR UPPER PART OF ADDRESS 01220 M00S01185.pfu +++| VCA2 LDN 0 SET BAD ADDRESS FLAG 01221 M00S01186.pfu +++| 01222 M00S01187.pfu +++| VCA SUBR ENTRY/EXIT 01223 M00S01188.pfu +++| STD T2 SAVE LOWER PART OF ADDRESS 01224 M00S01189.pfu +++| SCN 1 TEST FOR ADDRESS .LE. 1 01225 M00S01190.pfu +++| ZJN VCA1 IF ADDRESS .LE. 1 01226 M00S01191.pfu +++| SCN 77 SAVE UPPER PART OF ADDRESS 01227 M00S01192.pfu +++| SHN 6 01228 M00S01193.pfu +++| STD T1 01229 M00S01194.pfu +++| SHN 6 TEST FOR ADDRESS .GE. FL 01230 M00S01195.pfu +++| SBD FL 01231 M00S01196.pfu +++| PJN VCA2 IF ADDRESS .GE. FL 01232 M00S01197.pfu +++| LDD T1 RESTORE VALID ADDRESS 01233 M00S01198.pfu +++| SHN 14 01234 M00S01199.pfu +++| LMD T2 01235 M00S01200.pfu +++| UJN VCAX RETURN 01236 M00S01201.pfu +++| VME SPACE 4,15
| Line S01202 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01237 M01S01202.ns22000 ---|** VME - VALIDATE MASS STORAGE EQUIPMENT.
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01238 M01S00014.ns22000 +++|** VME - VALIDATE MASS STORAGE EST ORDINAL. 01239 M00S01203.pfu +++|*
| Line S01204 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01240 M01S01204.ns22000 ---|* ENTRY (A) = ADDRESS OF WORD CONTAINING EQUIPMENT NUMBER 01241 M01S01205.ns22000 ---|* (6/,6/EQ).
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01242 M01S00015.ns22000 +++|* ENTRY (A) = ADDRESS OF WORD CONTAINING EST ORDINAL. 01243 M00S01206.pfu +++|*
| Line S01207 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01244 M01S01207.ns22000 ---|* EXIT (T5) = EQUIPMENT NUMBER.
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01245 M01S00016.ns22000 +++|* EXIT (T5) = EST ORDINAL.
| Line S01208 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01246 M01S01208.ns22000 ---|* (CM - CM+4) = EST ENTRY FOR EQUIPMENT.
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01247 M02S00017.242l642 ---|* (CM - CM+4) = EST ENTRY FOR EST ORDINAL.
| Line S01209 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01248 M01S01209.ns22000 ---|* ERROR EXIT TAKEN IF EQUIPMENT NOT MASS STORAGE.
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01249 M01S00018.ns22000 +++|* ERROR EXIT TAKEN IF NOT MASS STORAGE. 01250 M00S01210.pfu +++|* 01251 M00S01211.pfu +++|* USES CM - CM+4, T1, T5. 01252 M00S01212.pfu +++|* 01253 M00S01213.pfu +++|* CALLS IRA. 01254 M00S01214.pfu +++|*
| Line S01215 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01255 M01S01215.ns22000 ---|* MACROS ERROR.
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01256 M02S00019.242l642 ---|* MACROS ERROR, SFA.
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01257 M01S00012.242l642 +++|* MACROS ERROR. 01258 M00S01216.pfu +++| 01259 M00S01217.pfu +++| 01260 M00S01218.pfu +++| VME1 RJM IRA INITIALIZE RANDOM ADDRESS PROCESSORS
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01261 M02S00020.242l642 ---| SFA EST,T5 READ EST ENTRY 01262 M02S00021.242l642 ---| ADK EQDE 01263 M02S00022.242l642 ---| CRD CM 01264 M00S01219.pfu ---| 01265 M00S01220.pfu ---| VME SUBR ENTRY/EXIT
| Line S01221 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01266 M01S01221.ns22000 ---| STD T1 GET EQUIPMENT NUMBER
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01267 M01S00023.ns22000 +++| STD T1 GET EST ORDINAL 01268 M00S01222.pfu +++| LDI T1 01269 M01S00024.ns22000 +++| LPC 777
| Line S01223 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01270 M01S01223.ns22000 ---| LPN 77 01271 M00S01224.pfu ---| STD T5 01272 M01S01225.ns22000 ---| ADM ESTS READ EST ENTRY
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01273 M01S00025.ns22000 +++| SFA EST READ EST ENTRY 01274 M01S00026.ns22000 +++| ADK EQDE 01275 M00S01226.pfu +++| CRD CM
| Line S01227 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01276 M01S01227.ns22000 ---| LDD CM CHECK IF MASS STORAGE EQUIPMENT
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01277 M01S00027.ns22000 +++| LDD CM CHECK IF MASS STORAGE 01278 M00S01228.pfu +++| SHN 21-13 01279 M00S01229.pfu +++| MJN VME1 IF MASS STORAGE DEVICE 01280 M00S01230.pfu +++| ERROR ECPAR PROCESS PARAMETER ERROR
| Line S01231 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01281 M01S01231.242l642 ---| WIF SPACE 4,10 01282 M01S01232.242l642 ---|** WIF - WRITE INTERLOCK FLAG. 01283 M01S01233.242l642 ---|* 01284 M01S01234.242l642 ---|* ENTRY (A) = 0 TO CLEAR INTERLOCK FLAG IN CENTRAL. 01285 M01S01235.242l642 ---|* 1 TO SET INTERLOCK FLAG IN CENTRAL. 01286 M01S01236.242l642 ---|* (P4 - P5) = 6/,18/INTF 01287 M01S01237.242l642 ---|* INTF = INTERLOCK FLAG ADDRESS. 01288 M01S01238.242l642 ---|* 01289 M01S01239.242l642 ---|* EXIT INTERLOCK FLAG WRITTEN AT *INTF*. 01290 M01S01240.242l642 ---|* 01291 M01S01241.242l642 ---|* USES T1, CM - CM+4. 01292 M01S01242.242l642 ---| 01293 M01S01243.242l642 ---| 01294 M01S01244.242l642 ---| WIF SUBR ENTRY/EXIT 01295 M01S01245.242l642 ---| STD T1 FORM FLAG WORD 01296 M01S01246.242l642 ---| LDN ZERL 01297 M01S01247.242l642 ---| CRD CM 01298 M01S01248.242l642 ---| LDD T1 01299 M01S01249.242l642 ---| STD CM+4 01300 M01S01250.242l642 ---| LDD P4 FORM ABSOLUTE INTERLOCK FLAG ADDRESS 01301 M01S01251.242l642 ---| LPN 77 01302 M01S01252.242l642 ---| SHN 6 01303 M01S01253.242l642 ---| ADD RA 01304 M01S01254.242l642 ---| SHN 6 01305 M01S01255.242l642 ---| ADD P5 01306 M01S01256.242l642 ---| CWD CM WRITE FLAG TO CENTRAL 01307 M01S01257.242l642 ---| UJN WIFX RETURN 01308 M00S01258.pfu ---| TITLE COMMON DECKS. 01309 M00S01259.pfu ---|* COMMON DECKS. 01310 M00S01260.pfu ---| 01311 M00S01261.pfu ---| 01312 M00S01262.pfu ---| IRA$ EQU 1 SELECT INITIALIZATION BY *COMPIRA* 01313 M00S01263.pfu ---|*CALL COMPCRA 01314 M00S01264.pfu ---|*CALL COMPSCA 01315 M00S01265.pfu ---|*CALL COMPSDN 01316 M00S01266.pfu ---| SEI$ EQU 1 SELECT *TRT* UPDATE CODE 01317 M00S01267.pfu ---|*CALL COMPSEI 01318 M00S01268.pfu ---|*CALL COMPSFB 01319 M00S01269.pfu ---|*CALL COMPSES 01320 M00S01270.pfu ---|*CALL COMPSNT 01321 M00S01271.pfu ---|*CALL COMPSRA 01322 M00S01272.pfu ---|*CALL COMPTGB 01323 M00S01273.pfu ---| 01324 M00S01274.pfu ---|* *COMPIRA* MUST FOLLOW ALL RANDOM PROCESSORS IT IS TO 01325 M00S01275.pfu ---|* INITIALIZE. 01326 M00S01276.pfu ---| 01327 M00S01277.pfu ---|*CALL COMPIRA 01328 M00S01278.pfu ---| SPACE 4,10 01329 M00S01279.pfu ---| USE LITERALS 01330 M00S01280.pfu ---| SPACE 4,10 01331 M00S01281.pfu ---|* OVERLAY ORIGIN ADDRESS. 01332 M00S01282.pfu ---| 01333 M00S01283.pfu ---| 01334 M00S01284.pfu ---| OVLA EQU *+5 OVERLAY ORIGIN ADDRESS 01335 M00S01285.pfu ---| SPACE 4,10 01336 M00S01286.pfu ---|* COMMON DECKS FOR FUNCTION PROCESSORS. 01337 M00S01287.pfu ---| 01338 M00S01288.pfu ---| 01339 M00S01289.pfu ---|*CALL COMPCRS 01340 M00S01290.pfu ---|*CALL COMPCTI 01341 M00S01291.pfu ---|*CALL COMPCUT
| Line S01292 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01342 M01S01292.ns22000 ---| FNT$ EQU 1 ENABLE GLOBAL FNT PROCESSING 01343 M00S01293.pfu ---| EJT$ EQU 1 ENABLE EJT PROCESSING
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01344 M01S00028.ns22000 +++| FNT$ EQU 1 ENABLE SYSTEM FNT PROCESSING 01345 M00S01294.pfu +++| IFP$ EQU 1 INITIALIZE FNT PROCESS 01346 M00S01295.pfu +++|*CALL COMPGFP 01347 M00S01296.pfu +++| RIS$ SET 0 PROVIDE FOR IAPF SYSTEM SECTOR PROCESSING 01348 M00S01297.pfu +++|*CALL COMPRSS 01349 M00S01298.pfu +++|*CALL COMPSTI 01350 M00S01299.pfu +++|*CALL COMPSUT 01351 M00S01300.pfu +++| OPN TITLE FUNCTION PROCESSORS (EXCEPT LOAD). 01352 M00S01301.pfu +++|*** OPN - OPEN FILE. 01353 M00S01302.pfu +++|* FUNCTION 00 - CTOP - NO WRITE LOCKOUT. 01354 M00S01303.pfu +++|* FUNCTION 01 - CTOL - WITH WRITE LOCKOUT. 01355 M00S01304.pfu +++|* 01356 M00S01305.pfu +++|* ENTRY (IR+2) = 0 FOR NO WRITE LOCKOUT. 01357 M00S01306.pfu +++|* = 1 FOR WRITE LOCKOUT. 01358 M00S01307.pfu +++|* (IR+3 - IR+4) = VALIDATED FET ADDRESS. 01359 M00S01308.pfu +++|* 01360 M00S01309.pfu +++|*T FET 42/ FILE NAME,18/
Figure FET
01361 M00S01310.pfu +++|*T FET+FTPM 60/ FST
Figure FET+FTP
Bitfield Rendering Failure ======== ========= ======= The field description [ { "name": " FST", "bits": M 60, "type": 1 } ] is invalid. Please check your syntax and try again.
01362 M00S01311.pfu +++|* 01363 M00S01312.pfu +++|* FST = FST FOR FILE. 01364 M00S01313.pfu +++|* 01365 M00S01314.pfu +++|* EXIT (FS - FS+4) = FST ENTRY FOR FILE. 01366 M00S01315.pfu +++|* (FA) = FNT ADDRESS OF FILE. 01367 M00S01316.pfu +++|* FNT/FST ENTRY CREATED FOR FILE. 01368 M00S01317.pfu +++|* ERROR EXIT TAKEN IF FILE ALREADY EXISTS. 01369 M00S01318.pfu +++|* 01370 M00S01319.pfu +++|*T FET+1 12/ EN,48/ UNCHANGED
Figure FET+1
01371 M00S01320.pfu +++|*T FET+FTLM 12/ FA,48/ UNCHANGED
Figure FET+FTL
Bitfield Rendering Failure ======== ========= ======= The field description [ { "name": " UNCHANGED", "bits": 48, "type": 2 }, { "name": " FA", "bits": M 12, "type": 1 } ] is invalid. Please check your syntax and try again.
01372 M00S01321.pfu +++|*
| Line S01322 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01373 M01S01322.ns22000 ---|* EN = EQUIPMENT MNEMONIC.
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01374 M01S00029.ns22000 +++|* EN = DEVICE MNEMONIC. 01375 M00S01323.pfu +++|* FA = FNT ADDRESS OF FILE. 01376 M00S01324.pfu +++|* 01377 M00S01325.pfu +++|* USES FA, T5, CM - CM+4, FN - FN+4, FS - FS+4. 01378 M00S01326.pfu +++|* 01379 M00S01327.pfu +++|* CALLS *0BF*. 01380 M00S01328.pfu +++|*
| Line S01329 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01381 M01S01329.ns22000 ---|* MACROS ERROR, EXECUTE, FETA, MONITOR, NFA.
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01382 M01S00030.ns22000 +++|* MACROS ERROR, EXECUTE, FETA, MONITOR, NFA, SFA. 01383 M00S01330.pfu +++| 01384 M00S01331.pfu +++| 01385 M00S01332.pfu +++| OPN SUBR ENTRY/EXIT 01386 M00S01333.pfu +++| FETA READ FILE NAME 01387 M00S01334.pfu +++| CRD FN 01388 M00S01335.pfu +++| LDD FN+3 01389 M00S01336.pfu +++| SCN 77 01390 M00S01337.pfu +++| ADD IR+2 01391 M00S01338.pfu +++| STD FN+3
| Line S01339 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01392 M01S01339.ns22000 ---| LDN NEEQ ASSIGN NULL EQUIPMENT
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01393 M01S00031.ns22000 +++| LDN NEEQ ASSIGN FILE TO NULL EQUIPMENT 01394 M00S01340.pfu +++| STD FS 01395 M00S01341.pfu +++| LDN 4 SELECT RETURN ON LOCAL FILE LIMIT 01396 M00S01342.pfu +++| STM OVL-1 01397 M00S01343.pfu +++| EXECUTE 0BF,OVL 01398 M00S01344.pfu +++| UJN OPN1 CHECK RETURN STATUS 01399 M00S01345.pfu +++| 01400 M00S01346.pfu +++| LDN 0 CLEAR BUSY FILE INDICATION 01401 M00S01347.pfu +++| STD FA 01402 M00S01348.pfu +++| ERROR ECDFN PROCESS *DUPLICATE FILE NAME* ERROR 01403 M00S01349.pfu +++| 01404 M00S01350.pfu +++| OPN1 ZJN OPN2 IF FNT ENTRY CREATED 01405 M00S01351.pfu +++| LDN FLET SET LOCAL FILE LIMIT ERROR FLAG 01406 M00S01352.pfu +++| STD CM+1 01407 M00S01353.pfu +++| MONITOR CEFM 01408 M00S01354.pfu +++| LJM OPNX RETURN 01409 M00S01355.pfu +++| 01410 M00S01356.pfu +++|* SET LIBRARY FILE TYPE. 01411 M00S01357.pfu +++| 01412 M00S01358.pfu +++| OPN2 LDD FN+4 SET LIBRARY FILE TYPE 01413 M00S01359.pfu +++| LPN 77
| Line S01360 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01414 M01S01360.ns22000 ---| LMC LIFT*100
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01415 M01S00032.ns22000 +++| ERRNZ LIFT-10 CANNOT USE DIRECT CELL *TH* 01416 M01S00033.ns22000 +++| LMD TH 01417 M00S01361.pfu +++| STD FN+4 STORE FILE TYPE 01418 M00S01362.pfu +++| 01419 M00S01363.pfu +++|* GET FST ENTRY. 01420 M00S01364.pfu +++| 01421 M00S01365.pfu +++| FETA FTPM GET FST ENTRY 01422 M00S01366.pfu +++| CRD FS 01423 M00S01367.pfu +++| LDD FS+4 FORCE STATUS BUSY 01424 M00S01368.pfu +++| SCN 1 01425 M00S01369.pfu +++| STD FS+4
| Line S01370 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01426 M01S01370.ns22000 ---| LDD FS SET EQUIPMENT
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01427 M01S00034.ns22000 +++| LDD FS SET EST ORDINAL
| Line S01371 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01428 M01S01371.ns22000 ---| LPN 77 01429 M00S01372.pfu ---| STD T5 01430 M00S01373.pfu ---| 01431 M00S01374.pfu ---|* WRITE FNT ENTRY. 01432 M00S01375.pfu ---| 01433 M00S01376.pfu ---| FETA FTLM SET FNT POINTER IN FET 01434 M00S01377.pfu ---| CRD CM 01435 M00S01378.pfu ---| LDD FA 01436 M00S01379.pfu ---| STD CM 01437 M00S01380.pfu ---| NFA FA,R 01438 M00S01381.pfu ---| CWD FN WRITE FNT ENTRY 01439 M00S01382.pfu ---| FETA FTLM 01440 M00S01383.pfu ---| CWD CM 01441 M00S01384.pfu ---| 01442 M01S01385.ns22000 ---|* SET EQUIPMENT TYPE.
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01443 M01S00035.ns22000 +++|* SET DEVICE TYPE. 01444 M00S01386.pfu +++|
| Line S01387 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01445 M01S01387.ns22000 ---| FETA 1 SET EQUIPMENT TYPE IN FET
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01446 M01S00036.ns22000 +++| FETA 1 SET DEVICE TYPE IN FET 01447 M00S01388.pfu +++| CRD FN
| Line S01389 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01448 M01S01389.ns22000 ---| LDM ESTS 01449 M01S01390.ns22000 ---| ADD T5
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01450 M01S00037.ns22000 +++| SFA EST,T5 01451 M01S00038.ns22000 +++| ADK EQDE 01452 M00S01391.pfu +++| CRD CM 01453 M00S01392.pfu +++| LDD CM+3
| Line S01393 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01454 M01S01393.252l678 ---| LPC 3777 01455 M00S01394.pfu ---| STD FN 01456 M00S01395.pfu ---| FETA 1 01457 M00S01396.pfu ---| CWD FN 01458 M00S01397.pfu ---| LJM OPNX RETURN 01459 M00S01398.pfu ---| ACF EJECT 01460 M00S01399.pfu ---|*** ACF - ADVANCE CATALOG FILE. 01461 M00S01400.pfu ---|* FUNCTION 02 - CTAC. 01462 M00S01401.pfu ---|* 01463 M00S01402.pfu ---|* ADVANCE POSITION OF CATALOG FILE TO NEXT TRACK IN CHAIN AND 01464 M00S01403.pfu ---|* ADVANCE CATALOG INTERLOCK IF SET. 01465 M00S01404.pfu ---|* 01466 M00S01405.pfu ---|* ENTRY (IR+3 - IR+4) = VALIDATED FET ADDRESS. 01467 M00S01406.pfu ---|* 01468 M00S01407.pfu ---|*T FET 42/ FILE NAME,18/
Figure FET
01469 M00S01408.pfu ---|* 01470 M00S01409.pfu ---|* EXIT (FS - FS+4) = UPDATED FST ENTRY FOR FILE. 01471 M00S01410.pfu ---|* (FA) = FNT ADDRESS.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01472 M01S00001.286l859 +++|* NEW CATALOG TRACK INTERLOCKED IF OLD CATALOG TRACK 01473 M01S00002.286l859 +++|* INTERLOCKED ON ENTRY. 01474 M00S01411.pfu +++|* ERROR EXIT TAKEN IF ERROR FLAG DETECTED WHILE
| Line S01412 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01475 M01S01412.286l859 ---|* ADVANCING CATALOG INTERLOCK.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01476 M01S00003.286l859 +++|* ADVANCING CATALOG INTERLOCK. 01477 M00S01413.pfu +++|*
| Line S01414 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01478 M01S01414.286l859 ---|* USES T6, FS - FS+4.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01479 M01S00004.286l859 +++|*T FET+FTPM 60/ FST
Figure FET+FTP
Bitfield Rendering Failure ======== ========= ======= The field description [ { "name": " FST", "bits": M 60, "type": 1 } ] is invalid. Please check your syntax and try again.
01480 M00S01415.pfu +++|*
| Line S01416 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01481 M01S01416.286l859 ---|* CALLS CTI, FFE, SNT, STI, VME.
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01482 M01S00005.286l859 +++|* FST = UPDATED FST ENTRY FOR FILE. 01483 M00S01417.pfu +++|*
| Line S01418 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01484 M01S01418.286l859 ---|* MACROS ERROR, FETA.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01485 M01S00006.286l859 +++|* USES T6. 01486 M01S00007.286l859 +++|* 01487 M01S00008.286l859 +++|* CALLS FFE, SNT, UCF, VME. 01488 M00S01419.pfu +++| 01489 M00S01420.pfu +++| 01490 M00S01421.pfu +++| ACF SUBR ENTRY/EXIT 01491 M00S01422.pfu +++| LDN 0 SELECT NORMAL PROCESSING 01492 M00S01423.pfu +++| RJM FFE FIND FNT ENTRY
| Line S01424 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01493 M01S01424.ns22000 ---| LDN FS ADDRESS OF EQUIPMENT NUMBER
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01494 M01S00039.ns22000 +++| LDN FS ADDRESS OF EST ORDINAL
| Line S01425 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01495 M01S01425.ns22000 ---| RJM VME VALIDATE THAT MASS STORAGE EQUIPMENT
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01496 M01S00040.ns22000 +++| RJM VME VALIDATE MASS STORAGE EST ORDINAL 01497 M00S01426.pfu +++| LDD FS+1 SET CURRENT CATALOG TRACK 01498 M00S01427.pfu +++| STD T6 01499 M00S01428.pfu +++| RJM SNT SET NEXT CATALOG TRACK 01500 M00S01429.pfu +++| STD T6
| Line S01430 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01501 M01S01430.286l859 ---| LDD FS+4 CHECK IF INTERLOCK SET 01502 M01S01431.286l859 ---| SHN 21-11 01503 M01S01432.286l859 ---| PJN ACF1 IF INTERLOCK NOT SET 01504 M01S01433.286l859 ---| LDD FS+1 CLEAR OLD TRACK INTERLOCK 01505 M01S01434.286l859 ---| RJM CTI 01506 M01S01435.286l859 ---| LDC -1000 CLEAR INTERLOCK FLAG IN FST 01507 M01S01436.286l859 ---| RAD FS+4 01508 M01S01437.286l859 ---| RJM STI SET NEW TRACK INTERLOCK 01509 M01S01438.286l859 ---| NJN ACF2 IF ERROR FLAG DETECTED 01510 M01S01439.286l859 ---| LDD TH SET INTERLOCK FLAG IN FST 01511 M01S01440.286l859 ---| RAD FS+4 01512 M01S01441.286l859 ---| ACF1 LDD T6 SET NEW CATALOG TRACK 01513 M01S01442.286l859 ---| STD FS+1 01514 M01S01443.286l859 ---| STD FS+2 REWIND CATALOG 01515 M01S01444.286l859 ---| LDN 0 01516 M01S01445.286l859 ---| STD FS+3 01517 M01S01446.286l859 ---| FETA FTPM WRITE FST TO FET 01518 M01S01447.286l859 ---| CWD FS 01519 M01S01448.286l859 ---| LJM ACFX RETURN 01520 M01S01449.286l859 ---| 01521 M01S01450.286l859 ---|* PROCESS *ERROR FLAG DETECTED*. 01522 M01S01451.286l859 ---| 01523 M01S01452.286l859 ---| ACF2 ERROR ECEFD PROCESS *ERROR FLAG DETECTED*
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01524 M01S00009.286l859 +++| RJM UCF UPDATE CATALOG FILE PARAMETERS 01525 M01S00010.286l859 +++| UJN ACFX RETURN 01526 M00S01453.pfu +++| RRD EJECT 01527 M00S01454.pfu +++|*** RRD - READ DATA LIST. 01528 M00S01455.pfu +++|* FUNCTION 03 - CTRL. 01529 M00S01456.pfu +++|* 01530 M00S01457.pfu +++|* READ LIST OF FILES FROM DISK TO CM BUFFER. 01531 M00S01458.pfu +++|* 01532 M00S01459.pfu +++|* ENTRY (IR+3 - IR+4) = VALIDATED FET ADDRESS. 01533 M00S01460.pfu +++|* 01534 M00S01461.pfu +++|*T FET 42/ DATA FILE NAME,18/
Figure FET
01535 M00S01462.pfu +++|*T FET+FTRE 12/ RF,12/ ME,12/ AD,24/ RL
Figure FET+FTR
Bitfield Rendering Failure ======== ========= ======= The field description [ { "name": " RL", "bits": 24, "type": 4 }, { "name": " AD", "bits": 12, "type": 3 }, { "name": " ME", "bits": 12, "type": 2 }, { "name": " RF", "bits": E 12, "type": 1 } ] is invalid. Please check your syntax and try again.
| Line S01463 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01536 M01S01463.286l859 ---|*T FET+FTDL 24/ DL,23/,1/ F,12/ EC
Figure FET+FTD
Bitfield Rendering Failure ======== ========= ======= The field description [ { "name": " EC", "bits": 12, "type": 4 }, { "name": " F", "bits": 1, "type": 3 }, { "name": "", "bits": 23, "type": 2 }, { "name": " DL", "bits": L 24, "type": 1 } ] is invalid. Please check your syntax and try again.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01537 M01S00011.286l859 +++|*T FET+FTDL 24/ DL,24/,12/ EC
Figure FET+FTD
Bitfield Rendering Failure ======== ========= ======= The field description [ { "name": " EC", "bits": 12, "type": 3 }, { "name": "", "bits": 24, "type": 2 }, { "name": " DL", "bits": L 24, "type": 1 } ] is invalid. Please check your syntax and try again.
| Line S01464 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01538 M01S01464.253l688 ---|*T FET+FTPM 12/ 4000+DN,12/ FE,36/
Figure FET+FTP
Bitfield Rendering Failure ======== ========= ======= The field description [ { "name": "", "bits": 36, "type": 3 }, { "name": " FE", "bits": 12, "type": 2 }, { "name": " 4000+DN", "bits": M 12, "type": 1 } ] is invalid. Please check your syntax and try again.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01539 M01S00001.253l688 +++|*T FET+FTPM 12/ 4000+DN,12/ FE,1/U,35/
Figure FET+FTP
Bitfield Rendering Failure ======== ========= ======= The field description [ { "name": "", "bits": 35, "type": 4 }, { "name": "U", "bits": 1, "type": 3 }, { "name": " FE", "bits": 12, "type": 2 }, { "name": " 4000+DN", "bits": M 12, "type": 1 } ] is invalid. Please check your syntax and try again.
01540 M00S01465.pfu +++|* 01541 M00S01466.pfu +++|* RF = RECALL FLAG. 01542 M00S01467.pfu +++|* 0 = NOT RECALL CALL (WHOLE WORD IS ZERO). 01543 M00S01468.pfu +++|* 7776 = RA+1 RECALL CALL WITH SYSTEM SECTOR 01544 M00S01469.pfu +++|* PROCESSING OUTSTANDING. 01545 M00S01470.pfu +++|* 7777 = RA+1 RECALL CALL.
| Line S01471 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01546 M01S01471.ns22000 ---|* ME = MASTER EQUIPMENT NUMBER.
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01547 M01S00041.ns22000 +++|* ME = MASTER DEVICE EST ORDINAL. 01548 M00S01472.pfu +++|* AD = ALTERNATE DEVICE NUMBER. 01549 M00S01473.pfu +++|* RL = REMAINING FILE LENGTH. 01550 M00S01474.pfu +++|* DL = DATA LIST ADDRESS.
| Line S01475 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01551 M01S01475.286l859 ---|* F = CATALOG ENTRY FORMAT CODE. 01552 M01S01476.286l859 ---|* 0 = 8 WORD FORMAT. 01553 M01S01477.286l859 ---|* 1 = 16 WORD FORMAT. 01554 M00S01478.pfu ---|* EC = ELEMENT COUNT OF DATA LIST. 01555 M00S01479.pfu ---|* DN = DEVICE NUMBER.
| Line S01480 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01556 M01S01480.ns22000 ---|* FE = FAMILY EQUIPMENT.
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01557 M01S00042.ns22000 +++|* FE = FAMILY EST ORDINAL.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01558 M01S00002.253l688 +++|* U = 0 IF NOT TO CHECK FILE BUSY IN UPDATE MODE. 01559 M01S00003.253l688 +++|* U = 1 IF TO CHECK FILE BUSY IN UPDATE MODE. 01560 M00S01481.pfu +++|*
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01561 M01S00012.286l859 +++|* EACH SECTOR READ IS PRECEDED BY A CONTROL WORD IN THE 01562 M01S00013.286l859 +++|* FOLLOWING FORMAT - 01563 M01S00014.286l859 +++|* 01564 M01S00015.286l859 +++|*T CW 12/ EF,12/ CT,12/ CS,12/ CB0,12/ CB1
Figure CW
01565 M01S00016.286l859 +++|* 01566 M01S00017.286l859 +++|* EF = ERROR FLAGS. 01567 M01S00018.286l859 +++|* FOR SYSTEM SECTOR - 10/ 0,1/S,1/Z,1/B 01568 M01S00019.286l859 +++|* S = ERROR IN SYSTEM SECTOR OR SYSTEM SECTOR READ ERROR. 01569 M01S00020.286l859 +++|* Z = ZERO LENGTH FILE. 01570 M01S00021.286l859 +++|* B = FILE BUSY. 01571 M01S00022.286l859 +++|* FOR DATA SECTOR - 10/ 0,1/R,1/F 01572 M01S00023.286l859 +++|* R = READ ERROR. 01573 M01S00024.286l859 +++|* F = FATAL READ ERROR. 01574 M01S00025.286l859 +++|* 0 = SECTOR OF BAD DATA TRANSFERRED. 01575 M01S00026.286l859 +++|* 1 = SECTOR DATA NOT TRANSFERRED AND READ TERMINATED 01576 M01S00027.286l859 +++|* WITH FORCED EOI. 01577 M01S00028.286l859 +++|* CT = CURRENT TRACK. 01578 M01S00029.286l859 +++|* CS = CURRENT SECTOR. 01579 M01S00030.286l859 +++|* CB0 = CURRENT SECTOR CONTROL BYTE 0. 01580 M01S00031.286l859 +++|* CB1 = CURRENT SECTOR CONTROL BYTE 1. 01581 M01S00032.286l859 +++|* 01582 M00S01482.pfu +++|* EXIT FILES SPECIFIED BY DATA LIST READ AND TRANSFERED TO
| Line S01483 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01583 M01S01483.286l859 ---|* CIRCULAR BUFFER.
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01584 M01S00033.286l859 +++|* CIRCULAR BUFFER. 01585 M00S01484.pfu +++|* ERROR EXIT TAKEN IF DEVICE NUMBER NOT SPECIFIED. 01586 M00S01485.pfu +++|* 01587 M00S01486.pfu +++|* USES CM - CM+4, DA, DN, FN - FN+4, FS - FS+4, LF - LF+1, 01588 M00S01487.pfu +++|* LL - LL+1, P2 - P4, OT - OT+1, T5 - T7. 01589 M00S01488.pfu +++|* 01590 M00S01489.pfu +++|* CALLS FFE, IRA, LDB, PDA, RFF, SBA, SDL, SRR, VME. 01591 M00S01490.pfu +++|* 01592 M00S01491.pfu +++|* MACROS ENDMS, ERROR, FETA, NFA, PAUSE, SETMS. 01593 M00S01492.pfu +++| 01594 M00S01493.pfu +++| 01595 M00S01494.pfu +++| RRD SUBR ENTRY/EXIT 01596 M00S01495.pfu +++| FETA FTRE CHECK RECALL STATUS WORD 01597 M00S01496.pfu +++| CRD CM 01598 M00S01497.pfu +++| LDD CM 01599 M00S01498.pfu +++| ZJN RRD1 IF NOT RECALL ENTRY 01600 M00S01499.pfu +++| LDN 2 SUPPRESS LIBRARY TYPE FILE CHECK 01601 M00S01500.pfu +++| RRD1 RJM FFE FIND FNT ENTRY 01602 M00S01501.pfu +++| LDN 0 CLEAR WORD COUNT REMAINING FOR FILE 01603 M00S01502.pfu +++| STD LL 01604 M00S01503.pfu +++| STD LL+1
| Line S01504 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01605 M01S01504.ns22000 ---| LDN FS ADDRESS OF EQUIPMENT NUMBER
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01606 M01S00043.ns22000 +++| LDN FS ADDRESS OF EST ORDINAL
| Line S01505 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01607 M01S01505.ns22000 ---| RJM VME VALIDATE THAT MASS STORAGE EQUIPMENT
| Line S00044 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01608 M01S00044.ns22000 +++| RJM VME VALIDATE MASS STORAGE EST ORDINAL
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | pfu8 |
Seq # *Modification Id* Act ----------------------------+ 01609 M01S00001.pfu8 +++| SETMS IO INSURE MASS STORAGE DRIVER LOADED 01610 M00S01506.pfu +++| FETA FTPM SET DEVICE NUMBER 01611 M00S01507.pfu +++| CRD CM 01612 M00S01508.pfu +++| LDD CM 01613 M00S01509.pfu +++| NJN RRD2 IF DEVICE NUMBER SPECIFIED 01614 M00S01510.pfu +++| ERROR ECNDS PROCESS *NO DEVICE SPECIFIED* 01615 M00S01511.pfu +++| 01616 M00S01512.pfu +++|* PRESET READ LIST LOOP. 01617 M00S01513.pfu +++| 01618 M00S01514.pfu +++| RRD2 LPN 77 SAVE DEVICE NUMBER 01619 M00S01515.pfu +++| STD DN
| Line S01516 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01620 M01S01516.ns22000 ---| LDD CM+1 SET FAMILY EQUIPMENT
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01621 M01S00045.ns22000 +++| LDD CM+1 SET FAMILY EST ORDINAL 01622 M00S01517.pfu +++| STM PDAA
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01623 M01S00004.253l688 +++| LDD CM+2 SET CHECK UPDATE MODE FLAG 01624 M01S00005.253l688 +++| SHN 3-13 01625 M01S00006.253l688 +++| LPN 10 01626 M01S00007.253l688 +++| RAM CDSA 01627 M00S01518.pfu +++| RJM SBA SET BUFFER ARGUMENTS 01628 M00S01519.pfu +++| LDN 0 CLEAR DIRECT ACCESS FLAG 01629 M00S01520.pfu +++| STM DLSA 01630 M00S01521.pfu +++| STD DA 01631 M00S01522.pfu +++| FETA FTDL READ DATA LIST PARAMETERS 01632 M00S01523.pfu +++| CRD CM 01633 M00S01524.pfu +++| LDD CM STORE DATA LIST ADDRESS 01634 M00S01525.pfu +++| STD P2 01635 M00S01526.pfu +++| LDD CM+1 01636 M00S01527.pfu +++| STD P3
| Line S01528 Modification History | |
|---|---|
M01 (Removed by) | 286l859 |
Seq # *Modification Id* Act ----------------------------+ 01637 M01S01528.286l859 ---| LDD CM+3 STORE CATALOG ENTRY FORMAT CODE 01638 M01S01529.286l859 ---| LPN 1 01639 M01S01530.286l859 ---| STM CFMT 01640 M00S01531.pfu ---| LDD CM+4 STORE NUMBER OF ELEMENTS 01641 M00S01532.pfu ---| STD P4
| Line S01533 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01642 M01S01533.242l642 ---| PAUSE PAUSE FOR STORAGE MOVE
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01643 M01S00013.242l642 +++| PAUSE NE 01644 M00S01534.pfu +++| RJM SRR SET RELATIVE READ BUFFER ADDRESSES 01645 M00S01535.pfu +++| 01646 M00S01536.pfu +++|* GET READ LIST ELEMENT. 01647 M00S01537.pfu +++| 01648 M00S01538.pfu +++| RRD3 LDN 0 CLEAR FIRST BYTE OF CONTROL WORD 01649 M00S01539.pfu +++| STM CWBA 01650 M00S01540.pfu +++| LDD P2 READ DATA LIST ELEMENT 01651 M00S01541.pfu +++| SHN 6 01652 M00S01542.pfu +++| ADD RA 01653 M00S01543.pfu +++| SHN 6 01654 M00S01544.pfu +++| ADD P3 01655 M00S01545.pfu +++| CRD CM 01656 M00S01546.pfu +++| AOD P3 INCREMENT DATA LIST ADDRESS 01657 M00S01547.pfu +++| SHN -14 01658 M00S01548.pfu +++| RAD P2 01659 M00S01549.pfu +++| FETA FTDW SET DATA LIST WORD IN FET 01660 M00S01550.pfu +++| CWD CM 01661 M00S01551.pfu +++| 01662 M00S01552.pfu +++|* CHECK FOR READ LIST RECALL CALL. 01663 M00S01553.pfu +++| 01664 M00S01554.pfu +++| FETA FTRE CHECK FOR RECALL ENTRY 01665 M00S01555.pfu +++| CRM RRDA,ON 01666 M00S01556.pfu +++| LDM RRDA 01667 M00S01557.pfu +++| ZJN RRD4 IF NOT RECALL ENTRY 01668 M00S01558.pfu +++| LJM RRD7 PROCESS RECALL ENTRY 01669 M00S01559.pfu +++| 01670 M00S01560.pfu +++| RRD4 LDD CM+1 SET FILE LENGTH
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/pfu.txt · Last modified: (external edit)