cdc:nos2.source:opl.opl871:deck:kronref
Deck KRONREF
Library Member Format: MODIFY
Listing Sections
- Deck KRONREF Start
- Deck KRONREF Part 1 (Line 1959)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.kronref +++| IDENT KRONREF,FETS,KRONREF 00002 M00S00002.kronref +++| ABS 00003 M00S00003.kronref +++| ENTRY KRONREF 00004 M00S00004.kronref +++| ENTRY MFL= 00005 M00S00005.kronref +++| SYSCOM B1 DEFINE (B1) = 1 00006 M00S00006.kronref +++|*COMMENT KRONREF - SYSTEM CROSS REFERENCE PROGRAM.
| Line S00007 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00007 M01S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1978.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00009 M00S00008.kronref +++| TITLE KRONREF - KRONOS SYSTEM CROSS REFERENCE PROCESSOR. 00010 M00S00009.kronref +++| SPACE 4 00011 M00S00010.kronref +++|***** *KRONREF* - KRONOS SYSTEM CROSS REFERENCE PROCESSOR. 00012 M00S00011.kronref +++|* G. R. MANSFIELD. 70/10/26. 00013 M00S00012.kronref +++|* A. D. FORET. 75/04/18. 00014 M00S00013.kronref +++| SPACE 4 00015 M00S00014.kronref +++|*** *KRONREF* GENERATES A CROSS REFERENCE OF SYSTEM 00016 M00S00015.kronref +++|* SYMBOLS USED BY DECKS ON A MODIFY OPL. 00017 M00S00016.kronref +++| SPACE 4 00018 M00S00017.kronref +++|*** CONTROL CARD CALL. 00019 M00S00018.kronref +++|* 00020 M00S00019.kronref +++|* 00021 M00S00020.kronref +++|* KRONREF(P1,P2,P3) 00022 M00S00021.kronref +++|* PN MAY BE OF THE FOLLOWING FORMS. 00023 M00S00022.kronref +++|* PN 00024 M00S00023.kronref +++|* PN=NAME 00025 M00S00024.kronref +++|* 00026 M00S00025.kronref +++|* OPTIONS. 00027 M00S00026.kronref +++|* 00028 M00S00027.kronref +++|* P OPL INPUT FROM FILE *OPL*. 00029 M00S00028.kronref +++|* P=FNAME OPL INPUT FROM FILE *FNAME*. 00030 M00S00029.kronref +++|* 00031 M00S00030.kronref +++|* L LIST OUTPUT ON FILE *OUTPUT*. 00032 M00S00031.kronref +++|* L=FNAME LIST OUTPUT ON FILE *FNAME*. 00033 M00S00032.kronref +++|*
| Line S00033 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00034 M01S00033.ns22000 ---|* S SYSTEMS TEXT FROM OVERLAY *SYSTEXT*.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00035 M01S00001.ns22000 +++|* S SYSTEMS TEXT FROM OVERLAY *NOSTEXT*. 00036 M00S00034.kronref +++|* S=NAME SYSTEMS TEXT FROM OVERLAY *NAME*. 00037 M00S00035.kronref +++|* 00038 M00S00036.kronref +++|* G SYSTEMS TEXT FROM FILE *TEXT*. 00039 M00S00037.kronref +++|* G=FNAME SYSTEMS TEXT FROM FILE *FNAME*. 00040 M00S00038.kronref +++|* OVERRIDES ANY *S* SELECTION. 00041 M00S00039.kronref +++| SPACE 4 00042 M00S00040.kronref +++|*** DAYFILE MESSAGES. 00043 M00S00041.kronref +++|* 00044 M00S00042.kronref +++|* * ERROR IN KRONREF ARGUMENTS. * - AN ILLEGAL CONTROL CARD 00045 M00S00043.kronref +++|* WAS SELECTED. 00046 M00S00044.kronref +++|* 00047 M00S00045.kronref +++|* * ERROR IN SYSTEM TEXT. * - DESIGNATED SYSTEM TEXT IS IN THE 00048 M00S00046.kronref +++|* WRONG FORMAT. 00049 M00S00047.kronref +++|*
| Line S00048 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00050 M01S00048.ns22000 ---|* * KRONOS REFERENCE COMPLETE. * - NORMAL COMPLETION MESSAGE.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00051 M01S00002.ns22000 +++|* * KRONREF COMPLETE.* - NORMAL COMPLETION MESSAGE. 00052 M00S00049.kronref +++|* 00053 M00S00050.kronref +++|* * MEMORY OVERFLOW. * - NOT ENOUGH STORAGE AVAILABLE TO STORE 00054 M00S00051.kronref +++|* TABLES. 00055 M00S00052.kronref +++|*
| Line S00053 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00056 M01S00053.ns22000 ---|* * NO SYSTEM TEXT FOUND. * - NO SYSTEM TEXT IS AVAILABLE BY 00057 M01S00054.ns22000 ---|* THE NAME GIVEN. 00058 M01S00055.ns22000 ---|* 00059 M01S00056.ns22000 ---|* * PL ERROR IN DECK. * - PL IS IMPROPERLY FORMATED. 00060 M01S00057.ns22000 ---|* 00061 M01S00058.ns22000 ---|* * PROGRAM LIBRARY NOT AVAILABLE. * - P=0 WAS DESIGNATE WHICH 00062 M01S00059.ns22000 ---|* IS ILLEGAL. 00063 M01S00060.ns22000 ---| SPACE 4
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00064 M01S00003.ns22000 +++|* * NO REFERENCES LISTED.* - OPL FILE DID NOT REFERENCE ANY 00065 M01S00004.ns22000 +++|* SYSTEM TEXT SYMBOLS. CHECK FOR 00066 M01S00005.ns22000 +++|* EMPTY OR INVALID OPL FILE OR BAD 00067 M01S00006.ns22000 +++|* SYSTEM TEXT. 00068 M01S00007.ns22000 +++|* 00069 M01S00008.ns22000 +++|* * PL ERROR IN DECK (NAME). * - BAD OPL/OPLC DECK. 00070 M01S00009.ns22000 +++| SPACE 4,10 00071 M00S00061.kronref +++|*** OPERATOR MESSAGES. 00072 M00S00062.kronref +++|* 00073 M00S00063.kronref +++|* * SCANNING DECKNAME * - WHERE DECKNAME IS CURRENTLY BEING 00074 M00S00064.kronref +++|* PROCESSED. 00075 M00S00065.kronref +++| SPACE 4 00076 M00S00066.kronref +++|**** ASSEMBLY CONSTANTS. 00077 M00S00067.kronref +++| 00078 M00S00068.kronref +++| 00079 M00S00069.kronref +++| BUFL EQU 100B SCRATCH BUFFER LENGTH 00080 M00S00070.kronref +++| PBUFL EQU 4001B OPL FILE BUFFER LENGTH 00081 M00S00071.kronref +++| MXCCL EQU 37B MAXIMUM LENGTH OF ONE COMPRESSED CARD 00082 M00S00072.kronref +++| MTBSL EQU 26000B NOMINAL TABLE LENGTH
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | kronr1 |
Seq # *Modification Id* Act ----------------------------+ 00083 M01S00001.kronr1 +++| MINC EQU 1000B MEMORY INCREMENT FOR *TOV*
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00084 M01S00010.ns22000 +++| LCFE EQU 99999 LINE COUNT TO FORCE EJECT 00085 M00S00073.kronref +++|**** 00086 M00S00074.kronref +++| TITLE MACRO DEFINITIONS. 00087 M00S00075.kronref +++| ADDWRD SPACE 4
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00088 M01S00011.ns22000 +++|** COMMON DECKS. 00089 M01S00012.ns22000 +++| 00090 M01S00013.ns22000 +++| 00091 M00S00076.kronref +++|*CALL COMCMAC 00092 M00S00077.kronref +++|*CALL COMCCMD 00093 M00S00078.kronref +++| SPACE 4 00094 M00S00079.kronref +++|** ADDWRD - ADD WORD TO MANAGED TABLE. 00095 M00S00080.kronref +++|* 00096 M00S00081.kronref +++|* ADDWRD TNAM,WORD 00097 M00S00082.kronref +++|* 00098 M00S00083.kronref +++|* ENTRY *TNAM* = TABLE NAME. 00099 M00S00084.kronref +++|* *WORD* = -X- REGISTER CONTAINING WORD. 00100 M00S00085.kronref +++|* *WORD* = BOOLEAN -X- REGISTER EXPRESSION. 00101 M00S00086.kronref +++|* 00102 M00S00087.kronref +++|* USES A0, X1. 00103 M00S00088.kronref +++|* 00104 M00S00089.kronref +++|* CALLS ADW. 00105 M00S00090.kronref +++| 00106 M00S00091.kronref +++| 00107 M00S00092.kronref +++| PURGMAC ADDWRD 00108 M00S00093.kronref +++| ADDWRD MACRO TNAM,WORD 00109 M00S00094.kronref +++| IFC NE,$X1$WORD$,1 00110 M00S00095.kronref +++| BX1 WORD 00111 M00S00096.kronref +++| R= A0,TNAM 00112 M00S00097.kronref +++| RJ ADW 00113 M00S00098.kronref +++| ADDWRD ENDM 00114 M00S00099.kronref +++| ALLOC SPACE 4,10 00115 M00S00100.kronref +++|** ALLOC - ALLOCATE TABLE SPACE. 00116 M00S00101.kronref +++|* 00117 M00S00102.kronref +++|* ALLOC TNAM,N 00118 M00S00103.kronref +++|* 00119 M00S00104.kronref +++|* ENTRY *TNAM* = TABLE NAME. 00120 M00S00105.kronref +++|* *N* = NUMBER OF WORDS TO ADD. 00121 M00S00106.kronref +++|* 00122 M00S00107.kronref +++|* USES A0, X1. 00123 M00S00108.kronref +++|* 00124 M00S00109.kronref +++|* CALLS ATS. 00125 M00S00110.kronref +++| 00126 M00S00111.kronref +++| 00127 M00S00112.kronref +++| PURGMAC ALLOC 00128 M00S00113.kronref +++| ALLOC MACRO TNAM,N 00129 M00S00114.kronref +++| R= X1,N 00130 M00S00115.kronref +++| R= A0,TNAM 00131 M00S00116.kronref +++| RJ ATS 00132 M00S00117.kronref +++| ALLOC ENDM 00133 M00S00118.kronref +++| OPC SPACE 4,10 00134 M00S00119.kronref +++|** OPC - OPCODE TABLE ENTRY. 00135 M00S00120.kronref +++|* 00136 M00S00121.kronref +++|* OPC OPCODE,ADDRESS 00137 M00S00122.kronref +++|* 00138 M00S00123.kronref +++|* ENTRY *OPCODE* = OPERATION CODE. 00139 M00S00124.kronref +++|* *ADDRESS* = ADDRESS OF PROCESSOR. 00140 M00S00125.kronref +++| 00141 M00S00126.kronref +++| 00142 M00S00127.kronref +++| PURGMAC OPC 00143 M00S00128.kronref +++| OPC MACRO OPCODE,ADDR 00144 M00S00129.kronref +++| VFD 60/0R;A 00145 M00S00130.kronref +++| IFC NE,*ADDR** 00146 M00S00131.kronref +++| VFD 60/ADDR 00147 M00S00132.kronref +++| ELSE 1 00148 M00S00133.kronref +++| CON OPCX 00149 M00S00134.kronref +++| OPC ENDM 00150 M00S00135.kronref +++| TABLE SPACE 4,10 00151 M00S00136.kronref +++|** TABLE - GENERATE MANAGED TABLE POINTERS. 00152 M00S00137.kronref +++|* 00153 M00S00138.kronref +++|* TABLE TNAM 00154 M00S00139.kronref +++|* 00155 M00S00140.kronref +++|* ENTRY *TNAM* = TABLE NAME. 00156 M00S00141.kronref +++|* 00157 M00S00142.kronref +++|* EXIT *F.TNAM* = ADDRESS OF TABLE FWA POINTER. 00158 M00S00143.kronref +++|* *L.TNAM* = ADDRESS OF TABLE LENGTH POINTER. 00159 M00S00144.kronref +++| 00160 M00S00145.kronref +++| 00161 M00S00146.kronref +++| PURGMAC TABLE 00162 M00S00147.kronref +++| MACRO TABLE,TNAM,N 00163 M00S00148.kronref +++| TNAM EQU * 00164 M00S00149.kronref +++| VFD 60/MTBS 00165 M00S00150.kronref +++| F.TNAM EQU FTAB+TNAM 00166 M00S00151.kronref +++| RMT 00167 M00S00152.kronref +++| L.TNAM EQU LTAB+TNAM 00168 M00S00153.kronref +++| ORG L.TNAM 00169 M00S00154.kronref +++| DATA 0 00170 M00S00155.kronref +++| ORG NTAB+TNAM 00171 M00S00156.kronref +++| VFD 60/N 00172 M00S00157.kronref +++| RMT 00173 M00S00158.kronref +++| TABLE ENDM 00174 M00S00159.kronref +++| TITLE FETS AND STORAGE ASSIGNMENTS. 00175 M00S00160.kronref +++| FETS SPACE 4,10 00176 M00S00161.kronref +++|** FETS. 00177 M00S00162.kronref +++| 00178 M00S00163.kronref +++| 00179 M00S00164.kronref +++| ORG 103B 00180 M00S00165.kronref +++| FETS BSS 0 00181 M00S00166.kronref +++| 00182 M00S00167.kronref +++| O BSS 0
| Line S00168 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00183 M01S00168.ns22000 ---| OUTPUT FILEC PBUF,PBUFL
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00184 M01S00014.ns22000 +++| OUTPUT FILEC PBUF,PBUFL,(FET=6) 00185 M00S00169.kronref +++| 00186 M00S00170.kronref +++| P BSS 0 00187 M00S00171.kronref +++| OPL RFILEB PBUF,PBUFL,(FET=8),EPR 00188 M00S00172.kronref +++| FTAB SPACE 4,10 00189 M00S00173.kronref +++|** MANAGED TABLES ARE REFERENCED BY THE TABLE NUMBER *TNAM*. 00190 M00S00174.kronref +++|* THE FWA OF A TABLE IS CONTAINED IN *F.TNAM*. 00191 M00S00175.kronref +++|* THE LENGTH OF A TABLE IS CONTAINED IN *L.TNAM*. 00192 M00S00176.kronref +++|* THESE SYMBOLS ARE GENERATED BY THE *TABLE* MACRO. 00193 M00S00177.kronref +++| 00194 M00S00178.kronref +++| 00195 M00S00179.kronref +++| FTAB BSS 0 00196 M00S00180.kronref +++| LOC 0 00197 M00S00181.kronref +++| TNME SPACE 4,10 00198 M00S00182.kronref +++|** TNME - TABLE OF REFERENCED NAMES. 00199 M00S00183.kronref +++|* ENTRY = 1 WORD. 00200 M00S00184.kronref +++|* 00201 M00S00185.kronref +++|*T 12/,48/ *NAME*
Figure
00202 M00S00186.kronref +++|* NAME NAME RIGHT JUSTIFIED 00203 M00S00187.kronref +++| 00204 M00S00188.kronref +++| 00205 M00S00189.kronref +++| TNME TABLE 10 NAMES 00206 M00S00190.kronref +++| TREF SPACE 4,10 00207 M00S00191.kronref +++|** TREF - TABLE OF REFERENCES. 00208 M00S00192.kronref +++|* ENTRY = 1 WORD. 00209 M00S00193.kronref +++|* 00210 M00S00194.kronref +++|*T 42/ *DECK*,18/ IN
Figure
00211 M00S00195.kronref +++|* DECK DECK NAME 00212 M00S00196.kronref +++|* IN INDEX IN *TNME* 00213 M00S00197.kronref +++| 00214 M00S00198.kronref +++| 00215 M00S00199.kronref +++| TREF TABLE 200 00216 M00S00200.kronref +++| 00217 M00S00201.kronref +++|* REMAINDER OF MANAGED TABLE VALUES. 00218 M00S00202.kronref +++| 00219 M00S00203.kronref +++| FTABL BSS 0 00220 M00S00204.kronref +++| LOC *O 00221 M00S00205.kronref +++| 00222 M00S00206.kronref +++| VFD 60/MTBS LWA+1 ALL TABLES 00223 M00S00207.kronref +++| LTAB BSS 0 00224 M00S00208.kronref +++| NTAB EQU LTAB+FTABL 00225 M00S00209.kronref +++| HERE 00226 M00S00210.kronref +++| TITLE STORAGE ASSIGNMENTS. 00227 M00S00211.kronref +++| DATA SPACE 4,10 00228 M00S00212.kronref +++|* COMMON DATA. 00229 M00S00213.kronref +++| 00230 M00S00214.kronref +++| 00231 M00S00215.kronref +++| T1 DATA 0 TEMPORARY STORAGE 00232 M00S00216.kronref +++| T2 DATA 0 00233 M00S00217.kronref +++| FL DATA 0 FIELD LENGTH 00234 M00S00218.kronref +++| SL DATA 0 SYSTEM SYMBOL LENGTH 00235 M00S00219.kronref +++| RF DATA 0 REFERENCE FLAG 00236 M00S00220.kronref +++| PP DATA 0 PP CODE 00237 M00S00221.kronref +++| DN DATA 0 DECK NAME 00238 M00S00222.kronref +++| CH DATA 0 NEXT CHARACTER 00239 M00S00223.kronref +++| CP DATA 0 CHARACTER POINTER 00240 M00S00224.kronref +++| LIST SPACE 4,10 00241 M00S00225.kronref +++|* LIST CONTROLS. 00242 M00S00226.kronref +++| 00243 M00S00227.kronref +++|
| Line S00228 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00244 M01S00228.ns22000 ---| LC CON LINP LINE COUNT
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00245 M01S00015.ns22000 +++| LC CON LCFE LINE COUNT 00246 M01S00016.ns22000 +++| LL CON 0 LINE LIMIT 00247 M01S00017.ns22000 +++| PD CON 0 PRINT DENSITY 00248 M00S00229.kronref +++| PN CON 1 PAGE NUMBER 00249 M00S00230.kronref +++| ST CON 0,LSRA ADDRESS OF SUBTITLE LINES 00250 M00S00231.kronref +++| TX CON 0 SYSTEXT PRESENT FLAG 00251 M00S00232.kronref +++| SPACE 4 00252 M00S00233.kronref +++|* PROGRAM LIBRARY STATISTICS. 00253 M00S00234.kronref +++| 00254 M00S00235.kronref +++| 00255 M00S00236.kronref +++| BLANK CON 0 BLANK STATEMENTS 00256 M00S00237.kronref +++| CALL CON 0 *CALL STATEMENTS 00257 M00S00238.kronref +++| CODE CON 0 LINES OF CODE NOT OTHERWISE COUNTED 00258 M00S00239.kronref +++| COMNT CON 0 * TYPE COMMENT STATEMENTS 00259 M00S00240.kronref +++| INACT CON 0 INACTIVE STATEMENTS 00260 M00S00241.kronref +++| BLOCK SPACE 4 00261 M00S00242.kronref +++|* BLOCK STORAGE. 00262 M00S00243.kronref +++| 00263 M00S00244.kronref +++| 00264 M00S00245.kronref +++| USE BUFFERS 00265 M00S00246.kronref +++| 00266 M00S00247.kronref +++|* TITLE LINE. 00267 M00S00248.kronref +++| 00268 M00S00249.kronref +++| TITL DATA 30H1 CROSS REFERENCE OF OPL. 00269 M00S00250.kronref +++| DATA 10H OPL FILE= 00270 M00S00251.kronref +++| PLNM DATA 10H 00271 M00S00252.kronref +++| DATA 10HSYS. TEXT= 00272 M00S00253.kronref +++| TXNM DATA 10H *NONE* 00273 M00S00254.kronref +++| DATA 10H 00274 M00S00255.kronref +++| DATA 10H 00275 M00S00256.kronref +++| DATE DATA 1H 00276 M00S00257.kronref +++| TIME DATA 1H 00277 M00S00258.kronref +++| DATA 4APAGE 00278 M00S00259.kronref +++| PAGE DATA 1H 00279 M00S00260.kronref +++| TITLL EQU *-TITL 00280 M00S00261.kronref +++| 00281 M00S00262.kronref +++| CDTX BSS MXCCL CARD TEXT 00282 M00S00263.kronref +++| USE * 00283 M00S00264.kronref +++| TITLE MAIN PROGRAM. 00284 M00S00265.kronref +++| KRONREF SPACE 4,10 00285 M00S00266.kronref +++|** KRONREF - MAIN PROGRAM. 00286 M00S00267.kronref +++|* 00287 M00S00268.kronref +++|* USES X - 1, 6. 00288 M00S00269.kronref +++|* A - 1, 6. 00289 M00S00270.kronref +++|* B - 1. 00290 M00S00271.kronref +++|* 00291 M00S00272.kronref +++|* CALLS LCL, LNK, LOC, LSR, LSS, OPC, PRS, RMT, SCA. 00292 M00S00273.kronref +++|* 00293 M00S00274.kronref +++|* MACROS ENDRUN, MESSAGE, RECALL, WRITEC, WRITER. 00294 M00S00275.kronref +++| 00295 M00S00276.kronref +++| 00296 M00S00277.kronref +++| KRONREF SB1 1 (B1) = 1 00297 M00S00278.kronref +++| RJ PRS PRESET PROGRAM 00298 M00S00279.kronref +++| RJ LSS LOAD SYSTEMS SYMBOLS 00299 M00S00280.kronref +++| 00300 M00S00281.kronref +++|* BEGIN NEW DECK. 00301 M00S00282.kronref +++| 00302 M00S00283.kronref +++| REF1 RJ RMT READ MODIFIER TABLE 00303 M00S00284.kronref +++| NZ X1,REF4 IF EOR 00304 M00S00285.kronref +++| 00305 M00S00286.kronref +++|* SCAN DECK CARDS. 00306 M00S00287.kronref +++| 00307 M00S00288.kronref +++| REF2 RJ RPF READ CARD 00308 M00S00289.kronref +++| NZ X1,REF1 IF EOR 00309 M00S00290.kronref +++| SA1 CDTX CHECK FIRST CHARACTER 00310 M00S00291.kronref +++| NZ X1,REF3 IF NOT BLANK STATEMENT 00311 M00S00292.kronref +++| SA1 BLANK COUNT BLANK STATEMENT 00312 M00S00293.kronref +++| SX6 B1 00313 M00S00294.kronref +++| IX6 X6+X1 00314 M00S00295.kronref +++| SA6 A1 00315 M00S00296.kronref +++| EQ REF2 LOOP FOR NEXT STATEMENT 00316 M00S00297.kronref +++| 00317 M00S00298.kronref +++| REF3 RJ LOC PROCESS LOCATION FIELD 00318 M00S00299.kronref +++| ZR X6,REF2 IF NO PROCESSING 00319 M00S00300.kronref +++| SA1 TX 00320 M00S00301.kronref +++| ZR X1,REF2 IF NO SYSTEXT 00321 M00S00302.kronref +++| RJ OPC PROCESS OPCODE 00322 M00S00303.kronref +++| NZ X1,REF2 IF NOT INTERESTING 00323 M00S00304.kronref +++| SA2 RF 00324 M00S00305.kronref +++| ZR X2,REF2 IF REFERENCE FLAG OFF 00325 M00S00306.kronref +++| RJ SCA SCAN ADDRESS 00326 M00S00307.kronref +++| EQ REF2 CONTINUE SCAN 00327 M00S00308.kronref +++| 00328 M00S00309.kronref +++|* LIST REFERENCE TABLE. 00329 M00S00310.kronref +++| 00330 M00S00311.kronref +++| REF4 SA1 L.TREF 00331 M00S00312.kronref +++| ZR X1,REF6 IF NO REFERENCES 00332 M00S00313.kronref +++| RJ LNK LINK TABLES 00333 M00S00314.kronref +++| RECALL P 00334 M00S00315.kronref +++| SA1 TX 00335 M00S00316.kronref +++| ZR X1,REF4.1 IF NO SYSTEXT 00336 M00S00317.kronref +++| RJ LSR LIST SYMBOL REFERENCES 00337 M00S00318.kronref +++| REF4.1 RJ LCL LIST SPECIAL CALLS 00338 M00S00319.kronref +++| RJ PLS ISSUE PROGRAM LIBRARY STATISTICS MESSAGES 00339 M00S00320.kronref +++| SA1 PN 00340 M00S00321.kronref +++| LX1 59 00341 M00S00322.kronref +++| NG X1,REF5 IF PAGE COUNT EVEN 00342 M00S00323.kronref +++| WRITEC O,(=2L1 ) 00343 M00S00324.kronref +++| REF5 WRITER O,R
| Line S00325 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00344 M01S00325.ns22000 ---| REF6 MESSAGE (=C* KRONOS REFERENCE COMPLETE.*)
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00345 M01S00018.ns22000 +++| MESSAGE (=C* KRONREF COMPLETE.*) 00346 M00S00326.kronref +++| ENDRUN
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00347 M01S00019.ns22000 +++| 00348 M01S00020.ns22000 +++| REF6 MESSAGE (=C* NO REFERENCES LISTED.*) 00349 M01S00021.ns22000 +++| ENDRUN 00350 M00S00327.kronref +++| TITLE DECK SCANNING. 00351 M00S00328.kronref +++| LOC SPACE 4,10 00352 M00S00329.kronref +++|** LOC - PROCESS LOCATION FIELD. 00353 M00S00330.kronref +++|* 00354 M00S00331.kronref +++|* EXIT (X6) = NEXT CHARACTER OR 0 IF NO NEXT CHARACTER. 00355 M00S00332.kronref +++|* 00356 M00S00333.kronref +++|* USES X - 1, 2, 5, 6, 7. 00357 M00S00334.kronref +++|* A - 1, 2, 6. 00358 M00S00335.kronref +++|* 00359 M00S00336.kronref +++|* CALLS ASN, ESR, SNC. 00360 M00S00337.kronref +++| 00361 M00S00338.kronref +++| 00362 M00S00339.kronref +++| LOC4 SA1 COMNT COUNT * TYPE COMMENT STATEMENTS 00363 M00S00340.kronref +++| SX6 B1 00364 M00S00341.kronref +++| IX6 X6+X1 00365 M00S00342.kronref +++| SA6 A1+ 00366 M00S00343.kronref +++| SX6 B0+ CLEAR NEXT CHARACTER 00367 M00S00344.kronref +++|* EQ LOCX RETURN 00368 M00S00345.kronref +++| 00369 M00S00346.kronref +++| LOC SUBR ENTRY/EXIT 00370 M00S00347.kronref +++| SX1 B0 SET CHARACTER POINTER 00371 M00S00348.kronref +++| PX6 X1,B0 00372 M00S00349.kronref +++| SA6 CP 00373 M00S00350.kronref +++| RJ SNC SET NEXT CHARACTER 00374 M00S00351.kronref +++| SA2 CDTX 00375 M00S00352.kronref +++| AX2 54 00376 M00S00353.kronref +++| ZR X2,LOC1 IF NO LOCATION FIELD 00377 M00S00354.kronref +++| SX7 X6-1R* 00378 M00S00355.kronref +++| ZR X7,LOC2 IF FIRST CHARACTER = (*) 00379 M00S00356.kronref +++| RJ SNC SET NEXT CHARACTER 00380 M00S00357.kronref +++| RJ ASN ASSEMBLE NAME 00381 M00S00358.kronref +++| LOC1 RJ SNC SET NEXT CHARACTER 00382 M00S00359.kronref +++| SA1 CODE COUNT LINE OF CODE 00383 M00S00360.kronref +++| SX6 B1 00384 M00S00361.kronref +++| IX6 X6+X1 00385 M00S00362.kronref +++| SA6 A1 00386 M00S00363.kronref +++| EQ LOCX RETURN 00387 M00S00364.kronref +++| 00388 M00S00365.kronref +++| LOC2 RJ SNC SET NEXT CHARACTER 00389 M00S00366.kronref +++| RJ ASN ASSEMBLE NAME 00390 M00S00367.kronref +++| SA1 =4RCALL 00391 M00S00368.kronref +++| BX2 X1-X6
| Line S00369 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00392 M01S00369.242l642 ---| SX6 B0 00393 M01S00370.242l642 ---| NZ X2,LOC4 IF NOT *CALL 00394 M01S00371.242l642 ---| SA1 CALL COUNT *CALL STATEMENT
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00395 M01S00001.242l642 +++| ZR X2,LOC2.1 IF CALL FOUND 00396 M01S00002.242l642 +++| SA1 =5RCALLC 00397 M01S00003.242l642 +++| BX2 X1-X6 CHECK CALLC
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2403 |
Seq # *Modification Id* Act ----------------------------+ 00398 M02S00004.ns2403 ---| NZ X2,LOC4 IF NOT *CALLC 00399 M02S00005.ns2403 ---| LOC2.1 SA1 CALL COUNT AS *CALL
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2403 |
Seq # *Modification Id* Act ----------------------------+ 00400 M01S00001.ns2403 +++| ZR X2,LOC2.1 IF *CALLC 00401 M01S00002.ns2403 +++| SA1 =6RIFCALL 00402 M01S00003.ns2403 +++| BX2 X1-X6 CHECK IFCALL 00403 M01S00004.ns2403 +++| ZR X2,LOC2.0 IF *IFCALL 00404 M01S00005.ns2403 +++| SA1 =7RNIFCALL 00405 M01S00006.ns2403 +++| BX2 X1-X6 CHECK IFCALL 00406 M01S00007.ns2403 +++| NZ X2,LOC4 IF NOT *IFCALL 00407 M01S00008.ns2403 +++| LOC2.0 RJ SNC SET NEXT CHARACTER 00408 M01S00009.ns2403 +++| RJ ASN ASSEMBLE NAME 00409 M01S00010.ns2403 +++| LOC2.1 SA1 CALL COUNT *CALL, *CALLC, *IF/NIFCALL 00410 M00S00372.kronref +++| SX6 B1 00411 M00S00373.kronref +++| IX6 X6+X1 00412 M00S00374.kronref +++| SA6 A1 00413 M00S00375.kronref +++| RJ SNC SET NEXT CHARACTER 00414 M00S00376.kronref +++| SX2 X6-1R 00415 M00S00377.kronref +++| NG X2,LOC3 IF NEXT " SEPARATOR 00416 M00S00378.kronref +++| RJ SNC SET NEXT CHARACTER 00417 M00S00379.kronref +++| LOC3 RJ ASN ASSEMBLE NAME 00418 M00S00380.kronref +++| SX5 B0 ENTER COMMON DECK REFERENCE 00419 M00S00381.kronref +++| RJ ESR ENTER SPECIAL REFERENCE 00420 M00S00382.kronref +++| SX6 B0 00421 M00S00383.kronref +++| EQ LOCX RETURN 00422 M00S00384.kronref +++| OPC SPACE 4,10 00423 M00S00385.kronref +++|** OPC - CHECK OP CODE. 00424 M00S00386.kronref +++|* 00425 M00S00387.kronref +++|* ENTRY (CP) = CHARACTER POINTER, 00426 M00S00388.kronref +++|* (X0) = SEPARATOR MASK. 00427 M00S00389.kronref +++|* 00428 M00S00390.kronref +++|* EXIT (X1) = 0 IF ADDRESS FIELD TO BE PROCESSED. 00429 M00S00391.kronref +++|* 00430 M00S00392.kronref +++|* USES X - 1, 2, 6. 00431 M00S00393.kronref +++|* A - 1, 2, 6. 00432 M00S00394.kronref +++|* B - 2. 00433 M00S00395.kronref +++|* 00434 M00S00396.kronref +++|* CALLS ASN. 00435 M00S00397.kronref +++| 00436 M00S00398.kronref +++| 00437 M00S00399.kronref +++| OPC4 SA6 RF 00438 M00S00400.kronref +++| SX1 B1 00439 M00S00401.kronref +++| 00440 M00S00402.kronref +++| OPC SUBR ENTRY/EXIT 00441 M00S00403.kronref +++| RJ ASN ASSEMBLE NAME 00442 M00S00404.kronref +++| SA1 TOPC CHECK OPCODE TABLE 00443 M00S00405.kronref +++| SB2 B1+B1 00444 M00S00406.kronref +++| OPC1 ZR X1,OPCX IF END OF TABLE - RETURN 00445 M00S00407.kronref +++| BX2 X6-X1 00446 M00S00408.kronref +++| SA1 A1+B2 00447 M00S00409.kronref +++| NZ X2,OPC1 LOOP IF NO MATCH FOUND 00448 M00S00410.kronref +++| SA2 A1-B1 EXIT TO PROCESSOR 00449 M00S00411.kronref +++| SB2 X2 00450 M00S00412.kronref +++| JP B2 GO TO PROCESSOR 00451 M00S00413.kronref +++| 00452 M00S00414.kronref +++| OPC2 SX6 1 00453 M00S00415.kronref +++| EQ OPC4 SET REFERENCE FLAG 00454 M00S00416.kronref +++| 00455 M00S00417.kronref +++| OPC3 SX6 0 CLEAR REFERENCE FLAG 00456 M00S00418.kronref +++| SA6 PP CLEAR PP CODE 00457 M00S00419.kronref +++| EQ OPC4 SET REFERENCE FLAG 00458 M00S00420.kronref +++| TOPC SPACE 4,10 00459 M00S00421.kronref +++|** TOPC - TABLE OF OPCODES. 00460 M00S00422.kronref +++|* 00461 M00S00423.kronref +++|* ALL THOSE WITHOUT A SECOND ARGUMENT WILL NOT HAVE THE 00462 M00S00424.kronref +++|* ADDRESS FIELD EVALUATED. 00463 M00S00425.kronref +++| 00464 M00S00426.kronref +++| 00465 M00S00427.kronref +++| TOPC BSS 0 00466 M00S00428.kronref +++| OPC IDENT 00467 M00S00429.kronref +++| OPC SST,OPC2 00468 M00S00430.kronref +++| OPC END,OPC3 00469 M00S00431.kronref +++| OPC TITLE 00470 M00S00432.kronref +++| OPC EJECT 00471 M00S00433.kronref +++| OPC SPACE 00472 M00S00434.kronref +++| OPC PERIPH,PERIPH 00473 M00S00435.kronref +++| OPC EXECUTE,EXECUTE 00474 M00S00436.kronref +++| OPC SYSTEM,SYSTEM 00475 M00S00437.kronref +++| OPC ABS 00476 M00S00438.kronref +++| OPC STEXT 00477 M00S00439.kronref +++| OPC BASE 00478 M00S00440.kronref +++| OPC LIST 00479 M00S00441.kronref +++| OPC ENDM 00480 M00S00442.kronref +++| OPC ENDIF 00481 M00S00443.kronref +++| OPC ENDD 00482 M00S00444.kronref +++| OPC ENTRY,ENTRY 00483 M00S00445.kronref +++| OPC DIS 00484 M00S00446.kronref +++| OPC MICRO 00485 M00S00447.kronref +++| OPC IFC 00486 M00S00448.kronref +++| OPC XTEXT 00487 M00S00449.kronref +++| OPC NOLABEL 00488 M00S00450.kronref +++| OPC LIT 00489 M00S00451.kronref +++| OPC ERR 00490 M00S00452.kronref +++| OPC DATA 00491 M00S00453.kronref +++| OPC STEXT 00492 M00S00454.kronref +++| OPC COMMENT 00493 M00S00455.kronref +++| OPC MACRO 00494 M00S00456.kronref +++| OPC OPDEF 00495 M00S00457.kronref +++| OPC USE 00496 M00S00458.kronref +++| DATA 0 00497 M00S00459.kronref +++| TITLE DECK SCANNING. 00498 M00S00460.kronref +++| ENTRY SPACE 4,10 00499 M00S00461.kronref +++|** ENTRY - PROCESS ENTRY FOR SPECIAL ENTRY POINTS. 00500 M00S00462.kronref +++|* 00501 M00S00463.kronref +++|* ENTRY (CP) = CHARACTER POINTER. 00502 M00S00464.kronref +++|* 00503 M00S00465.kronref +++|* EXIT (X1) = 0, IF ADDRESS FIELD TO BE PROCESSED. 00504 M00S00466.kronref +++|* 00505 M00S00467.kronref +++|* USES X - 1, 5. 00506 M00S00468.kronref +++|* A - 1. 00507 M00S00469.kronref +++|* 00508 M00S00470.kronref +++|* CALLS ASN, ESR, SNC. 00509 M00S00471.kronref +++| 00510 M00S00472.kronref +++| 00511 M00S00473.kronref +++| ENTRY BSS 0 ENTRY 00512 M00S00474.kronref +++| SA1 PP 00513 M00S00475.kronref +++| NZ X1,OPCX IF PP CODE 00514 M00S00476.kronref +++| RJ SNC SET NEXT CHARACTER 00515 M00S00477.kronref +++| RJ ASN ASSEMBLE NAME 00516 M00S00478.kronref +++| SA1 ETRA-1 CHECK FOR SPECIAL ENTRY POINTS 00517 M00S00479.kronref +++| ETR1 SA1 A1+B1 00518 M00S00480.kronref +++| ZR X1,OPCX IF END OF TABLE - SET NOT INTERESTING 00519 M00S00481.kronref +++| BX1 X6-X1 00520 M00S00482.kronref +++| NZ X1,ETR1 IF NO MATCH 00521 M00S00483.kronref +++| SX5 B1+B1 00522 M00S00484.kronref +++| RJ ESR ENTER SPECIAL REFERENCE 00523 M00S00485.kronref +++| SX1 B1 00524 M00S00486.kronref +++| EQ OPCX RETURN 00525 M00S00487.kronref +++| 00526 M00S00488.kronref +++|* TABLE OF SPECIAL ENTRY POINTS. 00527 M00S00489.kronref +++| 00528 M00S00490.kronref +++| ETRA BSS 0
| Line S00491 Modification History | |
|---|---|
M01 (Removed by) | kronr2 |
Seq # *Modification Id* Act ----------------------------+ 00529 M01S00491.kronr2 ---| CON 4RARG= 00530 M01S00492.kronr2 ---| CON 4RDMP= 00531 M01S00493.kronr2 ---| CON 4RMFL= 00532 M01S00494.kronr2 ---| CON 4RRFL= 00533 M01S00495.kronr2 ---| CON 4RSDM= 00534 M01S00496.kronr2 ---| CON 4RSSJ= 00535 M01S00497.kronr2 ---| CON 4RSSM= 00536 M01S00498.kronr2 ---| CON 4RVAL=
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | kronr2 |
Seq # *Modification Id* Act ----------------------------+ 00537 M01S00001.kronr2 +++| CON 4RARG= SUPPRESS ARGUMENT CRACKING 00538 M01S00002.kronr2 +++| CON 4RCLB= COMMAND LINE BUFFER FET 00539 M01S00003.kronr2 +++| CON 4RDMP= DUMP CONTROL 00540 M01S00004.kronr2 +++| CON 4RDPA= *DMP=* PROGRAM WITH ARGUMENTS 00541 M01S00005.kronr2 +++| CON 4RLDR= ALLOW EXECUTE-ONLY READ (LOADER) 00542 M01S00006.kronr2 +++| CON 4RLIB= ALLOW EXECUTE-ONLY READ (OTHER) 00543 M01S00007.kronr2 +++| CON 4RMFL= SET MINIMUM FIELD LENGTH 00544 M01S00008.kronr2 +++| CON 4RNPC= NOS PARAMETER CRACKING FORMAT FLAG 00545 M01S00009.kronr2 +++| CON 4RRFL= SET FIELD LENGTH 00546 M01S00010.kronr2 +++| CON 4RSDM= SUPPRESS DAYFILE MESSAGE 00547 M01S00011.kronr2 +++| CON 4RSSJ= SPECIAL SYSTEM JOB 00548 M01S00012.kronr2 +++| CON 4RSSM= SECURE SYSTEM MEMORY 00549 M01S00013.kronr2 +++| CON 4RUTL= PF UTILITY 00550 M01S00014.kronr2 +++| CON 4RVAL= VALIDATION JOB 00551 M00S00499.kronref +++| CON 0 00552 M00S00500.kronref +++| EXECUTE SPACE 4,10 00553 M00S00501.kronref +++|** EXECUTE - PROCESS EXECUTE MACRO. 00554 M00S00502.kronref +++|* 00555 M00S00503.kronref +++|* ENTRY (CP) = CHARACTER POINTER. 00556 M00S00504.kronref +++|* 00557 M00S00505.kronref +++|* EXIT (X1) = 0, IF ADDRESS FIELD TO BE PROCESSED. 00558 M00S00506.kronref +++|* 00559 M00S00507.kronref +++|* USES X - 1. 00560 M00S00508.kronref +++|* A - 1. 00561 M00S00509.kronref +++|* 00562 M00S00510.kronref +++|* CALLS ASN, ESR, SNC. 00563 M00S00511.kronref +++| 00564 M00S00512.kronref +++| 00565 M00S00513.kronref +++| EXECUTE BSS 0 ENTRY 00566 M00S00514.kronref +++| SA1 PP 00567 M00S00515.kronref +++| ZR X1,OPC IF NOT PP CODE 00568 M00S00516.kronref +++| RJ SNC ASSEMBLE CALLED PACKAGE 00569 M00S00517.kronref +++| RJ ASN ASSEMBLE NAME 00570 M00S00518.kronref +++| SX5 B1 ENTER PP CALL 00571 M00S00519.kronref +++| RJ ESR 00572 M00S00520.kronref +++| SX1 B1 ADDRESS FIELD NOT TO BE PROCESSED 00573 M00S00521.kronref +++| EQ OPCX EXIT 00574 M00S00522.kronref +++| PERIPH SPACE 4,10 00575 M00S00523.kronref +++|** PERIPH - PROCESS PERIPH. 00576 M00S00524.kronref +++|* 00577 M00S00525.kronref +++|* ENTRY (CP) = CHARACTER POINTER. 00578 M00S00526.kronref +++|* 00579 M00S00527.kronref +++|* EXIT (X1) = 0, IF ADDRESS FIELD TO BE PROCESSED. 00580 M00S00528.kronref +++|* 00581 M00S00529.kronref +++|* USES X - 1, 5. 00582 M00S00530.kronref +++|* A - 1. 00583 M00S00531.kronref +++|* 00584 M00S00532.kronref +++|* CALLS ASN, ESR, SNC. 00585 M00S00533.kronref +++| 00586 M00S00534.kronref +++| 00587 M00S00535.kronref +++| PERIPH BSS 0 ENTRY 00588 M00S00536.kronref +++| SX6 B1 SET PP FLAG 00589 M00S00537.kronref +++| SA6 PP 00590 M00S00538.kronref +++| SX5 B1 00591 M00S00539.kronref +++| RJ ENT ENTER PP NAME 00592 M00S00540.kronref +++| EQ OPCX EXIT 00593 M00S00541.kronref +++| SYSTEM SPACE 4,10 00594 M00S00542.kronref +++|** SYSTEM - PROCESS SYSTEM. 00595 M00S00543.kronref +++|* 00596 M00S00544.kronref +++|* ENTRY (CP) = CHARACTER POINTER. 00597 M00S00545.kronref +++|* 00598 M00S00546.kronref +++|* EXIT (X1) = 0, IF ADDRESS FIELD TO BE PROCESSED. 00599 M00S00547.kronref +++|* 00600 M00S00548.kronref +++|* USES X - 1, 5. 00601 M00S00549.kronref +++|* A - 1. 00602 M00S00550.kronref +++|* 00603 M00S00551.kronref +++|* CALLS ASN, ESR, SNC. 00604 M00S00552.kronref +++| 00605 M00S00553.kronref +++| 00606 M00S00554.kronref +++| SYSTEM BSS 0 ENTRY 00607 M00S00555.kronref +++| SA1 PP 00608 M00S00556.kronref +++| NZ X1,OPCX IF PP CODE 00609 M00S00557.kronref +++| RJ SNC SET NEXT CHARACTER 00610 M00S00558.kronref +++| RJ ASN ASSEMBLE NAME 00611 M00S00559.kronref +++| MX5 42 ONLY ENTER 3 CHARACTER NAME 00612 M00S00560.kronref +++| BX5 X5*X6 00613 M00S00561.kronref +++| NZ X5,SYS1 IF MORE THAN 3 CHARACTERS IN NAME 00614 M00S00562.kronref +++| SX5 3 00615 M00S00563.kronref +++| RJ ESR ENTER SPECIAL REFERENCE 00616 M00S00564.kronref +++| SX1 B1 SET INTERESTING FLAG 00617 M00S00565.kronref +++| EQ OPCX RETURN 00618 M00S00566.kronref +++| 00619 M00S00567.kronref +++| SYS1 SX1 B0+ SET NOT INTERESTING FLAG 00620 M00S00568.kronref +++| EQ OPCX RETURN 00621 M00S00569.kronref +++| SCA SPACE 4,10 00622 M00S00570.kronref +++|** SCA - SCAN ADDRESS. 00623 M00S00571.kronref +++|* 00624 M00S00572.kronref +++|* ENTRY (X0) = SEPARATOR MASK. 00625 M00S00573.kronref +++|* 00626 M00S00574.kronref +++|* USES X - 1, 2, 6, 7. 00627 M00S00575.kronref +++|* A - 1, 2, 6. 00628 M00S00576.kronref +++|* B - 2, 3, 4. 00629 M00S00577.kronref +++|* 00630 M00S00578.kronref +++|* CALLS ADW, ASN, SNC. 00631 M00S00579.kronref +++|* 00632 M00S00580.kronref +++|* MACRO ADDWRD. 00633 M00S00581.kronref +++| 00634 M00S00582.kronref +++| 00635 M00S00583.kronref +++| SCA SUBR ENTRY/EXIT 00636 M00S00584.kronref +++| SCA1 RJ SNC SET NEXT CHARACTER 00637 M00S00585.kronref +++| SCA2 SB2 X6-1R 00638 M00S00586.kronref +++| ZR B2,SCAX IF END OF FIELD - RETURN 00639 M00S00587.kronref +++| SB3 X6 00640 M00S00588.kronref +++| LX7 X0,B3 00641 M00S00589.kronref +++| NG X7,SCA1 SKIP SEPARATOR 00642 M00S00590.kronref +++| SB2 X6-1R0 00643 M00S00591.kronref +++| NG B2,SCA4 IF ALPHA 00644 M00S00592.kronref +++| SB3 X6-1R+ 00645 M00S00593.kronref +++| NG B3,SCA3 IF NUMERIC 00646 M00S00594.kronref +++| SB2 X6-1R$ 00647 M00S00595.kronref +++| ZR B2,SCA IF *$* - RETURN 00648 M00S00596.kronref +++| EQ B2,B1,SCAX IF *$* - RETURN 00649 M00S00597.kronref +++| EQ SCA4 OTHER THAN *$* 00650 M00S00598.kronref +++| 00651 M00S00599.kronref +++| SCA3 RJ SNC NEXT CHARACTER 00652 M00S00600.kronref +++| SB3 X6 00653 M00S00601.kronref +++| LX7 X0,B3 00654 M00S00602.kronref +++| PL X7,SCA3 IF END OF ELEMENT 00655 M00S00603.kronref +++| EQ SCA2 PROCESS CHARACTER 00656 M00S00604.kronref +++| 00657 M00S00605.kronref +++| SCA4 RJ ASN ASSEMBLE NAME 00658 M00S00606.kronref +++| SA1 SL 00659 M00S00607.kronref +++| SA2 F.TNME 00660 M00S00608.kronref +++| SB2 B1+B1 00661 M00S00609.kronref +++| SB3 X1 00662 M00S00610.kronref +++| SA1 X2 00663 M00S00611.kronref +++| SB4 X2 00664 M00S00612.kronref +++| SCA5 BX7 X1-X6 00665 M00S00613.kronref +++| SB3 B3-B2 00666 M00S00614.kronref +++| ZR X7,SCA6 IF FOUND 00667 M00S00615.kronref +++| SA1 A1+B2 00668 M00S00616.kronref +++| NZ B3,SCA5 LOOP TO END OF TABLE 00669 M00S00617.kronref +++| SA1 CH 00670 M00S00618.kronref +++| BX6 X1 00671 M00S00619.kronref +++| EQ SCA2 PROCESS CHARACTER 00672 M00S00620.kronref +++| 00673 M00S00621.kronref +++| SCA6 MX4 1 SET REFERENCE FLAG 00674 M00S00622.kronref +++| SA2 DN 00675 M00S00623.kronref +++| BX6 X1+X4 00676 M00S00624.kronref +++| SX3 A1-B4 00677 M00S00625.kronref +++| SA6 A1 00678 M00S00626.kronref +++| ADDWRD TREF,X2+X3 ENTER REFERENCE 00679 M00S00627.kronref +++| SA1 CH 00680 M00S00628.kronref +++| BX6 X1 00681 M00S00629.kronref +++| EQ SCA2 PROCESS CHARACTER 00682 M00S00630.kronref +++| TITLE LIST PROCESSORS. 00683 M00S00631.kronref +++| LCL SPACE 4,10 00684 M00S00632.kronref +++|** LCL - LIST SPECIAL CALLS. 00685 M00S00633.kronref +++|* 00686 M00S00634.kronref +++|* USES X - ALL. 00687 M00S00635.kronref +++|* A - ALL. 00688 M00S00636.kronref +++|* 00689 M00S00637.kronref +++|* CALLS LRC, SFN, SSR. 00690 M00S00638.kronref +++| 00691 M00S00639.kronref +++| 00692 M00S00640.kronref +++| LCL SUBR ENTRY/EXIT 00693 M00S00641.kronref +++| SA1 TX 00694 M00S00642.kronref +++| NZ X1,LCL0 IF SYSTEXT PRESENT 00695 M00S00643.kronref +++| MX6 0 ZERO TITLES 00696 M00S00644.kronref +++| SA6 LCLD 00697 M00S00645.kronref +++| SA6 A6+B1 00698 M00S00646.kronref +++| LCL0 SA1 =1H 00699 M00S00647.kronref +++| SA1 =1H 00700 M00S00648.kronref +++| SX6 LCLA SET SUBTITLE 00701 M00S00649.kronref +++| BX7 X1 00702 M00S00650.kronref +++| SA6 ST+1 00703 M00S00651.kronref +++| SA7 BUF+1 00704 M00S00652.kronref +++| RJ SSR SORT SPECIAL REFERENCES 00705 M00S00653.kronref +++| LCL1 SA1 LCLC ADVANCE POINTER 00706 M00S00654.kronref +++| SX6 X1+2 00707 M00S00655.kronref +++| SA2 X6 00708 M00S00656.kronref +++| SA6 A1 00709 M00S00657.kronref +++| ZR X2,LCLX IF END OF TABLE - RETURN 00710 M00S00658.kronref +++| SA4 A2+B1 TYPE CODE 00711 M00S00659.kronref +++| SX6 X2 SET SUBTITLE
| Line S00660 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00712 M01S00660.ns22000 ---| SX7 LINP FORCE EJECT
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00713 M01S00022.ns22000 +++| SX7 LCFE FORCE EJECT 00714 M00S00661.kronref +++| SA6 ST 00715 M00S00662.kronref +++| SA7 LC 00716 M00S00663.kronref +++| SA1 F.TNME (X1) = FWA 00717 M00S00664.kronref +++| SA2 SL (X2) = LENGTH 00718 M00S00665.kronref +++| IX1 X1+X2 00719 M00S00666.kronref +++| SA3 L.TNME 00720 M00S00667.kronref +++| IX2 X3-X2 00721 M00S00668.kronref +++| LCL2 ZR X2,LCL1 IF END OF REFERENCE TABLE 00722 M00S00669.kronref +++| SA3 X1+B1 NEXT ENTRY 00723 M00S00670.kronref +++| BX6 X3-X4 00724 M00S00671.kronref +++| ZR X6,LCL4 IF REQUESTED TYPE 00725 M00S00672.kronref +++| LCL3 SX1 X1+2 ADVANCE TABLE 00726 M00S00673.kronref +++| SX2 X2-2 00727 M00S00674.kronref +++| EQ LCL2 LOOP 00728 M00S00675.kronref +++| 00729 M00S00676.kronref +++| LCL4 SX6 X1 SAVE POSITION 00730 M00S00677.kronref +++| SX7 X2 00731 M00S00678.kronref +++| SA6 T1 00732 M00S00679.kronref +++| SA7 A6+B1 00733 M00S00680.kronref +++| MX0 42 SPACE FILL NAME 00734 M00S00681.kronref +++| SA5 A3-B1 00735 M00S00682.kronref +++| BX1 X0*X5 00736 M00S00683.kronref +++| RJ SFN SPACE FILL NAME 00737 M00S00684.kronref +++| LX6 -3*6 00738 M00S00685.kronref +++| SA6 BUF 00739 M00S00686.kronref +++| RJ LRC LIST REFERENCE CHAIN 00740 M00S00687.kronref +++| SA1 T1 RESET POSITION 00741 M00S00688.kronref +++| SA2 A1+B1 00742 M00S00689.kronref +++| SA3 LCLC RESET TYPE 00743 M00S00690.kronref +++| SA4 X3+B1 00744 M00S00691.kronref +++| EQ LCL3 LOOP 00745 M00S00692.kronref +++| 00746 M00S00693.kronref +++| LCLA DATA 10H DECK 00747 M00S00694.kronref +++| DATA 10H 00748 M00S00695.kronref +++| DATA C*DECK REFERENCES.* 00749 M00S00696.kronref +++| 00750 M00S00697.kronref +++| LCLB BSS 0 00751 M00S00698.kronref +++| CON =C* COMMON DECK CALLS.* 00752 M00S00699.kronref +++| CON 0 00753 M00S00700.kronref +++| 00754 M00S00701.kronref +++| LCLD BSS 0 00755 M00S00702.kronref +++| CON =C* PP PACKAGES CALLED.* 00756 M00S00703.kronref +++| CON 1 00757 M00S00704.kronref +++| 00758 M00S00705.kronref +++| CON =C* SPECIAL ENTRY POINTS.* 00759 M00S00706.kronref +++| CON 2 00760 M00S00707.kronref +++| 00761 M00S00708.kronref +++| CON =C* SYSTEM MACRO REQUEST REFERENCES.* 00762 M00S00709.kronref +++| CON 3 00763 M00S00710.kronref +++| 00764 M00S00711.kronref +++| CON 0 00765 M00S00712.kronref +++| 00766 M00S00713.kronref +++| LCLC CON LCLB-2 00767 M00S00714.kronref +++| LNK SPACE 4,10 00768 M00S00715.kronref +++|** LNK - LINK TABLES. 00769 M00S00716.kronref +++|* 00770 M00S00717.kronref +++|* USES X - ALL. 00771 M00S00718.kronref +++|* A - 1, 2, 3, 6, 7. 00772 M00S00719.kronref +++|* B - 2, 3, 4. 00773 M00S00720.kronref +++| 00774 M00S00721.kronref +++| 00775 M00S00722.kronref +++| LNK SUBR ENTRY/EXIT 00776 M00S00723.kronref +++| SA1 L.TNME LEFT JUSTIFY NAMES 00777 M00S00724.kronref +++| SA2 F.TNME 00778 M00S00725.kronref +++| MX0 6 00779 M00S00726.kronref +++| SB2 B1+B1 00780 M00S00727.kronref +++| SB3 X1 00781 M00S00728.kronref +++| SA1 X2 00782 M00S00729.kronref +++| LNK1 LX1 6 00783 M00S00730.kronref +++| BX2 X0*X1 00784 M00S00731.kronref +++| ZR X2,LNK1 IF CHARACTER NOT LEFT JUSTIFIED 00785 M00S00732.kronref +++| BX6 X1 00786 M00S00733.kronref +++| SA6 A1 00787 M00S00734.kronref +++| SB3 B3-B2 00788 M00S00735.kronref +++| SA1 A1+B2 00789 M00S00736.kronref +++| NZ B3,LNK1 IF NOT THE LAST NAME 00790 M00S00737.kronref +++| SA1 L.TREF LINK REFERENCES 00791 M00S00738.kronref +++| SA2 F.TREF 00792 M00S00739.kronref +++| MX0 42 00793 M00S00740.kronref +++| SB2 X1 00794 M00S00741.kronref +++| SA3 F.TNME 00795 M00S00742.kronref +++| SB2 B2-B1 00796 M00S00743.kronref +++| SA2 X2+B2 00797 M00S00744.kronref +++| SB4 X3 00798 M00S00745.kronref +++| BX5 X0*X2 00799 M00S00746.kronref +++| LNK2 SA1 B4+X2 00800 M00S00747.kronref +++| SX3 A2 00801 M00S00748.kronref +++| BX4 X0*X1 00802 M00S00749.kronref +++| SB2 B2-B1 00803 M00S00750.kronref +++| SA2 A2-B1 00804 M00S00751.kronref +++| BX7 -X0*X1 00805 M00S00752.kronref +++| IX6 X4+X3 00806 M00S00753.kronref +++| BX7 X5+X7 00807 M00S00754.kronref +++| SA6 A1 00808 M00S00755.kronref +++| SA7 A2+B1 00809 M00S00756.kronref +++| BX5 X0*X2 00810 M00S00757.kronref +++| PL B2,LNK2 IF MORE REFERENCES 00811 M00S00758.kronref +++| EQ LNKX RETURN 00812 M00S00759.kronref +++| LRC SPACE 4,10 00813 M00S00760.kronref +++|** LRC - LIST REFERENCE CHAIN. 00814 M00S00761.kronref +++|* 00815 M00S00762.kronref +++|* ENTRY (X5) = FIRST CHAIN ENTRY. 00816 M00S00763.kronref +++|* 00817 M00S00764.kronref +++|* USES X - 0, 1, 2, 3, 5, 6, 7. 00818 M00S00765.kronref +++|* A - 1, 2, 3, 6, 7. 00819 M00S00766.kronref +++|* B - 2, 6. 00820 M00S00767.kronref +++|* 00821 M00S00768.kronref +++|* CALLS SFN, WOF. 00822 M00S00769.kronref +++| 00823 M00S00770.kronref +++| 00824 M00S00771.kronref +++| LRC6 MX6 0 00825 M00S00772.kronref +++| SA6 A6+B1 00826 M00S00773.kronref +++| SX1 BUF 00827 M00S00774.kronref +++| RJ WOF WRITE LINE TO OUTPUT 00828 M00S00775.kronref +++| 00829 M00S00776.kronref +++| LRC SUBR ENTRY/EXIT 00830 M00S00777.kronref +++| SA1 LC CHECK LINE COUNT
| Line S00778 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00831 M01S00778.ns22000 ---| SX6 X1+3 00832 M01S00779.ns22000 ---| SB2 X6-LINP 00833 M01S00780.ns22000 ---| PL B2,LRC2 IF NOT ROOM FOR FIRST LINE
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00834 M01S00023.ns22000 +++| SA2 LL GET LINE LIMIT 00835 M01S00024.ns22000 +++| SX6 X1+B1 00836 M01S00025.ns22000 +++| IX2 X6-X2 00837 M01S00026.ns22000 +++| PL X2,LRC2 IF NOT ROOM FOR FIRST LINE 00838 M00S00781.kronref +++| SA3 BUF+1 COMPARE CURRENT VALUE WITH LAST 00839 M00S00782.kronref +++| SA2 =10H 00840 M00S00783.kronref +++| BX7 X2-X3 00841 M00S00784.kronref +++| ZR X7,LRC1 IF NO VALUE 00842 M00S00785.kronref +++| SA2 LRCB 00843 M00S00786.kronref +++| BX7 X3 00844 M00S00787.kronref +++| SA7 A2 00845 M00S00788.kronref +++| BX2 X3-X2 00846 M00S00789.kronref +++| BX6 X1 RESTORE *LC* 00847 M00S00790.kronref +++| ZR X2,LRC2 IF NO VALUE CHANGE 00848 M00S00791.kronref +++| LRC1 SX1 =C* * 00849 M00S00792.kronref +++| RJ WOF WRITE LINE TO OUTPUT 00850 M00S00793.kronref +++| SA1 LC 00851 M00S00794.kronref +++| BX6 X1 00852 M00S00795.kronref +++| LRC2 SA6 A1 00853 M00S00796.kronref +++| SX5 X5 00854 M00S00797.kronref +++| NZ X5,LRC3 IF ANY REFERENCES 00855 M00S00798.kronref +++| SA1 =10H **NONE** 00856 M00S00799.kronref +++| MX6 0 00857 M00S00800.kronref +++| BX7 X1 00858 M00S00801.kronref +++| SA7 BUF+2 00859 M00S00802.kronref +++| SA6 A7+B1 00860 M00S00803.kronref +++| SX1 BUF 00861 M00S00804.kronref +++| RJ WOF WRITE LINE TO OUTPUT 00862 M00S00805.kronref +++| EQ LRCX RETURN 00863 M00S00806.kronref +++| 00864 M00S00807.kronref +++| LRC3 SA1 BUF SAVE FIRST 2 WORDS OF BUFFER 00865 M00S00808.kronref +++| SA2 A1+B1 00866 M00S00809.kronref +++| BX6 X1 00867 M00S00810.kronref +++| LX7 X2 00868 M00S00811.kronref +++| MX0 42 00869 M00S00812.kronref +++| SA6 LRCA 00870 M00S00813.kronref +++| SA7 A6+B1 00871 M00S00814.kronref +++| LRC4 SB6 -11 00872 M00S00815.kronref +++| ZR X5,LRCX IF END OF LIST - RETURN 00873 M00S00816.kronref +++| LRC5 ZR X5,LRC6 IF END OF LIST 00874 M00S00817.kronref +++| SA2 X5 NEXT ENTRY 00875 M00S00818.kronref +++| BX1 X0*X2 SPACE FILL NAME 00876 M00S00819.kronref +++| SX5 X2 SET NEXT ADDRESS 00877 M00S00820.kronref +++| RJ SFN SPACE FILL NAME 00878 M00S00821.kronref +++| LX6 60-6 00879 M00S00822.kronref +++| SA6 BUF+13+B6 00880 M00S00823.kronref +++| SB6 B6+B1 00881 M00S00824.kronref +++| NG B6,LRC5 IF NOT END OF LINE 00882 M00S00825.kronref +++| MX6 0 00883 M00S00826.kronref +++| SA6 A6+B1 00884 M00S00827.kronref +++| SX1 BUF 00885 M00S00828.kronref +++| RJ WOF WRITE LINE TO OUTPUT
| Line S00829 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00886 M01S00829.ns22000 ---| SA2 LC CHECK LINE COUNT 00887 M00S00830.kronref +++| SA1 =1H CLEAR BUFFER 00888 M00S00831.kronref +++| BX6 X1 00889 M00S00832.kronref +++| LX7 X1 00890 M00S00833.kronref +++| SA6 BUF 00891 M00S00834.kronref +++| SA7 A6+B1 00892 M00S00835.kronref +++| EQ LRC4 LOOP 00893 M00S00836.kronref +++| 00894 M00S00837.kronref +++| LRCA DATA 0,0 00895 M00S00838.kronref +++| LRCB DATA 0 LAST VALUE 00896 M00S00839.kronref +++| LSR SPACE 4,10 00897 M00S00840.kronref +++|** LSR - LIST SYSTEM SYMBOL REFERENCES. 00898 M00S00841.kronref +++|* 00899 M00S00842.kronref +++|* USES X - ALL. 00900 M00S00843.kronref +++|* A - 1, 2, 3, 4, 5, 6, 7. 00901 M00S00844.kronref +++|* 00902 M00S00845.kronref +++|* CALLS COD, LRC, SFN, WOF. 00903 M00S00846.kronref +++| 00904 M00S00847.kronref +++| 00905 M00S00848.kronref +++| LSR SUBR ENTRY/EXIT 00906 M00S00849.kronref +++| SX3 B1+ SET NOT END OF REFERENCES 00907 M00S00850.kronref +++| LSR1 SA1 LSRC ADVANCE SYMBOL CHECK 00908 M00S00851.kronref +++| SX6 X1+3 00909 M00S00852.kronref +++| SA2 X6 SUBTITLE LINE ADDRESS 00910 M00S00853.kronref +++| SA6 A1 00911 M00S00854.kronref +++| ZR X3,LSRX IF END OF SYMBOL LIST 00912 M00S00855.kronref +++| ZR X2,LSR2 IF NO SUBTITLE 00913 M00S00856.kronref +++| SX7 X2 SET SUBTITLE
| Line S00857 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00914 M01S00857.ns22000 ---| SX6 LINP FORCE EJECT
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00915 M01S00027.ns22000 +++| SX6 LCFE FORCE EJECT 00916 M00S00858.kronref +++| SA7 ST 00917 M00S00859.kronref +++| SA6 LC 00918 M00S00860.kronref +++| EQ LSR3 SKIP LINE CHECK 00919 M00S00861.kronref +++| 00920 M00S00862.kronref +++| LSR2 SA1 LC CHECK LINE COUNT
| Line S00863 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00921 M01S00863.ns22000 ---| SX7 X1-LINP+5
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00922 M01S00028.ns22000 +++| SA3 LL GET LINE LIMIT 00923 M01S00029.ns22000 +++| SX1 X1+2 00924 M01S00030.ns22000 +++| IX7 X1-X3 00925 M00S00864.kronref +++| PL X7,LSR3 IF NO ROOM FOR LINE 00926 M00S00865.kronref +++| SX1 =C* * LIST BLANK LINE 00927 M00S00866.kronref +++| RJ WOF WRITE LINE TO OUTPUT 00928 M00S00867.kronref +++| LSR3 SA1 LSRC SET MASK 00929 M00S00868.kronref +++| SA3 X1+B1 MASK 00930 M00S00869.kronref +++| SA4 A3+B1 CHARACTER MATCH 00931 M00S00870.kronref +++| SA1 F.TNME (X1) = FWA 00932 M00S00871.kronref +++| SA2 SL (X2) = LENGTH 00933 M00S00872.kronref +++| LSR4 SA5 X1 NEXT ENTRY 00934 M00S00873.kronref +++| BX6 X5*X3 00935 M00S00874.kronref +++| IX7 X6-X4 00936 M00S00875.kronref +++| ZR X7,LSR6 IF MATCH FOUND 00937 M00S00876.kronref +++| SX1 X1+2 ADVANCE TABLE 00938 M00S00877.kronref +++| LSR5 SX2 X2-2 00939 M00S00878.kronref +++| NZ X2,LSR4 IF NOT END OF TABLE 00940 M00S00879.kronref +++| EQ LSR1 PROCESS NEXT SYMBOL TYPE 00941 M00S00880.kronref +++| 00942 M00S00881.kronref +++| LSR6 SX6 X1 SAVE POSITION 00943 M00S00882.kronref +++| SX7 X2 00944 M00S00883.kronref +++| SA6 T1 00945 M00S00884.kronref +++| SA7 A6+B1 00946 M00S00885.kronref +++| MX0 42 SPACE FILL NAME 00947 M00S00886.kronref +++| BX1 X0*X5 00948 M00S00887.kronref +++| RJ SFN 00949 M00S00888.kronref +++| LX6 -3*6 00950 M00S00889.kronref +++| SA6 BUF 00951 M00S00890.kronref +++| SA1 A5+B1 CONVERT VALUE 00952 M00S00891.kronref +++| RJ COD 00953 M00S00892.kronref +++| LX6 3*6 00954 M00S00893.kronref +++| SA6 A6+B1 00955 M00S00894.kronref +++| MX7 -0 CLEAR ENTRY 00956 M00S00895.kronref +++| SA7 A5 00957 M00S00896.kronref +++| RJ LRC LIST REFERENCE CHAIN 00958 M00S00897.kronref +++| SA1 T1 ADVANCE SYMBOL CHAIN 00959 M00S00898.kronref +++| SA2 A1+B1 00960 M00S00899.kronref +++| SX1 X1+2 00961 M00S00900.kronref +++| SA3 LSRC RESET MASK AND CHARACTER 00962 M00S00901.kronref +++| SA3 X3+B1 00963 M00S00902.kronref +++| SA4 A3+B1 00964 M00S00903.kronref +++| EQ LSR5 LOOP TO NEXT REFERENCE 00965 M00S00904.kronref +++| 00966 M00S00905.kronref +++| LSRA DATA 10H SYMBOL 00967 M00S00906.kronref +++| DATA 10H VALUE 00968 M00S00907.kronref +++| DATA C*DECK REFERENCES.* 00969 M00S00908.kronref +++| 00970 M00S00909.kronref +++| LSRB BSS 0 00971 M00S00910.kronref +++| 00972 M00S00911.kronref +++| CON =C* DIRECT LOCATIONS.* 00973 M00S00912.kronref +++| VFD 12/0,30/7777777777B,18/0 00974 M00S00913.kronref +++| CON 0 00975 M00S00914.kronref +++| 00976 M00S00915.kronref +++| CON =C* PP RESIDENT ENTRY POINTS.* 00977 M00S00916.kronref +++| VFD 18/0,24/77777777B,18/0 00978 M00S00917.kronref +++| CON 0
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00979 M01S00031.ns22000 +++| 00980 M01S00032.ns22000 +++| CON 0 00981 M01S00033.ns22000 +++| VFD 6/77B,18/0,18/777777B,18/0 00982 M01S00034.ns22000 +++| VFD 6/1L.,54/0 00983 M00S00918.kronref +++| 00984 M00S00919.kronref +++| CON 0 00985 M00S00920.kronref +++| VFD 42/77777777777777B,18/0 00986 M00S00921.kronref +++| CON 0LPPFW 00987 M00S00922.kronref +++| 00988 M00S00923.kronref +++| CON =C* MONITOR FUNCTIONS.* 00989 M00S00924.kronref +++| VFD 18/0,6/77B,36/0 00990 M00S00925.kronref +++| VFD 18/0,6/1RM,36/0
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00991 M01S00035.ns22000 +++| 00992 M01S00036.ns22000 +++| CON =C* MASS STORAGE TABLE WORDS.* 00993 M01S00037.ns22000 +++| VFD 12/0,18/777777B,30/0 00994 M01S00038.ns22000 +++| VFD 12/0,18/2LGL,30/0 00995 M01S00039.ns22000 +++| 00996 M01S00040.ns22000 +++| CON 0 00997 M01S00041.ns22000 +++| VFD 12/0,18/777777B,30/0 00998 M01S00042.ns22000 +++| VFD 12/0,18/2LLL,30/0 00999 M01S00043.ns22000 +++| 01000 M01S00044.ns22000 +++| CON =C* GLOBAL/LOCAL FNT WORDS, ORDINALS.* 01001 M01S00045.ns22000 +++| VFD 12/0,18/777777B,30/0 01002 M01S00046.ns22000 +++| VFD 12/0,18/2LTG,30/0 01003 M01S00047.ns22000 +++| 01004 M01S00048.ns22000 +++| CON 0 01005 M01S00049.ns22000 +++| VFD 12/0,18/777777B,30/0 01006 M01S00050.ns22000 +++| VFD 12/0,18/2LTL,30/0 01007 M01S00051.ns22000 +++| 01008 M01S00052.ns22000 +++| CON 0 01009 M01S00053.ns22000 +++| VFD 12/0,18/777777B,30/0 01010 M01S00054.ns22000 +++| VFD 12/0,18/2LFO,30/0 01011 M00S00926.kronref +++| 01012 M00S00927.kronref +++| CON =C* CENTRAL MEMORY POINTERS.*
| Line S00928 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01013 M01S00928.ns22000 ---| VFD 18/0,6/77B,36/0
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01014 M01S00055.ns22000 +++| VFD 18/0,12/7777B,30/0 01015 M00S00929.kronref +++| VFD 18/0,6/1RP,36/0 01016 M00S00930.kronref +++| 01017 M00S00931.kronref +++| CON =C* CENTRAL MEMORY LOCATIONS.* 01018 M00S00932.kronref +++| VFD 18/0,12/7777B,30/0 01019 M00S00933.kronref +++| VFD 18/0,12/1LL,30/0 01020 M00S00934.kronref +++| 01021 M00S00935.kronref +++| CON 0 01022 M00S00936.kronref +++| VFD 18/0,12/7777B,30/0 01023 M00S00937.kronref +++| VFD 18/0,12/2RLL,30/0 01024 M00S00938.kronref +++| 01025 M00S00939.kronref +++| CON =C* CONTROL POINT AREA WORDS.* 01026 M00S00940.kronref +++| VFD 18/0,12/7777B,30/0 01027 M00S00941.kronref +++| VFD 18/0,12/1LW,30/0 01028 M00S00942.kronref +++| 01029 M00S00943.kronref +++| CON 0 01030 M00S00944.kronref +++| VFD 18/0,12/7777B,30/0 01031 M00S00945.kronref +++| VFD 18/0,12/2RWE,30/0 01032 M00S00946.kronref +++| 01033 M00S00947.kronref +++| CON 0 01034 M00S00948.kronref +++| VFD 18/0,12/7777B,30/0 01035 M00S00949.kronref +++| VFD 18/0,12/2RWL,30/0
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01036 M01S00056.ns22000 +++| 01037 M01S00057.ns22000 +++| CON =C* EJT, EST, QFT RELATED.* 01038 M01S00058.ns22000 +++| VFD 18/0,12/7777B,30/0 01039 M01S00059.ns22000 +++| VFD 18/0,12/1LE,30/0 01040 M01S00060.ns22000 +++| 01041 M01S00061.ns22000 +++| CON 0 01042 M01S00062.ns22000 +++| VFD 18/0,12/7777B,30/0 01043 M01S00063.ns22000 +++| VFD 18/0,12/1LQ,30/0 01044 M00S00950.kronref +++|
| Line S00951 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01045 M01S00951.ns22000 ---| CON =C* DAYFILE MESSAGE OPTIONS.*
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01046 M01S00064.ns22000 +++| CON =C* NFL SYMBOLS, AND DAYFILE MESSAGE OPTIONS.* 01047 M00S00952.kronref +++| VFD 18/0,6/77B,36/0 01048 M00S00953.kronref +++| VFD 18/0,6/1RN,36/0 01049 M00S00954.kronref +++| 01050 M00S00955.kronref +++| CON =C* FILE TYPES, AND MASS STORAGE CONSTANTS.* 01051 M00S00956.kronref +++| VFD 12/0,12/7777B,36/0 01052 M00S00957.kronref +++| VFD 12/0,12/2RFT,36/0 01053 M00S00958.kronref +++| 01054 M00S00959.kronref +++| CON 0 01055 M00S00960.kronref +++| VFD 12/0,12/7777B,36/0 01056 M00S00961.kronref +++| VFD 12/0,12/2RMS,36/0
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01057 M01S00065.ns22000 +++| 01058 M01S00066.ns22000 +++| CON 0 01059 M01S00067.ns22000 +++| VFD 12/0,18/777777B,30/0 01060 M01S00068.ns22000 +++| VFD 12/0,18/2LSF,30/0 01061 M00S00962.kronref +++| 01062 M00S00963.kronref +++| CON 0 01063 M00S00964.kronref +++| VFD 12/0,12/7777B,36/0 01064 M00S00965.kronref +++| VFD 12/0,12/2RSS,36/0 01065 M00S00966.kronref +++| 01066 M00S00967.kronref +++| CON 0 01067 M00S00968.kronref +++| VFD 12/0,12/7777B,36/0 01068 M00S00969.kronref +++| VFD 12/0,12/2RTS,36/0 01069 M00S00970.kronref +++|
| Line S00971 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01070 M01S00971.ns22000 ---| 01071 M01S00972.ns22000 ---| CON =C* JOB ORIGIN TYPES, QUEUE TYPES, AND PRIORITIES.*
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01072 M01S00069.ns22000 +++| CON =C* ORIGIN TYPES AND QUEUE TYPES.* 01073 M00S00973.kronref +++| VFD 12/0,12/7777B,36/0 01074 M00S00974.kronref +++| VFD 12/0,12/2ROT,36/0
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01075 M01S00070.ns22000 +++| 01076 M00S00975.kronref +++| CON 0 01077 M00S00976.kronref +++| VFD 12/0,12/7777B,36/0 01078 M00S00977.kronref +++| VFD 12/0,12/2RQT,36/0
| Line S00978 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01079 M01S00978.ns22000 ---| 01080 M01S00979.ns22000 ---| CON 0 01081 M01S00980.ns22000 ---| VFD 12/0,12/7777B,36/0 01082 M01S00981.ns22000 ---| VFD 12/0,12/2RPS,36/0 01083 M00S00982.kronref +++| 01084 M00S00983.kronref +++| CON =C* ERROR FLAGS.* 01085 M00S00984.kronref +++| VFD 12/0,12/7777B,36/0 01086 M00S00985.kronref +++| VFD 12/0,12/2RET,36/0 01087 M00S00986.kronref +++| 01088 M00S00987.kronref +++| CON =C* MISCELLANEOUS.* 01089 M00S00988.kronref +++| VFD 36/0,6/77B,18/0 01090 M00S00989.kronref +++| CON 0 01091 M00S00990.kronref +++| 01092 M00S00991.kronref +++| CON 0,0 01093 M00S00992.kronref +++| 01094 M00S00993.kronref +++| LSRC CON LSRB-3 01095 M00S00994.kronref +++| TITLE SUBROUTINES. 01096 M00S00995.kronref +++| ABT SPACE 4,10 01097 M00S00996.kronref +++|** ABT - ABORT JOB.
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01098 M01S00071.ns22000 +++|* 01099 M00S00997.kronref +++|* ENTRY (A0) = FWA OF MESSAGE. 01100 M00S00998.kronref +++|* 01101 M00S00999.kronref +++|* MACROS ABORT, MESSAGE. 01102 M00S01000.kronref +++| 01103 M00S01001.kronref +++| 01104 M00S01002.kronref +++| ABT MESSAGE A0,,R OUTPUT MESSAGE 01105 M00S01003.kronref +++| ABORT 01106 M00S01004.kronref +++| ADW SPACE 4,10 01107 M00S01005.kronref +++|** ADW - ADD ENTRY TO A TABLE. 01108 M00S01006.kronref +++|* 01109 M00S01007.kronref +++|* ENTRY (A0) = TABLE POINTER ADDRESS. 01110 M00S01008.kronref +++|* (X1) = ENTRY. 01111 M00S01009.kronref +++|* 01112 M00S01010.kronref +++|* EXIT (X6) = ENTRY. 01113 M00S01011.kronref +++|* (A6) = ADDRESS OF ENTRY. 01114 M00S01012.kronref +++|* (X3) = INDEX OF ENTRY. 01115 M00S01013.kronref +++|* 01116 M00S01014.kronref +++|* USES X - 1, 2, 3, 4, 6, 7. 01117 M00S01015.kronref +++|* A - 1, 2, 3, 4, 6, 7. 01118 M00S01016.kronref +++|* B - 2. 01119 M00S01017.kronref +++|* 01120 M00S01018.kronref +++|* CALLS ATS. 01121 M00S01019.kronref +++|* 01122 M00S01020.kronref +++|* MACROS ALLOC. 01123 M00S01021.kronref +++| 01124 M00S01022.kronref +++| 01125 M00S01023.kronref +++| ADW1 BX6 X1 ENTER WORD 01126 M00S01024.kronref +++| SX7 X3+B1 ADVANCE LENGTH 01127 M00S01025.kronref +++| SA6 X2+B2 01128 M00S01026.kronref +++| SA7 A3 01129 M00S01027.kronref +++| 01130 M00S01028.kronref +++| ADW SUBR ENTRY/EXIT 01131 M00S01029.kronref +++| SA2 FTAB+A0 CHECK TABLE ROOM 01132 M00S01030.kronref +++| SA3 LTAB+A0 01133 M00S01031.kronref +++| SA4 A2+B1 01134 M00S01032.kronref +++| IX6 X2+X3 01135 M00S01033.kronref +++| SB2 X3 01136 M00S01034.kronref +++| IX7 X4-X6 01137 M00S01035.kronref +++| NZ X7,ADW1 IF ROOM FOR WORD 01138 M00S01036.kronref +++| SA2 NTAB+A0 ALLOCATE TABLE 01139 M00S01037.kronref +++| BX6 X1 SAVE WORD 01140 M00S01038.kronref +++| SA6 ADWA 01141 M00S01039.kronref +++| ALLOC A0,X2 01142 M00S01040.kronref +++| SA4 NTAB+A0 RESET LAST LENGTH 01143 M00S01041.kronref +++| SA1 ADWA RESTORE WORD 01144 M00S01042.kronref +++| IX3 X3-X4 01145 M00S01043.kronref +++| SB2 X3 01146 M00S01044.kronref +++| EQ ADW1 ENTER WORD 01147 M00S01045.kronref +++| 01148 M00S01046.kronref +++| ADWA DATA 0 01149 M00S01047.kronref +++| ASN SPACE 4,10 01150 M00S01048.kronref +++|** ASN - ASSEMBLE NAME. 01151 M00S01049.kronref +++|* 01152 M00S01050.kronref +++|* ENTRY (CP) = CHARACTER POINTER. 01153 M00S01051.kronref +++|* (X0) = SEPARATOR MASK. 01154 M00S01052.kronref +++|* 01155 M00S01053.kronref +++|* EXIT (X6) = NAME RIGHT JUSTIFIED, ZERO FILLED. 01156 M00S01054.kronref +++|* (X6) = 0 IF FIRST CHARACTER = * *, OR MORE THAN 01157 M00S01055.kronref +++|* 7 CHARACTERS ASSEMBLED. 01158 M00S01056.kronref +++|* 01159 M00S01057.kronref +++|* USES X - 1, 2, 5, 6. 01160 M00S01058.kronref +++|* A - 1. 01161 M00S01059.kronref +++|* B - 2. 01162 M00S01060.kronref +++|* 01163 M00S01061.kronref +++|* CALLS SNC. 01164 M00S01062.kronref +++| 01165 M00S01063.kronref +++| 01166 M00S01064.kronref +++| ASN SUBR ENTRY/EXIT 01167 M00S01065.kronref +++| SA1 CH FIRST CHARACTER 01168 M00S01066.kronref +++| SB2 X1 01169 M00S01067.kronref +++| LX6 X0,B2 01170 M00S01068.kronref +++| MI X6,ASNX IF SEPARATOR - RETURN 01171 M00S01069.kronref +++| SX5 B0 CLEAR ASSEMBLY 01172 M00S01070.kronref +++| BX6 X1 01173 M00S01071.kronref +++| ASN1 LX5 6 SHIFT ASSEMBLY 01174 M00S01072.kronref +++| BX5 X6+X5 MERGE NEW CHARACTER 01175 M00S01073.kronref +++| RJ SNC SET NEXT CHARACTER 01176 M00S01074.kronref +++| SB2 X6 01177 M00S01075.kronref +++| LX2 X0,B2 01178 M00S01076.kronref +++| PL X2,ASN1 IF NOT A SEPARATOR 01179 M00S01077.kronref +++| BX6 X5 01180 M00S01078.kronref +++| EQ ASNX RETURN 01181 M00S01079.kronref +++| ATS SPACE 4,10 01182 M00S01080.kronref +++|** ATS - ALLOCATE TABLE SPACE. 01183 M00S01081.kronref +++|* 01184 M00S01082.kronref +++|* ENTRY (A0) = TABLE NUMBER.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | kronr1 |
Seq # *Modification Id* Act ----------------------------+ 01185 M01S00002.kronr1 +++|* (X1) = NUMBER OF WORDS. 01186 M00S01083.kronref +++|* 01187 M00S01084.kronref +++|* EXIT (X2) = TABLE FWA. 01188 M00S01085.kronref +++|* (X3) = TABLE LENGTH. 01189 M00S01086.kronref +++|* 01190 M00S01087.kronref +++|* USES X - 1, 2, 3, 4, 6, 7. 01191 M00S01088.kronref +++|* A - 1, 2, 3, 4, 6, 7. 01192 M00S01089.kronref +++|* B - 2, 3.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | kronr1 |
Seq # *Modification Id* Act ----------------------------+ 01193 M01S00003.kronr1 +++|* 01194 M01S00004.kronr1 +++|* CALLS TOV. 01195 M00S01090.kronref +++| 01196 M00S01091.kronref +++| 01197 M00S01092.kronref +++| ATS5 SA2 FTAB+A0 SET RESPONSE 01198 M00S01093.kronref +++| SA3 LTAB+A0 01199 M00S01094.kronref +++| 01200 M00S01095.kronref +++| ATS SUBR ENTRY/EXIT 01201 M00S01096.kronref +++| SA2 FTAB+A0 CHECK TABLE SPACE 01202 M00S01097.kronref +++| SA3 LTAB+A0 01203 M00S01098.kronref +++| IX7 X3+X1 ADVANCE LENGTH 01204 M00S01099.kronref +++| SA4 A2+B1 01205 M00S01100.kronref +++| IX6 X2+X7 01206 M00S01101.kronref +++| SA7 A3 01207 M00S01102.kronref +++| IX4 X4-X6 01208 M00S01103.kronref +++| NG X4,ATS1 IF NO ROOM FOR CHANGE 01209 M00S01104.kronref +++| BX3 X7 01210 M00S01105.kronref +++| EQ ATSX RETURN 01211 M00S01106.kronref +++| 01212 M00S01107.kronref +++|* CHECK AVAILABLE STORAGE. 01213 M00S01108.kronref +++| 01214 M00S01109.kronref +++| ATS1 SA2 FTAB+FTABL CHECK STORAGE 01215 M00S01110.kronref +++| SA3 FL 01216 M00S01111.kronref +++| IX6 X2+X1 01217 M00S01112.kronref +++| IX7 X3-X6 01218 M00S01113.kronref +++| NG X7,ATS4 IF NO ROOM FOR INCREASE 01219 M00S01114.kronref +++| SA6 A2 UPDATE LWA+1 OF ALL TABLES 01220 M00S01115.kronref +++| SB2 A0+B1 01221 M00S01116.kronref +++| SB3 FTABL 01222 M00S01117.kronref +++| BX4 X2 01223 M00S01118.kronref +++| EQ B2,B3,ATS5 IF LAST TABLE - RETURN 01224 M00S01119.kronref +++| 01225 M00S01120.kronref +++|* MOVE HIGHER TABLE UP. 01226 M00S01121.kronref +++| 01227 M00S01122.kronref +++| ATS2 SA2 A2-B1 ADVANCE FWA OF HIGHER TABLES 01228 M00S01123.kronref +++| IX6 X2+X1 01229 M00S01124.kronref +++| SA6 A2 01230 M00S01125.kronref +++| SB2 B2+B1 01231 M00S01126.kronref +++| NE B2,B3,ATS2 01232 M00S01127.kronref +++| IX3 X4-X2 (B2) = WORD COUNT 01233 M00S01128.kronref +++| SB3 X1 (B3) = MOVE INCREMENT 01234 M00S01129.kronref +++| ZR X3,ATS5 IF NO MOVE NEEDED 01235 M00S01130.kronref +++| SB2 X3 01236 M00S01131.kronref +++| SA1 X4-1 BEGIN AT LWA 01237 M00S01132.kronref +++| ATS3 BX6 X1 MOVE TABLE UP 01238 M00S01133.kronref +++| SA6 A1+B3 01239 M00S01134.kronref +++| SB2 B2-B1 01240 M00S01135.kronref +++| SA1 A1-B1 01241 M00S01136.kronref +++| NZ B2,ATS3 IF END OF MOVE 01242 M00S01137.kronref +++| EQ ATS5 RETURN 01243 M00S01138.kronref +++|
| Line S01139 Modification History | |
|---|---|
M01 (Removed by) | kronr1 |
Seq # *Modification Id* Act ----------------------------+ 01244 M01S01139.kronr1 ---|* MEMORY OVERFLOW ERROR.
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | kronr1 |
Seq # *Modification Id* Act ----------------------------+ 01245 M01S00005.kronr1 +++|* TABLE OVERFLOW. 01246 M00S01140.kronref +++|
| Line S01141 Modification History | |
|---|---|
M01 (Removed by) | kronr1 |
Seq # *Modification Id* Act ----------------------------+ 01247 M01S01141.kronr1 ---| ATS4 SA0 =C* MEMORY OVERFLOW.* 01248 M01S01142.kronr1 ---| EQ ABT
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | kronr1 |
Seq # *Modification Id* Act ----------------------------+ 01249 M01S00006.kronr1 +++| ATS4 SX6 A0 SAVE (A0) 01250 M01S00007.kronr1 +++| SA6 ATSA 01251 M01S00008.kronr1 +++| BX6 X1 SAVE (X1) 01252 M01S00009.kronr1 +++| SA6 ATSA+1 01253 M01S00010.kronr1 +++| RJ TOV PROCESS TABLE OVERFLOW 01254 M01S00011.kronr1 +++| SA1 ATSA RESTORE (A0) 01255 M01S00012.kronr1 +++| SA0 X1 01256 M01S00013.kronr1 +++| SA1 A1+B1 RESTORE (X1) 01257 M01S00014.kronr1 +++| EQ ATS1 RE-COMPUTE WITH NEW MEMORY 01258 M01S00015.kronr1 +++| 01259 M01S00016.kronr1 +++| 01260 M01S00017.kronr1 +++| ATSA BSSZ 2 (A0) AND (X1) STORAGE 01261 M00S01143.kronref +++| ENT SPACE 4,10 01262 M00S01144.kronref +++|** ENT - ENTER NAME TABLE. 01263 M00S01145.kronref +++|* 01264 M00S01146.kronref +++|* ENTRY (X5) = REFERENCE TYPE. 01265 M00S01147.kronref +++|* 01266 M00S01148.kronref +++|* USES X - 1, 2, 3, 6, 7. 01267 M00S01149.kronref +++|* A - 1, 2. 01268 M00S01150.kronref +++|* B - 2, 3. 01269 M00S01151.kronref +++|* 01270 M00S01152.kronref +++|* CALLS ADW. 01271 M00S01153.kronref +++|* 01272 M00S01154.kronref +++|* MACROS ADDWRD. 01273 M00S01155.kronref +++| 01274 M00S01156.kronref +++| 01275 M00S01157.kronref +++| ENT SUBR ENTRY/EXIT 01276 M00S01158.kronref +++| SA1 DN RIGHT JUSTIFY DECK NAME 01277 M00S01159.kronref +++| MX2 -6 01278 M00S01160.kronref +++| BX6 X1 01279 M00S01161.kronref +++| ENT1 LX6 -6 01280 M00S01162.kronref +++| BX7 -X2*X6 01281 M00S01163.kronref +++| ZR X7,ENT1 IF NOT A CHARACTER 01282 M00S01164.kronref +++| SA1 L.TNME 01283 M00S01165.kronref +++| SA2 F.TNME 01284 M00S01166.kronref +++| SB2 B1+B1 01285 M00S01167.kronref +++| SB3 X1 01286 M00S01168.kronref +++| SA1 X2 01287 M00S01169.kronref +++| MX2 1 01288 M00S01170.kronref +++| ZR B3,ENT3 IF EMPTY TABLE 01289 M00S01171.kronref +++| ENT2 BX3 -X2*X1 SCAN NAME TABLE 01290 M00S01172.kronref +++| IX7 X3-X6 01291 M00S01173.kronref +++| SB3 B3-B2 01292 M00S01174.kronref +++| ZR X7,ENTX IF FOUND - RETURN 01293 M00S01175.kronref +++| SA1 A1+B2 01294 M00S01176.kronref +++| NZ B3,ENT2 IF NOT THE END OF THE TABLE 01295 M00S01177.kronref +++| ENT3 ADDWRD TNME,X6 01296 M00S01178.kronref +++| ADDWRD A0,X5 01297 M00S01179.kronref +++| EQ ENTX RETURN 01298 M00S01180.kronref +++| ESR SPACE 4,10 01299 M00S01181.kronref +++|** ESR - ENTER SPECIAL REFERENCE. 01300 M00S01182.kronref +++|* 01301 M00S01183.kronref +++|* ENTRY (X5) = REFERENCE TYPE. 01302 M00S01184.kronref +++|* (X6) = NAME RIGHT JUSTIFIED. 01303 M00S01185.kronref +++|* 01304 M00S01186.kronref +++|* USES X - 1, 2, 3, 6, 7. 01305 M00S01187.kronref +++|* A - 1, 2, 6. 01306 M00S01188.kronref +++|* B - 2, 3, 4. 01307 M00S01189.kronref +++|* 01308 M00S01190.kronref +++|* CALLS ADW. 01309 M00S01191.kronref +++|* 01310 M00S01192.kronref +++|* MACROS ADDWRD. 01311 M00S01193.kronref +++| 01312 M00S01194.kronref +++| 01313 M00S01195.kronref +++| ESR SUBR ENTRY/EXIT 01314 M00S01196.kronref +++| MX1 6*3 TRUNCATE NAME TO 7 CHARACTERS 01315 M00S01197.kronref +++| BX6 -X1*X6 01316 M00S01198.kronref +++| SA1 L.TNME 01317 M00S01199.kronref +++| SA2 F.TNME 01318 M00S01200.kronref +++| SB2 B1+B1 01319 M00S01201.kronref +++| SB3 X1 01320 M00S01202.kronref +++| SA1 X2 01321 M00S01203.kronref +++| SB4 X2 01322 M00S01204.kronref +++| MX2 1 01323 M00S01205.kronref +++| ZR B3,ESR1.1 IF EMPTY TABLE 01324 M00S01206.kronref +++| ESR1 BX3 -X2*X1 SCAN NAME TABLE 01325 M00S01207.kronref +++| IX7 X3-X6 01326 M00S01208.kronref +++| SB3 B3-B2 01327 M00S01209.kronref +++| ZR X7,ESR2 IF FOUND 01328 M00S01210.kronref +++| SA1 A1+B2 01329 M00S01211.kronref +++| NZ B3,ESR1 IF THE END OF THE TABLE 01330 M00S01212.kronref +++| ESR1.1 ADDWRD TNME,X6 01331 M00S01213.kronref +++| ADDWRD A0,X5 01332 M00S01214.kronref +++| SA1 A6-B1 01333 M00S01215.kronref +++| MX2 1 01334 M00S01216.kronref +++| ESR2 MI X1,ESRX IF SYMBOL REFERENCED - EXIT 01335 M00S01217.kronref +++| BX6 X1+X2 INDICATE REFERENCE 01336 M00S01218.kronref +++| SA6 A1 01337 M00S01219.kronref +++| SX3 A1-B4 01338 M00S01220.kronref +++| SA2 DN 01339 M00S01221.kronref +++| ADDWRD TREF,X2+X3 ENTER REFERENCE 01340 M00S01222.kronref +++| EQ ESRX RETURN 01341 M00S01223.kronref +++| PLE SPACE 4,10 01342 M00S01224.kronref +++|** PLE - PROCESS LIBRARY ERROR. 01343 M00S01225.kronref +++|* 01344 M00S01226.kronref +++|* ISSUE DAYFILE MESSAGE *PL ERROR IN DECK*. 01345 M00S01227.kronref +++|* ABORT JOB. 01346 M00S01228.kronref +++|* 01347 M00S01229.kronref +++|* USES X - 1, 6. 01348 M00S01230.kronref +++|* A - 0, 1, 6. 01349 M00S01231.kronref +++|* 01350 M00S01232.kronref +++|* CALLS ABT. 01351 M00S01233.kronref +++| 01352 M00S01234.kronref +++| 01353 M00S01235.kronref +++| PLE SA1 DN SET DECK NAME IN MESSAGE 01354 M00S01236.kronref +++| BX6 X1 01355 M00S01237.kronref +++| SA6 PLEB 01356 M00S01238.kronref +++| SA0 PLEA 01357 M00S01239.kronref +++| EQ ABT ABORT JOB 01358 M00S01240.kronref +++| 01359 M00S01241.kronref +++| PLEA DATA 20H PL ERROR IN DECK 01360 M00S01242.kronref +++| PLEB DATA 0 01361 M00S01243.kronref +++| PLS SPACE 4,20 01362 M00S01244.kronref +++|** PLS - ISSUE PROGRAM LIBRARY STATISTICS MESSAGES. 01363 M00S01245.kronref +++|* 01364 M00S01246.kronref +++|* ENTRY (BLANK) = ACTIVE BLANK STATEMENTS. 01365 M00S01247.kronref +++|* (CALL) = ACTIVE *CALL STATEMENTS. 01366 M00S01248.kronref +++|* (CODE) = ACTIVE NON-COMMENT, NON-BLANK STATEMENTS. 01367 M00S01249.kronref +++|* (COMNT) = ACTIVE * TYPE COMMENT STATEMENTS. 01368 M00S01250.kronref +++|* (INACT) = INACTIVE STATEMENTS. 01369 M00S01251.kronref +++|* 01370 M00S01252.kronref +++|* EXIT ALL DAYFILE MESSAGES ISSUED. 01371 M00S01253.kronref +++|* 01372 M00S01254.kronref +++|* USES X - 1, 2, 3, 4, 5, 6, 7. 01373 M00S01255.kronref +++|* A - 1, 2, 3, 4, 6. 01374 M00S01256.kronref +++|* 01375 M00S01257.kronref +++|* CALLS CDD, WOF. 01376 M00S01258.kronref +++| 01377 M00S01259.kronref +++| 01378 M00S01260.kronref +++| PLS SUBR ENTRY/EXIT 01379 M00S01261.kronref +++| SA1 BLANK CONVERT NUMBER OF BLANK STATEMENTS 01380 M00S01262.kronref +++| RJ CDD 01381 M00S01263.kronref +++| SA6 PLSB+1 01382 M00S01264.kronref +++| SA1 CALL CONVERT NUMBER OF *CALL STATEMENTS 01383 M00S01265.kronref +++| RJ CDD 01384 M00S01266.kronref +++| SA6 PLSC+1 01385 M00S01267.kronref +++| SA1 CODE CONVERT NUMBER OF LINES OF CODE 01386 M00S01268.kronref +++| RJ CDD 01387 M00S01269.kronref +++| SA6 PLSD+1 01388 M00S01270.kronref +++| SA1 COMNT CONVERT NUMBER OF COMMENT STATEMENTS 01389 M00S01271.kronref +++| RJ CDD 01390 M00S01272.kronref +++| SA6 PLSE+1 01391 M00S01273.kronref +++| SA1 INACT CONVERT NUMBER OF INACTIVE STATEMENTS 01392 M00S01274.kronref +++| RJ CDD 01393 M00S01275.kronref +++| SA6 PLSF+1 01394 M00S01276.kronref +++| SA1 BLANK COMPUTE TOTAL NUMBER OF ACTIVE STATEMENTS 01395 M00S01277.kronref +++| SA2 CALL 01396 M00S01278.kronref +++| SA3 CODE 01397 M00S01279.kronref +++| SA4 COMNT 01398 M00S01280.kronref +++| IX5 X1+X2 01399 M00S01281.kronref +++| IX7 X3+X4 01400 M00S01282.kronref +++| IX1 X5+X7 01401 M00S01283.kronref +++| RJ CDD CONVERT TOTAL ACTIVE STATEMENTS 01402 M00S01284.kronref +++| SA6 PLSG+1
| Line S01285 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01403 M01S01285.ns22000 ---| SX7 LINP FORCE PAGE EJECT
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01404 M01S00072.ns22000 +++| SX7 LCFE FORCE EJECT 01405 M00S01286.kronref +++| SX6 PLSA SET SUBTITLE LINE 01406 M00S01287.kronref +++| SA7 LC 01407 M00S01288.kronref +++| SA6 ST 01408 M00S01289.kronref +++| SX7 =C* * SET SUB-SUB TITLE LINE 01409 M00S01290.kronref +++| SX1 PLSB BLANK STATEMENTS 01410 M00S01291.kronref +++| SA7 A6+1 01411 M00S01292.kronref +++| RJ WOF WRITE OUTPUT FILE 01412 M00S01293.kronref +++| SX1 PLSC *CALL STATEMENTS 01413 M00S01294.kronref +++| RJ WOF WRITE OUTPUT FILE 01414 M00S01295.kronref +++| SX1 PLSD LINES OF CODE 01415 M00S01296.kronref +++| RJ WOF WRITE OUTPUT FILE 01416 M00S01297.kronref +++| SX1 PLSE * TYPE COMMENTS 01417 M00S01298.kronref +++| RJ WOF WRITE OUTPUT FILE 01418 M00S01299.kronref +++| SX1 PLSF INACTIVE STATEMENTS 01419 M00S01300.kronref +++| RJ WOF WRITE OUTPUT FILE 01420 M00S01301.kronref +++| SX1 PLSG ACTIVE STATEMENTS 01421 M00S01302.kronref +++| RJ WOF WRITE OUTPUT FILE 01422 M00S01303.kronref +++| EQ PLSX RETURN 01423 M00S01304.kronref +++| 01424 M00S01305.kronref +++| PLSA DATA C/ PROGRAM LIBRARY STATISTICS./ 01425 M00S01306.kronref +++| PLSB DATA 10H0 01426 M00S01307.kronref +++| DATA C/ BLANK STATEMENTS./ 01427 M00S01308.kronref +++| PLSC DATA 10H0 01428 M00S01309.kronref +++| DATA C/ *CALL STATEMENTS./ 01429 M00S01310.kronref +++| PLSD DATA 10H0 01430 M00S01311.kronref +++| DATA C/ LINES OF CODE./ 01431 M00S01312.kronref +++| PLSE DATA 10H0 01432 M00S01313.kronref +++| DATA C/ * TYPE COMMENT STATEMENTS./ 01433 M00S01314.kronref +++| PLSF DATA 10H0 01434 M00S01315.kronref +++| DATA C/ TOTAL INACTIVE STATEMENTS./ 01435 M00S01316.kronref +++| PLSG DATA 10H0 01436 M00S01317.kronref +++| DATA C/ TOTAL ACTIVE STATEMENTS./ 01437 M00S01318.kronref +++| RMT SPACE 4,10 01438 M00S01319.kronref +++|** RMT - READ MODIFIER TABLE. 01439 M00S01320.kronref +++|* 01440 M00S01321.kronref +++|* ENTRY (DN) = DECK NAME. 01441 M00S01322.kronref +++|* (MA) = MODIFICATION TABLE ADDRESS. 01442 M00S01323.kronref +++|* 01443 M00S01324.kronref +++|* EXIT (X0) = TERMINATOR CHARACTOR MASK. 01444 M00S01325.kronref +++|* 01445 M00S01326.kronref +++|* USES X - ALL. 01446 M00S01327.kronref +++|* A - 1, 2, 3, 6. 01447 M00S01328.kronref +++|* B - 2, 3. 01448 M00S01329.kronref +++|* 01449 M00S01330.kronref +++|* CALLS ENT. 01450 M00S01331.kronref +++|* 01451 M00S01332.kronref +++|* MACROS MESSAGE, READ, READW. 01452 M00S01333.kronref +++| 01453 M00S01334.kronref +++| 01454 M00S01335.kronref +++| RMT SUBR ENTRY/EXIT 01455 M00S01336.kronref +++| SA1 L.TNME CLEAR REFERENCE INDICATORS 01456 M00S01337.kronref +++| SA2 F.TNME 01457 M00S01338.kronref +++| MX4 1 01458 M00S01339.kronref +++| SB3 X1 01459 M00S01340.kronref +++| SA1 X2 01460 M00S01341.kronref +++| SB2 B1+B1 01461 M00S01342.kronref +++| ZR B3,RMT2 IF EMPTY TABLE 01462 M00S01343.kronref +++| RMT1 BX6 -X4*X1 01463 M00S01344.kronref +++| SA6 A1 01464 M00S01345.kronref +++| SB3 B3-B2 01465 M00S01346.kronref +++| SA1 A1+B2 01466 M00S01347.kronref +++| NZ B3,RMT1 IF MORE REFERENCES 01467 M00S01348.kronref +++| RMT2 READ P 01468 M00S01349.kronref +++| READW P,BUF,17B READ IDENT TABLE 01469 M00S01350.kronref +++| MI X1,RMTX IF EOF - RETURN 01470 M00S01351.kronref +++| SA1 BUF 01471 M00S01352.kronref +++| LX1 12 01472 M00S01353.kronref +++| SB2 X1-7700B 01473 M00S01354.kronref +++| NZ B2,RMT7 IF NO IDENT TABLE 01474 M00S01355.kronref +++| SA1 BUF+1 SET DECK NAME 01475 M00S01356.kronref +++| BX6 X1 01476 M00S01357.kronref +++| SA6 DN 01477 M00S01358.kronref +++| SA6 RMTA+1 01478 M00S01359.kronref +++| READW P,T1,1 READ MODIFIER TABLE LENGTH 01479 M00S01360.kronref +++| NZ X1,PLE IF EOR 01480 M00S01361.kronref +++| SA1 T1 CHECK TABLE 01481 M00S01362.kronref +++| LX1 18 01482 M00S01363.kronref +++| SX6 B0 01483 M00S01364.kronref +++| SB2 X1-700100B 01484 M00S01365.kronref +++| SB3 X1-700200B 01485 M00S01366.kronref +++| NZ B2,RMT3 IF NOT NORMAL DECK 01486 M00S01367.kronref +++| SA3 =0LCMDFILE CHECK FOR *CMDFILE* - *HELP* TEXT 01487 M00S01368.kronref +++| BX7 X3-X2 01488 M00S01369.kronref +++| ZR X7,RMT7 IF *CMDFILE* SKIP ENTIRE DECK 01489 M00S01370.kronref +++| EQ RMT4 PROCESS NORMAL DECK 01490 M00S01371.kronref +++| 01491 M00S01372.kronref +++|* CHECK FOR A COMMON DECK. 01492 M00S01373.kronref +++| 01493 M00S01374.kronref +++| RMT3 NZ B3,RMT7 IF NOT A COMMON DECK 01494 M00S01375.kronref +++| SX5 B0 ENTER NAME TABLE 01495 M00S01376.kronref +++| RJ ENT 01496 M00S01377.kronref +++| SA1 T1 01497 M00S01378.kronref +++| LX1 18 01498 M00S01379.kronref +++| SX6 B1 SET REFERENCE FLAG 01499 M00S01380.kronref +++| MX4 4*6 01500 M00S01381.kronref +++| SA6 RF 01501 M00S01382.kronref +++| SA6 PP SET PP 01502 M00S01383.kronref +++| SA2 DN GET DECK NAME 01503 M00S01384.kronref +++| SA3 =0LCOMP 01504 M00S01385.kronref +++| BX2 X4*X2 01505 M00S01386.kronref +++| IX7 X2-X3 01506 M00S01387.kronref +++| ZR X7,RMT4 IF -COMPXXX- 01507 M00S01388.kronref +++| SA3 =0LCOMD 01508 M00S01389.kronref +++| IX7 X2-X3 01509 M00S01390.kronref +++| SX6 B0 01510 M00S01391.kronref +++| ZR X7,RMT4 IF -COMDXXX- 01511 M00S01392.kronref +++| SA6 PP 01512 M00S01393.kronref +++| RMT4 LX1 60-18 01513 M00S01394.kronref +++| SX5 X1 01514 M00S01395.kronref +++| ZR X5,RMT6 IF NO MODIFIERS 01515 M00S01396.kronref +++| RMT5 READW P,T1,1 READ OUT MODIFIERS 01516 M00S01397.kronref +++| SX5 X5-1 01517 M00S01398.kronref +++| NZ X5,RMT5 IF NOT THE LAST WORD 01518 M00S01399.kronref +++| RMT6 MESSAGE RMTA,1 01519 M00S01400.kronref +++| SA2 =36060020B MASK FOR BL , + - * / 01520 M00S01401.kronref +++| SX1 B0 RETURN WITH NO EOR 01521 M00S01402.kronref +++| BX0 X2 01522 M00S01403.kronref +++| EQ RMTX RETURN 01523 M00S01404.kronref +++| 01524 M00S01405.kronref +++| RMT7 READW P,BUF,BUFL READ TO EOR 01525 M00S01406.kronref +++| ZR X1,RMT7 IF NOT AN EOR 01526 M00S01407.kronref +++| EQ RMT2 BEGIN NEXT RECORD 01527 M00S01408.kronref +++| 01528 M00S01409.kronref +++| RMTA DATA 10H SCANNING 01529 M00S01410.kronref +++| DATA 0 01530 M00S01411.kronref +++| RPF SPACE 4,10 01531 M00S01412.kronref +++|** RPF - READ CARD FROM PROGRAM LIBRARY. 01532 M00S01413.kronref +++|* 01533 M00S01414.kronref +++|* ENTRY (A0) = ADDRESS OF BUFFER. 01534 M00S01415.kronref +++|* 01535 M00S01416.kronref +++|* EXIT (X1) .NE. 0 IF EOR READ. 01536 M00S01417.kronref +++|* (CDTX) = TEXT OF COMPRESSED CARD. 01537 M00S01418.kronref +++|* 01538 M00S01419.kronref +++|* USES X - 1, 6. 01539 M00S01420.kronref +++|* A - 1, 6. 01540 M00S01421.kronref +++|* 01541 M00S01422.kronref +++|* MACROS READC. 01542 M00S01423.kronref +++| 01543 M00S01424.kronref +++| 01544 M00S01425.kronref +++| RPF SUBR ENTRY/EXIT 01545 M00S01426.kronref +++| RPF1 READC P,BUF,BUFL READ CARD HISTORY 01546 M00S01427.kronref +++| NZ X1,RPF IF EOR - RETURN 01547 M00S01428.kronref +++| READC P,CDTX,MXCCL READ COMPRESSED CARD 01548 M00S01429.kronref +++| NZ X1,RPF IF EOR - RETURN 01549 M00S01430.kronref +++| EQ B6,B7,PLE IF OVERFLOW 01550 M00S01431.kronref +++| SA1 BUF 01551 M00S01432.kronref +++| MI X1,RPF2 IF CARD ACTIVE 01552 M00S01433.kronref +++| SA1 INACT COUNT INACTIVE CARD 01553 M00S01434.kronref +++| SX6 B1 01554 M00S01435.kronref +++| IX6 X6+X1 01555 M00S01436.kronref +++| SA6 A1 01556 M00S01437.kronref +++| EQ RPF1 LOOP FOR NEXT CARD 01557 M00S01438.kronref +++| 01558 M00S01439.kronref +++| RPF2 BX1 X1-X1 SET NOT EOR FLAG 01559 M00S01440.kronref +++| EQ RPFX RETURN 01560 M00S01441.kronref +++| SNC SPACE 4,10 01561 M00S01442.kronref +++|** SNC - SET NEXT CHARACTER. 01562 M00S01443.kronref +++|* 01563 M00S01444.kronref +++|* ENTRY (CP) = CHARACTER POINTER. 01564 M00S01445.kronref +++|* 01565 M00S01446.kronref +++|* EXIT (X6) = (CH) = CHARACTER. 01566 M00S01447.kronref +++|* (CP) UPDATED. 01567 M00S01448.kronref +++|* CHARACTER = * * IF END OF CARD REACHED. 01568 M00S01449.kronref +++|* 01569 M00S01450.kronref +++|* USES X - 1, 2, 3, 4, 6, 7. 01570 M00S01451.kronref +++|* A - 1, 2, 6, 7. 01571 M00S01452.kronref +++|* B - 2, 3, 4, 5. 01572 M00S01453.kronref +++| 01573 M00S01454.kronref +++| 01574 M00S01455.kronref +++| SNC3 SX4 X1+ SET POSITION 01575 M00S01456.kronref +++| MI B4,SNC4 IF NOT SPACE COUNT 01576 M00S01457.kronref +++| SX6 1R SUPPLY * * 01577 M00S01458.kronref +++| EQ SNC6 SPACE FILL 01578 M00S01459.kronref +++| 01579 M00S01460.kronref +++| SNC4 SX7 X6-1R CHECK FOR CURRENT CHARACTER BLANK
| Line S01461 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01580 M01S01461.242l642 ---| NZ X7,SNC6 IF NOT BLANK 01581 M01S01462.242l642 ---| SB5 B2+6 ADVANCE TO NEXT CHARACTER
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01582 M01S00006.242l642 +++| ZR X7,SNC4.1 IF BLANK 01583 M01S00007.242l642 +++| SX7 X6-76B CHECK ESCAPE CODE 01584 M01S00008.242l642 +++| NZ X7,SNC6 IF NOT ESCAPE CODE 01585 M01S00009.242l642 +++| SNC4.1 SB5 B2+6 01586 M00S01463.kronref +++| NE B5,B3,SNC5 IF NOT AT END OF WORD 01587 M00S01464.kronref +++| SB5 6 RESET POSITION 01588 M00S01465.kronref +++| SX4 X4+B1 ADVANCE TO NEXT WORD 01589 M00S01466.kronref +++| SA2 A2+B1 GET NEXT WORD OF CARD 01590 M00S01467.kronref +++| SNC5 LX7 X2,B5 POSITION CHARACTER 01591 M00S01468.kronref +++| BX7 -X3*X7 CHECK FOR SECOND CONSECUTIVE BLANK
| Line S01469 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01592 M01S01469.242l642 ---| SX7 X7-1R 01593 M01S01470.242l642 ---| NZ X7,SNC6 IF NOT A BLANK 01594 M01S01471.242l642 ---| SB2 B5 ADVANCE
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01595 M01S00010.242l642 +++| SX2 X7-1R 01596 M01S00011.242l642 +++| ZR X2,SNC5.1 IF BLANK 01597 M01S00012.242l642 +++| ZR X7,SNC6 IF *00* FOLLOWS 76B 01598 M01S00013.242l642 +++| SX2 X6-76B 01599 M01S00014.242l642 +++| NZ X2,SNC6 IF NOT CONVERTING TO UPPER CASE 01600 M01S00015.242l642 +++| SX2 X7-33B 01601 M01S00016.242l642 +++| PL X2,SNC6 IF NOT LOWER CASE ALPHABETIC CHARACTER 01602 M01S00017.242l642 +++| BX6 X7 01603 M01S00018.242l642 +++| SNC5.1 SB2 B5 01604 M00S01472.kronref +++| SX1 X4 01605 M00S01473.kronref +++| SNC6 PX7 X1,B2 PACK POSITION 01606 M00S01474.kronref +++| SA6 CH SET CHARACTER 01607 M00S01475.kronref +++| SA7 A1 01608 M00S01476.kronref +++| 01609 M00S01477.kronref +++| SNC SUBR ENTRY/EXIT 01610 M00S01478.kronref +++| SA1 CP UNPACK POINTER 01611 M00S01479.kronref +++| SA2 X1+CDTX LOAD WORD FROM CARD 01612 M00S01480.kronref +++| MX3 54 01613 M00S01481.kronref +++| SB3 66 01614 M00S01482.kronref +++| UX1,B2 X1 01615 M00S01483.kronref +++| SB4 -B1 01616 M00S01484.kronref +++| SX4 1R PRESET * * 01617 M00S01485.kronref +++| SNC1 SB2 B2+6 ADVANCE CHARACTER INDEX 01618 M00S01486.kronref +++| NE B2,B3,SNC2 IF NOT LAST CHARACTER OF WORD 01619 M00S01487.kronref +++| SB2 6 RESET CHARACTER 01620 M00S01488.kronref +++| SX1 X1+B1 ADVANCE WORD 01621 M00S01489.kronref +++| SA2 A2+B1 01622 M00S01490.kronref +++| SNC2 LX7 X2,B2 SHIFT TO CHARACTER 01623 M00S01491.kronref +++| BX6 -X3*X7 01624 M00S01492.kronref +++| NZ X6,SNC3 IF NOT 00 CHARACTER 01625 M00S01493.kronref +++| SB4 B4+B1 01626 M00S01494.kronref +++| NE B4,B1,SNC1 IF NOT THE LAST SPACE 01627 M00S01495.kronref +++| BX6 X4 01628 M00S01496.kronref +++| SA6 CH 01629 M00S01497.kronref +++| EQ SNCX RETURN 01630 M00S01498.kronref +++| SSR SPACE 4,10 01631 M00S01499.kronref +++|** SSR - SORT SPECIAL REFERENCES. 01632 M00S01500.kronref +++|* 01633 M00S01501.kronref +++|* USES X - 1, 2, 3, 4, 6, 7. 01634 M00S01502.kronref +++|* A - 0, 1, 2, 3, 4, 5, 6, 7. 01635 M00S01503.kronref +++|* B - 2, 3, 4, 5, 6, 7. 01636 M00S01504.kronref +++| 01637 M00S01505.kronref +++| 01638 M00S01506.kronref +++| SSR SUBR ENTRY/EXIT 01639 M00S01507.kronref +++| SA1 F.TNME (A0) = FWA - 2 01640 M00S01508.kronref +++| SA2 SL 01641 M00S01509.kronref +++| IX6 X1+X2 01642 M00S01510.kronref +++| SA3 L.TNME 01643 M00S01511.kronref +++| IX7 X3-X2 01644 M00S01512.kronref +++| SA0 X6-2 01645 M00S01513.kronref +++| SB7 X7 N = LENGTH 01646 M00S01514.kronref +++| SB6 B7 M = N 01647 M00S01515.kronref +++| SSR1 SX6 B6 M = M/2 01648 M00S01516.kronref +++| AX6 2 01649 M00S01517.kronref +++| LX6 1 01650 M00S01518.kronref +++| SB6 X6 01651 M00S01519.kronref +++| SB3 B1+B1 J = 1 01652 M00S01520.kronref +++| ZR B6,SSRX IF M = 0 - RETURN 01653 M00S01521.kronref +++| SB4 B7-B6 K = N-M 01654 M00S01522.kronref +++| SB2 B3 01655 M00S01523.kronref +++| SSR2 SB5 B2+B6 L = I+M 01656 M00S01524.kronref +++| SA1 A0+B2 A(I) 01657 M00S01525.kronref +++| SA2 A0+B5 A(L) 01658 M00S01526.kronref +++| IX6 X2-X1 01659 M00S01527.kronref +++| PL X6,SSR3 IF A(L) .GE. A(I) 01660 M00S01528.kronref +++| SA3 A1+B1 INTERCHANGE A(L) AND A(I) 01661 M00S01529.kronref +++| SA4 A2+B1 01662 M00S01530.kronref +++| BX6 X1 01663 M00S01531.kronref +++| LX7 X2 01664 M00S01532.kronref +++| SA6 A2 01665 M00S01533.kronref +++| SA7 A1 01666 M00S01534.kronref +++| BX6 X3 01667 M00S01535.kronref +++| BX7 X4 01668 M00S01536.kronref +++| SA6 A4 01669 M00S01537.kronref +++| SA7 A3 01670 M00S01538.kronref +++| SB2 B2-B6 I = I-M 01671 M00S01539.kronref +++| GT B2,SSR2 IF I .GT. 0 01672 M00S01540.kronref +++| SSR3 SB3 B3+2 J = J+1 01673 M00S01541.kronref +++| SB2 B3 01674 M00S01542.kronref +++| LE B3,B4,SSR2 IF J .LE. K 01675 M00S01543.kronref +++| EQ SSR1 LOOP
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | kronr1 |
Seq # *Modification Id* Act ----------------------------+ 01676 M01S00018.kronr1 +++| TOV SPACE 4,10 01677 M01S00019.kronr1 +++|** TOV - TABLE OVERFLOW PROCESSOR. 01678 M01S00020.kronr1 +++|* 01679 M01S00021.kronr1 +++|* ENTRY (FL) = CURRENT FIELD LENGTH. 01680 M01S00022.kronr1 +++|* 01681 M01S00023.kronr1 +++|* EXIT (FL) = NEW FIELD LENGTH. 01682 M01S00024.kronr1 +++|* 01683 M01S00025.kronr1 +++|* USES A - 1, 6. 01684 M01S00026.kronr1 +++|* X - 1, 6. 01685 M01S00027.kronr1 +++|* 01686 M01S00028.kronr1 +++|* CALLS ABT. 01687 M01S00029.kronr1 +++|* 01688 M01S00030.kronr1 +++|* MACROS MEMORY. 01689 M01S00031.kronr1 +++| 01690 M01S00032.kronr1 +++| 01691 M01S00033.kronr1 +++| TOV SUBR ENTRY/EXIT 01692 M01S00034.kronr1 +++| SA1 FL INCREMENT FIELD LENGTH 01693 M01S00035.kronr1 +++| SX6 X1+MINC 01694 M01S00036.kronr1 +++| SA6 A1 01695 M01S00037.kronr1 +++| LX6 30 POSITION FOR *MEM* CALL 01696 M01S00038.kronr1 +++| SA6 TOVA 01697 M01S00039.kronr1 +++| SA1 A6+B1 CHECK MEMORY LIMIT 01698 M01S00040.kronr1 +++| IX1 X1-X6 01699 M01S00041.kronr1 +++| NG X1,TOV1 IF LIMIT REACHED. 01700 M01S00042.kronr1 +++| MEMORY CM,TOVA,R 01701 M01S00043.kronr1 +++| EQ TOVX RETURN 01702 M01S00044.kronr1 +++| 01703 M01S00045.kronr1 +++| 01704 M01S00046.kronr1 +++| TOV1 SA0 =C* MEMORY OVERFLOW.* 01705 M01S00047.kronr1 +++| EQ ABT ABORT 01706 M01S00048.kronr1 +++| 01707 M01S00049.kronr1 +++| 01708 M01S00050.kronr1 +++| TOVA CON 0 MEMORY CALL WORD 01709 M01S00051.kronr1 +++| TOVB VFD 30/-0,30/0 MAXIMUM MEMORY LIMIT 01710 M00S01544.kronref +++| WOF SPACE 4,10 01711 M00S01545.kronref +++|** WOF - WRITE LINE TO OUTPUT. 01712 M00S01546.kronref +++|* 01713 M00S01547.kronref +++|* ENTRY (X1) = FWA LINE. 01714 M00S01548.kronref +++|* 01715 M00S01549.kronref +++|* USES X - 1, 2, 3, 6, 7. 01716 M00S01550.kronref +++|* A - 1, 2, 3, 6, 7. 01717 M00S01551.kronref +++|* 01718 M00S01552.kronref +++|* CALLS CDD. 01719 M00S01553.kronref +++|* 01720 M00S01554.kronref +++|* MACROS WRITEC, WRITEW. 01721 M00S01555.kronref +++| 01722 M00S01556.kronref +++| 01723 M00S01557.kronref +++| WOF SUBR ENTRY/EXIT 01724 M00S01558.kronref +++| SA3 LC ADVANCE LINE COUNT 01725 M00S01559.kronref +++| SX6 X3+B1 01726 M00S01560.kronref +++| SA6 A3
| Line S01561 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01727 M01S01561.ns22000 ---| SX7 X6-LINP+4 01728 M01S01562.ns22000 ---| NG X7,WOF1 IF BOTTOM OF PAGE NOT REACHED
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01729 M01S00073.ns22000 +++| SA2 LL 01730 M01S00074.ns22000 +++| IX2 X6-X2 01731 M01S00075.ns22000 +++| NG X2,WOF1 IF BOTTOM OF PAGE NOT REACHED 01732 M00S01563.kronref +++| BX6 X1 SAVE REQUEST 01733 M00S01564.kronref +++| SA6 WOFA 01734 M00S01565.kronref +++| SA1 PN ADVANCE PAGE NUMBER
| Line S01566 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01735 M01S01566.ns22000 ---| SX6 B0 RESET LINE COUNT
| Line S00076 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01736 M01S00076.ns22000 +++| SX6 4 RESET LINE COUNT 01737 M00S01567.kronref +++| SX7 X1+B1 01738 M00S01568.kronref +++| SA6 A3 01739 M00S01569.kronref +++| SA7 A1 01740 M00S01570.kronref +++| RJ CDD CONVERT PAGE NUMBER 01741 M00S01571.kronref +++| MX1 60-12 01742 M00S01572.kronref +++| LX6 4*6 STORE PAGE NUMBER 01743 M00S01573.kronref +++| BX6 X1*X6 01744 M00S01574.kronref +++| SA6 PAGE
| Line S01575 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01745 M01S01575.ns22000 ---| WRITEW O,TITL,TITLL
| Line S00077 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01746 M01S00077.ns22000 +++| SA1 PD 01747 M01S00078.ns22000 +++| ZR X1,WOF0 IF NO FORMAT EFFECTOR 01748 M01S00079.ns22000 +++| WRITEW O,A1,1 WRITE FORMAT EFFECTOR 01749 M01S00080.ns22000 +++| BX6 X6-X6 01750 M01S00081.ns22000 +++| SA6 PD 01751 M01S00082.ns22000 +++| WOF0 WRITEW O,TITL,TITLL 01752 M00S01576.kronref +++| SA1 ST 01753 M00S01577.kronref +++| WRITEC X2,X1 01754 M00S01578.kronref +++| SA1 ST+1 01755 M00S01579.kronref +++| WRITEC X2,X1 01756 M00S01580.kronref +++| WRITEC X2,(=C* *) 01757 M00S01581.kronref +++| SA1 WOFA RESTORE REQUEST
| Line S01582 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01758 M01S01582.ns22000 ---| SA2 A1+B1 01759 M00S01583.kronref +++| WOF1 WRITEC O,X1 01760 M00S01584.kronref +++| EQ WOFX RETURN 01761 M00S01585.kronref +++| 01762 M00S01586.kronref +++| WOFA DATA 0 01763 M00S01587.kronref +++| SPACE 4,10
| Line S01588 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01764 M01S01588.ns22000 ---|* COMMON DECKS.
| Line S00083 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01765 M01S00083.ns22000 +++|** COMMON DECKS. 01766 M00S01589.kronref +++| 01767 M00S01590.kronref +++| 01768 M00S01591.kronref +++|*CALL COMCRDC 01769 M00S01592.kronref +++|*CALL COMCRDW 01770 M00S01593.kronref +++|*CALL COMCWTC 01771 M00S01594.kronref +++|*CALL COMCWTW 01772 M00S01595.kronref +++|*CALL COMCCIO 01773 M00S01596.kronref +++|*CALL COMCSYS 01774 M00S01597.kronref +++|*CALL COMCCDD 01775 M00S01598.kronref +++|*CALL COMCCOD 01776 M00S01599.kronref +++|*CALL COMCSFN 01777 M00S01600.kronref +++| SPACE 4,10 01778 M00S01601.kronref +++| IDENT FORCE LITERALS 01779 M00S01602.kronref +++| PRESET TITLE KRONREF PRESET. 01780 M00S01603.kronref +++| PRS SPACE 4,10 01781 M00S01604.kronref +++|** PRS - PRESET KRONREF. 01782 M00S01605.kronref +++|* 01783 M00S01606.kronref +++|* ENTRY (A0) = FL. 01784 M00S01607.kronref +++|* 01785 M00S01608.kronref +++|* EXIT (FL) = FL - 10B. 01786 M00S01609.kronref +++|*
| Line S01610 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01787 M01S01610.ns22000 ---|* USES X - 1, 2, 3, 4, 6.
| Line S00084 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01788 M01S00084.ns22000 +++|* USES X - 1, 3, 4, 6. 01789 M00S01611.kronref +++|* A - 0, 1, 4, 6. 01790 M00S01612.kronref +++|* B - 4, 5. 01791 M00S01613.kronref +++|* 01792 M00S01614.kronref +++|* CALLS ARG, SFN. 01793 M00S01615.kronref +++|*
| Line S01616 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01794 M01S01616.ns22000 ---|* MACROS ASSIGN, CLOCK, DATE, REWIND.
| Line S00085 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01795 M01S00085.ns22000 +++|* MACROS CLOCK, DATE, REWIND. 01796 M00S01617.kronref +++| 01797 M00S01618.kronref +++| 01798 M00S01619.kronref +++| PRS SUBR ENTRY/EXIT 01799 M00S01620.kronref +++| SX6 A0-10B 01800 M00S01621.kronref +++| SA6 FL
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | kronr1 |
Seq # *Modification Id* Act ----------------------------+ 01801 M01S00052.kronr1 +++| MEMORY CM,TOVB,R GET CURRENT FL/MAXIMUM FL 01802 M00S01622.kronref +++| CLOCK TIME REQUEST TIME 01803 M00S01623.kronref +++| DATE DATE REQUEST DATE 01804 M00S01624.kronref +++| SA1 ACTR SET ARGUMENT COUNT 01805 M00S01625.kronref +++| SB4 X1 01806 M00S01626.kronref +++| ZR B4,PRS1 IF NO ARGUMENTS 01807 M00S01627.kronref +++| SB5 PRSA 01808 M00S01628.kronref +++| SA4 ARGR 01809 M00S01629.kronref +++| RJ ARG PROCESS ARGUMENTS 01810 M00S01630.kronref +++| SA0 =C* ERROR IN KRONREF ARGUMENTS.* 01811 M00S01631.kronref +++| NZ X1,ABT IF ARGUMENT ERRORS 01812 M00S01632.kronref +++| PRS1 REWIND P,R
| Line S01633 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01813 M01S01633.ns22000 ---| SA1 P+6 01814 M01S01634.ns22000 ---| NZ X1,PRS2 IF FILE AVAILIABLE 01815 M01S01635.ns22000 ---| ASSIGN P 01816 M01S01636.ns22000 ---| SA1 P CHECK STATUS 01817 M01S01637.ns22000 ---| SX2 X1 01818 M01S01638.ns22000 ---| AX2 10 01819 M01S01639.ns22000 ---| SA0 =C* PROGRAM LIBRARY NOT AVAILABLE.* 01820 M01S01640.ns22000 ---| NZ X2,ABT IF FILE NOT ASSIGNED 01821 M01S01641.ns22000 ---| REWIND P 01822 M01S01642.ns22000 ---| PRS2 SA1 P
| Line S00086 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01823 M01S00086.ns22000 +++| SA1 P 01824 M00S01643.kronref +++| MX3 42 01825 M00S01644.kronref +++| BX1 X3*X1 01826 M00S01645.kronref +++| RJ SFN SPACE FILL FILE NAME 01827 M00S01646.kronref +++| SA6 PLNM
| Line S00087 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01828 M01S00087.ns22000 +++| RJ IPP INITALIZE PAGE PARAMETERS 01829 M00S01647.kronref +++| EQ PRSX RETURN 01830 M00S01648.kronref +++| PRSA SPACE 4,10 01831 M00S01649.kronref +++|** PRSA - CONTROL CARD ARGUMENT VALUES. 01832 M00S01650.kronref +++| 01833 M00S01651.kronref +++| 01834 M00S01652.kronref +++| PRSA BSS 0 01835 M00S01653.kronref +++| L ARG O,O OUTPUT FILE 01836 M00S01654.kronref +++| P ARG P,P OPL FILE NAME 01837 M00S01655.kronref +++| S ARG =0LNOSTEXT,LSSA 01838 M00S01656.kronref +++| G ARG =0LTEXT,LSSB USER SUPPLIED TEXT FILE 01839 M00S01657.kronref +++| ARG END OF THE TABLE
| Line S00088 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01840 M01S00088.ns22000 +++| IPP SPACE 4,15 01841 M01S00089.ns22000 +++|** IPP - INITIALIZE PAGE PARAMETERS. 01842 M01S00090.ns22000 +++|* 01843 M01S00091.ns22000 +++|* EXIT (LL) = LINE LIMIT. 01844 M01S00092.ns22000 +++|* (PD) = PRINT DENSITY IF NOT TERMINAL OUTPUT FILE. 01845 M01S00093.ns22000 +++|* = 0 IF TERMINAL OUTPUT FILE. 01846 M01S00094.ns22000 +++|* 01847 M01S00095.ns22000 +++|* USES X - 2, 6. 01848 M01S00096.ns22000 +++|* A - 6. 01849 M01S00097.ns22000 +++|* 01850 M01S00098.ns22000 +++|* CALLS STF. 01851 M01S00099.ns22000 +++|* 01852 M01S00100.ns22000 +++|* MACROS GETPP. 01853 M01S00101.ns22000 +++| 01854 M01S00102.ns22000 +++| 01855 M01S00103.ns22000 +++| IPP SUBR ENTRY/EXIT 01856 M01S00104.ns22000 +++| GETPP IPPA,LL,PD 01857 M01S00105.ns22000 +++| SX2 O OUTPUT FILE FET ADDRESS 01858 M01S00106.ns22000 +++| RJ STF SET TERMINAL FILE 01859 M01S00107.ns22000 +++| NZ X6,IPPX IF NOT TERMINAL FILE 01860 M01S00108.ns22000 +++| SA6 PD 01861 M01S00109.ns22000 +++| EQ IPPX RETURN 01862 M01S00110.ns22000 +++| 01863 M01S00111.ns22000 +++| IPPA BSS 2 *GETPP* RESPONSE BLOCK 01864 M00S01658.kronref +++| LSS SPACE 4,10 01865 M00S01659.kronref +++|** LSS - LOAD SYSTEMS SYMBOLS. 01866 M00S01660.kronref +++|* 01867 M00S01661.kronref +++|* USES X - 0, 1, 2, 3, 4, 6, 7. 01868 M00S01662.kronref +++|* A - 0, 1, 2, 3, 4, 6, 7. 01869 M00S01663.kronref +++|* B - 2, 3, 4, 5, 6, 7. 01870 M00S01664.kronref +++|* 01871 M00S01665.kronref +++|* CALLS ATS, SFN. 01872 M00S01666.kronref +++|* 01873 M00S01667.kronref +++|* MACROS ALLOC, OVERLAY, VERSION. 01874 M00S01668.kronref +++| 01875 M00S01669.kronref +++| 01876 M00S01670.kronref +++| LSS SUBR ENTRY/EXIT 01877 M00S01671.kronref +++| SA1 LSSB CHECK TEXT FROM LOCAL FILE 01878 M00S01672.kronref +++| ZR X1,LSS1 IF TEXT FROM SYSTEM 01879 M00S01673.kronref +++| RJ SFN SET TEXT NAME 01880 M00S01674.kronref +++| SA6 TX SET SYSTEXT PRESENT 01881 M00S01675.kronref +++| SA6 TXNM 01882 M00S01676.kronref +++| OVERLAY LSSB,101B,,MTBS LOAD TEXT 01883 M00S01677.kronref +++| JP LSS2 NO SYSTEM TEXT 01884 M00S01678.kronref +++| 01885 M00S01679.kronref +++| LSS1 SA1 LSSA SET TEXT NAME 01886 M00S01680.kronref +++| ZR X1,LSSX IF S=0 01887 M00S01681.kronref +++| RJ SFN 01888 M00S01682.kronref +++| SA6 TX SET SYSTEXT PRESENT 01889 M00S01683.kronref +++| SA6 TXNM 01890 M00S01684.kronref +++| VERSION LSSC 01891 M00S01685.kronref +++| OVERLAY LSSA,101B,SYSTEM,MTBS LOAD TEXT
| Line S01686 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01892 M01S01686.ns22000 ---| LSS2 SA0 =C* NO SYSTEM TEXT FOUND.* 01893 M01S01687.ns22000 ---| LX1 59-36 01894 M01S01688.ns22000 ---| MX0 42 01895 M01S01689.ns22000 ---| NG X1,ABT
| Line S00112 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01896 M01S00112.ns22000 +++| LSS2 MX0 42 01897 M00S01690.kronref +++| SA0 =C* ERROR IN SYSTEM TEXT.* 01898 M00S01691.kronref +++| SA1 MTBS+1 CHECK FIRST WORD OF TEXT 01899 M00S01692.kronref +++| BX6 X0*X1 01900 M00S01693.kronref +++| NZ X6,ABT 01901 M00S01694.kronref +++| SA1 65B SET TEMPORARY LENGTH OF TREF 01902 M00S01695.kronref +++| SA2 FTAB+FTABL 01903 M00S01696.kronref +++| SX6 X1 01904 M00S01697.kronref +++| IX7 X2+X6 01905 M00S01698.kronref +++| SA6 L.TREF 01906 M00S01699.kronref +++| SA7 A2 01907 M00S01700.kronref +++| SA1 MTBS+1 ALLOCATE NAME TABLE 01908 M00S01701.kronref +++| ALLOC TNME,X1 01909 M00S01702.kronref +++| SA0 =C* ERROR IN SYSTEM TEXT.* 01910 M00S01703.kronref +++| ZR X3,ABT ABORT IF NO SYMBOLS 01911 M00S01704.kronref +++| SX6 0 CLEAR REFERENCE LENGTH 01912 M00S01705.kronref +++| SA6 L.TREF 01913 M00S01706.kronref +++| 01914 M00S01707.kronref +++|* SORT SYMBOLS BY VALUE. 01915 M00S01708.kronref +++| 01916 M00S01709.kronref +++| SA1 F.TREF (A0) = FWA - 1 01917 M00S01710.kronref +++| SB7 X3 N = LENGTH 01918 M00S01711.kronref +++| SA0 X1+1 01919 M00S01712.kronref +++| SB6 B7 M = N 01920 M00S01713.kronref +++| LSS3 SX6 B6 M = M/2 01921 M00S01714.kronref +++| AX6 2 01922 M00S01715.kronref +++| LX6 1 01923 M00S01716.kronref +++| SB6 X6 01924 M00S01717.kronref +++| SB3 B1+B1 J = 1 01925 M00S01718.kronref +++| ZR B6,LSS6 IF M = 0 01926 M00S01719.kronref +++| SB4 B7-B6 K = N-M 01927 M00S01720.kronref +++| SB2 B3 01928 M00S01721.kronref +++| LSS4 SB5 B2+B6 L = I + M 01929 M00S01722.kronref +++| SA1 A0+B2 A(I) 01930 M00S01723.kronref +++| SA2 A0+B5 A(L) 01931 M00S01724.kronref +++| IX6 X2-X1 01932 M00S01725.kronref +++| PL X6,LSS5 IF A(L) .GE. A(I) 01933 M00S01726.kronref +++| SA3 A1-B1 INTERCHANGE A(L) AND A(I) 01934 M00S01727.kronref +++| SA4 A2-B1 01935 M00S01728.kronref +++| BX6 X1 01936 M00S01729.kronref +++| LX7 X2 01937 M00S01730.kronref +++| SA6 A2 01938 M00S01731.kronref +++| SA7 A1 01939 M00S01732.kronref +++| BX6 X3 01940 M00S01733.kronref +++| BX7 X4 01941 M00S01734.kronref +++| SA6 A4 01942 M00S01735.kronref +++| SA7 A3 01943 M00S01736.kronref +++| SB2 B2-B6 I = I-M 01944 M00S01737.kronref +++| GT B2,LSS4 IF I .GT. 0 01945 M00S01738.kronref +++| LSS5 SB3 B3+2 J = J + 1 01946 M00S01739.kronref +++| SB2 B3 01947 M00S01740.kronref +++| LE B3,B4,LSS4 IF J = K 01948 M00S01741.kronref +++| EQ LSS3 LOOP 01949 M00S01742.kronref +++| 01950 M00S01743.kronref +++| LSS6 SA1 F.TREF COPY SYMBOLS 01951 M00S01744.kronref +++| SA2 F.TNME 01952 M00S01745.kronref +++| SX7 B7 SET SYSTEM SYMBOLS LENGTH 01953 M00S01746.kronref +++| SA3 X1+2 01954 M00S01747.kronref +++| SA4 A3+B1 01955 M00S01748.kronref +++| SA7 SL 01956 M00S01749.kronref +++| BX6 X3 01957 M00S01750.kronref +++| LX7 X4 01958 M00S01751.kronref +++| SA6 X2
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/kronref.txt · Last modified: (external edit)