Seq # *Modification Id* Act
----------------------------+
00001 M00S00001.sfm +++| IDENT SFM,SFM
00002 M00S00002.sfm +++| PERIPH
00003 M00S00003.sfm +++| BASE MIXED
00004 M00S00004.sfm +++| SST
00005 M00S00005.sfm +++| STI$ EQU 1 SET UNCONDITIONAL RETURN FROM *COMPSTI*
00006 M00S00006.sfm +++|*COMMENT SFM - SYSTEM FILE MANAGER.
Line S00007 Modification History
M01 (Removed by) 281l803
Seq # *Modification Id* Act
----------------------------+
00007 M01S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1970.
Line S00001 Modification History
M01 (Added by) 281l803
Seq # *Modification Id* Act
----------------------------+
00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00009 M00S00008.sfm +++| TITLE SFM - SYSTEM FILE MANAGER.
00010 M00S00009.sfm +++| SPACE 4
00011 M00S00010.sfm +++|*** SFM - SYSTEM FILE MANAGER.
00012 M00S00011.sfm +++|* G. R. MANSFIELD. 70/10/02.
00013 M00S00012.sfm +++|* R. A. JAPS. 75/01/02.
00014 M00S00013.sfm +++|* S. L. KSANDER. 75/05/26.
00015 M00S00014.sfm +++|* P. D. HAAS. 79/05/23.
00016 M00S00015.sfm +++| SPACE 4
00017 M00S00016.sfm +++|*** SFM PERFORMS VARIOUS FILE MANAGING TASKS FOR A JOB.
00018 M00S00017.sfm +++| SPACE 4
00019 M00S00018.sfm +++|*** CALL.
00020 M00S00019.sfm +++|*
00021 M00S00020.sfm +++|*
00022 M00S00021.sfm +++|*T 18/ *SFM*,1/,1/1,4/,12/ CODE,6/,18/ FET
Figure
0 17 18 23 24 29 FET CODE 30 35 36 39 40 41 42 59 CODE 1 *SFM*
00023 M00S00022.sfm +++|* CODE FUNCTION CODE
00024 M00S00023.sfm +++|* FET ADDRESS OF FET
00025 M00S00024.sfm +++|*
00026 M00S00025.sfm +++|*T FET 42/ LFN , 17/ , 1/0
00027 M00S00026.sfm +++|*T,FET+1 12/ ET , 3/ , 1/E, 26/ , 18/ FIRST
Figure
FET+1
0 17 18 29 FIRST 30 43 44 45 47 48 59 E ET
00028 M00S00027.sfm +++|*T,FET+2 42/ , 18/ IN
00029 M00S00028.sfm +++|*T,FET+3 42/ , 18/ OUT
00030 M00S00029.sfm +++|*T,FET+4 42/ , 18/ LIMIT
00031 M00S00030.sfm +++|*T,FET+5 60/
00032 M00S00031.sfm +++|*T,FET+6 60/
00033 M00S00032.sfm +++|*T,FET+7 12/ EQ, 24/ , 12/ TY, 6/ , 6/ WI
Figure
FET+7
0 5 6 11 12 23 24 29 WI TY 30 47 48 59 EQ
00034 M00S00033.sfm +++|*
00035 M00S00034.sfm +++|* LFN = LOCAL FILE NAME.
00036 M00S00035.sfm +++|* ET = EQUIPMENT TYPE.
00037 M00S00036.sfm +++|* E = RETURN ERROR CODE.
00038 M00S00037.sfm +++|* EQ = EST ORDINAL.
00039 M00S00038.sfm +++|* TY = DAYFILE TYPE. (SEE COMSIOQ FOR DEFINED CODES).
00040 M00S00039.sfm +++|* 1 = SYSTEM DAYFILE
00041 M00S00040.sfm +++|* 2 = ACCOUNT DAYFILE
00042 M00S00041.sfm +++|* 3 = ERRLOG DAYFILE
00043 M00S00042.sfm +++|* 4 = MAINTENANCE LOG DAYFILE
00044 M00S00043.sfm +++|* WI = WORD INDEX IN SECTOR (SETDI).
00045 M00S00044.sfm +++|*
00046 M00S00045.sfm +++|* RETURN.
00047 M00S00046.sfm +++|*
00048 M00S00047.sfm +++|*T FET 42/ *FILE NAME*,8/ EC,9/,1/1
Figure
FET
0 1 9 10 17 18 29 1 EC *FILE NAME* 30 59 *FILE NAME*
00049 M00S00048.sfm +++|* EC ERROR CODE
00050 M00S00049.sfm +++| SPACE 4
00051 M00S00050.sfm +++|*** DAYFILE MESSAGES.
00052 M00S00051.sfm +++|*
00053 M00S00052.sfm +++|*
00054 M00S00053.sfm +++|* * SFM ARGUMENT ERROR.*
00055 M00S00054.sfm +++|* ARGUMENT TO SFM WAS OUT OF RANGE.
00056 M00S00055.sfm +++|*
00057 M00S00056.sfm +++|* * SFM BML MESSAGE LENGTH ERROR.*
00058 M00S00057.sfm +++|* BML MESSAGE LENGTH IS = 0, OR .GT. 6.
00059 M00S00058.sfm +++|*
00060 M00S00059.sfm +++|* * SFM INCORRECT REQUEST.*
00061 M00S00060.sfm +++|* CAN INDICATE ONE OF THE FOLLOWING CONDITIONS -
00062 M00S00061.sfm +++|* 1. SFM NOT CALLED WITH AUTO RECALL.
00063 M00S00062.sfm +++|* 2. FUNCTION CODE OUT OF RANGE.
00064 M00S00063.sfm +++|* 3. USER DOES NOT HAVE SYSTEM ORIGIN PRIVILEGES.
00065 M00S00064.sfm +++|* 4. CALLING PROGRAM IS NOT SSJ=.
00066 M00S00065.sfm +++|*
00067 M00S00066.sfm +++|* * SFM INCORRECT DAYFILE CODE.*
00068 M00S00067.sfm +++|* DAYFILE CODE PASSED IN THE FET WAS NOT WITHIN RANGE.
00069 M00S00068.sfm +++|*
00070 M00S00069.sfm +++|* * SFM INCORRECT EQUIPMENT.*
00071 M00S00070.sfm +++|* EQUIPMENT NOT WITHIN EST OR NOT MASS STORAGE.
00072 M00S00071.sfm +++|*
00073 M00S00072.sfm +++|* * SFM FILE NOT FOUND.*
00074 M00S00073.sfm +++|* REQUESTED FILE WAS NOT FOUND.
00075 M00S00074.sfm +++|*
00076 M00S00075.sfm +++|* * SFM DUPLICATE FILE FOUND.*
00077 M00S00076.sfm +++|* THE REQUESTED FILE IS ALREADY ATTACHED TO THE
00078 M00S00077.sfm +++|* CONTROL POINT.
00079 M00S00078.sfm +++|*
00080 M00S00079.sfm +++|* * SFM FILE NOT ON MASS STORAGE.*
00081 M00S00080.sfm +++|* SELF EXPLANATORY.
00082 M00S00081.sfm +++|*
00083 M00S00082.sfm +++|* * SFM I/O SEQUENCE ERROR.*
00084 M00S00083.sfm +++|* ACTION HAS BEEN REQUESTED ON A BUSY FILE.
00085 M00S00084.sfm +++|*
00086 M00S00085.sfm +++|* * SFM FILE EMPTY.*
00087 M00S00086.sfm +++|* SELF EXPLANATORY.
00088 M00S00087.sfm +++|*
00089 M00S00088.sfm +++|* * SFM FILE NAME ERROR.*
00090 M00S00089.sfm +++|* FILE NAME, LFN, PASSED THROUGH FET IS NOT A
00091 M00S00090.sfm +++|* VALID FILE NAME.
00092 M00S00091.sfm +++|*
00093 M00S00092.sfm +++|* * SFM FNT FULL.*
00094 M00S00093.sfm +++|* A FAST ATTACH FILE COULD NOT BE CREATED BECAUSE
00095 M00S00094.sfm +++|* THE FNT WAS FULL.
00096 M00S00095.sfm +++|*
00097 M00S00096.sfm +++|* * SFM INCORRECT FILE TYPE.*
00098 M00S00097.sfm +++|* FILE MUST BE LOCAL FOR SYSTEM FILE AND DIRECT
00099 M00S00098.sfm +++|* ACCESS FOR FAST ATTACH FILE.
00100 M00S00099.sfm +++|*
00101 M00S00100.sfm +++|* * SFM DIRECT ACCESS FILE ERROR.*
00102 M00S00101.sfm +++|* ERROR WAS ENCOUNTERED ON SYSTEM SECTOR OF A DIRECT
00103 M00S00102.sfm +++|* ACCESS FILE.
00104 M00S00103.sfm +++|*
00105 M00S00104.sfm +++|* * XXXXXXX TERMINATED.*
00106 M00S00105.sfm +++|* THE DAYFILE XXXXXXX, HAS BEEN TERMINATED.
00107 M00S00106.sfm +++|* (ISSUED TO SYSTEM AND CONTROL POINT DAYFILES).
00108 M00S00107.sfm +++|*
00109 M00S00108.sfm +++|* * DAYFILE TERMINATED.*
00110 M00S00109.sfm +++|* SELF EXPLANATORY. (ISSUED TO TERMINATED DAYFILE).
00111 M00S00110.sfm +++|*
00112 M00S00111.sfm +++|* * SFM UNABLE TO INTERLOCK DEVICE.*
00113 M00S00112.sfm +++|* REQUEST WAS NOT PERFORMED BECAUSE DEVICE COULD
00114 M00S00113.sfm +++|* NOT BE INTERLOCKED.
00115 M00S00114.sfm +++|*
00116 M00S00115.sfm +++|* * SFM TRACK INTERLOCK ERROR.*
00117 M00S00116.sfm +++|* CAN INDICATE ONE OF THE FOLLOWING CONDITIONS.
00118 M00S00117.sfm +++|* 1. TRACK WAS INTERLOCKED WHEN IT SHOULD NOT
00119 M00S00118.sfm +++|* HAVE BEEN.
00120 M00S00119.sfm +++|* 2. TRACK WAS NOT INTERLOCKED WHEN IT SHOULD
00121 M00S00120.sfm +++|* HAVE BEEN.
00122 M00S00121.sfm +++|*
00123 M00S00122.sfm +++|* * SFM SYSTEM SECTOR ERROR.*
00124 M00S00123.sfm +++|* AN ERROR HAS BEEN ENCOUNTERED WHILE ATTEMPTING
00125 M00S00124.sfm +++|* TO READ A SYSTEM SECTOR.
00126 M00S00125.sfm +++|*
00127 M00S00126.sfm +++|* * SFM GLOBAL FAST ATTACH LIMIT.*
00128 M00S00127.sfm +++|* THIS MESSAGE IS ISSUED WHEN A REQUEST IS
00129 M00S00128.sfm +++|* MADE TO ENTER A GLOBAL FAST ATTACH FILE
00130 M00S00129.sfm +++|* AND NO SPACE IS AVAILABLE IN THE *FAT*.
00131 M00S00130.sfm +++|*
00132 M00S00131.sfm +++|* * SFM ABORTED.*
00133 M00S00132.sfm +++|* ERROR FLAG WAS SET AT SFM,S CONTROL POINT.
00134 M00S00133.sfm +++|*
00135 M00S00134.sfm +++|* * SFM UNRECOVERABLE LINK DEVICE ERROR.*
00136 M00S00135.sfm +++|* READ OR WRITE ERROR WHEN ATTEMPTING TO UPDATE
00137 M00S00136.sfm +++|* *FAT* ENTRIES ON LINK DEVICE.
00138 M00S00137.sfm +++|*
00139 M00S00138.sfm +++|* * SFM FAST ATTACH SYSTEM SECTOR ERROR.*
00140 M00S00139.sfm +++|* AN UNRECOVERABLE ERROR WAS DETECTED WHEN TRYING TO
00141 M00S00140.sfm +++|* READ THE SYSTEM SECTOR OF THE FILE BEING ENTERED
00142 M00S00141.sfm +++|* INTO FAST ATTACH STATUS. THE FILE WAS ENTERED,
00143 M00S00142.sfm +++|* HOWEVER, THE SYSTEM SECTOR POINTERS WERE NOT SET.
00144 M00S00143.sfm +++|* THIS FILE MAY NOT BE DUMPED PROPERLY BY *PFDUMP*
00145 M00S00144.sfm +++|* WHEN THIS OCCURS.
00146 M00S00145.sfm +++|*
00147 M00S00146.sfm +++|* * SFM LINK FAST ATTACH FILE NOT FOUND.*
00148 M00S00147.sfm +++|* AN ATTEMPT TO LINK TO AN EXISTING FAST ATTACH FILE
00149 M00S00148.sfm +++|* WAS UNSUCCESSFUL BECAUSE THE FILE WAS NOT FOUND
00150 M00S00149.sfm +++|* IN THE *FAT*.
00151 M00S00150.sfm +++|*
00152 M00S00151.sfm +++|* * SFM FAMILY STILL ACTIVE.*
00153 M00S00152.sfm +++|* AN ATTEMPT HAS BEEN MADE TO REMOVE A FAST ATTACH FILE
00154 M00S00153.sfm +++|* FROM A FAMILY WHILE ACTIVITY STILL EXISTS WITHIN
00155 M00S00154.sfm +++|* THAT FAMILY.
00156 M00S00155.sfm +++|*
00157 M00S00156.sfm +++|* THE FOLLOWING ERROR MESSAGES ARE ISSUED IF THE *EP* BIT
00158 M00S00157.sfm +++|* IS NOT SET. OTHERWISE, THE SPECIFIED ERROR CODE IS
00159 M00S00158.sfm +++|* RETURNED TO FET+0. ERRORS FOR THOSE FUNCTIONS WHICH
00160 M00S00159.sfm +++|* HAVE ONLY A ONE-WORD PARAMETER BLOCK WILL ALWAYS BE
00161 M00S00160.sfm +++|* PROCESSED AS IF *EP* HAD BEEN SET. (THESE ERRORS
00162 M00S00161.sfm +++|* ARE DOCUMENTED BELOW IN PARENTHESES.)
00163 M00S00162.sfm +++|*
00164 M00S00163.sfm +++|* * SFM DAYFILE BUSY.*
00165 M00S00164.sfm +++|* EC = 1. THE DAYFILE IS CURRENTLY BUSY.
00166 M00S00165.sfm +++|*
00167 M00S00166.sfm +++|* * SFM MASS STORAGE NOT AVAILABLE.*
00168 M00S00167.sfm +++|* EC = 2. MASS STORAGE IS NOT AVAILABLE ON THE
00169 M00S00168.sfm +++|* SPECIFIED DEVICE.
00170 M00S00169.sfm +++|*
00171 M00S00170.sfm +++|* * SFM FILE NOT FOUND.*
00172 M00S00171.sfm +++|* EC = 3. THE FILE FOR WHICH ACTION HAS BEEN
00173 M00S00172.sfm +++|* REQUESTED CAN NOT BE FOUND.
00174 M00S00173.sfm +++|*
00175 M00S00174.sfm +++|* * SFM UNCORRECTABLE RMS ERROR.*
00176 M00S00175.sfm +++|* EC = 4. AN UNCORRECTABLE RMS ERROR HAS BEEN DETECTED
00177 M00S00176.sfm +++|* DURING AN I/O OPERATION.
00178 M00S00177.sfm +++|*
00179 M00S00178.sfm +++|* + *CPD* NOT ACTIVE.+
00180 M00S00179.sfm +++|* EC = 5. *SFM* WAS CALLED TO SET THE *CPD* DROP
00181 M00S00180.sfm +++|* FLAG WHEN *CPD* WAS NOT ACTIVE.
00182 M00S00181.sfm +++|*
00183 M00S00182.sfm +++|* * SFM - LID TABLE TOO LONG FOR BUFFER.*
00184 M00S00183.sfm +++|* EC = 6. AN ATTEMPT WAS MADE TO GET A COPY OF THE
00185 M00S00184.sfm +++|* LID TABLE BUT THE LIDT WAS LARGER THAN THE CALLER-S
00186 M00S00185.sfm +++|* BUFFER.
00187 M00S00186.sfm +++|*
00188 M00S00187.sfm +++|* (LID UNKNOWN OR NOT LEGAL.)
00189 M00S00188.sfm +++|* EC=7. THE SPECIFIED LID WAS NOT FOUND IN THE
00190 M00S00189.sfm +++|* LID TABLE, OR IS NOT EXACTLY 3 CHARACTERS LONG.
00191 M00S00190.sfm +++|*
00192 M00S00191.sfm +++|* ( INCORRECT LID ATTRIBUTES.)
00193 M00S00192.sfm +++|* EC=10. THE SPECIFIED ATTRIBUTES ARE NOT CORRECT FOR
00194 M00S00193.sfm +++|* THE SPECIFIED LID.
00195 M00S00194.sfm +++|*
00196 M00S00195.sfm +++|* ( CURRENT ATTRIBUTES NOT IN LID TABLE.)
00197 M00S00196.sfm +++|* EC = 11. THE CURRENT ATTRIBUTES SPECIFIED DO NOT
00198 M00S00197.sfm +++|* MATCH THOSE CURRENTLY IN THE LID TABLE FOR THE
00199 M00S00198.sfm +++|* SPECIFIED LID.
00200 M00S00199.sfm +++|*
00201 M00S00200.sfm +++|* ( LID TABLE OVERFLOW.)
00202 M00S00201.sfm +++|* EC = 12. THE SPECIFIED NEW LID CANNOT BE ADDED TO THE
00203 M00S00202.sfm +++|* LID TABLE, SINCE THE LID TABLE IS ALREADY FULL.
00204 M00S00203.sfm +++|*
00205 M00S00204.sfm +++|* ( TOO MANY HOST LIDS.)
00206 M00S00205.sfm +++|* EC = 13. THE SPECIFIED NEW HOST LID CANNOT BE ADDED
00207 M00S00206.sfm +++|* TO THE LID TABLE, SINCE THE TABLE ALREADY CONTAINS
00208 M00S00207.sfm +++|* THE MAXIMUM NUMBER OF HOST LIDS.
00209 M00S00208.sfm +++|*
00210 M00S00209.sfm +++|* ( INCORRECT SUBFUNCTION CODE.)
00211 M00S00210.sfm +++|* EC = 14. THE SPECIFIED SUBFUNCTION IS NOT DEFINED FOR
00212 M00S00211.sfm +++|* THIS FUNCTION.
00213 M00S00212.sfm +++|*
00214 M00S00213.sfm +++|* ( INCORRECT NETWORK STATUS PARAMETER.)
00215 M00S00214.sfm +++|* EC = 15. THE SPECIFIED NETWORK STATUS IS NOT VALID.
00216 M00S00215.sfm +++|*
00217 M00S00216.sfm +++|* ( CHECK PARAMETER BLOCK ENTRIES FOR ERROR.)
00218 M00S00217.sfm +++|* EC = 16. AT LEAST ONE PARAMETER BLOCK ENTRY COULD NOT
00219 M00S00218.sfm +++|* BE PROCESSED DUE TO AN ERROR DETECTED. THE CALLER MAY
00220 M00S00219.sfm +++|* NEED TO CHECK EACH PARAMETER ENTRY (BYTE 4) TO DETER-
00221 M00S00220.sfm +++|* MINE WHICH ONES WERE NOT PROCESSED, AND WHY.
00222 M00S00221.sfm +++| SPACE 4
00223 M00S00222.sfm +++|*** ACCOUNT FILE MESSAGES.
00224 M00S00223.sfm +++|*
00225 M00S00224.sfm +++|*
00226 M00S00225.sfm +++|* *SDCA, XXXXXX.XXXSECS.*
00227 M00S00226.sfm +++|* CPU MONITOR PROGRAM MODE TIME.
00228 M00S00227.sfm +++|*
00229 M00S00228.sfm +++|* *SDCM, XXXXXX.XXXKUNS.*
00230 M00S00229.sfm +++|* NUMBER OF STORAGE MOVES.
00231 M00S00230.sfm +++|*
00232 M00S00231.sfm +++|* *SDMR, XXXXXX.XXXKUNS.*
00233 M00S00232.sfm +++|* CONTROL POINTS MOVED.
00234 M00S00233.sfm +++|*
00235 M00S00234.sfm +++|* *SDMS, XXXXXX.XXXKUNS.*
00236 M00S00235.sfm +++|* SECTORS ROLLED.
00237 M00S00236.sfm +++|*
00238 M00S00237.sfm +++|* *SDNF, XXXXXX.XXXKUNS.*
00239 M00S00238.sfm +++|* NUMBER OF FL INCREASES TO NFL.
00240 M00S00239.sfm +++|*
00241 M00S00240.sfm +++|* *SDSF, XXXXXX.XXXKUNS.*
00242 M00S00241.sfm +++|* NUMBER OF TIMES RECALL STACK IS FULL.
00243 M00S00242.sfm +++|*
00244 M00S00243.sfm +++|* *SDTS, XXXXXX.XXXKUNS.*
00245 M00S00244.sfm +++|* JOBS ROLLED DUE TO TIME SLICE.
00246 M00S00245.sfm +++|*
00247 M00S00246.sfm +++|* *SDTO, XXXXXX.XXXKUNS.*
00248 M00S00247.sfm +++|* JOBS ROLLED DUE TO SLICE LIMIT OR TIME SLICE
00249 M00S00248.sfm +++|* WITH OUTPUT PENDING.
00250 M00S00249.sfm +++|*
00251 M00S00250.sfm +++|* *SDPX, XXXXXX.XXXKUNS.*
00252 M00S00251.sfm +++|* PP EXCHANGE PRIORITY REQUESTS.
00253 M00S00252.sfm +++|*
00254 M00S00253.sfm +++|* *ABST, X...X.*
00255 M00S00254.sfm +++|* SYSTEM TITLE.
00256 M00S00255.sfm +++|*
00257 M00S00256.sfm +++|* *ABSV, X...X.*
00258 M00S00257.sfm +++|* SYSTEM VERSION.
00259 M00S00258.sfm +++|*
00260 M00S00259.sfm +++|* *ABSY, YY/MM/DD.*
00261 M00S00260.sfm +++|* BEGINNING OF A NEW ACCOUNT DAYFILE DUE TO
00262 M00S00261.sfm +++|* INITIALIZATION OR TERMINATION ON DATE
00263 M00S00262.sfm +++|* YY/MM/DD.
00264 M00S00263.sfm +++|*
00265 M00S00264.sfm +++|* *AESY, YY/MM/DD.*
00266 M00S00265.sfm +++|* END OF AN ACCOUNT DAYFILE ON DATE YY/MM/DD.
00267 M00S00266.sfm +++| SPACE 4,10
00268 M00S00267.sfm +++|*** ERROR LOG MESSAGES.
00269 M00S00268.sfm +++|*
00270 M00S00269.sfm +++|*
00271 M00S00270.sfm +++|* *CHXX,YYYYYYYYY.* = EQUIPMENT ON CHANNEL XX IS RUNNING WITH
00272 M00S00271.sfm +++|* FIRMWARE REVISION YYYYYYYYY.
00273 M00S00272.sfm +++|*
00274 M00S00273.sfm +++|* *ETXXX, UYY,PS=ZZZZZZ.* = THE PACK ON PHYSICAL UNIT YY OF EST
00275 M00S00274.sfm +++|* ORDINAL XXX OF TYPE ET HAS A SERIAL NUMBER OF ZZZZZZ.
00276 M00S00275.sfm +++| SPACE 4
00277 M00S00276.sfm +++| SPACE 4
00278 M00S00277.sfm +++|** ROUTINES CALLED.
00279 M00S00278.sfm +++|*
00280 M00S00279.sfm +++|*
00281 M00S00280.sfm +++|* 0BF - BEGIN FILE.
00282 M00S00281.sfm +++|* 0DF - DROP FILE.
00283 M00S00282.sfm +++|* 0TD - TERMINATE DAYFILE.
00284 M00S00283.sfm +++|* 0CI - IDENTIFY FIRMWARE.
00285 M00S00284.sfm +++|* 0PI - LIST PACK SERIAL NUMBER.
00286 M00S00285.sfm +++| SPACE 4
00287 M00S00286.sfm +++|*CALL COMPMAC
00288 M00S00287.sfm +++|*CALL COMSCPS
00289 M00S00288.sfm +++|*CALL COMSSSD
00290 M00S00289.sfm +++|*CALL COMSDFS
00291 M00S00290.sfm +++|*CALL COMSEJT
00292 M00S00291.sfm +++|*CALL COMSHIO
00293 M00S00292.sfm +++|*CALL COMSIOQ
00294 M00S00293.sfm +++|*CALL COMSLFD
00295 M00S00294.sfm +++|*CALL COMSMSC
00296 M00S00295.sfm +++|*CALL COMSMSP
00297 M00S00296.sfm +++|*CALL COMSMST
Line S00001 Modification History
M01 (Added by) 252l678
Seq # *Modification Id* Act
----------------------------+
00298 M01S00001.252l678 +++| QUAL COMSMTX
00299 M01S00002.252l678 +++|*CALL COMSMTX
00300 M01S00003.252l678 +++| QUAL *
00301 M00S00297.sfm +++|*CALL COMSPFM
00302 M00S00298.sfm +++|*CALL COMSPIM
00303 M00S00299.sfm +++|*CALL COMSSCD
00304 M00S00300.sfm +++|*CALL COMSSSE
00305 M00S00301.sfm +++|*CALL COMSSSJ
Line S00001 Modification History
M01 (Added by) 282l826
Seq # *Modification Id* Act
----------------------------+
00306 M01S00001.282l826 +++| QUAL TFM
00307 M01S00002.282l826 +++|*CALL COMSTFM
00308 M01S00003.282l826 +++| QUAL *
00309 M00S00302.sfm +++|*CALL COMSMMF
00310 M00S00303.sfm +++|*CALL COMSWEI
00311 M00S00304.sfm +++|*CALL COMSZOL
00312 M00S00305.sfm +++| LIST X
00313 M00S00306.sfm +++|*CALL COMSSFM
00314 M00S00307.sfm +++| LIST *
00315 M00S00308.sfm +++| SPACE 4,10
00316 M00S00309.sfm +++|**** DIRECT LOCATION ASSIGNMENTS.
00317 M00S00310.sfm +++|
00318 M00S00311.sfm +++|
00319 M00S00312.sfm +++| FS EQU 20 - 24 FST ENTRY (5 LOCATIONS)
00320 M00S00313.sfm +++| FT EQU 20 - 21 FIRST
00321 M00S00314.sfm +++| IN EQU 22 - 23 IN
00322 M00S00315.sfm +++| P0 EQU 25 OVERLAY PROCESSOR ADDRESS
00323 M00S00316.sfm +++| HI EQU 25 *FAT* INDEX OF AVAILABLE HOLE
00324 M00S00317.sfm +++| QA EQU 26 FNT ORDINAL
00325 M00S00318.sfm +++| FC EQU 27 *FAT* TABLE COUNT
00326 M00S00319.sfm +++| TY EQU 30 DAYFILE TYPE
00327 M00S00320.sfm +++| DA EQU 30 - 31 LINK DEVICE PARAMETERS
00328 M00S00321.sfm +++| ID EQU 32 MACHINE ID
00329 M00S00322.sfm +++| CN EQU 33 - 37 CM WORD BUFFER
00330 M00S00323.sfm +++| FN EQU 40 - 44 FILE NAME (5 LOCATIONS)
00331 M00S00324.sfm +++| OT EQU 40 - 41 OUT
00332 M00S00325.sfm +++| LM EQU 42 - 43 LIMIT
00333 M00S00326.sfm +++| LS EQU 45 LAST FET STATUS
00334 M00S00327.sfm +++| JC EQU 46 JOB COUNT (MAXIMUM)
00335 M00S00328.sfm +++| MI EQU 46 MACHINE INDEX
00336 M00S00329.sfm +++| BA EQU 47 *FAT* ITEM BASE ADDRESS
00337 M00S00330.sfm +++| FA EQU 57 ADDRESS OF FNT ENTRY
00338 M00S00331.sfm +++| TE EQU 60 NUMBER OF TABLE ENTRIES (FNT)
00339 M00S00332.sfm +++| LO EQU 61 LAST MASS STORAGE ORDINAL + 1
00340 M00S00333.sfm +++| ES EQU 62 - 66 CM WORD BUFFER (EST ENTRY)
00341 M00S00334.sfm +++| FI EQU 67 *FAT* INDEX OF ENTRY / HOLE
00342 M00S00335.sfm +++| SPACE 4,10
00343 M00S00336.sfm +++|** ASSEMBLY CONSTANTS.
00344 M00S00337.sfm +++|
00345 M00S00338.sfm +++|
00346 M00S00339.sfm +++| ILKN EQU 200000 INTERLOCK DAYFILE MESSAGE OPTION
00347 M00S00340.sfm +++|****
00348 M00S00341.sfm +++| TITLE MACRO DEFINITIONS.
00349 M00S00342.sfm +++| ABORT SPACE 4,10
00350 M00S00343.sfm +++|** ABORT - ABORT CONTROL POINT.
00351 M00S00344.sfm +++|*
00352 M00S00345.sfm +++|* ABORT ADDR
00353 M00S00346.sfm +++|*
00354 M00S00347.sfm +++|* ENTRY *ADDR* = MESSAGE ADDRESS.
00355 M00S00348.sfm +++|*
00356 M00S00349.sfm +++|* EXIT TO *ABT*.
00357 M00S00350.sfm +++|
00358 M00S00351.sfm +++|
00359 M00S00352.sfm +++| PURGMAC ABORT
00360 M00S00353.sfm +++|
00361 M00S00354.sfm +++| ABORT MACRO A
00362 M00S00355.sfm +++| MACREF ABORT
00363 M00S00356.sfm +++| LDC A
00364 M00S00357.sfm +++| LJM ABT
00365 M00S00358.sfm +++| ENDM
00366 M00S00359.sfm +++| ENTRY SPACE 4,10
00367 M00S00360.sfm +++|** ENTRY - DEFINE OVERLAY ENTRY NAME.
00368 M00S00361.sfm +++|*
00369 M00S00362.sfm +++|* ENTRY NAME
00370 M00S00363.sfm +++|*
00371 M00S00364.sfm +++|* ENTRY *NAME* = NAME OF PROCESSOR ADDRESS.
00372 M00S00365.sfm +++|
00373 M00S00366.sfm +++|
00374 M00S00367.sfm +++| PURGMAC ENTRY
00375 M00S00368.sfm +++|
00376 M00S00369.sfm +++| MACRO ENTRY,N
00377 M00S00370.sfm +++| MACREF ENTRY
00378 M00S00371.sfm +++| QUAL
00379 M00S00372.sfm +++| N EQU *+1R".M"*10000B
00380 M00S00373.sfm +++| QUAL ".O"
00381 M00S00374.sfm +++| N BSS 0
00382 M00S00375.sfm +++| ENDM
00383 M00S00376.sfm +++| ERROR SPACE 4,10
00384 M00S00377.sfm +++|** ERROR - RETURN ERROR CODE TO FET.
00385 M00S00378.sfm +++|*
00386 M00S00379.sfm +++|* ERROR EC
00387 M00S00380.sfm +++|*
00388 M00S00381.sfm +++|* ENTRY *EC* = ERROR CODE.
00389 M00S00382.sfm +++|*
00390 M00S00383.sfm +++|* EXIT TO *ERR*.
00391 M00S00384.sfm +++|
00392 M00S00385.sfm +++|
00393 M00S00386.sfm +++| PURGMAC ERROR
00394 M00S00387.sfm +++|
00395 M00S00388.sfm +++| ERROR MACRO E
00396 M00S00389.sfm +++| MACREF ERROR
00397 M00S00390.sfm +++| LDN E
00398 M00S00391.sfm +++| LJM ERR
00399 M00S00392.sfm +++| ENDM
Line S00393 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00400 M01S00393.261l700 ---| FCN SPACE 4,10
Line S00001 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00401 M01S00001.261l700 +++| FCN SPACE 4,50
00402 M00S00394.sfm +++|** FCN - DEFINE FUNCTION PROCESSOR.
00403 M00S00395.sfm +++|*
Line S00396 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00404 M01S00396.261l700 ---|* TN FCN F,N,L,P,S,M,E
Line S00002 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00405 M01S00002.261l700 +++|* TN FCN F,N,L,P,S,M,E,A
00406 M00S00397.sfm +++|*
00407 M00S00398.sfm +++|* TN TABLE NAME (FIRST CALL ONLY).
00408 M00S00399.sfm +++|* F FUNCTION CODE.
00409 M00S00400.sfm +++|* N NAME OF FUNCTION PROCESSOR.
00410 M00S00401.sfm +++|* L REQUIRED FET LENGTH - 1.
00411 M00S00402.sfm +++|* P CALLER MUST HAVE SYSTEM ORIGIN PRIVILEGES.
00412 M00S00403.sfm +++|* S CALLER MUST BE SPECIAL SYSTEM JOB (SSJ).
00413 M00S00404.sfm +++|* M MAINTENANCE ACCESS ALLOWED
00414 M00S00405.sfm +++|* E EITHER SSJ= OR SYSTEM ORIGIN PRIVILEGES REQUIRED.
Line S00003 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00415 M01S00003.261l700 +++|* A ALLOW ACCESS IF CALLER HAS PRIVILEGED ANALYST
00416 M01S00004.261l700 +++|* VALIDATION AND IF *PRIVILEGED ANALYST MODE* ENABLED.
00417 M00S00406.sfm +++|*
00418 M00S00407.sfm +++|* TABLE GENERATED.
00419 M00S00408.sfm +++|*
Line S00409 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00420 M01S00409.261l700 ---|*T,TN 12/O,12/N,1/S,1/P,1/M,1/E,2/0,6/L
Figure
TN
0 5 6 7 8 9 10 11 12 23 24 29 L 0 E M P S N O 30 35 O
Line S00005 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00421 M01S00005.261l700 +++|*T,TN 12/O,12/N,1/S,1/P,1/M,1/E,1/A,1/0,6/L
Figure
TN
0 5 6 7 8 9 10 11 12 23 24 29 L 0 A E M P S N O 30 35 O
00422 M00S00410.sfm +++|*
00423 M00S00411.sfm +++|* O OVERLAY NAME (LAST CHARACTER)
00424 M00S00412.sfm +++|* N PROCESSOR ADDRESS
00425 M00S00413.sfm +++|* S SSJ= REQUIRED
00426 M00S00414.sfm +++|* P SYSTEM ORIGIN PRIVILEDGES REQUIRED
00427 M00S00415.sfm +++|* M MAINTENANCE ACCESS ALLOWED
00428 M00S00416.sfm +++|* E EITHER SSJ= OR SYSTEM ORIGIN PRIVILEGES REQUIRED.
Line S00006 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00429 M01S00006.261l700 +++|* A ALLOW ACCESS IF CALLER HAS PRIVILEGED ANALYST
00430 M01S00007.261l700 +++|* VALIDATION AND IF *PRIVILEGED ANALYST MODE* ENABLED.
00431 M00S00417.sfm +++|* L REQUIRED FET LENGTH - 1
00432 M00S00418.sfm +++|
00433 M00S00419.sfm +++|
Line S00420 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00434 M01S00420.261l700 ---| MACRO FCN,TN,F,N,L,P,S,M,E
Line S00008 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00435 M01S00008.261l700 +++| MACRO FCN,TN,F,N,L,P,S,M,E,A
00436 M00S00421.sfm +++| MACREF FCN
Line S00422 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00437 M01S00422.261l700 ---| .D IFC NE,$TN$$
Line S00009 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00438 M01S00009.261l700 +++| .1 IFC NE,$TN$$
00439 M00S00423.sfm +++| TN BSS 0
00440 M00S00424.sfm +++| .T SET TN
Line S00425 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00441 M01S00425.261l700 ---| .D ELSE
Line S00010 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00442 M01S00010.261l700 +++| .1 ELSE
00443 M00S00426.sfm +++| ORG .T+3*F
Line S00427 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00444 M01S00427.261l700 ---| .A IFC NE,$N$$
Line S00011 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00445 M01S00011.261l700 +++| .2 IFC NE,$N$$
00446 M00S00428.sfm +++| LOC F
00447 M00S00429.sfm +++| CON N/10000B,N-N/10000B*10000B
Line S00430 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00448 M01S00430.261l700 ---| .S IFC EQ,$S$SSJ$
Line S00012 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00449 M01S00012.261l700 +++| .3 IFC EQ,$S$SSJ$
00450 M00S00431.sfm +++| VFD 1/1
Line S00432 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00451 M01S00432.261l700 ---| .S ELSE 1
Line S00013 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00452 M01S00013.261l700 +++| .3 ELSE
00453 M00S00433.sfm +++| VFD 1/0
Line S00434 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00454 M01S00434.261l700 ---| .P IFC NE,$P$$
Line S00014 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00455 M01S00014.261l700 +++| .3 ENDIF
00456 M01S00015.261l700 +++| .4 IFC NE,$P$$
00457 M00S00435.sfm +++| VFD 1/1
Line S00436 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00458 M01S00436.261l700 ---| .P ELSE 1
Line S00016 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00459 M01S00016.261l700 +++| .4 ELSE
00460 M00S00437.sfm +++| VFD 1/0
Line S00438 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00461 M01S00438.261l700 ---| .M IFC NE,$M$$
Line S00017 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00462 M01S00017.261l700 +++| .4 ENDIF
00463 M01S00018.261l700 +++| .5 IFC NE,$M$$
00464 M00S00439.sfm +++| VFD 1/1
Line S00440 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00465 M01S00440.261l700 ---| .M ELSE
Line S00019 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00466 M01S00019.261l700 +++| .5 ELSE
00467 M00S00441.sfm +++| VFD 1/0
Line S00442 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00468 M01S00442.261l700 ---| .M ENDIF
00469 M01S00443.261l700 ---| .E IFC NE,$E$$
Line S00020 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00470 M01S00020.261l700 +++| .5 ENDIF
00471 M01S00021.261l700 +++| .6 IFC NE,$E$$
00472 M00S00444.sfm +++| VFD 1/1
Line S00445 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00473 M01S00445.261l700 ---| .E ELSE
Line S00022 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00474 M01S00022.261l700 +++| .6 ELSE
00475 M00S00446.sfm +++| VFD 1/0
Line S00447 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00476 M01S00447.261l700 ---| .E ENDIF
00477 M01S00448.261l700 ---| VFD 2/0
Line S00023 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00478 M01S00023.261l700 +++| .6 ENDIF
00479 M01S00024.261l700 +++| .7 IFC NE,$A$$
00480 M01S00025.261l700 +++| VFD 1/1
00481 M01S00026.261l700 +++| .7 ELSE
00482 M01S00027.261l700 +++| VFD 1/0
00483 M01S00028.261l700 +++| .7 ENDIF
00484 M01S00029.261l700 +++| VFD 1/0
00485 M00S00449.sfm +++| VFD 6/L
Line S00450 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00486 M01S00450.261l700 ---| .A ENDIF
Line S00030 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00487 M01S00030.261l700 +++| .2 ENDIF
00488 M00S00451.sfm +++| BSS 0
Line S00452 Modification History
M01 (Removed by) 261l700
Seq # *Modification Id* Act
----------------------------+
00489 M01S00452.261l700 ---| .D ENDIF
Line S00031 Modification History
M01 (Added by) 261l700
Seq # *Modification Id* Act
----------------------------+
00490 M01S00031.261l700 +++| .1 ENDIF
00491 M00S00453.sfm +++| ENDM
00492 M00S00454.sfm +++| SPACE 4,2
00493 M00S00455.sfm +++| .N SET 0
00494 M00S00456.sfm +++| OVLB MICRO 1,, 3S BASE OVERLAY NAME
00495 M00S00457.sfm +++| OVERLAY SPACE 4,20
00496 M00S00458.sfm +++|** OVERLAY - GENERATE OVERLAY CONSTANTS.
00497 M00S00459.sfm +++|*
00498 M00S00460.sfm +++|* OVERLAY (TEXT),LOAD,NQ
00499 M00S00461.sfm +++|*
00500 M00S00462.sfm +++|* ENTRY *TEXT* = TEXT FOR SUBTITLE.
00501 M00S00463.sfm +++|* *LOAD* = IF SPECIFIED, DEFINE ORIGIN ADDRESS.
00502 M00S00464.sfm +++|* *NQ* = IF SPECIFIED, OVERLAY NOT QUALIFIED.
00503 M00S00465.sfm +++|
00504 M00S00466.sfm +++| PURGMAC OVERLAY
00505 M00S00467.sfm +++|
00506 M00S00468.sfm +++| OVERLAY MACRO TEXT,LOAD,NQ
00507 M00S00469.sfm +++| QUAL
00508 M00S00470.sfm +++| NOREF .N
00509 M00S00471.sfm +++| MACREF OVERLAY
00510 M00S00472.sfm +++| .N SET .N+1
00511 M00S00473.sfm +++| .M MICRO .N,1, ZYXWVUTSRQPONMLKJIHGFEDCBA
00512 M00S00474.sfm +++| .O MICRO 1,3 "OVLB"".M"
00513 M00S00475.sfm +++| IFC EQ,*NQ**,1
00514 M00S00476.sfm +++| QUAL ".O"
00515 M00S00477.sfm +++| TTL SFM/".O" - TEXT
00516 M00S00478.sfm +++| IDENT ".O",OVL TEXT
00517 M00S00479.sfm +++| TITLE
00518 M00S00480.sfm +++|*COMMENT SFM - TEXT
Line S00481 Modification History
M01 (Removed by) 281l803
Seq # *Modification Id* Act
----------------------------+
00519 M01S00481.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP., 1975.
Line S00002 Modification History
M01 (Added by) 281l803
Seq # *Modification Id* Act
----------------------------+
00520 M01S00002.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00521 M00S00482.sfm +++| IFC NE,*LOAD**
00522 M00S00483.sfm +++| ORG LOAD
00523 M00S00484.sfm +++| ELSE 1
00524 M00S00485.sfm +++| ORG OVLA
00525 M00S00486.sfm +++| OVL LJM *
00526 M00S00487.sfm +++| UJN OVL
00527 M00S00488.sfm +++| ENDM
00528 M00S00489.sfm +++| PERR SPACE 4,10
00529 M00S00490.sfm +++|** PERR - PUT ERROR CODE IN PARAMETER BLOCK ENTRY.
00530 M00S00491.sfm +++|*
00531 M00S00492.sfm +++|* PERR EC
00532 M00S00493.sfm +++|*
00533 M00S00494.sfm +++|* ENTRY *EC* = ERROR CODE.
00534 M00S00495.sfm +++|*
00535 M00S00496.sfm +++|* EXIT *EC* PLACED IN BYTE 4 OF PARAMETER BLOCK ENTRY
00536 M00S00497.sfm +++|* AND WORD REWRITTEN TO USER-S FL.
00537 M00S00498.sfm +++|*
00538 M00S00499.sfm +++|* CALLS /3SW/PER.
00539 M00S00500.sfm +++|
00540 M00S00501.sfm +++|
00541 M00S00502.sfm +++| PURGMAC PERR
00542 M00S00503.sfm +++|
00543 M00S00504.sfm +++| PERR MACRO E
00544 M00S00505.sfm +++| MACREF PERR
00545 M00S00506.sfm +++| LDN E
00546 M00S00507.sfm +++| RJM PER
00547 M00S00508.sfm +++| ENDM
00548 M00S00509.sfm +++| SUBSYST SPACE 4,10
00549 M00S00510.sfm +++|** SUBSYST - GENERATE SUBSYSTEM TABLE.
00550 M00S00511.sfm +++|*
00551 M00S00512.sfm +++|* SUBSYST NAME,ID,PR,PP,AUTO,DEF,DCP,CP,PROC,ABT
00552 M00S00513.sfm +++|*
00553 M00S00514.sfm +++|* ENTRY *ID* = SUBSYSTEM ID.
00554 M00S00515.sfm +++|*
00555 M00S00516.sfm +++|* GENERATE TABLE OF *SSSL* BYTES AND MASKS.
00556 M00S00517.sfm +++|*
00557 M00S00518.sfm +++|*T 12/ BYTE, 12/ MASK
00558 M00S00519.sfm +++|
00559 M00S00520.sfm +++|
00560 M00S00521.sfm +++| PURGMAC SUBSYST
00561 M00S00522.sfm +++|
00562 M00S00523.sfm +++| SUBSYST MACRO NM,ID,PT,PP,AU,DF,DC,CP,PR,AB
00563 M00S00524.sfm +++| .SUB RMT
00564 M00S00525.sfm +++| .1 SET MXSI-ID
00565 M00S00526.sfm +++| .21 SET .1/12D
00566 M00S00527.sfm +++| .3 SET 4-.21 *SSSL* BYTE
00567 M00S00528.sfm +++| .4 DECMIC .1-12D*.21
00568 M00S00529.sfm +++| .5 SET 1S".4" *SSSL* MASK
00569 M00S00530.sfm +++| INDEX (MXSI*2-ID*2),(.3,.5)
00570 M00S00531.sfm +++| .SUB RMT
00571 M00S00532.sfm +++| SUBSYST ENDM
00572 M00S00533.sfm +++| TITLE MAIN PROGRAM.
00573 M00S00534.sfm +++| SFM SPACE 4
00574 M00S00535.sfm +++|** SFM - MAIN PROGRAM.
00575 M00S00536.sfm +++|
00576 M00S00537.sfm +++|
00577 M00S00538.sfm +++| ORG PPFW
00578 M00S00539.sfm +++| SFM RJM PRS PRESET PROGRAM
Line S00540 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
00579 M01S00540.ns2357 ---| SFM0 LDC 0
00580 M01S00541.ns2357 ---| SFME EQU *-1 (OVERLAY NAME)
00581 M01S00542.ns2357 ---| ZJN SFM0.0 IF NO OVERLAY REQUIRED
Line S00001 Modification History
M01 (Added by) ns2357
Seq # *Modification Id* Act
----------------------------+
00582 M01S00001.ns2357 +++| SFM1 LDC 0
00583 M01S00002.ns2357 +++| SFMA EQU *-1
00584 M01S00003.ns2357 +++| ZJN SFM2 IF NO OVERLAY LOAD
00585 M00S00543.sfm +++| LMC 2L"OVLB" LOAD OVERLAY
00586 M00S00544.sfm +++| RJM EXR
Line S00545 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
00587 M01S00545.ns2357 ---| SFM0.0 LJM * PROCESS REQUEST
00588 M01S00546.ns2357 ---| SFMA EQU *-1
Line S00004 Modification History
M01 (Added by) ns2357
Seq # *Modification Id* Act
----------------------------+
00589 M01S00004.ns2357 +++| SFM2 LJM * PROCESS REQUEST
00590 M01S00005.ns2357 +++| SFMB EQU *-1
00591 M00S00547.sfm +++|
Line S00548 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
00592 M01S00548.242l642 ---| SFMX LDD FA
00593 M01S00549.242l642 ---| ZJN SFM1 IF NO FNT ENTRY
00594 M01S00550.242l642 ---| AOD FS+4 SET FILE NOT BUSY
00595 M01S00551.242l642 ---| NFA FA,R STORE FST INFORMATION
00596 M01S00552.242l642 ---| ADN FSTL
00597 M01S00553.242l642 ---| CWD FS
Line S00001 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
00598 M01S00001.242l642 +++| SFMX RJM CFB SET FILE NOT BUSY
Line S00554 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
00599 M01S00554.ns2357 ---| SFM1 RJM GFE READ FILE NAME
Line S00006 Modification History
M01 (Added by) ns2357
Seq # *Modification Id* Act
----------------------------+
00600 M01S00006.ns2357 +++| RJM GFE READ FILE NAME
00601 M00S00555.sfm +++| CRD FN
00602 M00S00556.sfm +++| AOD LS SET FET NOT BUSY
00603 M00S00557.sfm +++| STD FN+4
00604 M00S00558.sfm +++| LDD FN+3
00605 M00S00559.sfm +++| SCN 77
00606 M00S00560.sfm +++| LMC 0
Line S00561 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
00607 M01S00561.ns2357 ---| SFMB EQU *-1 (ERROR CODE)
Line S00007 Modification History
M01 (Added by) ns2357
Seq # *Modification Id* Act
----------------------------+
00608 M01S00007.ns2357 +++| SFMC EQU *-1 (ERROR CODE)
00609 M00S00562.sfm +++| STD FN+3
00610 M00S00563.sfm +++| RJM GFE STORE FET STATUS
00611 M00S00564.sfm +++| CWD FN
Line S00565 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
00612 M01S00565.ns2357 ---| SFMC LDN 0 CHECK FOR SYSTEM SECTOR ERROR
00613 M01S00566.ns2357 ---|* LDN 1 (SET IF SYSTEM SECTOR ERROR)
00614 M01S00567.ns2357 ---| ZJN SFM2 IF NO ERROR
Line S00008 Modification History
M01 (Added by) ns2357
Seq # *Modification Id* Act
----------------------------+
00615 M01S00008.ns2357 +++| SFMD LDN 0
00616 M01S00009.ns2357 +++| ZJN SFM3 IF NO SYSTEM SECTOR ERROR
00617 M00S00568.sfm +++| LDC ERFS * FAST ATTACH SYSTEM SECTOR ERROR.*
00618 M00S00569.sfm +++| RJM DFM
Line S00570 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
00619 M01S00570.ns2357 ---| SFM2 LDN 0 CHECK FOR LOCAL AREA CHECKPOINT
00620 M01S00571.ns2357 ---|* LDN 1 IF LOCAL AREA CHECKPOINT REQUESTED
00621 M01S00572.ns2357 ---| SFMD EQU *-1
00622 M01S00573.ns2357 ---| ZJN DPP IF CHECKPOINT NOT REQUESTED
Line S00010 Modification History
M01 (Added by) ns2357
Seq # *Modification Id* Act
----------------------------+
00623 M01S00010.ns2357 +++| SFM3 LDM SFMF
00624 M01S00011.ns2357 +++| ZJN DPP IF OPERATION COMPLETE
00625 M01S00012.ns2357 +++| STD T1
00626 M00S00574.sfm +++| LDD T5
00627 M00S00575.sfm +++| STM CKPA+3 SET EQUIPMENT IN REQUEST
00628 M00S00576.sfm +++| LDD CP SET CONTROL POINT
00629 M00S00577.sfm +++| SHN -7
Line S00578 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
00630 M01S00578.ns2357 ---| RAM CKPA+1
00631 M01S00579.ns2357 ---| LDD IA CALL *1CK*
00632 M01S00580.ns2357 ---| CWM CKPA,ON
00633 M01S00581.ns2357 ---| EXECUTE 1CK,=
00634 M01S00582.ns2357 ---| UJN SFM3 EXIT TO PP RESIDENT
Line S00013 Modification History
M01 (Added by) ns2357
Seq # *Modification Id* Act
----------------------------+
00635 M01S00013.ns2357 +++| RAM 1,T1
00636 M01S00014.ns2357 +++| LDD IA STORE INPUT REGISTER
00637 M01S00015.ns2357 +++| CWM 0,ON
00638 M01S00016.ns2357 +++| SFMF EQU *-1
00639 M01S00017.ns2357 +++| EXECUTE CPD,=
00640 M01S00018.ns2357 +++| EXECUTE 1CK,=
00641 M01S00019.ns2357 +++| UJN SFM4 EXIT TO PP RESIDENT
00642 M00S00583.sfm +++|
00643 M00S00584.sfm +++| DPP MONITOR DPPM DROP PP
Line S00585 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
00644 M01S00585.ns2357 ---| SFM3 LJM PPR EXIT TO PP RESIDENT
Line S00020 Modification History
M01 (Added by) ns2357
Seq # *Modification Id* Act
----------------------------+
00645 M01S00020.ns2357 +++| SFM4 LJM PPR EXIT TO PP RESIDENT
00646 M00S00586.sfm +++|
00647 M00S00587.sfm +++| CKPA VFD 18/3R1CK,6/40,12/4,24/0
00648 M00S00588.sfm +++| ERFS DATA C* SFM FAST ATTACH SYSTEM SECTOR ERROR.*
00649 M00S00589.sfm +++|
00650 M00S00590.sfm +++| FETL CON 0 FET LENGTH REQUIRED FOR FUNCTION
00651 M00S00591.sfm +++| TITLE RESIDENT SUBROUTINES.
00652 M00S00592.sfm +++| ABT SPACE 4
00653 M00S00593.sfm +++|** ABT - ABORT JOB.
00654 M00S00594.sfm +++|*
00655 M00S00595.sfm +++|* ENTRY (A) = FWA OF MESSAGE.
00656 M00S00596.sfm +++|*
00657 M00S00597.sfm +++|* EXIT TO *ERR1*.
00658 M00S00598.sfm +++|* (DA) = ADDRESS OF MESSAGE.
00659 M00S00599.sfm +++|*
00660 M00S00600.sfm +++|* CALLS CFI.
00661 M00S00601.sfm +++|
00662 M00S00602.sfm +++|
00663 M00S00603.sfm +++| ABT BSS 0 ENTRY
00664 M00S00604.sfm +++| STD DA
00665 M00S00605.sfm +++| LDC 0
00666 M00S00606.sfm +++|* LDC 1 (*DATI* INTERLOCK SET)
00667 M00S00607.sfm +++|* LDC 2 (*DATI* AND *FATI* INTERLOCK SET)
00668 M00S00608.sfm +++| ABTB EQU *-1
00669 M00S00609.sfm +++| ZJN ABT0 IF NO FLAG REGISTER INTERLOCKS SET
00670 M00S00610.sfm +++| LDN DATI CLEAR *DATI* INTERLOCK
00671 M00S00611.sfm +++| RJM /3SY/CFI
00672 M00S00612.sfm +++| ZJN ABT0 IF *FATI* INTERLOCK NOT SET
00673 M00S00613.sfm +++| LDN FATI CLEAR *FATI* INTERLOCK
00674 M00S00614.sfm +++| RJM /3SY/CFI
00675 M00S00615.sfm +++| ABT0 LDC ABP
00676 M00S00616.sfm +++| UJN ERR1 LOAD ERROR PROCESSING OVERLAY
00677 M00S00617.sfm +++| ERR SPACE 4,10
00678 M00S00618.sfm +++|** ERR - ERROR EXIT PROCESSOR.
00679 M00S00619.sfm +++|*
00680 M00S00620.sfm +++|* ENTRY (A) = ERROR CODE.
00681 M00S00621.sfm +++|*
00682 M00S00622.sfm +++|* EXIT TO *SFM0*.
00683 M00S00623.sfm +++|*
00684 M00S00624.sfm +++|* USES DA.
00685 M00S00625.sfm +++|
00686 M00S00626.sfm +++|
00687 M00S00627.sfm +++| ERR BSS 0 ENTRY
00688 M00S00628.sfm +++| STD DA
00689 M00S00629.sfm +++| LDC ERP
Line S00630 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
00690 M01S00630.ns2357 ---| ERR1 STM SFMA SET PROCESSOR ADDRESS
00691 M01S00631.ns2357 ---| SHN -14
00692 M01S00632.ns2357 ---| STM SFME
00693 M01S00633.ns2357 ---| LJM SFM0 LOAD ERROR PROCESSOR OVERLAY
Line S00021 Modification History
M01 (Added by) ns2357
Seq # *Modification Id* Act
----------------------------+
00694 M01S00021.ns2357 +++| ERR1 STM SFMB SET PROCESSOR ADDRESS
00695 M01S00022.ns2357 +++| SHN -14
00696 M01S00023.ns2357 +++| STM SFMA
00697 M01S00024.ns2357 +++| LJM SFM1 LOAD ERROR PROCESSING OVERLAY
00698 M00S00634.sfm +++| ERS SPACE 4,10
00699 M00S00635.sfm +++|** ERS - ENTER PP RECALL STACK.
00700 M00S00636.sfm +++|*
00701 M00S00637.sfm +++|* ENTRY (A) = RECALL STACK REASON CODE.
00702 M00S00638.sfm +++|*
00703 M00S00639.sfm +++|* EXIT TO *PPR*.
00704 M00S00640.sfm +++|*
00705 M00S00641.sfm +++|* USES CM - CM+5.
00706 M00S00642.sfm +++|*
00707 M00S00643.sfm +++|* MACROS MONITOR.
00708 M00S00644.sfm +++|
00709 M00S00645.sfm +++|
00710 M00S00646.sfm +++| ERS BSS 0 ENTRY
00711 M00S00647.sfm +++| STD CM SAVE RECALL STACK REASON CODE
00712 M00S00648.sfm +++| LDN ZERL
00713 M00S00649.sfm +++| CRD CM+1
00714 M00S00650.sfm +++| LDD MA RECALL *SFM*
00715 M00S00651.sfm +++| CWD IR
00716 M00S00652.sfm +++| ADN 1
00717 M00S00653.sfm +++| CWD CM
00718 M00S00654.sfm +++| MONITOR RECM
00719 M00S00655.sfm +++| LJM PPR EXIT TO PP RESIDENT
Line S00002 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
00720 M01S00002.242l642 +++| CFB SPACE 4,10
00721 M01S00003.242l642 +++|** CFB - CLEAR FILE BUSY.
00722 M01S00004.242l642 +++|*
00723 M01S00005.242l642 +++|* ENTRY (FA) = FNT ADDRESS OF BUSY FILE.
00724 M01S00006.242l642 +++|* (FS - FS+4) = FST INFORMATION.
00725 M01S00007.242l642 +++|*
00726 M01S00008.242l642 +++|* EXIT (A) = (FA) = 0.
00727 M01S00009.242l642 +++|*
00728 M01S00010.242l642 +++|* MACROS NFA.
00729 M01S00011.242l642 +++|
00730 M01S00012.242l642 +++|
00731 M01S00013.242l642 +++| CFB SUBR ENTRY/EXIT
00732 M01S00014.242l642 +++| LDD FA
00733 M01S00015.242l642 +++| ZJN CFBX IF NO FILE ASSIGNED
00734 M01S00016.242l642 +++| AOD FS+4
00735 M01S00017.242l642 +++| NFA FA,R CLEAR FILE BUSY
00736 M01S00018.242l642 +++| ADN FSTL
00737 M01S00019.242l642 +++| CWD FS
00738 M01S00020.242l642 +++| LDN 0 CLEAR FNT ADDRESS
00739 M01S00021.242l642 +++| STD FA
00740 M01S00022.242l642 +++| UJN CFBX RETURN
00741 M00S00656.sfm +++| DRF SPACE 4,15
00742 M00S00657.sfm +++|** DRF - DROP FILE.
00743 M00S00658.sfm +++|*
00744 M00S00659.sfm +++|* ENTRY (FA) = INDEX OF FNT ENTRY.
00745 M00S00660.sfm +++|*
Line S00661 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
00746 M01S00661.242l642 ---|* EXIT (FA) = 0.
Line S00023 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
00747 M01S00023.242l642 +++|* EXIT (A) = (FA) = 0.
00748 M01S00024.242l642 +++|*
00749 M01S00025.242l642 +++|* ERROR TO *EER* IF MASS STORAGE DEVICE INACCESSIBLE.
00750 M00S00662.sfm +++|*
00751 M00S00663.sfm +++|* CALLS *0DF*.
00752 M00S00664.sfm +++|
00753 M00S00665.sfm +++|
Line S00026 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2358
Seq # *Modification Id* Act
----------------------------+
00754 M02S00026.ns2358 ---| DRF1 STD FA CLEAR FNT ADDRESS
00755 M02S00027.ns2358 ---|
00756 M00S00666.sfm +++| DRF SUBR ENTRY/EXIT
00757 M00S00667.sfm +++| LDN 1 SET *UNLOAD* FILE FLAG FOR *0DF*
00758 M00S00668.sfm +++| STM OVL0-1
00759 M00S00669.sfm +++| EXECUTE 0DF,OVL0
Line S00670 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
00760 M01S00670.242l642 ---| LDN 0 CLEAR FNT INDEX
00761 M01S00671.242l642 ---| STD FA
00762 M01S00672.242l642 ---| UJN DRFX RETURN
Line S00028 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2358
Seq # *Modification Id* Act
----------------------------+
00763 M02S00028.ns2358 ---| ZJN DRF1 IF FILE RELEASED
Line S00001 Modification History
M01 (Added by) ns2358
Seq # *Modification Id* Act
----------------------------+
00764 M01S00001.ns2358 +++| ZJN DRFX IF FILE RELEASED
Line S00029 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
00765 M01S00029.242l642 +++|* UJN EER EVALUATE MASS STORAGE ERROR RETURN
00766 M01S00030.242l642 +++| EER SPACE 4,15
00767 M01S00031.242l642 +++|** EER - EVALUATE MASS STORAGE ERROR RETURN.
00768 M01S00032.242l642 +++|*
00769 M01S00033.242l642 +++|* ENTRY (T5) = EST ORDINAL.
00770 M01S00034.242l642 +++|*
00771 M01S00035.242l642 +++|* EXIT JOB IS ROLLED OUT TO WAIT FOR A DEVICE TO BECOME
00772 M01S00036.242l642 +++|* ACCESSIBLE IF A NON-SUBSYSTEM JOB ENCOUNTERED A
00773 M01S00037.242l642 +++|* RECOVERABLE READ/WRITE ERROR ON THE DEVICE.
00774 M01S00038.242l642 +++|*
00775 M01S00039.242l642 +++|* USES IR+4.
00776 M01S00040.242l642 +++|*
00777 M01S00041.242l642 +++|* CALLS CFB, RTI, *1RJ*.
00778 M01S00042.242l642 +++|*
Line S00043 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2358
Seq # *Modification Id* Act
----------------------------+
00779 M02S00043.ns2358 ---|* MACROS ERROR, EXECUTE, PAUSE.
Line S00002 Modification History
M01 (Added by) ns2358
Seq # *Modification Id* Act
----------------------------+
00780 M01S00002.ns2358 +++|* MACROS ENDMS, ERROR, EXECUTE, PAUSE.
Line S00044 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
00781 M01S00044.242l642 +++|
00782 M01S00045.242l642 +++|
Line S00046 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2358
Seq # *Modification Id* Act
----------------------------+
00783 M02S00046.ns2358 ---| EER RJM RTI RELEASE TRACK INTERLOCK
Line S00003 Modification History
M01 (Added by) ns2358
Seq # *Modification Id* Act
----------------------------+
00784 M01S00003.ns2358 +++| EER ENDMS
00785 M01S00004.ns2358 +++| RJM RTI RELEASE TRACK INTERLOCK
Line S00047 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
00786 M01S00047.242l642 +++| LDM RDCT
00787 M01S00048.242l642 +++| SHN 21-12
00788 M01S00049.242l642 +++| PJN EER2 IF RECOVERABLE ERROR
00789 M01S00050.242l642 +++| EER1 ERROR /ERR/RMS
00790 M01S00051.242l642 +++|
00791 M01S00052.242l642 +++| EER2 LDM MSD CHECK CALLER
00792 M01S00053.242l642 +++| SHN 21-13
00793 M01S00054.242l642 +++| PJN EER1 IF SUBSYSTEM
00794 M01S00055.242l642 +++| PAUSE
00795 M01S00056.242l642 +++| LDD CM+1
00796 M01S00057.242l642 +++| NJP SFMX IF ERROR FLAG SET
00797 M01S00058.242l642 +++| RJM CFB
00798 M01S00059.242l642 +++| LDD T5 SET EST ORDINAL
00799 M01S00060.242l642 +++| STD IR+4
00800 M01S00061.242l642 +++| EXECUTE 1RJ RECALL JOB
00801 M00S00673.sfm +++| EFN SPACE 4
00802 M00S00674.sfm +++|** EFN - ENTER FILE NAME.
00803 M00S00675.sfm +++|*
00804 M00S00676.sfm +++|* ENTRY (FN - FN+4) = FILE NAME.
00805 M00S00677.sfm +++|*
00806 M00S00678.sfm +++|* EXIT (FA) = INDEX OF FNT ENTRY.
00807 M00S00679.sfm +++|* (FS - FS+4) = FST ENTRY.
00808 M00S00680.sfm +++|*
00809 M00S00681.sfm +++|* CALLS VFN, *0BF*.
00810 M00S00682.sfm +++|*
00811 M00S00683.sfm +++|* MACROS ABORT, EXECUTE.
00812 M00S00684.sfm +++|
00813 M00S00685.sfm +++|
00814 M00S00686.sfm +++| EFN SUBR ENTRY/EXIT
00815 M00S00687.sfm +++| RJM VFN VERIFY FILE NAME
00816 M00S00688.sfm +++| NJN EFN1 IF NO ERROR
00817 M00S00689.sfm +++| ABORT /MESS/ERFN * SFM FILE NAME ERROR.*
00818 M00S00690.sfm +++|
00819 M00S00691.sfm +++| EFN1 LDN 0 SELECT NO RETURN WITHOUT FILE CREATED
00820 M00S00692.sfm +++| STM OVL0-1
00821 M00S00693.sfm +++| LDN NEEQ ASSIGN NULL EQUIPMENT
00822 M00S00694.sfm +++| STD FS
00823 M00S00695.sfm +++| EXECUTE 0BF,OVL0
00824 M00S00696.sfm +++| UJN EFNX RETURN WITH NEW FILE CREATED
00825 M00S00697.sfm +++|
00826 M00S00698.sfm +++|* PROCESS ADVANCE EXIT FROM *0BF* IF FILE ALREADY EXISTS.
00827 M00S00699.sfm +++|
00828 M00S00700.sfm +++| LDN 0 CLEAR FNT ENTRY ADDRESS
00829 M00S00701.sfm +++| STD FA
00830 M00S00702.sfm +++| ABORT /MESS/ERDF * SFM DUPLICATE FILE FOUND.*
00831 M00S00703.sfm +++| FDB SPACE 4,10
00832 M00S00704.sfm +++|** FDB - FLUSH DAYFILE BUFFER.
00833 M00S00705.sfm +++|*
00834 M00S00706.sfm +++|* ENTRY (A) = ADDRESS OF TERMINATING MESSAGE.
00835 M00S00707.sfm +++|* (TY) = DAYFILE TYPE.
00836 M00S00708.sfm +++|*
00837 M00S00709.sfm +++|* EXIT DAYFILE BUFFER FLUSHED.
00838 M00S00710.sfm +++|*
Line S00711 Modification History
M01 (Removed by) 251l664
Seq # *Modification Id* Act
----------------------------+
00839 M01S00711.251l664 ---|* CALLS DFM, SDA, *0TD*.
Line S00001 Modification History
M01 (Added by) 251l664
Seq # *Modification Id* Act
----------------------------+
00840 M01S00001.251l664 +++|* CALLS DFM, *0TD*.
00841 M00S00712.sfm +++|*
00842 M00S00713.sfm +++|* MACROS EXECUTE.
00843 M00S00714.sfm +++|
00844 M00S00715.sfm +++|
00845 M00S00716.sfm +++| FDB SUBR ENTRY/EXIT
00846 M00S00717.sfm +++| LMC ILKN ADD INTERLOCK REQUEST
00847 M00S00718.sfm +++| RJM DFM ISSUE DAYFILE MESSAGE
00848 M00S00719.sfm +++| LDD TY
Line S00720 Modification History
M01 (Removed by) 251l664
Seq # *Modification Id* Act
----------------------------+
00849 M01S00720.251l664 ---| ZJN FDB1 IF JOB DAYFILE
00850 M01S00721.251l664 ---| RJM SDA SET DAYFILE POINTER ADDRESS
00851 M01S00722.251l664 ---| SBN 2
00852 M01S00723.251l664 ---| FDB1 STM OVL0-1
Line S00002 Modification History
M01 (Added by) 251l664
Seq # *Modification Id* Act
----------------------------+
00853 M01S00002.251l664 +++| STM OVL0-1 SET *0TD* PARAMETER
00854 M00S00724.sfm +++| EXECUTE 0TD,OVL0 FLUSH BUFFER
00855 M00S00725.sfm +++| UJN FDBX RETURN
00856 M00S00726.sfm +++| GFE SPACE 4,5
00857 M00S00727.sfm +++|** GFE - GET FET ADDRESS.
00858 M00S00728.sfm +++|*
00859 M00S00729.sfm +++|* EXIT (A) = FET ADDRESS.
00860 M00S00730.sfm +++|
00861 M00S00731.sfm +++|
00862 M00S00732.sfm +++| GFE SUBR ENTRY/EXIT
00863 M00S00733.sfm +++| LDD IR+3
00864 M00S00734.sfm +++| SHN 6
00865 M00S00735.sfm +++| ADD RA
00866 M00S00736.sfm +++| SHN 6
00867 M00S00737.sfm +++| ADD IR+4
00868 M00S00738.sfm +++| UJN GFEX RETURN
00869 M00S00739.sfm +++| LLT SPACE 4,10
00870 M00S00740.sfm +++|** LLT - LOCATE LABEL TRACK.
00871 M00S00741.sfm +++|*
00872 M00S00742.sfm +++|* ENTRY (T5) = EST ORDINAL.
00873 M00S00743.sfm +++|*
00874 M00S00744.sfm +++|* EXIT (A) = (T6) = LABEL TRACK.
00875 M00S00745.sfm +++|* (CM - CM+4) = EST ENTRY.
00876 M00S00746.sfm +++|* (T0 - T4) = *ALGL* WORD OF MST.
00877 M00S00747.sfm +++|*
00878 M00S00748.sfm +++|* USES T6, CM - CM+4, T0 - T4.
00879 M00S00749.sfm +++|
00880 M00S00750.sfm +++|
00881 M00S00751.sfm +++| LLT SUBR ENTRY/EXIT
00882 M00S00752.sfm +++| SFA EST,T5 READ EST ENTRY
00883 M00S00753.sfm +++| ADK EQDE
00884 M00S00754.sfm +++| CRD CM
00885 M00S00755.sfm +++| LDD CM+4 READ *ALGL* WORD FROM THE MST
00886 M00S00756.sfm +++| SHN 3
00887 M00S00757.sfm +++| ADN ALGL
00888 M00S00758.sfm +++| CRD T0
00889 M00S00759.sfm +++| LDD T0+1 SET LABEL TRACK
00890 M00S00760.sfm +++| STD T6
00891 M00S00761.sfm +++| UJN LLTX RETURN
00892 M00S00762.sfm +++| SDA SPACE 4,8
00893 M00S00763.sfm +++|** SDA - SET DAYFILE POINTER ADDRESS.
00894 M00S00764.sfm +++|*
00895 M00S00765.sfm +++|* ENTRY (TY) = DAYFILE TYPE.
00896 M00S00766.sfm +++|* = 0 IF USER DAYFILE.
00897 M00S00767.sfm +++|*
00898 M00S00768.sfm +++|* EXIT (A) = ADDRESS OF DAYFILE POINTER FST.
00899 M00S00769.sfm +++|*
00900 M00S00770.sfm +++|* MACROS NFA.
00901 M00S00771.sfm +++|
00902 M00S00772.sfm +++|
00903 M00S00773.sfm +++| SDA1 NFA DAPN+2 SET ADDRESS OF JOB DAYFILE FST
00904 M00S00774.sfm +++|
00905 M00S00775.sfm +++| SDA SUBR ENTRY/EXIT
00906 M00S00776.sfm +++| LDD TY
00907 M00S00777.sfm +++| ZJN SDA1 IF USER DAYFILE
00908 M00S00778.sfm +++| STD T0
00909 M00S00779.sfm +++| SHN 1
00910 M00S00780.sfm +++| ADD T0
Line S00781 Modification History
M01 (Removed by) 251l664
Seq # *Modification Id* Act
----------------------------+
00911 M01S00781.251l664 ---| ADC * SYSTEM DAYFILES POINTER ADDRESS
00912 M01S00782.251l664 ---| SDAA EQU *-1
Line S00003 Modification History
M01 (Added by) 251l664
Seq # *Modification Id* Act
----------------------------+
00913 M01S00003.251l664 +++| SDAA ADC ** (FWA-1 OF DAYFILE POINTERS)
00914 M00S00783.sfm +++| UJN SDAX RETURN
00915 M00S00784.sfm +++| SDT SPACE 4,10
00916 M00S00785.sfm +++|** SDT - SET DAYFILE TYPE.
00917 M00S00786.sfm +++|*
00918 M00S00787.sfm +++|* EXIT (TY) = DAYFILE TYPE.
00919 M00S00788.sfm +++|* (CN - CN+4) = WORD 7 OF FET.
00920 M00S00789.sfm +++|*
00921 M00S00790.sfm +++|* CALLS GFE.
00922 M00S00791.sfm +++|
00923 M00S00792.sfm +++|
00924 M00S00793.sfm +++| SDT SUBR ENTRY/EXIT
00925 M00S00794.sfm +++| RJM GFE READ FET+7
00926 M00S00795.sfm +++| ADN 7
00927 M00S00796.sfm +++| CRD CN
00928 M00S00797.sfm +++| LDD CN+3 SET DAYFILE TYPE
00929 M00S00798.sfm +++| LPN 77
00930 M00S00799.sfm +++| STD TY
00931 M00S00800.sfm +++| ZJN SDT1 IF INCORRECT TYPE
00932 M00S00801.sfm +++| SBN EXDF+1
00933 M00S00802.sfm +++| MJN SDTX IF VALID DAYFILE TYPE
00934 M00S00803.sfm +++| SDT1 ABORT /MESS/ERDC * SFM INCORRECT DEVICE CODE.*
Line S00062 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
00935 M01S00062.242l642 +++| RMS SPACE 4,10
00936 M01S00063.242l642 +++|** RMS - READ MASS STORAGE.
00937 M01S00064.242l642 +++|*
00938 M01S00065.242l642 +++|* ENTRY (A) = BUFFER ADDRESS.
00939 M01S00066.242l642 +++|* (T5 - T7) = MASS STORAGE PARAMETERS.
00940 M01S00067.242l642 +++|*
00941 M01S00068.242l642 +++|* EXIT (A) .GE. 0.
00942 M01S00069.242l642 +++|*
00943 M01S00070.242l642 +++|* ERROR TO *EER*.
00944 M01S00071.242l642 +++|*
00945 M01S00072.242l642 +++|* CALLS RDS.
00946 M01S00073.242l642 +++|
00947 M01S00074.242l642 +++|
00948 M01S00075.242l642 +++| RMS SUBR ENTRY/EXIT
00949 M01S00076.242l642 +++| RJM RDS
00950 M01S00077.242l642 +++| PJN RMSX IF SUCCESSFUL READ
00951 M01S00078.242l642 +++| LJM EER EVALUATE ERROR RETURN
00952 M01S00079.242l642 +++| RTI SPACE 4,10
00953 M01S00080.242l642 +++|** RTI - RELEASE TRACK INTERLOCK.
00954 M01S00081.242l642 +++|*
00955 M01S00082.242l642 +++|* ENTRY (RTIA) = TRACK NUMBER IF TRACK INTERLOCKED.
00956 M01S00083.242l642 +++|*
00957 M01S00084.242l642 +++|* EXIT (A) = (RTIA) = 0.
00958 M01S00085.242l642 +++|*
00959 M01S00086.242l642 +++|* CALLS CTI.
00960 M01S00087.242l642 +++|
00961 M01S00088.242l642 +++|
00962 M01S00089.242l642 +++| RTI SUBR ENTRY/EXIT
00963 M01S00090.242l642 +++| LDC 0
00964 M01S00091.242l642 +++| RTIA EQU *-1
00965 M01S00092.242l642 +++| ZJN RTIX IF NO TRACK INTERLOCK
00966 M01S00093.242l642 +++| RJM CTI
00967 M01S00094.242l642 +++|* LDN 0 CLEAR INTERLOCK STATUS
00968 M01S00095.242l642 +++| STM RTIA
00969 M01S00096.242l642 +++| UJN RTIX RETURN
00970 M01S00097.242l642 +++| WMS SPACE 4,10
00971 M01S00098.242l642 +++|** WMS - WRITE MASS STORAGE.
00972 M01S00099.242l642 +++|*
00973 M01S00100.242l642 +++|* ENTRY (A) = BUFFER ADDRESS.
00974 M01S00101.242l642 +++|* (T5 - T7) = MASS STORAGE PARAMETERS.
00975 M01S00102.242l642 +++|*
00976 M01S00103.242l642 +++|* EXIT (A) .GE. 0.
00977 M01S00104.242l642 +++|*
00978 M01S00105.242l642 +++|* ERROR TO *EER*.
00979 M01S00106.242l642 +++|*
00980 M01S00107.242l642 +++|* CALLS WDS.
00981 M01S00108.242l642 +++|
00982 M01S00109.242l642 +++|
00983 M01S00110.242l642 +++| WMS SUBR ENTRY/EXIT
00984 M01S00111.242l642 +++| RJM WDS
00985 M01S00112.242l642 +++| PJN WMSX IF SUCCESSFUL WRITE
00986 M01S00113.242l642 +++| LJM EER EVALUATE ERROR RETURN
00987 M00S00804.sfm +++| WTI SPACE 4,15
00988 M00S00805.sfm +++|** WTI - WAIT FOR TRACK INTERLOCK.
00989 M00S00806.sfm +++|*
00990 M00S00807.sfm +++|* ENTRY (T5) = EQUIPMENT.
00991 M00S00808.sfm +++|* (T6) = TRACK.
00992 M00S00809.sfm +++|*
00993 M00S00810.sfm +++|* EXIT (A) = 0, IF INTERLOCK SET.
00994 M00S00811.sfm +++|* = 1, IF *ORET* ERROR FLAG SET IN CPA.
00995 M00S00812.sfm +++|*
00996 M00S00813.sfm +++|* USES CM - CM+4.
00997 M00S00814.sfm +++|*
00998 M00S00815.sfm +++|* CALLS STI.
00999 M00S00816.sfm +++|*
01000 M00S00817.sfm +++|* MACROS DELAY, PAUSE.
01001 M00S00818.sfm +++|
01002 M00S00819.sfm +++|
Line S00001 Modification History
M01 (Added by) sfm22
Seq # *Modification Id* Act
----------------------------+
01003 M01S00001.sfm22 +++| WTI3 LDN 1 RETURN WITH ERROR
01004 M01S00002.sfm22 +++|
01005 M00S00820.sfm +++| WTI SUBR ENTRY/EXIT
01006 M00S00821.sfm +++| WTI1 RJM STI SET TRACK INTERLOCK
01007 M00S00822.sfm +++| ZJN WTIX IF INTERLOCK SET
Line S00823 Modification History
M01 (Removed by) sfm22
Seq # *Modification Id* Act
----------------------------+
01008 M01S00823.sfm22 ---| DELAY
Line S00003 Modification History
M01 (Added by) sfm22
Seq # *Modification Id* Act
----------------------------+
01009 M01S00003.sfm22 +++|
01010 M01S00004.sfm22 +++|* DELAY 100 MILLISECONDS AND RETRY.
01011 M01S00005.sfm22 +++|
01012 M01S00006.sfm22 +++| LDC 1400
01013 M01S00007.sfm22 +++| STD T0
01014 M01S00008.sfm22 +++| WTI2 DELAY
01015 M00S00824.sfm +++| PAUSE
01016 M00S00825.sfm +++| LDD CM+1
01017 M00S00826.sfm +++| LMN ORET
Line S00827 Modification History
M01 (Removed by) sfm22
Seq # *Modification Id* Act
----------------------------+
01018 M01S00827.sfm22 ---| NJN WTI1 IF *ORET* ERROR FLAG NOT SET
01019 M01S00828.sfm22 ---| LDN 1
01020 M01S00829.sfm22 ---| UJN WTIX RETURN WITH ERROR
Line S00009 Modification History
M01 (Added by) sfm22
Seq # *Modification Id* Act
----------------------------+
01021 M01S00009.sfm22 +++| ZJN WTI3 IF *ORET* ERROR FLAG SET
01022 M01S00010.sfm22 +++| SOD T0
01023 M01S00011.sfm22 +++| PJN WTI2 IF MORE DELAY REQUIRED
01024 M01S00012.sfm22 +++| UJN WTI1 LOOP TO RETRY INTERLOCK
01025 M00S00830.sfm +++| SPACE 4
01026 M00S00831.sfm +++|* COMMON DECKS.
01027 M00S00832.sfm +++|
01028 M00S00833.sfm +++|
01029 M00S00834.sfm +++|*CALL COMPCTI
01030 M00S00835.sfm +++|*CALL COMPDTS
01031 M00S00836.sfm +++| EJT$ EQU 0 DEFINE *COMPGFP* ACCESS TO EJT
01032 M00S00837.sfm +++| FNT$ EQU 0 DEFINE *COMPGFP* ACCESS TO FNT
01033 M00S00838.sfm +++| IFP$ EQU 0 GENERATE *IFP* REMOTE CODE
Line S00001 Modification History
M01 (Added by) 271l750
Seq # *Modification Id* Act
----------------------------+
01034 M01S00001.271l750 +++| JCB$ EQU 0 DEFINE *COMPGFP* ACCESS TO JCB
01035 M00S00839.sfm +++|*CALL COMPGFP
01036 M00S00840.sfm +++|*CALL COMPRLA
Line S00841 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
01037 M01S00841.242l642 ---|*CALL COMPRSS
01038 M00S00842.sfm +++|*CALL COMPSAF
01039 M00S00843.sfm +++|*CALL COMPSEI
01040 M00S00844.sfm +++|*CALL COMPSFB
01041 M00S00845.sfm +++|*CALL COMPSTI
01042 M00S00846.sfm +++|*CALL COMPVFN
Line S00114 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
01043 M01S00114.242l642 +++| QUAL MIO
01044 M01S00115.242l642 +++| QUAL$ EQU 1
01045 M01S00116.242l642 +++| RDS EQU RMS
01046 M01S00117.242l642 +++| WDS EQU WMS
01047 M01S00118.242l642 +++|*CALL COMPRSS
01048 M00S00847.sfm +++|*CALL COMPWEI
01049 M00S00848.sfm +++|*CALL COMPWSS
Line S00119 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
01050 M01S00119.242l642 +++| QUAL *
01051 M01S00120.242l642 +++| RSS EQU /MIO/RSS
01052 M01S00121.242l642 +++| WEI EQU /MIO/WEI
01053 M01S00122.242l642 +++| WSS EQU /MIO/WSS
01054 M00S00849.sfm +++| CFS SPACE 4,10
01055 M00S00850.sfm +++|** CFS - CHECK FILE STATUS.
01056 M00S00851.sfm +++|*
01057 M00S00852.sfm +++|* ENTRY (FA) = INDEX OF FNT ENTRY.
01058 M00S00853.sfm +++|*
01059 M00S00854.sfm +++|* EXIT (FS - FS+4) = FST ENTRY.
01060 M00S00855.sfm +++|* (ES - ES+4) = FILE EQUIPMENT EST ENTRY.
01061 M00S00856.sfm +++|* (CM - CM+4) = FNT ENTRY.
01062 M00S00857.sfm +++|* (T5) = EST ORDINAL.
01063 M00S00858.sfm +++|* (T6) = FIRST TRACK.
01064 M00S00859.sfm +++|*
01065 M00S00860.sfm +++|* CALLS SFB.
01066 M00S00861.sfm +++|*
01067 M00S00862.sfm +++|* MACROS ABORT, SFA.
01068 M00S00863.sfm +++|
01069 M00S00864.sfm +++|
01070 M00S00865.sfm +++| CFS SUBR ENTRY/EXIT
01071 M00S00866.sfm +++| RJM SFB SET FILE BUSY
01072 M00S00867.sfm +++| ZJN CFS1 IF NO REJECT
01073 M00S00868.sfm +++| LDN 0
01074 M00S00869.sfm +++| STD FA
01075 M00S00870.sfm +++| ABORT /MESS/ERIO * SFM I/O SEQUENCE ERROR.*
01076 M00S00871.sfm +++|
01077 M00S00872.sfm +++| CFS1 LDD FS READ EST ENTRY
01078 M00S00873.sfm +++| STD T5
01079 M00S00874.sfm +++| SFA EST
01080 M00S00875.sfm +++| ADK EQDE
01081 M00S00876.sfm +++| CRD ES
01082 M00S00877.sfm +++| LDD ES CHECK EQUIPMENT
01083 M00S00878.sfm +++| SHN 6
01084 M00S00879.sfm +++| MJN CFS2 IF MASS STORAGE
01085 M00S00880.sfm +++| ABORT /MESS/ERMS * SFM FILE NOT ON MASS STORAGE.*
01086 M00S00881.sfm +++|
01087 M00S00882.sfm +++| CFS2 LDD FS+1 SET FIRST TRACK
01088 M00S00883.sfm +++| STD T6
01089 M00S00884.sfm +++| LDD FS+2
01090 M00S00885.sfm +++| NJN CFSX RETURN IF FILE USED
01091 M00S00886.sfm +++| ABORT /MESS/ERFE * SFM FILE EMPTY.*
01092 M00S00887.sfm +++| SPACE 4
Line S00888 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
01093 M01S00888.274l797 ---| TDFN SPACE 4,10
01094 M01S00889.274l797 ---|** TDFN - TABLE OF DAYFILE NAMES.
Line S00001 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
01095 M01S00001.274l797 +++| TDYN SPACE 4,10
01096 M01S00002.274l797 +++|** TDYN - TABLE OF DAYFILE NAMES.
01097 M00S00890.sfm +++|
01098 M00S00891.sfm +++|
Line S00892 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
01099 M01S00892.274l797 ---| TDFN BSS 0
Line S00003 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
01100 M01S00003.274l797 +++| TDYN BSS 0
01101 M00S00893.sfm +++| LOC SDAY
01102 M00S00894.sfm +++| CON NDYF SYSTEM DAYFILE
01103 M00S00895.sfm +++| CON NACF ACCOUNT DAYFILE
01104 M00S00896.sfm +++| CON NERL ERRLOG DAYFILE
01105 M00S00897.sfm +++| CON NBML MAINTENANCE LOG
01106 M00S00898.sfm +++| LOC *O
01107 M00S00899.sfm +++| SPACE 4
01108 M00S00900.sfm +++| NDYF VFD 42/0LDAYFILE,6/1,6/LIFT,6/0
01109 M00S00901.sfm +++| NACF VFD 42/0LACCOUNT,6/1,6/LIFT,6/0
01110 M00S00902.sfm +++| NERL VFD 42/0LERRLOG,6/1,6/LIFT,6/0
01111 M00S00903.sfm +++| NBML VFD 42/0LMAINLOG,6/1,6/LIFT,6/0
01112 M00S00904.sfm +++| USE OVERLAY
01113 M00S00905.sfm +++| OVLA EQU *+5 OVERLAY BASE ADDRESS
01114 M00S00906.sfm +++| ADF TITLE FUNCTION PROCESSORS.
01115 M00S00907.sfm +++| ADF SPACE 4
01116 M00S00908.sfm +++|*** FUNCTION *AMDF* - ACCESS MASTER DAYFILE.
01117 M00S00909.sfm +++|*
01118 M00S00910.sfm +++|* READ CM PART OF DAYFILE STARTING AT FIRST, AND MAKE LOCKED
01119 M00S00911.sfm +++|* LIBRARY FILE AT CONTROL POINT.
01120 M00S00912.sfm +++|*
01121 M00S00913.sfm +++|* ENTRY CONDITIONS.
01122 M00S00914.sfm +++|*
01123 M00S00915.sfm +++|* MESSAGE TO ISSUE IN BUFFER STARTING AT FIRST.
01124 M00S00916.sfm +++|* (MAXIMUM LENGTH OF 30 CHARACTERS.) THE MESSAGE IS
01125 M00S00917.sfm +++|* ISSUED BEFORE THE CM BUFFER IS COPIED AND THE FILE
01126 M00S00918.sfm +++|* LENGTH CALCULATED. THE MESSAGE WILL BE THE LAST ONE
01127 M00S00919.sfm +++|* IN THE DAYFILE FOR THIS ACCESS TO THE DAYFILE.
01128 M00S00920.sfm +++|*
01129 M00S00921.sfm +++|* EXIT CONDITIONS.
01130 M00S00922.sfm +++|*
01131 M00S00923.sfm +++|*T FET+5 42/ 0 , 18/ RL
01132 M00S00924.sfm +++|*T,FET+6 42/ 0 , 18/ CL
01133 M00S00925.sfm +++|*
01134 M00S00926.sfm +++|* RL = DAYFILE LENGTH AT LAST DEADSTART.
01135 M00S00927.sfm +++|* CL = CURRENT DAYFILE LENGTH IN PRUS.
01136 M00S00928.sfm +++|
01137 M00S00929.sfm +++|
01138 M00S00930.sfm +++| ADF BSS 0 ENTRY
01139 M00S00931.sfm +++| LDN SDAY SELECT MASTER DAYFILE
01140 M00S00932.sfm +++| ADF1 STD TY SAVE DAYFILE TYPE
01141 M00S00933.sfm +++| RJM CBL CHECK DAYFILE BUFFER LENGTH
01142 M00S00934.sfm +++|
01143 M00S00935.sfm +++|* CHECK FILE STATUS.
01144 M00S00936.sfm +++|
01145 M00S00937.sfm +++| RJM SAF SEARCH FOR ASSIGNED FILE
01146 M00S00938.sfm +++| ZJN ADF3 IF NOT FOUND
01147 M00S00939.sfm +++| RJM SFB SET FILE BUSY
01148 M00S00940.sfm +++| ZJN ADF2 IF NO REJECT
01149 M00S00941.sfm +++| LDN 0
01150 M00S00942.sfm +++| STD FA
01151 M00S00943.sfm +++| ABORT /MESS/ERIO * SFM I/O SEQUENCE ERROR.*
01152 M00S00944.sfm +++|
01153 M00S00945.sfm +++| ADF2 RJM DRF DROP FILE
01154 M00S00946.sfm +++| ADF3 RJM EFN ENTER FILE NAME
01155 M00S00947.sfm +++| RJM SDA SET DAYFILE FST ADDRESS
01156 M00S00948.sfm +++| CRD FS READ DAYFILE FST
01157 M00S00949.sfm +++| SBN 1 READ DAYFILE BUFFER POINTERS
01158 M00S00950.sfm +++| CRD CM
01159 M00S00951.sfm +++| AOD CM+2 VALIDATE BUFFER POINTERS
01160 M00S00952.sfm +++| RJM VBP
01161 M00S00953.sfm +++| MJN ADF4 IF DATA FITS IN BUFFER AND IN FL
01162 M00S00954.sfm +++| NFA FA,R READ CORRECT FST FOR *ABT*
01163 M00S00955.sfm +++| ADN FSTL
01164 M00S00956.sfm +++| CRD FS
01165 M00S00957.sfm +++| ABORT /MESS/ERAE * SFM ARGUMENT ERROR.*
01166 M00S00958.sfm +++|
01167 M00S00959.sfm +++|* INTERLOCK DAYFILE.
01168 M00S00960.sfm +++|
01169 M00S00961.sfm +++| ADF4 LDD FS SET EQUIPMENT
01170 M00S00962.sfm +++| STD T5
01171 M00S00963.sfm +++| LDD FS+1 SET FIRST TRACK
01172 M00S00964.sfm +++| STD T6
01173 M00S00965.sfm +++| LDD TY
01174 M00S00966.sfm +++| NJN ADF5 IF NOT USER DAYFILE DUMP
01175 M00S00967.sfm +++| LJM ADF8 PROCESS USER DAYFILE DUMP
01176 M00S00968.sfm +++|
01177 M00S00969.sfm +++| ADF5 LDD TH FLAG TRACK INTERLOCK SET
01178 M00S00970.sfm +++| RAM ADFE
01179 M00S00971.sfm +++| RJM STI SET TRACK INTERLOCK
01180 M00S00972.sfm +++| ZJN ADF6 IF TRACK INTERLOCKED
01181 M00S00973.sfm +++| NFA FA,R READ CORRECT FST FOR *ABT*
01182 M00S00974.sfm +++| ADN FSTL
01183 M00S00975.sfm +++| CRD FS
01184 M00S00976.sfm +++| ERROR /ERR/DFB EC=1, DAYFILE BUSY
01185 M00S00977.sfm +++|
Line S00978 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
01186 M01S00978.242l642 ---| ADF6 LDD CP READ EJT ORDINAL
Line S00123 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
01187 M01S00123.242l642 +++| ADF6 LDD T6 SET TRACK INTERLOCKED STATUS
01188 M01S00124.242l642 +++| STM RTIA
01189 M01S00125.242l642 +++| LDD CP FETCH EJT ORDINAL
01190 M00S00979.sfm +++| ADN TFSW
01191 M00S00980.sfm +++| CRD CM
01192 M00S00981.sfm +++| SFA EJT,CM READ SEQUENCE NUMBER FROM EJT
01193 M00S00982.sfm +++| CRM BFMS,ON
01194 M00S00983.sfm +++| ADN SCLE-JSNE-1 GET JOB SERVICE CLASS
01195 M00S00984.sfm +++| CRD CM
01196 M00S00985.sfm +++| LDC 2R
01197 M00S00986.sfm +++| STM BFMS+2
01198 M00S00987.sfm +++| STM BFMS+3
01199 M00S00988.sfm +++| LDD CM SET SERVICE CLASS IN MESSAGE
01200 M00S00989.sfm +++| SHN -6
01201 M00S00990.sfm +++| STM BFMS+4
01202 M00S00991.sfm +++| LDD CN+3 READ DAYFILE MESSAGE
01203 M00S00992.sfm +++| SHN 6
01204 M00S00993.sfm +++| ADD RA
01205 M00S00994.sfm +++| SHN 6
01206 M00S00995.sfm +++| ADD CN+4
01207 M00S00996.sfm +++| CRD CM+1
01208 M00S00997.sfm +++| ADFC ADN 0
01209 M00S00998.sfm +++|* ADN 1 (MAINTENANCE LOG PROCESSING)
01210 M00S00999.sfm +++| CRM BFMS+5,TR
01211 M00S01000.sfm +++|* CRM BFMS,TR (MAINTENANCE LOG PROCESSING)
01212 M00S01001.sfm +++| ADFD EQU *-1
01213 M00S01002.sfm +++| LDN 0 ENSURE MESSAGE HAS TERMINATOR
01214 M00S01003.sfm +++| STM BFMS+5+3*5
01215 M00S01004.sfm +++| LDD CM+1 BYTE COUNT OF MAINTENANCE LOG MESSAGE
01216 M00S01005.sfm +++| ADFF UJN ADF7.4 CONTINUE
01217 M00S01006.sfm +++|* NJN ADF7.3 (MAINTENANCE LOG PROCESSING)
Line S01007 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
01218 M01S01007.242l642 ---| ADF7.1 LDM ADFE CHECK DAYFILE TRACK INTERLOCKED
01219 M01S01008.242l642 ---| SHN -11
01220 M01S01009.242l642 ---| ZJN ADF7.2 IF TRACK NOT INTERLOCKED
01221 M01S01010.242l642 ---| LDD T6 CLEAR INTERLOCK
01222 M01S01011.242l642 ---| RJM CTI
01223 M01S01012.242l642 ---| ADF7.2 NFA FA,R READ CORRECT FST FOR *ABT*
Line S00126 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
01224 M01S00126.242l642 +++| ADF7 RJM RTI RELEASE TRACK INTERLOCK
01225 M01S00127.242l642 +++| NFA FA,R RESTORE FST FOR ABORT PROCESSING
01226 M00S01013.sfm +++| ADN FSTL
01227 M00S01014.sfm +++| CRD FS
01228 M00S01015.sfm +++| ABORT /MESS/ERWC * SFM BML MESSAGE LENGTH ERROR.*
01229 M00S01016.sfm +++|
01230 M00S01017.sfm +++| ADF7.3 SBN 7
Line S01018 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
01231 M01S01018.242l642 ---| PJN ADF7.1 IF WORD COUNT TOO LARGE
Line S00128 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
01232 M01S00128.242l642 +++| PJN ADF7 IF WORD COUNT TOO LARGE
01233 M00S01019.sfm +++| ADN 7
01234 M00S01020.sfm +++| ADF7.4 SHN 2
01235 M00S01021.sfm +++| RAD CM+1
01236 M00S01022.sfm +++| LDM ADFG-1,TY ISSUE MESSAGE AND INTERLOCK DAYFILE
01237 M00S01023.sfm +++| SHN 14
01238 M00S01024.sfm +++| ADC ILKN+BFMS
01239 M00S01025.sfm +++| RJM DFM
01240 M00S01026.sfm +++|
01241 M00S01027.sfm +++|* TRANSFER CM DAYFILE BUFFER TO CONTROL POINT.
01242 M00S01028.sfm +++|
01243 M00S01029.sfm +++| LDD TY CHECK DAYFILE TYPE
01244 M00S01030.sfm +++| LMN BMLF
01245 M00S01031.sfm +++| NJN ADF8 IF NOT MAINTENANCE LOG
01246 M00S01032.sfm +++| LDN BMLL READ MAINTENANCE LOG CONTROL WORD
01247 M00S01033.sfm +++| CRD CM
01248 M00S01034.sfm +++| LDD CN+3 STORE CONTROL WORD IN BUFFER
01249 M00S01035.sfm +++| SHN 6
01250 M00S01036.sfm +++| ADD RA
01251 M00S01037.sfm +++| SHN 6
01252 M00S01038.sfm +++| ADD CN+4
01253 M00S01039.sfm +++| CWD CM
01254 M00S01040.sfm +++| AOD CN+4 ADVANCE IN POINTER
01255 M00S01041.sfm +++| SHN -14
01256 M00S01042.sfm +++| RAD CN+3
01257 M00S01043.sfm +++| ADF8 RJM CDF DUMP CM DAYFILE TO CONTROL POINT
01258 M00S01044.sfm +++|
01259 M00S01045.sfm +++|* UPDATE FET INFORMATION.
01260 M00S01046.sfm +++|
01261 M00S01047.sfm +++| LDD T6
01262 M00S01048.sfm +++| STD T2
01263 M00S01049.sfm +++| STD T3
01264 M00S01050.sfm +++| ZJN ADF9 IF NO FIRST TRACK
01265 M00S01051.sfm +++| RJM SEI
01266 M00S01052.sfm +++| LCN FSMS DISCOUNT SYSTEM SECTOR
01267 M00S01053.sfm +++| RAD T3
01268 M00S01054.sfm +++| PJN ADF9 IF NO BORROW
01269 M00S01055.sfm +++| SOD T2 PROPAGATE BORROW
01270 M00S01056.sfm +++| AOD T3
01271 M00S01057.sfm +++| ADF9 LDN ZERL
01272 M00S01058.sfm +++| CRD CM
01273 M00S01059.sfm +++| LDD T3
01274 M00S01060.sfm +++| STD CM+4 LOWER HALF OF FILE LENGTH
01275 M00S01061.sfm +++| LDD T2
01276 M00S01062.sfm +++| STD CM+3 UPPER HALF OF FILE LENGTH
01277 M00S01063.sfm +++| LDN 0
01278 M00S01064.sfm +++| STD CN
01279 M00S01065.sfm +++| STD CN+1
01280 M00S01066.sfm +++| STD CN+2
01281 M00S01067.sfm +++| RJM GFE STORE IN
01282 M00S01068.sfm +++| ADN 2
01283 M00S01069.sfm +++| CWD CN
01284 M00S01070.sfm +++| ADN 6-2 STORE SECTOR COUNT
01285 M00S01071.sfm +++| CWD CM
01286 M00S01072.sfm +++|
01287 M00S01073.sfm +++|* GET LENGTH OF DAYFILE AT LAST DEADSTART.
01288 M00S01074.sfm +++|
01289 M00S01075.sfm +++| LDD TY
01290 M00S01076.sfm +++| NJN ADF10 IF NOT USER DAYFILE DUMP
01291 M00S01077.sfm +++| LJM ADF12
01292 M00S01078.sfm +++|
01293 M00S01079.sfm +++| ADF10 RJM SDA READ BUFFER STATUS WORD
Line S01080 Modification History
M01 (Removed by) 251l664
Seq # *Modification Id* Act
----------------------------+
01294 M01S01080.251l664 ---| STD T1
01295 M00S01081.sfm +++| CRD CM
01296 M00S01082.sfm +++| LDN 2 CLEAR BUFFER INTERLOCK
01297 M00S01083.sfm +++| RAD CM+4
Line S01084 Modification History
M01 (Removed by) 251l664
Seq # *Modification Id* Act
----------------------------+
01298 M01S01084.251l664 ---| LDD T1 STORE STATUS WORD
Line S00004 Modification History
M01 (Added by) 251l664
Seq # *Modification Id* Act
----------------------------+
01299 M01S00004.251l664 +++| RJM SDA STORE BUFFER STATUS WORD
01300 M00S01085.sfm +++| CWD CM
Line S01086 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
01301 M01S01086.242l642 ---| SETMS READ SET MASS STORAGE
Line S00129 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
01302 M01S00129.242l642 +++| SETMS IO
01303 M00S01087.sfm +++| LDD FS+1 SET FIRST TRACK
01304 M00S01088.sfm +++| STD T6
Line S01089 Modification History
M01 (Removed by) 274l797
Seq # *Modification Id* Act
----------------------------+
01305 M01S01089.274l797 ---| LDM TDFN-1,TY READ SYSTEM SECTOR
Line S00004 Modification History
M01 (Added by) 274l797
Seq # *Modification Id* Act
----------------------------+
01306 M01S00004.274l797 +++| LDM TDYN-1,TY READ SYSTEM SECTOR
01307 M00S01090.sfm +++| RJM RSS
01308 M00S01091.sfm +++| ZJN ADF11 IF NO ERROR
Line S01092 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
01309 M01S01092.242l642 ---| LDD T6 CLEAR TRACK INTERLOCK
01310 M01S01093.242l642 ---| RJM CTI
Line S00130 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
01311 M01S00130.242l642 +++| RJM RTI RELEASE TRACK INTERLOCK
01312 M00S01094.sfm +++| NFA FA,R READ CORRECT FST FOR *ABT*
01313 M00S01095.sfm +++| ADN FSTL
01314 M00S01096.sfm +++| CRD FS
01315 M00S01097.sfm +++| ABORT /MESS/ERSE * SFM SYSTEM SECTOR ERROR.*
01316 M00S01098.sfm +++|
01317 M00S01099.sfm +++| ADF11 ENDMS
01318 M00S01100.sfm +++| LDN ZERL SET LENGTH IN FET+5
01319 M00S01101.sfm +++| CRD CM
01320 M00S01102.sfm +++| LDM FLSS
01321 M00S01103.sfm +++| STD CM+3
01322 M00S01104.sfm +++| LDM FLSS+1
01323 M00S01105.sfm +++| STD CM+4
01324 M00S01106.sfm +++| RJM GFE
01325 M00S01107.sfm +++| ADN 5
01326 M00S01108.sfm +++| CWD CM
01327 M00S01109.sfm +++|
01328 M00S01110.sfm +++|* ATTACH DAYFILE TO CONTROL POINT.
01329 M00S01111.sfm +++|
01330 M00S01112.sfm +++| ADF12 LDC 4 SET FILE STATUS
01331 M00S01113.sfm +++|* LDC 1004 (IF TRACK INTERLOCK SET)
01332 M00S01114.sfm +++| ADFE EQU *-1
01333 M00S01115.sfm +++| STD FS+4
01334 M00S01116.sfm +++| LDD FS+2
01335 M00S01117.sfm +++| ZJN ADF13 IF FILE NOT USED
01336 M00S01118.sfm +++| LDD FS+1 REWIND FILE
01337 M00S01119.sfm +++| STD FS+2
01338 M00S01120.sfm +++| LDN FSMS SET FIRST DATA SECTOR
01339 M00S01121.sfm +++| STD FS+3
01340 M00S01122.sfm +++| ADF13 NFA FA,R READ FNT ENTRY
01341 M00S01123.sfm +++| CRD CM
Line S01124 Modification History
M01 (Removed by) sfm17
Seq # *Modification Id* Act
----------------------------+
01342 M01S01124.sfm17 ---| LDD CM+3 SET LOCKED STATUS
Line S00001 Modification History
M01 (Added by) sfm17
Seq # *Modification Id* Act
----------------------------+
01343 M01S00001.sfm17 +++| LDD CM+3 SET EXTEND-ONLY AND WRITE LOCKOUT
01344 M00S01125.sfm +++| SCN 77
Line S01126 Modification History
M01 (Removed by) sfm17
Seq # *Modification Id* Act
----------------------------+
01345 M01S01126.sfm17 ---| LMN 1
Line S00002 Modification History
M01 (Added by) sfm17
Seq # *Modification Id* Act
----------------------------+
01346 M01S00002.sfm17 +++| LMN 21
01347 M00S01127.sfm +++| STD CM+3
01348 M00S01128.sfm +++| LDC LIFT*100 SET FILE TYPE TO *LIBRARY*
01349 M00S01129.sfm +++| STD CM+4
01350 M00S01130.sfm +++| NFA FA,R STORE FNT ENTRY
01351 M00S01131.sfm +++| CWD CM
01352 M00S01132.sfm +++| LDN 22 LAST STATUS = EOR
01353 M00S01133.sfm +++| STD LS
01354 M00S01134.sfm +++| LJM SFMX EXIT
01355 M00S01135.sfm +++|
01356 M00S01136.sfm +++| ADFG BSS 0 TABLE OF DAYFILE MESSAGE OPTIONS
01357 M00S01137.sfm +++| LOC SDAY
01358 M00S01138.sfm +++| CON JNMN/10000
01359 M00S01139.sfm +++| CON AJNN/10000
01360 M00S01140.sfm +++| CON EJNN/10000
01361 M00S01141.sfm +++| CON BMLN/10000
01362 M00S01142.sfm +++| LOC *O
01363 M00S01143.sfm +++| AAC SPACE 4
01364 M00S01144.sfm +++|*** FUNCTION *AAFF* - ACCESS ACCOUNT FILE.
01365 M00S01145.sfm +++|*
01366 M00S01146.sfm +++|* READ CM PART OF DAYFILE STARTING AT FIRST, AND MAKE LOCKED
01367 M00S01147.sfm +++|* LIBRARY TYPE FILE AT CONTROL POINT.
01368 M00S01148.sfm +++|
01369 M00S01149.sfm +++|
01370 M00S01150.sfm +++| AAC BSS 0 ENTRY
01371 M00S01151.sfm +++| LDN ACCF SELECT ACCOUNT FILE
01372 M00S01152.sfm +++| UJN AER1
01373 M00S01153.sfm +++| AER SPACE 4
01374 M00S01154.sfm +++|*** FUNCTION *AELF* - ACCESS ERROR LOG.
01375 M00S01155.sfm +++|*
01376 M00S01156.sfm +++|* READ CM PART OF DAYFILE STARTING AT FIRST, AND MAKE LOCKED
01377 M00S01157.sfm +++|* LIBRARY TYPE FILE AT CONTROL POINT.
01378 M00S01158.sfm +++|
01379 M00S01159.sfm +++|
01380 M00S01160.sfm +++| AER LDN ERLF SELECT ERROR LOG
01381 M00S01161.sfm +++| AER1 LJM ADF1 ACCESS DAYFILE
01382 M00S01162.sfm +++| AMF SPACE 4,10
01383 M00S01163.sfm +++|*** FUNCTION *AMLF* - ACCESS MAINTENANCE LOG.
01384 M00S01164.sfm +++|*
01385 M00S01165.sfm +++|* READ CM PART OF DAYFILE STARTING AT FIRST, AND MAKE LOCKED
01386 M00S01166.sfm +++|* LIBRARY TYPE FILE AT CONTROL POINT.
01387 M00S01167.sfm +++|
01388 M00S01168.sfm +++|
01389 M00S01169.sfm +++| AMF LCN 5 ADJUST ADDRESS FOR ACCESS MESSAGE
01390 M00S01170.sfm +++| RAM ADFD
01391 M00S01171.sfm +++| AOM ADFC
01392 M00S01172.sfm +++| LDC NJNI+ADF7.3-ADFF
01393 M00S01173.sfm +++| STM ADFF
01394 M00S01174.sfm +++| LDN BMLF SELECT MAINTENANCE LOG
01395 M00S01175.sfm +++| UJN AER1 ACCESS DAYFILE
01396 M00S01176.sfm +++|
01397 M00S01177.sfm +++| ERRNG 37-ADF7.3+ADFF JUMP OUT OF RANGE
01398 M00S01178.sfm +++| AUD SPACE 4
01399 M00S01179.sfm +++|*** FUNCTION *AUDF* - ACCESS USER DAYFILE.
01400 M00S01180.sfm +++|*
01401 M00S01181.sfm +++|* READ CM PART OF DAYFILE STARTING AT FIRST, AND MAKE LOCKED
01402 M00S01182.sfm +++|* LIBRARY TYPE FILE AT CONTROL POINT.
01403 M00S01183.sfm +++|
01404 M00S01184.sfm +++|
01405 M00S01185.sfm +++| AUD LDN 0 SELECT USER DAYFILE
01406 M00S01186.sfm +++| UJN AER1
01407 M00S01187.sfm +++| RDT SPACE 4
01408 M00S01188.sfm +++|*** FUNCTION *RDTF* - RETURN DEVICE TYPE.
01409 M00S01189.sfm +++|*
01410 M00S01190.sfm +++|* FET+1, BYTE 0 = EST ORDINAL.
01411 M00S01191.sfm +++|* RETURN DEVICE TYPE IN FET+1, BYTE 0.
01412 M00S01192.sfm +++|
01413 M00S01193.sfm +++|
01414 M00S01194.sfm +++| RDT RJM GFE GET FET ADDRESS
01415 M00S01195.sfm +++| ADN 1
01416 M00S01196.sfm +++| CRD CM
01417 M00S01197.sfm +++| LDN ESTP READ EST POINTER
01418 M00S01198.sfm +++| CRD FS
01419 M00S01199.sfm +++| LDD CM LOAD EST ORDINAL
01420 M00S01200.sfm +++| SBD FS+2
01421 M00S01201.sfm +++| MJN RDT1 IF IN TABLE
01422 M00S01202.sfm +++| ABORT /MESS/EREQ * SFM INCORRECT EQUIPMENT.*
01423 M00S01203.sfm +++|
01424 M00S01204.sfm +++| RDT1 SFA EST,CM
01425 M00S01205.sfm +++| ADK EQDE
01426 M00S01206.sfm +++| CRD FS READ EST ENTRY
Line S01207 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
01427 M01S01207.242l642 ---| LDD FS
01428 M01S01208.242l642 ---| LMD FS+3
Line S00131 Modification History
M01 (Added by) 242l642
M02 (Removed by) 252l678
Seq # *Modification Id* Act
----------------------------+
01429 M02S00131.252l678 ---| LDD FS+3
01430 M02S00132.252l678 ---| LPC 3777
01431 M02S00133.252l678 ---| STD FS+3
Line S00134 Modification History
M01 (Added by) 242l642
Seq # *Modification Id* Act
----------------------------+
01432 M01S00134.242l642 +++| LDD FS
01433 M00S01209.sfm +++| LPC 4000
01434 M00S01210.sfm +++| LMD FS+3
01435 M00S01211.sfm +++| STD CM
01436 M00S01212.sfm +++| RJM GFE RETURN DEVICE TYPE TO FET
01437 M00S01213.sfm +++| ADN 1
01438 M00S01214.sfm +++| CWD CM
01439 M00S01215.sfm +++| LJM SFMX EXIT
01440 M00S01216.sfm +++| PAD SPACE 4,5
01441 M00S01217.sfm +++|*** FUNCTION *PADF* - PROTECT ACTIVE DAYFILE.
01442 M00S01218.sfm +++|*
01443 M00S01219.sfm +++|* AN ACTIVE DAYFILE OF TYPE, TY, WILL BE PROTECTED BY
01444 M00S01220.sfm +++|* PLACING THE FIRST TRACK FROM THE DAYFILE POINTER INTO THE
01445 M00S01221.sfm +++|* APPROPRIATE TRACK BYTE IN THE SECTOR OF LOCAL AREAS.
01446 M00S01222.sfm +++|* THE TRACK INTERLOCK IS ASSUMED TO BE INTERLOCKED.
01447 M00S01223.sfm +++|* THE TRACK INTERLOCK WILL BE CLEARED.
01448 M00S01224.sfm +++|
01449 M00S01225.sfm +++|
01450 M00S01226.sfm +++| PDF RJM SDT SET DAYFILE TYPE
01451 M00S01227.sfm +++| RJM SDA SET DAYFILE POINTER ADDRESS
01452 M00S01228.sfm +++| CRD CM
01453 M00S01229.sfm +++| LDD CM SET EQUIPMENT
01454 M00S01230.sfm +++| STD T5
Line S01231 Modification History
M01 (Removed by) 242l642
Seq # *Modification Id* Act
----------------------------+
01455 M01S01231.242l642 ---| SFA EST READ EST ENTRY
01456 M01S01232.242l642 ---| ADK EQDE
01457 M01S01233.242l642 ---| CRD CN
01458 M00S01234.sfm +++| LDD CM+1 SET FIRST TRACK
01459 M00S01235.sfm +++| STD T6
01460 M00S01236.sfm +++| RJM DTS DETERMINE TRACK STATUS
01461 M00S01237.sfm +++| MJN PDF1 IF TRACK INTERLOCKED
01462 M00S01238.sfm +++| ABORT /MESS/ERTE * SFM TRACK INTERLOCK ERROR.*
01463 M00S01239.sfm +++|
01464 M00S01240.sfm +++| PDF1 LDD T6 CLEAR TRACK INTERLOCK
01465 M00S01241.sfm +++| RJM CTI
01466 M00S01242.sfm +++| LDN SPFS SET PRESERVED FILE BIT
01467 M00S01243.sfm +++| STD CM+3
01468 M00S01244.sfm +++| LDD T5 SET EQUIPMENT
01469 M00S01245.sfm +++| STD CM+1
Line S01246 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
01470 M01S01246.ns2357 ---| AOM SFMD SET CHECKPOINT REQUEST
01471 M00S01247.sfm +++| LDD T6 SET FIRST TRACK
01472 M00S01248.sfm +++| STD CM+2
01473 M00S01249.sfm +++| MONITOR STBM
Line S00025 Modification History
M01 (Added by) ns2357
Seq # *Modification Id* Act
----------------------------+
01474 M01S00025.ns2357 +++| PDF2 LDC CKPA SET CHECKPOINT REQUEST
01475 M01S00026.ns2357 +++| STM SFMF
01476 M00S01250.sfm +++| LJM SFMX RETURN
01477 M00S01251.sfm +++| CDB SPACE 4,6
01478 M00S01252.sfm +++|*** FUNCTION *CDBF* - CLEAR DAYFILE BYTE.
01479 M00S01253.sfm +++|*
01480 M00S01254.sfm +++|* THE TRACK INTERLOCK AND THE FIRST TRACK BYTE FOR THE
01481 M00S01255.sfm +++|* SPECIFIED DAYFILE ON THE SPECIFIED DEVICE WILL BE CLEARED.
01482 M00S01256.sfm +++|
01483 M00S01257.sfm +++|
01484 M00S01258.sfm +++| CDB RJM SDT SET DAYFILE TYPE
01485 M00S01259.sfm +++| LDD CN SET EQUIPMENT
01486 M00S01260.sfm +++| STD T5
01487 M00S01261.sfm +++| STM CDBA
01488 M00S01262.sfm +++| SFA EST READ EST ENTRY
01489 M00S01263.sfm +++| ADK EQDE
01490 M00S01264.sfm +++| CRD CN
01491 M00S01265.sfm +++| LDD CN CHECK IF MASS STORAGE
01492 M00S01266.sfm +++| SHN 21-13
01493 M00S01267.sfm +++| MJN CDB2 IF MASS STORAGE EQUIPMENT
01494 M00S01268.sfm +++| CDB1 ABORT /MESS/EREQ * SFM INCORRECT EQUIPMENT.*
01495 M00S01269.sfm +++|
01496 M00S01270.sfm +++| CDB2 RJM RLA READ SECTOR OF LOCAL AREAS
01497 M00S01271.sfm +++| ZJN CDB1 IF NO ENTRY FOR THIS MACHINE
01498 M00S01272.sfm +++| PJN CDB3 IF NO MASS STORAGE ERROR
01499 M00S01273.sfm +++| ERROR /ERR/RMS EC=3, SFM UNCORECTABLE RMS ERROR
01500 M00S01274.sfm +++|
01501 M00S01275.sfm +++| CDB3 ADD TY SET TRACK BYTE ADDRESS
01502 M00S01276.sfm +++| SBN SDAY
01503 M00S01277.sfm +++| STD T1
01504 M00S01278.sfm +++| LDI T1 SET FIRST TRACK OF INACTIVE DAYFILE
01505 M00S01279.sfm +++| STD T6
01506 M00S01280.sfm +++| RJM DTS DETERMINE TRACK STATUS
01507 M00S01281.sfm +++| MJN CDB4 IF TRACK INTERLOCK SET
01508 M00S01282.sfm +++| ABORT /MESS/ERTE * SFM TRACK INTERLOCK ERROR.*
01509 M00S01283.sfm +++|
01510 M00S01284.sfm +++| CDB4 LDD TY SET CHECKPOINT PARAMETER
01511 M00S01285.sfm +++| STM CKPA+4
01512 M00S01286.sfm +++| RJM CIB CLEAR FST INTERLOCK BIT
01513 M00S01287.sfm +++| LDD T6 CLEAR TRACK INTERLOCK
01514 M00S01288.sfm +++| RJM CTI
Line S01289 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
01515 M01S01289.ns2357 ---| AOM SFMD SET CHECKPOINT REQUEST
01516 M00S01290.sfm +++| LDD MA LOCATE THE *ZZZZLBT* FILE
01517 M00S01291.sfm +++| CWM ATDD,ON
01518 M00S01292.sfm +++| SBN 1
01519 M00S01293.sfm +++| CRD FN
01520 M00S01294.sfm +++| RJM SAF
01521 M00S01295.sfm +++| ZJN CDB5 IF FILE NOT FOUND
01522 M00S01296.sfm +++| RJM DRF RETURN THE *ZZZZLBT* FILE
01523 M00S01297.sfm +++| LDC * RESET THE EST ORDINAL
01524 M00S01298.sfm +++| CDBA EQU *-1
01525 M00S01299.sfm +++| STD T5
Line S01300 Modification History
M01 (Removed by) ns2357
Seq # *Modification Id* Act
----------------------------+
01526 M01S01300.ns2357 ---| LJM SFMX RETURN
Line S00027 Modification History
M01 (Added by) ns2357
Seq # *Modification Id* Act
----------------------------+
01527 M01S00027.ns2357 +++| LJM PDF2 SET CHECKPOINT REQUEST
01528 M00S01301.sfm +++|
01529 M00S01302.sfm +++| CDB5 ABORT /MESS/ERFF * SFM FILE NOT FOUND.*
01530 M00S01303.sfm +++| ATD SPACE 4,15
01531 M00S01304.sfm +++| ATD TITLE ATTACH INACTIVE DAYFILE.
01532 M00S01305.sfm +++|*** FUNCTION *ATDF* - ATTACH INACTIVE DAYFILE.
01533 M00S01306.sfm +++|*
01534 M00S01307.sfm +++|* THE SPECIFIED INACTIVE DAYFILE ON EQUIPMENT, EQ, IS ATTACHED
01535 M00S01308.sfm +++|* TO THE CONTROL POINT AS A LIBRARY TYPE FILE WITH ITS TRACK
01536 M00S01309.sfm +++|* INTERLOCK BIT SET. THE FILE NAME IS TAKEN FROM THE FIRST
01537 M00S01310.sfm +++|* WORD OF THE FET.
01538 M00S01311.sfm +++|*
01539 M00S01312.sfm +++|* IF A LIBRARY TYPE FILE WITH THE SAME FILE NAME IS FOUND
01540 M00S01313.sfm +++|* ATTACHED TO THE CONTROL POINT, THEN THE CALLER IS ABORTED.
01541 M00S01314.sfm +++|* IF THE DUPLICATE FILE IS NOT A LIBRARY TYPE FILE, THEN
01542 M00S01315.sfm +++|* IT IS RETURNED BEFORE CREATING THE NEW FILE.
01543 M00S01316.sfm +++|*
01544 M00S01317.sfm +++|* THE LABEL TRACK ON THE DAYFILE DEVICE WILL BE INTERLOCKED TO
01545 M00S01318.sfm +++|* PREVENT PROBLEMS CAUSED BY MULTIPLE *DFTERM* RUNS. THIS
01546 M00S01319.sfm +++|* INTERLOCK IS NORMALLY CLEARED BY A *CDBF* CALL. TO ALLOW
01547 M00S01320.sfm +++|* FOR A POSSIBLE ABORT OF *DFTERM*, A LOCAL FILE *ZZZZLBT* OF
01548 M00S01321.sfm +++|* FILE TYPE *LIFT* WILL BE CREATED. THIS FILE POINTS TO THE
01549 M00S01322.sfm +++|* INTERLOCKED LABEL. *0DF* WILL CLEAR THE INTERLOCK WHEN
01550 M00S01323.sfm +++|* THE *ZZZZLBT* FILE IS RETURNED.
01551 M00S01324.sfm +++|
01552 M00S01325.sfm +++|
01553 M00S01326.sfm +++| ATD BSS 0 ENTRY
01554 M00S01327.sfm +++| LDD MA CREATE THE *ZZZZLBT* FILE
01555 M00S01328.sfm +++| CWM ATDD,ON
01556 M00S01329.sfm +++| SBN 1
01557 M00S01330.sfm +++| CRD FN
01558 M00S01331.sfm +++| ATD0 LDN NEEQ SET THE NULL EQUIPMENT
01559 M00S01332.sfm +++| STD FS
01560 M00S01333.sfm +++| LDN 2 RETURN IF NFL INCREASE PENDING
01561 M00S01334.sfm +++| STM OVL0-1
01562 M00S01335.sfm +++| EXECUTE 0BF,OVL0
01563 M00S01336.sfm +++| UJN ATD0.2 CHECK FOR FNT ENTRY CREATED
01564 M00S01337.sfm +++|
01565 M00S01338.sfm +++|* PROCESS DUPLICATE FILE.
01566 M00S01339.sfm +++|
01567 M00S01340.sfm +++| RJM SFB SET FILE BUSY
01568 M00S01341.sfm +++| NJN ATD0.1 IF FILE BUSY REJECT
01569 M00S01342.sfm +++| RJM DRF DROP THE FILE
01570 M00S01343.sfm +++| UJN ATD0 RETRY THE FILE CREATION
01571 M00S01344.sfm +++|
01572 M00S01345.sfm +++| ATD0.1 ABORT /MESS/ERDF * SFM DUPLICATE FILE FOUND.*
01573 M00S01346.sfm +++|
01574 M00S01347.sfm +++| ATD0.2 ZJN ATD0.3 IF FNT CREATED
01575 M00S01348.sfm +++| LDN NFIR
01576 M00S01349.sfm +++| LJM ERS ENTER PP RECALL STACK
01577 M00S01350.sfm +++|
01578 M00S01351.sfm +++| ATD0.3 LDD FA SAVE THE FNT OFFSET
01579 M00S01352.sfm +++| STM ATDC
01580 M00S01353.sfm +++| RJM GFE GET THE DAYFILE FNT NAME
01581 M00S01354.sfm +++| CRD FN
01582 M00S01355.sfm +++| RJM VFN VERIFY FILE NAME
01583 M00S01356.sfm +++| NJN ATD1 IF NAME VERIFIES
01584 M00S01357.sfm +++| ABORT /MESS/ERFN * SFM FILE NAME ERROR.*
01585 M00S01358.sfm +++|
01586 M00S01359.sfm +++|* GET FIRST TRACK OF FILE TO ATTACH.
01587 M00S01360.sfm +++|
01588 M00S01361.sfm +++| ATD1 RJM SDT SET DAYFILE TYPE
01589 M00S01362.sfm +++| LDD CN SET EST ORDINAL
01590 M00S01363.sfm +++| STD T5
01591 M00S01364.sfm +++| STM ATDB SAVE EST ORDINAL
01592 M00S01365.sfm +++| SFA EST READ EST ENTRY
01593 M00S01366.sfm +++| ADK EQDE
01594 M00S01367.sfm +++| CRD CN
01595 M00S01368.sfm +++| LDD CN
01596 M00S01369.sfm +++| SHN 21-13
01597 M00S01370.sfm +++| MJN ATD3 IF MASS STORAGE
01598 M00S01371.sfm +++| ATD2 ABORT /MESS/EREQ * SFM INCORRECT EQUIPMENT.*
01599 M00S01372.sfm +++|
01600 M00S01373.sfm +++| ATD3 RJM RLA READ SECTOR OF LOCAL AREAS
01601 M00S01374.sfm +++| ZJN ATD2 IF NO ENTRY FOR THIS MACHINE
01602 M00S01375.sfm +++| PJN ATD4 IF NO MASS STORAGE ERROR
01603 M00S01376.sfm +++| ERROR /ERR/RMS EC=3, UNCORRECTABLE RMS ERROR
01604 M00S01377.sfm +++|
01605 M00S01378.sfm +++| ATD4 ADD TY SET TRACK BYTE ADDRESS
01606 M00S01379.sfm +++| SBN SDAY
01607 M00S01380.sfm +++| STD T1
01608 M00S01381.sfm +++| LDI T1 SET FIRST TRACK OF INACTIVE DAYFILE
01609 M00S01382.sfm +++| STD T6
01610 M00S01383.sfm +++| STM ATDA
01611 M00S01384.sfm +++| NJN ATD5 IF FILE EXISTS
01612 M00S01385.sfm +++| ERROR /ERR/FNF EC=2, FILE NOT FOUND
01613 M00S01386.sfm +++|
01614 M00S01387.sfm +++|* SET TRACK INTERLOCK.
01615 M00S01388.sfm +++|
01616 M00S01389.sfm +++| ATD5 RJM STI SET TRACK INTERLOCK
01617 M00S01390.sfm +++| ZJN ATD7 IF INTERLOCK SET
01618 M00S01391.sfm +++| ERROR /ERR/DFB EC=0, DAYFILE BUSY
01619 M00S01392.sfm +++|
01620 M00S01393.sfm +++|* ENTER FILE IN FNT TABLE.
01621 M00S01394.sfm +++|
01622 M00S01395.sfm +++| ATD6 RJM SFB SET FILE BUSY
01623 M00S01396.sfm +++| NJN ATD7.1 IF FILE BUSY REJECT
01624 M00S01397.sfm +++| RJM DRF DROP FILE
01625 M00S01398.sfm +++|
01626 M00S01399.sfm +++| ATD7 LDN NEEQ SET NULL EQUIPMENT
01627 M00S01400.sfm +++| STD FS
01628 M00S01401.sfm +++| LDN 2 RETURN TO ENTER PP STACK ON NFL INCREASE
01629 M00S01402.sfm +++| STM OVL0-1
01630 M00S01403.sfm +++| EXECUTE 0BF,OVL0 MAKE FNT/FST ENTRY
01631 M00S01404.sfm +++| UJN ATD7.2 CHECK IF FNT ENTRY CREATED
01632 M00S01405.sfm +++|
01633 M00S01406.sfm +++|* PROCESS DUPLICATE FILE.
01634 M00S01407.sfm +++|
01635 M00S01408.sfm +++| NFA FA,R READ FNT ENTRY OF DUPLICATE FILE
01636 M00S01409.sfm +++| CRD FS
01637 M00S01410.sfm +++| LDD FS+4 CHECK FILE TYPE
01638 M00S01411.sfm +++| SHN -6
01639 M00S01412.sfm +++| LMN LIFT
01640 M00S01413.sfm +++| NJN ATD6 IF FILE NOT *LIBRARY* TYPE
01641 M00S01414.sfm +++| ATD7.1 LDN 0 CLEAR FNT ENTRY ADDRESS
01642 M00S01415.sfm +++| STD FA
01643 M00S01416.sfm +++| LDM ATDA CLEAR TRACK INTERLOCK
01644 M00S01417.sfm +++| RJM CTI
01645 M00S01418.sfm +++| ABORT /MESS/ERDF * SFM DUPLICATE FILE FOUND.*
01646 M00S01419.sfm +++|
01647 M00S01420.sfm +++| ATD7.2 ZJN ATD8 IF FNT ENTRY CREATED
01648 M00S01421.sfm +++| LDM ATDA CLEAR TRACK INTERLOCK
01649 M00S01422.sfm +++| RJM CTI
01650 M00S01423.sfm +++| LDN NFIR REASON CODE = NFL INCREASE PENDING
01651 M00S01424.sfm +++| LJM ERS ENTER PP RECALL STACK
01652 M00S01425.sfm +++|
01653 M00S01426.sfm +++|* BUILD FNT/FST ENTRY.
01654 M00S01427.sfm +++|
01655 M00S01428.sfm +++| ATD8 LDC * SET FIRST TRACK
01656 M00S01429.sfm +++| ATDA EQU *-1 (DAYFILE FIRST TRACK)
01657 M00S01430.sfm +++| STD FS+1
01658 M00S01431.sfm +++| STD FS+2 SET CURRENT TRACK
01659 M00S01432.sfm +++| LDC * SET EQUIPMENT
01660 M00S01433.sfm +++| ATDB EQU *-1 (EST ORDINAL)
01661 M00S01434.sfm +++| STD FS
01662 M00S01435.sfm +++| STD T5 SET EST ORDINAL
01663 M00S01436.sfm +++| LDN FSMS SET CURRENT SECTOR
01664 M00S01437.sfm +++| STD FS+3
01665 M00S01438.sfm +++| LDC 1005 SET TRACK INTERLOCK, EOR
01666 M00S01439.sfm +++| STD FS+4
01667 M00S01440.sfm +++| LDC LIFT*100 SET FILE TYPE TO *LIBRARY*
01668 M00S01441.sfm +++| STD FN+4
01669 M00S01442.sfm +++| RJM LLT LOCATE LABEL TRACK
01670 M00S01443.sfm +++| RJM WTI SET TRACK INTERLOCK
01671 M00S01444.sfm +++| NJP ATD9 IF TRACK INTERLOCK NOT SET
01672 M00S01445.sfm +++| NFA FA,R STORE FNT ENTRY
01673 M00S01446.sfm +++| CWD FN
01674 M00S01447.sfm +++| ADN FSTL STORE THE FST ENTRY
01675 M00S01448.sfm +++| CWD FS
01676 M00S01449.sfm +++| LDC ** COMPLETE THE *ZZZZLBT* FILE
01677 M00S01450.sfm +++| ATDC EQU *-1
01678 M00S01451.sfm +++| STD FA
01679 M00S01452.sfm +++| NFA FA,R
01680 M00S01453.sfm +++| ADK FNTL
01681 M00S01454.sfm +++| CRD FN
01682 M00S01455.sfm +++| ADN FSTL-FNTL
01683 M00S01456.sfm +++| CRD FS
01684 M00S01457.sfm +++| LDM ATDB SET THE EST ORDINAL
01685 M00S01458.sfm +++| STD FS
01686 M00S01459.sfm +++| RJM LLT SET THE LABEL TRACK
01687 M00S01460.sfm +++| STD FS+1
01688 M00S01461.sfm +++| STD FS+2
01689 M00S01462.sfm +++| LDC 1005 SET THE TRACK INTERLOCK FLAG
01690 M00S01463.sfm +++| STD FS+4
01691 M00S01464.sfm +++| LDC LIFT*100 SET LIBRARY FILE TYPE
01692 M00S01465.sfm +++| STD FN+4
01693 M00S01466.sfm +++| NFA FA,R
01694 M00S01467.sfm +++| ADK FNTL
01695 M00S01468.sfm +++| CWD FN
01696 M00S01469.sfm +++| ADN FSTL-FNTL
01697 M00S01470.sfm +++| CWD FS
01698 M00S01471.sfm +++| LDN 0 CLEAR THE FNT POINTER
01699 M00S01472.sfm +++| STD FA
01700 M00S01473.sfm +++| LJM SFMX
01701 M00S01474.sfm +++|
01702 M00S01475.sfm +++| ATD9 LDD FS+1 CLEAR TRACK INTERLOCK ON DAYFILE
01703 M00S01476.sfm +++| RJM CTI
01704 M00S01477.sfm +++| RJM DRF RETURN FNT ENTRY
01705 M00S01478.sfm +++| ERROR /ERR/DFB EC=1, DAYFILE BUSY
01706 M00S01479.sfm +++|
01707 M00S01480.sfm +++| ATDD VFD 42/0LZZZZLBT,18/0
Line S01481 Modification History
M01 (Removed by) ns2685
Seq # *Modification Id* Act
----------------------------+
01708 M01S01481.ns2685 ---| SPACE 4,10