cdc:nos2.source:opl.opl871:deck:isf
Deck ISF
Library Member Format: MODIFY
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.isf +++| IDENT ISF,FWA 00002 M00S00002.isf +++| ABS 00003 M00S00003.isf +++| SST 00004 M00S00004.isf +++| ENTRY ISF 00005 M00S00005.isf +++| ENTRY RFL= 00006 M00S00006.isf +++| ENTRY SSJ= 00007 M00S00007.isf +++| SYSCOM B1 DEFINE (B1) = 1 00008 M00S00008.isf +++|*COMMENT ISF - INITIALIZE SYSTEM FILES.
| Line S00009 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00009 M01S00009.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1971.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00010 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00011 M00S00010.isf +++| TITLE ISF - INITIALIZE SYSTEM FILES. 00012 M00S00011.isf +++| SPACE 4 00013 M00S00012.isf +++|*** ISF - INITIALIZE SYSTEM FILES. 00014 M00S00013.isf +++|* G. R. MANSFIELD. 71/07/07. 00015 M00S00014.isf +++|* S. L. KSANDER. 75/04/28. 00016 M00S00015.isf +++|* P. C. SMITH. 78/01/30. 00017 M00S00016.isf +++| SPACE 4 00018 M00S00017.isf +++|*** ISF PROCESSES AND/OR INITIALIZES SPECIAL SYSTEM FILES.
| Line S00018 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00019 M01S00018.v23l617 ---|* ALL FILES ARE FOUND ON USER NUMBER *SYSTEMX* (UI = 377777).
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00020 M01S00001.v23l617 +++|* ALL FILES ARE FOUND ON USER NAME *SYSTEMX* (UI = 377777). 00021 M00S00019.isf +++|*
| Line S00020 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00022 M01S00020.v23l617 ---|* CONTROL CARD FORMAT -
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00023 M01S00002.v23l617 +++|* COMMAND FORMAT - 00024 M00S00021.isf +++|* 00025 M00S00022.isf +++|* ISF(R=FILE1,E=FILE2,FM=FAMILY,SJ=FILE3,SP=FILE4) 00026 M00S00023.isf +++|* 00027 M00S00024.isf +++|* R = RETURN FAST ATTACH FILE. 00028 M00S00025.isf +++|* *FILE1* = NAME OF FILE TO BE RETURNED. 00029 M00S00026.isf +++|* IF R=0, ALL FAST ATTACH FILES WILL BE RETURNED. 00030 M00S00027.isf +++|* 00031 M00S00028.isf +++|* E = ENTER NEW FILE. 00032 M00S00029.isf +++|* *FILE2* = NAME OF FILE TO BE ENTERED. 00033 M00S00030.isf +++|* IF E=0, ALL FILES WILL BE ENTERED. 00034 M00S00031.isf +++|* FAST ATTACH FILES MUST BE RETURNED BEFORE THEY 00035 M00S00032.isf +++|* ARE RE-ENTERED. R AND E OPTIONS CAN NOT APPEAR ON THE
| Line S00033 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00036 M01S00033.v23l617 ---|* SAME CARD.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00037 M01S00003.v23l617 +++|* SAME COMMAND. 00038 M00S00034.isf +++|* 00039 M00S00035.isf +++|* FM = FAMILY NAME. 00040 M00S00036.isf +++|* IF NOT PRESENT, *ISF* WILL PROCESS FILES FOR THE 00041 M00S00037.isf +++|* JOBS FAMILY. 00042 M00S00038.isf +++|* 00043 M00S00039.isf +++|* IF PRESENT, *ISF* WILL PROCESS FILES BELONGING TO THE 00044 M00S00040.isf +++|* SPECIFIED FAMILY. IF THE *E=0* OPTION IS SELECTED, 00045 M00S00041.isf +++|* RESOURCE FILES WILL BE SET UP, IF THEY ARE NOT 00046 M00S00042.isf +++|* ALREADY PRESENT IN FAST ATTACH MODE. IF THE *R=0* 00047 M00S00043.isf +++|* OPTION IS SELECTED, RESOURCE FILE OPERATIONS ARE 00048 M00S00044.isf +++|* IGNORED. THE JOB-S FAMILY WILL BE RESTORED UPON 00049 M00S00045.isf +++|* EXIT FROM *ISF*. 00050 M00S00046.isf +++|* 00051 M00S00047.isf +++|* SJ = SUBMIT JOB WHEN ISF IS COMPLETE. 00052 M00S00048.isf +++|* *FILE3* = NAME OF JOB FILE TO BE SUBMITTED 00053 M00S00049.isf +++|* (MUST BE INDIRECT ACCESS PERMANENT FILE). 00054 M00S00050.isf +++|* IF *SJ* IS SPECIFIED BUT NOT EQUIVALENCED, 00055 M00S00051.isf +++|* *SYSJOB* WILL BE SUBMITTED. IF SJ=0, 00056 M00S00052.isf +++|* NO JOB WILL BE SUBMITTED. 00057 M00S00053.isf +++|* 00058 M00S00054.isf +++|* SP = CALL PROCEDURE FILE WHEN ISF IS COMPLETE. 00059 M00S00055.isf +++|* *FILE4* = NAME OF PROCEDURE FILE TO BE CALLED 00060 M00S00056.isf +++|* (MUST BE INDIRECT ACCESS PERMANENT FILE). 00061 M00S00057.isf +++|* IF *SP* IS SPECIFIED BUT NOT EQUIVALENCED, 00062 M00S00058.isf +++|* *SYSPROC* WILL BE CALLED. IF SP=0, 00063 M00S00059.isf +++|* NO PROCEDURE FILE WILL BE CALLED. 00064 M00S00060.isf +++|* 00065 M00S00061.isf +++|* NOTES - 00066 M00S00062.isf +++|* 00067 M00S00063.isf +++|* IF THE R OR E OPTION IS SPECIFIED FOR ONE OF THE 00068 M00S00064.isf +++|* RESOURCE FILES (RSXDXX OR RSXVXX), THE OPERATION WILL 00069 M00S00065.isf +++|* ALSO BE PERFORMED AUTOMATICALLY ON THE OTHER FILE. 00070 M00S00066.isf +++|* 00071 M00S00067.isf +++|* IF THE *R* OPTION IS SPECIFIED THE PROFILE FILE (IF IT 00072 M00S00068.isf +++|* EXISTS) IS ATTACHED IN WRITE MODE. THIS IS AN INTERLOCK
| Line S00069 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00073 M01S00069.v23l617 ---|* TO PREVENT *CHARGE* STATEMENT PROCESSING IN THE FAMILY FOR
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00074 M01S00004.v23l617 +++|* TO PREVENT *CHARGE* COMMAND PROCESSING IN THE FAMILY FOR 00075 M00S00070.isf +++|* THE DURATION OF THE *ISF* EXECUTION.
| Line S00071 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00076 M01S00071.ns22000 ---|* 00077 M01S00072.ns22000 ---|* *SYSJOB* AND *SYSPROC* WILL AUTOMATICALLY BE CALLED 00078 M01S00073.ns22000 ---|* WHEN *ISF* IS CALLED WITH NO PARAMETERS. 00079 M01S00074.ns22000 ---|* IF ANY PARAMETERS ARE SPECIFIED, NO JOB WILL BE 00080 M01S00075.ns22000 ---|* SUBMITTED AND NO PROCEDURE FILE WILL BE 00081 M01S00076.ns22000 ---|* CALLED UNLESS *SJ* AND *SP* ARE EXPLICITLY 00082 M01S00077.ns22000 ---|* SPECIFIED. 00083 M00S00078.isf +++|* 00084 M00S00079.isf +++|* ASSUMED - 00085 M00S00080.isf +++|* E = 0. 00086 M00S00081.isf +++|* FM = 0.
| Line S00082 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00087 M01S00082.ns22000 ---|* SJ = SYSJOB (IF NO PARAMETERS). 00088 M01S00083.ns22000 ---|* SJ = 0 (IF PARAMETERS SPECIFIED). 00089 M01S00084.ns22000 ---|* SP = SYSPROC (IF NO PARAMETERS). 00090 M01S00085.ns22000 ---|* SP = 0 (IF PARAMETERS SPECIFIED).
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00091 M01S00001.ns22000 +++|* SJ = 0. 00092 M01S00002.ns22000 +++|* SP = 0. 00093 M00S00086.isf +++|* R NOT SELECTED. 00094 M00S00087.isf +++| SPACE 4 00095 M00S00088.isf +++|*** DAYFILE MESSAGES - 00096 M00S00089.isf +++|* 00097 M00S00090.isf +++|* * ARGUMENT ERROR.*
| Line S00091 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00098 M01S00091.v23l617 ---|* ILLEGAL PARAMETER OR COMBINATION OF PARAMETERS.
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00099 M01S00005.v23l617 +++|* INCORRECT PARAMETER OR COMBINATION OF PARAMETERS. 00100 M00S00092.isf +++|* 00101 M00S00093.isf +++|* * FAMILY FILES ACTIVE.* 00102 M00S00094.isf +++|* THE NUMBER OF ACTIVE DIRECT ACCESS FILES ON THE 00103 M00S00095.isf +++|* FAMILY IS GREATER THAN THE NUMBER OF FAST 00104 M00S00096.isf +++|* ATTACH FILES. 00105 M00S00097.isf +++|* 00106 M00S00098.isf +++|* * FILE NOT IN ALTERNATE FAMILY.* 00107 M00S00099.isf +++|* FAMILY SPECIFIED FOR DEFAULT FAMILY FILE. 00108 M00S00100.isf +++|*
| Line S00101 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00109 M01S00101.v23l617 ---|* * ILLEGAL FAMILY NAME.*
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00110 M01S00006.v23l617 +++|* * INCORRECT FAMILY NAME.* 00111 M00S00102.isf +++|* FAMILY NOT FOUND. 00112 M00S00103.isf +++|*
| Line S00104 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00113 M01S00104.v23l617 ---|* * ILLEGAL FILE NAME.*
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00114 M01S00007.v23l617 +++|* * INCORRECT FILE NAME.* 00115 M00S00105.isf +++|* FILE NAME NOT ON LIST OF SPECIAL FILES. 00116 M00S00106.isf +++|* 00117 M00S00107.isf +++|* * ISF COMPLETE.* 00118 M00S00108.isf +++|* OPERATION COMPLETE. 00119 M00S00109.isf +++| SPACE 4,10 00120 M00S00110.isf +++|**** ASSEMBLY CONSTANTS. 00121 M00S00111.isf +++| 00122 M00S00112.isf +++|
| Line S00113 Modification History | |
|---|---|
M01 (Removed by) | isf2 |
Seq # *Modification Id* Act ----------------------------+ 00123 M01S00113.isf2 ---| SBUFL EQU 1001B FILE BUFFER LENGTH
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | isf2 |
Seq # *Modification Id* Act ----------------------------+ 00124 M01S00001.isf2 +++| SBUFL EQU ESMX*ESTE+77B/100B*100B+1 FILE BUFFER LENGTH 00125 M00S00114.isf +++| RDFL EQU 36B-1 (LENGTH - 1) OF RSXDXX IN PRUS 00126 M00S00115.isf +++| RVFL EQU 36B-1 (LENGTH - 1) OF RSXVXX IN PRUS 00127 M00S00116.isf +++| 00128 M00S00117.isf +++|**** 00129 M00S00118.isf +++| SPACE 4 00130 M00S00119.isf +++|*CALL COMCMAC 00131 M00S00120.isf +++|*CALL COMCCMD 00132 M00S00121.isf +++| 00133 M00S00122.isf +++|*CALL COMSACC 00134 M00S00123.isf +++|*CALL COMSPFM 00135 M00S00124.isf +++|*CALL COMSPRD 00136 M00S00125.isf +++|*CALL COMSPRO
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00137 M01S00003.ns22000 +++|*CALL COMSSCD 00138 M00S00126.isf +++|*CALL COMSSFM 00139 M00S00127.isf +++|*CALL COMSSSJ 00140 M00S00128.isf +++|*CALL COMSSSD 00141 M00S00129.isf +++| TITLE DATA ASSIGNMENTS. 00142 M00S00130.isf +++| DATA SPACE 4 00143 M00S00131.isf +++|** DATA ASSIGNMENTS. 00144 M00S00132.isf +++| 00145 M00S00133.isf +++| 00146 M00S00134.isf +++| ORG 110B 00147 M00S00135.isf +++| FWA BSS 0 00148 M00S00136.isf +++| 00149 M00S00137.isf +++| S BSS 0
| Line S00138 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00150 M01S00138.ns21000 ---| SYSTEM FILEB SBUF,SBUFL,(FET=CFPK+1),EPR
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00151 M01S00001.ns21000 +++| SYSTEM FILEB SBUF,SBUFL,(FET=CFLM),EPR 00152 M00S00139.isf +++| 00153 M00S00140.isf +++| T BSS 0 PROFILE FILE 00154 M00S00141.isf +++| SCR FILEB 0,0,(FET=CFPK+1),EPR 00155 M00S00142.isf +++| 00156 M00S00143.isf +++| SSJ= BSS 0 SPECIAL SYSTEM JOB PARAMETER BLOCK 00157 M00S00144.isf +++| VFD 36/0,12/ISCS,12/UJSI 00158 M00S00145.isf +++| BSSZ SSJL-1 00159 M00S00146.isf +++| 00160 M00S00147.isf +++| 00161 M00S00148.isf +++|* TEMPORARY STORAGE. 00162 M00S00149.isf +++|
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
Seq # *Modification Id* Act ----------------------------+ 00163 M01S00001.ns2595 +++| ESTO CON 0 EST ORDINAL FOR SUSPECT SEARCH
| Line S00150 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00164 M01S00150.ns22000 ---| FAMD CON 0 SYSTEM DEFAULT FAMILY
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00165 M01S00004.ns22000 +++| FAMD CON 0L0 SYSTEM DEFAULT FAMILY 00166 M00S00151.isf +++| FAMN CON 0 NEW FAMILY 00167 M00S00152.isf +++| FAMU CON 0 USER-S FAMILY
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
Seq # *Modification Id* Act ----------------------------+ 00168 M01S00002.ns2595 +++| LEST CON 0 LAST EST ORDINAL + 1 00169 M00S00153.isf +++| PRAF CON 0 PROFILE ATTACHED FLAG
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
Seq # *Modification Id* Act ----------------------------+ 00170 M01S00003.ns2595 +++| RSBP CON 0 *RSB* POINTER 00171 M00S00154.isf +++| TITLE MAIN PROGRAM. 00172 M00S00155.isf +++| ISF SPACE 4 00173 M00S00156.isf +++|** ISF - MAIN PROGRAM. 00174 M00S00157.isf +++| 00175 M00S00158.isf +++| 00176 M00S00159.isf +++| ISF SB1 1 PRESET PROGRAM 00177 M00S00160.isf +++| RJ PRS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2595b |
Seq # *Modification Id* Act ----------------------------+ 00178 M01S00001.ns2595b +++| RJ WMV WAIT FOR *1MV* TO COMPLETE 00179 M00S00161.isf +++| SX5 TSFNL NUMBER OF SPECIAL FILES 00180 M00S00162.isf +++| 00181 M00S00163.isf +++|* EAF - ENTER ALL FILES. 00182 M00S00164.isf +++| 00183 M00S00165.isf +++| EAF SX5 X5-1 (RETURN POINT FROM PROCESSORS) 00184 M00S00166.isf +++| NG X5,EAF1 IF NO MORE SPECIAL FILES 00185 M00S00167.isf +++| SA1 TSFN+X5 SPECIAL FILE NAME 00186 M00S00168.isf +++| ZR X1,EAF IF FILE NAME CLEARED 00187 M00S00169.isf +++| MX0 42 00188 M00S00170.isf +++| SB2 X1+ PROCESSOR ADDRESS 00189 M00S00171.isf +++| BX1 X0*X1 00190 M00S00172.isf +++| JP B2 ENTER SPECIAL FILE 00191 M00S00173.isf +++|
| Line S00174 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00192 M01S00174.274l797 ---| EAF1 SX5 TDFNL NUMBER OF DEFAULT FAMILY FILES
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00193 M01S00001.274l797 +++| EAF1 SX5 TDFFL NUMBER OF DEFAULT FAMILY FILES 00194 M00S00175.isf +++| EAF2 SX5 X5-1 00195 M00S00176.isf +++| NG X5,END IF NO MORE DEFAULT FAMILY FILES
| Line S00177 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00196 M01S00177.274l797 ---| SA1 TDFN+X5 DEFAULT FAMILY SPECIAL FILE NAME
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00197 M01S00002.274l797 +++| SA1 TDFF+X5 DEFAULT FAMILY SPECIAL FILE NAME 00198 M00S00178.isf +++| ZR X1,EAF2 IF FILE NAME CLEARED 00199 M00S00179.isf +++| MX0 42 00200 M00S00180.isf +++| SX6 X1+ LENGTH OF FILE IN PRUS 00201 M00S00181.isf +++| BX1 X0*X1 00202 M00S00182.isf +++| RJ EDF ENTER DEFAULT FAMILY FILE 00203 M00S00183.isf +++| EQ EAF2 PROCESS NEXT FILE 00204 M00S00184.isf +++| END SPACE 4,10 00205 M00S00185.isf +++|** END - TERMINATION PROCESSING. 00206 M00S00186.isf +++| 00207 M00S00187.isf +++| 00208 M00S00188.isf +++| END RJ SJF SUBMIT JOB FILE 00209 M00S00189.isf +++| RJ SPC SET PROCEDURE FILE CALL 00210 M00S00190.isf +++| RJ RPF RETURN PROFILE FILE
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
M02 (Removed by) | ns2595b |
Seq # *Modification Id* Act ----------------------------+ 00211 M02S00004.ns2595b ---| RJ WMV WAIT FOR *1MV* TO COMPLETE 00212 M00S00191.isf +++| MESSAGE (=C* ISF COMPLETE.*) 00213 M00S00192.isf +++| SA1 SPCB+1 00214 M00S00193.isf +++| ZR X1,END1 IF NO PROCEDURE FILE 00215 M00S00194.isf +++| EXCST SPCB CALL PROCEDURE FILE 00216 M00S00195.isf +++| 00217 M00S00196.isf +++| END1 RJ RIF RESTORE INITIAL FAMILY 00218 M00S00197.isf +++| ENDRUN 00219 M00S00198.isf +++| SPACE 4 00220 M00S00199.isf +++|** TSFN - TABLE OF SPECIAL FILE NAMES. 00221 M00S00200.isf +++|* 00222 M00S00201.isf +++|*T 42/FILE NAME,18/PROCESSOR ADDRESS
Figure
00223 M00S00202.isf +++| 00224 M00S00203.isf +++| 00225 M00S00204.isf +++| TSFN BSS 0 00226 M00S00205.isf +++| CON 0L"APFN"+EFF VALIDATION FILE 00227 M00S00206.isf +++| PRFN CON 0L"PPFN"+EFF PROJECT PROFILE FILE 00228 M00S00207.isf +++| TSFNL EQU *-TSFN
| Line S00208 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00229 M01S00208.274l797 ---| TDFN SPACE 4,10 00230 M01S00209.274l797 ---|** TDFN - TABLE OF DEFAULT FAMILY SPECIAL FILE NAMES.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00231 M01S00003.274l797 +++| TDFF SPACE 4,10 00232 M01S00004.274l797 +++|** TDFF - TABLE OF DEFAULT FAMILY SPECIAL FILE NAMES. 00233 M00S00210.isf +++|* (THIS TABLE IS A CONTINUATION OF TSFN, AND MUST FOLLOW IT.) 00234 M00S00211.isf +++|* 00235 M00S00212.isf +++|*T 42/FILE NAME,18/FILE SIZE
Figure
00236 M00S00213.isf +++| 00237 M00S00214.isf +++|
| Line S00215 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00238 M01S00215.274l797 ---| TDFN BSS 0
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00239 M01S00005.274l797 +++| TDFF BSS 0 00240 M00S00216.isf +++| RDFN CON 0LRSXDXX+RDFL RESOURCE DEMAND FILE 00241 M00S00217.isf +++| RVFN CON 0LRSXVXX+RVFL RESOURCE VSN FILE
| Line S00218 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00242 M01S00218.274l797 ---| TDFNL EQU *-TDFN
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00243 M01S00006.274l797 +++| TDFFL EQU *-TDFF 00244 M00S00219.isf +++| CON 0 END OF TABLE 00245 M00S00220.isf +++| ERF SPACE 4 00246 M00S00221.isf +++|** EDF - ENTER DEFAULT FAMILY FILE. 00247 M00S00222.isf +++|* 00248 M00S00223.isf +++|* IF FILE IS PRESENT AS FAST ATTACH, ACCEPT IT AS IS. 00249 M00S00224.isf +++|* OTHERWISE, DEFINE THE FILE IF NECESSARY AND INITIALIZE IT. 00250 M00S00225.isf +++|* 00251 M00S00226.isf +++|* ENTRY (X1) = FILE NAME. 00252 M00S00227.isf +++|* (X6) = SIZE OF FILE IN PRUS. 00253 M00S00228.isf +++|*
| Line S00229 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00254 M01S00229.ns21000 ---|* USES A - 1, 3, 6, 7. 00255 M01S00230.ns21000 ---|* X - 0, 1, 2, 3, 6, 7.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00256 M01S00002.ns21000 +++|* USES X - 0, 1, 6, 7. 00257 M01S00003.ns21000 +++|* A - 1, 6, 7. 00258 M00S00231.isf +++|* 00259 M00S00232.isf +++|* CALLS CES. 00260 M00S00233.isf +++|*
| Line S00234 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00261 M01S00234.ns21000 ---|* MACROS ATTACH, DEFINE, ENFA, MESSAGE, PURGE, RECALL, 00262 M01S00235.ns21000 ---|* RETURN, WRITEF, WRITER, WRITEW.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | isf3 |
Seq # *Modification Id* Act ----------------------------+ 00263 M02S00004.isf3 ---|* MACROS ATTACH, DEFINE, ENFA, MESSAGE, RECALL, RETURN,
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | isf3 |
Seq # *Modification Id* Act ----------------------------+ 00264 M01S00001.isf3 +++|* MACROS ATTACH, DEFINE, ENFA, MESSAGE, PURGE, RECALL, RETURN,
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00265 M01S00005.ns21000 +++|* WRITER, WRITEW. 00266 M00S00236.isf +++| 00267 M00S00237.isf +++| 00268 M00S00238.isf +++| EDF4 RETURN X2 00269 M00S00239.isf +++| 00270 M00S00240.isf +++| EDF SUBR ENTRY/EXIT 00271 M00S00241.isf +++| SA6 EDFA SAVE FILE SIZE 00272 M00S00242.isf +++| SX7 B1 00273 M00S00243.isf +++| BX7 X1+X7 00274 M00S00244.isf +++| RECALL S 00275 M00S00245.isf +++| SA7 X2+ 00276 M00S00246.isf +++| ATTACH X2,,,,R,,,DF,FA ATTEMPT FAST ATTACH 00277 M00S00247.isf +++| RJ CES CHECK FET ERROR STATUS 00278 M00S00248.isf +++| ZR X0,EDF4 IF FILE IS ALREADY FAST ATTACH 00279 M00S00249.isf +++| NZ X3,EDF3 IF NOT *FILE NOT FOUND* 00280 M00S00250.isf +++| ATTACH X2,,,,W,,,DF,IE ATTEMPT REGULAR ATTACH 00281 M00S00251.isf +++| RJ CES CHECK ERROR STATUS 00282 M00S00252.isf +++| ZR X0,EDF1 IF ATTACH SUCCESSFUL
| Line S00253 Modification History | |
|---|---|
M01 (Removed by) | isf3 |
Seq # *Modification Id* Act ----------------------------+ 00283 M01S00253.isf3 ---| NZ X3,EDF3 IF NOT *FILE NOT FOUND*
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | isf3 |
Seq # *Modification Id* Act ----------------------------+ 00284 M01S00002.isf3 +++| ZR X3,EDF0 IF *FILE NOT FOUND* 00285 M01S00003.isf3 +++| 00286 M01S00004.isf3 +++|* FOR ERROR OTHER THAN *FILE NOT FOUND*, PURGE EXISTING FILE. 00287 M01S00005.isf3 +++| 00288 M01S00006.isf3 +++| PURGE X2,,,,,DF,IE 00289 M01S00007.isf3 +++| RJ CES CHECK ERROR STATUS 00290 M01S00008.isf3 +++| NZ X0,EDF3 IF ERROR IN PURGE
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00291 M01S00006.ns21000 +++| 00292 M01S00007.ns21000 +++|* CREATE A NEW RESOURCE FILE. THE FILE WILL BE CREATED WITH 00293 M01S00008.ns21000 +++|* *BR=N* TO AVOID THE NECESSITY OF *PFDUMP* PROCESSING, AND 00294 M01S00009.ns21000 +++|* TO PREVENT A POTENTIAL DEADLOCK BETWEEN *PFDUMP* AND *RESEX*. 00295 M01S00010.ns21000 +++|
| Line S00254 Modification History | |
|---|---|
M01 (Removed by) | isf3 |
Seq # *Modification Id* Act ----------------------------+ 00296 M01S00254.isf3 ---| SA1 X2+B1 CLEAR DEVICE TYPE IN FET
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | isf3 |
Seq # *Modification Id* Act ----------------------------+ 00297 M01S00009.isf3 +++| EDF0 SA1 X2+B1 CLEAR DEVICE TYPE IN FET 00298 M00S00255.isf +++| MX0 12 00299 M00S00256.isf +++| BX6 -X0*X1 00300 M00S00257.isf +++| SA6 A1
| Line S00258 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00301 M01S00258.ns21000 ---| DEFINE X2,,,,,,,,,DF,,,IE
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00302 M01S00011.ns21000 +++| DEFINE X2,,,,,,,,,DF,N,,IE 00303 M00S00259.isf +++| RJ CES CHECK ERROR STATUS 00304 M00S00260.isf +++| NZ X0,EDF3 IF ERROR IN DEFINE 00305 M00S00261.isf +++| EDF1 SA1 X2+B1 SET OUT=IN=FIRST 00306 M00S00262.isf +++| SX6 X1 00307 M00S00263.isf +++| SA6 A1+B1 00308 M00S00264.isf +++| SA6 A6+B1 00309 M00S00265.isf +++| 00310 M00S00266.isf +++|* INITIALIZE RESOURCE FILE. 00311 M00S00267.isf +++| 00312 M00S00268.isf +++| SA1 X2+B1 CLEAR ERROR PROCESSING BIT 00313 M00S00269.isf +++| MX6 1 00314 M00S00270.isf +++| LX6 44-59 00315 M00S00271.isf +++| BX6 -X6*X1 00316 M00S00272.isf +++| SA6 A1 00317 M00S00273.isf +++| WRITER X2,R WRITE INITIAL EOR 00318 M00S00274.isf +++| SA1 EDFA LENGTH OF FILE 00319 M00S00275.isf +++| SX0 X1+ 00320 M00S00276.isf +++| EDF2 SX0 X0-1 00321 M00S00277.isf +++| WRITEW X2,ZBUF,64 WRITE SECTOR OF DATA 00322 M00S00278.isf +++| NZ X0,EDF2 IF NOT COMPLETE 00323 M00S00279.isf +++| WRITER X2,R WRITE FINAL BUFFER OF DATA 00324 M00S00280.isf +++| SA1 X2+B1 SET ERROR PROCESSING BIT 00325 M00S00281.isf +++| MX6 1 00326 M00S00282.isf +++| LX6 44-59 00327 M00S00283.isf +++| BX6 X6+X1 00328 M00S00284.isf +++| SA6 A1 00329 M00S00285.isf +++| ENFA X2 ENTER LOCAL FAST ATTACH 00330 M00S00286.isf +++| EQ EDF4 RETURN 00331 M00S00287.isf +++| 00332 M00S00288.isf +++| EDF3 MESSAGE CERM ISSUE ERROR MESSAGE 00333 M00S00289.isf +++| EQ EDFX RETURN 00334 M00S00290.isf +++| 00335 M00S00291.isf +++| EDFA CON 0 FILE SIZE
| Line S00292 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00336 M01S00292.ns2729 ---| EFF SPACE 4,10
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00337 M01S00001.ns2729 +++| EFF SPACE 4,15 00338 M00S00293.isf +++|** EFF - ENTER FAST ATTACH FILE. 00339 M00S00294.isf +++|* 00340 M00S00295.isf +++|* ENTRY (X1) = FILE NAME. 00341 M00S00296.isf +++|* 00342 M00S00297.isf +++|* EXIT TO EAF. 00343 M00S00298.isf +++|*
| Line S00299 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00344 M01S00299.ns2729 ---|* USES X - 3. 00345 M01S00300.ns2729 ---|* B - 2.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00346 M01S00002.ns2729 +++|* CALLS CES, SFF. 00347 M00S00301.isf +++|*
| Line S00302 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00348 M01S00302.ns2729 ---|* CALLS ASF, CES. 00349 M01S00303.ns2729 ---|* 00350 M01S00304.ns2729 ---|* MACROS ENFA, MESSAGE, RETURN.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00351 M01S00003.ns2729 +++|* MACROS ATTACH, ENFA, MESSAGE, RETURN. 00352 M00S00305.isf +++| 00353 M00S00306.isf +++|
| Line S00307 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00354 M01S00307.ns2729 ---| EFF SB2 B1 FORCE DIRECT ACCESS FILE 00355 M01S00308.ns2729 ---| RJ ASF ACCESS SYSTEM FILE
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00356 M01S00004.ns2729 +++| EFF BSS 0 ENTRY 00357 M01S00005.ns2729 +++| RJ SFF SET FILE NAME IN FET 00358 M01S00006.ns2729 +++| ATTACH X2,,,,W,,,IP,FA ATTEMPT FAST ATTACH 00359 M00S00309.isf +++| RJ CES CHECK ERROR STATUS
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00360 M01S00007.ns2729 +++| ZR X0,EFF0 IF FILE IS ALREADY FAST ATTACH 00361 M01S00008.ns2729 +++| ZR X6,EFF0 IF *FILE BUSY* 00362 M01S00009.ns2729 +++| NZ X3,EFF2 IF NOT *FILE NOT FOUND* 00363 M01S00010.ns2729 +++| ATTACH X2,,,,W,,,IP,IE ATTEMPT NORMAL ATTACH 00364 M01S00011.ns2729 +++| RJ CES CHECK ERROR STATUS 00365 M00S00310.isf +++| NZ X0,EFF1 IF ERROR IN ACCESS 00366 M00S00311.isf +++| ENFA X2,GLOBAL ENTER GLOBAL FAST ATTACH FILE
| Line S00312 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00367 M01S00312.ns2729 ---| RETURN X2
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00368 M01S00012.ns2729 +++| EFF0 RETURN X2 00369 M00S00313.isf +++| EQ EAF PROCESS NEXT FILE 00370 M00S00314.isf +++|
| Line S00315 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00371 M01S00315.ns2729 ---| EFF1 SX3 X0-1 00372 M01S00316.ns2729 ---| NZ X3,EFF2 IF NOT *FILE BUSY*
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00373 M01S00013.ns2729 +++| EFF1 NZ X6,EFF2 IF NOT *FILE BUSY* 00374 M00S00317.isf +++| ENFA X2,LINK LINK TO EXISTING FAST ATTACH 00375 M00S00318.isf +++| RETURN X2 00376 M00S00319.isf +++| EQ EAF PROCESS NEXT FILE 00377 M00S00320.isf +++| 00378 M00S00321.isf +++| EFF2 MESSAGE CERM ISSUE ERROR MESSAGE 00379 M00S00322.isf +++| EQ EAF PROCESS NEXT FILE 00380 M00S00323.isf +++| RTF SPACE 4,10 00381 M00S00324.isf +++|** RTF - RETURN FAST ATTACH FILE. 00382 M00S00325.isf +++|* 00383 M00S00326.isf +++|* ENTRY (X1) = FILE NAME. 00384 M00S00327.isf +++|* 00385 M00S00328.isf +++|* USES X - 0, 2, 7. 00386 M00S00329.isf +++|* A - 2, 7. 00387 M00S00330.isf +++|*
| Line S00331 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00388 M01S00331.ns2729 ---|* CALLS CER.
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00389 M01S00014.ns2729 +++|* CALLS CER, SFF. 00390 M00S00332.isf +++|*
| Line S00333 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00391 M01S00333.ns2729 ---|* MACROS ATTACH, DFAT, RECALL, RETURN.
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00392 M01S00015.ns2729 +++|* MACROS ATTACH, DFAT, RETURN. 00393 M00S00334.isf +++| 00394 M00S00335.isf +++| 00395 M00S00336.isf +++| RTF SUBR ENTRY/EXIT 00396 M00S00337.isf +++| SA2 PRFN 00397 M00S00338.isf +++| BX2 X2-X1 00398 M00S00339.isf +++| MX0 42 00399 M00S00340.isf +++| BX7 X0*X2 00400 M00S00341.isf +++| NZ X7,RTF1 IF NOT ATTACHING PROFILE 00401 M00S00342.isf +++| SA2 PRAF 00402 M00S00343.isf +++| ZR X2,RTFX IF PROFILE DOES NOT EXIST 00403 M00S00344.isf +++| MX7 0 CLEAR PROFILE ATTACHED FLAG 00404 M00S00345.isf +++| SA7 PRAF 00405 M00S00346.isf +++| DFAT T 00406 M00S00347.isf +++| RETURN T 00407 M00S00348.isf +++| EQ RTFX RETURN 00408 M00S00349.isf +++|
| Line S00350 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00409 M01S00350.ns2729 ---| RTF1 SX7 B1 STORE FILE NAME 00410 M01S00351.ns2729 ---| BX7 X1+X7 00411 M01S00352.ns2729 ---| RECALL S 00412 M01S00353.ns2729 ---| SA7 X2+
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00413 M01S00016.ns2729 +++| RTF1 RJ SFF SET FILE NAME IN FET 00414 M00S00354.isf +++| ATTACH X2,,,,W,,,IP,FA
| Line S00355 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00415 M01S00355.ns2729 ---| RTF2 RJ CER CHECK ERROR STATUS
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00416 M01S00017.ns2729 +++| RJ CER CHECK ERROR STATUS 00417 M00S00356.isf +++| NZ X0,RTFX IF ERROR IN ACCESS 00418 M00S00357.isf +++| DFAT X2 00419 M00S00358.isf +++| RETURN X2 00420 M00S00359.isf +++| EQ RTFX RETURN 00421 M00S00360.isf +++| SJF SPACE 4,15 00422 M00S00361.isf +++|** SJF - SUBMIT JOB FILE. 00423 M00S00362.isf +++|* 00424 M00S00363.isf +++|* ENTRY (SJFA) = SUBMIT JOB FILE NAME. 00425 M00S00364.isf +++|* 00426 M00S00365.isf +++|* EXIT JOB SUBMITTED, IF FOUND. 00427 M00S00366.isf +++|* 00428 M00S00367.isf +++|* USES X - 1, 6.
| Line S00368 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00429 M01S00368.ns2729 ---|* A - 1, 6. 00430 M01S00369.ns2729 ---|* B - 2.
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00431 M01S00018.ns2729 +++|* A - 1. 00432 M00S00370.isf +++|*
| Line S00371 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00433 M01S00371.ns2729 ---|* CALLS ASF, CER.
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00434 M01S00019.ns2729 +++|* CALLS CER, SFF. 00435 M00S00372.isf +++|*
| Line S00373 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00436 M01S00373.ns2729 ---|* MACROS ROUTE.
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00437 M01S00020.ns2729 +++|* MACROS GET, ROUTE. 00438 M00S00374.isf +++| 00439 M00S00375.isf +++| 00440 M00S00376.isf +++| SJF SUBR ENTRY/EXIT 00441 M00S00377.isf +++| SA1 SJFA 00442 M00S00378.isf +++| MX6 42 00443 M00S00379.isf +++| BX1 X6*X1 00444 M00S00380.isf +++| ZR X1,SJFX IF NO SUBMIT JOB
| Line S00381 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00445 M01S00381.ns2729 ---| SB2 B0 FORCE INDIRECT ACCESS FILE 00446 M01S00382.ns2729 ---| RJ ASF GET SUBMIT JOB FILE
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00447 M01S00021.ns2729 +++| RJ SFF SET FILE NAME IN FET 00448 M01S00022.ns2729 +++| GET X2,,,,,,IP,IE GET SUBMIT JOB FILE 00449 M00S00383.isf +++| RJ CER CHECK ERROR 00450 M00S00384.isf +++| NZ X0,SJFX IF ERROR 00451 M00S00385.isf +++| ROUTE SJFA,R SUBMIT SYSTEM-ORIGIN JOB 00452 M00S00386.isf +++| EQ SJFX RETURN 00453 M00S00387.isf +++| 00454 M00S00388.isf +++| SJFA BSS 0 *DSP* PARAMETER BLOCK
| Line S00389 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00455 M01S00389.ns22000 ---| VFD 42/0LSYSJOB,6/0,1/1,4/0,6/SYOT,1/0
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00456 M01S00005.ns22000 +++| VFD 42/0,6/0,1/1,4/0,6/SYOT,1/0 00457 M00S00390.isf +++| VFD 24/0,12/2RIN,12/40B,12/22B 00458 M00S00391.isf +++| BSSZ 5 00459 M00S00392.isf +++| SPC SPACE 4,15 00460 M00S00393.isf +++|** SPC - SET PROCEDURE CALL. 00461 M00S00394.isf +++|* 00462 M00S00395.isf +++|* ENTRY (SPCA) = PROCEDURE FILE NAME. 00463 M00S00396.isf +++|* 00464 M00S00397.isf +++|* EXIT FILE NAME SET IN CALL, IF FILE FOUND. 00465 M00S00398.isf +++|*
| Line S00399 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00466 M01S00399.ns2729 ---|* USES X - 1, 6.
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00467 M01S00023.ns2729 +++|* USES X - 1. 00468 M00S00400.isf +++|* A - 1, 6.
| Line S00401 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00469 M01S00401.ns2729 ---|* B - 2. 00470 M00S00402.isf +++|*
| Line S00403 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00471 M01S00403.ns2729 ---|* CALLS ASF, CER, SFN.
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00472 M01S00024.ns2729 +++|* CALLS CER, SFF, SFN. 00473 M00S00404.isf +++|*
| Line S00405 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00474 M01S00405.ns2729 ---|* MACROS SETFS.
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00475 M01S00025.ns2729 +++|* MACROS GET, SETFS. 00476 M00S00406.isf +++| 00477 M00S00407.isf +++| 00478 M00S00408.isf +++| SPC SUBR ENTRY/EXIT 00479 M00S00409.isf +++| SA1 SPCA 00480 M00S00410.isf +++| ZR X1,SPCX IF NO PROCEDURE FILE
| Line S00411 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00481 M01S00411.ns2729 ---| SB2 B0 FORCE INDIRECT ACCESS FILE 00482 M01S00412.ns2729 ---| RJ ASF GET PROCEDURE FILE
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00483 M01S00026.ns2729 +++| RJ SFF SET FILE NAME IN FET 00484 M01S00027.ns2729 +++| GET X2,,,,,,IP,IE GET PROCEDURE FILE 00485 M00S00413.isf +++| RJ CER CHECK ERROR 00486 M00S00414.isf +++| NZ X0,SPCX IF ERROR 00487 M00S00415.isf +++| SETFS X2,0 CLEAR SPECIAL SYSTEM FILE STATUS 00488 M00S00416.isf +++| SA1 SPCA SET PROCEDURE FILE NAME IN CALL 00489 M00S00417.isf +++| RJ SFN 00490 M00S00418.isf +++| SA6 SPCB+1 00491 M00S00419.isf +++| EQ SPCX RETURN 00492 M00S00420.isf +++|
| Line S00421 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00493 M01S00421.ns22000 ---| SPCA CON 0LSYSPROC
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00494 M01S00006.ns22000 +++| SPCA CON 0 PROCEDURE FILE NAME 00495 M00S00422.isf +++| SPCB CON 10H$BEGIN,, 00496 M00S00423.isf +++| CON 0 00497 M00S00424.isf +++| CON 1L. 00498 M00S00425.isf +++| TITLE SUBROUTINES.
| Line S00426 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00499 M01S00426.ns2729 ---| ASF SPACE 4 00500 M01S00427.ns2729 ---|** ASF - ACCESS SYSTEM FILE. 00501 M01S00428.ns2729 ---|* 00502 M01S00429.ns2729 ---|* ENTRY (X1) = FILE NAME. 00503 M01S00430.ns2729 ---|* (B2) = 0 IF INDIRECT ACCESS FILE. 00504 M01S00431.ns2729 ---|* 00505 M01S00432.ns2729 ---|* EXIT (X2) = FWA OF FET. 00506 M01S00433.ns2729 ---|* 00507 M01S00434.ns2729 ---|* USES X - 2, 7. 00508 M01S00435.ns2729 ---|* A - 7. 00509 M01S00436.ns2729 ---|* 00510 M01S00437.ns2729 ---|* MACROS ATTACH, GET, RECALL. 00511 M01S00438.ns2729 ---| 00512 M01S00439.ns2729 ---| 00513 M01S00440.ns2729 ---| ASF SUBR ENTRY/EXIT 00514 M01S00441.ns2729 ---| SX7 B1 STORE FILE NAME 00515 M01S00442.ns2729 ---| BX7 X1+X7 00516 M01S00443.ns2729 ---| RECALL S 00517 M01S00444.ns2729 ---| SA7 X2+ 00518 M01S00445.ns2729 ---| ZR B2,ASF1 IF INDIRECT ACCESS FILE 00519 M01S00446.ns2729 ---| ATTACH X2,,,,W,,,IP,IE ATTACH SYSTEM FILE 00520 M01S00447.ns2729 ---| EQ ASFX RETURN 00521 M01S00448.ns2729 ---| 00522 M01S00449.ns2729 ---| ASF1 GET X2,,,,,,IP,IE 00523 M01S00450.ns2729 ---| EQ ASFX RETURN 00524 M00S00451.isf +++| CER SPACE 4,10 00525 M00S00452.isf +++|** CER - CHECK ERROR AND ISSUE MESSAGE. 00526 M00S00453.isf +++|* 00527 M00S00454.isf +++|* ENTRY (X2) = FWA OF FET. 00528 M00S00455.isf +++|* 00529 M00S00456.isf +++|* EXIT (X0) = FET ERROR STATUS. 00530 M00S00457.isf +++|* 00531 M00S00458.isf +++|* USES X - 0. 00532 M00S00459.isf +++|* 00533 M00S00460.isf +++|* CALLS CES. 00534 M00S00461.isf +++|* 00535 M00S00462.isf +++|* MACROS MESSAGE. 00536 M00S00463.isf +++| 00537 M00S00464.isf +++| 00538 M00S00465.isf +++| CER SUBR ENTRY/EXIT 00539 M00S00466.isf +++| RJ CES CHECK ERROR STATUS 00540 M00S00467.isf +++| ZR X0,CERX IF NO ERROR 00541 M00S00468.isf +++| MESSAGE CERM 00542 M00S00469.isf +++| EQ CERX 00543 M00S00470.isf +++| 00544 M00S00471.isf +++| CERM BSSZ 4 ERROR MESSAGE BUFFER 00545 M00S00472.isf +++| CES SPACE 4,10 00546 M00S00473.isf +++|** CES - CHECK AND CLEAR ERROR STATUS IN FET. 00547 M00S00474.isf +++|* 00548 M00S00475.isf +++|* ENTRY (X2) = FWA OF FET. 00549 M00S00476.isf +++|* 00550 M00S00477.isf +++|* EXIT (X0) = FET ERROR STATUS. 00551 M00S00478.isf +++|* (X3) = 0 IF *FILE NOT FOUND* STATUS.
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00552 M01S00028.ns2729 +++|* (X6) = 0 IF *FILE BUSY* STATUS. 00553 M00S00479.isf +++|* 00554 M00S00480.isf +++|* USES A - 1, 6. 00555 M00S00481.isf +++|* X - 0, 1, 3, 6. 00556 M00S00482.isf +++| 00557 M00S00483.isf +++| 00558 M00S00484.isf +++| CES SUBR ENTRY/EXIT 00559 M00S00485.isf +++| SA1 X2 READ FET STATUS 00560 M00S00486.isf +++| MX3 -8 00561 M00S00487.isf +++| LX1 -10 00562 M00S00488.isf +++| BX0 -X3*X1 ERROR STATUS 00563 M00S00489.isf +++| BX6 X3*X1 CLEAR STATUS IN FET
| Line S00490 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00564 M01S00490.ns2729 ---| SX3 X0-2 *FILE NOT FOUND* STATUS
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00565 M01S00029.ns2729 +++| SX3 X0-/ERRMSG/FNF *FILE NOT FOUND* STATUS 00566 M00S00491.isf +++| LX6 10
| Line S00492 Modification History | |
|---|---|
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00567 M01S00492.ns2729 ---| SA6 A1
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00568 M01S00030.ns2729 +++| SA6 A1+ 00569 M01S00031.ns2729 +++| SX6 X0-/ERRMSG/FBS *FILE BUSY* STATUS 00570 M00S00493.isf +++| EQ CESX RETURN 00571 M00S00494.isf +++| PEC SPACE 4,10 00572 M00S00495.isf +++|** PEC - PROCESS EXIT CLEANUP. 00573 M00S00496.isf +++|* 00574 M00S00497.isf +++|* CALLS RIF, RPF. 00575 M00S00498.isf +++| 00576 M00S00499.isf +++| 00577 M00S00500.isf +++| PEC SUBR ENTRY/EXIT 00578 M00S00501.isf +++| RJ RIF RESTORE INITIAL FAMILY 00579 M00S00502.isf +++| RJ RPF RETURN PROFILE FILE 00580 M00S00503.isf +++| EQ PECX RETURN 00581 M00S00504.isf +++| RIF SPACE 4,10 00582 M00S00505.isf +++|** RIF - RESTORE INITIAL FAMILY. 00583 M00S00506.isf +++|* 00584 M00S00507.isf +++|* USES A - 1. 00585 M00S00508.isf +++|* X - 1, 6. 00586 M00S00509.isf +++|* 00587 M00S00510.isf +++|* MACROS ENFAM. 00588 M00S00511.isf +++| 00589 M00S00512.isf +++| 00590 M00S00513.isf +++| RIF SUBR ENTRY/EXIT 00591 M00S00514.isf +++| SA1 FAMU 00592 M00S00515.isf +++| ZR X1,RIFX IF USER-S FAMILY NOT SET 00593 M00S00516.isf +++| ENFAM FAMU RESTORE FAMILY 00594 M00S00517.isf +++| MX6 0 CLEAR USER-S FAMILY 00595 M00S00518.isf +++| SA6 FAMU 00596 M00S00519.isf +++| EQ RIFX RETURN 00597 M00S00520.isf +++| RPF SPACE 4,10 00598 M00S00521.isf +++|** RPF - RETURN PROFILE FILE. 00599 M00S00522.isf +++|* 00600 M00S00523.isf +++|* USES A - 1, 6. 00601 M00S00524.isf +++|* X - 1, 6. 00602 M00S00525.isf +++|* 00603 M00S00526.isf +++|* MACROS RETURN. 00604 M00S00527.isf +++| 00605 M00S00528.isf +++| 00606 M00S00529.isf +++| RPF SUBR ENTRY/EXIT 00607 M00S00530.isf +++| SA1 PRAF 00608 M00S00531.isf +++| ZR X1,RPFX IF PROFILE NOT ATTACHED 00609 M00S00532.isf +++| MX6 0 00610 M00S00533.isf +++| SA6 PRAF CLEAR PROFILE ATTACHED FLAG 00611 M00S00534.isf +++| RETURN T 00612 M00S00535.isf +++| EQ RPFX RETURN
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act ----------------------------+ 00613 M01S00032.ns2729 +++| SFF SPACE 4,10 00614 M01S00033.ns2729 +++|** SFF - SET FILE NAME IN FET. 00615 M01S00034.ns2729 +++|* 00616 M01S00035.ns2729 +++|* ENTRY (X1) = FILE NAME. 00617 M01S00036.ns2729 +++|* 00618 M01S00037.ns2729 +++|* EXIT (X2) = FWA OF FET. 00619 M01S00038.ns2729 +++|* 00620 M01S00039.ns2729 +++|* USES X - 2, 7. 00621 M01S00040.ns2729 +++|* A - 7. 00622 M01S00041.ns2729 +++|* 00623 M01S00042.ns2729 +++|* MACROS RECALL. 00624 M01S00043.ns2729 +++| 00625 M01S00044.ns2729 +++| 00626 M01S00045.ns2729 +++| SFF SUBR ENTRY/EXIT 00627 M01S00046.ns2729 +++| SX7 B1 STORE FILE NAME 00628 M01S00047.ns2729 +++| BX7 X1+X7 00629 M01S00048.ns2729 +++| RECALL S 00630 M01S00049.ns2729 +++| SA7 X2 00631 M01S00050.ns2729 +++| EQ SFFX RETURN
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
Seq # *Modification Id* Act ----------------------------+ 00632 M01S00005.ns2595 +++| WMV SPACE 4,10 00633 M01S00006.ns2595 +++|** WMV - WAIT FOR *1MV* TO COMPLETE. 00634 M01S00007.ns2595 +++|*
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
M02 (Removed by) | isf2 |
Seq # *Modification Id* Act ----------------------------+ 00635 M02S00008.isf2 ---|* USES X - 0, 1, 2, 3, 6, 7. 00636 M02S00009.isf2 ---|* A - 1, 2, 6, 7.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | isf2 |
Seq # *Modification Id* Act ----------------------------+ 00637 M01S00002.isf2 +++|* USES X - ALL. 00638 M01S00003.isf2 +++|* A - 1, 2, 5, 6, 7.
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
Seq # *Modification Id* Act ----------------------------+ 00639 M01S00010.ns2595 +++|*
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
M02 (Removed by) | isf2 |
Seq # *Modification Id* Act ----------------------------+ 00640 M02S00011.isf2 ---|* CALLS RSB.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | isf2 |
Seq # *Modification Id* Act ----------------------------+ 00641 M01S00004.isf2 +++|* CALLS RSB=.
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
Seq # *Modification Id* Act ----------------------------+ 00642 M01S00012.ns2595 +++|* 00643 M01S00013.ns2595 +++|* MACROS MESSAGE, RECALL, SYSTEM. 00644 M01S00014.ns2595 +++| 00645 M01S00015.ns2595 +++| 00646 M01S00016.ns2595 +++| WMV SUBR ENTRY/EXIT 00647 M01S00017.ns2595 +++| MESSAGE (=C* WAIT 1MV COMPLETE.*),1 00648 M01S00018.ns2595 +++| SA1 WMVA READ EST POINTER WORD 00649 M01S00019.ns2595 +++| MX6 1 00650 M01S00020.ns2595 +++| BX7 X1 00651 M01S00021.ns2595 +++| SA6 SBUF SET LOW CORE READ 00652 M01S00022.ns2595 +++| SA7 RSBP
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
M02 (Removed by) | isf2 |
Seq # *Modification Id* Act ----------------------------+ 00653 M02S00023.isf2 ---| SYSTEM RSB,R,RSBP
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | isf2 |
Seq # *Modification Id* Act ----------------------------+ 00654 M01S00005.isf2 +++| SYSTEM RSB,R,RSBP READ *ESTP*
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
Seq # *Modification Id* Act ----------------------------+ 00655 M01S00024.ns2595 +++| SA2 SBUF SET *COMCRSB* ENTRY CONDITIONS 00656 M01S00025.ns2595 +++| MX3 -12 00657 M01S00026.ns2595 +++| SX1 A2 SET ADDRESS TO TRANSFER TO 00658 M01S00027.ns2595 +++| AX2 12 00659 M01S00028.ns2595 +++| BX7 -X3*X2 00660 M01S00029.ns2595 +++| AX2 24 SET ADDRESS TO TRANSFER FROM 00661 M01S00030.ns2595 +++| R= X6,ESTE 00662 M01S00031.ns2595 +++| SA7 LEST SAVE LAST EST ORDINAL + 1 00663 M01S00032.ns2595 +++| IX3 X7*X6 SET WORD COUNT 00664 M01S00033.ns2595 +++| SX4 B0 SET SUBSYSTEM (= *CMR*) 00665 M01S00034.ns2595 +++| MX6 1 00666 M01S00035.ns2595 +++| SA6 X1
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
M02 (Removed by) | isf2 |
Seq # *Modification Id* Act ----------------------------+ 00667 M02S00036.isf2 ---| RJ RSB= READ EST
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | isf2 |
Seq # *Modification Id* Act ----------------------------+ 00668 M01S00006.isf2 +++| RJ RSB= READ EST INTO *SBUF*
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
Seq # *Modification Id* Act ----------------------------+ 00669 M01S00037.ns2595 +++| SX6 NOPE INITIALIZE EST ORDINAL FOR SEARCH 00670 M01S00038.ns2595 +++| SA6 ESTO 00671 M01S00039.ns2595 +++| WMV1 SA5 ESTO 00672 M01S00040.ns2595 +++| SX7 X5+B1 00673 M01S00041.ns2595 +++| SA7 A5 00674 M01S00042.ns2595 +++| SA1 LEST CHECK ORDINAL 00675 M01S00043.ns2595 +++| IX6 X5-X1 00676 M01S00044.ns2595 +++| R= X0,ESTE 00677 M01S00045.ns2595 +++| IX7 X5*X0 00678 M01S00046.ns2595 +++| SA1 SBUF+X7+EQDE GET EST ENTRY 00679 M01S00047.ns2595 +++| MX0 -12 00680 M01S00048.ns2595 +++| ZR X6,WMVX IF END OF EST 00681 M01S00049.ns2595 +++| PL X1,WMV1 IF NOT MASS STORAGE 00682 M01S00050.ns2595 +++| SX7 MSTB SET MST BUFFER ADDRESS 00683 M01S00051.ns2595 +++| SX2 MSTL 00684 M01S00052.ns2595 +++| BX1 -X0*X1 00685 M01S00053.ns2595 +++| LX2 36 00686 M01S00054.ns2595 +++| LX1 18+3 MST ADDRESS 00687 M01S00055.ns2595 +++| BX7 X7+X2 00688 M01S00056.ns2595 +++| BX7 X1+X7 00689 M01S00057.ns2595 +++| SA7 RSBP 00690 M01S00058.ns2595 +++| WMV2 MX6 1 00691 M01S00059.ns2595 +++| SA6 MSTB FLAG LOW CORE READ 00692 M01S00060.ns2595 +++| SYSTEM RSB,R,RSBP READ MST 00693 M01S00061.ns2595 +++| SA1 MSTB+DALL CHECK FOR SUSPECT
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
M02 (Removed by) | ns2595a |
Seq # *Modification Id* Act ----------------------------+ 00694 M02S00062.ns2595a ---| LX1 59-55 00695 M02S00063.ns2595a ---| PL X1,WMV1 IF SUSPECT IS NOT SET
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2595a |
Seq # *Modification Id* Act ----------------------------+ 00696 M01S00001.ns2595a +++| SX6 1200B 00697 M01S00002.ns2595a +++| SX7 200B 00698 M01S00003.ns2595a +++| LX1 12 00699 M01S00004.ns2595a +++| BX1 X6*X1 00700 M01S00005.ns2595a +++| BX1 X7-X1 00701 M01S00006.ns2595a +++| NZ X1,WMV1 IF *OFF*, *DOWN*, OR NOT SUSPECT
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
Seq # *Modification Id* Act ----------------------------+ 00702 M01S00064.ns2595 +++| RECALL 00703 M01S00065.ns2595 +++| EQ WMV2 RECHECK DEVICE FOR SUSPECT 00704 M01S00066.ns2595 +++| 00705 M01S00067.ns2595 +++| WMVA VFD 24/1,18/ESTP,18/SBUF 00706 M00S00536.isf +++| SPACE 4 00707 M00S00537.isf +++|* COMMON DECKS. 00708 M00S00538.isf +++| 00709 M00S00539.isf +++| 00710 M00S00540.isf +++|*CALL COMCQFM 00711 M00S00541.isf +++|*CALL COMCCIO 00712 M00S00542.isf +++|*CALL COMCCPM 00713 M00S00543.isf +++|*CALL COMCLFM 00714 M00S00544.isf +++|*CALL COMCPFM 00715 M00S00545.isf +++|*CALL COMCRDW
| Line S00068 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
Seq # *Modification Id* Act ----------------------------+ 00716 M01S00068.ns2595 +++|*CALL COMCRSB 00717 M00S00546.isf +++|*CALL COMCSFM 00718 M00S00547.isf +++|*CALL COMCSFN 00719 M00S00548.isf +++|*CALL COMCSYS 00720 M00S00549.isf +++|*CALL COMCWTW 00721 M00S00550.isf +++| TITLE PRESET. 00722 M00S00551.isf +++| BUFFERS SPACE 4,10 00723 M00S00552.isf +++|* BUFFERS. 00724 M00S00553.isf +++| 00725 M00S00554.isf +++| 00726 M00S00555.isf +++| USE // 00727 M00S00556.isf +++| SEG 00728 M00S00557.isf +++| 00729 M00S00558.isf +++| ZBUF BSSZ 100B SECTOR OF ZEROES 00730 M00S00559.isf +++| SBUF BSS SBUFL CIO BUFFER FOR S
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | ns2595 |
Seq # *Modification Id* Act ----------------------------+ 00731 M01S00069.ns2595 +++| MSTB BSS MSTL MST BUFFER 00732 M00S00560.isf +++| RFL= EQU *+8 ALLOW FOR *COMCWTW* LOOK-AHEAD 00733 M00S00561.isf +++| 00734 M00S00562.isf +++| ORG SBUF 00735 M00S00563.isf +++| PRS SPACE 4 00736 M00S00564.isf +++|** PRS - PRESET PROGRAM. 00737 M00S00565.isf +++| 00738 M00S00566.isf +++| 00739 M00S00567.isf +++| PRS SUBR ENTRY/EXIT 00740 M00S00568.isf +++| SX7 CERM SET ERROR MESSAGE BUFFER ADDRESS 00741 M00S00569.isf +++| SA7 S+CFPW 00742 M00S00570.isf +++| MACHID PRSA RETRIEVE MACHINE ID 00743 M00S00571.isf +++| SA3 PRSA 00744 M00S00572.isf +++| MX0 12 00745 M00S00573.isf +++| SA1 RDFN SET ID IN RESEX FILE NAMES 00746 M00S00574.isf +++| SA2 RVFN 00747 M00S00575.isf +++| LX0 -24 00748 M00S00576.isf +++| BX1 -X0*X1 00749 M00S00577.isf +++| LX3 24 00750 M00S00578.isf +++| BX2 -X0*X2 00751 M00S00579.isf +++| BX6 X3+X1 00752 M00S00580.isf +++| SA6 A1 00753 M00S00581.isf +++| BX7 X3+X2 00754 M00S00582.isf +++| SA7 A2 00755 M00S00583.isf +++| SA1 ACTR 00756 M00S00584.isf +++| SB4 X1
| Line S00585 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00757 M01S00585.ns22000 ---| ZR B4,PRS19 IF NO ARGUMENTS
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00758 M01S00007.ns22000 +++| ZR B4,PRSX IF NO ARGUMENTS 00759 M00S00586.isf +++| SA4 ARGR FIRST ARGUMENT 00760 M00S00587.isf +++| SB5 TARG ARGUMENT TABLE 00761 M00S00588.isf +++| RJ ARG
| Line S00589 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00762 M01S00589.ns22000 ---| NZ X1,PRS16 IF ERROR 00763 M01S00590.ns22000 ---| 00764 M01S00591.ns22000 ---|* SET FILE NAMES FOR *SYSJOB* AND *SYSPROC*. 00765 M01S00592.ns22000 ---|* IF *SJ* AND *SP* WERE NOT SPECIFIED AS PARAMETERS, 00766 M01S00593.ns22000 ---|* *SYSJOB* AND *SYSPROC* WILL BE FORCED TO ZERO. 00767 M01S00594.ns22000 ---| 00768 M01S00595.ns22000 ---| SA1 SJB 00769 M01S00596.ns22000 ---| SA2 SPF 00770 M01S00597.ns22000 ---| BX6 X1 00771 M01S00598.ns22000 ---| LX7 X2 00772 M01S00599.ns22000 ---| SA6 SJFA 00773 M01S00600.ns22000 ---| SA7 SPCA
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00774 M01S00008.ns22000 +++| NZ X1,PRS16.1 IF ERROR 00775 M00S00601.isf +++|
| Line S00602 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00776 M01S00602.ns22000 ---|* SET FAMILY EQUIPMENT
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00777 M01S00009.ns22000 +++|* CHANGE TO SPECIFIED FAMILY. 00778 M00S00603.isf +++| 00779 M00S00604.isf +++| ENFAM FAMD SET DEFAULT FAMILY 00780 M00S00605.isf +++| SA1 FAMD SAVE USER-S FAMILY NAME 00781 M00S00606.isf +++| MX0 48 00782 M00S00607.isf +++| BX6 X0*X1 00783 M00S00608.isf +++| SA6 FAMU 00784 M00S00609.isf +++| SA1 FAM SAVE NEW FAMILY NAME 00785 M00S00610.isf +++| BX7 X1 00786 M00S00611.isf +++| SA7 FAMN 00787 M00S00612.isf +++| NZ X1,PRS1 IF *FM* SPECIFIED 00788 M00S00613.isf +++| SA6 FAMN USE USER-S FAMILY 00789 M00S00614.isf +++| PRS1 ENFAM FAMN SET FAMILY WHERE FILES ARE LOCATED 00790 M00S00615.isf +++| SA1 FAMN 00791 M00S00616.isf +++| BX6 X0*X1 00792 M00S00617.isf +++| LX1 59-11
| Line S00618 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00793 M01S00618.v23l617 ---| NG X1,PRS17 IF ILLEGAL FAMILY
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00794 M01S00008.v23l617 +++| NG X1,PRS17 IF INCORRECT FAMILY 00795 M00S00619.isf +++| SA6 FAMD 00796 M00S00620.isf +++| 00797 M00S00621.isf +++|* CHECK FILE RETURN REQUEST. 00798 M00S00622.isf +++| 00799 M00S00623.isf +++| SA1 RET 00800 M00S00624.isf +++| ZR X1,PRS11 IF NO RETURN 00801 M00S00625.isf +++| SA2 ENT 00802 M00S00626.isf +++| NZ X2,PRS16 IF BOTH *E* AND *R* SPECIFIED 00803 M00S00627.isf +++| RJ CFC CHECK FILE COUNT 00804 M00S00628.isf +++| SA1 RET 00805 M00S00629.isf +++| SX3 0L0 00806 M00S00630.isf +++| LX3 42 00807 M00S00631.isf +++| BX2 X1-X3 00808 M00S00632.isf +++| ZR X2,PRS7 IF ALL FILES TO BE RETURNED 00809 M00S00633.isf +++| 00810 M00S00634.isf +++|* PROCESS *R*=FILENAME. 00811 M00S00635.isf +++|* SEARCH FILE LIST. 00812 M00S00636.isf +++| 00813 M00S00637.isf +++| SB4 TSFN SEARCH SPECIAL FILE TABLE 00814 M00S00638.isf +++| SB5 TSFN+TSFNL 00815 M00S00639.isf +++| SB3 B1+ DONT FORCE DEFAULT FAMILY 00816 M00S00640.isf +++| PRS2 SA2 B4 00817 M00S00641.isf +++| BX7 X2-X1 00818 M00S00642.isf +++| SB4 B4+B1 00819 M00S00643.isf +++| AX7 18 00820 M00S00644.isf +++| ZR X7,PRS3 IF FOUND 00821 M00S00645.isf +++| LT B4,B5,PRS2 IF NOT END OF TABLE 00822 M00S00646.isf +++| ZR B3,PRS14 IF NOT VALID FILE NAME
| Line S00647 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00823 M01S00647.274l797 ---| SB4 TDFN 00824 M01S00648.274l797 ---| SB5 TDFN+TDFNL
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00825 M01S00007.274l797 +++| SB4 TDFF 00826 M01S00008.274l797 +++| SB5 TDFF+TDFFL 00827 M00S00649.isf +++| SB3 B0 FORCE DEFAULT FAMILY 00828 M00S00650.isf +++| EQ PRS2 SEARCH DEFAULT FAMILY FILE TABLE 00829 M00S00651.isf +++| 00830 M00S00652.isf +++| PRS3 NZ B3,PRS6 IF NOT DEFAULT FAMILY FILE 00831 M00S00653.isf +++| SA3 FAM 00832 M00S00654.isf +++| NZ X3,PRS4 IF *FM* SPECIFIED 00833 M00S00655.isf +++| SA3 FAMU GET USER-S FAMILY 00834 M00S00656.isf +++| PRS4 SA2 FAMD 00835 M00S00657.isf +++| BX3 X3-X2 00836 M00S00658.isf +++| AX3 18 00837 M00S00659.isf +++| NZ X3,PRS18 IF NOT DEFAULT FAMILY
| Line S00660 Modification History | |
|---|---|
M01 (Removed by) | isf1 |
Seq # *Modification Id* Act ----------------------------+ 00838 M01S00660.isf1 ---| SX5 A2-RDFN
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | isf1 |
Seq # *Modification Id* Act ----------------------------+ 00839 M01S00001.isf1 +++| SX5 B4-RDFN-1 00840 M00S00661.isf +++| ZR X5,PRS5 IF RESOURCE DEMAND FILE
| Line S00662 Modification History | |
|---|---|
M01 (Removed by) | isf1 |
Seq # *Modification Id* Act ----------------------------+ 00841 M01S00662.isf1 ---| SX5 A2-RVFN
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | isf1 |
Seq # *Modification Id* Act ----------------------------+ 00842 M01S00002.isf1 +++| SX5 B4-RVFN-1 00843 M00S00663.isf +++| NZ X5,PRS6 IF NOT RESOURCE VSN FILE 00844 M00S00664.isf +++| PRS5 SA1 RDFN RETURN BOTH RESOURCE FILES 00845 M00S00665.isf +++| MX0 42 00846 M00S00666.isf +++| BX1 X0*X1 00847 M00S00667.isf +++| RJ RTF RETURN FILE 00848 M00S00668.isf +++| SA1 RVFN 00849 M00S00669.isf +++| MX0 42 00850 M00S00670.isf +++| BX1 X0*X1 00851 M00S00671.isf +++| PRS6 RJ RTF RETURN FILE 00852 M00S00672.isf +++| EQ END EXIT 00853 M00S00673.isf +++| 00854 M00S00674.isf +++|* PROCESS *R*=0. 00855 M00S00675.isf +++|* RETURN SPECIAL FILES IN SPECIFIED FAMILY. 00856 M00S00676.isf +++| 00857 M00S00677.isf +++| PRS7 SX5 TSFNL-1 00858 M00S00678.isf +++| PRS8 SA1 TSFN+X5 00859 M00S00679.isf +++| MX0 42 00860 M00S00680.isf +++| BX1 X0*X1 00861 M00S00681.isf +++| SX5 X5-1 00862 M00S00682.isf +++| RJ RTF RETURN FILE 00863 M00S00683.isf +++| PL X5,PRS8 IF MORE FILES TO RETURN 00864 M00S00684.isf +++| SA1 FAM GET *FM* FAMILY 00865 M00S00685.isf +++| NZ X1,PRS9 IF *FM* SPECIFIED 00866 M00S00686.isf +++| SA1 FAMU GET USER-S FAMILY 00867 M00S00687.isf +++| PRS9 SA2 FAMD 00868 M00S00688.isf +++| BX3 X1-X2 00869 M00S00689.isf +++| AX3 18 00870 M00S00690.isf +++| NZ X3,END IF .NE. DEFAULT 00871 M00S00691.isf +++| 00872 M00S00692.isf +++|* RETURN DEFAULT FAMILY FILES. 00873 M00S00693.isf +++|
| Line S00694 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00874 M01S00694.274l797 ---| SX5 TDFNL-1 00875 M01S00695.274l797 ---| PRS10 SA1 TDFN+X5
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00876 M01S00009.274l797 +++| SX5 TDFFL-1 00877 M01S00010.274l797 +++| PRS10 SA1 TDFF+X5 00878 M00S00696.isf +++| MX0 42 00879 M00S00697.isf +++| BX1 X0*X1 00880 M00S00698.isf +++| SX5 X5-1 00881 M00S00699.isf +++| RJ RTF RETURN FILE 00882 M00S00700.isf +++| PL X5,PRS10 IF MORE FILES TO RETURN 00883 M00S00701.isf +++| EQ END EXIT 00884 M00S00702.isf +++| 00885 M00S00703.isf +++|* CHECK FILE ENTER REQUEST. 00886 M00S00704.isf +++| 00887 M00S00705.isf +++| PRS11 SA1 ENT 00888 M00S00706.isf +++| ZR X1,PRSX IF NOT SPECIFIED 00889 M00S00707.isf +++| SX3 0L0 00890 M00S00708.isf +++| LX3 42 00891 M00S00709.isf +++| BX2 X1-X3 00892 M00S00710.isf +++| ZR X2,PRSX IF ALL FILES TO BE ENTERED 00893 M00S00711.isf +++| SB3 B1 PRESET FILE NOT FOUND 00894 M00S00712.isf +++| MX6 0 00895 M00S00713.isf +++| SA2 TSFN SEARCH FILE LIST 00896 M00S00714.isf +++| SA4 RDFN CHECK FOR BOTH RESOURCE FILES 00897 M00S00715.isf +++| SA5 RVFN 00898 M00S00716.isf +++| BX7 X1-X4 00899 M00S00717.isf +++| BX3 X5 SECOND FILE = RSXVXX 00900 M00S00718.isf +++| AX7 18 00901 M00S00719.isf +++| ZR X7,PRS12 IF FILE = RSXDXX 00902 M00S00720.isf +++| BX7 X1-X5 00903 M00S00721.isf +++| BX3 X4 SECOND FILE = RSXDXX 00904 M00S00722.isf +++| AX7 18 00905 M00S00723.isf +++| ZR X7,PRS12 IF FILE = RSXVXX 00906 M00S00724.isf +++| SX3 B0+ NO SECOND FILE 00907 M00S00725.isf +++| PRS12 BX7 X1-X2 00908 M00S00726.isf +++| AX7 18 00909 M00S00727.isf +++| ZR X7,PRS15 IF FOUND 00910 M00S00728.isf +++| BX7 X2-X3 CHECK SECOND FILE 00911 M00S00729.isf +++| AX7 18 00912 M00S00730.isf +++| ZR X7,PRS15 IF FOUND 00913 M00S00731.isf +++| SA6 A2+ ZERO NON-MATCHING ENTRY 00914 M00S00732.isf +++| PRS13 SA2 A2+B1 00915 M00S00733.isf +++| NZ X2,PRS12 IF MORE FILE NAMES TO CHECK 00916 M00S00734.isf +++| ZR B3,PRSX EXIT IF FOUND 00917 M00S00735.isf +++| 00918 M00S00736.isf +++| PRS14 RJ PEC PROCESS EXIT CLEANUP
| Line S00737 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00919 M01S00737.v23l617 ---| MESSAGE (=C* ILLEGAL FILE NAME.*)
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00920 M01S00009.v23l617 +++| MESSAGE (=C* INCORRECT FILE NAME.*) 00921 M00S00738.isf +++| ABORT 00922 M00S00739.isf +++| 00923 M00S00740.isf +++| PRS15 SB3 B0 00924 M00S00741.isf +++| EQ PRS13 CONTINUE LOOP 00925 M00S00742.isf +++| 00926 M00S00743.isf +++| PRS16 RJ PEC PROCESS EXIT CLEANUP
| Line S00744 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00927 M01S00744.ns22000 ---| MESSAGE (=C* ARGUMENT ERROR.*)
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00928 M01S00010.ns22000 +++| PRS16.1 MESSAGE (=C* ARGUMENT ERROR.*) 00929 M00S00745.isf +++| ABORT 00930 M00S00746.isf +++|
| Line S00747 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00931 M01S00747.ns22000 ---| PRS17 RJ PEC PROCESS EXIT CLEANUP 00932 M01S00748.ns22000 ---| MESSAGE (=C* ILLEGAL FAMILY NAME.*)
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00933 M02S00011.v23l617 ---| PRS17 MESSAGE (=C* ILLEGAL FAMILY NAME.*)
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00934 M01S00010.v23l617 +++| PRS17 MESSAGE (=C* INCORRECT FAMILY NAME.*) 00935 M00S00749.isf +++| ABORT 00936 M00S00750.isf +++| 00937 M00S00751.isf +++| PRS18 RJ PEC PROCESS EXIT CLEANUP 00938 M00S00752.isf +++| MESSAGE (=C* FILE NOT IN ALTERNATE FAMILY.*) 00939 M00S00753.isf +++| ABORT 00940 M00S00754.isf +++|
| Line S00755 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00941 M01S00755.ns22000 ---| PRS19 GETJOSC PRSA GET SERVICE CLASS 00942 M01S00756.ns22000 ---| SA2 PRSA 00943 M01S00757.ns22000 ---| MX0 -6 00944 M01S00758.ns22000 ---| LX2 -6 00945 M01S00759.ns22000 ---| BX2 -X0*X2 00946 M01S00760.ns22000 ---| SX6 X2-DSSC 00947 M01S00761.ns22000 ---| NZ X6,PRSX IF NOT DEADSTART SERVICE CLASS 00948 M01S00762.ns22000 ---| SYSTEM RSB,R,PRSB GET RECOVERY MODE FROM CMR 00949 M01S00763.ns22000 ---| MX0 -3 00950 M01S00764.ns22000 ---| SA1 PRSC CHECK RECOVERY MODE 00951 M01S00765.ns22000 ---| BX6 -X0*X1 00952 M01S00766.ns22000 ---| ZR X6,PRSX IF LEVEL 0 DEADSTART 00953 M01S00767.ns22000 ---| SX7 0 00954 M01S00768.ns22000 ---| SA7 SPCA CLEAR PROCEDURE FILE CALL 00955 M01S00769.ns22000 ---| EQ END END PROCESSING 00956 M00S00770.isf +++| 00957 M00S00771.isf +++| PRSA CON 0 MACHINE ID
| Line S00772 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00958 M01S00772.ns22000 ---| PRSB VFD 24/1,18/JNML,18/PRSC *RSB* STATUS WORD
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00959 M01S00012.ns22000 +++| PRSB VFD 12/,12/1,18/DSSL,18/PRSC *RSB* STATUS WORD 00960 M00S00773.isf +++| PRSC CON -1 *RSB* REPLY WORD 00961 M00S00774.isf +++| CFC SPACE 4,10 00962 M00S00775.isf +++|** CFC - CHECK FILE COUNT. 00963 M00S00776.isf +++|* 00964 M00S00777.isf +++|* COMPARE ACTIVE DIRECT ACCESS FILE COUNT AND FAST ATTACH 00965 M00S00778.isf +++|* FILE COUNT. THE PROFILE FILE IS ATTACHED IN WRITE MODE TO
| Line S00779 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00966 M01S00779.v23l617 ---|* PREVENT FURTHER *CHARGE* STATEMENT PROCESSING.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00967 M01S00011.v23l617 +++|* PREVENT FURTHER *CHARGE* COMMAND PROCESSING. 00968 M00S00780.isf +++|* 00969 M00S00781.isf +++|* USES A - 2, 7. 00970 M00S00782.isf +++|* X - 0, 1, 2, 7. 00971 M00S00783.isf +++|* 00972 M00S00784.isf +++|* CALLS CES, RIF. 00973 M00S00785.isf +++|* 00974 M00S00786.isf +++|* MACROS ABORT, ATTACH, CFAT, MESSAGE, RECALL, RETURN. 00975 M00S00787.isf +++| 00976 M00S00788.isf +++| 00977 M00S00789.isf +++| CFC SUBR ENTRY/EXIT 00978 M00S00790.isf +++| SA2 PRFN ATTACH PROFILE FILE 00979 M00S00791.isf +++| MX0 42 00980 M00S00792.isf +++| SX7 B1 00981 M00S00793.isf +++| BX2 X0*X2 00982 M00S00794.isf +++| BX7 X7+X2 00983 M00S00795.isf +++| RECALL T 00984 M00S00796.isf +++| SA7 X2+ 00985 M00S00797.isf +++| ATTACH X2,,,,W,,,IP,FA 00986 M00S00798.isf +++| RJ CES CHECK ERROR (DO NOT PRINT MESSAGE) 00987 M00S00799.isf +++| ZR X0,CFC1 IF NO ERROR 00988 M00S00800.isf +++| ZR X3,CFC2 IF *FILE NOT FOUND* ERROR 00989 M00S00801.isf +++| RJ RIF RESTORE INITIAL FAMILY 00990 M00S00802.isf +++| ABORT ABORT 00991 M00S00803.isf +++| 00992 M00S00804.isf +++| CFC1 SX7 B1+ SET PROFILE ATTACHED FLAG 00993 M00S00805.isf +++| SA7 PRAF 00994 M00S00806.isf +++| CFC2 CFAT S COUNT FAFT FILES 00995 M00S00807.isf +++| SA2 S+5 00996 M00S00808.isf +++| SA1 PRAF COMPENSATE FOR ATTACHED PROFILE FILE 00997 M00S00809.isf +++| IX2 X2-X1 00998 M00S00810.isf +++| ZR X2,CFCX IF FAFT COUNT = DAF COUNT 00999 M00S00811.isf +++| ZR X1,CFC3 IF PROFILE NOT ATTACHED 01000 M00S00812.isf +++| RETURN T 01001 M00S00813.isf +++| CFC3 RJ RIF RESTORE INITIAL FAMILY 01002 M00S00814.isf +++| MESSAGE (=C* FAMILY FILES ACTIVE.*) 01003 M00S00815.isf +++| ABORT ABORT 01004 M00S00816.isf +++| 01005 M00S00817.isf +++| 01006 M00S00818.isf +++|* COMMON DECKS. 01007 M00S00819.isf +++| 01008 M00S00820.isf +++| 01009 M00S00821.isf +++|*CALL COMCARG 01010 M00S00822.isf +++| 01011 M00S00823.isf +++| 01012 M00S00824.isf +++|* ARGUMENT TABLE. 01013 M00S00825.isf +++| 01014 M00S00826.isf +++| TARG BSS 0 01015 M00S00827.isf +++| E ARG ENT,ENT,400B
| Line S00828 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01016 M01S00828.ns22000 ---| FM ARG FAM,FAM
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01017 M01S00013.ns22000 +++| FM ARG FAM,FAM,400B 01018 M00S00829.isf +++| R ARG RET,RET,400B
| Line S00830 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01019 M01S00830.ns22000 ---| SJ ARG SJFA,SJB 01020 M01S00831.ns22000 ---| SP ARG SPCA,SPF
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01021 M01S00014.ns22000 +++| SJ ARG SJB,SJFA 01022 M01S00015.ns22000 +++| SP ARG SPF,SPCA 01023 M00S00832.isf +++| ARG 01024 M00S00833.isf +++| 01025 M00S00834.isf +++| 01026 M00S00835.isf +++|* ASSUMED OPTION VALUES. 01027 M00S00836.isf +++| 01028 M00S00837.isf +++| ENT CON 0 FILE TO BE ENTERED 01029 M00S00838.isf +++| FAM CON 0 ALTERNATE FAMILY NAME 01030 M00S00839.isf +++| RET CON 0 FILE TO BE RETURNED
| Line S00840 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01031 M01S00840.ns22000 ---| SJB CON 0 JOB TO BE SUBMITTED 01032 M01S00841.ns22000 ---| SPF CON 0 PROCEDURE FILE TO BE CALLED
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01033 M01S00016.ns22000 +++| SJB VFD 42/0LSYSJOB,6/0,1/1,4/0,6/SYOT,1/0 JOB TO SUBMIT 01034 M01S00017.ns22000 +++| SPF CON 0LSYSPROC PROCEDURE FILE TO BE CALLED 01035 M00S00842.isf +++| 01036 M00S00843.isf +++| ERRNG RFL=-* IF *PRS* OVERFLOWS *SBUF* 01037 M00S00844.isf +++| 01038 M00S00845.isf +++| END
cdc/nos2.source/opl.opl871/deck/isf.txt · Last modified: by 127.0.0.1