cdc:nos2.source:opl.opl871:deck:libedit
Deck LIBEDIT
Library Member Format: MODIFY
Listing Sections
- Deck LIBEDIT Start
- Deck LIBEDIT Part 1 (Line 1722)
- Deck LIBEDIT Part 2 (Line 3692)
Source
Seq # *Modification Id* Act ----------------------------+
| Line S00001 Modification History | |
|---|---|
M01 (Removed by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.libed6 ---| IDENT LIBEDIT,LIB
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00002 M01S00001.libed6 +++| IDENT LIBEDIT,LIBEDIT,LIBEDIT 00003 M00S00002.libedit +++| ABS 00004 M00S00003.libedit +++| ENTRY LIBEDIT 00005 M00S00004.libedit +++| ENTRY SSM= 00006 M00S00005.libedit +++| ENTRY MFL= 00007 M00S00006.libedit +++| SYSCOM B1 00008 M00S00007.libedit +++|*COMMENT LIBEDIT - LIBRARY EDITING PROGRAM.
| Line S00008 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00009 M01S00008.281l803 ---|* COMMENT COPYRIGHT CONTROL DATA CORP. ,1971.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00010 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00011 M00S00009.libedit +++| TITLE LIBEDIT - LIBRARY EDITING PROGRAM. 00012 M00S00010.libedit +++| SPACE 4 00013 M00S00011.libedit +++|*** LIBEDIT - LIBRARY EDITING PROGRAM. 00014 M00S00012.libedit +++|* D. A. CAHLANDER. 69/02/13. 00015 M00S00013.libedit +++|* P. D. HAAS. 73/07/29. 00016 M00S00014.libedit +++| SPACE 4,10 00017 M00S00015.libedit +++|*** LIBEDIT PROVIDES EDITING AND REPLACEMENT OF RECORDS ON 00018 M00S00016.libedit +++|* A BINARY FILE BY RECORDS FROM ONE OR MORE SECONDARY FILES. 00019 M00S00017.libedit +++| SPACE 4
| Line S00018 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00020 M01S00018.v23l617 ---|*** CONTROL STATEMENT CALL -
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00021 M01S00001.v23l617 +++|*** COMMAND CALL - 00022 M00S00019.libedit +++|* 00023 M00S00020.libedit +++|* LIBEDIT(P1,P2,P3,P4,.....,PN) 00024 M00S00021.libedit +++|* 00025 M00S00022.libedit +++|* WHERE PARAMETER KEYWORDS ARE ORDER INDEPENDENT, 00026 M00S00023.libedit +++|* AND ARE ONE OR MORE OF THE FOLLOWING - 00027 M00S00024.libedit +++|* 00028 M00S00025.libedit +++|* I OMITTED, USE *INPUT* FOR INPUT DIRECTIVES FILE. 00029 M00S00026.libedit +++|* I , USE *INPUT* FOR INPUT DIRECTIVES FILE. 00030 M00S00027.libedit +++|* I=0 , NO INPUT DIRECTIVE FILE IS TO BE USED. 00031 M00S00028.libedit +++|* I=FN , USE *FN* FOR INPUT DIRECTIVES FILE. 00032 M00S00029.libedit +++|* 00033 M00S00030.libedit +++|* P OMITTED, USE *OLD* FOR OLD FILE. 00034 M00S00031.libedit +++|* P , USE *OLD* FOR OLD FILE. 00035 M00S00032.libedit +++|* P=0 , NO OLD FILE TO BE USED. 00036 M00S00033.libedit +++|* P=FN , USE *FN* FOR OLD FILE. 00037 M00S00034.libedit +++|* 00038 M00S00035.libedit +++|* N OMITTED, USE *NEW* FOR NEW FILE. 00039 M00S00036.libedit +++|* N , USE *NEW* FOR NEW FILE. 00040 M00S00037.libedit +++|* N=FN , USE *FN* FOR NEW FILE. 00041 M00S00038.libedit +++|* 00042 M00S00039.libedit +++|* B OMITTED, USE *LGO* FOR CORRECTION FILE. 00043 M00S00040.libedit +++|* B , USE *LGO* FOR CORRECTION FILE. 00044 M00S00041.libedit +++|* B=0 , NO CORRECTION FILE TO BE USED. 00045 M00S00042.libedit +++|* B=FN , USE *FN* FOR CORRECTION FILE. 00046 M00S00043.libedit +++|* 00047 M00S00044.libedit +++|* L OMITTED, USE *OUTPUT* FOR LISTING FILE. 00048 M00S00045.libedit +++|* L , USE *OUTPUT* FOR LISTING FILE. 00049 M00S00046.libedit +++|* L=0 , NO LISTING FILE TO BE WRITTEN. 00050 M00S00047.libedit +++|* L=FN , USE *FN* FOR LISTING FILE. 00051 M00S00048.libedit +++|* 00052 M00S00049.libedit +++|* LO=E , LIST PROCESSING ERRORS. 00053 M00S00050.libedit +++|* LO=C , LIST INPUT DIRECTIVES. 00054 M00S00051.libedit +++|* LO=M , LIST MODIFICATIONS MADE. 00055 M00S00052.libedit +++|* LO=N , LIST RECORDS WRITTEN TO NEW FILE. 00056 M00S00053.libedit +++|* LO=F , FULL LIST INCLUDING PROCESSING ERRORS, INPUT 00057 M00S00054.libedit +++|* DIRECTIVES, MODIFICATIONS MADE AND RECORDS 00058 M00S00055.libedit +++|* WRITTEN TO NEW FILE. 00059 M00S00056.libedit +++|* (NOTE - ANY COMBINATION MAY BE SPECIFIED FOR *LO*.) 00060 M00S00057.libedit +++|* 00061 M00S00058.libedit +++|* LO OMITTED --- 00062 M00S00059.libedit +++|* LO=EM , TIME SHARING JOB, LISTING FILE ASSIGNED 00063 M00S00060.libedit +++|* TO EQUIPMENT *TT*. 00064 M00S00061.libedit +++|* LO=ECF , ALL OTHER CASES. 00065 M00S00062.libedit +++|* 00066 M00S00063.libedit +++|* U OMITTED, NO USER LIBRARY TO BE GENERATED. 00067 M00S00064.libedit +++|* U , GENERATE USER LIBRARY *ULIB* ON FILE *NEW*. 00068 M00S00065.libedit +++|* U=0 , NO USER LIBRARY TO BE GENERATED. 00069 M00S00066.libedit +++|* U=LN , GENERATE USER LIBRARY *LN* ON FILE *NEW*. 00070 M00S00067.libedit +++|* (NOTE - *LIBGEN* IS CALLED TO GENERATE USER LIBRARY.) 00071 M00S00068.libedit +++|* 00072 M00S00069.libedit +++|* NX OMITTED, PASS *NX=0* TO *LIBGEN*. 00073 M00S00070.libedit +++|* NX , PASS *NX=1* TO *LIBGEN*. 00074 M00S00071.libedit +++|* NX=0 , PASS *NX=0* TO *LIBGEN*. 00075 M00S00072.libedit +++|* NX=N , PASS *NX=N* TO *LIBGEN*. 00076 M00S00073.libedit +++|* 00077 M00S00074.libedit +++|* C OMITTED, DO NOT RECOPY NEW FILE TO OLD FILE. 00078 M00S00075.libedit +++|* C , RECOPY NEW FILE TO OLD FILE AFTER EDITING. 00079 M00S00076.libedit +++|* 00080 M00S00077.libedit +++|* D , SAME AS *NA* (INCLUDED FOR UPWARD COMPATABILITY). 00081 M00S00078.libedit +++|* 00082 M00S00079.libedit +++|* V OMITTED, DO NOT VERIFY OLD FILE AGAINST NEW FILE. 00083 M00S00080.libedit +++|* V , VERIFY NEW FILE AGAINST NEW FILE. 00084 M00S00081.libedit +++|* (NOTE - *VFYLIB* IS CALLED TO PERFORM THE VERIFY.) 00085 M00S00082.libedit +++|* 00086 M00S00083.libedit +++|* NA OMITTED, ABORT ON DIRECTIVE ERRORS. 00087 M00S00084.libedit +++|* NA , DO NOT ABORT ON DIRECTIVE ERRORS. 00088 M00S00085.libedit +++|* (NOTE - TIME SHARING JOBS WITH DIRECTIVE INPUT FILE 00089 M00S00086.libedit +++|* ASSIGNED TO *TT* SET *NA* AUTOMATICALLY.) 00090 M00S00087.libedit +++|* 00091 M00S00088.libedit +++|* NI OMITTED, INSERT NEW RECORDS FROM CORRECTION FILE AT EOF. 00092 M00S00089.libedit +++|* NI , DO NOT INSERT NEW RECORDS AT EOF. 00093 M00S00090.libedit +++|* (NOTE - ONLY THOSE RECORDS NOT RERERENCED BY ANY DIRECTIVE 00094 M00S00091.libedit +++|* ARE ADDED AT EOF. ANY DIRECTIVE SUCH AS *INSERT 00095 M00S00092.libedit +++|* *NOREP, OR *IGNORE TAKES PRECEDENCE. 00096 M00S00093.libedit +++|* 00097 M00S00094.libedit +++|* NR OMITTED, REWIND *OLD* AND *NEW* BEFORE AND AFTER EDITING. 00098 M00S00095.libedit +++|* NR , DO NOT REWIND *OLD* OR *NEW* FILES. 00099 M00S00096.libedit +++|*
| Line S00097 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00100 M01S00097.v23l617 ---|* Z OMITTED, NO DIRECTIVE INPUT ON CONTROL STATEMENT. 00101 M01S00098.v23l617 ---|* Z , GET DIRECTIVE INPUT FROM CONTROL STATEMENT.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00102 M01S00002.v23l617 +++|* Z OMITTED, NO DIRECTIVE INPUT ON COMMAND. 00103 M01S00003.v23l617 +++|* Z , GET DIRECTIVE INPUT FROM COMMAND. 00104 M00S00099.libedit +++|* (NOTE - *Z* PARAMETER WILL OVERRIDE *I* PARAMETER.) 00105 M00S00100.libedit +++|* 00106 M00S00101.libedit +++|* 00107 M00S00102.libedit +++|* SINCE THE *U* AND *V* OPTIONS ARE PERFORMED BY LOADING 00108 M00S00103.libedit +++|* DIFFERENT UTILITIES, IF BOTH ARE SPECIFIED, *U* WILL 00109 M00S00104.libedit +++|* TAKE PRECEDENCE. 00110 M00S00105.libedit +++| SPACE 4,10 00111 M00S00106.libedit +++|*** DAYFILE MESSAGES. 00112 M00S00107.libedit +++|* 00113 M00S00108.libedit +++|* * DIRECTIVE ERRORS.* = A *LIBEDIT* DIRECTIVE HAS INCORRECT 00114 M00S00109.libedit +++|* SYNTAX. 00115 M00S00110.libedit +++|* 00116 M00S00111.libedit +++|* * EDITING COMPLETE.* = INFORMATIVE MESSAGE INDICATING THAT 00117 M00S00112.libedit +++|* THE LIBRARY EDITING HAS COMPLETED. 00118 M00S00113.libedit +++|* 00119 M00S00114.libedit +++|* * FILE NAME CONFLICT.* = THE SAME FILE NAME HAS BEEN 00120 M00S00115.libedit +++|* SPECIFIED FOR MORE THAN ONE PARAMETER. 00121 M00S00116.libedit +++|* 00122 M00S00117.libedit +++|* * FILENAM NOT DECLARED NRANDOM.* = AN EOF WAS ENCOUNTERED 00123 M00S00118.libedit +++|* ON THE NONRANDOM FILE, FILENAM. 00124 M00S00119.libedit +++|*
| Line S00120 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00125 M01S00120.v23l617 ---|* * ILLEGAL DEVICE TYPE - LFN.* = A NON-MASS STORAGE FILE WAS 00126 M01S00121.v23l617 ---|* ILLEGALLY SPECIFIED AS EITHER THE OLD FILE OR THE
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00127 M01S00004.v23l617 +++|* * INCORRECT DEVICE TYPE - LFN.* = A NON-MASS STORAGE FILE WAS 00128 M01S00005.v23l617 +++|* INCORRECTLY SPECIFIED AS EITHER THE OLD FILE OR THE 00129 M00S00122.libedit +++|* CORRECTION FILE. 00130 M00S00123.libedit +++|*
| Line S00124 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00131 M01S00124.v23l617 ---|* * LIBEDIT ARGUMENT ERROR(S).* = THE *LIBEDIT* CONTROL 00132 M01S00125.v23l617 ---|* STATEMENT CONTAINS AN INCORRECT PARAMETER.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00133 M01S00006.v23l617 +++|* * LIBEDIT ARGUMENT ERROR(S).* = THE *LIBEDIT* COMMAND 00134 M01S00007.v23l617 +++|* CONTAINS AN INCORRECT PARAMETER. 00135 M00S00126.libedit +++|*
| Line S00127 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00136 M01S00127.v23l617 ---|* * LIST OPTION ERROR.* = AN ILLEGAL OPTION WAS SPECIFIED
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00137 M01S00008.v23l617 +++|* * LIST OPTION ERROR.* = AN INCORRECT OPTION WAS SPECIFIED 00138 M00S00128.libedit +++|* FOR THE *LO* PARAMETER. 00139 M00S00129.libedit +++|* 00140 M00S00130.libedit +++|* * N DIRECTIVE ERRORS.* = *LIBEDIT* COULD NOT INTERPRET 00141 M00S00131.libedit +++|* N NUMBER OF DIRECTIVES. 00142 M00S00132.libedit +++|* 00143 M00S00133.libedit +++|* * N RECORDS NOT REPLACED.* = AN INFORMATIVE MESSAGE. 00144 M00S00134.libedit +++|* *LIBEDIT* ENCOUNTERED N NUMBER OF RECORDS ON A 00145 M00S00135.libedit +++|* REPLACEMENT FILE THAT WERE NOT NAMED IN THE DIRECTIVES 00146 M00S00136.libedit +++|* AND DID NOT REPLACE OLD FILE RECORDS. 00147 M00S00137.libedit +++|*
| Line S00138 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00148 M01S00138.v23l617 ---|* * NO NEW FILE.* = N=0 WAS ILLEGALLY SPECIFIED FOR THE
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00149 M01S00009.v23l617 +++|* * NO NEW FILE.* = N=0 WAS INCORRECTLY SPECIFIED FOR THE 00150 M00S00139.libedit +++|* *N* PARAMETER. 00151 M00S00140.libedit +++|* 00152 M00S00141.libedit +++|* * OVERLAPPING INSERT OR DELETE.* = *LIBEDIT* ENCOUNTERED AN 00153 M00S00142.libedit +++|* OVERLAP IN THE RECORD NAMES SPECIFIED IN THE 00154 M00S00143.libedit +++|* DIRECTIVES. 00155 M00S00144.libedit +++|*
| Line S00145 Modification History | |
|---|---|
M01 (Removed by) | libed2 |
Seq # *Modification Id* Act ----------------------------+ 00156 M01S00145.libed2 ---|* * RENAME OF PROC TYPE NOT ALLOWED.* = ATTEMPT TO RENAME 00157 M01S00146.libed2 ---|* A PROC TYPE RECORD WAS NOT ALLOWED.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | libed2 |
Seq # *Modification Id* Act ----------------------------+ 00158 M01S00001.libed2 +++|* * RENAME NOT ALLOWED FOR PROC OR TEXT RECORD.* = ATTEMPT TO 00159 M01S00002.libed2 +++|* RENAME A PROC OR TEXT TYPE RECORD WAS NOT ALLOWED. 00160 M00S00147.libedit +++|* 00161 M00S00148.libedit +++|* * REQUIRED FL EXCEEDS VALIDATED LIMIT.* = THE JOB FIELD 00162 M00S00149.libedit +++|* LENGTH REQUIRED FOR *LIBEDIT* IS GREATER THAN THE 00163 M00S00150.libedit +++|* MAXIMUM FOR WHICH THE USER IS VALIDATED. 00164 M00S00151.libedit +++|* 00165 M00S00152.libedit +++| SPACE 4 00166 M00S00153.libedit +++|**** ASSEMBLY CONSTANTS. 00167 M00S00154.libedit +++| 00168 M00S00155.libedit +++|
| Line S00156 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00169 M01S00156.274l797 ---| BUFL EQU 1000B MINIMUM BUFFER REQUIRED
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00170 M01S00001.274l797 +++| BUFL EQU 4020B MINIMUM BUFFER REQUIRED 00171 M00S00157.libedit +++| DCBL EQU 16 DIRECTIVE BUFFER LENGTH 00172 M00S00158.libedit +++| INPL EQU 2010B *INPUT* *CIO* BUFFER LENGTH
| Line S00159 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00173 M01S00159.274l797 ---| LGOL EQU 2010B *LGO* *CIO* BUFFER LENGTH
| Line S00160 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00174 M02S00160.274l797 ---| LNCNT EQU LINP NUMBER OF LINES/PAGE
| Line S00161 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00175 M01S00161.274l797 ---| NEWL EQU 10021B *NEW* *CIO* BUFFER LENGTH
| Line S00162 Modification History | |
|---|---|
M01 (Removed by) | libed8 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00176 M02S00162.274l797 ---| NLIB EQU 63 NUMBER OF LIBRARIES
| Line S00163 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00177 M01S00163.274l797 ---| OLDL EQU 10021B *OLD* *CIO* BUFFER LENGTH
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00178 M01S00002.274l797 +++| LGOL EQU 10021B *LGO* *CIO* BUFFER LENGTH 00179 M01S00003.274l797 +++| NEWL EQU 20041B *NEW* *CIO* BUFFER LENGTH 00180 M01S00004.274l797 +++| OLDL EQU 20041B *OLD* *CIO* BUFFER LENGTH 00181 M00S00164.libedit +++| OUTL EQU 4020B *OUTPUT* *CIO* BUFFER LENGTH
| Line S00165 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00182 M01S00165.274l797 ---| SBUFL EQU 2010B *SCR* BUFFER LENGTH
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00183 M01S00005.274l797 +++| SBUFL EQU 4020B *SCR* BUFFER LENGTH 00184 M00S00166.libedit +++| TTYL EQU 301B *TTYOUT* *CIO* BUFFER LENGTH 00185 M00S00167.libedit +++| TWIDE EQU 80+1 WIDTH LIMIT FOR TERMINAL OUTPUT 00186 M01S00006.274l797 +++| ODEBL EQU 16 00187 M00S00168.libedit +++| 00188 M00S00169.libedit +++|**** 00189 M00S00170.libedit +++| 00190 M00S00171.libedit +++| 00191 M00S00172.libedit +++|* SPECIAL ENTRY POINT. 00192 M00S00173.libedit +++| 00193 M00S00174.libedit +++| SSM= EQU 0 SUPPRESS DUMPS OF FIELD LENGTH 00194 M00S00175.libedit +++| TITLE INPUT DIRECTIVES. 00195 M00S00176.libedit +++|*** INPUT DIRECTIVES. 00196 M00S00177.libedit +++|* 00197 M00S00178.libedit +++|* ON ALL DIRECTIVE DESCRIPTIONS, THE PARAMETERS ARE - 00198 M00S00179.libedit +++|* FN FILE NAME. 00199 M00S00180.libedit +++|* NAME RECORD NAME. 00200 M00S00181.libedit +++|* N NUMERIC PARAMETER. 00201 M00S00182.libedit +++|* ABCD ALPHANUMERIC PARAMETER. 00202 M00S00183.libedit +++|* TYPE LIBRARY TYPE - (MAY BE ONE OF THE FOLLOWING)
| Line S00184 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00203 M01S00184.251l664 ---|* *PP* PERIPHERAL PROCESSOR PROGRAM. 00204 M01S00185.251l664 ---|* *REL* RELOCATABLE CPU PROGRAM. 00205 M01S00186.251l664 ---|* *OVL* SCOPE CPU OVERLAY PROGRAM. 00206 M01S00187.251l664 ---|* *TEXT* UNRECOGNIZED AS A PROGRAM. 00207 M01S00188.251l664 ---|* *ULIB* USER LIBRARY.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00208 M01S00001.251l664 +++|* *ABS* ABSOLUTE PROGRAM. 00209 M01S00002.251l664 +++|* *CAP* FAST DYNAMIC LOAD CAPSULES. 00210 M00S00189.libedit +++|* *OPL* OLD PROGRAM LIBRARY. 00211 M00S00190.libedit +++|* *OPLC* OLD PROGRAM LIBRARY COMMON DECK. 00212 M00S00191.libedit +++|* *OPLD* OPL DIRECTORY.
| Line S00192 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00213 M01S00192.251l664 ---|* *ABS* ABSOLUTE PROGRAM.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00214 M01S00003.251l664 +++|* *OVL* SCOPE CPU OVERLAY PROGRAM. 00215 M01S00004.251l664 +++|* *PP* PERIPHERAL PROCESSOR PROGRAM. 00216 M01S00005.251l664 +++|* *PPL* 16-BIT PERIPHERAL PROCESSOR PROGRAM. 00217 M00S00193.libedit +++|* *PPU* 7600 PPU PROGRAM.
| Line S00194 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00218 M01S00194.251l664 ---|* *CAP* FAST DYNAMIC LOAD CAPSULES. 00219 M00S00195.libedit ---|* *PROC* PROCEDURE TYPE RECORD.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00220 M01S00006.251l664 +++|* *REL* RELOCATABLE CPU PROGRAM. 00221 M01S00007.251l664 +++|* *TEXT* UNRECOGNIZED AS A PROGRAM. 00222 M01S00008.251l664 +++|* *ULIB* USER LIBRARY. 00223 M00S00196.libedit +++|* 00224 M00S00197.libedit +++|* 00225 M00S00198.libedit +++|* FOR THOSE DIRECTIVES REQUIRING RECORD NAME(S), THE 00226 M00S00199.libedit +++|* FOLLOWING CONVENTIONS ARE USED - 00227 M00S00200.libedit +++|* 00228 M00S00201.libedit +++|* RID RECORD IDENTIFIER 00229 M00S00202.libedit +++|* TYPE/NAME RECORD *NAME* OF TYPE *TYPE*. 00230 M00S00203.libedit +++|* NAME RECORD *NAME*, USING DEFAULT TYPE. 00231 M00S00204.libedit +++|* * EOF (USED ONLY WITH *BEFORE). 00232 M00S00205.libedit +++|* 00233 M00S00206.libedit +++|* GID RECORD GROUP IDENTIFIER 00234 M00S00207.libedit +++|* TYPE/NAME RECORD *NAME* OF TYPE *TYPE*. 00235 M00S00208.libedit +++|* NAME RECORD *NAME*, USING DEFAULT TYPE. 00236 M00S00209.libedit +++|* TYPE1/NAME1- GROUP OF RECORDS STARTING WITH 00237 M00S00210.libedit +++|* TYPE2/NAME2 *RID1* AND ENDING WITH *RID2*. 00238 M00S00211.libedit +++|* TYPE/NAME1- GROUP OF *TYPE* RECORDS STARTING WITH 00239 M00S00212.libedit +++|* NAME2 *NAME1* AND ENDING WITH *NAME2*. 00240 M00S00213.libedit +++|* NAME1-NAME2 GROUP OF DEFAULT TYPE RECORDS STARTING 00241 M00S00214.libedit +++|* WITH *NAME1* AND ENDING WITH *NAME2*. 00242 M00S00215.libedit +++|* TYPE/NAME-* ALL *TYPE* RECORDS STARTING WITH *NAME* 00243 M00S00216.libedit +++|* NAME-* ALL DEFAULT TYPE RECORDS STARTING 00244 M00S00217.libedit +++|* WITH *NAME*. 00245 M00S00218.libedit +++|* TYPE/* ALL RECORDS OF THE SPECIFIED *TYPE*. 00246 M00S00219.libedit +++|* * ALL DEFAULT TYPE RECORDS. 00247 M00S00220.libedit +++|* 0 ZERO LENGTH RECORD (USED ONLY 00248 M00S00221.libedit +++|* WITH *INSERT). 00249 M00S00222.libedit +++|* 00250 M00S00223.libedit +++|* 00251 M00S00224.libedit +++|* DIRECTIVES - 00252 M00S00225.libedit +++|* 00253 M00S00226.libedit +++|* *AFTER RID,GID1,GID2,....GIDN 00254 M00S00227.libedit +++|* *A RID,GID1,GID2,...,GIDN 00255 M00S00228.libedit +++|* *INSERT RID,GID1,GID2,...,GIDN 00256 M00S00229.libedit +++|* *I RID,GID1,GID2,...,GIDN 00257 M00S00230.libedit +++|* INSERT *GID1* THROUGH *GID2* FROM CURRENT CORRECTION 00258 M00S00231.libedit +++|* FILE AFTER *RID* ON FILE *NEW*. 00259 M00S00232.libedit +++|* (NOTE - ANY RECORDS ON *OLD* WITH SAME NAME ARE DELETED.) 00260 M00S00233.libedit +++|* 00261 M00S00234.libedit +++|* *BEFORE RID,GID1,GID2,...,GIDN 00262 M00S00235.libedit +++|* *B RID,GID1,GID2,...,GIDN 00263 M00S00236.libedit +++|* INSERT *GID1* THROUGH *GID2* FROM CURRENT CORRECTION 00264 M00S00237.libedit +++|* FILE BEFORE *RID* ON FILE *NEW*. 00265 M00S00238.libedit +++|* (NOTE - ANY RECORDS ON *OLD* WITH SAME NAME ARE DELETED.) 00266 M00S00239.libedit +++|* 00267 M00S00240.libedit +++|* *DELETE GID1,GID2,...,GIDN 00268 M00S00241.libedit +++|* *D GID1,GID2,...,GIDN 00269 M00S00242.libedit +++|* DELETE *GID1* THROUGH *GIDN*. 00270 M00S00243.libedit +++|* 00271 M00S00244.libedit +++|* *NAME TYPE 00272 M00S00245.libedit +++|* *TYPE TYPE 00273 M00S00246.libedit +++|* CHANGE DEFAULT RECORD TYPE TO *TYPE*. 00274 M00S00247.libedit +++|* 00275 M00S00248.libedit +++|* *ADD LIB,GID1,GID2,...,GIDN. 00276 M00S00249.libedit +++|* ADD *GID1* THROUGH *GIDN* AT END OF LIBRARY *LIB*. 00277 M00S00250.libedit +++|* *LIB* CAN BE ANY OF THE FOLLOWING - 00278 M00S00251.libedit +++|* 1. *DDS* DEADSTART LIBRARY. 00279 M00S00252.libedit +++|* 2. *MOV* MONITOR OVERLAY. 00280 M00S00253.libedit +++|* 3. *RPL* RESIDENT PERIPHERAL OVERLAY. 00281 M00S00254.libedit +++|* 4. *RSL* RESIDENT *SCOPE* LIBRARY. 00282 M00S00255.libedit +++|* 5. *SLD* *SCOPE* LIBRARY DIRECTORY.
| Line S00256 Modification History | |
|---|---|
M01 (Removed by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 00283 M01S00256.libed8 ---|* 6. ANY NAME FROM *LIB1* TO *LIB63*.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 00284 M01S00001.libed8 +++|* 6. ANY NAME FROM *LIB1* TO *LIB9999*. 00285 M00S00257.libedit +++|* (A LIBRARY IS DEFINED AS A GROUP OF RECORDS 00286 M00S00258.libedit +++|* TERMINATED BY A ZERO-LENGTH RECORD.) 00287 M00S00259.libedit +++|* 00288 M00S00260.libedit +++|* *IGNORE GID1,GID2,...,GIDN 00289 M00S00261.libedit +++|* IGNORE *GID1* THROUGH *GIDN* WHEN READING CORRECTION 00290 M00S00262.libedit +++|* FILE(S). THESE RECORDS ARE NOT REPLACED. 00291 M00S00263.libedit +++|* 00292 M00S00264.libedit +++|* *RENAME RID1,RID2 00293 M00S00265.libedit +++|* CHANGE THE NAME OF *RID1* TO *RID2*. 00294 M00S00266.libedit +++|* 00295 M00S00267.libedit +++|* *REPLACE GID1,GID2,...GIDN 00296 M00S00268.libedit +++|* REPLACE ONLY *GID1* THROUGH *GIDN* WHEN READING CORRECTION 00297 M00S00269.libedit +++|* FILE. THE REST OF THE RECORDS ARE IGNORED. 00298 M00S00270.libedit +++|* 00299 M00S00271.libedit +++|* *LIBGEN UN 00300 M00S00272.libedit +++|* CALL *LIBGEN* AT END OF EDITING TO GENERATE USER LIBRARY 00301 M00S00273.libedit +++|* *UN* ON FILE *NEW*. IF *UN* IS OMITTED, 00302 M00S00274.libedit +++|* USE *UN* = *ULIB*. 00303 M00S00275.libedit +++|* (OVERRIDES *U* PARAMETER IF *UN* IS SPECIFIED). 00304 M00S00276.libedit +++|* 00305 M00S00277.libedit +++|* *OLD FN 00306 M00S00278.libedit +++|* USE *FN* AS OLD FILE (OVERRIDES *P* PARAMETER). 00307 M00S00279.libedit +++|* 00308 M00S00280.libedit +++|* *NEW FN 00309 M00S00281.libedit +++|* USE *FN* AS NEW FILE (OVERRIDES *N* PARAMETER). 00310 M00S00282.libedit +++|* 00311 M00S00283.libedit +++|* *LGO FN1,FN2,...,FNN 00312 M00S00284.libedit +++|* *FILE FN1,FN2,...,FNN 00313 M00S00285.libedit +++|* ADD *FN1* THROUGH *FNN* TO LIST OF CORRECTION FILES. 00314 M00S00286.libedit +++|* 00315 M00S00287.libedit +++|* *NOREP FN1,FN2,...,FNN 00316 M00S00288.libedit +++|* DO NOT REPLACE RECORDS FROM FILES *FN1* THROUGH *FNN*. 00317 M00S00289.libedit +++|* 00318 M00S00290.libedit +++|* *REWIND FN1,FN2,...,FNN 00319 M00S00291.libedit +++|* REWIND *FN1* THROUGH *FN2* BEFORE AND AFTER EDITING. 00320 M00S00292.libedit +++|* 00321 M00S00293.libedit +++|* *BUILD ABCD 00322 M00S00294.libedit +++|* BUILD AN *OPLD* INDEX AT THE END OF FILE *NEW*. 00323 M00S00295.libedit +++|* THE NAME GIVEN TO THIS RECORD IS *ABCD*. 00324 M00S00296.libedit +++|* 00325 M00S00297.libedit +++|* *COMMENT RID,ABCD 00326 M00S00298.libedit +++|* ADDS 70 CHARACTER COMMENT *ABCD* TO THE 7700 00327 M00S00299.libedit +++|* TABLE OF *RID* FROM *OLD* OR CORRECTION FILE. 00328 M00S00300.libedit +++|* 00329 M00S00301.libedit +++|* *DATE RID,ABCD 00330 M00S00302.libedit +++|* ADDS THE CURRENT DATE AND 70 CHARACTER COMMENT *ABCD* 00331 M00S00303.libedit +++|* TO THE 7700 TABLE OF *RID* FROM *OLD* OR CORRECTION FILE. 00332 M00S00304.libedit +++|* 00333 M00S00305.libedit +++|* *LIST FN,ABCD 00334 M00S00306.libedit +++|* CHANGES LISTING FILE TO *FN*, AND LIST OPTIONS TO *ABCD* 00335 M00S00307.libedit +++|* (SEE *LO* PARAMETER). IF EITHER PARAMETER IS OMITTED, 00336 M00S00308.libedit +++|* IT IS NOT CHANGED (OVERRIDES *L* AND *LO* PARAMETERS). 00337 M00S00309.libedit +++|* 00338 M00S00310.libedit +++|* *COPY 00339 M00S00311.libedit +++|* COPY *NEW* TO *OLD* AFTER EDITING
| Line S00312 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00340 M01S00312.v23l617 ---|* (EQUIVALENT TO *C* CONTROL STATEMENT PARAMETER).
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00341 M01S00010.v23l617 +++|* (EQUIVALENT TO *C* COMMAND PARAMETER). 00342 M00S00313.libedit +++|* 00343 M00S00314.libedit +++|* *DEBUG 00344 M00S00315.libedit +++|* IGNORE SUBSEQUENT DIRECTIVE ERRORS (EQUIVALENT TO 00345 M00S00316.libedit +++|* *NA* PARAMETER, SET AUTOMATICALLY IF OUTPUT ASSIGNED 00346 M00S00317.libedit +++|* TO EQUIPMENT *TT*. 00347 M00S00318.libedit +++|* 00348 M00S00319.libedit +++|* *NOINS 00349 M00S00320.libedit +++|* DO NOT INSERT UNREPLACEABLE RECORDS AT EOF. 00350 M00S00321.libedit +++|* (EQUIVALENT TO *NI* PARAMETER.) 00351 M00S00322.libedit +++|* 00352 M00S00323.libedit +++|* *NOREW 00353 M00S00324.libedit +++|* DO NOT REWIND *OLD* OR *NEW * FILES. 00354 M00S00325.libedit +++|* (EQUIVALENT TO *NR* PARAMETER) 00355 M00S00326.libedit +++|* 00356 M00S00327.libedit +++|* *VERIFY 00357 M00S00328.libedit +++|* *VFYLIB 00358 M00S00329.libedit +++|* VERIFY *NEW* AGAINST *OLD* AFTER EDITING. 00359 M00S00330.libedit +++|* (EQUIVALENT TO *V* PARAMETER, USES *VFYLIB*.) 00360 M00S00331.libedit +++|*
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | libed7 |
Seq # *Modification Id* Act ----------------------------+ 00361 M01S00001.libed7 +++|* */ TEXT 00362 M01S00002.libed7 +++|* COMMENT CARD, *TEXT* IS COPIED TO LISTING FILE. 00363 M01S00003.libed7 +++|* 00364 M00S00332.libedit +++|* 00365 M00S00333.libedit +++|* 00366 M00S00334.libedit +++|* CARDS WITHOUT AN *** IN COLUMN 1 ARE TREATED AS A CONTINUATION 00367 M00S00335.libedit +++|* OF THE PREVIOUS CARD. IF NO CARD PRECEEDS THIS CARD, 00368 M00S00336.libedit +++|* (*BEFORE *,LIB/PN) IS ASSUMED. 00369 M00S00337.libedit +++| TITLE TABLE STRUCTURE. 00370 M00S00338.libedit +++|** TABLE STRUCTURE. 00371 M00S00339.libedit +++|* ALL TABLES ARE VARIABLE LENGTH, MANAGED TABLES. POINTERS 00372 M00S00340.libedit +++|* TO THE TABLE ABC ARE 00373 M00S00341.libedit +++|* P.ABC = FWA OF TABLE ABC. 00374 M00S00342.libedit +++|* L.ABC = LENGTH OF TABLE ABC. 00375 M00S00343.libedit +++|* N.ABC = NUMBER OF WORDS/ENTRY. 00376 M00S00344.libedit +++|* D.ABC = NUMBER OF WORDS THE LENGTH OF TABLE IS 00377 M00S00345.libedit +++|* INCREASED IF TABLE IS FULL. 00378 M00S00346.libedit +++|* 00379 M00S00347.libedit +++|* FNT - NAME TABLE. 00380 M00S00348.libedit +++|* 42/FILE,18/RANDOM 00381 M00S00349.libedit +++|* 1. FILE = FILE NAME LEFT JUSTIFIED 00382 M00S00350.libedit +++|* 2. RANDOM = 0 IF FILE IS RANDOM. 00383 M00S00351.libedit +++|* RANDOM = CURRENT POSITION IF FILE IS NON RANDOM. 00384 M00S00352.libedit +++|* 00385 M00S00353.libedit +++|* PNT - PROGRAM NAME TABLE. 00386 M00S00354.libedit +++|* 00387 M00S00355.libedit +++|* 42/PROGRAM,18/TYPE 00388 M00S00356.libedit +++|* 42/FILE,18/0 00389 M00S00357.libedit +++|* 60/POSITION 00390 M00S00358.libedit +++|* 1. PROGRAM = PROGRAM NAME LEFT JUSTIFIED. 00391 M00S00359.libedit +++|* 2. TYPE = PROGRAM TYPE. 00392 M00S00360.libedit +++|* 0 = *TEXT* 00393 M00S00361.libedit +++|* 1 = *PP* 00394 M00S00362.libedit +++|* 3 = *REL* RELOCATABLE 00395 M00S00363.libedit +++|* 4 = *OVL* OVERLAY 00396 M00S00364.libedit +++|* 5 = *ULIB* USER LIBRARY 00397 M00S00365.libedit +++|* 6 = *OPL* OLD PROGRAM LIBRARY 00398 M00S00366.libedit +++|* 7 = *OPLC* OLD PROGRAM LIBRARY COMMON DECK 00399 M00S00367.libedit +++|* 8 = *OPLD* OPL DIRECTORY 00400 M00S00368.libedit +++|* 9 = *ABS* ABSOLUTE PROGRAM
| Line S00369 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00401 M01S00369.251l664 ---|* 0 = *PPU* 7600 PPU PROGRAM 00402 M01S00370.251l664 ---|* 4 = *CAP* FAST DYNAMIC LOAD CAPSULES 00403 M01S00371.251l664 ---|* 6 = *PROC* PROCEDURE TYPE RECORDS
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00404 M01S00009.251l664 +++|* 10 = *PPU* 7600 PPU PROGRAM 00405 M01S00010.251l664 +++|* 14 = *CAP* FAST DYNAMIC LOAD CAPSULE 00406 M01S00011.251l664 +++|* 16 = *PROC* PROCEDURE TYPE RECORD 00407 M01S00012.251l664 +++|* 20 = *PPL* 16-BIT PP PROGRAM 00408 M00S00372.libedit +++|* 3. FILE = CORRECTION FILE NAME. 00409 M00S00373.libedit +++|* 4. POSITION = RANDOM INDEX. 00410 M00S00374.libedit +++|* 00411 M00S00375.libedit +++|* DPT - DELETE PROGRAM TABLE. 00412 M00S00376.libedit +++|* 00413 M00S00377.libedit +++|* 42/PROGRAM1,6/IP,12/TYPE 00414 M00S00378.libedit +++|* 42/PROGRAM2,6/0,12/TYPE 00415 M00S00379.libedit +++|* 1. PROGRAM1 = START OF DELETE. 00416 M00S00380.libedit +++|* 2. PROGRAM2 = END OF DELETE. 00417 M00S00381.libedit +++|* 3. IP = 0, IF DELETE NOT IN PROGRESS. 00418 M00S00382.libedit +++|* = 1, IF DELETE IN PROGRESS. 00419 M00S00383.libedit +++|* 00420 M00S00384.libedit +++|* IDT - IMPLIED DELETE TABLE. 00421 M00S00385.libedit +++|* 00422 M00S00386.libedit +++|* 42/PROGRAM, 18/TYPE 00423 M00S00387.libedit +++|* 42/FILE,18/0 00424 M00S00388.libedit +++|* 1. PROGRAM = PROGRAM DELETED IF PRESENT. 00425 M00S00389.libedit +++|* 2. TYPE = PROGRAM TYPE. 00426 M00S00390.libedit +++|* 3. FILE = CORRECTION FILE NAME. 00427 M00S00391.libedit +++|* 00428 M00S00392.libedit +++|* PIT - PROGRAM IGNORE TABLE. 00429 M00S00393.libedit +++|* 00430 M00S00394.libedit +++|* 42/FILE,18/0 00431 M00S00395.libedit +++|* 42/PROGRAM1,18/TYPE1 00432 M00S00396.libedit +++|* 42/PROGRAM2,18/TYPE2 00433 M00S00397.libedit +++|* 1. FILE = FILE NAME LEFT JUSTIFIED. 00434 M00S00398.libedit +++|* 2. PROGRAM1 = START OF IGNORE. 00435 M00S00399.libedit +++|* 3. PROGRAM2 = END OF IGNORE. 00436 M00S00400.libedit +++|* 00437 M00S00401.libedit +++|* 00438 M00S00402.libedit +++|* RFT - REWIND FILE TABLE. 00439 M00S00403.libedit +++|* 00440 M00S00404.libedit +++|* 42/FILE,18/0 00441 M00S00405.libedit +++|* 1. FILE = FILE NAME LEFT JUSTIFIED. 00442 M00S00406.libedit +++|* 00443 M00S00407.libedit +++|* 00444 M00S00408.libedit +++|* IPT - INSERT PROGRAM TABLE. 00445 M00S00409.libedit +++|* 00446 M00S00410.libedit +++|* 42/PROG1,1/BEFORE,17/TYPE1 00447 M00S00411.libedit +++|* 42/FILE,18/0 00448 M00S00412.libedit +++|* 42/PROG2,18/TYPE2 00449 M00S00413.libedit +++|* 42/PROG3,18/TYPE3 00450 M00S00414.libedit +++|* 1. PROG1 = PROGRAM NAME ON FILE *OLD*. 00451 M00S00415.libedit +++|* PROG1 = LIBRARY NUMBER OF FILE *OLD*. 00452 M00S00416.libedit +++|* 2. BEFORE = 0 IF INSERT AFTER PROG1. 00453 M00S00417.libedit +++|* BEFORE = 1 IF INSERT BEFORE PROG1. 00454 M00S00418.libedit +++|* 3. FILE = CORRECTION FILE NAME. 00455 M00S00419.libedit +++|* 4. PROG2 = PROGRAM NAME FOR START OF INSERT. 00456 M00S00420.libedit +++|* 5. PROG3 = PROGRAM NAME FOR END OF INSERT. 00457 M00S00421.libedit +++|* 00458 M00S00422.libedit +++|* 00459 M00S00423.libedit +++|* CDT - COMMENT AND DATE TABLE. 00460 M00S00424.libedit +++|* 00461 M00S00425.libedit +++|* 42/PROGRAM,1/DATE,17/TYPE 00462 M00S00426.libedit +++|* 60/COMMENT TEXT 00463 M00S00427.libedit +++|* 60/COMMENT TEXT 00464 M00S00428.libedit +++|* 60/COMMENT TEXT 00465 M00S00429.libedit +++|* 60/COMMENT TEXT 00466 M00S00430.libedit +++|* 60/COMMENT TEXT 00467 M00S00431.libedit +++|* 60/COMMENT TEXT 00468 M00S00432.libedit +++|* 60/COMMENT TEXT 00469 M00S00433.libedit +++|* 1. PROGRAM = PROGRAM NAME ON FILE *NEW*. 00470 M00S00434.libedit +++|* 2. DATE = 1 IF DATE IS INSERTED IN 7700 TABLE. 00471 M00S00435.libedit +++|* 3. COMMENT TEXT = 70-CHARACTERS OF TEXT. 00472 M00S00436.libedit +++|* 00473 M00S00437.libedit +++|* 00474 M00S00438.libedit +++|* NRT - NO REPLACE TABLE. 00475 M00S00439.libedit +++|* 00476 M00S00440.libedit +++|* 42/FILE,18/0 00477 M00S00441.libedit +++|* 1. FILE = FILE NAME LEFT JUSTIFIED. 00478 M00S00442.libedit +++|* 00479 M00S00443.libedit +++|* 00480 M00S00444.libedit +++|* NPT - NEW PROGRAM TABLE. 00481 M00S00445.libedit +++|* 00482 M00S00446.libedit +++|* 42/PROGRAM,18/TYPE 00483 M00S00447.libedit +++|* 60/POSITION 00484 M00S00448.libedit +++|* 1. PROGRAM = PROGRAM NAME. 00485 M00S00449.libedit +++|* 2. TYPE = PROGRAM TYPE. 00486 M00S00450.libedit +++|* 3. POSITION = RANDOM FILE INDEX. 00487 M00S00451.libedit +++|* 00488 M00S00452.libedit +++|* 00489 M00S00453.libedit +++|* RNT - RENAME TABLE. 00490 M00S00454.libedit +++|* 00491 M00S00455.libedit +++|* 42/PROG1,18/TYPE1 00492 M00S00456.libedit +++|* 42/PROG2,18/TYPE2 00493 M00S00457.libedit +++|* 1. PROG1 = OLD PROGRAM NAME. 00494 M00S00458.libedit +++|* 2. PROG2 = NEW PROGRAM NAME. 00495 M00S00459.libedit +++| TITLE MACRO DEFINITIONS. 00496 M00S00460.libedit +++|* MACROS. 00497 M00S00461.libedit +++| 00498 M00S00462.libedit +++|*CALL COMCMAC 00499 M00S00463.libedit +++|*CALL COMCCMD 00500 M01S00013.251l664 +++|*CALL COMSSRT 00501 M00S00464.libedit +++|*CALL COMSTCM
| Line S00465 Modification History | |
|---|---|
M01 (Removed by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00502 M01S00465.libed6 ---| NAME SPACE 4,10 00503 M01S00466.libed6 ---|** NAME - ROUTINE NAME HEADER. 00504 M01S00467.libed6 ---|* THIS MACRO DEFINES *.NAME* = (LOCATION COUNTER) AND 00505 M01S00468.libed6 ---|* GENERATES ONE LINE OF CODE CONTAINING THE SUBROUTINE 00506 M01S00469.libed6 ---|* NAME AND A LINK TO THE NEXT SUBROUTINE HEADER. 00507 M01S00470.libed6 ---| 00508 M01S00471.libed6 ---| 00509 M01S00472.libed6 ---| NAME MACRO TITLE,LWA 00510 M01S00473.libed6 ---| BSS 0 00511 M01S00474.libed6 ---| .NAME SET * 00512 M01S00475.libed6 ---| VFD 42/0L_TITLE,18/LWA 00513 M01S00476.libed6 ---| ENDM 00514 M00S00477.libedit ---| SPACE 4 00515 M00S00478.libedit ---|** CALL - SUBROUTINE CALL. 00516 M00S00479.libedit ---|* THIS MACRO SETS UP A STANDARD CALLING SEQUENCE. 00517 M00S00480.libedit ---|* CALL SUB,P1,P2,P3,P4,P5,P6 00518 M00S00481.libedit ---|* ENTRY SUB = SUBROUTINE NAME. 00519 M00S00482.libedit ---|* PI = ADDRESS OF I-TH PARAMETER. 00520 M00S00483.libedit ---|* PARAMETER ADDRESSES ARE PASSED IN B-REGISTERS (AS IN FORTRAN) 00521 M00S00484.libedit ---|* WITH THE FIRST PARAMETER ADDRESS IN B2, SECOND IN B3, ETC. 00522 M01S00485.libed6 ---|* TRACEBACK INFORMATION IS ASSEMBLED IN THE LOWER HALF OF 00523 M01S00486.libed6 ---|* THE RETURN JUMP INSTRUCTION. 00524 M00S00487.libedit ---| 00525 M00S00488.libedit ---| 00526 M00S00489.libedit ---| CALL MACRO SUB,P1,P2,P3,P4,P5,P6 00527 M00S00490.libedit ---| IFC NE,$P1$$,1 00528 M00S00491.libedit ---| R= B2,P1 00529 M00S00492.libedit ---| IFC NE,$P2$$,1 00530 M00S00493.libedit ---| R= B3,P2 00531 M00S00494.libedit ---| IFC NE,$P3$$,1 00532 M00S00495.libedit ---| R= B4,P3 00533 M00S00496.libedit ---| IFC NE,$P4$$,1 00534 M00S00497.libedit ---| R= B5,P4 00535 M00S00498.libedit ---| IFC NE,$P5$$,1 00536 M00S00499.libedit ---| R= B6,P5 00537 M00S00500.libedit ---| IFC NE,$P6$$,1 00538 M00S00501.libedit ---| R= B7,P6 00539 M00S00502.libedit ---| ENDIF 00540 M01S00503.libed6 ---| + RJ SUB 00541 M01S00504.libed6 ---| - LT B0,.NAME
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00542 M01S00002.libed6 +++| RJ SUB 00543 M00S00505.libedit +++| ENDM 00544 M00S00506.libedit +++| SPACE 4 00545 M00S00507.libedit +++|** ADDWRD - ADD WORD TO MANAGED TABLE. 00546 M00S00508.libedit +++|* THIS MACRO SETS UP A CALL TO ADD AN ENTRY TO A MANAGED TABLE: 00547 M00S00509.libedit +++|* ADDWRD TABLE,ENTRY 00548 M00S00510.libedit +++|* ENTRY TABLE = NAME OF MANAGED TABLE. 00549 M00S00511.libedit +++|* ENTRY = ADDRESS OF ENTRY. 00550 M00S00512.libedit +++| 00551 M00S00513.libedit +++| 00552 M00S00514.libedit +++| ADDWRD MACRO TABLE,ENTRY 00553 M00S00515.libedit +++| CALL ADD,P.TABLE,ENTRY 00554 M00S00516.libedit +++| ENDM 00555 M00S00517.libedit +++| SPACE 4 00556 M00S00518.libedit +++|** TABLE - DEFINE MANAGED TABLE POINTERS. 00557 M00S00519.libedit +++|* MANAGED TABLES HAVE 4 POINTERS ASSOCIATED WITH THEM: 00558 M00S00520.libedit +++|* (P.NAME) = FWA OF MANAGED TABLE. 00559 M00S00521.libedit +++|* (L.NAME) = LENGTH OF MANAGED TABLE. 00560 M00S00522.libedit +++|* (N.NAME) = NUMBER OF WORDS IN AN ENTRY. 00561 M00S00523.libedit +++|* (D.NAME) = NUMBER OF WORDS TABLE LENGTH IS INCREASED AT 00562 M00S00524.libedit +++|* A TIME. 00563 M00S00525.libedit +++|* TABLE NAME,WORD,DELTA 00564 M00S00526.libedit +++|* ENTRY NAME = NAME OF TABLE. 00565 M00S00527.libedit +++|* WORD = NUMBER OF WORDS/ENTRY. 00566 M00S00528.libedit +++|* DELTA = SIZE OF TABLE INCREASE (NUMBER OF ENTRIES). 00567 M00S00529.libedit +++| 00568 M00S00530.libedit +++| 00569 M00S00531.libedit +++| TABLE MACRO NAME,WORD,DELTA 00570 M00S00532.libedit +++| LOCAL NW,DW 00571 M00S00533.libedit +++| NW SET WORD 1 00572 M00S00534.libedit +++| DW SET DELTA 4 00573 M00S00535.libedit +++| P.NAME VFD 42D/0L_NAME,18D/BUF 00574 M00S00536.libedit +++| L.NAME VFD 60D/0 00575 M00S00537.libedit +++| N.NAME VFD 60D/NW 00576 M00S00538.libedit +++| D.NAME VFD 60D/NW*DW 00577 M00S00539.libedit +++| ENDM 00578 M00S00540.libedit +++| SPACE 4 00579 M00S00541.libedit +++|** SEARCH - SEARCH FOR ENTRY IN MANAGED TABLE. 00580 M00S00542.libedit +++|* THIS MACRO SETS UP A CALL TO SEARCH FOR AN ENTRY 00581 M00S00543.libedit +++|* IN A MANAGED TABLE 00582 M00S00544.libedit +++|* SEARCH TABLE,ENTRY,MASK,INDEX,RETURN 00583 M00S00545.libedit +++|* ENTRY TABLE = NAME OF MANAGED TABLE. 00584 M00S00546.libedit +++|* ENTRY = ADDRESS OF ENTRY. 00585 M00S00547.libedit +++|* MASK = ADDRESS OF SEARCH MASK. 00586 M00S00548.libedit +++|* INDEX = INDEX INTO TABLE. 00587 M00S00549.libedit +++|* RETURN = ADDRESS OF RETURN PARAMETER. 00588 M00S00550.libedit +++| 00589 M00S00551.libedit +++| 00590 M00S00552.libedit +++| SEARCH MACRO TABLE,ENTRY,MASK,INDEX,RETURN 00591 M00S00553.libedit +++| SB2 P.TABLE 00592 M00S00554.libedit +++| SB3 ENTRY 00593 M00S00555.libedit +++| SB4 MASK =77777777777777777777B 00594 M00S00556.libedit +++| SB5 INDEX B0 00595 M00S00557.libedit +++| SB6 RETURN SMTA
| Line S00558 Modification History | |
|---|---|
M01 (Removed by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00596 M01S00558.libed6 ---| + RJ SMT 00597 M01S00559.libed6 ---| - LT B0,.NAME
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00598 M01S00003.libed6 +++| RJ SMT 00599 M00S00560.libedit +++| ENDM 00600 M00S00561.libedit +++| READW SPACE 4 00601 M00S00562.libedit +++|** READW - REDEFINE READ WORDS MACRO TO USE CONTROL WORDS. 00602 M00S00563.libedit +++| 00603 M00S00564.libedit +++| 00604 M00S00565.libedit +++| PURGMAC READW 00605 M00S00566.libedit +++| 00606 M00S00567.libedit +++| READW MACRO F,S,N 00607 M00S00568.libedit +++| R= B6,S 00608 M00S00569.libedit +++| R= B7,N 00609 M00S00570.libedit +++| R= X2,F 00610 M00S00571.libedit +++| RJ RDA 00611 M00S00572.libedit +++| ENDM 00612 M00S00573.libedit +++| WRCW SPACE 4 00613 M00S00574.libedit +++|** WRCW - WRITE WORKING STORAGE WITH CONTROL WORDS. 00614 M00S00575.libedit +++| 00615 M00S00576.libedit +++| 00616 M00S00577.libedit +++| WRCW MACRO F,S,N,E 00617 M00S00578.libedit +++| R= B6,S 00618 M00S00579.libedit +++| R= B7,N 00619 M00S00580.libedit +++| R= X2,F 00620 M00S00581.libedit +++| RJ WDA 00621 M00S00582.libedit +++| IFC NE,*E**,2 00622 M00S00583.libedit +++| + NZ B7,*+1 00623 M00S00584.libedit +++| - RJ WDA 00624 M00S00585.libedit +++| ENDM 00625 M00S00586.libedit +++| TITLE 00626 M00S00587.libedit +++|** LIBEDIT - LIBRARY EDITING PROGRAM. 00627 M00S00588.libedit +++|* 00628 M00S00589.libedit +++|* 1. FILE INPUT IS READ TO DETERMINE DIRECTIVES. 00629 M00S00590.libedit +++|* 2. ALL FILES WITH REWIND SELECTED ARE REWOUND. 00630 M00S00591.libedit +++|* 3. ALL CORRECTION FILES ARE READ TO DETERMINE PROGRAM 00631 M00S00592.libedit +++|* NAMES AND BUILD AN INDEX. 00632 M00S00593.libedit +++|* 4. CORRECTION FILES WITH REWIND SELECTED ARE REWOUND. 00633 M00S00594.libedit +++|* 5. FILE OLD IS READ. 00634 M00S00595.libedit +++|* 6. INSERT BEFORE IS CHECKED. 00635 M00S00596.libedit +++|* 7. IMPLIED DELETE IS CHECKED. 00636 M00S00597.libedit +++|* 8. REPLACEMENT IS CHECKED. 00637 M00S00598.libedit +++|* 9. INSERT AFTER IS CHECKED. 00638 M00S00599.libedit +++|* 10. FILE NEW IS WRITTEN. 00639 M00S00600.libedit +++|* 11. REPEAT STEPS 5.-11. 00640 M00S00601.libedit +++|* 12. COPY ADDED PROGRAMS ONTO *NEW*, IF APPLICABLE. 00641 M00S00602.libedit +++|* 13. REWIND ALL FILES WITH REWIND SELECTED. 00642 M00S00603.libedit +++|* 14. CALL *VFYLIB* IF VERIFY REQUESTED. 00643 M00S00604.libedit +++|* 15. CALL *LIBGEN* IF USER LIBRARY REQUESTED. 00644 M00S00605.libedit +++| 00645 M00S00606.libedit +++|
| Line S00607 Modification History | |
|---|---|
M01 (Removed by) | libed7 |
Seq # *Modification Id* Act ----------------------------+ 00646 M01S00607.libed7 ---| ORG 110B
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | libed7 |
Seq # *Modification Id* Act ----------------------------+ 00647 M01S00004.libed7 +++| ORG 104B 00648 M00S00608.libedit +++|
| Line S00609 Modification History | |
|---|---|
M01 (Removed by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00649 M01S00609.libed6 ---| LIB NAME LIBEDIT,LIBL
| Line S00610 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00650 M02S00610.libed6 ---| LIBEDT RJ RDC READ DIRECTIVE CARDS
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00651 M02S00011.libed6 ---| LIBEDT RJ RDC READ DIRECTIVES
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00652 M01S00004.libed6 +++| LIBEDIT BSS 0 ENTRY 00653 M01S00005.libed6 +++| SB1 1 (B1) = CONSTANT ONE 00654 M01S00006.libed6 +++| RJ PRS PRESET 00655 M01S00007.libed6 +++| RJ RDC READ DIRECTIVES 00656 M00S00611.libedit +++| CALL RWF REWIND ALL FILES 00657 M00S00612.libedit +++| CALL RCF READ ALL CORRECTION FILES 00658 M00S00613.libedit +++| CALL RWS REWIND SEQUENTIAL CORRECTION FILES 00659 M00S00614.libedit +++| CALL BID BUILD IMPLIED DELETE TABLE
| Line S00615 Modification History | |
|---|---|
M01 (Removed by) | libed9 |
Seq # *Modification Id* Act ----------------------------+ 00660 M01S00615.libed9 ---| SA1 CULB 00661 M01S00616.libed9 ---| ZR X1,LIB0 IF NO *U* OPTION 00662 M01S00617.libed9 ---| SA1 CCPY 00663 M01S00618.libed9 ---| NZ X1,LIB0 IF *COPY* OPTION 00664 M01S00619.libed9 ---| SA1 GULF 00665 M01S00620.libed9 ---| EQ LIB0.1 SET NEW FILE NAME
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | libed6 |
M02 (Removed by) | libed9 |
Seq # *Modification Id* Act ----------------------------+ 00666 M02S00008.libed9 ---|
| Line S00621 Modification History | |
|---|---|
M01 (Removed by) | libed9 |
Seq # *Modification Id* Act ----------------------------+ 00667 M01S00621.libed9 ---| LIB0 SA1 N 00668 M01S00622.libed9 ---| LIB0.1 MX0 42
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | libed9 |
Seq # *Modification Id* Act ----------------------------+ 00669 M01S00001.libed9 +++| SA2 CCPY 00670 M01S00002.libed9 +++| SA1 P SET *OLD* IN HEADER 00671 M01S00003.libed9 +++| NZ X2,LIB0 IF *C* OPTION 00672 M01S00004.libed9 +++| SA2 CULB 00673 M01S00005.libed9 +++| SA1 N SET *NEW* IN HEADER 00674 M01S00006.libed9 +++| ZR X2,LIB0 IF NO *U* OPTION 00675 M01S00007.libed9 +++| SA1 GULF SET *NEW* IN HEADER 00676 M01S00008.libed9 +++| LIB0 MX0 42 00677 M00S00623.libedit +++| BX6 X0*X1 00678 M00S00624.libedit +++| SA6 LIBF+3 00679 M00S00625.libedit +++| SB6 B0+ 00680 M00S00626.libedit +++| CALL STB,LIBF SET TITLE OF PAGE 00681 M00S00627.libedit +++| SB6 B1 00682 M00S00628.libedit +++| CALL STB,LIBG 00683 M00S00629.libedit +++| WRITECW N,* SET FILE STATUS 00684 M00S00630.libedit +++| SA4 N+4 00685 M00S00631.libedit +++| AX4 18 00686 M00S00632.libedit +++| SX6 X4 SET SECTOR WORD COUNT 00687 M00S00633.libedit +++| SA1 OLD 00688 M00S00634.libedit +++| SA6 N-1 00689 M00S00635.libedit +++| ZR X1,LIB19 IF NO FILE *OLD* 00690 M00S00636.libedit +++| OPEN A1,READNR,R 00691 M00S00637.libedit +++| SA1 P+1 CHECK DEVICE TYPE 00692 M00S00638.libedit +++| RJ CVD
| Line S00639 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00693 M01S00639.v23l617 ---| ZR X7,IDT IF ILLEGAL DEVICE
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00694 M01S00012.v23l617 +++| ZR X7,IDT IF INCORRECT DEVICE 00695 M00S00640.libedit +++| READCW P,17B 00696 M00S00641.libedit +++| LIB1 READW P,WSA,WSAL 00697 M00S00642.libedit +++| BX6 X1 SET EOR INDICATOR 00698 M00S00643.libedit +++| SA6 LIBA 00699 M00S00644.libedit +++| PL X1,LIB2 IF NOT EOF ON FILE *OLD* 00700 M00S00645.libedit +++| SB5 WSA 00701 M00S00646.libedit +++| EQ B5,B6,LIB19 IF NO DATA READ 00702 M00S00647.libedit +++| EQ LIB2.1 PROCESS DATA 00703 M00S00648.libedit +++| 00704 M00S00649.libedit +++| LIB2 SA1 LIBA CHECK EOR INDICATOR 00705 M00S00650.libedit +++| NG X1,LIB19 IF EOF ON FILE OLD 00706 M00S00651.libedit +++| LIB2.1 SB6 WSA 00707 M00S00652.libedit +++| SB7 X1+ 00708 M00S00653.libedit +++| EQ B6,B7,LIB17 IF 0-LENGTH RECORD 00709 M00S00654.libedit +++| SA1 P-LWP LWA+1 OF DATA TRANSFERED FROM OLD FILE 00710 M00S00655.libedit +++| SX2 WSA 00711 M00S00656.libedit +++| RJ SRT SET RECORD TYPE 00712 M00S00657.libedit +++| SA6 LIBB 00713 M00S00658.libedit +++| SA6 LIBH
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | libed1 |
Seq # *Modification Id* Act ----------------------------+ 00714 M01S00001.libed1 +++| MX0 -18 CREATE -TYPE/*- PSEUDO-ENTRY 00715 M01S00002.libed1 +++| SX7 1R* 00716 M01S00003.libed1 +++| BX6 -X0*X6 EXTRACT RECORD TYPE 00717 M01S00004.libed1 +++| LX7 54 00718 M01S00005.libed1 +++| BX7 X7+X6 MERGE TYPE AND -*- 00719 M01S00006.libed1 +++| SA7 LIBB+2
| Line S00659 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00720 M01S00659.251l664 ---| SX3 X6-8
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00721 M01S00014.251l664 +++| SX3 X6-ODRT 00722 M00S00660.libedit +++| SA2 CULB 00723 M00S00661.libedit +++| BX4 X3+X2 00724 M00S00662.libedit +++| ZR X4,LIB19 IF OPLD AND NOT *ULIB* MODE 00725 M00S00663.libedit +++| ZR X2,LIB2.3 IF NOT *ULIB* MODE 00726 M00S00664.libedit +++| SA1 LIBA 00727 M00S00665.libedit +++| ZR X3,LIB2.2 IF OPLD
| Line S00666 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00728 M01S00666.251l664 ---| SX4 X6-5
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00729 M01S00015.251l664 +++| SX4 X6-ULRT 00730 M00S00667.libedit +++| NZ X4,LIB2.3 IF NOT *ULIB* RECORD 00731 M00S00668.libedit +++| LIB2.2 NZ X1,LIB1 IF END OF RECORD 00732 M00S00669.libedit +++| READW P,WSA,WSAL 00733 M00S00670.libedit +++| EQ LIB2.2 SKIP RECORD 00734 M00S00671.libedit +++| 00735 M00S00672.libedit +++|* CHECK INSERT BEFORE. 00736 M00S00673.libedit +++| 00737 M00S00674.libedit +++| LIB2.3 SA1 LIBB SET SEARCH NAME 00738 M00S00675.libedit +++| MX6 1 00739 M00S00676.libedit +++| LX6 18 00740 M00S00677.libedit +++| BX6 X6+X1 00741 M00S00678.libedit +++| SA6 A1+B1 00742 M00S00679.libedit +++| LIB3 SEARCH IPT,(LIBB+1) 00743 M00S00680.libedit +++| ZR X6,LIB4 IF NO MORE INSERT BEFORE 00744 M00S00681.libedit +++| SA1 P.IPT SET IPT INDEX 00745 M00S00682.libedit +++| SX1 X1 00746 M00S00683.libedit +++| IX6 X6-X1 00747 M00S00684.libedit +++| 00748 M00S00685.libedit +++|* INSERT PROGRAMS BEFORE SPECIFIED PROGRAM. 00749 M00S00686.libedit +++| 00750 M00S00687.libedit +++| CALL CPP,X6 00751 M00S00688.libedit +++| EQ LIB3 CHECK FOR ANOTHER INSERT 00752 M00S00689.libedit +++| 00753 M00S00690.libedit +++|* CHECK FOR DELETE. 00754 M00S00691.libedit +++| 00755 M00S00692.libedit +++| LIB4 SEARCH DPT,LIBN,LIBP SEARCH FOR DELETE IN PROGRESS 00756 M00S00693.libedit +++| NZ X6,LIB6 IF DELETE IN PROGRESS 00757 M00S00694.libedit +++| SEARCH DPT,LIBB 00758 M00S00695.libedit +++| NZ X6,LIB5 IF START OF DELETE
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | libed1 |
Seq # *Modification Id* Act ----------------------------+ 00759 M01S00007.libed1 +++| SEARCH DPT,LIBB+2 CHECK FOR -TYPE/*- 00760 M01S00008.libed1 +++| SX7 X6 00761 M01S00009.libed1 +++| BX6 X6-X6 00762 M01S00010.libed1 +++| NZ X7,LIB6 IF DELETING ALL OF THIS TYPE 00763 M00S00696.libedit +++| SEARCH IDT,LIBB 00764 M00S00697.libedit +++| ZR X6,LIB9 IF PROGRAM IS NOT INSERTED 00765 M00S00698.libedit +++| SX6 B0 00766 M00S00699.libedit +++| EQ LIB6 ISSUE OUTPUT MESSAGE 00767 M00S00700.libedit +++|
| Line S00701 Modification History | |
|---|---|
M01 (Removed by) | libed3 |
Seq # *Modification Id* Act ----------------------------+ 00768 M01S00701.libed3 ---| LIB5 SA1 LIBP SET START OF DELETE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | libed3 |
Seq # *Modification Id* Act ----------------------------+ 00769 M01S00001.libed3 +++| LIB5 SA1 X6+B1 CHECK FOR /*DELETE NAME-*/ FORM 00770 M01S00002.libed3 +++| SA2 LIBB+2 00771 M01S00003.libed3 +++| BX7 X1-X2 00772 M01S00004.libed3 +++| NZ X7,LIB5.1 IF NORMAL DELETE RANGE 00773 M01S00005.libed3 +++| BX7 X1 00774 M01S00006.libed3 +++| SA7 X6 UPDATE *DPT* 00775 M01S00007.libed3 +++| BX6 X6-X6 00776 M01S00008.libed3 +++| EQ LIB6 CONTINUE PROCESSING 00777 M01S00009.libed3 +++| 00778 M01S00010.libed3 +++| LIB5.1 SA1 LIBP SET START OF DELETE 00779 M00S00702.libedit +++| SA2 X6 00780 M00S00703.libedit +++| BX7 -X1*X2 00781 M00S00704.libedit +++| SA3 LIBN 00782 M00S00705.libedit +++| BX7 X3+X7 00783 M00S00706.libedit +++| SA7 X6 00784 M00S00707.libedit +++| LIB6 SA6 LIBC SET DPT ADDRESS 00785 M00S00708.libedit +++| CALL ODP,LIBB OUTPUT DELETED PROGRAM 00786 M00S00709.libedit +++| 00787 M00S00710.libedit +++|* SKIP RECORD FROM FILE *OLD*. 00788 M00S00711.libedit +++| 00789 M00S00712.libedit +++| CALL DIS,LIBB,(=H*SKIPPING *) 00790 M00S00713.libedit +++| SA1 LIBA 00791 M00S00714.libedit +++| LIB7 NZ X1,LIB8 IF EOR OR EOF 00792 M00S00715.libedit +++| READW OLD,WSA,WSAL 00793 M00S00716.libedit +++| EQ LIB7 LOOP TO END OF RECORD 00794 M00S00717.libedit +++| LIB8 CALL SUL,LIBB,LIBA 00795 M00S00718.libedit +++| SA1 LIBC CHECK FOR END OF DELETE 00796 M00S00719.libedit +++| ZR X1,LIB16 IF IMPLIED DELETE 00797 M00S00720.libedit +++| SA2 X1+B1 00798 M00S00721.libedit +++| SA3 LIBB 00799 M00S00722.libedit +++| BX6 X2-X3 00800 M00S00723.libedit +++| NZ X6,LIB16 IF NOT END OF DELETE
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | libed1 |
Seq # *Modification Id* Act ----------------------------+ 00801 M01S00011.libed1 +++| SX6 7777B DELETE FLAG 00802 M00S00724.libedit +++| SA6 X1 CLEAR DPT ENTRY 00803 M00S00725.libedit +++| SA6 X1+B1 00804 M00S00726.libedit +++| EQ LIB16 CHECK INSERT AFTER 00805 M00S00727.libedit +++| 00806 M00S00728.libedit +++|* CHECK FOR REPLACEMENT. 00807 M00S00729.libedit +++| 00808 M00S00730.libedit +++| LIB9 SEARCH PNT,LIBB 00809 M00S00731.libedit +++| ZR X6,LIB12 IF NO REPLACEMENT 00810 M00S00732.libedit +++| SA1 P.PNT 00811 M00S00733.libedit +++| SX1 X1 00812 M00S00734.libedit +++| IX6 X6-X1 00813 M00S00735.libedit +++| SA6 LIBE 00814 M00S00736.libedit +++| CALL CNR,X6 CHECK FOR NO REPLACE 00815 M00S00737.libedit +++| NZ X6,LIB9 IF NO REPLACE 00816 M00S00738.libedit +++| CALL DIS,LIBB,(=H*REPLACING *) 00817 M00S00739.libedit +++| SA1 LIBE 00818 M00S00740.libedit +++| CALL CPY,X1 COPY REPLACEMENT RECORD 00819 M00S00741.libedit +++| CALL ORW,(=8HREPLACED),LGO 00820 M00S00742.libedit +++| SA1 LIBA 00821 M00S00743.libedit +++| NZ X1,LIB11 IF EOR ON PREVIOUS READ 00822 M00S00744.libedit +++| LIB10 READW OLD,WSA,WSAL SKIP RECORD ON *OLD* 00823 M00S00745.libedit +++| LIB11 ZR X1,LIB10 IF NOT EOR 00824 M00S00746.libedit +++| CALL SUL,LIBB,LIBA 00825 M00S00747.libedit +++| EQ LIB16 CHECK INSERT AFTER 00826 M00S00748.libedit +++| 00827 M00S00749.libedit +++|* COPY FROM *OLD* TO *NEW*. 00828 M00S00750.libedit +++| 00829 M00S00751.libedit +++| LIB12 CALL DIS,LIBB,(=H*COPYING *) 00830 M00S00752.libedit +++| CALL CCM,WSA,LIBB 00831 M00S00753.libedit +++| SB6 X6 00832 M00S00754.libedit +++| SA1 LIBA CHECK FOR EOR 00833 M00S00755.libedit +++| NZ X1,LIB14 IF EOR/EOF/EOI 00834 M00S00756.libedit +++| LIB13 SB7 WSA+WSAL 00835 M00S00757.libedit +++| WRCW N,B6,B7-B6 00836 M00S00758.libedit +++| READW OLD,WSA,WSAL 00837 M00S00759.libedit +++| SB6 WSA 00838 M00S00760.libedit +++| ZR X1,LIB13 IF NOT EOR/EOF/EOI 00839 M00S00761.libedit +++| LIB14 SA1 P-LWP LWA + 1 OF DATA TRANSFERED 00840 M00S00762.libedit +++| SB7 X1 00841 M00S00763.libedit +++| WRCW N,B6,B7-B6,R WRITE LAST PORTION OF RECORD 00842 M00S00764.libedit +++| SA1 N-2 00843 M00S00765.libedit +++| NG X1,LIB15 IF *WRITECW* NOT DISABLED 00844 M00S00766.libedit +++| RJ RCW 00845 M00S00767.libedit +++| 00846 M00S00768.libedit +++| LIB15 ADDWRD NPT,NIND 00847 M00S00769.libedit +++| CALL ORW,(=1H ),OLD 00848 M00S00770.libedit +++| CALL CPL,LIBB,LIBA 00849 M00S00771.libedit +++| 00850 M00S00772.libedit +++|* CHECK INSERT AFTER. 00851 M00S00773.libedit +++| 00852 M00S00774.libedit +++| LIB16 SEARCH IPT,LIBB 00853 M00S00775.libedit +++| ZR X6,LIB2 IF NO INSERT 00854 M00S00776.libedit +++| SA1 P.IPT SET IPT INDEX 00855 M00S00777.libedit +++| SX1 X1 00856 M00S00778.libedit +++| IX6 X6-X1 00857 M00S00779.libedit +++| 00858 M00S00780.libedit +++|* INSERT PROGRAMS AFTER SPECIFIED PROGRAM. 00859 M00S00781.libedit +++| 00860 M00S00782.libedit +++| CALL CPP,X6 00861 M00S00783.libedit +++| EQ LIB16 LOOP 00862 M00S00784.libedit +++| 00863 M00S00785.libedit +++|* PROCESS ZERO LENGTH RECORD. 00864 M00S00786.libedit +++| 00865 M00S00787.libedit +++| LIB17 SEARCH IPT,LIBI 00866 M00S00788.libedit +++| ZR X6,LIB18 IF NO ADD 00867 M00S00789.libedit +++| SA1 P.IPT SET IPT INDEX 00868 M00S00790.libedit +++| SX1 X1 00869 M00S00791.libedit +++| IX6 X6-X1 00870 M00S00792.libedit +++| CALL CPP,X6 00871 M00S00793.libedit +++| EQ LIB17 LOOP 00872 M00S00794.libedit +++|
| Line S00795 Modification History | |
|---|---|
M01 (Removed by) | ns2037 |
Seq # *Modification Id* Act ----------------------------+ 00873 M01S00795.ns2037 ---| LIB18 WRCW N,B0,B0
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2037 |
Seq # *Modification Id* Act ----------------------------+ 00874 M01S00001.ns2037 +++| LIB18 SB2 =0 ENTER ZERO LENGTH RECORD NAME AND TYPE 00875 M01S00002.ns2037 +++| RJ EPN 00876 M01S00003.ns2037 +++| ADDWRD NPT,NIND 00877 M01S00004.ns2037 +++| WRCW N,B0,B0 WRITE ZERO LENGTH RECORD 00878 M00S00796.libedit +++| SA1 LIBI INCREMENT LIBRARY NUMBER 00879 M00S00797.libedit +++| SX6 B1
| Line S00798 Modification History | |
|---|---|
M01 (Removed by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 00880 M01S00798.libed8 ---| LX6 48
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 00881 M01S00002.libed8 +++| LX6 42 00882 M00S00799.libedit +++| IX6 X6+X1 00883 M00S00800.libedit +++| SA6 A1 00884 M00S00801.libedit +++| CALL OZR,(=1H ),OLD,(=2H00) 00885 M00S00802.libedit +++| JP LIB1 READ NEXT RECORD 00886 M00S00803.libedit +++| 00887 M00S00804.libedit +++|* CHECK INSERT BEFORE EOF. 00888 M00S00805.libedit +++| 00889 M00S00806.libedit +++| LIB19 SEARCH IPT,LIBD,(=77777777777777400000B) 00890 M00S00807.libedit +++| ZR X6,LIB20 IF NO INSERT 00891 M00S00808.libedit +++| SA1 P.IPT SET IPT INDEX 00892 M00S00809.libedit +++| SX1 X1 00893 M00S00810.libedit +++| IX6 X6-X1 00894 M00S00811.libedit +++| 00895 M00S00812.libedit +++|* INSERT PROGRAM(S) BEFORE EOF. 00896 M00S00813.libedit +++| 00897 M00S00814.libedit +++| CALL CPP,X6 00898 M00S00815.libedit +++| EQ LIB19 CHECK FOR ANOTHER INSERT 00899 M00S00816.libedit +++| 00900 M00S00817.libedit +++|* PROCESS EOF ON FILE OLD. 00901 M00S00818.libedit +++| 00902 M00S00819.libedit +++| LIB20 RJ CAP COPY ADDED PROGRAMS 00903 M00S00820.libedit +++| SB2 LIBH 00904 M00S00821.libedit +++| SA1 LIBA GET EOR INDICATOR 00905 M00S00822.libedit +++| RJ WPD WRITE PROGRAM DIRECTORY 00906 M00S00823.libedit +++| CALL RWF REWIND FILES 00907 M00S00824.libedit +++| CALL CRR CHECK RECORDS REPLACED 00908 M00S00825.libedit +++| CALL CNO COPY NEW TO OLD 00909 M00S00826.libedit +++| MESSAGE (=C* EDITING COMPLETE.*),,R 00910 M00S00827.libedit +++| RETURN S RETURN SCRATCH FILE 00911 M00S00828.libedit +++| SA1 OUTPUT+2 CLOSE OUT FILE *OUTPUT* 00912 M00S00829.libedit +++| SA2 A1+B1 00913 M00S00830.libedit +++| BX6 X1-X2 00914 M00S00831.libedit +++| ZR X6,LIB21 IF NO OUTPUT
| Line S00832 Modification History | |
|---|---|
M01 (Removed by) | ns2371a |
Seq # *Modification Id* Act ----------------------------+ 00915 M01S00832.ns2371a ---| WRITER OUTPUT
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2371a |
Seq # *Modification Id* Act ----------------------------+ 00916 M01S00001.ns2371a +++| WRITER OUTPUT,R
| Line S00833 Modification History | |
|---|---|
M01 (Removed by) | libed4 |
Seq # *Modification Id* Act ----------------------------+ 00917 M01S00833.libed4 ---| LIB21 CALL VFY VERIFY *OLD* AND *NEW* 00918 M01S00834.libed4 ---| RJ GUL GENERATE USER LIBRARY
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | libed4 |
Seq # *Modification Id* Act ----------------------------+ 00919 M01S00001.libed4 +++| LIB21 RJ GUL GENERATE USER LIBRARY 00920 M01S00002.libed4 +++| RJ VFY VERIFY *OLD* AND *NEW* 00921 M00S00835.libedit +++| ENDRUN 00922 M00S00836.libedit +++| 00923 M00S00837.libedit +++| 00924 M00S00838.libedit +++| LIBA DATA 0 EOR INDICATOR 00925 M00S00839.libedit +++| LIBB DATA 0 PROGRAM NAME 00926 M00S00840.libedit +++| DATA 0 PROGRAM NAME WITH INSERT BEFORE SET
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | libed1 |
Seq # *Modification Id* Act ----------------------------+ 00927 M01S00012.libed1 +++| BSSZ 1 TYPE/* PSUEDO-ENTRY 00928 M00S00841.libedit +++| LIBC DATA 0 ADDRESS OF DPT ENTRY 00929 M00S00842.libedit +++| LIBD VFD 42/1L*,1/1,17/ 00930 M00S00843.libedit +++| LIBE DATA 0 PROGRAM NAME TABLE INDEX 00931 M00S00844.libedit +++| LIBF DATA C* RECORDS WRITTEN ON FILE XXX* 00932 M00S00845.libedit +++| LIBG DATA H* RECORD TYPE FILE * 00933 M00S00846.libedit +++| DATA C* DATE COMMENT* 00934 M00S00847.libedit +++| LIBH DATA 0 OPL DIRECTORY NAME
| Line S00848 Modification History | |
|---|---|
M01 (Removed by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 00935 M01S00848.libed8 ---| LIBI DATA 1S48 LIBRARY NUMBER
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 00936 M01S00003.libed8 +++| LIBI DATA 1S42 LIBRARY NUMBER 00937 M00S00849.libedit +++| LIBN VFD 42/0,6/1,12/0 DELETE IN PROGRESS FLAG 00938 M00S00850.libedit +++| LIBP VFD 42/0,6/77B,12/0 DELETE IN PROGRESS MASK
| Line S00851 Modification History | |
|---|---|
M01 (Removed by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00939 M01S00851.libed6 ---| LIBL BSS 0 LWA OF *LIBEDIT* ROUTINE 00940 M00S00852.libedit ---| TITLE DIRECTIVE CARD PROCESSING.
| Line S00853 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00941 M01S00853.v23l617 ---|** RDC - READ DIRECTIVE CARDS.
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00942 M01S00013.v23l617 +++|** RDC - READ DIRECTIVES. 00943 M00S00854.libedit +++| 00944 M00S00855.libedit +++|
| Line S00856 Modification History | |
|---|---|
M01 (Removed by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 00945 M01S00856.libed6 ---| NAME RDC,RDCL 00946 M00S00857.libedit ---| RDC SUBR ENTRY/EXIT 00947 M00S00858.libedit ---| SA1 INPUT CHECK FOR NO INPUT FILE 00948 M00S00859.libedit ---| SA2 CZOP CHECK FOR *Z* OPTION 00949 M00S00860.libedit ---| NZ X2,RDC1 IF *Z* OPTION SELECTED 00950 M00S00861.libedit ---| ZR X1,RDC12 IF NO INPUT FILE 00951 M00S00862.libedit ---| SA1 TTYI 00952 M00S00863.libedit ---| NZ X1,RDC0.1 IF NOT TTY INPUT 00953 M00S00864.libedit ---| WRITEC TTYOUT,(=C*ENTER DIRECTIVES -*) 00954 M00S00865.libedit ---| RDC0.1 READ I 00955 M00S00866.libedit ---| RDC1 READH I,DCB,DCBL
| Line S00867 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00956 M01S00867.v23l617 ---| SB2 DCB UNPACK DIRECTIVE CARD BUFFER
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00957 M01S00014.v23l617 +++| SB2 DCB UNPACK DIRECTIVE COMMAND BUFFER 00958 M00S00868.libedit +++| SB3 DCB+DCBL 00959 M00S00869.libedit +++| SB4 DSB 00960 M00S00870.libedit +++| MX0 54 00961 M00S00871.libedit +++| NZ X1,RDC12 IF END-OF-RECORD 00962 M00S00872.libedit +++| RDC2 SB5 B4+10 00963 M00S00873.libedit +++| SA1 B2 00964 M00S00874.libedit +++| RDC3 LX1 6 00965 M00S00875.libedit +++| BX6 -X0*X1 00966 M00S00876.libedit +++| SA6 B4 00967 M00S00877.libedit +++| SB4 B4+B1 00968 M00S00878.libedit +++| NE B4,B5,RDC3 LOOP FOR 10 CHARACTERS 00969 M00S00879.libedit +++| SB2 B2+B1 00970 M00S00880.libedit +++| SX6 B0 00971 M00S00881.libedit +++| NE B2,B3,RDC2 LOOP FOR END OF BUFFER 00972 M00S00882.libedit +++| SB4 DSB SUPPRESS TRAILING BLANKS 00973 M00S00883.libedit +++| RDC4 SA6 B5 00974 M00S00884.libedit +++| EQ B4,B5,RDC5 IF START OF BUFFER 00975 M00S00885.libedit +++| SB5 B5-B1 00976 M00S00886.libedit +++| SA1 B5 00977 M00S00887.libedit +++| SX6 X1-1R 00978 M00S00888.libedit +++| ZR X6,RDC4 IF CHARACTER IS * * 00979 M00S00889.libedit +++| 00980 M00S00890.libedit +++|* ASSEMBLE DIRECTIVE AND GO TO DIRECTIVE PROCESSOR. 00981 M00S00891.libedit +++| 00982 M00S00892.libedit +++| RDC5 SX6 DSB SET COLUMN POINTER AT COLUMN 1 00983 M00S00893.libedit +++| SA6 RDCA 00984 M00S00894.libedit +++| SA1 X6 CHECK COLUMN 1
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | libed7 |
Seq # *Modification Id* Act ----------------------------+ 00985 M01S00005.libed7 +++| SA3 A1+B1 CHECK COLUMN 2 00986 M00S00895.libedit +++| SX2 X1-1R* 00987 M00S00896.libedit +++| NZ X2,RDC11 IF NOT *** IN COLUMN 1 00988 M01S00006.libed7 +++| SX6 X3-1R/ 00989 M01S00007.libed7 +++| ZR X6,LST IF COMMENT TEXT 00990 M00S00897.libedit +++| CALL AFN,RDCA,RDCB 00991 M00S00898.libedit +++| SA1 RDCA IGNORE TRAILING BLANKS 00992 M00S00899.libedit +++| SA2 X1 00993 M00S00900.libedit +++| + SA2 A2+B1 00994 M00S00901.libedit +++| SX6 X2-1R 00995 M00S00902.libedit +++| ZR X6,*-1 LOOP 00996 M00S00903.libedit +++| SX6 A2-B1 00997 M00S00904.libedit +++| SA6 B2 00998 M00S00905.libedit +++| SA1 RDCC SEARCH FOR LEGAL DIRECTIVE 00999 M00S00906.libedit +++| SA2 RDCB
| Line S00907 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01000 M01S00907.v23l617 ---| RDC6 ZR X1,RDC14 IF DIRECTIVE ILLEGAL
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01001 M01S00015.v23l617 +++| RDC6 ZR X1,RDC14 IF DIRECTIVE INCORRECT 01002 M00S00908.libedit +++| MX0 42 01003 M00S00909.libedit +++| BX6 X1-X2 01004 M00S00910.libedit +++| BX6 X0*X6 01005 M00S00911.libedit +++| SX7 X1 01006 M00S00912.libedit +++| LX7 30 01007 M00S00913.libedit +++| SA1 A1+B1 01008 M00S00914.libedit +++| NZ X6,RDC6 LOOP 01009 M00S00915.libedit +++| SA7 SDA SET DIRECTIVE ADDRESS 01010 M00S00916.libedit +++| LX7 30 01011 M00S00917.libedit +++| SX6 X7+COPY 01012 M00S00918.libedit +++| ZR X6,COPY IF *COPY DIRECTIVE 01013 M00S00919.libedit +++| SX6 X7+DEBUG 01014 M00S00920.libedit +++| ZR X6,DEBUG IF *DEBUG DIRECTIVE 01015 M00S00921.libedit +++| SX6 X7+VFYLIB 01016 M00S00922.libedit +++| ZR X6,VFYLIB IF *VFYLIB DIRECTIVE 01017 M00S00923.libedit +++| SX6 X7+LSTDR 01018 M00S00924.libedit +++| ZR X6,LSTDR IF *LIST DIRECTIVE 01019 M00S00925.libedit +++| SX6 X7+NOREW 01020 M00S00926.libedit +++| ZR X6,NOREW IF *NOREW DIRECTIVE 01021 M00S00927.libedit +++| SX6 X7+NOINS 01022 M00S00928.libedit +++| ZR X6,NOINS IF *NOINS DIRECTIVE 01023 M00S00929.libedit +++| SX6 X7+LIBGEN 01024 M00S00930.libedit +++| ZR X6,LIBGEN IF *LIBGEN DIRECTIVE 01025 M00S00931.libedit +++| 01026 M00S00932.libedit +++|** PROCESS DIRECTIVE. 01027 M00S00933.libedit +++| 01028 M00S00934.libedit +++| RDC7 SA1 RDCA CHECK SERARATOR CHARACTER 01029 M00S00935.libedit +++| SA2 X1 01030 M00S00936.libedit +++| SB5 X2+B1 01031 M00S00937.libedit +++| SA1 =20000000000005000000B 01032 M00S00938.libedit +++| LX7 X1,B5 01033 M00S00939.libedit +++| NG X7,ERR9 IF CHARACTER = EOL */* *-* 01034 M00S00940.libedit +++| SA3 SDA 01035 M00S00941.libedit +++| RDC8 PL X3,RDC9 IF LIBRARY/PROGRAM TO BE ASSEMBLED 01036 M00S00942.libedit +++| CALL AFN,RDCA,RDCD 01037 M00S00943.libedit +++| SA3 SDA 01038 M00S00944.libedit +++| BX3 -X3 01039 M00S00945.libedit +++| AX3 30 01040 M00S00946.libedit +++| SB7 X3 01041 M00S00947.libedit +++| EQ RDC10 CHECK FILE NAME 01042 M00S00948.libedit +++| 01043 M00S00949.libedit +++| RDC9 CALL APN,RDCA,RDCD 01044 M00S00950.libedit +++| SA3 SDA 01045 M00S00951.libedit +++| AX3 30 01046 M00S00952.libedit +++| SB7 X3 01047 M00S00953.libedit +++| RDC10 MX0 42 CHECK FILE NAME 01048 M00S00954.libedit +++| SA1 RDCD 01049 M00S00955.libedit +++| BX1 X0*X1 01050 M00S00956.libedit +++| SX7 =C* REQUIRED PARAMETER(S) NOT SPECIFIED.* 01051 M00S00957.libedit +++| ZR X1,ERR IF FILE NAME = 0 01052 M00S00958.libedit +++| SA1 RDCA 01053 M00S00959.libedit +++| SA2 X1+ (X2) = CHARACTER 01054 M00S00960.libedit +++| SB5 X2-1R, (B5) = CHARACTER - *,* 01055 M00S00961.libedit +++| JP B7 GO TO DIRECTIVE PROCESSOR. 01056 M00S00962.libedit +++| 01057 M00S00963.libedit +++|* PROCESS DIRECTIVE CONTINUATION. 01058 M00S00964.libedit +++| 01059 M00S00965.libedit +++| RDC11 SX6 DSB-1 SET STRING BUFFER POINTER 01060 M00S00966.libedit +++| SA6 RDCA 01061 M00S00967.libedit +++| SA3 SDA 01062 M00S00968.libedit +++| EQ RDC8 CHECK DIRECTIVE FORMAT 01063 M00S00969.libedit +++|
| Line S00970 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01064 M01S00970.v23l617 ---|* END OF CORRECTION CARDS. CHECK FOR ERRORS.
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01065 M01S00016.v23l617 +++|* END OF DIRECTIVES. CHECK FOR ERRORS. 01066 M00S00971.libedit +++| 01067 M00S00972.libedit +++| RDC12 RETURN TTYOUT 01068 M00S00973.libedit +++| RJ SUM SET *ULIB* MODE 01069 M00S00974.libedit +++| SA1 TTYI 01070 M00S00975.libedit +++| SA2 RDCF 01071 M00S00976.libedit +++| ZR X1,RDCX IF TTY INPUT 01072 M00S00977.libedit +++| ZR X2,RDCX IF NO DIRECTIVE ERRORS 01073 M00S00978.libedit +++| MESSAGE (=C* DIRECTIVE ERRORS.*),3 01074 M00S00979.libedit +++| SA1 CDOP 01075 M00S00980.libedit +++| NZ X1,RDCX IF DEBUG OPTION ON 01076 M00S00981.libedit +++| RJ ABT ABORT 01077 M00S00982.libedit +++| 01078 M00S00983.libedit +++| RDC14 SX7 =C* UNRECOGNIZED KEYWORD IN DIRECTIVE.* 01079 M00S00984.libedit +++| EQ ERR LIST ERROR MESSAGE 01080 M00S00985.libedit +++| SPACE 4 01081 M00S00986.libedit +++|** SET NEW DIRECTIVE ADDRESS. 01082 M00S00987.libedit +++|* RJ SDA TO SET NEW ADDRESS. LIBRARY/PROGRAM WILL 01083 M00S00988.libedit +++|* BE ASSEMBLED. 01084 M00S00989.libedit +++| 01085 M00S00990.libedit +++| 01086 M00S00991.libedit +++| SDA EQ INS5 PROCESS NEXT FIELD 01087 M00S00992.libedit +++| SPACE 4 01088 M00S00993.libedit +++|** RET - RETURN FOR PROCESSING DUPLICATE FIELD. 01089 M00S00994.libedit +++| 01090 M00S00995.libedit +++| 01091 M00S00996.libedit +++| RET SA1 RDCA CHECK SEPARATOR CHARACTER 01092 M00S00997.libedit +++| SA2 X1 01093 M00S00998.libedit +++| ZR X2,LST IF END-OF-LINE 01094 M00S00999.libedit +++| SB5 X2-1R 01095 M00S01000.libedit +++| ZR B5,LST IF CHARACTER = * * 01096 M00S01001.libedit +++| EQ RDC7 IF MORE PARAMETERS 01097 M00S01002.libedit +++| 01098 M00S01003.libedit +++| RDCA VFD 60/DSB DIRECTIVE STRING BUFFER POINTER 01099 M00S01004.libedit +++| RDCB DATA 0 DIRECTIVE 01100 M00S01005.libedit +++| 01101 M00S01006.libedit +++| RDCC VFD 42/0LAFTER,18/INSERT 01102 M00S01007.libedit +++| VFD 42/0LA,18/INSERT 01103 M00S01008.libedit +++| VFD 42/0LADD,18/-ADP 01104 M00S01009.libedit +++| VFD 42/0LBEFORE,18/BEFORE 01105 M00S01010.libedit +++| VFD 42/0LB,18/BEFORE 01106 M00S01011.libedit +++| VFD 42/0LBUILD,18/BUILD 01107 M00S01012.libedit +++| VFD 42/0LCOMMENT,18/COMMENT 01108 M00S01013.libedit +++| VFD 42/0LCOPY,18/-COPY 01109 M00S01014.libedit +++| VFD 42/0LDATE,18/DATE 01110 M00S01015.libedit +++| VFD 42/0LDEBUG,18/-DEBUG 01111 M00S01016.libedit +++| VFD 42/0LDELETE,18/DELETE 01112 M00S01017.libedit +++| VFD 42/0LD,18/DELETE 01113 M00S01018.libedit +++| VFD 42/0LFILE,18/-FILE 01114 M00S01019.libedit +++| VFD 42/0LIGNORE,18/IGNORE 01115 M00S01020.libedit +++| VFD 42/0LINSERT,18/INSERT 01116 M00S01021.libedit +++| VFD 42/0LI,18/INSERT 01117 M00S01022.libedit +++| VFD 42/0LLIBGEN,18/-LIBGEN 01118 M00S01023.libedit +++| VFD 42/0LLIST,18/-LSTDR 01119 M00S01024.libedit +++| VFD 42/0LLGO,18/-FILE 01120 M00S01025.libedit +++| VFD 42/0LNAME,18/-NAME 01121 M00S01026.libedit +++| VFD 42/0LNEW,18/-NEWF 01122 M00S01027.libedit +++| VFD 42/0LNOINS,18/-NOINS 01123 M00S01028.libedit +++| VFD 42/0LNOREP,18/-NOREP 01124 M00S01029.libedit +++| VFD 42/0LNOREW,18/-NOREW 01125 M00S01030.libedit +++| VFD 42/0LOLD,18/-OLDF 01126 M00S01031.libedit +++| VFD 42/0LRENAME,18/RENAME 01127 M00S01032.libedit +++| VFD 42/0LREPLACE,18/REPLACE 01128 M00S01033.libedit +++| VFD 42/0LREWIND,18/-REWIND 01129 M00S01034.libedit +++| VFD 42/0LTYPE,18/-NAME 01130 M00S01035.libedit +++| VFD 42/0LVERIFY,18/-VFYLIB 01131 M00S01036.libedit +++| VFD 42/0LVFYLIB,18/-VFYLIB 01132 M00S01037.libedit +++| VFD 60/0 01133 M00S01038.libedit +++| 01134 M00S01039.libedit +++| RDCD DATA 0 ASSEMBLED NAME 01135 M00S01040.libedit +++| RDCE DATA 0LTEXT DEFAULT RECORD TYPE
| Line S01041 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01136 M01S01041.v23l617 ---| RDCF DATA 0 DIRECTIVE CARD ERROR COUNT
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01137 M01S00017.v23l617 +++| RDCF DATA 0 DIRECTIVE ERROR COUNT 01138 M00S01042.libedit +++| SPACE 4 01139 M00S01043.libedit +++|** ERR - ERROR DETECTED IN DIRECTIVE SCAN. 01140 M00S01044.libedit +++|* 01141 M00S01045.libedit +++|* ENTRY (X7) = 0 IF NO EXTRA ERROR MESSAGE TO BE ISSUED. 01142 M00S01046.libedit +++|* (X7) = ADDRESS OF EXPLANATORY ERROR MESSAGE. 01143 M00S01047.libedit +++| 01144 M00S01048.libedit +++| 01145 M00S01049.libedit +++| ERR SA1 TTYI 01146 M00S01050.libedit +++| SA7 ERRB SAVE ERROR MESSAGE ADDRESS 01147 M00S01051.libedit +++| ZR X1,ERR2 IF TTY INPUT 01148 M00S01052.libedit +++| SA1 =10H ERROR* 01149 M00S01053.libedit +++| BX6 X1 01150 M00S01054.libedit +++| SA6 OUTPUTB 01151 M00S01055.libedit +++| CALL LOL LIST ONE LINE 01152 M00S01056.libedit +++| WRITEC OUTPUT,(=C* *) 01153 M00S01057.libedit +++| SA1 RDCF INCREMENT ERROR COUNT 01154 M00S01058.libedit +++| SX6 X1+B1 01155 M00S01059.libedit +++| SA6 A1 01156 M00S01060.libedit +++| SA1 ERRB 01157 M00S01061.libedit +++| ERR1 ZR X1,RDC1 IF NO ERROR MESSAGE TO BE ISSUED 01158 M00S01062.libedit +++| WRITEC OUTPUT,X1 01159 M00S01063.libedit +++| EQ RDC1 READ NEXT DIRECTIVE 01160 M00S01064.libedit +++| 01161 M00S01065.libedit +++| ERR2 SX2 1R BLANK FILL LINE 01162 M00S01066.libedit +++| SB6 OUTPUTB+1 01163 M00S01067.libedit +++| SB7 OUTPUTB+DCBL+1 01164 M00S01068.libedit +++| SA1 B6 01165 M00S01069.libedit +++| MX0 54 01166 M00S01070.libedit +++| ERR3 BX6 X1 01167 M00S01071.libedit +++| SA6 A1 01168 M00S01072.libedit +++| EQ B6,B7,ERR5 IF END OF LINE 01169 M00S01073.libedit +++| SA1 B6 01170 M00S01074.libedit +++| SB6 B6+B1 01171 M00S01075.libedit +++| SB5 10D 01172 M00S01076.libedit +++| ERR4 ZR B5,ERR3 IF END OF WORD 01173 M00S01077.libedit +++| LX0 6 01174 M00S01078.libedit +++| LX2 6 01175 M00S01079.libedit +++| BX6 -X0*X1 01176 M00S01080.libedit +++| SB5 B5-B1 01177 M00S01081.libedit +++| NZ X6,ERR4 IF CHARACTER .NE. 00 01178 M00S01082.libedit +++| BX1 X1+X2 01179 M00S01083.libedit +++| EQ ERR4 LOOP 01180 M00S01084.libedit +++| 01181 M00S01085.libedit +++| ERR5 WRITEW TTYOUT,ERRA,ERRAL 01182 M00S01086.libedit +++| WRITEH TTYOUT,OUTPUTB+1,DCBL 01183 M00S01087.libedit +++| SA1 ERRB 01184 M00S01088.libedit +++| ZR X1,ERR1 IF NO EXPLANATORY MESSAGE 01185 M00S01089.libedit +++| WRITEC TTYOUT,X1 01186 M00S01090.libedit +++| WRITEC TTYOUT,ERRC 01187 M00S01091.libedit +++| SA1 TTYO 01188 M00S01092.libedit +++| ZR X1,RDC1 IF TTY OUTPUT 01189 M00S01093.libedit +++| SA1 ERRB 01190 M00S01094.libedit +++| EQ ERR1 ISSUE EXPLANATION 01191 M00S01095.libedit +++| 01192 M00S01096.libedit +++| ERR9 SX7 =C* -- UNRECOGNIZED SEPARATOR CHARACTER.* 01193 M00S01097.libedit +++| EQ ERR ISSUE ERROR MESSAGE 01194 M00S01098.libedit +++| 01195 M00S01099.libedit +++|
| Line S01100 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01196 M01S01100.v23l617 ---| ERRA DATA 20HILLEGAL DIRECTIVE -
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01197 M01S00018.v23l617 +++| ERRA DATA 22HINCORRECT DIRECTIVE - 01198 M00S01101.libedit +++| ERRAL EQU *-ERRA 01199 M00S01102.libedit +++| 01200 M00S01103.libedit +++| ERRB CON 0 01201 M00S01104.libedit +++| ERRC DATA C* (CORRECTED DIRECTIVE MAY BE RE-ENTERED...)* 01202 M00S01105.libedit +++| SPACE 4
| Line S01106 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01203 M01S01106.v23l617 ---|** LST - LIST DIRECTIVE CARD.
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01204 M01S00019.v23l617 +++|** LST - LIST DIRECTIVE. 01205 M00S01107.libedit +++|* 01206 M00S01108.libedit +++|* USES A - 1, 6. 01207 M00S01109.libedit +++|* X - 1, 2, 6. 01208 M00S01110.libedit +++| 01209 M00S01111.libedit +++| 01210 M00S01112.libedit +++| LST SA1 =10H 01211 M00S01113.libedit +++| BX6 X1 01212 M00S01114.libedit +++| SA6 OUTPUTB 01213 M00S01115.libedit +++| SA1 LIST 01214 M00S01116.libedit +++| SX2 4B 01215 M00S01117.libedit +++| BX1 X1*X2 01216 M00S01118.libedit +++| ZR X1,RDC1 IF DIRECTIVE LIST OPTION OFF 01217 M00S01119.libedit +++| CALL LOL LIST ONE LINE
| Line S01120 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01218 M01S01120.v23l617 ---| EQ RDC1 LOOP TO READ NEXT CARD
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01219 M01S00020.v23l617 +++| EQ RDC1 LOOP TO READ NEXT DIRECTIVE 01220 M00S01121.libedit +++| SPACE 4 01221 M00S01122.libedit +++|** *ADD LIB,LIB1/PN1 01222 M00S01123.libedit +++|* 01223 M00S01124.libedit +++|* ADD PROGRAM(S) AT END OF SPECIFIED LIBRARY. 01224 M00S01125.libedit +++|* ENTRY (X2) = SEPARATOR CHARACTER. 01225 M00S01126.libedit +++| 01226 M00S01127.libedit +++| 01227 M00S01128.libedit +++| ADP SA1 RDCD CHECK LIBRARY NAME 01228 M00S01129.libedit +++| SA3 ADPA 01229 M00S01130.libedit +++| MX0 42
| Line S01131 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01230 M01S01131.v23l617 ---| ADP1 ZR X3,ADP2 IF ILLEGAL LIBRARY
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 01231 M02S00021.libed8 ---| ADP1 ZR X3,ADP2 IF INCORRECT LIBRARY
| Line S01132 Modification History | |
|---|---|
M01 (Removed by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 01232 M01S01132.libed8 ---| BX6 X1-X3 01233 M01S01133.libed8 ---| BX7 X0*X6
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 01234 M01S00004.libed8 +++| ADP1 BX3 X3-X1 01235 M01S00005.libed8 +++| BX6 -X0*X3 01236 M01S00006.libed8 +++| ZR X6,ADP3 IF NO MATCH ON LIBRARY NAME 01237 M01S00007.libed8 +++| BX7 X0*X3 01238 M00S01134.libedit +++| SA3 A3+B1 01239 M00S01135.libedit +++| NZ X7,ADP1 IF NOT FOUND
| Line S01136 Modification History | |
|---|---|
M01 (Removed by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 01240 M01S01136.libed8 ---| LX6 48 SET LIBRARY NUMBER 01241 M01S01137.libed8 ---| SA6 RDCD
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 01242 M01S00008.libed8 +++| ADP2 LX6 42 SET LIBRARY NUMBER 01243 M01S00009.libed8 +++| SA6 A1 01244 M00S01138.libedit +++| EQ INSERT PROCESS INSERT 01245 M00S01139.libedit +++|
| Line S01140 Modification History | |
|---|---|
M01 (Removed by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 01246 M01S01140.libed8 ---| ADP2 SX7 =C* UNRECOGNIZED LIBRARY NAME.*
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 01247 M01S00010.libed8 +++| ADP3 MX0 18 01248 M01S00011.libed8 +++| BX7 X0*X3 01249 M01S00012.libed8 +++| NZ X7,ADP4 IF NOT *LIBN..N* 01250 M01S00013.libed8 +++| BX5 -X0*X1 01251 M01S00014.libed8 +++| LX5 18 01252 M01S00015.libed8 +++| SB7 B1+ SET DECIMAL BASE 01253 M01S00016.libed8 +++| RJ DXB CONVERT DECIMAL TO BINARY 01254 M01S00017.libed8 +++| SA2 RDCA RESTORE SEPARATOR CHARACTER 01255 M01S00018.libed8 +++| SA2 X2+ (X2) = CHARACTER 01256 M01S00019.libed8 +++| ZR X4,ADP2 IF CORRECT CONVERSION 01257 M01S00020.libed8 +++| ADP4 SX7 =C* UNRECOGNIZED LIBRARY NAME.* 01258 M00S01141.libedit +++| EQ ERR ISSUE ERROR MESSAGE 01259 M00S01142.libedit +++| 01260 M00S01143.libedit +++| 01261 M00S01144.libedit +++| ADPA BSS 0 01262 M00S01145.libedit +++| CON 0LDDS+1 01263 M00S01146.libedit +++| CON 0LIDS+2 01264 M00S01147.libedit +++| CON 0LMOV+3 01265 M00S01148.libedit +++| CON 0LRPL+4 01266 M00S01149.libedit +++| CON 0LRSL+5 01267 M00S01150.libedit +++| CON 0LSLD+6
| Line S01151 Modification History | |
|---|---|
M01 (Removed by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 01268 M01S01151.libed8 ---| 01269 M01S01152.libed8 ---| B SET 0 01270 M01S01153.libed8 ---| 01271 M01S01154.libed8 ---| ADPB BSS 0 01272 M01S01155.libed8 ---| DUP NLIB,3 01273 M01S01156.libed8 ---| B SET B+1 01274 M01S01157.libed8 ---| .A DECMIC B 01275 M01S01158.libed8 ---| CON 0LLIB_".A"+".A" 01276 M01S01159.libed8 ---| CON 0
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | libed8 |
Seq # *Modification Id* Act ----------------------------+ 01277 M01S00021.libed8 +++| ADPB CON 0LLIB 01278 M00S01160.libedit +++| SPACE 4 01279 M00S01161.libedit +++|** *BEFORE LIB1/PN1,LIB2/PN2-LIB3/PN3,LIB4/PN4 01280 M00S01162.libedit +++|* 01281 M00S01163.libedit +++|* INSERT PROGRAM(S) BEFORE SPECIFIED PROGRAM. 01282 M00S01164.libedit +++|* ENTRY (X2) = SEPARATOR CHARACTER. 01283 M00S01165.libedit +++| 01284 M00S01166.libedit +++| 01285 M00S01167.libedit +++| BEFORE MX6 1 SET INSERT BEFORE FLAG 01286 M00S01168.libedit +++| LX6 18 01287 M00S01169.libedit +++| EQ INS1 01288 M00S01170.libedit +++| SPACE 4 01289 M00S01171.libedit +++|** *BUILD PN 01290 M00S01172.libedit +++|* 01291 M00S01173.libedit +++|* BUILD A DIRECTORY OF FILE *NEW* WITH NAME *PN*. 01292 M00S01174.libedit +++| 01293 M00S01175.libedit +++| 01294 M00S01176.libedit +++| BUILD SA1 RDCD 01295 M00S01177.libedit +++| BX6 X1 01296 M00S01178.libedit +++| SA6 NPLN 01297 M00S01179.libedit +++| EQ LST 01298 M00S01180.libedit +++| SPACE 4 01299 M00S01181.libedit +++|** *COMMENT LIB/PN COMMENT 01300 M00S01182.libedit +++|* 01301 M00S01183.libedit +++|* ADD A 70-CHARACTER COMMENT TO THE 7700 TABLE OF THE 01302 M00S01184.libedit +++|* SPECIFIED RECORD. 01303 M00S01185.libedit +++| 01304 M00S01186.libedit +++| 01305 M00S01187.libedit +++| COMMENT SX6 B0 01306 M00S01188.libedit +++| COM1 SA1 RDCD SET PROGRAM NAME 01307 M00S01189.libedit +++| SB5 X2-1R CHECK SEPARATOR 01308 M00S01190.libedit +++| ZR B5,COM2 IF CHARACTER = * * 01309 M00S01191.libedit +++| SB5 X2-1R, 01310 M00S01192.libedit +++| ZR B5,COM2 IF CHARACTER = *,* 01311 M00S01193.libedit +++| NZ X2,ERR9 IF NOT EOL 01312 M00S01194.libedit +++| COM2 BX6 X6+X1 01313 M00S01195.libedit +++| SA1 RDCA 01314 M00S01196.libedit +++| SA2 X1+B1 01315 M00S01197.libedit +++| SA6 COMA 01316 M00S01198.libedit +++| SB2 COMA 01317 M00S01199.libedit +++| SB3 COMA+7 01318 M00S01200.libedit +++| COM3 SX6 B0 ASSEMBLE COMMENT 01319 M00S01201.libedit +++| SB7 60 01320 M00S01202.libedit +++| SB2 B2+B1 01321 M00S01203.libedit +++| COM4 SB7 B7-6 01322 M00S01204.libedit +++| LX6 6 01323 M00S01205.libedit +++| BX6 X6+X2 01324 M00S01206.libedit +++| ZR X2,COM6 IF END-OF-LINE 01325 M00S01207.libedit +++| LX6 6 01326 M00S01208.libedit +++| SA2 A2+B1 01327 M00S01209.libedit +++| SB7 B7-6 01328 M00S01210.libedit +++| NZ X2,COM5 IF NOT END-OF-LINE 01329 M00S01211.libedit +++| SX2 1R 01330 M00S01212.libedit +++| COM5 BX6 X6+X2 01331 M00S01213.libedit +++| SA2 A2+B1 01332 M00S01214.libedit +++| NZ B7,COM4 LOOP FOR 1 WORD 01333 M00S01215.libedit +++| COM6 LX6 X6,B7 STORE 10-CHARACTERS OF COMMENT 01334 M00S01216.libedit +++| SA6 B2 01335 M00S01217.libedit +++| NE B2,B3,COM3 LOOP FOR 7 WORDS 01336 M00S01218.libedit +++| ADDWRD CDT,COMA
| Line S01219 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01337 M01S01219.v23l617 ---| EQ LST LIST CARD
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01338 M01S00022.v23l617 +++| EQ LST LIST DIRECTIVE 01339 M00S01220.libedit +++| 01340 M00S01221.libedit +++| COMA VFD 42/,1/,17/ 42/PROGRAM,1/DATE,17/TYPE 01341 M00S01222.libedit +++| DATA 0 420/COMMENT 01342 M00S01223.libedit +++| DATA 0 01343 M00S01224.libedit +++| DATA 0 01344 M00S01225.libedit +++| DATA 0 01345 M00S01226.libedit +++| DATA 0 01346 M00S01227.libedit +++| DATA 0 01347 M00S01228.libedit +++| DATA 0 01348 M00S01229.libedit +++| SPACE 4 01349 M00S01230.libedit +++|** *COPY 01350 M00S01231.libedit +++|* 01351 M00S01232.libedit +++|* COPY FILE *NEW* TO FILE *OLD* AFTER EDITING. 01352 M00S01233.libedit +++| 01353 M00S01234.libedit +++| 01354 M00S01235.libedit +++| COPY SX6 B1 SET COPY FLAG 01355 M00S01236.libedit +++| SA6 CCPY 01356 M00S01237.libedit +++| EQ LST 01357 M00S01238.libedit +++| SPACE 4 01358 M00S01239.libedit +++|** *DATE LIB/PN COMMENT 01359 M00S01240.libedit +++|* 01360 M00S01241.libedit +++|* ADD A 70-CHARACTER COMMENT AND THE DATE TO THE 7700 01361 M00S01242.libedit +++|* TABLE OF THE SPECIFIED PROGRAM. 01362 M00S01243.libedit +++| 01363 M00S01244.libedit +++| 01364 M00S01245.libedit +++| DATE MX6 1 SET DATE FLAG 01365 M00S01246.libedit +++| LX6 18 01366 M00S01247.libedit +++| EQ COM1 GO ASSEMBLE COMMENT 01367 M00S01248.libedit +++| DEBUG SPACE 4,10 01368 M00S01249.libedit +++|** *DEBUG 01369 M00S01250.libedit +++|* 01370 M00S01251.libedit +++|* IGNORE SUBSEQUENT DIRECTIVE ERRORS. 01371 M00S01252.libedit +++| 01372 M00S01253.libedit +++| 01373 M00S01254.libedit +++| DEBUG SX6 B1+ SET DEBUG FLAG 01374 M00S01255.libedit +++| SA6 CDOP 01375 M00S01256.libedit +++| EQ LST LIST DIRECTIVE 01376 M00S01257.libedit +++| SPACE 4 01377 M00S01258.libedit +++|** *DELETE LIB1/PN1,LIB2/PN2-LIB3/PN3 01378 M00S01259.libedit +++|* 01379 M00S01260.libedit +++|* DELETE SELECTED PROGRAM(S) FROM FILE *OLD*. 01380 M00S01261.libedit +++|* ENTRY (X2) = SEPARATOR CHARACTER. 01381 M00S01262.libedit +++| 01382 M00S01263.libedit +++| 01383 M00S01264.libedit +++| DELETE SB5 X2-1R- 01384 M00S01265.libedit +++| SA1 RDCD SET DELETE START AND STOP 01385 M00S01266.libedit +++| BX6 X1 01386 M00S01267.libedit +++| SA6 DELA 01387 M00S01268.libedit +++| SA6 A6+B1 01388 M00S01269.libedit +++| NZ B5,DEL1 IF NO CONTINUATION FIELD 01389 M00S01270.libedit +++| 01390 M00S01271.libedit +++|* ASSEMBLE SECOND FIELD 01391 M00S01272.libedit +++| 01392 M00S01273.libedit +++| CALL APN,RDCA,(DELA+1) 01393 M00S01274.libedit +++| DEL1 ADDWRD DPT,DELA 01394 M00S01275.libedit +++| EQ RET RETURN 01395 M00S01276.libedit +++| 01396 M00S01277.libedit +++| 01397 M00S01278.libedit +++| DELA VFD 42/,6/,12/ 42/PROGRAM,6/IP,12/TYPE 01398 M00S01279.libedit +++| VFD 42/,6/,12/ 42/PROGRAM,6/0,12/TYPE 01399 M00S01280.libedit +++| SPACE 4 01400 M00S01281.libedit +++|** *FILE FN,FN,FN 01401 M00S01282.libedit +++|* 01402 M00S01283.libedit +++|* DECLARE ADDITIONAL CORRECTION FILES. 01403 M00S01284.libedit +++| 01404 M00S01285.libedit +++| 01405 M00S01286.libedit +++| FILE SA1 RDCD 01406 M00S01287.libedit +++| BX6 X1 01407 M00S01288.libedit +++| SA6 LGO. 01408 M00S01289.libedit +++| SEARCH FNT,RDCD,FILA 01409 M00S01290.libedit +++| NZ X6,RET IF FILE IN FNT 01410 M00S01291.libedit +++| ADDWRD FNT,RDCD 01411 M00S01292.libedit +++| EQ RET RETURN 01412 M00S01293.libedit +++| 01413 M00S01294.libedit +++| 01414 M00S01295.libedit +++| FILA DATA 77777777777777000000B 01415 M00S01296.libedit +++| SPACE 4 01416 M00S01297.libedit +++|** *IGNORE LIB/PN 01417 M00S01298.libedit +++|* *IGNORE LIB1/PN1-LIB2/PN2 01418 M00S01299.libedit +++|* 01419 M00S01300.libedit +++|* IGNORE PROGRAM(S) WHEN CORRECTION FILE IS READ. 01420 M00S01301.libedit +++|* ENTRY (X2) = SEPARATOR CHARACTER. 01421 M00S01302.libedit +++| 01422 M00S01303.libedit +++| 01423 M00S01304.libedit +++| IGNORE SA1 LGO. SET CORRECTION FILE NAME 01424 M00S01305.libedit +++| SA3 RDCD SET PROGRAM NAME 01425 M00S01306.libedit +++| BX6 X1 01426 M00S01307.libedit +++| LX7 X3 01427 M00S01308.libedit +++| SA6 IGNA 01428 M00S01309.libedit +++| SA7 A6+B1 01429 M00S01310.libedit +++| SA7 A7+B1 01430 M00S01311.libedit +++| SB5 X2-1R- CHECK FOR CONTINUATION FIELD 01431 M00S01312.libedit +++| NZ B5,IGN1 IF NO CONTINUATION FIELD 01432 M00S01313.libedit +++| 01433 M00S01314.libedit +++|* ASSEMBLE SECOND FIELD. 01434 M00S01315.libedit +++| 01435 M00S01316.libedit +++| CALL APN,RDCA,(IGNA+2) 01436 M00S01317.libedit +++| IGN1 ADDWRD PIT,IGNA 01437 M00S01318.libedit +++| EQ RET RETURN 01438 M00S01319.libedit +++| 01439 M00S01320.libedit +++| 01440 M00S01321.libedit +++| IGNA VFD 42/,18/ 42/FILE,18/ 01441 M00S01322.libedit +++| VFD 42/,18/ 42/PROGRAM,18/TYPE 01442 M00S01323.libedit +++| VFD 42/,18/ 42/PROGRAM,18/TYPE 01443 M00S01324.libedit +++| SPACE 4 01444 M00S01325.libedit +++|** *INSERT LIB1/PN1,LIB2/PN2,LIB3/PN3 01445 M00S01326.libedit +++|* 01446 M00S01327.libedit +++|* INSERT PROGRAMS AFTER SPECIFIED PROGRAM. 01447 M00S01328.libedit +++|* ENTRY (X2) = SEPARATOR CHARACTER. 01448 M00S01329.libedit +++| 01449 M00S01330.libedit +++| INSERT SX6 B0 SET INSERT AFTER FLAG 01450 M00S01331.libedit +++| INS1 SB5 X2-1R, 01451 M00S01332.libedit +++| ZR B5,INS2 IF SEPARATOR = *,* 01452 M00S01333.libedit +++| SB5 X2-1R 01453 M00S01334.libedit +++| NZ B5,ERR9 IF SEPARATOR NOT * * OR *,* 01454 M00S01335.libedit +++| INS2 SA1 RDCA CHECK FOR SECOND FIELD 01455 M00S01336.libedit +++| SA3 X1+1 01456 M00S01337.libedit +++| SX7 =C* RECORD(S) TO BE INSERTED NOT SPECIFIED.* 01457 M00S01338.libedit +++| ZR X3,ERR IF NO SECOND FIELD 01458 M00S01339.libedit +++| SA3 RDCD SET INSERT POINT 01459 M00S01340.libedit +++| BX6 X6+X3 01460 M00S01341.libedit +++| SA6 INSA 01461 M00S01342.libedit +++| 01462 M00S01343.libedit +++|* ASSEMBLE PROGRAM NAME OF START. 01463 M00S01344.libedit +++| 01464 M00S01345.libedit +++| CALL APN,RDCA,(INSA+2) 01465 M00S01346.libedit +++| INS3 SB5 X2-1R- 01466 M00S01347.libedit +++| SA1 INSA+2 01467 M00S01348.libedit +++| SA4 LGO. SET FILE NAME 01468 M00S01349.libedit +++| LX7 X4 01469 M00S01350.libedit +++| SA7 A1-B1 01470 M00S01351.libedit +++| BX6 X1 01471 M00S01352.libedit +++| SA6 A1+B1 01472 M00S01353.libedit +++| NZ B5,INS4 IF NO CONTINUATION FIELD 01473 M00S01354.libedit +++| 01474 M00S01355.libedit +++|* PROCESS CONTINUATION FIELD 01475 M00S01356.libedit +++| 01476 M00S01357.libedit +++| CALL APN,RDCA,(INSA+3) 01477 M00S01358.libedit +++| INS4 ADDWRD IPT,INSA 01478 M00S01359.libedit +++| RJ SDA SET DIRECTIVE ADDRESS AND READ NEXT FIELD 01479 M00S01360.libedit +++| 01480 M00S01361.libedit +++|* PROCESS NEXT FIELD. 01481 M00S01362.libedit +++| 01482 M00S01363.libedit +++| INS5 SA3 RDCD 01483 M00S01364.libedit +++| BX6 X3 01484 M00S01365.libedit +++| SA6 INSA+2 01485 M00S01366.libedit +++| EQ INS3 LOOP TO END OF CARD 01486 M00S01367.libedit +++| 01487 M00S01368.libedit +++| 01488 M00S01369.libedit +++| INSA VFD 42/1L*,1/1,17/ 42/PROG1,1/BEFORE,17/TYPE1 01489 M00S01370.libedit +++| VFD 42/,18/ 42/FILE,18/ 01490 M00S01371.libedit +++| VFD 42/,18/ 42/PROG2,18/TYPE2 01491 M00S01372.libedit +++| VFD 42/,18/ 42/PROG3,18/TYPE3 01492 M00S01373.libedit +++| LIBGEN SPACE 4,10 01493 M00S01374.libedit +++|** *LIBGEN UN 01494 M00S01375.libedit +++|* 01495 M00S01376.libedit +++|* SET *ULIB* MODE, CALLING *LIBGEN* AFTER EDITING 01496 M00S01377.libedit +++|* TO GENERATE A USER LIBRARY *UN* ON FILE *NEW*. 01497 M00S01378.libedit +++|* IF *UN* IS OMITTED, *UN* = *ULIB* IS USED. 01498 M00S01379.libedit +++| 01499 M00S01380.libedit +++| 01500 M00S01381.libedit +++| LIBGEN SA1 RDCA 01501 M00S01382.libedit +++| SA2 X1+ 01502 M00S01383.libedit +++| ZR X2,LIBG2 IF EOL 01503 M00S01384.libedit +++| SB5 X2+1 01504 M00S01385.libedit +++| SA2 =20000000000005000000B 01505 M00S01386.libedit +++| LX7 X2,B5 01506 M00S01387.libedit +++| NG X7,ERR9 IF ERROR 01507 M00S01388.libedit +++| SB2 RDCA 01508 M00S01389.libedit +++| SB3 RDCD 01509 M00S01390.libedit +++| RJ AFN ASSEMBLE *UN* NAME 01510 M00S01391.libedit +++| SA1 RDCD 01511 M00S01392.libedit +++| MX0 42 01512 M00S01393.libedit +++| BX6 X0*X1 01513 M00S01394.libedit +++| ZR X1,LIBG2 IF NULL *UN* NAME 01514 M00S01395.libedit +++| LIBG1 SA6 CULB 01515 M00S01396.libedit +++| EQ LST LIST DIRECTIVE 01516 M00S01397.libedit +++| LIBG2 SA1 LIBGA 01517 M00S01398.libedit +++| BX6 X1 01518 M00S01399.libedit +++| EQ LIBG1 LIST DIRECTIVE 01519 M00S01400.libedit +++| 01520 M00S01401.libedit +++| 01521 M00S01402.libedit +++| LIBGA VFD 24/4LULIB,36/0 DEFAULT USER LIBRARY NAME 01522 M00S01403.libedit +++| LSTDR SPACE 4,10 01523 M00S01404.libedit +++|** *LIST LFN,OPT 01524 M00S01405.libedit +++|* 01525 M00S01406.libedit +++|* DECLARE LISTING FILE AND LIST OPTIONS. 01526 M00S01407.libedit +++| 01527 M00S01408.libedit +++| 01528 M00S01409.libedit +++| LSTDR SA1 RDCA CHECK SEPARATOR CHARACTER 01529 M00S01410.libedit +++| SA2 X1 01530 M00S01411.libedit +++| SB5 X2+B1 01531 M00S01412.libedit +++| SA2 =20000000000005000000B 01532 M00S01413.libedit +++| LX7 X2,B5 01533 M00S01414.libedit +++| NG X7,ERR9 IF ERROR 01534 M00S01415.libedit +++| SB2 RDCA 01535 M00S01416.libedit +++| SB3 RDCD 01536 M00S01417.libedit +++| RJ AFN ASSEMBLE LIST FILE NAME 01537 M00S01418.libedit +++| MX0 42 01538 M00S01419.libedit +++| SA1 RDCD 01539 M00S01420.libedit +++| BX6 X1*X0 01540 M00S01421.libedit +++| ZR X6,LSTDR1 IF FILE NAME NULL 01541 M00S01422.libedit +++| SA1 FLST+/FLST/OUTPUT 01542 M00S01423.libedit +++| RJ RFN REPLACE FILE NAME 01543 M00S01424.libedit +++| LSTDR1 SA1 RDCA 01544 M00S01425.libedit +++| SA2 X1+ 01545 M00S01426.libedit +++| ZR X2,LST IF EOL 01546 M00S01427.libedit +++| SB2 RDCA 01547 M00S01428.libedit +++| SB3 RDCD 01548 M00S01429.libedit +++| RJ AFN ASSEMBLE LIST OPTIONS 01549 M00S01430.libedit +++| SA2 RDCD 01550 M00S01431.libedit +++| SA1 LIST 01551 M00S01432.libedit +++| MX0 42 01552 M00S01433.libedit +++| BX1 X2*X0 01553 M00S01434.libedit +++| ZR X1,LST IF LIST OPTIONS NULL 01554 M00S01435.libedit +++| RJ ILO INTERPRET LIST OPTIONS 01555 M00S01436.libedit +++| SX7 =C* UNRECOGNIZED LIST OPTION(S).* 01556 M00S01437.libedit +++| NZ X1,ERR IF ERRORS 01557 M00S01438.libedit +++| EQ LST LIST DIRECTIVE 01558 M00S01439.libedit +++| SPACE 4 01559 M00S01440.libedit +++|** *NAME LIB 01560 M00S01441.libedit +++|* 01561 M00S01442.libedit +++|* SET DEFAULT LIBRARY NAME. 01562 M00S01443.libedit +++| 01563 M00S01444.libedit +++| 01564 M00S01445.libedit +++| NAME SA1 RDCD CHECK LIBRARY NAME 01565 M00S01446.libedit +++| SA2 NAMA
| Line S01447 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01566 M01S01447.v23l617 ---| NAM1 ZR X2,NAM2 IF ILLEGAL LIBRARY
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01567 M01S00023.v23l617 +++| NAM1 ZR X2,NAM2 IF INCORRECT LIBRARY 01568 M00S01448.libedit +++| BX6 X1-X2 01569 M00S01449.libedit +++| SA2 A2+B1 01570 M00S01450.libedit +++| NZ X6,NAM1 IF NOT FOUND 01571 M00S01451.libedit +++| BX6 X1 01572 M00S01452.libedit +++| SA6 RDCE 01573 M00S01453.libedit +++| EQ LST LIST LINE 01574 M00S01454.libedit +++| 01575 M00S01455.libedit +++| NAM2 SX7 =C* UNRECOGNIZED RECORD TYPE.* 01576 M00S01456.libedit +++| EQ ERR ISSUE ERROR MESSAGE 01577 M00S01457.libedit +++| 01578 M00S01458.libedit +++|
| Line S01459 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 01579 M01S01459.251l664 ---| NAMA DATA 0LTEXT 0 01580 M01S01460.251l664 ---| DATA 0LPP 1 01581 M01S01461.251l664 ---| CON 1 2 (UNDEFINED RECORD TYPE) 01582 M01S01462.251l664 ---| DATA 0LREL 3 01583 M01S01463.251l664 ---| DATA 0LOVL 4 01584 M01S01464.251l664 ---| DATA 0LULIB 5 01585 M01S01465.251l664 ---| DATA 0LOPL 6 01586 M01S01466.251l664 ---| DATA 0LOPLC 7 01587 M01S01467.251l664 ---| DATA 0LOPLD 8 01588 M01S01468.251l664 ---| DATA 0LABS 9 01589 M01S01469.251l664 ---| DATA 0LPPU 10 01590 M01S01470.251l664 ---| CON 1 11 (UNDEFINED RECORD TYPE) 01591 M01S01471.251l664 ---| CON 1 12 (UNDEFINED RECORD TYPE) 01592 M01S01472.251l664 ---| CON 1 13 (UNDEFINED RECORD TYPE) 01593 M01S01473.251l664 ---| CON 0LCAP 14 01594 M01S01474.251l664 ---| CON 1 15 (UNDEFINED RECORD TYPE) 01595 M01S01475.251l664 ---| DATA 0LPROC 16
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act
----------------------------+
01596 M01S00016.251l664 +++| NAMA BSS 0
01597 M01S00017.251l664 +++| .E ECHO ,RT=("RTMIC")
01598 M01S00018.251l664 +++| .A IFC NE,/RT//
01599 M01S00019.251l664 +++| DATA L/RT/
01600 M01S00020.251l664 +++| .A ELSE
01601 M01S00021.251l664 +++| DATA 1
01602 M01S00022.251l664 +++| .A ENDIF
01603 M01S00023.251l664 +++| .E ENDD
01604 M00S01476.libedit +++| DATA 0
01605 M00S01477.libedit +++| NEWF SPACE 4,10
01606 M00S01478.libedit +++|** *NEW FN
01607 M00S01479.libedit +++|*
01608 M00S01480.libedit +++|* CHANGE/SPECIFY NAME OF *NEW* FILE.
01609 M00S01481.libedit +++|
01610 M00S01482.libedit +++|
01611 M00S01483.libedit +++| NEWF SA1 FLST+/FLST/NEW
01612 M00S01484.libedit +++| NEW1 SA2 RDCD GET FILE NAME
01613 M00S01485.libedit +++| BX6 X2
01614 M00S01486.libedit +++| RJ RFN REPLACE FILE NAME
01615 M00S01487.libedit +++| EQ LST LIST DIRECTIVE
01616 M00S01488.libedit +++| NOINS SPACE 4,10
01617 M00S01489.libedit +++|** *NOINS
01618 M00S01490.libedit +++|*
01619 M00S01491.libedit +++|* SET NO INSERT OF NEW RECORDS.
01620 M00S01492.libedit +++|
01621 M00S01493.libedit +++|
01622 M00S01494.libedit +++| NOINS SX6 B1+
01623 M00S01495.libedit +++| SA6 CADD SET NO INSERT AT EOF
01624 M00S01496.libedit +++| EQ LST LIST DIRECTIVE
01625 M00S01497.libedit +++| NOREP SPACE 4,10
01626 M00S01498.libedit +++|** *NOREP FN,FN,FN
01627 M00S01499.libedit +++|*
01628 M00S01500.libedit +++|* DO NOT REPLACE RECORDS FROM FILE *FN*.
01629 M00S01501.libedit +++|
01630 M00S01502.libedit +++|
01631 M00S01503.libedit +++| NOREP SEARCH NRT,RDCD
01632 M00S01504.libedit +++| NZ X6,RET IF FILE IN NRT
01633 M00S01505.libedit +++| ADDWRD NRT,RDCD
01634 M00S01506.libedit +++| EQ RET RETURN
01635 M00S01507.libedit +++| NOREW SPACE 4,10
01636 M00S01508.libedit +++|** *NOREW
01637 M00S01509.libedit +++|*
01638 M00S01510.libedit +++|* SET NO REWIND OF FILES.
01639 M00S01511.libedit +++|
01640 M00S01512.libedit +++|
01641 M00S01513.libedit +++| NOREW SX6 B1+
01642 M00S01514.libedit +++| SA6 CREW SET NO REWIND FLAG
01643 M00S01515.libedit +++| EQ LST LIST DIRECTIVE
01644 M00S01516.libedit +++| OLDF SPACE 4,10
01645 M00S01517.libedit +++|** *OLD FN
01646 M00S01518.libedit +++|*
01647 M00S01519.libedit +++|* CHANGE/SPECIFY NAME OF OLD FILE.
01648 M00S01520.libedit +++|
01649 M00S01521.libedit +++|
01650 M00S01522.libedit +++| OLDF SA1 FLST+/FLST/OLD
01651 M00S01523.libedit +++| EQ NEW1 PROCESS FILE NAME
01652 M00S01524.libedit +++| SPACE 4
01653 M00S01525.libedit +++|** *RENAME LIB1/PN1,PN2
01654 M00S01526.libedit +++|*
01655 M00S01527.libedit +++|* CHANGE THE NAME OF PROGRAM *PN1* TO *PN2*.
01656 M00S01528.libedit +++|* ENTRY (B5) = (SEPARATOR CHARACTER - *,*).
01657 M00S01529.libedit +++|
01658 M00S01530.libedit +++|
01659 M00S01531.libedit +++| RENAME SA3 RDCD SET REPLACE NAME
01660 M00S01532.libedit +++| BX6 X3
01661 M00S01533.libedit +++| SA6 RENA
01662 M00S01534.libedit +++| ZR B5,REN1 IF SEPARATOR = *,*
01663 M00S01535.libedit +++| SB5 X2-1R
01664 M00S01536.libedit +++| NZ B5,ERR9 IF SEPARATOR NOT *,* OR * *
01665 M00S01537.libedit +++| REN1 SEARCH RNT,A6
01666 M00S01538.libedit +++| SX7 =C* RECORD ALREADY RENAMED.*
01667 M00S01539.libedit +++| NZ X6,ERR IF NAME IN RNT
01668 M00S01540.libedit +++| CALL AFN,RDCA,(RENA+1)
01669 M00S01541.libedit +++| MX0 42
01670 M00S01542.libedit +++| SA3 RENA
01671 M00S01543.libedit +++| SA4 A3+B1
01672 M00S01544.libedit +++| BX6 -X0*X3
01673 M00S01545.libedit +++| BX6 X4+X6
01674 M00S01546.libedit +++| SA6 A4
01675 M00S01547.libedit +++| ADDWRD RNT,RENA
01676 M00S01548.libedit +++| EQ LST LIST LINE
01677 M00S01549.libedit +++|
01678 M00S01550.libedit +++| RENA VFD 42/,18/ 42/PRG1,18/LIB1
01679 M00S01551.libedit +++| VFD 42/,18/ 42/PRG1,18/LIB1
01680 M00S01552.libedit +++| SPACE 4
01681 M00S01553.libedit +++|** *REPLACE LIB1/PN1,LIB2/PN2-LIB3/PN3
01682 M00S01554.libedit +++|*
01683 M00S01555.libedit +++|* REPLACE PROGRAM(S) FROM FILE *OLD* WITH PROGRAMS FROM
01684 M00S01556.libedit +++|* THE CURRENT CORRECTION FILE.
01685 M00S01557.libedit +++|* ENTRY (X2) = SEPARATOR CHARACTER.
01686 M00S01558.libedit +++|
01687 M00S01559.libedit +++|
01688 M00S01560.libedit +++| REPLACE SA3 RDCD SET REPLACE NAME
01689 M00S01561.libedit +++| BX6 X3
01690 M00S01562.libedit +++| SA6 INSA
01691 M00S01563.libedit +++| SEARCH NRT,(LGO.)
01692 M00S01564.libedit +++| NZ X6,REP1 IF FILE IN NRT
01693 M00S01565.libedit +++| SB3 LGO.
01694 M00S01566.libedit +++| ADDWRD NRT,B3
01695 M00S01567.libedit +++| REP1 SA1 RDCA
01696 M00S01568.libedit +++| SA2 X1
01697 M00S01569.libedit +++| EQ INS5 ASSEMBLE AS INSERT
01698 M00S01570.libedit +++| SPACE 4
01699 M00S01571.libedit +++|** *REWIND FN,FN,FN
01700 M00S01572.libedit +++|*
01701 M00S01573.libedit +++|* REWIND FN BEFORE AND AFTER EDITING.
01702 M00S01574.libedit +++|
01703 M00S01575.libedit +++|
01704 M00S01576.libedit +++| REWIND SEARCH RFT,RDCD
01705 M00S01577.libedit +++| NZ X6,RET IF IN RFT TABLE
01706 M00S01578.libedit +++| ADDWRD RFT,RDCD
01707 M00S01579.libedit +++| EQ RET
01708 M00S01580.libedit +++| VFYLIB SPACE 4,10
01709 M00S01581.libedit +++|** *VFYLIB
01710 M00S01582.libedit +++|*
01711 M00S01583.libedit +++|* CALL *VFYLIB* AFTER EDITING.
01712 M00S01584.libedit +++|
01713 M00S01585.libedit +++|
01714 M00S01586.libedit +++| VFYLIB SX6 B1+ SET *VFYLIB* FLAG
01715 M00S01587.libedit +++| SA6 CVFY
01716 M00S01588.libedit +++| EQ LST LIST DIRECTIVE
| Line S01589 Modification History | |
|---|---|
M01 (Removed by) | libed6 |
Seq # *Modification Id* Act ----------------------------+ 01717 M01S01589.libed6 ---| SPACE 4 01718 M01S01590.libed6 ---| RDCL BSS 0 01719 M00S01591.libedit ---| TITLE SUBROUTINES. 01720 M00S01592.libedit ---|** ABT - ABORT JOB. 01721 M00S01593.libedit ---|
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/libedit.txt · Last modified: by 127.0.0.1