cdc:nos2.source:opl.opl871:deck:lfm
Deck LFM
48 Modifications
Listing Sections
- Deck LFM Start
- Deck LFM Part 1 (Line 1646)
- Deck LFM Part 2 (Line 2969)
- Deck LFM Part 3 (Line 4261)
- Deck LFM Part 4 (Line 5447)
- Deck LFM Part 5 (Line 6911)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.lfm +++| IDENT LFM,LFM 00002 M01S00002.lfm +++| PERIPH 00003 M01S00003.lfm +++| BASE MIXED 00004 M01S00004.lfm +++| SST 00005 M01S00005.lfm +++| EQV$ EQU 1 DEFINE NO EQUIPMENT CHECK FOR *COMPRSS*
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00006 M02S00006.242l642 ---| MSS$ EQU 1 DEFINE ERROR PROCESSING FOR *COMPRSS* 00007 M01S00001.242l642 +++| MSR$ EQU 1 DEFINE ERROR PROCESSING FOR *COMPRNS* 00008 M01S00007.lfm +++| QUAL$ EQU 1 DEFINE UNQUALIFIED COMMON DECKS 00009 M01S00008.lfm +++|*COMMENT LFM - LOCAL FILE MANAGER.
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00010 M02S00009.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1970. 00011 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00012 M01S00010.lfm +++| TITLE LFM - LOCAL FILE MANAGER. 00013 M01S00011.lfm +++| SPACE 4,10 00014 M01S00012.lfm +++|*** LFM - LOCAL FILE MANAGER. 00015 M01S00013.lfm +++|* G. R. MANSFIELD. 70/12/18. 00016 M01S00014.lfm +++|* M. S. CARTER. 76/06/24. 00017 M01S00015.lfm +++| SPACE 4,10 00018 M01S00016.lfm +++|*** LFM PERFORMS VARIOUS FILE MANAGING TASKS FOR A JOB. 00019 M01S00017.lfm +++| SPACE 4,10 00020 M01S00018.lfm +++|*** CALL.
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00021 M02S00019.ns22000 ---|* 00022 M01S00020.lfm +++|* 00023 M01S00021.lfm +++|*T, 18/ *LFM*, 1/1, 5/ , 12/ CODE, 6/ FP, 18/ FET
Figure
00024 M01S00022.lfm +++|* CODE FUNCTION CODE 00025 M01S00023.lfm +++|* FP FUNCTION PARAMETER - 00026 M01S00024.lfm +++|* FOR FUNCTION 3, FP = FILE STATUS. 00027 M01S00025.lfm +++|* FOR STATUS FUNCTION 13, FP=1, IF ADDITIONAL TAPE 00028 M01S00026.lfm +++|* INFORMATION IS REQUESTED. 00029 M01S00027.lfm +++|* FOR EQUIPMENT ASSIGMENT FUNCTIONS 14B, 15B AND 00030 M01S00028.lfm +++|* 26B, IF BIT 19 IS SET, NO DAYFILE MESSAGE 00031 M01S00029.lfm +++|* INDICATING THE EQUIPMENT ASSIGNED IS ISSUED. 00032 M01S00030.lfm +++|* FOR OPERATOR EQUIPMENT ASSIGNMENT FUNCTION 26B, 00033 M01S00031.lfm +++|* IF BIT 18 IS SET, OPERATOR TAPE ASSIGNMENT FOR 00034 M01S00032.lfm +++|* DUPLICATE *VSN* IS REQUIRED. 00035 M01S00033.lfm +++|* FOR FUNCTION 20B, FP = 0 TO ACCESS LIBRARY FILE, 00036 M01S00034.lfm +++|* FP = 1 IF *SYSTEM* FILE TO BE ASSIGNED. 00037 M01S00035.lfm +++|* FET ADDRESS OF FET 00038 M01S00036.lfm +++|* 00039 M01S00037.lfm +++|*T FET 42/ *FILE NAME*,17/,1/0
Figure FET
00040 M01S00038.lfm +++|*T 12/ EQ,3/,1/E,44/
Figure
00041 M01S00039.lfm +++|* EQ EQUIPMENT TYPE 00042 M01S00040.lfm +++|* E RETURN ERROR CODE 00043 M01S00041.lfm +++|* 00044 M01S00042.lfm +++|* RETURN. 00045 M01S00043.lfm +++|* 00046 M01S00044.lfm +++|*T FET 42/ *FILE NAME*,8/ EC,9/,1/1
Figure FET
00047 M01S00045.lfm +++|* EC ERROR CODE 00048 M01S00046.lfm +++| SPACE 4,10 00049 M01S00047.lfm +++|*** DAYFILE MESSAGES.
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00050 M02S00048.ns22000 ---|* 00051 M01S00049.lfm +++|*
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00052 M02S00050.v23l617 ---|* * LFM ILLEGAL REQUEST.* = *LFM* WAS CALLED WITHOUT
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00053 M02S00051.v23l617 ---|* AUTO RECALL OR WITH ILLEGAL FUNCTION CODE. 00054 M01S00001.v23l617 +++|* * LFM INCORRECT REQUEST.* = *LFM* WAS CALLED WITHOUT 00055 M01S00002.v23l617 +++|* AUTO RECALL OR WITH INCORRECT FUNCTION CODE. 00056 M01S00052.lfm +++|* 00057 M01S00001.lfm19 +++|* * COMMAND FILE ERROR.* = AN UNRECOVERABLE MASS STORAGE ERROR 00058 M01S00002.lfm19 +++|* OCCURRED ON THE JOBS COMMAND FILE. 00059 M01S00003.lfm19 +++|* 00060 M01S00053.lfm +++|* * DUPLICATE FILE NAME.* = FILE ALREADY EXISTS FOR USER JOB. 00061 M01S00054.lfm +++|* 00062 M01S00055.lfm +++|* * FILE EMPTY.* = FILE EXISTS BUT IS EMPTY. 00063 M01S00056.lfm +++|*
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00064 M02S00057.v23l617 ---|* * FILE NAME ERROR.* = FILE NAME CONTAINS ILLEGAL CHARACTERS 00065 M01S00003.v23l617 +++|* * FILE NAME ERROR.* = FILE NAME CONTAINS INCORRECT CHARACTERS 00066 M01S00058.lfm +++|* OR MORE THAN SEVEN CHARACTERS. 00067 M01S00059.lfm +++|* 00068 M01S00060.lfm +++|* * FILE NOT FOUND.* = REQUESTED FILE WAS NOT FOUND. 00069 M01S00061.lfm +++|*
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00070 M02S00062.v23l617 ---|* * ILLEGAL EQUIPMENT.* = USER SPECIFIED EQUIPMENT THAT DOES 00071 M01S00004.v23l617 +++|* * INCORRECT EQUIPMENT.* = USER SPECIFIED EQUIPMENT THAT DOES 00072 M01S00063.lfm +++|* NOT EXIST OR IS NOT ALLOWED. 00073 M01S00064.lfm +++|*
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00074 M02S00065.v23l617 ---|* * ILLEGAL FILE STATUS.* - FILE STATUS IS OUT OF RANGE OF 00075 M01S00005.v23l617 +++|* * INCORRECT FILE STATUS.* - FILE STATUS IS OUT OF RANGE OF 00076 M01S00066.lfm +++|* DEFINED VALUES. 00077 M01S00067.lfm +++|*
| Line S00068 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00078 M02S00068.v23l617 ---|* * ILLEGAL FILE TYPE.* = FILE WAS NOT CORRECT TYPE FOR 00079 M01S00006.v23l617 +++|* * INCORRECT FILE TYPE.* = FILE WAS NOT CORRECT TYPE FOR 00080 M01S00069.lfm +++|* FUNCTION. 00081 M01S00070.lfm +++|*
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | lfm2 |
Seq # *Modification Id* Act ----------------------------+ 00082 M02S00071.lfm2 ---|* * ILLEGAL FILE MODE.* = THE USER TRIED TO DISPOSE, MAKE
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | lfm2 |
Seq # *Modification Id* Act ----------------------------+ 00083 M02S00072.lfm2 ---|* COMMON, OR UNLOCK A FILE WHICH WAS IN EXECUTE-ONLY MODE.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | lfm2 |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00084 M02S00001.v23l617 ---|* * ILLEGAL FILE MODE.* = FUNCTION NOT ALLOWED ON 00085 M01S00007.v23l617 +++|* * INCORRECT FILE MODE.* = FUNCTION NOT ALLOWED ON 00086 M01S00002.lfm2 +++|* EXECUTE-ONLY FILE. 00087 M01S00073.lfm +++|*
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00088 M02S00074.v23l617 ---|* * ILLEGAL USER ACCESS.* = USER ATTEMPTED TO ACCESS SOMETHING
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00089 M02S00075.v23l617 ---|* WITHOUT REQUIRED VALIDATION. 00090 M01S00008.v23l617 +++|* * USER ACCESS NOT VALID.* = USER ATTEMPTED TO ACCESS 00091 M01S00009.v23l617 +++|* SOMETHING WITHOUT REQUIRED VALIDATION. 00092 M01S00001.ns22000 +++|* 00093 M01S00002.ns22000 +++|* * ACCESS LEVEL NOT VALID FOR FILE.* = *LFM* WAS CALLED BY 00094 M01S00003.ns22000 +++|* A USER WHO ATTEMPTED TO SET A FILE-S ACCESS LEVEL TO A 00095 M01S00004.ns22000 +++|* LEVEL NOT VALID FOR THAT USER, OR FOR THE EQUIPMENT UPON 00096 M01S00005.ns22000 +++|* WHICH THAT FILE RESIDED. 00097 M01S00076.lfm +++|*
| Line S00077 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00098 M02S00077.ns22000 ---|* * EQUIPMENT AVAILABLE.* = EQUIPMENT IS IN USE OR DOES NOT 00099 M01S00006.ns22000 +++|* * EQUIPMENT NOT AVAILABLE.* = EQUIPMENT IS IN USE OR DOES
| Line S00078 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00100 M02S00078.ns22000 ---|* NOT EXIST.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00101 M02S00007.242l642 ---|* NOT EXIST, OR NO EQUIPMENT WITH THE PROPER ACCESS LEVEL
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00102 M02S00008.242l642 ---|* CAN BE FOUND. 00103 M01S00002.242l642 +++|* NOT EXIST, NO EQUIPMENT WITH THE PROPER ACCESS LEVEL CAN 00104 M01S00003.242l642 +++|* BE FOUND, OR THE MASS STORAGE DEVICE ENCOUNTERED AN I/O 00105 M01S00004.242l642 +++|* ERROR. 00106 M01S00079.lfm +++|*
| Line S00080 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00107 M02S00080.ns22000 ---|* * NO MASS STORAGE AVAILABLE.* = ATTEMPT WAS MADE
| Line S00081 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00108 M02S00081.ns22000 ---|* TO RESERVE A TRACK FOR THE USER S NULL PRIMARY
| Line S00082 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00109 M02S00082.ns22000 ---|* FILE, WHICH THE SYSTEM COULD NOT HONOR. 00110 M01S00009.ns22000 +++|* * NO MASS STORAGE AVAILABLE.* = NO TRACKS COULD BE FOUND 00111 M01S00010.ns22000 +++|* OF THE CORRECT TYPE. 00112 M01S00083.lfm +++|* 00113 M01S00084.lfm +++|* * FET TOO SHORT.* = FET IS NOT LONG ENOUGH TO ACCOMPLISH 00114 M01S00085.lfm +++|* FUNCTION. 00115 M01S00086.lfm +++|* 00116 M01S00087.lfm +++|* * GETFNT TABLE TOO LARGE.* = TABLE USED BY GETFNT 00117 M01S00088.lfm +++|* FUNCTION EXTENDS OUTSIDE FIELD LENGTH. 00118 M01S00089.lfm +++|* 00119 M01S00090.lfm +++|* * ADDRESS OUT OF RANGE.* = SOME PORTION OF THE PARAMETER 00120 M01S00091.lfm +++|* BLOCK OR FET IS BEYOND THE USERS FIELD LENGTH. 00121 M01S00092.lfm +++|* 00122 M01S00093.lfm +++|* * PARAMETER BLOCK BUSY.* = COMPLETION BIT IS SET BEFORE 00123 M01S00094.lfm +++|* PROCESSING OF FUNCTION BEGINS. 00124 M01S00095.lfm +++|* 00125 M01S00096.lfm +++|* * I/O SEQUENCE ERROR.* = A REQUEST WAS MADE ON A BUSY FILE. 00126 M01S00097.lfm +++|*
| Line S00098 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00127 M02S00098.v23l617 ---|* * MAGNET NOT ACTIVE.* = NO UDT ADDRESS IN FST, OR MAGNET
| Line S00099 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00128 M02S00099.v23l617 ---|* NOT PRESENT. 00129 M01S00010.v23l617 +++|* * MAGNETIC TAPE SUBSYSTEM NOT ACTIVE.* = NO UDT ADDRESS 00130 M01S00011.v23l617 +++|* IN FST, OR MAGNET NOT PRESENT. 00131 M01S00100.lfm +++|* 00132 M01S00101.lfm +++|* * SYSTEM ERROR.* = LFM CANNOT COMPLETE THE REQUESTED LFM 00133 M01S00102.lfm +++|* FUNCTION BECAUSE THE CALLING PROGRAM HAS A *DMP=* ENTRY 00134 M01S00103.lfm +++|* POINT. 00135 M01S00104.lfm +++|*
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00136 M02S00105.v23l617 ---|* * ILLEGAL RANDOM ADDRESS.* = THE REQUESTED *LFM* 00137 M01S00012.v23l617 +++|* * INCORRECT RANDOM ADDRESS.* = THE REQUESTED *LFM* 00138 M01S00106.lfm +++|* FUNCTION SPECIFIED A CURRENT RANDOM ADDRESS OF ZERO. 00139 M01S00011.ns22000 +++|* 00140 M01S00012.ns22000 +++|* *XX, ASSIGNED TO FILENAM.* = *MSAL* DEVICE TYPE XX ASSIGNED. 00141 M01S00013.ns22000 +++|* 00142 M01S00014.ns22000 +++|* *TTXXX, ASSIGNED TO FILENAM.* = EST ORDINAL XXX WITH TYPE TT 00143 M01S00015.ns22000 +++|* WAS ASSIGNED. 00144 M01S00001.ns2236 +++| SPACE 4,10 00145 M01S00002.ns2236 +++|*** ACCOUNT DAYFILE MESSAGES. 00146 M01S00003.ns2236 +++|* 00147 M01S00004.ns2236 +++|* 00148 M01S00005.ns2236 +++|* *MFFI, FILENAME, LEVELNAME.* = AN INVALID ATTEMPT WAS MADE TO 00149 M01S00006.ns2236 +++|* CHANGE THE ACCESS LEVEL ON FILE FILENAME TO LEVEL LEVELNAME. 00150 M01S00107.lfm +++| SPACE 4,10 00151 M01S00108.lfm +++|*** OPERATOR MESSAGES. 00152 M01S00109.lfm +++|*
| Line S00110 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00153 M02S00110.ns22000 ---|*
| Line S00111 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00154 M02S00111.ns22000 ---|*
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2043 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00155 M02S00001.ns22000 ---|* *TRACK LIMIT EQXX.* = *LFM* IS WAITING FOR MASS STORAGE SPACE
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2043 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00156 M02S00002.ns22000 ---|* ON EQUIPMENT ORDINAL XX.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2043 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00157 M02S00003.ns22000 ---|*
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2043 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00158 M02S00004.ns22000 ---|* *TRACK LIMIT.* = *LFM* IS WAITING FOR MASS STORAGE SPACE. 00159 M01S00016.ns22000 +++|* * TRACK LIMIT.* = *LFM* IS WAITING FOR MASS STORAGE SPACE. 00160 M01S00017.ns22000 +++|* 00161 M01S00018.ns22000 +++|* *EQXXX, TRACK LIMIT.* = *LFM* IS WAITING FOR MASS STORAGE 00162 M01S00019.ns22000 +++|* SPACE ON EST ORDINAL XXX. 00163 M01S00005.ns2043 +++|* 00164 M01S00112.lfm +++|* *REQUEST NNNNNNN, EQ* = JOB IS REQUESTING ASSIGNMENT 00165 M01S00113.lfm +++|* OF EQUIPMENT TYPE *EQ* TO BE ASSIGNED TO FILE *NNNNNNN*. 00166 M01S00114.lfm +++| SPACE 4,10 00167 M01S00115.lfm +++|** ROUTINES CALLED. 00168 M01S00116.lfm +++|* 00169 M01S00117.lfm +++|* 00170 M01S00118.lfm +++|* 0BF - BEGIN FILE. 00171 M01S00119.lfm +++|* 0DF - DROP FILE. 00172 M01S00120.lfm +++| SPACE 4,10
| Line S00121 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00173 M02S00121.ns22000 ---|** NOTE - AN *MXFM* MONITOR FUNCTION TO HANG *LFM*
| Line S00122 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00174 M02S00122.ns22000 ---|* WILL OCCUR DURING *FILINFO* PROCESSING IF
| Line S00123 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00175 M02S00123.ns22000 ---|* UNRECOGNIZABLE FILE ACCESS MODE BITS OCCUR IN 00176 M01S00020.ns22000 +++|** NOTE - MONITOR FUNCTION *HNGM* WILL BE ISSUED IF *LFM*
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00177 M02S00021.v23l617 ---|* DETECTS AN INVALID FILE STATUS IN THE FNT WHEN PROCESSING A 00178 M01S00013.v23l617 +++|* DETECTS AN INCORRECT FILE STATUS IN THE FNT WHEN PROCESSING A 00179 M01S00022.ns22000 +++|* *FILINFO* REQUEST. 00180 M01S00124.lfm +++|* THE *FNT* ENTRY. 00181 M01S00125.lfm +++| SPACE 4 00182 M01S00126.lfm +++|** COMMON DECKS. 00183 M01S00127.lfm +++| 00184 M01S00128.lfm +++| 00185 M01S00129.lfm +++|*CALL COMPMAC 00186 M01S00130.lfm +++| LIST X 00187 M01S00131.lfm +++|*CALL COMSLFM 00188 M01S00132.lfm +++| LIST * 00189 M01S00133.lfm +++| SPACE 4 00190 M01S00134.lfm +++| ORG PPFW
| Line S00135 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00191 M02S00135.ns21000 ---|*CALL COMSRSX 00192 M01S00136.lfm +++| QUAL MTX 00193 M01S00137.lfm +++|*CALL COMSMTX 00194 M01S00138.lfm +++| QUAL * 00195 M01S00139.lfm +++|*CALL COMSEVT 00196 M01S00140.lfm +++|*CALL COMSLFD 00197 M01S00141.lfm +++|*CALL COMSCPS 00198 M01S00142.lfm +++|*CALL COMSJIO 00199 M01S00023.ns22000 +++|*CALL COMSMLS 00200 M01S00143.lfm +++|*CALL COMSMSP 00201 M01S00001.241l630 +++|*CALL COMSPFM 00202 M01S00002.241l630 +++|*CALL COMSSCD 00203 M01S00144.lfm +++|*CALL COMSPIM 00204 M01S00145.lfm +++|*CALL COMSSSD 00205 M01S00146.lfm +++|*CALL COMSSSE 00206 M01S00147.lfm +++|*CALL COMSSSJ 00207 M01S00148.lfm +++|*CALL COMSWEI 00208 M01S00149.lfm +++|*CALL COMSZOL 00209 M01S00150.lfm +++| SPACE 4 00210 M01S00151.lfm +++|**** DIRECT LOCATION ASSIGNMENTS. 00211 M01S00152.lfm +++| 00212 M01S00153.lfm +++| 00213 M01S00154.lfm +++| FS EQU 20 - 24 FST ENTRY (5 LOCATIONS)
| Line S00155 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00214 M02S00155.ns22000 ---| EQ EQU 25 EQUIPMENT NUMBER 00215 M01S00024.ns22000 +++| EQ EQU 25 EST ORDINAL 00216 M01S00025.ns22000 +++| AL EQU 26 ACCESS LEVEL 00217 M01S00156.lfm +++| FP EQU 27 FUNCTION PARAMETER 00218 M01S00157.lfm +++| CN EQU 30 - 34 CM WORD BUFFER (5 LOCATIONS) 00219 M01S00158.lfm +++| AB EQU CN FOR USE ON CALL TO *COMPCLD* 00220 M01S00159.lfm +++| RI EQU 35 - 36 RANDOM INDEX 00221 M01S00160.lfm +++| FF EQU 37 FET SPECIFIED FNT ADDRESS 00222 M01S00161.lfm +++| FN EQU 40 - 44 FILE NAME (5 LOCATIONS)
| Line S00162 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00223 M02S00162.v23l617 ---| UN EQU FN USER NUMBER (5 LOCATIONS) 00224 M01S00014.v23l617 +++| UN EQU FN USER NAME (5 LOCATIONS) 00225 M01S00163.lfm +++| FE EQU 45 FET LENGTH - 1 00226 M01S00164.lfm +++| LS EQU 46 LAST FET STATUS 00227 M01S00165.lfm +++| OC EQU 47 JOB ORIGIN CODE 00228 M01S00166.lfm +++| FA EQU 57 ADDRESS OF FNT ENTRY 00229 M01S00167.lfm +++| FT EQU 60 - 64 FNT POINTERS 00230 M01S00168.lfm +++| 00231 M01S00169.lfm +++|**** 00232 M01S00170.lfm +++| SPACE 4 00233 M01S00171.lfm +++|** ADDITIONAL DIRECT LOCATION ASSIGNMENTS DEFINED 00234 M01S00172.lfm +++|* LOCALLY TO OVERLAYS. 00235 M01S00173.lfm +++|* 00236 M01S00174.lfm +++|* UD = 60-64 - OVERLAY 3LB. 00237 M01S00175.lfm +++|* VS = 60-64 - OVERLAY 3LC. 00238 M01S00176.lfm +++|* SP = 60-64 - OVERLAY 3LF. 00239 M01S00015.v23l617 +++|* ST = 65 - OVERLAY 3LB. 00240 M01S00177.lfm +++|* CF = 65 - OVERLAY 3LE. 00241 M01S00178.lfm +++|* CB = 65 - OVERLAY 3LG. 00242 M01S00001.274l797 +++|* SX = 66 - OVERLAY 3LB. 00243 M01S00179.lfm +++|* WO = 66 - OVERLAY 3LE. 00244 M01S00180.lfm +++|* SB = 66-67 - OVERLAY 3LG. 00245 M01S00181.lfm +++| SPACE 4 00246 M01S00182.lfm +++|** ASSEMBLY CONSTANTS. 00247 M01S00183.lfm +++| 00248 M01S00184.lfm +++| 00249 M01S00185.lfm +++| DNFS EQU 200 DEFAULT NUMBER OF FILES - GETFNT FCN. 00250 M01S00186.lfm +++| CGNT EQU 10 FET PARAMETER WORD - GETFNT FCN. 00251 M01S00187.lfm +++| SPACE 4 00252 M01S00188.lfm +++|* OVERLAY CONTROL. 00253 M01S00189.lfm +++| 00254 M01S00190.lfm +++| 00255 M01S00191.lfm +++| .N SET 0 00256 M01S00192.lfm +++| OVLB MICRO 1,, 3L BASE OVERLAY NAME 00257 M01S00193.lfm +++| TITLE OVERLAY COMMUNICATION MACROS. 00258 M01S00194.lfm +++| OVERLAY SPACE 4 00259 M01S00195.lfm +++|** OVERLAY - GENERATE OVERLAY CONSTANTS. 00260 M01S00196.lfm +++|* 00261 M01S00197.lfm +++|* 00262 M01S00198.lfm +++|* OVERLAY (TEXT) 00263 M01S00199.lfm +++|* ENTRY *TEXT* = TEXT OF SUBTITLE. 00264 M01S00200.lfm +++| 00265 M01S00201.lfm +++| 00266 M01S00202.lfm +++| PURGMAC OVERLAY 00267 M01S00203.lfm +++| 00268 M01S00204.lfm +++| OVERLAY MACRO TEXT 00269 M01S00205.lfm +++| QUAL 00270 M01S00206.lfm +++| .N SET .N+1 00271 M01S00207.lfm +++| .M MICRO .N,1, ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789 00272 M01S00208.lfm +++| .O MICRO 1,3, "OVLB"".M" 00273 M01S00209.lfm +++| QUAL ".O" 00274 M01S00210.lfm +++| TTL LFM/".O" - TEXT 00275 M01S00211.lfm +++| TITLE 00276 M01S00212.lfm +++| IDENT ".O",OVL TEXT 00277 M01S00213.lfm +++|*COMMENT LFM - TEXT
| Line S00214 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00278 M02S00214.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1970. 00279 M01S00002.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00280 M01S00215.lfm +++| ORG OVL 00281 M01S00216.lfm +++| LJM * 00282 M01S00217.lfm +++| UJN *-2 00283 M01S00218.lfm +++| ENDM 00284 M01S00219.lfm +++| ENTRY SPACE 4 00285 M01S00220.lfm +++|** ENTRY - DEFINE OVERLAY ENTRY POINT. 00286 M01S00221.lfm +++|* 00287 M01S00222.lfm +++|* 00288 M01S00223.lfm +++|* ENTRY NAME 00289 M01S00224.lfm +++|* ENTRY *NAME* = NAME OF ENTRY ADDRESS. 00290 M01S00225.lfm +++| 00291 M01S00226.lfm +++| 00292 M01S00227.lfm +++| PURGMAC ENTRY 00293 M01S00228.lfm +++| 00294 M01S00229.lfm +++| ENTRY MACRO NAME 00295 M01S00230.lfm +++| QUAL 00296 M01S00231.lfm +++| NAME EQU *+1R".M"*10000 00297 M01S00232.lfm +++| QUAL ".O" 00298 M01S00233.lfm +++| ENDM 00299 M01S00003.241l630 +++| CSR SPACE 4,10 00300 M01S00004.241l630 +++|** CSR - DEFINE 24 BIT QUANTITY FROM 18 BIT EQUATE. 00301 M01S00005.241l630 +++|* 00302 M01S00006.241l630 +++|* CSR R 00303 M01S00007.241l630 +++|* 00304 M01S00008.241l630 +++|* *R* = VALUE TO BE EXPANDED TO 24 BITS. 00305 M01S00009.241l630 +++|* IF *R* = 0, 77777777B WILL BE STORED. 00306 M01S00010.241l630 +++| 00307 M01S00011.241l630 +++| CSR MACRO R 00308 M01S00012.241l630 +++| LOCAL N,O,P,Q 00309 M01S00013.241l630 +++| MACREF CSR 00310 M01S00014.241l630 +++| N SET R 00311 M01S00015.241l630 +++| IFNE R,0 00312 M01S00016.241l630 +++| O SET R/100B 00313 M01S00017.241l630 +++| P SET O*100B 00314 M01S00018.241l630 +++| Q SET R-P 00315 M01S00019.241l630 +++| CON O,Q*100B 00316 M01S00020.241l630 +++| ELSE 00317 M01S00021.241l630 +++| CON 7777B,7777B 00318 M01S00022.241l630 +++| ENDIF 00319 M01S00023.241l630 +++| CSR ENDM 00320 M01S00001.251l670 +++| TBLM SPACE 4,10 00321 M01S00002.251l670 +++|** TBLM - GENERATE LIST OF MASS STORAGE DEVICE MNEMONICS. 00322 M01S00003.251l670 +++|* 00323 M01S00004.251l670 +++|* TBLM EQ 00324 M01S00005.251l670 +++|* EQ = DEVICE MNEMONIC. 00325 M01S00006.251l670 +++| 00326 M01S00007.251l670 +++| 00327 M01S00008.251l670 +++| TBLM MACRO EQ 00328 M01S00009.251l670 +++| CON 2R_EQ 00329 M01S00010.251l670 +++| TBLM ENDM 00330 M01S00234.lfm +++| TITLE MAIN PROGRAM. 00331 M01S00235.lfm +++| LFM SPACE 4 00332 M01S00236.lfm +++|** LFM - MAIN PROGRAM. 00333 M01S00237.lfm +++| 00334 M01S00238.lfm +++| 00335 M01S00239.lfm +++| ORG PPFW 00336 M01S00240.lfm +++| LFM RJM PRS PRESET PROGRAM 00337 M01S00241.lfm +++| LFM1 LDC 0 00338 M01S00242.lfm +++| LFMA EQU *-1 (OVERLAY NAME) 00339 M01S00243.lfm +++| ZJN LFM2 IF NO OVERLAY REQUIRED 00340 M01S00244.lfm +++| LMC 2L"OVLB" LOAD OVERLAY 00341 M01S00245.lfm +++| RJM EXR 00342 M01S00246.lfm +++| LFM2 LJM * PROCESS REQUEST 00343 M01S00247.lfm +++| LFMB EQU *-1 00344 M01S00248.lfm +++|
| Line S00249 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00345 M02S00249.242l642 ---| LFMX AOD FS+4 SET FILE NOT BUSY
| Line S00250 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00346 M02S00250.242l642 ---| LDD FA STORE FST ENTRY
| Line S00251 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00347 M02S00251.242l642 ---| ZJN LFM3 IF NO FNT ENTRY
| Line S00252 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00348 M02S00252.242l642 ---| NFA FA,R
| Line S00253 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00349 M02S00253.242l642 ---| ADN FSTL
| Line S00254 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00350 M02S00254.242l642 ---| CWD FS 00351 M01S00005.242l642 +++| LFMX RJM SNB SET FILE(S) NOT BUSY 00352 M01S00255.lfm +++| LFM3 RJM SFS SET FILE STATUS
| Line S00256 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2171 |
Seq # *Modification Id* Act ----------------------------+ 00353 M02S00256.ns2171 ---|* UJN DPP DROP PP 00354 M01S00001.ns2171 +++| LDM DPPB CHECK FOR *UADM* DATA 00355 M01S00002.ns2171 +++| SHN 14 00356 M01S00003.ns2171 +++| ADM DPPB+1 00357 M01S00004.ns2171 +++| ZJN DPP IF NO DATA 00358 M01S00005.ns2171 +++| LDD MA ISSUE *UADM* FUNCTION 00359 M01S00006.ns2171 +++| CWM DPPA,ON 00360 M01S00007.ns2171 +++| LDN 1 00361 M01S00008.ns2171 +++| STD CM+1 00362 M01S00009.ns2171 +++| STD CM+2 00363 M01S00010.ns2171 +++| MONITOR UADM 00364 M01S00257.lfm +++| DPP SPACE 4,10 00365 M01S00258.lfm +++|** DPP - DROP PP. 00366 M01S00259.lfm +++| 00367 M01S00260.lfm +++| 00368 M01S00261.lfm +++| DPP MONITOR DPPM DROP PPU 00369 M01S00262.lfm +++| LJM PPR RETURN TO PP RESIDENT 00370 M01S00011.ns2171 +++| 00371 M01S00012.ns2171 +++|* *UADM* PARAMETER WORD. 00372 M01S00013.ns2171 +++| 00373 M01S00014.ns2171 +++| DPPA CON CDCS DECREMENT CONTROL POINT AREA 00374 M01S00015.ns2171 +++|* CON (CICS) INCREMENT CONTROL POINT AREA 00375 M01S00016.ns2171 +++| CON ACLW 00376 M01S00017.ns2171 +++| CON 0D*100+18D 00377 M01S00018.ns2171 +++| DPPB CON 0,0 00378 M01S00263.lfm +++| TITLE RESIDENT SUBROUTINES. 00379 M01S00264.lfm +++| CKE SPACE 4,10 00380 M01S00265.lfm +++|** CKE - CHECK ERROR PROCESSING. 00381 M01S00266.lfm +++|* 00382 M01S00267.lfm +++|* ENTRY (A) = ERROR CODE. 00383 M01S00268.lfm +++|* 00384 M01S00269.lfm +++|* EXIT (EQ) = ERROR CODE. 00385 M01S00270.lfm +++|* 00386 M01S00271.lfm +++|* USES CM - CM+4. 00387 M01S00272.lfm +++|*
| Line S00273 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00388 M02S00273.ns22000 ---|* CALLS CPA. 00389 M01S00026.ns22000 +++|* CALLS CPA, DRF. 00390 M01S00274.lfm +++| 00391 M01S00275.lfm +++| 00392 M01S00276.lfm +++| CKE SUBR ENTRY/EXIT 00393 M01S00277.lfm +++| STD EQ SAVE MESSAGE CODE 00394 M01S00278.lfm +++| ADN 1 SET FET ERROR CODE 00395 M01S00279.lfm +++| SHN 12 00396 M01S00280.lfm +++| STM SFSC 00397 M01S00281.lfm +++| SHN -14 00398 M01S00282.lfm +++| STM SFSB 00399 M01S00283.lfm +++| RJM CPA READ FIRST 00400 M01S00284.lfm +++| ADN 1 00401 M01S00285.lfm +++| CRD CM 00402 M01S00286.lfm +++| LDD CM+1 00403 M01S00287.lfm +++| SHN 21-8D 00404 M01S00288.lfm +++| PJN CKEX RETURN IF USER NOT PROCESSING ERROR 00405 M01S00289.lfm +++| LDD EQ
| Line S00290 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | lfm14 |
Seq # *Modification Id* Act ----------------------------+ 00406 M02S00290.lfm14 ---| LMN /ERR/IOE 00407 M01S00001.lfm14 +++| LMN /ERR/LNV 00408 M01S00002.lfm14 +++| ZJN CKEX IF ACCESS LEVEL NOT VALID FOR FILE 00409 M01S00003.lfm14 +++| LMN /ERR/IOE&/ERR/LNV 00410 M01S00291.lfm +++| ZJN CKEX IF I/O SEQUENCE ERROR
| Line S00292 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00411 M02S00292.ns22000 ---| LJM LFMX EXIT 00412 M01S00027.ns22000 +++| LMN /ERR/NMA&/ERR/IOE 00413 M01S00028.ns22000 +++| NJN CKE1 IF NOT TRACK LIMIT 00414 M01S00029.ns22000 +++| RJM DRF DROP FILE 00415 M01S00030.ns22000 +++| CKE1 LJM LFMX EXIT 00416 M01S00293.lfm +++| CLF SPACE 4,10 00417 M01S00294.lfm +++|** CLF - CREATE LOCAL FILE. 00418 M01S00295.lfm +++|*
| Line S00296 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00419 M02S00296.ns22000 ---|* ENTRY (EQ) = EQUIPMENT DEFINITION. 00420 M01S00031.ns22000 +++|* ENTRY (EQ) = EST ORDINAL. 00421 M01S00297.lfm +++|* (FN - FN+4) = FILE NAME. 00422 M01S00032.ns22000 +++|* (AL) = 8/, 1/ACCESS LEVEL FLAG, 3/ACCESS LEVEL. 00423 M01S00298.lfm +++|* 00424 M01S00299.lfm +++|* EXIT SEE *EFN*. 00425 M01S00300.lfm +++|* (FN+4) = *SSST* FILE STATUS CLEARED. 00426 M01S00301.lfm +++|* 00427 M01S00302.lfm +++|* CALLS EFN. 00428 M01S00303.lfm +++|* 00429 M01S00304.lfm +++|* MACROS NFA. 00430 M01S00305.lfm +++| 00431 M01S00306.lfm +++| 00432 M01S00307.lfm +++| CLF SUBR ENTRY/EXIT 00433 M01S00308.lfm +++| RJM EFN ENTER FILE 00434 M01S00309.lfm +++| LDD FN+4 CHECK FILE STATUS 00435 M01S00310.lfm +++| LPN 77 00436 M01S00311.lfm +++| LMN SSST 00437 M01S00312.lfm +++| NJN CLFX IF NOT SPECIAL SYSTEM FILE 00438 M01S00313.lfm +++| LCN SSST CLEAR SPECIAL SYSTEM FILE STATUS 00439 M01S00314.lfm +++| RAD FN+4 00440 M01S00315.lfm +++| NFA FA,R 00441 M01S00316.lfm +++| CWD FN 00442 M01S00317.lfm +++| UJN CLFX RETURN 00443 M01S00318.lfm +++| CPA SPACE 4,10 00444 M01S00319.lfm +++|** CPA - COMPUTE PARAMETER ADDRESS. 00445 M01S00320.lfm +++|* 00446 M01S00321.lfm +++|* ENTRY (IR+3 - IR+4) = RELATIVE PARAMETER ADDRESS. 00447 M01S00322.lfm +++|* 00448 M01S00323.lfm +++|* EXIT (A) = ABSOLUTE PARAMETER ADDRESS. 00449 M01S00324.lfm +++| 00450 M01S00325.lfm +++| 00451 M01S00326.lfm +++| CPA SUBR ENTRY/EXIT 00452 M01S00327.lfm +++| LDD IR+3 00453 M01S00328.lfm +++| LPN 37 00454 M01S00329.lfm +++| SHN 6 00455 M01S00330.lfm +++| ADD RA 00456 M01S00331.lfm +++| SHN 6 00457 M01S00332.lfm +++| ADD IR+4 00458 M01S00333.lfm +++| UJN CPAX RETURN 00459 M01S00334.lfm +++| DEQ SPACE 4,10 00460 M01S00335.lfm +++|** DEQ - DROP EQUIPMENT. 00461 M01S00336.lfm +++|* 00462 M01S00337.lfm +++|* ENTRY (EQ) = EST ORDINAL. 00463 M01S00338.lfm +++|* 00464 M01S00339.lfm +++|* USES T0, CM - CM+4. 00465 M01S00340.lfm +++|*
| Line S00341 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00466 M02S00341.ns22000 ---|* MACROS GEA, MONITOR. 00467 M01S00033.ns22000 +++|* MACROS MONITOR, SFA. 00468 M01S00342.lfm +++| 00469 M01S00343.lfm +++| 00470 M01S00344.lfm +++| DEQ SUBR ENTRY/EXIT 00471 M01S00345.lfm +++| LDD EQ READ EST ENTRY 00472 M01S00346.lfm +++| LPC 777 00473 M01S00347.lfm +++| STD T0 SAVE EST ORDINAL 00474 M01S00348.lfm +++| ZJN DEQX IF NO EQUIPMENT PRESENT
| Line S00349 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00475 M02S00349.ns22000 ---| ADM ESTS 00476 M01S00034.ns22000 +++| SFA EST 00477 M01S00035.ns22000 +++| ADK EQDE 00478 M01S00350.lfm +++| CRD CM 00479 M01S00351.lfm +++| LDD CM 00480 M01S00352.lfm +++| SHN 21-13 00481 M01S00353.lfm +++| MJN DEQX IF MASS STORAGE 00482 M01S00354.lfm +++| SHN 13-12 00483 M01S00355.lfm +++| PJN DEQ1 IF NOT ALLOCATABLE
| Line S00356 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00484 M02S00356.ns22000 ---| LDD T0
| Line S00357 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00485 M02S00357.ns22000 ---| GEA GET EAT ENTRY 00486 M01S00036.ns22000 +++| SFA EST,T0 CHECK EQUIPMENT ASSIGNMENT 00487 M01S00037.ns22000 +++| ADK EQAE 00488 M01S00358.lfm +++| CRD CM
| Line S00359 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00489 M02S00359.ns22000 ---| LDD CM+4 CHECK JOB ASSIGNMENT 00490 M01S00038.ns22000 +++| LDD CM+4 00491 M01S00360.lfm +++| ZJN DEQX IF NOT ASSIGNED 00492 M01S00361.lfm +++| DEQ1 LDD T0 00493 M01S00362.lfm +++| STD CM+1
| Line S00363 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00494 M02S00363.242l642 ---| LDN 0 RELEASE ACTIVE EQUIPMENT
| Line S00364 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00495 M02S00364.242l642 ---| STD CM+2 00496 M01S00365.lfm +++| MONITOR DEQM RELEASE EQUIPMENT 00497 M01S00366.lfm +++| UJN DEQX RETURN 00498 M01S00367.lfm +++| DRF SPACE 4,10 00499 M01S00368.lfm +++|** DRF - DROP FILE. 00500 M01S00369.lfm +++|* 00501 M01S00370.lfm +++|* ENTRY (FA) = RELATIVE ADDRESS OF FNT ENTRY IN NFL. 00502 M01S00371.lfm +++|*
| Line S00372 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00503 M02S00372.242l642 ---|* EXIT (FA) = 0. 00504 M01S00006.242l642 +++|* EXIT (A) = (FA) = 0. 00505 M01S00007.242l642 +++|* 00506 M01S00008.242l642 +++|* ERROR TO *EER3*. 00507 M01S00373.lfm +++|* 00508 M01S00374.lfm +++|* CALLS *0DF*. 00509 M01S00375.lfm +++|* 00510 M01S00376.lfm +++|* MACROS EXECUTE. 00511 M01S00377.lfm +++| 00512 M01S00378.lfm +++| 00513 M01S00379.lfm +++| DRF SUBR ENTRY/EXIT 00514 M01S00380.lfm +++| LDN 1 SET *UNLOAD* FILE FLAG FOR *0DF* 00515 M01S00381.lfm +++| STM OVL0 00516 M01S00382.lfm +++| EXECUTE 0DF,OVL0+1 DROP FILE
| Line S00383 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00517 M02S00383.242l642 ---| LDN 0 CLEAR FNT ADDRESS 00518 M01S00009.242l642 +++| NJN EER3 IF MASS STORAGE DEVICE INACCESSIBLE
| Line S00384 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00519 M02S00384.ns2358 ---| STD FA 00520 M01S00001.ns2358 +++|* STD FA 00521 M01S00385.lfm +++| UJN DRFX RETURN 00522 M01S00010.242l642 +++| EER SPACE 4,10 00523 M01S00011.242l642 +++|** EER - EVALUATE MASS STORAGE ERROR RETURN. 00524 M01S00012.242l642 +++|* 00525 M01S00013.242l642 +++|* ENTRY (A) = ERROR RESPONSE FROM DRIVER. 00526 M01S00014.242l642 +++|* (T5) = EST ORDINAL. 00527 M01S00015.242l642 +++|* 00528 M01S00016.242l642 +++|* USES IR+4. 00529 M01S00017.242l642 +++|* 00530 M01S00018.242l642 +++|* CALLS ERR, SNB, *1RJ*. 00531 M01S00019.242l642 +++|* 00532 M01S00020.242l642 +++|* MACROS EXECUTE, PAUSE. 00533 M01S00021.242l642 +++| 00534 M01S00022.242l642 +++| 00535 M01S00023.242l642 +++| EER PSN ENTRY 00536 M01S00024.242l642 +++| SHN 21-12 00537 M01S00025.242l642 +++| PJN EER2 IF ERROR RECOVERABLE 00538 M01S00026.242l642 +++| EER1 LDN /ERR/WEQ 00539 M01S00027.242l642 +++| LJM ERR PROCESS ERROR 00540 M01S00028.242l642 +++| 00541 M01S00029.242l642 +++| EER2 LDM MSD CHECK CALLER 00542 M01S00030.242l642 +++| SHN 21-13 00543 M01S00031.242l642 +++| PJN EER1 IF SUBSYSTEM 00544 M01S00032.242l642 +++| EER3 PAUSE 00545 M01S00033.242l642 +++| LDD CM+1 00546 M01S00034.242l642 +++| NJP LFMX IF ERROR FLAG SET 00547 M01S00035.242l642 +++| RJM SNB 00548 M01S00036.242l642 +++| LDD T5 SET EST ORDINAL 00549 M01S00037.242l642 +++| STD IR+4 00550 M01S00038.242l642 +++| EXECUTE 1RJ RECALL JOB 00551 M01S00386.lfm +++| EFN SPACE 4,20 00552 M01S00387.lfm +++|** EFN - ENTER FILE NAME. 00553 M01S00388.lfm +++|* 00554 M01S00389.lfm +++|* ENTRY (FN - FN+4) = FILE NAME.
| Line S00390 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00555 M02S00390.ns22000 ---|* (EQ) = EQUIPMENT NUMBER. 00556 M01S00039.ns22000 +++|* (AL) = 8/, 1/ACCESS LEVEL FLAG, 3/ACCESS LEVEL. 00557 M01S00040.ns22000 +++|* (EQ) = EST ORDINAL. 00558 M01S00391.lfm +++|* 00559 M01S00392.lfm +++|* EXIT (FA) = ADDRESS OF FNT ENTRY. 00560 M01S00393.lfm +++|* (FN - FN+4) = FNT ENTRY. 00561 M01S00394.lfm +++|* (FS - FS+4) = FST ENTRY. 00562 M01S00395.lfm +++|* TO *RSP* IF WAIT FOR NFL INCREASE TO CREATE 00563 M01S00396.lfm +++|* FNT ENTRY. 00564 M01S00397.lfm +++|* 00565 M01S00398.lfm +++|* ERROR EXIT TO *ERR* IF DUPLICATE FILE NAME OR 00566 M01S00399.lfm +++|* FILE NAME ERROR. 00567 M01S00400.lfm +++|* EQUIPMENT RELEASED IF FILE NAME ERROR. 00568 M01S00401.lfm +++|* 00569 M01S00402.lfm +++|* USES FA, FS. 00570 M01S00403.lfm +++|* 00571 M01S00404.lfm +++|* CALLS COE, DEQ, VFN, *0BF*. 00572 M01S00405.lfm +++|* 00573 M01S00406.lfm +++|* MACROS EXECUTE. 00574 M01S00407.lfm +++| 00575 M01S00408.lfm +++| 00576 M01S00409.lfm +++| EFN SUBR ENTRY/EXIT 00577 M01S00410.lfm +++| RJM VFN VERIFY FILE NAME 00578 M01S00411.lfm +++| NJN EFN1 IF NO ERROR 00579 M01S00412.lfm +++| RJM DEQ RELEASE EQUIPMENT 00580 M01S00413.lfm +++| LDN /ERR/FLN 00581 M01S00414.lfm +++| UJN EFN2 PROCESS ERROR 00582 M01S00415.lfm +++| 00583 M01S00416.lfm +++| EFN1 LDD EQ SET EQUIPMENT ASSIGNMENT 00584 M01S00417.lfm +++| STD FS
| Line S00418 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00585 M02S00418.ns22000 ---| LDN 2 RETURN TO ENTER PP STACK FOR NFL INCREASE 00586 M01S00041.ns22000 +++| LDD AL 00587 M01S00042.ns22000 +++| SHN 6 PASS FILE ACCESS LEVEL TO *0BF* 00588 M01S00043.ns22000 +++| ADN 2 RETURN TO ENTER PP STACK FOR NFL INCREASE 00589 M01S00419.lfm +++| STM OVL0 00590 M01S00420.lfm +++| EXECUTE 0BF,OVL0+1 00591 M01S00421.lfm +++| UJN EFN3 CHECK RETURN STATUS 00592 M01S00422.lfm +++| 00593 M01S00423.lfm +++|* DUPLICATE FILE FOUND. 00594 M01S00424.lfm +++| 00595 M01S00425.lfm +++| LDN 0 CLEAR FNT ADDRESS 00596 M01S00426.lfm +++| STD FA 00597 M01S00427.lfm +++| LDN /ERR/DFN DUPLICATE FILE NAME 00598 M01S00428.lfm +++| EFN2 UJN ERR PROCESS ERROR 00599 M01S00429.lfm +++| 00600 M01S00430.lfm +++| EFN3 ZJN EFNX IF FNT ENTRY CREATED 00601 M01S00431.lfm +++| RJM DEQ RELEASE EQUIPMENT 00602 M01S00432.lfm +++| LDC 0 00603 M01S00433.lfm +++| EFNA EQU *-1 00604 M01S00434.lfm +++| ZJN EFN4 IF NO OPERATOR ASSIGNED EQUIPMENT TO RESET 00605 M01S00435.lfm +++| RJM COE RESET OPERATOR ASSIGNED EQUIPMENT 00606 M01S00436.lfm +++| EFN4 LDN NFIR REASON CODE = NFL INCREASE PENDING 00607 M01S00437.lfm +++| LJM RSP ENTER PP RECALL STACK 00608 M01S00438.lfm +++| ABT SPACE 4,10 00609 M01S00439.lfm +++|** ABT - ABORT JOB. 00610 M01S00440.lfm +++|* 00611 M01S00441.lfm +++|* ENTRY (A) = ADDRESS OF MESSAGE. 00612 M01S00442.lfm +++|* 00613 M01S00443.lfm +++|* CALLS DFM. 00614 M01S00444.lfm +++|* 00615 M01S00445.lfm +++|* MACROS MONITOR. 00616 M01S00446.lfm +++| 00617 M01S00447.lfm +++| 00618 M01S00448.lfm +++| ABT RJM DFM ISSUE DAYFILE MESSAGE 00619 M01S00449.lfm +++| MONITOR ABTM 00620 M01S00450.lfm +++| LJM PPR RETURN TO PP RESIDENT 00621 M01S00451.lfm +++| CFL SPACE 4,10 00622 M01S00452.lfm +++|** CFL - CHECK FET LENGTH. 00623 M01S00453.lfm +++|* 00624 M01S00454.lfm +++|* ENTRY (A) = COMPLEMENT OF (MINIMUM LENGTH - 1). 00625 M01S00455.lfm +++|* (FE) = FET LENGTH - 1. 00626 M01S00456.lfm +++|* 00627 M01S00457.lfm +++|* EXIT TO *ERR*, IF ERROR. 00628 M01S00458.lfm +++| 00629 M01S00459.lfm +++| 00630 M01S00460.lfm +++| CFL SUBR ENTRY/EXIT 00631 M01S00461.lfm +++| ADD FE 00632 M01S00462.lfm +++| PJN CFLX IF FET LENGTH SUFFICIENT 00633 M01S00463.lfm +++| LDN /ERR/FTS * FET TOO SHORT.* 00634 M01S00464.lfm +++|* LJM ERR ABORT 00635 M01S00465.lfm +++| ERR SPACE 4,10 00636 M01S00466.lfm +++|** ERR - PROCESS ERROR. 00637 M01S00467.lfm +++|* 00638 M01S00468.lfm +++|* ENTRY (A) = ERROR CODE. 00639 M01S00469.lfm +++| 00640 M01S00470.lfm +++| 00641 M01S00471.lfm +++| ERR STD T0 00642 M01S00472.lfm +++| LMN /ERR/IOE 00643 M01S00473.lfm +++| NJN ERR1 IF NOT I/O SEQUENCE ERROR 00644 M01S00474.lfm +++| STD FA CLEAR FNT ADDRESS 00645 M01S00475.lfm +++| 00646 M01S00476.lfm +++| ERR1 LDD T0 00647 M01S00477.lfm +++| RJM CKE CHECK ERROR PROCESSING 00648 M01S00478.lfm +++| LDC ERP SET ERROR PROCESSOR ADDRESS 00649 M01S00479.lfm +++| STM LFMB 00650 M01S00480.lfm +++| SHN -14 SET OVERLAY NAME 00651 M01S00481.lfm +++| STM LFMA 00652 M01S00482.lfm +++| LJM LFM1 PROCESS ERROR 00653 M01S00483.lfm +++| RCL SPACE 4,15 00654 M01S00484.lfm +++|** RCL - RECALL *LFM*. 00655 M01S00485.lfm +++|* 00656 M01S00486.lfm +++|* ENTRY (A) = MESSAGE CODE. 00657 M01S00487.lfm +++|* (T7) = MESSAGE ADDRESS. 00658 M01S00488.lfm +++|* 00659 M01S00489.lfm +++|* EXIT TO *DPP* TO DROP PP. 00660 M01S00490.lfm +++|* TO *RSP* TO ENTER PP RECALL STACK. 00661 M01S00491.lfm +++|* 00662 M01S00492.lfm +++|* USES FS+4, CM - CM+4, CN - CN+4. 00663 M01S00493.lfm +++|*
| Line S00494 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2043 |
Seq # *Modification Id* Act ----------------------------+ 00664 M02S00494.ns2043 ---|* CALLS CKE, SPB. 00665 M01S00006.ns2043 +++|* CALLS CKE, DRF, SPB. 00666 M01S00495.lfm +++|*
| Line S00496 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2043 |
Seq # *Modification Id* Act ----------------------------+ 00667 M02S00496.ns2043 ---|* MACROS NFA. 00668 M01S00007.ns2043 +++|* MACROS MONITOR, NFA. 00669 M01S00497.lfm +++| 00670 M01S00498.lfm +++| 00671 M01S00499.lfm +++| RCL RJM CKE CHECK ERROR PROCESSING 00672 M01S00500.lfm +++| LDD T7 SET MESSAGE ADDRESS
| Line S00501 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2043 |
Seq # *Modification Id* Act ----------------------------+ 00673 M02S00501.ns2043 ---| ZJN RCL1 IF NO MESSAGE 00674 M01S00008.ns2043 +++| ZJN RCL2 IF NO MESSAGE 00675 M01S00502.lfm +++| STM RCLA 00676 M01S00009.ns2043 +++| LDD EQ 00677 M01S00010.ns2043 +++| LMN /ERR/NMA 00678 M01S00011.ns2043 +++| ZJN RCL1 IF TRACK LIMIT 00679 M01S00503.lfm +++| LDN 1 00680 M01S00504.lfm +++| RJM SPB SET PAUSE BIT
| Line S00505 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2043 |
Seq # *Modification Id* Act ----------------------------+ 00681 M02S00505.ns2043 ---| ADN MS2W-SNSW STORE CONSOLE MESSAGE 00682 M01S00012.ns2043 +++| RCL1 LDD CP STORE CONSOLE MESSAGE 00683 M01S00013.ns2043 +++| ADN MS2W 00684 M01S00506.lfm +++| CWM *,TR 00685 M01S00507.lfm +++| RCLA EQU *-1
| Line S00508 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2043 |
Seq # *Modification Id* Act ----------------------------+ 00686 M02S00508.ns2043 ---| RCL1 AOD FS+4 SET FILE STATUS NOT BUSY 00687 M01S00014.ns2043 +++| RCL2 AOD FS+4 SET FILE STATUS NOT BUSY 00688 M01S00509.lfm +++| LDD FA
| Line S00510 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2043 |
Seq # *Modification Id* Act ----------------------------+ 00689 M02S00510.ns2043 ---| ZJN RCL2 IF NO FNT ENTRY 00690 M01S00015.ns2043 +++| ZJN RCL3 IF NO FNT ENTRY 00691 M01S00511.lfm +++| NFA FA,R 00692 M01S00512.lfm +++| ADN FSTL 00693 M01S00513.lfm +++| CWD FS STORE FST ENTRY
| Line S00514 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2043 |
Seq # *Modification Id* Act ----------------------------+ 00694 M02S00514.ns2043 ---| RCL2 LDD CP CHECK FOR ERROR FLAGS 00695 M01S00016.ns2043 +++| RCL3 LDD CP CHECK FOR ERROR FLAGS 00696 M01S00515.lfm +++| ADN STSW 00697 M01S00516.lfm +++| CRD CM 00698 M01S00517.lfm +++| ADN SNSW-STSW 00699 M01S00518.lfm +++| CRD CN 00700 M01S00519.lfm +++| LDD CN+3
| Line S00520 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2043 |
Seq # *Modification Id* Act ----------------------------+ 00701 M02S00520.ns2043 ---| LPN 4 00702 M01S00017.ns2043 +++| LPN 10 00703 M01S00521.lfm +++| ADD CM+1
| Line S00522 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2043 |
Seq # *Modification Id* Act ----------------------------+ 00704 M02S00522.ns2043 ---| ZJN RCL3 IF NO ERROR FLAGS SET OR NO SUBSYSTEM IDLE 00705 M01S00018.ns2043 +++| ZJN RCL4 IF NO ERROR FLAGS SET OR NO SUBSYSTEM IDLE 00706 M01S00523.lfm +++| LJM DPP DROP PP AND EXIT TO PP RESIDENT 00707 M01S00524.lfm +++|
| Line S00525 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2043 |
Seq # *Modification Id* Act ----------------------------+ 00708 M02S00525.ns2043 ---| RCL3 LDN WEAR REASON CODE = WAIT EQUIPMENT ASSIGNMENT 00709 M01S00019.ns2043 +++| RCL4 LDD EQ 00710 M01S00020.ns2043 +++| LMN /ERR/NMA 00711 M01S00021.ns2043 +++| NJN RCL5 IF NOT TRACK LIMIT 00712 M01S00022.ns2043 +++| RJM DRF CLEAR FNT ENTRY 00713 M01S00023.ns2043 +++| LDN ZERL SET TRACK LIMIT EVENT 00714 M01S00024.ns2043 +++| CRD CM 00715 M01S00025.ns2043 +++| LDN TKLE 00716 M01S00026.ns2043 +++| STD CM+4 00717 M01S00027.ns2043 +++| MONITOR EATM 00718 M01S00028.ns2043 +++| LDN TRLR SET TRACK LIMIT REASON CODE 00719 M01S00029.ns2043 +++| UJN RSP ENTER PP RECALL STACK 00720 M01S00030.ns2043 +++| 00721 M01S00031.ns2043 +++| RCL5 LDN WEAR SET WAIT EQUIPMENT ASSIGNMENT REASON CODE 00722 M01S00526.lfm +++|* UJN RSP ENTER PP RECALL STACK 00723 M01S00527.lfm +++| RSP SPACE 4,10 00724 M01S00528.lfm +++|** RSP - RECALL STACK ENTRY PROCESSOR. 00725 M01S00529.lfm +++|* 00726 M01S00530.lfm +++|* ENTRY (A) = RECALL STACK REASON CODE. 00727 M01S00531.lfm +++|* (IR - IR+4) = PP CALL. 00728 M01S00532.lfm +++|* 00729 M01S00533.lfm +++|* EXIT TO *PPR*. 00730 M01S00534.lfm +++|* 00731 M01S00535.lfm +++|* USES CM - CM+5. 00732 M01S00536.lfm +++|* 00733 M01S00537.lfm +++|* MACROS MONITOR. 00734 M01S00538.lfm +++| 00735 M01S00539.lfm +++| 00736 M01S00540.lfm +++| RSP BSS 0 ENTRY 00737 M01S00541.lfm +++| STD CM 00738 M01S00542.lfm +++| LDN ZERL 00739 M01S00543.lfm +++| CRD CM+1 00740 M01S00544.lfm +++| LDD MA WRITE PP CALL 00741 M01S00545.lfm +++| CWD IR 00742 M01S00546.lfm +++| ADN 1 WRITE PARAMETER WORD 00743 M01S00547.lfm +++| CWD CM 00744 M01S00548.lfm +++| MONITOR RECM ENTER DEFAULT TIMED RECALL 00745 M01S00549.lfm +++| LJM PPR EXIT TO PP RESIDENT 00746 M01S00550.lfm +++| SFS SPACE 4,15 00747 M01S00551.lfm +++|** SFS - SET FILE STATUS. 00748 M01S00552.lfm +++|* 00749 M01S00553.lfm +++|* ENTRY (LS) = LAST FET STATUS. 00750 M01S00554.lfm +++|* (FN - FN+3) = FILE NAME FOR FET. 00751 M01S00555.lfm +++|* (IR+3 - IR+4) = FET ADDRESS. 00752 M01S00556.lfm +++|* (SFSB) = FET ERROR CODE (IF PERTINENT), SET BY *CKE*. 00753 M01S00557.lfm +++|* (SFSA) = RETURN FILE FUNCTION FLAG, SET BY *PRS*. 00754 M01S00558.lfm +++|* (SFSC) = FET ERROR CODE (IF PERTINENT), SET BY *CKE*. 00755 M01S00559.lfm +++|* 00756 M01S00560.lfm +++|* EXIT FET STATUS MADE *NOT BUSY* AND ERROR CODE FIELD SET. 00757 M01S00561.lfm +++|* 00758 M01S00562.lfm +++|* USES LS, FN+3, FN+4. 00759 M01S00563.lfm +++|* 00760 M01S00564.lfm +++|* CALLS CPA. 00761 M01S00565.lfm +++| 00762 M01S00566.lfm +++| 00763 M01S00567.lfm +++| SFS SUBR ENTRY/EXIT 00764 M01S00568.lfm +++| AOD LS MAKE FET NOT BUSY 00765 M01S00569.lfm +++| STD FN+4 00766 M01S00570.lfm +++| SFSA LDN 0 00767 M01S00571.lfm +++|* LDN 1 (RETURN FILE INFORMATION) 00768 M01S00572.lfm +++| NJN SFS1 IF RETURN FILE INFORMATION 00769 M01S00573.lfm +++| LDD FN+3 SET FET ERROR CODE FIELD 00770 M01S00574.lfm +++| SCN 77 00771 M01S00575.lfm +++| LMC 0 LEFT 6 BITS OF 8 BIT ERROR CODE FIELD 00772 M01S00576.lfm +++| SFSB EQU *-1 00773 M01S00577.lfm +++| STD FN+3 00774 M01S00578.lfm +++| LDC 0 00775 M01S00579.lfm +++| SFSC EQU *-1 00776 M01S00580.lfm +++| RAD FN+4 00777 M01S00581.lfm +++| SFS1 RJM CPA REWRITE FET+0 00778 M01S00582.lfm +++| CWD FN 00779 M01S00583.lfm +++| UJN SFSX RETURN 00780 M01S00584.lfm +++| SIF SPACE 4,15 00781 M01S00585.lfm +++|** SIF - SEARCH FOR AND INTERLOCK FILE. 00782 M01S00586.lfm +++|* 00783 M01S00587.lfm +++|* ENTRY (A) = INITIAL FNT ADDRESS FOR SEARCH. 00784 M01S00588.lfm +++|* (A) = 0, IF NO INITIAL FNT ADDRESS. 00785 M01S00589.lfm +++|* (FN - FN+4) = FILE NAME. 00786 M01S00590.lfm +++|* 00787 M01S00591.lfm +++|* EXIT FNT/FST FOR FILE SET BUSY, ELSE TO *ERR*. 00788 M01S00592.lfm +++|* (FA) = FNT ADDRESS IN NFL. 00789 M01S00593.lfm +++|* (CM - CM+4) = FNT WORD. 00790 M01S00594.lfm +++|* (FS - FS+4) = FST WORD. 00791 M01S00595.lfm +++|* 00792 M01S00596.lfm +++|* CALLS SAF, SFB. 00793 M01S00597.lfm +++| 00794 M01S00598.lfm +++| 00795 M01S00599.lfm +++| SIF SUBR ENTRY/EXIT 00796 M01S00600.lfm +++| RJM SAF SEARCH FOR ASSIGNED FILE 00797 M01S00601.lfm +++| ZJN SIF1 IF FILE NOT FOUND 00798 M01S00602.lfm +++| RJM SFB SET FILE BUSY 00799 M01S00603.lfm +++| ZJN SIFX IF FILE SET BUSY 00800 M01S00604.lfm +++| LDN /ERR/IOE&/ERR/FNF *I/O SEQUENCE ERROR* 00801 M01S00605.lfm +++| SIF1 LMN /ERR/FNF *FILE NOT FOUND* 00802 M01S00606.lfm +++| LJM ERR PROCESS ERROR 00803 M01S00039.242l642 +++| SNB SPACE 4,15 00804 M01S00040.242l642 +++|** SNB - SET FILE(S) NOT BUSY. 00805 M01S00041.242l642 +++|* 00806 M01S00042.242l642 +++|* ENTRY (FA) = FNT ADDRESS OF BUSY FILE. 00807 M01S00043.242l642 +++|* (FS - FS+4) = FST ENTRY OF FILE. 00808 M01S00044.242l642 +++|* (SNBA) = FNT ADDRESS OF SECOND FILE. 00809 M01S00045.242l642 +++|* = 0 IF NO SECOND FILE. 00810 M01S00046.242l642 +++|* 00811 M01S00047.242l642 +++|* EXIT (A) = (FA) = (SNBA) = 0. 00812 M01S00048.242l642 +++|* 00813 M01S00049.242l642 +++|* USES FA, FS - FS+4. 00814 M01S00050.242l642 +++|* 00815 M01S00051.242l642 +++|* MACROS NFA. 00816 M01S00052.242l642 +++| 00817 M01S00053.242l642 +++| 00818 M01S00054.242l642 +++| SNB SUBR ENTRY/EXIT 00819 M01S00055.242l642 +++| LDD FA 00820 M01S00056.242l642 +++| ZJN SNB1 IF ONE FILE NOT BUSY 00821 M01S00057.242l642 +++| AOD FS+4 00822 M01S00058.242l642 +++| NFA FA,R STORE FST ENTRY 00823 M01S00059.242l642 +++| ADN FSTL 00824 M01S00060.242l642 +++| CWD FS 00825 M01S00061.242l642 +++| SNB1 LDC 0 POSSIBLE SECOND FILE FNT ADDRESS 00826 M01S00062.242l642 +++| SNBA EQU *-1 00827 M01S00063.242l642 +++| STD FA 00828 M01S00064.242l642 +++| ZJN SNBX IF NO SECOND FILE 00829 M01S00065.242l642 +++| NFA FA,R 00830 M01S00066.242l642 +++| ADK FSTL 00831 M01S00067.242l642 +++| CRD FS 00832 M01S00068.242l642 +++| AOD FS+4 SET FILE NOT BUSY 00833 M01S00069.242l642 +++| NFA FA,R 00834 M01S00070.242l642 +++| ADK FSTL STORE FST INFORMATION 00835 M01S00071.242l642 +++| CWD FS 00836 M01S00072.242l642 +++| LDN 0 CLEAR FNT ADDRESS 00837 M01S00073.242l642 +++| STD FA 00838 M01S00074.242l642 +++| STM SNBA 00839 M01S00075.242l642 +++| UJP SNBX RETURN 00840 M01S00607.lfm +++| SPB SPACE 4,10 00841 M01S00608.lfm +++|** SPB - SET/CLEAR PAUSE BIT. 00842 M01S00609.lfm +++|* 00843 M01S00610.lfm +++|* ENTRY (A) = 0 CLEAR PAUSE BIT. 00844 M01S00611.lfm +++|* (A) = 1 SET PAUSE BIT. 00845 M01S00612.lfm +++|* 00846 M01S00613.lfm +++|* EXIT (A) = ADDRESS OF *SNSW* IN CP AREA. 00847 M01S00614.lfm +++|* (CM - CM+4) = *SNSW*. 00848 M01S00615.lfm +++|* 00849 M01S00616.lfm +++|* USES T1, CM - CM+4. 00850 M01S00617.lfm +++| 00851 M01S00618.lfm +++| 00852 M01S00619.lfm +++| SPB SUBR ENTRY/EXIT 00853 M01S00620.lfm +++| STD T1 SAVE PAUSE OPTION 00854 M01S00621.lfm +++| LDD CP READ SWITCH WORD 00855 M01S00622.lfm +++| ADN SNSW 00856 M01S00623.lfm +++| CRD CM 00857 M01S00624.lfm +++| LDD CM+3 SET/CLEAR PAUSE BIT 00858 M01S00625.lfm +++| SCN 1 00859 M01S00626.lfm +++| LMD T1 00860 M01S00627.lfm +++| STD CM+3 00861 M01S00628.lfm +++| LDD CP UPDATE SWITCH WORD 00862 M01S00629.lfm +++| ADN SNSW 00863 M01S00630.lfm +++| CWD CM 00864 M01S00631.lfm +++| UJN SPBX RETURN 00865 M01S00632.lfm +++| SVF SPACE 4,15 00866 M01S00633.lfm +++|** SVF - SEARCH FOR VSN ENTRY FILE. 00867 M01S00634.lfm +++|* 00868 M01S00635.lfm +++|* ENTRY (FN - FN+4) = FILE NAME 00869 M01S00636.lfm +++|* 00870 M01S00637.lfm +++|* EXIT (A) = 0 NO FILE FOUND OR VSN ENTRY FILE FOUND 00871 M01S00638.lfm +++|* (FA) = FNT ADDRESS. 00872 M01S00639.lfm +++|* (FS - FS+4) = FNT ENTRY. 00873 M01S00640.lfm +++|* 00874 M01S00641.lfm +++|* USES CM - CM+4. 00875 M01S00642.lfm +++|* 00876 M01S00643.lfm +++|* CALLS SAF. 00877 M01S00644.lfm +++|*
| Line S00645 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00878 M02S00645.ns22000 ---|* MACROS NFA. 00879 M01S00044.ns22000 +++|* MACROS NFA, SFA. 00880 M01S00646.lfm +++| 00881 M01S00647.lfm +++| 00882 M01S00648.lfm +++| SVF SUBR ENTRY/EXIT 00883 M01S00649.lfm +++| LDN 0 SET NO INITIAL FNT ADDRESS 00884 M01S00650.lfm +++| RJM SAF SEARCH FOR ASSIGNED FILE 00885 M01S00651.lfm +++| ZJN SVFX IF NO FILE 00886 M01S00652.lfm +++| NFA FA,R READ FST 00887 M01S00653.lfm +++| ADN FSTL 00888 M01S00654.lfm +++| CRD CM 00889 M01S00655.lfm +++| LDD CM CHECK EQUIPTMENT
| Line S00656 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00890 M02S00656.ns22000 ---| LPC 777
| Line S00657 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00891 M02S00657.ns22000 ---| ADM ESTS 00892 M01S00045.ns22000 +++| SFA EST 00893 M01S00046.ns22000 +++| ADK EQDE 00894 M01S00658.lfm +++| CRD CM READ EST ENTRY 00895 M01S00659.lfm +++| LDD CM+3
| Line S00660 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00896 M02S00660.252l678 ---| LPC 3777 00897 M01S00661.lfm +++| LMC 2RTE
| Line S00662 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00898 M02S00662.252l678 ---| NJN SVFX IF NOT *TE*
| Line S00663 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
M03 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00899 M03S00663.252l678 ---| LDN 0
| Line S00076 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00900 M02S00076.252l678 ---|* LDN 0 00901 M01S00664.lfm +++| UJN SVFX RETURN 00902 M01S00665.lfm +++| UPP SPACE 4,10 00903 M01S00666.lfm +++|** UPP - UPDATE PRIMARY FILE POINTERS. 00904 M01S00667.lfm +++|* 00905 M01S00668.lfm +++|* ENTRY (FA) = PRIMARY FILE FNT ADDRESS/OFFSET. 00906 M01S00669.lfm +++|* (FS - FS+4) = PRIMARY FILE FST ENTRY. 00907 M01S00670.lfm +++|* 00908 M01S00671.lfm +++|* USES CM - CM+4. 00909 M01S00672.lfm +++|* 00910 M01S00673.lfm +++|* MACROS SFA, MONITOR. 00911 M01S00674.lfm +++| 00912 M01S00675.lfm +++| 00913 M01S00676.lfm +++| UPP SUBR ENTRY/EXIT 00914 M01S00677.lfm +++| 00915 M01S00678.lfm +++|* UPDATE WORD *TFSW* OF THE CONTROL POINT AREA. 00916 M01S00679.lfm +++| 00917 M01S00680.lfm +++| LDD CP 00918 M01S00681.lfm +++| ADK TFSW 00919 M01S00682.lfm +++| CRD CM 00920 M01S00683.lfm +++| LDD FA 00921 M01S00684.lfm +++| STD CM+1 00922 M01S00685.lfm +++| LDD CP 00923 M01S00686.lfm +++| ADK TFSW 00924 M01S00687.lfm +++| CWD CM 00925 M01S00688.lfm +++| 00926 M01S00689.lfm +++|* UPDATE EJT ENTRY. 00927 M01S00690.lfm +++| 00928 M01S00691.lfm +++| LDD FS STORE EQUIPMENT IN *UTEM* PARAMETER BLOCK 00929 M01S00692.lfm +++| STM UPPA+3 00930 M01S00693.lfm +++| LDD FS+1 STORE TRACK IN *UTEM* PARAMETER BLOCK 00931 M01S00694.lfm +++| STM UPPA+4 00932 M01S00695.lfm +++| LDD MA 00933 M01S00696.lfm +++| CWM UPPA,ON 00934 M01S00697.lfm +++| SFA EJT,CM SET EJT ENTRY ADDRESS FOR *UTEM* 00935 M01S00698.lfm +++| STD CM+4 00936 M01S00699.lfm +++| SHN -14 00937 M01S00700.lfm +++| STD CM+3 00938 M01S00701.lfm +++| LDN 1 SET NUMBER OF PARAMETERS FOR *UTEM* 00939 M01S00702.lfm +++| STD CM+1 00940 M01S00703.lfm +++| MONITOR UTEM UPDATE EJT ENTRY 00941 M01S00704.lfm +++| UJN UPPX RETURN 00942 M01S00705.lfm +++| 00943 M01S00706.lfm +++| 00944 M01S00707.lfm +++| UPPA VFD 1/0,5/PRFE,6/24D *UTEM* PARAMETER BLOCK 00945 M01S00708.lfm +++| VFD 6/0,6/0 00946 M01S00709.lfm +++| CON 0,0,0 00947 M01S00710.lfm +++| SPACE 4,10 00948 M01S00711.lfm +++|** COMMON DECKS. 00949 M01S00712.lfm +++| 00950 M01S00713.lfm +++| 00951 M01S00047.ns22000 +++| QUAL COMPACS 00952 M01S00048.ns22000 +++|*CALL COMPACS 00953 M01S00049.ns22000 +++| QUAL *
| Line S00714 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00954 M02S00714.ns22000 ---| QFT$ EQU 0 DEFINE *COMPGFP* ACCESS TO QFT 00955 M01S00715.lfm +++| EJT$ EQU 0 DEFINE *COMPGFP* ACCESS TO EJT 00956 M01S00050.ns22000 +++| QFT$ EQU 0 DEFINE *COMPGFP* ACCESS TO QFT 00957 M01S00716.lfm +++| IFP$ EQU 0 GENERATE *IFP* REMOTE CODE 00958 M01S00717.lfm +++|*CALL COMPGFP 00959 M01S00718.lfm +++| SAF$ EQU 0 SET INITIAL FNT ADDRESS PROVIDED 00960 M01S00719.lfm +++|*CALL COMPSAF 00961 M01S00720.lfm +++|*CALL COMPSEI 00962 M01S00721.lfm +++|*CALL COMPSFB 00963 M01S00722.lfm +++|*CALL COMPSRA 00964 M01S00723.lfm +++|*CALL COMPVFN 00965 M01S00724.lfm +++| USE OVERLAY 00966 M01S00725.lfm +++| OVL EQU *+10 00967 M01S00726.lfm +++| TITLE SUBROUTINES WHICH MAY BE OVERLAID. 00968 M01S00727.lfm +++| PRS SPACE 4,20 00969 M01S00728.lfm +++|** PRS - PRESET PROGRAM. 00970 M01S00729.lfm +++|* 00971 M01S00730.lfm +++|* ENTRY (IR - IR+4) = INPUT REGISTER. 00972 M01S00731.lfm +++|*
| Line S00732 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00973 M02S00732.ns22000 ---|* EXIT (EQ) = 0. 00974 M01S00051.ns22000 +++|* EXIT (AL) = 0. 00975 M01S00052.ns22000 +++|* (EQ) = 0. 00976 M01S00733.lfm +++|* (FA) = 0. 00977 M01S00734.lfm +++|* (FE) = FET LENGTH - 1. 00978 M01S00735.lfm +++|* (FF) = FET SPECIFIED FNT ADDRESS. 00979 M01S00736.lfm +++|* (FP) = *LFM* FUNCTION CODE. 00980 M01S00737.lfm +++|* (LS) = LAST FET STATUS. 00981 M01S00738.lfm +++|* (OC) = ORIGIN CODE. 00982 M01S00739.lfm +++|* (IR+3 - IR+4) = FET ADDRESS. 00983 M01S00740.lfm +++|* (FN - FN+3) = FILE NAME. 00984 M01S00741.lfm +++|*
| Line S00742 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00985 M02S00742.v23l617 ---|* ERROR TO *ABT* IF ILLEGAL REQUEST OR INVALID ADDRESS. 00986 M01S00016.v23l617 +++|* ERROR TO *ABT* IF INCORRECT REQUEST OR INCORRECT ADDRESS. 00987 M01S00743.lfm +++|* 00988 M01S00744.lfm +++|* CALLS CPA, CRS, IFP. 00989 M01S00745.lfm +++|* 00990 M01S00746.lfm +++|* MACROS SFA. 00991 M01S00747.lfm +++| 00992 M01S00748.lfm +++| 00993 M01S00749.lfm +++| PRS SUBR ENTRY/EXIT 00994 M01S00750.lfm +++| RJM CRS CHECK RECALL STATUS 00995 M01S00751.lfm +++| NJN PRS1 IF CALLED WITH AUTO RECALL 00996 M01S00752.lfm +++| LJM PRS6 ISSUE ERROR 00997 M01S00753.lfm +++| 00998 M01S00754.lfm +++| PRS1 LDD IR+3 SAVE FUNCTION PARAMETER 00999 M01S00755.lfm +++| SHN -6 01000 M01S00756.lfm +++| STD FP 01001 M01S00757.lfm +++| RJM IFP INITIALIZE EJT ACCESS 01002 M01S00758.lfm +++| 01003 M01S00759.lfm +++|* CHECK FOR RETURN FILE INFORMATION FUNCTION. 01004 M01S00760.lfm +++| 01005 M01S00761.lfm +++| LDD IR+2 CHECK FUNCTION CODE 01006 M01S00762.lfm +++| SBN 32 01007 M01S00763.lfm +++| NJN PRS2 IF NOT RETURN FILE INFORMATION 01008 M01S00764.lfm +++| AOM SFSA 01009 M01S00765.lfm +++| RJM CPA READ PARAMETER BLOCK LENGTH 01010 M01S00766.lfm +++| CRD CM 01011 M01S00767.lfm +++| LDD CM+3 01012 M01S00768.lfm +++| LPN 77 01013 M01S00769.lfm +++| ZJN PRS3 IF NO LENGTH 01014 M01S00770.lfm +++| SBN 1 01015 M01S00771.lfm +++| UJN PRS3 SAVE LENGTH 01016 M01S00772.lfm +++| 01017 M01S00773.lfm +++|* CHECK IF FET IS CONTAINED IN FIELD LENGTH. 01018 M01S00774.lfm +++| 01019 M01S00775.lfm +++| PRS2 RJM CPA READ FET LENGTH 01020 M01S00776.lfm +++| ADN 1 01021 M01S00777.lfm +++| CRD CM 01022 M01S00778.lfm +++| LDD CM+3 01023 M01S00779.lfm +++| SHN -6 01024 M01S00780.lfm +++| ADN 5-1 01025 M01S00781.lfm +++| PRS3 STD FE SAVE FET LENGTH - 1 01026 M01S00782.lfm +++| LDD IR+3 01027 M01S00783.lfm +++| LPN 77 01028 M01S00784.lfm +++| SHN 14 01029 M01S00785.lfm +++| MJN PRS4 IF OUT OF RANGE 01030 M01S00786.lfm +++| LMD IR+4 01031 M01S00787.lfm +++| ADD FE 01032 M01S00788.lfm +++| SHN -6 01033 M01S00789.lfm +++| SBD FL 01034 M01S00790.lfm +++| MJN PRS5 IF FET CONTAINED IN FL 01035 M01S00791.lfm +++| PRS4 LDC AORM * ADDRESS OUT OF RANGE.* 01036 M01S00792.lfm +++| LJM ABT ABORT 01037 M01S00793.lfm +++| 01038 M01S00794.lfm +++|* CHECK FUNCTION CODE. 01039 M01S00795.lfm +++| 01040 M01S00796.lfm +++| PRS5 LDD IR+2 CHECK FUNCTION CODE 01041 M01S00797.lfm +++| SHN 1 01042 M01S00798.lfm +++| STD T7
| Line S00799 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01043 M02S00799.ns22000 ---| ADC -TFCNL
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | lfm24 |
Seq # *Modification Id* Act ----------------------------+ 01044 M02S00053.lfm24 ---| SBN TFCNL 01045 M01S00001.lfm24 +++| ADC -TFCNL 01046 M01S00800.lfm +++| MJN PRS7 IF LEGAL CODE
| Line S00801 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01047 M02S00801.v23l617 ---| PRS6 LDC ILRM * LFM ILLEGAL REQUEST.* 01048 M01S00017.v23l617 +++| PRS6 LDC ILRM * LFM INCORRECT REQUEST.* 01049 M01S00802.lfm +++| LJM ABT ABORT 01050 M01S00803.lfm +++| 01051 M01S00804.lfm +++| PRS7 LDD CP FETCH EJT ORDINAL 01052 M01S00805.lfm +++| ADN TFSW 01053 M01S00806.lfm +++| CRD CM 01054 M01S00807.lfm +++| SFA EJT,CM GET JOB ORIGIN TYPE FROM EJT ENTRY 01055 M01S00808.lfm +++| ADN SCLE 01056 M01S00809.lfm +++| CRD CM 01057 M01S00810.lfm +++| LDD CM SET JOB ORIGIN TYPE 01058 M01S00811.lfm +++| LPN 17 01059 M01S00812.lfm +++| STD OC 01060 M01S00813.lfm +++| LDM TFCN+1,T7 SET PROCESSOR ADDRESS 01061 M01S00814.lfm +++| STM LFMB 01062 M01S00815.lfm +++| ZJN PRS6 IF NOT DEFINED 01063 M01S00816.lfm +++| 01064 M01S00817.lfm +++|* SET OVERLAY NAME. 01065 M01S00818.lfm +++| 01066 M01S00819.lfm +++| LDM TFCN,T7 01067 M01S00820.lfm +++| LPN 77 01068 M01S00821.lfm +++| STM LFMA 01069 M01S00822.lfm +++| RJM CPA 01070 M01S00823.lfm +++| ADN 4 01071 M01S00824.lfm +++| CRD CM 01072 M01S00825.lfm +++| LDD CM 01073 M01S00826.lfm +++| STD FF 01074 M01S00827.lfm +++| RJM CPA READ FILE NAME 01075 M01S00828.lfm +++| CRD FN 01076 M01S00829.lfm +++| LDD FN+4 SAVE LAST FET STATUS 01077 M01S00830.lfm +++| LPC 1776 01078 M01S00831.lfm +++| STD LS 01079 M01S00832.lfm +++| STD FN+4 01080 M01S00833.lfm +++| LDD FN+3 CLEAR ERROR CODES 01081 M01S00834.lfm +++| SCN 77 01082 M01S00835.lfm +++| STD FN+3 01083 M01S00836.lfm +++| LDN 0 CLEAR FNT ADDRESS 01084 M01S00837.lfm +++| STD FA
| Line S00838 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01085 M02S00838.ns22000 ---| STD EQ CLEAR EQUIPMENT NUMBER 01086 M01S00054.ns22000 +++| STD EQ CLEAR EST ORDINAL 01087 M01S00055.ns22000 +++| STD AL CLEAR ACCESS LEVEL 01088 M01S00839.lfm +++| LJM PRSX RETURN 01089 M01S00840.lfm +++| 01090 M01S00841.lfm +++| AORM DATA C* ADDRESS OUT OF RANGE.* 01091 M01S00842.lfm +++|
| Line S00843 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01092 M02S00843.v23l617 ---| ILRM DATA C* LFM ILLEGAL REQUEST.* 01093 M01S00018.v23l617 +++| ILRM DATA C* LFM INCORRECT REQUEST.* 01094 M01S00844.lfm +++| CRX SPACE 4,10 01095 M01S00845.lfm +++|** CRX - CHECK RESEX CALL. 01096 M01S00846.lfm +++|* 01097 M01S00847.lfm +++|* EXIT RETURNS IF NOT CALLED. 01098 M01S00848.lfm +++|* ABORTS IF RESEX DETECTED ERRORS. 01099 M01S00849.lfm +++|* TERMINATES LFM IF CALL COMPLETED NORMALLY. 01100 M01S00850.lfm +++|* 01101 M01S00851.lfm +++|* USES T1, CM - CM+4, CN - CN+4. 01102 M01S00852.lfm +++| 01103 M01S00853.lfm +++| 01104 M01S00854.lfm +++| CRX SUBR ENTRY/EXIT 01105 M01S00855.lfm +++| LDD CP READ SPCW 01106 M01S00856.lfm +++| ADC SPCW 01107 M01S00857.lfm +++| CRD CM 01108 M01S00858.lfm +++| LDD CM+2 CHECK RETURN STATUS 01109 M01S00859.lfm +++| ZJN CRXX IF RESEX NOT CALLED 01110 M01S00860.lfm +++| SCN 1 01111 M01S00861.lfm +++| STD T1 01112 M01S00862.lfm +++| LDN ZERL 01113 M01S00863.lfm +++| CRD CN 01114 M01S00864.lfm +++| LDD CP 01115 M01S00865.lfm +++| ADC SPCW 01116 M01S00866.lfm +++| CWD CN CLEAR SPCW 01117 M01S00867.lfm +++| LDD T1 01118 M01S00868.lfm +++| NJN CRX1 IF ERRORS FROM RESEX 01119 M01S00869.lfm +++| LJM LFMX EXIT 01120 M01S00870.lfm +++| 01121 M01S00871.lfm +++| CRX1 LDN /ERR/RDE * RESEX DETECTED ERRORS.* 01122 M01S00872.lfm +++| LJM ERR PROCESS ERROR 01123 M01S00873.lfm +++| FCN SPACE 4,10 01124 M01S00874.lfm +++|** FCN - DEFINE FUNCTION PROCESSOR. 01125 M01S00875.lfm +++|* 01126 M01S00876.lfm +++|*
| Line S00877 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | lfm24 |
Seq # *Modification Id* Act ----------------------------+ 01127 M02S00877.lfm24 ---|* FCN NAME 01128 M01S00002.lfm24 +++|* FCN NAME,ORD 01129 M01S00878.lfm +++|* 01130 M01S00879.lfm +++|* ENTRY *NAME* = NAME OF FUNCTION PROCESSOR. 01131 M01S00003.lfm24 +++|* *ORD* = REQUIRED FUNCTION ORDINAL, IF ORDINAL MUST 01132 M01S00004.lfm24 +++|* REMAIN A PARTICULAR VALUE. AN ASSEMBLY ERROR 01133 M01S00005.lfm24 +++|* WILL OCCUR IF THE ORDINAL ASSEMBLED DOES NOT 01134 M01S00006.lfm24 +++|* AGREE WITH THE SPECIFIED *ORD* VALUE. 01135 M01S00880.lfm +++| 01136 M01S00881.lfm +++| 01137 M01S00882.lfm +++| NOREF .I 01138 M01S00883.lfm +++| .I SET 0
| Line S00884 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | lfm24 |
Seq # *Modification Id* Act ----------------------------+ 01139 M02S00884.lfm24 ---| FCN MACRO A 01140 M01S00007.lfm24 +++| FCN MACRO A,B 01141 M01S00885.lfm +++| LOC .I/2 01142 M01S00008.lfm24 +++| IFNE B,0 01143 M01S00009.lfm24 +++| ERRNZ .I/2-B ASSEMBLED ORDINAL NOT AS SPECIFIED 01144 M01S00010.lfm24 +++| ENDIF 01145 M01S00886.lfm +++| CON A/10000,A-A/10000*10000 01146 M01S00887.lfm +++| .I SET .I+2 01147 M01S00888.lfm +++| ENDM 01148 M01S00889.lfm +++| TFCN SPACE 4,10 01149 M01S00890.lfm +++|** TFCN - TABLE OF FUNCTION CODE PROCESSORS. 01150 M01S00891.lfm +++|* 01151 M01S00892.lfm +++|* 2 BYTES PER ENTRY. 01152 M01S00893.lfm +++|* 01153 M01S00894.lfm +++|*T, 12/ OV,12/ ADDR
Figure
01154 M01S00895.lfm +++|* OV OVERLAY NAME 01155 M01S00896.lfm +++|* ADDR ADDRESS OF FUNCTION PROCESSOR 01156 M01S00897.lfm +++| 01157 M01S00898.lfm +++| 01158 M01S00899.lfm +++| TFCN BSS 0 01159 M01S00900.lfm +++| 01160 M01S00901.lfm +++| FCN RNI RENAME INITIALIZATION 01161 M01S00902.lfm +++| FCN 0 (UNUSED) 01162 M01S00903.lfm +++| FCN 0 (UNUSED) 01163 M01S00904.lfm +++| FCN STS SET FILE STATUS 01164 M01S00905.lfm +++| FCN 0 (UNUSED) 01165 M01S00906.lfm +++| FCN 0 (UNUSED) 01166 M01S00907.lfm +++| FCN 0 (UNUSED)
| Line S00908 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01167 M02S00908.ns22000 ---| FCN 0 (UNUSED) 01168 M01S00056.ns22000 +++| FCN FSL SET FILE ACCESS LEVEL 01169 M01S00909.lfm +++| FCN LCK LOCK FILE 01170 M01S00910.lfm +++| FCN ULK UNLOCK FILE 01171 M01S00911.lfm +++| FCN RLS RETURN LAST STATUS 01172 M01S00912.lfm +++| FCN RCP RETURN CURRENT POSITION 01173 M01S00913.lfm +++| FCN RQI REQUEST EQUIPMENT 01174 M01S00914.lfm +++| FCN AEQ ASSIGN EQUIPMENT 01175 M01S00915.lfm +++| FCN 0 (UNUSED) 01176 M01S00916.lfm +++| FCN 0 (UNUSED) 01177 M01S00917.lfm +++| FCN ALF ACCESS LIBRARY FILE
| Line S00918 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01178 M02S00918.v23l617 ---| FCN ACS ATTACH CONTROL STATEMENT FILE
| Line S00919 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01179 M02S00919.v23l617 ---| FCN ECS ENTER CONTROL STATEMENT FILE
| Line S00920 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01180 M02S00920.v23l617 ---| FCN PCS POSITION CONTROL STATEMENT FILE 01181 M01S00019.v23l617 +++| FCN ACS ATTACH COMMAND FILE 01182 M01S00020.v23l617 +++| FCN ECS ENTER COMMAND FILE 01183 M01S00021.v23l617 +++| FCN PCS POSITION COMMAND FILE 01184 M01S00921.lfm +++| FCN LBI LABEL REQUEST 01185 M01S00922.lfm +++| FCN GTF GET FNT/FST ENTRY 01186 M01S00923.lfm +++| FCN OAE REQUEST OPERATOR ASSIGNMENT OF EQUIPMENT 01187 M01S00924.lfm +++| FCN VSN ENTER VSN ENTRY FILE 01188 M01S00925.lfm +++| FCN 0 (UNUSED) 01189 M01S00926.lfm +++| FCN PRI MAKE FILE PRIMARY 01190 M01S00927.lfm +++| FCN RFI RETURN FILE INFORMATION 01191 M01S00928.lfm +++| FCN SLF SET LAST FILE EXECUTED 01192 M01S00011.lfm24 +++| FCN 0 (UNUSED) 01193 M01S00012.lfm24 +++| FCN 0,35 (RESERVED FOR INSTALLATIONS - MUST BE 35B) 01194 M01S00013.lfm24 +++| FCN 0,36 (RESERVED FOR INSTALLATIONS - MUST BE 36B) 01195 M01S00014.lfm24 +++| FCN 0,37 (RESERVED FOR INSTALLATIONS - MUST BE 37B) 01196 M01S00929.lfm +++| 01197 M01S00930.lfm +++| LOC *O 01198 M01S00931.lfm +++| TFCNL EQU *-TFCN 01199 M01S00932.lfm +++| TITLE RESIDENT PROCESSORS. 01200 M01S00933.lfm +++| ALF SPACE 4,25 01201 M01S00934.lfm +++|*** FUNCTION 20. 01202 M01S00935.lfm +++|* ACCESS LIBRARY FILE. 01203 M01S00936.lfm +++|* 01204 M01S00937.lfm +++|* ENTRY (FF) = FET SPECIFIED FNT ADDRESS. 01205 M01S00938.lfm +++|* (FN - FN+3) = FILE NAME FROM FET+0. 01206 M01S00939.lfm +++|* (FP) = FUNCTION PARAMETER. 01207 M01S00940.lfm +++|* 0 = ACCESS LIBRARY FILE. 01208 M01S00941.lfm +++|* 1 = ASSIGN *SYSTEM* FILE. 01209 M01S00942.lfm +++|* 01210 M01S00943.lfm +++|* EXIT FOR SUBFUNCTION 0 (ACCESS LIBRARY FILE), THE 01211 M01S00944.lfm +++|* FOLLOWING INFORMATION IS RETURNED. 01212 M01S00945.lfm +++|* RANDOM ADDRESS OF DIRECTORY STORED IN (FET+6). 01213 M01S00946.lfm +++|* ADDRESS BIAS FOR DIRECTORY STORED IN (FET+7). 01214 M01S00947.lfm +++|* SIGN BIT IN (FET+7) SET IF PROCEDURE FILE. 01215 M01S00948.lfm +++|* IF FILE IS ACCESSED FROM *CLD*, A LOCAL FNT ENTRY IS 01216 M01S00949.lfm +++|* CREATED, ASSIGNED TO THE CONTROL POINT AND POSITIONED 01217 M01S00950.lfm +++|* AT THE FILE. 01218 M01S00951.lfm +++|* 01219 M01S00952.lfm +++|* FOR SUBFUNCTION 1 (ASSIGN *SYSTEM* FILE), A LOCAL 01220 M01S00953.lfm +++|* FILE WITH *LIFT* FILE TYPE WILL BE CREATED TO 01221 M01S00954.lfm +++|* ACCESS THE *SYSTEM* FILE IF THE JOB IS SYSTEM 01222 M01S00955.lfm +++|* ORIGIN OR IF THE USER IS ALLOWED TO ACCESS 01223 M01S00956.lfm +++|* THE SYSTEM FILE. 01224 M01S00957.lfm +++| 01225 M01S00958.lfm +++| 01226 M01S00959.lfm +++| ALF LDD FP 01227 M01S00960.lfm +++| ZJN ALF4 IF ACCESS LIBRARY FILE FUNCTION 01228 M01S00961.lfm +++| 01229 M01S00962.lfm +++|* ASSIGN *SYSTEM* FILE. 01230 M01S00963.lfm +++| 01231 M01S00964.lfm +++| LDD FF SET INITIAL LOCAL FNT ADDRESS 01232 M01S00965.lfm +++| RJM SAF SEARCH FOR ASSIGNED FILE 01233 M01S00966.lfm +++| NJN ALF3 IF LOCAL FILE PRESENT 01234 M01S00967.lfm +++| ALF1 LDD OC CHECK JOB ORIGIN
| Line S00968 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01235 M02S00968.ns22000 ---| LMN SYOT 01236 M01S00057.ns22000 +++| LMK SYOT 01237 M01S00969.lfm +++| ZJN ALF2 IF SYSTEM ORIGIN JOB 01238 M01S00970.lfm +++| LDD CP CHECK USER ACCESS 01239 M01S00971.lfm +++| ADK AACW 01240 M01S00972.lfm +++| CRD CM 01241 M01S00973.lfm +++| LDD CM+4 01242 M01S00974.lfm +++| SHN 21-5 01243 M01S00975.lfm +++| MJN ALF2 IF LEGAL TO ACCESS SYSTEM FILE
| Line S00976 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01244 M02S00976.v23l617 ---| LDN /ERR/IUA * ILLEGAL USER ACCESS.* 01245 M01S00022.v23l617 +++| LDN /ERR/IUA * USER ACCESS NOT VALID.* 01246 M01S00977.lfm +++| UJN ALF5 PROCESS ERROR 01247 M01S00978.lfm +++| 01248 M01S00979.lfm +++| ALF2 RJM SSA SET SYSTEM FILE FNT ADDRESS 01249 M01S00980.lfm +++| ERRNZ FNTG CHECK IF NOT WORD 0 OF SYSTEM FNT ENTRY 01250 M01S00981.lfm +++| CRD CN READ SYSTEM FILE FNT WORD 01251 M01S00982.lfm +++| RJM CPF COMPARE FILE NAMES 01252 M01S00983.lfm +++| ZJN ALF3 IF FILE NAMES MATCH 01253 M01S00984.lfm +++| LDN /ERR/FNF * FILE NOT FOUND.* 01254 M01S00985.lfm +++| UJN ALF5 PROCESS ERROR 01255 M01S00986.lfm +++| 01256 M01S00987.lfm +++| ALF3 RJM SSA READ SYSTEM FILE FST WORD 01257 M01S00988.lfm +++| ADN FSTG 01258 M01S00989.lfm +++| CRD CN 01259 M01S00990.lfm +++| LJM ALF16 CONTINUE PROCESSING 01260 M01S00991.lfm +++| 01261 M01S00992.lfm +++|* ACCESS LIBRARY FILE. 01262 M01S00993.lfm +++| 01263 M01S00994.lfm +++| ALF4 LDN ZERL CLEAR FET+7 01264 M01S00995.lfm +++| CRD CM 01265 M01S00996.lfm +++| LDD FE 01266 M01S00997.lfm +++| SBN 7 01267 M01S00998.lfm +++| PJN ALF6 IF FET LONG ENOUGH 01268 M01S00999.lfm +++| LDN /ERR/FTS * FET TOO SHORT.* 01269 M01S01000.lfm +++| ALF5 LJM ERR PROCESS ERROR 01270 M01S01001.lfm +++| 01271 M01S01002.lfm +++| ALF6 RJM CPA 01272 M01S01003.lfm +++| ADN 7 01273 M01S01004.lfm +++| CWD CM 01274 M01S01005.lfm +++| LDD FF SET INITIAL FNT ADDRESS 01275 M01S01006.lfm +++| RJM SAF SEARCH FOR ASSIGNED FILE 01276 M01S01007.lfm +++| 01277 M01S01008.lfm +++|* SEARCH USER LIBRARY DIRECTORY (LBD). 01278 M01S01009.lfm +++|
| Line S01010 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns2278 |
Seq # *Modification Id* Act ----------------------------+ 01279 M02S01010.ns2278 ---| LDK LBDP READ LBD POINTER 01280 M01S00001.ns2278 +++| LDD FE 01281 M01S00002.ns2278 +++| SBN 10 01282 M01S00003.ns2278 +++| MJN ALF6.5 IF FET LENGTH LESS THAN 9 WORDS 01283 M01S00004.ns2278 +++| RJM CPA GET FILE NAME FROM FET+8 01284 M01S00005.ns2278 +++| ADN 10 01285 M01S00006.ns2278 +++| CRD FN 01286 M01S00007.ns2278 +++| LDD FN 01287 M01S00008.ns2278 +++| NJN ALF6.5 IF FILE NAME IS NON-ZERO 01288 M01S00009.ns2278 +++| RJM CPA RESTORE FILE NAME FROM FET+0 01289 M01S00010.ns2278 +++| CRD FN 01290 M01S00011.ns2278 +++| ALF6.5 LDK LBDP GET LBD POINTER 01291 M01S01011.lfm +++| CRD T1 01292 M01S01012.lfm +++| LDD T3 MOVE POINTER 01293 M01S01013.lfm +++| STD T1 01294 M01S01014.lfm +++| LDD T3+1 01295 M01S01015.lfm +++| STD T1+1 01296 M01S01016.lfm +++| ALF7 LDD T1 READ DIRECTORY ENTRY 01297 M01S01017.lfm +++| SHN 14 01298 M01S01018.lfm +++| ADD T1+1 01299 M01S01019.lfm +++| CRD CN 01300 M01S01020.lfm +++| LDN 2 ADVANCE POINTER 01301 M01S01021.lfm +++| RAD T1+1 ADVANCE DIRECTORY INDEX 01302 M01S01022.lfm +++| SHN -14 01303 M01S01023.lfm +++| RAD T1 01304 M01S01024.lfm +++| LDD CN 01305 M01S01025.lfm +++| ZJN ALF8 IF END OF DIRECTORY 01306 M01S01026.lfm +++| RJM CPF COMPARE FILE NAMES 01307 M01S01027.lfm +++| NJN ALF7 IF NO MATCH 01308 M01S01028.lfm +++| AOM ALFB FLAG LBD PROCESSING 01309 M01S01029.lfm +++| LJM AFL13 PROCESS MATCH 01310 M01S01030.lfm +++| 01311 M01S01031.lfm +++|* SEARCH ENTRY POINT DIRECTORY (EPD). 01312 M01S01032.lfm +++| 01313 M01S01033.lfm +++| ALF8 LDD MA SET ENTRY POINT NAME 01314 M01S01034.lfm +++| CWD FN 01315 M01S01035.lfm +++| CRD AB 01316 M01S01036.lfm +++| LDD AB+3 01317 M01S01037.lfm +++| SCN 77 01318 M01S01038.lfm +++| STD AB+3 01319 M01S01039.lfm +++| LDN 0 01320 M01S01040.lfm +++| STD AB+4 01321 M01S01041.lfm +++| RJM CLD SEARCH CENTRAL LIBRARY DIRECTORY 01322 M01S01042.lfm +++| NJN ALF9 IF ENTRY FOUND 01323 M01S01043.lfm +++| LDD FA 01324 M01S01044.lfm +++| NJN AFL12 IF FILE ALREADY LOCAL 01325 M01S01045.lfm +++| LJM ALF1 ASSIGN *SYSTEM* FILE 01326 M01S01046.lfm +++| 01327 M01S01047.lfm +++| 01328 M01S01048.lfm +++|* PROCESS CLD ENTRY POINT. 01329 M01S01049.lfm +++| 01330 M01S01050.lfm +++| ALF9 CRD CN READ PST ENTRY 01331 M01S01051.lfm +++| SBN 1 READ SYSTEM FILE LOCATION 01332 M01S01052.lfm +++| CRM CRFA,ON 01333 M01S01053.lfm +++| LDD CN+1 01334 M01S01054.lfm +++| LPN 37 01335 M01S01055.lfm +++| LMN 3 RELOCATABLE TYPE RECORD 01336 M01S01056.lfm +++| NJN ALF10 IF NOT RELOCATABLE 01337 M01S01057.lfm +++| RJM CRF CREATE RELOCATABLE FNT FOR CLD 01338 M01S01058.lfm +++| LJM ALF18 RETURN 01339 M01S01059.lfm +++| 01340 M01S01060.lfm +++| ALF10 LMN 20&3 CHECK FOR *PROC* 01341 M01S01061.lfm +++| ZJN ALF11 IF *PROC* RECORD 01342 M01S01062.lfm +++| LMN 0&20 *TEXT* RECORD 01343 M01S01063.lfm +++| NJN AFL12 IF NOT A *TEXT* RECORD 01344 M01S01064.lfm +++| ALF11 LDN 1 FLAG *PROC* AND *TEXT* FILE PROCESSING 01345 M01S01065.lfm +++| RJM CFN CREATE FNT ENTRY 01346 M01S01066.lfm +++| ZJN ALF14 IF SAME ENTRY 01347 M01S01067.lfm +++| AFL12 LDN 0 CLEAR FNT ADDRESS 01348 M01S01068.lfm +++| STD FA 01349 M01S01069.lfm +++| LDN /ERR/DFN * DUPLICATE FILE NAME.* 01350 M01S01070.lfm +++| LJM ERR PROCESS ERROR 01351 M01S01071.lfm +++| 01352 M01S01072.lfm +++|* BEGIN LBD PROCESSING. 01353 M01S01073.lfm +++| 01354 M01S01074.lfm +++| AFL13 LDN 0 FLAG *ULIB* PROCESSING 01355 M01S01075.lfm +++| RJM CFN CREATE FNT ENTRY 01356 M01S01076.lfm +++| NJN AFL12 IF ERROR 01357 M01S01077.lfm +++| ALF14 LDD T1 READ CONTROL WORD 01358 M01S01078.lfm +++| SHN 14 01359 M01S01079.lfm +++| ADD T1+1 01360 M01S01080.lfm +++| ALFB SBN 0 EPD MATCH FOUND 01361 M01S01081.lfm +++|* SBN 1 (LBD MATCH FOUND) 01362 M01S01082.lfm +++| CRD CM 01363 M01S01083.lfm +++| CRD T3 01364 M01S01084.lfm +++| LDN 0 01365 M01S01085.lfm +++| STD CM 01366 M01S01086.lfm +++| STD T3 01367 M01S01087.lfm +++| LDD CM+3 01368 M01S01088.lfm +++| SHN 6 01369 M01S01089.lfm +++| MJN AFL12 IF NOT RANDOM ADDRESS 01370 M01S01090.lfm +++| LDC * SET *ULIB*/*PROC* BIT 01371 M01S01091.lfm +++|* LDC 0 (ULIB PROCESSING) 01372 M01S01092.lfm +++|* LDC 1 (PROC AND TEXT PROCESSING) 01373 M01S01093.lfm +++| ALFA EQU *-1 01374 M01S01094.lfm +++| STD CM 01375 M01S01095.lfm +++| SOD CM+4 01376 M01S01096.lfm +++| PJN ALF15 IF NO UNDERFLOW 01377 M01S01097.lfm +++| AOD CM+4 01378 M01S01098.lfm +++| SOD CM+3 01379 M01S01099.lfm +++| ALF15 RJM CPA STORE FET + 6 01380 M01S01100.lfm +++| ADN 6 01381 M01S01101.lfm +++| CWD T3 01382 M01S01102.lfm +++| ADN 1 STORE (FET+7) 01383 M01S01103.lfm +++| CWD CM 01384 M01S01104.lfm +++| ALF16 LDD FA 01385 M01S01105.lfm +++| ZJN ALF17 IF FILE NOT ASSIGNED 01386 M01S01106.lfm +++| LDN 0 CLEAR FNT ADDRESS 01387 M01S01107.lfm +++| STD FA 01388 M01S01108.lfm +++| LJM LFMX EXIT 01389 M01S01109.lfm +++| 01390 M01S01110.lfm +++| ALF17 LDN NEEQ SET NULL EQUIPMENT 01391 M01S01111.lfm +++| STD EQ 01392 M01S00012.ns2278 +++| RJM CPA RESTORE FILE NAME FROM FET+0 01393 M01S00013.ns2278 +++| CRD FN 01394 M01S01112.lfm +++| RJM EFN ENTER FILE NAME 01395 M01S01113.lfm +++| LDD CN SET FST ENTRY 01396 M01S01114.lfm +++| STD FS 01397 M01S01115.lfm +++| LDD CN+1 01398 M01S01116.lfm +++| STD FS+1 01399 M01S01117.lfm +++| STD FS+2 01400 M01S01118.lfm +++| LDN FSMS 01401 M01S01119.lfm +++| STD FS+3
| Line S01120 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01402 M02S01120.ns22000 ---| ALF18 LDC LIFT*100 01403 M01S00058.ns22000 +++| ALF18 LDD TH 01404 M01S00059.ns22000 +++| ERRNZ 1000-LIFT*100 ADJUST IF VALUE CHANGES 01405 M01S01121.lfm +++| STD FN+4 01406 M01S01122.lfm +++| LDD FN+3 SET LOCK 01407 M01S01123.lfm +++| SCN 77 01408 M01S01124.lfm +++| LMN 1 01409 M01S01125.lfm +++| STD FN+3 01410 M01S01126.lfm +++| NFA FA,R STORE FNT WORD 01411 M01S01127.lfm +++| CWD FN 01412 M01S01128.lfm +++| LJM LFMX EXIT 01413 M01S01129.lfm +++| CFN SPACE 4,15 01414 M01S01130.lfm +++|*** CFN - CREATE FNT ENTRY. 01415 M01S01131.lfm +++|* 01416 M01S01132.lfm +++|* ENTRY (A) = 0, IF NOT A PROC OR TEXT FILE. 01417 M01S01133.lfm +++|* (A) = 1, IF IS A PROC OR TEXT FILE. 01418 M01S01134.lfm +++|* 01419 M01S01135.lfm +++|* EXIT (A) = 0, IF SAME FILE. 01420 M01S01136.lfm +++|* (A) .NE. 0, IF NOT SAME FILE. 01421 M01S01137.lfm +++|*
| Line S01138 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | lfm4 |
Seq # *Modification Id* Act ----------------------------+ 01422 M02S01138.lfm4 ---|* USES CN - CN+4, FS - FS+4. 01423 M01S00001.lfm4 +++|* USES CM - CM+4, CN - CN+4, FS - FS+4. 01424 M01S01139.lfm +++|* 01425 M01S01140.lfm +++|* CALLS SSA. 01426 M01S01141.lfm +++|*
| Line S01142 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01427 M02S01142.ns22000 ---|* MACROS NFA. 01428 M01S00060.ns22000 +++|* MACROS NFA, SFA. 01429 M01S01143.lfm +++| 01430 M01S01144.lfm +++| 01431 M01S01145.lfm +++| CFN SUBR ENTRY/EXIT 01432 M01S01146.lfm +++| SHN 13 01433 M01S01147.lfm +++| STM ALFA 01434 M01S01148.lfm +++| RJM SSA SET SYSTEM FILE FNT ADDRESS 01435 M01S01149.lfm +++| ADN FSTG 01436 M01S01150.lfm +++| CRD CN 01437 M01S01151.lfm +++| LDD FA 01438 M01S01152.lfm +++| ZJN CFNX IF NO ASSIGNED FILE 01439 M01S01153.lfm +++| NFA FA,R READ FST WORD 01440 M01S01154.lfm +++| ADN FSTL 01441 M01S01155.lfm +++| CRD FS
| Line S01156 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | lfm4 |
Seq # *Modification Id* Act ----------------------------+ 01442 M02S01156.lfm4 ---| LDD CN COMPARE FST WORDS
| Line S01157 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | lfm4 |
Seq # *Modification Id* Act ----------------------------+ 01443 M02S01157.lfm4 ---| LMD FS
| Line S01158 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | lfm4 |
Seq # *Modification Id* Act ----------------------------+ 01444 M02S01158.lfm4 ---| LPC 777
| Line S01159 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | lfm4 |
Seq # *Modification Id* Act ----------------------------+ 01445 M02S01159.lfm4 ---| NJN CFNX IF NO MATCH
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | lfm4 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01446 M02S00002.ns22000 ---| LDD FS
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | lfm4 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01447 M02S00003.ns22000 ---| LPC 777
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | lfm4 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01448 M02S00004.ns22000 ---| ADM ESTS 01449 M01S00061.ns22000 +++| SFA EST,FS 01450 M01S00062.ns22000 +++| ADK EQDE 01451 M01S00005.lfm4 +++| CRD CM 01452 M01S00006.lfm4 +++| LDD CM 01453 M01S00007.lfm4 +++| SHN -12 01454 M01S00008.lfm4 +++| LMN 3 01455 M01S00009.lfm4 +++| NJN CFNX IF NOT A SYSTEM DEVICE 01456 M01S01160.lfm +++| LDD CN+1 01457 M01S01161.lfm +++| LMD FS+1 01458 M01S01162.lfm +++| UJN CFNX RETURN 01459 M01S01163.lfm +++| 01460 M01S01164.lfm +++| RNI SPACE 4,10 01461 M01S01165.lfm +++|** RNI - RENAME INITIALIZATION. 01462 M01S01166.lfm +++| 01463 M01S01167.lfm +++| 01464 M01S01168.lfm +++| RNI RJM CRX CHECK RESEX CALL 01465 M01S01169.lfm +++| LDC RNM SET ENTRY 01466 M01S01170.lfm +++| UJN RQI3 SET OVERLAY REQUEST 01467 M01S01171.lfm +++| RQI SPACE 4,10 01468 M01S01172.lfm +++|** RQI - EQUIPMENT REQUEST INITIALIZATION. 01469 M01S01173.lfm +++|* 01470 M01S01174.lfm +++|* ENTRY (FF) = FET SPECIFIED FNT ADDRESS. 01471 M01S01175.lfm +++|* (FN - FN+3) = FILE NAME FROM FET+0. 01472 M01S01176.lfm +++| 01473 M01S01177.lfm +++| 01474 M01S01178.lfm +++| RQI LDD FF SET INITIAL FNT ADDRESS 01475 M01S01179.lfm +++| RJM SAF SEARCH FOR ASSIGNED FILE 01476 M01S01180.lfm +++| ZJN RQI2 IF FILE NOT FOUND 01477 M01S01181.lfm +++| RQI1 LDN 0 CLEAR FNT ADDRESS 01478 M01S01182.lfm +++| STD FA 01479 M01S01183.lfm +++| LJM LFMX EXIT 01480 M01S01184.lfm +++| 01481 M01S01185.lfm +++| RQI2 LDC REQ SET ENTRY 01482 M01S01186.lfm +++| RQI3 STM LFMB 01483 M01S01187.lfm +++| SHN -14 SET OVERLAY NAME 01484 M01S01188.lfm +++| STM LFMA 01485 M01S01189.lfm +++| LJM LFM1 PROCESS REQUEST 01486 M01S01190.lfm +++| LBI SPACE 4,10 01487 M01S01191.lfm +++|** LBI - LABEL REQUEST INITIALIZATION. 01488 M01S01192.lfm +++| 01489 M01S01193.lfm +++| 01490 M01S01194.lfm +++| LBI RJM CRX CHECK RESEX CALL 01491 M01S01195.lfm +++| RJM SVF SEARCH FOR VSN FILE 01492 M01S01196.lfm +++| NJN RQI1 IF NON-VSN FILE FOUND 01493 M01S01197.lfm +++| LDC LBR SET ENTRY 01494 M01S01198.lfm +++| UJN RQI3 SET OVERLAY REQUEST 01495 M01S01199.lfm +++| TITLE RESIDENT PROCESSOR SUBROUTINES. 01496 M01S01200.lfm +++| CPF SPACE 4,10 01497 M01S01201.lfm +++|** CPF - COMPARE FILE NAMES. 01498 M01S01202.lfm +++|* 01499 M01S01203.lfm +++|* ENTRY (CN - CN+3) = FIRST FILE NAME. 01500 M01S01204.lfm +++|* (FN - FN+3) = SECOND FILE NAME. 01501 M01S01205.lfm +++|* 01502 M01S01206.lfm +++|* EXIT (A) = 0 IF FILE NAMES MATCH. 01503 M01S01207.lfm +++| 01504 M01S01208.lfm +++| 01505 M01S01209.lfm +++| CPF SUBR ENTRY/EXIT 01506 M01S01210.lfm +++| LDD CN COMPARE FILE NAMES 01507 M01S01211.lfm +++| LMD FN 01508 M01S01212.lfm +++| NJN CPFX IF NO MATCH 01509 M01S01213.lfm +++| LDD CN+1 01510 M01S01214.lfm +++| LMD FN+1 01511 M01S01215.lfm +++| NJN CPFX IF NO MATCH 01512 M01S01216.lfm +++| LDD CN+2 01513 M01S01217.lfm +++| LMD FN+2 01514 M01S01218.lfm +++| NJN CPFX IF NO MATCH 01515 M01S01219.lfm +++| LDD CN+3 01516 M01S01220.lfm +++| LMD FN+3 01517 M01S01221.lfm +++| SCN 77 01518 M01S01222.lfm +++| UJN CPFX RETURN 01519 M01S01223.lfm +++| CRF SPACE 4,20 01520 M01S01224.lfm +++|** CRF - CREATE RELOCATABLE ROUTINE FNT. 01521 M01S01225.lfm +++|* 01522 M01S01226.lfm +++|* ENTRY (FN - FN+4) = FILE NAME. 01523 M01S01227.lfm +++|* (CN - CN+4) = DIRECTORY ENTRY. 01524 M01S01228.lfm +++|* (T1 - T1+1) = POINTER TO ENTRY IN PST. 01525 M01S01229.lfm +++|* 01526 M01S01230.lfm +++|* EXIT (FA) = FILE FNT ADDRESS. 01527 M01S01231.lfm +++|* (FS - FS+4) = FST INFORMATION. 01528 M01S01232.lfm +++|* 01529 M01S01233.lfm +++|* USES EQ, FS - FS+3, CM - CM+4, CN - CN+4. 01530 M01S01234.lfm +++|* 01531 M01S01235.lfm +++|* CALLS EFN, SSA. 01532 M01S00063.ns22000 +++|* 01533 M01S00064.ns22000 +++|* MACROS SFA. 01534 M01S01236.lfm +++|* 01535 M01S01237.lfm +++|* NOTE - *CRF* WILL POSITION THE FST TO THE LOCATION 01536 M01S01238.lfm +++|* OF THE RELOCATABLE PROGRAM ON THE SYSTEM 01537 M01S01239.lfm +++|* DEVICE OR THE *ASR* DEVICE. 01538 M01S01240.lfm +++| 01539 M01S01241.lfm +++| 01540 M01S01242.lfm +++| CRF SUBR ENTRY/EXIT 01541 M01S01243.lfm +++| LDD T1 READ PST CONTROL WORD 01542 M01S01244.lfm +++| SHN 14 01543 M01S01245.lfm +++| ADD T1+1 01544 M01S01246.lfm +++| CRD CN
| Line S01247 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01545 M02S01247.ns22000 ---| LDN NEEQ SET EQUIPMENT NUMBER 01546 M01S00065.ns22000 +++| LDN NEEQ SET EST ORDINAL 01547 M01S01248.lfm +++| STD EQ 01548 M01S01249.lfm +++| RJM EFN ENTER FILE NAME 01549 M01S01250.lfm +++| 01550 M01S01251.lfm +++|* SET FST INFORMATION. 01551 M01S01252.lfm +++|
| Line S01253 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01552 M02S01253.ns22000 ---| LDD CN+2 SET EQUIPMENT NUMBER 01553 M01S00066.ns22000 +++| LDD CN+2 SET EST ORDINAL 01554 M01S01254.lfm +++| LPC 777 01555 M01S01255.lfm +++| STD FS 01556 M01S01256.lfm +++| LDD CN+1 CHECK FOR ASR RESIDENT PROGRAM 01557 M01S01257.lfm +++| SHN 21-13 01558 M01S01258.lfm +++| PJN CRF1 IF NOT *ASR* DEVICE
| Line S01259 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01559 M02S01259.ns22000 ---| LDD FS
| Line S01260 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01560 M02S01260.ns22000 ---| ADM ESTS CHECK FOR DEVICE ON 01561 M01S00067.ns22000 +++| SFA EST,FS CHECK FOR DEVICE *ON* 01562 M01S00068.ns22000 +++| ADK EQDE 01563 M01S01261.lfm +++| CRD CM
| Line S01262 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01564 M02S01262.242l642 ---| LDD CM+3
| Line S01263 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01565 M02S01263.242l642 ---| SHN 21-13 01566 M01S00077.242l642 +++| LDD CM 01567 M01S00078.242l642 +++| SHN 21-1 01568 M01S01264.lfm +++| MJN CRF2 IF DEVICE OFF 01569 M01S01265.lfm +++| LDD CN+3 SET FIRST = CURRENT 01570 M01S01266.lfm +++| STD FS+1 01571 M01S01267.lfm +++| STD FS+2 01572 M01S01268.lfm +++| LDD CN+4 01573 M01S01269.lfm +++| STD FS+3 01574 M01S01270.lfm +++| UJN CRFX RETURN 01575 M01S01271.lfm +++| 01576 M01S01272.lfm +++| CRF1 LDD CN+3 GET TRACK 01577 M01S01273.lfm +++| STM CRFA+3 01578 M01S01274.lfm +++| LDD CN+4 GET SECTOR 01579 M01S01275.lfm +++| STM CRFA+4 01580 M01S01276.lfm +++| CRF2 RJM SSA SET SYSTEM FILE FNT ADDRESS 01581 M01S01277.lfm +++| ADN FSTG 01582 M01S01278.lfm +++| CRD CM 01583 M01S01279.lfm +++| LDD CM SET SYSTEM EQUIPMENT 01584 M01S01280.lfm +++| STD FS 01585 M01S01281.lfm +++| LDM CRFA+3 SET FIRST = CURRENT 01586 M01S01282.lfm +++| STD FS+1 01587 M01S01283.lfm +++| STD FS+2 01588 M01S01284.lfm +++| LDM CRFA+4 SET SECTOR 01589 M01S01285.lfm +++| STD FS+3 01590 M01S01286.lfm +++| LJM CRFX RETURN 01591 M01S01287.lfm +++| 01592 M01S01288.lfm +++| 01593 M01S01289.lfm +++| CRFA BSS 5 SYSTEM DEVICE INFORMATION 01594 M01S01290.lfm +++| SSA SPACE 4,10 01595 M01S01291.lfm +++|** SSA - SET SYSTEM FILE FNT ENTRY ADDRESS. 01596 M01S01292.lfm +++|* 01597 M01S01293.lfm +++|* EXIT (A) = ABSOLUTE ADDRESS OF SYSTEM FILE ENTRY. 01598 M01S01294.lfm +++|* 01599 M01S01295.lfm +++|* USES CM - CM+4. 01600 M01S01296.lfm +++| 01601 M01S01297.lfm +++| 01602 M01S01298.lfm +++| SSA SUBR ENTRY/EXIT 01603 M01S01299.lfm +++| LDN FNTP FETCH FNT POINTER 01604 M01S01300.lfm +++| CRD CM 01605 M01S01301.lfm +++| LDD CM GET SYSTEM FILE FNT ADDRESS 01606 M01S01302.lfm +++| SHN 14 01607 M01S01303.lfm +++| ADD CM+1 01608 M01S01304.lfm +++|* ADN SYFO*FNTE 01609 M01S01305.lfm +++| ERRNZ SYFO SYSTEM FILE IS NOT FIRST SYSTEM FNT ENTRY 01610 M01S01306.lfm +++| UJN SSAX RETURN 01611 M01S01307.lfm +++| SPACE 4,10 01612 M01S01308.lfm +++|** COMMON DECKS. 01613 M01S01309.lfm +++| 01614 M01S01310.lfm +++| 01615 M01S01311.lfm +++|*CALL COMPCLD 01616 M01S01312.lfm +++|*CALL COMPCRS 01617 M01S01313.lfm +++| SPACE 4,10 01618 M01S01314.lfm +++| IFP HERE DUMP *IFP* REMOTE CODE 01619 M01S00001.lfm17 +++| SPACE 4 01620 M01S00002.lfm17 +++|** DEFINE ZERO LEVEL OVERLAY LOAD ADDRESS. 01621 M01S00003.lfm17 +++| 01622 M01S00004.lfm17 +++| 01623 M01S00005.lfm17 +++| .L1 EQU 7777-1-ZBFL LENGTH OF *0BF* 01624 M01S00006.lfm17 +++| .L2 EQU BFMS-1-ZDFL LENGTH OF *0DF* 01625 M01S00007.lfm17 +++| .L3 MIN .L1,.L2 01626 M01S00008.lfm17 +++| OVL0 EQU .L3 DEFINE ZERO LEVEL OVERLAY LOAD ADDRESS 01627 M01S00009.lfm17 +++| SPACE 4,10 01628 M01S00010.lfm17 +++| ERRNG OVL0-* CODE OVERFLOWS INTO ZERO LEVEL OVERLAYS 01629 M01S01315.lfm +++| OVERLAY (ERROR PROCESSOR.) 01630 M01S01316.lfm +++| ERP SPACE 4,10 01631 M01S01317.lfm +++|** ERP - ERROR PPROCESSOR. 01632 M01S00069.ns22000 +++|* 01633 M01S01318.lfm +++|* ENTRY (EQ) = ERROR NUMBER. 01634 M01S01319.lfm +++| 01635 M01S01320.lfm +++| 01636 M01S01321.lfm +++| ENTRY ERP 01637 M01S01322.lfm +++| LDM ERPA,EQ 01638 M01S01323.lfm +++| ZJN ERP1 IF NO DAYFILE MESSAGES ARE TO BE ISSUED
| Line S01324 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01639 M02S01324.ns22000 ---| LDC =C*LFM ERROR.* 01640 M01S00070.ns22000 +++| LDC =C* LFM ERROR.* 01641 M01S01325.lfm +++| RJM DFM ISSUE DAYFILE MESSAGE
| Line S01326 Modification History | |
|---|---|
M01 (Added by) | lfm |
M02 (Updated by) | lfm23 |
Seq # *Modification Id* Act ----------------------------+ 01642 M02S01326.lfm23 ---| LDM ERPA,EQ 01643 M01S00001.lfm23 +++| LDD EQ 01644 M01S00002.lfm23 +++| LMN /ERR/DFN 01645 M01S00003.lfm23 +++| NJN ERP0 IF NOT *DUPLICATE FILE NAME*
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/lfm.txt · Last modified: by 127.0.0.1